diff --git a/.gitattributes b/.gitattributes new file mode 100644 index 000000000..176a458f9 --- /dev/null +++ b/.gitattributes @@ -0,0 +1 @@ +* text=auto diff --git a/.github/checks/Makefile b/.github/checks/Makefile new file mode 100644 index 000000000..18cc153d4 --- /dev/null +++ b/.github/checks/Makefile @@ -0,0 +1,16 @@ + +.PHONY: checkstyle tabs lastline spaces noexec + +checkstyle: tabs lastline spaces noexec + +tabs: tabs.sh + @./tabs.sh + +lastline: lastline.sh + @./lastline.sh + +spaces: spaces.sh + @./spaces.sh + +noexec: noexec.sh + @./noexec.sh diff --git a/.github/checks/lastline.sh b/.github/checks/lastline.sh new file mode 100755 index 000000000..d80d2fb57 --- /dev/null +++ b/.github/checks/lastline.sh @@ -0,0 +1,25 @@ +#! /bin/bash +OLDCWD=`pwd` +SCRIPT_PATH=`dirname $0` +CHECK_PATH=. + +cd $SCRIPT_PATH/../../ + +nl=' +' +nl=$'\n' +r1="${nl}$" +FILES=`find $CHECK_PATH -type f \( -name \*.inc -o -name Makefile -o -name \*.cfg -o -name \*.\[chs\] -o -name \*.mac -o -name \*.asm -o -name \*.sgml \) -print | while read f; do + t=$(tail -c2 $f; printf x) + [[ ${t%x} =~ $r1 ]] || echo "$f" +done` + +cd $OLDCWD + +if [ x"$FILES"x != xx ]; then + echo "error: found following files that have no newline at the end:" >&2 + for n in $FILES; do + echo $n >&2 + done + exit -1 +fi diff --git a/.github/checks/noexec.sh b/.github/checks/noexec.sh new file mode 100755 index 000000000..c76ae481d --- /dev/null +++ b/.github/checks/noexec.sh @@ -0,0 +1,18 @@ +#! /bin/bash +OLDCWD=`pwd` +SCRIPT_PATH=`dirname $0` +CHECK_PATH=. + +cd $SCRIPT_PATH/../../ + +FILES=`find $CHECK_PATH -executable -type f \( -name \*.inc -o -name Makefile -o -name \*.cfg -o -name \*.\[chs\] -o -name \*.mac -o -name \*.asm -o -name \*.sgml \) -print` + +cd $OLDCWD + +if [ x"$FILES"x != xx ]; then + echo "error: executable flag is set for the following files:" >&2 + for n in $FILES; do + echo $n >&2 + done + exit -1 +fi diff --git a/.github/checks/spaces.sh b/.github/checks/spaces.sh new file mode 100755 index 000000000..945e9acc3 --- /dev/null +++ b/.github/checks/spaces.sh @@ -0,0 +1,18 @@ +#! /bin/bash +OLDCWD=`pwd` +SCRIPT_PATH=`dirname $0` +CHECK_PATH=. + +cd $SCRIPT_PATH/../../ + +FILES=`find $CHECK_PATH -type f \( -name \*.inc -o -name Makefile -o -name \*.cfg -o -name \*.\[chs\] -o -name \*.mac -o -name \*.asm -o -name \*.sgml \) -print | grep -v "libwrk/" | grep -v "testwrk/" | xargs grep -l ' $'` + +cd $OLDCWD + +if [ x"$FILES"x != xx ]; then + echo "error: found dangling spaces in the following files:" >&2 + for n in $FILES; do + echo $n >&2 + done + exit -1 +fi diff --git a/.github/checks/tabs.sh b/.github/checks/tabs.sh new file mode 100755 index 000000000..1c32def17 --- /dev/null +++ b/.github/checks/tabs.sh @@ -0,0 +1,18 @@ +#! /bin/bash +OLDCWD=`pwd` +SCRIPT_PATH=`dirname $0` +CHECK_PATH=. + +cd $SCRIPT_PATH/../../ + +FILES=`find $CHECK_PATH -type f \( \( -name \*.inc -a \! -name Makefile.inc \) -o -name \*.cfg -o -name \*.\[chs\] -o -name \*.mac -o -name \*.asm -o -name \*.sgml \) -print | grep -v "libwrk/" | grep -v "testwrk/" | xargs grep -l $'\t'` + +cd $OLDCWD + +if [ x"$FILES"x != xx ]; then + echo "error: found TABs in the following files:" >&2 + for n in $FILES; do + echo $n >&2 + done + exit -1 +fi diff --git a/.github/workflows/build-on-pull-request.yml b/.github/workflows/build-on-pull-request.yml new file mode 100644 index 000000000..0ba0c6a1f --- /dev/null +++ b/.github/workflows/build-on-pull-request.yml @@ -0,0 +1,69 @@ +name: Build Pull Request +on: [pull_request] +concurrency: + group: ${{ github.workflow }}-${{ github.ref }} + cancel-in-progress: true + +jobs: + build_linux: + name: Build and Test (Linux) + runs-on: ubuntu-latest + + steps: + - name: Install Dependencies + shell: bash + run: | + sudo apt-get update + sudo apt-get install linuxdoc-tools-info gcc-mingw-w64-x86-64 + + - shell: bash + run: git config --global core.autocrlf input + - name: Checkout Source + uses: actions/checkout@v2 + + - name: Do some simple style checks + shell: bash + run: make -j2 checkstyle + - name: Build the tools. + shell: bash + run: make -j2 bin USER_CFLAGS=-Werror + - name: Build the utilities. + shell: bash + run: make -j2 util + - name: Build the platform libraries. + shell: bash + run: make -j2 lib QUIET=1 + - name: Run the regression tests. + shell: bash + run: make test QUIET=1 + - name: Test that the samples can be built. + run: make -C samples platforms + - name: Test that the targettest programs can be built. + run: make -C targettest platforms + - name: Build the document files. + shell: bash + run: make -j2 doc + - name: Build 64-bit Windows versions of the tools. + run: | + make -C src clean + make -j2 bin USER_CFLAGS=-Werror CROSS_COMPILE=x86_64-w64-mingw32- + + build_windows: + name: Build (Windows) + runs-on: windows-latest + + steps: + - shell: bash + run: git config --global core.autocrlf input + + - name: Checkout Source + uses: actions/checkout@v2 + + - name: Add msbuild to PATH + uses: microsoft/setup-msbuild@v1.1 + + - name: Build app (debug) + run: msbuild src\cc65.sln -t:rebuild -property:Configuration=Debug + + - name: Build app (release) + run: msbuild src\cc65.sln -t:rebuild -property:Configuration=Release diff --git a/.github/workflows/snapshot-on-push-master.yml b/.github/workflows/snapshot-on-push-master.yml new file mode 100644 index 000000000..769d778d5 --- /dev/null +++ b/.github/workflows/snapshot-on-push-master.yml @@ -0,0 +1,127 @@ +name: Snapshot Build +on: + push: + branches: + master +concurrency: + group: ${{ github.workflow }}-${{ github.ref }} + cancel-in-progress: true + +jobs: + build_windows: + name: Build (Windows) + if: github.repository == 'cc65/cc65' + runs-on: windows-latest + + steps: + - shell: bash + run: git config --global core.autocrlf input + + - name: Checkout Source + uses: actions/checkout@v2 + + - name: Add msbuild to PATH + uses: microsoft/setup-msbuild@v1.1 + + - name: Build app (debug) + run: msbuild src\cc65.sln -t:rebuild -property:Configuration=Debug + + - name: Build app (release) + run: msbuild src\cc65.sln -t:rebuild -property:Configuration=Release + + build_linux: + name: Build, Test, and Snapshot (Linux) + if: github.repository == 'cc65/cc65' + runs-on: ubuntu-latest + + steps: + - name: Install Dependencies + shell: bash + run: | + sudo apt-get update + sudo apt-get install linuxdoc-tools-info gcc-mingw-w64-x86-64 gcc-mingw-w64-i686 + + - shell: bash + run: git config --global core.autocrlf input + - name: Checkout Source + uses: actions/checkout@v2 + + - name: Do some simple style checks + shell: bash + run: make -j2 checkstyle + - name: Build the tools. + shell: bash + run: | + make -j2 bin USER_CFLAGS=-Werror + make -j2 util + - name: Build the platform libraries. + shell: bash + run: make -j2 lib QUIET=1 + - name: Run the regression tests. + shell: bash + run: make test QUIET=1 + - name: Test that the samples can be built. + shell: bash + run: make -j2 samples + - name: Remove the output from the samples tests. + shell: bash + run: make -C samples clean + - name: Remove programs in util directory + shell: bash + run: make -C util clean + - name: Build the document files. + shell: bash + run: make -j2 doc + - name: Build and package 64-bit Windows versions of the tools. + run: | + make -C src clean + make -j2 bin USER_CFLAGS=-Werror CROSS_COMPILE=x86_64-w64-mingw32- + make zip + mv cc65.zip cc65-snapshot-win64.zip + - name: Build and package 32-bit Windows versions of the tools. + run: | + make -C src clean + make -j2 bin USER_CFLAGS=-Werror CROSS_COMPILE=i686-w64-mingw32- + make zip + mv cc65.zip cc65-snapshot-win32.zip + + - name: Upload a 32-bit Snapshot Zip + uses: actions/upload-artifact@v2 + with: + name: cc65-snapshot-win32.zip + path: cc65-snapshot-win32.zip + - name: Upload a 64-bit Snapshot Zip + uses: actions/upload-artifact@v2 + with: + name: cc65-snapshot-win64.zip + path: cc65-snapshot-win64.zip + + - name: Get the online documents repo. + uses: actions/checkout@v2 + with: + repository: cc65/doc + path: doc.git + - name: Update the online documents. + run: | + cd doc.git + rm *.* + cp ../html/*.* . + git config user.name "cc65-github" + git config user.email "cc65.nomail@github.com" + git config push.default simple + git add -A + git commit -m "Updated from cc65 commit ${GITHUB_SHA}." + #git push -v + + # enter secrets under "repository secrets" + - name: Upload snapshot to sourceforge + uses: nogsantos/scp-deploy@master + with: + src: cc65-snapshot-win32.zip + host: ${{ secrets.SSH_HOST }} + remote: ${{ secrets.SSH_DIR }} + port: ${{ secrets.SSH_PORT }} + user: ${{ secrets.SSH_USER }} + key: ${{ secrets.SSH_KEY }} + + # TODO: Publish snapshot zip at https://github.com/cc65/cc65.github.io diff --git a/.gitignore b/.gitignore index 196cdc3d7..9112484b8 100644 --- a/.gitignore +++ b/.gitignore @@ -1,13 +1,12 @@ /bin/ -/emd/ /html/ /info/ -/joy/ /lib/ /libwrk/ -/mou/ -/ser/ -/targetutil/ +/target/ /testwrk/ -/tgi/ /wrk/ +/cc65.zip +/util/atari/*.exe +/util/gamate/*.exe + diff --git a/.travis.yml b/.travis.yml index 10ea789cf..4b0919a10 100644 --- a/.travis.yml +++ b/.travis.yml @@ -1,18 +1,26 @@ -language: - - c -install: - - sudo apt-get update - - sudo apt-get install linuxdoc-tools linuxdoc-tools-info binutils-mingw-w64-i686 gcc-mingw-w64-i686 sshpass -script: - - make bin USER_CFLAGS=-Werror - - make lib QUIET=1 - - make -C test - - make -C src clean - - make bin USER_CFLAGS=-Werror CROSS_COMPILE=i686-w64-mingw32- - - make doc zip -after_success: - - make -f Makefile.travis -env: - global: - - secure: "h+hoQdEHGPLNwaqGKmSaM8NBRDLc2X+W05VsnNG2Feq/wPv/AiBjONNlzN7jRf6D6f3aoPXaQ2Lc3bYWdxGvFRCmwiofdxkJI9n5L8HPHLZ2lf37MQsXmGJzoTFOvjPLj73H6HlbI9Ux0El3zO6hvalxiXj6TfoZ41dbhNyvpYk=" - - secure: "A4hMEe5RRfUtYjFGbT7QAvT1Tyo434N+/TiuQeQ4q0L46c79LnXuGQzbFLOFZshZiplLkJr7lFg466CoI1bf2L0cQOew/LesMhE75v0HQ7tZnExWhdpAk0ri6nWixbjn/dmQ0+HxjzJ48A44DMMBYcvSIsO4vflvuJ8etfSg42k=" +language: c + +jobs: + include: + + - os: linux + name: Linux + install: + - sudo apt-get update + - sudo apt-get install linuxdoc-tools linuxdoc-tools-info binutils-mingw-w64-i686 gcc-mingw-w64-i686 sshpass + script: + - make -j2 bin USER_CFLAGS=-Werror + - make -j2 lib QUIET=1 + - make test QUIET=1 + - make -j2 samples + - make -C src clean + - make -j2 bin USER_CFLAGS=-Werror CROSS_COMPILE=i686-w64-mingw32- + - make -C samples clean + - make -j2 doc zip + after_success: + - make -f Makefile.travis + + - os: windows + name: Windows + script: + - src/msbuild.cmd src\\cc65.sln diff --git a/Contributing.md b/Contributing.md new file mode 100644 index 000000000..5861a9c2e --- /dev/null +++ b/Contributing.md @@ -0,0 +1,165 @@ +This document contains all kinds of information that you should know if you want to contribute to the cc65 project. Before you start, please read all of it. If something is not clear to you, please ask - this document is an ongoing effort and may well be incomplete. + +(''Note:'' The word "must" indicates a requirement. The word "should" indicates a recomendation.) + +*this is work in progress and is constantly updated - if in doubt, please ask* + +# generally + +* You must obey these rules when contributing new code or documentation to cc65. We are well aware that not all existing code may respect all rules outlined here - but this is no reason for you not to respect them. +* One commit/patch/PR per issue. Do not mix several things unless they are very closely related. + +# Codestyle rules + +## All Sources + +### TABs and spaces + +This is an ongoing controversial topic - everyone knows that. However, the following is how we do it :) + +* TAB characters must be expanded to spaces. +* 4 spaces per indention level (rather than 8) are preferred, especially if there are many different levels. +* No extra spaces at the end of lines. +* All text files must end with new-line characters. Don't leave the last line "dangling". + +The (bash) scripts used to check the above rules can be found in ```.github/check```. You can also run all checks using ```make check```. + +### misc + +* 80 characters is the desired maximum width of files. But, it isn't a "strong" rule; sometimes, you will want to type longer lines, in order to keep the parts of expressions or comments together on the same line. +* You should avoid typing non-ASCII characters. +* If you change "normal" source code into comments, then you must add a comment about why that code is a comment. +* When you want to create a comment from several lines of code, you should use preprocessor lines, instead of ```/* */``` or "```;```". Example: +
+#if 0
+    one ();
+    two ();
+    three = two () + one ();
+#endif
+
+* You should type upper case characters for hex values. +* When you type zero-page addresses in hexadecimal, you should type two hex characters (after the hex prefix). When you type non-zero-page addresses in hex, you should type four hex characters. +* When you type lists of addresses, it is a good idea to sort them in ascending numerical order. That makes it easier for readers to build mental pictures of where things are in an address space. And, it is easier to see how big the variables and buffers are. Example: +
+xCoord := $0703
+yCoord := $0705        ; (this address implies that xCoord is 16 bits)
+cmdbuf := $0706        ; (this address implies that yCoord is 8 bits)
+cmdlen := $0786        ; (this address implies that cmdbuf is 128 bytes)
+color  := $0787
+
+ +## C Sources + +The following is still very incomplete - if in doubt please look at existing sourcefiles and adapt to the existing style + +* Your files should obey the C89 standard. +* We generally have a "no warnings" policy +* Warnings must not be hidden by using typecasts - fix the code instead + * In printf-style functions use the PRIX64 (and similar) macros to deal with 64bit values +* The normal indentation width should be four spaces. +* You must use ANSI C comments (```/* */```); you must not use C++ comments (```//```). +* When you add functions to an existing file, you should separate them by the same number of blank lines that separate the functions that already are in that file. +* All function declarations must be followed by a comment block that tells at least briefly what the function does, what the parameters are, and what is returned. This comment must sit between the declaration and the function body, like this: +
+int foo(int bar)
+/* Add 1 to bar, takes bar and returns the result */
+{
+    return bar + 1;
+}
+
+* When a function's argument list wraps around to a next line, you should indent that next line by either the normal width or enough spaces to align it with the arguments on the previous line. +* All declarations in a block must be at the beginning of that block. +* You should put a blank line between a list of local variable declarations and the first line of code. +* Always use curly braces even for single statements after ```if```, and the single statement should go into a new line. +* Use "cuddling" braces, ie the opening brace goes in the same line as the ```if```: +
+if (foo > 42) {
+    bar = 23;
+}
+
+* Should the ```if``` statement be followed by an empty conditional block, there should be a comment telling why this is the case +
+if (check()) {
+    /* nothing happened, do nothing */
+}
+
+* You must separate function names and parameter/argument lists by one space. +* When declaring/defining pointers, you must put the asterisk (```*```) next to the data type, with a space between it and the variable's name. Examples: +
+    int* namedPtr[5];
+    char* nextLine (FILE* f);
+
+ +### Header files + +Headers that belong to the standard library (libc) must conform with the C standard. That means: +* all non standard functions, or functions that only exist in a certain standard, should be in #ifdefs + * the same is true for macros or typedefs +
+#if __CC65_STD__ == __CC65_STD_C99__
+/* stuff that only exists in C99 here */
+#endif
+#if __CC65_STD__ == __CC65_STD_CC65__
+/* non standard stuff here */
+#endif
+
+You can refer to Annex B of the ISO C99 standard ([here](https://www.open-std.org/jtc1/sc22/wg14/www/docs/n1256.pdf) is the draft). + +## Assembly Sources + +* Op-code mnemonics must have lower-case letters. The names of instruction macroes may have upper-case letters. +* Op-codes must use their official and commonly used mnemonics, ie bcc and bcs and not bgt and blt +* Hexadecimal number constants should be used except where decimal or binary numbers make much more sense in that constant's context. +* Hexadecimal letters should be upper-case. +* When you set two registers or two memory locations to an immediate 16-bit zero, you should use the expressions ```#<$0000``` and ```#>$0000``` (they make it obvious where you are putting the lower and upper bytes). +* If a function is declared to return a char-sized value, it actually must return an integer-sized value. (When cc65 promotes a returned value, it sometimes assumes that the value already is an integer.) +* Functions, that are intended for a platform's system library, should be optimized as much as possible. +* Sometimes, there must be a trade-off between size and speed. If you think that a library function won't be used often, then you should make it small. Otherwise, you should make it fast. +* Comments that are put on the right side of instructions must be aligned (start in the same character columns). +* Assembly source fields (label, operation, operand, comment) should start ''after'' character columns that are multiples of eight (such as 1, 9, 17, 33, and 41). + +## LinuxDoc Sources + +* TAB characters must be expanded to spaces. +* All text files must end with new-line characters. Don't leave the last line "dangling". +* 80 characters is the desired maximum width of files. +* You should avoid typing non-ASCII characters. + +* You should put blank lines between LinuxDoc sections: + * Three blank lines between `````` sections. + * Two blank lines between `````` sections. + * One blank line between other sections. + +# Library implementation rules + +* By default the toolchain must output a "standard" binary for the platform, no emulator formats, no extra headers used by tools. If the resulting binaries can not be run as is on emulators or eg flash cartridges, the process of converting them to something that can be used with these should be documented in the user manual. +* Generally every function should live in a seperate source file - unless the functions are so closely related that splitting makes no sense. +* Source files should not contain commented out code - if they do, there should be a comment that explains why that commented out code exists. + +# Makefile rules + +* Makefiles must generally work on both *nix (ba)sh and windows cmd.exe. +* Makefiles must not use external tools that are not provided by the cc65 toolchain itself. + +The only exception to the above are actions that are exclusive to the github actions - those may rely on bash and/or linux tools. + +# Documentation rules + +## User manual (LinuxDoc) + +* This is the primary documentation. + +## Wiki + +* The Wiki is strictly for additional information that does not fit into the regular user manual (LinuxDoc). The wiki must not duplicate any information that is present in the user manual + +# Roadmap / TODOs / open Ends + +## Documentation + +* the printf family of function does not completely implement all printf modifiers and does not behave as expected in some cases - all this should be documented in detail + +## Test suite + +* specific tests to check the optimizer (rather than the codegenerator) are needed. +* we need more specific tests to check standard conformance of the library headers diff --git a/Makefile b/Makefile index e0530e9f0..909de81ec 100644 --- a/Makefile +++ b/Makefile @@ -1,23 +1,55 @@ -.PHONY: all mostlyclean clean install zip avail unavail bin lib doc +.PHONY: all mostlyclean clean install zip avail unavail bin lib doc html info samples test util checkstyle check .SUFFIXES: -all mostlyclean clean install zip: - @$(MAKE) -C src --no-print-directory $@ - @$(MAKE) -C libsrc --no-print-directory $@ - @$(MAKE) -C doc --no-print-directory $@ +all install zip: + @$(MAKE) -C src --no-print-directory $@ + @$(MAKE) -C libsrc --no-print-directory $@ + @$(MAKE) -C doc --no-print-directory $@ + @$(MAKE) -C util --no-print-directory $@ + @$(MAKE) -C samples --no-print-directory $@ + +mostlyclean clean: + @$(MAKE) -C src --no-print-directory $@ + @$(MAKE) -C libsrc --no-print-directory $@ + @$(MAKE) -C doc --no-print-directory $@ + @$(MAKE) -C util --no-print-directory $@ + @$(MAKE) -C samples --no-print-directory $@ + @$(MAKE) -C test --no-print-directory $@ + @$(MAKE) -C targettest --no-print-directory $@ avail unavail bin: - @$(MAKE) -C src --no-print-directory $@ + @$(MAKE) -C src --no-print-directory $@ lib: - @$(MAKE) -C libsrc --no-print-directory $@ + @$(MAKE) -C libsrc --no-print-directory $@ -doc: - @$(MAKE) -C doc --no-print-directory $@ +doc html info: + @$(MAKE) -C doc --no-print-directory $@ + +samples: + @$(MAKE) -C samples --no-print-directory $@ + +util: + @$(MAKE) -C util --no-print-directory $@ %65: - @$(MAKE) -C src --no-print-directory $@ + @$(MAKE) -C src --no-print-directory $@ %: - @$(MAKE) -C libsrc --no-print-directory $@ + @$(MAKE) -C libsrc --no-print-directory $@ + +# check the code style +checkstyle: + @$(MAKE) -C .github/checks --no-print-directory $@ + +# simple "test" target, only run regression tests for c64 target +test: + @$(MAKE) -C test --no-print-directory $@ + +# GNU "check" target, which runs all tests +check: + @$(MAKE) -C .github/checks checkstyle --no-print-directory + @$(MAKE) test + @$(MAKE) -C targettest platforms --no-print-directory + @$(MAKE) -C samples platforms --no-print-directory diff --git a/Makefile.travis b/Makefile.travis index 4c0f688f8..71811eacb 100644 --- a/Makefile.travis +++ b/Makefile.travis @@ -10,8 +10,8 @@ GH_PATH = ../doc gh-pages: ifdef GH_TOKEN - @echo 'git clone --branch=gh-pages https://$$(GH_TOKEN)@github.com/cc65/doc.git $(GH_PATH)' - @git clone --branch=gh-pages https://$(GH_TOKEN)@github.com/cc65/doc.git $(GH_PATH) + @echo 'git clone https://$$(GH_TOKEN)@github.com/cc65/doc.git $(GH_PATH)' + @git clone https://$(GH_TOKEN)@github.com/cc65/doc.git $(GH_PATH) cd $(GH_PATH) && git config user.name "$(GH_NAME)" cd $(GH_PATH) && git config user.email "$(GH_MAIL)" cd $(GH_PATH) && git config push.default simple diff --git a/README.md b/README.md index b62ac761d..536e59243 100644 --- a/README.md +++ b/README.md @@ -1,37 +1,51 @@ -[Windows Snapshot](http://sourceforge.net/projects/cc65/files/cc65-snapshot-win32.zip) - -[Documentation](http://cc65.github.io/doc) - -[Wiki](http://github.com/cc65/wiki/wiki) - -[![Build Status](https://api.travis-ci.org/cc65/cc65.svg?branch=master)](https://travis-ci.org/cc65/cc65/builds) +# About cc65 cc65 is a complete cross development package for 65(C)02 systems, including -a powerful macro assembler, a C compiler, linker, librarian and several -other tools. +a powerful macro assembler, a C compiler, linker, archiver and several +other tools. cc65 has C and runtime library support for many of the old 6502 machines. +For details look at the [Website](https://cc65.github.io). -cc65 has C and runtime library support for many of the old 6502 machines, -including +## People -- the following Commodore machines: - - VIC20 - - C16/C116 and Plus/4 - - C64 - - C128 - - CBM 510 (aka P500) - - the 600/700 family - - newer PET machines (not 2001). -- the Apple ]\[+ and successors. -- the Atari 8 bit machines. -- the Atari 5200 console. -- GEOS for the C64, C128 and Apple //e. -- the Bit Corporation Gamate console. -- the NEC PC-Engine (aka TurboGrafx-16). -- the Nintendo Entertainment System (NES) console. -- the Watara Supervision console. -- the Oric Atmos. -- the Lynx console. -- the Ohio Scientific Challenger 1P. +Core team members: -The libraries are fairly portable, so creating a version for other 6502s -shouldn't be too much work. +* [Christian Groessler](https://github.com/groessler): Atari, Atari5200, and CreatiVision library Maintainer +* [dqh](https://github.com/dqh-au): GHA help +* [Greg King](https://github.com/greg-king5): all around hackery +* [groepaz](https://github.com/mrdudz): CBM libary, Project Maintainer +* [Oliver Schmidt](https://github.com/oliverschmidt): Apple II library Maintainer + +External contributors: + +* [acqn](https://github.com/acqn): various compiler fixes +* [jedeoric](https://github.com/jedeoric): Telestrat target +* [jmr](https://github.com/jmr): compiler fixes +* [karrika](https://github.com/karrika): Atari 7800 target +* [Stephan Mühlstrasser](https://github.com/smuehlst): osic1p target +* [Wayne Parham](https://github.com/WayneParham): Sym-1 target + +*(The above list is incomplete, if you feel left out - please speak up or add yourself in a PR)* + +For a complete list look at the [full team list](https://github.com/orgs/cc65/teams) or the list of [all contributors](https://github.com/cc65/cc65/graphs/contributors) + +# Contact + +For general discussion, questions, etc subscribe to the [mailing list](https://cc65.github.io/mailing-lists.html) or use the [github discussions](https://github.com/cc65/cc65/discussions). + +Some of us may also be around on IRC [#cc65](https://web.libera.chat/#cc65) on libera.chat + +# Documentation + +* The main [Documentation](https://cc65.github.io/doc) for users and developers + +* Info on [Contributing](Contributing.md) to the CC65 project. Please read this before working on something you want to contribute, and before reporting bugs. + +* The [Wiki](https://github.com/cc65/wiki/wiki) contains some extra info that does not fit into the regular documentation. + +# Downloads + +* [Windows Snapshot](https://sourceforge.net/projects/cc65/files/cc65-snapshot-win32.zip) + +* [Linux Snapshot DEB and RPM](https://software.opensuse.org//download.html?project=home%3Astrik&package=cc65) + +[![Snapshot Build](https://github.com/cc65/cc65/actions/workflows/snapshot-on-push-master.yml/badge.svg?branch=master)](https://github.com/cc65/cc65/actions/workflows/snapshot-on-push-master.yml) diff --git a/asminc/_file.inc b/asminc/_file.inc index 2f9938a3e..a9ac1e34a 100644 --- a/asminc/_file.inc +++ b/asminc/_file.inc @@ -24,4 +24,4 @@ _FPUSHBACK = $08 ; File table .global __filetab - + diff --git a/asminc/accelerator.inc b/asminc/accelerator.inc new file mode 100644 index 000000000..23a9686c7 --- /dev/null +++ b/asminc/accelerator.inc @@ -0,0 +1,80 @@ +; +; Accelerator definitions. +; + +; --------------------------------------------------------------------------- +; Speed definitions for all accelerator, to be used as input for the 'set' +; functions. + + +SPEED_SLOW = $00 +SPEED_FAST = $FF + +SPEED_1X = SPEED_SLOW +SPEED_2X = 2 - 1 +SPEED_3X = 3 - 1 +SPEED_4X = 4 - 1 +SPEED_5X = 5 - 1 +SPEED_6X = 6 - 1 +SPEED_7X = 7 - 1 +SPEED_8X = 8 - 1 +SPEED_10X = 10 - 1 +SPEED_12X = 12 - 1 +SPEED_16X = 16 - 1 +SPEED_20X = 20 - 1 + + +; --------------------------------------------------------------------------- +; C64/C128 Super CPU cartridge + +SuperCPU_Slow := $D07A +SuperCPU_Fast := $D07B +SuperCPU_Speed_Mode := $D0B8 +SuperCPU_Detect := $D0BC + + +; --------------------------------------------------------------------------- +; C64DTV + +C64DTV_Extended_Regs := $D03F + +C64DTV_Slow = $00 +C64DTV_Fast = $03 + + +; --------------------------------------------------------------------------- +; C128 native and C128 in C64 mode + +C128_VICIIE_CLK := $D030 + + +; --------------------------------------------------------------------------- +; C64 Chameleon cartridge + +CHAMELEON_CFGTUR := $D0F3 +CHAMELEON_CFGENA := $D0FE + +CHAMELEON_ENABLE_REGS = $2A +CHAMELEON_DISABLE_REGS = $FF + +CHAMELEON_CFGTUR_LIMIT_1MHZ = %00001100 +CHAMELEON_CFGTUR_LIMIT_NONE = %10000000 + + +; --------------------------------------------------------------------------- +; C65/C64DX in C64 mode + +C65_VICIII_KEY := $D02F +C65_VICIII_CTRL_B := $D031 + +C65_VICIII_UNLOCK_1 = $A5 +C65_VICIII_UNLOCK_2 = $96 + + +; --------------------------------------------------------------------------- +; C64 Turbo Master cartridge + +TURBOMASTER_DETECT := $BF53 + +TURBOMASTER_SPEED_REG := $00 + diff --git a/asminc/apple2.inc b/asminc/apple2.inc index 536a1d851..528c463a1 100644 --- a/asminc/apple2.inc +++ b/asminc/apple2.inc @@ -1,6 +1,6 @@ ;----------------------------------------------------------------------------- -; Zero page stuff +; Zero page WNDLFT := $20 ; Text window left WNDWDTH := $21 ; Text window width @@ -15,6 +15,7 @@ PROMPT := $33 ; Used by GETLN RNDL := $4E ; Random counter low RNDH := $4F ; Random counter high HIMEM := $73 ; Highest available memory address+1 +CURLIN := $75 ; Current line number being executed ;----------------------------------------------------------------------------- ; Vectors @@ -31,34 +32,56 @@ PWREDUP := $03F4 ; This must be = EOR #$A5 of SOFTEV+1 KBD := $C000 ; Read keyboard KBDSTRB := $C010 ; Clear keyboard strobe -; 80 column video switches +; 80 column video CLR80COL:= $C000 ; Disable 80 column store SET80COL:= $C001 ; Enable 80 column store RD80COL := $C018 ; >127 if 80 column store enabled RD80VID := $C01F ; >127 if 80 column video enabled -; Character set switches +; Character set CLRALTCHAR := $C00E ; Normal Apple II char set SETALTCHAR := $C00F ; Norm/inv LC, no flash ALTCHARSET := $C01E ; >127 if alt charset switched in -; Language card switches +; Language card RDLCBNK2:= $C011 ; >127 if LC bank 2 in use RDLCRAM := $C012 ; >127 if LC is read enabled ROMIN := $C081 ; Swap in D000-FFFF ROM LCBANK2 := $C083 ; Swap in LC bank 2 LCBANK1 := $C08B ; Swap in LC bank 1 -; Video mode switches -TXTCLR := $C050 ; Display graphics -TXTSET := $C051 ; Display text -MIXCLR := $C052 ; Disable 4 lines of text -MIXSET := $C053 ; Enable 4 lines of text -LOWSCR := $C054 ; Page 1 -HISCR := $C055 ; Page 2 -LORES := $C056 ; Lores graphics -HIRES := $C057 ; Hires graphics +; Vertical blanking +RDVBLBAR := $C019 ; >127 if not vertical blanking +RDVBLMSK := $C041 ; >127 if VBL interrupts enabled +DISVBL := $C05A ; Disable VBL interrupts +ENVBL := $C05B ; Enable VBL interrupts + +; Video mode +TXTCLR := $C050 ; Display graphics +TXTSET := $C051 ; Display text +MIXCLR := $C052 ; Disable 4 lines of text +MIXSET := $C053 ; Enable 4 lines of text +LOWSCR := $C054 ; Page 1 +HISCR := $C055 ; Page 2 +LORES := $C056 ; Lores graphics +HIRES := $C057 ; Hires graphics +DHIRESON := $C05E ; Enable double-width graphics +DHIRESOFF := $C05F ; Disable double-width graphics ; Game controller -BUTN0 := $C061 ; Open-Apple Key -BUTN1 := $C062 ; Closed-Apple Key +TAPEIN := $C060 ; Read casette input / Switch input 3 +BUTN0 := $C061 ; Switch input 0 / Open-Apple key +BUTN1 := $C062 ; Switch input 1 / Closed-Apple key +BUTN2 := $C063 ; Switch input 2 / Shift key +PADDL0 := $C064 ; Analog input 0 +PADDL1 := $C065 ; Analog input 1 +PADDL2 := $C066 ; Analog input 2 +PADDL3 := $C067 ; Analog input 3 +PTRIG := $C070 ; Analog input reset + +; Input/Output Unit +IOUDISON := $C07E ; Disable IOU +IOUDISOFF := $C07F ; Enable IOU + +; Control Your Apple +CYAREG := $C036 ; Bits 0-3=disk detect 4=shadow all banks 7=fast diff --git a/asminc/apple2.mac b/asminc/apple2.mac new file mode 100644 index 000000000..b9860c092 --- /dev/null +++ b/asminc/apple2.mac @@ -0,0 +1,48 @@ +; Convert characters to screen codes + +; Helper macro that converts and outputs one character +.macro _scrcode char + .if (char < 256) + .byte (char + 128) + .else + .error "scrcode: Character constant out of range" + .endif +.endmacro + +.macro scrcode arg1, arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9 + + ; Bail out if next argument is empty + .if .blank (arg1) + .exitmacro + .endif + + ; Check for a string + .if .match ({arg1}, "") + + ; Walk over all string chars + .repeat .strlen (arg1), i + _scrcode {.strat (arg1, i)} + .endrepeat + + ; Check for a number + .elseif .match (.left (1, {arg1}), 0) + + ; Just output the number + _scrcode arg1 + + ; Check for a character + .elseif .match (.left (1, {arg1}), 'a') + + ; Just output the character + _scrcode arg1 + + ; Anything else is an error + .else + + .error "scrcode: invalid argument type" + + .endif + + ; Call the macro recursively with the remaining args + scrcode arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9 +.endmacro diff --git a/asminc/ascii_charmap.inc b/asminc/ascii_charmap.inc new file mode 100644 index 000000000..ecbf2640f --- /dev/null +++ b/asminc/ascii_charmap.inc @@ -0,0 +1,287 @@ +;/*****************************************************************************/ +;/* */ +;/* ascii_charmap.inc */ +;/* */ +;/* No translations, encodings are stored as they were typed in the host. */ +;/* */ +;/* */ +;/* 2019-09-07, Greg King */ +;/* */ +;/* This software is provided "as-is", without any expressed or implied */ +;/* warranty. In no event will the authors be held liable for any damages */ +;/* arising from the use of this software. */ +;/* */ +;/* Permission is granted to anyone to use this software for any purpose, */ +;/* including commercial applications, and to alter it and redistribute it */ +;/* freely, subject to the following restrictions: */ +;/* */ +;/* 1. The origin of this software must not be misrepresented; you must not */ +;/* claim that you wrote the original software. If you use this software */ +;/* in a product, an acknowledgment in the product documentation would be */ +;/* appreciated, but is not required. */ +;/* 2. Altered source versions must be plainly marked as such, and must not */ +;/* be misrepresented as being the original software. */ +;/* 3. This notice must not be removed or altered from any source */ +;/* distribution. */ +;/* */ +;/*****************************************************************************/ + +;/* ASCII */ +.charmap $00, $00 +.charmap $01, $01 +.charmap $02, $02 +.charmap $03, $03 +.charmap $04, $04 +.charmap $05, $05 +.charmap $06, $06 +.charmap $07, $07 +.charmap $08, $08 +.charmap $09, $09 +.charmap $0A, $0A +.charmap $0B, $0B +.charmap $0C, $0C +.charmap $0D, $0D +.charmap $0E, $0E +.charmap $0F, $0F +.charmap $10, $10 +.charmap $11, $11 +.charmap $12, $12 +.charmap $13, $13 +.charmap $14, $14 +.charmap $15, $15 +.charmap $16, $16 +.charmap $17, $17 +.charmap $18, $18 +.charmap $19, $19 +.charmap $1A, $1A +.charmap $1B, $1B +.charmap $1C, $1C +.charmap $1D, $1D +.charmap $1E, $1E +.charmap $1F, $1F +.charmap $20, $20 +.charmap $21, $21 +.charmap $22, $22 +.charmap $23, $23 +.charmap $24, $24 +.charmap $25, $25 +.charmap $26, $26 +.charmap $27, $27 +.charmap $28, $28 +.charmap $29, $29 +.charmap $2A, $2A +.charmap $2B, $2B +.charmap $2C, $2C +.charmap $2D, $2D +.charmap $2E, $2E +.charmap $2F, $2F +.charmap $30, $30 +.charmap $31, $31 +.charmap $32, $32 +.charmap $33, $33 +.charmap $34, $34 +.charmap $35, $35 +.charmap $36, $36 +.charmap $37, $37 +.charmap $38, $38 +.charmap $39, $39 +.charmap $3A, $3A +.charmap $3B, $3B +.charmap $3C, $3C +.charmap $3D, $3D +.charmap $3E, $3E +.charmap $3F, $3F +.charmap $40, $40 +.charmap $41, $41 +.charmap $42, $42 +.charmap $43, $43 +.charmap $44, $44 +.charmap $45, $45 +.charmap $46, $46 +.charmap $47, $47 +.charmap $48, $48 +.charmap $49, $49 +.charmap $4A, $4A +.charmap $4B, $4B +.charmap $4C, $4C +.charmap $4D, $4D +.charmap $4E, $4E +.charmap $4F, $4F +.charmap $50, $50 +.charmap $51, $51 +.charmap $52, $52 +.charmap $53, $53 +.charmap $54, $54 +.charmap $55, $55 +.charmap $56, $56 +.charmap $57, $57 +.charmap $58, $58 +.charmap $59, $59 +.charmap $5A, $5A +.charmap $5B, $5B +.charmap $5C, $5C +.charmap $5D, $5D +.charmap $5E, $5E +.charmap $5F, $5F +.charmap $60, $60 +.charmap $61, $61 +.charmap $62, $62 +.charmap $63, $63 +.charmap $64, $64 +.charmap $65, $65 +.charmap $66, $66 +.charmap $67, $67 +.charmap $68, $68 +.charmap $69, $69 +.charmap $6A, $6A +.charmap $6B, $6B +.charmap $6C, $6C +.charmap $6D, $6D +.charmap $6E, $6E +.charmap $6F, $6F +.charmap $70, $70 +.charmap $71, $71 +.charmap $72, $72 +.charmap $73, $73 +.charmap $74, $74 +.charmap $75, $75 +.charmap $76, $76 +.charmap $77, $77 +.charmap $78, $78 +.charmap $79, $79 +.charmap $7A, $7A +.charmap $7B, $7B +.charmap $7C, $7C +.charmap $7D, $7D +.charmap $7E, $7E +.charmap $7F, $7F + +;/* beyond ASCII */ +.charmap $80, $80 +.charmap $81, $81 +.charmap $82, $82 +.charmap $83, $83 +.charmap $84, $84 +.charmap $85, $85 +.charmap $86, $86 +.charmap $87, $87 +.charmap $88, $88 +.charmap $89, $89 +.charmap $8A, $8A +.charmap $8B, $8B +.charmap $8C, $8C +.charmap $8D, $8D +.charmap $8E, $8E +.charmap $8F, $8F +.charmap $90, $90 +.charmap $91, $91 +.charmap $92, $92 +.charmap $93, $93 +.charmap $94, $94 +.charmap $95, $95 +.charmap $96, $96 +.charmap $97, $97 +.charmap $98, $98 +.charmap $99, $99 +.charmap $9A, $9A +.charmap $9B, $9B +.charmap $9C, $9C +.charmap $9D, $9D +.charmap $9E, $9E +.charmap $9F, $9F +.charmap $A0, $A0 +.charmap $A1, $A1 +.charmap $A2, $A2 +.charmap $A3, $A3 +.charmap $A4, $A4 +.charmap $A5, $A5 +.charmap $A6, $A6 +.charmap $A7, $A7 +.charmap $A8, $A8 +.charmap $A9, $A9 +.charmap $AA, $AA +.charmap $AB, $AB +.charmap $AC, $AC +.charmap $AD, $AD +.charmap $AE, $AE +.charmap $AF, $AF +.charmap $B0, $B0 +.charmap $B1, $B1 +.charmap $B2, $B2 +.charmap $B3, $B3 +.charmap $B4, $B4 +.charmap $B5, $B5 +.charmap $B6, $B6 +.charmap $B7, $B7 +.charmap $B8, $B8 +.charmap $B9, $B9 +.charmap $BA, $BA +.charmap $BB, $BB +.charmap $BC, $BC +.charmap $BD, $BD +.charmap $BE, $BE +.charmap $BF, $BF +.charmap $C0, $C0 +.charmap $C1, $C1 +.charmap $C2, $C2 +.charmap $C3, $C3 +.charmap $C4, $C4 +.charmap $C5, $C5 +.charmap $C6, $C6 +.charmap $C7, $C7 +.charmap $C8, $C8 +.charmap $C9, $C9 +.charmap $CA, $CA +.charmap $CB, $CB +.charmap $CC, $CC +.charmap $CD, $CD +.charmap $CE, $CE +.charmap $CF, $CF +.charmap $D0, $D0 +.charmap $D1, $D1 +.charmap $D2, $D2 +.charmap $D3, $D3 +.charmap $D4, $D4 +.charmap $D5, $D5 +.charmap $D6, $D6 +.charmap $D7, $D7 +.charmap $D8, $D8 +.charmap $D9, $D9 +.charmap $DA, $DA +.charmap $DB, $DB +.charmap $DC, $DC +.charmap $DD, $DD +.charmap $DE, $DE +.charmap $DF, $DF +.charmap $E0, $E0 +.charmap $E1, $E1 +.charmap $E2, $E2 +.charmap $E3, $E3 +.charmap $E4, $E4 +.charmap $E5, $E5 +.charmap $E6, $E6 +.charmap $E7, $E7 +.charmap $E8, $E8 +.charmap $E9, $E9 +.charmap $EA, $EA +.charmap $EB, $EB +.charmap $EC, $EC +.charmap $ED, $ED +.charmap $EE, $EE +.charmap $EF, $EF +.charmap $F0, $F0 +.charmap $F1, $F1 +.charmap $F2, $F2 +.charmap $F3, $F3 +.charmap $F4, $F4 +.charmap $F5, $F5 +.charmap $F6, $F6 +.charmap $F7, $F7 +.charmap $F8, $F8 +.charmap $F9, $F9 +.charmap $FA, $FA +.charmap $FB, $FB +.charmap $FC, $FC +.charmap $FD, $FD +.charmap $FE, $FE +.charmap $FF, $FF diff --git a/asminc/atari.inc b/asminc/atari.inc index 3cce03046..c2a210ea0 100644 --- a/asminc/atari.inc +++ b/asminc/atari.inc @@ -7,6 +7,7 @@ ; - Atari OS manual - XL addendum ; - Atari XL/XE rev.2 source code, Atari 1984 ; - Mapping the Atari - revised edition, Ian Chadwick 1985 +; - SpartaDOS-X User Guide (Aug-8-2016) ; ; ##old## old OS rev.B label - moved or deleted ; ##1200xl## new label introduced in 1200XL OS (rev.10/11) @@ -106,7 +107,7 @@ SIO_WRPERCOM = $4F ;write PERCOM block (XF551) SIO_WRITE = $50 ;write sector SIO_READ = $52 ;read sector SIO_STAT = $53 ;get status information -SIO_VERIFY = $56 ;verify sector +SIO_VERIFY = $56 ;verify sector SIO_WRITEV = $57 ;write sector with verify SIO_WRITETRK = $60 ;write track (Speedy) SIO_READTRK = $62 ;read track (Speedy) @@ -183,6 +184,7 @@ FNTFND = 170 ;($AA) file not found PNTINV = 171 ;($AB) point invalid BADDSK = 173 ;($AD) bad disk INCFMT = 176 ;($B0) DOS 3: incompatible file system +XNTBIN = 180 ;($B4) XDOS: file not binary ; DCB Device Bus Equates @@ -689,7 +691,7 @@ CASFLG = $030F ;CASSETTE MODE WHEN SET TIMER2 = $0310 ;2-byte final baud rate timer value TEMP1 = $0312 ;TEMPORARY STORAGE REGISTER ;TEMP2 = $0314 ;##old## TEMPORARY STORAGE REGISTER -TEMP2 = $0313 ;##1200xl## 1-byte temporary +TEMP2 = $0313 ;##1200xl## 1-byte temporary PTIMOT = $0314 ;##1200xl## 1-byte printer timeout TEMP3 = $0315 ;TEMPORARY STORAGE REGISTER SAVIO = $0316 ;SAVE SERIAL IN DATA PORT @@ -756,6 +758,34 @@ FPSCR1 = $05EC ;6-byte floating point temporary DOS = $0700 +;------------------------------------------------------------------------- +; SpartaDOS-X Definitions +;------------------------------------------------------------------------- + +SDX_FLAG = DOS ; 'S' for SpartaDOS +SDX_VERSION = $0701 ; SD version (e.g. $32 = 3.2, $40 = 4.0) + ; address $0702 contains sub-version, e.g. + ; 8 in case of SDX 4.48 +SDX_KERNEL = $0703 ; SDX kernel entry point +SDX_BLOCK_IO = $0706 ; block I/O entry point +SDX_MISC = $0709 ; "misc" entry point +SDX_DEVICE = $0761 +SDX_DATE = $077B ; day, month, year (3 bytes) +SDX_TIME = $077E ; hour, min, sec (3 bytes) +SDX_DATESET = $0781 +SDX_PATH = $07A0 ; 64 bytes +SDX_IFSYMBOL = $07EB ; only valid on SDX 4.40 or newer +SDX_S_LOOKUP = SDX_IFSYMBOL ; alternative name for SDX_IFSYMBOL + +; values for SDX_DEVICE + +SDX_CLK_DEV = $10 ; clock device + +; clock device functions + +SDX_KD_GETTD = 100 ; get time and date +SDX_KD_SETTD = 101 ; set time and date + ;------------------------------------------------------------------------- ; Cartridge Address Equates ;------------------------------------------------------------------------- @@ -765,7 +795,7 @@ CART = $BFFC ;##rev2## 1-byte cartridge present indicator ;0=Cart Exists CARTFG = $BFFD ;##rev2## 1-byte cartridge flags ;D7 0=Not a Diagnostic Cart - ; 1=Is a Diagnostic cart and control is + ; 1=Is a Diagnostic cart and control is ; given to cart before any OS is init. ;D2 0=Init but Do not Start Cart ; 1=Init and Start Cart @@ -801,6 +831,104 @@ PDVS = $D1FF ;##rev2## parallel device select POKEY = $D200 ;POKEY area .include "atari_pokey.inc" +; POKEY KBCODE Values + +KEY_NONE = $FF + +KEY_0 = $32 +KEY_1 = $1F +KEY_2 = $1E +KEY_3 = $1A +KEY_4 = $18 +KEY_5 = $1D +KEY_6 = $1B +KEY_7 = $33 +KEY_8 = $35 +KEY_9 = $30 + +KEY_A = $3F +KEY_B = $15 +KEY_C = $12 +KEY_D = $3A +KEY_E = $2A +KEY_F = $38 +KEY_G = $3D +KEY_H = $39 +KEY_I = $0D +KEY_J = $01 +KEY_K = $05 +KEY_L = $00 +KEY_M = $25 +KEY_N = $23 +KEY_O = $08 +KEY_P = $0A +KEY_Q = $2F +KEY_R = $28 +KEY_S = $3E +KEY_T = $2D +KEY_U = $0B +KEY_V = $10 +KEY_W = $2E +KEY_X = $16 +KEY_Y = $2B +KEY_Z = $17 + +KEY_COMMA = $20 +KEY_PERIOD = $22 +KEY_SLASH = $26 +KEY_SEMICOLON = $02 +KEY_PLUS = $06 +KEY_ASTERISK = $07 +KEY_DASH = $0E +KEY_EQUALS = $0F +KEY_LESSTHAN = $36 +KEY_GREATERTHAN = $37 + +KEY_ESC = $1C +KEY_TAB = $2C +KEY_SPACE = $21 +KEY_RETURN = $0C +KEY_DELETE = $34 +KEY_CAPS = $3C +KEY_INVERSE = $27 +KEY_HELP = $11 + +KEY_F1 = $03 +KEY_F2 = $04 +KEY_F3 = $13 +KEY_F4 = $14 + +KEY_SHIFT = $40 +KEY_CTRL = $80 + +; Composed keys + +KEY_EXCLAMATIONMARK = KEY_1 | KEY_SHIFT +KEY_QUOTE = KEY_2 | KEY_SHIFT +KEY_HASH = KEY_3 | KEY_SHIFT +KEY_DOLLAR = KEY_4 | KEY_SHIFT +KEY_PERCENT = KEY_5 | KEY_SHIFT +KEY_AMPERSAND = KEY_6 | KEY_SHIFT +KEY_APOSTROPHE = KEY_7 | KEY_SHIFT +KEY_AT = KEY_8 | KEY_SHIFT +KEY_OPENINGPARAN = KEY_9 | KEY_SHIFT +KEY_CLOSINGPARAN = KEY_0 | KEY_SHIFT +KEY_UNDERLINE = KEY_DASH | KEY_SHIFT +KEY_BAR = KEY_EQUALS | KEY_SHIFT +KEY_COLON = KEY_SEMICOLON | KEY_SHIFT +KEY_BACKSLASH = KEY_PLUS | KEY_SHIFT +KEY_CIRCUMFLEX = KEY_ASTERISK | KEY_SHIFT +KEY_OPENINGBRACKET = KEY_COMMA | KEY_SHIFT +KEY_CLOSINGBRACKET = KEY_PERIOD | KEY_SHIFT +KEY_QUESTIONMARK = KEY_SLASH | KEY_SHIFT +KEY_CLEAR = KEY_LESSTHAN | KEY_SHIFT +KEY_INSERT = KEY_GREATERTHAN | KEY_SHIFT + +KEY_UP = KEY_DASH | KEY_CTRL +KEY_DOWN = KEY_EQUALS | KEY_CTRL +KEY_LEFT = KEY_PLUS | KEY_CTRL +KEY_RIGHT = KEY_ASTERISK | KEY_CTRL + ;------------------------------------------------------------------------- ; ANTIC Address Equates ;------------------------------------------------------------------------- @@ -889,6 +1017,10 @@ SETVBV_org = $E45C ;vector to set VBLANK parameters CIOV = $E456 ;vector to CIO SIOV = $E459 ;vector to SIO SETVBV = $E45C ;vector to set VBLANK parameters +; aliases in order not to have to sprinkle common code with .ifdefs +CIOV_org = CIOV +SIOV_org = SIOV +SETVBV_org = SETVBV .endif SYSVBV = $E45F ;vector to process immediate VBLANK XITVBV = $E462 ;vector to process deferred VBLANK @@ -925,7 +1057,7 @@ RADON = 0 ;INDICATES RADIANS DEGON = 6 ;INDICATES DEGREES ASCZER = '0' ;ASCII ZERO -COLON = $3A ;ASCII COLON +COLON = $3A ;ASCII COLON CR = $9B ;SYSTEM EOL (CARRIAGE RETURN) ;------------------------------------------------------------------------- @@ -997,12 +1129,40 @@ diopp_size = 5 ; size of structure ; VALUES for dos_type ;------------------------------------------------------------------------- -ATARIDOS = 0 -SPARTADOS = 1 -OSADOS = 2 ; OS/A+ -MYDOS = 3 +SPARTADOS = 0 +REALDOS = 1 +BWDOS = 2 +OSADOS = 3 ; OS/A+ XDOS = 4 +ATARIDOS = 5 +MYDOS = 6 NODOS = 255 +; The DOSes with dos_type below or equal MAX_DOS_WITH_CMDLINE do support +; command line arguments. +MAX_DOS_WITH_CMDLINE = XDOS + +;------------------------------------------------------------------------- +; XDOS defines (version 2.4, taken from xdos24.pdf) +;------------------------------------------------------------------------- + +XOPT = $070B ; XDOS options +XCAR = $070C ; XDOS cartridge address (+ $70D) +XPAT = $086F ; XDOS bugfix and patch number +XVER = $0870 ; XDOS version number +XFILE = $087D ; XDOS filename buffer +XLINE = $0880 ; XDOS DUP input line +XGLIN = $0871 ; get line +XSKIP = $0874 ; skip parameter +.ifdef __ATARIXL__ +.ifndef SHRAM_HANDLERS +.import XMOVE_handler +.endif +.define XMOVE XMOVE_handler +XMOVE_org = $0877 ; move filename +.else +XMOVE = $0877 ; move filename +.endif +XGNUM = $087A ; get number ;------------------------------------------------------------------------- ; End of atari.inc diff --git a/asminc/atari.mac b/asminc/atari.mac index 8e76888d7..3916254d0 100644 --- a/asminc/atari.mac +++ b/asminc/atari.mac @@ -1,5 +1,5 @@ ; Convert characters to screen codes - + ; Helper macro that converts and outputs one character .macro _scrcode char .if (char >= 0) .and (char <= 31) diff --git a/asminc/atari2600.inc b/asminc/atari2600.inc new file mode 100644 index 000000000..a20926d08 --- /dev/null +++ b/asminc/atari2600.inc @@ -0,0 +1,7 @@ +; Atari 2600 TIA & RIOT read / write registers +; +; Florent Flament (contact@florentflament.com), 2017 + +; TIA & RIOT registers mapping +.include "atari2600_tia.inc" +.include "atari2600_riot.inc" diff --git a/asminc/atari2600_riot.inc b/asminc/atari2600_riot.inc new file mode 100644 index 000000000..a2c6ef633 --- /dev/null +++ b/asminc/atari2600_riot.inc @@ -0,0 +1,20 @@ +; Atari 2600 RIOT read / write registers +; +; Source: DASM - vcs.h +; Details available in: Stella Programmer's Guide by Steve Wright +; +; Florent Flament (contact@florentflament.com), 2017 + +; Read registers +SWCHA := $0280 +SWACNT := $0281 +SWCHB := $0282 +SWBCNT := $0283 +INTIM := $0284 +TIMINT := $0285 + +; Write registers +TIM1T := $0294 +TIM8T := $0295 +TIM64T := $0296 +T1024T := $0297 diff --git a/asminc/atari2600_tia.inc b/asminc/atari2600_tia.inc new file mode 100644 index 000000000..57c27adba --- /dev/null +++ b/asminc/atari2600_tia.inc @@ -0,0 +1,69 @@ +; Atari 2600 TIA read / write registers +; +; Source: DASM - vcs.h +; Details available in: Stella Programmer's Guide by Steve Wright +; +; Florent Flament (contact@florentflament.com), 2017 + +; Read registers +VSYNC := $00 +VBLANK := $01 +WSYNC := $02 +RSYNC := $03 +NUSIZ0 := $04 +NUSIZ1 := $05 +COLUP0 := $06 +COLUP1 := $07 +COLUPF := $08 +COLUBK := $09 +CTRLPF := $0A +REFP0 := $0B +REFP1 := $0C +PF0 := $0D +PF1 := $0E +PF2 := $0F +RESP0 := $10 +RESP1 := $11 +RESM0 := $12 +RESM1 := $13 +RESBL := $14 +AUDC0 := $15 +AUDC1 := $16 +AUDF0 := $17 +AUDF1 := $18 +AUDV0 := $19 +AUDV1 := $1A +GRP0 := $1B +GRP1 := $1C +ENAM0 := $1D +ENAM1 := $1E +ENABL := $1F +HMP0 := $20 +HMP1 := $21 +HMM0 := $22 +HMM1 := $23 +HMBL := $24 +VDELP0 := $25 +VDELP1 := $26 +VDELBL := $27 +RESMP0 := $28 +RESMP1 := $29 +HMOVE := $2A +HMCLR := $2B +CXCLR := $2C + +; Write registers +CXM0P := $00 +CXM1P := $01 +CXP0FB := $02 +CXP1FB := $03 +CXM0FB := $04 +CXM1FB := $05 +CXBLPF := $06 +CXPPMM := $07 +INPT0 := $08 +INPT1 := $09 +INPT2 := $0A +INPT3 := $0B +INPT4 := $0C +INPT5 := $0D diff --git a/asminc/atari5200.inc b/asminc/atari5200.inc index b67c9a8db..b560c06af 100644 --- a/asminc/atari5200.inc +++ b/asminc/atari5200.inc @@ -7,43 +7,53 @@ ;------------------------------------------------------------------------- ; ATASCII CHARACTER DEFS ;------------------------------------------------------------------------- - -ATEOL = $9B ;END-OF-LINE, used by CONIO +ATEOL = $9B ; END-OF-LINE, used by CONIO + +;------------------------------------------------------------------------- +; CONIO CHARACTER DEFS +;------------------------------------------------------------------------- + +CH_ULCORNER = $0B ; '+' sign +CH_URCORNER = $0B +CH_LLCORNER = $0B +CH_LRCORNER = $0B +CH_HLINE = $0D ; dash +CH_VLINE = $01 ; exclamation mark ;------------------------------------------------------------------------- ; Zero Page ;------------------------------------------------------------------------- -POKMSK = $00 ;Mask for Pokey IRQ enable -RTCLOK = $01 ;60 hz. clock -JUMP = $01 -CRITIC = $03 ;Critical section -ATRACT = $04 ;Attract Mode +POKMSK = $00 ; Mask for Pokey IRQ enable +RTCLOK = $01 ; 60 hz. clock +JUMP = $01 +CRITIC = $03 ; Critical section +ATRACT = $04 ; Attract Mode -SDLSTL = $05 ;DLISTL Shadow -SDLSTH = $06 ;DLISTH " -SDMCTL = $07 ;DMACTL " +SDLSTL = $05 ; DLISTL Shadow +SDLSTH = $06 ; DLISTH " +SDMCTL = $07 ; DMACTL " -PCOLR0 = $08 ;COLPM0 Shadow -PCOLR1 = $09 ;COLPM1 " -PCOLR2 = $0A ;COLPM2 " -PCOLR3 = $0B ;COLPM3 " +PCOLR0 = $08 ; COLPM0 Shadow +PCOLR1 = $09 ; COLPM1 " +PCOLR2 = $0A ; COLPM2 " +PCOLR3 = $0B ; COLPM3 " -COLOR0 = $0C ;COLPF0 Shadow -COLOR1 = $0D ;COLPF1 " -COLOR2 = $0E ;COLPF2 " -COLOR3 = $0F ;COLPF3 " -COLOR4 = $10 ;COLBK " +COLOR0 = $0C ; COLPF0 Shadow +COLOR1 = $0D ; COLPF1 " +COLOR2 = $0E ; COLPF2 " +COLOR3 = $0F ; COLPF3 " +COLOR4 = $10 ; COLBK " -PADDL0 = $11 ;POT0 Shadow -PADDL1 = $12 ;POT1 " -PADDL2 = $13 ;POT2 " -PADDL3 = $14 ;POT3 " -PADDL4 = $15 ;POT4 " -PADDL5 = $16 ;POT5 " -PADDL6 = $17 ;POT6 " -PADDL7 = $18 ;POT7 " +PADDL0 = $11 ; POT0 Shadow +PADDL1 = $12 ; POT1 " +PADDL2 = $13 ; POT2 " +PADDL3 = $14 ; POT3 " +PADDL4 = $15 ; POT4 " +PADDL5 = $16 ; POT5 " +PADDL6 = $17 ; POT6 " +PADDL7 = $18 ; POT7 " ; cc65 runtime zero page variables @@ -56,27 +66,27 @@ SAVMSC = $1B ; pointer to screen memory (conio) ;------------------------------------------------------------------------- ;Interrupt Vectors - -VIMIRQ = $0200 ;Immediate IRQ - ;Preset $FC03 (SYSIRQ) -VVBLKI = $0202 ;Vblank immediate - ;Preset $FCB8 (SYSVBL) -VVBLKD = $0204 ;Vblank deferred - ;Preset $FCB2 (XITVBL) -VDSLST = $0206 ;Display List - ;Preset $FEA1 (OSDLI) -VKYBDI = $0208 ;Keyboard immediate - ;Preset $FD02 (SYSKBD) -VKYBDF = $020A ;Deferred Keyboard - ;Preset $FCB2 (XITVBL) -VTRIGR = $020C ;Soft Trigger -VBRKOP = $020E ;BRK Opcode -VSERIN = $0210 ;Serial in Ready -VSEROR = $0212 ;Serial Out Ready -VSEROC = $0214 ;Serial Output complete -VTIMR1 = $0216 ;Pokey Timer 1 -VTIMR2 = $0218 ;Pokey Timer 2 -VTIMR4 = $021A ;Pokey Timer 4 + +VIMIRQ = $0200 ; Immediate IRQ + ; Preset $FC03 (SYSIRQ) +VVBLKI = $0202 ; Vblank immediate + ; Preset $FCB8 (SYSVBL) +VVBLKD = $0204 ; Vblank deferred + ; Preset $FCB2 (XITVBL) +VDSLST = $0206 ; Display List + ; Preset $FEA1 (OSDLI) +VKYBDI = $0208 ; Keyboard immediate + ; Preset $FD02 (SYSKBD) +VKYBDF = $020A ; Deferred Keyboard + ; Preset $FCB2 (XITVBL) +VTRIGR = $020C ; Soft Trigger +VBRKOP = $020E ; BRK Opcode +VSERIN = $0210 ; Serial in Ready +VSEROR = $0212 ; Serial Out Ready +VSEROC = $0214 ; Serial Output complete +VTIMR1 = $0216 ; Pokey Timer 1 +VTIMR2 = $0218 ; Pokey Timer 2 +VTIMR4 = $021A ; Pokey Timer 4 @@ -84,33 +94,40 @@ VTIMR4 = $021A ;Pokey Timer 4 ; CTIA/GTIA Address Equates ;------------------------------------------------------------------------- -GTIA = $C000 ;CTIA/GTIA area +GTIA = $C000 ; CTIA/GTIA area .include "atari_gtia.inc" ;------------------------------------------------------------------------- ; ANTIC Address Equates ;------------------------------------------------------------------------- -ANTIC = $D400 ;ANTIC area +ANTIC = $D400 ; ANTIC area .include "atari_antic.inc" ;------------------------------------------------------------------------- ; POKEY Address Equates ;------------------------------------------------------------------------- -POKEY = $E800 ;POKEY area +POKEY = $E800 ; POKEY area .include "atari_pokey.inc" +;------------------------------------------------------------------------- +; conio color defines +;------------------------------------------------------------------------- + +COLOR_WHITE = 0 +COLOR_RED = 1 +COLOR_GREEN = 2 +COLOR_BLACK = 3 ;------------------------------------------------------------------------- ; Cartridge Parameters ;------------------------------------------------------------------------- -CARTNM = $BFE8 ;Cartridge Name Area -COPYD = $BFFC ;Copyright Decade in Cart -COPYR = $BFFD ;Copyright Year in Cart +CARTNM = $BFE8 ; Cartridge Name Area +COPYD = $BFFC ; Copyright Decade in Cart +COPYR = $BFFD ; Copyright Year in Cart ; $FF=Diagnostic Cart -GOCART = $BFFE ;Cartridge Start Vector +GOCART = $BFFE ; Cartridge Start Vector - -CHRORG = $F800 ;Character Generator Base +CHRORG = $F800 ; Character Generator Base diff --git a/asminc/atari7800.inc b/asminc/atari7800.inc new file mode 100644 index 000000000..0f109ba64 --- /dev/null +++ b/asminc/atari7800.inc @@ -0,0 +1,14 @@ +; Atari 7800 TIA & RIOT read / write registers +; +; Karri Kaksonen (karri@sipo.fi), 2022 + +; TIA, RIOT & MARIA registers mapping +.include "atari7800_tia.inc" +.include "atari7800_riot.inc" +.include "atari7800_maria.inc" + +; constants for the conio implementation +mono_charsperline = 40 +charsperline = 20 +screenrows = 28 + diff --git a/asminc/atari7800_maria.inc b/asminc/atari7800_maria.inc new file mode 100644 index 000000000..39624d21d --- /dev/null +++ b/asminc/atari7800_maria.inc @@ -0,0 +1,39 @@ +; Atari 7800 MARIA read / write registers +; + +; Read registers +BKGRND := $20 +P0C1 := $21 +P0C2 := $22 +P0C3 := $23 +MWSYNC := $24 +P1C1 := $25 +P1C2 := $26 +P1C3 := $27 +MSTAT := $28 +P2C1 := $29 +P2C2 := $2A +P2C3 := $2B +DPPH := $2C +P3C1 := $2D +P3C2 := $2E +P3C3 := $2F +DPPL := $30 +P4C1 := $31 +P4C2 := $32 +P4C3 := $33 +CHBASE := $34 +P5C1 := $35 +P5C2 := $36 +P5C3 := $37 +OFFSET := $38 +P6C1 := $39 +P6C2 := $3A +P6C3 := $3B +CTRL := $3C +P7C1 := $3D +P7C2 := $3E +P7C3 := $3F + +; Write registers + diff --git a/asminc/atari7800_riot.inc b/asminc/atari7800_riot.inc new file mode 100644 index 000000000..780e34df3 --- /dev/null +++ b/asminc/atari7800_riot.inc @@ -0,0 +1,20 @@ +; Atari 7800 RIOT read / write registers +; +; Source: DASM - vcs.h +; Details available in: Stella Programmer's Guide by Steve Wright +; +; Florent Flament (contact@florentflament.com), 2017 + +; Read registers +SWCHA := $0280 +CTLSWA := $0281 +SWCHB := $0282 +CTLSWB := $0283 +INTIM := $0284 +TIMINT := $0285 + +; Write registers +TIM1T := $0294 +TIM8T := $0295 +TIM64T := $0296 +T1024T := $0297 diff --git a/asminc/atari7800_tia.inc b/asminc/atari7800_tia.inc new file mode 100644 index 000000000..f4439e421 --- /dev/null +++ b/asminc/atari7800_tia.inc @@ -0,0 +1,69 @@ +; Atari 7800 TIA read / write registers +; +; Source: DASM - vcs.h +; Details available in: Stella Programmer's Guide by Steve Wright +; +; Florent Flament (contact@florentflament.com), 2017 + +; Read registers +VSYNC := $00 +VBLANK := $01 +WSYNC := $02 +RSYNC := $03 +NUSIZ0 := $04 +NUSIZ1 := $05 +COLUP0 := $06 +COLUP1 := $07 +COLUPF := $08 +COLUBK := $09 +CTRLPF := $0A +REFP0 := $0B +REFP1 := $0C +PF0 := $0D +PF1 := $0E +PF2 := $0F +RESP0 := $10 +RESP1 := $11 +RESM0 := $12 +RESM1 := $13 +RESBL := $14 +AUDC0 := $15 +AUDC1 := $16 +AUDF0 := $17 +AUDF1 := $18 +AUDV0 := $19 +AUDV1 := $1A +GRP0 := $1B +GRP1 := $1C +ENAM0 := $1D +ENAM1 := $1E +ENABL := $1F +HMP0 := $20 +HMP1 := $21 +HMM0 := $22 +HMM1 := $23 +HMBL := $24 +VDELP0 := $25 +VDELP1 := $26 +VDELBL := $27 +RESMP0 := $28 +RESMP1 := $29 +HMOVE := $2A +HMCLR := $2B +CXCLR := $2C + +; Write registers +CXM0P := $00 +CXM1P := $01 +CXP0FB := $02 +CXP1FB := $03 +CXM0FB := $04 +CXM1FB := $05 +CXBLPF := $06 +CXPPMM := $07 +INPT0 := $08 +INPT1 := $09 +INPT2 := $0A +INPT3 := $0B +INPT4 := $0C +INPT5 := $0D diff --git a/asminc/atari_antic.inc b/asminc/atari_antic.inc index 1eb4c87ef..9a097e05a 100644 --- a/asminc/atari_antic.inc +++ b/asminc/atari_antic.inc @@ -33,16 +33,16 @@ NMIRES = ANTIC + $0F ;NMI interrupt reset ; ScreenDL: ; .byte DL_BLK8 ; .byte DL_BLK8 -; .byte DL_CHR40x8x1 + DL_LMS + DL_DLI +; .byte DL_CHR40x8x1 | DL_LMS | DL_DLI ; .word ScreenAlignment -; .byte DL_BLK1 + DL_DLI -; .byte DL_MAP320x1x1 + DL_LMS +; .byte DL_BLK1 | DL_DLI +; .byte DL_MAP320x1x1 | DL_LMS ; .word Screen ; ; .repeat 99 ; .byte DL_MAP320x1x1 ; .endrepeat -; .byte DL_MAP320x1x1 + DL_LMS +; .byte DL_MAP320x1x1 | DL_LMS ; .word Screen + 40 * 100 ; 100 lines a 40 byte, 'Screen' has to be aligned correctly! ; .repeat 92 ; .byte DL_MAP320x1x1 @@ -55,6 +55,8 @@ NMIRES = ANTIC + $0F ;NMI interrupt reset DL_JMP = 1 DL_JVB = 65 +; DL_BLKn display n empty lines (just background) + DL_BLK1 = 0 DL_BLK2 = 16 DL_BLK3 = 32 @@ -74,13 +76,13 @@ DL_CHR20x8x2 = 6 ; colour (duochrome per character), 20 character DL_CHR20x16x2 = 7 ; colour (duochrome per character), 20 character & 16 scanlines per mode line (GR. 2) DL_MAP40x8x4 = 8 ; colour, 40 pixel & 8 scanlines per mode line (GR. 3) -DL_MAP80x4x2 = 9 ; 'duochrome', 80 pixel & 4 scanlines per mode line (GR.4) -DL_MAP80x4x4 = 10 ; colour, 80 pixel & 4 scanlines per mode line (GR.5) -DL_MAP160x2x2 = 11 ; 'duochrome', 160 pixel & 2 scanlines per mode line (GR.6) -DL_MAP160x1x2 = 12 ; 'duochrome', 160 pixel & 1 scanline per mode line (GR.14) -DL_MAP160x2x4 = 13 ; 4 colours, 160 pixel & 2 scanlines per mode line (GR.7) -DL_MAP160x1x4 = 14 ; 4 colours, 160 pixel & 1 scanline per mode line (GR.15) -DL_MAP320x1x1 = 15 ; monochrome, 320 pixel & 1 scanline per mode line (GR.8) +DL_MAP80x4x2 = 9 ; 'duochrome', 80 pixel & 4 scanlines per mode line (GR.4) +DL_MAP80x4x4 = 10 ; colour, 80 pixel & 4 scanlines per mode line (GR.5) +DL_MAP160x2x2 = 11 ; 'duochrome', 160 pixel & 2 scanlines per mode line (GR.6) +DL_MAP160x1x2 = 12 ; 'duochrome', 160 pixel & 1 scanline per mode line (GR.14) +DL_MAP160x2x4 = 13 ; 4 colours, 160 pixel & 2 scanlines per mode line (GR.7) +DL_MAP160x1x4 = 14 ; 4 colours, 160 pixel & 1 scanline per mode line (GR.15) +DL_MAP320x1x1 = 15 ; monochrome, 320 pixel & 1 scanline per mode line (GR.8) ; modifiers on mode lines... diff --git a/asminc/atari_atascii_charmap.inc b/asminc/atari_atascii_charmap.inc new file mode 100644 index 000000000..7c6b5e542 --- /dev/null +++ b/asminc/atari_atascii_charmap.inc @@ -0,0 +1,301 @@ +;/*****************************************************************************/ +;/* */ +;/* atari_atascii_charmap.inc */ +;/* */ +;/* Atari system standard string mapping ISO-8859-1 -> AtASCII */ +;/* */ +;/* */ +;/* */ +;/* C 2016 Christian Krueger */ +;/* */ +;/* */ +;/* This software is provided 'as-is', without any expressed or implied */ +;/* warranty. In no event will the authors be held liable for any damages */ +;/* arising from the use of this software. */ +;/* */ +;/* Permission is granted to anyone to use this software for any purpose, */ +;/* including commercial applications, and to alter it and redistribute it */ +;/* freely, subject to the following restrictions: */ +;/* */ +;/* 1. The origin of this software must not be misrepresented; you must not */ +;/* claim that you wrote the original software. If you use this software */ +;/* in a product, an acknowledgment in the product documentation would be */ +;/* appreciated but is not required. */ +;/* 2. Altered source versions must be plainly marked as such, and must not */ +;/* be misrepresented as being the original software. */ +;/* 3. This notice may not be removed or altered from any source */ +;/* distribution. */ +;/* */ +;/*****************************************************************************/ + +.charmap $00, $00 +.charmap $01, $01 +.charmap $02, $02 +.charmap $03, $03 +.charmap $04, $04 +.charmap $05, $05 +.charmap $06, $06 +.charmap $07, $FD +.charmap $08, $08 +.charmap $09, $7F +.charmap $0A, $9B +.charmap $0B, $0B +.charmap $0C, $7D +.charmap $0D, $0D +.charmap $0E, $0E +.charmap $0F, $0F + +.charmap $10, $10 +.charmap $11, $11 +.charmap $12, $12 +.charmap $13, $13 +.charmap $14, $14 +.charmap $15, $15 +.charmap $16, $16 +.charmap $17, $17 +.charmap $18, $18 +.charmap $19, $19 +.charmap $1A, $1A +.charmap $1B, $1B +.charmap $1C, $1C +.charmap $1D, $1D +.charmap $1E, $1E +.charmap $1F, $1F + +.charmap $20, $20 +.charmap $21, $21 +.charmap $22, $22 +.charmap $23, $23 +.charmap $24, $24 +.charmap $25, $25 +.charmap $26, $26 +.charmap $27, $27 +.charmap $28, $28 +.charmap $29, $29 +.charmap $2A, $2A +.charmap $2B, $2B +.charmap $2C, $2C +.charmap $2D, $2D +.charmap $2E, $2E +.charmap $2F, $2F + +.charmap $30, $30 +.charmap $31, $31 +.charmap $32, $32 +.charmap $33, $33 +.charmap $34, $34 +.charmap $35, $35 +.charmap $36, $36 +.charmap $37, $37 +.charmap $38, $38 +.charmap $39, $39 +.charmap $3A, $3A +.charmap $3B, $3B +.charmap $3C, $3C +.charmap $3D, $3D +.charmap $3E, $3E +.charmap $3F, $3F + +.charmap $40, $40 +.charmap $41, $41 +.charmap $42, $42 +.charmap $43, $43 +.charmap $44, $44 +.charmap $45, $45 +.charmap $46, $46 +.charmap $47, $47 +.charmap $48, $48 +.charmap $49, $49 +.charmap $4A, $4A +.charmap $4B, $4B +.charmap $4C, $4C +.charmap $4D, $4D +.charmap $4E, $4E +.charmap $4F, $4F + +.charmap $50, $50 +.charmap $51, $51 +.charmap $52, $52 +.charmap $53, $53 +.charmap $54, $54 +.charmap $55, $55 +.charmap $56, $56 +.charmap $57, $57 +.charmap $58, $58 +.charmap $59, $59 +.charmap $5A, $5A +.charmap $5B, $5B +.charmap $5C, $5C +.charmap $5D, $5D +.charmap $5E, $5E +.charmap $5F, $5F + +.charmap $60, $60 +.charmap $61, $61 +.charmap $62, $62 +.charmap $63, $63 +.charmap $64, $64 +.charmap $65, $65 +.charmap $66, $66 +.charmap $67, $67 +.charmap $68, $68 +.charmap $69, $69 +.charmap $6A, $6A +.charmap $6B, $6B +.charmap $6C, $6C +.charmap $6D, $6D +.charmap $6E, $6E +.charmap $6F, $6F + +.charmap $70, $70 +.charmap $71, $71 +.charmap $72, $72 +.charmap $73, $73 +.charmap $74, $74 +.charmap $75, $75 +.charmap $76, $76 +.charmap $77, $77 +.charmap $78, $78 +.charmap $79, $79 +.charmap $7A, $7A +.charmap $7B, $7B +.charmap $7C, $7C +.charmap $7D, $7D +.charmap $7E, $7E +.charmap $7F, $7F + +.charmap $80, $80 +.charmap $81, $81 +.charmap $82, $82 +.charmap $83, $83 +.charmap $84, $84 +.charmap $85, $85 +.charmap $86, $86 +.charmap $87, $87 +.charmap $88, $88 +.charmap $89, $89 +.charmap $8A, $8A +.charmap $8B, $8B +.charmap $8C, $8C +.charmap $8D, $8D +.charmap $8E, $8E +.charmap $8F, $8F + +.charmap $90, $90 +.charmap $91, $91 +.charmap $92, $92 +.charmap $93, $93 +.charmap $94, $94 +.charmap $95, $95 +.charmap $96, $96 +.charmap $97, $97 +.charmap $98, $98 +.charmap $99, $99 +.charmap $9A, $9A +.charmap $9B, $9B +.charmap $9C, $9C +.charmap $9D, $9D +.charmap $9E, $9E +.charmap $9F, $9F + +.charmap $A0, $A0 +.charmap $A1, $A1 +.charmap $A2, $A2 +.charmap $A3, $A3 +.charmap $A4, $A4 +.charmap $A5, $A5 +.charmap $A6, $A6 +.charmap $A7, $A7 +.charmap $A8, $A8 +.charmap $A9, $A9 +.charmap $AA, $AA +.charmap $AB, $AB +.charmap $AC, $AC +.charmap $AD, $AD +.charmap $AE, $AE +.charmap $AF, $AF + +.charmap $B0, $B0 +.charmap $B1, $B1 +.charmap $B2, $B2 +.charmap $B3, $B3 +.charmap $B4, $B4 +.charmap $B5, $B5 +.charmap $B6, $B6 +.charmap $B7, $B7 +.charmap $B8, $B8 +.charmap $B9, $B9 +.charmap $BA, $BA +.charmap $BB, $BB +.charmap $BC, $BC +.charmap $BD, $BD +.charmap $BE, $BE +.charmap $BF, $BF + +.charmap $C0, $C0 +.charmap $C1, $C1 +.charmap $C2, $C2 +.charmap $C3, $C3 +.charmap $C4, $C4 +.charmap $C5, $C5 +.charmap $C6, $C6 +.charmap $C7, $C7 +.charmap $C8, $C8 +.charmap $C9, $C9 +.charmap $CA, $CA +.charmap $CB, $CB +.charmap $CC, $CC +.charmap $CD, $CD +.charmap $CE, $CE +.charmap $CF, $CF + +.charmap $D0, $D0 +.charmap $D1, $D1 +.charmap $D2, $D2 +.charmap $D3, $D3 +.charmap $D4, $D4 +.charmap $D5, $D5 +.charmap $D6, $D6 +.charmap $D7, $D7 +.charmap $D8, $D8 +.charmap $D9, $D9 +.charmap $DA, $DA +.charmap $DB, $DB +.charmap $DC, $DC +.charmap $DD, $DD +.charmap $DE, $DE +.charmap $DF, $DF + +.charmap $E0, $E0 +.charmap $E1, $E1 +.charmap $E2, $E2 +.charmap $E3, $E3 +.charmap $E4, $E4 +.charmap $E5, $E5 +.charmap $E6, $E6 +.charmap $E7, $E7 +.charmap $E8, $E8 +.charmap $E9, $E9 +.charmap $EA, $EA +.charmap $EB, $EB +.charmap $EC, $EC +.charmap $ED, $ED +.charmap $EE, $EE +.charmap $EF, $EF + +.charmap $F0, $F0 +.charmap $F1, $F1 +.charmap $F2, $F2 +.charmap $F3, $F3 +.charmap $F4, $F4 +.charmap $F5, $F5 +.charmap $F6, $F6 +.charmap $F7, $F7 +.charmap $F8, $F8 +.charmap $F9, $F9 +.charmap $FA, $FA +.charmap $FB, $FB +.charmap $FC, $FC +.charmap $FD, $FD +.charmap $FE, $FE +.charmap $FF, $FF diff --git a/asminc/atari_gtia.inc b/asminc/atari_gtia.inc index f50583271..dd1c877d5 100644 --- a/asminc/atari_gtia.inc +++ b/asminc/atari_gtia.inc @@ -79,3 +79,41 @@ VDELAY = GTIA + $1C ;vertical delay GRACTL = GTIA + $1D ;graphic control HITCLR = GTIA + $1E ;collision clear + +; Hue values + +HUE_GREY = 0 +HUE_GOLD = 1 +HUE_GOLDORANGE = 2 +HUE_REDORANGE = 3 +HUE_ORANGE = 4 +HUE_MAGENTA = 5 +HUE_PURPLE = 6 +HUE_BLUE = 7 +HUE_BLUE2 = 8 +HUE_CYAN = 9 +HUE_BLUEGREEN = 10 +HUE_BLUEGREEN2 = 11 +HUE_GREEN = 12 +HUE_YELLOWGREEN = 13 +HUE_YELLOW = 14 +HUE_YELLOWRED = 15 + +; Color defines, similar to c64 colors (untested) + +GTIA_COLOR_BLACK = (HUE_GREY << 4) +GTIA_COLOR_WHITE = (HUE_GREY << 4 | 7 << 1) +GTIA_COLOR_RED = (HUE_REDORANGE << 4 | 1 << 1) +GTIA_COLOR_CYAN = (HUE_CYAN << 4 | 3 << 1) +GTIA_COLOR_VIOLET = (HUE_PURPLE << 4 | 4 << 1) +GTIA_COLOR_GREEN = (HUE_GREEN << 4 | 2 << 1) +GTIA_COLOR_BLUE = (HUE_BLUE << 4 | 2 << 1) +GTIA_COLOR_YELLOW = (HUE_YELLOW << 4 | 7 << 1) +GTIA_COLOR_ORANGE = (HUE_ORANGE << 4 | 5 << 1) +GTIA_COLOR_BROWN = (HUE_YELLOW << 4 | 2 << 1) +GTIA_COLOR_LIGHTRED = (HUE_REDORANGE << 4 | 6 << 1) +GTIA_COLOR_GRAY1 = (HUE_GREY << 4 | 2 << 1) +GTIA_COLOR_GRAY2 = (HUE_GREY << 4 | 3 << 1) +GTIA_COLOR_LIGHTGREEN = (HUE_GREEN << 4 | 6 << 1) +GTIA_COLOR_LIGHTBLUE = (HUE_BLUE << 4 | 6 << 1) +GTIA_COLOR_GRAY3 = (HUE_GREY << 4 | 5 << 1) diff --git a/asminc/atari_pokey.inc b/asminc/atari_pokey.inc index 99d192fbd..4174865d5 100644 --- a/asminc/atari_pokey.inc +++ b/asminc/atari_pokey.inc @@ -41,4 +41,3 @@ POTGO = POKEY + $0B ;start potentiometer scan sequence SEROUT = POKEY + $0D ;serial port output IRQEN = POKEY + $0E ;IRQ interrupt enable SKCTL = POKEY + $0F ;serial port and keyboard control - diff --git a/asminc/atari_screen_charmap.inc b/asminc/atari_screen_charmap.inc new file mode 100644 index 000000000..193ea0685 --- /dev/null +++ b/asminc/atari_screen_charmap.inc @@ -0,0 +1,303 @@ +;/*****************************************************************************/ +;/* */ +;/* atari_screen_charmap.inc */ +;/* */ +;/* Atari system internal string mapping ISO-8859-1 -> Internal/Screen-Code */ +;/* */ +;/* */ +;/* */ +;/* C 2016 Christian Krueger */ +;/* */ +;/* */ +;/* This software is provided 'as-is', without any expressed or implied */ +;/* warranty. In no event will the authors be held liable for any damages */ +;/* arising from the use of this software. */ +;/* */ +;/* Permission is granted to anyone to use this software for any purpose, */ +;/* including commercial applications, and to alter it and redistribute it */ +;/* freely, subject to the following restrictions: */ +;/* */ +;/* 1. The origin of this software must not be misrepresented; you must not */ +;/* claim that you wrote the original software. If you use this software */ +;/* in a product, an acknowledgment in the product documentation would be */ +;/* appreciated but is not required. */ +;/* 2. Altered source versions must be plainly marked as such, and must not */ +;/* be misrepresented as being the original software. */ +;/* 3. This notice may not be removed or altered from any source */ +;/* distribution. */ +;/* */ +;/*****************************************************************************/ + +.charmap $00, $40 +.charmap $01, $41 +.charmap $02, $42 +.charmap $03, $43 +.charmap $04, $44 +.charmap $05, $45 +.charmap $06, $46 +.charmap $07, $FD +.charmap $08, $48 +.charmap $09, $7F +.charmap $0A, $DB +.charmap $0B, $4B +.charmap $0C, $7D +.charmap $0D, $4D +.charmap $0E, $4E +.charmap $0F, $4F + +.charmap $10, $50 +.charmap $11, $51 +.charmap $12, $52 +.charmap $13, $53 +.charmap $14, $54 +.charmap $15, $55 +.charmap $16, $56 +.charmap $17, $57 +.charmap $18, $58 +.charmap $19, $59 +.charmap $1A, $5A +.charmap $1B, $5B +.charmap $1C, $5C +.charmap $1D, $5D +.charmap $1E, $5E +.charmap $1F, $5F + +.charmap $20, $00 + +.charmap $21, $01 +.charmap $22, $02 +.charmap $23, $03 +.charmap $24, $04 +.charmap $25, $05 +.charmap $26, $06 +.charmap $27, $07 +.charmap $28, $08 +.charmap $29, $09 +.charmap $2A, $0A +.charmap $2B, $0B +.charmap $2C, $0C +.charmap $2D, $0D +.charmap $2E, $0E +.charmap $2F, $0F + +.charmap $30, $10 +.charmap $31, $11 +.charmap $32, $12 +.charmap $33, $13 +.charmap $34, $14 +.charmap $35, $15 +.charmap $36, $16 +.charmap $37, $17 +.charmap $38, $18 +.charmap $39, $19 +.charmap $3A, $1A +.charmap $3B, $1B +.charmap $3C, $1C +.charmap $3D, $1D +.charmap $3E, $1E +.charmap $3F, $1F + +.charmap $40, $20 +.charmap $41, $21 +.charmap $42, $22 +.charmap $43, $23 +.charmap $44, $24 +.charmap $45, $25 +.charmap $46, $26 +.charmap $47, $27 +.charmap $48, $28 +.charmap $49, $29 +.charmap $4A, $2A +.charmap $4B, $2B +.charmap $4C, $2C +.charmap $4D, $2D +.charmap $4E, $2E +.charmap $4F, $2F + +.charmap $50, $30 +.charmap $51, $31 +.charmap $52, $32 +.charmap $53, $33 +.charmap $54, $34 +.charmap $55, $35 +.charmap $56, $36 +.charmap $57, $37 +.charmap $58, $38 +.charmap $59, $39 +.charmap $5A, $3A +.charmap $5B, $3B +.charmap $5C, $3C +.charmap $5D, $3D +.charmap $5E, $3E +.charmap $5F, $3F + +.charmap $60, $60 +.charmap $61, $61 +.charmap $62, $62 +.charmap $63, $63 +.charmap $64, $64 +.charmap $65, $65 +.charmap $66, $66 +.charmap $67, $67 +.charmap $68, $68 +.charmap $69, $69 +.charmap $6A, $6A +.charmap $6B, $6B +.charmap $6C, $6C +.charmap $6D, $6D +.charmap $6E, $6E +.charmap $6F, $6F + +.charmap $70, $70 +.charmap $71, $71 +.charmap $72, $72 +.charmap $73, $73 +.charmap $74, $74 +.charmap $75, $75 +.charmap $76, $76 +.charmap $77, $77 +.charmap $78, $78 +.charmap $79, $79 +.charmap $7A, $7A +.charmap $7B, $7B +.charmap $7C, $7C +.charmap $7D, $7D +.charmap $7E, $7E +.charmap $7F, $7F + +.charmap $80, $C0 +.charmap $81, $C1 +.charmap $82, $C2 +.charmap $83, $C3 +.charmap $84, $C4 +.charmap $85, $C5 +.charmap $86, $C6 +.charmap $87, $C7 +.charmap $88, $C8 +.charmap $89, $C9 +.charmap $8A, $CA +.charmap $8B, $CB +.charmap $8C, $CC +.charmap $8D, $CD +.charmap $8E, $CE +.charmap $8F, $CF + +.charmap $90, $D0 +.charmap $91, $D1 +.charmap $92, $D2 +.charmap $93, $D3 +.charmap $94, $D4 +.charmap $95, $D5 +.charmap $96, $D6 +.charmap $97, $D7 +.charmap $98, $D8 +.charmap $99, $D9 +.charmap $9A, $DA +.charmap $9B, $DB +.charmap $9C, $DC +.charmap $9D, $DD +.charmap $9E, $DE +.charmap $9F, $DF + +.charmap $A0, $80 +.charmap $A1, $81 +.charmap $A2, $82 +.charmap $A3, $83 +.charmap $A4, $84 +.charmap $A5, $85 +.charmap $A6, $86 +.charmap $A7, $87 +.charmap $A8, $88 +.charmap $A9, $89 +.charmap $AA, $8A +.charmap $AB, $8B +.charmap $AC, $8C +.charmap $AD, $8D +.charmap $AE, $8E +.charmap $AF, $8F + +.charmap $B0, $90 +.charmap $B1, $91 +.charmap $B2, $92 +.charmap $B3, $93 +.charmap $B4, $94 +.charmap $B5, $95 +.charmap $B6, $96 +.charmap $B7, $97 +.charmap $B8, $98 +.charmap $B9, $99 +.charmap $BA, $9A +.charmap $BB, $9B +.charmap $BC, $9C +.charmap $BD, $9D +.charmap $BE, $9E +.charmap $BF, $9F + +.charmap $C0, $A0 +.charmap $C1, $A1 +.charmap $C2, $A2 +.charmap $C3, $A3 +.charmap $C4, $A4 +.charmap $C5, $A5 +.charmap $C6, $A6 +.charmap $C7, $A7 +.charmap $C8, $A8 +.charmap $C9, $A9 +.charmap $CA, $AA +.charmap $CB, $AB +.charmap $CC, $AC +.charmap $CD, $AD +.charmap $CE, $AE +.charmap $CF, $AF + +.charmap $D0, $B0 +.charmap $D1, $B1 +.charmap $D2, $B2 +.charmap $D3, $B3 +.charmap $D4, $B4 +.charmap $D5, $B5 +.charmap $D6, $B6 +.charmap $D7, $B7 +.charmap $D8, $B8 +.charmap $D9, $B9 +.charmap $DA, $BA +.charmap $DB, $BB +.charmap $DC, $BC +.charmap $DD, $BD +.charmap $DE, $BE +.charmap $DF, $BF + +.charmap $E0, $E0 +.charmap $E1, $E1 +.charmap $E2, $E2 +.charmap $E3, $E3 +.charmap $E4, $E4 +.charmap $E5, $E5 +.charmap $E6, $E6 +.charmap $E7, $E7 +.charmap $E8, $E8 +.charmap $E9, $E9 +.charmap $EA, $EA +.charmap $EB, $EB +.charmap $EC, $EC +.charmap $ED, $ED +.charmap $EE, $EE +.charmap $EF, $EF + +.charmap $F0, $F0 +.charmap $F1, $F1 +.charmap $F2, $F2 +.charmap $F3, $F3 +.charmap $F4, $F4 +.charmap $F5, $F5 +.charmap $F6, $F6 +.charmap $F7, $F7 +.charmap $F8, $F8 +.charmap $F9, $F9 +.charmap $FA, $FA +.charmap $FB, $FB +.charmap $FC, $FC +.charmap $FD, $FD +.charmap $FE, $FE +.charmap $FF, $FF + diff --git a/asminc/atmos.inc b/asminc/atmos.inc index 4c3c442fa..8edcf7dc2 100644 --- a/asminc/atmos.inc +++ b/asminc/atmos.inc @@ -104,8 +104,14 @@ PRINT := $F77C ; Sound Effects PING := $FA9F +PING1 := $FA85 SHOOT := $FAB5 +SHOOT1 := $FA9B EXPLODE := $FACB +EXPLODE1 := $FAB1 ZAP := $FAE1 +ZAP1 := $FAC7 TICK := $FB14 +TICK1 := $FAFA TOCK := $FB2A +TOCK1 := $FB10 diff --git a/asminc/c128.inc b/asminc/c128.inc deleted file mode 100644 index e17bae4ce..000000000 --- a/asminc/c128.inc +++ /dev/null @@ -1,223 +0,0 @@ -; -; C128 generic definitions. Stolen from Elite128 -; - - -; --------------------------------------------------------------------------- -; Zero page, Commodore stuff - -TXTPTR := $3D ; Pointer into BASIC source code -TIME := $A0 ; 60HZ clock -FNAM_LEN := $B7 ; Length of filename -SECADR := $B9 ; Secondary address -DEVNUM := $BA ; Device number -FNAM := $BB ; Address of filename -FNAM_BANK := $C7 ; Bank for filename -KEY_COUNT := $D0 ; Number of keys in input buffer -FKEY_COUNT := $D1 ; Characters for function key -MODE := $D7 ; 40/80 column mode flag -CURS_X := $EC ; Cursor column -CURS_Y := $EB ; Cursor row -SCREEN_PTR := $E0 ; Pointer to current char in text screen -CRAM_PTR := $E2 ; Pointer to current char in color RAM - -CHARCOLOR := $F1 -RVS := $F3 ; Reverse output flag -SCROLL := $F8 ; Disable scrolling flag - -BASIC_BUF := $200 ; Location of command-line -BASIC_BUF_LEN = 162 ; Maximum length of command-line - -FETCH := $2A2 ; Fetch subroutine in RAM -FETVEC := $2AA ; Vector patch location for FETCH -STASH := $2AF ; Stash routine in RAM -STAVEC := $2B9 ; Vector patch location for STASH -IRQInd := $2FD ; JMP $0000 -- used as indirect IRQ vector -PALFLAG := $A03 ; $FF=PAL, $00=NTSC -INIT_STATUS := $A04 ; Flags: Reset/Restore initiation status -FKEY_LEN := $1000 ; Function key lengths -FKEY_TEXT := $100A ; Function key texts - -; --------------------------------------------------------------------------- -; Kernal routines - -; Direct entries -CURS_SET := $CD57 -CURS_ON := $CD6F -CURS_OFF := $CD9F -CLRSCR := $C142 -KBDREAD := $C006 -NEWLINE := $C363 -PRINT := $C322 -NMIEXIT := $FF33 -INDFET := $FF74 - -; --------------------------------------------------------------------------- -; Vectors - -IRQVec := $0314 -BRKVec := $0316 -NMIVec := $0318 -KeyStoreVec := $033C - -; --------------------------------------------------------------------------- -; I/O: VIC - -VIC := $D000 -VIC_SPR0_X := $D000 -VIC_SPR0_Y := $D001 -VIC_SPR1_X := $D002 -VIC_SPR1_Y := $D003 -VIC_SPR2_X := $D004 -VIC_SPR2_Y := $D005 -VIC_SPR3_X := $D006 -VIC_SPR3_Y := $D007 -VIC_SPR4_X := $D008 -VIC_SPR4_Y := $D009 -VIC_SPR5_X := $D00A -VIC_SPR5_Y := $D00B -VIC_SPR6_X := $D00C -VIC_SPR6_Y := $D00D -VIC_SPR7_X := $D00E -VIC_SPR7_Y := $D00F -VIC_SPR_HI_X := $D010 -VIC_SPR_ENA := $D015 -VIC_SPR_EXP_Y := $D017 -VIC_SPR_EXP_X := $D01D -VIC_SPR_MCOLOR := $D01C -VIC_SPR_BG_PRIO := $D01B - -VIC_SPR_MCOLOR0 := $D025 -VIC_SPR_MCOLOR1 := $D026 - -VIC_SPR0_COLOR := $D027 -VIC_SPR1_COLOR := $D028 -VIC_SPR2_COLOR := $D029 -VIC_SPR3_COLOR := $D02A -VIC_SPR4_COLOR := $D02B -VIC_SPR5_COLOR := $D02C -VIC_SPR6_COLOR := $D02D -VIC_SPR7_COLOR := $D02E - -VIC_CTRL1 := $D011 -VIC_CTRL2 := $D016 - -VIC_HLINE := $D012 - -VIC_LPEN_X := $D013 -VIC_LPEN_Y := $D014 - -VIC_VIDEO_ADR := $D018 - -VIC_IRR := $D019 ; Interrupt request register -VIC_IMR := $D01A ; Interrupt mask register - -VIC_BORDERCOLOR := $D020 -VIC_BG_COLOR0 := $D021 -VIC_BG_COLOR1 := $D022 -VIC_BG_COLOR2 := $D023 -VIC_BG_COLOR3 := $D024 - -; 128 stuff: -VIC_KBD_128 := $D02F ; Extended kbd bits (visible in 64 mode) -VIC_CLK_128 := $D030 ; Clock rate register (visible in 64 mode) - - -; --------------------------------------------------------------------------- -; I/O: SID - -SID := $D400 -SID_S1Lo := $D400 -SID_S1Hi := $D401 -SID_PB1Lo := $D402 -SID_PB1Hi := $D403 -SID_Ctl1 := $D404 -SID_AD1 := $D405 -SID_SUR1 := $D406 - -SID_S2Lo := $D407 -SID_S2Hi := $D408 -SID_PB2Lo := $D409 -SID_PB2Hi := $D40A -SID_Ctl2 := $D40B -SID_AD2 := $D40C -SID_SUR2 := $D40D - -SID_S3Lo := $D40E -SID_S3Hi := $D40F -SID_PB3Lo := $D410 -SID_PB3Hi := $D411 -SID_Ctl3 := $D412 -SID_AD3 := $D413 -SID_SUR3 := $D414 - -SID_FltLo := $D415 -SID_FltHi := $D416 -SID_FltCtl := $D417 -SID_Amp := $D418 -SID_ADConv1 := $D419 -SID_ADConv2 := $D41A -SID_Noise := $D41B -SID_Read3 := $D41C - -; --------------------------------------------------------------------------- -; I/O: VDC (128 only) - -VDC_INDEX := $D600 ; VDC address -VDC_DATA := $D601 ; VDC data - -VDC_DATA_HI := 18 -VDC_DATA_LO := 19 -VDC_CSET := 28 -VDC_DATA_RW := 31 - -; --------------------------------------------------------------------------- -; I/O: CIAs - -CIA1 := $DC00 -CIA1_PRA := $DC00 -CIA1_PRB := $DC01 -CIA1_DDRA := $DC02 -CIA1_DDRB := $DC03 -CIA1_TOD10 := $DC08 -CIA1_TODSEC := $DC09 -CIA1_TODMIN := $DC0A -CIA1_TODHR := $DC0B -CIA1_ICR := $DC0D -CIA1_CRA := $DC0E -CIA1_CRB := $DC0F - -CIA2 := $DD00 -CIA2_PRA := $DD00 -CIA2_PRB := $DD01 -CIA2_DDRA := $DD02 -CIA2_DDRB := $DD03 -CIA2_TOD10 := $DD08 -CIA2_TODSEC := $DD09 -CIA2_TODMIN := $DD0A -CIA2_TODHR := $DD0B -CIA2_ICR := $DD0D -CIA2_CRA := $DD0E -CIA2_CRB := $DD0F - -; --------------------------------------------------------------------------- -; I/O: MMU - -MMU_CR := $FF00 -MMU_CFG_CC65 := %00001110 ; Bank 0 with kernal ROM -MMU_CFG_RAM0 := %00111111 ; Bank 0 full RAM -MMU_CFG_RAM1 := %01111111 ; Bank 1 full RAM -MMU_CFG_RAM2 := %10111111 ; Bank 2 full RAM -MMU_CFG_RAM3 := %11111111 ; Bank 3 full RAM -MMU_CFG_IFROM := %01010111 ; Bank 1 with Internal Function RAM/ROM -MMU_CFG_EFROM := %01101011 ; Bank 1 with External Function RAM/ROM - -; --------------------------------------------------------------------------- -; Super CPU - -SCPU_VIC_Bank1 := $D075 -SCPU_Slow := $D07A -SCPU_Fast := $D07B -SCPU_EnableRegs := $D07E -SCPU_DisableRegs:= $D07F -SCPU_Detect := $D0BC diff --git a/asminc/c64.inc b/asminc/c64.inc index ababb1ea0..d131c7860 100644 --- a/asminc/c64.inc +++ b/asminc/c64.inc @@ -9,6 +9,7 @@ VARTAB := $2D ; Pointer to start of BASIC variables MEMSIZE := $37 ; Pointer to highest BASIC RAM location (+1) TXTPTR := $7A ; Pointer into BASIC source code +STATUS := $90 ; Kernal I/O completion status TIME := $A0 ; 60 HZ clock FNAM_LEN := $B7 ; Length of filename SECADR := $B9 ; Secondary address @@ -33,14 +34,9 @@ CHARCOLOR := $286 CURS_COLOR := $287 ; Color under the cursor PALFLAG := $2A6 ; $01 = PAL, $00 = NTSC - -; --------------------------------------------------------------------------- -; Kernal routines - -; Direct entries -CLRSCR := $E544 -KBDREAD := $E5B4 -NMIEXIT := $FEBC +KBDREPEAT := $28a +KBDREPEATRATE := $28b +KBDREPEATDELAY := $28c ; --------------------------------------------------------------------------- ; Vector and other locations @@ -81,6 +77,8 @@ VIC_SPR_EXP_Y := $D017 VIC_SPR_EXP_X := $D01D VIC_SPR_MCOLOR := $D01C VIC_SPR_BG_PRIO := $D01B +VIC_SPR_COLL := $D01E +VIC_SPR_BG_COLL := $D01F VIC_SPR_MCOLOR0 := $D025 VIC_SPR_MCOLOR1 := $D026 @@ -162,30 +160,36 @@ VDC_INDEX := $D600 VDC_DATA := $D601 ; --------------------------------------------------------------------------- -; I/O: CIAs +; I/O: Complex Interface Adapters CIA1 := $DC00 -CIA1_PRA := $DC00 -CIA1_PRB := $DC01 -CIA1_DDRA := $DC02 -CIA1_DDRB := $DC03 -CIA1_TOD10 := $DC08 -CIA1_TODSEC := $DC09 -CIA1_TODMIN := $DC0A -CIA1_TODHR := $DC0B -CIA1_ICR := $DC0D -CIA1_CRA := $DC0E -CIA1_CRB := $DC0F +CIA1_PRA := $DC00 ; Port A +CIA1_PRB := $DC01 ; Port B +CIA1_DDRA := $DC02 ; Data direction register for port A +CIA1_DDRB := $DC03 ; Data direction register for port B +CIA1_TA := $DC04 ; 16-bit timer A +CIA1_TB := $DC06 ; 16-bit timer B +CIA1_TOD10 := $DC08 ; Time-of-day tenths of a second +CIA1_TODSEC := $DC09 ; Time-of-day seconds +CIA1_TODMIN := $DC0A ; Time-of-day minutes +CIA1_TODHR := $DC0B ; Time-of-day hours +CIA1_SDR := $DC0C ; Serial data register +CIA1_ICR := $DC0D ; Interrupt control register +CIA1_CRA := $DC0E ; Control register for timer A +CIA1_CRB := $DC0F ; Control register for timer B CIA2 := $DD00 CIA2_PRA := $DD00 CIA2_PRB := $DD01 CIA2_DDRA := $DD02 CIA2_DDRB := $DD03 +CIA2_TA := $DD04 +CIA2_TB := $DD06 CIA2_TOD10 := $DD08 CIA2_TODSEC := $DD09 CIA2_TODMIN := $DD0A CIA2_TODHR := $DD0B +CIA2_SDR := $DD0C CIA2_ICR := $DD0D CIA2_CRA := $DD0E CIA2_CRB := $DD0F diff --git a/asminc/cbm.mac b/asminc/cbm.mac index b2bfe5992..6d7ac7e8d 100644 --- a/asminc/cbm.mac +++ b/asminc/cbm.mac @@ -1,9 +1,13 @@ ; Convert characters to screen codes -; Helper macro that converts and outputs one character +; Macro that converts one character. +; scrbyte() can be used as an instruction operand +.define scrbyte(code) (<(.strat ("h@dbdlhh", code >> 5) << 4) ^ code) + +; Helper macro that stores one character .macro _scrcode char .if (char < 256) - .byte <(.strat ("h@dbdlhh", char >> 5) << 4) ^ char + .byte scrbyte {char} .else .error "scrcode: Character constant out of range" .endif @@ -38,13 +42,9 @@ ; Anything else is an error .else - .error "scrcode: invalid argument type" - .endif ; Call the macro recursively with the remaining args scrcode arg2, arg3, arg4, arg5, arg6, arg7, arg8, arg9 .endmacro - - diff --git a/asminc/cbm_kernal.inc b/asminc/cbm_kernal.inc new file mode 100644 index 000000000..4d78cf93f --- /dev/null +++ b/asminc/cbm_kernal.inc @@ -0,0 +1,192 @@ +; +; Olli Savia +; Greg King +; +; Commodore-compatibles Kernal functions +; + +.if .def(__CX16__) + ; CX16 extended jump table + KBDBUF_PEEK := $FEBD + KBDBUF_GET_MODIFIERS := $FEC0 + KBDBUF_PUT := $FEC3 + I2C_READ_BYTE := $FEC6 + I2C_WRITE_BYTE := $FEC9 + CX_MONITOR := $FECC + ENTROPY_GET := $FECF + CONSOLE_SET_PAGE_MSG := $FED5 + CONSOLE_PUT_IMAGE := $FED8 + CONSOLE_INIT := $FEDB + CONSOLE_PUT_CHAR := $FEDE + CONSOLE_GET_CHAR := $FEE1 + MEMORY_FILL := $FEE4 + MEMORY_COPY := $FEE7 + MEMORY_CRC := $FEEA + MEMORY_DECOMPRESS := $FEED + SPRITE_SET_IMAGE := $FEF0 + SPRITE_SET_POSITION := $FEF3 + FB_INIT := $FEF6 + FB_GET_INFO := $FEF9 + FB_SET_PALETTE := $FEFC + FB_CURSOR_POSITION := $FEFF + FB_CURSOR_NEXT_LINE := $FF02 + FB_GET_PIXEL := $FF05 + FB_GET_PIXELS := $FF08 + FB_SET_PIXEL := $FF0B + FB_SET_PIXELS := $FF0E + FB_SET_8_PIXELS := $FF11 + FB_SET_8_PIXELS_OPAQUE := $FF14 + FB_FILL_PIXELS := $FF17 + FB_FILTER_PIXELS := $FF1A + FB_MOVE_PIXELS := $FF1D + GRAPH_INIT := $FF20 + GRAPH_CLEAR := $FF23 + GRAPH_SET_WINDOW := $FF26 + GRAPH_SET_COLORS := $FF29 + GRAPH_DRAW_LINE := $FF2C + GRAPH_DRAW_RECT := $FF2F + GRAPH_MOVE_RECT := $FF32 + GRAPH_DRAW_OVAL := $FF35 + GRAPH_DRAW_IMAGE := $FF38 + GRAPH_SET_FONT := $FF3B + GRAPH_GET_CHAR_SIZE := $FF3E + GRAPH_PUT_CHAR := $FF41 + MULTI_ACPTR := $FF44 + RESTORE_BASIC := $FF47 + CLOCK_SET_DATE_TIME := $FF4D + CLOCK_GET_DATE_TIME := $FF50 + JOYSTICK_SCAN := $FF53 + JOYSTICK_GET := $FF56 + SCREEN_MODE := $FF5F + SCREEN_SET_CHARSET := $FF62 + MOUSE_CONFIG := $FF68 + MOUSE_GET := $FF6B +.endif + +.if .def(__C128__) + ; C128 extended jump table + C64MODE := $FF4D + SWAPPER := $FF5F + SETBNK := $FF68 +.endif + +.if .def(__C128__) || .def(__CX16__) + ; Extended jump table + CLSALL := $FF4A + LKUPLA := $FF59 + LKUPSA := $FF5C + PFKEY := $FF65 + JSRFAR := $FF6E + INDFET := $FF74 + INDSTA := $FF77 + INDCMP := $FF7A + PRIMM := $FF7D +.endif + +.if .def(__C64__) || .def(__C128__) || .def(__C16__) || .def(__CX16__) + CINT := $FF81 + IOINIT := $FF84 + RAMTAS := $FF87 +.elseif .def(__VIC20__) + CINT := $E518 ; No entries are in the Kernal jump table of the VIC-20 for these three (3) functions. + IOINIT := $FDF9 ; The entries for these functions have been set to point directly to the functions + RAMTAS := $FD8D ; in the Kernal, to maintain compatibility with the other Commodore platforms. +.elseif .def(__CBM510__) || .def(__CBM610__) + IOINIT := $FF7B + CINT := $FF7E +.endif + +.if .def(__VIC20__) || .def(__C64__) || .def(__C128__) || .def(__C16__) || .def(__CX16__) + RESTOR := $FF8A + VECTOR := $FF8D +.elseif .def(__CBM510__) || .def(__CBM610__) + VECTOR := $FF84 + RESTOR := $FF87 +.endif + +.if .def(__CBM510__) || .def(__CBM610__) || .def(__VIC20__) || .def(__C64__) || .def(__C128__) || .def(__C16__) || .def(__CX16__) + SETMSG := $FF90 + SECOND := $FF93 + TKSA := $FF96 + MEMTOP := $FF99 + MEMBOT := $FF9C + SCNKEY := $FF9F + SETTMO := $FFA2 + ACPTR := $FFA5 + CIOUT := $FFA8 + UNTLK := $FFAB + UNLSN := $FFAE + LISTEN := $FFB1 + TALK := $FFB4 + READST := $FFB7 + SETLFS := $FFBA + SETNAM := $FFBD + OPEN := $FFC0 + CLOSE := $FFC3 +.endif + +; Available on all platforms including PET +CHKIN := $FFC6 +CKOUT := $FFC9 +CHKOUT := $FFC9 +CLRCH := $FFCC +CLRCHN := $FFCC +BASIN := $FFCF +CHRIN := $FFCF +BSOUT := $FFD2 +CHROUT := $FFD2 + +.if .def(__CBM510__) || .def(__CBM610__) || .def(__VIC20__) || .def(__C64__) || .def(__C128__) || .def(__C16__) || .def(__CX16__) + LOAD := $FFD5 + SAVE := $FFD8 + SETTIM := $FFDB + RDTIM := $FFDE +.endif + +; Available on all platforms including PET +STOP := $FFE1 +GETIN := $FFE4 +CLALL := $FFE7 +UDTIM := $FFEA + +.if .def(__CBM510__) || .def(__CBM610__) || .def(__VIC20__) || .def(__C64__) || .def(__C128__) || .def(__C16__) || .def(__CX16__) + SCREEN := $FFED + PLOT := $FFF0 + IOBASE := $FFF3 +.endif + +; --------------------------------------------------------------------------- +; Kernal routines, direct entries +; +; Unlike the above, these are not standard functions with entries in the jump +; table. They do not exist in all Kernals, and where they do the entry point is +; specific to that particular machine and possibly even Kernal version. +; +; This list is not comprehensive: missing items for particular machines +; should be added as needed. +; +; UPDCRAMPTR: Updates the color RAM pointer to match the screen RAM pointer. +; + +.if .def(__VIC20__) + CLRSCR := $E55F + KBDREAD := $E5CF + UPDCRAMPTR := $EAB2 +.elseif .def(__C64__) + CLRSCR := $E544 + KBDREAD := $E5B4 + NMIEXIT := $FEBC + UPDCRAMPTR := $EA24 +.elseif .def(__C128__) + CLRSCR := $C142 + KBDREAD := $C006 + NMIEXIT := $FF33 + NEWLINE := $C363 + PRINT := $C322 + CURS_SET := $CD57 + CURS_ON := $CD6F + CURS_OFF := $CD9F +.elseif .def(__C16__) + CLRSCR := $D88B + KBDREAD := $D8C1 +.endif diff --git a/asminc/cbm_petscii_charmap.inc b/asminc/cbm_petscii_charmap.inc new file mode 100644 index 000000000..525bffb01 --- /dev/null +++ b/asminc/cbm_petscii_charmap.inc @@ -0,0 +1,291 @@ +;/*****************************************************************************/ +;/* */ +;/* cbm_petscii_charmap.inc */ +;/* */ +;/* CBM system standard string mapping ISO-8859-1 -> PetSCII */ +;/* */ +;/* */ +;/* 2019-03-10, Greg King */ +;/* */ +;/* This software is provided "as-is", without any expressed or implied */ +;/* warranty. In no event will the authors be held liable for any damages */ +;/* arising from the use of this software. */ +;/* */ +;/* Permission is granted to anyone to use this software for any purpose, */ +;/* including commercial applications, and to alter it and redistribute it */ +;/* freely, subject to the following restrictions: */ +;/* */ +;/* 1. The origin of this software must not be misrepresented; you must not */ +;/* claim that you wrote the original software. If you use this software */ +;/* in a product, an acknowledgment in the product documentation would be */ +;/* appreciated, but is not required. */ +;/* 2. Altered source versions must be plainly marked as such, and must not */ +;/* be misrepresented as being the original software. */ +;/* 3. This notice must not be removed or altered from any source */ +;/* distribution. */ +;/* */ +;/*****************************************************************************/ + +.charmap $00, $00 +.charmap $01, $01 +.charmap $02, $02 +.charmap $03, $03 +.charmap $04, $04 +.charmap $05, $05 +.charmap $06, $06 +.charmap $07, $07 +.charmap $08, $14 +.charmap $09, $09 +.charmap $0A, $0D +.charmap $0B, $11 +.charmap $0C, $93 +.charmap $0D, $0A +.charmap $0E, $0E +.charmap $0F, $0F +.charmap $10, $10 +.charmap $11, $0B +.charmap $12, $12 +.charmap $13, $13 +.charmap $14, $08 +.charmap $15, $15 +.charmap $16, $16 +.charmap $17, $17 +.charmap $18, $18 +.charmap $19, $19 +.charmap $1A, $1A +.charmap $1B, $1B +.charmap $1C, $1C +.charmap $1D, $1D +.charmap $1E, $1E +.charmap $1F, $1F + +.charmap $20, $20 +.charmap $21, $21 +.charmap $22, $22 +.charmap $23, $23 +.charmap $24, $24 +.charmap $25, $25 +.charmap $26, $26 +.charmap $27, $27 +.charmap $28, $28 +.charmap $29, $29 +.charmap $2A, $2A +.charmap $2B, $2B +.charmap $2C, $2C +.charmap $2D, $2D +.charmap $2E, $2E +.charmap $2F, $2F +.charmap $30, $30 +.charmap $31, $31 +.charmap $32, $32 +.charmap $33, $33 +.charmap $34, $34 +.charmap $35, $35 +.charmap $36, $36 +.charmap $37, $37 +.charmap $38, $38 +.charmap $39, $39 +.charmap $3A, $3A +.charmap $3B, $3B +.charmap $3C, $3C +.charmap $3D, $3D +.charmap $3E, $3E +.charmap $3F, $3F + +.charmap $40, $40 +.charmap $41, $C1 +.charmap $42, $C2 +.charmap $43, $C3 +.charmap $44, $C4 +.charmap $45, $C5 +.charmap $46, $C6 +.charmap $47, $C7 +.charmap $48, $C8 +.charmap $49, $C9 +.charmap $4A, $CA +.charmap $4B, $CB +.charmap $4C, $CC +.charmap $4D, $CD +.charmap $4E, $CE +.charmap $4F, $CF +.charmap $50, $D0 +.charmap $51, $D1 +.charmap $52, $D2 +.charmap $53, $D3 +.charmap $54, $D4 +.charmap $55, $D5 +.charmap $56, $D6 +.charmap $57, $D7 +.charmap $58, $D8 +.charmap $59, $D9 +.charmap $5A, $DA +.charmap $5B, $5B +.charmap $5C, $BF +.charmap $5D, $5D +.charmap $5E, $5E +.charmap $5F, $A4 + +.charmap $60, $AD +.charmap $61, $41 +.charmap $62, $42 +.charmap $63, $43 +.charmap $64, $44 +.charmap $65, $45 +.charmap $66, $46 +.charmap $67, $47 +.charmap $68, $48 +.charmap $69, $49 +.charmap $6A, $4A +.charmap $6B, $4B +.charmap $6C, $4C +.charmap $6D, $4D +.charmap $6E, $4E +.charmap $6F, $4F +.charmap $70, $50 +.charmap $71, $51 +.charmap $72, $52 +.charmap $73, $53 +.charmap $74, $54 +.charmap $75, $55 +.charmap $76, $56 +.charmap $77, $57 +.charmap $78, $58 +.charmap $79, $59 +.charmap $7A, $5A +.charmap $7B, $B3 +.charmap $7C, $DD +.charmap $7D, $AB +.charmap $7E, $B1 +.charmap $7F, $DF + +.charmap $80, $80 +.charmap $81, $81 +.charmap $82, $82 +.charmap $83, $83 +.charmap $84, $84 +.charmap $85, $85 +.charmap $86, $86 +.charmap $87, $87 +.charmap $88, $88 +.charmap $89, $89 +.charmap $8A, $8A +.charmap $8B, $8B +.charmap $8C, $8C +.charmap $8D, $8D +.charmap $8E, $8E +.charmap $8F, $8F +.charmap $90, $90 +.charmap $91, $91 +.charmap $92, $92 +.charmap $93, $0C +.charmap $94, $94 +.charmap $95, $95 +.charmap $96, $96 +.charmap $97, $97 +.charmap $98, $98 +.charmap $99, $99 +.charmap $9A, $9A +.charmap $9B, $9B +.charmap $9C, $9C +.charmap $9D, $9D +.charmap $9E, $9E +.charmap $9F, $9F + +.charmap $A0, $A0 +.charmap $A1, $A1 +.charmap $A2, $A2 +.charmap $A3, $A3 +.charmap $A4, $A4 +.charmap $A5, $A5 +.charmap $A6, $A6 +.charmap $A7, $A7 +.charmap $A8, $A8 +.charmap $A9, $A9 +.charmap $AA, $AA +.charmap $AB, $AB +.charmap $AC, $AC +.charmap $AD, $AD +.charmap $AE, $AE +.charmap $AF, $AF +.charmap $B0, $B0 +.charmap $B1, $B1 +.charmap $B2, $B2 +.charmap $B3, $B3 +.charmap $B4, $B4 +.charmap $B5, $B5 +.charmap $B6, $B6 +.charmap $B7, $B7 +.charmap $B8, $B8 +.charmap $B9, $B9 +.charmap $BA, $BA +.charmap $BB, $BB +.charmap $BC, $BC +.charmap $BD, $BD +.charmap $BE, $BE +.charmap $BF, $BF + +.charmap $C0, $60 +.charmap $C1, $61 +.charmap $C2, $62 +.charmap $C3, $63 +.charmap $C4, $64 +.charmap $C5, $65 +.charmap $C6, $66 +.charmap $C7, $67 +.charmap $C8, $68 +.charmap $C9, $69 +.charmap $CA, $6A +.charmap $CB, $6B +.charmap $CC, $6C +.charmap $CD, $6D +.charmap $CE, $6E +.charmap $CF, $6F +.charmap $D0, $70 +.charmap $D1, $71 +.charmap $D2, $72 +.charmap $D3, $73 +.charmap $D4, $74 +.charmap $D5, $75 +.charmap $D6, $76 +.charmap $D7, $77 +.charmap $D8, $78 +.charmap $D9, $79 +.charmap $DA, $7A +.charmap $DB, $7B +.charmap $DC, $7C +.charmap $DD, $7D +.charmap $DE, $7E +.charmap $DF, $7F + +.charmap $E0, $E0 +.charmap $E1, $E1 +.charmap $E2, $E2 +.charmap $E3, $E3 +.charmap $E4, $E4 +.charmap $E5, $E5 +.charmap $E6, $E6 +.charmap $E7, $E7 +.charmap $E8, $E8 +.charmap $E9, $E9 +.charmap $EA, $EA +.charmap $EB, $EB +.charmap $EC, $EC +.charmap $ED, $ED +.charmap $EE, $EE +.charmap $EF, $EF +.charmap $F0, $F0 +.charmap $F1, $F1 +.charmap $F2, $F2 +.charmap $F3, $F3 +.charmap $F4, $F4 +.charmap $F5, $F5 +.charmap $F6, $F6 +.charmap $F7, $F7 +.charmap $F8, $F8 +.charmap $F9, $F9 +.charmap $FA, $FA +.charmap $FB, $FB +.charmap $FC, $FC +.charmap $FD, $FD +.charmap $FE, $FE +.charmap $FF, $FF diff --git a/asminc/cbm_screen_charmap.inc b/asminc/cbm_screen_charmap.inc new file mode 100644 index 000000000..12d02553d --- /dev/null +++ b/asminc/cbm_screen_charmap.inc @@ -0,0 +1,305 @@ +;/*****************************************************************************/ +;/* */ +;/* cbm_screen_charmap.inc */ +;/* */ +;/* c Copyright 2019, Gerhard W. Gruber (sparhawk@gmx.at) */ +;/* */ +;/* When using CBM mode, this include converts character literals */ +;/* from ASCII to screen-code mapping, so you can write directly */ +;/* to the screen memory. */ +;/* */ +;/* If this include is used, no additional macros are needed. */ +;/* */ +;/*****************************************************************************/ + +; Char $00 -> c + 128 +.charmap $00, $80 + +; Char $01 ... $1A -> c + 128 + 64 control alphabet +.charmap $01, $C1 +.charmap $02, $C2 +.charmap $03, $C3 +.charmap $04, $C4 +.charmap $05, $C5 +.charmap $06, $C6 +.charmap $07, $C7 +.charmap $08, $C8 +.charmap $09, $C9 +.charmap $0A, $CA +.charmap $0B, $CB +.charmap $0C, $CC +.charmap $0D, $CD +.charmap $0E, $CE +.charmap $0F, $CF +.charmap $10, $D0 +.charmap $11, $D1 +.charmap $12, $D2 +.charmap $13, $D3 +.charmap $14, $D4 +.charmap $15, $D5 +.charmap $16, $D6 +.charmap $17, $D7 +.charmap $18, $D8 +.charmap $19, $D9 +.charmap $1A, $DA + +; Char $1B ... $1F -> c + 128 +.charmap $1B, $9B +.charmap $1C, $9C +.charmap $1D, $9D +.charmap $1E, $9E +.charmap $1F, $9F + +; Char $20 ... $3F -> c +.charmap $20, $20 +.charmap $21, $21 +.charmap $22, $22 +.charmap $23, $23 +.charmap $24, $24 +.charmap $25, $25 +.charmap $26, $26 +.charmap $27, $27 +.charmap $28, $28 +.charmap $29, $29 +.charmap $2A, $2A +.charmap $2B, $2B +.charmap $2C, $2C +.charmap $2D, $2D +.charmap $2E, $2E +.charmap $2F, $2F +.charmap $30, $30 +.charmap $31, $31 +.charmap $32, $32 +.charmap $33, $33 +.charmap $34, $34 +.charmap $35, $35 +.charmap $36, $36 +.charmap $37, $37 +.charmap $38, $38 +.charmap $39, $39 +.charmap $3A, $3A +.charmap $3B, $3B +.charmap $3C, $3C +.charmap $3D, $3D +.charmap $3E, $3E +.charmap $3F, $3F + +; Char $40 -> c - 64 +.charmap $40, $00 + +; Char $41 ... $5A -> c upper-case alphabet +.charmap $41, $41 +.charmap $42, $42 +.charmap $43, $43 +.charmap $44, $44 +.charmap $45, $45 +.charmap $46, $46 +.charmap $47, $47 +.charmap $48, $48 +.charmap $49, $49 +.charmap $4A, $4A +.charmap $4B, $4B +.charmap $4C, $4C +.charmap $4D, $4D +.charmap $4E, $4E +.charmap $4F, $4F +.charmap $50, $50 +.charmap $51, $51 +.charmap $52, $52 +.charmap $53, $53 +.charmap $54, $54 +.charmap $55, $55 +.charmap $56, $56 +.charmap $57, $57 +.charmap $58, $58 +.charmap $59, $59 +.charmap $5A, $5A + +; Char $5B ... $5F -> c - 64 +.charmap $5B, $1B +.charmap $5C, $1C +.charmap $5D, $1D +.charmap $5E, $1E +.charmap $5F, $1F + +; Char $60 -> c - 32 +.charmap $60, $40 + +; Char $61 ... $7A -> c - 32 - 64 lower-case alphabet +.charmap $61, $01 +.charmap $62, $02 +.charmap $63, $03 +.charmap $64, $04 +.charmap $65, $05 +.charmap $66, $06 +.charmap $67, $07 +.charmap $68, $08 +.charmap $69, $09 +.charmap $6A, $0A +.charmap $6B, $0B +.charmap $6C, $0C +.charmap $6D, $0D +.charmap $6E, $0E +.charmap $6F, $0F +.charmap $70, $10 +.charmap $71, $11 +.charmap $72, $12 +.charmap $73, $13 +.charmap $74, $14 +.charmap $75, $15 +.charmap $76, $16 +.charmap $77, $17 +.charmap $78, $18 +.charmap $79, $19 +.charmap $7A, $1A + +; Char $7B ... $7F -> c - 32 +.charmap $7B, $5B +.charmap $7C, $5C +.charmap $7D, $5D +.charmap $7E, $5E +.charmap $7F, $5F + +; Char $80 -> c + 64 +.charmap $80, $C0 + +; Char $81 ... $9A -> c control alphabet +.charmap $81, $81 +.charmap $82, $82 +.charmap $83, $83 +.charmap $84, $84 +.charmap $85, $85 +.charmap $86, $86 +.charmap $87, $87 +.charmap $88, $88 +.charmap $89, $89 +.charmap $8A, $8A +.charmap $8B, $8B +.charmap $8C, $8C +.charmap $8D, $8D +.charmap $8E, $8E +.charmap $8F, $8F +.charmap $90, $90 +.charmap $91, $91 +.charmap $92, $92 +.charmap $93, $93 +.charmap $94, $94 +.charmap $95, $95 +.charmap $96, $96 +.charmap $97, $97 +.charmap $98, $98 +.charmap $99, $99 +.charmap $9A, $9A + +; Char $9B ... $9F -> c + 64 +.charmap $9B, $DB +.charmap $9C, $DC +.charmap $9D, $DD +.charmap $9E, $DE +.charmap $9F, $DF + +; Char $A0 ... $BF -> c - 64 +.charmap $A0, $60 +.charmap $A1, $61 +.charmap $A2, $62 +.charmap $A3, $63 +.charmap $A4, $64 +.charmap $A5, $65 +.charmap $A6, $66 +.charmap $A7, $67 +.charmap $A8, $68 +.charmap $A9, $69 +.charmap $AA, $6A +.charmap $AB, $6B +.charmap $AC, $6C +.charmap $AD, $6D +.charmap $AE, $6E +.charmap $AF, $6F +.charmap $B0, $70 +.charmap $B1, $71 +.charmap $B2, $72 +.charmap $B3, $73 +.charmap $B4, $74 +.charmap $B5, $75 +.charmap $B6, $76 +.charmap $B7, $77 +.charmap $B8, $78 +.charmap $B9, $79 +.charmap $BA, $7A +.charmap $BB, $7B +.charmap $BC, $7C +.charmap $BD, $7D +.charmap $BE, $7E +.charmap $BF, $7F + +; Char $C0 ... $DF -> c - 128 +.charmap $C0, $40 + +; Char $C1 ... $DA -> c - 128 - 64 lower-case alphabet +.charmap $C1, $01 +.charmap $C2, $02 +.charmap $C3, $03 +.charmap $C4, $04 +.charmap $C5, $05 +.charmap $C6, $06 +.charmap $C7, $07 +.charmap $C8, $08 +.charmap $C9, $09 +.charmap $CA, $0A +.charmap $CB, $0B +.charmap $CC, $0C +.charmap $CD, $0D +.charmap $CE, $0E +.charmap $CF, $0F +.charmap $D0, $10 +.charmap $D1, $11 +.charmap $D2, $12 +.charmap $D3, $13 +.charmap $D4, $14 +.charmap $D5, $15 +.charmap $D6, $16 +.charmap $D7, $17 +.charmap $D8, $18 +.charmap $D9, $19 +.charmap $DA, $1A + +; Char $DB ... $DF -> c - 128 +.charmap $DB, $5B +.charmap $DC, $5C +.charmap $DD, $5D +.charmap $DE, $5E +.charmap $DF, $5F + +; Char $E0 ... $FF -> c - 128 +.charmap $E0, $60 +.charmap $E1, $61 +.charmap $E2, $62 +.charmap $E3, $63 +.charmap $E4, $64 +.charmap $E5, $65 +.charmap $E6, $66 +.charmap $E7, $67 +.charmap $E8, $68 +.charmap $E9, $69 +.charmap $EA, $6A +.charmap $EB, $6B +.charmap $EC, $6C +.charmap $ED, $6D +.charmap $EE, $6E +.charmap $EF, $6F +.charmap $F0, $70 +.charmap $F1, $71 +.charmap $F2, $72 +.charmap $F3, $73 +.charmap $F4, $74 +.charmap $F5, $75 +.charmap $F6, $76 +.charmap $F7, $77 +.charmap $F8, $78 +.charmap $F9, $79 +.charmap $FA, $7A +.charmap $FB, $7B +.charmap $FC, $7C +.charmap $FD, $7D +.charmap $FE, $7E +.charmap $FF, $7F diff --git a/asminc/cpu.mac b/asminc/cpu.mac index 6b8aa6d7b..31170fbed 100644 --- a/asminc/cpu.mac +++ b/asminc/cpu.mac @@ -2,18 +2,23 @@ CPU_ISET_NONE = $0001 CPU_ISET_6502 = $0002 CPU_ISET_6502X = $0004 -CPU_ISET_65SC02 = $0008 -CPU_ISET_65C02 = $0010 -CPU_ISET_65816 = $0020 -CPU_ISET_SWEET16 = $0040 -CPU_ISET_HUC6280 = $0080 +CPU_ISET_6502DTV = $0008 +CPU_ISET_65SC02 = $0010 +CPU_ISET_65C02 = $0020 +CPU_ISET_65816 = $0040 +CPU_ISET_SWEET16 = $0080 +CPU_ISET_HUC6280 = $0100 +;CPU_ISET_M740 = $0200 not actually implemented +CPU_ISET_4510 = $0400 ; CPU capabilities CPU_NONE = CPU_ISET_NONE CPU_6502 = CPU_ISET_6502 CPU_6502X = CPU_ISET_6502|CPU_ISET_6502X +CPU_6502DTV = CPU_ISET_6502|CPU_ISET_6502X|CPU_ISET_6502DTV CPU_65SC02 = CPU_ISET_6502|CPU_ISET_65SC02 CPU_65C02 = CPU_ISET_6502|CPU_ISET_65SC02|CPU_ISET_65C02 CPU_65816 = CPU_ISET_6502|CPU_ISET_65SC02|CPU_ISET_65816 CPU_SWEET16 = CPU_ISET_SWEET16 CPU_HUC6280 = CPU_ISET_6502|CPU_ISET_65SC02|CPU_ISET_65C02|CPU_ISET_HUC6280 +CPU_4510 = CPU_ISET_6502|CPU_ISET_65SC02|CPU_ISET_65C02|CPU_ISET_4510 diff --git a/asminc/creativision.inc b/asminc/creativision.inc new file mode 100644 index 000000000..a0259ecce --- /dev/null +++ b/asminc/creativision.inc @@ -0,0 +1,66 @@ +;* +;** VTech Creativision Definitions +;* + +;** Screen +SCREEN_ROWS = 24 +SCREEN_COLS = 32 +SCREEN_PTR := $3A +CURSOR_X := $3C +CURSOR_Y := $3D + +;** VDP +VDP_DATA_R := $2000 +VDP_STATUS_R := $2001 +VDP_DATA_W := $3000 +VDP_CONTROL_W := $3001 + +;** PIA +PIA0_DATA := $1000 +PIA0_STATUS := $1001 +PIA1_DATA := $1002 +PIA1_STATUS := $1003 + +;** General +CH_VLINE = 33 +CH_HLINE = 34 +CH_ULCORNER = 35 +CH_URCORNER = 36 +CH_LLCORNER = 37 +CH_LRCORNER = 38 + +;** I/O (Zero-page variables) +ZP_KEYBOARD := $10 +ZP_JOY0_DIR := $11 +ZP_JOY1_DIR := $13 +ZP_JOY0_BUTTONS := $16 +ZP_JOY1_BUTTONS := $17 + +;** Joystick direction values (ZP_JOY0_DIR/ZP_JOY1_DIR) +JOY_N = $49 +JOY_NNE = $48 +JOY_NE = $47 +JOY_ENE = $46 +JOY_E = $45 +JOY_ESE = $44 +JOY_SE = $43 +JOY_SSE = $42 +JOY_S = $41 +JOY_SSW = $40 +JOY_SW = $4F +JOY_WSW = $4E +JOY_W = $4D +JOY_WNW = $4C +JOY_NW = $4B +JOY_NNW = $4A + +;** BIOS routines +BIOS_NMI_RESET_ADDR := $F808 +BIOS_PLAY_TUNE1 := $FBD6 +BIOS_PLAY_SONG := $FBED +BIOS_PLAY_TUNE2 := $FCE6 +BIOS_WRITE_VDP_REG := $FE1F +BIOS_QUIET_PSG := $FE54 +BIOS_POKE_PSG := $FE77 +BIOS_IRQ1_ADDR := $FF3F +BIOS_IRQ2_ADDR := $FF52 diff --git a/asminc/ctype.inc b/asminc/ctype.inc index d6b0ccf46..4d9ae7986 100644 --- a/asminc/ctype.inc +++ b/asminc/ctype.inc @@ -1,29 +1,31 @@ +; ctype.inc +; +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; Definitions for the character type tables ; ; Ullrich von Bassewitz, 08.09.2001 ; -; Make the __ctype table an exported/imported symbol - - .global __ctype - ; Define bitmapped constants for the table entries -CT_NONE = $00 ; Nothing special -CT_LOWER = $01 ; 0 - Lower case char -CT_UPPER = $02 ; 1 - Upper case char -CT_DIGIT = $04 ; 2 - Numeric digit -CT_XDIGIT = $08 ; 3 - Hex digit (both, lower and upper) -CT_CTRL = $10 ; 4 - Control character -CT_SPACE = $20 ; 5 - The space character itself -CT_OTHER_WS = $40 ; 6 - Other whitespace ('\f', '\n', '\r', '\t' and '\v') -CT_SPACE_TAB = $80 ; 7 - Space or tab character +CT_NONE = %00000000 ; Nothing special +CT_LOWER = %00000001 ; 0 - Lower case char +CT_UPPER = %00000010 ; 1 - Upper case char +CT_DIGIT = %00000100 ; 2 - Numeric digit +CT_XDIGIT = %00001000 ; 3 - Hex digit (both, lower and upper) +CT_CTRL = %00010000 ; 4 - Control character +CT_SPACE = %00100000 ; 5 - The space character itself +CT_OTHER_WS = %01000000 ; 6 - Other whitespace ('\f', '\n', '\r', '\t' and '\v') +CT_SPACE_TAB = %10000000 ; 7 - Space or tab character ; Combined stuff CT_ALNUM = (CT_LOWER | CT_UPPER | CT_DIGIT) CT_ALPHA = (CT_LOWER | CT_UPPER) CT_CTRL_SPACE = (CT_CTRL | CT_SPACE) CT_NOT_PUNCT = (CT_SPACE | CT_CTRL | CT_DIGIT | CT_UPPER | CT_LOWER) - - diff --git a/asminc/ctype_common.inc b/asminc/ctype_common.inc new file mode 100644 index 000000000..044c2834f --- /dev/null +++ b/asminc/ctype_common.inc @@ -0,0 +1,91 @@ +; ctype_common.inc +; +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. +; +; Character specification table for some common targets. +; + + .include "ctypetable.inc" + .export __ctypeidx + +; The tables are readonly, put them into the rodata segment + +.rodata + +__ctypeidx: + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 0/00 ___ctrl_@___, 1/01 ___ctrl_A___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 2/02 ___ctrl_B___, 3/03 ___ctrl_C___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 4/04 ___ctrl_D___, 5/05 ___ctrl_E___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 6/06 ___ctrl_F___, 7/07 ___ctrl_G___ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_SPACETAB_IDX ; 8/08 ___ctrl_H___, 9/09 ___ctrl_I___ + ct_mix CT_CTRL_WS_IDX, CT_CTRL_WS_IDX ; 10/0a ___ctrl_J___, 11/0b ___ctrl_K___ + ct_mix CT_CTRL_WS_IDX, CT_CTRL_WS_IDX ; 12/0c ___ctrl_L___, 13/0d ___ctrl_M___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 14/0e ___ctrl_N___, 15/0f ___ctrl_O___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 16/10 ___ctrl_P___, 17/11 ___ctrl_Q___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 18/12 ___ctrl_R___, 19/13 ___ctrl_S___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 20/14 ___ctrl_T___, 21/15 ___ctrl_U___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 22/16 ___ctrl_V___, 23/17 ___ctrl_W___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 24/18 ___ctrl_X___, 25/19 ___ctrl_Y___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 26/1a ___ctrl_Z___, 27/1b ___ctrl_[___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 28/1c ___ctrl_\___, 29/1d ___ctrl_]___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 30/1e ___ctrl_^___, 31/1f ___ctrl_____ + + ct_mix CT_SPACE_SPACETAB_IDX, CT_NONE_IDX ; 32/20 ___SPACE___, 33/21 _____!_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 34/22 _____"_____, 35/23 _____#_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 36/24 _____$_____, 37/25 _____%_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 38/26 _____&_____, 39/27 _____'_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 40/28 _____(_____, 41/29 _____)_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 42/2a _____*_____, 43/2b _____+_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 44/2c _____,_____, 45/2d _____-_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 46/2e _____._____, 47/2f _____/_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 48/30 _____0_____, 49/31 _____1_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 50/32 _____2_____, 51/33 _____3_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 52/34 _____4_____, 53/35 _____5_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 54/36 _____6_____, 55/37 _____7_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 56/38 _____8_____, 57/39 _____9_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 58/3a _____:_____, 59/3b _____;_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 60/3c _____<_____, 61/3d _____=_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 62/3e _____>_____, 63/3f _____?_____ + + ct_mix CT_NONE_IDX, CT_UPPER_XDIGIT_IDX ; 64/40 _____@_____, 65/41 _____A_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 66/42 _____B_____, 67/43 _____C_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 68/44 _____D_____, 69/45 _____E_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_IDX ; 70/46 _____F_____, 71/47 _____G_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 72/48 _____H_____, 73/49 _____I_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 74/4a _____J_____, 75/4b _____K_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 76/4c _____L_____, 77/4d _____M_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 78/4e _____N_____, 79/4f _____O_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 80/50 _____P_____, 81/51 _____Q_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 82/52 _____R_____, 83/53 _____S_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 84/54 _____T_____, 85/55 _____U_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 86/56 _____V_____, 87/57 _____W_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 88/58 _____X_____, 89/59 _____Y_____ + ct_mix CT_UPPER_IDX, CT_NONE_IDX ; 90/5a _____Z_____, 91/5b _____[_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 92/5c _____\_____, 93/5d _____]_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 94/5e _____^_____, 95/5f _UNDERLINE_ + + ct_mix CT_NONE_IDX, CT_LOWER_XDIGIT_IDX ; 96/60 ___grave___, 97/61 _____a_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 98/62 _____b_____, 99/63 _____c_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 100/64 _____d_____, 101/65 _____e_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_IDX ; 102/66 _____f_____, 103/67 _____g_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 104/68 _____h_____, 105/69 _____i_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 106/6a _____j_____, 107/6b _____k_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 108/6c _____l_____, 109/6d _____m_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 110/6e _____n_____, 111/6f _____o_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 112/70 _____p_____, 113/71 _____q_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 114/72 _____r_____, 115/73 _____s_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 116/74 _____t_____, 117/75 _____u_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 118/76 _____v_____, 119/77 _____w_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 120/78 _____x_____, 121/79 _____y_____ + ct_mix CT_LOWER_IDX, CT_NONE_IDX ; 122/7a _____z_____, 123/7b _____{_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 124/7c _____|_____, 125/7d _____}_____ + ct_mix CT_NONE_IDX, CT_WS_IDX ; 126/7e _____~_____, 127/7f ____DEL____ + +.repeat 64 + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 128-255 +.endrepeat diff --git a/asminc/ctypetable.inc b/asminc/ctypetable.inc new file mode 100644 index 000000000..76c5b9298 --- /dev/null +++ b/asminc/ctypetable.inc @@ -0,0 +1,48 @@ +; ctypetable.inc +; +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. +; +; Data covering all possible combinations of character flags for target specific definition +; + +.include "ctype.inc" +.export __ctype + +; Table definition covering all possible ctype combinations + +.rodata +__ctype: +ct_none: .byte CT_NONE +ct_lower: .byte CT_LOWER +ct_upper: .byte CT_UPPER +ct_digit_xdigit: .byte CT_DIGIT | CT_XDIGIT +ct_lower_xdigit: .byte CT_LOWER | CT_XDIGIT +ct_upper_xdigit: .byte CT_UPPER | CT_XDIGIT +ct_ctrl: .byte CT_CTRL +ct_ws: .byte CT_OTHER_WS +ct_ctrl_ws: .byte CT_CTRL | CT_OTHER_WS +ct_space_spacetab: .byte CT_SPACE | CT_SPACE_TAB +ct_ctrl_ws_spacetab: .byte CT_CTRL | CT_OTHER_WS | CT_SPACE_TAB + +; build indices out of the table above: + +CT_NONE_IDX = ct_none - __ctype +CT_LOWER_IDX = ct_lower - __ctype +CT_UPPER_IDX = ct_upper - __ctype +CT_DIGIT_XDIGIT_IDX = ct_digit_xdigit - __ctype +CT_LOWER_XDIGIT_IDX = ct_lower_xdigit - __ctype +CT_UPPER_XDIGIT_IDX = ct_upper_xdigit - __ctype +CT_CTRL_IDX = ct_ctrl - __ctype +CT_WS_IDX = ct_ws - __ctype +CT_CTRL_WS_IDX = ct_ctrl_ws - __ctype +CT_SPACE_SPACETAB_IDX = ct_space_spacetab - __ctype +CT_CTRL_WS_SPACETAB_IDX = ct_ctrl_ws_spacetab - __ctype + +.macro ct_mix lower, upper + .byte ((lower) & $0F) | ((upper) << 4) +.endmacro diff --git a/asminc/cx16.inc b/asminc/cx16.inc new file mode 100644 index 000000000..268d701d6 --- /dev/null +++ b/asminc/cx16.inc @@ -0,0 +1,574 @@ +; +; CX16 r39 definitions +; + +; --------------------------------------------------------------------------- +; Constants + +.enum COLOR + BLACK = $00 + WHITE + RED + CYAN + PURPLE + GREEN + BLUE + YELLOW + ORANGE + BROWN + PINK + LIGHTRED = PINK + GRAY1 + GRAY2 + LIGHTGREEN + LIGHTBLUE + GRAY3 +.endenum + +; Special characters +.enum CH +COLOR_SWAP = $01 +STOP = $03 +UNDERLINE +WHITE +BOLD +BELL +BACKSPACE +TAB +LINEFEED +ITALIC +OUTLINE +ENTER +FONT_LOWER +FONT_ISO +F9 +CURS_DOWN +REVERSE +HOME +DEL +F10 +F11 +F12 +SHIFT_TAB +RED = $1C +CURS_RIGHT +GREEN +BLUE +LIRA = $5C +ORANGE = $81 +RUN = $83 +HELP +F1 +F3 +F5 +F7 +F2 +F4 +F6 +F8 +SHIFT_ENTER +FONT_UPPER +FONT_PET +BLACK +CURS_UP +ATTR_CLEAR +SCRN_CLEAR +INS +BROWN +PINK +LIGHTRED = PINK +GRAY1 +GRAY2 +LIGHTGREEN +LIGHTBLUE +GRAY3 +PURPLE +CURS_LEFT +YELLOW +CYAN +SHIFT_SPACE +LTEE = $AB +LLCORNER = $AD +URCORNER +ULCORNER = $B0 +BTEE +TTEE +RTEE +LRCORNER = $BD +HLINE = $C0 +CROSS = $DB +VLINE = $DD +PI +.endenum + +; --------------------------------------------------------------------------- +; Zero page + +; Banking registers +RAM_BANK := $00 +ROM_BANK := $01 + +; GEOS and graphics pseudo-registers +.struct gREG + .org $02 + .union + r0 .word + .struct + r0L .byte + r0H .byte + .endstruct + .endunion + .union + r1 .word + .struct + r1L .byte + r1H .byte + .endstruct + .endunion + .union + r2 .word + .struct + r2L .byte + r2H .byte + .endstruct + .endunion + .union + r3 .word + .struct + r3L .byte + r3H .byte + .endstruct + .endunion + .union + r4 .word + .struct + r4L .byte + r4H .byte + .endstruct + .endunion + .union + r5 .word + .struct + r5L .byte + r5H .byte + .endstruct + .endunion + .union + r6 .word + .struct + r6L .byte + r6H .byte + .endstruct + .endunion + .union + r7 .word + .struct + r7L .byte + r7H .byte + .endstruct + .endunion + .union + r8 .word + .struct + r8L .byte + r8H .byte + .endstruct + .endunion + .union + r9 .word + .struct + r9L .byte + r9H .byte + .endstruct + .endunion + .union + r10 .word + .struct + r10L .byte + r10H .byte + .endstruct + .endunion + .union + r11 .word + .struct + r11L .byte + r11H .byte + .endstruct + .endunion + .union + r12 .word + .struct + r12L .byte + r12H .byte + .endstruct + .endunion + .union + r13 .word + .struct + r13L .byte + r13H .byte + .endstruct + .endunion + .union + r14 .word + .struct + r14L .byte + r14H .byte + .endstruct + .endunion + .union + r15 .word + .struct + r15L .byte + r15H .byte + .endstruct + .endunion +.endstruct + +; Kernal +KTEMP2 := $80 ; 2 bytes for temporary storage +IMPARM := $82 ; Pointer for PRIMM function +FNAM := $8A ; Pointer to filename + +; BASIC +TXTPTR := $EE ; Pointer into BASIC source code + +; Page two + +BASIC_BUF := $0200 ; Location of command-line +BASIC_BUF_LEN = 81 ; Maximum length of command-line + +SCREEN_PTR := $0262 ; Pointer to current row on text screen (16 bits) +STATUS := $0289 ; Status from previous I/O operation +IN_DEV := $028D ; Current input device number +OUT_DEV := $028E ; Current output device number +FNAM_LEN := $0291 ; Length of filename +SECADR := $0293 ; Secondary address +DEVNUM := $0294 ; Device number +CURS_COLOR := $0373 ; Color under the cursor +CHARCOLOR := $0376 ; Cursor's color nybbles (high: background, low: foreground) +RVS := $0377 ; Reverse flag +CURS_FLAG := $037B ; 1 = cursor off +CURS_BLINK := $037C ; Blink counter +CURS_CHAR := $037D ; Character under the cursor +CURS_STATE := $037E ; Cursor blink state +CURS_X := $0380 ; Cursor column +CURS_Y := $0383 ; Cursor row +LLEN := $0386 ; Line length +NLINES := $0387 ; Number of screen lines + +; BASIC +VARTAB := $03E2 ; Pointer to start of BASIC variables +MEMSIZE := $03EA ; Pointer to highest BASIC RAM location (+1) + +; --------------------------------------------------------------------------- +; Vector and other locations + +IRQVec := $0314 +BRKVec := $0316 +NMIVec := $0318 + +; --------------------------------------------------------------------------- +; I/O locations + +; 65C22 Versatile Interface Adapter +.struct VIA1 ; Versatile Interface Adapter + .org $9F00 + PRB .byte ; mouse, LED, VIC bus (Port Register B) + PRA .byte ; keyboard, controllers (Port Register A) + DDRB .byte ; (Data Direction Register B) + DDRA .byte ; (Data Direction Register A) + T1 .word ; (Timer 1) + T1L .word ; (Timer 1 Latch) + T2 .word ; (Timer 2) + SR .byte ; (Shift Register) + ACR .byte ; (Auxiliary Control Register) + PCR .byte ; (Peripheral Control Register) + IFR .byte ; (Interrupt Flags Register) + IER .byte ; (Interrupt Enable Register) + PRA2 .byte ; keyboard, controllers (PRA without handshake) +.endstruct + +; 65C22 Versatile Interface Adapter +.struct VIA2 + .org $9F10 + PRB .byte + PRA .byte + DDRB .byte + DDRA .byte + T1 .word + T1L .word + T2 .word + SR .byte + ACR .byte + PCR .byte + IFR .byte + IER .byte + PRA2 .byte +.endstruct + +; Video Enhanced Retro Adapter +; Has audio and SPI. +.scope VERA + + ; External registers + + .struct + .org $9F20 + ADDR .faraddr ; Address for data port access + DATA0 .byte ; First data port + DATA1 .byte ; Second data port + CTRL .byte ; Control register + IRQ_EN .byte ; Interrupt enable bits + IRQ_FLAGS .byte ; Interrupt flags + IRQ_RASTER .byte ; Line where IRQ will occur + .endstruct + .enum ; Address automatic increment amounts + DEC0 = (($00 << 1) | $01) << 3 + DEC1 = (($01 << 1) | $01) << 3 + DEC2 = (($02 << 1) | $01) << 3 + DEC4 = (($03 << 1) | $01) << 3 + DEC8 = (($04 << 1) | $01) << 3 + DEC16 = (($05 << 1) | $01) << 3 + DEC32 = (($06 << 1) | $01) << 3 + DEC64 = (($07 << 1) | $01) << 3 + DEC128 = (($08 << 1) | $01) << 3 + DEC256 = (($09 << 1) | $01) << 3 + DEC512 = (($0A << 1) | $01) << 3 + DEC40 = (($0B << 1) | $01) << 3 + DEC80 = (($0C << 1) | $01) << 3 + DEC160 = (($0D << 1) | $01) << 3 + DEC320 = (($0E << 1) | $01) << 3 + DEC640 = (($0F << 1) | $01) << 3 + INC0 = (($00 << 1) | $00) << 3 + INC1 = (($01 << 1) | $00) << 3 + INC2 = (($02 << 1) | $00) << 3 + INC4 = (($03 << 1) | $00) << 3 + INC8 = (($04 << 1) | $00) << 3 + INC16 = (($05 << 1) | $00) << 3 + INC32 = (($06 << 1) | $00) << 3 + INC64 = (($07 << 1) | $00) << 3 + INC128 = (($08 << 1) | $00) << 3 + INC256 = (($09 << 1) | $00) << 3 + INC512 = (($0A << 1) | $00) << 3 + INC40 = (($0B << 1) | $00) << 3 + INC80 = (($0C << 1) | $00) << 3 + INC160 = (($0D << 1) | $00) << 3 + INC320 = (($0E << 1) | $00) << 3 + INC640 = (($0F << 1) | $00) << 3 + .endenum + .enum ; Interrupt request flags + VERT_SYNC = %00000001 + RASTER_IRQ = %00000010 + SPR_COLLIDED = %00000100 + AUDIO_LOW = %00001000 + .endenum + .scope DISP ; Display controller + SELECT1 = %00000010 + .union + .org $9F29 + .struct + ; These four registers are visible when the DCSEL flag = %0 + VIDEO .byte + HSCALE .byte + VSCALE .byte + FRAME .byte + .endstruct + .struct + ; These four registers are visible when the DCSEL flag = %1 + HSTART .byte + HSTOP .byte + VSTART .byte + VSTOP .byte + .endstruct + .endunion + .enum MODE ; Output mode + DISABLE = $00 + VGA + NTSC + RGB ; Interlaced, composite sync + .endenum + .enum DISABLE + COLOR = %00000100 ; NTSC monochrome + .endenum + .enum ENABLE + LAYER0 = %00010000 + LAYER1 = %00100000 + SPRITES = %01000000 + .endenum + .endscope + .struct L0 ; Display layer 0 + .org $9F2D + CONFIG .byte + MAP_BASE .byte + TILE_BASE .byte + HSCROLL .word + VSCROLL .word + .endstruct + .struct L1 ; Display layer 1 + .org $9F34 + CONFIG .byte + MAP_BASE .byte + TILE_BASE .byte + HSCROLL .word + VSCROLL .word + .endstruct + .enum ; Layer display modes + TILE1BPP = %00000000 | $00 + TILE2BPP + TILE4BPP + TILE8BPP + T256C = %00001000 + BITMAP1BPP = %00000100 | $00 + BITMAP2BPP + BITMAP4BPP + BITMAP8BPP + .endenum + .enum MAP ; Map geometry + WIDTH32 = $00 << 4 + WIDTH64 = $01 << 4 + WIDTH128 = $02 << 4 + WIDTH256 = $03 << 4 + HEIGHT32 = $00 << 6 + HEIGHT64 = $01 << 6 + HEIGHT128 = $02 << 6 + HEIGHT256 = $03 << 6 + .endenum + .enum TILE ; Tile geometry + WIDTH8 = $00 + WIDTH16 = $01 + WIDTH320 = WIDTH8 + WIDTH640 = WIDTH16 + HEIGHT8 = $00 << 1 + HEIGHT16 = $01 << 1 + .endenum + .scope PCM ; Pulse-Code Modulator + .struct + .org $9F3B + CTRL .byte + RATE .byte + DATA .byte + .endstruct + .enum + STEREO = %00010000 + BITS16 = %00100000 + RESET = %10000000 + .endenum + .endscope + .scope SPI + .struct + .org $9F3E + DATA .byte + CTRL .byte + .endstruct + .enum + SELECT = %00000001 + SLOW = %00000010 + .endenum + .endscope + + ; Internal RAM and registers + + .struct + .org $000000 + VRAM .res $020000 ; 128 Kibibytes + .endstruct + .scope PSG ; Programmable Sound Generator + .struct + PITCH .word + VOL .byte ; Right, left sides; volume + WAVEFORM .byte ; Wave shape, pulse width + .endstruct + LEFT = %01 << 6 + RIGHT = %10 << 6 + .enum + PULSE = $00 << 6 + SAWTOOTH = $01 << 6 + TRIANGLE = $02 << 6 + NOISE = $03 << 6 + .endenum + .struct + .org $01F9C0 + VOICES .res $10 * 4 + .endstruct + .endscope + .struct + .org $01FA00 + PALETTE .word $0100 + .endstruct + .scope SPRITE + .struct ; Sprite attributes + ADDR .addr ; Address and color mode + XX .word ; Co-ordinates + YY .word + Z_FLIP .byte ; Collision mask, Z-depth, flip bits + SIZE_PAL .byte + .endstruct + .enum FLIP + NONE = %00000000 + HORIZ + VERT + BOTH + .endenum + .enum DEPTH + DISABLE = $00 << 2 + CANVAS = $01 << 2 + LAYER0 = $02 << 2 + LAYER1 = $03 << 2 + .endenum + .enum ; Sprite geometry + WIDTH8 = $00 << 4 + WIDTH16 = $01 << 4 + WIDTH32 = $02 << 4 + WIDTH64 = $03 << 4 + HEIGHT8 = $00 << 6 + HEIGHT16 = $01 << 6 + HEIGHT32 = $02 << 6 + HEIGHT64 = $03 << 6 + COLORS16 = $00 << 7 + COLORS256 = $01 << 7 + .endenum + .endscope + .struct + .org $01FC00 + SPRITES .res 128 * 8 + .endstruct +.endscope + +; YM2151 audio chip +.struct YM2151 + .org $9F40 + .union + STATUS .byte + ADDR .byte + .endunion + DATA .byte +.endstruct + +; X16 Emulator device +; This device doesn't exist on the real machine. +.struct EMULATOR + .org $9FB0 + DEBUG .byte ; Boolean: debugging enabled + VERALOG .byte ; Boolean: log VERA activity + KEYBOARDLOG .byte ; Boolean: log keyboard data + ECHO .byte ; Type of echo that's enabled + SAVEXIT .byte ; Boolean: save machine state on exit + GIFREC .byte ; Method of recording GIF movie + .res 2 + CYCLECOUNT .dword ; Running count of CPU cycles (Read-Only) + .res 1 + KEYMAP .byte ; Current keyboard layout number (Read-Only) + DETECT .byte 2 ; If is "16" string, then running on emulator (RO) +.endstruct + +; --------------------------------------------------------------------------- +; Banked RAM and ROM + +TIMER := $A03B ; (bank 0) 60 Hz. timer (3 bytes, big-endian) + +.struct BANK + .org $A000 + RAM .res $2000 ; 8 Kibibyte window into 512 Kibibytes or 2048 Kibibytes + ROM .res $4000 ; 16 Kibibyte window into 128 Kibibytes +.endstruct diff --git a/asminc/em-kernel.inc b/asminc/em-kernel.inc index e7cdf9a70..9e89b6f4e 100644 --- a/asminc/em-kernel.inc +++ b/asminc/em-kernel.inc @@ -7,7 +7,7 @@ ;/* */ ;/* */ ;/* (C) 2002-2003 Ullrich von Bassewitz */ -;/* Rmerstrasse 52 */ +;/* Roemerstrasse 52 */ ;/* D-70794 Filderstadt */ ;/* EMail: uz@cc65.org */ ;/* */ @@ -75,7 +75,7 @@ EMD_API_VERSION = $02 ;------------------------------------------------------------------------------ ; Driver entry points - + .global emd_install .global emd_uninstall .global emd_pagecount diff --git a/asminc/errno.inc b/asminc/errno.inc index 83cd9a75d..1efe88cda 100644 --- a/asminc/errno.inc +++ b/asminc/errno.inc @@ -1,4 +1,4 @@ -; +; ; Ullrich von Bassewitz, 16.05.2000 ; @@ -28,6 +28,7 @@ ESPIPE ; Illegal seek ERANGE ; Range error EBADF ; Bad file number + ENOEXEC ; Exec format error EUNKNOWN ; Unknown OS specific error - must be last! EMAX = EUNKNOWN ; Highest error code diff --git a/asminc/joy-kernel.inc b/asminc/joy-kernel.inc index 4fe5572cf..791934197 100644 --- a/asminc/joy-kernel.inc +++ b/asminc/joy-kernel.inc @@ -7,7 +7,7 @@ ;/* */ ;/* */ ;/* (C) 2002-2006, Ullrich von Bassewitz */ -;/* Rmerstrae 52 */ +;/* Roemerstrasse 52 */ ;/* D-70794 Filderstadt */ ;/* EMail: uz@cc65.org */ ;/* */ @@ -43,20 +43,18 @@ ID .byte 3 ; $6A, $6F, $79 ("joy") VERSION .byte 1 ; Interface version LIBREF .addr ; Library reference - MASKS .byte 8 ; Joystick state mask array JUMPTAB .struct INSTALL .addr ; INSTALL routine UNINSTALL .addr ; UNINSTALL routine COUNT .addr ; COUNT routine READ .addr ; READ routine - IRQ .addr ; IRQ routine .endstruct .endstruct ;------------------------------------------------------------------------------ ; The JOY API version, stored in JOY_HDR::VERSION -JOY_API_VERSION = $03 +JOY_API_VERSION = $05 ;------------------------------------------------------------------------------ ; Variables diff --git a/asminc/lynx.inc b/asminc/lynx.inc index 2225bf3c8..403d15d07 100644 --- a/asminc/lynx.inc +++ b/asminc/lynx.inc @@ -4,7 +4,7 @@ ; ; Reference: ; Bastian Schick's Lynx Documentation -; http://www.geocities.com/SiliconValley/Byte/4242/lynx/ +; http://www.geocities.ws/SiliconValley/Byte/4242/lynx/ ; ; *** @@ -135,35 +135,35 @@ STIMCTLB = $FD1F TIM0BKUP = $FD00 TIM0CTLA = $FD01 TIM0CNT = $FD02 -TIM0CTLB = $FD03 +TIM0CTLB = $FD03 TIM1BKUP = $FD04 TIM1CTLA = $FD05 TIM1CNT = $FD06 -TIM1CTLB = $FD07 +TIM1CTLB = $FD07 TIM2BKUP = $FD08 TIM2CTLA = $FD09 TIM2CNT = $FD0A -TIM2CTLB = $FD0B +TIM2CTLB = $FD0B TIM3BKUP = $FD0C TIM3CTLA = $FD0D TIM3CNT = $FD0E -TIM3CTLB = $FD0F +TIM3CTLB = $FD0F TIM4BKUP = $FD10 TIM4CTLA = $FD11 TIM4CNT = $FD12 -TIM4CTLB = $FD13 +TIM4CTLB = $FD13 TIM5BKUP = $FD14 TIM5CTLA = $FD15 TIM5CNT = $FD16 -TIM5CTLB = $FD17 +TIM5CTLB = $FD17 TIM6BKUP = $FD18 TIM6CTLA = $FD19 TIM6CNT = $FD1A -TIM6CTLB = $FD1B +TIM6CTLB = $FD1B TIM7BKUP = $FD1C TIM7CTLA = $FD1D TIM7CNT = $FD1E -TIM7CTLB = $FD1F +TIM7CTLB = $FD1F ; Mikey Audio diff --git a/asminc/mouse-kernel.inc b/asminc/mouse-kernel.inc index 3eebca244..ab4790d1d 100644 --- a/asminc/mouse-kernel.inc +++ b/asminc/mouse-kernel.inc @@ -103,7 +103,7 @@ ;------------------------------------------------------------------------------ ; The mouse API version, stored in MOUSE_HDR::VERSION -MOUSE_API_VERSION = $05 +MOUSE_API_VERSION = $06 ;------------------------------------------------------------------------------ ; Bitmapped mouse driver flags, stored in MOUSE_HDR::FLAGS. diff --git a/asminc/opcodes.inc b/asminc/opcodes.inc index 7c52871d2..b610360e1 100644 --- a/asminc/opcodes.inc +++ b/asminc/opcodes.inc @@ -1,509 +1,516 @@ -; opcodes.inc -; ca65 6502 - opcode definitions, mainly for self modifying code -; -; Christian Krger, latest change: 18-Sep-2010 -; -; This software is provided 'as-is', without any expressed or implied -; warranty. In no event will the authors be held liable for any damages -; arising from the use of this software. -; -; Permission is granted to anyone to use this software for any purpose, -; including commercial applications, and to alter it and redistribute it -; freely, subject to the following restrictions: -; -; 1. The origin of this software must not be misrepresented; you must not -; claim that you wrote the original software. If you use this software -; in a product, an acknowledgment in the product documentation would be -; appreciated but is not required. -; 2. Altered source versions must be plainly marked as such, and must not -; be misrepresented as being the original software. -; 3. This notice may not be removed or altered from any source -; distribution. -; - -; Opcode-Table -; ------------ -; Post fix explanation: -; imm = #$00 -; zp = $00 -; zpx = $00,X -; zpy = $00,Y -; izp = ($00) -; izx = ($00,X) -; izy = ($00),Y -; abs = $0000 -; abx = $0000,X -; aby = $0000,Y -; ind = ($0000) -; iax = ($0000,X) -; rel = $0000 (PC-relative) (supressed here) - -.macpack cpu - -OPC_BRK = $00 -OPC_ORA_izx = $01 -OPC_ORA_zp = $05 -OPC_ASL_zp = $06 -OPC_PHP = $08 -OPC_ORA_imm = $09 -OPC_ASL = $0A -OPC_ORA_abs = $0D -OPC_ASL_abs = $0E - -OPC_BPL = $10 -OPC_ORA_izy = $11 -OPC_ORA_zpx = $15 -OPC_ASL_zpx = $16 -OPC_CLC = $18 -OPC_ORA_aby = $19 -OPC_ORA_abx = $1D -OPC_ASL_abx = $1E - -OPC_JSR_abs = $20 -OPC_AND_izx = $21 -OPC_BIT_zp = $24 -OPC_AND_zp = $25 -OPC_ROL_zp = $26 -OPC_PLP = $28 -OPC_AND_imm = $29 -OPC_ROL = $2A -OPC_BIT_abs = $2C -OPC_AND_abs = $2D -OPC_ROL_abs = $2E - -OPC_BMI = $30 -OPC_AND_izy = $31 -OPC_AND_zpx = $35 -OPC_ROL_zpx = $36 -OPC_SEC = $38 -OPC_AND_aby = $39 -OPC_AND_abx = $3D -OPC_ROL_abx = $3E - - -OPC_RTI = $40 -OPC_EOR_izx = $41 -OPC_EOR_zp = $45 -OPC_LSR_zp = $46 -OPC_PHA = $48 -OPC_EOR_imm = $49 -OPC_LSR = $4A -OPC_JMP_abs = $4C -OPC_EOR_abs = $4D -OPC_LSR_abs = $4E - -OPC_BVC = $50 -OPC_EOR_izy = $51 -OPC_EOR_zpx = $55 -OPC_LSR_zpx = $56 -OPC_CLI = $58 -OPC_EOR_aby = $59 -OPC_EOR_abx = $5D -OPC_LSR_abx = $5E - -OPC_RTS = $60 -OPC_ADC_izx = $61 -OPC_ADC_zp = $65 -OPC_ROR_zp = $66 -OPC_PLA = $68 -OPC_ADC_imm = $69 -OPC_ROR = $6A -OPC_JMP_ind = $6C -OPC_ADC_abs = $6D -OPC_ROR_abs = $6E - -OPC_BVS = $70 -OPC_ADC_izy = $71 -OPC_ADC_zpx = $75 -OPC_ROR_zpx = $76 -OPC_SEI = $78 -OPC_ADC_aby = $79 -OPC_ADC_abx = $7D -OPC_ROR_abx = $7E - -OPC_STA_izx = $81 -OPC_STY_zp = $84 -OPC_STA_zp = $85 -OPC_STX_zp = $86 -OPC_DEY = $88 -OPC_TXA = $8A -OPC_STY_abs = $8C -OPC_STA_abs = $8D -OPC_STX_abs = $8E - -OPC_BCC = $90 -OPC_STA_izy = $91 -OPC_STY_zpx = $94 -OPC_STA_zpx = $95 -OPC_STX_zpy = $96 -OPC_TYA = $98 -OPC_STA_aby = $99 -OPC_TXS = $9A -OPC_STA_abx = $9D - -OPC_LDY_imm = $A0 -OPC_LDA_izx = $A1 -OPC_LDX_imm = $A2 -OPC_LDY_zp = $A4 -OPC_LDA_zp = $A5 -OPC_LDX_zp = $A6 -OPC_TAY = $A8 -OPC_LDA_imm = $A9 -OPC_TAX = $AA -OPC_LDY_abs = $AC -OPC_LDA_abs = $AD -OPC_LDX_abs = $AE - -OPC_BCS = $B0 -OPC_LDA_izy = $B1 -OPC_LDY_zpx = $B4 -OPC_LDA_zpx = $B5 -OPC_LDX_zpy = $B6 -OPC_CLV = $B8 -OPC_LDA_aby = $B9 -OPC_TSX = $BA -OPC_LDY_abx = $BC -OPC_LDA_abx = $BD -OPC_LDX_aby = $BE - -OPC_CPY_imm = $C0 -OPC_CMP_izx = $C1 -OPC_CPY_zp = $C4 -OPC_CMP_zp = $C5 -OPC_DEC_zp = $C6 -OPC_INY = $C8 -OPC_CMP_imm = $C9 -OPC_DEX = $CA -OPC_CPY_abs = $CC -OPC_CMP_abs = $CD -OPC_DEC_abs = $CE - -OPC_BNE = $D0 -OPC_CMP_izy = $D1 -OPC_CMP_zpx = $D5 -OPC_DEC_zpx = $D6 -OPC_CLD = $D8 -OPC_CMP_aby = $D9 -OPC_CMP_abx = $DD -OPC_DEC_abx = $DE - -OPC_CPX_imm = $E0 -OPC_SBC_izx = $E1 -OPC_CPX_zp = $E4 -OPC_SBC_zp = $E5 -OPC_INC_zp = $E6 -OPC_INX = $E8 -OPC_SBC_imm = $E9 -OPC_NOP = $EA -OPC_CPX_abs = $EC -OPC_SBC_abs = $ED -OPC_INC_abs = $EE - - -OPC_BEQ = $F0 -OPC_SBC_izy = $F1 -OPC_SBC_zpx = $F5 -OPC_INC_zpx = $F6 -OPC_SED = $F8 -OPC_SBC_aby = $F9 -OPC_SBC_abx = $FD -OPC_INC_abx = $FE - - -.if (.cpu .bitand ::CPU_ISET_65SC02) - -; OPC_NOP = $02 ; doublet -; OPC_NOP = $03 ; doublet -OPC_TSB_zp = $04 -; OPC_NOP = $0B ; doublet -OPC_TSB_abs = $0C - -OPC_ORA_izp = $12 -; OPC_NOP = $13 ; doublet -OPC_TRB_zp = $14 -OPC_INC = $1A -; OPC_NOP = $1B ; doublet -OPC_TRB_abs = $1C - -; OPC_NOP = $22 ; doublet -; OPC_NOP = $23 ; doublet -; OPC_NOP = $2B ; doublet - -OPC_AND_izp = $32 -; OPC_NOP = $33 ; doublet -OPC_BIT_zpx = $34 -OPC_DEC = $3A -; OPC_NOP = $3B ; doublet -OPC_BIT_abx = $3C - -; OPC_NOP = $42 ; doublet -; OPC_NOP = $43 ; doublet -; OPC_NOP = $44 ; doublet -; OPC_NOP = $4B ; doublet - -OPC_EOR_izp = $52 -; OPC_NOP = $53 ; doublet -; OPC_NOP = $54 ; doublet -; OPC_NOP = $5A ; doublet -; OPC_NOP = $5B ; doublet -OPC_EOR_abx = $5C - -; OPC_NOP = $62 ; doublet -; OPC_NOP = $63 ; doublet -OPC_STZ_zp = $64 -; OPC_NOP = $6B ; doublet - -OPC_ADC_izp = $72 -; OPC_NOP = $73 ; doublet -OPC_STZ_zpx = $74 -OPC_PLY = $7A -; OPC_NOP = $7B ; doublet -OPC_JMP_iax = $7C - -OPC_BRA = $80 -; OPC_NOP = $82 ; doublet -; OPC_NOP = $83 ; doublet -OPC_BIT_imm = $89 -; OPC_NOP = $8B ; doublet - -OPC_STA_izp = $92 -; OPC_NOP = $93 ; doublet -; OPC_NOP = $9B ; doublet -OPC_STZ_abs = $9C -OPC_STZ_abx = $9E - -; OPC_NOP = $A3 ; doublet -; OPC_NOP = $AB ; doublet - -OPC_LDA_izp = $B2 -; OPC_NOP = $B3 ; doublet -; OPC_NOP = $BB ; doublet - -; OPC_NOP = $C2 ; doublet -; OPC_NOP = $C3 ; doublet -; OPC_NOP = $CB ; doublet - -OPC_CMP_izp = $D2 -; OPC_NOP = $D3 ; doublet -; OPC_NOP = $D4 ; doublet -OPC_PHX = $DA -; OPC_NOP = $DB ; doublet -; OPC_NOP = $DC ; doublet - -; OPC_NOP = $E2 ; doublet -; OPC_NOP = $E3 ; doublet -; OPC_NOP = $EB ; doublet - -OPC_SBC_izp = $F2 -; OPC_NOP = $F3 ; doublet -; OPC_NOP = $F4 ; doublet -OPC_PLX = $FA -; OPC_NOP = $FB ; doublet -; OPC_NOP = $FC ; doublet - - -.if (.cpu .bitand ::CPU_ISET_65C02) - -; bit instructions for 65C02 - -OPC_RMB0 = $07 -OPC_RMB1 = $17 -OPC_RMB2 = $27 -OPC_RMB3 = $37 -OPC_RMB4 = $47 -OPC_RMB5 = $57 -OPC_RMB6 = $67 -OPC_RMB7 = $77 - -OPC_SMB0 = $87 -OPC_SMB1 = $97 -OPC_SMB2 = $A7 -OPC_SMB3 = $B7 -OPC_SMB4 = $C7 -OPC_SMB5 = $D7 -OPC_SMB6 = $E7 -OPC_SMB7 = $F7 - -OPC_BBR0 = $0F -OPC_BBR1 = $1F -OPC_BBR2 = $2F -OPC_BBR3 = $3F -OPC_BBR4 = $4F -OPC_BBR5 = $5F -OPC_BBR6 = $6F -OPC_BBR7 = $7F - -OPC_BBS0 = $8F -OPC_BBS1 = $9F -OPC_BBS2 = $AF -OPC_BBS3 = $BF -OPC_BBS4 = $CF -OPC_BBS5 = $DF -OPC_BBS6 = $EF -OPC_BBS7 = $FF - -.else - -; no bit instructions for 65SC02 - -; OPC_NOP = $07 ; doublet -; OPC_NOP = $17 ; doublet -; OPC_NOP = $27 ; doublet -; OPC_NOP = $37 ; doublet -; OPC_NOP = $47 ; doublet -; OPC_NOP = $57 ; doublet -; OPC_NOP = $67 ; doublet -; OPC_NOP = $77 ; doublet -; OPC_NOP = $87 ; doublet -; OPC_NOP = $97 ; doublet -; OPC_NOP = $A7 ; doublet -; OPC_NOP = $B7 ; doublet -; OPC_NOP = $C7 ; doublet -; OPC_NOP = $D7 ; doublet -; OPC_NOP = $E7 ; doublet -; OPC_NOP = $F7 ; doublet -; OPC_NOP = $0F ; doublet -; OPC_NOP = $1F ; doublet -; OPC_NOP = $2F ; doublet -; OPC_NOP = $3F ; doublet -; OPC_NOP = $4F ; doublet -; OPC_NOP = $5F ; doublet -; OPC_NOP = $6F ; doublet -; OPC_NOP = $7F ; doublet -; OPC_NOP = $8F ; doublet -; OPC_NOP = $9F ; doublet -; OPC_NOP = $AF ; doublet -; OPC_NOP = $BF ; doublet -; OPC_NOP = $CF ; doublet -; OPC_NOP = $DF ; doublet -; OPC_NOP = $EF ; doublet -; OPC_NOP = $FF ; doublet - -.endif - -.elseif (.cpu .bitand ::CPU_ISET_6502X) - -; stable, undocumented opcodes - -; OPC_KIL = $02 ; unstable -OPC_SLO_izx = $03 -OPC_NOP_zp = $04 -OPC_SLO_zp = $07 -OPC_ANC_imm = $0B -OPC_NOP_abs = $0C -OPC_SLO_abs = $0F - -; OPC_KIL = $12 ; unstable -OPC_SLO_izy = $13 -OPC_NOP_zpx = $14 -OPC_SLO_zpx = $17 -;OPC_NOP = $1A -OPC_SLO_aby = $1B -OPC_NOP_abx = $1C -OPC_SLO_abx = $1F - -; OPC_KIL = $22 ; unstable -OPC_RLA_izx = $23 -OPC_RLA_zp = $27 -OPC_ANC_imm = $2B -OPC_RLA_abs = $2F - -; OPC_KIL = $32 ; unstable -OPC_RLA_izy = $33 -OPC_NOP_zpx = $34 -OPC_RLA_zpx = $37 -; OPC_NOP = $3A ; doublet -OPC_RLA_aby = $3B -OPC_NOP_abx = $3C -OPC_RLA_abx = $3F - -; OPC_KIL = $42 ; unstable -OPC_SRE_izx = $43 -OPC_NOP_zp = $44 -OPC_SRE_zp = $47 -OPC_ALR_imm = $4B -OPC_SRE_abs = $4F - -; OPC_KIL = $52 ; unstable -OPC_SRE_izy = $53 -OPC_NOP_zpx = $54 -OPC_SRE_zpx = $57 -; OPC_NOP = $5A ; doublet -OPC_SRE_aby = $5B -OPC_NOP_abx = $5C -OPC_SRE_abx = $5F - -; OPC_KIL = $62 -OPC_RRA_izx = $63 -OPC_NOP_zp = $64 -OPC_RRA_zp = $67 -OPC_ARR_imm = $6B -OPC_RRA_abs = $6F - -; OPC_KIL = $72 -OPC_RRA_izy = $73 -OPC_NOP_zpx = $74 -OPC_RRA_zpx = $77 -; OPC_NOP = $7A ; doublet -OPC_RRA_aby = $7B -OPC_NOP_abx = $7C -OPC_RRA_abx = $7F - -OPC_NOP_imm = $80 -; OPC_NOP_imm = $82 ; doublet -OPC_SAX_izx = $83 -OPC_SAX_zp = $87 -; OPC_NOP_imm = $89 ; doublet -; OPC_XAA = $8B ; unstable -OPC_SAX_abs = $8F - -; OPC_KIL = $92 ; unstable -; OPC_AHX_izy = $93 ; unstable -OPC_SAX_zpy = $97 -; OPC_TAS_aby = $9B ; unstable -; OPC_SHY_abx = $9C ; unstable -; OPC_SHX_aby = $9E ; unstable -; OPC_AHX_aby = $9F ; unstable - -OPC_LAX_izx = $A3 -OPC_LAX_zp = $A7 -; OPC_LAX_imm = $AB ; unstable -OPC_LAX_abs = $AF - -; OPC_KIL = $B2 ; unstable -OPC_LAX_izy = $B3 -OPC_LAX_zpy = $B7 -OPC_LAS_aby = $BB -OPC_LAX_aby = $BF - -; OPC_NOP_imm = $C2 ; doublet -OPC_DCP_izx = $C3 -OPC_DCP_zp = $C7 -OPC_AXS_imm = $CB -OPC_DCP_abs = $CF - -; OPC_KIL = $D2 ; unstable -OPC_DCP_izy = $D3 -OPC_NOP_zpx = $D4 -OPC_DCP_zpx = $D7 -OPC_NOP_DA = $DA -OPC_DCP_aby = $DB -OPC_NOP_abx = $DC -OPC_DCP_abx = $DF - -; OPC_NOP_imm = $E2 ; doublet -OPC_ISC_izx = $E3 -OPC_ISC_zp = $E7 -; OPC_SBC_imm = $EB ; doublet -OPC_ISC_abs = $EF - -; OPC_KIL = $F2 ; unstable -OPC_ISC_izy = $F3 -OPC_NOP_zpx = $F4 -OPC_ISC_zpx = $F7 -OPC_NOP_FA = $FA -OPC_ISC_aby = $FB -OPC_NOP_abx = $FC -OPC_ISC_abx = $FF - -.endif +; opcodes.inc +; ca65 6502 - opcode definitions, mainly for self modifying code +; +; Christian Krger, latest change: 18-Sep-2010 +; +; This software is provided 'as-is', without any expressed or implied +; warranty. In no event will the authors be held liable for any damages +; arising from the use of this software. +; +; Permission is granted to anyone to use this software for any purpose, +; including commercial applications, and to alter it and redistribute it +; freely, subject to the following restrictions: +; +; 1. The origin of this software must not be misrepresented; you must not +; claim that you wrote the original software. If you use this software +; in a product, an acknowledgment in the product documentation would be +; appreciated but is not required. +; 2. Altered source versions must be plainly marked as such, and must not +; be misrepresented as being the original software. +; 3. This notice may not be removed or altered from any source +; distribution. +; + +; Opcode-Table +; ------------ +; Post fix explanation: +; imm = #$00 +; zp = $00 +; zpx = $00,X +; zpy = $00,Y +; izp = ($00) +; izx = ($00,X) +; izy = ($00),Y +; abs = $0000 +; abx = $0000,X +; aby = $0000,Y +; ind = ($0000) +; iax = ($0000,X) +; rel = $0000 (PC-relative) (supressed here) + +.macpack cpu + +OPC_BRK = $00 +OPC_ORA_izx = $01 +OPC_ORA_zp = $05 +OPC_ASL_zp = $06 +OPC_PHP = $08 +OPC_ORA_imm = $09 +OPC_ASL = $0A +OPC_ORA_abs = $0D +OPC_ASL_abs = $0E + +OPC_BPL = $10 +OPC_ORA_izy = $11 +OPC_ORA_zpx = $15 +OPC_ASL_zpx = $16 +OPC_CLC = $18 +OPC_ORA_aby = $19 +OPC_ORA_abx = $1D +OPC_ASL_abx = $1E + +OPC_JSR_abs = $20 +OPC_AND_izx = $21 +OPC_BIT_zp = $24 +OPC_AND_zp = $25 +OPC_ROL_zp = $26 +OPC_PLP = $28 +OPC_AND_imm = $29 +OPC_ROL = $2A +OPC_BIT_abs = $2C +OPC_AND_abs = $2D +OPC_ROL_abs = $2E + +OPC_BMI = $30 +OPC_AND_izy = $31 +OPC_AND_zpx = $35 +OPC_ROL_zpx = $36 +OPC_SEC = $38 +OPC_AND_aby = $39 +OPC_AND_abx = $3D +OPC_ROL_abx = $3E + + +OPC_RTI = $40 +OPC_EOR_izx = $41 +OPC_EOR_zp = $45 +OPC_LSR_zp = $46 +OPC_PHA = $48 +OPC_EOR_imm = $49 +OPC_LSR = $4A +OPC_JMP_abs = $4C +OPC_EOR_abs = $4D +OPC_LSR_abs = $4E + +OPC_BVC = $50 +OPC_EOR_izy = $51 +OPC_EOR_zpx = $55 +OPC_LSR_zpx = $56 +OPC_CLI = $58 +OPC_EOR_aby = $59 +OPC_EOR_abx = $5D +OPC_LSR_abx = $5E + +OPC_RTS = $60 +OPC_ADC_izx = $61 +OPC_ADC_zp = $65 +OPC_ROR_zp = $66 +OPC_PLA = $68 +OPC_ADC_imm = $69 +OPC_ROR = $6A +OPC_JMP_ind = $6C +OPC_ADC_abs = $6D +OPC_ROR_abs = $6E + +OPC_BVS = $70 +OPC_ADC_izy = $71 +OPC_ADC_zpx = $75 +OPC_ROR_zpx = $76 +OPC_SEI = $78 +OPC_ADC_aby = $79 +OPC_ADC_abx = $7D +OPC_ROR_abx = $7E + +OPC_STA_izx = $81 +OPC_STY_zp = $84 +OPC_STA_zp = $85 +OPC_STX_zp = $86 +OPC_DEY = $88 +OPC_TXA = $8A +OPC_STY_abs = $8C +OPC_STA_abs = $8D +OPC_STX_abs = $8E + +OPC_BCC = $90 +OPC_STA_izy = $91 +OPC_STY_zpx = $94 +OPC_STA_zpx = $95 +OPC_STX_zpy = $96 +OPC_TYA = $98 +OPC_STA_aby = $99 +OPC_TXS = $9A +OPC_STA_abx = $9D + +OPC_LDY_imm = $A0 +OPC_LDA_izx = $A1 +OPC_LDX_imm = $A2 +OPC_LDY_zp = $A4 +OPC_LDA_zp = $A5 +OPC_LDX_zp = $A6 +OPC_TAY = $A8 +OPC_LDA_imm = $A9 +OPC_TAX = $AA +OPC_LDY_abs = $AC +OPC_LDA_abs = $AD +OPC_LDX_abs = $AE + +OPC_BCS = $B0 +OPC_LDA_izy = $B1 +OPC_LDY_zpx = $B4 +OPC_LDA_zpx = $B5 +OPC_LDX_zpy = $B6 +OPC_CLV = $B8 +OPC_LDA_aby = $B9 +OPC_TSX = $BA +OPC_LDY_abx = $BC +OPC_LDA_abx = $BD +OPC_LDX_aby = $BE + +OPC_CPY_imm = $C0 +OPC_CMP_izx = $C1 +OPC_CPY_zp = $C4 +OPC_CMP_zp = $C5 +OPC_DEC_zp = $C6 +OPC_INY = $C8 +OPC_CMP_imm = $C9 +OPC_DEX = $CA +OPC_CPY_abs = $CC +OPC_CMP_abs = $CD +OPC_DEC_abs = $CE + +OPC_BNE = $D0 +OPC_CMP_izy = $D1 +OPC_CMP_zpx = $D5 +OPC_DEC_zpx = $D6 +OPC_CLD = $D8 +OPC_CMP_aby = $D9 +OPC_CMP_abx = $DD +OPC_DEC_abx = $DE + +OPC_CPX_imm = $E0 +OPC_SBC_izx = $E1 +OPC_CPX_zp = $E4 +OPC_SBC_zp = $E5 +OPC_INC_zp = $E6 +OPC_INX = $E8 +OPC_SBC_imm = $E9 +OPC_NOP = $EA +OPC_CPX_abs = $EC +OPC_SBC_abs = $ED +OPC_INC_abs = $EE + + +OPC_BEQ = $F0 +OPC_SBC_izy = $F1 +OPC_SBC_zpx = $F5 +OPC_INC_zpx = $F6 +OPC_SED = $F8 +OPC_SBC_aby = $F9 +OPC_SBC_abx = $FD +OPC_INC_abx = $FE + + +.if (.cpu .bitand ::CPU_ISET_65SC02) + +; OPC_NOP = $02 ; doublet +; OPC_NOP = $03 ; doublet +OPC_TSB_zp = $04 +; OPC_NOP = $0B ; doublet +OPC_TSB_abs = $0C + +OPC_ORA_izp = $12 +; OPC_NOP = $13 ; doublet +OPC_TRB_zp = $14 +OPC_INC = $1A +; OPC_NOP = $1B ; doublet +OPC_TRB_abs = $1C + +; OPC_NOP = $22 ; doublet +; OPC_NOP = $23 ; doublet +; OPC_NOP = $2B ; doublet + +OPC_AND_izp = $32 +; OPC_NOP = $33 ; doublet +OPC_BIT_zpx = $34 +OPC_DEC = $3A +; OPC_NOP = $3B ; doublet +OPC_BIT_abx = $3C + +; OPC_NOP = $42 ; doublet +; OPC_NOP = $43 ; doublet +; OPC_NOP = $44 ; doublet +; OPC_NOP = $4B ; doublet + +OPC_EOR_izp = $52 +; OPC_NOP = $53 ; doublet +; OPC_NOP = $54 ; doublet +; OPC_NOP = $5A ; doublet +; OPC_NOP = $5B ; doublet + +; OPC_NOP = $62 ; doublet +; OPC_NOP = $63 ; doublet +OPC_STZ_zp = $64 +; OPC_NOP = $6B ; doublet + +OPC_ADC_izp = $72 +; OPC_NOP = $73 ; doublet +OPC_STZ_zpx = $74 +OPC_PLY = $7A +; OPC_NOP = $7B ; doublet +OPC_JMP_iax = $7C + +OPC_BRA = $80 +; OPC_NOP = $82 ; doublet +; OPC_NOP = $83 ; doublet +OPC_BIT_imm = $89 +; OPC_NOP = $8B ; doublet + +OPC_STA_izp = $92 +; OPC_NOP = $93 ; doublet +; OPC_NOP = $9B ; doublet +OPC_STZ_abs = $9C +OPC_STZ_abx = $9E + +; OPC_NOP = $A3 ; doublet +; OPC_NOP = $AB ; doublet + +OPC_LDA_izp = $B2 +; OPC_NOP = $B3 ; doublet +; OPC_NOP = $BB ; doublet + +; OPC_NOP = $C2 ; doublet +; OPC_NOP = $C3 ; doublet +; OPC_NOP = $CB ; doublet + +OPC_CMP_izp = $D2 +; OPC_NOP = $D3 ; doublet +; OPC_NOP = $D4 ; doublet +OPC_PHX = $DA +; OPC_NOP = $DB ; doublet +; OPC_NOP = $DC ; doublet + +; OPC_NOP = $E2 ; doublet +; OPC_NOP = $E3 ; doublet +; OPC_NOP = $EB ; doublet + +OPC_SBC_izp = $F2 +; OPC_NOP = $F3 ; doublet +; OPC_NOP = $F4 ; doublet +OPC_PLX = $FA +; OPC_NOP = $FB ; doublet +; OPC_NOP = $FC ; doublet + + +.if (.cpu .bitand ::CPU_ISET_65C02) + +; bit instructions for 65C02 + +OPC_RMB0 = $07 +OPC_RMB1 = $17 +OPC_RMB2 = $27 +OPC_RMB3 = $37 +OPC_RMB4 = $47 +OPC_RMB5 = $57 +OPC_RMB6 = $67 +OPC_RMB7 = $77 + +OPC_SMB0 = $87 +OPC_SMB1 = $97 +OPC_SMB2 = $A7 +OPC_SMB3 = $B7 +OPC_SMB4 = $C7 +OPC_SMB5 = $D7 +OPC_SMB6 = $E7 +OPC_SMB7 = $F7 + +OPC_BBR0 = $0F +OPC_BBR1 = $1F +OPC_BBR2 = $2F +OPC_BBR3 = $3F +OPC_BBR4 = $4F +OPC_BBR5 = $5F +OPC_BBR6 = $6F +OPC_BBR7 = $7F + +OPC_BBS0 = $8F +OPC_BBS1 = $9F +OPC_BBS2 = $AF +OPC_BBS3 = $BF +OPC_BBS4 = $CF +OPC_BBS5 = $DF +OPC_BBS6 = $EF +OPC_BBS7 = $FF + +.else + +; no bit instructions for 65SC02 + +; OPC_NOP = $07 ; doublet +; OPC_NOP = $17 ; doublet +; OPC_NOP = $27 ; doublet +; OPC_NOP = $37 ; doublet +; OPC_NOP = $47 ; doublet +; OPC_NOP = $57 ; doublet +; OPC_NOP = $67 ; doublet +; OPC_NOP = $77 ; doublet +; OPC_NOP = $87 ; doublet +; OPC_NOP = $97 ; doublet +; OPC_NOP = $A7 ; doublet +; OPC_NOP = $B7 ; doublet +; OPC_NOP = $C7 ; doublet +; OPC_NOP = $D7 ; doublet +; OPC_NOP = $E7 ; doublet +; OPC_NOP = $F7 ; doublet +; OPC_NOP = $0F ; doublet +; OPC_NOP = $1F ; doublet +; OPC_NOP = $2F ; doublet +; OPC_NOP = $3F ; doublet +; OPC_NOP = $4F ; doublet +; OPC_NOP = $5F ; doublet +; OPC_NOP = $6F ; doublet +; OPC_NOP = $7F ; doublet +; OPC_NOP = $8F ; doublet +; OPC_NOP = $9F ; doublet +; OPC_NOP = $AF ; doublet +; OPC_NOP = $BF ; doublet +; OPC_NOP = $CF ; doublet +; OPC_NOP = $DF ; doublet +; OPC_NOP = $EF ; doublet +; OPC_NOP = $FF ; doublet + +.endif + +.elseif (.cpu .bitand ::CPU_ISET_6502X) + +; stable, undocumented opcodes + +; OPC_KIL = $02 ; unstable +OPC_SLO_izx = $03 +OPC_NOP_zp = $04 +OPC_SLO_zp = $07 +OPC_ANC_imm = $0B +OPC_NOP_abs = $0C +OPC_SLO_abs = $0F + +; OPC_KIL = $12 ; unstable +OPC_SLO_izy = $13 +OPC_NOP_zpx = $14 +OPC_SLO_zpx = $17 +;OPC_NOP = $1A +OPC_SLO_aby = $1B +OPC_NOP_abx = $1C +OPC_SLO_abx = $1F + +; OPC_KIL = $22 ; unstable +OPC_RLA_izx = $23 +OPC_RLA_zp = $27 +OPC_ANC_imm = $2B +OPC_RLA_abs = $2F + +; OPC_KIL = $32 ; unstable +OPC_RLA_izy = $33 +OPC_NOP_zpx = $34 +OPC_RLA_zpx = $37 +; OPC_NOP = $3A ; doublet +OPC_RLA_aby = $3B +OPC_NOP_abx = $3C +OPC_RLA_abx = $3F + +; OPC_KIL = $42 ; unstable +OPC_SRE_izx = $43 +OPC_NOP_zp = $44 +OPC_SRE_zp = $47 +OPC_ALR_imm = $4B +OPC_SRE_abs = $4F + +; OPC_KIL = $52 ; unstable +OPC_SRE_izy = $53 +OPC_NOP_zpx = $54 +OPC_SRE_zpx = $57 +; OPC_NOP = $5A ; doublet +OPC_SRE_aby = $5B +OPC_NOP_abx = $5C +OPC_SRE_abx = $5F + +; OPC_KIL = $62 +OPC_RRA_izx = $63 +OPC_NOP_zp = $64 +OPC_RRA_zp = $67 +OPC_ARR_imm = $6B +OPC_RRA_abs = $6F + +; OPC_KIL = $72 +OPC_RRA_izy = $73 +OPC_NOP_zpx = $74 +OPC_RRA_zpx = $77 +; OPC_NOP = $7A ; doublet +OPC_RRA_aby = $7B +OPC_NOP_abx = $7C +OPC_RRA_abx = $7F + +OPC_NOP_imm = $80 +; OPC_NOP_imm = $82 ; doublet +OPC_SAX_izx = $83 +OPC_SAX_zp = $87 +; OPC_NOP_imm = $89 ; doublet +; OPC_XAA = $8B ; unstable +OPC_SAX_abs = $8F + +; OPC_KIL = $92 ; unstable +; OPC_AHX_izy = $93 ; unstable +OPC_SAX_zpy = $97 +; OPC_TAS_aby = $9B ; unstable +; OPC_SHY_abx = $9C ; unstable +; OPC_SHX_aby = $9E ; unstable +; OPC_AHX_aby = $9F ; unstable + +OPC_LAX_izx = $A3 +OPC_LAX_zp = $A7 +; OPC_LAX_imm = $AB ; unstable +OPC_LAX_abs = $AF + +; OPC_KIL = $B2 ; unstable +OPC_LAX_izy = $B3 +OPC_LAX_zpy = $B7 +OPC_LAS_aby = $BB +OPC_LAX_aby = $BF + +; OPC_NOP_imm = $C2 ; doublet +OPC_DCP_izx = $C3 +OPC_DCP_zp = $C7 +OPC_AXS_imm = $CB +OPC_DCP_abs = $CF + +; OPC_KIL = $D2 ; unstable +OPC_DCP_izy = $D3 +OPC_NOP_zpx = $D4 +OPC_DCP_zpx = $D7 +OPC_NOP_DA = $DA +OPC_DCP_aby = $DB +OPC_NOP_abx = $DC +OPC_DCP_abx = $DF + +; OPC_NOP_imm = $E2 ; doublet +OPC_ISC_izx = $E3 +OPC_ISC_zp = $E7 +; OPC_SBC_imm = $EB ; doublet +OPC_ISC_abs = $EF + +; OPC_KIL = $F2 ; unstable +OPC_ISC_izy = $F3 +OPC_NOP_zpx = $F4 +OPC_ISC_zpx = $F7 +OPC_NOP_FA = $FA +OPC_ISC_aby = $FB +OPC_NOP_abx = $FC +OPC_ISC_abx = $FF + +.if (.cpu .bitand ::CPU_ISET_6502DTV) + +OPC_BRA = $12 +OPC_SAC_imm = $32 +OPC_SIR_imm = $42 + +.endif + +.endif diff --git a/asminc/pce.inc b/asminc/pce.inc index 623ab4da8..8d141e899 100644 --- a/asminc/pce.inc +++ b/asminc/pce.inc @@ -1,20 +1,20 @@ ; -; PCE definitions. By Groepaz/Hitmem. +; PCE definitions. By Groepaz/Hitmen. ; -; FIXME: screen dimensions my change according to selected video mode +; FIXME: Screen dimensions can change according to the selected video mode. screenrows = (224/8) charsperline = 61 CH_HLINE = 1 CH_VLINE = 2 -; huc6270 - Video Display Controller (VDC) +; HuC6270 -- Video Display Controller (VDC) VDC_MAWR = 0 ; Memory Address Write Register VDC_MARR = 1 ; Memory Address Read Register -VDC_VWR = 2 ; VRAM Write Register (write only) -VDC_VRR = 2 ; VRAM Read Register (read only) +VDC_VWR = 2 ; VRAM Write Register +VDC_VRR = 2 ; VRAM Read Register VDC_UNK03 = 3 ; (unknown) VDC_UNK04 = 4 ; (unknown) VDC_CR = 5 ; Control Register @@ -24,8 +24,8 @@ VDC_BYR = 8 ; Background Y-Scroll Register VDC_MWR = 9 ; Memory-access Width Register VDC_HSR = 10 ; Horizontal Sync Register VDC_HDR = 11 ; Horizontal Display Register -VDC_VPR = 12 ; Vertical synchronous register -VDC_VDW = 13 ; Vertical display register +VDC_VSR = 12 ; Vertical sync Register +VDC_VDR = 13 ; Vertical Display register VDC_VCR = 14 ; Vertical display END position register VDC_DCR = 15 ; (DMA) Control Register VDC_SOUR = 16 ; (DMA) Source Register @@ -34,58 +34,59 @@ VDC_LENR = 18 ; (DMA) Length Register VDC_SATB = 19 ; Sprite Attribute Table ; VDC port -; Note: absolute addressing mode must be used when writing to this port +; Note: The zero-page addressing mode is redirected to page $20. +; We avoid it by using mirror locations that are outside of the zero page. -VDC_CTRL = $0000 -VDC_DATA_LO = $0002 -VDC_DATA_HI = $0003 +VDC_CTRL := $0200 +VDC_DATA_LO := $0202 +VDC_DATA_HI := $0203 -; huc6260 - Video Color Encoder (vce) +; HuC6260 -- Video Color Encoder (VCE) ; The DAC has a palette of 512 colours. -; bitmap of the palette data is this: 0000000gggrrrbbb. -; You can read and write the DAC-registers. +; The bitmap of that data is 0000000gggrrrbbb (Green, Red, Blue). +; You can read and write the DAC registers. -VCE = $0400 ; base +VCE := $0400 ; base -VCE_CTRL = $0400 ; write$00 to reset -VCE_ADDR_LO = $0402 ; LSB of byte offset into palette -VCE_ADDR_HI = $0403 ; MSB of byte offset into palette -VCE_DATA_LO = $0404 ; LSB of 16-bit palette data -VCE_DATA_HI = $0405 ; MSB of 16-bit palette data +VCE_CTRL := $0400 ; write $00 to reset +VCE_ADDR_LO := $0402 ; LSB of byte offset into palette +VCE_ADDR_HI := $0403 ; MSB of byte offset into palette +VCE_DATA_LO := $0404 ; LSB of 16-bit palette data +VCE_DATA_HI := $0405 ; MSB of 16-bit palette data -; programmable sound generator (PSG) +; Programmable Sound Generator (PSG) -PSG = $0800 ; base +PSG := $0800 ; base -PSG_CHAN_SELECT = $0800 -PSG_GLOBAL_PAN = $0801 -PSG_FREQ_LO = $0802 -PSG_FREQ_HI = $0803 -PSG_CHAN_CTRL = $0804 -PSG_CHAN_PAN = $0805 -PSG_CHAN_DATA = $0806 -PSG_NOISE = $0807 -PSG_LFO_FREQ = $0808 -PSG_LFO_CTRL = $0809 +PSG_CHAN_SELECT := $0800 +PSG_GLOBAL_PAN := $0801 +PSG_FREQ_LO := $0802 +PSG_FREQ_HI := $0803 +PSG_CHAN_CTRL := $0804 +PSG_CHAN_PAN := $0805 +PSG_CHAN_DATA := $0806 +PSG_NOISE := $0807 +PSG_LFO_FREQ := $0808 +PSG_LFO_CTRL := $0809 -; timer +; Timer -TIMER = $0c00 ; base +TIMER := $0C00 ; base -TIMER_COUNT = $0c00 -TIMER_CTRL = $0c01 +TIMER_COUNT := $0C00 +TIMER_CTRL := $0C01 -JOY_CTRL = $1000 +JOY_CTRL := $1000 -IRQ_MASK = $1402 -IRQ_STATUS = $1403 +IRQ_MASK := $1402 +IRQ_STATUS := $1403 -CDR_MEM_DISABLE = $1803 -CDR_MEM_ENABLE = $1807 +CDR_MEM_DISABLE := $1803 +CDR_MEM_ENABLE := $1807 -; Write VDC register -.macro VREG arg1,arg2 +; Write to a VDC register. +.macro VREG arg1, arg2 st0 #arg1 st1 #<(arg2) st2 #>(arg2) diff --git a/asminc/pet.inc b/asminc/pet.inc index a745a89c8..ee96d378c 100644 --- a/asminc/pet.inc +++ b/asminc/pet.inc @@ -26,11 +26,22 @@ SCR_LINELEN := $D5 ; Screen line length CURS_Y := $D8 ; Cursor row FNADR := $DA ; Pointer to file name +; 80-Column CBMs +KBDREPEAT80 := $E4 +KBDRPTRATE80 := $E5 +KBDRPTDELAY80 := $E6 + BASIC_BUF := $200 ; Location of command-line BASIC_BUF_LEN = 81 ; Maximum length of command-line KEY_BUF := $26F ; Keyboard buffer +; 40-Column PETs/CBMs +KBDRPTDELAY40 := $3E9 +KBDRPTRATE40 := $3EA +KBDREPEAT40 := $3EE +KBDREPEAT40B := $3F8 + ;---------------------------------------------------------------------------- ; PET ROM type detection @@ -39,7 +50,6 @@ PET_2000 = $CA PET_3000 = $FC PET_4000 = $FD - ;---------------------------------------------------------------------------- ; Vector and other locations @@ -48,12 +58,42 @@ BRKVec := $0092 NMIVec := $0094 ; --------------------------------------------------------------------------- -; I/O: 6522 VIA2 +; I/O: 6520 PIA1 -VIA := $E840 -VIA_PRB := $E840 -VIA_PRA := $E841 -VIA_DDRB := $E842 -VIA_DDRA := $E843 +PIA1 := $E810 ; PIA1 base address +PIA1_PORTA := PIA1+$0 ; Port A (PA) and data direction register A (DDRA) +PIA1_PACTL := PIA1+$1 ; Port A control register (CRA) +PIA1_PORTB := PIA1+$2 ; Port B (PB) and data direction register B (DDRB) +PIA1_PBCTL := PIA1+$3 ; Port B control register (CRB) +; --------------------------------------------------------------------------- +; I/O: 6520 PIA2 +PIA2 := $E820 ; PIA2 base address +PIA2_PORTA := PIA2+$0 ; Port A (PA) and data direction register A (DDRA) +PIA2_PACTL := PIA2+$1 ; Port A control register (CRA) +PIA2_PORTB := PIA2+$2 ; Port B (PB) and data direction register B (DDRB) +PIA2_PBCTL := PIA2+$3 ; Port B control register (CRB) + +; --------------------------------------------------------------------------- +; I/O: 6522 VIA + +VIA := $E840 ; VIA base address +VIA_PB := VIA+$0 ; Port register B +VIA_PA1 := VIA+$1 ; Port register A +VIA_PRB := VIA+$0 ; *** Deprecated *** +VIA_PRA := VIA+$1 ; *** Deprecated *** +VIA_DDRB := VIA+$2 ; Data direction register B +VIA_DDRA := VIA+$3 ; Data direction register A +VIA_T1CL := VIA+$4 ; Timer 1, low byte +VIA_T1CH := VIA+$5 ; Timer 1, high byte +VIA_T1LL := VIA+$6 ; Timer 1 latch, low byte +VIA_T1LH := VIA+$7 ; Timer 1 latch, high byte +VIA_T2CL := VIA+$8 ; Timer 2, low byte +VIA_T2CH := VIA+$9 ; Timer 2, high byte +VIA_SR := VIA+$A ; Shift register +VIA_CR := VIA+$B ; Auxiliary control register +VIA_PCR := VIA+$C ; Peripheral control register +VIA_IFR := VIA+$D ; Interrupt flag register +VIA_IER := VIA+$E ; Interrupt enable register +VIA_PA2 := VIA+$F ; Port register A w/o handshake diff --git a/asminc/plus4.inc b/asminc/plus4.inc index 69b2298a3..6c6017a78 100644 --- a/asminc/plus4.inc +++ b/asminc/plus4.inc @@ -10,6 +10,7 @@ TMPPTR := $22 ; Temporary ptr used by BASIC VARTAB := $2D ; Pointer to start of BASIC variables MEMSIZE := $37 ; Pointer to highest BASIC RAM location (+1) TXTPTR := $3B ; Pointer into BASIC source code +STATUS := $90 ; Kernal I/O completion status TIME := $A3 ; 60HZ clock FNAM_LEN := $AB ; Length of filename LFN := $AC ; Logical file number @@ -33,12 +34,9 @@ FKEY_COUNT := $55D ; Characters for function key FKEY_SPACE := $55F ; Function key definitions FKEY_ORIG := $F3D2 ; Original definitions -; --------------------------------------------------------------------------- -; Kernal routines - -; Direct entries -CLRSCR := $D88B -KBDREAD := $D8C1 +KBDREPEAT := $540 +KBDREPEATRATE := $541 +KBDREPEATDELAY := $542 ; --------------------------------------------------------------------------- ; Vector and other locations @@ -69,6 +67,7 @@ TED_CURSLO := $FF0D TED_V1FRQLO := $FF0E TED_V2FRQLO := $FF0F TED_V2FRQHI := $FF10 +TED_CLK := $FF13 TED_BGCOLOR := $FF15 TED_COLOR1 := $FF16 TED_COLOR2 := $FF17 @@ -85,5 +84,3 @@ TED_RAMSEL := $FF3F ENABLE_ROM := TED_ROMSEL ENABLE_RAM := TED_RAMSEL - - diff --git a/asminc/ser-kernel.inc b/asminc/ser-kernel.inc index 3ddb7f300..79ace64e9 100644 --- a/asminc/ser-kernel.inc +++ b/asminc/ser-kernel.inc @@ -7,7 +7,7 @@ ;* * ;* * ;*(C) 2003-2006, Ullrich von Bassewitz * -;* Rmerstrasse 52 * +;* Roemerstrasse 52 * ;* D-70794 Filderstadt * ;*EMail: uz@cc65.org * ;* * @@ -41,15 +41,15 @@ VERSION .byte 1 ; Interface version LIBREF .addr ; Library reference JUMPTAB .struct - INSTALL .addr ; INSTALL routine - UNINSTALL .addr ; UNINSTALL routine - OPEN .addr ; OPEN routine - CLOSE .addr ; CLOSE routine - GET .addr ; GET routine - PUT .addr ; PUT routine - STATUS .addr ; STATUS routine - IOCTL .addr ; IOCTL routine - IRQ .addr ; IRQ routine + SER_INSTALL .addr ; SER_INSTALL routine + SER_UNINSTALL .addr ; SER_UNINSTALL routine + SER_OPEN .addr ; SER_OPEN routine + SER_CLOSE .addr ; SER_CLOSE routine + SER_GET .addr ; SER_GET routine + SER_PUT .addr ; SER_PUT routine + SER_STATUS .addr ; SER_STATUS routine + SER_IOCTL .addr ; SER_IOCTL routine + SER_IRQ .addr ; SER_IRQ routine .endstruct .endstruct @@ -160,4 +160,3 @@ SER_STATUS_DSR = $40 ; NOT data set ready .global _ser_ioctl .global _ser_clear_ptr - diff --git a/asminc/smc.inc b/asminc/smc.inc index 383417c3d..137c2d49a 100644 --- a/asminc/smc.inc +++ b/asminc/smc.inc @@ -1,245 +1,267 @@ -; smc.mac -; ca65 Macro-Pack for Self Modifying Code (SMC) -; -; (c) Christian Krger, latest change: 09-Nov-2011 -; -; This software is provided 'as-is', without any expressed or implied -; warranty. In no event will the authors be held liable for any damages -; arising from the use of this software. -; -; Permission is granted to anyone to use this software for any purpose, -; including commercial applications, and to alter it and redistribute it -; freely, subject to the following restrictions: -; -; 1. The origin of this software must not be misrepresented; you must not -; claim that you wrote the original software. If you use this software -; in a product, an acknowledgment in the product documentation would be -; appreciated but is not required. -; 2. Altered source versions must be plainly marked as such, and must not -; be misrepresented as being the original software. -; 3. This notice may not be removed or altered from any source -; distribution. -; - -.define _SMCDesignator .mid(0, .tcount(label) - 1, label) .ident(.concat(.string(.right(1, label)), "_SMC")) -.define _SMCAlias .mid(0, .tcount(alias) - 1, alias) .ident(.concat(.string(.right(1, alias)), "_SMC")) -.define SMC_AbsAdr $FADE -.define SMC_ZpAdr $00 -.define SMC_Opcode nop -.define SMC_Value $42 - -.macro SMC_OperateOnValue opcode, label - opcode _SMCDesignator+1 -.endmacro - -.macro SMC_OperateOnLowByte opcode, label - SMC_OperateOnValue opcode, label -.endmacro - -.macro SMC_OperateOnHighByte opcode, label - opcode _SMCDesignator + 2 -.endmacro - -.macro SMC_Import alias -.import _SMCAlias -.endmacro - -.macro SMC_Export alias, label -.export _SMCAlias := _SMCDesignator -.endmacro - -.macro SMC label, statement -_SMCDesignator: statement -.endmacro - -.macro SMC_TransferOpcode label, opcode, register -.if .paramcount = 2 .or .match ({register}, a) - lda #opcode - sta _SMCDesignator -.elseif .match ({register}, x) - ldx #opcode - stx _SMCDesignator -.elseif .match ({register}, y) - ldy #opcode - sty _SMCDesignator -.endif -.endmacro - -.macro SMC_LoadOpcode label, register -.if .paramcount = 1 .or .match ({register}, a) - lda _SMCDesignator -.elseif .match ({register}, x) - ldx _SMCDesignator -.elseif .match ({register}, y) - ldy _SMCDesignator -.endif -.endmacro - -.macro SMC_StoreOpcode label, register -.if .paramcount = 1 .or .match ({register}, a) - sta _SMCDesignator -.elseif .match ({register}, x) - stx _SMCDesignator -.elseif .match ({register}, y) - sty _SMCDesignator -.endif -.endmacro - -.macro SMC_ChangeBranch label, destination, register -.if .paramcount = 2 .or .match ({register}, a) - lda #(destination - _SMCDesignator -2) - sta _SMCDesignator+1 -.elseif .match ({register}, x) - ldx #(destination - _SMCDesignator - 2) - stx _SMCDesignator+1 -.elseif .match ({register}, y) - ldy #(destination - _SMCDesignator - 2) - sty _SMCDesignator+1 -.endif -.endmacro - -.macro SMC_TransferValue label, value, register -.if .paramcount = 2 .or .match ({register}, a) - lda value - sta _SMCDesignator+1 -.elseif .match ({register}, x) - ldx value - stx _SMCDesignator+1 -.elseif .match ({register}, y) - ldy value - sty _SMCDesignator+1 -.endif -.endmacro - -.macro SMC_LoadValue label, register -.if .paramcount = 1 .or .match ({register}, a) - lda _SMCDesignator+1 -.elseif .match ({register}, x) - ldx _SMCDesignator+1 -.elseif .match ({register}, y) - ldy _SMCDesignator+1 -.endif -.endmacro - -.macro SMC_StoreValue label, register -.if .paramcount = 1 .or .match ({register}, a) - sta _SMCDesignator+1 -.elseif .match ({register}, x) - stx _SMCDesignator+1 -.elseif .match ({register}, y) - sty _SMCDesignator+1 -.endif -.endmacro - - -.macro SMC_TransferLowByte label, value, register -SMC_TransferValue label, value, register -.endmacro - -.macro SMC_LoadLowByte label, register -SMC_LoadValue label, register -.endmacro - -.macro SMC_StoreLowByte label, register -SMC_StoreValue label, register -.endmacro - -.macro SMC_TransferHighByte label, value, register -.if .paramcount = 2 .or .match ({register}, a) - lda value - sta _SMCDesignator+2 -.elseif .match ({register}, x) - ldx value - stx _SMCDesignator+2 -.elseif .match ({register}, y) - ldy value - sty _SMCDesignator+2 -.endif -.endmacro - -.macro SMC_LoadHighByte label, register -.if .paramcount = 1 .or .match ({register}, a) - lda _SMCDesignator+2 -.elseif .match ({register}, x) - ldx _SMCDesignator+2 -.elseif .match ({register}, y) - ldy _SMCDesignator+2 -.endif -.endmacro - -.macro SMC_StoreHighByte label, register -.if .paramcount = 1 .or .match ({register}, a) - sta _SMCDesignator+2 -.elseif .match ({register}, x) - stx _SMCDesignator+2 -.elseif .match ({register}, y) - sty _SMCDesignator+2 -.endif -.endmacro - -.macro SMC_TransferAddressSingle label, address, register -.if .paramcount = 2 .or .match ((register), a) - .if (.match (.left (1, {address}), #)) - ; immediate mode - lda #<(.right (.tcount ({address})-1, {address})) - sta _SMCDesignator+1 - lda #>(.right (.tcount ({address})-1, {address})) - sta _SMCDesignator+2 - .else - ; assume absolute or zero page - lda address - sta _SMCDesignator+1 - lda 1+(address) - sta _SMCDesignator+2 - .endif -.elseif .match ((register), x) - .if (.match (.left (1, {address}), #)) - ; immediate mode - ldx #<(.right (.tcount ({address})-1, {address})) - stx _SMCDesignator+1 - ldx #>(.right (.tcount ({address})-1, {address})) - stx _SMCDesignator+2 - .else - ; assume absolute or zero page - ldx address - stx _SMCDesignator+1 - ldx 1+(address) - stx _SMCDesignator+2 - .endif -.elseif .match ((register), y) - .if (.match (.left (1, {address}), #)) - ; immediate mode - ldy #<(.right (.tcount ({address})-1, {address})) - sty _SMCDesignator+1 - ldy #>(.right (.tcount ({address})-1, {address})) - sty _SMCDesignator+2 - .else - ; assume absolute or zero page - ldy address - sty _SMCDesignator+1 - ldy 1+(address) - sty _SMCDesignator+2 - .endif -.endif -.endmacro - -.macro SMC_TransferAddress label, address -.if (.match (.left (1, {address}), #)) - ; immediate mode - lda #<(.right (.tcount ({address})-1, {address})) - sta _SMCDesignator+1 - ldx #>(.right (.tcount ({address})-1, {address})) - stx _SMCDesignator+2 -.else - ; assume absolute or zero page - lda {address} - sta _SMCDesignator+1 - ldx 1+{address} - stx _SMCDesignator)+2 -.endif -.endmacro - -.macro SMC_StoreAddress label - sta _SMCDesignator+1 - stx _SMCDesignator+2 -.endmacro +; smc.mac +; ca65 Macro-Pack for Self Modifying Code (SMC) +; +; (c) Christian Krüger, latest change: 17-Jul-2016 +; +; This software is provided 'as-is', without any expressed or implied +; warranty. In no event will the authors be held liable for any damages +; arising from the use of this software. +; +; Permission is granted to anyone to use this software for any purpose, +; including commercial applications, and to alter it and redistribute it +; freely, subject to the following restrictions: +; +; 1. The origin of this software must not be misrepresented; you must not +; claim that you wrote the original software. If you use this software +; in a product, an acknowledgment in the product documentation would be +; appreciated but is not required. +; 2. Altered source versions must be plainly marked as such, and must not +; be misrepresented as being the original software. +; 3. This notice may not be removed or altered from any source +; distribution. +; + +.define _SMCDesignator .mid(0, .tcount(label) - 1, label) .ident(.concat(.string(.right(1, label)), "_SMC")) +.define _SMCAlias .mid(0, .tcount(alias) - 1, alias) .ident(.concat(.string(.right(1, alias)), "_SMC")) +.define SMC_AbsAdr $FADE +.define SMC_ZpAdr $00 +.define SMC_Opcode nop +.define SMC_Value $42 + +.macro SMC_OperateOnValue opcode, label + opcode _SMCDesignator+1 +.endmacro + +.macro SMC_OperateOnLowByte opcode, label + SMC_OperateOnValue opcode, label +.endmacro + +.macro SMC_OperateOnHighByte opcode, label + opcode _SMCDesignator + 2 +.endmacro + +.macro SMC_Import alias +.import _SMCAlias +.endmacro + +.macro SMC_Export alias, label +.export _SMCAlias := _SMCDesignator +.endmacro + +.macro SMC label, statement +_SMCDesignator: statement +.endmacro + +.macro SMC_TransferOpcode label, opcode, register +.if .paramcount = 2 .or .match ({register}, a) .or .match ({register}, ) + lda #opcode + sta _SMCDesignator +.elseif .match ({register}, x) + ldx #opcode + stx _SMCDesignator +.elseif .match ({register}, y) + ldy #opcode + sty _SMCDesignator +.else + .error "Invalid usage of macro 'SMC_TransferOpcode'" +.endif +.endmacro + +.macro SMC_LoadOpcode label, register +.if .paramcount = 1 .or .match ({register}, a) .or .match ({register}, ) + lda _SMCDesignator +.elseif .match ({register}, x) + ldx _SMCDesignator +.elseif .match ({register}, y) + ldy _SMCDesignator +.else + .error "Invalid usage of macro 'SMC_LoadOpcode'" +.endif +.endmacro + +.macro SMC_StoreOpcode label, register +.if .paramcount = 1 .or .match ({register}, a) .or .match ({register}, ) + sta _SMCDesignator +.elseif .match ({register}, x) + stx _SMCDesignator +.elseif .match ({register}, y) + sty _SMCDesignator +.else + .error "Invalid usage of macro 'SMC_StoreOpcode'" +.endif +.endmacro + +.macro SMC_ChangeBranch label, destination, register +.if .paramcount = 2 .or .match ({register}, a) .or .match ({register}, ) + lda #(<(destination - _SMCDesignator -2)) + sta _SMCDesignator+1 +.elseif .match ({register}, x) + ldx #(<(destination - _SMCDesignator - 2)) + stx _SMCDesignator+1 +.elseif .match ({register}, y) + ldy #(<(destination - _SMCDesignator - 2)) + sty _SMCDesignator+1 +.else + .error "Invalid usage of macro 'SMC_ChangeBranch'" +.endif +.endmacro + +.macro SMC_TransferValue label, value, register +.if .paramcount = 2 .or .match ({register}, a) .or .match ({register}, ) + lda value + sta _SMCDesignator+1 +.elseif .match ({register}, x) + ldx value + stx _SMCDesignator+1 +.elseif .match ({register}, y) + ldy value + sty _SMCDesignator+1 +.else + .error "Invalid usage of macro 'SMC_TransferValue'" +.endif +.endmacro + +.macro SMC_LoadValue label, register +.if .paramcount = 1 .or .match ({register}, a) .or .match ({register}, ) + lda _SMCDesignator+1 +.elseif .match ({register}, x) + ldx _SMCDesignator+1 +.elseif .match ({register}, y) + ldy _SMCDesignator+1 +.else + .error "Invalid usage of macro 'SMC_LoadValue'" +.endif +.endmacro + +.macro SMC_StoreValue label, register +.if .paramcount = 1 .or .match ({register}, a) .or .match ({register}, ) + sta _SMCDesignator+1 +.elseif .match ({register}, x) + stx _SMCDesignator+1 +.elseif .match ({register}, y) + sty _SMCDesignator+1 +.else + .error "Invalid usage of macro 'SMC_StoreValue'" +.endif +.endmacro + + +.macro SMC_TransferLowByte label, value, register +SMC_TransferValue label, value, register +.endmacro + +.macro SMC_LoadLowByte label, register +SMC_LoadValue label, register +.endmacro + +.macro SMC_StoreLowByte label, register +SMC_StoreValue label, register +.endmacro + +.macro SMC_TransferHighByte label, value, register +.if .paramcount = 2 .or .match ({register}, a) .or .match ({register}, ) + lda value + sta _SMCDesignator+2 +.elseif .match ({register}, x) + ldx value + stx _SMCDesignator+2 +.elseif .match ({register}, y) + ldy value + sty _SMCDesignator+2 +.else + .error "Invalid usage of macro 'SMC_TransferHighByte'" +.endif +.endmacro + +.macro SMC_LoadHighByte label, register +.if .paramcount = 1 .or .match ({register}, a) .or .match ({register}, ) + lda _SMCDesignator+2 +.elseif .match ({register}, x) + ldx _SMCDesignator+2 +.elseif .match ({register}, y) + ldy _SMCDesignator+2 +.else + .error "Invalid usage of macro 'SMC_LoadHighByte'" +.endif +.endmacro + +.macro SMC_StoreHighByte label, register +.if .paramcount = 1 .or .match ({register}, a) .or .match ({register}, ) + sta _SMCDesignator+2 +.elseif .match ({register}, x) + stx _SMCDesignator+2 +.elseif .match ({register}, y) + sty _SMCDesignator+2 +.else + .error "Invalid usage of macro 'SMC_StoreHighByte'" +.endif +.endmacro + +.macro SMC_TransferAddressSingle label, address, register +.if .paramcount = 2 .or .match ((register), a) .or .match ({register}, ) + .if (.match (.left (1, {address}), #)) + ; immediate mode + lda #<(.right (.tcount ({address})-1, {address})) + sta _SMCDesignator+1 + lda #>(.right (.tcount ({address})-1, {address})) + sta _SMCDesignator+2 + .else + ; assume absolute or zero page + lda address + sta _SMCDesignator+1 + lda 1+(address) + sta _SMCDesignator+2 + .endif +.elseif .match ((register), x) + .if (.match (.left (1, {address}), #)) + ; immediate mode + ldx #<(.right (.tcount ({address})-1, {address})) + stx _SMCDesignator+1 + ldx #>(.right (.tcount ({address})-1, {address})) + stx _SMCDesignator+2 + .else + ; assume absolute or zero page + ldx address + stx _SMCDesignator+1 + ldx 1+(address) + stx _SMCDesignator+2 + .endif +.elseif .match ((register), y) + .if (.match (.left (1, {address}), #)) + ; immediate mode + ldy #<(.right (.tcount ({address})-1, {address})) + sty _SMCDesignator+1 + ldy #>(.right (.tcount ({address})-1, {address})) + sty _SMCDesignator+2 + .else + ; assume absolute or zero page + ldy address + sty _SMCDesignator+1 + ldy 1+(address) + sty _SMCDesignator+2 + .endif +.else + .error "Invalid usage of macro 'SMC_TransferAddressSingle'" +.endif +.endmacro + +.macro SMC_TransferAddress label, address +.if (.match (.left (1, {address}), #)) + ; immediate mode + lda #<(.right (.tcount ({address})-1, {address})) + sta _SMCDesignator+1 + ldx #>(.right (.tcount ({address})-1, {address})) + stx _SMCDesignator+2 +.else + ; assume absolute or zero page + lda {address} + sta _SMCDesignator+1 + ldx 1+{address} + stx _SMCDesignator)+2 +.endif +.endmacro + +.macro SMC_StoreAddress label + sta _SMCDesignator+1 + stx _SMCDesignator+2 +.endmacro diff --git a/asminc/stdio.inc b/asminc/stdio.inc index 18a7541e0..426389de3 100644 --- a/asminc/stdio.inc +++ b/asminc/stdio.inc @@ -7,7 +7,7 @@ ;* */ ;* */ ;* (C) 2003-2005, Ullrich von Bassewitz */ -;* Rmerstrasse 52 */ +;* Roemerstrasse 52 */ ;* D-70794 Filderstadt */ ;* EMail: uz@cc65.org */ ;* */ @@ -44,9 +44,13 @@ EOF = -1 .if .defined(__APPLE2__) FILENAME_MAX = 64+1 .elseif .defined(__ATARI__) -FILENAME_MAX = 12+1 +FILENAME_MAX = 63+1 +.elseif .defined(__CBM__) +FILENAME_MAX = 255 .elseif .defined(__LUNIX__) FILENAME_MAX = 80+1 +.elseif .defined(__TELESTRAT__) +FILENAME_MAX = 50+1 .else FILENAME_MAX = 16+1 .endif diff --git a/asminc/supervision.inc b/asminc/supervision.inc index a75fb02f6..a1cc212f6 100644 --- a/asminc/supervision.inc +++ b/asminc/supervision.inc @@ -1,8 +1,7 @@ ; supervision symbols -; supervision 65c02s -; in cc65 up to 2.9.1 65c02 means 65c02s -.pc02 +; supervision 65c02s +; in cc65 up to 2.9.1 65c02 means 65sc02 lcd_addr = $4000 LCD_LINESIZE = $30 diff --git a/asminc/sym1.inc b/asminc/sym1.inc new file mode 100644 index 000000000..b6a6f17fe --- /dev/null +++ b/asminc/sym1.inc @@ -0,0 +1,186 @@ +; --------------------------------------------------------------------------- +; +; SYM-1 definitions +; +; --------------------------------------------------------------------------- + + +RAMSTART := $0200 ; Entry point + + +; --------------------------------------------------------------------------- +; Monitor Functions +; --------------------------------------------------------------------------- +WARM := $8003 ; Monitor entry +SVNMI := $809B ; Save NMI entry +INBYTE := $81D9 ; Get two HEX characters and pack +ASCNIB := $8275 ; Test for carriage-return +INCCMP := $82B2 ; Increment pointer +CHKSAD := $82DD ; Compute checksum +OUTPC := $82EE ; Display program counter +OUTBYT := $82FA ; Print byte as two ASCII characters +OUTS2 := $8319 ; Print pointer +INSTAT := $8386 ; Determine if key is pressed +GETKEY := $88AF ; Get key (disregarding monitor login) +SCAND := $8906 ; Flash LED display (once) +KEYQ := $8923 ; Test for keypress +BEEP := $8972 ; Make a beep +CONFIG := $89A5 ; Configure I/O +OUTDSP := $89C1 ; Output to on-board LED display +INCHR := $8A1B ; Input character and convert to uppercase +OUTCHR := $8A47 ; Output character +INTCHR := $8A58 ; Input character without case conversion +DLYF := $8AE6 ; Delay 1 bit time +DLYH := $8AE9 ; Delay 1/2 bit time +RESET := $8B4A ; Hard reset +ACCESS := $8B86 ; Unlock lowest 4K memory +NACCES := $8B9C ; Lock lowest 4K memory +L8C78 := $8C78 ; Link to tape +DUMPT := $8E87 ; Dump memory to tape +LOADT := $8C78 ; Load memory from tape +TAPEMODE := $00FD ; Top bit on for high-speed + + +; --------------------------------------------------------------------------- +; System Memory +; --------------------------------------------------------------------------- +DISBUF := $A640 ; On-Board Display Buffer +DISBUF0 := $A640 ; Left-Most digit +DISBUF1 := $A641 ; Second digit +DISBUF2 := $A642 ; Third +DISBUF3 := $A643 ; Fourth +DISBUF4 := $A644 ; Fifth +DISBUF5 := $A645 ; Sixth and right-most digit +DISBUF6 := $A646 ; Not-used / right of display (shift buffer) +RDIG := $A645 ; Right-most digit (same as DISBUF5) +P3L := $A64A ; Parameter 3 (low-byte) +P3H := $A64B ; (high-byte) +P2L := $A64C ; Parameter 2 +P2H := $A64D ; +P1L := $A64E ; Parameter 1 +P1H := $A64F +PARNR := $A649 ; Number of Parameters Entered +PADBIT := $A650 ; Pad Bits for Carriage Return +SDBYT := $A651 ; Baud Rate for RS232 (01-4800,06-2400,10-1200,24-600,4C-300,D5-110) +ERCNT := $A652 ; Error Count (Max FF) +TECHO := $A653 ; Terminal Echo (bit-7=ECHO/NO, 6=CTL-O TOGGLE) +TOUTFL := $A654 ; Output Flags (bit-7=CRT IN, 6=TTY IN, 5=TTY OUT, 4=CRT OUT) +KSHFL := $A655 ; Keyboard Shift Flag +TV := $A656 ; Trace Velocity (0=Single Step) +LSTCOM := $A657 ; Last Monitor Command +MAXRC := $A658 ; Maximum Record Length for Memory Dump + + +; --------------------------------------------------------------------------- +; Register Followers +; --------------------------------------------------------------------------- +PCLR := $A659 ; Program Counter (low-byte) +PCHR := $A65A ; (high-byte) +SR := $A65B ; Stack Pointer +FR := $A65C ; Status Register Flags +AR := $A65D ; A Register +XR := $A65E ; X Register +YR := $A65F ; Y Register + + +; --------------------------------------------------------------------------- +; I/O Vectors (3 bytes each) +; --------------------------------------------------------------------------- +INVEC := $A660 ; Input Character +OUTVEC := $A663 ; Output Character +INSVEC := $A666 ; Input Status +URSVEC := $A669 ; Unrecognized Syntax +URCVEC := $A66C ; Unrecognized Command / Error +SCNVEC := $A66F ; Scan On-board Display + + +; --------------------------------------------------------------------------- +; Trace and Interrupt Vectors (2 bytes each) +; --------------------------------------------------------------------------- +EXEVEC := $A672 ; Exec and Alternate InVec +TRCVEC := $A674 ; Trace +UBRKVC := $A676 ; User Break after Monitor +UIRQVC := $A678 ; User non-break IRQ after Monitor +NMIVEC := $A67A ; Non-Maskable Interrupt +RSTVEC := $A67C ; Reset +IRQVEC := $A67E ; Interrupt Request + + +; --------------------------------------------------------------------------- +; I/O Registers +; --------------------------------------------------------------------------- +; +; 6532 (U27) +; +PADA := $A400 ; Keyboard / Display +P3DA := $A402 ; Serial I/O +DDPADA := $A401 ; Data-Direction Register for PADA +DDP3DA := $A403 ; Data-Direction Register for P3DA +WEDRTA := $A404 ; Write-Edge Detect Read Timer A +WEDRFA := $A405 ; Write-Edge Detect Read-Int Flags A +WEDRTB := $A406 ; Write-Edge Detect Read Timer B +WEDRFB := $A407 ; Write-Edge Detect Read-Int Flags B +TIM0001 := $A41C ; Timer / 1 +TIM0008 := $A41D ; Timer / 8 +TIM0064 := $A41E ; Timer / 64 +TIM1024 := $A41F ; Timer / 1024 +; +; 6522 (U25) +; +OR1A := $A001 ; Input / Output Register for 1A +DDR1A := $A003 ; Data-Direction Register for 1A +OR1B := $A000 ; Input / Output Register for 1B +DDR1B := $A002 ; Data-Direction Register for 1B +TIC1L := $A004 ; +TIC1H := $A005 ; +TIL1L := $A006 ; +TIL1H := $A007 ; +T2L1L := $A008 ; +T2C1L := $A008 ; +T2C1H := $A009 ; +SR1 := $A00A ; +ACR1 := $A00B ; +PCR1 := $A00C ; +IFR1 := $A00D ; +IER1 := $A00E ; +DR1A := $A00F ; +; +; 6522 (U28) +; +OR2A := $A801 ; Input / Output Register for 2A +DDR2A := $A803 ; Data-Direction Register for 2A +OR2B := $A800 ; Input / Output Register for 2B +DDR2B := $A802 ; Data-Direction Register for 2B +TIC2L := $A804 ; +TIC2H := $A805 ; +TIL2L := $A806 ; +TIL2H := $A807 ; +T2L2L := $A808 ; +T2C2L := $A808 ; +T2C2H := $A809 ; +SR2 := $A80A ; +ACR2 := $A80B ; +PCR2 := $A80C ; +IFR2 := $A80D ; +IER2 := $A80E ; +DR2A := $A80F ; +; +; 6522 (U29) +; +OR3A := $AC01 ; Write-Protect RAM, Debug On/Off, I/O-3A +DDR3A := $AC03 ; Data-Direction Register for 3A +OR3B := $AC00 ; Input / Output Register for 3B +DDR3B := $AC02 ; Data-Direction Register for 3B +TIC3L := $AC04 ; +TIC3H := $AC05 ; +TIL3L := $AC06 ; +TIL3H := $AC07 ; +T2L3L := $AC08 ; +T2C3L := $AC08 ; +T2C3H := $AC09 ; +SR3 := $AC0A ; +ACR3 := $AC0B ; +PCR3 := $AC0C ; +IFR3 := $AC0D ; +IER3 := $AC0E ; +DR3A := $AC0F ; diff --git a/asminc/telestrat.inc b/asminc/telestrat.inc new file mode 100644 index 000000000..682696887 --- /dev/null +++ b/asminc/telestrat.inc @@ -0,0 +1,541 @@ +; +; Oric TELEMON definition +; TELEMON 2.4 & Orix +; For Orix check http://orix.oric.org +; + +; --------------------------------------------------------------------------- +; Constants + +SCREEN_XSIZE = 40 ; Screen columns +SCREEN_YSIZE = 28 ; Screen rows + +FUNCTKEY = $A5 + +FNAME_LEN = 11 ; Maximum length of file-name + +; --------------------------------------------------------------------------- +; I/O Identifier +; Theses identifers are used for channel management +; + +XKBD = $80 ; Keyboard +XRSE = $83 ; RS232 in +XSCR = $88 ; Screen +XRSS = $90 ; RS232 out + +; --------------------------------------------------------------------------- +; Zero page + +; --------------------------------------------------------------------------- +; Page 00 +RES := $00 +RESB := $02 + +DECDEB := $04 +DECFIN := $06 +DECCIB := $08 +DECTRV := $0A + +TR0 := $0C +TR1 := $0D +TR2 := $0E +TR3 := $0F +TR4 := $10 +TR5 := $11 +TR6 := $12 +TR7 := $13 + +DEFAFF := $14 + +IRQSVA := $21 ; Used to save A when a BRK call occurs +IRQSVX := $22 ; Used to save X when a BRK call occurs +IRQSVY := $23 ; Used to save Y when a BRK call occurs +IRQSVP := $24 ; Used to save P when a BRK call occurs + +ADSCR := $26 +SCRNB := $28 ; Id of the current window + +ADKBD := $2A ; Address ASCII conversion table + + +PTR_READ_DEST := $2C ; Used for XFREAD and XWRITE only in Orix + +ADCLK := $40 ; Address for clock display +TIMEUS := $42 +TIMEUD := $44 ; Counter clock (1/10 of a second) + + +HRSX := $46 +HRSY := $47 + +XLPRBI := $48 ; Printer flag (b7) + +HRSX40 := $49 +HRSX6 := $4A + +ADHRS := $4B ; Hires screen address (word) + +HRS1 := $4D +HRS2 := $4F +HRS3 := $51 +HRS4 := $53 +HRS5 := $55 + +HRSFB := $57 + +VABKP1 := $58 + +; RS232T +; b0-b3 : speed +; 1111 => 19200 bps (please note that telestrat can't handle this speed without stopping all IRQ except ACIA's one) +; 1100 => 9600 bps (default from TELEMON) +; 1110 => 4800 bps +; 1010 => 2400 bps +; 1000 => 1200 bps +; 0111 => 600 bps +; 0110 => 300 bps +; 0101 => 150 bps +; 0010 => 75 bps + +; b4 : 0 external clock, 1 internal clock +; b6-b5 : 00 8 bits +; 01 7 bits +; 10 6 bits +; 11 5 bits +; b7 : 0 a stop + +RS232T := $59 + +; RS232C +; b0-b3 : 0 +; b4 : 1 if echo +; b5 : 1 if parity +; b7-b6 : 00 in/out parity odd +; : 01 on/out parity even +; : 10 parity sent, answer not tested +; : 11 SPACE SENT, reception not tested + +RS232C := $5A +INDRS := $5B + +; Float and integer management +ACC1E := $60 +ACC1M := $61 +ACC1S := $65 +ACC1EX := $66 +ACC1J := $67 +ACC2E := $68 +ACC2M := $69 +ACC2S := $6D +ACCPS := $6E +ACC3 := $6F + +ACC4E := $73 +ACC4M := $74 + + +FLDT0 := $74 +FLDT1 := $75 +FLDT2 := $76 +FLSVY := $77 +FLTR0 := $7D +FLTR1 := $7E + +; Menu management +MENDDY := $62 +MENDFY := $63 +MENX := $64 +MENDY := $66 +FLGMEN := $68 +ADMEN := $69 + +FLSGN := $8A +FLINT := $88 +FLSVS := $89 +FLERR := $8B + +VARLNG := $8C +VARAPL := $D0 + +; --------------------------------------------------------------------------- +; Low memory +IRQVec := $02FB ; "fast" interrupt vector + +; --------------------------------------------------------------------------- +; I/O locations + +; 6522 +.struct VIA ; Versatile Interface Adapter + .res $0300 +PRB .byte ; Port Register B +PRA .byte ; Port Register A +DDRB .byte ; Data Direction Register B +DDRA .byte ; Data Direction Register A +T1 .word ; Timer 1 +T1L .word ; Timer 1 Latch +T2 .word ; Timer 2 +SR .byte ; Shift Register +ACR .byte ; Auxiliary Control Register +PCR .byte ; Peripheral Control Register +IFR .byte ; Interrupt Flags Register +IER .byte ; Interrupt Enable Register +PRA2 .byte ; Port Register A without handshaking +.endstruct + + +.struct VIA2 ; Versatile Interface Adapter + .res $0320 +PRB .byte ; Port Register B +PRA .byte ; Port Register A +DDRB .byte ; Data Direction Register B +DDRA .byte ; Data Direction Register A +T1 .word ; Timer 1 +T1L .word ; Timer 1 Latch +T2 .word ; Timer 2 +SR .byte ; Shift Register +ACR .byte ; Auxiliary Control Register +PCR .byte ; Peripheral Control Register +IFR .byte ; Interrupt Flags Register +IER .byte ; Interrupt Enable Register +PRA2 .byte ; Port Register A without handshaking +.endstruct + +; 6551 +.struct ACIA ; Asynchronous Communications Interface Adapter + .res $031C +DATA .byte +STATUS .byte +CMD .byte ; Command register +CTRL .byte ; Control register +.endstruct + +SCREEN := $BB80 + + +; --------------------------------------------------------------------------- +; ROM entries + +; TELEMON primitives (2.4 & 3.x) + +; all values are used to call bank 7 of telestrat cardridge. It works with 'brk value' +XOP0 = $00 ; Open device on channel 0 +XOP1 = $01 ; Open device on channel 1 +XOP2 = $02 ; Open device on channel 2 +XOP3 = $03 ; Open device on channel 3 + +XCL0 = $04 ; Close channel 0 +XCL1 = $05 ; Close channel 1 +XCL2 = $06 ; Close channel 2 +XCL3 = $07 ; Close channel 3 + +XRD0 = $08 +XRDW0 = $0C + +XWR0 = $10 ; Write a char in channel 0 +XWR1 = $11 ; Write a char in channel 1 +XWR2 = $12 ; Write a char in channel 2 +XWR3 = $13 ; Write a char in channel 3 + +XWSTR0 = $14 ; Write a string in text mode channel 0 +XWSTR1 = $15 ; Write a string in text mode channel 1 +XWSTR2 = $16 ; Write a string in text mode channel 2 +XWSTR3 = $17 ; Write a string in text mode channel 3 + +XDECAL = $18 + +XTEXT = $19 +XHIRES = $1A +XEFFHI = $1B ; Clear hires screen +XFILLM = $1C +XMINMA = $1F +XVARS = $24 ; Only in Orix, in TELEMON 2.4, it's XNOMFI ($24) +XCRLF = $25 ; Jump a line and return to the beginning of the line +XDECAY = $26 +XFREAD = $27 ; Only in Orix +XBINDX = $28 ; Convert a number into hex and displays on channel 0 +XDECIM = $29 +XHEXA = $2A ; Convert a number into hex + +XEDT = $2D ; Launch editor +XINSER = $2E + +XSCELG = $2F ; Search a line in editor mode +XOPEN = $30 ; Only in Orix +XECRPR = $33 ; Displays prompt +XCOSCR = $34 ; Switch off cursor +XCSSCR = $35 ; Switch on cursor +XSCRSE = $36 +XSCROH = $37 ; Scroll up text screen +XSCROB = $38 ; Scroll down text screen +XSCRNE = $39 ; Load charset from rom to ram +XCLOSE = $3A ; Only in Orix close file +XFWRITE = $3B ; Only in Orix write file + +; Clock primitive +XRECLK = $3C ; Reset clock +XCLCL = $3D ; Close clock +XWRCLK = $3E ; Displays clock in the address in A & Y registers + +; Sound primitives +XSONPS = $40 ; Send data to PSG register (14 values) +XOUPS = $42 ; Send Oups sound into PSG +XPLAY = $43 ; Play a sound +XSOUND = $44 +XMUSIC = $45 +XZAP = $46 ; Send Zap sound to PSG +XSHOOT = $47 + +; Path Management +XGETCWD = $48 ; Get current CWD +XPUTCWD = $49 ; Chdir + +; File management +XMKDIR = $4B ; Create a folder. Only available in Orix + +XHCHRS = $4C ; Hard copy hires + +; File management +XRM = $4D ; Remove a folder or a file. Only available in Orix + +XFWR = $4E ; Put a char on the first screen. Only available in Orix + +; Keyboard primitives +XALLKB = $50 ; Read Keyboard, and populate KBDCOL +XKBDAS = $51 ; Ascii conversion +XGOKBD = $52 ; Swap keyboard type (Qwerty, French ...) + +; Buffer management +XECRBU = $54 ; Write A or AY in the buffer +XLISBU = $55 ; Read A or AY in the buffer +XTSTBU = $56 +XVIDBU = $57 ; Flush the buffer +XINIBU = $58 ; Initialize the buffer X +XDEFBU = $59 ; Reset all value of the buffer +XBUSY = $5A ; Test if the buffer is empty + +XMALLOC = $5B ; Only in Orix + +; RS232 primitives +XSDUMP = $5C ; RS232 input dump +XCONSO = $5D ; Swap screen into RS232 terminal +XSLOAD = $5E ; Read a file from RS232 +XSSAVE = $5F ; Write a file to RS232 + +; Minitel primitives +XMLOAD = $60 ; Read a file from Minitel +XMSAVE = $61 ; Write a file to Minitel + +XFREE = $62 ; Only in Orix + +XEXEC = $63 ; Only in Orix + +; Next Minitel primitives +XWCXFI = $63 ; Wait connection +XLIGNE = $64 ; +XDECON = $65 ; Minitel disconnection +XMOUT = $66 ; Send a byte to minitel (from A) + +XSOUT = $67 ; Send accumulator value (A) to RS232, available in TELEMON 2.4 : if RS232 buffer is full, the Oric Telestrat freezes + +XHRSSE = $8C ; Set hires position cursor +XDRAWA = $8D ; Draw a line absolute +XDRAWR = $8E ; Draw a line (relative) +XCIRCL = $8F ; Draw a circle +XCURSE = $90 ; Plot a pixel +XCURMO = $91 ; Move to x,y pos in Hires +XPAPER = $92 +XINK = $93 +XBOX = $94 ; Draw a box +XABOX = $95 +XFILL = $96 +XCHAR = $97 ; Display a char on the screen in Hires +XSCHAR = $98 ; Draw a string in hires +XEXPLO = $9C ; Send Explode sound to PSG +XPING = $9D ; Send Ping sound to PSG + +; --------------------------------------------------------------------------- +; ROM entries variables + +PWD_PTR = $00 + +; --------------------------------------------------------------------------- +; +BUFTRV := $100 + + +; --------------------------------------------------------------------------- +; Page $200 +BNKST := $200 ; Used to store signature of 8 bank (length : 8 bytes) +TABDRV := $208 + +DRVDEF := $20C +FLGTEL := $20D +KOROM := $20E ; Used to compute the size of all rom bank. The result is store here. The value is in KB +KORAM := $20F ; Used to compute the size of all ram bank. The result is store here. The value is in KB +; Time management +TIMED := $210 ; Clock (1/10 of seconds) +TIMES := $211 +TIMEM := $212 +TIMEH := $213 +FLGCLK := $214 +FLGCLK_FLAG := $215 +FLGCUR := $216 ; Cursor management flag +; screens position managements + +FLGCUR_STATE := $217 ; Cursor state flag + +ADSCRL := $218 +ADSCRH := $21C +SCRX := $220 +SCRY := $224 + +SCRDX := $228 +SCRFX := $22C +SCRDY := $230 +SCRFY := $234 +SCRBAL := $238 +SCRBAH := $23C +SCRCT := $240 +SCRCF := $244 +FLGSCR := $248 +CURSCR := $24C + +HARD_COPY_HIRES := $250 ; Hard copy vector + +SCRTXT := $256 +SCRHIR := $25C +SCRTRA := $262 ; 6 bytes lenfth + +; Keyboard management +KBDCOL := $268 ; 8 bytes length +KBDFLG_KEY := $270 ; 0 if no key pressed +KBDVRR := $272 + +KBDVRL := $273 +FLGKBD := $275 +KBDFCT := $276 +KBDSHT := $278 + +KBDKEY := $279 +KBDCTC := $27E +LPRX := $286 +LPRY := $287 +LPRFX := $288 +LPRFY := $289 +FLGLPR := $28A + +; Joysticks management +FLGJCK := $28C +JCGVAL := $28D +JCDVAL := $28E +JCKTAB := $29D + + +HRSPAT := $2AA ; Hires pattern : it's used to draw pattern for a line or a circle +HRSERR := $2AB + +IOTAB0 := $2AE +IOTAB1 := $2B2 +IOTAB2 := $2B6 +IOTAB3 := $2BA +ADIOB := $2BE ; 48 bytes length +FLGRST := $2EE +CSRND := $2EF +VNMI := $2F4 +ADIODB_VECTOR := $2f7 ; 3 bytes length + +IRQVECTOR := $2FA +VAPLIC := $2FD + +; --------------------------------------------------------------------------- +; Page $400 +EXBNK := $40C +VEXBNK := $414 +BNKCIB := $417 + +; --------------------------------------------------------------------------- +; Page $500 + +DRIVE := $500 +ERRNB := $512 +SAVES := $513 +BUFNOM := $517 +VSALO0 := $528 +VSALO1 := $529 +FTYPE := $52C ; File type +DESALO := $52D +FISALO := $52F +EXSALO := $531 +EXTDEF := $55D ; Default extension. At the start of telemon, it's set to ".COM" +BUFEDT := $590 ; Buffer edition + +MAX_BUFEDT_LENGTH=110 + +; --------------------------------------------------------------------------- +; Hardware +CH376_DATA := $340 +CH376_COMMAND := $341 + +; RAM overlays buffer +BUFBUF := $c080 + +; --------------------------------------------------------------------------- +; Stratsed vectors +; Stratsed is the main OS for Telestrat +XMERGE := $FF0E +XFST := $FF11 +XSPUT := $FF14 +XSTAKE := $FF17 +XTAKE := $FF20 +XOPENS := $FF1A ; XOPEN from Stratsed +XCLOSES := $FF1D ; XCLOSE from Stratsed +XPUT := $FF23 +XREWIN := $FF29 +XJUMP := $FF2C +XLGBUF := $FF2F +XERVEC := $FF32 +XESAVE := $FF35 +XCOPY := $FF38 +XDNAME := $FF3B +XSTATU := $FF3E +XUPDAT := $FF41 +XFORMA := $FF44 +XDELBK := $FF4A +XDELN := $FF4D +XPROT := $FF50 +XUNPRO := $FF53 +XDIRN := $FF56 +XBKP := $FF59 +XINITI := $FF5C +XERREU := $FF5F +XLOAD := $FF62 +XDEFSA := $FF65 +XDEFLO := $FF68 +XSAVE := $FF6B +XNOMDE := $FF6E +XCREAY := $FF71 +XDETSE := $FF74 +XLIBSE := $FF77 +XTRVCA := $FF7A +XTRVNM := $FF7D +XTRVNX := $FF80 +XBUCA := $FF86 +XVBUF1 := $FF89 +XSVSEC := $FF8C +XSAY := $FF8F +XSBUF1 := $FF92 +XSBUF2 := $FF95 +XSBUF3 := $FF98 +XSCAT := $FF9B +XPRSEC := $FFA1 +XPBUF1 := $FFA4 +XPMAP := $FFA7 +XRWTS := $FFAA + +; --------------------------------------------------------------------------- +; MACRO + +.macro BRK_TELEMON value + .byte $00,value +.endmacro diff --git a/asminc/tgi-kernel.inc b/asminc/tgi-kernel.inc index e9f2f6aa9..fba78afff 100644 --- a/asminc/tgi-kernel.inc +++ b/asminc/tgi-kernel.inc @@ -70,14 +70,13 @@ BAR .addr ; BAR routine TEXTSTYLE .addr ; TEXTSTYLE routine OUTTEXT .addr ; OUTTEXT routine - IRQ .addr ; IRQ routine .endstruct .endstruct ;------------------------------------------------------------------------------ ; The TGI API version, stored at TGI_HDR_VERSION -TGI_API_VERSION = $05 +TGI_API_VERSION = $06 ;------------------------------------------------------------------------------ ; Bitmapped tgi driver flags, stored in TGI_HDR::VARS::FLAGS. diff --git a/asminc/tgi-vectorfont.inc b/asminc/tgi-vectorfont.inc index ffe6ac686..124fe93cc 100644 --- a/asminc/tgi-vectorfont.inc +++ b/asminc/tgi-vectorfont.inc @@ -54,7 +54,7 @@ TGI_VF_CCOUNT = (TGI_VF_LASTCHAR - TGI_VF_FIRSTCHAR + 1) ; Font data loaded directly from file .struct TGI_VECTORFONT TOP .byte ; Height of char - BOTTOM .byte ; Descender + BOTTOM .byte ; Descender HEIGHT .byte ; Maximum char height WIDTHS .byte ::TGI_VF_CCOUNT ; Char widths CHARS .word ::TGI_VF_CCOUNT ; Pointer to character defs diff --git a/asminc/time.inc b/asminc/time.inc index 16858471d..6064b4ba3 100644 --- a/asminc/time.inc +++ b/asminc/time.inc @@ -49,11 +49,20 @@ .endstruct +;------------------------------------------------------------------------------ +; Struct timespec - must match the struct defined in time.h + +.struct timespec + tv_sec .dword + tv_nsec .dword +.endstruct + + ;------------------------------------------------------------------------------ ; Exported functions -.global __systime +.global _clock_getres +.global _clock_gettime +.global _clock_settime +.global _localtime .global _mktime - - - diff --git a/asminc/utsname.inc b/asminc/utsname.inc index 6e2289244..6d978dd21 100644 --- a/asminc/utsname.inc +++ b/asminc/utsname.inc @@ -7,7 +7,7 @@ ;/* */ ;/* */ ;/* (C) 2003 Ullrich von Bassewitz */ -;/* Rmerstrasse 52 */ +;/* Roemerstrasse 52 */ ;/* D-70794 Filderstadt */ ;/* EMail: uz@cc65.org */ ;/* */ @@ -33,7 +33,7 @@ -; Struct utsname +; Struct utsname .struct utsname sysname .byte 17 nodename .byte 9 diff --git a/asminc/vic20.inc b/asminc/vic20.inc index 12424dc11..7184ab6ee 100644 --- a/asminc/vic20.inc +++ b/asminc/vic20.inc @@ -1,14 +1,14 @@ ; -; Vic20 generic definitions. Stolen mostly from c64.inc - Steve Schmidtke +; VIC-20 generic definitions. Stolen mostly from c64.inc -- Steve Schmidtke ; - ; --------------------------------------------------------------------------- ; Zero page, Commodore stuff VARTAB := $2D ; Pointer to start of BASIC variables MEMSIZE := $37 ; Pointer to highest BASIC RAM location (+1) TXTPTR := $7A ; Pointer into BASIC source code +STATUS := $90 ; Kernal I/O completion status TIME := $A0 ; 60HZ clock FNAM_LEN := $B7 ; Length of filename SECADR := $B9 ; Secondary address @@ -31,6 +31,11 @@ BASIC_BUF_LEN = 89 ; Maximum length of command-line CHARCOLOR := $286 CURS_COLOR := $287 ; Color under the cursor +KBDREPEAT := $28a +KBDREPEATRATE := $28b +KBDREPEATDELAY := $28c + +RSSTAT := $297 ; RS-232 device driver status ; --------------------------------------------------------------------------- ; Screen size @@ -38,13 +43,6 @@ CURS_COLOR := $287 ; Color under the cursor XSIZE = 22 YSIZE = 23 -; --------------------------------------------------------------------------- -; Kernal routines - -; Direct entries -CLRSCR := $E55F -KBDREAD := $E5CF - ; --------------------------------------------------------------------------- ; Vector and other locations @@ -56,23 +54,66 @@ NMIVec := $0318 ; I/O: 6560 VIC VIC := $9000 -VIC_LINES := $9003 ; Screen lines, bit 7 is bit 0 from VIC_HLINE -VIC_HLINE := $9004 ; Rasterline, bits 1-8 -VIC_COLOR := $900F ; Border and background color +VIC_CR0 := VIC+$0 +VIC_CR1 := VIC+$1 +VIC_CR2 := VIC+$2 +VIC_CR3 := VIC+$3 +VIC_LINES := VIC+$3 ; Screen lines, bit 7 is bit 0 from VIC_HLINE +VIC_CR4 := VIC+$4 +VIC_HLINE := VIC+$4 ; Rasterline, bits 1-8 +VIC_CR5 := VIC+$5 +VIC_CR6 := VIC+$6 +VIC_CR7 := VIC+$7 +VIC_CR8 := VIC+$8 +VIC_CR9 := VIC+$9 +VIC_CRA := VIC+$A +VIC_CRB := VIC+$B +VIC_CRC := VIC+$C +VIC_CRD := VIC+$D +VIC_CRE := VIC+$E +VIC_CRF := VIC+$F +VIC_COLOR := VIC+$F ; Border and background color ; --------------------------------------------------------------------------- ; I/O: 6522 VIA1 -VIA1 := $9110 -VIA1_JOY := $9111 -VIA1_DDRB := $9112 -VIA1_DDRA := $9113 +VIA1 := $9110 ; VIA1 base address +VIA1_JOY := VIA1+$0 ; *** Deprecated *** +VIA1_PB := VIA1+$0 ; Port register B +VIA1_PA1 := VIA1+$1 ; Port register A +VIA1_DDRB := VIA1+$2 ; Data direction register B +VIA1_DDRA := VIA1+$3 ; Data direction register A +VIA1_T1CL := VIA1+$4 ; Timer 1, low byte +VIA1_T1CH := VIA1+$5 ; Timer 1, high byte +VIA1_T1LL := VIA1+$6 ; Timer 1 latch, low byte +VIA1_T1LH := VIA1+$7 ; Timer 1 latch, high byte +VIA1_T2CL := VIA1+$8 ; Timer 2, low byte +VIA1_T2CH := VIA1+$9 ; Timer 2, high byte +VIA1_SR := VIA1+$A ; Shift register +VIA1_ACR := VIA1+$B ; Auxiliary control register +VIA1_PCR := VIA1+$C ; Peripheral control register +VIA1_IFR := VIA1+$D ; Interrupt flag register +VIA1_IER := VIA1+$E ; Interrupt enable register +VIA1_PA2 := VIA1+$F ; Port register A w/o handshake ; --------------------------------------------------------------------------- ; I/O: 6522 VIA2 -VIA2 := $9120 -VIA2_JOY := $9120 -VIA2_DDRB := $9122 -VIA2_DDRA := $9123 - +VIA2 := $9120 ; VIA2 base address +VIA2_JOY := VIA2+$0 ; *** Deprecated *** +VIA2_PB := VIA2+$0 ; Port register B +VIA2_PA1 := VIA2+$1 ; Port register A +VIA2_DDRB := VIA2+$2 ; Data direction register B +VIA2_DDRA := VIA2+$3 ; Data direction register A +VIA2_T1CL := VIA2+$4 ; Timer 1, low byte +VIA2_T1CH := VIA2+$5 ; Timer 1, high byte +VIA2_T1LL := VIA2+$6 ; Timer 1 latch, low byte +VIA2_T1LH := VIA2+$7 ; Timer 1 latch, high byte +VIA2_T2CL := VIA2+$8 ; Timer 2, low byte +VIA2_T2CH := VIA2+$9 ; Timer 2, high byte +VIA2_SR := VIA2+$A ; Shift register +VIA2_ACR := VIA2+$B ; Auxiliary control register +VIA2_PCR := VIA2+$C ; Peripheral control register +VIA2_IFR := VIA2+$D ; Interrupt flag register +VIA2_IER := VIA2+$E ; Interrupt enable register +VIA2_PA2 := VIA2+$F ; Port register A w/o handshake diff --git a/asminc/zeropage.inc b/asminc/zeropage.inc index 1ba035868..6627d86b6 100644 --- a/asminc/zeropage.inc +++ b/asminc/zeropage.inc @@ -12,7 +12,7 @@ .globalzp ptr1, ptr2, ptr3, ptr4 .globalzp tmp1, tmp2, tmp3, tmp4 .globalzp regbank - + ; The size of the register bank regbanksize = 6 diff --git a/cfg/apple2-asm.cfg b/cfg/apple2-asm.cfg index 1e187764c..76bca1b86 100644 --- a/cfg/apple2-asm.cfg +++ b/cfg/apple2-asm.cfg @@ -4,19 +4,19 @@ FEATURES { STARTADDRESS: default = $0803; } SYMBOLS { - __LOADADDR__: type = weak, value = __CODE_RUN__; - __LOADSIZE__: type = weak, value = __BSS_RUN__ - __CODE_RUN__; + __FILETYPE__: type = weak, value = $0006; # ProDOS file type } MEMORY { - ZP: start = $0080, size = $001A, define = yes; - HEADER: file = %O, start = $0000, size = $0004; - RAM: file = %O, start = %S, size = $C000 - %S; + ZP: file = "", start = $0000, size = $00FF; + HEADER: file = %O, start = %S - $003A, size = $003A; + MAIN: file = %O, define = yes, start = %S, size = $C000 - %S; + BSS: file = "", start = __MAIN_LAST__, size = $C000 - __MAIN_LAST__; } SEGMENTS { ZEROPAGE: load = ZP, type = zp, optional = yes; EXEHDR: load = HEADER, type = ro, optional = yes; - CODE: load = RAM, type = rw, optional = yes, define = yes; - RODATA: load = RAM, type = ro, optional = yes; - DATA: load = RAM, type = rw, optional = yes; - BSS: load = RAM, type = bss, optional = yes, define = yes; + CODE: load = MAIN, type = rw; + RODATA: load = MAIN, type = ro, optional = yes; + DATA: load = MAIN, type = rw, optional = yes; + BSS: load = BSS, type = bss, optional = yes, define = yes; } diff --git a/cfg/apple2-hgr.cfg b/cfg/apple2-hgr.cfg new file mode 100644 index 000000000..cfe577e00 --- /dev/null +++ b/cfg/apple2-hgr.cfg @@ -0,0 +1,49 @@ +# Configuration for programs including a hires screen (with 6KB LOWCODE) + +FEATURES { + STARTADDRESS: default = $0803; +} +SYMBOLS { + __EXEHDR__: type = import; + __FILETYPE__: type = weak, value = $0006; # ProDOS file type + __STACKSIZE__: type = weak, value = $0800; # 2k stack + __HIMEM__: type = weak, value = $9600; # Presumed RAM end + __LCADDR__: type = weak, value = $D400; # Behind quit code + __LCSIZE__: type = weak, value = $0C00; # Rest of bank two +} +MEMORY { + ZP: file = "", define = yes, start = $0080, size = $001A; + HEADER: file = %O, start = %S - $003A, size = $003A; + MAIN: file = %O, define = yes, start = %S, size = __HIMEM__ - %S; + BSS: file = "", start = __ONCE_RUN__, size = __HIMEM__ - __STACKSIZE__ - __ONCE_RUN__; + LC: file = "", define = yes, start = __LCADDR__, size = __LCSIZE__; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXEHDR: load = HEADER, type = ro, optional = yes; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + HGR: load = MAIN, type = rw, start = $2000; + CODE: load = MAIN, type = ro start = $4000; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw; + ONCE: load = MAIN, type = ro, define = yes; + LC: load = MAIN, run = LC, type = ro, optional = yes; + BSS: load = BSS, type = bss, define = yes; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/cfg/apple2-overlay.cfg b/cfg/apple2-overlay.cfg index 244e4582f..a0b7678c1 100644 --- a/cfg/apple2-overlay.cfg +++ b/cfg/apple2-overlay.cfg @@ -1,10 +1,10 @@ # Configuration for overlay programs (overlays located below main program) -# The overlay files don't include the 4 byte DOS 3.3 header so use AppleCommander like this: -# java -jar ac.jar -cc65 mydisk.dsk myprog bin < myprog -# java -jar ac.jar -p mydisk.dsk myprog.1 bin < myprog.1 -# java -jar ac.jar -p mydisk.dsk myprog.2 bin < myprog.2 -# java -jar ac.jar -p mydisk.dsk myprog.3 bin < myprog.3 +# The overlay files are raw binary files so use AppleCommander like this: +# java -jar ac.jar -as mydisk.dsk myprog < myprog +# java -jar ac.jar -p mydisk.dsk myprog.1 bin < myprog.1 +# java -jar ac.jar -p mydisk.dsk myprog.2 bin < myprog.2 +# java -jar ac.jar -p mydisk.dsk myprog.3 bin < myprog.3 # ... FEATURES { @@ -12,21 +12,19 @@ FEATURES { } SYMBOLS { __EXEHDR__: type = import; + __FILETYPE__: type = weak, value = $0006; # ProDOS file type + __STACKSIZE__: type = weak, value = $0800; # 2k stack __HIMEM__: type = weak, value = $9600; # Presumed RAM end __LCADDR__: type = weak, value = $D400; # Behind quit code __LCSIZE__: type = weak, value = $0C00; # Rest of bank two - __STACKSIZE__: type = weak, value = $0800; # 2k stack __OVERLAYSIZE__: type = weak, value = $1000; # 4k overlay - __LOADADDR__: type = weak, value = __STARTUP_RUN__; - __LOADSIZE__: type = weak, value = __INITBSS_RUN__ - __STARTUP_RUN__ + - __MOVE_LAST__ - __MOVE_START__; } MEMORY { - ZP: define = yes, start = $0080, size = $001A; - HEADER: file = %O, start = $0000, size = $0004; - RAM: file = %O, start = %S + __OVERLAYSIZE__, size = __HIMEM__ - __STACKSIZE__ - __OVERLAYSIZE__ - %S; - MOVE: file = %O, define = yes, start = $0000, size = $FFFF; - LC: define = yes, start = __LCADDR__, size = __LCSIZE__; + ZP: file = "", define = yes, start = $0080, size = $001A; + HEADER: file = %O, start = %S - $003A, size = $003A; + MAIN: file = %O, define = yes, start = %S + __OVERLAYSIZE__, size = __HIMEM__ - __OVERLAYSIZE__ - %S; + BSS: file = "", start = __ONCE_RUN__, size = __HIMEM__ - __STACKSIZE__ - __ONCE_RUN__; + LC: file = "", define = yes, start = __LCADDR__, size = __LCSIZE__; OVL1: file = "%O.1", start = %S, size = __OVERLAYSIZE__; OVL2: file = "%O.2", start = %S, size = __OVERLAYSIZE__; OVL3: file = "%O.3", start = %S, size = __OVERLAYSIZE__; @@ -38,32 +36,32 @@ MEMORY { OVL9: file = "%O.9", start = %S, size = __OVERLAYSIZE__; } SEGMENTS { - ZEROPAGE: load = ZP, type = zp; - EXEHDR: load = HEADER, type = ro; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss, define = yes; - BSS: load = RAM, type = bss, define = yes; - INIT: load = MOVE, run = RAM, type = ro, define = yes, optional = yes; - LC: load = MOVE, run = LC, type = ro, optional = yes; - OVERLAY1: load = OVL1, type = ro, define = yes, optional = yes; - OVERLAY2: load = OVL2, type = ro, define = yes, optional = yes; - OVERLAY3: load = OVL3, type = ro, define = yes, optional = yes; - OVERLAY4: load = OVL4, type = ro, define = yes, optional = yes; - OVERLAY5: load = OVL5, type = ro, define = yes, optional = yes; - OVERLAY6: load = OVL6, type = ro, define = yes, optional = yes; - OVERLAY7: load = OVL7, type = ro, define = yes, optional = yes; - OVERLAY8: load = OVL8, type = ro, define = yes, optional = yes; - OVERLAY9: load = OVL9, type = ro, define = yes, optional = yes; + ZEROPAGE: load = ZP, type = zp; + EXEHDR: load = HEADER, type = ro, optional = yes; + STARTUP: load = MAIN, type = ro, define = yes; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw; + ONCE: load = MAIN, type = ro, define = yes; + LC: load = MAIN, run = LC, type = ro, optional = yes; + BSS: load = BSS, type = bss, define = yes; + OVERLAY1: load = OVL1, type = ro, define = yes, optional = yes; + OVERLAY2: load = OVL2, type = ro, define = yes, optional = yes; + OVERLAY3: load = OVL3, type = ro, define = yes, optional = yes; + OVERLAY4: load = OVL4, type = ro, define = yes, optional = yes; + OVERLAY5: load = OVL5, type = ro, define = yes, optional = yes; + OVERLAY6: load = OVL6, type = ro, define = yes, optional = yes; + OVERLAY7: load = OVL7, type = ro, define = yes, optional = yes; + OVERLAY8: load = OVL8, type = ro, define = yes, optional = yes; + OVERLAY9: load = OVL9, type = ro, define = yes, optional = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/apple2-system.cfg b/cfg/apple2-system.cfg index f07208e45..0170feb93 100644 --- a/cfg/apple2-system.cfg +++ b/cfg/apple2-system.cfg @@ -1,36 +1,37 @@ -# Configuration for ProDOS 8 system programs (without the header) +# Configuration for ProDOS 8 system programs (allowing for 3KB in LC) SYMBOLS { + __EXEHDR__: type = import; + __FILETYPE__: type = weak, value = $00FF; # ProDOS file type + __STACKSIZE__: type = weak, value = $0800; # 2k stack __LCADDR__: type = weak, value = $D400; # Behind quit code __LCSIZE__: type = weak, value = $0C00; # Rest of bank two - __STACKSIZE__: type = weak, value = $0800; # 2k stack - __LOADADDR__: type = weak, value = __STARTUP_RUN__; - __LOADSIZE__: type = weak, value = __INITBSS_RUN__ - __STARTUP_RUN__ + - __MOVE_LAST__ - __MOVE_START__; } MEMORY { - ZP: define = yes, start = $0080, size = $001A; - RAM: file = %O, start = $2000, size = $9F00 - __STACKSIZE__; - MOVE: file = %O, define = yes, start = $0000, size = $FFFF; - LC: define = yes, start = __LCADDR__, size = __LCSIZE__; + ZP: file = "", define = yes, start = $0080, size = $001A; + HEADER: file = %O, start = $2000 - $003A, size = $003A; + MAIN: file = %O, define = yes, start = $2000, size = $BF00 - $2000; + BSS: file = "", start = __ONCE_RUN__, size = $BF00 - __STACKSIZE__ - __ONCE_RUN__; + LC: file = "", define = yes, start = __LCADDR__, size = __LCSIZE__; } SEGMENTS { - ZEROPAGE: load = ZP, type = zp; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss, define = yes; - BSS: load = RAM, type = bss, define = yes; - INIT: load = MOVE, run = RAM, type = ro, define = yes, optional = yes; - LC: load = MOVE, run = LC, type = ro, optional = yes; + ZEROPAGE: load = ZP, type = zp; + EXEHDR: load = HEADER, type = ro, optional = yes; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw; + ONCE: load = MAIN, type = ro, define = yes; + LC: load = MAIN, run = LC, type = ro, optional = yes; + BSS: load = BSS, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/apple2.cfg b/cfg/apple2.cfg index 27eb706c4..a6809cf89 100644 --- a/cfg/apple2.cfg +++ b/cfg/apple2.cfg @@ -5,39 +5,37 @@ FEATURES { } SYMBOLS { __EXEHDR__: type = import; + __FILETYPE__: type = weak, value = $0006; # ProDOS file type + __STACKSIZE__: type = weak, value = $0800; # 2k stack __HIMEM__: type = weak, value = $9600; # Presumed RAM end __LCADDR__: type = weak, value = $D400; # Behind quit code __LCSIZE__: type = weak, value = $0C00; # Rest of bank two - __STACKSIZE__: type = weak, value = $0800; # 2k stack - __LOADADDR__: type = weak, value = __STARTUP_RUN__; - __LOADSIZE__: type = weak, value = __INITBSS_RUN__ - __STARTUP_RUN__ + - __MOVE_LAST__ - __MOVE_START__; } MEMORY { - ZP: define = yes, start = $0080, size = $001A; - HEADER: file = %O, start = $0000, size = $0004; - RAM: file = %O, start = %S, size = __HIMEM__ - __STACKSIZE__ - %S; - MOVE: file = %O, define = yes, start = $0000, size = $FFFF; - LC: define = yes, start = __LCADDR__, size = __LCSIZE__; + ZP: file = "", define = yes, start = $0080, size = $001A; + HEADER: file = %O, start = %S - $003A, size = $003A; + MAIN: file = %O, define = yes, start = %S, size = __HIMEM__ - %S; + BSS: file = "", start = __ONCE_RUN__, size = __HIMEM__ - __STACKSIZE__ - __ONCE_RUN__; + LC: file = "", define = yes, start = __LCADDR__, size = __LCSIZE__; } SEGMENTS { - ZEROPAGE: load = ZP, type = zp; - EXEHDR: load = HEADER, type = ro; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss, define = yes; - BSS: load = RAM, type = bss, define = yes; - INIT: load = MOVE, run = RAM, type = ro, define = yes, optional = yes; - LC: load = MOVE, run = LC, type = ro, optional = yes; + ZEROPAGE: load = ZP, type = zp; + EXEHDR: load = HEADER, type = ro, optional = yes; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw; + ONCE: load = MAIN, type = ro, define = yes; + LC: load = MAIN, run = LC, type = ro, optional = yes; + BSS: load = BSS, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/apple2enh-asm.cfg b/cfg/apple2enh-asm.cfg index e70ed4484..76bca1b86 100644 --- a/cfg/apple2enh-asm.cfg +++ b/cfg/apple2enh-asm.cfg @@ -4,17 +4,19 @@ FEATURES { STARTADDRESS: default = $0803; } SYMBOLS { - __LOADADDR__: type = weak, value = __CODE_RUN__; - __LOADSIZE__: type = weak, value = __BSS_RUN__ - __CODE_RUN__; + __FILETYPE__: type = weak, value = $0006; # ProDOS file type } MEMORY { - HEADER: file = %O, start = $0000, size = $0004; - RAM: file = %O, start = %S, size = $C000 - %S; + ZP: file = "", start = $0000, size = $00FF; + HEADER: file = %O, start = %S - $003A, size = $003A; + MAIN: file = %O, define = yes, start = %S, size = $C000 - %S; + BSS: file = "", start = __MAIN_LAST__, size = $C000 - __MAIN_LAST__; } SEGMENTS { - EXEHDR: load = HEADER, type = ro, optional = yes; - CODE: load = RAM, type = rw, optional = yes, define = yes; - RODATA: load = RAM, type = ro, optional = yes; - DATA: load = RAM, type = rw, optional = yes; - BSS: load = RAM, type = bss, optional = yes, define = yes; + ZEROPAGE: load = ZP, type = zp, optional = yes; + EXEHDR: load = HEADER, type = ro, optional = yes; + CODE: load = MAIN, type = rw; + RODATA: load = MAIN, type = ro, optional = yes; + DATA: load = MAIN, type = rw, optional = yes; + BSS: load = BSS, type = bss, optional = yes, define = yes; } diff --git a/cfg/apple2enh-hgr.cfg b/cfg/apple2enh-hgr.cfg new file mode 100644 index 000000000..cfe577e00 --- /dev/null +++ b/cfg/apple2enh-hgr.cfg @@ -0,0 +1,49 @@ +# Configuration for programs including a hires screen (with 6KB LOWCODE) + +FEATURES { + STARTADDRESS: default = $0803; +} +SYMBOLS { + __EXEHDR__: type = import; + __FILETYPE__: type = weak, value = $0006; # ProDOS file type + __STACKSIZE__: type = weak, value = $0800; # 2k stack + __HIMEM__: type = weak, value = $9600; # Presumed RAM end + __LCADDR__: type = weak, value = $D400; # Behind quit code + __LCSIZE__: type = weak, value = $0C00; # Rest of bank two +} +MEMORY { + ZP: file = "", define = yes, start = $0080, size = $001A; + HEADER: file = %O, start = %S - $003A, size = $003A; + MAIN: file = %O, define = yes, start = %S, size = __HIMEM__ - %S; + BSS: file = "", start = __ONCE_RUN__, size = __HIMEM__ - __STACKSIZE__ - __ONCE_RUN__; + LC: file = "", define = yes, start = __LCADDR__, size = __LCSIZE__; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXEHDR: load = HEADER, type = ro, optional = yes; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + HGR: load = MAIN, type = rw, start = $2000; + CODE: load = MAIN, type = ro start = $4000; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw; + ONCE: load = MAIN, type = ro, define = yes; + LC: load = MAIN, run = LC, type = ro, optional = yes; + BSS: load = BSS, type = bss, define = yes; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/cfg/apple2enh-overlay.cfg b/cfg/apple2enh-overlay.cfg index 244e4582f..a0b7678c1 100644 --- a/cfg/apple2enh-overlay.cfg +++ b/cfg/apple2enh-overlay.cfg @@ -1,10 +1,10 @@ # Configuration for overlay programs (overlays located below main program) -# The overlay files don't include the 4 byte DOS 3.3 header so use AppleCommander like this: -# java -jar ac.jar -cc65 mydisk.dsk myprog bin < myprog -# java -jar ac.jar -p mydisk.dsk myprog.1 bin < myprog.1 -# java -jar ac.jar -p mydisk.dsk myprog.2 bin < myprog.2 -# java -jar ac.jar -p mydisk.dsk myprog.3 bin < myprog.3 +# The overlay files are raw binary files so use AppleCommander like this: +# java -jar ac.jar -as mydisk.dsk myprog < myprog +# java -jar ac.jar -p mydisk.dsk myprog.1 bin < myprog.1 +# java -jar ac.jar -p mydisk.dsk myprog.2 bin < myprog.2 +# java -jar ac.jar -p mydisk.dsk myprog.3 bin < myprog.3 # ... FEATURES { @@ -12,21 +12,19 @@ FEATURES { } SYMBOLS { __EXEHDR__: type = import; + __FILETYPE__: type = weak, value = $0006; # ProDOS file type + __STACKSIZE__: type = weak, value = $0800; # 2k stack __HIMEM__: type = weak, value = $9600; # Presumed RAM end __LCADDR__: type = weak, value = $D400; # Behind quit code __LCSIZE__: type = weak, value = $0C00; # Rest of bank two - __STACKSIZE__: type = weak, value = $0800; # 2k stack __OVERLAYSIZE__: type = weak, value = $1000; # 4k overlay - __LOADADDR__: type = weak, value = __STARTUP_RUN__; - __LOADSIZE__: type = weak, value = __INITBSS_RUN__ - __STARTUP_RUN__ + - __MOVE_LAST__ - __MOVE_START__; } MEMORY { - ZP: define = yes, start = $0080, size = $001A; - HEADER: file = %O, start = $0000, size = $0004; - RAM: file = %O, start = %S + __OVERLAYSIZE__, size = __HIMEM__ - __STACKSIZE__ - __OVERLAYSIZE__ - %S; - MOVE: file = %O, define = yes, start = $0000, size = $FFFF; - LC: define = yes, start = __LCADDR__, size = __LCSIZE__; + ZP: file = "", define = yes, start = $0080, size = $001A; + HEADER: file = %O, start = %S - $003A, size = $003A; + MAIN: file = %O, define = yes, start = %S + __OVERLAYSIZE__, size = __HIMEM__ - __OVERLAYSIZE__ - %S; + BSS: file = "", start = __ONCE_RUN__, size = __HIMEM__ - __STACKSIZE__ - __ONCE_RUN__; + LC: file = "", define = yes, start = __LCADDR__, size = __LCSIZE__; OVL1: file = "%O.1", start = %S, size = __OVERLAYSIZE__; OVL2: file = "%O.2", start = %S, size = __OVERLAYSIZE__; OVL3: file = "%O.3", start = %S, size = __OVERLAYSIZE__; @@ -38,32 +36,32 @@ MEMORY { OVL9: file = "%O.9", start = %S, size = __OVERLAYSIZE__; } SEGMENTS { - ZEROPAGE: load = ZP, type = zp; - EXEHDR: load = HEADER, type = ro; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss, define = yes; - BSS: load = RAM, type = bss, define = yes; - INIT: load = MOVE, run = RAM, type = ro, define = yes, optional = yes; - LC: load = MOVE, run = LC, type = ro, optional = yes; - OVERLAY1: load = OVL1, type = ro, define = yes, optional = yes; - OVERLAY2: load = OVL2, type = ro, define = yes, optional = yes; - OVERLAY3: load = OVL3, type = ro, define = yes, optional = yes; - OVERLAY4: load = OVL4, type = ro, define = yes, optional = yes; - OVERLAY5: load = OVL5, type = ro, define = yes, optional = yes; - OVERLAY6: load = OVL6, type = ro, define = yes, optional = yes; - OVERLAY7: load = OVL7, type = ro, define = yes, optional = yes; - OVERLAY8: load = OVL8, type = ro, define = yes, optional = yes; - OVERLAY9: load = OVL9, type = ro, define = yes, optional = yes; + ZEROPAGE: load = ZP, type = zp; + EXEHDR: load = HEADER, type = ro, optional = yes; + STARTUP: load = MAIN, type = ro, define = yes; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw; + ONCE: load = MAIN, type = ro, define = yes; + LC: load = MAIN, run = LC, type = ro, optional = yes; + BSS: load = BSS, type = bss, define = yes; + OVERLAY1: load = OVL1, type = ro, define = yes, optional = yes; + OVERLAY2: load = OVL2, type = ro, define = yes, optional = yes; + OVERLAY3: load = OVL3, type = ro, define = yes, optional = yes; + OVERLAY4: load = OVL4, type = ro, define = yes, optional = yes; + OVERLAY5: load = OVL5, type = ro, define = yes, optional = yes; + OVERLAY6: load = OVL6, type = ro, define = yes, optional = yes; + OVERLAY7: load = OVL7, type = ro, define = yes, optional = yes; + OVERLAY8: load = OVL8, type = ro, define = yes, optional = yes; + OVERLAY9: load = OVL9, type = ro, define = yes, optional = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/apple2enh-system.cfg b/cfg/apple2enh-system.cfg index f07208e45..0170feb93 100644 --- a/cfg/apple2enh-system.cfg +++ b/cfg/apple2enh-system.cfg @@ -1,36 +1,37 @@ -# Configuration for ProDOS 8 system programs (without the header) +# Configuration for ProDOS 8 system programs (allowing for 3KB in LC) SYMBOLS { + __EXEHDR__: type = import; + __FILETYPE__: type = weak, value = $00FF; # ProDOS file type + __STACKSIZE__: type = weak, value = $0800; # 2k stack __LCADDR__: type = weak, value = $D400; # Behind quit code __LCSIZE__: type = weak, value = $0C00; # Rest of bank two - __STACKSIZE__: type = weak, value = $0800; # 2k stack - __LOADADDR__: type = weak, value = __STARTUP_RUN__; - __LOADSIZE__: type = weak, value = __INITBSS_RUN__ - __STARTUP_RUN__ + - __MOVE_LAST__ - __MOVE_START__; } MEMORY { - ZP: define = yes, start = $0080, size = $001A; - RAM: file = %O, start = $2000, size = $9F00 - __STACKSIZE__; - MOVE: file = %O, define = yes, start = $0000, size = $FFFF; - LC: define = yes, start = __LCADDR__, size = __LCSIZE__; + ZP: file = "", define = yes, start = $0080, size = $001A; + HEADER: file = %O, start = $2000 - $003A, size = $003A; + MAIN: file = %O, define = yes, start = $2000, size = $BF00 - $2000; + BSS: file = "", start = __ONCE_RUN__, size = $BF00 - __STACKSIZE__ - __ONCE_RUN__; + LC: file = "", define = yes, start = __LCADDR__, size = __LCSIZE__; } SEGMENTS { - ZEROPAGE: load = ZP, type = zp; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss, define = yes; - BSS: load = RAM, type = bss, define = yes; - INIT: load = MOVE, run = RAM, type = ro, define = yes, optional = yes; - LC: load = MOVE, run = LC, type = ro, optional = yes; + ZEROPAGE: load = ZP, type = zp; + EXEHDR: load = HEADER, type = ro, optional = yes; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw; + ONCE: load = MAIN, type = ro, define = yes; + LC: load = MAIN, run = LC, type = ro, optional = yes; + BSS: load = BSS, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/apple2enh.cfg b/cfg/apple2enh.cfg index 27eb706c4..a6809cf89 100644 --- a/cfg/apple2enh.cfg +++ b/cfg/apple2enh.cfg @@ -5,39 +5,37 @@ FEATURES { } SYMBOLS { __EXEHDR__: type = import; + __FILETYPE__: type = weak, value = $0006; # ProDOS file type + __STACKSIZE__: type = weak, value = $0800; # 2k stack __HIMEM__: type = weak, value = $9600; # Presumed RAM end __LCADDR__: type = weak, value = $D400; # Behind quit code __LCSIZE__: type = weak, value = $0C00; # Rest of bank two - __STACKSIZE__: type = weak, value = $0800; # 2k stack - __LOADADDR__: type = weak, value = __STARTUP_RUN__; - __LOADSIZE__: type = weak, value = __INITBSS_RUN__ - __STARTUP_RUN__ + - __MOVE_LAST__ - __MOVE_START__; } MEMORY { - ZP: define = yes, start = $0080, size = $001A; - HEADER: file = %O, start = $0000, size = $0004; - RAM: file = %O, start = %S, size = __HIMEM__ - __STACKSIZE__ - %S; - MOVE: file = %O, define = yes, start = $0000, size = $FFFF; - LC: define = yes, start = __LCADDR__, size = __LCSIZE__; + ZP: file = "", define = yes, start = $0080, size = $001A; + HEADER: file = %O, start = %S - $003A, size = $003A; + MAIN: file = %O, define = yes, start = %S, size = __HIMEM__ - %S; + BSS: file = "", start = __ONCE_RUN__, size = __HIMEM__ - __STACKSIZE__ - __ONCE_RUN__; + LC: file = "", define = yes, start = __LCADDR__, size = __LCSIZE__; } SEGMENTS { - ZEROPAGE: load = ZP, type = zp; - EXEHDR: load = HEADER, type = ro; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss, define = yes; - BSS: load = RAM, type = bss, define = yes; - INIT: load = MOVE, run = RAM, type = ro, define = yes, optional = yes; - LC: load = MOVE, run = LC, type = ro, optional = yes; + ZEROPAGE: load = ZP, type = zp; + EXEHDR: load = HEADER, type = ro, optional = yes; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw; + ONCE: load = MAIN, type = ro, define = yes; + LC: load = MAIN, run = LC, type = ro, optional = yes; + BSS: load = BSS, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/atari-asm-xex.cfg b/cfg/atari-asm-xex.cfg new file mode 100644 index 000000000..f0a6291db --- /dev/null +++ b/cfg/atari-asm-xex.cfg @@ -0,0 +1,24 @@ +FEATURES { + STARTADDRESS: default = $2E00; +} +SYMBOLS { + __STARTADDRESS__: type = export, value = %S; +} +MEMORY { + ZP: file = "", define = yes, start = $0082, size = $007E; + MAIN: file = %O, define = yes, start = %S, size = $BC20 - %S; +} +FILES { + %O: format = atari; +} +FORMATS { + atari: runad = start; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp, optional = yes; + EXTZP: load = ZP, type = zp, optional = yes; # to enable modules to be able to link to C and assembler programs + CODE: load = MAIN, type = rw, define = yes; + RODATA: load = MAIN, type = ro optional = yes; + DATA: load = MAIN, type = rw optional = yes; + BSS: load = MAIN, type = bss, optional = yes, define = yes; +} diff --git a/cfg/atari-asm.cfg b/cfg/atari-asm.cfg index 4ff7c3173..6fc1c2caa 100644 --- a/cfg/atari-asm.cfg +++ b/cfg/atari-asm.cfg @@ -2,29 +2,29 @@ FEATURES { STARTADDRESS: default = $2E00; } SYMBOLS { - __EXEHDR__: type = import; - __AUTOSTART__: type = import; # force inclusion of autostart "trailer" - __STARTADDRESS__: type = export, value = %S; + __EXEHDR__: type = import; + __AUTOSTART__: type = import; # force inclusion of autostart "trailer" + __STARTADDRESS__: type = export, value = %S; } MEMORY { - ZP: file = "", define = yes, start = $0082, size = $007E; + ZP: file = "", define = yes, start = $0082, size = $007E; # file header, just $FFFF - HEADER: file = %O, start = $0000, size = $0002; + HEADER: file = %O, start = $0000, size = $0002; # "main program" load chunk - MAINHDR: file = %O, start = $0000, size = $0004; - RAM: file = %O, define = yes, start = %S, size = $BC20 - %S; - TRAILER: file = %O, start = $0000, size = $0006; + MAINHDR: file = %O, start = $0000, size = $0004; + MAIN: file = %O, define = yes, start = %S, size = $BC20 - %S; + TRAILER: file = %O, start = $0000, size = $0006; } SEGMENTS { - EXEHDR: load = HEADER, type = ro, optional = yes; - MAINHDR: load = MAINHDR, type = ro, optional = yes; - CODE: load = RAM, type = ro, define = yes, optional = yes; - RODATA: load = RAM, type = ro optional = yes; - DATA: load = RAM, type = rw optional = yes; - BSS: load = RAM, type = bss, define = yes, optional = yes; - ZEROPAGE: load = ZP, type = zp, optional = yes; - EXTZP: load = ZP, type = zp, optional = yes; # to enable modules to be able to link to C and assembler programs - AUTOSTRT: load = TRAILER, type = ro, optional = yes; + ZEROPAGE: load = ZP, type = zp, optional = yes; + EXTZP: load = ZP, type = zp, optional = yes; # to enable modules to be able to link to C and assembler programs + EXEHDR: load = HEADER, type = ro, optional = yes; + MAINHDR: load = MAINHDR, type = ro, optional = yes; + CODE: load = MAIN, type = rw, define = yes; + RODATA: load = MAIN, type = ro optional = yes; + DATA: load = MAIN, type = rw optional = yes; + BSS: load = MAIN, type = bss, optional = yes, define = yes; + AUTOSTRT: load = TRAILER, type = ro, optional = yes; } diff --git a/cfg/atari-cart.cfg b/cfg/atari-cart.cfg index 58457c606..e903d4d74 100644 --- a/cfg/atari-cart.cfg +++ b/cfg/atari-cart.cfg @@ -10,29 +10,30 @@ SYMBOLS { __CARTFLAGS__: type = weak, value = $01; # see documentation for other possible values } MEMORY { - ZP: file = "", define = yes, start = $0082, size = $007E; - RAM: file = "", define = yes, start = %S, size = __CARTSIZE__; - ROM: file = %O, define = yes, start = $C000 - __CARTSIZE__, size = __CARTSIZE__ - 6, fill = yes, fillval = $FF; - CARTID: file = %O, start = $BFFA, size = $0006; + ZP: file = "", define = yes, start = $0082, size = $007E; + MAIN: file = "", define = yes, start = %S, size = __CARTSIZE__; + ROM: file = %O, define = yes, start = $C000 - __CARTSIZE__, size = __CARTSIZE__ - 6, fill = yes, fillval = $FF; + CARTID: file = %O, start = $BFFA, size = $0006; } SEGMENTS { - STARTUP: load = ROM, type = ro, define = yes, optional = yes; - LOWCODE: load = ROM, type = ro, define = yes, optional = yes; - INIT: load = ROM, type = ro, optional = yes; - CODE: load = ROM, type = ro, define = yes; - RODATA: load = ROM, type = ro, optional = yes; - DATA: load = ROM, run = RAM, type = rw, define = yes, optional = yes; - INITBSS: load = RAM, type = bss, optional = yes; - BSS: load = RAM, type = bss, define = yes, optional = yes; - CARTHDR: load = CARTID, type = ro; - ZEROPAGE: load = ZP, type = zp, optional = yes; - EXTZP: load = ZP, type = zp, optional = yes; + ZEROPAGE: load = ZP, type = zp, optional = yes; + EXTZP: load = ZP, type = zp, optional = yes; + STARTUP: load = ROM, type = ro, define = yes, optional = yes; + LOWBSS: load = MAIN, type = bss, optional = yes; # not zero initialized + LOWCODE: load = ROM, type = ro, define = yes, optional = yes; + ONCE: load = ROM, type = ro, optional = yes; + CODE: load = ROM, type = ro, define = yes; + RODATA: load = ROM, type = ro, optional = yes; + DATA: load = ROM, run = MAIN, type = rw, define = yes, optional = yes; + INIT: load = MAIN, type = bss, optional = yes; + BSS: load = MAIN, type = bss, define = yes, optional = yes; + CARTHDR: load = CARTID, type = ro; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/atari-cassette.cfg b/cfg/atari-cassette.cfg index 80b5c695f..13b34cc73 100644 --- a/cfg/atari-cassette.cfg +++ b/cfg/atari-cassette.cfg @@ -8,27 +8,28 @@ SYMBOLS { _cas_hdr: type = import; } MEMORY { - ZP: file = "", define = yes, start = $0082, size = $007E; - RAM: file = %O, define = yes, start = %S, size = $BC20 - __STACKSIZE__ - __RESERVED_MEMORY__ - %S; + ZP: file = "", define = yes, start = $0082, size = $007E; + MAIN: file = %O, define = yes, start = %S, size = $BC20 - __STACKSIZE__ - __RESERVED_MEMORY__ - %S; } SEGMENTS { - CASHDR: load = RAM, type = ro; - STARTUP: load = RAM, type = ro, define = yes, optional = yes; - LOWCODE: load = RAM, type = ro, define = yes, optional = yes; - INIT: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = ro, define = yes; - RODATA: load = RAM, type = ro, optional = yes; - DATA: load = RAM, type = rw, optional = yes; - INITBSS: load = RAM, type = bss, optional = yes; - BSS: load = RAM, type = bss, define = yes, optional = yes; - ZEROPAGE: load = ZP, type = zp, optional = yes; - EXTZP: load = ZP, type = zp, optional = yes; + ZEROPAGE: load = ZP, type = zp, optional = yes; + EXTZP: load = ZP, type = zp, optional = yes; + CASHDR: load = MAIN, type = ro; + STARTUP: load = MAIN, type = ro, define = yes, optional = yes; + LOWBSS: load = MAIN, type = rw, optional = yes; # not zero initialized + LOWCODE: load = MAIN, type = ro, define = yes, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro, define = yes; + RODATA: load = MAIN, type = ro, optional = yes; + DATA: load = MAIN, type = rw, optional = yes; + BSS: load = MAIN, type = bss, define = yes, optional = yes; + INIT: load = MAIN, type = bss, optional = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/atari-overlay.cfg b/cfg/atari-overlay.cfg index b3abad988..9311a1b22 100644 --- a/cfg/atari-overlay.cfg +++ b/cfg/atari-overlay.cfg @@ -11,48 +11,49 @@ SYMBOLS { __RESERVED_MEMORY__: type = weak, value = $0000; } MEMORY { - ZP: file = "", define = yes, start = $0082, size = $007E; + ZP: file = "", define = yes, start = $0082, size = $007E; # file header, just $FFFF - HEADER: file = %O, start = $0000, size = $0002; + HEADER: file = %O, start = $0000, size = $0002; # "system check" load chunk - SYSCHKHDR: file = %O, start = $0000, size = $0004; - SYSCHKCHNK: file = %O, start = $2E00, size = $0300; - SYSCHKTRL: file = %O, start = $0000, size = $0006; + SYSCHKHDR: file = %O, start = $0000, size = $0004; + SYSCHKCHNK: file = %O, start = $2E00, size = $0300; + SYSCHKTRL: file = %O, start = $0000, size = $0006; # "main program" load chunk - MAINHDR: file = %O, start = $0000, size = $0004; - RAM: file = %O, define = yes, start = %S + __OVERLAYSIZE__, - size = $BC20 - __OVERLAYSIZE__ - __STACKSIZE__ - __RESERVED_MEMORY__ - %S; - TRAILER: file = %O, start = $0000, size = $0006; + MAINHDR: file = %O, start = $0000, size = $0004; + MAIN: file = %O, define = yes, start = %S + __OVERLAYSIZE__, size = $BC20 - __OVERLAYSIZE__ - __STACKSIZE__ - __RESERVED_MEMORY__ - %S; + TRAILER: file = %O, start = $0000, size = $0006; - OVL1: file = "%O.1", start = %S, size = __OVERLAYSIZE__; - OVL2: file = "%O.2", start = %S, size = __OVERLAYSIZE__; - OVL3: file = "%O.3", start = %S, size = __OVERLAYSIZE__; - OVL4: file = "%O.4", start = %S, size = __OVERLAYSIZE__; - OVL5: file = "%O.5", start = %S, size = __OVERLAYSIZE__; - OVL6: file = "%O.6", start = %S, size = __OVERLAYSIZE__; - OVL7: file = "%O.7", start = %S, size = __OVERLAYSIZE__; - OVL8: file = "%O.8", start = %S, size = __OVERLAYSIZE__; - OVL9: file = "%O.9", start = %S, size = __OVERLAYSIZE__; +# overlays + OVL1: file = "%O.1", start = %S, size = __OVERLAYSIZE__; + OVL2: file = "%O.2", start = %S, size = __OVERLAYSIZE__; + OVL3: file = "%O.3", start = %S, size = __OVERLAYSIZE__; + OVL4: file = "%O.4", start = %S, size = __OVERLAYSIZE__; + OVL5: file = "%O.5", start = %S, size = __OVERLAYSIZE__; + OVL6: file = "%O.6", start = %S, size = __OVERLAYSIZE__; + OVL7: file = "%O.7", start = %S, size = __OVERLAYSIZE__; + OVL8: file = "%O.8", start = %S, size = __OVERLAYSIZE__; + OVL9: file = "%O.9", start = %S, size = __OVERLAYSIZE__; } SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP, type = zp, optional = yes; EXEHDR: load = HEADER, type = ro; SYSCHKHDR: load = SYSCHKHDR, type = ro, optional = yes; SYSCHK: load = SYSCHKCHNK, type = rw, define = yes, optional = yes; SYSCHKTRL: load = SYSCHKTRL, type = ro, optional = yes; MAINHDR: load = MAINHDR, type = ro; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, define = yes, optional = yes; - INIT: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = ro, define = yes; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss, optional = yes; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; - EXTZP: load = ZP, type = zp, optional = yes; + STARTUP: load = MAIN, type = ro, define = yes; + LOWBSS: load = MAIN, type = rw, optional = yes; # not zero initialized + LOWCODE: load = MAIN, type = ro, define = yes, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro, define = yes; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw, optional = yes; + BSS: load = MAIN, type = bss, define = yes; AUTOSTRT: load = TRAILER, type = ro; OVERLAY1: load = OVL1, type = ro, define = yes, optional = yes; OVERLAY2: load = OVL2, type = ro, define = yes, optional = yes; @@ -68,7 +69,7 @@ FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/atari-xex.cfg b/cfg/atari-xex.cfg new file mode 100644 index 000000000..cabde3708 --- /dev/null +++ b/cfg/atari-xex.cfg @@ -0,0 +1,56 @@ +# Sample linker configuration for C programs using the Atari binary file support. +# Use with: cl65 -tatari -Catari-xex.cfg prog.c -o prog.xex +FEATURES { + STARTADDRESS: default = $2000; +} +SYMBOLS { + __SYSTEM_CHECK__: type = import; # force inclusion of "system check" load chunk + __STACKSIZE__: type = weak, value = $0800; # 2k stack + __STARTADDRESS__: type = export, value = %S; + __RESERVED_MEMORY__: type = weak, value = $0000; + __SYSCHKHDR__: type = export, value = 0; # Disable system check header + __SYSCHKTRL__: type = export, value = 0; # Disable system check trailer +} +MEMORY { + ZP: file = "", define = yes, start = $0082, size = $007E; +# "system check" load chunk + SYSCHKCHNK: file = %O, start = $2E00, size = $0300; +# "main program" load chunk + MAIN: file = %O, define = yes, start = %S, size = $BC20 - __STACKSIZE__ - __RESERVED_MEMORY__ - %S; +} +FILES { + %O: format = atari; +} +FORMATS { + atari: runad = start, + initad = SYSCHKCHNK: __SYSTEM_CHECK__; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP, type = zp, optional = yes; + SYSCHK: load = SYSCHKCHNK, type = rw, define = yes, optional = yes; + STARTUP: load = MAIN, type = ro, define = yes; + LOWBSS: load = MAIN, type = rw, optional = yes; # not zero initialized + LOWCODE: load = MAIN, type = ro, define = yes, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro, define = yes; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw, optional = yes; + BSS: load = MAIN, type = bss, define = yes; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/cfg/atari.cfg b/cfg/atari.cfg index 97b289d7e..106c75e63 100644 --- a/cfg/atari.cfg +++ b/cfg/atari.cfg @@ -10,44 +10,45 @@ SYMBOLS { __RESERVED_MEMORY__: type = weak, value = $0000; } MEMORY { - ZP: file = "", define = yes, start = $0082, size = $007E; + ZP: file = "", define = yes, start = $0082, size = $007E; # file header, just $FFFF - HEADER: file = %O, start = $0000, size = $0002; + HEADER: file = %O, start = $0000, size = $0002; # "system check" load chunk - SYSCHKHDR: file = %O, start = $0000, size = $0004; - SYSCHKCHNK: file = %O, start = $2E00, size = $0300; - SYSCHKTRL: file = %O, start = $0000, size = $0006; + SYSCHKHDR: file = %O, start = $0000, size = $0004; + SYSCHKCHNK: file = %O, start = $2E00, size = $0300; + SYSCHKTRL: file = %O, start = $0000, size = $0006; # "main program" load chunk - MAINHDR: file = %O, start = $0000, size = $0004; - RAM: file = %O, define = yes, start = %S, size = $BC20 - __STACKSIZE__ - __RESERVED_MEMORY__ - %S; - TRAILER: file = %O, start = $0000, size = $0006; + MAINHDR: file = %O, start = $0000, size = $0004; + MAIN: file = %O, define = yes, start = %S, size = $BC20 - __STACKSIZE__ - __RESERVED_MEMORY__ - %S; + TRAILER: file = %O, start = $0000, size = $0006; } SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP, type = zp, optional = yes; EXEHDR: load = HEADER, type = ro; SYSCHKHDR: load = SYSCHKHDR, type = ro, optional = yes; SYSCHK: load = SYSCHKCHNK, type = rw, define = yes, optional = yes; SYSCHKTRL: load = SYSCHKTRL, type = ro, optional = yes; MAINHDR: load = MAINHDR, type = ro; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, define = yes, optional = yes; - INIT: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = ro, define = yes; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss, optional = yes; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; - EXTZP: load = ZP, type = zp, optional = yes; + STARTUP: load = MAIN, type = ro, define = yes; + LOWBSS: load = MAIN, type = rw, optional = yes; # not zero initialized + LOWCODE: load = MAIN, type = ro, define = yes, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro, define = yes; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw, optional = yes; + BSS: load = MAIN, type = bss, define = yes; AUTOSTRT: load = TRAILER, type = ro; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/atari2600.cfg b/cfg/atari2600.cfg new file mode 100644 index 000000000..106edeb30 --- /dev/null +++ b/cfg/atari2600.cfg @@ -0,0 +1,22 @@ +# Atari VCS 2600 linker configuration file for cc65 +# +# Florent Flament (contact@florentflament.com), 2017 + +SYMBOLS { + __STACKSIZE__: type = weak, value = $0010; # 16 Bytes system stack +} + +MEMORY { + RAM: file = "", start = $0080, size = $0080 - __STACKSIZE__, define = yes; + ROM: file = %O, start = $F000, size = $1000, fill = yes, fillval = $FF; +} + +SEGMENTS { + ZEROPAGE: load = RAM, type = zp; + STARTUP: load = ROM, type = ro; + CODE: load = ROM, type = ro; + RODATA: load = ROM, type = ro, optional = yes; + DATA: load = ROM, run = RAM, type = rw, optional = yes, define = yes; + BSS: load = RAM, type = bss, optional = yes; + VECTORS: load = ROM, type = ro, start = $FFFA; +} diff --git a/cfg/atari5200.cfg b/cfg/atari5200.cfg index 4a90303cf..e8f6d44a5 100644 --- a/cfg/atari5200.cfg +++ b/cfg/atari5200.cfg @@ -13,24 +13,25 @@ MEMORY { CARTENTRY: file = %O, start = $BFFE, size = $0002; } SEGMENTS { + ZEROPAGE: load = ZP, type = zp, optional = yes; + EXTZP: load = ZP, type = zp, optional = yes; + DLIST: load = ROM , type = ro, define = yes, optional = yes; STARTUP: load = ROM, type = ro, define = yes, optional = yes; LOWCODE: load = ROM, type = ro, define = yes, optional = yes; - INIT: load = ROM, type = ro, optional = yes; + ONCE: load = ROM, type = ro, optional = yes; CODE: load = ROM, type = ro, define = yes; RODATA: load = ROM, type = ro, optional = yes; DATA: load = ROM, run = RAM, type = rw, define = yes, optional = yes; BSS: load = RAM, type = bss, define = yes, optional = yes; - CARTNAME: load = CARTNAME, type = ro, define = yes; - CARTYEAR: load = CARTYEAR, type = ro, define = yes; - CARTENTRY: load = CARTENTRY, type = ro, define = yes; - ZEROPAGE: load = ZP, type = zp, optional = yes; - EXTZP: load = ZP, type = zp, optional = yes; + CARTNAME: load = CARTNAME, type = ro; + CARTYEAR: load = CARTYEAR, type = ro; + CARTENTRY: load = CARTENTRY, type = ro; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/atari7800.cfg b/cfg/atari7800.cfg new file mode 100644 index 000000000..1eed534f3 --- /dev/null +++ b/cfg/atari7800.cfg @@ -0,0 +1,68 @@ +# Atari VCS 7800 linker configuration file for cc65 +# In order to add the a78 header to the build you can add +# "--force-import __EXEHDR__" to the command line + +SYMBOLS { + __STACKSIZE__: type = weak, value = $0600; # C stack + __CARTSIZE__: type = weak, value = $8000; + __VEC_BOTTOM__: value = $fffa, type = export; + __VEC_SIZE__: value = $6, type = export; + __ENCRYPT_BOTTOM__: value = $ff7a, type = export; + __ENCRYPT_SIZE__: value = $80, type = export; + __MEMORY_TOP__: value = __ENCRYPT_BOTTOM__, type = export; + __INIT_SIZE__: value = 156, type = export; + __MEMORY_INIT__: value = __MEMORY_TOP__ - __INIT_SIZE__, type = export; + __MEMORY_BOTTOM__: value = $10000 - __CARTSIZE__, type = weak; + __FREE_ROM_SIZE__: value = __MEMORY_INIT__ - __MEMORY_BOTTOM__, type = export; +} + +MEMORY { + ZP: file = "", define = yes, start = $0040, size = $00C0, type = rw; + SP: file = "", define = yes, start = $0140, size = $00C0, type = rw; + RAM1: file = "", define = yes, start = $1800, size = $0840, type = rw; + RAM2: file = "", define = yes, start = $2100, size = $0040, type = rw; + RAM3: file = "", define = yes, start = $2200, size = $0600, type = rw; + # For emulators you also need a header file + HEADER: file = %O, start = $0000, size = 128; + # "Normal" cartridge rom. Multiple banks arent supported + # by this script. You may change the rom size, but keep + # two things in mind: + # - start must be a multiple of $1000 + # - ROM must end at $ff79 + ROM: file = %O, define = yes, start = __MEMORY_BOTTOM__, size = __FREE_ROM_SIZE__, type = ro, fill = yes, fillval = $ff; + ROMS: file = %O, define = yes, start = __MEMORY_INIT__, size = __INIT_SIZE__, type = ro, fill = yes, fillval = $ff; + # Encryption stuff + ROME: file = %O, start = __ENCRYPT_BOTTOM__, size = __ENCRYPT_SIZE__, type = ro, fill = yes, fillval = $ff; + # Interrupt vectors + ROMV: file = %O, start = __VEC_BOTTOM__, size = __VEC_SIZE__, type = ro, fill = yes, fillval = $ff; +} + +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP, type = zp; + EXEHDR: load = HEADER, type = ro, optional = yes; + STARTUP: load = ROMS, type = ro, define = yes; + ONCE: load = ROMS, type = ro, define = yes; + CODE: load = ROM, type = ro, define = yes; + RODATA: load = ROM, type = ro, define = yes, align = 256; + DATA: load = ROM, run = RAM1, type = rw, define = yes; + BSS: load = RAM1, type = bss, define = yes; + VECTORS: load = ROMV, type = ro, define = yes; + ENCRYPTION: load = ROME, type = ro define = yes; +} + +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/cfg/atarixl-largehimem.cfg b/cfg/atarixl-largehimem.cfg index f96096995..38fb68db9 100644 --- a/cfg/atarixl-largehimem.cfg +++ b/cfg/atarixl-largehimem.cfg @@ -6,50 +6,47 @@ FEATURES { STARTADDRESS: default = $2400; } - SYMBOLS { - __EXEHDR__: type = import; - __SYSTEM_CHECK__: type = import; # force inclusion of "system check" load chunk - __AUTOSTART__: type = import; # force inclusion of autostart "trailer" - __STACKSIZE__: type = weak, value = $0800; # 2k stack - __STARTADDRESS__: type = export, value = %S; + __EXEHDR__: type = import; + __SYSTEM_CHECK__: type = import; # force inclusion of "system check" load chunk + __AUTOSTART__: type = import; # force inclusion of autostart "trailer" + __STACKSIZE__: type = weak, value = $0800; # 2k stack + __CHARGENSIZE__: type = weak, value = $0400; + __STARTADDRESS__: type = export, value = %S; } - MEMORY { - ZP: file = "", define = yes, start = $0082, size = $007E; + ZP: file = "", define = yes, start = $0082, size = $007E; # just $FFFF - HEADER: file = %O, start = $0000, size = $0002; + HEADER: file = %O, start = $0000, size = $0002; # "system check" load chunk - SYSCHKHDR: file = %O, start = $0000, size = $0004; - SYSCHKCHNK: file = %O, start = $2E00, size = $0300; - SYSCHKTRL: file = %O, start = $0000, size = $0006; + SYSCHKHDR: file = %O, start = $0000, size = $0004; + SYSCHKCHNK: file = %O, start = $2E00, size = $0300; + SYSCHKTRL: file = %O, start = $0000, size = $0006; # "shadow RAM preparation" load chunk - SRPREPHDR: file = %O, start = $0000, size = $0004; - SRPREPCHNK: file = %O, define = yes, start = %S, size = $7C20 - %S - $07FF; # $07FF: space for temp. chargen buffer, 1K aligned - SRPREPTRL: file = %O, start = $0000, size = $0006; + SRPREPHDR: file = %O, start = $0000, size = $0004; + SRPREPCHNK: file = %O, define = yes, start = %S, size = $7C20 - %S - $07FF; # $07FF: space for temp. chargen buffer, 1K aligned + SRPREPTRL: file = %O, start = $0000, size = $0006; # "main program" load chunk - MAINHDR: file = %O, start = $0000, size = $0004; - RAM: file = %O, define = yes, start = %S + - __LOWBSS_SIZE__, size = $D000 - - __STACKSIZE__ - - %S - - __LOWBSS_SIZE__; + MAINHDR: file = %O, start = $0000, size = $0004; + MAIN: file = %O, define = yes, start = %S + __LOWBSS_SIZE__, size = $D000 - __STACKSIZE__ - %S - __LOWBSS_SIZE__; # defines entry point into program - TRAILER: file = %O, start = $0000, size = $0006; + TRAILER: file = %O, start = $0000, size = $0006; # address of relocated character generator - CHARGEN: file = "", define = yes, start = $D800, size = $0400; + CHARGEN: file = "", define = yes, start = $D800, size = __CHARGENSIZE__; # memory beneath the ROM - HIDDEN_RAM: file = "", define = yes, start = $DC00, size = $FFFA - $DC00; + HIDDEN_RAM: file = "", define = yes, start = $D800 + __CHARGENSIZE__, size = $FFFA - $D800 - __CHARGENSIZE__; } - SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP, type = zp, optional = yes; + EXEHDR: load = HEADER, type = ro; SYSCHKHDR: load = SYSCHKHDR, type = ro, optional = yes; @@ -57,30 +54,28 @@ SEGMENTS { SYSCHKTRL: load = SYSCHKTRL, type = ro, optional = yes; SRPREPHDR: load = SRPREPHDR, type = ro; - LOWBSS: load = SRPREPCHNK, type = bss, define = yes; # shared btw. SRPREPCHNK and RAM, not zero initialized + LOWBSS: load = SRPREPCHNK, type = bss, define = yes; # shared btw. SRPREPCHNK and MAIN, not zero initialized SRPREP: load = SRPREPCHNK, type = rw, define = yes; SHADOW_RAM: load = SRPREPCHNK, run = HIDDEN_RAM, type = rw, define = yes, optional = yes; SHADOW_RAM2: load = SRPREPCHNK, run = HIDDEN_RAM, type = rw, define = yes, optional = yes; SRPREPTRL: load = SRPREPTRL, type = ro; MAINHDR: load = MAINHDR, type = ro; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, define = yes, optional = yes; - INIT: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = ro, define = yes; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss, optional = yes; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; - EXTZP: load = ZP, type = zp, optional = yes; + STARTUP: load = MAIN, type = ro, define = yes; + LOWCODE: load = MAIN, type = ro, define = yes, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro, define = yes; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw, optional = yes; + BSS: load = MAIN, type = bss, define = yes; AUTOSTRT: load = TRAILER, type = ro; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/atarixl-overlay.cfg b/cfg/atarixl-overlay.cfg index 7356fc03e..339228ea0 100644 --- a/cfg/atarixl-overlay.cfg +++ b/cfg/atarixl-overlay.cfg @@ -1,67 +1,63 @@ FEATURES { STARTADDRESS: default = $2400; } - SYMBOLS { - __EXEHDR__: type = import; - __SYSTEM_CHECK__: type = import; # force inclusion of "system check" load chunk - __AUTOSTART__: type = import; # force inclusion of autostart "trailer" - __STACKSIZE__: type = weak, value = $0800; # 2k stack - __OVERLAYSIZE__: type = weak, value = $1000; # 4k overlay - __STARTADDRESS__: type = export, value = %S; + __EXEHDR__: type = import; + __SYSTEM_CHECK__: type = import; # force inclusion of "system check" load chunk + __AUTOSTART__: type = import; # force inclusion of autostart "trailer" + __STACKSIZE__: type = weak, value = $0800; # 2k stack + __CHARGENSIZE__: type = weak, value = $0400; + __OVERLAYSIZE__: type = weak, value = $1000; # 4k overlay + __STARTADDRESS__: type = export, value = %S; } - MEMORY { - ZP: file = "", define = yes, start = $0082, size = $007E; + ZP: file = "", define = yes, start = $0082, size = $007E; # just $FFFF - HEADER: file = %O, start = $0000, size = $0002; + HEADER: file = %O, start = $0000, size = $0002; # "system check" load chunk - SYSCHKHDR: file = %O, start = $0000, size = $0004; - SYSCHKCHNK: file = %O, start = $2E00, size = $0300; - SYSCHKTRL: file = %O, start = $0000, size = $0006; + SYSCHKHDR: file = %O, start = $0000, size = $0004; + SYSCHKCHNK: file = %O, start = $2E00, size = $0300; + SYSCHKTRL: file = %O, start = $0000, size = $0006; # "shadow RAM preparation" load chunk - SRPREPHDR: file = %O, start = $0000, size = $0004; - SRPREPCHNK: file = %O, define = yes, start = %S + __OVERLAYSIZE__, size = $7C20 - %S - __OVERLAYSIZE__ - $07FF; # $07FF: space for temp. chargen buffer, 1K aligned - SRPREPTRL: file = %O, start = $0000, size = $0006; + SRPREPHDR: file = %O, start = $0000, size = $0004; + SRPREPCHNK: file = %O, define = yes, start = %S + __OVERLAYSIZE__, size = $7C20 - %S - __OVERLAYSIZE__ - $07FF; # $07FF: space for temp. chargen buffer, 1K aligned + SRPREPTRL: file = %O, start = $0000, size = $0006; # "main program" load chunk - MAINHDR: file = %O, start = $0000, size = $0004; - RAM: file = %O, define = yes, start = %S + - __OVERLAYSIZE__ + - __LOWBSS_SIZE__, size = $D000 - - __STACKSIZE__ - - %S - - __OVERLAYSIZE__ - - __LOWBSS_SIZE__; + MAINHDR: file = %O, start = $0000, size = $0004; + MAIN: file = %O, define = yes, start = %S + __OVERLAYSIZE__ + + __LOWBSS_SIZE__, size = $D000 - __STACKSIZE__ - %S - __OVERLAYSIZE__ - __LOWBSS_SIZE__; # defines entry point into program - TRAILER: file = %O, start = $0000, size = $0006; + TRAILER: file = %O, start = $0000, size = $0006; # memory beneath the ROM preceeding the character generator - HIDDEN_RAM2: file = "", define = yes, start = $D800, size = $0800; + HIDDEN_RAM2: file = "", define = yes, start = $D800, size = $0800; # address of relocated character generator (same addess as ROM version) - CHARGEN: file = "", define = yes, start = $E000, size = $0400; + CHARGEN: file = "", define = yes, start = $E000, size = __CHARGENSIZE__; # memory beneath the ROM - HIDDEN_RAM: file = "", define = yes, start = $E400, size = $FFFA - $E400; + HIDDEN_RAM: file = "", define = yes, start = $E000 + __CHARGENSIZE__, size = $FFFA - $E000 - __CHARGENSIZE__; # overlays - OVL1: file = "%O.1", start = %S, size = __OVERLAYSIZE__; - OVL2: file = "%O.2", start = %S, size = __OVERLAYSIZE__; - OVL3: file = "%O.3", start = %S, size = __OVERLAYSIZE__; - OVL4: file = "%O.4", start = %S, size = __OVERLAYSIZE__; - OVL5: file = "%O.5", start = %S, size = __OVERLAYSIZE__; - OVL6: file = "%O.6", start = %S, size = __OVERLAYSIZE__; - OVL7: file = "%O.7", start = %S, size = __OVERLAYSIZE__; - OVL8: file = "%O.8", start = %S, size = __OVERLAYSIZE__; - OVL9: file = "%O.9", start = %S, size = __OVERLAYSIZE__; + OVL1: file = "%O.1", start = %S, size = __OVERLAYSIZE__; + OVL2: file = "%O.2", start = %S, size = __OVERLAYSIZE__; + OVL3: file = "%O.3", start = %S, size = __OVERLAYSIZE__; + OVL4: file = "%O.4", start = %S, size = __OVERLAYSIZE__; + OVL5: file = "%O.5", start = %S, size = __OVERLAYSIZE__; + OVL6: file = "%O.6", start = %S, size = __OVERLAYSIZE__; + OVL7: file = "%O.7", start = %S, size = __OVERLAYSIZE__; + OVL8: file = "%O.8", start = %S, size = __OVERLAYSIZE__; + OVL9: file = "%O.9", start = %S, size = __OVERLAYSIZE__; } - SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP, type = zp, optional = yes; + EXEHDR: load = HEADER, type = ro; SYSCHKHDR: load = SYSCHKHDR, type = ro, optional = yes; @@ -69,23 +65,21 @@ SEGMENTS { SYSCHKTRL: load = SYSCHKTRL, type = ro, optional = yes; SRPREPHDR: load = SRPREPHDR, type = ro; - LOWBSS: load = SRPREPCHNK, type = bss, define = yes; # shared btw. SRPREPCHNK and RAM, not zero initialized + LOWBSS: load = SRPREPCHNK, type = bss, define = yes; # shared btw. SRPREPCHNK and MAIN, not zero initialized SRPREP: load = SRPREPCHNK, type = rw, define = yes; SHADOW_RAM: load = SRPREPCHNK, run = HIDDEN_RAM, type = rw, define = yes, optional = yes; SHADOW_RAM2: load = SRPREPCHNK, run = HIDDEN_RAM2, type = rw, define = yes, optional = yes; SRPREPTRL: load = SRPREPTRL, type = ro; MAINHDR: load = MAINHDR, type = ro; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, define = yes, optional = yes; - INIT: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = ro, define = yes; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss, optional = yes; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; - EXTZP: load = ZP, type = zp, optional = yes; + STARTUP: load = MAIN, type = ro, define = yes; + LOWCODE: load = MAIN, type = ro, define = yes, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro, define = yes; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw, optional = yes; + BSS: load = MAIN, type = bss, define = yes; AUTOSTRT: load = TRAILER, type = ro; OVERLAY1: load = OVL1, type = ro, define = yes, optional = yes; @@ -102,7 +96,7 @@ FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/atarixl-xex.cfg b/cfg/atarixl-xex.cfg new file mode 100644 index 000000000..1b76855d0 --- /dev/null +++ b/cfg/atarixl-xex.cfg @@ -0,0 +1,80 @@ +# Sample linker configuration for C programs using the Atari binary file support. +# Use with: cl65 -tatarixl -Catarixl-c-xex.cfg prog.c -o prog.xex +FEATURES { + STARTADDRESS: default = $2400; +} +SYMBOLS { + __SYSTEM_CHECK__: type = import; # force inclusion of "system check" load chunk + __STACKSIZE__: type = weak, value = $0800; # 2k stack + __STARTADDRESS__: type = export, value = %S; + __CHARGENSIZE__: type = weak, value = $0400; + __SYSCHKHDR__: type = export, value = 0; # Disable system check header + __SYSCHKTRL__: type = export, value = 0; # Disable system check trailer +} +MEMORY { + ZP: file = "", define = yes, start = $0082, size = $007E; + +# "system check" load chunk + SYSCHKCHNK: file = %O, start = $2E00, size = $0300; + +# "shadow RAM preparation" load chunk + SRPREPCHNK: file = %O, define = yes, start = %S, size = $7C20 - %S - $07FF; # $07FF: space for temp. chargen buffer, 1K aligned + +# "main program" load chunk + MAIN: file = %O, define = yes, start = %S + __LOWBSS_SIZE__, size = $D000 - __STACKSIZE__ - %S - __LOWBSS_SIZE__; + +# memory beneath the ROM preceeding the character generator + HIDDEN_RAM2: file = "", define = yes, start = $D800, size = $0800; + +# address of relocated character generator (same addess as ROM version) + CHARGEN: file = "", define = yes, start = $E000, size = __CHARGENSIZE__; + +# memory beneath the ROM + HIDDEN_RAM: file = "", define = yes, start = $E000 + __CHARGENSIZE__, size = $FFFA - $E000 - __CHARGENSIZE__; + +# UNUSED - hide + UNUSED: file = "", start = $0, size = $10; +} +FILES { + %O: format = atari; +} +FORMATS { + atari: runad = start, + initad = SYSCHKCHNK: __SYSTEM_CHECK__, + initad = SRPREPCHNK: sramprep; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP, type = zp, optional = yes; + + SYSCHK: load = SYSCHKCHNK, type = rw, define = yes, optional = yes; + LOWBSS: load = SRPREPCHNK, type = bss, define = yes; # shared btw. SRPREPCHNK and MAIN, not zero initialized + SRPREP: load = SRPREPCHNK, type = rw, define = yes; + SHADOW_RAM: load = SRPREPCHNK, run = HIDDEN_RAM, type = rw, define = yes, optional = yes; + SHADOW_RAM2: load = SRPREPCHNK, run = HIDDEN_RAM2, type = rw, define = yes, optional = yes; + STARTUP: load = MAIN, type = ro, define = yes; + LOWCODE: load = MAIN, type = ro, define = yes, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro, define = yes; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw, optional = yes; + BSS: load = MAIN, type = bss, define = yes; + SRPREPHDR: load = UNUSED, type = ro; + SRPREPTRL: load = UNUSED, type = ro; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/cfg/atarixl.cfg b/cfg/atarixl.cfg index 84992a205..cece23555 100644 --- a/cfg/atarixl.cfg +++ b/cfg/atarixl.cfg @@ -1,53 +1,50 @@ FEATURES { STARTADDRESS: default = $2400; } - SYMBOLS { - __EXEHDR__: type = import; - __SYSTEM_CHECK__: type = import; # force inclusion of "system check" load chunk - __AUTOSTART__: type = import; # force inclusion of autostart "trailer" - __STACKSIZE__: type = weak, value = $0800; # 2k stack - __STARTADDRESS__: type = export, value = %S; + __EXEHDR__: type = import; + __SYSTEM_CHECK__: type = import; # force inclusion of "system check" load chunk + __AUTOSTART__: type = import; # force inclusion of autostart "trailer" + __STACKSIZE__: type = weak, value = $0800; # 2k stack + __CHARGENSIZE__: type = weak, value = $0400; + __STARTADDRESS__: type = export, value = %S; } - MEMORY { - ZP: file = "", define = yes, start = $0082, size = $007E; + ZP: file = "", define = yes, start = $0082, size = $007E; # just $FFFF - HEADER: file = %O, start = $0000, size = $0002; + HEADER: file = %O, start = $0000, size = $0002; # "system check" load chunk - SYSCHKHDR: file = %O, start = $0000, size = $0004; - SYSCHKCHNK: file = %O, start = $2E00, size = $0300; - SYSCHKTRL: file = %O, start = $0000, size = $0006; + SYSCHKHDR: file = %O, start = $0000, size = $0004; + SYSCHKCHNK: file = %O, start = $2E00, size = $0300; + SYSCHKTRL: file = %O, start = $0000, size = $0006; # "shadow RAM preparation" load chunk - SRPREPHDR: file = %O, start = $0000, size = $0004; - SRPREPCHNK: file = %O, define = yes, start = %S, size = $7C20 - %S - $07FF; # $07FF: space for temp. chargen buffer, 1K aligned - SRPREPTRL: file = %O, start = $0000, size = $0006; + SRPREPHDR: file = %O, start = $0000, size = $0004; + SRPREPCHNK: file = %O, define = yes, start = %S, size = $7C20 - %S - $07FF; # $07FF: space for temp. chargen buffer, 1K aligned + SRPREPTRL: file = %O, start = $0000, size = $0006; # "main program" load chunk - MAINHDR: file = %O, start = $0000, size = $0004; - RAM: file = %O, define = yes, start = %S + - __LOWBSS_SIZE__, size = $D000 - - __STACKSIZE__ - - %S - - __LOWBSS_SIZE__; + MAINHDR: file = %O, start = $0000, size = $0004; + MAIN: file = %O, define = yes, start = %S + __LOWBSS_SIZE__, size = $D000 - __STACKSIZE__ - %S - __LOWBSS_SIZE__; # defines entry point into program - TRAILER: file = %O, start = $0000, size = $0006; + TRAILER: file = %O, start = $0000, size = $0006; # memory beneath the ROM preceeding the character generator - HIDDEN_RAM2: file = "", define = yes, start = $D800, size = $0800; + HIDDEN_RAM2: file = "", define = yes, start = $D800, size = $0800; # address of relocated character generator (same addess as ROM version) - CHARGEN: file = "", define = yes, start = $E000, size = $0400; + CHARGEN: file = "", define = yes, start = $E000, size = __CHARGENSIZE__; # memory beneath the ROM - HIDDEN_RAM: file = "", define = yes, start = $E400, size = $FFFA - $E400; + HIDDEN_RAM: file = "", define = yes, start = $E000 + __CHARGENSIZE__, size = $FFFA - $E000 - __CHARGENSIZE__; } - SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP, type = zp, optional = yes; + EXEHDR: load = HEADER, type = ro; SYSCHKHDR: load = SYSCHKHDR, type = ro, optional = yes; @@ -55,30 +52,28 @@ SEGMENTS { SYSCHKTRL: load = SYSCHKTRL, type = ro, optional = yes; SRPREPHDR: load = SRPREPHDR, type = ro; - LOWBSS: load = SRPREPCHNK, type = bss, define = yes; # shared btw. SRPREPCHNK and RAM, not zero initialized + LOWBSS: load = SRPREPCHNK, type = bss, define = yes; # shared btw. SRPREPCHNK and MAIN, not zero initialized SRPREP: load = SRPREPCHNK, type = rw, define = yes; SHADOW_RAM: load = SRPREPCHNK, run = HIDDEN_RAM, type = rw, define = yes, optional = yes; SHADOW_RAM2: load = SRPREPCHNK, run = HIDDEN_RAM2, type = rw, define = yes, optional = yes; SRPREPTRL: load = SRPREPTRL, type = ro; MAINHDR: load = MAINHDR, type = ro; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, define = yes, optional = yes; - INIT: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = ro, define = yes; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss, optional = yes; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; - EXTZP: load = ZP, type = zp, optional = yes; + STARTUP: load = MAIN, type = ro, define = yes; + LOWCODE: load = MAIN, type = ro, define = yes, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro, define = yes; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw, optional = yes; + BSS: load = MAIN, type = bss, define = yes; AUTOSTRT: load = TRAILER, type = ro; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/atmos.cfg b/cfg/atmos.cfg index a1f935efa..35f184f4f 100644 --- a/cfg/atmos.cfg +++ b/cfg/atmos.cfg @@ -8,30 +8,31 @@ SYMBOLS { __RAMEND__: type = weak, value = $9800 + $1C00 * __GRAB__; } MEMORY { - ZP: file = "", define = yes, start = $00E2, size = $001A; - TAPEHDR: file = %O, type = ro, start = $0000, size = $001F; - BASHEAD: file = %O, define = yes, start = $0501, size = $000D; - RAM: file = %O, define = yes, start = __BASHEAD_LAST__, size = __RAMEND__ - __RAM_START__ - __STACKSIZE__; + ZP: file = "", define = yes, start = $00E2, size = $001A; + TAPEHDR: file = %O, type = ro, start = $0000, size = $001F; + BASHEAD: file = %O, define = yes, start = $0501, size = $000D; + MAIN: file = %O, define = yes, start = __BASHEAD_LAST__, size = __RAMEND__ - __MAIN_START__; + BSS: file = "", start = __ONCE_RUN__, size = __RAMEND__ - __STACKSIZE__ - __ONCE_RUN__; } SEGMENTS { ZEROPAGE: load = ZP, type = zp; TAPEHDR: load = TAPEHDR, type = ro; - BASHDR: load = BASHEAD, type = ro, define = yes, optional = yes; - STARTUP: load = RAM, type = ro; - LOWCODE: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - INIT: load = RAM, type = ro, define = yes, optional = yes; - DATA: load = RAM, type = rw; - ZPSAVE1: load = RAM, type = rw, define = yes; # ZPSAVE1, ZPSAVE2 must be together - ZPSAVE2: load = RAM, type = bss; # see "libsrc/atmos/crt0.s" - BSS: load = RAM, type = bss, define = yes; + BASHDR: load = BASHEAD, type = ro, optional = yes; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw; + ONCE: load = MAIN, type = ro, define = yes; + BASTAIL: load = MAIN, type = ro, optional = yes; + BSS: load = BSS, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/bbc.cfg b/cfg/bbc.cfg index 6304c309b..60bf372f0 100644 --- a/cfg/bbc.cfg +++ b/cfg/bbc.cfg @@ -2,24 +2,24 @@ SYMBOLS { __STACKSIZE__: type = weak, value = $0800; # 2k stack } MEMORY { - ZP: file = "", define = yes, start = $0070, size = $0020; - RAM: file = %O, start = $0E00, size = $7200 - __STACKSIZE__; + ZP: file = "", define = yes, start = $0070, size = $0020; + MAIN: file = %O, start = $0E00, size = $7200 - __STACKSIZE__; } SEGMENTS { - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; + ZEROPAGE: load = ZP, type = zp; + STARTUP: load = MAIN, type = ro, define = yes; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/c128-asm.cfg b/cfg/c128-asm.cfg new file mode 100644 index 000000000..0da296c71 --- /dev/null +++ b/cfg/c128-asm.cfg @@ -0,0 +1,20 @@ +FEATURES { + STARTADDRESS: default = $1c01; +} +SYMBOLS { + __LOADADDR__: type = import; +} +MEMORY { + ZP: file = "", start = $0002, size = $00FE, define = yes; + LOADADDR: file = %O, start = %S - 2, size = $0002; + MAIN: file = %O, start = %S, size = $D000 - %S; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp, optional = yes; + LOADADDR: load = LOADADDR, type = ro; + EXEHDR: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = rw; + RODATA: load = MAIN, type = ro, optional = yes; + DATA: load = MAIN, type = rw, optional = yes; + BSS: load = MAIN, type = bss, optional = yes, define = yes; +} diff --git a/cfg/c128-overlay.cfg b/cfg/c128-overlay.cfg index f2cc3c40c..e2cff8b7c 100644 --- a/cfg/c128-overlay.cfg +++ b/cfg/c128-overlay.cfg @@ -9,7 +9,7 @@ MEMORY { ZP: file = "", define = yes, start = $0002, size = $001A; LOADADDR: file = %O, start = $1BFF, size = $0002; HEADER: file = %O, start = $1C01, size = $000C; - RAM: file = %O, define = yes, start = $1C0D, size = $A3F3 - __OVERLAYSIZE__ - __STACKSIZE__; + MAIN: file = %O, define = yes, start = $1C0D, size = $A3F3 - __OVERLAYSIZE__ - __STACKSIZE__; OVL1ADDR: file = "%O.1", start = $BFFE - __OVERLAYSIZE__, size = $0002; OVL1: file = "%O.1", start = $C000 - __OVERLAYSIZE__, size = __OVERLAYSIZE__; OVL2ADDR: file = "%O.2", start = $BFFE - __OVERLAYSIZE__, size = $0002; @@ -30,17 +30,17 @@ MEMORY { OVL9: file = "%O.9", start = $C000 - __OVERLAYSIZE__, size = __OVERLAYSIZE__; } SEGMENTS { + ZEROPAGE: load = ZP, type = zp; LOADADDR: load = LOADADDR, type = ro; EXEHDR: load = HEADER, type = ro; - STARTUP: load = RAM, type = ro; - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = bss; + BSS: load = MAIN, type = bss, define = yes; OVL1ADDR: load = OVL1ADDR, type = ro; OVERLAY1: load = OVL1, type = ro, define = yes, optional = yes; OVL2ADDR: load = OVL2ADDR, type = ro; @@ -64,7 +64,7 @@ FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/c128.cfg b/cfg/c128.cfg index ef2aa4184..0ed22266c 100644 --- a/cfg/c128.cfg +++ b/cfg/c128.cfg @@ -7,26 +7,26 @@ MEMORY { ZP: file = "", define = yes, start = $0002, size = $001A; LOADADDR: file = %O, start = $1BFF, size = $0002; HEADER: file = %O, start = $1C01, size = $000C; - RAM: file = %O, define = yes, start = $1C0D, size = $A3F3 - __STACKSIZE__; + MAIN: file = %O, define = yes, start = $1C0D, size = $A3F3 - __STACKSIZE__; } SEGMENTS { + ZEROPAGE: load = ZP, type = zp; LOADADDR: load = LOADADDR, type = ro; EXEHDR: load = HEADER, type = ro; - STARTUP: load = RAM, type = ro; - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = bss; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/c16-32k.cfg b/cfg/c16-32k.cfg new file mode 100644 index 000000000..b67c66b96 --- /dev/null +++ b/cfg/c16-32k.cfg @@ -0,0 +1,39 @@ +SYMBOLS { + __LOADADDR__: type = import; + __EXEHDR__: type = import; + __STACKSIZE__: type = weak, value = $0800; # 2k stack +} +MEMORY { + ZP: file = "", define = yes, start = $0002, size = $001A; + LOADADDR: file = %O, start = $0FFF, size = $0002; + HEADER: file = %O, start = $1001, size = $000C; + MAIN: file = %O, start = $100D, size = $6FF3 - __STACKSIZE__; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + LOADADDR: load = LOADADDR, type = ro; + EXEHDR: load = HEADER, type = ro; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = bss; + BSS: load = MAIN, type = bss, define = yes; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/cfg/c16.cfg b/cfg/c16.cfg index efb42991f..41545d473 100644 --- a/cfg/c16.cfg +++ b/cfg/c16.cfg @@ -1,32 +1,32 @@ SYMBOLS { __LOADADDR__: type = import; __EXEHDR__: type = import; - __STACKSIZE__: type = weak, value = $0800; # 2k stack + __STACKSIZE__: type = weak, value = $0400; # 1k stack } MEMORY { ZP: file = "", define = yes, start = $0002, size = $001A; LOADADDR: file = %O, start = $0FFF, size = $0002; HEADER: file = %O, start = $1001, size = $000C; - RAM: file = %O, start = $100D, size = $6FF3 - __STACKSIZE__; + MAIN: file = %O, start = $100D, size = $2FF3 - __STACKSIZE__; } SEGMENTS { + ZEROPAGE: load = ZP, type = zp; LOADADDR: load = LOADADDR, type = ro; - EXEHDR: load = HEADER, type = ro; - STARTUP: load = RAM, type = ro; - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; + EXEHDR: load = HEADER, type = ro; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = bss; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/c64-asm.cfg b/cfg/c64-asm.cfg index 1ab80be8e..e2dda5362 100644 --- a/cfg/c64-asm.cfg +++ b/cfg/c64-asm.cfg @@ -5,16 +5,16 @@ SYMBOLS { __LOADADDR__: type = import; } MEMORY { - ZP: file = "", start = $0002, size = $001A, define = yes; + ZP: file = "", start = $0002, size = $00FE, define = yes; LOADADDR: file = %O, start = %S - 2, size = $0002; - RAM: file = %O, start = %S, size = $D000 - %S; + MAIN: file = %O, start = %S, size = $D000 - %S; } SEGMENTS { - LOADADDR: load = LOADADDR, type = ro; - EXEHDR: load = RAM, type = ro, optional = yes; - CODE: load = RAM, type = rw, optional = yes; - RODATA: load = RAM, type = ro, optional = yes; - DATA: load = RAM, type = rw, optional = yes; - BSS: load = RAM, type = bss, optional = yes; ZEROPAGE: load = ZP, type = zp, optional = yes; + LOADADDR: load = LOADADDR, type = ro; + EXEHDR: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = rw; + RODATA: load = MAIN, type = ro, optional = yes; + DATA: load = MAIN, type = rw, optional = yes; + BSS: load = MAIN, type = bss, optional = yes, define = yes; } diff --git a/cfg/c64-overlay.cfg b/cfg/c64-overlay.cfg index 1c3b19c09..0f42434ad 100644 --- a/cfg/c64-overlay.cfg +++ b/cfg/c64-overlay.cfg @@ -1,5 +1,5 @@ FEATURES { - STARTADDRESS: default = $0801; + STARTADDRESS: default = $0801; } SYMBOLS { __LOADADDR__: type = import; @@ -14,9 +14,8 @@ MEMORY { ZP: file = "", define = yes, start = $0002, size = $001A; LOADADDR: file = %O, start = %S - 2, size = $0002; HEADER: file = %O, define = yes, start = %S, size = $000D; - MAIN: file = %O, define = yes, start = __HEADER_LAST__, size = __OVERLAYSTART__ - __STACKSIZE__ - __HEADER_LAST__; - MOVE: file = %O, start = __INITBSS_LOAD__, size = __HIMEM__ - __BSS_RUN__; - INIT: file = "", start = __BSS_RUN__, size = __HIMEM__ - __BSS_RUN__; + MAIN: file = %O, define = yes, start = __HEADER_LAST__, size = __OVERLAYSTART__ - __HEADER_LAST__; + BSS: file = "", start = __ONCE_RUN__, size = __OVERLAYSTART__ - __STACKSIZE__ - __ONCE_RUN__; OVL1ADDR: file = "%O.1", start = __OVERLAYSTART__ - 2, size = $0002; OVL1: file = "%O.1", start = __OVERLAYSTART__, size = __OVERLAYSIZE__; OVL2ADDR: file = "%O.2", start = __OVERLAYSTART__ - 2, size = $0002; @@ -37,41 +36,41 @@ MEMORY { OVL9: file = "%O.9", start = __OVERLAYSTART__, size = __OVERLAYSIZE__; } SEGMENTS { - ZEROPAGE: load = ZP, type = zp; - LOADADDR: load = LOADADDR, type = ro; - EXEHDR: load = HEADER, type = ro; - STARTUP: load = MAIN, type = ro; - LOWCODE: load = MAIN, type = ro, optional = yes; - CODE: load = MAIN, type = ro; - RODATA: load = MAIN, type = ro; - DATA: load = MAIN, type = rw; - INITBSS: load = MAIN, type = bss, define = yes; - BSS: load = MAIN, type = bss, define = yes; - INIT: load = MOVE, run = INIT, type = ro, define = yes; - OVL1ADDR: load = OVL1ADDR, type = ro; - OVERLAY1: load = OVL1, type = ro, define = yes, optional = yes; - OVL2ADDR: load = OVL2ADDR, type = ro; - OVERLAY2: load = OVL2, type = ro, define = yes, optional = yes; - OVL3ADDR: load = OVL3ADDR, type = ro; - OVERLAY3: load = OVL3, type = ro, define = yes, optional = yes; - OVL4ADDR: load = OVL4ADDR, type = ro; - OVERLAY4: load = OVL4, type = ro, define = yes, optional = yes; - OVL5ADDR: load = OVL5ADDR, type = ro; - OVERLAY5: load = OVL5, type = ro, define = yes, optional = yes; - OVL6ADDR: load = OVL6ADDR, type = ro; - OVERLAY6: load = OVL6, type = ro, define = yes, optional = yes; - OVL7ADDR: load = OVL7ADDR, type = ro; - OVERLAY7: load = OVL7, type = ro, define = yes, optional = yes; - OVL8ADDR: load = OVL8ADDR, type = ro; - OVERLAY8: load = OVL8, type = ro, define = yes, optional = yes; - OVL9ADDR: load = OVL9ADDR, type = ro; - OVERLAY9: load = OVL9, type = ro, define = yes, optional = yes; + ZEROPAGE: load = ZP, type = zp; + LOADADDR: load = LOADADDR, type = ro; + EXEHDR: load = HEADER, type = ro; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw; + ONCE: load = MAIN, type = ro, define = yes; + BSS: load = BSS, type = bss, define = yes; + OVL1ADDR: load = OVL1ADDR, type = ro; + OVERLAY1: load = OVL1, type = ro, define = yes, optional = yes; + OVL2ADDR: load = OVL2ADDR, type = ro; + OVERLAY2: load = OVL2, type = ro, define = yes, optional = yes; + OVL3ADDR: load = OVL3ADDR, type = ro; + OVERLAY3: load = OVL3, type = ro, define = yes, optional = yes; + OVL4ADDR: load = OVL4ADDR, type = ro; + OVERLAY4: load = OVL4, type = ro, define = yes, optional = yes; + OVL5ADDR: load = OVL5ADDR, type = ro; + OVERLAY5: load = OVL5, type = ro, define = yes, optional = yes; + OVL6ADDR: load = OVL6ADDR, type = ro; + OVERLAY6: load = OVL6, type = ro, define = yes, optional = yes; + OVL7ADDR: load = OVL7ADDR, type = ro; + OVERLAY7: load = OVL7, type = ro, define = yes, optional = yes; + OVL8ADDR: load = OVL8ADDR, type = ro; + OVERLAY8: load = OVL8, type = ro, define = yes, optional = yes; + OVL9ADDR: load = OVL9ADDR, type = ro; + OVERLAY9: load = OVL9, type = ro, define = yes, optional = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/c64.cfg b/cfg/c64.cfg index 2a105c7f1..5bd8d8240 100644 --- a/cfg/c64.cfg +++ b/cfg/c64.cfg @@ -1,5 +1,5 @@ FEATURES { - STARTADDRESS: default = $0801; + STARTADDRESS: default = $0801; } SYMBOLS { __LOADADDR__: type = import; @@ -8,31 +8,30 @@ SYMBOLS { __HIMEM__: type = weak, value = $D000; } MEMORY { - ZP: file = "", define = yes, start = $0002, size = $001A; - LOADADDR: file = %O, start = %S - 2, size = $0002; - HEADER: file = %O, define = yes, start = %S, size = $000D; - MAIN: file = %O, define = yes, start = __HEADER_LAST__, size = __HIMEM__ - __STACKSIZE__ - __HEADER_LAST__; - MOVE: file = %O, start = __INITBSS_LOAD__, size = __HIMEM__ - __BSS_RUN__; - INIT: file = "", start = __BSS_RUN__, size = __HIMEM__ - __BSS_RUN__; + ZP: file = "", define = yes, start = $0002, size = $001A; + LOADADDR: file = %O, start = %S - 2, size = $0002; + HEADER: file = %O, define = yes, start = %S, size = $000D; + MAIN: file = %O, define = yes, start = __HEADER_LAST__, size = __HIMEM__ - __HEADER_LAST__; + BSS: file = "", start = __ONCE_RUN__, size = __HIMEM__ - __STACKSIZE__ - __ONCE_RUN__; } SEGMENTS { - ZEROPAGE: load = ZP, type = zp; - LOADADDR: load = LOADADDR, type = ro; - EXEHDR: load = HEADER, type = ro; - STARTUP: load = MAIN, type = ro; - LOWCODE: load = MAIN, type = ro, optional = yes; - CODE: load = MAIN, type = ro; - RODATA: load = MAIN, type = ro; - DATA: load = MAIN, type = rw; - INITBSS: load = MAIN, type = bss, define = yes; - BSS: load = MAIN, type = bss, define = yes; - INIT: load = MOVE, run = INIT, type = ro, define = yes; + ZEROPAGE: load = ZP, type = zp; + LOADADDR: load = LOADADDR, type = ro; + EXEHDR: load = HEADER, type = ro; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw; + ONCE: load = MAIN, type = ro, define = yes; + BSS: load = BSS, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/cbm510.cfg b/cfg/cbm510.cfg index d0775b6f2..f4db154ab 100644 --- a/cfg/cbm510.cfg +++ b/cfg/cbm510.cfg @@ -8,30 +8,30 @@ MEMORY { STARTUP: file = %O, start = $00FE, size = $0102, fill = yes; PAGE2: file = %O, start = $0200, size = $0100, fill = yes; PAGE3: file = %O, start = $0300, size = $0100, fill = yes; - RAM: file = %O, start = $0400, size = $DC00; + MAIN: file = %O, start = $0400, size = $DC00; CHARRAM: file = "", define = yes, start = $E000, size = $1000; VIDRAM: file = "", define = yes, start = $F000, size = $0400; } SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP, type = rw, define = yes; EXEHDR: load = HEADER, type = rw; STARTUP: load = STARTUP, type = rw; PAGE2: load = PAGE2, type = rw; PAGE3: load = PAGE3, type = rw; - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; - EXTZP: load = ZP, type = rw, define = yes; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = bss, optional = yes; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/cbm610.cfg b/cfg/cbm610.cfg index ae66f4c4a..da829c9b4 100644 --- a/cfg/cbm610.cfg +++ b/cfg/cbm610.cfg @@ -7,28 +7,28 @@ MEMORY { STARTUP: file = %O, start = $00FE, size = $0102, fill = yes; PAGE2: file = %O, start = $0200, size = $0100, fill = yes; PAGE3: file = %O, start = $0300, size = $0100, fill = yes; - RAM: file = %O, start = $0400, size = $FECB - __STACKSIZE__; + MAIN: file = %O, start = $0400, size = $FECB - __STACKSIZE__; } SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP, type = rw, define = yes; EXEHDR: load = HEADER, type = rw; STARTUP: load = STARTUP, type = rw; PAGE2: load = PAGE2, type = rw; PAGE3: load = PAGE3, type = rw; - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; - EXTZP: load = ZP, type = rw, define = yes; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = bss, optional = yes; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/creativision.cfg b/cfg/creativision.cfg new file mode 100644 index 000000000..2eb9ac427 --- /dev/null +++ b/cfg/creativision.cfg @@ -0,0 +1,36 @@ +SYMBOLS { + __STACKSIZE__: type = weak, value = $0040; +} +MEMORY { + ZP: file = "", define = yes, start = $0020, size = $00E0; + RAM: file = "", define = yes, start = $01FA, size = $0206 - __STACKSIZE__; + ROM: file = %O, define = yes, start = $B000, size = $1000, fill = yes, fillval = $FF; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + ZP: load = ZP, type = zp, optional = yes; + VECTORS: load = ROM, run = RAM, type = rw, define = yes; + DATA: load = ROM, run = RAM, type = rw, define = yes, start = $0204; + BSS: load = RAM, type = bss, define = yes; + ONCE: load = ROM, type = ro, optional = yes; + CODE: load = ROM, type = ro; + INIT: load = ROM, type = ro; + RODATA: load = ROM, type = ro; + AUDIO: load = ROM, type = ro, optional = yes, start = $BF00; + SETUP: load = ROM, type = ro, start = $BFE8; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = INIT; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/cfg/cx16-asm.cfg b/cfg/cx16-asm.cfg new file mode 100644 index 000000000..1b1cce8ec --- /dev/null +++ b/cfg/cx16-asm.cfg @@ -0,0 +1,43 @@ +FEATURES { + STARTADDRESS: default = $0801; +} +SYMBOLS { + __LOADADDR__: type = import; +# Putting "-u __EXEHDR__" on cl65's command line will add a BASIC RUN stub to your program. +# __EXEHDR__: type = import; + __HIMEM__: type = weak, value = $9F00; +} +MEMORY { + ZP: file = "", start = $0022, size = $0080 - $0022, define = yes; + ZP2: file = "", start = $00A9, size = $0100 - $00A9; + LOADADDR: file = %O, start = %S - 2, size = $0002; + MAIN: file = %O, start = %S, size = __HIMEM__ - %S; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP2, type = zp, optional = yes; # OK if BASIC functions not used + LOADADDR: load = LOADADDR, type = ro; + EXEHDR: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = bss, optional = yes; + BSS: load = MAIN, type = bss, define = yes; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/cfg/cx16-bank.cfg b/cfg/cx16-bank.cfg new file mode 100644 index 000000000..d3c2c02ae --- /dev/null +++ b/cfg/cx16-bank.cfg @@ -0,0 +1,108 @@ +FEATURES { + STARTADDRESS: default = $0801; +} +SYMBOLS { + __LOADADDR__: type = import; + __EXEHDR__: type = import; + __BANKRAMADDR__: type = import; + __STACKSIZE__: type = weak, value = $0800; # 2K stack + __HIMEM__: type = weak, value = $9F00; + __BANKRAMSTART__: type = export, value = $A000; + __BANKRAMSIZE__: type = weak, value = $2000; # 8K banked RAM +} +MEMORY { + ZP: file = "", define = yes, start = $0022, size = $0080 - $0022; + LOADADDR: file = %O, start = %S - 2, size = $0002; + HEADER: file = %O, define = yes, start = %S, size = $000D; + MAIN: file = %O, define = yes, start = __HEADER_LAST__, size = __HIMEM__ - __HEADER_LAST__; + BSS: file = "", start = __ONCE_RUN__, size = __HIMEM__ - __ONCE_RUN__ - __STACKSIZE__; + BRAM01ADDR: file = "%O.01", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM01: file = "%O.01", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $01; + BRAM02ADDR: file = "%O.02", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM02: file = "%O.02", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $02; + BRAM03ADDR: file = "%O.03", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM03: file = "%O.03", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $03; + BRAM04ADDR: file = "%O.04", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM04: file = "%O.04", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $04; + BRAM05ADDR: file = "%O.05", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM05: file = "%O.05", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $05; + BRAM06ADDR: file = "%O.06", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM06: file = "%O.06", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $06; + BRAM07ADDR: file = "%O.07", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM07: file = "%O.07", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $07; + BRAM08ADDR: file = "%O.08", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM08: file = "%O.08", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $08; + BRAM09ADDR: file = "%O.09", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM09: file = "%O.09", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $09; + BRAM0AADDR: file = "%O.0A", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM0A: file = "%O.0A", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $0A; + BRAM0BADDR: file = "%O.0B", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM0B: file = "%O.0B", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $0B; + BRAM0CADDR: file = "%O.0C", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM0C: file = "%O.0C", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $0C; + BRAM0DADDR: file = "%O.0D", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM0D: file = "%O.0D", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $0D; + BRAM0EADDR: file = "%O.0E", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM0E: file = "%O.0E", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $0E; + BRAM0FADDR: file = "%O.0F", start = __BANKRAMSTART__ - 2, size = $0002; + BRAM0F: file = "%O.0F", start = __BANKRAMSTART__, size = __BANKRAMSIZE__, bank = $0F; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP, type = zp, optional = yes; + LOADADDR: load = LOADADDR, type = ro; + EXEHDR: load = HEADER, type = ro; + STARTUP: load = MAIN, type = ro, optional = yes; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw, optional = yes; + ONCE: load = MAIN, type = ro, define = yes; + BSS: load = BSS, type = bss, define = yes; + BRAM01ADDR: load = BRAM01ADDR, type = ro, optional = yes; + BANKRAM01: load = BRAM01, type = rw, optional = yes, define = yes; + BRAM02ADDR: load = BRAM02ADDR, type = ro, optional = yes; + BANKRAM02: load = BRAM02, type = rw, optional = yes, define = yes; + BRAM03ADDR: load = BRAM03ADDR, type = ro, optional = yes; + BANKRAM03: load = BRAM03, type = rw, optional = yes, define = yes; + BRAM04ADDR: load = BRAM04ADDR, type = ro, optional = yes; + BANKRAM04: load = BRAM04, type = rw, optional = yes, define = yes; + BRAM05ADDR: load = BRAM05ADDR, type = ro, optional = yes; + BANKRAM05: load = BRAM05, type = rw, optional = yes, define = yes; + BRAM06ADDR: load = BRAM06ADDR, type = ro, optional = yes; + BANKRAM06: load = BRAM06, type = rw, optional = yes, define = yes; + BRAM07ADDR: load = BRAM07ADDR, type = ro, optional = yes; + BANKRAM07: load = BRAM07, type = rw, optional = yes, define = yes; + BRAM08ADDR: load = BRAM08ADDR, type = ro, optional = yes; + BANKRAM08: load = BRAM08, type = rw, optional = yes, define = yes; + BRAM09ADDR: load = BRAM09ADDR, type = ro, optional = yes; + BANKRAM09: load = BRAM09, type = rw, optional = yes, define = yes; + BRAM0AADDR: load = BRAM0AADDR, type = ro, optional = yes; + BANKRAM0A: load = BRAM0A, type = rw, optional = yes, define = yes; + BRAM0BADDR: load = BRAM0BADDR, type = ro, optional = yes; + BANKRAM0B: load = BRAM0B, type = rw, optional = yes, define = yes; + BRAM0CADDR: load = BRAM0CADDR, type = ro, optional = yes; + BANKRAM0C: load = BRAM0C, type = rw, optional = yes, define = yes; + BRAM0DADDR: load = BRAM0DADDR, type = ro, optional = yes; + BANKRAM0D: load = BRAM0D, type = rw, optional = yes, define = yes; + BRAM0EADDR: load = BRAM0EADDR, type = ro, optional = yes; + BANKRAM0E: load = BRAM0E, type = rw, optional = yes, define = yes; + BRAM0FADDR: load = BRAM0FADDR, type = ro, optional = yes; + BANKRAM0F: load = BRAM0F, type = rw, optional = yes, define = yes; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/cfg/cx16.cfg b/cfg/cx16.cfg new file mode 100644 index 000000000..4b6025fb6 --- /dev/null +++ b/cfg/cx16.cfg @@ -0,0 +1,45 @@ +FEATURES { + STARTADDRESS: default = $0801; +} +SYMBOLS { + __LOADADDR__: type = import; + __EXEHDR__: type = import; + __STACKSIZE__: type = weak, value = $0800; # 2k stack + __HIMEM__: type = weak, value = $9F00; +} +MEMORY { + ZP: file = "", define = yes, start = $0022, size = $0080 - $0022; + LOADADDR: file = %O, start = %S - 2, size = $0002; + HEADER: file = %O, define = yes, start = %S, size = $000D; + MAIN: file = %O, define = yes, start = __HEADER_LAST__, size = __HIMEM__ - __HEADER_LAST__; + BSS: file = "", start = __ONCE_RUN__, size = __HIMEM__ - __ONCE_RUN__ - __STACKSIZE__; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP, type = zp, optional = yes; + LOADADDR: load = LOADADDR, type = ro; + EXEHDR: load = HEADER, type = ro; + STARTUP: load = MAIN, type = ro, optional = yes; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw, optional = yes; + ONCE: load = MAIN, type = ro, define = yes; + BSS: load = BSS, type = bss, define = yes; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/cfg/gamate.cfg b/cfg/gamate.cfg index 90ced1ea5..74ae9f3e3 100644 --- a/cfg/gamate.cfg +++ b/cfg/gamate.cfg @@ -1,41 +1,51 @@ # linker config to produce simple Gamate cartridge (.bin) SYMBOLS { - __STARTUP__: type = import; - __STACKSIZE__: type = weak, value = $0080; # 1 page stack + __STARTUP__: type = import; + __STACKSIZE__: type = weak, value = $0080; # 1 page stack } MEMORY { - # 0000-03ff is RAM - # FIXME: what zp range can we actually use? - # $0a-$11 is used by IRQ/NMI, $e8 is used by NMI - ZP: start = $0012, size = $e8 - $12; - CPUSTACK: start = $0100, size =$100; - RAM: start = $0200, size = $200 - __STACKSIZE__, define = yes; + # 0000-03ff is RAM + # FIXME: what zp range can we actually use? + # $0a-$11 is used by IRQ/NMI, $e8 is used by NMI + ZP: start = $0012, size = $00E8 - $0012; + CPUSTACK: start = $0100, size = $0100; + RAM: start = $0200, size = $0200 - __STACKSIZE__, define = yes; - CARTHEADER: file = %O, define = yes, start = %S, size = $0029; - # 6000-e000 can be (Cartridge) ROM - # WARNING: fill value must be $00 else it will no more work - #ROM: start = $6000, size = $1000, fill = yes, fillval = $00, file = %O, define = yes; - #ROMFILL: start = $7000, size = $7000, fill = yes, fillval = $00, file = %O, define = yes; - # for images that have code >$6fff we must calculate the checksum! - ROM: start = $6000 + $29, size = $8000 - $29, fill = yes, fillval = $00, file = %O, define = yes; + CARTHEADER: file = %O, define = yes, start = %S, size = $0029; + # 6000-e000 can be (Cartridge) ROM + # WARNING: fill value must be $00 else it will no more work + #ROM: start = $6000, size = $1000, fill = yes, fillval = $00, file = %O, define = yes; + #ROMFILL: start = $7000, size = $7000, fill = yes, fillval = $00, file = %O, define = yes; + # for images that have code >$6fff we must calculate the checksum! + ROM: start = $6000 + $0029, size = $8000 - $0029, fill = yes, fillval = $00, file = %O, define = yes; } SEGMENTS { - ZEROPAGE: load = ZP, type = zp, define = yes; - EXTZP: load = ZP, type = zp, define = yes, optional = yes; - APPZP: load = ZP, type = zp, define = yes, optional = yes; - STARTUP: load = CARTHEADER, type = ro, define=yes; - INIT: load = ROM, type = ro, define = yes, optional = yes; - CODE: load = ROM, type = ro, define=yes; - RODATA: load = ROM, type = ro, define=yes; - DATA: load = ROM, run=RAM, type = rw, define = yes; - BSS: load = RAM, type = bss, define = yes; + ZEROPAGE: load = ZP, type = zp, define = yes; + EXTZP: load = ZP, type = zp, define = yes, optional = yes; + APPZP: load = ZP, type = zp, define = yes, optional = yes; + STARTUP: load = CARTHEADER, type = ro, define = yes; + ONCE: load = ROM, type = ro, optional = yes; + CODE: load = ROM, type = ro, define = yes; + RODATA: load = ROM, type = ro, define = yes; + DATA: load = ROM, run = RAM, type = rw, define = yes; + BSS: load = RAM, type = bss, define = yes; } FEATURES { - CONDES: segment = RODATA, type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__; - CONDES: segment = RODATA, type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__; - CONDES: segment = RODATA, type = interruptor, label = __INTERRUPTOR_TABLE__, count = __INTERRUPTOR_COUNT__, import = __CALLIRQ__; + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; } diff --git a/cfg/geos-apple.cfg b/cfg/geos-apple.cfg index 746e1f2bf..98dcfb5aa 100644 --- a/cfg/geos-apple.cfg +++ b/cfg/geos-apple.cfg @@ -1,15 +1,19 @@ +FEATURES { + STARTADDRESS: default = $4000; +} SYMBOLS { __BACKBUFSIZE__: type = weak, value = $2000; + __HIMEM__: type = weak, value = $C000 - __BACKBUFSIZE__; __OVERLAYSIZE__: type = weak, value = $0000; - __OVERLAYADDR__: type = weak, value = $C000 - __BACKBUFSIZE__ - __OVERLAYSIZE__; - __STACKSIZE__: type = weak, value = $0400; + __OVERLAYADDR__: type = weak, value = __HIMEM__ - __OVERLAYSIZE__; + __STACKSIZE__: type = weak, value = $0400; # 1k stack __STACKADDR__: type = weak, value = $2000 - __STACKSIZE__; } MEMORY { CVT: file = %O, start = $0, size = $20000; ZP: define = yes, start = $80, size = $1A + $06; - EXT: define = yes, start = $0C00, size = __STACKADDR__ - $0C00; - VLIR0: define = yes, start = $4000, size = __OVERLAYADDR__ - $4000; + EXT: define = yes, start = $0C00, size = __STACKADDR__ - __EXT_START__; + VLIR0: define = yes, start = %S, size = __OVERLAYADDR__ - %S; VLIR1: define = yes, start = __OVERLAYADDR__, size = __OVERLAYSIZE__; VLIR2: define = yes, start = __OVERLAYADDR__, size = __OVERLAYSIZE__; VLIR3: define = yes, start = __OVERLAYADDR__, size = __OVERLAYSIZE__; @@ -32,7 +36,7 @@ MEMORY { } SEGMENTS { ZEROPAGE: type = zp, load = ZP; - EXTZP: type = zp, load = ZP, optional = yes; + EXTZP: type = zp, load = ZP, optional = yes; EXTBSS: type = bss, load = EXT, define = yes, optional = yes; FILEINFO: type = ro, load = CVT, offset = $002; RECORDS: type = ro, load = CVT, offset = $100, optional = yes; @@ -40,11 +44,12 @@ SEGMENTS { VLIRIDX0: type = ro, load = CVT, align = $200, optional = yes; STARTUP: type = ro, run = VLIR0, load = CVT, align_load = $200, define = yes; LOWCODE: type = ro, run = VLIR0, load = CVT, optional = yes; - INIT: type = ro, run = VLIR0, load = CVT, define = yes, optional = yes; + ONCE: type = ro, run = VLIR0, load = CVT, optional = yes; CODE: type = ro, run = VLIR0, load = CVT; RODATA: type = ro, run = VLIR0, load = CVT; DATA: type = rw, run = VLIR0, load = CVT; - BSS: type = bss, load = VLIR0, define = yes; + INIT: type = bss, load = VLIR0, optional = yes; + BSS: type = bss, load = VLIR0, define = yes; VLIRIDX1: type = ro, load = CVT, align = $200, optional = yes; OVERLAY1: type = ro, run = VLIR1, load = CVT, align_load = $200, optional = yes; VLIRIDX2: type = ro, load = CVT, align = $200, optional = yes; @@ -88,7 +93,7 @@ FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/geos-cbm.cfg b/cfg/geos-cbm.cfg index ddef00a99..4bf33fdf5 100644 --- a/cfg/geos-cbm.cfg +++ b/cfg/geos-cbm.cfg @@ -1,14 +1,18 @@ +FEATURES { + STARTADDRESS: default = $0400; +} SYMBOLS { __BACKBUFSIZE__: type = weak, value = $2000; + __HIMEM__: type = weak, value = $8000 - __BACKBUFSIZE__; __OVERLAYSIZE__: type = weak, value = $0000; - __OVERLAYADDR__: type = weak, value = $8000 - __BACKBUFSIZE__ - __OVERLAYSIZE__; - __STACKSIZE__: type = weak, value = $0400; + __OVERLAYADDR__: type = weak, value = __HIMEM__ - __OVERLAYSIZE__; + __STACKSIZE__: type = weak, value = $0400; # 1k stack __STACKADDR__: type = weak, value = __OVERLAYADDR__ - __STACKSIZE__; } MEMORY { CVT: file = %O, start = $0, size = $40000; ZP: define = yes, start = $58, size = $1A + $06; - VLIR0: define = yes, start = $0400, size = __STACKADDR__ - $0400; + VLIR0: define = yes, start = %S, size = __STACKADDR__ - %S; VLIR1: define = yes, start = __OVERLAYADDR__, size = __OVERLAYSIZE__; VLIR2: define = yes, start = __OVERLAYADDR__, size = __OVERLAYSIZE__; VLIR3: define = yes, start = __OVERLAYADDR__, size = __OVERLAYSIZE__; @@ -31,17 +35,18 @@ MEMORY { } SEGMENTS { ZEROPAGE: type = zp, load = ZP; - EXTZP: type = zp, load = ZP, optional = yes; + EXTZP: type = zp, load = ZP, optional = yes; DIRENTRY: type = ro, load = CVT, align = $FE; FILEINFO: type = ro, load = CVT, align = $FE; RECORDS: type = ro, load = CVT, align = $FE, optional = yes; STARTUP: type = ro, run = VLIR0, load = CVT, align_load = $FE, define = yes; LOWCODE: type = ro, run = VLIR0, load = CVT, optional = yes; - INIT: type = ro, run = VLIR0, load = CVT, define = yes, optional = yes; + ONCE: type = ro, run = VLIR0, load = CVT, optional = yes; CODE: type = ro, run = VLIR0, load = CVT; RODATA: type = ro, run = VLIR0, load = CVT; DATA: type = rw, run = VLIR0, load = CVT; - BSS: type = bss, load = VLIR0, define = yes; + INIT: type = bss, load = VLIR0, optional = yes; + BSS: type = bss, load = VLIR0, define = yes; OVERLAY1: type = ro, run = VLIR1, load = CVT, align_load = $FE, optional = yes; OVERLAY2: type = ro, run = VLIR2, load = CVT, align_load = $FE, optional = yes; OVERLAY3: type = ro, run = VLIR3, load = CVT, align_load = $FE, optional = yes; @@ -66,7 +71,7 @@ FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/lunix.cfg b/cfg/lunix.cfg index 1342c390b..560b501d5 100644 --- a/cfg/lunix.cfg +++ b/cfg/lunix.cfg @@ -5,24 +5,24 @@ SYMBOLS { __STACKSIZE__: type = weak, value = $0400; # 1k stack (do typical LUnix apps. need 2k?) } MEMORY { - ZP: start = $0080, size = $0040; - RAM: start = %S, size = $7600 - __STACKSIZE__; + ZP: start = $0080, size = $0040; + MAIN: start = %S, size = $7600 - __STACKSIZE__; } SEGMENTS { - ZEROPAGE: load = ZP, type = zp, define = yes; # Pseudo-registers - STARTUP: load = RAM, type = ro; # First initialization code - LOWCODE: load = RAM, type = ro, optional = yes; # Legacy from other platforms - INIT: load = RAM, type = ro, define = yes, optional = yes; # Library initialization code - CODE: load = RAM, type = ro; # Program - RODATA: load = RAM, type = ro; # Literals, constants - DATA: load = RAM, type = rw; # Initialized variables - BSS: load = RAM, type = bss, define = yes; # Uninitialized variables + ZEROPAGE: load = ZP, type = zp, define = yes; # Pseudo-registers + STARTUP: load = MAIN, type = ro; # First initialization code + LOWCODE: load = MAIN, type = ro, optional = yes; # Legacy from other platforms + ONCE: load = MAIN, type = ro, optional = yes; # Library initialization code + CODE: load = MAIN, type = ro; # Program + RODATA: load = MAIN, type = ro; # Literals, constants + DATA: load = MAIN, type = rw; # Initialized variables + BSS: load = MAIN, type = bss, define = yes; # Uninitialized variables } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/lynx-bll.cfg b/cfg/lynx-bll.cfg index 21967752f..adf1e7ab6 100644 --- a/cfg/lynx-bll.cfg +++ b/cfg/lynx-bll.cfg @@ -1,32 +1,33 @@ SYMBOLS { __STACKSIZE__: type = weak, value = $0800; # 2k stack __STARTOFDIRECTORY__: type = weak, value = $00CB; # start just after loader - __BLOCKSIZE__: type = weak, value = $0400; # cart block size + __BANK0BLOCKSIZE__: type = weak, value = $0400; # bank 0 cart block size + __BANK1BLOCKSIZE__: type = weak, value = $0000; # bank 1 block size __BLLHDR__: type = import; } MEMORY { ZP: file = "", define = yes, start = $0000, size = $0100; HEADER: file = %O, start = $0000, size = $000a; - RAM: file = %O, define = yes, start = $0400, size = $BC38 - __STACKSIZE__; + MAIN: file = %O, define = yes, start = $0400, size = $BC38 - __STACKSIZE__; } SEGMENTS { - BLLHDR: load = HEADER, type = ro; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, define = yes, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro, define = yes; - RODATA: load = RAM, type = ro, define = yes; - DATA: load = RAM, type = rw, define = yes; - BSS: load = RAM, type = bss, define = yes; ZEROPAGE: load = ZP, type = zp; EXTZP: load = ZP, type = zp, optional = yes; APPZP: load = ZP, type = zp, optional = yes; + BLLHDR: load = HEADER, type = ro; + STARTUP: load = MAIN, type = ro, define = yes; + LOWCODE: load = MAIN, type = ro, define = yes, optional = yes; + ONCE: load = MAIN, type = ro, define = yes, optional = yes; + CODE: load = MAIN, type = ro, define = yes; + RODATA: load = MAIN, type = ro, define = yes; + DATA: load = MAIN, type = rw, define = yes; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/lynx-coll.cfg b/cfg/lynx-coll.cfg index b7fd787e7..7c71993f8 100644 --- a/cfg/lynx-coll.cfg +++ b/cfg/lynx-coll.cfg @@ -1,7 +1,8 @@ SYMBOLS { __STACKSIZE__: type = weak, value = $0800; # 2k stack __STARTOFDIRECTORY__: type = weak, value = $00CB; # start just after loader - __BLOCKSIZE__: type = weak, value = $0400; # cart block size + __BANK0BLOCKSIZE__: type = weak, value = $0400; # bank 0 cart block size + __BANK1BLOCKSIZE__: type = weak, value = $0000; # bank 1 block size __EXEHDR__: type = import; __BOOTLDR__: type = import; __DEFDIR__: type = import; @@ -11,28 +12,28 @@ MEMORY { HEADER: file = %O, start = $0000, size = $0040; BOOT: file = %O, start = $0200, size = __STARTOFDIRECTORY__; DIR: file = %O, start = $0000, size = 8; - RAM: file = %O, define = yes, start = $0200, size = $9E58 - __STACKSIZE__; + MAIN: file = %O, define = yes, start = $0200, size = $9E58 - __STACKSIZE__; } SEGMENTS { - EXEHDR: load = HEADER, type = ro; - BOOTLDR: load = BOOT, type = ro; - DIRECTORY: load = DIR, type = ro; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, define = yes, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro, define = yes; - RODATA: load = RAM, type = ro, define = yes; - DATA: load = RAM, type = rw, define = yes; - BSS: load = RAM, type = bss, define = yes; ZEROPAGE: load = ZP, type = zp; EXTZP: load = ZP, type = zp, optional = yes; APPZP: load = ZP, type = zp, optional = yes; + EXEHDR: load = HEADER, type = ro; + BOOTLDR: load = BOOT, type = ro; + DIRECTORY: load = DIR, type = ro; + STARTUP: load = MAIN, type = ro, define = yes; + LOWCODE: load = MAIN, type = ro, define = yes, optional = yes; + ONCE: load = MAIN, type = ro, define = yes, optional = yes; + CODE: load = MAIN, type = ro, define = yes; + RODATA: load = MAIN, type = ro, define = yes; + DATA: load = MAIN, type = rw, define = yes; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/lynx-uploader.cfg b/cfg/lynx-uploader.cfg index 740a18b0a..476b3c5de 100644 --- a/cfg/lynx-uploader.cfg +++ b/cfg/lynx-uploader.cfg @@ -1,7 +1,8 @@ SYMBOLS { __STACKSIZE__: type = weak, value = $0800; # 2k stack __STARTOFDIRECTORY__: type = weak, value = $00CB; # start just after loader - __BLOCKSIZE__: type = weak, value = $0400; # cart block size + __BANK0BLOCKSIZE__: type = weak, value = $0400; # bank 0 cart block size + __BANK1BLOCKSIZE__: type = weak, value = $0000; # bank 1 block size __EXEHDR__: type = import; __BOOTLDR__: type = import; __DEFDIR__: type = import; @@ -12,31 +13,31 @@ MEMORY { HEADER: file = %O, start = $0000, size = $0040; BOOT: file = %O, start = $0200, size = __STARTOFDIRECTORY__; DIR: file = %O, start = $0000, size = 8; - RAM: file = %O, define = yes, start = $0200, size = $BD38 - __STACKSIZE__; + MAIN: file = %O, define = yes, start = $0200, size = $BD38 - __STACKSIZE__; UPLDR: file = %O, define = yes, start = $BFDC, size = $005C; } SEGMENTS { - EXEHDR: load = HEADER, type = ro; - BOOTLDR: load = BOOT, type = ro; - DIRECTORY:load = DIR, type = ro; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, define = yes, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro, define = yes; - RODATA: load = RAM, type = ro, define = yes; - DATA: load = RAM, type = rw, define = yes; - BSS: load = RAM, type = bss, define = yes; - UPCODE: load = UPLDR, type = ro, define = yes; - UPDATA: load = UPLDR, type = rw, define = yes; ZEROPAGE: load = ZP, type = zp; EXTZP: load = ZP, type = zp, optional = yes; APPZP: load = ZP, type = zp, optional = yes; + EXEHDR: load = HEADER, type = ro; + BOOTLDR: load = BOOT, type = ro; + DIRECTORY:load = DIR, type = ro; + STARTUP: load = MAIN, type = ro, define = yes; + LOWCODE: load = MAIN, type = ro, define = yes, optional = yes; + ONCE: load = MAIN, type = ro, define = yes, optional = yes; + CODE: load = MAIN, type = ro, define = yes; + RODATA: load = MAIN, type = ro, define = yes; + DATA: load = MAIN, type = rw, define = yes; + BSS: load = MAIN, type = bss, define = yes; + UPCODE: load = UPLDR, type = ro, define = yes; + UPDATA: load = UPLDR, type = rw, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/lynx.cfg b/cfg/lynx.cfg index 2c9e76207..5c42654d7 100644 --- a/cfg/lynx.cfg +++ b/cfg/lynx.cfg @@ -1,7 +1,8 @@ SYMBOLS { __STACKSIZE__: type = weak, value = $0800; # 2k stack __STARTOFDIRECTORY__: type = weak, value = $00CB; # start just after loader - __BLOCKSIZE__: type = weak, value = 1024; # cart block size + __BANK0BLOCKSIZE__: type = weak, value = $0400; # bank 0 cart block size + __BANK1BLOCKSIZE__: type = weak, value = $0000; # bank 1 block size __EXEHDR__: type = import; __BOOTLDR__: type = import; __DEFDIR__: type = import; @@ -11,28 +12,28 @@ MEMORY { HEADER: file = %O, start = $0000, size = $0040; BOOT: file = %O, start = $0200, size = __STARTOFDIRECTORY__; DIR: file = %O, start = $0000, size = 8; - RAM: file = %O, define = yes, start = $0200, size = $BE38 - __STACKSIZE__; + MAIN: file = %O, define = yes, start = $0200, size = $BE38 - __STACKSIZE__; } SEGMENTS { - EXEHDR: load = HEADER, type = ro; - BOOTLDR: load = BOOT, type = ro; - DIRECTORY: load = DIR, type = ro; - STARTUP: load = RAM, type = ro, define = yes; - LOWCODE: load = RAM, type = ro, define = yes, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro, define = yes; - RODATA: load = RAM, type = ro, define = yes; - DATA: load = RAM, type = rw, define = yes; - BSS: load = RAM, type = bss, define = yes; ZEROPAGE: load = ZP, type = zp; EXTZP: load = ZP, type = zp, optional = yes; APPZP: load = ZP, type = zp, optional = yes; + EXEHDR: load = HEADER, type = ro; + BOOTLDR: load = BOOT, type = ro; + DIRECTORY: load = DIR, type = ro; + STARTUP: load = MAIN, type = ro, define = yes; + LOWCODE: load = MAIN, type = ro, define = yes, optional = yes; + ONCE: load = MAIN, type = ro, define = yes, optional = yes; + CODE: load = MAIN, type = ro, define = yes; + RODATA: load = MAIN, type = ro, define = yes; + DATA: load = MAIN, type = rw, define = yes; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/module.cfg b/cfg/module.cfg index 452491eb4..be312585c 100644 --- a/cfg/module.cfg +++ b/cfg/module.cfg @@ -6,7 +6,7 @@ SEGMENTS { ZEROPAGE: load = ZP, type = zp; EXTZP: load = ZP, type = zp, optional = yes; HEADER: load = COMBINED, type = ro; - INIT: load = COMBINED, type = ro, optional = yes; + ONCE: load = COMBINED, type = ro, optional = yes; CODE: load = COMBINED, type = ro; RODATA: load = COMBINED, type = ro; DATA: load = COMBINED, type = rw; diff --git a/cfg/nes.cfg b/cfg/nes.cfg index 3e2f408cc..bb7d23408 100644 --- a/cfg/nes.cfg +++ b/cfg/nes.cfg @@ -12,10 +12,10 @@ MEMORY { # - code # - rodata # - data (load) - ROM0: file = %O, start = $8000, size = $7FF4, fill = yes, define = yes; + ROM0: file = %O, start = $8000, size = $7FFA, fill = yes, define = yes; # Hardware Vectors at End of 2nd 8K ROM - ROMV: file = %O, start = $FFF6, size = $000C, fill = yes; + ROMV: file = %O, start = $FFFA, size = $0006, fill = yes; # 1 8k CHR Bank ROM2: file = %O, start = $0000, size = $2000, fill = yes; @@ -33,23 +33,23 @@ MEMORY { RAM: file = "", start = $6000, size = $2000, define = yes; } SEGMENTS { + ZEROPAGE: load = ZP, type = zp; HEADER: load = HEADER, type = ro; - STARTUP: load = ROM0, type = ro, define = yes; - LOWCODE: load = ROM0, type = ro, optional = yes; - INIT: load = ROM0, type = ro, define = yes, optional = yes; - CODE: load = ROM0, type = ro, define = yes; - RODATA: load = ROM0, type = ro, define = yes; - DATA: load = ROM0, run = RAM, type = rw, define = yes; + STARTUP: load = ROM0, type = ro, define = yes; + LOWCODE: load = ROM0, type = ro, optional = yes; + ONCE: load = ROM0, type = ro, optional = yes; + CODE: load = ROM0, type = ro, define = yes; + RODATA: load = ROM0, type = ro, define = yes; + DATA: load = ROM0, run = RAM, type = rw, define = yes; VECTORS: load = ROMV, type = rw; CHARS: load = ROM2, type = rw; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; + BSS: load = RAM, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/none.cfg b/cfg/none.cfg index 49409a82c..cedd2d839 100644 --- a/cfg/none.cfg +++ b/cfg/none.cfg @@ -1,24 +1,30 @@ +FEATURES { + STARTADDRESS: default = $1000; +} SYMBOLS { - __STACKSIZE__: type = weak, value = $0800; # 2k stack + __STACKSIZE__: type = weak, value = $0800; # 2k stack + __STACKSTART__: type = weak, value = $8000; + __ZPSTART__: type = weak, value = $0080; } MEMORY { - ZP: file = "", define = yes, start = $0000, size = $0001F; - RAM: file = %O, start = %S, size = $10000 - __STACKSIZE__; + ZP: file = "", define = yes, start = __ZPSTART__, size = $001F; + MAIN: file = %O, start = %S, size = __STACKSTART__ - __STACKSIZE__ - %S; } SEGMENTS { - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = rw; - RODATA: load = RAM, type = rw; - DATA: load = RAM, type = rw; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; + ZEROPAGE: load = ZP, type = zp; + STARTUP: load = MAIN, type = ro, optional = yes; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = rw; + RODATA: load = MAIN, type = rw; + DATA: load = MAIN, type = rw; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/osic1p-asm.cfg b/cfg/osic1p-asm.cfg index 4000890be..a16f248ab 100644 --- a/cfg/osic1p-asm.cfg +++ b/cfg/osic1p-asm.cfg @@ -10,16 +10,15 @@ SYMBOLS { } MEMORY { # for size of ZP, see runtime/zeropage.s and c1p/extzp.s - ZP: file = "", define = yes, start = $0002, size = $001A + $0006; - HEAD: file = %O, start = $0000, size = $00B6; - RAM: file = %O, define = yes, start = %S, size = __HIMEM__ - __STACKSIZE__ - %S; + ZP: file = "", define = yes, start = $0002, size = $00FE; + HEAD: file = %O, start = $0000, size = $00B6; + MAIN: file = %O, define = yes, start = %S, size = __HIMEM__ - __STACKSIZE__ - %S; } SEGMENTS { - BOOT: load = HEAD, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = rw; - RODATA: load = RAM, type = rw; - DATA: load = RAM, type = rw; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; + ZEROPAGE: load = ZP, type = zp, optional = yes; + BOOT: load = HEAD, type = ro, optional = yes; + CODE: load = MAIN, type = rw; + RODATA: load = MAIN, type = ro, optional = yes; + DATA: load = MAIN, type = rw, optional = yes; + BSS: load = MAIN, type = bss, optional = yes, define = yes; } diff --git a/cfg/osic1p.cfg b/cfg/osic1p.cfg index fd9aa604e..f7ca08344 100644 --- a/cfg/osic1p.cfg +++ b/cfg/osic1p.cfg @@ -10,27 +10,27 @@ SYMBOLS { } MEMORY { # for size of ZP, see runtime/zeropage.s and c1p/extzp.s - ZP: file = "", define = yes, start = $0002, size = $001A + $0020; - HEAD: file = %O, start = $0000, size = $00B6; - RAM: file = %O, define = yes, start = %S, size = __HIMEM__ - __STACKSIZE__ - %S; + ZP: file = "", define = yes, start = $0002, size = $001A + $0020; + HEAD: file = %O, start = $0000, size = $00B6; + MAIN: file = %O, define = yes, start = %S, size = __HIMEM__ - __STACKSIZE__ - %S; } SEGMENTS { - BOOT: load = HEAD, type = ro, optional = yes; - STARTUP: load = RAM, type = ro; - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = rw; - RODATA: load = RAM, type = rw; - DATA: load = RAM, type = rw; - BSS: load = RAM, type = bss, define = yes; ZEROPAGE: load = ZP, type = zp; EXTZP: load = ZP, type = zp, define = yes, optional = yes; + BOOT: load = HEAD, type = ro, optional = yes; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = rw; + RODATA: load = MAIN, type = rw; + DATA: load = MAIN, type = rw; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/pce.cfg b/cfg/pce.cfg index 9128eb727..eae9c1316 100644 --- a/cfg/pce.cfg +++ b/cfg/pce.cfg @@ -1,39 +1,34 @@ -# linker config to produce simple NEC PC-Engine cartridge (.pce) - +# Linker config. to produce a NEC PC-Engine 8K, 16K, or 32K image (.bin) SYMBOLS { - __STACKSIZE__: type = weak, value = $0300; # 3 pages stack + __CARTSIZE__: type = weak, value = $2000; # $2000, $4000, or $8000 + __STACKSIZE__: type = weak, value = $0300; # 3 pages stack } - MEMORY { - # FIXME: is this correct? the first 3? bytes cant be used? - ZP: start = $03, size = $fd, type = rw, define = yes; - - # reset-bank and hardware vectors - ROM0: start = $e000, size = $1ff6, file = %O ,fill = yes, define = yes; - ROMV: start = $fff6, size = $a, file = %O,fill = yes; - - # first RAM page (also contains stack and zeropage) - RAM: start = $2200, size = $1e00, define = yes; + ZP: file = "", start = $0000, define = yes, size = $0100; + # RAM bank + MAIN: file = "", start = $2200, define = yes, size = $1E00 - __STACKSIZE__; + # ROM banks, before swapping, and after mapping + ROM: file = %O, start = $10000 - __CARTSIZE__, size = __CARTSIZE__, fill = yes, fillval = $FF; } - SEGMENTS { - STARTUP: load = ROM0, type = ro, define = yes; - INIT: load = ROM0, type = ro, define = yes, optional = yes; - CODE: load = ROM0, type = ro, define = yes; - RODATA: load = ROM0, type = ro, define = yes; - DATA: load = ROM0, run= RAM, type = rw, define = yes; - BSS: load = RAM, type = bss, define = yes; - VECTORS: load = ROMV, type = rw, define = yes; - ZEROPAGE: load = ZP, type = zp, define = yes; - EXTZP: load = ZP, type = zp, define = yes, optional = yes; - APPZP: load = ZP, type = zp, define = yes, optional = yes; + ZEROPAGE: load = ZP, type = zp; + EXTZP: load = ZP, type = zp, optional = yes; + APPZP: load = ZP, type = zp, optional = yes; + DATA: load = ROM, run = MAIN, type = rw, define = yes; + INIT: load = MAIN, type = bss, optional = yes; + BSS: load = MAIN, type = bss, define = yes; + RODATA: load = ROM, type = ro; + CODE: load = ROM, type = ro; + LOWCODE: load = ROM, type = ro, optional = yes; + ONCE: load = ROM, type = ro, optional = yes; + STARTUP: load = ROM, type = ro, start = $FFF6 - $0066; + VECTORS: load = ROM, type = ro, start = $FFF6; } - FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/pet-overlay.cfg b/cfg/pet-overlay.cfg new file mode 100644 index 000000000..afd351a42 --- /dev/null +++ b/cfg/pet-overlay.cfg @@ -0,0 +1,82 @@ +FEATURES { + STARTADDRESS: default = $0401; +} +SYMBOLS { + __LOADADDR__: type = import; + __EXEHDR__: type = import; + __OVERLAYADDR__: type = import; + __STACKSIZE__: type = weak, value = $0800; # 2K stack + __OVERLAYSIZE__: type = weak, value = $0800; # 2K overlay + __HIMEM__: type = weak, value = $8000; + __OVERLAYSTART__: type = export, value = __HIMEM__ - __STACKSIZE__ - __OVERLAYSIZE__; +} +MEMORY { + ZP: file = "", define = yes, start = $0055, size = $001A; + LOADADDR: file = %O, start = %S - 2, size = $0002; + HEADER: file = %O, define = yes, start = %S, size = $000D; + MAIN: file = %O, define = yes, start = __HEADER_LAST__, size = __OVERLAYSTART__ - __HEADER_LAST__; + OVL1ADDR: file = "%O.1", start = __OVERLAYSTART__ - 2, size = $0002; + OVL1: file = "%O.1", start = __OVERLAYSTART__, size = __OVERLAYSIZE__; + OVL2ADDR: file = "%O.2", start = __OVERLAYSTART__ - 2, size = $0002; + OVL2: file = "%O.2", start = __OVERLAYSTART__, size = __OVERLAYSIZE__; + OVL3ADDR: file = "%O.3", start = __OVERLAYSTART__ - 2, size = $0002; + OVL3: file = "%O.3", start = __OVERLAYSTART__, size = __OVERLAYSIZE__; + OVL4ADDR: file = "%O.4", start = __OVERLAYSTART__ - 2, size = $0002; + OVL4: file = "%O.4", start = __OVERLAYSTART__, size = __OVERLAYSIZE__; + OVL5ADDR: file = "%O.5", start = __OVERLAYSTART__ - 2, size = $0002; + OVL5: file = "%O.5", start = __OVERLAYSTART__, size = __OVERLAYSIZE__; + OVL6ADDR: file = "%O.6", start = __OVERLAYSTART__ - 2, size = $0002; + OVL6: file = "%O.6", start = __OVERLAYSTART__, size = __OVERLAYSIZE__; + OVL7ADDR: file = "%O.7", start = __OVERLAYSTART__ - 2, size = $0002; + OVL7: file = "%O.7", start = __OVERLAYSTART__, size = __OVERLAYSIZE__; + OVL8ADDR: file = "%O.8", start = __OVERLAYSTART__ - 2, size = $0002; + OVL8: file = "%O.8", start = __OVERLAYSTART__, size = __OVERLAYSIZE__; + OVL9ADDR: file = "%O.9", start = __OVERLAYSTART__ - 2, size = $0002; + OVL9: file = "%O.9", start = __OVERLAYSTART__, size = __OVERLAYSIZE__; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + LOADADDR: load = LOADADDR, type = ro; + EXEHDR: load = HEADER, type = ro; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + ONCE: load = MAIN, type = ro, optional = yes; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = bss; + BSS: load = MAIN, type = bss, define = yes; + OVL1ADDR: load = OVL1ADDR, type = ro; + OVERLAY1: load = OVL1, type = ro, define = yes, optional = yes; + OVL2ADDR: load = OVL2ADDR, type = ro; + OVERLAY2: load = OVL2, type = ro, define = yes, optional = yes; + OVL3ADDR: load = OVL3ADDR, type = ro; + OVERLAY3: load = OVL3, type = ro, define = yes, optional = yes; + OVL4ADDR: load = OVL4ADDR, type = ro; + OVERLAY4: load = OVL4, type = ro, define = yes, optional = yes; + OVL5ADDR: load = OVL5ADDR, type = ro; + OVERLAY5: load = OVL5, type = ro, define = yes, optional = yes; + OVL6ADDR: load = OVL6ADDR, type = ro; + OVERLAY6: load = OVL6, type = ro, define = yes, optional = yes; + OVL7ADDR: load = OVL7ADDR, type = ro; + OVERLAY7: load = OVL7, type = ro, define = yes, optional = yes; + OVL8ADDR: load = OVL8ADDR, type = ro; + OVERLAY8: load = OVL8, type = ro, define = yes, optional = yes; + OVL9ADDR: load = OVL9ADDR, type = ro; + OVERLAY9: load = OVL9, type = ro, define = yes, optional = yes; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/cfg/pet.cfg b/cfg/pet.cfg index 80d89ee50..6eb2465b0 100644 --- a/cfg/pet.cfg +++ b/cfg/pet.cfg @@ -10,23 +10,23 @@ MEMORY { RAM: file = %O, start = $040D, size = $7BF3 - __STACKSIZE__; } SEGMENTS { + ZEROPAGE: load = ZP, type = zp; LOADADDR: load = LOADADDR, type = ro; EXEHDR: load = HEADER, type = ro; STARTUP: load = RAM, type = ro; - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; + LOWCODE: load = RAM, type = ro, optional = yes; + ONCE: load = RAM, type = ro, optional = yes; CODE: load = RAM, type = ro; RODATA: load = RAM, type = ro; DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; + INIT: load = RAM, type = bss; + BSS: load = RAM, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/plus4.cfg b/cfg/plus4.cfg index 6eeddf12e..b7199e008 100644 --- a/cfg/plus4.cfg +++ b/cfg/plus4.cfg @@ -1,32 +1,36 @@ +FEATURES { + STARTADDRESS: default = $1001; +} SYMBOLS { __LOADADDR__: type = import; __EXEHDR__: type = import; __STACKSIZE__: type = weak, value = $0800; # 2k stack + __HIMEM__: type = weak, value = $FD00; } MEMORY { - ZP: file = "", define = yes, start = $0002, size = $001A; - LOADADDR: file = %O, start = $0FFF, size = $0002; - HEADER: file = %O, start = $1001, size = $000C; - RAM: file = %O, define = yes, start = $100D, size = $ECF3 - __STACKSIZE__; + ZP: file = "", define = yes, start = $0002, size = $001A; + LOADADDR: file = %O, start = %S - 2, size = $0002; + HEADER: file = %O, define = yes, start = %S, size = $000D; + MAIN: file = %O, define = yes, start = __HEADER_LAST__, size = __HIMEM__ - __MAIN_START__ - __STACKSIZE__; } SEGMENTS { + ZEROPAGE: load = ZP, type = zp; LOADADDR: load = LOADADDR, type = ro; EXEHDR: load = HEADER, type = ro; - STARTUP: load = RAM, type = ro; - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + ONCE: load = MAIN, type = ro, optional = yes; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = bss; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/sim6502.cfg b/cfg/sim6502.cfg index edb630d7f..39c33581c 100644 --- a/cfg/sim6502.cfg +++ b/cfg/sim6502.cfg @@ -3,26 +3,26 @@ SYMBOLS { __STACKSIZE__: type = weak, value = $0800; # 2k stack } MEMORY { - ZP: file = "", start = $0000, size = $001A; - HEADER: file = %O, start = $0000, size = $0001; - RAM: file = %O, define = yes, start = $0200, size = $FDF0 - __STACKSIZE__; + ZP: file = "", start = $0000, size = $0100; + HEADER: file = %O, start = $0000, size = $000C; + MAIN: file = %O, define = yes, start = $0200, size = $FDF0 - __STACKSIZE__; } SEGMENTS { - EXEHDR: load = HEADER, type = ro; - STARTUP: load = RAM, type = ro; - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; + ZEROPAGE: load = ZP, type = zp; + EXEHDR: load = HEADER, type = ro; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/sim65c02.cfg b/cfg/sim65c02.cfg index edb630d7f..39c33581c 100644 --- a/cfg/sim65c02.cfg +++ b/cfg/sim65c02.cfg @@ -3,26 +3,26 @@ SYMBOLS { __STACKSIZE__: type = weak, value = $0800; # 2k stack } MEMORY { - ZP: file = "", start = $0000, size = $001A; - HEADER: file = %O, start = $0000, size = $0001; - RAM: file = %O, define = yes, start = $0200, size = $FDF0 - __STACKSIZE__; + ZP: file = "", start = $0000, size = $0100; + HEADER: file = %O, start = $0000, size = $000C; + MAIN: file = %O, define = yes, start = $0200, size = $FDF0 - __STACKSIZE__; } SEGMENTS { - EXEHDR: load = HEADER, type = ro; - STARTUP: load = RAM, type = ro; - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; + ZEROPAGE: load = ZP, type = zp; + EXEHDR: load = HEADER, type = ro; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/supervision-128k.cfg b/cfg/supervision-128k.cfg index ce835db50..c90367aa1 100644 --- a/cfg/supervision-128k.cfg +++ b/cfg/supervision-128k.cfg @@ -1,14 +1,14 @@ -# supervision 1284kbyte cartridge with bankswitching +# supervision 128kbyte cartridge with bankswitching # for assembler # ld65 config file -# ld65 --config supervision.cfg -o .bin .o +# ld65 --config supervision-128k.cfg -o .bin .o SYMBOLS { __STACKSIZE__: type = weak, value = $0100; # 1 page stack } MEMORY { - RAM: file = "", start = $0000, size = $2000 - __STACKSIZE__; + RAM: file = "", start = $0000, size = $2000 - __STACKSIZE__, define = yes; VRAM: file = "", start = $4000, size = $2000; BANKROM1: file = %O, start = $8000, size = $4000, fill = yes, fillval = $FF; BANKROM2: file = %O, start = $8000, size = $4000, fill = yes, fillval = $FF; @@ -20,8 +20,8 @@ MEMORY { ROM: file = %O, start = $c000, size = $4000, fill = yes, fillval = $FF; } SEGMENTS { - LOWCODE: load = ROM, type = ro, optional = yes; - INIT: load = ROM, type = ro, define = yes, optional = yes; + LOWCODE: load = ROM, type = ro, optional = yes; + ONCE: load = ROM, type = ro, optional = yes; CODE: load = ROM, type = ro; BANK1: load = BANKROM1, type = ro; BANK2: load = BANKROM2, type = ro; @@ -30,8 +30,23 @@ SEGMENTS { BANK5: load = BANKROM5, type = ro; BANK6: load = BANKROM6, type = ro; BANK7: load = BANKROM7, type = ro; - ZEROPAGE: load = RAM, type = bss, define = yes; - DATA: load = RAM, type = bss, define = yes, offset = $0200; - BSS: load = RAM, type = bss, define = yes; - VECTOR: load = ROM, type = ro, offset = $3FFA; + ZEROPAGE: load = RAM, type = zp, define = yes; + DATA: load = RAM, type = rw, define = yes, offset = $0200; + BSS: load = RAM, type = bss, define = yes; + VECTORS: load = ROM, type = ro, start = $FFFA; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; } diff --git a/cfg/supervision-16k.cfg b/cfg/supervision-16k.cfg index e38948d5f..dc6130b33 100644 --- a/cfg/supervision-16k.cfg +++ b/cfg/supervision-16k.cfg @@ -1,7 +1,7 @@ # supervision 16kbyte cartridge # ld65 config file -# ld65 --config supervision16.cfg -o .bin .o +# ld65 --config supervision-16k.cfg -o .bin .o SYMBOLS { __STACKSIZE__: type = weak, value = $0100; # 1 page stack @@ -9,26 +9,26 @@ SYMBOLS { MEMORY { ZP: file = "", start = $0000, size = $0100; CPUSTACK: file = "", start = $0100, size = $0100; - RAM: file = "", start = $0200, size = $1E00 - __STACKSIZE__; + RAM: file = "", start = $0200, size = $1E00 - __STACKSIZE__, define = yes; VRAM: file = "", start = $4000, size = $2000; - ROM: file = %O, start = $C000, size = $4000, fill = yes, fillval = $ff, define=yes; + ROM: file = %O, start = $C000, size = $4000, fill = yes, fillval = $FF, define = yes; } SEGMENTS { - LOWCODE: load = ROM, type = ro, optional = yes; - INIT: load = ROM, type = ro, define = yes, optional = yes; - CODE: load = ROM, type = ro, define = yes; - RODATA: load = ROM, type = ro, define = yes; - DATA: load = ROM, run = RAM, type = rw, define = yes; - FFF0: load = ROM, type = ro, offset = $3FF0; - VECTOR: load = ROM, type = ro, offset = $3FFA; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp, define = yes; + ZEROPAGE: load = ZP, type = zp, define = yes; + LOWCODE: load = ROM, type = ro, optional = yes; + ONCE: load = ROM, type = ro, optional = yes; + CODE: load = ROM, type = ro, define = yes; + RODATA: load = ROM, type = ro, define = yes; + DATA: load = ROM, run = RAM, type = rw, define = yes; + FFF0: load = ROM, type = ro, start = $FFF0; + VECTORS: load = ROM, type = ro, start = $FFFA; + BSS: load = RAM, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/supervision-64k.cfg b/cfg/supervision-64k.cfg index fd5370fa5..d252c5d25 100644 --- a/cfg/supervision-64k.cfg +++ b/cfg/supervision-64k.cfg @@ -2,13 +2,13 @@ # for assembler # ld65 config file -# ld65 --config supervision.cfg -o .bin .o +# ld65 --config supervision-64k.cfg -o .bin .o SYMBOLS { __STACKSIZE__: type = weak, value = $0100; # 1 page stack } MEMORY { - RAM: file = "", start = $0000, size = $2000 - __STACKSIZE__; + RAM: file = "", start = $0000, size = $2000 - __STACKSIZE__, define = yes; VRAM: file = "", start = $4000, size = $2000; BANKROM1: file = %O, start = $8000, size = $4000, fill = yes, fillval = $FF; BANKROM2: file = %O, start = $8000, size = $4000, fill = yes, fillval = $FF; @@ -16,15 +16,30 @@ MEMORY { ROM: file = %O, start = $C000, size = $4000, fill = yes, fillval = $FF; } SEGMENTS { - LOWCODE: load = ROM, type = ro, optional = yes; - INIT: load = ROM, type = ro, define = yes, optional = yes; + LOWCODE: load = ROM, type = ro, optional = yes; + ONCE: load = ROM, type = ro, optional = yes; CODE: load = ROM, type = ro; RODATA: load = ROM, type = ro; BANK1: load = BANKROM1, type = ro; BANK2: load = BANKROM2, type = ro; BANK3: load = BANKROM3, type = ro; - ZEROPAGE: load = RAM, type = bss, define = yes; - DATA: load = RAM, type = bss, define = yes, offset = $0200; - BSS: load = RAM, type = bss, define = yes; - VECTOR: load = ROM, type = ro, offset = $3FFA; + ZEROPAGE: load = RAM, type = zp, define = yes; + DATA: load = RAM, type = rw, define = yes, offset = $0200; + BSS: load = RAM, type = bss, define = yes; + VECTORS: load = ROM, type = ro, start = $FFFA; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; } diff --git a/cfg/supervision.cfg b/cfg/supervision.cfg index 66fb4cfad..1177660b8 100644 --- a/cfg/supervision.cfg +++ b/cfg/supervision.cfg @@ -2,29 +2,32 @@ # make sure the halves are mirrored in the 64kbyte cartridge image # or reset from code >0xc000 and switch bank to the 3rd bank +SYMBOLS { + __STACKSIZE__: type = weak, value = $0100; # 1 page stack +} MEMORY { ZP: file = "", start = $0000, size = $0100; CPUSTACK: file = "", start = $0100, size = $0100; - RAM: file = "", start = $0200, size = $1E00, define = yes; + RAM: file = "", start = $0200, size = $1E00 - __STACKSIZE__, define = yes; VRAM: file = "", start = $4000, size = $2000; ROM: file = %O, start = $8000, size = $8000, fill = yes, fillval = $FF, define = yes; } SEGMENTS { - LOWCODE: load = ROM, type = ro, optional = yes; - INIT: load = ROM, type = ro, define = yes, optional = yes; - CODE: load = ROM, type = ro, define = yes; - RODATA: load = ROM, type = ro, define = yes; - DATA: load = ROM, run = RAM, type = rw, define = yes; - FFF0: load = ROM, type = ro, offset = $7FF0; - VECTOR: load = ROM, type = ro, offset = $7FFA; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp, define = yes; + ZEROPAGE: load = ZP, type = zp, define = yes; + LOWCODE: load = ROM, type = ro, optional = yes; + ONCE: load = ROM, type = ro, optional = yes; + CODE: load = ROM, type = ro, define = yes; + RODATA: load = ROM, type = ro, define = yes; + DATA: load = ROM, run = RAM, type = rw, define = yes; + FFF0: load = ROM, type = ro, start = $FFF0; + VECTORS: load = ROM, type = ro, start = $FFFA; + BSS: load = RAM, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/sym1-32k.cfg b/cfg/sym1-32k.cfg new file mode 100644 index 000000000..7949375d3 --- /dev/null +++ b/cfg/sym1-32k.cfg @@ -0,0 +1,46 @@ +# sym1-32k.cfg (32k) +# +# for Sym-1 with 32kb RAM +# +# ld65 --config sym1-32k.cfg -o .bin .o + +FEATURES { + STARTADDRESS: default = $0200; + CONDES: segment = STARTUP, + type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__; + CONDES: segment = STARTUP, + type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__; +} + +SYMBOLS { + __STACKSIZE__: type = weak, value = $0200; # 512 byte program stack + __STARTADDRESS__: type = export, value = %S; +} + +MEMORY { + ZP: file = %O, define = yes, start = $0000, size = $00F7; + CPUSTACK: file = "", define = yes, start = $0100, size = $0100; + RAM: file = %O, define = yes, start = %S, size = $8000 - %S - __STACKSIZE__; + MONROM: file = "", define = yes, start = $8000, size = $1000; + EXT: file = "", define = yes, start = $9000, size = $1000; + IO: file = "", define = yes, start = $A000, size = $1000; + RAE1: file = "", define = yes, start = $B000, size = $1000; + BASROM: file = "", define = yes, start = $C000, size = $2000; + RAE2: file = "", define = yes, start = $E000, size = $1000; + TOP: file = "", define = yes, start = $F000, size = $1000; +} + +SEGMENTS { + ZEROPAGE: load = ZP, type = zp, define = yes; + STARTUP: load = RAM, type = ro, define = yes; + CODE: load = RAM, type = ro, define = yes; + RODATA: load = RAM, type = ro, define = yes; + ONCE: load = RAM, type = ro, define = yes; + DATA: load = RAM, type = rw, define = yes; + BSS: load = RAM, type = bss, define = yes; +} + diff --git a/cfg/sym1-4k.cfg b/cfg/sym1-4k.cfg new file mode 100644 index 000000000..468a76fe0 --- /dev/null +++ b/cfg/sym1-4k.cfg @@ -0,0 +1,46 @@ +# sym1-4k.cfg (4k) +# +# for Sym-1 with 4kb RAM +# +# ld65 --config sym1-4k.cfg -o .bin .o + +FEATURES { + STARTADDRESS: default = $0200; + CONDES: segment = STARTUP, + type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__; + CONDES: segment = STARTUP, + type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__; +} + +SYMBOLS { + __STACKSIZE__: type = weak, value = $0080; # 128 byte program stack + __STARTADDRESS__: type = export, value = %S; +} + +MEMORY { + ZP: file = %O, define = yes, start = $0000, size = $00F7; + CPUSTACK: file = "", define = yes, start = $0100, size = $0100; + RAM: file = %O, define = yes, start = %S, size = $1000 - %S - __STACKSIZE__; + MONROM: file = "", define = yes, start = $8000, size = $1000; + EXT: file = "", define = yes, start = $9000, size = $1000; + IO: file = "", define = yes, start = $A000, size = $1000; + RAE1: file = "", define = yes, start = $B000, size = $1000; + BASROM: file = "", define = yes, start = $C000, size = $2000; + RAE2: file = "", define = yes, start = $E000, size = $1000; + TOP: file = "", define = yes, start = $F000, size = $1000; +} + +SEGMENTS { + ZEROPAGE: load = ZP, type = zp, define = yes; + STARTUP: load = RAM, type = ro, define = yes; + CODE: load = RAM, type = ro, define = yes; + RODATA: load = RAM, type = ro, define = yes; + ONCE: load = RAM, type = ro, define = yes; + DATA: load = RAM, type = rw, define = yes; + BSS: load = RAM, type = bss, define = yes; +} + diff --git a/cfg/sym1.cfg b/cfg/sym1.cfg new file mode 100644 index 000000000..468a76fe0 --- /dev/null +++ b/cfg/sym1.cfg @@ -0,0 +1,46 @@ +# sym1-4k.cfg (4k) +# +# for Sym-1 with 4kb RAM +# +# ld65 --config sym1-4k.cfg -o .bin .o + +FEATURES { + STARTADDRESS: default = $0200; + CONDES: segment = STARTUP, + type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__; + CONDES: segment = STARTUP, + type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__; +} + +SYMBOLS { + __STACKSIZE__: type = weak, value = $0080; # 128 byte program stack + __STARTADDRESS__: type = export, value = %S; +} + +MEMORY { + ZP: file = %O, define = yes, start = $0000, size = $00F7; + CPUSTACK: file = "", define = yes, start = $0100, size = $0100; + RAM: file = %O, define = yes, start = %S, size = $1000 - %S - __STACKSIZE__; + MONROM: file = "", define = yes, start = $8000, size = $1000; + EXT: file = "", define = yes, start = $9000, size = $1000; + IO: file = "", define = yes, start = $A000, size = $1000; + RAE1: file = "", define = yes, start = $B000, size = $1000; + BASROM: file = "", define = yes, start = $C000, size = $2000; + RAE2: file = "", define = yes, start = $E000, size = $1000; + TOP: file = "", define = yes, start = $F000, size = $1000; +} + +SEGMENTS { + ZEROPAGE: load = ZP, type = zp, define = yes; + STARTUP: load = RAM, type = ro, define = yes; + CODE: load = RAM, type = ro, define = yes; + RODATA: load = RAM, type = ro, define = yes; + ONCE: load = RAM, type = ro, define = yes; + DATA: load = RAM, type = rw, define = yes; + BSS: load = RAM, type = bss, define = yes; +} + diff --git a/cfg/telestrat.cfg b/cfg/telestrat.cfg new file mode 100644 index 000000000..bd720fb8d --- /dev/null +++ b/cfg/telestrat.cfg @@ -0,0 +1,44 @@ +FEATURES { + STARTADDRESS: default = $1000; +} + +SYMBOLS { + __ORIXHDR__: type = import; + __STACKSIZE__: type = weak, value = $0800; # 2K stack + __GRAB__: type = weak, value = 0; # 0=don't grab graphics RAM, 1=grab graphics RAM + __RAMEND__: type = weak, value = $9800 + $1C00 * __GRAB__; +} +MEMORY { + ZP: file = "", define = yes, start = $00B0, size = $003A; + ORIXHDR: file = %O, type = ro, start = $0000, size = $001F; + MAIN: file = %O, define = yes, start = %S, size = __RAMEND__ - __MAIN_START__; + BSS: file = "", start = __ONCE_RUN__, size = __RAMEND__ - __STACKSIZE__ - __ONCE_RUN__; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + ORIXHDR: load = ORIXHDR, type = ro; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = rw; + ONCE: load = MAIN, type = ro, define = yes; + BASTAIL: load = MAIN, type = ro, optional = yes; + BSS: load = BSS, type = bss, define = yes; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/cfg/vic20-32k.cfg b/cfg/vic20-32k.cfg index 23cd718df..fe53d46ab 100644 --- a/cfg/vic20-32k.cfg +++ b/cfg/vic20-32k.cfg @@ -3,32 +3,32 @@ SYMBOLS { __LOADADDR__: type = import; __EXEHDR__: type = import; - __STACKSIZE__: type = weak, value = $0400; # 1k stack + __STACKSIZE__: type = weak, value = $0800; # 2k stack } MEMORY { ZP: file = "", define = yes, start = $0002, size = $001A; LOADADDR: file = %O, start = $11FF, size = $0002; HEADER: file = %O, start = $1201, size = $000C; - RAM: file = %O, define = yes, start = $120D, size = $6DF3 - __STACKSIZE__; + MAIN: file = %O, define = yes, start = $120D, size = $6DF3 - __STACKSIZE__; } SEGMENTS { + ZEROPAGE: load = ZP, type = zp; LOADADDR: load = LOADADDR, type = ro; EXEHDR: load = HEADER, type = ro; - STARTUP: load = RAM, type = ro; - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = bss; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/cfg/vic20-asm.cfg b/cfg/vic20-asm.cfg new file mode 100644 index 000000000..286a7f95c --- /dev/null +++ b/cfg/vic20-asm.cfg @@ -0,0 +1,19 @@ +FEATURES { + STARTADDRESS: default = $1001; +} +SYMBOLS { + __LOADADDR__: type = import; +} +MEMORY { + ZP: file = "", start = $0002, size = $001A, define = yes; + LOADADDR: file = %O, start = %S - 2, size = $0002; + MAIN: file = %O, start = %S, size = $0DF3 - %S; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp, optional = yes; + LOADADDR: load = LOADADDR, type = ro; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + BSS: load = MAIN, type = bss, optional = yes, define = yes; +} diff --git a/cfg/vic20-tgi.cfg b/cfg/vic20-tgi.cfg new file mode 100644 index 000000000..bc7845615 --- /dev/null +++ b/cfg/vic20-tgi.cfg @@ -0,0 +1,50 @@ +# Memory configuration which supports the "vic20-hi.tgi" driver. +# Memory configuration for a VIC-20 with, at least, 8K expansion RAM. +FEATURES { + STARTADDRESS: default = $1201; +} +SYMBOLS { + __LOADADDR__: type = import; + __EXEHDR__: type = import; + __TGIHDR__: type = import; + __STACKSIZE__: type = weak, value = $0200; # 512-byte stack + __HIMEM__: type = weak, value = $4000; +} +MEMORY { + ZP: file = "", define = yes, start = $0002, size = $001A; + LOADADDR: file = %O, start = %S - 2, size = $0002; + HEADER: file = %O, define = yes, start = %S, size = $003E; + MAIN: file = %O, define = yes, start = $2000, size = __HIMEM__ - __MAIN_START__ - __STACKSIZE__; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + LOADADDR: load = LOADADDR, type = ro; +# The start-up code needs EXEHDR, TGI1HDR, TGI2HDR, +# and STARTUP to be next to each other, in that order. + EXEHDR: load = HEADER, type = ro; + TGI1HDR: load = HEADER, type = ro; + TGI2HDR: load = MAIN, type = ro; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + ONCE: load = MAIN, type = ro, optional = yes, define = yes; + INIT: load = MAIN, type = bss, optional = yes; + BSS: load = MAIN, type = bss, define = yes; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/cfg/vic20.cfg b/cfg/vic20.cfg index 9a5ce9a63..8efeae229 100644 --- a/cfg/vic20.cfg +++ b/cfg/vic20.cfg @@ -1,32 +1,32 @@ SYMBOLS { __LOADADDR__: type = import; __EXEHDR__: type = import; - __STACKSIZE__: type = weak, value = $0400; # 1k stack + __STACKSIZE__: type = weak, value = $0100; } MEMORY { ZP: file = "", define = yes, start = $0002, size = $001A; LOADADDR: file = %O, start = $0FFF, size = $0002; HEADER: file = %O, start = $1001, size = $000C; - RAM: file = %O, define = yes, start = $100D, size = $0DF3 - __STACKSIZE__; + MAIN: file = %O, define = yes, start = $100D, size = $0DF3 - __STACKSIZE__; } SEGMENTS { + ZEROPAGE: load = ZP, type = zp; LOADADDR: load = LOADADDR, type = ro; EXEHDR: load = HEADER, type = ro; - STARTUP: load = RAM, type = ro; - LOWCODE: load = RAM, type = ro, optional = yes; - INIT: load = RAM, type = ro, define = yes, optional = yes; - CODE: load = RAM, type = ro; - RODATA: load = RAM, type = ro; - DATA: load = RAM, type = rw; - INITBSS: load = RAM, type = bss; - BSS: load = RAM, type = bss, define = yes; - ZEROPAGE: load = ZP, type = zp; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + INIT: load = MAIN, type = bss; + BSS: load = MAIN, type = bss, define = yes; } FEATURES { CONDES: type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__, - segment = INIT; + segment = ONCE; CONDES: type = destructor, label = __DESTRUCTOR_TABLE__, count = __DESTRUCTOR_COUNT__, diff --git a/doc/Makefile b/doc/Makefile index 967443ef0..bfdf0cce3 100644 --- a/doc/Makefile +++ b/doc/Makefile @@ -6,14 +6,12 @@ endif .SUFFIXES: -htmldir = $(prefix)/share/doc/cc65$(DESTPACKAGE_SUFFIX)/html -infodir = $(prefix)/share/info - -all mostlyclean: +htmldir = $(PREFIX)/share/doc/cc65$(DESTPACKAGE_SUFFIX)/html +infodir = $(PREFIX)/share/info ifdef CMD_EXE -clean install zip doc: +doc clean install zip: else # CMD_EXE @@ -26,23 +24,6 @@ TOC_LEVEL = 2 INSTALL = install -clean: - $(RM) -r ../html ../info - -install: - $(if $(prefix),,$(error variable `prefix' must be set)) -ifeq ($(wildcard ../html),../html) - $(INSTALL) -d $(DESTDIR)$(htmldir) - $(INSTALL) -m644 ../html/*.* $(DESTDIR)$(htmldir) -endif -ifeq ($(wildcard ../info),../info) - $(INSTALL) -d $(DESTDIR)$(infodir) - $(INSTALL) -m644 ../info/*.* $(DESTDIR)$(infodir) -endif - -zip: - @cd .. && zip cc65 html/*.* - doc: html info html: $(addprefix ../html/,$(SGMLS:.sgml=.html) doc.css doc.png) @@ -61,4 +42,24 @@ info: $(addprefix ../info/,$(SGMLS:.sgml=.info)) ../info/%.info: %.sgml | ../info @cd ../info && linuxdoc -B info ../doc/$< +clean: + $(RM) -r ../html ../info + +install: +ifeq ($(wildcard ../html),../html) + $(INSTALL) -d $(DESTDIR)$(htmldir) + $(INSTALL) -m0644 ../html/*.* $(DESTDIR)$(htmldir) +endif +ifeq ($(wildcard ../info),../info) + $(INSTALL) -d $(DESTDIR)$(infodir) + $(INSTALL) -m0644 ../info/*.* $(DESTDIR)$(infodir) +endif + +zip: +ifneq "$(wildcard ../html)" "" + @cd .. && zip cc65 html/*.* +endif + endif # CMD_EXE + +all mostlyclean: diff --git a/doc/apple2.sgml b/doc/apple2.sgml index e58565359..63b40c6f8 100644 --- a/doc/apple2.sgml +++ b/doc/apple2.sgml @@ -1,10 +1,8 @@
- Apple ][ specific information for cc65 <author><url url="mailto:ol.sc@web.de" name="Oliver Schmidt"> -<date>2014-04-10 <abstract> An overview over the Apple ][ runtime system as it is @@ -34,20 +32,14 @@ more information. <sect>Binary format<p> The standard binary file format generated by the linker for the -Apple ][ target is a binary program with a 4 byte DOS 3.3 header -containing the load address and load length. The default load address is -$803. +Apple ][ target is an <url name="AppleSingle" +url="https://nulib.com/library/AppleSingle_AppleDouble.pdf"> file. +The default load address is $803. -<bf/AppleCommander 1.3.5/ or later (available at <url -url="http://applecommander.sourceforge.net/">) includes the option <tt/-cc65/ -that allows to put binary files with a DOS 3.3 header onto disk images -containing DOS 3.3 as well as ProDOS 8. - -For ProDOS 8 system programs the load address is fixed to $2000 so there -is no need for a header. Thus the linker configuration -<ref id="apple-sys-cfg" name="apple2-system.cfg"> for those programs -omits the DOS 3.3 header. The right AppleCommander option to put system files -without a header on a ProDOS 8 disk image is <tt/-p/. +<bf/AppleCommander 1.4.0/ or later (available at <url +url="https://applecommander.github.io/">) includes the option <tt/-as/ that +allows to put AppleSingle files onto disk images containing DOS 3.3 as well +as ProDOS 8. <sect>Memory layout<p> @@ -75,13 +67,30 @@ However while running module constructors/destructors the Language Card is disab Enabling the Language Card allows to use it as additional memory for cc65 generated code. However code is never automatically placed there. Rather code needs to be explicitly placed in the Language Card either per file by compiling -with <tt/--code-name HIGHCODE/ or per function by enclosing in <tt/#pragma -code-name (push, "HIGHCODE")/ and <tt/#pragma code-name (pop)/. In either case the -cc65 runtime system takes care of actually moving the code into the Language -Card. +with <tt/--code-name LC/ or per function by enclosing in <tt/#pragma code-name +(push, "LC")/ and <tt/#pragma code-name (pop)/. In either case the cc65 runtime +system takes care of actually moving the code into the Language Card. The amount of memory available in the Language Card for generated code depends -on the chosen <ref id="link-configs" name="linker configuration">. +on the <ref id="link-configs" name="linker configuration"> parameters. There are +several useful settings: + +<descrip> + + <tag>LC address: $D400, LC size: $C00</tag> + For plain vanilla ProDOS 8 which doesn't actually use the Language Card bank 2 + memory from $D400 to $DFFF. This is the default setting. + + <tag>LC address: $D000, LC size: $1000</tag> + For ProDOS 8 together with the function <tt/rebootafterexit()/. If a program + doesn't quit to the ProDOS 8 dispatcher but rather reboots the machine after + exit then a plain vanilla ProDOS 8 doesn't make use of the Language Card bank + 2 at all. + + <tag>LC address: $D000, LC size: $3000</tag> + For plain vanilla DOS 3.3 which doesn't make use of the Language Card at all. + +</descrip><p> @@ -93,126 +102,152 @@ The apple2 package comes with additional secondary linker config files, which are used via <tt/-t apple2 -C <configfile>/. -<sect1>default config file (<tt/apple2.cfg/)<p> +<sect1>default config file (<tt/apple2.cfg/)<label id="apple-def-cfg"><p> -Default configuration optimized for a binary program running on ProDOS 8 with -BASIC.SYSTEM. A plain vanilla ProDOS 8 doesn't actually use the Language Card -bank 2 memory from $D400 to $DFFF. +Default configuration for a binary program. + +Parameters: <descrip> - <tag><tt/RAM:/ Main memory area</tag> - From $803 to $95FF (35.5 KB) - - <tag><tt/LC:/ Language Card memory area</tag> - From $D400 to $DFFF (3 KB) - <tag><tt/STARTADDRESS:/ Program start address</tag> - Variable (default: $803) + Default: $803. Use <tt/-S <addr>/ to set a different start address. - <tag><tt/HEADER:/ Binary file header</tag> - DOS 3.3 header (address and length) + <tag><tt/__EXEHDR__:/ AppleSingle executable file header</tag> + Default: Yes. Use <tt/-D __EXEHDR__=0/ to omit the AppleSingle header. -</descrip><p> + <tag><tt/__STACKSIZE__:/ C runtime stack size</tag> + Default: $800. Use <tt/-D __STACKSIZE__=<size>/ to set a different + stack size. + <tag><tt/__HIMEM__:/ Highest usable memory address presumed at link time</tag> + Default: $9600. Use <tt/-D __HIMEM__=<addr>/ to set a different + highest usable address. -<sect1><tt/apple2-dos33.cfg/<p> + <tag><tt/__LCADDR__:/ Address of code in the Language Card</tag> + Default: $D400. Use <tt/-D __LCADDR__=<addr>/ to set a different + code address. -Configuration optimized for a binary program running on DOS 3.3. A plain -vanilla DOS 3.3 doesn't make use of the Language Card at all. - -<descrip> - - <tag><tt/RAM:/ Main memory area</tag> - From $803 to $95FF (35.5 KB) - - <tag><tt/LC:/ Language Card memory area</tag> - From $D000 to $FFFF (12 KB) - - <tag><tt/STARTADDRESS:/ Program start address</tag> - Variable (default: $803) - - <tag><tt/HEADER:/ Binary file header</tag> - DOS 3.3 header (address and length) + <tag><tt/__LCSIZE__:/ Size of code in the Language Card</tag> + Default: $C00. Use <tt/-D __LCSIZE__=<size>/ to set a different + code size. </descrip><p> <sect1><tt/apple2-system.cfg/<label id="apple-sys-cfg"><p> -Configuration for a system program running on ProDOS 8. +Configuration for a system program running on ProDOS 8 and using the memory from +$2000 to $BEFF. + +Parameters: <descrip> - <tag><tt/RAM:/ Main memory area</tag> - From $2000 to $BEFF (39.75 KB) + <tag><tt/__EXEHDR__:/ AppleSingle executable file header</tag> + Default: Yes. Use <tt/-D __EXEHDR__=0/ to omit the AppleSingle header. - <tag><tt/LC:/ Language Card memory area</tag> - From $D400 to $DFFF (3 KB) + <tag><tt/__STACKSIZE__:/ C runtime stack size</tag> + Default: $800. Use <tt/-D __STACKSIZE__=<size>/ to set a different + stack size. - <tag><tt/STARTADDRESS:/ Program start address</tag> - Fixed ($2000) + <tag><tt/__LCADDR__:/ Address of code in the Language Card</tag> + Default: $D400. Use <tt/-D __LCADDR__=<addr>/ to set a different + code address. - <tag><tt/HEADER:/ Binary file header</tag> - None + <tag><tt/__LCSIZE__:/ Size of code in the Language Card</tag> + Default: $C00. Use <tt/-D __LCSIZE__=<size>/ to set a different + code size. </descrip><p> -<sect1><tt/apple2-loader.cfg/<label id="apple-load-cfg"><p> +<sect1><tt/apple2-hgr.cfg/<p> -Configuration optimized for a binary program running on ProDOS 8 without -BASIC.SYSTEM. Intended to be used with <bf/LOADER.SYSTEM - an -Apple ][ ProDOS 8 loader for cc65 programs/, which is available -in the cc65 User Contributions section. +Configuration for a program including a hires page. See <tt>testcode/lib/apple/hgrtest.c</tt> +for an example of such a program. -A program loaded by LOADER.SYSTEM works like a ProDOS 8 system program but -isn't tied to the start address $2000. Thus with the default start -address $800 the main memory area is increased by 6 KB. +Parameters: <descrip> - <tag><tt/RAM:/ Main memory area</tag> - From $800 to $BEFF (45.75 KB) - - <tag><tt/LC:/ Language Card memory area</tag> - From $D400 to $DFFF (3 KB) - <tag><tt/STARTADDRESS:/ Program start address</tag> - Variable (default: $800) + Default: $803. Use <tt/-S <addr>/ to set a different start address. - <tag><tt/HEADER:/ Binary file header</tag> - DOS 3.3 header (address and length) + <tag><tt/__EXEHDR__:/ AppleSingle executable file header</tag> + Default: Yes. Use <tt/-D __EXEHDR__=0/ to omit the AppleSingle header. + + <tag><tt/__STACKSIZE__:/ C runtime stack size</tag> + Default: $800. Use <tt/-D __STACKSIZE__=<size>/ to set a different + stack size. + + <tag><tt/__HIMEM__:/ Highest usable memory address presumed at link time</tag> + Default: $9600. Use <tt/-D __HIMEM__=<addr>/ to set a different + highest usable address. + + <tag><tt/__LCADDR__:/ Address of code in the Language Card</tag> + Default: $D400. Use <tt/-D __LCADDR__=<addr>/ to set a different + code address. + + <tag><tt/__LCSIZE__:/ Size of code in the Language Card</tag> + Default: $C00. Use <tt/-D __LCSIZE__=<size>/ to set a different + code size. </descrip><p> -<sect1><tt/apple2-reboot.cfg/<p> +<sect1><tt/apple2-overlay.cfg/<p> -Configuration optimized for a binary program running on ProDOS 8 without -BASIC.SYSTEM. Intended to be used with <bf/LOADER.SYSTEM - an -Apple ][ ProDOS 8 loader for cc65 programs/ (see above) together -with the function <tt/rebootafterexit()/. +Configuration for an overlay program with up to nine overlays. The overlay files +don't include the AppleSingle header. See <tt>samples/overlaydemo.c</tt> for more +information on overlays. -If a ProDOS 8 system program doesn't quit to the ProDOS 8 dispatcher but rather -reboots the machine after exit then a plain vanilla ProDOS 8 doesn't make use of -the Language Card bank 2 at all. - -This setup makes nearly 50 KB available to a cc65 program - on a 64 KB machine! +Parameters: <descrip> - <tag><tt/RAM:/ Main memory area</tag> - From $800 to $BEFF (45.75 KB) + <tag><tt/STARTADDRESS:/ Program start address</tag> + Default: $803. Use <tt/-S <addr>/ to set a different start address. - <tag><tt/LC:/ Language Card memory area</tag> - From $D000 to $DFFF (4 KB) + <tag><tt/__EXEHDR__:/ AppleSingle executable file header</tag> + Default: Yes. Use <tt/-D __EXEHDR__=0/ to omit the AppleSingle header. + + <tag><tt/__STACKSIZE__:/ C runtime stack size</tag> + Default: $800. Use <tt/-D __STACKSIZE__=<size>/ to set a different + stack size. + + <tag><tt/__HIMEM__:/ Highest usable memory address presumed at link time</tag> + Default: $9600. Use <tt/-D __HIMEM__=<addr>/ to set a different + highest usable address. + + <tag><tt/__LCADDR__:/ Address of code in the Language Card</tag> + Default: $D400. Use <tt/-D __LCADDR__=<addr>/ to set a different + code address. + + <tag><tt/__LCSIZE__:/ Size of code in the Language Card</tag> + Default: $C00. Use <tt/-D __LCSIZE__=<size>/ to set a different + code size. + + <tag><tt/__OVERLAYSIZE__:/ Size of code in the overlays</tag> + Default: $1000. Use <tt/-D __OVERLAYSIZE__=<size>/ to set a different + code size. + +</descrip><p> + + +<sect1><tt/apple2-asm.cfg/<p> + +Configuration for an assembler program that doesn't need a special setup. + +Parameters: + +<descrip> <tag><tt/STARTADDRESS:/ Program start address</tag> - Variable (default: $800) + Default: $803. Use <tt/-S <addr>/ to set a different start address. - <tag><tt/HEADER:/ Binary file header</tag> - DOS 3.3 header (address and length) + <tag><tt/__EXEHDR__:/ AppleSingle executable file header</tag> + Default: No. Use <tt/-u __EXEHDR__ apple2.lib/ to add the AppleSingle header. </descrip><p> @@ -230,14 +265,15 @@ range. The easiest (and for really large programs in fact the only) way to have a cc65 program use the memory from $800 to $2000 is to link it as binary -(as opposed to system) program using the linker configuration -<ref id="apple-load-cfg" name="apple2-loader.cfg"> with start address -$803 and load it with the targetutil LOADER.SYSTEM. The program then works -like a system program (i.e. quits to the ProDOS dispatcher). +(as opposed to system) program using the default linker configuration +<ref id="apple-def-cfg" name="apple2.cfg"> with <tt/__HIMEM__/ set to $BF00 +and load it with the LOADER.SYSTEM utility. The program then works like a system +program (i.e. quits to the ProDOS dispatcher). Using LOADER.SYSTEM is as simple as copying it to the ProDOS 8 directory of the program to load under name <program>.SYSTEM as a system program. For -example the program <tt/MYPROG/ is loaded by <tt/MYPROG.SYSTEM/. +example the program <tt/MYPROG/ is loaded by <tt/MYPROG.SYSTEM/. The right +AppleCommander option to put LOADER.SYSTEM on a ProDOS 8 disk image is <tt/-p/. <sect1>Heap<p> @@ -245,7 +281,7 @@ example the program <tt/MYPROG/ is loaded by <tt/MYPROG.SYSTEM/. If the cc65 program can be successfully linked as system program using the linker configuration <ref id="apple-sys-cfg" name="apple2-system.cfg">, but uses the heap either explicitly or implicitly (i.e. by loading a driver) then -the memory from $800 to $2000 can be added to the heap by calling +the memory from $800 to $1FFF can be added to the heap by calling <tt/_heapadd ((void *) 0x0800, 0x1800);/ at the beginning of <tt/main()/. @@ -325,8 +361,8 @@ The names in the parentheses denote the symbols to be used for static linking of <tag><tt/a2.hi.tgi (a2_hi_tgi)/</tag> This driver features a resolution of 280×192 with 8 colors and two hires pages. Note that programs using this driver will have to be linked - with <tt/--start-addr $4000/ to reserve the first hires page or with - <tt/--start-addr $6000/ to reserve both hires pages. + with <tt/-S $4000/ to reserve the first hires page or with <tt/-S $6000/ + to reserve both hires pages. The function <tt/tgi_apple2_mix()/ allows to activate 4 lines of text. The function doesn't clear the corresponding area at the bottom of the screen. @@ -334,7 +370,7 @@ The names in the parentheses denote the symbols to be used for static linking of In memory constrained situations the memory from $803 to $1FFF can be made available to a program by calling <tt/_heapadd ((void *) 0x0803, 0x17FD);/ at the beginning of <tt/main()/. Doing so is beneficial even if the program - doesn't use the the heap explicitly because loading the driver (and in fact + doesn't use the heap explicitly because loading the driver (and in fact already opening the driver file) uses the heap implicitly. </descrip><p> @@ -374,7 +410,7 @@ The names in the parentheses denote the symbols to be used for static linking of for an AppleMouse II Card compatible firmware. The default bounding box is [0..279,0..191]. - Programs using this driver will have to be linked with <tt/--start-addr $4000/ + Programs using this driver will have to be linked with <tt/-S $4000/ to reserve the first hires page if they are intended to run on an Apple ][ (in contrast to an Apple //e) because the AppleMouse II Card firmware writes to the hires page when initializing @@ -392,8 +428,8 @@ The names in the parentheses denote the symbols to be used for static linking of <tag><tt/a2.ssc.ser (a2_ssc_ser)/</tag> Driver for the Apple II Super Serial Card. Supports up to 19200 baud, - hardware flow control (RTS/CTS) and interrupt driven receives. Note - that because of the peculiarities of the 6551 chip transmits are not + requires hardware flow control (RTS/CTS) and does interrupt driven receives. + Note that because of the peculiarities of the 6551 chip transmits are not interrupt driven, and the transceiver blocks if the receiver asserts flow control because of a full buffer. @@ -417,7 +453,7 @@ BASIC.SYSTEM) there are some limitations for DOS 3.3: <descrip> - <tag>Disk File I/O</tag> + <tag>Disk file I/O</tag> There's no disk file I/O support. Any attempt to use it yields an error with <tt/errno/ set to <tt/ENOSYS/. This implicitly means that loadable drivers are in general not functional as they depend on disk file I/O. Therefore the statically @@ -426,25 +462,52 @@ BASIC.SYSTEM) there are some limitations for DOS 3.3: <tag/Interrupts/ There's no <tt/interruptor/ support. Any attempt to use it yields the message 'FAILED TO ALLOC INTERRUPT' on program startup. This implicitly means that - <tt/a2.stdmou.mou/ and <tt/a2.ssc.ser/ are not functional as they depend on - interrupts. + mouse and RS232 device drivers are not functional as they depend on interrupts. </descrip><p> <sect1>Direct console I/O<p> -<descrip> +The Apple ][ has no color text mode. Therefore the functions +<tt/textcolor()/, <tt/bgcolor()/ and <tt/bordercolor()/ have no effect. - <tag/Color/ - The Apple ][ has no color text mode. Therefore the functions textcolor(), - bgcolor() and bordercolor() have no effect. - <tag/Cursor/ - The Apple ][ has no hardware cursor. Therefore the function cursor() has - no effect. +<sect1>Random number generator<p> -</descrip><p> +The random number seed is generated from the time the program waits for user input. +Therefore it is necessary to wait for at least one user keypress either via Standard +I/O or via Direct console I/O before initializing the pseudo random number generator. + + +<sect1>Realtime clock<p> + +There are several types of realtime clocks. It's not desirable to have specific code +for all of them. As ProDOS 8 supports file timestamps, realtime clock owners usually +use ProDOS 8 drivers for their realtime clock. Those drivers read the realtime clock +and write the result to the date/time location in RAM ($BF90 to $BF93). +ProDOS 8 reads the date/time from that RAM location. If there's no realtime clock the +RAM location keeps containing zeros. ProDOS 8 uses those zeros as timestamps and the +files show up in a directory as <tt/<NO DATE>/. + +There's no common interface to set realtime clocks so if a realtme clock <bf/IS/ +present there's just nothing to do. However, if there's <bf/NO/ realtime clock present, +the user might very well be interested to "manually" set the RAM location in order to +have timestamps. But he surely doesn't want to manually set the RAM location over and +over again. Rather he wants to set it just once after booting ProDOS 8. + +From that perspective it makes most sense to not set both the date and the time but +rather only set the date and have the time just stay zero. Then files show up in a +directory as <tt/DD-MON-YY 0:00/. + +So <tt/clock_settime()/ checks if a realtime clock is active. If it is then +<tt/clock_settime()/ fails with <tt/ERANGE/. Otherwise <tt/clock_settime()/ +sets the date - and completely ignores the time provided as parameter. + +<tt/clock_getres()/ too checks if a realtime clock is active. If it is then +<tt/clock_getres()/ returns a time resolution of one minute. Otherwise +<tt/clock_getres()/ presumes that the only one who sets the RAM location is +<tt/clock_settime()/ and therefore returns a time resolution of one day. @@ -506,6 +569,105 @@ url="ca65.html" name="assembler manual">. </descrip><p> +<sect1>Specifying file types for fopen<p> + +<descrip> + + <tag>Explanation of File Types</tag> + + ProDOS 8 associates a file type and an auxiliary type with each file. + These type specifications are separate from the file's name, unlike + Windows which uses the file name's suffix (a.k.a. + extension) to specify the file type. For example, <tt/.exe/, + <tt/.doc/, or <tt/.bat/. + The ProDOS 8 Machine-Language Interface (MLI) function for creating a + file require these types to be specified. + + In contrast, the ISO C function <tt/fopen()/ and the POSIX function + <tt/open()/ have no parameter to specify either a file type or an + auxiliary type. Therefore, some additional mechanism for specifying + the file types is needed. + + <tag>Specifying the File Type and Auxiliary Type</tag> + + There are two global variables provided that allow the file type + and auxiliary type to be specified before a call to <tt/fopen()/ + or <tt/open()/. They are defined in <tt/apple2_filetype.h/: + + <tscreen> + <verb> + extern unsigned char _filetype; /* Default: PRODOS_T_BIN */ + extern unsigned int _auxtype; /* Default: 0 */ + </verb> + </tscreen> + + The header file <tt/apple2_filetype.h/ also defines many values + that can be used to set these variables. It is included in + <tt/apple2.h/, which is in turn included in <tt/apple2enh.h/. + + <tag>Example</tag> + + A text file cannot be created with just the + standard C functions because they default to the binary type + <tt/PRODOS_T_BIN/. The <tt/_filetype/ variable must be set to + <tt/PRODOS_T_TXT/ to create a text file. + + For a text file, + <tt/_auxtype/ specifies the record length. A zero record + length text file is referred to as a sequential text file. + This is equivalent to text files on + other operating systems, except that the line terminator is a + carriage return instead of a line-feed (Linux/BSD/MacOS) or + carriage return, line-feed pair (Windows). + + The 'sequential' text file terminology is in contrast to a + 'random-access' text file which would + have a fixed-length, non-zero record length, so that the + file position of any individual record can be calculated. + + For this example, the + <tt/_auxtype/ does not need to be set because it defaults to + the desired value, which is zero. To be more explicit, + <tt/_auxtype/ can also be set to <tt/PRODOS_AUX_T_TXT_SEQ/ + which is defined as zero. + + <tscreen> + <verb> + #include <stdio.h> + #include <string.h> + #include <errno.h> + #include <apple2.h> + + void main(void) + { + FILE *out; + char *name = "MY.FAVS"; + + /*-----------------------------*/ + + _filetype = PRODOS_T_TXT; + _auxtype = PRODOS_AUX_T_TXT_SEQ; + + /*-----------------------------*/ + + if ((out = fopen(name, "w")) != NULL) { + fputs("Jorah Mormont\r", out); + fputs("Brienne of Tarth\r", out); + fputs("Daenerys Targaryen\r", out); + fputs("Sandor Clegane\r", out); + if (fclose(out) == EOF) { + fprintf(stderr, "fclose failed for %s: %s", name, strerror(errno)); + } + } + else { + fprintf(stderr, "fopen failed for %s: %s", name, strerror(errno)); + } + } + </verb> + </tscreen> + +</descrip><p> + <sect>License<p> @@ -518,14 +680,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/apple2enh.sgml b/doc/apple2enh.sgml index 215c6d384..15ceed04f 100644 --- a/doc/apple2enh.sgml +++ b/doc/apple2enh.sgml @@ -1,10 +1,8 @@ <!doctype linuxdoc system> <article> - <title>Enhanced Apple //e specific information for cc65 <author><url url="mailto:ol.sc@web.de" name="Oliver Schmidt"> -<date>2014-04-10 <abstract> An overview over the enhanced Apple //e runtime system as it is @@ -34,20 +32,14 @@ more information. <sect>Binary format<p> The standard binary file format generated by the linker for the -enhanced Apple //e target is a binary program with a 4 byte DOS 3.3 header -containing the load address and load length. The default load address is -$803. +enhanced Apple //e target is an <url name="AppleSingle" +url="https://nulib.com/library/AppleSingle_AppleDouble.pdf"> file. +The default load address is $803. -<bf/AppleCommander 1.3.5/ or later (available at <url -url="http://applecommander.sourceforge.net/">) includes the option <tt/-cc65/ -that allows to put binary files with a DOS 3.3 header onto disk images -containing DOS 3.3 as well as ProDOS 8. - -For ProDOS 8 system programs the load address is fixed to $2000 so there -is no need for a header. Thus the linker configuration -<ref id="apple-sys-cfg" name="apple2enh-system.cfg"> for those programs -omits the DOS 3.3 header. The right AppleCommander option to put system files -without a header on a ProDOS 8 disk image is <tt/-p/. +<bf/AppleCommander 1.4.0/ or later (available at <url +url="https://applecommander.github.io/">) includes the option <tt/-as/ that +allows to put AppleSingle files onto disk images containing DOS 3.3 as well +as ProDOS 8. <sect>Memory layout<p> @@ -75,13 +67,30 @@ However while running module constructors/destructors the Language Card is disab Enabling the Language Card allows to use it as additional memory for cc65 generated code. However code is never automatically placed there. Rather code needs to be explicitly placed in the Language Card either per file by compiling -with <tt/--code-name HIGHCODE/ or per function by enclosing in <tt/#pragma -code-name (push, "HIGHCODE")/ and <tt/#pragma code-name (pop)/. In either case the -cc65 runtime system takes care of actually moving the code into the Language -Card. +with <tt/--code-name LC/ or per function by enclosing in <tt/#pragma code-name +(push, "LC")/ and <tt/#pragma code-name (pop)/. In either case the cc65 runtime +system takes care of actually moving the code into the Language Card. The amount of memory available in the Language Card for generated code depends -on the chosen <ref id="link-configs" name="linker configuration">. +on the <ref id="link-configs" name="linker configuration"> parameters. There are +several useful settings: + +<descrip> + + <tag>LC address: $D400, LC size: $C00</tag> + For plain vanilla ProDOS 8 which doesn't actually use the Language Card bank 2 + memory from $D400 to $DFFF. This is the default setting. + + <tag>LC address: $D000, LC size: $1000</tag> + For ProDOS 8 together with the function <tt/rebootafterexit()/. If a program + doesn't quit to the ProDOS 8 dispatcher but rather reboots the machine after + exit then a plain vanilla ProDOS 8 doesn't make use of the Language Card bank + 2 at all. + + <tag>LC address: $D000, LC size: $3000</tag> + For plain vanilla DOS 3.3 which doesn't make use of the Language Card at all. + +</descrip><p> @@ -93,126 +102,152 @@ The apple2enh package comes with additional secondary linker config files, which are used via <tt/-t apple2enh -C <configfile>/. -<sect1>default config file (<tt/apple2enh.cfg/)<p> +<sect1>default config file (<tt/apple2enh.cfg/)<label id="apple-def-cfg"><p> -Default configuration optimized for a binary program running on ProDOS 8 with -BASIC.SYSTEM. A plain vanilla ProDOS 8 doesn't actually use the Language Card -bank 2 memory from $D400 to $DFFF. +Default configuration for a binary program. + +Parameters: <descrip> - <tag><tt/RAM:/ Main memory area</tag> - From $803 to $95FF (35.5 KB) - - <tag><tt/LC:/ Language Card memory area</tag> - From $D400 to $DFFF (3 KB) - <tag><tt/STARTADDRESS:/ Program start address</tag> - Variable (default: $803) + Default: $803. Use <tt/-S <addr>/ to set a different start address. - <tag><tt/HEADER:/ Binary file header</tag> - DOS 3.3 header (address and length) + <tag><tt/__EXEHDR__:/ AppleSingle executable file header</tag> + Default: Yes. Use <tt/-D __EXEHDR__=0/ to omit the AppleSingle header. -</descrip><p> + <tag><tt/__STACKSIZE__:/ C runtime stack size</tag> + Default: $800. Use <tt/-D __STACKSIZE__=<size>/ to set a different + stack size. + <tag><tt/__HIMEM__:/ Highest usable memory address presumed at link time</tag> + Default: $9600. Use <tt/-D __HIMEM__=<addr>/ to set a different + highest usable address. -<sect1><tt/apple2enh-dos33.cfg/<p> + <tag><tt/__LCADDR__:/ Address of code in the Language Card</tag> + Default: $D400. Use <tt/-D __LCADDR__=<addr>/ to set a different + code address. -Configuration optimized for a binary program running on DOS 3.3. A plain -vanilla DOS 3.3 doesn't make use of the Language Card at all. - -<descrip> - - <tag><tt/RAM:/ Main memory area</tag> - From $803 to $95FF (35.5 KB) - - <tag><tt/LC:/ Language Card memory area</tag> - From $D000 to $FFFF (12 KB) - - <tag><tt/STARTADDRESS:/ Program start address</tag> - Variable (default: $803) - - <tag><tt/HEADER:/ Binary file header</tag> - DOS 3.3 header (address and length) + <tag><tt/__LCSIZE__:/ Size of code in the Language Card</tag> + Default: $C00. Use <tt/-D __LCSIZE__=<size>/ to set a different + code size. </descrip><p> <sect1><tt/apple2enh-system.cfg/<label id="apple-sys-cfg"><p> -Configuration for a system program running on ProDOS 8. +Configuration for a system program running on ProDOS 8 and using the memory from +$2000 to $BEFF. + +Parameters: <descrip> - <tag><tt/RAM:/ Main memory area</tag> - From $2000 to $BEFF (39.75 KB) + <tag><tt/__EXEHDR__:/ AppleSingle executable file header</tag> + Default: Yes. Use <tt/-D __EXEHDR__=0/ to omit the AppleSingle header. - <tag><tt/LC:/ Language Card memory area</tag> - From $D400 to $DFFF (3 KB) + <tag><tt/__STACKSIZE__:/ C runtime stack size</tag> + Default: $800. Use <tt/-D __STACKSIZE__=<size>/ to set a different + stack size. - <tag><tt/STARTADDRESS:/ Program start address</tag> - Fixed ($2000) + <tag><tt/__LCADDR__:/ Address of code in the Language Card</tag> + Default: $D400. Use <tt/-D __LCADDR__=<addr>/ to set a different + code address. - <tag><tt/HEADER:/ Binary file header</tag> - None + <tag><tt/__LCSIZE__:/ Size of code in the Language Card</tag> + Default: $C00. Use <tt/-D __LCSIZE__=<size>/ to set a different + code size. </descrip><p> -<sect1><tt/apple2enh-loader.cfg/<label id="apple-load-cfg"><p> +<sect1><tt/apple2enh-hgr.cfg/<p> -Configuration optimized for a binary program running on ProDOS 8 without -BASIC.SYSTEM. Intended to be used with <bf/LOADER.SYSTEM - an -Apple ][ ProDOS 8 loader for cc65 programs/, which is available -in the cc65 User Contributions section. +Configuration for a program including a hires page. See <tt>testcode/lib/apple/hgrtest.c</tt> +for an example of such a program. -A program loaded by LOADER.SYSTEM works like a ProDOS 8 system program but -isn't tied to the start address $2000. Thus with the default start -address $800 the main memory area is increased by 6 KB. +Parameters: <descrip> - <tag><tt/RAM:/ Main memory area</tag> - From $800 to $BEFF (45.75 KB) - - <tag><tt/LC:/ Language Card memory area</tag> - From $D400 to $DFFF (3 KB) - <tag><tt/STARTADDRESS:/ Program start address</tag> - Variable (default: $800) + Default: $803. Use <tt/-S <addr>/ to set a different start address. - <tag><tt/HEADER:/ Binary file header</tag> - DOS 3.3 header (address and length) + <tag><tt/__EXEHDR__:/ AppleSingle executable file header</tag> + Default: Yes. Use <tt/-D __EXEHDR__=0/ to omit the AppleSingle header. + + <tag><tt/__STACKSIZE__:/ C runtime stack size</tag> + Default: $800. Use <tt/-D __STACKSIZE__=<size>/ to set a different + stack size. + + <tag><tt/__HIMEM__:/ Highest usable memory address presumed at link time</tag> + Default: $9600. Use <tt/-D __HIMEM__=<addr>/ to set a different + highest usable address. + + <tag><tt/__LCADDR__:/ Address of code in the Language Card</tag> + Default: $D400. Use <tt/-D __LCADDR__=<addr>/ to set a different + code address. + + <tag><tt/__LCSIZE__:/ Size of code in the Language Card</tag> + Default: $C00. Use <tt/-D __LCSIZE__=<size>/ to set a different + code size. </descrip><p> -<sect1><tt/apple2enh-reboot.cfg/<p> +<sect1><tt/apple2enh-overlay.cfg/<p> -Configuration optimized for a binary program running on ProDOS 8 without -BASIC.SYSTEM. Intended to be used with <bf/LOADER.SYSTEM - an -Apple ][ ProDOS 8 loader for cc65 programs/ (see above) together -with the function <tt/rebootafterexit()/. +Configuration for an overlay program with up to nine overlays. The overlay files +don't include the AppleSingle header. See <tt>samples/overlaydemo.c</tt> for more +information on overlays. -If a ProDOS 8 system program doesn't quit to the ProDOS 8 dispatcher but rather -reboots the machine after exit then a plain vanilla ProDOS 8 doesn't make use of -the Language Card bank 2 at all. - -This setup makes nearly 50 KB available to a cc65 program - on a 64 KB machine! +Parameters: <descrip> - <tag><tt/RAM:/ Main memory area</tag> - From $800 to $BEFF (45.75 KB) + <tag><tt/STARTADDRESS:/ Program start address</tag> + Default: $803. Use <tt/-S <addr>/ to set a different start address. - <tag><tt/LC:/ Language Card memory area</tag> - From $D000 to $DFFF (4 KB) + <tag><tt/__EXEHDR__:/ AppleSingle executable file header</tag> + Default: Yes. Use <tt/-D __EXEHDR__=0/ to omit the AppleSingle header. + + <tag><tt/__STACKSIZE__:/ C runtime stack size</tag> + Default: $800. Use <tt/-D __STACKSIZE__=<size>/ to set a different + stack size. + + <tag><tt/__HIMEM__:/ Highest usable memory address presumed at link time</tag> + Default: $9600. Use <tt/-D __HIMEM__=<addr>/ to set a different + highest usable address. + + <tag><tt/__LCADDR__:/ Address of code in the Language Card</tag> + Default: $D400. Use <tt/-D __LCADDR__=<addr>/ to set a different + code address. + + <tag><tt/__LCSIZE__:/ Size of code in the Language Card</tag> + Default: $C00. Use <tt/-D __LCSIZE__=<size>/ to set a different + code size. + + <tag><tt/__OVERLAYSIZE__:/ Size of code in the overlays</tag> + Default: $1000. Use <tt/-D __OVERLAYSIZE__=<size>/ to set a different + code size. + +</descrip><p> + + +<sect1><tt/apple2enh-asm.cfg/<p> + +Configuration for an assembler program that doesn't need a special setup. + +Parameters: + +<descrip> <tag><tt/STARTADDRESS:/ Program start address</tag> - Variable (default: $800) + Default: $803. Use <tt/-S <addr>/ to set a different start address. - <tag><tt/HEADER:/ Binary file header</tag> - DOS 3.3 header (address and length) + <tag><tt/__EXEHDR__:/ AppleSingle executable file header</tag> + Default: No. Use <tt/-u __EXEHDR__ apple2enh.lib/ to add the AppleSingle header. </descrip><p> @@ -230,14 +265,15 @@ range. The easiest (and for really large programs in fact the only) way to have a cc65 program use the memory from $800 to $2000 is to link it as binary -(as opposed to system) program using the linker configuration -<ref id="apple-load-cfg" name="apple2enh-loader.cfg"> with start address -$803 and load it with the targetutil LOADER.SYSTEM. The program then works -like a system program (i.e. quits to the ProDOS dispatcher). +(as opposed to system) program using the default linker configuration +<ref id="apple-def-cfg" name="apple2enh.cfg"> with <tt/__HIMEM__/set to $BF00 +and load it with the LOADER.SYSTEM utility. The program then works like a system +program (i.e. quits to the ProDOS dispatcher). Using LOADER.SYSTEM is as simple as copying it to the ProDOS 8 directory of the program to load under name <program>.SYSTEM as a system program. For -example the program <tt/MYPROG/ is loaded by <tt/MYPROG.SYSTEM/. +example the program <tt/MYPROG/ is loaded by <tt/MYPROG.SYSTEM/. The right +AppleCommander option to put LOADER.SYSTEM on a ProDOS 8 disk image is <tt/-p/. <sect1>Heap<p> @@ -245,7 +281,7 @@ example the program <tt/MYPROG/ is loaded by <tt/MYPROG.SYSTEM/. If the cc65 program can be successfully linked as system program using the linker configuration <ref id="apple-sys-cfg" name="apple2enh-system.cfg">, but uses the heap either explicitly or implicitly (i.e. by loading a driver) then -the memory from $800 to $2000 can be added to the heap by calling +the memory from $800 to $1FFF can be added to the heap by calling <tt/_heapadd ((void *) 0x0800, 0x1800);/ at the beginning of <tt/main()/. @@ -268,7 +304,7 @@ default I/O buffer allocation basically yields the same placement of I/O buffers in memory the primary benefit of <tt/apple2enh-iobuf-0800.o/ is a reduction in code size - and thus program file size - of more than 1400 bytes. -Using <tt/apple2enh-iobuf-0800.o/ is as simple as placing it on the linker command +Using <tt/apple2enh-iobuf-0800.o/ is as simple as placing it on the linker command line like this: <tscreen><verb> @@ -296,10 +332,9 @@ usage. <item>get_ostype <item>rebootafterexit <item>ser_apple2_slot -<item>textframe -<item>textframexy <item>tgi_apple2_mix <item>videomode +<item>waitvsync </itemize> @@ -328,8 +363,8 @@ The names in the parentheses denote the symbols to be used for static linking of <tag><tt/a2e.hi.tgi (a2e_hi_tgi)/</tag> This driver features a resolution of 280×192 with 8 colors and two hires pages. Note that programs using this driver will have to be linked - with <tt/--start-addr $4000/ to reserve the first hires page or with - <tt/--start-addr $6000/ to reserve both hires pages. + with <tt/-S $4000/ to reserve the first hires page or with <tt/-S $6000/ + to reserve both hires pages. Note that the second hires page is only available if the text display is not in 80 column mode. This can be asserted by calling <tt/videomode (VIDEOMODE_40COL);/ @@ -341,7 +376,7 @@ The names in the parentheses denote the symbols to be used for static linking of In memory constrained situations the memory from $803 to $1FFF can be made available to a program by calling <tt/_heapadd ((void *) 0x0803, 0x17FD);/ at the beginning of <tt/main()/. Doing so is beneficial even if the program - doesn't use the the heap explicitly because loading the driver (and in fact + doesn't use the heap explicitly because loading the driver (and in fact already opening the driver file) uses the heap implicitly. </descrip><p> @@ -354,7 +389,7 @@ The names in the parentheses denote the symbols to be used for static linking of <tag><tt/a2e.auxmem.emd (a2e_auxmem_emd)/</tag> Gives access to 47.5 KB RAM (190 pages of 256 bytes each) on an Extended 80-Column Text Card. - + Note that this driver doesn't check for the actual existence of the memory and that it doesn't check for ProDOS 8 RAM disk content! @@ -393,8 +428,8 @@ The names in the parentheses denote the symbols to be used for static linking of <tag><tt/a2e.ssc.ser (a2e_ssc_ser)/</tag> Driver for the Apple II Super Serial Card. Supports up to 19200 baud, - hardware flow control (RTS/CTS) and interrupt driven receives. Note - that because of the peculiarities of the 6551 chip transmits are not + requires hardware flow control (RTS/CTS) and does interrupt driven receives. + Note that because of the peculiarities of the 6551 chip transmits are not interrupt driven, and the transceiver blocks if the receiver asserts flow control because of a full buffer. @@ -418,7 +453,7 @@ BASIC.SYSTEM) there are some limitations for DOS 3.3: <descrip> - <tag>Disk File I/O</tag> + <tag>Disk file I/O</tag> There's no disk file I/O support. Any attempt to use it yields an error with <tt/errno/ set to <tt/ENOSYS/. This implicitly means that loadable drivers are in general not functional as they depend on disk file I/O. Therefore the statically @@ -427,25 +462,52 @@ BASIC.SYSTEM) there are some limitations for DOS 3.3: <tag/Interrupts/ There's no <tt/interruptor/ support. Any attempt to use it yields the message 'Failed to alloc interrupt' on program startup. This implicitly means that - <tt/a2e.stdmou.mou/ and <tt/a2e.ssc.ser/ are not functional as they depend on - interrupts. - + mouse and RS232 device drivers are not functional as they depend on interrupts. + </descrip><p> <sect1>Direct console I/O<p> -<descrip> +The enhanced Apple //e has no color text mode. Therefore the functions +<tt/textcolor()/, <tt/bgcolor()/ and <tt/bordercolor()/ have no effect. - <tag/Color/ - The enhanced Apple //e has no color text mode. Therefore the functions - textcolor(), bgcolor() and bordercolor() have no effect. - <tag/Cursor/ - The enhanced Apple //e has no hardware cursor. Therefore the function - cursor() has no effect. +<sect1>Random number generator<p> -</descrip><p> +The random number seed is generated from the time the program waits for user input. +Therefore it is necessary to wait for at least one user keypress either via Standard +I/O or via Direct console I/O before initializing the pseudo random number generator. + + +<sect1>Realtime clock<p> + +There are several types of realtime clocks. It's not desirable to have specific code +for all of them. As ProDOS 8 supports file timestamps, realtime clock owners usually +use ProDOS 8 drivers for their realtime clock. Those drivers read the realtime clock +and write the result to the date/time location in RAM ($BF90 to $BF93). +ProDOS 8 reads the date/time from that RAM location. If there's no realtime clock the +RAM location keeps containing zeros. ProDOS 8 uses those zeros as timestamps and the +files show up in a directory as <tt/<NO DATE>/. + +There's no common interface to set realtime clocks so if a realtme clock <bf/IS/ +present there's just nothing to do. However, if there's <bf/NO/ realtime clock present, +the user might very well be interested to "manually" set the RAM location in order to +have timestamps. But he surely doesn't want to manually set the RAM location over and +over again. Rather he wants to set it just once after booting ProDOS 8. + +From that perspective it makes most sense to not set both the date and the time but +rather only set the date and have the time just stay zero. Then files show up in a +directory as <tt/DD-MON-YY 0:00/. + +So <tt/clock_settime()/ checks if a realtime clock is active. If it is then +<tt/clock_settime()/ fails with <tt/ERANGE/. Otherwise <tt/clock_settime()/ +sets the date - and completely ignores the time provided as parameter. + +<tt/clock_getres()/ too checks if a realtime clock is active. If it is then +<tt/clock_getres()/ returns a time resolution of one minute. Otherwise +<tt/clock_getres()/ presumes that the only one who sets the RAM location is +<tt/clock_settime()/ and therefore returns a time resolution of one day. @@ -494,7 +556,7 @@ url="ca65.html" name="assembler manual">. <tag/Drive ID/ The function <url url="dio.html#s1" name="dio_open()"> has the single parameter <tt/device/ to identify the device to be opened. Therefore an - Apple II slot and drive pair is mapped to that <tt/drive_id/ according + Apple II slot and drive pair is mapped to that <tt/device/ according to the formula <tscreen> @@ -512,6 +574,105 @@ url="ca65.html" name="assembler manual">. </descrip><p> +<sect1>Specifying file types for fopen<p> + +<descrip> + + <tag>Explanation of File Types</tag> + + ProDOS 8 associates a file type and an auxiliary type with each file. + These type specifications are separate from the file's name, unlike + Windows which uses the file name's suffix (a.k.a. + extension) to specify the file type. For example, <tt/.exe/, + <tt/.doc/, or <tt/.bat/. + The ProDOS 8 Machine-Language Interface (MLI) function for creating a + file require these types to be specified. + + In contrast, the ISO C function <tt/fopen()/ and the POSIX function + <tt/open()/ have no parameter to specify either a file type or an + auxiliary type. Therefore, some additional mechanism for specifying + the file types is needed. + + <tag>Specifying the File Type and Auxiliary Type</tag> + + There are two global variables provided that allow the file type + and auxiliary type to be specified before a call to <tt/fopen()/ + or <tt/open()/. They are defined in <tt/apple2_filetype.h/: + + <tscreen> + <verb> + extern unsigned char _filetype; /* Default: PRODOS_T_BIN */ + extern unsigned int _auxtype; /* Default: 0 */ + </verb> + </tscreen> + + The header file <tt/apple2_filetype.h/ also defines many values + that can be used to set these variables. It is included in + <tt/apple2.h/, which is in turn included in <tt/apple2enh.h/. + + <tag>Example</tag> + + A text file cannot be created with just the + standard C functions because they default to the binary type + <tt/PRODOS_T_BIN/. The <tt/_filetype/ variable must be set to + <tt/PRODOS_T_TXT/ to create a text file. + + For a text file, + <tt/_auxtype/ specifies the record length. A zero record + length text file is referred to as a sequential text file. + This is equivalent to text files on + other operating systems, except that the line terminator is a + carriage return instead of a line-feed (Linux/BSD/MacOS) or + carriage return, line-feed pair (Windows). + + The 'sequential' text file terminology is in contrast to a + 'random-access' text file which would + have a fixed-length, non-zero record length, so that the + file position of any individual record can be calculated. + + For this example, the + <tt/_auxtype/ does not need to be set because it defaults to + the desired value, which is zero. To be more explicit, + <tt/_auxtype/ can also be set to <tt/PRODOS_AUX_T_TXT_SEQ/ + which is defined as zero. + + <tscreen> + <verb> + #include <stdio.h> + #include <string.h> + #include <errno.h> + #include <apple2.h> + + void main(void) + { + FILE *out; + char *name = "MY.FAVS"; + + /*-----------------------------*/ + + _filetype = PRODOS_T_TXT; + _auxtype = PRODOS_AUX_T_TXT_SEQ; + + /*-----------------------------*/ + + if ((out = fopen(name, "w")) != NULL) { + fputs("Jorah Mormont\r", out); + fputs("Brienne of Tarth\r", out); + fputs("Daenerys Targaryen\r", out); + fputs("Sandor Clegane\r", out); + if (fclose(out) == EOF) { + fprintf(stderr, "fclose failed for %s: %s", name, strerror(errno)); + } + } + else { + fprintf(stderr, "fopen failed for %s: %s", name, strerror(errno)); + } + } + </verb> + </tscreen> + +</descrip><p> + <sect>License<p> @@ -524,14 +685,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/ar65.sgml b/doc/ar65.sgml index 136defd40..900a0a92b 100644 --- a/doc/ar65.sgml +++ b/doc/ar65.sgml @@ -1,10 +1,8 @@ <!doctype linuxdoc system> <article> - <title>ar65 Users Guide <author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>19.07.2000 <abstract> ar65 is an archiver for object files generated by ca65. It allows to create @@ -32,16 +30,17 @@ for the cc65 compiler. ar65 is part of this suite. The archiver is called as follows: <tscreen><verb> - Usage: ar65 <operation> lib file|module ... - Operation is one of: - a Add modules - d Delete modules - l List library contents - x Extract modules - V Print the archiver version + Usage: ar65 <operation ...> lib file|module ... + Operations are some of: + r Add modules + d Delete modules + t List library table + v Increase verbosity (put before other operation) + x Extract modules + V Print the archiver version </verb></tscreen> -You may add modules to a library using the `a' command. If the library +You may add modules to a library using the <tt/'r'/ command ('a' is deprecated). If the library does not exist, it is created (and a warning message is printed which you may ignore if creation of the library was your intention). You may specify any number of modules on the command line following the library. @@ -53,45 +52,45 @@ has a newer timestamp than the one to add. Here's an example: <tscreen><verb> - ar65 a mysubs.lib sub1.o sub2.o + ar65 r mysubs.lib sub1.o sub2.o </verb></tscreen> -This will add two modules to the library `mysubs.lib' creating the +This will add two modules to the library 'mysubs.lib' creating the library if necessary. If the library contains modules named sub1.o or sub2.o, they are replaced by the new ones. Modules names in the library are stored without the path, so, using <tscreen><verb> - ar65 a mysubs.lib ofiles/sub1.o ofiles/sub2.o + ar65 v v r mysubs.lib ofiles/sub1.o ofiles/sub2.o </verb></tscreen> -will add two modules named `sub1.o' and `sub2.o' to the library. +will verbose add two modules named 'sub1.o' and 'sub2.o' to the library. -Deleting modules from a library is done with the `d' command. You may not +Deleting modules from a library is done with the <tt/'d'/ command. You may not give a path when naming the modules. Example: <tscreen><verb> - ar65 d mysubs.lib sub1.o + ar65 d mysubs.lib sub1.o </verb></tscreen> -This will delete the module named `sub1.o' from the library, printing an +This will delete the module named 'sub1.o' from the library, printing an error if the library does not contain that module. -The `l' command prints a list of all modules in the library. Any module -names on the command line are ignored. +The <tt/'t'/ command prints a table of all modules in the library ('l' is deprecated). +Any module names on the command line are ignored. Example: <tscreen><verb> - ar65 l mysubs.lib + ar65 tv mysubs.lib </verb></tscreen> -Using the `x' command, you may extract modules from the library. The +Using the <tt/'x'/ command, you may extract modules from the library. The modules named on the command line are extracted from the library and put into the current directory. @@ -104,11 +103,11 @@ this is not a problem. Example for extracting a module from the library: <tscreen><verb> - ar65 x mysubs.lib sub1.o + ar65 x mysubs.lib sub1.o </verb></tscreen> -The `V' command prints the version number of the assembler. If you send +The <tt/'V'/ command prints the version number of the assembler. If you send any suggestions or bugfixes, please include your version number. In addition to these operations, the archiver will check for, and warn @@ -132,17 +131,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> - - - diff --git a/doc/atari.sgml b/doc/atari.sgml index 47ce050e1..170ffd5fb 100644 --- a/doc/atari.sgml +++ b/doc/atari.sgml @@ -1,12 +1,10 @@ <!doctype linuxdoc system> <article> - <title>Atari specific information for cc65 <author> <url url="mailto:shawnjefferson@24fightingchickens.com" name="Shawn Jefferson"> and<newline> <url url="mailto:chris@groessler.org" name="Christian Groessler"> -<date>2014-04-24 <abstract> An overview over the Atari runtime system as it is implemented for the cc65 C @@ -31,7 +29,7 @@ supports XL type or newer machines (excluding the 600XL). The <tt/atarixl/ runtime makes the whole 64K of memory available, with the exception of the I/O area at $D000 - $D7FF. Since the -<tt/atarixl/ runtime has some <ref name="limitations" id="limitations">, it is +<tt/atarixl/ runtime has some <ref name="limitations" id="xllimitations">, it is recommended to use the <tt/atari/ target unless lack of memory dictates the use of the <tt/atarixl/ target. @@ -119,7 +117,7 @@ Special locations: The startup code rearranges the memory as follows: <enum> -<item>Sceen memory and display list are moved below the program start address. +<item>Screen memory and display list are moved below the program start address. <item>The ROM is disabled, making the memory in the areas [$C000-$CFFF] and [$D800-$FFF9] available. <item>Character generator data is copied from ROM to the CHARGEN location specified in the @@ -133,7 +131,7 @@ With the default load address of $2400 this gives a usable memory range o [$2400-$CFFF]. Please note that the first load chunk (which checks the system -compatibilty and available memory) will always be loaded at +compatibility and available memory) will always be loaded at $2E00, regardless of the specified start address. This address can only be changed by a custom linker config file. @@ -148,7 +146,7 @@ Special locations: ($58). <tag/Stack/ - The C runtime stack is located at end of the RAM memory area ($CFFF) + The C runtime stack is located at end of the MAIN memory area ($CFFF) and grows downwards. <tag/Heap/ @@ -205,6 +203,19 @@ is <it/left out/, keep this in mind. The values you assign to the two symbols <tt/__AUTOSTART__/ and <tt/__EXEHDR__/ don't matter. +<sect2><tt/atari-asm-xex.cfg/<p> + +This config file allows writing multi segment binaries easily, without having to +write the header explicitly on each segment. + +It is similar to the <tt/atari-asm.cfg/ above, but uses the ATARI (xex) file +format support on LD65 instead of the standard binary output, so it does not +have the <tt/__AUTOSTART/ nor the <tt/__EXEHDR__/ symbols. + +Note that each <tt/MEMORY/ area in the configuration file will have it's own +segment in the output file with the correct headers, and you can specify and +init address INITAD) for each memory area. + <sect2><tt/atari-cart.cfg/<p> This config file can be used to create 8K or 16K cartridges. It's suited both @@ -229,8 +240,20 @@ for C and assembly language programs. The size of a cassette boot file is restricted to 32K. Larger programs would need to be split in more parts and the parts to be loaded manually. -To write the generated file to a cassette, a utility to run -on an Atari is provided in the <tt/targetutil/ directory (<tt/w2cas.com/). +To write the generated file to a cassette, a utility (<tt/w2cas.com/) to run +on an Atari is provided in the <tt/util/ directory of <tt/atari/ target dir. + +<sect2><tt/atari-xex.cfg/<p> + +This config file shows how to write a binary using the ATARI (xex) file format +support on LD65, this simplifies the memory areas and allows to add new memory +areas easily without writing new headers and trailers. + +Note that the default C library includes the system-check chunk, so in this +linker configuration we suppress the importing of the header and trailer for +this chunk by defining the standard import symbols to a 0 value. For the +initialization address of the system-check chunk, the INITAD is set directly in +the configuration. <sect1><tt/atarixl/ config files<p> @@ -255,12 +278,40 @@ The files generated by this config file include the <ref name="&dquot;system check&dquot;" id="syschkxl"> load chunk. It can optionally be left out, see <ref name="Getting rid of the &dquot;system check&dquot; load chunk" id="nosyschk">. +<sect2><tt/atarixl-xex.cfg/<p> + +Similar to the <tt/atari-xex.cfg/ above, this config file shows how to write a +binary using the ATARI (xex) file format support on LD65. + +In addition to the suppressing of the system-check headers and trailers, this +also suppresses the shadow-ram-preparation headers and trailers, but does this +by defining an "UNUSED" memory area that is not written to the output file. + <sect>Platform specific header files<p> Programs containing Atari specific code may use the <tt/atari.h/ header file. +This also includes access to operating system locations (e.g. hardware shadow registers) by a structure called +"<tt/OS/". +The names are the usual ones you can find in system reference manuals. Example: + +<tscreen><verb> +... + OS.savmsc = ScreenMemory; + OS.color4 = 14; // white frame + if (OS.stick0 != 15 || OS.ch != 255) // key or stick input? +... +</verb></tscreen> + +Please note that memory location 762/$2FA is called "<tt/char_/" while the original name "<tt/char/" conflicts with the C keyword. + +If you like to use the OS names and locations for the original Atari 800 operating system, please "<tt/#define OSA/" before including the +<tt/atari.h/ header file. +If you like to target the floating point register model of revision 2 machines, put a "<tt/#define OS_REV2/" before including <tt/atari.h/. + +Access to the Basic programming language zero page variables is established by the structure "<tt/BASIC/". <sect1>Atari specific functions<p> @@ -275,11 +326,13 @@ See the <url url="funcref.html" name="function reference"> for declaration and u <item>_getcolor <item>_getdefdev <item>_graphics +<item>_is_cmdline_dos <item>_rest_vecs <item>_save_vecs <item>_scroll <item>_setcolor <item>_setcolor_low +<item>waitvsync </itemize> @@ -316,6 +369,125 @@ chip registers. </descrip><p> +<sect1>Display lists<p> + +A major feature of the Atari graphics chip "ANTIC" is to +process instructions for the display generation. +cc65 supports constructing these display lists by offering defines +for the instructions. In conjunction with the "void"-variable extension +of cc65, display lists can be created quite comfortable: + +<tscreen><verb> +... +unsigned char ScreenMemory[100]; + +void DisplayList = +{ + DL_BLK8, + DL_BLK8, + DL_BLK8, + DL_LMS(DL_CHR20x8x2), + ScreenMemory, + DL_CHR20x8x2, + DL_CHR20x8x2, + DL_CHR20x8x2, + DL_BLK4, + DL_CHR20x8x2, + DL_JVB, + &DisplayList +}; +... +OS.sdlst = &DisplayList; +... +</verb></tscreen> + +Please inspect the <tt/_antic.h/ header file to determine the supported +instruction names. Modifiers on instructions can be nested without need +for an order: + +<tt/DL_LMS(DL_HSCROL(DL_VSCROL(DL_DLI(DL_MAP80x4x2))))/ + +Please mind that ANTIC has memory alignment requirements for "player +missile graphics"-data, font data, display lists and screen memory. Creation +of a special linker configuration with appropriate aligned segments and +switching to that segment in the c-code is usually necessary. A more memory +hungry solution consists in using the "<tt/posix_memalign()/" function in +conjunction with copying your data to the allocated memory. + +<sect1>Character mapping<p> + +The Atari has two representations for characters: +<enum> +<item> ATASCII is character mapping which is similar to ASCII and used +by the CIO system of the OS. This is the default mapping of cc65 when +producing code for the atari target. +<item> The internal/screen mapping represents the real value of the +screen ram when showing a character. +</enum> + +For direct memory access (simplicity and speed) enabling the internal +mapping can be useful. This can be achieved by including the +"<tt/atari_screen_charmap.h/" header. + +A word of caution: Since the <tt/0x00/ character has to be mapped in an +incompatible way to the C-standard, the usage of string functions in +conjunction with internal character mapped strings delivers unexpected +results regarding the string length. The end of strings are detected where +you may not expect them (too early or (much) too late). Internal mapped +strings typically support the "<tt/mem...()/" functions. + +<em>For assembler sources the macro "<tt/scrcode/" from the "<tt/atari.mac/" +package delivers the same feature.</em> + +You can switch back to the ATASCII mapping by including +"<tt/atari_atascii_charmap.h/". + +A final note: Since cc65 has currently some difficulties with string merging +under different mappings, defining remapped strings works only flawlessly +with static array initialization: + +<tscreen><verb> +#include <atari_screen_charmap.h> +char pcScreenMappingString[] = "Hello Atari!"; + +#include <atari_atascii_charmap.h> +char pcAtasciiMappingString[] = "Hello Atari!"; +</verb></tscreen> + +delivers correct results, while + +<tscreen><verb> +#include <atari_screen_charmap.h> +char* pcScreenMappingString = "Hello Atari!"; + +#include <atari_atascii_charmap.h> +char* pcAtasciiMappingString = "Hello Atari!"; +</verb></tscreen> + +does not. + +<sect1>Keyboard codes<p> + +For direct keyboard scanning in conjunction with e.g. the OS location "CH" (764/$2FC), +all keyboard codes are available as defined values on C and assembler side. + +Example: +<tscreen><verb> +... + while (!kbhit()); + switch (OS.ch) + { + case KEY_RETURN: + ... + case KEY_SPACE: + ... + case KEY_1: + ... + } +... +</verb></tscreen> + +You can find the C defines in the file "<tt/atari.h/" or "<tt/atari.inc/" for the assembler variant. <sect>Loadable drivers<p> @@ -503,9 +675,9 @@ The default callbacks definition (<tt/mouse_def_callbacks/) is an alias for the <sect1>RS232 device drivers<p> -Currently there is one RS232 driver. It uses the R: device (therefore -an R: driver needs to be installed) and was tested with the 850 -interface module. +Currently there is one RS232 driver. It supports up to 9600 baud, requires hardware flow control +(RTS/CTS) and uses the R: device (therefore an R: driver needs to be installed). It was tested +with the 850 interface module. <table> <tabular ca="rr"> @@ -517,7 +689,18 @@ interface module. <sect>Limitations<p> -<sect1><tt/atarixl/<#if output="info|latex2e"> limitations</#if><label id="limitations"<p> +<sect1><tt/Realtime clock/<label id="realtimeclock"<p> + +Access to the realtime clock is supported only when running on SpartaDOS-X. +There needs to be a realtime clock driver installed. This is normally the case +in the default installation (CONFIG.SYS) of SpartaDOS-X. +A missing realtime clock driver in SpartaDOS-X is not supported, and the program +may crash when calling the <tt/clock_settime()/ or <tt/clock_gettime()/ +functions. + +The resolution of the realtime clock driver is 1 second. + +<sect1><tt/atarixl target/<#if output="info|latex2e"> limitations</#if><label id="xllimitations"<p> <itemize> <item>The display is cleared at program start and at program termination. This is a side @@ -543,6 +726,11 @@ for sectors 1 to 3, regardless of the type of diskette. The console I/O is speed optimized therefore support for XEP80 hardware or f80.com software is missing. Of course you may use stdio.h functions. +<tt/cprintf/ targets a 40 character line. On a 20-column display this has +the unexpected effect of a blank line after your text. On such displays you can either +use for example <tt/gotoxy(20,0)/ to target the "next" line, or you can switch to <tt/write()/ +function which does not have this side effect. + <sect>Technical details<label id="techdetail"><p> @@ -561,7 +749,7 @@ The contents of this chunk come from the SYSCHKCHNK memory area of the linker co <item>main program&nl; This load chunk is loaded at the selected program start address (default $2000) and contains all of the code and data of the program.&nl; -The contents of this chunk come from the RAM memory area of the linker config file. +The contents of this chunk come from the MAIN memory area of the linker config file. </enum> @@ -743,7 +931,7 @@ segments should go above $7FFF. <p> The main problem is that the EXE header generated by the cc65 runtime lib is wrong. It defines a single load chunk with the sizes/addresses -of the STARTUP, LOWCODE, INIT, CODE, RODATA, and DATA segments, in +of the STARTUP, LOWCODE, ONCE, CODE, RODATA, and DATA segments, in fact, the whole user program (we're disregarding the "system check" load chunk here). <p> @@ -796,7 +984,7 @@ SEGMENTS { NEXEHDR: load = FSTHDR, type = ro; # first load chunk STARTUP: load = RAMLO, type = ro, define = yes; LOWCODE: load = RAMLO, type = ro, define = yes, optional = yes; - INIT: load = RAMLO, type = ro, optional = yes; + ONCE: load = RAMLO, type = ro, optional = yes; CODE: load = RAMLO, type = ro, define = yes; CHKHDR: load = SECHDR, type = ro; # second load chunk @@ -808,7 +996,7 @@ SEGMENTS { AUTOSTRT: load = RAM, type = ro; # defines program entry point } FEATURES { - CONDES: segment = RODATA, + CONDES: segment = ONCE, type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__; @@ -827,7 +1015,7 @@ the MAINHDR segment get discarded. <p> The newly added NEXEHDR segment defines the correct chunk header for the first intended load chunk. It -puts the STARTUP, LOWCODE, INIT, and CODE segments, which are the +puts the STARTUP, LOWCODE, ONCE, and CODE segments, which are the segments containing only code, into load chunk #1 (RAMLO memory area). <p> The header for the second load chunk comes from the new CHKHDR @@ -838,16 +1026,16 @@ chunk #2 (RAM memory area). The contents of the new NEXEHDR and CHKHDR segments come from this file (split.s): <tscreen><verb> - .import __CODE_LOAD__, __BSS_LOAD__, __CODE_SIZE__ - .import __DATA_LOAD__, __RODATA_LOAD__, __STARTUP_LOAD__ + .import __CODE_LOAD__, __BSS_LOAD__, __CODE_SIZE__ + .import __DATA_LOAD__, __RODATA_LOAD__, __STARTUP_LOAD__ - .segment "NEXEHDR" - .word __STARTUP_LOAD__ - .word __CODE_LOAD__ + __CODE_SIZE__ - 1 + .segment "NEXEHDR" + .word __STARTUP_LOAD__ + .word __CODE_LOAD__ + __CODE_SIZE__ - 1 - .segment "CHKHDR" - .word __RODATA_LOAD__ - .word __BSS_LOAD__ - 1 + .segment "CHKHDR" + .word __RODATA_LOAD__ + .word __BSS_LOAD__ - 1 </verb></tscreen> <p> Compile with @@ -858,7 +1046,7 @@ cl65 -t atari -C split.cfg -o prog.com prog.c split.s <sect2>Low data and high code example<p> -Goal: Put RODATA and DATA into low memory and STARTUP, LOWCODE, INIT, +Goal: Put RODATA and DATA into low memory and STARTUP, LOWCODE, ONCE, CODE, BSS, ZPSAVE into high memory (split2.cfg): <tscreen><verb> @@ -893,7 +1081,7 @@ SEGMENTS { CHKHDR: load = SECHDR, type = ro; # second load chunk STARTUP: load = RAM, type = ro, define = yes; - INIT: load = RAM, type = ro, optional = yes; + ONCE: load = RAM, type = ro, optional = yes; CODE: load = RAM, type = ro, define = yes; BSS: load = RAM, type = bss, define = yes; @@ -901,7 +1089,7 @@ SEGMENTS { AUTOSTRT: load = RAM, type = ro; # defines program entry point } FEATURES { - CONDES: segment = RODATA, + CONDES: segment = ONCE, type = constructor, label = __CONSTRUCTOR_TABLE__, count = __CONSTRUCTOR_COUNT__; @@ -914,16 +1102,16 @@ FEATURES { New contents for NEXEHDR and CHKHDR are needed (split2.s): <tscreen><verb> - .import __STARTUP_LOAD__, __BSS_LOAD__, __DATA_SIZE__ - .import __DATA_LOAD__, __RODATA_LOAD__ + .import __STARTUP_LOAD__, __BSS_LOAD__, __DATA_SIZE__ + .import __DATA_LOAD__, __RODATA_LOAD__ - .segment "NEXEHDR" - .word __RODATA_LOAD__ - .word __DATA_LOAD__ + __DATA_SIZE__ - 1 + .segment "NEXEHDR" + .word __RODATA_LOAD__ + .word __DATA_LOAD__ + __DATA_SIZE__ - 1 - .segment "CHKHDR" - .word __STARTUP_LOAD__ - .word __BSS_LOAD__ - 1 + .segment "CHKHDR" + .word __STARTUP_LOAD__ + .word __BSS_LOAD__ - 1 </verb></tscreen> Compile with @@ -954,12 +1142,12 @@ If you are using a customized linker config file you might get some errors regarding the MAINHDR segment. Like this: <tscreen><verb> -ld65: Error: Missing memory area assignment for segment `MAINHDR' +ld65: Error: Missing memory area assignment for segment 'MAINHDR' </verb></tscreen> The old "HEADER" memory description contained six bytes: $FFFF -and the first and last memory addess of the program. For the "system -check" load chunk this had to be split into two memory assigments. The +and the first and last memory address of the program. For the "system +check" load chunk this had to be split into two memory assignments The "HEADER" now only contains the $FFFF. The main program's first and last memory address were moved to a new segment, called "MAINHDR", which in the new linker config file goes into its own memory area (also @@ -987,7 +1175,7 @@ When using cl65, you can leave it out with this command line: cl65 -Wl -D__SYSTEM_CHECK__=1 <arguments> </verb></tscreen> -The value you assign to <tt/__SYSTEM_CHECK_/ doesn't matter. If the +The value you assign to <tt/__SYSTEM_CHECK__/ doesn't matter. If the <tt/__SYSTEM_CHECK__/ symbol is defined, the load chunk won't be included. @@ -1002,14 +1190,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/atari2600.sgml b/doc/atari2600.sgml new file mode 100644 index 000000000..36c06ad08 --- /dev/null +++ b/doc/atari2600.sgml @@ -0,0 +1,122 @@ +<!doctype linuxdoc system> + +<article> +<title>Atari 2600 specific information for cc65 +<author> +<url url="mailto:contact@florentflament.com" name="Florent Flament"><newline> + +<abstract> +An overview over the Atari 2600 runtime system as it is implemented +for the cc65 C compiler. +</abstract> + +<!-- Table of contents --> +<toc> + +<!-- Begin the document --> + +<sect>Overview<p> + +This file contains an overview of the Atari 2600 runtime system as it +comes with the cc65 C compiler. It describes the memory layout, Atari +2600 specific header files and any pitfalls specific to that platform. + +<sect>Binary format<p> + +The default binary output format generated by the linker for the Atari +2600 target is a 4K cartridge image. + +<sect>Memory layout<p> + +cc65 generated programs with the default setup can use RAM from +$0080 to $00FF - __STACKSIZE__, where __STACKSIZE__ is +the size of the system stack with a default value of 16 bytes. The +size of the system stack can be customized by defining the +__STACKSIZE__ linker variable. + +Special locations: + +<descrip> + <tag/Stack/ The C runtime stack is located at $00FF - + __STACKSIZE__ and growing downwards. + + <tag/Heap/ The C heap is located at $0080 and grows upwards. + +</descrip><p> + +<sect>Start-up condition<p> + +When powered-up, the Atari 2600 TIA registers contain random +values. During the initialization phase, the start-up code needs to +initialize the TIA registers to sound values (or else the console has +an unpredictable behavior). In this implementation, zeros are written +to all of TIA registers during the start-up phase. + +Note that RIOT registers (mostly timers) are left uninitialized, as +they don't have any consequence on the console behavior. + +<sect>Platform specific header files<p> + +Programs containing Atari 2600 specific code may use the +<tt/atari2600.h/ header file. + +The following pseudo variables declared in the <tt/atari2600.h/ header +file allow access to the Atari 2600 TIA & RIOT chips registers. + +<descrip> + + <tag><tt/TIA/</tag> The <tt/TIA/ structure allows read/write access + to the Atari 2600 TIA chip registers. See the <tt/_tia.h/ header + file located in the include directory for the declaration of the + structure. Also refer to the Stella Programmer's Guide by Steve + Wright for a detailed description of the chip and its registers. + + <tag><tt/RIOT/</tag> The <tt/RIOT/ structure allows read/write + access to the Atari 2600 RIOT chip registers. See the + <tt/_riot.h/ header file located in the include directory for the + declaration of the structure. Also refer to the Stella Programmer's + Guide by Steve Wright for a detailed description of the chip and its + registers. + +</descrip><p> + + +<sect>Loadable drivers<p> + +There are no drivers for the Atari 2600. + + +<sect>Limitations<p> + +TBD + + +<sect>Other hints<p> + +One may write a custom linker configuration file to tune the memory +layout of a program. See the <tt/atari2600.cfg/ file in the cfg +directory as a starting point. + + +<sect>License<p> + +This software is provided 'as-is', without any expressed or implied +warranty. In no event will the authors be held liable for any damages +arising from the use of this software. + +Permission is granted to anyone to use this software for any purpose, +including commercial applications, and to alter it and redistribute it +freely, subject to the following restrictions: + +<enum> +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. +</enum> + +</article> diff --git a/doc/atari5200.sgml b/doc/atari5200.sgml index a19641fe7..29e6aadb3 100644 --- a/doc/atari5200.sgml +++ b/doc/atari5200.sgml @@ -1,11 +1,9 @@ <!doctype linuxdoc system> <article> - <title>Atari 5200 specific information for cc65 <author> <url url="mailto:chris@groessler.org" name="Christian Groessler"><newline> -<date>2014-05-27 <abstract> An overview over the Atari 5200 runtime system as it is implemented for the @@ -32,7 +30,7 @@ information. <sect>Binary format<p> -The standard binary output format generated by the linker for the Atari 5200 target +The binary output format generated by the linker for the Atari 5200 target is a cartridge image. It is of course possible to change this behaviour by using a modified startup file and linker config. @@ -54,7 +52,7 @@ Special locations: <tag/Text screen/ The text screen is only enabled if any of the CONIO output functions is used in the program. Its size is 20x24 characters (Antic mode 6, - BASIC mode 1). The text screen is located at $3E00. The + BASIC mode 1) by default. The text screen is located at $3E00. The address of the screen memory is available at runtime in the variable SAVMSC ($001B).<p> If the program doesn't use any CONIO output functions it needs to setup its own @@ -75,11 +73,22 @@ Special locations: Programs containing Atari 5200 specific code may use the <tt/atari5200.h/ header file. +This also includes access to operating system locations (e.g. hardware shadow registers) by a structure called +"<tt/OS/". +The names are the usual ones you can find in system reference manuals. Example: + +<tscreen><verb> +... + OS.sdmctl = 0x00; // screen off + OS.color4 = 14; // white frame + tics = OS.rtclok[1] // get ticks +... +</verb></tscreen> <sect1>Atari 5200 specific functions<p> <itemize> -<item>TBD. +<item>waitvsync </itemize> @@ -153,6 +162,43 @@ No serial drivers are available for the Atari 5200. <sect>Limitations<p> + +<sect1>Direct console I/O<p> + +The <tt/atari5200/ target uses Antic mode 6 (BASIC mode 1) for the console +screen by default. There are four colors available: + +<itemize> +<item><tt/COLOR_WHITE/ +<item><tt/COLOR_RED/ +<item><tt/COLOR_GREEN/ +<item><tt/COLOR_BLACK/ +</itemize> + +Note that the <tt/COLOR_GREEN/ and <tt/COLOR_RED/ colors aren't +exactly the same colors as the ones with the same name on the +<tt/atari/ target. +They are the colors which are available as <tt/COLOR_LIGHTGREEN/ +and <tt/COLOR_LIGHTRED/ there. + +One can set the color shadow registers directly with other colors. +Then the color defines from above will just become placeholders. In +this scenario it might be more convenient to use index values (0..3) +instead of the color defines. The index values specify which of the +system shadow color registers (<tt/COLOR0/ .. <tt/COLOR3/) to use. + +The default console screen has a layout of 20x24 characters. An +alternative layout, 20x12, Antic mode 7, BASIC mode 2, is provided in +the file <tt/atari5200-conioscreen-20x12.o/. + +Using <tt/atari5200-conioscreen-20x12.o/ is as simple as placing it on +the linker command line like this: + +<tscreen><verb> +cl65 -t atari5200 myprog.c atari5200-conioscreen-20x12.o +</verb></tscreen> + + <sect1>Disk I/O<p> Disk I/O is not supported by the <tt/atari5200/ target. This means that @@ -173,7 +219,58 @@ you cannot use any of the following functions (and a few others): <sect>Other hints<p> +<sect1>CAR format<p> +AtariROMMaker (<url url="https://www.wudsn.com/index.php/productions-atari800/tools/atarirommaker"> ) +can be used to create a <tt/.CAR/ file from the binary ROM image cc65 generates. +This might be more convenient when working with emulators. + +<sect1>Changing the splash screen<p> + +The 5200 ROM displays a splash screen at startup with the name of the +game and the copyright year. The year information has a 'Year-2000' +problem, the first two digits are fixed in the ROM and are always "19". + +<sect2>Changing the game name<p> + +The runtime library provides a default game name which is "cc65 +compiled". To change that, one has to link a file which puts data into +the "<tt/CARTNAME/" segment. + +For reference, here's the default version used by the cc65 library: +<tscreen><verb> +.export __CART_NAME__: absolute = 1 +.macpack atari +.segment "CARTNAME" + scrcode " cc" + .byte '6' + 32, '5' + 32 ; use playfield 1 + scrcode " compiled" +</verb></tscreen> + +'<tt/__CART_NAME__/' needs to be defined in order that the linker is +satisfied and doesn't try to include the version of the runtime library. + +20 bytes are available in the <tt/CARTNAME/ segment (one line) for the +game/program name. + +<sect2>Changing the copyright year / changing the cartridge type<p> + +The century is hard-coded to 1900 by the ROM. + +There are two digits which can be changed. For example "92" will give +"1992" on the screen. + +The default used by the runtime library is + +<tscreen><verb> +.export __CART_YEAR__: absolute = 1 +.segment "CARTYEAR" + .byte '9' + 32,'8' + 32 ; "98", using playfield 1 +</verb></tscreen> + +If the second byte of the year in the <tt/CARTYEAR/ segment is 255, +the cartridge is seen as a 'diagnostic' cartridge, and the splash +screen and most of the other startup initializations are bypassed. <sect>License<p> @@ -186,14 +283,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/atari7800.sgml b/doc/atari7800.sgml new file mode 100644 index 000000000..b6551614c --- /dev/null +++ b/doc/atari7800.sgml @@ -0,0 +1,157 @@ +<!doctype linuxdoc system> + +<article> +<title>Atari 7800 specific information for cc65 +<author> +<url url="mailto:karri@sipo.fi" name="Karri Kaksonen"><newline> + +<abstract> +An overview over the Atari 7800 runtime system as it is implemented +for the cc65 C compiler. +</abstract> + +<!-- Table of contents --> +<toc> + +<!-- Begin the document --> + +<sect>Overview<p> + +This file contains an overview of the Atari 7800 runtime system as it +comes with the cc65 C compiler. It describes the memory layout, Atari +7800 specific header files and any pitfalls specific to that platform. + +<sect>Binary format<p> + +The default binary output format generated by the linker for the Atari +7800 target is a 48K cartridge image. + +<sect>A78 header<p> + +There is lots of different cart hardware available for the atari7800. +Some carts have ROM, RAM, sound hardware, non-volatile high score chips. +In order to know what kind of hardware the cart build requires there is +a header file of 128 bytes in front of the binary. + +The default build creates a cart file for a 48K rom cart without any +extra features like the pokey audio chip or extra RAM. + +In order to make cc65 more user friendly the build will add the a78 +header automatically. This allows you to run the binary on emulators +and flash carts on the real console. + +<sect>Encryption<p> + +In order to boot the game in a mode that supports atari7800 functions +the cart must be encrypted after the linking phase. +There is a program called sign7800 that can be used to sign the cart. +The encryption is not required for running the cart on emulators. +You can also run atari2600 games without encryption. + +<sect>Memory layout<p> + +cc65 generated programs with the default setup can use RAM from +from $1800 to $203f. +The 4k RAM is then mapped to zero page area. +$2040 to $20ff is visible as zero page. +After that we have a vero small RAM area that is unused. +$2100 to $213f. +Then we mirror a second block from the RAM to become the hardware stack. +This would be from $2140 to $21ff. + +The C-stack starts at $2800 and it can grow down to $2200. + +size of the system stack can be customized by defining the +__STACKSIZE__ linker variable. + +Special locations: + +<descrip> + <tag/Stack/ The C runtime stack is located at $2800 - + __STACKSIZE__ and growing downwards. + + <tag/Heap/ The C heap is located at $2200 and grows upwards. + +</descrip><p> + +<sect>Start-up condition<p> + +When powered-up, the Atari 7800 TIA registers contain random +values. During the initialization phase, the start-up code needs to +initialize the TIA registers to sound values (or else the console has +an unpredictable behavior). In this implementation, zeros are written +to all of TIA registers during the start-up phase. + +Note that RIOT registers (mostly timers) are left uninitialized, as +they don't have any consequence on the console behavior. + +<sect>Platform specific header files<p> + +Programs containing Atari 7800 specific code may use the +<tt/atari7800.h/ header file. + +The following pseudo variables declared in the <tt/atari7800.h/ header +file allow access to the Atari 7800 TIA, MARIA & RIOT chips registers. + +<descrip> + + <tag><tt/TIA/</tag> The <tt/TIA/ structure allows read/write access + to the Atari 7800 TIA chip registers. See the <tt/_tia.h/ header + file located in the include directory for the declaration of the + structure. Also refer to the Stella Programmer's Guide by Steve + Wright for a detailed description of the chip and its registers. + + <tag><tt/RIOT/</tag> The <tt/RIOT/ structure allows read/write + access to the Atari 7800 RIOT chip registers. See the + <tt/_riot.h/ header file located in the include directory for the + declaration of the structure. Also refer to the Stella Programmer's + Guide by Steve Wright for a detailed description of the chip and its + registers. + + <tag><tt/MARIA/</tag> The <tt/MARIA/ structure allows read/write + access to the Atari 7800 MARIA chip registers. See the + <tt/_maria.h/ header file located in the include directory for the + declaration of the structure. + +</descrip><p> + + +<sect>Loadable drivers<p> + +There are no drivers for the Atari 7800. + + +<sect>Limitations<p> + +TBD + + +<sect>Other hints<p> + +One may write a custom linker configuration file to tune the memory +layout of a program. See the <tt/atari7800.cfg/ file in the cfg +directory as a starting point. + + +<sect>License<p> + +This software is provided 'as-is', without any expressed or implied +warranty. In no event will the authors be held liable for any damages +arising from the use of this software. + +Permission is granted to anyone to use this software for any purpose, +including commercial applications, and to alter it and redistribute it +freely, subject to the following restrictions: + +<enum> +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. +</enum> + +</article> diff --git a/doc/atmos.sgml b/doc/atmos.sgml index 68f7f9d65..cef7770e4 100644 --- a/doc/atmos.sgml +++ b/doc/atmos.sgml @@ -1,13 +1,11 @@ <!doctype linuxdoc system> <article> - <title>Oric Atmos-specific information for cc65 <author> <url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> <url url="mailto:polluks@sdf.lonestar.org" name="Stefan A. Haubenthal">,<newline> <url url="mailto:greg.king5@verizon.net" name="Greg King"> -<date>2015-01-09 <abstract> An overview over the Atmos runtime system as it is implemented for the cc65 C @@ -159,7 +157,10 @@ No extended memory drivers are currently available for the Atmos. <descrip> <tag><tt/atmos-pase.joy (atmos_pase_joy)/</tag> - Supports two standard joysticks connected to the P.A.S.E. interface of the Atmos. + Supports two standard joysticks connected to a P.A.S.E. / Altai interface of the Atmos. + + <tag><tt/atmos-ijk.joy (atmos_ijk_joy)/</tag> + Supports two standard joysticks connected to an IJK interface of the Atmos. </descrip><p> @@ -175,10 +176,11 @@ No mouse drivers are currently available for the Atmos. <tag><tt/atmos-acia.ser (atmos_acia_ser)/</tag> Driver for the Telestrat integrated serial controller and the Atmos with a - serial add-on. - Note that, because of the peculiarities of the 6551 chip, together with the - use of the NMI, transmits are not interrupt driven; and, the transceiver - blocks if the receiver asserts flow control because of a full buffer. + serial add-on. Supports up to 19200 baud, requires hardware flow control + (RTS/CTS) and does interrupt driven receives. Note that, because of the + peculiarities of the 6551 chip, together with the use of the NMI, transmits + are not interrupt driven; and, the transceiver blocks if the receiver + asserts flow control because of a full buffer. </descrip><p> @@ -278,14 +280,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/c128.sgml b/doc/c128.sgml index 4154c0a8d..60306814c 100644 --- a/doc/c128.sgml +++ b/doc/c128.sgml @@ -1,10 +1,9 @@ <!doctype linuxdoc system> <article> - <title>Commodore 128-specific information for cc65 -<author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>2014-04-12 +<author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> +<url url="mailto:polluks@sdf.lonestar.org" name="Stefan A. Haubenthal"> <abstract> An overview over the C128 runtime system as it is implemented for the cc65 C @@ -85,8 +84,21 @@ url="funcref.html" name="function reference"> for declaration and usage. <itemize> <item>videomode <item>c64mode -<item>fast -<item>slow +</itemize> + + +<sect1>C128-specific accelerator functions<p> + +The functions listed below are accelerator functions for the C128. See the <url +url="funcref.html" name="function reference"> for declaration and usage. + +<itemize> +<item>detect_c128 +<item>detect_scpu +<item>get_c128_speed +<item>get_scpu_speed +<item>set_c128_speed +<item>set_scpu_speed </itemize> @@ -111,6 +123,8 @@ declaration and usage. <item>cbm_k_basin <item>cbm_k_bsout <item>cbm_k_clrch +<item>cbm_k_tksa +<item>cbm_k_second <item>cbm_load <item>cbm_open <item>cbm_opendir @@ -119,6 +133,20 @@ declaration and usage. <item>cbm_save <item>cbm_write <item>get_tv +<item>waitvsync +</itemize> + + +<sect1>CBM specific CPU functions<p> + +Some CPU related functions are available for some of the Commodore +machines. See the <url url="funcref.html" name="function reference"> for +declaration and usage. + +<itemize> +<item>fast +<item>slow +<item>isfast </itemize> @@ -170,32 +198,50 @@ Note: The graphics drivers for the VDC are incompatible with the extended memory drivers using the VDC memory! <descrip> + + <tag><tt/c128-hi.tgi (c128_hi_tgi)/</tag> + This driver features a resolution of 320×200 with two colors and an + adjustable palette (that means that the two colors can be chosen out of a + palette of the 16 VIC colors). Unlike BASIC 7.0, this driver puts its + graphics data into the RAM behind the ROMs. + <tag><tt/c128-vdc.tgi (c128_vdc_tgi)/</tag> This driver was written by Maciej Witkowiak. It uses the 80-column display, - and features a resolution of 640*200 with two colors and an adjustable + and features a resolution of 640×200 with two colors and an adjustable palette (that means that the two colors can be chosen out of the 16 VDC colors). <tag><tt/c128-vdc2.tgi (c128_vdc2_tgi)/</tag> This driver was written by Maciej Witkowiak. This driver uses the 80-column - display, and features a resolution of 640*480 with two colors and an + display, and features a resolution of 640×480 with two colors and an adjustable palette (that means that the two colors can be chosen out of the 16 VDC colors). The driver requires 64KB VDC RAM. + </descrip><p> -Note: The colors are translated from definitions in headers to correct VDC values; -so, please use definitions or VIC color numbers only. Colors <tt/GRAY3/ and <tt/BROWN/ are -missing on VDC, and are translated to the two colors missing from the VIC palette. +Note: The colors are translated from the definitions in the headers to correct +VDC values; so, please use definitions or VIC color numbers only. Colors +<tt/GRAY3/ and <tt/BROWN/ are missing on the VDC; and, are translated to the +two colors missing from the VIC palette. + <sect1>Extended memory drivers<p> <descrip> + <tag><tt/c128-efnram.emd (c128_efnram_emd)/</tag> + Extended memory driver for the C128 External Function RAM. + Written and contributed by Marco van den Heuvel. + <tag><tt/c128-georam.emd (c128_georam_emd)/</tag> A driver for the GeoRam cartridge. The driver will always assume 2048 pages of 256 bytes each. There are no checks, so if your program knows better, just go ahead. + <tag><tt/c128-ifnram.emd (c128_ifnram_emd)/</tag> + Extended memory driver for the C128 Internal Function RAM. + Written and contributed by Marco van den Heuvel. + <tag><tt/c128-ram.emd (c128_ram_emd)/</tag> An extended memory driver for the RAM in page 1. The common memory area is excluded, so this driver supports 251 pages of 256 bytes each. @@ -213,10 +259,8 @@ missing on VDC, and are translated to the two colors missing from the VIC palett Will test the hardware for the available RAM. <tag><tt/c128-reu.emd (c128_reu_emd)/</tag> - A driver for the CBM REUs. The driver will determine from the connected REU - if it supports 128KB of RAM or more. In the latter case, 256KB are assumed, - but since there are no range checks, the application can use more memory if - it has better knowledge about the hardware than the driver. + A driver for the CBM REUs. The driver will test the connected REU to find + out how much RAM is present. <tag><tt/c128-vdc.emd (c128_vdc_emd)/</tag> A driver for the VDC memory of the C128, written and contributed by Maciej @@ -236,8 +280,9 @@ The default drivers, <tt/joy_stddrv (joy_static_stddrv)/, point to <tt/c128-stdj <tag><tt/c128-ptvjoy.joy (c128_ptvjoy_joy)/</tag> Driver for the Protovision 4-player adapter originally written by Groepaz for the C64, and converted for the C128 by Uz. See <url - url="http://www.protovision-online.de/hardw/hardwstart.htm"> for prices and - building instructions. Up to four joysticks are supported. + url="http://www.protovision-online.de/hardw/4_player.php?language=en" + name="Protovision shop"> for prices and building instructions. Up to four + joysticks are supported. <tag><tt/c128-stdjoy.joy (c128_stdjoy_joy)/</tag> Supports up to two joysticks connected to the standard joysticks ports of @@ -279,9 +324,9 @@ The default drivers, <tt/mouse_stddrv (mouse_static_stddrv)/, point to <tt/c128- <descrip> <tag><tt/c128-swlink.ser (c128_swlink_ser)/</tag> - Driver for the SwiftLink cartridge. Supports up to 38400 BPS, hardware flow - control (RTS/CTS), and interrupt-driven receives. Note that, because of the - peculiarities of the 6551 chip, together with the use of the NMI, transmits + Driver for the SwiftLink cartridge. Supports up to 38400 baud, requires hardware + flow control (RTS/CTS) and does interrupt driven receives. Note that, because of + the peculiarities of the 6551 chip, together with the use of the NMI, transmits are not interrupt driven; and, the transceiver blocks if the receiver asserts flow control because of a full buffer. @@ -295,6 +340,13 @@ The default drivers, <tt/mouse_stddrv (mouse_static_stddrv)/, point to <tt/c128- <sect>Limitations<p> +<sect1>Realtime clock<p> + +The realtime clock functions use the CIA1 TOD clock. As that clock only stores +the time but not the date, the date set by <tt/clock_settime()/ is simply stored +inside the C library for retrieval in the same program via <tt/clock_gettime()/. + + <sect>Other hints<p> @@ -346,14 +398,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/c16.sgml b/doc/c16.sgml index 1614516b7..ae64da47b 100644 --- a/doc/c16.sgml +++ b/doc/c16.sgml @@ -1,10 +1,8 @@ <!doctype linuxdoc system> <article> - <title>Commodore 16/116 specific information for cc65 <author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>2014-04-10 <abstract> An overview over the C16 runtime system as it is implemented for the cc65 C @@ -115,6 +113,8 @@ declaration and usage. <item>cbm_k_basin <item>cbm_k_bsout <item>cbm_k_clrch +<item>cbm_k_tksa +<item>cbm_k_second <item>cbm_load <item>cbm_open <item>cbm_opendir @@ -123,9 +123,22 @@ declaration and usage. <item>cbm_save <item>cbm_write <item>get_tv +<item>waitvsync </itemize> +<sect1>CBM specific CPU functions<p> + +Some CPU related functions are available for some of the Commodore +machines. See the <url url="funcref.html" name="function reference"> for +declaration and usage. + +<itemize> +<item>fast +<item>slow +<item>isfast +</itemize> + <sect1>Hardware access<p> The following pseudo variables declared in the <tt/c16.h/ header file do @@ -247,18 +260,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> - - - - diff --git a/doc/c64.sgml b/doc/c64.sgml index 8767d212d..8c1b3754e 100644 --- a/doc/c64.sgml +++ b/doc/c64.sgml @@ -1,10 +1,9 @@ <!doctype linuxdoc system> <article> - <title>Commodore 64-specific information for cc65 -<author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>2014-04-14 +<author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"><newline> +<url url="mailto:greg.king5@verizon.net" name="Greg King"> <abstract> An overview over the C64 runtime system as it is implemented for the cc65 C @@ -121,13 +120,13 @@ since the program must be loaded to the BASIC start address. <sect1>80 Columns conio driver<p> The C64 package comes with an alternative software driven 80 columns -module <tt/c64-soft80.o/ which uses the memory under I/O between $d000 -and $ffff. +module <tt/c64-soft80.o/ which uses the memory under I/O between $D000 +and $FF3F. In memory constrained situations the memory from $400 to $7FF can be made available to a program by calling <tt/_heapadd ((void *) 0x0400, 0x0400);/ at the beginning of <tt/main()/. Doing so is beneficial even if the program -doesn't use the the heap explicitly because loading a driver uses the heap implicitly. +doesn't use the heap explicitly because loading a driver uses the heap implicitly. Using <tt/c64-soft80.o/ is as simple as placing it on the linker command line like this: @@ -168,6 +167,33 @@ url="funcref.html" name="function reference"> for declaration and usage. </itemize> +<sect1>C64-specific accelerator functions<p> + +The functions listed below are accelerator functions for the C64. See the <url +url="funcref.html" name="function reference"> for declaration and usage. + +<itemize> +<item>detect_c128 +<item>detect_c64dtv +<item>detect_c65 +<item>detect_chameleon +<item>detect_scpu +<item>detect_turbomaster +<item>get_c128_speed +<item>get_c64dtv_speed +<item>get_c65_speed +<item>get_chameleon_speed +<item>get_scpu_speed +<item>get_turbomaster_speed +<item>set_c128_speed +<item>set_c64dtv_speed +<item>set_c65_speed +<item>set_chameleon_speed +<item>set_scpu_speed +<item>set_turbomaster_speed +</itemize> + + <sect1>CBM-specific functions<p> Some functions are available for all (or at least most) of the Commodore @@ -189,6 +215,8 @@ declaration and usage. <item>cbm_k_basin <item>cbm_k_bsout <item>cbm_k_clrch +<item>cbm_k_tksa +<item>cbm_k_second <item>cbm_load <item>cbm_open <item>cbm_opendir @@ -197,6 +225,7 @@ declaration and usage. <item>cbm_save <item>cbm_write <item>get_tv +<item>waitvsync </itemize> @@ -235,12 +264,22 @@ structures, accessing the struct fields will access the chip registers. The names in the parentheses denote the symbols to be used for static linking of the drivers. +<label id="graphics-drivers"> <sect1>Graphics drivers<p> <em>Note:</em> All available graphics drivers for the TGI interface will use -the space below the I/O area and kernal ROM, so you can have hires graphics in -the standard setup without any memory loss or need for a changed -configuration. +the space below the I/O area and Kernal ROM; so, you can have hires graphics in +the standard setup without any memory loss or need for a changed configuration. + +You can use a mouse driver at the same time that you use a TGI driver. But, if +you want to see the default mouse pointer on the graphics screen, then you +explicitly must link a special object file into your program. It will put the +arrow into the "high RAM" area where the bitmaps are put. Its name is +"<tt/c64-tgimousedata.o/". Example: + +<tscreen><verb> +cl65 -t c64 -o program-file main-code.c subroutines.s c64-tgimousedata.o +</verb></tscreen> <descrip> <tag><tt/c64-hi.tgi (c64_hi_tgi)/</tag> @@ -251,12 +290,17 @@ configuration. Note that the graphics drivers are incompatible with the <tt/c64-ram.emd (c64_ram_emd)/ extended memory driver and the - <tt/c64-soft80.o/ software 80 columns conio driver. + <tt/c64-soft80.o/ software 80-columns conio driver. + <sect1>Extended memory drivers<p> <descrip> + <tag><tt/c64-65816.emd (c64_65816_emd)/</tag> + Extended memory driver for 65816 (eg SCPU) based extra RAM. + Written and contributed by Marco van den Heuvel. + <tag><tt/c64-c256k.emd (c64_c256k_emd)/</tag> A driver for the C64 256K memory expansion. This driver offers 768 pages of 256 bytes each. Written and contributed by Marco van den Heuvel. @@ -274,8 +318,12 @@ Note that the graphics drivers are incompatible with the A driver for the ISEPIC cartridge. This driver offers just 8 pages of 256 bytes each. Written and contributed by Marco van den Heuvel. + <tag><tt/c64-kerberos.emd (c64_kerberos_emd)/</tag> + A driver for the Kerberos MIDI Cartridge. The cartridge has 512 + pages of 256 bytes for a total of 128KB. + <tag><tt/c64-ram.emd (c64_ram_emd)/</tag> - A driver for the hidden RAM below the I/O area and kernal ROM. Supports 48 + A driver for the hidden RAM below the I/O area and kernal ROM. Supports 47 256 byte pages. Please note that this driver is incompatible with any of the graphics drivers, or the soft80 conio driver! @@ -284,10 +332,8 @@ Note that the graphics drivers are incompatible with the Will test the hardware for the available RAM. <tag><tt/c64-reu.emd (c64_reu_emd)/</tag> - A driver for the CBM REUs. The driver will determine from the connected REU - if it supports 128KB of RAM or more. In the latter case, 256KB are assumed, - but since there are no range checks, the application can use more memory if - it has better knowledge about the hardware than the driver. + A driver for the CBM REUs. The driver will test the connected REU to find + out how much RAM is present. <tag><tt/c64-vdc.emd (c64_vdc_emd)/</tag> A driver for the VDC memory of the C128. Written and contributed by Maciej @@ -315,8 +361,9 @@ The default drivers, <tt/joy_stddrv (joy_static_stddrv)/, point to <tt/c64-stdjo <tag><tt/c64-ptvjoy.joy (c64_ptvjoy_joy)/</tag> Driver for the Protovision 4-player adapter contributed by Groepaz. See - <url url="http://www.protovision-online.de/hardw/hardwstart.htm"> for prices and - building instructions. Up to four joysticks are supported. + <url url="http://www.protovision-online.de/hardw/4_player.php?language=en" + name="Protovision shop"> for prices and building instructions. Up to four + joysticks are supported. <tag><tt/c64-stdjoy.joy (c64_stdjoy_joy)/</tag> Supports up to two standard joysticks connected to the joysticks port of @@ -331,6 +378,9 @@ The default drivers, <tt/joy_stddrv (joy_static_stddrv)/, point to <tt/c64-stdjo <sect1>Mouse drivers<p> +You can use these drivers in text-mode or graphics-mode (TGI) programs. See +the description of <ref id="graphics-drivers" name="the graphics drivers">. + The default drivers, <tt/mouse_stddrv (mouse_static_stddrv)/, point to <tt/c64-1351.mou (c64_1351_mou)/. <descrip> @@ -360,9 +410,9 @@ The default drivers, <tt/mouse_stddrv (mouse_static_stddrv)/, point to <tt/c64-1 <descrip> <tag><tt/c64-swlink.ser (c64_swlink_ser)/</tag> - Driver for the SwiftLink cartridge. Supports up to 38400 BPS, hardware flow - control (RTS/CTS), and interrupt-driven receives. Note that, because of the - peculiarities of the 6551 chip, together with the use of the NMI, transmits + Driver for the SwiftLink cartridge. Supports up to 38400 baud, requires hardware + flow control (RTS/CTS) and does interrupt driven receives. Note that, because of + the peculiarities of the 6551 chip, together with the use of the NMI, transmits are not interrupt driven; and, the transceiver blocks if the receiver asserts flow control because of a full buffer. @@ -373,6 +423,13 @@ The default drivers, <tt/mouse_stddrv (mouse_static_stddrv)/, point to <tt/c64-1 <sect>Limitations<p> +<sect1>Realtime clock<p> + +The realtime clock functions use the CIA1 TOD clock. As that clock only stores +the time but not the date, the date set by <tt/clock_settime()/ is simply stored +inside the C library for retrieval in the same program via <tt/clock_gettime()/. + + <sect>Other hints<p> @@ -429,14 +486,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/ca65.sgml b/doc/ca65.sgml index 213033cd4..19fd3aa2a 100644 --- a/doc/ca65.sgml +++ b/doc/ca65.sgml @@ -1,10 +1,9 @@ -<!doctype linuxdoc system> <!-- -*- text-mode -*- --> +<!doctype linuxdoc system> <article> <title>ca65 Users Guide <author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> <url url="mailto:greg.king5@verizon.net" name="Greg King"> -<date>2015-11-17 <abstract> ca65 is a powerful macro assembler for the 6502, 65C02, and 65816 CPUs. It is @@ -37,42 +36,42 @@ development: <itemize> -<item> The assembler must support macros. Macros are not essential, but they - make some things easier, especially when you use the assembler in the - backend of a compiler. -<item> The assembler must support the newer 65C02 and 65816 CPUs. I have been - thinking about a 65816 backend for the C compiler, and even my old - a816 assembler had support for these CPUs, so this wasn't really a - problem. -<item> The assembler must produce relocatable code. This is necessary for the - compiler support, and it is more convenient. -<item> Conditional assembly must be supported. This is a must for bigger - projects written in assembler (like Elite128). -<item> The assembler must support segments, and it must support more than - three segments (this is the count, most other assemblers support). - Having more than one code segments helps developing code for systems - with a divided ROM area (like the C64). -<item> The linker must be able to resolve arbitrary expressions. It should - be able to get things like +<item> The assembler must support macros. Macros are not essential, but they + make some things easier, especially when you use the assembler in the + backend of a compiler. +<item> The assembler must support the newer 65C02 and 65816 CPUs. I have been + thinking about a 65816 backend for the C compiler, and even my old + a816 assembler had support for these CPUs, so this wasn't really a + problem. +<item> The assembler must produce relocatable code. This is necessary for the + compiler support, and it is more convenient. +<item> Conditional assembly must be supported. This is a must for bigger + projects written in assembler (like Elite128). +<item> The assembler must support segments, and it must support more than + three segments (this is the count, most other assemblers support). + Having more than one code segments helps developing code for systems + with a divided ROM area (like the C64). +<item> The linker must be able to resolve arbitrary expressions. It should + be able to get things like <tscreen><verb> - .import S1, S2 - .export Special - Special = 2*S1 + S2/7 + .import S1, S2 + .export Special + Special = 2*S1 + S2/7 </verb></tscreen> - right. -<item> True lexical nesting for symbols. This is very convenient for larger - assembly projects. -<item> "Cheap" local symbols without lexical nesting for those quick, late - night hacks. -<item> I liked the idea of "options" as Anre Fachats .o65 format has it, so I - introduced the concept into the object file format use by the new cc65 - binutils. -<item> The assembler will be a one pass assembler. There was no real need for - this decision, but I've written several multipass assemblers, and it - started to get boring. A one pass assembler needs much more elaborated - data structures, and because of that it's much more fun:-) -<item> Non-GPLed code that may be used in any project without restrictions or - fear of "GPL infecting" other code. + right. +<item> True lexical nesting for symbols. This is very convenient for larger + assembly projects. +<item> "Cheap" local symbols without lexical nesting for those quick, late + night hacks. +<item> I liked the idea of "options" as Anre Fachats .o65 format has it, so I + introduced the concept into the object file format use by the new cc65 + binutils. +<item> The assembler will be a one pass assembler. There was no real need for + this decision, but I've written several multipass assemblers, and it + started to get boring. A one pass assembler needs much more elaborated + data structures, and because of that it's much more fun:-) +<item> Non-GPLed code that may be used in any project without restrictions or + fear of "GPL infecting" other code. </itemize> <p> @@ -152,7 +151,7 @@ Here is a description of all the command line options: Set the default for the CPU type. The option takes a parameter, which may be one of - 6502, 65SC02, 65C02, 65816, sweet16, HuC6280 + 6502, 6502X, 6502DTV, 65SC02, 65C02, 65816, sweet16, HuC6280, 4510 <label id="option-create-dep"> @@ -227,7 +226,7 @@ Here is a description of all the command line options: <tag><tt>--large-alignment</tt></tag> Disable warnings about a large combined alignment. See the discussion of the - <tt><ref id=".ALIGN" name=".ALIGN"></tt> directive for futher information. + <tt><ref id=".ALIGN" name=".ALIGN"></tt> directive for further information. <label id="option--list-bytes"> @@ -302,7 +301,7 @@ Here is a description of all the command line options: compiler, see there for a list. Depending on the target, the default CPU type is also set. This can be - overriden by using the <tt/<ref id="option--cpu" name="--cpu">/ option. + overridden by using the <tt/<ref id="option--cpu" name="--cpu">/ option. <label id="option-v"> @@ -404,13 +403,13 @@ it is ignored). Here are some examples for valid input lines: <tscreen><verb> - Label: ; A label and a comment - lda #$20 ; A 6502 instruction plus comment - L1: ldx #$20 ; Same with label - L2: .byte "Hello world" ; Label plus control command - mymac $20 ; Macro expansion - MySym = 3*L1 ; Symbol definition - MaSym = Label ; Another symbol + Label: ; A label and a comment + lda #$20 ; A 6502 instruction plus comment + L1: ldx #$20 ; Same with label + L2: .byte "Hello world" ; Label plus control command + mymac $20 ; Macro expansion + MySym = 3*L1 ; Symbol definition + MaSym = Label ; Another symbol </verb></tscreen> The assembler accepts @@ -420,12 +419,16 @@ The assembler accepts <tt><ref id=".P02" name=".P02"></tt> command was given). <item>all valid 6502 mnemonics plus a set of illegal instructions when in <ref id="6502X-mode" name="6502X mode">. +<item>all valid 6502DTV mnemonics when in 6502DTV mode (after the + <tt><ref id=".PDTV" name=".PDTV"></tt> command was given). <item>all valid 65SC02 mnemonics when in 65SC02 mode (after the <tt><ref id=".PSC02" name=".PSC02"></tt> command was given). <item>all valid 65C02 mnemonics when in 65C02 mode (after the <tt><ref id=".PC02" name=".PC02"></tt> command was given). -<item>all valid 65618 mnemonics when in 65816 mode (after the +<item>all valid 65816 mnemonics when in 65816 mode (after the <tt><ref id=".P816" name=".P816"></tt> command was given). +<item>all valid 4510 mnemonics when in 4510 mode (after the + <tt><ref id=".P4510" name=".P4510"></tt> command was given). </itemize> @@ -434,16 +437,16 @@ The assembler accepts In 65816 mode, several aliases are accepted, in addition to the official mnemonics: -<tscreen><verb> -CPA is an alias for CMP -DEA is an alias for DEC A -INA is an alias for INC A -SWA is an alias for XBA -TAD is an alias for TCD -TAS is an alias for TCS -TDA is an alias for TDC -TSA is an alias for TSC -</verb></tscreen> +<itemize> +<item><tt>CPA</tt> is an alias for <tt>CMP</tt> +<item><tt>DEA</tt> is an alias for <tt>DEC A</tt> +<item><tt>INA</tt> is an alias for <tt>INC A</tt> +<item><tt>SWA</tt> is an alias for <tt>XBA</tt> +<item><tt>TAD</tt> is an alias for <tt>TCD</tt> +<item><tt>TAS</tt> is an alias for <tt>TCS</tt> +<item><tt>TDA</tt> is an alias for <tt>TDC</tt> +<item><tt>TSA</tt> is an alias for <tt>TSC</tt> +</itemize> <sect1>6502X mode<label id="6502X-mode"><p> @@ -473,6 +476,27 @@ from the mentioned web page, for more information, see there. </itemize> +<sect1>4510 mode<p> + +The 4510 is a microcontroller that is the core of the Commodore C65 aka C64DX. +It contains among other functions a slightly modified 65CE02/4502 CPU, to allow +address mapping for 20 bits of address space (1 megabyte addressable area). +As compared to the description of the CPU in the +<url url="http://www.zimmers.net/anonftp/pub/cbm/c65/c65manualupdated.txt.gz" +name="C65 System Specification"> +<url url="https://raw.githubusercontent.com/MEGA65/c65-specifications/master/c65manualupdated.txt" +name="(updated version)"> uses these changes: +<itemize> +<item><tt>LDA (d,SP),Y</tt> may also be written as <tt>LDA (d,S),Y</tt> +(matching the 65816 notataion). +<item>All branch instruction allow now 16 bit offsets. To use a 16 bit +branch you have to prefix these with an "L" (e.g. "<tt>LBNE</tt>" instead of +"<tt>BNE</tt>"). This might change at a later implementation of the assembler. +</itemize> +For more information about the Commodore C65/C64DX and the 4510 CPU, see +<url url="http://www.zimmers.net/anonftp/pub/cbm/c65/"> and +<url url="https://en.wikipedia.org/wiki/Commodore_65" name="Wikipedia">. + <sect1>sweet16 mode<label id="sweet16-mode"><p> @@ -543,19 +567,19 @@ case, the assembler has to make some assumptions about the result of an expression: <itemize> -<item> If the result of an expression is constant, the actual value is - checked to see if it's a byte sized expression or not. -<item> If the expression is explicitly casted to a byte sized expression by - one of the '>', '<' or '^' operators, it is a byte expression. -<item> If this is not the case, and the expression contains a symbol, - explicitly declared as zero page symbol (by one of the .importzp or - .exportzp instructions), then the whole expression is assumed to be - byte sized. -<item> If the expression contains symbols that are not defined, and these - symbols are local symbols, the enclosing scopes are searched for a - symbol with the same name. If one exists and this symbol is defined, - its attributes are used to determine the result size. -<item> In all other cases the expression is assumed to be word sized. +<item> If the result of an expression is constant, the actual value is + checked to see if it's a byte sized expression or not. +<item> If the expression is explicitly casted to a byte sized expression by + one of the '>', '<' or '^' operators, it is a byte expression. +<item> If this is not the case, and the expression contains a symbol, + explicitly declared as zero page symbol (by one of the .importzp or + .exportzp instructions), then the whole expression is assumed to be + byte sized. +<item> If the expression contains symbols that are not defined, and these + symbols are local symbols, the enclosing scopes are searched for a + symbol with the same name. If one exists and this symbol is defined, + its attributes are used to determine the result size. +<item> In all other cases the expression is assumed to be word sized. </itemize> Note: If the assembler is not able to evaluate the expression at assembly @@ -600,7 +624,7 @@ problem in most cases. <tabular ca="clc"> <bf/Operator/| <bf/Description/| <bf/Precedence/@<hline> | Built-in string functions| 0@ -||~@ +~|~|~@ | Built-in pseudo-variables| 1@ | Built-in pseudo-functions| 1@ +| Unary positive| 1@ @@ -613,7 +637,7 @@ problem in most cases. .HIBYTE| Unary high-byte operator| 1@ ^<newline> .BANKBYTE| Unary bank-byte operator| 1@ -||~@ +~|~|~@ *| Multiplication| 2@ /| Division| 2@ .MOD| Modulo operator| 2@ @@ -625,28 +649,28 @@ problem in most cases. .SHL| Shift-left operator| 2@ >><newline> .SHR| Shift-right operator| 2@ -||~@ +~|~|~@ +| Binary addition| 3@ -| Binary subtraction| 3@ |<newline> .BITOR| Bitwise or| 3@ -||~@ +~|~|~@ = | Compare operator (equal)| 4@ <>| Compare operator (not equal)| 4@ <| Compare operator (less)| 4@ >| Compare operator (greater)| 4@ <=| Compare operator (less or equal)| 4@ >=| Compare operator (greater or equal)| 4@ -||~@ +~|~|~@ &&<newline> .AND| Boolean and| 5@ .XOR| Boolean xor| 5@ -||~@ +~|~|~@ ||<newline> .OR| Boolean or| 6@ -||~@ +~|~|~@ !<newline> -.NOT| Boolean not| 7@<hline> +.NOT| Boolean not| 7 </tabular> <caption>Available operators, sorted by precedence </table> @@ -764,14 +788,14 @@ You may use cheap local labels as an easy way to reuse common label names like "Loop". Here is an example: <tscreen><verb> - Clear: lda #$00 ; Global label - ldy #$20 - @Loop: sta Mem,y ; Local label - dey - bne @Loop ; Ok - rts - Sub: ... ; New global label - bne @Loop ; ERROR: Unknown identifier! + Clear: lda #$00 ; Global label + ldy #$20 + @Loop: sta Mem,y ; Local label + dey + bne @Loop ; Ok + rts + Sub: ... ; New global label + bne @Loop ; ERROR: Unknown identifier! </verb></tscreen> <sect1>Unnamed labels<p> @@ -787,23 +811,23 @@ reference (use the n'th label in forward direction). An example will help to understand this: <tscreen><verb> - : lda (ptr1),y ; #1 - cmp (ptr2),y - bne :+ ; -> #2 - tax - beq :+++ ; -> #4 - iny - bne :- ; -> #1 - inc ptr1+1 - inc ptr2+1 - bne :- ; -> #1 + : lda (ptr1),y ; #1 + cmp (ptr2),y + bne :+ ; -> #2 + tax + beq :+++ ; -> #4 + iny + bne :- ; -> #1 + inc ptr1+1 + inc ptr2+1 + bne :- ; -> #1 - : bcs :+ ; #2 -> #3 - ldx #$FF - rts + : bcs :+ ; #2 -> #3 + ldx #$FF + rts - : ldx #$01 ; #3 - : rts ; #4 + : ldx #$01 ; #3 + : rts ; #4 </verb></tscreen> As you can see from the example, unnamed labels will make even short @@ -835,15 +859,15 @@ errors. Because of these problems, the general advice is, <bf/NOT/ do use Example: <tscreen><verb> - .DEFINE two 2 - .DEFINE version "SOS V2.3" + .DEFINE two 2 + .DEFINE version "SOS V2.3" - four = two * two ; Ok - .byte version ; Ok + four = two * two ; Ok + .byte version ; Ok - .PROC ; Start local scope - two = 3 ; Will give "2 = 3" - invalid! - .ENDPROC + .PROC ; Start local scope + two = 3 ; Will give "2 = 3" - invalid! + .ENDPROC </verb></tscreen> @@ -1164,7 +1188,21 @@ an explanation on how this is done. <sect1>Address sizes of symbols<p> +The address size of a symbol can be specified with a prefix: +<itemize> +<item>z: zeropage addressing (8 bits). +<item>a: absolute addressing (16 bits). +<item>f: far addressing (24 bits). +</itemize> + +The zeropage addressing override can be used to ensure the use of optimal +zeropage instructions, or correct cases where the size isn't yet known +due to the single-pass assembly model. + +The larger addressing overrides can be used to promote a smaller address +to absolute or far addressing, instead of being automatically fit into +a smaller addressing type. <sect1>Memory models<p> @@ -1205,17 +1243,17 @@ writable. Example: <tscreen><verb> - ; Reverse Subtract with Accumulator - ; A = memory - A - .macro rsb param - .if .asize = 8 - eor #$ff - .else - eor #$ffff - .endif - sec - adc param - .endmacro + ; Reverse Subtract with Accumulator + ; A = memory - A + .macro rsb param + .if .asize = 8 + eor #$ff + .else + eor #$ffff + .endif + sec + adc param + .endmacro </verb></tscreen> See also: <tt><ref id=".ISIZE" name=".ISIZE"></tt> @@ -1236,15 +1274,15 @@ writable. <tscreen><verb> .macpack cpu - .if (.cpu .bitand CPU_ISET_65816) - phx - phy - .else - txa - pha - tya - pha - .endif + .if (.cpu .bitand CPU_ISET_65816) + phx + phy + .else + txa + pha + tya + pha + .endif </verb></tscreen> @@ -1269,12 +1307,12 @@ writable. Example: <tscreen><verb> - .macro foo arg1, arg2, arg3 - .if .paramcount <> 3 - .error "Too few parameters for macro foo" - .endif - ... - .endmacro + .macro foo arg1, arg2, arg3 + .if .paramcount <> 3 + .error "Too few parameters for macro foo" + .endif + ... + .endmacro </verb></tscreen> See section <ref id="macros" name="Macros">. @@ -1315,15 +1353,15 @@ writable. <sect>Pseudo functions<label id="pseudo-functions"><p> -Pseudo functions expect their arguments in parenthesis, and they have a result, -either a string or an expression. +Pseudo functions expect their arguments in parentheses, and they have a result, +either a string or an expression value. <sect1><tt>.ADDRSIZE</tt><label id=".ADDRSIZE"><p> - The <tt/.ADDRSIZE/ function is used to return the interal address size + The <tt/.ADDRSIZE/ function is used to return the internal address size associated with a symbol. This can be helpful in macros when knowing the address - size of symbol can help with custom instructions. + size of a symbol can help with custom instructions. Example: @@ -1351,7 +1389,7 @@ either a string or an expression. <sect1><tt>.BANK</tt><label id=".BANK"><p> The <tt/.BANK/ function is used to support systems with banked memory. The - argument is an expression with exactly one segment reference - usually a + argument is an expression with exactly one segment reference -- usually a label. The function result is the value of the <tt/bank/ attribute assigned to the run memory area of the segment. Please see the linker documentation for more information about memory areas and their attributes. @@ -1359,13 +1397,13 @@ either a string or an expression. The value of <tt/.BANK/ can be used to switch memory so that a memory bank containing specific data is available. - The <tt/bank/ attribute is a 32 bit integer and so is the result of the + The <tt/bank/ attribute is a 32-bit integer, and so is the result of the <tt/.BANK/ function. You will have to use <tt><ref id=".LOBYTE" name=".LOBYTE"></tt> or similar functions to address just part of it. - Please note that <tt/.BANK/ will always get evaluated in the link stage, so - an expression containing <tt/.BANK/ can never be used where a constant known - result is expected (for example with <tt/.RES/). + Please note that <tt/.BANK/ always will get evaluated in the link stage, so + an expression containing <tt/.BANK/ never can be used where a constant, known + result is expected (for example, with <tt/.RES/). Example: @@ -1381,7 +1419,7 @@ either a string or an expression. .endproc .proc bank_table - .addr banked_func_1 + .addr banked_func_1 .byte <.BANK (banked_func_1) .addr banked_func_2 @@ -1402,7 +1440,7 @@ either a string or an expression. <sect1><tt>.BLANK</tt><label id=".BLANK"><p> - Builtin function. The function evaluates its argument in braces and yields + Builtin function. The function evaluates its argument in parentheses and yields "false" if the argument is non blank (there is an argument), and "true" if there is no argument. The token list that makes up the function argument may optionally be enclosed in curly braces. This allows the inclusion of @@ -1413,7 +1451,7 @@ either a string or an expression. As an example, the <tt/.IFBLANK/ statement may be replaced by <tscreen><verb> - .if .blank({arg}) + .if .blank({arg}) </verb></tscreen> @@ -1429,25 +1467,60 @@ either a string or an expression. Example: <tscreen><verb> - .include .concat ("myheader", ".", "inc") + .include .concat ("myheader", ".", "inc") </verb></tscreen> This is the same as the command <tscreen><verb> - .include "myheader.inc" + .include "myheader.inc" </verb></tscreen> <sect1><tt>.CONST</tt><label id=".CONST"><p> - Builtin function. The function evaluates its argument in braces and + Builtin function. The function evaluates its argument in parentheses and yields "true" if the argument is a constant expression (that is, an expression that yields a constant value at assembly time) and "false" otherwise. As an example, the .IFCONST statement may be replaced by <tscreen><verb> - .if .const(a + 3) + .if .const(a + 3) + </verb></tscreen> + + +<sect1><tt>.DEF, .DEFINED</tt><label id=".DEFINED"><p> + + Builtin function. The function expects an identifier as argument in parentheses. + The argument is evaluated, and the function yields "true" if the identifier + is a symbol that already is defined somewhere in the source file up to the + current position. Otherwise, the function yields false. As an example, the + <tt><ref id=".IFDEF" name=".IFDEF"></tt> statement may be replaced by + + <tscreen><verb> + .if .defined(a) + </verb></tscreen> + + +<sect1><tt>.DEFINEDMACRO</tt><label id=".DEFINEDMACRO"><p> + + Builtin function. The function expects an identifier as argument in parentheses. + The argument is evaluated, and the function yields "true" if the identifier + already has been defined as the name of a macro. Otherwise, the function yields + false. Example: + + <tscreen><verb> + .macro add foo + clc + adc foo + .endmacro + + .if .definedmacro(add) + add #$01 + .else + clc + adc #$01 + .endif </verb></tscreen> @@ -1477,7 +1550,7 @@ either a string or an expression. Example: <tscreen><verb> - .macro makelabel arg1, arg2 + .macro makelabel arg1, arg2 .ident (.concat (arg1, arg2)): .endmacro @@ -1487,6 +1560,23 @@ either a string or an expression. </verb></tscreen> +<sect1><tt>.ISMNEM, .ISMNEMONIC</tt><label id=".ISMNEMONIC"><p> + + Builtin function. The function expects an identifier as argument in parentheses. + The argument is evaluated, and the function yields "true" if the identifier + is defined as an instruction mnemonic that is recognized by the assembler. + Example: + + <tscreen><verb> + .if .not .ismnemonic(ina) + .macro ina + clc + adc #$01 + .endmacro + .endif + </verb></tscreen> + + <sect1><tt>.LEFT</tt><label id=".LEFT"><p> Builtin function. Extracts the left part of a given token list. @@ -1494,7 +1584,7 @@ either a string or an expression. Syntax: <tscreen><verb> - .LEFT (<int expr>, <token list>) + .LEFT (<int expr>, <token list>) </verb></tscreen> The first integer expression gives the number of tokens to extract from @@ -1509,16 +1599,16 @@ either a string or an expression. (immediate addressing mode), use something like this: <tscreen><verb> - .macro ldax arg - ... - .if (.match (.left (1, {arg}), #)) + .macro ldax arg + ... + .if (.match (.left (1, {arg}), #)) - ; ldax called with immediate operand - ... + ; ldax called with immediate operand + ... - .endif - ... - .endmacro + .endif + ... + .endmacro </verb></tscreen> See also the <tt><ref id=".MID" name=".MID"></tt> and <tt><ref id=".RIGHT" @@ -1550,7 +1640,7 @@ either a string or an expression. The syntax is <tscreen><verb> - .MATCH(<token list #1>, <token list #2>) + .MATCH(<token list #1>, <token list #2>) </verb></tscreen> Both token list may contain arbitrary tokens with the exception of the @@ -1581,16 +1671,16 @@ either a string or an expression. to check for this and print and error for invalid calls. <tscreen><verb> - .macro asr arg + .macro asr arg - .if (.not .blank(arg)) .and (.not .match ({arg}, a)) - .error "Syntax error" - .endif + .if (.not .blank(arg)) .and (.not .match ({arg}, a)) + .error "Syntax error" + .endif - cmp #$80 ; Bit 7 into carry - lsr a ; Shift carry into bit 7 + cmp #$80 ; Bit 7 into carry + lsr a ; Shift carry into bit 7 - .endmacro + .endmacro </verb></tscreen> The macro will only accept no arguments, or one argument that must be the @@ -1606,14 +1696,14 @@ either a string or an expression. The syntax is <tscreen><verb> - .MAX (<value #1>, <value #2>) + .MAX (<value #1>, <value #2>) </verb></tscreen> Example: <tscreen><verb> ; Reserve space for the larger of two data blocks - savearea: .max (.sizeof (foo), .sizeof (bar)) + savearea: .res .max (.sizeof (foo), .sizeof (bar)) </verb></tscreen> See: <tt><ref id=".MIN" name=".MIN"></tt> @@ -1627,7 +1717,7 @@ either a string or an expression. Syntax: <tscreen><verb> - .MID (<int expr>, <int expr>, <token list>) + .MID (<int expr>, <int expr>, <token list>) </verb></tscreen> The first integer expression gives the starting token in the list (the first @@ -1643,16 +1733,16 @@ either a string or an expression. (immediate addressing mode), use something like this: <tscreen><verb> - .macro ldax arg - ... - .if (.match (.mid (0, 1, {arg}), #)) + .macro ldax arg + ... + .if (.match (.mid (0, 1, {arg}), #)) - ; ldax called with immediate operand - ... + ; ldax called with immediate operand + ... - .endif - ... - .endmacro + .endif + ... + .endmacro </verb></tscreen> See also the <tt><ref id=".LEFT" name=".LEFT"></tt> and <tt><ref id=".RIGHT" @@ -1666,14 +1756,14 @@ either a string or an expression. The syntax is <tscreen><verb> - .MIN (<value #1>, <value #2>) + .MIN (<value #1>, <value #2>) </verb></tscreen> Example: <tscreen><verb> - ; Reserve space for some data, but 256 bytes minimum - savearea: .min (.sizeof (foo), 256) + ; Reserve space for some data, but 256 bytes maximum + savearea: .res .min (.sizeof (foo), 256) </verb></tscreen> See: <tt><ref id=".MAX" name=".MAX"></tt> @@ -1681,14 +1771,14 @@ either a string or an expression. <sect1><tt>.REF, .REFERENCED</tt><label id=".REFERENCED"><p> - Builtin function. The function expects an identifier as argument in braces. + Builtin function. The function expects an identifier as argument in parentheses. The argument is evaluated, and the function yields "true" if the identifier is a symbol that has already been referenced somewhere in the source file up to the current position. Otherwise the function yields false. As an example, the <tt><ref id=".IFREF" name=".IFREF"></tt> statement may be replaced by <tscreen><verb> - .if .referenced(a) + .if .referenced(a) </verb></tscreen> See: <tt><ref id=".DEFINED" name=".DEFINED"></tt> @@ -1701,7 +1791,7 @@ either a string or an expression. Syntax: <tscreen><verb> - .RIGHT (<int expr>, <token list>) + .RIGHT (<int expr>, <token list>) </verb></tscreen> The first integer expression gives the number of tokens to extract from the @@ -1716,18 +1806,18 @@ either a string or an expression. <sect1><tt>.SIZEOF</tt><label id=".SIZEOF"><p> - <tt/.SIZEOF/ is a pseudo function that returns the size of its argument. The - argument can be a struct/union, a struct member, a procedure, or a label. In - case of a procedure or label, its size is defined by the amount of data - placed in the segment where the label is relative to. If a line of code - switches segments (for example in a macro) data placed in other segments - does not count for the size. + <tt/.SIZEOF()/ is a pseudo function that returns the size of its argument. + The argument can be a struct/union, a struct member, a scope/procedure, or a + label. In the case of a procedure or label, its size is defined by the + amount of data placed in the segment where the label is relative to. If a + line of code switches segments (for example, in a macro), data placed in + other segments does not count for the size. - Please note that a symbol or scope must exist, before it is used together with - <tt/.SIZEOF/ (this may get relaxed later, but will always be true for scopes). - A scope has preference over a symbol with the same name, so if the last part - of a name represents both, a scope and a symbol, the scope is chosen over the - symbol. + Please note that a symbol or scope must exist before it can be used together + with <tt/.SIZEOF()/ (that may get relaxed later, but always will be true for + scopes). A scope has preference over a symbol with the same name; so, if the + last part of a name represents both a scope and a symbol, then the scope is + chosen over the symbol. After the following code: @@ -1788,24 +1878,6 @@ either a string or an expression. </descrip> -<sect1><tt>.STRAT</tt><label id=".STRAT"><p> - - Builtin function. The function accepts a string and an index as - arguments and returns the value of the character at the given position - as an integer value. The index is zero based. - - Example: - - <tscreen><verb> - .macro M Arg - ; Check if the argument string starts with '#' - .if (.strat (Arg, 0) = '#') - ... - .endif - .endmacro - </verb></tscreen> - - <sect1><tt>.SPRINTF</tt><label id=".SPRINTF"><p> Builtin function. It expects a format string as first argument. The number @@ -1825,9 +1897,27 @@ either a string or an expression. </verb></tscreen> +<sect1><tt>.STRAT</tt><label id=".STRAT"><p> + + Builtin function. The function accepts a string and an index as + arguments and returns the value of the character at the given position + as an integer value. The index is zero based. + + Example: + + <tscreen><verb> + .macro M Arg + ; Check if the argument string starts with '#' + .if (.strat (Arg, 0) = '#') + ... + .endif + .endmacro + </verb></tscreen> + + <sect1><tt>.STRING</tt><label id=".STRING"><p> - Builtin function. The function accepts an argument in braces and converts + Builtin function. The function accepts an argument in parentheses and converts this argument into a string constant. The argument may be an identifier, or a constant numeric value. @@ -1837,16 +1927,16 @@ either a string or an expression. Example: <tscreen><verb> - ; Emulate other assemblers: - .macro section name - .segment .string(name) - .endmacro + ; Emulate other assemblers: + .macro section name + .segment .string(name) + .endmacro </verb></tscreen> <sect1><tt>.STRLEN</tt><label id=".STRLEN"><p> - Builtin function. The function accepts a string argument in braces and + Builtin function. The function accepts a string argument in parentheses and evaluates to the length of the string. Example: @@ -1855,15 +1945,15 @@ either a string or an expression. a leading length byte. <tscreen><verb> - .macro PString Arg - .byte .strlen(Arg), Arg - .endmacro + .macro PString Arg + .byte .strlen(Arg), Arg + .endmacro </verb></tscreen> <sect1><tt>.TCOUNT</tt><label id=".TCOUNT"><p> - Builtin function. The function accepts a token list in braces. The function + Builtin function. The function accepts a token list in parentheses. The function result is the number of tokens given as argument. The token list may optionally be enclosed into curly braces which are not considered part of the list and not counted. Enclosement in curly braces allows the inclusion @@ -1877,15 +1967,15 @@ either a string or an expression. load instructions, the '#' token has to get stripped from the argument: <tscreen><verb> - .macro ldax arg - .if (.match (.mid (0, 1, {arg}), #)) - ; ldax called with immediate operand - lda #<(.right (.tcount ({arg})-1, {arg})) - ldx #>(.right (.tcount ({arg})-1, {arg})) - .else - ... - .endif - .endmacro + .macro ldax arg + .if (.match (.mid (0, 1, {arg}), #)) + ; ldax called with immediate operand + lda #<(.right (.tcount ({arg})-1, {arg})) + ldx #>(.right (.tcount ({arg})-1, {arg})) + .else + ... + .endif + .endmacro </verb></tscreen> @@ -1898,7 +1988,7 @@ either a string or an expression. The syntax is <tscreen><verb> - .XMATCH(<token list #1>, <token list #2>) + .XMATCH(<token list #1>, <token list #2>) </verb></tscreen> Both token list may contain arbitrary tokens with the exception of the @@ -1958,7 +2048,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .addr $0D00, $AF13, _Clear + .addr $0D00, $AF13, _Clear </verb></tscreen> See: <tt><ref id=".FARADDR" name=".FARADDR"></tt>, <tt><ref id=".WORD" @@ -1986,7 +2076,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .align 256 + .align 256 </verb></tscreen> Some unexpected behaviour might occur if there are multiple <tt/.ALIGN/ @@ -2041,12 +2131,16 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - Msg: .asciiz "Hello world" + Msg: .asciiz "Hello world" </verb></tscreen> This will put the string "Hello world" followed by a binary zero into the current segment. There may be more strings separated by commas, but - the binary zero is only appended once (after the last one). + the binary zero is only appended once (after the last one). Strings will + be translated using the current character mapping definition. + +See: <tt><ref id=".BYTE" name=".BYTE"></tt>,<tt><ref id=".CHARMAP" name=".CHARMAP"></tt>, + <tt><ref id=".LITERAL" name=".LITERAL"></tt> <sect1><tt>.ASSERT</tt><label id=".ASSERT"><p> @@ -2063,7 +2157,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .assert * = $8000, error, "Code not at $8000" + .assert * = $8000, error, "Code not at $8000" </verb></tscreen> The example assertion will check that the current location is at $8000, @@ -2095,7 +2189,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .autoimport + ; Switch on auto import + .autoimport + ; Switch on auto import </verb></tscreen> <sect1><tt>.BANKBYTES</tt><label id=".BANKBYTES"><p> @@ -2109,17 +2203,17 @@ Here's a list of all control commands and a description, what they do: <tscreen><verb> .define MyTable TableItem0, TableItem1, TableItem2, TableItem3 - TableLookupLo: .lobytes MyTable - TableLookupHi: .hibytes MyTable - TableLookupBank: .bankbytes MyTable + TableLookupLo: .lobytes MyTable + TableLookupHi: .hibytes MyTable + TableLookupBank: .bankbytes MyTable </verb></tscreen> which is equivalent to <tscreen><verb> TableLookupLo: .byte <TableItem0, <TableItem1, <TableItem2, <TableItem3 - TableLookupHi: .byte >TableItem0, >TableItem1, >TableItem2, >TableItem3 - TableLookupBank: .byte ^TableItem0, ^TableItem1, ^TableItem2, ^TableItem3 + TableLookupHi: .byte >TableItem0, >TableItem1, >TableItem2, >TableItem3 + TableLookupBank: .byte ^TableItem0, ^TableItem1, ^TableItem2, ^TableItem3 </verb></tscreen> See also: <tt><ref id=".BYTE" name=".BYTE"></tt>, @@ -2133,7 +2227,7 @@ Here's a list of all control commands and a description, what they do: so this is a shortcut for <tscreen><verb> - .segment "BSS" + .segment "BSS" </verb></tscreen> See also the <tt><ref id=".SEGMENT" name=".SEGMENT"></tt> command. @@ -2142,15 +2236,19 @@ Here's a list of all control commands and a description, what they do: <sect1><tt>.BYT, .BYTE</tt><label id=".BYTE"><p> Define byte sized data. Must be followed by a sequence of (byte ranged) - expressions or strings. + expressions or strings. Strings will be translated using the current + character mapping definition. Example: <tscreen><verb> - .byte "Hello " - .byt "world", $0D, $00 + .byte "Hello " + .byt "world", $0D, $00 </verb></tscreen> +See: <tt><ref id=".ASCIIZ" name=".ASCIIZ"></tt>,<tt><ref id=".CHARMAP" name=".CHARMAP"></tt> + <tt><ref id=".LITERAL" name=".LITERAL"></tt> + <sect1><tt>.CASE</tt><label id=".CASE"><p> @@ -2163,23 +2261,24 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .case - ; Identifiers are not case sensitive + .case - ; Identifiers are not case sensitive </verb></tscreen> <sect1><tt>.CHARMAP</tt><label id=".CHARMAP"><p> - Apply a custom mapping for characters. The command is followed by two - numbers. The first one is the index of the source character (range 1..255), + Apply a custom mapping for characters for the commands <tt><ref id=".ASCIIZ" + name=".ASCIIZ"></tt> and <tt><ref id=".BYTE" name=".BYTE"></tt>. The command + is followed by two numbers. The first one is the index of the source character + (range 0..255); the second one is the mapping (range 0..255). The mapping applies to all - character and string constants when they generate output, and overrides a - mapping table specified with the <tt><ref id="option-t" name="-t"></tt> + character and string constants <em/when/ they generate output; and, overrides + a mapping table specified with the <tt><ref id="option-t" name="-t"></tt> command line switch. Example: - <tscreen><verb> - .charmap $41, $61 ; Map 'A' to 'a' + .charmap $41, $61 ; Map 'A' to 'a' </verb></tscreen> @@ -2189,7 +2288,7 @@ Here's a list of all control commands and a description, what they do: "CODE", so this is a shortcut for <tscreen><verb> - .segment "CODE" + .segment "CODE" </verb></tscreen> See also the <tt><ref id=".SEGMENT" name=".SEGMENT"></tt> command. @@ -2225,8 +2324,8 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .condes ModuleInit, constructor - .condes ModInit, 0, 16 + .condes ModuleInit, constructor + .condes ModInit, 0, 16 </verb></tscreen> See the <tt><ref id=".CONSTRUCTOR" name=".CONSTRUCTOR"></tt>, <tt><ref @@ -2257,8 +2356,8 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .constructor ModuleInit - .constructor ModInit, 16 + .constructor ModuleInit + .constructor ModInit, 16 </verb></tscreen> See the <tt><ref id=".CONDES" name=".CONDES"></tt> and <tt><ref @@ -2273,7 +2372,7 @@ Here's a list of all control commands and a description, what they do: "DATA", so this is a shortcut for <tscreen><verb> - .segment "DATA" + .segment "DATA" </verb></tscreen> See also the <tt><ref id=".SEGMENT" name=".SEGMENT"></tt> command. @@ -2288,13 +2387,13 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .dbyt $1234, $4512 + .dbyt $1234, $4512 </verb></tscreen> This will emit the bytes <tscreen><verb> - $12 $34 $45 $12 + $12 $34 $45 $12 </verb></tscreen> into the current segment in that order. @@ -2311,7 +2410,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .debuginfo + ; Generate debug info + .debuginfo + ; Generate debug info </verb></tscreen> @@ -2319,7 +2418,7 @@ Here's a list of all control commands and a description, what they do: Start a define style macro definition. The command is followed by an identifier (the macro name) and optionally by a list of formal arguments - in braces. + in parentheses. Please note that <tt/.DEFINE/ shares most disadvantages with its C counterpart, so the general advice is, <bf/NOT/ do use <tt/.DEFINE/ if you @@ -2343,41 +2442,6 @@ Here's a list of all control commands and a description, what they do: See also section <ref id="macros" name="Macros">. -<sect1><tt>.DEF, .DEFINED</tt><label id=".DEFINED"><p> - - Builtin function. The function expects an identifier as argument in braces. - The argument is evaluated, and the function yields "true" if the identifier - is a symbol that is already defined somewhere in the source file up to the - current position. Otherwise the function yields false. As an example, the - <tt><ref id=".IFDEF" name=".IFDEF"></tt> statement may be replaced by - - <tscreen><verb> - .if .defined(a) - </verb></tscreen> - - -<sect1><tt>.DEFINEDMACRO</tt><label id=".DEFINEDMACRO"><p> - - Builtin function. The function expects an identifier as argument in braces. - The argument is evaluated, and the function yields "true" if the identifier - has already been defined as the name of a macro. Otherwise the function yields - false. Example: - - <tscreen><verb> - .macro add foo - clc - adc foo - .endmacro - - .if .definedmacro(add) - add #$01 - .else - clc - adc #$01 - .endif - </verb></tscreen> - - <sect1><tt>.DESTRUCTOR</tt><label id=".DESTRUCTOR"><p> Export a symbol and mark it as a module destructor. This may be used @@ -2399,8 +2463,8 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .destructor ModuleDone - .destructor ModDone, 16 + .destructor ModuleDone + .destructor ModDone, 16 </verb></tscreen> See the <tt><ref id=".CONDES" name=".CONDES"></tt> and <tt><ref @@ -2417,7 +2481,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .dword $12344512, $12FA489 + .dword $12344512, $12FA489 </verb></tscreen> @@ -2461,7 +2525,7 @@ Here's a list of all control commands and a description, what they do: <sect1><tt>.ENDPROC</tt><label id=".ENDPROC"><p> - End of local lexical level (see <tt><ref id=".PROC" name=".PROC"></tt>). + End of the local lexical level (see <tt><ref id=".PROC" name=".PROC"></tt>). <sect1><tt>.ENDREP, .ENDREPEAT</tt><label id=".ENDREPEAT"><p> @@ -2471,7 +2535,7 @@ Here's a list of all control commands and a description, what they do: <sect1><tt>.ENDSCOPE</tt><label id=".ENDSCOPE"><p> - End of local lexical level (see <tt/<ref id=".SCOPE" name=".SCOPE">/). + End of the local lexical level (see <tt/<ref id=".SCOPE" name=".SCOPE">/). <sect1><tt>.ENDSTRUCT</tt><label id=".ENDSTRUCT"><p> @@ -2495,8 +2559,8 @@ Here's a list of all control commands and a description, what they do: otherwise the enumeration members are placed in the enclosing scope. In the enumeration body, symbols are declared. The first symbol has a value - of zero, and each following symbol will get the value of the preceding plus - one. This behaviour may be overridden by an explicit assignment. Two symbols + of zero, and each following symbol will get the value of the preceding, plus + one. That behaviour may be overridden by an explicit assignment. Two symbols may have the same value. Example: @@ -2509,9 +2573,9 @@ Here's a list of all control commands and a description, what they do: .endenum </verb></tscreen> - Above example will create a new scope named <tt/errorcodes/ with three - symbols in it that get the values 0, 1 and 2 respectively. Another way - to write this would have been: + The above example will create a new scope named <tt/errorcodes/ with three + symbols in it that get the values 0, 1, and 2 respectively. Another way + to write that would have been: <tscreen><verb> .scope errorcodes @@ -2540,12 +2604,12 @@ Here's a list of all control commands and a description, what they do: .endenum </verb></tscreen> - In this example, the enumeration does not have a name, which means that the - members will be visible in the enclosing scope and can be used in this scope + In that example, the enumeration does not have a name, which means that the + members will be visible in the enclosing scope, and can be used in that scope without explicit scoping. The first member (<tt/EUNKNOWN/) has the value -1. - The value for the following members is incremented by one, so <tt/EOK/ would - be zero and so on. <tt/EWOULDBLOCK/ is an alias for <tt/EGAIN/, so it has an - override for the value using an already defined symbol. + The values for the following members are incremented by one; so, <tt/EOK/ + would be zero, and so on. <tt/EWOULDBLOCK/ is an alias for <tt/EAGAIN/; so, + it has an override for the value, using an already defined symbol. <sect1><tt>.ERROR</tt><label id=".ERROR"><p> @@ -2560,13 +2624,13 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .if foo = 1 - ... - .elseif bar = 1 - ... - .else - .error "Must define foo or bar!" - .endif + .if foo = 1 + ... + .elseif bar = 1 + ... + .else + .error "Must define foo or bar!" + .endif </verb></tscreen> See also: <tt><ref id=".FATAL" name=".FATAL"></tt>, @@ -2599,7 +2663,7 @@ Here's a list of all control commands and a description, what they do: Examples: <tscreen><verb> - .export foo + .export foo .export bar: far .export foobar: far = foo * bar .export baz := foobar, zap: far = baz - bar @@ -2622,7 +2686,7 @@ Here's a list of all control commands and a description, what they do: Examples: <tscreen><verb> - .exportzp foo, bar + .exportzp foo, bar .exportzp baz := $02 </verb></tscreen> @@ -2637,7 +2701,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .faraddr DrawCircle, DrawRectangle, DrawHexagon + .faraddr DrawCircle, DrawRectangle, DrawHexagon </verb></tscreen> See: <tt><ref id=".ADDR" name=".ADDR"></tt> @@ -2655,13 +2719,13 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .if foo = 1 - ... - .elseif bar = 1 - ... - .else - .fatal "Must define foo or bar!" - .endif + .if foo = 1 + ... + .elseif bar = 1 + ... + .else + .fatal "Must define foo or bar!" + .endif </verb></tscreen> See also: <tt><ref id=".ERROR" name=".ERROR"></tt>, @@ -2678,7 +2742,7 @@ Here's a list of all control commands and a description, what they do: enabled it, so using <tscreen><verb> - .FEATURE xxx + .FEATURE xxx </verb></tscreen> will enable the feature until end of assembly is reached. @@ -2695,10 +2759,26 @@ Here's a list of all control commands and a description, what they do: <tag><tt>at_in_identifiers</tt><label id="at_in_identifiers"></tag> - Accept the at character (`@') as a valid character in identifiers. The + Accept the at character ('@') as a valid character in identifiers. The at character is not allowed to start an identifier, even with this feature enabled. + <tag><tt>bracket_as_indirect</tt><label id="bracket_as_indirect"></tag> + + Use <tt>[]</tt> instead of <tt>()</tt> for the indirect addressing modes. + Example: + + <tscreen><verb> + lda [$82] + lda [$82,x] + lda [$82],y + jmp [$fffe] + jmp [table,x] + </verb></tscreen> + <em/Note:/ This should not be used in 65186 mode because it conflicts with + the 65816 instruction syntax for far addressing. See the section covering + <tt/<ref id="address-sizes" name="address sizes">/ for more information. + <tag><tt>c_comments</tt><label id="c_comments"></tag> Allow C like comments using <tt>/*</tt> and <tt>*/</tt> as left and right @@ -2714,13 +2794,13 @@ Here's a list of all control commands and a description, what they do: <tag><tt>dollar_in_identifiers</tt><label id="dollar_in_identifiers"></tag> - Accept the dollar sign (`$') as a valid character in identifiers. The + Accept the dollar sign ('$') as a valid character in identifiers. The dollar character is not allowed to start an identifier, even with this feature enabled. <tag><tt>dollar_is_pc</tt><label id="dollar_is_pc"></tag> - The dollar sign may be used as an alias for the star (`*'), which + The dollar sign may be used as an alias for the star ('*'), which gives the value of the current PC in expressions. Note: Assignment to the pseudo variable is not allowed. @@ -2738,7 +2818,7 @@ Here's a list of all control commands and a description, what they do: <tag><tt>leading_dot_in_identifiers</tt><label id="leading_dot_in_identifiers"></tag> - Accept the dot (`.') as the first character of an identifier. This may be + Accept the dot ('.') as the first character of an identifier. This may be used for example to create macro names that start with a dot emulating control directives of other assemblers. Note however, that none of the reserved keywords built into the assembler, that starts with a dot, may be @@ -2774,12 +2854,29 @@ Here's a list of all control commands and a description, what they do: <tag><tt>pc_assignment</tt><label id="pc_assignment"></tag> - Allow assignments to the PC symbol (`*' or `$' if <tt/dollar_is_pc/ + Allow assignments to the PC symbol ('*' or '$' if <tt/dollar_is_pc/ is enabled). Such an assignment is handled identical to the <tt><ref id=".ORG" name=".ORG"></tt> command (which is usually not needed, so just removing the lines with the assignments may also be an option when porting code written for older assemblers). + <tag><tt>string_escapes</tt><label id="string_escapes"></tag> + + Allow C-style backslash escapes within string constants to embed + special characters. The following escapes are accepted: + <itemize> + <item><tt>\\</tt> backslash (<tt>$5C</tt>) + <item><tt>\'</tt> single quote (<tt>$27</tt>) + <item><tt>\"</tt> double quote (<tt>$22</tt>) + <item><tt>\t</tt> tab (<tt>$09</tt>) + <item><tt>\r</tt> carriage return (<tt>$0D</tt>) + <item><tt>\n</tt> newline (<tt>$0A</tt>) + <item><tt>\xNN</tt> (<tt>$NN</tt>) + </itemize> + + Note that string escapes are converted to platform-specific characters in + the same way that other characters are converted. + <tag><tt>ubiquitous_idents</tt><label id="ubiquitous_idents"></tag> Allow the use of instructions names as names for macros and symbols. This @@ -2809,7 +2906,7 @@ Here's a list of all control commands and a description, what they do: assembler, the features <verb> - labels_without_colons, pc_assignment, loose_char_term + labels_without_colons, pc_assignment, loose_char_term </verb> may be helpful. They do not make ca65 completely compatible, so you may not @@ -2829,9 +2926,9 @@ Here's a list of all control commands and a description, what they do: The command is followed by one of the keywords <tscreen><verb> - author - comment - compiler + author + comment + compiler </verb></tscreen> a comma and a string. The option is written into the object file @@ -2842,9 +2939,9 @@ Here's a list of all control commands and a description, what they do: Examples: <tscreen><verb> - .fileopt comment, "Code stolen from my brother" - .fileopt compiler, "BASIC 2.0" - .fopt author, "J. R. User" + .fileopt comment, "Code stolen from my brother" + .fileopt compiler, "BASIC 2.0" + .fopt author, "J. R. User" </verb></tscreen> @@ -2860,7 +2957,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .forceimport needthisone, needthistoo + .forceimport needthisone, needthistoo </verb></tscreen> See: <tt><ref id=".IMPORT" name=".IMPORT"></tt> @@ -2877,7 +2974,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .global foo, bar + .global foo, bar </verb></tscreen> @@ -2893,7 +2990,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .globalzp foo, bar + .globalzp foo, bar </verb></tscreen> <sect1><tt>.HIBYTES</tt><label id=".HIBYTES"><p> @@ -2906,14 +3003,14 @@ Here's a list of all control commands and a description, what they do: <tscreen><verb> .lobytes $1234, $2345, $3456, $4567 - .hibytes $fedc, $edcb, $dcba, $cba9 + .hibytes $fedc, $edcb, $dcba, $cba9 </verb></tscreen> which is equivalent to <tscreen><verb> .byte $34, $45, $56, $67 - .byte $fe, $ed, $dc, $cb + .byte $fe, $ed, $dc, $cb </verb></tscreen> Example: @@ -2921,15 +3018,15 @@ Here's a list of all control commands and a description, what they do: <tscreen><verb> .define MyTable TableItem0, TableItem1, TableItem2, TableItem3 - TableLookupLo: .lobytes MyTable - TableLookupHi: .hibytes MyTable + TableLookupLo: .lobytes MyTable + TableLookupHi: .hibytes MyTable </verb></tscreen> which is equivalent to <tscreen><verb> TableLookupLo: .byte <TableItem0, <TableItem1, <TableItem2, <TableItem3 - TableLookupHi: .byte >TableItem0, >TableItem1, >TableItem2, >TableItem3 + TableLookupHi: .byte >TableItem0, >TableItem1, >TableItem2, >TableItem3 </verb></tscreen> See also: <tt><ref id=".BYTE" name=".BYTE"></tt>, @@ -2974,7 +3071,7 @@ Here's a list of all control commands and a description, what they do: Conditional assembly: Check if there are any remaining tokens in this line, and evaluate to FALSE if this is the case, and to TRUE otherwise. If the condition is not true, further lines are not assembled until an <tt><ref - id=".ELSE" name=".ESLE"></tt>, <tt><ref id=".ELSEIF" name=".ELSEIF"></tt> or + id=".ELSE" name=".ELSE"></tt>, <tt><ref id=".ELSEIF" name=".ELSEIF"></tt> or <tt><ref id=".ENDIF" name=".ENDIF"></tt> directive. This command is often used to check if a macro parameter was given. Since an @@ -2984,13 +3081,13 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .macro arg1, arg2 - .ifblank arg2 - lda #arg1 - .else - lda #arg2 - .endif - .endmacro + .macro arg1, arg2 + .ifblank arg2 + lda #arg1 + .else + lda #arg2 + .endif + .endmacro </verb></tscreen> See also: <tt><ref id=".BLANK" name=".BLANK"></tt> @@ -3011,7 +3108,7 @@ Here's a list of all control commands and a description, what they do: <sect1><tt>.IFDEF</tt><label id=".IFDEF"><p> Conditional assembly: Check if a symbol is defined. Must be followed by - a symbol name. The condition is true if the the given symbol is already + a symbol name. The condition is true if the given symbol is already defined, and false otherwise. See also: <tt><ref id=".DEFINED" name=".DEFINED"></tt> @@ -3032,12 +3129,12 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .macro arg1, arg2 - lda #arg1 - .ifnblank arg2 - lda #arg2 - .endif - .endmacro + .macro arg1, arg2 + lda #arg1 + .ifnblank arg2 + lda #arg2 + .endif + .endmacro </verb></tscreen> See also: <tt><ref id=".BLANK" name=".BLANK"></tt> @@ -3046,7 +3143,7 @@ Here's a list of all control commands and a description, what they do: <sect1><tt>.IFNDEF</tt><label id=".IFNDEF"><p> Conditional assembly: Check if a symbol is defined. Must be followed by - a symbol name. The condition is true if the the given symbol is not + a symbol name. The condition is true if the given symbol is not defined, and false otherwise. See also: <tt><ref id=".DEFINED" name=".DEFINED"></tt> @@ -3055,7 +3152,7 @@ Here's a list of all control commands and a description, what they do: <sect1><tt>.IFNREF</tt><label id=".IFNREF"><p> Conditional assembly: Check if a symbol is referenced. Must be followed - by a symbol name. The condition is true if if the the given symbol was + by a symbol name. The condition is true if the given symbol was not referenced before, and false otherwise. See also: <tt><ref id=".REFERENCED" name=".REFERENCED"></tt> @@ -3067,6 +3164,12 @@ Here's a list of all control commands and a description, what they do: (see <tt><ref id=".P02" name=".P02"></tt> command). +<sect1><tt>.IFP4510</tt><label id=".IFP4510"><p> + + Conditional assembly: Check if the assembler is currently in 4510 mode + (see <tt><ref id=".P4510" name=".P4510"></tt> command). + + <sect1><tt>.IFP816</tt><label id=".IFP816"><p> Conditional assembly: Check if the assembler is currently in 65816 mode @@ -3079,6 +3182,12 @@ Here's a list of all control commands and a description, what they do: (see <tt><ref id=".PC02" name=".PC02"></tt> command). +<sect1><tt>.IFPDTV</tt><label id=".IFPDTV"><p> + + Conditional assembly: Check if the assembler is currently in 6502DTV mode + (see <tt><ref id=".PDTV" name=".PDTV"></tt> command). + + <sect1><tt>.IFPSC02</tt><label id=".IFPSC02"><p> Conditional assembly: Check if the assembler is currently in 65SC02 mode @@ -3088,7 +3197,7 @@ Here's a list of all control commands and a description, what they do: <sect1><tt>.IFREF</tt><label id=".IFREF"><p> Conditional assembly: Check if a symbol is referenced. Must be followed - by a symbol name. The condition is true if if the the given symbol was + by a symbol name. The condition is true if the given symbol was referenced before, and false otherwise. This command may be used to build subroutine libraries in include files @@ -3097,14 +3206,15 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .ifref ToHex ; If someone used this subroutine - ToHex: tay ; Define subroutine - lda HexTab,y - rts - .endif + .ifref ToHex ; If someone used this subroutine + ToHex: tay ; Define subroutine + lda HexTab,y + rts + .endif </verb></tscreen> - See also: <tt><ref id=".REFERENCED" name=".REFERENCED"></tt> + See also: <tt><ref id=".REFERENCED" name=".REFERENCED"></tt>, and + <tt><ref id=".REFERTO" name=".REFERTO"></tt> <sect1><tt>.IMPORT</tt><label id=".IMPORT"><p> @@ -3116,7 +3226,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .import foo + .import foo .import bar: zeropage </verb></tscreen> @@ -3132,7 +3242,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .importzp foo, bar + .importzp foo, bar </verb></tscreen> See: <tt><ref id=".IMPORT" name=".IMPORT"></tt> @@ -3150,14 +3260,14 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - ; Include whole file - .incbin "sprites.dat" + ; Include whole file + .incbin "sprites.dat" - ; Include file starting at offset 256 - .incbin "music.dat", $100 + ; Include file starting at offset 256 + .incbin "music.dat", $100 - ; Read 100 bytes starting at offset 200 - .incbin "graphics.dat", 200, 100 + ; Read 100 bytes starting at offset 200 + .incbin "graphics.dat", 200, 100 </verb></tscreen> @@ -3168,7 +3278,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .include "subs.inc" + .include "subs.inc" </verb></tscreen> @@ -3193,8 +3303,8 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .interruptor IrqHandler - .interruptor Handler, 16 + .interruptor IrqHandler + .interruptor Handler, 16 </verb></tscreen> See the <tt><ref id=".CONDES" name=".CONDES"></tt> command and the separate @@ -3202,23 +3312,6 @@ Here's a list of all control commands and a description, what they do: the feature in more detail. -<sect1><tt>.ISMNEM, .ISMNEMONIC</tt><label id=".ISMNEMONIC"><p> - - Builtin function. The function expects an identifier as argument in braces. - The argument is evaluated, and the function yields "true" if the identifier - is defined as an instruction mnemonic that is recognized by the assembler. - Example: - - <tscreen><verb> - .if .not .ismnemonic(ina) - .macro ina - clc - adc #$01 - .endmacro - .endif - </verb></tscreen> - - <sect1><tt>.LINECONT</tt><label id=".LINECONT"><p> Switch on or off line continuations using the backslash character @@ -3232,10 +3325,10 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .linecont + ; Allow line continuations + .linecont + ; Allow line continuations - lda \ - #$20 ; This is legal now + lda \ + #$20 ; This is legal now </verb></tscreen> @@ -3253,7 +3346,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .list on ; Enable listing output + .list on ; Enable listing output </verb></tscreen> @@ -3268,12 +3361,28 @@ Here's a list of all control commands and a description, what they do: Examples: <tscreen><verb> - .listbytes unlimited ; List all bytes - .listbytes 12 ; List the first 12 bytes - .incbin "data.bin" ; Include large binary file + .listbytes unlimited ; List all bytes + .listbytes 12 ; List the first 12 bytes + .incbin "data.bin" ; Include large binary file </verb></tscreen> +<sect1><tt>.LITERAL</tt><label id=".LITERAL"><p> + + Define byte sized data. Must be followed by a sequence of (byte ranged) + expressions or strings. Strings will disregard the current character + mapping definition and will be interpreted literally. + + Example: + + <tscreen><verb> + .literal "Hello " + .literal "world", $0D, $00 + </verb></tscreen> + +See: <tt><ref id=".ASCIIZ" name=".ASCIIZ"></tt>,<tt><ref id=".BYTE" name=".BYTE"></tt> + + <sect1><tt>.LOBYTES</tt><label id=".LOBYTES"><p> Define byte sized data by extracting only the low byte (that is, bits 0-7) from @@ -3284,14 +3393,14 @@ Here's a list of all control commands and a description, what they do: <tscreen><verb> .lobytes $1234, $2345, $3456, $4567 - .hibytes $fedc, $edcb, $dcba, $cba9 + .hibytes $fedc, $edcb, $dcba, $cba9 </verb></tscreen> which is equivalent to <tscreen><verb> .byte $34, $45, $56, $67 - .byte $fe, $ed, $dc, $cb + .byte $fe, $ed, $dc, $cb </verb></tscreen> Example: @@ -3299,15 +3408,15 @@ Here's a list of all control commands and a description, what they do: <tscreen><verb> .define MyTable TableItem0, TableItem1, TableItem2, TableItem3 - TableLookupLo: .lobytes MyTable - TableLookupHi: .hibytes MyTable + TableLookupLo: .lobytes MyTable + TableLookupHi: .hibytes MyTable </verb></tscreen> which is equivalent to <tscreen><verb> TableLookupLo: .byte <TableItem0, <TableItem1, <TableItem2, <TableItem3 - TableLookupHi: .byte >TableItem0, >TableItem1, >TableItem2, >TableItem3 + TableLookupHi: .byte >TableItem0, >TableItem1, >TableItem2, >TableItem3 </verb></tscreen> See also: <tt><ref id=".BYTE" name=".BYTE"></tt>, @@ -3348,15 +3457,15 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .localchar '?' + .localchar '?' - Clear: lda #$00 ; Global label - ?Loop: sta Mem,y ; Local label - dey - bne ?Loop ; Ok - rts - Sub: ... ; New global label - bne ?Loop ; ERROR: Unknown identifier! + Clear: lda #$00 ; Global label + ?Loop: sta Mem,y ; Local label + dey + bne ?Loop ; Ok + rts + Sub: ... ; New global label + bne ?Loop ; ERROR: Unknown identifier! </verb></tscreen> @@ -3370,8 +3479,8 @@ Here's a list of all control commands and a description, what they do: atari Defines the scrcode macro. cbm Defines the scrcode macro. cpu Defines constants for the .CPU variable. - generic Defines generic macroes like add, sub, and blt. - longbranch Defines conditional long-jump macroes. + generic Defines generic macros like add, sub, and blt. + longbranch Defines conditional long-jump macros. </verb></tscreen> Including a macro package twice, or including a macro package that @@ -3380,10 +3489,10 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .macpack longbranch ; Include macro package + .macpack longbranch ; Include macro package - cmp #$20 ; Set condition codes - jne Label ; Jump long on condition + cmp #$20 ; Set condition codes + jne Label ; Jump long on condition </verb></tscreen> Macro packages are explained in more detail in section <ref @@ -3400,7 +3509,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .macro ldax arg ; Define macro ldax + .macro ldax arg ; Define macro ldax lda arg ldx arg+1 </verb></tscreen> @@ -3430,7 +3539,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .org $7FF ; Emit code starting at $7FF + .org $7FF ; Emit code starting at $7FF </verb></tscreen> @@ -3443,7 +3552,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .out "This code was written by the codebuster(tm)" + .out "This code was written by the codebuster(tm)" </verb></tscreen> See also: <tt><ref id=".ERROR" name=".ERROR"></tt>, @@ -3458,7 +3567,18 @@ Here's a list of all control commands and a description, what they do: <tt><ref id="option--cpu" name="--cpu"></tt> command line option. See: <tt><ref id=".PC02" name=".PC02"></tt>, <tt><ref id=".PSC02" - name=".PSC02"></tt> and <tt><ref id=".P816" name=".P816"></tt> + name=".PSC02"></tt>, <tt><ref id=".P816" name=".P816"></tt> and + <tt><ref id=".P4510" name=".P4510"></tt> + + +<sect1><tt>.P4510</tt><label id=".P4510"><p> + + Enable the 4510 instruction set. This is a superset of the 65C02 and + 6502 instruction sets. + + See: <tt><ref id=".P02" name=".P02"></tt>, <tt><ref id=".PSC02" + name=".PSC02"></tt>, <tt><ref id=".PC02" name=".PC02"></tt> and + <tt><ref id=".P816" name=".P816"></tt> <sect1><tt>.P816</tt><label id=".P816"><p> @@ -3467,7 +3587,8 @@ Here's a list of all control commands and a description, what they do: 6502 instruction sets. See: <tt><ref id=".P02" name=".P02"></tt>, <tt><ref id=".PSC02" - name=".PSC02"></tt> and <tt><ref id=".PC02" name=".PC02"></tt> + name=".PSC02"></tt>, <tt><ref id=".PC02" name=".PC02"></tt> and + <tt><ref id=".P4510" name=".P4510"></tt> <sect1><tt>.PAGELEN, .PAGELENGTH</tt><label id=".PAGELENGTH"><p> @@ -3483,9 +3604,9 @@ Here's a list of all control commands and a description, what they do: Examples: <tscreen><verb> - .pagelength 66 ; Use 66 lines per listing page + .pagelength 66 ; Use 66 lines per listing page - .pagelength unlimited ; Unlimited page length + .pagelength unlimited ; Unlimited page length </verb></tscreen> @@ -3495,7 +3616,31 @@ Here's a list of all control commands and a description, what they do: 6502 and 65SC02 instructions. See: <tt><ref id=".P02" name=".P02"></tt>, <tt><ref id=".PSC02" - name=".PSC02"></tt> and <tt><ref id=".P816" name=".P816"></tt> + name=".PSC02"></tt>, <tt><ref id=".P816" name=".P816"></tt> and + <tt><ref id=".P4510" name=".P4510"></tt> + + +<sect1><tt>.PDTV</tt><label id=".PDTV"><p> + + Enable the 6502DTV instruction set. This is a superset of the 6502 + instruction set. + + See: <tt><ref id=".P02" name=".P02"></tt> + + +<sect1><tt>.POPCHARMAP</tt><label id=".POPCHARMAP"><p> + + Pop the last character mapping from the stack, and activate it. + + This command will switch back to the character mapping that was last pushed onto the + character mapping stack using the <tt><ref id=".PUSHCHARMAP" name=".PUSHCHARMAP"></tt> + command, and remove this entry from the stack. + + The assembler will print an error message if the mappting stack is empty when + this command is issued. + + See: <tt><ref id=".CHARMAP" name=".CHARMAP"></tt>, <tt><ref id=".PUSHCHARMAP" + name=".PUSHCHARMAP"></tt> <sect1><tt>.POPCPU</tt><label id=".POPCPU"><p> @@ -3547,15 +3692,15 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .proc Clear ; Define Clear subroutine, start new level - lda #$00 - L1: sta Mem,y ; L1 is local and does not cause a - ; duplicate symbol error if used in other - ; places - dey - bne L1 ; Reference local symbol - rts - .endproc ; Leave lexical level + .proc Clear ; Define Clear subroutine, start new level + lda #$00 + L1: sta Mem,y ; L1 is local and does not cause a + ; duplicate symbol error if used in other + ; places + dey + bne L1 ; Reference local symbol + rts + .endproc ; Leave lexical level </verb></tscreen> See: <tt/<ref id=".ENDPROC" name=".ENDPROC">/ and <tt/<ref id=".SCOPE" @@ -3568,7 +3713,24 @@ Here's a list of all control commands and a description, what they do: 6502 instructions. See: <tt><ref id=".P02" name=".P02"></tt>, <tt><ref id=".PC02" - name=".PC02"></tt> and <tt><ref id=".P816" name=".P816"></tt> + name=".PC02"></tt>, <tt><ref id=".P816" name=".P816"></tt> and + <tt><ref id=".P4510" name=".P4510"></tt> + + +<sect1><tt>.PUSHCHARMAP</tt><label id=".PUSHCHARMAP"><p> + + Push the currently active character mapping onto a stack. The stack has a size of 16 + entries. + + <tt/.PUSHCHARMAP/ allows together with <tt><ref id=".POPCHARMAP" + name=".POPCHARMAP"></tt> to switch to another character mapping and to restore the old + character mapping later, without knowledge of the current mapping. + + The assembler will print an error message if the character mapping stack is already full, + when this command is issued. + + See: <tt><ref id=".CHARMAP" name=".CHARMAP"></tt>, <tt><ref id=".POPCHARMAP" + name=".POPCHARMAP"></tt> <sect1><tt>.PUSHCPU</tt><label id=".PUSHCPU"><p> @@ -3603,6 +3765,46 @@ Here's a list of all control commands and a description, what they do: See: <tt><ref id=".POPSEG" name=".POPSEG"></tt> +<sect1><tt>.REFERTO, .REFTO</tt><label id=".REFERTO"><p> + + Mark a symbol as referenced. + + It is useful in combination with the <tt><ref id=".IFREF" name=".IFREF"></tt> + command. A subroutine with two entry points can be created. When the first + entry point is called, it sets some default value as an argument, and falls + through into the second entry point. <tt>.REFERTO</tt> helps to ensure that + the second part is included into binary when only the first entry point is + actually used from the code. + + Example: + + <tscreen><verb> + .ifref NegateValue ; If this subroutine is used + NegateValue: ; Define it + lda #0 + sec + sbc Value + .ifref ResetValue ; If the ResetValue is also used + jmp SetValue ; Jump over it + .else + .refto SetValue ; Ensure that SetValue will be included + .endif + .endif + + .ifref ResetValue ; If this subroutine is used + ResetValue: ; Define it + lda #0 ; Set a default value + .refto SetValue ; Ensure that SetValue will be included + .endif + + .ifref SetValue ; If this or previous subroutine is used + SetValue: + sta Value + rts + .endif + </verb></tscreen> + + <sect1><tt>.RELOC</tt><label id=".RELOC"><p> Switch back to relocatable mode. See the <tt><ref id=".ORG" @@ -3629,11 +3831,11 @@ Here's a list of all control commands and a description, what they do: characters of the string are XORed by the value $55. <tscreen><verb> - .macro Crypt Arg - .repeat .strlen(Arg), I - .byte .strat(Arg, I) ^ $55 - .endrep - .endmacro + .macro Crypt Arg + .repeat .strlen(Arg), I + .byte .strat(Arg, I) ^ $55 + .endrep + .endmacro </verb></tscreen> See: <tt><ref id=".ENDREPEAT" name=".ENDREPEAT"></tt> @@ -3651,8 +3853,8 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - ; Reserve 12 bytes of memory with value $AA - .res 12, $AA + ; Reserve 12 bytes of memory with value $AA + .res 12, $AA </verb></tscreen> @@ -3662,7 +3864,7 @@ Here's a list of all control commands and a description, what they do: "RODATA", so this is a shortcut for <tscreen><verb> - .segment "RODATA" + .segment "RODATA" </verb></tscreen> The RODATA segment is a segment that is used by the compiler for @@ -3690,11 +3892,11 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .scope Error ; Start new scope named Error + .scope Error ; Start new scope named Error None = 0 ; No error File = 1 ; File error Parse = 2 ; Parse error - .endscope ; Close lexical level + .endscope ; Close lexical level ... lda #Error::File ; Use symbol from scope Error @@ -3728,7 +3930,7 @@ Here's a list of all control commands and a description, what they do: page and direct (short) addressing is possible for data in this segment. Beware: Only labels in a segment with the zeropage attribute are marked - as reachable by short addressing. The `*' (PC counter) operator will + as reachable by short addressing. The '*' (PC counter) operator will work as in other segments and will create absolute variable values. Please note that a segment cannot have two different address sizes. A @@ -3737,10 +3939,10 @@ Here's a list of all control commands and a description, what they do: Examples: <tscreen><verb> - .segment "ROM2" ; Switch to ROM2 segment - .segment "ZP2": zeropage ; New direct segment - .segment "ZP2" ; Ok, will use last attribute - .segment "ZP2": absolute ; Error, redecl mismatch + .segment "ROM2" ; Switch to ROM2 segment + .segment "ZP2": zeropage ; New direct segment + .segment "ZP2" ; Ok, will use last attribute + .segment "ZP2": absolute ; Error, redecl mismatch </verb></tscreen> See: <tt><ref id=".BSS" name=".BSS"></tt>, <tt><ref id=".CODE" @@ -3760,15 +3962,17 @@ Here's a list of all control commands and a description, what they do: Switch the CPU instruction set. The command is followed by a string that specifies the CPU. Possible values are those that can also be supplied to the <tt><ref id="option--cpu" name="--cpu"></tt> command line option, - namely: 6502, 6502X, 65SC02, 65C02, 65816 and HuC6280. + namely: 6502, 6502X, 6502DTV, 65SC02, 65C02, 65816, 4510 and HuC6280. See: <tt><ref id=".CPU" name=".CPU"></tt>, <tt><ref id=".IFP02" name=".IFP02"></tt>, + <tt><ref id=".IFPDTV" name=".IFPDTV"></tt>, <tt><ref id=".IFP816" name=".IFP816"></tt>, <tt><ref id=".IFPC02" name=".IFPC02"></tt>, <tt><ref id=".IFPSC02" name=".IFPSC02"></tt>, <tt><ref id=".P02" name=".P02"></tt>, <tt><ref id=".P816" name=".P816"></tt>, + <tt><ref id=".P4510" name=".P4510"></tt>, <tt><ref id=".PC02" name=".PC02"></tt>, <tt><ref id=".PSC02" name=".PSC02"></tt> @@ -3799,8 +4003,8 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .smart ; Be smart - .smart - ; Stop being smart + .smart ; Be smart + .smart - ; Stop being smart </verb></tscreen> See: <tt><ref id=".A16" name=".A16"></tt>, @@ -3870,17 +4074,17 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .macro jne target - .local L1 - .ifndef target - .warning "Forward jump in jne, cannot optimize!" - beq L1 - jmp target - L1: - .else - ... - .endif - .endmacro + .macro jne target + .local L1 + .ifndef target + .warning "Forward jump in jne, cannot optimize!" + beq L1 + jmp target + L1: + .else + ... + .endif + .endmacro </verb></tscreen> See also: <tt><ref id=".ERROR" name=".ERROR"></tt>, @@ -3896,7 +4100,7 @@ Here's a list of all control commands and a description, what they do: Example: <tscreen><verb> - .word $0D00, $AF13, _Clear + .word $0D00, $AF13, _Clear </verb></tscreen> @@ -4217,34 +4421,41 @@ different: <itemize> -<item> Macros defined with <tt><ref id=".DEFINE" name=".DEFINE"></tt> may not - span more than a line. You may use line continuation (see <tt><ref - id=".LINECONT" name=".LINECONT"></tt>) to spread the definition over - more than one line for increased readability, but the macro itself - may not contain an end-of-line token. +<item> Macros defined with <tt><ref id=".DEFINE" name=".DEFINE"></tt> may not + span more than a line. You may use line continuation (see <tt><ref + id=".LINECONT" name=".LINECONT"></tt>) to spread the definition over + more than one line for increased readability, but the macro itself + may not contain an end-of-line token. -<item> Macros defined with <tt><ref id=".DEFINE" name=".DEFINE"></tt> share - the name space with classic macros, but they are detected and replaced - at the scanner level. While classic macros may be used in every place, - where a mnemonic or other directive is allowed, <tt><ref id=".DEFINE" - name=".DEFINE"></tt> style macros are allowed anywhere in a line. So - they are more versatile in some situations. +<item> Macros defined with <tt><ref id=".DEFINE" name=".DEFINE"></tt> share + the name space with classic macros, but they are detected and replaced + at the scanner level. While classic macros may be used in every place, + where a mnemonic or other directive is allowed, <tt><ref id=".DEFINE" + name=".DEFINE"></tt> style macros are allowed anywhere in a line. So + they are more versatile in some situations. -<item> <tt><ref id=".DEFINE" name=".DEFINE"></tt> style macros may take - parameters. While classic macros may have empty parameters, this is - not true for <tt><ref id=".DEFINE" name=".DEFINE"></tt> style macros. - For this macro type, the number of actual parameters must match - exactly the number of formal parameters. +<item> <tt><ref id=".DEFINE" name=".DEFINE"></tt> style macros may take + parameters. While classic macros may have empty parameters, this is + not true for <tt><ref id=".DEFINE" name=".DEFINE"></tt> style macros. + For this macro type, the number of actual parameters must match + exactly the number of formal parameters. - To make this possible, formal parameters are enclosed in braces when - defining the macro. If there are no parameters, the empty braces may - be omitted. + To make this possible, formal parameters are enclosed in parentheses when + defining the macro. If there are no parameters, the empty parentheses may + be omitted. -<item> Since <tt><ref id=".DEFINE" name=".DEFINE"></tt> style macros may not - contain end-of-line tokens, there are things that cannot be done. They - may not contain several processor instructions for example. So, while - some things may be done with both macro types, each type has special - usages. The types complement each other. +<item> Since <tt><ref id=".DEFINE" name=".DEFINE"></tt> style macros may not + contain end-of-line tokens, there are things that cannot be done. They + may not contain several processor instructions for example. So, while + some things may be done with both macro types, each type has special + usages. The types complement each other. + +<item> Parentheses work differently from C macros. + The common practice of wrapping C macros in parentheses may cause + unintended problems here, such as accidentally implying an + indirect addressing mode. While the definition of a macro requires + parentheses around its argument list, when invoked they should not be + included. </itemize> @@ -4278,18 +4489,42 @@ Macros with parameters may also be useful: DEBUG "Assembling include file #3" </verb></tscreen> -Note that, while formal parameters have to be placed in braces, this is -not true for the actual parameters. Beware: Since the assembler cannot -detect the end of one parameter, only the first token is used. If you -don't like that, use classic macros instead: +Note that, while formal parameters have to be placed in parentheses, +the actual argument used when invoking the macro should not be. +The invoked arguments are separated by commas only; if parentheses are +used by accident, they will become part of the replaced token. + +If you wish to have an expression follow the macro invocation, the +last parameter can be enclosed in curly braces {} to indicate the end of that +argument. + +Examples: <tscreen><verb> -.macro DEBUG message - .out message -.endmacro +.define COMBINE(ta,tb,tc) ta+tb*10+tc*100 + +.word COMBINE 5,6,7 ; 5+6*10+7*100 = 765 +.word COMBINE(5,6,7) ; (5+6*10+7)*100 = 7200 ; incorrect use of parentheses +.word COMBINE 5,6,7+1 ; 5+6*10+7+1*100 = 172 +.word COMBINE 5,6,{7}+1 ; 5+6*10+7*100+1 = 766 ; {} encloses the argument +.word COMBINE 5,6-2,7 ; 5+6-2*10+7*100 = 691 +.word COMBINE 5,(6-2),7 ; 5+(6-2)*10+7*100 = 745 +.word COMBINE 5,6,7+COMBINE 0,1,2 ; 5+6*10+7+0+1*10+2*100*100 = 20082 +.word COMBINE 5,6,{7}+COMBINE 0,1,2 ; 5+6*10+7*100+0+1*10+2*100 = 975 </verb></tscreen> -(That is an example where a problem can be solved with both macro types). +With C macros it is common to enclose the results in parentheses to +prevent unintended interactions with the text of the arguments, but +additional care must be taken in this assembly context where parentheses +may alter the meaning of a statement. In particular, indirect addressing modes +may be accidentally implied: + +<tscreen><verb> +.define DUO(ta,tb) (ta+(tb*10)) + + lda DUO(5,4), Y ; LDA (indirect), Y + lda 0+DUO(5,4), Y ; LDA absolute indexed, Y +</verb></tscreen> <sect1>Characters in macros<p> @@ -4359,19 +4594,19 @@ are: <sect1><tt>.MACPACK generic</tt><p> -This macro package defines macroes that are useful in almost any program. -Currently defined macroes are: +This macro package defines macros that are useful in almost any program. +Currently defined macros are: <tscreen><verb> .macro add Arg ; add without carry - clc - adc Arg - .endmacro + clc + adc Arg + .endmacro .macro sub Arg ; subtract without borrow - sec - sbc Arg - .endmacro + sec + sbc Arg + .endmacro .macro bge Arg ; branch on greater-than or equal bcs Arg @@ -4411,14 +4646,14 @@ definition for the "<tt/jeq/" macro, the other macros are built using the same scheme: <tscreen><verb> - .macro jeq Target - .if .def(Target) .and ((*+2)-(Target) <= 127) - beq Target - .else - bne *+5 - jmp Target - .endif - .endmacro + .macro jeq Target + .if .def(Target) .and ((*+2)-(Target) <= 127) + beq Target + .else + bne *+5 + jmp Target + .endif + .endmacro </verb></tscreen> All macros expand to a short branch, if the label is already defined (back @@ -4429,11 +4664,17 @@ jump to the actual branch target. The package defines the following macros: <tscreen><verb> - jeq, jne, jmi, jpl, jcs, jcc, jvs, jvc + jeq, jne, jmi, jpl, jcs, jcc, jvs, jvc </verb></tscreen> +<sect1><tt>.MACPACK apple2</tt><p> + +This macro package defines a macro named <tt/scrcode/. It takes a string +as argument and places this string into memory translated into screen codes. + + <sect1><tt>.MACPACK atari</tt><p> This macro package defines a macro named <tt/scrcode/. It takes a string @@ -4459,6 +4700,8 @@ each supported CPU a constant similar to CPU_65816 CPU_SWEET16 CPU_HUC6280 + CPU_4510 + CPU_6502DTV </verb></tscreen> is defined. These constants may be used to determine the exact type of the @@ -4472,6 +4715,8 @@ another constant is defined: CPU_ISET_65816 CPU_ISET_SWEET16 CPU_ISET_HUC6280 + CPU_ISET_4510 + CPU_ISET_6502DTV </verb></tscreen> The value read from the <tt/<ref id=".CPU" name=".CPU">/ pseudo variable may @@ -4516,7 +4761,9 @@ compiler, depending on the target system selected: <itemize> <item><tt/__APPLE2__/ - Target system is <tt/apple2/ or <tt/apple2enh/ <item><tt/__APPLE2ENH__/ - Target system is <tt/apple2enh/ +<item><tt/__ATARI2600__/ - Target system is <tt/atari2600/ <item><tt/__ATARI5200__/ - Target system is <tt/atari5200/ +<item><tt/__ATARI7800__/ - Target system is <tt/atari7800/ <item><tt/__ATARI__/ - Target system is <tt/atari/ or <tt/atarixl/ <item><tt/__ATARIXL__/ - Target system is <tt/atarixl/ <item><tt/__ATMOS__/ - Target system is <tt/atmos/ @@ -4524,9 +4771,10 @@ compiler, depending on the target system selected: <item><tt/__C128__/ - Target system is <tt/c128/ <item><tt/__C16__/ - Target system is <tt/c16/ or <tt/plus4/ <item><tt/__C64__/ - Target system is <tt/c64/ -<item><tt/__CBM__/ - Target is a Commodore system +<item><tt/__CBM__/ - Target is a Commodore or Commodore-alike system <item><tt/__CBM510__/ - Target system is <tt/cbm510/ <item><tt/__CBM610__/ - Target system is <tt/cbm610/ +<item><tt/__CX16__/ - Target system is <tt/cx16/ <item><tt/__GEOS__/ - Target is a GEOS system <item><tt/__GEOS_APPLE__/ - Target system is <tt/geos-apple/ <item><tt/__GEOS_CBM__/ - Target system is <tt/geos-cbm/ @@ -4539,26 +4787,27 @@ compiler, depending on the target system selected: <item><tt/__SIM6502__/ - Target system is <tt/sim6502/ <item><tt/__SIM65C02__/ - Target system is <tt/sim65c02/ <item><tt/__SUPERVISION__/ - Target system is <tt/supervision/ +<item><tt/__SYM1__/ - Target system is <tt/sym1/ <item><tt/__VIC20__/ - Target system is <tt/vic20/ </itemize> + <sect>Structs and unions<label id="structs"><p> <sect1>Structs and unions Overview<p> Structs and unions are special forms of <ref id="scopes" name="scopes">. They -are to some degree comparable to their C counterparts. Both have a list of -members. Each member allocates storage and may optionally have a name, which, -in case of a struct, is the offset from the beginning and, in case of a union, -is always zero. +are, to some degree, comparable to their C counterparts. Both have a list of +members. Each member allocates storage, and optionally may have a name whose +value, in the case of a struct, usually is the storage offset from the +beginning, and in the case of a union, doesn't change, and usually is zero. <sect1>Declaration<p> Here is an example for a very simple struct with two members and a total size of 4 bytes: - <tscreen><verb> .struct Point xcoord .word @@ -4566,10 +4815,9 @@ of 4 bytes: .endstruct </verb></tscreen> -A union shares the total space between all its members, its size is the same +A union shares the total space between all its members; its size is the same as that of the largest member. The offset of all members relative to the union is zero. - <tscreen><verb> .union Entry index .word @@ -4577,13 +4825,12 @@ is zero. .endunion </verb></tscreen> -A struct or union must not necessarily have a name. If it is anonymous, no -local scope is opened, the identifiers used to name the members are placed +A struct or union may not necessarily have a name. If it is anonymous, no +local scope is opened; the identifiers used to name the members are placed into the current scope instead. -A struct may contain unnamed members and definitions of local structs. The -storage allocators may contain a multiplier, as in the example below: - +A struct may contain unnamed members and definitions of local structs/unions. +The storage allocators may contain a multiplier, as in the example below: <tscreen><verb> .struct Circle .struct Point @@ -4592,13 +4839,51 @@ storage allocators may contain a multiplier, as in the example below: Radius .word .endstruct </verb></tscreen> +The size of the Circle struct is 6 (three words). + + +<sect1>The storage allocator keywords<p> + + <descrip> + + <tag/.BYTE, .RES/ + Allocates multiples of 1 byte. <tt/.RES/ requires an operand. + + <tag/.DBYTE, .WORD, .ADDR/ + Allocates multiples of 2 bytes. + + <tag/.FARADDR/ + Allocates multiples of 3 bytes. + + <tag/.DWORD/ + Allocates multiples of 4 bytes. + + </descrip> + + +<sect1>The <tt/.ORG/ keyword<p> + +The <tt/.ORG/ keyword changes the offset value that is assigned to subsequent +member names. It's useful when using a struct to define the names of the +registers in an I/O chip. Example: +<tscreen><verb> +; 6551 +.struct ACIA ; Asynchronous Communications Interface Adapter + .org $031C +DATA .byte +STATUS .byte +CMD .byte ; Command register +CTRL .byte ; Control register +.endstruct + + lda ACIA::DATA ; Get an RS-232 character +</verb></tscreen> <sect1>The <tt/.TAG/ keyword<p> -Using the <ref id=".TAG" name=".TAG"> keyword, it is possible to reserve space -for an already defined struct or unions within another struct: - +By using the <ref id=".TAG" name=".TAG"> keyword, it is possible to reserve +space for an already defined struct or union within another struct: <tscreen><verb> .struct Point xcoord .word @@ -4611,33 +4896,30 @@ for an already defined struct or unions within another struct: .endstruct </verb></tscreen> -Space for a struct or union may be allocated using the <ref id=".TAG" +Actual space for a struct or union may be allocated by using the <ref id=".TAG" name=".TAG"> directive. - <tscreen><verb> - C: .tag Circle +C: .tag Circle </verb></tscreen> Currently, members are just offsets from the start of the struct or union. To -access a field of a struct, the member offset has to be added to the address -of the struct itself: - +access a field of a struct, the member offset must be added to the address of +the struct variable itself: <tscreen><verb> lda C+Circle::Radius ; Load circle radius into A </verb></tscreen> - -This may change in a future version of the assembler. +That may change in a future version of the assembler. <sect1>Limitations<p> -Structs and unions are currently implemented as nested symbol tables (in fact, +Structs and unions currently are implemented as nested symbol tables (in fact, they were a by-product of the improved scoping rules). Currently, the -assembler has no idea of types. This means that the <ref id=".TAG" -name=".TAG"> keyword will only allocate space. You won't be able to initialize -variables declared with <ref id=".TAG" name=".TAG">, and adding an embedded +assembler has no idea of types. That means that the <ref id=".TAG" +name=".TAG"> keyword only will allocate space. You won't be able to initialize +variables declared with <ref id=".TAG" name=".TAG">; and, adding an embedded structure to another structure with <ref id=".TAG" name=".TAG"> will not make -this structure accessible by using the '::' operator. +that added structure accessible by using the '::' operator. @@ -4851,14 +5133,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> diff --git a/doc/cbm510.sgml b/doc/cbm510.sgml index c24eba142..86bed7607 100644 --- a/doc/cbm510.sgml +++ b/doc/cbm510.sgml @@ -1,13 +1,11 @@ <!doctype linuxdoc system> <article> - <title>Commodore 510 (aka P500) specific information for cc65 <author> <url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> <url url="mailto:polluks@sdf.lonestar.org" name="Stefan A. Haubenthal">,<newline> <url url="mailto:greg.king5@verizon.net" name="Greg King"> -<date>2014-04-25 <abstract> An overview over the Commodore 510 runtime system as it is implemented for the @@ -67,7 +65,7 @@ Special locations: <descrip> <tag/Stack/ - The C runtime stack is located at $FF81, and grows downwards. + The C runtime stack is located at $FEC2, and grows downwards. <tag/Heap/ The C heap is located at the end of the program, and grows towards the C @@ -118,6 +116,8 @@ declaration and usage. <item>cbm_k_basin <item>cbm_k_bsout <item>cbm_k_clrch +<item>cbm_k_tksa +<item>cbm_k_second <item>cbm_load <item>cbm_open <item>cbm_opendir @@ -126,6 +126,7 @@ declaration and usage. <item>cbm_save <item>cbm_write <item>get_tv +<item>waitvsync </itemize> @@ -230,10 +231,10 @@ The default drivers, <tt/mouse_stddrv (mouse_static_stddrv)/, point to <tt/cbm51 <tag><tt/cbm510-std.ser (cbm510_std_ser)/</tag> Driver for the 6551 ACIA chip built into the Commodore 510. Supports up to - 19200 BPS, hardware flow control (RTS/CTS), and interrupt-driven receives. - Note that, because of the peculiarities of the 6551 chip, transmits are not - interrupt driven; and, the transceiver blocks if the receiver asserts flow - control because of a full buffer. + 19200 baud, requires hardware flow control (RTS/CTS) and does interrupt driven + receives. Note that, because of the peculiarities of the 6551 chip, transmits + are not interrupt driven; and, the transceiver blocks if the receiver asserts + flow control because of a full buffer. </descrip><p> @@ -242,6 +243,13 @@ The default drivers, <tt/mouse_stddrv (mouse_static_stddrv)/, point to <tt/cbm51 <sect>Limitations<label id="limitations"><p> +<sect1>Realtime clock<p> + +The realtime clock functions use the CIA2 TOD clock. As that clock only stores +the time but not the date, the date set by <tt/clock_settime()/ is simply stored +inside the C library for retrieval in the same program via <tt/clock_gettime()/. + + <sect1>Kernal and hardware access<p> Since the program runs in bank 0, and the kernal and all I/O chips are located @@ -315,14 +323,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/cbm610.sgml b/doc/cbm610.sgml index 790983b3d..d86950abc 100644 --- a/doc/cbm610.sgml +++ b/doc/cbm610.sgml @@ -1,12 +1,10 @@ <!doctype linuxdoc system> <article> - <title>Commodore 610-specific information for cc65 <author> <url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> <url url="mailto:greg.king5@verizon.net" name="Greg King"> -<date>2014-04-25 <abstract> An overview over the Commodore 610 runtime system as it is implemented for the @@ -121,6 +119,8 @@ declaration and usage. <item>cbm_k_basin <item>cbm_k_bsout <item>cbm_k_clrch +<item>cbm_k_tksa +<item>cbm_k_second <item>cbm_load <item>cbm_open <item>cbm_opendir @@ -212,10 +212,10 @@ No mouse drivers are currently available for the Commodore 610. <tag><tt/cbm610-std.ser (cbm610_std_ser)/</tag> Driver for the 6551 ACIA chip built into the Commodore 610. Supports up to - 19200 BPS, hardware flow control (RTS/CTS), and interrupt-driven receives. - Note that, because of the peculiarities of the 6551 chip, transmits are not - interrupt driven; and, the transceiver blocks if the receiver asserts flow - control because of a full buffer. + 19200 baud, requires hardware flow control (RTS/CTS) and does interrupt driven + receives. Note that, because of the peculiarities of the 6551 chip, transmits + are not interrupt driven; and, the transceiver blocks if the receiver asserts + flow control because of a full buffer. </descrip><p> @@ -224,6 +224,13 @@ No mouse drivers are currently available for the Commodore 610. <sect>Limitations<label id="limitations"><p> +<sect1>Realtime clock<p> + +The realtime clock functions use the CIA1 TOD clock. As that clock only stores +the time but not the date, the date set by <tt/clock_settime()/ is simply stored +inside the C library for retrieval in the same program via <tt/clock_gettime()/. + + <sect1>Kernal and hardware access<p> Since the program runs in bank 1, and the kernal and all I/O chips are located @@ -297,14 +304,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/cc65-intern.sgml b/doc/cc65-intern.sgml new file mode 100644 index 000000000..8e36578b5 --- /dev/null +++ b/doc/cc65-intern.sgml @@ -0,0 +1,139 @@ +<!doctype linuxdoc system> + +<article> +<title>cc65 internals +<author><url url="mailto:bbbradsmith@users.noreply.github.com" name="Brad Smith"> + +<abstract> +Internal details of cc65 code generation, +such as calling assembly functions from C. +</abstract> + +<!-- Table of contents --> +<toc> + +<!-- Begin the document --> + + + +<sect>Calling assembly functions from C<p> + +<sect1>Calling conventions<p> + +There are two calling conventions used in cc65: + +<itemize> + <item><tt/cdecl/ - passes all parameters on the C-stack. + <p> + <item><tt/fastcall/ - passes the rightmost parameter in + registers <tt>A/X/sreg</tt> and all others on the C-stack. + <p> +</itemize> + +The default convention is <tt/fastcall/, but this can be changed with +the <tt/--all-cdecl/ command line option. If a convention is specified in +the function's declaration, that convention will be used instead. +Variadic functions will always use <tt/cdecl/ convention. + +If the <tt/--standard/ command line option is used, +the <tt/cdecl/ and <tt/fastcall/ keywords will not be available. +The standard compliant variations <tt/__cdecl__/ and <tt/__fastcall__/ are always available. + +If a function has a prototype, parameters are pushed to the C-stack as their respective types +(i.e. a <tt/char/ parameter will push 1 byte), but if a function has no prototype, default +promotions will apply. This means that with no prototype, <tt/char/ will be promoted +to <tt/int/ and be pushed as 2 bytes. "K & R"-style forward declarations may be used, +but they will function the same as if no prototype was used. + +<sect1>Prologue, before the function call<p> + +If the function is declared as fastcall, the rightmost argument will be loaded into +the <tt>A/X/sreg</tt> registers: + +<itemize> + <item><tt/A/ - 8-bit parameter, or low byte of larger types<p> + <item><tt/X/ - 16-bit high byte, or second byte of 32-bits<p> + <item><tt/sreg/ - Zeropage pseudo-register including high 2 bytes of 32-bit parameter<p> +</itemize> + +All other parameters will be pushed to the C-stack from left to right. +The rightmost parameter will have the lowest address on the stack, +and multi-byte parameters will have their least significant byte at the lower address. + +The <tt/sp/ pseudo-register is a zeropage pointer to the base of the C-stack. +If the function is variadic, the <tt/Y/ register will contain the number of +bytes pushed to the stack for this function. + +Example: +<tscreen><verb> +// C prototype +void cdecl foo(unsigned bar, unsigned char baz); + +; C-stack layout within the function: +; +; +------------------+ +; | High byte of bar | +; Offset 2 ->+------------------+ +; | Low byte of bar | +; Offset 1 ->+------------------+ +; | baz | +; Offset 0 ->+------------------+ + +; Example code for accessing bar. The variable is in A/X after this code snippet: +; + ldy #2 ; Offset of high byte of bar + lda (sp),y ; High byte now in A + tax ; High byte now in X + dey ; Offset of low byte of bar + lda (sp),y ; Low byte now in A +</verb></tscreen> + +<sect1>Epilogue, after the function call<p> + +<sect2>Return requirements<p> + +If the function has a return value, it will appear in the <tt>A/X/sreg</tt> registers. + +Functions with an 8-bit return value (<tt/char/ or <tt/unsigned char/) are expected +to promote this value to a 16-bit integer on return, and store the high byte in <tt/X/. +The compiler will depend on the promoted value in some cases (e.g. implicit conversion to <tt/int/), +and failure to return the high byte in <tt/X/ will cause unexpected errors. +This problem does not apply to the <tt/sreg/ pseudo-register, which is only +used if the return type is 32-bit. + +If the function has a void return type, the compiler will not depend on the result +of <tt>A/X/sreg</tt>, so these may be clobbered by the function. + +The C-stack pointer <tt/sp/ must be restored by the function to its value before the +function call prologue. It may pop all of its parameters from the C-stack +(e.g. using the <tt/runtime/ function <tt/popa/), +or it could adjust <tt/sp/ directly. +If the function is variadic, the <tt/Y/ register contains the number of bytes +pushed to the stack on entry, which may be added to <tt/sp/ to restore its +original state. + +The internal pseudo-register <tt/regbank/ must not be changed by the function. + +<sect2>Clobbered state<p> + +The <tt/Y/ register may be clobbered by the function. +The compiler will not depend on its state after a function call. + +The <tt>A/X/sreg</tt> registers may be clobbered if any of them +are not used by the return value (see above). + +Many of the internal pseudo-registers used by cc65 are available for +free use by any function called by C, and do not need to be preserved. +Note that if another C function is called from your assembly function, +it may clobber any of these itself: + +<itemize> + <item><tt>tmp1 .. tmp4</tt><p> + <item><tt>ptr1 .. ptr4</tt><p> + <item><tt>regsave</tt><p> + <item><tt>sreg</tt> (if unused by return)<p> +</itemize> + + + +</article> diff --git a/doc/cc65.sgml b/doc/cc65.sgml index 9198d6982..43039f713 100644 --- a/doc/cc65.sgml +++ b/doc/cc65.sgml @@ -2,12 +2,13 @@ <article> <title>cc65 Users Guide -<author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>2015-05-26 +<author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> +<url url="mailto:gregdk@users.sf.net" name="Greg King"> <abstract> -cc65 is a C compiler for 6502 targets. It supports several 6502 based home -computers like the Commodore and Atari machines, but it is easily retargetable. +cc65 is a C compiler for 6502 targets. It supports several 6502-based home +computers such as the Commodore and Atari machines, but it easily is +retargetable. </abstract> <!-- Table of contents --> @@ -15,7 +16,6 @@ computers like the Commodore and Atari machines, but it is easily retargetable. <!-- Begin the document --> - <sect>Overview<p> cc65 was originally a C compiler for the Atari 8-bit machines written by @@ -58,7 +58,7 @@ Short options: -O Optimize code -Oi Optimize code, inline more code -Or Enable register variables - -Os Inline some known functions + -Os Inline some standard functions -T Include source as comment -V Print the compiler version number -W warning[,...] Suppress warnings @@ -85,12 +85,15 @@ Long options: --data-name seg Set the name of the DATA segment --debug Debug mode --debug-info Add debug info to object file - --debug-opt name Debug optimization steps + --debug-opt name Configure optimizations with a file + --debug-opt-output Debug output of each optimization step --dep-target target Use this dependency target --disable-opt name Disable an optimization step + --eagerly-inline-funcs Eagerly inline some known functions --enable-opt name Enable an optimization step --help Help (this text) --include-dir dir Set an include directory search path + --inline-stdfuncs Inline some standard functions --list-opt-steps List all optimizer steps and exit --list-warnings List available warning types for -W --local-strings Emit string literals immediately @@ -192,8 +195,209 @@ Here is a description of all the command line options: <tag><tt>-d, --debug</tt></tag> - Enables debug mode, something that should not be needed for mere - mortals:-) + Enables debug mode, for debugging the behavior of cc65. + + + <tag><tt>--debug-tables name</tt></tag> + + Writes symbol table information to a file, which includes details on structs, unions + functions, and global variables. For example, given the following code: + + <tscreen><verb> + struct l { + unsigned char m; + unsigned char n; + }; + + struct hello { + unsigned char j; + unsigned char k; + struct l l; + }; + + struct sub { + unsigned char x; + unsigned char y; + }; + + union xy { + struct sub xy; + unsigned int mem; + }; + + typedef struct hello thingy; + + unsigned char single; + + unsigned char test_local_vars_main(void) { + static unsigned char wahoo; + static unsigned char bonanza = 0x42; + unsigned char i; + unsigned int j; + unsigned int *random; + unsigned char *lol; + signed char whoa; + struct hello wow; + thingy *cool; + union xy xy; + + return 0; + } + </verb></tscreen> + + The following output would be produced: + + <tscreen><verb> + SC_FUNC: _test_local_vars_main: Symbol table + ============================================ + __fixargs__: + Flags: SC_CONST SC_DEF + Type: unsigned int + __argsize__: + Flags: SC_CONST SC_DEF + Type: unsigned char + wahoo: + AsmName: M0001 + Flags: SC_STATIC SC_DEF SC_REF + Type: unsigned char + bonanza: + AsmName: M0002 + Flags: SC_STATIC SC_DEF SC_REF + Type: unsigned char + i: + Flags: SC_AUTO SC_DEF SC_REF + Type: unsigned char + j: + Flags: SC_AUTO SC_DEF SC_REF + Type: unsigned int + random: + Flags: SC_AUTO SC_DEF SC_REF + Type: unsigned int * + lol: + Flags: SC_AUTO SC_DEF SC_REF + Type: unsigned char * + whoa: + Flags: SC_AUTO SC_DEF SC_REF + Type: signed char + wow: + Flags: SC_AUTO SC_DEF SC_REF + Type: struct hello + cool: + Flags: SC_AUTO SC_DEF SC_REF + Type: struct hello * + xy: + Flags: SC_AUTO SC_DEF SC_REF + Type: union xy + + + + + Global symbol table + =================== + thingy: + AsmName: _thingy + Flags: SC_TYPEDEF 0x100000 + Type: struct hello + single: + AsmName: _single + Flags: SC_STATIC SC_EXTERN SC_STORAGE SC_DEF SC_REF 0x100000 + Type: unsigned char + test_local_vars_main: + AsmName: _test_local_vars_main + Flags: SC_FUNC SC_STATIC SC_EXTERN SC_DEF 0x100000 + Type: unsigned char (void) + + + + + Global tag table + ================ + l: + Flags: SC_STRUCT SC_DEF + Type: (none) + hello: + Flags: SC_STRUCT SC_DEF + Type: (none) + sub: + Flags: SC_STRUCT SC_DEF + Type: (none) + xy: + Flags: SC_UNION SC_DEF + Type: (none) + + + + + Global struct and union definitions + ========================= + + SC_STRUCT: l + ============ + m: + Flags: SC_STRUCTFIELD + Type: unsigned char + n: + Flags: SC_STRUCTFIELD + Type: unsigned char + + + + + SC_STRUCT: hello + ================ + j: + Flags: SC_STRUCTFIELD + Type: unsigned char + k: + Flags: SC_STRUCTFIELD + Type: unsigned char + l: + Flags: SC_STRUCTFIELD + Type: struct l + + + + + SC_STRUCT: sub + ============== + x: + Flags: SC_STRUCTFIELD + Type: unsigned char + y: + Flags: SC_STRUCTFIELD + Type: unsigned char + + + + + SC_UNION: xy + ============ + xy: + Flags: SC_STRUCTFIELD + Type: struct sub + mem: + Flags: SC_STRUCTFIELD + Type: unsigned int + </verb></tscreen> + + + <tag><tt>--debug-opt name</tt></tag> + + The named file contains a list of specific optimization steps to enable or disable. + Each line contains the name of an optimization step with either a + <tt>+</tt> (enable) or <tt>-</tt> (disable) prefix. + The name <tt>all</tt> can be used to enable or disable all optimizations. + Comment lines may begin with <tt>#</tt> or <tt>;</tt>. + + Use <tt>--list-opt-steps</tt> to generate a complete list of available optimization steps. + + Use <tt>--debug</tt> to see a list of optimizations applied during compilation. + + + <tag><tt>--debug-opt-output</tt></tag> + + For debugging the output of each optimization pass, step by step. + Generates a <tt>name.opt</tt> output listing for each optimized function <tt>name</tt>. <label id="option-dep-target"> @@ -219,11 +423,50 @@ Here is a description of all the command line options: symbols in a special section in the object file. + <label id="option-eagerly-inline-funcs"> + <tag><tt>--eagerly-inline-funcs</tt></tag> + + Have the compiler eagerly inline these functions from the C library: + <itemize> + <item><tt/memcpy()/ + <item><tt/memset()/ + <item><tt/strcmp()/ + <item><tt/strcpy()/ + <item><tt/strlen()/ + </itemize> + + Note: This has two consequences: + <itemize> + <item>You may not use names of standard C functions for your own functions. + If you do that, your program is not standard-compliant anyway; but, + using <tt/--eagerly-inline-funcs/ actually will break things. + <p> + <item>The inlined string and memory functions will not handle strings or + memory areas larger than 255 bytes. + <p> + </itemize> + + <tt/--eagerly-inline-funcs/ implies the <tt><ref id="option-inline-stdfuncs" + name="--inline-stdfuncs"></tt> command line option. + + See also <tt><ref id="pragma-allow-eager-inline" name="#pragma allow-eager-inline"></tt>. + + <tag><tt>-h, --help</tt></tag> Print the short option summary shown above. + <label id="option-inline-stdfuncs"> + <tag><tt>--inline-stdfuncs</tt></tag> + + Allow the compiler to inline some standard functions from the C library like + strlen. This will not only remove the overhead for a function call, but will + make the code visible for the optimizer. See also the <tt><ref id="option-O" + name="-Os"></tt> command line option and <tt><ref id="pragma-inline-stdfuncs" + name="#pragma inline-stdfuncs"></tt>. + + <label id="option-list-warnings"> <tag><tt>--list-warnings</tt></tag> @@ -335,7 +578,7 @@ Here is a description of all the command line options: This option is used to set the target system. The target system determines the character set that is used for strings and character constants and the - default CPU. The CPU setting can be overriden by use of the <tt/<ref + default CPU. The CPU setting can be overridden by use of the <tt/<ref id="option--cpu" name="--cpu">/ option. The following target systems are supported: @@ -363,6 +606,7 @@ Here is a description of all the command line options: <item>sim6502 <item>sim65c02 <item>supervision + <item>telestrat <item>vic20 </itemize> @@ -386,28 +630,28 @@ Here is a description of all the command line options: Use static storage for local variables instead of storage on the stack. Since the stack is emulated in software, this gives shorter and usually - faster code, but the code is no longer reentrant. The difference between - <tt/-Cl/ and declaring local variables as static yourself is, that - initializer code is executed each time, the function is entered. So when - using + faster code, but the code is no longer reentrant as required for recursion. + The difference between <tt/-Cl/ and declaring local variables as static + yourself is, that initializer code is executed each time, the function is + entered. So when using <tscreen><verb> - void f (void) - { - unsigned a = 1; - ... - } + void f (void) + { + unsigned a = 1; + ... + } </verb></tscreen> the variable <tt/a/ will always have the value <tt/1/ when entering the function and using <tt/-Cl/, while in <tscreen><verb> - void f (void) - { - static unsigned a = 1; - .... - } + void f (void) + { + static unsigned a = 1; + .... + } </verb></tscreen> the variable <tt/a/ will have the value <tt/1/ only the first time that the @@ -444,23 +688,14 @@ Here is a description of all the command line options: name="--register-vars">/ command line option, and the <ref id="register-vars" name="discussion of register variables"> below. - Using <tt/-Os/ will force the compiler to inline some known functions from - the C library like strlen. Note: This has two consequences: - <p> - <itemize> - <item>You may not use names of standard C functions in your own code. If you - do that, your program is not standard compliant anyway, but using - <tt/-Os/ will actually break things. - <p> - <item>The inlined string and memory functions will not handle strings or - memory areas larger than 255 bytes. Similarly, the inlined <tt/is..()/ - functions will not work with values outside the char. range (such as - <tt/EOF/). - <p> - </itemize> - <p> + Using <tt/-Os/ will allow the compiler to inline some standard functions + from the C library like strlen. This will not only remove the overhead + for a function call, but will make the code visible for the optimizer. + See also the <tt/<ref id="option-inline-stdfuncs" name="--inline-stdfuncs">/ + command line option. + It is possible to concatenate the modifiers for <tt/-O/. For example, to - enable register variables and inlining of known functions, you may use + enable register variables and inlining of standard functions, you may use <tt/-Ors/. @@ -478,15 +713,15 @@ Here is a description of all the command line options: <label id="option-W"> - <tag><tt>-W name[,name]</tt></tag> + <tag><tt>-W name[,name,...]</tt></tag> This option allows to control warnings generated by the compiler. It is - followed by a comma separated list of warnings that should be enabled or + followed by a comma-separated list of warnings that should be enabled or disabled. To disable a warning, its name is prefixed by a minus sign. If no such prefix exists, or the name is prefixed by a plus sign, the warning is enabled. - The following warning names are currently recognized: + The following warning names currently are recognized: <descrip> <tag><tt/const-comparison/</tag> Warn if the result of a comparison is constant. @@ -494,10 +729,25 @@ Here is a description of all the command line options: Treat all warnings as errors. <tag><tt/no-effect/</tag> Warn about statements that don't have an effect. + <tag><tt/pointer-sign/</tag> + Warn if a pointer assignment changes the signedness of the target + of a pointer value, and the new signedness wasn't cast explicitly. + <tag><tt/pointer-types/</tag> + Warn if a pointer assignment changes the type of the target + of a pointer value, and the new type wasn't cast explicitly. + <tag><tt/remap-zero/</tag> + Warn about a <tt/<ref id="pragma-charmap" name="#pragma charmap()">/ + that changes a character's code number from/to 0x00. + <tag><tt/return-type/</tag> + Warn about no return statement in function returning non-void. <tag><tt/struct-param/</tag> Warn when passing structs by value. <tag><tt/unknown-pragma/</tag> - Warn about known #pragmas. + Warn about #pragmas that aren't recognized by cc65. + <tag><tt/unreachable-code/</tag> + Warn about unreachable code in cases of comparing constants, etc. + <tag><tt/unused-func/</tag> + Warn about unused functions. <tag><tt/unused-label/</tag> Warn about unused labels. <tag><tt/unused-param/</tag> @@ -506,15 +756,16 @@ Here is a description of all the command line options: Warn about unused variables. </descrip> - The full list of available warning names may be retrieved by using the + The full list of available warning names can be retrieved by using the option <tt><ref id="option-list-warnings" name="--list-warnings"></tt>. - You may also use <tt><ref id="pragma-warn" name="#pragma warn"></tt> to - control this setting for smaller pieces of code from within your code. + You may use also <tt><ref id="pragma-warn" name="#pragma warn"></tt> to + control this setting, for smaller pieces of code, from within your sources. </descrip><p> + <sect>Input and output<p> The compiler will accept one C file per invocation and create a file with @@ -553,21 +804,21 @@ and the one defined by the ISO standard: <itemize> -<item> The datatypes "float" and "double" are not available. - <p> -<item> C Functions may not return structs (or unions), and structs may not +<item> The datatypes "float" and "double" are not available. + <p> +<item> C Functions may not return structs (or unions), and structs may not be passed as parameters by value. However, struct assignment *is* - possible. - <p> -<item> Most of the C library is available with only the fastcall calling - convention (<ref id="extension-fastcall" name="see below">). It means - that you must not mix pointers to those functions with pointers to - user-written, cdecl functions (the calling conventions are incompatible). - <p> -<item> The <tt/volatile/ keyword doesn't have an effect. This is not as bad + possible. + <p> +<item> Most of the C library is available with only the fastcall calling + convention (<ref id="extension-fastcall" name="see below">). It means + that you must not mix pointers to those functions with pointers to + user-written, cdecl functions (the calling conventions are incompatible). + <p> +<item> The <tt/volatile/ keyword has almost no effect. That is not as bad as it sounds, since the 6502 has so few registers that it isn't possible to keep values in registers anyway. - <p> + <p> </itemize> There may be some more minor differences I'm currently not aware of. The @@ -582,49 +833,48 @@ This cc65 version has some extensions to the ISO C standard. <itemize> -<item> The compiler allows to insert assembler statements into the output - file. The syntax is +<item> The compiler allows to insert assembler statements into the output + file. The syntax is - <tscreen><verb> - asm (<string literal>[, optional parameters]) ; - </verb></tscreen> - or - <tscreen><verb> - __asm__ (<string literal>[, optional parameters]) ; - </verb></tscreen> + <tscreen><verb> + asm [optional volatile] (<string literal>[, optional parameters]) ; + </verb></tscreen> + or + <tscreen><verb> + __asm__ [optional volatile] (<string literal>[, optional parameters]) ; + </verb></tscreen> - The first form is in the user namespace and is disabled if the <tt/-A/ - switch is given. + The first form is in the user namespace; and, is disabled if the <tt/-A/ + switch is given. - There is a whole section covering inline assembler statements, - <ref id="inline-asm" name="see there">. - <p> + There is a whole section covering inline assembler statements, + <ref id="inline-asm" name="see there">. + <p> <label id="extension-fastcall"> -<item> The normal calling convention -- for non-variadic functions -- is - named "fastcall". The syntax for a function declaration that - <em/explicitly/ uses fastcall is +<item> The normal calling convention -- for non-variadic functions -- is + named "fastcall". The syntax for a function declaration that + <em/explicitly/ uses fastcall is - <tscreen><verb> - <return type> fastcall <function name> (<parameter list>) - </verb></tscreen> - or - <tscreen><verb> - <return type> __fastcall__ <function name> (<parameter list>) - </verb></tscreen> - An example is - <tscreen><verb> - void __fastcall__ f (unsigned char c) - </verb></tscreen> - The first form of the fastcall keyword is in the user namespace and can - therefore be disabled with the <tt><ref id="option--standard" + <tscreen><verb> + <return type> fastcall <function name> (<parameter list>) + </verb></tscreen> + or + <tscreen><verb> + <return type> __fastcall__ <function name> (<parameter list>) + </verb></tscreen> + An example is + <tscreen><verb> + void __fastcall__ f (unsigned char c) + </verb></tscreen> + The first form of the fastcall keyword is in the user namespace and can + therefore be disabled with the <tt><ref id="option--standard" name="--standard"></tt> command line option. - For functions that are <tt/fastcall/, the rightmost parameter is not - pushed on the stack but left in the primary register when the function - is called. That significantly reduces the cost of calling those functions. - <newline><newline> - <p> + For functions that are <tt/fastcall/, the rightmost parameter is not + pushed on the stack but left in the primary register when the function + is called. That significantly reduces the cost of calling those functions. + <p> <item> There is another calling convention named "cdecl". Variadic functions (their prototypes have an ellipsis [<tt/.../]) always use that @@ -649,65 +899,73 @@ This cc65 version has some extensions to the ISO C standard. For functions that are <tt/cdecl/, the rightmost parameter is pushed onto the stack before the function is called. That increases the cost of calling those functions, especially when they are called from many - places.<newline><newline> + places. <p> -<item> There are two pseudo variables named <tt/__AX__/ and <tt/__EAX__/. - Both refer to the primary register that is used by the compiler to - evaluate expressions or return function results. <tt/__AX__/ is of - type <tt/unsigned int/ and <tt/__EAX__/ of type <tt/long unsigned int/ - respectively. The pseudo variables may be used as lvalue and rvalue as - every other variable. They are most useful together with short - sequences of assembler code. For example, the macro +<item> There are three pseudo variables named <tt/__A__/, <tt/__AX__/ and + <tt/__EAX__/. They all refer to the primary register that is used + by the compiler to evaluate expressions or return function results. + <tt/__A__/ is of type <tt/unsigned char/, <tt/__AX__/ is of type + <tt/unsigned int/ and <tt/__EAX__/ of type <tt/long unsigned int/ + respectively. The pseudo variables may be used as lvalue and rvalue + as every other variable. They are most useful together with short + sequences of assembler code. For example, the macro - <tscreen><verb> - #define hi(x) \ + <tscreen><verb> + #define hi(x) \ (__AX__ = (x), \ asm ("txa"), \ asm ("ldx #$00"), \ __AX__) - </verb></tscreen> + </verb></tscreen> - will give the high byte of any unsigned value. - <p> + will give the high byte of any unsigned value. + <p> -<item> Inside a function, the identifier <tt/__func__/ gives the name of the - current function as a string. Outside of functions, <tt/__func__/ is - undefined. - Example: +<item> Inside a function, the identifier <tt/__func__/ gives the name of the + current function as a string. Outside of functions, <tt/__func__/ is + undefined. + Example: - <tscreen><verb> - #define PRINT_DEBUG(s) printf ("%s: %s\n", __func__, s); - </verb></tscreen> + <tscreen><verb> + #define PRINT_DEBUG(s) printf ("%s: %s\n", __func__, s); + </verb></tscreen> - The macro will print the name of the current function plus a given - string. - <p> + The macro will print the name of the current function plus a given + string. + <p> -<item> cc65 allows the initialization of <tt/void/ variables. This may be - used to create variable structures that are more compatible with - interfaces written for assembler languages. Here is an example: +<item> cc65 allows the initialization of <tt/void/ variables. This may be + used to create arbitrary structures that are more compatible with + interfaces written for assembler languages. Here is an example: - <tscreen><verb> - void GCmd = { (char)3, (unsigned)0x2000, (unsigned)0x3000 }; - </verb></tscreen> + <tscreen><verb> + void GCmd = { (char)3, (unsigned)0x2000, (unsigned)0x3000 }; + </verb></tscreen> - This will be translated as follows: + That will be translated as follows: - <tscreen><verb> - _GCmd: - .byte 3 - .word $2000 - .word $3000 - </verb></tscreen> + <tscreen><verb> + _GCmd: + .byte 3 + .word $2000 + .word $3000 + </verb></tscreen> - Since the variable is of type <tt/void/ you may not use it as is. - However, taking the address of the variable results in a <tt/void*/ - which may be passed to any function expecting a pointer. + Since the variable is of type <tt/void/, you may not use it as-is. + However, taking the address of the variable results in a <tt/void*/ + which may be passed to any function expecting a pointer. Also, the + <tt/sizeof/ operator will give the length of the initializer: - See the <url url="geos.html" name="GEOS library document"> for examples - on how to use this feature. - <p> + <tscreen><verb> + GLen = sizeof GCmd; + </verb></tscreen> + + will assign the value 5 to <tt/GLen/. + + See the <url url="geos.html" name="GEOS library document"> for examples + on how to use that feature. + <p> <item> cc65 implements flexible array struct members as defined in the C99 ISO standard. As an extension, these fields may be initialized. There are @@ -731,10 +989,58 @@ This cc65 version has some extensions to the ISO C standard. size zero, even if it is initialized. <p> +<item> cc65 supports <tt/_Static_assert/ from C11 and C2X. This is similar + to <tt/#error/ but happens at a later stage of translation, so types + can be used. + + <tscreen><verb> + /* C11 version with message. */ + _Static_assert (sizeof (int) == 2, "Expected 2-bytes ints."); + + /* C2X version without message. */ + _Static_assert (sizeof (int) == 2); + </verb></tscreen> + + <tt/_Static_assert/ is also available as the macro <tt/static_assert/ in + <tt/assert.h/. + +<item> cc65 supports bit-fields of any integral type that is int-sized or + smaller, and enumerated types with those types as their underlying + type. (Only <tt/int/, <tt/signed int/, and <tt/unsigned int/ are + required by the standard.) + +<item> Computed gotos, a GCC extension, has limited support. With it you can + use fast jump tables from C. You can take the address of a label with + a double ampersand, putting them in a static const array of type void *. + Then you can jump to one of these labels as follows: + + <tscreen><verb> + static const void * const jumptable[] = { + &&add, + &&sub + }; + goto *jumptable[somevar]; + + add: + ...code... + </verb></tscreen> + + In the jump table, no expressions are supported. The array index + used in the goto must be a simple variable or a constant. + +<item> Binary literals, a C++14 feature and a GCC C extension, are accepted. + They can be disabled with the <tt><ref id="option--standard" + name="--standard"></tt> option. + + <tscreen><verb> + unsigned char foo = 0b101; // sets it to 5 + </verb></tscreen> + </itemize> <p> + <sect>Predefined macros<p> The compiler defines several macros at startup: @@ -748,6 +1054,10 @@ The compiler defines several macros at startup: This macro is defined if the target is the enhanced Apple //e (-t apple2enh). + <tag><tt>__ATARI2600__</tt></tag> + + This macro is defined if the target is the Atari 2600 game console. + <tag><tt>__ATARI5200__</tt></tag> This macro is defined if the target is the Atari 5200 game console. @@ -792,8 +1102,20 @@ The compiler defines several macros at startup: <tag><tt>__CC65__</tt></tag> This macro is always defined. Its value is the version number of the - compiler in hex. For example, version 2.14 of the compiler has this macro - defined as <tt/0x02E0/. + compiler in hex: <tt>(VER_MAJOR * 0x100) + VER_MINOR</tt>. The upper 8 bits + are the major-, the lower 8 bits are the minor version. For example, version + 47.11 of the compiler would have this macro defined as <tt/0x2f0b/. + + Note: until 2.19 this macro was defined as <tt>(VER_MAJOR * 0x100) + VER_MINOR * 0x10</tt> - + which resulted in broken values starting at version 2.16 of the compiler. For + this reason the value of this macro is considered purely informal - you should + not use it to check for a specific compiler version and use different code + according to the detected version - please update your code to work with the + recent version of the compiler instead (There is very little reason to not use + the most recent version - and even less to support older versions in your code). + + Should you still insist on doing this for some reason - look at <tt>checkversion.c</tt> + in the samples directory for some preprocessor kludges that might help. <tag><tt>__CC65_STD__</tt></tag> @@ -805,11 +1127,20 @@ The compiler defines several macros at startup: <item><tt/__CC65_STD_CC65__/ </itemize> + <tag><tt>__CX16__</tt></tag> + + This macro is defined if the target is the Commander X16 (-t cx16). + <tag><tt>__DATE__</tt></tag> This macro expands to the date of translation of the preprocessing translation unit in the form "Mmm dd yyyy". + <tag><tt>__EAGERLY_INLINE_FUNCS__</tt></tag> + + Is defined if the compiler was called with the <tt><ref id="option-eagerly-inline-funcs" + name="--eagerly-inline-funcs"></tt> command line option. + <tag><tt>__FILE__</tt></tag> This macro expands to a string containing the name of the C source file. @@ -886,6 +1217,14 @@ The compiler defines several macros at startup: This macro is defined if the target is the Supervision (-t supervision). + <tag><tt>__SYM1__</tt></tag> + + This macro is defined if the target is the Sym-1 (-t sym1). + + <tag><tt>__TELESTRAT__</tt></tag> + + This macro is defined if the target is the Telestrat (-t telestrat). + <tag><tt>__TIME__</tt></tag> This macro expands to the time of translation of the preprocessing @@ -897,6 +1236,7 @@ The compiler defines several macros at startup: </descrip> + <sect>#pragmas<label id="pragmas"><p> The compiler understands some pragmas that may be used to change code @@ -905,59 +1245,90 @@ If the first parameter is <tt/push/, the old value is saved onto a stack before changing it. The value may later be restored by using the <tt/pop/ parameter with the <tt/#pragma/. -<sect1><tt>#pragma bss-name ([push,] <name>)</tt><label id="pragma-bss-name"><p> - This pragma changes the name used for the BSS segment (the BSS segment - is used to store uninitialized data). The argument is a string enclosed - in double quotes. +<sect1><tt>#pragma allow-eager-inline ([push,] on|off)</tt><label id="pragma-allow-eager-inline"><p> - Note: The default linker configuration file does only map the standard - segments. If you use other segments, you have to create a new linker - configuration file. - - Beware: The startup code will zero only the default BSS segment. If you - use another BSS segment, you have to do that yourself, otherwise - uninitialized variables do not have the value zero. + Allow eager inlining of known functions. If the argument is "off", eager + inlining is disabled, otherwise it is enabled. Please note that (in contrast + to the <tt><ref id="option-eagerly-inline-funcs" name="--eagerly-inline-funcs"></tt> + command line option) this pragma does not imply the <tt><ref id="option-inline-stdfuncs" + name="--inline-stdfuncs"></tt> command line option. Rather it marks code to be safe for + eager inlining of known functions if inlining of standard functions is enabled. The <tt/#pragma/ understands the push and pop parameters as explained above. - Example: + +<sect1><tt>#pragma bss-name ([push, ]<name>[ ,<addrsize>])</tt><label id="pragma-bss-name"><p> + + This pragma changes the name used for the BSS segment (the BSS segment is + used to store variables with static storage duration and no explicit + initializers). The <tt/name/ argument is a string enclosed in quotation + marks. + + <tt/addrsize/ is an optional string that gives a hint about where the + <tt/name/ segment will be put in the CPU's address space. It describes the + width of address numbers that point into that segment. Only words that + are known to ca65 are allowed: + <enum> + <item>"zp", "zeropage", "direct" + <item>"abs", "absolute", "near", "default" + <item>"far" + <item>"long", "dword" + </enum> + + Note: The default linker configuration file maps only the standard segments. + If you use other segments, you must create a new linker configuration file. + + Beware: The start-up code will zero only the default BSS segment. If you use + another BSS segment, then you must do that yourself; otherwise, variables + with static storage duration and no explicit initializer will not have the + value zero. + + The <tt/#pragma/ understands the push and pop parameters, as explained above. + + Examples: <tscreen><verb> - #pragma bss-name ("MyBSS") + #pragma bss-name ("MyBSS") + #pragma bss-name (push, "MyBSS") + #pragma bss-name ("MyBSS", "zp") </verb></tscreen> <sect1><tt>#pragma charmap (<index>, <code>)</tt><label id="pragma-charmap"><p> Each literal string and each literal character in the source is translated - by use of a translation table. This translation table is preset when the - compiler is started depending on the target system, for example to map - ISO-8859-1 characters into PETSCII if the target is a commodore machine. + by use of a translation table. That translation table is preset when the + compiler is started, depending on the target system; for example, to map + ISO-8859-1 characters into PETSCII if the target is a Commodore machine. This pragma allows to change entries in the translation table, so the translation for individual characters, or even the complete table may be - adjusted. + adjusted. Both arguments are assumed to be unsigned characters with a valid + range of 0-255. - Both arguments are assumed to be unsigned characters with a valid range of - 1-255. - - Beware of two pitfalls: - - <itemize> - <item>The character index is actually the code of the character in the - C source, so character mappings do always depend on the source - character set. This means that <tt/#pragma charmap/ is not - portable -- it depends on the build environment. - <item>While it is possible to use character literals as indices, the - result may be somewhat unexpected, since character literals are - itself translated. For this reason I would suggest to avoid - character literals and use numeric character codes instead. - </itemize> + Beware of some pitfalls: + <itemize> + <item>The character index is actually the code of the character in the + C source; so, character mappings do always depend on the source + character set. That means that <tt/#pragma charmap()/ is not + portable -- it depends on the build environment. + <item>While it is possible to use character literals as indices, the + result may be somewhat unexpected, since character literals are + themselves translated. For that reason, I would suggest to avoid + character literals, and use numeric character codes instead. + <item>It is risky to change index <tt/0x00/, because string functions depend + on it. If it is changed, then the <tt/'\0'/ at the end of string + literals will become non-zero. Functions that are used on those + literals won't stop at the end of them. cc65 will warn you if you do + change that code number. You can turn off that <tt/remap-zero/ warning + if you are certain that you know what you are doing (see <tt/<ref + id="pragma-warn" name="#pragma warn()">/). + </itemize> Example: <tscreen><verb> - /* Use a space wherever an 'a' occurs in ISO-8859-1 source */ - #pragma charmap (0x61, 0x20); + /* Use a space wherever an 'a' occurs in ISO-8859-1 source */ + #pragma charmap (0x61, 0x20); </verb></tscreen> @@ -974,21 +1345,34 @@ parameter with the <tt/#pragma/. The <tt/#pragma/ understands the push and pop parameters as explained above. -<sect1><tt>#pragma code-name ([push,] <name>)</tt><label id="pragma-code-name"><p> - This pragma changes the name used for the CODE segment (the CODE segment - is used to store executable code). The argument is a string enclosed in - double quotes. +<sect1><tt>#pragma code-name ([push, ]<name>[ ,<addrsize>])</tt><label id="pragma-code-name"><p> - Note: The default linker configuration file does only map the standard - segments. If you use other segments, you have to create a new linker - configuration file. + This pragma changes the name used for the CODE segment (the CODE segment is + used to store executable code). The <tt/name/ argument is a string enclosed + in quotation marks. - The <tt/#pragma/ understands the push and pop parameters as explained above. + <tt/addrsize/ is an optional string that gives a hint about where the + <tt/name/ segment will be put in the CPU's address space. It describes the + width of address numbers that point into that segment. Only words that + are known to ca65 are allowed: + <enum> + <item>"zp", "zeropage", "direct" + <item>"abs", "absolute", "near", "default" + <item>"far" + <item>"long", "dword" + </enum> - Example: + Note: The default linker configuration file maps only the standard segments. + If you use other segments, you must create a new linker configuration file. + + The <tt/#pragma/ understands the push and pop parameters, as explained above. + + Examples: <tscreen><verb> - #pragma code-name ("MyCODE") + #pragma code-name ("MyCODE") + #pragma code-name (push, "MyCODE") + #pragma code-name (push, "MyCODE", "far") </verb></tscreen> @@ -1002,23 +1386,46 @@ parameter with the <tt/#pragma/. The <tt/#pragma/ understands the push and pop parameters as explained above. -<sect1><tt>#pragma data-name ([push,] <name>)</tt><label id="pragma-data-name"><p> +<sect1><tt>#pragma data-name ([push, ]<name>[ ,<addrsize>])</tt><label id="pragma-data-name"><p> - This pragma changes the name used for the DATA segment (the DATA segment - is used to store initialized data). The argument is a string enclosed in - double quotes. + This pragma changes the name used for the DATA segment (the DATA segment is + used to store initialized data). The <tt/name/ argument is a string enclosed + in quotation marks. - Note: The default linker configuration file does only map the standard - segments. If you use other segments, you have to create a new linker - configuration file. + <tt/addrsize/ is an optional string that gives a hint about where the + <tt/name/ segment will be put in the CPU's address space. It describes the + width of address numbers that point into that segment. Only words that + are known to ca65 are allowed: + <enum> + <item>"zp", "zeropage", "direct" + <item>"abs", "absolute", "near", "default" + <item>"far" + <item>"long", "dword" + </enum> + + Note: The default linker configuration file maps only the standard segments. + If you use other segments, you must create a new linker configuration file. + + The <tt/#pragma/ understands the push and pop parameters, as explained above. + + Examples: + <tscreen><verb> + #pragma data-name ("MyDATA") + #pragma data-name (push, "MyDATA") + #pragma data-name ("MyDATA", "zeropage") + </verb></tscreen> + + +<sect1><tt>#pragma inline-stdfuncs ([push,] on|off)</tt><label id="pragma-inline-stdfuncs"><p> + + Allow the compiler to inline some standard functions from the C library like + strlen. If the argument is "off", inlining is disabled, otherwise it is enabled. + + See also the <tt/<ref id="option-inline-stdfuncs" name="--inline-stdfuncs">/ + command line option. The <tt/#pragma/ understands the push and pop parameters as explained above. - Example: - <tscreen><verb> - #pragma data-name ("MyDATA") - </verb></tscreen> - <sect1><tt>#pragma local-strings ([push,] on|off)</tt><label id="pragma-local-strings"><p> @@ -1034,6 +1441,23 @@ parameter with the <tt/#pragma/. remembered and output as a whole when translation is finished. +<sect1><tt>#pragma message (<message>)</tt><label id="pragma-message"><p> + + This pragma is used to display informational messages at compile-time. + + The message intended to be displayed must be a string literal. + + Example: + <tscreen><verb> + #pragma message ("in a bottle") + </verb></tscreen> + + Results in the compiler outputting the following to stderr: + <tscreen><verb> + example.c(42): Note: in a bottle + </verb></tscreen> + + <sect1><tt>#pragma optimize ([push,] on|off)</tt><label id="pragma-optimize"><p> Switch optimization on or off. If the argument is "off", optimization is @@ -1050,21 +1474,32 @@ parameter with the <tt/#pragma/. The <tt/#pragma/ understands the push and pop parameters as explained above. -<sect1><tt>#pragma rodata-name ([push,] <name>)</tt><label id="pragma-rodata-name"><p> +<sect1><tt>#pragma rodata-name ([push, ]<name>[ ,<addrsize>])</tt><label id="pragma-rodata-name"><p> - This pragma changes the name used for the RODATA segment (the RODATA - segment is used to store readonly data). The argument is a string - enclosed in double quotes. + This pragma changes the name used for the RODATA segment (the RODATA segment + is used to store read-only data). The <tt/name/ argument is a string enclosed + in quotation marks. - Note: The default linker configuration file does only map the standard - segments. If you use other segments, you have to create a new linker - configuration file. + <tt/addrsize/ is an optional string that gives a hint about where the + <tt/name/ segment will be put in the CPU's address space. It describes the + width of address numbers that point into that segment. Only words that + are known to ca65 are allowed: + <enum> + <item>"zp", "zeropage", "direct" + <item>"abs", "absolute", "near", "default" + <item>"far" + <item>"long", "dword" + </enum> - The <tt/#pragma/ understands the push and pop parameters as explained above. + Note: The default linker configuration file maps only the standard segments. + If you use other segments, you must create a new linker configuration file. - Example: + The <tt/#pragma/ understands the push and pop parameters, as explained above. + + Examples: <tscreen><verb> - #pragma rodata-name ("MyRODATA") + #pragma rodata-name ("MyRODATA") + #pragma rodata-name (push, "MyRODATA") </verb></tscreen> @@ -1086,9 +1521,9 @@ parameter with the <tt/#pragma/. Example: <tscreen><verb> - #pragma regvaraddr(on) /* Allow taking the address - * of register variables - */ + #pragma regvaraddr(on) /* Allow taking the address + * of register variables + */ </verb></tscreen> @@ -1128,14 +1563,14 @@ parameter with the <tt/#pragma/. Switch compiler warnings on or off. "name" is the name of a warning (see the <tt/<ref name="-W" id="option-W">/ compiler option for a list). The name is - either followed by "pop", which restores the last pushed state, or by "on" or - "off", optionally preceeded by "push" to push the current state before + followed either by "pop", which restores the last pushed state, or by "on" or + "off", optionally preceded by "push" to push the current state before changing it. Example: <tscreen><verb> /* Don't warn about the unused parameter in function func */ - #pragma warn (unused-param, push, off) + #pragma warn (unused-param, push, off) static int func (int unused) { return 0; @@ -1143,6 +1578,45 @@ parameter with the <tt/#pragma/. #pragma warn (unused-param, pop) </verb></tscreen> + +<sect1><tt>#pragma wrapped-call (push, <name>, <identifier>)</tt><label id="pragma-wrapped-call"><p> + + This pragma sets a wrapper for functions, often used for trampolines. + + The name is a function returning <tt/void/, and taking no parameters. + It must preserve the CPU's <tt/A/ and <tt/X/ registers if it wraps any + <tt/__fastcall__/ functions that have parameters. It must preserve + the <tt/Y/ register if it wraps any variadic functions (they have "<tt/.../" + in their prototypes). + + The identifier is an 8-bit number that's set into <tt/tmp4/. If the identifier + is "bank", then ca65's <tt><url url="ca65.html#.BANK" name=".bank"></tt> function will be used + to determine the number from the bank attribute defined in the linker config, + see <url url="ld65.html#MEMORY" name="Other MEMORY area attributes">. Note that + this currently implies that only the least significant 8 bits of the bank attribute + can be used. + + The address of a wrapped function is passed in <tt/ptr4/. The wrapper can + call that function by using "<tt/jsr callptr4/". + + This feature is useful, for example, with banked memory, to switch banks + automatically to where a wrapped function resides, and then to restore the + previous bank when it returns. + + The <tt/#pragma/ requires the push or pop argument as explained above. + + Example: + <tscreen><verb> +/* Note that this code can be in a header. */ +void mytrampoline(void); /* Doesn't corrupt __AX__ */ + +#pragma wrapped-call (push, mytrampoline, 5) +void somefunc1(void); +void somefunc2(int, char *); +#pragma wrapped-call (pop) + </verb></tscreen> + + <sect1><tt>#pragma writable-strings ([push,] on|off)</tt><label id="pragma-writable-strings"><p> Changes the storage location of string literals. For historical reasons, @@ -1167,13 +1641,12 @@ parameter with the <tt/#pragma/. Example: <tscreen><verb> - extern int foo; - #pragma zpsym ("foo"); /* foo is in the zeropage */ + extern int foo; + #pragma zpsym ("foo"); /* foo is in the zeropage */ </verb></tscreen> - <sect>Register variables<label id="register-vars"><p> The runtime for all supported platforms has 6 bytes of zero page space @@ -1224,39 +1697,44 @@ The compiler allows to insert assembler statements into the output file. The syntax is <tscreen><verb> - asm (<string literal>[, optional parameters]) ; + asm [optional volatile] (<string literal>[, optional parameters]) ; </verb></tscreen> or <tscreen><verb> - __asm__ (<string literal>[, optional parameters]) ; + __asm__ [optional volatile] (<string literal>[, optional parameters]) ; </verb></tscreen> <p> -The first form is in the user namespace and is disabled by <tt><ref +The first form is in the user namespace; and, is disabled by <tt><ref id="option--standard" name="--standard"></tt> if the argument is not <tt/cc65/. -The asm statement may be used inside a function and on global file level. An -inline assembler statement is a primary expression, so it may also be used as -part of an expression. Please note however that the result of an expression -containing just an inline assembler statement is always of type <tt/void/. +The <tt/asm/ statement can be used only inside a function. Please note that +the result of an inline assembler expression is always of type <tt/void/. -The contents of the string literal are preparsed by the compiler and inserted -into the generated assembly output, so that the can be further processed by -the backend and especially the optimizer. For this reason, the compiler does -only allow regular 6502 opcodes to be used with the inline assembler. Pseudo -instructions (like <tt/.import/, <tt/.byte/ and so on) are <em/not/ allowed, +The contents of the string literal are preparsed by the compiler; and, inserted +into the generated assembly output, so that it can be processed further by +the backend -- and, especially the optimizer. For that reason, the compiler does +allow only regular 6502 opcodes to be used with the inline assembler. Pseudo +instructions (like <tt/.import/, <tt/.byte/, and so on) are <em/not/ allowed, even if the ca65 assembler (which is used to translate the generated assembler -code) would accept them. The builtin inline assembler is not a replacement for -the full blown macro assembler which comes with the compiler. +code) would accept them. The built-in inline assembler is not a replacement for +the full-blown macro assembler which comes with the compiler. Note: Inline assembler statements are subject to all optimizations done by the -compiler. There is currently no way to protect an inline assembler statement -from being moved or removed completely by the optimizer. If in doubt, check -the generated assembler output, or disable optimizations. +compiler. There currently is no way to protect an inline assembler statement +-- alone -- from being moved or removed completely by the optimizer. If in +doubt, check the generated assembler output; or, disable optimizations (for +that function). + +As a shortcut, you can put the <tt/volatile/ qualifier in your <tt/asm/ +statements. It will disable optimization for the functions in which those +<tt/asm volatile/ statements sit. The effect is the same as though you put +<tt/#pragma optimize(push, off)/ above those functions, and <tt/#pragma +optimize(pop)/ below those functions. The string literal may contain format specifiers from the following list. For each format specifier, an argument is expected which is inserted instead of -the format specifier before passing the assembly code line to the backend. +the format specifier, before passing the assembly code line to the backend. <itemize> <item><tt/%b/ - Numerical 8-bit value @@ -1269,33 +1747,39 @@ the format specifier before passing the assembly code line to the backend. <item><tt/%%/ - The % sign itself </itemize><p> -Using these format specifiers, you can access C <tt/#defines/, variables or +Using those format specifiers, you can access C <tt/#defines/, variables, or similar stuff from the inline assembler. For example, to load the value of -a C <tt/#define/ into the Y register, one would use +a C <tt/#define/ into the Y index register, one would use <tscreen><verb> - #define OFFS 23 - __asm__ ("ldy #%b", OFFS); + #define OFFS 23 + __asm__ ("ldy #%b", OFFS); </verb></tscreen> Or, to access a struct member of a static variable: <tscreen><verb> - typedef struct { - unsigned char x; - unsigned char y; - unsigned char color; - } pixel_t; - static pixel_t pixel; - __asm__ ("ldy #%b", offsetof(pixel_t, color)); - __asm__ ("lda %v,y", pixel); + typedef struct { + unsigned char x; + unsigned char y; + unsigned char color; + unsigned char data[32]; + } pixel_t; + static pixel_t pixel; + __asm__ ("ldy #%b", offsetof(pixel_t, color)); + __asm__ ("lda %v,y", pixel); + + /* or to access an array member */ + static unsigned char i; + __asm__ ("ldy %v", i); + __asm__ ("lda %v+%b,y", pixel, offsetof(pixel_t, data)); </verb></tscreen> <p> The next example shows how to use global variables to exchange data between C -an assembler and how to handle assembler jumps: +and assembler; and, how to handle assembler jumps: <tscreen><verb> - unsigned char globalSubA, globalSubB, globalSubResult; + static unsigned char globalSubA, globalSubB, globalSubResult; /* return a-b, return 255 if b>a */ unsigned char sub (unsigned char a, unsigned char b) @@ -1314,19 +1798,19 @@ an assembler and how to handle assembler jumps: </verb></tscreen> <p> -Arrays can also be accessed: +Arrays also can be accessed: <tscreen><verb> - unsigned char globalSquareTable[] = { + static const unsigned char globalSquareTable[] = { 0, 1, 4, 9, 16, 25, 36, 49, 64, 81, 100, 121, 144, 169, 196, 225 }; - unsigned char globalSquareA, globalSquareResult; + static unsigned char globalSquareA, globalSquareResult; /* return a*a for a<16, else 255 */ unsigned char square (unsigned char a) { - if (a>15){ + if (a > 15) { return 255; } globalSquareA = a; @@ -1339,28 +1823,30 @@ Arrays can also be accessed: <p> Note: Do not embed the assembler labels that are used as names of global -variables or functions into your asm statements. Code like this +variables or functions into your <tt/asm/ statements. Code such as this: <tscreen><verb> int foo; - int bar () { return 1; } - __asm__ ("lda _foo"); /* DON'T DO THAT! */ + int bar (void) { return 1; } + ... + __asm__ ("lda _foo"); /* DON'T DO THAT! */ ... __asm__ ("jsr _bar"); /* DON'T DO THAT EITHER! */ </verb></tscreen> <p> -may stop working if the way, the compiler generates these names is changed in -a future version. Instead use the format specifiers from the table above: +might stop working if the way that the compiler generates those names is changed in +a future version. Instead, use the format specifiers from the table above: <tscreen><verb> - __asm__ ("lda %v", foo); /* OK */ + __asm__ ("lda %v", foo); /* OK */ ... __asm__ ("jsr %v", bar); /* OK */ </verb></tscreen> <p> + <sect>Implementation-defined behavior<p> This section describes the behavior of cc65 when the standard describes the @@ -1382,7 +1868,7 @@ This is the original compiler copyright: Anyone may copy or redistribute these programs, provided that: - 1: You don't charge anything for the copy. It is permissable to + 1: You don't charge anything for the copy. It is permissible to charge a nominal fee for media, etc. 2: All source code and documentation for the programs is made @@ -1423,15 +1909,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> - diff --git a/doc/chrcvt.sgml b/doc/chrcvt65.sgml similarity index 71% rename from doc/chrcvt.sgml rename to doc/chrcvt65.sgml index 848fb529d..a631a0004 100644 --- a/doc/chrcvt.sgml +++ b/doc/chrcvt65.sgml @@ -1,12 +1,11 @@ <!doctype linuxdoc system> <!-- -*- text-mode -*- --> <article> -<title>chrcvt Users Guide +<title>chrcvt65 Users Guide <author><url url="mailto:polluks@sdf.lonestar.org" name="Stefan A. Haubenthal"> -<date>2013-02-10 <abstract> -chrcvt is the vector font converter. It is able to convert a foreign font into +chrcvt65 is the vector font converter. It is able to convert a foreign font into the native format. </abstract> @@ -18,7 +17,7 @@ the native format. <sect>Overview<p> -chrcvt is a vector font converter. It is able to convert a "BGI Stroked +chrcvt65 is a vector font converter. It is able to convert a "BGI Stroked Font" to a compact TGI native vector font. See the function <url url="funcref.html#tgi_load_vectorfont" name="tgi_load_vectorfont"> for usage. @@ -26,7 +25,7 @@ url="funcref.html#tgi_load_vectorfont" name="tgi_load_vectorfont"> for usage. <sect>Usage<p> -The chrcvt utility converts the font of one Borland file to its cc65 equivalent. +The chrcvt65 utility converts the font of one Borland file to its cc65 equivalent. <sect1>Command line option overview<p> @@ -35,7 +34,7 @@ The program may be called as follows: <tscreen><verb> --------------------------------------------------------------------------- -Usage: chrcvt [options] file [options] [file] +Usage: chrcvt65 [options] file [options] [file] Short options: -h Help (this text) -v Be more verbose @@ -80,7 +79,7 @@ in TCH format to a new file. Example output for the command <tscreen><verb> -chrcvt --verbose LITT.CHR +chrcvt65 --verbose LITT.CHR </verb></tscreen> <tscreen><verb> BGI Stroked Font V1.1 - Aug 12, 1991 @@ -91,7 +90,7 @@ Copyright (c) 1987,1988 Borland International <sect>Copyright<p> -chrcvt is (C) Copyright 2009, Ullrich von Bassewitz. For usage of the +chrcvt65 is (C) Copyright 2009, Ullrich von Bassewitz. For usage of the binaries and/or sources the following conditions apply: This software is provided 'as-is', without any expressed or implied @@ -103,14 +102,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/cl65.sgml b/doc/cl65.sgml index 6e044b8d5..24d2f5927 100644 --- a/doc/cl65.sgml +++ b/doc/cl65.sgml @@ -2,8 +2,8 @@ <article> <title>cl65 Users Guide -<author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>01.08.2000, 27.11.2000, 02.10.2001 +<author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> +<url url="mailto:greg.king5@verizon.net" name="Greg King"> <abstract> cl65 is the compile & link utility for cc65, the 6502 C compiler. It was @@ -44,28 +44,31 @@ Short options: -o name Name the output file -r Enable register variables -t sys Set the target system - -u sym Force an import of symbol `sym' + -u sym Force an import of symbol 'sym' -v Verbose mode -vm Verbose map file -C name Use linker config file -Cl Make local variables static -D sym[=defn] Define a preprocessor symbol + -E Stop after the preprocessing stage -I dir Set a compiler include directory path -L path Specify a library search path -Ln name Create a VICE label file -O Optimize code - -Oi Optimize code, inline functions + -Oi Optimize code, inline more code -Or Optimize code, honour the register keyword - -Os Optimize code, inline known C funtions + -Os Optimize code, inline standard functions -S Compile but don't assemble and link -T Include source as comment -V Print the version number - -W name[,...] Supress compiler warnings + -W name[,...] Suppress compiler warnings -Wa options Pass options to the assembler + -Wc options Pass options to the compiler -Wl options Pass options to the linker Long options: --add-source Include source as comment + --all-cdecl Make functions default to __cdecl__ --asm-args options Pass options to the assembler --asm-define sym[=v] Define an assembler symbol --asm-include-dir dir Set an assembler include directory @@ -87,11 +90,10 @@ Long options: --debug Debug mode --debug-info Add debug info --feature name Set an emulation feature - --force-import sym Force an import of symbol `sym' + --force-import sym Force an import of symbol 'sym' --help Help (this text) --include-dir dir Set a compiler include directory path --ld-args options Pass options to the linker - --lib file Link this library --lib-path path Specify a library search path --list-targets List all available targets --listing name Create an assembler listing file @@ -100,9 +102,11 @@ Long options: --memory-model model Set the memory model --module Link as a module --module-id id Specify a module id for the linker + --no-target-lib Don't link the target library --o65-model model Override the o65 model --obj file Link this object file --obj-path path Specify an object file search path + --print-target-path Print the target file path --register-space b Set space available for register variables --register-vars Enable register variables --rodata-name seg Set the name of the RODATA segment @@ -118,103 +122,130 @@ Long options: --------------------------------------------------------------------------- </verb></tscreen> -Most of the options have the same meaning than the corresponding compiler, -assembler or linker option. See the documentation for these tools for an +Most of the options have the same meanings as the corresponding compiler, +assembler, and linker options. See the documentation for those tools for an explanation. If an option is available for more than one of the tools, it -is set for all tools, where it is available. One example for this is <tt/-v/: -The compiler, the assembler and the linker are all called with the <tt/-v/ +is set for all tools where it is available. One example for that is <tt/-v/: +The compiler, the assembler, and the linker are all called with the <tt/-v/ switch. There are a few remaining options that control the behaviour of cl65: <descrip> + <tag><tt>-E</tt></tag> + + This option is passed to the cc65 compiler; and, it forces cl65 to stop + before the assembly step. That means that C-level preprocessor directives + are obeyed; and, macros are expanded. But, the C source isn't compiled. + If the <tt/-o/ option isn't used, then the C code results are written into + files with a ".i" suffix on their base names. Assembler files, object + files, and libraries given on the command line are ignored. + + <tag><tt>-S</tt></tag> - This option forces cl65 to stop after the assembly step. This means that - C files are translated into assembler files, but nothing more is done. - Assembler files, object files and libraries given on the command line + This option forces cl65 to stop before the assembly step. That means that + C files are translated into assembler files; but, nothing more is done. + Assembler files, object files, and libraries given on the command line are ignored. <tag><tt>-c</tt></tag> - This options forces cl65 to stop after the assembly step. This means + This option forces cl65 to stop after the assembly step. That means that C and assembler files given on the command line are translated into - object files, but there is no link step, and object files and libraries + object files; but, there is no link step. Object files and libraries given on the command line are ignored. <tag><tt>-o name</tt></tag> - The -o option is used for the target name in the final step. This causes - problems, if the linker will not be called, and there are several input - files on the command line. In this case, the name given with -o will be + The -o option is used for the target name in the final step. That causes + problems if the linker will not be called, and there are several input + files on the command line. In that case, the name given with -o will be used for all of them, which makes the option pretty useless. You - shouldn't use -o when more than one output file is created. + shouldn't use <tt/-o/ when more than one output file is created. + + + <tag><tt>--print-target-path</tt></tag> + + This option prints the absolute path of the target file directory, and exits + then. It is supposed to be used with shell backquotes or the GNU make shell + function. That way, you can write build scripts or Makefiles accessing target + files without any assumption about the cc65 installation path. <tag><tt>-t sys, --target sys</tt></tag> - The default for this option is different from the compiler and linker in the - case that the option is missing: While the other tools (compiler, assembler + The default for this option is different from the compiler and linker, in the + case that the option is missing: While the other tools (compiler, assembler, and linker) will use the "none" system settings by default, cl65 will use - the C64 as a target system by default. This was chosen since most people + "c64" as a target system by default. That was chosen because most people seem to use cc65 to develop for the C64. + + <tag><tt>--no-target-lib</tt></tag> + + This option tells the cl65 to not include the target library into the list + of libraries. + + + <tag><tt>-Wa options, --asm-args options</tt></tag> Pass options directly to the assembler. This may be used to pass options that aren't directly supported by cl65. Several options may be separated by - commas, the commas are replaced by spaces when passing them to the - assembler. Beware: Passing arguments directly to the assembler may interfere - with some of the defaults, because cl65 doesn't parse the options passed. So - if cl65 supports an option by itself, do not pass this option to the + commas; the commas are replaced by spaces when passing them to the + assembler. Beware: Passing arguments directly to the assembler might interfere + with some of the defaults because cl65 doesn't parse the options passed. So, + if cl65 supports an option by itself, do not pass that option to the assembler by means of the <tt/-Wa/ switch. + <tag><tt>-Wc options, --cc-args options</tt></tag> Pass options directly to the compiler. This may be used to pass options that aren't directly supported by cl65. Several options may be separated by - commas, the commas are replaced by spaces when passing them to the - compiler. Beware: Passing arguments directly to the compiler may interfere - with some of the defaults, because cl65 doesn't parse the options passed. So - if cl65 supports an option by itself, do not pass this option to the + commas; the commas are replaced by spaces when passing them to the + compiler. Beware: Passing arguments directly to the compiler might interfere + with some of the defaults because cl65 doesn't parse the options passed. So, + if cl65 supports an option by itself, do not pass that option to the compiler by means of the <tt/-Wc/ switch. + <tag><tt>-Wl options, --ld-args options</tt></tag> Pass options directly to the linker. This may be used to pass options that aren't directly supported by cl65. Several options may be separated by - commas, the commas are replaced by spaces when passing them to the linker. - Beware: Passing arguments directly to the linker may interfere with some of - the defaults, because cl65 doesn't parse the options passed. So if cl65 - supports an option by itself, do not pass this option to the linker by means + commas; the commas are replaced by spaces when passing them to the linker. + Beware: Passing arguments directly to the linker might interfere with some of + the defaults because cl65 doesn't parse the options passed. So, if cl65 + supports an option by itself, do not pass that option to the linker by means of the <tt/-Wl/ switch. -</descrip> +</descrip> <sect>More usage<p> -Since cl65 was created to simplify the use of the cc65 development +Because cl65 was created to simplify the use of the cc65 development package, it tries to be smart about several things. <itemize> -<item> If you don't give a target system on the command line, cl65 - defaults to the C64. +<item> If you don't give a target system on the command line, cl65 + defaults to the C64. -<item> When linking, cl65 will supply the names of the startup file and - library for the target system to the linker, so you don't have to do - that. +<item> When linking, cl65 will supply the name of the library file for + the target system to the linker; so, you don't have to do that. -<item> If the final step is the linker, and the name of the output file was - not explicitly given, cl65 will use the name of the first input file - without the extension, provided that the name of this file has an - extension. So you don't need to name the executable name in most - cases, just give the name of your "main" file as first input file. +<item> If the final step is the linker, and the name of the output file was + not explicitly given, cl65 will use the name of the first input file + without the extension, provided that the name of that file has an + extension. So, you don't need to give the executable name in most + cases; just give the name of your "main" file as the first input file. </itemize> The command line is parsed from left to right, and the actual processing tool @@ -235,7 +266,7 @@ The type of an input file is derived from its extension: <itemize> <item>C files: <tt/.c/ <item>Assembler files: <tt/.s/, <tt/.asm/, <tt/.a65/ -<item>Object files: <tt/.o/ <tt/.obj/ +<item>Object files: <tt/.o/, <tt/.obj/ <item>Libraries: <tt/.a/, <tt/.lib/ <item>GEOS resource files: <tt/.grc/ <item>o65 files: <tt/.o65/, <tt/.emd/, <tt/.joy/, <tt/.tgi/ @@ -252,24 +283,24 @@ assembler file (irq.s) will need the following separate steps to compile into an executable named morse: <tscreen><verb> - cc65 -g -Oi -t c64 morse.c - ca65 -g morse.s - ca65 -g irq.s - ld65 -o morse -t c64 c64.o morse.o irq.o c64.lib + cc65 -g -Oi -t c64 morse.c + ca65 -g morse.s + ca65 -g irq.s + ld65 -o morse -t c64 c64.o morse.o irq.o c64.lib </verb></tscreen> When using cl65, this is simplified to <tscreen><verb> - cl65 -g -Oi morse.c irq.s + cl65 -g -Oi morse.c irq.s </verb></tscreen> As a general rule, you may use cl65 instead of cc65 at most times, especially in makefiles to build object files directly from C files. Use <tscreen><verb> - .c.o: - cl65 -g -Oi $< + .c.o: + cl65 -g -Oi $< </verb></tscreen> to do this. @@ -291,17 +322,16 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> - diff --git a/doc/co65.sgml b/doc/co65.sgml index 9d70ffe6a..0a50fb3a8 100644 --- a/doc/co65.sgml +++ b/doc/co65.sgml @@ -3,7 +3,6 @@ <article> <title>co65 Users Guide <author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>12.02.2003 <abstract> co65 is an object file conversion utility. It converts o65 object files into @@ -236,12 +235,12 @@ things to be different from runtime loading: <item> Without changing the segment names, all segments take the default names used by the standard linker configurations. This means that the - driver code is no longer contingous in memory, instead the code + driver code is no longer contiguous in memory, instead the code segment is placed somewhere in between all other code segments, the data segment is placed with all other data segments and so on. If the driver doesn't do strange things this shouldn't be a problem. -<item> With statically linked code, data and bss segments will get intialized +<item> With statically linked code, data and bss segments will get initialized once (when the application is loaded), while a loadable driver will get its initialization each time the driver is loaded into memory (which may be more than once in the lifetime of a program). It depends @@ -286,7 +285,7 @@ segment. Use the assembler to generate an object file from the assembler output. <tscreen><verb> - co65 --code-label _c64_hi c64-hi.tgi + co65 --code-label _c64_hi c64-hi.tgi ca65 c64-hi.s </verb></tscreen> @@ -294,7 +293,7 @@ Next, change your C code to declare a variable that is actually the address of the driver: <tscreen><verb> - extern void c64_hi[]; + extern void c64_hi[]; </verb></tscreen> Instead of loading and unloading the driver, change the code to install and @@ -330,14 +329,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/coding.sgml b/doc/coding.sgml index f6dfc3a35..3b1066dcd 100644 --- a/doc/coding.sgml +++ b/doc/coding.sgml @@ -3,7 +3,6 @@ <article> <title>cc65 coding hints <author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>2000-12-03, 2009-09-01 <abstract> How to generate the most effective code with cc65. @@ -60,7 +59,7 @@ slower than the same code for unsigned types. <sect>Use chars instead of ints if possible<p> -While in arithmetic operations, chars are immidiately promoted to ints, they +While in arithmetic operations, chars are immediately promoted to ints, they are passed as chars in parameter lists and are accessed as chars in variables. The code generated is usually not much smaller, but it is faster, since accessing chars is faster. For several operations, the generated code may be @@ -128,17 +127,17 @@ and predecrement operators if you don't need the resulting value. That means, use <tscreen><verb> - ... - ++i; - ... + ... + ++i; + ... </verb></tscreen> instead of <tscreen><verb> - ... - i++; - ... + ... + i++; + ... </verb></tscreen> @@ -149,24 +148,24 @@ The compiler produces optimized code, if the value of a pointer is a constant. So, to access direct memory locations, use <tscreen><verb> - #define VDC_STATUS 0xD601 - *(char*)VDC_STATUS = 0x01; + #define VDC_STATUS 0xD601 + *(char*)VDC_STATUS = 0x01; </verb></tscreen> That will be translated to <tscreen><verb> - lda #$01 - sta $D601 + lda #$01 + sta $D601 </verb></tscreen> The constant value detection works also for struct pointers and arrays, if the subscript is a constant. So <tscreen><verb> - #define VDC ((unsigned char*)0xD600) - #define STATUS 0x01 - VDC[STATUS] = 0x01; + #define VDC ((unsigned char*)0xD600) + #define STATUS 0x01 + VDC[STATUS] = 0x01; </verb></tscreen> will also work. @@ -183,14 +182,14 @@ Initialization of local variables when declaring them gives shorter and faster code. So, use <tscreen><verb> - int i = 1; + int i = 1; </verb></tscreen> instead of <tscreen><verb> - int i; - i = 1; + int i; + i = 1; </verb></tscreen> But beware: To maximize your savings, don't mix uninitialized and initialized @@ -202,18 +201,18 @@ variables, you force the compiler to allocate space for the uninitialized variables each time, it parses an initialized one. So do this: <tscreen><verb> - int i, j; - int a = 3; - int b = 0; + int i, j; + int a = 3; + int b = 0; </verb></tscreen> instead of <tscreen><verb> - int i; - int a = 3; - int j; - int b = 0; + int i; + int a = 3; + int j; + int b = 0; </verb></tscreen> The latter will work, but will create larger and slower code. @@ -229,17 +228,17 @@ common cases. Don't use <tscreen><verb> - char* a; - char b, c; - char b = *(a + c); + char* a; + char b, c; + char b = *(a + c); </verb></tscreen> Use <tscreen><verb> - char* a; - char b, c; - char b = a[c]; + char* a; + char b, c; + char b = a[c]; </verb></tscreen> instead. @@ -252,7 +251,7 @@ Register variables may give faster and shorter code, but they do also have an overhead. Register variables are actually zero page locations, so using them saves roughly one cycle per access. The calling routine may also use register variables, so the old values have to be saved on function entry and restored -on exit. Saving an d restoring has an overhead of about 70 cycles per 2 byte +on exit. Saving and restoring has an overhead of about 70 cycles per 2 byte variable. It is easy to see, that - apart from the additional code that is needed to save and restore the values - you need to make heavy use of a variable to justify the overhead. diff --git a/doc/creativision.sgml b/doc/creativision.sgml new file mode 100644 index 000000000..f7e5de8b1 --- /dev/null +++ b/doc/creativision.sgml @@ -0,0 +1,181 @@ +<!doctype linuxdoc system> + +<article> +<title>VTech Creativision (aka Funvision) specific information for cc65 +<author><url url="mailto:polluks+cc65@sdf.lonestar.org" name="Stefan A. Haubenthal"> + +<abstract> +An overview over the Creativision runtime system as it is implemented for the +cc65 C compiler. +</abstract> + +<!-- Table of contents --> +<toc> + +<!-- Begin the document --> + +<sect>Overview<p> + +This file contains an overview of the Creativision runtime system as it comes +with the cc65 C compiler. It describes the memory layout, Creativision specific header +files, available drivers, and any pitfalls specific to that platform. + +Please note that Creativision specific functions are just mentioned here, they are +described in detail in the separate <url url="funcref.html" name="function +reference">. Even functions marked as "platform dependent" may be available on +more than one platform. Please see the function reference for more information. + + +<sect>Binary format<p> + +The standard binary output format generated by the linker for the Creativision target +is a 4 KB ROM image. To create an 8 KB ROM a custom linker script has +to be used. + +<sect>Memory layout<p> + +cc65 generated programs with the default setup are 4 KB in size, +occupying $B000 - $BFFF. Usable memory space for the +user program is $B000 - $BEFF. $BF00 - +$BFFF is reserved for the runtime and cartridge configuration +area. + +Special locations: + +<descrip> + <tag/Text screen/ + The text screen is located at VRAM $1000. + + <tag/Stack/ + The C runtime stack is located at $03FF and growing downwards. + + <tag/RAM/ + The available RAM for cc65 programs of an unexpanded Creativision + starts at $01FA and ends at $03FF. + + <tag/Heap/ + The C heap is located at the end of the program's data area and + grows towards the C runtime stack. + +</descrip><p> + + + +<sect>Platform specific header files<p> + +Programs containing Creativision specific code may use the <tt/creativision.h/ header file. + + +<sect1>Creativision specific functions<p> + +<itemize> +<item>bios_playsound +<item>psg_delay +<item>psg_outb +<item>psg_silence +</itemize> + + + +<!--<sect1>Hardware access<p> + +The following pseudo variables declared in the <tt/creativision.inc/ include file do +allow access to hardware located in the address space. + +<descrip> + + <tag><tt/VDP/</tag> + The <tt/VDP/ defines allow access to the video chip. + +</descrip><p> + +<descrip> + + <tag><tt/PIA/</tag> + The <tt/PIA/ defines allow access to the I/O chip. + +</descrip><p>--> + + + +<sect>Loadable drivers<p> + +<sect1>Graphics drivers<p> + +No graphics drivers are currently available for the Creativision. + + +<sect1>Extended memory drivers<p> + +No extended memory drivers are currently available for the Creativision. + + +<sect1>Joystick drivers<p> + +<descrip> + + <tag><tt/creativision-stdjoy.joy (creativisionstd_joy)/</tag> + A joystick driver for the standard joystick is available. + +</descrip><p> + +<sect1>Mouse drivers<p> + +No mouse drivers are currently available for the Creativision. + + +<sect1>RS232 device drivers<p> + +No communication port drivers are currently available for the Creativision. + + + +<sect>Limitations<p> + +<sect1>Disk I/O<p> + +The existing library for the Creativision doesn't implement C file +I/O. There are even no hacks for the <tt/read()/ and <tt/write()/ routines. + +To be more concrete, this limitation means that you cannot use any of the +following functions (and a few others): + +<itemize> +<item>fclose +<item>fopen +<item>fread +<item>fprintf +<item>fputc +<item>fscanf +<item>fwrite +<item>... +</itemize> + + + +<sect>Other hints<p> + + + +<sect>License<p> + +This software is provided 'as-is', without any expressed or implied +warranty. In no event will the authors be held liable for any damages +arising from the use of this software. + +Permission is granted to anyone to use this software for any purpose, +including commercial applications, and to alter it and redistribute it +freely, subject to the following restrictions: + +<enum> +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. +</enum> + +</article> diff --git a/doc/customizing.sgml b/doc/customizing.sgml index 0a0b8c87e..e18bcf86c 100644 --- a/doc/customizing.sgml +++ b/doc/customizing.sgml @@ -3,7 +3,6 @@ <article> <title>Defining a Custom cc65 Target <author>Bruce Reidenbach -<date>2015-03-13 <abstract> This section provides step-by-step instructions on how to use the cc65 @@ -78,15 +77,15 @@ vectors at the proper memory locations. The segment definition is: <tscreen><code> SEGMENTS { - ZEROPAGE: load = ZP, type = zp, define = yes; - DATA: load = ROM, type = rw, define = yes, run = RAM; - BSS: load = RAM, type = bss, define = yes; - HEAP: load = RAM, type = bss, optional = yes; - STARTUP: load = ROM, type = ro; - INIT: load = ROM, type = ro, optional = yes; - CODE: load = ROM, type = ro; - RODATA: load = ROM, type = ro; - VECTORS: load = ROM, type = ro, start = $FFFA; + ZEROPAGE: load = ZP, type = zp, define = yes; + DATA: load = ROM, type = rw, define = yes, run = RAM; + BSS: load = RAM, type = bss, define = yes; + HEAP: load = RAM, type = bss, optional = yes; + STARTUP: load = ROM, type = ro; + ONCE: load = ROM, type = ro, optional = yes; + CODE: load = ROM, type = ro; + RODATA: load = ROM, type = ro; + VECTORS: load = ROM, type = ro, start = $FFFA; } </code></tscreen> @@ -97,7 +96,7 @@ The meaning of each of these segments is as follows. <p><tt> BSS: </tt>Uninitialized data stored in RAM (used for variable storage) <p><tt> HEAP: </tt>Uninitialized C-level heap storage in RAM, optional <p><tt> STARTUP: </tt>The program initialization code, stored in ROM -<p><tt> INIT: </tt>The code needed to initialize the system, stored in ROM +<p><tt> ONCE: </tt>The code run once to initialize the system, stored in ROM <p><tt> CODE: </tt>The program code, stored in ROM <p><tt> RODATA: </tt>Initialized data that cannot be modified by the program, stored in ROM <p><tt> VECTORS: </tt>The interrupt vector table, stored in ROM at location $FFFA diff --git a/doc/cx16.sgml b/doc/cx16.sgml new file mode 100644 index 000000000..78a51206b --- /dev/null +++ b/doc/cx16.sgml @@ -0,0 +1,364 @@ +<!doctype linuxdoc system> + +<article> +<title>Commander X16-specific information for cc65 +<author><url url="mailto:greg.king5@verizon.net" name="Greg King"> + +<abstract> +An overview over the CX16 run-time system as it's implemented for the cc65 C +compiler. +</abstract> + +<!-- Table of contents --> +<toc> + +<!-- Begin the document --> + +<sect>Overview<p> + +The Commander X16 is a modern small computer with firmware that is based partly +on the ROMs in Commodore's VIC-20 and 64C. It has a couple of I/O chips +(WDC65C22 VIA) that are like the ones in the VIC-20. It supports file storage +on Secure Digital cards. It allows two joysticks and a mouse. It has three +sound devices. Its VGA screen has twice the range of the C64 (similar to the +C128's 80-column screen), with 256 colors. + +This file contains an overview of the CX16 run-time system as it comes with the +cc65 C compiler. It describes the memory layout, CX16-specific header files, +available drivers, and any pitfalls specific to that platform. + +Please note that CX16-specific functions just are mentioned here; they might be +described in detail in the separate <url url="funcref.html" name="function +reference">. Even functions marked as "platform dependent" may be available on +more than one platform. Please see the function reference for more +information. + + + +<sect>Binary format<p> + +The standard binary output format generated by the linker for the CX16 target +is a machine language program that's prepended with a 16-bit load address and a +one-line BASIC stub which calls the machine language part via SYS. That means +that a program can be loaded as a BASIC program, and started with RUN. It is, +of course, possible to change that behaviour by using a modified program-header +file and linker config. + + + +<sect>Memory layout<p> + +cc65-generated programs with the default setup run with the I/O area, RAM bank +one, and the Kernal ROM being visible. That means that Kernal entry points +can be called directly. The usable memory ranges are $0800 - +$9EFF, $0400 - $07FF, and $A000 - $BFFF. + +Special locations: + +<descrip> + <tag/Stack/ + The C run-time stack is located at $9EFF, and grows downward. + + <tag/Heap/ + The C heap is located at the end of the program, and grows toward the C + run-time stack. + + <tag/Bank RAM/ + Bank RAM is located at $A000 - $BFFF. It's an eight-Kibibyte + window into a half Mebibyte or two Mebibytes of banked RAM. + + <tag/Bank ROM/ + Bank ROM is located at $C000 - $FFFF. It's a sixteen-Kibibyte + window into 128 Kibibytes of banked ROM. +</descrip><p> + + + +<sect>Linker configurations<p> + +The ld65 linker comes with a default config. file for the Commander X16, which +is used via <tt/-t cx16/. The cx16 package comes with additional secondary +linker config. files which are used via <tt/-t cx16 -C <configfile>/. + +Those files use 94 bytes in the zero page. (The rest of page zero is reserved +for Kernal and BASIC.) + + +<sect1>Default config. file (<tt/cx16.cfg/)<p> + +The default configuration is tailored to C programs. It supplies the load +address and a small BASIC stub that starts the compiled program using a SYS +command. + + +<sect1><tt/cx16-asm.cfg/<p> + +This configuration is made for Assembly programmers who don't need a special +setup. The default start address is $0801. It can be changed with the +linker command-line option <tt/--start-addr/ or <tt/-S/. All standard segments, +with the exception of <tt/ZEROPAGE/, are written to the output file; +and, a two-byte load address is prepended. + +To use that config. file, assemble with <tt/-t cx16/, and link with <tt/-C +cx16-asm.cfg/. The former will make sure that the correct character +translations are in effect, while the latter supplies the actual config. +When using <tt/cl65/, use both command-line options. + +Sample command line for <tt/cl65/: +<tscreen><verb> +cl65 -o file.prg -t cx16 -C cx16-asm.cfg source.s +</verb></tscreen> + +To generate code that loads to $A000: +<tscreen><verb> +cl65 -o file.prg -Wl -S,$A000 -t cx16 -C cx16-asm.cfg source.s +</verb></tscreen> + +It also is possible to add a small BASIC header to the program, that uses SYS +to jump to the program entry point (which is the start of the code segment). +The advantage is that the program can be started using RUN. + +To generate a program with a BASIC SYS header, use +<tscreen><verb> +cl65 -o file.prg -u __EXEHDR__ -t cx16 -C cx16-asm.cfg source.s +</verb></tscreen> + +Please note that, in this case, a changed start address doesn't make sense, +because the program must be loaded to BASIC's start address. + + + +<sect>Platform-specific header files<p> + +Programs containing CX16-specific code may use the <tt/cx16.h/ or <tt/cbm.h/ +header files. Using the later may be an option when writing code for more than +one CBM-like platform, because it includes <tt/cx16.h/, and declares several +functions common to all CBM-like platforms. + + +<sect1>CX16-specific functions<p> + +The functions listed below are special for the CX16. See the <url +url="funcref.html" name="function reference"> for declarations and usage. + +<itemize> +<item>get_ostype() +<item>set_tv() +<item>videomode() +<item>vpeek() +<item>vpoke() +</itemize> + +<tt/cpeekcolor()/ works differently on the Commander X16 than it does on other +platforms. Each character has two colors: background and text (foreground). +<tt/cpeekcolor()/ returns both colors. The high nybble describes the +background color, the low nybble describes the text color. For example, if the +function is used on the default screen, then it returns $61, which means +white-on-blue. + + +<sect1>CBM-specific functions<p> + +Some functions are available for all (or, at least most) of the Commodore-like +machines. See the <url url="funcref.html" name="function reference"> for +declarations and usage. + +<itemize> +<item>cbm_close() +<item>cbm_closedir() +<item>cbm_k_basin() +<item>cbm_k_bsout() +<item>cbm_k_chkin() +<item>cbm_k_ckout() +<item>cbm_k_close() +<item>cbm_k_clrch() +<item>cbm_k_getin() +<item>cbm_k_load() +<item>cbm_k_open() +<item>cbm_k_readst() +<item>cbm_k_save() +<item>cbm_k_second() +<item>cbm_k_setlfs() +<item>cbm_k_setnam() +<item>cbm_k_tksa() +<item>cbm_load() +<item>cbm_open() +<item>cbm_opendir() +<item>cbm_read() +<item>cbm_readdir() +<item>cbm_save() +<item>cbm_write() +<item>get_tv() +<item>waitvsync() +</itemize> + + +<sect1>Hardware access<p> + +The following pseudo variables declared in the <tt/cx16.h/ header file do allow +access to hardware located in the address space. Some variables are +structures, accessing the struct fields will access the chip registers. + +<descrip> + + <tag><tt/RAM_BANK/</tag> + A register that controls which bank of high RAM is visible in the + <tt/BANK_RAM/ window. + + <tag><tt/ROM_BANK/</tag> + A register that controls which bank of ROM is active at the moment. + + <tag><tt/VIA1, VIA2/</tag> + Access to the two VIA (Versatile Interface Adapter) chips is available via + the <tt/VIA1/ and <tt/VIA2/ variables. The structure behind those variables + is explained in <tt/_6522.h/. + + <tag><tt/VERA/</tag> + The <tt/VERA/ structure allows access + to the Video Enhanced Retro Adapter chip. + + <tag><tt/BANK_RAM/</tag> + A character array that mirrors the eight-Kibibyte window, at $A000, + into banked RAM. +</descrip><p> + + + +<sect>Loadable drivers<p> + +The names in the parentheses denote the symbols to be used for static linking +of the drivers. The names fit into the old 8.3-character limit of the SD-Card's +FAT32 file-system. + + +<sect1>Graphics drivers<p> + +The default drivers, <tt/tgi_stddrv (tgi_static_stddrv)/, +point to <tt/cx320p1.tgi (cx320p1_tgi)/. + +<descrip> + <tag><tt/cx320p1.tgi (cx320p1_tgi)/</tag> + This driver features a resolution of 320 across and 240 down with 256 colors, + and a slightly adjustable palette (the order of the colors can be changed in + a way that's compatible with some of the other color drivers). +</descrip><p> + + +<sect1>Extended memory drivers<p> + +No extended memory drivers are available currently for the CX16. + + +<sect1>Joystick drivers<p> + +The default drivers, <tt/joy_stddrv (joy_static_stddrv)/, +point to <tt/cx16-std.joy (cx16_std_joy)/. + +<descrip> + <tag><tt/cx16-std.joy (cx16_std_joy)/</tag> + Supports the keyboard emulation of a controller and up to four SNES (and NES) + controllers connected to the joystick ports of the CX16. It reads the four + directions, and the <bf/A/, <bf/B/, <bf/Select/, and <bf/Start/ buttons. + Buttons <bf/A/ and <bf/B/ are the first and second fire buttons. +</descrip><p> + + +<sect1>Mouse drivers<p> + +The default drivers, <tt/mouse_stddrv (mouse_static_stddrv)/, +point to <tt/cx16-std.mou (cx16_std_mou)/. + +<descrip> + <tag><tt/cx16-std.mou (cx16_std_mou)/</tag> + Supports a standard 3-button mouse connected to the PS/2 mouse port of the + Commander X16. + + Currently, this driver doesn't support <tt/mouse_move()/ and + <tt/mouse_setbox()/. +</descrip><p> + + +<sect1>RS232 device drivers<p> + +No serial drivers are available currently for the CX16. + + + +<sect>Limitations<p> + +The Commander X16 still is being designed. Its configuration can change at +any time. Some changes could make old programs fail to work. + + + +<sect>Other hints<p> + + +<sect1>STOP and RUN codes<p> + +The <tt/Esc/ key acts as Commodore's <tt/STOP/ key -- or, you can press the +<tt/Ctrl/ key and the <tt/C/ key together. Pressing the <tt/Shift/ and the +<tt/Esc/ keys together will type Commodore's <tt/RUN/ key. + + +<sect1>Escape code<p> + +For an <tt/Esc/, press the <tt/Ctrl/ key and the <tt/[/ key together. + + +<sect1>Passing arguments to the program<p> + +Command-line arguments can be passed to <tt/main()/. Because that is not +supported directly by BASIC, the following syntax was chosen: +<tscreen><verb> + RUN:REM ARG1 " ARG2 IS QUOTED" ARG3 "" ARG5 +</verb></tscreen> + +<enum> +<item>Arguments are separated by spaces. +<item>Arguments may be quoted. +<item>Leading and trailing spaces around an argument are ignored. Spaces within + a quoted argument are allowed. +<item>The first argument passed to <tt/main()/ is the program name. +<item>A maximum number of 10 arguments (including the program name) are + supported. +</enum> + + +<sect1>Program return code<p> + +The program return code (low byte) is passed back to BASIC by the use of its +<tt/ST/ variable. + + +<sect1>Interrupts<p> + +The run-time for the CX16 uses routines marked as <tt/.INTERRUPTOR/ for +interrupt handlers. Such routines must be written as simple machine language +subroutines, and will be called automatically by the interrupt handler code +if they are linked into a program. See the discussion of the <tt/.CONDES/ +feature in the <url url="ca65.html" name="assembler manual">. + + + +<sect>License<p> + +This software is provided "as-is", without any expressed or implied +warranty. In no event will the authors be held liable for any damages +arising from the use of this software. + +Permission is granted to anyone to use this software for any purpose, +including commercial applications, and to alter it and redistribute it +freely, subject to the following restrictions: +<enum> +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated, but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. +</enum> + +</article> diff --git a/doc/da65.sgml b/doc/da65.sgml index df8cd7772..bf074a667 100644 --- a/doc/da65.sgml +++ b/doc/da65.sgml @@ -5,7 +5,6 @@ <author> <url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> <url url="mailto:greg.king5@verizon.net" name="Greg King"> -<date>2014-11-23 <abstract> da65 is a 6502/65C02 disassembler that is able to read user-supplied @@ -53,6 +52,7 @@ Short options: -o name Name the output file -v Increase verbosity -F Add formfeeds to the output + -s Accept line markers in the info file -S addr Set the start/load address -V Print the disassembler version @@ -70,6 +70,7 @@ Long options: --mnemonic-column n Specify mnemonic start column --pagelength n Set the page length for the listing --start-addr addr Set the start/load address + --sync-lines Accept line markers in the info file --text-column n Specify text start column --verbose Increase verbosity --version Print the disassembler version @@ -111,13 +112,17 @@ Here is a description of all the command line options: <itemize> <item>6502 <item>6502x + <item>6502dtv <item>65sc02 <item>65c02 <item>huc6280 + <item>4510 </itemize> - 6502x is for the NMOS 6502 with unofficial opcodes. huc6280 is the CPU of - the PC engine. Support for the 65816 currently is not available. + 6502x is for the NMOS 6502 with unofficial opcodes. 6502dtv is for the + emulated CPU of the C64DTV device. huc6280 is the CPU of the PC engine. + 4510 is the CPU of the Commodore C65. Support for the 65816 currently + is not available. <label id="option--formfeeds"> @@ -151,7 +156,7 @@ Here is a description of all the command line options: <tag><tt>-i name, --info name</tt></tag> Specify an info file. The info file contains global options that may - override or replace command line options plus informations about the code + override or replace command line options plus information about the code that has to be disassembled. See the separate section <ref id="infofile" name="Info File Format">. @@ -203,6 +208,17 @@ Here is a description of all the command line options: start address is specified, $10000 minus the size of the input file is used. + <label id="option--sync-lines"> + <tag><tt>-s, --sync-lines</tt></tag> + + Accept line markers in the info file in the following syntax: +<tscreen><verb> +#line <lineno> ["<filename>"] +# <lineno> "<filename>" [<flag>] ... +</verb></tscreen> + This option is intended for preprocessing info files with "cpp" or "m4". + + <label id="option--text-column"> <tag><tt>--text-column n</tt></tag> @@ -237,7 +253,15 @@ for this CPU. Invalid opcodes are translated into <tt/.byte/ commands. With the command line option <tt><ref id="option--cpu" name="--cpu"></tt>, the disassembler may be told to recognize either the 65SC02 or 65C02 CPUs. The latter understands the same opcodes as the former, plus 16 additional bit -manipulation and bit test-and-branch commands. +manipulation and bit test-and-branch commands. Using 6502x as CPU the illegal +opcodes of 6502 CPU are detected and displayed. 6502dtv setting recognizes the +emulated CPU instructons of the C64DTV device. + + +When disassembling 4510 code, due to handling of 16-bit wide branches, da65 +can produce output that can not be re-assembled, when one or more of those +branches point outside of the disassembled memory. This can happen when text +or binary data is processed. While there is some code for the 65816 in the sources, it is currently unsupported. @@ -292,9 +316,10 @@ anything). Each attribute is terminated by a semicolon. <sect1>Comments<p> -Comments start with a hash mark (<tt/#/); and, extend from the position of -the mark to the end of the current line. Hash marks inside of strings will -<em/not/ start a comment, of course. +Comments start with a hash mark (<tt/#/) or a double slash (<tt>//</tt>); +and, extend from the position of the mark to the end of the current line. +Hash marks or double slashes inside of strings will <em/not/ start a comment, +of course. <sect1>Specifying global options<label id="global-options"><p> @@ -535,6 +560,18 @@ code. The following attributes are recognized: range, where <tt/label/ is the label name given with the <tt/NAME/ attribute, and <tt/offs/ is the offset within the data. + <tag><tt>PARAMSIZE</tt></tag> + This optional attribute is followed by a numerical value. It tells the + assembler that subroutine calls to this label are followed by + "inline parameters" with the given number of bytes, like this: + +<tscreen><verb> + JSR LabelWithParamSize2 + .byte $00, $10 + (return here) + code... +</verb></tscreen> + </descrip> diff --git a/doc/debugging.sgml b/doc/debugging.sgml index c7c7792db..ce678601d 100644 --- a/doc/debugging.sgml +++ b/doc/debugging.sgml @@ -1,10 +1,8 @@ <!doctype linuxdoc system> <article> - <title>Using emulators with cc65 <author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>2014-04-11 <abstract> How to debug your code using the VICE and Oricutron emulators. @@ -18,7 +16,7 @@ How to debug your code using the VICE and Oricutron emulators. <sect>Overview<p> This document describes how to debug your programs using the cc65 development -tools and the VICE CBM emulator. +tools and the VICE or Oricutron emulator. @@ -41,7 +39,7 @@ transfer the program to the real machine until it is done. <item>An emulator allows many things that are almost impossible one of the original machines. You may set watchpoints (detect read or write access to -arbitary addresses), debug interrupt handlers and even debug routines that run +arbitrary addresses), debug interrupt handlers and even debug routines that run inside the 1541 floppy. <item>You may use the label file generated by the linker to make much more use @@ -111,7 +109,7 @@ Load your program, then enter the monitor and use the "<tt/ll/" command to load your label file like this: <tscreen><verb> - ll "hello.lbl" + ll "hello.lbl" </verb></tscreen> You will get lots of warnings and even a few errors. You may ignore safely all @@ -119,15 +117,21 @@ these warnings and errors as long as they reference any problems VICE thinks it has with the labels. After loading the labels, they are used by VICE in the disassembler listing, -and you may use them whereever you need to specify an address. Try +and you may use them wherever you need to specify an address. Try <tscreen><verb> - d ._main + d ._main </verb></tscreen> as an example (note that VICE needs a leading dot before all labels, and that the compiler prepends an underline under most named labels). +If you start the emulator from the commandline, you can also load the labels +directly using something like this: + +<tscreen><verb> + x64sc -moncommands hello.lbl hello.prg +</verb></tscreen> <sect>How to use the label file with Oricutron<p> @@ -136,18 +140,17 @@ Load your program, then enter the monitor and use the "<tt/sl/" command to load your label file like this: <tscreen><verb> - sl hello.sym + sl hello.sym </verb></tscreen> After loading the labels, they are used by Oricutron in the disassembler listing, -and you may use them whereever you need to specify an address. Try +and you may use them wherever you need to specify an address. Try <tscreen><verb> - d ._main + d ._main </verb></tscreen> -as an example (note that VICE needs a leading dot before all labels, and that -the compiler prepends an underline under most named labels). +as an example. diff --git a/doc/dio.sgml b/doc/dio.sgml index c85992a4a..0aa43ec76 100644 --- a/doc/dio.sgml +++ b/doc/dio.sgml @@ -3,7 +3,6 @@ <article> <title>Diskette Sector I/O Routines <author><url url="mailto:chris@groessler.org" name="Christian Groessler"> -<date>2014-04-10 <abstract> The cc65 library provides functions to read and write raw disk sectors. @@ -25,8 +24,7 @@ released with the <tt>dio_close</tt> function. dhandle_t __fastcall__ dio_open (unsigned char device); </verb></tscreen> -The <tt>device</tt> specifies the device to access, with 0 being the first -device, 1 the second, and so on. +The <tt>device</tt> specifies the device to access. <tscreen><verb> unsigned char __fastcall__ dio_close (dhandle_t handle); diff --git a/doc/doc.css b/doc/doc.css index 232599a75..e4c316e16 100644 --- a/doc/doc.css +++ b/doc/doc.css @@ -26,7 +26,7 @@ h1 { h2 { font-size: 160%; - text-shadow: 2px 2px 6px #303030; + text-shadow: 1px 1px 3px #303030; letter-spacing: 1px; margin-top: 2em; margin-bottom: 1em; diff --git a/doc/funcref.sgml b/doc/funcref.sgml index a2ccf6c73..a8593ebb5 100644 --- a/doc/funcref.sgml +++ b/doc/funcref.sgml @@ -1,9 +1,9 @@ -<!doctype linuxdoc system> <!-- -*- text-mode -*- --> +<!doctype linuxdoc system> <article> <title>cc65 function reference -<author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>2015-07-21 +<author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> +<url url="mailto:greg.king5@verizon.net" name="Greg King"> <abstract> cc65 is a C compiler for 6502 based systems. This function reference describes @@ -17,9 +17,9 @@ the C functions available in the standard library. <sect>Introduction<p> -cc65 is a C compiler for 6502 based systems. It implements a subset of the ISO +cc65 is a C compiler for 6502-based systems. It implements a subset of the ISO C standard plus additional functions specially crafted for 6502 systems or -just some of the supported machines. This function refrence describes the +just some of the supported machines. This function reference describes the available functions together with any limitations. For an overview about the available libraries, their purpose, and any @@ -27,8 +27,8 @@ differences to the ISO standard, please have a look at the <url url="library.html" name="cc65 Library Overview">. <em/Note:/ Standard C functions are listed here, but not described in detail. -Since these functions behave identical on all standard compliant systems, they -are described in any book covering standard C. +Because those functions behave identically on all standard-compliant systems, +they are described in any book covering standard C. Each entry for a function contains a detailed description @@ -64,6 +64,30 @@ function. </itemize> +<sect1><tt/accelerator.h/<label id="accelerator.h"><p> + +<itemize> +<item><ref id="detect_c128" name="detect_c128"> +<item><ref id="detect_c64dtv" name="detect_c64dtv"> +<item><ref id="detect_c65" name="detect_c65"> +<item><ref id="detect_chameleon" name="detect_chameleon"> +<item><ref id="detect_scpu" name="detect_scpu"> +<item><ref id="detect_turbomaster" name="detect_turbomaster"> +<item><ref id="get_c128_speed" name="get_c128_speed"> +<item><ref id="get_c64dtv_speed" name="get_c64dtv_speed"> +<item><ref id="get_c65_speed" name="get_c65_speed"> +<item><ref id="get_chameleon_speed" name="get_chameleon_speed"> +<item><ref id="get_scpu_speed" name="get_scpu_speed"> +<item><ref id="get_turbomaster_speed" name="get_turbomaster_speed"> +<item><ref id="set_c128_speed" name="set_c128_speed"> +<item><ref id="set_c64dtv_speed" name="set_c64dtv_speed"> +<item><ref id="set_c65_speed" name="set_c65_speed"> +<item><ref id="set_chameleon_speed" name="set_chameleon_speed"> +<item><ref id="set_scpu_speed" name="set_scpu_speed"> +<item><ref id="set_turbomaster_speed" name="set_turbomaster_speed"> +</itemize> + + <sect1><tt/apple2.h/<label id="apple2.h"><p> <itemize> @@ -79,8 +103,6 @@ function. <item>_dos_type <item><ref id="get_ostype" name="get_ostype"> <item>rebootafterexit -<item>textframe -<item>textframexy <item><ref id="videomode" name="videomode"> </itemize> @@ -98,6 +120,7 @@ function. <!-- <item><ref id="_getcolor" name="_getcolor"> --> <!-- <item><ref id="_getdefdev" name="_getdefdev"> --> <!-- <item><ref id="_graphics" name="_graphics"> --> +<item><ref id="_is_cmdline_dos" name="_is_cmdline_dos"> <!-- <item><ref id="_rest_vecs" name="_rest_vecs"> --> <!-- <item><ref id="_save_vecs" name="_save_vecs"> --> <!-- <item><ref id="_scroll" name="_scroll"> --> @@ -113,24 +136,23 @@ function. <sect1><tt/atmos.h/<label id="atmos.h"><p> <itemize> +<item><ref id="atmos_explode" name="atmos_explode"> <item><ref id="atmos_load" name="atmos_load"> +<item><ref id="atmos_ping" name="atmos_ping"> <item><ref id="atmos_save" name="atmos_save"> -<!-- <item><ref id="atmos_explode" name="atmos_explode"> --> -<!-- <item><ref id="atmos_ping" name="atmos_ping"> --> -<!-- <item><ref id="atmos_shoot" name="atmos_shoot"> --> -<!-- <item><ref id="atmos_tick" name="atmos_tick"> --> -<!-- <item><ref id="atmos_tock" name="atmos_tock"> --> -<!-- <item><ref id="atmos_zap" name="atmos_zap"> --> +<item><ref id="atmos_shoot" name="atmos_shoot"> +<item><ref id="atmos_tick" name="atmos_tick"> +<item><ref id="atmos_tock" name="atmos_tock"> +<item><ref id="atmos_zap" name="atmos_zap"> </itemize> -(incomplete) - <sect1><tt/c128.h/<label id="c128.h"><p> <itemize> <item><ref id="c64mode" name="c64mode"> <item><ref id="fast" name="fast"> +<item><ref id="isfast" name="isfast"> <item><ref id="slow" name="slow"> <item><ref id="toggle_videomode" name="toggle_videomode"> <item><ref id="videomode" name="videomode"> @@ -139,6 +161,12 @@ function. <sect1><tt/c16.h/<label id="c16.h"><p> +<itemize> +<item><ref id="fast" name="fast"> +<item><ref id="isfast" name="isfast"> +<item><ref id="slow" name="slow"> +</itemize> + (incomplete) @@ -168,9 +196,16 @@ function. <item><ref id="cbm_k_open" name="cbm_k_open"> <item><ref id="cbm_k_readst" name="cbm_k_readst"> <item><ref id="cbm_k_save" name="cbm_k_save"> +<item><ref id="cbm_k_scnkey" name="cbm_k_scnkey"> +<item><ref id="cbm_k_second" name="cbm_k_second"> <item><ref id="cbm_k_setlfs" name="cbm_k_setlfs"> <item><ref id="cbm_k_setnam" name="cbm_k_setnam"> +<item><ref id="cbm_k_settim" name="cbm_k_settim"> +<item><ref id="cbm_k_talk" name="cbm_k_talk"> +<item><ref id="cbm_k_tksa" name="cbm_k_tksa"> +<item><ref id="cbm_k_udtim" name="cbm_k_udtim"> <item><ref id="cbm_k_unlsn" name="cbm_k_unlsn"> +<item><ref id="cbm_k_untlk" name="cbm_k_untlk"> <!-- <item><ref id="cbm_load" name="cbm_load"> --> <!-- <item><ref id="cbm_open" name="cbm_open"> --> <!-- <item><ref id="cbm_opendir" name="cbm_opendir"> --> @@ -179,6 +214,8 @@ function. <!-- <item><ref id="cbm_save" name="cbm_save"> --> <!-- <item><ref id="cbm_write" name="cbm_write"> --> <!-- <item><ref id="get_tv" name="get_tv"> --> +<item><ref id="kbrepeat" name="kbrepeat"> +<item><ref id="waitvsync" name="waitvsync"> </itemize> (incomplete) @@ -206,17 +243,21 @@ function. <sect1><tt/cc65.h/<label id="cc65.h"><p> -<!-- <itemize> --> -<!-- <item><ref id="cc65_cos" name="cc65_cos"> --> -<!-- <item><ref id="cc65_idiv32by16r16" name="cc65_idiv32by16r16"> --> -<!-- <item><ref id="cc65_imul16x16r32" name="cc65_imul16x16r32"> --> -<!-- <item><ref id="cc65_imul8x8r16" name="cc65_imul8x8r16"> --> -<!-- <item><ref id="cc65_sin" name="cc65_sin"> --> -<!-- <item><ref id="cc65_udiv32by16r16" name="cc65_udiv32by16r16"> --> -<!-- <item><ref id="cc65_umul16x16r32" name="cc65_umul16x16r32"> --> -<!-- <item><ref id="cc65_umul16x8r32" name="cc65_umul16x8r32"> --> -<!-- <item><ref id="cc65_umul8x8r16" name="cc65_umul8x8r16"> --> -<!-- </itemize> --> +<itemize> + +<!-- <item><ref id="_cos" name="_cos"> --> +<!-- <item><ref id="idiv32by16r16" name="idiv32by16r16"> --> +<!-- <item><ref id="imul16x16r32" name="imul16x16r32"> --> +<!-- <item><ref id="imul8x8r16" name="imul8x8r16"> --> +<!-- <item><ref id="_sin" name="_sin"> --> +<!-- <item><ref id="udiv32by16r16" name="udiv32by16r16"> --> +<!-- <item><ref id="umul16x16r32" name="umul16x16r32"> --> +<!-- <item><ref id="umul16x8r32" name="umul16x8r32"> --> +<!-- <item><ref id="umul8x8r16" name="umul8x8r16"> --> +<item><ref id="doesclrscrafterexit" name="doesclrscrafterexit"> +<item><ref id="mul20" name="mul20"> +<item><ref id="mul40" name="mul40"> +</itemize> (incomplete) @@ -232,6 +273,10 @@ function. <item><ref id="chline" name="chline"> <item><ref id="chlinexy" name="chlinexy"> <item><ref id="clrscr" name="clrscr"> +<item><ref id="cpeekc" name="cpeekc"> +<item><ref id="cpeekcolor" name="cpeekcolor"> +<item><ref id="cpeekrevers" name="cpeekrevers"> +<item><ref id="cpeeks" name="cpeeks"> <item><ref id="cprintf" name="cprintf"> <item><ref id="cputc" name="cputc"> <item><ref id="cputcxy" name="cputcxy"> @@ -253,6 +298,16 @@ function. </itemize> +<sect1><tt/creativision.h/<label id="creativision.h"><p> + +<itemize> +<item><ref id="bios_playsound" name="bios_playsound"> +<item><ref id="psg_delay" name="psg_delay"> +<item><ref id="psg_outb" name="psg_outb"> +<item><ref id="psg_silence" name="psg_silence"> +</itemize> + + <sect1><tt/ctype.h/<label id="ctype.h"><p> <itemize> @@ -274,6 +329,21 @@ function. </itemize> +<sect1><tt/cx16.h/<label id="cx16.h"><p> + +<itemize> +<!-- <item><ref id="get_numbanks" name="get_numbanks"> --> +<!-- <item><ref id="get_ostype" name="get_ostype"> --> +<!-- <item><ref id="get_tv" name="get_tv"> --> +<!-- <item><ref id="set_tv" name="set_tv"> --> +<item><ref id="videomode" name="videomode"> +<!-- <item><ref id="vpeek" name="vpeek"> --> +<!-- <item><ref id="vpoke" name="vpoke"> --> +</itemize> + +(incomplete) + + <sect1><tt/dbg.h/<label id="dbg.h"><p> <!-- <itemize> --> @@ -283,6 +353,16 @@ function. (incomplete) +<sect1><tt/device.h/<label id="device.h"><p> + +<itemize> +<item><ref id="getcurrentdevice" name="getcurrentdevice"> +<item><ref id="getdevicedir" name="getdevicedir"> +<item><ref id="getfirstdevice" name="getfirstdevice"> +<item><ref id="getnextdevice" name="getnextdevice"> +</itemize> + + <sect1><tt/dio.h/<label id="dio.h"><p> <url url="dio.html" name="Low-level disk I/O API">. @@ -303,11 +383,12 @@ function. <item><ref id="telldir" name="telldir"> </itemize> -(incomplete) - <sect1><tt/em.h/<label id="em.h"><p> +This header file contains definitions for extended memory access, +see also <tt>testcode/lib/em-test.c</tt> and <tt>samples/multidemo.c</tt>. + <itemize> <item><ref id="em_commit" name="em_commit"> <item><ref id="em_copyfrom" name="em_copyfrom"> @@ -343,11 +424,21 @@ function. </itemize> -<sect1><tt/geos.h/<label id="geos.h"><p> +<sect1><tt/gamate.h/<label id="gamate.h"><p> + +<itemize> +<!-- <item><ref id="get_tv" name="get_tv"> --> +<item><ref id="waitvsync" name="waitvsync"> +</itemize> (incomplete) +<sect1><tt/geos.h/<label id="geos.h"><p> + +<url url="geos.html" name="GEOS API">. + + <sect1><tt/joystick.h/<label id="joystick.h"><p> <itemize> @@ -383,6 +474,13 @@ function. (incomplete) +<sect1><tt/lz4.h/<label id="lz4.h"><p> + +<itemize> +<item><ref id="decompress_lz4" name="decompress_lz4"> +</itemize> + + <sect1><tt/modload.h/<label id="modload.h"><p> <itemize> @@ -413,10 +511,10 @@ function. <sect1><tt/nes.h/<label id="nes.h"><p> -<!-- <itemize> --> +<itemize> <!-- <item><ref id="get_tv" name="get_tv"> --> -<!-- <item><ref id="waitvblank" name="waitvblank"> --> -<!-- </itemize> --> +<item><ref id="waitvsync" name="waitvsync"> +</itemize> (incomplete) @@ -429,6 +527,16 @@ url="http://www.6502.org/users/andre/o65/fileformat.html" name="the o65 format"> It does not declare any functions. +<sect1><tt/pce.h/<label id="pce.h"><p> + +<itemize> +<!-- <item><ref id="get_tv" name="get_tv"> --> +<item><ref id="waitvsync" name="waitvsync"> +</itemize> + +(incomplete) + + <sect1><tt/peekpoke.h/<label id="peekpoke.h"><p> <itemize> @@ -439,6 +547,16 @@ It does not declare any functions. </itemize> +<sect1><tt/pen.h/<label id="pen.h"><p> + +<!-- <itemize> --> +<!-- <item><ref id="pen_adjust" name="pen_adjust"> --> +<!-- <item><ref id="pen_calibrate" name="pen_calibrate"> --> +<!-- </itemize> --> + +(incomplete) + + <sect1><tt/pet.h/<label id="pet.h"><p> (incomplete) @@ -446,13 +564,19 @@ It does not declare any functions. <sect1><tt/plus4.h/<label id="plus4.h"><p> +<itemize> +<item><ref id="fast" name="fast"> +<item><ref id="isfast" name="isfast"> +<item><ref id="slow" name="slow"> +</itemize> + (incomplete) <sect1><tt/serial.h/<label id="serial.h"><p> -The <tt/serial.h/ header file contains definitions for initializing serial -communication. +This header file contains definitions for initializing serial +communication, see also <tt>testcode/lib/ser-test.c</tt>. <itemize> <item><ref id="ser_close" name="ser_close"> @@ -483,7 +607,6 @@ communication. <item><ref id="signal" name="signal"> </itemize> - <sect1><tt/stdarg.h/<label id="stdarg.h"><p> (incomplete) @@ -614,9 +737,12 @@ communication. <item><ref id="strlen" name="strlen"> <item><ref id="strlower" name="strlower"> <item><ref id="strlwr" name="strlwr"> +<item><ref id="strncasecmp" name="strncasecmp"> <item><ref id="strncat" name="strncat"> <item><ref id="strncmp" name="strncmp"> <item><ref id="strncpy" name="strncpy"> +<item><ref id="strnicmp" name="strnicmp"> +<item><ref id="strpbrk" name="strpbrk"> <item><ref id="strqtok" name="strqtok"> <item><ref id="strrchr" name="strrchr"> <item><ref id="strspn" name="strspn"> @@ -627,64 +753,44 @@ communication. <item><ref id="strupr" name="strupr"> </itemize> + +<sect1><tt/sym1.h/<label id="sym1.h"><p> + +<itemize> +<item><ref id="beep" name="beep"> +<item><ref id="fdisp" name="fdisp"> +<item><ref id="loadt" name="loadt"> +<item><ref id="dumpt" name="dumpt"> +</itemize> + + +<sect1><tt/telestrat.h/<label id="telestrat.h"><p> + +<itemize> +<item><ref id="atmos_explode" name="explode"> +<item><ref id="atmos_ping" name="ping"> +<item><ref id="atmos_shoot" name="shoot"> +<item><ref id="atmos_zap" name="zap"> +<!-- <item><ref id="kbdclick1" name="kbdclick1"> --> +<!-- <item><ref id="oups" name="oups"> --> +</itemize> + (incomplete) <sect1><tt/tgi.h/<label id="tgi.h"><p> -<itemize> -<item><ref id="tgi_arc" name="tgi_arc"> -<item><ref id="tgi_bar" name="tgi_bar"> -<item><ref id="tgi_circle" name="tgi_circle"> -<item><ref id="tgi_clear" name="tgi_clear"> -<item><ref id="tgi_done" name="tgi_done"> -<item><ref id="tgi_ellipse" name="tgi_ellipse"> -<item><ref id="tgi_free_vectorfont" name="tgi_free_vectorfont"> -<item><ref id="tgi_getaspectratio" name="tgi_getaspectratio"> -<item><ref id="tgi_getcolor" name="tgi_getcolor"> -<item><ref id="tgi_getcolorcount" name="tgi_getcolorcount"> -<item><ref id="tgi_getdefpalette" name="tgi_getdefpalette"> -<item><ref id="tgi_geterror" name="tgi_geterror"> -<item><ref id="tgi_geterrormsg" name="tgi_geterrormsg"> -<item><ref id="tgi_getmaxcolor" name="tgi_getmaxcolor"> -<item><ref id="tgi_getmaxx" name="tgi_getmaxx"> -<item><ref id="tgi_getmaxy" name="tgi_getmaxy"> -<item><ref id="tgi_getpagecount" name="tgi_getpagecount"> -<item><ref id="tgi_getpalette" name="tgi_getpalette"> -<item><ref id="tgi_getpixel" name="tgi_getpixel"> -<item><ref id="tgi_gettextheight" name="tgi_gettextheight"> -<item><ref id="tgi_gettextwidth" name="tgi_gettextwidth"> -<item><ref id="tgi_getxres" name="tgi_getxres"> -<item><ref id="tgi_getyres" name="tgi_getyres"> -<item><ref id="tgi_gotoxy" name="tgi_gotoxy"> -<item><ref id="tgi_init" name="tgi_init"> -<item><ref id="tgi_install" name="tgi_install"> -<item><ref id="tgi_install_vectorfont" name="tgi_install_vectorfont"> -<item><ref id="tgi_ioctl" name="tgi_ioctl"> -<item><ref id="tgi_line" name="tgi_line"> -<item><ref id="tgi_lineto" name="tgi_lineto"> -<item><ref id="tgi_load_driver" name="tgi_load_driver"> -<item><ref id="tgi_load_vectorfont" name="tgi_load_vectorfont"> -<item><ref id="tgi_outtext" name="tgi_outtext"> -<item><ref id="tgi_outtextxy" name="tgi_outtextxy"> -<item><ref id="tgi_setaspectratio" name="tgi_setaspectratio"> -<item><ref id="tgi_setcolor" name="tgi_setcolor"> -<item><ref id="tgi_setdrawpage" name="tgi_setdrawpage"> -<item><ref id="tgi_setpalette" name="tgi_setpalette"> -<item><ref id="tgi_setpixel" name="tgi_setpixel"> -<item><ref id="tgi_setviewpage" name="tgi_setviewpage"> -<item><ref id="tgi_settextscale" name="tgi_settextscale"> -<item><ref id="tgi_settextstyle" name="tgi_settextstyle"> -<item><ref id="tgi_uninstall" name="tgi_uninstall"> -<item><ref id="tgi_unload" name="tgi_unload"> -</itemize> +<url url="tgi.html" name="Tiny Graphics Interface">. + <sect1><tt/time.h/<label id="time.h"><p> <itemize> -<!-- <item><ref id="_systime" name="_systime"> --> <!-- <item><ref id="asctime" name="asctime"> --> <item><ref id="clock" name="clock"> +<item><ref id="clock_getres" name="clock_getres"> +<item><ref id="clock_gettime" name="clock_gettime"> +<item><ref id="clock_settime" name="clock_settime"> <!-- <item><ref id="ctime" name="ctime"> --> <!-- <item><ref id="gmtime" name="gmtime"> --> <!-- <item><ref id="localtime" name="localtime"> --> @@ -701,7 +807,7 @@ communication. <itemize> <!-- <item><ref id="chdir" name="chdir"> --> <item><ref id="exec" name="exec"> -<!-- <item><ref id="getcwd" name="getcwd"> --> +<item><ref id="getcwd" name="getcwd"> <item><ref id="getopt" name="getopt"> <!-- <item><ref id="lseek" name="lseek"> --> <!-- <item><ref id="mkdir" name="mkdir"> --> @@ -939,6 +1045,19 @@ id="malloc" name="malloc"> may still return <tt/NULL/. </quote> +<sect1>_is_cmdline_dos<label id="_is_cmdline_dos"><p> + +<quote> +<descrip> +<tag/Function/Determines whether the underlying DOS supports command line arguments. +<tag/Header/<tt/<ref id="atari.h" name="atari.h">/ +<tag/Declaration/<tt/unsigned char _is_cmdline_dos (void);/ +<tag/Description/The function returns 0 if the DOS doesn't support command line arguments. +It returns 1 if it does. +<tag/Availability/cc65 (<tt/atari/ and <tt/atarixl/ platforms) +</descrip> +</quote> + <sect1>_poserror<label id="_poserror"><p> <quote> @@ -1233,16 +1352,16 @@ disabled. <quote> <descrip> -<tag/Function/Terminates a program abnormally. +<tag/Function/Terminate a program abnormally. <tag/Header/<tt/<ref id="stdlib.h" name="stdlib.h">/ <tag/Declaration/<tt/void abort (void);/ -<tag/Description/<tt/abort/ raises <tt/SIGABRT/, writes a termination message -on stderr, then terminates the program with an exit code of 3. +<tag/Description/<tt/abort()/ raises <tt/SIGABRT/, writes a termination message +on <tt/stderr/, then terminates the program with an exit code of 3. <tag/Availability/ISO 9899 <tag/See also/ <ref id="assert" name="assert">, <ref id="exit" name="exit">, -<ref id="raise" name="raise"> +<ref id="signal" name="signal"> <tag/Example/None. </descrip> </quote> @@ -1274,19 +1393,20 @@ used in presence of a prototype. <quote> <descrip> -<tag/Function/Test a condition and possibly abort. +<tag/Function/Test a condition, and possibly abort. <tag/Header/<tt/<ref id="assert.h" name="assert.h">/ <tag/Declaration/<tt/void assert (int cond);/ -<tag/Description/<tt/assert/ is a macro that expands to a <tt/id/ -statement. If the condition evaluates t zero (false), assert prints a message -on stderr and aborts the program. +<tag/Description/<tt/assert()/ is a macro that expands to an <tt/if/ statement. +If the condition evaluates to zero (false), <tt/assert()/ raises <tt/SIGABRT/, +prints a message on <tt/stderr/, then exits the program with an exit code of 2. <tag/Notes/<itemize> <item>The function is actually a macro. </itemize> <tag/Availability/ISO 9899 <tag/See also/ <ref id="abort" name="abort">, -<ref id="exit" name="exit"> +<ref id="exit" name="exit">, +<ref id="signal" name="signal"> <tag/Example/None. </descrip> </quote> @@ -1319,6 +1439,30 @@ used in presence of a prototype. </quote> +<sect1>atmos_explode<label id="atmos_explode"><p> + +<quote> +<descrip> +<tag/Function/Bomb sound effect. +<tag/Header/<tt/<ref id="atmos.h" name="atmos.h">/ +<tag/Declaration/<tt/void __fastcall__ atmos_explode(void);/ +<tag/Description/<tt/atmos_explode/ plays the BASIC sound. +<tag/Notes/<itemize> +<item>The function is available only as a fastcall function; so, it may be used +only in the presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="atmos_ping" name="atmos_ping">, +<ref id="atmos_shoot" name="atmos_shoot">, +<ref id="atmos_tick" name="atmos_tick">, +<ref id="atmos_tock" name="atmos_tock">, +<ref id="atmos_zap" name="atmos_zap"> +<tag/Example/None. +</descrip> +</quote> + + <sect1>atmos_load<label id="atmos_load"><p> <quote> @@ -1339,6 +1483,30 @@ only in the presence of a prototype. </quote> +<sect1>atmos_ping<label id="atmos_ping"><p> + +<quote> +<descrip> +<tag/Function/Bell or ricochet sound effect. +<tag/Header/<tt/<ref id="atmos.h" name="atmos.h">/ +<tag/Declaration/<tt/void __fastcall__ atmos_ping(void);/ +<tag/Description/<tt/atmos_ping/ plays the BASIC sound. +<tag/Notes/<itemize> +<item>The function is available only as a fastcall function; so, it may be used +only in the presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="atmos_explode" name="atmos_explode">, +<ref id="atmos_shoot" name="atmos_shoot">, +<ref id="atmos_tick" name="atmos_tick">, +<ref id="atmos_tock" name="atmos_tock">, +<ref id="atmos_zap" name="atmos_zap"> +<tag/Example/None. +</descrip> +</quote> + + <sect1>atmos_save<label id="atmos_save"><p> <quote> @@ -1361,6 +1529,102 @@ atmos_save("hires", 0xa000, 0xc000); </quote> +<sect1>atmos_shoot<label id="atmos_shoot"><p> + +<quote> +<descrip> +<tag/Function/Pistol sound effect. +<tag/Header/<tt/<ref id="atmos.h" name="atmos.h">/ +<tag/Declaration/<tt/void __fastcall__ atmos_shoot(void);/ +<tag/Description/<tt/atmos_shoot/ plays the BASIC sound. +<tag/Notes/<itemize> +<item>The function is available only as a fastcall function; so, it may be used +only in the presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="atmos_explode" name="atmos_explode">, +<ref id="atmos_ping" name="atmos_ping">, +<ref id="atmos_tick" name="atmos_tick">, +<ref id="atmos_tock" name="atmos_tock">, +<ref id="atmos_zap" name="atmos_zap"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>atmos_tick<label id="atmos_tick"><p> + +<quote> +<descrip> +<tag/Function/High-pitch click. +<tag/Header/<tt/<ref id="atmos.h" name="atmos.h">/ +<tag/Declaration/<tt/void __fastcall__ atmos_tick(void);/ +<tag/Description/<tt/atmos_tick/ plays the system sound. +<tag/Notes/<itemize> +<item>The function is available only as a fastcall function; so, it may be used +only in the presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="atmos_explode" name="atmos_explode">, +<ref id="atmos_ping" name="atmos_ping">, +<ref id="atmos_shoot" name="atmos_shoot">, +<ref id="atmos_tock" name="atmos_tock">, +<ref id="atmos_zap" name="atmos_zap"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>atmos_tock<label id="atmos_tock"><p> + +<quote> +<descrip> +<tag/Function/Low-pitch click. +<tag/Header/<tt/<ref id="atmos.h" name="atmos.h">/ +<tag/Declaration/<tt/void __fastcall__ atmos_tock(void);/ +<tag/Description/<tt/atmos_tock/ plays the system sound. +<tag/Notes/<itemize> +<item>The function is available only as a fastcall function; so, it may be used +only in the presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="atmos_explode" name="atmos_explode">, +<ref id="atmos_ping" name="atmos_ping">, +<ref id="atmos_shoot" name="atmos_shoot">, +<ref id="atmos_tick" name="atmos_tick">, +<ref id="atmos_zap" name="atmos_zap"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>atmos_zap<label id="atmos_zap"><p> + +<quote> +<descrip> +<tag/Function/Raygun sound effect. +<tag/Header/<tt/<ref id="atmos.h" name="atmos.h">/ +<tag/Declaration/<tt/void __fastcall__ atmos_zap(void);/ +<tag/Description/<tt/atmos_zap/ plays the BASIC sound. +<tag/Notes/<itemize> +<item>The function is available only as a fastcall function; so, it may be used +only in the presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="atmos_explode" name="atmos_explode">, +<ref id="atmos_ping" name="atmos_ping">, +<ref id="atmos_shoot" name="atmos_shoot">, +<ref id="atmos_tick" name="atmos_tick">, +<ref id="atmos_tock" name="atmos_tock"> +<tag/Example/None. +</descrip> +</quote> + + <sect1>atoi<label id="atoi"><p> <quote> @@ -1415,6 +1679,27 @@ used in presence of a prototype. </quote> +<sect1>beep<label id="beep"><p> + +<quote> +<descrip> +<tag/Function/Beep sound. +<tag/Header/<tt/<ref id="sym1.h" name="sym1.h">/ +<tag/Declaration/<tt/void beep(void);/ +<tag/Description/<tt/beep/ makes a brief tone. +<tag/Notes/<itemize> +<item>The function is specific to the Sym-1. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="fdisp" name="fdisp">, +<ref id="loadt" name="loadt">, +<ref id="dumpt" name="dumpt">, +<tag/Example/None. +</descrip> +</quote> + + <sect1>bgcolor<label id="bgcolor"><p> <quote> @@ -1440,6 +1725,44 @@ used in presence of a prototype. </quote> +<sect1>bios_playsound<label id="bios_playsound"><p> + +<quote> +<descrip> +<tag/Function/Play a sequence of musical notes. +<tag/Header/<tt/<ref id="creativision.h" name="creativision.h">/ +<tag/Declaration/<tt/void __fastcall__ bios_playsound (const void *a, unsigned char b);/ +<tag/Description/The function plays chords based on a BASIC statement. Notes and +durations are defined in the BASIC manual, chapter 13 on pages 102 resp. 103. +<tag/Notes/<itemize> +<item>BASIC has a fixed tempo of 18. +<item>The function is only available as fastcall function, so it may only be +used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="psg_delay" name="psg_delay">, +<ref id="psg_outb" name="psg_outb"> +<tag/Example/<verb> +#include <creativision.h> +void main (void) +{ + static const unsigned char notes[] = { + 0x77, 0x4F, 0x37, + 0x4B, 0x05, 0xBB, + 0x4F, 0x27, 0x83, + 0x93, 0x9B, 0x93, + 0x17, 0x4F, 0x96, // played backwards + 0xAB, 0x17, 0x4F, // three-note chords + 0x0E // tempo + }; + bios_playsound (notes, sizeof notes); +} +</verb> +</descrip> +</quote> + + <sect1>bordercolor<label id="bordercolor"><p> <quote> @@ -1534,7 +1857,7 @@ be used in presence of a prototype. <item>The function is specific to the C128. <item>The function will not return to the caller. </itemize> -<tag/Availability/C128 +<tag/Availability/cc65 <tag/Example/None. </descrip> </quote> @@ -1867,7 +2190,7 @@ only be used in presence of a prototype. </itemize> <tag/Availability/cc65 <tag/See also/ -<ref id="cbm_k_unlsn" name="cbm_k_unlsn">, +<ref id="cbm_k_unlsn" name="cbm_k_unlsn"> <tag/Example/None. </descrip> </quote> @@ -1974,6 +2297,56 @@ only be used in presence of a prototype. </quote> +<sect1>cbm_k_scnkey<label id="cbm_k_scnkey"><p> + +<quote> +<descrip> +<tag/Function/Scan the keyboard matrix. +<tag/Header/<tt/<ref id="cbm.h" name="cbm.h">/ +<tag/Declaration/<tt/void cbm_k_scnkey (void);/ +<tag/Description/This function looks at the switches in the keyboard, to see +if any of them are being pressed. If they are, then code numbers for them are +stored in RAM. Other functions use those numbers to input text. Normally, +the keyboard is scanned by the Kernal's Interrupt Service Routine. But, if +you divert the "Jiffy interrupt" to a C-code ISR, then that ISR must call this +function, in order to provide input from the keyboard. +<tag/Availability/cc65 +<tag/See also/ +<ref id="cbm_k_getin" name="cbm_k_getin">, +<ref id="cbm_k_udtim" name="cbm_k_udtim">, +<ref id="cgetc" name="cgetc">, +<!-- <ref id="getc" name="getc"> --> +<!-- <ref id="getchar" name="getchar"> --> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>cmb_k_second<label id="cbm_k_second"><p> + +<quote> +<descrip> +<tag/Function/Send secondary address for LISTEN. +<tag/Header/<tt/<ref id="cbm.h" name="cbm.h">/ +<tag/Declaration/<tt/void __fastcall__ cbm_k_second (unsigned char addr);/ +<tag/Description/This function is used to send a secondary address to an I/O +device after a call to LISTEN is made, and the device is commanded to LISTEN. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may +only be used in presence of a prototype. +<item>The function can only be called after a call to LISTEN. +<item>The function will not work after a TALK. +<item>When a secondary address is to be sent to a device on the serial bus, +the address must first be ORed with $60. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="cbm_k_listen" name="cbm_k_listen"> +<tag/Exampe/None. +</descrip> +</quote> + + <sect1>cbm_k_setlfs<label id="cbm_k_setlfs"><p> <quote> @@ -1989,6 +2362,9 @@ only be used in presence of a prototype. </itemize> <tag/Availability/cc65 <tag/See also/ +<ref id="cbm_k_load" name="cbm_k_load">, +<ref id="cbm_k_open" name="cbm_k_open">, +<ref id="cbm_k_save" name="cbm_k_save">, <ref id="cbm_k_setnam" name="cbm_k_setnam"> <tag/Example/None. </descrip> @@ -2010,9 +2386,34 @@ only be used in presence of a prototype. </itemize> <tag/Availability/cc65 <tag/See also/ -<ref id="cbm_k_open" name="cbm_k_open">, <ref id="cbm_k_load" name="cbm_k_load">, -<ref id="cbm_k_save" name="cbm_k_save"> +<ref id="cbm_k_open" name="cbm_k_open">, +<ref id="cbm_k_save" name="cbm_k_save">, +<ref id="cbm_k_setlfs" name="cbm_k_setlfs"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>cbm_k_settim<label id="cbm_k_settim"><p> + +<quote> +<descrip> +<tag/Function/Set the Jiffy clock. +<tag/Header/<tt/<ref id="cbm.h" name="cbm.h">/ +<tag/Declaration/<tt/void __fastcall__ cbm_k_settim (unsigned long timer);/ +<tag/Description/This function changes the Jiffy clock to a different value. +That clock counts sixtieths of a second. It is used by the library's +<tt/clock()/ function. The Jiffy clock is updated by the Kernal's Interrupt +Service Routine. +<tag/Notes/<itemize> +<item>The function is available only as a fastcall function; therefore, it may +be used only in the presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="cbm_k_udtim" name="cbm_k_udtim">, +<ref id="clock" name="clock"> <tag/Example/None. </descrip> </quote> @@ -2039,6 +2440,50 @@ only be used in presence of a prototype. </quote> +<sect1>cbm_k_tksa<label id="cbm_k_tksa"><p> + +<quote> +<descrip> +<tag/Function/Send TALK secondary address to serial bus +<tag/Header/<tt/<ref id="cbm.h" name="cbm.h">/ +<tag/Declaration/<tt/void __fastcall__ cbm_k_tksa (unsigned char addr);/ +<tag/Description/This function transmits a secondary address on the serial bus for a TALK device. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may +only be used in presence of a prototype. +<item>The function can only be called after a call to TALK. +<item>The function will not work after a LISTEN. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="cbm_k_talk" name="cbm_k_talk"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>cbm_k_udtim<label id="cbm_k_udtim"><p> + +<quote> +<descrip> +<tag/Function/Update the Jiffy clock. +<tag/Header/<tt/<ref id="cbm.h" name="cbm.h">/ +<tag/Declaration/<tt/void cbm_k_udtim (void);/ +<tag/Description/This function adds one count to the Jiffy clock. That clock +counts sixtieths of a second. It is used by the library's <tt/clock()/ +function. Normally, the Jiffy clock is updated by the Kernal's Interrupt +Service Routine. But, if you divert the "Jiffy interrupt" to a C-code ISR, +then that ISR must call this function, in order to keep the clock valid. +<tag/Availability/cc65 +<tag/See also/ +<ref id="cbm_k_scnkey" name="cbm_k_scnkey">, +<ref id="cbm_k_settim" name="cbm_k_settim">, +<ref id="clock" name="clock"> +<tag/Example/None. +</descrip> +</quote> + + <sect1>cbm_k_unlsn<label id="cbm_k_unlsn"><p> <quote> @@ -2053,9 +2498,6 @@ bus. Only devices previously commanded to LISTEN are affected. This function is normally used after the host computer is finished sending data to external devices. Sending the UNLISTEN commands the listening devices to get off the serial bus so it can be used for other purposes. -<tag/Notes/<itemize> -<item> -</itemize> <tag/Availability/cc65 <tag/See also/ <ref id="cbm_k_listen" name="cbm_k_listen"> @@ -2064,6 +2506,28 @@ to get off the serial bus so it can be used for other purposes. </quote> +<sect1>cbm_k_untlk<label id="cbm_k_untlk"><p> + +<quote> +<descrip> +<tag/Function/Send an UNTALK command +<tag/Header/<tt/<ref id="cbm.h" name="cbm.h">/ +<tag/Declaration/<tt/void cbm_k_untlk (void);/ +<tag/Description/This function commands all devices on the serial bus to +stop sending data to the host computer (i.e., UNTALK). Calling this +function results in an UNTALK command being transmitted on the serial +bus. Only devices previously commanded to TALK are affected. This +function is normally used after the host computer is finished listening to data +from an external device. Sending the UNTALK commands the sending devices +to get off the serial bus so it can be used for other purposes. +<tag/Availability/cc65 +<tag/See also/ +<ref id="cbm_k_talk" name="cbm_k_talk"> +<tag/Example/None. +</descrip> +</quote> + + <sect1>cclear<label id="cclear"><p> <quote> @@ -2118,15 +2582,18 @@ only be used in presence of a prototype. <tag/Header/<tt/<ref id="conio.h" name="conio.h">/ <tag/Declaration/<tt/char cgetc (void);/ <tag/Description/The function reads a character from the keyboard. If there is -no character available, <tt/cgetc/ waits until the user presses a key. If the +no character available, <tt/cgetc()/ waits until the user presses a key. If the cursor is enabled by use of the <tt/cursor/ function, a blinking cursor is displayed while waiting. <tag/Notes/<itemize> -<item>If the system supports a keyboard buffer, <tt/cgetc/ will fetch a key -from this buffer and wait only if the buffer is empty. +<item>If the system supports a keyboard buffer, <tt/cgetc()/ will fetch a key +from that buffer; and, wait only if the buffer is empty. +<item>The keyboard must be scanned periodically, in order for this function to +see anything that you type. (See the description of <tt/cbm_k_scnkey()/.) </itemize> <tag/Availability/cc65 <tag/See also/ +<ref id="cbm_k_scnkey" name="cbm_k_scnkey">, <ref id="cursor" name="cursor">, <ref id="kbhit" name="kbhit"> <tag/Example/None. @@ -2216,22 +2683,109 @@ used in presence of a prototype. <tag/Header/<tt/<ref id="time.h" name="time.h">/ <tag/Declaration/<tt/clock_t clock (void);/ <tag/Description/The <tt/clock/ function returns an approximaton of processor -time used by the program. The time is returned in implementation defined +time used by the program. The time is returned in implementation-defined units. It can be converted to seconds by dividing by the value of the macro <tt/CLOCKS_PER_SEC/. <tag/Notes/<itemize> -<item>Since the machines, cc65 generated programs run on, cannot run multiple -processes, the function will actually return the time since some -implementation defined point in the past. +<item>Since the machines that cc65-generated programs run on cannot run multiple +processes, the function actually will return the time since some +implementation-defined point in the past. +<item>The Jiffy clock must be "running", in order for this function to return +changing values. (See the description of <tt/cbm_k_udtim()/.) </itemize> <tag/Availability/ISO 9899 <tag/See also/ +<ref id="cbm_k_settim" name="cbm_k_settim">, +<ref id="cbm_k_udtim" name="cbm_k_udtim">, <ref id="time" name="time"> <tag/Example/None. </descrip> </quote> +<sect1>clock_getres<label id="clock_getres"><p> + +<quote> +<descrip> +<tag/Function/Determine the realtime clock resolution. +<tag/Header/<tt/<ref id="time.h" name="time.h">/ +<tag/Declaration/<tt/int __fastcall__ clock_getres (clockid_t clock_id, struct timespec *res);/ +<tag/Description/The <tt/clock_getres/ function finds the resolution (precision) +of the realtime clock. <tt/clock_id/ has to be <tt/CLOCK_REALTIME/. If <tt/res/ +is not <tt/NULL/, the resolution of the realtime clock is stored in the location +pointed to by <tt/res/. If <tt/res/ is <tt/NULL/, the clock resolution is not returned. +If the <tt/tp/ argument of <tt/<ref id="clock_settime" name="clock_settime">/ is not +a multiple of <tt/res/, then the value is truncated to a multiple of <tt/res/. On +success, zero is returned. On error, -1 is returned and <tt/errno/ is set to an +error code describing the reason for the failure. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +<item>Depending on the target either the <tt/tv_sec/ or the <tt/tv_nsec/ +field of the <tt/struct timespec/ returned is zero. +</itemize> +<tag/Availability/POSIX 1003.1 +<tag/See also/ +<ref id="clock_gettime" name="clock_gettime">, +<ref id="clock_settime" name="clock_settime"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>clock_gettime<label id="clock_gettime"><p> + +<quote> +<descrip> +<tag/Function/Get the time from the realtime clock. +<tag/Header/<tt/<ref id="time.h" name="time.h">/ +<tag/Declaration/<tt/int __fastcall__ clock_gettime (clockid_t clock_id, struct timespec *tp);/ +<tag/Description/The <tt/clock_gettime/ function retrieves the time since the 1970-01-01 00:00:00 +measured in nanoseconds. <tt/clock_id/ has to be <tt/CLOCK_REALTIME/. On success, zero is +returned. On error, -1 is returned and <tt/errno/ is set to an error code describing the +reason for the failure. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +<item>Many platforms supported by cc65 do not have a realtime clock, so the +retrieved value may not be valid. See also the platform-specific information. +</itemize> +<tag/Availability/POSIX 1003.1 +<tag/See also/ +<ref id="clock_getres" name="clock_getres">, +<ref id="clock_settime" name="clock_settime">, +<ref id="time" name="time"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>clock_settime<label id="clock_settime"><p> + +<quote> +<descrip> +<tag/Function/Set the time on the realtime clock. +<tag/Header/<tt/<ref id="time.h" name="time.h">/ +<tag/Declaration/<tt/int __fastcall__ clock_settime (clockid_t clock_id, const struct timespec *tp);/ +<tag/Description/The <tt/clock_settime/ function sets the time since the 1970-01-01 00:00:00 +measured in nanoseconds. <tt/clock_id/ has to be <tt/CLOCK_REALTIME/. On success, zero is +returned. On error, -1 is returned and <tt/errno/ is set to an error code describing the +reason for the failure. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +<item>Many platforms supported by cc65 do not have a realtime clock, so +setting the time may not work. See also the platform-specific information. +</itemize> +<tag/Availability/POSIX 1003.1 +<tag/See also/ +<ref id="clock_getres" name="clock_getres">, +<ref id="clock_gettime" name="clock_gettime"> +<tag/Example/None. +</descrip> +</quote> + + <sect1>clrscr<label id="clrscr"><p> <quote> @@ -2296,6 +2850,123 @@ be used in presence of a prototype. </quote> +<sect1>cpeekc<label id="cpeekc"><p> + +<quote> +<descrip> +<tag/Function/Get a character from the display memory. +<tag/Header/<tt/<ref id="conio.h" name="conio.h">/ +<tag/Declaration/<tt/char cpeekc (void);/ +<tag/Description/The function gets the character that's at the current location +of the cursor in the display screen RAM. That character is converted, if +needed, into the encoding that can be passed to <tt/cputc()/. +<tag/Notes/<itemize> +<item>Conio peek functions don't have <tt/cpeek...xy()/ versions. That was +done to make it obvious that peeking doesn't move the cursor in any way. Your +program must place the cursor where it wants to peek before it calls any of +those functions. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="cpeekcolor" name="cpeekcolor">, +<ref id="cpeekrevers" name="cpeekrevers">, +<ref id="cpeeks" name="cpeeks">, +<ref id="cputc" name="cputc"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>cpeekcolor<label id="cpeekcolor"><p> + +<quote> +<descrip> +<tag/Function/Get a color from the display memory. +<tag/Header/<tt/<ref id="conio.h" name="conio.h">/ +<tag/Declaration/<tt/unsigned char cpeekcolor (void);/ +<tag/Description/The function gets the color number that's at the current +location of the cursor in the display screen RAM. That number can be passed to +<tt/textcolor()/. +<tag/Notes/<itemize> +<item>Conio peek functions don't have <tt/cpeek...xy()/ versions. That was +done to make it obvious that peeking doesn't move the cursor in any way. Your +program must place the cursor where it wants to peek before it calls any of +those functions. +<item>On the cx16 (Commander X16) target, this function returns two values: the +background color, in the high nybble, and the text color, in the low nybble. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="cpeekc" name="cpeekc">, +<ref id="cpeekrevers" name="cpeekrevers">, +<ref id="cpeeks" name="cpeeks">, +<ref id="cputc" name="cputc">, +<ref id="textcolor" name="textcolor"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>cpeekrevers<label id="cpeekrevers"><p> + +<quote> +<descrip> +<tag/Function/Get a reverse-character attribute from the display memory. +<tag/Header/<tt/<ref id="conio.h" name="conio.h">/ +<tag/Declaration/<tt/unsigned char cpeekrevers (void);/ +<tag/Description/The function gets the "reverse-mode" attribute of the +character that's at the current location of the cursor in the display screen +RAM. It returns a boolean value (0/1) that can be passed to <tt/revers()/. +<tag/Notes/<itemize> +<item>Conio peek functions don't have <tt/cpeek...xy()/ versions. That was +done to make it obvious that peeking doesn't move the cursor in any way. Your +program must place the cursor where it wants to peek before it calls any of +those functions. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="cpeekc" name="cpeekc">, +<ref id="cpeekcolor" name="cpeekcolor">, +<ref id="cpeeks" name="cpeeks">, +<ref id="cputc" name="cputc">, +<ref id="revers" name="revers"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>cpeeks<label id="cpeeks"><p> + +<quote> +<descrip> +<tag/Function/Get a string from the display memory. +<tag/Header/<tt/<ref id="conio.h" name="conio.h">/ +<tag/Declaration/<tt/void __fastcall__ cpeeks (char* s, unsigned length);/ +<tag/Description/The function gets a fixed-length string ('\0'-terminated) of +characters that start at the current location of the cursor in the display +screen RAM. Those characters are converted, if needed, into the encoding that +can be passed to <tt/cputs()/. The first argument must point to a RAM area +that's large enough to hold "length + 1" bytes. +<tag/Notes/<itemize> +<item>Conio peek functions don't have <tt/cpeek...xy()/ versions. That was +done to make it obvious that peeking doesn't move the cursor in any way. Your +program must place the cursor where it wants to peek before it calls any of +those functions. +<item>The function is available as only a fastcall function; +so, it may be used only in the presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="cpeekc" name="cpeekc">, +<ref id="cpeekcolor" name="cpeekcolor">, +<ref id="cpeekrevers" name="cpeekrevers">, +<ref id="cputc" name="cputc">, +<ref id="cputs" name="cputs"> +<tag/Example/None. +</descrip> +</quote> + + <sect1>creat<label id="creat"><p> <quote> @@ -2531,6 +3202,143 @@ used in presence of a prototype. </quote> +<sect1>decompress_lz4<label id="decompress_lz4"><p> + +<quote> +<descrip> +<tag/Function/Uncompress a LZ4-compressed buffer. +<tag/Header/<tt/<ref id="lz4.h" name="lz4.h">/ +<tag/Declaration/<tt/void decompress_lz4 (const unsigned char* src, unsigned char* const dst, const unsigned short uncompressed_size);/ +<tag/Description/<tt/decompress_lz4/ uncompresses a LZ4-compressed buffer. +<tag/Notes/<itemize> +<item>Use LZ4_compress_HC with compression level 16 for best compression. +</itemize> +<tag/Availability/cc65 +<tag/Example/None. +</descrip> +</quote> + + +<sect1>detect_c128<label id="detect_c128"><p> + +<quote> +<descrip> +<tag/Function/Check if a C128 CPU is the current CPU. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char detect_c128 (void);/ +<tag/Description/The function returns a 1 if a C128 CPU is the current CPU. +<tag/Notes/<itemize> +<item>The function is specific to the C64 and C128. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="get_c128_speed" name="get_c128_speed">, +<ref id="set_c128_speed" name="set_c128_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>detect_c64dtv<label id="detect_c64dtv"><p> + +<quote> +<descrip> +<tag/Function/Check for the presence of the C64DTV. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char detect_c64dtv (void);/ +<tag/Description/The function returns a 1 if a C64DTV has been detected. +<tag/Notes/<itemize> +<item>The function is specific to the C64. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="get_c64dtv_speed" name="get_c64dtv_speed">, +<ref id="set_c64dtv_speed" name="set_c64dtv_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>detect_c65<label id="detect_c65"><p> + +<quote> +<descrip> +<tag/Function/Check for the presence of a C65/C64DX in C64 mode. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char detect_c65 (void);/ +<tag/Description/The function returns a 1 if a C65/C64DX in C64 mode has been detected. +<tag/Notes/<itemize> +<item>The function is specific to the C64. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="get_c65_speed" name="get_c65_speed">, +<ref id="set_c65_speed" name="set_c65_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>detect_chameleon<label id="detect_chameleon"><p> + +<quote> +<descrip> +<tag/Function/Check for the presence of the C64 Chameleon cartridge. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char detect_chameleon (void);/ +<tag/Description/The function returns a 1 if a C64 Chameleon cartridge has been detected. +<tag/Notes/<itemize> +<item>The function is specific to the C64. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="get_chameleon_speed" name="get_chameleon_speed">, +<ref id="set_chameleon_speed" name="set_chameleon_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>detect_scpu<label id="detect_scpu"><p> + +<quote> +<descrip> +<tag/Function/Check for the presence of the C64/C128 SuperCPU cartridge. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char detect_scpu (void);/ +<tag/Description/The function returns a 1 if a SuperCPU cartridge has been detected. +<tag/Notes/<itemize> +<item>The function is specific to the C128 and C64. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="get_scpu_speed" name="get_scpu_speed">, +<ref id="set_scpu_speed" name="set_scpu_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>detect_turbomaster<label id="detect_turbomaster"><p> + +<quote> +<descrip> +<tag/Function/Check for the presence of the C64 Turbo Master cartridge. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char detect_turbomaster (void);/ +<tag/Description/The function returns a 1 if a C64 Turbo Master cartridge has been detected. +<tag/Notes/<itemize> +<item>The function is specific to the C64. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="get_turbomaster_speed" name="get_turbomaster_speed">, +<ref id="set_turbomaster_speed" name="set_turbomaster_speed">, +<tag/Example/None. +</descrip> +</quote> + + <sect1>div<label id="div"><p> <quote> @@ -2552,6 +3360,64 @@ ldiv </quote> +<sect1>doesclrscrafterexit<label id="doesclrscrafterexit"><p> + +<quote> +<descrip> +<tag/Function/Determines whether the screen is going to be cleared after program exit. +<tag/Header/<tt/<ref id="cc65.h" name="cc65.h">/ +<tag/Declaration/<tt/unsigned char doesclrscrafterexit (void);/ +<tag/Description/The function returns zero if the screen won't be cleared immediately after +program termination. It returns a non-zero value if it will. +<tag/Notes/<itemize> +<item>Some systems, maybe depending on configuration, immediately clear the screen +after a program exits. Therefore it might be difficult to read +the last messages printed by the program prior to its exit. This function can be used +to decide if a delay or wait for a key press should be executed when then program +exits. +</itemize> +<tag/Availability/cc65 +<tag/Example/<verb> +/* Hello World */ +#include <stdio.h> +#include <unistd.h> +#include <cc65.h> +int main(void) +{ + printf("Hello World\n"); + if (doesclrscrafterexit()) + sleep(5); + return 0; +} +</verb> +</descrip> +</quote> + + +<sect1>dumpt<label id="dumpt"><p> + +<quote> +<descrip> +<tag/Function/Dump memory to tape. +<tag/Header/<tt/<ref id="sym1.h" name="sym1.h">/ +<tag/Declaration/<tt/int __fastcall__ dumpt (unsigned char id, const void* start, const void* end);/ +<tag/Description/<tt/dumpt/ saves memory onto data tape. +<tag/Notes/<itemize> +<item>The function is specific to the Sym-1. +<item>The return value is status. Non-zero status indicates an error. +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="beep" name="beep">, +<ref id="fdisp" name="fdisp">, +<ref id="loadt" name="loadt">, +<tag/Example/None. +</descrip> +</quote> + + <sect1>em_commit<label id="em_commit"><p> <quote> @@ -2647,7 +3513,7 @@ loaded. <descrip> <tag/Function/Install an already loaded extended memory driver. <tag/Header/<tt/<ref id="em.h" name="em.h">/ -<tag/Declaration/<tt/unsigned char _fastcall__ em_install (void* driver);/ +<tag/Declaration/<tt/unsigned char _fastcall__ em_install (const void* driver);/ <tag/Description/The function installs an already loaded extended memory driver and returns an error code. The function may be used to install a driver linked statically to the program. @@ -2673,7 +3539,7 @@ used in presence of a prototype. <descrip> <tag/Function/Load and initialize an extended memory driver. <tag/Header/<tt/<ref id="em.h" name="em.h">/ -<tag/Declaration/<tt/void __fastcall__ em_load_driver (const char* name);/ +<tag/Declaration/<tt/unsigned char __fastcall__ em_load_driver (const char* name);/ <tag/Description/Load an extended memory driver into memory and initialize it. The function returns an error code that tells if all this has been successful. @@ -2702,7 +3568,7 @@ extended memory that should be supported. There is no autodetect capability. <tag/Declaration/<tt/void* __fastcall__ em_map (unsigned page);/ <tag/Description/The function maps one page of extended memory into linear memory and returns a pointer to the page frame. Depending on the hardware -and driver, the data is either mapped into the address space or transfered +and driver, the data is either mapped into the address space or transferred into a buffer. If you don't need the actual contents of the page (for example because you're going to overwrite it completely), it is better to call <tt/<ref id="em_use" name="em_use">/ instead. <tt/em_use/ will not transfer the @@ -2890,20 +3756,43 @@ program, it may not be able to read it. <quote> <descrip> -<tag/Function/Switch the C128 into 2MHz mode. -<tag/Header/<tt/<ref id="c128.h" name="c128.h">/ +<tag/Function/Switch the CPU into fast mode (C128: 2MHz mode, C16/Plus4: double clock mode). +<tag/Header/<tt/<ref id="c128.h" name="c128.h">, +<ref id="c16.h" name="c16.h">, <ref id="plus4.h" name="plus4.h">/ <tag/Declaration/<tt/void fast (void);/ -<tag/Description/The function will switch the clock of the C128 to 2MHz. This -will nearly double the speed compared to slow mode. +<tag/Description/The function will switch the clock of the CPU to fast mode. For the C128 +target it means switching the CPU into 2MHz mode. For the C16/Plus4 target it means +switching the CPU into double clock mode. <tag/Notes/<itemize> -<item>The function is specific to the C128. -<item>2MHz clock will not work in 40 column mode. +<item>The function is specific to the C128, C16 and Plus4. +<item>On the C128 the 2MHz clock will not work in 40 column mode. </itemize> -<tag/Availability/C128 +<tag/Availability/cc65 (not all platforms) <tag/See also/ +<ref id="isfast" name="isfast">, <ref id="slow" name="slow">, -<ref id="toggle_videomode" name="toggle_videomode">, -<ref id="videomode" name="videomode"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>fdisp<label id="fdisp"><p> + +<quote> +<descrip> +<tag/Function/Flash front-panel display. +<tag/Header/<tt/<ref id="sym1.h" name="sym1.h">/ +<tag/Declaration/<tt/void fdisp(void);/ +<tag/Description/<tt/fdisp/ flashes front-panel display. +<tag/Notes/<itemize> +<item>The function is specific to the Sym-1. +<item>The front-panel display buffer must be loaded prior to calling fdisp. See the DISPLAY struct definition in sym1.h. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="beep" name="beep">, +<ref id="loadt" name="loadt">, +<ref id="dumpt" name="dumpt">, <tag/Example/None. </descrip> </quote> @@ -2916,7 +3805,7 @@ will nearly double the speed compared to slow mode. <tag/Function/Return the end-of-file indicator of a stream. <tag/Header/<tt/<ref id="stdio.h" name="stdio.h">/ <tag/Declaration/<tt/int __fastcall__ feof (FILE* f);/ -<tag/Description/<tt/feof/ tests the end-of-file indicator ofthe stream +<tag/Description/<tt/feof/ tests the end-of-file indicator of the stream <tt/f/, and returns a non zero value if it is set. <tag/Notes/<itemize> <item>The indicator is set only after a read past the end of a file is @@ -3035,6 +3924,137 @@ header files define constants that can be used to check the return code. </quote> +<sect1>get_c128_speed<label id="get_c128_speed"><p> + +<quote> +<descrip> +<tag/Function/Get the current speed of the C128 CPU. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char get_c128_speed (void);/ +<tag/Description/The function returns the current speed of the C128 CPU. +<tag/Notes/<itemize> +<item>The function is specific to the C64 and C128. +<item>The function does not check if the C128 CPU is the current CPU. +<item>See the accelerator.h header for the speed definitions. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="detect_c128" name="detect_c128">, +<ref id="set_c128_speed" name="set_c128_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>get_c64dtv_speed<label id="get_c64dtv_speed"><p> + +<quote> +<descrip> +<tag/Function/Get the current speed of the C64DTV. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char get_c64dtv_speed (void);/ +<tag/Description/The function returns the current speed of the C64DTV. +<tag/Notes/<itemize> +<item>The function is specific to the C64. +<item>The function does not check for the presence of the C64DTV. +<item>See the accelerator.h header for the speed definitions. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="detect_c64dtv" name="detect_c64dtv">, +<ref id="set_c64dtv_speed" name="set_c64dtv_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>get_c65_speed<label id="get_c65_speed"><p> + +<quote> +<descrip> +<tag/Function/Get the current speed of the C65/C64DX in C64 mode. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char get_c65_speed (void);/ +<tag/Description/The function returns the current speed of the C65/C64DX in C64 mode. +<tag/Notes/<itemize> +<item>The function is specific to the C64. +<item>The function does not check for the presence of a C65/C64DX in C64 mode. +<item>See the accelerator.h header for the speed definitions. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="detect_c65" name="detect_c65">, +<ref id="set_c65_speed" name="set_c65_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>get_chameleon_speed<label id="get_chameleon_speed"><p> + +<quote> +<descrip> +<tag/Function/Get the current speed of the C64 Chameleon cartridge. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char get_chameleon_speed (void);/ +<tag/Description/The function returns the current speed of the C64 Chameleon cartridge. +<tag/Notes/<itemize> +<item>The function is specific to the C64. +<item>The function does not check for the presence of the C64 Chameleon cartridge. +<item>See the accelerator.h header for the speed definitions. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="detect_chameleon" name="detect_chameleon">, +<ref id="set_chameleon_speed" name="set_chameleon_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>get_scpu_speed<label id="get_scpu_speed"><p> + +<quote> +<descrip> +<tag/Function/Get the current speed of the C64/C128 SuperCPU cartridge. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char get_scpu_speed (void);/ +<tag/Description/The function returns the current speed of the SuperCPU cartridge. +<tag/Notes/<itemize> +<item>The function is specific to the C128 and C64. +<item>The function does not check for the presence of the cartridge. +<item>See the accelerator.h header for the speed definitions. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="detect_scpu" name="detect_scpu">, +<ref id="set_scpu_speed" name="set_scpu_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>get_turbomaster_speed<label id="get_turbomaster_speed"><p> + +<quote> +<descrip> +<tag/Function/Get the current speed of the C64 Turbo Master cartridge. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char get_turbomaster_speed (void);/ +<tag/Description/The function returns the current speed of the C64 Turbo Master cartridge. +<tag/Notes/<itemize> +<item>The function is specific to the C64. +<item>The function does not check for the presence of the C64 Turbo Master cartridge. +<item>See the accelerator.h header for the speed definitions. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="detect_turbomaster" name="detect_turbomaster">, +<ref id="set_turbomaster_speed" name="set_turbomaster_speed">, +<tag/Example/None. +</descrip> +</quote> + <sect1>getcpu<label id="getcpu"><p> <quote> @@ -3047,6 +4067,11 @@ returns one of the constants<itemize> <item><tt/CPU_6502/ <item><tt/CPU_65C02/ <item><tt/CPU_65816/ +<item><tt/CPU_4510/ +<item><tt/CPU_65SC02/ +<item><tt/CPU_65CE02/ +<item><tt/CPU_HUC6280/ +<item><tt/CPU_2A0x/ </itemize> <tag/Notes/<itemize> <item>Other, more exotic CPU types are not disinguished. @@ -3057,6 +4082,77 @@ returns one of the constants<itemize> </quote> +<sect1>getcurrentdevice<label id="getcurrentdevice"><p> + +<quote> +<descrip> +<tag/Function/Get current device. +<tag/Header/<tt/<ref id="device.h" name="device.h">/ +<tag/Declaration/<tt/unsigned char getcurrentdevice (void);/ +<tag/Description/The function returns the current device. +It allows to access the current device with the <ref id="dio.h" +name="Low-level disk I/O API"> or <ref id="cbm.h" name="cbm_* I/O +functions"> requiring a 'device' parameter. +<tag/Availability/cc65 +<tag/See also/ +<ref id="getdevicedir" name="getdevicedir">, +<ref id="getfirstdevice" name="getfirstdevice">, +<ref id="getnextdevice" name="getnextdevice"> +<tag/Example/<verb> +dio_open (getcurrentdevice ()); +</verb> +</descrip> +</quote> + + +<sect1>getcwd<label id="getcwd"><p> + +<quote> +<descrip> +<tag/Function/Get current working directory. +<tag/Header/<tt/<ref id="unistd.h" name="unistd.h">/ +<tag/Declaration/<tt/char* __fastcall__ getcwd (char* buf, size_t size);/ +<tag/Description/The function will return the current working directory. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/POSIX 1003.1 +<tag/Example/None. +</descrip> +</quote> + + +<sect1>getdevicedir<label id="getdevicedir"><p> + +<quote> +<descrip> +<tag/Function/Get device directory. +<tag/Header/<tt/<ref id="device.h" name="device.h">/ +<tag/Declaration/<tt/char* __fastcall__ getdevicedir (unsigned char device, char* buf, size_t size);/ +<tag/Description/The function returns the directory representing <tt/device/. +It allows to access the device on filesystem level by calling chdir() with +the directory returned. +<tag/Notes/<itemize> +<item>Calling getdevicedir() <em/does/ check for a (formatted) disk in a +floppy-disk-type device and returns NULL if that check fails. +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="getcwd" name="getcwd">, +<ref id="getcurrentdevice" name="getcurrentdevice">, +<ref id="getfirstdevice" name="getfirstdevice">, +<ref id="getnextdevice" name="getnextdevice"> +<tag/Example/<verb> +chdir (getdevicedir (device, buf, sizeof buf)); +</verb> +cf. <tt/samples/enumdevdir.c/ +</descrip> +</quote> + + <sect1>getenv<label id="getenv"><p> <quote> @@ -3080,6 +4176,66 @@ be used in presence of a prototype. </quote> +<sect1>getfirstdevice<label id="getfirstdevice"><p> + +<quote> +<descrip> +<tag/Function/Get first device. +<tag/Header/<tt/<ref id="device.h" name="device.h">/ +<tag/Declaration/<tt/unsigned char getfirstdevice (void);/ +<tag/Description/The function returns the first device. +The constant <tt/INVALID_DEVICE/ indicates no device. +<tag/Notes/<itemize> +<item>Calling getfirstdevice() does <em/not/ turn on the motor of a +drive-type device and does <em/not/ check for a disk in the drive. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="getcurrentdevice" name="getcurrentdevice">, +<ref id="getdevicedir" name="getdevicedir">, +<ref id="getnextdevice" name="getnextdevice"> +<tag/Example/<verb> +unsigned char dev = getfirstdevice (); +while (dev != INVALID_DEVICE) { + printf ("%d\n", dev); + dev = getnextdevice (dev); + } +</verb> +</descrip> +</quote> + + +<sect1>getnextdevice<label id="getnextdevice"><p> + +<quote> +<descrip> +<tag/Function/Get next device. +<tag/Header/<tt/<ref id="device.h" name="device.h">/ +<tag/Declaration/<tt/unsigned char __fastcall__ getnextdevice (unsigned char device);/ +<tag/Description/The function returns the next device after <tt/device/. +The constant <tt/INVALID_DEVICE/ indicates no further device. +<tag/Notes/<itemize> +<item>Calling getnextdevice() does <em/not/ turn on the motor of a +drive-type device and does <em/not/ check for a disk in the drive. +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="getcurrentdevice" name="getcurrentdevice">, +<ref id="getdevicedir" name="getdevicedir">, +<ref id="getfirstdevice" name="getfirstdevice"> +<tag/Example/<verb> +unsigned char dev = getfirstdevice (); +while (dev != INVALID_DEVICE) { + printf ("%d\n", dev); + dev = getnextdevice (dev); + } +</verb> +</descrip> +</quote> + + <sect1>getopt<label id="getopt"><p> <quote> @@ -3093,7 +4249,7 @@ const char* optstring);/ is a string that contains command line option characters. If a character in <tt/optstring/ is followed by a colon, the option requires an argument. An option on the command line is recognized if it is one of the option characters -preceeded by a '-'. +preceded by a '-'. <tt/getopt/ must be called repeatedly. It will return each option character found on the command line and <tt/EOF/ (-1) if there is no other option. An option argument is placed in <tt/optarg/, the index of the next element on the @@ -3203,11 +4359,6 @@ to undefined behaviour. is a letter or digit. The return value is zero if the character is anything else. <tag/Notes/<itemize> -<item>When compiling with <tt/-Os/ the function is actually a macro. The -inline sequence generated by the macro will not work correctly for values -outside the range 0..255. <em/Note:/ The constant <tt/EOF/ is not part of -this range. The non inline function may be accessed by <tt/#undef/'ing -the macro. <item>When compiling without <tt/-Os/, the function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -3240,11 +4391,6 @@ fastcall function, so it may only be used in presence of a prototype. <tag/Description/The function returns a non zero value if the given argument is a letter. The return value is zero if the character is anything else. <tag/Notes/<itemize> -<item>When compiling with <tt/-Os/ the function is actually a macro. The -inline sequence generated by the macro will not work correctly for values -outside the range 0..255. <em/Note:/ The constant <tt/EOF/ is not part of -this range. The non inline function may be accessed by <tt/#undef/'ing the -macro. <item>When compiling without <tt/-Os/, the function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -3275,13 +4421,8 @@ fastcall function, so it may only be used in presence of a prototype. <tag/Header/<tt/<ref id="ctype.h" name="ctype.h">/ <tag/Declaration/<tt/int __fastcall__ isascii (int c);/ <tag/Description/The function returns a non zero value if the given argument -is in the range 0..127 (the range of valid ASCII characters) and zero if not. +is in the range 0..127 (the range of valid ASCII characters), and zero if not. <tag/Notes/<itemize> -<item>When compiling with <tt/-Os/ the function is actually a macro. The -inline sequence generated by the macro will not work correctly for values -outside the range 0..255. <em/Note:/ The constant <tt/EOF/ is not part of -this range. The non inline function may be accessed by <tt/#undef/'ing the -macro. <item>When compiling without <tt/-Os/, the function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -3315,11 +4456,6 @@ fastcall function, so it may only be used in presence of a prototype. is a space or tab character. The return value is zero if the character is anything else. <tag/Notes/<itemize> -<item>When compiling with <tt/-Os/ the function is actually a macro. The -inline sequence generated by the macro will not work correctly for values -outside the range 0..255. <em/Note:/ The constant <tt/EOF/ is not part of -this range. The non inline function may be accessed by <tt/#undef/'ing the -macro. <item>When compiling without <tt/-Os/, the function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -3353,11 +4489,6 @@ fastcall function, so it may only be used in presence of a prototype. is a control character. The return value is zero if the character is anything else. <tag/Notes/<itemize> -<item>When compiling with <tt/-Os/ the function is actually a macro. The -inline sequence generated by the macro will not work correctly for values -outside the range 0..255. <em/Note:/ The constant <tt/EOF/ is not part of -this range. The non inline function may be accessed by <tt/#undef/'ing the -macro. <item>When compiling without <tt/-Os/, the function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -3390,11 +4521,6 @@ fastcall function, so it may only be used in presence of a prototype. <tag/Description/The function returns a non zero value if the given argument is a digit. The return value is zero if the character is anything else. <tag/Notes/<itemize> -<item>When compiling with <tt/-Os/ the function is actually a macro. The -inline sequence generated by the macro will not work correctly for values -outside the range 0..255. <em/Note:/ The constant <tt/EOF/ is not part of -this range. The non inline function may be accessed by <tt/#undef/'ing the -macro. <item>When compiling without <tt/-Os/, the function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -3417,6 +4543,27 @@ fastcall function, so it may only be used in presence of a prototype. </quote> +<sect1>isfast<label id="isfast"><p> + +<quote> +<descrip> +<tag/Function/Check if the CPU is in fast mode (C128: 2MHz mode, C16/Plus4: double clock mode). +<tag/Header/<tt/<ref id="c128.h" name="c128.h">, +<ref id="c16.h" name="c16.h">, <ref id="plus4.h" name="plus4.h">/ +<tag/Declaration/<tt/unsigned char isfast (void);/ +<tag/Description/The function returns a 1 if the CPU is in fast mode (C128: 2MHz mode, C16/Plus4: double clock mode). +<tag/Notes/<itemize> +<item>The function is specific to the C128, C16 and Plus4. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="fast" name="fast">, +<ref id="slow" name="slow">, +<tag/Example/None. +</descrip> +</quote> + + <sect1>isgraph<label id="isgraph"><p> <quote> @@ -3429,11 +4576,6 @@ space). is a printable character with the exception of space. The return value is zero if the character is anything else. <tag/Notes/<itemize> -<item>When compiling with <tt/-Os/ the function is actually a macro. The -inline sequence generated by the macro will not work correctly for values -outside the range 0..255. <em/Note:/ The constant <tt/EOF/ is not part of -this range. The non inline function may be accessed by <tt/#undef/'ing the -macro. <item>When compiling without <tt/-Os/, the function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -3467,11 +4609,6 @@ fastcall function, so it may only be used in presence of a prototype. is a lower case letter. The return value is zero if the character is anything else. <tag/Notes/<itemize> -<item>When compiling with <tt/-Os/ the function is actually a macro. The -inline sequence generated by the macro will not work correctly for values -outside the range 0..255. <em/Note:/ The constant <tt/EOF/ is not part of -this range. The non inline function may be accessed by <tt/#undef/'ing the -macro. <item>When compiling without <tt/-Os/, the function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -3505,11 +4642,6 @@ fastcall function, so it may only be used in presence of a prototype. is a printable character (this includes the space character). The return value is zero if the character is anything else. <tag/Notes/<itemize> -<item>When compiling with <tt/-Os/ the function is actually a macro. The -inline sequence generated by the macro will not work correctly for values -outside the range 0..255. <em/Note:/ The constant <tt/EOF/ is not part of -this range. The non inline function may be accessed by <tt/#undef/'ing the -macro. <item>When compiling without <tt/-Os/, the function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -3544,11 +4676,6 @@ space or an alphanumeric character. is a printable character, but not a space or anything alphanumeric. The return value is zero if the character is anything else. <tag/Notes/<itemize> -<item>When compiling with <tt/-Os/ the function is actually a macro. The -inline sequence generated by the macro will not work correctly for values -outside the range 0..255. <em/Note:/ The constant <tt/EOF/ is not part of -this range. The non inline function may be accessed by <tt/#undef/'ing the -macro. <item>When compiling without <tt/-Os/, the function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -3575,7 +4702,7 @@ fastcall function, so it may only be used in presence of a prototype. <quote> <descrip> -<tag/Function/Check if a given character is a a white-space character. +<tag/Function/Check if a given character is a white-space character. <tag/Header/<tt/<ref id="ctype.h" name="ctype.h">/ <tag/Declaration/<tt/int __fastcall__ isspace (int c);/ <tag/Description/The function returns a non zero value if the given argument @@ -3584,11 +4711,6 @@ anything else. The standard white space characters are: space, formfeed ('\f'), newline ('\n'), carriage return ('\r'), horizontal tab ('\t'), and vertical tab ('\v'). <tag/Notes/<itemize> -<item>When compiling with <tt/-Os/ the function is actually a macro. The -inline sequence generated by the macro will not work correctly for values -outside the range 0..255. <em/Note:/ The constant <tt/EOF/ is not part of -this range. The non inline function may be accessed by <tt/#undef/'ing the -macro. <item>When compiling without <tt/-Os/, the function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -3622,11 +4744,6 @@ fastcall function, so it may only be used in presence of a prototype. is an upper case letter. The return value is zero if the character is anything else. <tag/Notes/<itemize> -<item>When compiling with <tt/-Os/ the function is actually a macro. The -inline sequence generated by the macro will not work correctly for values -outside the range 0..255. <em/Note:/ The constant <tt/EOF/ is not part of -this range. The non inline function may be accessed by <tt/#undef/'ing the -macro. <item>When compiling without <tt/-Os/, the function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -3660,11 +4777,6 @@ fastcall function, so it may only be used in presence of a prototype. is a hexadecimal digit (0..9, a..f and A..F). The return value is zero if the character is anything else. <tag/Notes/<itemize> -<item>When compiling with <tt/-Os/ the function is actually a macro. The -inline sequence generated by the macro will not work correctly for values -outside the range 0..255. <em/Note:/ The constant <tt/EOF/ is not part of -this range. The non inline function may be accessed by <tt/#undef/'ing the -macro. <item>When compiling without <tt/-Os/, the function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -3746,7 +4858,7 @@ There's no way to check for the number of actually connected joysticks. <descrip> <tag/Function/Install an already loaded driver and return an error code. <tag/Header/<tt/<ref id="joystick.h" name="joystick.h">/ -<tag/Declaration/<tt/unsigned char __fastcall__ joy_install (void* driver);/ +<tag/Declaration/<tt/unsigned char __fastcall__ joy_install (const void* driver);/ <tag/Description/The function installs a driver that was already loaded into memory (or linked statically to the program). It returns an error code (<tt/JOY_ERR_OK/ in case of success). @@ -3882,6 +4994,28 @@ do), the function is rather useless. </quote> +<sect1>kbrepeat<label id="kbrepeat"><p> + +<quote> +<descrip> +<tag/Function/Set the keyboard repeat mode. +<tag/Header/<tt/<ref id="cbm.h" name="cbm.h">/ +<tag/Declaration/<tt/unsigned char __fastcall__ kbrepeat (unsigned char mode);/ +<tag/Description/This function changes which keys have automatic repeat when +being held down for a certain time. Possible values are <tt/KBREPEAT_CURSOR/ +(repeat only cursor-related keys), <tt/KBREPEAT_NONE/ (no repeat for any +keys), and <tt/KBREPEAT_ALL/ (repeat all keys). The old mode is returned, so +it can be restored later. +<tag/Notes/<itemize> +<item>The function is available only as a fastcall function; so, it may be used +only in the presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/Example/None. +</descrip> +</quote> + + <sect1>labs<label id="labs"><p> <quote> @@ -3904,6 +5038,30 @@ used in presence of a prototype. </quote> +<sect1>loadt<label id="loadt"><p> + +<quote> +<descrip> +<tag/Function/Load memory from tape. +<tag/Header/<tt/<ref id="sym1.h" name="sym1.h">/ +<tag/Declaration/<tt/int __fastcall__ loadt (unsigned char id);/ +<tag/Description/<tt/loadt/ loads memory from data tape. +<tag/Notes/<itemize> +<item>The function is specific to the Sym-1. +<item>The return value is status. Non-zero status indicates an error. +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="beep" name="beep">, +<ref id="fdisp" name="fdisp">, +<ref id="dumpt" name="dumpt">, +<tag/Example/None. +</descrip> +</quote> + + <sect1>ltoa<label id="ltoa"><p> <quote> @@ -3963,7 +5121,7 @@ always be the same. <tag/Header/<tt/<ref id="setjmp.h" name="setjmp.h">/ <tag/Declaration/<tt/void __fastcall__ longjmp (jmp_buf buf, int retval);/ <tag/Description/The <tt/longjmp/ function restores a program context from the -data in <tt/buf/, which must have been set by a preceeding call to +data in <tt/buf/, which must have been set by a preceding call to <tt/<ref id="setjmp" name="setjmp">/. Program execution continues as if the call to <tt/<ref id="setjmp" name="setjmp">/ has just returned the value <tt/retval/. @@ -4177,7 +5335,7 @@ the module just loaded. Possible error codes are: <item><tt/MLOAD_ERR_MEM/ - Not enough memory </itemize> <tag/Notes/<itemize> -<item>The <htmlurl url="ld65.html" name="ld65"> linker is needed to create +<item>The <url url="ld65.html" name="ld65 linker"> is needed to create relocatable o65 modules for use with this function. <item>The function is available only as a fastcall function; so, it may be used only in the presence of a prototype. @@ -4534,6 +5692,29 @@ memory allocated for the driver. </descrip> </quote> +<sect1>mul20<label id="mul20"><p> + +<quote> +<descrip> +<tag/Function/Multiplies argument by 20. +<tag/Header/<tt/<ref id="cc65.h" name="cc65.h">/ +<tag/Declaration/<tt/unsigned int __fastcall__ mul20 (unsigned char value);/ +<tag/Description/Speed optimized function to multiply an 8 bit unsigned value by 20 to get a 16 bit result. +<tag/Availability/cc65 +</descrip> +</quote> + +<sect1>mul40<label id="mul40"><p> + +<quote> +<descrip> +<tag/Function/Multiplies argument by 40. +<tag/Header/<tt/<ref id="cc65.h" name="cc65.h">/ +<tag/Declaration/<tt/unsigned int __fastcall__ mul40 (unsigned char value);/ +<tag/Description/Speed optimized function to multiply an 8 bit unsigned value by 40 to get a 16 bit result. +<tag/Availability/cc65 +</descrip> +</quote> <sect1>offsetof<label id="offsetof"><p> @@ -4584,7 +5765,7 @@ cc65 allows to pass this argument, it is ignored. <tag/Function/Open a directory. <tag/Header/<tt/<ref id="dirent.h" name="dirent.h">/ <tag/Declaration/<tt/DIR* __fastcall__ opendir (const char* name);/ -<tag/Description/<tt/opendir/ opens a directory and returns the direcory +<tag/Description/<tt/opendir/ opens a directory and returns the directory descriptor associated with it. On error, NULL is returned and an error code is stored in <tt/errno/. <tag/Notes/<itemize> @@ -4737,6 +5918,78 @@ be used in presence of a prototype. </quote> +<sect1>psg_delay<label id="psg_delay"><p> + +<quote> +<descrip> +<tag/Function/Delay for a short period of time. +<tag/Header/<tt/<ref id="creativision.h" name="creativision.h">/ +<tag/Declaration/<tt/void __fastcall__ psg_delay (unsigned char b);/ +<tag/Description/The function specifies how long each note or pause between +notes should last. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only be +used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="psg_outb" name="psg_outb">, +<ref id="psg_silence" name="psg_silence"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>psg_outb<label id="psg_outb"><p> + +<quote> +<descrip> +<tag/Function/Output a byte to the PSG. +<tag/Header/<tt/<ref id="creativision.h" name="creativision.h">/ +<tag/Declaration/<tt/void __fastcall__ psg_outb (unsigned char b);/ +<tag/Description/The function sends a byte to the Programmable Sound +Generator, then waits for the PSG to acknowledge. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only be +used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="psg_delay" name="psg_delay">, +<ref id="psg_silence" name="psg_silence"> +<tag/Example/<verb> +#include <creativision.h> +void main (void) +{ + psg_outb (0x80); // Latch frequency + psg_outb (0x07); // Frequency byte 2 + psg_outb (0x90); // Channel 0 full volume + psg_delay (100); + psg_silence (); +} +</verb> +</descrip> +</quote> + + +<sect1>psg_silence<label id="psg_silence"><p> + +<quote> +<descrip> +<tag/Function/Set volume off on each PSG channel. +<tag/Header/<tt/<ref id="creativision.h" name="creativision.h">/ +<tag/Declaration/<tt/void psg_silence (void);/ +<tag/Description/The function resets the Programmable Sound Generator, +then sends $9F, $BF, $DF, $FF to the PSG. +<tag/Availability/cc65 +<tag/See also/ +<ref id="psg_delay" name="psg_delay">, +<ref id="psg_outb" name="psg_outb"> +<tag/Example/None. +</descrip> +</quote> + + <sect1>qsort<label id="qsort"><p> <quote> @@ -4772,18 +6025,19 @@ calling convention. <tag/Function/Send a signal to the executing program. <tag/Header/<tt/<ref id="signal.h" name="signal.h">/ <tag/Declaration/<tt/int __fastcall__ raise (int sig);/ -<tag/Description/<tt/raise/ sends the given signal to the program. If the +<tag/Description/<tt/raise()/ sends the given signal to the program. If the program has installed a signal handler for the signal, this signal handler will be executed. If no handler has been installed, the default action for the raised signal will be taken. The function returns zero on success, -nonzero otherwise. +non-zero otherwise. <tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. +<item>The function is available only as a fastcall function, +so it may be used only in the presence of a prototype. </itemize> <tag/Availability/ISO 9899 <tag/See also/ <ref id="abort" name="abort">, +<ref id="assert" name="assert">, <ref id="signal" name="signal"> <tag/Example/None. </descrip> @@ -4873,7 +6127,7 @@ pointer you're passing somewhere else, otherwise <tscreen><verb> ptr = realloc (ptr, size); </verb></tscreen> -will loose your only copy of <tt/ptr/ if <tt/realloc/ returns <tt/NULL/. +will lose your only copy of <tt/ptr/ if <tt/realloc/ returns <tt/NULL/. <item>The function is only available as fastcall function, so it may only be used in presence of a prototype. </itemize> @@ -4974,7 +6228,7 @@ if (rename (OLDNAME, NEWNAME) == 0) { before a call to <tt/set_brk/. <tag/Notes/<itemize> <item>The break vector is reset on program termination, so it's not strictly -necessary to call this function as a part of your clean-up when exitting the program. +necessary to call this function as a part of your clean-up when exiting the program. </itemize> <tag/Availability/cc65 <tag/See also/ @@ -4996,7 +6250,7 @@ necessary to call this function as a part of your clean-up when exitting the pro <tag/Description/<tt/reset_irq/ resets the C level interrupt request vector. <tag/Notes/<itemize> <item>The interrupt vector is reset on program termination, so it's not strictly -necessary to call this function as a part of your clean-up when exitting the program. +necessary to call this function as a part of your clean-up when exiting the program. </itemize> <tag/Availability/cc65 <tag/See also/ @@ -5165,7 +6419,7 @@ while (ser_get(&ch) == SER_ERR_NO_DATA) <descrip> <tag/Function/Install an already loaded driver and return an error code. <tag/Header/<tt/<ref id="serial.h" name="serial.h">/ -<tag/Declaration/<tt/unsigned char __fastcall__ ser_install (void* driver);/ +<tag/Declaration/<tt/unsigned char __fastcall__ ser_install (const void* driver);/ <tag/Description/The function installs a driver that was already loaded into memory (or linked statically to the program). It returns an error code (<tt/SER_ERR_OK/ in case of success). @@ -5357,7 +6611,7 @@ the continue with the interrupted code, you have to adjust <tt/brk_pc/, otherwise the <tt/BRK/ instruction will get executed over and over again. <item>The break vector is reset on program termination, so it's not strictly necessary to call <tt/<ref id="reset_brk" name="reset_brk">/ as a part of your -clean-up when exitting the program. +clean-up when exiting the program. </itemize> <tag/Availability/cc65 <tag/See also/ @@ -5395,7 +6649,7 @@ enable stack checks for the handler function or any other function called from it. <item>The interrupt vector is reset on program termination, so it's not strictly necessary to call <tt/<ref id="reset_irq" name="reset_irq">/ as a part of your -clean-up when exitting the program. +clean-up when exiting the program. </itemize> <tag/Availability/cc65 <tag/See also/ @@ -5407,6 +6661,138 @@ clean-up when exitting the program. </quote> +<sect1>set_c128_speed<label id="set_c128_speed"><p> + +<quote> +<descrip> +<tag/Function/Set the current speed of a C128 CPU. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char __fastcall__ set_c128_speed (unsigned char speed);/ +<tag/Description/The function returns the speed after trying to set the speed of the C128 CPU. +<tag/Notes/<itemize> +<item>The function is specific to the C64 and C128. +<item>The function does not check if the C128 CPU is the current CPU. +<item>See the accelerator.h header for the speed definitions. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="detect_c128" name="detect_c128">, +<ref id="get_c128_speed" name="get_c128_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>set_c64dtv_speed<label id="set_c64dtv_speed"><p> + +<quote> +<descrip> +<tag/Function/Set the current speed of the C64DTV. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char __fastcall__ set_c64dtv_speed (unsigned char speed);/ +<tag/Description/The function returns the speed after trying to set the speed of the C64DTV. +<tag/Notes/<itemize> +<item>The function is specific to the C64. +<item>The function does not check for the presence of the C64DTV. +<item>See the accelerator.h header for the speed definitions. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="detect_c64dtv" name="detect_c64dtv">, +<ref id="get_c64dtv_speed" name="get_c64dtv_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>set_c65_speed<label id="set_c65_speed"><p> + +<quote> +<descrip> +<tag/Function/Set the current speed of the C65/C64DX in C64 mode. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char __fastcall__ set_c65_speed (unsigned char speed);/ +<tag/Description/The function returns the speed after trying to set the speed of the C65/C64DX in C64 mode. +<tag/Notes/<itemize> +<item>The function is specific to the C64. +<item>The function does not check for the presence of a C65/C64DX in C64 mode. +<item>See the accelerator.h header for the speed definitions. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="detect_c65" name="detect_c65">, +<ref id="get_c65_speed" name="get_c65_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>set_chameleon_speed<label id="set_chameleon_speed"><p> + +<quote> +<descrip> +<tag/Function/Set the current speed of the C64 Chameleon cartridge. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char __fastcall__ set_chameleon_speed (unsigned char speed);/ +<tag/Description/The function returns the speed after trying to set the speed of the C64 Chameleon cartridge. +<tag/Notes/<itemize> +<item>The function is specific to the C64. +<item>The function does not check for the presence of the C64 Chameleon cartridge. +<item>See the accelerator.h header for the speed definitions. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="detect_chameleon" name="detect_chameleon">, +<ref id="get_chameleon_speed" name="get_chameleon_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>set_scpu_speed<label id="set_scpu_speed"><p> + +<quote> +<descrip> +<tag/Function/Set the current speed of the C64/C128 SuperCPU cartridge. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char __fastcall__ set_scpu_speed (unsigned char speed);/ +<tag/Description/The function returns the speed after trying to set the speed of the SuperCPU cartridge. +<tag/Notes/<itemize> +<item>The function is specific to the C128 and C64. +<item>The function does not check for the presence of the cartridge. +<item>See the accelerator.h header for the speed definitions. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="detect_scpu" name="detect_scpu">, +<ref id="get_scpu_speed" name="get_scpu_speed">, +<tag/Example/None. +</descrip> +</quote> + + +<sect1>set_turbomaster_speed<label id="set_turbomaster_speed"><p> + +<quote> +<descrip> +<tag/Function/Set the current speed of the C64 Turbo Master cartridge. +<tag/Header/<tt/<ref id="accelerator.h" name="accelerator.h">/ +<tag/Declaration/<tt/unsigned char __fastcall__ set_turbomaster_speed (unsigned char speed);/ +<tag/Description/The function returns the speed after trying to set the speed of the C64 Turbo Master cartridge. +<tag/Notes/<itemize> +<item>The function is specific to the C64. +<item>The function does not check for the presence of the C64 Turbo Master cartridge. +<item>See the accelerator.h header for the speed definitions. +</itemize> +<tag/Availability/cc65 (not all platforms) +<tag/See also/ +<ref id="detect_turbomaster" name="detect_turbomaster">, +<ref id="get_turbomaster_speed" name="get_turbomaster_speed">, +<tag/Example/None. +</descrip> +</quote> + + <sect1>setjmp<label id="setjmp"><p> <quote> @@ -5474,6 +6860,7 @@ be used in presence of a prototype. <tag/Availability/ISO 9899 <tag/See also/ <ref id="abort" name="abort">, +<ref id="assert" name="assert">, <ref id="raise" name="raise"> <tag/Example/None. </descrip> @@ -5503,19 +6890,20 @@ be used in presence of a prototype. <quote> <descrip> -<tag/Function/Switch the C128 into 1MHz mode. -<tag/Header/<tt/<ref id="c128.h" name="c128.h">/ +<tag/Function/Switch the CPU into slow mode (C128: 1MHz mode, C16/Plus4: single clock mode). +<tag/Header/<tt/<ref id="c128.h" name="c128.h">, +<ref id="c16.h" name="c16.h">, <ref id="plus4.h" name="plus4.h">/ <tag/Declaration/<tt/void slow (void);/ -<tag/Description/The function will switch the clock of the C128 to 1MHz. This -will halve the speed compared to fast mode. +<tag/Description/The function will switch the clock of the CPU to slow mode. for the C128 +target it means switching the CPU into 1MHz mode. for the C16/Plus4 target it means +switching the CPU into single clock mode. <tag/Notes/<itemize> -<item>The function is specific to the C128. +<item>The function is specific to the C128, C16 and Plus4. </itemize> -<tag/Availability/C128 +<tag/Availability/cc65 (not all platforms) <tag/See also/ <ref id="fast" name="fast">, -<ref id="toggle_videomode" name="toggle_videomode">, -<ref id="videomode" name="videomode"> +<ref id="isfast" name="isfast">, <tag/Example/None. </descrip> </quote> @@ -5576,7 +6964,7 @@ be used in presence of a prototype. <quote> <descrip> -<tag/Function/Concatentate two strings. +<tag/Function/Concatenate two strings. <tag/Header/<tt/<ref id="string.h" name="string.h">/ <tag/Declaration/<tt/char* __fastcall__ strcat (char* s1, const char* s2);/ <tag/Description/The <tt/strcat/ function appends a copy of the string @@ -5728,6 +7116,7 @@ be used in presence of a prototype. </itemize> <tag/Availability/ISO 9899 <tag/See also/ +<ref id="strpbrk" name="strpbrk">, <ref id="strqtok" name="strqtok">, <ref id="strspn" name="strspn">, <ref id="strstr" name="strstr">, @@ -5869,11 +7258,39 @@ See <tt/strlower/. </quote> +<sect1>strncasecmp<label id="strncasecmp"><p> + +<quote> +<descrip> +<tag/Function/Compare two strings case insensitive. +<tag/Header/<tt/<ref id="string.h" name="string.h">/ +<tag/Declaration/<tt/int __fastcall__ strncasecmp (const char* s1, const char* s2, size_t count);/ +<tag/Description/The <tt/strncasecmp/ function compares the two strings passed +as parameters without case sensitivity. It returns a value that is less than +zero if <tt/s1/ is less than <tt/s2/, zero if <tt/s1/ is the same as <tt/s2/, +and a value greater than zero if <tt/s1/ is greater than <tt/s2/. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +<item>The function is not available in strict ANSI mode. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="strcmp" name="strcmp">, +<ref id="strcoll" name="strcoll">, +<ref id="stricmp" name="stricmp">, +<ref id="strncmp" name="strncmp">, +<ref id="strxfrm" name="strxfrm"> +<tag/Example/None. +</descrip> +</quote> + + <sect1>strncat<label id="strncat"><p> <quote> <descrip> -<tag/Function/Concatentate two strings. +<tag/Function/Concatenate two strings. <tag/Header/<tt/<ref id="string.h" name="string.h">/ <tag/Declaration/<tt/char* __fastcall__ strncat (char* s1, const char* s2, size_t n);/ <tag/Description/The <tt/strncat/ function appends not more than n characters @@ -5962,6 +7379,60 @@ strncpy (hello, "Hello world!\n", sizeof hello - 1)[5] = '\0'; </quote> +<sect1>strnicmp<label id="strnicmp"><p> + +<quote> +<descrip> +<tag/Function/Compare two strings case insensitive. +<tag/Header/<tt/<ref id="string.h" name="string.h">/ +<tag/Declaration/<tt/int __fastcall__ strnicmp (const char* s1, const char* s2, size_t count);/ +<tag/Description/The <tt/strnicmp/ function compares the two strings passed as +parameters without case sensitivity. It returns a value that is less than zero +if <tt/s1/ is less than <tt/s2/, zero if <tt/s1/ is the same as <tt/s2/, and a +value greater than zero if <tt/s1/ is greater than <tt/s2/. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +<item>The function is not available in strict ANSI mode. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="strcasecmp" name="strcasecmp">, +<ref id="strcmp" name="strcmp">, +<ref id="strcoll" name="strcoll">, +<ref id="strncmp" name="strncmp">, +<ref id="strxfrm" name="strxfrm"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>strpbrk<label id="strpbrk"><p> + +<quote> +<descrip> +<tag/Function/Find a character in a string, from a set of characters. +<tag/Header/<tt/<ref id="string.h" name="string.h">/ +<tag/Declaration/<tt/char* __fastcall__ strpbrk (const char* str, const char* set);/ +<tag/Description/<tt/strpbrk()/ searches within <tt/str/ for the first +occurrence of any character from <tt/set/. It returns a pointer to that +character if found; otherwise, it returns <tt/NULL/. +<tag/Notes/<itemize> +<item>The function is available only as a fastcall function; +so, it should be used only in the presence of a prototype. +</itemize> +<tag/Availability/ISO 9899 +<tag/See also/ +<ref id="strchr" name="strchr">, +<ref id="strcspn" name="strcspn">, +<ref id="strqtok" name="strqtok">, +<ref id="strspn" name="strspn">, +<ref id="strtok" name="strtok"> +<tag/Example/None. +</descrip> +</quote> + + <sect1>strqtok<label id="strqtok"><p> <quote> @@ -5986,7 +7457,7 @@ a second <tt/s1/ string before it finishes the first one. <tag/Availability/cc65 <tag/See also/ <ref id="strcspn" name="strcspn">, -<!-- <ref id="strpbrk" name="strpbrk">, --> +<ref id="strpbrk" name="strpbrk">, <ref id="strspn" name="strspn">, <ref id="strtok" name="strtok"> <tag/Example/None. @@ -6034,6 +7505,7 @@ be used in presence of a prototype. <tag/Availability/ISO 9899 <tag/See also/ <ref id="strcspn" name="strcspn">, +<ref id="strpbrk" name="strpbrk">, <ref id="strstr" name="strstr"> <tag/Example/None. </descrip> @@ -6047,7 +7519,7 @@ be used in presence of a prototype. <tag/Function/Find a substring. <tag/Header/<tt/<ref id="string.h" name="string.h">/ <tag/Declaration/<tt/char* __fastcall__ strstr (const char* str, const char* substr);/ -<tag/Description/<tt/strstr/ searches for the first occurance of the string +<tag/Description/<tt/strstr/ searches for the first occurrence of the string <tt/substr/ within <tt/str/. If found, it returns a pointer to the copy, otherwise it returns <tt/NULL/. <tag/Notes/<itemize> @@ -6086,7 +7558,7 @@ a second <tt/s1/ string before it finishes the first one. <tag/Availability/ISO 9899 <tag/See also/ <ref id="strcspn" name="strcspn">, -<!-- <ref id="strpbrk" name="strpbrk">, --> +<ref id="strpbrk" name="strpbrk">, <ref id="strqtok" name="strqtok">, <ref id="strspn" name="strspn"> <tag/Example/None. @@ -6114,7 +7586,7 @@ the behaviour is undefined. <item>If <tt/n/ is zero, <tt/s1/ may be a NULL pointer. <item>The function is only available as fastcall function, so it may only be used in presence of a prototype. -<item>Since cc65 doesn't support different charcter sets, <tt/strxfrm/ will +<item>Since cc65 doesn't support different character sets, <tt/strxfrm/ will just copy s2 to s1 using <tt><ref id="strncpy" name="strncpy"></tt>. </itemize> <tag/Availability/ISO 9899 @@ -6206,979 +7678,6 @@ be used in presence of a prototype. </quote> -<sect1>tgi_arc<label id="tgi_arc"><p> - -<quote> -<descrip> -<tag/Function/Draw an elliptic arc in the current color. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_arc (int x, int y, -unsigned char rx, unsigned char ry, unsigned sa, unsigned ea);/ -<tag/Description/The function draws an elliptic arc with center at x/y and -radii rx/ry using the current drawing color. The arc covers the angle -between sa and ea (startangle and endangle), which must be in the range -0..360. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -<item>The function behaves unexpectedly or may crash if the angles are out -of range. -</itemize> -<tag/Availability/cc65 -<tag/See also/ -<ref id="tgi_bar" name="tgi_bar">, -<ref id="tgi_circle" name="tgi_circle">, -<ref id="tgi_ellipse" name="tgi_ellipse">, -<ref id="tgi_pieslice" name="tgi_pieslice">, -<ref id="tgi_setcolor" name="tgi_setcolor"> -<tag/Example/<verb> -/* Draw the upper half of an ellipse */ -tgi_setcolor(TGI_COLOR_BLUE); -tgi_arc (50, 50, 40, 20, 0, 180); -</verb> -</descrip> -</quote> - - -<sect1>tgi_bar<label id="tgi_bar"><p> - -<quote> -<descrip> -<tag/Function/The function fills a rectangle on the drawpage with the current -color. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_bar (int x1, int y1, int x2, int y2);/ -<tag/Description/The function fills a rectangle on the drawpage with the current -color. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi function -<tag/Example/<verb> -tgi_setcolor(TGI_COLOR_GREEN); -tgi_bar(10, 10, 100, 60); -</verb> -</descrip> -</quote> - - -<sect1>tgi_circle<label id="tgi_circle"><p> - -<quote> -<descrip> -<tag/Function/The function draws a circle in the current color. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_circle (int x, int y, unsigned char radius);/ -<tag/Description/The function draws a circle in the current color. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/ -<ref id="tgi_arc" name="tgi_arc">, -<ref id="tgi_bar" name="tgi_bar">, -<ref id="tgi_ellipse" name="tgi_ellipse">, -<ref id="tgi_pieslice" name="tgi_pieslice">, -<ref id="tgi_setcolor" name="tgi_setcolor"> -<tag/Example/<verb> -tgi_setcolor(TGI_COLOR_BLACK); -tgi_circle(50, 40, 40); -</verb> -</descrip> -</quote> - - -<sect1>tgi_clear<label id="tgi_clear"><p> - -<quote> -<descrip> -<tag/Function/Clear the drawpage -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void tgi_clear (void);/ -<tag/Description/Clear the drawpage -<tag/Availability/cc65 -<tag/See also/Other tgi functions -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_done<label id="tgi_done"><p> - -<quote> -<descrip> -<tag/Function/End graphics mode, switch back to text mode. -Will NOT uninstall or unload the driver! -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void tgi_done (void);/ -<tag/Description/End graphics mode, switch back to text mode. -Will NOT uninstall or unload the driver! -<tag/Availability/cc65 -<tag/See also/Other tgi functions -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_ellipse<label id="tgi_ellipse"><p> - -<quote> -<descrip> -<tag/Function/The function draws an ellipse in the current color. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_ellipse (int x, int y, unsigned char rx, unsigned char ry);/ -<tag/Description/The function draws an ellipse at position x/y with radii -rx and ry, using the current drawing color. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/ -<ref id="tgi_arc" name="tgi_arc">, -<ref id="tgi_bar" name="tgi_bar">, -<ref id="tgi_circle" name="tgi_circle">, -<ref id="tgi_pieslice" name="tgi_pieslice">, -<ref id="tgi_setcolor" name="tgi_setcolor"> -<tag/Example/<verb> -tgi_setcolor(TGI_COLOR_RED); -tgi_ellipse (50, 40, 40, 20); -</verb> -</descrip> -</quote> - - -<sect1>tgi_free_vectorfont<label id="tgi_free_vectorfont"><p> - -<quote> -<descrip> -<tag/Function/Free a vector font that was previously loaded into memory. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_free_vectorfont (const tgi_vectorfont* font);/ -<tag/Description/Free a vector font that was previously loaded into memory. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/ -<ref id="tgi_load_vectorfont" name="tgi_load_vectorfont">, -<ref id="tgi_install_vectorfont" name="tgi_install_vectorfont"> -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_getaspectratio<label id="tgi_getaspectratio"><p> - -<quote> <descrip> <tag/Function/Return the pixel aspect ratio. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned tgi_getaspectratio (void);/ -<tag/Description/The function returns the pixel aspect ratio for the current -driver and display as an 8.8 fixed point value. It may be used to correct -geometric shapes so they look correct on the display. As an example, a circle -with a radius of 100 pixels may look elliptic on some driver/display -combinations if the aspect ratio is not 1.00. -<tag/Notes/<itemize> -<item>The aspect ratio is encoded in the TGI driver which assumes a "standard" -monitor for the given platform. The aspect ratio may be wrong if another -monitor is used. -<item>No TGI function will use the aspect ratio. It is up to the programmer to -make use of it. -<item>The <ref id="tgi_setaspectratio" name="tgi_setaspectratio"> function can -be used to change the aspect ratio for a loaded driver. The value is not reset -by <ref id="tgi_init" name="tgi_init">, so if a driver is linked statically to -an application, switching into and out of graphics mode will not restore the -original aspect ratio. -</itemize> -<tag/Availability/cc65 -<tag/See also/ -<ref id="tgi_setaspectratio" name="tgi_setaspectratio"> -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_getcolor<label id="tgi_getcolor"><p> - -<quote> -<descrip> -<tag/Function/Return the current drawing color. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned char tgi_getcolor (void);/ -<tag/Description/The actual color is an index to a palette. During tgi_init -you will get a default palette. The number of colors depend on the platform. -All platforms recognize at least TGI_COLOR_BLACK and TGI_COLOR_WHITE. But some -platforms have many more predefined colors. If you paint using TGI_COLOR_GREEN -and then you change the green of the palette to blue using tgi_setpalette then -after this painting in TGI_COLOR_GREEN will actually be blue. -<tag/Availability/cc65 -<tag/See also/Other tgi functions -<tag/Example/<verb> -color = tgi_getcolor(); -</verb> -</descrip> -</quote> - - -<sect1>tgi_getcolorcount<label id="tgi_getcolorcount"><p> - -<quote> -<descrip> -<tag/Function/Get the number of available colors. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned char tgi_getcolorcount (void);/ -<tag/Description/Tgi platforms use indexed color palettes. This function -returns the number of entries we can use in the palette. -<tag/Availability/cc65 -<tag/See also/Other tgi functions -<tag/Example/<verb> -if (tgi_getcolorcount() == 2) { - printf("Only monochrome graphics is supported\n"); -} -</verb> -</descrip> -</quote> - - -<sect1>tgi_getdefpalette<label id="tgi_getdefpalette"><p> - -<quote> -<descrip> -<tag/Function/Get the palette installed by default. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/const unsigned char* tgi_getdefpalette (void);/ -<tag/Description/The tgi driver has a default palette that is active at startup. -The named colors TGI_COLOR_BLACK, TGI_COLOR_WHITE, TGI_COLOR_RED... need this -palette to work correctly. -<tag/Availability/cc65 -<tag/See also/Other tgi functions -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_geterror<label id="tgi_geterror"><p> - -<quote> -<descrip> -<tag/Function/Return the error code for the last operation. -This will also clear the error. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned char tgi_geterror (void);/ -<tag/Description/Return the error code for the last operation. -This will also clear the error. -<tag/Availability/cc65 -<tag/See also/Other tgi functions -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_geterrormsg<label id="tgi_geterrormsg"><p> - -<quote> -<descrip> -<tag/Function/Get an error message describing the error. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/const char* __fastcall__ tgi_geterrormsg (unsigned char code);/ -<tag/Description/Get an error message describing the error. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_getmaxcolor<label id="tgi_getmaxcolor"><p> - -<quote> -<descrip> -<tag/Function/Get the highest index of the palette. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned char tgi_getmaxcolor (void);/ -<tag/Description/Get the highest index of the palette. -<tag/Availability/cc65 -<tag/See also/Other tgi functions -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_getmaxx<label id="tgi_getmaxx"><p> - -<quote> -<descrip> -<tag/Function/Get the maximum x coordinate that can be used on this screen. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned tgi_getmaxx (void);/ -<tag/Description/Get the maximum x coordinate that can be used on this screen. -<tag/Availability/cc65 -<tag/See also/Other tgi functions -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_getmaxy<label id="tgi_getmaxy"><p> - -<quote> -<descrip> -<tag/Function/Get the maximum y coordinate that can be used on this screen. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned tgi_getmaxy (void);/ -<tag/Description/Get the maximum y coordinate that can be used on this screen. -<tag/Availability/cc65 -<tag/See also/Other tgi functions -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_getpagecount<label id="tgi_getpagecount"><p> - -<quote> -<descrip> -<tag/Function/Return the number of screen pages available. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned tgi_getpagecount (void);/ -<tag/Description/Return the number of screen pages available. -<tag/Availability/cc65 -<tag/See also/ -<ref id="tgi_setdrawpage" name="tgi_setdrawpage">, -<ref id="tgi_setviewpage" name="tgi_setviewpage"> -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_getpalette<label id="tgi_getpalette"><p> - -<quote> -<descrip> -<tag/Function/Get the palette installed. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/const unsigned char* tgi_getpalette (void);/ -<tag/Description/Get the palette installed. -<tag/Availability/cc65 -<tag/See also/Other tgi functions -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_getpixel<label id="tgi_getpixel"><p> - -<quote> -<descrip> -<tag/Function/Get the color of a pixel from the viewpage. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned char __fastcall__ tgi_getpixel (int x, int y);/ -<tag/Description/Get the color of a pixel from the viewpage. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_getxres<label id="tgi_getxres"><p> - -<quote> -<descrip> -<tag/Function/Get number of horisontal pixels on the screen. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned tgi_getxres (void);/ -<tag/Description/Get number of horisontal pixels on the screen. -This is same as tgi_maxx()+1. -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_getyres<label id="tgi_getyres"><p> - -<quote> -<descrip> -<tag/Function/Get number of vertical pixels on the screen. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned tgi_getyres (void);/ -<tag/Description/Get number of vertical pixels on the screen. -This is same as tgi_maxy()+1. -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_gotoxy<label id="tgi_gotoxy"><p> - -<quote> -<descrip> -<tag/Function/Set graphics cursor at x, y. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_gotoxy (int x, int y);/ -<tag/Description/Set graphics cursor at x, y. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_init<label id="tgi_init"><p> - -<quote> -<descrip> -<tag/Function/Initialize the already loaded graphics driver. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void tgi_init (void);/ -<tag/Description/The tgi_init function will set the default palette to the -hardware. -<tag/Notes/<itemize> -<item><tt/tgi_init/ will not clear the screen. This allows switching between -text and graphics mode on platforms that have separate memory areas for the -screens. If you want the screen cleared, call <tt/<ref id="tgi_clear" -name="tgi_clear">/ after <tt/tgi_init/. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/<verb> -tgi_install(tgi_static_stddrv); //Include the driver statically instead of loading it. -tgi_init(); //Set up the default palette and clear the screen. -</verb> -</descrip> -</quote> - - -<sect1>tgi_install<label id="tgi_install"><p> - -<quote> -<descrip> -<tag/Function/Install an already loaded driver and return an error code. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned char __fastcall__ tgi_install (void* driver);/ -<tag/Description/The function installs a driver that was already loaded into -memory (or linked statically to the program). It returns an error code -(<tt/TGI_ERR_OK/ in case of success). -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only be -used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/ -<ref id="tgi_load_driver" name="tgi_load_driver">, -<ref id="tgi_uninstall" name="tgi_uninstall">, -<ref id="tgi_unload" name="tgi_unload"> -<tag/Example/<verb> -tgi_install(tgi_static_stddrv); //Include the driver statically instead of loading it. -tgi_init(); //Set up the default palette and clear the screen. -</verb> -</descrip> -</quote> - - -<sect1>tgi_install_vectorfont<label id="tgi_install_vectorfont"><p> - -<quote> -<descrip> -<tag/Function/Install an already loaded driver and return an error code. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_install_vectorfont (const tgi_vectorfont* font);/ -<tag/Description/ -Install a vector font for use. More than one vector font can be loaded, -but only one can be active. This function is used to tell which one. Call -with a NULL pointer to uninstall the currently installed font. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only be -used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/ -<ref id="tgi_load_vectorfont" name="tgi_load_vectorfont">, -<ref id="tgi_free_vectorfont" name="tgi_free_vectorfont"> -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_ioctl<label id="tgi_ioctl"><p> - -<quote> -<descrip> -<tag/Function/Platform dependent code extensions. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned __fastcall__ tgi_ioctl (unsigned char code, void* data);/ -<tag/Description/Some platforms have extra display hardware that is not -supported by standard tgi functions. You can extend the driver to support -this extra hardware using tgi_ioctl functions. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -<item>These functions are not easily portable to other cc65 platforms. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/<verb> -#define tgi_sprite(spr) tgi_ioctl(0, (void*)(spr)) -#define tgi_flip() tgi_ioctl(1, (void*)0) -#define tgi_setbgcolor(bgcol) tgi_ioctl(2, (void*)(bgcol)) -#define tgi_setframerate(rate) tgi_ioctl(3, (void*)(rate)) -#define tgi_busy() tgi_ioctl(4, (void*)0) -#define tgi_updatedisplay() tgi_ioctl(4, (void*)1) -if (!tgi_busy()) { - tgi_sprite(&background); - tgi_setcolor(TGI_COLOR_BLUE); - tgi_outttextxy(20,40,"Hello World"); - tgi_updatedisplay(); -} -</verb> -</descrip> -</quote> - - -<sect1>tgi_line<label id="tgi_line"><p> - -<quote> -<descrip> -<tag/Function/Draw a line in the current drawing color. -The graphics cursor will be set to x2/y2 by this call. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_line (int x1, int y1, int x2, int y2);/ -<tag/Description/Draw a line in the current drawing color. -The graphics cursor will be set to x2/y2 by this call. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_lineto<label id="tgi_lineto"><p> - -<quote> -<descrip> -<tag/Function/Draw a line in the current drawing color from the graphics -cursor to the new end point. The graphics cursor will be updated to x2/y2. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_lineto (int x2, int y2);/ -<tag/Description/Draw a line in the current drawing color from the graphics -cursor to the new end point. The graphics cursor will be updated to x2/y2. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_load_driver<label id="tgi_load_driver"><p> - -<quote> -<descrip> -<tag/Function/Load and install the given driver. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_load_driver (const char *name);/ -<tag/Description/Load and install the driver by name. -Will just load the driver and check if loading was successful. -Will not switch to graphics mode. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_load_vectorfont<label id="tgi_load_vectorfont"><p> - -<quote> -<descrip> -<tag/Function/Load the given vector font. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/const tgi_vectorfont* __fastcall__ tgi_load_vectorfont (const char* name);/ -<tag/Description/ -Load a vector font into memory and return it. In case of errors, NULL is -returned and an error is set, which can be retrieved using tgi_geterror. -To use the font, it has to be installed using tgi_install_vectorfont. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/ -<ref id="tgi_install_vectorfont" name="tgi_install_vectorfont">, -<ref id="tgi_free_vectorfont" name="tgi_free_vectorfont"> -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_outtext<label id="tgi_outtext"><p> - -<quote> -<descrip> -<tag/Function/Output text at the current graphics cursor position. -The graphics cursor is moved to the end of the text. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_outtext (const char* s);/ -<tag/Description/Output text at the current graphics cursor position. -The graphics cursor is moved to the end of the text. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_outtextxy<label id="tgi_outtextxy"><p> - -<quote> -<descrip> -<tag/Function/Output text at the given cursor position. -The graphics cursor is moved to the end of the text. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_outtextxy (int x, int y, const char* s);/ -<tag/Description/Output text at the given cursor position. -The graphics cursor is moved to the end of the text. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_pieslice<label id="tgi_pieslice"><p> - -<quote> -<descrip> -<tag/Function/Draw an elliptic pie slice in the current color. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_pie slice (int x, int y, -unsigned char rx, unsigned char ry, unsigned sa, unsigned ea);/ -<tag/Description/The function draws an elliptic pie slice with center at x/y -and radii rx/ry using the current drawing color. The pie slice covers the angle -between sa and ea (startangle and endangle), which must be in the range -0..360. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -<item>The function behaves unexpectedly or may crash if the angles are out -of range. -</itemize> -<tag/Availability/cc65 -<tag/See also/ -<ref id="tgi_bar" name="tgi_arc">, -<ref id="tgi_bar" name="tgi_bar">, -<ref id="tgi_circle" name="tgi_circle">, -<ref id="tgi_ellipse" name="tgi_ellipse">, -<ref id="tgi_setcolor" name="tgi_setcolor"> -<tag/Example/<verb> -/* Draw the closed upper half of an ellipse */ -tgi_setcolor(TGI_COLOR_BLUE); -tgi_pieslice (50, 50, 40, 20, 0, 180); -</verb> -</descrip> -</quote> - - -<sect1>tgi_setaspectratio<label id="tgi_setaspectratio"><p> - -<quote> <descrip> <tag/Function/Set the pixel aspect ratio. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_setaspectratio (unsigned ratio);/ -<tag/Description/The function sets the pixel aspect ratio for the current -driver and display. The argument is an 8.8 fixed point value. The aspect ratio -may be used to correct geometric shapes so they look correct on a given -display. As an example, a circle with a radius of 100 pixels may look elliptic -on some driver/display combinations if the aspect ratio is not 1.00. -<tag/Notes/<itemize> -<item>The aspect ratio is encoded in the TGI driver which assumes a "standard" -monitor for the given platform. The aspect ratio may be wrong if another -monitor is used. -<item>No TGI function will use the aspect ratio. It is up to the programmer to -make use of it. -<item>The <tt/tgi_setaspectratio/ function can be used to change the aspect -ratio for a loaded driver. The value is not reset by <ref id="tgi_init" -name="tgi_init">, so if a driver is linked statically to an application, -switching into and out of graphics mode will not restore the original aspect -ratio. -<item>The function is available only as a fastcall function; so, it may be used -only in the presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/ -<ref id="tgi_getaspectratio" name="tgi_getaspectratio"> -<tag/Example/None. -</descrip> -</quote> - - -<sect1>tgi_setcolor<label id="tgi_setcolor"><p> - -<quote> -<descrip> -<tag/Function/Set color to be used in future draw operations. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_setcolor (unsigned char color);/ -<tag/Description/Set color to be used in future draw operations. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/<verb> -tgi_setcolor(TGI_COLOR_BLACK); -tgi_bar(0,0,30,30); -tgi_setcolor(TGI_COLOR_WHITE); -tgi_bar(10,10,20,20); -</verb> -</descrip> -</quote> - -<sect1>tgi_setdrawpage<label id="tgi_setdrawpage"><p> - -<quote> -<descrip> -<tag/Function/Set the page for drawing. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_setdrawpage (unsigned char page);/ -<tag/Description/If the drawpage and the viewpage are the same then all drawing -is seen immediately as it is drawn. For double buffered games you can set the -drawpage to a different page than the viewpage. This lets you draw the next -screen in the background and when the screen is ready you display it. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/<verb> -tgi_setdrawpage(1); -tgi_outtextxy(10, 10, "Hello World"); -tgi_setviewpage(1); // Show page 1 -tgi_setdrawpage(0); -tgi_outtextxy(10, 10, "Creating next frame"); -... -tgi_setviewpage(0); // Show page 0 -</verb> -</descrip> -</quote> - -<sect1>tgi_setpalette<label id="tgi_setpalette"><p> - -<quote> -<descrip> -<tag/Function/Set the palette (not available with all drivers/hardware). -Palette is a pointer to as many entries as there are colors. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_setpalette (const unsigned char* palette);/ -<tag/Description/Set the palette (not available with all drivers/hardware). -Palette is a pointer to as many entries as there are colors. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - -<sect1>tgi_setpixel<label id="tgi_setpixel"><p> - -<quote> -<descrip> -<tag/Function/Plot a pixel on the drawpage with the current color. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_setpixel (int x, int y);/ -<tag/Description/Plot a pixel on the drawpage with the current color. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - -<sect1>tgi_setviewpage<label id="tgi_setviewpage"><p> - -<quote> -<descrip> -<tag/Function/Set page to be visible on screen. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_setviewpage (unsigned char page);/ -<tag/Description/If the drawpage and the viewpage are the same then all drawing -is seen immediately as it is drawn. For double buffered games you can set the -drawpage to a different page than the viewpage. This lets you draw the next -screen in the background and when the screen is ready you display it. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/<verb> -tgi_setdrawpage(1); -tgi_outtextxy(10, 10, "Hello World"); -tgi_setviewpage(1); // Show page 1 -tgi_setdrawpage(0); -tgi_outtextxy(10, 10, "Creating next frame"); -... -tgi_setviewpage(0); // Show page 0 -</verb> -</descrip> -</quote> - -<sect1>tgi_gettextheight<label id="tgi_gettextheight"><p> - -<quote> -<descrip> -<tag/Function/Calculate the height of the text in pixels according to -the current text style. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned __fastcall__ tgi_gettextheight (const char* s);/ -<tag/Description/Calculate the height of the text in pixels according to -the current text style. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - -<sect1>tgi_settextscale<label id="tgi_settextscale"><p> - -<quote> -<descrip> -<tag/Function/Set the scaling for text output. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_settextscale (unsigned width, unsigned height);/ -<tag/Description/ -Set the scaling for text output. The scaling factors for width and height -are 8.8 fixed point values. This means that $100 = 1 $200 = 2 etc. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/ -<ref id="tgi_settextstyle" name="tgi_settextstyle"> -<tag/Example/None. -</descrip> -</quote> - -<sect1>tgi_settextstyle<label id="tgi_settextstyle"><p> - -<quote> -<descrip> -<tag/Function/Set the style for text output. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void __fastcall__ tgi_settextstyle (unsigned char magx, unsigned char magy, unsigned char dir, unsigned char font);/ -<tag/Description/Set the style for text output. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/ -<ref id="tgi_settextscale" name="tgi_settextscale"> -<tag/Example/None. -</descrip> -</quote> - -<sect1>tgi_gettextwidth<label id="tgi_gettextwidth"><p> - -<quote> -<descrip> -<tag/Function/Calculate the width of the text in pixels according to the current text style. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/unsigned __fastcall__ tgi_gettextwidth (const char* s);/ -<tag/Description/Calculate the width of the text in pixels according to the current text style. -<tag/Notes/<itemize> -<item>The function is only available as fastcall function, so it may only -be used in presence of a prototype. -</itemize> -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - -<sect1>tgi_uninstall<label id="tgi_uninstall"><p> - -<quote> -<descrip> -<tag/Function/Uninstall the currently loaded driver but do not unload it. -Will call tgi_done if necessary. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void tgi_uninstall (void);/ -<tag/Description/Uninstall the currently loaded driver but do not unload it. -Will call tgi_done if necessary. -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - -<sect1>tgi_unload<label id="tgi_unload"><p> - -<quote> -<descrip> -<tag/Function/Uninstall, then unload the currently loaded driver. -Will call tgi_done if necessary. -<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ -<tag/Declaration/<tt/void tgi_unload (void);/ -<tag/Description/Uninstall, then unload the currently loaded driver. -Will call tgi_done if necessary. -<tag/Availability/cc65 -<tag/See also/Other tgi functions. -<tag/Example/None. -</descrip> -</quote> - <sect1>time<label id="time"><p> <quote> @@ -7189,7 +7688,7 @@ Will call tgi_done if necessary. <tag/Description/The function returns the time since the 1970-01-01 00:00:00 measured in seconds. If the pointer <tt/t/ is not <tt/NULL/, the function result will also be stored there. If no time is available, <tt/(time_t)-1/ is -returned and <tt/errno/ is set to <tt/ENOSYS/. +returned and an error code is stored in <tt/errno/. <tag/Notes/<itemize> <item>The function is only available as fastcall function, so it may only be used in presence of a prototype. @@ -7198,7 +7697,8 @@ returned value may not be valid. </itemize> <tag/Availability/ISO 9899 <tag/See also/ -<ref id="clock" name="clock"> +<ref id="clock" name="clock">, +<ref id="clock_gettime" name="clock_gettime"> <tag/Example/None. </descrip> </quote> @@ -7222,6 +7722,7 @@ name="videomode"> instead! <tag/Availability/C128 <tag/See also/ <ref id="fast" name="fast">, +<ref id="isfast" name="isfast">, <ref id="slow" name="slow">, <ref id="videomode" name="videomode"> <tag/Example/None. @@ -7405,23 +7906,31 @@ used in presence of a prototype. <quote> <descrip> -<tag/Function/Switch to either 40 or 80 column mode. -<tag/Header/<tt/<ref id="apple2enh.h" name="apple2enh.h">, -<ref id="c128.h" name="c128.h">/ -<tag/Declaration/<tt/unsigned __fastcall__ videomode (unsigned Mode);/ -<tag/Description/Switch to 40 or 80 column mode depending on the argument. If -the requested mode is already active, nothing happens. The old mode is returned -from the call. +<tag/Function/Switch to either 40- or 80-column text mode, or a standard +graphics mode. +<tag/Header/<tt/ +<ref id="apple2enh.h" name="apple2enh.h">, +<ref id="c128.h" name="c128.h">, +<ref id="cx16.h" name="cx16.h">/ +<tag/Declaration/ +<tt>unsigned __fastcall__ videomode (unsigned Mode); /* for apple2enh and c128 */</tt><newline> +<tt>signed char __fastcall__ videomode (signed char Mode); /* for cx16 */</tt> +<tag/Description/Switch to a 40- or 80-column text or graphics mode, depending +on the argument. If the requested mode is already active, nothing happens. The +old mode is returned from the call. <tag/Notes/<itemize> -<item>The function is specific to the C128 and enhanced Apple //e. +<item>The function is specific to the Commodore 128, the enhanced Apple //e, +and the Commander X16. <item>This function replaces <ref id="toggle_videomode" name="toggle_videomode">. -<item>The function is only available as fastcall function, so it may only be -used in presence of a prototype. +<item>The function is available as only a fastcall function, so it may be used +only in the presence of a prototype. </itemize> -<tag/Availability/C128 and enhanced Apple //e +<tag/Availability/C128, enhanced Apple //e, and CX16 <tag/See also/ <ref id="fast" name="fast">, +<ref id="isfast" name="isfast">, +<!-- <ref id="set_tv" name="set_tv">, --> <ref id="slow" name="slow">, <ref id="toggle_videomode" name="toggle_videomode"> <tag/Example/None. @@ -7429,6 +7938,24 @@ used in presence of a prototype. </quote> +<sect1>waitvsync<label id="waitvsync"><p> + +<quote> +<descrip> +<tag/Function/Wait until the start of the next video frame. +<tag/Header/<tt/ +<ref id="cbm.h" name="cbm.h">, +<ref id="gamate.h" name="gamate.h">, +<ref id="nes.h" name="nes.h">, +<ref id="pce.h" name="pce.h">/ +<tag/Declaration/<tt/void waitvsync (void);/ +<tag/Description/Wait for vertical sync, to reduce flickering. +<tag/Availability/Platforms served by the headers above +<tag/Example/None. +</descrip> +</quote> + + <sect1>wherex<label id="wherex"><p> <quote> diff --git a/doc/gamate.sgml b/doc/gamate.sgml index 14b1a27e9..b61053ce8 100644 --- a/doc/gamate.sgml +++ b/doc/gamate.sgml @@ -1,11 +1,9 @@ <!doctype linuxdoc system> <article> - <title>Gamate System specific information for cc65 <author> -<url url="mailto:groepaz@gmx.net" name="Groepaz/Hitmen"> -<date>2015-11-29 +<url url="mailto:groepaz@gmx.net" name="Groepaz"> <abstract> An overview over the Gamate runtime system as it is implemented for the @@ -44,14 +42,11 @@ by an external program. Such an utility is provided in util/gamate/gamate-fixcar Programs containing Gamate specific code may use the <tt/gamate.h/ header file. -<sect1>Hardware access<p> +<sect1>Gamate specific functions<p> -The following pseudo variables declared in the <tt/gamate.inc/ include file do -allow access to hardware located in the address space. - -<descrip> - -</descrip><p> +<itemize> +<item>waitvsync</item> +</itemize> @@ -122,14 +117,7 @@ following functions (and a few others): <sect>Other hints<p> <itemize> -<item>The Gamate is emulated by MESS (<url url="http://www.mess.org/">), -run like this: <tt>mess gamate -debug -window -skip_gameinfo -cart test.bin</tt> -</itemize> - -some resources on the Gamate: - -<itemize> -<item><url url="http://en.wikipedia.org/wiki/Gamate"> +<item>some resources on the Gamate: <url url="http://en.wikipedia.org/wiki/Gamate"> </itemize> <sect>License<p> @@ -143,17 +131,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> - - - diff --git a/doc/geos.sgml b/doc/geos.sgml index aa3725bdf..8a43d134b 100644 --- a/doc/geos.sgml +++ b/doc/geos.sgml @@ -1,12 +1,9 @@ <!doctype linuxdoc system> <article> - -<!-- Title information --> - <title>GEOSLib docs <author><url url="mailto:ytm@elysium.pl" name="Maciej Witkowiak"> -<date>2014-04-11 + <abstract> This is the documentation of cc65's GEOSLib, but information contained here may be also useful for writing GEOS applications in general. @@ -51,7 +48,7 @@ changed between <tt/tgi_init/ and <tt/tgi_done/. It is safe to use these standard includes and their contents: <tt/assert.h, conio.h, dio.h, errno.h, em.h, geos.h, joystick.h, modload.h, mouse.h, stdlib.h, string.h, tgi.h, time.h/ <p> -For <tt/time.h/ functions <tt/systime()/ and <tt/clock()/ note that the resolution is one second. +For <tt/time.h/ functions <tt/clock()/ and <tt/clock_gettime()/ note that the resolution is one second. <p> Functions from the headers above are either standard C library functions or cc65-specific, in either case they are not GEOS specific and so they are not described here. @@ -71,19 +68,19 @@ programs. The software needed: <itemize> <item><em/cc65/ Excellent package containing a C crosscompiler, a crossassembler and a linker, you - can get it from: <url url="http://cc65.github.io/cc65/">. + can get it from: <url url="https://cc65.github.io/">. <item><em/VICE/ This is a portable C64, C128 and few other Commodore computers emulator, you - can obtain it from: <url url="http://vice-emu.sourceforge.net/">. - The VICE package contains the <em/c1541/ program that is able - to convert/unconvert GEOS files to disk images. + can obtain it from: <url url="http://vice-emu.sourceforge.net/">. + The VICE package contains the <em/c1541/ program that is able + to convert/unconvert GEOS files to disk images. <item><em/The Star Commander/ This tool is only for DOS. You will need it for transferring - object files from a PC to a 1541. There's also one important ability of this - tool - it automatically un-converts .cvt files into GEOS native format on - disk image files. Check out: <url url="http://sta.c64.org/sc.html">. + object files from a PC to a 1541. There's also one important ability of this + tool - it automatically un-converts .cvt files into GEOS native format on + disk image files. Check out: <url url="http://sta.c64.org/sc.html">. <item><em/opencbm/ A package that allows for communication directly with a 1541 and - other Commodore IEC bus drives. It can be a replacement for Star Commander if - you only want to transfer files to a disk and unconvert using GEOS program for - this purpose. Check out: <url url="http://opencbm.sourceforge.net/">. + other Commodore IEC bus drives. It can be a replacement for Star Commander if + you only want to transfer files to a disk and unconvert using GEOS program for + this purpose. Check out: <url url="https://spiro.trikaliotis.net/opencbm">. </itemize> <p> VICE and cc65 are portable - they run on variety of platforms - DOS, Win32 and UNIX. GEOSLib only @@ -191,6 +188,14 @@ are covered by new names, but I tried to keep them in the naming convention. <p> This section covers the drawing package of GEOS along with text output routines. +<sect2>SetNewMode +<p> +<tt/void SetNewMode (void)/ +<p> +This function is intended for use by GEOS 128 only, and will exhibit undefined behavior on the +C64. It will toggle between the 40 column screen mode and the 80 column screen mode. Many C128 GEOS +programs implement a "Switch 40/80" submenu option under the <tt/geos/ menu. + <sect2>SetPattern <p> <tt/void SetPattern (char pattern)/ @@ -200,9 +205,9 @@ see them together in the filling box in GeoPaint. <sect2>GraphicsString <p> -<tt/void GraphicsString (char *myGString)/ +<tt/void GraphicsString (const void *myGString)/ <p> -One of the more powerfull routines of GEOS. This function calls other graphic functions depending +One of the more powerful routines of GEOS. This function calls other graphic functions depending on the given command string. See the structures chapter for a more detailed description. <sect2>Rectangle functions @@ -382,7 +387,7 @@ and the number of rows to skip from the top if it. <sect3>BitOtherClip <p> <tt/void BitOtherClip (void *proc1, void *proc2, char skipLeft, char skip Right, unsigned skipTop, - struct iconpic *myPic)/ + struct iconpic *myPic)/ <p> Similar to the previous one with some extension. <tt/proc1/ is called before reading a byte (it returns in .A the next value), and <tt/proc2/ is called every time the parser reads a byte which is @@ -647,7 +652,7 @@ For some purposes you might consider using the <tt/dio.h/ interface to disk acce <p> All GEOS disk functions return an error code in the X register. In some cases this is returned by the GEOSLib function (if its type is <tt/char/), but in all cases the last error is saved in the <tt/__oserror/ -location. If it is nonzero - an error occured. See <tt/gdisk.h/ for the list of possible errorcodes. +location. If it is nonzero - an error occurred. See <tt/gdisk.h/ for the list of possible errorcodes. You need to include <tt/errno.h/ to get <tt/__oserror/, together with the standard <tt/errno/. The latter gives less verbose, but still usable information and can be used with <tt/strerror/. Probably you will get more information using <tt/_stroserror/ in a similar way. @@ -717,9 +722,9 @@ disk. Otherwise they will be lost. Operating area is the <tt/curDirHead/. This function returns the number of free blocks on the current disk. It is counted using data in <tt/curDirHead/ so you must initialize the disk before calling it. -<sect3>ChkDskGEOS +<sect3>ChkDkGEOS <p> -<tt/char ChkDskGEOS (void)/ +<tt/char ChkDkGEOS (void)/ <p> This functions checks <tt/curDirHead/ for the GEOS Format identifier. It returns either true or false, and also sets <tt/isGEOS/ properly. You must initialize the disk before using this. @@ -853,20 +858,21 @@ The functions described here are common for SEQ and VLIR structures. <p> <tt/struct filehandle *GetNxtDirEntry (void)/ <p> -These two functions are best suited for scanning the whole directory for particular files. Note that -the returned filehandles describe all file slots in the directory - even those with deleted files. -The return value can be obtained by casting both sides to <tt/unsigned/ - as in the <tt/SetNextFree/ -function or read directly after a call to those two functions from <tt/r5/. The current sector number -is in <tt/r1/ and the sector data itself is in <tt/diskBlkBuf/. +Those two functions are best suited for scanning the whole directory for particular files. Note that +the returned filehandles describe all file slots in the directory -- even those with deleted files. +The return value is <tt/NULL/ if there are no more slots, or if there was a disk error. The +<tt/_oserror/ variable is non-zero if it was a disk error (see <tt>geos/gdisk.h</tt>). The current +directory track and sector numbers are in <tt/r1L/ and <tt/r1H/. The sector data itself is in +<tt/diskBlkBuf/. <sect3>FindFile <p> <tt/char FindFile (char *fName)/ <p> -This function scans the whole directory for the given filename. It returns either 0 (success) or 5 -(FILE_NOT_FOUND, defined in <tt/gdisk.h/) or any other fatal disk read error. After a successful -<tt/FindFile/ you will have <tt/struct filehandle/ at <tt/dirEntryBuf/ filled with the file's data and -other registers set as described in <tt/GetNxtDirEntry/. +This function scans the whole directory for the given filename. It returns either 0 (success), 5 +(FILE_NOT_FOUND, defined in <tt>geos/gdisk.h</tt>), or any other fatal disk read error. After a successful +<tt/FindFile()/, you will have <tt/struct filehandle/ at <tt/dirEntryBuf/ filled with the file's data, and +other registers set as described in <tt/GetNxtDirEntry()/. <sect3>FindFTypes <p> @@ -982,7 +988,7 @@ a particular file. <p> In GEOS there can be only one file opened at a time. Upon opening a VLIR file some information about it is copied into memory. You can retrieve the records table at <tt/fileTrScTab/ (table of -128 <tt/struct tr_se/) and from <tt/VLIRInfo/ (<tt/struct VLIR_info/. +128 <tt/struct tr_se/) and from <tt/VLIRInfo/ (<tt/struct VLIR_info/). E.g. the size of whole VLIR file can be retrieved by reading <tt/VLIRInfo.fileSize/. <sect3>OpenRecordFile @@ -1326,7 +1332,7 @@ This function returns the GEOS Kernal version combined (by logical OR) with the <p> This function returns the PAL/NTSC flag combined (by logical OR) with the 40/80 columns flag. This is not the best way to check if the screen has 40 or 80 columns since a PAL/NTSC check is always -performed and it can take as long as a full raster frame. If you just want to know if the +performed and it can take as long as a full raster frame. If you just want to know if the screen has 40 or 80 columns use the expression <tt/graphMode & 0x80/ which returns <tt/0/ for 40 columns and <tt/0x80/ for 80 columns. Remember that this value can be changed during runtime. It is unclear if this will work for GEOS 64 so you probably do not want to test @@ -1385,9 +1391,9 @@ has the following fields: <itemize> <item><tt/char number/ - total number of icons declared here <item><tt/struct pixel mousepos/ - after finishing <tt/DoIcons/ the mouse pointer will be placed in - this point allowing you to have a hint for the user what the default action is + this point allowing you to have a hint for the user what the default action is <item><tt/struct icondef tab[&rsqb/ - this table of size equal to <tt/icontab.number/ contains - descriptions for all icons + descriptions for all icons </itemize> <sect1>File and Disk @@ -1447,9 +1453,9 @@ void example = { Which will be compiled to following string of bytes: <tscreen><verb> _example: - .byte 3 - .word 3 - .byte 0 + .byte 3 + .word 3 + .byte 0 </verb></tscreen> As you see this way it is possible to define data of any type in any order. You must remember to cast each member to proper type. @@ -1469,21 +1475,21 @@ just in the content. Here is how a single descriptor looks like: <tscreen><verb> void myMenu = { - (char)top, (char)bottom, // this is the size of the menubox - (unsigned)left, (unsigned)right, // counting all items in the current descriptor - (char)number_of_items | type_of_menu, // number of following items ORed with - // type of this menu, it can be either - // HORIZONTAL or VERTICAL if you will have also bit 6 set then menu won't be closed - // after moving mouse pointer outside the menubox. You can have at most 31 items. + (char)top, (char)bottom, // this is the size of the menubox + (unsigned)left, (unsigned)right, // counting all items in the current descriptor + (char)number_of_items | type_of_menu, // number of following items ORed with + // type of this menu, it can be either + // HORIZONTAL or VERTICAL if you will have also bit 6 set then menu won't be closed + // after moving mouse pointer outside the menubox. You can have at most 31 items. </verb></tscreen> This is followed by <tt/number_of_items/ of following item description. <tscreen><verb> - ... - "menuitemname", (char)item_type, (unsigned)pointer, - "nextitemname", (char)item_type, (unsigned)pointer, - ... - "lastitemname", (char)item_type, (unsigned)pointer }; - // Note that there isn't ending <tt/NULL/ or something like that. + ... + "menuitemname", (char)item_type, (unsigned)pointer, + "nextitemname", (char)item_type, (unsigned)pointer, + ... + "lastitemname", (char)item_type, (unsigned)pointer }; + // Note that there isn't ending <tt/NULL/ or something like that. </verb></tscreen> <tt/pointer/ is a pointer to something, what it points for depends from <tt/item_type/. This one can have following values: @@ -1516,16 +1522,16 @@ The first element can be specified in two ways - by using the default size and p your own. The first case results in <tscreen><verb> const dlgBoxStr example = { - DB_DEFPOS (pattern_of_shadow), - ... // commands - DB_END }; + DB_DEFPOS (pattern_of_shadow), + ... // commands + DB_END }; </verb></tscreen> And the own size and position would be: <tscreen><verb> const dlgBoxStr example = { - DB_SETPOS (pattern, top, bottom, left, right) - ... // commands - DB_END }; + DB_SETPOS (pattern, top, bottom, left, right) + ... // commands + DB_END }; </verb></tscreen> <sect3>Commands @@ -1534,9 +1540,9 @@ The next element of the <tt/DoDlgBox/ command string are the commands themselves default icons and the number of the selected icon will be returned from window processor. The icons are <tt/OK, CANCEL, YES, NO, OPEN/, and <tt/DISK/. You can use predefined macros for using them, e.g.: <tscreen><verb> - ... - DB_ICON(OK, DBI_X_0, DBI_Y_0), - ... + ... + DB_ICON(OK, DBI_X_0, DBI_Y_0), + ... </verb></tscreen> Note that the position is counted from top left corner of window, not entire screen and that the 'x' position is counted in cards (8-pixel) and not in pixels. This is also true for all following commands. @@ -1550,13 +1556,13 @@ where the address of the text is stored. This is useful for information windows is variable. Consider following: <tscreen><verb> char text = "foo"; - ... - r15=(unsigned)text; // in code just before call to DoDlgBox - ... - DB_VARSTR (TXT_LN_X, TXT_LN_1_Y, &r15), - ... + ... + r15=(unsigned)text; // in code just before call to DoDlgBox + ... + DB_VARSTR (TXT_LN_X, TXT_LN_1_Y, &r15), + ... </verb></tscreen> -will cause the word ``foo'' to appear in the window, but you may store the pointer to any text in +will cause the word ''foo'' to appear in the window, but you may store the pointer to any text in <tt/r15/ (in this case) before the call to DoDlgBox. <p> <tt/DB_GETSTR(x, y, ptr, length)/ - will add a input-from-keyboard feature. <tt/ptr/ works as in the @@ -1591,10 +1597,10 @@ command has to be <tt/GSTR_END/. There is a custom type defined for the command Here is an example for clearing the screen: <tscreen><verb> const graphicStr example = { - MOVEPENTO(0,0), - NEWPATTERN(0), - RECTANGLETO(319,199) - GSTR_END }; + MOVEPENTO(0,0), + NEWPATTERN(0), + RECTANGLETO(319,199) + GSTR_END }; </verb></tscreen> <sect2>InitRam table @@ -1618,17 +1624,17 @@ It is possible to intercept events and hook into the GEOS Kernal using vectors. void_func oldVector; void NewVectorHandler(void) { - // do something and at the end call the old vector routine - oldVector(); + // do something and at the end call the old vector routine + oldVector(); } void hook_into_system(void) { - oldVector = mouseVector; - mouseVector = NewVectorHandler; + oldVector = mouseVector; + mouseVector = NewVectorHandler; } void remove_hook(void) { - mouseVector = oldVector; + mouseVector = oldVector; } </verb></tscreen> <p> @@ -1650,10 +1656,10 @@ That little example above intercepts <tt/mouseVector/. The <tt/NewVectorHandler/ called every time the mouse button changes status. Other important vectors you should know about are: <itemize> - <item><tt/appMain/ - this is called from within the <tt/MainLoop/ system loop - <item><tt/keyVector/ - called whenever a keypress occurs - <item><tt/intTopVector/ - called at the start of the IRQ routine - <item><tt/intBotVector/ - called at the end of the IRQ routine + <item><tt/appMain/ - this is called from within the <tt/MainLoop/ system loop + <item><tt/keyVector/ - called whenever a keypress occurs + <item><tt/intTopVector/ - called at the start of the IRQ routine + <item><tt/intBotVector/ - called at the end of the IRQ routine </itemize> </article> diff --git a/doc/grc65.sgml b/doc/grc65.sgml index 1acc6b1f2..c03815ade 100644 --- a/doc/grc65.sgml +++ b/doc/grc65.sgml @@ -1,15 +1,13 @@ <!doctype linuxdoc system> + <article> - -<!-- Title information --> - <title>grc65 -- GEOS Resource Compiler <author> <url url="mailto:ytm@elysium.pl" name="Maciej 'YTM/Elysium' Witkowiak">,<newline> <url url="mailto:greg.king5@verizon.net" name="Greg King"> -<date>2014-04-24 + <abstract> -This document describes a compiler that can create GEOS headers and menues for +This document describes a compiler that can create GEOS headers and menus for cc65-compiled programs. </abstract> @@ -26,7 +24,7 @@ Optional resources might be menu definitions, other headers (e.g., for data files of an app.), dialog definitions, etc. Without an application's header, GEOS is unable to load and start it. -Currently, <bf/grc65/ supports only menues and the required header definition, +Currently, <bf/grc65/ supports only menus and the required header definition, along with support for building applications with VLIR-structured overlays. <bf/grc65/ generates output in two formats: C header and <bf/ca65/ source (.s). @@ -347,7 +345,7 @@ for addresses. <!-- <appendix> --> <sect>Appendix A -- example.grc<label id="example-grc"> <p><tscreen><verb> -; Note that MENU can define both menues and submenues. +; Note that MENU can define both menus and submenus. ; If you want to use any C operators (such as "|", "&", etc.), do it WITHOUT ; any spaces between the arguments (the parser is simple and weak). @@ -383,11 +381,11 @@ HEADER APPLICATION "MyFirstApp" "Class Name" "V1.0" ; file named MyFirstApp with the Class-string "Class Name V1.0" { ; Not all fields are required, default and current values will be used. - author "Maciej Witkowiak" ; always in quotes! - info "Information text" ; always in quotes! -; date yy mm dd hh ss ; always 5 fields! -; dostype seq ; can be: PRG, SEQ, USR (only all UPPER- or lower-case) -; structure seq ; can be: SEQ, VLIR (only UPPER- or lower-case) - mode c64only ; can be: any, 40only, 80only, c64only + author "Maciej Witkowiak" ; always in quotes! + info "Information text" ; always in quotes! +; date yy mm dd hh ss ; always 5 fields! +; dostype seq ; can be: PRG, SEQ, USR (only all UPPER- or lower-case) +; structure seq ; can be: SEQ, VLIR (only UPPER- or lower-case) + mode c64only ; can be: any, 40only, 80only, c64only }</verb></tscreen> </article> diff --git a/doc/index.sgml b/doc/index.sgml index 04e6a4c3a..bb3ad5357 100644 --- a/doc/index.sgml +++ b/doc/index.sgml @@ -2,8 +2,7 @@ <article> <title>cc65 Documentation Overview -<author><url url="http://cc65.github.io/doc"> -<date> +<author><url url="https://cc65.github.io/doc"> <sect>Program documentation<p> @@ -18,7 +17,7 @@ <tag><htmlurl url="cc65.html" name="cc65.html"></tag> Describes the cc65 C compiler. - <tag><htmlurl url="chrcvt.html" name="chrcvt.html"></tag> + <tag><htmlurl url="chrcvt65.html" name="chrcvt65.html"></tag> Describes the vector font converter. <tag><htmlurl url="cl65.html" name="cl65.html"></tag> @@ -31,7 +30,7 @@ Describes the da65 6502/65C02 disassembler. <tag><htmlurl url="grc65.html" name="grc65.html"></tag> - Describes the GEOS resource compiler (grc65). + Describes the GEOS resource compiler. <tag><htmlurl url="ld65.html" name="ld65.html"></tag> Describes the ld65 linker. @@ -59,6 +58,9 @@ <tag><htmlurl url="coding.html" name="coding.html"></tag> Contains hints on creating the most effective code with cc65. + <tag><htmlurl url="cc65-intern.html" name="cc65-intern.html"></tag> + Describes internal details of cc65, such as calling conventions. + <tag><htmlurl url="using-make.html" name="using-make.html"></tag> Build programs, using the GNU Make utility. @@ -82,6 +84,9 @@ <tag><htmlurl url="dio.html" name="dio.html"></tag> Low-level disk I/O API. + <tag><htmlurl url="tgi.html" name="tgi.html"></tag> + Tiny Graphics Interface. + <tag><htmlurl url="geos.html" name="geos.html"></tag> The GEOSLib manual. @@ -113,9 +118,15 @@ <tag><htmlurl url="atari.html" name="atari.html"></tag> Topics specific to the Atari 8-bit machines. + <tag><htmlurl url="atari2600.html" name="atari2600.html"></tag> + Topics specific to the Atari 2600 Game Console. + <tag><htmlurl url="atari5200.html" name="atari5200.html"></tag> Topics specific to the Atari 5200 Game Console. + <tag><htmlurl url="atari7800.html" name="atari7800.html"></tag> + Topics specific to the Atari 7800 Game Console. + <tag><htmlurl url="atmos.html" name="atmos.html"></tag> Topics specific to the Oric Atmos. @@ -134,6 +145,15 @@ <tag><htmlurl url="cbm610.html" name="cbm610.html"></tag> Topics specific to the Commodore 610. + <tag><htmlurl url="creativision.html" name="creativision.html"></tag> + Topics specific to the Creativision Console. + + <tag><htmlurl url="cx16.html" name="cx16.html"></tag> + Topics specific to the Commander X16. + + <tag><htmlurl url="gamate.html" name="gamate.html"></tag> + Topics specific to the Bit Corporation Gamate Console. + <tag><htmlurl url="lynx.html" name="lynx.html"></tag> Topics specific to the Atari Lynx Game Console. @@ -144,10 +164,7 @@ Topics specific to the Ohio Scientific machines. <tag><htmlurl url="pce.html" name="pce.html"></tag> - Topics specific to NEC PC-Engine (TurboGrafx) Console. - - <tag><htmlurl url="gamate.html" name="gamate.html"></tag> - Topics specific to Bit Corporation Gamate Console. + Topics specific to the NEC PC-Engine (TurboGrafx-16) Console. <tag><htmlurl url="pet.html" name="pet.html"></tag> Topics specific to the Commodore PET machines. @@ -158,6 +175,12 @@ <tag><htmlurl url="supervision.html" name="supervision.html"></tag> Topics specific to the Watara Supervision Console. + <tag><htmlurl url="sym1.html" name="sym1.html"></tag> + Topics specific to the Synertek Systems Sym-1. + + <tag><htmlurl url="telestrat.html" name="telestrat.html"></tag> + Topics specific to the Oric Telestrat. + <tag><htmlurl url="vic20.html" name="vic20.html"></tag> Topics specific to the Commodore VIC20. diff --git a/doc/intro.sgml b/doc/intro.sgml index d92fd1d20..1eebe24c4 100644 --- a/doc/intro.sgml +++ b/doc/intro.sgml @@ -1,14 +1,13 @@ <!doctype linuxdoc system> <article> - <title>cc65 Compiler Intro <author> <url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> <url url="mailto:cbmnut@hushmail.com" name="CbmNut">,<newline> <url url="mailto:greg.king5@verizon.net" name="Greg King">,<newline> +<url url="mailto:groepaz@gmx.net" name="Groepaz">,<newline> <url url="mailto:stephan.muehlstrasser@web.de" name="Stephan Mühlstrasser"> -<date>2015-03-07 <abstract> How to use the cc65 C language system -- an introduction. @@ -246,13 +245,13 @@ varies in its start and exit conditions. <sect2>AppleWin<p> Available at <url -url="http://applewin.berlios.de/">: +url="https://github.com/AppleWin/AppleWin">: Emulates Apple ][/enhanced Apple //e computers, with sound, video, joysticks, serial port, and disk images. Includes monitor. Only for Windows. The package comes with a DOS 3.3 disk (called "master.dsk") image; -however, you will need <bf/AppleCommander 1.3.5/ or later (available at <url -url="http://applecommander.sourceforge.net/">). +however, you will need <bf/AppleCommander 1.4.0/ or later (available at <url +url="https://applecommander.github.io/">). Compile the tutorial with @@ -270,14 +269,13 @@ the <tt/master.dsk/ which comes with <bf/AppleWin/, and rename it to <tt/cc65.dsk/, then use <bf/AppleCommander/: <tscreen><verb> -java -jar ac.jar -cc65 cc65.dsk test B < hello +java -jar ac.jar -as cc65.dsk test < hello </verb></tscreen> Note that a convention in the Apple world is that "hello" is the file which is run automatically upon booting a DOS disk, sort of like the "autoexec.bat" of -the MSDOS/Windows world. We've avoided that in the example, however. Also, -the <tt/B/ parameter must be in caps., and "test" is the name of the program as -it will appear on the Apple disk. +the MSDOS/Windows world. We've avoided that in the example, however by using +"test" as the name of the program as it will appear on the Apple disk. Start the emulator, click on the <bf/Disk 1/ icon, and point to <bf/cc65.dsk/; then, click the big Apple logo, to boot the system. Then, type this on the @@ -335,6 +333,35 @@ your harddrive directly. to the DOS menu. Your C program should wait for a keypress if you want to see any output. +<sect2>Stella<p> +Available at <url +url="http://stella.sourceforge.net">: + +Stella is a multi-platform Atari 2600 VCS emulator. The latest version +is available on the emulator's website. It is also available through +the package manager of most Linux distributions (Fedora, Ubuntu, ..). + +Compile the Atari 2600 sample with + +<tscreen><verb> +make SYS=atari2600 samples +</verb></tscreen> + +Then execute it with + +<tscreen><verb> +stella samples/atari2600hello +</verb></tscreen> + +<sect2>Harmony Cartridge<p> +Available at <url +url="http://harmony.atariage.com/Site/Harmony.html">: + +The Harmony Cartridge allows running any Atari 2600 binary on real +hardware. The binary must be copied on an SD card, to be inserted in +the Harmony Cartridge. It can then be inserted on an Atari 2600 +console, and run any binary on the SD card. + <sect1>Atmos @@ -376,11 +403,36 @@ RUN The emulation, also, supports that method. +<sect1>Commander X16 + +<sect2>x16-emulator<p> +Available at <url +url="https://github.com/commanderx16/x16-emulator/releases">: + +Emulates the Commander X16 Single Board Computer, with sound, SD card images, +VGA and NTSC video, and a NES game controller emulation. Includes a monitor. +It runs on all SDL2 platforms. + +Compile the tutorial with +<tscreen><verb> +cl65 -O -t cx16 hello.c text.s +</verb></tscreen> + +Start the emulator. Then, type +<tscreen><verb> +LOAD"HELLO",1 +RUN +</verb></tscreen> +(Type those lines in lower-case; but, they will appear as upper-case.) + +On a real computer, you would type an <tt/8/ instead of a <tt/1/. + + <sect1>Commodore <sect2>VICE<p> Available at <url -url="http://vice-emu.sourceforge.net/">: +url="https://vice-emu.sourceforge.net/">: Emulates Commodore 64/128/VIC-20/PET/CBM II/Plus 4 computers. Supports printers, serial port and adapters, stereo sound, disk drives and images, RAM expansions, @@ -407,12 +459,8 @@ Substitute the name of a Commodore computer for that <tt/<sys>/: Start the desired version of the emulator (CBM610 programs run on the CBM II [<tt/xcbm2/] emulator). -In the Windows versions of VICE, choose <bf>File>Autoboot disk/tape -image...</bf>, choose your executable, and click <bf/OK/. - -In the Unix versions, hold down the mouse's first button. Move the pointer to -<bf>Smart-attach disk/tape...</bf>, and release the button. Choose your -executable, and click <bf/Autostart/. +Choose <bf>File>Autostart disk/tape image...</bf>, choose your executable, +and click <bf/OK/. The file has a 14-byte header which corresponds to a PRG-format BASIC program, consisting of a single line, similar to this: @@ -448,6 +496,29 @@ The output will appear on a separate line, and you will be returned to a BASIC prompt. +<sect1>Gamate<p> + +Before you can run the cartridge image produced by the linker, the binary has to +be patched using the <bf/gamate-fixcart/ tool that is included in the cc65 +package in the util/gamate/ directory. + +<tscreen><verb> +gamate-fixcart <image.bin> +</verb></tscreen> + +<sect2>MESS<p> +Available at <url +url="https://www.mamedev.org">: + +MESS (Multiple Emulator Super System) is a multi system emulator that emulates +various cc65 targets. It once started as a MAME fork, but was marged into MAME +again at some point. + +<tscreen><verb> +mess gamate -debug -window -skip_gameinfo -cart <image.bin> +</verb></tscreen> + + <sect1>GEOS<p> Available at <it/Click Here Software's/ <url url="http://cbmfiles.com/geos/index.html" name="GEOS download section">: @@ -484,17 +555,8 @@ feature on. </quote> <quote> -VICE even has different ways that depend on which operating system is running -the emulator. -<itemize> -<item>In Windows, you must click on <bf/Options/ (in an always visible menu). - Then, you must click on <bf/True drive emulation/. -<item>In Unix, you must <em/hold down/ the second button on your mouse. Move - the pointer down to <bf/Drive settings/. Then, move the pointer over to - <bf/Enable true drive emulation/. (If there is a check-mark in front of - those words, that feature already is turned on -- then, move the pointer - off of that menu.) Release the mouse button. -</itemize> +In VICE, got to <bf/Settings/ -> <bf/Settings/, then <bf/Peripheral devices/ -> +<bf/Drive/. Then, you must enable the <bf/True drive emulation/ checkbox. </quote> Find the <bf/CONVERT/ program on the boot disk [tap the 6-key; then, you @@ -521,6 +583,29 @@ directory notePad. Look at the eight file-positions on each page until you see The output is shown in a GEOS dialog box; click <bf/OK/ when you have finished reading it. +Alternatively you can use the <bf/c1541/ program that comes with VICE to write the +file to a disk image directly in GEOS format, so it can be used in GEOS directly +without having to use the <bf/CONVERT/ program. + +<tscreen><verb> +c1541 -attach geos.d64 -geoswrite hello1 +</verb></tscreen> + + +<sect1>Nintendo Entertainment System<p> + +<sect2>Mednafen (NES)<p> +Available at <url +url="https://mednafen.github.io/releases/">: + +Mednafen is a multi system emulator that emulates a couple of the supported +targets of cc65: Apple II/II+, Atari Lynx, Nintendo Entertainment System and +PC Engine/TurboGrafx 16. + +<tscreen><verb> +mednafen -force_module nes <image.bin> +</verb></tscreen> + <sect1>Ohio Scientific Challenger 1P<p> The <tt/osic1p/ runtime library returns to the boot prompt when the main() @@ -643,6 +728,32 @@ Press <RETURN>. After hitting the RETURN key, you should see the boot prompt again. +<sect1>PC Engine/TurboGrafx 16<p> + +For the cartridge image produced by the linker to work in emulators and on real +hardware, its content must be rearranged so the first 8k block becomes the last +8k block in the image. + +For example, for a 32k image this can be done using <bf/dd/ as follows: + +<tscreen><verb> +dd if=infile.bin bs=8K skip=3 > outfile.pce +dd if=infile.bin bs=8K count=3 >> outfile.pce +</verb></tscreen> + +<sect2>Mednafen<p> +Available at <url +url="https://mednafen.github.io/releases/">: + +Mednafen is a multi system emulator that emulates a couple of the supported +targets of cc65: Apple II/II+, Atari Lynx, Nintendo Entertainment System and +PC Engine/TurboGrafx 16. + +<tscreen><verb> +mednafen -force_module pce <image.pce> +</verb></tscreen> + + <sect1>Contributions wanted<p> We need your help! Recommended emulators and instructions for other targets diff --git a/doc/ld65.sgml b/doc/ld65.sgml index 329f975e1..307caeaa4 100644 --- a/doc/ld65.sgml +++ b/doc/ld65.sgml @@ -3,7 +3,6 @@ <article> <title>ld65 Users Guide <author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>2014-04-20 <abstract> The ld65 linker combines object files into an executable file. ld65 is highly @@ -25,21 +24,21 @@ It complements the features that are built into the ca65 macroassembler: <itemize> -<item> Accept any number of segments to form an executable module. +<item> Accept any number of segments to form an executable module. -<item> Resolve arbitrary expressions stored in the object files. +<item> Resolve arbitrary expressions stored in the object files. -<item> In case of errors, use the meta information stored in the object files - to produce helpful error messages. In case of undefined symbols, - expression range errors, or symbol type mismatches, ld65 is able to - tell you the exact location in the original assembler source, where - the symbol was referenced. +<item> In case of errors, use the meta information stored in the object files + to produce helpful error messages. In case of undefined symbols, + expression range errors, or symbol type mismatches, ld65 is able to + tell you the exact location in the original assembler source, where + the symbol was referenced. -<item> Flexible output. The output of ld65 is highly configurable by a config - file. Some more-common platforms are supported by default configurations - that may be activated by naming the target system. The output - generation was designed with different output formats in mind, so - adding other formats shouldn't be a great problem. +<item> Flexible output. The output of ld65 is highly configurable by a config + file. Some more-common platforms are supported by default configurations + that may be activated by naming the target system. The output + generation was designed with different output formats in mind, so + adding other formats shouldn't be a great problem. </itemize> @@ -67,28 +66,30 @@ Short options: -m name Create a map file -o name Name the default output file -t sys Set the target system - -u sym Force an import of symbol `sym' + -u sym Force an import of symbol 'sym' -v Verbose mode -vm Verbose map file Long options: - --cfg-path path Specify a config file search path - --config name Use linker config file - --dbgfile name Generate debug information - --define sym=val Define a symbol - --end-group End a library group - --force-import sym Force an import of symbol `sym' - --help Help (this text) - --lib file Link this library - --lib-path path Specify a library search path - --mapfile name Create a map file - --module-id id Specify a module id - --obj file Link this object file - --obj-path path Specify an object file search path - --start-addr addr Set the default start address - --start-group Start a library group - --target sys Set the target system - --version Print the linker version + --allow-multiple-definition Allow multiple definitions + --cfg-path path Specify a config file search path + --config name Use linker config file + --dbgfile name Generate debug information + --define sym=val Define a symbol + --end-group End a library group + --force-import sym Force an import of symbol 'sym' + --help Help (this text) + --large-alignment Don't warn about large alignments + --lib file Link this library + --lib-path path Specify a library search path + --mapfile name Create a map file + --module-id id Specify a module id + --obj file Link this object file + --obj-path path Specify an object file search path + --start-addr addr Set the default start address + --start-group Start a library group + --target sys Set the target system + --version Print the linker version --------------------------------------------------------------------------- </verb></tscreen> @@ -99,6 +100,14 @@ Here is a description of all of the command-line options: <descrip> + <tag><tt>--allow-multiple-definition</tt></tag> + + Normally when a global symbol is defined multiple times, ld65 will + issue an error and not create the output file. This option lets it + silently ignore this fact and continue. The first definition of a + symbol will be used. + + <label id="option--start-group"> <tag><tt>-(, --start-group</tt></tag> @@ -156,6 +165,8 @@ Here is a description of all of the command-line options: <item>module <item>apple2 <item>apple2enh + <item>atari2600 + <item>atari7800 <item>atari <item>atarixl <item>atmos @@ -174,6 +185,7 @@ Here is a description of all of the command-line options: <item>sim6502 <item>sim65c02 <item>supervision + <item>telestrat <item>vic20 </itemize> @@ -246,10 +258,11 @@ Here is a description of all of the command-line options: <tag><tt>-Ln</tt></tag> This option allows you to create a file that contains all global labels and - may be loaded into the VICE emulator using the <tt/ll/ (load label) command. You + may be loaded into the VICE emulator using the <tt/ll/ (load label) command + or into the Oricutron emulator using the <tt/sl/ (symbols load) command. You may use this to debug your code with VICE. Note: Older versions had some bugs in the label code. If you have problems, please get the latest <url - url="http://vice-emu.sourceforge.net/" name="VICE"> version. + url="http://vice-emu.sourceforge.net" name="VICE"> version. <label id="option-S"> @@ -287,6 +300,12 @@ Here is a description of all of the command-line options: information generation is currently being developed, so the format of the file and its contents are subject to change without further notice. + <label id="option--large-alignment"> + <tag><tt>--large-alignment</tt></tag> + + Disable warnings about a large combined alignment. See the discussion of the + <tt/.ALIGN/ directive in the ca65 Users Guide for further information. + <tag><tt>--lib file</tt></tag> @@ -485,7 +504,7 @@ There are of course more attributes for a memory section than just start and size. Start and size are mandatory attributes, that means, each memory area defined <em/must/ have these attributes given (the linker will check that). I will cover other attributes later. As you may have noticed, I've used a -comment in the example above. Comments start with a hash mark (`#'), the +comment in the example above. Comments start with a hash mark ('#'), the remainder of the line is ignored if this character is found. @@ -510,13 +529,15 @@ What we are doing here is telling the linker, that all segments go into the the linker will first write the <tt/CODE/ segment, then the <tt/RODATA/ segment, then the <tt/DATA/ segment - but it will not write the <tt/BSS/ segment. Why? Here enters the segment type: For each segment specified, you may also -specify a segment attribute. There are four possible segment attributes: +specify a segment attribute. There are five possible segment attributes: <tscreen><verb> - ro means readonly - rw means read/write - bss means that this is an uninitialized segment - zp a zeropage segment + ro means readonly + rw means read/write + bss means that this is an uninitialized segment + zp a zeropage segment + overwrite a segment that overwrites (parts of) another one + </verb></tscreen> So, because we specified that the segment with the name BSS is of type bss, @@ -549,7 +570,8 @@ segment, where this attribute is true, the linker will export three symbols. </verb></tscreen> Replace <tt/NAME/ by the name of the segment, in the example above, this would -be <tt/BSS/. These symbols may be accessed by your code. +be <tt/BSS/. These symbols may be accessed by your code when imported using +the <tt>.IMPORT</tt> directive. Now, as we've configured the linker to write the first three segments and create symbols for the last one, there's only one question left: Where does @@ -568,7 +590,7 @@ default behaviour is OK for our purposes, I did not use the attribute in the example above. Let's have a look at it now. The "file" attribute (the keyword may also be written as "FILE" if you like -that better) takes a string enclosed in double quotes (`&dquot;') that specifies the +that better) takes a string enclosed in double quotes ('&dquot;') that specifies the file, where the data is written. You may specify the same file several times, in that case the data for all memory areas having this file name is written into this file, in the order of the memory areas defined in the <tt/MEMORY/ @@ -616,6 +638,55 @@ the command line, with "-1.bin" and "-2.bin" appended respectively. Because '%' is used as an escape char, the sequence "%%" has to be used if a single percent sign is required. +<sect1>OVERWRITE segments<p> + +There are situations when you may wish to overwrite some part (or parts) of a +segment with another one. Perhaps you are modifying an OS ROM that has its +public subroutines at fixed, well-known addresses, and you want to prevent them +from shifting to other locations in memory if your changed code takes less +space. Or you are updating a block of code available in binary-only form with +fixes that are scattered in various places. Generally, whenever you want to +minimize disturbance to an existing code brought on by your updates, OVERWRITE +segments are worth considering. + +Here is an example: + +<tscreen><verb> +MEMORY { + RAM: file = "", start = $6000, size = $2000, type=rw; + ROM: file = %O, start = $8000, size = $8000, type=ro; +} +</verb></tscreen> + +Nothing unusual so far, just two memory blocks - one RAM, one ROM. Now let's +look at the segment configuration: + +<tscreen><verb> +SEGMENTS { + RAM: load = RAM, type = bss; + ORIGINAL: load = ROM, type = ro; + FASTCOPY: load = ROM, start=$9000, type = overwrite; + JMPPATCH1: load = ROM, start=$f7e8, type = overwrite; + DEBUG: load = ROM, start=$8000, type = overwrite; + VERSION: load = ROM, start=$e5b7, type = overwrite; +} +</verb></tscreen> + +Segment named ORIGINAL contains the original code, disassembled or provided in +a binary form (i.e. using <tt/.INCBIN/ directive; see the <tt/ca65/ assembler +document). Subsequent four segments will be relocated to addresses specified +by their "start" attributes ("offset" can also be used) and then will overwrite +whatever was at these locations in the ORIGINAL segment. In the end, resulting +binary output file will thus contain original data with the exception of four +sequences starting at $9000, $f7e8, $8000 and $e5b7, which will sport code from +their respective segments. How long these sequences will be depends on the +lengths of corresponding segments - they can even overlap, so think what you're +doing. + +Finally, note that OVERWRITE segments should be the final segments loaded to a +particular memory area, and that they need at least one of "start" or "offset" +attributes specified. + <sect1>LOAD and RUN addresses (ROMable code)<p> Let us look now at a more complex example. Say, you've successfully tested @@ -690,7 +761,7 @@ There's a library subroutine called <tt/copydata/ (in a module named look at it's inner workings before using it! -<sect1>Other MEMORY area attributes<p> +<sect1>Other MEMORY area attributes<label id="MEMORY"><p> There are some other attributes not covered above. Before starting the reference section, I will discuss the remaining things here. @@ -704,7 +775,8 @@ useful for things like a software stack, or an I/O area. } </verb></tscreen> -This will define some external symbols that may be used in your code: +This will define some external symbols that may be used in your code when +imported using the <tt>.IMPORT</tt> directive: <tscreen><verb> __STACK_START__ This is set to the start of the memory @@ -751,12 +823,10 @@ that has a segment reference (for example a symbol). The result of this function is the value of the bank attribute for the run memory area of the segment. - <sect1>Other SEGMENT attributes<p> Segments may be aligned to some memory boundary. Specify "<tt/align = num/" to -request this feature. Num must be a power of two. To align all segments on a -page boundary, use +request this feature. To align all segments on a page boundary, use <tscreen><verb> SEGMENTS { @@ -817,7 +887,7 @@ also for a segment. The value must be an integer between 0 and 255. It is used as the fill value for space reserved by the assembler's <tt/.ALIGN/ and <tt/.RES/ commands. It is also used as the fill value for space between sections (part of a segment that comes from one object file) caused by alignment, but not for -space that preceeds the first section. +space that precedes the first section. To suppress the warning, the linker issues if it encounters a segment that is not found in any of the input files, use "<tt/optional=yes/" as an additional @@ -841,7 +911,7 @@ look like this: } </verb></tscreen> -The only other available output format is the o65 format specified by Andre +There are two other available formats, one is the o65 format specified by Andre Fachat (see the <url url="http://www.6502.org/users/andre/o65/fileformat.html" name="6502 binary relocation format specification">). It is defined like this: @@ -851,7 +921,20 @@ name="6502 binary relocation format specification">). It is defined like this: } </verb></tscreen> -The necessary o65 attributes are defined in a special section labeled +The other format available is the Atari segmented file format (xex), this is +the standard format used by Atari DOS 2.0 and upwards, and it is defined like this: + +<tscreen><verb> + FILES { + %O: format = atari; + } +</verb></tscreen> + +In the Atari segmented file format, the linker will write each <tt/MEMORY/ area +as including a header with the start and end address. If two memory areas are +contiguous, the headers will be joined if possible. + +The necessary o65 or Atari attributes are defined in a special section labeled <ref id="FORMAT" name="FORMAT">. @@ -872,6 +955,30 @@ has several attributes that may be defined here. } </verb></tscreen> +The Atari file format has two attributes: + +<descrip> + + <tag><tt>RUNAD = symbol</tt></tag> + + Specify a symbol as the run address of the binary, the loader will call this + address after all the file is loaded in memory. If the attribute is omitted, + no run address is included in the file. + + <tag><tt>INITAD = memory_area : symbol</tt></tag> + + Specify a symbol as the initialization address for the given memory area. + The binary loader will call this address just after the memory area is loaded + into memory, before continuing loading the rest of the file. + +</descrip> + + +<tscreen><verb> + FORMATS { + atari: runad = _start; + } +</verb></tscreen> <sect1>The FEATURES section<label id="FEATURES"><p> @@ -902,7 +1009,8 @@ The <tt/CONDES/ feature has several attributes: <tag><tt>segment</tt></tag> This attribute tells the linker into which segment the table should be - placed. If the segment does not exist, it is created. + placed. If the segment does not exist in any object file, it is created + in the final object code. <tag><tt>type</tt></tag> @@ -951,7 +1059,7 @@ The <tt/CONDES/ feature has several attributes: Without specifying the <tt/CONDES/ feature, the linker will not create any tables, even if there are <tt/condes/ entries in the object files. -For more information see the <tt/.CONDES/ command in the <url +For more information, see the <tt/.CONDES/ command in the <url url="ca65.html" name="ca65 manual">. @@ -1034,16 +1142,24 @@ config files, you will need the following information. <sect1>INIT<p> -The INIT segment is used for initialization code that may be reused once -execution reaches main() - provided that the program runs in RAM. You -may for example add the INIT segment to the heap in really memory -constrained systems. +The INIT segment is some kind of 'bss' segment since it contains +uninitialized data. Unlike <tt>.bss</tt> itself, its contents aren't +initialized to zero at program startup . It's mostly used by +constructors in the startup code. An example for the use of the INIT +segment is saving/restoring the zero page area used by cc65. <sect1>LOWCODE<p> For the LOWCODE segment, it is guaranteed that it won't be banked out, so it is reachable at any time by interrupt handlers or similar. +<sect1>ONCE<p> + +The ONCE segment is used for initialization code run only once before +execution reaches main() - provided that the program runs in RAM. You +may for example add the ONCE segment to the heap in really memory +constrained systems. + <sect1>STARTUP<p> This segment contains the startup code which initializes the C software stack @@ -1073,14 +1189,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> diff --git a/doc/library.sgml b/doc/library.sgml index 9b923c308..bcd5db86e 100644 --- a/doc/library.sgml +++ b/doc/library.sgml @@ -1,10 +1,8 @@ <!doctype linuxdoc system> <article> - <title>cc65 Library Overview <author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>2014-04-12 <abstract> An overview over the runtime and C libraries that come with the cc65 compiler, @@ -20,22 +18,22 @@ including a discussion of the differences to the ISO standard. This file contains a short overview of the libraries available for the cc65 C compiler. Please have a look at the <url url="funcref.html" name="function -reference"> for a list function by function. Since the function reference is -not complete (I'm working on that) it may happen that you don't find a -specific function. In this case, have a look into the header files. All -functions, that are not defined by the ISO C standard have a short comment in +reference"> for a function-by-function list. Because the function reference is +not complete (we're working on that), it may happen that you don't find a +specific function. In that case, have a look into the header files. All +functions, that are not defined by the ISO C standard, have a short comment in the headers, explaining their use. <sect>ISO C compatible library<p> -The C library contains a large subset of the ISO C library. Functions are -usually missing in areas, where there is no support on typical 6502 systems. -Wide character sets are an example for this. +The C library contains a large subset of the ISO C library. Functions usually +are missing in areas where there are no support on typical 6502 systems. +Wide-character sets are an example for that. I will not go into detail about the ISO functions. If a function is not -mentioned here explicitly, expect it to be available and to behave as defined +mentioned here explicitly, expect it to be available, and to behave as defined in the C standard. Functions that are <em/not/ available: @@ -43,17 +41,17 @@ Functions that are <em/not/ available: <itemize> <item><tt>tmpfile/tmpnam</tt> <p> - <item><tt>system</tt> + <item><tt>system</tt> (cc65 alternative <tt>exec</tt>) <p> <item>All functions that handle floating point numbers in some manner. <p> - <item>The <tt/ldiv/ function (cc65 is currently not able to return structs - with a size not equal to 1, 2 or 4 bytes by value). + <item>The <tt/ldiv/ function (cc65 currently is not able to return structs, + by value, with a size not equal to 1, 2, or 4 bytes). <p> - <item>All functions handling wide character strings. + <item>All functions handling wide-character strings. <p> <item>Signals and all related functions (having <tt/SIGSEGV/ would be - cool:-) + cool. :-) <p> <item><tt>setbuf/setvbuf</tt> </itemize> @@ -61,8 +59,11 @@ Functions that are <em/not/ available: Functions not available on all supported systems: <itemize> + <item><tt>clock</tt>: Support depends on the capabilities of the target + machine. + <p> <item><tt>fopen/fread/fwrite/fclose/fputs/fgets/fscanf</tt>: The functions - are built on open/read/write/close. These latter functions are not available + are built on open/read/write/close. Those latter functions are not available on all systems. <p> <item><tt>ftell/fseek/fgetpos/fsetpos</tt>: Support depends on the @@ -71,115 +72,123 @@ Functions not available on all supported systems: <item><tt>rename/remove/rewind</tt>: Support depends on the capabilities of the target machine. <p> - <item><tt>time</tt>: Since many of the supported systems do not have a real - time clock, which means that the <tt/time/ function is not available. Please - note that the other functions from <tt/time.h/ <em/are/ available. + <item><tt>time</tt>: Many of the supported systems don't have a real-time + clock, which means that the <tt/time/ function is not available. Please note + that the other functions from <tt/time.h/ <em/are/ available. </itemize> Functions that are limited in any way: <itemize> - <item><tt>strcspn/strpbrk/strspn</tt>: These functions have a length - limitation of 256 for the second string argument. Since this string gives a - character set, and there are only 256 distinct characters, this shouldn't be + <item><tt>strcspn/strpbrk/strspn</tt>: Those functions have a length + limitation of 256 for the second string argument. Since that string gives a + character set, and there are only 256 distinct characters, that shouldn't be a problem. <p> <item><tt>getenv</tt>: Since there is no such thing as an environment on all - supported systems, the <tt/getenv/ function will always return a <tt/NULL/ + supported systems, the <tt/getenv/ function always will return a <tt/NULL/ pointer. <p> - <item><tt>locale</tt>: There is no other locale than the "C" locale. The + <item><tt>locale</tt>: There is no locale other than the "C" locale. The native locale is identical to the "C" locale. </itemize> -In addition to these limitations, some more functions are limited if inlined -versions are requested by using -Os: +In addition to those limitations, some more functions are limited if inlined +versions are requested by using the <tt/-Os/ command-line option: <itemize> - <item>The <tt/strlen/ function only works for strings with a maximum length + <item>The <tt/strlen/ function works for only strings with a maximum length of 255 characters. <p> - <item>The <tt/isxxx/ character classification functions from + <item>The <tt/isXXX/ character classification functions from <tt/<ctype.h>/ will give unpredictable results if the argument is not - in character range (0..255). This limitation may be removed by #undef'ing + in character range (0..255). That limitation may be removed by #undef'ing the function name (when using <tt/-Os/, the functions are actually macros - that expand to inline assembler code, but the real functions are still + that expand to inline assembly code, but the real functions still are available if the macro definition is removed). </itemize> -<sect>CPU specific stuff - 6502.h<p> +<sect>CPU-specific stuff - 6502.h<p> -The header file 6502.h contains some functions that make only sense with the +The header file 6502.h contains some functions that make sense only with the 6502 CPU. Examples are macros to insert more or less useful instructions into your C code, or a function to call arbitrary machine language subroutines, passing registers in and out. -<sect>Target specific stuff<p> +<sect>Target-specific stuff<p> -For each supported system there's a header file that contains calls or defines -specific for this system. So, when programming for the C64, include c64.h, for -the C128, include c128.h and so on. To make the task for the Commodore systems -easier, there is also a header file named cbm.h that will define stuff common -for all CBM systems, and include the header file for the specific target -system. +For each supported system, there's a header file that contains calls or +defines specific for that system. So, when programming for the C64, include +<tt/<c64.h>/, for the C128, include <tt/<c128.h>/, and so on. +To make the task for the Commodore systems easier, there is also a header file +named <tt/<cbm.h>/ that will define stuff common for all CBM systems, +and include the header file for the specific target system. The header files contain <itemize> - <item>Defines for special keys (like function keys) + <item>Defines for special keys (such as function keys) - <item>Defines for special characters (like the graphics characters) + <item>Defines for special characters (such as the graphics characters) <item>Variables with a fixed address in memory that may be used to access - special hardware. For the C64 and C128 there is a variable struct named - <tt/SID/. Writing to the fields of this struct will write to the SID device - instead. Using these variables will make your program more readable and more - portable. Don't fear ineffective code when using these variables, the - compiler will translate reads and writes to these structs into direct memory + special hardware. For the C64 and C128, there is a variable struct named + <tt/SID/. Writing to the fields of that struct will write to the SID device + instead. Using those variables will make your program more readable and more + portable. Don't fear ineffective code when using those variables, the + compiler will translate reads and writes to those structs into direct memory accesses. - <item>Other routines that make only sense for a specific system. One example - are routines to write memory locations in the system bank for the CBM PET-II + <item>Other routines that make sense for only a specific system. One example + is routines to write memory locations in the system bank for the CBM-II family. </itemize> + <sect>Direct console I/O - <tt/conio.h/<p> The <tt/conio.h/ header file contains a large set of functions that do screen and keyboard I/O. The functions will write directly to the screen or poll the keyboard directly with no more help from the operating system than needed. This has some disadvantages, but on the other side it's fast and reasonably -portable. conio implementations exist for the following targets: +portable. Conio implementations exist for the following targets: <itemize> <item>apple2 <item>apple2enh <item>atari + <item>atari5200 <item>atarixl <item>atmos + <item>c128 <item>c16 (works also for the c116 with up to 32K memory) <item>c64 - <item>c128 - <item>plus4 (or expanded c16/c116) - <item>cbm510 (40 column video) - <item>cbm610 (all CBM series-II computers with 80 column video) + <item>cbm510 (40-column video) + <item>cbm610 (all CBM series-II computers with 80-column video) + <item>creativision + <item>cx16 + <item>gamate <item>geos-apple <item>geos-cbm <item>nes + <item>osic1p + <item>pce <item>pet (all CBM PET systems except the 2001) + <item>plus4 (or expanded c16/c116) + <item>telestrat <item>vic20 </itemize> -The conio.h header file does also include the system specific header files +The <tt/conio.h/ header file does include the system-specific header files also, which define constants for special characters and keys. @@ -187,14 +196,14 @@ which define constants for special characters and keys. <sect>Using the joystick - <tt/joystick.h/<p> For systems that have a joystick, <tt/joystick.h/ will define a subroutine to -read the current value, including constants to evaluate the result of this +read the current value, including constants to evaluate the result of that function. <sect>Using a mouse - <tt/mouse.h/<p> -Some target machines support a mouse. Mouse support is currently available for +Some target machines support a mouse. Mouse support currently is available for the following targets: <itemize> @@ -202,18 +211,21 @@ the following targets: <item>apple2enh <item>atari <item>atarixl - <item>c64 <item>c128 + <item>c64 + <item>cbm510 + <item>cx16 </itemize> The available functions are declared in <tt/mouse.h/. + <sect>Copyright<p> This C runtime library implementation for the cc65 compiler is (C) Copyright 1998-2002 Ullrich von Bassewitz. For usage of the binaries -and/or sources the following conditions do apply: +and/or sources, the following conditions do apply: This software is provided 'as-is', without any expressed or implied warranty. In no event will the authors be held liable for any damages @@ -224,17 +236,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated, but is not required. +<item> Altered source versions must be marked plainly as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> - - - diff --git a/doc/lynx.sgml b/doc/lynx.sgml index 73763f1dd..76cfb377c 100644 --- a/doc/lynx.sgml +++ b/doc/lynx.sgml @@ -1,12 +1,10 @@ <!doctype linuxdoc system> <article> - <title>Atari Lynx specific information for cc65 <author> <url url="mailto:karri@sipo.fi" name="Karri Kaksonen">,<newline> <url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>2014-04-12 <abstract> An overview over the Atari Lynx runtime system as it is implemented for the @@ -38,7 +36,7 @@ Here is a small traditional Hello World program for the Atari Lynx. <tscreen><verb> #include <lynx.h> #include <tgi.h> -#include <6502.h> +#include <6502.h> void main(void) { tgi_install(tgi_static_stddrv); @@ -339,14 +337,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/nes.sgml b/doc/nes.sgml index 98c25b6af..beb322fc3 100644 --- a/doc/nes.sgml +++ b/doc/nes.sgml @@ -1,12 +1,10 @@ <!doctype linuxdoc system> <article> - <title>Nintendo Entertainment System specific information for cc65 <author> <url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> <url url="mailto:polluks@sdf.lonestar.org" name="Stefan A. Haubenthal"> -<date>2014-04-12 <abstract> An overview over the NES runtime system as it is implemented for the @@ -69,8 +67,8 @@ Programs containing NES specific code may use the <tt/nes.h/ header file. <sect1>NES specific functions<p> <itemize> -<item>waitvblank - wait until the start of vblank -<item>get_tv +<item>get_tv</item> +<item>waitvsync - wait until the start of the next frame</item> </itemize> @@ -181,17 +179,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> - - - diff --git a/doc/od65.sgml b/doc/od65.sgml index f5611a889..633f7b164 100644 --- a/doc/od65.sgml +++ b/doc/od65.sgml @@ -3,7 +3,6 @@ <article> <title>od65 Users Guide <author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>2014-04-14 <abstract> od65 is the object file dump utility. It is able to output most parts of @@ -201,15 +200,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> - diff --git a/doc/osi.sgml b/doc/osi.sgml index ab1b4cee5..eeaee4a97 100644 --- a/doc/osi.sgml +++ b/doc/osi.sgml @@ -1,12 +1,10 @@ <!doctype linuxdoc system> <article> - <title>Ohio Scientific-specific information for cc65 <author> <url url="mailto:stephan.muehlstrasser@web.de" name="Stephan Mühlstrasser">,<newline> <url url="mailto:greg.king5@verizon.net" name="Greg King"> -<date>2015-03-17 <abstract> An overview over the Ohio Scientific runtime system as it is implemented for the cc65 C @@ -219,14 +217,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/pce.sgml b/doc/pce.sgml index ba59c31a7..47eeabcfd 100644 --- a/doc/pce.sgml +++ b/doc/pce.sgml @@ -1,11 +1,9 @@ <!doctype linuxdoc system> <article> - -<title>PC-Engine (TurboGrafx) System specific information for cc65 -<author> -<url url="mailto:groepaz@gmx.net" name="Groepaz/Hitmen"> -<date>2015-07-14 +<title>PC-Engine (TurboGrafx 16) System-specific information for cc65 +<author><url url="mailto:groepaz@gmx.net" name="Groepaz">,<newline> +<url url="mailto:greg.king5@verizon.net" name="Greg King"> <abstract> An overview over the PCE runtime system as it is implemented for the @@ -20,86 +18,125 @@ cc65 C compiler. <sect>Overview<p> This file contains an overview of the PCE runtime system as it comes -with the cc65 C compiler. It describes the memory layout, PCE specific header +with the cc65 C compiler. It describes the memory layout, PCE-specific header files, available drivers, and any pitfalls specific to that platform. -Please note that PCE specific functions are just mentioned here, they are -described in detail in the separate <url url="funcref.html" name="function -reference">. Even functions marked as "platform dependent" may be available on +Please note that PCE-specific functions are just mentioned here; they are +described, in detail, in the separate <url url="funcref.html" name="function +reference">. Even functions marked as "platform dependent" might be available on more than one platform. Please see the function reference for more information. + <sect>Binary format<p> -The standard binary output format generated by the linker for the PCE target -is a cartridge image with no header. It is of course possible to change this -behaviour by using a modified startup file and linker config. +The binary output file generated by the linker, for the PCE target, is an +image, with no header, that has 8K bytes in the wrong place. That file must be +post-processed; the 8K at the end must be moved to the front of the image. + +On POSIX systems, the <tt/dd/ command and the shell give a convenient way to do +it. Here is an example of their use: +<tscreen><verb> +dd if=conio.bin bs=8K skip=3 > conio.pce +dd if=conio.bin bs=8K count=3 >> conio.pce +</verb></tscreen> +The first command grabs the last 8K of a 32K file, and writes it as the first +part of a new file. The second command reads all but the last part of the old +file, and appends it to the new file. +<tscreen><verb> ++--------+--------+--------+--------+ +| Bank 1 | Bank 2 | Bank 3 | Bank 0 | <-- "conio.bin" ++--------+--------+--------+--------+ + ++--------+--------+--------+--------+ +| Bank 0 | Bank 1 | Bank 2 | Bank 3 | <-- "conio.pce" ++--------+--------+--------+--------+ +</verb></tscreen> +<em/Note/: That <tt/.pce/ file shows the format of the ROM cartridge that is +plugged into a PC-Engine. But, that <tt/.bin/ file shows what programs +actually see when they execute the code in that cartridge. + + <sect>Memory layout<p> -cc65 generated programs with the default setup run with the I/O area and a -CHR bank enabled, which gives a usable memory range of $8000 - $FFF3. -All boot ROM entry points may be called directly without additional code. +cc65-generated programs with the default setup run with the memory map that was +used by many PC-Engine games: +<itemize> +<item>The first 8K bytes is the I/O area. +<item>The second 8K bytes is RAM, which holds +<itemize> +<item>the redirected zero-page and the redirected hardware stack page, +<item>and 7680 bytes of general memory ($2200 - $3FFF). +</itemize> +<item>The last 8K bytes in the usual 64K-byte range is the ROM that holds the +program. +</itemize> Special locations: <descrip> <tag/Text screen and Font/ - The text screen is located at VRAM $0000, - the Font is located at VRAM $2000. + The text screen is located at Video RAM (VRAM) address $0000; + the Font is located at VRAM address $2000. <tag/Stack/ - The C runtime stack is located in system RAM at $3FFF and growing downwards. + The C run-time stack is located in system RAM at $3FFF; + and, grows downwards. - <tag/BSS and Data/ - - The BSS (uninitialized variables) and Data (initialized variables) sections are - placed one after the other into system RAM at $2000. + <tag/Data and BSS/ + The Data (initialized variables) and BSS (uninitialized variables) sections are + placed one after the other into system RAM at $2200. <tag/Heap/ - The C heap is located after the end of the Data section and grows towards the C - runtime stack. + The C heap is located after the end of the BSS section; + and, extends up to the C run-time stack. <tag/Code/ - The startup code is located at $E000 in the System/Hardware bank. Further - code can be placed in other ROM banks, this must be done manually however. + In an 8K ROM cartridge, code and read-only data are located between + $E000 and $FFF5 in the System bank. -</descrip><p> + In a 16K cartridge, code and read-only data are located between $C000 + and $FFF5. + + In a 32K cartridge, code and read-only data are located between $8000 + and $FFF5. +</descrip> -<sect>Platform specific header files<p> +<sect>Platform-specific header files<p> -Programs containing PCE specific code may use the <tt/pce.h/ header file. +Programs containing PCE-specific code may use the <tt/pce.h/ header file. -<sect1>PCE specific functions<p> +<sect1>PCE-specific functions<p> <itemize> -<item>waitvblank</item> <item>get_tv (since all PCE systems are NTSC, this always returns TV_NTSC)</item> +<item>waitvsync</item> </itemize> - <sect1>Hardware access<p> -The following pseudo variables declared in the <tt/pce.inc/ include file do -allow access to hardware located in the address space. +The following constants, defined in the <tt/pce.inc/ include file, do +allow access to hardware that is located in the address space. <descrip> <tag><tt/PSG/</tag> - The <tt/PSG/ defines allow access to the PSG chip (Programmable Sound Generator). + The <tt/PSG/ defines allow access to the PSG (Programmable Sound Generator). <tag><tt/VCE/</tag> The <tt/VCE/ defines allow access to the VCE chip (Video Color Encoder). <tag><tt/VDC/</tag> - The <tt/VDC/ defines allow access to the VDC chip (Video Display Controller). + The <tt/VDC/ defines allow access to the VDC chip (Video Display Controller).<newline> + 32K of 16-bit words of Video RAM can be accessed only through this chip. -</descrip><p> +</descrip> @@ -124,11 +161,11 @@ No extended memory drivers are currently available for the PCE. <descrip> <tag><tt/pce-stdjoy.joy (pce_stdjoy)/</tag> - A joystick driver for the standard two buttons joypad is available. + A joystick driver for the standard two-button joypad is available. - Note that the japanese 6-button pad is currently not supported. + Note that the Japanese 6-button pad currently is not supported. -</descrip><p> +</descrip> <sect1>Mouse drivers<p> @@ -144,16 +181,13 @@ No serial drivers are currently available for the PCE. <sect>Limitations<p> -<itemize> -<item>interruptor support in crt0 (and cfg) is missing -</itemize> <sect1>Disk I/O<p> The existing library for the PCE doesn't implement C file I/O. There are no hacks for the <tt/read()/ and <tt/write()/ routines. -To be more concrete, this limitation means that you cannot use any of the +To be more concrete, that limitation means that you cannot use any of the following functions (and a few others): <itemize> @@ -168,18 +202,16 @@ following functions (and a few others): <item>... </itemize> + + <sect>Other hints<p> -<itemize> -<item>a good emulator to use for PC-Engine is "mednafen" (<url url="http://mednafen.fobby.net/">) -</itemize> - -some useful resources on PCE coding: +Some useful resources on PCE coding: <itemize> <item><url url="http://blog.blockos.org/?tag=pc-engine"> <item><url url="http://pcedev.blockos.org/viewforum.php?f=5"> -<item><url url="http://www.romhacking.net/?page=documents&category=&platform=4&:game=&author=&perpage=20&level=&title=&desc=&docsearch=Go"> +<item><url url="http://www.romhacking.net/?page=documents&platform=4"> <item><url url="http://archaicpixels.com/Main_Page"> <item><url url="http://www.magicengine.com/mkit/doc.html"> @@ -188,9 +220,11 @@ some useful resources on PCE coding: <item><url url="http://www.zeograd.com/parse.php?src=hucf"> </itemize> + + <sect>License<p> -This software is provided 'as-is', without any expressed or implied +This software is provided "as-is", without any expressed or implied warranty. In no event will the authors be held liable for any damages arising from the use of this software. @@ -199,17 +233,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item>The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated, but is not required. +<item>Altered source versions must be marked plainly as such; and, must not + be misrepresented as being the original software. +<item>This notice may not be removed or altered from any source + distribution. </enum> </article> - - - diff --git a/doc/pet.sgml b/doc/pet.sgml index 7c5bd71ea..6bedf6a0f 100644 --- a/doc/pet.sgml +++ b/doc/pet.sgml @@ -1,12 +1,10 @@ <!doctype linuxdoc system> <article> - <title>Commodore PET-specific information for cc65 <author> <url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> <url url="mailto:polluks@sdf.lonestar.org" name="Stefan A. Haubenthal"> -<date>2014-04-12 <abstract> An overview over the PET runtime system as it is implemented for the cc65 C @@ -107,6 +105,7 @@ declaration and usage. <item>cbm_save <item>cbm_write <item>get_tv +<item>waitvsync </itemize> @@ -155,8 +154,9 @@ The default drivers, <tt/joy_stddrv (joy_static_stddrv)/, point to <tt/pet-stdjo <tag><tt/pet-ptvjoy.joy (pet_ptvjoy_joy)/</tag> Driver for the Protovision 4-player adapter contributed by Groepaz. See - <url url="http://www.protovision-online.de/hardw/hardwstart.htm"> for prices and - building instructions. Up to two joysticks are supported. + <url url="http://www.protovision-online.de/hardw/4_player.php?language=en" + name="Protovision shop"> for prices and building instructions. Up to two + joysticks are supported. <tag><tt/pet-stdjoy.joy (pet_stdjoy_joy)/</tag> Driver for the standard PET userport joystick. @@ -243,14 +243,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/plus4.sgml b/doc/plus4.sgml index 36d53e753..79a2597d0 100644 --- a/doc/plus4.sgml +++ b/doc/plus4.sgml @@ -1,10 +1,8 @@ <!doctype linuxdoc system> <article> - <title>Commodore Plus/4 specific information for cc65 <author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>2014-04-12 <abstract> An overview over the Plus/4 runtime system as it is implemented for the cc65 C @@ -113,6 +111,8 @@ declaration and usage. <item>cbm_k_basin <item>cbm_k_bsout <item>cbm_k_clrch +<item>cbm_k_tksa +<item>cbm_k_second <item>cbm_load <item>cbm_open <item>cbm_opendir @@ -121,6 +121,20 @@ declaration and usage. <item>cbm_save <item>cbm_write <item>get_tv +<item>waitvsync +</itemize> + + +<sect1>CBM specific CPU functions<p> + +Some CPU related functions are available for some of the Commodore +machines. See the <url url="funcref.html" name="function reference"> for +declaration and usage. + +<itemize> +<item>fast +<item>slow +<item>isfast </itemize> @@ -181,10 +195,10 @@ No mouse drivers are currently available for the Plus/4. <tag><tt/plus4-stdser.ser (plus4_stdser_ser)/</tag> Driver for the 6551 ACIA chip built into the Plus/4. Supports up to 19200 - baud, hardware flow control (RTS/CTS) and interrupt driven receives. Note - that because of the peculiarities of the 6551 chip transmits are not - interrupt driven, and the transceiver blocks if the receiver asserts flow - control because of a full buffer. + baud, requires hardware flow control (RTS/CTS) and does interrupt driven + receives. Note that because of the peculiarities of the 6551 chip transmits + are not interrupt driven, and the transceiver blocks if the receiver asserts + flow control because of a full buffer. You need an adapter to use the builtin port, since the output levels available at the user port don't follow the RS232 standard. @@ -247,14 +261,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/sim65.sgml b/doc/sim65.sgml index 24b43831c..310de4667 100644 --- a/doc/sim65.sgml +++ b/doc/sim65.sgml @@ -3,12 +3,13 @@ <article> <title>sim65 Users Guide -<author><url url="mailto:polluks@sdf.lonestar.org" name="Stefan A. Haubenthal"> -<date>2016-01-05 +<author><url url="mailto:polluks@sdf.lonestar.org" name="Stefan A. Haubenthal">,<newline> +<url url="mailto:bbbradsmith@users.noreply.github.com" name="Brad Smith"> + <abstract> sim65 is a simulator for 6502 and 65C02 CPUs. It allows to test target -independed code. +independent code. </abstract> <!-- Table of contents --> @@ -19,8 +20,8 @@ independed code. <sect>Overview<p> -sim65 is the only solution as part of the toolchain to execute code. The -binary needs to be compiled with <tt/--target sim6502/ or <tt/--target sim65c02/. +sim65 is used as part of the toolchain to test 6502 or 65C02 code. +The binary to test should be compiled with <tt/--target sim6502/ or <tt/--target sim65c02/. <sect>Usage<p> @@ -28,17 +29,19 @@ binary needs to be compiled with <tt/--target sim6502/ or <tt/--target sim65c02/ The simulator is called as follows: <tscreen><verb> - Usage: sim65 [options] file [arguments] - Short options: - -h Help (this text) - -v Increase verbosity - -V Print the simulator version number - -x <num> Exit simulator after <num> cycles + Usage: sim65 [options] file [arguments] + Short options: + -h Help (this text) + -c Print amount of executed CPU cycles + -v Increase verbosity + -V Print the simulator version number + -x <num> Exit simulator after <num> cycles - Long options: - --help Help (this text) - --verbose Increase verbosity - --version Print the simulator version number + Long options: + --help Help (this text) + --cycles Print amount of executed CPU cycles + --verbose Increase verbosity + --version Print the simulator version number </verb></tscreen> @@ -53,6 +56,13 @@ Here is a description of all the command line options: Print the short option summary shown above. + <tag><tt>-c, --cycles</tt></tag> + + Print the number of executed CPU cycles when the program terminates. + The cycles for the final "<tt>jmp exit</tt>" are not included in this + count. + + <tag><tt>-v, --verbose</tt></tag> Increase the simulator verbosity. @@ -81,7 +91,7 @@ Example output for the command sim65 --verbose --verbose samples/gunzip65 </verb></tscreen> <tscreen><verb> -Loaded `samples/gunzip65' at $0200-$151F +Loaded 'samples/gunzip65' at $0200-$151F PVWrite ($0001, $13C9, $000F) GZIP file name:PVWrite ($0001, $151F, $0001) @@ -96,6 +106,69 @@ PVExit ($01) </verb></tscreen> +<sect>Creating a Test in C<p> + +For a C test compiled and linked with <tt/--target sim6502/ the +command line arguments to <tt/sim65/ will be passed to <tt/main/, +and the return value from <tt/main/ will become sim65's exit code. +The <tt/exit/ function may also be used to terminate with an exit code. + +Exit codes are limited to 8 bits. + +The standard C library high level file input and output is functional. +A sim65 application can be written like a command line application, +providing arguments to <tt/main/ and using the <tt/stdio.h/ interfaces. + +Internally, file input and output is provided at a lower level by +a set of built-in paravirtualization functions (<ref id="paravirt-internal" name="see below">). + + +<sect>Creating a Test in Assembly<p> + +Assembly tests may similarly be assembled and linked with +<tt/--target sim6502/ or <tt/--target sim65c02/, +and the sim65 library provides an <tt/exit/ symbol that the program may <tt/JMP/ +to terminate with the current A register value as an exit code. + +The binary file has a 12 byte header: + +<itemize> + +<item>5 byte <bf/signature/: <tt/$73, $69, $6D, $36, $35/ or <tt/'sim65'/ + +<item>1 byte <bf/version/: <tt/2/ + +<item>1 byte <bf/CPU type/: <tt/0/ = 6502, <tt/1/ = 65C02 + +<item>1 byte <bf/sp address/: the zero page address of the C parameter stack pointer <tt/sp/ used by the paravirtualization functions + +<item>1 word <bf/load address/: where to load the data from the file into memory (default: <tt/$0200/) + +<item>1 word <bf/reset address/: specifies where to begin execution after loading (default: <tt/$0200/) + +</itemize> + +Other internal details: + +<itemize> + +<item>The entire 64 kilobyte address space is writeable RAM. +Aside from the loaded binary, the reset vector at <tt/$FFFC/ will be +pre-loaded with the given <bf/reset address/. + +<item>The <tt/exit/ address is <tt/$FFF9/. +Jumping to this address will terminate execution with the A register value as an exit code. + +<label id="paravirt-internal"> +<item>Several bytes immediately below the vector table are reserved for paravirtualization functions. +Except for <tt/exit/, a <tt/JSR/ to one of these addresses will return immediately after performing a special function. +These use cc65 calling conventions, and are intended for use with the sim65 target C library. + +<item><tt/IRQ/ and <tt/NMI/ events will not be generated, though <tt/BRK/ +can be used if the IRQ vector at <tt/$FFFE/ is manually prepared by the test code. + +</itemize> + <sect>Copyright<p> @@ -112,14 +185,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/smc.sgml b/doc/smc.sgml index 4f3e2ace4..71de20208 100644 --- a/doc/smc.sgml +++ b/doc/smc.sgml @@ -3,7 +3,6 @@ <article> <title>ca65 Macros for Self Modifying Code <author>Christian Krüger -<date>2014-04-24 <abstract> The 'smc.inc' macro package for ca65 eases the use, increases the safeness and @@ -86,7 +85,7 @@ Please note: <item> The macro '<tt>SMC_StoreValue</tt>' takes care, that the store operation will occur on the value-position of a SMC-instruction. As you will see, other macros influence other instruction part positions. - There is no consistency check, if the targeted SMC instruction acually + There is no consistency check, if the targeted SMC instruction actually contains a value. Storing a 'value' on an immplied SMC instruction would corrupt the following memory cell! </enum> @@ -258,7 +257,7 @@ SMC LoadDefault, { LDX #25 } <label id="Load value"> <tag><tt>SMC_LoadValue label (, register)</tt></tag> - Retreives the value of a SMC line. + Retrieves the value of a SMC line. Example: <tscreen><verb> @@ -471,7 +470,7 @@ SMC instructions. Example: <tscreen><verb> - SMC_OperateOnValue ASL, LoadMask ; shift mask to left + SMC_OperateOnValue ASL, LoadMask ; shift mask to left ... SMC LoadMask, { LDA #$20 } </verb></tscreen> @@ -556,14 +555,14 @@ allowing reuse of some instructions. 5: SMC StoreAccuFirstSection, { sta SMC_AbsAdr, Y } 6: ... 7: RestoreCodeBranchBaseAdr: - 8: SMC FirstIncHighByte, { SMC_OperateOnHighByte inc, StoreAccuFirstSection } ; code will be overwritten to 'beq RestoreCode' (*) + 8: SMC FirstIncHighByte, { SMC_OperateOnHighByte inc, StoreAccuFirstSection } ; code will be overwritten to 'beq RestoreCode' (*) 9: ... -10: SMC_TransferOpcode FirstIncHighByte, OPC_BEQ , x ; change code marked above with (*) -11: SMC_TransferValue FirstIncHighByte, #(restoreCode - RestoreCodeBranchBaseAdr-2), x ; set relative address to 'RestoreCode' +10: SMC_TransferOpcode FirstIncHighByte, OPC_BEQ , x ; change code marked above with (*) +11: SMC_TransferValue FirstIncHighByte, #(restoreCode - RestoreCodeBranchBaseAdr-2), x ; set relative address to 'RestoreCode' 12: ... 13: restoreCode: -14: SMC_TransferOpcode FirstIncHighByte, OPC_INC_abs , x ; restore original code... -15: SMC_TransferValue FirstIncHighByte, #(<(StoreToFirstSection+2)), x ; (second byte of inc contained low-byte of address) +14: SMC_TransferOpcode FirstIncHighByte, OPC_INC_abs , x ; restore original code... +15: SMC_TransferValue FirstIncHighByte, #(<(StoreToFirstSection+2)), x ; (second byte of inc contained low-byte of address) 16: ... </verb></tscreen> @@ -583,7 +582,7 @@ into a single instruction line. These can be changed of course too. Line 10,11: These lines construct a branch operation for line 8: The X-register will be used to change it from 'inc StoreAccuFirstSection+2' (high-byte operation) to 'beq restoreCode'. Please note: To calculate the -relaive branch offset, we introduced a second label +relative branch offset, we introduced a second label ('RestoreCodeBranchBaseAdr') for to calculate it. Some could also use the internal name of the SMC label, but you should abstain to do so - it may be changed in the future... diff --git a/doc/sp65.sgml b/doc/sp65.sgml index 909ac6d25..255d7a552 100644 --- a/doc/sp65.sgml +++ b/doc/sp65.sgml @@ -3,7 +3,6 @@ <article> <title>sp65 Users Guide <author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz"> -<date>2012-03-11 <abstract> sp65 is a sprite and bitmap utility that is part of the cc65 development suite. @@ -49,6 +48,7 @@ Short options: Long options: --convert-to fmt[,attrlist] Convert into target format + --dump-palette Dump palette as table --help Help (this text) --list-conversions List all possible conversions --pop Restore the original loaded image @@ -76,6 +76,12 @@ attribute lists see <ref id="attr-lists" name="below">. see section <ref id="conversions" name="Conversions">. + <label id="option--dump-palette"> + <tag><tt>--dump-palette</tt></tag> + + Dump palette as table. + + <label id="option--help"> <tag><tt>-h, --help</tt></tag> @@ -397,14 +403,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> diff --git a/doc/supervision.sgml b/doc/supervision.sgml index 97495dea5..2570cfb9c 100644 --- a/doc/supervision.sgml +++ b/doc/supervision.sgml @@ -1,10 +1,8 @@ <!doctype linuxdoc system> <article> - <title>Watara Supervision specific information for cc65 <author><url url="mailto:polluks@sdf.lonestar.org" name="Stefan A. Haubenthal"> -<date>2014-04-12 <abstract> An overview over the Supervision runtime system as it is implemented for the @@ -63,14 +61,6 @@ Special locations: Programs containing Supervision specific code may use the <tt/supervision.h/ header file. -<sect1>Supervision specific functions<p> - -<itemize> -<item>waitvblank -</itemize> - - - <sect1>Hardware access<p> The following pseudo variables declared in the <tt/supervision.inc/ include file do @@ -102,11 +92,12 @@ No extended memory drivers are currently available for the Supervision. <sect1>Joystick drivers<p> -No joystick drivers are currently available for the Supervision. -<!--A joystick driver for the standard buttons is available, but must be -statically linked, because no file I/O is available. See the documentation for -the <url url="co65.html" name="co65 utility"> for information on how to do -that.--> +<descrip> + + <tag><tt/supervision-stdjoy.joy (supervision_stdjoy_joy)/</tag> + A joystick driver for the standard two buttons joypad is available. + +</descrip><p> <sect1>Mouse drivers<p> @@ -157,14 +148,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/doc/sym1.sgml b/doc/sym1.sgml new file mode 100644 index 000000000..0d4cc8a20 --- /dev/null +++ b/doc/sym1.sgml @@ -0,0 +1,173 @@ +<!doctype linuxdoc system> + +<article> +<title>Synertek Systems Sym-1 specific information for cc65 +<author><url url="mailto:wayne@parhamdata.com" name="Wayne Parham"> + +<abstract> +An overview over the Sym-1 runtime system as it is implemented for the cc65 C compiler. +</abstract> + +<!-- Table of contents --> +<toc> + +<!-- Begin the document --> + +<sect>Overview<p> + +This file contains an overview of the Sym-1 runtime system as it comes with the cc65 C compiler. +It describes the memory layout, Sym-1 specific header files, available drivers, and any pitfalls +specific to the platform. + +Please note that Sym-1 specific functions are just mentioned here, they are described in detail +in the separate <url url="funcref.html" name="function reference">. Even functions marked as +"platform dependent" may be available on more than one platform. Please see the +function reference for more information. + +<sect>Binary format<p> + +The output format generated by the linker for the Sym-1 target is a raw binary BIN file, which +is essentially a memory image. You can convert this to a HEX file using BIN2HEX, which is a +popular open-source conversion utility program. A HEX file has ASCII representations of the +hexadecimal byte values of the machine-language program. So the HEX file can be transferred +to the Sym-1 using the RS-232 terminal port, just as if the machine-code was entered by hand. +Enter 'm 200' in the monitor and start the HEX file transfer. + +<p> + +Included with this distribution is a 4k configuration file and a 32k config file. The Sym-1 +on-board memory is limited to 4 kbytes but system memory can be increased to 32 kbytes of +contiguous RAM with aftermarket add-on boards. So choose the config file that matches your +system configuration before compiling and linking user programs. + +<sect>Memory layout<p> + +The ROMs and I/O areas are defined in the configuration files, as are most of the entry points +for useful subroutines in the Sym-1 monitor ROM. cc65 generated programs compiled and linked +using 4k config run in the memory range of $200 - $0FFF. The 32k config expands +this range to $7FFF. Memory above 32k can be used to extend the heap, as described below. +The starting memory location and entry point for running the program is $200, so when the +program is transferred to the Sym-1, it is executed by typing 'g 200'. The system returns control +back to the monitor ROM when the program terminates, providing the '.' prompt. + +Special locations: + +<descrip> + <tag/Text screen/ + Conio support is not currently available for the Sym-1. But stdio console functions are available. + + <tag/Stack/ + The C runtime stack is located at $0FFF on 4kb Syms, or at $7FFF for 32kb systems. + The stack always grows downwards. + + <tag/Heap/ + The C heap is located at the end of the program and grows towards the C runtime stack. Extended + memory can be added to the heap, as described below. + +</descrip><p> + +<sect>Platform specific header files<p> + +Programs containing Sym-1 code may use the <tt/sym1.h/ header file. See the header file for more information. + +<sect1>Hardware access<p> + +The pseudo variables declared in the <tt/sym1.inc/ include file allow access to hardware located in the +address space. See the include file for more information. + +<sect>Loadable drivers<p> + +<sect1>Graphics drivers<p> + +No graphics drivers are currently available for the Sym-1. + +<sect1>Extended memory drivers<p> + +There are no extended memory drivers for the Sym-1. However, there is a way to access memory beyond the +32kb boundary, if extended memory is physically present in the system. See the example program, +symExtendedMemory, in the samples directory. + +<sect1>Joystick drivers<p> + +No joystick driver is currently available for the Sym-1. + +<sect1>Mouse drivers<p> + +No mouse drivers are currently available for the Sym-1. + +<sect1>RS232 device drivers<p> + +No communication port drivers are currently available for the Sym-1. It has only the "master console" +e.g. stdin and stdout. + +<sect>Limitations<p> + +<sect1>Disk I/O<p> + +The existing library for the Sym-1 doesn't implement C file I/O. + +To be more specific, this limitation means that you cannot use any of the following functions (and a few others): + +<itemize> +<item>fopen +<item>fclose +<item>fread +<item>fwrite +<item>... +</itemize> + +<sect>Other hints<p> + +<sect1>sym1.h<p> +This header exposes Sym-specific I/O functions that are useful for reading and writing its ports and front panel. +See the <tt/sym1.h/ include file for a list of the functions available. + +<sect2>Limited memory applications<p> + +As stated earlier, there are config files for 4kb and 32kb systems. If you have 32kb RAM, then you will probably +want to use the sym1-32k configuration, but if not - if you are using the sym1-4k configuration - then you may +want to use functions like getchar, putchar, gets and puts rather than functions like scanf and printf. +Printf, for example, requires about 1KB because it needs to know how to process all the format specifiers. + +<sect3>Using extended memory<p> + +Memory may be physically present that is addressed at locations above the monitor ROM at $8000. This extended +memory is accessible by adding to the heap, as described in the symExtendedMemory sample program. + +<sect4>Sample programs<p> + +All the samples will run on the "stock" 4kb Sym-1, except for symIO and symNotepad, which require 32kb. +Additionally, symExtendedMemory shows how to access memory above 32kb, so it expects more than 32kb. +These sample programs can be found in the samples/sym1 directory: + +<itemize> +<item>symHello prints "Hello World!" and then inputs characters, which are echoed on the screen. + It also makes a "beep" sound.</item> +<item>symTiny does the same as symHello, but does it with puts() rather than printf() to show the difference + in compiled binary size.</item> +<item>symDisplay allows entry of a message, which is then displayed by scrolling it across the front panel display.</item> +<item>symIO allows access to the Sym-1 digital I/O ports.</item> +<item>symNotepad is a simple text entry/retrieval program that uses tape storage.</item> +<item>symExtendedMemory demonstrates how to access upper-memory and add it to the heap.</item> +</itemize> + +<sect>License<p> + +This software is provided 'as-is', without any expressed or implied warranty. In no event will the authors be held +liable for any damages arising from the use of this software. + +Permission is granted to anyone to use this software for any purpose, including commercial applications, and to alter +it and redistribute it freely, subject to the following restrictions: + +<enum> +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. +</enum> + +</article> diff --git a/doc/telestrat.sgml b/doc/telestrat.sgml new file mode 100644 index 000000000..e12846091 --- /dev/null +++ b/doc/telestrat.sgml @@ -0,0 +1,260 @@ +<!doctype linuxdoc system> + +<article> +<title>Oric Telestrat-specific information for cc65 +<author> +<url url="mailto:jede@oric.org" name="Jede"> + +<abstract> +An overview over the Telestrat (Telemon 2.4 & Telemon 3.x : http://orix.oric.org) runtime system as it is implemented for the cc65 C compiler. +</abstract> + +<!-- Table of contents --> +<toc> + +<!-- Begin the document --> + +<sect>Overview<p> + +This file contains an overview of the Telestrat runtime system as it comes +with the cc65 C compiler. It describes the memory layout, Telestrat-specific +header files, available drivers, and any pitfalls specific to that platform. + +Please note that Telestrat-specific functions are just mentioned here, they are +described in detail in the separate <url url="funcref.html" name="function +reference">. Even functions marked as "platform dependent" may be available on +more than one platform. Please see the function reference for more +information. + +Oric Telestrat is the last Oric computer (Released in 1986, mainly in France). +This computer is an Atmos with extra hardware: RS232, cardridge(banking system), +joysticks (2 ports) or mouse (on joystick port), FDC. + +Video chip, CPU, keyboard management, tape hardware are the same than Atmos. + +Telestrat can start in Atmos mode with Atmos Cardridge (which is only the atmos +Basic 1.1 ROM). + +Telestrat can start in Sedoric (Atmos OS) and Atmos mode with Stratoric Cardridge. +This Cardridge has 3 banks of 16KB of rom with: +<itemize> +<item>a Sedoric ROM. +<item>a Basic 1.1 ROM (Atmos). +<item>a Basic 1.0 ROM (Oric-1). +</itemize> + +The main Telestrat's configuration is the Telemon/Hyperbasic Cardridge inserted +with Stratsed in floppy drive. + +Anyway, there is no way to load a tape file in Telemon/Hyperbasic mode without +alternative program. + +There is also no software to write a Stratsed dsk file on PC. + +This Telestrat target build an Orix binary file. But, in the future, it will be possible +to build a Stratsed disk. Orix uses the same systems calls than Telemon mode. + +That is why if you need to do software for telestrat target, you have the choice to: +<itemize> +<item>use cc65 Atmos target and start Telestrat in Atmos mode: A tape file is required. +<item>use cc65 Atmos target and start Telestrat in Stratoric mode: A dsk file or tape file is required. +<item>use cc65 Telestrat target and start Telestrat in Orix mode (see <url +name="here" url="http://orix.oric.org/download/">). +<item>use cc65 Telestrat target, remove Orix header from binary, code a dsk tool for Stratsed, +add Stratsed header on your binary,insert your binary on floppy disk (this solution will be possible is the future). +</itemize> + +Telestrat (from cardridge) can handle 8 banks (from $C000 to $FFFF): Bank 0 is the overlay ram. Others banks can be ROM or RAM. + +<sect>Binary format<p> + +The standard binary output format generated the linker for the Telestrat +target is a machine language program with a 20 bytes header described <url +name="here" url="http://orix.oric.org/orix-header/"> + +This header is used for Telemon 3.0. + +Anyway, for Telemon 2.4, there is no file management, there is no TAPE routine +in Telemon, there is no way to load a binary easily. + +Stratsed (the Telestrat operating system) handles files management. Stratsed +is loaded to memory from floppy disk. Stratsed vector are declared in asminc/telestrat.inc. +But, reverse engineering is required to find how these vectors works. Please, note that +Stratsed is located in overlay memory (bank 0) + +There is no tool to insert a binary in a Stratsed floppy disk. + +The only way to load a binary (for Telemon 2.4) is to: +<itemize> +<item>remove the 20 bytes header +<item>download <url name="osdk" url="http://osdk.defence-force.org/index?page=download"> +<item>use Floppybuilder in OSDK to insert the binary with the tool (please read +FloppyBuilder manual to learn how to insert your binary and how to start Microdisc boot sector +when Telestrat starts) +</itemize> + +Please note also, that the binary converted into TAP file, will not produce +a right stratsed file when tap2dsk and old2mfm are used. You will be in the +case that Telestrat/Stratsed crashed when you do "DIR" command. + +If you know the Stratsed disk format, please contact the author of this doc. + + +<sect>Memory layout<p> + +In the standard setup, cc65-generated programs use the memory from +$0801 to $9800; so, nearly 37K of memory (including the stack) is +available. ROM calls are possible with BRK feature. + + +Special locations: + +<descrip> + <tag/Stack/ + The C runtime stack is located at $97FF (or $B3FF), and grows + downwards. + + <tag/Heap/ + The C heap is located at the end of the program, and grows towards the C + runtime stack. + +</descrip><p> + + + +<sect>Platform-specific header files<p> + +Programs containing Telestrat-specific code may use the <tt/telestrat.h/ header file. + + +<sect1>Telestrat-specific functions<p> + +The functions listed below are special for the Telestrat. See the <url +url="funcref.html" name="function reference"> for declaration and usage. + +<itemize> +<item>explode +<item>ping +<item>shoot +<item>zap +<item>oups +</itemize> + + +<sect1>Hardware access<p> + +The following pseudo variables declared in the <tt/telestrat.h/ header file do allow +access to hardware located in the address space. Some variables are +structures; accessing the struct fields will access the chip registers. + +<descrip> + + <tag><tt/VIA/</tag> + Access to the VIA (Versatile Interface Adapter) chip is available via the + <tt/VIA/ variable. The structure behind this variable is explained in <tt/_6522.h/. + + <tag><tt/VIA2/</tag> + Access to the VIA2 (Versatile Interface Adapter) chip is available via the + <tt/VIA2/ variable. The structure behind this variable is explained in <tt/_6522.h/. + + <tag><tt/ACIA/</tag> + Access to the 6551 ACIA chip is available via the + <tt/ACIA/ variable. The structure behind this variable is explained in <tt/_6551.h/. + +</descrip><p> + + +<sect>Loadable drivers<p> + +<sect1>TGI<p> + +TGI drivers is available on Oric Telestrat with some functions: + +<itemize> +<item>tgi_clear +<item>tgi_done +<item>tgi_init +<item>tgi_install +<item>tgi_line +<item>tgi_outtext +<item>tgi_setpixel +</itemize> + + +<sect1>Extended memory drivers<p> + +No extended memory drivers are currently available for the Telestrat. +This feature could be done because telestrat can manage RAM inserted in his +port cardridge. + +<sect1>Joystick drivers<p> + +Telemon 2.4 returns in keyboard buffer the direction of the joysticks. This means that +if you get input from keyboard by conio cgetc function, you will get direction from joysticks. + +Anyway, if you don't want to use ROM, you can use joysticks standard drivers in your code. + +The standard driver manages two joysticks. Only one button is managed for these joysticks. + +Telestrat can handle one button for the left port, and three buttons for the right port (but this port was designed for a mouse). + +If you find a Telestrat mouse (which is almost impossible :), these driver will work too because there is some extra hardware in the mouse to send direction. + +<sect1>Mouse drivers<p> + +Telestrat manages also mouse (Joystick port) +Telestrat mouse is really difficult to find. + +<sect1>RS232 device drivers<p> + +Telestrat has a RS232 port, but it's not usable in cc65. It is possible to use +RS232 port with Telemon calls (see XSOUT primitive for example) + +<sect>Limitations<label id="limitations"><p> + +<sect1>Disk I/O<p> + +Telemon 3.0 handles fopen, fread, fclose primitives. It means that this +function will crash the Telestrat because Telemon 2.4 does not have these +primitives. By the way, Telemon 3.0 uses an extension "ch376 card" which +handles sdcard and FAT 32 usb key. In the next version of Telemon, FT DOS, +Sedoric, Stratsed will be handled in these 3 primitives (fopen, fread, fclose). + +<itemize> +<item>fclose +<item>fopen +<item>fread +</itemize> + +<sect1>conio<p> +Functions textcolor and bgcolor are available only with Telemon 3.0 (Orix). +Telemon 2.4 primitives can't handle any change of colors in text mode except with XINK or +XPAPER primitives which put on the first and second columns ink and paper attributes. +The only way to change color on the same line for text is to handle it in pure assembly +without systems calls. + +<sect>Other hints<p> + + +<sect>License<p> + +This software is provided 'as-is', without any expressed or implied +warranty. In no event will the authors be held liable for any damages +arising from the use of this software. + +Permission is granted to anyone to use this software for any purpose, +including commercial applications, and to alter it and redistribute it +freely, subject to the following restrictions: + +<enum> +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. +</enum> + +</article> diff --git a/doc/tgi.sgml b/doc/tgi.sgml new file mode 100644 index 000000000..29acd8ce6 --- /dev/null +++ b/doc/tgi.sgml @@ -0,0 +1,1033 @@ +<!doctype linuxdoc system> + +<article> +<title>Tiny Graphics Interface +<author><url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> +<url url="mailto:polluks@sdf.lonestar.org" name="Stefan A. Haubenthal">,<newline> +<url url="mailto:greg.king5@verizon.net" name="Greg King"> + +<abstract> +The cc65 library provides functions for platform independent graphics. +Include the tgi.h header file to get the necessary definitions, see also +<tt>samples/tgidemo.c</tt> and <tt>samples/mandelbrot.c</tt>. +</abstract> + +<!-- Begin the document --> + +<sect>tgi.h<label id="tgi.h"> + +<sect1>tgi_arc<label id="tgi_arc"><p> + +<quote> +<descrip> +<tag/Function/Draw an elliptic arc in the current color. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_arc (int x, int y, +unsigned char rx, unsigned char ry, unsigned sa, unsigned ea);/ +<tag/Description/The function draws an elliptic arc with center at x/y and +radii rx/ry using the current drawing color. The arc covers the angle +between sa and ea (startangle and endangle), which must be in the range +0..360. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +<item>The function behaves unexpectedly or may crash if the angles are out +of range. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="tgi_bar" name="tgi_bar">, +<ref id="tgi_circle" name="tgi_circle">, +<ref id="tgi_ellipse" name="tgi_ellipse">, +<ref id="tgi_pieslice" name="tgi_pieslice">, +<ref id="tgi_setcolor" name="tgi_setcolor"> +<tag/Example/<tscreen><verb> +/* Draw the upper half of an ellipse */ +tgi_setcolor(TGI_COLOR_BLUE); +tgi_arc (50, 50, 40, 20, 0, 180); +</verb></tscreen> +</descrip> +</quote> + + +<sect1>tgi_bar<label id="tgi_bar"><p> + +<quote> +<descrip> +<tag/Function/The function fills a rectangle on the drawpage with the current +color. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_bar (int x1, int y1, int x2, int y2);/ +<tag/Description/The function fills a rectangle on the drawpage with the current +color. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi function +<tag/Example/<tscreen><verb> +tgi_setcolor(TGI_COLOR_GREEN); +tgi_bar(10, 10, 100, 60); +</verb></tscreen> +</descrip> +</quote> + + +<sect1>tgi_circle<label id="tgi_circle"><p> + +<quote> +<descrip> +<tag/Function/The function draws a circle in the current color. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_circle (int x, int y, unsigned char radius);/ +<tag/Description/The function draws a circle in the current color. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="tgi_arc" name="tgi_arc">, +<ref id="tgi_bar" name="tgi_bar">, +<ref id="tgi_ellipse" name="tgi_ellipse">, +<ref id="tgi_pieslice" name="tgi_pieslice">, +<ref id="tgi_setcolor" name="tgi_setcolor"> +<tag/Example/<tscreen><verb> +tgi_setcolor(TGI_COLOR_BLACK); +tgi_circle(50, 40, 40); +</verb></tscreen> +</descrip> +</quote> + + +<sect1>tgi_clear<label id="tgi_clear"><p> + +<quote> +<descrip> +<tag/Function/Clear the drawpage +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void tgi_clear (void);/ +<tag/Description/Clear the drawpage +<tag/Availability/cc65 +<tag/See also/Other tgi functions +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_done<label id="tgi_done"><p> + +<quote> +<descrip> +<tag/Function/End graphics mode, switch back to text mode. +Will NOT uninstall or unload the driver! +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void tgi_done (void);/ +<tag/Description/End graphics mode, switch back to text mode. +Will NOT uninstall or unload the driver! +<tag/Availability/cc65 +<tag/See also/Other tgi functions +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_ellipse<label id="tgi_ellipse"><p> + +<quote> +<descrip> +<tag/Function/The function draws an ellipse in the current color. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_ellipse (int x, int y, unsigned char rx, unsigned char ry);/ +<tag/Description/The function draws an ellipse at position x/y with radii +rx and ry, using the current drawing color. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="tgi_arc" name="tgi_arc">, +<ref id="tgi_bar" name="tgi_bar">, +<ref id="tgi_circle" name="tgi_circle">, +<ref id="tgi_pieslice" name="tgi_pieslice">, +<ref id="tgi_setcolor" name="tgi_setcolor"> +<tag/Example/<tscreen><verb> +tgi_setcolor(TGI_COLOR_RED); +tgi_ellipse (50, 40, 40, 20); +</verb></tscreen> +</descrip> +</quote> + + +<sect1>tgi_free_vectorfont<label id="tgi_free_vectorfont"><p> + +<quote> +<descrip> +<tag/Function/Free a vector font that was previously loaded into memory. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_free_vectorfont (const tgi_vectorfont* font);/ +<tag/Description/Free a vector font that was previously loaded into memory. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="tgi_load_vectorfont" name="tgi_load_vectorfont">, +<ref id="tgi_install_vectorfont" name="tgi_install_vectorfont"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_getaspectratio<label id="tgi_getaspectratio"><p> + +<quote> <descrip> <tag/Function/Return the pixel aspect ratio. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned tgi_getaspectratio (void);/ +<tag/Description/The function returns the pixel aspect ratio for the current +driver and display as an 8.8 fixed point value. It may be used to correct +geometric shapes so they look correct on the display. As an example, a circle +with a radius of 100 pixels may look elliptic on some driver/display +combinations if the aspect ratio is not 1.00. +<tag/Notes/<itemize> +<item>The aspect ratio is encoded in the TGI driver which assumes a "standard" +monitor for the given platform. The aspect ratio may be wrong if another +monitor is used. +<item>No TGI function will use the aspect ratio. It is up to the programmer to +make use of it. +<item>The <ref id="tgi_setaspectratio" name="tgi_setaspectratio"> function can +be used to change the aspect ratio for a loaded driver. The value is not reset +by <ref id="tgi_init" name="tgi_init">, so if a driver is linked statically to +an application, switching into and out of graphics mode will not restore the +original aspect ratio. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="tgi_setaspectratio" name="tgi_setaspectratio"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_getcolor<label id="tgi_getcolor"><p> + +<quote> +<descrip> +<tag/Function/Return the current drawing color. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned char tgi_getcolor (void);/ +<tag/Description/The actual color is an index to a palette. During tgi_init +you will get a default palette. The number of colors depend on the platform. +All platforms recognize at least TGI_COLOR_BLACK and TGI_COLOR_WHITE. But some +platforms have many more predefined colors. If you paint using TGI_COLOR_GREEN +and then you change the green of the palette to blue using tgi_setpalette then +after this painting in TGI_COLOR_GREEN will actually be blue. +<tag/Availability/cc65 +<tag/See also/Other tgi functions +<tag/Example/<tscreen><verb> +color = tgi_getcolor(); +</verb></tscreen> +</descrip> +</quote> + + +<sect1>tgi_getcolorcount<label id="tgi_getcolorcount"><p> + +<quote> +<descrip> +<tag/Function/Get the number of available colors. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned char tgi_getcolorcount (void);/ +<tag/Description/TGI platforms use indexed color palettes. This function +returns the number of entries we can use in the palette. + +<tt/tgi_setcolor()/ can accept numbers from <tt/0/ to <tt/255/. That is 256 +possible colors, but an <tt/(unsigned char)/ cannot hold that number. +Therefore, the number zero is used to indicate when a palette has 256 entries. +A portable program should test for that number, and do appropriate actions. +A program might assign the count to an <tt/unsigned int/ (and change a zero to +a 256). Or, it might rely on the fact that <tt/(unsigned char)/ will +"wrap-around" when it is incremented beyond 255. +<tag/Availability/cc65 +<tag/See also/<ref id="tgi_getcolor" name="tgi_getcolor()">, +<ref id="tgi_getdefpalette" name="tgi_getdefpalette()">, +<ref id="tgi_getmaxcolor" name="tgi_getmaxcolor()">, +<ref id="tgi_getpalette" name="tgi_getpalette()">, +<ref id="tgi_setcolor" name="tgi_setcolor()">, +<ref id="tgi_setpalette" name="tgi_setpalette()"> +<tag/Examples/<tscreen><verb> +if (tgi_getcolorcount() == 2) { + printf("Only monochrome graphics is supported\n"); +} + +static unsigned char num_colors; +static unsigned char color; +... +num_colors = tgi_getcolorcount(); +... +++color; +if (num_colors == 0) { + tgi_setcolor(color); +} else { + tgi_setcolor(color % num_colors); +} +</verb></tscreen> +</descrip> +</quote> + + +<sect1>tgi_getdefpalette<label id="tgi_getdefpalette"><p> + +<quote> +<descrip> +<tag/Function/Get the palette installed by default. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/const unsigned char* tgi_getdefpalette (void);/ +<tag/Description/The tgi driver has a default palette that is active at startup. +The named colors TGI_COLOR_BLACK, TGI_COLOR_WHITE, TGI_COLOR_RED... need this +palette to work correctly. +<tag/Availability/cc65 +<tag/See also/Other tgi functions +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_geterror<label id="tgi_geterror"><p> + +<quote> +<descrip> +<tag/Function/Return the error code for the last operation. +This will also clear the error. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned char tgi_geterror (void);/ +<tag/Description/Return the error code for the last operation. +This will also clear the error. +<tag/Availability/cc65 +<tag/See also/Other tgi functions +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_geterrormsg<label id="tgi_geterrormsg"><p> + +<quote> +<descrip> +<tag/Function/Get an error message describing the error. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/const char* __fastcall__ tgi_geterrormsg (unsigned char code);/ +<tag/Description/Get an error message describing the error. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_getmaxcolor<label id="tgi_getmaxcolor"><p> + +<quote> +<descrip> +<tag/Function/Get the highest index of the palette. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned char tgi_getmaxcolor (void);/ +<tag/Description/Get the highest index of the palette. +<tag/Availability/cc65 +<tag/See also/<ref id="tgi_getcolor" name="tgi_getcolor()">, +<ref id="tgi_getcolorcount" name="tgi_getcolorcount()">, +<ref id="tgi_getdefpalette" name="tgi_getdefpalette()">, +<ref id="tgi_getpalette" name="tgi_getpalette()">, +<ref id="tgi_setcolor" name="tgi_setcolor()">, +<ref id="tgi_setpalette" name="tgi_setpalette()"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_getmaxx<label id="tgi_getmaxx"><p> + +<quote> +<descrip> +<tag/Function/Get the maximum x coordinate that can be used on this screen. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned tgi_getmaxx (void);/ +<tag/Description/Get the maximum x coordinate that can be used on this screen. +<tag/Availability/cc65 +<tag/See also/Other tgi functions +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_getmaxy<label id="tgi_getmaxy"><p> + +<quote> +<descrip> +<tag/Function/Get the maximum y coordinate that can be used on this screen. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned tgi_getmaxy (void);/ +<tag/Description/Get the maximum y coordinate that can be used on this screen. +<tag/Availability/cc65 +<tag/See also/Other tgi functions +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_getpagecount<label id="tgi_getpagecount"><p> + +<quote> +<descrip> +<tag/Function/Return the number of screen pages available. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned tgi_getpagecount (void);/ +<tag/Description/Return the number of screen pages available. +<tag/Availability/cc65 +<tag/See also/ +<ref id="tgi_setdrawpage" name="tgi_setdrawpage">, +<ref id="tgi_setviewpage" name="tgi_setviewpage"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_getpalette<label id="tgi_getpalette"><p> + +<quote> +<descrip> +<tag/Function/Get the palette installed. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/const unsigned char* tgi_getpalette (void);/ +<tag/Description/Get the palette installed. +<tag/Availability/cc65 +<tag/See also/Other tgi functions +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_getpixel<label id="tgi_getpixel"><p> + +<quote> +<descrip> +<tag/Function/Get the color of a pixel from the viewpage. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned char __fastcall__ tgi_getpixel (int x, int y);/ +<tag/Description/Get the color of a pixel from the viewpage. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_gettextheight<label id="tgi_gettextheight"><p> + +<quote> +<descrip> +<tag/Function/Calculate the height of the text in pixels according to +the current text style. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned __fastcall__ tgi_gettextheight (const char* s);/ +<tag/Description/Calculate the height of the text in pixels according to +the current text style. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_gettextwidth<label id="tgi_gettextwidth"><p> + +<quote> +<descrip> +<tag/Function/Calculate the width of the text in pixels according to the current text style. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned __fastcall__ tgi_gettextwidth (const char* s);/ +<tag/Description/Calculate the width of the text in pixels according to the current text style. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_getxres<label id="tgi_getxres"><p> + +<quote> +<descrip> +<tag/Function/Get number of horisontal pixels on the screen. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned tgi_getxres (void);/ +<tag/Description/Get number of horisontal pixels on the screen. +This is same as tgi_maxx()+1. +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_getyres<label id="tgi_getyres"><p> + +<quote> +<descrip> +<tag/Function/Get number of vertical pixels on the screen. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned tgi_getyres (void);/ +<tag/Description/Get number of vertical pixels on the screen. +This is same as tgi_maxy()+1. +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_gotoxy<label id="tgi_gotoxy"><p> + +<quote> +<descrip> +<tag/Function/Set graphics cursor at x, y. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_gotoxy (int x, int y);/ +<tag/Description/Set graphics cursor at x, y. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_init<label id="tgi_init"><p> + +<quote> +<descrip> +<tag/Function/Initialize the already loaded graphics driver. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void tgi_init (void);/ +<tag/Description/The tgi_init function will set the default palette to the +hardware. +<tag/Notes/<itemize> +<item><tt/tgi_init/ will not clear the screen. This allows switching between +text and graphics mode on platforms that have separate memory areas for the +screens. If you want the screen cleared, call <tt/<ref id="tgi_clear" +name="tgi_clear">/ after <tt/tgi_init/. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/<tscreen><verb> +tgi_install(tgi_static_stddrv); //Include the driver statically instead of loading it. +tgi_init(); //Set up the default palette and clear the screen. +</verb></tscreen> +</descrip> +</quote> + + +<sect1>tgi_install<label id="tgi_install"><p> + +<quote> +<descrip> +<tag/Function/Install an already loaded driver and return an error code. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned char __fastcall__ tgi_install (const void* driver);/ +<tag/Description/The function installs a driver that was already loaded into +memory (or linked statically to the program). It returns an error code +(<tt/TGI_ERR_OK/ in case of success). +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only be +used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="tgi_load_driver" name="tgi_load_driver">, +<ref id="tgi_uninstall" name="tgi_uninstall">, +<ref id="tgi_unload" name="tgi_unload"> +<tag/Example/<tscreen><verb> +tgi_install(tgi_static_stddrv); //Include the driver statically instead of loading it. +tgi_init(); //Set up the default palette and clear the screen. +</verb></tscreen> +</descrip> +</quote> + + +<sect1>tgi_install_vectorfont<label id="tgi_install_vectorfont"><p> + +<quote> +<descrip> +<tag/Function/Install an already loaded driver and return an error code. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_install_vectorfont (const tgi_vectorfont* font);/ +<tag/Description/ +Install a vector font for use. More than one vector font can be loaded, +but only one can be active. This function is used to tell which one. Call +with a NULL pointer to uninstall the currently installed font. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only be +used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="tgi_load_vectorfont" name="tgi_load_vectorfont">, +<ref id="tgi_free_vectorfont" name="tgi_free_vectorfont"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_ioctl<label id="tgi_ioctl"><p> + +<quote> +<descrip> +<tag/Function/Platform dependent code extensions. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/unsigned __fastcall__ tgi_ioctl (unsigned char code, void* data);/ +<tag/Description/Some platforms have extra display hardware that is not +supported by standard tgi functions. You can extend the driver to support +this extra hardware using tgi_ioctl functions. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +<item>These functions are not easily portable to other cc65 platforms. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/<tscreen><verb> +#define tgi_sprite(spr) tgi_ioctl(0, (void*)(spr)) +#define tgi_flip() tgi_ioctl(1, (void*)0) +#define tgi_setbgcolor(bgcol) tgi_ioctl(2, (void*)(bgcol)) +#define tgi_setframerate(rate) tgi_ioctl(3, (void*)(rate)) +#define tgi_busy() tgi_ioctl(4, (void*)0) +#define tgi_updatedisplay() tgi_ioctl(4, (void*)1) +if (!tgi_busy()) { + tgi_sprite(&background); + tgi_setcolor(TGI_COLOR_BLUE); + tgi_outttextxy(20,40,"Hello World"); + tgi_updatedisplay(); +} +</verb></tscreen> +</descrip> +</quote> + + +<sect1>tgi_line<label id="tgi_line"><p> + +<quote> +<descrip> +<tag/Function/Draw a line in the current drawing color. +The graphics cursor will be set to x2/y2 by this call. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_line (int x1, int y1, int x2, int y2);/ +<tag/Description/Draw a line in the current drawing color. +The graphics cursor will be set to x2/y2 by this call. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_lineto<label id="tgi_lineto"><p> + +<quote> +<descrip> +<tag/Function/Draw a line in the current drawing color from the graphics +cursor to the new end point. The graphics cursor will be updated to x2/y2. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_lineto (int x2, int y2);/ +<tag/Description/Draw a line in the current drawing color from the graphics +cursor to the new end point. The graphics cursor will be updated to x2/y2. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_load_driver<label id="tgi_load_driver"><p> + +<quote> +<descrip> +<tag/Function/Load and install the given driver. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_load_driver (const char *name);/ +<tag/Description/Load and install the driver by name. +Will just load the driver and check if loading was successful. +Will not switch to graphics mode. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_load_vectorfont<label id="tgi_load_vectorfont"><p> + +<quote> +<descrip> +<tag/Function/Load the given vector font. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/const tgi_vectorfont* __fastcall__ tgi_load_vectorfont (const char* name);/ +<tag/Description/ +Load a vector font into memory and return it. In case of errors, NULL is +returned and an error is set, which can be retrieved using tgi_geterror. +To use the font, it has to be installed using tgi_install_vectorfont. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="tgi_install_vectorfont" name="tgi_install_vectorfont">, +<ref id="tgi_free_vectorfont" name="tgi_free_vectorfont"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_outtext<label id="tgi_outtext"><p> + +<quote> +<descrip> +<tag/Function/Output text at the current graphics cursor position. +The graphics cursor is moved to the end of the text. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_outtext (const char* s);/ +<tag/Description/Output text at the current graphics cursor position. +The graphics cursor is moved to the end of the text. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_outtextxy<label id="tgi_outtextxy"><p> + +<quote> +<descrip> +<tag/Function/Output text at the given cursor position. +The graphics cursor is moved to the end of the text. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_outtextxy (int x, int y, const char* s);/ +<tag/Description/Output text at the given cursor position. +The graphics cursor is moved to the end of the text. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_pieslice<label id="tgi_pieslice"><p> + +<quote> +<descrip> +<tag/Function/Draw an elliptic pie slice in the current color. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_pie slice (int x, int y, +unsigned char rx, unsigned char ry, unsigned sa, unsigned ea);/ +<tag/Description/The function draws an elliptic pie slice with center at x/y +and radii rx/ry using the current drawing color. The pie slice covers the angle +between sa and ea (startangle and endangle), which must be in the range +0..360. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +<item>The function behaves unexpectedly or may crash if the angles are out +of range. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="tgi_bar" name="tgi_arc">, +<ref id="tgi_bar" name="tgi_bar">, +<ref id="tgi_circle" name="tgi_circle">, +<ref id="tgi_ellipse" name="tgi_ellipse">, +<ref id="tgi_setcolor" name="tgi_setcolor"> +<tag/Example/<tscreen><verb> +/* Draw the closed upper half of an ellipse */ +tgi_setcolor(TGI_COLOR_BLUE); +tgi_pieslice (50, 50, 40, 20, 0, 180); +</verb></tscreen> +</descrip> +</quote> + + +<sect1>tgi_setaspectratio<label id="tgi_setaspectratio"><p> + +<quote> <descrip> <tag/Function/Set the pixel aspect ratio. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_setaspectratio (unsigned ratio);/ +<tag/Description/The function sets the pixel aspect ratio for the current +driver and display. The argument is an 8.8 fixed point value. The aspect ratio +may be used to correct geometric shapes so they look correct on a given +display. As an example, a circle with a radius of 100 pixels may look elliptic +on some driver/display combinations if the aspect ratio is not 1.00. +<tag/Notes/<itemize> +<item>The aspect ratio is encoded in the TGI driver which assumes a "standard" +monitor for the given platform. The aspect ratio may be wrong if another +monitor is used. +<item>No TGI function will use the aspect ratio. It is up to the programmer to +make use of it. +<item>The <tt/tgi_setaspectratio/ function can be used to change the aspect +ratio for a loaded driver. The value is not reset by <ref id="tgi_init" +name="tgi_init">, so if a driver is linked statically to an application, +switching into and out of graphics mode will not restore the original aspect +ratio. +<item>The function is available only as a fastcall function; so, it may be used +only in the presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="tgi_getaspectratio" name="tgi_getaspectratio"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_setcolor<label id="tgi_setcolor"><p> + +<quote> +<descrip> +<tag/Function/Set color to be used in future draw operations. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_setcolor (unsigned char color);/ +<tag/Description/Set color to be used in future draw operations. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/<tscreen><verb> +tgi_setcolor(TGI_COLOR_BLACK); +tgi_bar(0,0,30,30); +tgi_setcolor(TGI_COLOR_WHITE); +tgi_bar(10,10,20,20); +</verb></tscreen> +</descrip> +</quote> + + +<sect1>tgi_setdrawpage<label id="tgi_setdrawpage"><p> + +<quote> +<descrip> +<tag/Function/Set the page for drawing. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_setdrawpage (unsigned char page);/ +<tag/Description/If the drawpage and the viewpage are the same then all drawing +is seen immediately as it is drawn. For double buffered games you can set the +drawpage to a different page than the viewpage. This lets you draw the next +screen in the background and when the screen is ready you display it. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/<tscreen><verb> +tgi_setdrawpage(1); +tgi_outtextxy(10, 10, "Hello World"); +tgi_setviewpage(1); // Show page 1 +tgi_setdrawpage(0); +tgi_outtextxy(10, 10, "Creating next frame"); +... +tgi_setviewpage(0); // Show page 0 +</verb></tscreen> +</descrip> +</quote> + + +<sect1>tgi_setpalette<label id="tgi_setpalette"><p> + +<quote> +<descrip> +<tag/Function/Set the palette (not available with all drivers/hardware). +Palette is a pointer to as many entries as there are colors. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_setpalette (const unsigned char* palette);/ +<tag/Description/Set the palette (not available with all drivers/hardware). +Palette is a pointer to as many entries as there are colors. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_setpixel<label id="tgi_setpixel"><p> + +<quote> +<descrip> +<tag/Function/Plot a pixel on the drawpage with the current color. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_setpixel (int x, int y);/ +<tag/Description/Plot a pixel on the drawpage with the current color. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_settextscale<label id="tgi_settextscale"><p> + +<quote> +<descrip> +<tag/Function/Set the scaling for text output. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_settextscale (unsigned width, unsigned height);/ +<tag/Description/ +Set the scaling for text output. The scaling factors for width and height +are 8.8 fixed point values. This means that $100 = 1 $200 = 2 etc. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="tgi_settextstyle" name="tgi_settextstyle"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_settextstyle<label id="tgi_settextstyle"><p> + +<quote> +<descrip> +<tag/Function/Set the style for text output. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_settextstyle (unsigned char magx, unsigned char magy, unsigned char dir, unsigned char font);/ +<tag/Description/Set the style for text output. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/ +<ref id="tgi_settextscale" name="tgi_settextscale"> +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_setviewpage<label id="tgi_setviewpage"><p> + +<quote> +<descrip> +<tag/Function/Set page to be visible on screen. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void __fastcall__ tgi_setviewpage (unsigned char page);/ +<tag/Description/If the drawpage and the viewpage are the same then all drawing +is seen immediately as it is drawn. For double buffered games you can set the +drawpage to a different page than the viewpage. This lets you draw the next +screen in the background and when the screen is ready you display it. +<tag/Notes/<itemize> +<item>The function is only available as fastcall function, so it may only +be used in presence of a prototype. +</itemize> +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/<tscreen><verb> +tgi_setdrawpage(1); +tgi_outtextxy(10, 10, "Hello World"); +tgi_setviewpage(1); // Show page 1 +tgi_setdrawpage(0); +tgi_outtextxy(10, 10, "Creating next frame"); +... +tgi_setviewpage(0); // Show page 0 +</verb></tscreen> +</descrip> +</quote> + + +<sect1>tgi_uninstall<label id="tgi_uninstall"><p> + +<quote> +<descrip> +<tag/Function/Uninstall the currently loaded driver but do not unload it. +Will call tgi_done if necessary. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void tgi_uninstall (void);/ +<tag/Description/Uninstall the currently loaded driver but do not unload it. +Will call tgi_done if necessary. +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +<sect1>tgi_unload<label id="tgi_unload"><p> + +<quote> +<descrip> +<tag/Function/Uninstall, then unload the currently loaded driver. +Will call tgi_done if necessary. +<tag/Header/<tt/<ref id="tgi.h" name="tgi.h">/ +<tag/Declaration/<tt/void tgi_unload (void);/ +<tag/Description/Uninstall, then unload the currently loaded driver. +Will call tgi_done if necessary. +<tag/Availability/cc65 +<tag/See also/Other tgi functions. +<tag/Example/None. +</descrip> +</quote> + + +</article> diff --git a/doc/using-make.sgml b/doc/using-make.sgml index 0c3c13a6e..9898e9626 100644 --- a/doc/using-make.sgml +++ b/doc/using-make.sgml @@ -1,10 +1,8 @@ <!doctype linuxdoc system> <article> - <title>Using GNU Make with cc65 <author><url url="mailto:ol.sc@web.de" name="Oliver Schmidt"> -<date>2014-04-12 <abstract> How to build your program using the GNU Make utility. @@ -58,7 +56,7 @@ SOURCES = foo.c bar.c PROGRAM = foobar ifdef CC65_TARGET -CC = $(CC65_HOME)/bin/cl65 +CC = cl65 CFLAGS = -t $(CC65_TARGET) --create-dep $(<:.c=.d) -O LDFLAGS = -t $(CC65_TARGET) -m $(PROGRAM).map else @@ -78,18 +76,18 @@ ifneq ($(MAKECMDGOALS),clean) endif %.o: %.c - $(CC) -c $(CFLAGS) -o $@ $< + $(CC) -c $(CFLAGS) -o $@ $< $(PROGRAM): $(SOURCES:.c=.o) - $(CC) $(LDFLAGS) -o $@ $^ + $(CC) $(LDFLAGS) -o $@ $^ clean: - $(RM) $(SOURCES:.c=.o) $(SOURCES:.c=.d) $(PROGRAM) $(PROGRAM).map + $(RM) $(SOURCES:.c=.o) $(SOURCES:.c=.d) $(PROGRAM) $(PROGRAM).map </verb></tscreen> <bf/Important:/ When using the sample Makefile above via copy & paste it is -necessary to replace the eight spaces at the beginning of command lines (lines -26, 29 and 32) with a tab character (ASCII code 9). +important to make sure that command lines (lines 26, 29 and 32) start +with a tab character (ASCII code 9). <sect1>Invoking the sample Makefile<p> @@ -104,12 +102,6 @@ best done on the GNU Make command line like this: make CC65_TARGET=c64 </verb></tscreen> -The sample Makefile presumes the variable <tt/CC65_HOME/ to point to the -directory cc65 is located in. Again there are several ways to define this -variable but as its value typically won't change often it is best done as an -environment variable. On Windows the cc65 .exe installer package takes care -of creating a <tt/CC65_HOME/ environment variable. - <sect1>Understanding the sample Makefile<p> @@ -127,7 +119,7 @@ The recommended way to use GNU Make on Windows is to install it as part of a Cygwin environment. For more information see the Cygwin home page: <url url="http://www.cygwin.com/"> - + If however installing Cygwin shouldn't be an option for one or the other reason then the sample Makefile may be invoked from the Windows Command Prompt (cmd.exe) by downloading the following programs: @@ -140,17 +132,17 @@ by downloading the following programs: <sect>Target-specific Variable Values<p> - + The very limited resources of the cc65 target machines now and then require manual optimization of the build process by compiling individual source files with different compiler options. GNU Make offers <url url="http://www.gnu.org/software/make/manual/html_node/Target_002dspecific.html" name="Target-specific Variable Values"> -perfectly suited for doing so. For example placing the code of the two modules +perfectly suited for doing so. For example placing the code of the two modules <tt/foo/ and <tt/bar/ in the segment <tt/FOOBAR/ can be achieved with this target-specific variable definition: <tscreen><verb> foo.o bar.o: CFLAGS += --code-name FOOBAR </verb></tscreen> - + </article> diff --git a/doc/vic20.sgml b/doc/vic20.sgml index 5fba59a13..0a6e85d4a 100644 --- a/doc/vic20.sgml +++ b/doc/vic20.sgml @@ -1,12 +1,10 @@ <!doctype linuxdoc system> <article> - -<title>Commodore VIC20 (aka VC20) specific information for cc65 +<title>Commodore VIC20 (aka VC20 aka VIC1001) specific information for cc65 <author> <url url="mailto:uz@cc65.org" name="Ullrich von Bassewitz">,<newline> <url url="mailto:polluks@sdf.lonestar.org" name="Stefan A. Haubenthal"> -<date>2014-04-12 <abstract> An overview over the VIC20 runtime system as it is implemented for the cc65 C @@ -77,7 +75,6 @@ common to all CBM platforms. There are currently no special VIC20 functions. - <sect1>CBM-specific functions<p> Some functions are available for all (or at least most) of the Commodore @@ -99,6 +96,8 @@ declaration and usage. <item>cbm_k_basin <item>cbm_k_bsout <item>cbm_k_clrch +<item>cbm_k_tksa +<item>cbm_k_second <item>cbm_load <item>cbm_open <item>cbm_opendir @@ -107,6 +106,7 @@ declaration and usage. <item>cbm_save <item>cbm_write <item>get_tv +<item>waitvsync </itemize> @@ -142,12 +142,50 @@ The names in the parentheses denote the symbols to be used for static linking of <sect1>Graphics drivers<p> -No graphics drivers are currently available for the VIC20. +<descrip> + + <tag><tt/vic20-hi.tgi (vic20_hi_tgi)/</tag> + This driver features a resolution of 160×192 with two colors. The + background can be chosen from a sixteen-color palette. The foreground can + be chosen from an eight-color palette. + + The driver will use memory from addresses $1000 to $1FFF as a graphics + buffer. Therefore, the VIC-20 must have, at least, 8K of expansion RAM. + + Programs that use this driver must be linked by the <tt/vic20-tgi.cfg/ + configuration file. It will link a special header into the program. + That header will do the housekeeping that's needed by TGI. + + An example command line: + <tscreen><verb> + cl65 -D DYN_DRV=0 -t vic20 -C vic20-tgi.cfg samples/mandelbrot.c + </verb></tscreen> + + When the program starts, it will move itself up in RAM, to make room for the + buffer. When the program finishes, it will reset the BASIC interpreter. + That means that graphics pictures won't be preserved between the executions + of programs. Also, the graphics buffer shares RAM with the text screen. If + a picture must be saved, then a program must put it somewhere else (such as + a disk file) before returning to the text mode. + +</descrip> <sect1>Extended memory drivers<p> -No extended memory drivers are currently available for the VIC20. +<descrip> + + <tag><tt/vic20-rama.emd (vic20_rama_emd)/</tag> + A driver for any RAM at $A000-$BFFF. Supports 32 256 byte pages. + Written and contributed by Marco van den Heuvel. + + <tag><tt/vic20-georam.emd (vic20_georam_emd)/</tag> + A driver for the Berkeley Softworks GeoRam cartridge connected by means of + the MasC=erade c64 cartridge adapter. The driver will determine the + available RAM from the connected cartridge. It supports 64KB + up to 2048KB of RAM. + +</descrip><p> <sect1>Joystick drivers<p> @@ -161,8 +199,9 @@ The default drivers, <tt/joy_stddrv (joy_static_stddrv)/, point to <tt/vic20-std <tag><tt/vic20-ptvjoy.joy (vic20_ptvjoy_joy)/</tag> Driver for the Protovision 4-player adapter contributed by Groepaz. See - <url url="http://www.protovision-online.de/hardw/hardwstart.htm"> for prices and - building instructions. Up to three joysticks are supported. + <url url="https://www.protovision.games/hardw/4_player.php" + name="the Protovision shop"> for prices and building instructions. Up to three + joysticks are supported. </descrip><p> @@ -181,13 +220,14 @@ No VIC1011 drivers are currently available for the VIC20. <sect>Limitations<p> - -<sect>Other hints<p> - - <sect1>Escape code<p> -For an Esc, press CTRL and the <tt/[/ key. +The CTRL key cannot be used to type most control characters, +entering an Esc is not possible. + + + +<sect>Other hints<p> <sect1>Passing arguments to the program<p> @@ -218,8 +258,7 @@ The program return code (low byte) is passed back to BASIC by use of the <sect1>Using extended memory<p> -The extended memory at $A000 may be added to the heap by using the following -code: +BLK5 memory may be added to the heap by using the following code: <tscreen><verb> /* Check for the existence of RAM */ @@ -251,14 +290,14 @@ including commercial applications, and to alter it and redistribute it freely, subject to the following restrictions: <enum> -<item> The origin of this software must not be misrepresented; you must not - claim that you wrote the original software. If you use this software - in a product, an acknowledgment in the product documentation would be - appreciated but is not required. -<item> Altered source versions must be plainly marked as such, and must not - be misrepresented as being the original software. -<item> This notice may not be removed or altered from any source - distribution. +<item> The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. +<item> Altered source versions must be plainly marked as such, and must not + be misrepresented as being the original software. +<item> This notice may not be removed or altered from any source + distribution. </enum> </article> diff --git a/include/6502.h b/include/6502.h index 6c104c83a..4a27b706e 100644 --- a/include/6502.h +++ b/include/6502.h @@ -50,6 +50,12 @@ typedef unsigned size_t; #define CPU_6502 0 #define CPU_65C02 1 #define CPU_65816 2 +#define CPU_4510 3 +#define CPU_65SC02 4 +#define CPU_65CE02 5 +#define CPU_HUC6280 6 +#define CPU_2A0x 7 +#define CPU_45GS02 8 unsigned char getcpu (void); /* Detect the CPU the program is running on */ diff --git a/include/_antic.h b/include/_antic.h index ab0cd9664..742237332 100644 --- a/include/_antic.h +++ b/include/_antic.h @@ -5,9 +5,20 @@ /* Internal include file, do not use directly */ /* */ /* */ +/* "ANTIC, Alphanumeric Television Interface Controller, is responsible for */ +/* the generation of playfield graphics which is delivered as a datastream */ +/* to the related CTIA/GTIA chip. The CTIA/GTIA provides the coloring of the */ +/* playfield graphics, and is responsible for adding overlaid sprite */ +/* (referred to as "Player/Missile graphics" by Atari). Atari advertised it */ +/* as a true microprocessor, in that it has an instruction set to run */ +/* programs (called display lists) to process data. ANTIC has no capacity */ +/* for writing back computed values to memory, it merely reads data from */ +/* memory and processes it for output to the screen, therefore it is not */ +/* Turing complete." - Wikipedia article on "ANTIC" (with edits) */ /* */ /* (C) 2000 Freddy Offenga <taf_offenga@yahoo.com> */ /* 24-Jan-2011: Christian Krueger: Added defines for Antic instruction set */ +/* 2019-01-16: Bill Kendrick <nbs@sonic.net>: More defines for registers */ /* */ /* */ /* This software is provided 'as-is', without any expressed or implied */ @@ -33,66 +44,211 @@ #ifndef __ANTIC_H #define __ANTIC_H -/* Define a structure with the antic register offsets */ +/*****************************************************************************/ +/* Define a structure with the ANTIC coprocessor's register offsets */ +/*****************************************************************************/ + struct __antic { - unsigned char dmactl; /* direct memory access control */ - unsigned char chactl; /* character mode control */ + unsigned char dmactl; /* (W) direct memory access control */ + unsigned char chactl; /* (W) character mode control */ unsigned char dlistl; /* display list pointer low-byte */ unsigned char dlisth; /* display list pointer high-byte */ - unsigned char hscrol; /* horizontal scroll enable */ - unsigned char vscrol; /* vertical scroll enable */ + unsigned char hscrol; /* (W) horizontal scroll enable */ + unsigned char vscrol; /* (W) vertical scroll enable */ unsigned char unuse0; /* unused */ - unsigned char pmbase; /* msb of p/m base address */ + unsigned char pmbase; /* (W) msb of p/m base address (for when DMACTL has player and/or missile DMA enabled) */ unsigned char unuse1; /* unused */ - unsigned char chbase; /* character base address */ - unsigned char wsync; /* wait for horizontal synchronization */ - unsigned char vcount; /* vertical line counter */ - unsigned char penh; /* light pen horizontal position */ - unsigned char penv; /* light pen vertical position */ - unsigned char nmien; /* non-maskable interrupt enable */ - unsigned char nmires; /* nmi reset/status */ + unsigned char chbase; /* (W) msb of character set base address */ + unsigned char wsync; /* (W) wait for horizontal synchronization */ + unsigned char vcount; /* (R) vertical line counter */ + unsigned char penh; /* (R) light pen horizontal position */ + unsigned char penv; /* (R) light pen vertical position */ + unsigned char nmien; /* (W) non-maskable interrupt enable */ + union { + /* (W) ("NMIRES") nmi reset -- clears the interrupt request register; + ** resets all of the NMI status together + */ + unsigned char nmires; + + /* (R) ("NMIST") nmi status -- holds cause for the NMI interrupt */ + unsigned char nmist; + }; }; -/* antic instruction set */ +/*****************************************************************************/ +/* DMACTL register options */ +/*****************************************************************************/ -/* absolute instructions (non mode lines) */ -#define DL_JMP 1 -#define DL_JVB 65 +/* Initialized to 0x22: DMA fetch, normal playfield, no PMG DMA, double-line PMGs */ -#define DL_BLK1 0 -#define DL_BLK2 16 -#define DL_BLK3 32 -#define DL_BLK4 48 -#define DL_BLK5 64 -#define DL_BLK6 80 -#define DL_BLK7 96 -#define DL_BLK8 112 +/* Playfield modes: */ +#define DMACTL_PLAYFIELD_NONE 0x00 +#define DMACTL_PLAYFIELD_NARROW 0x01 /* e.g., 32 bytes per scanline with thick borders */ +#define DMACTL_PLAYFIELD_NORMAL 0x02 /* e.g., 40 bytes per scanline with normal borders */ +#define DMACTL_PLAYFIELD_WIDE 0x03 /* e.g., 48 bytes per scanline with no borders (overscan) */ -/* absolute instructions (mode lines) */ -#define DL_CHR40x8x1 2 /* monochrome, 40 character & 8 scanlines per mode line (GR. 0) */ -#define DL_CHR40x10x1 3 /* monochrome, 40 character & 10 scanlines per mode line */ -#define DL_CHR40x8x4 4 /* colour, 40 character & 8 scanlines per mode line (GR. 12) */ -#define DL_CHR40x16x4 5 /* colour, 40 character & 16 scanlines per mode line (GR. 13) */ -#define DL_CHR20x8x2 6 /* colour (duochrome per character), 20 character & 8 scanlines per mode line (GR. 1) */ -#define DL_CHR20x16x2 7 /* colour (duochrome per character), 20 character & 16 scanlines per mode line (GR. 2) */ +/* Other options: */ -#define DL_MAP40x8x4 8 /* colour, 40 pixel & 8 scanlines per mode line (GR. 3) */ -#define DL_MAP80x4x2 9 /* 'duochrome', 80 pixel & 4 scanlines per mode line (GR.4) */ -#define DL_MAP80x4x4 10 /* colour, 80 pixel & 4 scanlines per mode line (GR.5) */ -#define DL_MAP160x2x2 11 /* 'duochrome', 160 pixel & 2 scanlines per mode line (GR.6) */ -#define DL_MAP160x1x2 12 /* 'duochrome', 160 pixel & 1 scanline per mode line (GR.14) */ -#define DL_MAP160x2x4 13 /* 4 colours, 160 pixel & 2 scanlines per mode line (GR.7) */ -#define DL_MAP160x1x4 14 /* 4 colours, 160 pixel & 1 scanline per mode line (GR.15) */ -#define DL_MAP320x1x1 15 /* monochrome, 320 pixel & 1 scanline per mode line (GR.8) */ +/* If not set, GTIA's GRAFP0 thru GRAFP3, and/or GRAFM registers are used for +** player & missile shapes, respectively. (Modify the registers during the horizontal blank +** (Display List Interrupt), a la "racing the beam" on an Atari VCS/2600, ) +** if set, ANTIC's PMBASE will be used to fetch shapes from memory via DMA. +*/ +#define DMACTL_DMA_MISSILES 0x04 +#define DMACTL_DMA_PLAYERS 0x08 -/* modifiers on mode lines */ -#define DL_HSCROL 16 -#define DL_VSCROL 32 -#define DL_LMS 64 +/* Unless set, PMGs (as fetched via DMA) will be double-scanline resolution */ +#define DMACTL_PMG_SINGLELINE 0x10 + +/* Unless set, ANTIC operation is disabled, since it cannot fetch +** Display List instructions +*/ +#define DMACTL_DMA_FETCH 0x20 + + +/*****************************************************************************/ +/* CHACTL register options */ +/*****************************************************************************/ + +/* Initialized to 2 (CHACTL_CHAR_NORMAL | CHACTL_INV_PRESENT) */ + +/* Inverted (upside-down) characters */ +#define CHACTL_CHAR_NORMAL 0x00 +#define CHACTL_CHAR_INVERTED 0x04 + +/* Inverse (reverse-video) characters */ +#define CHACTL_INV_TRANS 0x00 /* chars with high-bit shown */ +#define CHACTL_INV_OPAQUE 0x01 /* chars with high-bit appear as space */ +#define CHACTL_INV_PRESENT 0x02 /* chars with high-bit are reverse-video */ + + +/*****************************************************************************/ +/* Values for NMIEN (enabling interrupts) & NMIST (cause for the interrupt) */ +/*****************************************************************************/ + +/* Display List Interrupts +** Called on a modeline when "DL_DLI" bit is set the ANTIC instruction, +** and jumps through VDSLST vector. +*/ +#define NMIEN_DLI 0x80 + +/* Vertical Blank Interrupt +** Called during every vertical blank; see SYSVBV, VVBLKI, CRITIC, and VVBLKD, +** as well as the SETVBV routine. +*/ +#define NMIEN_VBI 0x40 + +/* [Reset] key pressed */ +#define NMIEN_RESET 0x20 + + +/*****************************************************************************/ +/* ANTIC instruction set */ +/*****************************************************************************/ + +/* Absolute instructions (non mode lines) */ +#define DL_JMP ((unsigned char) 1) +#define DL_JVB ((unsigned char) 65) + +#define DL_BLK1 ((unsigned char) 0) /* 1 blank scanline */ +#define DL_BLK2 ((unsigned char) 16) /* 2 blank scanlines */ +#define DL_BLK3 ((unsigned char) 32) /* ...etc. */ +#define DL_BLK4 ((unsigned char) 48) +#define DL_BLK5 ((unsigned char) 64) +#define DL_BLK6 ((unsigned char) 80) +#define DL_BLK7 ((unsigned char) 96) +#define DL_BLK8 ((unsigned char) 112) + + +/* Absolute instructions (mode lines) */ + +/* Note: Actual width varies (e.g., 40 vs 32 vs 48) depending on +** normal vs narrow vs wide (overscan) playfield setting; see DMACTL +*/ + +/* Character modes (text, tile graphics, etc.) */ + +/* monochrome, 40 character & 8 scanlines per mode line (aka Atari BASIC GRAPHICS 0 via OS's CIO routines) */ +#define DL_CHR40x8x1 ((unsigned char) 2) + +/* monochrome, 40 character & 10 scanlines per mode line (like GR. 0, with descenders) */ +#define DL_CHR40x10x1 ((unsigned char) 3) + +/* colour, 40 character & 8 scanlines per mode line (GR. 12) */ +#define DL_CHR40x8x4 ((unsigned char) 4) + +/* colour, 40 character & 16 scanlines per mode line (GR. 13) */ +#define DL_CHR40x16x4 ((unsigned char) 5) + +/* colour (duochrome per character), 20 character & 8 scanlines per mode line (GR. 1) */ +#define DL_CHR20x8x2 ((unsigned char) 6) + +/* colour (duochrome per character), 20 character & 16 scanlines per mode line (GR. 2) */ +#define DL_CHR20x16x2 ((unsigned char) 7) + + +/* Bitmap modes */ + +/* colour, 40 pixel & 8 scanlines per mode line (GR. 3) */ +#define DL_MAP40x8x4 ((unsigned char) 8) + +/* 'duochrome', 80 pixel & 4 scanlines per mode line (GR.4) */ +#define DL_MAP80x4x2 ((unsigned char) 9) + +/* colour, 80 pixel & 4 scanlines per mode line (GR.5) */ +#define DL_MAP80x4x4 ((unsigned char) 10) + +/* 'duochrome', 160 pixel & 2 scanlines per mode line (GR.6) */ +#define DL_MAP160x2x2 ((unsigned char) 11) + +/* 'duochrome', 160 pixel & 1 scanline per mode line (GR.14) */ +#define DL_MAP160x1x2 ((unsigned char) 12) + +/* 4 colours, 160 pixel & 2 scanlines per mode line (GR.7) */ +#define DL_MAP160x2x4 ((unsigned char) 13) + +/* 4 colours, 160 pixel & 1 scanline per mode line (GR.15) */ +#define DL_MAP160x1x4 ((unsigned char) 14) + +/* monochrome, 320 pixel & 1 scanline per mode line (GR.8) */ +#define DL_MAP320x1x1 ((unsigned char) 15) + + +/* Equivalents, for people familiar with Atari 8-bit OS */ + +#define DL_GRAPHICS0 DL_CHR40x8x1 +#define DL_GRAPHICS1 DL_CHR20x8x2 +#define DL_GRAPHICS2 DL_CHR20x16x2 +#define DL_GRAPHICS3 DL_MAP40x8x4 +#define DL_GRAPHICS4 DL_MAP80x4x2 +#define DL_GRAPHICS5 DL_MAP80x4x4 +#define DL_GRAPHICS6 DL_MAP160x2x2 +#define DL_GRAPHICS7 DL_MAP160x2x4 +#define DL_GRAPHICS8 DL_MAP320x1x1 +#define DL_GRAPHICS9 DL_MAP320x1x1 /* N.B.: GRAPHICS 9, 10, and 11 also involve GTIA's PRIOR register */ +#define DL_GRAPHICS10 DL_MAP320x1x1 +#define DL_GRAPHICS11 DL_MAP320x1x1 +#define DL_GRAPHICS12 DL_CHR40x8x4 /* N.B.: Atari 400/800 OS didn't have GRAPHICS 12 or 13 */ +#define DL_GRAPHICS13 DL_CHR40x16x4 +#define DL_GRAPHICS14 DL_MAP160x1x2 +#define DL_GRAPHICS15 DL_MAP160x1x4 + +/* Atari 400/800 OS didn't have GRAPHICS 14 or 15, so they were known by "6+" and "7+" */ +#define DL_GRAPHICS6PLUS DL_GRAPHICS14 +#define DL_GRAPHICS7PLUS DL_GRAPHICS15 + +/* Neither Atari 400/800 nor XL OS supported 10-scanline (descenders) text mode via CIO */ +#define DL_GRAPHICS0_DESCENDERS DL_CHR40x10x1 + +/* Modifiers to mode lines */ +#define DL_HSCROL(x) ((unsigned char)((x) | 16)) /* enable smooth horizontal scrolling on this line; see HSCROL */ +#define DL_VSCROL(x) ((unsigned char)((x) | 32)) /* enable smooth vertical scrolling on this line; see VSCROL */ +#define DL_LMS(x) ((unsigned char)((x) | 64)) /* Load Memory Scan (next two bytes must be the LSB/MSB of the data to load) */ + +/* General modifier */ +#define DL_DLI(x) ((unsigned char)((x) | 128)) /* enable Display List Interrupt on this mode line */ -/* general modifier */ -#define DL_DLI 128 /* End of _antic.h */ #endif /* #ifndef __ANTIC_H */ diff --git a/include/_atari5200os.h b/include/_atari5200os.h new file mode 100644 index 000000000..5bba43016 --- /dev/null +++ b/include/_atari5200os.h @@ -0,0 +1,80 @@ +/*****************************************************************************/ +/* */ +/* _atari5200os.h */ +/* */ +/* Internal include file, do not use directly */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + +#ifndef __ATARI5200OS_H +#define __ATARI5200OS_H + + +struct __os { + + /*Page zero*/ + unsigned char pokmsk; // = $00 System mask for POKEY IRQ enable + unsigned char rtclok[2]; // = $01,$02 Real time clock + unsigned char critic; // = $03 Critical section flag + unsigned char atract; // = $04 Attract mode counter + + union { + struct { + unsigned char sdlstl; // = $05 Save display list LO + unsigned char sdlsth; // = $06 Save display list HI + }; + void* sdlst; // = $05,$06 Display list shadow + }; + + unsigned char sdmctl; // = $07 DMACTL shadow + unsigned char pcolr0; // = $08 PM color 0 + unsigned char pcolr1; // = $09 PM color 1 + unsigned char pcolr2; // = $0A PM color 2 + unsigned char pcolr3; // = $0B PM color 3 + unsigned char color0; // = $0C PF color 0 + unsigned char color1; // = $0D PF color 1 + unsigned char color2; // = $0E PF color 2 + unsigned char color3; // = $0F PF color 3 + unsigned char color4; // = $10 PF color 4 + unsigned char _free_1[0xEF]; // = $11-$FF User space + + /*Stack*/ + unsigned char stack[0x100]; // = $100-$1FF Stack + + /*Page 2 OS variables*/ + void (*vinter)(void); // = $200 Immediate IRQ vector + void (*vvblki)(void); // = $202 Immediate VBI vector + void (*vvblkd)(void); // = $204 Deferred VBI vector + void (*vdslst)(void); // = $206 DLI vector + void (*vkeybd)(void); // = $208 Keyboard IRQ vector + void (*vkeypd)(void); // = $20A Keyboard continuation vector + void (*vbrkky)(void); // = $20C Break key interrupt vector + void (*vbreak)(void); // = $20E BRK instruction interrupt vector + void (*vserin)(void); // = $210 Serial input ready vector + void (*vseror)(void); // = $212 Serial output data needed vector + void (*vseroc)(void); // = $214 Serial output completed vector + void (*vtimr1)(void); // = $216 POKEY timer 1 IRQ vector + void (*vtimr2)(void); // = $218 POKEY timer 2 IRQ vector + void (*vtimr4)(void); // = $21A POKEY timer 4 IRQ vector + +}; + +#endif diff --git a/include/_atarios.h b/include/_atarios.h new file mode 100644 index 000000000..ec33b98c9 --- /dev/null +++ b/include/_atarios.h @@ -0,0 +1,661 @@ +/*****************************************************************************/ +/* */ +/* _atarios.h */ +/* */ +/* Internal include file, do not use directly */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + +#ifndef __ATARIOS_H +#define __ATARIOS_H + + +/* IOCB Command Codes */ + +#define IOCB_OPEN 0x03 /* open */ +#define IOCB_GETREC 0x05 /* get record */ +#define IOCB_GETCHR 0x07 /* get character(s) */ +#define IOCB_PUTREC 0x09 /* put record */ +#define IOCB_PUTCHR 0x0B /* put character(s) */ +#define IOCB_CLOSE 0x0C /* close */ +#define IOCB_STATIS 0x0D /* status */ +#define IOCB_SPECIL 0x0E /* special */ +#define IOCB_DRAWLN 0x11 /* draw line */ +#define IOCB_FILLIN 0x12 /* draw line with right fill */ +#define IOCB_RENAME 0x20 /* rename disk file */ +#define IOCB_DELETE 0x21 /* delete disk file */ +#define IOCB_LOCKFL 0x23 /* lock file (set to read-only) */ +#define IOCB_UNLOCK 0x24 /* unlock file */ +#define IOCB_POINT 0x25 /* point sector */ +#define IOCB_NOTE 0x26 /* note sector */ +#define IOCB_GETFL 0x27 /* get file length */ +#define IOCB_CHDIR_MYDOS 0x29 /* change directory (MyDOS) */ +#define IOCB_MKDIR 0x2A /* make directory (MyDOS/SpartaDOS) */ +#define IOCB_RMDIR 0x2B /* remove directory (SpartaDOS) */ +#define IOCB_CHDIR_SPDOS 0x2C /* change directory (SpartaDOS) */ +#define IOCB_GETCWD 0x30 /* get current directory (MyDOS/SpartaDOS) */ +#define IOCB_FORMAT 0xFE /* format */ + + +/* Device control block */ + +struct __dcb { + unsigned char ddevic; /* device id */ + unsigned char dunit; /* unit number */ + unsigned char dcomnd; /* command */ + unsigned char dstats; /* command type / status return */ + void *dbuf; /* pointer to buffer */ + unsigned char dtimlo; /* device timeout in seconds */ + unsigned char dunuse; /* - unused - */ + unsigned int dbyt; /* # of bytes to transfer */ + union { + struct { + unsigned char daux1; /* 1st command auxiliary byte */ + unsigned char daux2; /* 2nd command auxiliary byte */ + }; + unsigned int daux; /* auxiliary as word */ + }; +}; + +typedef struct __dcb dcb_t; + + +/* I/O control block */ + +struct __iocb { + unsigned char handler; /* handler index number (0xff free) */ + unsigned char drive; /* device number (drive) */ + unsigned char command; /* command */ + unsigned char status; /* status of last operation */ + void* buffer; /* pointer to buffer */ + void* put_byte; /* pointer to device's PUT BYTE routine */ + unsigned int buflen; /* length of buffer */ + unsigned char aux1; /* 1st auxiliary byte */ + unsigned char aux2; /* 2nd auxiliary byte */ + unsigned char aux3; /* 3rd auxiliary byte */ + unsigned char aux4; /* 4th auxiliary byte */ + unsigned char aux5; /* 5th auxiliary byte */ + unsigned char spare; /* spare byte */ +}; + +typedef struct __iocb iocb_t; + + +/* DOS 2.x zeropage variables */ + +struct __dos2x { + unsigned char* zbufp; /* points to user filename */ + unsigned char* zdrva; /* points to serveral buffers (mostly VTOC) */ + unsigned char* zsba; /* points to sector buffer */ + unsigned char errno; /* number of occurred error */ +}; + +typedef struct __dos2x dos2x_t; + + +/* A single device handler formed by it's routines */ + +struct __devhdl { + void *open; /* address of OPEN routine -1 */ + void *close; /* address of CLOSE routine -1 */ + void *get; /* address of GET BYTE routine -1 */ + void *put; /* address of PUT BYTE routine -1 */ + void *status; /* address of GET STATUS routine -1 */ + void *special; /* address od SPECIAL routine -1 */ + unsigned char jmp_inst; /* a "JMP" byte, should be $4C */ + void (*init)(void); /* init routine (JMP INIT) */ + unsigned char reserved; /* unused */ +}; + +typedef struct __devhdl devhdl_t; + + +/* List of device handlers, as managed in HATABS */ + +struct __hatabs { + unsigned char id; /* ATASCII code of handler e.g. 'C','D','E','K','P','S','R' */ + devhdl_t* devhdl; /* Pointer to routines of device */ +}; + +typedef struct __hatabs hatabs_t; + + +/* Floating point register */ + +struct __fpreg { +#ifdef OS_REV2 + unsigned char fr; + unsigned char frm[5]; /* 5-byte register mantissa */ +#else + unsigned char fr[6]; /* 6 bytes for single register */ +#endif +}; + +typedef struct __fpreg fpreg_t; + +enum { /* enum for access of floating point registers */ + FPIDX_R0 = 0, /* (to use as index) */ + FPIDX_RE = 1, + FPIDX_R1 = 2, + FPIDX_R2 = 3 +}; + + +/* Define a structure with atari os register offsets */ + +struct __os { + + // --- Zero-Page --- + +#ifdef OSA + unsigned char* linzbs; // = $00/$01 LINBUG RAM (WILL BE REPLACED BY MONITOR RAM) +#else + unsigned char linflg; // = $00 LNBUG FLAG (0 = NOT LNBUG) + unsigned char ngflag; // = $01 MEMORY STATUS (0 = FAILURE) +#endif + unsigned char* casini; // = $02/$03 CASSETTE INIT LOCATION + unsigned char* ramlo; // = $04/$05 RAM POINTER FOR MEMORY TEST + +#ifdef OSA + unsigned char tramsz; // = $06 FLAG FOR LEFT CARTRIDGE + unsigned char tstdat; // = $07 FLAG FOR RIGHT CARTRIDGE +#else + unsigned char trnsmz; // = $06 TEMPORARY REGISTER FOR RAM SIZE + unsigned char tstdat; // = $07 UNUSED (NOT TOUCHED DURING RESET/COLD START) +#endif + + // Cleared upon Coldstart only + + unsigned char warmst; // = $08 WARM START FLAG + unsigned char bootq; // = $09 SUCCESSFUL BOOT FLAG + void (*dosvec)(void); // = $0A/$0B DISK SOFTWARE START VECTOR + void (*dosini)(void); // = $0C/$0D DISK SOFTWARE INIT ADDRESS + unsigned char* appmhi; // = $0E/$0F APPLICATIONS MEMORY HI LIMIT + + // Cleared upon Coldstart or Warmstart + + unsigned char pokmsk; // = $10 SYSTEM MASK FOR POKEY IRQ ENABLE + unsigned char brkkey; // = $11 BREAK KEY FLAG + unsigned char rtclok[3]; // = $12-$14 REAL TIME CLOCK (IN 16 MSEC UNITS) + unsigned char* bufadr; // = $15/$16 INDIRECT BUFFER ADDRESS REGISTER + unsigned char iccomt; // = $17 COMMAND FOR VECTOR + unsigned char* dskfms; // = $18/$19 DISK FILE MANAGER POINTER + unsigned char* dskutl; // = $1A/$1B DISK UTILITIES POINTER +#ifdef OSA + unsigned char ptimot; // = $1C PRINTER TIME OUT REGISTER + unsigned char pbpnt; // = $1D PRINT BUFFER POINTER + unsigned char pbufsz; // = $1E PRINT BUFFER SIZE + unsigned char ptemp; // = $1F TEMPORARY REGISTER +#else + unsigned char abufpt[4]; // = $1C-$1F ACMI BUFFER POINTER AREA +#endif + iocb_t ziocb; // = $20-$2F ZERO PAGE I/O CONTROL BLOCK + + unsigned char status; // = $30 INTERNAL STATUS STORAGE + unsigned char chksum; // = $31 CHECKSUM (SINGLE BYTE SUM WITH CARRY) + unsigned char* bufr; // = $32/$33 POINTER TO DATA BUFFER + unsigned char* bfen; // = $34/$35 NEXT BYTE PAST END OF THE DATA BUFFER LO +#ifdef OSA + unsigned char cretry; // = $36 NUMBER OF COMMAND FRAME RETRIES + unsigned char dretry; // = $37 NUMBER OF DEVICE RETRIES +#else + unsigned int ltemp; // = $36/$37 LOADER TEMPORARY +#endif + unsigned char bufrfl; // = $38 DATA BUFFER FULL FLAG + unsigned char recvdn; // = $39 RECEIVE DONE FLAG + unsigned char xmtdon; // = $3A TRANSMISSION DONE FLAG + unsigned char chksnt; // = $3B CHECKSUM SENT FLAG + unsigned char nocksm; // = $3C NO CHECKSUM FOLLOWS DATA FLAG + unsigned char bptr; // = $3D CASSETTE BUFFER POINTER + unsigned char ftype; // = $3E CASSETTE IRG TYPE + unsigned char feof; // = $3F CASSETTE EOF FLAG (0 // = QUIET) + + unsigned char freq; // = $40 CASSETTE BEEP COUNTER + unsigned char soundr; // = $41 NOISY I/0 FLAG. (ZERO IS QUIET) + unsigned char critic; // = $42 DEFINES CRITICAL SECTION (CRITICAL IF NON-Z) + dos2x_t fmszpg; // = $43-$49 DISK FILE MANAGER SYSTEM ZERO PAGE +#ifdef OSA + unsigned char ckey; // = $4A FLAG SET WHEN GAME START PRESSED + unsigned char cassbt; // = $4B CASSETTE BOOT FLAG +#else + void* zchain; // = $4A/$4B HANDLER LINKAGE CHAIN POINTER +#endif + unsigned char dstat; // = $4C DISPLAY STATUS + unsigned char atract; // = $4D ATRACT FLAG + unsigned char drkmsk; // = $4E DARK ATRACT MASK + unsigned char colrsh; // = $4F ATRACT COLOR SHIFTER (EOR'ED WITH PLAYFIELD + + unsigned char tmpchr; // = $50 TEMPORARY CHARACTER + unsigned char hold1; // = $51 TEMPORARY + unsigned char lmargn; // = $52 LEFT MARGIN (NORMALLY 2, CC65 C STARTUP CODE SETS IT TO 0) + unsigned char rmargn; // = $53 RIGHT MARGIN (NORMALLY 39 IF NO XEP80 IS USED) + unsigned char rowcrs; // = $54 1CURSOR ROW + unsigned int colcrs; // = $55/$56 CURSOR COLUMN + unsigned char dindex; // = $57 DISPLAY MODE + unsigned char* savmsc; // = $58/$59 SAVED MEMORY SCAN COUNTER + unsigned char oldrow; // = $5A PRIOR ROW + unsigned int oldcol; // = $5B/$5C PRIOR COLUMN + unsigned char oldchr; // = $5D DATA UNDER CURSOR + unsigned char* oldadr; // = $5E/$5F SAVED CURSOR MEMORY ADDRESS + +#ifdef OSA + unsigned char newrow; // = $60 POINT DRAW GOES TO + unsigned int newcol; // = $61/$62 COLUMN DRAW GOES TO +#else + unsigned char* fkdef; // = $60/$61 FUNCTION KEY DEFINITION TABLE + unsigned char palnts; // = $62 PAL/NTSC INDICATOR (0 // = NTSC) +#endif + unsigned char logcol; // = $63 POINTS AT COLUMN IN LOGICAL LINE + unsigned char* adress; // = $64/$65 TEMPORARY ADDRESS + unsigned int mlttmp; // = $66/$67 TEMPORARY / FIRST BYTE IS USED IN OPEN AS TEMP + unsigned int savadr; // = $68/$69 SAVED ADDRESS + unsigned char ramtop; // = $6A RAM SIZE DEFINED BY POWER ON LOGIC + unsigned char bufcnt; // = $6B BUFFER COUNT + unsigned char* bufstr; // = $6C/$6D EDITOR GETCH POINTER + unsigned char bitmsk; // = $6E BIT MASK + unsigned char shfamt; // = $6F SHIFT AMOUNT FOR PIXEL JUSTIFUCATION + + unsigned int rowac; // = $70/$71 DRAW WORKING ROW + unsigned int colac; // = $72/$73 DRAW WORKING COLUMN + unsigned char* endpt; // = $74/$75 END POINT + unsigned char deltar; // = $76 ROW DIFFERENCE + unsigned int deltac; // = $77/$78 COLUMN DIFFERENCE +#ifdef OSA + unsigned char rowinc; // = $79 ROWINC + unsigned char colinc; // = $7A COLINC +#else + unsigned char* keydef; // = $79/$7A 2-BYTE KEY DEFINITION TABLE ADDRESS +#endif + unsigned char swpflg; // = $7B NON-0 1F TXT AND REGULAR RAM IS SWAPPED + unsigned char holdch; // = $7C CH IS MOVED HERE IN KGETCH BEFORE CNTL & SH + unsigned char insdat; // = $7D 1-BYTE TEMPORARY + unsigned int countr; // = $7E/$7F 2-BYTE DRAW ITERATION COUNT + + unsigned char _free_1[0xD4-0x7F-1]; // USER SPACE + + // Floating Point Package Page Zero Address Equates + fpreg_t fpreg[4]; // = $D4-$EB 4 REGSITERS, ACCCESS LIKE "fpreg[FPIDX_R0].fr" + unsigned char frx; // = $EC 1-BYTE TEMPORARY + unsigned char eexp; // = $ED VALUE OF EXP +#ifdef OS_REV2 + unsigned char frsign; // = $EE ##REV2## 1-BYTE FLOATING POINT SIGN + unsigned char plycnt; // = $EF ##REV2## 1-BYTE POLYNOMIAL DEGREE + unsigned char sgnflg; // = $F0 ##REV2## 1-BYTE SIGN FLAG + unsigned char xfmflg; // = $F1 ##REV2## 1-BYTE TRANSFORM FLAG +#else + unsigned char nsign; // = $EE SIGN OF # + unsigned char esign; // = $EF SIGN OF EXPONENT + unsigned char fchrflg; // = $F0 1ST CHAR FLAG + unsigned char digrt; // = $F1 # OF DIGITS RIGHT OF DECIMAL +#endif + unsigned char cix; // = $F2 CURRENT INPUT INDEX + unsigned char* inbuff; // = $F3/$F4 POINTS TO USER'S LINE INPUT BUFFER + unsigned int ztemp1; // = $F5/$F6 2-BYTE TEMPORARY + unsigned int ztemp4; // = $F7/$F8 2-BYTE TEMPORARY + unsigned int ztemp3; // = $F9/$FA 2-BYTE TEMPORARY + + union { + unsigned char degflg; // = $FB ##OLD## SAME AS RADFLG + unsigned char radflg; // = $FB ##OLD## 0=RADIANS, 6=DEGREES + }; + + fpreg_t* flptr; // = $FC/$FD 2-BYTE FLOATING POINT NUMBER POINTER + fpreg_t* fptr2; // = $FE/$FF 2-BYTE FLOATING POINT NUMBER POINTER + + // --- Page 1 --- + + unsigned char stack[0x100]; // STACK + + // --- Page 2 --- + + void (*vdslst)(void); // = $0200/$0201 DISPLAY LIST NMI VECTOR + void (*vprced)(void); // = $0202/$0203 PROCEED LINE IRQ VECTOR + void (*vinter)(void); // = $0204/$0205 INTERRUPT LINE IRQ VECTOR + void (*vbreak)(void); // = $0206/$0207 SOFTWARE BREAK (00) INSTRUCTION IRQ VECTOR + void (*vkeybd)(void); // = $0208/$0209 POKEY KEYBOARD IRQ VECTOR + void (*vserin)(void); // = $020A/$020B POKEY SERIAL INPUT READY IRQ + void (*vseror)(void); // = $020C/$020D POKEY SERIAL OUTPUT READY IRQ + void (*vseroc)(void); // = $020E/$020F POKEY SERIAL OUTPUT COMPLETE IRQ + void (*vtimr1)(void); // = $0210/$0201 POKEY TIMER 1 IRQ + void (*vtimr2)(void); // = $0212/$0203 POKEY TIMER 2 IRQ + void (*vtimr4)(void); // = $0214/$0205 POKEY TIMER 4 IRQ + void (*vimirq)(void); // = $0216/$0207 IMMEDIATE IRQ VECTOR + unsigned int cdtmv1; // = $0218/$0210 COUNT DOWN TIMER 1 + unsigned int cdtmv2; // = $021A/$021B COUNT DOWN TIMER 2 + unsigned int cdtmv3; // = $021C/$021D COUNT DOWN TIMER 3 + unsigned int cdtmv4; // = $021E/$021F COUNT DOWN TIMER 4 + unsigned int cdtmv5; // = $0220/$0221 COUNT DOWN TIMER 5 + void (*vvblki)(void); // = $0222/$0223 IMMEDIATE VERTICAL BLANK NMI VECTOR + void (*vvblkd)(void); // = $0224/$0224 DEFERRED VERTICAL BLANK NMI VECTOR + void (*cdtma1)(void); // = $0226/$0227 COUNT DOWN TIMER 1 JSR ADDRESS + void (*cdtma2)(void); // = $0228/$0229 COUNT DOWN TIMER 2 JSR ADDRESS + unsigned char cdtmf3; // = $022A COUNT DOWN TIMER 3 FLAG + unsigned char srtimr; // = $022B SOFTWARE REPEAT TIMER + unsigned char cdtmf4; // = $022C COUNT DOWN TIMER 4 FLAG + unsigned char intemp; // = $022D IAN'S TEMP + unsigned char cdtmf5; // = $022E COUNT DOWN TIMER FLAG 5 + unsigned char sdmctl; // = $022F SAVE DMACTL REGISTER + union { + struct { + unsigned char sdlstl; // = $0230 SAVE DISPLAY LIST LOW BYTE + unsigned char sdlsth; // = $0231 SAVE DISPLAY LIST HI BYTE + }; + void* sdlst; // = $0230/$0231 (same as above as pointer) + }; + unsigned char sskctl; // = $0232 SKCTL REGISTER RAM +#ifdef OSA + unsigned char _spare_1; // = $0233 No OS use. +#else + unsigned char lcount; // = $0233 ##1200xl## 1-byte relocating loader record +#endif + unsigned char lpenh; // = $0234 LIGHT PEN HORIZONTAL VALUE + unsigned char lpenv; // = $0235 LIGHT PEN VERTICAL VALUE + void (*brkky)(void); // = $0236/$0237 BREAK KEY VECTOR +#ifdef OSA + unsigned char spare2[2]; // = $0238/$0239 No OS use. +#else + void (*vpirq)(void); // = $0238/$0239 ##rev2## 2-byte parallel device IRQ vector +#endif + unsigned char cdevic; // = $023A COMMAND FRAME BUFFER - DEVICE + unsigned char ccomnd; // = $023B COMMAND + union { + struct { + unsigned char caux1; // = $023C COMMAND AUX BYTE 1 + unsigned char caux2; // = $023D COMMAND AUX BYTE 2 + }; + unsigned int caux; // = $023C/$023D (same as above as word) + }; + unsigned char temp; // = $023E TEMPORARY RAM CELL + unsigned char errflg; // = $023F ERROR FLAG - ANY DEVICE ERROR EXCEPT TIME OUT + unsigned char dflags; // = $0240 DISK FLAGS FROM SECTOR ONE + unsigned char dbsect; // = $0241 NUMBER OF DISK BOOT SECTORS + unsigned char* bootad; // = $0242/$0243 ADDRESS WHERE DISK BOOT LOADER WILL BE PUT + unsigned char coldst; // = $0244 COLDSTART FLAG (1=IN MIDDLE OF COLDSTART> +#ifdef OSA + unsigned char spare3; // = $0245 No OS use. +#else + unsigned char reclen; // = $0245 ##1200xl## 1-byte relocating loader record length +#endif + unsigned char dsktim; // = $0246 DISK TIME OUT REGISTER +#ifdef OSA + unsigned char linbuf[40]; // = $0247-$026E ##old## CHAR LINE BUFFER +#else + unsigned char pdvmsk; // = $0247 ##rev2## 1-byte parallel device selection mask + unsigned char shpdvs; // = $0248 ##rev2## 1-byte PDVS (parallel device select) + unsigned char pdimsk; // = $0249 ##rev2## 1-byte parallel device IRQ selection + unsigned int reladr; // = $024A/$024B ##rev2## 2-byte relocating loader relative adr. + unsigned char pptmpa; // = $024C ##rev2## 1-byte parallel device handler temporary + unsigned char pptmpx; // = $024D ##rev2## 1-byte parallel device handler temporary + unsigned char _reserved_1[29]; // = $024E-$026A RESERVED + unsigned char chsalt; // = $026B ##1200xl## 1-byte character set alternate + unsigned char vsflag; // = $026C ##1200xl## 1-byte fine vertical scroll count + unsigned char keydis; // = $026D ##1200xl## 1-byte keyboard disable + unsigned char fine; // = $026E ##1200xl## 1-byte fine scrolling mode +#endif + unsigned char gprior; // = $026F GLOBAL PRIORITY CELL + unsigned char paddl0; // = $0270 1-BYTE POTENTIOMETER 0 + unsigned char paddl1; // = $0271 1-BYTE POTENTIOMETER 1 + unsigned char paddl2; // = $0272 1-BYTE POTENTIOMETER 2 + unsigned char paddl3; // = $0273 1-BYTE POTENTIOMETER 3 + unsigned char paddl4; // = $0274 1-BYTE POTENTIOMETER 4 + unsigned char paddl5; // = $0275 1-BYTE POTENTIOMETER 5 + unsigned char paddl6; // = $0276 1-BYTE POTENTIOMETER 6 + unsigned char paddl7; // = $0277 1-BYTE POTENTIOMETER 7 + unsigned char stick0; // = $0278 1-byte joystick 0 + unsigned char stick1; // = $0279 1-byte joystick 1 + unsigned char stick2; // = $027A 1-byte joystick 2 + unsigned char stick3; // = $027B 1-byte joystick 3 + unsigned char ptrig0; // = $027C 1-BYTE PADDLE TRIGGER 0 + unsigned char ptrig1; // = $027D 1-BYTE PADDLE TRIGGER 1 + unsigned char ptrig2; // = $027E 1-BYTE PADDLE TRIGGER 2 + unsigned char ptrig3; // = $027F 1-BYTE PADDLE TRIGGER 3 + unsigned char ptrig4; // = $0280 1-BYTE PADDLE TRIGGER 4 + unsigned char ptrig5; // = $0281 1-BYTE PADDLE TRIGGER 5 + unsigned char ptrig6; // = $0281 1-BYTE PADDLE TRIGGER 6 + unsigned char ptrig7; // = $0283 1-BYTE PADDLE TRIGGER 7 + unsigned char strig0; // = $0284 1-BYTE JOYSTICK TRIGGER 0 + unsigned char strig1; // = $0285 1-BYTE JOYSTICK TRIGGER 1 + unsigned char strig2; // = $0286 1-BYTE JOYSTICK TRIGGER 2 + unsigned char strig3; // = $0287 1-BYTE JOYSTICK TRIGGER 3 +#ifdef OSA + unsigned char cstat; // = $0288 ##old## cassette status register +#else + unsigned char hibyte; // = $0288 ##1200xl## 1-byte relocating loader high byte +#endif + unsigned char wmode; // = $0289 1-byte cassette WRITE mode + unsigned char blim; // = $028A 1-byte cassette buffer limit +#ifdef OSA + unsigned char _reserved_2[5]; // = $028B-$028F RESERVED +#else + unsigned char imask; // = $028B ##rev2## (not used) + void (*jveck)(void); // = $028C/$028D 2-byte jump vector + unsigned newadr; // = $028E/028F ##1200xl## 2-byte relocating address +#endif + unsigned char txtrow; // = $0290 TEXT ROWCRS + unsigned txtcol; // = $0291/$0292 TEXT COLCRS + unsigned char tindex; // = $0293 TEXT INDEX + unsigned char* txtmsc; // = $0294/$0295 FOOLS CONVRT INTO NEW MSC + unsigned char txtold[6]; // = $0296-$029B OLDROW & OLDCOL FOR TEXT (AND THEN SOME) +#ifdef OSA + unsigned char tmpx1; // = $029C ##old## 1--byte temporary register +#else + unsigned char cretry; // = $029C ##1200xl## 1-byte number of command frame retries +#endif + unsigned char hold3; // = $029D 1-byte temporary + unsigned char subtmp; // = $029E 1-byte temporary + unsigned char hold2; // = $029F 1-byte (not used) + unsigned char dmask; // = $02A0 1-byte display (pixel location) mask + unsigned char tmplbt; // = $02A1 1-byte (not used) + unsigned char escflg; // = $02A2 ESCAPE FLAG + unsigned char tabmap[15]; // = $02A3-$02B1 15-byte (120 bit) tab stop bit map + unsigned char logmap[4]; // = $02B2-$02B5 LOGICAL LINE START BIT MAP + unsigned char invflg; // = $02B6 INVERSE VIDEO FLAG (TOGGLED BY ATARI KEY) + unsigned char filflg; // = $02B7 RIGHT FILL FLAG FOR DRAW + unsigned char tmprow; // = $02B8 1-byte temporary row + unsigned tmpcol; // = $02B9/$02BA 2-byte temporary column + unsigned char scrflg; // = $02BB SET IF SCROLL OCCURS + unsigned char hold4; // = $02BC TEMP CELL USED IN DRAW ONLY +#ifdef OSA + unsigned char hold5; // = $02BD ##old## DITTO +#else + unsigned char dretry; // = $02BD ##1200xl## 1-byte number of device retries +#endif + unsigned char shflok; // = $02BE 1-byte shift/control lock flags + unsigned char botscr; // = $02BF BOTTOM OF SCREEN 24 NORM 4 SPLIT + unsigned char pcolr0; // = $02C0 1-byte player-missile 0 color/luminance + unsigned char pcolr1; // = $02C1 1-byte player-missile 1 color/luminance + unsigned char pcolr2; // = $02C2 1-byte player-missile 2 color/luminance + unsigned char pcolr3; // = $02C3 1-byte player-missile 3 color/luminance + unsigned char color0; // = $02C4 1-byte playfield 0 color/luminance + unsigned char color1; // = $02C5 1-byte playfield 1 color/luminance + unsigned char color2; // = $02C6 1-byte playfield 2 color/luminance + unsigned char color3; // = $02C7 1-byte playfield 3 color/luminance + unsigned char color4; // = $02C8 1-byte background color/luminance +#ifdef OSA + unsigned char _spare_2[23]; // = $02C9-$02DF No OS use. +#else + union { + unsigned char parmbl[6]; // = $02C9 ##rev2## 6-byte relocating loader parameter + struct { + void (*runadr)(void); // = $02C9 ##1200xl## 2-byte run address + unsigned int hiused; // = $02CB ##1200xl## 2-byte highest non-zero page address + unsigned int zhiuse; // = $02CD ##1200xl## 2-byte highest zero page address + }; + }; + union { + unsigned char oldpar[6]; // = $02CF ##rev2## 6-byte relocating loader parameter + struct { + void (*gbytea)(void); // = $02CF ##1200xl## 2-byte GET-BYTE routine address + unsigned int loadad; // = $02D1 ##1200xl## 2-byte non-zero page load address + unsigned int zloada; // = $02D3 ##1200xl## 2-byte zero page load address + }; + }; + unsigned int dsctln; // = $02D5 ##1200xl## 2-byte disk sector length + unsigned int acmisr; // = $02D7 ##1200xl## 2-byte ACMI interrupt service routine + unsigned char krpdel; // = $02D9 ##1200xl## 1-byte auto-repeat delay + unsigned char keyrep; // = $02DA ##1200xl## 1-byte auto-repeat rate + unsigned char noclik; // = $02DB ##1200xl## 1-byte key click disable + unsigned char helpfg; // = $02DC ##1200xl## 1-byte HELP key flag (0 = no HELP) + unsigned char dmasav; // = $02DD ##1200xl## 1-byte SDMCTL save/restore + unsigned char pbpnt; // = $02DE ##1200xl## 1-byte printer buffer pointer + unsigned char pbufsz; // = $02DF ##1200xl## 1-byte printer buffer size +#endif + union { + unsigned char glbabs[4]; // = $02E0-$02E3 byte global variables for non-DOS users + struct { + void (*runad)(void); // = $02E0 ##map## 2-byte binary file run address + void (*initad)(void); // = $02E2 ##map## 2-byte binary file initialization address + }; + }; + unsigned char ramsiz; // = $02E4 RAM SIZE (HI BYTE ONLY) + void* memtop; // = $02E5 TOP OF AVAILABLE USER MEMORY + void* memlo; // = $02E7 BOTTOM OF AVAILABLE USER MEMORY +#ifdef OSA + unsigned char _spare_3; // = $02E9 No OS use. +#else + unsigned char hndlod; // = $02E9 ##1200xl## 1-byte user load flag +#endif + unsigned char dvstat[4]; // = $02EA-$02ED STATUS BUFFER + union { + unsigned int cbaud; // = $02EE/$02EF 2-byte cassette baud rate + struct { + unsigned char cbaudl; // = $02EE 1-byte low cassette baud rate + unsigned char cbaudh; // = $02EF 1-byte high cassette baud rate + }; + }; + unsigned char crsinh; // = $02F0 CURSOR INHIBIT (00 = CURSOR ON) + unsigned char keydel; // = $02F1 KEY DELAY + unsigned char ch1; // = $02F2 1-byte prior keyboard character + unsigned char chact; // = $02F3 CHACTL REGISTER RAM + unsigned char chbas; // = $02F4 CHBAS REGISTER RAM +#ifdef OSA + unsigned char _spare_4[5]; // = $02F5-$02F9 No OS use. +#else + unsigned char newrow; // = $02F5 ##1200xl## 1-byte draw destination row + unsigned int newcol; // = $02F6/$02F7 ##1200xl## 2-byte draw destination column + unsigned char rowinc; // = $02F8 ##1200xl## 1-byte draw row increment + unsigned char colinc; // = $02F9 ##1200xl## 1-byte draw column increment +#endif + unsigned char char_; // = $02FA 1-byte internal character (naming changed due to do keyword conflict) + unsigned char atachr; // = $02FB ATASCII CHARACTER + unsigned char ch; // = $02FC GLOBAL VARIABLE FOR KEYBOARD + unsigned char fildat; // = $02FD RIGHT FILL DATA <DRAW> + unsigned char dspflg; // = $02FE DISPLAY FLAG DISPLAY CNTLS IF NON-ZERO + unsigned char ssflag; // = $02FF START/STOP FLAG FOR PAGING (CNTL 1). CLEARE + + // --- Page 3 --- + + dcb_t dcb; // = $0300-$030B DEVICE CONTROL BLOCK + unsigned int timer1; // = $030C/$030D INITIAL TIMER VALUE +#ifdef OSA + unsigned char addcor; // = $030E ##old## ADDITION CORRECTION +#else + unsigned char jmpers; // = $030E ##1200xl## 1-byte jumper options +#endif + unsigned char casflg; // = $030F CASSETTE MODE WHEN SET + unsigned int timer2; // = $0310/$0311 2-byte final baud rate timer value + unsigned char temp1; // = $0312 TEMPORARY STORAGE REGISTER +#ifdef OSA + unsigned char _spare_5; // = $0313 unused + unsigned char temp2; // = $0314 ##old## TEMPORARY STORAGE REGISTER +#else + unsigned char temp2; // = $0313 ##1200xl## 1-byte temporary + unsigned char ptimot; // = $0314 ##1200xl## 1-byte printer timeout +#endif + unsigned char temp3; // = $0315 TEMPORARY STORAGE REGISTER + unsigned char savio; // = $0316 SAVE SERIAL IN DATA PORT + unsigned char timflg; // = $0317 TIME OUT FLAG FOR BAUD RATE CORRECTION + unsigned char stackp; // = $0318 SIO STACK POINTER SAVE CELL + unsigned char tstat; // = $0319 TEMPORARY STATUS HOLDER +#ifdef OSA + hatabs_t hatabs[12]; // = $031A-$033D handler address table + unsigned int zeropad; // = $033E/$033F zero padding +#else + hatabs_t hatabs[11]; // = $031A-$033A handler address table + unsigned int zeropad; // = $033B/$033C zero padding + unsigned char pupbt1; // = $033D ##1200xl## 1-byte power-up validation byte 1 + unsigned char pupbt2; // = $033E ##1200xl## 1-byte power-up validation byte 2 + unsigned char pupbt3; // = $033F ##1200xl## 1-byte power-up validation byte 3 +#endif + + iocb_t iocb[8]; // = $0340-$03BF 8 I/O Control Blocks + unsigned char prnbuf[40]; // = $03C0-$3E7 PRINTER BUFFER +#ifdef OSA + unsigned char _spare_6[151]; // = $03E8-$047F unused +#else + unsigned char superf; // = $03E8 ##1200xl## 1-byte editor super function flag + unsigned char ckey; // = $03E9 ##1200xl## 1-byte cassette boot request flag + unsigned char cassbt; // = $03EA ##1200xl## 1-byte cassette boot flag + unsigned char cartck; // = $03EB ##1200xl## 1-byte cartridge equivalence check + unsigned char derrf; // = $03EC ##rev2## 1-byte screen OPEN error flag + unsigned char acmvar[11]; // = $03ED-$03F7 ##1200xl## reserved for ACMI, not cleared upon reset + unsigned char basicf; // = $03F8 ##rev2## 1-byte BASIC switch flag + unsigned char mintlk; // = $03F9 ##1200xl## 1-byte ACMI module interlock + unsigned char gintlk; // = $03FA ##1200xl## 1-byte cartridge interlock + void* chlink; // = $03FB/$03FC ##1200xl## 2-byte loaded handler chain link + unsigned char casbuf[131]; // = $03FD-$047F CASSETTE BUFFER +#endif + + // --- Page 4 --- + + unsigned char usarea[128]; // = $0480 128 bytes reserved for application + + // --- Page 5 --- + + unsigned char _spare_7[126]; // = $0500-$057D reserved for FP package / unused + unsigned char lbpr1; // = $057E LBUFF PREFIX 1 + unsigned char lbpr2; // = $057F LBUFF PREFIX 2 + unsigned char lbuff[128]; // = $0580-$05FF 128-byte line buffer +}; + + +/* Define a structure with the zero page atari basic register offsets */ + +struct __basic { + void* lowmem; // = $80/$81 POINTER TO BASIC'S LOW MEMORY + void* vntp; // = $82/$83 BEGINNING ADDRESS OF THE VARIABLE NAME TABLE + void* vntd; // = $84/$85 POINTER TO THE ENDING ADDRESS OF THE VARIABLE NAME TABLE PLUS ONE + void* vvtp; // = $86/$87 ADDRESS FOR THE VARIABLE VALUE TABLE + void* stmtab; // = $88/$89 ADDRESS OF THE STATEMENT TABLE + void* stmcur; // = $8A/$8B CURRENT BASIC STATEMENT POINTER + void* starp; // = $8C/$8D ADDRESS FOR THE STRING AND ARRAY TABLE + void* runstk; // = $8E/$8F ADDRESS OF THE RUNTIME STACK + void* memtop; // = $90/$91 POINTER TO THE TOP OF BASIC MEMORY + + unsigned char _internal_1[0xBA-0x91-1]; // INTERNAL DATA + + unsigned int stopln; // = $BA/$BB LINE WHERE A PROGRAM WAS STOPPED + + unsigned char _internal_2[0xC3-0xBB-1]; // INTERNAL DATA + + unsigned char errsav; // = $C3 NUMBER OF THE ERROR CODE + + unsigned char _internal_3[0xC9-0xC3-1]; // INTERNAL DATA + + unsigned char ptabw; // = $C9 NUMBER OF COLUMNS BETWEEN TAB STOPS + unsigned char loadflg; // = $CA LIST PROTECTION + + unsigned char _internal_4[0xD4-0xCA-1]; // INTERNAL DATA + + unsigned int binint; // = $D4/$D5 USR-CALL RETURN VALUE +}; + +#endif diff --git a/include/_gtia.h b/include/_gtia.h index 424628f19..eaf6bed3e 100644 --- a/include/_gtia.h +++ b/include/_gtia.h @@ -4,9 +4,16 @@ /* */ /* Internal include file, do not use directly */ /* */ +/* "GTIA, Graphic Television Interface Adaptor, is a custom chip used in the */ +/* Atari 8-bit family of computers and in the Atari 5200 console. In these */ +/* systems, GTIA chip works together with ANTIC to produce video display. */ +/* ANTIC generates the playfield graphics (text and bitmap) while GTIA */ +/* provides the color for the playfield and adds overlay objects known as */ +/* player/missile graphics (sprites)" - Wikipedia article on "GTIA" */ /* */ /* */ /* (C) 2000 Freddy Offenga <taf_offenga@yahoo.com> */ +/* 2019-01-16: Bill Kendrick <nbs@sonic.net>: More defines for registers */ /* */ /* */ /* This software is provided 'as-is', without any expressed or implied */ @@ -32,67 +39,243 @@ #ifndef __GTIA_H #define __GTIA_H -/* Define a structure with the gtia register offsets */ +/*****************************************************************************/ +/* Define a structure with the GTIA register offsets for write (W) */ +/*****************************************************************************/ + struct __gtia_write { - unsigned char hposp0; /* horizontal position player 0 */ - unsigned char hposp1; /* horizontal position player 1 */ - unsigned char hposp2; /* horizontal position player 2 */ - unsigned char hposp3; /* horizontal position player 3 */ - unsigned char hposm0; /* horizontal position missile 0 */ - unsigned char hposm1; /* horizontal position missile 1 */ - unsigned char hposm2; /* horizontal position missile 2 */ - unsigned char hposm3; /* horizontal position missile 3 */ - unsigned char sizep0; /* size of player 0 */ - unsigned char sizep1; /* size of player 1 */ - unsigned char sizep2; /* size of player 2 */ - unsigned char sizep3; /* size of player 3 */ - unsigned char sizem; /* size of missiles */ - unsigned char grafp0; /* graphics shape player 0 */ - unsigned char grafp1; /* graphics shape player 1 */ - unsigned char grafp2; /* graphics shape player 2 */ - unsigned char grafp3; /* graphics shape player 3 */ - unsigned char grafm; /* graphics shape missiles */ - unsigned char colpm0; /* color player and missile 0 */ - unsigned char colpm1; /* color player and missile 1 */ - unsigned char colpm2; /* color player and missile 2 */ - unsigned char colpm3; /* color player and missile 3 */ - unsigned char colpf0; /* color playfield 0 */ - unsigned char colpf1; /* color playfield 1 */ - unsigned char colpf2; /* color playfield 2 */ - unsigned char colpf3; /* color playfield 3 */ - unsigned char colbk; /* color background */ - unsigned char prior; /* priority selection */ - unsigned char vdelay; /* vertical delay */ - unsigned char gractl; /* stick/paddle latch, p/m control */ - unsigned char hitclr; /* clear p/m collision */ - unsigned char consol; /* console buttons */ + unsigned char hposp0; /* 0x00: horizontal position of player 0 */ + unsigned char hposp1; /* 0x01: horizontal position of player 1 */ + unsigned char hposp2; /* 0x02: horizontal position of player 2 */ + unsigned char hposp3; /* 0x03: horizontal position of player 3 */ + unsigned char hposm0; /* 0x04: horizontal position of missile 0 */ + unsigned char hposm1; /* 0x05: horizontal position of missile 1 */ + unsigned char hposm2; /* 0x06: horizontal position of missile 2 */ + unsigned char hposm3; /* 0x07: horizontal position of missile 3 */ + + unsigned char sizep0; /* 0x08: size of player 0 */ + unsigned char sizep1; /* 0x09: size of player 1 */ + unsigned char sizep2; /* 0x0A: size of player 2 */ + unsigned char sizep3; /* 0x0B: size of player 3 */ + unsigned char sizem; /* 0x0C: size of missiles */ + + unsigned char grafp0; /* 0x0D: graphics shape player 0 (used when ANTIC is not instructed to use DMA; see DMACTL) */ + unsigned char grafp1; /* 0x0E: graphics shape player 1 */ + unsigned char grafp2; /* 0x0F: graphics shape player 2 */ + unsigned char grafp3; /* 0x10: graphics shape player 3 */ + unsigned char grafm; /* 0x11: graphics shape missiles */ + + unsigned char colpm0; /* 0x12: color player and missile 0 */ + unsigned char colpm1; /* 0x13: color player and missile 1 */ + unsigned char colpm2; /* 0x14: color player and missile 2 */ + unsigned char colpm3; /* 0x15: color player and missile 3 */ + unsigned char colpf0; /* 0x16: color playfield 0 */ + unsigned char colpf1; /* 0x17: color playfield 1 */ + unsigned char colpf2; /* 0x18: color playfield 2 */ + unsigned char colpf3; /* 0x19: color playfield 3 */ + unsigned char colbk; /* 0x1A: color background */ + + unsigned char prior; /* 0x1B: priority selection */ + + unsigned char vdelay; + /* 0x1C: vertical delay -- one-line resolution movement of + ** vertical position of an object when two line resolution display is enabled + */ + + unsigned char gractl; /* 0x1D: stick/paddle latch, p/m control */ + + unsigned char hitclr; /* 0x1E: clear p/m collision */ + unsigned char consol; /* 0x1F: builtin speaker */ }; -/* Define a structure with the gtia register offsets */ + +/*****************************************************************************/ +/* (W) Values for SIZEP0-SIZEP3 and SIZEM registers: */ +/*****************************************************************************/ + +#define PMG_SIZE_NORMAL 0x0 /* one color clock per pixel */ +#define PMG_SIZE_DOUBLE 0x1 /* two color clocks per pixel */ +#define PMG_SIZE_QUAD 0x3 /* four color clocks per pixel */ + + +/* COLPM0-COLPM3, COLPF0-COLPF3, COLBK color registers */ + +/*****************************************************************************/ +/* Color definitions */ +/*****************************************************************************/ + +/* Make a GTIA color value */ +#define _gtia_mkcolor(hue,lum) (((hue) << 4) | ((lum) << 1)) + +/* Luminance values go from 0 (black) to 7 (white) */ + +/* Hue values */ +/* (These can vary depending on TV standard (NTSC vs PAL), +** tint potentiometer settings, TV tint settings, emulator palette, etc.) +*/ +#define HUE_GREY 0 +#define HUE_GOLD 1 +#define HUE_GOLDORANGE 2 +#define HUE_REDORANGE 3 +#define HUE_ORANGE 4 +#define HUE_MAGENTA 5 +#define HUE_PURPLE 6 +#define HUE_BLUE 7 +#define HUE_BLUE2 8 +#define HUE_CYAN 9 +#define HUE_BLUEGREEN 10 +#define HUE_BLUEGREEN2 11 +#define HUE_GREEN 12 +#define HUE_YELLOWGREEN 13 +#define HUE_YELLOW 14 +#define HUE_YELLOWRED 15 + +/* Color defines, similar to c64 colors (untested) */ +/* Hardware palette values (for GTIA colxxx registers) */ +#define GTIA_COLOR_BLACK _gtia_mkcolor(HUE_GREY,0) +#define GTIA_COLOR_WHITE _gtia_mkcolor(HUE_GREY,7) +#define GTIA_COLOR_RED _gtia_mkcolor(HUE_REDORANGE,1) +#define GTIA_COLOR_CYAN _gtia_mkcolor(HUE_CYAN,3) +#define GTIA_COLOR_VIOLET _gtia_mkcolor(HUE_PURPLE,4) +#define GTIA_COLOR_GREEN _gtia_mkcolor(HUE_GREEN,2) +#define GTIA_COLOR_BLUE _gtia_mkcolor(HUE_BLUE,2) +#define GTIA_COLOR_YELLOW _gtia_mkcolor(HUE_YELLOW,7) +#define GTIA_COLOR_ORANGE _gtia_mkcolor(HUE_ORANGE,5) +#define GTIA_COLOR_BROWN _gtia_mkcolor(HUE_YELLOW,2) +#define GTIA_COLOR_LIGHTRED _gtia_mkcolor(HUE_REDORANGE,6) +#define GTIA_COLOR_GRAY1 _gtia_mkcolor(HUE_GREY,2) +#define GTIA_COLOR_GRAY2 _gtia_mkcolor(HUE_GREY,3) +#define GTIA_COLOR_LIGHTGREEN _gtia_mkcolor(HUE_GREEN,6) +#define GTIA_COLOR_LIGHTBLUE _gtia_mkcolor(HUE_BLUE,6) +#define GTIA_COLOR_GRAY3 _gtia_mkcolor(HUE_GREY,5) + + +/*****************************************************************************/ +/* (W) PRIOR register values */ +/*****************************************************************************/ + +#define PRIOR_P03_PF03 0x01 /* Players 0-3, then Playfields 0-3, then background */ +#define PRIOR_P01_PF03_P23 0x02 /* Players 0-1, then Playfields 0-3, then Players 2-3, then background */ +#define PRIOR_PF03_P03 0x04 /* Playfields 0-3, then Players 0-3, then background */ +#define PRIOR_PF01_P03_PF23 0x08 /* Playfields 0-1, then Players 0-3, then Playfields 2-3, then background */ + +#define PRIOR_5TH_PLAYER 0x10 /* Four missiles combine to be a 5th player (uses COLPF3) */ + +/* Causes overlap of players 0 & 1 and of players 2 & 3 to result in a third color, +** the logical OR of the two players' colors, and other overlaps (e.g., players 0 and 2) +** to result in black (0x00). +*/ +#define PRIOR_OVERLAP_3RD_COLOR 0x20 + + +/*****************************************************************************/ +/* (W) GTIA special graphics mode options for GPRIOR */ +/*****************************************************************************/ + +/* Pixels are 2 color clocks wide, and one scanline tall +** (so 80x192 in normal playfield width). +** May be used with both bitmap and character modelines. +*/ + +/* 16 shade shades of the background (COLBK) hue; +** Note: brightnesses other than 0 (darkest) in COLBK cause additional effects +*/ +#define PRIOR_GFX_MODE_9 0x40 + +/* 9 color palette mode; +** COLPM0 (acts as background) thru COLPM3, followed by COLPF0 thru COLPF3, and COLBK +*/ +#define PRIOR_GFX_MODE_10 0x80 + +/* 16 hues of the background (COLBK) brightness; +** Note: hues other than 0 (greys) in COLBK caus additional effects +*/ +#define PRIOR_GFX_MODE_11 0xC0 + + +/*****************************************************************************/ +/* (W) VDELAY register values */ +/*****************************************************************************/ + +#define VDELAY_MISSILE0 0x01 +#define VDELAY_MISSILE1 0x02 +#define VDELAY_MISSILE2 0x04 +#define VDELAY_MISSILE3 0x08 +#define VDELAY_PLAYER0 0x10 +#define VDELAY_PLAYER1 0x20 +#define VDELAY_PLAYER2 0x40 +#define VDELAY_PLAYER3 0x80 + + +/*****************************************************************************/ +/* (W) GRACTL register values */ +/*****************************************************************************/ + +#define GRACTL_MISSLES 0x01 /* enable missiles */ +#define GRACTL_PLAYERS 0x02 /* enable players */ + +/* "Latch" triggers; once pressed, will give a continuous +** pressed input until this bit is cleared +*/ +#define GRACTL_LATCH_TRIGGER_INPUTS 0x04 + + +/*****************************************************************************/ +/* Define a structure with the GTIA register offsets for read (R) */ +/*****************************************************************************/ + struct __gtia_read { - unsigned char m0pf; /* missile 0 to playfield collision */ - unsigned char m1pf; /* missile 1 to playfield collision */ - unsigned char m2pf; /* missile 2 to playfield collision */ - unsigned char m3pf; /* missile 3 to playfield collision */ - unsigned char p0pf; /* player 0 to playfield collision */ - unsigned char p1pf; /* player 1 to playfield collision */ - unsigned char p2pf; /* player 2 to playfield collision */ - unsigned char p3pf; /* player 3 to playfield collision */ - unsigned char m0pl; /* missile 0 to player collision */ - unsigned char m1pl; /* missile 1 to player collision */ - unsigned char m2pl; /* missile 2 to player collision */ - unsigned char m3pl; /* missile 3 to player collision */ - unsigned char p0pl; /* player 0 to player collision */ - unsigned char p1pl; /* player 1 to player collision */ - unsigned char p2pl; /* player 2 to player collision */ - unsigned char p3pl; /* player 3 to player collision */ - unsigned char trig0; /* joystick trigger 0 */ - unsigned char trig1; /* joystick trigger 1 */ - unsigned char trig2; /* joystick trigger 2 */ - unsigned char trig3; /* joystick trigger 3 */ - unsigned char pal; /* pal/ntsc flag */ + unsigned char m0pf; /* 0x00: missile 0 to playfield collision */ + unsigned char m1pf; /* 0x01: missile 1 to playfield collision */ + unsigned char m2pf; /* 0x02: missile 2 to playfield collision */ + unsigned char m3pf; /* 0x03: missile 3 to playfield collision */ + unsigned char p0pf; /* 0x04: player 0 to playfield collision */ + unsigned char p1pf; /* 0x05: player 1 to playfield collision */ + unsigned char p2pf; /* 0x06: player 2 to playfield collision */ + unsigned char p3pf; /* 0x07: player 3 to playfield collision */ + unsigned char m0pl; /* 0x08: missile 0 to player collision */ + unsigned char m1pl; /* 0x09: missile 1 to player collision */ + unsigned char m2pl; /* 0x0A: missile 2 to player collision */ + unsigned char m3pl; /* 0x0B: missile 3 to player collision */ + unsigned char p0pl; /* 0x0C: player 0 to player collision */ + unsigned char p1pl; /* 0x0D: player 1 to player collision */ + unsigned char p2pl; /* 0x0E: player 2 to player collision */ + unsigned char p3pl; /* 0x0F: player 3 to player collision */ + + unsigned char trig0; /* 0x10: joystick trigger 0 (0=pressed, 1=released) */ + unsigned char trig1; /* 0x11: joystick trigger 1 */ + unsigned char trig2; /* 0x12: joystick trigger 2 */ + unsigned char trig3; /* 0x13: joystick trigger 3 */ + + unsigned char pal; /* 0x14: pal/ntsc flag */ + + unsigned char unused[10]; + + unsigned char consol; /* 0x1F: console buttons */ }; + +/*****************************************************************************/ +/* (R) PAL register possible values */ +/*****************************************************************************/ + +/* Note: This only tells you whether the GTIA is PAL or NTSC; some NTSC +** systems are modded with PAL ANTIC chips; testing VCOUNT limits can be +** done to check for that. Seems like it's not possible to test for SECAM +*/ + +#define TV_STD_PAL 0x1 +#define TV_STD_NTSC 0xE + + +/*****************************************************************************/ +/* Macros for reading console keys (Start/Select/Option) via CONSOL register */ +/*****************************************************************************/ + +#define CONSOL_START(x) !((unsigned char)((x) & 1)) /* true if Start pressed */ +#define CONSOL_SELECT(x) !((unsigned char)((x) & 2)) /* true if Select pressed */ +#define CONSOL_OPTION(x) !((unsigned char)((x) & 4)) /* true if Option pressed */ + + /* End of _gtia.h */ #endif /* #ifndef __GTIA_H */ - diff --git a/include/_maria.h b/include/_maria.h new file mode 100644 index 000000000..461119fda --- /dev/null +++ b/include/_maria.h @@ -0,0 +1,63 @@ +/*****************************************************************************/ +/* */ +/* _maria.h */ +/* */ +/* Atari 7800, Maria chip register hardware structures */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + +/* + * MARIA registers + */ +struct __maria { + unsigned char bkgrnd; + unsigned char p0c1; + unsigned char p0c2; + unsigned char p0c3; + unsigned char wsync; + unsigned char p1c1; + unsigned char p1c2; + unsigned char p1c3; + unsigned char mstat; + unsigned char p2c1; + unsigned char p2c2; + unsigned char p2c3; + unsigned char dpph; + unsigned char p3c1; + unsigned char p3c2; + unsigned char p3c3; + unsigned char dppl; + unsigned char p4c1; + unsigned char p4c2; + unsigned char p4c3; + unsigned char chbase; + unsigned char p5c1; + unsigned char p5c2; + unsigned char p5c3; + unsigned char offset; + unsigned char p6c1; + unsigned char p6c2; + unsigned char p6c3; + unsigned char ctrl; + unsigned char p7c1; + unsigned char p7c2; + unsigned char p7c3; +}; diff --git a/include/_pia.h b/include/_pia.h index 867c8f8a5..4b71ecfd4 100644 --- a/include/_pia.h +++ b/include/_pia.h @@ -4,6 +4,10 @@ /* */ /* Internal include file, do not use directly */ /* */ +/* The Peripheral Interface Adapter (PIA) chip (a 6520 or 6820) provides */ +/* parallel I/O interfacing; it was used in Atari 400/800 and Commodore PET */ +/* family of computers, for joystick and some interrupts. */ +/* Sources; various + Wikpedia article on "Peripheral Interface Adapter". */ /* */ /* */ /* (C) 2000 Freddy Offenga <taf_offenga@yahoo.com> */ @@ -34,7 +38,7 @@ #define __PIA_H -/* Define a structure with the pia register offsets */ +/* Define a structure with the PIA register offsets */ struct __pia { unsigned char porta; /* port A data r/w */ unsigned char portb; /* port B data r/w */ @@ -42,10 +46,7 @@ struct __pia { unsigned char pbctl; /* port B control */ }; - +/* (Some specific register values for Atari defined in atari.h) */ /* End of _pia.h */ #endif - - - diff --git a/include/_pokey.h b/include/_pokey.h index df10eac3f..15af4919e 100644 --- a/include/_pokey.h +++ b/include/_pokey.h @@ -4,9 +4,17 @@ /* */ /* Internal include file, do not use directly */ /* */ +/* POKEY, Pot Keyboard Integrated Circuit, is a digital I/O chip designed */ +/* for the Atari 8-bit family of home computers; it combines functions for */ +/* sampling (ADC) potentiometers (such as game paddles) and scan matrices of */ +/* switches (such as a computer keyboard) as well as sound generation. */ +/* It produces four voices of distinctive square wave sound, either as clear */ +/* tones or modified with a number of distortion settings. - Wikipedia */ +/* "POKEY" article. */ /* */ /* */ /* (C) 2000 Freddy Offenga <taf_offenga@yahoo.com> */ +/* 2019-01-16: Bill Kendrick <nbs@sonic.net>: More defines for registers */ /* */ /* */ /* This software is provided 'as-is', without any expressed or implied */ @@ -35,7 +43,10 @@ -/* Define a structure with the pokey register offsets */ +/*****************************************************************************/ +/* Define a structure with the POKEY register offsets for write (W) */ +/*****************************************************************************/ + struct __pokey_write { unsigned char audf1; /* audio channel #1 frequency */ unsigned char audc1; /* audio channel #1 control */ @@ -47,13 +58,122 @@ struct __pokey_write { unsigned char audc4; /* audio channel #4 control */ unsigned char audctl; /* audio control */ unsigned char stimer; /* start pokey timers */ - unsigned char skrest; /* reset serial port status reg. */ - unsigned char potgo; /* start paddle scan sequence */ + + unsigned char skrest; + /* reset serial port status reg.; + ** Reset BITs 5 - 7 of the serial port status register (SKCTL) to "1" + */ + + unsigned char potgo; /* start paddle scan sequence (see "ALLPOT") */ unsigned char unuse1; /* unused */ unsigned char serout; /* serial port data output */ unsigned char irqen; /* interrupt request enable */ unsigned char skctl; /* serial port control */ }; + + +/*****************************************************************************/ +/* (W) AUDC1-4 register values */ +/*****************************************************************************/ + +/* Meaningful values for the distortion bits. +** The first process is to divide the clock value by the frequency, +** then mask the output using the polys in the order below; +** finally, the result is divided by two. +*/ +#define AUDC_POLYS_5_17 0x00 +#define AUDC_POLYS_5 0x20 /* Same as 0x60 */ +#define AUDC_POLYS_5_4 0x40 +#define AUDC_POLYS_17 0x80 +#define AUDC_POLYS_NONE 0xA0 /* Same as 0xE0 */ +#define AUDC_POLYS_4 0xC0 + +/* When set, the volume value in AUDC1-4 bits 0-3 is sent directly to the speaker; +** it is not modulated with the frequency specified in the AUDF1-4 registers. +** (See "De Re Atari" Chapter 7: Sound) +*/ +#define AUDC_VOLUME_ONLY 0x10 + + +/*****************************************************************************/ +/* (W) AUDCTL register values */ +/*****************************************************************************/ + +#define AUDCTL_CLOCKBASE_15HZ 0x01 /* Switch main clock base from 64 KHz to 15 KHz */ +#define AUDCTL_HIGHPASS_CHAN2 0x02 /* Insert high pass filter into channel two, clocked by channel four */ +#define AUDCTL_HIGHPASS_CHAN1 0x04 /* Insert high pass filter into channel one, clocked by channel two */ +#define AUDCTL_JOIN_CHAN34 0x08 /* Join channels four and three (16 bit) */ +#define AUDCTL_JOIN_CHAN12 0x10 /* Join channels two and one (16 bit) */ +#define AUDCTL_CLOCK_CHAN3_179MHZ 0x20 /* Clock channel three with 1.79 MHz */ +#define AUDCTL_CLOCK_CHAN1_179MHZ 0x40 /* Clock channel one with 1.79 MHz */ +#define AUDCTL_9BIT_POLY 0x80 /* Makes the 17 bit poly counter into nine bit poly (see also: RANDOM) */ + + +/*****************************************************************************/ +/* (W) IRQEN register values */ +/*****************************************************************************/ + +#define IRQEN_TIMER_1 0x01 /* The POKEY timer one interrupt is enabled */ +#define IRQEN_TIMER_2 0x02 /* The POKEY timer two interrupt is enabled */ +#define IRQEN_TIMER_4 0x04 /* The POKEY timer four interrupt is enabled */ +#define IRQEN_SERIAL_TRANS_FINISHED 0x08 /* The serial out transmission finished interrupt is enabled */ +#define IRQEN_SERIAL_OUT_DATA_REQUIRED 0x10 /* The serial output data required interrupt is enabled */ +#define IRQEN_SERIAL_IN_DATA_READY 0x20 /* The serial input data ready interrupt is enabled. */ +#define IRQEN_OTHER_KEY 0x40 /* The "other key" interrupt is enabled */ +#define IRQEN_BREAK_KEY 0x80 /* The BREAK key is enabled */ + + +/*****************************************************************************/ +/* (W) SKCTL register values */ +/*****************************************************************************/ + +#define SKCTL_KEYBOARD_DEBOUNCE 0x01 /* Enable keyboard debounce circuits */ +#define SKCTL_KEYBOARD_SCANNING 0x02 /* Enable keyboard scanning circuit */ + +/* Fast pot scan +** The pot scan counter completes its sequence in two TV line times instead of +** one frame time (228 scan lines). Not as accurate as the normal pot scan +*/ +#define SKCTL_FAST_POT_SCAN 0x04 + +/* POKEY two-tone mode +** Serial output is transmitted as a two-tone signal rather than a logic true/false. +*/ +#define SKCTL_TWO_TONE_MODE 0x08 + +/* Force break (serial output to zero) */ +#define SKCTL_FORCE_BREAK 0x80 + + +/* Bits 4, 5, and 6 of SKCTL set Serial Mode Control: */ + +/* Trans. & Receive rates set by external clock; Also internal clock phase reset to zero. */ +#define SKCTL_SER_MODE_TX_EXT_RX_EXT 0x00 + +/* Trans. rate set by external clock; Receive asynch. (ch. 4) (CH3 and CH4). */ +#define SKCTL_SER_MODE_TX_EXT_RX_ASYNC 0x10 + +/* Trans. & Receive rates set by Chan. 4; Chan. 4 output on Bi-Direct. clock line. */ +#define SKCTL_SER_MODE_TX_CH4_RX_CH4_BIDIR 0x20 + +/* N.B.: Bit combination 0,1,1 not useful */ + +/* Trans. rate set by Chan. 4; Receive rate set by external clock. */ +#define SKCTL_SER_MODE_TX_CH4_RX_EXT 0x40 + +/* N.B.: Bit combination 1,0,1 not useful */ + +/* Trans. rate set by Chan. 2; Receive rate set by Chan. 4; Chan. 4 out on Bi-Direct. clock line. */ +#define SKCTL_SER_MODE_TX_CH2_RX_CH4_BIDIR 0x60 + +/* Trans. rate set by Chan. 2; Receive asynch. (chan 3 & 4); Bi-Direct. clock not used (tri-state condition). */ +#define SKCTL_SER_MODE_TX_CH4_RX_ASYNC 0x70 + + +/*****************************************************************************/ +/* Define a structure with the POKEY register offsets for read (R) */ +/*****************************************************************************/ + struct __pokey_read { unsigned char pot0; /* paddle 0 value */ unsigned char pot1; /* paddle 1 value */ @@ -63,7 +183,7 @@ struct __pokey_read { unsigned char pot5; /* paddle 5 value */ unsigned char pot6; /* paddle 6 value */ unsigned char pot7; /* paddle 7 value */ - unsigned char allpot; /* eight paddle port status */ + unsigned char allpot; /* eight paddle port status (see "POTGO") */ unsigned char kbcode; /* keyboard code */ unsigned char random; /* random number generator */ unsigned char unuse2; /* unused */ @@ -73,6 +193,28 @@ struct __pokey_read { unsigned char skstat; /* serial port status */ }; + +/*****************************************************************************/ +/* (R) SKSTAT register values */ +/*****************************************************************************/ + +#define SKSTAT_SERIN_SHIFTREG_BUSY 0x02 /* Serial input shift register busy */ +#define SKSTAT_LASTKEY_PRESSED 0x04 /* the last key is still pressed */ +#define SKSTAT_SHIFTKEY_PRESSED 0x08 /* the [Shift] key is pressed */ +#define SKSTAT_DATA_READ_INGORING_SHIFTREG 0x10 /* Data can be read directly from the serial input port, ignoring the shift register. */ +#define SKSTAT_KEYBOARD_OVERRUN 0x20 /* Keyboard over-run; Reset BITs 7, 6 and 5 (latches) to 1, using SKREST */ +#define SKSTAT_INPUT_OVERRUN 0x40 /* Serial data input over-run. Reset latches as above. */ +#define SKSTAT_INPUT_FRAMEERROR 0x80 /* Serial data input frame error caused by missing or extra bits. Reset latches as above. */ + + +/* KBCODE, internal keyboard codes for Atari 8-bit computers, +** are #defined as "KEY_..." in "atari.h". +** Note some keys are not read via KBCODE: +** - Reset +** - Start, Select, and Option; see CONSOL in "gtia.h" +** - Break +*/ + + /* End of _pokey.h */ #endif /* #ifndef __POKEY_H */ - diff --git a/include/_riot.h b/include/_riot.h new file mode 100644 index 000000000..7c431127c --- /dev/null +++ b/include/_riot.h @@ -0,0 +1,26 @@ +/*****************************************************************************/ +/* */ +/* Atari VCS 2600 RIOT registers addresses */ +/* */ +/* Source: DASM - vcs.h */ +/* */ +/* Florent Flament (contact@florentflament.com), 2017 */ +/* */ +/*****************************************************************************/ + +/* RIOT registers */ +struct __riot { + unsigned char swcha; + unsigned char swacnt; + unsigned char swchb; + unsigned char swbcnt; + unsigned char intim; + unsigned char timint; + + unsigned char unused[14]; + + unsigned char tim1t; + unsigned char tim8t; + unsigned char tim64t; + unsigned char t1024t; +}; diff --git a/include/_ted.h b/include/_ted.h index 68b59d706..c2cd0a04e 100644 --- a/include/_ted.h +++ b/include/_ted.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/include/_tia.h b/include/_tia.h new file mode 100644 index 000000000..67c08ea18 --- /dev/null +++ b/include/_tia.h @@ -0,0 +1,100 @@ +/*****************************************************************************/ +/* */ +/* Atari VCS 2600 TIA registers addresses */ +/* */ +/* Source: DASM - vcs.h */ +/* */ +/* Florent Flament (contact@florentflament.com), 2017 */ +/* */ +/*****************************************************************************/ + +/* TIA write / read registers */ +struct __tia { + union { + unsigned char vsync; + unsigned char cxm0p; + }; + union { + unsigned char vblank; + unsigned char cxm1p; + }; + union { + unsigned char wsync; + unsigned char cxp0fb; + }; + union { + unsigned char rsync; + unsigned char cxp1fb; + }; + union { + unsigned char nusiz0; + unsigned char cxm0fb; + }; + union { + unsigned char nusiz1; + unsigned char cxm1fb; + }; + union { + unsigned char colup0; + unsigned char cxblpf; + }; + union { + unsigned char colup1; + unsigned char cxppmm; + }; + union { + unsigned char colupf; + unsigned char inpt0; + }; + union { + unsigned char colubk; + unsigned char inpt1; + }; + union { + unsigned char ctrlpf; + unsigned char inpt2; + }; + union { + unsigned char refp0; + unsigned char inpt3; + }; + union { + unsigned char refp1; + unsigned char inpt4; + }; + union { + unsigned char pf0; + unsigned char inpt5; + }; + unsigned char pf1; + unsigned char pf2; + unsigned char resp0; + unsigned char resp1; + unsigned char resm0; + unsigned char resm1; + unsigned char resbl; + unsigned char audc0; + unsigned char audc1; + unsigned char audf0; + unsigned char audf1; + unsigned char audv0; + unsigned char audv1; + unsigned char grp0; + unsigned char grp1; + unsigned char enam0; + unsigned char enam1; + unsigned char enabl; + unsigned char hmp0; + unsigned char hmp1; + unsigned char hmm0; + unsigned char hmm1; + unsigned char hmbl; + unsigned char vdelp0; + unsigned char vdelp1; + unsigned char vdelbl; + unsigned char resmp0; + unsigned char resmp1; + unsigned char hmove; + unsigned char hmclr; + unsigned char cxclr; +}; diff --git a/include/accelerator.h b/include/accelerator.h new file mode 100644 index 000000000..b5d8d0194 --- /dev/null +++ b/include/accelerator.h @@ -0,0 +1,309 @@ +/*****************************************************************************/ +/* */ +/* accelerator.h */ +/* */ +/* Accelerator specific definitions */ +/* */ +/* */ +/* */ +/* (C) 2018 Marco van den Heuvel */ +/* EMail: blackystardust68@yahoo.com */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef _ACCELERATOR_H +#define _ACCELERATOR_H + +/*****************/ +/* Speed defines */ +/*****************/ + +#define SPEED_SLOW 0x00 +#define SPEED_FAST 0xFF + +#define SPEED_1X SPEED_SLOW +#define SPEED_2X 2 - 1 /* C64 Chameleon, C64DTV, C128, PET 65816, Apple2 Fast Chip, Apple2 TransWarp, Apple2 Zip Chip */ +#define SPEED_3X 3 - 1 /* C64 Chameleon, C65, PET 65816, Apple2 Booster, Apple 2 Fast Chip, Apple2 Titan, Apple2 TransWarp, Apple2 Zip Chip */ +#define SPEED_4X 4 - 1 /* C64 Chameleon, C64 TurboMaster, C64 TurboProcess, PET 65816, Apple2 Fast Chip, Apple2 Zip Chip */ +#define SPEED_5X 5 - 1 /* C64 Chameleon, PET 65816, Apple2 Fast Chip */ +#define SPEED_6X 6 - 1 /* C64 Chameleon, PET 65816, Apple2 Fast Chip */ +#define SPEED_7X 7 - 1 /* PET 65816, Apple2 Fast Chip */ +#define SPEED_8X 8 - 1 /* C64 Flash8, PET 65816, Apple 2 Fast Chip */ +#define SPEED_10X 10 - 1 /* PET 65816, Apple2 Fast Chip */ +#define SPEED_12X 12 - 1 /* Apple2 Fast Chip */ +#define SPEED_16X 16 - 1 /* Apple2 Fast Chip */ +#define SPEED_20X 20 - 1 /* C64/C128 SuperCPU */ + +/***********************************/ +/* Accelerator function prototypes */ +/***********************************/ + +/* C64/C128 SuperCPU cartridge */ + +unsigned char __fastcall__ set_scpu_speed (unsigned char speed); + +/* Set the speed of the SuperCPU cartridge, using SPEED_SLOW will switch to + * 1 Mhz mode, SPEED_20X or SPEED_FAST will switch to 20 Mhz mode. + * + * Note that any value lower than SPEED_20X will switch to 1 Mhz mode, and + * any value higher or equal to SPEED_20X will switch to 20 Mhz mode. + * + * This function will return the actual speed the CPU is at after trying + * to set the requested speed, if this is not the speed that was requested + * then possibly the hardware speed switch prevented any software speed + * switching. + * + * This function does not check for the presence of the SuperCPU cartridge, + * make sure you use 'detect_scpu();' before using. + */ + +unsigned char get_scpu_speed (void); + +/* Get the speed of the SuperCPU cartridge. + * + * Possible return values: + * SPEED_1X : 1 Mhz mode + * SPEED_20X : 20 Mhz mode + * + * This function does not check for the presence of the SuperCPU cartridge, + * make sure you use 'detect_scpu();' before using. + */ + +unsigned char detect_scpu (void); + +/* Check for the presence of the SuperCPU cartridge. + * + * Possible return values: + * 0x00 : SuperCPU cartridge not present + * 0x01 : SuperCPU cartridge present + */ + + +/* C64DTV */ + +unsigned char __fastcall__ set_c64dtv_speed (unsigned char speed); + +/* Set the speed of the C64DTV, using SPEED_SLOW will switch to + * slow mode, SPEED_2X or SPEED_FAST will switch to fast mode. + * + * Note that any value higher or equal to SPEED_2X will switch to fast mode. + * + * This function will return the actual speed the CPU is at after trying + * to set the requested speed, to my knowledge the switch should not fail. + * + * This function does not check for the presence of the C64DTV, + * make sure you use 'detect_c64dtv();' before using. + */ + +unsigned char get_c64dtv_speed (void); + +/* Get the speed of the C64DTV. + * + * Possible return values: + * SPEED_1X : slow mode + * SPEED_2X : fast mode + * + * This function does not check for the presence of the C64DTV, + * make sure you use 'detect_c64dtv();' before using. + */ + +unsigned char detect_c64dtv (void); + +/* Check for the presence of the C64DTV. + * + * Possible return values: + * 0x00 : C64DTV not present + * 0x01 : C64DTV present + */ + + +/* C128 8502 CPU */ + +unsigned char __fastcall__ set_c128_speed (unsigned char speed); + +/* Set the speed of the C128 8502 CPU, using SPEED_SLOW will switch to + * 1 Mhz (slow) mode, SPEED_2X or SPEED_FAST will switch to 2Mhz (fast) mode. + * + * Note that any value higher or equal to SPEED_2X will switch to fast mode. + * + * This function will return the actual speed the CPU is at after trying + * to set the requested speed, to my knowledge the switching should not fail. + * + * This function does not check if the C128 CPU is the current CPU, make sure + * you use 'detect_c128();' before using. + */ + +unsigned char get_c128_speed (void); + +/* Get the speed of the C128 8502 CPU. + * + * Possible return values: + * SPEED_SLOW : Slow mode + * SPEED_2X : Fast mode + * + * This function does not check if the C128 CPU is the current CPU, make sure + * you use 'detect_c128();' before using. + */ + +unsigned char detect_c128 (void); + +/* Check if the C128 CPU is the current CPU. + * + * Possible return values: + * 0x00 : C128 CPU is not the current CPU + * 0x01 : C128 CPU is the current CPU + */ + + +/* C64 Chameleon cartridge */ + +unsigned char __fastcall__ set_chameleon_speed (unsigned char speed); + +/* Set the speed of the C64 Chameleon cartridge, the following inputs + * are accepted: + * SPEED_SLOW : 1 Mhz mode + * SPEED_1X : 1 Mhz mode + * SPEED_2X : 2 Mhz mode + * SPEED_3X : 3 Mhz mode + * SPEED_4X : 4 Mhz mode + * SPEED_5X : 5 Mhz mode + * SPEED_6X : 6 Mhz mode + * SPEED_FAST : Maximum speed mode + * + * Note that any value higher or equal to SPEED_7X will switch to maximum + * speed mode. + * + * This function will return the actual speed the CPU is at after trying + * to set the requested speed, to my knowledge the switching should not fail. + * + * This function does not check for the presence of the C64 Chameleon cartridge, + * make sure you use 'detect_chameleon();' before using. + */ + +unsigned char get_chameleon_speed (void); + +;/* Get the speed of the C64 Chameleon cartridge. +; * +; * Possible return values: +; * SPEED_SLOW : Slow mode +; * SPEED_2X : 2Mhz mode +; * SPEED_3X : 3Mhz mode +; * SPEED_4X : 4Mhz mode +; * SPEED_5X : 5Mhz mode +; * SPEED_6X : 6Mhz mode +; * SPEED_FAST : Maximum speed mode +; * +; * This function does not check for the presence of the C64 Chameleon cartridge, +; * make sure you use 'detect_chameleon();' before using. +; */ + +unsigned char detect_chameleon (void); + +/* Check for the presence of the C64 Chameleon cartridge. + * + * Possible return values: + * 0x00 : C64 Chameleon cartridge not present + * 0x01 : C64 Chameleon cartridge present + */ + + +/* C65/C64DX in C64 mode */ + +unsigned char __fastcall__ set_c65_speed (unsigned char speed); + +/* Set the speed of the C65/C64DX CPU, using SPEED_SLOW will switch to + * 1 Mhz mode, SPEED_3X or SPEED_FAST will switch to 3.5 Mhz (fast) mode. + * + * Note that any value higher or equal to SPEED_3X will switch to fast mode. + * + * This function will return the actual speed the CPU is at after trying + * to set the requested speed, to my knowledge the switching should not fail. + * + * This function does not check for the presence of a C65/C64DX in C64 mode, + * make sure you use 'detect_c65();' before using. + */ + +unsigned char get_c65_speed (void); + +/* Get the speed of the C65/C64DX CPU. + * + * Possible return values: + * SPEED_SLOW : Slow mode + * SPEED_3X : Fast mode + * + * This function does not check for the presence of a C65/C64DX in C64 mode, + * make sure you use 'detect_c65();' before using. + */ + +unsigned char detect_c65 (void); + +/* Check for the presence of a C65/C64DX in C64 mode. + * + * Possible return values: + * 0x00 : C65/C64DX in C64 mode not present + * 0x01 : C65/C64DX in C64 mode present + */ + + +/* C64 Turbo Master cartridge */ + +unsigned char __fastcall__ set_turbomaster_speed (unsigned char speed); + +/* Set the speed of the Turbo Master cartridge, using SPEED_SLOW will switch to + * 1 Mhz mode, SPEED_4X or SPEED_FAST will switch to 4 Mhz mode. + * + * Note that any value higher or equal to SPEED_4X will switch to 4 Mhz mode, + * any value lower than SPEED_4X will switch to 1 Mhz mode. + * + * This function will return the actual speed the CPU is at after trying + * to set the requested speed, if the speed is different it might indicate + * that the hardware switch has locked the speed. + * + * This function does not check for the presence of a Turbo Master cartridge, + * make sure you use 'detect_turbomaster();' before using. + */ + +unsigned char get_turbomaster_speed (void); + +/* Get the speed of the Turbo Master cartridge. + * + * Possible return values: + * SPEED_SLOW : 1 Mhz mode + * SPEED_4X : 4 Mhz mode + * + * This function does not check for the presence of a Turbo Master cartridge, + * make sure you use 'detect_turbomaster();' before using. + */ + +unsigned char detect_turbomaster (void); + +/* Check for the presence of a C64 Turbo Master cartridge. + * + * Possible return values: + * 0x00 : C64 Turbo Master cartridge not present + * 0x01 : C64 Turbo Master cartridge present + */ + +/* End of accelerator.h */ +#endif + diff --git a/include/ace.h b/include/ace.h deleted file mode 100644 index fba672227..000000000 --- a/include/ace.h +++ /dev/null @@ -1,119 +0,0 @@ -/*****************************************************************************/ -/* */ -/* ace.h */ -/* */ -/* ACE system-specific definitions */ -/* */ -/* */ -/* */ -/* (C) 1998-2015, Ullrich von Bassewitz */ -/* Roemerstrasse 52 */ -/* D-70794 Filderstadt */ -/* EMail: uz@cc65.org */ -/* */ -/* */ -/* This software is provided 'as-is', without any expressed or implied */ -/* warranty. In no event will the authors be held liable for any damages */ -/* arising from the use of this software. */ -/* */ -/* Permission is granted to anyone to use this software for any purpose, */ -/* including commercial applications, and to alter it and redistribute it */ -/* freely, subject to the following restrictions: */ -/* */ -/* 1. The origin of this software must not be misrepresented; you must not */ -/* claim that you wrote the original software. If you use this software */ -/* in a product, an acknowledgment in the product documentation would be */ -/* appreciated but is not required. */ -/* 2. Altered source versions must be plainly marked as such, and must not */ -/* be misrepresented as being the original software. */ -/* 3. This notice may not be removed or altered from any source */ -/* distribution. */ -/* */ -/*****************************************************************************/ - - - -#ifndef _ACE_H -#define _ACE_H - - - -/* Check for errors */ -#if !defined(__ACE__) -# error This module may only be used when compiling for the ACE os! -#endif - - - -#ifndef _STDDEF_H -#include <stddef.h> -#endif - - - -struct aceDirentBuf { - unsigned long ad_size; /* Size in bytes */ - unsigned char ad_date [8]; /* YY:YY:MM:DD:HH:MM:SS:TW */ - char ad_type [4]; /* File type as ASCIIZ string */ - unsigned char ad_flags; /* File flags */ - unsigned char ad_usage; /* More flags */ - unsigned char ad_namelen; /* Length of name */ - char ad_name [17]; /* Name itself, ASCIIZ */ -}; - -int __cdecl__ aceDirOpen (char* dir); -int __cdecl__ aceDirClose (int handle); -int __cdecl__ aceDirRead (int handle, struct aceDirentBuf* buf); - -/* Type of an ACE key. Key in low byte, shift mask in high byte */ -typedef unsigned int aceKey; - -/* #defines for the shift mask returned by aceConGetKey */ -#define aceSH_KEY 0x00FF /* Mask key itself */ -#define aceSH_MASK 0xFF00 /* Mask shift mask */ -#define aceSH_EXT 0x2000 /* Extended key */ -#define aceSH_CAPS 0x1000 /* Caps lock key */ -#define aceSH_ALT 0x0800 /* Alternate key */ -#define aceSH_CTRL 0x0400 /* Ctrl key */ -#define aceSH_CBM 0x0200 /* Commodore key */ -#define aceSH_SHIFT 0x0100 /* Shift key */ - -/* #defines for the options in aceConSetOpt/aceConGetOpt */ -#define aceOP_PUTMASK 1 /* Console put mask */ -#define aceOP_CHARCOLOR 2 /* Character color */ -#define aceOP_CHARATTR 3 /* Character attribute */ -#define aceOP_FILLCOLOR 4 /* Fill color */ -#define aceOP_FILLATTR 5 /* Fill attribute */ -#define aceOP_CRSCOLOR 6 /* Cursor color */ -#define aceOP_CRSWRAP 7 /* Force cursor wrap */ -#define aceOP_SHSCROLL 8 /* Shift keys for scrolling */ -#define aceOP_MOUSCALE 9 /* Mouse scaling */ -#define aceOP_RPTDELAY 10 /* Key repeat delay */ -#define aceOP_RPTRATE 11 /* Key repeat rate */ - -/* Console functions */ -void __cdecl__ aceConWrite (char* buf, size_t count); -void __cdecl__ aceConPutLit (int c); -void __cdecl__ aceConPos (unsigned x, unsigned y); -void __cdecl__ aceConGetPos (unsigned* x, unsigned* y); -unsigned aceConGetX (void); -unsigned aceConGetY (void); -char __cdecl__* aceConInput (char* buf, unsigned initial); -int aceConStopKey (void); -aceKey aceConGetKey (void); -int __cdecl__ aceConKeyAvail (aceKey* key); -void __cdecl__ aceConKeyMat (char* matrix); -void __cdecl__ aceConSetOpt (unsigned char opt, unsigned char val); -int __cdecl__ aceConGetOpt (unsigned char opt); - -/* Misc stuff */ -int __cdecl__ aceMiscIoPeek (unsigned addr); -void __cdecl__ aceMiscIoPoke (unsigned addr, unsigned char val); - - - -/* End of ace.h */ -#endif - - - diff --git a/include/apple2.h b/include/apple2.h index a1b094d4d..cb15cab97 100644 --- a/include/apple2.h +++ b/include/apple2.h @@ -41,6 +41,8 @@ # error This module may only be used when compiling for the Apple ][! #endif +#include <apple2_filetype.h> + /*****************************************************************************/ @@ -50,62 +52,74 @@ /* Color defines */ -#define COLOR_BLACK 0x00 -#define COLOR_WHITE 0x01 +#define COLOR_BLACK 0x00 +#define COLOR_WHITE 0x01 /* TGI color defines */ -#define TGI_COLOR_BLACK 0x00 -#define TGI_COLOR_GREEN 0x01 -#define TGI_COLOR_VIOLET 0x02 -#define TGI_COLOR_WHITE 0x03 -#define TGI_COLOR_BLACK2 0x04 -#define TGI_COLOR_ORANGE 0x05 -#define TGI_COLOR_BLUE 0x06 -#define TGI_COLOR_WHITE2 0x07 +#define TGI_COLOR_BLACK 0x00 +#define TGI_COLOR_GREEN 0x01 +#define TGI_COLOR_PURPLE 0x02 +#define TGI_COLOR_WHITE 0x03 +#define TGI_COLOR_BLACK2 0x04 +#define TGI_COLOR_ORANGE 0x05 +#define TGI_COLOR_BLUE 0x06 +#define TGI_COLOR_WHITE2 0x07 -#define TGI_COLOR_MAGENTA TGI_COLOR_BLACK2 -#define TGI_COLOR_DARKBLUE TGI_COLOR_WHITE2 -#define TGI_COLOR_DARKGREEN 0x08 -#define TGI_COLOR_GRAY 0x09 -#define TGI_COLOR_CYAN 0x0A -#define TGI_COLOR_BROWN 0x0B -#define TGI_COLOR_GRAY2 0x0C -#define TGI_COLOR_PINK 0x0D -#define TGI_COLOR_YELLOW 0x0E -#define TGI_COLOR_AQUA 0x0F +#define TGI_COLOR_MAGENTA TGI_COLOR_BLACK2 +#define TGI_COLOR_DARKBLUE TGI_COLOR_WHITE2 +#define TGI_COLOR_DARKGREEN 0x08 +#define TGI_COLOR_GRAY 0x09 +#define TGI_COLOR_CYAN 0x0A +#define TGI_COLOR_BROWN 0x0B +#define TGI_COLOR_GRAY2 0x0C +#define TGI_COLOR_PINK 0x0D +#define TGI_COLOR_YELLOW 0x0E +#define TGI_COLOR_AQUA 0x0F /* Characters codes */ -#define CH_ENTER 0x0D -#define CH_ESC 0x1B -#define CH_CURS_LEFT 0x08 -#define CH_CURS_RIGHT 0x15 +#define CH_ENTER 0x0D +#define CH_ESC 0x1B +#define CH_CURS_LEFT 0x08 +#define CH_CURS_RIGHT 0x15 -#define CH_ULCORNER '+' -#define CH_URCORNER '+' -#define CH_LLCORNER '+' -#define CH_LRCORNER '+' -#define CH_TTEE '+' -#define CH_BTEE '+' -#define CH_LTEE '+' -#define CH_RTEE '+' -#define CH_CROSS '+' +#if !defined(__APPLE2ENH__) +#define CH_HLINE '-' +#define CH_VLINE '!' +#define CH_ULCORNER '+' +#define CH_URCORNER '+' +#define CH_LLCORNER '+' +#define CH_LRCORNER '+' +#define CH_TTEE '+' +#define CH_BTEE '+' +#define CH_LTEE '+' +#define CH_RTEE '+' +#define CH_CROSS '+' +#endif + +/* Masks for joy_read */ +#define JOY_UP_MASK 0x10 +#define JOY_DOWN_MASK 0x20 +#define JOY_LEFT_MASK 0x04 +#define JOY_RIGHT_MASK 0x08 +#define JOY_BTN_1_MASK 0x40 +#define JOY_BTN_2_MASK 0x80 /* Return codes for get_ostype */ -#define APPLE_UNKNOWN 0x00 -#define APPLE_II 0x10 /* Apple ][ */ -#define APPLE_IIPLUS 0x11 /* Apple ][+ */ -#define APPLE_IIIEM 0x20 /* Apple /// (emulation) */ -#define APPLE_IIE 0x30 /* Apple //e */ -#define APPLE_IIEENH 0x31 /* Apple //e (enhanced) */ -#define APPLE_IIECARD 0x40 /* Apple //e Option Card */ -#define APPLE_IIC 0x50 /* Apple //c */ -#define APPLE_IIC35 0x51 /* Apple //c (3.5 ROM) */ -#define APPLE_IICEXP 0x53 /* Apple //c (Mem. Exp.) */ -#define APPLE_IICREV 0x54 /* Apple //c (Rev. Mem. Exp.) */ -#define APPLE_IICPLUS 0x55 /* Apple //c Plus */ -#define APPLE_IIGS 0x80 /* Apple IIgs */ -#define APPLE_IIGS1 0x81 /* Apple IIgs (ROM 1) */ -#define APPLE_IIGS3 0x83 /* Apple IIgs (ROM 3) */ +#define APPLE_UNKNOWN 0x00 +#define APPLE_II 0x10 /* Apple ][ */ +#define APPLE_IIPLUS 0x11 /* Apple ][+ */ +#define APPLE_IIIEM 0x20 /* Apple /// (emulation) */ +#define APPLE_IIE 0x30 /* Apple //e */ +#define APPLE_IIEENH 0x31 /* Apple //e (enhanced) */ +#define APPLE_IIECARD 0x32 /* Apple //e Option Card */ +#define APPLE_IIC 0x40 /* Apple //c */ +#define APPLE_IIC35 0x41 /* Apple //c (3.5 ROM) */ +#define APPLE_IICEXP 0x43 /* Apple //c (Mem. Exp.) */ +#define APPLE_IICREV 0x44 /* Apple //c (Rev. Mem. Exp.) */ +#define APPLE_IICPLUS 0x45 /* Apple //c Plus */ +#define APPLE_IIGS 0x80 /* Apple IIgs */ +#define APPLE_IIGS1 0x81 /* Apple IIgs (ROM 1) */ +#define APPLE_IIGS3 0x83 /* Apple IIgs (ROM 3) */ extern unsigned char _dos_type; /* Valid _dos_type values: @@ -125,6 +139,7 @@ extern unsigned char _dos_type; ** ProDOS 8 2.0.1 - 0x21 ** ProDOS 8 2.0.2 - 0x22 ** ProDOS 8 2.0.3 - 0x23 +** ProDOS 8 2.4.x - 0x24 */ @@ -136,21 +151,19 @@ extern unsigned char _dos_type; /* The file stream implementation and the POSIX I/O functions will use the -** following variables to determine the file type, aux type and creation time -** stamp to use. +** following struct to set the date and time stamp on files. This specificially +** applies to the open and fopen functions. */ -extern unsigned char _filetype; /* Default: 6 */ -extern unsigned int _auxtype; /* Default: 0 */ extern struct { struct { unsigned day :5; unsigned mon :4; unsigned year :7; - } createdate; /* Current date: 0 */ + } createdate; /* Current date: 0 */ struct { unsigned char min; unsigned char hour; - } createtime; /* Current time: 0 */ + } createtime; /* Current time: 0 */ } _datetime; /* The addresses of the static drivers */ @@ -191,9 +204,11 @@ void rebootafterexit (void); ** to be overlaid by macros with the same names, saving the function call ** overhead. */ -#define _textcolor(color) COLOR_WHITE -#define _bgcolor(color) COLOR_BLACK -#define _bordercolor(color) COLOR_BLACK +#define _textcolor(color) COLOR_WHITE +#define _bgcolor(color) COLOR_BLACK +#define _bordercolor(color) COLOR_BLACK +#define _cpeekcolor() COLOR_WHITE +#define _cpeekrevers() 0 diff --git a/include/apple2_filetype.h b/include/apple2_filetype.h new file mode 100644 index 000000000..83a44f532 --- /dev/null +++ b/include/apple2_filetype.h @@ -0,0 +1,322 @@ +/*****************************************************************************/ +/* */ +/* apple2_filetype.h */ +/* */ +/* Apple ][ file type definitions */ +/* */ +/* */ +/* */ +/* (C) 2017 Bill Chatfield, <bill_chatfield@yahoo.com> */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef _APPLE2_FILETYPE_H +#define _APPLE2_FILETYPE_H + + + +/* Check for errors */ +#if !defined(__APPLE2__) +# error This module may only be used when compiling for the Apple ][! +#endif + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +/* ProDOS general file types */ +#define PRODOS_T_UNK 0x00 /* Unknown */ +#define PRODOS_T_BAD 0x01 /* Bad blocks */ +#define PRODOS_T_PCD 0x02 /* Pascal code */ +#define PRODOS_T_PTX 0x03 /* Pascal text */ +#define PRODOS_T_TXT 0x04 /* ASCII text */ +#define PRODOS_T_PDA 0x05 /* Pascal data */ +#define PRODOS_T_BIN 0x06 /* Binary */ +#define PRODOS_T_FNT 0x07 /* Apple III font */ +#define PRODOS_T_FOT 0x08 /* Hi-res, dbl hi-res graphics */ +#define PRODOS_T_BA3 0x09 /* Apple III BASIC program */ +#define PRODOS_T_DA3 0x09 /* Apple III BASIC data */ +#define PRODOS_T_WPF 0x0A /* Generic word processing */ +#define PRODOS_T_SOS 0x0B /* SOS system */ +#define PRODOS_T_DIR 0x0F /* ProDOS directory */ + +/* ProDOS productivity file types */ +#define PRODOS_T_RPD 0x10 /* RPS data */ +#define PRODOS_T_RPI 0x11 /* RPS index */ +#define PRODOS_T_AFD 0x12 /* AppleFile discard */ +#define PRODOS_T_AFM 0x13 /* AppleFile model */ +#define PRODOS_T_AFR 0x14 /* AppleFile report */ +#define PRODOS_T_SCL 0x15 /* Screen library */ +#define PRODOS_T_PFS 0x16 /* PFS document */ +#define PRODOS_T_ADB 0x19 /* AppleWorks database */ +#define PRODOS_T_AWP 0x1A /* AppleWorks word processing */ +#define PRODOS_T_ASP 0x1B /* AppleWorks spreadsheet */ + +/* ProDOS code file types */ +#define PRODOS_T_TDM 0x20 /* Desktop Manager */ +#define PRODOS_T_IPS 0x21 /* Instant Pascal source */ +#define PRODOS_T_UPV 0x22 /* USCD Pascal volume */ +#define PRODOS_T_3SD 0x29 /* SOS directory */ +#define PRODOS_T_8SC 0x2A /* Source code */ +#define PRODOS_T_8OB 0x2B /* Object code */ +#define PRODOS_T_8IC 0x2C /* Interpreted code */ +#define PRODOS_T_8LD 0x2D /* Language data */ +#define PRODOS_T_P8C 0x2E /* ProDOS 8 code module */ + +/* ProDOS miscellaneous file types */ +#define PRODOS_T_OCR 0x41 /* Optical char recognition */ +#define PRODOS_T_FTD 0x42 /* File type definitions */ + +/* ProDOS Apple IIgs general file types */ +#define PRODOS_T_GWP 0x50 /* Apple IIgs word processing */ +#define PRODOS_T_GSS 0x51 /* Apple IIgs spreadsheet */ +#define PRODOS_T_GDB 0x52 /* Apple IIgs database */ +#define PRODOS_T_DRW 0x53 /* Object oriented graphics */ +#define PRODOS_T_GDP 0x54 /* Apple IIgs desktop publish */ +#define PRODOS_T_HMD 0x55 /* HyperMedia */ +#define PRODOS_T_EDU 0x56 /* Educational program data */ +#define PRODOS_T_STN 0x57 /* Stationary */ +#define PRODOS_T_HLP 0x58 /* Help */ +#define PRODOS_T_COM 0x59 /* Communications */ +#define PRODOS_T_CFG 0x5A /* Configuration */ +#define PRODOS_T_ANM 0x5B /* Animation */ +#define PRODOS_T_MUM 0x5C /* Multimedia */ +#define PRODOS_T_ENT 0x5D /* Entertainment */ +#define PRODOS_T_DVU 0x5E /* Development utility */ + +/* ProDOS PC Transporter file types */ +#define PRODOS_T_PRE 0x60 /* PC pre-boot */ +#define PRODOS_T_BIO 0x6B /* PC BIOS */ +#define PRODOS_T_NCF 0x66 /* ProDOS File Nav command file */ +#define PRODOS_T_DVR 0x6D /* PC driver */ +#define PRODOS_T_PRE2 0x6E /* PC pre-boot */ +#define PRODOS_T_HDV 0x6F /* PC hard disk image */ + +/* ProDOS Kreative Software file types */ +#define PRODOS_T_SN2 0x70 /* Sabine's Notebook 2.0 */ +#define PRODOS_T_KMT 0x71 +#define PRODOS_T_DSR 0x72 +#define PRODOS_T_BAN 0x73 +#define PRODOS_T_CG7 0x74 +#define PRODOS_T_TNJ 0x75 +#define PRODOS_T_SA7 0x76 +#define PRODOS_T_KES 0x77 +#define PRODOS_T_JAP 0x78 +#define PRODOS_T_CSL 0x79 +#define PRODOS_T_TME 0x7A +#define PRODOS_T_TLB 0x7B +#define PRODOS_T_MR7 0x7C +#define PRODOS_T_MLR 0x7D /* Mika City */ +#define PRODOS_T_MMM 0x7E +#define PRODOS_T_JCP 0x7F + +/* ProDOS GEOS file types */ +#define PRODOS_T_GES 0x80 /* GEOS system file */ +#define PRODOS_T_GEA 0x81 /* GEOS desk accessory */ +#define PRODOS_T_GEO 0x82 /* GEOS application */ +#define PRODOS_T_GED 0x83 /* GEOS document */ +#define PRODOS_T_GEF 0x84 /* GEOS font */ +#define PRODOS_T_GEP 0x85 /* GEOS printer driver */ +#define PRODOS_T_GEI 0x86 /* GEOS input driver */ +#define PRODOS_T_GEX 0x87 /* GEOS auxiliary driver */ +#define PRODOS_T_GEV 0x89 /* GEOS swap file */ +#define PRODOS_T_GEC 0x8B /* GEOS clock driver */ +#define PRODOS_T_GEK 0x8C /* GEOS interface card driver */ +#define PRODOS_T_GEW 0x8D /* GEOS formatting data */ + +/* ProDOS Apple IIgs BASIC file types */ +#define PRODOS_T_WP 0xA0 /* WordPerfect */ +#define PRODOS_T_GSB 0xAB /* Apple IIgs BASIC program */ +#define PRODOS_T_TDF 0xAB /* Apple IIgs BASIC TDF */ +#define PRODOS_T_BDF 0xAB /* Apple IIgs BASIC data */ + +/* ProDOS Apple IIgs system file types */ +#define PRODOS_T_SRC 0xB0 /* Apple IIgs source code */ +#define PRODOS_T_OBJ 0xB1 /* Apple IIgs object code */ +#define PRODOS_T_LIB 0xB2 /* Apple IIgs library */ +#define PRODOS_T_S16 0xB3 /* Apple IIgs application pgm */ +#define PRODOS_T_RTL 0xB4 /* Apple IIgs runtime library */ +#define PRODOS_T_EXE 0xB5 /* Apple IIgs shell script */ +#define PRODOS_T_PIF 0xB6 /* Apple IIgs permanent init */ +#define PRODOS_T_TIF 0xB7 /* Apple IIgs temporary init */ +#define PRODOS_T_NDA 0xB8 /* Apple IIgs new desk accesry */ +#define PRODOS_T_CDA 0xB9 /* Apple IIgs classic desk aces */ +#define PRODOS_T_TOL 0xBA /* Apple IIgs tool */ +#define PRODOS_T_DRV 0xBB /* Apple IIgs device driver */ +#define PRODOS_T_LDF 0xBC /* Apple IIgs generic load file */ +#define PRODOS_T_FST 0xBD /* Apple IIgs file sys translat */ +#define PRODOS_T_DOC 0xBF /* Apple IIgs document */ + +/* ProDOS graphics file types */ +#define PRODOS_T_PNT 0xC0 /* Apple IIgs packed sup hi-res */ +#define PRODOS_T_PIC 0xC1 /* Apple IIgs super hi-res */ +#define PRODOS_T_ANI 0xC2 /* PaintWorks animation */ +#define PRODOS_T_PAL 0xC3 /* PaintWorks palette */ +#define PRODOS_T_OOG 0xC5 /* Object-oriented graphics */ +#define PRODOS_T_SCR 0xC6 /* Script */ +#define PRODOS_T_CDV 0xC7 /* Apple IIgs control panel */ +#define PRODOS_T_FON 0xC8 /* Apple IIgs font */ +#define PRODOS_T_FND 0xC9 /* Apple IIgs Finder data */ +#define PRODOS_T_ICN 0xCA /* Apple IIgs icon */ + +/* ProDOS audio file types */ +#define PRODOS_T_MUS 0xD5 /* Music */ +#define PRODOS_T_INS 0xD6 /* Instrument */ +#define PRODOS_T_MID 0xD7 /* MIDI */ +#define PRODOS_T_SND 0xD8 /* Apple IIgs audio */ +#define PRODOS_T_DBM 0xDB /* DB master document */ + +/* ProDOS miscellaneous file types */ +#define PRODOS_T_LBR 0xE0 /* Archive */ +#define PRODOS_T_ATK 0xE2 /* AppleTalk data */ +#define PRODOS_T_R16 0xEE /* EDASM 816 relocatable code */ +#define PRODOS_T_PAR 0xEF /* Pascal area */ + +/* ProDOS system file types */ +#define PRODOS_T_CMD 0xF0 /* ProDOS command file */ +#define PRODOS_T_OVL 0xF1 /* User defined 1 */ +#define PRODOS_T_UD2 0xF2 /* User defined 2 */ +#define PRODOS_T_UD3 0xF3 /* User defined 3 */ +#define PRODOS_T_UD4 0xF4 /* User defined 4 */ +#define PRODOS_T_BAT 0xF5 /* User defined 5 */ +#define PRODOS_T_UD6 0xF6 /* User defined 6 */ +#define PRODOS_T_UD7 0xF7 /* User defined 7 */ +#define PRODOS_T_PRG 0xF8 /* User defined 8 */ +#define PRODOS_T_P16 0xF9 /* ProDOS-16 system file */ +#define PRODOS_T_INT 0xFA /* Integer BASIC program */ +#define PRODOS_T_IVR 0xFB /* Integer BASIC variables */ +#define PRODOS_T_BAS 0xFC /* Applesoft BASIC program */ +#define PRODOS_T_VAR 0xFD /* Applesoft BASIC variables */ +#define PRODOS_T_REL 0xFE /* EDASM relocatable code */ +#define PRODOS_T_SYS 0xFF /* ProDOS-8 system file */ + +/* The auxiliary type of a text file specifies its record length. +** A record length of 0 indicates a sequential text file, which is +** equivalent to text files of other operating systems like MacOS +** or Windows, except that lines are delimited by carriage returns +** only. An auxiliary type value greater than 0 for a text file, +** which is the record length, indicates a random access text file +** with fixed-length lines. +*/ +#define PRODOS_AUX_T_TXT_SEQ 0x0000 /* Sequential text */ + +/* 8IC auxiliary types */ +#define PRODOS_AUX_T_8IC_APEX_PGM 0x8003 /* Apex program */ + +/* GWP auxiliary types */ +#define PRODOS_AUX_T_GWP_TEACH 0x5445 /* Teach */ +#define PRODOS_AUX_T_GWP_DELUXEWRITE 0x8001 /* DeluxeWrite */ +#define PRODOS_AUX_T_GWP_APPLEWORKS_GS 0x8010 /* AppleWorks GS */ + +/* GSS auxiliary types */ +#define PRODOS_AUX_T_GSS_APPLEWORKS_GS 0x8010 /* AppleWorks GS */ + +/* GDB auxiliary types */ +#define PRODOS_AUX_T_GDB_APPLEWORKS_GS 0x8010 /* AppleWorks GS DB */ +#define PRODOS_AUX_T_GDB_AWGS_TMPL 0x8011 /* AWGS template */ +#define PRODOS_AUX_T_GDB_GSAS 0x8013 + +/* DRW auxiliary types */ +#define PRODOS_AUX_T_DRW_OO_GRAPHICS 0x8013 /* AWGS O-O graphics */ + +/* GDP auxiliary types */ +#define PRODOS_AUX_T_GDP_GRAPHICWRITER 0x8002 /* A2gs GraphicWriter */ +#define PRODOS_AUX_T_GDP_APPLEWORKS_GS 0x8010 /* A2gs AWGS */ + +/* HMD auxiliary types */ +#define PRODOS_AUX_T_HMD_HYPERCARD_GS 0x0001 /* HyperCard GS */ +#define PRODOS_AUX_T_HMD_TUTOR_TECH 0x8001 /* Tutor-Tech */ +#define PRODOS_AUX_T_HMD_HYPERSTUDIO 0x8002 /* HyperStudio */ +#define PRODOS_AUX_T_HMD_NEXUS 0x8003 /* Nexus */ + +/* COM auxiliary types */ +#define PRODOS_AUX_T_COM_APPLEWORKS_GS 0x8003 /* AppleWorks GS */ + +/* MLR auxiliary types */ +#define PRODOS_AUX_T_MLR_SCRIPT 0x005C /* Mika City script */ +#define PRODOS_AUX_T_MLR_COLOR_TABLE 0xC7AB /* Mika City color table */ +#define PRODOS_AUX_T_MLR_CHARACTER_DEF 0xCDEF /* Mika City character def */ + +/* LDF auxiliary types */ +#define PRODOS_AUX_T_LDF_NIFTY_LIST_MOD 0x4001 /* Nifty list module */ +#define PRODOS_AUX_T_LDF_SUPER_INFO_MOD 0x4002 /* Super info module */ +#define PRODOS_AUX_T_LDF_TWILIGHT_MOD 0x4004 /* Twilight module */ +#define PRODOS_AUX_T_LDF_MARINETTI_LLM 0x4004 /* Marinetti link layer mod */ + +/* PNT auxiliary types */ +#define PRODOS_AUX_T_PNT_PK_SUPER_HIRES 0x0001 /* Packed super hi-res */ +#define PRODOS_AUX_T_PNT_APPLE_PREF 0x0002 /* Apple preferred format */ +#define PRODOS_AUX_T_PNT_PK_QUICKDRAWII 0x0003 /* Packed QuickDraw II */ + +/* PIC auxiliary types */ +#define PRODOS_AUX_T_PIC_QUICKDRAW 0x0001 /* QuickDraw image */ +#define PRODOS_AUX_T_PIC_SHIRES_3200 0x0002 /* Super hi-res 3200 */ + +/* FON auxiliary types */ +#define PRODOS_AUX_T_FON_QUICKDRAW_BIT 0x0000 /* QuickDraw bitmap font */ +#define PRODOS_AUX_T_FON_POINTLESS_TT 0x0001 /* Pointless TrueType font */ + +/* SND auxiliary types */ +#define PRODOS_AUX_T_SND_AIFF 0x0000 /* AIFF */ +#define PRODOS_AUX_T_SND_AIFF_C 0x0001 /* AIFF-C */ +#define PRODOS_AUX_T_SND_ASIF_INSTR 0x0002 /* ASIF instrument */ +#define PRODOS_AUX_T_SND_SOUND_RSRC 0x0003 /* Sound resource */ +#define PRODOS_AUX_T_SND_MIDI_SYNTH_WAV 0x0004 /* MIDI synth wave */ +#define PRODOS_AUX_T_SND_HYPERSTUDIO 0x8001 /* HyperStudio sound */ + +/* LBR auxiliary types */ +#define PRODOS_AUX_T_LBR_ALU 0x0000 /* ALU */ +#define PRODOS_AUX_T_LBR_APPLE_SINGLE 0x0001 /* AppleSingle */ +#define PRODOS_AUX_T_LBR_APPLEDBL_HDR 0x0002 /* AppleDouble header */ +#define PRODOS_AUX_T_LBR_APPLEDBL_DATA 0x0003 /* AppleDouble data */ +#define PRODOS_AUX_T_LBR_BINARY_II 0x8000 /* Binary II */ +#define PRODOS_AUX_T_LBR_APPLELINK_ACU 0x8001 /* AppleLink ACU */ +#define PRODOS_AUX_T_LBR_SHRINKIT 0x8002 /* ShrinkIt */ + +/* LBR auxiliary types */ +#define PRODOS_AUX_T_ATK_EASYMNT_ALIAS 0x0000 /* EasyMount alias */ + +/* BAS auxiliary types */ +#define PRODOS_AUX_T_BAS_PGM_LOAD_ADDR 0x0801 /* Applesoft pgm load addr */ + + + +/*****************************************************************************/ +/* Variables */ +/*****************************************************************************/ + + + +/* The file stream implementation and the POSIX I/O functions will use the +** following variables to determine the file type and auxiliary type to use. +** This applies specifically to the fopen and open functions. +*/ +extern unsigned char _filetype; /* Default: PRODOS_T_BIN */ +extern unsigned int _auxtype; /* Default: 0 */ + +/* End of apple2_filetype.h */ +#endif diff --git a/include/apple2enh.h b/include/apple2enh.h index cc62f70b7..58e0b397f 100644 --- a/include/apple2enh.h +++ b/include/apple2enh.h @@ -42,10 +42,7 @@ -/* If not already done, include the apple2.h header file */ -#if !defined(_APPLE2_H) -# include <apple2.h> -#endif +#include <apple2.h> @@ -56,9 +53,21 @@ /* Characters codes */ -#define CH_DEL 0x7F -#define CH_CURS_UP 0x0B -#define CH_CURS_DOWN 0x0A +#define CH_DEL 0x7F +#define CH_CURS_UP 0x0B +#define CH_CURS_DOWN 0x0A + +#define CH_HLINE 0x5F +#define CH_VLINE 0xDF +#define CH_ULCORNER 0x5F +#define CH_URCORNER 0x20 +#define CH_LLCORNER 0xD4 +#define CH_LRCORNER 0xDF +#define CH_TTEE 0x5F +#define CH_BTEE 0xD4 +#define CH_LTEE 0xD4 +#define CH_RTEE 0xDF +#define CH_CROSS 0xD4 /* These are defined to be OpenApple + NumberKey */ #define CH_F1 0xB1 @@ -72,15 +81,11 @@ #define CH_F9 0xB9 #define CH_F10 0xB0 -/* Styles for textframe */ -#define TEXTFRAME_WIDE 0x00 -#define TEXTFRAME_TALL 0x04 - /* Video modes */ -#define VIDEOMODE_40x24 0x0011 -#define VIDEOMODE_80x24 0x0012 -#define VIDEOMODE_40COL VIDEOMODE_40x24 -#define VIDEOMODE_80COL VIDEOMODE_80x24 +#define VIDEOMODE_40x24 0x0011 +#define VIDEOMODE_80x24 0x0012 +#define VIDEOMODE_40COL VIDEOMODE_40x24 +#define VIDEOMODE_80COL VIDEOMODE_80x24 @@ -106,22 +111,14 @@ extern void a2e_lo_tgi[]; -void __fastcall__ textframe (unsigned char width, unsigned char height, - unsigned char style); -/* Output a frame on the text screen with the given width and height -** starting at the current cursor position and using the given style. -*/ - -void __fastcall__ textframexy (unsigned char x, unsigned char y, - unsigned char width, unsigned char height, - unsigned char style); -/* Same as "gotoxy (x, y); textframe (width, height, style);" */ - unsigned __fastcall__ videomode (unsigned mode); /* Set the video mode, return the old mode. Call with one of the VIDEOMODE_xx ** constants. */ +void waitvsync (void); +/* Wait for start of next frame */ + /* End of apple2enh.h */ diff --git a/include/ascii_charmap.h b/include/ascii_charmap.h new file mode 100644 index 000000000..876dab183 --- /dev/null +++ b/include/ascii_charmap.h @@ -0,0 +1,295 @@ +/*****************************************************************************/ +/* */ +/* ascii_charmap.h */ +/* */ +/* No translations, encodings are stored as they were typed in the host. */ +/* */ +/* */ +/* 2019-09-07, Greg King */ +/* */ +/* This software is provided "as-is", without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated, but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice must not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + +/* No include guard here. Each charnap header +** may be included many times in a source file. +*/ + +#pragma warn (remap-zero, push, off) + +/* ASCII */ +#pragma charmap (0x00, 0x00) +#pragma charmap (0x01, 0x01) +#pragma charmap (0x02, 0x02) +#pragma charmap (0x03, 0x03) +#pragma charmap (0x04, 0x04) +#pragma charmap (0x05, 0x05) +#pragma charmap (0x06, 0x06) +#pragma charmap (0x07, 0x07) +#pragma charmap (0x08, 0x08) +#pragma charmap (0x09, 0x09) +#pragma charmap (0x0A, 0x0A) +#pragma charmap (0x0B, 0x0B) +#pragma charmap (0x0C, 0x0C) +#pragma charmap (0x0D, 0x0D) +#pragma charmap (0x0E, 0x0E) +#pragma charmap (0x0F, 0x0F) +#pragma charmap (0x10, 0x10) +#pragma charmap (0x11, 0x11) +#pragma charmap (0x12, 0x12) +#pragma charmap (0x13, 0x13) +#pragma charmap (0x14, 0x14) +#pragma charmap (0x15, 0x15) +#pragma charmap (0x16, 0x16) +#pragma charmap (0x17, 0x17) +#pragma charmap (0x18, 0x18) +#pragma charmap (0x19, 0x19) +#pragma charmap (0x1A, 0x1A) +#pragma charmap (0x1B, 0x1B) +#pragma charmap (0x1C, 0x1C) +#pragma charmap (0x1D, 0x1D) +#pragma charmap (0x1E, 0x1E) +#pragma charmap (0x1F, 0x1F) +#pragma charmap (0x20, 0x20) +#pragma charmap (0x21, 0x21) +#pragma charmap (0x22, 0x22) +#pragma charmap (0x23, 0x23) +#pragma charmap (0x24, 0x24) +#pragma charmap (0x25, 0x25) +#pragma charmap (0x26, 0x26) +#pragma charmap (0x27, 0x27) +#pragma charmap (0x28, 0x28) +#pragma charmap (0x29, 0x29) +#pragma charmap (0x2A, 0x2A) +#pragma charmap (0x2B, 0x2B) +#pragma charmap (0x2C, 0x2C) +#pragma charmap (0x2D, 0x2D) +#pragma charmap (0x2E, 0x2E) +#pragma charmap (0x2F, 0x2F) +#pragma charmap (0x30, 0x30) +#pragma charmap (0x31, 0x31) +#pragma charmap (0x32, 0x32) +#pragma charmap (0x33, 0x33) +#pragma charmap (0x34, 0x34) +#pragma charmap (0x35, 0x35) +#pragma charmap (0x36, 0x36) +#pragma charmap (0x37, 0x37) +#pragma charmap (0x38, 0x38) +#pragma charmap (0x39, 0x39) +#pragma charmap (0x3A, 0x3A) +#pragma charmap (0x3B, 0x3B) +#pragma charmap (0x3C, 0x3C) +#pragma charmap (0x3D, 0x3D) +#pragma charmap (0x3E, 0x3E) +#pragma charmap (0x3F, 0x3F) +#pragma charmap (0x40, 0x40) +#pragma charmap (0x41, 0x41) +#pragma charmap (0x42, 0x42) +#pragma charmap (0x43, 0x43) +#pragma charmap (0x44, 0x44) +#pragma charmap (0x45, 0x45) +#pragma charmap (0x46, 0x46) +#pragma charmap (0x47, 0x47) +#pragma charmap (0x48, 0x48) +#pragma charmap (0x49, 0x49) +#pragma charmap (0x4A, 0x4A) +#pragma charmap (0x4B, 0x4B) +#pragma charmap (0x4C, 0x4C) +#pragma charmap (0x4D, 0x4D) +#pragma charmap (0x4E, 0x4E) +#pragma charmap (0x4F, 0x4F) +#pragma charmap (0x50, 0x50) +#pragma charmap (0x51, 0x51) +#pragma charmap (0x52, 0x52) +#pragma charmap (0x53, 0x53) +#pragma charmap (0x54, 0x54) +#pragma charmap (0x55, 0x55) +#pragma charmap (0x56, 0x56) +#pragma charmap (0x57, 0x57) +#pragma charmap (0x58, 0x58) +#pragma charmap (0x59, 0x59) +#pragma charmap (0x5A, 0x5A) +#pragma charmap (0x5B, 0x5B) +#pragma charmap (0x5C, 0x5C) +#pragma charmap (0x5D, 0x5D) +#pragma charmap (0x5E, 0x5E) +#pragma charmap (0x5F, 0x5F) +#pragma charmap (0x60, 0x60) +#pragma charmap (0x61, 0x61) +#pragma charmap (0x62, 0x62) +#pragma charmap (0x63, 0x63) +#pragma charmap (0x64, 0x64) +#pragma charmap (0x65, 0x65) +#pragma charmap (0x66, 0x66) +#pragma charmap (0x67, 0x67) +#pragma charmap (0x68, 0x68) +#pragma charmap (0x69, 0x69) +#pragma charmap (0x6A, 0x6A) +#pragma charmap (0x6B, 0x6B) +#pragma charmap (0x6C, 0x6C) +#pragma charmap (0x6D, 0x6D) +#pragma charmap (0x6E, 0x6E) +#pragma charmap (0x6F, 0x6F) +#pragma charmap (0x70, 0x70) +#pragma charmap (0x71, 0x71) +#pragma charmap (0x72, 0x72) +#pragma charmap (0x73, 0x73) +#pragma charmap (0x74, 0x74) +#pragma charmap (0x75, 0x75) +#pragma charmap (0x76, 0x76) +#pragma charmap (0x77, 0x77) +#pragma charmap (0x78, 0x78) +#pragma charmap (0x79, 0x79) +#pragma charmap (0x7A, 0x7A) +#pragma charmap (0x7B, 0x7B) +#pragma charmap (0x7C, 0x7C) +#pragma charmap (0x7D, 0x7D) +#pragma charmap (0x7E, 0x7E) +#pragma charmap (0x7F, 0x7F) + +/* beyond ASCII */ +#pragma charmap (0x80, 0x80) +#pragma charmap (0x81, 0x81) +#pragma charmap (0x82, 0x82) +#pragma charmap (0x83, 0x83) +#pragma charmap (0x84, 0x84) +#pragma charmap (0x85, 0x85) +#pragma charmap (0x86, 0x86) +#pragma charmap (0x87, 0x87) +#pragma charmap (0x88, 0x88) +#pragma charmap (0x89, 0x89) +#pragma charmap (0x8A, 0x8A) +#pragma charmap (0x8B, 0x8B) +#pragma charmap (0x8C, 0x8C) +#pragma charmap (0x8D, 0x8D) +#pragma charmap (0x8E, 0x8E) +#pragma charmap (0x8F, 0x8F) +#pragma charmap (0x90, 0x90) +#pragma charmap (0x91, 0x91) +#pragma charmap (0x92, 0x92) +#pragma charmap (0x93, 0x93) +#pragma charmap (0x94, 0x94) +#pragma charmap (0x95, 0x95) +#pragma charmap (0x96, 0x96) +#pragma charmap (0x97, 0x97) +#pragma charmap (0x98, 0x98) +#pragma charmap (0x99, 0x99) +#pragma charmap (0x9A, 0x9A) +#pragma charmap (0x9B, 0x9B) +#pragma charmap (0x9C, 0x9C) +#pragma charmap (0x9D, 0x9D) +#pragma charmap (0x9E, 0x9E) +#pragma charmap (0x9F, 0x9F) +#pragma charmap (0xA0, 0xA0) +#pragma charmap (0xA1, 0xA1) +#pragma charmap (0xA2, 0xA2) +#pragma charmap (0xA3, 0xA3) +#pragma charmap (0xA4, 0xA4) +#pragma charmap (0xA5, 0xA5) +#pragma charmap (0xA6, 0xA6) +#pragma charmap (0xA7, 0xA7) +#pragma charmap (0xA8, 0xA8) +#pragma charmap (0xA9, 0xA9) +#pragma charmap (0xAA, 0xAA) +#pragma charmap (0xAB, 0xAB) +#pragma charmap (0xAC, 0xAC) +#pragma charmap (0xAD, 0xAD) +#pragma charmap (0xAE, 0xAE) +#pragma charmap (0xAF, 0xAF) +#pragma charmap (0xB0, 0xB0) +#pragma charmap (0xB1, 0xB1) +#pragma charmap (0xB2, 0xB2) +#pragma charmap (0xB3, 0xB3) +#pragma charmap (0xB4, 0xB4) +#pragma charmap (0xB5, 0xB5) +#pragma charmap (0xB6, 0xB6) +#pragma charmap (0xB7, 0xB7) +#pragma charmap (0xB8, 0xB8) +#pragma charmap (0xB9, 0xB9) +#pragma charmap (0xBA, 0xBA) +#pragma charmap (0xBB, 0xBB) +#pragma charmap (0xBC, 0xBC) +#pragma charmap (0xBD, 0xBD) +#pragma charmap (0xBE, 0xBE) +#pragma charmap (0xBF, 0xBF) +#pragma charmap (0xC0, 0xC0) +#pragma charmap (0xC1, 0xC1) +#pragma charmap (0xC2, 0xC2) +#pragma charmap (0xC3, 0xC3) +#pragma charmap (0xC4, 0xC4) +#pragma charmap (0xC5, 0xC5) +#pragma charmap (0xC6, 0xC6) +#pragma charmap (0xC7, 0xC7) +#pragma charmap (0xC8, 0xC8) +#pragma charmap (0xC9, 0xC9) +#pragma charmap (0xCA, 0xCA) +#pragma charmap (0xCB, 0xCB) +#pragma charmap (0xCC, 0xCC) +#pragma charmap (0xCD, 0xCD) +#pragma charmap (0xCE, 0xCE) +#pragma charmap (0xCF, 0xCF) +#pragma charmap (0xD0, 0xD0) +#pragma charmap (0xD1, 0xD1) +#pragma charmap (0xD2, 0xD2) +#pragma charmap (0xD3, 0xD3) +#pragma charmap (0xD4, 0xD4) +#pragma charmap (0xD5, 0xD5) +#pragma charmap (0xD6, 0xD6) +#pragma charmap (0xD7, 0xD7) +#pragma charmap (0xD8, 0xD8) +#pragma charmap (0xD9, 0xD9) +#pragma charmap (0xDA, 0xDA) +#pragma charmap (0xDB, 0xDB) +#pragma charmap (0xDC, 0xDC) +#pragma charmap (0xDD, 0xDD) +#pragma charmap (0xDE, 0xDE) +#pragma charmap (0xDF, 0xDF) +#pragma charmap (0xE0, 0xE0) +#pragma charmap (0xE1, 0xE1) +#pragma charmap (0xE2, 0xE2) +#pragma charmap (0xE3, 0xE3) +#pragma charmap (0xE4, 0xE4) +#pragma charmap (0xE5, 0xE5) +#pragma charmap (0xE6, 0xE6) +#pragma charmap (0xE7, 0xE7) +#pragma charmap (0xE8, 0xE8) +#pragma charmap (0xE9, 0xE9) +#pragma charmap (0xEA, 0xEA) +#pragma charmap (0xEB, 0xEB) +#pragma charmap (0xEC, 0xEC) +#pragma charmap (0xED, 0xED) +#pragma charmap (0xEE, 0xEE) +#pragma charmap (0xEF, 0xEF) +#pragma charmap (0xF0, 0xF0) +#pragma charmap (0xF1, 0xF1) +#pragma charmap (0xF2, 0xF2) +#pragma charmap (0xF3, 0xF3) +#pragma charmap (0xF4, 0xF4) +#pragma charmap (0xF5, 0xF5) +#pragma charmap (0xF6, 0xF6) +#pragma charmap (0xF7, 0xF7) +#pragma charmap (0xF8, 0xF8) +#pragma charmap (0xF9, 0xF9) +#pragma charmap (0xFA, 0xFA) +#pragma charmap (0xFB, 0xFB) +#pragma charmap (0xFC, 0xFC) +#pragma charmap (0xFD, 0xFD) +#pragma charmap (0xFE, 0xFE) +#pragma charmap (0xFF, 0xFF) + +#pragma warn (remap-zero, pop) diff --git a/include/assert.h b/include/assert.h index 504964dc2..a4dcd5d7f 100644 --- a/include/assert.h +++ b/include/assert.h @@ -46,10 +46,14 @@ extern void __fastcall__ _afailed (const char*, unsigned); # define assert(expr) ((expr)? (void)0 : _afailed(__FILE__, __LINE__)) #endif - - -/* End of assert.h */ +/* TODO: Guard with #if __CC65_STD__ >= __CC65_STD_C11__ if there +** is a C11 mode. +*/ +#if __CC65_STD__ > __CC65_STD_C99__ +# define static_assert _Static_assert #endif +/* End of assert.h */ +#endif diff --git a/include/atari.h b/include/atari.h index 82cd07330..781ee7a80 100644 --- a/include/atari.h +++ b/include/atari.h @@ -6,9 +6,11 @@ /* */ /* */ /* */ -/* (C) 2000-2006 Mark Keates <markk@dendrite.co.uk> */ +/* (C) 2000-2021 Mark Keates <markk@dendrite.co.uk> */ /* Freddy Offenga <taf_offenga@yahoo.com> */ /* Christian Groessler <chris@groessler.org> */ +/* Bill Kendrick <nbs@sonic.net> */ +/* et al. */ /* */ /* */ /* This software is provided 'as-is', without any expressed or implied */ @@ -36,15 +38,16 @@ #define _ATARI_H - /* Check for errors */ #if !defined(__ATARI__) # error This module may only be used when compiling for the Atari! #endif +/*****************************************************************************/ +/* Character codes */ +/*****************************************************************************/ -/* Character codes */ #define CH_DELCHR 0xFE /* delete char under the cursor */ #define CH_ENTER 0x9B #define CH_ESC 0x1B @@ -86,88 +89,168 @@ #define CH_HLINE 0x12 #define CH_VLINE 0x7C -/* color defines */ -/* make GTIA color value */ -#define _gtia_mkcolor(hue,lum) (((hue) << 4) | ((lum) << 1)) +/*****************************************************************************/ +/* Masks for joy_read */ +/*****************************************************************************/ -/* luminance values go from 0 (black) to 7 (white) */ +#define JOY_UP_MASK 0x01 +#define JOY_DOWN_MASK 0x02 +#define JOY_LEFT_MASK 0x04 +#define JOY_RIGHT_MASK 0x08 +#define JOY_BTN_1_MASK 0x10 -/* hue values */ -#define HUE_GREY 0 -#define HUE_GOLD 1 -#define HUE_GOLDORANGE 2 -#define HUE_REDORANGE 3 -#define HUE_ORANGE 4 -#define HUE_MAGENTA 5 -#define HUE_PURPLE 6 -#define HUE_BLUE 7 -#define HUE_BLUE2 8 -#define HUE_CYAN 9 -#define HUE_BLUEGREEN 10 -#define HUE_BLUEGREEN2 11 -#define HUE_GREEN 12 -#define HUE_YELLOWGREEN 13 -#define HUE_YELLOW 14 -#define HUE_YELLOWRED 15 +#define JOY_FIRE_MASK JOY_BTN_1_MASK +#define JOY_FIRE(v) ((v) & JOY_FIRE_MASK) -/* Color defines, similar to c64 colors (untested) */ -/* Note that the conio color implementation is monochrome (bgcolor and textcolor are only placeholders) */ -/* Use the defines with the setcolor() or _atari_xxxcolor() functions */ -#define COLOR_BLACK _gtia_mkcolor(HUE_GREY,0) -#define COLOR_WHITE _gtia_mkcolor(HUE_GREY,7) -#define COLOR_RED _gtia_mkcolor(HUE_REDORANGE,1) -#define COLOR_CYAN _gtia_mkcolor(HUE_CYAN,3) -#define COLOR_VIOLET _gtia_mkcolor(HUE_PURPLE,4) -#define COLOR_GREEN _gtia_mkcolor(HUE_GREEN,2) -#define COLOR_BLUE _gtia_mkcolor(HUE_BLUE,2) -#define COLOR_YELLOW _gtia_mkcolor(HUE_YELLOW,7) -#define COLOR_ORANGE _gtia_mkcolor(HUE_ORANGE,5) -#define COLOR_BROWN _gtia_mkcolor(HUE_YELLOW,2) -#define COLOR_LIGHTRED _gtia_mkcolor(HUE_REDORANGE,6) -#define COLOR_GRAY1 _gtia_mkcolor(HUE_GREY,2) -#define COLOR_GRAY2 _gtia_mkcolor(HUE_GREY,3) -#define COLOR_LIGHTGREEN _gtia_mkcolor(HUE_GREEN,6) -#define COLOR_LIGHTBLUE _gtia_mkcolor(HUE_BLUE,6) -#define COLOR_GRAY3 _gtia_mkcolor(HUE_GREY,5) -/* TGI color defines */ -#define TGI_COLOR_BLACK COLOR_BLACK -#define TGI_COLOR_WHITE COLOR_WHITE -#define TGI_COLOR_RED COLOR_RED -#define TGI_COLOR_CYAN COLOR_CYAN -#define TGI_COLOR_VIOLET COLOR_VIOLET -#define TGI_COLOR_GREEN COLOR_GREEN -#define TGI_COLOR_BLUE COLOR_BLUE -#define TGI_COLOR_YELLOW COLOR_YELLOW -#define TGI_COLOR_ORANGE COLOR_ORANGE -#define TGI_COLOR_BROWN COLOR_BROWN -#define TGI_COLOR_LIGHTRED COLOR_LIGHTRED -#define TGI_COLOR_GRAY1 COLOR_GRAY1 -#define TGI_COLOR_GRAY2 COLOR_GRAY2 -#define TGI_COLOR_LIGHTGREEN COLOR_LIGHTGREEN -#define TGI_COLOR_LIGHTBLUE COLOR_LIGHTBLUE -#define TGI_COLOR_GRAY3 COLOR_GRAY3 +/*****************************************************************************/ +/* Keyboard values returned by kbcode / CH */ +/*****************************************************************************/ -/* color register functions */ -extern void __fastcall__ _setcolor (unsigned char color_reg, unsigned char hue, unsigned char luminace); +#define KEY_NONE ((unsigned char) 0xFF) + +#define KEY_0 ((unsigned char) 0x32) +#define KEY_1 ((unsigned char) 0x1F) +#define KEY_2 ((unsigned char) 0x1E) +#define KEY_3 ((unsigned char) 0x1A) +#define KEY_4 ((unsigned char) 0x18) +#define KEY_5 ((unsigned char) 0x1D) +#define KEY_6 ((unsigned char) 0x1B) +#define KEY_7 ((unsigned char) 0x33) +#define KEY_8 ((unsigned char) 0x35) +#define KEY_9 ((unsigned char) 0x30) + +#define KEY_A ((unsigned char) 0x3F) +#define KEY_B ((unsigned char) 0x15) +#define KEY_C ((unsigned char) 0x12) +#define KEY_D ((unsigned char) 0x3A) +#define KEY_E ((unsigned char) 0x2A) +#define KEY_F ((unsigned char) 0x38) +#define KEY_G ((unsigned char) 0x3D) +#define KEY_H ((unsigned char) 0x39) +#define KEY_I ((unsigned char) 0x0D) +#define KEY_J ((unsigned char) 0x01) +#define KEY_K ((unsigned char) 0x05) +#define KEY_L ((unsigned char) 0x00) +#define KEY_M ((unsigned char) 0x25) +#define KEY_N ((unsigned char) 0x23) +#define KEY_O ((unsigned char) 0x08) +#define KEY_P ((unsigned char) 0x0A) +#define KEY_Q ((unsigned char) 0x2F) +#define KEY_R ((unsigned char) 0x28) +#define KEY_S ((unsigned char) 0x3E) +#define KEY_T ((unsigned char) 0x2D) +#define KEY_U ((unsigned char) 0x0B) +#define KEY_V ((unsigned char) 0x10) +#define KEY_W ((unsigned char) 0x2E) +#define KEY_X ((unsigned char) 0x16) +#define KEY_Y ((unsigned char) 0x2B) +#define KEY_Z ((unsigned char) 0x17) + +#define KEY_COMMA ((unsigned char) 0x20) +#define KEY_PERIOD ((unsigned char) 0x22) +#define KEY_SLASH ((unsigned char) 0x26) +#define KEY_SEMICOLON ((unsigned char) 0x02) +#define KEY_PLUS ((unsigned char) 0x06) +#define KEY_ASTERISK ((unsigned char) 0x07) +#define KEY_DASH ((unsigned char) 0x0E) +#define KEY_EQUALS ((unsigned char) 0x0F) +#define KEY_LESSTHAN ((unsigned char) 0x36) +#define KEY_GREATERTHAN ((unsigned char) 0x37) + +#define KEY_ESC ((unsigned char) 0x1C) +#define KEY_TAB ((unsigned char) 0x2C) +#define KEY_SPACE ((unsigned char) 0x21) +#define KEY_RETURN ((unsigned char) 0x0C) +#define KEY_DELETE ((unsigned char) 0x34) +#define KEY_CAPS ((unsigned char) 0x3C) +#define KEY_INVERSE ((unsigned char) 0x27) +#define KEY_HELP ((unsigned char) 0x11) + +/* Function keys only exist on the 1200XL model. */ +#define KEY_F1 ((unsigned char) 0x03) +#define KEY_F2 ((unsigned char) 0x04) +#define KEY_F3 ((unsigned char) 0x13) +#define KEY_F4 ((unsigned char) 0x14) + +/* N.B. Cannot read Ctrl key alone */ +#define KEY_CTRL ((unsigned char) 0x80) + +/* N.B. Cannot read Shift key alone via KBCODE; +** instead, check "Shfit key press" bit of SKSTAT register. +** Also, no way to tell left Shift from right Shift. +*/ +#define KEY_SHIFT ((unsigned char) 0x40) + + +/* Composed keys +** (Other combinations are possible, including Shift+Ctrl+key, +** though not all such combinations are available.) +*/ + +#define KEY_EXCLAMATIONMARK (KEY_1 | KEY_SHIFT) +#define KEY_QUOTE (KEY_2 | KEY_SHIFT) +#define KEY_HASH (KEY_3 | KEY_SHIFT) +#define KEY_DOLLAR (KEY_4 | KEY_SHIFT) +#define KEY_PERCENT (KEY_5 | KEY_SHIFT) +#define KEY_AMPERSAND (KEY_6 | KEY_SHIFT) +#define KEY_APOSTROPHE (KEY_7 | KEY_SHIFT) +#define KEY_AT (KEY_8 | KEY_SHIFT) +#define KEY_OPENINGPARAN (KEY_9 | KEY_SHIFT) +#define KEY_CLOSINGPARAN (KEY_0 | KEY_SHIFT) +#define KEY_UNDERLINE (KEY_DASH | KEY_SHIFT) +#define KEY_BAR (KEY_EQUALS | KEY_SHIFT) +#define KEY_COLON (KEY_SEMICOLON | KEY_SHIFT) +#define KEY_BACKSLASH (KEY_PLUS | KEY_SHIFT) +#define KEY_CIRCUMFLEX (KEY_ASTERISK | KEY_SHIFT) +#define KEY_OPENINGBRACKET (KEY_COMMA | KEY_SHIFT) +#define KEY_CLOSINGBRACKET (KEY_PERIOD | KEY_SHIFT) +#define KEY_QUESTIONMARK (KEY_SLASH | KEY_SHIFT) +#define KEY_CLEAR (KEY_LESSTHAN | KEY_SHIFT) +#define KEY_INSERT (KEY_GREATERTHAN | KEY_SHIFT) + +#define KEY_UP (KEY_DASH | KEY_CTRL) +#define KEY_DOWN (KEY_EQUALS | KEY_CTRL) +#define KEY_LEFT (KEY_PLUS | KEY_CTRL) +#define KEY_RIGHT (KEY_ASTERISK | KEY_CTRL) + + +/*****************************************************************************/ +/* Color register functions */ +/*****************************************************************************/ + +extern void __fastcall__ _setcolor (unsigned char color_reg, unsigned char hue, unsigned char luminance); extern void __fastcall__ _setcolor_low (unsigned char color_reg, unsigned char color_value); extern unsigned char __fastcall__ _getcolor (unsigned char color_reg); -/* other screen functions */ +/*****************************************************************************/ +/* Other screen functions */ +/*****************************************************************************/ + +extern void waitvsync (void); /* wait for start of next frame */ extern int __fastcall__ _graphics (unsigned char mode); /* mode value same as in BASIC */ extern void __fastcall__ _scroll (signed char numlines); /* numlines > 0 scrolls up */ /* numlines < 0 scrolls down */ -/* misc. functions */ -extern unsigned char get_ostype(void); /* get ROM version */ -extern unsigned char get_tv(void); /* get TV system */ -extern void _save_vecs(void); /* save system vectors */ -extern void _rest_vecs(void); /* restore system vectors */ -extern char *_getdefdev(void); /* get default floppy device */ -/* global variables */ +/*****************************************************************************/ +/* Misc. functions */ +/*****************************************************************************/ + +extern unsigned char get_ostype(void); /* get ROM version */ +extern unsigned char get_tv(void); /* get TV system */ +extern void _save_vecs(void); /* save system vectors */ +extern void _rest_vecs(void); /* restore system vectors */ +extern char *_getdefdev(void); /* get default floppy device */ +extern unsigned char _is_cmdline_dos(void); /* does DOS support command lines */ + + +/*****************************************************************************/ +/* Global variables */ +/*****************************************************************************/ + extern unsigned char _dos_type; /* the DOS flavour */ #ifndef __ATARIXL__ extern void atr130_emd[]; @@ -221,19 +304,11 @@ extern void atrx15_tgi[]; extern void atrx15p2_tgi[]; #endif -/* provide old names for backwards compatibility */ -#ifdef ATARI_COMPAT_PRE_2_11 -#define setcolor _setcolor -#define setcolor_low _setcolor_low -#define getcolor _getcolor -#define graphics _graphics -#define scroll _scroll -#define save_vecs _save_vecs -#define rest_vecs _rest_vecs -#define getdefdev _getdefdev -#endif /* #ifdef ATARI_COMPAT_PRE_2_11 */ -/* get_ostype return value defines (for explanation, see ostype.s) */ +/*****************************************************************************/ +/* get_ostype return value defines (for explanation, see ostype.s) */ +/*****************************************************************************/ + /* masks */ #define AT_OS_TYPE_MAIN 7 #define AT_OS_TYPE_MINOR (7 << 3) @@ -256,19 +331,37 @@ extern void atrx15p2_tgi[]; #define AT_OS_XLXE_3 3 #define AT_OS_XLXE_4 4 -/* get_tv return values */ + +/*****************************************************************************/ +/* get_tv return values */ +/*****************************************************************************/ + #define AT_NTSC 0 #define AT_PAL 1 -/* valid _dos_type values */ -#define ATARIDOS 0 -#define SPARTADOS 1 -#define OSADOS 2 -#define MYDOS 3 + +/*****************************************************************************/ +/* valid _dos_type values */ +/*****************************************************************************/ + +#define SPARTADOS 0 +#define REALDOS 1 +#define BWDOS 2 +#define OSADOS 3 #define XDOS 4 +#define ATARIDOS 5 +#define MYDOS 6 #define NODOS 255 -/* Define hardware */ + +/*****************************************************************************/ +/* Define hardware and where they're mapped in memory */ +/*****************************************************************************/ + +#include <_atarios.h> +#define OS (*(struct __os*)0x0000) +#define BASIC (*(struct __basic*)0x0080) + #include <_gtia.h> #define GTIA_READ (*(struct __gtia_read*)0xD000) #define GTIA_WRITE (*(struct __gtia_write*)0xD000) @@ -285,64 +378,171 @@ extern void atrx15p2_tgi[]; #include <_antic.h> #define ANTIC (*(struct __antic*)0xD400) -/* device control block */ -struct __dcb { - unsigned char device; /* device id */ - unsigned char unit; /* unit number */ - unsigned char command; /* command */ - unsigned char status; /* command type / status return */ - void *buffer; /* pointer to buffer */ - unsigned char timeout; /* device timeout in seconds */ - unsigned char unused; - unsigned int xfersize; /* # of bytes to transfer */ - unsigned char aux1; /* 1st command auxiliary byte */ - unsigned char aux2; /* 2nd command auxiliary byte */ -}; -#define DCB (*(struct __dcb *)0x300) -/* I/O control block */ -struct __iocb { - unsigned char handler; /* handler index number (0xff free) */ - unsigned char drive; /* device number (drive) */ - unsigned char command; /* command */ - unsigned char status; /* status of last operation */ - void *buffer; /* pointer to buffer */ - void *put_byte; /* pointer to device's PUT BYTE routine */ - unsigned int buflen; /* length of buffer */ - unsigned char aux1; /* 1st auxiliary byte */ - unsigned char aux2; /* 2nd auxiliary byte */ - unsigned char aux3; /* 3rd auxiliary byte */ - unsigned char aux4; /* 4th auxiliary byte */ - unsigned char aux5; /* 5th auxiliary byte */ - unsigned char spare; /* spare byte */ -}; -#define ZIOCB (*(struct __iocb *)0x20) /* zero page IOCB */ -#define IOCB (*(struct __iocb *)0x340) /* system IOCB buffers */ +/*****************************************************************************/ +/* conio and TGI color defines */ +/*****************************************************************************/ -/* IOCB Command Codes */ -#define IOCB_OPEN 0x03 /* open */ -#define IOCB_GETREC 0x05 /* get record */ -#define IOCB_GETCHR 0x07 /* get character(s) */ -#define IOCB_PUTREC 0x09 /* put record */ -#define IOCB_PUTCHR 0x0B /* put character(s) */ -#define IOCB_CLOSE 0x0C /* close */ -#define IOCB_STATIS 0x0D /* status */ -#define IOCB_SPECIL 0x0E /* special */ -#define IOCB_DRAWLN 0x11 /* draw line */ -#define IOCB_FILLIN 0x12 /* draw line with right fill */ -#define IOCB_RENAME 0x20 /* rename disk file */ -#define IOCB_DELETE 0x21 /* delete disk file */ -#define IOCB_LOCKFL 0x23 /* lock file (set to read-only) */ -#define IOCB_UNLOCK 0x24 /* unlock file */ -#define IOCB_POINT 0x25 /* point sector */ -#define IOCB_NOTE 0x26 /* note sector */ -#define IOCB_GETFL 0x27 /* get file length */ -#define IOCB_CHDIR_MYDOS 0x29 /* change directory (MyDOS) */ -#define IOCB_MKDIR 0x2A /* make directory (MyDOS/SpartaDOS) */ -#define IOCB_RMDIR 0x2B /* remove directory (SpartaDOS) */ -#define IOCB_CHDIR_SPDOS 0x2C /* change directory (SpartaDOS) */ -#define IOCB_GETCWD 0x30 /* get current directory (MyDOS/SpartaDOS) */ -#define IOCB_FORMAT 0xFE /* format */ +/* Note that the conio color implementation is monochrome +** (textcolor just sets text brightness low or high, depending on background +** color) +** These values can be used with bordercolor(), bgcolor(), and _setcolor_low() +*/ +#define COLOR_BLACK GTIA_COLOR_BLACK +#define COLOR_WHITE GTIA_COLOR_WHITE +#define COLOR_RED GTIA_COLOR_RED +#define COLOR_CYAN GTIA_COLOR_CYAN +#define COLOR_PURPLE GTIA_COLOR_VIOLET +#define COLOR_GREEN GTIA_COLOR_GREEN +#define COLOR_BLUE GTIA_COLOR_BLUE +#define COLOR_YELLOW GTIA_COLOR_YELLOW +#define COLOR_ORANGE GTIA_COLOR_ORANGE +#define COLOR_BROWN GTIA_COLOR_BROWN +#define COLOR_LIGHTRED GTIA_COLOR_LIGHTRED +#define COLOR_GRAY1 GTIA_COLOR_GRAY1 +#define COLOR_GRAY2 GTIA_COLOR_GRAY2 +#define COLOR_LIGHTGREEN GTIA_COLOR_LIGHTGREEN +#define COLOR_LIGHTBLUE GTIA_COLOR_LIGHTBLUE +#define COLOR_GRAY3 GTIA_COLOR_GRAY3 + +/* TGI color defines */ +#define TGI_COLOR_BLACK COLOR_BLACK +#define TGI_COLOR_WHITE COLOR_WHITE +#define TGI_COLOR_RED COLOR_RED +#define TGI_COLOR_CYAN COLOR_CYAN +#define TGI_COLOR_PURPLE COLOR_PURPLE +#define TGI_COLOR_GREEN COLOR_GREEN +#define TGI_COLOR_BLUE COLOR_BLUE +#define TGI_COLOR_YELLOW COLOR_YELLOW +#define TGI_COLOR_ORANGE COLOR_ORANGE +#define TGI_COLOR_BROWN COLOR_BROWN +#define TGI_COLOR_LIGHTRED COLOR_LIGHTRED +#define TGI_COLOR_GRAY1 COLOR_GRAY1 +#define TGI_COLOR_GRAY2 COLOR_GRAY2 +#define TGI_COLOR_LIGHTGREEN COLOR_LIGHTGREEN +#define TGI_COLOR_LIGHTBLUE COLOR_LIGHTBLUE +#define TGI_COLOR_GRAY3 COLOR_GRAY3 + + +/*****************************************************************************/ +/* PIA PORTA and PORTB register bits */ +/*****************************************************************************/ + +/* See also: "JOY_xxx_MASK" in "atari.h" */ + +/* Paddle 0-3 triggers (per PORTA bits) */ +#define PORTA_PTRIG3 0x80 +#define PORTA_PTRIG2 0x40 +#define PORTA_PTRIG1 0x08 +#define PORTA_PTRIG0 0x04 + + +/* On the Atari 400/800, PORTB is the same as PORTA, but for controller ports 3 & 4. */ + +/* Paddle 4-7 triggers (per PORTB bits); only 400/800 had four controller ports */ +#define PORTB_PTRIG7 0x80 +#define PORTB_PTRIG6 0x40 +#define PORTB_PTRIG5 0x08 +#define PORTB_PTRIG4 0x04 + + +/* On the XL series of computers, PORTB has been changed to a memory and +** LED control (1200XL model only) register (read/write): +*/ + +/* If set, the built-in OS is enabled, and occupies the address range $C000-$FFFF +** (except that the area $D000-$D7FF will only access the hardware registers.) +** If clear, RAM is enabled in this area (again, save for the hole.) +*/ +#define PORTB_OSROM 0x01 + +/* If set, RAM is enabled for the address range $A000-$BFFF. +** If clear, the built-in BASIC ROM is enabled at this address. +** And if there is a cartridge installed in the computer, it makes no difference. +*/ +#define PORTB_BASICROM 0x02 + +/* If set, the corresponding LED is turned off. If clear, the LED will be on. +** (1200XL only) +*/ +#define PORTB_LED1 0x04 +#define PORTB_LED2 0x08 + + +/* On the XE series of computers, PORTB is a bank-selected memory control register (read/write): */ + +/* These bits determine which memory bank is visible to the CPU and/or ANTIC chip +** when their Bank Switch bit is set. There are four possible banks of 16KB each. +*/ +#define PORTB_BANKSELECT1 0x00 +#define PORTB_BANKSELECT2 0x04 +#define PORTB_BANKSELECT3 0x08 +#define PORTB_BANKSELECT4 0x0C + +/* If set, the CPU and/or ANTIC chip will access bank-switched memory mapped to the +** address range $4000-$7FFF. +** If clear, the CPU and/or ANTIC will see normal memory in this region. +*/ +#define PORTB_BANKSWITCH_CPU 0x10 +#define PORTB_BANKSWITCH_ANTIC 0x20 + +/* If set, RAM is enabled for the address range $5000-$57FF. +** If clear, the self-test ROM (physically located at $D000-$D7FF, under the hardware registers) +** is remapped to this memory area. +*/ +#define PORTB_SELFTEST 0x80 + + +/*****************************************************************************/ +/* PACTL and PBCTL register bits */ +/*****************************************************************************/ + +/* (W) Peripheral PA1/PB1 interrupt (IRQ) ("peripheral proceed line available") enable. +** One equals enable. Set by the OS but available to the user; reset on powerup. +** (PxCTL_IRQ_STATUS (R) bit will get set upon interrupt occurance) +*/ +#define PxCTL_IRQ_ENABLE 0x01 /* bit 0 */ + +/* Note: Bit 1 is always set to */ + +/* (W) Controls PORTA/PORTB addressing +** 1 = PORTA/PORTB register; read/write to controller port +** 0 = direction control register; write to direction controls +** (allows setting data flow; write 0s & 1s to PORTA/PORTB bits +** to set which port's pins are read (input), or write (output), +** respectively) +*/ +#define PxCTL_ADDRESSING 0x04 /* bit 2 */ + +/* (W) Peripheral motor control line; Turn the cassette on or off +** (PACTL-specific register bit) +** 0 = on +** 1 = off +*/ +#define PACTL_MOTOR_CONTROL 0x08 /* bit 3 */ + +/* Peripheral command identification (serial bus command line) +** (PBCTL-specific register bit) +*/ +#define PBCTL_PERIPH_CMD_IDENT 0x08 /* bit 3 */ + +/* Note: Bits 4 & 5 are always set to 1 */ + +/* Note: Bit 6 is always set to 0 */ + +/* (R) Peripheral interrupt (IRQ) status bit. +** Set by Peripherals (PORTA / PORTB). Reset by reading from PORTA / PORTB. +** PACTL's is interrupt status of PROCEED +** PBCTL's is interrupt status of SIO +*/ +#define PxCTL_IRQ_STATUS 0x80 + + +/* The following #define will cause the matching function calls in conio.h +** to be overlaid by macros with the same names, saving the function call +** overhead. +*/ +#define _textcolor(color) COLOR_WHITE /* End of atari.h */ -#endif /* #ifndef _ATARI_H */ +#endif diff --git a/include/atari2600.h b/include/atari2600.h new file mode 100644 index 000000000..a6b5cda47 --- /dev/null +++ b/include/atari2600.h @@ -0,0 +1,32 @@ +/*****************************************************************************/ +/* */ +/* Atari VCS 2600 TIA & RIOT registers addresses */ +/* */ +/* Source: DASM Version 1.05 - vcs.h */ +/* */ +/* Florent Flament (contact@florentflament.com), 2017 */ +/* */ +/*****************************************************************************/ + + + +#ifndef _ATARI2600_H +#define _ATARI2600_H + + + +/* Check for errors */ +#if !defined(__ATARI2600__) +# error This module may only be used when compiling for the Atari 2600! +#endif + +#include <_tia.h> +#define TIA (*(struct __tia*)0x0000) + +#include <_riot.h> +#define RIOT (*(struct __riot*)0x0280) + + + +/* End of atari2600.h */ +#endif diff --git a/include/atari5200.h b/include/atari5200.h index 4bd5bc0fd..ff176c15b 100644 --- a/include/atari5200.h +++ b/include/atari5200.h @@ -35,7 +35,7 @@ -/* Check for errors */ +/* check for errors */ #if !defined(__ATARI5200__) # error This module may only be used when compiling for the Atari 5200! #endif @@ -46,52 +46,30 @@ /* the addresses of the static drivers */ extern void atr5200std_joy[]; /* referred to by joy_static_stddrv[] */ -/* make GTIA color value */ -#define _gtia_mkcolor(hue,lum) (((hue) << 4) | ((lum) << 1)) +/* masks for joy_read */ +#define JOY_UP_MASK 0x01 +#define JOY_DOWN_MASK 0x02 +#define JOY_LEFT_MASK 0x04 +#define JOY_RIGHT_MASK 0x08 +#define JOY_BTN_1_MASK 0x10 -/* luminance values go from 0 (black) to 7 (white) */ - -/* hue values */ -#define HUE_GREY 0 -#define HUE_GOLD 1 -#define HUE_GOLDORANGE 2 -#define HUE_REDORANGE 3 -#define HUE_ORANGE 4 -#define HUE_MAGENTA 5 -#define HUE_PURPLE 6 -#define HUE_BLUE 7 -#define HUE_BLUE2 8 -#define HUE_CYAN 9 -#define HUE_BLUEGREEN 10 -#define HUE_BLUEGREEN2 11 -#define HUE_GREEN 12 -#define HUE_YELLOWGREEN 13 -#define HUE_YELLOW 14 -#define HUE_YELLOWRED 15 - -/* Color defines, similar to c64 colors (untested) */ -#define COLOR_BLACK _gtia_mkcolor(HUE_GREY,0) -#define COLOR_WHITE _gtia_mkcolor(HUE_GREY,7) -#define COLOR_RED _gtia_mkcolor(HUE_REDORANGE,1) -#define COLOR_CYAN _gtia_mkcolor(HUE_CYAN,3) -#define COLOR_VIOLET _gtia_mkcolor(HUE_PURPLE,4) -#define COLOR_GREEN _gtia_mkcolor(HUE_GREEN,2) -#define COLOR_BLUE _gtia_mkcolor(HUE_BLUE,2) -#define COLOR_YELLOW _gtia_mkcolor(HUE_YELLOW,7) -#define COLOR_ORANGE _gtia_mkcolor(HUE_ORANGE,5) -#define COLOR_BROWN _gtia_mkcolor(HUE_YELLOW,2) -#define COLOR_LIGHTRED _gtia_mkcolor(HUE_REDORANGE,6) -#define COLOR_GRAY1 _gtia_mkcolor(HUE_GREY,2) -#define COLOR_GRAY2 _gtia_mkcolor(HUE_GREY,3) -#define COLOR_LIGHTGREEN _gtia_mkcolor(HUE_GREEN,6) -#define COLOR_LIGHTBLUE _gtia_mkcolor(HUE_BLUE,6) -#define COLOR_GRAY3 _gtia_mkcolor(HUE_GREY,5) +/* character codes */ +#define CH_ULCORNER 0x0B /* '+' sign */ +#define CH_URCORNER 0x0B +#define CH_LLCORNER 0x0B +#define CH_LRCORNER 0x0B +#define CH_HLINE 0x0D /* dash */ +#define CH_VLINE 0x01 /* exclamation mark */ /* get_tv return values */ #define AT_NTSC 0 #define AT_PAL 1 -/* Define hardware */ +/* Define variables used by the OS*/ +#include <_atari5200os.h> +#define OS (*(struct __os*)0x0000) + +/* define hardware */ #include <_gtia.h> #define GTIA_READ (*(struct __gtia_read*)0xC000) #define GTIA_WRITE (*(struct __gtia_write*)0xC000) @@ -103,5 +81,20 @@ extern void atr5200std_joy[]; /* referred to by joy_static_stddrv[] */ #include <_antic.h> #define ANTIC (*(struct __antic*)0xD400) -/* End of atari5200.h */ -#endif /* #ifndef _ATARI5200_H */ +/* conio color defines */ +#define COLOR_WHITE 0x00 +#define COLOR_RED 0x01 +#define COLOR_GREEN 0x02 +#define COLOR_BLACK 0x03 + +/* The following #define will cause the matching function calls in conio.h +** to be overlaid by macros with the same names, saving the function call +** overhead. +*/ +#define _bordercolor(color) 0 + +/* wait for start of next frame */ +extern void waitvsync (void); + +/* end of atari5200.h */ +#endif diff --git a/include/atari7800.h b/include/atari7800.h new file mode 100644 index 000000000..3cbeedb8b --- /dev/null +++ b/include/atari7800.h @@ -0,0 +1,67 @@ +/*****************************************************************************/ +/* */ +/* Atari VCS 7800 TIA & RIOT registers addresses */ +/* */ +/* Karri Kaksonen (karri@sipo.fi), 2022 */ +/* */ +/* */ +/*****************************************************************************/ + + + +#ifndef _ATARI7800_H +#define _ATARI7800_H + +/* Check for errors */ +#if !defined(__ATARI7800__) +# error This module may only be used when compiling for the Atari 7800! +#endif + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +/* Color defines */ +#define COLOR_BLACK 0x00 +#define COLOR_GREY 0x01 +#define COLOR_LIGHTGREY 0x02 +#define COLOR_WHITE 0x03 + +/* TGI color defines (default palette) */ +#define TGI_COLOR_BLACK COLOR_BLACK +#define TGI_COLOR_GREY COLOR_GREY +#define TGI_COLOR_LIGHTGREY COLOR_LIGHTGREY +#define TGI_COLOR_WHITE COLOR_WHITE + +/* Masks for joy_read */ +#define JOY_RIGHT_MASK 0x80 +#define JOY_LEFT_MASK 0x40 +#define JOY_DOWN_MASK 0x20 +#define JOY_UP_MASK 0x10 +#define JOY_BTN_1_MASK 0x01 +#define JOY_BTN_2_MASK 0x02 + +#define JOY_BTN_A_MASK JOY_BTN_1_MASK +#define JOY_BTN_B_MASK JOY_BTN_2_MASK + +#define JOY_BTN_A(v) ((v) & JOY_BTN_A_MASK) +#define JOY_BTN_B(v) ((v) & JOY_BTN_B_MASK) + +/* No support for dynamically loadable drivers */ +#define DYN_DRV 0 + +extern unsigned char get_tv(void); /* get TV system */ + +#include <_tia.h> +#define TIA (*(struct __tia*)0x0000) + +#include <_riot.h> +#define RIOT (*(struct __riot*)0x0280) + +#include <_maria.h> +#define MARIA (*(struct __maria*)0x0020) + +/* End of atari7800.h */ +#endif diff --git a/include/atari_atascii_charmap.h b/include/atari_atascii_charmap.h new file mode 100644 index 000000000..78a297f4c --- /dev/null +++ b/include/atari_atascii_charmap.h @@ -0,0 +1,304 @@ +/*****************************************************************************/ +/* */ +/* atari_atascii_charmap.h */ +/* */ +/* Atari system standard string mapping (ISO-8859-1 -> AtASCII) */ +/* */ +/* */ +/* */ +/* (C) 2016 Christian Krueger */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + +/* No include guard here! Multiple use in one file may be intentional. */ + +#pragma charmap (0x00, 0x00) +#pragma charmap (0x01, 0x01) +#pragma charmap (0x02, 0x02) +#pragma charmap (0x03, 0x03) +#pragma charmap (0x04, 0x04) +#pragma charmap (0x05, 0x05) +#pragma charmap (0x06, 0x06) +#pragma charmap (0x07, 0xFD) +#pragma charmap (0x08, 0x08) +#pragma charmap (0x09, 0x7F) +#pragma charmap (0x0A, 0x9B) +#pragma charmap (0x0B, 0x0B) +#pragma charmap (0x0C, 0x7D) +#pragma charmap (0x0D, 0x0D) +#pragma charmap (0x0E, 0x0E) +#pragma charmap (0x0F, 0x0F) + +#pragma charmap (0x10, 0x10) +#pragma charmap (0x11, 0x11) +#pragma charmap (0x12, 0x12) +#pragma charmap (0x13, 0x13) +#pragma charmap (0x14, 0x14) +#pragma charmap (0x15, 0x15) +#pragma charmap (0x16, 0x16) +#pragma charmap (0x17, 0x17) +#pragma charmap (0x18, 0x18) +#pragma charmap (0x19, 0x19) +#pragma charmap (0x1A, 0x1A) +#pragma charmap (0x1B, 0x1B) +#pragma charmap (0x1C, 0x1C) +#pragma charmap (0x1D, 0x1D) +#pragma charmap (0x1E, 0x1E) +#pragma charmap (0x1F, 0x1F) + +#pragma charmap (0x20, 0x20) +#pragma charmap (0x21, 0x21) +#pragma charmap (0x22, 0x22) +#pragma charmap (0x23, 0x23) +#pragma charmap (0x24, 0x24) +#pragma charmap (0x25, 0x25) +#pragma charmap (0x26, 0x26) +#pragma charmap (0x27, 0x27) +#pragma charmap (0x28, 0x28) +#pragma charmap (0x29, 0x29) +#pragma charmap (0x2A, 0x2A) +#pragma charmap (0x2B, 0x2B) +#pragma charmap (0x2C, 0x2C) +#pragma charmap (0x2D, 0x2D) +#pragma charmap (0x2E, 0x2E) +#pragma charmap (0x2F, 0x2F) + +#pragma charmap (0x30, 0x30) +#pragma charmap (0x31, 0x31) +#pragma charmap (0x32, 0x32) +#pragma charmap (0x33, 0x33) +#pragma charmap (0x34, 0x34) +#pragma charmap (0x35, 0x35) +#pragma charmap (0x36, 0x36) +#pragma charmap (0x37, 0x37) +#pragma charmap (0x38, 0x38) +#pragma charmap (0x39, 0x39) +#pragma charmap (0x3A, 0x3A) +#pragma charmap (0x3B, 0x3B) +#pragma charmap (0x3C, 0x3C) +#pragma charmap (0x3D, 0x3D) +#pragma charmap (0x3E, 0x3E) +#pragma charmap (0x3F, 0x3F) + +#pragma charmap (0x40, 0x40) +#pragma charmap (0x41, 0x41) +#pragma charmap (0x42, 0x42) +#pragma charmap (0x43, 0x43) +#pragma charmap (0x44, 0x44) +#pragma charmap (0x45, 0x45) +#pragma charmap (0x46, 0x46) +#pragma charmap (0x47, 0x47) +#pragma charmap (0x48, 0x48) +#pragma charmap (0x49, 0x49) +#pragma charmap (0x4A, 0x4A) +#pragma charmap (0x4B, 0x4B) +#pragma charmap (0x4C, 0x4C) +#pragma charmap (0x4D, 0x4D) +#pragma charmap (0x4E, 0x4E) +#pragma charmap (0x4F, 0x4F) + +#pragma charmap (0x50, 0x50) +#pragma charmap (0x51, 0x51) +#pragma charmap (0x52, 0x52) +#pragma charmap (0x53, 0x53) +#pragma charmap (0x54, 0x54) +#pragma charmap (0x55, 0x55) +#pragma charmap (0x56, 0x56) +#pragma charmap (0x57, 0x57) +#pragma charmap (0x58, 0x58) +#pragma charmap (0x59, 0x59) +#pragma charmap (0x5A, 0x5A) +#pragma charmap (0x5B, 0x5B) +#pragma charmap (0x5C, 0x5C) +#pragma charmap (0x5D, 0x5D) +#pragma charmap (0x5E, 0x5E) +#pragma charmap (0x5F, 0x5F) + +#pragma charmap (0x60, 0x60) +#pragma charmap (0x61, 0x61) +#pragma charmap (0x62, 0x62) +#pragma charmap (0x63, 0x63) +#pragma charmap (0x64, 0x64) +#pragma charmap (0x65, 0x65) +#pragma charmap (0x66, 0x66) +#pragma charmap (0x67, 0x67) +#pragma charmap (0x68, 0x68) +#pragma charmap (0x69, 0x69) +#pragma charmap (0x6A, 0x6A) +#pragma charmap (0x6B, 0x6B) +#pragma charmap (0x6C, 0x6C) +#pragma charmap (0x6D, 0x6D) +#pragma charmap (0x6E, 0x6E) +#pragma charmap (0x6F, 0x6F) + +#pragma charmap (0x70, 0x70) +#pragma charmap (0x71, 0x71) +#pragma charmap (0x72, 0x72) +#pragma charmap (0x73, 0x73) +#pragma charmap (0x74, 0x74) +#pragma charmap (0x75, 0x75) +#pragma charmap (0x76, 0x76) +#pragma charmap (0x77, 0x77) +#pragma charmap (0x78, 0x78) +#pragma charmap (0x79, 0x79) +#pragma charmap (0x7A, 0x7A) +#pragma charmap (0x7B, 0x7B) +#pragma charmap (0x7C, 0x7C) +#pragma charmap (0x7D, 0x7D) +#pragma charmap (0x7E, 0x7E) +#pragma charmap (0x7F, 0x7F) + +#pragma charmap (0x80, 0x80) +#pragma charmap (0x81, 0x81) +#pragma charmap (0x82, 0x82) +#pragma charmap (0x83, 0x83) +#pragma charmap (0x84, 0x84) +#pragma charmap (0x85, 0x85) +#pragma charmap (0x86, 0x86) +#pragma charmap (0x87, 0x87) +#pragma charmap (0x88, 0x88) +#pragma charmap (0x89, 0x89) +#pragma charmap (0x8A, 0x8A) +#pragma charmap (0x8B, 0x8B) +#pragma charmap (0x8C, 0x8C) +#pragma charmap (0x8D, 0x8D) +#pragma charmap (0x8E, 0x8E) +#pragma charmap (0x8F, 0x8F) + +#pragma charmap (0x90, 0x90) +#pragma charmap (0x91, 0x91) +#pragma charmap (0x92, 0x92) +#pragma charmap (0x93, 0x93) +#pragma charmap (0x94, 0x94) +#pragma charmap (0x95, 0x95) +#pragma charmap (0x96, 0x96) +#pragma charmap (0x97, 0x97) +#pragma charmap (0x98, 0x98) +#pragma charmap (0x99, 0x99) +#pragma charmap (0x9A, 0x9A) +#pragma charmap (0x9B, 0x9B) +#pragma charmap (0x9C, 0x9C) +#pragma charmap (0x9D, 0x9D) +#pragma charmap (0x9E, 0x9E) +#pragma charmap (0x9F, 0x9F) + +#pragma charmap (0xA0, 0xA0) +#pragma charmap (0xA1, 0xA1) +#pragma charmap (0xA2, 0xA2) +#pragma charmap (0xA3, 0xA3) +#pragma charmap (0xA4, 0xA4) +#pragma charmap (0xA5, 0xA5) +#pragma charmap (0xA6, 0xA6) +#pragma charmap (0xA7, 0xA7) +#pragma charmap (0xA8, 0xA8) +#pragma charmap (0xA9, 0xA9) +#pragma charmap (0xAA, 0xAA) +#pragma charmap (0xAB, 0xAB) +#pragma charmap (0xAC, 0xAC) +#pragma charmap (0xAD, 0xAD) +#pragma charmap (0xAE, 0xAE) +#pragma charmap (0xAF, 0xAF) + +#pragma charmap (0xB0, 0xB0) +#pragma charmap (0xB1, 0xB1) +#pragma charmap (0xB2, 0xB2) +#pragma charmap (0xB3, 0xB3) +#pragma charmap (0xB4, 0xB4) +#pragma charmap (0xB5, 0xB5) +#pragma charmap (0xB6, 0xB6) +#pragma charmap (0xB7, 0xB7) +#pragma charmap (0xB8, 0xB8) +#pragma charmap (0xB9, 0xB9) +#pragma charmap (0xBA, 0xBA) +#pragma charmap (0xBB, 0xBB) +#pragma charmap (0xBC, 0xBC) +#pragma charmap (0xBD, 0xBD) +#pragma charmap (0xBE, 0xBE) +#pragma charmap (0xBF, 0xBF) + +#pragma charmap (0xC0, 0xC0) +#pragma charmap (0xC1, 0xC1) +#pragma charmap (0xC2, 0xC2) +#pragma charmap (0xC3, 0xC3) +#pragma charmap (0xC4, 0xC4) +#pragma charmap (0xC5, 0xC5) +#pragma charmap (0xC6, 0xC6) +#pragma charmap (0xC7, 0xC7) +#pragma charmap (0xC8, 0xC8) +#pragma charmap (0xC9, 0xC9) +#pragma charmap (0xCA, 0xCA) +#pragma charmap (0xCB, 0xCB) +#pragma charmap (0xCC, 0xCC) +#pragma charmap (0xCD, 0xCD) +#pragma charmap (0xCE, 0xCE) +#pragma charmap (0xCF, 0xCF) + +#pragma charmap (0xD0, 0xD0) +#pragma charmap (0xD1, 0xD1) +#pragma charmap (0xD2, 0xD2) +#pragma charmap (0xD3, 0xD3) +#pragma charmap (0xD4, 0xD4) +#pragma charmap (0xD5, 0xD5) +#pragma charmap (0xD6, 0xD6) +#pragma charmap (0xD7, 0xD7) +#pragma charmap (0xD8, 0xD8) +#pragma charmap (0xD9, 0xD9) +#pragma charmap (0xDA, 0xDA) +#pragma charmap (0xDB, 0xDB) +#pragma charmap (0xDC, 0xDC) +#pragma charmap (0xDD, 0xDD) +#pragma charmap (0xDE, 0xDE) +#pragma charmap (0xDF, 0xDF) + +#pragma charmap (0xE0, 0xE0) +#pragma charmap (0xE1, 0xE1) +#pragma charmap (0xE2, 0xE2) +#pragma charmap (0xE3, 0xE3) +#pragma charmap (0xE4, 0xE4) +#pragma charmap (0xE5, 0xE5) +#pragma charmap (0xE6, 0xE6) +#pragma charmap (0xE7, 0xE7) +#pragma charmap (0xE8, 0xE8) +#pragma charmap (0xE9, 0xE9) +#pragma charmap (0xEA, 0xEA) +#pragma charmap (0xEB, 0xEB) +#pragma charmap (0xEC, 0xEC) +#pragma charmap (0xED, 0xED) +#pragma charmap (0xEE, 0xEE) +#pragma charmap (0xEF, 0xEF) + +#pragma charmap (0xF0, 0xF0) +#pragma charmap (0xF1, 0xF1) +#pragma charmap (0xF2, 0xF2) +#pragma charmap (0xF3, 0xF3) +#pragma charmap (0xF4, 0xF4) +#pragma charmap (0xF5, 0xF5) +#pragma charmap (0xF6, 0xF6) +#pragma charmap (0xF7, 0xF7) +#pragma charmap (0xF8, 0xF8) +#pragma charmap (0xF9, 0xF9) +#pragma charmap (0xFA, 0xFA) +#pragma charmap (0xFB, 0xFB) +#pragma charmap (0xFC, 0xFC) +#pragma charmap (0xFD, 0xFD) +#pragma charmap (0xFE, 0xFE) +#pragma charmap (0xFF, 0xFF) + diff --git a/include/atari_screen_charmap.h b/include/atari_screen_charmap.h new file mode 100644 index 000000000..78051584f --- /dev/null +++ b/include/atari_screen_charmap.h @@ -0,0 +1,310 @@ +/*****************************************************************************/ +/* */ +/* atari_screen_charmap.h */ +/* */ +/* Atari system internal string mapping (ISO-8859-1 -> Internal/Screen-Code) */ +/* */ +/* */ +/* */ +/* (C) 2016 Christian Krueger */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + +/* No include guard here! Multiple use in one file may be intentional. */ + +#pragma warn (remap-zero, push, off) +#pragma charmap (0x00, 0x40) +#pragma warn (remap-zero, pop) + +#pragma charmap (0x01, 0x41) +#pragma charmap (0x02, 0x42) +#pragma charmap (0x03, 0x43) +#pragma charmap (0x04, 0x44) +#pragma charmap (0x05, 0x45) +#pragma charmap (0x06, 0x46) +#pragma charmap (0x07, 0xFD) +#pragma charmap (0x08, 0x48) +#pragma charmap (0x09, 0x7F) +#pragma charmap (0x0A, 0xDB) +#pragma charmap (0x0B, 0x4B) +#pragma charmap (0x0C, 0x7D) +#pragma charmap (0x0D, 0x4D) +#pragma charmap (0x0E, 0x4E) +#pragma charmap (0x0F, 0x4F) + +#pragma charmap (0x10, 0x50) +#pragma charmap (0x11, 0x51) +#pragma charmap (0x12, 0x52) +#pragma charmap (0x13, 0x53) +#pragma charmap (0x14, 0x54) +#pragma charmap (0x15, 0x55) +#pragma charmap (0x16, 0x56) +#pragma charmap (0x17, 0x57) +#pragma charmap (0x18, 0x58) +#pragma charmap (0x19, 0x59) +#pragma charmap (0x1A, 0x5A) +#pragma charmap (0x1B, 0x5B) +#pragma charmap (0x1C, 0x5C) +#pragma charmap (0x1D, 0x5D) +#pragma charmap (0x1E, 0x5E) +#pragma charmap (0x1F, 0x5F) + +#pragma warn (remap-zero, push, off) +#pragma charmap (0x20, 0x00) +#pragma warn (remap-zero, pop) + +#pragma charmap (0x21, 0x01) +#pragma charmap (0x22, 0x02) +#pragma charmap (0x23, 0x03) +#pragma charmap (0x24, 0x04) +#pragma charmap (0x25, 0x05) +#pragma charmap (0x26, 0x06) +#pragma charmap (0x27, 0x07) +#pragma charmap (0x28, 0x08) +#pragma charmap (0x29, 0x09) +#pragma charmap (0x2A, 0x0A) +#pragma charmap (0x2B, 0x0B) +#pragma charmap (0x2C, 0x0C) +#pragma charmap (0x2D, 0x0D) +#pragma charmap (0x2E, 0x0E) +#pragma charmap (0x2F, 0x0F) + +#pragma charmap (0x30, 0x10) +#pragma charmap (0x31, 0x11) +#pragma charmap (0x32, 0x12) +#pragma charmap (0x33, 0x13) +#pragma charmap (0x34, 0x14) +#pragma charmap (0x35, 0x15) +#pragma charmap (0x36, 0x16) +#pragma charmap (0x37, 0x17) +#pragma charmap (0x38, 0x18) +#pragma charmap (0x39, 0x19) +#pragma charmap (0x3A, 0x1A) +#pragma charmap (0x3B, 0x1B) +#pragma charmap (0x3C, 0x1C) +#pragma charmap (0x3D, 0x1D) +#pragma charmap (0x3E, 0x1E) +#pragma charmap (0x3F, 0x1F) + +#pragma charmap (0x40, 0x20) +#pragma charmap (0x41, 0x21) +#pragma charmap (0x42, 0x22) +#pragma charmap (0x43, 0x23) +#pragma charmap (0x44, 0x24) +#pragma charmap (0x45, 0x25) +#pragma charmap (0x46, 0x26) +#pragma charmap (0x47, 0x27) +#pragma charmap (0x48, 0x28) +#pragma charmap (0x49, 0x29) +#pragma charmap (0x4A, 0x2A) +#pragma charmap (0x4B, 0x2B) +#pragma charmap (0x4C, 0x2C) +#pragma charmap (0x4D, 0x2D) +#pragma charmap (0x4E, 0x2E) +#pragma charmap (0x4F, 0x2F) + +#pragma charmap (0x50, 0x30) +#pragma charmap (0x51, 0x31) +#pragma charmap (0x52, 0x32) +#pragma charmap (0x53, 0x33) +#pragma charmap (0x54, 0x34) +#pragma charmap (0x55, 0x35) +#pragma charmap (0x56, 0x36) +#pragma charmap (0x57, 0x37) +#pragma charmap (0x58, 0x38) +#pragma charmap (0x59, 0x39) +#pragma charmap (0x5A, 0x3A) +#pragma charmap (0x5B, 0x3B) +#pragma charmap (0x5C, 0x3C) +#pragma charmap (0x5D, 0x3D) +#pragma charmap (0x5E, 0x3E) +#pragma charmap (0x5F, 0x3F) + +#pragma charmap (0x60, 0x60) +#pragma charmap (0x61, 0x61) +#pragma charmap (0x62, 0x62) +#pragma charmap (0x63, 0x63) +#pragma charmap (0x64, 0x64) +#pragma charmap (0x65, 0x65) +#pragma charmap (0x66, 0x66) +#pragma charmap (0x67, 0x67) +#pragma charmap (0x68, 0x68) +#pragma charmap (0x69, 0x69) +#pragma charmap (0x6A, 0x6A) +#pragma charmap (0x6B, 0x6B) +#pragma charmap (0x6C, 0x6C) +#pragma charmap (0x6D, 0x6D) +#pragma charmap (0x6E, 0x6E) +#pragma charmap (0x6F, 0x6F) + +#pragma charmap (0x70, 0x70) +#pragma charmap (0x71, 0x71) +#pragma charmap (0x72, 0x72) +#pragma charmap (0x73, 0x73) +#pragma charmap (0x74, 0x74) +#pragma charmap (0x75, 0x75) +#pragma charmap (0x76, 0x76) +#pragma charmap (0x77, 0x77) +#pragma charmap (0x78, 0x78) +#pragma charmap (0x79, 0x79) +#pragma charmap (0x7A, 0x7A) +#pragma charmap (0x7B, 0x7B) +#pragma charmap (0x7C, 0x7C) +#pragma charmap (0x7D, 0x7D) +#pragma charmap (0x7E, 0x7E) +#pragma charmap (0x7F, 0x7F) + +#pragma charmap (0x80, 0xC0) +#pragma charmap (0x81, 0xC1) +#pragma charmap (0x82, 0xC2) +#pragma charmap (0x83, 0xC3) +#pragma charmap (0x84, 0xC4) +#pragma charmap (0x85, 0xC5) +#pragma charmap (0x86, 0xC6) +#pragma charmap (0x87, 0xC7) +#pragma charmap (0x88, 0xC8) +#pragma charmap (0x89, 0xC9) +#pragma charmap (0x8A, 0xCA) +#pragma charmap (0x8B, 0xCB) +#pragma charmap (0x8C, 0xCC) +#pragma charmap (0x8D, 0xCD) +#pragma charmap (0x8E, 0xCE) +#pragma charmap (0x8F, 0xCF) + +#pragma charmap (0x90, 0xD0) +#pragma charmap (0x91, 0xD1) +#pragma charmap (0x92, 0xD2) +#pragma charmap (0x93, 0xD3) +#pragma charmap (0x94, 0xD4) +#pragma charmap (0x95, 0xD5) +#pragma charmap (0x96, 0xD6) +#pragma charmap (0x97, 0xD7) +#pragma charmap (0x98, 0xD8) +#pragma charmap (0x99, 0xD9) +#pragma charmap (0x9A, 0xDA) +#pragma charmap (0x9B, 0xDB) +#pragma charmap (0x9C, 0xDC) +#pragma charmap (0x9D, 0xDD) +#pragma charmap (0x9E, 0xDE) +#pragma charmap (0x9F, 0xDF) + +#pragma charmap (0xA0, 0x80) +#pragma charmap (0xA1, 0x81) +#pragma charmap (0xA2, 0x82) +#pragma charmap (0xA3, 0x83) +#pragma charmap (0xA4, 0x84) +#pragma charmap (0xA5, 0x85) +#pragma charmap (0xA6, 0x86) +#pragma charmap (0xA7, 0x87) +#pragma charmap (0xA8, 0x88) +#pragma charmap (0xA9, 0x89) +#pragma charmap (0xAA, 0x8A) +#pragma charmap (0xAB, 0x8B) +#pragma charmap (0xAC, 0x8C) +#pragma charmap (0xAD, 0x8D) +#pragma charmap (0xAE, 0x8E) +#pragma charmap (0xAF, 0x8F) + +#pragma charmap (0xB0, 0x90) +#pragma charmap (0xB1, 0x91) +#pragma charmap (0xB2, 0x92) +#pragma charmap (0xB3, 0x93) +#pragma charmap (0xB4, 0x94) +#pragma charmap (0xB5, 0x95) +#pragma charmap (0xB6, 0x96) +#pragma charmap (0xB7, 0x97) +#pragma charmap (0xB8, 0x98) +#pragma charmap (0xB9, 0x99) +#pragma charmap (0xBA, 0x9A) +#pragma charmap (0xBB, 0x9B) +#pragma charmap (0xBC, 0x9C) +#pragma charmap (0xBD, 0x9D) +#pragma charmap (0xBE, 0x9E) +#pragma charmap (0xBF, 0x9F) + +#pragma charmap (0xC0, 0xA0) +#pragma charmap (0xC1, 0xA1) +#pragma charmap (0xC2, 0xA2) +#pragma charmap (0xC3, 0xA3) +#pragma charmap (0xC4, 0xA4) +#pragma charmap (0xC5, 0xA5) +#pragma charmap (0xC6, 0xA6) +#pragma charmap (0xC7, 0xA7) +#pragma charmap (0xC8, 0xA8) +#pragma charmap (0xC9, 0xA9) +#pragma charmap (0xCA, 0xAA) +#pragma charmap (0xCB, 0xAB) +#pragma charmap (0xCC, 0xAC) +#pragma charmap (0xCD, 0xAD) +#pragma charmap (0xCE, 0xAE) +#pragma charmap (0xCF, 0xAF) + +#pragma charmap (0xD0, 0xB0) +#pragma charmap (0xD1, 0xB1) +#pragma charmap (0xD2, 0xB2) +#pragma charmap (0xD3, 0xB3) +#pragma charmap (0xD4, 0xB4) +#pragma charmap (0xD5, 0xB5) +#pragma charmap (0xD6, 0xB6) +#pragma charmap (0xD7, 0xB7) +#pragma charmap (0xD8, 0xB8) +#pragma charmap (0xD9, 0xB9) +#pragma charmap (0xDA, 0xBA) +#pragma charmap (0xDB, 0xBB) +#pragma charmap (0xDC, 0xBC) +#pragma charmap (0xDD, 0xBD) +#pragma charmap (0xDE, 0xBE) +#pragma charmap (0xDF, 0xBF) + +#pragma charmap (0xE0, 0xE0) +#pragma charmap (0xE1, 0xE1) +#pragma charmap (0xE2, 0xE2) +#pragma charmap (0xE3, 0xE3) +#pragma charmap (0xE4, 0xE4) +#pragma charmap (0xE5, 0xE5) +#pragma charmap (0xE6, 0xE6) +#pragma charmap (0xE7, 0xE7) +#pragma charmap (0xE8, 0xE8) +#pragma charmap (0xE9, 0xE9) +#pragma charmap (0xEA, 0xEA) +#pragma charmap (0xEB, 0xEB) +#pragma charmap (0xEC, 0xEC) +#pragma charmap (0xED, 0xED) +#pragma charmap (0xEE, 0xEE) +#pragma charmap (0xEF, 0xEF) + +#pragma charmap (0xF0, 0xF0) +#pragma charmap (0xF1, 0xF1) +#pragma charmap (0xF2, 0xF2) +#pragma charmap (0xF3, 0xF3) +#pragma charmap (0xF4, 0xF4) +#pragma charmap (0xF5, 0xF5) +#pragma charmap (0xF6, 0xF6) +#pragma charmap (0xF7, 0xF7) +#pragma charmap (0xF8, 0xF8) +#pragma charmap (0xF9, 0xF9) +#pragma charmap (0xFA, 0xFA) +#pragma charmap (0xFB, 0xFB) +#pragma charmap (0xFC, 0xFC) +#pragma charmap (0xFD, 0xFD) +#pragma charmap (0xFE, 0xFE) +#pragma charmap (0xFF, 0xFF) + diff --git a/include/atmos.h b/include/atmos.h index 72388c974..227c387aa 100644 --- a/include/atmos.h +++ b/include/atmos.h @@ -6,7 +6,7 @@ /* */ /* */ /* */ -/* (C) 2002 Debrune Jrome, <jede@oric.org> */ +/* (C) 2002 Debrune Jérome, <jede@oric.org> */ /* (C) 2003-2013 Ullrich von Bassewitz */ /* Roemerstrasse 52 */ /* D-70794 Filderstadt */ @@ -113,6 +113,18 @@ +/* Masks for joy_read */ +#define JOY_UP_MASK 0x10 +#define JOY_DOWN_MASK 0x08 +#define JOY_LEFT_MASK 0x01 +#define JOY_RIGHT_MASK 0x02 +#define JOY_BTN_1_MASK 0x20 + +#define JOY_FIRE_MASK JOY_BTN_1_MASK +#define JOY_FIRE(v) ((v) & JOY_FIRE_MASK) + + + /* No support for dynamically loadable drivers */ #define DYN_DRV 0 @@ -120,6 +132,7 @@ /* The addresses of the static drivers */ extern void atmos_pase_joy[]; /* Referred to by joy_static_stddrv[] */ +extern void atmos_ijk_joy[]; extern void atmos_acia_ser[]; extern void atmos_228_200_3_tgi[]; extern void atmos_240_200_2_tgi[]; /* Referred to by tgi_static_stddrv[] */ diff --git a/include/c128.h b/include/c128.h index 565fbc9ce..ee1dce99e 100644 --- a/include/c128.h +++ b/include/c128.h @@ -60,7 +60,7 @@ #define COLOR_WHITE 0x01 #define COLOR_RED 0x02 #define COLOR_CYAN 0x03 -#define COLOR_VIOLET 0x04 +#define COLOR_PURPLE 0x04 #define COLOR_GREEN 0x05 #define COLOR_BLUE 0x06 #define COLOR_YELLOW 0x07 @@ -78,7 +78,7 @@ #define TGI_COLOR_WHITE COLOR_WHITE #define TGI_COLOR_RED COLOR_RED #define TGI_COLOR_CYAN COLOR_CYAN -#define TGI_COLOR_VIOLET COLOR_VIOLET +#define TGI_COLOR_PURPLE COLOR_PURPLE #define TGI_COLOR_GREEN COLOR_GREEN #define TGI_COLOR_BLUE COLOR_BLUE #define TGI_COLOR_YELLOW COLOR_YELLOW @@ -91,6 +91,13 @@ #define TGI_COLOR_LIGHTBLUE COLOR_LIGHTBLUE #define TGI_COLOR_GRAY3 COLOR_GRAY3 +/* Masks for joy_read */ +#define JOY_UP_MASK 0x01 +#define JOY_DOWN_MASK 0x02 +#define JOY_LEFT_MASK 0x04 +#define JOY_RIGHT_MASK 0x08 +#define JOY_BTN_1_MASK 0x10 + /* Video mode defines */ #define VIDEOMODE_40x25 0x00 #define VIDEOMODE_80x25 0x80 @@ -134,6 +141,7 @@ extern void c128_joy_mou[]; extern void c128_inkwell_mou[]; extern void c128_pot_mou[]; extern void c128_swlink_ser[]; +extern void c128_hi_tgi[]; extern void c128_vdc_tgi[]; /* Referred to by tgi_static_stddrv[] */ extern void c128_vdc2_tgi[]; @@ -160,7 +168,8 @@ void fast (void); void slow (void); /* Switch the CPU into 1MHz mode. */ - +unsigned char isfast (void); +/* Returns 1 if the CPU is in 2MHz mode. */ /* End of c128.h */ #endif diff --git a/include/c16.h b/include/c16.h index d49ca6fd4..beb2caa56 100644 --- a/include/c16.h +++ b/include/c16.h @@ -45,11 +45,8 @@ -/* Include the base header file for the 264 series. include file. - */ -#ifndef _CBM264_H +/* Include the base header file for the 264 series. */ #include <cbm264.h> -#endif diff --git a/include/c64.h b/include/c64.h index adf3840b9..f501a4e7f 100644 --- a/include/c64.h +++ b/include/c64.h @@ -66,8 +66,7 @@ #define COLOR_WHITE 0x01 #define COLOR_RED 0x02 #define COLOR_CYAN 0x03 -#define COLOR_VIOLET 0x04 -#define COLOR_PURPLE COLOR_VIOLET +#define COLOR_PURPLE 0x04 #define COLOR_GREEN 0x05 #define COLOR_BLUE 0x06 #define COLOR_YELLOW 0x07 @@ -85,7 +84,6 @@ #define TGI_COLOR_WHITE COLOR_WHITE #define TGI_COLOR_RED COLOR_RED #define TGI_COLOR_CYAN COLOR_CYAN -#define TGI_COLOR_VIOLET COLOR_VIOLET #define TGI_COLOR_PURPLE COLOR_PURPLE #define TGI_COLOR_GREEN COLOR_GREEN #define TGI_COLOR_BLUE COLOR_BLUE @@ -99,6 +97,13 @@ #define TGI_COLOR_LIGHTBLUE COLOR_LIGHTBLUE #define TGI_COLOR_GRAY3 COLOR_GRAY3 +/* Masks for joy_read */ +#define JOY_UP_MASK 0x01 +#define JOY_DOWN_MASK 0x02 +#define JOY_LEFT_MASK 0x04 +#define JOY_RIGHT_MASK 0x08 +#define JOY_BTN_1_MASK 0x10 + /* Define hardware */ #include <_vic2.h> #define VIC (*(struct __vic2*)0xD000) @@ -130,10 +135,12 @@ /* The addresses of the static drivers */ +extern void c64_65816_emd[]; extern void c64_c256k_emd[]; extern void c64_dqbb_emd[]; extern void c64_georam_emd[]; extern void c64_isepic_emd[]; +extern void c64_kerberos_emd[]; extern void c64_ram_emd[]; extern void c64_ramcart_emd[]; extern void c64_reu_emd[]; diff --git a/include/cbm.h b/include/cbm.h index 701924d57..cceb76b1b 100644 --- a/include/cbm.h +++ b/include/cbm.h @@ -46,10 +46,7 @@ /* We need NULL. */ - -#if !defined(_STDDEF_H) -# include <stddef.h> -#endif +#include <stddef.h> /* Load the system-specific files here, if needed. */ #if defined(__C64__) && !defined(_C64_H) @@ -68,6 +65,8 @@ # include <cbm610.h> #elif defined(__PET__) && !defined(_PET_H) # include <pet.h> +#elif defined(__CX16__) && !defined(_CX16_H) +# include <cx16.h> #endif /* Include definitions for CBM file types */ @@ -75,6 +74,11 @@ +#define JOY_FIRE_MASK JOY_BTN_1_MASK +#define JOY_FIRE(v) ((v) & JOY_FIRE_MASK) + + + /*****************************************************************************/ /* Variables */ /*****************************************************************************/ @@ -117,6 +121,8 @@ extern char _filetype; /* Defaults to 's' */ #define CH_STOP 3 #define CH_LIRA 92 #define CH_ESC 27 +#define CH_FONT_LOWER 14 +#define CH_FONT_UPPER 142 @@ -153,7 +159,17 @@ struct cbm_dirent { unsigned char get_tv (void); /* Return the video mode the machine is using. */ +#define KBREPEAT_CURSOR 0x00 +#define KBREPEAT_NONE 0x40 +#define KBREPEAT_ALL 0x80 +unsigned char __fastcall__ kbrepeat (unsigned char mode); +/* Changes which keys have automatic repeat. */ + +#if !defined(__CBM610__) +void waitvsync (void); +/* Wait for the start of the next video field. */ +#endif /*****************************************************************************/ /* CBM kernal functions */ @@ -175,6 +191,8 @@ unsigned char cbm_k_acptr (void); unsigned char cbm_k_basin (void); void __fastcall__ cbm_k_bsout (unsigned char C); unsigned char __fastcall__ cbm_k_chkin (unsigned char FN); +unsigned char cbm_k_chrin (void); +void __fastcall__ cbm_k_chrout (unsigned char C); void __fastcall__ cbm_k_ciout (unsigned char C); unsigned char __fastcall__ cbm_k_ckout (unsigned char FN); void cbm_k_clall (void); @@ -187,11 +205,17 @@ unsigned int __fastcall__ cbm_k_load(unsigned char flag, unsigned addr); unsigned char cbm_k_open (void); unsigned char cbm_k_readst (void); unsigned char __fastcall__ cbm_k_save(unsigned int start, unsigned int end); +void cbm_k_scnkey (void); +void __fastcall__ cbm_k_second (unsigned char addr); void __fastcall__ cbm_k_setlfs (unsigned char LFN, unsigned char DEV, unsigned char SA); void __fastcall__ cbm_k_setnam (const char* Name); +void __fastcall__ cbm_k_settim (unsigned long timer); void __fastcall__ cbm_k_talk (unsigned char dev); +void __fastcall__ cbm_k_tksa (unsigned char addr); +void cbm_k_udtim (void); void cbm_k_unlsn (void); +void cbm_k_untlk (void); @@ -273,7 +297,15 @@ unsigned char __fastcall__ cbm_readdir (unsigned char lfn, /* Reads one directory line into cbm_dirent structure. ** Returns 0 if reading directory-line was successful. ** Returns non-zero if reading directory failed, or no more file-names to read. -** Returns 2 on last line. Then, l_dirent->size = the number of "blocks free." +** Returns 2 on last line. Then, l_dirent->size = the number of "blocks free", +** "blocks used", or "mb free". Return codes: +** 0 = read file-name +** 1 = couldn't read directory +** 2 = read "blocks free", "blocks used", or "mb free" +** 3 = couldn't find start of file-name +** 4 = couldn't find end of file-name +** 5 = couldn't read file-type +** 6 = premature end of file */ void __fastcall__ cbm_closedir (unsigned char lfn); @@ -283,5 +315,3 @@ void __fastcall__ cbm_closedir (unsigned char lfn); /* End of cbm.h */ #endif - - diff --git a/include/cbm264.h b/include/cbm264.h index ff7468d30..4951df518 100644 --- a/include/cbm264.h +++ b/include/cbm264.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -79,8 +79,7 @@ #define BCOLOR_WHITE 0x01 #define BCOLOR_RED 0x02 #define BCOLOR_CYAN 0x03 -#define BCOLOR_VIOLET 0x04 -#define BCOLOR_PURPLE BCOLOR_VIOLET +#define BCOLOR_PURPLE 0x04 #define BCOLOR_GREEN 0x05 #define BCOLOR_BLUE 0x06 #define BCOLOR_YELLOW 0x07 @@ -98,8 +97,7 @@ #define COLOR_WHITE (BCOLOR_WHITE | CATTR_LUMA7) #define COLOR_RED (BCOLOR_RED | CATTR_LUMA4) #define COLOR_CYAN (BCOLOR_CYAN | CATTR_LUMA7) -#define COLOR_VIOLET (BCOLOR_VIOLET | CATTR_LUMA7) -#define COLOR_PURPLE COLOR_VIOLET +#define COLOR_PURPLE (BCOLOR_VIOLET | CATTR_LUMA7) #define COLOR_GREEN (BCOLOR_GREEN | CATTR_LUMA7) #define COLOR_BLUE (BCOLOR_BLUE | CATTR_LUMA7) #define COLOR_YELLOW (BCOLOR_YELLOW | CATTR_LUMA7) @@ -112,6 +110,17 @@ #define COLOR_LIGHTBLUE (BCOLOR_LIGHTBLUE | CATTR_LUMA7) #define COLOR_GRAY3 (BCOLOR_WHITE | CATTR_LUMA5) + + +/* Masks for joy_read */ +#define JOY_UP_MASK 0x01 +#define JOY_DOWN_MASK 0x02 +#define JOY_LEFT_MASK 0x04 +#define JOY_RIGHT_MASK 0x08 +#define JOY_BTN_1_MASK 0x80 + + + /* Define hardware */ #include <_ted.h> #define TED (*(struct __ted*)0xFF00) @@ -125,11 +134,16 @@ /* Code */ /*****************************************************************************/ +void fast (void); +/* Switch the CPU into double-clock mode. */ + +void slow (void); +/* Switch the CPU into single-clock mode. */ + +unsigned char isfast (void); +/* Returns 1 if the CPU is in double-clock mode. */ + /* End of cbm264.h */ #endif - - - - diff --git a/include/cbm510.h b/include/cbm510.h index 25ea07540..20b334ed9 100644 --- a/include/cbm510.h +++ b/include/cbm510.h @@ -78,8 +78,7 @@ #define COLOR_WHITE 0x01 #define COLOR_RED 0x02 #define COLOR_CYAN 0x03 -#define COLOR_VIOLET 0x04 -#define COLOR_PURPLE COLOR_VIOLET +#define COLOR_PURPLE 0x04 #define COLOR_GREEN 0x05 #define COLOR_BLUE 0x06 #define COLOR_YELLOW 0x07 @@ -92,6 +91,13 @@ #define COLOR_LIGHTBLUE 0x0E #define COLOR_GRAY3 0x0F +/* Masks for joy_read */ +#define JOY_UP_MASK 0x01 +#define JOY_DOWN_MASK 0x02 +#define JOY_LEFT_MASK 0x04 +#define JOY_RIGHT_MASK 0x08 +#define JOY_BTN_1_MASK 0x10 + /* Define hardware */ #include <_vic2.h> #define VIC (*(struct __vic2*)0xD800) diff --git a/include/cbm610.h b/include/cbm610.h index 79d498431..de7aa50f8 100644 --- a/include/cbm610.h +++ b/include/cbm610.h @@ -85,7 +85,8 @@ #define SID (*(struct __sid*)0xDA00) #include <_6526.h> -#define CIA (*(struct __6526*)0xDC00) +#define CIA1 (*(struct __6526*)0xDB00) +#define CIA2 (*(struct __6526*)0xDC00) #include <_6551.h> #define ACIA (*(struct __6551*)0xDD00) @@ -144,11 +145,9 @@ void __fastcall__ pokewsys (unsigned addr, unsigned val); #define _textcolor(color) COLOR_WHITE #define _bgcolor(color) COLOR_BLACK #define _bordercolor(color) COLOR_BLACK +#define _cpeekcolor(color) COLOR_WHITE /* End of cbm610.h */ #endif - - - diff --git a/include/cbm_petscii_charmap.h b/include/cbm_petscii_charmap.h new file mode 100644 index 000000000..ebf478f19 --- /dev/null +++ b/include/cbm_petscii_charmap.h @@ -0,0 +1,297 @@ +/*****************************************************************************/ +/* */ +/* cbm_petscii_charmap.h */ +/* */ +/* CBM system standard string mapping (ISO-8859-1 -> PetSCII) */ +/* */ +/* */ +/* 2019-03-10, Greg King */ +/* */ +/* This software is provided "as-is", without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated, but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice must not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + +/* No include guard here! Multiple use in one file might be intentional. */ + +#pragma warn (remap-zero, push, off) + +#pragma charmap (0x00, 0x00) +#pragma charmap (0x01, 0x01) +#pragma charmap (0x02, 0x02) +#pragma charmap (0x03, 0x03) +#pragma charmap (0x04, 0x04) +#pragma charmap (0x05, 0x05) +#pragma charmap (0x06, 0x06) +#pragma charmap (0x07, 0x07) +#pragma charmap (0x08, 0x14) +#pragma charmap (0x09, 0x09) +#pragma charmap (0x0A, 0x0D) +#pragma charmap (0x0B, 0x11) +#pragma charmap (0x0C, 0x93) +#pragma charmap (0x0D, 0x0A) +#pragma charmap (0x0E, 0x0E) +#pragma charmap (0x0F, 0x0F) +#pragma charmap (0x10, 0x10) +#pragma charmap (0x11, 0x0B) +#pragma charmap (0x12, 0x12) +#pragma charmap (0x13, 0x13) +#pragma charmap (0x14, 0x08) +#pragma charmap (0x15, 0x15) +#pragma charmap (0x16, 0x16) +#pragma charmap (0x17, 0x17) +#pragma charmap (0x18, 0x18) +#pragma charmap (0x19, 0x19) +#pragma charmap (0x1A, 0x1A) +#pragma charmap (0x1B, 0x1B) +#pragma charmap (0x1C, 0x1C) +#pragma charmap (0x1D, 0x1D) +#pragma charmap (0x1E, 0x1E) +#pragma charmap (0x1F, 0x1F) + +#pragma charmap (0x20, 0x20) +#pragma charmap (0x21, 0x21) +#pragma charmap (0x22, 0x22) +#pragma charmap (0x23, 0x23) +#pragma charmap (0x24, 0x24) +#pragma charmap (0x25, 0x25) +#pragma charmap (0x26, 0x26) +#pragma charmap (0x27, 0x27) +#pragma charmap (0x28, 0x28) +#pragma charmap (0x29, 0x29) +#pragma charmap (0x2A, 0x2A) +#pragma charmap (0x2B, 0x2B) +#pragma charmap (0x2C, 0x2C) +#pragma charmap (0x2D, 0x2D) +#pragma charmap (0x2E, 0x2E) +#pragma charmap (0x2F, 0x2F) +#pragma charmap (0x30, 0x30) +#pragma charmap (0x31, 0x31) +#pragma charmap (0x32, 0x32) +#pragma charmap (0x33, 0x33) +#pragma charmap (0x34, 0x34) +#pragma charmap (0x35, 0x35) +#pragma charmap (0x36, 0x36) +#pragma charmap (0x37, 0x37) +#pragma charmap (0x38, 0x38) +#pragma charmap (0x39, 0x39) +#pragma charmap (0x3A, 0x3A) +#pragma charmap (0x3B, 0x3B) +#pragma charmap (0x3C, 0x3C) +#pragma charmap (0x3D, 0x3D) +#pragma charmap (0x3E, 0x3E) +#pragma charmap (0x3F, 0x3F) + +#pragma charmap (0x40, 0x40) +#pragma charmap (0x41, 0xC1) +#pragma charmap (0x42, 0xC2) +#pragma charmap (0x43, 0xC3) +#pragma charmap (0x44, 0xC4) +#pragma charmap (0x45, 0xC5) +#pragma charmap (0x46, 0xC6) +#pragma charmap (0x47, 0xC7) +#pragma charmap (0x48, 0xC8) +#pragma charmap (0x49, 0xC9) +#pragma charmap (0x4A, 0xCA) +#pragma charmap (0x4B, 0xCB) +#pragma charmap (0x4C, 0xCC) +#pragma charmap (0x4D, 0xCD) +#pragma charmap (0x4E, 0xCE) +#pragma charmap (0x4F, 0xCF) +#pragma charmap (0x50, 0xD0) +#pragma charmap (0x51, 0xD1) +#pragma charmap (0x52, 0xD2) +#pragma charmap (0x53, 0xD3) +#pragma charmap (0x54, 0xD4) +#pragma charmap (0x55, 0xD5) +#pragma charmap (0x56, 0xD6) +#pragma charmap (0x57, 0xD7) +#pragma charmap (0x58, 0xD8) +#pragma charmap (0x59, 0xD9) +#pragma charmap (0x5A, 0xDA) +#pragma charmap (0x5B, 0x5B) +#pragma charmap (0x5C, 0xBF) +#pragma charmap (0x5D, 0x5D) +#pragma charmap (0x5E, 0x5E) +#pragma charmap (0x5F, 0xA4) + +#pragma charmap (0x60, 0xAD) +#pragma charmap (0x61, 0x41) +#pragma charmap (0x62, 0x42) +#pragma charmap (0x63, 0x43) +#pragma charmap (0x64, 0x44) +#pragma charmap (0x65, 0x45) +#pragma charmap (0x66, 0x46) +#pragma charmap (0x67, 0x47) +#pragma charmap (0x68, 0x48) +#pragma charmap (0x69, 0x49) +#pragma charmap (0x6A, 0x4A) +#pragma charmap (0x6B, 0x4B) +#pragma charmap (0x6C, 0x4C) +#pragma charmap (0x6D, 0x4D) +#pragma charmap (0x6E, 0x4E) +#pragma charmap (0x6F, 0x4F) +#pragma charmap (0x70, 0x50) +#pragma charmap (0x71, 0x51) +#pragma charmap (0x72, 0x52) +#pragma charmap (0x73, 0x53) +#pragma charmap (0x74, 0x54) +#pragma charmap (0x75, 0x55) +#pragma charmap (0x76, 0x56) +#pragma charmap (0x77, 0x57) +#pragma charmap (0x78, 0x58) +#pragma charmap (0x79, 0x59) +#pragma charmap (0x7A, 0x5A) +#pragma charmap (0x7B, 0xB3) +#pragma charmap (0x7C, 0xDD) +#pragma charmap (0x7D, 0xAB) +#pragma charmap (0x7E, 0xB1) +#pragma charmap (0x7F, 0xDF) + +#pragma charmap (0x80, 0x80) +#pragma charmap (0x81, 0x81) +#pragma charmap (0x82, 0x82) +#pragma charmap (0x83, 0x83) +#pragma charmap (0x84, 0x84) +#pragma charmap (0x85, 0x85) +#pragma charmap (0x86, 0x86) +#pragma charmap (0x87, 0x87) +#pragma charmap (0x88, 0x88) +#pragma charmap (0x89, 0x89) +#pragma charmap (0x8A, 0x8A) +#pragma charmap (0x8B, 0x8B) +#pragma charmap (0x8C, 0x8C) +#pragma charmap (0x8D, 0x8D) +#pragma charmap (0x8E, 0x8E) +#pragma charmap (0x8F, 0x8F) +#pragma charmap (0x90, 0x90) +#pragma charmap (0x91, 0x91) +#pragma charmap (0x92, 0x92) +#pragma charmap (0x93, 0x0C) +#pragma charmap (0x94, 0x94) +#pragma charmap (0x95, 0x95) +#pragma charmap (0x96, 0x96) +#pragma charmap (0x97, 0x97) +#pragma charmap (0x98, 0x98) +#pragma charmap (0x99, 0x99) +#pragma charmap (0x9A, 0x9A) +#pragma charmap (0x9B, 0x9B) +#pragma charmap (0x9C, 0x9C) +#pragma charmap (0x9D, 0x9D) +#pragma charmap (0x9E, 0x9E) +#pragma charmap (0x9F, 0x9F) + +#pragma charmap (0xA0, 0xA0) +#pragma charmap (0xA1, 0xA1) +#pragma charmap (0xA2, 0xA2) +#pragma charmap (0xA3, 0xA3) +#pragma charmap (0xA4, 0xA4) +#pragma charmap (0xA5, 0xA5) +#pragma charmap (0xA6, 0xA6) +#pragma charmap (0xA7, 0xA7) +#pragma charmap (0xA8, 0xA8) +#pragma charmap (0xA9, 0xA9) +#pragma charmap (0xAA, 0xAA) +#pragma charmap (0xAB, 0xAB) +#pragma charmap (0xAC, 0xAC) +#pragma charmap (0xAD, 0xAD) +#pragma charmap (0xAE, 0xAE) +#pragma charmap (0xAF, 0xAF) +#pragma charmap (0xB0, 0xB0) +#pragma charmap (0xB1, 0xB1) +#pragma charmap (0xB2, 0xB2) +#pragma charmap (0xB3, 0xB3) +#pragma charmap (0xB4, 0xB4) +#pragma charmap (0xB5, 0xB5) +#pragma charmap (0xB6, 0xB6) +#pragma charmap (0xB7, 0xB7) +#pragma charmap (0xB8, 0xB8) +#pragma charmap (0xB9, 0xB9) +#pragma charmap (0xBA, 0xBA) +#pragma charmap (0xBB, 0xBB) +#pragma charmap (0xBC, 0xBC) +#pragma charmap (0xBD, 0xBD) +#pragma charmap (0xBE, 0xBE) +#pragma charmap (0xBF, 0xBF) + +#pragma charmap (0xC0, 0x60) +#pragma charmap (0xC1, 0x61) +#pragma charmap (0xC2, 0x62) +#pragma charmap (0xC3, 0x63) +#pragma charmap (0xC4, 0x64) +#pragma charmap (0xC5, 0x65) +#pragma charmap (0xC6, 0x66) +#pragma charmap (0xC7, 0x67) +#pragma charmap (0xC8, 0x68) +#pragma charmap (0xC9, 0x69) +#pragma charmap (0xCA, 0x6A) +#pragma charmap (0xCB, 0x6B) +#pragma charmap (0xCC, 0x6C) +#pragma charmap (0xCD, 0x6D) +#pragma charmap (0xCE, 0x6E) +#pragma charmap (0xCF, 0x6F) +#pragma charmap (0xD0, 0x70) +#pragma charmap (0xD1, 0x71) +#pragma charmap (0xD2, 0x72) +#pragma charmap (0xD3, 0x73) +#pragma charmap (0xD4, 0x74) +#pragma charmap (0xD5, 0x75) +#pragma charmap (0xD6, 0x76) +#pragma charmap (0xD7, 0x77) +#pragma charmap (0xD8, 0x78) +#pragma charmap (0xD9, 0x79) +#pragma charmap (0xDA, 0x7A) +#pragma charmap (0xDB, 0x7B) +#pragma charmap (0xDC, 0x7C) +#pragma charmap (0xDD, 0x7D) +#pragma charmap (0xDE, 0x7E) +#pragma charmap (0xDF, 0x7F) + +#pragma charmap (0xE0, 0xE0) +#pragma charmap (0xE1, 0xE1) +#pragma charmap (0xE2, 0xE2) +#pragma charmap (0xE3, 0xE3) +#pragma charmap (0xE4, 0xE4) +#pragma charmap (0xE5, 0xE5) +#pragma charmap (0xE6, 0xE6) +#pragma charmap (0xE7, 0xE7) +#pragma charmap (0xE8, 0xE8) +#pragma charmap (0xE9, 0xE9) +#pragma charmap (0xEA, 0xEA) +#pragma charmap (0xEB, 0xEB) +#pragma charmap (0xEC, 0xEC) +#pragma charmap (0xED, 0xED) +#pragma charmap (0xEE, 0xEE) +#pragma charmap (0xEF, 0xEF) +#pragma charmap (0xF0, 0xF0) +#pragma charmap (0xF1, 0xF1) +#pragma charmap (0xF2, 0xF2) +#pragma charmap (0xF3, 0xF3) +#pragma charmap (0xF4, 0xF4) +#pragma charmap (0xF5, 0xF5) +#pragma charmap (0xF6, 0xF6) +#pragma charmap (0xF7, 0xF7) +#pragma charmap (0xF8, 0xF8) +#pragma charmap (0xF9, 0xF9) +#pragma charmap (0xFA, 0xFA) +#pragma charmap (0xFB, 0xFB) +#pragma charmap (0xFC, 0xFC) +#pragma charmap (0xFD, 0xFD) +#pragma charmap (0xFE, 0xFE) +#pragma charmap (0xFF, 0xFF) + +#pragma warn (remap-zero, pop) diff --git a/include/cbm_screen_charmap.h b/include/cbm_screen_charmap.h new file mode 100644 index 000000000..5bf4c3f90 --- /dev/null +++ b/include/cbm_screen_charmap.h @@ -0,0 +1,311 @@ +/*****************************************************************************/ +/* */ +/* cbm_screen_charmap.h */ +/* */ +/* (c) Copyright 2019, Gerhard W. Gruber (sparhawk@gmx.at) */ +/* */ +/* When using CBM mode, this include converts character literals */ +/* from ASCII to screen-code mapping, so you can write directly */ +/* to the screen memory. */ +/* */ +/* If this include is used, no additional macros are needed. */ +/* */ +/*****************************************************************************/ + +/* No include guard here! Multiple use in one file may be intentional. */ + +#pragma warn (remap-zero, push, off) + +// Char $00 -> c + 128 +#pragma charmap (0x00, 0x80) + +// Char $01 ... $1A -> c + 128 + 64 (control alphabet) +#pragma charmap (0x01, 0xC1) +#pragma charmap (0x02, 0xC2) +#pragma charmap (0x03, 0xC3) +#pragma charmap (0x04, 0xC4) +#pragma charmap (0x05, 0xC5) +#pragma charmap (0x06, 0xC6) +#pragma charmap (0x07, 0xC7) +#pragma charmap (0x08, 0xC8) +#pragma charmap (0x09, 0xC9) +#pragma charmap (0x0A, 0xCA) +#pragma charmap (0x0B, 0xCB) +#pragma charmap (0x0C, 0xCC) +#pragma charmap (0x0D, 0xCD) +#pragma charmap (0x0E, 0xCE) +#pragma charmap (0x0F, 0xCF) +#pragma charmap (0x10, 0xD0) +#pragma charmap (0x11, 0xD1) +#pragma charmap (0x12, 0xD2) +#pragma charmap (0x13, 0xD3) +#pragma charmap (0x14, 0xD4) +#pragma charmap (0x15, 0xD5) +#pragma charmap (0x16, 0xD6) +#pragma charmap (0x17, 0xD7) +#pragma charmap (0x18, 0xD8) +#pragma charmap (0x19, 0xD9) +#pragma charmap (0x1A, 0xDA) + +// Char $1B ... $1F -> c + 128 +#pragma charmap (0x1B, 0x9B) +#pragma charmap (0x1C, 0x9C) +#pragma charmap (0x1D, 0x9D) +#pragma charmap (0x1E, 0x9E) +#pragma charmap (0x1F, 0x9F) + +// Char $20 ... $3F -> c +#pragma charmap (0x20, 0x20) +#pragma charmap (0x21, 0x21) +#pragma charmap (0x22, 0x22) +#pragma charmap (0x23, 0x23) +#pragma charmap (0x24, 0x24) +#pragma charmap (0x25, 0x25) +#pragma charmap (0x26, 0x26) +#pragma charmap (0x27, 0x27) +#pragma charmap (0x28, 0x28) +#pragma charmap (0x29, 0x29) +#pragma charmap (0x2A, 0x2A) +#pragma charmap (0x2B, 0x2B) +#pragma charmap (0x2C, 0x2C) +#pragma charmap (0x2D, 0x2D) +#pragma charmap (0x2E, 0x2E) +#pragma charmap (0x2F, 0x2F) +#pragma charmap (0x30, 0x30) +#pragma charmap (0x31, 0x31) +#pragma charmap (0x32, 0x32) +#pragma charmap (0x33, 0x33) +#pragma charmap (0x34, 0x34) +#pragma charmap (0x35, 0x35) +#pragma charmap (0x36, 0x36) +#pragma charmap (0x37, 0x37) +#pragma charmap (0x38, 0x38) +#pragma charmap (0x39, 0x39) +#pragma charmap (0x3A, 0x3A) +#pragma charmap (0x3B, 0x3B) +#pragma charmap (0x3C, 0x3C) +#pragma charmap (0x3D, 0x3D) +#pragma charmap (0x3E, 0x3E) +#pragma charmap (0x3F, 0x3F) + +// Char $40 -> c - 64 +#pragma charmap (0x40, 0x00) + +// Char $41 ... $5A -> c (upper-case alphabet) +#pragma charmap (0x41, 0x41) +#pragma charmap (0x42, 0x42) +#pragma charmap (0x43, 0x43) +#pragma charmap (0x44, 0x44) +#pragma charmap (0x45, 0x45) +#pragma charmap (0x46, 0x46) +#pragma charmap (0x47, 0x47) +#pragma charmap (0x48, 0x48) +#pragma charmap (0x49, 0x49) +#pragma charmap (0x4A, 0x4A) +#pragma charmap (0x4B, 0x4B) +#pragma charmap (0x4C, 0x4C) +#pragma charmap (0x4D, 0x4D) +#pragma charmap (0x4E, 0x4E) +#pragma charmap (0x4F, 0x4F) +#pragma charmap (0x50, 0x50) +#pragma charmap (0x51, 0x51) +#pragma charmap (0x52, 0x52) +#pragma charmap (0x53, 0x53) +#pragma charmap (0x54, 0x54) +#pragma charmap (0x55, 0x55) +#pragma charmap (0x56, 0x56) +#pragma charmap (0x57, 0x57) +#pragma charmap (0x58, 0x58) +#pragma charmap (0x59, 0x59) +#pragma charmap (0x5A, 0x5A) + +// Char $5B ... $5F -> c - 64 +#pragma charmap (0x5B, 0x1B) +#pragma charmap (0x5C, 0x1C) +#pragma charmap (0x5D, 0x1D) +#pragma charmap (0x5E, 0x1E) +#pragma charmap (0x5F, 0x1F) + +// Char $60 -> c - 32 +#pragma charmap (0x60, 0x40) + +// Char $61 ... $7A -> c - 32 - 64 (lower-case alphabet) +#pragma charmap (0x61, 0x01) +#pragma charmap (0x62, 0x02) +#pragma charmap (0x63, 0x03) +#pragma charmap (0x64, 0x04) +#pragma charmap (0x65, 0x05) +#pragma charmap (0x66, 0x06) +#pragma charmap (0x67, 0x07) +#pragma charmap (0x68, 0x08) +#pragma charmap (0x69, 0x09) +#pragma charmap (0x6A, 0x0A) +#pragma charmap (0x6B, 0x0B) +#pragma charmap (0x6C, 0x0C) +#pragma charmap (0x6D, 0x0D) +#pragma charmap (0x6E, 0x0E) +#pragma charmap (0x6F, 0x0F) +#pragma charmap (0x70, 0x10) +#pragma charmap (0x71, 0x11) +#pragma charmap (0x72, 0x12) +#pragma charmap (0x73, 0x13) +#pragma charmap (0x74, 0x14) +#pragma charmap (0x75, 0x15) +#pragma charmap (0x76, 0x16) +#pragma charmap (0x77, 0x17) +#pragma charmap (0x78, 0x18) +#pragma charmap (0x79, 0x19) +#pragma charmap (0x7A, 0x1A) + +// Char $7B ... $7F -> c - 32 +#pragma charmap (0x7B, 0x5B) +#pragma charmap (0x7C, 0x5C) +#pragma charmap (0x7D, 0x5D) +#pragma charmap (0x7E, 0x5E) +#pragma charmap (0x7F, 0x5F) + +// Char $80 -> c + 64 +#pragma charmap (0x80, 0xC0) + +// Char $81 ... $9A -> c (control alphabet) +#pragma charmap (0x81, 0x81) +#pragma charmap (0x82, 0x82) +#pragma charmap (0x83, 0x83) +#pragma charmap (0x84, 0x84) +#pragma charmap (0x85, 0x85) +#pragma charmap (0x86, 0x86) +#pragma charmap (0x87, 0x87) +#pragma charmap (0x88, 0x88) +#pragma charmap (0x89, 0x89) +#pragma charmap (0x8A, 0x8A) +#pragma charmap (0x8B, 0x8B) +#pragma charmap (0x8C, 0x8C) +#pragma charmap (0x8D, 0x8D) +#pragma charmap (0x8E, 0x8E) +#pragma charmap (0x8F, 0x8F) +#pragma charmap (0x90, 0x90) +#pragma charmap (0x91, 0x91) +#pragma charmap (0x92, 0x92) +#pragma charmap (0x93, 0x93) +#pragma charmap (0x94, 0x94) +#pragma charmap (0x95, 0x95) +#pragma charmap (0x96, 0x96) +#pragma charmap (0x97, 0x97) +#pragma charmap (0x98, 0x98) +#pragma charmap (0x99, 0x99) +#pragma charmap (0x9A, 0x9A) + +// Char $9B ... $9F -> c + 64 +#pragma charmap (0x9B, 0xDB) +#pragma charmap (0x9C, 0xDC) +#pragma charmap (0x9D, 0xDD) +#pragma charmap (0x9E, 0xDE) +#pragma charmap (0x9F, 0xDF) + +// Char $A0 ... $BF -> c - 64 +#pragma charmap (0xA0, 0x60) +#pragma charmap (0xA1, 0x61) +#pragma charmap (0xA2, 0x62) +#pragma charmap (0xA3, 0x63) +#pragma charmap (0xA4, 0x64) +#pragma charmap (0xA5, 0x65) +#pragma charmap (0xA6, 0x66) +#pragma charmap (0xA7, 0x67) +#pragma charmap (0xA8, 0x68) +#pragma charmap (0xA9, 0x69) +#pragma charmap (0xAA, 0x6A) +#pragma charmap (0xAB, 0x6B) +#pragma charmap (0xAC, 0x6C) +#pragma charmap (0xAD, 0x6D) +#pragma charmap (0xAE, 0x6E) +#pragma charmap (0xAF, 0x6F) +#pragma charmap (0xB0, 0x70) +#pragma charmap (0xB1, 0x71) +#pragma charmap (0xB2, 0x72) +#pragma charmap (0xB3, 0x73) +#pragma charmap (0xB4, 0x74) +#pragma charmap (0xB5, 0x75) +#pragma charmap (0xB6, 0x76) +#pragma charmap (0xB7, 0x77) +#pragma charmap (0xB8, 0x78) +#pragma charmap (0xB9, 0x79) +#pragma charmap (0xBA, 0x7A) +#pragma charmap (0xBB, 0x7B) +#pragma charmap (0xBC, 0x7C) +#pragma charmap (0xBD, 0x7D) +#pragma charmap (0xBE, 0x7E) +#pragma charmap (0xBF, 0x7F) + +// Char $C0 ... $DF -> c - 128 +#pragma charmap (0xC0, 0x40) + +// Char $C1 ... $DA -> c - 128 - 64 (lower-case alphabet) +#pragma charmap (0xC1, 0x01) +#pragma charmap (0xC2, 0x02) +#pragma charmap (0xC3, 0x03) +#pragma charmap (0xC4, 0x04) +#pragma charmap (0xC5, 0x05) +#pragma charmap (0xC6, 0x06) +#pragma charmap (0xC7, 0x07) +#pragma charmap (0xC8, 0x08) +#pragma charmap (0xC9, 0x09) +#pragma charmap (0xCA, 0x0A) +#pragma charmap (0xCB, 0x0B) +#pragma charmap (0xCC, 0x0C) +#pragma charmap (0xCD, 0x0D) +#pragma charmap (0xCE, 0x0E) +#pragma charmap (0xCF, 0x0F) +#pragma charmap (0xD0, 0x10) +#pragma charmap (0xD1, 0x11) +#pragma charmap (0xD2, 0x12) +#pragma charmap (0xD3, 0x13) +#pragma charmap (0xD4, 0x14) +#pragma charmap (0xD5, 0x15) +#pragma charmap (0xD6, 0x16) +#pragma charmap (0xD7, 0x17) +#pragma charmap (0xD8, 0x18) +#pragma charmap (0xD9, 0x19) +#pragma charmap (0xDA, 0x1A) + +// Char $DB ... $DF -> c - 128 +#pragma charmap (0xDB, 0x5B) +#pragma charmap (0xDC, 0x5C) +#pragma charmap (0xDD, 0x5D) +#pragma charmap (0xDE, 0x5E) +#pragma charmap (0xDF, 0x5F) + +// Char $E0 ... $FF -> c - 128 +#pragma charmap (0xE0, 0x60) +#pragma charmap (0xE1, 0x61) +#pragma charmap (0xE2, 0x62) +#pragma charmap (0xE3, 0x63) +#pragma charmap (0xE4, 0x64) +#pragma charmap (0xE5, 0x65) +#pragma charmap (0xE6, 0x66) +#pragma charmap (0xE7, 0x67) +#pragma charmap (0xE8, 0x68) +#pragma charmap (0xE9, 0x69) +#pragma charmap (0xEA, 0x6A) +#pragma charmap (0xEB, 0x6B) +#pragma charmap (0xEC, 0x6C) +#pragma charmap (0xED, 0x6D) +#pragma charmap (0xEE, 0x6E) +#pragma charmap (0xEF, 0x6F) +#pragma charmap (0xF0, 0x70) +#pragma charmap (0xF1, 0x71) +#pragma charmap (0xF2, 0x72) +#pragma charmap (0xF3, 0x73) +#pragma charmap (0xF4, 0x74) +#pragma charmap (0xF5, 0x75) +#pragma charmap (0xF6, 0x76) +#pragma charmap (0xF7, 0x77) +#pragma charmap (0xF8, 0x78) +#pragma charmap (0xF9, 0x79) +#pragma charmap (0xFA, 0x7A) +#pragma charmap (0xFB, 0x7B) +#pragma charmap (0xFC, 0x7C) +#pragma charmap (0xFD, 0x7D) +#pragma charmap (0xFE, 0x7E) +#pragma charmap (0xFF, 0x7F) + +#pragma warn (remap-zero, pop) diff --git a/include/cc65.h b/include/cc65.h index 4f9f3067f..2b05cc17a 100644 --- a/include/cc65.h +++ b/include/cc65.h @@ -44,47 +44,62 @@ -long __fastcall__ cc65_idiv32by16r16 (long rhs, int lhs); +long __fastcall__ idiv32by16r16 (long rhs, int lhs); /* Divide a 32 bit signed value by a 16 bit signed value yielding a 16 ** bit result and a 16 bit remainder. The former is returned in the lower 16 ** bit of the result, the latter in the upper. If you don't need the ** remainder, just assign (or cast) to an int. */ -unsigned long __fastcall__ cc65_udiv32by16r16 (unsigned long rhs, unsigned lhs); +unsigned long __fastcall__ udiv32by16r16 (unsigned long rhs, unsigned lhs); /* Divide a 32 bit unsigned value by a 16 bit unsigned value yielding a 16 ** bit result and a 16 bit remainder. The former is returned in the lower 16 ** bit of the result, the latter in the upper. If you don't need the ** remainder, just assign (or cast) to an unsigned. */ -int __fastcall__ cc65_imul8x8r16 (signed char lhs, signed char rhs); -/* Multiplicate two signed 8 bit to yield an signed 16 bit result */ +int __fastcall__ imul8x8r16 (signed char lhs, signed char rhs); +/* Multiply two signed 8 bit to yield an signed 16 bit result */ -long __fastcall__ cc65_imul16x16r32 (int lhs, int rhs); -/* Multiplicate two signed 16 bit to yield a signed 32 bit result */ +long __fastcall__ imul16x16r32 (int lhs, int rhs); +/* Multiply two signed 16 bit to yield a signed 32 bit result */ -unsigned __fastcall__ cc65_umul8x8r16 (unsigned char lhs, unsigned char rhs); -/* Multiplicate two unsigned 8 bit to yield an unsigned 16 bit result */ +unsigned __fastcall__ umul8x8r16 (unsigned char lhs, unsigned char rhs); +/* Multiply two unsigned 8 bit to yield an unsigned 16 bit result */ -unsigned long __fastcall__ cc65_umul16x8r32 (unsigned lhs, unsigned char rhs); -/* Multiplicate an unsigned 16 bit by an unsigned 8 bit number yielding a 24 +unsigned long __fastcall__ umul16x8r32 (unsigned lhs, unsigned char rhs); +/* Multiply an unsigned 16 bit by an unsigned 8 bit number yielding a 24 ** bit unsigned result that is extended to 32 bits for easier handling from C. */ -unsigned long __fastcall__ cc65_umul16x16r32 (unsigned lhs, unsigned rhs); -/* Multiplicate two unsigned 16 bit to yield an unsigned 32 bit result */ +unsigned long __fastcall__ umul16x16r32 (unsigned lhs, unsigned rhs); +/* Multiply two unsigned 16 bit to yield an unsigned 32 bit result */ -int __fastcall__ cc65_sin (unsigned x); +unsigned int __fastcall__ mul20 (unsigned char value); +/* Multiply an 8 bit unsigned value by 20 and return the 16 bit unsigned +** result +*/ + +unsigned int __fastcall__ mul40 (unsigned char value); +/* Multiply an 8 bit unsigned value by 40 and return the 16 bit unsigned +** result +*/ + +int __fastcall__ _sin (unsigned x); /* Return the sine of the argument, which must be in range 0..360. The result ** is in 8.8 fixed point format, which means that 1.0 = $100 and -1.0 = $FF00. */ -int __fastcall__ cc65_cos (unsigned x); +int __fastcall__ _cos (unsigned x); /* Return the cosine of the argument, which must be in range 0..360. The result ** is in 8.8 fixed point format, which means that 1.0 = $100 and -1.0 = $FF00. */ +unsigned char doesclrscrafterexit (void); +/* Indicates whether the screen automatically be cleared after program +** termination. +*/ + /* End of cc65.h */ diff --git a/include/conio.h b/include/conio.h index 9eb68e565..bac20e3c5 100644 --- a/include/conio.h +++ b/include/conio.h @@ -54,36 +54,8 @@ -#if !defined(_STDARG_H) -# include <stdarg.h> -#endif - -/* Include the correct machine-specific file */ -#if defined(__APPLE2ENH__) -# include <apple2enh.h> -#elif defined(__APPLE2__) -# include <apple2.h> -#elif defined(__ATARI__) -# include <atari.h> -#elif defined(__ATMOS__) -# include <atmos.h> -#elif defined(__CBM__) -# include <cbm.h> -#elif defined(__GAMATE__) -# include <gamate.h> -#elif defined(__GEOS__) -# include <geos.h> -#elif defined(__LUNIX__) -# include <lunix.h> -#elif defined(__LYNX__) -# include <lynx.h> -#elif defined(__NES__) -# include <nes.h> -#elif defined(__OSIC1P__) -# include <osic1p.h> -#elif defined(__PCE__) -# include <pce.h> -#endif +#include <stdarg.h> +#include <target.h> @@ -144,6 +116,23 @@ int cscanf (const char* format, ...); int __fastcall__ vcscanf (const char* format, va_list ap); /* Like vscanf(), but uses direct keyboard input */ +char cpeekc (void); +/* Return the character from the current cursor position */ + +unsigned char cpeekcolor (void); +/* Return the color from the current cursor position */ + +unsigned char cpeekrevers (void); +/* Return the reverse attribute from the current cursor position. +** If the character is reversed, then return 1; return 0 otherwise. +*/ + +void __fastcall__ cpeeks (char* s, unsigned int length); +/* Return a string of the characters that start at the current cursor position. +** Put the string into the buffer to which "s" points. The string will have +** "length" characters, then will be '\0'-terminated. +*/ + unsigned char __fastcall__ cursor (unsigned char onoff); /* If onoff is 1, a cursor is displayed when waiting for keyboard input. If ** onoff is 0, the cursor is hidden when waiting for keyboard input. The @@ -211,20 +200,23 @@ void __fastcall__ cputhex16 (unsigned val); ** the macro will give access to the actual function. */ -#if defined(_textcolor) -# define textcolor(x) _textcolor(x) +#ifdef _textcolor +# define textcolor(color) _textcolor(color) #endif -#if defined(_bgcolor) -# define bgcolor(x) _bgcolor(x) +#ifdef _bgcolor +# define bgcolor(color) _bgcolor(color) #endif -#if defined(_bordercolor) -# define bordercolor(x) _bordercolor(x) +#ifdef _bordercolor +# define bordercolor(color) _bordercolor(color) +#endif +#ifdef _cpeekcolor +# define cpeekcolor() _cpeekcolor() +#endif +#ifdef _cpeekrevers +# define cpeekrevers() _cpeekrevers() #endif /* End of conio.h */ #endif - - - diff --git a/include/creativision.h b/include/creativision.h new file mode 100644 index 000000000..6910ee0cf --- /dev/null +++ b/include/creativision.h @@ -0,0 +1,78 @@ +/*****************************************************************************/ +/* */ +/* creativision.h */ +/* */ +/* Creativision system specific definitions */ +/* */ +/* */ +/* */ +/* (C) 2013 cvemu */ +/* (C) 2017 Christian Groessler <chris@groessler.org> */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + +#ifndef _CVISION_H +#define _CVISION_H + +/* Character codes */ +#define CH_VLINE 33 +#define CH_HLINE 34 +#define CH_ULCORNER 35 +#define CH_URCORNER 36 +#define CH_LLCORNER 37 +#define CH_LRCORNER 38 + +/* Masks for joy_read */ +#define JOY_UP_MASK 0x10 +#define JOY_DOWN_MASK 0x04 +#define JOY_LEFT_MASK 0x20 +#define JOY_RIGHT_MASK 0x08 +#define JOY_BTN_1_MASK 0x01 +#define JOY_BTN_2_MASK 0x02 + +/* no support for dynamically loadable drivers */ +#define DYN_DRV 0 + +/* Colours - from TMS9918 */ +#define COLOR_TRANSPARENT 0 +#define COLOR_BLACK 1 +#define COLOR_MED_GREEN 2 +#define COLOR_LIGHT_GREEN 3 +#define COLOR_DARK_BLUE 4 +#define COLOR_LIGHT_BLUE 5 +#define COLOR_DARK_RED 6 +#define COLOR_CYAN 7 +#define COLOR_MED_RED 8 +#define COLOR_LIGHT_RED 9 +#define COLOR_DARK_YELLOW 10 +#define COLOR_LIGHT_YELLOW 11 +#define COLOR_DARK_GREEN 12 +#define COLOR_MAGENTA 13 +#define COLOR_GREY 14 +#define COLOR_WHITE 15 + +/* Protos */ +void __fastcall__ psg_outb (unsigned char b); +void __fastcall__ psg_delay (unsigned char b); +void psg_silence (void); +void __fastcall__ bios_playsound (const void *a, unsigned char b); + +#endif /* #ifndef _CVISION_H */ diff --git a/include/ctype.h b/include/ctype.h index b440bfb70..6e299f859 100644 --- a/include/ctype.h +++ b/include/ctype.h @@ -36,10 +36,6 @@ #ifndef _CTYPE_H #define _CTYPE_H - -/* The array containing character classification data */ -extern unsigned char _ctype[256]; - /* Bits used to specify character classes */ #define _CT_LOWER 0x01 /* 0 - Lower case char */ #define _CT_UPPER 0x02 /* 1 - Upper case char */ @@ -61,6 +57,9 @@ extern unsigned char _ctype[256]; /* Character classification functions */ int __fastcall__ isalnum (int c); int __fastcall__ isalpha (int c); +#if __CC65_STD__ >= __CC65_STD_CC65__ +int __fastcall__ isascii (int c); /* non standard */ +#endif int __fastcall__ iscntrl (int c); int __fastcall__ isdigit (int c); int __fastcall__ isgraph (int c); @@ -78,106 +77,10 @@ int __fastcall__ toupper (int c); /* Always external */ int __fastcall__ tolower (int c); /* Always external */ #if __CC65_STD__ >= __CC65_STD_CC65__ -unsigned char __fastcall__ toascii (unsigned char c); +unsigned char __fastcall__ toascii (unsigned char c); /* non standard */ /* Convert a target-specific character to ASCII. */ #endif - - -/* When inlining-of-known-functions is enabled, overload most of the above -** functions by macroes. The function prototypes are available again after -** #undef'ing the macroes. -** Please note that the following macroes do NOT handle EOF correctly, as -** stated in the manual. If you need correct behaviour for EOF, don't -** use -Os, or #undefine the following macroes. -*/ -#ifdef __OPT_s__ - -#define isalnum(c) (__AX__ = (c), \ - __asm__ ("tay"), \ - __asm__ ("lda %v,y", _ctype), \ - __asm__ ("and #%b", _CT_ALNUM), \ - __AX__) - -#define isalpha(c) (__AX__ = (c), \ - __asm__ ("tay"), \ - __asm__ ("lda %v,y", _ctype), \ - __asm__ ("and #%b", _CT_ALPHA), \ - __AX__) - -#if __CC65_STD__ >= __CC65_STD_C99__ -#define isblank(c) (__AX__ = (c), \ - __asm__ ("tay"), \ - __asm__ ("lda %v,y", _ctype), \ - __asm__ ("and #%b", _CT_SPACE_TAB), \ - __AX__) -#endif - -#define iscntrl(c) (__AX__ = (c), \ - __asm__ ("tay"), \ - __asm__ ("lda %v,y", _ctype), \ - __asm__ ("and #%b", _CT_CNTRL), \ - __AX__) - -#define isdigit(c) (__AX__ = (c), \ - __asm__ ("tay"), \ - __asm__ ("lda %v,y", _ctype), \ - __asm__ ("and #%b", _CT_DIGIT), \ - __AX__) - -#define isgraph(c) (__AX__ = (c), \ - __asm__ ("tay"), \ - __asm__ ("lda %v,y", _ctype), \ - __asm__ ("and #%b", _CT_NOT_GRAPH), \ - __asm__ ("cmp #1"), \ - __asm__ ("lda #1"), \ - __asm__ ("sbc #1"), \ - __AX__) - -#define islower(c) (__AX__ = (c), \ - __asm__ ("tay"), \ - __asm__ ("lda %v,y", _ctype), \ - __asm__ ("and #%b", _CT_LOWER), \ - __AX__) - -#define isprint(c) (__AX__ = (c), \ - __asm__ ("tay"), \ - __asm__ ("lda %v,y", _ctype), \ - __asm__ ("and #%b", _CT_NOT_PRINT), \ - __asm__ ("eor #%b", _CT_NOT_PRINT), \ - __AX__) - -#define ispunct(c) (__AX__ = (c), \ - __asm__ ("tay"), \ - __asm__ ("lda %v,y", _ctype), \ - __asm__ ("and #%b", _CT_NOT_PUNCT), \ - __asm__ ("cmp #1"), \ - __asm__ ("lda #1"), \ - __asm__ ("sbc #1"), \ - __AX__) - -#define isspace(c) (__AX__ = (c), \ - __asm__ ("tay"), \ - __asm__ ("lda %v,y", _ctype), \ - __asm__ ("and #%b", _CT_WS), \ - __AX__) - -#define isupper(c) (__AX__ = (c), \ - __asm__ ("tay"), \ - __asm__ ("lda %v,y", _ctype), \ - __asm__ ("and #%b", _CT_UPPER), \ - __AX__) - -#define isxdigit(c) (__AX__ = (c), \ - __asm__ ("tay"), \ - __asm__ ("lda %v,y", _ctype), \ - __asm__ ("and #%b", _CT_XDIGIT), \ - __AX__) - -#endif - - - /* End of ctype.h */ #endif diff --git a/include/cx16.h b/include/cx16.h new file mode 100644 index 000000000..42495c862 --- /dev/null +++ b/include/cx16.h @@ -0,0 +1,379 @@ +/*****************************************************************************/ +/* */ +/* cx16.h */ +/* */ +/* CX16 system-specific definitions */ +/* For prerelease 39 */ +/* */ +/* */ +/* This software is provided "as-is", without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated, but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef _CX16_H +#define _CX16_H + + + +/* Check for errors */ +#ifndef __CX16__ +# error This module may be used only when compiling for the CX16! +#endif + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +/* Additional output character codes */ +#define CH_COLOR_SWAP 0x01 +#define CH_UNDERLINE 0x04 +#define CH_WHITE 0x05 +#define CH_BOLD 0x06 +#define CH_BACKSPACE 0x08 +#define CH_ITALIC 0x0B +#define CH_OUTLINE 0x0C +#define CH_FONT_ISO 0x0F +#define CH_RED 0x1C +#define CH_GREEN 0x1E +#define CH_BLUE 0x1F +#define CH_ORANGE 0x81 +#define CH_FONT_PET 0x8F +#define CH_BLACK 0x90 +#define CH_ATTR_CLEAR 0x92 +#define CH_BROWN 0x95 +#define CH_PINK 0x96 +#define CH_LIGHTRED CH_PINK +#define CH_GRAY1 0x97 +#define CH_GRAY2 0x98 +#define CH_LIGHTGREEN 0x99 +#define CH_LIGHTBLUE 0x9A +#define CH_GRAY3 0x9B +#define CH_PURPLE 0x9C +#define CH_YELLOW 0x9E +#define CH_CYAN 0x9F +#define CH_SHIFT_SPACE 0xA0 + +/* Additional key defines */ +#define CH_SHIFT_TAB 0x18 +#define CH_HELP 0x84 +#define CH_F1 0x85 +#define CH_F2 0x89 +#define CH_F3 0x86 +#define CH_F4 0x8A +#define CH_F5 0x87 +#define CH_F6 0x8B +#define CH_F7 0x88 +#define CH_F8 0x8C +#define CH_F9 0x10 +#define CH_F10 0x15 +#define CH_F11 0x16 +#define CH_F12 0x17 + +/* Color defines */ +#define COLOR_BLACK 0x00 +#define COLOR_WHITE 0x01 +#define COLOR_RED 0x02 +#define COLOR_CYAN 0x03 +#define COLOR_PURPLE 0x04 +#define COLOR_GREEN 0x05 +#define COLOR_BLUE 0x06 +#define COLOR_YELLOW 0x07 +#define COLOR_ORANGE 0x08 +#define COLOR_BROWN 0x09 +#define COLOR_PINK 0x0A +#define COLOR_LIGHTRED COLOR_PINK +#define COLOR_GRAY1 0x0B +#define COLOR_GRAY2 0x0C +#define COLOR_LIGHTGREEN 0x0D +#define COLOR_LIGHTBLUE 0x0E +#define COLOR_GRAY3 0x0F + +/* TGI color defines */ +#define TGI_COLOR_BLACK COLOR_BLACK +#define TGI_COLOR_WHITE COLOR_WHITE +#define TGI_COLOR_RED COLOR_RED +#define TGI_COLOR_CYAN COLOR_CYAN +#define TGI_COLOR_PURPLE COLOR_PURPLE +#define TGI_COLOR_GREEN COLOR_GREEN +#define TGI_COLOR_BLUE COLOR_BLUE +#define TGI_COLOR_YELLOW COLOR_YELLOW +#define TGI_COLOR_ORANGE COLOR_ORANGE +#define TGI_COLOR_BROWN COLOR_BROWN +#define TGI_COLOR_LIGHTRED COLOR_LIGHTRED +#define TGI_COLOR_GRAY1 COLOR_GRAY1 +#define TGI_COLOR_GRAY2 COLOR_GRAY2 +#define TGI_COLOR_LIGHTGREEN COLOR_LIGHTGREEN +#define TGI_COLOR_LIGHTBLUE COLOR_LIGHTBLUE +#define TGI_COLOR_GRAY3 COLOR_GRAY3 + +/* NES controller masks for joy_read() */ + +#define JOY_BTN_1_MASK 0x80 +#define JOY_BTN_2_MASK 0x40 +#define JOY_BTN_3_MASK 0x20 +#define JOY_BTN_4_MASK 0x10 +#define JOY_UP_MASK 0x08 +#define JOY_DOWN_MASK 0x04 +#define JOY_LEFT_MASK 0x02 +#define JOY_RIGHT_MASK 0x01 + +#define JOY_BTN_A_MASK JOY_BTN_1_MASK +#define JOY_BTN_B_MASK JOY_BTN_2_MASK +#define JOY_SELECT_MASK JOY_BTN_3_MASK +#define JOY_START_MASK JOY_BTN_4_MASK + +#define JOY_BTN_A(v) ((v) & JOY_BTN_A_MASK) +#define JOY_BTN_B(v) ((v) & JOY_BTN_B_MASK) +#define JOY_SELECT(v) ((v) & JOY_SELECT_MASK) +#define JOY_START(v) ((v) & JOY_START_MASK) + +#define JOY_FIRE2_MASK JOY_BTN_2_MASK +#define JOY_FIRE2(v) ((v) & JOY_FIRE2_MASK) + +/* Additional mouse button mask */ +#define MOUSE_BTN_MIDDLE 0x02 + +/* get_tv() return codes +** set_tv() argument codes +*/ +enum { + TV_NONE = 0x00, + TV_VGA, + TV_NTSC_COLOR, + TV_RGB, + TV_NONE2, + TV_VGA2, + TV_NTSC_MONO, + TV_RGB2 +}; + +/* Video modes for videomode() */ +#define VIDEOMODE_80x60 0x00 +#define VIDEOMODE_80x30 0x01 +#define VIDEOMODE_40x60 0x02 +#define VIDEOMODE_40x30 0x03 +#define VIDEOMODE_40x15 0x04 +#define VIDEOMODE_20x30 0x05 +#define VIDEOMODE_20x15 0x06 +#define VIDEOMODE_80COL VIDEOMODE_80x60 +#define VIDEOMODE_40COL VIDEOMODE_40x30 +#define VIDEOMODE_320x240 0x80 +#define VIDEOMODE_SWAP (-1) + +/* VERA's address increment/decrement numbers */ +enum { + VERA_DEC_0 = ((0 << 1) | 1) << 3, + VERA_DEC_1 = ((1 << 1) | 1) << 3, + VERA_DEC_2 = ((2 << 1) | 1) << 3, + VERA_DEC_4 = ((3 << 1) | 1) << 3, + VERA_DEC_8 = ((4 << 1) | 1) << 3, + VERA_DEC_16 = ((5 << 1) | 1) << 3, + VERA_DEC_32 = ((6 << 1) | 1) << 3, + VERA_DEC_64 = ((7 << 1) | 1) << 3, + VERA_DEC_128 = ((8 << 1) | 1) << 3, + VERA_DEC_256 = ((9 << 1) | 1) << 3, + VERA_DEC_512 = ((10 << 1) | 1) << 3, + VERA_DEC_40 = ((11 << 1) | 1) << 3, + VERA_DEC_80 = ((12 << 1) | 1) << 3, + VERA_DEC_160 = ((13 << 1) | 1) << 3, + VERA_DEC_320 = ((14 << 1) | 1) << 3, + VERA_DEC_640 = ((15 << 1) | 1) << 3, + VERA_INC_0 = ((0 << 1) | 0) << 3, + VERA_INC_1 = ((1 << 1) | 0) << 3, + VERA_INC_2 = ((2 << 1) | 0) << 3, + VERA_INC_4 = ((3 << 1) | 0) << 3, + VERA_INC_8 = ((4 << 1) | 0) << 3, + VERA_INC_16 = ((5 << 1) | 0) << 3, + VERA_INC_32 = ((6 << 1) | 0) << 3, + VERA_INC_64 = ((7 << 1) | 0) << 3, + VERA_INC_128 = ((8 << 1) | 0) << 3, + VERA_INC_256 = ((9 << 1) | 0) << 3, + VERA_INC_512 = ((10 << 1) | 0) << 3, + VERA_INC_40 = ((11 << 1) | 0) << 3, + VERA_INC_80 = ((12 << 1) | 0) << 3, + VERA_INC_160 = ((13 << 1) | 0) << 3, + VERA_INC_320 = ((14 << 1) | 0) << 3, + VERA_INC_640 = ((15 << 1) | 0) << 3 +}; + +/* VERA's interrupt flags */ +#define VERA_IRQ_VSYNC 0b00000001 +#define VERA_IRQ_RASTER 0b00000010 +#define VERA_IRQ_SPR_COLL 0b00000100 +#define VERA_IRQ_AUDIO_LOW 0b00001000 + + +/* Define hardware. */ + +#define RAM_BANK (*(unsigned char *)0x00) +#define ROM_BANK (*(unsigned char *)0x01) + +#include <_6522.h> +#define VIA1 (*(volatile struct __6522 *)0x9F00) +#define VIA2 (*(volatile struct __6522 *)0x9F10) + +/* A structure with the Video Enhanced Retro Adapter's external registers */ +struct __vera { + unsigned short address; /* Address for data ports */ + unsigned char address_hi; + unsigned char data0; /* Data port 0 */ + unsigned char data1; /* Data port 1 */ + unsigned char control; /* Control register */ + unsigned char irq_enable; /* Interrupt enable bits */ + unsigned char irq_flags; /* Interrupt flags */ + unsigned char irq_raster; /* Line where IRQ will occur */ + union { + struct { /* Visible when DCSEL flag = 0 */ + unsigned char video; /* Flags to enable video layers */ + unsigned char hscale; /* Horizontal scale factor */ + unsigned char vscale; /* Vertical scale factor */ + unsigned char border; /* Border color (NTSC mode) */ + }; + struct { /* Visible when DCSEL flag = 1 */ + unsigned char hstart; /* Horizontal start position */ + unsigned char hstop; /* Horizontal stop position */ + unsigned char vstart; /* Vertical start position */ + unsigned char vstop; /* Vertical stop position */ + }; + } display; + struct { + unsigned char config; /* Layer map geometry */ + unsigned char mapbase; /* Map data address */ + unsigned char tilebase; /* Tile address and geometry */ + unsigned int hscroll; /* Smooth scroll horizontal offset */ + unsigned int vscroll; /* Smooth scroll vertical offset */ + } layer0; + struct { + unsigned char config; + unsigned char mapbase; + unsigned char tilebase; + unsigned int hscroll; + unsigned int vscroll; + } layer1; + struct { + unsigned char control; /* PCM format */ + unsigned char rate; /* Sample rate */ + unsigned char data; /* PCM output queue */ + } audio; /* Pulse-Code Modulation registers */ + struct { + unsigned char data; + unsigned char control; + } spi; /* SD card interface */ +}; +#define VERA (*(volatile struct __vera *)0x9F20) + +/* Audio chip */ +struct __ym2151 { + union { + unsigned char reg; /* Register number for data */ + unsigned char status; /* Busy flag */ + }; + unsigned char data; +}; +#define YM2151 (*(volatile struct __ym2151 *)0x9F40) + +/* A structure with the x16emu's settings registers */ +struct __emul { + unsigned char debug; /* Boolean: debugging enabled */ + unsigned char vera_action; /* Boolean: displaying VERA activity */ + unsigned char keyboard; /* Boolean: displaying typed keys */ + unsigned char echo; /* How to send Kernal output to host */ + unsigned char save_on_exit; /* Boolean: save machine state on exit */ + unsigned char gif_method; /* How GIF movie is being recorded */ + unsigned char const unused1[2]; + unsigned long const cycle_count; /* Running total of CPU cycles (8 MHz.) */ + unsigned char const unused2[1]; + unsigned char const keymap; /* Keyboard layout number */ + char const detect[2]; /* "16" if running on x16emu */ +}; +#define EMULATOR (*(volatile struct __emul *)0x9FB0) + +/* An array window into the half Mebibyte or two Mebibytes of banked RAM */ +#define BANK_RAM ((unsigned char *)0xA000) + + + +/* The addresses of the static drivers */ + +extern void cx16_std_joy[]; /* Referenced by joy_static_stddrv[] */ +extern void cx16_std_mou[]; /* Referenced by mouse_static_stddrv[] */ +extern void cx320p1_tgi[]; /* Referenced by tgi_static_stddrv[] */ + + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +unsigned short get_numbanks (void); +/* Return the number of RAM banks that the machine has. */ + +signed char get_ostype (void); +/* Get the ROM build version. +** -1 -- custom build +** Negative -- prerelease build +** Positive -- release build +*/ + +unsigned char get_tv (void); +/* Return the video signal type that the machine is using. +** Return a TV_xx constant. +*/ + +void __fastcall__ set_tv (unsigned char type); +/* Set the video signal type that the machine will use. +** Call with a TV_xx constant. +*/ + +unsigned char __fastcall__ vera_layer_enable (unsigned char layers); +/* Display the layers that are "named" by the bit flags in layers. +** A value of 0b01 shows layer 0, a value of 0b10 shows layer 1, +** a value of 0b11 shows both layers. Return the previous value. +*/ + +unsigned char __fastcall__ vera_sprites_enable (unsigned char mode); +/* Enable the sprite engine when mode is non-zero (true); +** disable sprites when mode is zero. Return the previous mode. +*/ + +signed char __fastcall__ videomode (signed char mode); +/* Set the video mode, return the old mode. +** Return -1 if Mode isn't valid. +** Call with one of the VIDEOMODE_xx constants. +*/ + +unsigned char __fastcall__ vpeek (unsigned long addr); +/* Get a byte from a location in VERA's internal address space. */ + +void __fastcall__ vpoke (unsigned char data, unsigned long addr); +/* Put a byte into a location in VERA's internal address space. +** (addr is second instead of first for the sake of code efficiency.) +*/ + + + +/* End of cX16.h */ +#endif diff --git a/include/dbg.h b/include/dbg.h index 7b4f67e31..4cca826ec 100644 --- a/include/dbg.h +++ b/include/dbg.h @@ -39,7 +39,7 @@ ** are declared here. ** ** To use the debugger, just call DbgInit in your application. Once it has -** been called, the debugger will catch any BRK opcode. Use the BREAK macro +** been called, the debugger will catch any BRK opcode. Use the BREAK macro ** defined below to insert breakpoints into your code. ** ** There are currently a lot of things that cannot be debugged, graphical @@ -121,4 +121,4 @@ void __fastcall__ DbgInit (unsigned unused); - + diff --git a/include/device.h b/include/device.h index 68b1c807a..b0a5f5e76 100644 --- a/include/device.h +++ b/include/device.h @@ -35,6 +35,13 @@ +#ifndef _HAVE_size_t +typedef unsigned size_t; +#define _HAVE_size_t +#endif + + + /*****************************************************************************/ /* Data */ /*****************************************************************************/ diff --git a/include/dirent.h b/include/dirent.h index b5e1be135..124c7f224 100644 --- a/include/dirent.h +++ b/include/dirent.h @@ -107,7 +107,7 @@ struct dirent { #define _DE_ISREG(t) (((t) & _CBM_T_REG) != 0) #define _DE_ISDIR(t) ((t) == _CBM_T_DIR) -#define _DE_ISLBL(t) ((t) == _CBM_T_HDR) +#define _DE_ISLBL(t) ((t) == _CBM_T_HEADER) #define _DE_ISLNK(t) ((t) == _CBM_T_LNK) #elif defined(__LYNX__) diff --git a/include/em.h b/include/em.h index b151800ae..47bd23222 100644 --- a/include/em.h +++ b/include/em.h @@ -82,7 +82,7 @@ unsigned char __fastcall__ em_load_driver (const char* driver); unsigned char em_unload (void); /* Uninstall, then unload the currently loaded driver. */ -unsigned char __fastcall__ em_install (void* driver); +unsigned char __fastcall__ em_install (const void* driver); /* Install an already loaded driver. Return an error code. */ unsigned char em_uninstall (void); diff --git a/include/em/em-kernel.h b/include/em/em-kernel.h index e5df80321..ffc6e131a 100644 --- a/include/em/em-kernel.h +++ b/include/em/em-kernel.h @@ -52,6 +52,7 @@ typedef struct { /* Driver header */ char id[3]; /* Contains 0x65, 0x6d, 0x64 ("emd") */ unsigned char version; /* Interface version */ + void* libreference; /* Library reference */ /* Jump vectors. Note that these are not C callable */ void* install; /* INSTALL routine */ @@ -74,6 +75,3 @@ extern em_drv_header* em_drv; /* Pointer to driver */ /* End of em-kernel.h */ #endif - - - diff --git a/include/errno.h b/include/errno.h index 0b3d67bc7..92d304938 100644 --- a/include/errno.h +++ b/include/errno.h @@ -72,7 +72,8 @@ extern int _errno; #define ESPIPE 14 /* Illegal seek */ #define ERANGE 15 /* Range error */ #define EBADF 16 /* Bad file number */ -#define EUNKNOWN 17 /* Unknown OS specific error */ +#define ENOEXEC 17 /* Exec format error */ +#define EUNKNOWN 18 /* Unknown OS specific error */ @@ -83,7 +84,7 @@ extern int _errno; int __fastcall__ _osmaperrno (unsigned char oserror); -/* Map an operating system specific error code (for example from _oserror) +/* Map an operating system specific error code (for example from _oserror) ** into one of the E... codes above. It is user callable. */ diff --git a/include/fcntl.h b/include/fcntl.h index 0d2398315..a1121159d 100644 --- a/include/fcntl.h +++ b/include/fcntl.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2004 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/include/gamate.h b/include/gamate.h index 82bca08b1..bc6de3f98 100644 --- a/include/gamate.h +++ b/include/gamate.h @@ -80,17 +80,6 @@ bit 3: */ -#define JOY_DATA 0x4400 - -#define JOY_DATA_UP 0x01 -#define JOY_DATA_DOWN 0x02 -#define JOY_DATA_LEFT 0x04 -#define JOY_DATA_RIGHT 0x08 -#define JOY_DATA_FIRE_A 0x10 -#define JOY_DATA_FIRE_B 0x20 -#define JOY_DATA_START 0x40 -#define JOY_DATA_SELECT 0x80 - /* LCD resolution 160x152 in 4 greys/greens @@ -156,6 +145,8 @@ /* constants for the conio implementation */ #define COLOR_BLACK 0x03 +#define COLOR_GRAY2 0x02 +#define COLOR_GRAY1 0x01 #define COLOR_WHITE 0x00 #define CH_HLINE 1 @@ -181,15 +172,33 @@ /* No support for dynamically loadable drivers */ #define DYN_DRV 0 +#define JOY_DATA 0x4400 /* hw register to read the pad bits from */ + +/* Masks for joy_read */ +#define JOY_UP_MASK 0x01 +#define JOY_DOWN_MASK 0x02 +#define JOY_LEFT_MASK 0x04 +#define JOY_RIGHT_MASK 0x08 +#define JOY_BTN_1_MASK 0x10 +#define JOY_BTN_2_MASK 0x20 +#define JOY_BTN_3_MASK 0x40 +#define JOY_BTN_4_MASK 0x80 + +#define JOY_BTN_A_MASK JOY_BTN_1_MASK +#define JOY_BTN_B_MASk JOY_BTN_2_MASK +#define JOY_START_MASK JOY_BTN_3_MASK +#define JOY_SELECT_MASK JOY_BTN_4_MASK + +#define JOY_BTN_A(v) ((v) & JOY_BTN_A_MASK) +#define JOY_BTN_B(v) ((v) & JOY_BTN_B_MASK) +#define JOY_START(v) ((v) & JOY_START_MASK) +#define JOY_SELECT(v) ((v) & JOY_SELECT_MASK) + /* The addresses of the static drivers */ extern void gamate_stdjoy_joy[]; /* Referred to by joy_static_stddrv[] */ -#define JOY_FIRE_B 5 -#define JOY_START 6 -#define JOY_SELECT 7 - -void waitvblank (void); -/* Wait for the vertical blanking */ +void waitvsync (void); +/* Wait for start of next frame */ /* NOTE: all Gamate are "NTSC" */ #define get_tv() TV_NTSC diff --git a/include/geos.h b/include/geos.h index 65b85cd59..99b49777f 100644 --- a/include/geos.h +++ b/include/geos.h @@ -19,53 +19,19 @@ -#ifndef _GCONST_H #include <geos/gconst.h> -#endif - -#ifndef _GSTRUCT_H #include <geos/gstruct.h> -#endif - -#ifndef _GSYM_H #include <geos/gsym.h> -#endif - -#ifndef _GDISK_H #include <geos/gdisk.h> -#endif - -#ifndef _GFILE_H #include <geos/gfile.h> -#endif - -#ifndef _GPROCESS_H #include <geos/gprocess.h> -#endif - -#ifndef _GGRAPH_H #include <geos/ggraph.h> -#endif - -#ifndef _GMENU_H #include <geos/gmenu.h> -#endif - -#ifndef _GSPRITE_H #include <geos/gsprite.h> -#endif - -#ifndef _GMEMORY_H #include <geos/gmemory.h> -#endif - -#ifndef _GSYS_H #include <geos/gsys.h> -#endif - -#ifndef _GDLGBOX_H #include <geos/gdlgbox.h> -#endif + #define CH_ULCORNER '+' @@ -101,7 +67,6 @@ #define COLOR_WHITE WHITE #define COLOR_RED RED #define COLOR_CYAN CYAN -#define COLOR_VIOLET PURPLE #define COLOR_PURPLE PURPLE #define COLOR_GREEN GREEN #define COLOR_BLUE BLUE @@ -119,7 +84,6 @@ #define TGI_COLOR_WHITE COLOR_WHITE #define TGI_COLOR_RED COLOR_RED #define TGI_COLOR_CYAN COLOR_CYAN -#define TGI_COLOR_VIOLET COLOR_VIOLET #define TGI_COLOR_PURPLE COLOR_PURPLE #define TGI_COLOR_GREEN COLOR_GREEN #define TGI_COLOR_BLUE COLOR_BLUE @@ -133,6 +97,13 @@ #define TGI_COLOR_LIGHTBLUE COLOR_LIGHTBLUE #define TGI_COLOR_GRAY3 COLOR_GRAY3 +#define JOY_UP_MASK 0x01 +#define JOY_DOWN_MASK 0x02 +#define JOY_LEFT_MASK 0x04 +#define JOY_RIGHT_MASK 0x08 +#define JOY_BTN_1_MASK 0x10 + + /* End of geos.h */ #endif diff --git a/include/geos/gdisk.h b/include/geos/gdisk.h index f65d7d301..30305a2fc 100644 --- a/include/geos/gdisk.h +++ b/include/geos/gdisk.h @@ -7,9 +7,7 @@ #ifndef _GDISK_H #define _GDISK_H -#ifndef _GSTRUCT_H #include <geos/gstruct.h> -#endif char __fastcall__ ReadBuff(struct tr_se *myTrSe); char __fastcall__ WriteBuff(struct tr_se *myTrSe); diff --git a/include/geos/gfile.h b/include/geos/gfile.h index d7667d8ec..ec7a75bbc 100644 --- a/include/geos/gfile.h +++ b/include/geos/gfile.h @@ -7,9 +7,7 @@ #ifndef _GFILE_H #define _GFILE_H -#ifndef _GSTRUCT_H #include <geos/gstruct.h> -#endif struct filehandle *Get1stDirEntry(void); struct filehandle *GetNxtDirEntry(void); diff --git a/include/geos/ggraph.h b/include/geos/ggraph.h index 961ec2d80..b550d6ca1 100644 --- a/include/geos/ggraph.h +++ b/include/geos/ggraph.h @@ -7,9 +7,7 @@ #ifndef _GGRAPH_H #define _GGRAPH_H -#ifndef _GSTRUCT_H #include <geos/gstruct.h> -#endif void __fastcall__ SetPattern(char newpattern); @@ -45,7 +43,11 @@ void __fastcall__ BitOtherClip(void *proc1, void *proc2, char skipl, char skipr, unsigned skiptop, struct iconpic *myIcon); -void __fastcall__ GraphicsString(char *myGfxString); +void __fastcall__ GraphicsString(const void *myGfxString); + +#ifdef __GEOS_CBM__ +void SetNewMode(void); +#endif /* VIC colour constants */ #define BLACK 0 diff --git a/include/geos/gmemory.h b/include/geos/gmemory.h index 3fba5cb5b..1e9ca83b4 100644 --- a/include/geos/gmemory.h +++ b/include/geos/gmemory.h @@ -7,14 +7,12 @@ #ifndef _GMEMORY_H #define _GMEMORY_H -#ifndef _GSTRUCT_H #include <geos/gstruct.h> -#endif void __fastcall__ CopyString(char *dest, const char *source); char __fastcall__ CmpString(const char *dest, const char *source); void __fastcall__ CopyFString(char len, char *dest, const char *source); -char __fastcall__ CmpFString(char len, char *dest, const char *source); +char __fastcall__ CmpFString(char len, char *dest, const char *source); unsigned __fastcall__ CRC(const char *buffer, unsigned len); void* __fastcall__ ClearRam(char *dest, unsigned len); diff --git a/include/geos/gmenu.h b/include/geos/gmenu.h index 3175b6cf3..89caa2c02 100644 --- a/include/geos/gmenu.h +++ b/include/geos/gmenu.h @@ -7,9 +7,7 @@ #ifndef _GMENU_H #define _GMENU_H -#ifndef _GSTRUCT_H #include <geos/gstruct.h> -#endif void __fastcall__ DoMenu(struct menu *myMenu); void ReDoMenu(void); diff --git a/include/geos/gprocess.h b/include/geos/gprocess.h index 6fab2ecfa..000003f32 100644 --- a/include/geos/gprocess.h +++ b/include/geos/gprocess.h @@ -7,9 +7,7 @@ #ifndef _GPROCESS_H #define _GPROCESS_H -#ifndef _GSTRUCT_H #include <geos/gstruct.h> -#endif void __fastcall__ InitProcesses(char number, struct process *proctab); void __fastcall__ RestartProcess(char number); diff --git a/include/geos/gstruct.h b/include/geos/gstruct.h index 9e5f0ddda..6d9cb1f14 100644 --- a/include/geos/gstruct.h +++ b/include/geos/gstruct.h @@ -126,8 +126,8 @@ struct VLIR_info { /* VLIR information */ }; struct process { /* process info, declare table of that type */ - unsigned pointer; /* (like: struct process proctab[2]=... */ - unsigned jiffies; /* last entry HAVE TO BE {0,0} */ + unsigned pointer; /* (like: struct process proctab[2]= ... */ + unsigned jiffies; /* last entry MUST BE {0,0} */ }; struct iconpic { /* icon/encoded bitmap description */ @@ -135,7 +135,7 @@ struct iconpic { /* icon/encoded bitmap description */ char x; /* position in cards (*8 pixels) */ char y; char width; /* in cards */ - char heigth; /* in lines (pixels) */ + char height; /* in lines (pixels) */ }; struct icondef { /* icon definition for DoIcons */ @@ -143,7 +143,7 @@ struct icondef { /* icon definition for DoIcons */ char x; /* position in cards (*8 pixels) */ char y; char width; /* of icon (in cards) */ - char heigth; /* of icon in lines (pixels) */ + char height; /* of icon in lines (pixels) */ unsigned proc_ptr; /* pointer to function handling that icon */ }; diff --git a/include/geos/gsym.h b/include/geos/gsym.h index 085046674..2b2c8fbb2 100644 --- a/include/geos/gsym.h +++ b/include/geos/gsym.h @@ -7,9 +7,7 @@ #ifndef _GSYM_H #define _GSYM_H -#ifndef _GSTRUCT_H #include <geos/gstruct.h> -#endif #define r0 (*(unsigned*)(R_BASE + 0x00)) #define r0L (*(char*)(R_BASE + 0x00)) diff --git a/include/geos/gsys.h b/include/geos/gsys.h index 284c38b63..1753492e5 100644 --- a/include/geos/gsys.h +++ b/include/geos/gsys.h @@ -31,9 +31,13 @@ char get_ostype(void); #define GEOS4 0x04 /* plus4 geos is not or'ed with version */ #define GEOS128 0x80 /* version flags */ +#define MEGAPATCH3 0x03 +#define GATEWAY 0x08 #define GEOS_V10 0x10 #define GEOS_V11 0x11 -#define GEOS_V12 0x12 /* ??? not sure */ +#define GEOS_V12 0x12 +#define GEOS_V13 0x13 +#define GEOS_V15 0x15 #define GEOS_V20 0x20 #define WHEELS 0x40 /* only Wheels? */ diff --git a/include/joystick.h b/include/joystick.h index 710d9b5a6..963c9ba95 100644 --- a/include/joystick.h +++ b/include/joystick.h @@ -38,6 +38,10 @@ +#include <target.h> + + + /*****************************************************************************/ /* Definitions */ /*****************************************************************************/ @@ -52,27 +56,18 @@ #define JOY_ERR_NO_DEVICE 4 /* Device (hardware) not found */ /* Argument for the joy_read function */ -#define JOY_1 0 -#define JOY_2 1 - -/* The following codes are *indices* into the joy_masks array */ -#define JOY_UP 0 -#define JOY_DOWN 1 -#define JOY_LEFT 2 -#define JOY_RIGHT 3 -#define JOY_FIRE 4 -#define JOY_FIRE2 5 /* Second fire button if available */ - -/* Array of masks used to check the return value of joy_read for a state */ -extern const unsigned char joy_masks[8]; +#define JOY_1 0 +#define JOY_2 1 /* Macros that evaluate the return code of joy_read */ -#define JOY_BTN_UP(v) ((v) & joy_masks[JOY_UP]) -#define JOY_BTN_DOWN(v) ((v) & joy_masks[JOY_DOWN]) -#define JOY_BTN_LEFT(v) ((v) & joy_masks[JOY_LEFT]) -#define JOY_BTN_RIGHT(v) ((v) & joy_masks[JOY_RIGHT]) -#define JOY_BTN_FIRE(v) ((v) & joy_masks[JOY_FIRE]) -#define JOY_BTN_FIRE2(v) ((v) & joy_masks[JOY_FIRE2]) +#define JOY_UP(v) ((v) & JOY_UP_MASK) +#define JOY_DOWN(v) ((v) & JOY_DOWN_MASK) +#define JOY_LEFT(v) ((v) & JOY_LEFT_MASK) +#define JOY_RIGHT(v) ((v) & JOY_RIGHT_MASK) +#define JOY_BTN_1(v) ((v) & JOY_BTN_1_MASK) /* Universally available */ +#define JOY_BTN_2(v) ((v) & JOY_BTN_2_MASK) /* Second button if available */ +#define JOY_BTN_3(v) ((v) & JOY_BTN_3_MASK) /* Third button if available */ +#define JOY_BTN_4(v) ((v) & JOY_BTN_4_MASK) /* Fourth button if available */ /* The name of the standard joystick driver for a platform */ extern const char joy_stddrv[]; @@ -94,7 +89,7 @@ unsigned char __fastcall__ joy_load_driver (const char* driver); unsigned char joy_unload (void); /* Uninstall, then unload the currently loaded driver. */ -unsigned char __fastcall__ joy_install (void* driver); +unsigned char __fastcall__ joy_install (const void* driver); /* Install an already loaded driver. Return an error code. */ unsigned char joy_uninstall (void); @@ -112,6 +107,3 @@ unsigned char __fastcall__ joy_read (unsigned char joystick); /* End of joystick.h */ #endif - - - diff --git a/include/joystick/joy-kernel.h b/include/joystick/joy-kernel.h index bb571de3d..783508247 100644 --- a/include/joystick/joy-kernel.h +++ b/include/joystick/joy-kernel.h @@ -52,16 +52,13 @@ typedef struct { /* Driver header */ char id[3]; /* Contains 0x6a, 0x6f, 0x79 ("joy") */ unsigned char version; /* Interface version */ - - /* Bitmasks for the joystick states. See joystick.h for indices */ - unsigned char masks[8]; + void* libreference; /* Library reference */ /* Jump vectors. Note that these are not C callable */ void* install; /* INSTALL routine */ void* uninstall; /* UNINSTALL routine */ void* count; /* COUNT routine */ void* read; /* READ routine */ - void* irq; /* IRQ routine */ } joy_drv_header; @@ -85,6 +82,3 @@ void joy_clear_ptr (void); /* End of joy-kernel.h */ #endif - - - diff --git a/include/limits.h b/include/limits.h index 23474c78c..43328f4bd 100644 --- a/include/limits.h +++ b/include/limits.h @@ -37,7 +37,6 @@ #define _LIMITS_H - #define CHAR_BIT 8 #define SCHAR_MIN ((signed char) 0x80) @@ -63,7 +62,23 @@ #define ULONG_MAX 4294967295UL - +#if __CC65_STD__ >= __CC65_STD_CC65__ +/* These defines that are platform dependent */ +/* FILENAME_MAX in stdlib.h is defined as the same value as PATH_MAX */ +#if defined(__APPLE2__) +# define PATH_MAX (64+1) +#elif defined(__ATARI__) +# define PATH_MAX (63+1) +#elif defined(__CBM__) +# define PATH_MAX (255) /* should be 256+1, see libsrc/common/_cmd.s why it's not */ +#elif defined(__LUNIX__) +# define PATH_MAX (80+1) +#elif defined(__TELESTRAT__) +# define PATH_MAX (50+1) +#else +# define PATH_MAX (16+1) +#endif +#endif /* __CC65_STD__ >= __CC65_STD_CC65__ */ /* End of limits.h */ #endif diff --git a/include/locale.h b/include/locale.h index 4134dd5db..3f23e01d2 100644 --- a/include/locale.h +++ b/include/locale.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2005 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/include/lynx.h b/include/lynx.h index 72f3d5bfd..1b4828a72 100644 --- a/include/lynx.h +++ b/include/lynx.h @@ -52,24 +52,25 @@ /* Color defines */ -#define COLOR_BLACK 0x00 -#define COLOR_RED 0x01 -#define COLOR_PINK 0x02 -#define COLOR_LIGHTGREY 0x03 -#define COLOR_GREY 0x04 -#define COLOR_DARKGREY 0x05 -#define COLOR_BROWN 0x06 -#define COLOR_PEACH 0x07 -#define COLOR_YELLOW 0x08 -#define COLOR_LIGHTGREEN 0x09 -#define COLOR_GREEN 0x0A -#define COLOR_DARKBROWN 0x0B -#define COLOR_VIOLET 0x0C +#define COLOR_TRANSPARENT 0x00 +#define COLOR_BLACK 0x01 +#define COLOR_RED 0x02 +#define COLOR_PINK 0x03 +#define COLOR_LIGHTGREY 0x04 +#define COLOR_GREY 0x05 +#define COLOR_DARKGREY 0x06 +#define COLOR_BROWN 0x07 +#define COLOR_PEACH 0x08 +#define COLOR_YELLOW 0x09 +#define COLOR_LIGHTGREEN 0x0A +#define COLOR_GREEN 0x0B +#define COLOR_PURPLE 0x0C #define COLOR_BLUE 0x0D #define COLOR_LIGHTBLUE 0x0E #define COLOR_WHITE 0x0F /* TGI color defines (default palette) */ +#define TGI_COLOR_TRANSPARENT COLOR_TRANSPARENT #define TGI_COLOR_BLACK COLOR_BLACK #define TGI_COLOR_RED COLOR_RED #define TGI_COLOR_PINK COLOR_PINK @@ -77,16 +78,30 @@ #define TGI_COLOR_GREY COLOR_GREY #define TGI_COLOR_DARKGREY COLOR_DARKGREY #define TGI_COLOR_BROWN COLOR_BROWN +#define TGI_COLOR_ORANGE COLOR_BROWN #define TGI_COLOR_PEACH COLOR_PEACH #define TGI_COLOR_YELLOW COLOR_YELLOW #define TGI_COLOR_LIGHTGREEN COLOR_LIGHTGREEN #define TGI_COLOR_GREEN COLOR_GREEN -#define TGI_COLOR_DARKBROWN COLOR_DARKBROWN -#define TGI_COLOR_VIOLET COLOR_VIOLET +#define TGI_COLOR_PURPLE COLOR_PURPLE #define TGI_COLOR_BLUE COLOR_BLUE #define TGI_COLOR_LIGHTBLUE COLOR_LIGHTBLUE #define TGI_COLOR_WHITE COLOR_WHITE +/* Masks for joy_read */ +#define JOY_UP_MASK 0x80 +#define JOY_DOWN_MASK 0x40 +#define JOY_LEFT_MASK 0x20 +#define JOY_RIGHT_MASK 0x10 +#define JOY_BTN_1_MASK 0x01 +#define JOY_BTN_2_MASK 0x02 + +#define JOY_BTN_A_MASK JOY_BTN_1_MASK +#define JOY_BTN_B_MASK JOY_BTN_2_MASK + +#define JOY_BTN_A(v) ((v) & JOY_BTN_A_MASK) +#define JOY_BTN_B(v) ((v) & JOY_BTN_B_MASK) + /* No support for dynamically loadable drivers */ #define DYN_DRV 0 @@ -109,6 +124,8 @@ extern void lynx_160_102_16_tgi[]; /* Referred to by tgi_static_stddrv[] */ /* Sound support */ /*****************************************************************************/ + + void lynx_snd_init (void); /* Initialize the sound driver */ @@ -130,6 +147,8 @@ void __fastcall__ lynx_snd_stop_channel (unsigned char channel); unsigned char lynx_snd_active(void); /* Show which channels are active */ + + /*****************************************************************************/ /* Accessing the cart */ /*****************************************************************************/ @@ -195,5 +214,6 @@ unsigned __fastcall__ lynx_eewrite (unsigned cell, unsigned val); #define SUZY (*(struct __suzy*)0xFC00) + /* End of lynx.h */ #endif diff --git a/include/lz4.h b/include/lz4.h new file mode 100644 index 000000000..fd11c3e2a --- /dev/null +++ b/include/lz4.h @@ -0,0 +1,43 @@ +/*****************************************************************************/ +/* */ +/* lz4.h */ +/* */ +/* Decompression routine for the 'lz4' format */ +/* */ +/* */ +/* */ +/* (C) 2017 Mega Cat Studios */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef _LZ4_H +#define _LZ4_H + +void __fastcall__ decompress_lz4 (const unsigned char* src, unsigned char* const dst, + const unsigned short uncompressed_size); +/* Decompresses the source buffer into the destination buffer. +** The size of the decompressed data must be known in advance, LZ4 +** does not include any terminator in-stream. +*/ + +/* end of lz4.h */ +#endif diff --git a/include/mouse/mouse-kernel.h b/include/mouse/mouse-kernel.h index f024b0926..e2d2ced10 100644 --- a/include/mouse/mouse-kernel.h +++ b/include/mouse/mouse-kernel.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003-2006, Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/include/nes.h b/include/nes.h index a472a0f3c..9537dd698 100644 --- a/include/nes.h +++ b/include/nes.h @@ -69,7 +69,7 @@ #define COLOR_WHITE 0x01 #define COLOR_RED 0x02 #define COLOR_CYAN 0x03 -#define COLOR_VIOLET 0x04 +#define COLOR_PURPLE 0x04 #define COLOR_GREEN 0x05 #define COLOR_BLUE 0x06 #define COLOR_YELLOW 0x07 @@ -82,6 +82,44 @@ #define COLOR_LIGHTBLUE 0x0E #define COLOR_GRAY3 0x0F +/* TGI color defines (default palette) */ +#define TGI_COLOR_BLACK COLOR_BLACK +#define TGI_COLOR_RED COLOR_RED +#define TGI_COLOR_PINK COLOR_LIGHTRED +#define TGI_COLOR_LIGHTGREY COLOR_GRAY1 +#define TGI_COLOR_GREY COLOR_GRAY2 +#define TGI_COLOR_DARKGREY COLOR_GRAY3 +#define TGI_COLOR_BROWN COLOR_BROWN +#define TGI_COLOR_PEACH COLOR_CYAN +#define TGI_COLOR_YELLOW COLOR_YELLOW +#define TGI_COLOR_LIGHTGREEN COLOR_LIGHTGREEN +#define TGI_COLOR_GREEN COLOR_GREEN +#define TGI_COLOR_DARKBROWN COLOR_ORANGE +#define TGI_COLOR_PURPLE COLOR_PURPLE +#define TGI_COLOR_BLUE COLOR_BLUE +#define TGI_COLOR_LIGHTBLUE COLOR_LIGHTBLUE +#define TGI_COLOR_WHITE COLOR_WHITE + +/* Masks for joy_read */ +#define JOY_UP_MASK 0x10 +#define JOY_DOWN_MASK 0x20 +#define JOY_LEFT_MASK 0x40 +#define JOY_RIGHT_MASK 0x80 +#define JOY_BTN_1_MASK 0x01 +#define JOY_BTN_2_MASK 0x02 +#define JOY_BTN_3_MASK 0x04 +#define JOY_BTN_4_MASK 0x08 + +#define JOY_BTN_A_MASK JOY_BTN_1_MASK +#define JOY_BTN_B_MASK JOY_BTN_2_MASK +#define JOY_SELECT_MASK JOY_BTN_3_MASK +#define JOY_START_MASK JOY_BTN_4_MASK + +#define JOY_BTN_A(v) ((v) & JOY_BTN_A_MASK) +#define JOY_BTN_B(v) ((v) & JOY_BTN_B_MASK) +#define JOY_SELECT(v) ((v) & JOY_SELECT_MASK) +#define JOY_START(v) ((v) & JOY_START_MASK) + /* Return codes of get_tv */ #define TV_NTSC 0 #define TV_PAL 1 @@ -90,16 +128,6 @@ /* No support for dynamically loadable drivers */ #define DYN_DRV 0 -/* The joystick keys - all keys are supported */ -#define KEY_A 0x01 -#define KEY_B 0x02 -#define KEY_SELECT 0x04 -#define KEY_START 0x08 -#define KEY_UP 0x10 -#define KEY_DOWN 0x20 -#define KEY_LEFT 0x40 -#define KEY_RIGHT 0x80 - /* Define hardware */ /* Picture Processing Unit */ @@ -163,8 +191,8 @@ extern void nes_64_56_2_tgi[]; /* Referred to by tgi_static_stddrv[] */ -void waitvblank (void); -/* Wait for the vertical blanking */ +void waitvsync (void); +/* Wait for start of the next frame */ unsigned char get_tv (void); /* Return the video mode the machine is using. */ diff --git a/include/osic1p.h b/include/osic1p.h index 57fe0cd24..d6ab5fee1 100644 --- a/include/osic1p.h +++ b/include/osic1p.h @@ -1,47 +1,47 @@ -/*****************************************************************************/ -/* */ -/* osic1p.h */ -/* */ -/* Challenger 1P system specific definitions */ -/* */ -/* */ -/* */ -/* (C) 2015 Stephan Muehlstrasser */ -/* */ -/* */ -/* This software is provided 'as-is', without any expressed or implied */ -/* warranty. In no event will the authors be held liable for any damages */ -/* arising from the use of this software. */ -/* */ -/* Permission is granted to anyone to use this software for any purpose, */ -/* including commercial applications, and to alter it and redistribute it */ -/* freely, subject to the following restrictions: */ -/* */ -/* 1. The origin of this software must not be misrepresented; you must not */ -/* claim that you wrote the original software. If you use this software */ -/* in a product, an acknowledgment in the product documentation would be */ -/* appreciated but is not required. */ -/* 2. Altered source versions must be plainly marked as such, and must not */ -/* be misrepresented as being the original software. */ -/* 3. This notice may not be removed or altered from any source */ -/* distribution. */ -/* */ -/*****************************************************************************/ - -#ifndef _OSIC1P_H -#define _OSIC1P_H - -/* Check for errors */ -#if !defined(__OSIC1P__) -# error "This module may only be used when compiling for the Challenger 1P!" -#endif - -/* The following #defines will cause the matching functions calls in conio.h -** to be overlaid by macros with the same names, saving the function call -** overhead. -*/ -#define _textcolor(color) COLOR_WHITE -#define _bgcolor(color) COLOR_BLACK -#define _bordercolor(color) COLOR_BLACK - -#endif +/*****************************************************************************/ +/* */ +/* osic1p.h */ +/* */ +/* Challenger 1P system specific definitions */ +/* */ +/* */ +/* */ +/* (C) 2015 Stephan Muehlstrasser */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + +#ifndef _OSIC1P_H +#define _OSIC1P_H + +/* Check for errors */ +#if !defined(__OSIC1P__) +# error "This module may only be used when compiling for the Challenger 1P!" +#endif + +/* The following #defines will cause the matching functions calls in conio.h +** to be overlaid by macros with the same names, saving the function call +** overhead. +*/ +#define _textcolor(color) COLOR_WHITE +#define _bgcolor(color) COLOR_BLACK +#define _bordercolor(color) COLOR_BLACK + +#endif diff --git a/include/pce.h b/include/pce.h index 7700654c8..826f85390 100644 --- a/include/pce.h +++ b/include/pce.h @@ -2,11 +2,11 @@ /* */ /* pce.h */ /* */ -/* PC-Engine system specific definitions */ +/* PC-Engine system-specific definitions */ /* */ /* */ /* */ -/* (C) 2015 Groepaz/Hitmen */ +/* (C) 2015, Groepaz/Hitmen */ /* */ /* */ /* This software is provided 'as-is', without any expressed or implied */ @@ -51,12 +51,12 @@ #define CH_ENTER 13 #define CH_PI 18 -/* Color defines (CBM compatible, for conio) */ +/* Color defines (CBM-compatible, for conio) */ #define COLOR_BLACK 0x00 #define COLOR_WHITE 0x01 #define COLOR_RED 0x02 #define COLOR_CYAN 0x03 -#define COLOR_VIOLET 0x04 +#define COLOR_PURPLE 0x04 #define COLOR_GREEN 0x05 #define COLOR_BLUE 0x06 #define COLOR_YELLOW 0x07 @@ -73,20 +73,36 @@ #define TV_PAL 1 #define TV_OTHER 2 +/* Masks for joy_read */ +#define JOY_UP_MASK 0x10 +#define JOY_DOWN_MASK 0x40 +#define JOY_LEFT_MASK 0x80 +#define JOY_RIGHT_MASK 0x20 +#define JOY_BTN_1_MASK 0x01 +#define JOY_BTN_2_MASK 0x02 +#define JOY_BTN_3_MASK 0x04 +#define JOY_BTN_4_MASK 0x08 + +#define JOY_BTN_I_MASK JOY_BTN_1_MASK +#define JOY_BTN_II_MASK JOY_BTN_2_MASK +#define JOY_SELECT_MASK JOY_BTN_3_MASK +#define JOY_RUN_MASK JOY_BTN_4_MASK + +#define JOY_BTN_I(v) ((v) & JOY_BTN_I_MASK) +#define JOY_BTN_II(v) ((v) & JOY_BTN_II_MASK) +#define JOY_SELECT(v) ((v) & JOY_SELECT_MASK) +#define JOY_RUN(v) ((v) & JOY_RUN_MASK) + /* No support for dynamically loadable drivers */ -#define DYN_DRV 0 +#define DYN_DRV 0 /* The addresses of the static drivers */ extern void pce_stdjoy_joy[]; /* Referred to by joy_static_stddrv[] */ -#define JOY_FIRE_B 5 -#define JOY_SELECT 6 -#define JOY_RUN 7 +void waitvsync (void); +/* Wait for start of the next frame */ -void waitvblank (void); -/* Wait for the vertical blanking */ - -/* NOTE: all PCE are NTSC */ +/* NOTE: all PCEs are NTSC. */ #define get_tv() TV_NTSC /* Return the video mode the machine is using. */ diff --git a/include/peekpoke.h b/include/peekpoke.h index 4c1156ec3..268dbfb98 100644 --- a/include/peekpoke.h +++ b/include/peekpoke.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/include/pet.h b/include/pet.h index 720e40a78..249d8b608 100644 --- a/include/pet.h +++ b/include/pet.h @@ -55,6 +55,13 @@ #define COLOR_BLACK 0x00 #define COLOR_WHITE 0x01 +/* Masks for joy_read */ +#define JOY_UP_MASK 0x01 +#define JOY_DOWN_MASK 0x02 +#define JOY_LEFT_MASK 0x04 +#define JOY_RIGHT_MASK 0x08 +#define JOY_BTN_1_MASK 0x10 + /* Define hardware */ #include <_pia.h> #define PIA1 (*(struct __pia*)0xE810) @@ -98,6 +105,7 @@ extern void pet_stdjoy_joy[]; /* Referred to by joy_static_stddrv[] */ #define _textcolor(color) COLOR_WHITE #define _bgcolor(color) COLOR_BLACK #define _bordercolor(color) COLOR_BLACK +#define _cpeekcolor(color) COLOR_WHITE diff --git a/include/plus4.h b/include/plus4.h index 840e8b342..325ba7d89 100644 --- a/include/plus4.h +++ b/include/plus4.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2006, Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -45,11 +45,8 @@ -/* Include the base header file for the 264 series. include file. - */ -#ifndef _CBM264_H +/* Include the base header file for the 264 series. */ #include <cbm264.h> -#endif /* Define hardware */ #include <_6551.h> diff --git a/include/serial.h b/include/serial.h index 990f66521..35d7b8f66 100644 --- a/include/serial.h +++ b/include/serial.h @@ -136,7 +136,7 @@ unsigned char __fastcall__ ser_load_driver (const char* driver); unsigned char ser_unload (void); /* Uninstall, then unload the currently loaded driver. */ -unsigned char __fastcall__ ser_install (void* driver); +unsigned char __fastcall__ ser_install (const void* driver); /* Install an already loaded driver. Return an error code. */ unsigned char ser_uninstall (void); @@ -148,7 +148,7 @@ unsigned char __fastcall__ ser_open (const struct ser_params* params); /* "Open" the port by setting the port parameters and enable interrupts. */ unsigned char ser_close (void); -/* "Close" the port. Clear buffers and and disable interrupts. */ +/* "Close" the port. Clear buffers and disable interrupts. */ unsigned char __fastcall__ ser_get (char* b); /* Get a character from the serial port. If no characters are available, the @@ -171,6 +171,3 @@ unsigned char __fastcall__ ser_ioctl (unsigned char code, void* data); /* End of serial.h */ #endif - - - diff --git a/include/signal.h b/include/signal.h index 5cb63fcae..0d5f6ad09 100644 --- a/include/signal.h +++ b/include/signal.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2002-2005, Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/include/stdarg.h b/include/stdarg.h index adf73483c..f6a4fe934 100644 --- a/include/stdarg.h +++ b/include/stdarg.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2004 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/include/stdio.h b/include/stdio.h index c2c735cb0..84a991a98 100644 --- a/include/stdio.h +++ b/include/stdio.h @@ -37,15 +37,21 @@ #define _STDIO_H - -#ifndef _STDDEF_H -# include <stddef.h> -#endif -#ifndef _STDARG_H -# include <stdarg.h> +/* NULL pointer */ +#ifndef _HAVE_NULL +#define NULL 0 +#define _HAVE_NULL #endif +/* size_t is needed */ +#ifndef _HAVE_size_t +#define _HAVE_size_t +typedef unsigned size_t; +#endif +/* stdio.h should not define va_list, so we use an equivalent type in the + compiler namespace instead */ +typedef unsigned char* __va_list; /* Types */ typedef struct _FILE FILE; @@ -68,18 +74,24 @@ extern FILE* stderr; #define SEEK_SET 2 #define TMP_MAX 256 -/* Standard defines that are platform dependent */ +/* These defines that are platform dependent */ +/* FILENAME_MAX is defined as the same value as PATH_MAX in limits.h, but we + are not allowed to include limits.h here */ #if defined(__APPLE2__) -# define FILENAME_MAX (64+1) +# define FILENAME_MAX (64+1) #elif defined(__ATARI__) -# define FILENAME_MAX (12+1) +# define FILENAME_MAX (63+1) +#elif defined(__CBM__) +# define FILENAME_MAX (255) /* should be 256+1, see libsrc/common/_cmd.s why it's not */ #elif defined(__LUNIX__) -# define FILENAME_MAX (80+1) +# define FILENAME_MAX (80+1) +#elif defined(__TELESTRAT__) +# define FILENAME_MAX (50+1) #else -# define FILENAME_MAX (16+1) +# define FILENAME_MAX (16+1) #endif -#define L_tmpnam FILENAME_MAX +#define L_tmpnam FILENAME_MAX /*****************************************************************************/ @@ -119,17 +131,17 @@ int __fastcall__ rename (const char* oldname, const char* newname); int snprintf (char* buf, size_t size, const char* format, ...); int sprintf (char* buf, const char* format, ...); int __fastcall__ ungetc (int c, FILE* f); -int __fastcall__ vfprintf (FILE* f, const char* format, va_list ap); -int __fastcall__ vprintf (const char* format, va_list ap); -int __fastcall__ vsnprintf (char* buf, size_t size, const char* format, va_list ap); -int __fastcall__ vsprintf (char* buf, const char* format, va_list ap); +int __fastcall__ vfprintf (FILE* f, const char* format, __va_list ap); +int __fastcall__ vprintf (const char* format, __va_list ap); +int __fastcall__ vsnprintf (char* buf, size_t size, const char* format, __va_list ap); +int __fastcall__ vsprintf (char* buf, const char* format, __va_list ap); int scanf (const char* format, ...); int fscanf (FILE* f, const char* format, ...); int sscanf (const char* s, const char* format, ...); -int __fastcall__ vscanf (const char* format, va_list ap); -int __fastcall__ vsscanf (const char* s, const char* format, va_list ap); -int __fastcall__ vfscanf (FILE* f, const char* format, va_list ap); +int __fastcall__ vscanf (const char* format, __va_list ap); +int __fastcall__ vsscanf (const char* s, const char* format, __va_list ap); +int __fastcall__ vfscanf (FILE* f, const char* format, __va_list ap); #if __CC65_STD__ == __CC65_STD_CC65__ FILE* __fastcall__ fdopen (int fd, const char* mode); /* Unix */ @@ -145,6 +157,3 @@ void __fastcall__ _poserror (const char* msg); /* cc65 */ /* End of stdio.h */ #endif - - - diff --git a/include/stdlib.h b/include/stdlib.h index 3103172d8..99151317f 100644 --- a/include/stdlib.h +++ b/include/stdlib.h @@ -48,6 +48,18 @@ typedef unsigned size_t; #define EXIT_SUCCESS 0 #define EXIT_FAILURE 1 +#if __CC65_STD__ == __CC65_STD_CC65__ + +/* Those non-standard cc65 exit constants definitions are in addition +** to the EXIT_SUCCESS and EXIT_FAILURE constants, which should not be +** redefined +*/ +#define EXIT_ASSERT 2 +#define EXIT_ABORT 3 + +#endif + + /* Return type of the div function */ typedef struct { int rem; diff --git a/include/string.h b/include/string.h index 46095a525..1bd83b385 100644 --- a/include/string.h +++ b/include/string.h @@ -36,11 +36,17 @@ #ifndef _STRING_H #define _STRING_H +/* NULL pointer */ +#ifndef _HAVE_NULL +#define NULL 0 +#define _HAVE_NULL +#endif - -#include <stddef.h> - - +/* size_t is needed */ +#ifndef _HAVE_size_t +#define _HAVE_size_t +typedef unsigned size_t; +#endif char* __fastcall__ strcat (char* dest, const char* src); char* __fastcall__ strchr (const char* s, int c); @@ -53,6 +59,7 @@ size_t __fastcall__ strlen (const char* s); char* __fastcall__ strncat (char* s1, const char* s2, size_t count); int __fastcall__ strncmp (const char* s1, const char* s2, size_t count); char* __fastcall__ strncpy (char* dest, const char* src, size_t count); +char* __fastcall__ strpbrk (const char* str, const char* set); char* __fastcall__ strrchr (const char* s, int c); size_t __fastcall__ strspn (const char* s1, const char* s2); char* __fastcall__ strstr (const char* str, const char* substr); @@ -77,6 +84,7 @@ int __fastcall__ stricmp (const char* s1, const char* s2); /* DOS/Windows */ int __fastcall__ strcasecmp (const char* s1, const char* s2); /* Same for Unix */ int __fastcall__ strnicmp (const char* s1, const char* s2, size_t count); /* DOS/Windows */ int __fastcall__ strncasecmp (const char* s1, const char* s2, size_t count); /* Same for Unix */ +size_t __fastcall__ strnlen (const char* s, size_t maxlen); /* POSIX.1-2008 */ char* __fastcall__ strlwr (char* s); char* __fastcall__ strlower (char* s); char* __fastcall__ strupr (char* s); @@ -88,6 +96,5 @@ const char* __fastcall__ _stroserror (unsigned char errcode); /* Map an operating system error number to an error message. */ - /* End of string.h */ #endif diff --git a/include/supervision.h b/include/supervision.h index ffece4ecb..cce037910 100644 --- a/include/supervision.h +++ b/include/supervision.h @@ -54,28 +54,28 @@ struct __sv_lcd { unsigned char xpos; unsigned char ypos; }; -#define SV_LCD ((struct __sv_lcd*)0x2000) +#define SV_LCD (*(struct __sv_lcd*)0x2000) struct __sv_tone { unsigned delay; unsigned char control; unsigned char timer; }; -#define SV_RIGHT ((struct __sv_tone*)0x2010) -#define SV_LEFT ((struct __sv_tone*)0x2014) +#define SV_RIGHT (*(struct __sv_tone*)0x2010) +#define SV_LEFT (*(struct __sv_tone*)0x2014) struct __sv_noise { unsigned char volume; /* and frequency */ unsigned char timer; unsigned char control; }; -#define SV_NOISE ((struct __sv_noise*)0x2028) +#define SV_NOISE (*(struct __sv_noise*)0x2028) struct __io_port { unsigned char in; unsigned char out; }; -#define IO_PORT ((struct __io_port*)(0x2021) +#define IO_PORT (*(struct __io_port*)0x2021) struct __sv_dma { unsigned start; @@ -83,7 +83,7 @@ struct __sv_dma { unsigned char control; unsigned char on; }; -#define SV_DMA ((struct __sv_dma*)0x2018) +#define SV_DMA (*(struct __sv_dma*)0x2018) #define SV_CONTROL (*(unsigned char*)0x2020) @@ -105,9 +105,33 @@ extern unsigned char sv_nmi_counter; extern unsigned char sv_timer_irq_counter; extern unsigned char sv_timer_dma_counter; +/* Masks for joy_read */ +#define JOY_UP_MASK 0x08 +#define JOY_DOWN_MASK 0x04 +#define JOY_LEFT_MASK 0x02 +#define JOY_RIGHT_MASK 0x01 +#define JOY_BTN_1_MASK 0x20 +#define JOY_BTN_2_MASK 0x10 +#define JOY_BTN_3_MASK 0x80 +#define JOY_BTN_4_MASK 0x40 + +#define JOY_BTN_A_MASK JOY_BTN_1_MASK +#define JOY_BTN_B_MASk JOY_BTN_2_MASK +#define JOY_START_MASK JOY_BTN_3_MASK +#define JOY_SELECT_MASK JOY_BTN_4_MASK + +#define JOY_BTN_A(v) ((v) & JOY_BTN_A_MASK) +#define JOY_BTN_B(v) ((v) & JOY_BTN_B_MASK) +#define JOY_START(v) ((v) & JOY_START_MASK) +#define JOY_SELECT(v) ((v) & JOY_SELECT_MASK) + +/* No support for dynamically loadable drivers */ +#define DYN_DRV 0 + +/* The addresses of the static drivers */ +extern void supervision_stdjoy_joy[]; /* Referred to by joy_static_stddrv[] */ + /* End of supervision.h */ #endif - - diff --git a/include/sym1.h b/include/sym1.h new file mode 100644 index 000000000..e0eb81ecf --- /dev/null +++ b/include/sym1.h @@ -0,0 +1,165 @@ +/*****************************************************************************/ +/* */ +/* sym1.h */ +/* */ +/* Sym-1 system-specific definitions */ +/* */ +/* */ +/* */ +/* (C) 2020 Wayne Parham */ +/* EMail: wayne@parhamdata.com */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef _SYM1_H +#define _SYM1_H + + + +/* Check for errors */ +#if !defined(__SYM1__) +# error This module may only be used when compiling for the Sym-1! +#endif + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +/* Display character definitions */ +#define DISP_1 0x06 // '1' +#define DISP_2 0x5B // '2' +#define DISP_3 0x4F // '3' +#define DISP_4 0x66 // '4' +#define DISP_5 0x6D // '5' +#define DISP_6 0x7C // '6' +#define DISP_7 0x07 // '7' +#define DISP_8 0x7F // '8' +#define DISP_9 0x67 // '9' +#define DISP_0 0x3F // '0' +#define DISP_A 0x77 // 'A' +#define DISP_b 0x7C // 'b' +#define DISP_C 0x39 // 'C' +#define DISP_c 0x58 // 'c' +#define DISP_d 0x5E // 'd' +#define DISP_E 0x79 // 'E' +#define DISP_e 0x7B // 'e' +#define DISP_F 0x71 // 'F' +#define DISP_G 0x7D // 'G' +#define DISP_g 0x6F // 'g' +#define DISP_H 0x76 // 'H' +#define DISP_h 0x74 // 'h' +#define DISP_I 0x06 // 'I' +#define DISP_i 0x04 // 'i' +#define DISP_J 0x1E // 'J' +#define DISP_K 0x74 // 'K' +#define DISP_L 0x38 // 'L' +#define DISP_M_1 0x33 // 'M' +#define DISP_M_2 0x27 // 2nd half +#define DISP_n 0x54 // 'n' +#define DISP_O 0x3F // 'O' +#define DISP_o 0x5C // 'o' +#define DISP_P 0x73 // 'P' +#define DISP_q 0x67 // 'q' +#define DISP_r 0x50 // 'r' +#define DISP_S 0x6D // 'S' +#define DISP_t 0x46 // 't' +#define DISP_U 0x3E // 'U' +#define DISP_u 0x1C // 'u' +#define DISP_V_1 0x64 // 'V' +#define DISP_V_2 0x52 // 2nd half +#define DISP_W_1 0x3C // 'W' +#define DISP_W_2 0x1E // 2nd half +#define DISP_Y 0x6E // 'Y' +#define DISP_Z 0x5B // 'Z' +#define DISP_SPACE 0x00 // ' ' +#define DISP_PERIOD 0x80 // '.' +#define DISP_HYPHEN 0x40 // '-' +#define DISP_APOSTR 0x20 // ''' +#define DISP_EQUAL 0x41 // '=' +#define DISP_3_BAR 0x49 // '=' +#define DISP_BOTTOM 0x08 // '_' +#define DISP_TOP 0x01 // Top segment +#define DISP_LEFT 0x30 // '|' Left side, both segments +#define DISP_RIGHT 0x06 // '|' Right side, both segments +#define DISP_DEGREE 0x63 // 'o' An 'o' character in the upper segments +#define DISP_HAT 0x23 // 'n' An 'n' character in the upper segments +#define DISP_FORK 0x62 // 'u' A 'u' character in the upper segments +#define DISP_SLASH 0x51 // '/' +#define DISP_BACKSLASH 0x34 // '\' +#define DISP_TOP_RIGHT 0x02 // Top right segment +#define DISP_TOP_LEFT 0x20 // Top left segment +#define DISP_LOW_RIGHT 0x04 // Lower right segment +#define DISP_LOW_LEFT 0x10 // Lower left segment + + +/*****************************************************************************/ +/* Hardware */ +/*****************************************************************************/ + + + +#include <_6522.h> +#define VIA1 (*(struct __6522*)0xA000) // U25 +#define VIA2 (*(struct __6522*)0xA800) // U28 +#define VIA3 (*(struct __6522*)0xAC00) // U29 + + +struct _display { + unsigned char d0; // left-most seven-segment display + unsigned char d1; // second seven-segment display + unsigned char d2; // third seven-segment display + unsigned char d3; // fouth seven-segment display + unsigned char d4; // fifth seven-segment display + unsigned char d5; // sixth seven-segment display + unsigned char d6; // buffer byte to the right +}; +#define DISPLAY (*(struct _display*)0xA640) + + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +void beep (void); +/* Beep sound. */ + +void fdisp (void); +/* Flash display */ + +int __fastcall__ loadt (unsigned char); +/* Read from tape */ + +int __fastcall__ dumpt (unsigned char, const void*, const void*); +/* Write to tape */ + + + +/* End of sym1.h */ +#endif diff --git a/src/common/inttypes.h b/include/sys/stat.h similarity index 72% rename from src/common/inttypes.h rename to include/sys/stat.h index 0d9cb75fc..d8fc09c75 100644 --- a/src/common/inttypes.h +++ b/include/sys/stat.h @@ -1,12 +1,12 @@ /*****************************************************************************/ /* */ -/* inttypes.h */ +/* stat.h */ /* */ -/* Define integer types */ +/* Constants for the mode argument of open and creat */ /* */ /* */ /* */ -/* (C) 2004 Ullrich von Bassewitz */ +/* (C) 2003 Ullrich von Bassewitz */ /* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ @@ -33,34 +33,27 @@ -#ifndef INTTYPES_H -#define INTTYPES_H +#ifndef _STAT_H +#define _STAT_H -/* If we have stdint.h, include it, otherwise try some quesswork on types. -** gcc and msvc don't define __STDC_VERSION__ without special flags, so check -** for them explicitly. Undefined symbols are replaced by zero, so a check for -** defined(__GNUC__) or defined(_MSC_VER) is not necessary. -*/ -#if (__STDC_VERSION__ >= 199901) || (__GNUC__ >= 3) || (_MSC_VER >= 1600) -#include <stdint.h> -#else - -/* Assume long is the largest type available, and assume that pointers can be -** safely converted into this type and back. -*/ -typedef long intptr_t; -typedef unsigned long uintptr_t; -typedef long intmax_t; -typedef unsigned long uintmax_t; +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ -#endif - - - -/* End of inttypes.h */ - +#define S_IREAD 0x01 +#define S_IWRITE 0x02 + + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +/* End of stat.h */ #endif diff --git a/include/sys/types.h b/include/sys/types.h index 9b1e9610f..e75dd7d46 100644 --- a/include/sys/types.h +++ b/include/sys/types.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/include/sys/utsname.h b/include/sys/utsname.h index a601d9eed..fdd87dec3 100644 --- a/include/sys/utsname.h +++ b/include/sys/utsname.h @@ -41,7 +41,7 @@ /*****************************************************************************/ /* Data */ /*****************************************************************************/ - + /* diff --git a/include/target.h b/include/target.h new file mode 100644 index 000000000..7663a39dd --- /dev/null +++ b/include/target.h @@ -0,0 +1,75 @@ +/*****************************************************************************/ +/* */ +/* target.h */ +/* */ +/* Target specific definitions */ +/* */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef _TARGET_H +#define _TARGET_H + + + +/* Include the correct target specific file */ +#if defined(__APPLE2ENH__) +# include <apple2enh.h> +#elif defined(__APPLE2__) +# include <apple2.h> +#elif defined(__ATARI__) +# include <atari.h> +#elif defined(__ATARI2600__) +# include <atari2600.h> +#elif defined(__ATARI5200__) +# include <atari5200.h> +#elif defined(__ATARI7800__) +# include <atari7800.h> +#elif defined(__ATMOS__) +# include <atmos.h> +#elif defined(__CBM__) +# include <cbm.h> +#elif defined(__CREATIVISION__) +# include <creativision.h> +#elif defined(__GAMATE__) +# include <gamate.h> +#elif defined(__GEOS__) +# include <geos.h> +#elif defined(__LYNX__) +# include <lynx.h> +#elif defined(__NES__) +# include <nes.h> +#elif defined(__OSIC1P__) +# include <osic1p.h> +#elif defined(__PCE__) +# include <pce.h> +#elif defined(__SUPERVISION__) +# include <supervision.h> +#elif defined(__TELESTRAT__) +# include <telestrat.h> +#endif + + + +/* End of target.h */ +#endif diff --git a/include/telestrat.h b/include/telestrat.h new file mode 100644 index 000000000..c1e0996bc --- /dev/null +++ b/include/telestrat.h @@ -0,0 +1,129 @@ +/*****************************************************************************/ +/* */ +/* telestrat.h */ +/* */ +/* Oric Telestrat system-specific definitions */ +/* */ +/* */ +/* */ +/* (C) 2017 Debrune Jérome, <jede@oric.org> */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + + +/* Color defines */ +#define COLOR_BLACK 0x00 +#define COLOR_RED 0x01 +#define COLOR_GREEN 0x02 +#define COLOR_YELLOW 0x03 +#define COLOR_BLUE 0x04 +#define COLOR_MAGENTA 0x05 +#define COLOR_CYAN 0x06 +#define COLOR_WHITE 0x07 + +/* TGI color defines */ +/* White and red are swapped, so that the pallete +** driver is compatible with black-and-white drivers. +*/ +#define TGI_COLOR_BLACK COLOR_BLACK +#define TGI_COLOR_WHITE 1 +#define TGI_COLOR_GREEN COLOR_GREEN +#define TGI_COLOR_YELLOW COLOR_YELLOW +#define TGI_COLOR_BLUE COLOR_BLUE +#define TGI_COLOR_MAGENTA COLOR_MAGENTA +#define TGI_COLOR_CYAN COLOR_CYAN +#define TGI_COLOR_RED 7 + + +/* Define hardware */ +#include <_6522.h> +#define VIA (*(struct __6522*)0x300) + + + +/* These are defined to be FUNCT + NumberKey */ +#define CH_F1 0xB1 +#define CH_F2 0xB2 +#define CH_F3 0xB3 +#define CH_F4 0xB4 +#define CH_F5 0xB5 +#define CH_F6 0xB6 +#define CH_F7 0xB7 +#define CH_F8 0xB8 +#define CH_F9 0xB9 +#define CH_F10 0xB0 + + + +/* Character codes */ +#define CH_ULCORNER '+' +#define CH_URCORNER '+' +#define CH_LLCORNER '+' +#define CH_LRCORNER '+' +#define CH_TTEE '+' +#define CH_BTEE '+' +#define CH_LTEE '+' +#define CH_RTEE '+' +#define CH_CROSS '+' +#define CH_HLINE '-' +#define CH_VLINE '|' +#define CH_CURS_UP 11 +#define CH_CURS_DOWN 10 +#define CH_CURS_LEFT 8 +#define CH_CURS_RIGHT 9 +#define CH_DEL 127 +#define CH_ENTER 13 +#define CH_STOP 3 +#define CH_LIRA 95 +#define CH_ESC 27 + +/* Masks for joy_read */ +#define JOY_UP_MASK 0x10 +#define JOY_DOWN_MASK 0x08 +#define JOY_LEFT_MASK 0x02 +#define JOY_RIGHT_MASK 0x01 +#define JOY_BTN_1_MASK 0x04 + +#define JOY_FIRE_MASK JOY_BTN_1_MASK +#define JOY_FIRE(v) ((v) & JOY_FIRE_MASK) + + +/* The addresses of the static drivers */ +extern void telestrat_joy[]; /* Referred to by joy_static_stddrv[] */ +extern void telestrat_228_200_3_tgi[]; +extern void telestrat_240_200_2_tgi[]; /* Referred to by tgi_static_stddrv[] */ + + +void oups(); +void ping(); +void zap(); +void shoot(); +void explode(); + +void kbdclick1(); + +/* The following #defines will cause the matching functions calls in conio.h +** to be overlaid by macros with the same names, saving the function call +** overhead. +*/ +#define _bordercolor(color) COLOR_BLACK diff --git a/include/tgi.h b/include/tgi.h index 02dff8868..2ef65b856 100644 --- a/include/tgi.h +++ b/include/tgi.h @@ -38,9 +38,8 @@ -#ifndef _TGI_ERROR_H #include <tgi/tgi-error.h> -#endif +#include <target.h> @@ -83,7 +82,7 @@ void tgi_unload (void); ** necessary. */ -void __fastcall__ tgi_install (void* driver); +void __fastcall__ tgi_install (const void* driver); /* Install an already loaded driver. */ void tgi_uninstall (void); @@ -135,7 +134,7 @@ void __fastcall__ tgi_setdrawpage (unsigned char page); /* Set the drawable page. Will set an error if the page is not available. */ unsigned char tgi_getcolorcount (void); -/* Get the number of available colors. */ +/* Get the number of available colors. Zero means 256 colors. */ unsigned char tgi_getmaxcolor (void); /* Return the maximum supported color number (the number of colors would @@ -217,7 +216,7 @@ void __fastcall__ tgi_arc (int x, int y, unsigned char rx, unsigned char ry, /* Draw an ellipse arc with center at x/y and radii rx/ry using the current ** drawing color. The arc covers the angle between sa and ea (startangle and ** endangle), which must be in the range 0..360 (otherwise the function may -** bevave unextectedly). +** behave unexpectedly). */ void __fastcall__ tgi_pieslice (int x, int y, unsigned char rx, unsigned char ry, @@ -284,6 +283,3 @@ int __fastcall__ tgi_imulround (int rhs, int lhs); /* End of tgi.h */ #endif - - - diff --git a/include/time.h b/include/time.h index 22e24a56e..99bb1c8e3 100644 --- a/include/time.h +++ b/include/time.h @@ -54,7 +54,7 @@ typedef unsigned long time_t; typedef unsigned long clock_t; /* Structure for broken down time */ -struct tm { +struct tm { int tm_sec; int tm_min; int tm_hour; @@ -66,66 +66,36 @@ struct tm { int tm_isdst; }; -/* Timezone representation, default is UTC */ -extern struct _timezone { - char daylight; /* True if daylight savings time active */ - long timezone; /* Number of seconds behind UTC */ - char tzname[5]; /* Name of timezone, e.g. CET */ - char dstname[5]; /* Name when daylight true, e.g. CEST */ -} _tz; - - - -#if defined(__ATARI__) -/* The clock depends on the video standard, so read it at runtime */ -unsigned _clocks_per_sec (void); -# define CLK_TCK _clocks_per_sec() -# define CLOCKS_PER_SEC _clocks_per_sec() -#elif defined(__ATARI5200__) -# define CLK_TCK 60 /* POSIX */ -# define CLOCKS_PER_SEC 60 /* ANSI */ +#if defined(__ATARI5200__) +# define CLOCKS_PER_SEC 60 #elif defined(__ATMOS__) -# define CLK_TCK 100 /* POSIX */ -# define CLOCKS_PER_SEC 100 /* ANSI */ +# define CLOCKS_PER_SEC 100 #elif defined(__CBM__) # if defined(__CBM510__) || defined(__CBM610__) /* The 510/610 gets its clock from the AC current */ -# define CLK_TCK 50 /* POSIX */ -# define CLOCKS_PER_SEC 50 /* ANSI */ +# define CLOCKS_PER_SEC 50 # else -# define CLK_TCK 60 /* POSIX */ -# define CLOCKS_PER_SEC 60 /* ANSI */ +# define CLOCKS_PER_SEC 60 # endif #elif defined(__NES__) -# define CLK_TCK 50 /* POSIX */ -# define CLOCKS_PER_SEC 50 /* ANSI */ +# define CLOCKS_PER_SEC 50 #elif defined(__PCE__) -# define CLK_TCK 60 /* POSIX */ -# define CLOCKS_PER_SEC 60 /* ANSI */ -#elif defined(__GAMATE__) -# define CLK_TCK 135 /* POSIX */ /* FIXME */ -# define CLOCKS_PER_SEC 135 /* ANSI */ /* FIXME */ -#elif defined(__GEOS__) -# define CLK_TCK 1 /* POSIX */ -# define CLOCKS_PER_SEC 1 /* ANSI */ -#elif defined(__LYNX__) -/* The clock-rate depends on the video scan-rate; -** so, read it at run-time. -*/ -extern clock_t _clk_tck (void); -# define CLK_TCK _clk_tck() -# define CLOCKS_PER_SEC _clk_tck() +# define CLOCKS_PER_SEC 60 +#elif defined(__GAMATE__) +# define CLOCKS_PER_SEC 135 /* FIXME */ +#elif defined(__GEOS__) +# define CLOCKS_PER_SEC 1 +#elif defined(__TELESTRAT__) +# define CLOCKS_PER_SEC 10 +#elif defined(__ATARI__) || defined (__LYNX__) +/* Read the clock rate at runtime */ +clock_t _clocks_per_sec (void); +# define CLOCKS_PER_SEC _clocks_per_sec() #endif +#define CLOCK_REALTIME 0 -time_t _systime (void); -/* Similar to time(), but: -** - Is not ISO C -** - Does not take the additional pointer -** - Does not set errno when returning -1 -*/ - /* ISO C function prototypes */ char* __fastcall__ asctime (const struct tm* timep); clock_t clock (void); @@ -137,10 +107,34 @@ size_t __fastcall__ strftime (char* buf, size_t bufsize, const char* format, con time_t __fastcall__ time (time_t* t); +#if __CC65_STD__ >= __CC65_STD_CC65__ -/* End of time.h */ +typedef unsigned char clockid_t; + +/* Structure for seconds and nanoseconds */ +struct timespec { + time_t tv_sec; + long tv_nsec; +}; + +/* Timezone representation, default is UTC */ +extern struct _timezone { + char daylight; /* True if daylight savings time active */ + long timezone; /* Number of seconds behind UTC */ + char tzname[5]; /* Name of timezone, e.g. CET */ + char dstname[5]; /* Name when daylight true, e.g. CEST */ +} _tz; + +#define CLK_TCK CLOCKS_PER_SEC + +/* POSIX function prototypes */ +int __fastcall__ clock_getres (clockid_t clock_id, struct timespec *res); +int __fastcall__ clock_gettime (clockid_t clock_id, struct timespec *tp); +int __fastcall__ clock_settime (clockid_t clock_id, const struct timespec *tp); #endif +/* End of time.h */ +#endif diff --git a/include/vic20.h b/include/vic20.h index c675de6d2..55b81f13f 100644 --- a/include/vic20.h +++ b/include/vic20.h @@ -2,12 +2,12 @@ /* */ /* vic20.h */ /* */ -/* vic20 system specific definitions */ +/* VIC-20 system-specific definitions */ /* */ /* */ /* */ /* (C) 1998-2004 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -62,18 +62,52 @@ #define COLOR_WHITE 0x01 #define COLOR_RED 0x02 #define COLOR_CYAN 0x03 -#define COLOR_VIOLET 0x04 +#define COLOR_PURPLE 0x04 #define COLOR_GREEN 0x05 #define COLOR_BLUE 0x06 #define COLOR_YELLOW 0x07 +/* Only the background and multi-color characters can have these colors. */ #define COLOR_ORANGE 0x08 -#define COLOR_BROWN 0x09 -#define COLOR_LIGHTRED 0x0A -#define COLOR_GRAY1 0x0B -#define COLOR_GRAY2 0x0C +#define COLOR_LIGHTORANGE 0x09 +#define COLOR_PINK 0x0A +#define COLOR_LIGHTCYAN 0x0B +#define COLOR_LIGHTVIOLET 0x0C #define COLOR_LIGHTGREEN 0x0D #define COLOR_LIGHTBLUE 0x0E -#define COLOR_GRAY3 0x0F +#define COLOR_LIGHTYELLOW 0x0F + +/* TGI color defines */ +#define TGI_COLOR_BLACK COLOR_BLACK +#define TGI_COLOR_WHITE COLOR_WHITE +#define TGI_COLOR_RED COLOR_RED +#define TGI_COLOR_CYAN COLOR_CYAN +#define TGI_COLOR_PURPLE COLOR_PURPLE +#define TGI_COLOR_GREEN COLOR_GREEN +#define TGI_COLOR_BLUE COLOR_BLUE +#define TGI_COLOR_YELLOW COLOR_YELLOW +/* Only the background and multi-color graphics can have these colors. */ +#define TGI_COLOR_ORANGE COLOR_ORANGE +#define TGI_COLOR_LIGHTORANGE COLOR_LIGHTORANGE +#define TGI_COLOR_PINK COLOR_PINK +#define TGI_COLOR_LIGHTCYAN COLOR_LIGHTCYAN +#define TGI_COLOR_LIGHTVIOLET COLOR_LIGHTVIOLET +#define TGI_COLOR_LIGHTGREEN COLOR_LIGHTGREEN +#define TGI_COLOR_LIGHTBLUE COLOR_LIGHTBLUE +#define TGI_COLOR_LIGHTYELLOW COLOR_LIGHTYELLOW + + + +/* tgi_ioctl() commands */ +#define TGI_IOCTL_VIC20_SET_PATTERN 0x01 /* Set 8-byte pattern for tgi_bar(). */ + + + +/* Masks for joy_read */ +#define JOY_UP_MASK 0x01 +#define JOY_DOWN_MASK 0x02 +#define JOY_LEFT_MASK 0x04 +#define JOY_RIGHT_MASK 0x08 +#define JOY_BTN_1_MASK 0x10 @@ -96,6 +130,11 @@ extern void vic20_ptvjoy_joy[]; extern void vic20_stdjoy_joy[]; /* Referred to by joy_static_stddrv[] */ +extern void vic20_rama_emd[]; +extern void vic20_georam_emd[]; + +extern void vic20_hi_tgi[]; /* Referred to by tgi_static_stddrv[] */ + /* End of vic20.h */ diff --git a/include/zlib.h b/include/zlib.h index 8fa6a2bd1..68439b290 100644 --- a/include/zlib.h +++ b/include/zlib.h @@ -1,172 +1,175 @@ -/*****************************************************************************/ -/* */ -/* zlib.h */ -/* */ -/* Decompression routines for the 'deflate' format */ -/* */ -/* */ -/* */ -/* (C) 2000-2015 Piotr Fusik <fox@scene.pl> */ -/* */ -/* This file is based on the zlib.h from 'zlib' general purpose compression */ -/* library, version 1.1.3, (C) 1995-1998 Jean-loup Gailly and Mark Adler. */ -/* */ -/* Jean-loup Gailly Mark Adler */ -/* jloup@gzip.org madler@alumni.caltech.edu */ -/* */ -/* This software is provided 'as-is', without any expressed or implied */ -/* warranty. In no event will the authors be held liable for any damages */ -/* arising from the use of this software. */ -/* */ -/* Permission is granted to anyone to use this software for any purpose, */ -/* including commercial applications, and to alter it and redistribute it */ -/* freely, subject to the following restrictions: */ -/* */ -/* 1. The origin of this software must not be misrepresented; you must not */ -/* claim that you wrote the original software. If you use this software */ -/* in a product, an acknowledgment in the product documentation would be */ -/* appreciated but is not required. */ -/* 2. Altered source versions must be plainly marked as such, and must not */ -/* be misrepresented as being the original software. */ -/* 3. This notice may not be removed or altered from any source */ -/* distribution. */ -/* */ -/*****************************************************************************/ - - - -#ifndef _ZLIB_H -#define _ZLIB_H - -#define Z_OK 0 -#define Z_DATA_ERROR (-3) -/* Return codes for uncompress() */ - -#define Z_DEFLATED 8 -/* The deflate compression method (the only one supported) */ - -#define Z_NULL 0 - - -unsigned __fastcall__ inflatemem (char* dest, const char* source); -/* - Decompresses the source buffer into the destination buffer. - Returns the size of the uncompressed data (number of bytes written starting - from dest). - - This function expects data in the DEFLATE format, described in RFC - (Request for Comments) 1951 in the file - ftp://ds.internic.net/rfc/rfc1951.txt. - - This function does not exist in the original zlib. Its implementation - using original zlib might be following: - - unsigned inflatemem (char* dest, const char* source) - { - z_stream stream; - - stream.next_in = (Bytef*) source; - stream.avail_in = 65535; - - stream.next_out = dest; - stream.avail_out = 65535; - - stream.zalloc = (alloc_func) 0; - stream.zfree = (free_func) 0; - - inflateInit2(&stream, -MAX_WBITS); - inflate(&stream, Z_FINISH); - inflateEnd(&stream); - - return stream.total_out; - } -*/ - - -int __fastcall__ uncompress (char* dest, unsigned* destLen, - const char* source, unsigned sourceLen); -/* - Original zlib description: - - Decompresses the source buffer into the destination buffer. sourceLen is - the byte length of the source buffer. Upon entry, destLen is the total - size of the destination buffer, which must be large enough to hold the - entire uncompressed data. (The size of the uncompressed data must have - been saved previously by the compressor and transmitted to the decompressor - by some mechanism outside the scope of this compression library.) - Upon exit, destLen is the actual size of the compressed buffer. - This function can be used to decompress a whole file at once if the - input file is mmap'ed. - - uncompress returns Z_OK if success, Z_MEM_ERROR if there was not - enough memory, Z_BUF_ERROR if there was not enough room in the output - buffer, or Z_DATA_ERROR if the input data was corrupted. - - Implementation notes: - - This function expects data in the ZLIB format, described in RFC 1950 - in the file ftp://ds.internic.net/rfc/rfc1950.txt. The ZLIB format is - essentially the DEFLATE format plus a very small header and Adler-32 - checksum. - - Z_MEM_ERROR and Z_BUF_ERROR are never returned in this implementation. -*/ - - -unsigned long __fastcall__ adler32 (unsigned long adler, const char* buf, - unsigned len); - -/* - Original zlib description: - - Update a running Adler-32 checksum with the bytes buf[0..len-1] and - return the updated checksum. If buf is NULL, this function returns - the required initial value for the checksum. - An Adler-32 checksum is almost as reliable as a CRC32 but can be computed - much faster. Usage example: - - unsigned long adler = adler32(0L, Z_NULL, 0); - - while (read_buffer(buffer, length) != EOF) { - adler = adler32(adler, buffer, length); - } - if (adler != original_adler) error(); - - Implementation notes: - - This function isn't actually much faster than crc32(), but it is smaller - and does not use any lookup tables. -*/ - - -unsigned long __fastcall__ crc32 (unsigned long crc, const char* buf, - unsigned len); -/* - Original zlib description: - - Update a running crc with the bytes buf[0..len-1] and return the updated - crc. If buf is NULL, this function returns the required initial value - for the crc. Pre- and post-conditioning (one's complement) is performed - within this function so it shouldn't be done by the application. - Usage example: - - unsigned long crc = crc32(0L, Z_NULL, 0); - - while (read_buffer(buffer, length) != EOF) { - crc = crc32(crc, buffer, length); - } - if (crc != original_crc) error(); - - Implementation notes: - - This function uses statically allocated 1 KB lookup table. The table is - initialised before it is used for the first time (that is, if buffer is - NULL or length is zero, then the lookup table isn't initialised). -*/ - - -/* end of zlib.h */ -#endif - - - +/*****************************************************************************/ +/* */ +/* zlib.h */ +/* */ +/* Decompression routines for the 'deflate' format */ +/* */ +/* */ +/* */ +/* (C) 2000-2015 Piotr Fusik <fox@scene.pl> */ +/* */ +/* This file is based on the zlib.h from 'zlib' general purpose compression */ +/* library, version 1.1.3, (C) 1995-1998 Jean-loup Gailly and Mark Adler. */ +/* */ +/* Jean-loup Gailly Mark Adler */ +/* jloup@gzip.org madler@alumni.caltech.edu */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef _ZLIB_H +#define _ZLIB_H + +#define Z_OK 0 +#define Z_DATA_ERROR (-3) +/* Return codes for uncompress() */ + +#define Z_DEFLATED 8 +/* The deflate compression method (the only one supported) */ + +#define Z_NULL 0 + + +unsigned __fastcall__ inflatemem (unsigned char* dest, + const unsigned char* source); +/* + Decompresses the source buffer into the destination buffer. + Returns the size of the uncompressed data (number of bytes written starting + from dest). + + This function expects data in the DEFLATE format, described in RFC + (Request for Comments) 1951 in the file + ftp://ds.internic.net/rfc/rfc1951.txt. + + This function does not exist in the original zlib. Its implementation + using original zlib might be following: + + unsigned inflatemem (char* dest, const char* source) + { + z_stream stream; + + stream.next_in = (Bytef*) source; + stream.avail_in = 65535; + + stream.next_out = dest; + stream.avail_out = 65535; + + stream.zalloc = (alloc_func) 0; + stream.zfree = (free_func) 0; + + inflateInit2(&stream, -MAX_WBITS); + inflate(&stream, Z_FINISH); + inflateEnd(&stream); + + return stream.total_out; + } +*/ + + +int __fastcall__ uncompress (unsigned char* dest, unsigned* destLen, + const unsigned char* source, unsigned sourceLen); +/* + Original zlib description: + + Decompresses the source buffer into the destination buffer. sourceLen is + the byte length of the source buffer. Upon entry, destLen is the total + size of the destination buffer, which must be large enough to hold the + entire uncompressed data. (The size of the uncompressed data must have + been saved previously by the compressor and transmitted to the decompressor + by some mechanism outside the scope of this compression library.) + Upon exit, destLen is the actual size of the compressed buffer. + This function can be used to decompress a whole file at once if the + input file is mmap'ed. + + uncompress returns Z_OK if success, Z_MEM_ERROR if there was not + enough memory, Z_BUF_ERROR if there was not enough room in the output + buffer, or Z_DATA_ERROR if the input data was corrupted. + + Implementation notes: + + This function expects data in the ZLIB format, described in RFC 1950 + in the file ftp://ds.internic.net/rfc/rfc1950.txt. The ZLIB format is + essentially the DEFLATE format plus a very small header and Adler-32 + checksum. + + Z_MEM_ERROR and Z_BUF_ERROR are never returned in this implementation. +*/ + + +unsigned long __fastcall__ adler32 (unsigned long adler, + const unsigned char* buf, + unsigned len); + +/* + Original zlib description: + + Update a running Adler-32 checksum with the bytes buf[0..len-1] and + return the updated checksum. If buf is NULL, this function returns + the required initial value for the checksum. + An Adler-32 checksum is almost as reliable as a CRC32 but can be computed + much faster. Usage example: + + unsigned long adler = adler32(0L, Z_NULL, 0); + + while (read_buffer(buffer, length) != EOF) { + adler = adler32(adler, buffer, length); + } + if (adler != original_adler) error(); + + Implementation notes: + + This function isn't actually much faster than crc32(), but it is smaller + and does not use any lookup tables. +*/ + + +unsigned long __fastcall__ crc32 (unsigned long crc, + const unsigned char* buf, + unsigned len); +/* + Original zlib description: + + Update a running crc with the bytes buf[0..len-1] and return the updated + crc. If buf is NULL, this function returns the required initial value + for the crc. Pre- and post-conditioning (one's complement) is performed + within this function so it shouldn't be done by the application. + Usage example: + + unsigned long crc = crc32(0L, Z_NULL, 0); + + while (read_buffer(buffer, length) != EOF) { + crc = crc32(crc, buffer, length); + } + if (crc != original_crc) error(); + + Implementation notes: + + This function uses statically allocated 1 KB lookup table. The table is + initialised before it is used for the first time (that is, if buffer is + NULL or length is zero, then the lookup table isn't initialised). +*/ + + +/* end of zlib.h */ +#endif + + + diff --git a/libsrc/Makefile b/libsrc/Makefile index a4101aecd..2018de801 100644 --- a/libsrc/Makefile +++ b/libsrc/Makefile @@ -7,6 +7,7 @@ CBMS = c128 \ c64 \ cbm510 \ cbm610 \ + cx16 \ pet \ plus4 \ vic20 @@ -14,22 +15,28 @@ CBMS = c128 \ GEOS = geos-apple \ geos-cbm -TARGETS = apple2 \ - apple2enh \ - atari \ - atarixl \ - atari5200 \ - atmos \ - $(CBMS) \ - $(GEOS) \ - gamate \ - lynx \ - nes \ - osic1p \ - pce \ - sim6502 \ - sim65c02 \ - supervision +TARGETS = apple2 \ + apple2enh \ + atari \ + atarixl \ + atari2600 \ + atari5200 \ + atari7800 \ + atmos \ + creativision \ + $(CBMS) \ + $(GEOS) \ + gamate \ + lynx \ + nes \ + none \ + osic1p \ + pce \ + sim6502 \ + sim65c02 \ + supervision \ + sym1 \ + telestrat DRVTYPES = emd \ joy \ @@ -37,13 +44,13 @@ DRVTYPES = emd \ ser \ tgi -OUTPUTDIRS := lib \ - $(DRVTYPES) \ - targetutil \ - asminc \ - cfg \ - include \ - $(subst ../,,$(filter-out $(wildcard ../include/*.*),$(wildcard ../include/*))) +OUTPUTDIRS := lib \ + asminc \ + cfg \ + include \ + $(subst ../,,$(filter-out $(wildcard ../include/*.*),$(wildcard ../include/*))) \ + $(subst ../,,$(wildcard ../target/*/drv/*)) \ + $(subst ../,,$(wildcard ../target/*/util)) .PHONY: all mostlyclean clean install zip lib $(TARGETS) @@ -69,7 +76,7 @@ endif ifndef TARGET -datadir = $(prefix)/share/cc65 +datadir = $(PREFIX)/share/cc65 all lib: $(TARGETS) @@ -77,7 +84,7 @@ mostlyclean: $(call RMDIR,../libwrk) clean: - $(call RMDIR,../libwrk ../lib ../targetutil $(addprefix ../,$(DRVTYPES))) + $(call RMDIR,../libwrk ../lib ../target) ifdef CMD_EXE @@ -89,9 +96,8 @@ INSTALL = install define INSTALL_recipe -$(if $(prefix),,$(error variable `prefix' must be set)) $(INSTALL) -d $(DESTDIR)$(datadir)/$(dir) -$(INSTALL) -m644 ../$(dir)/*.* $(DESTDIR)$(datadir)/$(dir) +$(INSTALL) -m0644 ../$(dir)/*.* $(DESTDIR)$(datadir)/$(dir) endef # INSTALL_recipe @@ -128,8 +134,7 @@ MKINC = $(GEOS) \ TARGETUTIL = apple2 \ apple2enh \ - atari \ - geos-apple + atari GEOSDIRS = common \ conio \ @@ -193,6 +198,7 @@ DEPS = $(OBJS:.o=.d) EXTRA_SRCPAT = $(SRCDIR)/extra/%.s EXTRA_OBJPAT = ../lib/$(TARGET)-%.o EXTRA_OBJS := $(patsubst $(EXTRA_SRCPAT),$(EXTRA_OBJPAT),$(wildcard $(SRCDIR)/extra/*.s)) +DEPS += $(EXTRA_OBJS:../lib/%.o=../libwrk/$(TARGET)/%.d) ZPOBJ = ../libwrk/$(TARGET)/zeropage.o ifeq ($(TARGET),$(filter $(TARGET),$(EXTZP))) @@ -212,7 +218,7 @@ define DRVTYPE_template $1_SRCDIR = $$(SRCDIR)/$1 $1_STCDIR = ../libwrk/$$(TARGET) $1_DYNDIR = ../libwrk/$$(TARGET)/$1 -$1_DRVDIR = ../$1 +$1_DRVDIR = ../target/$$(TARGET)/drv/$1 $1_SRCPAT = $$($1_SRCDIR)/$$(OBJPFX)%.s $1_STCPAT = $$($1_STCDIR)/$$(OBJPFX)%-$1.o @@ -276,14 +282,14 @@ endef # COMPILE_recipe ../libwrk/$(TARGET)/%.o: %.c | ../libwrk/$(TARGET) $(COMPILE_recipe) -$(EXTRA_OBJPAT): $(EXTRA_SRCPAT) | ../lib +$(EXTRA_OBJPAT): $(EXTRA_SRCPAT) | ../libwrk/$(TARGET) ../lib @echo $(TARGET) - $(<F) - @$(CA65) -t $(TARGET) $(CA65FLAGS) -o $@ $< + @$(CA65) -t $(TARGET) $(CA65FLAGS) --create-dep $(@:../lib/%.o=../libwrk/$(TARGET)/%.d) -o $@ $< ../lib/$(TARGET).lib: $(OBJS) | ../lib $(AR65) a $@ $? -../libwrk/$(TARGET) ../lib ../targetutil: +../libwrk/$(TARGET) ../lib ../target/$(TARGET)/util: @$(call MKDIR,$@) $(TARGET): $(EXTRA_OBJS) ../lib/$(TARGET).lib diff --git a/libsrc/apple2/_sys.s b/libsrc/apple2/_sys.s new file mode 100644 index 000000000..ae4ea81d2 --- /dev/null +++ b/libsrc/apple2/_sys.s @@ -0,0 +1,81 @@ +; +; void __fastcall__ _sys (struct regs* r); +; + + .export __sys + .import jmpvec + + .include "zeropage.inc" + + .segment "LOWCODE" + +__sys: sta ptr1 + stx ptr1+1 ; Save the pointer to r + + ; Fetch the PC and store it into the jump vector + ldy #5 + lda (ptr1),y + sta jmpvec+2 + dey + lda (ptr1),y + sta jmpvec+1 + + ; Remember the flags so we can restore them to a known state after calling the + ; routine + php + + ; Get the flags, keep the state of bit 4 and 5 using the other flags from + ; the flags value passed by the caller. Push the new flags and push A. + dey + php + pla ; Current flags -> A + eor (ptr1),y + and #%00110000 + eor (ptr1),y + pha ; Push new flags value + ldy #0 + lda (ptr1),y + pha + + ; Get and assign X and Y + iny + lda (ptr1),y + tax + iny + lda (ptr1),y + tay + + ; Switch in ROM + bit $C082 + + ; Set A and the flags, call the machine code routine + pla + plp + jsr jmpvec + + ; Back from the routine. Save the flags and A. + php + pha + + ; Switch in LC bank 2 for R/O + bit $C080 + + ; Put the register values into the regs structure + tya + ldy #2 + sta (ptr1),y + dey + txa + sta (ptr1),y + dey + pla + sta (ptr1),y + ldy #3 + pla + sta (ptr1),y + + ; Restore the old flags value + plp + + ; Done + rts diff --git a/libsrc/apple2/break.s b/libsrc/apple2/break.s index 9129dde96..21538e1e5 100644 --- a/libsrc/apple2/break.s +++ b/libsrc/apple2/break.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 27.09.1998 ; -; void set_brk (unsigned Addr); +; void __fastcall__ set_brk (unsigned Addr); ; void reset_brk (void); ; diff --git a/libsrc/apple2/cclear.s b/libsrc/apple2/cclear.s index c06cb0812..4106752eb 100644 --- a/libsrc/apple2/cclear.s +++ b/libsrc/apple2/cclear.s @@ -6,12 +6,11 @@ ; .export _cclearxy, _cclear - .import popa, _gotoxy, chlinedirect + .import gotoxy, chlinedirect _cclearxy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length and run into _cclear _cclear: diff --git a/libsrc/apple2/cgetc.s b/libsrc/apple2/cgetc.s index 511e434df..ecce9f9de 100644 --- a/libsrc/apple2/cgetc.s +++ b/libsrc/apple2/cgetc.s @@ -6,20 +6,47 @@ ; If open_apple key is pressed then the high-bit of the key is set. ; - .export _cgetc + .export _cgetc + .import cursor, putchardirect - .include "apple2.inc" + .include "apple2.inc" _cgetc: - lda KBD - bpl _cgetc ; If < 128, no key pressed + ; Cursor on ? + lda cursor + beq :+ - ; At this time, the high bit of the key pressed is set - bit KBDSTRB ; Clear keyboard strobe + ; Show caret. + .ifdef __APPLE2ENH__ + lda #$7F | $80 ; Checkerboard, screen code + .else + lda #' ' | $40 ; Blank, flashing + .endif + jsr putchardirect ; Returns old character in X + + ; Wait for keyboard strobe. +: inc RNDL ; Increment random counter low + bne :+ + inc RNDH ; Increment random counter high +: lda KBD + bpl :-- ; If < 128, no key pressed + + ; Cursor on ? + ldy cursor + beq :+ + + ; Restore old character. + pha + txa + jsr putchardirect + pla + + ; At this time, the high bit of the key pressed is set. +: bit KBDSTRB ; Clear keyboard strobe .ifdef __APPLE2ENH__ bit BUTN0 ; Check if OpenApple is down bmi done .endif and #$7F ; If not down, then clear high bit -done: ldx #$00 +done: ldx #>$0000 rts diff --git a/libsrc/apple2/chline.s b/libsrc/apple2/chline.s index dba094365..be157ca9e 100644 --- a/libsrc/apple2/chline.s +++ b/libsrc/apple2/chline.s @@ -6,32 +6,30 @@ ; .export _chlinexy, _chline, chlinedirect - .import popa, _gotoxy, cputdirect + .import gotoxy, cputdirect .include "zeropage.inc" .include "apple2.inc" _chlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length and run into _chline _chline: .ifdef __APPLE2ENH__ - ldx #'S' ; MouseText character - ldy INVFLG - cpy #$FF ; Normal character display mode? - beq chlinedirect + ldx #'_' | $80 ; Underscore, screen code + .else + ldx #'-' | $80 ; Minus, screen code .endif - ldx #'-' | $80 ; Horizontal line, screen code chlinedirect: + stx tmp1 cmp #$00 ; Is the length zero? beq done ; Jump if done - sta tmp1 -: txa ; Screen code + sta tmp2 +: lda tmp1 ; Screen code jsr cputdirect ; Direct output - dec tmp1 + dec tmp2 bne :- done: rts diff --git a/libsrc/apple2/color.s b/libsrc/apple2/color.s index 3b0c5b6d4..c54207288 100644 --- a/libsrc/apple2/color.s +++ b/libsrc/apple2/color.s @@ -13,4 +13,4 @@ _textcolor := return1 _bgcolor := return0 -_bordercolor := return0 \ No newline at end of file +_bordercolor := return0 diff --git a/libsrc/apple2/cpeekc.s b/libsrc/apple2/cpeekc.s new file mode 100644 index 000000000..a547f7867 --- /dev/null +++ b/libsrc/apple2/cpeekc.s @@ -0,0 +1,28 @@ +; +; 2020-07-12, Oliver Schmidt +; +; char cpeekc (void); +; + + .export _cpeekc + + .include "apple2.inc" + +_cpeekc: + ldy CH + .ifdef __APPLE2ENH__ + bit RD80VID ; In 80 column mode? + bpl peek ; No, just go ahead + tya + lsr ; Div by 2 + tay + bcs peek ; Odd cols are in main memory + bit HISCR ; Assume SET80COL + .endif +peek: lda (BASL),Y ; Get character + .ifdef __APPLE2ENH__ + bit LOWSCR ; Doesn't hurt in 40 column mode + .endif + eor #$80 ; Invert high bit + ldx #$00 + rts diff --git a/libsrc/apple2/cputc.s b/libsrc/apple2/cputc.s index 1cadd1f1c..30383fcfe 100644 --- a/libsrc/apple2/cputc.s +++ b/libsrc/apple2/cputc.s @@ -9,12 +9,12 @@ .constructor initconio .endif .export _cputcxy, _cputc - .export cputdirect, newline, putchar - .import popa, _gotoxy, VTABZ + .export cputdirect, newline, putchar, putchardirect + .import gotoxy, VTABZ .include "apple2.inc" - .segment "INIT" + .segment "ONCE" .ifdef __APPLE2ENH__ initconio: @@ -29,16 +29,15 @@ initconio: _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy - pla ; Restore C + jsr gotoxy ; Call this one, will pop params + pla ; Restore C and run into _cputc _cputc: cmp #$0D ; Test for \r = carrage return beq left cmp #$0A ; Test for \n = line feed beq newline - ora #$80 ; Turn on high bit + eor #$80 ; Invert high bit .ifndef __APPLE2ENH__ cmp #$E0 ; Test for lowercase bcc cputdirect @@ -51,6 +50,7 @@ cputdirect: lda CH cmp WNDWDTH bcc :+ + jsr newline left: lda #$00 ; Goto left edge of screen sta CH : rts @@ -63,32 +63,36 @@ newline: lda WNDTOP ; Goto top of screen sta CV : jmp VTABZ - + putchar: .ifdef __APPLE2ENH__ ldy INVFLG cpy #$FF ; Normal character display mode? - beq put + beq putchardirect cmp #$E0 ; Lowercase? bcc mask and #$7F ; Inverse lowercase - bra put + bra putchardirect .endif mask: and INVFLG ; Apply normal, inverse, flash -put: ldy CH + +putchardirect: + pha + ldy CH .ifdef __APPLE2ENH__ bit RD80VID ; In 80 column mode? - bpl col40 ; No, in 40 cols - pha + bpl put ; No, just go ahead tya lsr ; Div by 2 tay - pla - bcs col40 ; Odd cols go in 40 col memory + bcs put ; Odd cols go in main memory bit HISCR ; Assume SET80COL - sta (BASL),Y - bit LOWSCR ; Assume SET80COL - rts .endif -col40: sta (BASL),Y +put: lda (BASL),Y ; Get current character + tax ; Return old character for _cgetc + pla + sta (BASL),Y + .ifdef __APPLE2ENH__ + bit LOWSCR ; Doesn't hurt in 40 column mode + .endif rts diff --git a/libsrc/apple2/crt0.s b/libsrc/apple2/crt0.s index f061b212b..60a8516d1 100644 --- a/libsrc/apple2/crt0.s +++ b/libsrc/apple2/crt0.s @@ -6,16 +6,17 @@ .export _exit, done, return .export __STARTUP__ : absolute = 1 ; Mark as startup - .import zerobss + .import initlib, donelib - .import callmain + .import zerobss, callmain + .import __ONCE_LOAD__, __ONCE_SIZE__ ; Linker generated .import __LC_START__, __LC_LAST__ ; Linker generated - .import __INIT_RUN__, __INIT_SIZE__ ; Linker generated - .import __INITBSS_RUN__ ; Linker generated .include "zeropage.inc" .include "apple2.inc" +; ------------------------------------------------------------------------ + .segment "STARTUP" ; ProDOS TechRefMan, chapter 5.2.1: @@ -24,57 +25,16 @@ ldx #$FF txs ; Init stack pointer - ; Switch in LC bank 2 for W/O. - bit $C081 - bit $C081 - - ; Set the source start address. - lda #<(__INITBSS_RUN__ + __INIT_SIZE__) - ldy #>(__INITBSS_RUN__ + __INIT_SIZE__) - sta $9B - sty $9C - - ; Set the source last address. - lda #<(__INITBSS_RUN__ + __INIT_SIZE__ + __LC_LAST__ - __LC_START__) - ldy #>(__INITBSS_RUN__ + __INIT_SIZE__ + __LC_LAST__ - __LC_START__) - sta $96 - sty $97 - - ; Set the destination last address. - lda #<__LC_LAST__ - ldy #>__LC_LAST__ - sta $94 - sty $95 - - ; Call into Applesoft Block Transfer Up -- which handles zero- - ; sized blocks well -- to move the content of the LC memory area. - jsr $D39A ; BLTU2 - - ; Set the source start address. - lda #<__INITBSS_RUN__ - ldy #>__INITBSS_RUN__ - sta $9B - sty $9C - - ; Set the source last address. - lda #<(__INITBSS_RUN__ + __INIT_SIZE__) - ldy #>(__INITBSS_RUN__ + __INIT_SIZE__) - sta $96 - sty $97 - - ; Set the destination last address. - lda #<(__INIT_RUN__ + __INIT_SIZE__) - ldy #>(__INIT_RUN__ + __INIT_SIZE__) - sta $94 - sty $95 - - ; Call into Applesoft Block Transfer Up -- which handles moving - ; overlapping blocks upwards well -- to move the INIT segment. - jsr $D39A ; BLTU2 - - ; Delegate all further processing, to keep the STARTUP segment small. + ; Save space by putting some of the start-up code in the ONCE segment, + ; which can be re-used by the BSS segment, the heap and the C stack. jsr init + ; Clear the BSS data. + jsr zerobss + + ; Push the command-line arguments; and, call main(). + jsr callmain + ; Avoid a re-entrance of donelib. This is also the exit() entry. _exit: ldx #<exit lda #>exit @@ -109,7 +69,9 @@ exit: ldx #$02 ; We're done jmp done - .segment "INIT" +; ------------------------------------------------------------------------ + + .segment "ONCE" ; Save the zero-page locations that we need. init: ldx #zpspace-1 @@ -118,9 +80,6 @@ init: ldx #zpspace-1 dex bpl :- - ; Clear the BSS data. - jsr zerobss - ; Save the original RESET vector. ldx #$02 : lda SOFTEV,x @@ -128,13 +87,6 @@ init: ldx #zpspace-1 dex bpl :- - ; ProDOS TechRefMan, chapter 5.3.5: - ; "Your system program should place in the RESET vector the - ; address of a routine that ... closes the files." - ldx #<_exit - lda #>_exit - jsr reset ; Setup RESET vector - ; Check for ProDOS. ldy $BF00 ; MLI call entry point cpy #$4C ; Is MLI present? (JMP opcode) @@ -164,14 +116,50 @@ basic: lda HIMEM : sta sp stx sp+1 + ; ProDOS TechRefMan, chapter 5.3.5: + ; "Your system program should place in the RESET vector the + ; address of a routine that ... closes the files." + ldx #<_exit + lda #>_exit + jsr reset ; Setup RESET vector + ; Call the module constructors. jsr initlib - ; Switch in LC bank 2 for R/O. - bit $C080 + ; Switch in LC bank 2 for W/O. + bit $C081 + bit $C081 - ; Push the command-line arguments; and, call main(). - jmp callmain + ; Set the source start address. + ; Aka __LC_LOAD__ iff segment LC exists. + lda #<(__ONCE_LOAD__ + __ONCE_SIZE__) + ldy #>(__ONCE_LOAD__ + __ONCE_SIZE__) + sta $9B + sty $9C + + ; Set the source last address. + ; Aka __LC_LOAD__ + __LC_SIZE__ iff segment LC exists. + lda #<((__ONCE_LOAD__ + __ONCE_SIZE__) + (__LC_LAST__ - __LC_START__)) + ldy #>((__ONCE_LOAD__ + __ONCE_SIZE__) + (__LC_LAST__ - __LC_START__)) + sta $96 + sty $97 + + ; Set the destination last address. + ; Aka __LC_RUN__ + __LC_SIZE__ iff segment LC exists. + lda #<__LC_LAST__ + ldy #>__LC_LAST__ + sta $94 + sty $95 + + ; Call into Applesoft Block Transfer Up -- which handles zero- + ; sized blocks well -- to move the content of the LC memory area. + jsr $D39A ; BLTU2 + + ; Switch in LC bank 2 for R/O and return. + bit $C080 + rts + +; ------------------------------------------------------------------------ .code @@ -187,6 +175,8 @@ quit: jsr $BF00 ; MLI call entry point .byte $65 ; Quit .word q_param +; ------------------------------------------------------------------------ + .rodata ; MLI parameter list for quit @@ -196,15 +186,16 @@ q_param:.byte $04 ; param_count .byte $00 ; reserved .word $0000 ; reserved +; ------------------------------------------------------------------------ + .data ; Final jump when we're done done: jmp DOSWARM ; Potentially patched at runtime - .segment "INITBSS" +; ------------------------------------------------------------------------ + + .segment "INIT" zpsave: .res zpspace - - .bss - rvsave: .res 3 diff --git a/libsrc/apple2/ctype.s b/libsrc/apple2/ctype.s deleted file mode 100644 index fa9a65c8b..000000000 --- a/libsrc/apple2/ctype.s +++ /dev/null @@ -1,161 +0,0 @@ -; -; Stefan Haubenthal with minor changes from Ullrich von Bassewitz, 2003-05-02 -; -; Character specification table. -; - - .include "ctype.inc" - -; The tables are readonly, put them into the rodata segment - -.rodata - -; The following 256 byte wide table specifies attributes for the isxxx type -; of functions. Doing it by a table means some overhead in space, but it -; has major advantages: -; -; * It is fast. If it were'nt for the slow parameter passing of cc65, one -; could even define macros for the isxxx functions (this is usually -; done on other platforms). -; -; * It is highly portable. The only unportable part is the table itself, -; all real code goes into the common library. -; -; * We save some code in the isxxx functions. - - -__ctype: - .repeat 2 - .byte CT_CTRL ; 0/00 ___ctrl_@___ - .byte CT_CTRL ; 1/01 ___ctrl_A___ - .byte CT_CTRL ; 2/02 ___ctrl_B___ - .byte CT_CTRL ; 3/03 ___ctrl_C___ - .byte CT_CTRL ; 4/04 ___ctrl_D___ - .byte CT_CTRL ; 5/05 ___ctrl_E___ - .byte CT_CTRL ; 6/06 ___ctrl_F___ - .byte CT_CTRL ; 7/07 ___ctrl_G___ - .byte CT_CTRL ; 8/08 ___ctrl_H___ - .byte CT_CTRL | CT_OTHER_WS | CT_SPACE_TAB - ; 9/09 ___ctrl_I___ - .byte CT_CTRL | CT_OTHER_WS ; 10/0a ___ctrl_J___ - .byte CT_CTRL | CT_OTHER_WS ; 11/0b ___ctrl_K___ - .byte CT_CTRL | CT_OTHER_WS ; 12/0c ___ctrl_L___ - .byte CT_CTRL | CT_OTHER_WS ; 13/0d ___ctrl_M___ - .byte CT_CTRL ; 14/0e ___ctrl_N___ - .byte CT_CTRL ; 15/0f ___ctrl_O___ - .byte CT_CTRL ; 16/10 ___ctrl_P___ - .byte CT_CTRL ; 17/11 ___ctrl_Q___ - .byte CT_CTRL ; 18/12 ___ctrl_R___ - .byte CT_CTRL ; 19/13 ___ctrl_S___ - .byte CT_CTRL ; 20/14 ___ctrl_T___ - .byte CT_CTRL ; 21/15 ___ctrl_U___ - .byte CT_CTRL ; 22/16 ___ctrl_V___ - .byte CT_CTRL ; 23/17 ___ctrl_W___ - .byte CT_CTRL ; 24/18 ___ctrl_X___ - .byte CT_CTRL ; 25/19 ___ctrl_Y___ - .byte CT_CTRL ; 26/1a ___ctrl_Z___ - .byte CT_CTRL ; 27/1b ___ctrl_[___ - .byte CT_CTRL ; 28/1c ___ctrl_\___ - .byte CT_CTRL ; 29/1d ___ctrl_]___ - .byte CT_CTRL ; 30/1e ___ctrl_^___ - .byte CT_CTRL ; 31/1f ___ctrl_____ - .byte CT_SPACE | CT_SPACE_TAB ; 32/20 ___SPACE___ - .byte CT_NONE ; 33/21 _____!_____ - .byte CT_NONE ; 34/22 _____"_____ - .byte CT_NONE ; 35/23 _____#_____ - .byte CT_NONE ; 36/24 _____$_____ - .byte CT_NONE ; 37/25 _____%_____ - .byte CT_NONE ; 38/26 _____&_____ - .byte CT_NONE ; 39/27 _____'_____ - .byte CT_NONE ; 40/28 _____(_____ - .byte CT_NONE ; 41/29 _____)_____ - .byte CT_NONE ; 42/2a _____*_____ - .byte CT_NONE ; 43/2b _____+_____ - .byte CT_NONE ; 44/2c _____,_____ - .byte CT_NONE ; 45/2d _____-_____ - .byte CT_NONE ; 46/2e _____._____ - .byte CT_NONE ; 47/2f _____/_____ - .byte CT_DIGIT | CT_XDIGIT ; 48/30 _____0_____ - .byte CT_DIGIT | CT_XDIGIT ; 49/31 _____1_____ - .byte CT_DIGIT | CT_XDIGIT ; 50/32 _____2_____ - .byte CT_DIGIT | CT_XDIGIT ; 51/33 _____3_____ - .byte CT_DIGIT | CT_XDIGIT ; 52/34 _____4_____ - .byte CT_DIGIT | CT_XDIGIT ; 53/35 _____5_____ - .byte CT_DIGIT | CT_XDIGIT ; 54/36 _____6_____ - .byte CT_DIGIT | CT_XDIGIT ; 55/37 _____7_____ - .byte CT_DIGIT | CT_XDIGIT ; 56/38 _____8_____ - .byte CT_DIGIT | CT_XDIGIT ; 57/39 _____9_____ - .byte CT_NONE ; 58/3a _____:_____ - .byte CT_NONE ; 59/3b _____;_____ - .byte CT_NONE ; 60/3c _____<_____ - .byte CT_NONE ; 61/3d _____=_____ - .byte CT_NONE ; 62/3e _____>_____ - .byte CT_NONE ; 63/3f _____?_____ - - .byte CT_NONE ; 64/40 _____@_____ - .byte CT_UPPER | CT_XDIGIT ; 65/41 _____A_____ - .byte CT_UPPER | CT_XDIGIT ; 66/42 _____B_____ - .byte CT_UPPER | CT_XDIGIT ; 67/43 _____C_____ - .byte CT_UPPER | CT_XDIGIT ; 68/44 _____D_____ - .byte CT_UPPER | CT_XDIGIT ; 69/45 _____E_____ - .byte CT_UPPER | CT_XDIGIT ; 70/46 _____F_____ - .byte CT_UPPER ; 71/47 _____G_____ - .byte CT_UPPER ; 72/48 _____H_____ - .byte CT_UPPER ; 73/49 _____I_____ - .byte CT_UPPER ; 74/4a _____J_____ - .byte CT_UPPER ; 75/4b _____K_____ - .byte CT_UPPER ; 76/4c _____L_____ - .byte CT_UPPER ; 77/4d _____M_____ - .byte CT_UPPER ; 78/4e _____N_____ - .byte CT_UPPER ; 79/4f _____O_____ - .byte CT_UPPER ; 80/50 _____P_____ - .byte CT_UPPER ; 81/51 _____Q_____ - .byte CT_UPPER ; 82/52 _____R_____ - .byte CT_UPPER ; 83/53 _____S_____ - .byte CT_UPPER ; 84/54 _____T_____ - .byte CT_UPPER ; 85/55 _____U_____ - .byte CT_UPPER ; 86/56 _____V_____ - .byte CT_UPPER ; 87/57 _____W_____ - .byte CT_UPPER ; 88/58 _____X_____ - .byte CT_UPPER ; 89/59 _____Y_____ - .byte CT_UPPER ; 90/5a _____Z_____ - .byte CT_NONE ; 91/5b _____[_____ - .byte CT_NONE ; 92/5c _____\_____ - .byte CT_NONE ; 93/5d _____]_____ - .byte CT_NONE ; 94/5e _____^_____ - .byte CT_NONE ; 95/5f _UNDERLINE_ - .byte CT_NONE ; 96/60 ___grave___ - .byte CT_LOWER | CT_XDIGIT ; 97/61 _____a_____ - .byte CT_LOWER | CT_XDIGIT ; 98/62 _____b_____ - .byte CT_LOWER | CT_XDIGIT ; 99/63 _____c_____ - .byte CT_LOWER | CT_XDIGIT ; 100/64 _____d_____ - .byte CT_LOWER | CT_XDIGIT ; 101/65 _____e_____ - .byte CT_LOWER | CT_XDIGIT ; 102/66 _____f_____ - .byte CT_LOWER ; 103/67 _____g_____ - .byte CT_LOWER ; 104/68 _____h_____ - .byte CT_LOWER ; 105/69 _____i_____ - .byte CT_LOWER ; 106/6a _____j_____ - .byte CT_LOWER ; 107/6b _____k_____ - .byte CT_LOWER ; 108/6c _____l_____ - .byte CT_LOWER ; 109/6d _____m_____ - .byte CT_LOWER ; 110/6e _____n_____ - .byte CT_LOWER ; 111/6f _____o_____ - .byte CT_LOWER ; 112/70 _____p_____ - .byte CT_LOWER ; 113/71 _____q_____ - .byte CT_LOWER ; 114/72 _____r_____ - .byte CT_LOWER ; 115/73 _____s_____ - .byte CT_LOWER ; 116/74 _____t_____ - .byte CT_LOWER ; 117/75 _____u_____ - .byte CT_LOWER ; 118/76 _____v_____ - .byte CT_LOWER ; 119/77 _____w_____ - .byte CT_LOWER ; 120/78 _____x_____ - .byte CT_LOWER ; 121/79 _____y_____ - .byte CT_LOWER ; 122/7a _____z_____ - .byte CT_NONE ; 123/7b _____{_____ - .byte CT_NONE ; 124/7c _____|_____ - .byte CT_NONE ; 125/7d _____}_____ - .byte CT_NONE ; 126/7e _____~_____ - .byte CT_OTHER_WS ; 127/7f ____DEL____ - .endrepeat - - diff --git a/libsrc/apple2/cvline.s b/libsrc/apple2/cvline.s index 1ac3fad74..86bbf11f4 100644 --- a/libsrc/apple2/cvline.s +++ b/libsrc/apple2/cvline.s @@ -5,31 +5,30 @@ ; void __fastcall__ cvline (unsigned char length); ; - .export _cvlinexy, _cvline, cvlinedirect - .import popa, _gotoxy, putchar, newline + .export _cvlinexy, _cvline + .import gotoxy, putchar, newline .include "zeropage.inc" _cvlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length and run into _cvline _cvline: .ifdef __APPLE2ENH__ - ldx #'|' | $80 ; Vertical line, screen code + ldx #$5F ; Left vertical line MouseText character .else - ldx #'!' | $80 ; Vertical line, screen code + ldx #'!' | $80 ; Exclamation mark, screen code .endif -cvlinedirect: + stx tmp1 cmp #$00 ; Is the length zero? beq done ; Jump if done - sta tmp1 -: txa ; Screen code + sta tmp2 +: lda tmp1 ; Screen code jsr putchar ; Write, no cursor advance jsr newline ; Advance cursor to next line - dec tmp1 + dec tmp2 bne :- done: rts diff --git a/libsrc/apple2/devicedir.s b/libsrc/apple2/devicedir.s index dea2ba8c5..79f4c60de 100644 --- a/libsrc/apple2/devicedir.s +++ b/libsrc/apple2/devicedir.s @@ -5,7 +5,7 @@ ; .export _getdevicedir - .import popax, popa + .import popptr1, popa .include "zeropage.inc" .include "errno.inc" @@ -17,11 +17,10 @@ _getdevicedir: stx ptr2+1 ; Save buf - jsr popax - sta ptr1 - stx ptr1+1 + jsr popptr1 ; Set buf + ldx ptr1+1 sta mliparam + MLI::ON_LINE::DATA_BUFFER stx mliparam + MLI::ON_LINE::DATA_BUFFER+1 @@ -64,7 +63,7 @@ oserr: jsr __mappederrno lda (ptr1),y and #15 ; Max volume name length sta tmp1 - + ; Add leading slash lda #'/' sta (ptr1),y diff --git a/libsrc/apple2/diocommon.s b/libsrc/apple2/diocommon.s index 4e8d76147..92d274ea8 100644 --- a/libsrc/apple2/diocommon.s +++ b/libsrc/apple2/diocommon.s @@ -26,7 +26,7 @@ dioprolog: diocommon: ; Call read_block or write_block ldx #RW_BLOCK_COUNT - jsr callmli + jsr callmli dioepilog: ; Return success or error diff --git a/libsrc/apple2/doesclrscr.s b/libsrc/apple2/doesclrscr.s new file mode 100644 index 000000000..2e2e7b96f --- /dev/null +++ b/libsrc/apple2/doesclrscr.s @@ -0,0 +1,21 @@ +; +; Oliver Schmidt, 2016-06-05 +; +; unsigned char doesclrscrafterexit (void); +; + + .export _doesclrscrafterexit + .import done + + .include "apple2.inc" + +_doesclrscrafterexit: + ; If the page we jump to when done equals the page + ; of the warmstart vector we'll return to BASIC so + ; there's no implicit clrscr() after exit(). + lda done+2 + sec + sbc #>DOSWARM + + ldx #>$0000 + rts diff --git a/libsrc/apple2/dosdetect.s b/libsrc/apple2/dosdetect.s index 68910e3da..44e46b2b6 100644 --- a/libsrc/apple2/dosdetect.s +++ b/libsrc/apple2/dosdetect.s @@ -14,10 +14,11 @@ ; ProDOS 8 1.6 - $16 ; ProDOS 8 1.7 - $17 ; ProDOS 8 1.8 - $18 -; ProDOS 8 1.9 - $18 +; ProDOS 8 1.9 - $18 (!) ; ProDOS 8 2.0.1 - $21 ; ProDOS 8 2.0.2 - $22 ; ProDOS 8 2.0.3 - $23 +; ProDOS 8 2.4.x - $24 ; .constructor initdostype, 25 @@ -30,7 +31,7 @@ ; - Apple II ProDOS 8 TechNote #23, ProDOS 8 Changes and Minutia ; - ProDOS TechRefMan, chapter 5.2.4 - .segment "INIT" + .segment "ONCE" initdostype: lda $BF00 @@ -43,6 +44,6 @@ initdostype: : sta __dos_type done: rts - .bss + .data -__dos_type: .res 1 +__dos_type: .byte $00 diff --git a/libsrc/apple2/exec.s b/libsrc/apple2/exec.s index d24de604c..0ff4bc6f0 100644 --- a/libsrc/apple2/exec.s +++ b/libsrc/apple2/exec.s @@ -18,7 +18,7 @@ typerr: lda #$4A ; "Incompatible file format" ; Cleanup name oserr: jsr popname ; Preserves A - + ; Set __oserror jmp __mappederrno @@ -129,7 +129,7 @@ setbuf: lda #$00 ; Low byte .assert MLI::OPEN::PATHNAME = MLI::INFO::PATHNAME, error ; Lower file level to avoid program file - ; being closed by C libary shutdown code + ; being closed by C library shutdown code ldx LEVEL stx level beq :+ @@ -185,13 +185,13 @@ setbuf: lda #$00 ; Low byte lda #$00 ; '\0' beq :- ; Branch always - ; Call loader stub after C libary shutdown + ; Call loader stub after C library shutdown : lda #<target ldx #>target sta done+1 stx done+2 - ; Initiate C libary shutdown + ; Initiate C library shutdown jmp _exit .bss @@ -230,14 +230,13 @@ source: jsr $BF00 ; Check for startup filename support ; ProDOS TechRefMan, chapter 5.1.5.1: ; "$2000 is a jump instruction. $2003 and $2004 are $EE." -system: lda $2000 - cmp #$4C +system: lda #$4C + cmp $2000 bne jump - lda $2003 - cmp #$EE + lda #$EE + cmp $2003 bne jump - lda $2004 - cmp #$EE + cmp $2004 bne jump ; Store cmdline in startup filename buffer diff --git a/libsrc/apple2/exehdr.s b/libsrc/apple2/exehdr.s index eb05e66be..72ea390e9 100644 --- a/libsrc/apple2/exehdr.s +++ b/libsrc/apple2/exehdr.s @@ -1,16 +1,40 @@ ; ; Oliver Schmidt, 2012-06-10 ; -; This module supplies a 4 byte DOS 3.3 header -; containing the load address and load length. +; This module supplies an AppleSingle version 2 file header + entry with +; ID 11 according to https://tools.ietf.org/rfc/rfc1740.txt Appendix A. ; .export __EXEHDR__ : absolute = 1 ; Linker referenced - .import __LOADADDR__, __LOADSIZE__ ; Linker generated + .import __FILETYPE__ ; Linker generated + .import __MAIN_START__, __MAIN_LAST__ ; Linker generated + +; ------------------------------------------------------------------------ + +; Data Fork +ID01_LENGTH = __MAIN_LAST__ - __MAIN_START__ +ID01_OFFSET = ID01 - START + +; ProDOS File Info +ID11_LENGTH = ID01 - ID11 +ID11_OFFSET = ID11 - START ; ------------------------------------------------------------------------ .segment "EXEHDR" - .addr __LOADADDR__ ; Load address - .word __LOADSIZE__ ; Load length +START: .byte $00, $05, $16, $00 ; Magic number + .byte $00, $02, $00, $00 ; Version number + .res 16 ; Filler + .byte 0, 2 ; Number of entries + .byte 0, 0, 0, 1 ; Entry ID 1 - Data Fork + .byte 0, 0, >ID01_OFFSET, <ID01_OFFSET ; Offset + .byte 0, 0, >ID01_LENGTH, <ID01_LENGTH ; Length + .byte 0, 0, 0, 11 ; Entry ID 11 - ProDOS File Info + .byte 0, 0, >ID11_OFFSET, <ID11_OFFSET ; Offset + .byte 0, 0, >ID11_LENGTH, <ID11_LENGTH ; Length +ID11: .byte 0, %11000011 ; Access - Destroy, Rename, Write, Read + .byte >__FILETYPE__, <__FILETYPE__ ; File Type + .byte 0, 0 ; Auxiliary Type high + .byte >__MAIN_START__, <__MAIN_START__ ; Auxiliary Type low +ID01: diff --git a/libsrc/apple2/extra/iobuf-0800.s b/libsrc/apple2/extra/iobuf-0800.s index 7951ccbb0..694b91fdb 100644 --- a/libsrc/apple2/extra/iobuf-0800.s +++ b/libsrc/apple2/extra/iobuf-0800.s @@ -7,18 +7,18 @@ .constructor initiobuf .export iobuf_alloc, iobuf_free - .import __STARTUP_RUN__ - .import incsp2, popax + .import __MAIN_START__ + .import incsp2, popptr1 .include "zeropage.inc" .include "errno.inc" .include "../filedes.inc" - .segment "INIT" + .segment "ONCE" initiobuf: ; Convert end address highbyte to table index - lda #>__STARTUP_RUN__ + lda #>__MAIN_START__ sec sbc #>$0800 lsr @@ -41,9 +41,7 @@ initiobuf: iobuf_alloc: ; Get and save "memptr" jsr incsp2 - jsr popax - sta ptr1 - stx ptr1+1 + jsr popptr1 ; Search table for free entry ldx #$00 @@ -90,6 +88,6 @@ iobuf_free: ; ------------------------------------------------------------------------ - .bss + .data table: .res MAX_FDS diff --git a/libsrc/apple2/get_ostype.s b/libsrc/apple2/get_ostype.s index 68ae865ac..a1b1eb5be 100644 --- a/libsrc/apple2/get_ostype.s +++ b/libsrc/apple2/get_ostype.s @@ -4,13 +4,13 @@ ; unsigned char get_ostype (void) ; - .constructor initostype + .constructor initostype, 9 .export _get_ostype ; Identify machine according to: ; Apple II Miscellaneous TechNote #7, Apple II Family Identification - .segment "INIT" + .segment "ONCE" initostype: sec @@ -32,30 +32,30 @@ next: inx bne :- beq next ; Branch always -index: .byte $B3, $00 ; Apple ][ - .byte $B3, $1E, $00 ; Apple ][+ - .byte $B3, $1E, $00 ; Apple /// (emulation) - .byte $B3, $C0, $00 ; Apple //e - .byte $B3, $C0, $DD, $BE, $00 ; Apple //e Option Card - .byte $B3, $C0, $00 ; Apple //e (enhanced) - .byte $B3, $C0, $BF, $00 ; Apple //c - .byte $B3, $C0, $BF, $00 ; Apple //c (3.5 ROM) - .byte $B3, $C0, $BF, $00 ; Apple //c (Mem. Exp.) - .byte $B3, $C0, $BF, $00 ; Apple //c (Rev. Mem. Exp.) - .byte $B3, $C0, $BF, $00 ; Apple //c Plus +index: .byte $B3, $00 ; Apple ][ + .byte $B3, $1E, $00 ; Apple ][+ + .byte $B3, $1E, $00 ; Apple /// (emulation) + .byte $B3, $C0, $00 ; Apple //e + .byte $B3, $C0, $DD, $00 ; Apple //e Option Card + .byte $B3, $C0, $00 ; Apple //e (enhanced) + .byte $B3, $C0, $BF, $00 ; Apple //c + .byte $B3, $C0, $BF, $00 ; Apple //c (3.5 ROM) + .byte $B3, $C0, $BF, $00 ; Apple //c (Mem. Exp.) + .byte $B3, $C0, $BF, $00 ; Apple //c (Rev. Mem. Exp.) + .byte $B3, $C0, $BF, $00 ; Apple //c Plus .byte $00 -value: .byte $38, $10 ; Apple ][ - .byte $EA, $AD, $11 ; Apple ][+ - .byte $EA, $8A, $20 ; Apple /// (emulation) - .byte $06, $EA, $30 ; Apple //e - .byte $06, $E0, $02, $00, $40 ; Apple //e Option Card - .byte $06, $E0, $31 ; Apple //e (enhanced) - .byte $06, $00, $FF, $50 ; Apple //c - .byte $06, $00, $00, $51 ; Apple //c (3.5 ROM) - .byte $06, $00, $03, $53 ; Apple //c (Mem. Exp.) - .byte $06, $00, $04, $54 ; Apple //c (Rev. Mem. Exp.) - .byte $06, $00, $05, $55 ; Apple //c Plus +value: .byte $38, $10 ; Apple ][ + .byte $EA, $AD, $11 ; Apple ][+ + .byte $EA, $8A, $20 ; Apple /// (emulation) + .byte $06, $EA, $30 ; Apple //e + .byte $06, $E0, $02, $32 ; Apple //e Option Card + .byte $06, $E0, $31 ; Apple //e (enhanced) + .byte $06, $00, $FF, $40 ; Apple //c + .byte $06, $00, $00, $41 ; Apple //c (3.5 ROM) + .byte $06, $00, $03, $43 ; Apple //c (Mem. Exp.) + .byte $06, $00, $04, $44 ; Apple //c (Rev. Mem. Exp.) + .byte $06, $00, $05, $45 ; Apple //c Plus .byte $00 .code @@ -65,6 +65,6 @@ _get_ostype: ldx #$00 rts - .bss + .segment "INIT" ostype: .res 1 diff --git a/libsrc/apple2/getdevice.s b/libsrc/apple2/getdevice.s index ef35edea7..0c674cad0 100644 --- a/libsrc/apple2/getdevice.s +++ b/libsrc/apple2/getdevice.s @@ -18,7 +18,7 @@ _getfirstdevice: _getnextdevice: tax next: inx - cpx #$FF + cpx #$FF ; INVALID_DEVICE beq done ; Check for ProDOS 8 diff --git a/libsrc/apple2/getres.s b/libsrc/apple2/getres.s new file mode 100644 index 000000000..4364bc967 --- /dev/null +++ b/libsrc/apple2/getres.s @@ -0,0 +1,63 @@ +; +; Oliver Schmidt, 15.08.2018 +; +; int __fastcall__ clock_getres (clockid_t clk_id, struct timespec *res); +; + + .import __dos_type + .import incsp1, return0 + + .include "time.inc" + .include "zeropage.inc" + .include "errno.inc" + .include "mli.inc" + +_clock_getres: + sta ptr1 + stx ptr1+1 + + ; Cleanup stack + jsr incsp1 + + ; Check for ProDOS 8 + lda __dos_type + beq enosys + + ; Presume day resolution + ldx #<day_res + ldy #>day_res + + ; Check for realtme clock + lda MACHID + lsr a + bcc :+ + + ; Switch to minute resolution + ldx #<min_res + ldy #>min_res + + ; Copy timespec +: stx ptr2 + sty ptr2+1 + ldy #.sizeof(timespec)-1 +: lda (ptr2),y + sta (ptr1),y + dey + bpl :- + + ; Return success + jmp return0 + + ; Load errno code +enosys: lda #ENOSYS + + ; Set __errno + jmp __directerrno + + .rodata + +min_res:.dword 60 + .dword 0 + +day_res:.dword 60 * 60 * 24 + .dword 0 diff --git a/libsrc/apple2/gettime.s b/libsrc/apple2/gettime.s new file mode 100644 index 000000000..dc00e3b49 --- /dev/null +++ b/libsrc/apple2/gettime.s @@ -0,0 +1,94 @@ +; +; Oliver Schmidt, 14.08.2018 +; +; int __fastcall__ clock_gettime (clockid_t clk_id, struct timespec *tp); +; + + .import pushax, steaxspidx, incsp1, incsp3, return0 + + .include "time.inc" + .include "zeropage.inc" + .include "errno.inc" + .include "mli.inc" + +_clock_gettime: + jsr pushax + + ; Clear tv_nsec (+ tv_sec) + sta ptr1 + stx ptr1+1 + lda #$00 + ldy #.sizeof(timespec)-1 +: sta (ptr1),y + dey + bpl :- + + ; Update date + time + lda #GET_TIME_CALL + ldx #GET_TIME_COUNT + jsr callmli + bcs oserr + + ; Get date + lda DATELO+1 + lsr + php ; Save month msb + cmp #70 ; Year < 70? + bcs :+ ; No, leave alone + adc #100 ; Move 19xx to 20xx +: sta TM + tm::tm_year + lda DATELO + tax ; Save day + plp ; Restore month msb + ror + lsr + lsr + lsr + lsr + beq erange ; [1..12] allows for validity check + tay + dey ; Move [1..12] to [0..11] + sty TM + tm::tm_mon + txa ; Restore day + and #%00011111 + sta TM + tm::tm_mday + + ; Get time + lda TIMELO+1 + sta TM + tm::tm_hour + lda TIMELO + sta TM + tm::tm_min + + ; Make time_t + lda #<TM + ldx #>TM + jsr _mktime + + ; Store tv_sec + ldy #timespec::tv_sec + jsr steaxspidx + + ; Cleanup stack + jsr incsp1 + + ; Return success + jmp return0 + + ; Load errno code +erange: lda #ERANGE + + ; Cleanup stack + jsr incsp3 ; Preserves A + + ; Set __errno + jmp __directerrno + + ; Cleanup stack +oserr: jsr incsp3 ; Preserves A + + ; Set __oserror + jmp __mappederrno + + .bss + +TM: .tag tm diff --git a/libsrc/apple2/gotoxy.s b/libsrc/apple2/gotoxy.s index dc96ac75e..6755af8d8 100644 --- a/libsrc/apple2/gotoxy.s +++ b/libsrc/apple2/gotoxy.s @@ -5,11 +5,14 @@ ; void __fastcall__ gotox (unsigned char x); ; - .export _gotoxy, _gotox + .export gotoxy, _gotoxy, _gotox .import popa, VTABZ .include "apple2.inc" +gotoxy: + jsr popa ; Get Y + _gotoxy: clc adc WNDTOP diff --git a/libsrc/apple2/initcwd.s b/libsrc/apple2/initcwd.s index 7af29c75e..7a12bc52a 100644 --- a/libsrc/apple2/initcwd.s +++ b/libsrc/apple2/initcwd.s @@ -37,5 +37,5 @@ initcwd: ; Add terminating zero lda #$00 sta __cwd,x - + done: rts diff --git a/libsrc/apple2/iobuf.s b/libsrc/apple2/iobuf.s index 77433ce61..f5aacb74a 100644 --- a/libsrc/apple2/iobuf.s +++ b/libsrc/apple2/iobuf.s @@ -2,7 +2,7 @@ ; Oliver Schmidt, 10.9.2009 ; ; Default ProDOS 8 I/O buffer management -; +; .export iobuf_alloc, iobuf_free .import _posix_memalign, _free diff --git a/libsrc/apple2/irq.s b/libsrc/apple2/irq.s index 0b0555695..a356e1660 100644 --- a/libsrc/apple2/irq.s +++ b/libsrc/apple2/irq.s @@ -9,7 +9,9 @@ .include "apple2.inc" - .segment "INIT" + .macpack apple2 + + .segment "ONCE" initirq: ; Check for ProDOS @@ -36,17 +38,9 @@ prterr: ldx #msglen-1 jmp _exit errmsg: .ifdef __APPLE2ENH__ - .byte $8D, 't'|$80, 'p'|$80, 'u'|$80, 'r'|$80, 'r'|$80 - .byte 'e'|$80, 't'|$80, 'n'|$80, 'i'|$80, ' '|$80, 'c'|$80 - .byte 'o'|$80, 'l'|$80, 'l'|$80, 'a'|$80, ' '|$80, 'o'|$80 - .byte 't'|$80, ' '|$80, 'd'|$80, 'e'|$80, 'l'|$80, 'i'|$80 - .byte 'a'|$80, 'F'|$80, $8D + scrcode $0D, "tpurretni colla ot deliaF", $0D .else - .byte $8D, 'T'|$80, 'P'|$80, 'U'|$80, 'R'|$80, 'R'|$80 - .byte 'E'|$80, 'T'|$80, 'N'|$80, 'I'|$80, ' '|$80, 'C'|$80 - .byte 'O'|$80, 'L'|$80, 'L'|$80, 'A'|$80, ' '|$80, 'O'|$80 - .byte 'T'|$80, ' '|$80, 'D'|$80, 'E'|$80, 'L'|$80, 'I'|$80 - .byte 'A'|$80, 'F'|$80, $8D + scrcode $0D, "TPURRETNI COLLA OT DELIAF", $0D .endif msglen = * - errmsg diff --git a/libsrc/apple2/joy/a2.stdjoy.s b/libsrc/apple2/joy/a2.stdjoy.s index e4097e043..558013910 100644 --- a/libsrc/apple2/joy/a2.stdjoy.s +++ b/libsrc/apple2/joy/a2.stdjoy.s @@ -19,13 +19,8 @@ ; Constants -THRESHOLD = 20 ; Deviation from center triggering movement - -; ------------------------------------------------------------------------ - -; ROM entry points - -PREAD := $FB1E ; Read paddle in X, return AD conv. value in Y +LOWER_THRESHOLD = 05 +UPPER_THRESHOLD = 85 ; ------------------------------------------------------------------------ @@ -44,36 +39,38 @@ PREAD := $FB1E ; Read paddle in X, return AD conv. value in Y ; Library reference - .addr $0000 - -; Button state masks (8 values) - - .byte $10 - .byte $20 - .byte $04 - .byte $08 - .byte $40 - .byte $80 - .byte $00 ; Future expansion - .byte $00 ; Future expansion +libref: .addr $0000 ; Jump table .addr INSTALL .addr UNINSTALL .addr COUNT - .addr READJOY - .addr 0 ; IRQ not used + .addr READ ; ------------------------------------------------------------------------ - .code + .bss + +ostype: .res 1 +value0: .res 1 +value1: .res 1 + +; ------------------------------------------------------------------------ + + .data ; INSTALL routine. Is called after the driver is loaded into memory. If ; possible, check if the hardware is present and determine the amount of ; memory available. ; Must return an JOY_ERR_xx code in a/x. INSTALL: + lda libref + ldx libref+1 + sta gettype+1 + stx gettype+2 +gettype:jsr $0000 + sta ostype lda #<JOY_ERR_OK ldx #>JOY_ERR_OK ; Fall through @@ -83,57 +80,94 @@ INSTALL: UNINSTALL: rts -; COUNT: Return the total number of available joysticks in a/x. +; ------------------------------------------------------------------------ + + .code + +; COUNT routine. Return the total number of available joysticks in a/x. COUNT: - lda #$02 ; Number of joysticks we support + ldx #$02 + bit ostype + bvc noiic ; Not $4x + dex ; Only one joystick for the //c +noiic: txa ; Number of joysticks we support ldx #$00 rts -; READ: Read a particular joystick passed in A. -READJOY: - bit $C082 ; Switch in ROM - and #$01 ; Restrict joystick number - - ; Read horizontal paddle +; READ routine. Read a particular joystick passed in A. +READ: asl ; Joystick number -> paddle number - tax ; Set paddle number (0, 2) - jsr PREAD ; Read paddle value - lda #$00 ; 0 0 0 0 0 0 0 0 - cpy #127 - THRESHOLD - ror ; !LEFT 0 0 0 0 0 0 0 - cpy #127 + THRESHOLD - ror ; RIGHT !LEFT 0 0 0 0 0 0 + tax + ldy #$00 + sty value0 + sty value1 - ; Read vertical paddle + ; If IIgs -> set speed to normal + bit ostype + bpl nogs1 ; Not $8x + lda CYAREG pha - inx ; Set paddle number (1, 3) - jsr PREAD ; Read paddle value + and #%01111111 + sta CYAREG + + ; Read both paddles simultaneously according to: + ; Apple IIe Technote #6, The Apple II Paddle Circuits +nogs1: lda PTRIG ; Trigger paddles +loop: lda PADDL0,x ; Read paddle (0 or 2) + bmi set0 ; Cycles: 2 3 + nop ; Cycles: 2 + bpl nop0 ; Cycles: 3 +set0: sty value0 ; Cycles: 4 +nop0: ; - - + ; Cycles: 7 7 + lda PADDL1,x ; Read paddle (1 or 3) + bmi set1 ; Cycles: 2 3 + nop ; Cycles: 2 + bpl nop1 ; Cycles: 3 +set1: sty value1 ; Cycles: 4 +nop1: ; - - + ; Cycles: 7 7 + iny + cpy #UPPER_THRESHOLD+1 + bne loop + + ; If IIgs -> restore speed + bit ostype + bpl nogs2 ; Not $8x pla - cpy #127 - THRESHOLD + sta CYAREG + + ; Transform paddle readings to directions +nogs2: lda #$00 ; 0 0 0 0 0 0 0 0 + ldy value0 + cpy #LOWER_THRESHOLD + ror ; !LEFT 0 0 0 0 0 0 0 + cpy #UPPER_THRESHOLD + ror ; RIGHT !LEFT 0 0 0 0 0 0 + ldy value1 + cpy #LOWER_THRESHOLD ror ; !UP RIGHT !LEFT 0 0 0 0 0 - cpy #127 + THRESHOLD + cpy #UPPER_THRESHOLD ror ; DOWN !UP RIGHT !LEFT 0 0 0 0 ; Read primary button tay - lda BUTN0-1,x ; Check button (1, 3) + lda BUTN0,x ; Check button (0 or 2) asl tya - ror ; FIRE DOWN !UP RIGHT !LEFT 0 0 0 + ror ; BTN_1 DOWN !UP RIGHT !LEFT 0 0 0 ; Read secondary button tay - inx txa - and #$03 ; IIgs has fourth button at TAPEIN + eor #$02 ; IIgs has fourth button at TAPEIN tax - lda BUTN0-1,x ; Check button (2, 0) + lda TAPEIN,x ; Check button (1 or 3) asl tya - ror ; FIRE2 FIRE DOWN !UP RIGHT !LEFT 0 0 + ror ; BTN_2 BTN_1 DOWN !UP RIGHT !LEFT 0 0 ; Finalize - eor #%00010100 ; FIRE2 FIRE DOWN UP RIGHT LEFT 0 0 + eor #%00010100 ; BTN_2 BTN_1 DOWN UP RIGHT LEFT 0 0 ldx #$00 - bit $C080 ; Switch in LC bank 2 for R/O rts diff --git a/libsrc/apple2/joyref.s b/libsrc/apple2/joyref.s new file mode 100644 index 000000000..8a9609bd4 --- /dev/null +++ b/libsrc/apple2/joyref.s @@ -0,0 +1,8 @@ +; +; Oliver Schmidt, 2020-06-04 +; + + .export joy_libref + .import _get_ostype + +joy_libref := _get_ostype diff --git a/libsrc/apple2/libref.s b/libsrc/apple2/libref.s index fb22515bd..8aa54abab 100644 --- a/libsrc/apple2/libref.s +++ b/libsrc/apple2/libref.s @@ -2,11 +2,10 @@ ; Oliver Schmidt, 2013-05-31 ; - .export em_libref, joy_libref, mouse_libref, ser_libref, tgi_libref + .export em_libref, mouse_libref, ser_libref, tgi_libref .import _exit em_libref := _exit -joy_libref := _exit mouse_libref := _exit ser_libref := _exit tgi_libref := _exit diff --git a/libsrc/apple2/lseek.s b/libsrc/apple2/lseek.s index 73f4136be..b6c31515e 100644 --- a/libsrc/apple2/lseek.s +++ b/libsrc/apple2/lseek.s @@ -5,7 +5,8 @@ ; .export _lseek - .import popax + .import popax, popptr1 + .macpack cpu .include "zeropage.inc" .include "errno.inc" @@ -18,11 +19,10 @@ _lseek: stx tmp2 ; Get and save offset - jsr popax - sta ptr1 - stx ptr1+1 + jsr popptr1 jsr popax sta ptr2 + stx ptr2+1 ; Get and process fd jsr popax @@ -79,6 +79,9 @@ seek_common: tya adc ptr2 sta mliparam + MLI::MARK::POSITION+2 + lda #$00 + adc ptr2+1 + bne einval ; less than 0 or greater than 2^24 - 1 ; Set file pointer lda #SET_MARK_CALL @@ -86,13 +89,31 @@ seek_common: jsr callmli bcs oserr + ; Need to return the position in EAX +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz sreg+1 +.else + lda #$00 + sta sreg+1 +.endif + lda mliparam + MLI::MARK::POSITION+2 + sta sreg + ldx mliparam + MLI::MARK::POSITION+1 + lda mliparam + MLI::MARK::POSITION + rts ; Load errno code einval: lda #EINVAL ; Set __errno -errno: jmp __directerrno +errno: jsr __directerrno ; leaves -1 in AX + stx sreg ; extend return value to 32 bits + stx sreg+1 + rts ; Set __oserror -oserr: jmp __mappederrno +oserr: jsr __mappederrno ; leaves -1 in AX + stx sreg ; extend return value to 32 bits + stx sreg+1 + rts diff --git a/libsrc/apple2/mainargs.s b/libsrc/apple2/mainargs.s index 2e809dc56..de2f385f1 100644 --- a/libsrc/apple2/mainargs.s +++ b/libsrc/apple2/mainargs.s @@ -46,10 +46,10 @@ FNAM_LEN = $280 FNAM = $281 REM = $B2 ; BASIC token-code -; Get possible command-line arguments. Goes into the special INIT segment, +; Get possible command-line arguments. Goes into the special ONCE segment, ; which may be reused after the startup code is run. - .segment "INIT" + .segment "ONCE" initmainargs: @@ -83,6 +83,7 @@ initmainargs: ; destroyed. ldy #$00 + sty buffer + BUF_LEN - 1 : lda BASIC_BUF,x sta buffer,y inx @@ -166,14 +167,13 @@ done: lda #<argv stx __argv+1 rts -; This array is zeroed before initmainargs is called. -; char* argv[MAXARGS+1] = {FNAM}; - .data +; char* argv[MAXARGS+1] = {FNAM}; + argv: .addr FNAM .res MAXARGS * 2 - .bss + .segment "INIT" buffer: .res BUF_LEN diff --git a/libsrc/apple2/mcbdefault.s b/libsrc/apple2/mcbdefault.s index cada4173a..556a9d8fb 100644 --- a/libsrc/apple2/mcbdefault.s +++ b/libsrc/apple2/mcbdefault.s @@ -8,13 +8,13 @@ ; .export _mouse_def_callbacks - + .include "apple2.inc" ; ------------------------------------------------------------------------ .bss - + backup: .res 1 visible:.res 1 @@ -36,7 +36,7 @@ _mouse_def_callbacks: .data .ifdef __APPLE2ENH__ -cursor = 'B' ; MouseText character +cursor = $42 ; Pointer MouseText character .else cursor = '+' | $40 ; Flashing crosshair .endif diff --git a/libsrc/apple2/mli.s b/libsrc/apple2/mli.s index 3e4771400..891cbaa6b 100644 --- a/libsrc/apple2/mli.s +++ b/libsrc/apple2/mli.s @@ -6,6 +6,7 @@ .import __dos_type + .include "apple2.inc" .include "mli.inc" .bss @@ -23,10 +24,24 @@ callmli: lda __dos_type beq oserr - ; Call MLI and return + ; Save random counter + lda RNDL + pha + lda RNDH + pha + + ; Call MLI jsr $BF00 ; MLI call entry point call: .byte $00 .addr mliparam + + ; Restore random counter and return + tax + pla + sta RNDH + pla + sta RNDL + txa rts ; Load oserror code and return diff --git a/libsrc/apple2/mou/a2.stdmou.s b/libsrc/apple2/mou/a2.stdmou.s index c3d10f057..dfc69a942 100644 --- a/libsrc/apple2/mou/a2.stdmou.s +++ b/libsrc/apple2/mou/a2.stdmou.s @@ -152,7 +152,7 @@ next: inc ptr1+1 sta xparam+1 sta jump+2 - ; Disable interrupts now because setting the slot number makes + ; Disable interrupts now because setting the slot number makes ; the IRQ handler (maybe called due to some non-mouse IRQ) try ; calling the firmware which isn't correctly set up yet sei @@ -167,7 +167,7 @@ next: inc ptr1+1 asl asl sta yparam+1 - + ; The AppleMouse II Card needs the ROM switched in ; to be able to detect an Apple //e and use RDVBL bit $C082 @@ -175,7 +175,7 @@ next: inc ptr1+1 ; Reset mouse hardware ldx #INITMOUSE jsr firmware - + ; Switch in LC bank 2 for R/O bit $C080 @@ -236,12 +236,12 @@ UNINSTALL: SETBOX: sta ptr1 stx ptr1+1 - + ; Set x clamps ldx #$00 ldy #MOUSE_BOX::MINX jsr :+ - + ; Set y clamps ldx #$01 ldy #MOUSE_BOX::MINY @@ -257,7 +257,7 @@ SETBOX: sta pos1_lo iny lda (ptr1),y - sta box,y + sta box,y sta pos1_hi ; Skip one word @@ -267,11 +267,11 @@ SETBOX: ; Set high clamp iny lda (ptr1),y - sta box,y + sta box,y sta pos2_lo iny lda (ptr1),y - sta box,y + sta box,y sta pos2_hi txa diff --git a/libsrc/apple2/open.s b/libsrc/apple2/open.s index b1686df70..e47722973 100644 --- a/libsrc/apple2/open.s +++ b/libsrc/apple2/open.s @@ -19,7 +19,7 @@ .include "mli.inc" .include "filedes.inc" - .segment "INIT" + .segment "ONCE" raisefilelevel: ; Raise file level diff --git a/libsrc/apple2/opendir.c b/libsrc/apple2/opendir.c index 040593118..1144d8511 100644 --- a/libsrc/apple2/opendir.c +++ b/libsrc/apple2/opendir.c @@ -57,7 +57,7 @@ extern char _cwd[FILENAME_MAX]; -DIR* __fastcall__ opendir (register const char* name) +DIR* __fastcall__ opendir (register const char* name) { register DIR* dir; diff --git a/libsrc/apple2/oserror.s b/libsrc/apple2/oserror.s index f16aa4960..ae3efcacc 100644 --- a/libsrc/apple2/oserror.s +++ b/libsrc/apple2/oserror.s @@ -45,7 +45,7 @@ ErrTab: .byte $01, ENOSYS ; Bad system call number .byte $47, EEXIST ; Duplicate filename .byte $48, ENOSPC ; Volume full .byte $49, ENOSPC ; Volume directory full -; .byte $4A, EUNKNOWN ; Incompatible file format + .byte $4A, ENOEXEC ; Incompatible file format .byte $4B, EINVAL ; Unsupported storage_type ; .byte $4C, EUNKNOWN ; End of file encountered .byte $4D, ESPIPE ; Position out of range diff --git a/libsrc/apple2/read.s b/libsrc/apple2/read.s index ef994d6aa..99c189cbd 100644 --- a/libsrc/apple2/read.s +++ b/libsrc/apple2/read.s @@ -16,14 +16,17 @@ .include "filedes.inc" .include "apple2.inc" - .segment "INIT" + .segment "ONCE" initprompt: - ; Set prompt <> ']' to let DOS 3.3 know that we're - ; not in Applesoft immediate mode and thus keep it - ; from scanning our device I/O for DOS commands. + ; Set prompt <> ']' and currently executed Applesoft + ; line number hibyte <> $FF to let DOS 3.3 (at $A65E) + ; know that we're not in Applesoft immediate mode and + ; thus keep it from scanning our device I/O for DOS + ; commands. lda #$80 ; Same value used at $D52C sta PROMPT + sta CURLIN+1 ; Any value <> $FF will do rts .code diff --git a/libsrc/apple2/reboot.s b/libsrc/apple2/reboot.s index 8ee1ba067..e674ea1bc 100644 --- a/libsrc/apple2/reboot.s +++ b/libsrc/apple2/reboot.s @@ -10,7 +10,7 @@ _rebootafterexit := return - .segment "INIT" + .segment "ONCE" initreboot: ; Quit to PWRUP diff --git a/libsrc/apple2/rwcommon.s b/libsrc/apple2/rwcommon.s index 3180a875d..e5fd9ae90 100644 --- a/libsrc/apple2/rwcommon.s +++ b/libsrc/apple2/rwcommon.s @@ -3,7 +3,7 @@ ; .export rwprolog, rwcommon, rwepilog - .import popax + .import popax, popptr1 .include "zeropage.inc" .include "errno.inc" @@ -17,9 +17,7 @@ rwprolog: stx ptr2+1 ; Get and save buf - jsr popax - sta ptr1 - stx ptr1+1 + jsr popptr1 ; Get and process fd jsr popax diff --git a/libsrc/apple2/ser/a2.ssc.s b/libsrc/apple2/ser/a2.ssc.s index d5c567165..a32110ef2 100644 --- a/libsrc/apple2/ser/a2.ssc.s +++ b/libsrc/apple2/ser/a2.ssc.s @@ -44,15 +44,15 @@ .addr $0000 ; Jump table - .addr INSTALL - .addr UNINSTALL - .addr OPEN - .addr CLOSE - .addr GET - .addr PUT - .addr STATUS - .addr IOCTL - .addr IRQ + .addr SER_INSTALL + .addr SER_UNINSTALL + .addr SER_OPEN + .addr SER_CLOSE + .addr SER_GET + .addr SER_PUT + .addr SER_STATUS + .addr SER_IOCTL + .addr SER_IRQ ;---------------------------------------------------------------------------- ; I/O definitions @@ -141,23 +141,23 @@ IdTableLen = * - IdValTable .code ;---------------------------------------------------------------------------- -; INSTALL: Is called after the driver is loaded into memory. If possible, +; SER_INSTALL: Is called after the driver is loaded into memory. If possible, ; check if the hardware is present. Must return an SER_ERR_xx code in a/x. ; ; Since we don't have to manage the IRQ vector on the Apple II, this is ; actually the same as: ; -; UNINSTALL: Is called before the driver is removed from memory. +; SER_UNINSTALL: Is called before the driver is removed from memory. ; No return code required (the driver is removed from memory on return). ; ; and: ; -; CLOSE: Close the port and disable interrupts. Called without parameters. +; SER_CLOSE: Close the port and disable interrupts. Called without parameters. ; Must return an SER_ERR_xx code in a/x. -INSTALL: -UNINSTALL: -CLOSE: +SER_INSTALL: +SER_UNINSTALL: +SER_CLOSE: ldx Index ; Check for open port beq :+ @@ -172,16 +172,16 @@ CLOSE: rts ;---------------------------------------------------------------------------- -; OPEN: A pointer to a ser_params structure is passed in ptr1. +; SER_OPEN: A pointer to a ser_params structure is passed in ptr1. ; Must return an SER_ERR_xx code in a/x. -OPEN: +SER_OPEN: ldx #<$C000 stx ptr2 lda #>$C000 ora Slot sta ptr2+1 - + ; Check Pascal 1.1 Firmware Protocol ID bytes : ldy IdOfsTable,x lda IdValTable,x @@ -190,7 +190,7 @@ OPEN: inx cpx #IdTableLen bcc :- - + ; Convert slot to I/O register index lda Slot asl @@ -273,11 +273,11 @@ InvBaud:lda #<SER_ERR_BAUD_UNAVAIL rts ;---------------------------------------------------------------------------- -; GET: Will fetch a character from the receive buffer and store it into the +; SER_GET: Will fetch a character from the receive buffer and store it into the ; variable pointed to by ptr1. If no data is available, SER_ERR_NO_DATA is ; returned. -GET: +SER_GET: ldx Index ldy SendFreeCnt ; Send data if necessary iny ; Y == $FF? @@ -315,10 +315,10 @@ GET: rts ;---------------------------------------------------------------------------- -; PUT: Output character in A. +; SER_PUT: Output character in A. ; Must return an SER_ERR_xx code in a/x. -PUT: +SER_PUT: ldx Index ; Try to send @@ -348,10 +348,10 @@ PUT: rts ;---------------------------------------------------------------------------- -; STATUS: Return the status in the variable pointed to by ptr1. +; SER_STATUS: Return the status in the variable pointed to by ptr1. ; Must return an SER_ERR_xx code in a/x. -STATUS: +SER_STATUS: ldx Index lda ACIA_STATUS,x ldx #$00 @@ -360,11 +360,11 @@ STATUS: rts ;---------------------------------------------------------------------------- -; IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl +; SER_IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl ; specific data in ptr1, and the ioctl code in A. ; Must return an SER_ERR_xx code in a/x. -IOCTL: +SER_IOCTL: ; Check data msb and code to be 0 ora ptr1+1 bne :+ @@ -384,12 +384,12 @@ IOCTL: rts ;---------------------------------------------------------------------------- -; IRQ: Called from the builtin runtime IRQ handler as a subroutine. All +; SER_IRQ: Called from the builtin runtime IRQ handler as a subroutine. All ; registers are already saved, no parameters are passed, but the carry flag ; is clear on entry. The routine must return with carry set if the interrupt ; was handled, otherwise with carry clear. -IRQ: +SER_IRQ: ldx Index ; Check for open port beq Done lda ACIA_STATUS,x ; Check ACIA status for receive interrupt @@ -431,7 +431,7 @@ Again: lda SendFreeCnt lda ACIA_STATUS,x and #$10 bne Send - bit tmp1 ; Keep trying if must try hard + bit tmp1 ; Keep trying if must try hard bmi Again Quit: rts diff --git a/libsrc/apple2/settime.s b/libsrc/apple2/settime.s new file mode 100644 index 000000000..f722f6f40 --- /dev/null +++ b/libsrc/apple2/settime.s @@ -0,0 +1,71 @@ +; +; Oliver Schmidt, 15.08.2018 +; +; int __fastcall__ clock_settime (clockid_t clk_id, const struct timespec *tp); +; + + .import __dos_type + .import incsp1, return0 + + .include "time.inc" + .include "zeropage.inc" + .include "errno.inc" + .include "mli.inc" + +_clock_settime: + + ; Cleanup stack + jsr incsp1 ; Preserves A + + ; Check for ProDOS 8 + ldy __dos_type + beq enosys + + ; Check for realtme clock + tay ; Save A + lda MACHID + lsr a + bcs erange + tya ; Restore A + + ; Get tm + .assert timespec::tv_sec = 0, error + jsr _localtime + sta ptr1 + stx ptr1+1 + + ; Set date + ldy #tm::tm_mon + lda (ptr1),y + clc + adc #$01 ; Move [0..11] to [1..12] + asl + asl + asl + asl + asl + php ; Save month msb + ldy #tm::tm_mday + ora (ptr1),y + sta DATELO + ldy #tm::tm_year + lda (ptr1),y + cmp #100 ; Year since 1900 < 100? + bcc :+ ; Yes, leave alone + sbc #100 ; Move 20xx to 19xx +: plp ; Restore month msb + rol + sta DATELO+1 + + ; Return success + jmp return0 + + ; Load errno code +enosys: lda #ENOSYS + bne errno ; Always + + ; Load errno code +erange: lda #ERANGE + + ; Set __errno +errno: jmp __directerrno diff --git a/libsrc/apple2/systime.s b/libsrc/apple2/systime.s deleted file mode 100644 index 9bf4fe904..000000000 --- a/libsrc/apple2/systime.s +++ /dev/null @@ -1,63 +0,0 @@ -; -; Oliver Schmidt, 22.08.2006 -; -; time_t _systime (void); -; /* Similar to time(), but: -; ** - Is not ISO C -; ** - Does not take the additional pointer -; ** - Does not set errno when returning -1 -; */ -; - - .include "time.inc" - .include "zeropage.inc" - .include "mli.inc" - -__systime: - ; Update time - lda #GET_TIME_CALL - ldx #GET_TIME_COUNT - jsr callmli - bcs err - - lda DATELO+1 - lsr - php ; Save month msb - cmp #70 ; Year < 70? - bcs :+ ; No, leave alone - adc #100 ; Move 19xx to 20xx -: sta TM + tm::tm_year - lda DATELO - tax ; Save day - plp ; Restore month msb - ror - lsr - lsr - lsr - lsr - beq err ; [1..12] allows for validity check - tay - dey ; Move [1..12] to [0..11] - sty TM + tm::tm_mon - txa ; Restore day - and #%00011111 - sta TM + tm::tm_mday - - lda TIMELO+1 - sta TM + tm::tm_hour - lda TIMELO - sta TM + tm::tm_min - - lda #<TM - ldx #>TM - jmp _mktime - -err: lda #$FF - tax - sta sreg - sta sreg+1 - rts ; Return -1 - - .bss - -TM: .tag tm diff --git a/libsrc/apple2/targetutil/Makefile.inc b/libsrc/apple2/targetutil/Makefile.inc index 105a5324f..b53139a3d 100644 --- a/libsrc/apple2/targetutil/Makefile.inc +++ b/libsrc/apple2/targetutil/Makefile.inc @@ -1,9 +1,17 @@ -DEPS += ../libwrk/$(TARGET)/loader.d +DEPS += ../libwrk/$(TARGET)/convert.d \ + ../libwrk/$(TARGET)/loader.d + +../libwrk/$(TARGET)/convert.o: $(SRCDIR)/targetutil/convert.c | ../libwrk/$(TARGET) + $(COMPILE_recipe) ../libwrk/$(TARGET)/loader.o: $(SRCDIR)/targetutil/loader.s | ../libwrk/$(TARGET) $(ASSEMBLE_recipe) -../targetutil/loader.system: ../libwrk/$(TARGET)/loader.o $(SRCDIR)/targetutil/loader.cfg | ../targetutil +../target/$(TARGET)/util/convert.system: ../libwrk/$(TARGET)/convert.o ../lib/$(TARGET).lib | ../target/$(TARGET)/util + $(LD65) -o $@ -C $(TARGET)-system.cfg $^ + +../target/$(TARGET)/util/loader.system: ../libwrk/$(TARGET)/loader.o $(SRCDIR)/targetutil/loader.cfg | ../target/$(TARGET)/util $(LD65) -o $@ -C $(filter %.cfg,$^) $(filter-out %.cfg,$^) -$(TARGET): ../targetutil/loader.system +$(TARGET): ../target/$(TARGET)/util/convert.system \ + ../target/$(TARGET)/util/loader.system diff --git a/libsrc/geos-apple/targetutil/convert.c b/libsrc/apple2/targetutil/convert.c similarity index 100% rename from libsrc/geos-apple/targetutil/convert.c rename to libsrc/apple2/targetutil/convert.c diff --git a/libsrc/apple2/textframe.s b/libsrc/apple2/textframe.s deleted file mode 100644 index d5e9b80d7..000000000 --- a/libsrc/apple2/textframe.s +++ /dev/null @@ -1,108 +0,0 @@ -; -; Oliver Schmidt, 10.03.2004 -; -; void __fastcall__ textframexy (unsigned char x, unsigned char y, -; unsigned char width, unsigned char height, -; unsigned char style); -; void __fastcall__ textframe (unsigned char width, unsigned char height, -; unsigned char style); -; - .ifdef __APPLE2ENH__ - - .export _textframexy, _textframe - .import popa, pusha, _gotoxy - .import chlinedirect, cvlinedirect - - .include "zeropage.inc" - .include "apple2.inc" - -WIDTH = tmp2 -HEIGHT = tmp3 -XORIGIN = tmp4 -YORIGIN = ptr1 - -_textframexy: - sec - bra :+ - -_textframe: - clc -: ldx INVFLG - phx ; Save character display mode - ldx #$FF - stx INVFLG ; Set normal character display mode - pha ; Save index - jsr popa ; Get height - sta HEIGHT - jsr popa ; Get width - sta WIDTH - lda CH - ldx CV - bcc noxy - jsr popa ; Get y - tax - jsr popa ; Get x -noxy: sta XORIGIN - stx YORIGIN - plx ; Restore index -loop: lda XOFFS,x - clc - bpl :+ ; Relative to left edge? - adc WIDTH -: adc XORIGIN - jsr pusha - lda YOFFS,x - clc - bpl :+ ; Relative to top? - adc HEIGHT -: adc YORIGIN - jsr _gotoxy ; Call this one, will pop params - txa - tay - lsr ; Get bit 0 (vline) into carry - lda LENGTH,x - phx ; Save index - ldx CHAR,y - bcc hline - clc - adc HEIGHT - jsr cvlinedirect - bra next -hline: adc WIDTH - jsr chlinedirect -next: plx ; Restore index - inx - txa - and #$03 ; Mask style - bne loop - pla - sta INVFLG ; Restore character display mode - rts - - .rodata - -; 2 styles with 4 lines each make up 8 entries per table -; - even entry numbers mean horizontal lines -; - odd entry numbers mean vertical lines - -; x offset for the line starting point -; - a positive value means relative to the frame left edge -; - a negative value menas relative to the frame right edge -XOFFS: .byte 0, 0, 0, <-2, 1, 0, 1, <-2 - -; y offset for the line starting point -; - a positive value means relative to the frame top -; - a negative value menas relative to the frame bottom -YOFFS: .byte 0, 1, <-2, 1, 0, 0, <-2, 0 - -; length of the line relative to the frame size -; - a negative value for hlines means shorter than the width -; - a negative value for vlines menas shorter than the height -LENGTH: .byte 0, <-2, 0, <-2, <-2, 0, <-2, 0 - -; character to use for drawing the line -; - hibit set means normal printable character -; - hibit clear means MouseText character -CHAR: .byte '_'|$80, '_', 'L', 'Z', 'L', 'Z', '_'|$80, '_' - - .endif ; __APPLE2ENH__ diff --git a/libsrc/apple2/tgi/a2.hi.s b/libsrc/apple2/tgi/a2.hi.s index 18f5724b5..aeb24f6be 100644 --- a/libsrc/apple2/tgi/a2.hi.s +++ b/libsrc/apple2/tgi/a2.hi.s @@ -115,7 +115,6 @@ pages: .byte 2 ; Number of screens available .addr BAR .addr TEXTSTYLE .addr OUTTEXT - .addr 0 ; IRQ entry is unused ; ------------------------------------------------------------------------ @@ -176,6 +175,10 @@ INIT: ; Switch into graphics mode bit MIXCLR bit HIRES + .ifdef __APPLE2ENH__ + sta IOUDISON + bit DHIRESOFF + .endif bit TXTCLR ; Beagle Bros Shape Mechanic fonts don't diff --git a/libsrc/apple2/tgi/a2.lo.s b/libsrc/apple2/tgi/a2.lo.s index 045b0044f..6d1c6aa4a 100644 --- a/libsrc/apple2/tgi/a2.lo.s +++ b/libsrc/apple2/tgi/a2.lo.s @@ -58,8 +58,8 @@ Y2 := ptr4 .word 48 ; Y resolution .byte 16 ; Number of drawing colors .byte 1 ; Number of screens available - .byte 8 ; System font X size - .byte 8 ; System font Y size + .byte 0 ; System font X size + .byte 0 ; System font Y size .word $0198 ; Aspect ratio (based on 4/3 display) .byte 0 ; TGI driver flags @@ -85,7 +85,6 @@ Y2 := ptr4 .addr BAR .addr TEXTSTYLE .addr OUTTEXT - .addr 0 ; IRQ entry is unused ; ------------------------------------------------------------------------ @@ -127,6 +126,10 @@ INIT: bit $C082 ; Switch in ROM jsr SETGR bit MIXCLR + .ifdef __APPLE2ENH__ + sta IOUDISON + bit DHIRESOFF + .endif bit $C080 ; Switch in LC bank 2 for R/O ; Done, reset the error code diff --git a/libsrc/apple2/videomode.s b/libsrc/apple2/videomode.s index 1da997472..13151a48a 100644 --- a/libsrc/apple2/videomode.s +++ b/libsrc/apple2/videomode.s @@ -16,7 +16,7 @@ _videomode: ; Get and save current videomode flag bit RD80VID php - + ; If we are in 80 column mode then the 80 column firmware is ; known to be active so we can just print the ctrl-char code ; (even if this only means staying in the current videomode) @@ -29,18 +29,18 @@ _videomode: ; current state of the 80 column firmware nor want to fix it : cmp #$11 ; Ctrl-char code for 40 cols beq done - + ; If we are in 40 column mode and want to set 80 column mode ; then we first presume the 80 column firmware being already ; active and print the ctrl-char code (this causes a garbage ; char to be printed on the screen if isn't already active) jsr COUT - + ; If we successfully switched to 80 column mode then the 80 ; column firmware was in fact already active and we're done bit RD80VID bmi done - + ; The 80 column firmware isn't already active so we need to ; initialize it - causing the screen to be cleared and thus ; the garbage char printed above to be erased (but for some @@ -56,13 +56,13 @@ _videomode: ; Switch in LC bank 2 for R/O bit $C080 - + ; Return ctrl-char code for setting previous ; videomode using the saved videomode flag done: lda #$11 ; Ctrl-char code for 40 cols plp bpl :+ - lda #$12 ; Ctrl-char code for 80 cols + inc a ; Ctrl-char code for 80 cols : rts ; X was preserved all the way .endif ; __APPLE2ENH__ diff --git a/libsrc/apple2/waitvsync.s b/libsrc/apple2/waitvsync.s new file mode 100644 index 000000000..a4ab5ebb3 --- /dev/null +++ b/libsrc/apple2/waitvsync.s @@ -0,0 +1,60 @@ +; +; Oliver Schmidt, 2020-06-14 +; +; void waitvsync (void); +; + .ifdef __APPLE2ENH__ + + .constructor initvsync + .export _waitvsync + .import _get_ostype + + .include "apple2.inc" + + .segment "ONCE" + +initvsync: + jsr _get_ostype + sta ostype + rts + + .code + +_waitvsync: + bit ostype + bmi iigs ; $8x + bvs iic ; $4x + +: bit RDVBLBAR + bpl :- ; Blanking +: bit RDVBLBAR + bmi :- ; Drawing + rts + + ; Apple IIgs TechNote #40, VBL Signal +iigs: bit RDVBLBAR + bmi iigs ; Blanking +: bit RDVBLBAR + bpl :- ; Drawing + rts + + ; Apple IIc TechNote #9, Detecting VBL +iic: sei + sta IOUDISOFF + lda RDVBLMSK + bit ENVBL + bit PTRIG ; Reset VBL interrupt flag +: bit RDVBLBAR + bpl :- + asl + bcs :+ ; VBL interrupts were already enabled + bit DISVBL +: sta IOUDISON ; IIc Tech Ref Man: The firmware normally leaves IOUDIS on. + cli + rts + + .segment "INIT" + +ostype: .res 1 + + .endif ; __APPLE2ENH__ diff --git a/libsrc/apple2/write.s b/libsrc/apple2/write.s index 21f4a45a4..d9dd73ca9 100644 --- a/libsrc/apple2/write.s +++ b/libsrc/apple2/write.s @@ -111,4 +111,4 @@ errno: jmp __directerrno ; Set __oserror oserr: jmp __mappederrno - + diff --git a/libsrc/atari/color.s b/libsrc/atari/bgcolor.s similarity index 54% rename from libsrc/atari/color.s rename to libsrc/atari/bgcolor.s index 57d0036c9..928dfff9a 100644 --- a/libsrc/atari/color.s +++ b/libsrc/atari/bgcolor.s @@ -1,15 +1,12 @@ ; -; Christian Groessler, 27-Dec-2002 +; Christian Groessler, 02-Apr-2019 ; - .export _textcolor, _bgcolor, _bordercolor - .import return1 + .export _bgcolor .include "atari.inc" -_textcolor = return1 - _bgcolor: ldx COLOR2 ; get old value sta COLOR2 ; set new value @@ -23,12 +20,3 @@ bright: lda #0 txa ldx #0 ; fix X rts - - -_bordercolor: - ldx COLOR4 ; get old value - sta COLOR4 ; set new value - txa - ldx #0 ; fix X - rts - diff --git a/libsrc/atari/bordercolor.s b/libsrc/atari/bordercolor.s new file mode 100644 index 000000000..b519686c5 --- /dev/null +++ b/libsrc/atari/bordercolor.s @@ -0,0 +1,15 @@ +; +; Christian Groessler, 02-Apr-2019 +; + + .export _bordercolor + + .include "atari.inc" + + +_bordercolor: + ldx COLOR4 ; get old value + sta COLOR4 ; set new value + txa + ldx #0 ; fix X + rts diff --git a/libsrc/atari/break.s b/libsrc/atari/break.s index a53ed9803..ae4c8e007 100644 --- a/libsrc/atari/break.s +++ b/libsrc/atari/break.s @@ -1,7 +1,7 @@ ; ; Christian Groessler, 27-Feb-2000 ; -; void set_brk (unsigned Addr); +; void __fastcall__ set_brk (unsigned Addr); ; void reset_brk (void); ; @@ -63,7 +63,7 @@ L1: lda #<brk_handler ; Set the break vector to our routine lda #$00 sta oldvec ; Clear the old vector stx oldvec+1 -@L9: rts +@L9: rts .endproc diff --git a/libsrc/atari/casinit.s b/libsrc/atari/casinit.s index c91989aad..668f34867 100644 --- a/libsrc/atari/casinit.s +++ b/libsrc/atari/casinit.s @@ -13,7 +13,7 @@ .import start .export _cas_init -.segment "INIT" +.segment "ONCE" _cas_init: .ifdef DEBUG diff --git a/libsrc/atari/cclear.s b/libsrc/atari/cclear.s index ceb17aca5..3d3b841cf 100644 --- a/libsrc/atari/cclear.s +++ b/libsrc/atari/cclear.s @@ -6,19 +6,18 @@ ; .export _cclearxy, _cclear - .import popa, _gotoxy, cputdirect + .import gotoxy, cputdirect .importzp tmp1 _cclearxy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length and run into _cclear _cclear: cmp #0 ; Is the length zero? beq L9 ; Jump if done - sta tmp1 + sta tmp1 L1: lda #0 ; Blank - screen code jsr cputdirect ; Direct output dec tmp1 diff --git a/libsrc/atari/cgetc.s b/libsrc/atari/cgetc.s index 2e9ebcb31..f8d938dfb 100644 --- a/libsrc/atari/cgetc.s +++ b/libsrc/atari/cgetc.s @@ -6,9 +6,9 @@ ; .include "atari.inc" - .export _cgetc,setcursor + .export _cgetc + .import setcursor .import KEYBDV_handler - .import cursor,mul40 _cgetc: jsr setcursor @@ -29,43 +29,3 @@ _cgetc: pha rts .endif - -.proc setcursor - - ldy #0 - lda OLDCHR - sta (OLDADR),y - - lda ROWCRS - jsr mul40 - clc - adc SAVMSC ; add start of screen memory - sta OLDADR - txa - adc SAVMSC+1 - sta OLDADR+1 - lda COLCRS - adc OLDADR - sta OLDADR - bcc nc - inc OLDADR+1 -nc: lda (OLDADR),y - sta OLDCHR - - ldx cursor ; current cursor setting as requested by the user - beq off - ldx #0 - beq cont - -off: inx -cont: stx CRSINH ; update system variable - - beq turnon - and #$7f ; clear high bit / inverse flag -finish: sta (OLDADR),y ; update on-screen display - rts - -turnon: ora #$80 ; set high bit / inverse flag - bne finish - -.endproc diff --git a/libsrc/atari/chline.s b/libsrc/atari/chline.s index a096f35a0..f4931dd4f 100644 --- a/libsrc/atari/chline.s +++ b/libsrc/atari/chline.s @@ -6,19 +6,14 @@ ; .export _chlinexy, _chline - .import popa, _gotoxy, cputdirect, setcursor + .import gotoxy, cputdirect, setcursor .importzp tmp1 -.ifdef __ATARI5200__ -CHRCODE = 14 -.else CHRCODE = $12+64 -.endif _chlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length _chline: diff --git a/libsrc/atari/clock.s b/libsrc/atari/clock.s index e04416c18..853870520 100644 --- a/libsrc/atari/clock.s +++ b/libsrc/atari/clock.s @@ -3,7 +3,7 @@ ; originally by Ullrich von Bassewitz and Sidney Cadot ; ; clock_t clock (void); -; unsigned _clocks_per_sec (void); +; clock_t _clocks_per_sec (void); ; .export _clock, __clocks_per_sec @@ -30,8 +30,10 @@ .proc __clocks_per_sec - ldx #$00 ; Clear high byte of return value - lda PAL ; use hw register, PALNTS is only supported on XL/XE ROM + ldx #$00 ; Clear byte 1 of return value + stx sreg ; Clear byte 2 of return value + stx sreg+1 ; Clear byte 3 of return value + lda PAL ; Use hw register, PALNTS is only supported on XL/XE ROM and #$0e bne @NTSC lda #50 diff --git a/libsrc/atari/cputc.s b/libsrc/atari/cputc.s index cd2aefe79..cf66fdacf 100644 --- a/libsrc/atari/cputc.s +++ b/libsrc/atari/cputc.s @@ -1,5 +1,5 @@ ; -; Mark Keates, Christian Groessler +; Mark Keates, Christian Groessler, Piotr Fusik ; ; void cputcxy (unsigned char x, unsigned char y, char c); ; void cputc (char c); @@ -7,7 +7,7 @@ .export _cputcxy, _cputc .export plot, cputdirect, putchar - .import popa, _gotoxy, mul40 + .import gotoxy, _mul40 .importzp tmp4,ptr4 .import _revflag,setcursor @@ -15,8 +15,7 @@ _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C _cputc: @@ -31,16 +30,13 @@ L4: cmp #$0A ; LF cmp #ATEOL ; Atari-EOL? beq newline - tay - rol a - rol a - rol a - rol a - and #3 - tax - tya - and #$9f - ora ataint,x + asl a ; shift out the inverse bit + adc #$c0 ; grab the inverse bit; convert ATASCII to screen code + bpl codeok ; screen code ok? + eor #$40 ; needs correction +codeok: lsr a ; undo the shift + bcc cputdirect + eor #$80 ; restore the inverse bit cputdirect: ; accepts screen code jsr putchar @@ -75,8 +71,7 @@ putchar: sta (OLDADR),y lda ROWCRS - jsr mul40 ; destroys tmp4 - clc + jsr _mul40 ; destroys tmp4, carry is cleared adc SAVMSC ; add start of screen memory sta ptr4 txa @@ -90,6 +85,3 @@ putchar: ldy COLCRS sta (ptr4),y jmp setcursor - - .rodata -ataint: .byte 64,0,32,96 diff --git a/libsrc/atari/crt0.s b/libsrc/atari/crt0.s index 0ea6e390f..381aa699f 100644 --- a/libsrc/atari/crt0.s +++ b/libsrc/atari/crt0.s @@ -9,12 +9,14 @@ ; .export __STARTUP__ : absolute = 1 ; Mark as startup - .export _exit, start + .export _exit, start, excexit, SP_save + .export __LMARGN_save ; original LMARGN setting .import initlib, donelib .import callmain, zerobss .import __RESERVED_MEMORY__ - .import __RAM_START__, __RAM_SIZE__ + .import __MAIN_START__, __MAIN_SIZE__ + .import __LOWCODE_RUN__, __LOWCODE_SIZE__ .ifdef __ATARIXL__ .import __STACKSIZE__ .import sram_init @@ -55,19 +57,19 @@ start: .ifdef __ATARIXL__ - lda #<(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) + lda #<(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) + ldx #>(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) sta sp - lda #>(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) - sta sp+1 + stx sp+1 .else ; Report the memory usage. lda APPMHI + ldx APPMHI+1 sta APPMHI_save ; remember old APPMHI value - lda APPMHI+1 - sta APPMHI_save+1 + stx APPMHI_save+1 sec lda MEMTOP @@ -81,14 +83,10 @@ start: .endif -; Call the module constructors. - - jsr initlib - ; Set the left margin to 0. lda LMARGN - sta LMARGN_save + sta __LMARGN_save ldy #0 sty LMARGN @@ -103,22 +101,26 @@ start: dey ; Set Y to $FF sty CH ; remove keypress which might be in the input buffer +; Call the module constructors. + + jsr initlib + ; Push the command-line arguments; and, call main(). jsr callmain ; Call the module destructors. This is also the exit() entry. -_exit: jsr donelib ; Run module destructors +_exit: ldx SP_save + txs ; Restore stack pointer ; Restore the system stuff. - ldx SP_save - txs ; Restore stack pointer +excexit:jsr donelib ; Run module destructors; 'excexit' is called from the exec routine ; Restore the left margin. - lda LMARGN_save + lda __LMARGN_save sta LMARGN ; Restore the kb mode. @@ -129,9 +131,9 @@ _exit: jsr donelib ; Run module destructors ; Restore APPMHI. lda APPMHI_save + ldx APPMHI_save+1 sta APPMHI - lda APPMHI_save+1 - sta APPMHI+1 + stx APPMHI+1 .ifdef __ATARIXL__ @@ -142,9 +144,9 @@ _exit: jsr donelib ; Run module destructors lda RAMTOP_save sta RAMTOP lda MEMTOP_save + ldx MEMTOP_save+1 sta MEMTOP - lda MEMTOP_save+1 - sta MEMTOP+1 + stx MEMTOP+1 ; Issue a GRAPHICS 0 call (copied'n'pasted from the TGI drivers), in @@ -195,7 +197,15 @@ _exit: jsr donelib ; Run module destructors SP_save: .res 1 SHFLOK_save: .res 1 -LMARGN_save: .res 1 +__LMARGN_save: .res 1 .ifndef __ATARIXL__ APPMHI_save: .res 2 .endif + +; ------------------------------------------------------------------------ + +.segment "LOWCODE" ; have at least one (empty) segment of LOWCODE, so that the next line works even if the program doesn't make use of this segment +.assert (__LOWCODE_RUN__ + __LOWCODE_SIZE__ <= $4000 || __LOWCODE_RUN__ > $7FFF || __LOWCODE_SIZE__ = 0), warning, "'lowcode area' reaches into $4000..$7FFF bank memory window" +; check for LOWBSS_SIZE = 0 not needed since the only file which uses LOWBSS (irq.s) also uses LOWCODE +; check for LOWCODE_RUN > $7FFF is mostly for cartridges, where this segment is loaded high (into cart ROM) +; there is a small chance that if the user loads the program really high, LOWCODE is above $7FFF, but LOWBSS is below -- no warning emitted in this case diff --git a/libsrc/atari/ctype.s b/libsrc/atari/ctype.s index 73553dc15..ca2d3a67f 100644 --- a/libsrc/atari/ctype.s +++ b/libsrc/atari/ctype.s @@ -1,301 +1,156 @@ +; ctype.s ; -; Ullrich von Bassewitz, 02.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems ; -; Character specification table. +; https://cc65.github.io ; -; adapted to Atari by Christian Groessler, June 2000 +; See "LICENSE" file for legal information. ; +; Atari character specification table. +; + + .include "ctypetable.inc" + .export __ctypeidx ; The tables are readonly, put them into the rodata segment .rodata -; The following 256 byte wide table specifies attributes for the isxxx type -; of functions. Doing it by a table means some overhead in space, but it -; has major advantages: -; -; * It is fast. If it were'nt for the slow parameter passing of cc65, one -; could even define macros for the isxxx functions (this is usually -; done on other platforms). -; -; * It is highly portable. The only unportable part is the table itself, -; all real code goes into the common library. -; -; * We save some code in the isxxx functions. -; -; -; Bit assignments: -; -; 0 - Lower case char -; 1 - Upper case char -; 2 - Numeric digit -; 3 - Hex digit (both, lower and upper) -; 4 - Control character -; 5 - The space character itself -; 6 - Other whitespace (that is: '\f', '\n', '\r', '\t' and '\v') -; 7 - Space or tab character +__ctypeidx: + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 0/00 ___heart____, 1/01 ___l_tee____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 2/02 ___ctrl_B___, 3/03 ___ctrl_C___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 4/04 ___r_tee____, 5/05 ___ctrl_E___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 6/06 ___ctrl_F___, 7/07 ___ctrl_G___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 8/08 ___ctrl_H___, 9/09 ___ctrl_I___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 10/0a ___ctrl_J___, 11/0b ___ctrl_K___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 12/0c ___ctrl_L___, 13/0d ___ctrl_M___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 14/0e ___ctrl_N___, 15/0f ___ctrl_O___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 16/10 ____club____, 17/11 ___ctrl_Q___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 18/12 ___h_line___, 19/13 ___ctrl_S___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 20/14 ____ball____, 21/15 ___ctrl_U___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 22/16 ___ctrl_V___, 23/17 ___t_tee____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 24/18 ___b_tee____, 25/19 ___ctrl_Y___ + ct_mix CT_NONE_IDX, CT_CTRL_IDX ; 26/1a ___ctrl_Z___, 27/1b ____ESC_____ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 28/1c ___crsr_up__, 29/1d ___crsr_dn__ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 30/1e ___crsr_lf__, 31/1f ___crsr_rg__ - .export __ctype + ct_mix CT_SPACE_SPACETAB_IDX, CT_NONE_IDX ; 32/20 ___SPACE___, 33/21 _____!_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 34/22 _____"_____, 35/23 _____#_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 36/24 _____$_____, 37/25 _____%_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 38/26 _____&_____, 39/27 _____'_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 40/28 _____(_____, 41/29 _____)_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 42/2a _____*_____, 43/2b _____+_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 44/2c _____,_____, 45/2d _____-_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 46/2e _____._____, 47/2f _____/_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 48/30 _____0_____, 49/31 _____1_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 50/32 _____2_____, 51/33 _____3_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 52/34 _____4_____, 53/35 _____5_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 54/36 _____6_____, 55/37 _____7_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 56/38 _____8_____, 57/39 _____9_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 58/3a _____:_____, 59/3b _____;_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 60/3c _____<_____, 61/3d _____=_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 62/3e _____>_____, 63/3f _____?_____ -__ctype: - .byte $00 ; 0/00 ___heart____ - .byte $00 ; 1/01 ___l_tee____ - .byte $00 ; 2/02 ___ctrl_B___ - .byte $00 ; 3/03 ___ctrl_C___ - .byte $00 ; 4/04 ___r_tee____ - .byte $00 ; 5/05 ___ctrl_E___ - .byte $00 ; 6/06 ___ctrl_F___ - .byte $00 ; 7/07 ___ctrl_G___ - .byte $00 ; 8/08 ___ctrl_H___ - .byte $00 ; 9/09 ___ctrl_I___ - .byte $00 ; 10/0a ___ctrl_J___ - .byte $00 ; 11/0b ___ctrl_K___ - .byte $00 ; 12/0c ___ctrl_L___ - .byte $00 ; 13/0d ___ctrl_M___ - .byte $00 ; 14/0e ___ctrl_N___ - .byte $00 ; 15/0f ___ctrl_O___ - .byte $00 ; 16/10 ____club____ - .byte $00 ; 17/11 ___ctrl_Q___ - .byte $00 ; 18/12 ___h_line___ - .byte $00 ; 19/13 ___ctrl_S___ - .byte $00 ; 20/14 ____ball____ - .byte $00 ; 21/15 ___ctrl_U___ - .byte $00 ; 22/16 ___ctrl_V___ - .byte $00 ; 23/17 ___t_tee____ - .byte $00 ; 24/18 ___b_tee____ - .byte $00 ; 25/19 ___ctrl_Y___ - .byte $00 ; 26/1a ___ctrl_Z___ - .byte $10 ; 27/1b ____ESC_____ - .byte $10 ; 28/1c ___crsr_up__ - .byte $10 ; 29/1d ___crsr_dn__ - .byte $10 ; 30/1e ___crsr_lf__ - .byte $10 ; 31/1f ___crsr_rg__ - .byte $A0 ; 32/20 ___SPACE___ - .byte $00 ; 33/21 _____!_____ - .byte $00 ; 34/22 _____"_____ - .byte $00 ; 35/23 _____#_____ - .byte $00 ; 36/24 _____$_____ - .byte $00 ; 37/25 _____%_____ - .byte $00 ; 38/26 _____&_____ - .byte $00 ; 39/27 _____'_____ - .byte $00 ; 40/28 _____(_____ - .byte $00 ; 41/29 _____)_____ - .byte $00 ; 42/2a _____*_____ - .byte $00 ; 43/2b _____+_____ - .byte $00 ; 44/2c _____,_____ - .byte $00 ; 45/2d _____-_____ - .byte $00 ; 46/2e _____._____ - .byte $00 ; 47/2f _____/_____ - .byte $0C ; 48/30 _____0_____ - .byte $0C ; 49/31 _____1_____ - .byte $0C ; 50/32 _____2_____ - .byte $0C ; 51/33 _____3_____ - .byte $0C ; 52/34 _____4_____ - .byte $0C ; 53/35 _____5_____ - .byte $0C ; 54/36 _____6_____ - .byte $0C ; 55/37 _____7_____ - .byte $0C ; 56/38 _____8_____ - .byte $0C ; 57/39 _____9_____ - .byte $00 ; 58/3a _____:_____ - .byte $00 ; 59/3b _____;_____ - .byte $00 ; 60/3c _____<_____ - .byte $00 ; 61/3d _____=_____ - .byte $00 ; 62/3e _____>_____ - .byte $00 ; 63/3f _____?_____ + ct_mix CT_NONE_IDX, CT_UPPER_XDIGIT_IDX ; 64/40 _____@_____, 65/41 _____A_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 66/42 _____B_____, 67/43 _____C_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 68/44 _____D_____, 69/45 _____E_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_IDX ; 70/46 _____F_____, 71/47 _____G_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 72/48 _____H_____, 73/49 _____I_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 74/4a _____J_____, 75/4b _____K_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 76/4c _____L_____, 77/4d _____M_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 78/4e _____N_____, 79/4f _____O_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 80/50 _____P_____, 81/51 _____Q_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 82/52 _____R_____, 83/53 _____S_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 84/54 _____T_____, 85/55 _____U_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 86/56 _____V_____, 87/57 _____W_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 88/58 _____X_____, 89/59 _____Y_____ + ct_mix CT_UPPER_IDX, CT_NONE_IDX ; 90/5a _____Z_____, 91/5b _____[_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 92/5c _____\_____, 93/5d _____]_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 94/5e _____^_____, 95/5f _UNDERLINE_ - .byte $00 ; 64/40 _____@_____ - .byte $0A ; 65/41 _____A_____ - .byte $0A ; 66/42 _____B_____ - .byte $0A ; 67/43 _____C_____ - .byte $0A ; 68/44 _____D_____ - .byte $0A ; 69/45 _____E_____ - .byte $0A ; 70/46 _____F_____ - .byte $02 ; 71/47 _____G_____ - .byte $02 ; 72/48 _____H_____ - .byte $02 ; 73/49 _____I_____ - .byte $02 ; 74/4a _____J_____ - .byte $02 ; 75/4b _____K_____ - .byte $02 ; 76/4c _____L_____ - .byte $02 ; 77/4d _____M_____ - .byte $02 ; 78/4e _____N_____ - .byte $02 ; 79/4f _____O_____ - .byte $02 ; 80/50 _____P_____ - .byte $02 ; 81/51 _____Q_____ - .byte $02 ; 82/52 _____R_____ - .byte $02 ; 83/53 _____S_____ - .byte $02 ; 84/54 _____T_____ - .byte $02 ; 85/55 _____U_____ - .byte $02 ; 86/56 _____V_____ - .byte $02 ; 87/57 _____W_____ - .byte $02 ; 88/58 _____X_____ - .byte $02 ; 89/59 _____Y_____ - .byte $02 ; 90/5a _____Z_____ - .byte $00 ; 91/5b _____[_____ - .byte $00 ; 92/5c _____\_____ - .byte $00 ; 93/5d _____]_____ - .byte $00 ; 94/5e _____^_____ - .byte $00 ; 95/5f _UNDERLINE_ - .byte $00 ; 96/60 __diamond__ - .byte $09 ; 97/61 _____a_____ - .byte $09 ; 98/62 _____b_____ - .byte $09 ; 99/63 _____c_____ - .byte $09 ; 100/64 _____d_____ - .byte $09 ; 101/65 _____e_____ - .byte $09 ; 102/66 _____f_____ - .byte $01 ; 103/67 _____g_____ - .byte $01 ; 104/68 _____h_____ - .byte $01 ; 105/69 _____i_____ - .byte $01 ; 106/6a _____j_____ - .byte $01 ; 107/6b _____k_____ - .byte $01 ; 108/6c _____l_____ - .byte $01 ; 109/6d _____m_____ - .byte $01 ; 110/6e _____n_____ - .byte $01 ; 111/6f _____o_____ - .byte $01 ; 112/70 _____p_____ - .byte $01 ; 113/71 _____q_____ - .byte $01 ; 114/72 _____r_____ - .byte $01 ; 115/73 _____s_____ - .byte $01 ; 116/74 _____t_____ - .byte $01 ; 117/75 _____u_____ - .byte $01 ; 118/76 _____v_____ - .byte $01 ; 119/77 _____w_____ - .byte $01 ; 120/78 _____x_____ - .byte $01 ; 121/79 _____y_____ - .byte $01 ; 122/7a _____z_____ - .byte $00 ; 123/7b ___spade___ - .byte $00 ; 124/7c __v_line___ - .byte $10 ; 125/7d __CLRSCR___ - .byte $D0 ; 126/7e __backtab__ - .byte $D0 ; 127/7f ____tab____ + ct_mix CT_NONE_IDX, CT_LOWER_XDIGIT_IDX ; 96/60 __diamond__, 97/61 _____a_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 98/62 _____b_____, 99/63 _____c_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 100/64 _____d_____, 101/65 _____e_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_IDX ; 102/66 _____f_____, 103/67 _____g_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 104/68 _____h_____, 105/69 _____i_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 106/6a _____j_____, 107/6b _____k_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 108/6c _____l_____, 109/6d _____m_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 110/6e _____n_____, 111/6f _____o_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 112/70 _____p_____, 113/71 _____q_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 114/72 _____r_____, 115/73 _____s_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 116/74 _____t_____, 117/75 _____u_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 118/76 _____v_____, 119/77 _____w_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 120/78 _____x_____, 121/79 _____y_____ + ct_mix CT_LOWER_IDX, CT_NONE_IDX ; 122/7a _____z_____, 123/7b ___spade___ + ct_mix CT_NONE_IDX, CT_CTRL_IDX ; 124/7c __v_line___, 125/7d __CLRSCR___ + ct_mix CT_CTRL_WS_SPACETAB_IDX, CT_CTRL_WS_SPACETAB_IDX + ; 126/7e __backtab__, 127/7f ____tab____ - .byte $00 ; 128/80 _inv_heart___ - .byte $00 ; 129/81 _inv_l_tee___ - .byte $00 ; 130/82 _inv_ctrl_B__ - .byte $00 ; 131/83 _inv_ctrl_C__ - .byte $00 ; 132/84 _inv_r_tee___ - .byte $00 ; 133/85 _inv_ctrl_E__ - .byte $00 ; 134/86 _inv_ctrl_F__ - .byte $00 ; 135/87 _inv_ctrl_G__ - .byte $00 ; 136/88 _inv_ctrl_H__ - .byte $00 ; 137/89 _inv_ctrl_I__ - .byte $00 ; 138/8a _inv_ctrl_J__ - .byte $00 ; 139/8b _inv_ctrl_K__ - .byte $00 ; 140/8c _inv_ctrl_L__ - .byte $00 ; 141/8d _inv_ctrl_M__ - .byte $00 ; 142/8e _inv_ctrl_N__ - .byte $00 ; 143/8f _inv_ctrl_O__ - .byte $00 ; 144/90 __inv__club__ - .byte $00 ; 145/91 _inv_ctrl_Q__ - .byte $00 ; 146/92 _inv_h_line__ - .byte $00 ; 147/93 _inv_ctrl_S__ - .byte $00 ; 148/94 __inv__ball__ - .byte $00 ; 149/95 _inv_ctrl_U__ - .byte $00 ; 150/96 _inv_ctrl_V__ - .byte $00 ; 151/97 __inv_t_tee__ - .byte $00 ; 152/98 __inv_b_tee__ - .byte $00 ; 153/99 _inv_ctrl_Y__ - .byte $00 ; 154/9a _inv_ctrl_Z__ - .byte $50 ; 155/9b _____EOL_____ - .byte $10 ; 156/9c ___CLRLINE___ - .byte $10 ; 157/9d ___INSLINE___ - .byte $10 ; 158/9e ____CLRTAB___ - .byte $10 ; 159/9f ____INSTAB___ - .byte $A0 ; 160/a0 __inv_SPACE__ - .byte $00 ; 161/a1 ___inv_!_____ - .byte $00 ; 162/a2 ___inv_"_____ - .byte $00 ; 163/a3 ___inv_#_____ - .byte $00 ; 164/a4 ___inv_$_____ - .byte $00 ; 165/a5 ___inv_%_____ - .byte $00 ; 166/a6 ___inv_&_____ - .byte $00 ; 167/a7 ___inv_'_____ - .byte $00 ; 168/a8 ___inv_(_____ - .byte $00 ; 169/a9 ___inv_)_____ - .byte $00 ; 170/aa ___inv_*_____ - .byte $00 ; 171/ab ___inv_+_____ - .byte $00 ; 172/ac ___inv_,_____ - .byte $00 ; 173/ad ___inv_-_____ - .byte $00 ; 174/ae ___inv_._____ - .byte $00 ; 175/af ___inv_/_____ - .byte $0C ; 176/b0 ___inv_0_____ - .byte $0C ; 177/b1 ___inv_1_____ - .byte $0C ; 178/b2 ___inv_2_____ - .byte $0C ; 179/b3 ___inv_3_____ - .byte $0C ; 180/b4 ___inv_4_____ - .byte $0C ; 181/b5 ___inv_5_____ - .byte $0C ; 182/b6 ___inv_6_____ - .byte $0C ; 183/b7 ___inv_7_____ - .byte $0C ; 184/b8 ___inv_8_____ - .byte $0C ; 185/b9 ___inv_9_____ - .byte $00 ; 186/ba ___inv_:_____ - .byte $00 ; 187/bb ___inv_;_____ - .byte $00 ; 188/bc ___inv_<_____ - .byte $00 ; 189/bd ___inv_=_____ - .byte $00 ; 190/be ___inv_>_____ - .byte $00 ; 191/bf ___inv_?_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 128/80 _inv_heart___, 129/81 _inv_l_tee___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 130/82 _inv_ctrl_B__, 131/83 _inv_ctrl_C__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 132/84 _inv_r_tee___, 133/85 _inv_ctrl_E__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 134/86 _inv_ctrl_F__, 135/87 _inv_ctrl_G__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 136/88 _inv_ctrl_H__, 137/89 _inv_ctrl_I__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 138/8a _inv_ctrl_J__, 139/8b _inv_ctrl_K__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 140/8c _inv_ctrl_L__, 141/8d _inv_ctrl_M__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 142/8e _inv_ctrl_N__, 143/8f _inv_ctrl_O__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 144/90 __inv__club__, 145/91 _inv_ctrl_Q__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 146/92 _inv_h_line__, 147/93 _inv_ctrl_S__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 148/94 __inv__ball__, 149/95 _inv_ctrl_U__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 150/96 _inv_ctrl_V__, 151/97 __inv_t_tee__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 152/98 __inv_b_tee__, 153/99 _inv_ctrl_Y__ + ct_mix CT_NONE_IDX, CT_CTRL_WS_IDX ; 154/9a _inv_ctrl_Z__, 155/9b _____EOL_____ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 156/9c ___CLRLINE___, 157/9d ___INSLINE___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 158/9e ____CLRTAB___, 159/9f ____INSTAB___ - .byte $00 ; 192/c0 ___inv_@_____ - .byte $0A ; 193/c1 ___inv_A_____ - .byte $0A ; 194/c2 ___inv_B_____ - .byte $0A ; 195/c3 ___inv_C_____ - .byte $0A ; 196/c4 ___inv_D_____ - .byte $0A ; 197/c5 ___inv_E_____ - .byte $0A ; 198/c6 ___inv_F_____ - .byte $02 ; 199/c7 ___inv_G_____ - .byte $02 ; 200/c8 ___inv_H_____ - .byte $02 ; 201/c9 ___inv_I_____ - .byte $02 ; 202/ca ___inv_J_____ - .byte $02 ; 203/cb ___inv_K_____ - .byte $02 ; 204/cc ___inv_L_____ - .byte $02 ; 205/cd ___inv_M_____ - .byte $02 ; 206/ce ___inv_N_____ - .byte $02 ; 207/cf ___inv_O_____ - .byte $02 ; 208/d0 ___inv_P_____ - .byte $02 ; 209/d1 ___inv_Q_____ - .byte $02 ; 210/d2 ___inv_R_____ - .byte $02 ; 211/d3 ___inv_S_____ - .byte $02 ; 212/d4 ___inv_T_____ - .byte $02 ; 213/d5 ___inv_U_____ - .byte $02 ; 214/d6 ___inv_V_____ - .byte $02 ; 215/d7 ___inv_W_____ - .byte $02 ; 216/d8 ___inv_X_____ - .byte $02 ; 217/d9 ___inv_Y_____ - .byte $02 ; 218/da ___inv_Z_____ - .byte $00 ; 219/db ___inv_[_____ - .byte $00 ; 220/dc ___inv_\_____ - .byte $00 ; 221/dd ___inv_]_____ - .byte $00 ; 222/de ___inv_^_____ - .byte $00 ; 223/df _inv_UNDRLIN_ - .byte $00 ; 224/e0 _inv_diamond_ - .byte $09 ; 225/e1 ___inv_a_____ - .byte $09 ; 226/e2 ___inv_b_____ - .byte $09 ; 227/e3 ___inv_c_____ - .byte $09 ; 228/e4 ___inv_d_____ - .byte $09 ; 229/e5 ___inv_e_____ - .byte $09 ; 230/e6 ___inv_f_____ - .byte $01 ; 231/e7 ___inv_g_____ - .byte $01 ; 232/e8 ___inv_h_____ - .byte $01 ; 233/e9 ___inv_i_____ - .byte $01 ; 234/ea ___inv_j_____ - .byte $01 ; 235/eb ___inv_k_____ - .byte $01 ; 236/ec ___inv_l_____ - .byte $01 ; 237/ed ___inv_m_____ - .byte $01 ; 238/ee ___inv_n_____ - .byte $01 ; 239/ef ___inv_o_____ - .byte $01 ; 240/f0 ___inv_p_____ - .byte $01 ; 241/f1 ___inv_q_____ - .byte $01 ; 242/f2 ___inv_r_____ - .byte $01 ; 243/f3 ___inv_s_____ - .byte $01 ; 244/f4 ___inv_t_____ - .byte $01 ; 245/f5 ___inv_u_____ - .byte $01 ; 246/f6 ___inv_v_____ - .byte $01 ; 247/f7 ___inv_w_____ - .byte $01 ; 248/f8 ___inv_x_____ - .byte $01 ; 249/f9 ___inv_y_____ - .byte $01 ; 250/fa ___inv_z_____ - .byte $00 ; 251/fb __inv_spade__ - .byte $00 ; 252/fc __inv_v_line_ - .byte $10 ; 253/fd ____BEEP_____ - .byte $10 ; 254/fe ____DELBS____ - .byte $10 ; 255/ff ___INSERT____ + ct_mix CT_SPACE_SPACETAB_IDX, CT_NONE_IDX ; 160/a0 __inv_SPACE__, 161/a1 ___inv_!_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 162/a2 ___inv_"_____, 163/a3 ___inv_#_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 164/a4 ___inv_$_____, 165/a5 ___inv_%_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 166/a6 ___inv_&_____, 167/a7 ___inv_'_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 168/a8 ___inv_(_____, 169/a9 ___inv_)_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 170/aa ___inv_*_____, 171/ab ___inv_+_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 172/ac ___inv_,_____, 173/ad ___inv_-_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 174/ae ___inv_._____, 175/af ___inv_/_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 176/b0 ___inv_0_____, 177/b1 ___inv_1_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 178/b2 ___inv_2_____, 179/b3 ___inv_3_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 180/b4 ___inv_4_____, 181/b5 ___inv_5_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 182/b6 ___inv_6_____, 183/b7 ___inv_7_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 184/b8 ___inv_8_____, 185/b9 ___inv_9_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 186/ba ___inv_:_____, 187/bb ___inv_;_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 188/bc ___inv_<_____, 189/bd ___inv_=_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 190/be ___inv_>_____, 191/bf ___inv_?_____ + ct_mix CT_NONE_IDX, CT_UPPER_XDIGIT_IDX ; 192/c0 ___inv_@_____, 193/c1 ___inv_A_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 194/c2 ___inv_B_____, 195/c3 ___inv_C_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 196/c4 ___inv_D_____, 197/c5 ___inv_E_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_IDX ; 198/c6 ___inv_F_____,199/c7 ___inv_G_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 200/c8 ___inv_H_____, 201/c9 ___inv_I_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 202/ca ___inv_J_____, 203/cb ___inv_K_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 204/cc ___inv_L_____, 205/cd ___inv_M_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 206/ce ___inv_N_____, 207/cf ___inv_O_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 208/d0 ___inv_P_____, 209/d1 ___inv_Q_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 210/d2 ___inv_R_____, 211/d3 ___inv_S_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 212/d4 ___inv_T_____, 213/d5 ___inv_U_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 214/d6 ___inv_V_____, 215/d7 ___inv_W_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 216/d8 ___inv_X_____, 217/d9 ___inv_Y_____ + ct_mix CT_UPPER_IDX, CT_NONE_IDX ; 218/da ___inv_Z_____, 219/db ___inv_[_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 220/dc ___inv_\_____, 221/dd ___inv_]_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 222/de ___inv_^_____, 223/df _inv_UNDRLIN_ + ct_mix CT_NONE_IDX, CT_LOWER_XDIGIT_IDX ; 224/e0 _inv_diamond_, 225/e1 ___inv_a_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 226/e2 ___inv_b_____, 227/e3 ___inv_c_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 228/e4 ___inv_d_____, 229/e5 ___inv_e_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_IDX ; 230/e6 ___inv_f_____, 231/e7 ___inv_g_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 232/e8 ___inv_h_____, 233/e9 ___inv_i_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 234/ea ___inv_j_____, 235/eb ___inv_k_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 236/ec ___inv_l_____, 237/ed ___inv_m_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 238/ee ___inv_n_____, 239/ef ___inv_o_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 240/f0 ___inv_p_____, 241/f1 ___inv_q_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 242/f2 ___inv_r_____, 243/f3 ___inv_s_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 244/f4 ___inv_t_____, 245/f5 ___inv_u_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 246/f6 ___inv_v_____, 247/f7 ___inv_w_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 248/f8 ___inv_x_____, 249/f9 ___inv_y_____ + ct_mix CT_LOWER_IDX, CT_NONE_IDX ; 250/fa ___inv_z_____, 251/fb __inv_spade__ + ct_mix CT_NONE_IDX, CT_CTRL_IDX ; 252/fc __inv_v_line_, 253/fd ____BEEP_____ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 254/fe ____DELBS____, 255/ff ___INSERT____ diff --git a/libsrc/atari/cvline.s b/libsrc/atari/cvline.s index da6c8dca4..96ceef5c1 100644 --- a/libsrc/atari/cvline.s +++ b/libsrc/atari/cvline.s @@ -5,21 +5,16 @@ ; void cvline (unsigned char length); ; .include "atari.inc" - + .export _cvlinexy, _cvline - .import popa, _gotoxy, putchar, setcursor + .import gotoxy, putchar, setcursor .importzp tmp1 -.ifdef __ATARI5200__ -CHRCODE = 1 ; exclamation mark -.else CHRCODE = $7C ; Vertical bar -.endif _cvlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length and run into _cvline _cvline: diff --git a/libsrc/atari/dio_stc.s b/libsrc/atari/dio_stc.s index 52b3af4a6..768aca085 100644 --- a/libsrc/atari/dio_stc.s +++ b/libsrc/atari/dio_stc.s @@ -17,16 +17,14 @@ .export _dio_log_to_phys .include "atari.inc" .importzp ptr1,ptr2,ptr3 - .import popax,__oserror + .import popax,popptr1,__oserror .proc _dio_log_to_phys sta ptr2 stx ptr2+1 ; pointer to output structure - jsr popax - sta ptr1 - stx ptr1+1 ; save pointer to input data + jsr popptr1 ; save pointer to input data jsr popax sta ptr3 diff --git a/libsrc/atari/diopncls.s b/libsrc/atari/diopncls.s index 2cdeba78b..528c0fad8 100644 --- a/libsrc/atari/diopncls.s +++ b/libsrc/atari/diopncls.s @@ -137,7 +137,7 @@ _dio_open: iny lda #1 -finish: sta (ptr2),y ; set default sector size +finish: sta (ptr2),y ; set default sector size fini2: lda ptr2 ldx ptr2+1 rts diff --git a/libsrc/atari/dioqsize.s b/libsrc/atari/dioqsize.s index f26667af7..caef0588f 100644 --- a/libsrc/atari/dioqsize.s +++ b/libsrc/atari/dioqsize.s @@ -12,7 +12,7 @@ .proc _dio_query_sectsize sta ptr1 ; handle - stx ptr1+1 + stx ptr1+1 lda #0 sta __oserror diff --git a/libsrc/atari/doesclrscr.s b/libsrc/atari/doesclrscr.s new file mode 100644 index 000000000..4b2f30b2a --- /dev/null +++ b/libsrc/atari/doesclrscr.s @@ -0,0 +1,20 @@ +; +; Christian Groessler, June-2016 +; +; unsigned char doesclrscrafterexit (void); +; +; returns 0/1 if after program termination the screen isn't/is cleared +; + + .export _doesclrscrafterexit + .import __is_cmdline_dos + .import return1 + +.ifdef __ATARIXL__ +_doesclrscrafterexit = return1 ; the c65 runtime always clears the screen at program termination +.else +_doesclrscrafterexit: + jsr __is_cmdline_dos ; currently (unless a DOS behaving differently is popping up) + eor #$01 ; we can get by with the inverse of __is_cmdline_dos + rts +.endif diff --git a/libsrc/atari/dosdetect.s b/libsrc/atari/dosdetect.s index 654da55b5..1dd6a87f5 100644 --- a/libsrc/atari/dosdetect.s +++ b/libsrc/atari/dosdetect.s @@ -11,7 +11,7 @@ ; ------------------------------------------------------------------------ ; DOS type detection -.segment "INIT" +.segment "ONCE" detect: lda DOS cmp #'S' ; SpartaDOS @@ -20,6 +20,8 @@ detect: lda DOS beq mydos cmp #'X' ; XDOS beq xdos + cmp #'R' ; RealDOS + beq rdos lda #$4C ; probably default ldy #COMTAB @@ -33,21 +35,35 @@ detect: lda DOS cmp (DOSVEC),y beq done lda #OSADOS + bne set + +spdos: lda DOS+3 ; 'B' in BW-DOS + cmp #'B' + bne spdos_real + lda DOS+4 ; 'W' in BW-DOS + cmp #'W' + bne spdos_real + + lda #BWDOS .byte $2C ; BIT <abs> -spdos: lda #SPARTADOS +spdos_real: + lda #SPARTADOS .byte $2C ; BIT <abs> mydos: lda #MYDOS .byte $2C ; BIT <abs> +rdos: lda #REALDOS + .byte $2C ; BIT <abs> + xdos: lda #XDOS - sta __dos_type +set: sta __dos_type done: rts ; ------------------------------------------------------------------------ ; Data - .bss + .data -__dos_type: .res 1 ; default to ATARIDOS +__dos_type: .byte ATARIDOS; default to ATARIDOS diff --git a/libsrc/atari/emd/atr130.s b/libsrc/atari/emd/atr130.s index f2d5777d5..7f4d51590 100644 --- a/libsrc/atari/emd/atr130.s +++ b/libsrc/atari/emd/atr130.s @@ -11,7 +11,7 @@ ; Bit 2: bank control ; Bit 1: BASIC on/off ; Bit 0: OS RAM on/off -; +; ; Masks: %11100011 $E3 Bank 0 ; %11100111 $E7 Bank 1 ; %11101011 $EB Bank 2 @@ -67,7 +67,7 @@ ; Constants BANK = $4000 ; bank window -STACK = $0100 ; stack location +STACK = $0100 ; stack location PAGES = 256 ; 4 x 16k banks @@ -93,17 +93,17 @@ stacktest: sei @2: sta $4000 ; restore cli rts -stacktest_end: +stacktest_end: stackcopy: sei ; disable interrupts @1: dex ; pre-decrement (full page x=0) ldy #$FF ; this will be replaced STACK+3 - sty $D301 ; set bank + sty $D301 ; set bank lda $FF00,x ; address to copy from STACK+8,+9 ldy #$FF ; this will be replaced STACK+11 - sty $D301 + sty $D301 sta $FF00,x ; address to copy to STACK+16,+17 - cpx #0 + cpx #0 bne @1 ldy #$FF ; portb_save STACK+23 sty $D301 @@ -122,7 +122,7 @@ stackcopy_byte: sei sty $D301 cli rts -stackcopy_byte_end: +stackcopy_byte_end: .data @@ -186,14 +186,14 @@ setpage: INSTALL: lda $D301 ; save state of portb sta portb_save - tay + tay jsr install_test ; doesn't touch Y sty STACK+13 lda $4000 ; test for extended memory jsr STACK - bcs @1 + bcs @1 lda #EM_ERR_OK rts @1: lda #EM_ERR_NO_DEVICE @@ -242,7 +242,7 @@ MAP: jsr setpage ; extract the bank/page lda banks,x sta STACK+3 ; set bank to copy from ; lda ptr1 -; sta STACK+8 +; sta STACK+8 lda ptr1+1 sta STACK+9 ; set copy from address lda portb_save @@ -251,10 +251,10 @@ MAP: jsr setpage ; extract the bank/page lda ptr2 sta STACK+16 lda ptr2+1 - sta STACK+17 ; set copy to address + sta STACK+17 ; set copy to address ldx #0 ; full page copy - jsr STACK ; do the copy! + jsr STACK ; do the copy! ; Return the memory window @@ -298,7 +298,7 @@ COMMIT: lda curpage ; Get the current page sta STACK+3 ; set bank to copy from sta STACK+23 ; set final portb restore lda ptr1 - sta STACK+8 + sta STACK+8 lda ptr1+1 sta STACK+9 ; set copy from address ldx curbank @@ -307,10 +307,10 @@ COMMIT: lda curpage ; Get the current page ;lda ptr2 ;sta STACK+16 lda ptr2+1 - sta STACK+17 ; set copy to address + sta STACK+17 ; set copy to address ldx #0 ; full page copy - jsr STACK ; do the copy! + jsr STACK ; do the copy! commit_done: rts @@ -329,7 +329,7 @@ COPYFROM: ldy #EM_COPY::OFFS lda (ptr3),y - sta STACK+7 ; offset goes into BANK low + sta STACK+7 ; offset goes into BANK low ldy #EM_COPY::PAGE lda (ptr3),y @@ -357,9 +357,9 @@ COPYFROM: add #>BANK ; add to BANK address sta STACK+8 ; current page in bank ldx curbank - lda banks,x - sta STACK+2 ; set bank in stack - lda portb_save + lda banks,x + sta STACK+2 ; set bank in stack + lda portb_save sta STACK+10 ; set bank restore in stack sta STACK+18 ; set final restore too @@ -399,7 +399,7 @@ copyfrom_copy: bne @3 inc STACK+16 -@3: jmp copyfrom_copy ; copy another byte +@3: jmp copyfrom_copy ; copy another byte done: rts @@ -418,7 +418,7 @@ COPYTO: ldy #EM_COPY::OFFS lda (ptr3),y - sta STACK+15 ; offset goes into BANK low + sta STACK+15 ; offset goes into BANK low ldy #EM_COPY::PAGE lda (ptr3),y @@ -446,9 +446,9 @@ COPYTO: add #>BANK ; add to BANK address sta STACK+16 ; current page in bank ldx curbank - lda banks,x - sta STACK+10 ; set bank in stack - lda portb_save + lda banks,x + sta STACK+10 ; set bank in stack + lda portb_save sta STACK+2 ; set bank restore in stack sta STACK+18 ; set final restore too @@ -488,5 +488,5 @@ copyto_copy: bne @3 inc STACK+8 -@3: jmp copyto_copy ; copy another byte +@3: jmp copyto_copy ; copy another byte diff --git a/libsrc/atari/exec.s b/libsrc/atari/exec.s new file mode 100644 index 000000000..16062a294 --- /dev/null +++ b/libsrc/atari/exec.s @@ -0,0 +1,211 @@ +; +; Christian Groessler, 12-Jun-2016 +; +; int __fastcall__ exec (const char* progname, const char* cmdline); +; +; supports only XDOS at the moment + + .export _exec + + .import popax + .import __dos_type + .import findfreeiocb + .import incsp2 + .import excexit ; from crt0.s + .import SP_save ; from crt0.s +.ifdef UCASE_FILENAME + .import ucase_fn + .import addysp +.endif + + .include "zeropage.inc" + .include "errno.inc" + .include "atari.inc" + +; area $0100 to $0128 might be in use (e.g. Hias' high speed patch) +CMDLINE_BUFFER = $0129 ; put progname + cmdline as one single string there +; alternatively: +;CMDLINE_BUFFER = $0480 ; put progname + cmdline as one single string there +CMDLINE_MAX = 40+3 ; max. length of drive + progname + cmdline + + .code + +notsupp:lda #ENOSYS ; "unsupported system call" + .byte $2C ; bit opcode, eats the next 2 bytes +noiocb: lda #EMFILE ; "too many open files" + jsr incsp2 ; clean up stack +seterr: jmp __directerrno + + +; entry point + +_exec: + ; save cmdline + sta ptr3 + stx ptr3+1 + + ldy __dos_type + cpy #XDOS + bne notsupp + + jsr findfreeiocb + bne noiocb + + stx tmp4 ; remember IOCB index + + ; get program name + jsr popax + +.ifdef UCASE_FILENAME +.ifdef DEFAULT_DEVICE + ldy #$80 +.else + ldy #$00 +.endif + sty tmp2 ; set flag for ucase_fn + jsr ucase_fn + bcc ucok1 +invret: lda #EINVAL ; file name is too long + bne seterr +ucok1: +.endif ; defined UCASE_FILENAME + +; copy program name and arguments to CMDLINE_BUFFER + + sta ptr4 ; ptr4: pointer to program name + stx ptr4+1 + ldy #0 + ; TODO: check stack ptr and and use min(CMDLINE_MAX,available_stack) +copyp: lda (ptr4),y + beq copypd + sta CMDLINE_BUFFER,y + iny + cpy #CMDLINE_MAX + bne copyp + + ; programe name too long + beq invret + +.ifndef UCASE_FILENAME +invret: lda #EINVAL + bne seterr +.endif + +; file name copied, check for args + +copypd: tya ; put Y into X (index into CMDLINE_BUFFER) + tax + lda ptr3 + ora ptr3+1 ; do we have arguments? + beq copycd ; no + ldy #0 + lda (ptr3),y ; get first byte of cmdline parameter + beq copycd ; nothing there... + lda #' ' ; add a space btw. progname and cmdline + bne copyc1 + +; copy args + +copyc: lda (ptr3),y + beq copycd + iny +copyc1: sta CMDLINE_BUFFER,x + inx + cpx #CMDLINE_MAX + bne copyc + ; progname + arguments too long + beq invret + +invexe: jsr close + lda #XNTBIN + bne setmerr + +copycd: lda #ATEOL + sta CMDLINE_BUFFER,x + +; open the program file, read the first two bytes and compare them to $FF + + ldx tmp4 ; get IOCB index + lda ptr4 ; ptr4 points to progname + sta ICBAL,x + lda ptr4+1 + sta ICBAH,x + lda #OPNIN ; open for input + sta ICAX1,x + lda #OPEN + sta ICCOM,x + jsr CIOV + + tya + +.ifdef UCASE_FILENAME + ldy tmp3 ; get size + jsr addysp ; free used space on the stack + ; the following 'bpl' depends on 'addysp' restoring A as last command before 'rts' +.endif ; defined UCASE_FILENAME + + bpl openok + pha ; remember error code + jsr close ; close the IOCB (required even if open failed) + pla ; put error code back into A +setmerr:jmp __mappederrno ; update errno from OS specific error code in A + +openok: lda #>buf + sta ICBAH,x ; set buffer address + lda #<buf + sta ICBAL,x + lda #0 ; set buffer length + sta ICBLH,x + lda #2 + sta ICBLL,x + lda #GETCHR ; iocb command code + sta ICCOM,x + jsr CIOV ; read it + bmi invexe ; read operation failed, return error + + lda ICBLL,x ; # of bytes read + cmp #2 + bne invexe + lda #$FF ; check file format (need $FFFF at the beginning) + cmp buf + bne invexe + cmp buf+1 + bne invexe + + jsr close ; close program file + +; program file appears to be available and good +; here's the point of no return + + ldx SP_save + txs ; reset stack pointer to what it was at program entry + lda tmp4 ; get IOCB index + pha ; and save it ('excexit' calls destructors and they might destroy tmp4) + jsr excexit ; on atarixl this will enable the ROM again, making all high variables inaccessible + pla + tax ; IOCB index in X + + lda #<CMDLINE_BUFFER + sta ICBAL,x ; address + lda #>CMDLINE_BUFFER + sta ICBAH,x + lda #0 + sta ICBLL,x ; length shouldn't be random, but 0 is ok + sta ICBLH,x + sta ICAX1,x + sta ICAX2,x + lda #80 ; XDOS: run DUP command + sta ICCOM,x + jmp CIOV_org ; no way to display an error message in case of failure, and we will return to DOS + + +; close IOCB, index in X +.proc close + lda #CLOSE + sta ICCOM,x + jmp CIOV ; close IOCB +.endproc + + .bss + +buf: .res 2 diff --git a/libsrc/atari/exehdr.s b/libsrc/atari/exehdr.s index ea9fa95d7..7abb7c1ac 100644 --- a/libsrc/atari/exehdr.s +++ b/libsrc/atari/exehdr.s @@ -1,11 +1,11 @@ ; This file defines the EXE header and main chunk load header for Atari executables .export __EXEHDR__: absolute = 1 - .import __RAM_START__, __BSS_LOAD__ + .import __MAIN_START__, __BSS_LOAD__ .segment "EXEHDR" .word $FFFF .segment "MAINHDR" - .word __RAM_START__ + .word __MAIN_START__ .word __BSS_LOAD__ - 1 diff --git a/libsrc/atari/getargs.s b/libsrc/atari/getargs.s index fb3b7bc03..b1b5d258d 100644 --- a/libsrc/atari/getargs.s +++ b/libsrc/atari/getargs.s @@ -7,6 +7,8 @@ ; startup code but is nevertheless included in the compiled program when ; needed. +; XDOS support added 05/2016 by Christian Groessler + MAXARGS = 16 ; max. amount of arguments in arg. table CL_SIZE = 64 ; command line buffer size SPACE = 32 ; SPACE char. @@ -20,30 +22,32 @@ SPACE = 32 ; SPACE char. ; -------------------------------------------------------------------------- ; Get command line -.segment "INIT" +.segment "ONCE" + +nargdos:rts initmainargs: - lda #0 - sta __argc - sta __argc+1 - sta __argv - sta __argv+1 - lda __dos_type ; which DOS? - cmp #ATARIDOS - beq nargdos ; DOS does not support arguments - cmp #MYDOS - bne argdos ; DOS supports arguments -nargdos:rts + cmp #MAX_DOS_WITH_CMDLINE + 1 + bcs nargdos ; Initialize ourcl buffer -argdos: lda #ATEOL - sta ourcl+CL_SIZE +argdos: ldy #ATEOL + sty ourcl+CL_SIZE -; Move SpartaDOS command line to our own buffer +; Move SpartaDOS/XDOS command line to our own buffer - lda DOSVEC + cmp #XDOS + bne sparta + + lda #<XLINE + sta ptr1 + lda #>XLINE + sta ptr1+1 + bne cpcl0 + +sparta: lda DOSVEC clc adc #<LBUF sta ptr1 @@ -51,7 +55,7 @@ argdos: lda #ATEOL adc #>LBUF sta ptr1+1 - ldy #0 +cpcl0: ldy #0 cpcl: lda (ptr1),y sta ourcl,y iny @@ -120,7 +124,7 @@ eopar: finargs: lda __argc - asl + asl tax lda #0 sta argv,x @@ -134,7 +138,7 @@ finargs: ; -------------------------------------------------------------------------- ; Data -.bss +.segment "INIT" argv: .res (1 + MAXARGS) * 2 diff --git a/libsrc/atari/getdefdev.s b/libsrc/atari/getdefdev.s index 47d8714e6..20e32246a 100644 --- a/libsrc/atari/getdefdev.s +++ b/libsrc/atari/getdefdev.s @@ -3,7 +3,11 @@ ; ; function to get default device: char *_getdefdev(void); ; -; SpartaDOS: +; AtariDOS/MyDOS: +; Default device number is derived from DUNIT. Therefore "default +; device" is the one the program was loaded from. +; +; SpartaDOS/RealDOS: ; the ZCRNAME routine is only used to get the default drive because ; ZCRNAME has two disadvantages: ; 1. It will convert D: into D1: instead of Dn: (n = default drive) @@ -27,10 +31,10 @@ __getdefdev: lda __dos_type ; which DOS? - cmp #ATARIDOS - beq finish - cmp #MYDOS - beq finish + cmp #XDOS + beq xdos ; XDOS detected +; cmp #OSADOS+1 ; (redundant: #OSADOS+1 = #XDOS) + bcs use_DUNIT ; neither XDOS, nor OS/A+ or SpartaDOS ldy #BUFOFF lda #0 @@ -60,7 +64,7 @@ __getdefdev: lda (DOSVEC),y sta crvec+2 -crvec: jsr $FFFF ; will be set to crunch vector + jsr crvec ; Get default device @@ -69,7 +73,7 @@ crvec: jsr $FFFF ; will be set to crunch vector sta __defdev iny lda (DOSVEC),y - sta __defdev+1 +done: sta __defdev+1 ; Return pointer to default device @@ -77,9 +81,43 @@ finish: lda #<__defdev ldx #>__defdev rts +; On AtariDOS or MyDOS, use the DUNIT variable to setup the default +; device. The default device will then be the one the program was +; loaded from. + +use_DUNIT: + lda DUNIT + clc + adc #'0' + bne done ; jump always + +; XDOS default device retrieval + +xdos: + +; check XDOS version (we need >= 2.4) + + lda XGLIN + cmp #$4C ; there needs to be a 'JMP' opcode here + bne finish ; older version, use DEFAULT_DEVICE or D1: + lda XVER ; get BCD encoded version ($24 for 2.4) + cmp #$24 + bcc finish ; too old, below 2.4 + +; good XDOS version, get default drive + + lda #ATEOL + sta XLINE ; simulate empty command line + ldy #0 + jsr XMOVE ; create an FMS filename (which in this case only contains the drive) + lda XFILE+1 + bne done + .data -; Default device +crvec: jmp $FFFF ; target address will be set to crunch vector + +; Default device string __defdev: .ifdef DEFAULT_DEVICE @@ -87,4 +125,3 @@ __defdev: .else .byte "D1:", 0 .endif - diff --git a/libsrc/atari/getdevice.s b/libsrc/atari/getdevice.s new file mode 100644 index 000000000..e0e700436 --- /dev/null +++ b/libsrc/atari/getdevice.s @@ -0,0 +1,78 @@ +; +; Oliver Schmidt, 2012-09-04 +; Christian Groessler, 2017-12-28 +; +; unsigned char getfirstdevice (void); +; unsigned char __fastcall__ getnextdevice (unsigned char device); +; + + .include "atari.inc" + .export _getfirstdevice + .export _getnextdevice + +MAX_DIO_DEVICES = 8 + +;------------------------------------------------------------------------------ +; _getfirstdevice + +_getfirstdevice: + lda #$FF + ; Fall through + +;------------------------------------------------------------------------------ +; _getnextdevice + +_getnextdevice: + tax +next: inx + cpx #MAX_DIO_DEVICES + beq none + + jsr check_device + bmi next + +done: txa + ldx #$00 + rts + +none: ldx #255 ; INVALID_DEVICE (see include/device.h) + bne done ; jump always + +;------------------------------------------------------------------------------ +; check_device - checks if a disk device is present +; input: X - device id (0 = D1, 1 = D2, ...) +; output: NF - 0/1 for detected/not detected +; X register preserved + +check_device: + txa + pha + lda #SIO_STAT + sta DCOMND ; set command into DCB + lda #%01000000 ; direction value, "receive data" + sta DSTATS ; set data flow directon + lda #15 + sta DTIMLO ; value got from DOS source + lda #4 + sta DAUX1 ; set sector # (dummy: 4) + sta DBYTLO ; # of bytes to transfer + lda #0 + sta DAUX2 + sta DBYTHI + lda #>DVSTAT + sta DBUFHI + lda #<DVSTAT + sta DBUFLO ; set buffer address into DCB + lda #DISKID ; SIO bus ID of diskette drive + sta DDEVIC + inx + stx DUNIT ; unit number (1-based) + + jsr SIOV ; execute SIO command + + pla + tax + lda DSTATS + rts + + .end diff --git a/libsrc/atari/getres.s b/libsrc/atari/getres.s new file mode 100644 index 000000000..f2e4874f9 --- /dev/null +++ b/libsrc/atari/getres.s @@ -0,0 +1,51 @@ +; +; Oliver Schmidt, 15.8.2018 +; Christian Groessler, 27.9.2018 +; +; int __fastcall__ clock_getres (clockid_t clk_id, struct timespec *res); +; + + .include "atari.inc" + .include "time.inc" + .include "errno.inc" + + .importzp ptr1 + .import incsp1, return0, __dos_type + +;---------------------------------------------------------------------------- +.code + +_clock_getres: + sta ptr1 + stx ptr1+1 + + ; Cleanup stack + jsr incsp1 + + ; Check for SpartaDOS-X 4.40 or newer + ldy #SPARTADOS + cpy __dos_type + bne enosys + ldy SDX_VERSION + cpy #$44 + bcc enosys + + ldy #.sizeof(timespec)-1 +@L1: lda time,y + sta (ptr1),y + dey + bpl @L1 + + jmp return0 + +enosys: lda #ENOSYS + + ; Set __errno + jmp __directerrno + +;---------------------------------------------------------------------------- +; timespec struct with tv_sec set to 1 second +.rodata + +time: .dword 1 + .dword 0 diff --git a/libsrc/atari/gettime.s b/libsrc/atari/gettime.s new file mode 100644 index 000000000..093d34843 --- /dev/null +++ b/libsrc/atari/gettime.s @@ -0,0 +1,114 @@ +; +; Oliver Schmidt, 14.08.2018 +; Christian Groessler, 25.09.2018 +; +; int __fastcall__ clock_gettime (clockid_t clk_id, struct timespec *tp); +; + + .import pushax, steaxspidx, incsp1, incsp3, return0 + .import __dos_type + .import sdxtry + + .include "time.inc" + .include "zeropage.inc" + .include "errno.inc" + .include "atari.inc" + +_clock_gettime: + jsr pushax + +; clear tp + + sta ptr1 + stx ptr1+1 + lda #$00 + ldy #.sizeof(timespec)-1 +: sta (ptr1),y + dey + bpl :- + +; only supported on SpartaDOS-X >= 4.40 + + lda #SPARTADOS + cmp __dos_type + bne notsupp + lda SDX_VERSION + cmp #$44 + bcc notsupp + +; get date/time from system (SD-X call) +; see settime.s for reasons of using sdxtry + + lda #0 ; init loop count (256) + sta sdxtry + +try_get:lda #SDX_CLK_DEV ; CLK device + sta SDX_DEVICE + ldy #SDX_KD_GETTD ; GETTD function + jsr SDX_KERNEL ; do the call + bcc done + + dec sdxtry + bne try_get + + lda #EBUSY + bne errexit + +; fill timespec + +; date +done: lda SDX_DATE ; mday + sta TM + tm::tm_mday + ldx SDX_DATE+1 ; month + dex + stx TM + tm::tm_mon + lda SDX_DATE+2 ; year + cmp #79 ; 1979: the Atari 800 came out + bcs :+ + adc #100 ; adjust century +: sta TM + tm::tm_year + +; time + lda SDX_TIME + sta TM + tm::tm_hour + lda SDX_TIME+1 + sta TM + tm::tm_min + lda SDX_TIME+2 + sta TM + tm::tm_sec + +; make time_t + + lda #<TM + ldx #>TM + jsr _mktime + +; store tv_sec into output tp struct + + ldy #timespec::tv_sec + jsr steaxspidx + +; cleanup stack + + jsr incsp1 + +; return success + + jmp return0 + +; load errno code + +notsupp:lda #ENOSYS + +; cleanup stack + +errexit:jsr incsp3 ; Preserves A + +; set __errno + + jmp __directerrno + +; ------- + + .bss + +TM: .tag tm diff --git a/libsrc/atari/gotoxy.s b/libsrc/atari/gotoxy.s index 1f00c3b23..aeaa732c0 100644 --- a/libsrc/atari/gotoxy.s +++ b/libsrc/atari/gotoxy.s @@ -6,14 +6,17 @@ .include "atari.inc" - .export _gotoxy + .export gotoxy, _gotoxy .import popa .import setcursor +gotoxy: + jsr popa ; Get Y + _gotoxy: ; Set the cursor position sta ROWCRS ; Set Y jsr popa ; Get X sta COLCRS ; Set X lda #0 - sta COLCRS+1 ; + sta COLCRS+1 jmp setcursor diff --git a/libsrc/atari/irq.s b/libsrc/atari/irq.s index 0a8efe466..86fef609b 100644 --- a/libsrc/atari/irq.s +++ b/libsrc/atari/irq.s @@ -13,9 +13,11 @@ ; ------------------------------------------------------------------------ -.segment "INIT" +.segment "ONCE" initirq: + lda #$4C ; JMP opcode + sta IRQInd lda VVBLKD ldx VVBLKD+1 sta IRQInd+1 @@ -45,17 +47,22 @@ IRQStub: .ifdef CHARGEN_RELOC lda CHBAS pha +.endif .endif lda PORTB pha - and #$FE - sta PORTB ; disable ROM +.ifdef __ATARIXL__ + and #$FE ; disable ROM +.endif + ora #$10 ; map main memory into $4000..$7FFF area + sta PORTB +.ifdef __ATARIXL__ set_chbase >__CHARGEN_START__ .endif jsr callirq ; Call the functions -.ifdef __ATARIXL__ pla - sta PORTB ; restore old ROM setting + sta PORTB ; restore old memory settings +.ifdef __ATARIXL__ .ifdef CHARGEN_RELOC pla sta CHBAS @@ -66,6 +73,8 @@ IRQStub: ; ------------------------------------------------------------------------ -.data +.segment "LOWBSS" -IRQInd: jmp $0000 +IRQInd: .res 3 + +.end diff --git a/libsrc/atari/is_cmdline_dos.s b/libsrc/atari/is_cmdline_dos.s new file mode 100644 index 000000000..2a9c49e38 --- /dev/null +++ b/libsrc/atari/is_cmdline_dos.s @@ -0,0 +1,18 @@ +; +; Christian Groessler, May-2016 +; +; unsigned char _is_cmdline_dos(void); +; +; returns 0 for non-commandline DOS, 1 for commandline DOS +; + + .export __is_cmdline_dos + .import __dos_type + .include "atari.inc" + +__is_cmdline_dos: + lda #MAX_DOS_WITH_CMDLINE + cmp __dos_type + lda #0 + rol a + rts diff --git a/libsrc/atari/joy/atrmj8.s b/libsrc/atari/joy/atrmj8.s index 46766070b..3a26c381d 100644 --- a/libsrc/atari/joy/atrmj8.s +++ b/libsrc/atari/joy/atrmj8.s @@ -35,24 +35,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $02 ; JOY_UP - .byte $04 ; JOY_DOWN - .byte $08 ; JOY_LEFT - .byte $10 ; JOY_RIGHT - .byte $01 ; JOY_FIRE - .byte $00 ; JOY_FIRE2 not available - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READJOY - .addr 0 ; IRQ entry not used ; ------------------------------------------------------------------------ ; Constants @@ -107,6 +95,8 @@ COUNT: ; READJOY: + and #JOY_COUNT-1 ; fix joystick number + tax ; Joystick number into X asl a asl a asl a @@ -115,10 +105,21 @@ READJOY: ; Read joystick - lda PORTA ; get position - and #%00001111 + lda STRIG0 ; get button asl a - ora TRIG0 ; add button information - eor #%00011111 - ldx #0 ; fix X + asl a + asl a + asl a + ora PORTA ; add position information + eor #$1F + cmp oldval,x + beq :+ + sta oldval,x + ldx #0 + stx ATRACT ; we have interaction, disable "attract mode" +: ldx #0 ; fix X rts + + .bss + +oldval: .res JOY_COUNT diff --git a/libsrc/atari/joy/atrstd.s b/libsrc/atari/joy/atrstd.s index fc7aa55f4..fd1d99d31 100644 --- a/libsrc/atari/joy/atrstd.s +++ b/libsrc/atari/joy/atrstd.s @@ -34,24 +34,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $00 ; JOY_FIRE2 not available - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READJOY - .addr 0 ; IRQ entry not used ; ------------------------------------------------------------------------ ; Constants @@ -105,8 +93,8 @@ _400800: ; READJOY: - and #3 ; fix joystick number - tax ; Joystick number (0-3) into X + and #JOY_COUNT-1 ; fix joystick number + tax ; Joystick number into X ; Read joystick @@ -117,5 +105,14 @@ READJOY: asl a ora STICK0,x ; add position information eor #$1F - ldx #0 ; fix X + cmp oldval,x + beq :+ + sta oldval,x + ldx #0 + stx ATRACT ; we have interaction, disable "attract mode" +: ldx #0 ; fix X rts + + .bss + +oldval: .res JOY_COUNT diff --git a/libsrc/atari/libref.s b/libsrc/atari/libref.s index 171bd6de6..933eb5911 100644 --- a/libsrc/atari/libref.s +++ b/libsrc/atari/libref.s @@ -2,14 +2,8 @@ ; Oliver Schmidt, 2013-05-31 ; - .export em_libref, joy_libref, tgi_libref + .export em_libref, joy_libref .import _exit em_libref := _exit joy_libref := _exit -.ifdef __ATARIXL__ - .import CIO_handler -tgi_libref := CIO_handler -.else -tgi_libref := _exit -.endif diff --git a/libsrc/atari/lseek.s b/libsrc/atari/lseek.s index 889976f5b..b6a766361 100644 --- a/libsrc/atari/lseek.s +++ b/libsrc/atari/lseek.s @@ -176,7 +176,7 @@ seek: jsr ldax0sp ; get lower word of new offset .endproc -; check, whether seeking is supported +; check whether seeking is supported ; tmp3: iocb ; X: index into fd_table ; @@ -194,8 +194,12 @@ chk_supp: ; do the test lda __dos_type cmp #SPARTADOS + beq :+ + cmp #BWDOS + beq :+ + cmp #REALDOS bne ns1 - txa +: txa pha lda DOS+1 ; get SpartaDOS version cmp #$40 diff --git a/libsrc/atari/mcbpm.s b/libsrc/atari/mcbpm.s index c5c5dd433..9e6ccc2c5 100644 --- a/libsrc/atari/mcbpm.s +++ b/libsrc/atari/mcbpm.s @@ -180,7 +180,7 @@ update_colors: ; ------------------------------------------------------------------------ - .segment "INIT" + .segment "ONCE" pm_init: lda #0 diff --git a/libsrc/atari/mcbtxtchar.s b/libsrc/atari/mcbtxtchar.s index 90a25f673..95dd1651a 100644 --- a/libsrc/atari/mcbtxtchar.s +++ b/libsrc/atari/mcbtxtchar.s @@ -12,7 +12,7 @@ .export _mouse_txt_callbacks .importzp tmp4 - .import mul40,loc_tmp + .import _mul40 .importzp mouse_txt_char ; screen code of mouse cursor .include "atari.inc" @@ -74,7 +74,7 @@ prep: jsr getcursor ; Get character at cursor position cmp #mouse_txt_char ; "mouse" character bne overwr ; no, probably program has overwritten it - lda backup ; + lda backup ; jmp setcursor ; Draw character overwr: sta backup rts @@ -104,22 +104,15 @@ movex: ; Move the mouse cursor y position to the value in A/X. movey: - tax - ldy tmp4 ; mul40 uses tmp4 - lda loc_tmp ; and this local variable - pha - txa ; get parameter back + ldy tmp4 ; mul40 uses tmp4, save in Y lsr a ; convert y position to character line lsr a lsr a - jsr mul40 - clc + jsr _mul40 ; carry is cleared by _mul40 adc SAVMSC sta scrptr txa adc SAVMSC+1 sta scrptr+1 - pla - sta loc_tmp - sty tmp4 + sty tmp4 ; restore tmp4 rts diff --git a/libsrc/atari/mou/atrjoy.s b/libsrc/atari/mou/atrjoy.s index 7f1085fb8..3ea428576 100644 --- a/libsrc/atari/mou/atrjoy.s +++ b/libsrc/atari/mou/atrjoy.s @@ -89,6 +89,8 @@ YMin: .res 2 ; Y1 value of bounding box XMax: .res 2 ; X2 value of bounding box YMax: .res 2 ; Y2 value of bounding box Buttons: .res 1 ; Button mask +OldDir: .res 1 ; previous direction bits +OldButton: .res 1 ; previous buttons Temp: .res 1 ; Temporary value used in the int handler @@ -336,9 +338,24 @@ IRQ: jsr CPREP +; Check if user activity occurred, and if yes, disable "attract mode" + + lda Buttons + cmp OldButton + beq @ChkDir + sta OldButton + lda #0 + sta ATRACT ; disable "attract mode" +@ChkDir:lda Temp + cmp OldDir + beq @ChkCnt + sta OldDir + lda #0 + sta ATRACT + ; Check left/right - lda Temp ; Read joystick #0 +@ChkCnt:lda Temp ; Read joystick #0 and #(JOY::LEFT | JOY::RIGHT) beq @SkipX ; @@ -437,4 +454,3 @@ IRQ: @SkipY: jsr CDRAW clc ; Interrupt not "handled" rts - diff --git a/libsrc/atari/mou/atrst.s b/libsrc/atari/mou/atrst.s index 17d2affb5..5d8a5cd12 100644 --- a/libsrc/atari/mou/atrst.s +++ b/libsrc/atari/mou/atrst.s @@ -126,6 +126,7 @@ YMin: .res 2 ; Y1 value of bounding box XMax: .res 2 ; X2 value of bounding box YMax: .res 2 ; Y2 value of bounding box Buttons: .res 1 ; Button mask +OldButton: .res 1 ; previous buttons XPosWrk: .res 2 YPosWrk: .res 2 @@ -133,6 +134,7 @@ YPosWrk: .res 2 irq_enabled: .res 1 ; flag indicating that the high frequency polling interrupt is enabled old_porta_vbi: .res 1 ; previous PORTA value of the VBI interrupt (IRQ) how_long: .res 1 ; counter for how many VBI interrupts the mouse hasn't been moved +in_irq: .res 1 ; flag indicating high-frequency polling interrupt is active .if .defined (AMIGA_MOUSE) .or .defined (ST_MOUSE) dumx: .res 1 @@ -144,11 +146,11 @@ oldval: .res 1 .endif .ifndef __ATARIXL__ -OldT1: .res 2 +OldT2: .res 2 .else .data -set_VTIMR1_handler: +set_VTIMR2_handler: .byte $4C, 0, 0 .endif @@ -225,29 +227,29 @@ INSTALL: ; Setup pointer to wrapper install/deinstall function. lda libref - sta set_VTIMR1_handler+1 + sta set_VTIMR2_handler+1 lda libref+1 - sta set_VTIMR1_handler+2 + sta set_VTIMR2_handler+2 ; Install my handler. sec - lda #<T1Han - ldx #>T1Han - jsr set_VTIMR1_handler + lda #<T2Han + ldx #>T2Han + jsr set_VTIMR2_handler .else - lda VTIMR1 - sta OldT1 - lda VTIMR1+1 - sta OldT1+1 + lda VTIMR2 + sta OldT2 + lda VTIMR2+1 + sta OldT2+1 php sei - lda #<T1Han - sta VTIMR1 - lda #>T1Han - sta VTIMR1+1 + lda #<T2Han + sta VTIMR2 + lda #>T2Han + sta VTIMR2+1 plp .endif @@ -256,20 +258,12 @@ INSTALL: sta AUDCTL lda #0 - sta AUDC1 + sta AUDC2 lda #15 - sta AUDF1 + sta AUDF2 sta STIMER -.if 0 ; the IRQ will now be dynamically enabled when the mouse is moved - lda POKMSK - ora #%00000001 ; timer 1 enable - sta POKMSK - sta IRQEN - sta irq_enabled -.endif - lda PORTA and #$0f sta old_porta_vbi @@ -289,23 +283,23 @@ UNINSTALL: ; uninstall timer irq routine lda POKMSK - and #%11111110 ; timer 1 disable + and #%11111101 ; timer 2 disable sta IRQEN sta POKMSK .ifdef __ATARIXL__ clc - jsr set_VTIMR1_handler + jsr set_VTIMR2_handler .else php sei - lda OldT1 - sta VTIMR1 - lda OldT1+1 - sta VTIMR1+1 + lda OldT2 + sta VTIMR2 + lda OldT2+1 + sta VTIMR2+1 plp .endif @@ -496,11 +490,13 @@ IRQ: lda PORTA ; mouse port contents cmp old_porta_vbi beq @L3 ; no motion + lda #0 + sta ATRACT ; disable "attract mode" ; Turn mouse polling IRQ back on lda POKMSK - ora #%00000001 ; timer 1 enable + ora #%00000010 ; timer 2 enable sta POKMSK sta IRQEN sta irq_enabled @@ -530,7 +526,7 @@ IRQ: lda PORTA ; mouse port contents sta irq_enabled lda POKMSK - and #%11111110 ; timer 1 disable + and #%11111101 ; timer 2 disable sta IRQEN sta POKMSK @@ -544,25 +540,34 @@ IRQ: lda PORTA ; mouse port contents jsr CPREP +; Disable "attract mode" if button status has changed + + lda Buttons + cmp OldButton + beq @L5 + sta OldButton + lda #0 + sta ATRACT + ; Limit the X coordinate to the bounding box - lda XPosWrk+1 +@L5: lda XPosWrk+1 ldy XPosWrk tax cpy XMin sbc XMin+1 - bpl @L5 + bpl @L6 ldy XMin ldx XMin+1 - jmp @L6 + jmp @L7 -@L5: txa +@L6: txa cpy XMax sbc XMax+1 - bmi @L6 + bmi @L7 ldy XMax ldx XMax+1 -@L6: sty XPos +@L7: sty XPos stx XPos+1 tya jsr CMOVEX @@ -574,18 +579,18 @@ IRQ: lda PORTA ; mouse port contents tax cpy YMin sbc YMin+1 - bpl @L7 + bpl @L8 ldy YMin ldx YMin+1 - jmp @L8 + jmp @L9 -@L7: txa +@L8: txa cpy YMax sbc YMax+1 - bmi @L8 + bmi @L9 ldy YMax ldx YMax+1 -@L8: sty YPos +@L9: sty YPos stx YPos+1 tya jsr CMOVEY @@ -595,10 +600,10 @@ IRQ: lda PORTA ; mouse port contents .ifdef DEBUG ; print on upper right corner 'E' or 'D', indicating the IRQ is enabled or disabled ldy irq_enabled - beq @L9 + beq @L10 lda #37 ; screen code for 'E' .byte $2c ; bit opcode, eats next 2 bytes -@L9: lda #36 ; screen code for 'D' +@L10: lda #36 ; screen code for 'D' ldy #39 sta (SAVMSC),y .endif @@ -608,13 +613,18 @@ IRQ: lda PORTA ; mouse port contents ;---------------------------------------------------------------------------- -; T1Han: Local IRQ routine to poll mouse +; T2Han: Local IRQ routine to poll mouse ; -T1Han: lda CRITIC ; if CRITIC flag is set, disable the +T2Han: lda CRITIC ; if CRITIC flag is set, disable the bne disable_me ; high frequency polling IRQ, in order ; not to interfere with SIO I/O (e.g. - ; floppy access) + ; floppy access or serial I/O) + + lda in_irq ; handler entered again? + bne skip ; yes, ignore this interrupt + inc in_irq + cli ; enable IRQs so that we don't block them for too long tya pha @@ -791,6 +801,8 @@ mmexit: sty oldval tax pla tay + dec in_irq +skip: .ifdef __ATARIXL__ rts .else @@ -807,7 +819,7 @@ mmexit: sty oldval disable_me: lda POKMSK - and #%11111110 ; timer 1 disable + and #%11111101 ; timer 2 disable sta IRQEN sta POKMSK lda #0 diff --git a/libsrc/atari/mou/atrtt.s b/libsrc/atari/mou/atrtt.s index f1f2cde63..61963aa61 100644 --- a/libsrc/atari/mou/atrtt.s +++ b/libsrc/atari/mou/atrtt.s @@ -88,6 +88,7 @@ YMin: .res 2 ; Y1 value of bounding box XMax: .res 2 ; X2 value of bounding box YMax: .res 2 ; Y2 value of bounding box Buttons: .res 1 ; Button mask +OldButton: .res 1 ; previous buttons ; Default values for above variables @@ -337,10 +338,19 @@ IRQ: ora Buttons sta Buttons +; Check if button status changed, and disable "attract mode" if yes + +@L02: lda Buttons + cmp OldButton + beq @L03 + sta OldButton + lda #0 + sta ATRACT + ; If we read 228 for X or Y positions, we assume the user has lifted the pen ; and don't change the cursor position. -@L02: lda PADDL0 +@L03: lda PADDL0 cmp #228 beq @Cont ; CF set if equal lda PADDL1 @@ -350,12 +360,13 @@ IRQ: jsr CPREP plp ; restore CF - bcc @L03 + bcc @L04 jmp @Show -@L03: ldx #0 +@L04: ldx #0 stx XPos+1 stx YPos+1 + stx ATRACT ; disable "attract mode" ; Get cursor position ; ------------------- @@ -382,9 +393,9 @@ IRQ: clc adc XPos sta XPos - bcc @L04 + bcc @L05 inc XPos+1 -@L04: txa +@L05: txa lsr a ; port value / 4 lsr a ; port value / 8 tax @@ -393,18 +404,18 @@ IRQ: stx XPos sbc XPos sta XPos - bcs @L05 + bcs @L06 dec XPos+1 -@L05: txa +@L06: txa lsr a ; port value / 16 lsr a ; port value / 32 clc adc XPos sta XPos - bcc @L06 + bcc @L07 inc XPos+1 -@L06: tay +@L07: tay lda XPos+1 tax @@ -412,18 +423,18 @@ IRQ: cpy XMin sbc XMin+1 - bpl @L07 + bpl @L08 ldy XMin ldx XMin+1 - jmp @L08 -@L07: txa + jmp @L09 +@L08: txa cpy XMax sbc XMax+1 - bmi @L08 + bmi @L09 ldy XMax ldx XMax+1 -@L08: sty XPos +@L09: sty XPos stx XPos+1 ; Move the mouse pointer to the new X pos @@ -456,18 +467,18 @@ IRQ: cpy YMin sbc YMin+1 - bpl @L09 + bpl @L10 ldy YMin ldx YMin+1 - jmp @L10 -@L09: txa + jmp @L11 +@L10: txa cpy YMax sbc YMax+1 - bmi @L10 + bmi @L11 ldy YMax ldx YMax+1 -@L10: sty YPos +@L11: sty YPos stx YPos+1 ; Move the mouse pointer to the new X pos @@ -479,4 +490,3 @@ IRQ: clc ; Interrupt not "handled" rts - diff --git a/libsrc/atari/mouseref.s b/libsrc/atari/mouseref.s index b75df93d1..ac99d36fa 100644 --- a/libsrc/atari/mouseref.s +++ b/libsrc/atari/mouseref.s @@ -5,8 +5,8 @@ .export mouse_libref .ifdef __ATARIXL__ - .import set_VTIMR1_handler -mouse_libref := set_VTIMR1_handler + .import set_VTIMR2_handler +mouse_libref := set_VTIMR2_handler .else .import _exit mouse_libref := _exit diff --git a/libsrc/atari/mul40.s b/libsrc/atari/mul40.s deleted file mode 100644 index 96235bf6c..000000000 --- a/libsrc/atari/mul40.s +++ /dev/null @@ -1,35 +0,0 @@ -; -; Christian Groessler, June 2000 -; -; mul40 -; multiplies A by 40 and returns result in AX -; uses tmp4 - - .importzp tmp4 - .export mul40,loc_tmp - -.proc mul40 - - ldx #0 - stx tmp4 - sta loc_tmp - asl a - rol tmp4 - asl a - rol tmp4 ; val * 4 - adc loc_tmp - bcc L1 - inc tmp4 ; val * 5 -L1: asl a - rol tmp4 ; val * 10 - asl a - rol tmp4 - asl a - rol tmp4 ; val * 40 - ldx tmp4 - rts - -.endproc - - .bss -loc_tmp:.res 1 diff --git a/libsrc/atari/open.s b/libsrc/atari/open.s index 2188257cb..721519525 100644 --- a/libsrc/atari/open.s +++ b/libsrc/atari/open.s @@ -8,6 +8,7 @@ .include "fcntl.inc" .include "errno.inc" .include "fd.inc" + .include "zeropage.inc" .export _open .destructor closeallfiles, 5 @@ -19,9 +20,7 @@ .import incsp4 .import ldaxysp,addysp .import __oserror - .importzp tmp4,tmp2 .ifdef UCASE_FILENAME - .importzp tmp3 .import ucase_fn .endif @@ -93,8 +92,10 @@ cont: ldy #3 .ifdef UCASE_FILENAME .ifdef DEFAULT_DEVICE ldy #$80 - sty tmp2 ; set flag for ucase_fn +.else + ldy #$00 .endif + sty tmp2 ; set flag for ucase_fn jsr ucase_fn bcc ucok1 invret: lda #<EINVAL ; file name is too long diff --git a/libsrc/atari/oserror.s b/libsrc/atari/oserror.s index a4ba07c0f..1d95dbc36 100644 --- a/libsrc/atari/oserror.s +++ b/libsrc/atari/oserror.s @@ -95,7 +95,7 @@ maptable: .byte EUNKNOWN ; 177 - haven't found documentation .byte EUNKNOWN ; 178 - haven't found documentation .byte EUNKNOWN ; 179 - haven't found documentation - .byte EUNKNOWN ; 180 - not a binary file + .byte ENOEXEC ; 180 - not a binary file .byte EUNKNOWN ; 181 - [MYDOS] invalid address range .byte EUNKNOWN ; 182 - [XDOS] invalid parameter diff --git a/libsrc/atari/ostype.s b/libsrc/atari/ostype.s index 7248582a6..876e8749d 100644 --- a/libsrc/atari/ostype.s +++ b/libsrc/atari/ostype.s @@ -93,7 +93,7 @@ _get_ostype: asl a asl a and #%00111000 - ora #%11 + ora #%00000011 _fin: ldx #0 disable_rom_save_a rts @@ -117,7 +117,7 @@ _1200_11: lda #%00010000 _1200_fin: - ora #%010 + ora #%00000010 bne _fin ; 400/800 ROM diff --git a/libsrc/atari/randomize.s b/libsrc/atari/randomize.s index ed4400b55..915fee3bd 100644 --- a/libsrc/atari/randomize.s +++ b/libsrc/atari/randomize.s @@ -10,7 +10,7 @@ .include "atari.inc" -__randomize: +__randomize: ldx VCOUNT ; Use vertical line counter as high byte lda RTCLOK+2 ; Use clock as low byte jmp _srand ; Initialize generator diff --git a/libsrc/atari/revers.s b/libsrc/atari/revers.s index 719503940..23126a88f 100644 --- a/libsrc/atari/revers.s +++ b/libsrc/atari/revers.s @@ -4,7 +4,7 @@ ; unsigned char revers (unsigned char onoff); ; .include "atari.inc" - + .export _revers .export _revflag diff --git a/libsrc/atari/scroll.s b/libsrc/atari/scroll.s index 5e8428cc2..4bc0d72ed 100644 --- a/libsrc/atari/scroll.s +++ b/libsrc/atari/scroll.s @@ -8,7 +8,7 @@ .include "atari.inc" .importzp tmp1,tmp4,ptr1,ptr2 - .import mul40,_clrscr + .import _mul40,_clrscr .export __scroll .proc __scroll @@ -40,7 +40,7 @@ down_ok:lda SAVMSC sta ptr2+1 lda tmp1 - jsr mul40 + jsr _mul40 sta tmp4 lda ptr2 sec @@ -103,8 +103,7 @@ up: sta tmp1 ; # of lines to scroll jmp _clrscr ;multiply by 40 (xsize) -up_ok: jsr mul40 - clc +up_ok: jsr _mul40 ; carry is cleared by _mul40 adc SAVMSC ; add start of screen mem sta ptr2 txa diff --git a/libsrc/atari/sdxtime-bss.s b/libsrc/atari/sdxtime-bss.s new file mode 100644 index 000000000..62bb58bba --- /dev/null +++ b/libsrc/atari/sdxtime-bss.s @@ -0,0 +1,9 @@ +; .bss variable used by SpartaDOS-X implementations of +; gettime.s and settime.s + + .export sdxtry + + .bss + +sdxtry: .res 1 ; limit of unsuccessful tries to call GETTD/SETTD + ; (see settime.s) diff --git a/libsrc/atari/setcursor.s b/libsrc/atari/setcursor.s new file mode 100644 index 000000000..c6d844047 --- /dev/null +++ b/libsrc/atari/setcursor.s @@ -0,0 +1,47 @@ +; +; Christian Groessler, November-2002 +; +; cursor handling, internal function + + .include "atari.inc" + .import cursor,_mul40 + .export setcursor + +.proc setcursor + + ldy #0 + lda OLDCHR + sta (OLDADR),y + + lda ROWCRS + jsr _mul40 ; function leaves with carry clear! + adc SAVMSC ; add start of screen memory + sta OLDADR + txa + adc SAVMSC+1 + sta OLDADR+1 + lda COLCRS + adc OLDADR + sta OLDADR + bcc nc + inc OLDADR+1 +nc: lda (OLDADR),y + sta OLDCHR + + ldx cursor ; current cursor setting as requested by the user + beq off + ldx #0 + beq cont + +off: inx +cont: stx CRSINH ; update system variable + + beq turnon + and #$7f ; clear high bit / inverse flag +finish: sta (OLDADR),y ; update on-screen display + rts + +turnon: ora #$80 ; set high bit / inverse flag + bne finish + +.endproc diff --git a/libsrc/atari/settime.s b/libsrc/atari/settime.s new file mode 100644 index 000000000..7d6fff2c0 --- /dev/null +++ b/libsrc/atari/settime.s @@ -0,0 +1,99 @@ +; +; Oliver Schmidt, 15.08.2018 +; Christian Groessler, 25.09.2018 +; +; int __fastcall__ clock_settime (clockid_t clk_id, const struct timespec *tp); +; + + .import __dos_type + .import incsp1, return0 + .import sdxtry + + .include "time.inc" + .include "zeropage.inc" + .include "errno.inc" + .include "atari.inc" + +_clock_settime: + +; cleanup stack + + jsr incsp1 ; preserves AX + +; only supported on SpartaDOS-X >= 4.40 + + ldy #SPARTADOS + cpy __dos_type + bne enosys + ldy SDX_VERSION + cpy #$44 + bcc enosys + +; create tm from tp (tv_sec) input parameter + + .assert timespec::tv_sec = 0, error + jsr _localtime + sta ptr1 + stx ptr1+1 + +; set date + + ldy #tm::tm_mday + lda (ptr1),y ; get day of month + sta SDX_DATE ; set day of month + + ldy #tm::tm_mon + lda (ptr1),y ; get month (0-based) + tax + inx ; move [0..11] to [1..12] + stx SDX_DATE+1 + + ldy #tm::tm_year + lda (ptr1),y ; get year (0 = year 1900) + cmp #100 + bcc :+ + sbc #100 +: sta SDX_DATE+2 + + ldy #tm::tm_hour + lda (ptr1),y ; get hour + sta SDX_TIME + + ldy #tm::tm_min + lda (ptr1),y ; get minutes + sta SDX_TIME+1 + + ldy #tm::tm_sec + lda (ptr1),y ; get seconds + sta SDX_TIME+2 + +; set new time/date (SD-X call) +; SpartaDOS-X User's Guide (4.48) states at page 145: +; "In the I_GETTD and I_SETTD procedures a set Carry-Flag means that the clock driver is +; busy at the moment. You should call the routine again." +; It goes on to mention that one should provide an upper limit on the number of calls, +; in order not to "hang". We are doing this here... + + lda #0 ; init loop count (256) + sta sdxtry + +try_set:lda #SDX_CLK_DEV ; CLK device + sta SDX_DEVICE + ldy #SDX_KD_SETTD ; SETTD function + jsr SDX_KERNEL ; do the call + bcc done + + dec sdxtry + bne try_set + + lda #EBUSY + bne drcter ; jump always + +; return success + +done: jmp return0 + +; load errno code + +enosys: lda #ENOSYS +drcter: jmp __directerrno diff --git a/libsrc/atari/shadow_ram_handlers.s b/libsrc/atari/shadow_ram_handlers.s index 53a71ab71..eaea35195 100644 --- a/libsrc/atari/shadow_ram_handlers.s +++ b/libsrc/atari/shadow_ram_handlers.s @@ -22,11 +22,12 @@ SHRAM_HANDLERS = 1 .export CIO_handler .export SIO_handler .export SETVBV_handler + .export XMOVE_handler BUFSZ = 128 ; bounce buffer size BUFSZ_SIO = 256 -.segment "INIT" +.segment "ONCE" ; Turn off ROMs, install system and interrupt wrappers, set new chargen pointer @@ -736,9 +737,9 @@ fn_cont:jsr get_fn_len lda #0 sta ICBLH,x jsr chk_CIO_buf - pla + pla sta ICBLH,x - pla + pla sta ICBLL,x pla tay @@ -755,7 +756,7 @@ chk_CIO_buf: lda ICBAH,x cmp #$c0 bcc @cont -@ret: +@ret: .ifdef DEBUG jsr CIO_buf_noti .endif @@ -1085,6 +1086,24 @@ SETVBV_handler: plp rts +;--------------------------------------------------------- + +XMOVE_handler: + + pha + lda PORTB + sta cur_XMOVE_PORTB + enable_rom + pla + jsr XMOVE_org + php + pha + disable_rom_val cur_XMOVE_PORTB + pla + plp + rts + + CIO_a: .res 1 CIO_x: .res 1 CIO_y: .res 1 @@ -1093,6 +1112,7 @@ cur_CIOV_PORTB: .res 1 cur_SIOV_PORTB: .res 1 cur_KEYBDV_PORTB: .res 1 cur_SETVBV_PORTB: .res 1 +cur_XMOVE_PORTB: .res 1 orig_ptr: .res 2 orig_len: .res 2 req_len: .res 2 diff --git a/libsrc/atari/shadow_ram_timerirq1.s b/libsrc/atari/shadow_ram_timerirq1.s index f8a3e9b4d..e1b7d831b 100644 --- a/libsrc/atari/shadow_ram_timerirq1.s +++ b/libsrc/atari/shadow_ram_timerirq1.s @@ -11,6 +11,7 @@ SHRAM_HANDLERS = 1 .include "atari.inc" .include "romswitch.inc" + .import __CHARGEN_START__ .export set_VTIMR1_handler diff --git a/libsrc/atari/shadow_ram_timerirq2.s b/libsrc/atari/shadow_ram_timerirq2.s new file mode 100644 index 000000000..d6d581937 --- /dev/null +++ b/libsrc/atari/shadow_ram_timerirq2.s @@ -0,0 +1,82 @@ +; +; Atari XL shadow RAM timer IRQ #2 handler +; +; Christian Groessler, chris@groessler.org, 2019 +; + +;DEBUG = 1 + +.ifdef __ATARIXL__ + +SHRAM_HANDLERS = 1 + .include "atari.inc" + .include "romswitch.inc" + .import __CHARGEN_START__ + .export set_VTIMR2_handler + + +.segment "LOWBSS" + +VTIMR2_handler: .res 3 + + +.segment "BSS" + +old_VTIMR2_handler: + .res 2 + + +.segment "LOWCODE" + +; timer interrupt handler: +; disable ROM, call user handler, enable ROM again + +my_VTIMR2_handler: + disable_rom_quick + jsr VTIMR2_handler + enable_rom_quick + pla + rti + +.segment "CODE" + +; install or remove VTIMR2 handler +; input: CF - 0/1 for remove/install handler +; AX - pointer to handler (if CF=1) +; registers destroyed + +set_VTIMR2_handler: + + bcc @remove + +; install vector + + stx VTIMR2_handler+2 + sta VTIMR2_handler+1 ; save passed vector in low memory + lda #$4C ; "JMP" opcode + sta VTIMR2_handler + + lda VTIMR2 + sta old_VTIMR2_handler + lda VTIMR2+1 + sta old_VTIMR2_handler+1 + + lda #<my_VTIMR2_handler + php + sei + sta VTIMR2 + lda #>my_VTIMR2_handler + sta VTIMR2+1 + plp + rts + +@remove: php + sei + lda old_VTIMR2_handler + sta VTIMR2 + lda old_VTIMR2_handler+1 + sta VTIMR2+1 + plp + rts + +.endif ; .ifdef __ATARIXL__ diff --git a/libsrc/atari/siocall.s b/libsrc/atari/siocall.s index 3db37753f..e4fc505e3 100644 --- a/libsrc/atari/siocall.s +++ b/libsrc/atari/siocall.s @@ -16,7 +16,7 @@ .export __sio_call .include "atari.inc" - .import popa,popax + .import popa,popax,popptr1 .import sectsizetab,__oserror .importzp ptr1 @@ -31,9 +31,7 @@ sta DAUX1 ; set sector # stx DAUX2 - jsr popax - sta ptr1 - stx ptr1+1 + jsr popptr1 ldy #sst_flag lda (ptr1),y diff --git a/libsrc/atari/syschdir.s b/libsrc/atari/syschdir.s index d57708384..f493fea54 100644 --- a/libsrc/atari/syschdir.s +++ b/libsrc/atari/syschdir.s @@ -3,7 +3,7 @@ ; Based on on code by Christian Groessler ; ; unsigned char __fastcall__ _syschdir (const char* name); -; for SpartaDOS and MyDOS +; for SpartaDOS, RealDOS, and MyDOS ; .include "atari.inc" @@ -65,6 +65,10 @@ ucok1: lda __dos_type cmp #SPARTADOS beq :+ + cmp #REALDOS + beq :+ + cmp #BWDOS + beq :+ lda #CHDIR_MYDOS .byte $2C ; BIT <abs> : lda #CHDIR_SPDOS diff --git a/libsrc/atari/sysrmdir.s b/libsrc/atari/sysrmdir.s index 3f5b9e447..f568ded6e 100644 --- a/libsrc/atari/sysrmdir.s +++ b/libsrc/atari/sysrmdir.s @@ -26,11 +26,12 @@ pha lda __dos_type - beq not_impl ; AtariDOS cmp #OSADOS+1 bcc do_sparta ; OS/A and SpartaDOS + cmp #MYDOS + bne not_impl ; neither MyDOS, OS/A, nor SpartaDOS pla - jmp __sysremove ; MyDOS and others (TODO: check XDOS) + jmp __sysremove ; MyDOS not_impl: pla diff --git a/libsrc/atari/system_check.s b/libsrc/atari/system_check.s index 2f1feefc4..762fc954f 100644 --- a/libsrc/atari/system_check.s +++ b/libsrc/atari/system_check.s @@ -16,8 +16,7 @@ ;DEBUG = 1 - .export __SYSTEM_CHECK__: absolute = 1 - .import __SYSCHK_LOAD__ + .export __SYSTEM_CHECK__, __SYSCHK_END__ .import __STARTADDRESS__ ; the following imports are only needed for the 'atari' target version @@ -25,10 +24,12 @@ .import __STACKSIZE__ .import __RESERVED_MEMORY__ + ; import our header and trailers + .forceimport __SYSCHKHDR__, __SYSCHKTRL__ + .include "zeropage.inc" .include "atari.inc" - .macro print_string text .local start, cont jmp cont @@ -68,8 +69,41 @@ cont: ldx #0 ; channel 0 .segment "SYSCHK" + rts ; for older DOSes which unconditionally run the first load chunk + .ifdef __ATARIXL__ +; check for SpartaDOS and its usage of RAM below ROM +; return CF 0/1 for ok/bad +sdcheck:lda DOS + cmp #'S' + bne sdcrts0 ; not SpartaDOS, assume RAM is not used + +; check for BW-DOS, which always reports itself as SpartaDOS, but doesn't use memory under the ROM + lda DOS+3 ; 'B' in BW-DOS + cmp #'B' + bne sdnobw + lda DOS+4 ; 'W' in BW-DOS + cmp #'W' + beq sdcrts0 ; BW-DOS does not use RAM below ROM + +sdnobw: lda DOS+1 ; SD version + cmp #$40 ; SD-X has $40 or higher + bcc sdcrts1 ; older versions (except maybe 1.x) always use the RAM under the ROM + ldy #31 ; offset for OSRMFLG + lda (DOSVEC),y ; get OSRMFLG + bne sdcrts1 + +sdcrts0:clc + rts +sdcrts1:sec + rts + +ramrom_txt: + .byte "Memory under ROM is in use.", ATEOL + .byte "Cannot run this program.", ATEOL +ramrom_txt_len = * - ramrom_txt + lmemerrxl_txt: .byte "Not enough memory to move screen", ATEOL .byte "memory to low memory. Consider using", ATEOL @@ -94,8 +128,13 @@ syschk: lda $fcd8 ; from ostype.s jmp mem_err -sys_ok: - .include "xlmemchk.inc" ; calculate lowest address we will use when we move the screen buffer down +sys_ok: jsr sdcheck ; check for SpartaDOS-X, and if found, whether it uses the RAM under the ROM + bcc sd_ok + + print_string2 ramrom_txt, ramrom_txt_len + jmp fail + +sd_ok: .include "xlmemchk.inc" ; calculate lowest address we will use when we move the screen buffer down lda MEMLO cmp lowadr @@ -191,25 +230,10 @@ delay1: ldx #0 .endproc -end: +__SYSTEM_CHECK__=syschk +__SYSCHK_END__: .ifndef __ATARIXL__ tmp: ; outside of the load chunk, some kind of poor man's .bss .endif -; ------------------------------------------------------------------------ -; Chunk header - -.segment "SYSCHKHDR" - - .word __SYSCHK_LOAD__ - .word end - 1 - -; ------------------------------------------------------------------------ -; Chunk "trailer" - sets INITAD - -.segment "SYSCHKTRL" - - .word INITAD - .word INITAD+1 - .word syschk diff --git a/libsrc/atari/system_check_hdr.s b/libsrc/atari/system_check_hdr.s new file mode 100644 index 000000000..1581ab918 --- /dev/null +++ b/libsrc/atari/system_check_hdr.s @@ -0,0 +1,16 @@ +; +; Atari startup system check headers +; +; Christian Groessler, chris@groessler.org, 2013 +; + .export __SYSCHKHDR__: absolute = 1 + .import __SYSCHK_LOAD__, __SYSCHK_END__ + +; ------------------------------------------------------------------------ +; Chunk header + +.segment "SYSCHKHDR" + + .word __SYSCHK_LOAD__ + .word __SYSCHK_END__ - 1 + diff --git a/libsrc/atari/system_check_trailer.s b/libsrc/atari/system_check_trailer.s new file mode 100644 index 000000000..312b83b1f --- /dev/null +++ b/libsrc/atari/system_check_trailer.s @@ -0,0 +1,17 @@ +; +; Atari startup system check headers +; +; Christian Groessler, chris@groessler.org, 2013 +; + .export __SYSCHKTRL__: absolute = 1 + .import __SYSTEM_CHECK__ + + .include "atari.inc" +; ------------------------------------------------------------------------ +; Chunk "trailer" - sets INITAD + +.segment "SYSCHKTRL" + + .word INITAD + .word INITAD+1 + .word __SYSTEM_CHECK__ diff --git a/libsrc/atari/systime.s b/libsrc/atari/systime.s deleted file mode 100644 index 273e394a4..000000000 --- a/libsrc/atari/systime.s +++ /dev/null @@ -1,28 +0,0 @@ -; -; Ullrich von Bassewitz, 12.11.2002 -; -; time_t _systime (void); -; /* Similar to time(), but: -; ** - Is not ISO C -; ** - Does not take the additional pointer -; ** - Does not set errno when returning -1 -; */ -; - - .export __systime - - .importzp sreg - -.code - -.proc __systime - - lda #$FF - tax - sta sreg - sta sreg+1 - rts ; Return -1 - -.endproc - - diff --git a/libsrc/atari/targetutil/Makefile.inc b/libsrc/atari/targetutil/Makefile.inc index 05405f2e6..e78585238 100644 --- a/libsrc/atari/targetutil/Makefile.inc +++ b/libsrc/atari/targetutil/Makefile.inc @@ -3,7 +3,7 @@ DEPS += ../libwrk/$(TARGET)/w2cas.d ../libwrk/$(TARGET)/w2cas.o: $(SRCDIR)/targetutil/w2cas.c | ../libwrk/$(TARGET) $(COMPILE_recipe) -../targetutil/w2cas.com: ../libwrk/$(TARGET)/w2cas.o ../lib/$(TARGET).lib | ../targetutil +../target/$(TARGET)/util/w2cas.com: ../libwrk/$(TARGET)/w2cas.o ../lib/$(TARGET).lib | ../target/$(TARGET)/util $(LD65) -o $@ -t $(TARGET) $^ -$(TARGET): ../targetutil/w2cas.com +$(TARGET): ../target/$(TARGET)/util/w2cas.com diff --git a/libsrc/atari/targetutil/w2cas.c b/libsrc/atari/targetutil/w2cas.c index 4d574da07..9358e5fea 100644 --- a/libsrc/atari/targetutil/w2cas.c +++ b/libsrc/atari/targetutil/w2cas.c @@ -14,6 +14,7 @@ #include <errno.h> #include <6502.h> #include <atari.h> +#include <cc65.h> #include <conio.h> static int verbose = 1; @@ -21,13 +22,11 @@ static char C_dev[] = "C:"; static struct __iocb *findfreeiocb(void) { - struct __iocb *iocb = &IOCB; /* first IOCB (#0) */ int i; for (i = 0; i < 8; i++) { - if (iocb->handler == 0xff) - return iocb; - iocb++; + if (OS.iocb[i].handler == 0xff) + return &OS.iocb[i]; } return NULL; } @@ -43,13 +42,15 @@ int main(int argc, char **argv) struct __iocb *iocb = findfreeiocb(); int iocb_num; + /* if DOS will automatically clear the screen after the program exits, wait for a keypress... */ + if (doesclrscrafterexit()) + atexit((void (*)(void))cgetc); + if (! iocb) { fprintf(stderr, "couldn't find a free iocb\n"); - if (_dos_type != 1) - cgetc(); return 1; } - iocb_num = (iocb - &IOCB) * 16; + iocb_num = (iocb - OS.iocb) * 16; if (verbose) printf("using iocb index $%02X ($%04X)\n", iocb_num, iocb); @@ -57,10 +58,16 @@ int main(int argc, char **argv) printf("\nfilename: "); x = fgets(buf, 19, stdin); printf("\n"); - if (! x) + if (! x) { + printf("empty filename, exiting...\n"); return 1; + } if (*x && *(x + strlen(x) - 1) == '\n') *(x + strlen(x) - 1) = 0; + if (! strlen(x)) { /* empty filename */ + printf("empty filename, exiting...\n"); + return 1; + } filename = x; } else { @@ -74,8 +81,6 @@ int main(int argc, char **argv) buffer = malloc(buflen); if (! buffer) { fprintf(stderr, "cannot alloc %ld bytes -- aborting...\n", (long)buflen); - if (_dos_type != 1) - cgetc(); return 1; } } @@ -87,8 +92,6 @@ int main(int argc, char **argv) if (! file) { free(buffer); fprintf(stderr, "cannot open '%s': %s\n", filename, strerror(errno)); - if (_dos_type != 1) - cgetc(); return 1; } @@ -101,8 +104,6 @@ int main(int argc, char **argv) file_err: fclose(file); free(buffer); - if (_dos_type != 1) - cgetc(); return 1; } if (filen > 32767l) { @@ -133,8 +134,6 @@ int main(int argc, char **argv) if (regs.y != 1) { fprintf(stderr, "CIO call to open cassette returned %d\n", regs.y); free(buffer); - if (_dos_type != 1) - cgetc(); return 1; } @@ -157,8 +156,6 @@ int main(int argc, char **argv) regs.pc = 0xe456; /* CIOV */ _sys(®s); - if (_dos_type != 1) - cgetc(); return 1; } @@ -173,14 +170,10 @@ int main(int argc, char **argv) if (regs.y != 1) { fprintf(stderr, "CIO call to close cassette returned %d\n", regs.y); - if (_dos_type != 1) - cgetc(); return 1; } /* all is fine */ printf("success\n"); - if (_dos_type != 1) - cgetc(); return 0; } diff --git a/libsrc/atari/tgi/atari_tgi_common.inc b/libsrc/atari/tgi/atari_tgi_common.inc index f4ef68165..8c9f6c1f9 100644 --- a/libsrc/atari/tgi/atari_tgi_common.inc +++ b/libsrc/atari/tgi/atari_tgi_common.inc @@ -68,7 +68,6 @@ libref: .addr $0000 ; Library reference .addr BAR .addr TEXTSTYLE .addr OUTTEXT - .addr 0 ; IRQ entry is unused ; ****************************************************************************** @@ -1111,11 +1110,8 @@ skipm: ; Loop while --dy > 0 ; locals string := tmp1 - cols := tmp3 pixels := tmp4 font := regsave -.rodata - ataint: .byte 64,0,32,96 .bss rows: .res 1 @@ -1223,32 +1219,31 @@ scvert: ldx x1 .endif ; Draw one character - ; Convert to ANTIC code -draw: tay - rol a - rol a - rol a - rol a - and #3 - tax - tya - and #$9f - ora ataint,x - ; Save and clear inverse video bit - sta inv - and #$7F +draw: + ; Extract the inverse mask + ldx #0 + asl a + bcc noinv + dex +noinv: stx inv + ; Calculate font data address + ldx CHBAS + cmp #$20*2 + bpl lowhalf + ; Semigraphic or lowercase + inx + inx +lowhalf: + asl a + bcc lowquarter + ; Letter + inx +lowquarter: + asl a sta font - lda #0 - sta font + 1 + stx font+1 - .repeat 3 - asl font - rol a - .endrepeat - - adc CHBAS - sta font + 1 ; Save old coords bit text_dir bpl hor @@ -1274,15 +1269,12 @@ cont: ldy #7 ; Put one row of the glyph putrow: sty rows lda (font),y - bit inv - bpl noinv - eor #$FF -noinv: sta pixels - lda #7 - sta cols + eor inv + sec + rol a + sta pixels ; Put one column of the row -putcol: asl pixels - bcc next_col +putcol: bcc next_col lda x1 pha lda x1 + 1 @@ -1318,8 +1310,8 @@ vertinc: sub mag_x sta y2 L2: - dec cols - bpl putcol + asl pixels + bne putcol next_row: ; Go to next row bit text_dir diff --git a/libsrc/atari/tgiref.s b/libsrc/atari/tgiref.s new file mode 100644 index 000000000..5ac42fb46 --- /dev/null +++ b/libsrc/atari/tgiref.s @@ -0,0 +1,13 @@ +; +; Oliver Schmidt, 2013-05-31 +; + + .export tgi_libref + +.ifdef __ATARIXL__ + .import CIO_handler +tgi_libref := CIO_handler +.else + .import _exit +tgi_libref := _exit +.endif diff --git a/libsrc/atari/ucase_fn.s b/libsrc/atari/ucase_fn.s index e53750e29..f7f03915d 100644 --- a/libsrc/atari/ucase_fn.s +++ b/libsrc/atari/ucase_fn.s @@ -40,7 +40,9 @@ stx ptr4+1 .ifdef DEFAULT_DEVICE - ; bit #0 of tmp2 is used as a flag whether device name is present in passed string (1 = present, 0 = not present) + lda tmp2 + beq hasdev ; don't fiddle with device part + ; bit #0 of tmp2 is used as an additional flag whether device name is present in passed string (1 = present, 0 = not present) ldy #1 inc tmp2 ; initialize flag: device present lda #':' @@ -81,11 +83,11 @@ copy_end: .ifdef DEFAULT_DEVICE lda #1 - bit tmp2 + bit tmp2 ; is a device present in the string? bne hasdev2 ; yes, don't prepend something - bpl hasdev2 + bpl hasdev2 ; check input parameter (tmp2 != $80) - ldy #128+3 ; no, prepend "D:" (or other device) + ldy #128+3 ; no, prepend "Dn:" (__defdev) sty tmp3 ; adjust stack size used ldy #3 jsr subysp ; adjust stack pointer diff --git a/libsrc/atari/waitvsync.s b/libsrc/atari/waitvsync.s new file mode 100644 index 000000000..a19b2375d --- /dev/null +++ b/libsrc/atari/waitvsync.s @@ -0,0 +1,15 @@ +; +; Written by Christian Groessler <chris@groessler.org> +; +; void waitvsync (void); +; + + .include "atari.inc" + .export _waitvsync + +.proc _waitvsync + lda RTCLOK+2 +@lp: cmp RTCLOK+2 + beq @lp + rts +.endproc diff --git a/libsrc/atari/xlmemchk.inc b/libsrc/atari/xlmemchk.inc index f8be1c137..ecb874799 100644 --- a/libsrc/atari/xlmemchk.inc +++ b/libsrc/atari/xlmemchk.inc @@ -7,7 +7,7 @@ ; It calculates the value to put into RAMTOP for a subsequent ; "GRAPHICS 0" call, and the lowest address which will be used ; by the screen memory afterwards. -; +; ; inputs: ; __STARTADDRESS__ - load address of the program ; outputs: diff --git a/libsrc/atari2600/crt0.s b/libsrc/atari2600/crt0.s new file mode 100644 index 000000000..4f09a0a5a --- /dev/null +++ b/libsrc/atari2600/crt0.s @@ -0,0 +1,49 @@ +; Atari VCS 2600 startup code for cc65 +; +; Florent Flament (contact@florentflament.com), 2017 + + .export _exit + .export __STARTUP__ : absolute = 1 + + .import __RAM_START__, __RAM_SIZE__ + .import copydata + .import _main + + .include "zeropage.inc" + + +.segment "STARTUP" +start: +; Clear decimal mode + cld + +; Initialization Loop: +; * Clears Atari 2600 whole memory (128 bytes) including BSS segment +; * Clears TIA registers +; * Sets system stack pointer to $ff (i.e top of zero-page) + ldx #0 + txa +clearLoop: + dex + txs + pha + bne clearLoop + +; Initialize data + jsr copydata + +; Initialize C stack pointer + lda #<(__RAM_START__ + __RAM_SIZE__) + ldx #>(__RAM_START__ + __RAM_SIZE__) + sta sp + stx sp+1 + +; Call main + jsr _main +_exit: jmp _exit + + +.segment "VECTORS" +.word start ; NMI +.word start ; Reset +.word start ; IRQ diff --git a/libsrc/atari2600/ctype.s b/libsrc/atari2600/ctype.s new file mode 100644 index 000000000..1301965eb --- /dev/null +++ b/libsrc/atari2600/ctype.s @@ -0,0 +1,5 @@ +; Character specification table. +; +; uses the "common" definition + + .include "ctype_common.inc" diff --git a/libsrc/atari5200/_scrsize.s b/libsrc/atari5200/_scrsize.s new file mode 100644 index 000000000..025b1b3ff --- /dev/null +++ b/libsrc/atari5200/_scrsize.s @@ -0,0 +1,19 @@ +; +; Christian Groessler, 02-Apr-2019 +; +; Screen size variables +; + + .export screensize + .importzp screen_width, screen_height + .include "atari.inc" + +.proc screensize + + ldx #screen_width + ldy #screen_height + rts + +.endproc + + diff --git a/libsrc/atari5200/bgcolor.s b/libsrc/atari5200/bgcolor.s new file mode 100644 index 000000000..90db8892b --- /dev/null +++ b/libsrc/atari5200/bgcolor.s @@ -0,0 +1,26 @@ +; +; Greg King, 10-Apr-2019 +; + + .export _bgcolor + + .include "atari5200.inc" + +.data + +old_bg_index: + .byte COLOR_BLACK ; see conioscreen.s for default palette + +.code + +_bgcolor: + and #$03 + tax + ldy COLOR0,x + lda old_bg_index + sty COLOR4 ; set new value + stx old_bg_index + ldx #0 ; fix high byte + rts + +.end diff --git a/libsrc/atari5200/cartname.s b/libsrc/atari5200/cartname.s index c6a701884..11cbaaa67 100644 --- a/libsrc/atari5200/cartname.s +++ b/libsrc/atari5200/cartname.s @@ -2,10 +2,10 @@ ; ; Christian Groessler, 01-Mar-2014 -.include "atari.mac" - .export __CART_NAME__: absolute = 1 +.macpack atari + .segment "CARTNAME" scrcode " cc" diff --git a/libsrc/atari5200/chline.s b/libsrc/atari5200/chline.s index d5872f149..47c57966b 100644 --- a/libsrc/atari5200/chline.s +++ b/libsrc/atari5200/chline.s @@ -1 +1,26 @@ -.include "../atari/chline.s" +; +; Ullrich von Bassewitz, 08.08.1998 +; +; void chlinexy (unsigned char x, unsigned char y, unsigned char length); +; void chline (unsigned char length); +; + + .export _chlinexy, _chline + .import gotoxy, cputdirect + .importzp tmp1 + .include "atari5200.inc" + +_chlinexy: + pha ; Save the length + jsr gotoxy ; Call this one, will pop params + pla ; Restore the length + +_chline: + cmp #0 ; Is the length zero? + beq L9 ; Jump if done + sta tmp1 +L1: lda #CH_HLINE ; Horizontal line, screen code + jsr cputdirect ; Direct output + dec tmp1 + bne L1 +L9: rts diff --git a/libsrc/atari5200/clock.s b/libsrc/atari5200/clock.s index f2ef85b0b..fff766093 100644 --- a/libsrc/atari5200/clock.s +++ b/libsrc/atari5200/clock.s @@ -2,7 +2,6 @@ ; from Atari computer version by Christian Groessler, 2014 ; ; clock_t clock (void); -; unsigned _clocks_per_sec (void); ; .export _clock diff --git a/libsrc/atari5200/conioscreen.s b/libsrc/atari5200/conioscreen.s index 660276675..8c78fd44f 100644 --- a/libsrc/atari5200/conioscreen.s +++ b/libsrc/atari5200/conioscreen.s @@ -7,11 +7,18 @@ SCREEN_BUF_SIZE = 20 * 24 SCREEN_BUF = $4000 - SCREEN_BUF_SIZE - .export screen_setup_20x24 + .export screen_setup + .export screen_width, screen_height + .export conio_color - .segment "INIT" +screen_width = 20 +screen_height = 24 -screen_setup_20x24: + + .segment "ONCE" + +; initialize color registers, display list, and screen memory +screen_setup: ; initialize SAVMSC lda #<SCREEN_BUF @@ -37,16 +44,15 @@ clrscr: sta (SAVMSC),y ; set default colors - lda #40 + lda #GTIA_COLOR_WHITE sta COLOR0 - lda #202 + lda #GTIA_COLOR_LIGHTRED sta COLOR1 - lda #148 + lda #GTIA_COLOR_LIGHTGREEN sta COLOR2 - lda #70 + lda #GTIA_COLOR_BLACK sta COLOR3 - lda #0 - sta COLOR4 + sta COLOR4 ; background ; set display list @@ -57,15 +63,18 @@ clrscr: sta (SAVMSC),y rts + .bss - .segment "RODATA" +conio_color: .res 1 + + .segment "DLIST" ; display list for 20x24 text mode dlist: .repeat 3 .byte DL_BLK8 .endrepeat - + .byte DL_CHR20x8x2 | DL_LMS .word SCREEN_BUF diff --git a/libsrc/atari5200/cputc.s b/libsrc/atari5200/cputc.s index 4bee0fba2..3e3a36cff 100644 --- a/libsrc/atari5200/cputc.s +++ b/libsrc/atari5200/cputc.s @@ -10,19 +10,18 @@ .export _cputcxy, _cputc .export plot, cputdirect, putchar - .import popa, _gotoxy, mul20 + .import gotoxy, _mul20 + .import conio_color + .importzp screen_width, screen_height .importzp ptr4 - .import setcursor - - .constructor screen_setup, 26 - .import screen_setup_20x24 -screen_setup = screen_setup_20x24 + .import screen_setup + .constructor initconio +initconio = screen_setup _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C _cputc: @@ -45,7 +44,7 @@ L4: cmp #$0A ; LF and #3 tax tya - and #$9f + and #$9F ora ataint,x cputdirect: ; accepts screen code @@ -54,7 +53,7 @@ cputdirect: ; accepts screen code ; advance cursor inc COLCRS_5200 lda COLCRS_5200 - cmp #20 + cmp #screen_width bcc plot lda #0 sta COLCRS_5200 @@ -63,12 +62,11 @@ cputdirect: ; accepts screen code newline: inc ROWCRS_5200 lda ROWCRS_5200 - cmp #24 + cmp #screen_height bne plot lda #0 sta ROWCRS_5200 -plot: jsr setcursor - ldy COLCRS_5200 +plot: ldy COLCRS_5200 ldx ROWCRS_5200 rts @@ -76,8 +74,7 @@ putchar: pha ; save char lda ROWCRS_5200 - jsr mul20 ; destroys tmp4 - clc + jsr _mul20 ; destroys tmp4, carry is cleared adc SAVMSC ; add start of screen memory sta ptr4 txa @@ -85,10 +82,12 @@ putchar: sta ptr4+1 pla ; get char again + and #$3F ; clear palette index bits + ora conio_color ; use currently selected palette + ldy COLCRS_5200 sta (ptr4),y - jmp setcursor + rts .rodata ataint: .byte 64,0,32,96 - diff --git a/libsrc/atari5200/crt0.s b/libsrc/atari5200/crt0.s index 7073bb2a7..8f6e02273 100644 --- a/libsrc/atari5200/crt0.s +++ b/libsrc/atari5200/crt0.s @@ -13,7 +13,6 @@ .import zerobss, copydata .include "zeropage.inc" - .include "atari5200.inc" start: @@ -27,9 +26,9 @@ start: ; Set up the stack. lda #<(__RAM_START__ + __RAM_SIZE__ - __RESERVED_MEMORY__) + ldx #>(__RAM_START__ + __RAM_SIZE__ - __RESERVED_MEMORY__) sta sp - lda #>(__RAM_START__ + __RAM_SIZE__ - __RESERVED_MEMORY__) - sta sp+1 ; Set argument stack ptr + stx sp+1 ; Set argument stack ptr ; Call the module constructors. @@ -45,4 +44,4 @@ _exit: jsr donelib ; Run module destructors ; A 5200 program isn't supposed to exit. -halt: jmp halt +halt: jmp halt diff --git a/libsrc/atari5200/cvline.s b/libsrc/atari5200/cvline.s index d987bcb62..b4b3f1a3e 100644 --- a/libsrc/atari5200/cvline.s +++ b/libsrc/atari5200/cvline.s @@ -1 +1,31 @@ -.include "../atari/cvline.s" +; +; Ullrich von Bassewitz, 08.08.1998 +; +; void cvlinexy (unsigned char x, unsigned char y, unsigned char length); +; void cvline (unsigned char length); +; + .include "atari5200.inc" + + .export _cvlinexy, _cvline + .import gotoxy, putchar + .importzp tmp1 + +_cvlinexy: + pha ; Save the length + jsr gotoxy ; Call this one, will pop params + pla ; Restore the length and run into _cvline + +_cvline: + cmp #0 ; Is the length zero? + beq L9 ; Jump if done + sta tmp1 +L1: lda COLCRS_5200 + pha + lda #CH_VLINE ; Vertical bar + jsr putchar ; Write, no cursor advance + pla + sta COLCRS_5200 + inc ROWCRS_5200 + dec tmp1 + bne L1 +L9: rts diff --git a/libsrc/atari5200/extra/conioscreen-20x12.s b/libsrc/atari5200/extra/conioscreen-20x12.s new file mode 100644 index 000000000..aeb11cb43 --- /dev/null +++ b/libsrc/atari5200/extra/conioscreen-20x12.s @@ -0,0 +1,92 @@ +; setup alternative CONIO screen (20x12, Antic mode 7, BASIC mode 2) +; +; 02-Apr-2019, Christian Groessler <chris@groessler.org> + + .include "atari5200.inc" + +SCREEN_BUF_SIZE = 20 * 12 +SCREEN_BUF = $4000 - SCREEN_BUF_SIZE + + .export screen_setup + .export screen_width, screen_height + .export conio_color + +screen_width = 20 +screen_height = 12 + + + .segment "ONCE" + +; initialize color registers, display list, and screen memory +screen_setup: + + ; initialize SAVMSC + lda #<SCREEN_BUF + sta SAVMSC + lda #>SCREEN_BUF + sta SAVMSC+1 + + ; initialize cursor position + lda #0 + sta COLCRS_5200 + sta ROWCRS_5200 + + ; clear screen buffer + ldy #<(SCREEN_BUF_SIZE-1) + ldx #>(SCREEN_BUF_SIZE-1) +clrscr: sta (SAVMSC),y + dey + cpy #$FF + bne clrscr + dex + cpx #$FF + bne clrscr + + ; set default colors + + lda #GTIA_COLOR_WHITE + sta COLOR0 + lda #GTIA_COLOR_LIGHTRED + sta COLOR1 + lda #GTIA_COLOR_LIGHTGREEN + sta COLOR2 + lda #GTIA_COLOR_BLACK + sta COLOR3 + sta COLOR4 ; background + + ; set display list + + lda #<dlist + sta SDLSTL + lda #>dlist + sta SDLSTH + + rts + + .bss + +conio_color: .res 1 + + .segment "DLIST" + +; display list for 20x12 text mode + +dlist: .repeat 3 + .byte DL_BLK8 + .endrepeat + + .byte DL_CHR20x16x2 | DL_LMS + .word SCREEN_BUF + + .repeat 11 + .byte DL_CHR20x16x2 + .endrepeat + + .byte DL_JVB + .word dlist + +; end of display list + +.assert ((* >> 10) = (dlist >> 10)), error, "Display list crosses 1K boundary" + + .end diff --git a/libsrc/atari5200/gotox.s b/libsrc/atari5200/gotox.s index 99f7cfd22..04fc46223 100644 --- a/libsrc/atari5200/gotox.s +++ b/libsrc/atari5200/gotox.s @@ -6,8 +6,7 @@ .include "atari5200.inc" .export _gotox - .import setcursor _gotox: sta COLCRS_5200 ; Set X - jmp setcursor + rts diff --git a/libsrc/atari5200/gotoxy.s b/libsrc/atari5200/gotoxy.s index a4b7c61d0..dce5b6c2a 100644 --- a/libsrc/atari5200/gotoxy.s +++ b/libsrc/atari5200/gotoxy.s @@ -6,12 +6,14 @@ .include "atari5200.inc" - .export _gotoxy + .export gotoxy, _gotoxy .import popa - .import setcursor + +gotoxy: + jsr popa ; Get Y _gotoxy: ; Set the cursor position sta ROWCRS_5200 ; Set Y jsr popa ; Get X sta COLCRS_5200 ; Set X - jmp setcursor + rts diff --git a/libsrc/atari5200/gotoy.s b/libsrc/atari5200/gotoy.s index fcdd05e4c..ef7c2e565 100644 --- a/libsrc/atari5200/gotoy.s +++ b/libsrc/atari5200/gotoy.s @@ -6,8 +6,7 @@ .include "atari5200.inc" .export _gotoy - .import setcursor _gotoy: sta ROWCRS_5200 ; Set Y - jmp setcursor + rts diff --git a/libsrc/atari5200/irq.s b/libsrc/atari5200/irq.s index 720113f82..263805d02 100644 --- a/libsrc/atari5200/irq.s +++ b/libsrc/atari5200/irq.s @@ -9,7 +9,7 @@ ; ------------------------------------------------------------------------ -.segment "INIT" +.segment "ONCE" initirq: lda VVBLKD diff --git a/libsrc/atari5200/joy/atr5200std.s b/libsrc/atari5200/joy/atr5200std.s index 3483cc11a..fb7946bea 100644 --- a/libsrc/atari5200/joy/atr5200std.s +++ b/libsrc/atari5200/joy/atr5200std.s @@ -27,24 +27,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $20 ; JOY_FIRE2 - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READJOY - .addr 0 ; IRQ entry not used .code @@ -56,6 +44,8 @@ ; INSTALL: + lda #$04 ; enable POT input from the joystick ports, see section "GTIA" in + sta CONSOL ; http://www.atarimuseum.com/videogames/consoles/5200/conv_to_5200.html lda #JOY_ERR_OK ldx #0 ; rts ; Run into UNINSTALL instead @@ -92,6 +82,7 @@ SENSIVITY = 16 READJOY: and #3 ; put joystick number in range, just in case + sta jsnum ; remember joystick number tay asl a tax ; Joystick number * 2 (0-6) into X, index into ZP shadow registers @@ -99,7 +90,7 @@ READJOY: lda #0 ; Initialize return value cmp TRIG0,y bne @notrg - lda #$10 ; JOY_FIRE + ora #$10 ; JOY_BTN ; Read joystick @@ -129,4 +120,15 @@ READJOY: ora #2 ; JOY_DOWN -@done: rts +@done: ldx #0 + ldy jsnum + cmp oldval,y + beq @ret + sta oldval,y + stx ATRACT +@ret: rts + +.bss + +oldval:.res 4 +jsnum: .res 1 diff --git a/libsrc/atari5200/mul20.s b/libsrc/atari5200/mul20.s deleted file mode 100644 index fc67b34e4..000000000 --- a/libsrc/atari5200/mul20.s +++ /dev/null @@ -1,33 +0,0 @@ -; -; Christian Groessler, April 2014 -; -; mul20 -; multiplies A by 20 and returns result in AX -; uses tmp4 - - .importzp tmp4 - .export mul20,loc_tmp - -.proc mul20 - - ldx #0 - stx tmp4 - sta loc_tmp - asl a - rol tmp4 - asl a - rol tmp4 ; val * 4 - adc loc_tmp - bcc L1 - inc tmp4 ; val * 5 -L1: asl a - rol tmp4 ; val * 10 - asl a - rol tmp4 ; val * 20 - ldx tmp4 - rts - -.endproc - - .bss -loc_tmp:.res 1 diff --git a/libsrc/atari5200/randomize.s b/libsrc/atari5200/randomize.s index ef462827e..978ccf3f3 100644 --- a/libsrc/atari5200/randomize.s +++ b/libsrc/atari5200/randomize.s @@ -10,7 +10,7 @@ .include "atari5200.inc" -__randomize: +__randomize: ldx VCOUNT ; Use vertical line counter as high byte lda RTCLOK+1 ; Use clock as low byte jmp _srand ; Initialize generator diff --git a/libsrc/atari5200/textcolor.s b/libsrc/atari5200/textcolor.s new file mode 100644 index 000000000..511e23de3 --- /dev/null +++ b/libsrc/atari5200/textcolor.s @@ -0,0 +1,28 @@ +; +; Christian Groessler, 02-Apr-2019 +; +; unsigned char __fastcall__ textcolor (unsigned char color); +; +; "color" value is a palette index (0..3) or COLOR_xxx value (0..3) + + .export _textcolor + .import conio_color + + +_textcolor: + ; move bits #0 and #1 to bits #6 and #7 + and #3 + clc + ror a + ror a + ror a ; new conio_color value + ldx conio_color ; get old value + sta conio_color ; store new value + txa + ; move bits #6 and #7 to bits #0 and #1 + clc + rol a + rol a + rol a + ldx #0 + rts diff --git a/libsrc/atari5200/waitvsync.s b/libsrc/atari5200/waitvsync.s new file mode 100644 index 000000000..9a67c6429 --- /dev/null +++ b/libsrc/atari5200/waitvsync.s @@ -0,0 +1,15 @@ +; +; Written by Christian Groessler <chris@groessler.org> +; +; void waitvsync (void); +; + + .include "atari5200.inc" + .export _waitvsync + +.proc _waitvsync + lda RTCLOK+1 +@lp: cmp RTCLOK+1 + beq @lp + rts +.endproc diff --git a/libsrc/atari5200/wherex.s b/libsrc/atari5200/wherex.s new file mode 100644 index 000000000..77f099d88 --- /dev/null +++ b/libsrc/atari5200/wherex.s @@ -0,0 +1,13 @@ +; +; Carsten Strotmann, 30.12.2002 +; +; unsigned char wherex (void); +; + + .export _wherex + .include "atari5200.inc" + +_wherex: + lda COLCRS_5200 + ldx #0 + rts diff --git a/libsrc/atari5200/wherey.s b/libsrc/atari5200/wherey.s new file mode 100644 index 000000000..d2c50427c --- /dev/null +++ b/libsrc/atari5200/wherey.s @@ -0,0 +1,13 @@ +; +; Carsten Strotmann, 30.12.2002 +; +; unsigned char wherey (void); +; + + .export _wherey + .include "atari5200.inc" + +_wherey: + lda ROWCRS_5200 + ldx #0 + rts diff --git a/libsrc/atari5200/y2k.inc b/libsrc/atari5200/y2k.inc index a44d027a1..9f7917cd3 100644 --- a/libsrc/atari5200/y2k.inc +++ b/libsrc/atari5200/y2k.inc @@ -9,16 +9,16 @@ Y2K LDY #$00 ; Copy BIOS opening screen to RAM CPX #$E8 ; Is this a 4 port? BNE Y2K0 ; Jump if not LDA #$42 ; Yes, 4 port system -Y2K0 STA TEMPL -Y2K1 LDA (TEMPL),Y +Y2K0 STA TEMPL +Y2K1 LDA (TEMPL),Y STA $0600,Y - INY + INY BNE Y2K1 LDY #$50 INC TEMPH -Y2K2 LDA (TEMPL),Y +Y2K2 LDA (TEMPL),Y STA $0700,Y - DEY + DEY BPL Y2K2 LDA #$D4 ; Point to copyright string STA $0724 @@ -26,16 +26,14 @@ Y2K2 LDA (TEMPL),Y STA $0725 LDX #$0B ; Store NOP's @ end LDA #$EA -Y2K3 STA $0732,X - DEX +Y2K3 STA $0732,X + DEX BPL Y2K3 LDA #$60 ; Store RTS opcode @ end STA $0750 JSR $0600 ; Show title screen - LDY #$00 ; Clear RAM from $0600-$3FFF + LDY #<$0600 ; Clear RAM from $0600-$3FFF STY $80 - LDA #$06 + LDA #>$0600 STA $81 - JSR CLRRAM - RTS - + JMP CLRRAM diff --git a/libsrc/atari7800/clock.s b/libsrc/atari7800/clock.s new file mode 100644 index 000000000..03ae1e970 --- /dev/null +++ b/libsrc/atari7800/clock.s @@ -0,0 +1,69 @@ +; +; 2022-03-15, Karri Kaksonen +; +; clock_t clock (void); +; + + .export _clock, clock_count + .interruptor update_clock, 2 ; (low priority) + .constructor init_clock + + .import sreg: zp + .import _zonecounter + .include "atari7800.inc" + + .macpack generic + + .code + +;----------------------------------------------------------------------------- +; Read the clock counter. +; + .proc _clock + + lda #0 + sta sreg+1 ; Promote 24 bits up to 32 bits + lda clock_count+2 + sta sreg + ldx clock_count+1 + lda clock_count + + rts + .endproc + +;----------------------------------------------------------------------------- +; This interrupt handler increments a 24-bit counter at every video +; vertical-blanking time. +; Update the clock only on interrupt while the drawing on screen is on +; _zonecounter == 1 (from 1st visible scanline to last visible scanline) +; +update_clock: + lda _zonecounter + and #01 + beq @L1 + inc clock_count + bne @L1 + inc clock_count+1 + bne @L1 + inc clock_count+2 +@L1: ;clc ; General interrupt was not reset + rts + +;----------------------------------------------------------------------------- +; Set time to zero at startup +; + .segment "ONCE" +init_clock: + lda #0 + sta clock_count+2 + sta clock_count+1 + sta clock_count + rts + +;----------------------------------------------------------------------------- +; Store time in 3 bytes +; + .bss +clock_count: + .res 3 + diff --git a/libsrc/atari7800/clocks_per_sec.s b/libsrc/atari7800/clocks_per_sec.s new file mode 100644 index 000000000..e2c7d9d8d --- /dev/null +++ b/libsrc/atari7800/clocks_per_sec.s @@ -0,0 +1,34 @@ +; +; 2022-03-15, Karri Kaksonen +; +; clock_t _clocks_per_sec (void); +; + + .export __clocks_per_sec + + .import sreg: zp + .import _paldetected + .include "atari7800.inc" + + .macpack generic + + .code + +;----------------------------------------------------------------------------- +; Return the number of clock ticks in one second. +; + .proc __clocks_per_sec + + lda #0 + tax + sta sreg ; return 32 bits + sta sreg+1 + lda _paldetected + bne pal + lda #60 ; NTSC - 60Hz + rts +pal: + lda #50 ; PAL - 50Hz + rts + .endproc + diff --git a/libsrc/atari7800/clrscr.s b/libsrc/atari7800/clrscr.s new file mode 100644 index 000000000..f9d4938b0 --- /dev/null +++ b/libsrc/atari7800/clrscr.s @@ -0,0 +1,27 @@ + + .include "atari7800.inc" + + .export _clrscr + + .import _screen + .import pushax, __bzero + .include "extzp.inc" + + .code + + .proc _clrscr + + lda #<_screen + ldx #>_screen + jsr pushax + ldx #>(charsperline * screenrows) + lda #<(charsperline * screenrows) + jmp __bzero + + .endproc + +;------------------------------------------------------------------------------- +; force the init constructor to be imported + + .import initconio +conio_init = initconio diff --git a/libsrc/atari7800/conio.s b/libsrc/atari7800/conio.s new file mode 100644 index 000000000..92cc7d8b1 --- /dev/null +++ b/libsrc/atari7800/conio.s @@ -0,0 +1,226 @@ +; +; 2022-04-02, Karri Kaksonen +; +; The Atari 7800 has only 4k of RAM. So for a generic conio implementation +; the best alternative is to use indirect tile mapping with a character +; frame buffer +; + + .constructor initconio + .include "atari7800.inc" + .include "extzp.inc" + .import _conio_font + .import _get_tv + .export _screen + .export _zones + .export _dll + + .bss +_screen: + .res charsperline * screenrows + +;---------------------------------------------------------------------------- +; Macros used to generate lists + +.macro DLLentry offset, addr + .byte offset + .byte >addr + .byte <addr +.endmacro + +.macro NullHeader offset, zero + .byte offset + .byte zero +.endmacro + +.macro Header addr, palwidth, hpos + .byte <addr + .byte palwidth + .byte >addr + .byte hpos +.endmacro + +.macro XHeader addr, flags, palwidth, hpos + .byte <addr + .byte flags + .byte >addr + .byte palwidth + .byte hpos +.endmacro + +.macro TextZone row + ; Text + .byte <(_screen + row * charsperline) + .byte $60 + .byte >(_screen + row * charsperline) + .byte 12 + .byte 0 + ; Cursor + .byte 254 + .byte 0 + .byte >_conio_font + .byte 0 +.endmacro + +;----------------------------------------------------------------------------- +; The Atari 7800 has only 4k of RAM. So for a generic conio implementation +; the best alternative is to use indirect tile mapping with a character +; frame buffer + .data + +_zones: +zone0: TextZone 0 +nh: NullHeader 0, 0 +zone1: TextZone 1 + NullHeader 0, 0 +zone2: TextZone 2 + NullHeader 0, 0 +zone3: TextZone 3 + NullHeader 0, 0 +zone4: TextZone 4 + NullHeader 0, 0 +zone5: TextZone 5 + NullHeader 0, 0 +zone6: TextZone 6 + NullHeader 0, 0 +zone7: TextZone 7 + NullHeader 0, 0 +zone8: TextZone 8 + NullHeader 0, 0 +zone9: TextZone 9 + NullHeader 0, 0 +zone10: TextZone 10 + NullHeader 0, 0 +zone11: TextZone 11 + NullHeader 0, 0 +zone12: TextZone 12 + NullHeader 0, 0 +zone13: TextZone 13 + NullHeader 0, 0 +zone14: TextZone 14 + NullHeader 0, 0 +zone15: TextZone 15 + NullHeader 0, 0 +zone16: TextZone 16 + NullHeader 0, 0 +zone17: TextZone 17 + NullHeader 0, 0 +zone18: TextZone 18 + NullHeader 0, 0 +zone19: TextZone 19 + NullHeader 0, 0 +zone20: TextZone 20 + NullHeader 0, 0 +zone21: TextZone 21 + NullHeader 0, 0 +zone22: TextZone 22 + NullHeader 0, 0 +zone23: TextZone 23 + NullHeader 0, 0 +zone24: TextZone 24 + NullHeader 0, 0 +zone25: TextZone 25 + NullHeader 0, 0 +zone26: TextZone 26 + NullHeader 0, 0 +zone27: TextZone 27 + NullHeader 0, 0 + +_dll: +PALscanlines: ; 25 lines + DLLentry 15, nh + DLLentry 8, nh + +Topscanlines: ; 9 lines + DLLentry 8, nh + +Displaylines: + DLLentry $80+7, zone0 ; NMI interrupt from end of prev zone + DLLentry 7, zone1 + DLLentry 7, zone2 + DLLentry 7, zone3 + DLLentry 7, zone4 + DLLentry 7, zone5 + DLLentry 7, zone6 + DLLentry 7, zone7 + DLLentry 7, zone8 + DLLentry 7, zone9 + DLLentry 7, zone10 + DLLentry 7, zone11 + DLLentry 7, zone12 + DLLentry 7, zone13 + DLLentry 7, zone14 + DLLentry 7, zone15 + DLLentry 7, zone16 + DLLentry 7, zone17 + DLLentry 7, zone18 + DLLentry 7, zone19 + DLLentry 7, zone20 + DLLentry 7, zone21 + DLLentry 7, zone22 + DLLentry 7, zone23 + DLLentry 7, zone24 + DLLentry 7, zone25 + DLLentry 7, zone26 + DLLentry 7, zone27 + +Bottomscanlines: + DLLentry $80+15, nh ; NMI interrupt at end of display + DLLentry 9, nh + DLLentry 15, nh + DLLentry 8, nh + +;----------------------------------------------------------------------------- +; Set up the screen to 320a mode +; + .segment "ONCE" + +CTRL_MODE160 .set 0 +CTRL_MODEAC .set 3 +CTRL_KANGOFF .set 0 +CTRL_BCBLACK .set 0 +CTRL_CHAR1B .set 0 +CTRL_CHAR2B .set $10 +CTRL_DMAON .set $40 +CTRL_CKOFF .set 0 + +;----------------------------------------------------------------------------- +; Initialize the conio display lists and zones +; + .proc initconio + + jsr _get_tv + bne pal + lda #<Topscanlines + sta DPPL + lda #>Topscanlines + sta DPPH + jmp vblankon +pal: lda #<PALscanlines + sta DPPL + lda #>PALscanlines + sta DPPH +vblankon: + lda MSTAT + bmi vblankon +vblankoff: + lda MSTAT + bpl vblankoff + lda #>_conio_font + sta CHBASE + lda #(CTRL_MODE160 | CTRL_KANGOFF | CTRL_BCBLACK | CTRL_CHAR2B | CTRL_DMAON | CTRL_CKOFF) + sta CTRL + lda #$00 ; Black background + sta BKGRND + sta CURS_X + sta CURS_Y + lda #$33 ; Red + sta P0C1 + lda #$c8 ; Green + sta P0C2 + lda #$0f ; White + sta P0C3 + rts + + .endproc + diff --git a/libsrc/atari7800/conio_font.s b/libsrc/atari7800/conio_font.s new file mode 100644 index 000000000..829e3e2ce --- /dev/null +++ b/libsrc/atari7800/conio_font.s @@ -0,0 +1,278 @@ +; The internal font structure for Atari7800 needs a full set of 128 +; characters. Each character is 16 x 8 bits. +; The font consists of 8 rows of data: +; row7 +; row6 +; row5 +; row4 +; row3 +; row2 +; row1 +; row0 +; Each row is 256 bytes long +; As we have 2 bits per pixel we need 2 bytes to represent +; one character. So we can fit 128 characters in this font +; When you later use the font you must address the characters as +; 0, 2, 4, 6, ... 254 +; Odd indices cannot be used. + + .export _conio_font + .rodata + .align 256 +_conio_font: + .byte $0, $0, $41, $41, $0, $0, $14, $0 + .byte $0, $0, $0, $0, $1, $40, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $82, $82 + .byte $0, $0, $28, $0, $0, $0, $0, $0 + .byte $2, $80, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $c3, $c3, $0, $0, $3c, $0 + .byte $0, $0, $0, $0, $3, $c0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $0, $0 + .byte $0, $0, $0, $0, $0, $0, $ff, $ff + .byte $0, $0, $11, $44, $5, $0, $5, $0 + .byte $0, $0, $5, $0, $1, $40, $15, $50 + .byte $55, $50, $55, $50, $15, $40, $1, $54 + .byte $15, $40, $15, $40, $5, $0, $15, $40 + .byte $15, $0, $50, $50, $55, $50, $5, $50 + .byte $55, $40, $55, $54, $55, $0, $5, $54 + .byte $50, $50, $15, $40, $15, $40, $54, $14 + .byte $55, $54, $50, $14, $50, $14, $5, $40 + .byte $55, $0, $1, $50, $54, $14, $15, $40 + .byte $15, $40, $55, $50, $5, $0, $50, $14 + .byte $50, $14, $15, $40, $55, $54, $22, $88 + .byte $a, $0, $a, $0, $0, $0, $a, $0 + .byte $2, $80, $2a, $a0, $aa, $a0, $aa, $a0 + .byte $2a, $80, $2, $a8, $2a, $80, $2a, $80 + .byte $a, $0, $2a, $80, $2a, $0, $a0, $a0 + .byte $aa, $a0, $a, $a0, $aa, $80, $aa, $a8 + .byte $aa, $0, $a, $a8, $a0, $a0, $2a, $80 + .byte $2a, $80, $a8, $28, $aa, $a8, $a0, $28 + .byte $a0, $28, $a, $80, $aa, $0, $2, $a0 + .byte $a8, $28, $2a, $80, $2a, $80, $aa, $a0 + .byte $a, $0, $a0, $28, $a0, $28, $2a, $80 + .byte $aa, $a8, $33, $cc, $f, $0, $f, $0 + .byte $0, $0, $f, $0, $3, $c0, $3f, $f0 + .byte $ff, $f0, $ff, $f0, $3f, $c0, $3, $fc + .byte $3f, $c0, $3f, $c0, $f, $0, $3f, $c0 + .byte $3f, $0, $f0, $f0, $ff, $f0, $f, $f0 + .byte $ff, $c0, $ff, $fc, $ff, $0, $f, $fc + .byte $f0, $f0, $3f, $c0, $3f, $c0, $fc, $3c + .byte $ff, $fc, $f0, $3c, $f0, $3c, $f, $c0 + .byte $ff, $0, $3, $f0, $fc, $3c, $3f, $c0 + .byte $3f, $c0, $ff, $f0, $f, $0, $f0, $3c + .byte $f0, $3c, $3f, $c0, $ff, $fc, $0, $0 + .byte $0, $0, $5, $50, $0, $0, $5, $0 + .byte $0, $0, $5, $0, $1, $40, $54, $14 + .byte $5, $0, $50, $50, $50, $50, $0, $50 + .byte $50, $50, $50, $50, $5, $0, $50, $50 + .byte $1, $40, $50, $50, $14, $14, $14, $14 + .byte $14, $50, $14, $4, $14, $0, $14, $14 + .byte $50, $50, $5, $0, $50, $50, $14, $14 + .byte $14, $14, $50, $14, $50, $14, $14, $50 + .byte $14, $0, $15, $40, $14, $14, $50, $50 + .byte $5, $0, $50, $50, $15, $40, $54, $54 + .byte $14, $50, $5, $0, $14, $14, $a, $a0 + .byte $0, $0, $a, $0, $0, $0, $a, $0 + .byte $2, $80, $a8, $28, $a, $0, $a0, $a0 + .byte $a0, $a0, $0, $a0, $a0, $a0, $a0, $a0 + .byte $a, $0, $a0, $a0, $2, $80, $a0, $a0 + .byte $28, $28, $28, $28, $28, $a0, $28, $8 + .byte $28, $0, $28, $28, $a0, $a0, $a, $0 + .byte $a0, $a0, $28, $28, $28, $28, $a0, $28 + .byte $a0, $28, $28, $a0, $28, $0, $2a, $80 + .byte $28, $28, $a0, $a0, $a, $0, $a0, $a0 + .byte $2a, $80, $a8, $a8, $28, $a0, $a, $0 + .byte $28, $28, $f, $f0, $0, $0, $f, $0 + .byte $0, $0, $f, $0, $3, $c0, $fc, $3c + .byte $f, $0, $f0, $f0, $f0, $f0, $0, $f0 + .byte $f0, $f0, $f0, $f0, $f, $0, $f0, $f0 + .byte $3, $c0, $f0, $f0, $3c, $3c, $3c, $3c + .byte $3c, $f0, $3c, $c, $3c, $0, $3c, $3c + .byte $f0, $f0, $f, $0, $f0, $f0, $3c, $3c + .byte $3c, $3c, $f0, $3c, $f0, $3c, $3c, $f0 + .byte $3c, $0, $3f, $c0, $3c, $3c, $f0, $f0 + .byte $f, $0, $f0, $f0, $3f, $c0, $fc, $fc + .byte $3c, $f0, $f, $0, $3c, $3c, $0, $0 + .byte $0, $0, $54, $15, $5, $0, $0, $0 + .byte $55, $55, $0, $0, $1, $40, $55, $14 + .byte $5, $0, $14, $0, $0, $50, $55, $54 + .byte $0, $50, $50, $50, $5, $0, $50, $50 + .byte $0, $50, $55, $50, $14, $14, $50, $0 + .byte $14, $14, $14, $40, $14, $40, $50, $54 + .byte $50, $50, $5, $0, $50, $50, $14, $50 + .byte $14, $4, $51, $14, $50, $54, $50, $14 + .byte $14, $0, $51, $50, $14, $50, $1, $50 + .byte $5, $0, $50, $50, $50, $50, $55, $54 + .byte $5, $40, $5, $0, $5, $4, $a8, $2a + .byte $a, $0, $0, $0, $aa, $aa, $0, $0 + .byte $2, $80, $aa, $28, $a, $0, $28, $0 + .byte $0, $a0, $aa, $a8, $0, $a0, $a0, $a0 + .byte $a, $0, $a0, $a0, $0, $a0, $aa, $a0 + .byte $28, $28, $a0, $0, $28, $28, $28, $80 + .byte $28, $80, $a0, $a8, $a0, $a0, $a, $0 + .byte $a0, $a0, $28, $a0, $28, $8, $a2, $28 + .byte $a0, $a8, $a0, $28, $28, $0, $a2, $a0 + .byte $28, $a0, $2, $a0, $a, $0, $a0, $a0 + .byte $a0, $a0, $aa, $a8, $a, $80, $a, $0 + .byte $a, $8, $fc, $3f, $f, $0, $0, $0 + .byte $ff, $ff, $0, $0, $3, $c0, $ff, $3c + .byte $f, $0, $3c, $0, $0, $f0, $ff, $fc + .byte $0, $f0, $f0, $f0, $f, $0, $f0, $f0 + .byte $0, $f0, $ff, $f0, $3c, $3c, $f0, $0 + .byte $3c, $3c, $3c, $c0, $3c, $c0, $f0, $fc + .byte $f0, $f0, $f, $0, $f0, $f0, $3c, $f0 + .byte $3c, $c, $f3, $3c, $f0, $fc, $f0, $3c + .byte $3c, $0, $f3, $f0, $3c, $f0, $3, $f0 + .byte $f, $0, $f0, $f0, $f0, $f0, $ff, $fc + .byte $f, $c0, $f, $0, $f, $c, $0, $0 + .byte $0, $0, $54, $15, $1, $40, $0, $0 + .byte $55, $55, $0, $0, $1, $40, $51, $54 + .byte $5, $0, $5, $40, $5, $40, $50, $50 + .byte $0, $50, $55, $40, $1, $40, $15, $40 + .byte $15, $50, $50, $50, $15, $50, $50, $0 + .byte $14, $14, $15, $40, $15, $40, $50, $0 + .byte $55, $50, $5, $0, $0, $50, $15, $40 + .byte $14, $0, $55, $54, $51, $54, $50, $14 + .byte $15, $50, $50, $50, $15, $50, $15, $0 + .byte $5, $0, $50, $50, $50, $50, $51, $14 + .byte $5, $40, $15, $40, $1, $40, $a8, $2a + .byte $2, $80, $0, $0, $aa, $aa, $0, $0 + .byte $2, $80, $a2, $a8, $a, $0, $a, $80 + .byte $a, $80, $a0, $a0, $0, $a0, $aa, $80 + .byte $2, $80, $2a, $80, $2a, $a0, $a0, $a0 + .byte $2a, $a0, $a0, $0, $28, $28, $2a, $80 + .byte $2a, $80, $a0, $0, $aa, $a0, $a, $0 + .byte $0, $a0, $2a, $80, $28, $0, $aa, $a8 + .byte $a2, $a8, $a0, $28, $2a, $a0, $a0, $a0 + .byte $2a, $a0, $2a, $0, $a, $0, $a0, $a0 + .byte $a0, $a0, $a2, $28, $a, $80, $2a, $80 + .byte $2, $80, $fc, $3f, $3, $c0, $0, $0 + .byte $ff, $ff, $0, $0, $3, $c0, $f3, $fc + .byte $f, $0, $f, $c0, $f, $c0, $f0, $f0 + .byte $0, $f0, $ff, $c0, $3, $c0, $3f, $c0 + .byte $3f, $f0, $f0, $f0, $3f, $f0, $f0, $0 + .byte $3c, $3c, $3f, $c0, $3f, $c0, $f0, $0 + .byte $ff, $f0, $f, $0, $0, $f0, $3f, $c0 + .byte $3c, $0, $ff, $fc, $f3, $fc, $f0, $3c + .byte $3f, $f0, $f0, $f0, $3f, $f0, $3f, $0 + .byte $f, $0, $f0, $f0, $f0, $f0, $f3, $3c + .byte $f, $c0, $3f, $c0, $3, $c0, $0, $0 + .byte $0, $0, $5, $50, $0, $50, $0, $0 + .byte $0, $0, $0, $0, $1, $40, $50, $54 + .byte $5, $0, $0, $50, $0, $50, $14, $50 + .byte $55, $40, $50, $0, $0, $50, $50, $50 + .byte $50, $50, $50, $50, $14, $14, $50, $0 + .byte $14, $14, $14, $40, $14, $40, $50, $0 + .byte $50, $50, $5, $0, $0, $50, $14, $50 + .byte $14, $0, $55, $54, $55, $14, $50, $14 + .byte $14, $14, $50, $50, $14, $14, $54, $0 + .byte $5, $0, $50, $50, $50, $50, $50, $14 + .byte $14, $50, $50, $50, $40, $50, $a, $a0 + .byte $0, $a0, $0, $0, $0, $0, $0, $0 + .byte $2, $80, $a0, $a8, $a, $0, $0, $a0 + .byte $0, $a0, $28, $a0, $aa, $80, $a0, $0 + .byte $0, $a0, $a0, $a0, $a0, $a0, $a0, $a0 + .byte $28, $28, $a0, $0, $28, $28, $28, $80 + .byte $28, $80, $a0, $0, $a0, $a0, $a, $0 + .byte $0, $a0, $28, $a0, $28, $0, $aa, $a8 + .byte $aa, $28, $a0, $28, $28, $28, $a0, $a0 + .byte $28, $28, $a8, $0, $a, $0, $a0, $a0 + .byte $a0, $a0, $a0, $28, $28, $a0, $a0, $a0 + .byte $80, $a0, $f, $f0, $0, $f0, $0, $0 + .byte $0, $0, $0, $0, $3, $c0, $f0, $fc + .byte $f, $0, $0, $f0, $0, $f0, $3c, $f0 + .byte $ff, $c0, $f0, $0, $0, $f0, $f0, $f0 + .byte $f0, $f0, $f0, $f0, $3c, $3c, $f0, $0 + .byte $3c, $3c, $3c, $c0, $3c, $c0, $f0, $0 + .byte $f0, $f0, $f, $0, $0, $f0, $3c, $f0 + .byte $3c, $0, $ff, $fc, $ff, $3c, $f0, $3c + .byte $3c, $3c, $f0, $f0, $3c, $3c, $fc, $0 + .byte $f, $0, $f0, $f0, $f0, $f0, $f0, $3c + .byte $3c, $f0, $f0, $f0, $c0, $f0, $0, $0 + .byte $0, $0, $11, $44, $50, $50, $0, $0 + .byte $0, $0, $0, $0, $1, $40, $50, $14 + .byte $15, $0, $50, $50, $50, $50, $5, $50 + .byte $50, $0, $14, $0, $50, $50, $50, $50 + .byte $50, $50, $15, $40, $14, $14, $14, $14 + .byte $14, $50, $14, $4, $14, $4, $14, $14 + .byte $50, $50, $5, $0, $0, $50, $14, $14 + .byte $14, $0, $54, $54, $54, $14, $14, $50 + .byte $14, $14, $50, $50, $14, $14, $50, $50 + .byte $45, $10, $50, $50, $50, $50, $50, $14 + .byte $50, $14, $50, $50, $50, $14, $22, $88 + .byte $a0, $a0, $0, $0, $0, $0, $0, $0 + .byte $2, $80, $a0, $28, $2a, $0, $a0, $a0 + .byte $a0, $a0, $a, $a0, $a0, $0, $28, $0 + .byte $a0, $a0, $a0, $a0, $a0, $a0, $2a, $80 + .byte $28, $28, $28, $28, $28, $a0, $28, $8 + .byte $28, $8, $28, $28, $a0, $a0, $a, $0 + .byte $0, $a0, $28, $28, $28, $0, $a8, $a8 + .byte $a8, $28, $28, $a0, $28, $28, $a0, $a0 + .byte $28, $28, $a0, $a0, $8a, $20, $a0, $a0 + .byte $a0, $a0, $a0, $28, $a0, $28, $a0, $a0 + .byte $a0, $28, $33, $cc, $f0, $f0, $0, $0 + .byte $0, $0, $0, $0, $3, $c0, $f0, $3c + .byte $3f, $0, $f0, $f0, $f0, $f0, $f, $f0 + .byte $f0, $0, $3c, $0, $f0, $f0, $f0, $f0 + .byte $f0, $f0, $3f, $c0, $3c, $3c, $3c, $3c + .byte $3c, $f0, $3c, $c, $3c, $c, $3c, $3c + .byte $f0, $f0, $f, $0, $0, $f0, $3c, $3c + .byte $3c, $0, $fc, $fc, $fc, $3c, $3c, $f0 + .byte $3c, $3c, $f0, $f0, $3c, $3c, $f0, $f0 + .byte $cf, $30, $f0, $f0, $f0, $f0, $f0, $3c + .byte $f0, $3c, $f0, $f0, $f0, $3c, $0, $0 + .byte $0, $0, $41, $41, $15, $40, $0, $0 + .byte $0, $0, $0, $0, $1, $40, $15, $50 + .byte $5, $0, $15, $40, $15, $40, $1, $50 + .byte $55, $50, $5, $40, $55, $50, $15, $40 + .byte $15, $40, $5, $0, $55, $50, $5, $50 + .byte $55, $40, $55, $54, $55, $54, $5, $50 + .byte $50, $50, $15, $40, $1, $54, $54, $14 + .byte $55, $0, $50, $14, $50, $14, $5, $40 + .byte $55, $50, $15, $40, $55, $50, $15, $40 + .byte $55, $50, $50, $50, $50, $50, $50, $14 + .byte $50, $14, $50, $50, $55, $54, $82, $82 + .byte $2a, $80, $0, $0, $0, $0, $0, $0 + .byte $2, $80, $2a, $a0, $a, $0, $2a, $80 + .byte $2a, $80, $2, $a0, $aa, $a0, $a, $80 + .byte $aa, $a0, $2a, $80, $2a, $80, $a, $0 + .byte $aa, $a0, $a, $a0, $aa, $80, $aa, $a8 + .byte $aa, $a8, $a, $a0, $a0, $a0, $2a, $80 + .byte $2, $a8, $a8, $28, $aa, $0, $a0, $28 + .byte $a0, $28, $a, $80, $aa, $a0, $2a, $80 + .byte $aa, $a0, $2a, $80, $aa, $a0, $a0, $a0 + .byte $a0, $a0, $a0, $28, $a0, $28, $a0, $a0 + .byte $aa, $a8, $c3, $c3, $3f, $c0, $0, $0 + .byte $0, $0, $0, $0, $3, $c0, $3f, $f0 + .byte $f, $0, $3f, $c0, $3f, $c0, $3, $f0 + .byte $ff, $f0, $f, $c0, $ff, $f0, $3f, $c0 + .byte $3f, $c0, $f, $0, $ff, $f0, $f, $f0 + .byte $ff, $c0, $ff, $fc, $ff, $fc, $f, $f0 + .byte $f0, $f0, $3f, $c0, $3, $fc, $fc, $3c + .byte $ff, $0, $f0, $3c, $f0, $3c, $f, $c0 + .byte $ff, $f0, $3f, $c0, $ff, $f0, $3f, $c0 + .byte $ff, $f0, $f0, $f0, $f0, $f0, $f0, $3c + .byte $f0, $3c, $f0, $f0, $ff, $fc, $0, $0 diff --git a/libsrc/atari7800/cputc.s b/libsrc/atari7800/cputc.s new file mode 100644 index 000000000..9ec84bfe5 --- /dev/null +++ b/libsrc/atari7800/cputc.s @@ -0,0 +1,137 @@ +; +; Mark Keates, Christian Groessler, Piotr Fusik, Karri Kaksonen +; +; void cputcxy (unsigned char x, unsigned char y, char c); +; void cputc (char c); +; + + .export _cputc + .import gotox, gotoy, pusha0 + .import pushax + .import _screen + .import txtcolor + + .include "atari7800.inc" + .include "extzp.inc" + + .code + +;--------------------------------------------------------------------------- +; 8x16 routine + +umula0: + ldy #8 ; Number of bits + lda #0 + lsr ptr7800 ; Get first bit into carry +@L0: bcc @L1 + + clc + adc ptrtmp + tax + lda ptrtmp+1 ; hi byte of left op + clc + adc ptr7800+1 + sta ptr7800+1 + txa + +@L1: ror ptr7800+1 + ror a + ror ptr7800 + dey + bne @L0 + tax + lda ptr7800 ; Load the result + rts + +;----------------------------------------------------------------------------- +; Put a character on screen +; +; The code will handle newlines that wrap to start of screen +; + .proc _cputc + + cmp #$0A ; LF + bne @L4 +@L1: lda CURS_Y ; newline + cmp #(screenrows-1) + bne @L2 + lda #0 + beq @L3 +@L2: clc + adc #1 +@L3: jsr gotoy + lda #0 + jmp gotox + +@L4: + cmp #$20 ; ' ' + bne @L5 + lda #$00 + jmp @L10 +@L5: + cmp #$3F ; '?' + bne @L6 + lda #$02 + jmp @L9 +@L6: + cmp #$7C ; '|' + bne @L7 + lda #$06 + jmp @L9 +@L7: + cmp #$41 ; >= 'A' + bcc @L8 + and #$5F ; make upper case + sec + sbc #($41 - 17) + jmp @L9 +@L8: + sec ; >= '*' + sbc #($2A - 1) +@L9: + clc + adc txtcolor +@L10: + asl + pha + + lda #0 + sta ptr7800+1 + sta ptrtmp+1 + lda CURS_Y ; Find position on screen buffer + sta ptr7800 + lda #charsperline + sta ptrtmp + jsr umula0 + clc + adc CURS_X + bcc @L11 + inx +@L11: clc + adc #<(_screen) + sta ptr7800 + bcc @L12 + inx +@L12: txa + clc + adc #>(_screen) + sta ptr7800+1 + + pla ; Print character on screen + ldy #0 + sta (ptr7800),y + + lda CURS_X ; Increment cursor + cmp #(charsperline-1) + beq @L1 + clc + adc #1 + jmp gotox + + .endproc + +;------------------------------------------------------------------------------- +; force the init constructor to be imported + + .import initconio +conio_init = initconio diff --git a/libsrc/atari7800/crt0.s b/libsrc/atari7800/crt0.s new file mode 100644 index 000000000..e791179f3 --- /dev/null +++ b/libsrc/atari7800/crt0.s @@ -0,0 +1,71 @@ + .export _zonecounter + .export __STARTUP__ : absolute = 1 + .export _exit + .import __ROM_START__ + .import __RAM3_START__, __RAM3_SIZE__ + .import initlib, donelib + .import zerobss, copydata + .import IRQStub + .import push0, _main + .include "atari7800.inc" + .include "zeropage.inc" + +INPTCTRL = $01 + + .segment "STARTUP" +start: + ; Startup sequence recommended by Atari. + ; See the 7800 standards document. + sei ; Initialize 6502 + cld + lda #$07 ; Lock machine in 7800 mode + sta INPTCTRL + lda #$7f ; DMA off + sta CTRL + ldx #0 ; OFFSET must always be 0 + stx OFFSET + stx INPTCTRL ; Make sure joysticks don't freeze + dex ; Stack pointer = $ff + txs + + ; Set up parameter stack + lda #<(__RAM3_START__ + __RAM3_SIZE__) + sta sp + lda #>(__RAM3_START__ + __RAM3_SIZE__) + sta sp+1 + + jsr copydata + jsr zerobss + jsr initlib + + ; Call main program (pass empty command line) + jsr push0 ; argc + jsr push0 ; argv + ldy #4 ; Argument size + jsr _main + +_exit: + jsr donelib + jmp start + +NMIHandler: + inc _zonecounter + jmp IRQStub + +IRQHandler: + rti + + .segment "DATA" +_zonecounter: + .byte 0 + + .segment "ENCRYPTION" + .res 126, $ff ; Reserved for encryption +Lfff8: .byte $ff ; Region verification (always $ff) +Lfff9: .byte $f7 ; Use last 4096 bytes only for encryption +;;;Lfff9: .byte <(((__ROM_START__/4096)<<4) | 7) + + .segment "VECTORS" + .word NMIHandler + .word start + .word IRQHandler diff --git a/libsrc/atari7800/ctype.s b/libsrc/atari7800/ctype.s new file mode 100644 index 000000000..1301965eb --- /dev/null +++ b/libsrc/atari7800/ctype.s @@ -0,0 +1,5 @@ +; Character specification table. +; +; uses the "common" definition + + .include "ctype_common.inc" diff --git a/libsrc/atari7800/exehdr.s b/libsrc/atari7800/exehdr.s new file mode 100644 index 000000000..99e62e3d6 --- /dev/null +++ b/libsrc/atari7800/exehdr.s @@ -0,0 +1,46 @@ +; +; Karri Kaksonen, 2022 +; +; This header contains data for emulators +; + .export __EXEHDR__: absolute = 1 + .import __CARTSIZE__ +; ------------------------------------------------------------------------ +; EXE header + .segment "EXEHDR" + .byte 3 ; version + .byte 'A','T','A','R','I','7','8','0','0',' ',' ',' ',' ',' ',' ',' ' + .byte 'G','a','m','e',' ','n','a','m','e',0,0,0,0,0,0,0 + .byte 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 + .byte 0,0,>__CARTSIZE__,0 ; Set the cart size in the cfg file + ; bit 0 - pokey at 4000 + ; bit 1 - supergame bank switched + ; bit 2 - supergame ram at $4000 + ; bit 3 - rom at $4000 + ; bit 4 - bank 6 at $4000 + ; bit 5 - supergame banked ram + ; bit 6 - pokey at $450 + ; bit 7 - mirror ram at $4000 + ; bit 8 - activision banking + ; bit 9 - absolute banking + ; bit 10 - pokey at $440 + ; bit 11 - ym2151 at $461/462 + ; bit 12 - souper + ; bit 13-15 - Special + ; 0 = Normal cart + .byte 0,0 ; 0 = Normal cart + .byte 1 ; 1 = Joystick, 2 = lightgun + .byte 0 ; No joystick 2 + .byte 0 ; bit0 = 0:NTSC,1:PAL bit1 = 0:component,1:composite + .byte 0 ; Save data peripheral - 1 byte (version 2) + ; 0 = None / unknown (default) + ; 1 = High Score Cart (HSC) + ; 2 = SaveKey + + .byte 0 ; 63 Expansion module + ; 0 = No expansion module (default on all currently released games) + ; 1 = Expansion module required + .byte 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 + .byte 0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0 + .byte 0,0,0,0,0,0,0,0 + .byte 'A','C','T','U','A','L',' ','C','A','R','T',' ','D','A','T','A',' ','S','T','A','R','T','S',' ','H','E','R','E' diff --git a/libsrc/atari7800/extra/mono.s b/libsrc/atari7800/extra/mono.s new file mode 100644 index 000000000..5d99fc02a --- /dev/null +++ b/libsrc/atari7800/extra/mono.s @@ -0,0 +1,28 @@ +; +; Groepaz/Hitmen, 19.10.2015 +; +; import/overload stubs for the monochrome conio implementation +; + + ; mono_conio.s + .import _mono_screen + .export _screen := _mono_screen + + ; mono_clrscr.s + .import _mono_clrscr + .export _clrscr := _mono_clrscr + + ; mono_cputc.s + .import _mono_cputc + .export _cputc := _mono_cputc + + ; mono_font.s + .import _mono_font + .export _font := _mono_font + + ; mono_setcursor.s + .import mono_gotoxy + .export gotoxy := mono_gotoxy + .import _mono_gotoxy + .export _gotoxy := _mono_gotoxy + diff --git a/libsrc/atari7800/extzp.inc b/libsrc/atari7800/extzp.inc new file mode 100644 index 000000000..5990b5c86 --- /dev/null +++ b/libsrc/atari7800/extzp.inc @@ -0,0 +1,15 @@ +; +; extzp.inc for the Atari 7800 +; +; Karri Kaksonen, 2022-04-05 +; +; Assembler include file that imports the runtime zero page locations used +; by the atari7800 runtime, ready for usage in asm code. +; + + .global ptr7800: zp + .global ptrtmp: zp + .global cursorzone: zp + .global CURS_X: zp + .global CURS_Y: zp + diff --git a/libsrc/atari7800/extzp.s b/libsrc/atari7800/extzp.s new file mode 100644 index 000000000..8e8b73459 --- /dev/null +++ b/libsrc/atari7800/extzp.s @@ -0,0 +1,15 @@ +; +; Karri Kaksonen, 2022-04-05 +; +; zeropage locations for exclusive use by the library +; + + .include "extzp.inc" + + .segment "EXTZP" : zeropage + +ptr7800: .res 2 +ptrtmp: .res 2 +cursorzone: .res 2 +CURS_X: .res 1 +CURS_Y: .res 1 diff --git a/libsrc/atari7800/get_tv.s b/libsrc/atari7800/get_tv.s new file mode 100644 index 000000000..12c54f807 --- /dev/null +++ b/libsrc/atari7800/get_tv.s @@ -0,0 +1,65 @@ +; +; Karri Kaksonen, 2022-03-25 +; +; unsigned char get_tv (void) +; + .include "atari7800.inc" + .include "get_tv.inc" + .export _get_tv + .export _paldetected + +.segment "DATA" + +_paldetected: + .byte $FF + +; --------------------------------------------------------------- +; unsigned char get_tv (void) +; --------------------------------------------------------------- + +.segment "CODE" + +.proc _get_tv: near + +.segment "CODE" + + ldx #$00 + lda #$FF + cmp _paldetected + bne L8 +L1: lda MSTAT + and #$80 + bne L1 +L2: lda MSTAT + and #$80 + beq L2 +L3: lda MSTAT + and #$80 + bne L3 + lda #$00 + sta M0001 + jmp L5 +L4: sta MWSYNC + sta MWSYNC + dec M0001 +L5: lda MSTAT + and #$80 + beq L4 + lda M0001 + cmp #$78 + bcc L6 + lda #TV::NTSC + jmp L7 +L6: lda #TV::PAL +L7: sta _paldetected + ldx #$00 +L8: lda _paldetected + rts + +.segment "BSS" + +M0001: + .res 1,$00 + +.endproc + diff --git a/libsrc/atari7800/irq.s b/libsrc/atari7800/irq.s new file mode 100644 index 000000000..3cfc74541 --- /dev/null +++ b/libsrc/atari7800/irq.s @@ -0,0 +1,36 @@ +; +; IRQ handling (Atari 7800 version) +; + + .export initirq, doneirq, IRQStub + + .import __INTERRUPTOR_COUNT__, callirq + + .include "atari7800.inc" + + .code +; ------------------------------------------------------------------------ + +initirq: +doneirq: + rts + +; ------------------------------------------------------------------------ + +IRQStub: + cld ; Just to be sure + pha + lda #<(__INTERRUPTOR_COUNT__ * 2) + beq @L1 + txa + pha + tya + pha + jsr callirq ; Call the functions + pla + tay + pla + tax +@L1: pla + rti + diff --git a/libsrc/atari7800/joy/atari7800-stdjoy.s b/libsrc/atari7800/joy/atari7800-stdjoy.s new file mode 100644 index 000000000..d76e1d105 --- /dev/null +++ b/libsrc/atari7800/joy/atari7800-stdjoy.s @@ -0,0 +1,161 @@ +; +; Standard joystick driver for the Atari 7800. +; This version tries to use 7800 and 2600 joysticks. +; But assumes that both joysticks are of same type. +; +; Modified by Karri Kaksonen, 2022-03-31 +; Ullrich von Bassewitz, 2002-12-20 +; Using code from Steve Schmidtke +; + + .include "zeropage.inc" + + .include "joy-kernel.inc" + .include "joy-error.inc" + .include "atari7800.inc" + + .macpack generic + .macpack module + + +; ------------------------------------------------------------------------ +; Header. Includes jump table + + module_header _atari7800_stdjoy_joy + +; Driver signature + + .byte $6A, $6F, $79 ; "joy" + .byte JOY_API_VERSION ; Driver API version number + +; Library reference + + .addr $0000 + +; Jump table. + + .addr INSTALL + .addr UNINSTALL + .addr COUNT + .addr READ + +; ------------------------------------------------------------------------ +; Constants + +JOY_COUNT = 2 ; Number of joysticks we support + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. If +; possible, check if the hardware is present and determine the amount of +; memory available. +; Must return an JOY_ERR_xx code in a/x. +; + +INSTALL: + ; Assume 7800 2-button controller, can change + ; to 2600 1-button later + lda #$14 + sta CTLSWB ; enable 2-button 7800 controller 1: set pin 6 to output + ldy #$00 + sty SWCHB ; enable 2-button 7800 controller 2: pull pin 6 (INPT4) high + +reset: + lda #<JOY_ERR_OK + ldx #>JOY_ERR_OK +; rts ; Run into UNINSTALL instead + +; ------------------------------------------------------------------------ +; UNINSTALL routine. Is called before the driver is removed from memory. +; Can do cleanup or whatever. Must not return anything. +; + +UNINSTALL: + rts + + +; ------------------------------------------------------------------------ +; COUNT: Return the total number of available joysticks in a/x. +; + +COUNT: + lda #<JOY_COUNT + ldx #>JOY_COUNT + rts + +; ------------------------------------------------------------------------ +; READ: Read a particular joystick passed in A for 2 fire buttons. + +readbuttons: + ; Y has joystick of interest 0/1 + ; return value: + ; $00: no button, + ; $01: left/B button, + ; $02: right/A button, + ; $03: both buttons + ; preserves X + tya + beq L5 + ; Joystick 1 processing + ; 7800 joystick 1 buttons + ldy #0 ; ........ + bit INPT2 ; Check for right button + bpl L1 + ldy #2 ; ......2. +L1: bit INPT3 ;Check for left button + bpl L2 + iny ; ......21 +L2: tya + bne L4 ; 7800 mode joystick worked + ; 2600 Joystick 1 + bit INPT5 + bmi L4 +L3: iny ; .......1 + lda #0 ; Fallback to 2600 joystick mode + sta CTLSWB +L4: tya ; ......21 + rts + +L5: ; Joystick 0 processing + ; 7800 joystick 0 buttons + ldy #0 ; ........ + bit INPT0 ; Check for right button + bpl L6 + ldy #2 ; ......2. +L6: bit INPT1 ;Check for left button + bpl L7 + iny ; ......21 +L7: tya + bne L4 ; 7800 mode joystick worked + ; 2600 Joystick 0 + bit INPT4 + bmi L4 + bpl L3 + +READ: + tay ; Store joystick 0/1 in Y + beq L8 + lda SWCHA ; Read directions of joystick 1 + rol ; ...RLDU. + rol ; ..RLDU.. + rol ; .RLDU... - joystick 1 + jmp L9 +L8: lda SWCHA ; Read directions of joystick 0 + ror ; .RLDU... - joystick 0 +L9: tax + jsr readbuttons ; A = ......21, X = .RLDU... + ror ; A = .......2 1 + tay ; Y = .......2 + txa ; A = .RLDU... + ror ; A = 1.RLDU.. + tax ; X = 1.RLDU.. + tya ; A = .......2 + ror ; A = ........ 2 + txa ; A = 1.RLDU.. + rol ; A = .RLDU..2 1 + rol ; A = RLDU..21 + eor #$F0 ; The direction buttons were inversed + and #$F3 + rts + diff --git a/libsrc/atari7800/joy_stat_stddrv.s b/libsrc/atari7800/joy_stat_stddrv.s new file mode 100644 index 000000000..eafe0d314 --- /dev/null +++ b/libsrc/atari7800/joy_stat_stddrv.s @@ -0,0 +1,14 @@ +; +; Address of the static standard joystick driver +; +; Oliver Schmidt, 2012-11-01 +; +; const void joy_static_stddrv[]; +; + + .export _joy_static_stddrv + .import _atari7800_stdjoy_joy + +.rodata + +_joy_static_stddrv := _atari7800_stdjoy_joy diff --git a/libsrc/atari7800/libref.s b/libsrc/atari7800/libref.s new file mode 100644 index 000000000..e4afa7eb1 --- /dev/null +++ b/libsrc/atari7800/libref.s @@ -0,0 +1,8 @@ +; +; Oliver Schmidt, 2013-05-31 +; + + .export joy_libref + .import _exit + +joy_libref := _exit diff --git a/libsrc/atari7800/mono_clrscr.s b/libsrc/atari7800/mono_clrscr.s new file mode 100644 index 000000000..19f1fdfd6 --- /dev/null +++ b/libsrc/atari7800/mono_clrscr.s @@ -0,0 +1,27 @@ + + .include "atari7800.inc" + + .export _mono_clrscr + + .import _mono_screen + .import pushax, __bzero + .include "extzp.inc" + + .code + + .proc _mono_clrscr + + lda #<_mono_screen + ldx #>_mono_screen + jsr pushax + ldx #>(mono_charsperline * screenrows) + lda #<(mono_charsperline * screenrows) + jmp __bzero + + .endproc + +;------------------------------------------------------------------------------- +; force the init constructor to be imported + + .import mono_initconio +conio_init = mono_initconio diff --git a/libsrc/atari7800/mono_conio.s b/libsrc/atari7800/mono_conio.s new file mode 100644 index 000000000..63849aea7 --- /dev/null +++ b/libsrc/atari7800/mono_conio.s @@ -0,0 +1,231 @@ +; +; 2022-04-02, Karri Kaksonen +; +; The Atari 7800 has only 4k of RAM. So for a generic conio implementation +; the best alternative is to use indirect tile mapping with a character +; frame buffer +; + + .constructor mono_initconio + .include "atari7800.inc" + .include "extzp.inc" + .import _mono_font + .import _get_tv + .export _mono_screen + .export _mono_zones + .export _mono_dll + + .bss +_mono_screen: + .res mono_charsperline * screenrows + +;---------------------------------------------------------------------------- +; Macros used to generate lists + +.macro DLLentry offset, addr + .byte offset + .byte >addr + .byte <addr +.endmacro + +.macro NullHeader offset, zero + .byte offset + .byte zero +.endmacro + +.macro Header addr, palwidth, hpos + .byte <addr + .byte palwidth + .byte >addr + .byte hpos +.endmacro + +.macro XHeader addr, flags, palwidth, hpos + .byte <addr + .byte flags + .byte >addr + .byte palwidth + .byte hpos +.endmacro + +.macro TextZone row + ; Text + .byte <(_mono_screen + row * mono_charsperline) + .byte $60 + .byte >(_mono_screen + row * mono_charsperline) + .byte 12 + .byte 0 + .byte <(_mono_screen + row * mono_charsperline + 20) + .byte $60 + .byte >(_mono_screen + row * mono_charsperline + 20) + .byte 12 + .byte 80 + ; Cursor + .byte 95 + .byte 0 + .byte >_mono_font + .byte 0 +.endmacro + +;----------------------------------------------------------------------------- +; The Atari 7800 has only 4k of RAM. So for a generic conio implementation +; the best alternative is to use indirect tile mapping with a character +; frame buffer + .data + +_mono_zones: +zone0: TextZone 0 +nh: NullHeader 0, 0 +zone1: TextZone 1 + NullHeader 0, 0 +zone2: TextZone 2 + NullHeader 0, 0 +zone3: TextZone 3 + NullHeader 0, 0 +zone4: TextZone 4 + NullHeader 0, 0 +zone5: TextZone 5 + NullHeader 0, 0 +zone6: TextZone 6 + NullHeader 0, 0 +zone7: TextZone 7 + NullHeader 0, 0 +zone8: TextZone 8 + NullHeader 0, 0 +zone9: TextZone 9 + NullHeader 0, 0 +zone10: TextZone 10 + NullHeader 0, 0 +zone11: TextZone 11 + NullHeader 0, 0 +zone12: TextZone 12 + NullHeader 0, 0 +zone13: TextZone 13 + NullHeader 0, 0 +zone14: TextZone 14 + NullHeader 0, 0 +zone15: TextZone 15 + NullHeader 0, 0 +zone16: TextZone 16 + NullHeader 0, 0 +zone17: TextZone 17 + NullHeader 0, 0 +zone18: TextZone 18 + NullHeader 0, 0 +zone19: TextZone 19 + NullHeader 0, 0 +zone20: TextZone 20 + NullHeader 0, 0 +zone21: TextZone 21 + NullHeader 0, 0 +zone22: TextZone 22 + NullHeader 0, 0 +zone23: TextZone 23 + NullHeader 0, 0 +zone24: TextZone 24 + NullHeader 0, 0 +zone25: TextZone 25 + NullHeader 0, 0 +zone26: TextZone 26 + NullHeader 0, 0 +zone27: TextZone 27 + NullHeader 0, 0 + +_mono_dll: +PALscanlines: ; 25 lines + DLLentry 15, nh + DLLentry 8, nh + +Topscanlines: ; 9 lines + DLLentry 8, nh + +Displaylines: + DLLentry $80+7, zone0 ; NMI interrupt from end of prev zone + DLLentry 7, zone1 + DLLentry 7, zone2 + DLLentry 7, zone3 + DLLentry 7, zone4 + DLLentry 7, zone5 + DLLentry 7, zone6 + DLLentry 7, zone7 + DLLentry 7, zone8 + DLLentry 7, zone9 + DLLentry 7, zone10 + DLLentry 7, zone11 + DLLentry 7, zone12 + DLLentry 7, zone13 + DLLentry 7, zone14 + DLLentry 7, zone15 + DLLentry 7, zone16 + DLLentry 7, zone17 + DLLentry 7, zone18 + DLLentry 7, zone19 + DLLentry 7, zone20 + DLLentry 7, zone21 + DLLentry 7, zone22 + DLLentry 7, zone23 + DLLentry 7, zone24 + DLLentry 7, zone25 + DLLentry 7, zone26 + DLLentry 7, zone27 + +Bottomscanlines: + DLLentry $80+15, nh ; NMI interrupt at end of display + DLLentry 9, nh + DLLentry 15, nh + DLLentry 8, nh + +;----------------------------------------------------------------------------- +; Set up the screen to 320a mode +; + .segment "ONCE" + +CTRL_MODE160 .set 0 +CTRL_MODEAC .set 3 +CTRL_KANGOFF .set 0 +CTRL_BCBLACK .set 0 +CTRL_CHAR1B .set 0 +CTRL_CHAR2B .set $10 +CTRL_DMAON .set $40 +CTRL_CKOFF .set 0 + +;----------------------------------------------------------------------------- +; Initialize the conio display lists and zones +; + .proc mono_initconio + + jsr _get_tv + bne pal + lda #<Topscanlines + sta DPPL + lda #>Topscanlines + sta DPPH + jmp vblankon +pal: lda #<PALscanlines + sta DPPL + lda #>PALscanlines + sta DPPH +vblankon: + lda MSTAT + bmi vblankon +vblankoff: + lda MSTAT + bpl vblankoff + lda #>_mono_font + sta CHBASE + lda #(CTRL_MODEAC | CTRL_KANGOFF | CTRL_BCBLACK | CTRL_CHAR1B | CTRL_DMAON | CTRL_CKOFF) + sta CTRL + lda #$00 ; Black background + sta BKGRND + sta CURS_X + sta CURS_Y + lda #$33 ; Red + sta P0C1 + lda #$c8 ; Green + sta P0C2 + lda #$0f ; White + sta P0C3 + rts + + .endproc + diff --git a/libsrc/atari7800/mono_cputc.s b/libsrc/atari7800/mono_cputc.s new file mode 100644 index 000000000..aa6787e05 --- /dev/null +++ b/libsrc/atari7800/mono_cputc.s @@ -0,0 +1,102 @@ +; +; Mark Keates, Christian Groessler, Piotr Fusik, Karri Kaksonen +; +; void cputcxy (unsigned char x, unsigned char y, char c); +; void cputc (char c); +; + + .export _mono_cputc + .import mono_gotox, mono_gotoy, pusha0 + .import pushax + .import _mono_screen + + .include "atari7800.inc" + .include "extzp.inc" + + .code + +;--------------------------------------------------------------------------- +; 8x16 routine + +umula0: + ldy #8 ; Number of bits + lda #0 + lsr ptr7800 ; Get first bit into carry +@L0: bcc @L1 + + clc + adc ptrtmp + tax + lda ptrtmp+1 ; hi byte of left op + clc + adc ptr7800+1 + sta ptr7800+1 + txa + +@L1: ror ptr7800+1 + ror a + ror ptr7800 + dey + bne @L0 + tax + lda ptr7800 ; Load the result + rts + +;----------------------------------------------------------------------------- +; Put a character on screen +; +; The code will handle newlines that wrap to start of screen +; + .proc _mono_cputc + + cmp #$0A ; LF + bne @L4 +@L1: lda #0 ; newline + jsr mono_gotox + lda CURS_Y + cmp #(screenrows-1) + bne @L2 + lda #0 + beq @L3 +@L2: clc + adc #1 +@L3: jmp mono_gotoy + +@L4: + pha + + lda #0 + sta ptr7800+1 + sta ptrtmp+1 + lda CURS_Y ; Find position on screen buffer + sta ptr7800 + lda #mono_charsperline + sta ptrtmp + jsr umula0 + clc + adc CURS_X + bcc @L11 + inx +@L11: clc + adc #<(_mono_screen) + sta ptr7800 + bcc @L12 + inx +@L12: txa + clc + adc #>(_mono_screen) + sta ptr7800+1 + + pla ; Print character on screen + ldy #0 + sta (ptr7800),y + + lda CURS_X ; Increment cursor + cmp #(mono_charsperline-1) + beq @L1 + clc + adc #1 + jmp mono_gotox + + .endproc + diff --git a/libsrc/atari7800/mono_font.s b/libsrc/atari7800/mono_font.s new file mode 100644 index 000000000..74307ccfb --- /dev/null +++ b/libsrc/atari7800/mono_font.s @@ -0,0 +1,2065 @@ +; The internal font structure for Atari7800 needs a full set of 256 +; characters. Each character is 8 x 8 bits. +; The font consists of 8 rows of data: +; row7 +; row6 +; row5 +; row4 +; row3 +; row2 +; row1 +; row0 +; Each row is 256 bytes long + + .export _mono_font + .segment "RODATA" + .align 256 +_mono_font: + .byte $00 + .byte $7e + .byte $7e + .byte $00 + .byte $00 + .byte $7c + .byte $7c + .byte $00 + .byte $ff + .byte $00 + .byte $ff + .byte $78 + .byte $18 + .byte $e0 + .byte $c0 + .byte $99 + .byte $00 + .byte $00 + .byte $18 + .byte $00 + .byte $00 + .byte $78 + .byte $00 + .byte $ff + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $60 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $60 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $ff + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $f8 + .byte $00 + .byte $00 + .byte $78 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $f0 + .byte $1e + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $f8 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $78 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $38 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $f8 + .byte $00 + .byte $00 + .byte $18 + .byte $00 + .byte $30 + .byte $c7 + .byte $70 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $0f + .byte $03 + .byte $00 + .byte $00 + .byte $00 + .byte $88 + .byte $aa + .byte $ee + .byte $18 + .byte $18 + .byte $18 + .byte $36 + .byte $36 + .byte $18 + .byte $36 + .byte $36 + .byte $36 + .byte $00 + .byte $00 + .byte $00 + .byte $18 + .byte $00 + .byte $00 + .byte $18 + .byte $18 + .byte $00 + .byte $18 + .byte $18 + .byte $36 + .byte $00 + .byte $36 + .byte $00 + .byte $36 + .byte $36 + .byte $00 + .byte $36 + .byte $00 + .byte $00 + .byte $18 + .byte $36 + .byte $00 + .byte $00 + .byte $18 + .byte $36 + .byte $36 + .byte $18 + .byte $00 + .byte $18 + .byte $ff + .byte $ff + .byte $f0 + .byte $0f + .byte $00 + .byte $00 + .byte $c0 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $c0 + .byte $00 + .byte $fc + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $c0 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $18 + .byte $70 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $1c + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $81 + .byte $ff + .byte $10 + .byte $10 + .byte $38 + .byte $38 + .byte $00 + .byte $ff + .byte $3c + .byte $c3 + .byte $cc + .byte $7e + .byte $f0 + .byte $e6 + .byte $5a + .byte $80 + .byte $02 + .byte $3c + .byte $66 + .byte $1b + .byte $cc + .byte $7e + .byte $18 + .byte $18 + .byte $18 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $30 + .byte $00 + .byte $6c + .byte $30 + .byte $c6 + .byte $76 + .byte $00 + .byte $18 + .byte $60 + .byte $00 + .byte $00 + .byte $30 + .byte $00 + .byte $30 + .byte $80 + .byte $7c + .byte $fc + .byte $fc + .byte $78 + .byte $1e + .byte $78 + .byte $78 + .byte $30 + .byte $78 + .byte $70 + .byte $30 + .byte $30 + .byte $18 + .byte $00 + .byte $60 + .byte $30 + .byte $78 + .byte $cc + .byte $fc + .byte $3c + .byte $f8 + .byte $fe + .byte $f0 + .byte $3e + .byte $cc + .byte $78 + .byte $78 + .byte $e6 + .byte $fe + .byte $c6 + .byte $c6 + .byte $38 + .byte $f0 + .byte $1c + .byte $e6 + .byte $78 + .byte $78 + .byte $fc + .byte $30 + .byte $c6 + .byte $c6 + .byte $78 + .byte $fe + .byte $78 + .byte $02 + .byte $78 + .byte $00 + .byte $00 + .byte $00 + .byte $76 + .byte $dc + .byte $78 + .byte $76 + .byte $78 + .byte $f0 + .byte $0c + .byte $e6 + .byte $78 + .byte $cc + .byte $e6 + .byte $78 + .byte $c6 + .byte $cc + .byte $78 + .byte $60 + .byte $0c + .byte $f0 + .byte $f8 + .byte $18 + .byte $76 + .byte $30 + .byte $6c + .byte $c6 + .byte $0c + .byte $fc + .byte $1c + .byte $18 + .byte $e0 + .byte $00 + .byte $fe + .byte $0c + .byte $7e + .byte $78 + .byte $3f + .byte $7e + .byte $7e + .byte $7e + .byte $0c + .byte $3c + .byte $78 + .byte $78 + .byte $78 + .byte $3c + .byte $78 + .byte $c6 + .byte $cc + .byte $fc + .byte $7f + .byte $ce + .byte $78 + .byte $78 + .byte $78 + .byte $7e + .byte $7e + .byte $0c + .byte $18 + .byte $78 + .byte $18 + .byte $fc + .byte $30 + .byte $c6 + .byte $d8 + .byte $7e + .byte $78 + .byte $78 + .byte $7e + .byte $cc + .byte $cc + .byte $00 + .byte $00 + .byte $78 + .byte $00 + .byte $00 + .byte $cc + .byte $cf + .byte $18 + .byte $00 + .byte $00 + .byte $22 + .byte $55 + .byte $db + .byte $18 + .byte $18 + .byte $18 + .byte $36 + .byte $36 + .byte $18 + .byte $36 + .byte $36 + .byte $36 + .byte $00 + .byte $00 + .byte $00 + .byte $18 + .byte $00 + .byte $00 + .byte $18 + .byte $18 + .byte $00 + .byte $18 + .byte $18 + .byte $36 + .byte $00 + .byte $36 + .byte $00 + .byte $36 + .byte $36 + .byte $00 + .byte $36 + .byte $00 + .byte $00 + .byte $18 + .byte $36 + .byte $00 + .byte $00 + .byte $18 + .byte $36 + .byte $36 + .byte $18 + .byte $00 + .byte $18 + .byte $ff + .byte $ff + .byte $f0 + .byte $0f + .byte $00 + .byte $76 + .byte $c0 + .byte $c0 + .byte $6c + .byte $fc + .byte $70 + .byte $60 + .byte $18 + .byte $30 + .byte $38 + .byte $ee + .byte $78 + .byte $00 + .byte $60 + .byte $38 + .byte $cc + .byte $00 + .byte $fc + .byte $fc + .byte $fc + .byte $18 + .byte $d8 + .byte $30 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $3c + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $99 + .byte $e7 + .byte $38 + .byte $38 + .byte $7c + .byte $7c + .byte $18 + .byte $e7 + .byte $66 + .byte $99 + .byte $cc + .byte $18 + .byte $70 + .byte $67 + .byte $3c + .byte $e0 + .byte $0e + .byte $7e + .byte $00 + .byte $1b + .byte $38 + .byte $7e + .byte $3c + .byte $18 + .byte $3c + .byte $18 + .byte $30 + .byte $fe + .byte $24 + .byte $ff + .byte $18 + .byte $00 + .byte $00 + .byte $00 + .byte $6c + .byte $f8 + .byte $66 + .byte $cc + .byte $00 + .byte $30 + .byte $30 + .byte $66 + .byte $30 + .byte $30 + .byte $00 + .byte $30 + .byte $c0 + .byte $e6 + .byte $30 + .byte $cc + .byte $cc + .byte $0c + .byte $cc + .byte $cc + .byte $30 + .byte $cc + .byte $18 + .byte $30 + .byte $30 + .byte $30 + .byte $fc + .byte $30 + .byte $00 + .byte $c0 + .byte $cc + .byte $66 + .byte $66 + .byte $6c + .byte $62 + .byte $60 + .byte $66 + .byte $cc + .byte $30 + .byte $cc + .byte $66 + .byte $66 + .byte $c6 + .byte $c6 + .byte $6c + .byte $60 + .byte $78 + .byte $66 + .byte $cc + .byte $30 + .byte $cc + .byte $78 + .byte $ee + .byte $6c + .byte $30 + .byte $66 + .byte $60 + .byte $06 + .byte $18 + .byte $00 + .byte $00 + .byte $00 + .byte $cc + .byte $66 + .byte $cc + .byte $cc + .byte $c0 + .byte $60 + .byte $7c + .byte $66 + .byte $30 + .byte $cc + .byte $6c + .byte $30 + .byte $d6 + .byte $cc + .byte $cc + .byte $7c + .byte $7c + .byte $60 + .byte $0c + .byte $34 + .byte $cc + .byte $78 + .byte $fe + .byte $6c + .byte $7c + .byte $64 + .byte $30 + .byte $18 + .byte $30 + .byte $00 + .byte $c6 + .byte $18 + .byte $cc + .byte $c0 + .byte $66 + .byte $cc + .byte $cc + .byte $cc + .byte $78 + .byte $60 + .byte $c0 + .byte $c0 + .byte $30 + .byte $18 + .byte $30 + .byte $c6 + .byte $fc + .byte $60 + .byte $cc + .byte $cc + .byte $cc + .byte $cc + .byte $cc + .byte $cc + .byte $cc + .byte $7c + .byte $3c + .byte $cc + .byte $7e + .byte $e6 + .byte $fc + .byte $cf + .byte $18 + .byte $cc + .byte $30 + .byte $cc + .byte $cc + .byte $cc + .byte $dc + .byte $7e + .byte $7c + .byte $cc + .byte $c0 + .byte $0c + .byte $66 + .byte $6f + .byte $18 + .byte $33 + .byte $cc + .byte $88 + .byte $aa + .byte $77 + .byte $18 + .byte $18 + .byte $18 + .byte $36 + .byte $36 + .byte $18 + .byte $36 + .byte $36 + .byte $36 + .byte $00 + .byte $00 + .byte $00 + .byte $18 + .byte $00 + .byte $00 + .byte $18 + .byte $18 + .byte $00 + .byte $18 + .byte $18 + .byte $36 + .byte $00 + .byte $36 + .byte $00 + .byte $36 + .byte $36 + .byte $00 + .byte $36 + .byte $00 + .byte $00 + .byte $18 + .byte $36 + .byte $00 + .byte $00 + .byte $18 + .byte $36 + .byte $36 + .byte $18 + .byte $00 + .byte $18 + .byte $ff + .byte $ff + .byte $f0 + .byte $0f + .byte $00 + .byte $dc + .byte $f8 + .byte $c0 + .byte $6c + .byte $cc + .byte $d8 + .byte $7c + .byte $18 + .byte $78 + .byte $6c + .byte $6c + .byte $cc + .byte $7e + .byte $7e + .byte $60 + .byte $cc + .byte $fc + .byte $00 + .byte $00 + .byte $00 + .byte $18 + .byte $d8 + .byte $30 + .byte $dc + .byte $00 + .byte $00 + .byte $00 + .byte $6c + .byte $00 + .byte $00 + .byte $3c + .byte $00 + .byte $00 + .byte $bd + .byte $c3 + .byte $7c + .byte $7c + .byte $fe + .byte $fe + .byte $3c + .byte $c3 + .byte $42 + .byte $bd + .byte $cc + .byte $3c + .byte $30 + .byte $63 + .byte $e7 + .byte $f8 + .byte $3e + .byte $18 + .byte $66 + .byte $1b + .byte $6c + .byte $7e + .byte $7e + .byte $18 + .byte $7e + .byte $0c + .byte $60 + .byte $c0 + .byte $66 + .byte $ff + .byte $3c + .byte $00 + .byte $30 + .byte $00 + .byte $fe + .byte $0c + .byte $30 + .byte $dc + .byte $00 + .byte $60 + .byte $18 + .byte $3c + .byte $30 + .byte $00 + .byte $00 + .byte $00 + .byte $60 + .byte $f6 + .byte $30 + .byte $60 + .byte $0c + .byte $fe + .byte $0c + .byte $cc + .byte $30 + .byte $cc + .byte $0c + .byte $00 + .byte $00 + .byte $60 + .byte $00 + .byte $18 + .byte $30 + .byte $de + .byte $fc + .byte $66 + .byte $c0 + .byte $66 + .byte $68 + .byte $68 + .byte $ce + .byte $cc + .byte $30 + .byte $cc + .byte $6c + .byte $62 + .byte $d6 + .byte $ce + .byte $c6 + .byte $60 + .byte $dc + .byte $6c + .byte $1c + .byte $30 + .byte $cc + .byte $cc + .byte $fe + .byte $38 + .byte $30 + .byte $32 + .byte $60 + .byte $0c + .byte $18 + .byte $00 + .byte $00 + .byte $00 + .byte $7c + .byte $66 + .byte $c0 + .byte $cc + .byte $fc + .byte $60 + .byte $cc + .byte $66 + .byte $30 + .byte $0c + .byte $78 + .byte $30 + .byte $fe + .byte $cc + .byte $cc + .byte $66 + .byte $cc + .byte $66 + .byte $78 + .byte $30 + .byte $cc + .byte $cc + .byte $fe + .byte $38 + .byte $cc + .byte $30 + .byte $30 + .byte $18 + .byte $30 + .byte $00 + .byte $c6 + .byte $78 + .byte $cc + .byte $fc + .byte $3e + .byte $7c + .byte $7c + .byte $7c + .byte $c0 + .byte $7e + .byte $fc + .byte $fc + .byte $30 + .byte $18 + .byte $30 + .byte $fe + .byte $cc + .byte $78 + .byte $7f + .byte $cc + .byte $cc + .byte $cc + .byte $cc + .byte $cc + .byte $cc + .byte $cc + .byte $66 + .byte $cc + .byte $c0 + .byte $60 + .byte $30 + .byte $c6 + .byte $18 + .byte $7c + .byte $30 + .byte $cc + .byte $cc + .byte $cc + .byte $fc + .byte $00 + .byte $00 + .byte $c0 + .byte $c0 + .byte $0c + .byte $33 + .byte $37 + .byte $18 + .byte $66 + .byte $66 + .byte $22 + .byte $55 + .byte $db + .byte $18 + .byte $f8 + .byte $f8 + .byte $f6 + .byte $fe + .byte $f8 + .byte $f6 + .byte $36 + .byte $f6 + .byte $fe + .byte $fe + .byte $f8 + .byte $f8 + .byte $1f + .byte $ff + .byte $ff + .byte $1f + .byte $ff + .byte $ff + .byte $1f + .byte $37 + .byte $3f + .byte $37 + .byte $ff + .byte $f7 + .byte $37 + .byte $ff + .byte $f7 + .byte $ff + .byte $ff + .byte $ff + .byte $ff + .byte $3f + .byte $1f + .byte $1f + .byte $3f + .byte $ff + .byte $ff + .byte $f8 + .byte $1f + .byte $ff + .byte $ff + .byte $f0 + .byte $0f + .byte $00 + .byte $c8 + .byte $cc + .byte $c0 + .byte $6c + .byte $60 + .byte $d8 + .byte $66 + .byte $18 + .byte $cc + .byte $c6 + .byte $6c + .byte $cc + .byte $db + .byte $db + .byte $c0 + .byte $cc + .byte $00 + .byte $30 + .byte $60 + .byte $18 + .byte $18 + .byte $18 + .byte $00 + .byte $76 + .byte $00 + .byte $18 + .byte $18 + .byte $ec + .byte $6c + .byte $78 + .byte $3c + .byte $00 + .byte $00 + .byte $81 + .byte $ff + .byte $fe + .byte $fe + .byte $fe + .byte $7c + .byte $3c + .byte $c3 + .byte $42 + .byte $bd + .byte $7d + .byte $66 + .byte $30 + .byte $63 + .byte $e7 + .byte $fe + .byte $fe + .byte $18 + .byte $66 + .byte $7b + .byte $6c + .byte $00 + .byte $18 + .byte $18 + .byte $18 + .byte $fe + .byte $fe + .byte $c0 + .byte $ff + .byte $7e + .byte $7e + .byte $00 + .byte $30 + .byte $00 + .byte $6c + .byte $78 + .byte $18 + .byte $76 + .byte $00 + .byte $60 + .byte $18 + .byte $ff + .byte $fc + .byte $00 + .byte $fc + .byte $00 + .byte $30 + .byte $de + .byte $30 + .byte $38 + .byte $38 + .byte $cc + .byte $0c + .byte $f8 + .byte $18 + .byte $78 + .byte $7c + .byte $00 + .byte $00 + .byte $c0 + .byte $00 + .byte $0c + .byte $18 + .byte $de + .byte $cc + .byte $7c + .byte $c0 + .byte $66 + .byte $78 + .byte $78 + .byte $c0 + .byte $fc + .byte $30 + .byte $0c + .byte $78 + .byte $60 + .byte $fe + .byte $de + .byte $c6 + .byte $7c + .byte $cc + .byte $7c + .byte $70 + .byte $30 + .byte $cc + .byte $cc + .byte $d6 + .byte $38 + .byte $78 + .byte $18 + .byte $60 + .byte $18 + .byte $18 + .byte $c6 + .byte $00 + .byte $00 + .byte $0c + .byte $7c + .byte $cc + .byte $7c + .byte $cc + .byte $f0 + .byte $cc + .byte $76 + .byte $30 + .byte $0c + .byte $6c + .byte $30 + .byte $fe + .byte $cc + .byte $cc + .byte $66 + .byte $cc + .byte $76 + .byte $c0 + .byte $30 + .byte $cc + .byte $cc + .byte $d6 + .byte $6c + .byte $cc + .byte $98 + .byte $e0 + .byte $00 + .byte $1c + .byte $00 + .byte $6c + .byte $cc + .byte $cc + .byte $cc + .byte $06 + .byte $0c + .byte $0c + .byte $0c + .byte $c0 + .byte $66 + .byte $cc + .byte $cc + .byte $30 + .byte $18 + .byte $30 + .byte $c6 + .byte $78 + .byte $60 + .byte $0c + .byte $fe + .byte $78 + .byte $78 + .byte $78 + .byte $cc + .byte $cc + .byte $cc + .byte $66 + .byte $cc + .byte $c0 + .byte $f0 + .byte $fc + .byte $fa + .byte $3c + .byte $0c + .byte $30 + .byte $78 + .byte $cc + .byte $f8 + .byte $ec + .byte $3e + .byte $38 + .byte $60 + .byte $fc + .byte $fc + .byte $de + .byte $db + .byte $18 + .byte $cc + .byte $33 + .byte $88 + .byte $aa + .byte $ee + .byte $18 + .byte $18 + .byte $18 + .byte $36 + .byte $00 + .byte $18 + .byte $06 + .byte $36 + .byte $06 + .byte $06 + .byte $36 + .byte $18 + .byte $00 + .byte $18 + .byte $18 + .byte $00 + .byte $18 + .byte $00 + .byte $18 + .byte $18 + .byte $36 + .byte $30 + .byte $30 + .byte $00 + .byte $00 + .byte $30 + .byte $00 + .byte $00 + .byte $00 + .byte $36 + .byte $00 + .byte $00 + .byte $36 + .byte $18 + .byte $18 + .byte $00 + .byte $36 + .byte $18 + .byte $18 + .byte $00 + .byte $ff + .byte $00 + .byte $f0 + .byte $0f + .byte $ff + .byte $dc + .byte $f8 + .byte $c0 + .byte $6c + .byte $30 + .byte $d8 + .byte $66 + .byte $18 + .byte $cc + .byte $fe + .byte $c6 + .byte $7c + .byte $db + .byte $db + .byte $f8 + .byte $cc + .byte $fc + .byte $30 + .byte $30 + .byte $30 + .byte $18 + .byte $18 + .byte $fc + .byte $00 + .byte $38 + .byte $18 + .byte $00 + .byte $0c + .byte $6c + .byte $60 + .byte $3c + .byte $00 + .byte $00 + .byte $a5 + .byte $db + .byte $fe + .byte $7c + .byte $38 + .byte $38 + .byte $18 + .byte $e7 + .byte $66 + .byte $99 + .byte $0f + .byte $66 + .byte $3f + .byte $7f + .byte $3c + .byte $f8 + .byte $3e + .byte $7e + .byte $66 + .byte $db + .byte $38 + .byte $00 + .byte $7e + .byte $7e + .byte $18 + .byte $0c + .byte $60 + .byte $c0 + .byte $66 + .byte $3c + .byte $ff + .byte $00 + .byte $78 + .byte $6c + .byte $fe + .byte $c0 + .byte $cc + .byte $38 + .byte $c0 + .byte $60 + .byte $18 + .byte $3c + .byte $30 + .byte $00 + .byte $00 + .byte $00 + .byte $18 + .byte $ce + .byte $30 + .byte $0c + .byte $0c + .byte $6c + .byte $f8 + .byte $c0 + .byte $0c + .byte $cc + .byte $cc + .byte $30 + .byte $30 + .byte $60 + .byte $fc + .byte $18 + .byte $0c + .byte $de + .byte $cc + .byte $66 + .byte $c0 + .byte $66 + .byte $68 + .byte $68 + .byte $c0 + .byte $cc + .byte $30 + .byte $0c + .byte $6c + .byte $60 + .byte $fe + .byte $f6 + .byte $c6 + .byte $66 + .byte $cc + .byte $66 + .byte $e0 + .byte $30 + .byte $cc + .byte $cc + .byte $c6 + .byte $6c + .byte $cc + .byte $8c + .byte $60 + .byte $30 + .byte $18 + .byte $6c + .byte $00 + .byte $18 + .byte $78 + .byte $60 + .byte $78 + .byte $0c + .byte $78 + .byte $60 + .byte $76 + .byte $6c + .byte $70 + .byte $0c + .byte $66 + .byte $30 + .byte $cc + .byte $f8 + .byte $78 + .byte $dc + .byte $76 + .byte $dc + .byte $7c + .byte $7c + .byte $cc + .byte $cc + .byte $c6 + .byte $c6 + .byte $cc + .byte $fc + .byte $30 + .byte $18 + .byte $30 + .byte $00 + .byte $38 + .byte $c0 + .byte $00 + .byte $78 + .byte $3c + .byte $78 + .byte $78 + .byte $78 + .byte $78 + .byte $3c + .byte $78 + .byte $78 + .byte $70 + .byte $38 + .byte $70 + .byte $6c + .byte $00 + .byte $fc + .byte $7f + .byte $cc + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $3c + .byte $cc + .byte $7e + .byte $64 + .byte $78 + .byte $cc + .byte $18 + .byte $78 + .byte $70 + .byte $00 + .byte $00 + .byte $00 + .byte $cc + .byte $6c + .byte $6c + .byte $30 + .byte $00 + .byte $00 + .byte $cc + .byte $cc + .byte $00 + .byte $66 + .byte $66 + .byte $22 + .byte $55 + .byte $db + .byte $18 + .byte $18 + .byte $f8 + .byte $36 + .byte $00 + .byte $f8 + .byte $f6 + .byte $36 + .byte $fe + .byte $f6 + .byte $36 + .byte $f8 + .byte $00 + .byte $18 + .byte $18 + .byte $00 + .byte $18 + .byte $00 + .byte $18 + .byte $1f + .byte $36 + .byte $37 + .byte $3f + .byte $f7 + .byte $ff + .byte $37 + .byte $ff + .byte $f7 + .byte $ff + .byte $36 + .byte $ff + .byte $00 + .byte $36 + .byte $1f + .byte $1f + .byte $00 + .byte $36 + .byte $ff + .byte $18 + .byte $00 + .byte $ff + .byte $00 + .byte $f0 + .byte $0f + .byte $ff + .byte $76 + .byte $cc + .byte $cc + .byte $6c + .byte $60 + .byte $7e + .byte $66 + .byte $dc + .byte $78 + .byte $c6 + .byte $c6 + .byte $18 + .byte $7e + .byte $7e + .byte $c0 + .byte $cc + .byte $00 + .byte $fc + .byte $18 + .byte $60 + .byte $1b + .byte $18 + .byte $00 + .byte $dc + .byte $6c + .byte $00 + .byte $00 + .byte $0c + .byte $6c + .byte $30 + .byte $3c + .byte $00 + .byte $00 + .byte $81 + .byte $ff + .byte $fe + .byte $38 + .byte $7c + .byte $10 + .byte $00 + .byte $ff + .byte $3c + .byte $c3 + .byte $07 + .byte $66 + .byte $33 + .byte $63 + .byte $5a + .byte $e0 + .byte $0e + .byte $3c + .byte $66 + .byte $db + .byte $63 + .byte $00 + .byte $3c + .byte $3c + .byte $18 + .byte $18 + .byte $30 + .byte $00 + .byte $24 + .byte $18 + .byte $ff + .byte $00 + .byte $78 + .byte $6c + .byte $6c + .byte $7c + .byte $c6 + .byte $6c + .byte $60 + .byte $30 + .byte $30 + .byte $66 + .byte $30 + .byte $00 + .byte $00 + .byte $00 + .byte $0c + .byte $c6 + .byte $70 + .byte $cc + .byte $cc + .byte $3c + .byte $c0 + .byte $60 + .byte $cc + .byte $cc + .byte $cc + .byte $30 + .byte $30 + .byte $30 + .byte $00 + .byte $30 + .byte $cc + .byte $c6 + .byte $78 + .byte $66 + .byte $66 + .byte $6c + .byte $62 + .byte $62 + .byte $66 + .byte $cc + .byte $30 + .byte $0c + .byte $66 + .byte $60 + .byte $ee + .byte $e6 + .byte $6c + .byte $66 + .byte $cc + .byte $66 + .byte $cc + .byte $b4 + .byte $cc + .byte $cc + .byte $c6 + .byte $c6 + .byte $cc + .byte $c6 + .byte $60 + .byte $60 + .byte $18 + .byte $38 + .byte $00 + .byte $30 + .byte $00 + .byte $60 + .byte $00 + .byte $0c + .byte $00 + .byte $6c + .byte $00 + .byte $60 + .byte $00 + .byte $00 + .byte $60 + .byte $30 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $30 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $30 + .byte $18 + .byte $30 + .byte $dc + .byte $10 + .byte $cc + .byte $cc + .byte $00 + .byte $c3 + .byte $00 + .byte $00 + .byte $30 + .byte $00 + .byte $c3 + .byte $00 + .byte $00 + .byte $00 + .byte $c6 + .byte $00 + .byte $38 + .byte $30 + .byte $00 + .byte $00 + .byte $6c + .byte $cc + .byte $cc + .byte $e0 + .byte $cc + .byte $e0 + .byte $cc + .byte $18 + .byte $00 + .byte $18 + .byte $6c + .byte $cc + .byte $cc + .byte $1b + .byte $00 + .byte $00 + .byte $1c + .byte $1c + .byte $f8 + .byte $00 + .byte $6c + .byte $6c + .byte $00 + .byte $00 + .byte $00 + .byte $c6 + .byte $c6 + .byte $18 + .byte $33 + .byte $cc + .byte $88 + .byte $aa + .byte $77 + .byte $18 + .byte $18 + .byte $18 + .byte $36 + .byte $00 + .byte $00 + .byte $36 + .byte $36 + .byte $00 + .byte $36 + .byte $36 + .byte $18 + .byte $00 + .byte $18 + .byte $18 + .byte $00 + .byte $18 + .byte $00 + .byte $18 + .byte $18 + .byte $36 + .byte $36 + .byte $00 + .byte $36 + .byte $00 + .byte $36 + .byte $00 + .byte $36 + .byte $18 + .byte $36 + .byte $00 + .byte $00 + .byte $36 + .byte $18 + .byte $00 + .byte $00 + .byte $36 + .byte $18 + .byte $18 + .byte $00 + .byte $ff + .byte $00 + .byte $f0 + .byte $0f + .byte $ff + .byte $00 + .byte $78 + .byte $fc + .byte $fe + .byte $cc + .byte $00 + .byte $66 + .byte $76 + .byte $30 + .byte $6c + .byte $6c + .byte $30 + .byte $00 + .byte $0c + .byte $60 + .byte $cc + .byte $fc + .byte $30 + .byte $30 + .byte $30 + .byte $1b + .byte $18 + .byte $30 + .byte $76 + .byte $6c + .byte $00 + .byte $00 + .byte $0c + .byte $6c + .byte $18 + .byte $00 + .byte $00 + .byte $00 + .byte $7e + .byte $7e + .byte $6c + .byte $10 + .byte $38 + .byte $10 + .byte $00 + .byte $ff + .byte $00 + .byte $ff + .byte $0f + .byte $3c + .byte $3f + .byte $7f + .byte $99 + .byte $80 + .byte $02 + .byte $18 + .byte $66 + .byte $7f + .byte $3e + .byte $00 + .byte $18 + .byte $18 + .byte $18 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $30 + .byte $6c + .byte $6c + .byte $30 + .byte $00 + .byte $38 + .byte $60 + .byte $18 + .byte $60 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $06 + .byte $7c + .byte $30 + .byte $78 + .byte $78 + .byte $1c + .byte $fc + .byte $38 + .byte $fc + .byte $78 + .byte $78 + .byte $00 + .byte $00 + .byte $18 + .byte $00 + .byte $60 + .byte $78 + .byte $7c + .byte $30 + .byte $fc + .byte $3c + .byte $f8 + .byte $fe + .byte $fe + .byte $3c + .byte $cc + .byte $78 + .byte $1e + .byte $e6 + .byte $f0 + .byte $c6 + .byte $c6 + .byte $38 + .byte $fc + .byte $78 + .byte $fc + .byte $78 + .byte $fc + .byte $cc + .byte $cc + .byte $c6 + .byte $c6 + .byte $cc + .byte $fe + .byte $78 + .byte $c0 + .byte $78 + .byte $10 + .byte $00 + .byte $30 + .byte $00 + .byte $e0 + .byte $00 + .byte $1c + .byte $00 + .byte $38 + .byte $00 + .byte $e0 + .byte $30 + .byte $0c + .byte $e0 + .byte $70 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $10 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $1c + .byte $18 + .byte $e0 + .byte $76 + .byte $00 + .byte $78 + .byte $00 + .byte $1c + .byte $7e + .byte $cc + .byte $e0 + .byte $30 + .byte $00 + .byte $7e + .byte $cc + .byte $e0 + .byte $cc + .byte $7c + .byte $e0 + .byte $c6 + .byte $30 + .byte $1c + .byte $00 + .byte $3e + .byte $78 + .byte $00 + .byte $00 + .byte $78 + .byte $00 + .byte $00 + .byte $c3 + .byte $cc + .byte $18 + .byte $38 + .byte $cc + .byte $f8 + .byte $0e + .byte $1c + .byte $38 + .byte $00 + .byte $00 + .byte $00 + .byte $fc + .byte $3c + .byte $38 + .byte $30 + .byte $00 + .byte $00 + .byte $c3 + .byte $c3 + .byte $18 + .byte $00 + .byte $00 + .byte $22 + .byte $55 + .byte $db + .byte $18 + .byte $18 + .byte $18 + .byte $36 + .byte $00 + .byte $00 + .byte $36 + .byte $36 + .byte $00 + .byte $36 + .byte $36 + .byte $18 + .byte $00 + .byte $18 + .byte $18 + .byte $00 + .byte $18 + .byte $00 + .byte $18 + .byte $18 + .byte $36 + .byte $36 + .byte $00 + .byte $36 + .byte $00 + .byte $36 + .byte $00 + .byte $36 + .byte $18 + .byte $36 + .byte $00 + .byte $00 + .byte $36 + .byte $18 + .byte $00 + .byte $00 + .byte $36 + .byte $18 + .byte $18 + .byte $00 + .byte $ff + .byte $00 + .byte $f0 + .byte $0f + .byte $ff + .byte $00 + .byte $00 + .byte $00 + .byte $00 + .byte $fc + .byte $00 + .byte $00 + .byte $00 + .byte $fc + .byte $38 + .byte $38 + .byte $1c + .byte $00 + .byte $06 + .byte $38 + .byte $78 + .byte $00 + .byte $30 + .byte $60 + .byte $18 + .byte $0e + .byte $18 + .byte $30 + .byte $00 + .byte $38 + .byte $00 + .byte $00 + .byte $0f + .byte $78 + .byte $70 + .byte $00 + .byte $00 diff --git a/libsrc/atari7800/mono_setcursor.s b/libsrc/atari7800/mono_setcursor.s new file mode 100644 index 000000000..02e0308f6 --- /dev/null +++ b/libsrc/atari7800/mono_setcursor.s @@ -0,0 +1,214 @@ +; +; 2022-04-03, Karri Kaksonen +; +; setcursor (unsigned char on); +; +; The Atari 7800 does not have a hw cursor. +; This module emulates a cursor to be used with the conio +; implementation. +; +; The actual cursor display is included in the conio dll +; but every scanline has the element silenced by default +; at the end of every zone. +; +; The way the cursor works is to silence it before the cursor +; position changes and enable it afterwards. +; +; In order to get some performance we have a pointer to the +; cursor header structure. This structure is always at the +; end of the zone. So the pointer changes when CURS_Y changes. +; +; There is so many dependencies that it makes sense to +; deal with all CURS_X, CURS_Y stuff in this file and +; definitely not allow direct access to the variables. +; + + .export mono_gotoxy, _mono_gotoxy, mono_gotox, mono_gotoy + .constructor mono_init_cursor + .interruptor mono_blink_cursor + + .importzp sp + .import _zonecounter + .import _mono_zones + .import cursor + .import pusha, incsp1, pusha0, pushax, popa + .include "atari7800.inc" + .include "extzp.inc" + + .macpack generic + + .data +;----------------------------------------------------------------------------- +; The variables used by cursor functions +; + +blink_time: + .byte 200 + + .code + +;--------------------------------------------------------------------------- +; 8x16 routine + +umula0: + ldy #8 ; Number of bits + lda #0 + lsr ptr7800 ; Get first bit into carry +@L0: bcc @L1 + + clc + adc ptrtmp + tax + lda ptrtmp+1 ; hi byte of left op + adc ptr7800+1 + sta ptr7800+1 + txa + +@L1: ror ptr7800+1 + ror a + ror ptr7800 + dey + bne @L0 + tax + lda ptr7800 ; Load the result + rts + +;----------------------------------------------------------------------------- +; Calculate cursorzone address +; You also need to set the cursorzone to point to the correct cursor Header +; at the end of line CURS_Y. +; Offset to cursor zone 5. To next line offset 11 +; cursorzone points to _mono_zones + CURS_Y * 16 + 10 +; A = CURS_Y + .proc calccursorzone + + sta ptr7800 + lda #16 + sta ptrtmp + lda #0 + sta ptr7800+1 + sta ptrtmp+1 + jsr umula0 + clc + adc #10 + bcc @L1 + inx +@L1: clc + adc #<_mono_zones + sta cursorzone ; calculate new cursorzone + txa + adc #>_mono_zones + sta cursorzone+1 + rts + + .endproc + +;----------------------------------------------------------------------------- +; Set cursor to Y position. +; You also need to set the cursorzone to point to the correct cursor Header +; at the end of line CURS_Y. +; Offset to cursor zone 5. To next line offset 11 +; cursorzone points to _mono_zones + CURS_Y * 11 + 5 +; +; cursorzone[1] = 0 when not CURS_Y, 31 if CURS_Y +; +; Disable cursor +; cursorzone[1] = 0 +; +; Enable cursor +; if showcursor cursorzone[1] = 31 +; + .proc mono_gotoy + + pha + lda CURS_Y + jsr calccursorzone + ldy #1 + lda #0 + sta (cursorzone),y ; disable cursor + pla + sta CURS_Y + jsr calccursorzone + lda cursor + beq @L1 + lda #31 ; enable cursor +@L1: ldy #1 + sta (cursorzone),y + rts + + .endproc + +;----------------------------------------------------------------------------- +; Set cursor to X position. +; You also need to set the hpos offset to the correct value on this line +; cursorzone[3] = 4 * CURS_X? +; + .proc mono_gotox + + sta CURS_X + ldy #3 + clc + rol + rol + sta (cursorzone),y + rts + + .endproc + +;----------------------------------------------------------------------------- +; Set cursor to desired position (X,Y) +; + .proc _mono_gotoxy + + jsr mono_gotoy + jsr popa + jmp mono_gotox + + .endproc + + .proc mono_gotoxy + jsr popa + jmp _mono_gotoxy + .endproc + +;----------------------------------------------------------------------------- +; Initialize cursorzone at startup +; Offset to cursor zone 5. +; + .proc mono_blink_cursor + lda _zonecounter + and #01 + beq @L3 + inc blink_time + bne @L3 + lda #200 + sta blink_time + ldy #0 + lda (cursorzone),y + cmp #32 + bne @L1 + lda #95 + bne @L2 +@L1: lda #32 +@L2: sta (cursorzone),y +@L3: rts + .endproc + +;----------------------------------------------------------------------------- +; Initialize cursorzone at startup +; Offset to cursor zone 5. +; + .segment "ONCE" +mono_init_cursor: + lda #0 + jsr calccursorzone + lda #0 + sta blink_time + rts + + +;----------------------------------------------------------------------------- +; force the init constructor to be imported + + .import mono_initconio +conio_init = mono_initconio diff --git a/libsrc/atari7800/setcursor.s b/libsrc/atari7800/setcursor.s new file mode 100644 index 000000000..f438de24f --- /dev/null +++ b/libsrc/atari7800/setcursor.s @@ -0,0 +1,214 @@ +; +; 2022-04-03, Karri Kaksonen +; +; setcursor (unsigned char on); +; +; The Atari 7800 does not have a hw cursor. +; This module emulates a cursor to be used with the conio +; implementation. +; +; The actual cursor display is included in the conio dll +; but every scanline has the element silenced by default +; at the end of every zone. +; +; The way the cursor works is to silence it before the cursor +; position changes and enable it afterwards. +; +; In order to get some performance we have a pointer to the +; cursor header structure. This structure is always at the +; end of the zone. So the pointer changes when CURS_Y changes. +; +; There is so many dependencies that it makes sense to +; deal with all CURS_X, CURS_Y stuff in this file and +; definitely not allow direct access to the variables. +; + + .export gotoxy, _gotoxy, gotox, gotoy + .constructor init_cursor + .interruptor blink_cursor + + .importzp sp + .import _zonecounter + .import _zones + .import cursor + .import pusha, incsp1, pusha0, pushax, popa + .include "atari7800.inc" + .include "extzp.inc" + + .macpack generic + + .data +;----------------------------------------------------------------------------- +; The variables used by cursor functions +; + +blink_time: + .byte 200 + + .code + +;--------------------------------------------------------------------------- +; 8x16 routine + +umula0: + ldy #8 ; Number of bits + lda #0 + lsr ptr7800 ; Get first bit into carry +@L0: bcc @L1 + + clc + adc ptrtmp + tax + lda ptrtmp+1 ; hi byte of left op + clc + adc ptr7800+1 + sta ptr7800+1 + txa + +@L1: ror ptr7800+1 + ror a + ror ptr7800 + dey + bne @L0 + tax + lda ptr7800 ; Load the result + rts + +;----------------------------------------------------------------------------- +; Calculate cursorzone address +; You also need to set the cursorzone to point to the correct cursor Header +; at the end of line CURS_Y. +; Offset to cursor zone 5. To next line offset 11 +; cursorzone points to _zones + CURS_Y * 11 + 5 +; A = CURS_Y + .proc calccursorzone + + sta ptr7800 + lda #11 + sta ptrtmp + lda #0 + sta ptr7800+1 + sta ptrtmp+1 + jsr umula0 + clc + adc #5 + bcc @L1 + inx +@L1: clc + adc #<_zones + sta cursorzone ; calculate new cursorzone + txa + adc #>_zones + sta cursorzone+1 + rts + + .endproc + +;----------------------------------------------------------------------------- +; Set cursor to Y position. +; You also need to set the cursorzone to point to the correct cursor Header +; at the end of line CURS_Y. +; Offset to cursor zone 5. To next line offset 11 +; cursorzone points to _zones + CURS_Y * 11 + 5 +; +; cursorzone[1] = 0 when not CURS_Y, 30 if CURS_Y +; +; Disable cursor +; cursorzone[1] = 0 +; +; Enable cursor +; if showcursor cursorzone[1] = 30 +; + .proc gotoy + + pha + lda CURS_Y + jsr calccursorzone + ldy #1 + lda #0 + sta (cursorzone),y ; disable cursor + pla + sta CURS_Y + jsr calccursorzone + lda cursor + beq @L1 + lda #30 ; enable cursor +@L1: ldy #1 + sta (cursorzone),y + rts + + .endproc + +;----------------------------------------------------------------------------- +; Set cursor to X position. +; You also need to set the hpos offset to the correct value on this line +; cursorzone[3] = 8 * CURS_X +; + .proc gotox + + sta CURS_X + ldy #3 + clc + rol + rol + rol + sta (cursorzone),y + rts + + .endproc + +;----------------------------------------------------------------------------- +; Set cursor to desired position (X,Y) +; + .proc _gotoxy + + jsr gotoy + jsr popa + jsr gotox + rts + .endproc + + .proc gotoxy + jsr popa + jmp _gotoxy + .endproc + +;----------------------------------------------------------------------------- +; Initialize cursorzone at startup +; Offset to cursor zone 5. +; + .proc blink_cursor + lda _zonecounter + and #01 + beq @L3 + inc blink_time + bne @L3 + lda #200 + sta blink_time + ldy #0 + lda (cursorzone),y + bne @L1 + lda #254 + bne @L2 +@L1: lda #0 +@L2: sta (cursorzone),y +@L3: rts + .endproc + +;----------------------------------------------------------------------------- +; Initialize cursorzone at startup +; Offset to cursor zone 5. +; + .segment "ONCE" +init_cursor: + lda #0 + jsr calccursorzone + lda #0 + sta blink_time + rts + +;----------------------------------------------------------------------------- +; force the init constructor to be imported + + .import initconio +conio_init = initconio diff --git a/libsrc/atari7800/textcolor.s b/libsrc/atari7800/textcolor.s new file mode 100644 index 000000000..1f8efced5 --- /dev/null +++ b/libsrc/atari7800/textcolor.s @@ -0,0 +1,53 @@ +; +; Karri Kaksonen, 2022-04-16 +; +; + + .export _textcolor + .export txtcolor + + .include "atari7800.inc" + + .data +;----------------------------------------------------------------------------- +; Holder of the text colour offset +; 0 = red, 42 = green, 84 = white +; +txtcolor: + .byte 0 + + .code + +;----------------------------------------------------------------------------- +; Change the text colour +; +; Logical colour names are +; 0 = red +; 1 = green +; 2 = white +; +; The routine will also return the previous textcolor +; + .proc _textcolor + + beq @L2 + sec + sbc #1 + beq @L1 + lda #84 + jmp @L2 +@L1: lda #42 +@L2: ldy txtcolor + sta txtcolor ; Store new textcolor + ldx #0 + tya + bne @L3 + rts ; Old colour was 0 +@L3: sec + sbc #42 + bne @L4 + lda #1 + rts ; Old colour was 1 +@L4: lda #2 + rts ; Old colour was 2 + .endproc diff --git a/libsrc/atari7800/wherex.s b/libsrc/atari7800/wherex.s new file mode 100644 index 000000000..4926f1479 --- /dev/null +++ b/libsrc/atari7800/wherex.s @@ -0,0 +1,19 @@ +; +; 2022-04-16, Karri Kaksonen +; +; unsigned char wherex() +; + + .export _wherex + .include "extzp.inc" + +;----------------------------------------------------------------------------- +; Get cursor X position +; + .proc _wherex + + ldx #0 + lda CURS_X + rts + .endproc + diff --git a/libsrc/atari7800/wherey.s b/libsrc/atari7800/wherey.s new file mode 100644 index 000000000..f105975c0 --- /dev/null +++ b/libsrc/atari7800/wherey.s @@ -0,0 +1,19 @@ +; +; 2022-04-16, Karri Kaksonen +; +; unsigned char wherey() +; + + .export _wherey + .include "extzp.inc" + +;----------------------------------------------------------------------------- +; Get cursor Y position +; + .proc _wherey + + ldx #0 + lda CURS_Y + rts + .endproc + diff --git a/libsrc/atmos/atmos.s b/libsrc/atmos/atmos.s index 6b5a4a49c..5822be8d9 100644 --- a/libsrc/atmos/atmos.s +++ b/libsrc/atmos/atmos.s @@ -7,9 +7,44 @@ .include "atmos.inc" -_atmos_ping := PING -_atmos_shoot := SHOOT -_atmos_explode := EXPLODE -_atmos_zap := ZAP -_atmos_tick := TICK -_atmos_tock := TOCK +.proc _atmos_ping + bit $31 + bvs L1 ; Atmos? + jmp PING +L1: jmp PING1 +.endproc + +.proc _atmos_shoot + bit $31 + bvs L1 ; Atmos? + jmp SHOOT +L1: jmp SHOOT1 +.endproc + +.proc _atmos_explode + bit $31 + bvs L1 ; Atmos? + jmp EXPLODE +L1: jmp EXPLODE1 +.endproc + +.proc _atmos_zap + bit $31 + bvs L1 ; Atmos? + jmp ZAP +L1: jmp ZAP1 +.endproc + +.proc _atmos_tick + bit $31 + bvs L1 ; Atmos? + jmp TICK +L1: jmp TICK1 +.endproc + +.proc _atmos_tock + bit $31 + bvs L1 ; Atmos? + jmp TOCK +L1: jmp TOCK1 +.endproc diff --git a/libsrc/atmos/bashdr.s b/libsrc/atmos/bashdr.s index e09bc9fec..79cf9acb1 100644 --- a/libsrc/atmos/bashdr.s +++ b/libsrc/atmos/bashdr.s @@ -1,6 +1,6 @@ ; ; 2010-11-14, Ullrich von Bassewitz -; 2014-09-06, Greg King +; 2016-03-17, Greg King ; ; This module supplies a small BASIC stub program that uses CALL ; to jump to the machine-language code that follows it. @@ -22,3 +22,13 @@ .byte $00 ; End of BASIC line Next: .addr $0000 ; BASIC program end marker Start: + +; ------------------------------------------------------------------------ + +; This padding is needed by a bug in the ROM. +; (The CLOAD command starts BASIC's variables table on top of the last byte +; that was loaded [instead of at the next address].) + +.segment "BASTAIL" + + .byte 0 diff --git a/libsrc/atmos/capslock.s b/libsrc/atmos/capslock.s index 0ed6e70da..1451513b4 100644 --- a/libsrc/atmos/capslock.s +++ b/libsrc/atmos/capslock.s @@ -15,9 +15,10 @@ ;-------------------------------------------------------------------------- -; Put this constructor into a segment that can be re-used by programs. +; Put this constructor into a segment whose space +; will be re-used by BSS, the heap, and the C stack. ; -.segment "INIT" +.segment "ONCE" ; Turn the capitals lock off. @@ -43,7 +44,7 @@ restore_caps: ;-------------------------------------------------------------------------- -.bss +.segment "INIT" capsave: .res 1 diff --git a/libsrc/atmos/cclear.s b/libsrc/atmos/cclear.s index 9d356a8ab..f6416363c 100644 --- a/libsrc/atmos/cclear.s +++ b/libsrc/atmos/cclear.s @@ -6,7 +6,7 @@ ; .export _cclearxy, _cclear - .import setscrptr + .import setscrptr .import rvs .import popax .importzp ptr2 @@ -25,7 +25,7 @@ _cclear: tax ; Is the length zero? beq @L9 ; Jump if done jsr setscrptr ; Set ptr2 to screen, won't use X - lda #' ' + lda #' ' ora rvs @L1: sta (ptr2),y ; Write one char iny ; Next char diff --git a/libsrc/atmos/cgetc.s b/libsrc/atmos/cgetc.s index e4ea15ac6..72cd9407a 100644 --- a/libsrc/atmos/cgetc.s +++ b/libsrc/atmos/cgetc.s @@ -6,7 +6,6 @@ ; .export _cgetc - .constructor initcgetc .import cursor .forceimport disable_caps @@ -53,14 +52,3 @@ @L3: rts .endproc - -; ------------------------------------------------------------------------ -; Switch the cursor off. Code goes into the INIT segment -; which may be reused after it is run. - -.segment "INIT" - -initcgetc: - lsr STATUS - asl STATUS ; Clear bit zero - rts diff --git a/libsrc/atmos/cputc.s b/libsrc/atmos/cputc.s index a0ef14b70..db3fa373d 100644 --- a/libsrc/atmos/cputc.s +++ b/libsrc/atmos/cputc.s @@ -7,7 +7,8 @@ ; .export _cputcxy, _cputc - .export setscrptr, putchar + .export setscrptr, cputdirect, putchar + .constructor initcputc .import rvs .import popax .importzp ptr2 @@ -31,13 +32,13 @@ _cputc: cmp #$0D ; CR? rts L1: cmp #$0A ; LF? - bne output + bne cputdirect inc CURS_Y ; Newline rts ; Output the character, then advance the cursor position -output: +cputdirect: jsr putchar advance: @@ -95,3 +96,13 @@ ScrTabHi: .byte >(SCREEN + Line * SCREEN_XSIZE) .endrep +; ------------------------------------------------------------------------ +; Switch the cursor off. Code goes into the ONCE segment, +; which will be reused after it is run. + +.segment "ONCE" + +initcputc: + lsr STATUS + asl STATUS ; Clear bit zero + rts diff --git a/libsrc/atmos/crt0.s b/libsrc/atmos/crt0.s index e789b28c2..8c2be656c 100644 --- a/libsrc/atmos/crt0.s +++ b/libsrc/atmos/crt0.s @@ -2,14 +2,15 @@ ; Startup code for cc65 (Oric version) ; ; By Debrune Jrme <jede@oric.org> and Ullrich von Bassewitz <uz@cc65.org> -; 2015-01-09, Greg King +; 2016-03-18, Greg King ; .export _exit .export __STARTUP__ : absolute = 1 ; Mark as startup + .import initlib, donelib .import callmain, zerobss - .import __RAM_START__, __RAM_SIZE__, __STACKSIZE__ + .import __MAIN_START__, __MAIN_SIZE__ .include "zeropage.inc" .include "atmos.inc" @@ -19,39 +20,17 @@ .segment "STARTUP" -; Save the zero-page area that we're about to use. - - ldx #zpspace-1 -L1: lda sp,x - sta zpsave,x - dex - bpl L1 - -; Clear the BSS data. - - jsr zerobss - -; Currently, color isn't supported on the text screen. -; Unprotect screen columns 0 and 1 (where each line's color codes would sit). - - lda STATUS - sta stsave - and #%11011111 - sta STATUS - -; Save some system stuff; and, set up the stack. - tsx stx spsave ; Save system stk ptr - lda #<(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) - sta sp - lda #>(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) - sta sp+1 ; Set argument stack ptr +; Save space by putting some of the start-up code in a segment +; that will be re-used. -; Call the module constructors. + jsr init - jsr initlib +; Clear the BSS variables (after the constructors have been run). + + jsr zerobss ; Push the command-line arguments; and, call main(). @@ -70,7 +49,7 @@ _exit: jsr donelib ; Copy back the zero-page stuff. - ldx #zpspace-1 + ldx #zpspace - 1 L2: lda zpsave,x sta sp,x dex @@ -81,28 +60,42 @@ L2: lda zpsave,x rts ; ------------------------------------------------------------------------ +; Put this code in a place that will be re-used by BSS, the heap, +; and the C stack. -.segment "ZPSAVE1" +.segment "ONCE" -zpsave: +; Save the zero-page area that we're about to use. -; This padding is needed by a bug in the ROM. -; (The CLOAD command starts BASIC's variables table on top of the last byte -; that was loaded [instead of at the next address].) -; This is overlaid on a buffer, so that it doesn't use extra space in RAM. +init: ldx #zpspace - 1 +L1: lda sp,x + sta zpsave,x + dex + bpl L1 - .byte 0 +; Currently, color isn't supported on the text screen. +; Unprotect screen columns 0 and 1 (where each line's color codes would sit). -; The segments "ZPSAVE1" and "ZPSAVE2" always must be together. -; They create a single object (the zpsave buffer). + lda STATUS + sta stsave + and #%11011111 + sta STATUS -.segment "ZPSAVE2" +; Set up the C stack. - .res zpspace - 1 + lda #<(__MAIN_START__ + __MAIN_SIZE__) + ldx #>(__MAIN_START__ + __MAIN_SIZE__) + sta sp + stx sp+1 ; Set argument stack ptr + +; Call the module constructors. + + jmp initlib ; ------------------------------------------------------------------------ -.bss +.segment "INIT" spsave: .res 1 stsave: .res 1 +zpsave: .res zpspace diff --git a/libsrc/atmos/ctype.s b/libsrc/atmos/ctype.s index 79edafbb2..57ad8c1a3 100644 --- a/libsrc/atmos/ctype.s +++ b/libsrc/atmos/ctype.s @@ -1,299 +1,155 @@ +; ctype.s ; -; Ullrich von Bassewitz, 2003-04-13 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems ; -; Character specification table. +; https://cc65.github.io ; +; See "LICENSE" file for legal information. +; +; ATMOS character specification table. +; + + .include "ctypetable.inc" + .export __ctypeidx ; The tables are readonly, put them into the rodata segment .rodata -; The following 256 byte wide table specifies attributes for the isxxx type -; of functions. Doing it by a table means some overhead in space, but it -; has major advantages: -; -; * It is fast. If it were'nt for the slow parameter passing of cc65, one -; could even define macros for the isxxx functions (this is usually -; done on other platforms). -; -; * It is highly portable. The only unportable part is the table itself, -; all real code goes into the common library. -; -; * We save some code in the isxxx functions. -; -; -; Bit assignments: -; -; 0 - Lower case char -; 1 - Upper case char -; 2 - Numeric digit -; 3 - Hex digit (both, lower and upper) -; 4 - Control character -; 5 - The space character itself -; 6 - Other whitespace (that is: '\f', '\n', '\r', '\t' and '\v') -; 7 - Space or tab character +__ctypeidx: + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 0/00 ___ctrl_@___, 1/01 ___ctrl_A___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 2/02 ___ctrl_B___, 3/03 ___ctrl_C___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 4/04 ___ctrl_D___, 5/05 ___ctrl_E___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 6/06 ___ctrl_F___, 7/07 ___ctrl_G___ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_SPACETAB_IDX ; 8/08 ___ctrl_H___, 9/09 ___ctrl_I___ + ct_mix CT_CTRL_WS_IDX, CT_CTRL_WS_IDX ; 10/0a ___ctrl_J___, 11/0b ___ctrl_K___ + ct_mix CT_CTRL_WS_IDX, CT_CTRL_WS_IDX ; 12/0c ___ctrl_L___, 13/0d ___ctrl_M___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 14/0e ___ctrl_N___, 15/0f ___ctrl_O___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 16/10 ___ctrl_P___, 17/11 ___ctrl_Q___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 18/12 ___ctrl_R___, 19/13 ___ctrl_S___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 20/14 ___ctrl_T___, 21/15 ___ctrl_U___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 22/16 ___ctrl_V___, 23/17 ___ctrl_W___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 24/18 ___ctrl_X___, 25/19 ___ctrl_Y___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 26/1a ___ctrl_Z___, 27/1b ___ctrl_[___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 28/1c ___ctrl_\___, 29/1d ___ctrl_]___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 30/1e ___ctrl_^___, 31/1f ___ctrl_____ - .export __ctype + ct_mix CT_SPACE_SPACETAB_IDX, CT_NONE_IDX ; 32/20 ___SPACE___, 33/21 _____!_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 34/22 _____"_____, 35/23 _____#_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 36/24 _____$_____, 37/25 _____%_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 38/26 _____&_____, 39/27 _____'_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 40/28 _____(_____, 41/29 _____)_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 42/2a _____*_____, 43/2b _____+_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 44/2c _____,_____, 45/2d _____-_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 46/2e _____._____, 47/2f _____/_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 48/30 _____0_____, 49/31 _____1_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 50/32 _____2_____, 51/33 _____3_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 52/34 _____4_____, 53/35 _____5_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 54/36 _____6_____, 55/37 _____7_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 56/38 _____8_____, 57/39 _____9_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 58/3a _____:_____, 59/3b _____;_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 60/3c _____<_____, 61/3d _____=_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 62/3e _____>_____, 63/3f _____?_____ -__ctype: - .byte $10 ; 0/00 ___ctrl_@___ - .byte $10 ; 1/01 ___ctrl_A___ - .byte $10 ; 2/02 ___ctrl_B___ - .byte $10 ; 3/03 ___ctrl_C___ - .byte $10 ; 4/04 ___ctrl_D___ - .byte $10 ; 5/05 ___ctrl_E___ - .byte $10 ; 6/06 ___ctrl_F___ - .byte $10 ; 7/07 ___ctrl_G___ - .byte $10 ; 8/08 ___ctrl_H___ - .byte $D0 ; 9/09 ___ctrl_I___ - .byte $50 ; 10/0a ___ctrl_J___ - .byte $50 ; 11/0b ___ctrl_K___ - .byte $50 ; 12/0c ___ctrl_L___ - .byte $50 ; 13/0d ___ctrl_M___ - .byte $10 ; 14/0e ___ctrl_N___ - .byte $10 ; 15/0f ___ctrl_O___ - .byte $10 ; 16/10 ___ctrl_P___ - .byte $10 ; 17/11 ___ctrl_Q___ - .byte $10 ; 18/12 ___ctrl_R___ - .byte $10 ; 19/13 ___ctrl_S___ - .byte $10 ; 20/14 ___ctrl_T___ - .byte $10 ; 21/15 ___ctrl_U___ - .byte $10 ; 22/16 ___ctrl_V___ - .byte $10 ; 23/17 ___ctrl_W___ - .byte $10 ; 24/18 ___ctrl_X___ - .byte $10 ; 25/19 ___ctrl_Y___ - .byte $10 ; 26/1a ___ctrl_Z___ - .byte $10 ; 27/1b ___ctrl_[___ - .byte $10 ; 28/1c ___ctrl_\___ - .byte $10 ; 29/1d ___ctrl_]___ - .byte $10 ; 30/1e ___ctrl_^___ - .byte $10 ; 31/1f ___ctrl_____ - .byte $A0 ; 32/20 ___SPACE___ - .byte $00 ; 33/21 _____!_____ - .byte $00 ; 34/22 _____"_____ - .byte $00 ; 35/23 _____#_____ - .byte $00 ; 36/24 _____$_____ - .byte $00 ; 37/25 _____%_____ - .byte $00 ; 38/26 _____&_____ - .byte $00 ; 39/27 _____'_____ - .byte $00 ; 40/28 _____(_____ - .byte $00 ; 41/29 _____)_____ - .byte $00 ; 42/2a _____*_____ - .byte $00 ; 43/2b _____+_____ - .byte $00 ; 44/2c _____,_____ - .byte $00 ; 45/2d _____-_____ - .byte $00 ; 46/2e _____._____ - .byte $00 ; 47/2f _____/_____ - .byte $0C ; 48/30 _____0_____ - .byte $0C ; 49/31 _____1_____ - .byte $0C ; 50/32 _____2_____ - .byte $0C ; 51/33 _____3_____ - .byte $0C ; 52/34 _____4_____ - .byte $0C ; 53/35 _____5_____ - .byte $0C ; 54/36 _____6_____ - .byte $0C ; 55/37 _____7_____ - .byte $0C ; 56/38 _____8_____ - .byte $0C ; 57/39 _____9_____ - .byte $00 ; 58/3a _____:_____ - .byte $00 ; 59/3b _____;_____ - .byte $00 ; 60/3c _____<_____ - .byte $00 ; 61/3d _____=_____ - .byte $00 ; 62/3e _____>_____ - .byte $00 ; 63/3f _____?_____ + ct_mix CT_NONE_IDX, CT_UPPER_XDIGIT_IDX ; 64/40 _____@_____, 65/41 _____A_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 66/42 _____B_____, 67/43 _____C_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 68/44 _____D_____, 69/45 _____E_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_IDX ; 70/46 _____F_____, 71/47 _____G_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 72/48 _____H_____, 73/49 _____I_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 74/4a _____J_____, 75/4b _____K_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 76/4c _____L_____, 77/4d _____M_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 78/4e _____N_____, 79/4f _____O_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 80/50 _____P_____, 81/51 _____Q_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 82/52 _____R_____, 83/53 _____S_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 84/54 _____T_____, 85/55 _____U_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 86/56 _____V_____, 87/57 _____W_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 88/58 _____X_____, 89/59 _____Y_____ + ct_mix CT_UPPER_IDX, CT_NONE_IDX ; 90/5a _____Z_____, 91/5b _____[_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 92/5c _____\_____, 93/5d _____]_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 94/5e _____^_____, 95/5f _UNDERLINE_ - .byte $00 ; 64/40 _____@_____ - .byte $0A ; 65/41 _____A_____ - .byte $0A ; 66/42 _____B_____ - .byte $0A ; 67/43 _____C_____ - .byte $0A ; 68/44 _____D_____ - .byte $0A ; 69/45 _____E_____ - .byte $0A ; 70/46 _____F_____ - .byte $02 ; 71/47 _____G_____ - .byte $02 ; 72/48 _____H_____ - .byte $02 ; 73/49 _____I_____ - .byte $02 ; 74/4a _____J_____ - .byte $02 ; 75/4b _____K_____ - .byte $02 ; 76/4c _____L_____ - .byte $02 ; 77/4d _____M_____ - .byte $02 ; 78/4e _____N_____ - .byte $02 ; 79/4f _____O_____ - .byte $02 ; 80/50 _____P_____ - .byte $02 ; 81/51 _____Q_____ - .byte $02 ; 82/52 _____R_____ - .byte $02 ; 83/53 _____S_____ - .byte $02 ; 84/54 _____T_____ - .byte $02 ; 85/55 _____U_____ - .byte $02 ; 86/56 _____V_____ - .byte $02 ; 87/57 _____W_____ - .byte $02 ; 88/58 _____X_____ - .byte $02 ; 89/59 _____Y_____ - .byte $02 ; 90/5a _____Z_____ - .byte $00 ; 91/5b _____[_____ - .byte $00 ; 92/5c _____\_____ - .byte $00 ; 93/5d _____]_____ - .byte $00 ; 94/5e _____^_____ - .byte $00 ; 95/5f _UNDERLINE_ - .byte $00 ; 96/60 ___grave___ - .byte $09 ; 97/61 _____a_____ - .byte $09 ; 98/62 _____b_____ - .byte $09 ; 99/63 _____c_____ - .byte $09 ; 100/64 _____d_____ - .byte $09 ; 101/65 _____e_____ - .byte $09 ; 102/66 _____f_____ - .byte $01 ; 103/67 _____g_____ - .byte $01 ; 104/68 _____h_____ - .byte $01 ; 105/69 _____i_____ - .byte $01 ; 106/6a _____j_____ - .byte $01 ; 107/6b _____k_____ - .byte $01 ; 108/6c _____l_____ - .byte $01 ; 109/6d _____m_____ - .byte $01 ; 110/6e _____n_____ - .byte $01 ; 111/6f _____o_____ - .byte $01 ; 112/70 _____p_____ - .byte $01 ; 113/71 _____q_____ - .byte $01 ; 114/72 _____r_____ - .byte $01 ; 115/73 _____s_____ - .byte $01 ; 116/74 _____t_____ - .byte $01 ; 117/75 _____u_____ - .byte $01 ; 118/76 _____v_____ - .byte $01 ; 119/77 _____w_____ - .byte $01 ; 120/78 _____x_____ - .byte $01 ; 121/79 _____y_____ - .byte $01 ; 122/7a _____z_____ - .byte $00 ; 123/7b _____{_____ - .byte $00 ; 124/7c _____|_____ - .byte $00 ; 125/7d _____}_____ - .byte $00 ; 126/7e _____~_____ - .byte $40 ; 127/7f ____DEL____ + ct_mix CT_NONE_IDX, CT_LOWER_XDIGIT_IDX ; 96/60 ___grave___, 97/61 _____a_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 98/62 _____b_____, 99/63 _____c_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 100/64 _____d_____, 101/65 _____e_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_IDX ; 102/66 _____f_____, 103/67 _____g_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 104/68 _____h_____, 105/69 _____i_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 106/6a _____j_____, 107/6b _____k_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 108/6c _____l_____, 109/6d _____m_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 110/6e _____n_____, 111/6f _____o_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 112/70 _____p_____, 113/71 _____q_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 114/72 _____r_____, 115/73 _____s_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 116/74 _____t_____, 117/75 _____u_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 118/76 _____v_____, 119/77 _____w_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 120/78 _____x_____, 121/79 _____y_____ + ct_mix CT_LOWER_IDX, CT_NONE_IDX ; 122/7a _____z_____, 123/7b _____{_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 124/7c _____|_____, 125/7d _____}_____ + ct_mix CT_NONE_IDX, CT_WS_IDX ; 126/7e _____~_____, 127/7f ____DEL____ - .byte $00 ; 128/80 ___________ - .byte $00 ; 129/81 ___________ - .byte $00 ; 130/82 ___________ - .byte $00 ; 131/83 ___________ - .byte $00 ; 132/84 ___________ - .byte $00 ; 133/85 ___________ - .byte $00 ; 134/86 ___________ - .byte $00 ; 135/87 ___________ - .byte $00 ; 136/88 ___________ - .byte $00 ; 137/89 ___________ - .byte $00 ; 138/8a ___________ - .byte $00 ; 139/8b ___________ - .byte $00 ; 140/8c ___________ - .byte $00 ; 141/8d ___________ - .byte $00 ; 142/8e ___________ - .byte $00 ; 143/8f ___________ - .byte $00 ; 144/90 ___________ - .byte $00 ; 145/91 ___________ - .byte $00 ; 146/92 ___________ - .byte $10 ; 147/93 ___________ - .byte $00 ; 148/94 ___________ - .byte $00 ; 149/95 ___________ - .byte $00 ; 150/96 ___________ - .byte $00 ; 151/97 ___________ - .byte $00 ; 152/98 ___________ - .byte $00 ; 153/99 ___________ - .byte $00 ; 154/9a ___________ - .byte $00 ; 155/9b ___________ - .byte $00 ; 156/9c ___________ - .byte $00 ; 157/9d ___________ - .byte $00 ; 158/9e ___________ - .byte $00 ; 159/9f ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 128/80 ___________, 129/81 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 130/82 ___________, 131/83 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 132/84 ___________, 133/85 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 134/86 ___________, 135/87 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 136/88 ___________, 137/89 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 138/8a ___________, 139/8b ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 140/8c ___________, 141/8d ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 142/8e ___________, 143/8f ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 144/90 ___________, 145/91 ___________ + ct_mix CT_NONE_IDX, CT_CTRL_IDX ; 146/92 ___________, 147/93 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 148/94 ___________, 149/95 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 150/96 ___________, 151/97 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 152/98 ___________, 153/99 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 154/9a ___________, 155/9b ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 156/9c ___________, 157/9d ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 158/9e ___________, 159/9f ___________ - .byte $00 ; 160/a0 ___________ - .byte $00 ; 161/a1 ___________ - .byte $00 ; 162/a2 ___________ - .byte $00 ; 163/a3 ___________ - .byte $00 ; 164/a4 ___________ - .byte $00 ; 165/a5 ___________ - .byte $00 ; 166/a6 ___________ - .byte $00 ; 167/a7 ___________ - .byte $00 ; 168/a8 ___________ - .byte $00 ; 169/a9 ___________ - .byte $00 ; 170/aa ___________ - .byte $00 ; 171/ab ___________ - .byte $00 ; 172/ac ___________ - .byte $00 ; 173/ad ___________ - .byte $00 ; 174/ae ___________ - .byte $00 ; 175/af ___________ - .byte $00 ; 176/b0 ___________ - .byte $00 ; 177/b1 ___________ - .byte $00 ; 178/b2 ___________ - .byte $00 ; 179/b3 ___________ - .byte $00 ; 180/b4 ___________ - .byte $00 ; 181/b5 ___________ - .byte $00 ; 182/b6 ___________ - .byte $00 ; 183/b7 ___________ - .byte $00 ; 184/b8 ___________ - .byte $00 ; 185/b9 ___________ - .byte $00 ; 186/ba ___________ - .byte $00 ; 187/bb ___________ - .byte $00 ; 188/bc ___________ - .byte $00 ; 189/bd ___________ - .byte $00 ; 190/be ___________ - .byte $00 ; 191/bf ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 160/a0 ___________, 161/a1 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 162/a2 ___________, 163/a3 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 164/a4 ___________, 165/a5 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 166/a6 ___________, 167/a7 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 168/a8 ___________, 169/a9 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 170/aa ___________, 171/ab ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 172/ac ___________, 173/ad ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 174/ae ___________, 175/af ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 176/b0 ___________, 177/b1 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 178/b2 ___________, 179/b3 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 180/b4 ___________, 181/b5 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 182/b6 ___________, 183/b7 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 184/b8 ___________, 185/b9 ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 186/ba ___________, 187/bb ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 188/bc ___________, 189/bd ___________ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 190/be ___________, 191/bf ___________ - .byte $02 ; 192/c0 ___________ - .byte $02 ; 193/c1 ___________ - .byte $02 ; 194/c2 ___________ - .byte $02 ; 195/c3 ___________ - .byte $02 ; 196/c4 ___________ - .byte $02 ; 197/c5 ___________ - .byte $02 ; 198/c6 ___________ - .byte $02 ; 199/c7 ___________ - .byte $02 ; 200/c8 ___________ - .byte $02 ; 201/c9 ___________ - .byte $02 ; 202/ca ___________ - .byte $02 ; 203/cb ___________ - .byte $02 ; 204/cc ___________ - .byte $02 ; 205/cd ___________ - .byte $02 ; 206/ce ___________ - .byte $02 ; 207/cf ___________ - .byte $02 ; 208/d0 ___________ - .byte $02 ; 209/d1 ___________ - .byte $02 ; 210/d2 ___________ - .byte $02 ; 211/d3 ___________ - .byte $02 ; 212/d4 ___________ - .byte $02 ; 213/d5 ___________ - .byte $02 ; 214/d6 ___________ - .byte $02 ; 215/d7 ___________ - .byte $02 ; 216/d8 ___________ - .byte $02 ; 217/d9 ___________ - .byte $02 ; 218/da ___________ - .byte $02 ; 219/db ___________ - .byte $02 ; 220/dc ___________ - .byte $02 ; 221/dd ___________ - .byte $02 ; 222/de ___________ - .byte $00 ; 223/df ___________ - .byte $01 ; 224/e0 ___________ - .byte $01 ; 225/e1 ___________ - .byte $01 ; 226/e2 ___________ - .byte $01 ; 227/e3 ___________ - .byte $01 ; 228/e4 ___________ - .byte $01 ; 229/e5 ___________ - .byte $01 ; 230/e6 ___________ - .byte $01 ; 231/e7 ___________ - .byte $01 ; 232/e8 ___________ - .byte $01 ; 233/e9 ___________ - .byte $01 ; 234/ea ___________ - .byte $01 ; 235/eb ___________ - .byte $01 ; 236/ec ___________ - .byte $01 ; 237/ed ___________ - .byte $01 ; 238/ee ___________ - .byte $01 ; 239/ef ___________ - .byte $01 ; 240/f0 ___________ - .byte $01 ; 241/f1 ___________ - .byte $01 ; 242/f2 ___________ - .byte $01 ; 243/f3 ___________ - .byte $01 ; 244/f4 ___________ - .byte $01 ; 245/f5 ___________ - .byte $01 ; 246/f6 ___________ - .byte $01 ; 247/f7 ___________ - .byte $01 ; 248/f8 ___________ - .byte $01 ; 249/f9 ___________ - .byte $01 ; 250/fa ___________ - .byte $01 ; 251/fb ___________ - .byte $01 ; 252/fc ___________ - .byte $01 ; 253/fd ___________ - .byte $01 ; 254/fe ___________ - .byte $00 ; 255/ff ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 192/c0 ___________, 193/c1 ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 194/c2 ___________, 195/c3 ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 196/c4 ___________, 197/c5 ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 198/c6 ___________, 199/c7 ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 200/c8 ___________, 201/c9 ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 202/ca ___________, 203/cb ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 204/cc ___________, 205/cd ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 206/ce ___________, 207/cf ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 208/d0 ___________, 209/d1 ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 210/d2 ___________, 211/d3 ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 212/d4 ___________, 213/d5 ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 214/d6 ___________, 215/d7 ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 216/d8 ___________, 217/d9 ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 218/da ___________, 219/db ___________ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 220/dc ___________, 221/dd ___________ + ct_mix CT_UPPER_IDX, CT_NONE_IDX ; 222/de ___________, 223/df ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 224/e0 ___________, 225/e1 ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 226/e2 ___________, 227/e3 ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 228/e4 ___________, 229/e5 ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 230/e6 ___________, 231/e7 ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 232/e8 ___________, 233/e9 ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 234/ea ___________, 235/eb ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 236/ec ___________, 237/ed ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 238/ee ___________, 239/ef ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 240/f0 ___________, 241/f1 ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 242/f2 ___________, 243/f3 ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 244/f4 ___________, 245/f5 ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 246/f6 ___________, 247/f7 ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 248/f8 ___________, 249/f9 ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 250/fa ___________, 251/fb ___________ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 252/fc ___________, 253/fd ___________ + ct_mix CT_LOWER_IDX, CT_NONE_IDX ; 254/fe ___________, 255/ff ___________ diff --git a/libsrc/atmos/gotoxy.s b/libsrc/atmos/gotoxy.s index 80d4d5251..6652c9419 100644 --- a/libsrc/atmos/gotoxy.s +++ b/libsrc/atmos/gotoxy.s @@ -1,14 +1,18 @@ ; -; Ullrich von Bassewitz, 2003-04-13 +; 2003-04-13, Ullrich von Bassewitz +; 2017-06-15, Greg King ; ; void gotoxy (unsigned char x, unsigned char y); ; - .export _gotoxy + .export gotoxy, _gotoxy + .import popa .include "atmos.inc" +gotoxy: jsr popa ; Get Y + .proc _gotoxy sta CURS_Y ; Set Y @@ -17,5 +21,3 @@ rts .endproc - - diff --git a/libsrc/atmos/irq.s b/libsrc/atmos/irq.s index ed443caae..751c860f2 100644 --- a/libsrc/atmos/irq.s +++ b/libsrc/atmos/irq.s @@ -9,7 +9,7 @@ ; ------------------------------------------------------------------------ -.segment "INIT" +.segment "ONCE" initirq: lda IRQVec diff --git a/libsrc/atmos/joy/atmos-ijk.s b/libsrc/atmos/joy/atmos-ijk.s new file mode 100644 index 000000000..6e75a3e0b --- /dev/null +++ b/libsrc/atmos/joy/atmos-ijk.s @@ -0,0 +1,134 @@ +; +; IJK joystick driver for the Atmos +; Can be used multiple times when statically linked to the application. +; +; 2002-12-20, Based on Ullrich von Bassewitz's code. +; 2017-11-01, Stefan Haubenthal +; + + .include "joy-kernel.inc" + .include "joy-error.inc" + .include "atmos.inc" + + .macpack module + + +; ------------------------------------------------------------------------ +; Header. Includes jump table + + module_header _atmos_ijk_joy + +; Driver signature + + .byte $6A, $6F, $79 ; "joy" + .byte JOY_API_VERSION ; Driver API version number + +; Library reference + + .addr $0000 + +; Jump table. + + .addr INSTALL + .addr UNINSTALL + .addr COUNT + .addr READ + +; ------------------------------------------------------------------------ +; Constants + +JOY_COUNT = 2 ; Number of joysticks we support + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. If +; possible, check if the hardware is present and determine the amount of +; memory available. +; Must return an JOY_ERR_xx code in a/x. +; + +INSTALL: + lda #%11000000 + sta VIA::DDRA + sta VIA::PRA + lda VIA::PRA + and #%00100000 + bne ijkPresent + lda #<JOY_ERR_NO_DEVICE + .byte $2C ; Skip next opcode +ijkPresent: + lda #<JOY_ERR_OK + ldx #>JOY_ERR_OK +; rts ; Run into UNINSTALL instead + +; ------------------------------------------------------------------------ +; UNINSTALL routine. Is called before the driver is removed from memory. +; Can do cleanup or whatever. Must not return anything. +; + +UNINSTALL: + rts + + +; ------------------------------------------------------------------------ +; COUNT: Return the total number of available joysticks in a/x. +; + +COUNT: + lda #<JOY_COUNT + ldx #>JOY_COUNT + rts + +; ------------------------------------------------------------------------ +; READ: Read a particular joystick passed in A. +; + +READ: + bne right + + ; Ensure Printer Strobe is set to Output + lda #%10110111 + sta VIA::DDRB + ; Set Strobe Low + lda #%00000000 + sta VIA::PRB + ; Set Top two bits of PortA to Output and rest as Input + lda #%11000000 + sta VIA::DDRA + + ; Select Left Joystick + lda #%01111111 + sta VIA::PRA + ; Read back Left Joystick state + lda VIA::PRA + ; Mask out unused bits + and #%00011111 + ; Invert Bits + eor #%00011111 + ; Index table to conform to Generic Format + tax + lda GenericIJKBits,X + bne L1 + +right: + ; Select Right Joystick + lda #%10111111 + sta VIA::PRA + ; Read back Right Joystick state and rejig bits + lda VIA::PRA + and #%00011111 + eor #%00011111 + tax + lda GenericIJKBits,X + + ; Restore VIA PortA state +L1: ldx #%11111111 + stx VIA::DDRA + inx ; x=0 + rts + +.rodata +GenericIJKBits: + .byte 0,2,1,3,32,34,33,0,8,10,9,0,40,42,41,0 + .byte 16,18,17,0,48,50,49,0,0,0,0,0,0,0,0,0 diff --git a/libsrc/atmos/joy/atmos-pase.s b/libsrc/atmos/joy/atmos-pase.s index 26d7c74d8..fd64901c9 100644 --- a/libsrc/atmos/joy/atmos-pase.s +++ b/libsrc/atmos/joy/atmos-pase.s @@ -28,24 +28,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $10 ; JOY_UP - .byte $08 ; JOY_DOWN - .byte $01 ; JOY_LEFT - .byte $02 ; JOY_RIGHT - .byte $20 ; JOY_FIRE - .byte $00 ; Future expansion - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants diff --git a/libsrc/atmos/mainargs.s b/libsrc/atmos/mainargs.s index d6d9ed1ef..b8d19dccc 100644 --- a/libsrc/atmos/mainargs.s +++ b/libsrc/atmos/mainargs.s @@ -13,34 +13,34 @@ .macpack generic MAXARGS = 10 ; Maximum number of arguments allowed -REM = $9d ; BASIC token-code +REM = $9D ; BASIC token-code ;--------------------------------------------------------------------------- -; Get possible command-line arguments. Goes into the special INIT segment, -; which may be reused after the startup code is run +; Get possible command-line arguments. Goes into the special ONCE segment, +; which will be reused after the startup code is run. -.segment "INIT" +.segment "ONCE" .proc initmainargs ; Assume that the program was loaded, a moment ago, by the traditional LOAD ; statement. Save the "most-recent filename" as argument #0. -; Because the buffer, that we're copying into, was zeroed out, -; we don't need to add a NUL character. -; - ldy #FNAME_LEN - 1 ; limit the length + + ldy #FNAME_LEN ; Limit the length + lda #0 ; The terminating NUL character + beq L1 ; Branch always L0: lda CFOUND_NAME,y - sta name,y +L1: sta name,y dey bpl L0 inc __argc ; argc always is equal to, at least, 1 ; Find the "rem" token. -; + ldx #0 L2: lda BASIC_BUF,x - beq done ; no "rem", no args. + beq done ; No "rem", no args. inx cmp #REM bne L2 @@ -62,7 +62,7 @@ next: lda BASIC_BUF,x beq done ; End of line reached inx cmp #' ' ; Skip leading spaces - beq next ; + beq next ; Found start of next argument. We've incremented the pointer in X already, so ; it points to the second character of the argument. This is useful since we @@ -79,7 +79,7 @@ setterm:sta term ; Set end of argument marker txa ; Get low byte add #<args - sta argv,y ; argv[y]= &arg + sta argv,y ; argv[y]=&arg lda #>$0000 adc #>args sta argv+1,y @@ -99,7 +99,7 @@ argloop:lda BASIC_BUF,x ; A contains the terminating character. To make the argument a valid C string, ; replace the terminating character by a zero. - lda #$00 + lda #0 sta args-1,x ; Check if the maximum number of command line arguments is reached. If not, @@ -119,15 +119,16 @@ done: lda #<argv .endproc -; These arrays are zeroed before initmainargs is called. -; char name[16+1]; -; char* argv[MAXARGS+1]={name}; -; -.bss +.segment "INIT" + term: .res 1 name: .res FNAME_LEN + 1 args: .res SCREEN_XSIZE * 2 - 1 .data + +; This array has zeroes when initmainargs starts. +; char* argv[MAXARGS+1]={name}; + argv: .addr name - .res MAXARGS * 2, $00 + .res MAXARGS * 2 diff --git a/libsrc/atmos/read.s b/libsrc/atmos/read.s index 324ac789e..3f22d8d0e 100644 --- a/libsrc/atmos/read.s +++ b/libsrc/atmos/read.s @@ -9,7 +9,7 @@ .export _read .constructor initstdin - .import popax + .import popax, popptr1 .importzp ptr1, ptr2, ptr3 .forceimport disable_caps @@ -20,20 +20,19 @@ sta ptr3 stx ptr3+1 ; save count as result - eor #$FF - sta ptr2 - txa - eor #$FF - sta ptr2+1 ; Remember -count-1 - jsr popax ; get buf - sta ptr1 - stx ptr1+1 + inx + stx ptr2+1 + tax + inx + stx ptr2 ; save count with each byte incremented separately + + jsr popptr1 ; get buf jsr popax ; get fd and discard -L1: inc ptr2 +L1: dec ptr2 bnz L2 - inc ptr2+1 + dec ptr2+1 bze L9 ; no more room in buf ; If there are no more characters in BASIC's input buffer, then get a line from @@ -69,7 +68,7 @@ L9: lda ptr3 ;-------------------------------------------------------------------------- ; initstdin: Reset the stdin console. -.segment "INIT" +.segment "ONCE" initstdin: ldx #<-1 @@ -79,8 +78,7 @@ initstdin: ;-------------------------------------------------------------------------- -.bss +.segment "INIT" text_count: .res 1 - diff --git a/libsrc/atmos/ser/atmos-acia.s b/libsrc/atmos/ser/atmos-acia.s index 79fbc1bbe..f84b66a0a 100644 --- a/libsrc/atmos/ser/atmos-acia.s +++ b/libsrc/atmos/ser/atmos-acia.s @@ -44,15 +44,15 @@ .addr $0000 ; Jump table - .addr INSTALL - .addr UNINSTALL - .addr OPEN - .addr CLOSE - .addr GET - .addr PUT + .addr SER_INSTALL + .addr SER_UNINSTALL + .addr SER_OPEN + .addr SER_CLOSE + .addr SER_GET + .addr SER_PUT .addr SER_STATUS - .addr IOCTL - .addr IRQ + .addr SER_IOCTL + .addr SER_IRQ ;---------------------------------------------------------------------------- ; Global variables @@ -116,23 +116,23 @@ ParityTable: .code ;---------------------------------------------------------------------------- -; INSTALL: Is called after the driver is loaded into memory. If possible, +; SER_INSTALL: Is called after the driver is loaded into memory. If possible, ; check if the hardware is present. Must return an SER_ERR_xx code in a/x. ; ; Since we don't have to manage the IRQ vector on the Telestrat/Atmos, this is ; actually the same as: ; -; UNINSTALL: Is called before the driver is removed from memory. +; SER_UNINSTALL: Is called before the driver is removed from memory. ; No return code required (the driver is removed from memory on return). ; ; and: ; -; CLOSE: Close the port and disable interrupts. Called without parameters. +; SER_CLOSE: Close the port and disable interrupts. Called without parameters. ; Must return an SER_ERR_xx code in a/x. -INSTALL: -UNINSTALL: -CLOSE: +SER_INSTALL: +SER_UNINSTALL: +SER_CLOSE: ldx Index ; Check for open port beq :+ @@ -147,10 +147,10 @@ CLOSE: rts ;---------------------------------------------------------------------------- -; OPEN: A pointer to a ser_params structure is passed in ptr1. +; SER_OPEN: A pointer to a ser_params structure is passed in ptr1. ; Must return an SER_ERR_xx code in a/x. -OPEN: +SER_OPEN: ; Check if the handshake setting is valid ldy #SER_PARAMS::HANDSHAKE ; Handshake lda (ptr1),y @@ -220,11 +220,11 @@ InvBaud:lda #<SER_ERR_BAUD_UNAVAIL rts ;---------------------------------------------------------------------------- -; GET: Will fetch a character from the receive buffer and store it into the +; SER_GET: Will fetch a character from the receive buffer and store it into the ; variable pointed to by ptr1. If no data is available, SER_ERR_NO_DATA is ; returned. -GET: +SER_GET: ldy SendFreeCnt ; Send data if necessary iny ; Y == $FF? beq :+ @@ -261,10 +261,10 @@ GET: rts ;---------------------------------------------------------------------------- -; PUT: Output character in A. +; SER_PUT: Output character in A. ; Must return an SER_ERR_xx code in a/x. -PUT: +SER_PUT: ; Try to send ldy SendFreeCnt iny ; Y = $FF? @@ -303,22 +303,22 @@ SER_STATUS: rts ;---------------------------------------------------------------------------- -; IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl +; SER_IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl ; specific data in ptr1, and the ioctl code in A. ; Must return an SER_ERR_xx code in a/x. -IOCTL: +SER_IOCTL: lda #<SER_ERR_INV_IOCTL ldx #>SER_ERR_INV_IOCTL rts ;---------------------------------------------------------------------------- -; IRQ: Called from the builtin runtime IRQ handler as a subroutine. All +; SER_IRQ: Called from the builtin runtime IRQ handler as a subroutine. All ; registers are already saved, no parameters are passed, but the carry flag ; is clear on entry. The routine must return with carry set if the interrupt ; was handled, otherwise with carry clear. -IRQ: +SER_IRQ: ldx Index ; Check for open port beq Done lda ACIA::STATUS,x ; Check ACIA status for receive interrupt diff --git a/libsrc/atmos/systime.s b/libsrc/atmos/systime.s deleted file mode 100644 index 273e394a4..000000000 --- a/libsrc/atmos/systime.s +++ /dev/null @@ -1,28 +0,0 @@ -; -; Ullrich von Bassewitz, 12.11.2002 -; -; time_t _systime (void); -; /* Similar to time(), but: -; ** - Is not ISO C -; ** - Does not take the additional pointer -; ** - Does not set errno when returning -1 -; */ -; - - .export __systime - - .importzp sreg - -.code - -.proc __systime - - lda #$FF - tax - sta sreg - sta sreg+1 - rts ; Return -1 - -.endproc - - diff --git a/libsrc/atmos/tapehdr.s b/libsrc/atmos/tapehdr.s index d90c908eb..1848c48cb 100644 --- a/libsrc/atmos/tapehdr.s +++ b/libsrc/atmos/tapehdr.s @@ -1,6 +1,6 @@ ; ; Based on code by Debrune Jrme <jede@oric.org> -; 2015-01-08, Greg King +; 2016-03-17, Greg King ; ; The following symbol is used by the linker config. file @@ -8,7 +8,8 @@ .export __TAPEHDR__:abs = 1 ; These symbols, also, come from the configuration file. - .import __BASHDR_LOAD__, __ZPSAVE1_LOAD__, __AUTORUN__, __PROGFLAG__ + .import __AUTORUN__, __PROGFLAG__ + .import __BASHEAD_START__, __MAIN_LAST__ ; ------------------------------------------------------------------------ @@ -16,16 +17,16 @@ .segment "TAPEHDR" - .byte $16, $16, $16 ; Sync bytes - .byte $24 ; Beginning-of-header marker + .byte $16, $16, $16 ; Sync bytes + .byte $24 ; Beginning-of-header marker - .byte $00 ; $2B0 - .byte $00 ; $2AF - .byte <__PROGFLAG__ ; $2AE Language flag ($00=BASIC, $80=machine code) - .byte <__AUTORUN__ ; $2AD Auto-run flag ($C7=run, $00=only load) - .dbyt __ZPSAVE1_LOAD__ ;$2AB Address of end of file - .dbyt __BASHDR_LOAD__ ; $2A9 Address of start of file - .byte $00 ; $2A8 + .byte $00 ; $2B0 + .byte $00 ; $2AF + .byte <__PROGFLAG__ ; $2AE Language flag ($00=BASIC, $80=machine code) + .byte <__AUTORUN__ ; $2AD Auto-run flag ($C7=run, $00=only load) + .dbyt __MAIN_LAST__ - 1 ; $2AB Address of end of file + .dbyt __BASHEAD_START__ ; $2A9 Address of start of file + .byte $00 ; $2A8 ; File name (a maximum of 17 characters), zero-terminated .asciiz .sprintf("%u", .time) diff --git a/libsrc/atmos/tgi/atmos-228-200-3.s b/libsrc/atmos/tgi/atmos-228-200-3.s index ae9b0f775..98d2cef96 100644 --- a/libsrc/atmos/tgi/atmos-228-200-3.s +++ b/libsrc/atmos/tgi/atmos-228-200-3.s @@ -59,7 +59,6 @@ YSIZE = 8 ; System font height .addr BAR .addr TEXTSTYLE .addr OUTTEXT - .addr 0 ; IRQ entry is unused ; ------------------------------------------------------------------------ ; Data. diff --git a/libsrc/atmos/tgi/atmos-240-200-2.s b/libsrc/atmos/tgi/atmos-240-200-2.s index 943ec5389..2643e08fd 100644 --- a/libsrc/atmos/tgi/atmos-240-200-2.s +++ b/libsrc/atmos/tgi/atmos-240-200-2.s @@ -59,7 +59,6 @@ YSIZE = 8 ; System font height .addr BAR .addr TEXTSTYLE .addr OUTTEXT - .addr 0 ; IRQ entry is unused ; ------------------------------------------------------------------------ ; Data. diff --git a/libsrc/atmos/tgi_colors.s b/libsrc/atmos/tgi_colors.s deleted file mode 100644 index 6ef3729b4..000000000 --- a/libsrc/atmos/tgi_colors.s +++ /dev/null @@ -1,8 +0,0 @@ -; -; Target-specific black & white values for use by the target-shared TGI kernel -; - - .include "tgi-kernel.inc" - - .export tgi_color_black:zp = $00 - .export tgi_color_white:zp = $01 diff --git a/libsrc/atmos/toascii.s b/libsrc/atmos/toascii.s deleted file mode 100644 index 77f050021..000000000 --- a/libsrc/atmos/toascii.s +++ /dev/null @@ -1,14 +0,0 @@ -; -; char __fastcall__ toascii (char c); -; /* Convert a target-specific character to ASCII. */ -; - -.export _toascii - -.proc _toascii - -; .X must be zero, on return. - ldx #>$0000 - rts - -.endproc diff --git a/libsrc/atmos/write.s b/libsrc/atmos/write.s index c6399f2bf..4a68994ec 100644 --- a/libsrc/atmos/write.s +++ b/libsrc/atmos/write.s @@ -7,7 +7,7 @@ ; .export _write - .import popax + .import popax, popptr1 .importzp ptr1, ptr2, ptr3, tmp1 .include "atmos.inc" @@ -17,19 +17,17 @@ sta ptr3 stx ptr3+1 ; save count as result - eor #$FF - sta ptr2 - txa - eor #$FF - sta ptr2+1 ; Remember -count-1 + inx + stx ptr2+1 + tax + inx + stx ptr2 ; save count with each byte incremented separately - jsr popax ; get buf - sta ptr1 - stx ptr1+1 + jsr popptr1 ; get buf jsr popax ; get fd and discard -L1: inc ptr2 +L1: dec ptr2 bne L2 - inc ptr2+1 + dec ptr2+1 beq L9 L2: ldy #0 lda (ptr1),y diff --git a/libsrc/c128/acc_c128_speed.s b/libsrc/c128/acc_c128_speed.s new file mode 100644 index 000000000..7994a52ae --- /dev/null +++ b/libsrc/c128/acc_c128_speed.s @@ -0,0 +1,51 @@ +; +; 2018-04-23, Marco van den Heuvel +; 2018-04-26, Greg King +; + +; unsigned char __fastcall__ set_c128_speed (unsigned char speed); +; +;/* Set the speed of the C128 8502 CPU; using SPEED_SLOW will switch to +; * 1 Mhz (slow) mode, SPEED_2X or SPEED_FAST will switch to 2Mhz (fast) mode. +; * +; * Note that any value higher or equal to SPEED_2X will switch to fast mode. +; * +; * This function will return the actual speed the CPU is at, after trying +; * to set the requested speed; to my knowledge, the switching should not fail. +; * +; * For C64 programs, a check for a C128 in C64 mode is needed; make sure you +; * use 'detect_c128();' before using. +; * +; * For C128 programs, no detect function call is needed. +; */ + +; unsigned char get_c128_speed (void); +; +;/* Get the speed of the C128 8502 CPU. +; * +; * Possible return values: +; * SPEED_SLOW : Slow mode +; * SPEED_2X : Fast mode +; * +; * For C64 programs, a check for a C128 in C64 mode is needed; make sure you +; * use 'detect_c128();' before using. +; * +; * For C128 programs, no detect function call is needed. +; */ + + .export _set_c128_speed + .export _get_c128_speed + + .include "accelerator.inc" + +_set_c128_speed: + cmp #SPEED_2X + lda #$00 ; clear VIC-IIe test bit + rol a ; carry flag is speed bit + sta C128_VICIIE_CLK + +_get_c128_speed: + lda C128_VICIIE_CLK + and #$01 + ldx #>$0000 + rts diff --git a/libsrc/c128/acc_detect_c128.s b/libsrc/c128/acc_detect_c128.s new file mode 100644 index 000000000..f40fe395a --- /dev/null +++ b/libsrc/c128/acc_detect_c128.s @@ -0,0 +1,24 @@ +; +; Marco van den Heuvel, 2018-04-23 +; + +; unsigned char detect_c128 (void); +; +;/* Check if the C128 8502 CPU is the current CPU. +; * +; * Possible return values: +; * 0x00 : C128 8502 is not the current CPU +; * 0x01 : C128 8502 is the current CPU +; */ + + .export _detect_c128 + + .include "accelerator.inc" + +_detect_c128: + ldx #$00 + lda #$01 + +; Make sure the CPU is a 8502 + .byte $3A ; NOP on 8502, DEA on 65(S)C(E)02, 4510 and 65816 + rts diff --git a/libsrc/c128/acc_detect_scpu.s b/libsrc/c128/acc_detect_scpu.s new file mode 100644 index 000000000..e42d90548 --- /dev/null +++ b/libsrc/c128/acc_detect_scpu.s @@ -0,0 +1,34 @@ +; +; Marco van den Heuvel, 2018-04-08 +; + +; unsigned char detect_scpu (void); +; +;/* Check for the presence of the SuperCPU cartridge. +; * +; * Possible return values: +; * 0x00 : SuperCPU cartridge not present +; * 0x01 : SuperCPU cartridge present +; */ + + .export _detect_scpu + + .include "accelerator.inc" +_detect_scpu: + ldx #$00 + txa + +; Make sure the current CPU is a 65816 + clc + .byte $E2,$01 ; NOP #$01 on 6510 and 65(S)C02, LDA $(01,S),Y on 65CE02 and 4510, SEP #$01 on 65816 + bcc not_found ; carry will be set on 65816 + +; 65816 has been detected, make sure it's the SuperCPU cartridge + + lda SuperCPU_Detect + asl + bcs not_found +found: + lda #$01 +not_found: + rts diff --git a/libsrc/c128/acc_scpu_speed.s b/libsrc/c128/acc_scpu_speed.s new file mode 100644 index 000000000..9f932aecd --- /dev/null +++ b/libsrc/c128/acc_scpu_speed.s @@ -0,0 +1,59 @@ +; +; Marco van den Heuvel, 2018-04-09 +; + +; unsigned char __fastcall__ set_scpu_speed (unsigned char speed); +; +;/* Set the speed of the SuperCPU cartridge, using SPEED_SLOW will switch to +; * 1 Mhz mode, SPEED_20X or SPEED_FAST will switch to 20 Mhz mode. +; * +; * Note that any value lower than SPEED_20X will switch to 1 Mhz mode, and +; * any value higher or equal to SPEED_20X will switch to 20 Mhz mode. +; * +; * This function will return the actual speed the CPU is at after trying +; * to set the requested speed, if this is not the speed that was requested +; * then possibly the hardware speed switch prevented any software speed +; * switching. +; * +; * This function does not check for the presence of the SuperCPU cartridge, +; * make sure you use 'detect_scpu();' before using. +; */ + +; unsigned char get_scpu_speed (void); +; +;/* Get the speed of the SuperCPU cartridge. +; * +; * Possible return values: +; * SPEED_1X : 1 Mhz mode +; * SPEED_20X : 20 Mhz mode +; * +; * This function does not check for the presence of the SuperCPU cartridge, +; * make sure you use 'detect_scpu();' before using. +; */ + + .export _set_scpu_speed + .export _get_scpu_speed + + .include "accelerator.inc" + +_set_scpu_speed: + cmp #SPEED_20X + bcs high_speed +low_speed: + sta SuperCPU_Slow + jmp _get_scpu_speed + +high_speed: + sta SuperCPU_Fast + +_get_scpu_speed: + ldx #$00 + lda SuperCPU_Speed_Mode + asl + asl + bcc is_fast_speed + lda #SPEED_1X + rts +is_fast_speed: + lda #SPEED_20X + rts diff --git a/libsrc/c128/break.s b/libsrc/c128/break.s index f2f872be8..092ca3469 100644 --- a/libsrc/c128/break.s +++ b/libsrc/c128/break.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 27.09.1998 ; -; void set_brk (unsigned Addr); +; void __fastcall__ set_brk (unsigned Addr); ; void reset_brk (void); ; diff --git a/libsrc/c128/cgetc.s b/libsrc/c128/cgetc.s index 46f13d197..7cf7fcc3e 100644 --- a/libsrc/c128/cgetc.s +++ b/libsrc/c128/cgetc.s @@ -10,6 +10,7 @@ .import cursor + .include "cbm_kernal.inc" .include "c128.inc" ;-------------------------------------------------------------------------- @@ -17,8 +18,8 @@ _cgetc: lda KEY_COUNT ; Get number of characters bne L2 ; Jump if there are already chars waiting -; Switch on the cursor if needed. We MUST always switch the cursor on, -; before switching it off, because switching it off will restore the +; Switch on the cursor if needed. We MUST always switch the cursor on, +; before switching it off, because switching it off will restore the ; character attribute remembered when it was switched on. So just switching ; it off will restore the wrong character attribute. @@ -39,18 +40,18 @@ L2: jsr KBDREAD ; Read char and return in A ;-------------------------------------------------------------------------- ; Module constructor/destructor -.bss +.segment "INIT" keyvec: .res 2 -.segment "INIT" +.segment "ONCE" initcgetc: ; Save the old vector lda KeyStoreVec + ldx KeyStoreVec+1 sta keyvec - lda KeyStoreVec+1 - sta keyvec+1 + stx keyvec+1 ; Set the new vector. I can only hope that this works for other C128 ; versions... @@ -68,5 +69,3 @@ SetVec: sei stx KeyStoreVec+1 cli rts - - diff --git a/libsrc/c128/clrscr.s b/libsrc/c128/clrscr.s index 2213be0cd..a3c519cb1 100644 --- a/libsrc/c128/clrscr.s +++ b/libsrc/c128/clrscr.s @@ -6,9 +6,6 @@ .export _clrscr - .include "c128.inc" + .include "cbm_kernal.inc" _clrscr = CLRSCR - - - diff --git a/libsrc/c128/cpeekc.s b/libsrc/c128/cpeekc.s new file mode 100644 index 000000000..9d64388a4 --- /dev/null +++ b/libsrc/c128/cpeekc.s @@ -0,0 +1,70 @@ +; +; 2016-02-28, Groepaz +; 2017-06-26, Greg King +; +; char cpeekc (void); +; + + .export _cpeekc + + .import plot, popa + + .include "zeropage.inc" + .include "c128.inc" + + +_cpeekc: + lda MODE + bmi @c80 + + ldy CURS_X + lda (SCREEN_PTR),y ; get char + +@return: + and #<~$80 ; remove reverse flag + +; Convert the screen code into a PetSCII code. +; $00 - $1F: +$40 +; $20 - $3F +; $40 - $5f: +$20 +; $60 - $7F: +$40 + + cmp #$20 + bcs @sk1 ;(bge) + ora #$40 + rts + +@sk1: cmp #$40 + bcc @end ;(blt) + cmp #$60 + bcc @sk2 ;(blt) + ;sec + adc #$20 - $01 +@sk2: ;clc ; both above cmp and adc clear carry flag + adc #$20 +@end: rts + +@c80: + lda SCREEN_PTR + ldy SCREEN_PTR+1 + clc + adc CURS_X + bcc @s + iny + + ; get byte from VDC mem +@s: ldx #VDC_DATA_LO + stx VDC_INDEX +@L0: bit VDC_INDEX + bpl @L0 + sta VDC_DATA + dex + stx VDC_INDEX + sty VDC_DATA + + ldx #VDC_RAM_RW + stx VDC_INDEX +@L1: bit VDC_INDEX + bpl @L1 ; wait for blanking + lda VDC_DATA + jmp @return diff --git a/libsrc/c128/cpeekcolor.s b/libsrc/c128/cpeekcolor.s new file mode 100644 index 000000000..9a8c3bfdc --- /dev/null +++ b/libsrc/c128/cpeekcolor.s @@ -0,0 +1,56 @@ +; +; 2016-02-28, Groepaz +; 2017-06-26, Greg King +; +; unsigned char cpeekcolor (void); +; + + .export _cpeekcolor + + .include "c128.inc" + + +_cpeekcolor: + bit MODE + bmi @c80 + + ldy CURS_X + lda (CRAM_PTR),y ; get color + and #$0F + ldx #>$0000 + rts + +@c80: lda CRAM_PTR + ldy CRAM_PTR+1 + clc + adc CURS_X + bcc @s + iny + + ; get byte from VDC mem +@s: ldx #VDC_DATA_LO + stx VDC_INDEX +@L0: bit VDC_INDEX + bpl @L0 + sta VDC_DATA + dex + stx VDC_INDEX + sty VDC_DATA + + ldx #VDC_RAM_RW + stx VDC_INDEX +@L1: bit VDC_INDEX + bpl @L1 ; wait for blanking + lda VDC_DATA + and #$0F + +; translate VDC->VIC colour + +vdctovic: + ldy #$0F + 1 +@L2: dey + cmp $CE5C,y + bne @L2 + tya + ldx #>$0000 + rts diff --git a/libsrc/c128/cpeekrevers.s b/libsrc/c128/cpeekrevers.s new file mode 100644 index 000000000..c36e4ac44 --- /dev/null +++ b/libsrc/c128/cpeekrevers.s @@ -0,0 +1,51 @@ +; +; 2016-02-28, Groepaz +; 2017-06-26, Greg King +; +; unsigned char cpeekrevers (void); +; + + .export _cpeekrevers + + .include "zeropage.inc" + .include "c128.inc" + + +_cpeekrevers: + lda MODE + bmi @c80 + + ldy CURS_X + lda (SCREEN_PTR),y ; get char + +@return: + and #$80 ; get reverse flag + asl a + tax ; ldx #>$0000 + rol a ; return boolean value + rts + +@c80: + lda SCREEN_PTR + ldy SCREEN_PTR+1 + clc + adc CURS_X + bcc @s + iny + + ; get byte from VDC mem +@s: ldx #VDC_DATA_LO + stx VDC_INDEX +@L0: bit VDC_INDEX + bpl @L0 + sta VDC_DATA + dex + stx VDC_INDEX + sty VDC_DATA + + ldx #VDC_RAM_RW + stx VDC_INDEX +@L1: bit VDC_INDEX + bpl @L1 ; wait for blanking + lda VDC_DATA + jmp @return diff --git a/libsrc/c128/cpeeks.s b/libsrc/c128/cpeeks.s new file mode 100644 index 000000000..12c3349e4 --- /dev/null +++ b/libsrc/c128/cpeeks.s @@ -0,0 +1,159 @@ +; +; 2017-07-05, Greg King +; 2017-12-12, Groepaz +; +; void cpeeks (char* s, unsigned length); +; + + .export _cpeeks + + .import popax + .importzp ptr1, ptr2, ptr3, tmp1, tmp2 + + .macpack generic + +; FIXME c128 needs special version that handles the 80-column VDC. + + .include "c128.inc" + +_cpeeks: + eor #<$FFFF ; counting a word upward is faster + sta ptr3 ; so, we use -(length + 1) + txa + eor #>$FFFF + sta ptr3+1 + + lda MODE + bmi c80 + + lda SCREEN_PTR + ldx SCREEN_PTR+1 + sta ptr2 + stx ptr2+1 + ldy CURS_X + sty tmp2 + + jsr popax + sta tmp1 ; (will be a .Y index) + stx ptr1+1 + ldx #<$0000 + stx ptr1 + bze L3 ; branch always + +L4: ldy tmp2 + lda (ptr2),y ; get char + iny + bnz L2 + inc ptr2+1 +L2: sty tmp2 + and #<~$80 ; remove reverse bit + +; Convert the screen code into a PetSCII code. +; $00 - $1F: +$40 +; $20 - $3F +; $40 - $5f: +$20 +; $60 - $7F: +$40 + + cmp #$20 + blt @sk1 ;(bcc) + cmp #$40 + blt L5 + cmp #$60 + blt @sk2 ;(bcc) + clc +@sk1: adc #$20 +@sk2: ;clc ; both above cmp and adc clear carry flag + adc #$20 + +L5: ldy tmp1 + sta (ptr1),y + iny + bnz L1 + inc ptr1+1 +L1: sty tmp1 + +L3: inc ptr3 ; count length + bnz L4 + inc ptr3+1 + bnz L4 + + txa ; terminate the string + ldy tmp1 + sta (ptr1),y + rts + + ;----------------------------------------------------------- +c80: + lda SCREEN_PTR + clc + adc CURS_X + sta ptr2 + lda SCREEN_PTR+1 + adc #0 + sta ptr2+1 + + jsr popax + sta tmp1 ; (will be a .Y index) + stx ptr1+1 + ldx #<$0000 + stx ptr1 + bze L3a ; branch always + +L4a: + lda ptr2 + ldy ptr2+1 + inc ptr2 + bne @s + inc ptr2+1 +@s: + ; get byte from VDC mem + ldx #VDC_DATA_LO + stx VDC_INDEX +@L0: bit VDC_INDEX + bpl @L0 + sta VDC_DATA + dex + stx VDC_INDEX + sty VDC_DATA + + ldx #VDC_RAM_RW + stx VDC_INDEX +@L1: bit VDC_INDEX + bpl @L1 ; wait for blanking + lda VDC_DATA + + and #<~$80 ; remove reverse bit + +; Convert the screen code into a PetSCII code. +; $00 - $1F: +$40 +; $20 - $3F +; $40 - $5f: +$20 +; $60 - $7F: +$40 + + cmp #$20 + blt @sk1 ;(bcc) + cmp #$40 + blt L5a + cmp #$60 + blt @sk2 ;(bcc) + clc +@sk1: adc #$20 +@sk2: ;clc ; both above cmp and adc clear carry flag + adc #$20 + +L5a: ldy tmp1 + sta (ptr1),y + iny + bnz L1a + inc ptr1+1 +L1a: sty tmp1 + +L3a: inc ptr3 ; count length + bnz L4a + inc ptr3+1 + bnz L4a + + lda #0 ; terminate the string + ldy tmp1 + sta (ptr1),y + rts diff --git a/libsrc/c128/cputc.s b/libsrc/c128/cputc.s index e906c242a..5c0760e75 100644 --- a/libsrc/c128/cputc.s +++ b/libsrc/c128/cputc.s @@ -8,9 +8,9 @@ .export _cputcxy, _cputc, cputdirect, putchar .export newline, plot - .import popa, _gotoxy - .import PLOT + .import gotoxy + .include "cbm_kernal.inc" .include "c128.inc" newline = NEWLINE @@ -21,8 +21,7 @@ newline = NEWLINE _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C ; Plot a character - also used as internal function @@ -63,10 +62,9 @@ cputdirect: ; Handle character if high bit set L5: and #$7F - cmp #$7E ; PI? + cmp #$7F ; PI? bne L6 lda #$5E ; Load screen code for PI - bne cputdirect L6: ora #$40 bne cputdirect ; Branch always @@ -86,4 +84,3 @@ plot: ldy CURS_X ; position in Y putchar = $CC2F - diff --git a/libsrc/c128/crt0.s b/libsrc/c128/crt0.s index 4c6a0f7d9..ba6a78ac5 100644 --- a/libsrc/c128/crt0.s +++ b/libsrc/c128/crt0.s @@ -8,7 +8,7 @@ .import zerobss .import push0, callmain .import RESTOR, BSOUT, CLRCH - .import __RAM_START__, __RAM_SIZE__, __STACKSIZE__ + .import __MAIN_START__, __MAIN_SIZE__, __STACKSIZE__ .importzp ST .include "zeropage.inc" @@ -56,10 +56,10 @@ L1: lda sp,x tsx stx spsave ; Save the system stack pointer - lda #<(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) + lda #<(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) + ldx #>(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) sta sp - lda #>(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) - sta sp+1 ; Set argument stack ptr + stx sp+1 ; Set argument stack ptr ; Call the module constructors. @@ -108,7 +108,7 @@ L2: lda zpsave,x ; ------------------------------------------------------------------------ ; Data -.segment "INITBSS" +.segment "INIT" zpsave: .res zpspace diff --git a/libsrc/c128/emd/c128-efnram.s b/libsrc/c128/emd/c128-efnram.s old mode 100755 new mode 100644 diff --git a/libsrc/c128/emd/c128-ifnram.s b/libsrc/c128/emd/c128-ifnram.s old mode 100755 new mode 100644 diff --git a/libsrc/c128/emd/c128-reu.s b/libsrc/c128/emd/c128-reu.s index a858c591e..84e7cb695 100644 --- a/libsrc/c128/emd/c128-reu.s +++ b/libsrc/c128/emd/c128-reu.s @@ -55,6 +55,8 @@ REU_TRIGGER = $FF00 ; REU command trigger OP_COPYFROM = $ED OP_COPYTO = $EC +OP_COPYFROM_ALOAD = $B1 +OP_COPYTO_ALOAD = $B0 ; ------------------------------------------------------------------------ ; Data. @@ -70,7 +72,7 @@ reu_params: .word $0000 ; Host address, lo, hi .byte $00 ; Expansion bank no. .word $0000 ; # bytes to move, lo, hi .byte $00 ; Interrupt mask reg. - .byte $00 ; Adress control reg. + .byte $00 ; Address control reg. .code @@ -92,17 +94,56 @@ INSTALL: cmp REU_REUADDR ; Check for presence of REU bne nodevice - ldy #>(128*4) ; Assume 128KB - lda REU_STATUS - and #$10 ; Check size bit - beq @L1 - ldy #>(256*4) ; 256KB when size bit is set -@L1: sty pagecount+1 - +; determine the size + php + sei ldy #$FF - sty curpage - sty curpage+1 ; Invalidate the current page - txa ; X = A = EM_ERR_OK +loop: + sty window + jsr reu_size_check_common + ldx #OP_COPYTO_ALOAD + stx REU_COMMAND + dey + cpy #$FF + bne loop + iny +size_loop: + jsr reu_size_check_common + ldx #OP_COPYFROM_ALOAD + stx REU_COMMAND + cpy window + bne size_found + iny + bne size_loop +size_found: + plp + ldx #$00 + cpy #$00 ; too many pages, shave off 2 + bne pagecount_ok + dex + dex + dey +pagecount_ok: + stx pagecount + sty pagecount+1 + lda #<EM_ERR_OK + ldx #>EM_ERR_OK + rts + +; common REU setup for size check +reu_size_check_common: + sty REU_REUADDR+2 + ldx #<window + stx REU_C64ADDR + ldx #>window + stx REU_C64ADDR+1 + ldx #$00 + stx REU_REUADDR + stx REU_REUADDR+1 + stx REU_COUNT+1 + stx REU_CONTROL + inx + stx REU_COUNT rts ; No REU found diff --git a/libsrc/c128/emd/c128-vdc.s b/libsrc/c128/emd/c128-vdc.s index d915fdf25..accb82154 100644 --- a/libsrc/c128/emd/c128-vdc.s +++ b/libsrc/c128/emd/c128-vdc.s @@ -52,13 +52,11 @@ VDC_DATA = 31 ; ------------------------------------------------------------------------ ; Data. -.data - -pagecount: .word 64 ; $0000-$3fff as 16k default -curpage: .word $ffff ; currently mapped-in page (invalid) - .bss +pagecount: .res 2 ; $0000-$3fff as 16k default +curpage: .res 2 ; currently mapped-in page (invalid) +vdc_cset_save: .res 1 window: .res 256 ; memory window .code @@ -71,11 +69,15 @@ window: .res 256 ; memory window ; INSTALL: - ; do test for VDC presence here??? + ; reset mapped-in page to invalid + lda #$ff + sta curpage + sta curpage+1 + ; do test for VDC presence here??? ldx #VDC_CSET ; determine size of RAM... jsr vdcgetreg - sta tmp1 + sta vdc_cset_save ora #%00010000 jsr vdcputreg ; turn on 64k @@ -94,6 +96,8 @@ INSTALL: lda tmp2 jsr vdcputbyte ; restore original value of test byte + ldx #0 ; prepare x with hi of default pagecount + lda ptr1 ; do bytes match? cmp ptr1+1 bne @have64k @@ -101,17 +105,22 @@ INSTALL: cmp ptr2+1 bne @have64k - ldx #VDC_CSET - lda tmp1 - jsr vdcputreg ; restore 16/64k flag - jmp @endok ; and leave default values for 16k - + lda #64 ; assumes x = 0, here -> p.c = 64 + bne @setpagecnt @have64k: - lda #<256 - ldx #>256 + txa ; assumes x = 0, here + inx ; so that a/x becomes 0/1 -> p.c. = 256 +@setpagecnt: sta pagecount stx pagecount+1 -@endok: + + txa + bne @keep64kBit + + ldx #VDC_CSET ; restore 16/64k flag + lda vdc_cset_save + jsr vdcputreg +@keep64kBit: lda #<EM_ERR_OK ldx #>EM_ERR_OK rts @@ -140,7 +149,7 @@ settestadr1: ldy #$02 ; test page 2 (here) .byte $2c settestadr2: - ldy #$42 ; or page 64+2 (there) + ldy #$82 ; or page 64+2 (there) lda #0 jmp vdcsetsrcaddr @@ -199,6 +208,8 @@ transferin: lda VDC_DATA_REG ; get 2 bytes at a time to speed-up sta (ptr2),y ; (in fact up to 8 bytes could be fetched with special VDC config) iny +@L1: bit VDC_ADDR_REG ; XXX: Test waiting for register 31 + bpl @L1 lda VDC_DATA_REG sta (ptr2),y iny @@ -326,14 +337,15 @@ COPYTO: ; vdcsetsrcaddr: - ldx #VDC_DATA_LO + ldx #VDC_DATA_HI stx VDC_ADDR_REG @L0: bit VDC_ADDR_REG bpl @L0 - sta VDC_DATA_REG - dex - tya + sty VDC_DATA_REG + inx stx VDC_ADDR_REG +@L1: bit VDC_ADDR_REG ; XXX: Test waiting for register 18 + bpl @L1 sta VDC_DATA_REG rts diff --git a/libsrc/c128/gettime.s b/libsrc/c128/gettime.s new file mode 100644 index 000000000..0267e683f --- /dev/null +++ b/libsrc/c128/gettime.s @@ -0,0 +1,83 @@ +; +; Stefan Haubenthal, 27.7.2009 +; Oliver Schmidt, 14.8.2018 +; +; int __fastcall__ clock_gettime (clockid_t clk_id, struct timespec *tp); +; + + .include "time.inc" + .include "c128.inc" + + .importzp sreg, tmp1, tmp2 + .import pushax, pusheax, tosmul0ax, steaxspidx, incsp1, return0 + .import TM, load_tenth + + +;---------------------------------------------------------------------------- +.code + +.proc _clock_gettime + + jsr pushax + jsr pushax + + lda CIA1_TODHR + sed + tax ; Save PM flag + and #%01111111 + cmp #$12 ; 12 AM/PM + bcc @L1 + sbc #$12 +@L1: inx ; Get PM flag + bpl @L2 + clc + adc #$12 +@L2: cld + jsr BCD2dec + sta TM + tm::tm_hour + lda CIA1_TODMIN + jsr BCD2dec + sta TM + tm::tm_min + lda CIA1_TODSEC + jsr BCD2dec + sta TM + tm::tm_sec + lda #<TM + ldx #>TM + jsr _mktime + + ldy #timespec::tv_sec + jsr steaxspidx ; Pops address pushed by 2. pushax + + jsr load_tenth + jsr pusheax + lda CIA1_TOD10 + ldx #>$0000 + jsr tosmul0ax + + ldy #timespec::tv_nsec + jsr steaxspidx ; Pops address pushed by 1. pushax + + jsr incsp1 + jmp return0 + +.endproc + +;---------------------------------------------------------------------------- +; dec = (((BCD>>4)*10) + (BCD&0xf)) + +.proc BCD2dec + + tax + and #%00001111 + sta tmp1 + txa + and #%11110000 ; *16 + lsr ; *8 + sta tmp2 + lsr + lsr ; *2 + adc tmp2 ; = *10 + adc tmp1 + rts + +.endproc diff --git a/libsrc/c128/irq.s b/libsrc/c128/irq.s index 79aa8faaa..9f6d0c6d1 100644 --- a/libsrc/c128/irq.s +++ b/libsrc/c128/irq.s @@ -9,7 +9,7 @@ ; ------------------------------------------------------------------------ -.segment "INIT" +.segment "ONCE" initirq: lda IRQVec diff --git a/libsrc/c128/isfast.s b/libsrc/c128/isfast.s new file mode 100644 index 000000000..d40e2c7e9 --- /dev/null +++ b/libsrc/c128/isfast.s @@ -0,0 +1,21 @@ +; +; Marco van den Heuvel, 2018-03-19 +; +; unsigned char isfast (void); +; /* Returns 1 if the CPU is in 2MHz mode. */ +; + + .export _isfast + + .include "c128.inc" + + +.proc _isfast + + lda VIC_CLK_128 + and #$01 + ldx #$00 + rts + +.endproc + diff --git a/libsrc/c128/joy/c128-ptvjoy.s b/libsrc/c128/joy/c128-ptvjoy.s index 6f65ce5eb..180f7667d 100644 --- a/libsrc/c128/joy/c128-ptvjoy.s +++ b/libsrc/c128/joy/c128-ptvjoy.s @@ -30,24 +30,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $00 ; JOY_FIRE2 unavailable - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants diff --git a/libsrc/c128/joy/c128-stdjoy.s b/libsrc/c128/joy/c128-stdjoy.s index 119d3784f..bf2e2fea7 100644 --- a/libsrc/c128/joy/c128-stdjoy.s +++ b/libsrc/c128/joy/c128-stdjoy.s @@ -30,24 +30,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $00 ; JOY_FIRE2 unavailable - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr 0 ; IRQ entry not used ; ------------------------------------------------------------------------ ; Constants @@ -104,7 +92,7 @@ joy1: lda #$7F sei sta CIA1_PRA lda CIA1_PRB - cli +back: cli and #$1F eor #$1F rts @@ -118,9 +106,4 @@ joy2: ldx #0 sta CIA1_DDRA lda CIA1_PRA sty CIA1_DDRA - cli - and #$1F - eor #$1F - rts - - + jmp back diff --git a/libsrc/c128/kbhit.s b/libsrc/c128/kbhit.s index c1bca2416..0d4deacdf 100644 --- a/libsrc/c128/kbhit.s +++ b/libsrc/c128/kbhit.s @@ -20,6 +20,3 @@ L9: rts .endproc - - - diff --git a/libsrc/c128/kbrepeat.s b/libsrc/c128/kbrepeat.s new file mode 100644 index 000000000..4b9bc22af --- /dev/null +++ b/libsrc/c128/kbrepeat.s @@ -0,0 +1,14 @@ +; +; unsigned char __fastcall__ kbrepeat (unsigned char mode); +; + + .export _kbrepeat + + .include "c128.inc" + +_kbrepeat: + ldx KBDREPEAT ; get old value + sta KBDREPEAT ; store new value + txa ; return old value + ldx #0 + rts diff --git a/libsrc/c128/kernal.s b/libsrc/c128/kernal.s index f3b78d00b..47e80c559 100644 --- a/libsrc/c128/kernal.s +++ b/libsrc/c128/kernal.s @@ -1,9 +1,20 @@ ; ; Ullrich von Bassewitz, 19.11.2002 ; -; C128 kernal functions +; C128 Kernal functions ; + .include "cbm_kernal.inc" + + .export KBDREAD + .export CLRSCR + .export PRINT + .export NEWLINE + .export CURS_SET + .export CURS_ON + .export CURS_OFF + .export NMIEXIT + .export C64MODE .export SWAPPER .export SETBNK @@ -35,7 +46,9 @@ .export CKOUT .export CLRCH .export BASIN + .export CHRIN .export BSOUT + .export CHROUT .export LOAD .export SAVE .export SETTIM @@ -47,54 +60,3 @@ .export SCREEN .export PLOT .export IOBASE - - -;----------------------------------------------------------------------------- -; All functions are available in the kernal jump table - -; Extended jump table -C64MODE = $FF4D -SWAPPER = $FF5F -SETBNK = $FF68 - -; -CINT = $FF81 -IOINIT = $FF84 -RAMTAS = $FF87 -RESTOR = $FF8A -VECTOR = $FF8D -SETMSG = $FF90 -SECOND = $FF93 -TKSA = $FF96 -MEMTOP = $FF99 -MEMBOT = $FF9C -SCNKEY = $FF9F -SETTMO = $FFA2 -ACPTR = $FFA5 -CIOUT = $FFA8 -UNTLK = $FFAB -UNLSN = $FFAE -LISTEN = $FFB1 -TALK = $FFB4 -READST = $FFB7 -SETLFS = $FFBA -SETNAM = $FFBD -OPEN = $FFC0 -CLOSE = $FFC3 -CHKIN = $FFC6 -CKOUT = $FFC9 -CLRCH = $FFCC -BASIN = $FFCF -BSOUT = $FFD2 -LOAD = $FFD5 -SAVE = $FFD8 -SETTIM = $FFDB -RDTIM = $FFDE -STOP = $FFE1 -GETIN = $FFE4 -CLALL = $FFE7 -UDTIM = $FFEA -SCREEN = $FFED -PLOT = $FFF0 -IOBASE = $FFF3 - diff --git a/libsrc/c128/mainargs.s b/libsrc/c128/mainargs.s index dcd5a11bd..dcf590024 100644 --- a/libsrc/c128/mainargs.s +++ b/libsrc/c128/mainargs.s @@ -25,6 +25,7 @@ .constructor initmainargs, 24 .import __argc, __argv + .include "cbm_kernal.inc" .include "c128.inc" @@ -32,10 +33,10 @@ MAXARGS = 10 ; Maximum number of arguments allowed REM = $8f ; BASIC token-code NAME_LEN = 16 ; Maximum length of command-name -; Get possible command-line arguments. Goes into the special INIT segment, +; Get possible command-line arguments. Goes into the special ONCE segment, ; which may be reused after the startup code is run -.segment "INIT" +.segment "ONCE" initmainargs: @@ -127,7 +128,7 @@ done: lda #<argv stx __argv + 1 rts -.segment "INITBSS" +.segment "INIT" term: .res 1 name: .res NAME_LEN + 1 diff --git a/libsrc/c128/mcbdefault.s b/libsrc/c128/mcbdefault.s index 1951129a6..a3ca3d0d1 100644 --- a/libsrc/c128/mcbdefault.s +++ b/libsrc/c128/mcbdefault.s @@ -19,17 +19,17 @@ ; Sprite definitions. The first value can be changed to adjust the number ; of the sprite used for the mouse. All others depend on this value. -MOUSE_SPR = 0 ; Sprite used for the mouse -MOUSE_SPR_MEM = $0E00 ; Memory location -MOUSE_SPR_MASK = $01 .shl MOUSE_SPR ; Positive mask -MOUSE_SPR_NMASK = .lobyte(.not MOUSE_SPR_MASK) ; Negative mask -VIC_SPR_X = (VIC_SPR0_X + 2*MOUSE_SPR) ; Sprite X register -VIC_SPR_Y = (VIC_SPR0_Y + 2*MOUSE_SPR) ; Sprite Y register +MOUSE_SPR = 0 ; Sprite used for the mouse +MOUSE_SPR_MEM = $0E00 ; Memory location +MOUSE_SPR_MASK = $01 .shl MOUSE_SPR ; Positive mask +MOUSE_SPR_NMASK = .lobyte(.bitnot MOUSE_SPR_MASK) ; Negative mask +VIC_SPR_X = (VIC_SPR0_X + 2*MOUSE_SPR) ; Sprite X register +VIC_SPR_Y = (VIC_SPR0_Y + 2*MOUSE_SPR) ; Sprite Y register ; -------------------------------------------------------------------------- ; Initialize the mouse sprite. -.segment "INIT" +.segment "ONCE" initmcb: diff --git a/libsrc/c128/mou/c128-1351.s b/libsrc/c128/mou/c128-1351.s index d06e942c4..79ccbe0de 100644 --- a/libsrc/c128/mou/c128-1351.s +++ b/libsrc/c128/mou/c128-1351.s @@ -4,7 +4,7 @@ ; ; 2009-09-26, Ullrich von Bassewitz ; 2014-04-26, Christian Groessler -; 2014-04-30, Greg King +; 2020-07-14, Greg King ; .include "zeropage.inc" @@ -377,7 +377,7 @@ IOCTL: lda #<MOUSE_ERR_INV_IOCTL ; We don't support ioctls, for now IRQ: jsr CPREP lda KEY_COUNT sta old_key_count - lda #$7F + lda #$FF sta CIA1_PRA lda CIA1_PRB ; Read joystick #0 and #$1F diff --git a/libsrc/c128/mou/c128-inkwell.s b/libsrc/c128/mou/c128-inkwell.s index 45d42f2db..b8e71bbb1 100644 --- a/libsrc/c128/mou/c128-inkwell.s +++ b/libsrc/c128/mou/c128-inkwell.s @@ -2,7 +2,7 @@ ; Driver for the Inkwell Systems 170-C and 184-C lightpens. ; ; 2014-04-26, Christian Groessler -; 2014-09-10, Greg King +; 2020-07-14, Greg King ; .include "zeropage.inc" @@ -414,8 +414,8 @@ IRQ: jsr CPREP ldy #%00000000 ; Set ports A and B to input sty CIA1_DDRB sty CIA1_DDRA ; Keyboard won't look like buttons - ;lda #%01111111 ; (Keyboard scan leaves this in port A) - ;sta CIA1_PRA + lda #%11111111 + sta CIA1_PRA lda CIA1_PRB ; Read Control Port 1 dec CIA1_DDRA ; Set port A back to output eor #%11111111 ; Bit goes up when button goes down diff --git a/libsrc/c128/mou/c128-joy.s b/libsrc/c128/mou/c128-joy.s index 7718b89b7..065674dc0 100644 --- a/libsrc/c128/mou/c128-joy.s +++ b/libsrc/c128/mou/c128-joy.s @@ -3,7 +3,7 @@ ; ; 2009-09-26, Ullrich von Bassewitz ; 2014-04-26, Christian Groessler -; 2014-05-01, Greg King +; 2020-07-14, Greg King ; .include "zeropage.inc" @@ -379,7 +379,7 @@ IOCTL: lda #<MOUSE_ERR_INV_IOCTL ; We don't support ioctls for now IRQ: jsr CPREP lda KEY_COUNT sta old_key_count - lda #$7F + lda #$FF sta CIA1_PRA lda CIA1_PRB ; Read joystick #0 and #$1F diff --git a/libsrc/c128/mou/c128-pot.s b/libsrc/c128/mou/c128-pot.s index f61f88d5d..e582d64fb 100644 --- a/libsrc/c128/mou/c128-pot.s +++ b/libsrc/c128/mou/c128-pot.s @@ -4,7 +4,7 @@ ; 2006-08-20, Stefan Haubenthal ; 2009-09-26, Ullrich von Bassewitz ; 2014-04-26, Christian Groessler -; 2014-05-05, Greg King +; 2020-07-14, Greg King ; .include "zeropage.inc" @@ -385,7 +385,7 @@ IOCTL: lda #<MOUSE_ERR_INV_IOCTL ; We don't support ioctls for now IRQ: jsr CPREP lda KEY_COUNT sta old_key_count - lda #$7F + lda #$FF sta CIA1_PRA lda CIA1_PRB ; Read port #1 eor #%11111111 ; Make all bits active high diff --git a/libsrc/c128/mou/callback.inc b/libsrc/c128/mou/callback.inc index 9f1d749a7..274c145fa 100644 --- a/libsrc/c128/mou/callback.inc +++ b/libsrc/c128/mou/callback.inc @@ -1,11 +1,12 @@ ; -; Callback routine called from the IRQ handler after the ROM IRQ handler -; had been run. +; Callback routine, called from the IRQ handler after the ROM IRQ handler +; has been run. ; -; Christian Groessler, 24.04.2014 +; 2014-04-24, Christian Groessler +; 2020-07-14, Greg King ; ; Check if there was button/joystick activity before and/or after the ROM handler. -; If there was activity, discard the key presses since they are most +; If there was activity, discard the key presses because they are most ; probably "phantom" key presses. callback: @@ -16,7 +17,7 @@ callback: lda OLD_BUTTONS ; keypress before? bne @discard_key ; yes, discard key - lda #$7F + lda #$FF sta CIA1_PRA lda CIA1_PRB ; Read joystick #0 and #$1F diff --git a/libsrc/c128/ser/c128-swlink.s b/libsrc/c128/ser/c128-swlink.s index 98411d4f8..3337e2668 100644 --- a/libsrc/c128/ser/c128-swlink.s +++ b/libsrc/c128/ser/c128-swlink.s @@ -45,15 +45,15 @@ ; Jump table - .word INSTALL - .word UNINSTALL - .word OPEN - .word CLOSE - .word GET - .word PUT - .word STATUS - .word IOCTL - .word IRQ + .word SER_INSTALL + .word SER_UNINSTALL + .word SER_OPEN + .word SER_CLOSE + .word SER_GET + .word SER_PUT + .word SER_STATUS + .word SER_IOCTL + .word SER_IRQ ;---------------------------------------------------------------------------- ; I/O definitions @@ -155,11 +155,11 @@ Vector := *+1 .reloc ;---------------------------------------------------------------------------- -; INSTALL routine. Is called after the driver is loaded into memory. If +; SER_INSTALL routine. Is called after the driver is loaded into memory. If ; possible, check if the hardware is present. ; Must return an SER_ERR_xx code in a/x. -INSTALL: +SER_INSTALL: ; Deactivate DTR and disable 6551 interrupts @@ -192,10 +192,10 @@ SetNMI: sta NMIVec rts ;---------------------------------------------------------------------------- -; UNINSTALL routine. Is called before the driver is removed from memory. +; SER_UNINSTALL routine. Is called before the driver is removed from memory. ; Must return an SER_ERR_xx code in a/x. -UNINSTALL: +SER_UNINSTALL: ; Stop interrupts, drop DTR @@ -212,7 +212,7 @@ UNINSTALL: ; PARAMS routine. A pointer to a ser_params structure is passed in ptr1. ; Must return an SER_ERR_xx code in a/x. -OPEN: +SER_OPEN: ; Check if the handshake setting is valid @@ -283,11 +283,11 @@ InvBaud: rts ;---------------------------------------------------------------------------- -; CLOSE: Close the port, disable interrupts and flush the buffer. Called +; SER_CLOSE: Close the port, disable interrupts and flush the buffer. Called ; without parameters. Must return an error code in a/x. ; -CLOSE: +SER_CLOSE: ; Stop interrupts, drop DTR @@ -305,12 +305,13 @@ CLOSE: rts ;---------------------------------------------------------------------------- -; GET: Will fetch a character from the receive buffer and store it into the +; SER_GET: Will fetch a character from the receive buffer and store it into the ; variable pointer to by ptr1. If no data is available, SER_ERR_NO_DATA is ; return. ; -GET: ldx SendFreeCnt ; Send data if necessary +SER_GET: + ldx SendFreeCnt ; Send data if necessary inx ; X == $FF? beq @L1 lda #$00 @@ -349,11 +350,11 @@ GET: ldx SendFreeCnt ; Send data if necessary rts ;---------------------------------------------------------------------------- -; PUT: Output character in A. +; SER_PUT: Output character in A. ; Must return an error code in a/x. ; -PUT: +SER_PUT: ; Try to send @@ -383,23 +384,25 @@ PUT: rts ;---------------------------------------------------------------------------- -; STATUS: Return the status in the variable pointed to by ptr1. +; SER_STATUS: Return the status in the variable pointed to by ptr1. ; Must return an error code in a/x. ; -STATUS: lda ACIA_STATUS +SER_STATUS: + lda ACIA_STATUS ldx #0 sta (ptr1,x) txa ; SER_ERR_OK rts ;---------------------------------------------------------------------------- -; IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl +; SER_IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl ; specific data in ptr1, and the ioctl code in A. ; Must return an error code in a/x. ; -IOCTL: lda #<SER_ERR_INV_IOCTL ; We don't support ioclts for now +SER_IOCTL: + lda #<SER_ERR_INV_IOCTL ; We don't support ioclts for now ldx #>SER_ERR_INV_IOCTL rts @@ -407,7 +410,7 @@ IOCTL: lda #<SER_ERR_INV_IOCTL ; We don't support ioclts for now ; IRQ: Not used on the C128 ; -IRQ = $0000 +SER_IRQ = $0000 ;---------------------------------------------------------------------------- ; @@ -500,5 +503,3 @@ InitBuffers: stx RecvFreeCnt stx SendFreeCnt rts - - diff --git a/libsrc/c128/settime.s b/libsrc/c128/settime.s new file mode 100644 index 000000000..fe306b735 --- /dev/null +++ b/libsrc/c128/settime.s @@ -0,0 +1,84 @@ +; +; Oliver Schmidt, 16.8.2018 +; +; int __fastcall__ clock_settime (clockid_t clk_id, const struct timespec *tp); +; + + .include "time.inc" + .include "c128.inc" + + .importzp sreg, ptr1 + .import pushax, pusheax, ldax0sp, ldeaxidx + .import tosdiveax, incsp3, return0 + .import TM, load_tenth + + +;---------------------------------------------------------------------------- +.code + +.proc _clock_settime + + jsr pushax + + .assert timespec::tv_sec = 0, error + jsr _localtime + sta ptr1 + stx ptr1+1 + ldy #.sizeof(tm)-1 +@L1: lda (ptr1),y + sta TM,y + dey + bpl @L1 + + lda TM + tm::tm_hour + jsr dec2BCD + tax ; Force flags + bne @L2 + lda #$92 ; 12 AM + bne @L3 +@L2: cmp #$13 ; 1 PM + bcc @L3 + sed + sbc #$12 + cld + ora #%10000000 +@L3: sta CIA1_TODHR + lda TM + tm::tm_min + jsr dec2BCD + sta CIA1_TODMIN + lda TM + tm::tm_sec + jsr dec2BCD + sta CIA1_TODSEC + + jsr ldax0sp + ldy #3+timespec::tv_nsec + jsr ldeaxidx + jsr pusheax + jsr load_tenth + jsr tosdiveax + sta CIA1_TOD10 + + jsr incsp3 + jmp return0 + +.endproc + +;---------------------------------------------------------------------------- +; Just sum up the value in BCD mode. +; http://forum.6502.org/viewtopic.php?p=7629#p7629 + +.proc dec2BCD + + tax + dex + bmi @L9 + lda #0 + clc + sed +@L1: adc #1 + dex + bpl @L1 + cld +@L9: rts + +.endproc diff --git a/libsrc/c128/tgi/c128-hi.s b/libsrc/c128/tgi/c128-hi.s new file mode 100644 index 000000000..ef68ccd68 --- /dev/null +++ b/libsrc/c128/tgi/c128-hi.s @@ -0,0 +1,880 @@ +; +; Graphics driver for the 320x200x2 mode on the C128. +; +; Based on Stephen L. Judd's GRLIB code. +; +; 2018-03-13, Sven Klose +; 2018-07-22, Scott Hutter +; 2018-07-28, Greg King +; + + .include "zeropage.inc" + + .include "tgi-kernel.inc" + .include "tgi-error.inc" + .include "c128.inc" + + .macpack generic + .macpack module + + +; ------------------------------------------------------------------------ +; Header. Includes jump table and constants. + + module_header _c128_hi_tgi + +; First part of the header is a structure that has a magic and defines the +; capabilities of the driver + + .byte $74, $67, $69 ; "tgi" + .byte TGI_API_VERSION ; TGI API version number + .addr $0000 ; Library reference + .word 320 ; X resolution + .word 200 ; Y resolution + .byte 2 ; Number of drawing colors + .byte 1 ; Number of screens available + .byte 8 ; System font X size + .byte 8 ; System font Y size + .word $00D4 ; Aspect ratio (based on 4/3 display) + .byte 0 ; TGI driver flags + +; Next comes the jump table. With the exception of IRQ, all entries must be +; valid and may point to an RTS for test versions (function not implemented). + + .addr INSTALL + .addr UNINSTALL + .addr INIT + .addr DONE + .addr GETERROR + .addr CONTROL + .addr CLEAR + .addr SETVIEWPAGE + .addr SETDRAWPAGE + .addr SETCOLOR + .addr SETPALETTE + .addr GETPALETTE + .addr GETDEFPALETTE + .addr SETPIXEL + .addr GETPIXEL + .addr LINE + .addr BAR + .addr TEXTSTYLE + .addr OUTTEXT + +; ------------------------------------------------------------------------ +; Data. + +; Variables mapped to the zero page segment variables. Some of these are +; used for passing parameters to the driver. + +X1 := ptr1 +Y1 := ptr2 +X2 := ptr3 +Y2 := ptr4 +TEXT := ptr3 + +TEMP := tmp4 +TEMP2 := sreg +POINT := regsave + +CHUNK := X2 ; Used in the line routine +OLDCHUNK := X2+1 ; Ditto + +; Absolute variables used in the code + +.bss + +ERROR: .res 1 ; Error code +PALETTE: .res 2 ; The current palette + +BITMASK: .res 1 ; $00 = clear, $FF = set pixels + +; Line routine stuff +DX: .res 2 +DY: .res 2 + +; BAR variables +X1SAVE: .res 2 +Y1SAVE: .res 1 +X2SAVE: .res 2 +Y2SAVE: .res 1 + +; Text output stuff +TEXTMAGX: .res 1 +TEXTMAGY: .res 1 +TEXTDIR: .res 1 + +; Constants and tables + +.rodata + +DEFPALETTE: .byte $00, $01 ; White on black +PALETTESIZE = * - DEFPALETTE + +BITTAB: .byte $80,$40,$20,$10,$08,$04,$02,$01 +BITCHUNK: .byte $FF,$7F,$3F,$1F,$0F,$07,$03,$01 + +CHARROM := $D000 ; Character ROM base address + +VBASE := $C000 ; Video memory base address +CBASE := $E000 ; Color memory base address + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. May +; initialize anything that has to be done just once. Is probably empty +; most of the time. +; +; Must set an error code: NO +; + +INSTALL: +; rts ; fall through + + +; ------------------------------------------------------------------------ +; UNINSTALL routine. Is called before the driver is removed from memory. May +; clean up anything done by INSTALL but is probably empty most of the time. +; +; Must set an error code: NO +; + +UNINSTALL: + rts + + +; ------------------------------------------------------------------------ +; INIT: Changes an already installed device from text mode to graphics +; mode. +; Note that INIT/DONE may be called multiple times while the driver +; is loaded, while INSTALL is only called once, so any code that is needed +; to initializes variables and so on must go here. Setting palette and +; clearing the screen is not needed because this is called by the graphics +; kernel later. +; The graphics kernel will never call INIT when a graphics mode is already +; active, so there is no need to protect against that. +; +; Must set an error code: YES +; + +INIT: + +; Initialize variables. + + ldx #$FF ; Foreground color + stx BITMASK + +; Switch into graphics mode. + +; Select a video bank: +; bank 0 = $03 ($0000-$3FFF) (default) +; bank 1 = $02 ($4000-$7FFF) +; bank 2 = $01 ($8000-$BFFF) +; bank 3 = $00 ($C000-$FFFF) (TGI) + + lda CIA2_PRA + and #<~$03 ; Bank 3 + sta CIA2_PRA + + lda #$80 ; color-map at $E000, bitmap at $C000 + sta VM2 + +; Make the VIC-IIe read RAM instead of the font ROM. + + lda #%00000100 + sta CHARDIS + +; Switch to bitmap mode. + + lda #%00100000 + sta GRAPHM + + lda #TGI_ERR_OK + sta ERROR + rts + +; ------------------------------------------------------------------------ +; DONE: Will be called to switch the graphics device back into text mode. +; The graphics kernel will never call DONE when no graphics mode is active, +; so there is no need to protect against that. +; +; Must set an error code: NO +; + +DONE: + +; Select the text video bank. + + lda CIA2_PRA + ora #$03 ; Bank 0 + sta CIA2_PRA + +; Make the VIC-IIe read the font ROM instead of RAM. + + lda #%00000000 + sta CHARDIS + + ;lda #%00000000 ; Switch back to text mode + sta GRAPHM + +; Restore a value that's needed by BASIC's GRAPHIC 1 statement. + + lda #$78 ; color-map at $1C00, bitmap at $2000 + sta VM2 + rts + +; ------------------------------------------------------------------------ +; GETERROR: Return the error code in A and clear it. + +GETERROR: + ldx #TGI_ERR_OK + lda ERROR + stx ERROR + rts + +; ------------------------------------------------------------------------ +; CONTROL: Platform/driver specific entry point. +; +; Must set an error code: YES +; + +CONTROL: + lda #TGI_ERR_INV_FUNC + sta ERROR + rts + +; ------------------------------------------------------------------------ +; CLEAR: Clears the screen. +; +; Must set an error code: NO +; + +CLEAR: + ldy #$00 + tya + ldx #MMU_CFG_RAM0 + sei + stx MMU_CR +@L1: sta VBASE+$0000,y + sta VBASE+$0100,y + sta VBASE+$0200,y + sta VBASE+$0300,y + sta VBASE+$0400,y + sta VBASE+$0500,y + sta VBASE+$0600,y + sta VBASE+$0700,y + sta VBASE+$0800,y + sta VBASE+$0900,y + sta VBASE+$0A00,y + sta VBASE+$0B00,y + sta VBASE+$0C00,y + sta VBASE+$0D00,y + sta VBASE+$0E00,y + sta VBASE+$0F00,y + sta VBASE+$1000,y + sta VBASE+$1100,y + sta VBASE+$1200,y + sta VBASE+$1300,y + sta VBASE+$1400,y + sta VBASE+$1500,y + sta VBASE+$1600,y + sta VBASE+$1700,y + sta VBASE+$1800,y + sta VBASE+$1900,y + sta VBASE+$1A00,y + sta VBASE+$1B00,y + sta VBASE+$1C00,y + sta VBASE+$1D00,y + sta VBASE+$1E00,y + sta VBASE+$1F00,y + iny + bne @L1 + ldx #MMU_CFG_CC65 + stx MMU_CR + cli + rts + +; ------------------------------------------------------------------------ +; SETVIEWPAGE: Set the visible page. Called with the new page in A (0..n). +; The page number is already checked to be valid by the graphics kernel. +; +; Must set an error code: NO (will only be called if page ok) +; + +SETVIEWPAGE: +; rts ; fall through + +; ------------------------------------------------------------------------ +; SETDRAWPAGE: Set the drawable page. Called with the new page in A (0..n). +; The page number is already checked to be valid by the graphics kernel. +; +; Must set an error code: NO (will only be called if page ok) +; + +SETDRAWPAGE: + rts + +; ------------------------------------------------------------------------ +; SETCOLOR: Set the drawing color (in A). The new color is already checked +; to be in a valid range (0..maxcolor-1). +; +; Must set an error code: NO (will only be called if color ok) +; + +SETCOLOR: + tax + beq @L1 + lda #$FF +@L1: sta BITMASK + rts + +; ------------------------------------------------------------------------ +; SETPALETTE: Set the palette (not available with all drivers/hardware). +; A pointer to the palette is passed in ptr1. Must set an error if palettes +; are not supported +; +; Must set an error code: YES +; + +SETPALETTE: + ldy #PALETTESIZE - 1 +@L1: lda (ptr1),y ; Copy the palette + and #$0F ; Make a valid color + sta PALETTE,y + dey + bpl @L1 + +; Get the color entries from the palette + + lda PALETTE+1 ; Foreground color + asl a + asl a + asl a + asl a + ora PALETTE ; Background color + +; Initialize the color map with the new color settings (it is below the +; Kernal ROM). + + ldy #$00 + ldx #MMU_CFG_RAM0 + sei + stx MMU_CR +@L2: sta CBASE+$0000,y + sta CBASE+$0100,y + sta CBASE+$0200,y + sta CBASE+$02e8,y + iny + bne @L2 + ldx #MMU_CFG_CC65 + stx MMU_CR + cli + +; Done, reset the error code + + lda #TGI_ERR_OK + sta ERROR + rts + +; ------------------------------------------------------------------------ +; GETPALETTE: Return the current palette in A/X. Even drivers that cannot +; set the palette should return the default palette here, so there's no +; way for this function to fail. +; +; Must set an error code: NO +; + +GETPALETTE: + lda #<PALETTE + ldx #>PALETTE + rts + +; ------------------------------------------------------------------------ +; GETDEFPALETTE: Return the default palette for the driver in A/X. All +; drivers should return something reasonable here, even drivers that don't +; support palettes, otherwise the caller has no way to determine the colors +; of the (not changeable) palette. +; +; Must set an error code: NO (all drivers must have a default palette) +; + +GETDEFPALETTE: + lda #<DEFPALETTE + ldx #>DEFPALETTE + rts + +; ------------------------------------------------------------------------ +; SETPIXEL: Draw one pixel at X1/Y1 = ptr1/ptr2 with the current drawing +; color. The coordinates passed to this function are never outside the +; visible screen area, so there is no need for clipping inside this function. +; +; Must set an error code: NO +; + +SETPIXEL: + jsr CALC ; Calculate coordinates + + lda #MMU_CFG_RAM0 ; Work behind ROMs + sei + sta MMU_CR + + lda (POINT),Y + eor BITMASK + and BITTAB,X + eor (POINT),Y + sta (POINT),Y + + ldx #MMU_CFG_CC65 + stx MMU_CR + cli + + rts + +; ------------------------------------------------------------------------ +; GETPIXEL: Read the color value of a pixel and return it in A/X. The +; coordinates passed to this function are never outside the visible screen +; area, so there is no need for clipping inside this function. + + +GETPIXEL: + jsr CALC ; Calculate coordinates + + lda #MMU_CFG_RAM0 ; Work behind ROMs + sei + sta MMU_CR + + lda (POINT),Y + and BITTAB,X + beq @L1 + lda #$01 ; Foreground color + +@L1: ldy #MMU_CFG_CC65 + sty MMU_CR + cli + ldx #$00 ; Clear high byte + rts + +; ------------------------------------------------------------------------ +; LINE: Draw a line from X1/Y1 to X2/Y2, where X1/Y1 = ptr1/ptr2 and +; X2/Y2 = ptr3/ptr4 using the current drawing color. +; +; X1,X2 etc. are set up above (x2=LINNUM in particular) +; Format is LINE x2,y2,x1,y1 +; +; Must set an error code: NO +; + +LINE: + +@CHECK: lda X2 ;Make sure x1<x2 + sec + sbc X1 + tax + lda X2+1 + sbc X1+1 + bpl @CONT + lda Y2 ;If not, swap P1 and P2 + ldy Y1 + sta Y1 + sty Y2 + lda Y2+1 + ldy Y1+1 + sta Y1+1 + sty Y2+1 + lda X1 + ldy X2 + sty X1 + sta X2 + lda X2+1 + ldy X1+1 + sta X1+1 + sty X2+1 + bcc @CHECK + +@CONT: sta DX+1 + stx DX + + ldx #$C8 ;INY + lda Y2 ;Calculate dy + sec + sbc Y1 + tay + lda Y2+1 + sbc Y1+1 + bpl @DYPOS ;Is y2>=y1? + lda Y1 ;Otherwise dy=y1-y2 + sec + sbc Y2 + tay + ldx #$88 ;DEY + +@DYPOS: sty DY ; 8-bit DY -- FIX ME? + stx YINCDEC + stx XINCDEC + + jsr CALC ; Set up .X, .Y, and POINT + lda BITCHUNK,X + sta OLDCHUNK + sta CHUNK + + lda #MMU_CFG_RAM0 ; Work behind ROMs + sei + sta MMU_CR + + ldx DY + cpx DX ;Who's bigger: dy or dx? + bcc STEPINX ;If dx, then... + lda DX+1 + bne STEPINX + +; +; Big steps in Y +; +; To simplify my life, just use PLOT to plot points. +; +; No more! +; Added special plotting routine -- cool! +; +; X is now counter, Y is y-coordinate +; +; On entry, X=DY=number of loop iterations, and Y= +; Y1 AND #$07 +STEPINY: + lda #00 + sta OLDCHUNK ;So plotting routine will work right + lda CHUNK + lsr ;Strip the bit + eor CHUNK + sta CHUNK + txa + beq YCONT2 ;If dy=0, it's just a point +@CONT: lsr ;Init counter to dy/2 +; +; Main loop +; +YLOOP: sta TEMP + + lda (POINT),y + eor BITMASK + and CHUNK + eor (POINT),y + sta (POINT),y +YINCDEC: + iny ;Advance Y coordinate + cpy #8 + bcc @CONT ;No prob if Y=0..7 + jsr FIXY +@CONT: lda TEMP ;Restore A + sec + sbc DX + bcc YFIXX +YCONT: dex ;X is counter + bne YLOOP +YCONT2: lda (POINT),y ;Plot endpoint + eor BITMASK + and CHUNK + eor (POINT),y + sta (POINT),y + ldx #MMU_CFG_CC65 + stx MMU_CR + cli + rts + +YFIXX: ;x=x+1 + adc DY + lsr CHUNK + bne YCONT ;If we pass a column boundary... + ror CHUNK ;then reset CHUNK to $80 + sta TEMP2 + lda POINT ;And add 8 to POINT + adc #8 + sta POINT + bcc @CONT + inc POINT+1 +@CONT: lda TEMP2 + dex + bne YLOOP + beq YCONT2 + +; +; Big steps in X direction +; +; On entry, X=DY=number of loop iterations, and Y= +; Y1 AND #$07 + +.bss +COUNTHI: + .byte $00 ;Temporary counter + ;only used once +.code +STEPINX: + ldx DX + lda DX+1 + sta COUNTHI + cmp #$80 + ror ;Need bit for initialization + sta Y1 ;High byte of counter + txa + bne @CONT ;Could be $100 + dec COUNTHI +@CONT: ror +; +; Main loop +; +XLOOP: lsr CHUNK + beq XFIXC ;If we pass a column boundary... +XCONT1: sbc DY + bcc XFIXY ;Time to step in Y? +XCONT2: dex + bne XLOOP + dec COUNTHI ;High bits set? + bpl XLOOP + + lsr CHUNK ;Advance to last point + jsr LINEPLOT ;Plot the last chunk + ldx #MMU_CFG_CC65 + stx MMU_CR + cli + rts +; +; CHUNK has passed a column, so plot and increment pointer +; and fix up CHUNK, OLDCHUNK. +; +XFIXC: sta TEMP + jsr LINEPLOT + lda #$FF + sta CHUNK + sta OLDCHUNK + lda POINT + clc + adc #8 + sta POINT + lda TEMP + bcc XCONT1 + inc POINT+1 + jmp XCONT1 +; +; Check to make sure there isn't a high bit, plot chunk, +; and update Y-coordinate. +; +XFIXY: dec Y1 ;Maybe high bit set + bpl XCONT2 + adc DX + sta TEMP + lda DX+1 + adc #$FF ;Hi byte + sta Y1 + + jsr LINEPLOT ;Plot chunk + lda CHUNK + sta OLDCHUNK + + lda TEMP +XINCDEC: + iny ;Y-coord + cpy #8 ;0..7 is ok + bcc XCONT2 + sta TEMP + jsr FIXY + lda TEMP + jmp XCONT2 + +; +; Subroutine to plot chunks/points (to save a little +; room, gray hair, etc.) +; +LINEPLOT: ; Plot the line chunk + lda (POINT),Y + eor BITMASK + ora CHUNK + and OLDCHUNK + eor CHUNK + eor (POINT),Y + sta (POINT),Y + rts + +; +; Subroutine to fix up pointer when Y decreases through +; zero or increases through 7. +; +FIXY: cpy #255 ;Y=255 or Y=8 + beq @DECPTR + +@INCPTR: ;Add 320 to pointer + ldy #0 ;Y increased through 7 + lda POINT + adc #<320 + sta POINT + lda POINT+1 + adc #>320 + sta POINT+1 + rts + +@DECPTR: ;Okay, subtract 320 then + ldy #7 ;Y decreased through 0 + lda POINT + sec + sbc #<320 + sta POINT + lda POINT+1 + sbc #>320 + sta POINT+1 + rts + +; ------------------------------------------------------------------------ +; BAR: Draw a filled rectangle with the corners X1/Y1, X2/Y2, where +; X1/Y1 = ptr1/ptr2 and X2/Y2 = ptr3/ptr4 using the current drawing color. +; Contrary to most other functions, the graphics kernel will sort and clip +; the coordinates before calling the driver, so on entry the following +; conditions are valid: +; X1 <= X2 +; Y1 <= Y2 +; (X1 >= 0) && (X1 < XRES) +; (X2 >= 0) && (X2 < XRES) +; (Y1 >= 0) && (Y1 < YRES) +; (Y2 >= 0) && (Y2 < YRES) +; +; Must set an error code: NO +; + +; Note: This function needs optimization. It's just a cheap translation of +; the original C wrapper and could be written much smaller (besides that, +; calling LINE is not a good idea either). + +BAR: + lda X2 + sta X2SAVE + lda X2+1 + sta X2SAVE+1 + + lda Y2 + sta Y2SAVE + + lda X1 + sta X1SAVE + lda X1+1 + sta X1SAVE+1 + + lda Y1 + sta Y1SAVE + +@L1: sta Y2 + lda #>200 + sta Y1+1 + sta Y2+1 + + jsr LINE + + lda Y1SAVE + cmp Y2SAVE + beq @L4 + + inc Y1SAVE + + lda X1SAVE + sta X1 + lda X1SAVE+1 + sta X1+1 + + lda X2SAVE + sta X2 + lda X2SAVE+1 + sta X2+1 + + lda Y1SAVE + sta Y1 + jmp @L1 + +@L4: rts + + +; ------------------------------------------------------------------------ +; TEXTSTYLE: Set the style used when calling OUTTEXT. Text scaling in X and Y +; direction is passend in X/Y, the text direction is passed in A. +; +; Must set an error code: NO +; + +TEXTSTYLE: + stx TEXTMAGX + sty TEXTMAGY + sta TEXTDIR + rts + + +; ------------------------------------------------------------------------ +; OUTTEXT: Output text at X/Y = ptr1/ptr2 using the current color and the +; current text style. The text to output is given as a zero terminated +; string with address in ptr3. +; +; Must set an error code: NO +; + +OUTTEXT: + +; Calculate a pointer to the representation of the character in the +; character ROM + + ldx #((>(CHARROM + $0800)) >> 3) + ldy #0 + lda (TEXT),y + bmi @L1 + ldx #((>(CHARROM + $0000)) >> 3) +@L1: stx ptr4+1 + asl a + rol ptr4+1 + asl a + rol ptr4+1 + asl a + rol ptr4+1 + sta ptr4 + + + + + + rts + +; ------------------------------------------------------------------------ +; Calculate all variables to plot the pixel at X1/Y1. + +CALC: lda Y1 + sta TEMP2 + and #7 + tay + lda Y1+1 + lsr ; Neg is possible + ror TEMP2 + lsr + ror TEMP2 + lsr + ror TEMP2 + + lda #00 + sta POINT + lda TEMP2 + cmp #$80 + ror + ror POINT + cmp #$80 + ror + ror POINT ; row*64 + adc TEMP2 ; +row*256 + clc + adc #>VBASE ; +bitmap base + sta POINT+1 + + lda X1 + tax + and #$F8 + clc + adc POINT ; +(X AND #$F8) + sta POINT + lda X1+1 + adc POINT+1 + sta POINT+1 + txa + and #7 + tax + rts diff --git a/libsrc/c128/tgi/c128-vdc.s b/libsrc/c128/tgi/c128-vdc.s index 5100f7f7d..f48b530f6 100644 --- a/libsrc/c128/tgi/c128-vdc.s +++ b/libsrc/c128/tgi/c128-vdc.s @@ -88,7 +88,6 @@ pages: .byte 1 ; Number of screens available .addr BAR .addr TEXTSTYLE .addr OUTTEXT - .addr 0 ; IRQ entry is unused ; ------------------------------------------------------------------------ ; Data. diff --git a/libsrc/c128/tgi/c128-vdc2.s b/libsrc/c128/tgi/c128-vdc2.s index a7238e877..4b7b17c57 100644 --- a/libsrc/c128/tgi/c128-vdc2.s +++ b/libsrc/c128/tgi/c128-vdc2.s @@ -89,7 +89,6 @@ pages: .byte 0 ; Number of screens available .addr BAR .addr TEXTSTYLE .addr OUTTEXT - .addr 0 ; IRQ entry is unused ; ------------------------------------------------------------------------ ; Data. diff --git a/libsrc/c128/tgi_colors.s b/libsrc/c128/tgi_colors.s deleted file mode 100644 index 6ef3729b4..000000000 --- a/libsrc/c128/tgi_colors.s +++ /dev/null @@ -1,8 +0,0 @@ -; -; Target-specific black & white values for use by the target-shared TGI kernel -; - - .include "tgi-kernel.inc" - - .export tgi_color_black:zp = $00 - .export tgi_color_white:zp = $01 diff --git a/libsrc/c128/systime.s b/libsrc/c128/tmcommon.s similarity index 51% rename from libsrc/c128/systime.s rename to libsrc/c128/tmcommon.s index e12d016b8..f9a53c2a3 100644 --- a/libsrc/c128/systime.s +++ b/libsrc/c128/tmcommon.s @@ -1,60 +1,30 @@ ; -; Stefan Haubenthal, 27.7.2009 +; Oliver Schmidt, 16.8.2018 ; -; time_t _systime (void); -; /* Similar to time(), but: -; ** - Is not ISO C -; ** - Does not take the additional pointer -; ** - Does not set errno when returning -1 -; */ +; Common stuff for the clock routines ; - .include "time.inc" .include "c128.inc" .include "get_tv.inc" - .constructor initsystime - .importzp tmp1, tmp2 + .export TM, load_tenth + + .constructor inittime + .importzp sreg .import _get_tv ;---------------------------------------------------------------------------- .code -.proc __systime +.proc load_tenth - lda CIA1_TODHR - bpl AM - and #%01111111 - sed - clc - adc #$12 - cld -AM: jsr BCD2dec - sta TM + tm::tm_hour - lda CIA1_TODMIN - jsr BCD2dec - sta TM + tm::tm_min - lda CIA1_TODSEC - jsr BCD2dec - sta TM + tm::tm_sec - lda CIA1_TOD10 ; Dummy read to unfreeze - lda #<TM - ldx #>TM - jmp _mktime - -; dec = (((BCD>>4)*10) + (BCD&0xf)) -BCD2dec:tax - and #%00001111 - sta tmp1 - txa - and #%11110000 ; *16 - lsr ; *8 - sta tmp2 - lsr - lsr ; *2 - adc tmp2 ; = *10 - adc tmp1 + lda #<(100 * 1000 * 1000 / $10000) + ldx #>(100 * 1000 * 1000 / $10000) + sta sreg + stx sreg+1 + lda #<(100 * 1000 * 1000) + ldx #>(100 * 1000 * 1000) rts .endproc @@ -63,9 +33,9 @@ BCD2dec:tax ; Constructor that writes to the 1/10 sec register of the TOD to kick it ; into action. If this is not done, the clock hangs. We will read the register ; and write it again, ignoring a possible change in between. -.segment "INIT" +.segment "ONCE" -.proc initsystime +.proc inittime lda CIA1_TOD10 sta CIA1_TOD10 diff --git a/libsrc/c128/waitvsync.s b/libsrc/c128/waitvsync.s new file mode 100644 index 000000000..e4bbbf7c9 --- /dev/null +++ b/libsrc/c128/waitvsync.s @@ -0,0 +1,30 @@ +; +; Written by Groepaz <groepaz@gmx.net> +; +; void waitvsync (void); +; + + .export _waitvsync + + .include "c128.inc" + +_waitvsync: + + bit MODE + bmi @c80 + +@l1: + bit VIC_CTRL1 + bpl @l1 +@l2: + bit VIC_CTRL1 + bmi @l2 + rts + +@c80: + ;FIXME: do we have to switch banks? +@l3: + lda VDC_INDEX + and #$20 + beq @l3 + rts diff --git a/libsrc/c16/break.s b/libsrc/c16/break.s index e143ac6d5..456dbb434 100644 --- a/libsrc/c16/break.s +++ b/libsrc/c16/break.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 27.09.1998 ; -; void set_brk (unsigned Addr); +; void __fastcall__ set_brk (unsigned Addr); ; void reset_brk (void); ; diff --git a/libsrc/c16/cgetc.s b/libsrc/c16/cgetc.s index 8bcb72100..52d985caf 100644 --- a/libsrc/c16/cgetc.s +++ b/libsrc/c16/cgetc.s @@ -7,6 +7,7 @@ .export _cgetc .import cursor + .include "cbm_kernal.inc" .include "plus4.inc" @@ -56,12 +57,14 @@ L2: jsr KBDREAD ; Read char and return in A .constructor initkbd .destructor donekbd -.segment "INIT" +.segment "ONCE" .proc initkbd - ldy #15 + ldy #7 @L1: lda fnkeys,y + sta FKEY_SPACE+8,y + lda #$01 ; Lower 8 places are all $01 sta FKEY_SPACE,y dey bpl @L1 @@ -69,6 +72,8 @@ L2: jsr KBDREAD ; Read char and return in A .endproc +fnkeys: .byte 133, 137, 134, 138, 135, 139, 136, 140 + .code @@ -82,11 +87,3 @@ L2: jsr KBDREAD ; Read char and return in A rts .endproc - - -; Function key table, readonly - -.rodata -fnkeys: .byte $01, $01, $01, $01, $01, $01, $01, $01 - .byte 133, 137, 134, 138, 135, 139, 136, 140 - diff --git a/libsrc/c16/clrscr.s b/libsrc/c16/clrscr.s index 56fe0c62c..a3c519cb1 100644 --- a/libsrc/c16/clrscr.s +++ b/libsrc/c16/clrscr.s @@ -6,10 +6,6 @@ .export _clrscr - .include "plus4.inc" + .include "cbm_kernal.inc" _clrscr = CLRSCR - - - - diff --git a/libsrc/c16/color.s b/libsrc/c16/color.s index 2f3046e8f..fbcc95a2a 100644 --- a/libsrc/c16/color.s +++ b/libsrc/c16/color.s @@ -1,33 +1 @@ -; -; Ullrich von Bassewitz, 06.08.1998 -; -; unsigned char __fastcall__ textcolor (unsigned char color); -; unsigned char __fastcall__ bgcolor (unsigned char color); -; unsigned char __fastcall__ bordercolor (unsigned char color); -; - - .export _textcolor, _bgcolor, _bordercolor - - .include "plus4.inc" - -_textcolor: - ldx CHARCOLOR ; get old value - sta CHARCOLOR ; set new value - txa - rts - - -_bgcolor: - ldx TED_BGCOLOR ; get old value - sta TED_BGCOLOR ; set new value - txa - rts - - -_bordercolor: - ldx TED_BORDERCOLOR ; get old value - sta TED_BORDERCOLOR ; set new value - txa - rts - - +.include "../plus4/color.s" diff --git a/libsrc/c16/conio.s b/libsrc/c16/conio.s index feca30c68..3ab372a29 100644 --- a/libsrc/c16/conio.s +++ b/libsrc/c16/conio.s @@ -1,10 +1 @@ -; -; Ullrich von Bassewitz, 06.08.1998 -; -; Low level stuff for screen output/console input -; - - .exportzp CURS_X, CURS_Y - - .include "plus4.inc" - +.include "../plus4/conio.s" diff --git a/libsrc/c16/cputc.s b/libsrc/c16/cputc.s index a83a9c60b..86959675a 100644 --- a/libsrc/c16/cputc.s +++ b/libsrc/c16/cputc.s @@ -1,105 +1 @@ -; -; Ullrich von Bassewitz, 06.08.1998 -; -; void cputcxy (unsigned char x, unsigned char y, char c); -; void cputc (char c); -; - - .export _cputcxy, _cputc, cputdirect, putchar - .export newline, plot - .import popa, _gotoxy - .import PLOT - - .include "plus4.inc" - - -_cputcxy: - pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x - pla ; Restore C - -; Plot a character - also used as internal function - -_cputc: cmp #$0A ; CR? - bne L1 - lda #0 - sta CURS_X - beq plot ; Recalculate pointers - -L1: cmp #$0D ; LF? - beq newline ; Recalculate pointers - -; Printable char of some sort - - cmp #' ' - bcc cputdirect ; Other control char - tay - bmi L10 - cmp #$60 - bcc L2 - and #$DF - bne cputdirect ; Branch always -L2: and #$3F - -cputdirect: - jsr putchar ; Write the character to the screen - -; Advance cursor position - -advance: - iny - cpy #XSIZE - bne L3 - jsr newline ; new line - ldy #0 ; + cr -L3: sty CURS_X - rts - -newline: - clc - lda #XSIZE - adc SCREEN_PTR - sta SCREEN_PTR - bcc L4 - inc SCREEN_PTR+1 - clc -L4: lda #XSIZE - adc CRAM_PTR - sta CRAM_PTR - bcc L5 - inc CRAM_PTR+1 -L5: inc CURS_Y - rts - -; Handle character if high bit set - -L10: and #$7F - cmp #$7E ; PI? - bne L11 - lda #$5E ; Load screen code for PI - bne cputdirect -L11: ora #$40 - bne cputdirect - - - -; Set cursor position, calculate RAM pointers - -plot: ldy CURS_X - ldx CURS_Y - clc - jmp PLOT ; Set the new cursor - - - -; Write one character to the screen without doing anything else, return X -; position in Y - -putchar: - ora RVS ; Set revers bit - ldy CURS_X - sta (SCREEN_PTR),y ; Set char - lda CHARCOLOR - sta (CRAM_PTR),y ; Set color - rts +.include "../plus4/cputc.s" diff --git a/libsrc/c16/crt0.s b/libsrc/c16/crt0.s index c4d179529..1df1e5c62 100644 --- a/libsrc/c16/crt0.s +++ b/libsrc/c16/crt0.s @@ -13,7 +13,6 @@ .importzp ST .include "zeropage.inc" - .include "plus4.inc" ; ------------------------------------------------------------------------ ; Startup code @@ -90,7 +89,7 @@ L2: lda zpsave,x ; ------------------------------------------------------------------------ -.segment "INITBSS" +.segment "INIT" zpsave: .res zpspace diff --git a/libsrc/c16/fast.s b/libsrc/c16/fast.s new file mode 100644 index 000000000..50924edbc --- /dev/null +++ b/libsrc/c16/fast.s @@ -0,0 +1 @@ +.include "../plus4/fast.s" diff --git a/libsrc/c16/get_tv.s b/libsrc/c16/get_tv.s index f6d82a351..1bfe3db97 100644 --- a/libsrc/c16/get_tv.s +++ b/libsrc/c16/get_tv.s @@ -1,27 +1 @@ -; -; Ullrich von Bassewitz, 2002-12-03 -; -; unsigned char __fastcall__ get_tv (void); -; /* Return the video mode the machine is using */ -; - - .include "plus4.inc" - .include "get_tv.inc" - - -;-------------------------------------------------------------------------- -; _get_tv - -.proc _get_tv - - ldx #TV::PAL ; Assume PAL - bit TED_MULTI1 ; Test bit 6 - bvc pal - dex ; NTSC -pal: txa - ldx #0 - rts - -.endproc - - +.include "../plus4/get_tv.s" diff --git a/libsrc/c16/irq.s b/libsrc/c16/irq.s index 46dd75fe8..91dd8c05c 100644 --- a/libsrc/c16/irq.s +++ b/libsrc/c16/irq.s @@ -9,7 +9,7 @@ ; ------------------------------------------------------------------------ -.segment "INIT" +.segment "ONCE" initirq: lda IRQVec diff --git a/libsrc/c16/isfast.s b/libsrc/c16/isfast.s new file mode 100644 index 000000000..036840753 --- /dev/null +++ b/libsrc/c16/isfast.s @@ -0,0 +1 @@ +.include "../plus4/isfast.s" diff --git a/libsrc/c16/kernal.s b/libsrc/c16/kernal.s index 7ba27b62c..5f70123a2 100644 --- a/libsrc/c16/kernal.s +++ b/libsrc/c16/kernal.s @@ -1,9 +1,14 @@ ; ; Ullrich von Bassewitz, 19.11.2002 ; -; C16 kernal functions +; C16 Kernal functions ; + .include "cbm_kernal.inc" + + .export CLRSCR + .export KBDREAD + .export CINT .export IOINIT .export RAMTAS @@ -30,7 +35,9 @@ .export CKOUT .export CLRCH .export BASIN + .export CHRIN .export BSOUT + .export CHROUT .export LOAD .export SAVE .export SETTIM @@ -42,48 +49,3 @@ .export SCREEN .export PLOT .export IOBASE - - -;----------------------------------------------------------------------------- -; All functions are available in the kernal jump table - -CINT = $FF81 -IOINIT = $FF84 -RAMTAS = $FF87 -RESTOR = $FF8A -VECTOR = $FF8D -SETMSG = $FF90 -SECOND = $FF93 -TKSA = $FF96 -MEMTOP = $FF99 -MEMBOT = $FF9C -SCNKEY = $FF9F -SETTMO = $FFA2 -ACPTR = $FFA5 -CIOUT = $FFA8 -UNTLK = $FFAB -UNLSN = $FFAE -LISTEN = $FFB1 -TALK = $FFB4 -READST = $FFB7 -SETLFS = $FFBA -SETNAM = $FFBD -OPEN = $FFC0 -;CLOSE = $FFC3 -CHKIN = $FFC6 -CKOUT = $FFC9 -CLRCH = $FFCC -BASIN = $FFCF -BSOUT = $FFD2 -LOAD = $FFD5 -SAVE = $FFD8 -SETTIM = $FFDB -RDTIM = $FFDE -STOP = $FFE1 -GETIN = $FFE4 -CLALL = $FFE7 -UDTIM = $FFEA -SCREEN = $FFED -PLOT = $FFF0 -IOBASE = $FFF3 - diff --git a/libsrc/c16/mainargs.s b/libsrc/c16/mainargs.s index db93ae2e6..c1d77a0e7 100644 --- a/libsrc/c16/mainargs.s +++ b/libsrc/c16/mainargs.s @@ -32,10 +32,10 @@ MAXARGS = 10 ; Maximum number of arguments allowed REM = $8f ; BASIC token-code NAME_LEN = 16 ; Maximum length of command-name -; Get possible command-line arguments. Goes into the special INIT segment, +; Get possible command-line arguments. Goes into the special ONCE segment, ; which may be reused after the startup code is run -.segment "INIT" +.segment "ONCE" initmainargs: @@ -126,7 +126,7 @@ done: lda #<argv stx __argv + 1 rts -.segment "INITBSS" +.segment "INIT" term: .res 1 name: .res NAME_LEN + 1 diff --git a/libsrc/c16/revers.s b/libsrc/c16/revers.s index f1c0b4d64..3ce668760 100644 --- a/libsrc/c16/revers.s +++ b/libsrc/c16/revers.s @@ -1,27 +1 @@ -; -; Ullrich von Bassewitz, 07.08.1998 -; -; unsigned char revers (unsigned char onoff); -; - - .export _revers - - .include "plus4.inc" - -.proc _revers - - ldx #$00 ; Assume revers off - tay ; Test onoff - beq L1 ; Jump if off - ldx #$80 ; Load on value - ldy #$00 ; Assume old value is zero -L1: lda RVS ; Load old value - stx RVS ; Set new value - beq L2 ; Jump if old value zero - iny ; Make old value = 1 -L2: ldx #$00 ; Load high byte of result - tya ; Load low byte, set CC - rts - -.endproc - +.include "../plus4/revers.s" diff --git a/libsrc/c16/slow.s b/libsrc/c16/slow.s new file mode 100644 index 000000000..70e461a9a --- /dev/null +++ b/libsrc/c16/slow.s @@ -0,0 +1 @@ +.include "../plus4/slow.s" diff --git a/libsrc/c16/status.s b/libsrc/c16/status.s index c6f279230..04d971696 100644 --- a/libsrc/c16/status.s +++ b/libsrc/c16/status.s @@ -1,5 +1 @@ -; -; Oliver Schmidt, 2012-09-30 -; - - .exportzp ST := $90 ; IEC status byte +.include "../plus4/status.s" diff --git a/libsrc/c16/systime.s b/libsrc/c16/systime.s deleted file mode 100644 index 273e394a4..000000000 --- a/libsrc/c16/systime.s +++ /dev/null @@ -1,28 +0,0 @@ -; -; Ullrich von Bassewitz, 12.11.2002 -; -; time_t _systime (void); -; /* Similar to time(), but: -; ** - Is not ISO C -; ** - Does not take the additional pointer -; ** - Does not set errno when returning -1 -; */ -; - - .export __systime - - .importzp sreg - -.code - -.proc __systime - - lda #$FF - tax - sta sreg - sta sreg+1 - rts ; Return -1 - -.endproc - - diff --git a/libsrc/c16/waitvsync.s b/libsrc/c16/waitvsync.s new file mode 100644 index 000000000..c020976b9 --- /dev/null +++ b/libsrc/c16/waitvsync.s @@ -0,0 +1 @@ +.include "../plus4/waitvsync.s" diff --git a/libsrc/c64/acc_c128_speed.s b/libsrc/c64/acc_c128_speed.s new file mode 100644 index 000000000..678f52d0c --- /dev/null +++ b/libsrc/c64/acc_c128_speed.s @@ -0,0 +1,5 @@ +; +; Marco van den Heuvel, 2018-04-23 +; + +.include "../c128/acc_c128_speed.s" diff --git a/libsrc/c64/acc_c64dtv_speed.s b/libsrc/c64/acc_c64dtv_speed.s new file mode 100644 index 000000000..d6cf8b994 --- /dev/null +++ b/libsrc/c64/acc_c64dtv_speed.s @@ -0,0 +1,64 @@ +; +; Marco van den Heuvel, 2018-04-14 +; + +; unsigned char __fastcall__ set_c64dtv_speed (unsigned char speed); +; +;/* Set the speed of the C64DTV, using SPEED_SLOW will switch to +; * slow mode, SPEED_2X or SPEED_FAST will switch to fast mode. +; * +; * Note that any value higher or equal to SPEED_2X will switch to fast mode. +; * +; * This function will return the actual speed the CPU is at after trying +; * to set the requested speed, to my knowledge the switching should not fail. +; * +; * This function does not check for the presence of the C64DTV, +; * make sure you use 'detect_c64dtv();' before using. +; */ + +; unsigned char get_c64dtv_speed (void); +; +;/* Get the speed of the C64DTV. +; * +; * Possible return values: +; * SPEED_1X : slow mode +; * SPEED_2X : fast mode +; * +; * This function does not check for the presence of the C64DTV, +; * make sure you use 'detect_c64dtv();' before using. +; */ + + .export _set_c64dtv_speed + .export _get_c64dtv_speed + + .include "accelerator.inc" + +_set_c64dtv_speed: + cmp #SPEED_2X + bcs high_speed +low_speed: + ldx #C64DTV_Slow +set_speed: + .byte $32,$99 ; SAC #$99 set accumulator to reg 9 (cpu control) + txa ; (re)set skip and burst bits + .byte $32,$00 ; SAC #$00 set accumulator back to reg 0 + jmp _get_c64dtv_speed + +high_speed: + ldx #C64DTV_Fast + bne set_speed + + +_get_c64dtv_speed: + .byte $32,$99 ; SAC #$99 set accumulator to reg 9 (cpu control) + tax + .byte $32,$00 ; SAC #$00 set accumulator back to reg 0 + txa + and #C64DTV_Fast + bne in_fast_mode + lda #$00 + .byte $2C +in_fast_mode: + lda #$01 + ldx #$00 + rts diff --git a/libsrc/c64/acc_c65_speed.s b/libsrc/c64/acc_c65_speed.s new file mode 100644 index 000000000..92f2bac06 --- /dev/null +++ b/libsrc/c64/acc_c65_speed.s @@ -0,0 +1,69 @@ +; +; Marco van den Heuvel, 2018-04-27 +; + +; unsigned char __fastcall__ set_c65_speed (unsigned char speed); +; +;/* Set the speed of the C65 CPU, using SPEED_SLOW will switch to +; * 1 Mhz mode, SPEED_3X or SPEED_FAST will switch to 3.5 Mhz (fast) mode. +; * +; * Note that any value higher or equal to SPEED_3X will switch to fast mode. +; * +; * This function will return the actual speed the CPU is at after trying +; * to set the requested speed, to my knowledge the switching should not fail. +; * +; * This function does not check for the presence of a C65/C64DX in C64 mode, +; * make sure you use 'detect_c65();' before using. +; */ + +; unsigned char get_c65_speed (void); +; +;/* Get the speed of the C65 CPU. +; * +; * Possible return values: +; * SPEED_SLOW : 1 Mhz mode +; * SPEED_3X : 3.5 Mhz mode +; * +; * This function does not check for the presence of a C65/C64DX in C64 mode, +; * make sure you use 'detect_c65();' before using. +; */ + + .export _set_c65_speed + .export _get_c65_speed + + .include "accelerator.inc" + +_set_c65_speed: + tay + jsr activate_new_vic_mode + cpy #SPEED_3X + bcs high_speed +low_speed: + and #$BF +store_speed: + sta C65_VICIII_CTRL_B + lda C65_VICIII_CTRL_B + jmp return_c65_speed + +high_speed: + ora #$40 + bne store_speed + +_get_c65_speed: + jsr activate_new_vic_mode +return_c65_speed: + sta C65_VICIII_KEY + and #$40 + beq speed_is_slow ; when this branch is taken then register A is already set to SPEED_SLOW + lda #SPEED_3X +speed_is_slow: + ldx #$00 + rts + +activate_new_vic_mode: + lda #C65_VICIII_UNLOCK_1 + sta C65_VICIII_KEY + lda #C65_VICIII_UNLOCK_2 + sta C65_VICIII_KEY + lda C65_VICIII_CTRL_B + rts diff --git a/libsrc/c64/acc_chameleon_speed.s b/libsrc/c64/acc_chameleon_speed.s new file mode 100644 index 000000000..f73fddd01 --- /dev/null +++ b/libsrc/c64/acc_chameleon_speed.s @@ -0,0 +1,100 @@ +; +; Marco van den Heuvel, 2018-04-25 +; + +; unsigned char __fastcall__ set_chameleon_speed (unsigned char speed); +; +;/* Set the speed of the Chameleon cartridge, the following inputs +; * are accepted: +; * SPEED_SLOW : 1 Mhz mode +; * SPEED_1X : 1 Mhz mode +; * SPEED_2X : 2 Mhz mode +; * SPEED_3X : 3 Mhz mode +; * SPEED_4X : 4 Mhz mode +; * SPEED_5X : 5 Mhz mode +; * SPEED_6X : 6 Mhz mode +; * SPEED_FAST : Maximum speed mode +; * +; * Note that any value higher or equal to SPEED_7X will switch to maximum +; * speed mode. +; * +; * This function will return the actual speed the CPU is at after trying +; * to set the requested speed, to my knowledge the switching should not fail. +; * +; * This function does not check for the presence of the Chameleon cartridge, +; * make sure you use 'detect_chameleon();' before using. +; */ + +; unsigned char get_chameleon_speed (void); +; +;/* Get the speed of the Chameleon cartridge. +; * +; * Possible return values: +; * SPEED_SLOW : Slow mode +; * SPEED_2X : 2Mhz mode +; * SPEED_3X : 3Mhz mode +; * SPEED_4X : 4Mhz mode +; * SPEED_5X : 5Mhz mode +; * SPEED_6X : 6Mhz mode +; * SPEED_FAST : Maximum speed mode +; * +; * This function does not check for the presence of the Chameleon cartridge, +; * make sure you use 'detect_chameleon();' before using. +; */ + + .export _set_chameleon_speed + .export _get_chameleon_speed + + .include "accelerator.inc" + +_set_chameleon_speed: + cmp #SPEED_7X + bcs maximum_speed + cmp #SPEED_1X + beq low_speed + ora #$80 +set_speed: + jsr activate_regs + sta CHAMELEON_CFGTUR + jmp return_speed + +low_speed: + lda #CHAMELEON_CFGTUR_LIMIT_1MHZ + bne set_speed + +maximum_speed: + lda #CHAMELEON_CFGTUR_LIMIT_NONE + bne set_speed + +_get_chameleon_speed: + jsr activate_regs +return_speed: + ldx #$00 + lda CHAMELEON_CFGTUR + tay + and #%10000000 + beq return_value + tya + and #%00001000 + bne is_slow_mode + tya + and #%00000111 + beq is_max_mode +return_value: + ldy #CHAMELEON_DISABLE_REGS + sty CHAMELEON_CFGENA + rts + +is_slow_mode: + txa + bne return_value + +is_max_mode: + lda #SPEED_FAST + bne return_value + +activate_regs: + ldy #CHAMELEON_ENABLE_REGS + sty CHAMELEON_CFGENA + rts + diff --git a/libsrc/c64/acc_detect_c128.s b/libsrc/c64/acc_detect_c128.s new file mode 100644 index 000000000..12817001a --- /dev/null +++ b/libsrc/c64/acc_detect_c128.s @@ -0,0 +1,33 @@ +; +; 2018-04-20, Marco van den Heuvel +; 2018-04-26, Greg King +; + +; unsigned char detect_c128 (void); +; +;/* Check for the presence of a C128 in C64 mode. +; * +; * Possible return values: +; * 0x00 : C128 in C64 mode not present +; * 0x01 : C128 in C64 mode present +; */ + + .export _detect_c128 + + .include "accelerator.inc" + +_detect_c128: + ldx #>$0001 + lda #<$0001 + +; Make sure the CPU is an 8502. + .byte $3A ; NOP on 8502, DEA on 65(S)C(E)02, 4510, and 65816 + beq detect_end + +; Make sure a C128 VIC-IIe is present. + ldy C128_VICIIE_CLK + cpy #$FF + bne detect_end + txa ; return zero when not VIC-IIe +detect_end: + rts diff --git a/libsrc/c64/acc_detect_c64dtv.s b/libsrc/c64/acc_detect_c64dtv.s new file mode 100644 index 000000000..1734095b1 --- /dev/null +++ b/libsrc/c64/acc_detect_c64dtv.s @@ -0,0 +1,44 @@ +; +; Marco van den Heuvel, 2018-04-14 +; + +; unsigned char detect_c64dtv (void); +; +;/* Check for the presence of the C64DTV. +; * +; * Possible return values: +; * 0x00 : C64DTV not present +; * 0x01 : C64DTV present +; */ + + .export _detect_c64dtv + + .include "accelerator.inc" + +_detect_c64dtv: + ldy C64DTV_Extended_Regs + lda #$00 + ldx $D000 + +; Make sure the CPU is a 6510 + .byte $1A ; NOP on 8502, INA on 65(S)C(E)02, 4510 and 65816 + bne not_found + lda #$01 + sta C64DTV_Extended_Regs + +; Check if $D000 is mirrored at $D040 + cpx $D040 + bne found + inc $D000 + cpx $D040 + bne not_found +found: + lda #$01 + .byte $2C +not_found: + lda #$00 + stx $D000 + ldx #$00 + sty C64DTV_Extended_Regs + rts + diff --git a/libsrc/c64/acc_detect_c65.s b/libsrc/c64/acc_detect_c65.s new file mode 100644 index 000000000..6d8af3c01 --- /dev/null +++ b/libsrc/c64/acc_detect_c65.s @@ -0,0 +1,55 @@ +; +; Marco van den Heuvel, 2018-04-27 +; + +; unsigned char detect_c65 (void); +; +;/* Check for the presence of a C65/C64DX in C64 mode. +; * +; * Possible return values: +; * 0x00 : C65/C64DX in C64 mode not present +; * 0x01 : C65/C64DX in C64 mode present +; */ + + .export _detect_c65 + + .include "accelerator.inc" + +_detect_c65: + ldy $D000 + +; Make sure the CPU is not a 65816 + clc + .byte $E2,$01 ; NOP #$01 on 6510 and 65(S)C02, LDA $(01,S),Y on 65CE02 and 4510, SEP #$01 on 65816 + lda #$00 + tax + bcs not_found ; carry will be set on 65816 + +; Make sure the CPU is not a 6510 + .byte $1A ; NOP on 6510, INA on 65(S)C(E)02 + beq not_found + txa + +; Make sure the CPU is a 65CE02/4510 + .byte $A3,$A3 ; NOP NOP on 65(S)C02, LDZ #$A3 on 65CE02 and 4510 + .byte $6B ; NOP on 65(S)C02, TZA on 65CE02 and 4510 + cmp #$A3 + bne not_found + +; Switch to VICIII mode and check if $D040 is a mirror of $D000 + ldy #C65_VICIII_UNLOCK_1 + sty C65_VICIII_KEY + ldy #C65_VICIII_UNLOCK_2 + sty C65_VICIII_KEY + cpy $D040 + bne found + inc $D000 + cpy $D040 + bne not_found + +found: + lda #$01 +not_found: + sty $D000 + sta C65_VICIII_KEY + rts diff --git a/libsrc/c64/acc_detect_chameleon.s b/libsrc/c64/acc_detect_chameleon.s new file mode 100644 index 000000000..a16a264e7 --- /dev/null +++ b/libsrc/c64/acc_detect_chameleon.s @@ -0,0 +1,39 @@ +; +; Marco van den Heuvel, 2018-04-25 +; + +; unsigned char detect_chameleon (void); +; +;/* Check for the presence of the Chameleon cartridge. +; * +; * Possible return values: +; * 0x00 : Chameleon cartridge not present +; * 0x01 : Chameleon cartridge present +; */ + + .export _detect_chameleon + + .include "accelerator.inc" + +_detect_chameleon: + lda #$00 + tax + +; Make sure the CPU is a 6510 + .byte $1A ; NOP on 6510, INA on 65(S)C(E)02, 4510 and 65816 + bne not_found + + ldy CHAMELEON_CFGENA + lda #CHAMELEON_ENABLE_REGS + sta CHAMELEON_CFGENA + lda CHAMELEON_CFGENA + sty CHAMELEON_CFGENA + cmp #$FF + beq not_found +found: + lda #$01 + .byte $24 +not_found: + txa + rts + diff --git a/libsrc/c64/acc_detect_scpu.s b/libsrc/c64/acc_detect_scpu.s new file mode 100644 index 000000000..e42d90548 --- /dev/null +++ b/libsrc/c64/acc_detect_scpu.s @@ -0,0 +1,34 @@ +; +; Marco van den Heuvel, 2018-04-08 +; + +; unsigned char detect_scpu (void); +; +;/* Check for the presence of the SuperCPU cartridge. +; * +; * Possible return values: +; * 0x00 : SuperCPU cartridge not present +; * 0x01 : SuperCPU cartridge present +; */ + + .export _detect_scpu + + .include "accelerator.inc" +_detect_scpu: + ldx #$00 + txa + +; Make sure the current CPU is a 65816 + clc + .byte $E2,$01 ; NOP #$01 on 6510 and 65(S)C02, LDA $(01,S),Y on 65CE02 and 4510, SEP #$01 on 65816 + bcc not_found ; carry will be set on 65816 + +; 65816 has been detected, make sure it's the SuperCPU cartridge + + lda SuperCPU_Detect + asl + bcs not_found +found: + lda #$01 +not_found: + rts diff --git a/libsrc/c64/acc_detect_turbomaster.s b/libsrc/c64/acc_detect_turbomaster.s new file mode 100644 index 000000000..431985a47 --- /dev/null +++ b/libsrc/c64/acc_detect_turbomaster.s @@ -0,0 +1,45 @@ +; +; Marco van den Heuvel, 2018-04-30 +; + +; unsigned char detect_turbomaster (void); +; +;/* Check for the presence of a Turbo Master cartridge. +; * +; * Possible return values: +; * 0x00 : TurboMaster cartridge not present +; * 0x01 : TurboMaster cartridge present +; */ + + .export _detect_turbomaster + + .include "accelerator.inc" + +_detect_turbomaster: + lda #$00 + tax + +; Make sure the current CPU is not a 6510 + .byte $1A ; NOP on 8502, INA on 65(S)C(E)02, 4510 and 65816 + beq not_found + +; Make sure the current CPU is not a 65816 + clc + .byte $E2,$01 ; NOP #$01 on 65(S)C02, LDA $(01,S),Y on 65CE02 and 4510, SEP #$01 on 65816 + bcs not_found ; carry will be set on 65816 + +; Make sure the current CPU is not a 65CE02/4510 + .byte $A3,$A3 ; NOP NOP on 65(S)C02 and LDZ #$00 on 65CE02 and 4510 + .byte $6B ; NOP on 65(S)C02 and TZA on 65CE02 and 4510 + cmp #$A3 + beq not_found + +; Check for turbo master basic replacement + ldy TURBOMASTER_DETECT + cpy #$A2 + beq found +not_found: + txa +found: + rts + diff --git a/libsrc/c64/acc_scpu_speed.s b/libsrc/c64/acc_scpu_speed.s new file mode 100644 index 000000000..9f932aecd --- /dev/null +++ b/libsrc/c64/acc_scpu_speed.s @@ -0,0 +1,59 @@ +; +; Marco van den Heuvel, 2018-04-09 +; + +; unsigned char __fastcall__ set_scpu_speed (unsigned char speed); +; +;/* Set the speed of the SuperCPU cartridge, using SPEED_SLOW will switch to +; * 1 Mhz mode, SPEED_20X or SPEED_FAST will switch to 20 Mhz mode. +; * +; * Note that any value lower than SPEED_20X will switch to 1 Mhz mode, and +; * any value higher or equal to SPEED_20X will switch to 20 Mhz mode. +; * +; * This function will return the actual speed the CPU is at after trying +; * to set the requested speed, if this is not the speed that was requested +; * then possibly the hardware speed switch prevented any software speed +; * switching. +; * +; * This function does not check for the presence of the SuperCPU cartridge, +; * make sure you use 'detect_scpu();' before using. +; */ + +; unsigned char get_scpu_speed (void); +; +;/* Get the speed of the SuperCPU cartridge. +; * +; * Possible return values: +; * SPEED_1X : 1 Mhz mode +; * SPEED_20X : 20 Mhz mode +; * +; * This function does not check for the presence of the SuperCPU cartridge, +; * make sure you use 'detect_scpu();' before using. +; */ + + .export _set_scpu_speed + .export _get_scpu_speed + + .include "accelerator.inc" + +_set_scpu_speed: + cmp #SPEED_20X + bcs high_speed +low_speed: + sta SuperCPU_Slow + jmp _get_scpu_speed + +high_speed: + sta SuperCPU_Fast + +_get_scpu_speed: + ldx #$00 + lda SuperCPU_Speed_Mode + asl + asl + bcc is_fast_speed + lda #SPEED_1X + rts +is_fast_speed: + lda #SPEED_20X + rts diff --git a/libsrc/c64/acc_turbomaster_speed.s b/libsrc/c64/acc_turbomaster_speed.s new file mode 100644 index 000000000..7ef6b0540 --- /dev/null +++ b/libsrc/c64/acc_turbomaster_speed.s @@ -0,0 +1,56 @@ +; +; Marco van den Heuvel, 2018-04-30 +; + +; unsigned char __fastcall__ set_turbomaster_speed (unsigned char speed); +; +;/* Set the speed of the Turbo Master cartridge, using SPEED_SLOW will switch to +; * 1 Mhz mode, SPEED_4X or SPEED_FAST will switch to 4 Mhz mode. +; * +; * Note that any value higher or equal to SPEED_4X will switch to 4 Mhz mode, +; * any value lower than SPEED_4X will switch to 1 Mhz mode. +; * +; * This function will return the actual speed the CPU is at after trying +; * to set the requested speed, if the speed is different it might indicate +; * that the hardware switch has locked the speed. +; * +; * This function does not check for the presence of a Turbo Master cartridge, +; * make sure you use 'detect_turbomaster();' before using. +; */ + +; unsigned char get_turbomaster_speed (void); +; +;/* Get the speed of the Turbo Master cartridge. +; * +; * Possible return values: +; * SPEED_SLOW : 1 Mhz mode +; * SPEED_4X : 4 Mhz mode +; * +; * This function does not check for the presence of a Turbo Master cartridge, +; * make sure you use 'detect_turbomaster();' before using. +; */ + + .export _set_turbomaster_speed + .export _get_turbomaster_speed + + .include "accelerator.inc" + +_set_turbomaster_speed: + tay + lda TURBOMASTER_SPEED_REG + asl + cpy #SPEED_4X + ror +store_speed: + sta TURBOMASTER_SPEED_REG + +_get_turbomaster_speed: + ldx #$00 + lda TURBOMASTER_SPEED_REG + and #$80 + beq is_slow_speed +is_high_speed: + lda #SPEED_4X +is_slow_speed: + rts + diff --git a/libsrc/c64/break.s b/libsrc/c64/break.s index 1c44c59a0..63fab707f 100644 --- a/libsrc/c64/break.s +++ b/libsrc/c64/break.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 27.09.1998 ; -; void set_brk (unsigned Addr); +; void __fastcall__ set_brk (unsigned Addr); ; void reset_brk (void); ; diff --git a/libsrc/c64/cgetc.s b/libsrc/c64/cgetc.s index 042f99fd3..58008990b 100644 --- a/libsrc/c64/cgetc.s +++ b/libsrc/c64/cgetc.s @@ -7,6 +7,7 @@ .export _cgetc .import cursor + .include "cbm_kernal.inc" .include "c64.inc" _cgetc: lda KEY_COUNT ; Get number of characters diff --git a/libsrc/c64/clrscr.s b/libsrc/c64/clrscr.s index 396828847..a3c519cb1 100644 --- a/libsrc/c64/clrscr.s +++ b/libsrc/c64/clrscr.s @@ -6,9 +6,6 @@ .export _clrscr - .include "c64.inc" + .include "cbm_kernal.inc" _clrscr = CLRSCR - - - diff --git a/libsrc/c64/cputc.s b/libsrc/c64/cputc.s index 606d6f596..b893f2102 100644 --- a/libsrc/c64/cputc.s +++ b/libsrc/c64/cputc.s @@ -7,7 +7,7 @@ .export _cputcxy, _cputc, cputdirect, putchar .export newline, plot - .import popa, _gotoxy + .import gotoxy .import PLOT .include "c64.inc" @@ -15,8 +15,7 @@ _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C ; Plot a character - also used as internal function @@ -75,10 +74,9 @@ L5: inc CURS_Y ; Handle character if high bit set L10: and #$7F - cmp #$7E ; PI? + cmp #$7F ; PI? bne L11 lda #$5E ; Load screen code for PI - bne cputdirect L11: ora #$40 bne cputdirect diff --git a/libsrc/c64/crt0.s b/libsrc/c64/crt0.s index 78268422b..4e5c7c9d4 100644 --- a/libsrc/c64/crt0.s +++ b/libsrc/c64/crt0.s @@ -6,14 +6,13 @@ .export __STARTUP__ : absolute = 1 ; Mark as startup .import initlib, donelib - .import moveinit, zerobss, callmain + .import zerobss, callmain .import BSOUT .import __MAIN_START__, __MAIN_SIZE__ ; Linker generated .import __STACKSIZE__ ; from configure file .importzp ST .include "zeropage.inc" - .include "c64.inc" ; ------------------------------------------------------------------------ @@ -23,11 +22,6 @@ Start: -; Switch to the second charset. - - lda #14 - jsr BSOUT - ; Switch off the BASIC ROM. lda $01 @@ -39,22 +33,10 @@ Start: tsx stx spsave ; Save the system stack ptr -; Allow some re-entrancy by skipping the next task if it already was done. -; This sometimes can let us rerun the program without reloading it. - - ldx move_init - beq L0 - -; Move the INIT segment from where it was loaded (over the bss segments) -; into where it must be run (over the BSS segment). - - jsr moveinit - dec move_init ; Set to false - -; Save space by putting some of the start-up code in the INIT segment, +; Save space by putting some of the start-up code in the ONCE segment, ; which can be re-used by the BSS segment, the heap and the C stack. -L0: jsr runinit + jsr init ; Clear the BSS data. @@ -96,9 +78,9 @@ L2: lda zpsave,x ; ------------------------------------------------------------------------ -.segment "INIT" +.segment "ONCE" -runinit: +init: ; Save the zero-page locations that we need. @@ -110,11 +92,16 @@ L1: lda sp,x ; Set up the stack. - lda #<(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) - ldx #>(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) + lda #<(__MAIN_START__ + __MAIN_SIZE__) + ldx #>(__MAIN_START__ + __MAIN_SIZE__) sta sp stx sp+1 ; Set argument stack ptr +; Switch to the second charset. + + lda #14 + jsr BSOUT + ; Call the module constructors. jmp initlib @@ -123,17 +110,8 @@ L1: lda sp,x ; ------------------------------------------------------------------------ ; Data -.data - -; These two variables were moved out of the BSS segment, and into DATA, because -; we need to use them before INIT is moved off of BSS, and before BSS is zeroed. +.segment "INIT" mmusave:.res 1 spsave: .res 1 - -move_init: - .byte 1 - -.segment "INITBSS" - zpsave: .res zpspace diff --git a/libsrc/c64/emd/c64-65816.s b/libsrc/c64/emd/c64-65816.s index bf44a0ecc..39f323d28 100644 --- a/libsrc/c64/emd/c64-65816.s +++ b/libsrc/c64/emd/c64-65816.s @@ -1,376 +1,376 @@ -; -; Extended memory driver for 65816 based extra RAM. Driver works without -; problems when statically linked. -; -; Marco van den Heuvel, 2015-12-01 -; - - .include "zeropage.inc" - - .include "em-kernel.inc" - .include "em-error.inc" - - - .macpack generic - .macpack module - - -; ------------------------------------------------------------------------ -; Header. Includes jump table - - module_header _c64_65816_emd - -; Driver signature - - .byte $65, $6d, $64 ; "emd" - .byte EMD_API_VERSION ; EM API version number - -; Library reference - - .addr $0000 - -; Jump table - - .addr INSTALL - .addr UNINSTALL - .addr PAGECOUNT - .addr MAP - .addr USE - .addr COMMIT - .addr COPYFROM - .addr COPYTO - -; ------------------------------------------------------------------------ -; Data. - -.bss -isnotscpu: .res 1 ; SuperCPU not present -curpage: .res 1 ; Current page number -curbank: .res 1 ; Current bank number (+1) -bankcount: .res 1 ; Number of available banks (pages = banks * 256) -window: .res 256 ; Memory "window" - -.code - -; ------------------------------------------------------------------------ -; INSTALL routine. Is called after the driver is loaded into memory. If -; possible, check if the hardware is present and determine the amount of -; memory available. -; Must return an EM_ERR_xx code in a/x. -; - -INSTALL: - sei - clc - sed - lda #$99 - adc #$01 ; on 65C02, 65SC02, 65CE02, 65802 and 65816 sets the zero flag correctly - cld - bne @not_present - clc -.P816 - sep #$01 ; nop #$01 on 65C02/65SC02 and lda ($01,s),y on 65CE02 -.P02 - bcc @not_present - lda $d0bc - and #$80 - sta isnotscpu - lda $07e8 - pha ; save value incase it was used somewhere else - ldx #$ff -@fillloop: ; fill from top (bank 255) to bottom - txa - pha -.P816 - plb ; pull dbr -.P02 - stx $07e8 - dex - cpx #$ff - bne @fillloop - inx -@compareloop: ; check from bottom to top - txa - pha -.P816 - plb -.P02 - cmp $07e8 - bne @found_pages -.P816 - inc -.P02 - sta $07e8 - cmp $07e8 - bne @found_pages - inx - bne @compareloop -@found_pages: - dex - lda #$00 - pha -.P816 - plb -.P02 - pla - sta $07e8 - cli - lda isnotscpu - bne @noextradex - dex -@noextradex: - stx bankcount - lda #<EM_ERR_OK - ldx #>EM_ERR_OK - rts -@not_present: - cli - lda #<EM_ERR_NO_DEVICE - ldx #>EM_ERR_NO_DEVICE -; rts ; Run into UNINSTALL instead - - -; ------------------------------------------------------------------------ -; UNINSTALL routine. Is called before the driver is removed from memory. -; Can do cleanup or whatever. Must not return anything. -; - -UNINSTALL: - rts - - -; ------------------------------------------------------------------------ -; PAGECOUNT: Return the total number of available pages in a/x. -; - -PAGECOUNT: - lda #$00 ; a whole bank is either usable or not - ldx bankcount - rts - -; ------------------------------------------------------------------------ -; MAP: Map the page in a/x into memory and return a pointer to the page in -; a/x. The contents of the currently mapped page (if any) may be discarded -; by the driver. -; - -MAP: sta curpage ; Remember the new page - stx curbank ; Remember the new bank - - sta ptr2+1 ; src address low - lda #$00 - sta ptr2 ; src address high - inx - ldy isnotscpu ; check if not scpu - bne @notscpu - inx -@notscpu: - stx tmp2 ; src bank - - sta tmp1 ; dst bank - - sta ptr3+1 ; length high - lda #$ff - sta ptr3 ; length low - - lda #<window - sta ptr1 ; dst address low - ldx #>window - stx ptr1+1 ; dst address high - - jsr transfer - - rts - -; ------------------------------------------------------------------------ -; USE: Tell the driver that the window is now associated with a given page. - -USE: sta curpage ; Remember the page - stx curbank ; Remember the bank - lda #<window - ldx #>window ; Return the window - rts - -; ------------------------------------------------------------------------ -; COMMIT: Commit changes in the memory window to extended storage. - -COMMIT: lda curpage ; Get the current page - sta ptr1+1 ; dst high - ldx #$00 - stx ptr1 ; dst low - - lda #<window - sta ptr2 ; src low - lda #>window - sta ptr2+1 ; src high - - stx ptr3+1 ; length high - lda #$ff - sta ptr3 ; length low - - stx tmp2 ; src bank - ldy curbank ; Get the current bank - iny - ldx isnotscpu - bne @notascpu - iny -@notascpu: - sty tmp1 ; dst bank - - jsr transfer - - rts - -; ------------------------------------------------------------------------ -; COPYFROM: Copy from extended into linear memory. A pointer to a structure -; describing the request is passed in a/x. -; The function must not return anything. -; - -COPYFROM: - sta ptr4 - stx ptr4+1 ; Save the passed em_copy pointer - - ldy #EM_COPY::COUNT+1 ; start at the end of the struct - lda (ptr4),y ; get high byte of count - tax - dey - lda (ptr4),y ; get low byte of count - bne @nodex - dex -@nodex: -.P816 - dec -.P02 - sta ptr3 ; length low - stx ptr3+1 ; length high - dey - lda (ptr4),y ; get bank -.P816 - inc -.P02 - ldx isnotscpu - bne @notscpu64 -.P816 - inc -.P02 -@notscpu64: - sta tmp2 ; src bank - dey - lda (ptr4),y ; get page - sta ptr2+1 ; src high - dey - lda (ptr4),y ; get offset in page - sta ptr2 ; src low - dey - lda (ptr4),y ; get memory buffer high - sta ptr1+1 ; dst high - dey - lda (ptr4),y ; get memory buffer low - sta ptr1 ; dst low - lda #$00 - sta tmp1 ; dst bank - - jsr transfer - - rts - -; ------------------------------------------------------------------------ -; COPYTO: Copy from linear into extended memory. A pointer to a structure -; describing the request is passed in a/x. -; The function must not return anything. -; - -COPYTO: sta ptr4 - stx ptr4+1 ; Save the passed em_copy pointer - - ldy #EM_COPY::COUNT+1 ; start at the end of the struct - lda (ptr4),y ; get high byte of count - tax - dey - lda (ptr4),y ; get low byte of count - bne @nodex2 - dex -@nodex2: -.P816 - dec -.P02 - sta ptr3 ; length low - txa - sta ptr3+1 ; length high - dey - lda (ptr4),y ; get bank -.P816 - inc -.P02 - ldx isnotscpu - bne @notascpu64 -.P816 - inc -.P02 -@notascpu64: - sta tmp1 ; dst bank - dey - lda (ptr4),y ; get page - sta ptr1+1 ; dst high - dey - lda (ptr4),y ; get page offset - sta ptr1 ; dst low - dey - lda (ptr4),y ; get memory buffer high - sta ptr2+1 ; src low - dey - lda (ptr4),y ; get memory buffer low - sta ptr2 ; src high - lda #$00 - sta tmp2 ; src bank - - jsr transfer - - rts - -; ------------------------------------------------------------------------ -; Helper function for moving a block, the following is used: -; ptr1: dst -; ptr2: src -; ptr3: length -; tmp1: dst bank -; tmp2: src bank - -transfer: -.P816 -.A8 -.I8 - sei - pha - phx - phy - ldx tmp1 ; load srcbank - stx @move+1 ; store srcbank in move + 1 - ldy tmp2 ; load dstbank - sty @move+2 ; store dstbank in move + 2 - clc ; switch to native mode - xce - php ; save status bits - rep #%00110000 ; set A and index to 16bit -.A16 -.I16 - ldy ptr1 - ldx ptr2 - lda ptr3 -@move: - mvn 0,0 - plp ; restore status bits -.A8 -.I8 - lda #$00 - pha - plb ; restore dbr - sec - xce ; switch to emul mode - ply - plx - pla - cli - rts -.P02 +; +; Extended memory driver for 65816 based extra RAM. Driver works without +; problems when statically linked. +; +; Marco van den Heuvel, 2015-12-01 +; + + .include "zeropage.inc" + + .include "em-kernel.inc" + .include "em-error.inc" + + + .macpack generic + .macpack module + + +; ------------------------------------------------------------------------ +; Header. Includes jump table + + module_header _c64_65816_emd + +; Driver signature + + .byte $65, $6d, $64 ; "emd" + .byte EMD_API_VERSION ; EM API version number + +; Library reference + + .addr $0000 + +; Jump table + + .addr INSTALL + .addr UNINSTALL + .addr PAGECOUNT + .addr MAP + .addr USE + .addr COMMIT + .addr COPYFROM + .addr COPYTO + +; ------------------------------------------------------------------------ +; Data. + +.bss +isnotscpu: .res 1 ; SuperCPU not present +curpage: .res 1 ; Current page number +curbank: .res 1 ; Current bank number (+1) +bankcount: .res 1 ; Number of available banks (pages = banks * 256) +window: .res 256 ; Memory "window" + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. If +; possible, check if the hardware is present and determine the amount of +; memory available. +; Must return an EM_ERR_xx code in a/x. +; + +INSTALL: + sei + clc + sed + lda #$99 + adc #$01 ; on 65C02, 65SC02, 65CE02, 65802 and 65816 sets the zero flag correctly + cld + bne @not_present + clc +.P816 + sep #$01 ; nop #$01 on 65C02/65SC02 and lda ($01,s),y on 65CE02 +.P02 + bcc @not_present + lda $d0bc + and #$80 + sta isnotscpu + lda $07e8 + pha ; save value incase it was used somewhere else + ldx #$ff +@fillloop: ; fill from top (bank 255) to bottom + txa + pha +.P816 + plb ; pull dbr +.P02 + stx $07e8 + dex + cpx #$ff + bne @fillloop + inx +@compareloop: ; check from bottom to top + txa + pha +.P816 + plb +.P02 + cmp $07e8 + bne @found_pages +.P816 + inc +.P02 + sta $07e8 + cmp $07e8 + bne @found_pages + inx + bne @compareloop +@found_pages: + dex + lda #$00 + pha +.P816 + plb +.P02 + pla + sta $07e8 + cli + lda isnotscpu + bne @noextradex + dex +@noextradex: + stx bankcount + lda #<EM_ERR_OK + ldx #>EM_ERR_OK + rts +@not_present: + cli + lda #<EM_ERR_NO_DEVICE + ldx #>EM_ERR_NO_DEVICE +; rts ; Run into UNINSTALL instead + + +; ------------------------------------------------------------------------ +; UNINSTALL routine. Is called before the driver is removed from memory. +; Can do cleanup or whatever. Must not return anything. +; + +UNINSTALL: + rts + + +; ------------------------------------------------------------------------ +; PAGECOUNT: Return the total number of available pages in a/x. +; + +PAGECOUNT: + lda #$00 ; a whole bank is either usable or not + ldx bankcount + rts + +; ------------------------------------------------------------------------ +; MAP: Map the page in a/x into memory and return a pointer to the page in +; a/x. The contents of the currently mapped page (if any) may be discarded +; by the driver. +; + +MAP: sta curpage ; Remember the new page + stx curbank ; Remember the new bank + + sta ptr2+1 ; src address low + lda #$00 + sta ptr2 ; src address high + inx + ldy isnotscpu ; check if not scpu + bne @notscpu + inx +@notscpu: + stx tmp2 ; src bank + + sta tmp1 ; dst bank + + sta ptr3+1 ; length high + lda #$ff + sta ptr3 ; length low + + lda #<window + sta ptr1 ; dst address low + ldx #>window + stx ptr1+1 ; dst address high + + jsr transfer + + rts + +; ------------------------------------------------------------------------ +; USE: Tell the driver that the window is now associated with a given page. + +USE: sta curpage ; Remember the page + stx curbank ; Remember the bank + lda #<window + ldx #>window ; Return the window + rts + +; ------------------------------------------------------------------------ +; COMMIT: Commit changes in the memory window to extended storage. + +COMMIT: lda curpage ; Get the current page + sta ptr1+1 ; dst high + ldx #$00 + stx ptr1 ; dst low + + lda #<window + sta ptr2 ; src low + lda #>window + sta ptr2+1 ; src high + + stx ptr3+1 ; length high + lda #$ff + sta ptr3 ; length low + + stx tmp2 ; src bank + ldy curbank ; Get the current bank + iny + ldx isnotscpu + bne @notascpu + iny +@notascpu: + sty tmp1 ; dst bank + + jsr transfer + + rts + +; ------------------------------------------------------------------------ +; COPYFROM: Copy from extended into linear memory. A pointer to a structure +; describing the request is passed in a/x. +; The function must not return anything. +; + +COPYFROM: + sta ptr4 + stx ptr4+1 ; Save the passed em_copy pointer + + ldy #EM_COPY::COUNT+1 ; start at the end of the struct + lda (ptr4),y ; get high byte of count + tax + dey + lda (ptr4),y ; get low byte of count + bne @nodex + dex +@nodex: +.P816 + dec +.P02 + sta ptr3 ; length low + stx ptr3+1 ; length high + dey + lda (ptr4),y ; get bank +.P816 + inc +.P02 + ldx isnotscpu + bne @notscpu64 +.P816 + inc +.P02 +@notscpu64: + sta tmp2 ; src bank + dey + lda (ptr4),y ; get page + sta ptr2+1 ; src high + dey + lda (ptr4),y ; get offset in page + sta ptr2 ; src low + dey + lda (ptr4),y ; get memory buffer high + sta ptr1+1 ; dst high + dey + lda (ptr4),y ; get memory buffer low + sta ptr1 ; dst low + lda #$00 + sta tmp1 ; dst bank + + jsr transfer + + rts + +; ------------------------------------------------------------------------ +; COPYTO: Copy from linear into extended memory. A pointer to a structure +; describing the request is passed in a/x. +; The function must not return anything. +; + +COPYTO: sta ptr4 + stx ptr4+1 ; Save the passed em_copy pointer + + ldy #EM_COPY::COUNT+1 ; start at the end of the struct + lda (ptr4),y ; get high byte of count + tax + dey + lda (ptr4),y ; get low byte of count + bne @nodex2 + dex +@nodex2: +.P816 + dec +.P02 + sta ptr3 ; length low + txa + sta ptr3+1 ; length high + dey + lda (ptr4),y ; get bank +.P816 + inc +.P02 + ldx isnotscpu + bne @notascpu64 +.P816 + inc +.P02 +@notascpu64: + sta tmp1 ; dst bank + dey + lda (ptr4),y ; get page + sta ptr1+1 ; dst high + dey + lda (ptr4),y ; get page offset + sta ptr1 ; dst low + dey + lda (ptr4),y ; get memory buffer high + sta ptr2+1 ; src low + dey + lda (ptr4),y ; get memory buffer low + sta ptr2 ; src high + lda #$00 + sta tmp2 ; src bank + + jsr transfer + + rts + +; ------------------------------------------------------------------------ +; Helper function for moving a block, the following is used: +; ptr1: dst +; ptr2: src +; ptr3: length +; tmp1: dst bank +; tmp2: src bank + +transfer: +.P816 +.A8 +.I8 + sei + pha + phx + phy + ldx tmp1 ; load srcbank + stx @move+1 ; store srcbank in move + 1 + ldy tmp2 ; load dstbank + sty @move+2 ; store dstbank in move + 2 + clc ; switch to native mode + xce + php ; save status bits + rep #%00110000 ; set A and index to 16bit +.A16 +.I16 + ldy ptr1 + ldx ptr2 + lda ptr3 +@move: + mvn 0,0 + plp ; restore status bits +.A8 +.I8 + lda #$00 + pha + plb ; restore dbr + sec + xce ; switch to emul mode + ply + plx + pla + cli + rts +.P02 diff --git a/libsrc/c64/emd/c64-kerberos.s b/libsrc/c64/emd/c64-kerberos.s new file mode 100644 index 000000000..30183362f --- /dev/null +++ b/libsrc/c64/emd/c64-kerberos.s @@ -0,0 +1,280 @@ +; Extended Memory Driver for the Kerberos MIDI interface. +; http://www.frank-buss.de/kerberos/ +; based on the code for RamCart 64/128KB cartridge. +; 2020-06-16 Dirk Jagdmann <doj@cubic.org> + + .include "zeropage.inc" + .include "em-kernel.inc" + .include "em-error.inc" + + .macpack generic + .macpack module + +; ------------------------------------------------------------------------ +; Header. Includes jump table + + module_header _c64_kerberos_emd + +; Driver signature + + .byte $65, $6d, $64 ; "emd" + .byte EMD_API_VERSION ; EM API version number + +; Library reference + + .addr $0000 + +; Jump table + + .addr INSTALL + .addr UNINSTALL + .addr PAGECOUNT + .addr MAP + .addr USE + .addr COMMIT + .addr COPYFROM + .addr COPYTO + +; ------------------------------------------------------------------------ +; Constants + +RAMC_WINDOW = $DF00 ; Address of Kerberos SRAM +RAMC_PAGE_LO = $DE3E ; Page register low +RAMC_PAGE_HI = $DE3F ; Page register high + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. If +; possible, check if the hardware is present and determine the amount of +; memory available. +; Must return an EM_ERR_xx code in a/x. +; + +INSTALL: + ;; write $55 into first page + lda #0 + sta RAMC_PAGE_LO + sta RAMC_PAGE_HI + lda #$55 + sta RAMC_WINDOW + + ;; write $AA into second page + lda #1 + sta RAMC_PAGE_LO + sta RAMC_PAGE_HI + lda #$AA + sta RAMC_WINDOW + + ;; check $55 in first page + lda #0 + sta RAMC_PAGE_LO + sta RAMC_PAGE_HI + lda RAMC_WINDOW + cmp #$55 + bne @notpresent + + ;; check $AA in first page + lda #1 + sta RAMC_PAGE_LO + sta RAMC_PAGE_HI + lda RAMC_WINDOW + cmp #$AA + bne @notpresent + + lda #<EM_ERR_OK + ldx #>EM_ERR_OK + rts + +@notpresent: + lda #<EM_ERR_NO_DEVICE + ldx #>EM_ERR_NO_DEVICE + ; use rts from UNINSTALL below + +; ------------------------------------------------------------------------ +; UNINSTALL routine. Is called before the driver is removed from memory. +; Can do cleanup or whatever. Must not return anything. +; + +UNINSTALL: + rts + +; ------------------------------------------------------------------------ +; PAGECOUNT: Return the total number of available pages in a/x. +; + +PAGECOUNT: + lda #<(128 * 1024 / 256) + ldx #>(128 * 1024 / 256) + rts + +; ------------------------------------------------------------------------ +; USE: Tell the driver that the window is now associated with a given page. +; The Kerberos cartridge does not copy but actually map the window, so USE is +; identical to MAP. + +USE = MAP + +; ------------------------------------------------------------------------ +; MAP: Map the page in a/x into memory and return a pointer to the page in +; a/x. The contents of the currently mapped page (if any) may be discarded +; by the driver. +; + +MAP: sta RAMC_PAGE_LO + txa + and #1 + sta RAMC_PAGE_HI + lda #<RAMC_WINDOW + ldx #>RAMC_WINDOW + +; Use the RTS from COMMIT below to save a precious byte of storage + +; ------------------------------------------------------------------------ +; COMMIT: Commit changes in the memory window to extended storage. + +COMMIT: rts + +; ------------------------------------------------------------------------ +; COPYFROM: Copy from extended into linear memory. A pointer to a structure +; describing the request is passed in a/x. +; The function must not return anything. +; + +COPYFROM: + jsr setup + +; Setup is: +; +; - ptr1 contains the struct pointer +; - ptr2 contains the linear memory buffer +; - ptr3 contains -(count-1) +; - tmp1 contains the low page register value +; - tmp2 contains the high page register value +; - X contains the page offset +; - Y contains zero + + beq @L5 ; will always branch, because setup ends with ldy #0 + +@L1: lda RAMC_WINDOW,x + sta (ptr2),y + iny + bne @L2 + inc ptr2+1 +@L2: inx + beq @L4 + +; Bump count and repeat + +@L3: inc ptr3 + bne @L1 + inc ptr3+1 + bne @L1 + rts + +; Bump page register + +@L4: inc tmp1 + bne @L5 + inc tmp2 +@L5: lda tmp1 + sta RAMC_PAGE_LO + lda tmp2 + sta RAMC_PAGE_HI + jmp @L3 + +; ------------------------------------------------------------------------ +; COPYTO: Copy from linear into extended memory. A pointer to a structure +; describing the request is passed in a/x. +; The function must not return anything. +; + +COPYTO: + jsr setup + +; Setup is: +; +; - ptr1 contains the struct pointer +; - ptr2 contains the linear memory buffer +; - ptr3 contains -(count-1) +; - tmp1 contains the low page register value +; - tmp2 contains the high page register value +; - X contains the page offset +; - Y contains zero + + beq @L5 ; will always branch, because setup ends with ldy #0 + +@L1: lda (ptr2),y + sta RAMC_WINDOW,x + iny + bne @L2 + inc ptr2+1 +@L2: inx + beq @L4 + +; Bump count and repeat + +@L3: inc ptr3 + bne @L1 + inc ptr3+1 + bne @L1 + rts + +; Bump page register + +@L4: inc tmp1 + bne @L5 + inc tmp2 +@L5: lda tmp1 + sta RAMC_PAGE_LO + lda tmp2 + sta RAMC_PAGE_HI + jmp @L3 + +; ------------------------------------------------------------------------ +; Helper function for COPYFROM and COPYTO: Store the pointer to the request +; structure and prepare data for the copy + +setup: sta ptr1 + stx ptr1+1 ; Save passed pointer + +; Get the page number from the struct and adjust it so that it may be used +; with the hardware. That is: lower 6 bits in tmp1, high bits in tmp2. + + ldy #EM_COPY::PAGE+1 + lda (ptr1),y + sta tmp2 + dey + lda (ptr1),y + sta tmp1 + +; Get the buffer pointer into ptr2 + + ldy #EM_COPY::BUF + lda (ptr1),y + sta ptr2 + iny + lda (ptr1),y + sta ptr2+1 + +; Get the count, calculate -(count-1) and store it into ptr3 + + ldy #EM_COPY::COUNT + lda (ptr1),y + eor #$FF + sta ptr3 + iny + lda (ptr1),y + eor #$FF + sta ptr3+1 + +; Get the page offset into X and clear Y + + ldy #EM_COPY::OFFS + lda (ptr1),y + tax + ldy #$00 + +; Done + + rts diff --git a/libsrc/c64/emd/c64-ram.s b/libsrc/c64/emd/c64-ram.s index f8a4a1819..5355b552d 100644 --- a/libsrc/c64/emd/c64-ram.s +++ b/libsrc/c64/emd/c64-ram.s @@ -44,7 +44,7 @@ ; Constants BASE = $D000 -PAGES = ($10000 - BASE) / 256 +PAGES = ($FF00 - BASE) / 256 ; ------------------------------------------------------------------------ ; Data. @@ -167,7 +167,7 @@ loop: .repeat 8 ; Done -done: rts +done: rts ; ------------------------------------------------------------------------ ; COPYFROM: Copy from extended into linear memory. A pointer to a structure @@ -178,7 +178,7 @@ done: rts COPYFROM: sta ptr3 stx ptr3+1 ; Save the passed em_copy pointer - + ldy #EM_COPY::OFFS lda (ptr3),y sta ptr1 @@ -267,5 +267,3 @@ COPYTO: sta ptr3 sta ptr1+1 ; From jmp common - - diff --git a/libsrc/c64/emd/c64-reu.s b/libsrc/c64/emd/c64-reu.s index 0779505be..07ac1fbed 100644 --- a/libsrc/c64/emd/c64-reu.s +++ b/libsrc/c64/emd/c64-reu.s @@ -55,6 +55,9 @@ REU_TRIGGER = $FF00 ; REU command trigger OP_COPYFROM = $ED OP_COPYTO = $EC +OP_COPYFROM_ALOAD = $B1 +OP_COPYTO_ALOAD = $B0 + ; ------------------------------------------------------------------------ ; Data. @@ -70,7 +73,7 @@ reu_params: .word $0000 ; Host address, lo, hi .byte $00 ; Expansion bank no. .word $0000 ; # bytes to move, lo, hi .byte $00 ; Interrupt mask reg. - .byte $00 ; Adress control reg. + .byte $00 ; Address control reg. .code @@ -92,19 +95,59 @@ INSTALL: cmp REU_REUADDR ; Check for presence of REU bne nodevice - ldy #>(128*4) ; Assume 128KB - lda REU_STATUS - and #$10 ; Check size bit - beq @L1 - ldy #>(256*4) ; 256KB when size bit is set -@L1: sty pagecount+1 - +; determine the size + php + sei ldy #$FF - sty curpage - sty curpage+1 ; Invalidate the current page - txa ; X = A = EM_ERR_OK +loop: + sty window + jsr reu_size_check_common + ldx #OP_COPYTO_ALOAD + stx REU_COMMAND + dey + cpy #$FF + bne loop + iny +size_loop: + jsr reu_size_check_common + ldx #OP_COPYFROM_ALOAD + stx REU_COMMAND + cpy window + bne size_found + iny + bne size_loop +size_found: + plp + ldx #$00 + cpy #$00 ; too many pages, shave off 2 + bne pagecount_ok + dex + dex + dey +pagecount_ok: + stx pagecount + sty pagecount+1 + lda #<EM_ERR_OK + ldx #>EM_ERR_OK rts +; common REU setup for size check +reu_size_check_common: + sty REU_REUADDR+2 + ldx #<window + stx REU_C64ADDR + ldx #>window + stx REU_C64ADDR+1 + ldx #$00 + stx REU_REUADDR + stx REU_REUADDR+1 + stx REU_COUNT+1 + stx REU_CONTROL + inx + stx REU_COUNT + rts + + ; No REU found nodevice: @@ -147,7 +190,7 @@ done: rts ; ------------------------------------------------------------------------ ; USE: Tell the driver that the window is now associated with a given page. - + USE: sta curpage stx curpage+1 ; Remember the page lda #<window diff --git a/libsrc/c64/extra/soft80.s b/libsrc/c64/extra/soft80.s index d445c85c0..0ea28cfaf 100644 --- a/libsrc/c64/extra/soft80.s +++ b/libsrc/c64/extra/soft80.s @@ -15,6 +15,22 @@ .export _textcolor := soft80_textcolor ; color.s .export _bgcolor := soft80_bgcolor ; color.s + ; soft80_cpeekc.s + .import soft80_cpeekc + .export _cpeekc := soft80_cpeekc ; cpeekc.s + + ; soft80_cpeekcolor.s + .import soft80_cpeekcolor + .export _cpeekcolor := soft80_cpeekcolor ; cpeekcolor.s + + ; soft80_cpeekrevers.s + .import soft80_cpeekrevers + .export _cpeekrevers := soft80_cpeekrevers ; cpeekrevers.s + + ; soft80_cpeeks.s + .import soft80_cpeeks + .export _cpeeks := soft80_cpeeks ; cpeeks.s + ; soft80_cputc.s .import soft80_cputc .import soft80_cputcxy @@ -50,3 +66,6 @@ ; Chars used by chline () and cvline () .exportzp chlinechar = CH_HLINE .exportzp cvlinechar = CH_VLINE + + .import return1 + .export _doesclrscrafterexit := return1 diff --git a/libsrc/c64/extra/soft80mono.s b/libsrc/c64/extra/soft80mono.s index 6fd2c687c..700cbcb6c 100644 --- a/libsrc/c64/extra/soft80mono.s +++ b/libsrc/c64/extra/soft80mono.s @@ -18,6 +18,22 @@ .export _textcolor := soft80mono_textcolor ; color.s .export _bgcolor := soft80mono_bgcolor ; color.s + ; soft80mono_cpeekc.s + .import soft80_cpeekc + .export _cpeekc := soft80_cpeekc ; cpeekc.s + + ; soft80mono_cpeekcolor.s + .import soft80mono_cpeekcolor + .export _cpeekcolor := soft80mono_cpeekcolor ; cpeekcolor.s + + ; soft80mono_cpeekrevers.s + .import soft80_cpeekrevers + .export _cpeekrevers := soft80_cpeekrevers ; cpeekrevers.s + + ; soft80mono_cpeeks.s + .import soft80_cpeeks + .export _cpeeks := soft80_cpeeks ; cpeeks.s + ; soft80mono_cputc.s .import soft80mono_cputc .import soft80mono_cputcxy @@ -53,3 +69,6 @@ ; Chars used by chline () and cvline () .exportzp chlinechar = CH_HLINE .exportzp cvlinechar = CH_VLINE + + .import return1 + .export _doesclrscrafterexit := return1 diff --git a/libsrc/c64/extra/tgimousedata.s b/libsrc/c64/extra/tgimousedata.s new file mode 100644 index 000000000..f4087e106 --- /dev/null +++ b/libsrc/c64/extra/tgimousedata.s @@ -0,0 +1,21 @@ +; C64 sprite addresses for the TGI mouse pointer +; +; 2017-01-13, Greg King + +; In order to provide a visible mouse pointer during TGI's graphics mode, +; the object file "c64-tgimousedata.o" must be linked explicitly into +; a program file. Example: +; +; cl65 -t c64 -o program-file main-code.c subroutines.s c64-tgimousedata.o +; +; Note: Currently, a program cannot have default +; pointers for both text and graphic modes. + +; The TGI graphics mode uses VIC-II's 16K bank number three. +; +; Address of the TGI bitmap's color RAM + +COLORMAP := $D000 + + .export mcb_spritepointer := COLORMAP + $03F8 + .export mcb_spritememory := COLORMAP + $0400 diff --git a/libsrc/c64/gettime.s b/libsrc/c64/gettime.s new file mode 100644 index 000000000..25fc8c94a --- /dev/null +++ b/libsrc/c64/gettime.s @@ -0,0 +1,83 @@ +; +; Stefan Haubenthal, 27.7.2009 +; Oliver Schmidt, 14.8.2018 +; +; int __fastcall__ clock_gettime (clockid_t clk_id, struct timespec *tp); +; + + .include "time.inc" + .include "c64.inc" + + .importzp sreg, tmp1, tmp2 + .import pushax, pusheax, tosmul0ax, steaxspidx, incsp1, return0 + .import TM, load_tenth + + +;---------------------------------------------------------------------------- +.code + +.proc _clock_gettime + + jsr pushax + jsr pushax + + lda CIA1_TODHR + sed + tax ; Save PM flag + and #%01111111 + cmp #$12 ; 12 AM/PM + bcc @L1 + sbc #$12 +@L1: inx ; Get PM flag + bpl @L2 + clc + adc #$12 +@L2: cld + jsr BCD2dec + sta TM + tm::tm_hour + lda CIA1_TODMIN + jsr BCD2dec + sta TM + tm::tm_min + lda CIA1_TODSEC + jsr BCD2dec + sta TM + tm::tm_sec + lda #<TM + ldx #>TM + jsr _mktime + + ldy #timespec::tv_sec + jsr steaxspidx ; Pops address pushed by 2. pushax + + jsr load_tenth + jsr pusheax + lda CIA1_TOD10 + ldx #>$0000 + jsr tosmul0ax + + ldy #timespec::tv_nsec + jsr steaxspidx ; Pops address pushed by 1. pushax + + jsr incsp1 + jmp return0 + +.endproc + +;---------------------------------------------------------------------------- +; dec = (((BCD>>4)*10) + (BCD&0xf)) + +.proc BCD2dec + + tax + and #%00001111 + sta tmp1 + txa + and #%11110000 ; *16 + lsr ; *8 + sta tmp2 + lsr + lsr ; *2 + adc tmp2 ; = *10 + adc tmp1 + rts + +.endproc diff --git a/libsrc/c64/irq.s b/libsrc/c64/irq.s index 10d03aa2c..d0767d53f 100644 --- a/libsrc/c64/irq.s +++ b/libsrc/c64/irq.s @@ -9,7 +9,7 @@ ; ------------------------------------------------------------------------ -.segment "INIT" +.segment "ONCE" initirq: lda IRQVec diff --git a/libsrc/c64/joy/c64-hitjoy.s b/libsrc/c64/joy/c64-hitjoy.s index a798100a7..3b4a0b909 100644 --- a/libsrc/c64/joy/c64-hitjoy.s +++ b/libsrc/c64/joy/c64-hitjoy.s @@ -29,24 +29,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $00 ; JOY_FIRE2 unavailable - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr IRQ ; ------------------------------------------------------------------------ ; Constants @@ -85,13 +73,22 @@ UNINSTALL: rts ; ------------------------------------------------------------------------ -; IRQ entry point. Is called from the C layer as a subroutine in the -; interrupt. The routine MUST return carry set if the interrupt has been -; 'handled' - which means that the interrupt source is gone. Otherwise it -; MUST return carry clear. +; COUNT: Return the total number of available joysticks in a/x. +; -IRQ: ; cia 2 setup +COUNT: lda #<JOY_COUNT + ldx #>JOY_COUNT + rts +; ------------------------------------------------------------------------ +; READ: Read a particular joystick passed in A. +; + +readadapter: + + sei + + ; cia 2 setup ldy #$00 ; port b direction sty $dd03 ; => input @@ -155,32 +152,24 @@ IRQ: ; cia 2 setup sta temp4 fire: - ; Default Value: $40/64 on PAL - ; $42/66 on NTSC + ; FIXME: to be really 100% correct this should restore the correct timer + ; values for the respective machine (PAL: $4025, NTSC: $4295) + ; however, this should hardly be a problem in a real world program + lda #$41 sta $dc05 - ; Default Value: $25/37 on PAL - ; $95/149 on NTSC lda #0 sta $dc04 - ; We do never "handle" the interrupt, we use it just as a timer. - clc + cli rts -; ------------------------------------------------------------------------ -; COUNT: Return the total number of available joysticks in a/x. -; +READ: + pha + jsr readadapter + pla -COUNT: lda #<JOY_COUNT - ldx #>JOY_COUNT - rts - -; ------------------------------------------------------------------------ -; READ: Read a particular joystick passed in A. -; - -READ: tax ; Joystick number into X + tax ; Joystick number into X bne joy2 ; Read joystick 1 @@ -226,4 +215,3 @@ joy4: lda temp4 eor #$1F ldx #0 rts - diff --git a/libsrc/c64/joy/c64-numpad.s b/libsrc/c64/joy/c64-numpad.s index 5f6464215..0ccdc4fcd 100644 --- a/libsrc/c64/joy/c64-numpad.s +++ b/libsrc/c64/joy/c64-numpad.s @@ -30,24 +30,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $02 ; JOY_UP "8" - .byte $10 ; JOY_DOWN "2" - .byte $20 ; JOY_LEFT "4" - .byte $08 ; JOY_RIGHT "6" - .byte $04 ; JOY_FIRE "5" ENTER - .byte $00 ; JOY_FIRE2 unavailable - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants @@ -58,6 +46,49 @@ JOY_COUNT = 1 ; Number of joysticks we support ; ------------------------------------------------------------------------ ; Data. +.rodata + +; <U>p '8' key +; <D>own '2' key +; <L>eft '4' key +; <R>ight '6' key +; <B>utton '5' or ENTER key + +masktable: + ; Input: LDRBU + ; Output: BRLDU + .byte %00000000 ; $00 + .byte %00000001 ; $01 + .byte %00010000 ; $02 + .byte %00010001 ; $03 + .byte %00001000 ; $04 + .byte %00001001 ; $05 + .byte %00011000 ; $06 + .byte %00011001 ; $07 + .byte %00000010 ; $08 + .byte %00000011 ; $09 + .byte %00010010 ; $0A + .byte %00010011 ; $0B + .byte %00001010 ; $0C + .byte %00001011 ; $0D + .byte %00011010 ; $0E + .byte %00011011 ; $0F + .byte %00000100 ; $10 + .byte %00000101 ; $11 + .byte %00010100 ; $12 + .byte %00010101 ; $13 + .byte %00001100 ; $14 + .byte %00001101 ; $15 + .byte %00011100 ; $16 + .byte %00011101 ; $17 + .byte %00000110 ; $18 + .byte %00000111 ; $19 + .byte %00010110 ; $1A + .byte %00010111 ; $1B + .byte %00001110 ; $1C + .byte %00001111 ; $1D + .byte %00011110 ; $1E + .byte %00011111 ; $1F .code @@ -100,21 +131,23 @@ COUNT: lda #JOY_COUNT ; READ: tax ; Clear high byte - lda #$FD - ldy #$FE + lda #$FD ; For ENTER and '6' + ldy #$FE ; For '8', '5', '2', '4' sei sta VIC_KBD_128 lda CIA1_PRB and #%00110000 eor #%00110000 - lsr - lsr + lsr ; Map ENTER ... + lsr ; ... onto '5' sty VIC_KBD_128 eor CIA1_PRB iny sty VIC_KBD_128 ; Reset to $FF cli - and #%11111110 - eor #%11111110 + and #%00111110 + eor #%00111110 + lsr + tay + lda masktable,y ; Convert LDRBU to BRLDU rts - diff --git a/libsrc/c64/joy/c64-ptvjoy.s b/libsrc/c64/joy/c64-ptvjoy.s index 31850488c..a772fb5f6 100644 --- a/libsrc/c64/joy/c64-ptvjoy.s +++ b/libsrc/c64/joy/c64-ptvjoy.s @@ -29,24 +29,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $00 ; JOY_FIRE2 unavailable - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants @@ -133,8 +121,8 @@ joy3: sta CIA2_PRB ; (output one at PB7) lda CIA2_PRB ; cia 2 port B read/write - and #$1f ; get bit 4-0 (PB4-PB0) - eor #$1f + and #$1F ; get bit 4-0 (PB4-PB0) + eor #$1F rts ; Read joystick 4 @@ -143,14 +131,14 @@ joy4: lda #$00 ; cia 2 port B read/write sta CIA2_PRB ; (output zero at PB7) lda CIA2_PRB ; cia 2 port B read/write - and #$0f ; get bit 3-0 (PB3-PB0) + and #$0F ; get bit 3-0 (PB3-PB0) sta tmp1 ; joy 4 directions lda CIA2_PRB ; cia 2 port B read/write and #%00100000 ; get bit 5 (PB5) lsr ora tmp1 - eor #$1f + eor #$1F ldx #0 rts diff --git a/libsrc/c64/joy/c64-stdjoy.s b/libsrc/c64/joy/c64-stdjoy.s index 2932c77fd..d11093fba 100644 --- a/libsrc/c64/joy/c64-stdjoy.s +++ b/libsrc/c64/joy/c64-stdjoy.s @@ -29,24 +29,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $00 ; JOY_FIRE2 unavailable - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants @@ -105,9 +93,7 @@ joy1: lda #$7F sta CIA1_PRA lda CIA1_PRB cli - and #$1F - eor #$1F - rts + jmp end ; Read joystick 2 @@ -119,8 +105,6 @@ joy2: ldx #0 lda CIA1_PRA sty CIA1_DDRA cli - and #$1F +end: and #$1F eor #$1F rts - - diff --git a/libsrc/c64/kbrepeat.s b/libsrc/c64/kbrepeat.s new file mode 100644 index 000000000..0df13e58d --- /dev/null +++ b/libsrc/c64/kbrepeat.s @@ -0,0 +1,14 @@ +; +; unsigned char __fastcall__ kbrepeat (unsigned char mode); +; + + .export _kbrepeat + + .include "c64.inc" + +_kbrepeat: + ldx KBDREPEAT ; get old value + sta KBDREPEAT ; store new value + txa ; return old value + ldx #0 + rts diff --git a/libsrc/c64/kernal.s b/libsrc/c64/kernal.s index a4eaad0d7..cf5511ce8 100644 --- a/libsrc/c64/kernal.s +++ b/libsrc/c64/kernal.s @@ -1,9 +1,16 @@ ; ; Ullrich von Bassewitz, 19.11.2002 ; -; C64 kernal functions +; C64 Kernal functions ; + .include "cbm_kernal.inc" + + .export CLRSCR + .export KBDREAD + .export UPDCRAMPTR + .export NMIEXIT + .export CINT .export IOINIT .export RAMTAS @@ -31,7 +38,9 @@ .export CKOUT .export CLRCH .export BASIN + .export CHRIN .export BSOUT + .export CHROUT .export LOAD .export SAVE .export SETTIM @@ -42,47 +51,3 @@ .export UDTIM .export SCREEN .export IOBASE - - -;----------------------------------------------------------------------------- -; All functions are available in the kernal jump table - -CINT = $FF81 -IOINIT = $FF84 -RAMTAS = $FF87 -RESTOR = $FF8A -VECTOR = $FF8D -SETMSG = $FF90 -SECOND = $FF93 -TKSA = $FF96 -MEMTOP = $FF99 -MEMBOT = $FF9C -SCNKEY = $FF9F -SETTMO = $FFA2 -ACPTR = $FFA5 -CIOUT = $FFA8 -UNTLK = $FFAB -UNLSN = $FFAE -LISTEN = $FFB1 -TALK = $FFB4 -READST = $FFB7 -SETLFS = $FFBA -SETNAM = $FFBD -OPEN = $FFC0 -CLOSE = $FFC3 -CHKIN = $FFC6 -CKOUT = $FFC9 -CLRCH = $FFCC -BASIN = $FFCF -BSOUT = $FFD2 -LOAD = $FFD5 -SAVE = $FFD8 -SETTIM = $FFDB -RDTIM = $FFDE -STOP = $FFE1 -GETIN = $FFE4 -CLALL = $FFE7 -UDTIM = $FFEA -SCREEN = $FFED -IOBASE = $FFF3 - diff --git a/libsrc/c64/kplot.s b/libsrc/c64/kplot.s index 2d60fd4a6..856bd148d 100644 --- a/libsrc/c64/kplot.s +++ b/libsrc/c64/kplot.s @@ -7,15 +7,16 @@ .export PLOT +.scope KERNAL + .include "cbm_kernal.inc" +.endscope .proc PLOT bcs @L1 - jsr $FFF0 ; Set cursor position - jmp $EA24 ; Set pointer to color RAM + jsr KERNAL::PLOT ; Set cursor position using original ROM PLOT + jmp KERNAL::UPDCRAMPTR ; Set pointer to color RAM to match new cursor position -@L1: jmp $FFF0 ; Get cursor position +@L1: jmp KERNAL::PLOT ; Get cursor position .endproc - - diff --git a/libsrc/c64/mainargs.s b/libsrc/c64/mainargs.s index a31c1b54f..a381b49e1 100644 --- a/libsrc/c64/mainargs.s +++ b/libsrc/c64/mainargs.s @@ -32,10 +32,10 @@ MAXARGS = 10 ; Maximum number of arguments allowed REM = $8f ; BASIC token-code NAME_LEN = 16 ; Maximum length of command-name -; Get possible command-line arguments. Goes into the special INIT segment, +; Get possible command-line arguments. Goes into the special ONCE segment, ; which may be reused after the startup code is run -.segment "INIT" +.segment "ONCE" initmainargs: @@ -125,7 +125,7 @@ done: lda #<argv stx __argv + 1 rts -.segment "INITBSS" +.segment "INIT" term: .res 1 name: .res NAME_LEN + 1 diff --git a/libsrc/c64/mcbdefault.s b/libsrc/c64/mcbdefault.s index cd36d8515..79a8d93e5 100644 --- a/libsrc/c64/mcbdefault.s +++ b/libsrc/c64/mcbdefault.s @@ -21,16 +21,16 @@ ; Sprite definitions. The first value can be changed to adjust the number ; of the sprite used for the mouse. All others depend on this value. -MOUSE_SPR = 0 ; Sprite used for the mouse -MOUSE_SPR_MASK = $01 .shl MOUSE_SPR ; Positive mask -MOUSE_SPR_NMASK = .lobyte(.not MOUSE_SPR_MASK) ; Negative mask -VIC_SPR_X = (VIC_SPR0_X + 2*MOUSE_SPR) ; Sprite X register -VIC_SPR_Y = (VIC_SPR0_Y + 2*MOUSE_SPR) ; Sprite Y register +MOUSE_SPR = 0 ; Sprite used for the mouse +MOUSE_SPR_MASK = $01 .shl MOUSE_SPR ; Positive mask +MOUSE_SPR_NMASK = .lobyte(.bitnot MOUSE_SPR_MASK) ; Negative mask +VIC_SPR_X = (VIC_SPR0_X + 2*MOUSE_SPR) ; Sprite X register +VIC_SPR_Y = (VIC_SPR0_Y + 2*MOUSE_SPR) ; Sprite Y register ; -------------------------------------------------------------------------- ; Initialize the mouse sprite. -.segment "INIT" +.segment "ONCE" initmcb: diff --git a/libsrc/c64/mouse_stddrv.s b/libsrc/c64/mouse_stddrv.s index b53440a52..f3a2c6499 100644 --- a/libsrc/c64/mouse_stddrv.s +++ b/libsrc/c64/mouse_stddrv.s @@ -12,4 +12,3 @@ _mouse_stddrv: .asciiz "c64-1351.mou" - diff --git a/libsrc/c64/randomize.s b/libsrc/c64/randomize.s index d74bae91e..a875203af 100644 --- a/libsrc/c64/randomize.s +++ b/libsrc/c64/randomize.s @@ -11,7 +11,7 @@ .include "c64.inc" -__randomize: +__randomize: ldx VIC_HLINE ; Use VIC rasterline as high byte lda TIME+2 ; Use 60HZ clock as low byte jmp _srand ; Initialize generator diff --git a/libsrc/c64/ser/c64-swlink.s b/libsrc/c64/ser/c64-swlink.s index 813067239..597cf1dd6 100644 --- a/libsrc/c64/ser/c64-swlink.s +++ b/libsrc/c64/ser/c64-swlink.s @@ -24,6 +24,7 @@ .include "zeropage.inc" .include "ser-kernel.inc" .include "ser-error.inc" + .include "cbm_kernal.inc" .include "c64.inc" .macpack module @@ -45,15 +46,15 @@ ; Jump table - .word INSTALL - .word UNINSTALL - .word OPEN - .word CLOSE - .word GET - .word PUT - .word STATUS - .word IOCTL - .word IRQ + .word SER_INSTALL + .word SER_UNINSTALL + .word SER_OPEN + .word SER_CLOSE + .word SER_GET + .word SER_PUT + .word SER_STATUS + .word SER_IOCTL + .word SER_IRQ ;---------------------------------------------------------------------------- ; I/O definitions @@ -136,11 +137,11 @@ ParityTable: .code ;---------------------------------------------------------------------------- -; INSTALL routine. Is called after the driver is loaded into memory. If +; SER_INSTALL routine. Is called after the driver is loaded into memory. If ; possible, check if the hardware is present. ; Must return an SER_ERR_xx code in a/x. -INSTALL: +SER_INSTALL: ; Deactivate DTR and disable 6551 interrupts @@ -165,10 +166,10 @@ SetNMI: sta NMIVec rts ;---------------------------------------------------------------------------- -; UNINSTALL routine. Is called before the driver is removed from memory. +; SER_UNINSTALL routine. Is called before the driver is removed from memory. ; Must return an SER_ERR_xx code in a/x. -UNINSTALL: +SER_UNINSTALL: ; Stop interrupts, drop DTR @@ -185,7 +186,7 @@ UNINSTALL: ; PARAMS routine. A pointer to a ser_params structure is passed in ptr1. ; Must return an SER_ERR_xx code in a/x. -OPEN: +SER_OPEN: ; Check if the handshake setting is valid @@ -256,11 +257,11 @@ InvBaud: rts ;---------------------------------------------------------------------------- -; CLOSE: Close the port, disable interrupts and flush the buffer. Called +; SER_CLOSE: Close the port, disable interrupts and flush the buffer. Called ; without parameters. Must return an error code in a/x. ; -CLOSE: +SER_CLOSE: ; Stop interrupts, drop DTR @@ -278,12 +279,13 @@ CLOSE: rts ;---------------------------------------------------------------------------- -; GET: Will fetch a character from the receive buffer and store it into the +; SER_GET: Will fetch a character from the receive buffer and store it into the ; variable pointer to by ptr1. If no data is available, SER_ERR_NO_DATA is ; return. ; -GET: ldx SendFreeCnt ; Send data if necessary +SER_GET: + ldx SendFreeCnt ; Send data if necessary inx ; X == $FF? beq @L1 lda #$00 @@ -322,11 +324,11 @@ GET: ldx SendFreeCnt ; Send data if necessary rts ;---------------------------------------------------------------------------- -; PUT: Output character in A. +; SER_PUT: Output character in A. ; Must return an error code in a/x. ; -PUT: +SER_PUT: ; Try to send @@ -356,31 +358,33 @@ PUT: rts ;---------------------------------------------------------------------------- -; STATUS: Return the status in the variable pointed to by ptr1. +; SER_STATUS: Return the status in the variable pointed to by ptr1. ; Must return an error code in a/x. ; -STATUS: lda ACIA_STATUS +SER_STATUS: + lda ACIA_STATUS ldx #0 sta (ptr1,x) txa ; SER_ERR_OK rts ;---------------------------------------------------------------------------- -; IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl +; SER_IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl ; specific data in ptr1, and the ioctl code in A. ; Must return an error code in a/x. ; -IOCTL: lda #<SER_ERR_INV_IOCTL ; We don't support ioclts for now +SER_IOCTL: + lda #<SER_ERR_INV_IOCTL ; We don't support ioclts for now ldx #>SER_ERR_INV_IOCTL - rts + rts ;---------------------------------------------------------------------------- -; IRQ: Not used on the C64 +; SER_IRQ: Not used on the C64 ; -IRQ = $0000 +SER_IRQ = $0000 ;---------------------------------------------------------------------------- ; @@ -476,4 +480,3 @@ InitBuffers: stx RecvFreeCnt stx SendFreeCnt rts - diff --git a/libsrc/c64/settime.s b/libsrc/c64/settime.s new file mode 100644 index 000000000..88b4d0bef --- /dev/null +++ b/libsrc/c64/settime.s @@ -0,0 +1,84 @@ +; +; Oliver Schmidt, 16.8.2018 +; +; int __fastcall__ clock_settime (clockid_t clk_id, const struct timespec *tp); +; + + .include "time.inc" + .include "c64.inc" + + .importzp sreg, ptr1 + .import pushax, pusheax, ldax0sp, ldeaxidx + .import tosdiveax, incsp3, return0 + .import TM, load_tenth + + +;---------------------------------------------------------------------------- +.code + +.proc _clock_settime + + jsr pushax + + .assert timespec::tv_sec = 0, error + jsr _localtime + sta ptr1 + stx ptr1+1 + ldy #.sizeof(tm)-1 +@L1: lda (ptr1),y + sta TM,y + dey + bpl @L1 + + lda TM + tm::tm_hour + jsr dec2BCD + tax ; Force flags + bne @L2 + lda #$92 ; 12 AM + bne @L3 +@L2: cmp #$13 ; 1 PM + bcc @L3 + sed + sbc #$12 + cld + ora #%10000000 +@L3: sta CIA1_TODHR + lda TM + tm::tm_min + jsr dec2BCD + sta CIA1_TODMIN + lda TM + tm::tm_sec + jsr dec2BCD + sta CIA1_TODSEC + + jsr ldax0sp + ldy #3+timespec::tv_nsec + jsr ldeaxidx + jsr pusheax + jsr load_tenth + jsr tosdiveax + sta CIA1_TOD10 + + jsr incsp3 + jmp return0 + +.endproc + +;---------------------------------------------------------------------------- +; Just sum up the value in BCD mode. +; http://forum.6502.org/viewtopic.php?p=7629#p7629 + +.proc dec2BCD + + tax + dex + bmi @L9 + lda #0 + clc + sed +@L1: adc #1 + dex + bpl @L1 + cld +@L9: rts + +.endproc diff --git a/libsrc/c64/soft80_cgetc.s b/libsrc/c64/soft80_cgetc.s index ae0e23857..28e6b0042 100644 --- a/libsrc/c64/soft80_cgetc.s +++ b/libsrc/c64/soft80_cgetc.s @@ -11,6 +11,7 @@ .import cursor .importzp tmp1 + .include "cbm_kernal.inc" .include "c64.inc" .include "soft80.inc" @@ -45,39 +46,33 @@ invertcursor: lda #$34 sta $01 - ldy #$00 - jsr setcolor - - ldx soft80_internal_cursorxlsb -@lp1: - lda (SCREEN_PTR),y - eor nibble,x - sta (SCREEN_PTR),y - iny - cpy #8 - bne @lp1 - - pla - sta $01 ; enable I/O - cli - rts - ; do not use soft80_putcolor here to make sure the cursor is always ; shown using the current textcolor without disturbing the "color voodoo" ; in soft80_cputc -setcolor: - ;ldy #0 ; is 0 + ldy #0 bcs @set ; restore old value lda tmp1 - sta (CRAM_PTR),y ; vram - rts + bcc @lp0 @set: ; save old value lda (CRAM_PTR),y ; vram sta tmp1 lda soft80_internal_cellcolor +@lp0: sta (CRAM_PTR),y ; vram + ldx soft80_internal_cursorxlsb + ldy #7 +@lp1: + lda (SCREEN_PTR),y + eor nibble,x + sta (SCREEN_PTR),y + dey + bpl @lp1 + + pla + sta $01 ; enable I/O + cli rts .rodata diff --git a/libsrc/c64/soft80_charset.s b/libsrc/c64/soft80_charset.s index 69fd3527f..1faa9f775 100644 --- a/libsrc/c64/soft80_charset.s +++ b/libsrc/c64/soft80_charset.s @@ -43,7 +43,7 @@ .export soft80_charset - .segment "INIT" + .segment "ONCE" soft80_charset: .byte $0f,$03,$0f,$00,$0f,$07,$05,$0e .byte $0f,$05,$0e,$0b,$0f,$0b,$0f,$0f diff --git a/libsrc/c64/soft80_conio.s b/libsrc/c64/soft80_conio.s index 874d41a53..7036f384d 100644 --- a/libsrc/c64/soft80_conio.s +++ b/libsrc/c64/soft80_conio.s @@ -56,7 +56,7 @@ soft80_shutdown: sta CIA2_PRA jmp $FF5B ; Initialize video I/O - .segment "INIT" + .segment "ONCE" firstinit: ; copy charset to RAM under I/O sei @@ -67,22 +67,20 @@ firstinit: inc soft80_first_init + ; soft80_lo_charset and soft80_hi_charset are page-aligned + ldy #0 lda #<soft80_charset ldx #>soft80_charset sta ptr1 stx ptr1+1 - lda #<soft80_lo_charset ldx #>soft80_lo_charset - sta ptr2 + sty ptr2 stx ptr2+1 - lda #<soft80_hi_charset ldx #>soft80_hi_charset - sta ptr3 + sty ptr3 stx ptr3+1 ldx #4 -@l2: - ldy #0 @l1: lda (ptr1),y sta (ptr2),y @@ -97,17 +95,17 @@ firstinit: inc ptr2+1 inc ptr3+1 dex - bne @l2 + bne @l1 ; copy the kplot tables to ram under I/O ;ldx #0 ; is 0 -@l3: +@l2: lda soft80_tables_data_start,x sta soft80_bitmapxlo,x lda soft80_tables_data_start + (soft80_tables_data_end - soft80_tables_data_start - $0100),x sta soft80_bitmapxlo + (soft80_tables_data_end - soft80_tables_data_start - $0100),x inx - bne @l3 + bne @l2 pla sta $01 @@ -146,7 +144,7 @@ soft80_bitmapyhi_data: soft80_tables_data_end: ;------------------------------------------------------------------------------- - .segment "INITBSS" + .segment "INIT" soft80_internal_cellcolor: .res 1 soft80_internal_bgcolor: diff --git a/libsrc/c64/soft80_cpeekc.s b/libsrc/c64/soft80_cpeekc.s new file mode 100644 index 000000000..576d50fc1 --- /dev/null +++ b/libsrc/c64/soft80_cpeekc.s @@ -0,0 +1,148 @@ +; +; 2017-12-28, Groepaz +; +; char cpeekc (void); +; + + .export soft80_cpeekc, soft80_cpeekchar + + .include "c64.inc" + .include "soft80.inc" + + .macpack longbranch + + .segment "CODE" + +soft80_cpeekc: + jsr soft80_cpeekchar + ; 0-1F -> A0-BF + ; 20-7F -> 20-7F + cmp #$20 + bcs @sk + ;clc + adc #$a0 +@sk: + ldx #0 + rts + +soft80_cpeekchar: + + sei + lda #$34 + sta $01 + + lda CURS_X + and #$01 + + jne @l1a + + ; test non-inverted character (left side) + + ldx #0 +@l2aa: + ldy #0 + + .repeat 8,line + lda (SCREEN_PTR),y + and #$f0 + cmp soft80_hi_charset+(line*$80),x + bne @l2b + .if (line < 7) + iny + .endif + .endrepeat + +@backok: + lda #$36 + sta $01 + cli + txa ; return char in A + ldx #$00 ; revers flag + rts +@l2b: + inx + cpx #$80 + jne @l2aa + + ; test inverted character (left side) + + ldx #0 +@l2aa2: + ldy #0 + + .repeat 8,line + lda (SCREEN_PTR),y + and #$f0 + eor #$f0 + cmp soft80_hi_charset+(line*$80),x + bne @l2b2 + .if (line < 7) + iny + .endif + .endrepeat + +@backokrevers: + lda #$36 + sta $01 + cli + txa ; return char in A + ldx #$01 ; revers flag + rts + +@l2b2: + inx + cpx #$80 + jne @l2aa2 + +@backerr: + lda #$36 + sta $01 + cli + ldx #0 + txa + rts + + ; test non-inverted character (right side) + +@l1a: + ldx #0 +@l1aa: + ldy #0 + .repeat 8,line + lda (SCREEN_PTR),y + and #$0f + eor soft80_lo_charset+(line*$80),x + bne @l2bb + .if line < 7 + iny + .endif + .endrepeat + jmp @backok +@l2bb: + inx + cpx #$80 + bne @l1aa + + ; test inverted character (right side) + + ldx #0 +@l1aa2: + ldy #0 + .repeat 8,line + lda (SCREEN_PTR),y + and #$0f + eor #$0f + eor soft80_lo_charset+(line*$80),x + bne @l2bb2 + .if line < 7 + iny + .endif + .endrepeat + jmp @backokrevers +@l2bb2: + inx + cpx #$80 + bne @l1aa2 + + jmp @backerr + diff --git a/libsrc/c64/soft80_cpeekcolor.s b/libsrc/c64/soft80_cpeekcolor.s new file mode 100644 index 000000000..c8f1c6e43 --- /dev/null +++ b/libsrc/c64/soft80_cpeekcolor.s @@ -0,0 +1,19 @@ +; +; 2017-12-27, Groepaz +; +; unsigned char cpeekcolor (void); +; + + .export soft80_cpeekcolor + + .include "c64.inc" + .include "soft80.inc" + + .segment "CODE" + +soft80_cpeekcolor: + ldy #0 + lda (CRAM_PTR),y + and #$0f + ldx #0 + rts diff --git a/libsrc/c64/soft80_cpeekrevers.s b/libsrc/c64/soft80_cpeekrevers.s new file mode 100644 index 000000000..779636ed5 --- /dev/null +++ b/libsrc/c64/soft80_cpeekrevers.s @@ -0,0 +1,15 @@ +; +; 2017-12-28, Groepaz +; +; unsigned char cpeekrevers (void); +; + + .import soft80_cpeekchar + + .export soft80_cpeekrevers + +soft80_cpeekrevers: + jsr soft80_cpeekchar + txa + ldx #0 + rts diff --git a/libsrc/c64/soft80_cpeeks.s b/libsrc/c64/soft80_cpeeks.s new file mode 100644 index 000000000..837afef1e --- /dev/null +++ b/libsrc/c64/soft80_cpeeks.s @@ -0,0 +1,71 @@ +; +; 2017-12-27, groepaz +; +; void cpeeks (char* s, unsigned length); +; + .export soft80_cpeeks + .import soft80_cpeekc, soft80_kplot, popax + + .importzp ptr1, ptr2 + + .include "c64.inc" + .include "soft80.inc" + +soft80_cpeeks: + eor #<$FFFF ; counting a word upward is faster + sta ptr2 ; so, we use -(length + 1) + txa + eor #>$FFFF + sta ptr2+1 + + jsr popax + sta ptr1 + stx ptr1+1 + + ; save current cursor position + lda CURS_X + pha + lda CURS_Y + pha + + ; get the string +@lp: + jsr soft80_cpeekc + ldy #0 + sta (ptr1),y + + ; advance cursor position + ldy CURS_X + ldx CURS_Y + iny + cpy #charsperline + bne @sk2 + ldy #0 + inx +@sk2: + sty CURS_X + stx CURS_Y + clc + jsr soft80_kplot + + inc ptr1 + bne @sk + inc ptr1+1 +@sk: + inc ptr2 + bne @lp + inc ptr2+1 + bne @lp + + ; terminate the string + lda #0 + ldy #0 + sta (ptr1),y + + ; restore the cursor position + pla + tax ; CURS_Y + pla + tay ; CURS_X + clc + jmp soft80_kplot diff --git a/libsrc/c64/soft80_cputc.s b/libsrc/c64/soft80_cputc.s index acbe5b560..f00f7792f 100644 --- a/libsrc/c64/soft80_cputc.s +++ b/libsrc/c64/soft80_cputc.s @@ -12,7 +12,7 @@ .export soft80_newline, soft80_plot .export soft80_checkchar - .import popa, _gotoxy + .import gotoxy .import soft80_kplot .import soft80_internal_bgcolor, soft80_internal_cellcolor @@ -25,8 +25,7 @@ soft80_cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C ; Plot a character - also used as internal function diff --git a/libsrc/c64/soft80mono_cgetc.s b/libsrc/c64/soft80mono_cgetc.s index d99dc7775..8d8dc940d 100644 --- a/libsrc/c64/soft80mono_cgetc.s +++ b/libsrc/c64/soft80mono_cgetc.s @@ -12,6 +12,7 @@ .import cursor .importzp tmp1 + .include "cbm_kernal.inc" .include "c64.inc" .include "soft80.inc" diff --git a/libsrc/c64/soft80mono_conio.s b/libsrc/c64/soft80mono_conio.s index 759b280c6..25c2fc558 100644 --- a/libsrc/c64/soft80mono_conio.s +++ b/libsrc/c64/soft80mono_conio.s @@ -60,7 +60,7 @@ soft80mono_shutdown: sta VIC_VIDEO_ADR rts - .segment "INIT" + .segment "ONCE" firstinit: ; copy charset to RAM under I/O sei @@ -150,7 +150,7 @@ soft80_bitmapyhi_data: soft80_tables_data_end: ;------------------------------------------------------------------------------- - .segment "INITBSS" + .segment "INIT" soft80mono_internal_cellcolor: .res 1 soft80mono_internal_bgcolor: diff --git a/libsrc/c64/soft80mono_cpeekcolor.s b/libsrc/c64/soft80mono_cpeekcolor.s new file mode 100644 index 000000000..a03875a74 --- /dev/null +++ b/libsrc/c64/soft80mono_cpeekcolor.s @@ -0,0 +1,17 @@ +; +; 2017-12-27, Groepaz +; +; unsigned char cpeekcolor (void); +; + + .export soft80mono_cpeekcolor + + .include "c64.inc" + .include "soft80.inc" + + .segment "CODE" + +soft80mono_cpeekcolor: + lda CHARCOLOR + ldx #0 + rts diff --git a/libsrc/c64/soft80mono_cputc.s b/libsrc/c64/soft80mono_cputc.s index c89362cb5..252de0319 100644 --- a/libsrc/c64/soft80mono_cputc.s +++ b/libsrc/c64/soft80mono_cputc.s @@ -11,7 +11,7 @@ .export soft80mono_cputdirect, soft80mono_putchar .export soft80mono_newline, soft80mono_plot - .import popa, _gotoxy + .import gotoxy .import soft80mono_kplot .import soft80mono_internal_bgcolor, soft80mono_internal_cellcolor @@ -24,8 +24,7 @@ soft80mono_cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C ; Plot a character - also used as internal function diff --git a/libsrc/c64/sysuname.s b/libsrc/c64/sysuname.s index 15546bfa3..1903986c9 100644 --- a/libsrc/c64/sysuname.s +++ b/libsrc/c64/sysuname.s @@ -12,7 +12,7 @@ ;-------------------------------------------------------------------------- ; Data. We define a fixed utsname struct here and just copy it. - + .rodata utsdata: @@ -35,5 +35,3 @@ utsdata: ; machine .asciiz "Commodore 64" - - diff --git a/libsrc/c64/tgi/c64-hi.s b/libsrc/c64/tgi/c64-hi.s index 6d33f00a8..38faf3d77 100644 --- a/libsrc/c64/tgi/c64-hi.s +++ b/libsrc/c64/tgi/c64-hi.s @@ -1,7 +1,10 @@ ; ; Graphics driver for the 320x200x2 mode on the C64. ; -; Based on Stephen L. Judds GRLIB code +; Based on Stephen L. Judd's GRLIB code. +; +; 2017-01-13, Greg King +; 2018-03-13, Sven Klose ; .include "zeropage.inc" @@ -55,7 +58,6 @@ .addr BAR .addr TEXTSTYLE .addr OUTTEXT - .addr 0 ; IRQ entry is unused ; ------------------------------------------------------------------------ ; Data. @@ -69,12 +71,9 @@ X2 := ptr3 Y2 := ptr4 TEXT := ptr3 -ROW := tmp2 ; Bitmap row... -COL := tmp3 ; ...and column, both set by PLOT TEMP := tmp4 TEMP2 := sreg POINT := regsave -INRANGE := regsave+2 ; PLOT variable, $00 = coordinates in range CHUNK := X2 ; Used in the line routine OLDCHUNK := X2+1 ; Dito @@ -132,7 +131,7 @@ VBASE := $E000 ; Video memory base address ; INSTALL: - rts +; rts ; Fall through ; ------------------------------------------------------------------------ @@ -273,7 +272,7 @@ CLEAR: ldy #$00 sta VBASE+$1C00,y sta VBASE+$1D00,y sta VBASE+$1E00,y - sta VBASE+$1F00,y + sta VBASE+$1E40,y ; Preserve vectors iny bne @L1 rts @@ -286,7 +285,7 @@ CLEAR: ldy #$00 ; SETVIEWPAGE: - rts +; rts ; Fall through ; ------------------------------------------------------------------------ ; SETDRAWPAGE: Set the drawable page. Called with the new page in A (0..n). @@ -351,7 +350,7 @@ SETPALETTE: @L2: sta CBASE+$0000,y sta CBASE+$0100,y sta CBASE+$0200,y - sta CBASE+$0300,y + sta CBASE+$02e8,y iny bne @L2 pla @@ -453,11 +452,6 @@ GETPIXEL: ; LINE: Draw a line from X1/Y1 to X2/Y2, where X1/Y1 = ptr1/ptr2 and ; X2/Y2 = ptr3/ptr4 using the current drawing color. ; -; To deal with off-screen coordinates, the current row -; and column (40x25) is kept track of. These are set -; negative when the point is off the screen, and made -; positive when the point is within the visible screen. -; ; X1,X2 etc. are set up above (x2=LINNUM in particular) ; Format is LINE x2,y2,x1,y1 ; @@ -466,14 +460,14 @@ GETPIXEL: LINE: -@CHECK: lda X2 ;Make sure x1<x2 +@CHECK: lda X2 ; Make sure x1<x2 sec sbc X1 tax lda X2+1 sbc X1+1 bpl @CONT - lda Y2 ;If not, swap P1 and P2 + lda Y2 ; If not, swap P1 and P2 ldy Y1 sta Y1 sty Y2 @@ -494,25 +488,25 @@ LINE: @CONT: sta DX+1 stx DX - ldx #$C8 ;INY - lda Y2 ;Calculate dy + ldx #$C8 ; INY + lda Y2 ; Calculate dy sec sbc Y1 tay lda Y2+1 sbc Y1+1 - bpl @DYPOS ;Is y2>=y1? - lda Y1 ;Otherwise dy=y1-y2 + bpl @DYPOS ; Is y2>=y1? + lda Y1 ; Otherwise dy=y1-y2 sec sbc Y2 tay - ldx #$88 ;DEY + ldx #$88 ; DEY @DYPOS: sty DY ; 8-bit DY -- FIX ME? stx YINCDEC stx XINCDEC - jsr CALC ; Set up .X,.Y,POINT, and INRANGE + jsr CALC ; Set up .X, .Y, and POINT lda BITCHUNK,X sta OLDCHUNK sta CHUNK @@ -522,8 +516,8 @@ LINE: sta $01 ldx DY - cpx DX ;Who's bigger: dy or dx? - bcc STEPINX ;If dx, then... + cpx DX ; Who's bigger: dy or dx? + bcc STEPINX ; If dx, then... lda DX+1 bne STEPINX @@ -541,73 +535,57 @@ LINE: ; Y1 AND #$07 STEPINY: lda #00 - sta OLDCHUNK ;So plotting routine will work right + sta OLDCHUNK ; So plotting routine will work right lda CHUNK - lsr ;Strip the bit + lsr ; Strip the bit eor CHUNK sta CHUNK txa - bne @CONT ;If dy=0 it's just a point - inx -@CONT: lsr ;Init counter to dy/2 + beq YCONT2 ; If dy=0, it's just a point +@CONT: lsr ; Init counter to dy/2 ; ; Main loop ; YLOOP: sta TEMP - lda INRANGE ;Range check - bne @SKIP - - lda (POINT),y ;Otherwise plot + lda (POINT),y eor BITMASK and CHUNK eor (POINT),y sta (POINT),y -@SKIP: YINCDEC: - iny ;Advance Y coordinate + iny ; Advance Y coordinate cpy #8 - bcc @CONT ;No prob if Y=0..7 + bcc @CONT ; No prob if Y=0..7 jsr FIXY -@CONT: lda TEMP ;Restore A +@CONT: lda TEMP ; Restore A sec sbc DX bcc YFIXX -YCONT: dex ;X is counter +YCONT: dex ; X is counter bne YLOOP -YCONT2: lda (POINT),y ;Plot endpoint +YCONT2: lda (POINT),y ; Plot endpoint eor BITMASK and CHUNK eor (POINT),y sta (POINT),y -YDONE: lda #$36 + lda #$36 sta $01 cli rts -YFIXX: ;x=x+1 +YFIXX: ; X = X + 1 adc DY lsr CHUNK - bne YCONT ;If we pass a column boundary... - ror CHUNK ;then reset CHUNK to $80 + bne YCONT ; If we pass a column boundary... + ror CHUNK ; Then reset CHUNK to $80 sta TEMP2 - lda COL - bmi @C1 ;Skip if column is negative - cmp #39 ;End if move past end of screen - bcs YDONE -@C1: lda POINT ;And add 8 to POINT + lda POINT ; And add 8 to POINT adc #8 sta POINT bcc @CONT inc POINT+1 -@CONT: inc COL ;Increment column - bne @C2 - lda ROW ;Range check - cmp #25 - bcs @C2 - lda #00 ;Passed into col 0 - sta INRANGE -@C2: lda TEMP2 +@CONT: lda TEMP2 dex bne YLOOP beq YCONT2 @@ -620,35 +598,34 @@ YFIXX: ;x=x+1 .bss COUNTHI: - .byte $00 ;Temporary counter - ;only used once + .byte $00 ; Temporary counter, only used once .code STEPINX: ldx DX lda DX+1 sta COUNTHI cmp #$80 - ror ;Need bit for initialization - sta Y1 ;High byte of counter + ror ; Need bit for initialization + sta Y1 ; High byte of counter txa - bne @CONT ;Could be $100 + bne @CONT ; Could be $100 dec COUNTHI @CONT: ror ; ; Main loop ; XLOOP: lsr CHUNK - beq XFIXC ;If we pass a column boundary... + beq XFIXC ; If we pass a column boundary... XCONT1: sbc DY - bcc XFIXY ;Time to step in Y? + bcc XFIXY ; Time to step in Y? XCONT2: dex bne XLOOP - dec COUNTHI ;High bits set? + dec COUNTHI ; High bits set? bpl XLOOP -XDONE: lsr CHUNK ;Advance to last point - jsr LINEPLOT ;Plot the last chunk -EXIT: lda #$36 + lsr CHUNK ; Advance to last point + jsr LINEPLOT ; Plot the last chunk + lda #$36 sta $01 cli rts @@ -661,45 +638,34 @@ XFIXC: sta TEMP lda #$FF sta CHUNK sta OLDCHUNK - lda COL - bmi @C1 ;Skip if column is negative - cmp #39 ;End if move past end of screen - bcs EXIT -@C1: lda POINT + lda POINT + clc adc #8 sta POINT - bcc @CONT + lda TEMP + bcc XCONT1 inc POINT+1 -@CONT: inc COL - bne @C2 - lda ROW - cmp #25 - bcs @C2 - lda #00 - sta INRANGE -@C2: lda TEMP - sec - bcs XCONT1 + jmp XCONT1 ; ; Check to make sure there isn't a high bit, plot chunk, ; and update Y-coordinate. ; -XFIXY: dec Y1 ;Maybe high bit set +XFIXY: dec Y1 ; Maybe high bit set bpl XCONT2 adc DX sta TEMP lda DX+1 - adc #$FF ;Hi byte + adc #$FF ; Hi byte sta Y1 - jsr LINEPLOT ;Plot chunk + jsr LINEPLOT ; Plot chunk lda CHUNK sta OLDCHUNK lda TEMP XINCDEC: - iny ;Y-coord - cpy #8 ;0..7 is ok + iny ; Y-coord + cpy #8 ; 0..7 is ok bcc XCONT2 sta TEMP jsr FIXY @@ -711,44 +677,34 @@ XINCDEC: ; room, gray hair, etc.) ; LINEPLOT: ; Plot the line chunk - lda INRANGE - bne @SKIP - - lda (POINT),Y ; Otherwise plot + lda (POINT),Y eor BITMASK ora CHUNK and OLDCHUNK eor CHUNK eor (POINT),Y sta (POINT),Y -@SKIP: rts + rts ; ; Subroutine to fix up pointer when Y decreases through ; zero or increases through 7. ; -FIXY: cpy #255 ;Y=255 or Y=8 +FIXY: cpy #255 ; Y=255 or Y=8 beq @DECPTR -@INCPTR: ;Add 320 to pointer - ldy #0 ;Y increased through 7 - lda ROW - bmi @C1 ;If negative, then don't update - cmp #24 - bcs @TOAST ;If at bottom of screen then quit -@C1: lda POINT + +@INCPTR: ; Add 320 to pointer + ldy #0 ; Y increased through 7 + lda POINT adc #<320 sta POINT lda POINT+1 adc #>320 sta POINT+1 -@CONT1: inc ROW - bne @DONE - lda COL - bpl @CLEAR -@DONE: rts + rts -@DECPTR: ;Okay, subtract 320 then - ldy #7 ;Y decreased through 0 +@DECPTR: ; Okay, subtract 320 then + ldy #7 ; Y decreased through 0 lda POINT sec sbc #<320 @@ -756,21 +712,8 @@ FIXY: cpy #255 ;Y=255 or Y=8 lda POINT+1 sbc #>320 sta POINT+1 -@CONT2: dec ROW - bmi @TOAST - lda ROW - cmp #24 - bne @DONE - lda COL - bmi @DONE -@CLEAR: lda #00 - sta INRANGE rts -@TOAST: pla ;Remove old return address - pla - jmp EXIT ;Restore interrupts, etc. - ; ------------------------------------------------------------------------ ; BAR: Draw a filled rectangle with the corners X1/Y1, X2/Y2, where ; X1/Y1 = ptr1/ptr2 and X2/Y2 = ptr3/ptr4 using the current drawing color. @@ -872,7 +815,7 @@ TEXTSTYLE: OUTTEXT: ; Calculate a pointer to the representation of the character in the -; character ROM +; character ROM ldx #((>(CHARROM + $0800)) >> 3) ldy #0 @@ -895,48 +838,36 @@ OUTTEXT: rts ; ------------------------------------------------------------------------ -; Calculate all variables to plot the pixel at X1/Y1. If the point is out -; of range, a carry is returned and INRANGE is set to a value !0 zero. If -; the coordinates are valid, INRANGE is zero and the carry clear. +; Calculate all variables to plot the pixel at X1/Y1. CALC: lda Y1 - sta ROW + sta TEMP2 and #7 tay lda Y1+1 lsr ; Neg is possible - ror ROW + ror TEMP2 lsr - ror ROW + ror TEMP2 lsr - ror ROW + ror TEMP2 lda #00 sta POINT - lda ROW + lda TEMP2 cmp #$80 ror ror POINT cmp #$80 ror - ror POINT ; row*64 - adc ROW ; +row*256 + ror POINT ; Row * 64 + adc TEMP2 ; + Row * 256 clc - adc #>VBASE ; +bitmap base + adc #>VBASE ; + Bitmap base sta POINT+1 lda X1 tax - sta COL - lda X1+1 - lsr - ror COL - lsr - ror COL - lsr - ror COL - - txa and #$F8 clc adc POINT ; +(X AND #$F8) @@ -947,15 +878,4 @@ CALC: lda Y1 txa and #7 tax - - lda ROW - cmp #25 - bcs @L9 - lda COL - cmp #40 - bcs @L9 - lda #00 -@L9: sta INRANGE rts - - diff --git a/libsrc/c64/tgi_colors.s b/libsrc/c64/tgi_colors.s deleted file mode 100644 index 6ef3729b4..000000000 --- a/libsrc/c64/tgi_colors.s +++ /dev/null @@ -1,8 +0,0 @@ -; -; Target-specific black & white values for use by the target-shared TGI kernel -; - - .include "tgi-kernel.inc" - - .export tgi_color_black:zp = $00 - .export tgi_color_white:zp = $01 diff --git a/libsrc/c64/systime.s b/libsrc/c64/tmcommon.s similarity index 53% rename from libsrc/c64/systime.s rename to libsrc/c64/tmcommon.s index f8cd1b714..ca824946f 100644 --- a/libsrc/c64/systime.s +++ b/libsrc/c64/tmcommon.s @@ -1,60 +1,30 @@ ; -; Stefan Haubenthal, 27.7.2009 +; Oliver Schmidt, 16.8.2018 ; -; time_t _systime (void); -; /* Similar to time(), but: -; ** - Is not ISO C -; ** - Does not take the additional pointer -; ** - Does not set errno when returning -1 -; */ +; Common stuff for the clock routines ; - .include "time.inc" .include "c64.inc" .include "get_tv.inc" - .constructor initsystime - .importzp tmp1, tmp2 + .export TM, load_tenth + + .constructor inittime + .importzp sreg .import _get_tv, _get_ostype ;---------------------------------------------------------------------------- .code -.proc __systime +.proc load_tenth - lda CIA1_TODHR - bpl AM - and #%01111111 - sed - clc - adc #$12 - cld -AM: jsr BCD2dec - sta TM + tm::tm_hour - lda CIA1_TODMIN - jsr BCD2dec - sta TM + tm::tm_min - lda CIA1_TODSEC - jsr BCD2dec - sta TM + tm::tm_sec - lda CIA1_TOD10 ; Dummy read to unfreeze - lda #<TM - ldx #>TM - jmp _mktime - -; dec = (((BCD>>4)*10) + (BCD&0xf)) -BCD2dec:tax - and #%00001111 - sta tmp1 - txa - and #%11110000 ; *16 - lsr ; *8 - sta tmp2 - lsr - lsr ; *2 - adc tmp2 ; = *10 - adc tmp1 + lda #<(100 * 1000 * 1000 / $10000) + ldx #>(100 * 1000 * 1000 / $10000) + sta sreg + stx sreg+1 + lda #<(100 * 1000 * 1000) + ldx #>(100 * 1000 * 1000) rts .endproc @@ -63,9 +33,9 @@ BCD2dec:tax ; Constructor that writes to the 1/10 sec register of the TOD to kick it ; into action. If this is not done, the clock hangs. We will read the register ; and write it again, ignoring a possible change in between. -.segment "INIT" +.segment "ONCE" -.proc initsystime +.proc inittime lda CIA1_TOD10 sta CIA1_TOD10 diff --git a/libsrc/c64/waitvsync.s b/libsrc/c64/waitvsync.s new file mode 100644 index 000000000..a4bf13080 --- /dev/null +++ b/libsrc/c64/waitvsync.s @@ -0,0 +1,18 @@ +; +; Written by Groepaz <groepaz@gmx.net> +; +; void waitvsync (void); +; + + .export _waitvsync + + .include "c64.inc" + +_waitvsync: +@l1: + bit VIC_CTRL1 + bpl @l1 +@l2: + bit VIC_CTRL1 + bmi @l2 + rts diff --git a/libsrc/cbm/c_acptr.s b/libsrc/cbm/c_acptr.s index 87f063a07..b060b614e 100644 --- a/libsrc/cbm/c_acptr.s +++ b/libsrc/cbm/c_acptr.s @@ -4,8 +4,9 @@ ; unsigned char cbm_k_acptr (void); ; + .include "cbm.inc" + .export _cbm_k_acptr - .import ACPTR _cbm_k_acptr: diff --git a/libsrc/cbm/c_basin.s b/libsrc/cbm/c_basin.s index 15d7e7f5c..c2211e9ce 100644 --- a/libsrc/cbm/c_basin.s +++ b/libsrc/cbm/c_basin.s @@ -2,13 +2,16 @@ ; Ullrich von Bassewitz, 03.06.1999 ; ; unsigned char cbm_k_basin (void); +; unsigned char cbm_k_chrin (void); ; - .export _cbm_k_basin - .import BASIN + .include "cbm.inc" + + .export _cbm_k_basin, _cbm_k_chrin _cbm_k_basin: +_cbm_k_chrin: jsr BASIN ldx #0 ; Clear high byte rts diff --git a/libsrc/cbm/c_bsout.s b/libsrc/cbm/c_bsout.s index 8b9f44037..cec46bf90 100644 --- a/libsrc/cbm/c_bsout.s +++ b/libsrc/cbm/c_bsout.s @@ -2,9 +2,12 @@ ; Ullrich von Bassewitz, 03.06.1999 ; ; void __fastcall__ cbm_k_bsout (unsigned char C); +; void __fastcall__ cbm_k_chrout (unsigned char C); ; - .export _cbm_k_bsout - .import BSOUT + .include "cbm.inc" -_cbm_k_bsout = BSOUT + .export _cbm_k_bsout, _cbm_k_chrout + +_cbm_k_bsout := BSOUT +_cbm_k_chrout := CHROUT diff --git a/libsrc/cbm/c_chkin.s b/libsrc/cbm/c_chkin.s index 4ed8c1bff..490adcefc 100644 --- a/libsrc/cbm/c_chkin.s +++ b/libsrc/cbm/c_chkin.s @@ -4,8 +4,10 @@ ; unsigned char __fastcall__ cbm_k_chkin (unsigned char FN); ; + .include "cbm.inc" + .export _cbm_k_chkin - .import CHKIN + _cbm_k_chkin: tax diff --git a/libsrc/cbm/c_ciout.s b/libsrc/cbm/c_ciout.s index 9906e0658..baf9e4735 100644 --- a/libsrc/cbm/c_ciout.s +++ b/libsrc/cbm/c_ciout.s @@ -4,7 +4,7 @@ ; void __fastcall__ cbm_k_ciout (unsigned char C); ; - .import CIOUT + + .include "cbm.inc" + .export _cbm_k_ciout := CIOUT - - diff --git a/libsrc/cbm/c_ckout.s b/libsrc/cbm/c_ckout.s index 380d7170a..46a5804dd 100644 --- a/libsrc/cbm/c_ckout.s +++ b/libsrc/cbm/c_ckout.s @@ -4,8 +4,9 @@ ; unsigned char __fastcall__ cbm_k_ckout (unsigned char FN); ; + .include "cbm.inc" + .export _cbm_k_ckout - .import CKOUT _cbm_k_ckout: diff --git a/libsrc/cbm/c_clall.s b/libsrc/cbm/c_clall.s index cdd7d4ddc..406d4f5cc 100644 --- a/libsrc/cbm/c_clall.s +++ b/libsrc/cbm/c_clall.s @@ -4,5 +4,6 @@ ; void cbm_k_clall (void); ; - .import CLALL + .include "cbm.inc" + .export _cbm_k_clall := CLALL diff --git a/libsrc/cbm/c_close.s b/libsrc/cbm/c_close.s index 9582baca2..50d35b67c 100644 --- a/libsrc/cbm/c_close.s +++ b/libsrc/cbm/c_close.s @@ -4,11 +4,10 @@ ; void __fastcall__ cbm_k_close (unsigned char FN); ; + .include "cbm.inc" + .export _cbm_k_close - .import CLOSE _cbm_k_close: - clc + clc jmp CLOSE - - diff --git a/libsrc/cbm/c_clrch.s b/libsrc/cbm/c_clrch.s index 7c0506a1c..e537f4553 100644 --- a/libsrc/cbm/c_clrch.s +++ b/libsrc/cbm/c_clrch.s @@ -4,7 +4,8 @@ ; void cbm_k_clrch (void); ; + .include "cbm.inc" + .export _cbm_k_clrch - .import CLRCH _cbm_k_clrch = CLRCH diff --git a/libsrc/cbm/c_getin.s b/libsrc/cbm/c_getin.s index b4cb34f76..43009e91a 100644 --- a/libsrc/cbm/c_getin.s +++ b/libsrc/cbm/c_getin.s @@ -4,9 +4,9 @@ ; unsigned char cbm_k_getin (void); ; - .export _cbm_k_getin - .import GETIN + .include "cbm.inc" + .export _cbm_k_getin _cbm_k_getin: jsr GETIN diff --git a/libsrc/cbm/c_iobase.s b/libsrc/cbm/c_iobase.s index 254879017..9c77506e2 100644 --- a/libsrc/cbm/c_iobase.s +++ b/libsrc/cbm/c_iobase.s @@ -4,10 +4,11 @@ ; unsigned cbm_k_iobase (void); ; - .export _cbm_k_iobase - .import IOBASE + .include "cbm.inc" -_cbm_k_iobase: + .export _cbm_k_iobase + +_cbm_k_iobase: jsr IOBASE txa pha diff --git a/libsrc/cbm/c_listen.s b/libsrc/cbm/c_listen.s index 85ef8b7fa..43859944f 100644 --- a/libsrc/cbm/c_listen.s +++ b/libsrc/cbm/c_listen.s @@ -4,10 +4,6 @@ ; void __fastcall__ cbm_k_listen (unsigned char dev); ; - .import LISTEN + .include "cbm.inc" + .export _cbm_k_listen := LISTEN - - - - - diff --git a/libsrc/cbm/c_load.s b/libsrc/cbm/c_load.s index f2b5b0c89..d81430a03 100644 --- a/libsrc/cbm/c_load.s +++ b/libsrc/cbm/c_load.s @@ -4,8 +4,9 @@ ; unsigned int __fastcall__ cbm_k_load (unsigned char flag, unsigned addr); ; + .include "cbm.inc" + .export _cbm_k_load - .import LOAD .import __oserror .import popa .importzp ptr1 @@ -27,4 +28,3 @@ _cbm_k_load: tax pla rts - diff --git a/libsrc/cbm/c_open.s b/libsrc/cbm/c_open.s index 6461ffedf..a4462ff47 100644 --- a/libsrc/cbm/c_open.s +++ b/libsrc/cbm/c_open.s @@ -4,8 +4,9 @@ ; unsigned char cbm_k_open (void); ; + .include "cbm.inc" + .export _cbm_k_open - .import OPEN _cbm_k_open: diff --git a/libsrc/cbm/c_readst.s b/libsrc/cbm/c_readst.s index 301cd9b42..bcaacbbae 100644 --- a/libsrc/cbm/c_readst.s +++ b/libsrc/cbm/c_readst.s @@ -1,14 +1,15 @@ ; -; Ullrich von Bassewitz, 03.06.1999 +; 1999-06-03, Ullrich von Bassewitz +; 2021-01-12, Greg King ; ; unsigned char cbm_k_readst (void); ; + .include "cbm.inc" + .export _cbm_k_readst - .import READST _cbm_k_readst: - jsr READST - ldx #0 ; Clear high byte - rts + ldx #>$0000 + jmp READST diff --git a/libsrc/cbm/c_save.s b/libsrc/cbm/c_save.s index dfdb7df42..bd2e32bc4 100644 --- a/libsrc/cbm/c_save.s +++ b/libsrc/cbm/c_save.s @@ -4,18 +4,17 @@ ; unsigned char __fastcall__ cbm_k_save(unsigned int start, unsigned int end); ; + .include "cbm.inc" + .export _cbm_k_save - .import SAVE - .import popax + .import popptr1 .importzp ptr1, tmp1 _cbm_k_save: sta tmp1 ; store end address stx tmp1+1 - jsr popax ; pop start address - sta ptr1 - stx ptr1+1 + jsr popptr1 ; pop start address lda #ptr1 ldx tmp1 ldy tmp1+1 diff --git a/libsrc/cbm/c_scnkey.s b/libsrc/cbm/c_scnkey.s new file mode 100644 index 000000000..0fb74a46e --- /dev/null +++ b/libsrc/cbm/c_scnkey.s @@ -0,0 +1,9 @@ +; +; 2016-08-07, Greg King +; +; void cbm_k_scnkey (void); +; + + .include "cbm.inc" + + .export _cbm_k_scnkey := SCNKEY diff --git a/libsrc/cbm/c_second.s b/libsrc/cbm/c_second.s new file mode 100644 index 000000000..6902a2a68 --- /dev/null +++ b/libsrc/cbm/c_second.s @@ -0,0 +1,11 @@ +; +; Bas Wassink, 23.05.2018 +; +; void __fastcall__ cbm_k_second (unsigned char addr) +; + + .include "cbm.inc" + + .export _cbm_k_second + +_cbm_k_second = SECOND diff --git a/libsrc/cbm/c_setlfs.s b/libsrc/cbm/c_setlfs.s index 00ebfae7a..47ef213c3 100644 --- a/libsrc/cbm/c_setlfs.s +++ b/libsrc/cbm/c_setlfs.s @@ -6,11 +6,12 @@ ; unsigned char SA); ; + .include "cbm.inc" + .export _cbm_k_setlfs - .import SETLFS .import popa .importzp tmp1 - + _cbm_k_setlfs: sta tmp1 ; Save SA @@ -19,5 +20,3 @@ _cbm_k_setlfs: jsr popa ; Get LFN ldy tmp1 ; Get SA jmp SETLFS - - diff --git a/libsrc/cbm/c_setnam.s b/libsrc/cbm/c_setnam.s index 3249d8539..d13394835 100644 --- a/libsrc/cbm/c_setnam.s +++ b/libsrc/cbm/c_setnam.s @@ -4,10 +4,11 @@ ; void __fastcall__ cbm_k_setnam (const char* Name); ; + .include "cbm.inc" + .export _cbm_k_setnam - .import SETNAM .importzp ptr1 - + _cbm_k_setnam: sta ptr1 ; Store pointer to file name @@ -21,4 +22,3 @@ _cbm_k_setnam: ldx ptr1 ldy ptr1+1 jmp SETNAM - diff --git a/libsrc/cbm/c_settim.s b/libsrc/cbm/c_settim.s new file mode 100644 index 000000000..5206557f4 --- /dev/null +++ b/libsrc/cbm/c_settim.s @@ -0,0 +1,16 @@ +; +; 2020-01-08, Greg King +; +; void __fastcall__ cbm_k_settim (unsigned long timer); +; + + .export _cbm_k_settim + .importzp sreg + + .include "cbm.inc" + + +.proc _cbm_k_settim + ldy sreg + jmp SETTIM +.endproc diff --git a/libsrc/cbm/c_talk.s b/libsrc/cbm/c_talk.s index ff80b3499..7b1d7d6ce 100644 --- a/libsrc/cbm/c_talk.s +++ b/libsrc/cbm/c_talk.s @@ -4,12 +4,6 @@ ; void __fastcall__ cbm_k_talk (unsigned char dev); ; - .import TALK + .include "cbm.inc" + .export _cbm_k_talk := TALK - - - - - - - diff --git a/libsrc/cbm/c_tksa.s b/libsrc/cbm/c_tksa.s new file mode 100644 index 000000000..8576375be --- /dev/null +++ b/libsrc/cbm/c_tksa.s @@ -0,0 +1,11 @@ +; +; Bas Wassink, 22.05.2018 +; +; void __fastcall__ cbm_k_tksa (unsigned char addr) +; + + .include "cbm.inc" + + .export _cbm_k_tksa + +_cbm_k_tksa = TKSA diff --git a/libsrc/cbm/c_udtim.s b/libsrc/cbm/c_udtim.s new file mode 100644 index 000000000..19447d6f4 --- /dev/null +++ b/libsrc/cbm/c_udtim.s @@ -0,0 +1,9 @@ +; +; 2016-08-07, Greg King +; +; void cbm_k_udtim (void); +; + + .include "cbm.inc" + + .export _cbm_k_udtim := UDTIM diff --git a/libsrc/cbm/c_unlsn.s b/libsrc/cbm/c_unlsn.s index fd6b1b074..39d8eea71 100644 --- a/libsrc/cbm/c_unlsn.s +++ b/libsrc/cbm/c_unlsn.s @@ -4,5 +4,6 @@ ; void cbm_k_unlsn (void); ; - .import UNLSN + .include "cbm.inc" + .export _cbm_k_unlsn := UNLSN diff --git a/libsrc/cbm/c_untlk.s b/libsrc/cbm/c_untlk.s index 1d71c168b..68fba208f 100644 --- a/libsrc/cbm/c_untlk.s +++ b/libsrc/cbm/c_untlk.s @@ -1,11 +1,11 @@ ; ; Ullrich von Bassewitz, 03.06.1999 ; -; void cbm_untlk (void); +; void cbm_k_untlk (void); ; - .export _cbm_untlk - .import UNTLK + .include "cbm.inc" + .export _cbm_k_untlk -_cbm_untlk = UNTLK +_cbm_k_untlk = UNTLK diff --git a/libsrc/cbm/cbm.inc b/libsrc/cbm/cbm.inc index 0e513ffe8..4fdcb67a7 100644 --- a/libsrc/cbm/cbm.inc +++ b/libsrc/cbm/cbm.inc @@ -7,46 +7,51 @@ ; Subroutines available in the CBM jump table ; -;CINT = $FF81 -;IOINIT = $FF84 -;RAMTAS = $FF87 -;RESTOR = $FF8A -;VECTOR = $FF8D -;SETMSG = $FF90 -;SECOND = $FF93 -;TKSA = $FF96 -;MEMTOP = $FF99 -;MEMBOT = $FF9C -;SCNKEY = $FF9F -;SETTMO = $FFA2 -;ACPTR = $FFA5 -;CIOUT = $FFA8 -;UNTLK = $FFAB -;UNLSN = $FFAE -;LISTEN = $FFB1 -;TALK = $FFB4 -;READST = $FFB7 -;SETLFS = $FFBA -;SETNAM = $FFBD -;OPEN = $FFC0 -;CLOSE = $FFC3 -;CHKIN = $FFC6 -;CKOUT = $FFC9 -;CLRCH = $FFCC -;BASIN = $FFCF -;BSOUT = $FFD2 -;LOAD = $FFD5 -;SAVE = $FFD8 -;SETTIM = $FFDB -;RDTIM = $FFDE -;STOP = $FFE1 -;GETIN = $FFE4 -;CLALL = $FFE7 -;UDTIM = $FFEA -;SCREEN = $FFED -;PLOT = $FFF0 -;IOBASE = $FFF3 +.import C64MODE +.import SWAPPER +.import SETBNK +.import CINT +.import IOINIT +.import RAMTAS +.import VECTOR +.import RESTOR +.import SETMSG +.import SECOND +.import TKSA +.import MEMTOP +.import MEMBOT +.import SCNKEY +.import SETTMO +.import ACPTR +.import CIOUT +.import UNTLK +.import UNLSN +.import LISTEN +.import TALK +.import READST +.import SETLFS +.import SETNAM +.import OPEN +.import CLOSE +.import LOAD +.import SAVE +.import SETTIM +.import RDTIM +.import SCREEN +.import PLOT +.import IOBASE +.import CHKIN +.import CKOUT +.import CLRCH +.import BASIN +.import CHRIN +.import BSOUT +.import CHROUT +.import STOP +.import GETIN +.import CLALL +.import UDTIM ;----------------------------------------------------------------------------- ; Device numbers @@ -63,5 +68,3 @@ CBMDEV_SCREEN = 3 MAX_DRIVES = 23 FIRST_DRIVE = 8 - - diff --git a/libsrc/cbm/cbm_dir.c b/libsrc/cbm/cbm_dir.c index 8f31c502a..4b8927f98 100644 --- a/libsrc/cbm/cbm_dir.c +++ b/libsrc/cbm/cbm_dir.c @@ -6,6 +6,7 @@ /* 2009-10-10 -- Version 0.3 */ /* 2011-04-07 -- Version 0.4, groepaz */ /* 2011-04-14 -- Version 0.5, Greg King */ +/* 2021-02-15 -- Version 0.6, Greg King */ /* Tested with floppy-drive and IDE64 devices. */ /* Not tested with messed (buggy) directory listings. */ @@ -29,7 +30,7 @@ unsigned char cbm_opendir (unsigned char lfn, unsigned char device, ...) va_list ap; const char* name = "$"; - /* The name used in cbm_open may optionally be passed */ + /* The name used in cbm_open() optionally may be passed */ if (__argsize__ == 4) { va_start (ap, device); name = va_arg (ap, const char*); @@ -76,9 +77,10 @@ unsigned char __fastcall__ cbm_readdir (unsigned char lfn, register struct cbm_d byte = cbm_k_basin(); switch (byte) { - - /* "B" BLOCKS FREE. */ + /* "B" BLOCKS FREE/USED. */ + /* "M" MB FREE. */ case 'b': + case 'm': /* Read until end; careless callers might call us again. */ while (!cbm_k_readst()) { cbm_k_basin(); @@ -168,7 +170,6 @@ unsigned char __fastcall__ cbm_readdir (unsigned char lfn, register struct cbm_d } rv = 0; - goto ret_val; } } diff --git a/libsrc/cbm/cbm_open.s b/libsrc/cbm/cbm_open.s index 1842fc149..db4179db8 100644 --- a/libsrc/cbm/cbm_open.s +++ b/libsrc/cbm/cbm_open.s @@ -1,5 +1,6 @@ ; -; Ullrich von Bassewitz, 22.06.2002 +; 2002-06-22, Ullrich von Bassewitz +; 2021-12-23, Greg King ; ; Original C code by Marc 'BlackJack' Rintsch, 18.03.2001 ; @@ -19,26 +20,17 @@ ; .export _cbm_open + .import popa .import _cbm_k_setlfs, _cbm_k_setnam, _cbm_k_open .import __oserror _cbm_open: - pha - txa - pha ; Save name + jsr _cbm_k_setnam jsr popa ; Get sec_addr jsr _cbm_k_setlfs ; Call SETLFS, pop all args - pla - tax - pla ; Get name - jsr _cbm_k_setnam - jsr _cbm_k_open sta __oserror - rts - - diff --git a/libsrc/cbm/cbm_read.s b/libsrc/cbm/cbm_read.s index c84ff65aa..29e0e1f19 100644 --- a/libsrc/cbm/cbm_read.s +++ b/libsrc/cbm/cbm_read.s @@ -39,18 +39,17 @@ .include "cbm.inc" .export _cbm_read - .import CHKIN, READST, BASIN, CLRCH .importzp ptr1, ptr2, ptr3, tmp1 .import popax, popa .import __oserror _cbm_read: - eor #$FF - sta ptr1 - txa - eor #$FF - sta ptr1+1 ; Save -size-1 + inx + stx ptr1+1 + tax + inx + stx ptr1 ; Save size with both bytes incremented separately. jsr popax sta ptr2 @@ -93,9 +92,9 @@ _cbm_read: bne @L3 inc ptr3+1 ; ++bytesread; -@L3: inc ptr1 +@L3: dec ptr1 bne @L1 - inc ptr1+1 + dec ptr1+1 bne @L1 @L4: jsr CLRCH diff --git a/libsrc/cbm/cbm_save.c b/libsrc/cbm/cbm_save.c index 7f774b1b6..2e22b89fc 100644 --- a/libsrc/cbm/cbm_save.c +++ b/libsrc/cbm/cbm_save.c @@ -12,9 +12,9 @@ /* saves a memory area from start to end-1 to a file. */ -unsigned char __fastcall__ cbm_save (const char* name, +unsigned char __fastcall__ cbm_save (const char* name, unsigned char device, - const void* data, + const void* data, unsigned int size) { cbm_k_setlfs(0, device, 0); diff --git a/libsrc/cbm/cbm_write.s b/libsrc/cbm/cbm_write.s index 0b709dff8..5ac07209c 100644 --- a/libsrc/cbm/cbm_write.s +++ b/libsrc/cbm/cbm_write.s @@ -31,20 +31,19 @@ .include "cbm.inc" .export _cbm_write - .import CKOUT, READST, BSOUT, CLRCH .importzp ptr1, ptr2, ptr3 .import popax, popa .import __oserror - + _cbm_write: sta ptr3 stx ptr3+1 ; Save size - eor #$FF - sta ptr1 - txa - eor #$FF - sta ptr1+1 ; Save -size-1 + inx + stx ptr1+1 + tax + inx + stx ptr1 ; Save size with both bytes incremented separately jsr popax sta ptr2 @@ -70,9 +69,9 @@ _cbm_write: @L2: jsr BSOUT ; cbm_k_bsout (A); -@L3: inc ptr1 ; --size; +@L3: dec ptr1 ; --size; bne @L1 - inc ptr1+1 + dec ptr1+1 bne @L1 jsr CLRCH diff --git a/libsrc/cbm/cclear.s b/libsrc/cbm/cclear.s index 233c112c6..e6277eed0 100644 --- a/libsrc/cbm/cclear.s +++ b/libsrc/cbm/cclear.s @@ -6,25 +6,20 @@ ; .export _cclearxy, _cclear - .import popa, _gotoxy, cputdirect + .import gotoxy, cputdirect .importzp tmp1 _cclearxy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length and run into _cclear _cclear: cmp #0 ; Is the length zero? beq L9 ; Jump if done - sta tmp1 + sta tmp1 L1: lda #$20 ; Blank - screen code jsr cputdirect ; Direct output dec tmp1 bne L1 L9: rts - - - - diff --git a/libsrc/cbm/chline.s b/libsrc/cbm/chline.s index fe7e7255d..73782f344 100644 --- a/libsrc/cbm/chline.s +++ b/libsrc/cbm/chline.s @@ -6,13 +6,12 @@ ; .export _chlinexy, _chline - .import popa, _gotoxy, cputdirect + .import gotoxy, cputdirect .importzp tmp1, chlinechar _chlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length _chline: @@ -24,7 +23,3 @@ L1: lda #chlinechar ; Horizontal line, screen code dec tmp1 bne L1 L9: rts - - - - diff --git a/libsrc/cbm/clock.s b/libsrc/cbm/clock.s index ce36e3af5..90e4263a8 100644 --- a/libsrc/cbm/clock.s +++ b/libsrc/cbm/clock.s @@ -1,22 +1,30 @@ ; -; Ullrich von Bassewitz, 21.09.1998 +; 1998-09-21, Ullrich von Bassewitz +; 2019-12-25, Greg King ; ; clock_t clock (void); ; .export _clock - .import RDTIM .importzp sreg + .include "cbm.inc" + .macpack cpu .proc _clock - lda #0 ; Byte 3 is always zero - sta sreg+1 +; Some accelerator adaptors have CMOS ICs. + +.if (.cpu & ::CPU_ISET_65SC02) + stz sreg + 1 +.else + lda #$00 ; Byte 3 always is zero + sta sreg + 1 +.endif + jsr RDTIM sty sreg rts .endproc - diff --git a/libsrc/cbm/close.s b/libsrc/cbm/close.s index 004b88df9..7fc600e87 100644 --- a/libsrc/cbm/close.s +++ b/libsrc/cbm/close.s @@ -6,7 +6,6 @@ .export _close - .import CLOSE .import readdiskerror, closecmdchannel .importzp tmp2 @@ -17,7 +16,7 @@ ;-------------------------------------------------------------------------- ; _close - + .proc _close ; Check if we have a valid handle @@ -40,7 +39,7 @@ lda #LFN_CLOSED sta fdtab,x - lda tmp2 ; Get the handle + txa ; Get handle clc adc #LFN_OFFS ; Make LFN from handle jsr CLOSE @@ -64,7 +63,3 @@ invalidfd: jmp __directerrno ; Set _errno, clear _oserror, return -1 .endproc - - - - diff --git a/libsrc/cbm/cpeekc.s b/libsrc/cbm/cpeekc.s new file mode 100644 index 000000000..05c7fc718 --- /dev/null +++ b/libsrc/cbm/cpeekc.s @@ -0,0 +1,53 @@ +; +; 2016-02-28, Groepaz +; 2017-06-22, Greg King +; +; char cpeekc (void); +; + + .export _cpeekc + +; Get a system-specific file. +; Note: The cbm610, and c128 targets need special +; versions that handle RAM banking and the 80-column VDC. + +.if .def(__C16__) + .include "plus4.inc" ; both C16 and Plus4 +.elseif .def(__C64__) + .include "c64.inc" +.elseif .def(__CBM510__) + .import CURS_X: zp, SCREEN_PTR: zp + .include "cbm510.inc" +.elseif .def(__PET__) + .include "pet.inc" +.elseif .def(__VIC20__) + .include "vic20.inc" +.endif + + +_cpeekc: + ldy CURS_X + lda (SCREEN_PTR),y ; get screen code + ldx #>$0000 + and #<~$80 ; remove reverse bit + +; Convert the screen code into a PetSCII code. +; $00 - $1F: +$40 +; $20 - $3F +; $40 - $5f: +$20 +; $60 - $7F: +$40 + + cmp #$20 + bcs @sk1 ;(bge) + ora #$40 + rts + +@sk1: cmp #$40 + bcc @end ;(blt) + cmp #$60 + bcc @sk2 ;(blt) + ;sec + adc #$20 - $01 +@sk2: ;clc ; both above cmp and adc clear carry flag + adc #$20 +@end: rts diff --git a/libsrc/cbm/cpeekcolor.s b/libsrc/cbm/cpeekcolor.s new file mode 100644 index 000000000..9c961b771 --- /dev/null +++ b/libsrc/cbm/cpeekcolor.s @@ -0,0 +1,28 @@ +; +; 2016-02-28, Groepaz +; 2017-06-22, Greg King +; +; unsigned char cpeekcolor (void); +; + + .export _cpeekcolor + +; Get a system-specific file. +; Note: The cbm510, cbm610, c128, and Pet targets need special +; versions that handle RAM banking, the 80-column VDC, and monochrome. + +.if .def(__C16__) + .include "plus4.inc" ; both C16 and Plus4 +.elseif .def(__C64__) + .include "c64.inc" +.elseif .def(__VIC20__) + .include "vic20.inc" +.endif + + +_cpeekcolor: + ldy CURS_X + lda (CRAM_PTR),y ; get color + and #$0F + ldx #>$0000 + rts diff --git a/libsrc/cbm/cpeekrevers.s b/libsrc/cbm/cpeekrevers.s new file mode 100644 index 000000000..e8e210167 --- /dev/null +++ b/libsrc/cbm/cpeekrevers.s @@ -0,0 +1,35 @@ +; +; 2016-02-28, Groepaz +; 2017-06-15, Greg King +; +; unsigned char cpeekrevers (void); +; + + .export _cpeekrevers + +; Get a system-specific file. +; Note: The cbm610, and c128 targets need special +; versions that handle RAM banking and the 80-column VDC. + +.if .def(__C16__) + .include "plus4.inc" ; both C16 and Plus4 +.elseif .def(__C64__) + .include "c64.inc" +.elseif .def(__CBM510__) + .import CURS_X: zp, SCREEN_PTR: zp + .include "cbm510.inc" +.elseif .def(__PET__) + .include "pet.inc" +.elseif .def(__VIC20__) + .include "vic20.inc" +.endif + + +_cpeekrevers: + ldy CURS_X + lda (SCREEN_PTR),y ; get screen code + and #$80 ; get reverse bit + asl a + tax ; ldx #>$0000 + rol a ; return boolean value + rts diff --git a/libsrc/cbm/cpeeks.s b/libsrc/cbm/cpeeks.s new file mode 100644 index 000000000..215998e37 --- /dev/null +++ b/libsrc/cbm/cpeeks.s @@ -0,0 +1,93 @@ +; +; 2017-07-05, Greg King +; +; void cpeeks (char* s, unsigned length); +; + + .export _cpeeks + + .import popax + .importzp ptr1, ptr2, ptr3, tmp1, tmp2 + + .macpack generic + +; Get a system-specific file. +; Note: The cbm610, and c128 targets need special +; versions that handle RAM banking and the 80-column VDC. + +.if .def(__C16__) + .include "plus4.inc" ; both C16 and Plus4 +.elseif .def(__C64__) + .include "c64.inc" +.elseif .def(__CBM510__) + .import CURS_X: zp, SCREEN_PTR: zp + .include "cbm510.inc" +.elseif .def(__PET__) + .include "pet.inc" +.elseif .def(__VIC20__) + .include "vic20.inc" +.endif + + +_cpeeks: + eor #<$FFFF ; counting a word upward is faster + sta ptr3 ; so, we use -(length + 1) + txa + eor #>$FFFF + sta ptr3+1 + + lda SCREEN_PTR + ldx SCREEN_PTR+1 + sta ptr2 + stx ptr2+1 + ldy CURS_X + sty tmp2 + + jsr popax + sta tmp1 ; (will be a .Y index) + stx ptr1+1 + ldx #<$0000 + stx ptr1 + bze L3 ; branch always + +L4: ldy tmp2 + lda (ptr2),y ; get char + iny + bnz L2 + inc ptr2+1 +L2: sty tmp2 + and #<~$80 ; remove reverse bit + +; Convert the screen code into a PetSCII code. +; $00 - $1F: +$40 +; $20 - $3F +; $40 - $5f: +$20 +; $60 - $7F: +$40 + + cmp #$20 + blt @sk1 ;(bcc) + cmp #$40 + blt L5 + cmp #$60 + blt @sk2 ;(bcc) + clc +@sk1: adc #$20 +@sk2: ;clc ; both above cmp and adc clear carry flag + adc #$20 + +L5: ldy tmp1 + sta (ptr1),y + iny + bnz L1 + inc ptr1+1 +L1: sty tmp1 + +L3: inc ptr3 ; count length + bnz L4 + inc ptr3+1 + bnz L4 + + txa ; terminate the string + ldy tmp1 + sta (ptr1),y + rts diff --git a/libsrc/cbm/ctype.s b/libsrc/cbm/ctype.s index ba096bb13..a66905fe7 100644 --- a/libsrc/cbm/ctype.s +++ b/libsrc/cbm/ctype.s @@ -1,289 +1,156 @@ +; ctype.s ; -; Character specification table. +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems ; -; Ullrich von Bassewitz, 02.06.1998 -; 2003-05-02, Greg King +; https://cc65.github.io ; - -; The following 256-byte-wide table specifies attributes for the isxxx type -; of functions. Doing it by a table means some overhead in space, but it -; has major advantages: +; See "LICENSE" file for legal information. ; -; * It is fast. If it weren't for the slow parameter-passing of cc65, -; one even could define C-language macroes for the isxxx functions -; (as it usually is done, on other platforms). +; CBM character specification table. ; -; * It is highly portable. The only unportable part is the table itself; -; all real code goes into the common library. -; -; * We save some code in the isxxx functions. - ; This table is taken from Craig S. Bruce's technical docs. for the ACE OS. - .include "ctype.inc" + .include "ctypetable.inc" + .export __ctypeidx -; The table is read-only, put it into the RODATA segment. +; The tables are readonly, put them into the rodata segment - .rodata +.rodata -__ctype: - .byte CT_CTRL ; 0/00 ___rvs_@___ - .byte CT_CTRL ; 1/01 ___rvs_a___ - .byte CT_CTRL ; 2/02 ___rvs_b___ - .byte CT_CTRL ; 3/03 ___rvs_c___ - .byte CT_CTRL ; 4/04 ___rvs_d___ - .byte CT_CTRL ; 5/05 ___rvs_e___ - .byte CT_CTRL ; 6/06 ___rvs_f___ - .byte CT_CTRL ; 7/07 _BEL/rvs_g_ - .byte CT_CTRL ; 8/08 ___rvs_h___ - .byte CT_CTRL | CT_OTHER_WS | CT_SPACE_TAB ; 9/09 _TAB/rvs_i_ - .byte CT_CTRL | CT_OTHER_WS ; 10/0a _BOL/rvs_j_ - .byte CT_CTRL ; 11/0b ___rvs_k___ - .byte CT_CTRL ; 12/0c ___rvs_l___ - .byte CT_CTRL | CT_OTHER_WS ; 13/0d _CR_/rvs_m_ - .byte CT_CTRL ; 14/0e ___rvs_n___ - .byte CT_CTRL ; 15/0f ___rvs_o___ - .byte CT_CTRL ; 16/10 ___rvs_p___ - .byte CT_CTRL | CT_OTHER_WS ; 17/11 _VT_/rvs_q_ - .byte CT_CTRL ; 18/12 ___rvs_r___ - .byte CT_CTRL | CT_OTHER_WS ; 19/13 HOME/rvs_s_ - .byte CT_CTRL | CT_OTHER_WS ; 20/14 _BS_/rvs_t_ - .byte CT_CTRL ; 21/15 ___rvs_u___ - .byte CT_CTRL ; 22/16 ___rvs_v___ - .byte CT_CTRL ; 23/17 ___rvs_w___ - .byte CT_CTRL ; 24/18 ___rvs_x___ - .byte CT_CTRL ; 25/19 ___rvs_y___ - .byte CT_CTRL ; 26/1a ___rvs_z___ - .byte CT_CTRL ; 27/1b ___rvs_[___ - .byte CT_CTRL ; 28/1c ___rvs_\___ - .byte CT_CTRL | CT_OTHER_WS ; 29/1d cursr-right - .byte CT_CTRL ; 30/1e ___rvs_^___ - .byte CT_CTRL ; 31/1f _rvs_under_ - .byte CT_SPACE | CT_SPACE_TAB ; 32/20 ___SPACE___ - .byte $00 ; 33/21 _____!_____ - .byte $00 ; 34/22 _____"_____ - .byte $00 ; 35/23 _____#_____ - .byte $00 ; 36/24 _____$_____ - .byte $00 ; 37/25 _____%_____ - .byte $00 ; 38/26 _____&_____ - .byte $00 ; 39/27 _____'_____ - .byte $00 ; 40/28 _____(_____ - .byte $00 ; 41/29 _____)_____ - .byte $00 ; 42/2a _____*_____ - .byte $00 ; 43/2b _____+_____ - .byte $00 ; 44/2c _____,_____ - .byte $00 ; 45/2d _____-_____ - .byte $00 ; 46/2e _____._____ - .byte $00 ; 47/2f _____/_____ - .byte CT_DIGIT | CT_XDIGIT ; 48/30 _____0_____ - .byte CT_DIGIT | CT_XDIGIT ; 49/31 _____1_____ - .byte CT_DIGIT | CT_XDIGIT ; 50/32 _____2_____ - .byte CT_DIGIT | CT_XDIGIT ; 51/33 _____3_____ - .byte CT_DIGIT | CT_XDIGIT ; 52/34 _____4_____ - .byte CT_DIGIT | CT_XDIGIT ; 53/35 _____5_____ - .byte CT_DIGIT | CT_XDIGIT ; 54/36 _____6_____ - .byte CT_DIGIT | CT_XDIGIT ; 55/37 _____7_____ - .byte CT_DIGIT | CT_XDIGIT ; 56/38 _____8_____ - .byte CT_DIGIT | CT_XDIGIT ; 57/39 _____9_____ - .byte $00 ; 58/3a _____:_____ - .byte $00 ; 59/3b _____;_____ - .byte $00 ; 60/3c _____<_____ - .byte $00 ; 61/3d _____=_____ - .byte $00 ; 62/3e _____>_____ - .byte $00 ; 63/3f _____?_____ +__ctypeidx: + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 0/00 ___rvs_@___, 1/01 ___rvs_a___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 2/02 ___rvs_b___, 3/03 ___rvs_c___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 4/04 ___rvs_d___, 5/05 ___rvs_e___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 6/06 ___rvs_f___, 7/07 _BEL/rvs_g_ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_SPACETAB_IDX ; 8/08 ___rvs_h___, 9/09 _TAB/rvs_i_ + ct_mix CT_CTRL_WS_IDX, CT_CTRL_IDX ; 10/0a _BOL/rvs_j_, 11/0b ___rvs_k___ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_IDX ; 12/0c ___rvs_l___, 13/0d _CR_/rvs_m_ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 14/0e ___rvs_n___, 15/0f ___rvs_o___ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_IDX ; 16/10 ___rvs_p___, 17/11 _VT_/rvs_q_ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_IDX ; 18/12 ___rvs_r___, 19/13 HOME/rvs_s_ + ct_mix CT_CTRL_WS_IDX, CT_CTRL_IDX ; 20/14 _BS_/rvs_t_, 21/15 ___rvs_u___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 22/16 ___rvs_v___, 23/17 ___rvs_w___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 24/18 ___rvs_x___, 25/19 ___rvs_y___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 26/1a ___rvs_z___, 27/1b ___rvs_[___ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_IDX ; 28/1c ___rvs_\___, 29/1d cursr-right + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 30/1e ___rvs_^___, 31/1f _rvs_under_ - .byte $00 ; 64/40 _____@_____ - .byte CT_LOWER | CT_XDIGIT ; 65/41 _____a_____ - .byte CT_LOWER | CT_XDIGIT ; 66/42 _____b_____ - .byte CT_LOWER | CT_XDIGIT ; 67/43 _____c_____ - .byte CT_LOWER | CT_XDIGIT ; 68/44 _____d_____ - .byte CT_LOWER | CT_XDIGIT ; 69/45 _____e_____ - .byte CT_LOWER | CT_XDIGIT ; 70/46 _____f_____ - .byte CT_LOWER ; 71/47 _____g_____ - .byte CT_LOWER ; 72/48 _____h_____ - .byte CT_LOWER ; 73/49 _____i_____ - .byte CT_LOWER ; 74/4a _____j_____ - .byte CT_LOWER ; 75/4b _____k_____ - .byte CT_LOWER ; 76/4c _____l_____ - .byte CT_LOWER ; 77/4d _____m_____ - .byte CT_LOWER ; 78/4e _____n_____ - .byte CT_LOWER ; 79/4f _____o_____ - .byte CT_LOWER ; 80/50 _____p_____ - .byte CT_LOWER ; 81/51 _____q_____ - .byte CT_LOWER ; 82/52 _____r_____ - .byte CT_LOWER ; 83/53 _____s_____ - .byte CT_LOWER ; 84/54 _____t_____ - .byte CT_LOWER ; 85/55 _____u_____ - .byte CT_LOWER ; 86/56 _____v_____ - .byte CT_LOWER ; 87/57 _____w_____ - .byte CT_LOWER ; 88/58 _____x_____ - .byte CT_LOWER ; 89/59 _____y_____ - .byte CT_LOWER ; 90/5a _____z_____ - .byte $00 ; 91/5b _____[_____ - .byte $00 ; 92/5c _____\_____ - .byte $00 ; 93/5d _____]_____ - .byte $00 ; 94/5e _____^_____ - .byte $00 ; 95/5f _UNDERLINE_ - .byte $00 ; 96/60 _A`_grave__ - .byte $00 ; 97/61 _A'_acute__ - .byte $00 ; 98/62 _A^_circum_ - .byte $00 ; 99/63 _A~_tilde__ - .byte $00 ; 100/64 _A"_dieres_ - .byte $00 ; 101/65 _A__ring___ - .byte $00 ; 102/66 _AE________ - .byte $00 ; 103/67 _C,cedilla_ - .byte $00 ; 104/68 _E`_grave__ - .byte $00 ; 105/69 _E'_acute__ - .byte $00 ; 106/6a _E^_circum_ - .byte $00 ; 107/6b _E"_dieres_ - .byte $00 ; 108/6c _I`_grave__ - .byte $00 ; 109/6d _I'_acute__ - .byte $00 ; 110/6e _I^_circum_ - .byte $00 ; 111/6f _I"_dieres_ - .byte $00 ; 112/70 _D-_Eth_lr_ - .byte $00 ; 113/71 _N~_tilde__ - .byte $00 ; 114/72 _O`_grave__ - .byte $00 ; 115/73 _O'_acute__ - .byte $00 ; 116/74 _O^_circum_ - .byte $00 ; 117/75 _O~_tilde__ - .byte $00 ; 118/76 _O"_dieres_ - .byte $00 ; 119/77 __multiply_ - .byte $00 ; 120/78 _O/_slash__ - .byte $00 ; 121/79 _U`_grave__ - .byte $00 ; 122/7a _U'_acute__ - .byte $00 ; 123/7b _U^_circum_ - .byte $00 ; 124/7c _U"_dieres_ - .byte $00 ; 125/7d _Y'_acute__ - .byte $00 ; 126/7e _cap_thorn_ - .byte $00 ; 127/7f _Es-sed_B__ + ct_mix CT_SPACE_SPACETAB_IDX, CT_NONE_IDX ; 32/20 ___SPACE___, 33/21 _____!_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 34/22 _____"_____, 35/23 _____#_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 36/24 _____$_____, 37/25 _____%_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 38/26 _____&_____, 39/27 _____'_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 40/28 _____(_____, 41/29 _____)_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 42/2a _____*_____, 43/2b _____+_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 44/2c _____,_____, 45/2d _____-_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 46/2e _____._____, 47/2f _____/_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 48/30 _____0_____, 49/31 _____1_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 50/32 _____2_____, 51/33 _____3_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 52/34 _____4_____, 53/35 _____5_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 54/36 _____6_____, 55/37 _____7_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 56/38 _____8_____, 57/39 _____9_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 58/3a _____:_____, 59/3b _____;_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 60/3c _____<_____, 61/3d _____=_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 62/3e _____>_____, 63/3f _____?_____ - .byte CT_CTRL ; 128/80 __bullet___ - .byte CT_CTRL ; 129/81 __v_line___ - .byte CT_CTRL ; 130/82 __h_line___ - .byte CT_CTRL ; 131/83 ___cross___ - .byte CT_CTRL ; 132/84 _tl_corner_ - .byte CT_CTRL ; 133/85 _tr_corner_ - .byte CT_CTRL ; 134/86 _bl_corner_ - .byte CT_CTRL ; 135/87 _br_corner_ - .byte CT_CTRL ; 136/88 ___l_tee___ - .byte CT_CTRL ; 137/89 ___r_tee___ - .byte CT_CTRL ; 138/8a ___t_tee___ - .byte CT_CTRL ; 139/8b ___b_tee___ - .byte CT_CTRL ; 140/8c ___heart___ - .byte CT_CTRL | CT_OTHER_WS ; 141/8d _CR/diamond - .byte CT_CTRL ; 142/8e ___club____ - .byte CT_CTRL ; 143/8f ___spade___ - .byte CT_CTRL ; 144/90 _s_circle__ - .byte CT_CTRL | CT_OTHER_WS ; 145/91 _cursor-up_ - .byte CT_CTRL ; 146/92 ___pound___ - .byte CT_CTRL | CT_OTHER_WS ; 147/93 _CLS/check_ - .byte CT_CTRL | CT_OTHER_WS ; 148/94 __INSert___ - .byte CT_CTRL ; 149/95 ____+/-____ - .byte CT_CTRL ; 150/96 __divide___ - .byte CT_CTRL ; 151/97 __degree___ - .byte CT_CTRL ; 152/98 _c_checker_ - .byte CT_CTRL ; 153/99 _f_checker_ - .byte CT_CTRL ; 154/9a _solid_sq__ - .byte CT_CTRL ; 155/9b __cr_char__ - .byte CT_CTRL ; 156/9c _up_arrow__ - .byte CT_CTRL | CT_OTHER_WS ; 157/9d cursor-left - .byte CT_CTRL ; 158/9e _left_arro_ - .byte CT_CTRL ; 159/9f _right_arr_ - .byte CT_SPACE | CT_SPACE_TAB ; 160/a0 _req space_ - .byte $00 ; 161/a1 _!_invertd_ - .byte $00 ; 162/a2 ___cent____ - .byte $00 ; 163/a3 ___pound___ - .byte $00 ; 164/a4 __currency_ - .byte $00 ; 165/a5 ____yen____ - .byte $00 ; 166/a6 _|_broken__ - .byte $00 ; 167/a7 __section__ - .byte $00 ; 168/a8 __umulaut__ - .byte $00 ; 169/a9 _copyright_ - .byte $00 ; 170/aa __fem_ord__ - .byte $00 ; 171/ab _l_ang_quo_ - .byte $00 ; 172/ac ____not____ - .byte $00 ; 173/ad _syl_hyphn_ - .byte $00 ; 174/ae _registerd_ - .byte $00 ; 175/af _overline__ - .byte $00 ; 176/b0 __degrees__ - .byte $00 ; 177/b1 ____+/-____ - .byte $00 ; 178/b2 _2_supersc_ - .byte $00 ; 179/b3 _3_supersc_ - .byte $00 ; 180/b4 ___acute___ - .byte $00 ; 181/b5 ____mu_____ - .byte $00 ; 182/b6 _paragraph_ - .byte $00 ; 183/b7 __mid_dot__ - .byte $00 ; 184/b8 __cedilla__ - .byte $00 ; 185/b9 _1_supersc_ - .byte $00 ; 186/ba __mas_ord__ - .byte $00 ; 187/bb _r_ang_quo_ - .byte $00 ; 188/bc ____1/4____ - .byte $00 ; 189/bd ____1/2____ - .byte $00 ; 190/be ____3/4____ - .byte $00 ; 191/bf _?_invertd_ + ct_mix CT_NONE_IDX, CT_LOWER_XDIGIT_IDX ; 64/40 _____@_____, 65/41 _____a_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 66/42 _____b_____, 67/43 _____c_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 68/44 _____d_____, 69/45 _____e_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_IDX ; 70/46 _____f_____, 71/47 _____g_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 72/48 _____h_____, 73/49 _____i_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 74/4a _____j_____, 75/4b _____k_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 76/4c _____l_____, 77/4d _____m_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 78/4e _____n_____, 79/4f _____o_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 80/50 _____p_____, 81/51 _____q_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 82/52 _____r_____, 83/53 _____s_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 84/54 _____t_____, 85/55 _____u_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 86/56 _____v_____, 87/57 _____w_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 88/58 _____x_____, 89/59 _____y_____ + ct_mix CT_LOWER_IDX, CT_NONE_IDX ; 90/5a _____z_____, 91/5b _____[_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 92/5c _____\_____, 93/5d _____]_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 94/5e _____^_____, 95/5f _UNDERLINE_ - .byte $00 ; 192/c0 _____`_____ - .byte CT_UPPER | CT_XDIGIT ; 193/c1 _____A_____ - .byte CT_UPPER | CT_XDIGIT ; 194/c2 _____B_____ - .byte CT_UPPER | CT_XDIGIT ; 195/c3 _____C_____ - .byte CT_UPPER | CT_XDIGIT ; 196/c4 _____D_____ - .byte CT_UPPER | CT_XDIGIT ; 197/c5 _____E_____ - .byte CT_UPPER | CT_XDIGIT ; 198/c6 _____F_____ - .byte CT_UPPER ; 199/c7 _____G_____ - .byte CT_UPPER ; 200/c8 _____H_____ - .byte CT_UPPER ; 201/c9 _____I_____ - .byte CT_UPPER ; 202/ca _____J_____ - .byte CT_UPPER ; 203/cb _____K_____ - .byte CT_UPPER ; 204/cc _____L_____ - .byte CT_UPPER ; 205/cd _____M_____ - .byte CT_UPPER ; 206/ce _____N_____ - .byte CT_UPPER ; 207/cf _____O_____ - .byte CT_UPPER ; 208/d0 _____P_____ - .byte CT_UPPER ; 209/d1 _____Q_____ - .byte CT_UPPER ; 210/d2 _____R_____ - .byte CT_UPPER ; 211/d3 _____S_____ - .byte CT_UPPER ; 212/d4 _____T_____ - .byte CT_UPPER ; 213/d5 _____U_____ - .byte CT_UPPER ; 214/d6 _____V_____ - .byte CT_UPPER ; 215/d7 _____W_____ - .byte CT_UPPER ; 216/d8 _____X_____ - .byte CT_UPPER ; 217/d9 _____Y_____ - .byte CT_UPPER ; 218/da _____Z_____ - .byte $00 ; 219/db _____{_____ - .byte $00 ; 220/dc _____|_____ - .byte $00 ; 221/dd _____}_____ - .byte $00 ; 222/de _____~_____ - .byte $00 ; 223/df ___HOUSE___ - .byte $00 ; 224/e0 _a`_grave__ - .byte $00 ; 225/e1 _a'_acute__ - .byte $00 ; 226/e2 _a^_circum_ - .byte $00 ; 227/e3 _a~_tilde__ - .byte $00 ; 228/e4 _a"_dieres_ - .byte $00 ; 229/e5 _a__ring___ - .byte $00 ; 230/e6 _ae________ - .byte $00 ; 231/e7 _c,cedilla_ - .byte $00 ; 232/e8 _e`_grave__ - .byte $00 ; 233/e9 _e'_acute__ - .byte $00 ; 234/ea _e^_circum_ - .byte $00 ; 235/eb _e"_dieres_ - .byte $00 ; 236/ec _i`_grave__ - .byte $00 ; 237/ed _i'_acute__ - .byte $00 ; 238/ee _i^_circum_ - .byte $00 ; 239/ef _i"_dieres_ - .byte $00 ; 240/f0 _o^x_Eth_s_ - .byte $00 ; 241/f1 _n~_tilda__ - .byte $00 ; 242/f2 _o`_grave__ - .byte $00 ; 243/f3 _o'_acute__ - .byte $00 ; 244/f4 _o^_circum_ - .byte $00 ; 245/f5 _o~_tilde__ - .byte $00 ; 246/f6 _o"_dieres_ - .byte $00 ; 247/f7 __divide___ - .byte $00 ; 248/f8 _o/_slash__ - .byte $00 ; 249/f9 _u`_grave__ - .byte $00 ; 250/fa _u'_acute__ - .byte $00 ; 251/fb _u^_circum_ - .byte $00 ; 252/fc _u"_dieres_ - .byte $00 ; 253/fd _y'_acute__ - .byte $00 ; 254/fe _sm_thorn__ - .byte $00 ; 255/ff _y"_dieres_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 96/60 _A`_grave__, 97/61 _A'_acute__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 98/62 _A^_circum_, 99/63 _A~_tilde__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 100/64 _A"_dieres_, 101/65 _A__ring___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 102/66 _AE________, 103/67 _C,cedilla_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 104/68 _E`_grave__, 105/69 _E'_acute__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 106/6a _E^_circum_, 107/6b _E"_dieres_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 108/6c _I`_grave__, 109/6d _I'_acute__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 110/6e _I^_circum_, 111/6f _I"_dieres_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 112/70 _D-_Eth_lr_, 113/71 _N~_tilde__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 114/72 _O`_grave__, 115/73 _O'_acute__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 116/74 _O^_circum_, 117/75 _O~_tilde__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 118/76 _O"_dieres_, 119/77 __multiply_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 120/78 _O/_slash__, 121/79 _U`_grave__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 122/7a _U'_acute__, 123/7b _U^_circum_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 124/7c _U"_dieres_, 125/7d _Y'_acute__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 126/7e _cap_thorn_, 127/7f _Es-sed_B__ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 128/80 __bullet___, 129/81 __v_line___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 130/82 __h_line___, 131/83 ___cross___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 132/84 _tl_corner_, 133/85 _tr_corner_ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 134/86 _bl_corner_, 135/87 _br_corner_ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 136/88 ___l_tee___, 137/89 ___r_tee___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 138/8a ___t_tee___, 139/8b ___b_tee___ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_IDX ; 140/8c ___heart___, 141/8d _CR/diamond + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 142/8e ___club____, 143/8f ___spade___ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_IDX ; 144/90 _s_circle__, 145/91 _cursor-up_ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_IDX ; 146/92 ___pound___, 147/93 _CLS/check_ + ct_mix CT_CTRL_WS_IDX, CT_CTRL_IDX ; 148/94 __INSert___, 149/95 ____+/-____ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 150/96 __divide___, 151/97 __degree___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 152/98 _c_checker_, 153/99 _f_checker_ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 154/9a _solid_sq__, 155/9b __cr_char__ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_IDX ; 156/9c _up_arrow__, 157/9d cursor-left + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 158/9e _left_arro_, 159/9f _right_arr_ + + ct_mix CT_SPACE_SPACETAB_IDX, CT_NONE_IDX ; 160/a0 _req space_, 161/a1 _!_invertd_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 162/a2 ___cent____, 163/a3 ___pound___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 164/a4 __currency_, 165/a5 ____yen____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 166/a6 _|_broken__, 167/a7 __section__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 168/a8 __umulaut__, 169/a9 _copyright_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 170/aa __fem_ord__, 171/ab _l_ang_quo_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 172/ac ____not____, 173/ad _syl_hyphn_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 174/ae _registerd_, 175/af _overline__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 176/b0 __degrees__, 177/b1 ____+/-____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 178/b2 _2_supersc_, 179/b3 _3_supersc_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 180/b4 ___acute___, 181/b5 ____mu_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 182/b6 _paragraph_, 183/b7 __mid_dot__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 184/b8 __cedilla__, 185/b9 _1_supersc_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 186/ba __mas_ord__, 187/bb _r_ang_quo_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 188/bc ____1/4____, 189/bd ____1/2____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 190/be ____3/4____, 191/bf _?_invertd_ + + ct_mix CT_NONE_IDX, CT_UPPER_XDIGIT_IDX ; 192/c0 _____`_____, 193/c1 _____A_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 194/c2 _____B_____, 195/c3 _____C_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 196/c4 _____D_____, 197/c5 _____E_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_IDX ; 198/c6 _____F_____, 199/c7 _____G_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 200/c8 _____H_____, 201/c9 _____I_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 202/ca _____J_____, 203/cb _____K_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 204/cc _____L_____, 205/cd _____M_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 206/ce _____N_____, 207/cf _____O_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 208/d0 _____P_____, 209/d1 _____Q_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 210/d2 _____R_____, 211/d3 _____S_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 212/d4 _____T_____, 213/d5 _____U_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 214/d6 _____V_____, 215/d7 _____W_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 216/d8 _____X_____, 217/d9 _____Y_____ + ct_mix CT_UPPER_IDX, CT_NONE_IDX ; 218/da _____Z_____, 219/db _____{_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 220/dc _____|_____, 221/dd _____}_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 222/de _____~_____, 223/df ___HOUSE___ + + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 224/e0 _a`_grave__, 225/e1 _a'_acute__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 226/e2 _a^_circum_, 227/e3 _a~_tilde__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 228/e4 _a"_dieres_, 229/e5 _a__ring___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 230/e6 _ae________, 231/e7 _c,cedilla_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 232/e8 _e`_grave__, 233/e9 _e'_acute__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 234/ea _e^_circum_, 235/eb _e"_dieres_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 236/ec _i`_grave__, 237/ed _i'_acute__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 238/ee _i^_circum_, 239/ef _i"_dieres_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 240/f0 _o^x_Eth_s_, 241/f1 _n~_tilda__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 242/f2 _o`_grave__, 243/f3 _o'_acute__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 244/f4 _o^_circum_, 245/f5 _o~_tilde__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 246/f6 _o"_dieres_, 247/f7 __divide___ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 248/f8 _o/_slash__, 249/f9 _u`_grave__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 250/fa _u'_acute__, 251/fb _u^_circum_ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 252/fc _u"_dieres_, 253/fd _y'_acute__ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 254/fe _sm_thorn__, 255/ff _y"_dieres_ diff --git a/libsrc/cbm/cvline.s b/libsrc/cbm/cvline.s index 2cf231e98..b6d2d86e6 100644 --- a/libsrc/cbm/cvline.s +++ b/libsrc/cbm/cvline.s @@ -6,13 +6,12 @@ ; .export _cvlinexy, _cvline - .import popa, _gotoxy, putchar, newline + .import gotoxy, putchar, newline .importzp tmp1, cvlinechar _cvlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length and run into _cvline _cvline: @@ -25,6 +24,3 @@ L1: lda #cvlinechar ; Vertical bar dec tmp1 bne L1 L9: rts - - - diff --git a/libsrc/cbm/dir.s b/libsrc/cbm/dir.s index fddd71d7c..808fcf982 100644 --- a/libsrc/cbm/dir.s +++ b/libsrc/cbm/dir.s @@ -7,7 +7,7 @@ .include "dir.inc" .include "errno.inc" .include "zeropage.inc" - + .import pushax .import _read diff --git a/libsrc/cbm/diskcmd.s b/libsrc/cbm/diskcmd.s index d090afe14..dbc15efbe 100644 --- a/libsrc/cbm/diskcmd.s +++ b/libsrc/cbm/diskcmd.s @@ -11,8 +11,6 @@ .export writediskcmd .export writefndiskcmd - .import SETLFS, SETNAM, OPEN, CLOSE, BSOUT, BASIN - .import CHKIN, CKOUT, CLRCH .import fncmd, fnlen, fnunit .importzp tmp1, ptr1 diff --git a/libsrc/cbm/filename.s b/libsrc/cbm/filename.s index a2b8aab5a..413b88d2a 100644 --- a/libsrc/cbm/filename.s +++ b/libsrc/cbm/filename.s @@ -8,11 +8,11 @@ .export fnadd, fnaddmode, fncomplete, fndefunit .export fnunit, fnlen, fnisfile, fncmd, fnbuf - .import SETNAM .import curunit, __filetype .importzp ptr1, tmp1 .include "ctype.inc" + .include "cbm.inc" ;------------------------------------------------------------------------------ diff --git a/libsrc/cbm/filevars.s b/libsrc/cbm/filevars.s index db2dec7b3..2cbf0436e 100644 --- a/libsrc/cbm/filevars.s +++ b/libsrc/cbm/filevars.s @@ -9,13 +9,13 @@ .importzp devnum -.segment "INITBSS" +.segment "INIT" curunit: .res 1 -.segment "INIT" +.segment "ONCE" .proc initcurunit diff --git a/libsrc/cbm/getres.s b/libsrc/cbm/getres.s new file mode 100644 index 000000000..998bac9f6 --- /dev/null +++ b/libsrc/cbm/getres.s @@ -0,0 +1,37 @@ +; +; Oliver Schmidt, 15.8.2018 +; +; int __fastcall__ clock_getres (clockid_t clk_id, struct timespec *res); +; + + .include "time.inc" + + .importzp ptr1 + .import incsp1, return0 + + +;---------------------------------------------------------------------------- +.code + +.proc _clock_getres + + sta ptr1 + stx ptr1+1 + + ldy #.sizeof(timespec)-1 +@L1: lda time,y + sta (ptr1),y + dey + bpl @L1 + + jsr incsp1 + jmp return0 + +.endproc + +;---------------------------------------------------------------------------- +; timespec struct with tv_nsec set to 1/10 second +.rodata + +time: .dword 0 + .dword 100 * 1000 * 1000 diff --git a/libsrc/cbm/gotox.s b/libsrc/cbm/gotox.s index f122a276c..76f56cb4b 100644 --- a/libsrc/cbm/gotox.s +++ b/libsrc/cbm/gotox.s @@ -5,11 +5,9 @@ ; .export _gotox - .import plot + .import plot .importzp CURS_X _gotox: sta CURS_X ; Set new position jmp plot ; And activate it - - diff --git a/libsrc/cbm/gotoxy.s b/libsrc/cbm/gotoxy.s index 64c6bd21d..afc9c4d45 100644 --- a/libsrc/cbm/gotoxy.s +++ b/libsrc/cbm/gotoxy.s @@ -4,10 +4,13 @@ ; void gotoxy (unsigned char x, unsigned char y); ; - .export _gotoxy + .export gotoxy, _gotoxy .import popa, plot .importzp CURS_X, CURS_Y +gotoxy: + jsr popa ; Get Y + _gotoxy: sta CURS_Y ; Set Y jsr popa ; Get X diff --git a/libsrc/cbm/mcbpointercolor.s b/libsrc/cbm/mcbpointercolor.s index c9cb6330e..a52830d6b 100644 --- a/libsrc/cbm/mcbpointercolor.s +++ b/libsrc/cbm/mcbpointercolor.s @@ -3,7 +3,7 @@ .export _mouse_def_pointercolor -.segment "INIT" +.segment "ONCE" _mouse_def_pointercolor: diff --git a/libsrc/cbm/mcbpointershape.s b/libsrc/cbm/mcbpointershape.s index 7364201b1..82c7ed91d 100644 --- a/libsrc/cbm/mcbpointershape.s +++ b/libsrc/cbm/mcbpointershape.s @@ -3,7 +3,7 @@ .export _mouse_def_pointershape -.segment "INIT" +.segment "ONCE" _mouse_def_pointershape: diff --git a/libsrc/cbm/open.s b/libsrc/cbm/open.s index 4e57f5efc..e9f0237cc 100644 --- a/libsrc/cbm/open.s +++ b/libsrc/cbm/open.s @@ -2,16 +2,11 @@ ; Ullrich von Bassewitz, 16.11.2002 ; ; int open (const char* name, int flags, ...); /* May take a mode argument */ -; -; Be sure to keep the value priority of closeallfiles lower than that of -; closeallstreams (which is the high level C file I/O counterpart and must be -; called before closeallfiles). .export _open .destructor closeallfiles, 5 - .import SETLFS, OPEN, CLOSE .import addysp, popax .import scratch, fnparse, fnaddmode, fncomplete, fnset .import opencmdchannel, closecmdchannel, readdiskerror @@ -22,6 +17,7 @@ .include "errno.inc" .include "fcntl.inc" .include "filedes.inc" + .include "cbm.inc" ;-------------------------------------------------------------------------- @@ -134,7 +130,7 @@ dowrite: beq notrunc jsr scratch -; Complete the the file name. Check for append mode here. +; Complete the file name. Check for append mode here. notrunc: lda tmp3 ; Get the mode again @@ -172,7 +168,7 @@ nofile: ; ... else use SA=0 (read) jsr OPEN bcs oserror -; Open the the drive command channel and read it +; Open the drive command channel and read it ldx fnunit jsr opencmdchannel @@ -198,5 +194,3 @@ nofile: ; ... else use SA=0 (read) .endproc - - diff --git a/libsrc/cbm/opendir.c b/libsrc/cbm/opendir.c index b39e6b77e..87b9ab73d 100644 --- a/libsrc/cbm/opendir.c +++ b/libsrc/cbm/opendir.c @@ -38,7 +38,7 @@ DIR* __fastcall__ opendir (register const char* name) d.fd = open (d.name, O_RDONLY); if (d.fd >= 0) { - /* Skip the load address */ + /* Skip the load address */ if (_dirread (&d, buf, sizeof (buf))) { /* Allocate memory for the DIR structure returned */ diff --git a/libsrc/cbm/read.s b/libsrc/cbm/read.s index e0fd8d51b..1c2c670e7 100644 --- a/libsrc/cbm/read.s +++ b/libsrc/cbm/read.s @@ -8,7 +8,6 @@ .export _read .constructor initstdin - .import SETLFS, OPEN, CHKIN, BASIN, CLRCH, BSOUT, READST .import rwcommon .import popax .importzp ptr1, ptr2, ptr3, tmp1, tmp2, tmp3 @@ -22,7 +21,7 @@ ;-------------------------------------------------------------------------- ; initstdin: Open the stdin file descriptors for the keyboard -.segment "INIT" +.segment "ONCE" .proc initstdin @@ -88,10 +87,10 @@ ldy #0 lda tmp1 - sta (ptr2),y - inc ptr2 + sta (ptr1),y + inc ptr1 bne @L1 - inc ptr2+1 ; *buf++ = A; + inc ptr1+1 ; *buf++ = A; ; Increment the byte count @@ -107,9 +106,9 @@ ; Decrement the count -@L3: inc ptr1 +@L3: dec ptr2 bne @L0 - inc ptr1+1 + dec ptr2+1 bne @L0 beq done ; Branch always @@ -136,7 +135,7 @@ eof: lda #0 devnotpresent: lda #ENODEV - jmp __directerrno ; Sets _errno, clears _oserror, returns -1 + .byte $2C ; Skip next opcode via BIT <abs> ; Error entry: The given file descriptor is not valid or not open diff --git a/libsrc/cbm/readdir.c b/libsrc/cbm/readdir.c index 8d6968977..1512edc4e 100644 --- a/libsrc/cbm/readdir.c +++ b/libsrc/cbm/readdir.c @@ -1,5 +1,7 @@ /* -** Ullrich von Bassewitz, 2012-05-30. Based on code by Groepaz. +** Based on code by Groepaz. +** 2012-05-30, Ullrich von Bassewitz +** 2021-02-15, Greg King */ @@ -52,12 +54,14 @@ struct dirent* __fastcall__ readdir (register DIR* dir) /* Bump the directory offset and include the bytes for line-link and size */ dir->off += count + 4; - /* End of directory is reached if the buffer contains "blocks free". It is - ** sufficient here to check for the leading 'b'. buffer will contain at - ** least one byte if we come here. + /* End of directory is reached if the buffer contains "blocks free/used" or + ** "mb free.". It is sufficient here to check for the leading 'b' and 'm'. + ** buffer will contain at least one byte if we come here. */ - if (buffer[0] == 'b') { - goto exitpoint; + switch (buffer[0]) { + case 'b': + case 'm': + goto exitpoint; } /* Parse the buffer for the filename and file type */ @@ -67,7 +71,6 @@ struct dirent* __fastcall__ readdir (register DIR* dir) b = buffer; while (i < count) { switch (s) { - case 0: /* Searching for start of file name */ if (*b == '"') { @@ -127,6 +130,3 @@ struct dirent* __fastcall__ readdir (register DIR* dir) exitpoint: return 0; } - - - diff --git a/libsrc/cbm/rwcommon.s b/libsrc/cbm/rwcommon.s index c044b6c38..d13c478b5 100644 --- a/libsrc/cbm/rwcommon.s +++ b/libsrc/cbm/rwcommon.s @@ -6,7 +6,7 @@ .export rwcommon - .import popax + .import popax, popptr1 .importzp ptr1, ptr2, ptr3, tmp2 .include "errno.inc" @@ -21,19 +21,16 @@ .proc rwcommon - eor #$FF - sta ptr1 - txa - eor #$FF - sta ptr1+1 ; Remember -count-1 - - jsr popax ; Get buf - sta ptr2 + inx stx ptr2+1 + tax + inx + stx ptr2 ; Save count with each byte incremented separately - lda #$00 - sta ptr3 - sta ptr3+1 ; Clear ptr3 + jsr popptr1 ; Get buf to ptr1, Y=0 by call + + sty ptr3 + sty ptr3+1 ; Clear ptr3 jsr popax ; Get the handle cpx #$01 diff --git a/libsrc/cbm/sysrename.s b/libsrc/cbm/sysrename.s index 86cb37011..f79bf720a 100644 --- a/libsrc/cbm/sysrename.s +++ b/libsrc/cbm/sysrename.s @@ -9,7 +9,7 @@ .import fnparse, fnadd, fnparsename .import opencmdchannel, closecmdchannel .import writefndiskcmd, readdiskerror - .import popax + .import popptr1 .import fncmd, fnunit .importzp ptr1 @@ -26,10 +26,8 @@ lda #'=' jsr fnadd - jsr popax - sta ptr1 - stx ptr1+1 - ldy #0 + jsr popptr1 + ; ldy #0 Y=0 guaranteed by popptr1 jsr fnparsename ; Parse second filename bne done diff --git a/libsrc/cbm/write.s b/libsrc/cbm/write.s index e6da59c0f..93bdda31d 100644 --- a/libsrc/cbm/write.s +++ b/libsrc/cbm/write.s @@ -7,7 +7,6 @@ .export _write .constructor initstdout - .import SETLFS, OPEN, CKOUT, BSOUT, READST, CLRCH .import rwcommon .importzp sp, ptr1, ptr2, ptr3 @@ -20,7 +19,7 @@ ;-------------------------------------------------------------------------- ; initstdout: Open the stdout and stderr file descriptors for the screen. -.segment "INIT" +.segment "ONCE" .proc initstdout @@ -61,10 +60,10 @@ ; Output the next character from the buffer @L0: ldy #0 - lda (ptr2),y - inc ptr2 + lda (ptr1),y + inc ptr1 bne @L1 - inc ptr2+1 ; A = *buf++; + inc ptr1+1 ; A = *buf++; @L1: jsr BSOUT ; Check the status @@ -84,9 +83,9 @@ ; Decrement count -@L2: inc ptr1 +@L2: dec ptr2 bne @L0 - inc ptr1+1 + dec ptr2+1 bne @L0 ; Wrote all chars or disk full. Close the output channel @@ -107,7 +106,7 @@ devnotpresent2: pla devnotpresent: lda #ENODEV - jmp __directerrno ; Sets _errno, clears _oserror, returns -1 + .byte $2C ; Skip next opcode via BIT <abs> ; Error entry: The given file descriptor is not valid or not open diff --git a/libsrc/cbm510/_scrsize.s b/libsrc/cbm510/_scrsize.s index 8b68b8cdc..5f3076920 100644 --- a/libsrc/cbm510/_scrsize.s +++ b/libsrc/cbm510/_scrsize.s @@ -6,7 +6,6 @@ .export screensize .import SCREEN - + screensize = SCREEN - diff --git a/libsrc/cbm510/banking.s b/libsrc/cbm510/banking.s index 8ed72d02b..b9dce2b6f 100644 --- a/libsrc/cbm510/banking.s +++ b/libsrc/cbm510/banking.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 28.09.1998 ; -; Banking routines for the 610. +; Banking routines for the 510. ; .export set_bank, sys_bank, restore_bank @@ -37,5 +37,3 @@ pla rts .endproc - - diff --git a/libsrc/cbm510/break.s b/libsrc/cbm510/break.s index b58db068e..fff475d3a 100644 --- a/libsrc/cbm510/break.s +++ b/libsrc/cbm510/break.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 27.09.1998 ; -; void set_brk (unsigned Addr); +; void __fastcall__ set_brk (unsigned Addr); ; void reset_brk (void); ; diff --git a/libsrc/cbm510/cpeekcolor.s b/libsrc/cbm510/cpeekcolor.s new file mode 100644 index 000000000..44c0a1595 --- /dev/null +++ b/libsrc/cbm510/cpeekcolor.s @@ -0,0 +1,24 @@ +; +; 2016-02-28, Groepaz +; 2017-06-19, Greg King +; +; unsigned char cpeekcolor (void); +; + + .export _cpeekcolor + + .import CURS_X: zp, CRAM_PTR: zp + + .include "cbm510.inc" + + +_cpeekcolor: + ldx IndReg + lda #$0F + sta IndReg + ldy CURS_X + lda (CRAM_PTR),y ; get color + stx IndReg + and #$0F + ldx #>$0000 + rts diff --git a/libsrc/cbm510/cputc.s b/libsrc/cbm510/cputc.s index bd8c364e8..7dd4cddb2 100644 --- a/libsrc/cbm510/cputc.s +++ b/libsrc/cbm510/cputc.s @@ -8,7 +8,7 @@ .export _cputcxy, _cputc, cputdirect, putchar .export newline, plot - .import popa, _gotoxy + .import gotoxy .import __VIDRAM_START__ .import CURS_X: zp, CURS_Y: zp, CHARCOLOR: zp, RVS: zp .import SCREEN_PTR: zp, CRAM_PTR: zp @@ -22,8 +22,7 @@ _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C ; Plot a character - also used as internal function @@ -66,10 +65,9 @@ L3: sty CURS_X ; Handle character if high bit set L10: and #$7F - cmp #$7E ; PI? + cmp #$7F ; PI? bne L11 lda #$5E ; Load screen code for PI - bne cputdirect L11: ora #$40 bne cputdirect ; Branch always diff --git a/libsrc/cbm510/doesclrscr.s b/libsrc/cbm510/doesclrscr.s new file mode 100644 index 000000000..e0f57374c --- /dev/null +++ b/libsrc/cbm510/doesclrscr.s @@ -0,0 +1,16 @@ +; +; 2016-06, Christian Groessler +; 2017-07-05, Greg King +; +; unsigned char doesclrscrafterexit (void); +; +; Returns 0/1 if, after program termination, the screen isn't/is cleared. +; + + .import return1 + +; cc65's CBM510 programs switch to a display screen in the program RAM bank; +; then, they switch back to the system bank when they exit. +; The screen is cleared. + + .export _doesclrscrafterexit := return1 diff --git a/libsrc/cbm510/systime.s b/libsrc/cbm510/gettime.s similarity index 52% rename from libsrc/cbm510/systime.s rename to libsrc/cbm510/gettime.s index daac36d8d..7f9e1017c 100644 --- a/libsrc/cbm510/systime.s +++ b/libsrc/cbm510/gettime.s @@ -1,43 +1,45 @@ ; -; Stefan Haubenthal, 2009-07-27 -; Ullrich von Bassewitz, 2009-09-24 +; 2009-07-27, Stefan Haubenthal +; 2009-09-24, Ullrich von Bassewitz +; 2018-08-18, Oliver Schmidt +; 2018-08-19, Greg King ; -; time_t _systime (void); -; /* Similar to time(), but: -; ** - Is not ISO C -; ** - Does not take the additional pointer -; ** - Does not set errno when returning -1 -; */ +; int __fastcall__ clock_gettime (clockid_t clk_id, struct timespec *tp); ; .include "time.inc" .include "cbm510.inc" .include "extzp.inc" + .import pushax, pusheax, tosmul0ax, steaxspidx, incsp1 .import sys_bank, restore_bank - .importzp tmp1, tmp2 + .import TM, load_tenth + .importzp sreg, tmp1, tmp2 ;---------------------------------------------------------------------------- .code -.proc __systime +.proc _clock_gettime -; Switch to the system bank + jsr pushax + jsr pushax jsr sys_bank - -; Read the clock - ldy #CIA::TODHR lda (cia2),y - bpl AM - and #%01111111 sed + tax ; Save PM flag + and #%01111111 + cmp #$12 ; 12 AM/PM + bcc @L1 + sbc #$12 +@L1: inx ; Get PM flag + bpl @L2 clc adc #$12 - cld -AM: jsr BCD2dec +@L2: cld + jsr BCD2dec sta TM + tm::tm_hour ldy #CIA::TODMIN lda (cia2),y @@ -48,17 +50,28 @@ AM: jsr BCD2dec jsr BCD2dec sta TM + tm::tm_sec ldy #CIA::TOD10 - lda (cia2),y ; Dummy read to unfreeze - -; Restore the bank - + lda (cia2),y jsr restore_bank - -; Convert to a time - + pha lda #<TM ldx #>TM - jmp _mktime + jsr _mktime + + ldy #timespec::tv_sec + jsr steaxspidx ; Pops address pushed by 2. pushax + + jsr load_tenth + jsr pusheax + pla + ldx #>$0000 + jsr tosmul0ax + + ldy #timespec::tv_nsec + jsr steaxspidx ; Pops address pushed by 1. pushax + + lda #$00 + tax + jmp incsp1 .endproc @@ -81,18 +94,3 @@ AM: jsr BCD2dec rts .endproc - -;---------------------------------------------------------------------------- -; TM struct with date set to 1970-01-01 -.data - -TM: .word 0 ; tm_sec - .word 0 ; tm_min - .word 0 ; tm_hour - .word 1 ; tm_mday - .word 0 ; tm_mon - .word 70 ; tm_year - .word 0 ; tm_wday - .word 0 ; tm_yday - .word 0 ; tm_isdst - diff --git a/libsrc/cbm510/joy/cbm510-std.s b/libsrc/cbm510/joy/cbm510-std.s index 7133f9379..4e47fc1a0 100644 --- a/libsrc/cbm510/joy/cbm510-std.s +++ b/libsrc/cbm510/joy/cbm510-std.s @@ -30,24 +30,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $00 ; JOY_FIRE2 unavailable - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants @@ -105,7 +93,7 @@ READ: ldx #$0F ; Switch to the system bank lda (cia2),y ; Read joystick inputs sta tmp1 -; Get the fire bits +; Get the push button bits ldy #CIA::PRA lda (cia2),y @@ -115,12 +103,12 @@ READ: ldx #$0F ; Switch to the system bank cpx #$00 ; Joystick 0? bne @L1 ; Jump if no -; Joystick 1, fire is in bit 6, direction in bit 0-3 +; Joystick 1, push button is in bit 6, direction in bit 0-3 asl a jmp @L2 -; Joystick 2, fire is in bit 7, direction in bit 5-7 +; Joystick 2, push button is in bit 7, direction in bit 5-7 @L1: ldx #$00 ; High byte of return value lsr tmp1 @@ -128,9 +116,9 @@ READ: ldx #$0F ; Switch to the system bank lsr tmp1 lsr tmp1 -; Mask the relavant bits, get the fire bit +; Mask the relavant bits, get the push button bit -@L2: asl a ; Fire bit into carry +@L2: asl a ; push button bit into carry lda tmp1 and #$0F bcc @L3 diff --git a/libsrc/cbm510/kernal.s b/libsrc/cbm510/kernal.s index 9ea4f0e96..705422709 100644 --- a/libsrc/cbm510/kernal.s +++ b/libsrc/cbm510/kernal.s @@ -1,12 +1,13 @@ ; ; Ullrich von Bassewitz, 2003-12-20 ; -; CBM610 kernal functions +; CBM510 kernal functions ; + .include "cbm_kernal.inc" + .export CINT .export IOINIT - .export RAMTAS .export RESTOR .export VECTOR .export SETMSG @@ -27,57 +28,12 @@ .export CKOUT .export CLRCH .export BASIN + .export CHRIN .export BSOUT + .export CHROUT .export LOAD .export SAVE .export STOP .export GETIN .export CLALL .export PLOT - - -;----------------------------------------------------------------------------- -; All functions are available in the kernal jump table. Functions having -; replacements (usually short ones where the overhead of the cross bank call -; is not worth the trouble) are commented out. - -CINT = $FF81 -IOINIT = $FF84 -RAMTAS = $FF87 -RESTOR = $FF8A -VECTOR = $FF8D -SETMSG = $FF90 -SECOND = $FF93 -TKSA = $FF96 -MEMTOP = $FF99 -MEMBOT = $FF9C -SCNKEY = $FF9F -SETTMO = $FFA2 -ACPTR = $FFA5 -CIOUT = $FFA8 -UNTLK = $FFAB -UNLSN = $FFAE -LISTEN = $FFB1 -TALK = $FFB4 -;READST = $FFB7 -SETLFS = $FFBA -;SETNAM = $FFBD -;OPEN = $FFC0 -;CLOSE = $FFC3 -CHKIN = $FFC6 -CKOUT = $FFC9 -CLRCH = $FFCC -BASIN = $FFCF -BSOUT = $FFD2 -LOAD = $FFD5 -SAVE = $FFD8 -;SETTIM = $FFDB -;RDTIM = $FFDE -STOP = $FFE1 -GETIN = $FFE4 -CLALL = $FFE7 -;UDTIM = $FFEA -;SCREEN = $FFED -PLOT = $FFF0 -;IOBASE = $FFF3 - diff --git a/libsrc/cbm510/kopen.s b/libsrc/cbm510/kopen.s index 025922320..7358b091a 100644 --- a/libsrc/cbm510/kopen.s +++ b/libsrc/cbm510/kopen.s @@ -3,10 +3,10 @@ ; ; OPEN kernal call. ; -; NOTE: The OPEN system call in the CBM610 kernal is different from the +; NOTE: The OPEN system call in the CBM610 kernal is different from the ; standard. It evaluates the carry flag and does a normal open if carry clear ; and some strange things (output sa 15 + name on IEC) if carry set. To be -; compatible with our CBM file stuff, we have to clear the carry before +; compatible with our CBM file stuff, we have to clear the carry before ; calling the real OPEN. .export OPEN @@ -18,5 +18,3 @@ .endproc - - diff --git a/libsrc/cbm510/kudtim.s b/libsrc/cbm510/kudtim.s index 6862787fb..f587e5aa0 100644 --- a/libsrc/cbm510/kudtim.s +++ b/libsrc/cbm510/kudtim.s @@ -3,7 +3,7 @@ ; ; udtim routine for the 610. We will not check for the stop key here, since ; C programs will not use it. -; +; .export UDTIM .import time: zp diff --git a/libsrc/cbm510/mainargs.s b/libsrc/cbm510/mainargs.s index 0ec7d0c4c..45f35eedb 100644 --- a/libsrc/cbm510/mainargs.s +++ b/libsrc/cbm510/mainargs.s @@ -35,10 +35,10 @@ MAXARGS = 10 ; Maximum number of arguments allowed REM = $8f ; BASIC token-code NAME_LEN = 16 ; Maximum length of command-name -; Get possible command-line arguments. Goes into the special INIT segment, +; Get possible command-line arguments. Goes into the special ONCE segment, ; which may be reused after the startup code is run. ; -.segment "INIT" +.segment "ONCE" initmainargs: @@ -144,7 +144,7 @@ done: lda #<argv stx __argv + 1 rts -.segment "INITBSS" +.segment "INIT" term: .res 1 name: .res NAME_LEN + 1 diff --git a/libsrc/cbm510/mcbdefault.s b/libsrc/cbm510/mcbdefault.s index 0db753e92..53eb804c0 100644 --- a/libsrc/cbm510/mcbdefault.s +++ b/libsrc/cbm510/mcbdefault.s @@ -21,17 +21,17 @@ ; Sprite definitions. The first value can be changed to adjust the number ; of the sprite used for the mouse. All others depend on that value. -MOUSE_SPR = 0 ; Sprite used for the mouse -MOUSE_SPR_MEM = $F400 ; Memory location -MOUSE_SPR_MASK = $01 .shl MOUSE_SPR ; Positive mask -MOUSE_SPR_NMASK = .lobyte(.not MOUSE_SPR_MASK) ; Negative mask -VIC_SPR_X = (VIC_SPR0_X + 2*MOUSE_SPR) ; Sprite X register -VIC_SPR_Y = (VIC_SPR0_Y + 2*MOUSE_SPR) ; Sprite Y register +MOUSE_SPR = 0 ; Sprite used for the mouse +MOUSE_SPR_MEM = $F400 ; Memory location +MOUSE_SPR_MASK = $01 .shl MOUSE_SPR ; Positive mask +MOUSE_SPR_NMASK = .lobyte(.bitnot MOUSE_SPR_MASK) ; Negative mask +VIC_SPR_X = (VIC_SPR0_X + 2*MOUSE_SPR) ; Sprite X register +VIC_SPR_Y = (VIC_SPR0_Y + 2*MOUSE_SPR) ; Sprite Y register ; -------------------------------------------------------------------------- ; Initialize the mouse sprite. -.segment "INIT" +.segment "ONCE" initmcb: diff --git a/libsrc/cbm510/pencalib.c b/libsrc/cbm510/pencalib.c old mode 100755 new mode 100644 diff --git a/libsrc/cbm510/ser/cbm510-std.s b/libsrc/cbm510/ser/cbm510-std.s index 7629892e0..64f613cd5 100644 --- a/libsrc/cbm510/ser/cbm510-std.s +++ b/libsrc/cbm510/ser/cbm510-std.s @@ -46,15 +46,15 @@ ; Jump table - .word INSTALL - .word UNINSTALL - .word OPEN - .word CLOSE - .word GET - .word PUT - .word STATUS - .word IOCTL - .word IRQ + .word SER_INSTALL + .word SER_UNINSTALL + .word SER_OPEN + .word SER_CLOSE + .word SER_GET + .word SER_PUT + .word SER_STATUS + .word SER_IOCTL + .word SER_IRQ ;---------------------------------------------------------------------------- ; @@ -122,24 +122,24 @@ ParityTable: .code ;---------------------------------------------------------------------------- -; INSTALL routine. Is called after the driver is loaded into memory. If +; SER_INSTALL routine. Is called after the driver is loaded into memory. If ; possible, check if the hardware is present. ; Must return an SER_ERR_xx code in a/x. ; ; Since we don't have to manage the IRQ vector on the Plus/4, this is actually ; the same as: ; -; UNINSTALL routine. Is called before the driver is removed from memory. +; SER_UNINSTALL routine. Is called before the driver is removed from memory. ; Must return an SER_ERR_xx code in a/x. ; and: ; -; CLOSE: Close the port, disable interrupts and flush the buffer. Called +; SER_CLOSE: Close the port, disable interrupts and flush the buffer. Called ; without parameters. Must return an error code in a/x. ; -INSTALL: -UNINSTALL: -CLOSE: +SER_INSTALL: +SER_UNINSTALL: +SER_CLOSE: ; Deactivate DTR and disable 6551 interrupts @@ -156,7 +156,7 @@ CLOSE: ; PARAMS routine. A pointer to a ser_params structure is passed in ptr1. ; Must return an SER_ERR_xx code in a/x. -OPEN: +SER_OPEN: ; Check if the handshake setting is valid @@ -236,12 +236,13 @@ InvBaud: rts ;---------------------------------------------------------------------------- -; GET: Will fetch a character from the receive buffer and store it into the +; SER_GET: Will fetch a character from the receive buffer and store it into the ; variable pointer to by ptr1. If no data is available, SER_ERR_NO_DATA is ; return. ; -GET: ldx SendFreeCnt ; Send data if necessary +SER_GET: + ldx SendFreeCnt ; Send data if necessary inx ; X == $FF? beq @L1 lda #$00 @@ -280,11 +281,11 @@ GET: ldx SendFreeCnt ; Send data if necessary rts ;---------------------------------------------------------------------------- -; PUT: Output character in A. +; SER_PUT: Output character in A. ; Must return an error code in a/x. ; -PUT: +SER_PUT: ; Try to send @@ -314,11 +315,12 @@ PUT: rts ;---------------------------------------------------------------------------- -; STATUS: Return the status in the variable pointed to by ptr1. +; SER_STATUS: Return the status in the variable pointed to by ptr1. ; Must return an error code in a/x. ; -STATUS: lda #$0F +SER_STATUS: + lda #$0F sta IndReg ldy #ACIA::STATUS lda (acia),y @@ -330,23 +332,25 @@ STATUS: lda #$0F rts ;---------------------------------------------------------------------------- -; IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl +; SER_IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl ; specific data in ptr1, and the ioctl code in A. ; Must return an error code in a/x. ; -IOCTL: lda #<SER_ERR_INV_IOCTL ; We don't support ioclts for now +SER_IOCTL: + lda #<SER_ERR_INV_IOCTL ; We don't support ioclts for now ldx #>SER_ERR_INV_IOCTL rts ;---------------------------------------------------------------------------- -; IRQ: Called from the builtin runtime IRQ handler as a subroutine. All +; SER_IRQ: Called from the builtin runtime IRQ handler as a subroutine. All ; registers are already save, no parameters are passed, but the carry flag ; is clear on entry. The routine must return with carry set if the interrupt ; was handled, otherwise with carry clear. ; -IRQ: lda #$0F +SER_IRQ: + lda #$0F sta IndReg ; Switch to the system bank ldy #ACIA::STATUS lda (acia),y ; Check ACIA status for receive interrupt @@ -435,4 +439,3 @@ write: pha lda ExecReg sta IndReg rts - diff --git a/libsrc/cbm510/settime.s b/libsrc/cbm510/settime.s new file mode 100644 index 000000000..08de7915a --- /dev/null +++ b/libsrc/cbm510/settime.s @@ -0,0 +1,97 @@ +; +; 2018-08-18, Oliver Schmidt +; 2018-08-19, Greg King +; +; int __fastcall__ clock_settime (clockid_t clk_id, const struct timespec *tp); +; + + .include "time.inc" + .include "cbm510.inc" + .include "extzp.inc" + + .importzp sreg, ptr1 + .import pushax, pusheax, ldax0sp, ldeaxidx + .import sys_bank, restore_bank + .import tosdiveax, incsp3, return0 + .import TM, load_tenth + + +;---------------------------------------------------------------------------- +.code + +.proc _clock_settime + + jsr pushax + + .assert timespec::tv_sec = 0, error + jsr _localtime + sta ptr1 + stx ptr1+1 + ldy #.sizeof(tm)-1 +@L1: lda (ptr1),y + sta TM,y + dey + bpl @L1 + + jsr sys_bank + lda TM + tm::tm_hour + jsr dec2BCD + tax ; Force flags + bne @L2 + lda #$92 ; 12 AM + bne @L3 +@L2: cmp #$13 ; 1 PM + bcc @L3 + sed + sbc #$12 + cld + ora #%10000000 +@L3: ldy #CIA::TODHR + sta (cia2),y + lda TM + tm::tm_min + jsr dec2BCD + ldy #CIA::TODMIN + sta (cia2),y + lda TM + tm::tm_sec + jsr dec2BCD + ldy #CIA::TODSEC + sta (cia2),y + jsr restore_bank + + jsr ldax0sp + ldy #3+timespec::tv_nsec + jsr ldeaxidx + jsr pusheax + jsr load_tenth + jsr tosdiveax + + jsr sys_bank + ldy #CIA::TOD10 + sta (cia2),y + jsr restore_bank + + lda #$00 + tax + jmp incsp3 + +.endproc + +;---------------------------------------------------------------------------- +; Just sum up the value in BCD mode. +; http://forum.6502.org/viewtopic.php?p=7629#p7629 + +.proc dec2BCD + + tax + dex + bmi @L9 + lda #0 + clc + sed +@L1: adc #1 + dex + bpl @L1 + cld +@L9: rts + +.endproc diff --git a/libsrc/cbm510/tmcommon.s b/libsrc/cbm510/tmcommon.s new file mode 100644 index 000000000..9f0ed9c56 --- /dev/null +++ b/libsrc/cbm510/tmcommon.s @@ -0,0 +1,41 @@ +; +; Oliver Schmidt, 16.8.2018 +; +; Common stuff for the clock routines +; + + .include "cbm510.inc" + + .export TM, load_tenth + + .importzp sreg + + +;---------------------------------------------------------------------------- +.code + +.proc load_tenth + + lda #<(100 * 1000 * 1000 / $10000) + ldx #>(100 * 1000 * 1000 / $10000) + sta sreg + stx sreg+1 + lda #<(100 * 1000 * 1000) + ldx #>(100 * 1000 * 1000) + rts + +.endproc + +;---------------------------------------------------------------------------- +; TM struct with date set to 1970-01-01 +.data + +TM: .word 0 ; tm_sec + .word 0 ; tm_min + .word 0 ; tm_hour + .word 1 ; tm_mday + .word 0 ; tm_mon + .word 70 ; tm_year + .word 0 ; tm_wday + .word 0 ; tm_yday + .word 0 ; tm_isdst diff --git a/libsrc/cbm510/waitvsync.s b/libsrc/cbm510/waitvsync.s new file mode 100644 index 000000000..0bb765e4a --- /dev/null +++ b/libsrc/cbm510/waitvsync.s @@ -0,0 +1,28 @@ +; +; Written by Groepaz <groepaz@gmx.net> +; +; void waitvsync (void); +; + + .export _waitvsync + .import PALFLAG + .import sys_bank, restore_bank + + .importzp vic + + .include "cbm510.inc" + +_waitvsync: + jsr sys_bank ; Switch to the system bank + sei + + ldy #VIC_CTRL1 +@l1: + lda (vic),y + bpl @l1 +@l2: + lda (vic),y + bmi @l2 + + cli + jmp restore_bank diff --git a/libsrc/cbm610/_scrsize.s b/libsrc/cbm610/_scrsize.s index 8b68b8cdc..5f3076920 100644 --- a/libsrc/cbm610/_scrsize.s +++ b/libsrc/cbm610/_scrsize.s @@ -6,7 +6,6 @@ .export screensize .import SCREEN - + screensize = SCREEN - diff --git a/libsrc/cbm610/break.s b/libsrc/cbm610/break.s index 03927fa70..aa9d17f16 100644 --- a/libsrc/cbm610/break.s +++ b/libsrc/cbm610/break.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 27.09.1998 ; -; void set_brk (unsigned Addr); +; void __fastcall__ set_brk (unsigned Addr); ; void reset_brk (void); ; diff --git a/libsrc/cbm610/cpeekc.s b/libsrc/cbm610/cpeekc.s new file mode 100644 index 000000000..295d096f3 --- /dev/null +++ b/libsrc/cbm610/cpeekc.s @@ -0,0 +1,45 @@ +; +; 2016-02-28, Groepaz +; 2017-06-19, Greg King +; +; char cpeekc (void); +; + + .export _cpeekc + + .import CURS_X: zp, CharPtr: zp + + .include "cbm610.inc" + + +_cpeekc: + ldx IndReg + ldy #$0F + sty IndReg + + ldy CURS_X + lda (CharPtr),y ; get char from system bank + stx IndReg + ldx #>$0000 + and #<~$80 ; remove reverse bit + +; Convert the screen code into a PetSCII code. +; $00 - $1F: +$40 +; $20 - $3F +; $40 - $5f: +$20 +; $60 - $7F: +$40 + + cmp #$20 + bcs @sk1 ;(bge) + ora #$40 + rts + +@sk1: cmp #$40 + bcc @end ;(blt) + cmp #$60 + bcc @sk2 ;(blt) + ;sec + adc #$20 - $01 +@sk2: ;clc ; both above cmp and adc clear carry flag + adc #$20 +@end: rts diff --git a/libsrc/cbm610/cpeekcolor.s b/libsrc/cbm610/cpeekcolor.s new file mode 100644 index 000000000..ed275ec95 --- /dev/null +++ b/libsrc/cbm610/cpeekcolor.s @@ -0,0 +1,8 @@ +; +; 2017-06-03, Greg King +; +; unsigned char cpeekcolor (void); +; + + .import return1 + .export _cpeekcolor := return1 ; always COLOR_WHITE diff --git a/libsrc/cbm610/cpeekrevers.s b/libsrc/cbm610/cpeekrevers.s new file mode 100644 index 000000000..52e166e85 --- /dev/null +++ b/libsrc/cbm610/cpeekrevers.s @@ -0,0 +1,29 @@ +; +; 2016-02-28, Groepaz +; 2017-06-19, Greg King +; +; unsigned char cpeekrevers (void); +; + + .export _cpeekrevers + + .import plot + .import CURS_X: zp, CharPtr: zp + + .include "cbm610.inc" + + +_cpeekrevers: + ldx IndReg + ldy #$0F + sty IndReg + + ldy CURS_X + lda (CharPtr),y ; get char from system bank + stx IndReg + ldx #>$0000 + and #$80 ; get reverse bit + asl a + tax ; ldx #>$0000 + rol a ; return boolean value + rts diff --git a/libsrc/cbm610/cpeeks.s b/libsrc/cbm610/cpeeks.s new file mode 100644 index 000000000..352521bcc --- /dev/null +++ b/libsrc/cbm610/cpeeks.s @@ -0,0 +1,82 @@ +; +; 2017-07-05, Greg King +; +; void cpeeks (char* s, unsigned length); +; + + .export _cpeeks + + .import popax + .importzp ptr1, ptr2, ptr3, tmp1, tmp2 + .importzp CURS_X, CharPtr + + .include "cbm610.inc" + .macpack generic + + +_cpeeks: + eor #<$FFFF ; counting a word upward is faster + sta ptr3 ; so, we use -(length + 1) + txa + eor #>$FFFF + sta ptr3+1 + + lda CharPtr + ldx CharPtr+1 + sta ptr2 + stx ptr2+1 + ldy CURS_X + sty tmp2 + + jsr popax + sta tmp1 ; (will be a .Y index) + stx ptr1+1 + ldx IndReg + ldy #<$0000 + sty ptr1 + bze L3 ; branch always + +L4: ldy #$0F + sty IndReg + ldy tmp2 + lda (ptr2),y ; get char from system bank + stx IndReg + iny + bnz L2 + inc ptr2+1 +L2: sty tmp2 + and #<~$80 ; remove reverse bit + +; Convert the screen code into a PetSCII code. +; $00 - $1F: +$40 +; $20 - $3F +; $40 - $5f: +$20 +; $60 - $7F: +$40 + + cmp #$20 + blt @sk1 ;(bcc) + cmp #$40 + blt L5 + cmp #$60 + blt @sk2 ;(bcc) + clc +@sk1: adc #$20 +@sk2: ;clc ; both above cmp and adc clear carry flag + adc #$20 + +L5: ldy tmp1 + sta (ptr1),y + iny + bnz L1 + inc ptr1+1 +L1: sty tmp1 + +L3: inc ptr3 ; count length + bnz L4 + inc ptr3+1 + bnz L4 + + lda #$00 ; terminate the string + ldy tmp1 + sta (ptr1),y + rts diff --git a/libsrc/cbm610/cputc.s b/libsrc/cbm610/cputc.s index 831ead6d6..78e2a5581 100644 --- a/libsrc/cbm610/cputc.s +++ b/libsrc/cbm610/cputc.s @@ -9,8 +9,7 @@ .export newline, plot .destructor setsyscursor - .import _gotoxy - .import popa + .import gotoxy .import PLOT .import ktmp: zp, crtc: zp, CURS_X: zp, CURS_Y: zp, RVS: zp @@ -21,8 +20,7 @@ _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C ; Plot a character - also used as internal function @@ -75,10 +73,9 @@ L4: inc CURS_Y ; Handle character if high bit set L10: and #$7F - cmp #$7E ; PI? + cmp #$7F ; PI? bne L11 lda #$5E ; Load screen code for PI - bne cputdirect L11: ora #$40 bne cputdirect ; Branch always diff --git a/libsrc/cbm610/systime.s b/libsrc/cbm610/gettime.s similarity index 52% rename from libsrc/cbm610/systime.s rename to libsrc/cbm610/gettime.s index be2bedf6f..7e510af29 100644 --- a/libsrc/cbm610/systime.s +++ b/libsrc/cbm610/gettime.s @@ -1,43 +1,45 @@ ; -; Stefan Haubenthal, 2009-07-27 -; Ullrich von Bassewitz, 2009-09-24 +; 2009-07-27, Stefan Haubenthal +; 2009-09-24, Ullrich von Bassewitz +; 2018-08-18, Oliver Schmidt +; 2018-08-19, Greg King ; -; time_t _systime (void); -; /* Similar to time(), but: -; ** - Is not ISO C -; ** - Does not take the additional pointer -; ** - Does not set errno when returning -1 -; */ +; int __fastcall__ clock_gettime (clockid_t clk_id, struct timespec *tp); ; .include "time.inc" .include "cbm610.inc" .include "extzp.inc" + .import pushax, pusheax, tosmul0ax, steaxspidx, incsp1 .import sys_bank, restore_bank - .importzp tmp1, tmp2 + .import TM, load_tenth + .importzp sreg, tmp1, tmp2 ;---------------------------------------------------------------------------- .code -.proc __systime +.proc _clock_gettime -; Switch to the system bank + jsr pushax + jsr pushax jsr sys_bank - -; Read the clock - ldy #CIA::TODHR lda (cia),y - bpl AM - and #%01111111 sed + tax ; Save PM flag + and #%01111111 + cmp #$12 ; 12 AM/PM + bcc @L1 + sbc #$12 +@L1: inx ; Get PM flag + bpl @L2 clc adc #$12 - cld -AM: jsr BCD2dec +@L2: cld + jsr BCD2dec sta TM + tm::tm_hour ldy #CIA::TODMIN lda (cia),y @@ -48,17 +50,28 @@ AM: jsr BCD2dec jsr BCD2dec sta TM + tm::tm_sec ldy #CIA::TOD10 - lda (cia),y ; Dummy read to unfreeze - -; Restore the bank - + lda (cia),y jsr restore_bank - -; Convert to a time - + pha lda #<TM ldx #>TM - jmp _mktime + jsr _mktime + + ldy #timespec::tv_sec + jsr steaxspidx ; Pops address pushed by 2. pushax + + jsr load_tenth + jsr pusheax + pla + ldx #>$0000 + jsr tosmul0ax + + ldy #timespec::tv_nsec + jsr steaxspidx ; Pops address pushed by 1. pushax + + lda #$00 + tax + jmp incsp1 .endproc @@ -81,18 +94,3 @@ AM: jsr BCD2dec rts .endproc - -;---------------------------------------------------------------------------- -; TM struct with date set to 1970-01-01 -.data - -TM: .word 0 ; tm_sec - .word 0 ; tm_min - .word 0 ; tm_hour - .word 1 ; tm_mday - .word 0 ; tm_mon - .word 70 ; tm_year - .word 0 ; tm_wday - .word 0 ; tm_yday - .word 0 ; tm_isdst - diff --git a/libsrc/cbm610/kernal.s b/libsrc/cbm610/kernal.s index 9ea4f0e96..30156e79c 100644 --- a/libsrc/cbm610/kernal.s +++ b/libsrc/cbm610/kernal.s @@ -4,9 +4,10 @@ ; CBM610 kernal functions ; + .include "cbm_kernal.inc" + .export CINT .export IOINIT - .export RAMTAS .export RESTOR .export VECTOR .export SETMSG @@ -27,57 +28,12 @@ .export CKOUT .export CLRCH .export BASIN + .export CHRIN .export BSOUT + .export CHROUT .export LOAD .export SAVE .export STOP .export GETIN .export CLALL .export PLOT - - -;----------------------------------------------------------------------------- -; All functions are available in the kernal jump table. Functions having -; replacements (usually short ones where the overhead of the cross bank call -; is not worth the trouble) are commented out. - -CINT = $FF81 -IOINIT = $FF84 -RAMTAS = $FF87 -RESTOR = $FF8A -VECTOR = $FF8D -SETMSG = $FF90 -SECOND = $FF93 -TKSA = $FF96 -MEMTOP = $FF99 -MEMBOT = $FF9C -SCNKEY = $FF9F -SETTMO = $FFA2 -ACPTR = $FFA5 -CIOUT = $FFA8 -UNTLK = $FFAB -UNLSN = $FFAE -LISTEN = $FFB1 -TALK = $FFB4 -;READST = $FFB7 -SETLFS = $FFBA -;SETNAM = $FFBD -;OPEN = $FFC0 -;CLOSE = $FFC3 -CHKIN = $FFC6 -CKOUT = $FFC9 -CLRCH = $FFCC -BASIN = $FFCF -BSOUT = $FFD2 -LOAD = $FFD5 -SAVE = $FFD8 -;SETTIM = $FFDB -;RDTIM = $FFDE -STOP = $FFE1 -GETIN = $FFE4 -CLALL = $FFE7 -;UDTIM = $FFEA -;SCREEN = $FFED -PLOT = $FFF0 -;IOBASE = $FFF3 - diff --git a/libsrc/cbm610/kopen.s b/libsrc/cbm610/kopen.s index 025922320..7358b091a 100644 --- a/libsrc/cbm610/kopen.s +++ b/libsrc/cbm610/kopen.s @@ -3,10 +3,10 @@ ; ; OPEN kernal call. ; -; NOTE: The OPEN system call in the CBM610 kernal is different from the +; NOTE: The OPEN system call in the CBM610 kernal is different from the ; standard. It evaluates the carry flag and does a normal open if carry clear ; and some strange things (output sa 15 + name on IEC) if carry set. To be -; compatible with our CBM file stuff, we have to clear the carry before +; compatible with our CBM file stuff, we have to clear the carry before ; calling the real OPEN. .export OPEN @@ -18,5 +18,3 @@ .endproc - - diff --git a/libsrc/cbm610/ksetnam.s b/libsrc/cbm610/ksetnam.s index ab5c6d730..97ecf0126 100644 --- a/libsrc/cbm610/ksetnam.s +++ b/libsrc/cbm610/ksetnam.s @@ -12,7 +12,7 @@ .import sys_bank, restore_bank .import sysp0: zp, ktmp: zp - + .include "cbm610.inc" .proc SETNAM @@ -41,5 +41,3 @@ .endproc - - diff --git a/libsrc/cbm610/kudtim.s b/libsrc/cbm610/kudtim.s index 6862787fb..f587e5aa0 100644 --- a/libsrc/cbm610/kudtim.s +++ b/libsrc/cbm610/kudtim.s @@ -3,7 +3,7 @@ ; ; udtim routine for the 610. We will not check for the stop key here, since ; C programs will not use it. -; +; .export UDTIM .import time: zp diff --git a/libsrc/cbm610/mainargs.s b/libsrc/cbm610/mainargs.s index 02461ac26..9f708698e 100644 --- a/libsrc/cbm610/mainargs.s +++ b/libsrc/cbm610/mainargs.s @@ -35,10 +35,10 @@ MAXARGS = 10 ; Maximum number of arguments allowed REM = $8f ; BASIC token-code NAME_LEN = 16 ; Maximum length of command-name -; Get possible command-line arguments. Goes into the special INIT segment, +; Get possible command-line arguments. Goes into the special ONCE segment, ; which may be reused after the startup code is run. ; -.segment "INIT" +.segment "ONCE" initmainargs: @@ -142,7 +142,7 @@ done: lda #<argv stx __argv + 1 rts -.segment "INITBSS" +.segment "INIT" term: .res 1 name: .res NAME_LEN + 1 diff --git a/libsrc/cbm610/randomize.s b/libsrc/cbm610/randomize.s index d313baa1b..75c419ccb 100644 --- a/libsrc/cbm610/randomize.s +++ b/libsrc/cbm610/randomize.s @@ -10,7 +10,7 @@ .import _srand .importzp time -__randomize: +__randomize: ldx time+2 ; Use 50/60HZ clock lda time+1 jmp _srand ; Initialize generator diff --git a/libsrc/cbm610/revers.s b/libsrc/cbm610/revers.s index eb44f0282..78b8a0591 100644 --- a/libsrc/cbm610/revers.s +++ b/libsrc/cbm610/revers.s @@ -9,7 +9,7 @@ .import RVS: zp .include "cbm610.inc" - + .proc _revers diff --git a/libsrc/cbm610/ser/cbm610-std.s b/libsrc/cbm610/ser/cbm610-std.s index 1b2d38aa5..7cdb285bd 100644 --- a/libsrc/cbm610/ser/cbm610-std.s +++ b/libsrc/cbm610/ser/cbm610-std.s @@ -46,15 +46,15 @@ ; Jump table - .word INSTALL - .word UNINSTALL - .word OPEN - .word CLOSE - .word GET - .word PUT - .word STATUS - .word IOCTL - .word IRQ + .word SER_INSTALL + .word SER_UNINSTALL + .word SER_OPEN + .word SER_CLOSE + .word SER_GET + .word SER_PUT + .word SER_STATUS + .word SER_IOCTL + .word SER_IRQ ;---------------------------------------------------------------------------- ; @@ -122,25 +122,25 @@ ParityTable: .code ;---------------------------------------------------------------------------- -; INSTALL routine. Is called after the driver is loaded into memory. If +; SER_INSTALL routine. Is called after the driver is loaded into memory. If ; possible, check if the hardware is present. ; Must return an SER_ERR_xx code in a/x. ; ; Since we don't have to manage the IRQ vector on the Plus/4, this is actually ; the same as: ; -; UNINSTALL routine. Is called before the driver is removed from memory. +; SER_UNINSTALL routine. Is called before the driver is removed from memory. ; Must return an SER_ERR_xx code in a/x. ; ; and: ; -; CLOSE: Close the port, disable interrupts and flush the buffer. Called +; SER_CLOSE: Close the port, disable interrupts and flush the buffer. Called ; without parameters. Must return an error code in a/x. ; -INSTALL: -UNINSTALL: -CLOSE: +SER_INSTALL: +SER_UNINSTALL: +SER_CLOSE: ; Deactivate DTR and disable 6551 interrupts @@ -157,7 +157,7 @@ CLOSE: ; PARAMS routine. A pointer to a ser_params structure is passed in ptr1. ; Must return an SER_ERR_xx code in a/x. -OPEN: +SER_OPEN: ; Check if the handshake setting is valid @@ -237,12 +237,13 @@ InvBaud: rts ;---------------------------------------------------------------------------- -; GET: Will fetch a character from the receive buffer and store it into the +; SER_GET: Will fetch a character from the receive buffer and store it into the ; variable pointer to by ptr1. If no data is available, SER_ERR_NO_DATA is ; return. ; -GET: ldx SendFreeCnt ; Send data if necessary +SER_GET: + ldx SendFreeCnt ; Send data if necessary inx ; X == $FF? beq @L1 lda #$00 @@ -281,11 +282,11 @@ GET: ldx SendFreeCnt ; Send data if necessary rts ;---------------------------------------------------------------------------- -; PUT: Output character in A. +; SER_PUT: Output character in A. ; Must return an error code in a/x. ; -PUT: +SER_PUT: ; Try to send @@ -315,11 +316,12 @@ PUT: rts ;---------------------------------------------------------------------------- -; STATUS: Return the status in the variable pointed to by ptr1. +; SER_STATUS: Return the status in the variable pointed to by ptr1. ; Must return an error code in a/x. ; -STATUS: lda #$0F +SER_STATUS: + lda #$0F sta IndReg ldy #ACIA::STATUS lda (acia),y @@ -331,23 +333,25 @@ STATUS: lda #$0F rts ;---------------------------------------------------------------------------- -; IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl +; SER_IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl ; specific data in ptr1, and the ioctl code in A. ; Must return an error code in a/x. ; -IOCTL: lda #<SER_ERR_INV_IOCTL ; We don't support ioclts for now +SER_IOCTL: + lda #<SER_ERR_INV_IOCTL ; We don't support ioclts for now ldx #>SER_ERR_INV_IOCTL rts ;---------------------------------------------------------------------------- -; IRQ: Called from the builtin runtime IRQ handler as a subroutine. All +; SER_IRQ: Called from the builtin runtime IRQ handler as a subroutine. All ; registers are already save, no parameters are passed, but the carry flag ; is clear on entry. The routine must return with carry set if the interrupt ; was handled, otherwise with carry clear. ; -IRQ: lda #$0F +SER_IRQ: + lda #$0F sta IndReg ; Switch to the system bank ldy #ACIA::STATUS lda (acia),y ; Check ACIA status for receive interrupt @@ -436,4 +440,3 @@ write: pha lda ExecReg sta IndReg rts - diff --git a/libsrc/cbm610/settime.s b/libsrc/cbm610/settime.s new file mode 100644 index 000000000..217135d76 --- /dev/null +++ b/libsrc/cbm610/settime.s @@ -0,0 +1,97 @@ +; +; 2018-08-18, Oliver Schmidt +; 2018-08-19, Greg King +; +; int __fastcall__ clock_settime (clockid_t clk_id, const struct timespec *tp); +; + + .include "time.inc" + .include "cbm610.inc" + .include "extzp.inc" + + .importzp sreg, ptr1 + .import pushax, pusheax, ldax0sp, ldeaxidx + .import sys_bank, restore_bank + .import tosdiveax, incsp3, return0 + .import TM, load_tenth + + +;---------------------------------------------------------------------------- +.code + +.proc _clock_settime + + jsr pushax + + .assert timespec::tv_sec = 0, error + jsr _localtime + sta ptr1 + stx ptr1+1 + ldy #.sizeof(tm)-1 +@L1: lda (ptr1),y + sta TM,y + dey + bpl @L1 + + jsr sys_bank + lda TM + tm::tm_hour + jsr dec2BCD + tax ; Force flags + bne @L2 + lda #$92 ; 12 AM + bne @L3 +@L2: cmp #$13 ; 1 PM + bcc @L3 + sed + sbc #$12 + cld + ora #%10000000 +@L3: ldy #CIA::TODHR + sta (cia),y + lda TM + tm::tm_min + jsr dec2BCD + ldy #CIA::TODMIN + sta (cia),y + lda TM + tm::tm_sec + jsr dec2BCD + ldy #CIA::TODSEC + sta (cia),y + jsr restore_bank + + jsr ldax0sp + ldy #3+timespec::tv_nsec + jsr ldeaxidx + jsr pusheax + jsr load_tenth + jsr tosdiveax + + jsr sys_bank + ldy #CIA::TOD10 + sta (cia),y + jsr restore_bank + + lda #$00 + tax + jmp incsp3 + +.endproc + +;---------------------------------------------------------------------------- +; Just sum up the value in BCD mode. +; http://forum.6502.org/viewtopic.php?p=7629#p7629 + +.proc dec2BCD + + tax + dex + bmi @L9 + lda #0 + clc + sed +@L1: adc #1 + dex + bpl @L1 + cld +@L9: rts + +.endproc diff --git a/libsrc/cbm610/tmcommon.s b/libsrc/cbm610/tmcommon.s new file mode 100644 index 000000000..21dc55494 --- /dev/null +++ b/libsrc/cbm610/tmcommon.s @@ -0,0 +1,41 @@ +; +; Oliver Schmidt, 16.8.2018 +; +; Common stuff for the clock routines +; + + .include "cbm610.inc" + + .export TM, load_tenth + + .importzp sreg + + +;---------------------------------------------------------------------------- +.code + +.proc load_tenth + + lda #<(100 * 1000 * 1000 / $10000) + ldx #>(100 * 1000 * 1000 / $10000) + sta sreg + stx sreg+1 + lda #<(100 * 1000 * 1000) + ldx #>(100 * 1000 * 1000) + rts + +.endproc + +;---------------------------------------------------------------------------- +; TM struct with date set to 1970-01-01 +.data + +TM: .word 0 ; tm_sec + .word 0 ; tm_min + .word 0 ; tm_hour + .word 1 ; tm_mday + .word 0 ; tm_mon + .word 70 ; tm_year + .word 0 ; tm_wday + .word 0 ; tm_yday + .word 0 ; tm_isdst diff --git a/libsrc/common/_afailed.c b/libsrc/common/_afailed.c index 7c6df4a2c..ab8b94ca6 100644 --- a/libsrc/common/_afailed.c +++ b/libsrc/common/_afailed.c @@ -2,21 +2,19 @@ ** _afailed.c ** ** 1998-06-06, Ullrich von Bassewitz -** 2015-03-13, Greg King +** 2019-11-10, Greg King */ +#include <signal.h> #include <stdio.h> #include <stdlib.h> - void __fastcall__ _afailed (char* file, unsigned line) { - fprintf (stderr, "ASSERTION FAILED IN %s(%u)\n", file, line); - exit (2); + raise (SIGABRT); + fprintf (stderr, "ASSERTION FAILED IN %s:%u\n", file, line); + exit (EXIT_ASSERT); } - - - diff --git a/libsrc/common/_cwd.s b/libsrc/common/_cwd.s index 7b4031f52..92276ead9 100644 --- a/libsrc/common/_cwd.s +++ b/libsrc/common/_cwd.s @@ -19,7 +19,7 @@ cwd_init := initcwd -.segment "INITBSS" +.segment "INIT" __cwd: .res __cwd_buf_size diff --git a/libsrc/common/_environ.s b/libsrc/common/_environ.s index 6a53f80a8..f9a349e67 100644 --- a/libsrc/common/_environ.s +++ b/libsrc/common/_environ.s @@ -15,10 +15,10 @@ .export __environ, __envcount, __envsize .import initenv .constructor env_init - + env_init := initenv - -.bss + +.data __environ: .addr 0 @@ -26,5 +26,3 @@ __envcount: .byte 0 __envsize: .byte 0 - - diff --git a/libsrc/common/_heap.s b/libsrc/common/_heap.s index 5af434050..4ec8c80cd 100644 --- a/libsrc/common/_heap.s +++ b/libsrc/common/_heap.s @@ -27,7 +27,7 @@ __heaplast: ; Initialization. Will be called from startup! -.segment "INIT" +.segment "ONCE" initheap: sec @@ -39,4 +39,4 @@ initheap: sta __heapend+1 rts - + diff --git a/libsrc/common/_heapmaxavail.s b/libsrc/common/_heapmaxavail.s index 4d44fadc1..19ae18b8d 100644 --- a/libsrc/common/_heapmaxavail.s +++ b/libsrc/common/_heapmaxavail.s @@ -6,7 +6,7 @@ ; size_t _heapmaxavail (void); ; ; - + .importzp ptr1, ptr2 .export __heapmaxavail diff --git a/libsrc/common/cc65_idiv32by16r16.s b/libsrc/common/_idiv32by16r16.s similarity index 90% rename from libsrc/common/cc65_idiv32by16r16.s rename to libsrc/common/_idiv32by16r16.s index 9c30984b8..7df78f4dd 100644 --- a/libsrc/common/cc65_idiv32by16r16.s +++ b/libsrc/common/_idiv32by16r16.s @@ -4,7 +4,7 @@ ; CC65 library: 32by16 => 16 signed division ; - .export _cc65_idiv32by16r16 + .export _idiv32by16r16 .import idiv32by16r16, incsp4 .include "zeropage.inc" @@ -13,7 +13,7 @@ ;--------------------------------------------------------------------------- ; 32by16 division. -.proc _cc65_idiv32by16r16 +.proc _idiv32by16r16 pha ; Save rhs diff --git a/libsrc/common/cc65_imul16x16r32.s b/libsrc/common/_imul16x16r32.s similarity index 85% rename from libsrc/common/cc65_imul16x16r32.s rename to libsrc/common/_imul16x16r32.s index b4e82de10..e08d11c6c 100644 --- a/libsrc/common/cc65_imul16x16r32.s +++ b/libsrc/common/_imul16x16r32.s @@ -4,7 +4,7 @@ ; CC65 library: 16x16 => 32 signed multiplication ; - .export _cc65_imul16x16r32 + .export _imul16x16r32 .import imul16x16r32, popax .include "zeropage.inc" @@ -14,7 +14,7 @@ ; 16x16 => 32 signed multiplication routine. -.proc _cc65_imul16x16r32 +.proc _imul16x16r32 sta ptr1 stx ptr1+1 diff --git a/libsrc/common/cc65_imul8x8r16.s b/libsrc/common/_imul8x8r16.s similarity index 84% rename from libsrc/common/cc65_imul8x8r16.s rename to libsrc/common/_imul8x8r16.s index 0e7d5479b..9987f6e85 100644 --- a/libsrc/common/cc65_imul8x8r16.s +++ b/libsrc/common/_imul8x8r16.s @@ -5,7 +5,7 @@ ; CC65 library: 8x8 => 16 signed multiplication ; - .export _cc65_imul8x8r16 + .export _imul8x8r16 .import imul8x8r16, popa, ptr1:zp @@ -13,7 +13,7 @@ ; 8x8 => 16 signed multiplication routine. -.proc _cc65_imul8x8r16 +.proc _imul8x8r16 sta ptr1 jsr popa diff --git a/libsrc/common/_longminstr.c b/libsrc/common/_longminstr.c index ffc35aa77..28a19f39b 100644 --- a/libsrc/common/_longminstr.c +++ b/libsrc/common/_longminstr.c @@ -1,9 +1,9 @@ /* ** Ullrich von Bassewitz, 2012-11-26 ** -** Minimum value of a long. Is used in ascii conversions, since this value +** Minimum value of a long. Is used in ascii conversions, since this value ** has no positive counterpart than can be represented in 32 bits. In C, -** since the compiler will convert to the correct character set for the +** since the compiler will convert to the correct character set for the ** target platform. */ diff --git a/libsrc/common/_poserror.c b/libsrc/common/_poserror.c index 95dbfdc9d..2777fee98 100644 --- a/libsrc/common/_poserror.c +++ b/libsrc/common/_poserror.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/libsrc/common/_printf.s b/libsrc/common/_printf.s index f5d1784ec..840d42127 100644 --- a/libsrc/common/_printf.s +++ b/libsrc/common/_printf.s @@ -3,7 +3,7 @@ ; ; Ullrich von Bassewitz, 2000-10-21 ; - + .include "zeropage.inc" .export __printf @@ -32,8 +32,8 @@ FCount = ptr2 .code ; ---------------------------------------------------------------------------- -; Get one character from the format string and increment the pointer. Will -; return zero in Y. +; Get one character from the format string, and increment the pointer. Will +; return zero in .Y. GetFormatChar: ldy #0 @@ -51,7 +51,7 @@ OutputPadChar: lda PadChar ; ---------------------------------------------------------------------------- -; Call the output function with one character in A +; Call the output function with one character in .A Output1: sta CharArg @@ -92,7 +92,7 @@ GetSignedArg: jmp axlong ; Convert to long ; ---------------------------------------------------------------------------- -; Get a long argument from the argument list. Returns 0 in Y. +; Get a long argument from the argument list. Returns 0 in .Y. GetLongArg: jsr GetIntArg ; Get high word @@ -102,7 +102,7 @@ GetLongArg: ; Run into GetIntArg fetching the low word ; ---------------------------------------------------------------------------- -; Get an integer argument from the argument list. Returns 0 in Y. +; Get an integer argument from the argument list. Returns 0 in .Y. GetIntArg: jsr DecArgList2 @@ -114,7 +114,7 @@ GetIntArg: rts ; ---------------------------------------------------------------------------- -; Read an integer from the format string. Will return zero in Y. +; Read an integer from the format string. Will return zero in .Y. ReadInt: ldy #0 @@ -247,10 +247,10 @@ Save: lda regbank,y sta RegSave,y dey bpl Save + pla ; Restore low byte of ap ; Get the parameters from the stack - pla ; Restore low byte of ap sta ArgList ; Argument list pointer stx ArgList+1 @@ -307,7 +307,7 @@ MainLoop: inc Format+1 ; Calculate, how many characters must be output. Beware: This number may -; be zero. A still contains the low byte of the pointer. +; be zero. .A still contains the low byte of the pointer. @L3: sub FSave sta FCount @@ -343,7 +343,7 @@ MainLoop: ; We're back from out(), or we didn't call it. Check for end of string. -@L4: jsr GetFormatChar ; Get one char, zero in Y +@L4: jsr GetFormatChar ; Get one char, zero in .Y tax ; End of format string reached? bne NotDone ; End not reached @@ -357,7 +357,7 @@ Rest: lda RegSave,x rts ; Still a valid format character. Check for '%' and a '%%' sequence. Output -; anything that is not a format specifier. On intro, Y is zero. +; anything that is not a format specifier. On intro, .Y is zero. NotDone: cmp #'%' @@ -371,7 +371,7 @@ NotDone: ; We have a real format specifier ; Format is: %[flags][width][.precision][mod]type -; Y is zero on entry. +; .Y is zero on entry. FormatSpec: @@ -383,7 +383,7 @@ FormatSpec: dex bpl @L1 -; Start with reading the flags if there are any. X is $FF which is used +; Start with reading the flags if there are any. .X is $FF which is used ; for "true" ReadFlags: @@ -410,7 +410,7 @@ ReadFlags: @L4: jsr IncFormatPtr jmp ReadFlags ; ...and start over -; Done with flags, read the pad char. Y is still zero if we come here. +; Done with flags, read the pad char. .Y is still zero if we come here. ReadPadding: ldx #' ' ; PadChar @@ -421,8 +421,8 @@ ReadPadding: lda (Format),y ; Read current for later @L1: stx PadChar -; Read the width. Even here, Y is still zero. A contains the current character -; from the format string +; Read the width. Even here, .Y is still zero. .A contains the current character +; from the format string. ReadWidth: cmp #'*' @@ -435,7 +435,7 @@ ReadWidth: @L2: sta Width stx Width+1 ; ...and remember in Width -; Read the precision. Even here, Y is still zero. +; Read the precision. Even here, .Y is still zero. sty Prec ; Assume Precision is zero sty Prec+1 @@ -456,7 +456,7 @@ ReadPrec: @L2: sta Prec stx Prec+1 -; Read the modifiers. Y is still zero. +; Read the modifiers. .Y is still zero. ReadMod: lda (Format),y @@ -479,9 +479,9 @@ ReadMod: ; Initialize the argument buffer pointers. We use a static buffer (ArgBuf) to ; assemble strings. A zero page index (BufIdx) is used to keep the current -; write position. A pointer to the buffer (Str) is used to point to the the -; argument in case we will not use the buffer but a user supplied string. -; Y is zero when we come here. +; write position. A pointer to the buffer (Str) is used to point to the +; argument in case we will not use the buffer but a user-supplied string. +; .Y is zero when we come here. DoFormat: sty BufIdx ; Clear BufIdx @@ -490,7 +490,7 @@ DoFormat: ldx #>Buf stx Str+1 -; Skip the current format character, then check it (current char in A) +; Skip the current format character, then check it (current char in .A) jsr IncFormatPtr @@ -777,8 +777,5 @@ ArgLen: .res 2 .data -; Stuff from OutData. Is used as a vector and must be aligned +; Stuff from OutData. Is used as a vector CallOutFunc: jmp $0000 - - - diff --git a/libsrc/common/_scanf.c b/libsrc/common/_scanf.c index c18f1e289..ac89e3cb3 100644 --- a/libsrc/common/_scanf.c +++ b/libsrc/common/_scanf.c @@ -183,7 +183,7 @@ static void PushBack (void) asm ("jsr pushax"); /* Copy D into the zero-page. */ - (const struct scanfdata*) __AX__ = D_; + __AX__ = (unsigned) D_; asm ("sta ptr1"); asm ("stx ptr1+1"); @@ -272,7 +272,7 @@ static void __fastcall__ Error (unsigned char /* Code */) /* Does a longjmp using the given code */ { asm ("pha"); - (char*) __AX__ = JumpBuf; + __AX__ = (unsigned) JumpBuf; asm ("jsr pushax"); asm ("pla"); asm ("ldx #>$0000"); @@ -389,7 +389,7 @@ static void AssignInt (void) if (NoAssign == false) { /* Get the next argument pointer */ - (void*) __AX__ = va_arg (ap, void*); + __AX__ = (unsigned) va_arg (ap, void*); /* Put the argument pointer into the zero-page. */ asm ("sta ptr1"); @@ -468,7 +468,7 @@ static char GetFormat (void) /* Pick up the next character from the format string. */ { /* return (F = *format++); */ - (const char*) __AX__ = format; + __AX__ = (unsigned) format; asm ("sta regsave"); asm ("stx regsave+1"); ++format; diff --git a/libsrc/common/_seterrno.s b/libsrc/common/_seterrno.s index e35c0b342..79021143a 100644 --- a/libsrc/common/_seterrno.s +++ b/libsrc/common/_seterrno.s @@ -2,7 +2,7 @@ ; Ullrich von Bassewitz, 2004-05-13 ; ; __seterrno: Will set __errno to the value in A and return zero in A. Other -; registers aren't changed. The function is C callable, but +; registers aren't changed. The function is C callable, but ; currently only called from asm code. ; diff --git a/libsrc/common/_swap.s b/libsrc/common/_swap.s index a16aecc52..9ad771de1 100644 --- a/libsrc/common/_swap.s +++ b/libsrc/common/_swap.s @@ -5,7 +5,7 @@ ; .export __swap - .import popax + .import popax, popptr1 .importzp ptr1, ptr2, ptr3 @@ -19,13 +19,11 @@ __swap: eor #$FF sta ptr2 stx ptr2+1 - jsr popax ; Get p - sta ptr1 - stx ptr1+1 + jsr popptr1 ; Get p ; Prepare for swap - ldy #$00 + ; ldy #$00 is guaranteed by popptr1 ; Swap loop diff --git a/libsrc/common/cc65_udiv32by16r16.s b/libsrc/common/_udiv32by16r16.s similarity index 90% rename from libsrc/common/cc65_udiv32by16r16.s rename to libsrc/common/_udiv32by16r16.s index 9cad63bd4..a1d5f4e66 100644 --- a/libsrc/common/cc65_udiv32by16r16.s +++ b/libsrc/common/_udiv32by16r16.s @@ -4,7 +4,7 @@ ; CC65 library: 32by16 => 16 unsigned division ; - .export _cc65_udiv32by16r16 + .export _udiv32by16r16 .import udiv32by16r16m, incsp4 .include "zeropage.inc" @@ -13,7 +13,7 @@ ;--------------------------------------------------------------------------- ; 32by16 division. -.proc _cc65_udiv32by16r16 +.proc _udiv32by16r16 sta ptr3 stx ptr3+1 ; Store rhs diff --git a/libsrc/common/cc65_umul16x16r32.s b/libsrc/common/_umul16x16r32.s similarity index 85% rename from libsrc/common/cc65_umul16x16r32.s rename to libsrc/common/_umul16x16r32.s index 0e7ed7602..674b55f77 100644 --- a/libsrc/common/cc65_umul16x16r32.s +++ b/libsrc/common/_umul16x16r32.s @@ -4,7 +4,7 @@ ; CC65 library: 16x16 => 32 unsigned multiplication ; - .export _cc65_umul16x16r32 + .export _umul16x16r32 .import umul16x16r32, popax .include "zeropage.inc" @@ -13,7 +13,7 @@ ;--------------------------------------------------------------------------- ; 16x16 => 32 unsigned multiplication routine. -.proc _cc65_umul16x16r32 +.proc _umul16x16r32 sta ptr1 stx ptr1+1 diff --git a/libsrc/common/cc65_umul16x8r32.s b/libsrc/common/_umul16x8r32.s similarity index 88% rename from libsrc/common/cc65_umul16x8r32.s rename to libsrc/common/_umul16x8r32.s index 8af349348..83a3d9c73 100644 --- a/libsrc/common/cc65_umul16x8r32.s +++ b/libsrc/common/_umul16x8r32.s @@ -4,7 +4,7 @@ ; CC65 library: 16x8 => 32 unsigned multiplication ; - .export _cc65_umul16x8r32 + .export _umul16x8r32 .import umul8x16r24, popax .include "zeropage.inc" @@ -14,7 +14,7 @@ ; 16x8 => 32 unsigned multiplication routine. We use 8x16 => 24 and clear ; the high byte of the result -.proc _cc65_umul16x8r32 +.proc _umul16x8r32 sta ptr1 lda #0 diff --git a/libsrc/common/cc65_umul8x8r16.s b/libsrc/common/_umul8x8r16.s similarity index 83% rename from libsrc/common/cc65_umul8x8r16.s rename to libsrc/common/_umul8x8r16.s index cf3b26bb1..8a3d46212 100644 --- a/libsrc/common/cc65_umul8x8r16.s +++ b/libsrc/common/_umul8x8r16.s @@ -4,7 +4,7 @@ ; CC65 library: 8x8 => 16 unsigned multiplication ; - .export _cc65_umul8x8r16 + .export _umul8x8r16 .import umul8x8r16, popa, ptr1:zp @@ -12,7 +12,7 @@ ; 8x8 => 16 unsigned multiplication routine. -.proc _cc65_umul8x8r16 +.proc _umul8x8r16 sta ptr1 jsr popa diff --git a/libsrc/common/abort.c b/libsrc/common/abort.c index 43ad676a7..1100d33a3 100644 --- a/libsrc/common/abort.c +++ b/libsrc/common/abort.c @@ -7,16 +7,15 @@ #include <stdio.h> -#include <stdlib.h> +#include <stdlib.h> #include <signal.h> - void abort (void) { raise (SIGABRT); fputs ("ABNORMAL PROGRAM TERMINATION\n", stderr); - exit (3); + exit (EXIT_ABORT); } diff --git a/libsrc/common/abs.s b/libsrc/common/abs.s deleted file mode 100644 index 5daa8a14a..000000000 --- a/libsrc/common/abs.s +++ /dev/null @@ -1,16 +0,0 @@ -; -; Ullrich von Bassewitz, 17.06.1998 -; -; int abs (int x); -; - - .export _abs - .import negax - -_abs: cpx #$00 ; test hi byte - bpl L1 - jmp negax ; Negate if negative -L1: rts - - - diff --git a/libsrc/common/asctime.c b/libsrc/common/asctime.c index 15450425e..b46f29128 100644 --- a/libsrc/common/asctime.c +++ b/libsrc/common/asctime.c @@ -42,15 +42,18 @@ /* Code */ /*****************************************************************************/ +/* + CAUTION: we need to reserve enough space to be able to hold the maximum + length string: + 1234567890123456789012345678901234567 + "Wednesday September ..1 00:00:00 1970" +*/ char* __fastcall__ asctime (const struct tm* timep) { - static char buf[26]; + static char buf[38]; /* Format into given buffer and return the result */ return strftime (buf, sizeof (buf), "%c\n", timep)? buf : 0; } - - - diff --git a/libsrc/common/atoi.s b/libsrc/common/atoi.s index cb598f719..0236b77f2 100644 --- a/libsrc/common/atoi.s +++ b/libsrc/common/atoi.s @@ -8,15 +8,14 @@ .export _atoi, _atol .import negeax, __ctype .importzp sreg, ptr1, ptr2, tmp1 - + .import ctypemaskdirect .include "ctype.inc" - ; ; Conversion routine (32 bit) ; _atoi: -_atol: sta ptr1 ; Store s +_atol: sta ptr1 ; store s stx ptr1+1 ldy #0 sty ptr2 @@ -27,8 +26,7 @@ _atol: sta ptr1 ; Store s ; Skip whitespace L1: lda (ptr1),y - tax - lda __ctype,x ; get character classification + jsr ctypemaskdirect ; get character classification and #CT_SPACE_TAB ; tab or space? beq L2 ; jump if no iny @@ -36,10 +34,10 @@ L1: lda (ptr1),y inc ptr1+1 bne L1 ; branch always -; Check for a sign. The character is in X +; Check for a sign. Refetch character, X is cleared by preprocessor -L2: txa ; get char - ldx #0 ; flag: positive +L2: lda (ptr1),y ; get char + ; x=0 -> flag: positive cmp #'+' ; ### portable? beq L3 cmp #'-' ; ### portable? @@ -54,10 +52,11 @@ L3: iny L5: stx tmp1 ; remember sign flag L6: lda (ptr1),y ; get next char - tax - lda __ctype,x ; get character classification - and #$04 ; digit? - beq L8 ; done + sec ; check if char is in digit space + sbc #'0' ; so subtract lower limit + tax ; remember this numeric value + cmp #10 ; and check if upper limit is not crossed + bcs L8 ; done ; Multiply ptr2 (the converted value) by 10 @@ -70,7 +69,7 @@ L6: lda (ptr1),y ; get next char lda ptr2+1 pha lda ptr2 - pha ; Save value + pha ; save value jsr mul2 ; * 4 jsr mul2 ; * 8 @@ -91,9 +90,7 @@ L6: lda (ptr1),y ; get next char ; Get the character back and add it - txa ; get char back - sec - sbc #'0' ; make numeric value + txa ; restore numeric value back to accu clc adc ptr2 sta ptr2 @@ -119,7 +116,7 @@ L8: lda ptr2 ; Negate the value if necessary, otherwise we're done ldy tmp1 ; sign - beq L9 ; Branch if positive + beq L9 ; branch if positive ; Negate the 32 bit value in ptr2/sreg @@ -134,5 +131,3 @@ mul2: asl ptr2 rol sreg rol sreg+1 ; * 2 L9: rts - - diff --git a/libsrc/common/ctype.s b/libsrc/common/ctype.s new file mode 100644 index 000000000..220ad79c1 --- /dev/null +++ b/libsrc/common/ctype.s @@ -0,0 +1,92 @@ +; ctype.s +; +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. +; +; Character specification table, matching serveral consoles. +; + + .include "ctypetable.inc" + .export __ctypeidx + +; The tables are readonly, put them into the rodata segment + +.rodata + +__ctypeidx: + +.repeat 2 ; 2 times for normal and inverted + + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 0/00 ___ctrl_@___, 1/01 ___ctrl_A___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 2/02 ___ctrl_B___, 3/03 ___ctrl_C___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 4/04 ___ctrl_D___, 5/05 ___ctrl_E___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 6/06 ___ctrl_F___, 7/07 ___ctrl_G___ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_SPACETAB_IDX ; 8/08 ___ctrl_H___, 9/09 ___ctrl_I___ + ct_mix CT_CTRL_WS_IDX, CT_CTRL_WS_IDX ; 10/0a ___ctrl_J___, 11/0b ___ctrl_K___ + ct_mix CT_CTRL_WS_IDX, CT_CTRL_WS_IDX ; 12/0c ___ctrl_L___, 13/0d ___ctrl_M___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 14/0e ___ctrl_N___, 15/0f ___ctrl_O___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 16/10 ___ctrl_P___, 17/11 ___ctrl_Q___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 18/12 ___ctrl_R___, 19/13 ___ctrl_S___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 20/14 ___ctrl_T___, 21/15 ___ctrl_U___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 22/16 ___ctrl_V___, 23/17 ___ctrl_W___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 24/18 ___ctrl_X___, 25/19 ___ctrl_Y___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 26/1a ___ctrl_Z___, 27/1b ___ctrl_[___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 28/1c ___ctrl_\___, 29/1d ___ctrl_]___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 30/1e ___ctrl_^___, 31/1f ___ctrl_____ + + ct_mix CT_SPACE_SPACETAB_IDX, CT_NONE_IDX ; 32/20 ___SPACE___, 33/21 _____!_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 34/22 _____"_____, 35/23 _____#_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 36/24 _____$_____, 37/25 _____%_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 38/26 _____&_____, 39/27 _____'_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 40/28 _____(_____, 41/29 _____)_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 42/2a _____*_____, 43/2b _____+_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 44/2c _____,_____, 45/2d _____-_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 46/2e _____._____, 47/2f _____/_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 48/30 _____0_____, 49/31 _____1_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 50/32 _____2_____, 51/33 _____3_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 52/34 _____4_____, 53/35 _____5_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 54/36 _____6_____, 55/37 _____7_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 56/38 _____8_____, 57/39 _____9_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 58/3a _____:_____, 59/3b _____;_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 60/3c _____<_____, 61/3d _____=_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 62/3e _____>_____, 63/3f _____?_____ + + ct_mix CT_NONE_IDX, CT_UPPER_XDIGIT_IDX ; 64/40 _____@_____, 65/41 _____A_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 66/42 _____B_____, 67/43 _____C_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 68/44 _____D_____, 69/45 _____E_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_IDX ; 70/46 _____F_____, 71/47 _____G_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 72/48 _____H_____, 73/49 _____I_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 74/4a _____J_____, 75/4b _____K_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 76/4c _____L_____, 77/4d _____M_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 78/4e _____N_____, 79/4f _____O_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 80/50 _____P_____, 81/51 _____Q_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 82/52 _____R_____, 83/53 _____S_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 84/54 _____T_____, 85/55 _____U_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 86/56 _____V_____, 87/57 _____W_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 88/58 _____X_____, 89/59 _____Y_____ + ct_mix CT_UPPER_IDX, CT_NONE_IDX ; 90/5a _____Z_____, 91/5b _____[_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 92/5c _____\_____, 93/5d _____]_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 94/5e _____^_____, 95/5f _UNDERLINE_ + + ct_mix CT_NONE_IDX, CT_LOWER_XDIGIT_IDX ; 96/60 ___grave___, 97/61 _____a_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 98/62 _____b_____, 99/63 _____c_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 100/64 _____d_____, 101/65 _____e_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_IDX ; 102/66 _____f_____, 103/67 _____g_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 104/68 _____h_____, 105/69 _____i_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 106/6a _____j_____, 107/6b _____k_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 108/6c _____l_____, 109/6d _____m_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 110/6e _____n_____, 111/6f _____o_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 112/70 _____p_____, 113/71 _____q_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 114/72 _____r_____, 115/73 _____s_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 116/74 _____t_____, 117/75 _____u_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 118/76 _____v_____, 119/77 _____w_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 120/78 _____x_____, 121/79 _____y_____ + ct_mix CT_LOWER_IDX, CT_NONE_IDX ; 122/7a _____z_____, 123/7b _____{_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 124/7c _____|_____, 125/7d _____}_____ + ct_mix CT_NONE_IDX, CT_WS_IDX ; 126/7e _____~_____, 127/7f ____DEL____ + +.endrepeat diff --git a/libsrc/common/ctypemask.s b/libsrc/common/ctypemask.s new file mode 100644 index 000000000..9238f24e9 --- /dev/null +++ b/libsrc/common/ctypemask.s @@ -0,0 +1,50 @@ +; ctypemask.s +; +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. +; +; ctypemask(int c) +; +; converts a character to test via the is*-functions to the matching ctype-masks +; If c is out of the 8-bit range, the function returns with carry set and accu cleared. +; Return value is in accu and x has to be always clear when returning +; (makes calling code shorter)! +; +; IMPORTANT: stricmp, strlower, strnicmp, strupper and atoi rely that Y is not changed +; while calling this function! +; + + .export ctypemask + .export ctypemaskdirect + .import __ctype + .import __ctypeidx + +ctypemask: + cpx #$00 ; char range ok? + bne SC ; branch if not +ctypemaskdirect: + lsr a + tax + lda __ctypeidx,x + bcc @lowerNibble +@upperNibble: + lsr a + lsr a + lsr a + lsr a + clc ; remove out of bounds flag +@lowerNibble: + and #%00001111 + tax + lda __ctype,x + ldx #$00 + rts + +SC: sec + lda #$00 + tax + rts diff --git a/libsrc/common/divt.s b/libsrc/common/divt.s index b532f6f95..7f2b4e1bb 100644 --- a/libsrc/common/divt.s +++ b/libsrc/common/divt.s @@ -18,10 +18,15 @@ .importzp sreg, ptr1, tmp1 _div: jsr tosdivax ; Division-operator does most of the work - sta sreg ; Quotient is in sreg - stx sreg+1 - lda ptr1 ; Unsigned remainder is in ptr1 - ldx ptr1+1 + + ldy sreg ; low byte remainder from sreg + sta sreg ; store low byte quotient to sreg + + lda sreg+1 ; high byte remainder from sreg + stx sreg+1 ; store high byte quotient to sreg + + tax ; high byte remainder to x + tya ; low byte remainder to a ; Adjust the sign of the remainder. ; It must be the same as the sign of the dividend. @@ -31,4 +36,3 @@ _div: jsr tosdivax ; Division-operator does most of the work jmp negax ; Result is negative, adjust the sign Pos: rts - diff --git a/libsrc/common/doesclrscr.s b/libsrc/common/doesclrscr.s new file mode 100644 index 000000000..14d9ab804 --- /dev/null +++ b/libsrc/common/doesclrscr.s @@ -0,0 +1,12 @@ +; +; Christian Groessler, June-2016 +; +; unsigned char doesclrscr(void); +; +; returns 0/1 if after program termination the screen isn't/is cleared +; + + .export _doesclrscrafterexit + .import return0 + +_doesclrscrafterexit = return0 diff --git a/libsrc/common/errormsg.c b/libsrc/common/errormsg.c index 162dad085..e6df34ad3 100644 --- a/libsrc/common/errormsg.c +++ b/libsrc/common/errormsg.c @@ -24,6 +24,7 @@ const char* const _sys_errlist[] = { "Illegal seek", /* ESPIPE */ "Range error", /* ERANGE */ "Bad file number", /* EBADF */ + "Exec format error", /* ENOEXEC */ "Unknown OS error code", /* EUNKNOWN */ }; diff --git a/libsrc/common/fread.s b/libsrc/common/fread.s index 91d692985..c0733994e 100644 --- a/libsrc/common/fread.s +++ b/libsrc/common/fread.s @@ -161,7 +161,7 @@ bne @L8 ; Error in read. Set the stream error flag and bail out. errno has already -; been set by read(). On entry to label @L7, X must be zero. +; been set by read(). On entry to label @L7, X must be zero. inx ; X = 0 lda #_FERROR diff --git a/libsrc/common/free.s b/libsrc/common/free.s index 00b5e63f8..53796303c 100644 --- a/libsrc/common/free.s +++ b/libsrc/common/free.s @@ -274,7 +274,7 @@ _free: sta ptr2 ; } ; } ; -; +; ; On entry, ptr2 must contain a pointer to the block, which must be at least ; HEAP_MIN_BLOCKSIZE bytes in size, and ptr1 contains the total size of the ; block. diff --git a/libsrc/common/freopen.c b/libsrc/common/freopen.c index d79d3cf15..41b0b094b 100644 --- a/libsrc/common/freopen.c +++ b/libsrc/common/freopen.c @@ -31,7 +31,7 @@ FILE* __fastcall__ freopen (const char* name, const char* mode, FILE* f) ** overwritten by _fopen. */ if (close (f->f_fd) < 0) { - /* An error occured, errno is already set */ + /* An error occurred, errno is already set */ return 0; } diff --git a/libsrc/common/fsetpos.c b/libsrc/common/fsetpos.c index 14690f520..a0cf8d31f 100644 --- a/libsrc/common/fsetpos.c +++ b/libsrc/common/fsetpos.c @@ -21,4 +21,4 @@ int __fastcall__ fsetpos (FILE* f, const fpos_t *pos) return fseek (f, (fpos_t)*pos, SEEK_SET); } - + diff --git a/libsrc/common/fwrite.s b/libsrc/common/fwrite.s index dc0bad1b6..b0fa7ec42 100644 --- a/libsrc/common/fwrite.s +++ b/libsrc/common/fwrite.s @@ -19,7 +19,7 @@ ; ------------------------------------------------------------------------ ; Code - + .proc _fwrite ; Save file and place it into ptr1 diff --git a/libsrc/common/getcpu.s b/libsrc/common/getcpu.s index b7954f52f..ab6a8aef9 100644 --- a/libsrc/common/getcpu.s +++ b/libsrc/common/getcpu.s @@ -3,15 +3,21 @@ ; ; unsigned char getcpu (void); ; - + .include "zeropage.inc" .export _getcpu ; --------------------------------------------------------------------------- ; Subroutine to detect an 816. Returns ; ; - carry clear and 0 in A for a NMOS 6502 CPU -; - carry set and 1 in A for some CMOS 6502 CPU +; - carry set and 1 in A for a 65C02 ; - carry set and 2 in A for a 65816 +; - carry set and 3 in A for a 4510 +; - carry set and 4 in A for a 65SC02 +; - carry set and 5 in A for a 65CE02 +; - carry set and 6 in A for a HuC6280 +; - carry clear and 7 in A for a 2a03/2a07 +; - carry set and 8 in A for a 45GS02 ; ; This function uses a $1A opcode which is a INA on the 816 and ignored ; (interpreted as a NOP) on a NMOS 6502. There are several CMOS versions @@ -21,17 +27,107 @@ .p816 ; Enable 65816 instructions _getcpu: + lda #0 - inc a ; .byte $1A + inc a ; .byte $1A ; nop on nmos, inc on every cmos cmp #1 - bcc @L9 + bcc @IsNMOS -; This is at least a 65C02, check for a 65816 +; This is at least a 65C02, check for a 65CE02/4510 - xba ; .byte $eb, put $01 in B accu - dec a ; .byte $3a, A=$00 if 65C02 - xba ; .byte $eb, get $01 back if 65816 - inc a ; .byte $1a, make $01/$02 -@L9: ldx #0 ; Load high byte of word + .byte $42,$EA ; neg on 65CE02/4510, nop #$EA on 65C02, wdm $EA on 65816 + cmp #1 + beq @HasINCA + +; This is at least a 65CE02, check for 4510 + + lda #5 ; CPU_65CE02 constant + ldx #0 ; to make sure MAP doesn't do anything, the upper nybl of X and Z must be clear + .byte $5C ; map on 4510, aug on 65CE02 (acts like 4 byte nop) + lda #3 ; CPU_4510 constant + nop + cmp #5 + beq @LoadXAndReturn + +; It is either a 4510 (C65) or a 45GS02 (MEGA65) + + ; 45GS02 supports 32-bit ZP indirect, so use that to check CPU type + ; without requiring a functioning MEGA65 hypervisor. + ; We setup a read of $200xx, then store a different value in $xx + ; and then re-read $200xx to see if it is unchanged. + + ; Setup 32-bit pointer to $00020000+tmp1 + lda #<$020000+tmp1 + sta regsave + lda #>$020000+tmp1 + sta regsave+1 + sta regsave+3 ; also write to upper byte of pointer to save an extra LDA #$00 + lda #^$020000+tmp1 + sta regsave+2 + + ; Prefixing LDA ($nn),Z with a NOP uses 32-bit ZP pointer on 45GS02, + ; but normal 16-bit ZP pointer on 4510 + ; (We assume Z=$00, which will be the normal case) + nop ; prefix to tell next instruction to be 32-bit ZP + .byte $b2,regsave ; LDA (regsave),Z + eor #$ff ; change the value + sta tmp1 ; store in $xx + ; now try again to load it: If the same, then 45GS02, as $200xx is unchanged + nop ; prefix to tell next instruction to be 32-bit ZP + .byte $b2,regsave ; LDA (regsave),Z + cmp tmp1 ; does the loaded value match what is in $xx? + bne @Is45GS02 ; $200xx and $xx have different values, so must be a MEGA65 45GS02 +@Is4510: + lda #3 ; CPU_4510 constant + ldx #0 ; load high byte of word rts +@Is45GS02: + lda #8 ; CPU_45GS02 constant + ldx #0 ; load high byte of word + rts + +; 6502 type of cpu, check for a 2a03/2a07 +@IsNMOS: + sed ; set decimal mode, no decimal mode on the 2a03/2a07 + lda #9 + clc + adc #1 ; $01+$09 = $10 on 6502, $01+$09 = $0A on 2a03/2a07 + cld + cmp #$0a + beq @Is2a03 + lda #0 ; CPU_6502 constant + beq @LoadXAndReturn +@Is2a03: + lda #7 ; CPU_2A0x constant + bne @LoadXAndReturn + +; 65C02 cpu type, check for HuC6280 +@CheckHuC6280: + ldx #6 ; CPU_HUC6280 constant + .byte $22,$EA ; sax nop on HuC6280 (A=$06, X=$01), nop #$EA on 65C02 (A=$01, X=$06) + bne @LoadXAndReturn + +; Check for 65816/65802 +@HasINCA: + xba ; .byte $EB, put $01 in B accu (nop on 65C02/65SC02) + dec a ; .byte $3A, A=$00 + xba ; .byte $EB, A=$01 if 65816/65802 and A=$00 if 65C02/65SC02 + inc a ; .byte $1A, A=$02 if 65816/65802 and A=$01 if 65C02/65SC02 + cmp #2 + beq @LoadXAndReturn + +; check for 65SC02 + + ldy $F7 + ldx #0 + stx $F7 + .byte $F7,$F7 ; nop nop on 65SC02, smb7 $F7 on 65C02 + ldx $F7 + sty $F7 + cpx #$00 + bne @CheckHuC6280 + lda #4 ; CPU_65SC02 constant +@LoadXAndReturn: + ldx #0 + rts diff --git a/libsrc/common/getcwd.s b/libsrc/common/getcwd.s index b3cfbefcf..9b856ea7c 100644 --- a/libsrc/common/getcwd.s +++ b/libsrc/common/getcwd.s @@ -6,7 +6,7 @@ .export _getcwd - .import popax + .import popptr1 .import __cwd .importzp ptr1, ptr2 @@ -17,24 +17,22 @@ .proc _getcwd -; Remember -size-1 because this simplifies the following loop +; Remember size with each byte incremented because this simplifies the following loop - eor #$FF - sta ptr2 - txa - eor #$FF - sta ptr2+1 + inx + stx ptr2+1 + tax + inx + stx ptr2 ; Save size with each byte incremented separately - jsr popax ; Get buf - sta ptr1 - stx ptr1+1 ; Save buf + jsr popptr1 ; Get buf to ptr1 ; Copy __cwd to the given buffer checking the length - ldy #$00 -loop: inc ptr2 + ; ldy #$00 is guaranteed by popptr1 +loop: dec ptr2 bne @L1 - inc ptr2+1 + dec ptr2+1 beq overflow ; Copy one character, end the loop if the zero terminator is reached. We @@ -55,7 +53,7 @@ overflow: lda #<ERANGE jsr __seterrno ; Returns 0 in A tax ; Return zero - rts + rts ; Success, return buf diff --git a/libsrc/common/gmtime.c b/libsrc/common/gmtime.c index 1a2536c5f..85e9de3d0 100644 --- a/libsrc/common/gmtime.c +++ b/libsrc/common/gmtime.c @@ -45,19 +45,29 @@ struct tm* __fastcall__ gmtime (const time_t* timep) { + static struct tm timebuf; time_t t; - /* Check for a valid time spec */ - if (timep == 0) { + /* Check the argument */ + if (timep == 0 || (long) (t = *timep) < 0) { + /* Invalid arg */ return 0; } - /* Get the time and correct for the time zone offset */ - t = *timep + _tz.timezone; + /* Since our ints are just 16 bits, split the given time into seconds, + ** hours and days. Each of the values will fit in a 16 bit variable. + ** The mktime routine will then do the rest. + */ + timebuf.tm_sec = t % 3600; + timebuf.tm_min = 0; + timebuf.tm_hour = (t / 3600) % 24; + timebuf.tm_mday = (t / (3600UL * 24UL)) + 1; + timebuf.tm_mon = 0; + timebuf.tm_year = 70; /* Base value is 1/1/1970 */ - /* Use localtime for conversion */ - return localtime (&t); + /* Call mktime to do the final conversion */ + mktime (&timebuf); + + /* Return the result */ + return &timebuf; } - - - diff --git a/libsrc/common/interrupt.s b/libsrc/common/interrupt.s index 950d3d787..6bdbb5fe4 100644 --- a/libsrc/common/interrupt.s +++ b/libsrc/common/interrupt.s @@ -8,7 +8,7 @@ .export _set_irq, _reset_irq .interruptor clevel_irq, 1 ; Export as low priority IRQ handler - .import popax, __ZP_START__ + .import popax, __ZP_START__, jmpvec .include "zeropage.inc" @@ -84,6 +84,12 @@ zpsave: .res zpsavespace dex bpl @L2 + ; Save jmpvec + lda jmpvec+1 + pha + lda jmpvec+2 + pha + ; Set C level interrupt stack lda irqsp ldx irqsp+1 @@ -93,15 +99,21 @@ zpsave: .res zpsavespace ; Call C level interrupt request handler jsr irqvec - ; Copy back our zero page content + ; Mark interrupt handled / not handled + lsr + + ; Restore our zero page content ldx #.sizeof(::zpsave)-1 -@L3: ldy zpsave,x - sty <__ZP_START__,x +@L3: lda zpsave,x + sta <__ZP_START__,x dex bpl @L3 - ; Mark interrupt handled / not handled and return - lsr + ; Restore jmpvec and return + pla + sta jmpvec+2 + pla + sta jmpvec+1 rts .endproc diff --git a/libsrc/common/isalnum.s b/libsrc/common/isalnum.s index 33497a30c..ec2c9de1f 100644 --- a/libsrc/common/isalnum.s +++ b/libsrc/common/isalnum.s @@ -1,21 +1,21 @@ +; isalnum.s ; -; Ullrich von Bassewitz, 02.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int isalnum (int c); ; .export _isalnum .include "ctype.inc" + .import ctypemask _isalnum: - cpx #$00 ; Char range ok? - bne @L1 ; Jump if no - tay - lda __ctype,y ; Get character classification - and #CT_ALNUM ; Mask character/digit bits - rts - -@L1: lda #$00 ; Return false - tax - rts - + jsr ctypemask ; (always clears X) + bcs @L1 ; out of range? (everything already clear -> false) + and #CT_ALNUM ; mask character/digit bits +@L1: rts diff --git a/libsrc/common/isalpha.s b/libsrc/common/isalpha.s index 2ab9bf269..2d1f4b584 100644 --- a/libsrc/common/isalpha.s +++ b/libsrc/common/isalpha.s @@ -1,21 +1,21 @@ +; isalpha.s ; -; Ullrich von Bassewitz, 02.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int isalpha (int c); ; .export _isalpha .include "ctype.inc" + .import ctypemask _isalpha: - cpx #$00 ; Char range ok? - bne @L1 ; Jump if no - tay - lda __ctype,y ; Get character classification - and #CT_ALPHA ; Mask character bits - rts - -@L1: lda #$00 ; Return false - tax - rts - + jsr ctypemask ; (always clears X) + bcs @L1 ; out of range? (everything already clear -> false) + and #CT_ALPHA ; mask character bits +@L1: rts diff --git a/libsrc/common/isascii.s b/libsrc/common/isascii.s new file mode 100644 index 000000000..70d2f72a3 --- /dev/null +++ b/libsrc/common/isascii.s @@ -0,0 +1,24 @@ +; isascii.s +; +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. +; +; int isascii (int c); +; + + .export _isascii + +_isascii: + asl a ; high-bit to carry + txa ; check range of input param + bne @L1 ; out-of bounds? + adc #$FF ; calculate return value based on carry + rts + +@L1: lda #$00 ; return false + tax + rts diff --git a/libsrc/common/isblank.s b/libsrc/common/isblank.s index 6babe8853..a9788daac 100644 --- a/libsrc/common/isblank.s +++ b/libsrc/common/isblank.s @@ -1,5 +1,11 @@ +; isblank.s ; -; Ullrich von Bassewitz, 02.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int isblank (int c); ; @@ -8,16 +14,10 @@ .export _isblank .include "ctype.inc" + .import ctypemask _isblank: - cpx #$00 ; Char range ok? - bne @L1 ; Jump if no - tay - lda __ctype,y ; Get character classification - and #CT_SPACE_TAB ; Mask blank bit - rts - -@L1: lda #$00 ; Return false - tax - rts - + jsr ctypemask ; (always clears X) + bcs @L1 ; out of range? (everything already clear -> false) + and #CT_SPACE_TAB ; mask blank bit +@L1: rts diff --git a/libsrc/common/iscntrl.s b/libsrc/common/iscntrl.s index 728716450..7a4879017 100644 --- a/libsrc/common/iscntrl.s +++ b/libsrc/common/iscntrl.s @@ -1,21 +1,21 @@ +; iscntrl.s ; -; Ullrich von Bassewitz, 02.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int iscntrl (int c); ; .export _iscntrl .include "ctype.inc" + .import ctypemask _iscntrl: - cpx #$00 ; Char range ok? - bne @L1 ; Jump if no - tay - lda __ctype,y ; Get character classification - and #CT_CTRL ; Mask control character bit - rts - -@L1: lda #$00 ; Return false - tax - rts - + jsr ctypemask ; (always clears X) + bcs @L1 ; out of range? (everything already clear -> false) + and #CT_CTRL ; mask control character bit +@L1: rts diff --git a/libsrc/common/isdigit.s b/libsrc/common/isdigit.s index 2972c8941..ae3f8d12f 100644 --- a/libsrc/common/isdigit.s +++ b/libsrc/common/isdigit.s @@ -1,21 +1,21 @@ +; isdigit.s ; -; Ullrich von Bassewitz, 02.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int isdigit (int c); ; .export _isdigit .include "ctype.inc" + .import ctypemask _isdigit: - cpx #$00 ; Char range ok? - bne @L1 ; Jump if no - tay - lda __ctype,y ; Get character classification - and #CT_DIGIT ; Mask digit bit - rts - -@L1: lda #$00 ; Return false - tax - rts - + jsr ctypemask ; (always clears X) + bcs @L1 ; out of range? (everything already clear -> false) + and #CT_DIGIT ; mask digit bit +@L1: rts diff --git a/libsrc/common/isgraph.s b/libsrc/common/isgraph.s index bf94014ec..8b97780b9 100644 --- a/libsrc/common/isgraph.s +++ b/libsrc/common/isgraph.s @@ -1,25 +1,24 @@ +; isgraph.s ; -; 1998-06-02, Ullrich von Bassewitz -; 2014-09-10, Greg King +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int isgraph (int c); ; .export _isgraph .include "ctype.inc" + .import ctypemask _isgraph: - cpx #>$0000 ; Char range OK? - bne @L1 ; Jump if no - tay - lda __ctype,y ; Get character classification - and #CT_CTRL_SPACE ; Mask character bits - cmp #1 ; If false, then set "borrow" flag + jsr ctypemask ; (always clears X) + bcs @L1 ; out of range? (everything already clear -> false) + and #CT_CTRL_SPACE ; mask character bits + cmp #1 ; if false, then set "borrow" flag lda #0 - sbc #0 ; Invert logic - rts ; Return NOT control and NOT space - -@L1: lda #<0 ; Return false - tax - rts - + sbc #0 ; invert logic (return NOT control and NOT space) +@L1: rts diff --git a/libsrc/common/islower.s b/libsrc/common/islower.s index 32e00fbd6..b19c16825 100644 --- a/libsrc/common/islower.s +++ b/libsrc/common/islower.s @@ -1,21 +1,23 @@ +; islower.s ; -; Ullrich von Bassewitz, 02.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int islower (int c); ; .export _islower .include "ctype.inc" + .import ctypemask _islower: - cpx #$00 ; Char range ok? - bne @L1 ; Jump if no - tay - lda __ctype,y ; Get character classification - and #CT_LOWER ; Mask lower char bit - rts + jsr ctypemask ; (always clears X) + bcs @L1 ; out of range? (everything already clear -> false) + and #CT_LOWER ; mask lower char bit +@L1: rts -@L1: lda #$00 ; Return false - tax - rts diff --git a/libsrc/common/isprint.s b/libsrc/common/isprint.s index 1511753fd..c62bd784f 100644 --- a/libsrc/common/isprint.s +++ b/libsrc/common/isprint.s @@ -1,22 +1,22 @@ +; isprint.s ; -; Ullrich von Bassewitz, 02.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int isprint (int c); ; .export _isprint .include "ctype.inc" + .import ctypemask _isprint: - cpx #$00 ; Char range ok? - bne @L1 ; Jump if no - tay - lda __ctype,y ; Get character classification + jsr ctypemask ; (always clears X) + bcs @L1 ; out of range? (everything already clear -> false) eor #CT_CTRL ; NOT a control char - and #CT_CTRL ; Mask control char bit - rts - -@L1: lda #$00 ; Return false - tax - rts - + and #CT_CTRL ; mask control char bit +@L1: rts diff --git a/libsrc/common/ispunct.s b/libsrc/common/ispunct.s index 087532940..df47322fb 100644 --- a/libsrc/common/ispunct.s +++ b/libsrc/common/ispunct.s @@ -1,25 +1,24 @@ +; ispunct.s ; -; 1998-06-02, Ullrich von Bassewitz -; 2014-09-10, Greg King +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int ispunct (int c); ; .export _ispunct .include "ctype.inc" + .import ctypemask _ispunct: - cpx #>$0000 ; Char range OK? - bne @L1 ; Jump if no - tay - lda __ctype,y ; Get character classification - and #CT_NOT_PUNCT ; Mask relevant bits - cmp #1 ; If false, then set "borrow" flag + jsr ctypemask ; (always clears X) + bcs @L1 ; out of range? (everything already clear -> false) + and #CT_NOT_PUNCT ; mask relevant bits + cmp #1 ; if false, then set "borrow" flag lda #0 - sbc #0 ; Invert logic - rts ; Return NOT (space | control | digit | alpha) - -@L1: lda #<0 ; Return false - tax - rts - + sbc #0 ; invert logic (return NOT (space | control | digit | alpha)) +@L1: rts diff --git a/libsrc/common/isspace.s b/libsrc/common/isspace.s index 64849f7f7..b234febfa 100644 --- a/libsrc/common/isspace.s +++ b/libsrc/common/isspace.s @@ -1,21 +1,21 @@ +; isspace.s ; -; Ullrich von Bassewitz, 02.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int isspace (int c); ; .export _isspace .include "ctype.inc" + .import ctypemask _isspace: - cpx #$00 ; Char range ok? - bne @L1 ; Jump if no - tay - lda __ctype,y ; Get character classification - and #(CT_SPACE | CT_OTHER_WS) ; Mask space bits - rts - -@L1: lda #$00 ; Return false - tax - rts - + jsr ctypemask ; (always clears X) + bcs @L1 ; out of range? (everything already clear -> false) + and #(CT_SPACE | CT_OTHER_WS) ; mask space bits +@L1: rts diff --git a/libsrc/common/isupper.s b/libsrc/common/isupper.s index 698983ec8..45f48d871 100644 --- a/libsrc/common/isupper.s +++ b/libsrc/common/isupper.s @@ -1,21 +1,21 @@ +; isupper.s ; -; Ullrich von Bassewitz, 02.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int isupper (int c); ; .export _isupper .include "ctype.inc" + .import ctypemask _isupper: - cpx #$00 ; Char range ok? - bne @L1 ; Jump if no - tay - lda __ctype,y ; Get character classification - and #CT_UPPER ; Mask upper char bit - rts - -@L1: lda #$00 ; Return false - tax - rts - + jsr ctypemask ; (always clears X) + bcs @L1 ; out of range? (everything already clear -> false) + and #CT_UPPER ; mask upper char bit +@L1: rts diff --git a/libsrc/common/isxdigit.s b/libsrc/common/isxdigit.s index 36f86ef19..6d59e2ac8 100644 --- a/libsrc/common/isxdigit.s +++ b/libsrc/common/isxdigit.s @@ -1,21 +1,21 @@ +; isxdigit.s ; -; Ullrich von Bassewitz, 02.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int isxdigit (int c); ; .export _isxdigit .include "ctype.inc" + .import ctypemask _isxdigit: - cpx #$00 ; Char range ok? - bne @L1 ; Jump if no - tay - lda __ctype,y ; Get character classification - and #CT_XDIGIT ; Mask xdigit bit - rts - -@L1: lda #$00 ; Return false - tax - rts - + jsr ctypemask ; (always clears X) + bcs @L1 ; out of range? (everything already clear -> false) + and #CT_XDIGIT ; mask xdigit bit +@L1: rts diff --git a/libsrc/common/itoa.s b/libsrc/common/itoa.s index 176bc2ddd..808f9bc33 100644 --- a/libsrc/common/itoa.s +++ b/libsrc/common/itoa.s @@ -19,7 +19,7 @@ specval: ; Common subroutine to pop the parameters and put them into core ; -dopop: sta tmp1 ; will loose high byte +dopop: sta tmp1 ; will lose high byte ldy #0 lda (sp),y sta ptr2 diff --git a/libsrc/common/localtime.c b/libsrc/common/localtime.c index cc6298f8c..48931ea62 100644 --- a/libsrc/common/localtime.c +++ b/libsrc/common/localtime.c @@ -45,31 +45,16 @@ struct tm* __fastcall__ localtime (const time_t* timep) { - static struct tm timebuf; time_t t; - /* Check the argument */ - if (timep == 0 || (long) (t = *timep) < 0) { - /* Invalid arg */ + /* Check for a valid time spec */ + if (timep == 0) { return 0; } - /* Since our ints are just 16 bits, split the given time into seconds, - ** hours and days. Each of the values will fit in a 16 bit variable. - ** The mktime routine will then do the rest. - */ - timebuf.tm_sec = t % 3600; - timebuf.tm_min = 0; - timebuf.tm_hour = (t / 3600) % 24; - timebuf.tm_mday = (t / (3600UL * 24UL)) + 1; - timebuf.tm_mon = 0; - timebuf.tm_year = 70; /* Base value is 1/1/1970 */ + /* Get the time and correct for the time zone offset */ + t = *timep + _tz.timezone; - /* Call mktime to do the final conversion */ - mktime (&timebuf); - - /* Return the result */ - return &timebuf; + /* Use gmtime for conversion */ + return gmtime (&t); } - - diff --git a/libsrc/common/longjmp.s b/libsrc/common/longjmp.s index e9bac42e6..91606a442 100644 --- a/libsrc/common/longjmp.s +++ b/libsrc/common/longjmp.s @@ -6,7 +6,7 @@ ; .export _longjmp - .import popax + .import popptr1 .importzp sp, ptr1, ptr2 _longjmp: @@ -16,10 +16,8 @@ _longjmp: bne @L1 inc ptr2 ; 0 is illegal, according to the standard ... ; ... and, must be replaced by 1 -@L1: jsr popax ; get buf - sta ptr1 - stx ptr1+1 - ldy #0 +@L1: jsr popptr1 ; get buf + ; ldy #0 is guaranteed by popptr1 ; Get the old parameter stack diff --git a/libsrc/common/ltoa.s b/libsrc/common/ltoa.s index 5dc215bd1..78e43e23f 100644 --- a/libsrc/common/ltoa.s +++ b/libsrc/common/ltoa.s @@ -6,11 +6,11 @@ ; .export _ltoa, _ultoa - .import popax + .import popax, popptr1, negeax .import __hextab, __longminstr .importzp sreg, ptr1, ptr2, ptr3, tmp1 - + .macpack cpu .code @@ -18,18 +18,16 @@ ; Common subroutine to pop the parameters and put them into core ; -dopop: sta tmp1 ; will loose high byte - jsr popax ; get s - sta ptr1 - stx ptr1+1 - sta sreg ; save for return - stx sreg+1 - jsr popax ; get low word of value +dopop: sta tmp1 ; will lose high byte + jsr popax ; get s to ptr2 sta ptr2 stx ptr2+1 - jsr popax ; get high word of value - sta ptr3 + sta ptr3 ; save for return stx ptr3+1 + jsr popptr1 ; get low word of value to ptr1 + jsr popax ; get high word of value to sreg + sta sreg + stx sreg+1 rts ; @@ -41,53 +39,49 @@ _ltoa: jsr dopop ; pop the arguments ; We must handle $80000000 in a special way, since it is the only negative ; number that has no positive 32-bit counterpart - ldx ptr3+1 ; get high byte + ldx sreg+1 ; get high byte ldy tmp1 ; get radix cpy #10 bne ultoa - lda ptr3 - ora ptr2+1 - ora ptr2 + lda sreg + ora ptr1+1 + ora ptr1 bne L2 cpx #$80 bne L2 ldy #11 L1: lda __longminstr,y ; copy -2147483648 - sta (ptr1),y + sta (ptr2),y dey bpl L1 jmp L10 - + ; Check if the value is negative. If so, write a - sign and negate the ; number. L2: txa ; get high byte bpl ultoa lda #'-' - ldy #0 - sta (ptr1),y ; store sign - inc ptr1 - bne L3 - inc ptr1+1 -L3: lda ptr2 ; negate val - eor #$FF - clc - adc #$01 - sta ptr2 - lda ptr2+1 - eor #$FF - adc #$00 - sta ptr2+1 - lda ptr3 - eor #$FF - adc #$00 - sta ptr3 - lda ptr3+1 - eor #$FF - adc #$00 - sta ptr3+1 +.if (.cpu .bitand CPU_ISET_65SC02) + sta (ptr2) +.else + ldy #0 + sta (ptr2),y ; store sign +.endif + + inc ptr2 + bne L3 + inc ptr2+1 + +L3: lda ptr1 ; negate val + ldx ptr1+1 + + jsr negeax + + sta ptr1 + stx ptr1+1 jmp ultoa ; @@ -105,15 +99,15 @@ ultoa: lda #$00 L5: ldy #32 ; 32 bit lda #0 ; remainder -L6: asl ptr2 - rol ptr2+1 - rol ptr3 - rol ptr3+1 +L6: asl ptr1 + rol ptr1+1 + rol sreg + rol sreg+1 rol a cmp tmp1 bcc L7 sbc tmp1 - inc ptr2 + inc ptr1 L7: dey bne L6 @@ -121,25 +115,25 @@ L7: dey lda __hextab,y ; get hex character pha ; save char value on stack - lda ptr2 - ora ptr2+1 - ora ptr3 - ora ptr3+1 + lda ptr1 + ora ptr1+1 + ora sreg + ora sreg+1 bne L5 ; Get the characters from the stack into the string ldy #0 L9: pla - sta (ptr1),y + sta (ptr2),y beq L10 ; jump if sentinel iny bne L9 ; jump always ; Done! Return the target string -L10: lda sreg - ldx sreg+1 +L10: lda ptr3 + ldx ptr3+1 rts diff --git a/libsrc/common/lz4.s b/libsrc/common/lz4.s new file mode 100644 index 000000000..4702137bc --- /dev/null +++ b/libsrc/common/lz4.s @@ -0,0 +1,286 @@ +; +; Lauri Kasanen, 6 Jun 2017 +; (C) Mega Cat Studios +; An optimized LZ4 decompressor +; +; Almost 7 times faster, uses no RAM (vs 14 bytes BSS), and takes 1/4 the space +; vs the official C source. +; + + .importzp sp, sreg, regsave, regbank + .importzp tmp1, tmp2, tmp3, tmp4, ptr1, ptr2, ptr3, ptr4 + .macpack longbranch + .import memcpy_upwards,pushax,popax + .export _decompress_lz4 + +out = regsave +written = regsave + 2 +tmp = tmp1 +token = tmp2 +offset = ptr3 +in = sreg +outlen = ptr4 + +; --------------------------------------------------------------- +; void decompress_lz4 (const u8 *in, u8 * const out, const u16 outlen) +; --------------------------------------------------------------- + +.segment "CODE" + +.proc _decompress_lz4: near + + sta outlen + stx outlen+1 + + jsr popax + sta out + stx out+1 + + jsr popax + sta in + stx in+1 + +; +; written = 0; +; + lda #$00 + sta written +; +; while (written < outlen) { +; + jmp L0046 +; +; token = *in++; +; +L0004: ldy #$00 + lda (in),y + sta token + + inc in + bne L000A + inc in+1 +L000A: +; +; offset = token >> 4; +; + ldx #$00 + lsr a + lsr a + lsr a + lsr a + sta offset + stx offset+1 +; +; token &= 0xf; +; token += 4; // Minmatch +; + lda token + and #$0F + clc + adc #$04 + sta token +; +; if (offset == 15) { +; + lda offset + cmp #$0F +L0013: bne L001A +; +; tmp = *in++; +; + ldy #$00 + lda (in),y + sta tmp + + inc in + bne L0017 + inc in+1 +L0017: +; +; offset += tmp; +; + clc + adc offset + sta offset + lda #$00 + adc offset+1 + sta offset+1 +; +; if (tmp == 255) +; + lda tmp + cmp #$FF +; +; goto moreliterals; +; + jmp L0013 +; +; if (offset) { +; +L001A: lda offset + ora offset+1 + beq L001C +; +; memcpy(&out[written], in, offset); +; + lda out + clc + adc written + sta ptr2 + lda out+1 + adc written+1 + tax + lda ptr2 + stx ptr2+1 + jsr pushax + lda in + ldx in+1 + sta ptr1 + stx ptr1+1 +; ldy #$00 - not needed as pushax zeroes Y + jsr memcpy_upwards +; +; written += offset; +; + lda offset + clc + adc written + sta written + lda offset+1 + adc written+1 + sta written+1 +; +; in += offset; +; + lda offset + clc + adc in + sta in + lda offset+1 + adc in+1 + sta in+1 +; +; if (written >= outlen) +; +L001C: lda written + cmp outlen + lda written+1 + sbc outlen+1 +; +; return; +; + bcc L0047 + rts +; +; memcpy(&offset, in, 2); +; +L0047: ldy #$00 + lda (in),y + sta offset + iny + lda (in),y + sta offset+1 +; +; in += 2; +; + lda #$02 + clc + adc in + sta in + bcc L002F + inc in+1 +; +; copysrc = out + written - offset; +; +L002F: lda out + clc + adc written + tay + lda out+1 + adc written+1 + tax + tya + sec + sbc offset + sta ptr1 + txa + sbc offset+1 + sta ptr1+1 +; +; offset = token; +; + lda #$00 + sta offset+1 + lda token + sta offset +; +; if (token == 19) { +; + cmp #$13 +L0045: bne L003C +; +; tmp = *in++; +; + ldy #$00 + lda (in),y + sta tmp + + inc in + bne L0039 + inc in+1 +L0039: +; +; offset += tmp; +; + clc + adc offset + sta offset + tya + adc offset+1 + sta offset+1 +; +; if (tmp == 255) +; + lda tmp + cmp #$FF +; +; goto morematches; +; + jmp L0045 +; +; memcpy(&out[written], copysrc, offset); +; +L003C: lda out + clc + adc written + sta ptr2 + lda out+1 + adc written+1 + tax + lda ptr2 + stx ptr2+1 + jsr pushax + jsr memcpy_upwards +; +; written += offset; +; + lda offset + clc + adc written + sta written + lda offset+1 + adc written+1 +L0046: sta written+1 +; +; while (written < outlen) { +; + lda written + cmp outlen + lda written+1 + sbc outlen+1 + jcc L0004 + + rts + +.endproc + diff --git a/libsrc/common/memchr.s b/libsrc/common/memchr.s index 1b60cbf73..c11a467d0 100644 --- a/libsrc/common/memchr.s +++ b/libsrc/common/memchr.s @@ -5,7 +5,7 @@ ; .export _memchr - .import popax, return0 + .import popax, popptr1, return0 .importzp ptr1, ptr2 @@ -18,11 +18,10 @@ sta ptr2+1 ; Save ones complement of n jsr popax ; get c pha - jsr popax ; get p - sta ptr1 - stx ptr1+1 - ldy #$00 + jsr popptr1 ; get p + + ; ldy #$00 is guaranteed by popptr1 pla ; Get c ldx ptr2 ; Use X as low counter byte diff --git a/libsrc/common/memcmp.s b/libsrc/common/memcmp.s index 25628127a..d651a3cfc 100644 --- a/libsrc/common/memcmp.s +++ b/libsrc/common/memcmp.s @@ -5,38 +5,36 @@ ; .export _memcmp - .import popax, return0 + .import popax, popptr1, return0 .importzp ptr1, ptr2, ptr3 _memcmp: -; Calculate (-count-1) and store it into ptr3. This is some overhead here but -; saves time in the compare loop +; Calculate a special count, and store it into ptr3. That is some overhead here, +; but saves time in the compare loop - eor #$FF - sta ptr3 - txa - eor #$FF - sta ptr3+1 + inx + stx ptr3+1 + tax + inx + stx ptr3 ; Save count with each byte incremented separately ; Get the pointer parameters jsr popax ; Get p2 sta ptr2 stx ptr2+1 - jsr popax ; Get p1 - sta ptr1 - stx ptr1+1 + jsr popptr1 ; Get p1 ; Loop initialization - ldx ptr3 ; Load low counter byte into X - ldy #$00 ; Initialize pointer + ;ldy #$00 ; Initialize pointer (Y=0 guaranteed by popptr1) + ldx ptr3 ; Load inner counter byte into .X ; Head of compare loop: Test for the end condition -Loop: inx ; Bump low byte of (-count-1) - beq BumpHiCnt ; Jump on overflow +Loop: dex + beq BumpHiCnt ; Jump on end of inner count ; Do the compare @@ -52,10 +50,10 @@ Comp: lda (ptr1),y inc ptr2+1 bne Loop ; Branch always (pointer wrap is illegal) -; Entry on low counter byte overflow +; Entry on inner loop end BumpHiCnt: - inc ptr3+1 ; Bump high byte of (-count-1) + dec ptr3+1 bne Comp ; Jump if not done jmp return0 ; Count is zero, areas are identical @@ -69,4 +67,3 @@ NotEqual: Greater: ldx #$01 ; Make result positive rts - diff --git a/libsrc/common/memcpy.s b/libsrc/common/memcpy.s index c0c5e56d0..fd090c788 100644 --- a/libsrc/common/memcpy.s +++ b/libsrc/common/memcpy.s @@ -11,7 +11,7 @@ ; .export _memcpy, memcpy_upwards, memcpy_getparams - .import popax + .import popax, popptr1 .importzp sp, ptr1, ptr2, ptr3 ; ---------------------------------------------------------------------- @@ -64,12 +64,11 @@ memcpy_getparams: ; IMPORTANT! Function has to leave with Y=0! sta ptr3 stx ptr3+1 ; save n to ptr3 - jsr popax - sta ptr1 - stx ptr1+1 ; save src to ptr1 + jsr popptr1 ; save src to ptr1 ; save dest to ptr2 - ldy #1 ; (direct stack access is three cycles faster + iny ; Y=0 guaranteed by popptr1, we need '1' here... + ; (direct stack access is three cycles faster ; (total cycle count with return)) lda (sp),y tax diff --git a/libsrc/common/memmove.s b/libsrc/common/memmove.s index 9c33124f1..666447cd8 100644 --- a/libsrc/common/memmove.s +++ b/libsrc/common/memmove.s @@ -1,6 +1,6 @@ ; ; 2003-08-20, Ullrich von Bassewitz -; 2009-09-13, Christian Krueger -- performance increase (about 20%) +; 2009-09-13, Christian Krueger -- performance increase (about 20%), 2013-07-25 improved unrolling ; 2015-10-23, Greg King ; ; void* __fastcall__ memmove (void* dest, const void* src, size_t size); @@ -61,13 +61,10 @@ PageSizeCopy: ; assert Y = 0 dec ptr1+1 ; adjust base... dec ptr2+1 dey ; in entry case: 0 -> FF - lda (ptr1),y ; need to copy this 'intro byte' - sta (ptr2),y ; to 'land' later on Y=0! (as a result of the '.repeat'-block!) - dey ; FF ->FE @copyBytes: - .repeat 2 ; Unroll this a bit to make it faster... - lda (ptr1),y - sta (ptr2),y + .repeat 3 ; unroll this a bit to make it faster... + lda (ptr1),y ; important: unrolling three times gives a nice + sta (ptr2),y ; 255/3 = 85 loop which ends at 0 dey .endrepeat @copyEntry: ; in entry case: 0 -> FF diff --git a/libsrc/common/memset.s b/libsrc/common/memset.s index 96f5d9e11..a57a90e5c 100644 --- a/libsrc/common/memset.s +++ b/libsrc/common/memset.s @@ -87,7 +87,7 @@ L3: dey sta (ptr1),y ; set bytes in low sta (ptr2),y ; and high section bne L3 ; flags still up to date from dey! -leave: +leave: jmp popax ; Pop ptr and return as result - + diff --git a/libsrc/common/mktime.c b/libsrc/common/mktime.c index 423727751..275589dbb 100644 --- a/libsrc/common/mktime.c +++ b/libsrc/common/mktime.c @@ -180,7 +180,8 @@ time_t __fastcall__ mktime (register struct tm* TM) return DayCount * 86400UL + ((unsigned) TM->tm_hour) * 3600UL + ((unsigned) TM->tm_min) * 60U + - ((unsigned) TM->tm_sec); + ((unsigned) TM->tm_sec) - + _tz.timezone; Error: /* Error exit */ diff --git a/libsrc/common/moveinit.s b/libsrc/common/moveinit.s deleted file mode 100644 index 2b22be02d..000000000 --- a/libsrc/common/moveinit.s +++ /dev/null @@ -1,45 +0,0 @@ -; -; 2015-10-07, Greg King -; - - .export moveinit - - .import __INIT_LOAD__, __INIT_RUN__, __INIT_SIZE__ ; Linker-generated - - .macpack cpu - .macpack generic - - -; Put this in the DATA segment because it is self-modifying code. - -.data - -; Move the INIT segment from where it was loaded (over the bss segments) -; into where it must be run (over the BSS segment). The two areas might overlap; -; and, the segment is moved upwards. Therefore, this code starts at the highest -; address, and decrements to the lowest address. The low bytes of the starting -; pointers are not sums. The high bytes are sums; but, they do not include the -; carry. Both the low-byte sums and the carries will be done when the pointers -; are indexed by the .Y register. - -moveinit: - -; First, move the last, partial page. -; Then, move all of the full pages. - - ldy #<__INIT_SIZE__ ; size of partial page - ldx #>__INIT_SIZE__ + (<__INIT_SIZE__ <> 0) ; number of pages, including partial - -L1: dey -init_load: - lda __INIT_LOAD__ + (__INIT_SIZE__ & $FF00) - $0100 * (<__INIT_SIZE__ = 0),y -init_run: - sta __INIT_RUN__ + (__INIT_SIZE__ & $FF00) - $0100 * (<__INIT_SIZE__ = 0),y - tya - bnz L1 ; page not finished - - dec init_load+2 - dec init_run+2 - dex - bnz L1 ; move next page - rts diff --git a/libsrc/common/mul20.s b/libsrc/common/mul20.s new file mode 100644 index 000000000..ba29b94dd --- /dev/null +++ b/libsrc/common/mul20.s @@ -0,0 +1,47 @@ +; mul20.s +; +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. +; +; +; unsigned int __fastcall__ mul20(unsigned char value); +; +; REMARKS: Function is defined to return with carry-flag cleared + + + .importzp tmp4 + .export _mul20 + +.proc _mul20 ; = 30 bytes, 41/46 cycles + + sta tmp4 ; remember value for later addition... + ldx #0 ; clear high-byte + asl a ; * 2 + bcc mul4 ; high-byte affected? + ldx #2 ; this will be the 1st high-bit soon... + +mul4: asl a ; * 4 + bcc mul5 ; high-byte affected? + inx ; => yes, apply to 0 high-bit + clc ; prepare addition + +mul5: adc tmp4 ; * 5 + bcc mul10 ; high-byte affected? + inx ; yes, correct... + +mul10: stx tmp4 ; continue with classic shifting... + + asl a ; * 10 + rol tmp4 + + asl a ; * 20 + rol tmp4 + + ldx tmp4 ; deliver high-byte in X + rts + +.endproc diff --git a/libsrc/common/mul40.s b/libsrc/common/mul40.s new file mode 100644 index 000000000..06780a6e0 --- /dev/null +++ b/libsrc/common/mul40.s @@ -0,0 +1,50 @@ +; mul40.s +; +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. +; +; +; unsigned int __fastcall__ mul40(unsigned char value); +; +; REMARKS: Function is defined to return with carry-flag cleared + + + .importzp tmp4 + .export _mul40 + +.proc _mul40 ; = 33 bytes, 48/53 cycles + + sta tmp4 ; remember value for later addition... + ldx #0 ; clear high-byte + asl a ; * 2 + bcc mul4 ; high-byte affected? + ldx #2 ; this will be the 1st high-bit soon... + +mul4: asl a ; * 4 + bcc mul5 ; high-byte affected? + inx ; => yes, apply to 0 high-bit + clc ; prepare addition + +mul5: adc tmp4 ; * 5 + bcc mul10 ; high-byte affected? + inx ; yes, correct... + +mul10: stx tmp4 ; continue with classic shifting... + + asl a ; * 10 + rol tmp4 + + asl a ; * 20 + rol tmp4 + + asl a ; * 40 + rol tmp4 + + ldx tmp4 ; deliver high-byte in X + rts + +.endproc diff --git a/libsrc/common/pmemalign.c b/libsrc/common/pmemalign.c index 8f055a3fc..52adb240d 100644 --- a/libsrc/common/pmemalign.c +++ b/libsrc/common/pmemalign.c @@ -75,7 +75,7 @@ int __fastcall__ posix_memalign (void** memptr, size_t alignment, size_t size) } /* Test alignment: is it a power of two? There must be only one bit set. */ - if (alignment == 0 || (alignment & --alignment) != 0) { + if (alignment == 0 || (alignment & (alignment - 1)) != 0) { *memptr = NULL; return EINVAL; } @@ -86,7 +86,7 @@ int __fastcall__ posix_memalign (void** memptr, size_t alignment, size_t size) ** overhead added one time; and, the worst thing that might happen is that ** we cannot free the upper and lower blocks. */ - b = malloc (size + alignment); + b = malloc (--alignment + size); /* Handle out-of-memory */ if (b == NULL) { @@ -169,6 +169,3 @@ int __fastcall__ posix_memalign (void** memptr, size_t alignment, size_t size) return EOK; } - - - diff --git a/libsrc/common/putenv.s b/libsrc/common/putenv.s index 7e44a7cd8..c68d20a32 100644 --- a/libsrc/common/putenv.s +++ b/libsrc/common/putenv.s @@ -185,4 +185,4 @@ error: jsr __seterrno name: .addr 0 ; Pointer to name newsize: .byte 0 ; New environment size - + diff --git a/libsrc/common/raise.s b/libsrc/common/raise.s index db96cdcd0..07898ef90 100644 --- a/libsrc/common/raise.s +++ b/libsrc/common/raise.s @@ -28,9 +28,9 @@ _raise: sta jmpvec+1 lda sigtable+1,x sta jmpvec+2 - + ; Reset the signal handler to SIG_DFL (I don't like this because it may -; introduce race conditions, but it's the simplest way to satisfy the +; introduce race conditions, but it's the simplest way to satisfy the ; standard). lda #<__sig_dfl @@ -51,4 +51,4 @@ _raise: invalidsig: rts - + diff --git a/libsrc/common/rand.s b/libsrc/common/rand.s index 48a88b7c4..ec1df9860 100644 --- a/libsrc/common/rand.s +++ b/libsrc/common/rand.s @@ -2,6 +2,8 @@ ; Randum number generator ; ; Written and donated by Sidney Cadot - sidney@ch.twi.tudelft.nl +; 2016-11-07, modified by Brad Smith +; 2019-10-07, modified by Lewis "LRFLEW" Fox ; ; May be distributed with the cc65 runtime using the same license. ; @@ -13,10 +15,25 @@ ; Multiplier must be 1 (mod 4) ; Added value must be 1 (mod 2) ; This guarantees max. period (2**32) -; Bits 8-22 are returned (positive 2-byte int) -; where 0 is LSB, 31 is MSB. -; This is better as lower bits exhibit easily -; detectable patterns. +; The quality of entropy in the bits of the seed are poorest in the lowest +; bits, and best in the highest bits. +; +; The high 8 bits are used for the low byte A to provide the best entropy in +; the most commonly used part of the return value. +; +; Finally XOR with the lower 2 bytes is used on the output, which breaks up +; some minor deficient sequential patterns. (#951) +; +; Uses the following LCG values for ax + c (mod m) +; a = $01010101 +; c = $B3B3B3B3 +; m = $100000000 (32-bit truncation) +; +; The multiplier was carefully chosen such that it can +; be computed with 3 adc instructions, and the increment +; was chosen to have the same value in each byte to allow +; the addition to be performed in conjunction with the +; multiplication, adding only 1 additional adc instruction. ; .export _rand, _srand @@ -25,42 +42,29 @@ ; The seed. When srand() is not called, the C standard says that that rand() ; should behave as if srand() was called with an argument of 1 before. -rand: .dword 1 +rand: .dword $B5B5B4B4 .code +_srand: sta rand+0 ; Store the seed + stx rand+1 + sta rand+2 ; argument << 16 is convenient fill for MSW + stx rand+3 + ; fall through to rand() to sufficiently "shuffle" first rand() result + _rand: clc - lda rand+0 ; SEED *= $01010101 + lda rand+0 + adc #$B3 + sta rand+0 adc rand+1 sta rand+1 adc rand+2 sta rand+2 - adc rand+3 - sta rand+3 - clc - lda rand+0 ; SEED += $31415927 - adc #$27 - sta rand+0 - lda rand+1 - adc #$59 - sta rand+1 - pha - lda rand+2 - adc #$41 - sta rand+2 + eor rand+0 and #$7f ; Suppress sign bit (make it positive) tax - lda rand+3 - adc #$31 + lda rand+2 + adc rand+3 sta rand+3 - pla ; return bit 8-22 in (X,A) - rts - -_srand: sta rand+0 ; Store the seed - stx rand+1 - lda #0 - sta rand+2 ; Set MSW to zero - sta rand+3 - rts - - + eor rand+1 + rts ; return bit (16-22,24-31) in (X,A) diff --git a/libsrc/common/rewind.c b/libsrc/common/rewind.c index a4cdfa97c..333230b74 100644 --- a/libsrc/common/rewind.c +++ b/libsrc/common/rewind.c @@ -22,4 +22,4 @@ void __fastcall__ rewind (FILE* f) clearerr(f); } - + diff --git a/libsrc/common/cc65_sincos.s b/libsrc/common/sincos.s similarity index 83% rename from libsrc/common/cc65_sincos.s rename to libsrc/common/sincos.s index 6baba8bb3..6bbc151f4 100644 --- a/libsrc/common/cc65_sincos.s +++ b/libsrc/common/sincos.s @@ -1,8 +1,8 @@ ; ; Fixed point cosine/sine functions. ; -; int __fastcall__ cc65_sin (unsigned x); -; int __fastcall__ cc65_cos (unsigned x); +; int __fastcall__ _sin (unsigned x); +; int __fastcall__ _cos (unsigned x); ; ; Returns the cosine/sine for the given argument as angular degree. ; Valid argument range is 0..360 for both functions. They will return @@ -13,7 +13,7 @@ ; Ullrich von Bassewitz, 2009-10-29 ; - .export _cc65_cos, _cc65_sin + .export __cos, __sin ; --------------------------------------------------------------------------- @@ -23,7 +23,7 @@ .rodata -_cc65_sintab: +_sintab: .byte $00, $04, $09, $0D, $12, $16, $1B, $1F, $24, $28 .byte $2C, $31, $35, $3A, $3E, $42, $47, $4B, $4F, $53 .byte $58, $5C, $60, $64, $68, $6C, $70, $74, $78, $7C @@ -37,13 +37,13 @@ _cc65_sintab: ; --------------------------------------------------------------------------- -; Cosine function. Is actually implemented as cos(x) = sin(x+90) +; Cosine function. Is actually implemented as _cos(x) = _sin(x+90) .code -_cc65_cos: +__cos: -; cos(x) = sin(x+90) +; _cos(x) = _sin(x+90) clc adc #90 @@ -55,7 +55,7 @@ _cc65_cos: @L1: cpx #>360 bne @L2 cmp #<360 -@L2: bcc _cc65_sin +@L2: bcc __sin sbc #<360 bcs @L3 @@ -66,12 +66,12 @@ _cc65_cos: ; Sine function. Uses ; ; table lookup for 0..89° -; sin(x) = sin(180-x) for 90°..179° -; sin(x) = -sin(x-180) for 180..360° +; _sin(x) = _sin(180-x) for 90°..179° +; _sin(x) = -_sin(x-180) for 180..360° ; ; Plus special handling for the values missing in the table. -_cc65_sin: +__sin: ; If the high byte is non zero, argument is > 255 @@ -85,7 +85,7 @@ _cc65_sin: cmp #90 bcc L1 -; 90..179°. Value is identical to sin(180-val). Carry is set on entry. +; 90..179°. Value is identical to _sin(180-val). Carry is set on entry. ; ; 180-val := -val + 180. ; With @@ -114,10 +114,10 @@ L1: cmp #87 L2: tay ldx #0 - lda _cc65_sintab,y + lda _sintab,y rts -; 180..360°. sin(x) = -sin(x-180). Since the argument is in range 0..180 +; 180..360°. _sin(x) = -_sin(x-180). Since the argument is in range 0..180 ; after the subtraction, we don't need to handle the high byte. L3: sec @@ -126,7 +126,7 @@ L4: sbc #180 cmp #90 bcc L5 -; 270..360°. Value is identical to -sin(180-val). Carry is set on entry. +; 270..360°. Value is identical to -_sin(180-val). Carry is set on entry. ; ; 180-val := -val + 180. ; With @@ -155,10 +155,8 @@ L5: ldx #$FF L6: tay txa ; A = $FF - eor _cc65_sintab,y + eor _sintab,y adc #1 bcc L7 inx L7: rts - - diff --git a/libsrc/common/strcat.s b/libsrc/common/strcat.s index 7784d89f7..f9cd94633 100644 --- a/libsrc/common/strcat.s +++ b/libsrc/common/strcat.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 31.05.1998 +; Christian Krueger: 2013-Jul-24, minor optimizations ; ; char* strcat (char* dest, const char* src); ; @@ -7,49 +8,44 @@ .export _strcat .import popax .importzp ptr1, ptr2, tmp3 + .macpack cpu _strcat: - sta ptr1 ; Save src - stx ptr1+1 - jsr popax ; Get dest - sta ptr2 - stx ptr2+1 - sta tmp3 ; Remember for function return - ldy #0 + sta ptr1 ; Save src + stx ptr1+1 + jsr popax ; Get dest + sta tmp3 ; Remember for function return + tay +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz ptr2 +.else + lda #0 + sta ptr2 ; access from page start, y contains low byte +.endif + stx ptr2+1 -; find end of dest - -sc1: lda (ptr2),y - beq sc2 +findEndOfDest: + lda (ptr2),y + beq endOfDestFound iny - bne sc1 - inc ptr2+1 - bne sc1 + bne findEndOfDest + inc ptr2+1 + bne findEndOfDest -; end found, get offset in y into pointer +endOfDestFound: + sty ptr2 ; advance pointer to last y position + ldy #0 ; reset new y-offset -sc2: tya - clc - adc ptr2 - sta ptr2 - bcc sc3 - inc ptr2+1 - -; copy src - -sc3: ldy #0 -sc4: lda (ptr1),y - sta (ptr2),y - beq sc5 +copyByte: + lda (ptr1),y + sta (ptr2),y + beq done iny - bne sc4 - inc ptr1+1 - inc ptr2+1 - bne sc4 + bne copyByte + inc ptr1+1 + inc ptr2+1 + bne copyByte ; like bra here -; done, return pointer to dest - -sc5: lda tmp3 ; X does still contain high byte +; return pointer to dest +done: lda tmp3 ; X does still contain high byte rts - - diff --git a/libsrc/common/strchr.s b/libsrc/common/strchr.s index 308381b06..206b5160e 100644 --- a/libsrc/common/strchr.s +++ b/libsrc/common/strchr.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 31.05.1998 +; Christian Krueger, 2013-Aug-04, minor optimization ; ; const char* strchr (const char* s, int c); ; @@ -7,42 +8,45 @@ .export _strchr .import popax .importzp ptr1, tmp1 + .macpack cpu _strchr: - sta tmp1 ; Save c - jsr popax ; get s - sta ptr1 - stx ptr1+1 - ldy #0 + sta tmp1 ; Save c + jsr popax ; get s + tay ; low byte of pointer to y + stx ptr1+1 +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz ptr1 +.else + lda #0 + sta ptr1 ; access from page start, y contains low byte +.endif -Loop: lda (ptr1),y ; Get next char - beq EOS ; Jump on end of string - cmp tmp1 ; Found? - beq Found ; Jump if yes +Loop: lda (ptr1),y ; Get next char + beq EOS ; Jump on end of string + cmp tmp1 ; Found? + beq Found ; Jump if yes iny - bne Loop - inc ptr1+1 - bne Loop ; Branch always + bne Loop + inc ptr1+1 + bne Loop ; Branch always ; End of string. Check if we're searching for the terminating zero -EOS: lda tmp1 ; Get the char we're searching for - bne NotFound ; Jump if not searching for terminator +EOS: + lda tmp1 ; Get the char we're searching for + bne NotFound ; Jump if not searching for terminator -; Found. Calculate pointer to c. +; Found. Set pointer to c. -Found: ldx ptr1+1 ; Load high byte of pointer - tya ; Low byte offset - clc - adc ptr1 - bcc Found1 - inx -Found1: rts +Found: + ldx ptr1+1 ; Load high byte of pointer + tya ; low byte is in y + rts ; Not found, return NULL NotFound: - lda #0 + lda #0 tax rts - diff --git a/libsrc/common/strcmp.s b/libsrc/common/strcmp.s index 189ce8fa7..8939163b1 100644 --- a/libsrc/common/strcmp.s +++ b/libsrc/common/strcmp.s @@ -5,16 +5,14 @@ ; .export _strcmp - .import popax + .import popptr1 .importzp ptr1, ptr2 _strcmp: sta ptr2 ; Save s2 stx ptr2+1 - jsr popax ; Get s1 - sta ptr1 - stx ptr1+1 - ldy #0 + jsr popptr1 ; Get s1 + ;ldy #0 ; Y=0 guaranteed by popptr1 loop: lda (ptr1),y cmp (ptr2),y diff --git a/libsrc/common/strcspn.s b/libsrc/common/strcspn.s index 8fd567ae4..4bb01479a 100644 --- a/libsrc/common/strcspn.s +++ b/libsrc/common/strcspn.s @@ -1,54 +1,52 @@ ; ; Ullrich von Bassewitz, 11.06.1998 +; Christian Krueger: 05-Aug-2013, optimization ; ; size_t strcspn (const char* s1, const char* s2); ; .export _strcspn - .import popax - .importzp ptr1, ptr2, tmp1, tmp2, tmp3 + .import popptr1, _strlen + .importzp ptr1, ptr2, tmp1, tmp2 _strcspn: - sta ptr2 ; Save s2 - stx ptr2+1 - jsr popax ; Get s1 - sta ptr1 - stx ptr1+1 - ldx #0 ; low counter byte - stx tmp1 ; high counter byte - ldy #$00 + jsr _strlen ; get length in a/x and transfer s2 to ptr2 + ; Note: It does not make sense to + ; have more than 255 test chars, so + ; we don't support a high byte here! (ptr2+1 is + ; also unchanged in strlen then (important!)) + ; -> the original implementation also + ; ignored this case -L1: lda (ptr1),y ; get next char from s1 - beq L6 ; jump if done - sta tmp2 ; save char + sta tmp1 ; tmp1 = strlen of test chars + jsr popptr1 ; get and save s1 to ptr1 + + ldx #0 ; low counter byte + stx tmp2 ; high counter byte + +loadChar: + ldy #0 + lda (ptr1),y ; get next char from s1 + beq leave ; handly byte of s1 +advance: + inc ptr1 ; advance string position to test + bne check + inc ptr1+1 + dey ; correct next iny (faster/shorter than bne...) + +checkNext: iny - bne L2 - inc ptr1+1 -L2: sty tmp3 ; save index into s1 +check: cpy tmp1 ; compare with length of test character string + beq endOfTestChars + cmp (ptr2),y ; found matching char? + bne checkNext - ldy #0 ; get index into s2 -L3: lda (ptr2),y ; - beq L4 ; jump if done - cmp tmp2 - beq L6 - iny - bne L3 - -; The character was not found in s2. Increment the counter and start over - -L4: ldy tmp3 ; reload index - inx - bne L1 - inc tmp1 - bne L1 - -; The character was found, or we reached the end of s1. Return count of -; characters - -L6: txa ; get low counter byte - ldx tmp1 ; get high counter byte +leave: txa ; restore position of finding + ldx tmp2 ; and return rts - - - +endOfTestChars: + inx + bne loadChar + inc tmp2 + bne loadChar ; like bra... diff --git a/libsrc/common/strftime.c b/libsrc/common/strftime.c index 25cfd0606..38ea4850e 100644 --- a/libsrc/common/strftime.c +++ b/libsrc/common/strftime.c @@ -53,11 +53,11 @@ size_t __fastcall__ strftime (char* buf, size_t bufsize, const char* format, const struct tm* tm) { - static const char* days[7] = { + static const char* const days[7] = { "Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday" }; - static const char* months[12] = { + static const char* const months[12] = { "January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December" }; diff --git a/libsrc/common/stricmp.s b/libsrc/common/stricmp.s index 501d0b625..494350b06 100644 --- a/libsrc/common/stricmp.s +++ b/libsrc/common/stricmp.s @@ -1,48 +1,49 @@ +; stricmp.s ; -; Ullrich von Bassewitz, 03.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int stricmp (const char* s1, const char* s2); /* DOS way */ ; int strcasecmp (const char* s1, const char* s2); /* UNIX way */ ; .export _stricmp, _strcasecmp - .import popax - .import __ctype - .importzp ptr1, ptr2, tmp1 - + .import popptr1 + .importzp ptr1, ptr2, tmp1, tmp2 + .import ctypemaskdirect .include "ctype.inc" _stricmp: _strcasecmp: sta ptr2 ; Save s2 stx ptr2+1 - jsr popax ; get s1 - sta ptr1 - stx ptr1+1 - ldy #0 + jsr popptr1 ; get s1 + ; ldy #0 ; Y=0 guaranteed by popptr1 loop: lda (ptr2),y ; get char from second string - tax - lda __ctype,x ; get character classification + sta tmp2 ; and save it + jsr ctypemaskdirect ; get character classification and #CT_LOWER ; lower case char? beq L1 ; jump if no - txa ; get character back - clc - adc #<('A'-'a') ; make upper case char - tax ; -L1: stx tmp1 ; remember upper case equivalent + lda #<('A'-'a') ; make upper case char + adc tmp2 ; ctypemaskdirect ensures carry clear! + sta tmp2 ; remember upper case equivalent - lda (ptr1),y ; get character from first string - tax - lda __ctype,x ; get character classification +L1: lda (ptr1),y ; get character from first string + sta tmp1 + jsr ctypemaskdirect ; get character classification and #CT_LOWER ; lower case char? beq L2 ; jump if no - txa ; get character back - clc - adc #<('A'-'a') ; make upper case char - tax - -L2: cpx tmp1 ; compare characters + lda #<('A'-'a') ; make upper case char + adc tmp1 ; ctypemaskdirect ensures carry clear! + sta tmp1 ; remember upper case equivalent + +L2: ldx tmp1 + cpx tmp2 ; compare characters bne L3 txa ; end of strings? beq L5 ; a/x both zero diff --git a/libsrc/common/strlen.s b/libsrc/common/strlen.s index b583eea50..8d5bc20fc 100644 --- a/libsrc/common/strlen.s +++ b/libsrc/common/strlen.s @@ -1,26 +1,39 @@ ; ; Ullrich von Bassewitz, 31.05.1998 ; -; int strlen (const char* s); +; Note: strspn & strcspn call internally this function and rely on +; the usage of only ptr2 here! Keep in mind when appling changes +; and check the other implementations too! +; +; size_t __fastcall__ strlen (const char* s); ; .export _strlen - .importzp ptr1 + .importzp ptr2 + .macpack cpu _strlen: - sta ptr1 ; Save s - stx ptr1+1 + sta ptr2 ; Save s + stx ptr2+1 +.if (.cpu .bitand ::CPU_ISET_HUC6280) + clx + cly +.else ldx #0 ; YX used as counter +.if (.cpu .bitand ::CPU_ISET_65816) + txy +.else ldy #0 +.endif +.endif -L1: lda (ptr1),y +L1: lda (ptr2),y beq L9 iny bne L1 - inc ptr1+1 + inc ptr2+1 inx bne L1 L9: tya ; get low byte of counter, hi's all set rts - diff --git a/libsrc/common/strlower.s b/libsrc/common/strlower.s index 848a4faff..b7c1a289b 100644 --- a/libsrc/common/strlower.s +++ b/libsrc/common/strlower.s @@ -10,14 +10,13 @@ .export _strlower, _strlwr .import popax - .import __ctype .importzp ptr1, ptr2 - + .import ctypemaskdirect .include "ctype.inc" _strlower: _strlwr: - sta ptr1 ; Save s (working copy) + sta ptr1 ; save s (working copy) stx ptr1+1 sta ptr2 stx ptr2+1 ; save function result @@ -25,13 +24,11 @@ _strlwr: loop: lda (ptr1),y ; get character beq L9 ; jump if done - tax - lda __ctype,x ; get character classification + jsr ctypemaskdirect ; get character classification and #CT_UPPER ; upper case char? beq L1 ; jump if no - txa ; get character back into accu - sec - sbc #<('A'-'a') ; make lower case char + lda (ptr1),y ; fetch character again + adc #<('a'-'A') ; make lower case char (ctypemaskdirect ensures carry clear) sta (ptr1),y ; store back L1: iny ; next char bne loop @@ -43,6 +40,3 @@ L1: iny ; next char L9: lda ptr2 ldx ptr2+1 rts - - - diff --git a/libsrc/common/strncat.s b/libsrc/common/strncat.s index b7bb04b2a..75572db7c 100644 --- a/libsrc/common/strncat.s +++ b/libsrc/common/strncat.s @@ -1,72 +1,71 @@ ; ; Ullrich von Bassewitz, 31.05.1998 +; Christian Krueger: 12-Aug-2013, minor optimizations ; ; char* strncat (char* dest, const char* src, size_t n); ; - .export _strncat - .import popax - .importzp ptr1, ptr2, ptr3, tmp1, tmp2 +.export _strncat +.import popax, popptr1 +.importzp ptr1, ptr2, ptr3, tmp1, tmp2 +.macpack cpu _strncat: - eor #$FF ; one's complement to count upwards - sta tmp1 - txa - eor #$FF - sta tmp2 - jsr popax ; get src - sta ptr1 - stx ptr1+1 - jsr popax ; get dest - sta ptr2 - stx ptr2+1 - sta ptr3 ; remember for function return - stx ptr3+1 - ldy #0 + inx + stx tmp2 + tax + inx + stx tmp1 ; save count with each byte incremented separately + + jsr popptr1 ; get src + + jsr popax ; get dest + sta ptr3 ; remember for function return + stx ptr3+1 + stx ptr2+1 + tay ; low byte as offset in Y +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz ptr2 +.else + ldx #0 + stx ptr2 ; destination on page boundary +.endif ; find end of dest -L1: lda (ptr2),y - beq L2 - iny - bne L1 - inc ptr2+1 - bne L1 +L1: lda (ptr2),y + beq L2 + iny + bne L1 + inc ptr2+1 + bne L1 -; end found, get offset in y into pointer - -L2: tya - clc - adc ptr2 - sta ptr2 - bcc L3 - inc ptr2+1 +; end found, apply offset to dest ptr and reset y +L2: sty ptr2 ; copy src. We've put the ones complement of the count into the counter, so ; we'll increment the counter on top of the loop -L3: ldy #0 - ldx tmp1 ; low counter byte +L3: ldy #0 + ldx tmp1 ; low counter byte -L4: inx - bne L5 - inc tmp2 - beq L6 ; jump if done -L5: lda (ptr1),y - sta (ptr2),y - beq L7 - iny - bne L4 - inc ptr1+1 - inc ptr2+1 - bne L4 +L4: dex + bne L5 + dec tmp2 + beq L6 ; jump if done +L5: lda (ptr1),y + sta (ptr2),y + beq L7 + iny + bne L4 + inc ptr1+1 + inc ptr2+1 + bne L4 ; done, set the trailing zero and return pointer to dest -L6: lda #0 - sta (ptr2),y -L7: lda ptr3 - ldx ptr3+1 - rts - - +L6: lda #0 + sta (ptr2),y +L7: lda ptr3 + ldx ptr3+1 + rts diff --git a/libsrc/common/strncmp.s b/libsrc/common/strncmp.s index 1035e15b8..bff1f0911 100644 --- a/libsrc/common/strncmp.s +++ b/libsrc/common/strncmp.s @@ -5,7 +5,7 @@ ; .export _strncmp - .import popax + .import popax, popptr1 .importzp ptr1, ptr2, ptr3 @@ -28,13 +28,11 @@ _strncmp: jsr popax ; get s2 sta ptr2 stx ptr2+1 - jsr popax ; get s1 - sta ptr1 - stx ptr1+1 + jsr popptr1 ; get s1 ; Loop setup - ldy #0 + ;ldy #0 Y=0 guaranteed by popptr1 ; Start of compare loop. Check the counter. diff --git a/libsrc/common/strncpy.s b/libsrc/common/strncpy.s index 042f9e28b..138413ecb 100644 --- a/libsrc/common/strncpy.s +++ b/libsrc/common/strncpy.s @@ -5,20 +5,18 @@ ; .export _strncpy - .import popax + .import popax, popptr1 .importzp ptr1, ptr2, tmp1, tmp2, tmp3 .proc _strncpy - eor #$FF - sta tmp1 - txa - eor #$FF - sta tmp2 ; Store -size - 1 + inx + stx tmp2 + tax + inx + stx tmp1 ; save count with each byte incremented separately - jsr popax ; get src - sta ptr1 - stx ptr1+1 + jsr popptr1 ; get src jsr popax ; get dest sta ptr2 stx ptr2+1 @@ -26,11 +24,11 @@ ; Copy src -> dest up to size bytes - ldx tmp1 ; Load low byte of ones complement of size + ldx tmp1 ldy #$00 -L1: inx +L1: dex bne L2 - inc tmp2 + dec tmp2 beq L9 L2: lda (ptr1),y ; Copy one character @@ -44,8 +42,8 @@ L2: lda (ptr1),y ; Copy one character ; Fill the remaining bytes. -L3: inx ; Counter low byte - beq L6 ; Branch on overflow +L3: dex ; Counter low byte + beq L6 L4: sta (ptr2),y ; Clear one byte L5: iny ; Bump pointer bne L3 @@ -54,7 +52,7 @@ L5: iny ; Bump pointer ; Bump the counter high byte -L6: inc tmp2 +L6: dec tmp2 bne L4 ; Done, return dest diff --git a/libsrc/common/strnicmp.s b/libsrc/common/strnicmp.s index b1f973e3a..477aa3d66 100644 --- a/libsrc/common/strnicmp.s +++ b/libsrc/common/strnicmp.s @@ -7,71 +7,61 @@ ; .export _strnicmp, _strncasecmp - .import popax, __ctype - .importzp ptr1, ptr2, ptr3, tmp1 - + .import popax, popptr1 + .importzp ptr1, ptr2, ptr3, tmp1, tmp2 + .import ctypemaskdirect .include "ctype.inc" _strnicmp: _strncasecmp: -; Convert the given counter value in a/x from a downward counter into an -; upward counter, so we can increment the counter in the loop below instead -; of decrementing it. This adds some overhead now, but is cheaper than -; executing a more complex test in each iteration of the loop. We do also -; correct the value by one, so we can do the test on top of the loop. - - eor #$FF - sta ptr3 - txa - eor #$FF - sta ptr3+1 + inx + stx ptr3+1 + tax + inx + stx ptr3 ; save count with each byte incremented separately ; Get the remaining arguments jsr popax ; get s2 sta ptr2 stx ptr2+1 - jsr popax ; get s1 - sta ptr1 - stx ptr1+1 + jsr popptr1 ; get s1 ; Loop setup - ldy #0 + ; ldy #0 Y=0 guaranteed by popptr1 ; Start of compare loop. Check the counter. -Loop: inc ptr3 - beq IncHi ; Increment high byte +Loop: dec ptr3 ; decrement high byte + beq IncHi ; Compare a byte from the strings Comp: lda (ptr2),y - tax - lda __ctype,x ; get character classification + sta tmp2 ; remember original char + jsr ctypemaskdirect ; get character classification and #CT_LOWER ; lower case char? beq L1 ; jump if no - txa ; get character back - sec - sbc #<('a'-'A') ; make upper case char - tax ; -L1: stx tmp1 ; remember upper case equivalent + lda #<('A'-'a') ; make upper case char + adc tmp2 ; ctypemaskdirect ensures carry clear! + sta tmp2 ; remember upper case equivalent - lda (ptr1),y ; get character from first string - tax - lda __ctype,x ; get character classification +L1: lda (ptr1),y ; get character from first string + sta tmp1 ; remember original char + jsr ctypemaskdirect ; get character classification and #CT_LOWER ; lower case char? beq L2 ; jump if no - txa ; get character back - sec - sbc #<('a'-'A') ; make upper case char - tax + lda #<('A'-'a') ; make upper case char + adc tmp1 ; ctypemaskdirect ensures carry clear! + sta tmp1 ; remember upper case equivalent -L2: cpx tmp1 ; compare characters - bne NotEqual ; Jump if strings different - txa ; End of strings? - beq Equal1 ; Jump if EOS reached, a/x == 0 +L2: ldx tmp1 + cpx tmp2 ; compare characters + bne NotEqual ; jump if strings different + txa ; end of strings? + beq Equal1 ; jump if EOS reached, a/x == 0 ; Increment the pointers @@ -79,12 +69,12 @@ L2: cpx tmp1 ; compare characters bne Loop inc ptr1+1 inc ptr2+1 - bne Loop ; Branch always + bne Loop ; branch always ; Increment hi byte -IncHi: inc ptr3+1 - bne Comp ; Jump if counter not zero +IncHi: dec ptr3+1 + bne Comp ; jump if counter not zero ; Exit code if strings are equal. a/x not set @@ -96,8 +86,8 @@ Equal1: rts NotEqual: bcs L3 - ldx #$FF ; Make result negative + ldx #$FF ; make result negative rts -L3: ldx #$01 ; Make result positive +L3: ldx #$01 ; make result positive rts diff --git a/libsrc/common/strnlen.s b/libsrc/common/strnlen.s new file mode 100644 index 000000000..eb2c16006 --- /dev/null +++ b/libsrc/common/strnlen.s @@ -0,0 +1,54 @@ +; size_t __fastcall__ strnlen (const char* s, size_t maxlen); + +.export _strnlen +.import popax +.importzp ptr1, tmp1, tmp2, tmp3, tmp4 + +.proc _strnlen + ; Get maximum length. + tay + iny + sty tmp3 + inx + stx tmp4 + + ; Fetch string pointer. + jsr popax + sta ptr1 + stx ptr1+1 + + ; Clear return value. + ldy #0 + sty tmp1 + sty tmp2 + + + ;;; Loop over string. + ; Decrement maximum length. +next: dec tmp3 + bne l2 + dec tmp4 + beq done +l2: + + lda (ptr1),y + beq done + + ; Step to next character. + iny + bne l1 + inc ptr1+1 +l1: + + ; Increment return value. + inc tmp1 + bne next + inc tmp2 + + bne next ; (jmp) + + +done: lda tmp1 + ldx tmp2 + rts +.endproc diff --git a/libsrc/common/strpbrk.s b/libsrc/common/strpbrk.s index 5d1482913..a7060415e 100644 --- a/libsrc/common/strpbrk.s +++ b/libsrc/common/strpbrk.s @@ -1,60 +1,53 @@ -; -; Ullrich von Bassewitz, 11.06.1998 ; -; char* strpbrk (const char* s1, const char* s2); +; 1998-06-11, Ullrich von Bassewitz +; 2018-05-29, Greg King +; +; char* __fastcall__ strpbrk (const char* str, const char* set); ; .export _strpbrk - .import popax, return0 - .importzp ptr1, ptr2, tmp1, tmp2, tmp3 + + .import popax + .importzp ptr1, ptr2, tmp2, tmp3 _strpbrk: - jsr popax ; get s2 - sta ptr2 + sta ptr2 ; store set stx ptr2+1 - jsr popax ; get s1 - sta ptr1 - stx ptr1+1 - ldy #$00 + jsr popax + stx ptr1+1 ; store str's high byte + ldx #<$0000 + stx ptr1 + tay ; use str's low byte as index -L1: lda (ptr1),y ; get next char from s1 +L1: lda (ptr1),y ; get next char from str beq L9 ; jump if done sta tmp2 ; save char - iny - bne L2 - inc ptr1+1 -L2: sty tmp3 ; save index into s1 + sty tmp3 ; save index into str - ldy #0 ; get index into s2 -L3: lda (ptr2),y ; + ldy #$00 +L3: lda (ptr2),y ; look at each char in set beq L4 ; jump if done cmp tmp2 - beq L6 + beq L6 ; break out of loops if something found iny bne L3 -; The character was not found in s2. Increment the counter and start over +; The character was not found in set. Increment the counter; and start over. L4: ldy tmp3 ; reload index - inx - bne L1 - inc tmp1 + iny bne L1 + inc ptr1+1 + bne L1 ; branch always -; A character was found. Calculate a pointer to this char in s1 and return it. +; A character was found. Return its str pointer. L6: ldx ptr1+1 - lda tmp3 ; get y offset - clc - adc ptr1 - bcc L7 - inx -L7: rts - -; None of the characters in s2 was found - return NULL - -L9: jmp return0 - - + lda tmp3 ; get .Y offset + rts +; None of the characters in set was found -- return NULL. +L9: ;ldx #>$0000 ; (set by prolog) + ;lda #<$0000 ; (set by '\0' at end of str) + rts diff --git a/libsrc/common/strrchr.s b/libsrc/common/strrchr.s index bd7389e76..2858337b5 100644 --- a/libsrc/common/strrchr.s +++ b/libsrc/common/strrchr.s @@ -1,47 +1,41 @@ ; ; Ullrich von Bassewitz, 31.05.1998 +; Christian Krueger: 2013-Aug-01, optimization ; ; char* strrchr (const char* s, int c); ; .export _strrchr .import popax - .importzp ptr1, ptr2, tmp1 + .importzp ptr1, tmp1, tmp2 _strrchr: - sta tmp1 ; Save c - jsr popax ; get s - sta ptr1 - stx ptr1+1 - lda #0 ; function result = NULL - sta ptr2 - sta ptr2+1 - tay + sta tmp1 ; Save c + jsr popax ; get s + tay ; low byte to y + stx ptr1+1 + ldx #0 ; default function result is NULL, X is high byte... + stx tmp2 ; tmp2 is low-byte + stx ptr1 ; low-byte of source string is in Y, so clear real one... -L1: lda (ptr1),y ; get next char - beq L3 ; jump if end of string - cmp tmp1 ; found? - bne L2 ; jump if no +testChar: + lda (ptr1),y ; get char + beq finished ; jump if end of string + cmp tmp1 ; found? + bne nextChar ; jump if no -; Remember a pointer to the character +charFound: + sty tmp2 ; y has low byte of location, save it + ldx ptr1+1 ; x holds high-byte of result - tya - clc - adc ptr1 - sta ptr2 - lda ptr1+1 - adc #$00 - sta ptr2+1 +nextChar: + iny + bne testChar + inc ptr1+1 + bne testChar ; here like bra... -; Next char +; return the pointer to the last occurrence -L2: iny - bne L1 - inc ptr1+1 - bne L1 ; jump always - -; Return the pointer to the last occurrence - -L3: lda ptr2 - ldx ptr2+1 +finished: + lda tmp2 ; high byte in X is already correct... rts diff --git a/libsrc/common/strspn.s b/libsrc/common/strspn.s index f8b8fff2a..6fda716be 100644 --- a/libsrc/common/strspn.s +++ b/libsrc/common/strspn.s @@ -1,56 +1,52 @@ ; ; Ullrich von Bassewitz, 11.06.1998 +; Christian Krueger: 08-Aug-2013, optimization ; ; size_t strspn (const char* s1, const char* s2); ; .export _strspn - .import popax - .importzp ptr1, ptr2, tmp1, tmp2, tmp3 + .import popptr1, _strlen + .importzp ptr1, ptr2, tmp1, tmp2 _strspn: - sta ptr2 ; Save s2 - stx ptr2+1 - jsr popax ; get s1 - sta ptr1 - stx ptr1+1 - ldx #0 ; low counter byte - stx tmp1 ; high counter byte - ldy #$00 + jsr _strlen ; get length in a/x and transfer s2 to ptr2 + ; Note: It does not make sense to + ; have more than 255 test chars, so + ; we don't support a high byte here! (ptr2+1 is + ; also unchanged in strlen then (important!)) + ; -> the original implementation also + ; ignored this case -L1: lda (ptr1),y ; get next char from s1 - beq L6 ; jump if done - sta tmp2 ; save char + sta tmp1 ; tmp1 = strlen of test chars + jsr popptr1 ; get and save s1 to ptr1 + + ldx #0 ; low counter byte + stx tmp2 ; high counter byte + +loadChar: + ldy #0 + lda (ptr1),y ; get next char from s1 + beq leave ; handly byte of s1 +advance: + inc ptr1 ; advance string position to test + bne check + inc ptr1+1 + dey ; correct next iny (faster/shorter than bne...) + +checkNext: iny - bne L2 - inc ptr1+1 -L2: sty tmp3 ; save index into s1 +check: cpy tmp1 ; compare with length of test character string + beq leave + cmp (ptr2),y ; found matching char? + bne checkNext - ldy #0 ; get index into s2 -L3: lda (ptr2),y ; - beq L6 ; jump if done - cmp tmp2 - beq L4 - iny - bne L3 - -; The character was found in s2. Increment the counter and start over - -L4: ldy tmp3 ; reload index +foundTestChar: inx - bne L1 - inc tmp1 - bne L1 + bne loadChar + inc tmp2 + bne loadChar ; like bra... -; The character was not found, or we reached the end of s1. Return count of -; characters - -L6: txa ; get low counter byte - ldx tmp1 ; get high counter byte +leave: txa ; restore position of finding + ldx tmp2 ; and return rts - - - - - - diff --git a/libsrc/common/strstr.s b/libsrc/common/strstr.s index 55e2def03..84f633245 100644 --- a/libsrc/common/strstr.s +++ b/libsrc/common/strstr.s @@ -5,7 +5,7 @@ ; .export _strstr - .import popax + .import popptr1 .importzp ptr1, ptr2, ptr3, ptr4, tmp1 _strstr: @@ -13,13 +13,11 @@ _strstr: stx ptr2+1 sta ptr4 ; Setup temp copy for later - jsr popax ; Get haystack - sta ptr1 - stx ptr1+1 ; Save haystack + jsr popptr1 ; Get haystack to ptr1 ; If needle is empty, return haystack - ldy #$00 + ; ldy #$00 Y=0 guaranteed by popptr1 lda (ptr2),y ; Get first byte of needle beq @Found ; Needle is empty --> we're done diff --git a/libsrc/common/strupper.s b/libsrc/common/strupper.s index bf0d3b622..3af0d8d98 100644 --- a/libsrc/common/strupper.s +++ b/libsrc/common/strupper.s @@ -10,14 +10,13 @@ .export _strupper, _strupr .import popax - .import __ctype .importzp ptr1, ptr2 - + .import ctypemaskdirect .include "ctype.inc" _strupper: _strupr: - sta ptr1 ; Save s (working copy) + sta ptr1 ; save s (working copy) stx ptr1+1 sta ptr2 stx ptr2+1 ; save function result @@ -25,13 +24,11 @@ _strupr: loop: lda (ptr1),y ; get character beq L9 ; jump if done - tax - lda __ctype,x ; get character classification + jsr ctypemaskdirect ; get character classification and #CT_LOWER ; lower case char? beq L1 ; jump if no - txa ; get character back into accu - clc - adc #<('A'-'a') ; make upper case char + lda (ptr1),y ; fetch character again + adc #<('A'-'a') ; make upper case char (ctypemaskdirect ensures carry clear) sta (ptr1),y ; store back L1: iny ; next char bne loop @@ -43,6 +40,3 @@ L1: iny ; next char L9: lda ptr2 ldx ptr2+1 rts - - - diff --git a/libsrc/atari/tgi_colors.s b/libsrc/common/tgi_colors.s similarity index 100% rename from libsrc/atari/tgi_colors.s rename to libsrc/common/tgi_colors.s diff --git a/libsrc/common/time.s b/libsrc/common/time.s index 140d47e2c..40b470f5b 100644 --- a/libsrc/common/time.s +++ b/libsrc/common/time.s @@ -6,10 +6,10 @@ .export _time - .import __systime - .importzp ptr1, sreg, tmp1 + .import decsp1, ldeaxi + .importzp ptr1, sreg, tmp1, tmp2 - .include "errno.inc" + .include "time.inc" .code @@ -20,8 +20,17 @@ txa pha ; Save timep - jsr __systime ; Get the time (machine dependent) +; Get the time (machine dependent) + jsr decsp1 + lda #<time + ldx #>time + jsr _clock_gettime + sta tmp2 + lda #<time + ldx #>time + .assert timespec::tv_sec = 0, error + jsr ldeaxi sta tmp1 ; Save low byte of result ; Restore timep and check if it is NULL @@ -48,13 +57,15 @@ lda tmp1 sta (ptr1),y -; If the result is less than zero, set ERRNO +; If the result is != 0, return -1 -@L1: ldy sreg+1 - bpl @L2 - - lda #ENOSYS ; Function not implemented - jsr __seterrno ; Set __errno +@L1: lda tmp2 + beq @L2 + + tax + sta sreg + sta sreg+1 + rts ; Reload the low byte of the result and return @@ -63,4 +74,8 @@ .endproc +; ------------------------------------------------------------------------ +; Data +.bss +time: .tag timespec diff --git a/libsrc/apple2/toascii.s b/libsrc/common/toascii.s similarity index 87% rename from libsrc/apple2/toascii.s rename to libsrc/common/toascii.s index a3f946e64..5b1943aca 100644 --- a/libsrc/apple2/toascii.s +++ b/libsrc/common/toascii.s @@ -6,5 +6,5 @@ .export _toascii _toascii: - ldx #$00 + ldx #>$0000 rts diff --git a/libsrc/common/tolower.s b/libsrc/common/tolower.s index 2c624cb74..828be1cb1 100644 --- a/libsrc/common/tolower.s +++ b/libsrc/common/tolower.s @@ -1,21 +1,28 @@ +; tolower.s ; -; Ullrich von Bassewitz, 02.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int tolower (int c); ; .export _tolower - .import __ctype + .include "ctype.inc" + .import ctypemaskdirect _tolower: - cpx #$00 ; Outside valid range? - bne L9 ; If so, return the argument unchanged - tay ; Get C into Y - lda __ctype,y ; Get character classification - lsr a - lsr a ; Get bit 1 (upper case char) into carry - tya ; Get char back into A - bcc L9 ; Jump if no upper case char - sbc #<('A'-'a') ; Make lower case char (carry already set) -L9: rts - + cpx #$00 ; out of range? + bne @L2 ; if so, return the argument unchanged + tay ; save char + jsr ctypemaskdirect ; get character classification + and #CT_UPPER ; upper case char? + beq @L1 ; jump if no + tya ; restore char + adc #<('a'-'A') ; make lower case char (ctypemaskdirect ensures carry clear) + rts +@L1: tya ; restore char +@L2: rts diff --git a/libsrc/common/toupper.s b/libsrc/common/toupper.s index da1ee0427..d0465f64f 100644 --- a/libsrc/common/toupper.s +++ b/libsrc/common/toupper.s @@ -1,21 +1,28 @@ +; toupper.s ; -; Ullrich von Bassewitz, 02.06.1998 +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. ; ; int toupper (int c); ; .export _toupper - .import __ctype + .include "ctype.inc" + .import ctypemaskdirect _toupper: - cpx #$00 ; Outside valid range? - bne L9 ; If so, return the argument unchanged - tay ; Get c into Y - lda __ctype,y ; Get character classification - lsr a ; Get bit 0 (lower char) into carry - tya ; Get C back into A - bcc L9 ; Jump if not lower char - clc - adc #<('A'-'a') ; make upper case char -L9: rts ; CC are set - + cpx #$00 ; out of range? + bne @L2 ; if so, return the argument unchanged + tay ; save char + jsr ctypemaskdirect ; get character classification + and #CT_LOWER ; lower case char? + beq @L1 ; jump if no + tya ; restore char + adc #<('A'-'a') ; make upper case char (ctypemaskdirect ensures carry clear) + rts +@L1: tya ; restore char +@L2: rts diff --git a/libsrc/common/ungetc.s b/libsrc/common/ungetc.s index 386c450a8..88595068c 100644 --- a/libsrc/common/ungetc.s +++ b/libsrc/common/ungetc.s @@ -68,4 +68,4 @@ error: lda #EINVAL rts .endproc - + diff --git a/libsrc/common/vsprintf.s b/libsrc/common/vsprintf.s index eb47dae18..b4cb9c419 100644 --- a/libsrc/common/vsprintf.s +++ b/libsrc/common/vsprintf.s @@ -30,7 +30,7 @@ _vsprintf: ldy #2 jsr staxysp -; Contine by jumping to vsnprintf, which expects ap on the CPU stack and will +; Contine by jumping to vsnprintf, which expects ap on the CPU stack and will ; cleanup the C stack jmp vsnprintf diff --git a/libsrc/conio/cputs.s b/libsrc/conio/cputs.s index 13cf84789..41191a0b0 100644 --- a/libsrc/conio/cputs.s +++ b/libsrc/conio/cputs.s @@ -1,19 +1,18 @@ ; ; Ullrich von Bassewitz, 06.08.1998 ; -; void cputsxy (unsigned char x, unsigned char y, char* s); -; void cputs (char* s); +; void cputsxy (unsigned char x, unsigned char y, const char* s); +; void cputs (const char* s); ; .export _cputsxy, _cputs - .import popa, _gotoxy, _cputc + .import gotoxy, _cputc .importzp ptr1, tmp1 - + _cputsxy: sta ptr1 ; Save s for later stx ptr1+1 - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, pop x + jsr gotoxy ; Set cursor, pop x and y jmp L0 ; Same as cputs... _cputs: sta ptr1 ; Save s diff --git a/libsrc/conio/scrsize.s b/libsrc/conio/scrsize.s index 6582568d7..834c14820 100644 --- a/libsrc/conio/scrsize.s +++ b/libsrc/conio/scrsize.s @@ -6,29 +6,30 @@ .export _screensize - .import popsreg + .import popptr1 .import screensize - .importzp ptr1, sreg + .importzp ptr1, ptr2 + + .macpack cpu .proc _screensize - sta ptr1 ; Store the y pointer - stx ptr1+1 - jsr popsreg ; Get the x pointer into sreg + sta ptr2 ; Store the y pointer + stx ptr2+1 + jsr popptr1 ; Get the x pointer into ptr1 jsr screensize ; Get screensize into X/Y tya ; Get Y size into A -.IFP02 - ldy #0 - sta (ptr1),y +.if (.cpu .bitand ::CPU_ISET_65SC02) + sta (ptr2) txa - sta (sreg),y -.ELSE sta (ptr1) +.else + ldy #0 + sta (ptr2),y txa - sta (sreg) -.ENDIF - + sta (ptr1),y +.endif rts .endproc diff --git a/libsrc/conio/vcprintf.s b/libsrc/conio/vcprintf.s index 06eab4421..084efe089 100644 --- a/libsrc/conio/vcprintf.s +++ b/libsrc/conio/vcprintf.s @@ -5,7 +5,7 @@ ; .export _vcprintf - .import pushax, popax + .import pushax, popax, popptr1 .import __printf, _cputc .importzp sp, ptr1, ptr2, ptr3, tmp1 @@ -47,16 +47,14 @@ outdesc: ; Static outdesc structure out: jsr popax ; count sta ptr2 - eor #$FF - sta outdesc+6 - txa - sta ptr2+1 - eor #$FF - sta outdesc+7 + stx ptr2+1 + inx + stx outdesc+7 + tax + inx + stx outdesc+6 - jsr popax ; buf - sta ptr1 - stx ptr1+1 + jsr popptr1 ; buf jsr popax ; d sta ptr3 @@ -76,7 +74,7 @@ out: jsr popax ; count ; Loop outputting characters -@L1: inc outdesc+6 +@L1: dec outdesc+6 beq @L4 @L2: ldy tmp1 lda (ptr1),y @@ -87,7 +85,7 @@ out: jsr popax ; count jsr _cputc jmp @L1 -@L4: inc outdesc+7 +@L4: dec outdesc+7 bne @L2 rts diff --git a/libsrc/creativision/_scrsize.s b/libsrc/creativision/_scrsize.s new file mode 100644 index 000000000..b1b05efea --- /dev/null +++ b/libsrc/creativision/_scrsize.s @@ -0,0 +1,15 @@ +;* +;** _scrsize.s +;* + + .export screensize + + .include "creativision.inc" + +.proc screensize + + ldx #SCREEN_COLS + ldy #SCREEN_ROWS + rts + +.endproc diff --git a/libsrc/creativision/boxchars.inc b/libsrc/creativision/boxchars.inc new file mode 100644 index 000000000..5fbb3409d --- /dev/null +++ b/libsrc/creativision/boxchars.inc @@ -0,0 +1,62 @@ +; Boxchars + +boxchars: + ; Vertical Line + .byte $18 + .byte $18 + .byte $18 + .byte $18 + .byte $18 + .byte $18 + .byte $18 + .byte $18 + + ; Horizontal Line + .byte $00 + .byte $00 + .byte $00 + .byte $FF + .byte $00 + .byte $00 + .byte $00 + .byte $00 + + ; Top Left + .byte $00 + .byte $00 + .byte $00 + .byte $1F + .byte $18 + .byte $18 + .byte $18 + .byte $18 + + ; Top Right + .byte $00 + .byte $00 + .byte $00 + .byte $F8 + .byte $18 + .byte $18 + .byte $18 + .byte $18 + + ; Bottom Left + .byte $18 + .byte $18 + .byte $18 + .byte $1F + .byte $00 + .byte $00 + .byte $00 + .byte $00 + + ; Bottom Right + .byte $18 + .byte $18 + .byte $18 + .byte $F8 + .byte $00 + .byte $00 + .byte $00 + .byte $00 diff --git a/libsrc/creativision/cclear.s b/libsrc/creativision/cclear.s new file mode 100644 index 000000000..953ec8ce8 --- /dev/null +++ b/libsrc/creativision/cclear.s @@ -0,0 +1,26 @@ +;* +;* void cclearxy (unsigned char x, unsigned char y, unsigned char length); +;* void cclear (unsigned char length); +;* + + .export _cclearxy, _cclear + .import popa, _gotoxy, cputdirect + .importzp tmp1 + +_cclearxy: + pha ; Save length + jsr popa ; get Y + jsr _gotoxy + pla + +_cclear: + cmp #0 ; Zero length? + beq L2 + sta tmp1 + +L1: lda #$20 ; Space + jsr cputdirect + dec tmp1 + bne L1 + +L2: rts diff --git a/libsrc/creativision/cgetc.s b/libsrc/creativision/cgetc.s new file mode 100644 index 000000000..12831b4b9 --- /dev/null +++ b/libsrc/creativision/cgetc.s @@ -0,0 +1,14 @@ +;* cgetc + + .export _cgetc + .include "creativision.inc" + +_cgetc: + lda #$80 + +L1: bit ZP_KEYBOARD + bpl L1 + + lda ZP_KEYBOARD + and #$7F + rts diff --git a/libsrc/creativision/chline.s b/libsrc/creativision/chline.s new file mode 100644 index 000000000..bef36e1fe --- /dev/null +++ b/libsrc/creativision/chline.s @@ -0,0 +1,24 @@ +;* void chlinexy (unsigned char x, unsigned char y, unsigned char length); +;* void chline (unsigned char length); + + .export _chlinexy, _chline + .import popa, _gotoxy, cputdirect + .importzp tmp1 + + .include "creativision.inc" + +_chlinexy: + pha ; Save the length + jsr popa ; Get y + jsr _gotoxy ; Call this one, will pop params + pla ; Restore the length + +_chline: + cmp #0 ; Is the length zero? + beq L9 ; Jump if done + sta tmp1 +L1: lda #CH_HLINE ; Horizontal line, screen code + jsr cputdirect ; Direct output + dec tmp1 + bne L1 +L9: rts diff --git a/libsrc/creativision/clrscr.s b/libsrc/creativision/clrscr.s new file mode 100644 index 000000000..3c4856446 --- /dev/null +++ b/libsrc/creativision/clrscr.s @@ -0,0 +1,41 @@ +;* +;* clrscr +;* +;* NB: All screen functions assume Graphics Mode 1 in a default configuration. +;* Therefore, this is hard coded to use $1000-$12FF as screen VRAM. + + .export _clrscr + .include "creativision.inc" + +_clrscr: + + sei ; Disable interrupts. Default INT handler reads VDP_STATUS + ; and would lose any setup done here. + + lda #$00 ; VRAM offset low + sta VDP_CONTROL_W + + lda #$50 ; VRAM offset high ($10 OR $40) + sta VDP_CONTROL_W + + lda #$40 ; Space char from ROM setup + + ldx #0 + ldy #3 + +L1: sta VDP_DATA_W + inx + bne L1 + dey + bne L1 + + cli ; Let interrupts go again + + lda #0 + sta CURSOR_X + sta CURSOR_Y + sta SCREEN_PTR + lda #$10 + sta SCREEN_PTR+1 + + rts diff --git a/libsrc/creativision/color.s b/libsrc/creativision/color.s new file mode 100644 index 000000000..8e86719d2 --- /dev/null +++ b/libsrc/creativision/color.s @@ -0,0 +1,13 @@ +;* +;* unsigned char __fastcall__ textcolor (unsigned char color); +;* unsigned char __fastcall__ bgcolor (unsigned char color); +;* unsigned char __fastcall__ bordercolor (unsigned char color); +;* + + .export _textcolor, _bgcolor, _bordercolor + .import return0 + .include "creativision.inc" + +_bordercolor = return0; +_textcolor = return0; +_bgcolor = return0; diff --git a/libsrc/creativision/cputc.s b/libsrc/creativision/cputc.s new file mode 100644 index 000000000..437b738b2 --- /dev/null +++ b/libsrc/creativision/cputc.s @@ -0,0 +1,125 @@ +; +; Written by Groepaz/Hitmen <groepaz@gmx.net> +; Cleanup by Ullrich von Bassewitz <uz@cc65.org> +; +; void cputcxy (unsigned char x, unsigned char y, char c); +; void cputc (char c); +; + + .export _cputcxy, _cputc, cputdirect, putchar + .export newline + .constructor initconio + .import popa, _gotoxy + .import setcursor + + .importzp tmp3,tmp4 + + .include "creativision.inc" + .include "boxchars.inc" + +;----------------------------------------------------------------------------- + +.code + +_cputcxy: + pha ; Save C + jsr popa ; Get Y + jsr _gotoxy ; Set cursor, drop x + pla ; Restore C + +; Plot a character - also used as internal function + +_cputc: cmp #$0D ; CR? + bne L1 + lda #0 + sta CURSOR_X + beq plot ; Recalculate pointers + +L1: cmp #$0A ; LF? + beq newline ; Recalculate pointers + +; Printable char of some sort + +cputdirect: + jsr putchar ; Write the character to the screen + +; Advance cursor position + +advance: + ldy CURSOR_X + iny + cpy #SCREEN_COLS + bne L3 + inc CURSOR_Y ; new line + ldy #0 ; + cr +L3: sty CURSOR_X + jmp plot + +newline: + inc CURSOR_Y + +; Set cursor position, calculate RAM pointers + +plot: ldy CURSOR_X + ldx CURSOR_Y + jmp setcursor ; Set the new cursor + + +; Write one character to the screen without doing anything else, return X +; position in Y + +putchar: + cmp #$5B + bcc IS_UPPER + + clc + sbc #$1F + +IS_UPPER: + cmp #$20 + bcc BAD_CHAR + + pha + lda SCREEN_PTR + sei + sta VDP_CONTROL_W + lda SCREEN_PTR+1 + ora #$40 + sta VDP_CONTROL_W + pla + clc + adc #160 + sta VDP_DATA_W + cli + +BAD_CHAR: + jmp plot + +;----------------------------------------------------------------------------- +; Initialize the conio subsystem. "INIT" segment is nothing special on the +; Creativision, it is part of the "ROM" memory. + +.segment "INIT" + +initconio: + lda #$0 + sta SCREEN_PTR + lda #$10 + sta SCREEN_PTR+1 + + ; Copy box characters to slot + sei + lda #08 + sta VDP_CONTROL_W + lda #$46 + sta VDP_CONTROL_W + ldx #0 + +LL: lda boxchars,x + sta VDP_DATA_W + inx + cpx #48 + bne LL + + cli + jmp plot diff --git a/libsrc/creativision/crt0.s b/libsrc/creativision/crt0.s new file mode 100644 index 000000000..5185ff237 --- /dev/null +++ b/libsrc/creativision/crt0.s @@ -0,0 +1,109 @@ +; +; Startup code for cc65 (CreatiVision version) +; + + .export _exit + .export __STARTUP__ : absolute = 1 ; Mark as startup + .export irq2 + .import zerobss, copydata + .import initlib, donelib, callmain + .import __VECTORS_LOAD__, __VECTORS_RUN__, __VECTORS_SIZE__ + .import __ZP_LAST__, __STACKSIZE__, __RAM_START__ + + .include "creativision.inc" + .include "zeropage.inc" + +; ------------------------------------------------------------------------ + +entry: + ; Init the CPU + sei + cld + + ; Copy the IRQ vectors + ldx #<__VECTORS_SIZE__ - 1 +: lda __VECTORS_LOAD__,x + sta __VECTORS_RUN__,x + dex + bpl :- + + ; Setup the CPU stack ptr + ldx #<__RAM_START__ - 1 + txs + + ; Clear the BSS data + jsr zerobss + + ; Copy data from ROM to RAM + jsr copydata + + ; Setup the argument stack ptr + lda #<(__ZP_LAST__ + __STACKSIZE__) + ldx #>(__ZP_LAST__ + __STACKSIZE__) + sta sp + stx sp+1 + + ; Call module constructors + jsr initlib + + ; enable vertical blank interrupts in the display controller + lda #$E0 ; 16K RAM, Active Display, Mode 1, VBI enabled + ldx #$01 ; Register 1 + jsr BIOS_WRITE_VDP_REG + + ; Start interrupts + cli + + ; Call main() + jsr callmain + + ; Call module destructors. This is also the _exit entry. +_exit: jsr donelib + + ; A Creativision program isn't supposed to exit. +loop: jmp loop + +; ------------------------------------------------------------------------ +; Define the IRQ vectors. + +.segment "VECTORS" + +irq1: jmp BIOS_IRQ1_ADDR +irq2: jmp BIOS_IRQ2_ADDR + +; ------------------------------------------------------------------------ +; Define CART setup values for BIOS. + +.segment "SETUP" + + ; BIOS Jump Start + ; This is where the entry point of the program needs to be + .addr entry + .addr irq2 + + .res 4 + + ; VDP Setup + ; This sets to Graphics Mode 1 + .byte $00 ; Register 0 + .byte $C0 ; Register 1 16K RAM, Active Display, Mode 1, VBI disabled + .byte $04 ; Register 2 Name Table at $1000 - $12FF + .byte $60 ; Register 3 Colour Table at $1800 - $181F + .byte $00 ; Register 4 Pattern Table at $0000 - $07FF + .byte $10 ; Register 5 Sprite Attribute at $0800 - $087F + .byte $01 ; Register 6 Sprite Pattern + .byte $F1 ; Register 7 Text colour Foreground / background + + .res 4 + + ; BIOS Vector after NMI or RESET + ; Keeping with retail cartridges, we jump back to BIOS ROM and have it + ; setup zeropage etc, and show the Creativision logo and copyright. + .addr BIOS_NMI_RESET_ADDR + + ; BIOS Short Interrupt Handler + ; Vectored from BIOS ROM:FE2C. This should contain a pointer to the user's + ; BIOS interrupt handler. + .addr irq1 + +; ------------------------------------------------------------------------ diff --git a/libsrc/creativision/cvline.s b/libsrc/creativision/cvline.s new file mode 100644 index 000000000..4e7d2563e --- /dev/null +++ b/libsrc/creativision/cvline.s @@ -0,0 +1,29 @@ +; +; Ullrich von Bassewitz, 08.08.1998 +; +; void cvlinexy (unsigned char x, unsigned char y, unsigned char length); +; void cvline (unsigned char length); +; + + .export _cvlinexy, _cvline + .import popa, _gotoxy, putchar, newline + .importzp tmp1 + + .include "creativision.inc" + +_cvlinexy: + pha ; Save the length + jsr popa ; Get y + jsr _gotoxy ; Call this one, will pop params + pla ; Restore the length and run into _cvline + +_cvline: + cmp #0 ; Is the length zero? + beq L9 ; Jump if done + sta tmp1 +L1: lda #CH_VLINE ; Vertical bar + jsr putchar ; Write, no cursor advance + jsr newline ; Advance cursor to next line + dec tmp1 + bne L1 +L9: rts diff --git a/libsrc/creativision/gotox.s b/libsrc/creativision/gotox.s new file mode 100644 index 000000000..f65e923b5 --- /dev/null +++ b/libsrc/creativision/gotox.s @@ -0,0 +1,19 @@ +; +; Ullrich von Bassewitz, 2003-05-02 +; +; void gotox (unsigned char x); +; + + .export _gotox + .import setcursor + + .include "creativision.inc" + +.proc _gotox + + sta CURSOR_X ; Set new position + tay + ldx CURSOR_Y + jmp setcursor ; Set the cursor to the new position + +.endproc diff --git a/libsrc/creativision/gotoxy.s b/libsrc/creativision/gotoxy.s new file mode 100644 index 000000000..588dd83a0 --- /dev/null +++ b/libsrc/creativision/gotoxy.s @@ -0,0 +1,26 @@ +; +; 1998-08-06, Ullrich von Bassewitz +; 2017-06-15, Greg King +; +; void gotoxy (unsigned char x, unsigned char y); +; + + .export gotoxy, _gotoxy + + .import setcursor + .import popa + + .include "creativision.inc" + +gotoxy: jsr popa ; Get Y + +.proc _gotoxy + + sta CURSOR_Y ; Set Y + jsr popa ; Get X + sta CURSOR_X ; Set X + tay + ldx CURSOR_Y + jmp setcursor ; Set the cursor position + +.endproc diff --git a/libsrc/creativision/gotoy.s b/libsrc/creativision/gotoy.s new file mode 100644 index 000000000..484608d75 --- /dev/null +++ b/libsrc/creativision/gotoy.s @@ -0,0 +1,19 @@ +; +; Ullrich von Bassewitz, 2003-05-02 +; +; void gotoy (unsigned char y); +; + + .export _gotoy + .import setcursor + + .include "creativision.inc" + +.proc _gotoy + + sta CURSOR_Y ; Set new position + tax + ldy CURSOR_X + jmp setcursor ; Set the cursor to the new position + +.endproc diff --git a/libsrc/creativision/irq.s b/libsrc/creativision/irq.s new file mode 100644 index 000000000..f154c9199 --- /dev/null +++ b/libsrc/creativision/irq.s @@ -0,0 +1,40 @@ +; +; IRQ handling (CreatiVision version) +; + + .export initirq, doneirq + .import callirq, irq2 + + .include "creativision.inc" + +; ------------------------------------------------------------------------ + +.segment "ONCE" + +initirq: + lda #<IRQStub + ldx #>IRQStub + jmp setvec + +; ------------------------------------------------------------------------ + +.code + +doneirq: + lda #<BIOS_IRQ2_ADDR + ldx #>BIOS_IRQ2_ADDR +setvec: sei + sta irq2+1 + stx irq2+2 + cli + rts + +; ------------------------------------------------------------------------ + +.segment "CODE" + +IRQStub: + cld ; Just to be sure + jsr callirq ; Call the functions + jmp BIOS_IRQ2_ADDR ; Jump to the BIOS IRQ vector + diff --git a/libsrc/creativision/joy/creativision-stdjoy.s b/libsrc/creativision/joy/creativision-stdjoy.s new file mode 100644 index 000000000..73b0c249f --- /dev/null +++ b/libsrc/creativision/joy/creativision-stdjoy.s @@ -0,0 +1,229 @@ +; +; Standard joystick driver for the Creativision. +; +; 2017-03-08, Christian Groessler +; 2021-06-01, Greg King +; + + .include "zeropage.inc" + .include "joy-kernel.inc" + .include "joy-error.inc" + .include "creativision.inc" + + .macpack module + + +buttons := tmp2 + +; ------------------------------------------------------------------------ +; Header. Includes jump table + + module_header _creativisionstd_joy + +; Driver signature + + .byte $6A, $6F, $79 ; "joy" + .byte JOY_API_VERSION ; Driver API version number + +; Library reference + + .addr $0000 + +; Jump table. + + .addr INSTALL + .addr UNINSTALL + .addr COUNT + .addr READJOY + +; ------------------------------------------------------------------------ +; Constants + +JOY_COUNT = 2 ; Number of joysticks we support + +; Symbolic names for joystick masks (similar names to the macros in joystick.h, +; with the same values as the masks in creativision.h) + +JOY_UP = $10 +JOY_DOWN = $04 +JOY_LEFT = $20 +JOY_RIGHT = $08 + + .code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. If +; possible, check if the hardware is present and determine the amount of +; memory available. +; Must return an JOY_ERR_xx code in a/x. +; + +INSTALL: lda #JOY_ERR_OK + ldx #>$0000 +; rts ; Fall through + +; ------------------------------------------------------------------------ +; UNINSTALL routine. Is called before the driver is removed from memory. +; Can do cleanup or whatever. Must not return anything. +; + +UNINSTALL: rts + + +; ------------------------------------------------------------------------ +; COUNT: Return the total number of available joysticks in a/x. +; + +COUNT: lda #<JOY_COUNT + ldx #>JOY_COUNT + rts + +; ------------------------------------------------------------------------ +; READ: Read a particular joystick passed in A. +; + +READJOY: lsr a ; Get joystick number + bcs READJOY_1 ; Read right joystick + +; Read left joystick + + ldx ZP_JOY0_DIR + lda ZP_JOY0_BUTTONS + bcc convert ; Convert joystick state to cc65 values + +; Read right joystick + +READJOY_1: ldx ZP_JOY1_DIR + lda ZP_JOY1_BUTTONS + lsr a + lsr a + ;jmp convert ; Convert joystick state to cc65 values + ; Fall thru... + +; ------------------------------------------------------------------------ +; convert: make runtime lib-compatible values +; inputs: +; A - buttons +; X - direction +; + +convert: + +; ------ +; buttons: +; Port values are for the left-hand joystick (right-hand joystick +; values were shifted to the right to be identical). +; Why are there two bits indicating a pressed trigger? +; According to the "Second book of programs for the Dick Smith Wizard" +; (pg. 88ff), the left-hand button gives the value of +; %00010001 and the right-hand button gives %00100010 +; Why two bits? Can there be cases that just one of those bits is set? +; Until those questions have been answered, we only use the lower two +; bits, and ignore the upper ones. + + and #%00000011 ; Button status came in A, strip high bits + sta buttons + +; ------ +; direction: +; CV has a 16-direction joystick. +; +; Port values: (compass points) +; N - $49 - %01001001 +; NNE - $48 - %01001000 +; NE - $47 - %01000111 +; ENE - $46 - %01000110 +; E - $45 - %01000101 +; ESE - $44 - %01000100 +; SE - $43 - %01000011 +; SSE - $42 - %01000010 +; S - $41 - %01000001 +; SSW - $40 - %01000000 +; SW - $4F - %01001111 +; WSW - $4E - %01001110 +; W - $4D - %01001101 +; WNW - $4C - %01001100 +; NW - $4B - %01001011 +; NNW - $4A - %01001010 +; center - $00 - %00000000 +; +; Mapping to cc65 definitions (4-direction joystick with 8 possible directions thru combinations): +; N, E, S, W -> JOY_UP, JOY_RIGHT, JOY_DOWN, JOY_LEFT +; NE, SE, SW, NW -> (JOY_UP | JOY_RIGHT), (JOY_DOWN | JOY_RIGHT), (JOY_DOWN | JOY_LEFT), (JOY_UP | JOY_LEFT) +; NNE, ENE, ESE, SSE, SSW, WSW, WNW, NNW: +; toggle between the straight and diagonal directions for each call, e.g., +; NNE: +; call to READJOY: return JOY_UP | JOY_RIGHT +; call to READJOY: return JOY_UP +; call to READJOY: return JOY_UP | JOY_RIGHT +; call to READJOY: return JOY_UP +; call to READJOY: return JOY_UP | JOY_RIGHT +; etc. + + txa ; Move direction status into A + beq done ; Center position (no bits are set), nothing to do + + and #$0F ; Get rid of the "$40" bit + lsr a ; Is it "three-letter" direction (NNE, ENE, etc.)? + tax ; Create index into table + bcc special ; Yes (bit #0 was zero) + + lda dirtable,x +done: ora buttons ; Include button bits + ldx #>$0000 + rts + +; NNE, ENE, ESE, SSE, SSW, WSW, WNW, NNW + +special: lda toggle ; Toggle the flag + eor #$01 + sta toggle + bne spec_1 ; Flag is 1, use spectable_1 entry + + lda spectable_0,x + bne done ; Jump always + +spec_1: lda spectable_1,x + bne done ; Jump always + +; ------------------------------------------------------------------------ +; + .rodata + + ; A mapping table of "port values" to "cc65 values" + ; Port value had been shifted one bit to the right (range 0..7) +dirtable: .byte JOY_DOWN ; S + .byte JOY_DOWN | JOY_RIGHT ; SE + .byte JOY_RIGHT ; E + .byte JOY_UP | JOY_RIGHT ; NE + .byte JOY_UP ; N + .byte JOY_UP | JOY_LEFT ; NW + .byte JOY_LEFT ; W + .byte JOY_DOWN | JOY_LEFT ; SW + + ; Two "special" mapping tables for three-letter directions (NNE, etc.) +spectable_0: .byte JOY_DOWN ; SSW + .byte JOY_DOWN ; SSE + .byte JOY_RIGHT ; ESE + .byte JOY_RIGHT ; ENE + .byte JOY_UP ; NNE + .byte JOY_UP ; NNW + .byte JOY_LEFT ; WNW + .byte JOY_LEFT ; WSW + +spectable_1: .byte JOY_DOWN | JOY_LEFT ; SSW + .byte JOY_DOWN | JOY_RIGHT ; SSE + .byte JOY_DOWN | JOY_RIGHT ; ESE + .byte JOY_UP | JOY_RIGHT ; ENE + .byte JOY_UP | JOY_RIGHT ; NNE + .byte JOY_UP | JOY_LEFT ; NNW + .byte JOY_UP | JOY_LEFT ; WNW + .byte JOY_DOWN | JOY_LEFT ; WSW + +; ------------------------------------------------------------------------ +; + .bss + +toggle: .res 1 + + .end diff --git a/libsrc/creativision/joy_stat_stddrv.s b/libsrc/creativision/joy_stat_stddrv.s new file mode 100644 index 000000000..fc458641c --- /dev/null +++ b/libsrc/creativision/joy_stat_stddrv.s @@ -0,0 +1,12 @@ +; +; Address of the static standard joystick driver +; +; Christian Groessler, 2017-02-06 +; +; const void joy_static_stddrv[]; +; + + .export _joy_static_stddrv + .import _creativisionstd_joy + +_joy_static_stddrv := _creativisionstd_joy diff --git a/libsrc/creativision/libref.s b/libsrc/creativision/libref.s new file mode 100644 index 000000000..19e7e778f --- /dev/null +++ b/libsrc/creativision/libref.s @@ -0,0 +1,8 @@ +; +; Oliver Schmidt, 2013-05-31 +; + + .export joy_libref + .import _exit + +joy_libref := _exit diff --git a/libsrc/creativision/playsound.s b/libsrc/creativision/playsound.s new file mode 100644 index 000000000..55c7a3fed --- /dev/null +++ b/libsrc/creativision/playsound.s @@ -0,0 +1,40 @@ +; void __fastcall__ bios_playsound (void *a, unsigned char b); + + + .export _bios_playsound + + .import popax + + .include "creativision.inc" + + +songptr := $00 ; Points to current tune data +volptr := $04 ; Points to current volume table + + +;* Creativision Sound Player +;* Based on BIOS song player. +;* +;* Pass a pointer to a set of note triples, terminated with a tempo byte; +;* and pass the length of the triples and tempo (max 255). +;* +;* Note: tune data must be stored backwards. + +_bios_playsound: + php + pha ; Save tune length + sei + + lda #<$FCD5 ; BIOS decreasing-volume table + ldx #>$FCD5 + sta volptr + stx volptr+1 + + jsr popax ; Get tune array pointer + sta songptr + stx songptr+1 + + pla + tay + dey ; Point to tempo byte + jmp BIOS_PLAY_SONG ; Let BIOS do its thing diff --git a/libsrc/creativision/psg.s b/libsrc/creativision/psg.s new file mode 100644 index 000000000..ec878af31 --- /dev/null +++ b/libsrc/creativision/psg.s @@ -0,0 +1,30 @@ +; void __fastcall__ psg_outb (unsigned char b); +; void __fastcall__ psg_delay (unsigned char b); +; void psg_silence (void); + + + .export _psg_outb, _psg_silence, _psg_delay + + .include "creativision.inc" + + +;* Let BIOS output the value. +_psg_outb := BIOS_POKE_PSG + + +_psg_silence := BIOS_QUIET_PSG + + +_psg_delay: + tay +l1: lda #200 +l2: sbc #1 + bne l2 + + lda #200 +l3: sbc #1 + bne l3 + + dey + bne l1 + rts diff --git a/libsrc/creativision/setcursor.s b/libsrc/creativision/setcursor.s new file mode 100644 index 000000000..9918cbcb2 --- /dev/null +++ b/libsrc/creativision/setcursor.s @@ -0,0 +1,36 @@ +; +; Written by Groepaz/Hitmen <groepaz@gmx.net> +; Cleanup by Ullrich von Bassewitz <uz@cc65.org> +; +; Set the cursor position + + .export setcursor + + .include "creativision.inc" + +;----------------------------------------------------------------------------- + +.proc setcursor + + tya + clc + adc addrlo,x + sta SCREEN_PTR + + lda addrhi,x + adc #0 + sta SCREEN_PTR+1 + rts + +.endproc + +;----------------------------------------------------------------------------- +; Tables with screen addresses + +addrlo: .repeat SCREEN_ROWS,line + .byte <($1000+(line*SCREEN_COLS)) + .endrepeat + +addrhi: .repeat SCREEN_ROWS,line + .byte >($1000+(line*SCREEN_COLS)) + .endrepeat diff --git a/libsrc/creativision/sysuname.s b/libsrc/creativision/sysuname.s new file mode 100644 index 000000000..725cb2a62 --- /dev/null +++ b/libsrc/creativision/sysuname.s @@ -0,0 +1,36 @@ +; +; Ullrich von Bassewitz, 2003-08-12 +; +; unsigned char __fastcall__ _sysuname (struct utsname* buf); +; + + .export __sysuname, utsdata + + .import utscopy + + __sysuname = utscopy + +;-------------------------------------------------------------------------- +; Data. We define a fixed utsname struct here and just copy it. + +.rodata + +utsdata: + ; sysname + .asciiz "cc65" + + ; nodename + .asciiz "" + + ; release + .byte ((.VERSION >> 8) & $0F) + '0' + .byte '.' + .byte ((.VERSION >> 4) & $0F) + '0' + .byte $00 + + ; version + .byte (.VERSION & $0F) + '0' + .byte $00 + + ; machine + .asciiz "CREATIVISION" diff --git a/libsrc/creativision/wherex.s b/libsrc/creativision/wherex.s new file mode 100644 index 000000000..a2e6fdfc5 --- /dev/null +++ b/libsrc/creativision/wherex.s @@ -0,0 +1,16 @@ +; +; Ullrich von Bassewitz, 2003-05-02 +; +; unsigned char wherex (void); +; + + .export _wherex + .include "creativision.inc" + +.proc _wherex + + lda CURSOR_X + ldx #$00 + rts + +.endproc diff --git a/libsrc/creativision/wherey.s b/libsrc/creativision/wherey.s new file mode 100644 index 000000000..fa50177c4 --- /dev/null +++ b/libsrc/creativision/wherey.s @@ -0,0 +1,16 @@ +; +; Ullrich von Bassewitz, 2003-05-02 +; +; unsigned char wherey (void); +; + + .export _wherey + .include "creativision.inc" + +.proc _wherey + + lda CURSOR_Y + ldx #$00 + rts + +.endproc diff --git a/libsrc/cx16/_scrsize.s b/libsrc/cx16/_scrsize.s new file mode 100644 index 000000000..6b848078c --- /dev/null +++ b/libsrc/cx16/_scrsize.s @@ -0,0 +1,6 @@ +; +; Screen size variables +; + + .import SCREEN + .export screensize := SCREEN diff --git a/libsrc/cx16/bankramaddr.s b/libsrc/cx16/bankramaddr.s new file mode 100644 index 000000000..7736f8692 --- /dev/null +++ b/libsrc/cx16/bankramaddr.s @@ -0,0 +1,52 @@ +; +; 2019-12-21, Greg King +; +; This module supplies some load addresses that are expected +; by a Commander X16 in the first two bytes of banked RAM load files. +; + + ; The following symbol is used by a linker config. to force + ; this module to get included into the output files. + .export __BANKRAMADDR__: abs = 1 + +.if 0 ; bank 0 is used by Kernal +.segment "BRAM00ADDR" + + .addr *+2 +.endif + +.segment "BRAM01ADDR" + + .addr *+2 + +.segment "BRAM02ADDR" + + .addr *+2 + +.segment "BRAM03ADDR" + + .addr *+2 + +.segment "BRAM04ADDR" + + .addr *+2 + +.segment "BRAM05ADDR" + + .addr *+2 + +.segment "BRAM06ADDR" + + .addr *+2 + +.segment "BRAM07ADDR" + + .addr *+2 + +.segment "BRAM08ADDR" + + .addr *+2 + +.segment "BRAM09ADDR" + + .addr *+2 diff --git a/libsrc/cx16/bordercolor.s b/libsrc/cx16/bordercolor.s new file mode 100644 index 000000000..d152d1aa6 --- /dev/null +++ b/libsrc/cx16/bordercolor.s @@ -0,0 +1,17 @@ +; +; 2020-05-02, Greg King +; +; unsigned char __fastcall__ bordercolor (unsigned char color); +; /* Set the color for the border. The old color setting is returned. */ +; + + .export _bordercolor + + .include "cx16.inc" + +_bordercolor: + tax + stz VERA::CTRL ; Use display register bank 0 + lda VERA::DISP::FRAME ; get old value + stx VERA::DISP::FRAME ; set new value + rts diff --git a/libsrc/cx16/break.s b/libsrc/cx16/break.s new file mode 100644 index 000000000..6c79c903d --- /dev/null +++ b/libsrc/cx16/break.s @@ -0,0 +1,108 @@ +; +; 1998-09-27, Ullrich von Bassewitz +; 2019-11-06, Greg King +; +; void __fastcall__ set_brk (unsigned Addr); +; void reset_brk (void); +; + + .export _set_brk, _reset_brk + .destructor _reset_brk + .export _brk_a, _brk_x, _brk_y, _brk_sr, _brk_pc + + .include "cx16.inc" + + +.bss +_brk_a: .res 1 +_brk_x: .res 1 +_brk_y: .res 1 +_brk_sr: .res 1 +_brk_pc: .res 2 + +oldvec: .res 2 ; Old vector + + +.data +uservec: jmp $FFFF ; Patched at runtime + + +.code + +; Set the break vector + +.proc _set_brk + + sta uservec+1 + stx uservec+2 ; Set the user vector + + lda oldvec + ora oldvec+1 ; Did we save the vector already? + bne L1 ; Jump if we installed the handler already + + lda BRKVec + ldx BRKVec+1 + sta oldvec + stx oldvec+1 ; Save the old vector + +L1: lda #<brk_handler ; Set the break vector to our routine + ldx #>brk_handler + sta BRKVec + stx BRKVec+1 + rts + +.endproc + + +; Reset the break vector + +.proc _reset_brk + + lda oldvec + ldx oldvec+1 + beq @L9 ; Jump if vector not installed + sta BRKVec + stx BRKVec+1 + + lda #$00 + sta oldvec ; Clear the old vector + sta oldvec+1 +@L9: rts + +.endproc + + +; Break handler, called if a break occurs + +.proc brk_handler + + pla + sta _brk_y + pla + sta _brk_x + pla + sta _brk_a + pla + sta _brk_sr + pla ; PC low + sec + sbc #<$0002 ; Point to start of BRK + sta _brk_pc + pla ; PC high + sbc #>$0002 + sta _brk_pc+1 + + jsr uservec ; Call the user's routine + + lda _brk_pc+1 + pha + lda _brk_pc + pha + lda _brk_sr + pha + ldy _brk_y + ldx _brk_x + lda _brk_a + rti ; Jump back... + +.endproc diff --git a/libsrc/cx16/cgetc.s b/libsrc/cx16/cgetc.s new file mode 100644 index 000000000..b4354197f --- /dev/null +++ b/libsrc/cx16/cgetc.s @@ -0,0 +1,77 @@ +; +; 2022-03-29, Greg King +; +; char cgetc (void); +; /* Return a character from the keyboard. */ +; + + .export _cgetc + + .import _kbhit, cursor, GETIN + + .include "cx16.inc" + .macpack generic + + +screen_addr := $1B000 ; VRAM address of text screen + +_cgetc: jsr _kbhit + bnz L3 ; Jump if there are already chars waiting + +; Switch the cursor on if wanted. + + lda CURS_FLAG ; Save cursor's current enable flag + tay + lda cursor + jsr setcursor +L1: jsr _kbhit + bze L1 ; Wait for key + tya + eor #%00000001 ; (Cursor flag uses negative logic) + jsr setcursor ; Restore previous cursor condition + +; An internal Kernal function can't be used because it might be moved in future +; revisions. Use an official function; but, make sure that it reads +; the keyboard. + +L3: ldy IN_DEV ; Save current input device + stz IN_DEV ; Keyboard + phy + jsr GETIN ; Read char, and return in .A + ply + sty IN_DEV ; Restore input device + ldx #>$0000 + rts + +; Switch the cursor on or off. + +setcursor: + tax ; On or off? + bnz seton ; Go set it on + lda CURS_FLAG ; Is the cursor currently off? + bnz crs9 ; Jump if yes + inc CURS_FLAG ; Mark it as off + ldx CURS_STATE ; Cursor currently displayed? + bze crs9 ; Jump if not + +; Restore the current character in video RAM. +; Restore that character's colors. + + stz VERA::CTRL ; Use port 0 + lda CURS_Y + add #<(>screen_addr) + sta VERA::ADDR+1 ; Set row number + lda #VERA::INC1 | ^screen_addr ; Increment address by one + sta VERA::ADDR+2 + lda CURS_X ; Get character column + asl a + sta VERA::ADDR + ldx CURS_CHAR + stx VERA::DATA0 + ldx CURS_COLOR + stx VERA::DATA0 + stz CURS_STATE ; Cursor not displayed +crs9: rts + +seton: stz CURS_FLAG + rts diff --git a/libsrc/cx16/clock.s b/libsrc/cx16/clock.s new file mode 100644 index 000000000..a0871dbc7 --- /dev/null +++ b/libsrc/cx16/clock.s @@ -0,0 +1,35 @@ +; +; 1998-09-21, Ullrich von Bassewitz +; 2019-12-25, Greg King +; +; clock_t clock (void); +; + + .constructor initclock + .export _clock + + .import SETTIM, RDTIM + .importzp sreg + + +; clock() counts the amount of time that the process has run. +; Therefore, reset it when the program begins. + +.proc initclock + + lda #$00 + tax + tay + jmp SETTIM + +.endproc + + +.proc _clock + + stz sreg + 1 ; Byte 3 always is zero + jsr RDTIM + sty sreg + rts + +.endproc diff --git a/libsrc/cx16/clrscr.s b/libsrc/cx16/clrscr.s new file mode 100644 index 000000000..51fae6bf2 --- /dev/null +++ b/libsrc/cx16/clrscr.s @@ -0,0 +1,26 @@ +; +; 2019-09-22, Greg King +; +; void clrscr (void); +; /* Clear the screen. */ +; + + .export _clrscr + + .import CHROUT + + .include "cx16.inc" + + +; An internal Kernal function can't be used because it might be moved in future +; revisions. Use an official function; but, make sure that it prints +; to the screen. + +_clrscr: + ldy OUT_DEV ; Save current output device + ldx #$03 ; Screen device + stx OUT_DEV + lda #$93 + jsr CHROUT ; Print clear-screen character + sty OUT_DEV ; Restore output device + rts diff --git a/libsrc/cx16/color.s b/libsrc/cx16/color.s new file mode 100644 index 000000000..f8d8c1ebf --- /dev/null +++ b/libsrc/cx16/color.s @@ -0,0 +1,43 @@ +; +; 2019-09-16, Greg King +; +; unsigned char __fastcall__ textcolor (unsigned char color); +; unsigned char __fastcall__ bgcolor (unsigned char color); +; + + + .export _textcolor, _bgcolor + + .importzp tmp1 + .include "cx16.inc" + +_textcolor: + and #$0F + sta tmp1 + ldx CHARCOLOR ; get old values + txa + and #<~$0F ; keep screen color, remove text color + ora tmp1 + sta CHARCOLOR ; set new values + txa + and #$0F + rts + + +_bgcolor: + asl a ; move number to screen-color nybble + asl a + asl a + asl a + sta tmp1 + ldx CHARCOLOR ; get old values + txa + and #<~$F0 ; remove screen color, keep text color + ora tmp1 + sta CHARCOLOR ; set new values + txa + lsr a ; get old background color + lsr a + lsr a + lsr a + rts diff --git a/libsrc/cx16/cpeekc.s b/libsrc/cx16/cpeekc.s new file mode 100644 index 000000000..9f4b3b296 --- /dev/null +++ b/libsrc/cx16/cpeekc.s @@ -0,0 +1,50 @@ +; +; 2016-02-28, Groepaz +; 2022-03-29, Greg King +; +; char cpeekc (void); +; /* Return the character from the current cursor position. */ +; + + .export _cpeekc + + .include "cx16.inc" + .macpack generic + + +screen_addr := $1B000 ; VRAM address of text screen + +_cpeekc: + stz VERA::CTRL ; use port 0 + lda CURS_Y + add #<(>screen_addr) + sta VERA::ADDR+1 ; set row number + lda #^screen_addr + sta VERA::ADDR+2 + lda CURS_X ; get character column + asl a ; each character has two bytes + sta VERA::ADDR + lda VERA::DATA0 ; get screen code + ldx #>$0000 + and #<~%10000000 ; remove reverse bit + +; Convert the screen code into a PetSCII code. +; $00 - $1F: +$40 +; $20 - $3F +; $40 - $5f: +$20 +; $60 - $7F: +$40 + + cmp #$20 + bcs @sk1 ;(bge) + ora #$40 + rts + +@sk1: cmp #$40 + bcc @end ;(blt) + cmp #$60 + bcc @sk2 ;(blt) + ;sec + adc #$20 - $01 +@sk2: ;clc ; both above cmp and adc clear carry flag + adc #$20 +@end: rts diff --git a/libsrc/cx16/cpeekcolor.s b/libsrc/cx16/cpeekcolor.s new file mode 100644 index 000000000..668f2a0da --- /dev/null +++ b/libsrc/cx16/cpeekcolor.s @@ -0,0 +1,39 @@ +; +; 2022-03-29, Greg King +; +; unsigned char cpeekcolor (void); +; /* Return the colors from the current cursor position. */ +; + + .export _cpeekcolor + + .include "cx16.inc" + .macpack generic + + +screen_addr := $1B000 ; VRAM address of text screen + +_cpeekcolor: + php + lda CURS_FLAG ; is the cursor currently off? + bne @L1 + sei ; don't let cursor blinking interfere + ldx CURS_STATE ; is cursor currently displayed? + beq @L1 ; jump if not + lda CURS_COLOR ; get color under cursor + bra @L2 + +@L1: stz VERA::CTRL ; use port 0 + lda CURS_Y + add #<(>screen_addr) + sta VERA::ADDR+1 ; set row number + lda #^screen_addr + sta VERA::ADDR+2 + lda CURS_X ; get character column + sec ; color attribute is second byte + rol a + sta VERA::ADDR + lda VERA::DATA0 ; get color of character +@L2: plp + ldx #>$0000 + rts diff --git a/libsrc/cx16/cpeekrevers.s b/libsrc/cx16/cpeekrevers.s new file mode 100644 index 000000000..1d10a2654 --- /dev/null +++ b/libsrc/cx16/cpeekrevers.s @@ -0,0 +1,44 @@ +; +; 2016-02-28, Groepaz +; 2022-03-29, Greg King +; +; unsigned char cpeekrevers (void); +; /* Return the reverse attribute from the current cursor position. +; ** If the character is reversed, then return 1; return 0 otherwise. +; */ +; + + .export _cpeekrevers + + .include "cx16.inc" + .macpack generic + + +screen_addr := $1B000 ; VRAM address of text screen + +_cpeekrevers: + php + lda CURS_FLAG ; is the cursor currently off? + bne @L1 + sei ; don't let cursor blinking interfere + ldx CURS_STATE ; is cursor currently displayed? + beq @L1 ; jump if not + lda CURS_CHAR ; get screen code under cursor + bra @L2 + +@L1: stz VERA::CTRL ; use port 0 + lda CURS_Y + add #<(>screen_addr) + sta VERA::ADDR+1 ; set row number + lda #^screen_addr + sta VERA::ADDR+2 + lda CURS_X ; get character column + asl a ; each character has two bytes + sta VERA::ADDR + lda VERA::DATA0 ; get screen code +@L2: plp + and #%10000000 ; get reverse bit + asl a + tax ; ldx #>$0000 + rol a ; return boolean value + rts diff --git a/libsrc/cx16/cpeeks.s b/libsrc/cx16/cpeeks.s new file mode 100644 index 000000000..281cbd75d --- /dev/null +++ b/libsrc/cx16/cpeeks.s @@ -0,0 +1 @@ +; empty file to prevent cbm/cpeeks.s being pulled into the cx16 lib diff --git a/libsrc/cx16/cputc.s b/libsrc/cx16/cputc.s new file mode 100644 index 000000000..22327d25a --- /dev/null +++ b/libsrc/cx16/cputc.s @@ -0,0 +1,102 @@ +; +; 2020-10-13, Greg King +; +; void __fastcall__ cputcxy (unsigned char x, unsigned char y, char c); +; void __fastcall__ cputc (char c); +; + + .export _cputcxy, _cputc, cputdirect, putchar + .export newline, plot + + .import gotoxy, PLOT + + .include "cx16.inc" + .macpack generic + + +screen_addr := $1B000 ; VRAM address of text screen + +; Move to a cursor position, then print a character. + +_cputcxy: + pha ; Save C + jsr gotoxy ; Set cursor, drop x and y + pla + +; Print a character -- also used as an internal function. + +_cputc: cmp #$0D ; X16 '\n'? + beq newline + cmp #$0A ; X16 '\r'? + beq cr + +; Printable char. of some sort. +; Convert it from PetSCII into a screen-code. + +convert: + tay + lsr a ; Divide by 256/8 + lsr a + lsr a + lsr a + lsr a + tax ; .X = %00000xxx + tya + eor pet_to_screen,x + +cputdirect: + jsr putchar ; Write character to screen, return .Y + +; Advance the cursor position. + + iny + cpy LLEN ; Reached end of line? + bne L3 + jsr newline ; Wrap around + +cr: ldy #$00 +L3: sty CURS_X + rts + +; Move down. + +newline: + inc SCREEN_PTR+1 + inc CURS_Y + rts + + +; Set the cursor's position, calculate RAM pointer. + +plot: ldy CURS_X + ldx CURS_Y + clc + jmp PLOT ; Set the new cursor + + +; Write one screen-code and color to the video RAM without doing anything else. +; Return the x position in .Y . + +putchar: + ora RVS ; Set revers bit + tax + stz VERA::CTRL ; Use port 0 + lda CURS_Y + add #<(>screen_addr) + sta VERA::ADDR+1 ; Set row number + lda #VERA::INC1 | ^screen_addr ; Address increments by one + sta VERA::ADDR+2 + ldy CURS_X ; Get character column into .Y + tya + asl a ; Each character has two bytes + sta VERA::ADDR + stx VERA::DATA0 ; Put the character + lda CHARCOLOR + sta VERA::DATA0 ; Put its colors + rts + + + .rodata +pet_to_screen: + .byte %10000000,%00000000,%01000000,%00100000 ; PetSCII -> screen-code + .byte %01000000,%11000000,%10000000,%10000000 diff --git a/libsrc/cx16/crt0.s b/libsrc/cx16/crt0.s new file mode 100644 index 000000000..e37a64a7c --- /dev/null +++ b/libsrc/cx16/crt0.s @@ -0,0 +1,103 @@ +; +; Start-up code for cc65 (CX16 r39 version) +; + + .export _exit + .export __STARTUP__ : absolute = 1 ; Mark as start-up + + .import initlib, donelib + .import zerobss, callmain + .import CHROUT + .import __MAIN_START__, __MAIN_SIZE__ ; Linker-generated + + .include "zeropage.inc" + .include "cx16.inc" + + +; ------------------------------------------------------------------------ +; Start-up code + +.segment "STARTUP" + +Start: tsx + stx spsave ; Save the system stack ptr. + +; Save space by putting some of the start-up code in the ONCE segment +; which will be re-used by the BSS segment, the heap, and the C stack. + + jsr init + +; Clear the BSS data. + + jsr zerobss + +; Push the command-line arguments, and call main(). + + jsr callmain + +; Back from main() [this is also the exit() entry]. + +_exit: +; Put the program return code into BASIC's status variable. + + sta STATUS + +; Run the module destructors. + + jsr donelib + +; Restore the system stuff. + + ldx spsave + txs ; Restore stack pointer + ldx ramsave + stx RAM_BANK ; Restore former RAM bank + lda #$04 + sta ROM_BANK ; Change back to BASIC ROM + +; Back to BASIC. + + rts + + +; ------------------------------------------------------------------------ + +.segment "ONCE" + +init: +; Change from BASIC's ROM to Kernal's ROM. + + stz ROM_BANK + +; Change to the second RAM bank. + + lda RAM_BANK + sta ramsave ; Save the current RAM bank number + lda #$01 + sta RAM_BANK + +; Set up the stack. + + lda #<(__MAIN_START__ + __MAIN_SIZE__) + ldx #>(__MAIN_START__ + __MAIN_SIZE__) + sta sp + stx sp+1 ; Set argument stack ptr + +; Switch to the lower/UPPER PetSCII charset. + + lda #$0E + jsr CHROUT + +; Call the module constructors. + + jmp initlib + + +; ------------------------------------------------------------------------ +; Data + +.segment "INIT" + +ramsave: + .res 1 +spsave: .res 1 diff --git a/libsrc/cx16/exec.c b/libsrc/cx16/exec.c new file mode 100644 index 000000000..a6633a9c3 --- /dev/null +++ b/libsrc/cx16/exec.c @@ -0,0 +1,127 @@ +/* +** Program-chaining function for Commodore platforms. +** +** 2020-04-27, Greg King +** +** This function exploits the program-chaining feature in Commander X16 BASIC's ROM. +** +** CC65's CBM programs have a BASIC program stub. We start those programs by +** RUNning that stub; it SYSes to the Machine Language code. Normally, after +** the ML code exits, the BASIC ROM continues running the stub. But, it has +** no more statements; so, the program stops. +** +** This function puts the desired program's name and device number into a LOAD +** statement. Then, it points BASIC to that statement, so that the ROM will run +** that statement after this program quits. The ROM will load the next program, +** and will execute it (because the LOAD will be seen in a running program). +*/ + +#include <fcntl.h> +#include <unistd.h> +#include <stdlib.h> +#include <string.h> +#include <errno.h> +#include <device.h> + + +/* The struct below is a line of BASIC code. It sits in the LOWCODE segment +** to make sure that it won't be hidden by a ROM when BASIC is re-enabled. +** The line is: +** 0 CLR:LOAD""+"" ,01 +** After this function has written into the line, it might look like this: +** 0 CLR:LOAD""+"program name" ,08 +** +** When BASIC's LOAD command asks the Kernal to load a file, it gives the +** Kernal a pointer to a file-name string. CC65's CBM programs use that +** pointer to give a copy of the program's name to main()'s argv[0] parameter. +** But, when BASIC uses a string literal that is in a program, it points +** directly to that literal -- in the models that don't use banked RAM +** (Pet/CBM, VIC-20, and 64). The literal is overwritten by the next program +** that is loaded. So, argv[0] would point to machine code. String operations +** create a new result string -- even when that operation changes nothing. The +** result is put in the string space at the top of BASIC's memory. So, the ""+ +** in this BASIC line guarantees that argv[0] will get a name from a safe place. +*/ +#pragma data-name(push, "LOWCODE") +static struct line { + const char end_of_line; /* fake previous line */ + const struct line* const next; + const unsigned line_num; + const char CLR_token, colon, LOAD_token, quotes[2], add_token, quote; + char name[21]; + const char comma; + char unit[3]; +} basic = { + '\0', &basic + 1, /* high byte of link must be non-zero */ + 0, 0x9C, ':', 0x93, "\"\"", 0xAA, '\"', + "\" ", /* format: "123:1234567890123456\"" */ + ',', "01" +}; +#pragma data-name(pop) + +/* These values are platform-specific. */ +extern const void* vartab; /* points to BASIC program variables */ +extern const void* memsize; /* points to top of BASIC RAM */ +extern const struct line* txtptr; /* points to BASIC code */ +#pragma zpsym("txtptr") +extern char basbuf[]; /* BASIC's input buffer */ +extern void basbuf_len[]; +#pragma zpsym("basbuf_len") + + +int __fastcall__ exec (const char* progname, const char* cmdline) +{ +#if 0 + static int fd; +#endif + static unsigned char dv, n; + + /* Exclude devices that can't load files. */ + /* (Use hand optimization, to make smaller code.) */ + dv = getcurrentdevice (); + if (dv < 8 || __A__ > 30) { + return _mappederrno (9); /* illegal device number */ + } + utoa (dv, basic.unit, 10); + + /* The emulator supports only loading and saving on its file-system. */ +#if 0 + /* Don't try to run a program that doesn't exist. */ + fd = open (progname, O_RDONLY); + if (fd < 0) { + return _mappederrno (4); /* file not found */ + } + close (fd); +#endif + + n = 0; + do { + if ((basic.name[n] = progname[n]) == '\0') { + break; + } + } while (++n < 20); /* truncate long names */ + basic.name[n] = '\"'; + + /* cc65 program loads might extend beyond the end of the RAM that is allowed + ** for BASIC. Then, the LOAD statement would complain that it is "out of + ** memory". Some pointers that say where to put BASIC program variables + ** must be changed, so that we do not get that error. One pointer is + ** changed here; a BASIC CLR statement changes the others. + */ + vartab = (char*)memsize - 256; + + /* Build the next program's argument list. */ + basbuf[0] = 0x8F; /* REM token */ + basbuf[1] = '\0'; + if (cmdline != NULL) { + strncat (basbuf, cmdline, (size_t)basbuf_len - 2); + } + + /* Tell the ROM where to find that BASIC program. */ + txtptr = &basic; + + /* (The return code, in STATUS, will be destroyed by LOAD. + ** So, don't bother to set it here.) + */ + exit (__AX__); +} diff --git a/libsrc/cx16/execvars.s b/libsrc/cx16/execvars.s new file mode 100644 index 000000000..2df647a50 --- /dev/null +++ b/libsrc/cx16/execvars.s @@ -0,0 +1,16 @@ +; +; Platform-specific variables for the exec program-chaining function +; + + .include "cx16.inc" + +; exec() is written in C. +; Provide the spellings that the C compiler wants to use. + +.export _vartab := VARTAB +.export _memsize := MEMSIZE + +.exportzp _txtptr := TXTPTR + +.export _basbuf := BASIC_BUF +.exportzp _basbuf_len = BASIC_BUF_LEN diff --git a/libsrc/cx16/filevars.s b/libsrc/cx16/filevars.s new file mode 100644 index 000000000..f3fa64664 --- /dev/null +++ b/libsrc/cx16/filevars.s @@ -0,0 +1,39 @@ +; +; 2002-11-15, Ullrich von Bassewitz +; 2019-11-08, Greg King +; +; Variables used for CBM file I/O +; + + .export curunit + .constructor initcurunit, 30 + .destructor updatedevnum, 30 + + .include "cx16.inc" + + +.segment "INIT" + +curunit: + .res 1 + + +.segment "ONCE" + +.proc initcurunit + lda DEVNUM + bne L0 + lda #8 ; Default is SD card + sta DEVNUM +L0: sta curunit + rts +.endproc + + +.code + +.proc updatedevnum + lda curunit + sta DEVNUM + rts +.endproc diff --git a/libsrc/cx16/get_numbanks.s b/libsrc/cx16/get_numbanks.s new file mode 100644 index 000000000..7654d3139 --- /dev/null +++ b/libsrc/cx16/get_numbanks.s @@ -0,0 +1,24 @@ +; +; 2020-01-29, Greg King +; +; unsigned short get_numbanks (void); +; /* Return the number of RAM banks that the machine has. */ +; +; The Commander X16 version of MEMTOP returns with an extra value: +; The accumulator describes the number of RAM banks that exist on the hardware. +; A zero accumulator means that there are 256 RAM banks. +; + + .export _get_numbanks + + .import MEMTOP + + +_get_numbanks: + sec + jsr MEMTOP + ldx #>$0000 + cmp #<$0100 ; are there 256 banks? + bne :+ + inx ; yes +: rts diff --git a/libsrc/cx16/get_ostype.s b/libsrc/cx16/get_ostype.s new file mode 100644 index 000000000..a778b6eae --- /dev/null +++ b/libsrc/cx16/get_ostype.s @@ -0,0 +1,20 @@ +; +; 2019-09-09, Greg King +; +; signed char get_ostype(void) +; /* Return a "build version". */ +; +; Positive number -- release build +; Negative number -- prerelease build +; -1 -- custom build +; + + .export _get_ostype + +.proc _get_ostype + ldx #>$0000 + lda $ff80 + bpl :+ + dex ; negative +: rts +.endproc diff --git a/libsrc/cx16/get_tv.s b/libsrc/cx16/get_tv.s new file mode 100644 index 000000000..6c1cc6ad8 --- /dev/null +++ b/libsrc/cx16/get_tv.s @@ -0,0 +1,19 @@ +; +; 2020-05-02, Greg King +; +; unsigned char get_tv (void); +; /* Return the video mode the machine is using. */ +; + + .export _get_tv + + .include "cx16.inc" + + +.proc _get_tv + stz VERA::CTRL ; Use display register bank 0 + lda VERA::DISP::VIDEO + and #%00000111 ; Get the type of output signal + ldx #>$0000 ; Promote to unsigned int + rts +.endproc diff --git a/libsrc/cx16/getdevice.s b/libsrc/cx16/getdevice.s new file mode 100644 index 000000000..5f2e74af4 --- /dev/null +++ b/libsrc/cx16/getdevice.s @@ -0,0 +1,67 @@ +; +; 2012-09-04, Oliver Schmidt +; 2019-11-08, Greg King +; +; unsigned char getfirstdevice (void); +; unsigned char __fastcall__ getnextdevice (unsigned char device); +; + + .export _getfirstdevice + .export _getnextdevice + .import isdisk + .import opencmdchannel + .import closecmdchannel + .importzp tmp2 + + .include "cx16.inc" + +;------------------------------------------------------------------------------ +; getfirstdevice() + +_getfirstdevice: + lda #$FF + ; Fall through + +;------------------------------------------------------------------------------ +; getnextdevice() + +_getnextdevice: + tax +next: inx + cpx #$FF + beq done + +; [open|close]cmdchannel already call isdisk internally; but, they +; interpret a non-disk as a no-op, while we need to interpret it +; as an error here. + + jsr isdisk + bcs next + +; [open|close]cmdchannel don't call into the Kernal, at all, if they +; only [in|de]crement the reference count of the shared cmdchannel. +; Therefore, we need to initiate STATUS explicitly here. + + lda #$00 + sta STATUS + + stx tmp2 + jsr opencmdchannel + ldx tmp2 + jsr closecmdchannel + ldx tmp2 + +; As we had to reference STATUS above anyway, we can do so, as well, +; here too (instead of calling READST). + + lda STATUS + +; Either the Kernal calls above were successfull, or there was +; already a cmdchannel to the device open -- which is a pretty +; good indication of its existence. ;-) + + bmi next + +done: txa + ldx #$00 + rts diff --git a/libsrc/cx16/getres.s b/libsrc/cx16/getres.s new file mode 100644 index 000000000..dad237014 --- /dev/null +++ b/libsrc/cx16/getres.s @@ -0,0 +1,36 @@ +; +; 2019-12-26, Greg King +; +; int __fastcall__ clock_getres (clockid_t clk_id, struct timespec *res); +; + + .include "time.inc" + + .importzp ptr1 + .import incsp1, return0 + + +;---------------------------------------------------------------------------- + +.proc _clock_getres + + sta ptr1 + stx ptr1+1 + + ldy #.sizeof(timespec) - 1 +@L1: lda time,y + sta (ptr1),y + dey + bpl @L1 + + jsr incsp1 + jmp return0 + +.endproc + +;---------------------------------------------------------------------------- +; timespec struct with tv_nsec set to approximately 1/60 of a second +.rodata + +time: .dword 0 + .dword 17 * 1000 * 1000 diff --git a/libsrc/cx16/gettime.s b/libsrc/cx16/gettime.s new file mode 100644 index 000000000..336b0f957 --- /dev/null +++ b/libsrc/cx16/gettime.s @@ -0,0 +1,56 @@ +; +; 2019-12-27, Greg King +; +; int __fastcall__ clock_gettime (clockid_t clk_id, struct timespec *tp); +; + + .include "time.inc" + .include "cx16.inc" + + .import pushax, pusheax, tosmul0ax, steaxspidx, incsp1, return0 + .import TM, load_jiffy + .import CLOCK_GET_DATE_TIME + + +;---------------------------------------------------------------------------- + +.proc _clock_gettime + + jsr pushax + jsr pushax + + jsr CLOCK_GET_DATE_TIME + + lda gREG::r0L + sta TM + tm::tm_year + lda gREG::r0H + dec a + sta TM + tm::tm_mon + lda gREG::r1L + sta TM + tm::tm_mday + + lda gREG::r1H + sta TM + tm::tm_hour + lda gREG::r2L + sta TM + tm::tm_min + lda gREG::r2H + sta TM + tm::tm_sec + + lda #<TM + ldx #>TM + jsr _mktime + ldy #timespec::tv_sec + jsr steaxspidx ; Pops address pushed by 2. pushax + + jsr load_jiffy + jsr pusheax + lda gREG::r3L + ldx #>$0000 + jsr tosmul0ax + ldy #timespec::tv_nsec + jsr steaxspidx ; Pops address pushed by 1. pushax + + jsr incsp1 + jmp return0 + +.endproc diff --git a/libsrc/cx16/gotox.s b/libsrc/cx16/gotox.s new file mode 100644 index 000000000..1cd7c6931 --- /dev/null +++ b/libsrc/cx16/gotox.s @@ -0,0 +1,13 @@ +; +; 2019-11-06, Greg King +; +; void fastcall gotox (unsigned char x); +; + + .export _gotox + + .import plot + .include "cx16.inc" + +_gotox: sta CURS_X ; Set new position + jmp plot ; And activate it diff --git a/libsrc/cx16/gotoxy.s b/libsrc/cx16/gotoxy.s new file mode 100644 index 000000000..1c1b60e28 --- /dev/null +++ b/libsrc/cx16/gotoxy.s @@ -0,0 +1,18 @@ +; +; 2019-11-06, Greg King +; +; void fastcall gotoxy (unsigned char x, unsigned char y); +; + + .export gotoxy, _gotoxy + + .import popa, plot + .include "cx16.inc" + +gotoxy: jsr popa ; Get Y + +_gotoxy: + sta CURS_Y ; Set Y + jsr popa ; Get X + sta CURS_X ; Set X + jmp plot ; Set the cursor position diff --git a/libsrc/cx16/gotoy.s b/libsrc/cx16/gotoy.s new file mode 100644 index 000000000..487cfa793 --- /dev/null +++ b/libsrc/cx16/gotoy.s @@ -0,0 +1,13 @@ +; +; 2019-11-06, Greg King +; +; void gotoy (unsigned char y); +; + + .export _gotoy + + .import plot + .include "cx16.inc" + +_gotoy: sta CURS_Y ; Set the new position + jmp plot ; And activate it diff --git a/libsrc/cx16/irq.s b/libsrc/cx16/irq.s new file mode 100644 index 000000000..0d9d54c60 --- /dev/null +++ b/libsrc/cx16/irq.s @@ -0,0 +1,48 @@ +; +; IRQ handling (CX16 version) +; + + .export initirq, doneirq + .import callirq + + .include "cx16.inc" + +; ------------------------------------------------------------------------ + +.segment "ONCE" + +initirq: + lda IRQVec + ldx IRQVec+1 + sta IRQInd+1 + stx IRQInd+2 + lda #<IRQStub + ldx #>IRQStub + jmp setvec + +; ------------------------------------------------------------------------ + +.code + +doneirq: + lda IRQInd+1 + ldx IRQInd+2 +setvec: sei + sta IRQVec + stx IRQVec+1 + cli + rts + +; ------------------------------------------------------------------------ + +.segment "LOWCODE" + +IRQStub: + jsr callirq ; Call the functions + jmp IRQInd ; Jump to the saved IRQ vector + +; ------------------------------------------------------------------------ + +.data + +IRQInd: jmp $0000 diff --git a/libsrc/cx16/joy/cx16-std.s b/libsrc/cx16/joy/cx16-std.s new file mode 100644 index 000000000..a40fcb061 --- /dev/null +++ b/libsrc/cx16/joy/cx16-std.s @@ -0,0 +1,98 @@ +; +; Standard joystick driver for the CX16. +; May be installed multiple times when statically linked to an application. +; +; 2021-04-07, Greg King +; + + .include "joy-kernel.inc" + .include "joy-error.inc" + + .include "cbm_kernal.inc" + .include "cx16.inc" + + .macpack generic + .macpack module + + .importzp tmp1 + + +; ------------------------------------------------------------------------ +; Header. Includes jump table + + module_header _cx16_std_joy + +; Driver signature + + .byte $6A, $6F, $79 ; ASCII "joy" + .byte JOY_API_VERSION ; Driver API version number + +; Library reference + + .addr $0000 + +; Jump table. + + .addr INSTALL + .addr UNINSTALL + .addr COUNT + .addr READ + +; ------------------------------------------------------------------------ +; Constant + +JOY_COUNT = $05 ; Number of joysticks we support + +; ------------------------------------------------------------------------ +; Data. + + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine -- is called after the driver is loaded into memory. +; If possible, check if the hardware is present. +; Must return a JOY_ERR_xx code in .XA . + +INSTALL: + lda #<JOY_ERR_OK + ldx #>JOY_ERR_OK +; rts ; Run into UNINSTALL instead + +; ------------------------------------------------------------------------ +; UNINSTALL routine -- is called before the driver is removed from memory. +; Can do clean-up or whatever. Shouldn't return anything. + +UNINSTALL: + rts + +; ------------------------------------------------------------------------ +; COUNT: Return the total number of possible joysticks, in .XA . + +COUNT: lda #<JOY_COUNT + ldx #>JOY_COUNT + rts + +; ------------------------------------------------------------------------ +; READ: Read a particular joystick passed in .A . + +READ: cmp #JOY_COUNT + blt :+ + lda #$00 +: jsr JOYSTICK_GET + sta tmp1 + txa + bit #%00001110 ; Is it NES or SNES controller? + bze nes + + asl tmp1 ; Get SNES's B button + ror a ; Put it next to the A button + asl tmp1 ; Drop SNES's Y button + asl a ; Get back the B button + ror tmp1 + asl a ; Get SNES's A button + ror tmp1 ; Make byte look like NES pad + +nes: lda tmp1 ; The controllers give zeroes for "pressed" + eor #%11111111 ; We want ones for "pressed" + rts diff --git a/libsrc/cx16/joy_stat_stddrv.s b/libsrc/cx16/joy_stat_stddrv.s new file mode 100644 index 000000000..08cd2f951 --- /dev/null +++ b/libsrc/cx16/joy_stat_stddrv.s @@ -0,0 +1,11 @@ +; +; Address of the static standard joystick driver +; +; 2019-11-10, Greg King +; +; const void joy_static_stddrv[]; +; + + .import _cx16_std_joy + + .export _joy_static_stddrv := _cx16_std_joy diff --git a/libsrc/lynx/joy_stddrv.s b/libsrc/cx16/joy_stddrv.s similarity index 61% rename from libsrc/lynx/joy_stddrv.s rename to libsrc/cx16/joy_stddrv.s index b0d30e8d5..ff2f54de1 100644 --- a/libsrc/lynx/joy_stddrv.s +++ b/libsrc/cx16/joy_stddrv.s @@ -1,7 +1,7 @@ ; ; Name of the standard joystick driver ; -; Oliver Schmidt, 2012-11-01 +; 2019-11-10, Greg King ; ; const char joy_stddrv[]; ; @@ -10,4 +10,4 @@ .rodata -_joy_stddrv: .asciiz "lynx-stdjoy.joy" +_joy_stddrv: .asciiz "cx16-std.joy" diff --git a/libsrc/cx16/kbhit.s b/libsrc/cx16/kbhit.s new file mode 100644 index 000000000..3cfe351a9 --- /dev/null +++ b/libsrc/cx16/kbhit.s @@ -0,0 +1,17 @@ +; +; 2022-03-28, Greg King +; +; unsigned char kbhit (void); +; /* Returns non-zero (true) if a typed character is waiting. */ +; + + .export _kbhit + + .import KBDBUF_PEEK + + +.proc _kbhit + jsr KBDBUF_PEEK + txa ; Low byte of return (only its zero/nonzero ... + rts ; ... state matters) +.endproc diff --git a/libsrc/cx16/kernal.s b/libsrc/cx16/kernal.s new file mode 100644 index 000000000..40bcfed11 --- /dev/null +++ b/libsrc/cx16/kernal.s @@ -0,0 +1,113 @@ +; +; 2022-03-28, Greg King +; +; CX16 Kernal functions +; + + .include "cbm_kernal.inc" + + .export KBDBUF_PEEK + .export KBDBUF_GET_MODIFIERS + .export KBDBUF_PUT + .export I2C_READ_BYTE + .export I2C_WRITE_BYTE + .export CX_MONITOR + .export ENTROPY_GET + .export CONSOLE_SET_PAGE_MSG + .export CONSOLE_PUT_IMAGE + .export CONSOLE_INIT + .export CONSOLE_PUT_CHAR + .export CONSOLE_GET_CHAR + .export MEMORY_FILL + .export MEMORY_COPY + .export MEMORY_CRC + .export MEMORY_DECOMPRESS + .export SPRITE_SET_IMAGE + .export SPRITE_SET_POSITION + .export FB_INIT + .export FB_GET_INFO + .export FB_SET_PALETTE + .export FB_CURSOR_POSITION + .export FB_CURSOR_NEXT_LINE + .export FB_GET_PIXEL + .export FB_GET_PIXELS + .export FB_SET_PIXEL + .export FB_SET_PIXELS + .export FB_SET_8_PIXELS + .export FB_SET_8_PIXELS_OPAQUE + .export FB_FILL_PIXELS + .export FB_FILTER_PIXELS + .export FB_MOVE_PIXELS + .export GRAPH_INIT + .export GRAPH_CLEAR + .export GRAPH_SET_WINDOW + .export GRAPH_SET_COLORS + .export GRAPH_DRAW_LINE + .export GRAPH_DRAW_RECT + .export GRAPH_MOVE_RECT + .export GRAPH_DRAW_OVAL + .export GRAPH_DRAW_IMAGE + .export GRAPH_SET_FONT + .export GRAPH_GET_CHAR_SIZE + .export GRAPH_PUT_CHAR + .export RESTORE_BASIC + .export CLOCK_SET_DATE_TIME + .export CLOCK_GET_DATE_TIME + .export JOYSTICK_SCAN + .export JOYSTICK_GET + .export SCREEN_MODE + .export SCREEN_SET_CHARSET + .export MOUSE_CONFIG + .export MOUSE_GET + + .export CLSALL + .export LKUPLA + .export LKUPSA + .export PFKEY + .export JSRFAR + .export INDFET + .export INDSTA + .export INDCMP + .export PRIMM + + .export CINT + .export IOINIT + .export RAMTAS + .export RESTOR + .export VECTOR + .export SETMSG + .export SECOND + .export TKSA + .export MEMTOP + .export MEMBOT + .export SCNKEY + .export SETTMO + .export ACPTR + .export CIOUT + .export UNTLK + .export UNLSN + .export LISTEN + .export TALK + .export READST + .export SETLFS + .export SETNAM + .export OPEN + .export CLOSE + .export CHKIN + .export CKOUT + .export CLRCH + .export BASIN + .export CHRIN + .export BSOUT + .export CHROUT + .export LOAD + .export SAVE + .export SETTIM + .export RDTIM + .export STOP + .export GETIN + .export CLALL + .export UDTIM + .export SCREEN + .export PLOT + .export IOBASE diff --git a/libsrc/cx16/layer_enable.s b/libsrc/cx16/layer_enable.s new file mode 100644 index 000000000..2cbd6714f --- /dev/null +++ b/libsrc/cx16/layer_enable.s @@ -0,0 +1,39 @@ +; +; 2020-05-02, Greg King +; +; unsigned char __fastcall__ vera_layer_enable (unsigned char layers); +; /* Display the layers that are "named" by the bit flags in layers. +; ** A value of 0b01 shows layer 0, a value of 0b10 shows layer 1, +; ** a value of 0b11 shows both layers. Return the previous value. +; */ +; + + .export _vera_layer_enable + + .include "cx16.inc" + + +mask = VERA::DISP::ENABLE::LAYER1 | VERA::DISP::ENABLE::LAYER0 + +.proc _vera_layer_enable + stz VERA::CTRL ; Use display register bank 0 + asl a + asl a ; Shift new flags into position + asl a + asl a + ldy VERA::DISP::VIDEO + + eor VERA::DISP::VIDEO + and #mask + eor VERA::DISP::VIDEO ; Replace old flags with new flags + sta VERA::DISP::VIDEO + + tya + and #mask ; Get old flags + lsr a + lsr a + lsr a + lsr a + ldx #>$0000 + rts +.endproc diff --git a/libsrc/cx16/libref.s b/libsrc/cx16/libref.s new file mode 100644 index 000000000..82a39c22b --- /dev/null +++ b/libsrc/cx16/libref.s @@ -0,0 +1,18 @@ +; +; 2013-05-31, Oliver Schmidt +; 2020-01-06, Greg King +; + + .export em_libref + .export joy_libref + .export mouse_libref + .export ser_libref + .export tgi_libref + + .import _exit + +em_libref := _exit +joy_libref := _exit +mouse_libref := _exit +ser_libref := _exit +tgi_libref := _exit diff --git a/libsrc/cx16/mainargs.s b/libsrc/cx16/mainargs.s new file mode 100644 index 000000000..1764b5e20 --- /dev/null +++ b/libsrc/cx16/mainargs.s @@ -0,0 +1,137 @@ +; mainargs.s +; +; Ullrich von Bassewitz, 2003-03-07 +; Based on code from Stefan A. Haubenthal, <polluks@web.de> +; 2005-02-26, Ullrich von Bassewitz +; 2019-09-08, Greg King +; +; Scan a group of arguments that are in BASIC's input-buffer. +; Build an array that points to the beginning of each argument. +; Send, to main(), that array and the count of the arguments. +; +; Command-lines look like these lines: +; +; run +; run : rem +; run:rem arg1 " arg 2 is quoted " arg3 "" arg5 +; +; "run" and "rem" are entokenned; the args. are not. Leading and trailing +; spaces outside of quotes are ignored. +; +; TO-DO: +; - The "file-name" might be a path-name; don't copy the directory-components. +; - Add a control-character quoting mechanism. + + .constructor initmainargs, 24 + .import __argc, __argv + + .include "cx16.inc" + + +MAXARGS = 10 ; Maximum number of arguments allowed +REM = $8f ; BASIC token-code +NAME_LEN = 16 ; Maximum length of command-name + +; Get possible command-line arguments. Goes into the special ONCE segment, +; which may be reused after the startup code is run. + +.segment "ONCE" + +initmainargs: + +; Assume that the program was loaded, a moment ago, by the traditional LOAD +; statement. Save the "most-recent filename" as argument #0. + + lda #0 ; The terminating NUL character + ldy FNAM_LEN + cpy #NAME_LEN + 1 + bcc L1 + ldy #NAME_LEN ; Limit the length + bne L1 ; Branch always +L0: lda (FNAM),y +L1: sta name,y + dey + bpl L0 + inc __argc ; argc always is equal to, at least, 1 + +; Find the "rem" token. + + ldx #0 +L2: lda BASIC_BUF,x + beq done ; No "rem," no args. + inx + cmp #REM + bne L2 + ldy #1 * 2 + +; Find the next argument. + +next: lda BASIC_BUF,x + beq done ; End of line reached + inx + cmp #' ' ; Skip leading spaces + beq next + +; Found start of next argument. We've incremented the pointer in X already, so +; it points to the second character of the argument. This is useful since we +; will check now for a quoted argument, in which case, we will have to skip this +; first character. + +found: cmp #'"' ; Is the argument quoted? + beq setterm ; Jump if so + dex ; Reset pointer to first argument character + lda #' ' ; A space ends the argument +setterm:sta term ; Set end of argument marker + +; Now store a pointer to the argument into the next slot. Since the BASIC +; input buffer is located at the start of a RAM page, no calculations are +; necessary. + + txa ; Get low byte + sta argv,y ; argv[y]= &arg + iny + lda #>BASIC_BUF + sta argv,y + iny + inc __argc ; Found another arg + +; Search for the end of the argument. + +argloop:lda BASIC_BUF,x + beq done + inx + cmp term + bne argloop + +; We've found the end of the argument. X points one character behind it, and +; A contains the terminating character. To make the argument a valid C string, +; replace the terminating character by a zero. + + lda #0 + sta BASIC_BUF-1,x + +; Check if the maximum number of command line arguments is reached. If not, +; parse the next one. + + lda __argc ; Get low byte of argument count + cmp #MAXARGS ; Maximum number of arguments reached? + bcc next ; Parse next one if not + +; (The last vector in argv[] already is NULL.) + +done: lda #<argv + ldx #>argv + sta __argv + stx __argv + 1 + rts + +.segment "INIT" + +term: .res 1 +name: .res NAME_LEN + 1 + +.data + +; char* argv[MAXARGS+1]={name}; +argv: .addr name + .res MAXARGS * 2 diff --git a/libsrc/cx16/mcbdefault.s b/libsrc/cx16/mcbdefault.s new file mode 100644 index 000000000..aed0e3a2d --- /dev/null +++ b/libsrc/cx16/mcbdefault.s @@ -0,0 +1,60 @@ +; +; Default mouse callbacks for the CX16 +; +; 2020-01-10, Greg King +; + + .export _mouse_def_callbacks + + .import MOUSE_GET, SPRITE_SET_POSITION + .include "cx16.inc" + + +; -------------------------------------------------------------------------- +; Hide the mouse pointer. + +hide: ldx #%10000000 + stx gREG::r0H + bra mse + +; -------------------------------------------------------------------------- +; Show the mouse pointer. + +show: ldx #gREG::r0 + jsr MOUSE_GET +mse: lda #$00 ; mouse sprite + jmp SPRITE_SET_POSITION + +; -------------------------------------------------------------------------- +; Prepare to move the mouse pointer. + +prep: ; Fall through + +; -------------------------------------------------------------------------- +; Draw the mouse pointer. + +draw: ; Fall through + +; -------------------------------------------------------------------------- +; Move the mouse pointer X position to the value in .XA . + +movex: ; Already done by Kernal + ; Fall through + +; -------------------------------------------------------------------------- +; Move the mouse pointer Y position to the value in .XA . + +movey: rts ; Already done by Kernal + +; -------------------------------------------------------------------------- +; Callback structure + +.rodata + +_mouse_def_callbacks: + .addr hide + .addr show + .addr prep + .addr draw + .addr movex + .addr movey diff --git a/libsrc/cx16/mou/cx16-std.s b/libsrc/cx16/mou/cx16-std.s new file mode 100644 index 000000000..3af7d2eb3 --- /dev/null +++ b/libsrc/cx16/mou/cx16-std.s @@ -0,0 +1,313 @@ +; +; Driver for the Commander X16 Kernal's mouse driver. +; +; 2022-03-28, Greg King +; + + .include "zeropage.inc" + .include "mouse-kernel.inc" + .include "cx16.inc" + .include "cbm_kernal.inc" + + .macpack module + + +; ------------------------------------------------------------------------ +; Header. Includes jump table + + module_header _cx16_std_mou + +HEADER: + +; Driver signature + + .byte $6d, $6f, $75 ; ASCII "mou" + .byte MOUSE_API_VERSION ; Mouse driver API version number + +; Library reference + + .addr $0000 + +; Jump table + + .addr INSTALL + .addr UNINSTALL + .addr HIDE + .addr SHOW + .addr SETBOX + .addr GETBOX + .addr MOVE + .addr BUTTONS + .addr POS + .addr INFO + .addr IOCTL + .addr IRQ + +; Mouse driver flags + + .byte $00 ; Don't need interrupts + +; Callback table, set by the mouse kernel before INSTALL is called + +CHIDE: jmp $0000 ; Hide the cursor +CSHOW: jmp $0000 ; Show the cursor +CPREP: jmp $0000 ; Prepare to move the cursor +CDRAW: jmp $0000 ; Draw the cursor +CMOVEX: jmp $0000 ; Move the cursor to X coord +CMOVEY: jmp $0000 ; Move the cursor to Y coord + + +;---------------------------------------------------------------------------- +; Constants + +SCREEN_WIDTH = 640 - 1 ; (origin is zero) +SCREEN_HEIGHT = 480 - 1 + +;---------------------------------------------------------------------------- +; Global variables. + +XPos := ptr3 ; Current mouse position, X +YPos := ptr4 ; Current mouse position, Y + +.bss + +Box: +XMin: .res 2 ; X1 value of bounding box +XMax: .res 2 ; X2 value of bounding box +YMin: .res 2 ; Y1 value of bounding box +YMax: .res 2 ; Y2 value of bounding box + +.rodata + +; Default values for above variables +; (We use ".proc" because we want to define both a label and a scope.) + +.proc DefBox + .word 0 ; XMin + .word SCREEN_WIDTH ; XMax + .word 0 ; YMin + .word SCREEN_HEIGHT ; YMax +.endproc + +; These button masks are compatible with the CBM 1351 and the CMD SmartMouse. + +ButtMask: + .byte %00000000 ; No buttons + .byte %00010000 ; Left + .byte %00000001 ; Right + .byte %00010001 ; Left, right + .byte %00000010 ; Middle + .byte %00010010 ; Left, middle + .byte %00000011 ; Middle, right + .byte %00010011 ; Left, middle, right + +.code + +;---------------------------------------------------------------------------- +; INSTALL routine. Is called after the driver is loaded into memory. +; If possible, check if the hardware is present. +; Must return a MOUSE_ERR_xx code in .XA . + +INSTALL: + +; Initialize variables. Just copy the default stuff over. + + ldx #.sizeof(DefBox) - 1 +@L1: lda DefBox,x + sta Box,x + dex + bpl @L1 + + sec ; Get screen geometry + jsr SCREEN_MODE + lda #$01 ; Create sprite + jsr MOUSE_CONFIG + +; Be sure the mouse cursor is invisible, and at the default location. We +; need to do that here, because the mouse interrupt handler might not set +; the mouse position if it hasn't changed. + + jsr CHIDE +.if 0 + lda XPos + ldx XPos+1 + jsr CMOVEX + lda YPos + ldx YPos+1 + jsr CMOVEY +.endif + +; Done, return zero + + ldx #>MOUSE_ERR_OK + txa + rts + +;---------------------------------------------------------------------------- +; UNINSTALL routine -- is called before the driver is removed from memory. +; No return code required (the driver is removed from memory on return). + +UNINSTALL: ; Disable mouse on exit + lda #$00 + tax + jmp MOUSE_CONFIG + +;---------------------------------------------------------------------------- +; HIDE routine -- is called to hide the mouse pointer. The mouse kernel manages +; a counter for calls to show/hide, and the driver entry point is called only +; if the mouse currently is visible, and should get hidden. For most drivers, +; no special action is required besides disabling the mouse cursor. +; No return code required. + +HIDE: jmp CHIDE + +;---------------------------------------------------------------------------- +; SHOW routine -- is called to show the mouse pointer. The mouse kernel manages +; a counter for calls to show/hide, and the driver entry point is called only +; if the mouse currently is hidden, and should become visible. For most drivers, +; no special action is required besides enabling the mouse cursor. +; No return code required. + +SHOW: jmp CSHOW + +;---------------------------------------------------------------------------- +; SETBOX: Set the mouse bounding box. The parameters are passed as they come +; from the C program, that is, a pointer to a mouse_box struct in .XA . +; No checks are done if the mouse is currently inside the box, that is the job +; of the caller. It is not necessary to validate the parameters, trust the +; caller, and save some code here. No return code required. + +SETBOX: sta ptr1 + stx ptr1+1 ; Save data pointer + + lda (ptr1) + ldy #$01 + + php + sei + sta XMin + lda (ptr1),y + sta YMin + iny + lda (ptr1),y + sta XMax + iny + lda (ptr1),y + sta YMax + plp + + rts + +;; Note: SETBOX and GETBOX currently have no effect! + +;---------------------------------------------------------------------------- +; GETBOX: Return the mouse bounding box. The parameters are passed as they +; come from the C program, that is, a pointer to a mouse_box struct in .XA . + +GETBOX: sta ptr1 + stx ptr1+1 ; Save data pointer + + lda XMin + sta (ptr1) + ldy #$01 + lda YMin + sta (ptr1),y + iny + lda XMax + sta (ptr1),y + iny + lda YMax + sta (ptr1),y + rts + +;---------------------------------------------------------------------------- +; MOVE: Put the mouse at a new position. That position is passed as it comes +; from the C program, that is: X on the stack and Y in .XA . The C wrapper +; will remove the parameter from the stack, on return. +; No checks are done to see if the new position is valid (within +; the bounding box or the screen). No return code required. + +;; Note: This function currently has no effect! + +MOVE: php + sei ; No interrupts + + sta YPos + stx YPos+1 ; New Y position + jsr CMOVEY ; Set it + + ldy #$01 + lda (sp),y + sta XPos+1 + tax + dey + lda (sp),y + sta XPos ; New X position + jsr CMOVEX ; Move the cursor + + plp ; Allow interrupts + rts + +;---------------------------------------------------------------------------- +; BUTTONS: Return the CBM 1351 button mask in .XA . + +BUTTONS: + ldx #XPos + jsr MOUSE_GET + + and #%00000111 + tax + lda ButtMask,x + ldx #>$0000 + rts + +;---------------------------------------------------------------------------- +; POS: Return the mouse position in the MOUSE_POS struct pointed to by ptr1. +; No return code required. + +POS: jsr BUTTONS + +POS1: ldy #MOUSE_POS::XCOORD ; Structure offset + lda XPos ; Transfer the position + sta (ptr1),y + lda XPos+1 + iny + sta (ptr1),y + lda YPos + iny + sta (ptr1),y + lda YPos+1 + iny + sta (ptr1),y ; Store last byte + rts ; Done + +;---------------------------------------------------------------------------- +; INFO: Returns mouse position and current button mask in the MOUSE_INFO +; struct pointed to by ptr1. No return code required. +; +; We're cheating here to keep the code smaller: The first fields of the +; mouse_info struct are identical to the mouse_pos struct; so, we just will +; call mouse_pos to initialize the struct pointer, and fill the position +; fields. + +INFO: jsr BUTTONS ; Will not touch ptr1 + ldy #MOUSE_INFO::BUTTONS + sta (ptr1),y + jmp POS1 + +;---------------------------------------------------------------------------- +; IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl +; specific data in ptr1, and the ioctl code in A. +; Must return an error code in .XA . + +IOCTL: lda #<MOUSE_ERR_INV_IOCTL ; We don't support ioctls, for now + ldx #>MOUSE_ERR_INV_IOCTL +; rts ; Fall through + +;---------------------------------------------------------------------------- +; IRQ: Irq handler entry point. Called as a subroutine but in IRQ context +; (so be careful). The routine MUST return carry set if the interrupt has been +; 'handled' -- which means that the interrupt source is gone. Otherwise, it +; MUST return carry clear. + +IRQ: rts ; Kernal ROM does this routine's job diff --git a/libsrc/cx16/mouse_stat_stddrv.s b/libsrc/cx16/mouse_stat_stddrv.s new file mode 100644 index 000000000..8e0a3ed53 --- /dev/null +++ b/libsrc/cx16/mouse_stat_stddrv.s @@ -0,0 +1,11 @@ +; +; Address of the static standard mouse driver +; +; 2019-11-08, Greg King +; +; const void mouse_static_stddrv[]; +; + + .import _cx16_std_mou + + .export _mouse_static_stddrv := _cx16_std_mou diff --git a/libsrc/cx16/mouse_stddrv.s b/libsrc/cx16/mouse_stddrv.s new file mode 100644 index 000000000..d708bb668 --- /dev/null +++ b/libsrc/cx16/mouse_stddrv.s @@ -0,0 +1,13 @@ +; +; Name of the standard mouse driver +; +; 2019-11-08, Greg King +; +; const char mouse_stddrv[]; +; + + .export _mouse_stddrv + +.rodata + +_mouse_stddrv: .asciiz "cx16-std.mou" diff --git a/libsrc/cx16/randomize.s b/libsrc/cx16/randomize.s new file mode 100644 index 000000000..3d965c82a --- /dev/null +++ b/libsrc/cx16/randomize.s @@ -0,0 +1,14 @@ +; +; 2020-05-02, Greg King +; +; void _randomize (void); +; /* Initialize the random number generator */ +; + + .export __randomize + + .import ENTROPY_GET, _srand + +__randomize: + jsr ENTROPY_GET + jmp _srand ; Initialize generator diff --git a/libsrc/cx16/revers.s b/libsrc/cx16/revers.s new file mode 100644 index 000000000..300237ee8 --- /dev/null +++ b/libsrc/cx16/revers.s @@ -0,0 +1,23 @@ +; +; 2019-09-16, Greg King +; +; unsigned char __fastcall__ revers (unsigned char onoff); +; + + .export _revers + + .include "cx16.inc" + +.proc _revers + ldy #$00 ; Assume revers off + tax ; Test on/off + beq :+ ; Jump if off + ldy #$80 ; Load "on" value + ldx #>$0000 ; Zero high byte of result +: lda RVS ; Load old value + sty RVS ; Set new value + clc + rol a ; Convert bit-mask into boolean + rol a + rts +.endproc diff --git a/libsrc/cx16/set_tv.s b/libsrc/cx16/set_tv.s new file mode 100644 index 000000000..1779e895e --- /dev/null +++ b/libsrc/cx16/set_tv.s @@ -0,0 +1,20 @@ +; +; 2020-05-02, Greg King +; +; void __fastcall__ set_tv (unsigned char); +; /* Set the video mode the machine will use. */ +; + + .export _set_tv + + .include "cx16.inc" + + +.proc _set_tv + stz VERA::CTRL ; Use display register bank 0 + eor VERA::DISP::VIDEO + and #%00000111 + eor VERA::DISP::VIDEO ; Replace old mode with new mode + sta VERA::DISP::VIDEO + rts +.endproc diff --git a/libsrc/cx16/settime.s b/libsrc/cx16/settime.s new file mode 100644 index 000000000..81749f508 --- /dev/null +++ b/libsrc/cx16/settime.s @@ -0,0 +1,55 @@ +; +; 2019-12-27, Greg King +; +; int __fastcall__ clock_settime (clockid_t clk_id, const struct timespec *tp); +; + + .include "time.inc" + .include "cx16.inc" + + .importzp ptr1 + .import pushax, pusheax, ldax0sp, ldeaxidx + .import tosdiveax, incsp3, return0 + .import load_jiffy + .import CLOCK_SET_DATE_TIME + + +.macro COPY reg, offset + ldy #offset + lda (ptr1),y + sta gREG::reg +.endmac + +;---------------------------------------------------------------------------- + +.proc _clock_settime + + jsr pushax + + .assert timespec::tv_sec = 0, error + jsr _localtime + sta ptr1 + stx ptr1+1 + + COPY r0L, tm::tm_year + COPY r0H, tm::tm_mon + inc gREG::r0H + COPY r1L, tm::tm_mday + COPY r1H, tm::tm_hour + COPY r2L, tm::tm_min + COPY r2H, tm::tm_sec + + jsr ldax0sp ; Get tp + ldy #timespec::tv_nsec+3 + jsr ldeaxidx ; Get nanoseconds + jsr pusheax + jsr load_jiffy + jsr tosdiveax + sta gREG::r3L ; Put number of jiffies + + jsr CLOCK_SET_DATE_TIME + + jsr incsp3 + jmp return0 + +.endproc diff --git a/libsrc/cx16/sprites_enable.s b/libsrc/cx16/sprites_enable.s new file mode 100644 index 000000000..73924233c --- /dev/null +++ b/libsrc/cx16/sprites_enable.s @@ -0,0 +1,34 @@ +; +; 2020-05-02, Greg King +; +; unsigned char __fastcall__ vera_sprites_enable (unsigned char mode); +; /* Enable the sprite engine when mode is non-zero (true); +; ** disable sprites when mode is zero. Return the previous mode. +; */ +; + + .export _vera_sprites_enable + + .include "cx16.inc" + + +.proc _vera_sprites_enable + stz VERA::CTRL ; Use display register bank 0 + tax ; Is mode true? + beq :+ + lda #VERA::DISP::ENABLE::SPRITES ; Yes +: ldy VERA::DISP::VIDEO + + eor VERA::DISP::VIDEO + and #VERA::DISP::ENABLE::SPRITES + eor VERA::DISP::VIDEO ; Replace old flag with new flag + sta VERA::DISP::VIDEO + + tya + and #VERA::DISP::ENABLE::SPRITES ; Get old value + asl a + asl a + rol a ; Make it boolean + ldx #>$0000 + rts +.endproc diff --git a/libsrc/cx16/sysuname.s b/libsrc/cx16/sysuname.s new file mode 100644 index 000000000..4aefb7cf5 --- /dev/null +++ b/libsrc/cx16/sysuname.s @@ -0,0 +1,37 @@ +; +; 2003-08-12, Ullrich von Bassewitz +; 2019-09-08, Greg King +; +; unsigned char __fastcall__ _sysuname (struct utsname* buf); +; + + .export __sysuname, utsdata + + .import utscopy + +__sysuname := utscopy + +;-------------------------------------------------------------------------- +; Data. We define a fixed utsname struct here, and just copy it. + +.rodata + +utsdata: + ; sysname + .asciiz "cc65" + + ; nodename + .asciiz "" + + ; release + .byte ((.VERSION >> 8) & $0F) + '0' + .byte '.' + .byte ((.VERSION >> 4) & $0F) + '0' + .byte $00 + + ; version + .byte (.VERSION & $0F) + '0' + .byte $00 + + ; machine + .asciiz "Commander X16" diff --git a/libsrc/cx16/tgi/cx320p1.s b/libsrc/cx16/tgi/cx320p1.s new file mode 100644 index 000000000..2fcd9adf3 --- /dev/null +++ b/libsrc/cx16/tgi/cx320p1.s @@ -0,0 +1,396 @@ +; +; Graphics driver for the 320 pixels across, 240 pixels down, 256 colors mode +; on the Commander X16 +; +; 2022-03-30, Greg King <gregdk@users.sf.net> +; + + .include "zeropage.inc" + + .include "tgi-kernel.inc" + .include "tgi-error.inc" + + .include "cbm_kernal.inc" + .include "cx16.inc" + + .macpack generic + .macpack module + + +; Macro that copies a word into a pseudo-register + +.mac setReg reg, src + lda src + ldx src+1 + sta gREG::reg + stx gREG::reg+1 +.endmac + + +; ------------------------------------------------------------------------ +; Header. Includes jump table and constants. + + module_header _cx320p1_tgi ; 320 pixels across, 1 pixel per byte + +; First part of the header is a structure that has a signature, +; and defines the capabilities of the driver. + + .byte $74, $67, $69 ; ASCII "tgi" + .byte TGI_API_VERSION ; TGI API version number + .addr $0000 ; Library reference + .word 320 ; X resolution + .word 240 ; Y resolution + .byte <$0100 ; Number of drawing colors + .byte 1 ; Number of screens available + .byte 8 ; System font X size + .byte 8 ; System font Y size + .word $0100 ; Aspect ratio (based on VGA display) + .byte 0 ; TGI driver flags + +; Next, comes the jump table. Currently, all entries must be valid, +; and may point to an RTS for test versions (function not implemented). + + .addr INSTALL + .addr UNINSTALL + .addr INIT + .addr DONE + .addr GETERROR + .addr CONTROL + .addr CLEAR + .addr SETVIEWPAGE + .addr SETDRAWPAGE + .addr SETCOLOR + .addr SETPALETTE + .addr GETPALETTE + .addr GETDEFPALETTE + .addr SETPIXEL + .addr GETPIXEL + .addr LINE + .addr BAR + .addr TEXTSTYLE + .addr OUTTEXT + + +; ------------------------------------------------------------------------ +; Constant + +GRAPH320 = $80 + +; ------------------------------------------------------------------------ +; Data + +; Variables mapped to the zero-page segment variables. Some of these are +; used for passing parameters to the driver. + +X1 := ptr1 +Y1 := ptr2 +X2 := ptr3 +Y2 := ptr4 + +; Absolute variables used in the code + +.bss + +; The colors are indicies into a TGI palette. The TGI palette is indicies into +; VERA's palette. Vera's palette is a table of Red, Green, and Blue levels. +; The first 16 RGB elements mimic the Commodore 64's colors. + +defpalette: .res $0100 +palette: .res $0100 + +bcolor := palette + 0 ; Background color +color: .res 1 ; Stroke and fill index +text_mode: .res 1 ; Old text mode + +.data + +error: .byte TGI_ERR_OK ; Error code + + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. May +; initialize anything that has to be done just once. Is probably empty +; most of the time. +; +; Must set an error code: NO + +INSTALL: +; Create the default palette. + + ldx #$00 +: txa + sta defpalette,x + inx + bnz :- + + ; Fall through. + +; ------------------------------------------------------------------------ +; UNINSTALL routine. Is called before the driver is removed from memory. May +; clean up anything done by INSTALL, but is probably empty most of the time. +; +; Must set an error code: NO + +UNINSTALL: + rts + +; ------------------------------------------------------------------------ +; INIT: Changes an already installed device from text mode to graphics +; mode. +; Note that INIT/DONE may be called multiple times while the driver +; is loaded, while INSTALL is called only once; so, any code that is needed +; to initiate variables and so on must go here. Setting the palette is not +; needed because that is called by the graphics kernel later. +; The graphics kernel never will call INIT when a graphics mode already is +; active, so there is no need to protect against that. +; +; Must set an error code: YES + +INIT: stz error ; #TGI_ERR_OK + +; Save the current text mode. + + sec + jsr SCREEN_MODE + sta text_mode + +; Switch into (320 x 240 x 256) graphics mode. + + lda #GRAPH320 + clc + jmp SCREEN_MODE + +; ------------------------------------------------------------------------ +; DONE: Will be called to switch the graphics device back into text mode. +; The graphics kernel never will call DONE when no graphics mode is active, +; so there is no need to protect against that. +; +; Must set an error code: NO + +DONE: + lda text_mode + clc + jmp SCREEN_MODE + +; ------------------------------------------------------------------------ +; GETERROR: Return the error code in .A, and clear it. + +GETERROR: + lda error + stz error + rts + +; ------------------------------------------------------------------------ +; CONTROL: Platform-/driver-specific entry point. +; +; Must set an error code: YES + +CONTROL: + lda #TGI_ERR_INV_FUNC + sta error + rts + +; ------------------------------------------------------------------------ +; CLEAR: Clear the screen. +; +; Must set an error code: NO + +CLEAR := GRAPH_CLEAR + +; ------------------------------------------------------------------------ +; SETVIEWPAGE: Set the visible page. Called with the new page in .A (0..n-1). +; The page number already is checked to be valid by the graphics kernel. +; +; Must set an error code: NO (will be called only if page OK) + +SETVIEWPAGE: + + ; Fall through. + +; ------------------------------------------------------------------------ +; SETDRAWPAGE: Set the drawable page. Called with the new page in .A (0..n-1). +; The page number already is checked to be valid by the graphics kernel. +; +; Must set an error code: NO (will be called only if page OK) + +SETDRAWPAGE: + rts + +; ------------------------------------------------------------------------ +; SETPALETTE: Set the palette (not available with all drivers/hardware). +; A pointer to the palette is passed in ptr1. Must set an error if palettes +; are not supported +; +; Must set an error code: YES + +SETPALETTE: + stz error ; #TGI_ERR_OK + ldy #$00 +: lda (ptr1),y + sta palette,y + iny + bnz :- + + lda color ; Get stroke and fill index + + ; Fall through. + +; ------------------------------------------------------------------------ +; SETCOLOR: Set the drawing color (in .A). The new color already is checked +; to be in a valid range (0..maxcolor). +; +; Must set an error code: NO (will be called only if color OK) + +SETCOLOR: + tax + sta color + lda palette,x ; Set stroke and fill color + tax + ldy bcolor ; Get background color + jmp GRAPH_SET_COLORS + +; ------------------------------------------------------------------------ +; GETPALETTE: Return the current palette in .XA. Even drivers that cannot +; set the palette should return the default palette here, so there's no +; way for this function to fail. +; +; Must set an error code: NO + +GETPALETTE: + lda #<palette + ldx #>palette + rts + +; ------------------------------------------------------------------------ +; GETDEFPALETTE: Return the default palette for the driver in .XA. All +; drivers should return something reasonable here, even drivers that don't +; support palettes, otherwise the caller has no way to determine the colors +; of the (not changable) palette. +; +; Must set an error code: NO (all drivers must have a default palette) + +GETDEFPALETTE: + lda #<defpalette + ldx #>defpalette + rts + +; ------------------------------------------------------------------------ +; SETPIXEL: Draw one pixel at X1/Y1 = ptr1/ptr2 with the current drawing +; color. The co-ordinates passed to this function never are outside the +; visible screen area, so there is no need for clipping inside this function. +; +; Must set an error code: NO + +SETPIXEL: + jsr Point + jsr FB_CURSOR_POSITION + ldx color + lda palette,x + jmp FB_SET_PIXEL + +; ------------------------------------------------------------------------ +; GETPIXEL: Read the color value of a pixel, and return it in .XA. The +; co-ordinates passed to this function never are outside the visible screen +; area, so there is no need for clipping inside this function. + +GETPIXEL: + jsr Point + jsr FB_CURSOR_POSITION + jsr FB_GET_PIXEL + ldx #>$0000 + rts + +; ------------------------------------------------------------------------ +; LINE: Draw a line from X1/Y1 to X2/Y2, where X1/Y1 = ptr1/ptr2 and +; X2/Y2 = ptr3/ptr4, using the current drawing color. +; +; Must set an error code: NO + +LINE: jsr Point + setReg r2, X2 + setReg r3, Y2 + jmp GRAPH_DRAW_LINE + +; ------------------------------------------------------------------------ +; BAR: Draw a filled rectangle with the corners X1/Y1, X2/Y2, where +; X1/Y1 = ptr1/ptr2 and X2/Y2 = ptr3/ptr4, using the current drawing color. +; Contrary to most other functions, the graphics kernel will sort and clip +; the co-ordinates before calling the driver; so on entry, the following +; conditions are valid: +; X1 <= X2 +; Y1 <= Y2 +; (X1 >= 0) && (X1 < XRES) +; (X2 >= 0) && (X2 < XRES) +; (Y1 >= 0) && (Y1 < YRES) +; (Y2 >= 0) && (Y2 < YRES) +; +; Must set an error code: NO + +BAR: +; Set the starting corner. + + jsr Point + +; Set the width. + + lda X2 + sub X1 + sta gREG::r2 + lda X2+1 + sbc X1+1 + sta gREG::r2+1 + +; Set the height. + + lda Y2 + sub Y1 + sta gREG::r3 + lda Y2+1 + sbc Y1+1 + sta gREG::r3+1 + +; Set the corner radius. + + stz gREG::r4 + stz gREG::r4+1 + + sec ; Fill the rectangle + jmp GRAPH_DRAW_RECT + +; ------------------------------------------------------------------------ +; TEXTSTYLE: Set the style used when calling OUTTEXT. Text scaling in X and Y +; directions are passed in .X and .Y, the text direction is passed in .A. +; +; Must set an error code: NO + +TEXTSTYLE: + rts + +; ------------------------------------------------------------------------ +; OUTTEXT: Output text at X/Y = ptr1/ptr2 using the current color and the +; current text style. The text to output is given as a zero-terminated +; string with address in ptr3. +; +; Must set an error code: NO + +OUTTEXT: + jsr Point + + ldy #$00 +@next: lda (ptr3),y + bze @end + phy + jsr GRAPH_PUT_CHAR + ply + iny + bnz @next +@end: rts + +; ------------------------------------------------------------------------ +; Point: Set the arguments for the first point of a Kernal graphics function. + +Point: setReg r0, X1 + setReg r1, Y1 + rts diff --git a/libsrc/cx16/tgi_stat_stddrv.s b/libsrc/cx16/tgi_stat_stddrv.s new file mode 100644 index 000000000..e3cec1c8c --- /dev/null +++ b/libsrc/cx16/tgi_stat_stddrv.s @@ -0,0 +1,11 @@ +; +; Address of the static standard TGI driver +; +; 2020-06-04, Greg King +; +; const void tgi_static_stddrv[]; +; + + .import _cx320p1_tgi ; 320 pixels across, 1 pixel per byte + + .export _tgi_static_stddrv := _cx320p1_tgi diff --git a/libsrc/cx16/tgi_stddrv.s b/libsrc/cx16/tgi_stddrv.s new file mode 100644 index 000000000..f05ab7131 --- /dev/null +++ b/libsrc/cx16/tgi_stddrv.s @@ -0,0 +1,14 @@ +; +; Name of the standard TGI driver +; +; 2020-06-04, Greg King +; +; const char tgi_stddrv[]; +; + + .export _tgi_stddrv + +; A FAT32 8+3 file-name (for SD cards) + +.rodata +_tgi_stddrv: .asciiz "cx320p1.tgi" diff --git a/libsrc/cx16/tmcommon.s b/libsrc/cx16/tmcommon.s new file mode 100644 index 000000000..0eed245dc --- /dev/null +++ b/libsrc/cx16/tmcommon.s @@ -0,0 +1,40 @@ +; +; 2019-12-27, Greg King +; +; Common stuff for the clock routines +; + + .export TM, load_jiffy + + .importzp sreg + + +;---------------------------------------------------------------------------- +; Load .EAX with the approximate number of nanoseconds +; in one jiffy (1/60th of a second). + +.proc load_jiffy + + lda #<(17 * 1000 * 1000 / $10000) + ldx #>(17 * 1000 * 1000 / $10000) + sta sreg + stx sreg+1 + lda #<(17 * 1000 * 1000) + ldx #>(17 * 1000 * 1000) + rts + +.endproc + +;---------------------------------------------------------------------------- +; TM struct with "is daylight-saving time" set to "unknown" +.data + +TM: .word 0 ; tm_sec + .word 0 ; tm_min + .word 0 ; tm_hour + .word 0 ; tm_mday + .word 0 ; tm_mon + .word 0 ; tm_year + .word 0 ; tm_wday + .word 0 ; tm_yday + .word .loword(-1) ; tm_isdst diff --git a/libsrc/cx16/vaddr0.s b/libsrc/cx16/vaddr0.s new file mode 100644 index 000000000..384bf3503 --- /dev/null +++ b/libsrc/cx16/vaddr0.s @@ -0,0 +1,19 @@ +; +; 2019-12-22, Greg King +; +; Set the __far__ address that VERA will use for data access. +; This is a support function for the fastcall functions vpeek() and vpoke(). +; + + .export vaddr0 + + .importzp sreg + .include "cx16.inc" + + +vaddr0: stz VERA::CTRL ; set address for VERA's data port zero + ldy sreg + sta VERA::ADDR + stx VERA::ADDR+1 + sty VERA::ADDR+2 + rts diff --git a/libsrc/cx16/videomode.s b/libsrc/cx16/videomode.s new file mode 100644 index 000000000..998316858 --- /dev/null +++ b/libsrc/cx16/videomode.s @@ -0,0 +1,46 @@ +; +; 2022-03-28, Greg King +; +; /* Video mode defines */ +; #define VIDEOMODE_80x60 0x00 +; #define VIDEOMODE_80x30 0x01 +; #define VIDEOMODE_40x60 0x02 +; #define VIDEOMODE_40x30 0x03 +; #define VIDEOMODE_40x15 0x04 +; #define VIDEOMODE_20x30 0x05 +; #define VIDEOMODE_20x15 0x06 +; #define VIDEOMODE_320x240 0x80 +; #define VIDEOMODE_SWAP (-1) +; +; signed char __fastcall__ videomode (signed char Mode); +; /* Set the video mode, return the old mode. +; ** Return -1 if Mode isn't valid. +; ** Call with one of the VIDEOMODE_xx constants. +; */ +; + + .export _videomode + + .import SCREEN_MODE + + +.proc _videomode + sec ; Get old mode + pha + jsr SCREEN_MODE + plx + pha ; Save old mode + txa + clc ; Set new mode + jsr SCREEN_MODE + + pla ; Get back old mode + ldx #>$0000 ; Clear high byte + bcc @L1 + +; The new mode is invalid. Return -1. + + dex + txa +@L1: rts +.endproc diff --git a/libsrc/cx16/vpeek.s b/libsrc/cx16/vpeek.s new file mode 100644 index 000000000..80d4d536f --- /dev/null +++ b/libsrc/cx16/vpeek.s @@ -0,0 +1,17 @@ +; +; 2019-12-22, Greg King +; +; unsigned char fastcall vpeek (unsigned long addr); +; /* Get a byte from a location in VERA's internal address space. */ +; + + .export _vpeek + + .import vaddr0 + .include "cx16.inc" + + +_vpeek: jsr vaddr0 ; put VERA's address + ldx #>$0000 + lda VERA::DATA0 ; read VERA port zero + rts diff --git a/libsrc/cx16/vpoke.s b/libsrc/cx16/vpoke.s new file mode 100644 index 000000000..2c8497a5b --- /dev/null +++ b/libsrc/cx16/vpoke.s @@ -0,0 +1,19 @@ +; +; 2019-12-22, Greg King +; +; void fastcall vpoke (unsigned char data, unsigned long addr); +; /* Put a byte into a location in VERA's internal address space. +; ** (addr is second instead of first for the sake of code efficiency.) +; */ +; + + .export _vpoke + + .import vaddr0, popa + .include "cx16.inc" + + +_vpoke: jsr vaddr0 ; put VERA's address + jsr popa + sta VERA::DATA0 ; write data to VERA port zero + rts diff --git a/libsrc/cx16/waitvsync.s b/libsrc/cx16/waitvsync.s new file mode 100644 index 000000000..dc0509223 --- /dev/null +++ b/libsrc/cx16/waitvsync.s @@ -0,0 +1,21 @@ +; +; 2021-04-01, Greg King +; +; void waitvsync (void); +; /* Wait for the start of the next video field. */ +; +; VERA's vertical sync causes IRQs which increment the jiffy timer. +; + + .export _waitvsync + + .include "cx16.inc" + +_waitvsync: + ldx RAM_BANK ; (TIMER is in RAM bank 0) + stz RAM_BANK + lda TIMER + 2 +: cmp TIMER + 2 + beq :- ; Wait for next jiffy + stx RAM_BANK + rts diff --git a/libsrc/cx16/wherex.s b/libsrc/cx16/wherex.s new file mode 100644 index 000000000..56f423592 --- /dev/null +++ b/libsrc/cx16/wherex.s @@ -0,0 +1,15 @@ +; +; 2019-11-06, Greg King +; +; unsigned char wherex (void); +; + + .export _wherex + + .include "cx16.inc" + +.proc _wherex + lda CURS_X + ldx #>$0000 + rts +.endproc diff --git a/libsrc/cx16/wherey.s b/libsrc/cx16/wherey.s new file mode 100644 index 000000000..396a2d14e --- /dev/null +++ b/libsrc/cx16/wherey.s @@ -0,0 +1,15 @@ +; +; 2019-11-06, Greg King +; +; unsigned char wherey (void); +; + + .export _wherey + + .include "cx16.inc" + +.proc _wherey + lda CURS_Y + ldx #>$0000 + rts +.endproc diff --git a/libsrc/dbg/asmtab.s b/libsrc/dbg/asmtab.s index 3d27aea1f..fdeedaa48 100644 --- a/libsrc/dbg/asmtab.s +++ b/libsrc/dbg/asmtab.s @@ -57,5 +57,5 @@ MnemoTab2: .byte $C4,$CA,$26,$48,$44,$44,$A2,$C8 - + diff --git a/libsrc/dbg/dbg.c b/libsrc/dbg/dbg.c index 8b09484f6..832ed0a20 100644 --- a/libsrc/dbg/dbg.c +++ b/libsrc/dbg/dbg.c @@ -16,7 +16,6 @@ #include <dbg.h> - /*****************************************************************************/ /* Function forwards */ /*****************************************************************************/ @@ -32,7 +31,7 @@ static char DumpHandler (void); static char HelpHandler (void); /* Forwards for other functions */ -static void DisplayPrompt (char* s); +static void DisplayPrompt (const char* s); static void SingleStep (char StepInto); static void RedrawStatic (char Frame); static void Redraw (char Frame); @@ -166,7 +165,7 @@ extern unsigned DbgHI; /* High 16 bit of primary reg */ typedef struct { unsigned char x; unsigned char y; - char* text; + const char* text; } TextDesc; /* Window descriptor */ @@ -181,13 +180,13 @@ typedef struct { unsigned char fd_visible; /* Is the window currently visible? */ char (*fd_func) (void); /* Handler function */ unsigned char fd_textcount; /* Number of text lines to print */ - TextDesc* fd_text; /* Static text in the window */ + const TextDesc* fd_text; /* Static text in the window */ } FrameDesc; /* Texts for the windows */ -static TextDesc RegText [] = { +static const TextDesc RegText [] = { { 1, 0, "PC" }, { 1, 1, "SR" }, { 1, 2, "A" }, @@ -197,7 +196,7 @@ static TextDesc RegText [] = { { 1, 6, "CS" }, { 1, 7, "HI" } }; -static TextDesc HelpText [] = { +static const TextDesc HelpText [] = { { 1, 0, "F1, ? Help" }, { 1, 1, "F2, t Toggle breakpoint" }, { 1, 2, "F3, u Run until subroutine returns" }, @@ -220,7 +219,7 @@ static TextDesc HelpText [] = { /* Window data */ -static FrameDesc AsmFrame = { +static const FrameDesc AsmFrame = { CH_ULCORNER, CH_TTEE, CH_LTEE, CH_CROSS, 0, 0, MAX_X - 10, 15, MAX_X - 11, 14, @@ -228,7 +227,7 @@ static FrameDesc AsmFrame = { AsmHandler, 0, 0 }; -static FrameDesc RegFrame = { +static const FrameDesc RegFrame = { CH_TTEE, CH_URCORNER, CH_LTEE, CH_RTEE, MAX_X - 10, 0, MAX_X - 1, 9, 8, 8, @@ -236,7 +235,7 @@ static FrameDesc RegFrame = { RegHandler, sizeof (RegText) / sizeof (RegText [0]), RegText }; -static FrameDesc StackFrame = { +static const FrameDesc StackFrame = { CH_LTEE, CH_RTEE, CH_CROSS, CH_RTEE, MAX_X - 10, 9, MAX_X - 1, 15, 8, 5, @@ -244,7 +243,7 @@ static FrameDesc StackFrame = { StackHandler, 0, 0 }; -static FrameDesc CStackFrame = { +static const FrameDesc CStackFrame = { CH_CROSS, CH_RTEE, CH_BTEE, CH_LRCORNER, MAX_X - 10, 15, MAX_X - 1, MAX_Y - 1, 8, MAX_Y - 17, @@ -252,7 +251,7 @@ static FrameDesc CStackFrame = { CStackHandler, 0, 0 }; -static FrameDesc DumpFrame = { +static const FrameDesc DumpFrame = { CH_LTEE, CH_CROSS, CH_LLCORNER, CH_BTEE, 0, 15, MAX_X - 10, MAX_Y-1, MAX_X - 11, MAX_Y - 17, @@ -260,7 +259,7 @@ static FrameDesc DumpFrame = { DumpHandler, 0, 0 }; -static FrameDesc HelpFrame = { +static const FrameDesc HelpFrame = { CH_ULCORNER, CH_URCORNER, CH_LLCORNER, CH_LRCORNER, 0, 0, MAX_X - 1, MAX_Y-1, MAX_X - 2, MAX_Y - 2, @@ -268,7 +267,7 @@ static FrameDesc HelpFrame = { HelpHandler, sizeof (HelpText) / sizeof (HelpText [0]), HelpText }; -static FrameDesc* Frames [] = { +static const FrameDesc* const Frames [] = { &AsmFrame, &RegFrame, &StackFrame, @@ -297,7 +296,7 @@ static unsigned char StackAddr; /* Start address of output */ /* Prompt line data */ -static char* ActivePrompt = 0; /* Last prompt line displayed */ +static const char* ActivePrompt = 0; /* Last prompt line displayed */ static char PromptColor; /* Color behind prompt */ static char PromptLength; /* Length of current prompt string */ @@ -346,10 +345,10 @@ BreakPoint* DbgIsBreak (unsigned Addr); -static void DrawFrame (register FrameDesc* F, char Active) +static void DrawFrame (register const FrameDesc* F, char Active) /* Draw one window frame */ { - TextDesc* T; + const TextDesc* T; unsigned char Count; unsigned char tl, tr, bl, br; unsigned char x1, y1, width; @@ -410,7 +409,7 @@ static void DrawFrames (void) /* Draw all frames */ { unsigned char I; - FrameDesc* F; + const FrameDesc* F; /* Build the frame layout of the screen */ for (I = 0; I < sizeof (Frames) / sizeof (Frames [0]); ++I) { @@ -427,7 +426,7 @@ static void ActivateFrame (int Num, unsigned char Clear) /* Activate a new frame, deactivate the old one */ { unsigned char y; - register FrameDesc* F; + register const FrameDesc* F; if (ActiveFrame != Num) { @@ -462,7 +461,7 @@ static void ActivateFrame (int Num, unsigned char Clear) -static void DisplayPrompt (char* s) +static void DisplayPrompt (const char* s) /* Display a prompt */ { unsigned char OldColor; @@ -626,11 +625,11 @@ static char InputHex (char* Prompt, unsigned* Val) -static void ErrorPrompt (char* Msg) +static void ErrorPrompt (const char* Msg) /* Display an error message and wait for a key */ { /* Save the current prompt */ - char* OldPrompt = ActivePrompt; + const char* OldPrompt = ActivePrompt; /* Display the new one */ DisplayPrompt (Msg); @@ -1580,7 +1579,11 @@ void DbgEntry (void) case 'q': /* Quit program */ clrscr (); - exit (1); + + /* Exit intentionally with error because one may + ** say that DbgEntry is always abnormal. + */ + exit (EXIT_FAILURE); } } diff --git a/libsrc/dbg/dbgdasm.s b/libsrc/dbg/dbgdasm.s index 9899c0add..cd1287a8a 100644 --- a/libsrc/dbg/dbgdasm.s +++ b/libsrc/dbg/dbgdasm.s @@ -77,7 +77,7 @@ disassret: inx ; Adjust for opcode byte txa ldx #$00 ; Clear high byte - rts + rts ; ------------------------------------------------------------------------- ; Helper functions diff --git a/libsrc/dbg/dbgsupp.s b/libsrc/dbg/dbgsupp.s index 9f044c728..b1f122013 100644 --- a/libsrc/dbg/dbgsupp.s +++ b/libsrc/dbg/dbgsupp.s @@ -6,7 +6,7 @@ .export _DbgInit .export _DbgSP, _DbgCS, _DbgHI - .import popax, return0, _DbgEntry, _set_brk, _end_brk + .import popptr1, return0, _DbgEntry, _set_brk, _end_brk .import _DbgBreaks .import _brk_pc .import __ZP_START__ ; Linker generated @@ -58,7 +58,7 @@ DbgBreak: .res 256 DbgStack: -; Swap space for the the C temporaries +; Swap space for the C temporaries CTemp: _DbgCS: .res 2 ; sp @@ -170,9 +170,7 @@ L12: ldy #1 ; Force != 0 .export _DbgIsBreak _DbgIsBreak: - jsr popax ; Get address - sta ptr1 - stx ptr1+1 + jsr popptr1 ; Get address ldx #0 L20: lda _DbgBreaks+3,x ; Get bk_use beq L21 ; Jump if not set diff --git a/libsrc/em/em-kernel.s b/libsrc/em/em-kernel.s index c982dac88..d5be0ae23 100644 --- a/libsrc/em/em-kernel.s +++ b/libsrc/em/em-kernel.s @@ -36,7 +36,7 @@ emd_sig: .byte $65, $6d, $64, EMD_API_VERSION ; "emd", version ;---------------------------------------------------------------------------- -; unsigned char __fastcall__ em_install (void* driver); +; unsigned char __fastcall__ em_install (const void* driver); ; /* Install the driver once it is loaded */ diff --git a/libsrc/em/em_load.s b/libsrc/em/em_load.s index 1e4a364e2..39abbc8a5 100644 --- a/libsrc/em/em_load.s +++ b/libsrc/em/em_load.s @@ -29,7 +29,7 @@ ctrl: .addr _read .res 2 ; MODULE .res 2 ; MODULE_SIZE .res 2 ; MODULE_ID - + ;---------------------------------------------------------------------------- ; Code diff --git a/libsrc/gamate/chline.s b/libsrc/gamate/chline.s index 2d96c9d2f..4d4ebe2dc 100644 --- a/libsrc/gamate/chline.s +++ b/libsrc/gamate/chline.s @@ -6,15 +6,14 @@ ; .export _chlinexy, _chline - .import popa, _gotoxy, cputdirect + .import gotoxy, cputdirect .importzp tmp1 .include "gamate.inc" _chlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length _chline: diff --git a/libsrc/gamate/clock.s b/libsrc/gamate/clock.s index 223c07967..98ad54624 100644 --- a/libsrc/gamate/clock.s +++ b/libsrc/gamate/clock.s @@ -23,7 +23,7 @@ .endproc - .segment "INIT" + .segment "ONCE" initclock: lda #0 ldx #3 diff --git a/libsrc/gamate/conio.s b/libsrc/gamate/conio.s index a43eeb1a3..33437cc04 100644 --- a/libsrc/gamate/conio.s +++ b/libsrc/gamate/conio.s @@ -1,6 +1,7 @@ .include "gamate.inc" .include "extzp.inc" + .import fontdata .import colors .importzp ptr1, tmp1 @@ -8,11 +9,12 @@ .macpack longbranch - .segment "INIT" + .segment "ONCE" initconio: lda #0 sta LCD_XPOS sta LCD_YPOS + sta RVS lda #LCD_MODE_INC_Y sta LCD_MODE @@ -23,8 +25,3 @@ initconio: sta BGCOLOR rts - .segment "RODATA" - - .export fontdata -fontdata: - .include "vga.inc" diff --git a/libsrc/gamate/cputc.s b/libsrc/gamate/cputc.s index c7b11c8c9..a5d591d1e 100644 --- a/libsrc/gamate/cputc.s +++ b/libsrc/gamate/cputc.s @@ -5,7 +5,7 @@ .export _cputcxy, _cputc, cputdirect, putchar .export newline, plot - .import popa, _gotoxy + .import gotoxy .import PLOT .import xsize .import fontdata @@ -19,8 +19,7 @@ _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C ; Plot a character - also used as internal function @@ -90,16 +89,17 @@ putchar: adc #>(fontdata-$f8) sta ptr3+1 - lda CHARCOLOR - and #1 - beq @skip_plane1 - lda #LCD_XPOS_PLANE1 clc adc CURS_X sta LCD_X - ldy #$f8 + ldy #$F8 + + lda CHARCOLOR + lsr + bcc @delete1 + @copylp1: lda (ptr3),y eor RVS @@ -107,11 +107,16 @@ putchar: iny bne @copylp1 -@skip_plane1: + beq @skip_delete1 - lda CHARCOLOR - and #2 - beq @skip_plane2 +@delete1: + lda #$00 +@del1: + sta LCD_DATA + iny + bne @del1 + +@skip_delete1: lda #LCD_XPOS_PLANE2 clc @@ -122,7 +127,12 @@ putchar: lda _plotlo,x sta LCD_Y - ldy #$f8 + ldy #$F8 + + lda CHARCOLOR + and #2 + beq @delete2 + @copylp2: lda (ptr3),y eor RVS @@ -130,7 +140,16 @@ putchar: iny bne @copylp2 -@skip_plane2: + beq @skip_delete2 + +@delete2: + lda #$00 +@del2: + sta LCD_DATA + iny + bne @del2 + +@skip_delete2: pla tax ldy CURS_X diff --git a/libsrc/gamate/crt0.s b/libsrc/gamate/crt0.s index ead45b7ea..5a5bb3aa0 100644 --- a/libsrc/gamate/crt0.s +++ b/libsrc/gamate/crt0.s @@ -20,7 +20,7 @@ Start: ldx #0 stx ZP_IRQ_CTRL ; disable calling cartridge IRQ/NMI handler - ; Setup stack and memory mapping + ; Set up stack and memory mapping ;ldx #$FF ; Stack top ($01FF) dex txs @@ -31,18 +31,18 @@ Start: ; Copy the .data segment to RAM jsr copydata - ; setup the stack + ; Set up the stack lda #<(__RAM_START__+__RAM_SIZE__) + ldx #>(__RAM_START__+__RAM_SIZE__) sta sp - lda #>(__RAM_START__+__RAM_SIZE__) - sta sp + 1 + stx sp + 1 ; Call module constructors jsr initlib lda #1 sta ZP_IRQ_CTRL ; enable calling cartridge IRQ/NMI handler - cli ; allow IRQ only after constructors have run + cli ; allow IRQ only after constructors have run ; Pass an empty command line jsr push0 ; argc diff --git a/libsrc/gamate/ctype.s b/libsrc/gamate/ctype.s deleted file mode 100644 index fa9a65c8b..000000000 --- a/libsrc/gamate/ctype.s +++ /dev/null @@ -1,161 +0,0 @@ -; -; Stefan Haubenthal with minor changes from Ullrich von Bassewitz, 2003-05-02 -; -; Character specification table. -; - - .include "ctype.inc" - -; The tables are readonly, put them into the rodata segment - -.rodata - -; The following 256 byte wide table specifies attributes for the isxxx type -; of functions. Doing it by a table means some overhead in space, but it -; has major advantages: -; -; * It is fast. If it were'nt for the slow parameter passing of cc65, one -; could even define macros for the isxxx functions (this is usually -; done on other platforms). -; -; * It is highly portable. The only unportable part is the table itself, -; all real code goes into the common library. -; -; * We save some code in the isxxx functions. - - -__ctype: - .repeat 2 - .byte CT_CTRL ; 0/00 ___ctrl_@___ - .byte CT_CTRL ; 1/01 ___ctrl_A___ - .byte CT_CTRL ; 2/02 ___ctrl_B___ - .byte CT_CTRL ; 3/03 ___ctrl_C___ - .byte CT_CTRL ; 4/04 ___ctrl_D___ - .byte CT_CTRL ; 5/05 ___ctrl_E___ - .byte CT_CTRL ; 6/06 ___ctrl_F___ - .byte CT_CTRL ; 7/07 ___ctrl_G___ - .byte CT_CTRL ; 8/08 ___ctrl_H___ - .byte CT_CTRL | CT_OTHER_WS | CT_SPACE_TAB - ; 9/09 ___ctrl_I___ - .byte CT_CTRL | CT_OTHER_WS ; 10/0a ___ctrl_J___ - .byte CT_CTRL | CT_OTHER_WS ; 11/0b ___ctrl_K___ - .byte CT_CTRL | CT_OTHER_WS ; 12/0c ___ctrl_L___ - .byte CT_CTRL | CT_OTHER_WS ; 13/0d ___ctrl_M___ - .byte CT_CTRL ; 14/0e ___ctrl_N___ - .byte CT_CTRL ; 15/0f ___ctrl_O___ - .byte CT_CTRL ; 16/10 ___ctrl_P___ - .byte CT_CTRL ; 17/11 ___ctrl_Q___ - .byte CT_CTRL ; 18/12 ___ctrl_R___ - .byte CT_CTRL ; 19/13 ___ctrl_S___ - .byte CT_CTRL ; 20/14 ___ctrl_T___ - .byte CT_CTRL ; 21/15 ___ctrl_U___ - .byte CT_CTRL ; 22/16 ___ctrl_V___ - .byte CT_CTRL ; 23/17 ___ctrl_W___ - .byte CT_CTRL ; 24/18 ___ctrl_X___ - .byte CT_CTRL ; 25/19 ___ctrl_Y___ - .byte CT_CTRL ; 26/1a ___ctrl_Z___ - .byte CT_CTRL ; 27/1b ___ctrl_[___ - .byte CT_CTRL ; 28/1c ___ctrl_\___ - .byte CT_CTRL ; 29/1d ___ctrl_]___ - .byte CT_CTRL ; 30/1e ___ctrl_^___ - .byte CT_CTRL ; 31/1f ___ctrl_____ - .byte CT_SPACE | CT_SPACE_TAB ; 32/20 ___SPACE___ - .byte CT_NONE ; 33/21 _____!_____ - .byte CT_NONE ; 34/22 _____"_____ - .byte CT_NONE ; 35/23 _____#_____ - .byte CT_NONE ; 36/24 _____$_____ - .byte CT_NONE ; 37/25 _____%_____ - .byte CT_NONE ; 38/26 _____&_____ - .byte CT_NONE ; 39/27 _____'_____ - .byte CT_NONE ; 40/28 _____(_____ - .byte CT_NONE ; 41/29 _____)_____ - .byte CT_NONE ; 42/2a _____*_____ - .byte CT_NONE ; 43/2b _____+_____ - .byte CT_NONE ; 44/2c _____,_____ - .byte CT_NONE ; 45/2d _____-_____ - .byte CT_NONE ; 46/2e _____._____ - .byte CT_NONE ; 47/2f _____/_____ - .byte CT_DIGIT | CT_XDIGIT ; 48/30 _____0_____ - .byte CT_DIGIT | CT_XDIGIT ; 49/31 _____1_____ - .byte CT_DIGIT | CT_XDIGIT ; 50/32 _____2_____ - .byte CT_DIGIT | CT_XDIGIT ; 51/33 _____3_____ - .byte CT_DIGIT | CT_XDIGIT ; 52/34 _____4_____ - .byte CT_DIGIT | CT_XDIGIT ; 53/35 _____5_____ - .byte CT_DIGIT | CT_XDIGIT ; 54/36 _____6_____ - .byte CT_DIGIT | CT_XDIGIT ; 55/37 _____7_____ - .byte CT_DIGIT | CT_XDIGIT ; 56/38 _____8_____ - .byte CT_DIGIT | CT_XDIGIT ; 57/39 _____9_____ - .byte CT_NONE ; 58/3a _____:_____ - .byte CT_NONE ; 59/3b _____;_____ - .byte CT_NONE ; 60/3c _____<_____ - .byte CT_NONE ; 61/3d _____=_____ - .byte CT_NONE ; 62/3e _____>_____ - .byte CT_NONE ; 63/3f _____?_____ - - .byte CT_NONE ; 64/40 _____@_____ - .byte CT_UPPER | CT_XDIGIT ; 65/41 _____A_____ - .byte CT_UPPER | CT_XDIGIT ; 66/42 _____B_____ - .byte CT_UPPER | CT_XDIGIT ; 67/43 _____C_____ - .byte CT_UPPER | CT_XDIGIT ; 68/44 _____D_____ - .byte CT_UPPER | CT_XDIGIT ; 69/45 _____E_____ - .byte CT_UPPER | CT_XDIGIT ; 70/46 _____F_____ - .byte CT_UPPER ; 71/47 _____G_____ - .byte CT_UPPER ; 72/48 _____H_____ - .byte CT_UPPER ; 73/49 _____I_____ - .byte CT_UPPER ; 74/4a _____J_____ - .byte CT_UPPER ; 75/4b _____K_____ - .byte CT_UPPER ; 76/4c _____L_____ - .byte CT_UPPER ; 77/4d _____M_____ - .byte CT_UPPER ; 78/4e _____N_____ - .byte CT_UPPER ; 79/4f _____O_____ - .byte CT_UPPER ; 80/50 _____P_____ - .byte CT_UPPER ; 81/51 _____Q_____ - .byte CT_UPPER ; 82/52 _____R_____ - .byte CT_UPPER ; 83/53 _____S_____ - .byte CT_UPPER ; 84/54 _____T_____ - .byte CT_UPPER ; 85/55 _____U_____ - .byte CT_UPPER ; 86/56 _____V_____ - .byte CT_UPPER ; 87/57 _____W_____ - .byte CT_UPPER ; 88/58 _____X_____ - .byte CT_UPPER ; 89/59 _____Y_____ - .byte CT_UPPER ; 90/5a _____Z_____ - .byte CT_NONE ; 91/5b _____[_____ - .byte CT_NONE ; 92/5c _____\_____ - .byte CT_NONE ; 93/5d _____]_____ - .byte CT_NONE ; 94/5e _____^_____ - .byte CT_NONE ; 95/5f _UNDERLINE_ - .byte CT_NONE ; 96/60 ___grave___ - .byte CT_LOWER | CT_XDIGIT ; 97/61 _____a_____ - .byte CT_LOWER | CT_XDIGIT ; 98/62 _____b_____ - .byte CT_LOWER | CT_XDIGIT ; 99/63 _____c_____ - .byte CT_LOWER | CT_XDIGIT ; 100/64 _____d_____ - .byte CT_LOWER | CT_XDIGIT ; 101/65 _____e_____ - .byte CT_LOWER | CT_XDIGIT ; 102/66 _____f_____ - .byte CT_LOWER ; 103/67 _____g_____ - .byte CT_LOWER ; 104/68 _____h_____ - .byte CT_LOWER ; 105/69 _____i_____ - .byte CT_LOWER ; 106/6a _____j_____ - .byte CT_LOWER ; 107/6b _____k_____ - .byte CT_LOWER ; 108/6c _____l_____ - .byte CT_LOWER ; 109/6d _____m_____ - .byte CT_LOWER ; 110/6e _____n_____ - .byte CT_LOWER ; 111/6f _____o_____ - .byte CT_LOWER ; 112/70 _____p_____ - .byte CT_LOWER ; 113/71 _____q_____ - .byte CT_LOWER ; 114/72 _____r_____ - .byte CT_LOWER ; 115/73 _____s_____ - .byte CT_LOWER ; 116/74 _____t_____ - .byte CT_LOWER ; 117/75 _____u_____ - .byte CT_LOWER ; 118/76 _____v_____ - .byte CT_LOWER ; 119/77 _____w_____ - .byte CT_LOWER ; 120/78 _____x_____ - .byte CT_LOWER ; 121/79 _____y_____ - .byte CT_LOWER ; 122/7a _____z_____ - .byte CT_NONE ; 123/7b _____{_____ - .byte CT_NONE ; 124/7c _____|_____ - .byte CT_NONE ; 125/7d _____}_____ - .byte CT_NONE ; 126/7e _____~_____ - .byte CT_OTHER_WS ; 127/7f ____DEL____ - .endrepeat - - diff --git a/libsrc/gamate/cvline.s b/libsrc/gamate/cvline.s index b22890815..89f49219a 100644 --- a/libsrc/gamate/cvline.s +++ b/libsrc/gamate/cvline.s @@ -6,15 +6,14 @@ ; .export _cvlinexy, _cvline - .import popa, _gotoxy, putchar, newline + .import gotoxy, putchar, newline .importzp tmp1 .include "gamate.inc" _cvlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length and run into _cvline _cvline: diff --git a/libsrc/gamate/gotoxy.s b/libsrc/gamate/gotoxy.s index 407da1f2f..d49bd2967 100644 --- a/libsrc/gamate/gotoxy.s +++ b/libsrc/gamate/gotoxy.s @@ -2,12 +2,15 @@ ; void gotoxy (unsigned char x, unsigned char y); ; - .export _gotoxy + .export gotoxy, _gotoxy .import popa, plot .include "gamate.inc" .include "extzp.inc" +gotoxy: + jsr popa ; Get Y + _gotoxy: sta CURS_Y ; Set Y jsr popa ; Get X @@ -17,6 +20,4 @@ _gotoxy: ;------------------------------------------------------------------------------- ; force the init constructor to be imported - .import initconio -conio_init = initconio - + .forceimport initconio diff --git a/libsrc/gamate/irq.s b/libsrc/gamate/irq.s index 862307f58..ddb6ce4ea 100644 --- a/libsrc/gamate/irq.s +++ b/libsrc/gamate/irq.s @@ -10,7 +10,7 @@ .include "extzp.inc" ; ------------------------------------------------------------------------ -.segment "INIT" +.segment "ONCE" ; a constructor ; diff --git a/libsrc/gamate/joy/gamate-stdjoy.s b/libsrc/gamate/joy/gamate-stdjoy.s index 8b18bae7a..8f927cdf5 100644 --- a/libsrc/gamate/joy/gamate-stdjoy.s +++ b/libsrc/gamate/joy/gamate-stdjoy.s @@ -24,24 +24,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE_A - .byte $20 ; JOY_FIRE_B - .byte $80 ; JOY_SELECT - .byte $40 ; JOY_START - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READJOY - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants @@ -90,6 +78,7 @@ COUNT: READJOY: lda JOY_DATA + eor #$FF ldx #0 rts diff --git a/libsrc/gamate/joy_stat_stddrv.s b/libsrc/gamate/joy_stat_stddrv.s index 75016450a..94537b210 100644 --- a/libsrc/gamate/joy_stat_stddrv.s +++ b/libsrc/gamate/joy_stat_stddrv.s @@ -9,6 +9,4 @@ .export _joy_static_stddrv .import _gamate_stdjoy_joy -.rodata - _joy_static_stddrv := _gamate_stdjoy_joy diff --git a/libsrc/gamate/joy_stddrv.s b/libsrc/gamate/joy_stddrv.s deleted file mode 100644 index b830d8d86..000000000 --- a/libsrc/gamate/joy_stddrv.s +++ /dev/null @@ -1,13 +0,0 @@ -; -; Name of the standard joystick driver -; -; Oliver Schmidt, 2012-11-01 -; -; const char joy_stddrv[]; -; - - .export _joy_stddrv - -.rodata - -_joy_stddrv: .asciiz "gamate-stdjoy.joy" diff --git a/libsrc/gamate/nmi.s b/libsrc/gamate/nmi.s index 61db62416..a09eea2e5 100644 --- a/libsrc/gamate/nmi.s +++ b/libsrc/gamate/nmi.s @@ -3,7 +3,7 @@ ; .export NMIStub - .segment "INIT" + .segment "ONCE" NMIStub: ; A is saved by the BIOS diff --git a/libsrc/gamate/vga.inc b/libsrc/gamate/vga.s similarity index 99% rename from libsrc/gamate/vga.inc rename to libsrc/gamate/vga.s index da20dd4aa..310560015 100644 --- a/libsrc/gamate/vga.inc +++ b/libsrc/gamate/vga.s @@ -1,6 +1,11 @@ - ; VGA charset for the Gamate conio implementation + .export fontdata + + .rodata + +fontdata: + .byte $00, $00, $00, $00, $00, $00, $00, $00 ; 1 diff --git a/libsrc/gamate/waitvblank.s b/libsrc/gamate/waitvsync.s similarity index 67% rename from libsrc/gamate/waitvblank.s rename to libsrc/gamate/waitvsync.s index 66686c08a..dee83400d 100644 --- a/libsrc/gamate/waitvblank.s +++ b/libsrc/gamate/waitvsync.s @@ -1,16 +1,18 @@ ; -; void waitvblank (void); +; Written by Groepaz <groepaz@gmx.net> +; +; void waitvsync (void); ; .include "gamate.inc" .include "extzp.inc" .forceimport ticktock - .export _waitvblank + .export _waitvsync ; FIXME: is this actually correct? -.proc _waitvblank +.proc _waitvsync lda tickcount @lp: cmp tickcount diff --git a/libsrc/geos-apple/disk/exitturbo.s b/libsrc/geos-apple/disk/exitturbo.s index 7098a56c4..14164d2e9 100644 --- a/libsrc/geos-apple/disk/exitturbo.s +++ b/libsrc/geos-apple/disk/exitturbo.s @@ -9,5 +9,5 @@ .import return0 _ExitTurbo = return0 - - + + diff --git a/libsrc/geos-apple/targetutil/Makefile.inc b/libsrc/geos-apple/targetutil/Makefile.inc deleted file mode 100644 index fbe31981c..000000000 --- a/libsrc/geos-apple/targetutil/Makefile.inc +++ /dev/null @@ -1,14 +0,0 @@ -DEPS += ../libwrk/$(TARGET)/convert.d - -../libwrk/$(TARGET)/convert.o: TARGET = apple2enh - -../libwrk/$(TARGET)/convert.o: $(SRCDIR)/targetutil/convert.c | ../libwrk/$(TARGET) - $(COMPILE_recipe) - -../lib/apple2enh.lib: - @$(MAKE) --no-print-directory apple2enh - -../targetutil/convert.system: ../libwrk/$(TARGET)/convert.o ../lib/apple2enh.lib | ../targetutil - $(LD65) -o $@ -C apple2enh-system.cfg $^ - -$(TARGET): ../targetutil/convert.system diff --git a/libsrc/geos-cbm/disk/changediskdevice.s b/libsrc/geos-cbm/disk/changediskdevice.s index c3035deee..dd9c91609 100644 --- a/libsrc/geos-cbm/disk/changediskdevice.s +++ b/libsrc/geos-cbm/disk/changediskdevice.s @@ -9,7 +9,7 @@ .import setoserror .include "jumptab.inc" - + _ChangeDiskDevice: jsr ChangeDiskDevice jmp setoserror diff --git a/libsrc/geos-cbm/disk/chkdkgeos.s b/libsrc/geos-cbm/disk/chkdkgeos.s index c2b4821a4..a091916d7 100644 --- a/libsrc/geos-cbm/disk/chkdkgeos.s +++ b/libsrc/geos-cbm/disk/chkdkgeos.s @@ -10,7 +10,7 @@ .include "jumptab.inc" .include "geossym.inc" - + _ChkDkGEOS: jsr ChkDkGEOS jsr setoserror diff --git a/libsrc/geos-cbm/disk/dio_cts.s b/libsrc/geos-cbm/disk/dio_cts.s index 8be343641..478181b69 100644 --- a/libsrc/geos-cbm/disk/dio_cts.s +++ b/libsrc/geos-cbm/disk/dio_cts.s @@ -1,6 +1,6 @@ ; -; Maciej 'YTM/Elysium' Witkowiak -; 2.7.2001 +; 2001-07-02, Maciej 'YTM/Elysium' Witkowiak +; 2015-08-26, Greg King ; ; ; unsigned char __fastcall__ dio_phys_to_log (dhandle_t handle, @@ -20,21 +20,21 @@ _dio_phys_to_log: sta ptr1 stx ptr1+1 ; pointer to result - + jsr popax sta ptr2 stx ptr2+1 ; pointer to input structure - + jsr popax sta ptr3 stx ptr3+1 ; pointer to handle - + ldy #sst_flag lda (ptr3),y and #128 beq _inv_hand ; handle not open or invalid - - + + ldy #diopp_head lda (ptr2),y bne _inv_data ; there is only head 0 @@ -59,15 +59,15 @@ _dio_phys_to_log: lda (ptr3),y tay lda driveType,y - and #%00000011 ; this is for RamDrive compatibility + and #%00001111 ; remove ramDisk flags cmp #DRV_1541 beq dio_cts1541 cmp #DRV_1571 beq dio_cts1571 cmp #DRV_1581 beq dio_cts1581 - - lda #DEV_NOT_FOUND ; unknown device + + lda #INCOMPATIBLE ; unsupported device ldx #0 beq ret @@ -78,10 +78,10 @@ dio_ctsend: dey lda tmp1 sta (ptr1),y - + ldx #0 txa -ret: +ret: sta __oserror rts ; return success @@ -91,7 +91,7 @@ _inv_data: lda #INV_TRACK .byte $2c _inv_hand: - lda #INCOMPATIBLE + lda #DEV_NOT_FOUND ldx #0 beq ret diff --git a/libsrc/geos-cbm/disk/dio_openclose.s b/libsrc/geos-cbm/disk/dio_openclose.s index ec5aa8795..327503017 100644 --- a/libsrc/geos-cbm/disk/dio_openclose.s +++ b/libsrc/geos-cbm/disk/dio_openclose.s @@ -1,8 +1,8 @@ ; -; Maciej 'YTM/Elysium' Witkowiak +; 2001-07-02, Maciej 'YTM/Elysium' Witkowiak +; 2015-08-24, Greg King ; ; based on Atari version by Christian Groessler -; 2.7.2001 ; ; dhandle_t __fastcall__ dio_open (unsigned char device); ; unsigned char __fastcall__ dio_close (dhandle_t handle); @@ -27,11 +27,13 @@ sectsizetab: .code _dio_open: - pha + cmp #4 + bcs _inv_drive tax lda driveType,x ; check if there's a device beq _inv_drive txa + pha clc adc #8 ; normalize devnum sta curDevice @@ -43,7 +45,7 @@ _dio_open: asl a ; make index from drive id asl a tax - + lda #0 sta sectsizetab+sst_sectsize,x lda #128 @@ -52,7 +54,7 @@ _dio_open: sta sectsizetab+sst_sectsize+1,x tya sta sectsizetab+sst_driveno,x - + stx tmp1 lda #<sectsizetab clc diff --git a/libsrc/geos-cbm/disk/dio_read.s b/libsrc/geos-cbm/disk/dio_read.s index db46c9b69..ac19f9afa 100644 --- a/libsrc/geos-cbm/disk/dio_read.s +++ b/libsrc/geos-cbm/disk/dio_read.s @@ -1,6 +1,6 @@ ; -; Maciej 'YTM/Elysium' Witkowiak -; 2.7.2001 +; 2001-07-02, Maciej 'YTM/Elysium' Witkowiak +; 2015-08-27, Greg King ; ; this file provides the _dio_read function ; @@ -15,7 +15,9 @@ _dio_read: jsr dio_params + tay + bne err jsr ReadBlock stx __oserror txa - rts +err: rts diff --git a/libsrc/geos-cbm/disk/dio_stc.s b/libsrc/geos-cbm/disk/dio_stc.s index 586e3f3db..469df93ca 100644 --- a/libsrc/geos-cbm/disk/dio_stc.s +++ b/libsrc/geos-cbm/disk/dio_stc.s @@ -1,6 +1,6 @@ ; -; Maciej 'YTM/Elysium' Witkowiak -; 2.7.2001 +; 2001-07-02, Maciej 'YTM/Elysium' Witkowiak +; 2015-08-27, Greg King ; ; unsigned char __fastcall__ dio_log_to_phys (dhandle_t handle, ; unsigned *sectnum, /* input */ @@ -20,15 +20,15 @@ _dio_log_to_phys: ; check device type sta ptr1 stx ptr1+1 ; pointer to result (struct dio_phys_pos) - + jsr popax sta ptr2 stx ptr2+1 ; pointer to input structure (pointer to int) - + jsr popax sta ptr3 stx ptr3+1 ; pointer to handle - + ldy #sst_flag lda (ptr3),y and #128 @@ -42,28 +42,28 @@ _dio_log_to_phys: sta (ptr1),y ; track <256 ldy #diopp_sector+1 sta (ptr1),y ; sector <256 - + ldy #0 lda (ptr2),y sta tmp1 - iny + iny lda (ptr2),y sta tmp2 ; get drive info ldy #sst_driveno lda (ptr3),y - tay + tay lda driveType,y - and #%00000011 ; this is for RamDrive compatibility + and #%00001111 ; remove ramDisk flags cmp #DRV_1541 beq dio_stc1541 cmp #DRV_1571 beq dio_stc1571 cmp #DRV_1581 beq dio_stc1581 - - lda #DEV_NOT_FOUND ; unknown device + + lda #INCOMPATIBLE ; unsupported device ldx #0 beq _ret @@ -74,10 +74,10 @@ dio_stcend: ldy #diopp_sector lda tmp2 sta (ptr1),y - + ldx #0 - txa -_ret: + txa +_ret: sta __oserror rts ; return success @@ -86,7 +86,7 @@ _inv_data: lda #INV_TRACK .byte $2c _inv_hand: - lda #INCOMPATIBLE + lda #DEV_NOT_FOUND ldx #0 beq _ret @@ -102,19 +102,19 @@ _loop41: bne _nxt lda tmp1 cmp sectab_1541_l+1,x - bcc _found -_nxt: inx +_nxt: bcc _found + inx cpx #35 bne _loop41 beq _inv_data - -_found: + +_found: lda tmp1 - sec + sec sbc sectab_1541_l,x sta tmp2 -_fndend: - inx +_fndend: + inx stx tmp1 jmp dio_stcend @@ -124,24 +124,25 @@ dio_stc1571: ; - fall down to 1541 lda tmp2 cmp #>683 - bne _cnt71 + bne _if71 lda tmp1 cmp #<683 - bcc dio_stc1541 - -_cnt71: +_if71: bcc dio_stc1541 + lda tmp1 - sec + sec sbc #<683 sta tmp1 lda tmp2 sbc #>683 sta tmp2 jsr dio_stc1541 ; will fall through here - + tay + bne _ret ; result beyond track 70 + ldy #diopp_track lda (ptr1),y - clc + clc adc #35 sta (ptr1),y lda #0 @@ -152,26 +153,26 @@ _cnt71: ; - the remainder is sector dio_stc1581: ldx #0 ; index=(track-1) -_loop81: +_loop81: lda tmp2 bne _sub81 lda tmp1 cmp #40 bcc _got81 _sub81: lda tmp1 - sec + sec sbc #40 sta tmp1 lda tmp2 sbc #0 sta tmp2 - inx - cpx #81 + inx + cpx #80 bne _loop81 beq _inv_data - + _got81: lda tmp1 sta tmp2 - inx + inx stx tmp1 jmp dio_stcend diff --git a/libsrc/geos-cbm/disk/dio_write.s b/libsrc/geos-cbm/disk/dio_write.s index 14267803a..a5f747519 100644 --- a/libsrc/geos-cbm/disk/dio_write.s +++ b/libsrc/geos-cbm/disk/dio_write.s @@ -1,6 +1,6 @@ ; -; Maciej 'YTM/Elysium' Witkowiak -; 2.7.2001 +; 2001-07-02, Maciej 'YTM/Elysium' Witkowiak +; 2015-08-27, Greg King ; ; this file provides the _dio_write function ; @@ -15,5 +15,9 @@ _dio_write: jsr dio_params + tay + bne err jsr WriteBlock jmp setoserror + +err: rts diff --git a/libsrc/geos-cbm/disk/dio_writev.s b/libsrc/geos-cbm/disk/dio_writev.s index 7cb9b029f..9b36ed096 100644 --- a/libsrc/geos-cbm/disk/dio_writev.s +++ b/libsrc/geos-cbm/disk/dio_writev.s @@ -1,6 +1,6 @@ ; -; Maciej 'YTM/Elysium' Witkowiak -; 2.7.2001 +; 2001-07-02, Maciej 'YTM/Elysium' Witkowiak +; 2015-08-27, Greg King ; ; this file provides the _dio_write function ; @@ -15,7 +15,9 @@ _dio_write_verify: jsr dio_params + tay + bne err jsr VerWriteBlock stx __oserror txa - rts +err: rts diff --git a/libsrc/geos-cbm/disk/enterturbo.s b/libsrc/geos-cbm/disk/enterturbo.s index 777822bae..31864e32f 100644 --- a/libsrc/geos-cbm/disk/enterturbo.s +++ b/libsrc/geos-cbm/disk/enterturbo.s @@ -8,5 +8,5 @@ .export _EnterTurbo .include "jumptab.inc" - + _EnterTurbo = EnterTurbo diff --git a/libsrc/geos-cbm/disk/exitturbo.s b/libsrc/geos-cbm/disk/exitturbo.s index ab894aeff..5a37b4682 100644 --- a/libsrc/geos-cbm/disk/exitturbo.s +++ b/libsrc/geos-cbm/disk/exitturbo.s @@ -8,5 +8,5 @@ .export _ExitTurbo .include "jumptab.inc" - + _ExitTurbo = ExitTurbo diff --git a/libsrc/geos-cbm/disk/findbambit.s b/libsrc/geos-cbm/disk/findbambit.s index 3bb566f4d..3a6ffab21 100644 --- a/libsrc/geos-cbm/disk/findbambit.s +++ b/libsrc/geos-cbm/disk/findbambit.s @@ -12,7 +12,7 @@ .include "jumptab.inc" .include "geossym.inc" - + _FindBAMBit: jsr gettrse sta r6L diff --git a/libsrc/geos-cbm/disk/newdisk.s b/libsrc/geos-cbm/disk/newdisk.s index 30c7283ae..99e39604f 100644 --- a/libsrc/geos-cbm/disk/newdisk.s +++ b/libsrc/geos-cbm/disk/newdisk.s @@ -9,7 +9,7 @@ .import setoserror .include "jumptab.inc" - + _NewDisk: jsr NewDisk jmp setoserror diff --git a/libsrc/geos-cbm/disk/purgeturbo.s b/libsrc/geos-cbm/disk/purgeturbo.s index f0a293423..26b61a4fd 100644 --- a/libsrc/geos-cbm/disk/purgeturbo.s +++ b/libsrc/geos-cbm/disk/purgeturbo.s @@ -8,5 +8,5 @@ .export _PurgeTurbo .include "jumptab.inc" - + _PurgeTurbo = PurgeTurbo diff --git a/libsrc/geos-cbm/disk/readblock.s b/libsrc/geos-cbm/disk/readblock.s index 977860d91..d9a25f254 100644 --- a/libsrc/geos-cbm/disk/readblock.s +++ b/libsrc/geos-cbm/disk/readblock.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "geossym.inc" - + _ReadBlock: sta r4L stx r4H diff --git a/libsrc/geos-cbm/disk/readbuff.s b/libsrc/geos-cbm/disk/readbuff.s index 149eae1b9..0c0c90108 100644 --- a/libsrc/geos-cbm/disk/readbuff.s +++ b/libsrc/geos-cbm/disk/readbuff.s @@ -11,7 +11,7 @@ .include "diskdrv.inc" .include "geossym.inc" - + _ReadBuff: jsr gettrse sta r1L diff --git a/libsrc/geos-cbm/disk/verwriteblock.s b/libsrc/geos-cbm/disk/verwriteblock.s index 74243f13f..bb4eabdda 100644 --- a/libsrc/geos-cbm/disk/verwriteblock.s +++ b/libsrc/geos-cbm/disk/verwriteblock.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "geossym.inc" - + _VerWriteBlock: sta r4L stx r4H diff --git a/libsrc/geos-cbm/disk/writeblock.s b/libsrc/geos-cbm/disk/writeblock.s index c5a3b3f7a..7b257e79c 100644 --- a/libsrc/geos-cbm/disk/writeblock.s +++ b/libsrc/geos-cbm/disk/writeblock.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "geossym.inc" - + _WriteBlock: sta r4L stx r4H diff --git a/libsrc/geos-cbm/disk/writebuff.s b/libsrc/geos-cbm/disk/writebuff.s index 34e7b137b..52194ebb1 100644 --- a/libsrc/geos-cbm/disk/writebuff.s +++ b/libsrc/geos-cbm/disk/writebuff.s @@ -11,7 +11,7 @@ .include "diskdrv.inc" .include "geossym.inc" - + _WriteBuff: jsr gettrse sta r1L diff --git a/libsrc/geos-cbm/emd/geos-vdc.s b/libsrc/geos-cbm/emd/geos-vdc.s index 791d2a0a8..27316e1a0 100644 --- a/libsrc/geos-cbm/emd/geos-vdc.s +++ b/libsrc/geos-cbm/emd/geos-vdc.s @@ -82,54 +82,54 @@ INSTALL: pha lda #$35 sta $01 - + ldx #VDC_CSET ; determine size of RAM... jsr vdcgetreg sta tmp1 ora #%00010000 jsr vdcputreg ; turn on 64k - + jsr settestadr1 ; save original value of test byte jsr vdcgetbyte sta tmp2 - + lda #$55 ; write $55 here ldy #ptr1 jsr test64k ; read it here and there lda #$aa ; write $aa here ldy #ptr2 jsr test64k ; read it here and there - + jsr settestadr1 lda tmp2 jsr vdcputbyte ; restore original value of test byte - + lda ptr1 ; do bytes match? cmp ptr1+1 bne @have64k lda ptr2 cmp ptr2+1 bne @have64k - + ldx #VDC_CSET lda tmp1 jsr vdcputreg ; restore 16/64k flag jmp @endok ; and leave default values for 16k - -@have64k: + +@have64k: lda #<256 ldx #>256 sta pagecount stx pagecount+1 -@endok: +@endok: pla sta $01 plp lda #<EM_ERR_OK ldx #>EM_ERR_OK - rts - -test64k: + rts + +test64k: sta tmp1 sty ptr3 lda #0 @@ -186,14 +186,14 @@ MAP: sta curpage sta ptr1+1 ldy #0 sty ptr1 - + lda #<window sta ptr2 lda #>window sta ptr2+1 - + jsr transferin - + lda #<window ldx #>window rts @@ -299,7 +299,7 @@ COPYFROM: bne @L1 ; Copy the remainder of the page - + @L2: ldy #EM_COPY::COUNT lda (ptr3),y ; Get bytes in last page beq @L4 @@ -391,9 +391,9 @@ vdcgetreg: @L0: bit VDC_ADDR_REG bpl @L0 lda VDC_DATA_REG - rts + rts -vdcputbyte: +vdcputbyte: ldx #VDC_DATA vdcputreg: stx VDC_ADDR_REG diff --git a/libsrc/geos-cbm/file/followchain.s b/libsrc/geos-cbm/file/followchain.s index df20bcaac..9b882d59a 100644 --- a/libsrc/geos-cbm/file/followchain.s +++ b/libsrc/geos-cbm/file/followchain.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "geossym.inc" - + _FollowChain: sta r3L stx r3H diff --git a/libsrc/geos-cbm/geossym2.inc b/libsrc/geos-cbm/geossym2.inc index cdcbc24dc..02a2fd44b 100644 --- a/libsrc/geos-cbm/geossym2.inc +++ b/libsrc/geos-cbm/geossym2.inc @@ -4,8 +4,11 @@ ;4-2-99 bootName = $c006 +gatewayFlag = $c007 version = $c00f nationality = $c010 sysFlgCopy = $c012 c128Flag = $c013 -dateCopy = $c018 \ No newline at end of file +mp3Flag = $c014 +dateCopy = $c018 + diff --git a/libsrc/geos-cbm/graph/setnewmode.s b/libsrc/geos-cbm/graph/setnewmode.s new file mode 100644 index 000000000..56fc123f7 --- /dev/null +++ b/libsrc/geos-cbm/graph/setnewmode.s @@ -0,0 +1,18 @@ +; +; Scott Hutter +; +; 18.12.18 + +; void SetNewMode(void); + + .export _SetNewMode + + .include "jumptab.inc" + .include "geossym.inc" + +_SetNewMode: + lda graphMode + eor #$80 + sta graphMode + jmp SetNewMode + diff --git a/libsrc/geos-cbm/joy/geos-stdjoy.s b/libsrc/geos-cbm/joy/geos-stdjoy.s index 6afe46092..2787cb594 100644 --- a/libsrc/geos-cbm/joy/geos-stdjoy.s +++ b/libsrc/geos-cbm/joy/geos-stdjoy.s @@ -28,17 +28,6 @@ .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $00 ; Future expansion - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .word INSTALL diff --git a/libsrc/geos-cbm/system/get_ostype.s b/libsrc/geos-cbm/system/get_ostype.s index 492ce132d..6e6731952 100644 --- a/libsrc/geos-cbm/system/get_ostype.s +++ b/libsrc/geos-cbm/system/get_ostype.s @@ -3,8 +3,8 @@ ; ; 10.09.2001 ; -; Plus4 and GEOS 1.1 detection by -; Marco van den Heuvel, 2010-02-02 +; Plus4, Gateway, MP3 and GEOS 1.1 detection by +; Marco van den Heuvel, 2018-02-07 ; ; unsigned char get_ostype (void); @@ -26,11 +26,20 @@ _get_ostype: and #%11110000 cmp #$10 beq geos10 + cmp #$13 ; either 1.3 or 1.5 + beq geos13check + lda gatewayFlag + cmp #$41 + beq gateway + lda mp3Flag + cmp #$4d + beq megapatch3 lda c128Flag ; we're on at least 2.0 cmp #$18 beq geos_on_plus4 ora version rts +geos13: geos10: lda version rts @@ -40,6 +49,21 @@ geos11: geos_on_plus4: lda #$04 rts +gateway: + lda #$08 + ora c128Flag + rts +megapatch3: + lda #$03 + ora c128Flag + rts +geos13check: + lda mp3Flag + cmp #$03 + bne geos13 +geos15: + lda #$15 + rts _get_tv: jsr _get_ostype diff --git a/libsrc/geos-cbm/system/initdoneio.s b/libsrc/geos-cbm/system/initdoneio.s index b5e51524a..4b8762bad 100644 --- a/libsrc/geos-cbm/system/initdoneio.s +++ b/libsrc/geos-cbm/system/initdoneio.s @@ -11,5 +11,5 @@ .include "jumptab.inc" _InitForIO = InitForIO - -_DoneWithIO = DoneWithIO \ No newline at end of file + +_DoneWithIO = DoneWithIO diff --git a/libsrc/geos-cbm/system/setdevice.s b/libsrc/geos-cbm/system/setdevice.s index 37a162303..a67c10228 100644 --- a/libsrc/geos-cbm/system/setdevice.s +++ b/libsrc/geos-cbm/system/setdevice.s @@ -8,5 +8,5 @@ .export _SetDevice .include "jumptab.inc" - + _SetDevice = SetDevice diff --git a/libsrc/geos-cbm/system/tobasic.s b/libsrc/geos-cbm/system/tobasic.s index cb47da531..59bdc2936 100644 --- a/libsrc/geos-cbm/system/tobasic.s +++ b/libsrc/geos-cbm/system/tobasic.s @@ -9,4 +9,4 @@ .include "jumptab.inc" -_ToBASIC = ToBASIC \ No newline at end of file +_ToBASIC = ToBASIC diff --git a/libsrc/geos-cbm/tgi/geos-tgi.s b/libsrc/geos-cbm/tgi/geos-tgi.s index 5a1af65e4..c04742fb6 100644 --- a/libsrc/geos-cbm/tgi/geos-tgi.s +++ b/libsrc/geos-cbm/tgi/geos-tgi.s @@ -74,7 +74,6 @@ aspect: .word $00D4 ; Aspect ratio (based on 4/3 display) .addr BAR .addr TEXTSTYLE .addr OUTTEXT - .addr 0 ; IRQ entry is unused ; ------------------------------------------------------------------------ ; Data. @@ -94,7 +93,7 @@ Y2 = ptr4 SCRBASE: .res 1 ; High byte of screen base (64k VDC only) -ERROR: +ERROR: .res 1 ; Error code PALETTE: .res 2 ; The current palette @@ -200,9 +199,9 @@ INSTALL: @endok: lda #0 sta SCRBASE ; draw page 0 as default - rts + rts -test64k: +test64k: sta tmp1 sty ptr3 lda #0 diff --git a/libsrc/geos-common/common/_afailed.c b/libsrc/geos-common/common/_afailed.c index 2448534c0..97727d605 100644 --- a/libsrc/geos-common/common/_afailed.c +++ b/libsrc/geos-common/common/_afailed.c @@ -28,5 +28,5 @@ void _afailed (char* file, unsigned line) DlgBoxOk(CBOLDON "ASSERTION FAILED", "PROGRAM TERMINATED" CPLAINTEXT); - exit (2); + exit (EXIT_ASSERT); } diff --git a/libsrc/geos-common/common/abort.c b/libsrc/geos-common/common/abort.c index b7cb35eb9..90a651286 100644 --- a/libsrc/geos-common/common/abort.c +++ b/libsrc/geos-common/common/abort.c @@ -11,5 +11,5 @@ void abort (void) { ExitTurbo(); DlgBoxOk(CBOLDON "ABNORMAL PROGRAM", "TERMINATION." CPLAINTEXT); - exit(3); + exit(EXIT_ABORT); } diff --git a/libsrc/geos-common/common/zerobss.s b/libsrc/geos-common/common/zerobss.s index 48fc5a89a..85d3e03eb 100644 --- a/libsrc/geos-common/common/zerobss.s +++ b/libsrc/geos-common/common/zerobss.s @@ -7,7 +7,7 @@ .export zerobss .import __BSS_RUN__, __BSS_SIZE__ - + .include "jumptab.inc" .include "geossym.inc" diff --git a/libsrc/geos-common/conio/_scrsize.s b/libsrc/geos-common/conio/_scrsize.s index 01aac96a4..ffb17dec6 100644 --- a/libsrc/geos-common/conio/_scrsize.s +++ b/libsrc/geos-common/conio/_scrsize.s @@ -11,10 +11,10 @@ .importzp cursor_r, cursor_c .import _cursor .constructor initscrsize - + .include "geossym.inc" -.segment "INIT" +.segment "ONCE" initscrsize: .ifdef __GEOS_CBM__ @@ -38,12 +38,12 @@ L1: lda #40 ; 40 columns (more or less) .code -screensize: +screensize: ldx xsize ldy ysize rts -.bss +.segment "INIT" xsize: .res 1 diff --git a/libsrc/geos-common/conio/cclear.s b/libsrc/geos-common/conio/cclear.s index 9857f70e8..903b9fe92 100644 --- a/libsrc/geos-common/conio/cclear.s +++ b/libsrc/geos-common/conio/cclear.s @@ -7,7 +7,7 @@ ; void cclear (unsigned char length); .export _cclearxy, _cclear - .import popa, _gotoxy, fixcursor + .import gotoxy, fixcursor .importzp cursor_x, cursor_y, cursor_c .include "jumptab.inc" @@ -15,8 +15,7 @@ _cclearxy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length _cclear: diff --git a/libsrc/geos-common/conio/chline.s b/libsrc/geos-common/conio/chline.s index 328d01a01..1cf7a41f0 100644 --- a/libsrc/geos-common/conio/chline.s +++ b/libsrc/geos-common/conio/chline.s @@ -7,7 +7,7 @@ ; void chline (unsigned char length); .export _chlinexy, _chline - .import popa, _gotoxy, fixcursor + .import gotoxy, fixcursor .importzp cursor_x, cursor_y, cursor_c .include "jumptab.inc" @@ -15,8 +15,7 @@ _chlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length _chline: diff --git a/libsrc/geos-common/conio/cputc.s b/libsrc/geos-common/conio/cputc.s index 55674d583..af4194312 100644 --- a/libsrc/geos-common/conio/cputc.s +++ b/libsrc/geos-common/conio/cputc.s @@ -19,12 +19,11 @@ ; ESC_GRAPHICS, ESC_RULER, GOTOX, GOTOY, GOTOXY, NEWCARDSET, all 1..8 ; ; note that there are conflicts between control characters and keyboard: -; HOME = KEY_ENTER, KEY_HOME = REV_ON, +; HOME = KEY_ENTER, KEY_HOME = REV_ON, ; UPLINE = ?, KEY_UPARROW = GOTOY, ... .export _cputcxy, _cputc - .import _gotoxy, fixcursor - .import popa + .import gotoxy, fixcursor .import xsize,ysize .importzp cursor_x, cursor_y, cursor_c, cursor_r @@ -34,8 +33,7 @@ _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C ; Plot a character - also used as internal function diff --git a/libsrc/geos-common/conio/cvline.s b/libsrc/geos-common/conio/cvline.s index ade7f34c9..9aa3d3eee 100644 --- a/libsrc/geos-common/conio/cvline.s +++ b/libsrc/geos-common/conio/cvline.s @@ -7,7 +7,7 @@ ; void cvline (unsigned char length); .export _cvlinexy, _cvline - .import popa, _gotoxy, fixcursor + .import gotoxy, fixcursor .importzp cursor_x, cursor_y, cursor_r .include "jumptab.inc" @@ -15,11 +15,10 @@ _cvlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length -_cvline: +_cvline: cmp #0 ; Is the length zero? beq L9 ; Jump if done tax diff --git a/libsrc/geos-common/conio/gotoxy.s b/libsrc/geos-common/conio/gotoxy.s index 48b413d5f..0519a7d59 100644 --- a/libsrc/geos-common/conio/gotoxy.s +++ b/libsrc/geos-common/conio/gotoxy.s @@ -8,7 +8,7 @@ ; void gotoy (unsigned char y); ; void gotoxy (unsigned char x, unsigned char y); - .export _gotox, _gotoy, _gotoxy, fixcursor + .export _gotox, _gotoy, gotoxy, _gotoxy, fixcursor .import popa .importzp cursor_x, cursor_y, cursor_c, cursor_r @@ -22,6 +22,9 @@ _gotoy: sta cursor_r jmp fixcursor +gotoxy: + jsr popa + _gotoxy: sta cursor_r jsr popa diff --git a/libsrc/geos-common/disk/blkalloc.s b/libsrc/geos-common/disk/blkalloc.s index 6bfcb312c..bace80098 100644 --- a/libsrc/geos-common/disk/blkalloc.s +++ b/libsrc/geos-common/disk/blkalloc.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _BlkAlloc: sta r2L stx r2H diff --git a/libsrc/geos-common/disk/calcblksfree.s b/libsrc/geos-common/disk/calcblksfree.s index 520c8ca61..7e1bb4f52 100644 --- a/libsrc/geos-common/disk/calcblksfree.s +++ b/libsrc/geos-common/disk/calcblksfree.s @@ -11,8 +11,12 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _CalcBlksFree: + lda #<curDirHead + ldx #>curDirHead + sta r5L + stx r5H jsr CalcBlksFree stx __oserror lda r4L diff --git a/libsrc/geos-common/disk/freeblock.s b/libsrc/geos-common/disk/freeblock.s index cd8b08d2f..da9a83f86 100644 --- a/libsrc/geos-common/disk/freeblock.s +++ b/libsrc/geos-common/disk/freeblock.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _FreeBlock: jsr gettrse sta r6L diff --git a/libsrc/geos-common/disk/getblock.s b/libsrc/geos-common/disk/getblock.s index cef7ece6f..bb1690827 100644 --- a/libsrc/geos-common/disk/getblock.s +++ b/libsrc/geos-common/disk/getblock.s @@ -12,7 +12,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _GetBlock: sta r4L stx r4H diff --git a/libsrc/geos-common/disk/getptrcurdknm.s b/libsrc/geos-common/disk/getptrcurdknm.s index 7a99225ef..d92e5d91e 100644 --- a/libsrc/geos-common/disk/getptrcurdknm.s +++ b/libsrc/geos-common/disk/getptrcurdknm.s @@ -12,8 +12,8 @@ .include "jumptab.inc" .include "geossym.inc" - -_GetPtrCurDkNm: + +_GetPtrCurDkNm: sta ptr3 stx ptr3+1 ldx #ptr4 diff --git a/libsrc/geos-common/disk/nxtblkalloc.s b/libsrc/geos-common/disk/nxtblkalloc.s index 7427f3de0..560eb0945 100644 --- a/libsrc/geos-common/disk/nxtblkalloc.s +++ b/libsrc/geos-common/disk/nxtblkalloc.s @@ -13,7 +13,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _NxtBlkAlloc: sta r2L stx r2H diff --git a/libsrc/geos-common/disk/opendisk.s b/libsrc/geos-common/disk/opendisk.s index 66bd24d30..9de5fb1d7 100644 --- a/libsrc/geos-common/disk/opendisk.s +++ b/libsrc/geos-common/disk/opendisk.s @@ -10,7 +10,7 @@ .include "jumptab.inc" .include "diskdrv.inc" - + _OpenDisk: jsr OpenDisk jmp setoserror diff --git a/libsrc/geos-common/disk/putblock.s b/libsrc/geos-common/disk/putblock.s index df1af9f19..4c17274e1 100644 --- a/libsrc/geos-common/disk/putblock.s +++ b/libsrc/geos-common/disk/putblock.s @@ -12,7 +12,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _PutBlock: sta r4L stx r4H diff --git a/libsrc/geos-common/disk/putdirhead.s b/libsrc/geos-common/disk/putdirhead.s index 411b64307..afd7f9b39 100644 --- a/libsrc/geos-common/disk/putdirhead.s +++ b/libsrc/geos-common/disk/putdirhead.s @@ -10,7 +10,7 @@ .include "jumptab.inc" .include "diskdrv.inc" - + _PutDirHead: jsr PutDirHead jmp setoserror diff --git a/libsrc/geos-common/disk/setnextfree.s b/libsrc/geos-common/disk/setnextfree.s index 410532cea..b24f16f6f 100644 --- a/libsrc/geos-common/disk/setnextfree.s +++ b/libsrc/geos-common/disk/setnextfree.s @@ -12,7 +12,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _SetNextFree: jsr gettrse sta r3L diff --git a/libsrc/geos-common/dlgbox/messagebox.c b/libsrc/geos-common/dlgbox/messagebox.c index 533267be1..141a84b89 100644 --- a/libsrc/geos-common/dlgbox/messagebox.c +++ b/libsrc/geos-common/dlgbox/messagebox.c @@ -7,24 +7,25 @@ #include <geos.h> #include <stdio.h> +#include <stdarg.h> void _mbprintout(void); -static dlgBoxStr _mbdlg_EMPTY = { +static const dlgBoxStr _mbdlg_EMPTY = { DB_DEFPOS(1), DB_OPVEC(&RstrFrmDialogue), DB_USRROUT(&_mbprintout), DB_END, }; -static dlgBoxStr _mbdlg_OK = { +static const dlgBoxStr _mbdlg_OK = { DB_DEFPOS(1), DB_USRROUT(&_mbprintout), DB_ICON(OK, DBI_X_1, DBI_Y_2), DB_END, }; -static dlgBoxStr _mbdlg_OKCANCEL = { +static const dlgBoxStr _mbdlg_OKCANCEL = { DB_DEFPOS(1), DB_USRROUT(&_mbprintout), DB_ICON(OK, DBI_X_0, DBI_Y_2), @@ -32,7 +33,7 @@ static dlgBoxStr _mbdlg_OKCANCEL = { DB_END, }; -static dlgBoxStr _mbdlg_YESNO = { +static const dlgBoxStr _mbdlg_YESNO = { DB_DEFPOS(1), DB_USRROUT(&_mbprintout), DB_ICON(YES, DBI_X_0, DBI_Y_2), @@ -40,7 +41,7 @@ static dlgBoxStr _mbdlg_YESNO = { DB_END, }; -static dlgBoxStr *_mbboxes[] = { +static const dlgBoxStr * const _mbboxes[] = { &_mbdlg_EMPTY, &_mbdlg_OK, &_mbdlg_OKCANCEL, diff --git a/libsrc/geos-common/dlgbox/rstrfrmdialogue.s b/libsrc/geos-common/dlgbox/rstrfrmdialogue.s index efee17465..9119770a0 100644 --- a/libsrc/geos-common/dlgbox/rstrfrmdialogue.s +++ b/libsrc/geos-common/dlgbox/rstrfrmdialogue.s @@ -8,5 +8,5 @@ .export _RstrFrmDialogue .include "jumptab.inc" - + _RstrFrmDialogue = RstrFrmDialogue diff --git a/libsrc/geos-common/drivers/fio_module.s b/libsrc/geos-common/drivers/fio_module.s index b757e6bd8..1314fc4c5 100644 --- a/libsrc/geos-common/drivers/fio_module.s +++ b/libsrc/geos-common/drivers/fio_module.s @@ -13,7 +13,7 @@ FILEDES = 3 ; first free to use file descriptor .importzp ptr1, ptr2, ptr3, tmp1 - .import addysp, popax + .import addysp, popax, popptr1 .import __oserror .import _FindFile, _ReadByte .export _open, _close, _read @@ -37,24 +37,22 @@ _open: @parmok: jsr popax ; Get flags sta tmp1 - jsr popax ; Get name - sta ptr1 - stx ptr1+1 - + jsr popptr1 ; Get name + lda filedesc ; is there a file already open? bne @alreadyopen - + lda tmp1 ; check open mode and #(O_RDWR | O_CREAT) cmp #O_RDONLY ; only O_RDONLY is valid bne @badmode - + lda ptr1 ldx ptr1+1 jsr _FindFile ; try to find the file tax bne @oserror - + lda dirEntryBuf + OFF_DE_TR_SC ; tr&se for ReadByte (r1) sta f_track lda dirEntryBuf + OFF_DE_TR_SC + 1 @@ -96,11 +94,12 @@ _read: ; popax - fd, must be == to the above one ; return -1+__oserror or number of bytes read - eor #$ff - sta ptr1 - txa - eor #$ff - sta ptr1+1 ; -(# of bytes to read)-1 + inx + stx ptr1+1 + tax + inx + stx ptr1 ; save count with each byte incremented separately + jsr popax sta ptr2 stx ptr2+1 ; buffer ptr @@ -154,9 +153,9 @@ _read: beq @done ; yes, we're done jmp __mappederrno ; no, we're screwed -@L3: inc ptr1 ; decrement the count +@L3: dec ptr1 ; decrement the count bne @L0 - inc ptr1+1 + dec ptr1+1 bne @L0 @done: diff --git a/libsrc/geos-common/drivers/geos-stdmou.s b/libsrc/geos-common/drivers/geos-stdmou.s index 7e544ba82..88bbc7df9 100644 --- a/libsrc/geos-common/drivers/geos-stdmou.s +++ b/libsrc/geos-common/drivers/geos-stdmou.s @@ -5,7 +5,7 @@ ; ; Driver for GEOS standard input device interface ; - + .export _mouse_init, _mouse_done .export _mouse_hide, _mouse_show .export _mouse_box diff --git a/libsrc/geos-common/file/appendrecord.s b/libsrc/geos-common/file/appendrecord.s index 2a7864a13..1ec1e8869 100644 --- a/libsrc/geos-common/file/appendrecord.s +++ b/libsrc/geos-common/file/appendrecord.s @@ -10,7 +10,7 @@ .include "jumptab.inc" .include "diskdrv.inc" - + _AppendRecord: jsr AppendRecord diff --git a/libsrc/geos-common/file/closerecordfile.s b/libsrc/geos-common/file/closerecordfile.s index ee0778d7b..1c8b19b01 100644 --- a/libsrc/geos-common/file/closerecordfile.s +++ b/libsrc/geos-common/file/closerecordfile.s @@ -10,7 +10,7 @@ .include "jumptab.inc" .include "diskdrv.inc" - + _CloseRecordFile: jsr CloseRecordFile jmp setoserror diff --git a/libsrc/geos-common/file/deletefile.s b/libsrc/geos-common/file/deletefile.s index 730569e55..b9d994142 100644 --- a/libsrc/geos-common/file/deletefile.s +++ b/libsrc/geos-common/file/deletefile.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _DeleteFile: sta r0L stx r0H diff --git a/libsrc/geos-common/file/deleterecord.s b/libsrc/geos-common/file/deleterecord.s index 7ffe5d739..fac73f665 100644 --- a/libsrc/geos-common/file/deleterecord.s +++ b/libsrc/geos-common/file/deleterecord.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _DeleteRecord: jsr DeleteRecord jmp setoserror diff --git a/libsrc/geos-common/file/findfile.s b/libsrc/geos-common/file/findfile.s index 0f58e99e6..285e8d650 100644 --- a/libsrc/geos-common/file/findfile.s +++ b/libsrc/geos-common/file/findfile.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _FindFile: sta r6L stx r6H diff --git a/libsrc/geos-common/file/freefile.s b/libsrc/geos-common/file/freefile.s index 791f3f31c..03a8b9d88 100644 --- a/libsrc/geos-common/file/freefile.s +++ b/libsrc/geos-common/file/freefile.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _FreeFile: sta r9L stx r9H diff --git a/libsrc/geos-common/file/get1stdirentry.s b/libsrc/geos-common/file/get1stdirentry.s index 3b99554eb..f0ad59388 100644 --- a/libsrc/geos-common/file/get1stdirentry.s +++ b/libsrc/geos-common/file/get1stdirentry.s @@ -1,11 +1,11 @@ ; -; Maciej 'YTM/Alliance' Witkowiak +; 1999-10-26, Maciej 'YTM/Alliance' Witkowiak +; 2020-10-29, Greg King ; -; 26.10.99 ; struct filehandle* Get1stDirEntry (void); - .import __oserror + .import __oserror, return0 .export _Get1stDirEntry .include "diskdrv.inc" @@ -14,6 +14,10 @@ _Get1stDirEntry: jsr Get1stDirEntry stx __oserror + txa + bne L1 ; jump if disk error lda r5L ldx r5H rts + +L1: jmp return0 ; return NULL if not valid entry diff --git a/libsrc/geos-common/file/getfhdrinfo.s b/libsrc/geos-common/file/getfhdrinfo.s index a9a843e74..1503b1cf1 100644 --- a/libsrc/geos-common/file/getfhdrinfo.s +++ b/libsrc/geos-common/file/getfhdrinfo.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _GetFHdrInfo: sta r9L stx r9H diff --git a/libsrc/geos-common/file/getfile.s b/libsrc/geos-common/file/getfile.s index 9c8011542..24f87e859 100644 --- a/libsrc/geos-common/file/getfile.s +++ b/libsrc/geos-common/file/getfile.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _GetFile: sta r3L stx r3H diff --git a/libsrc/geos-common/file/getnxtdirentry.s b/libsrc/geos-common/file/getnxtdirentry.s index 912f48ca4..e8ccbf3a2 100644 --- a/libsrc/geos-common/file/getnxtdirentry.s +++ b/libsrc/geos-common/file/getnxtdirentry.s @@ -1,11 +1,11 @@ ; -; Maciej 'YTM/Alliance' Witkowiak +; 1999-10-26, Maciej 'YTM/Alliance' Witkowiak +; 2020-10-29, Greg King ; -; 26.10.99 ; struct filehandle* GetNxtDirEntry (void); - .import __oserror + .import __oserror, return0 .export _GetNxtDirEntry .include "diskdrv.inc" @@ -14,6 +14,12 @@ _GetNxtDirEntry: jsr GetNxtDirEntry stx __oserror + txa + bne L1 ; jump if disk error + tya + bne L1 ; jump when no more entries lda r5L ldx r5H rts + +L1: jmp return0 ; return NULL if not valid entry diff --git a/libsrc/geos-common/file/openrecordfile.s b/libsrc/geos-common/file/openrecordfile.s index cdab3dd6c..cba5d7c08 100644 --- a/libsrc/geos-common/file/openrecordfile.s +++ b/libsrc/geos-common/file/openrecordfile.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _OpenRecordFile: sta r0L stx r0H diff --git a/libsrc/geos-common/file/pointrecord.s b/libsrc/geos-common/file/pointrecord.s index 82b88c4c6..29294737d 100644 --- a/libsrc/geos-common/file/pointrecord.s +++ b/libsrc/geos-common/file/pointrecord.s @@ -10,7 +10,7 @@ .include "jumptab.inc" .include "diskdrv.inc" - + _PointRecord: jsr PointRecord jmp setoserror diff --git a/libsrc/geos-common/file/readfile.s b/libsrc/geos-common/file/readfile.s index 3b43cffd4..d8b941cde 100644 --- a/libsrc/geos-common/file/readfile.s +++ b/libsrc/geos-common/file/readfile.s @@ -12,7 +12,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _ReadFile: sta r2L stx r2H diff --git a/libsrc/geos-common/file/readrecord.s b/libsrc/geos-common/file/readrecord.s index dd464e0b1..be155c718 100644 --- a/libsrc/geos-common/file/readrecord.s +++ b/libsrc/geos-common/file/readrecord.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _ReadRecord: sta r2L stx r2H diff --git a/libsrc/geos-common/file/writerecord.s b/libsrc/geos-common/file/writerecord.s index e0d4c86d4..33b5fef31 100644 --- a/libsrc/geos-common/file/writerecord.s +++ b/libsrc/geos-common/file/writerecord.s @@ -11,7 +11,7 @@ .include "jumptab.inc" .include "diskdrv.inc" .include "geossym.inc" - + _WriteRecord: sta r2L stx r2H diff --git a/libsrc/geos-common/geosmac.inc b/libsrc/geos-common/geosmac.inc index 5ce20ff7f..6398b7a0b 100644 --- a/libsrc/geos-common/geosmac.inc +++ b/libsrc/geos-common/geosmac.inc @@ -136,7 +136,7 @@ Skip: ;------------------------------------------------------------------------- .macro CmpW source, dest -.local Skip +.local Skip CmpB source+1, dest+1 bne Skip CmpB source+0, dest+0 @@ -203,7 +203,7 @@ Skip: .macro rmb bitNumber, dest pha - lda #(1 << bitNumber) ^ $ff + lda #(1 << bitNumber) ^ $ff and dest sta dest pla diff --git a/libsrc/geos-common/graph/bitotherclip.s b/libsrc/geos-common/graph/bitotherclip.s index ef849f6d7..020139da8 100644 --- a/libsrc/geos-common/graph/bitotherclip.s +++ b/libsrc/geos-common/graph/bitotherclip.s @@ -3,7 +3,7 @@ ; ; 21.12.99 -; void BitOtherClip (void *proc1, void* proc2, char skipl, char skipr, int skipy, +; void BitOtherClip (void *proc1, void* proc2, char skipl, char skipr, int skipy, ; struct iconpic *myGfx); ; both proc1, proc2 should be: char __fastcall something (void); diff --git a/libsrc/geos-common/graph/framerectangle.s b/libsrc/geos-common/graph/framerectangle.s index c5f9de04c..eb3ea8df6 100644 --- a/libsrc/geos-common/graph/framerectangle.s +++ b/libsrc/geos-common/graph/framerectangle.s @@ -8,5 +8,5 @@ .export _FrameRectangle .include "jumptab.inc" - + _FrameRectangle = FrameRectangle diff --git a/libsrc/geos-common/graph/graphicsstring.s b/libsrc/geos-common/graph/graphicsstring.s index 86c74f1a6..282649284 100644 --- a/libsrc/geos-common/graph/graphicsstring.s +++ b/libsrc/geos-common/graph/graphicsstring.s @@ -3,7 +3,7 @@ ; ; 25.12.99 -; void GraphicsString (char *myString); +; void GraphicsString (const void *myString); .export _GraphicsString diff --git a/libsrc/geos-common/graph/imprintrectangle.s b/libsrc/geos-common/graph/imprintrectangle.s index fc327e9d3..08b28690d 100644 --- a/libsrc/geos-common/graph/imprintrectangle.s +++ b/libsrc/geos-common/graph/imprintrectangle.s @@ -4,10 +4,10 @@ ; 21.12.99 ; void ImprintRectangle (void); - + .export _ImprintRectangle .include "jumptab.inc" - + _ImprintRectangle = ImprintRectangle diff --git a/libsrc/geos-common/graph/invertline.s b/libsrc/geos-common/graph/invertline.s index baa4a6e5a..72fb87afb 100644 --- a/libsrc/geos-common/graph/invertline.s +++ b/libsrc/geos-common/graph/invertline.s @@ -9,7 +9,7 @@ .export _InvertLine .include "jumptab.inc" - + _InvertLine: jsr HLineRegs jmp InvertLine diff --git a/libsrc/geos-common/graph/invertrectangle.s b/libsrc/geos-common/graph/invertrectangle.s index 084187255..52750a8e9 100644 --- a/libsrc/geos-common/graph/invertrectangle.s +++ b/libsrc/geos-common/graph/invertrectangle.s @@ -6,7 +6,7 @@ ; void InvertRectangle (void); .export _InvertRectangle - + .include "jumptab.inc" _InvertRectangle = InvertRectangle diff --git a/libsrc/geos-common/graph/recoverline.s b/libsrc/geos-common/graph/recoverline.s index edc366114..8214242d3 100644 --- a/libsrc/geos-common/graph/recoverline.s +++ b/libsrc/geos-common/graph/recoverline.s @@ -7,7 +7,7 @@ .import HLineRegs .export _RecoverLine - + .include "jumptab.inc" _RecoverLine: diff --git a/libsrc/geos-common/graph/recoverrectangle.s b/libsrc/geos-common/graph/recoverrectangle.s index 009ca81eb..2e494fcbe 100644 --- a/libsrc/geos-common/graph/recoverrectangle.s +++ b/libsrc/geos-common/graph/recoverrectangle.s @@ -4,10 +4,10 @@ ; 29.10.99 ; void RecoverRectangle (void); - + .export _RecoverRectangle .include "jumptab.inc" - + _RecoverRectangle = RecoverRectangle diff --git a/libsrc/geos-common/graph/rectangle.s b/libsrc/geos-common/graph/rectangle.s index a9351c47e..6dc283024 100644 --- a/libsrc/geos-common/graph/rectangle.s +++ b/libsrc/geos-common/graph/rectangle.s @@ -6,7 +6,7 @@ ; void Rectangle (void); .export _Rectangle - + .include "jumptab.inc" _Rectangle = Rectangle diff --git a/libsrc/geos-common/graph/testpoint.s b/libsrc/geos-common/graph/testpoint.s index f2dfb7b5d..ad1dd3fee 100644 --- a/libsrc/geos-common/graph/testpoint.s +++ b/libsrc/geos-common/graph/testpoint.s @@ -10,7 +10,7 @@ .export _TestPoint .include "jumptab.inc" - + _TestPoint: jsr PointRegs jsr TestPoint diff --git a/libsrc/geos-common/graph/verticalline.s b/libsrc/geos-common/graph/verticalline.s index 01fb0b725..1ec89a9d7 100644 --- a/libsrc/geos-common/graph/verticalline.s +++ b/libsrc/geos-common/graph/verticalline.s @@ -5,12 +5,12 @@ ; void VerticalLine (char pattern, char ystart, char yend, int x); - .import popa + .import popa .export _VerticalLine .include "jumptab.inc" .include "geossym.inc" - + _VerticalLine: stx r4H sta r4L diff --git a/libsrc/geos-common/memory/crc.s b/libsrc/geos-common/memory/crc.s index 9ec2feb0c..94ab98f34 100644 --- a/libsrc/geos-common/memory/crc.s +++ b/libsrc/geos-common/memory/crc.s @@ -17,4 +17,3 @@ _CRC: lda r2L ldx r2H rts - \ No newline at end of file diff --git a/libsrc/geos-common/menuicon/doicons.s b/libsrc/geos-common/menuicon/doicons.s index 5ddf06d01..b0456e67f 100644 --- a/libsrc/geos-common/menuicon/doicons.s +++ b/libsrc/geos-common/menuicon/doicons.s @@ -13,4 +13,4 @@ _DoIcons: sta r0L stx r0H - jmp DoIcons \ No newline at end of file + jmp DoIcons diff --git a/libsrc/geos-common/menuicon/domenu.s b/libsrc/geos-common/menuicon/domenu.s index 1624a3852..43a2b5a0c 100644 --- a/libsrc/geos-common/menuicon/domenu.s +++ b/libsrc/geos-common/menuicon/domenu.s @@ -14,4 +14,4 @@ _DoMenu: sta r0L stx r0H lda #0 - jmp DoMenu \ No newline at end of file + jmp DoMenu diff --git a/libsrc/geos-common/menuicon/dopreviousmenu.s b/libsrc/geos-common/menuicon/dopreviousmenu.s index 5ac19b57a..1a92e1fe1 100644 --- a/libsrc/geos-common/menuicon/dopreviousmenu.s +++ b/libsrc/geos-common/menuicon/dopreviousmenu.s @@ -9,4 +9,4 @@ .include "jumptab.inc" -_DoPreviousMenu = DoPreviousMenu \ No newline at end of file +_DoPreviousMenu = DoPreviousMenu diff --git a/libsrc/geos-common/menuicon/gotofirstmenu.s b/libsrc/geos-common/menuicon/gotofirstmenu.s index b5f2306db..a8d00b132 100644 --- a/libsrc/geos-common/menuicon/gotofirstmenu.s +++ b/libsrc/geos-common/menuicon/gotofirstmenu.s @@ -9,4 +9,4 @@ .include "jumptab.inc" -_GotoFirstMenu = GotoFirstMenu \ No newline at end of file +_GotoFirstMenu = GotoFirstMenu diff --git a/libsrc/geos-common/menuicon/recoverallmenus.s b/libsrc/geos-common/menuicon/recoverallmenus.s index 03a8368bf..0420e88be 100644 --- a/libsrc/geos-common/menuicon/recoverallmenus.s +++ b/libsrc/geos-common/menuicon/recoverallmenus.s @@ -9,4 +9,4 @@ .include "jumptab.inc" -_RecoverAllMenus = RecoverAllMenus \ No newline at end of file +_RecoverAllMenus = RecoverAllMenus diff --git a/libsrc/geos-common/menuicon/recovermenu.s b/libsrc/geos-common/menuicon/recovermenu.s index 638d03d16..a8a6870c7 100644 --- a/libsrc/geos-common/menuicon/recovermenu.s +++ b/libsrc/geos-common/menuicon/recovermenu.s @@ -9,4 +9,4 @@ .include "jumptab.inc" -_RecoverMenu = RecoverMenu \ No newline at end of file +_RecoverMenu = RecoverMenu diff --git a/libsrc/geos-common/menuicon/redomenu.s b/libsrc/geos-common/menuicon/redomenu.s index 44d62e807..818102f8b 100644 --- a/libsrc/geos-common/menuicon/redomenu.s +++ b/libsrc/geos-common/menuicon/redomenu.s @@ -9,4 +9,4 @@ .include "jumptab.inc" -_ReDoMenu = ReDoMenu \ No newline at end of file +_ReDoMenu = ReDoMenu diff --git a/libsrc/geos-common/mousesprite/clearmousemode.s b/libsrc/geos-common/mousesprite/clearmousemode.s index 01e659567..635a0fcd4 100644 --- a/libsrc/geos-common/mousesprite/clearmousemode.s +++ b/libsrc/geos-common/mousesprite/clearmousemode.s @@ -9,4 +9,4 @@ .include "jumptab.inc" -_ClearMouseMode = ClearMouseMode \ No newline at end of file +_ClearMouseMode = ClearMouseMode diff --git a/libsrc/geos-common/mousesprite/disablsprite.s b/libsrc/geos-common/mousesprite/disablsprite.s index 95d298094..e6c769e29 100644 --- a/libsrc/geos-common/mousesprite/disablsprite.s +++ b/libsrc/geos-common/mousesprite/disablsprite.s @@ -12,4 +12,4 @@ _DisablSprite: sta r3L - jmp DisablSprite \ No newline at end of file + jmp DisablSprite diff --git a/libsrc/geos-common/mousesprite/drawsprite.s b/libsrc/geos-common/mousesprite/drawsprite.s index 0f4d611c0..90382c63c 100644 --- a/libsrc/geos-common/mousesprite/drawsprite.s +++ b/libsrc/geos-common/mousesprite/drawsprite.s @@ -16,4 +16,4 @@ _DrawSprite: stx r4H jsr popa sta r3L - jmp DrawSprite \ No newline at end of file + jmp DrawSprite diff --git a/libsrc/geos-common/mousesprite/enablsprite.s b/libsrc/geos-common/mousesprite/enablsprite.s index a271d2cdb..404a7cb05 100644 --- a/libsrc/geos-common/mousesprite/enablsprite.s +++ b/libsrc/geos-common/mousesprite/enablsprite.s @@ -12,4 +12,4 @@ _EnablSprite: sta r3L - jmp EnablSprite \ No newline at end of file + jmp EnablSprite diff --git a/libsrc/geos-common/mousesprite/inittextprompt.s b/libsrc/geos-common/mousesprite/inittextprompt.s index 2fc5e58fc..e0c4cc1cd 100644 --- a/libsrc/geos-common/mousesprite/inittextprompt.s +++ b/libsrc/geos-common/mousesprite/inittextprompt.s @@ -9,4 +9,4 @@ .include "jumptab.inc" -_InitTextPrompt = InitTextPrompt \ No newline at end of file +_InitTextPrompt = InitTextPrompt diff --git a/libsrc/geos-common/mousesprite/ismseinregion.s b/libsrc/geos-common/mousesprite/ismseinregion.s index 0617490c5..da14c9fe8 100644 --- a/libsrc/geos-common/mousesprite/ismseinregion.s +++ b/libsrc/geos-common/mousesprite/ismseinregion.s @@ -7,7 +7,7 @@ .import _InitDrawWindow .export _IsMseInRegion - + .include "jumptab.inc" _IsMseInRegion: diff --git a/libsrc/geos-common/mousesprite/mouseoff.s b/libsrc/geos-common/mousesprite/mouseoff.s index a918bb612..b48d30807 100644 --- a/libsrc/geos-common/mousesprite/mouseoff.s +++ b/libsrc/geos-common/mousesprite/mouseoff.s @@ -9,4 +9,4 @@ .include "jumptab.inc" -_MouseOff = MouseOff \ No newline at end of file +_MouseOff = MouseOff diff --git a/libsrc/geos-common/mousesprite/mouseup.s b/libsrc/geos-common/mousesprite/mouseup.s index 45b4e83c2..8f7b4e0f6 100644 --- a/libsrc/geos-common/mousesprite/mouseup.s +++ b/libsrc/geos-common/mousesprite/mouseup.s @@ -9,4 +9,4 @@ .include "jumptab.inc" -_MouseUp = MouseUp \ No newline at end of file +_MouseUp = MouseUp diff --git a/libsrc/geos-common/mousesprite/possprite.s b/libsrc/geos-common/mousesprite/possprite.s index 24e8bd14c..5543cb3c6 100644 --- a/libsrc/geos-common/mousesprite/possprite.s +++ b/libsrc/geos-common/mousesprite/possprite.s @@ -26,4 +26,4 @@ _PosSprite: sta r5L jsr popa sta r3L - jmp PosSprite \ No newline at end of file + jmp PosSprite diff --git a/libsrc/geos-common/mousesprite/startmousemode.s b/libsrc/geos-common/mousesprite/startmousemode.s index 06a547714..26d969744 100644 --- a/libsrc/geos-common/mousesprite/startmousemode.s +++ b/libsrc/geos-common/mousesprite/startmousemode.s @@ -11,4 +11,4 @@ _StartMouseMode: clc - jmp StartMouseMode \ No newline at end of file + jmp StartMouseMode diff --git a/libsrc/geos-common/process/processblock.s b/libsrc/geos-common/process/processblock.s index 84ead5993..17f07f28c 100644 --- a/libsrc/geos-common/process/processblock.s +++ b/libsrc/geos-common/process/processblock.s @@ -12,11 +12,11 @@ .export _UnblockProcess .include "jumptab.inc" - + _BlockProcess: tax jmp BlockProcess - + _UnblockProcess: tax jmp UnblockProcess diff --git a/libsrc/geos-common/process/processfreeze.s b/libsrc/geos-common/process/processfreeze.s index bda914bdc..e77bec2d7 100644 --- a/libsrc/geos-common/process/processfreeze.s +++ b/libsrc/geos-common/process/processfreeze.s @@ -10,11 +10,11 @@ .export _UnfreezeProcess .include "jumptab.inc" - + _FreezeProcess: tax jmp FreezeProcess - + _UnfreezeProcess: tax jmp UnfreezeProcess diff --git a/libsrc/geos-common/process/processinitrestartenable.s b/libsrc/geos-common/process/processinitrestartenable.s index 800c2dc5f..73f030d56 100644 --- a/libsrc/geos-common/process/processinitrestartenable.s +++ b/libsrc/geos-common/process/processinitrestartenable.s @@ -20,11 +20,11 @@ _InitProcesses: stx r0H jsr popa jmp InitProcesses - + _RestartProcess: tax jmp RestartProcess - + _EnableProcess: tax jmp EnableProcess diff --git a/libsrc/geos-common/symbols.txt b/libsrc/geos-common/symbols.txt index 1be491f62..d1893e376 100644 --- a/libsrc/geos-common/symbols.txt +++ b/libsrc/geos-common/symbols.txt @@ -1,5 +1,5 @@ Source: The Hitchhiker's Guide To GEOS -http://lyonlabs.org/commodore/onrequest/geos-manuals/The_Hitchhikers_Guide_to_GEOS.pdf +https://archive.org/details/The_Hitchhikers_Guide_to_GEOS GEOS Variables diff --git a/libsrc/geos-common/system/callroutine.s b/libsrc/geos-common/system/callroutine.s index 54de4cac7..3213d507e 100644 --- a/libsrc/geos-common/system/callroutine.s +++ b/libsrc/geos-common/system/callroutine.s @@ -9,4 +9,4 @@ .include "jumptab.inc" -_CallRoutine = CallRoutine \ No newline at end of file +_CallRoutine = CallRoutine diff --git a/libsrc/geos-common/system/ctype.s b/libsrc/geos-common/system/ctype.s index cc0cc98b3..b34f68470 100644 --- a/libsrc/geos-common/system/ctype.s +++ b/libsrc/geos-common/system/ctype.s @@ -1,281 +1,157 @@ +; ctype.s +; +; This file is part of +; cc65 - a freeware C compiler for 6502 based systems +; +; https://cc65.github.io +; +; See "LICENSE" file for legal information. +; +; GEOS character specification table. ; ; Source: The Hitchhiker's Guide To GEOS ; http://lyonlabs.org/commodore/onrequest/geos-manuals/The_Hitchhikers_Guide_to_GEOS.pdf -; -; Character specification table. -; - .include "ctype.inc" + .include "ctypetable.inc" + .export __ctypeidx + +; The tables are readonly, put them into the rodata segment .rodata -; The following 256 byte wide table specifies attributes for the isxxx type -; of functions. Doing it by a table means some overhead in space, but it -; has major advantages: -; -; * It is fast. If it were'nt for the slow parameter passing of cc65, one -; could even define macros for the isxxx functions (this is usually -; done on other platforms). -; -; * It is highly portable. The only unportable part is the table itself, -; all real code goes into the common library. -; -; * We save some code in the isxxx functions. +__ctypeidx: + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 0/00 ____NULL___, 1/01 ____N/A____ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 2/02 ____N/A____, 3/03 ____N/A____ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 4/04 ____N/A____, 5/05 ____N/A____ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 6/06 ____N/A____, 7/07 ____N/A____ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_SPACETAB_IDX ; 8/08 __BAKSPACE_, 9/09 __FWDSPACE_ + ct_mix CT_CTRL_WS_IDX, CT_CTRL_IDX ; 10/0a _____LF____, 11/0b ____HOME___ + ct_mix CT_CTRL_IDX, CT_CTRL_WS_IDX ; 12/0c ___UPLINE__, 13/0d _____CR____ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 14/0e __ULINEON__, 15/0f __ULINEOFF_ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 16/10 _ESC_GRAPH_, 17/11 ____N/A____ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 18/12 ___REVON___, 19/13 ___REVOFF__ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 20/14 ___GOTOX___, 21/15 ___GOTOY___ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 22/16 ___GOTOXY__, 23/17 _NEWCRDSET_ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 24/18 ___BOLDON__, 25/19 __ITALICON_ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 26/1a _OUTLINEON_, 27/1b _PLAINTEXT_ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 28/1c ____N/A____, 29/1d ____N/A____ + ct_mix CT_CTRL_IDX, CT_CTRL_IDX ; 30/1e ____N/A____, 31/1f ____N/A____ -__ctype: - .byte CT_CTRL ; 0/00 ____NULL___ - .byte CT_CTRL ; 1/01 ____N/A____ - .byte CT_CTRL ; 2/02 ____N/A____ - .byte CT_CTRL ; 3/03 ____N/A____ - .byte CT_CTRL ; 4/04 ____N/A____ - .byte CT_CTRL ; 5/05 ____N/A____ - .byte CT_CTRL ; 6/06 ____N/A____ - .byte CT_CTRL ; 7/07 ____N/A____ - .byte CT_CTRL ; 8/08 __BAKSPACE_ - .byte CT_CTRL | CT_OTHER_WS | CT_SPACE_TAB ; 9/09 __FWDSPACE_ - .byte CT_CTRL | CT_OTHER_WS ; 10/0a _____LF____ - .byte CT_CTRL ; 11/0b ____HOME___ - .byte CT_CTRL ; 12/0c ___UPLINE__ - .byte CT_CTRL | CT_OTHER_WS ; 13/0d _____CR____ - .byte CT_CTRL ; 14/0e __ULINEON__ - .byte CT_CTRL ; 15/0f __ULINEOFF_ - .byte CT_CTRL ; 16/10 _ESC_GRAPH_ - .byte CT_CTRL ; 17/11 ____N/A____ - .byte CT_CTRL ; 18/12 ___REVON___ - .byte CT_CTRL ; 19/13 ___REVOFF__ - .byte CT_CTRL ; 20/14 ___GOTOX___ - .byte CT_CTRL ; 21/15 ___GOTOY___ - .byte CT_CTRL ; 22/16 ___GOTOXY__ - .byte CT_CTRL ; 23/17 _NEWCRDSET_ - .byte CT_CTRL ; 24/18 ___BOLDON__ - .byte CT_CTRL ; 25/19 __ITALICON_ - .byte CT_CTRL ; 26/1a _OUTLINEON_ - .byte CT_CTRL ; 27/1b _PLAINTEXT_ - .byte CT_CTRL ; 28/1c ____N/A____ - .byte CT_CTRL ; 29/1d ____N/A____ - .byte CT_CTRL ; 30/1e ____N/A____ - .byte CT_CTRL ; 31/1f ____N/A____ - .byte CT_SPACE_TAB | CT_SPACE ; 32/20 ___SPACE___ - .byte CT_NONE ; 33/21 _____!_____ - .byte CT_NONE ; 34/22 _____"_____ - .byte CT_NONE ; 35/23 _____#_____ - .byte CT_NONE ; 36/24 _____$_____ - .byte CT_NONE ; 37/25 _____%_____ - .byte CT_NONE ; 38/26 _____&_____ - .byte CT_NONE ; 39/27 _____'_____ - .byte CT_NONE ; 40/28 _____(_____ - .byte CT_NONE ; 41/29 _____)_____ - .byte CT_NONE ; 42/2a _____*_____ - .byte CT_NONE ; 43/2b _____+_____ - .byte CT_NONE ; 44/2c _____,_____ - .byte CT_NONE ; 45/2d _____-_____ - .byte CT_NONE ; 46/2e _____._____ - .byte CT_NONE ; 47/2f _____/_____ - .byte CT_DIGIT | CT_XDIGIT ; 48/30 _____0_____ - .byte CT_DIGIT | CT_XDIGIT ; 49/31 _____1_____ - .byte CT_DIGIT | CT_XDIGIT ; 50/32 _____2_____ - .byte CT_DIGIT | CT_XDIGIT ; 51/33 _____3_____ - .byte CT_DIGIT | CT_XDIGIT ; 52/34 _____4_____ - .byte CT_DIGIT | CT_XDIGIT ; 53/35 _____5_____ - .byte CT_DIGIT | CT_XDIGIT ; 54/36 _____6_____ - .byte CT_DIGIT | CT_XDIGIT ; 55/37 _____7_____ - .byte CT_DIGIT | CT_XDIGIT ; 56/38 _____8_____ - .byte CT_DIGIT | CT_XDIGIT ; 57/39 _____9_____ - .byte CT_NONE ; 58/3a _____:_____ - .byte CT_NONE ; 59/3b _____;_____ - .byte CT_NONE ; 60/3c _____<_____ - .byte CT_NONE ; 61/3d _____=_____ - .byte CT_NONE ; 62/3e _____>_____ - .byte CT_NONE ; 63/3f _____?_____ - .byte CT_NONE ; 64/40 _____@_____ - .byte CT_UPPER | CT_XDIGIT ; 65/41 _____A_____ - .byte CT_UPPER | CT_XDIGIT ; 66/42 _____B_____ - .byte CT_UPPER | CT_XDIGIT ; 67/43 _____C_____ - .byte CT_UPPER | CT_XDIGIT ; 68/44 _____D_____ - .byte CT_UPPER | CT_XDIGIT ; 69/45 _____E_____ - .byte CT_UPPER | CT_XDIGIT ; 70/46 _____F_____ - .byte CT_UPPER ; 71/47 _____G_____ - .byte CT_UPPER ; 72/48 _____H_____ - .byte CT_UPPER ; 73/49 _____I_____ - .byte CT_UPPER ; 74/4a _____J_____ - .byte CT_UPPER ; 75/4b _____K_____ - .byte CT_UPPER ; 76/4c _____L_____ - .byte CT_UPPER ; 77/4d _____M_____ - .byte CT_UPPER ; 78/4e _____N_____ - .byte CT_UPPER ; 79/4f _____O_____ - .byte CT_UPPER ; 80/50 _____P_____ - .byte CT_UPPER ; 81/51 _____Q_____ - .byte CT_UPPER ; 82/52 _____R_____ - .byte CT_UPPER ; 83/53 _____S_____ - .byte CT_UPPER ; 84/54 _____T_____ - .byte CT_UPPER ; 85/55 _____U_____ - .byte CT_UPPER ; 86/56 _____V_____ - .byte CT_UPPER ; 87/57 _____W_____ - .byte CT_UPPER ; 88/58 _____X_____ - .byte CT_UPPER ; 89/59 _____Y_____ - .byte CT_UPPER ; 90/5a _____Z_____ - .byte CT_NONE ; 91/5b _____[_____ - .byte CT_NONE ; 92/5c _____\_____ - .byte CT_NONE ; 93/5d _____]_____ - .byte CT_NONE ; 94/5e _____^_____ - .byte CT_NONE ; 95/5f _UNDERLINE_ - .byte CT_NONE ; 96/60 _____`_____ - .byte CT_LOWER | CT_XDIGIT ; 97/61 _____a_____ - .byte CT_LOWER | CT_XDIGIT ; 98/62 _____b_____ - .byte CT_LOWER | CT_XDIGIT ; 99/63 _____c_____ - .byte CT_LOWER | CT_XDIGIT ; 100/64 _____d_____ - .byte CT_LOWER | CT_XDIGIT ; 101/65 _____e_____ - .byte CT_LOWER | CT_XDIGIT ; 102/66 _____f_____ - .byte CT_LOWER ; 103/67 _____g_____ - .byte CT_LOWER ; 104/68 _____h_____ - .byte CT_LOWER ; 105/69 _____i_____ - .byte CT_LOWER ; 106/6a _____j_____ - .byte CT_LOWER ; 107/6b _____k_____ - .byte CT_LOWER ; 108/6c _____l_____ - .byte CT_LOWER ; 109/6d _____m_____ - .byte CT_LOWER ; 110/6e _____n_____ - .byte CT_LOWER ; 111/6f _____o_____ - .byte CT_LOWER ; 112/70 _____p_____ - .byte CT_LOWER ; 113/71 _____q_____ - .byte CT_LOWER ; 114/72 _____r_____ - .byte CT_LOWER ; 115/73 _____s_____ - .byte CT_LOWER ; 116/74 _____t_____ - .byte CT_LOWER ; 117/75 _____u_____ - .byte CT_LOWER ; 118/76 _____v_____ - .byte CT_LOWER ; 119/77 _____w_____ - .byte CT_LOWER ; 120/78 _____x_____ - .byte CT_LOWER ; 121/79 _____y_____ - .byte CT_LOWER ; 122/7a _____z_____ - .byte CT_NONE ; 123/7b _____{_____ - .byte CT_NONE ; 124/7c _____|_____ - .byte CT_NONE ; 125/7d _____}_____ - .byte CT_NONE ; 126/7e _____~_____ - .byte CT_CTRL ; 127/7f __USELAST__ - .byte CT_NONE ; 128/80 __SHORTCUT_ - .byte CT_NONE ; 129/81 ____N/A____ - .byte CT_NONE ; 130/82 ____N/A____ - .byte CT_NONE ; 131/83 ____N/A____ - .byte CT_NONE ; 132/84 ____N/A____ - .byte CT_NONE ; 133/85 ____N/A____ - .byte CT_NONE ; 134/86 ____N/A____ - .byte CT_NONE ; 135/87 ____N/A____ - .byte CT_NONE ; 136/88 ____N/A____ - .byte CT_NONE ; 137/89 ____N/A____ - .byte CT_NONE ; 138/8a ____N/A____ - .byte CT_NONE ; 139/8b ____N/A____ - .byte CT_NONE ; 140/8c ____N/A____ - .byte CT_NONE ; 141/8d ____N/A____ - .byte CT_NONE ; 142/8e ____N/A____ - .byte CT_NONE ; 143/8f ____N/A____ - .byte CT_NONE ; 144/90 ____N/A____ - .byte CT_NONE ; 145/91 ____N/A____ - .byte CT_NONE ; 146/92 ____N/A____ - .byte CT_NONE ; 147/93 ____N/A____ - .byte CT_NONE ; 148/94 ____N/A____ - .byte CT_NONE ; 149/95 ____N/A____ - .byte CT_NONE ; 150/96 ____N/A____ - .byte CT_NONE ; 151/97 ____N/A____ - .byte CT_NONE ; 152/98 ____N/A____ - .byte CT_NONE ; 153/99 ____N/A____ - .byte CT_NONE ; 154/9a ____N/A____ - .byte CT_NONE ; 155/9b ____N/A____ - .byte CT_NONE ; 156/9c ____N/A____ - .byte CT_NONE ; 157/9d ____N/A____ - .byte CT_NONE ; 158/9e ____N/A____ - .byte CT_NONE ; 159/9f ____N/A____ - .byte CT_NONE ; 160/a0 ____N/A____ - .byte CT_NONE ; 161/a1 ____N/A____ - .byte CT_NONE ; 162/a2 ____N/A____ - .byte CT_NONE ; 163/a3 ____N/A____ - .byte CT_NONE ; 164/a4 ____N/A____ - .byte CT_NONE ; 165/a5 ____N/A____ - .byte CT_NONE ; 166/a6 ____N/A____ - .byte CT_NONE ; 167/a7 ____N/A____ - .byte CT_NONE ; 168/a8 ____N/A____ - .byte CT_NONE ; 169/a9 ____N/A____ - .byte CT_NONE ; 170/aa ____N/A____ - .byte CT_NONE ; 171/ab ____N/A____ - .byte CT_NONE ; 172/ac ____N/A____ - .byte CT_NONE ; 173/ad ____N/A____ - .byte CT_NONE ; 174/ae ____N/A____ - .byte CT_NONE ; 175/af ____N/A____ - .byte CT_NONE ; 176/b0 ____N/A____ - .byte CT_NONE ; 177/b1 ____N/A____ - .byte CT_NONE ; 178/b2 ____N/A____ - .byte CT_NONE ; 179/b3 ____N/A____ - .byte CT_NONE ; 180/b4 ____N/A____ - .byte CT_NONE ; 181/b5 ____N/A____ - .byte CT_NONE ; 182/b6 ____N/A____ - .byte CT_NONE ; 183/b7 ____N/A____ - .byte CT_NONE ; 184/b8 ____N/A____ - .byte CT_NONE ; 185/b9 ____N/A____ - .byte CT_NONE ; 186/ba ____N/A____ - .byte CT_NONE ; 187/bb ____N/A____ - .byte CT_NONE ; 188/bc ____N/A____ - .byte CT_NONE ; 189/bd ____N/A____ - .byte CT_NONE ; 190/be ____N/A____ - .byte CT_NONE ; 191/bf ____N/A____ - .byte CT_NONE ; 192/c0 ____N/A____ - .byte CT_NONE ; 193/c1 ____N/A____ - .byte CT_NONE ; 194/c2 ____N/A____ - .byte CT_NONE ; 195/c3 ____N/A____ - .byte CT_NONE ; 196/c4 ____N/A____ - .byte CT_NONE ; 197/c5 ____N/A____ - .byte CT_NONE ; 198/c6 ____N/A____ - .byte CT_NONE ; 199/c7 ____N/A____ - .byte CT_NONE ; 200/c8 ____N/A____ - .byte CT_NONE ; 201/c9 ____N/A____ - .byte CT_NONE ; 202/ca ____N/A____ - .byte CT_NONE ; 203/cb ____N/A____ - .byte CT_NONE ; 204/cc ____N/A____ - .byte CT_NONE ; 205/cd ____N/A____ - .byte CT_NONE ; 206/ce ____N/A____ - .byte CT_NONE ; 207/cf ____N/A____ - .byte CT_NONE ; 208/d0 ____N/A____ - .byte CT_NONE ; 209/d1 ____N/A____ - .byte CT_NONE ; 210/d2 ____N/A____ - .byte CT_NONE ; 211/d3 ____N/A____ - .byte CT_NONE ; 212/d4 ____N/A____ - .byte CT_NONE ; 213/d5 ____N/A____ - .byte CT_NONE ; 214/d6 ____N/A____ - .byte CT_NONE ; 215/d7 ____N/A____ - .byte CT_NONE ; 216/d8 ____N/A____ - .byte CT_NONE ; 217/d9 ____N/A____ - .byte CT_NONE ; 218/da ____N/A____ - .byte CT_NONE ; 219/db ____N/A____ - .byte CT_NONE ; 220/dc ____N/A____ - .byte CT_NONE ; 221/dd ____N/A____ - .byte CT_NONE ; 222/de ____N/A____ - .byte CT_NONE ; 223/df ____N/A____ - .byte CT_NONE ; 224/e0 ____N/A____ - .byte CT_NONE ; 225/e1 ____N/A____ - .byte CT_NONE ; 226/e2 ____N/A____ - .byte CT_NONE ; 227/e3 ____N/A____ - .byte CT_NONE ; 228/e4 ____N/A____ - .byte CT_NONE ; 229/e5 ____N/A____ - .byte CT_NONE ; 230/e6 ____N/A____ - .byte CT_NONE ; 231/e7 ____N/A____ - .byte CT_NONE ; 232/e8 ____N/A____ - .byte CT_NONE ; 233/e9 ____N/A____ - .byte CT_NONE ; 234/ea ____N/A____ - .byte CT_NONE ; 235/eb ____N/A____ - .byte CT_NONE ; 236/ec ____N/A____ - .byte CT_NONE ; 237/ed ____N/A____ - .byte CT_NONE ; 238/ee ____N/A____ - .byte CT_NONE ; 239/ef ____N/A____ - .byte CT_NONE ; 240/f0 ____N/A____ - .byte CT_NONE ; 241/f1 ____N/A____ - .byte CT_NONE ; 242/f2 ____N/A____ - .byte CT_NONE ; 243/f3 ____N/A____ - .byte CT_NONE ; 244/f4 ____N/A____ - .byte CT_NONE ; 245/f5 ____N/A____ - .byte CT_NONE ; 246/f6 ____N/A____ - .byte CT_NONE ; 247/f7 ____N/A____ - .byte CT_NONE ; 248/f8 ____N/A____ - .byte CT_NONE ; 249/f9 ____N/A____ - .byte CT_NONE ; 250/fa ____N/A____ - .byte CT_NONE ; 251/fb ____N/A____ - .byte CT_NONE ; 252/fc ____N/A____ - .byte CT_NONE ; 253/fd ____N/A____ - .byte CT_NONE ; 254/fe ____N/A____ - .byte CT_NONE ; 255/ff ____N/A____ + ct_mix CT_SPACE_SPACETAB_IDX, CT_NONE_IDX ; 32/20 ___SPACE___, 33/21 _____!_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 34/22 _____"_____, 35/23 _____#_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 36/24 _____$_____, 37/25 _____%_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 38/26 _____&_____, 39/27 _____'_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 40/28 _____(_____, 41/29 _____)_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 42/2a _____*_____, 43/2b _____+_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 44/2c _____,_____, 45/2d _____-_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 46/2e _____._____, 47/2f _____/_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 48/30 _____0_____, 49/31 _____1_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 50/32 _____2_____, 51/33 _____3_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 52/34 _____4_____, 53/35 _____5_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 54/36 _____6_____, 55/37 _____7_____ + ct_mix CT_DIGIT_XDIGIT_IDX, CT_DIGIT_XDIGIT_IDX ; 56/38 _____8_____, 57/39 _____9_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 58/3a _____:_____, 59/3b _____;_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 60/3c _____<_____, 61/3d _____=_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 62/3e _____>_____, 63/3f _____?_____ + + ct_mix CT_NONE_IDX, CT_UPPER_XDIGIT_IDX ; 64/40 _____@_____, 65/41 _____A_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 66/42 _____B_____, 67/43 _____C_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_XDIGIT_IDX ; 68/44 _____D_____, 69/45 _____E_____ + ct_mix CT_UPPER_XDIGIT_IDX, CT_UPPER_IDX ; 70/46 _____F_____, 71/47 _____G_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 72/48 _____H_____, 73/49 _____I_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 74/4a _____J_____, 75/4b _____K_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 76/4c _____L_____, 77/4d _____M_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 78/4e _____N_____, 79/4f _____O_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 80/50 _____P_____, 81/51 _____Q_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 82/52 _____R_____, 83/53 _____S_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 84/54 _____T_____, 85/55 _____U_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 86/56 _____V_____, 87/57 _____W_____ + ct_mix CT_UPPER_IDX, CT_UPPER_IDX ; 88/58 _____X_____, 89/59 _____Y_____ + ct_mix CT_UPPER_IDX, CT_NONE_IDX ; 90/5a _____Z_____, 91/5b _____[_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 92/5c _____\_____, 93/5d _____]_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 94/5e _____^_____, 95/5f _UNDERLINE_ + + ct_mix CT_NONE_IDX, CT_LOWER_XDIGIT_IDX ; 96/60 _____`_____, 97/61 _____a_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 98/62 _____b_____, 99/63 _____c_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_XDIGIT_IDX ; 100/64 _____d_____, 101/65 _____e_____ + ct_mix CT_LOWER_XDIGIT_IDX, CT_LOWER_IDX ; 102/66 _____f_____, 103/67 _____g_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 104/68 _____h_____, 105/69 _____i_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 106/6a _____j_____, 107/6b _____k_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 108/6c _____l_____, 109/6d _____m_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 110/6e _____n_____, 111/6f _____o_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 112/70 _____p_____, 113/71 _____q_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 114/72 _____r_____, 15/73 _____s_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 116/74 _____t_____, 117/75 _____u_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 118/76 _____v_____, 119/77 _____w_____ + ct_mix CT_LOWER_IDX, CT_LOWER_IDX ; 120/78 _____x_____, 121/79 _____y_____ + ct_mix CT_LOWER_IDX, CT_NONE_IDX ; 122/7a _____z_____, 123/7b _____{_____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 124/7c _____|_____, 125/7d _____}_____ + ct_mix CT_NONE_IDX, CT_CTRL_IDX ; 126/7e _____~_____, 127/7f __USELAST__ + + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 128/80 __SHORTCUT_ ,129/81 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 130/82 ____N/A____ ,131/83 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 132/84 ____N/A____ ,133/85 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 134/86 ____N/A____, 135/87 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 136/88 ____N/A____ ,137/89 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 138/8a ____N/A____ ,139/8b ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 140/8c ____N/A____, 141/8d ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 142/8e ____N/A____, 143/8f ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 144/90 ____N/A____, 145/91 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 146/92 ____N/A____, 147/93 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 148/94 ____N/A____, 149/95 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 150/96 ____N/A____, 151/97 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 152/98 ____N/A____, 153/99 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 154/9a ____N/A____, 155/9b ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 156/9c ____N/A____, 157/9d ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 158/9e ____N/A____, 159/9f ____N/A____ + + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 160/a0 ____N/A____, 161/a1 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 162/a2 ____N/A____, 163/a3 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 164/a4 ____N/A____, 165/a5 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 166/a6 ____N/A____, 167/a7 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 168/a8 ____N/A____, 169/a9 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 170/aa ____N/A____, 171/ab ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 172/ac ____N/A____, 173/ad ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 174/ae ____N/A____, 175/af ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 176/b0 ____N/A____, 177/b1 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 178/b2 ____N/A____, 179/b3 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 180/b4 ____N/A____, 181/b5 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 182/b6 ____N/A____, 183/b7 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 184/b8 ____N/A____, 185/b9 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 186/ba ____N/A____, 187/bb ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 188/bc ____N/A____, 189/bd ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 190/be ____N/A____, 191/bf ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 192/c0 ____N/A____, 193/c1 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 194/c2 ____N/A____, 195/c3 ____N/A____ + + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 196/c4 ____N/A____, 197/c5 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 198/c6 ____N/A____, 199/c7 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 200/c8 ____N/A____, 201/c9 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 202/ca ____N/A____, 203/cb ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 204/cc ____N/A____, 205/cd ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 206/ce ____N/A____, 207/cf ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 208/d0 ____N/A____, 209/d1 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 210/d2 ____N/A____, 211/d3 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 212/d4 ____N/A____, 213/d5 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 214/d6 ____N/A____, 215/d7 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 216/d8 ____N/A____, 217/d9 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 218/da ____N/A____, 219/db ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 220/dc ____N/A____, 221/dd ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 222/de ____N/A____, 223/df ____N/A____ + + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 224/e0 ____N/A____, 225/e1 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 226/e2 ____N/A____, 227/e3 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 228/e4 ____N/A____, 229/e5 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 230/e6 ____N/A____, 231/e7 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 232/e8 ____N/A____, 233/e9 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 234/ea ____N/A____, 235/eb ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 236/ec ____N/A____, 237/ed ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 238/ee ____N/A____, 239/ef ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 240/f0 ____N/A____, 241/f1 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 242/f2 ____N/A____, 243/f3 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 244/f4 ____N/A____, 245/f5 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 246/f6 ____N/A____, 247/f7 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 248/f8 ____N/A____, 249/f9 ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 250/fa ____N/A____, 251/fb ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 252/fc ____N/A____, 253/fd ____N/A____ + ct_mix CT_NONE_IDX, CT_NONE_IDX ; 254/fe ____N/A____, 255/ff ____N/A____ diff --git a/libsrc/geos-common/system/firstinit.s b/libsrc/geos-common/system/firstinit.s index c0695ee47..617ecf4d6 100644 --- a/libsrc/geos-common/system/firstinit.s +++ b/libsrc/geos-common/system/firstinit.s @@ -9,4 +9,4 @@ .include "jumptab.inc" -_FirstInit = FirstInit \ No newline at end of file +_FirstInit = FirstInit diff --git a/libsrc/geos-common/system/systime.c b/libsrc/geos-common/system/gettime.c similarity index 80% rename from libsrc/geos-common/system/systime.c rename to libsrc/geos-common/system/gettime.c index 5eb87fef8..947a6a4f4 100644 --- a/libsrc/geos-common/system/systime.c +++ b/libsrc/geos-common/system/gettime.c @@ -1,5 +1,5 @@ /* -** systime.c +** gettime.c ** ** Maciej 'YTM/Elysium' Witkowiak, 22.11.2002 */ @@ -7,7 +7,7 @@ #include <time.h> #include <geos.h> -time_t _systime(void) +clock_t clock(void) { struct tm currentTime; @@ -25,7 +25,10 @@ time_t _systime(void) return mktime(¤tTime); } -clock_t clock(void) +int __fastcall__ clock_gettime(clockid_t, struct timespec *tp) { - return _systime(); + tp->tv_sec = clock(); + tp->tv_nsec = 0; + + return 0; } diff --git a/libsrc/geos-common/system/mainargs.s b/libsrc/geos-common/system/mainargs.s index db829cc0b..f38beab34 100644 --- a/libsrc/geos-common/system/mainargs.s +++ b/libsrc/geos-common/system/mainargs.s @@ -5,7 +5,7 @@ ; Setup arguments for main ; ; There is always either 1 or 3 arguments: -; <program name>,0 +; <program name>, 0 ; or ; <program name>, <data file name>, <data disk name>, 0 ; the 2nd case is when using DeskTop user drags an icon of a file and drops it @@ -18,7 +18,7 @@ .include "const.inc" .include "geossym.inc" -.segment "INIT" +.segment "ONCE" ; Setup arguments for main @@ -71,7 +71,7 @@ argv: .word dataDiskName ; dataDiskName .word $0000 ; last one must be NULL -.bss +.segment "INIT" argv0: .res 17 ; Program name diff --git a/libsrc/geos-common/system/panic.s b/libsrc/geos-common/system/panic.s index 9ea916023..d34b74a5a 100644 --- a/libsrc/geos-common/system/panic.s +++ b/libsrc/geos-common/system/panic.s @@ -9,4 +9,4 @@ .include "jumptab.inc" -_Panic = Panic \ No newline at end of file +_Panic = Panic diff --git a/libsrc/geos-common/system/tgi_colors.s b/libsrc/geos-common/system/tgi_colors.s deleted file mode 100644 index 0d404294c..000000000 --- a/libsrc/geos-common/system/tgi_colors.s +++ /dev/null @@ -1,8 +0,0 @@ -; -; Target-specific black & white values, for use by the target-shared TGI kernel -; - - .include "tgi-kernel.inc" - -tgi_color_black = $00 -tgi_color_white = $01 diff --git a/libsrc/joystick/joy-kernel.s b/libsrc/joystick/joy-kernel.s index 2b1dcf884..53d475c57 100644 --- a/libsrc/joystick/joy-kernel.s +++ b/libsrc/joystick/joy-kernel.s @@ -6,7 +6,6 @@ .import joy_libref .importzp ptr1 - .interruptor joy_irq ; Export as IRQ handler .include "joy-kernel.inc" .include "joy-error.inc" @@ -19,8 +18,6 @@ .bss _joy_drv: .res 2 ; Pointer to driver -_joy_masks: .res .sizeof(JOY_HDR::MASKS) - ; Jump table for the driver functions. .data joy_vectors: @@ -28,7 +25,6 @@ joy_install: jmp $0000 joy_uninstall: jmp $0000 joy_count: jmp $0000 joy_read: jmp $0000 -joy_irq: .byte $60, $00, $00 ; RTS plus two dummy bytes ; Driver header signature .rodata @@ -37,7 +33,7 @@ joy_sig: .byte $6A, $6F, $79, JOY_API_VERSION ; "joy", version .code ;---------------------------------------------------------------------------- -; unsigned char __fastcall__ joy_install (void* driver); +; unsigned char __fastcall__ joy_install (const void* driver); ; /* Install the driver once it is loaded */ @@ -65,38 +61,17 @@ _joy_install: lda #>joy_libref sta (ptr1),y -; Copy the mask array - - ldy #JOY_HDR::MASKS + .sizeof(JOY_HDR::MASKS) - 1 - ldx #.sizeof(JOY_HDR::MASKS)-1 -@L1: lda (ptr1),y - sta _joy_masks,x - dey - dex - bpl @L1 - ; Copy the jump vectors ldy #JOY_HDR::JUMPTAB ldx #0 -@L2: inx ; Skip the JMP opcode +@L1: inx ; Skip the JMP opcode jsr copy ; Copy one byte jsr copy ; Copy one byte cpy #(JOY_HDR::JUMPTAB + .sizeof(JOY_HDR::JUMPTAB)) - bne @L2 + bne @L1 - jsr joy_install ; Call driver install routine - tay ; Test error code - bne @L3 ; Bail out if install had errors - -; Install the IRQ vector if the driver needs it. A/X contains the error code -; from joy_install, so don't use it. - - ldy joy_irq+2 ; Check high byte of IRQ vector - beq @L3 ; Jump if vector invalid - ldy #$4C ; JMP opcode - sty joy_irq ; Activate IRQ routine -@L3: rts + jmp joy_install ; Call driver install routine ; Driver signature invalid @@ -120,9 +95,6 @@ copy: lda (ptr1),y ; */ _joy_uninstall: - lda #$60 ; RTS opcode - sta joy_irq ; Disable IRQ entry point - jsr joy_uninstall ; Call the driver routine _joy_clear_ptr: ; External entry point diff --git a/libsrc/joystick/joy_load.s b/libsrc/joystick/joy_load.s index 7115f5d07..97ba7a0cd 100644 --- a/libsrc/joystick/joy_load.s +++ b/libsrc/joystick/joy_load.s @@ -87,7 +87,7 @@ ctrl: .addr _read ; Check the driver signature, install the driver. c is already on stack and ; will get removed by joy_install(). -; Res = joy_install (ctrl.module); +; Res = joy_install (ctrl.module); lda ctrl + MOD_CTRL::MODULE ldx ctrl + MOD_CTRL::MODULE+1 diff --git a/libsrc/joystick/joy_read.s b/libsrc/joystick/joy_read.s index f76d9dfb7..151600aee 100644 --- a/libsrc/joystick/joy_read.s +++ b/libsrc/joystick/joy_read.s @@ -8,5 +8,3 @@ .include "joy-kernel.inc" _joy_read = joy_read ; Use driver entry - - diff --git a/libsrc/lynx/bllhdr.s b/libsrc/lynx/bllhdr.s index 60fc87725..c34d7b53b 100644 --- a/libsrc/lynx/bllhdr.s +++ b/libsrc/lynx/bllhdr.s @@ -4,16 +4,15 @@ ; This header is required for BLL builds. ; .import __BSS_LOAD__ - .import __RAM_START__ + .import __MAIN_START__ .export __BLLHDR__: absolute = 1 - + ; ------------------------------------------------------------------------ ; BLL header (BLL header) .segment "BLLHDR" .word $0880 - .dbyt __RAM_START__ - .dbyt __BSS_LOAD__ - __RAM_START__ + 10 + .dbyt __MAIN_START__ + .dbyt __BSS_LOAD__ - __MAIN_START__ + 10 .byte $42,$53 .byte $39,$33 - diff --git a/libsrc/lynx/bootldr.s b/libsrc/lynx/bootldr.s index a62d6155c..ddc24faed 100644 --- a/libsrc/lynx/bootldr.s +++ b/libsrc/lynx/bootldr.s @@ -5,7 +5,7 @@ ; .include "lynx.inc" .include "extzp.inc" - .import __BLOCKSIZE__ + .import __BANK0BLOCKSIZE__ .export __BOOTLDR__: absolute = 1 @@ -18,44 +18,60 @@ ; The idea is to make the smalles possible encrypted loader as decryption ; is very slow. The minimum size is 49 bytes plus a zero byte. ;********************************** -; EXE = $fb68 +; EXE = $fb68 ; -; .org $0200 +; .org $0200 ; -; ; 1. force Mikey to be in memory -; stz MAPCTL +; ; 1. force Mikey to be in memory +; 9C F9 FF stz MAPCTL ; -; ; 3. set ComLynx to open collector -; lda #4 ; a = 00000100 -; sta SERCTL ; set the ComLynx to open collector +; ; 2. clear palette +; A0 1F ldy #31 +; A9 00 lda #0 +; 99 A0 FD nextc: sta GCOLMAP, y +; 88 dey +; 10 FA bpl nextc ; -; ; 4. make sure the ROM is powered on -; lda #8 ; a = 00001000 -; sta IODAT ; set the ROM power to on +; ; 3. set ComLynx to open collector +; A9 04 lda #4 ; a = 00000100 +; 8D 8C FD sta SERCTL ; set the ComLynx to open collector ; -; ; 5. read in secondary exe + 8 bytes from the cart and store it in $f000 -; ldx #0 ; x = 0 -; ldy #$97 ; y = secondary loader size (151 bytes) -;rloop1: lda RCART0 ; read a byte from the cart -; sta EXE,X ; EXE[X] = a -; inx ; x++ -; dey ; y-- -; bne rloop1 ; loops until y wraps +; ; 4. set AUDIN to output +; A9 1A lda #$1a ; audin = out, rest = out, +; ; noexp = in, cart addr = out, ext pwd = in +; 8D 8A FD sta IODIR ; -; ; 6. jump to secondary loader -; jmp EXE ; run the secondary loader +; ; 5. set AUDIN to LOW +; A9 0B lda #$0B ; Set AUDIN low +; 85 1A sta $1a ; Save local copy to ZP +; 8D 8B FD sta IODAT ; -; .reloc +; ; 6. read in secondary exe + 8 bytes from the cart +; ; and store it in $f000 +; A2 00 ldx #0 ; x = 0 +; A0 97 ldy #$97 ; y = secondary loader size (151 bytes) +; AD B2 FC rloop1: lda RCART0 ; read a byte from the cart +; 9D 68 FB sta EXE,X ; EXE[X] = a +; E8 inx ; x++ +; 88 dey ; y-- +; D0 F6 bne rloop1 ; loops until y wraps +; +; ; 7. jump to secondary loader +; 4C 68 FB jmp EXE +; 00 00 00 00 ; spares +; 00 ; End of encrypted header mark +; +; .reloc ;********************************** ; After compilation, encryption and obfuscation it turns into this. ;********************************** - .byte $ff, $81, $ca, $33, $be, $80, $a2, $c4 - .byte $6d, $98, $fe, $8d, $bc, $66, $c0, $7a - .byte $09, $50, $23, $28, $18, $c8, $06, $70 - .byte $58, $4f, $1b, $e1, $c7, $90, $08, $cd - .byte $1a, $6e, $5a, $45, $32, $d7, $6d, $c6 - .byte $8a, $e5, $d8, $5c, $a0, $e8, $4f, $7a - .byte $5f, $73, $8d, $22 + .byte $ff, $b6, $bb, $82, $d5, $9f, $48, $cf + .byte $23, $37, $8e, $07, $38, $f5, $b6, $30 + .byte $d6, $2f, $12, $29, $9f, $43, $5b, $2e + .byte $f5, $66, $5c, $db, $93, $1a, $78, $55 + .byte $5e, $c9, $0d, $72, $1b, $e9, $d8, $4d + .byte $2f, $e4, $95, $c0, $4f, $7f, $1b, $66 + .byte $8b, $a7, $fc, $21 ;********************************** ; Now we have the secondary loader @@ -139,7 +155,7 @@ secreadbyte0: bne exit ;********************************** -; Select a block +; Select a block ;********************************** seclynxblock: pha @@ -167,7 +183,7 @@ seclynxblock: lda __iodat sta IODAT stz _FileBlockByte - lda #<($100-(>__BLOCKSIZE__)) + lda #<($100-(>__BANK0BLOCKSIZE__)) sta _FileBlockByte+1 ply plx diff --git a/libsrc/lynx/cgetc.s b/libsrc/lynx/cgetc.s index b61fb44f6..d940b2b94 100644 --- a/libsrc/lynx/cgetc.s +++ b/libsrc/lynx/cgetc.s @@ -20,51 +20,50 @@ ; So the keyboard returns '1', '2', '3', 'P', 'R', 'F' or '?'. _cgetc: - lda KBSTL - ora KBEDG - bne @L1 jsr _kbhit ; Check for char available - tax ; Test result - bra _cgetc -@L1: + beq _cgetc + ora KBSTL ldx #0 and #1 - beq @L6 + beq @L5 lda KBEDG ; Pause button is pressed and #$0c - beq @L3 + beq @L2 ora KBSTL -@L2: +@L1: bit #$04 - beq @L4 ; Pause + Opt 1 = Reset + beq @L3 ; Pause + Opt 1 = Reset bit #$08 - beq @L5 ; Pause + Opt 2 = Flip + beq @L4 ; Pause + Opt 2 = Flip lda #'?' ; All buttons pressed - rts -@L3: + bra reset_and_exit +@L2: lda KBSTL ; Pause alone was the last placed button and #$0c - bne @L2 + bne @L1 lda #'P' ; Pause pressed - rts -@L4: + bra reset_and_exit +@L3: lda #'R' ; Reset pressed - rts -@L5: + bra reset_and_exit +@L4: lda #'F' ; Flip pressed - rts -@L6: + bra reset_and_exit +@L5: lda KBEDG ; No Pause pressed ora KBSTL bit #$08 - beq @L8 - bit #$04 beq @L7 + bit #$04 + beq @L6 lda #'3' ; opt 1 + opt 2 pressed - rts -@L7: + bra reset_and_exit +@L6: lda #'1' ; opt 1 pressed - rts -@L8: + bra reset_and_exit +@L7: lda #'2' ; opt 2 pressed + +reset_and_exit: + stz KBEDG rts diff --git a/libsrc/lynx/clock.s b/libsrc/lynx/clock.s index 881c43554..e29799df6 100644 --- a/libsrc/lynx/clock.s +++ b/libsrc/lynx/clock.s @@ -2,18 +2,14 @@ ; 2003-04-13, Ullrich von Bassewitz ; 2012-02-06, Greg King ; -; #include <time.h> +; clock_t clock (void); +; clock_t _clocks_per_sec (void); ; -; typedef unsigned long int clock_t; -; clock_t _clk_tck(void); -; #define CLOCKS_PER_SEC _clk_tck() -; clock_t clock(void); -; -; clk_tck()'s test-values are based on the numbers in "set_tv.s". +; clocks_per_sec()'s test-values are based on the numbers in "set_tv.s". ; If you change the numbers there, then change them here, too. ; - .export _clock, __clk_tck, clock_count + .export _clock, __clocks_per_sec, clock_count .interruptor update_clock, 2 ; (low priority) .constructor init_clock @@ -42,7 +38,7 @@ ;----------------------------------------------------------------------------- ; Return the number of clock ticks in one second. ; -__clk_tck: +__clocks_per_sec: ldx #$00 ; >50, >60, >75 ldy PBKUP lda #<75 @@ -78,7 +74,7 @@ update_clock: ;----------------------------------------------------------------------------- ; Enable the interrupt that update_clock needs. ; - .segment "INIT" + .segment "ONCE" init_clock: lda #%10000000 tsb VTIMCTLA diff --git a/libsrc/lynx/crt0.s b/libsrc/lynx/crt0.s index 725f74ebd..238a2c99d 100644 --- a/libsrc/lynx/crt0.s +++ b/libsrc/lynx/crt0.s @@ -22,7 +22,7 @@ .import zerobss .import callmain .import _main - .import __RAM_START__, __RAM_SIZE__, __STACKSIZE__ + .import __MAIN_START__, __MAIN_SIZE__, __STACKSIZE__ .include "zeropage.inc" .include "extzp.inc" @@ -47,7 +47,6 @@ MikeyInitData: .byte $9e,$18,$68,$1f,$00,$00,$00,$00,$00,$ff,$1a,$1b,$04,$0d,$2 ; Set up the system. sei - cld ldx #$FF txs @@ -69,7 +68,7 @@ MikeyInitData: .byte $9e,$18,$68,$1f,$00,$00,$00,$00,$00,$ff,$1a,$1b,$04,$0d,$2 ; Disable the TX/RX IRQ; set to 8E1. - lda #%11101 + lda #%00011101 sta SERCTL ; Clear all pending interrupts. @@ -79,10 +78,10 @@ MikeyInitData: .byte $9e,$18,$68,$1f,$00,$00,$00,$00,$00,$ff,$1a,$1b,$04,$0d,$2 ; Set up the stack. - lda #<(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) + lda #<(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) + ldx #>(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) sta sp - lda #>(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) - sta sp+1 + stx sp+1 ; Init Mickey. diff --git a/libsrc/lynx/ctype.s b/libsrc/lynx/ctype.s deleted file mode 100644 index 6e0ab1785..000000000 --- a/libsrc/lynx/ctype.s +++ /dev/null @@ -1,172 +0,0 @@ -; -; Ullrich von Bassewitz, 02.06.1998 -; -; Character specification table. -; - -; The tables are readonly, put them into the rodata segment - -.rodata - -; The following 256 byte wide table specifies attributes for the isxxx type -; of functions. Doing it by a table means some overhead in space, but it -; has major advantages: -; -; * It is fast. If it were'nt for the slow parameter passing of cc65, one -; could even define macros for the isxxx functions (this is usually -; done on other platforms). -; -; * It is highly portable. The only unportable part is the table itself, -; all real code goes into the common library. -; -; * We save some code in the isxxx functions. -; -; -; Bit assignments: -; -; 0 - Lower case char -; 1 - Upper case char -; 2 - Numeric digit -; 3 - Hex digit (both, lower and upper) -; 4 - Control character -; 5 - The space character itself -; 6 - Other whitespace (that is: '\f', '\n', '\r', '\t' and '\v') -; 7 - Space or tab character - - .export __ctype - -__ctype: - -.repeat 2 ; 2 times for normal and inverted - - .byte $10 ; 0/00 ___ctrl_@___ - .byte $10 ; 1/01 ___ctrl_A___ - .byte $10 ; 2/02 ___ctrl_B___ - .byte $10 ; 3/03 ___ctrl_C___ - .byte $10 ; 4/04 ___ctrl_D___ - .byte $10 ; 5/05 ___ctrl_E___ - .byte $10 ; 6/06 ___ctrl_F___ - .byte $10 ; 7/07 ___ctrl_G___ - .byte $10 ; 8/08 ___ctrl_H___ - .byte $D0 ; 9/09 ___ctrl_I___ - .byte $50 ; 10/0a ___ctrl_J___ - .byte $50 ; 11/0b ___ctrl_K___ - .byte $50 ; 12/0c ___ctrl_L___ - .byte $50 ; 13/0d ___ctrl_M___ - .byte $10 ; 14/0e ___ctrl_N___ - .byte $10 ; 15/0f ___ctrl_O___ - .byte $10 ; 16/10 ___ctrl_P___ - .byte $10 ; 17/11 ___ctrl_Q___ - .byte $10 ; 18/12 ___ctrl_R___ - .byte $10 ; 19/13 ___ctrl_S___ - .byte $10 ; 20/14 ___ctrl_T___ - .byte $10 ; 21/15 ___ctrl_U___ - .byte $10 ; 22/16 ___ctrl_V___ - .byte $10 ; 23/17 ___ctrl_W___ - .byte $10 ; 24/18 ___ctrl_X___ - .byte $10 ; 25/19 ___ctrl_Y___ - .byte $10 ; 26/1a ___ctrl_Z___ - .byte $10 ; 27/1b ___ctrl_[___ - .byte $10 ; 28/1c ___ctrl_\___ - .byte $10 ; 29/1d ___ctrl_]___ - .byte $10 ; 30/1e ___ctrl_^___ - .byte $10 ; 31/1f ___ctrl_____ - .byte $A0 ; 32/20 ___SPACE___ - .byte $00 ; 33/21 _____!_____ - .byte $00 ; 34/22 _____"_____ - .byte $00 ; 35/23 _____#_____ - .byte $00 ; 36/24 _____$_____ - .byte $00 ; 37/25 _____%_____ - .byte $00 ; 38/26 _____&_____ - .byte $00 ; 39/27 _____'_____ - .byte $00 ; 40/28 _____(_____ - .byte $00 ; 41/29 _____)_____ - .byte $00 ; 42/2a _____*_____ - .byte $00 ; 43/2b _____+_____ - .byte $00 ; 44/2c _____,_____ - .byte $00 ; 45/2d _____-_____ - .byte $00 ; 46/2e _____._____ - .byte $00 ; 47/2f _____/_____ - .byte $0C ; 48/30 _____0_____ - .byte $0C ; 49/31 _____1_____ - .byte $0C ; 50/32 _____2_____ - .byte $0C ; 51/33 _____3_____ - .byte $0C ; 52/34 _____4_____ - .byte $0C ; 53/35 _____5_____ - .byte $0C ; 54/36 _____6_____ - .byte $0C ; 55/37 _____7_____ - .byte $0C ; 56/38 _____8_____ - .byte $0C ; 57/39 _____9_____ - .byte $00 ; 58/3a _____:_____ - .byte $00 ; 59/3b _____;_____ - .byte $00 ; 60/3c _____<_____ - .byte $00 ; 61/3d _____=_____ - .byte $00 ; 62/3e _____>_____ - .byte $00 ; 63/3f _____?_____ - - .byte $00 ; 64/40 _____@_____ - .byte $0A ; 65/41 _____A_____ - .byte $0A ; 66/42 _____B_____ - .byte $0A ; 67/43 _____C_____ - .byte $0A ; 68/44 _____D_____ - .byte $0A ; 69/45 _____E_____ - .byte $0A ; 70/46 _____F_____ - .byte $02 ; 71/47 _____G_____ - .byte $02 ; 72/48 _____H_____ - .byte $02 ; 73/49 _____I_____ - .byte $02 ; 74/4a _____J_____ - .byte $02 ; 75/4b _____K_____ - .byte $02 ; 76/4c _____L_____ - .byte $02 ; 77/4d _____M_____ - .byte $02 ; 78/4e _____N_____ - .byte $02 ; 79/4f _____O_____ - .byte $02 ; 80/50 _____P_____ - .byte $02 ; 81/51 _____Q_____ - .byte $02 ; 82/52 _____R_____ - .byte $02 ; 83/53 _____S_____ - .byte $02 ; 84/54 _____T_____ - .byte $02 ; 85/55 _____U_____ - .byte $02 ; 86/56 _____V_____ - .byte $02 ; 87/57 _____W_____ - .byte $02 ; 88/58 _____X_____ - .byte $02 ; 89/59 _____Y_____ - .byte $02 ; 90/5a _____Z_____ - .byte $00 ; 91/5b _____[_____ - .byte $00 ; 92/5c _____\_____ - .byte $00 ; 93/5d _____]_____ - .byte $00 ; 94/5e _____^_____ - .byte $00 ; 95/5f _UNDERLINE_ - .byte $00 ; 96/60 ___grave___ - .byte $09 ; 97/61 _____a_____ - .byte $09 ; 98/62 _____b_____ - .byte $09 ; 99/63 _____c_____ - .byte $09 ; 100/64 _____d_____ - .byte $09 ; 101/65 _____e_____ - .byte $09 ; 102/66 _____f_____ - .byte $01 ; 103/67 _____g_____ - .byte $01 ; 104/68 _____h_____ - .byte $01 ; 105/69 _____i_____ - .byte $01 ; 106/6a _____j_____ - .byte $01 ; 107/6b _____k_____ - .byte $01 ; 108/6c _____l_____ - .byte $01 ; 109/6d _____m_____ - .byte $01 ; 110/6e _____n_____ - .byte $01 ; 111/6f _____o_____ - .byte $01 ; 112/70 _____p_____ - .byte $01 ; 113/71 _____q_____ - .byte $01 ; 114/72 _____r_____ - .byte $01 ; 115/73 _____s_____ - .byte $01 ; 116/74 _____t_____ - .byte $01 ; 117/75 _____u_____ - .byte $01 ; 118/76 _____v_____ - .byte $01 ; 119/77 _____w_____ - .byte $01 ; 120/78 _____x_____ - .byte $01 ; 121/79 _____y_____ - .byte $01 ; 122/7a _____z_____ - .byte $00 ; 123/7b _____{_____ - .byte $00 ; 124/7c _____|_____ - .byte $00 ; 125/7d _____}_____ - .byte $00 ; 126/7e _____~_____ - .byte $40 ; 127/7f ____DEL____ - -.endrepeat diff --git a/libsrc/lynx/defdir.s b/libsrc/lynx/defdir.s index 08358563b..d15a99d5a 100644 --- a/libsrc/lynx/defdir.s +++ b/libsrc/lynx/defdir.s @@ -5,10 +5,9 @@ ; .include "lynx.inc" .import __STARTOFDIRECTORY__ - .import __RAM_START__ - .import __CODE_SIZE__,__DATA_SIZE__,__RODATA_SIZE__ - .import __STARTUP_SIZE__,__INIT_SIZE__,__LOWCODE_SIZE__ - .import __BLOCKSIZE__ + .import __MAIN_START__ + .import __STARTUP_LOAD__, __BSS_LOAD__ + .import __BANK0BLOCKSIZE__ .export __DEFDIR__: absolute = 1 @@ -17,15 +16,14 @@ .segment "DIRECTORY" __DIRECTORY_START__: -off0=__STARTOFDIRECTORY__+(__DIRECTORY_END__-__DIRECTORY_START__) -blocka=off0/__BLOCKSIZE__ +off0 = __STARTOFDIRECTORY__ + (__DIRECTORY_END__ - __DIRECTORY_START__) +blocka = off0 / __BANK0BLOCKSIZE__ ; Entry 0 - first executable -block0=off0/__BLOCKSIZE__ -len0=__STARTUP_SIZE__+__INIT_SIZE__+__CODE_SIZE__+__DATA_SIZE__+__RODATA_SIZE__+__LOWCODE_SIZE__ +block0 = off0 / __BANK0BLOCKSIZE__ +len0 = __BSS_LOAD__ - __STARTUP_LOAD__ .byte <block0 - .word off0 & (__BLOCKSIZE__ - 1) + .word off0 & (__BANK0BLOCKSIZE__ - 1) .byte $88 - .word __RAM_START__ + .word __MAIN_START__ .word len0 __DIRECTORY_END__: - diff --git a/libsrc/lynx/eeprom.s b/libsrc/lynx/eeprom.s index 978220cfd..fb0247e90 100644 --- a/libsrc/lynx/eeprom.s +++ b/libsrc/lynx/eeprom.s @@ -252,4 +252,4 @@ EEloop4: rts - + diff --git a/libsrc/lynx/eeprom46.s b/libsrc/lynx/eeprom46.s index 55d9037c0..2b2277e45 100644 --- a/libsrc/lynx/eeprom46.s +++ b/libsrc/lynx/eeprom46.s @@ -4,7 +4,7 @@ ; ; created : 11.05.95 ; last modified : -; +; ; 16.02.96 leaner (thanks to Harry) ; 12.03.96 test for busy after write and erase (well, Harry ;)) ) ; 22.08.97 ported to ra65 for use with cc65 diff --git a/libsrc/lynx/eeprom66.s b/libsrc/lynx/eeprom66.s index 680db8166..6511cf8af 100644 --- a/libsrc/lynx/eeprom66.s +++ b/libsrc/lynx/eeprom66.s @@ -4,7 +4,7 @@ ; ; created : 11.05.95 ; last modified : -; +; ; 16.02.96 leaner (thanks to Harry) ; 12.03.96 test for busy after write and erase (well, Harry ;)) ) ; 22.08.97 ported to ra65 for use with cc65 diff --git a/libsrc/lynx/eeprom86.s b/libsrc/lynx/eeprom86.s index f753b73c3..73b342fae 100644 --- a/libsrc/lynx/eeprom86.s +++ b/libsrc/lynx/eeprom86.s @@ -4,7 +4,7 @@ ; ; created : 11.05.95 ; last modified : -; +; ; 16.02.96 leaner (thanks to Harry) ; 12.03.96 test for busy after write and erase (well, Harry ;)) ) ; 22.08.97 ported to ra65 for use with cc65 diff --git a/libsrc/lynx/exec.s b/libsrc/lynx/exec.s index c0a630a72..307475f1d 100644 --- a/libsrc/lynx/exec.s +++ b/libsrc/lynx/exec.s @@ -6,7 +6,7 @@ ; ; lynx_exec is often used in compilation carts when you run small demos ; created with various (non-cc65) compilers. -; +; ; void lynx_exec(int fileno) ; .importzp _FileDestAddr diff --git a/libsrc/lynx/exehdr.s b/libsrc/lynx/exehdr.s index 4f077fb82..0fbe99150 100644 --- a/libsrc/lynx/exehdr.s +++ b/libsrc/lynx/exehdr.s @@ -3,7 +3,8 @@ ; ; This header contains data for emulators like Handy and Mednafen ; - .import __BLOCKSIZE__ + .import __BANK0BLOCKSIZE__ + .import __BANK1BLOCKSIZE__ .export __EXEHDR__: absolute = 1 @@ -11,12 +12,16 @@ ; EXE header .segment "EXEHDR" .byte 'L','Y','N','X' ; magic - .word __BLOCKSIZE__ ; bank 0 page size - .word __BLOCKSIZE__ ; bank 1 page size + .word __BANK0BLOCKSIZE__ ; bank 0 page size + .word __BANK1BLOCKSIZE__ ; bank 1 page size .word 1 ; version number .asciiz "Cart name " ; 32 bytes cart name - .asciiz "Manufacturer " ; 16 bytes manufacturer + .byte "cc65 V" ; 16 bytes manufacturer + .byte ((.VERSION >> 8) & $0F) + '0' + .byte '.' + .byte ((.VERSION >> 4) & $0F) + '0' + .byte (.VERSION & $0F) + '0' + .asciiz " " .byte 0 ; rotation 1=left ; rotation 2=right .byte 0,0,0,0,0 ; spare - diff --git a/libsrc/lynx/irq.s b/libsrc/lynx/irq.s index 4a6adfb04..515335919 100644 --- a/libsrc/lynx/irq.s +++ b/libsrc/lynx/irq.s @@ -9,7 +9,7 @@ ; ------------------------------------------------------------------------ -.segment "INIT" +.segment "ONCE" initirq: lda #<IRQStub @@ -36,7 +36,6 @@ IRQStub: phy phx pha - cld jsr callirq lda INTSET sta INTRST diff --git a/libsrc/lynx/joy/lynx-stdjoy.s b/libsrc/lynx/joy/lynx-stdjoy.s index 114647072..c81a97dbf 100644 --- a/libsrc/lynx/joy/lynx-stdjoy.s +++ b/libsrc/lynx/joy/lynx-stdjoy.s @@ -31,25 +31,12 @@ .addr $0000 -; Button state masks (8 values) - -joy_mask: - .byte $80 ; JOY_UP - .byte $40 ; JOY_DOWN - .byte $20 ; JOY_LEFT - .byte $10 ; JOY_RIGHT - .byte $01 ; JOY_FIRE - .byte $02 ; JOY_FIRE1 - .byte $00 ; - .byte $00 ; - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants diff --git a/libsrc/lynx/kbhit.s b/libsrc/lynx/kbhit.s index b606fc49a..d5b3d1cde 100644 --- a/libsrc/lynx/kbhit.s +++ b/libsrc/lynx/kbhit.s @@ -29,6 +29,8 @@ KBNPR: .byte 0 .code _kbhit: + lda KBEDG + bne L1 lda $FCB0 ; Read the Opt buttons and #$0c sta KBTMP @@ -49,8 +51,6 @@ _kbhit: sta KBNPR ; inverted previous ones pressed stx KBPRV lda KBEDG - beq @L1 - jmp return1 ; Key hit - -@L1: tax ; No new keys hit +L1: tax rts + diff --git a/libsrc/lynx/libref.s b/libsrc/lynx/libref.s index 62c78b8c5..0bda1e7e8 100644 --- a/libsrc/lynx/libref.s +++ b/libsrc/lynx/libref.s @@ -2,9 +2,8 @@ ; Oliver Schmidt, 2013-05-31 ; - .export joy_libref, ser_libref, tgi_libref + .export joy_libref, ser_libref .import _exit joy_libref := _exit ser_libref := _exit -tgi_libref := _exit diff --git a/libsrc/lynx/lynx-cart.s b/libsrc/lynx/lynx-cart.s index 86e907348..94edff677 100644 --- a/libsrc/lynx/lynx-cart.s +++ b/libsrc/lynx/lynx-cart.s @@ -6,7 +6,7 @@ ; ; Ported to cc65 (http://www.cc65.org) by ; Shawn Jefferson, June 2004 -; +; ; This version by Karri Kaksonen, December 2010 ; ; Helper stuff for the cartridge file functions. This version can deal @@ -16,7 +16,7 @@ .include "lynx.inc" .include "extzp.inc" .export lynxskip0, lynxread0 - .export lynxblock + .export lynxblock .import __BLOCKSIZE__ .code @@ -60,7 +60,7 @@ readbyte0: bne exit ;********************************** -; Select a block +; Select a block ;********************************** lynxblock: pha diff --git a/libsrc/lynx/lynx-snd.s b/libsrc/lynx/lynx-snd.s index 9d0b8b7af..82b05276f 100644 --- a/libsrc/lynx/lynx-snd.s +++ b/libsrc/lynx/lynx-snd.s @@ -1062,7 +1062,7 @@ SndSetValues: ldx #4-1 set0: ldy SndOffsets,x lda SndChannel+2,y - _IFNE ; flag == 0 => don`t set + _IFNE ; flag == 0 => don't set bit #$80 _IFNE ; diff --git a/libsrc/lynx/mainargs.s b/libsrc/lynx/mainargs.s index 8ab1b7c68..b402704c2 100644 --- a/libsrc/lynx/mainargs.s +++ b/libsrc/lynx/mainargs.s @@ -10,10 +10,10 @@ ;--------------------------------------------------------------------------- -; Get possible command-line arguments. Goes into the special INIT segment, +; Get possible command-line arguments. Goes into the special ONCE segment, ; which may be reused after the startup code is run -.segment "INIT" +.segment "ONCE" .proc initmainargs diff --git a/libsrc/lynx/ser/lynx-comlynx.s b/libsrc/lynx/ser/lynx-comlynx.s index 1fd24ad94..ded862eaa 100644 --- a/libsrc/lynx/ser/lynx-comlynx.s +++ b/libsrc/lynx/ser/lynx-comlynx.s @@ -25,15 +25,15 @@ .addr $0000 ; Jump table - .addr INSTALL - .addr UNINSTALL - .addr OPEN - .addr CLOSE - .addr GET - .addr PUT - .addr STATUS - .addr IOCTL - .addr IRQ + .addr SER_INSTALL + .addr SER_UNINSTALL + .addr SER_OPEN + .addr SER_CLOSE + .addr SER_GET + .addr SER_PUT + .addr SER_STATUS + .addr SER_IOCTL + .addr SER_IRQ ;---------------------------------------------------------------------------- ; Global variables @@ -54,25 +54,25 @@ TxDone: .res 1 .code ;---------------------------------------------------------------------------- -; INSTALL: Is called after the driver is loaded into memory. +; SER_INSTALL: Is called after the driver is loaded into memory. ; ; Must return an SER_ERR_xx code in a/x. -INSTALL: +SER_INSTALL: ; Set up IRQ vector ? ;---------------------------------------------------------------------------- -; UNINSTALL: Is called before the driver is removed from memory. +; SER_UNINSTALL: Is called before the driver is removed from memory. ; No return code required (the driver is removed from memory on return). ; -UNINSTALL: +SER_UNINSTALL: ;---------------------------------------------------------------------------- -; CLOSE: Close the port and disable interrupts. Called without parameters. +; SER_CLOSE: Close the port and disable interrupts. Called without parameters. ; Must return an SER_ERR_xx code in a/x. -CLOSE: +SER_CLOSE: ; Disable interrupts ; Done, return an error code lda #<SER_ERR_OK @@ -80,7 +80,7 @@ CLOSE: rts ;---------------------------------------------------------------------------- -; OPEN: A pointer to a ser_params structure is passed in ptr1. +; SER_OPEN: A pointer to a ser_params structure is passed in ptr1. ; ; The Lynx has only two correct serial data formats: ; 8 bits, parity mark, 1 stop bit @@ -101,7 +101,7 @@ CLOSE: ; ; Must return an SER_ERR_xx code in a/x. -OPEN: +SER_OPEN: stz RxPtrIn stz RxPtrOut stz TxPtrIn @@ -247,11 +247,11 @@ invparameter: rts ;---------------------------------------------------------------------------- -; GET: Will fetch a character from the receive buffer and store it into the +; SER_GET: Will fetch a character from the receive buffer and store it into the ; variable pointed to by ptr1. If no data is available, SER_ERR_NO_DATA is ; returned. -GET: +SER_GET: lda RxPtrIn cmp RxPtrOut bne GetByte @@ -260,7 +260,7 @@ GET: rts GetByte: ldy RxPtrOut - lda RxBuffer,y + lda RxBuffer,y inc RxPtrOut ldx #$00 sta (ptr1,x) @@ -268,10 +268,10 @@ GetByte: rts ;---------------------------------------------------------------------------- -; PUT: Output character in A. +; SER_PUT: Output character in A. ; Must return an SER_ERR_xx code in a/x. -PUT: +SER_PUT: tax lda TxPtrIn ina @@ -301,10 +301,10 @@ PutByte: rts ;---------------------------------------------------------------------------- -; STATUS: Return the status in the variable pointed to by ptr1. +; SER_STATUS: Return the status in the variable pointed to by ptr1. ; Must return an SER_ERR_xx code in a/x. -STATUS: +SER_STATUS: ldy SerialStat ldx #$00 sta (ptr1,x) @@ -312,17 +312,17 @@ STATUS: rts ;---------------------------------------------------------------------------- -; IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl +; SER_IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl ; specific data in ptr1, and the ioctl code in A. ; Must return an SER_ERR_xx code in a/x. -IOCTL: +SER_IOCTL: lda #<SER_ERR_INV_IOCTL ldx #>SER_ERR_INV_IOCTL rts ;---------------------------------------------------------------------------- -; IRQ: Called from the builtin runtime IRQ handler as a subroutine. All +; SER_IRQ: Called from the builtin runtime IRQ handler as a subroutine. All ; registers are already saved, no parameters are passed, but the carry flag ; is clear on entry. The routine must return with carry set if the interrupt ; was handled, otherwise with carry clear. @@ -330,7 +330,7 @@ IOCTL: ; Both the Tx and Rx interrupts are level sensitive instead of edge sensitive. ; Due to this bug you have to disable the interrupt before clearing it. -IRQ: +SER_IRQ: lda INTSET ; Poll all pending interrupts and #SERIAL_INTERRUPT bne @L0 @@ -411,4 +411,3 @@ IRQ: @IRQexit: clc rts - diff --git a/libsrc/lynx/tgi/lynx-160-102-16.s b/libsrc/lynx/tgi/lynx-160-102-16.s index e6659631b..c35b6a5aa 100644 --- a/libsrc/lynx/tgi/lynx-160-102-16.s +++ b/libsrc/lynx/tgi/lynx-160-102-16.s @@ -1,10 +1,10 @@ ; ; Graphics driver for the 160x102x16 mode on the Lynx. ; -; All the drawing functions are simply done by sprites as the sprite +; All the drawing functions simply are done by sprites, as the sprite ; engine is the only way to do fast graphics on a Lynx. ; -; This code is written by Karri Kaksonen, 2004 for the cc65 compiler. +; This code was written by Karri Kaksonen, 2004 for the cc65 compiler. ; .include "zeropage.inc" @@ -29,7 +29,7 @@ .byte $74, $67, $69 ; "tgi" .byte TGI_API_VERSION ; TGI API version number - .addr $0000 ; Library reference +libref: .addr $0000 ; Library reference .word 160 ; X resolution .word 102 ; Y resolution .byte 16 ; Number of drawing colors @@ -64,7 +64,6 @@ .addr BAR .addr TEXTSTYLE .addr OUTTEXT - .addr IRQ ; ------------------------------------------------------------------------ @@ -105,14 +104,17 @@ BGINDEX: .res 1 ; Pen to use for text background DRAWPAGE: .res 1 SWAPREQUEST: .res 1 +; 8 rows with (one offset-byte plus 20 character bytes plus one fill-byte) plus one 0-offset-byte. +; (As an experiment, the fill-byte isn't being generated. +; It might not be needed to work around a Suzy bug.) text_bitmap: .res 8*(1+20+1)+1 -; 8 rows with (one offset-byte plus 20 character bytes plus one fill-byte) plus one 0-offset-byte ; Constants and tables .rodata -DEFPALETTE: .byte >$011 +DEFPALETTE: .byte >$223 + .byte >$011 .byte >$34d .byte >$9af .byte >$9b8 @@ -123,11 +125,11 @@ DEFPALETTE: .byte >$011 .byte >$d5f .byte >$c53 .byte >$822 - .byte >$223 .byte >$484 .byte >$8e5 .byte >$cf5 .byte >$fff + .byte <$223 .byte <$011 .byte <$34d .byte <$9af @@ -139,7 +141,6 @@ DEFPALETTE: .byte >$011 .byte <$d5f .byte <$c53 .byte <$822 - .byte <$223 .byte <$484 .byte <$8e5 .byte <$cf5 @@ -161,9 +162,22 @@ INSTALL: lda #1 sta TEXTMAGX sta TEXTMAGY + sta DRAWINDEX stz BGINDEX stz DRAWPAGE stz SWAPREQUEST + lda libref + ldx libref+1 + sta ptr1 + stx ptr1+1 + ldy #1 + lda #<irq + sta (ptr1),y + iny + lda #>irq + sta (ptr1),y + lda #$4C ; Jump opcode + sta (ptr1) ; Activate IRQ routine rts @@ -175,6 +189,12 @@ INSTALL: ; UNINSTALL: + lda libref + ldx libref+1 + sta ptr1 + stx ptr1+1 + lda #$60 ; RTS opcode + sta (ptr1) ; Disable IRQ routine rts @@ -399,7 +419,7 @@ cls_sprite: .word 0 .word $a000 ; 160 .word $6600 ; 102 - .byte $00 + .byte $11 .code CLEAR: lda #<cls_sprite @@ -466,14 +486,10 @@ SETDRAWPAGE: stx DRAWPAGEH rts -; ------------------------------------------------------------------------ -; IRQ: VBL interrupt handler -; - -IRQ: +irq: lda INTSET ; Poll all pending interrupts and #VBL_INTERRUPT - beq IRQEND ; Exit if not a VBL interrupt + beq @L0 ; Exit if not a VBL interrupt lda SWAPREQUEST beq @L0 @@ -485,7 +501,6 @@ IRQ: jsr SETDRAWPAGE stz SWAPREQUEST @L0: -IRQEND: clc rts @@ -818,7 +833,7 @@ TEXTSTYLE: ; ------------------------------------------------------------------------ ; OUTTEXT: Output text at X/Y = ptr1/ptr2 using the current color and the -; current text style. The text to output is given as a zero terminated +; current text style. The text to output is given as a zero-terminated ; string with address in ptr3. ; ; Must set an error code: NO @@ -830,12 +845,6 @@ OUTTEXT: lda TEXTMAGY sta text_sy+1 - stz text_sprite ; Set normal sprite - lda BGINDEX - bne @L1 - lda #4 - sta text_sprite ; Set opaque sprite -@L1: lda DRAWINDEX ; Set color asl asl @@ -863,15 +872,18 @@ OUTTEXT: ldy #20 @L3: sty STRLEN + tya bne @L4 - rts ; Zero length string + rts ; Zero-length string @L4: iny ; Prepare text_bitmap - iny + +; The next instruction is commented because the code won't include a fill-byte. +; iny sty STROFF ldy #8-1 ; 8 pixel lines per character - ldx #0 + ldx #$00 clc @L5: lda STROFF @@ -879,45 +891,45 @@ OUTTEXT: txa adc STROFF tax - lda #$ff - sta text_bitmap-1,x + +; This was the fill-byte. +; lda #$FF +; sta text_bitmap-1,x dey bpl @L5 stz text_bitmap,x stz tmp2 - iny + iny ;(ldy #$00) @L6: lda (STRPTR),y sty tmp1 - sec ; (ch-' ') * 8 - sbc #32 - stz FONTOFF + sub #' ' ; (ch - ' ') * 8 stz FONTOFF+1 asl asl rol FONTOFF+1 asl rol FONTOFF+1 - clc ; Choose font - adc #<font + ;clc ; (cleared by rol) + adc #<font ; Choose font sta FONTOFF lda FONTOFF+1 adc #>font sta FONTOFF+1 -; and now copy the 8 bytes of that char +; And now, copy the 8 bytes of that glyph. ldx tmp2 inx stx tmp2 -; draw char from top to bottom, reading char-data from offset 8-1 to offset 0 +; Draw char. from top to bottom, reading char-data from offset 8-1 to offset 0. ldy #8-1 @L7: - lda (FONTOFF),y ; *chptr - sta text_bitmap,x ;textbuf[y*(1+len+1)+1+x] + lda (FONTOFF),y ; *chptr + sta text_bitmap,x ; textbuf[y*(1+len+1)+1+x] txa adc STROFF @@ -926,7 +938,7 @@ OUTTEXT: dey bpl @L7 - ; goto next char + ; Goto next char. ldy tmp1 iny dec STRLEN @@ -940,7 +952,7 @@ OUTTEXT: text_coll: .byte 0 text_sprite: - .byte $00,$90,$20 + .byte $04,$90,$20 .addr 0, text_bitmap text_x: .word 0 @@ -963,24 +975,24 @@ font: .byte $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF ;32 .byte $FF, $E7, $FF, $FF, $E7, $E7, $E7, $E7 ;33 .byte $FF, $FF, $FF, $FF, $FF, $99, $99, $99 ;34 - .byte $FF, $99, $99, $00, $99, $00, $99, $99 ;35 + .byte $FF, $D7, $D7, $01, $D7, $01, $D7, $D7 ;35 .byte $FF, $E7, $83, $F9, $C3, $9F, $C1, $E7 ;36 .byte $FF, $B9, $99, $CF, $E7, $F3, $99, $9D ;37 - .byte $FF, $C0, $99, $98, $C7, $C3, $99, $C3 ;38 + .byte $81, $B3, $31, $8F, $87, $33, $87, $FF ;38 .byte $FF, $FF, $FF, $FF, $FF, $E7, $F3, $F9 ;39 .byte $FF, $F3, $E7, $CF, $CF, $CF, $E7, $F3 ;40 .byte $FF, $CF, $E7, $F3, $F3, $F3, $E7, $CF ;41 - .byte $FF, $FF, $99, $C3, $00, $C3, $99, $FF ;42 + .byte $FF, $99, $C3, $81, $C3, $99, $FF, $FF ;42 .byte $FF, $FF, $E7, $E7, $81, $E7, $E7, $FF ;43 .byte $CF, $E7, $E7, $FF, $FF, $FF, $FF, $FF ;44 .byte $FF, $FF, $FF, $FF, $81, $FF, $FF, $FF ;45 .byte $FF, $E7, $E7, $FF, $FF, $FF, $FF, $FF ;46 - .byte $FF, $9F, $CF, $E7, $F3, $F9, $FC, $FF ;47 + .byte $FF, $BF, $9F, $CF, $E7, $F3, $F9, $FD ;47 .byte $FF, $C3, $99, $99, $89, $91, $99, $C3 ;48 .byte $FF, $81, $E7, $E7, $E7, $C7, $E7, $E7 ;49 .byte $FF, $81, $9F, $CF, $F3, $F9, $99, $C3 ;50 .byte $FF, $C3, $99, $F9, $E3, $F9, $99, $C3 ;51 - .byte $FF, $F9, $F9, $80, $99, $E1, $F1, $F9 ;52 + .byte $FF, $F3, $F3, $01, $33, $C3, $E3, $FB ;52 .byte $FF, $C3, $99, $F9, $F9, $83, $9F, $81 ;53 .byte $FF, $C3, $99, $99, $83, $9F, $99, $C3 ;54 .byte $FF, $E7, $E7, $E7, $E7, $F3, $99, $81 ;55 @@ -1007,7 +1019,7 @@ font: .byte $FF, $C7, $93, $F3, $F3, $F3, $F3, $E1 ;10 .byte $FF, $99, $93, $87, $8F, $87, $93, $99 ;11 .byte $FF, $81, $9F, $9F, $9F, $9F, $9F, $9F ;12 - .byte $FF, $9C, $9C, $9C, $94, $80, $88, $9C ;13 + .byte $FF, $39, $39, $39, $29, $01, $11, $39 ;13 .byte $FF, $99, $99, $91, $81, $81, $89, $99 ;14 .byte $FF, $C3, $99, $99, $99, $99, $99, $C3 ;15 .byte $FF, $9F, $9F, $9F, $83, $99, $99, $83 ;16 @@ -1017,7 +1029,7 @@ font: .byte $FF, $E7, $E7, $E7, $E7, $E7, $E7, $81 ;20 .byte $FF, $C3, $99, $99, $99, $99, $99, $99 ;21 .byte $FF, $E7, $C3, $99, $99, $99, $99, $99 ;22 - .byte $FF, $9C, $88, $80, $94, $9C, $9C, $9C ;23 + .byte $FF, $39, $11, $01, $29, $39, $39, $39 ;23 .byte $FF, $99, $99, $C3, $E7, $C3, $99, $99 ;24 .byte $FF, $E7, $E7, $E7, $C3, $99, $99, $99 ;25 .byte $FF, $81, $9F, $CF, $E7, $F3, $F9, $81 ;26 @@ -1025,7 +1037,7 @@ font: .byte $FF, $03, $9D, $CF, $83, $CF, $ED, $F3 ;28 .byte $FF, $C3, $F3, $F3, $F3, $F3, $F3, $C3 ;29 .byte $E7, $E7, $E7, $E7, $81, $C3, $E7, $FF ;30 - .byte $FF, $EF, $CF, $80, $80, $CF, $EF, $FF ;31 + .byte $FF, $DF, $9F, $01, $01, $9F, $DF, $FF ;31 ; gemena @@ -1042,7 +1054,7 @@ font: .byte $C3, $F9, $F9, $F9, $F9, $FF, $F9, $FF ;234 .byte $FF, $99, $93, $87, $93, $9F, $9F, $FF ;235 .byte $FF, $C3, $E7, $E7, $E7, $E7, $C7, $FF ;236 - .byte $FF, $9C, $94, $80, $80, $99, $FF, $FF ;237 + .byte $FF, $39, $29, $01, $83, $93, $FF, $FF ;237 .byte $FF, $99, $99, $99, $99, $83, $FF, $FF ;238 .byte $FF, $C3, $99, $99, $99, $C3, $FF, $FF ;239 .byte $9F, $9F, $83, $99, $99, $83, $FF, $FF ;240 @@ -1052,7 +1064,7 @@ font: .byte $FF, $F1, $E7, $E7, $E7, $81, $E7, $FF ;244 .byte $FF, $C1, $99, $99, $99, $99, $FF, $FF ;245 .byte $FF, $E7, $C3, $99, $99, $99, $FF, $FF ;246 - .byte $FF, $C9, $C1, $80, $94, $9C, $FF, $FF ;247 + .byte $FF, $93, $83, $01, $29, $39, $FF, $FF ;247 .byte $FF, $99, $C3, $E7, $C3, $99, $FF, $FF ;248 .byte $87, $F3, $C1, $99, $99, $99, $FF, $FF ;249 .byte $FF, $81, $CF, $E7, $F3, $81, $FF, $FF ;250 @@ -1060,4 +1072,4 @@ font: .byte $FF, $03, $9D, $CF, $83, $CF, $ED, $F3 ;252 .byte $FF, $C3, $F3, $F3, $F3, $F3, $F3, $C3 ;253 .byte $E7, $E7, $E7, $E7, $81, $C3, $E7, $FF ;254 - .byte $FF, $EF, $CF, $80, $80, $CF, $EF, $FF ;255 + .byte $FF, $DF, $9F, $01, $01, $9F, $DF, $FF ;255 diff --git a/libsrc/lynx/tgi_colors.s b/libsrc/lynx/tgi_colors.s index c7aefb417..ebc8c2889 100644 --- a/libsrc/lynx/tgi_colors.s +++ b/libsrc/lynx/tgi_colors.s @@ -4,5 +4,5 @@ .include "tgi-kernel.inc" - .export tgi_color_black:zp = $00 + .export tgi_color_black:zp = $01 .export tgi_color_white:zp = $0F diff --git a/libsrc/lynx/tgi_irq.s b/libsrc/lynx/tgi_irq.s new file mode 100644 index 000000000..3968dc0b5 --- /dev/null +++ b/libsrc/lynx/tgi_irq.s @@ -0,0 +1,11 @@ +; +; Oliver Schmidt, 2018-02-02 +; + + .export tgi_libref + .interruptor tgi_irq ; Export as IRQ handler + + .data + +tgi_libref: +tgi_irq: .byte $60, $00, $00 ; RTS plus two dummy bytes diff --git a/libsrc/lynx/toascii.s b/libsrc/lynx/toascii.s deleted file mode 100644 index 2a2088688..000000000 --- a/libsrc/lynx/toascii.s +++ /dev/null @@ -1,16 +0,0 @@ -; -; unsigned char __fastcall__ toascii (unsigned char c); -; /* Convert a target specific character to ascii */ -; - -.export _toascii - -.proc _toascii - -; X must be zero on return - ldx #0 - -; Done! - rts - -.endproc diff --git a/libsrc/mouse/mouse_load.s b/libsrc/mouse/mouse_load.s index 347250843..a3a3f284d 100644 --- a/libsrc/mouse/mouse_load.s +++ b/libsrc/mouse/mouse_load.s @@ -1,4 +1,4 @@ -; +; ; Ullrich von Bassewitz, 2006-06-05 ; ; unsigned char __fastcall__ mouse_load_driver (const struct mouse_callbacks* c, diff --git a/libsrc/mouse/mouse_move.s b/libsrc/mouse/mouse_move.s index b25716b37..4d809109c 100644 --- a/libsrc/mouse/mouse_move.s +++ b/libsrc/mouse/mouse_move.s @@ -10,7 +10,7 @@ ; .import incsp2 - .import ptr1: zp + .import ptr1: zp .include "mouse-kernel.inc" diff --git a/libsrc/nes/Makefile.inc b/libsrc/nes/Makefile.inc index f1dcbf18e..ee43b4ff8 100644 --- a/libsrc/nes/Makefile.inc +++ b/libsrc/nes/Makefile.inc @@ -1,8 +1,9 @@ -../tgi/nes-64-56-2.tgi: ../libwrk/nes/clrscr.o \ - ../libwrk/nes/cputc.o \ - ../libwrk/nes/get_tv.o \ - ../libwrk/nes/gotoxy.o \ - ../libwrk/nes/popa.o \ - ../libwrk/nes/ppu.o \ - ../libwrk/nes/ppubuf.o \ - ../libwrk/nes/setcursor.o +../target/nes/drv/tgi/nes-64-56-2.tgi: \ + ../libwrk/nes/clrscr.o \ + ../libwrk/nes/cputc.o \ + ../libwrk/nes/get_tv.o \ + ../libwrk/nes/gotoxy.o \ + ../libwrk/nes/popa.o \ + ../libwrk/nes/ppu.o \ + ../libwrk/nes/ppubuf.o \ + ../libwrk/nes/setcursor.o diff --git a/libsrc/nes/cclear.s b/libsrc/nes/cclear.s index 233c112c6..93f5c7c9a 100644 --- a/libsrc/nes/cclear.s +++ b/libsrc/nes/cclear.s @@ -6,19 +6,18 @@ ; .export _cclearxy, _cclear - .import popa, _gotoxy, cputdirect + .import gotoxy, cputdirect .importzp tmp1 _cclearxy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length and run into _cclear _cclear: cmp #0 ; Is the length zero? beq L9 ; Jump if done - sta tmp1 + sta tmp1 L1: lda #$20 ; Blank - screen code jsr cputdirect ; Direct output dec tmp1 diff --git a/libsrc/nes/chline.s b/libsrc/nes/chline.s index 5f6e67c8f..fff229575 100644 --- a/libsrc/nes/chline.s +++ b/libsrc/nes/chline.s @@ -6,15 +6,14 @@ ; .export _chlinexy, _chline - .import popa, _gotoxy, cputdirect + .import gotoxy, cputdirect .importzp tmp1 .include "nes.inc" - + _chlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length _chline: diff --git a/libsrc/nes/color.s b/libsrc/nes/color.s index bb91ff908..e3aef9a28 100644 --- a/libsrc/nes/color.s +++ b/libsrc/nes/color.s @@ -54,7 +54,7 @@ colors: .byte $0f ; 0 black .byte $3d ; 1 white .byte $04 ; 2 red .byte $3b ; 3 cyan - .byte $14 ; 4 violett + .byte $14 ; 4 violet .byte $1a ; 5 green .byte $01 ; 6 blue .byte $38 ; 7 yellow @@ -66,4 +66,3 @@ colors: .byte $0f ; 0 black .byte $2b ; d light green .byte $22 ; e light blue .byte $3d ; f light gray - diff --git a/libsrc/nes/cputc.s b/libsrc/nes/cputc.s index 10915028b..209d22db2 100644 --- a/libsrc/nes/cputc.s +++ b/libsrc/nes/cputc.s @@ -9,7 +9,7 @@ .export _cputcxy, _cputc, cputdirect, putchar .export newline .constructor initconio - .import popa, _gotoxy + .import gotoxy .import ppuinit, paletteinit, ppubuf_put .import setcursor @@ -23,8 +23,7 @@ _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C ; Plot a character - also used as internal function @@ -75,10 +74,10 @@ putchar: jmp ppubuf_put ;----------------------------------------------------------------------------- -; Initialize the conio subsystem. Code goes into the INIT segment, which may +; Initialize the conio subsystem. Code goes into the ONCE segment, which may ; be reused after startup. -.segment "INIT" +.segment "ONCE" initconio: jsr ppuinit diff --git a/libsrc/nes/crt0.s b/libsrc/nes/crt0.s index de874d363..19e97bb12 100644 --- a/libsrc/nes/crt0.s +++ b/libsrc/nes/crt0.s @@ -1,5 +1,5 @@ ; -; Startup code for cc65 (NES version) +; Start-up code for cc65 (NES version) ; ; by Groepaz/Hitmen <groepaz@gmx.net> ; based on code by Ullrich von Bassewitz <uz@cc65.org> @@ -7,11 +7,12 @@ .export _exit .export __STARTUP__ : absolute = 1 ; Mark as startup + .import initlib, donelib, callmain .import push0, _main, zerobss, copydata .import ppubuf_flush - ; Linker generated symbols + ; Linker-generated symbols .import __RAM_START__, __RAM_SIZE__ .import __SRAM_START__, __SRAM_SIZE__ .import __ROM0_START__, __ROM0_SIZE__ @@ -19,12 +20,17 @@ .import __CODE_LOAD__,__CODE_RUN__, __CODE_SIZE__ .import __RODATA_LOAD__,__RODATA_RUN__, __RODATA_SIZE__ +; ------------------------------------------------------------------------ +; Character data +; ------------------------------------------------------------------------ + .forceimport NESfont + .include "zeropage.inc" .include "nes.inc" ; ------------------------------------------------------------------------ -; 16 bytes INES header +; 16-byte INES header .segment "HEADER" @@ -100,9 +106,9 @@ start: ; Set up the stack. lda #<(__SRAM_START__ + __SRAM_SIZE__) + ldx #>(__SRAM_START__ + __SRAM_SIZE__) sta sp - lda #>(__SRAM_START__ + __SRAM_SIZE__) - sta sp+1 ; Set argument stack ptr + stx sp+1 ; Set argument stack ptr ; Call the module constructors. @@ -159,31 +165,16 @@ nmi: pha ; Interrupt exit -irq2: -irq1: -timerirq: irq: rti + ; ------------------------------------------------------------------------ -; hardware vectors +; Hardware vectors ; ------------------------------------------------------------------------ .segment "VECTORS" - .word irq2 ; $fff4 ? - .word irq1 ; $fff6 ? - .word timerirq ; $fff8 ? .word nmi ; $fffa vblank nmi .word start ; $fffc reset .word irq ; $fffe irq / brk - -; ------------------------------------------------------------------------ -; character data -; ------------------------------------------------------------------------ - -.segment "CHARS" - - .include "neschar.inc" - - diff --git a/libsrc/nes/ctype.s b/libsrc/nes/ctype.s deleted file mode 100644 index 6e0ab1785..000000000 --- a/libsrc/nes/ctype.s +++ /dev/null @@ -1,172 +0,0 @@ -; -; Ullrich von Bassewitz, 02.06.1998 -; -; Character specification table. -; - -; The tables are readonly, put them into the rodata segment - -.rodata - -; The following 256 byte wide table specifies attributes for the isxxx type -; of functions. Doing it by a table means some overhead in space, but it -; has major advantages: -; -; * It is fast. If it were'nt for the slow parameter passing of cc65, one -; could even define macros for the isxxx functions (this is usually -; done on other platforms). -; -; * It is highly portable. The only unportable part is the table itself, -; all real code goes into the common library. -; -; * We save some code in the isxxx functions. -; -; -; Bit assignments: -; -; 0 - Lower case char -; 1 - Upper case char -; 2 - Numeric digit -; 3 - Hex digit (both, lower and upper) -; 4 - Control character -; 5 - The space character itself -; 6 - Other whitespace (that is: '\f', '\n', '\r', '\t' and '\v') -; 7 - Space or tab character - - .export __ctype - -__ctype: - -.repeat 2 ; 2 times for normal and inverted - - .byte $10 ; 0/00 ___ctrl_@___ - .byte $10 ; 1/01 ___ctrl_A___ - .byte $10 ; 2/02 ___ctrl_B___ - .byte $10 ; 3/03 ___ctrl_C___ - .byte $10 ; 4/04 ___ctrl_D___ - .byte $10 ; 5/05 ___ctrl_E___ - .byte $10 ; 6/06 ___ctrl_F___ - .byte $10 ; 7/07 ___ctrl_G___ - .byte $10 ; 8/08 ___ctrl_H___ - .byte $D0 ; 9/09 ___ctrl_I___ - .byte $50 ; 10/0a ___ctrl_J___ - .byte $50 ; 11/0b ___ctrl_K___ - .byte $50 ; 12/0c ___ctrl_L___ - .byte $50 ; 13/0d ___ctrl_M___ - .byte $10 ; 14/0e ___ctrl_N___ - .byte $10 ; 15/0f ___ctrl_O___ - .byte $10 ; 16/10 ___ctrl_P___ - .byte $10 ; 17/11 ___ctrl_Q___ - .byte $10 ; 18/12 ___ctrl_R___ - .byte $10 ; 19/13 ___ctrl_S___ - .byte $10 ; 20/14 ___ctrl_T___ - .byte $10 ; 21/15 ___ctrl_U___ - .byte $10 ; 22/16 ___ctrl_V___ - .byte $10 ; 23/17 ___ctrl_W___ - .byte $10 ; 24/18 ___ctrl_X___ - .byte $10 ; 25/19 ___ctrl_Y___ - .byte $10 ; 26/1a ___ctrl_Z___ - .byte $10 ; 27/1b ___ctrl_[___ - .byte $10 ; 28/1c ___ctrl_\___ - .byte $10 ; 29/1d ___ctrl_]___ - .byte $10 ; 30/1e ___ctrl_^___ - .byte $10 ; 31/1f ___ctrl_____ - .byte $A0 ; 32/20 ___SPACE___ - .byte $00 ; 33/21 _____!_____ - .byte $00 ; 34/22 _____"_____ - .byte $00 ; 35/23 _____#_____ - .byte $00 ; 36/24 _____$_____ - .byte $00 ; 37/25 _____%_____ - .byte $00 ; 38/26 _____&_____ - .byte $00 ; 39/27 _____'_____ - .byte $00 ; 40/28 _____(_____ - .byte $00 ; 41/29 _____)_____ - .byte $00 ; 42/2a _____*_____ - .byte $00 ; 43/2b _____+_____ - .byte $00 ; 44/2c _____,_____ - .byte $00 ; 45/2d _____-_____ - .byte $00 ; 46/2e _____._____ - .byte $00 ; 47/2f _____/_____ - .byte $0C ; 48/30 _____0_____ - .byte $0C ; 49/31 _____1_____ - .byte $0C ; 50/32 _____2_____ - .byte $0C ; 51/33 _____3_____ - .byte $0C ; 52/34 _____4_____ - .byte $0C ; 53/35 _____5_____ - .byte $0C ; 54/36 _____6_____ - .byte $0C ; 55/37 _____7_____ - .byte $0C ; 56/38 _____8_____ - .byte $0C ; 57/39 _____9_____ - .byte $00 ; 58/3a _____:_____ - .byte $00 ; 59/3b _____;_____ - .byte $00 ; 60/3c _____<_____ - .byte $00 ; 61/3d _____=_____ - .byte $00 ; 62/3e _____>_____ - .byte $00 ; 63/3f _____?_____ - - .byte $00 ; 64/40 _____@_____ - .byte $0A ; 65/41 _____A_____ - .byte $0A ; 66/42 _____B_____ - .byte $0A ; 67/43 _____C_____ - .byte $0A ; 68/44 _____D_____ - .byte $0A ; 69/45 _____E_____ - .byte $0A ; 70/46 _____F_____ - .byte $02 ; 71/47 _____G_____ - .byte $02 ; 72/48 _____H_____ - .byte $02 ; 73/49 _____I_____ - .byte $02 ; 74/4a _____J_____ - .byte $02 ; 75/4b _____K_____ - .byte $02 ; 76/4c _____L_____ - .byte $02 ; 77/4d _____M_____ - .byte $02 ; 78/4e _____N_____ - .byte $02 ; 79/4f _____O_____ - .byte $02 ; 80/50 _____P_____ - .byte $02 ; 81/51 _____Q_____ - .byte $02 ; 82/52 _____R_____ - .byte $02 ; 83/53 _____S_____ - .byte $02 ; 84/54 _____T_____ - .byte $02 ; 85/55 _____U_____ - .byte $02 ; 86/56 _____V_____ - .byte $02 ; 87/57 _____W_____ - .byte $02 ; 88/58 _____X_____ - .byte $02 ; 89/59 _____Y_____ - .byte $02 ; 90/5a _____Z_____ - .byte $00 ; 91/5b _____[_____ - .byte $00 ; 92/5c _____\_____ - .byte $00 ; 93/5d _____]_____ - .byte $00 ; 94/5e _____^_____ - .byte $00 ; 95/5f _UNDERLINE_ - .byte $00 ; 96/60 ___grave___ - .byte $09 ; 97/61 _____a_____ - .byte $09 ; 98/62 _____b_____ - .byte $09 ; 99/63 _____c_____ - .byte $09 ; 100/64 _____d_____ - .byte $09 ; 101/65 _____e_____ - .byte $09 ; 102/66 _____f_____ - .byte $01 ; 103/67 _____g_____ - .byte $01 ; 104/68 _____h_____ - .byte $01 ; 105/69 _____i_____ - .byte $01 ; 106/6a _____j_____ - .byte $01 ; 107/6b _____k_____ - .byte $01 ; 108/6c _____l_____ - .byte $01 ; 109/6d _____m_____ - .byte $01 ; 110/6e _____n_____ - .byte $01 ; 111/6f _____o_____ - .byte $01 ; 112/70 _____p_____ - .byte $01 ; 113/71 _____q_____ - .byte $01 ; 114/72 _____r_____ - .byte $01 ; 115/73 _____s_____ - .byte $01 ; 116/74 _____t_____ - .byte $01 ; 117/75 _____u_____ - .byte $01 ; 118/76 _____v_____ - .byte $01 ; 119/77 _____w_____ - .byte $01 ; 120/78 _____x_____ - .byte $01 ; 121/79 _____y_____ - .byte $01 ; 122/7a _____z_____ - .byte $00 ; 123/7b _____{_____ - .byte $00 ; 124/7c _____|_____ - .byte $00 ; 125/7d _____}_____ - .byte $00 ; 126/7e _____~_____ - .byte $40 ; 127/7f ____DEL____ - -.endrepeat diff --git a/libsrc/nes/cvline.s b/libsrc/nes/cvline.s index 3ab93f34a..d564a25cb 100644 --- a/libsrc/nes/cvline.s +++ b/libsrc/nes/cvline.s @@ -6,15 +6,14 @@ ; .export _cvlinexy, _cvline - .import popa, _gotoxy, putchar, newline + .import gotoxy, putchar, newline .importzp tmp1 .include "nes.inc" _cvlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length and run into _cvline _cvline: diff --git a/libsrc/nes/gotoxy.s b/libsrc/nes/gotoxy.s index a670962fc..3460aad19 100644 --- a/libsrc/nes/gotoxy.s +++ b/libsrc/nes/gotoxy.s @@ -4,21 +4,19 @@ ; void gotoxy (unsigned char x, unsigned char y); ; - .export _gotoxy + .export gotoxy, _gotoxy .import setcursor .import popa .include "nes.inc" -.proc _gotoxy +gotoxy: + jsr popa ; Get Y +_gotoxy: sta CURS_Y ; Set Y jsr popa ; Get X sta CURS_X ; Set X tay ldx CURS_Y jmp setcursor ; Set the cursor position - -.endproc - - diff --git a/libsrc/nes/gotoy.s b/libsrc/nes/gotoy.s index cfd913f2e..a36e77964 100644 --- a/libsrc/nes/gotoy.s +++ b/libsrc/nes/gotoy.s @@ -19,4 +19,4 @@ .endproc - + diff --git a/libsrc/nes/irq.s b/libsrc/nes/irq.s index 9c026f0ed..267d9de0a 100644 --- a/libsrc/nes/irq.s +++ b/libsrc/nes/irq.s @@ -6,7 +6,7 @@ ; ------------------------------------------------------------------------ -.segment "INIT" +.segment "ONCE" initirq: rts diff --git a/libsrc/nes/joy/nes-stdjoy.s b/libsrc/nes/joy/nes-stdjoy.s index b5e653c16..63caf364b 100644 --- a/libsrc/nes/joy/nes-stdjoy.s +++ b/libsrc/nes/joy/nes-stdjoy.s @@ -29,24 +29,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $10 ; JOY_UP - .byte $20 ; JOY_DOWN - .byte $40 ; JOY_LEFT - .byte $80 ; JOY_RIGHT - .byte $01 ; JOY_FIRE (A) - .byte $02 ; JOY_FIRE2 (B) - .byte $04 ; (Select) - .byte $08 ; (Start) - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READJOY - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants diff --git a/libsrc/nes/mainargs.s b/libsrc/nes/mainargs.s index 7ed8d46f4..def01e81d 100644 --- a/libsrc/nes/mainargs.s +++ b/libsrc/nes/mainargs.s @@ -10,10 +10,10 @@ ;--------------------------------------------------------------------------- -; Get possible command-line arguments. Goes into the special INIT segment, +; Get possible command-line arguments. Goes into the special ONCE segment, ; which may be reused after the startup code is run -.segment "INIT" +.segment "ONCE" .proc initmainargs diff --git a/libsrc/nes/neschar.inc b/libsrc/nes/neschar.s similarity index 51% rename from libsrc/nes/neschar.inc rename to libsrc/nes/neschar.s index 15401868c..e3372c031 100644 --- a/libsrc/nes/neschar.inc +++ b/libsrc/nes/neschar.s @@ -1,218 +1,227 @@ - .byte %00000000 ; 0000 1-00: - .byte %00000000 ; 0001 1-00: - .byte %00000000 ; 0002 1-00: - .byte %00000000 ; 0003 1-00: - .byte %00000000 ; 0004 1-00: - .byte %00000000 ; 0005 1-00: - .byte %00000000 ; 0006 1-00: - .byte %00000000 ; 0007 1-00: +; ------------------------------------------------------------------------ +; Character data +; ------------------------------------------------------------------------ - .byte %00000000 ; 0008 1-01: - .byte %00000000 ; 0009 1-01: - .byte %00000000 ; 000A 1-01: - .byte %00000000 ; 000B 1-01: - .byte %00000000 ; 000C 1-01: - .byte %00000000 ; 000D 1-01: - .byte %00000000 ; 000E 1-01: - .byte %00000000 ; 000F 1-01: + .export NESfont - .byte %11001100 ; 0010 1-02: ** ** - .byte %11001100 ; 0011 1-02: ** ** +.segment "CHARS" + +NESfont: + .byte %00000000 ; 0000 1-00: + .byte %00000000 ; 0001 1-00: + .byte %00000000 ; 0002 1-00: + .byte %00000000 ; 0003 1-00: + .byte %00000000 ; 0004 1-00: + .byte %00000000 ; 0005 1-00: + .byte %00000000 ; 0006 1-00: + .byte %00000000 ; 0007 1-00: + + .byte %00000000 ; 0008 1-01: + .byte %00000000 ; 0009 1-01: + .byte %00000000 ; 000A 1-01: + .byte %00000000 ; 000B 1-01: + .byte %00000000 ; 000C 1-01: + .byte %00000000 ; 000D 1-01: + .byte %00000000 ; 000E 1-01: + .byte %00000000 ; 000F 1-01: + + .byte %11001100 ; 0010 1-02: ** ** + .byte %11001100 ; 0011 1-02: ** ** .byte %00110011 ; 0012 1-02: ** ** .byte %00110011 ; 0013 1-02: ** ** - .byte %11001100 ; 0014 1-02: ** ** - .byte %11001100 ; 0015 1-02: ** ** + .byte %11001100 ; 0014 1-02: ** ** + .byte %11001100 ; 0015 1-02: ** ** .byte %00110011 ; 0016 1-02: ** ** .byte %00110011 ; 0017 1-02: ** ** - .byte %11001100 ; 0018 1-03: ** ** - .byte %11001100 ; 0019 1-03: ** ** + .byte %11001100 ; 0018 1-03: ** ** + .byte %11001100 ; 0019 1-03: ** ** .byte %00110011 ; 001A 1-03: ** ** .byte %00110011 ; 001B 1-03: ** ** - .byte %11001100 ; 001C 1-03: ** ** - .byte %11001100 ; 001D 1-03: ** ** + .byte %11001100 ; 001C 1-03: ** ** + .byte %11001100 ; 001D 1-03: ** ** .byte %00110011 ; 001E 1-03: ** ** .byte %00110011 ; 001F 1-03: ** ** - .byte %00000000 ; 0020 1-04: - .byte %00011000 ; 0021 1-04: ** - .byte %00111100 ; 0022 1-04: **** - .byte %01111110 ; 0023 1-04: ****** - .byte %00011000 ; 0024 1-04: ** - .byte %00011000 ; 0025 1-04: ** - .byte %00011000 ; 0026 1-04: ** - .byte %00011000 ; 0027 1-04: ** + .byte %00000000 ; 0020 1-04: + .byte %00011000 ; 0021 1-04: ** + .byte %00111100 ; 0022 1-04: **** + .byte %01111110 ; 0023 1-04: ****** + .byte %00011000 ; 0024 1-04: ** + .byte %00011000 ; 0025 1-04: ** + .byte %00011000 ; 0026 1-04: ** + .byte %00011000 ; 0027 1-04: ** - .byte %00000000 ; 0028 1-05: - .byte %00011000 ; 0029 1-05: ** - .byte %00111100 ; 002A 1-05: **** - .byte %01111110 ; 002B 1-05: ****** - .byte %00011000 ; 002C 1-05: ** - .byte %00011000 ; 002D 1-05: ** - .byte %00011000 ; 002E 1-05: ** - .byte %00011000 ; 002F 1-05: ** + .byte %00000000 ; 0028 1-05: + .byte %00011000 ; 0029 1-05: ** + .byte %00111100 ; 002A 1-05: **** + .byte %01111110 ; 002B 1-05: ****** + .byte %00011000 ; 002C 1-05: ** + .byte %00011000 ; 002D 1-05: ** + .byte %00011000 ; 002E 1-05: ** + .byte %00011000 ; 002F 1-05: ** - .byte %00000000 ; 0030 1-06: - .byte %00010000 ; 0031 1-06: * - .byte %00110000 ; 0032 1-06: ** + .byte %00000000 ; 0030 1-06: + .byte %00010000 ; 0031 1-06: * + .byte %00110000 ; 0032 1-06: ** .byte %01111111 ; 0033 1-06: ******* .byte %01111111 ; 0034 1-06: ******* - .byte %00110000 ; 0035 1-06: ** - .byte %00010000 ; 0036 1-06: * - .byte %00000000 ; 0037 1-06: + .byte %00110000 ; 0035 1-06: ** + .byte %00010000 ; 0036 1-06: * + .byte %00000000 ; 0037 1-06: - .byte %00000000 ; 0038 1-07: - .byte %00010000 ; 0039 1-07: * - .byte %00110000 ; 003A 1-07: ** + .byte %00000000 ; 0038 1-07: + .byte %00010000 ; 0039 1-07: * + .byte %00110000 ; 003A 1-07: ** .byte %01111111 ; 003B 1-07: ******* .byte %01111111 ; 003C 1-07: ******* - .byte %00110000 ; 003D 1-07: ** - .byte %00010000 ; 003E 1-07: * - .byte %00000000 ; 003F 1-07: + .byte %00110000 ; 003D 1-07: ** + .byte %00010000 ; 003E 1-07: * + .byte %00000000 ; 003F 1-07: - .byte %00001100 ; 0040 1-08: ** - .byte %00010010 ; 0041 1-08: * * - .byte %00110000 ; 0042 1-08: ** - .byte %01111100 ; 0043 1-08: ***** - .byte %00110000 ; 0044 1-08: ** - .byte %01100010 ; 0045 1-08: ** * - .byte %11111100 ; 0046 1-08: ****** - .byte %00000000 ; 0047 1-08: + .byte %00001100 ; 0040 1-08: ** + .byte %00010010 ; 0041 1-08: * * + .byte %00110000 ; 0042 1-08: ** + .byte %01111100 ; 0043 1-08: ***** + .byte %00110000 ; 0044 1-08: ** + .byte %01100010 ; 0045 1-08: ** * + .byte %11111100 ; 0046 1-08: ****** + .byte %00000000 ; 0047 1-08: - .byte %00001100 ; 0048 1-09: ** - .byte %00010010 ; 0049 1-09: * * - .byte %00110000 ; 004A 1-09: ** - .byte %01111100 ; 004B 1-09: ***** - .byte %00110000 ; 004C 1-09: ** - .byte %01100010 ; 004D 1-09: ** * - .byte %11111100 ; 004E 1-09: ****** - .byte %00000000 ; 004F 1-09: + .byte %00001100 ; 0048 1-09: ** + .byte %00010010 ; 0049 1-09: * * + .byte %00110000 ; 004A 1-09: ** + .byte %01111100 ; 004B 1-09: ***** + .byte %00110000 ; 004C 1-09: ** + .byte %01100010 ; 004D 1-09: ** * + .byte %11111100 ; 004E 1-09: ****** + .byte %00000000 ; 004F 1-09: - .byte %00000000 ; 0050 1-0a: - .byte %00000000 ; 0051 1-0a: + .byte %00000000 ; 0050 1-0a: + .byte %00000000 ; 0051 1-0a: .byte %00000011 ; 0052 1-0a: ** - .byte %00111110 ; 0053 1-0a: ***** - .byte %01110110 ; 0054 1-0a: *** ** - .byte %00110110 ; 0055 1-0a: ** ** - .byte %00110110 ; 0056 1-0a: ** ** - .byte %00000000 ; 0057 1-0a: + .byte %00111110 ; 0053 1-0a: ***** + .byte %01110110 ; 0054 1-0a: *** ** + .byte %00110110 ; 0055 1-0a: ** ** + .byte %00110110 ; 0056 1-0a: ** ** + .byte %00000000 ; 0057 1-0a: - .byte %00000000 ; 0058 1-0b: - .byte %00000000 ; 0059 1-0b: + .byte %00000000 ; 0058 1-0b: + .byte %00000000 ; 0059 1-0b: .byte %00000011 ; 005A 1-0b: ** - .byte %00111110 ; 005B 1-0b: ***** - .byte %01110110 ; 005C 1-0b: *** ** - .byte %00110110 ; 005D 1-0b: ** ** - .byte %00110110 ; 005E 1-0b: ** ** - .byte %00000000 ; 005F 1-0b: + .byte %00111110 ; 005B 1-0b: ***** + .byte %01110110 ; 005C 1-0b: *** ** + .byte %00110110 ; 005D 1-0b: ** ** + .byte %00110110 ; 005E 1-0b: ** ** + .byte %00000000 ; 005F 1-0b: .byte %01111111 ; 0060 1-0c: ******* .byte %01111111 ; 0061 1-0c: ******* - .byte %00000000 ; 0062 1-0c: - .byte %00000000 ; 0063 1-0c: - .byte %00000000 ; 0064 1-0c: - .byte %00000000 ; 0065 1-0c: - .byte %00000000 ; 0066 1-0c: - .byte %00000000 ; 0067 1-0c: + .byte %00000000 ; 0062 1-0c: + .byte %00000000 ; 0063 1-0c: + .byte %00000000 ; 0064 1-0c: + .byte %00000000 ; 0065 1-0c: + .byte %00000000 ; 0066 1-0c: + .byte %00000000 ; 0067 1-0c: .byte %01111111 ; 0068 1-0d: ******* .byte %01111111 ; 0069 1-0d: ******* - .byte %00000000 ; 006A 1-0d: - .byte %00000000 ; 006B 1-0d: - .byte %00000000 ; 006C 1-0d: - .byte %00000000 ; 006D 1-0d: - .byte %00000000 ; 006E 1-0d: - .byte %00000000 ; 006F 1-0d: + .byte %00000000 ; 006A 1-0d: + .byte %00000000 ; 006B 1-0d: + .byte %00000000 ; 006C 1-0d: + .byte %00000000 ; 006D 1-0d: + .byte %00000000 ; 006E 1-0d: + .byte %00000000 ; 006F 1-0d: - .byte %11100000 ; 0070 1-0e: *** - .byte %11100000 ; 0071 1-0e: *** - .byte %01100000 ; 0072 1-0e: ** - .byte %01100000 ; 0073 1-0e: ** - .byte %01100000 ; 0074 1-0e: ** - .byte %01100000 ; 0075 1-0e: ** - .byte %01100000 ; 0076 1-0e: ** - .byte %01100000 ; 0077 1-0e: ** + .byte %11100000 ; 0070 1-0e: *** + .byte %11100000 ; 0071 1-0e: *** + .byte %01100000 ; 0072 1-0e: ** + .byte %01100000 ; 0073 1-0e: ** + .byte %01100000 ; 0074 1-0e: ** + .byte %01100000 ; 0075 1-0e: ** + .byte %01100000 ; 0076 1-0e: ** + .byte %01100000 ; 0077 1-0e: ** - .byte %11100000 ; 0078 1-0f: *** - .byte %11100000 ; 0079 1-0f: *** - .byte %01100000 ; 007A 1-0f: ** - .byte %01100000 ; 007B 1-0f: ** - .byte %01100000 ; 007C 1-0f: ** - .byte %01100000 ; 007D 1-0f: ** - .byte %01100000 ; 007E 1-0f: ** - .byte %01100000 ; 007F 1-0f: ** + .byte %11100000 ; 0078 1-0f: *** + .byte %11100000 ; 0079 1-0f: *** + .byte %01100000 ; 007A 1-0f: ** + .byte %01100000 ; 007B 1-0f: ** + .byte %01100000 ; 007C 1-0f: ** + .byte %01100000 ; 007D 1-0f: ** + .byte %01100000 ; 007E 1-0f: ** + .byte %01100000 ; 007F 1-0f: ** - .byte %00011000 ; 0080 1-10: ** - .byte %00011000 ; 0081 1-10: ** - .byte %00011000 ; 0082 1-10: ** - .byte %11111000 ; 0083 1-10: ***** - .byte %11111000 ; 0084 1-10: ***** - .byte %00000000 ; 0085 1-10: - .byte %00000000 ; 0086 1-10: - .byte %00000000 ; 0087 1-10: + .byte %00011000 ; 0080 1-10: ** + .byte %00011000 ; 0081 1-10: ** + .byte %00011000 ; 0082 1-10: ** + .byte %11111000 ; 0083 1-10: ***** + .byte %11111000 ; 0084 1-10: ***** + .byte %00000000 ; 0085 1-10: + .byte %00000000 ; 0086 1-10: + .byte %00000000 ; 0087 1-10: - .byte %00011000 ; 0088 1-11: ** - .byte %00011000 ; 0089 1-11: ** - .byte %00011000 ; 008A 1-11: ** - .byte %11111000 ; 008B 1-11: ***** - .byte %11111000 ; 008C 1-11: ***** - .byte %00000000 ; 008D 1-11: - .byte %00000000 ; 008E 1-11: - .byte %00000000 ; 008F 1-11: + .byte %00011000 ; 0088 1-11: ** + .byte %00011000 ; 0089 1-11: ** + .byte %00011000 ; 008A 1-11: ** + .byte %11111000 ; 008B 1-11: ***** + .byte %11111000 ; 008C 1-11: ***** + .byte %00000000 ; 008D 1-11: + .byte %00000000 ; 008E 1-11: + .byte %00000000 ; 008F 1-11: - .byte %11001100 ; 0090 1-12: ** ** + .byte %11001100 ; 0090 1-12: ** ** .byte %10011001 ; 0091 1-12: * ** * .byte %00110011 ; 0092 1-12: ** ** - .byte %01100110 ; 0093 1-12: ** ** - .byte %11001100 ; 0094 1-12: ** ** + .byte %01100110 ; 0093 1-12: ** ** + .byte %11001100 ; 0094 1-12: ** ** .byte %10011001 ; 0095 1-12: * ** * .byte %00110011 ; 0096 1-12: ** ** - .byte %01100110 ; 0097 1-12: ** ** + .byte %01100110 ; 0097 1-12: ** ** - .byte %11001100 ; 0098 1-13: ** ** + .byte %11001100 ; 0098 1-13: ** ** .byte %10011001 ; 0099 1-13: * ** * .byte %00110011 ; 009A 1-13: ** ** - .byte %01100110 ; 009B 1-13: ** ** - .byte %11001100 ; 009C 1-13: ** ** + .byte %01100110 ; 009B 1-13: ** ** + .byte %11001100 ; 009C 1-13: ** ** .byte %10011001 ; 009D 1-13: * ** * .byte %00110011 ; 009E 1-13: ** ** - .byte %01100110 ; 009F 1-13: ** ** + .byte %01100110 ; 009F 1-13: ** ** .byte %00110011 ; 00A0 1-14: ** ** .byte %10011001 ; 00A1 1-14: * ** * - .byte %11001100 ; 00A2 1-14: ** ** - .byte %01100110 ; 00A3 1-14: ** ** + .byte %11001100 ; 00A2 1-14: ** ** + .byte %01100110 ; 00A3 1-14: ** ** .byte %00110011 ; 00A4 1-14: ** ** .byte %10011001 ; 00A5 1-14: * ** * - .byte %11001100 ; 00A6 1-14: ** ** - .byte %01100110 ; 00A7 1-14: ** ** + .byte %11001100 ; 00A6 1-14: ** ** + .byte %01100110 ; 00A7 1-14: ** ** .byte %00110011 ; 00A8 1-15: ** ** .byte %10011001 ; 00A9 1-15: * ** * - .byte %11001100 ; 00AA 1-15: ** ** - .byte %01100110 ; 00AB 1-15: ** ** + .byte %11001100 ; 00AA 1-15: ** ** + .byte %01100110 ; 00AB 1-15: ** ** .byte %00110011 ; 00AC 1-15: ** ** .byte %10011001 ; 00AD 1-15: * ** * - .byte %11001100 ; 00AE 1-15: ** ** - .byte %01100110 ; 00AF 1-15: ** ** + .byte %11001100 ; 00AE 1-15: ** ** + .byte %01100110 ; 00AF 1-15: ** ** - .byte %00000000 ; 00B0 1-16: - .byte %00000000 ; 00B1 1-16: - .byte %00000000 ; 00B2 1-16: + .byte %00000000 ; 00B0 1-16: + .byte %00000000 ; 00B1 1-16: + .byte %00000000 ; 00B2 1-16: .byte %11111111 ; 00B3 1-16: ******** .byte %11111111 ; 00B4 1-16: ******** - .byte %00000000 ; 00B5 1-16: - .byte %00000000 ; 00B6 1-16: - .byte %00000000 ; 00B7 1-16: + .byte %00000000 ; 00B5 1-16: + .byte %00000000 ; 00B6 1-16: + .byte %00000000 ; 00B7 1-16: - .byte %00000000 ; 00B8 1-17: - .byte %00000000 ; 00B9 1-17: - .byte %00000000 ; 00BA 1-17: + .byte %00000000 ; 00B8 1-17: + .byte %00000000 ; 00B9 1-17: + .byte %00000000 ; 00BA 1-17: .byte %11111111 ; 00BB 1-17: ******** .byte %11111111 ; 00BC 1-17: ******** - .byte %00000000 ; 00BD 1-17: - .byte %00000000 ; 00BE 1-17: - .byte %00000000 ; 00BF 1-17: + .byte %00000000 ; 00BD 1-17: + .byte %00000000 ; 00BE 1-17: + .byte %00000000 ; 00BF 1-17: .byte %00000011 ; 00C0 1-18: ** .byte %00000011 ; 00C1 1-18: ** @@ -232,1157 +241,1157 @@ .byte %00000011 ; 00CE 1-19: ** .byte %00000011 ; 00CF 1-19: ** - .byte %00000000 ; 00D0 1-1a: - .byte %00000000 ; 00D1 1-1a: - .byte %00000000 ; 00D2 1-1a: - .byte %00000000 ; 00D3 1-1a: - .byte %11001100 ; 00D4 1-1a: ** ** - .byte %11001100 ; 00D5 1-1a: ** ** + .byte %00000000 ; 00D0 1-1a: + .byte %00000000 ; 00D1 1-1a: + .byte %00000000 ; 00D2 1-1a: + .byte %00000000 ; 00D3 1-1a: + .byte %11001100 ; 00D4 1-1a: ** ** + .byte %11001100 ; 00D5 1-1a: ** ** .byte %00110011 ; 00D6 1-1a: ** ** .byte %00110011 ; 00D7 1-1a: ** ** - .byte %00000000 ; 00D8 1-1b: - .byte %00000000 ; 00D9 1-1b: - .byte %00000000 ; 00DA 1-1b: - .byte %00000000 ; 00DB 1-1b: - .byte %11001100 ; 00DC 1-1b: ** ** - .byte %11001100 ; 00DD 1-1b: ** ** + .byte %00000000 ; 00D8 1-1b: + .byte %00000000 ; 00D9 1-1b: + .byte %00000000 ; 00DA 1-1b: + .byte %00000000 ; 00DB 1-1b: + .byte %11001100 ; 00DC 1-1b: ** ** + .byte %11001100 ; 00DD 1-1b: ** ** .byte %00110011 ; 00DE 1-1b: ** ** .byte %00110011 ; 00DF 1-1b: ** ** - .byte %00011000 ; 00E0 1-1c: ** - .byte %00011000 ; 00E1 1-1c: ** - .byte %00011000 ; 00E2 1-1c: ** - .byte %00011000 ; 00E3 1-1c: ** - .byte %00011000 ; 00E4 1-1c: ** - .byte %00011000 ; 00E5 1-1c: ** - .byte %00011000 ; 00E6 1-1c: ** - .byte %00011000 ; 00E7 1-1c: ** + .byte %00011000 ; 00E0 1-1c: ** + .byte %00011000 ; 00E1 1-1c: ** + .byte %00011000 ; 00E2 1-1c: ** + .byte %00011000 ; 00E3 1-1c: ** + .byte %00011000 ; 00E4 1-1c: ** + .byte %00011000 ; 00E5 1-1c: ** + .byte %00011000 ; 00E6 1-1c: ** + .byte %00011000 ; 00E7 1-1c: ** - .byte %00011000 ; 00E8 1-1d: ** - .byte %00011000 ; 00E9 1-1d: ** - .byte %00011000 ; 00EA 1-1d: ** - .byte %00011000 ; 00EB 1-1d: ** - .byte %00011000 ; 00EC 1-1d: ** - .byte %00011000 ; 00ED 1-1d: ** - .byte %00011000 ; 00EE 1-1d: ** - .byte %00011000 ; 00EF 1-1d: ** + .byte %00011000 ; 00E8 1-1d: ** + .byte %00011000 ; 00E9 1-1d: ** + .byte %00011000 ; 00EA 1-1d: ** + .byte %00011000 ; 00EB 1-1d: ** + .byte %00011000 ; 00EC 1-1d: ** + .byte %00011000 ; 00ED 1-1d: ** + .byte %00011000 ; 00EE 1-1d: ** + .byte %00011000 ; 00EF 1-1d: ** - .byte %00011000 ; 00F0 1-1e: ** - .byte %00011000 ; 00F1 1-1e: ** - .byte %00011000 ; 00F2 1-1e: ** + .byte %00011000 ; 00F0 1-1e: ** + .byte %00011000 ; 00F1 1-1e: ** + .byte %00011000 ; 00F2 1-1e: ** .byte %00011111 ; 00F3 1-1e: ***** .byte %00011111 ; 00F4 1-1e: ***** - .byte %00011000 ; 00F5 1-1e: ** - .byte %00011000 ; 00F6 1-1e: ** - .byte %00011000 ; 00F7 1-1e: ** + .byte %00011000 ; 00F5 1-1e: ** + .byte %00011000 ; 00F6 1-1e: ** + .byte %00011000 ; 00F7 1-1e: ** - .byte %00011000 ; 00F8 1-1f: ** - .byte %00011000 ; 00F9 1-1f: ** - .byte %00011000 ; 00FA 1-1f: ** + .byte %00011000 ; 00F8 1-1f: ** + .byte %00011000 ; 00F9 1-1f: ** + .byte %00011000 ; 00FA 1-1f: ** .byte %00011111 ; 00FB 1-1f: ***** .byte %00011111 ; 00FC 1-1f: ***** - .byte %00011000 ; 00FD 1-1f: ** - .byte %00011000 ; 00FE 1-1f: ** - .byte %00011000 ; 00FF 1-1f: ** + .byte %00011000 ; 00FD 1-1f: ** + .byte %00011000 ; 00FE 1-1f: ** + .byte %00011000 ; 00FF 1-1f: ** - .byte %00011000 ; 0100 1-20: ** - .byte %00011000 ; 0101 1-20: ** - .byte %00011000 ; 0102 1-20: ** + .byte %00011000 ; 0100 1-20: ** + .byte %00011000 ; 0101 1-20: ** + .byte %00011000 ; 0102 1-20: ** .byte %11111111 ; 0103 1-20: ******** .byte %11111111 ; 0104 1-20: ******** - .byte %00011000 ; 0105 1-20: ** - .byte %00011000 ; 0106 1-20: ** - .byte %00011000 ; 0107 1-20: ** + .byte %00011000 ; 0105 1-20: ** + .byte %00011000 ; 0106 1-20: ** + .byte %00011000 ; 0107 1-20: ** - .byte %00011000 ; 0108 1-21: ** - .byte %00011000 ; 0109 1-21: ** - .byte %00011000 ; 010A 1-21: ** + .byte %00011000 ; 0108 1-21: ** + .byte %00011000 ; 0109 1-21: ** + .byte %00011000 ; 010A 1-21: ** .byte %11111111 ; 010B 1-21: ******** .byte %11111111 ; 010C 1-21: ******** - .byte %00011000 ; 010D 1-21: ** - .byte %00011000 ; 010E 1-21: ** - .byte %00011000 ; 010F 1-21: ** + .byte %00011000 ; 010D 1-21: ** + .byte %00011000 ; 010E 1-21: ** + .byte %00011000 ; 010F 1-21: ** - .byte %00011000 ; 0110 1-22: ** - .byte %00011000 ; 0111 1-22: ** - .byte %00011000 ; 0112 1-22: ** + .byte %00011000 ; 0110 1-22: ** + .byte %00011000 ; 0111 1-22: ** + .byte %00011000 ; 0112 1-22: ** .byte %00011111 ; 0113 1-22: ***** .byte %00011111 ; 0114 1-22: ***** - .byte %00000000 ; 0115 1-22: - .byte %00000000 ; 0116 1-22: - .byte %00000000 ; 0117 1-22: + .byte %00000000 ; 0115 1-22: + .byte %00000000 ; 0116 1-22: + .byte %00000000 ; 0117 1-22: - .byte %00011000 ; 0118 1-23: ** - .byte %00011000 ; 0119 1-23: ** - .byte %00011000 ; 011A 1-23: ** + .byte %00011000 ; 0118 1-23: ** + .byte %00011000 ; 0119 1-23: ** + .byte %00011000 ; 011A 1-23: ** .byte %00011111 ; 011B 1-23: ***** .byte %00011111 ; 011C 1-23: ***** - .byte %00000000 ; 011D 1-23: - .byte %00000000 ; 011E 1-23: - .byte %00000000 ; 011F 1-23: + .byte %00000000 ; 011D 1-23: + .byte %00000000 ; 011E 1-23: + .byte %00000000 ; 011F 1-23: - .byte %00000000 ; 0120 1-24: - .byte %00000000 ; 0121 1-24: - .byte %00000000 ; 0122 1-24: - .byte %11111000 ; 0123 1-24: ***** - .byte %11111000 ; 0124 1-24: ***** - .byte %00011000 ; 0125 1-24: ** - .byte %00011000 ; 0126 1-24: ** - .byte %00011000 ; 0127 1-24: ** + .byte %00000000 ; 0120 1-24: + .byte %00000000 ; 0121 1-24: + .byte %00000000 ; 0122 1-24: + .byte %11111000 ; 0123 1-24: ***** + .byte %11111000 ; 0124 1-24: ***** + .byte %00011000 ; 0125 1-24: ** + .byte %00011000 ; 0126 1-24: ** + .byte %00011000 ; 0127 1-24: ** - .byte %00000000 ; 0128 1-25: - .byte %00000000 ; 0129 1-25: - .byte %00000000 ; 012A 1-25: - .byte %11111000 ; 012B 1-25: ***** - .byte %11111000 ; 012C 1-25: ***** - .byte %00011000 ; 012D 1-25: ** - .byte %00011000 ; 012E 1-25: ** - .byte %00011000 ; 012F 1-25: ** + .byte %00000000 ; 0128 1-25: + .byte %00000000 ; 0129 1-25: + .byte %00000000 ; 012A 1-25: + .byte %11111000 ; 012B 1-25: ***** + .byte %11111000 ; 012C 1-25: ***** + .byte %00011000 ; 012D 1-25: ** + .byte %00011000 ; 012E 1-25: ** + .byte %00011000 ; 012F 1-25: ** - .byte %00000000 ; 0130 1-26: - .byte %00000000 ; 0131 1-26: - .byte %00000000 ; 0132 1-26: - .byte %00000000 ; 0133 1-26: - .byte %00000000 ; 0134 1-26: - .byte %00000000 ; 0135 1-26: + .byte %00000000 ; 0130 1-26: + .byte %00000000 ; 0131 1-26: + .byte %00000000 ; 0132 1-26: + .byte %00000000 ; 0133 1-26: + .byte %00000000 ; 0134 1-26: + .byte %00000000 ; 0135 1-26: .byte %11111111 ; 0136 1-26: ******** .byte %11111111 ; 0137 1-26: ******** - .byte %00000000 ; 0138 1-27: - .byte %00000000 ; 0139 1-27: - .byte %00000000 ; 013A 1-27: - .byte %00000000 ; 013B 1-27: - .byte %00000000 ; 013C 1-27: - .byte %00000000 ; 013D 1-27: + .byte %00000000 ; 0138 1-27: + .byte %00000000 ; 0139 1-27: + .byte %00000000 ; 013A 1-27: + .byte %00000000 ; 013B 1-27: + .byte %00000000 ; 013C 1-27: + .byte %00000000 ; 013D 1-27: .byte %11111111 ; 013E 1-27: ******** .byte %11111111 ; 013F 1-27: ******** - .byte %00000000 ; 0140 1-28: - .byte %00000000 ; 0141 1-28: - .byte %00000000 ; 0142 1-28: + .byte %00000000 ; 0140 1-28: + .byte %00000000 ; 0141 1-28: + .byte %00000000 ; 0142 1-28: .byte %00011111 ; 0143 1-28: ***** .byte %00011111 ; 0144 1-28: ***** - .byte %00011000 ; 0145 1-28: ** - .byte %00011000 ; 0146 1-28: ** - .byte %00011000 ; 0147 1-28: ** + .byte %00011000 ; 0145 1-28: ** + .byte %00011000 ; 0146 1-28: ** + .byte %00011000 ; 0147 1-28: ** - .byte %00000000 ; 0148 1-29: - .byte %00000000 ; 0149 1-29: - .byte %00000000 ; 014A 1-29: + .byte %00000000 ; 0148 1-29: + .byte %00000000 ; 0149 1-29: + .byte %00000000 ; 014A 1-29: .byte %00011111 ; 014B 1-29: ***** .byte %00011111 ; 014C 1-29: ***** - .byte %00011000 ; 014D 1-29: ** - .byte %00011000 ; 014E 1-29: ** - .byte %00011000 ; 014F 1-29: ** + .byte %00011000 ; 014D 1-29: ** + .byte %00011000 ; 014E 1-29: ** + .byte %00011000 ; 014F 1-29: ** - .byte %00011000 ; 0150 1-2a: ** - .byte %00011000 ; 0151 1-2a: ** - .byte %00011000 ; 0152 1-2a: ** + .byte %00011000 ; 0150 1-2a: ** + .byte %00011000 ; 0151 1-2a: ** + .byte %00011000 ; 0152 1-2a: ** .byte %11111111 ; 0153 1-2a: ******** .byte %11111111 ; 0154 1-2a: ******** - .byte %00000000 ; 0155 1-2a: - .byte %00000000 ; 0156 1-2a: - .byte %00000000 ; 0157 1-2a: + .byte %00000000 ; 0155 1-2a: + .byte %00000000 ; 0156 1-2a: + .byte %00000000 ; 0157 1-2a: - .byte %00011000 ; 0158 1-2b: ** - .byte %00011000 ; 0159 1-2b: ** - .byte %00011000 ; 015A 1-2b: ** + .byte %00011000 ; 0158 1-2b: ** + .byte %00011000 ; 0159 1-2b: ** + .byte %00011000 ; 015A 1-2b: ** .byte %11111111 ; 015B 1-2b: ******** .byte %11111111 ; 015C 1-2b: ******** - .byte %00000000 ; 015D 1-2b: - .byte %00000000 ; 015E 1-2b: - .byte %00000000 ; 015F 1-2b: + .byte %00000000 ; 015D 1-2b: + .byte %00000000 ; 015E 1-2b: + .byte %00000000 ; 015F 1-2b: - .byte %00000000 ; 0160 1-2c: - .byte %00000000 ; 0161 1-2c: - .byte %00000000 ; 0162 1-2c: + .byte %00000000 ; 0160 1-2c: + .byte %00000000 ; 0161 1-2c: + .byte %00000000 ; 0162 1-2c: .byte %11111111 ; 0163 1-2c: ******** .byte %11111111 ; 0164 1-2c: ******** - .byte %00011000 ; 0165 1-2c: ** - .byte %00011000 ; 0166 1-2c: ** - .byte %00011000 ; 0167 1-2c: ** + .byte %00011000 ; 0165 1-2c: ** + .byte %00011000 ; 0166 1-2c: ** + .byte %00011000 ; 0167 1-2c: ** - .byte %00000000 ; 0168 1-2d: - .byte %00000000 ; 0169 1-2d: - .byte %00000000 ; 016A 1-2d: + .byte %00000000 ; 0168 1-2d: + .byte %00000000 ; 0169 1-2d: + .byte %00000000 ; 016A 1-2d: .byte %11111111 ; 016B 1-2d: ******** .byte %11111111 ; 016C 1-2d: ******** - .byte %00011000 ; 016D 1-2d: ** - .byte %00011000 ; 016E 1-2d: ** - .byte %00011000 ; 016F 1-2d: ** + .byte %00011000 ; 016D 1-2d: ** + .byte %00011000 ; 016E 1-2d: ** + .byte %00011000 ; 016F 1-2d: ** - .byte %00011000 ; 0170 1-2e: ** - .byte %00011000 ; 0171 1-2e: ** - .byte %00011000 ; 0172 1-2e: ** - .byte %11111000 ; 0173 1-2e: ***** - .byte %11111000 ; 0174 1-2e: ***** - .byte %00011000 ; 0175 1-2e: ** - .byte %00011000 ; 0176 1-2e: ** - .byte %00011000 ; 0177 1-2e: ** + .byte %00011000 ; 0170 1-2e: ** + .byte %00011000 ; 0171 1-2e: ** + .byte %00011000 ; 0172 1-2e: ** + .byte %11111000 ; 0173 1-2e: ***** + .byte %11111000 ; 0174 1-2e: ***** + .byte %00011000 ; 0175 1-2e: ** + .byte %00011000 ; 0176 1-2e: ** + .byte %00011000 ; 0177 1-2e: ** - .byte %00011000 ; 0178 1-2f: ** - .byte %00011000 ; 0179 1-2f: ** - .byte %00011000 ; 017A 1-2f: ** - .byte %11111000 ; 017B 1-2f: ***** - .byte %11111000 ; 017C 1-2f: ***** - .byte %00011000 ; 017D 1-2f: ** - .byte %00011000 ; 017E 1-2f: ** - .byte %00011000 ; 017F 1-2f: ** + .byte %00011000 ; 0178 1-2f: ** + .byte %00011000 ; 0179 1-2f: ** + .byte %00011000 ; 017A 1-2f: ** + .byte %11111000 ; 017B 1-2f: ***** + .byte %11111000 ; 017C 1-2f: ***** + .byte %00011000 ; 017D 1-2f: ** + .byte %00011000 ; 017E 1-2f: ** + .byte %00011000 ; 017F 1-2f: ** - .byte %11110000 ; 0180 1-30: **** - .byte %11110000 ; 0181 1-30: **** - .byte %11110000 ; 0182 1-30: **** - .byte %11110000 ; 0183 1-30: **** - .byte %11110000 ; 0184 1-30: **** - .byte %11110000 ; 0185 1-30: **** - .byte %11110000 ; 0186 1-30: **** - .byte %11110000 ; 0187 1-30: **** + .byte %11110000 ; 0180 1-30: **** + .byte %11110000 ; 0181 1-30: **** + .byte %11110000 ; 0182 1-30: **** + .byte %11110000 ; 0183 1-30: **** + .byte %11110000 ; 0184 1-30: **** + .byte %11110000 ; 0185 1-30: **** + .byte %11110000 ; 0186 1-30: **** + .byte %11110000 ; 0187 1-30: **** - .byte %11110000 ; 0188 1-31: **** - .byte %11110000 ; 0189 1-31: **** - .byte %11110000 ; 018A 1-31: **** - .byte %11110000 ; 018B 1-31: **** - .byte %11110000 ; 018C 1-31: **** - .byte %11110000 ; 018D 1-31: **** - .byte %11110000 ; 018E 1-31: **** - .byte %11110000 ; 018F 1-31: **** + .byte %11110000 ; 0188 1-31: **** + .byte %11110000 ; 0189 1-31: **** + .byte %11110000 ; 018A 1-31: **** + .byte %11110000 ; 018B 1-31: **** + .byte %11110000 ; 018C 1-31: **** + .byte %11110000 ; 018D 1-31: **** + .byte %11110000 ; 018E 1-31: **** + .byte %11110000 ; 018F 1-31: **** - .byte %00000000 ; 0190 1-32: - .byte %00000000 ; 0191 1-32: - .byte %00000000 ; 0192 1-32: - .byte %00000000 ; 0193 1-32: + .byte %00000000 ; 0190 1-32: + .byte %00000000 ; 0191 1-32: + .byte %00000000 ; 0192 1-32: + .byte %00000000 ; 0193 1-32: .byte %11111111 ; 0194 1-32: ******** .byte %11111111 ; 0195 1-32: ******** .byte %11111111 ; 0196 1-32: ******** .byte %11111111 ; 0197 1-32: ******** - .byte %00000000 ; 0198 1-33: - .byte %00000000 ; 0199 1-33: - .byte %00000000 ; 019A 1-33: - .byte %00000000 ; 019B 1-33: + .byte %00000000 ; 0198 1-33: + .byte %00000000 ; 0199 1-33: + .byte %00000000 ; 019A 1-33: + .byte %00000000 ; 019B 1-33: .byte %11111111 ; 019C 1-33: ******** .byte %11111111 ; 019D 1-33: ******** .byte %11111111 ; 019E 1-33: ******** .byte %11111111 ; 019F 1-33: ******** - .byte %00000000 ; 01A0 1-34: - .byte %00000000 ; 01A1 1-34: - .byte %00000000 ; 01A2 1-34: - .byte %00000000 ; 01A3 1-34: - .byte %11110000 ; 01A4 1-34: **** - .byte %11110000 ; 01A5 1-34: **** - .byte %11110000 ; 01A6 1-34: **** - .byte %11110000 ; 01A7 1-34: **** + .byte %00000000 ; 01A0 1-34: + .byte %00000000 ; 01A1 1-34: + .byte %00000000 ; 01A2 1-34: + .byte %00000000 ; 01A3 1-34: + .byte %11110000 ; 01A4 1-34: **** + .byte %11110000 ; 01A5 1-34: **** + .byte %11110000 ; 01A6 1-34: **** + .byte %11110000 ; 01A7 1-34: **** - .byte %00000000 ; 01A8 1-35: - .byte %00000000 ; 01A9 1-35: - .byte %00000000 ; 01AA 1-35: - .byte %00000000 ; 01AB 1-35: - .byte %11110000 ; 01AC 1-35: **** - .byte %11110000 ; 01AD 1-35: **** - .byte %11110000 ; 01AE 1-35: **** - .byte %11110000 ; 01AF 1-35: **** + .byte %00000000 ; 01A8 1-35: + .byte %00000000 ; 01A9 1-35: + .byte %00000000 ; 01AA 1-35: + .byte %00000000 ; 01AB 1-35: + .byte %11110000 ; 01AC 1-35: **** + .byte %11110000 ; 01AD 1-35: **** + .byte %11110000 ; 01AE 1-35: **** + .byte %11110000 ; 01AF 1-35: **** - .byte %11000000 ; 01B0 1-36: ** - .byte %11000000 ; 01B1 1-36: ** - .byte %00110000 ; 01B2 1-36: ** - .byte %00110000 ; 01B3 1-36: ** - .byte %11000000 ; 01B4 1-36: ** - .byte %11000000 ; 01B5 1-36: ** - .byte %00110000 ; 01B6 1-36: ** - .byte %00110000 ; 01B7 1-36: ** + .byte %11000000 ; 01B0 1-36: ** + .byte %11000000 ; 01B1 1-36: ** + .byte %00110000 ; 01B2 1-36: ** + .byte %00110000 ; 01B3 1-36: ** + .byte %11000000 ; 01B4 1-36: ** + .byte %11000000 ; 01B5 1-36: ** + .byte %00110000 ; 01B6 1-36: ** + .byte %00110000 ; 01B7 1-36: ** - .byte %11000000 ; 01B8 1-37: ** - .byte %11000000 ; 01B9 1-37: ** - .byte %00110000 ; 01BA 1-37: ** - .byte %00110000 ; 01BB 1-37: ** - .byte %11000000 ; 01BC 1-37: ** - .byte %11000000 ; 01BD 1-37: ** - .byte %00110000 ; 01BE 1-37: ** - .byte %00110000 ; 01BF 1-37: ** + .byte %11000000 ; 01B8 1-37: ** + .byte %11000000 ; 01B9 1-37: ** + .byte %00110000 ; 01BA 1-37: ** + .byte %00110000 ; 01BB 1-37: ** + .byte %11000000 ; 01BC 1-37: ** + .byte %11000000 ; 01BD 1-37: ** + .byte %00110000 ; 01BE 1-37: ** + .byte %00110000 ; 01BF 1-37: ** .byte %00001111 ; 01C0 1-38: **** .byte %00001111 ; 01C1 1-38: **** .byte %00001111 ; 01C2 1-38: **** .byte %00001111 ; 01C3 1-38: **** - .byte %00000000 ; 01C4 1-38: - .byte %00000000 ; 01C5 1-38: - .byte %00000000 ; 01C6 1-38: - .byte %00000000 ; 01C7 1-38: + .byte %00000000 ; 01C4 1-38: + .byte %00000000 ; 01C5 1-38: + .byte %00000000 ; 01C6 1-38: + .byte %00000000 ; 01C7 1-38: .byte %00001111 ; 01C8 1-39: **** .byte %00001111 ; 01C9 1-39: **** .byte %00001111 ; 01CA 1-39: **** .byte %00001111 ; 01CB 1-39: **** - .byte %00000000 ; 01CC 1-39: - .byte %00000000 ; 01CD 1-39: - .byte %00000000 ; 01CE 1-39: - .byte %00000000 ; 01CF 1-39: + .byte %00000000 ; 01CC 1-39: + .byte %00000000 ; 01CD 1-39: + .byte %00000000 ; 01CE 1-39: + .byte %00000000 ; 01CF 1-39: - .byte %00000000 ; 01D0 1-3a: - .byte %00000000 ; 01D1 1-3a: - .byte %00000000 ; 01D2 1-3a: - .byte %00000000 ; 01D3 1-3a: + .byte %00000000 ; 01D0 1-3a: + .byte %00000000 ; 01D1 1-3a: + .byte %00000000 ; 01D2 1-3a: + .byte %00000000 ; 01D3 1-3a: .byte %00001111 ; 01D4 1-3a: **** .byte %00001111 ; 01D5 1-3a: **** .byte %00001111 ; 01D6 1-3a: **** .byte %00001111 ; 01D7 1-3a: **** - .byte %00000000 ; 01D8 1-3b: - .byte %00000000 ; 01D9 1-3b: - .byte %00000000 ; 01DA 1-3b: - .byte %00000000 ; 01DB 1-3b: + .byte %00000000 ; 01D8 1-3b: + .byte %00000000 ; 01D9 1-3b: + .byte %00000000 ; 01DA 1-3b: + .byte %00000000 ; 01DB 1-3b: .byte %00001111 ; 01DC 1-3b: **** .byte %00001111 ; 01DD 1-3b: **** .byte %00001111 ; 01DE 1-3b: **** .byte %00001111 ; 01DF 1-3b: **** - .byte %11110000 ; 01E0 1-3c: **** - .byte %11110000 ; 01E1 1-3c: **** - .byte %11110000 ; 01E2 1-3c: **** - .byte %11110000 ; 01E3 1-3c: **** - .byte %00000000 ; 01E4 1-3c: - .byte %00000000 ; 01E5 1-3c: - .byte %00000000 ; 01E6 1-3c: - .byte %00000000 ; 01E7 1-3c: + .byte %11110000 ; 01E0 1-3c: **** + .byte %11110000 ; 01E1 1-3c: **** + .byte %11110000 ; 01E2 1-3c: **** + .byte %11110000 ; 01E3 1-3c: **** + .byte %00000000 ; 01E4 1-3c: + .byte %00000000 ; 01E5 1-3c: + .byte %00000000 ; 01E6 1-3c: + .byte %00000000 ; 01E7 1-3c: - .byte %11110000 ; 01E8 1-3d: **** - .byte %11110000 ; 01E9 1-3d: **** - .byte %11110000 ; 01EA 1-3d: **** - .byte %11110000 ; 01EB 1-3d: **** - .byte %00000000 ; 01EC 1-3d: - .byte %00000000 ; 01ED 1-3d: - .byte %00000000 ; 01EE 1-3d: - .byte %00000000 ; 01EF 1-3d: + .byte %11110000 ; 01E8 1-3d: **** + .byte %11110000 ; 01E9 1-3d: **** + .byte %11110000 ; 01EA 1-3d: **** + .byte %11110000 ; 01EB 1-3d: **** + .byte %00000000 ; 01EC 1-3d: + .byte %00000000 ; 01ED 1-3d: + .byte %00000000 ; 01EE 1-3d: + .byte %00000000 ; 01EF 1-3d: - .byte %11110000 ; 01F0 1-3e: **** - .byte %11110000 ; 01F1 1-3e: **** - .byte %11110000 ; 01F2 1-3e: **** - .byte %11110000 ; 01F3 1-3e: **** + .byte %11110000 ; 01F0 1-3e: **** + .byte %11110000 ; 01F1 1-3e: **** + .byte %11110000 ; 01F2 1-3e: **** + .byte %11110000 ; 01F3 1-3e: **** .byte %00001111 ; 01F4 1-3e: **** .byte %00001111 ; 01F5 1-3e: **** .byte %00001111 ; 01F6 1-3e: **** .byte %00001111 ; 01F7 1-3e: **** - .byte %11110000 ; 01F8 1-3f: **** - .byte %11110000 ; 01F9 1-3f: **** - .byte %11110000 ; 01FA 1-3f: **** - .byte %11110000 ; 01FB 1-3f: **** + .byte %11110000 ; 01F8 1-3f: **** + .byte %11110000 ; 01F9 1-3f: **** + .byte %11110000 ; 01FA 1-3f: **** + .byte %11110000 ; 01FB 1-3f: **** .byte %00001111 ; 01FC 1-3f: **** .byte %00001111 ; 01FD 1-3f: **** .byte %00001111 ; 01FE 1-3f: **** .byte %00001111 ; 01FF 1-3f: **** - .byte %00000000 ; 0200 1-40: - .byte %00000000 ; 0201 1-40: - .byte %00000000 ; 0202 1-40: - .byte %00000000 ; 0203 1-40: - .byte %00000000 ; 0204 1-40: - .byte %00000000 ; 0205 1-40: - .byte %00000000 ; 0206 1-40: - .byte %00000000 ; 0207 1-40: + .byte %00000000 ; 0200 1-40: + .byte %00000000 ; 0201 1-40: + .byte %00000000 ; 0202 1-40: + .byte %00000000 ; 0203 1-40: + .byte %00000000 ; 0204 1-40: + .byte %00000000 ; 0205 1-40: + .byte %00000000 ; 0206 1-40: + .byte %00000000 ; 0207 1-40: - .byte %00000000 ; 0208 1-41: - .byte %00000000 ; 0209 1-41: - .byte %00000000 ; 020A 1-41: - .byte %00000000 ; 020B 1-41: - .byte %00000000 ; 020C 1-41: - .byte %00000000 ; 020D 1-41: - .byte %00000000 ; 020E 1-41: - .byte %00000000 ; 020F 1-41: + .byte %00000000 ; 0208 1-41: + .byte %00000000 ; 0209 1-41: + .byte %00000000 ; 020A 1-41: + .byte %00000000 ; 020B 1-41: + .byte %00000000 ; 020C 1-41: + .byte %00000000 ; 020D 1-41: + .byte %00000000 ; 020E 1-41: + .byte %00000000 ; 020F 1-41: - .byte %00011000 ; 0210 1-42: ** - .byte %00011000 ; 0211 1-42: ** - .byte %00011000 ; 0212 1-42: ** - .byte %00011000 ; 0213 1-42: ** - .byte %00000000 ; 0214 1-42: - .byte %00000000 ; 0215 1-42: - .byte %00011000 ; 0216 1-42: ** - .byte %00000000 ; 0217 1-42: + .byte %00011000 ; 0210 1-42: ** + .byte %00011000 ; 0211 1-42: ** + .byte %00011000 ; 0212 1-42: ** + .byte %00011000 ; 0213 1-42: ** + .byte %00000000 ; 0214 1-42: + .byte %00000000 ; 0215 1-42: + .byte %00011000 ; 0216 1-42: ** + .byte %00000000 ; 0217 1-42: - .byte %00011000 ; 0218 1-43: ** - .byte %00011000 ; 0219 1-43: ** - .byte %00011000 ; 021A 1-43: ** - .byte %00011000 ; 021B 1-43: ** - .byte %00000000 ; 021C 1-43: - .byte %00000000 ; 021D 1-43: - .byte %00011000 ; 021E 1-43: ** - .byte %00000000 ; 021F 1-43: + .byte %00011000 ; 0218 1-43: ** + .byte %00011000 ; 0219 1-43: ** + .byte %00011000 ; 021A 1-43: ** + .byte %00011000 ; 021B 1-43: ** + .byte %00000000 ; 021C 1-43: + .byte %00000000 ; 021D 1-43: + .byte %00011000 ; 021E 1-43: ** + .byte %00000000 ; 021F 1-43: - .byte %01100110 ; 0220 1-44: ** ** - .byte %01100110 ; 0221 1-44: ** ** - .byte %01100110 ; 0222 1-44: ** ** - .byte %00000000 ; 0223 1-44: - .byte %00000000 ; 0224 1-44: - .byte %00000000 ; 0225 1-44: - .byte %00000000 ; 0226 1-44: - .byte %00000000 ; 0227 1-44: + .byte %01100110 ; 0220 1-44: ** ** + .byte %01100110 ; 0221 1-44: ** ** + .byte %01100110 ; 0222 1-44: ** ** + .byte %00000000 ; 0223 1-44: + .byte %00000000 ; 0224 1-44: + .byte %00000000 ; 0225 1-44: + .byte %00000000 ; 0226 1-44: + .byte %00000000 ; 0227 1-44: - .byte %01100110 ; 0228 1-45: ** ** - .byte %01100110 ; 0229 1-45: ** ** - .byte %01100110 ; 022A 1-45: ** ** - .byte %00000000 ; 022B 1-45: - .byte %00000000 ; 022C 1-45: - .byte %00000000 ; 022D 1-45: - .byte %00000000 ; 022E 1-45: - .byte %00000000 ; 022F 1-45: + .byte %01100110 ; 0228 1-45: ** ** + .byte %01100110 ; 0229 1-45: ** ** + .byte %01100110 ; 022A 1-45: ** ** + .byte %00000000 ; 022B 1-45: + .byte %00000000 ; 022C 1-45: + .byte %00000000 ; 022D 1-45: + .byte %00000000 ; 022E 1-45: + .byte %00000000 ; 022F 1-45: - .byte %01100110 ; 0230 1-46: ** ** - .byte %01100110 ; 0231 1-46: ** ** + .byte %01100110 ; 0230 1-46: ** ** + .byte %01100110 ; 0231 1-46: ** ** .byte %11111111 ; 0232 1-46: ******** - .byte %01100110 ; 0233 1-46: ** ** + .byte %01100110 ; 0233 1-46: ** ** .byte %11111111 ; 0234 1-46: ******** - .byte %01100110 ; 0235 1-46: ** ** - .byte %01100110 ; 0236 1-46: ** ** - .byte %00000000 ; 0237 1-46: + .byte %01100110 ; 0235 1-46: ** ** + .byte %01100110 ; 0236 1-46: ** ** + .byte %00000000 ; 0237 1-46: - .byte %01100110 ; 0238 1-47: ** ** - .byte %01100110 ; 0239 1-47: ** ** + .byte %01100110 ; 0238 1-47: ** ** + .byte %01100110 ; 0239 1-47: ** ** .byte %11111111 ; 023A 1-47: ******** - .byte %01100110 ; 023B 1-47: ** ** + .byte %01100110 ; 023B 1-47: ** ** .byte %11111111 ; 023C 1-47: ******** - .byte %01100110 ; 023D 1-47: ** ** - .byte %01100110 ; 023E 1-47: ** ** - .byte %00000000 ; 023F 1-47: + .byte %01100110 ; 023D 1-47: ** ** + .byte %01100110 ; 023E 1-47: ** ** + .byte %00000000 ; 023F 1-47: - .byte %00011000 ; 0240 1-48: ** - .byte %00111110 ; 0241 1-48: ***** - .byte %01100000 ; 0242 1-48: ** - .byte %00111100 ; 0243 1-48: **** - .byte %00000110 ; 0244 1-48: ** - .byte %01111100 ; 0245 1-48: ***** - .byte %00011000 ; 0246 1-48: ** - .byte %00000000 ; 0247 1-48: + .byte %00011000 ; 0240 1-48: ** + .byte %00111110 ; 0241 1-48: ***** + .byte %01100000 ; 0242 1-48: ** + .byte %00111100 ; 0243 1-48: **** + .byte %00000110 ; 0244 1-48: ** + .byte %01111100 ; 0245 1-48: ***** + .byte %00011000 ; 0246 1-48: ** + .byte %00000000 ; 0247 1-48: - .byte %00011000 ; 0248 1-49: ** - .byte %00111110 ; 0249 1-49: ***** - .byte %01100000 ; 024A 1-49: ** - .byte %00111100 ; 024B 1-49: **** - .byte %00000110 ; 024C 1-49: ** - .byte %01111100 ; 024D 1-49: ***** - .byte %00011000 ; 024E 1-49: ** - .byte %00000000 ; 024F 1-49: + .byte %00011000 ; 0248 1-49: ** + .byte %00111110 ; 0249 1-49: ***** + .byte %01100000 ; 024A 1-49: ** + .byte %00111100 ; 024B 1-49: **** + .byte %00000110 ; 024C 1-49: ** + .byte %01111100 ; 024D 1-49: ***** + .byte %00011000 ; 024E 1-49: ** + .byte %00000000 ; 024F 1-49: - .byte %00000000 ; 0250 1-4a: - .byte %01100110 ; 0251 1-4a: ** ** - .byte %00001100 ; 0252 1-4a: ** - .byte %00011000 ; 0253 1-4a: ** - .byte %00110000 ; 0254 1-4a: ** - .byte %01100110 ; 0255 1-4a: ** ** - .byte %01000110 ; 0256 1-4a: * ** - .byte %00000000 ; 0257 1-4a: + .byte %00000000 ; 0250 1-4a: + .byte %01100110 ; 0251 1-4a: ** ** + .byte %00001100 ; 0252 1-4a: ** + .byte %00011000 ; 0253 1-4a: ** + .byte %00110000 ; 0254 1-4a: ** + .byte %01100110 ; 0255 1-4a: ** ** + .byte %01000110 ; 0256 1-4a: * ** + .byte %00000000 ; 0257 1-4a: - .byte %00000000 ; 0258 1-4b: - .byte %01100110 ; 0259 1-4b: ** ** - .byte %00001100 ; 025A 1-4b: ** - .byte %00011000 ; 025B 1-4b: ** - .byte %00110000 ; 025C 1-4b: ** - .byte %01100110 ; 025D 1-4b: ** ** - .byte %01000110 ; 025E 1-4b: * ** - .byte %00000000 ; 025F 1-4b: + .byte %00000000 ; 0258 1-4b: + .byte %01100110 ; 0259 1-4b: ** ** + .byte %00001100 ; 025A 1-4b: ** + .byte %00011000 ; 025B 1-4b: ** + .byte %00110000 ; 025C 1-4b: ** + .byte %01100110 ; 025D 1-4b: ** ** + .byte %01000110 ; 025E 1-4b: * ** + .byte %00000000 ; 025F 1-4b: - .byte %00111100 ; 0260 1-4c: **** - .byte %01100110 ; 0261 1-4c: ** ** - .byte %00111100 ; 0262 1-4c: **** - .byte %00111000 ; 0263 1-4c: *** + .byte %00111100 ; 0260 1-4c: **** + .byte %01100110 ; 0261 1-4c: ** ** + .byte %00111100 ; 0262 1-4c: **** + .byte %00111000 ; 0263 1-4c: *** .byte %01100111 ; 0264 1-4c: ** *** - .byte %01100110 ; 0265 1-4c: ** ** + .byte %01100110 ; 0265 1-4c: ** ** .byte %00111111 ; 0266 1-4c: ****** - .byte %00000000 ; 0267 1-4c: + .byte %00000000 ; 0267 1-4c: - .byte %00111100 ; 0268 1-4d: **** - .byte %01100110 ; 0269 1-4d: ** ** - .byte %00111100 ; 026A 1-4d: **** - .byte %00111000 ; 026B 1-4d: *** + .byte %00111100 ; 0268 1-4d: **** + .byte %01100110 ; 0269 1-4d: ** ** + .byte %00111100 ; 026A 1-4d: **** + .byte %00111000 ; 026B 1-4d: *** .byte %01100111 ; 026C 1-4d: ** *** - .byte %01100110 ; 026D 1-4d: ** ** + .byte %01100110 ; 026D 1-4d: ** ** .byte %00111111 ; 026E 1-4d: ****** - .byte %00000000 ; 026F 1-4d: + .byte %00000000 ; 026F 1-4d: - .byte %00000110 ; 0270 1-4e: ** - .byte %00001100 ; 0271 1-4e: ** - .byte %00011000 ; 0272 1-4e: ** - .byte %00000000 ; 0273 1-4e: - .byte %00000000 ; 0274 1-4e: - .byte %00000000 ; 0275 1-4e: - .byte %00000000 ; 0276 1-4e: - .byte %00000000 ; 0277 1-4e: + .byte %00000110 ; 0270 1-4e: ** + .byte %00001100 ; 0271 1-4e: ** + .byte %00011000 ; 0272 1-4e: ** + .byte %00000000 ; 0273 1-4e: + .byte %00000000 ; 0274 1-4e: + .byte %00000000 ; 0275 1-4e: + .byte %00000000 ; 0276 1-4e: + .byte %00000000 ; 0277 1-4e: - .byte %00000110 ; 0278 1-4f: ** - .byte %00001100 ; 0279 1-4f: ** - .byte %00011000 ; 027A 1-4f: ** - .byte %00000000 ; 027B 1-4f: - .byte %00000000 ; 027C 1-4f: - .byte %00000000 ; 027D 1-4f: - .byte %00000000 ; 027E 1-4f: - .byte %00000000 ; 027F 1-4f: + .byte %00000110 ; 0278 1-4f: ** + .byte %00001100 ; 0279 1-4f: ** + .byte %00011000 ; 027A 1-4f: ** + .byte %00000000 ; 027B 1-4f: + .byte %00000000 ; 027C 1-4f: + .byte %00000000 ; 027D 1-4f: + .byte %00000000 ; 027E 1-4f: + .byte %00000000 ; 027F 1-4f: - .byte %00001100 ; 0280 1-50: ** - .byte %00011000 ; 0281 1-50: ** - .byte %00110000 ; 0282 1-50: ** - .byte %00110000 ; 0283 1-50: ** - .byte %00110000 ; 0284 1-50: ** - .byte %00011000 ; 0285 1-50: ** - .byte %00001100 ; 0286 1-50: ** - .byte %00000000 ; 0287 1-50: + .byte %00001100 ; 0280 1-50: ** + .byte %00011000 ; 0281 1-50: ** + .byte %00110000 ; 0282 1-50: ** + .byte %00110000 ; 0283 1-50: ** + .byte %00110000 ; 0284 1-50: ** + .byte %00011000 ; 0285 1-50: ** + .byte %00001100 ; 0286 1-50: ** + .byte %00000000 ; 0287 1-50: - .byte %00001100 ; 0288 1-51: ** - .byte %00011000 ; 0289 1-51: ** - .byte %00110000 ; 028A 1-51: ** - .byte %00110000 ; 028B 1-51: ** - .byte %00110000 ; 028C 1-51: ** - .byte %00011000 ; 028D 1-51: ** - .byte %00001100 ; 028E 1-51: ** - .byte %00000000 ; 028F 1-51: + .byte %00001100 ; 0288 1-51: ** + .byte %00011000 ; 0289 1-51: ** + .byte %00110000 ; 028A 1-51: ** + .byte %00110000 ; 028B 1-51: ** + .byte %00110000 ; 028C 1-51: ** + .byte %00011000 ; 028D 1-51: ** + .byte %00001100 ; 028E 1-51: ** + .byte %00000000 ; 028F 1-51: - .byte %00110000 ; 0290 1-52: ** - .byte %00011000 ; 0291 1-52: ** - .byte %00001100 ; 0292 1-52: ** - .byte %00001100 ; 0293 1-52: ** - .byte %00001100 ; 0294 1-52: ** - .byte %00011000 ; 0295 1-52: ** - .byte %00110000 ; 0296 1-52: ** - .byte %00000000 ; 0297 1-52: + .byte %00110000 ; 0290 1-52: ** + .byte %00011000 ; 0291 1-52: ** + .byte %00001100 ; 0292 1-52: ** + .byte %00001100 ; 0293 1-52: ** + .byte %00001100 ; 0294 1-52: ** + .byte %00011000 ; 0295 1-52: ** + .byte %00110000 ; 0296 1-52: ** + .byte %00000000 ; 0297 1-52: - .byte %00110000 ; 0298 1-53: ** - .byte %00011000 ; 0299 1-53: ** - .byte %00001100 ; 029A 1-53: ** - .byte %00001100 ; 029B 1-53: ** - .byte %00001100 ; 029C 1-53: ** - .byte %00011000 ; 029D 1-53: ** - .byte %00110000 ; 029E 1-53: ** - .byte %00000000 ; 029F 1-53: + .byte %00110000 ; 0298 1-53: ** + .byte %00011000 ; 0299 1-53: ** + .byte %00001100 ; 029A 1-53: ** + .byte %00001100 ; 029B 1-53: ** + .byte %00001100 ; 029C 1-53: ** + .byte %00011000 ; 029D 1-53: ** + .byte %00110000 ; 029E 1-53: ** + .byte %00000000 ; 029F 1-53: - .byte %00000000 ; 02A0 1-54: - .byte %01100110 ; 02A1 1-54: ** ** - .byte %00111100 ; 02A2 1-54: **** + .byte %00000000 ; 02A0 1-54: + .byte %01100110 ; 02A1 1-54: ** ** + .byte %00111100 ; 02A2 1-54: **** .byte %11111111 ; 02A3 1-54: ******** - .byte %00111100 ; 02A4 1-54: **** - .byte %01100110 ; 02A5 1-54: ** ** - .byte %00000000 ; 02A6 1-54: - .byte %00000000 ; 02A7 1-54: + .byte %00111100 ; 02A4 1-54: **** + .byte %01100110 ; 02A5 1-54: ** ** + .byte %00000000 ; 02A6 1-54: + .byte %00000000 ; 02A7 1-54: - .byte %00000000 ; 02A8 1-55: - .byte %01100110 ; 02A9 1-55: ** ** - .byte %00111100 ; 02AA 1-55: **** + .byte %00000000 ; 02A8 1-55: + .byte %01100110 ; 02A9 1-55: ** ** + .byte %00111100 ; 02AA 1-55: **** .byte %11111111 ; 02AB 1-55: ******** - .byte %00111100 ; 02AC 1-55: **** - .byte %01100110 ; 02AD 1-55: ** ** - .byte %00000000 ; 02AE 1-55: - .byte %00000000 ; 02AF 1-55: + .byte %00111100 ; 02AC 1-55: **** + .byte %01100110 ; 02AD 1-55: ** ** + .byte %00000000 ; 02AE 1-55: + .byte %00000000 ; 02AF 1-55: - .byte %00000000 ; 02B0 1-56: - .byte %00011000 ; 02B1 1-56: ** - .byte %00011000 ; 02B2 1-56: ** - .byte %01111110 ; 02B3 1-56: ****** - .byte %00011000 ; 02B4 1-56: ** - .byte %00011000 ; 02B5 1-56: ** - .byte %00000000 ; 02B6 1-56: - .byte %00000000 ; 02B7 1-56: + .byte %00000000 ; 02B0 1-56: + .byte %00011000 ; 02B1 1-56: ** + .byte %00011000 ; 02B2 1-56: ** + .byte %01111110 ; 02B3 1-56: ****** + .byte %00011000 ; 02B4 1-56: ** + .byte %00011000 ; 02B5 1-56: ** + .byte %00000000 ; 02B6 1-56: + .byte %00000000 ; 02B7 1-56: - .byte %00000000 ; 02B8 1-57: - .byte %00011000 ; 02B9 1-57: ** - .byte %00011000 ; 02BA 1-57: ** - .byte %01111110 ; 02BB 1-57: ****** - .byte %00011000 ; 02BC 1-57: ** - .byte %00011000 ; 02BD 1-57: ** - .byte %00000000 ; 02BE 1-57: - .byte %00000000 ; 02BF 1-57: + .byte %00000000 ; 02B8 1-57: + .byte %00011000 ; 02B9 1-57: ** + .byte %00011000 ; 02BA 1-57: ** + .byte %01111110 ; 02BB 1-57: ****** + .byte %00011000 ; 02BC 1-57: ** + .byte %00011000 ; 02BD 1-57: ** + .byte %00000000 ; 02BE 1-57: + .byte %00000000 ; 02BF 1-57: - .byte %00000000 ; 02C0 1-58: - .byte %00000000 ; 02C1 1-58: - .byte %00000000 ; 02C2 1-58: - .byte %00000000 ; 02C3 1-58: - .byte %00000000 ; 02C4 1-58: - .byte %00011000 ; 02C5 1-58: ** - .byte %00011000 ; 02C6 1-58: ** - .byte %00110000 ; 02C7 1-58: ** + .byte %00000000 ; 02C0 1-58: + .byte %00000000 ; 02C1 1-58: + .byte %00000000 ; 02C2 1-58: + .byte %00000000 ; 02C3 1-58: + .byte %00000000 ; 02C4 1-58: + .byte %00011000 ; 02C5 1-58: ** + .byte %00011000 ; 02C6 1-58: ** + .byte %00110000 ; 02C7 1-58: ** - .byte %00000000 ; 02C8 1-59: - .byte %00000000 ; 02C9 1-59: - .byte %00000000 ; 02CA 1-59: - .byte %00000000 ; 02CB 1-59: - .byte %00000000 ; 02CC 1-59: - .byte %00011000 ; 02CD 1-59: ** - .byte %00011000 ; 02CE 1-59: ** - .byte %00110000 ; 02CF 1-59: ** + .byte %00000000 ; 02C8 1-59: + .byte %00000000 ; 02C9 1-59: + .byte %00000000 ; 02CA 1-59: + .byte %00000000 ; 02CB 1-59: + .byte %00000000 ; 02CC 1-59: + .byte %00011000 ; 02CD 1-59: ** + .byte %00011000 ; 02CE 1-59: ** + .byte %00110000 ; 02CF 1-59: ** - .byte %00000000 ; 02D0 1-5a: - .byte %00000000 ; 02D1 1-5a: - .byte %00000000 ; 02D2 1-5a: - .byte %01111110 ; 02D3 1-5a: ****** - .byte %00000000 ; 02D4 1-5a: - .byte %00000000 ; 02D5 1-5a: - .byte %00000000 ; 02D6 1-5a: - .byte %00000000 ; 02D7 1-5a: + .byte %00000000 ; 02D0 1-5a: + .byte %00000000 ; 02D1 1-5a: + .byte %00000000 ; 02D2 1-5a: + .byte %01111110 ; 02D3 1-5a: ****** + .byte %00000000 ; 02D4 1-5a: + .byte %00000000 ; 02D5 1-5a: + .byte %00000000 ; 02D6 1-5a: + .byte %00000000 ; 02D7 1-5a: - .byte %00000000 ; 02D8 1-5b: - .byte %00000000 ; 02D9 1-5b: - .byte %00000000 ; 02DA 1-5b: - .byte %01111110 ; 02DB 1-5b: ****** - .byte %00000000 ; 02DC 1-5b: - .byte %00000000 ; 02DD 1-5b: - .byte %00000000 ; 02DE 1-5b: - .byte %00000000 ; 02DF 1-5b: + .byte %00000000 ; 02D8 1-5b: + .byte %00000000 ; 02D9 1-5b: + .byte %00000000 ; 02DA 1-5b: + .byte %01111110 ; 02DB 1-5b: ****** + .byte %00000000 ; 02DC 1-5b: + .byte %00000000 ; 02DD 1-5b: + .byte %00000000 ; 02DE 1-5b: + .byte %00000000 ; 02DF 1-5b: - .byte %00000000 ; 02E0 1-5c: - .byte %00000000 ; 02E1 1-5c: - .byte %00000000 ; 02E2 1-5c: - .byte %00000000 ; 02E3 1-5c: - .byte %00000000 ; 02E4 1-5c: - .byte %00011000 ; 02E5 1-5c: ** - .byte %00011000 ; 02E6 1-5c: ** - .byte %00000000 ; 02E7 1-5c: + .byte %00000000 ; 02E0 1-5c: + .byte %00000000 ; 02E1 1-5c: + .byte %00000000 ; 02E2 1-5c: + .byte %00000000 ; 02E3 1-5c: + .byte %00000000 ; 02E4 1-5c: + .byte %00011000 ; 02E5 1-5c: ** + .byte %00011000 ; 02E6 1-5c: ** + .byte %00000000 ; 02E7 1-5c: - .byte %00000000 ; 02E8 1-5d: - .byte %00000000 ; 02E9 1-5d: - .byte %00000000 ; 02EA 1-5d: - .byte %00000000 ; 02EB 1-5d: - .byte %00000000 ; 02EC 1-5d: - .byte %00011000 ; 02ED 1-5d: ** - .byte %00011000 ; 02EE 1-5d: ** - .byte %00000000 ; 02EF 1-5d: + .byte %00000000 ; 02E8 1-5d: + .byte %00000000 ; 02E9 1-5d: + .byte %00000000 ; 02EA 1-5d: + .byte %00000000 ; 02EB 1-5d: + .byte %00000000 ; 02EC 1-5d: + .byte %00011000 ; 02ED 1-5d: ** + .byte %00011000 ; 02EE 1-5d: ** + .byte %00000000 ; 02EF 1-5d: - .byte %00000000 ; 02F0 1-5e: + .byte %00000000 ; 02F0 1-5e: .byte %00000011 ; 02F1 1-5e: ** - .byte %00000110 ; 02F2 1-5e: ** - .byte %00001100 ; 02F3 1-5e: ** - .byte %00011000 ; 02F4 1-5e: ** - .byte %00110000 ; 02F5 1-5e: ** - .byte %01100000 ; 02F6 1-5e: ** - .byte %00000000 ; 02F7 1-5e: + .byte %00000110 ; 02F2 1-5e: ** + .byte %00001100 ; 02F3 1-5e: ** + .byte %00011000 ; 02F4 1-5e: ** + .byte %00110000 ; 02F5 1-5e: ** + .byte %01100000 ; 02F6 1-5e: ** + .byte %00000000 ; 02F7 1-5e: - .byte %00000000 ; 02F8 1-5f: + .byte %00000000 ; 02F8 1-5f: .byte %00000011 ; 02F9 1-5f: ** - .byte %00000110 ; 02FA 1-5f: ** - .byte %00001100 ; 02FB 1-5f: ** - .byte %00011000 ; 02FC 1-5f: ** - .byte %00110000 ; 02FD 1-5f: ** - .byte %01100000 ; 02FE 1-5f: ** - .byte %00000000 ; 02FF 1-5f: + .byte %00000110 ; 02FA 1-5f: ** + .byte %00001100 ; 02FB 1-5f: ** + .byte %00011000 ; 02FC 1-5f: ** + .byte %00110000 ; 02FD 1-5f: ** + .byte %01100000 ; 02FE 1-5f: ** + .byte %00000000 ; 02FF 1-5f: - .byte %00111100 ; 0300 1-60: **** - .byte %01100110 ; 0301 1-60: ** ** - .byte %01101110 ; 0302 1-60: ** *** - .byte %01110110 ; 0303 1-60: *** ** - .byte %01100110 ; 0304 1-60: ** ** - .byte %01100110 ; 0305 1-60: ** ** - .byte %00111100 ; 0306 1-60: **** - .byte %00000000 ; 0307 1-60: + .byte %00111100 ; 0300 1-60: **** + .byte %01100110 ; 0301 1-60: ** ** + .byte %01101110 ; 0302 1-60: ** *** + .byte %01110110 ; 0303 1-60: *** ** + .byte %01100110 ; 0304 1-60: ** ** + .byte %01100110 ; 0305 1-60: ** ** + .byte %00111100 ; 0306 1-60: **** + .byte %00000000 ; 0307 1-60: - .byte %00111100 ; 0308 1-61: **** - .byte %01100110 ; 0309 1-61: ** ** - .byte %01101110 ; 030A 1-61: ** *** - .byte %01110110 ; 030B 1-61: *** ** - .byte %01100110 ; 030C 1-61: ** ** - .byte %01100110 ; 030D 1-61: ** ** - .byte %00111100 ; 030E 1-61: **** - .byte %00000000 ; 030F 1-61: + .byte %00111100 ; 0308 1-61: **** + .byte %01100110 ; 0309 1-61: ** ** + .byte %01101110 ; 030A 1-61: ** *** + .byte %01110110 ; 030B 1-61: *** ** + .byte %01100110 ; 030C 1-61: ** ** + .byte %01100110 ; 030D 1-61: ** ** + .byte %00111100 ; 030E 1-61: **** + .byte %00000000 ; 030F 1-61: - .byte %00011000 ; 0310 1-62: ** - .byte %00011000 ; 0311 1-62: ** - .byte %00111000 ; 0312 1-62: *** - .byte %00011000 ; 0313 1-62: ** - .byte %00011000 ; 0314 1-62: ** - .byte %00011000 ; 0315 1-62: ** - .byte %01111110 ; 0316 1-62: ****** - .byte %00000000 ; 0317 1-62: + .byte %00011000 ; 0310 1-62: ** + .byte %00011000 ; 0311 1-62: ** + .byte %00111000 ; 0312 1-62: *** + .byte %00011000 ; 0313 1-62: ** + .byte %00011000 ; 0314 1-62: ** + .byte %00011000 ; 0315 1-62: ** + .byte %01111110 ; 0316 1-62: ****** + .byte %00000000 ; 0317 1-62: - .byte %00011000 ; 0318 1-63: ** - .byte %00011000 ; 0319 1-63: ** - .byte %00111000 ; 031A 1-63: *** - .byte %00011000 ; 031B 1-63: ** - .byte %00011000 ; 031C 1-63: ** - .byte %00011000 ; 031D 1-63: ** - .byte %01111110 ; 031E 1-63: ****** - .byte %00000000 ; 031F 1-63: + .byte %00011000 ; 0318 1-63: ** + .byte %00011000 ; 0319 1-63: ** + .byte %00111000 ; 031A 1-63: *** + .byte %00011000 ; 031B 1-63: ** + .byte %00011000 ; 031C 1-63: ** + .byte %00011000 ; 031D 1-63: ** + .byte %01111110 ; 031E 1-63: ****** + .byte %00000000 ; 031F 1-63: - .byte %00111100 ; 0320 1-64: **** - .byte %01100110 ; 0321 1-64: ** ** - .byte %00000110 ; 0322 1-64: ** - .byte %00001100 ; 0323 1-64: ** - .byte %00110000 ; 0324 1-64: ** - .byte %01100000 ; 0325 1-64: ** - .byte %01111110 ; 0326 1-64: ****** - .byte %00000000 ; 0327 1-64: + .byte %00111100 ; 0320 1-64: **** + .byte %01100110 ; 0321 1-64: ** ** + .byte %00000110 ; 0322 1-64: ** + .byte %00001100 ; 0323 1-64: ** + .byte %00110000 ; 0324 1-64: ** + .byte %01100000 ; 0325 1-64: ** + .byte %01111110 ; 0326 1-64: ****** + .byte %00000000 ; 0327 1-64: - .byte %00111100 ; 0328 1-65: **** - .byte %01100110 ; 0329 1-65: ** ** - .byte %00000110 ; 032A 1-65: ** - .byte %00001100 ; 032B 1-65: ** - .byte %00110000 ; 032C 1-65: ** - .byte %01100000 ; 032D 1-65: ** - .byte %01111110 ; 032E 1-65: ****** - .byte %00000000 ; 032F 1-65: + .byte %00111100 ; 0328 1-65: **** + .byte %01100110 ; 0329 1-65: ** ** + .byte %00000110 ; 032A 1-65: ** + .byte %00001100 ; 032B 1-65: ** + .byte %00110000 ; 032C 1-65: ** + .byte %01100000 ; 032D 1-65: ** + .byte %01111110 ; 032E 1-65: ****** + .byte %00000000 ; 032F 1-65: - .byte %00111100 ; 0330 1-66: **** - .byte %01100110 ; 0331 1-66: ** ** - .byte %00000110 ; 0332 1-66: ** - .byte %00011100 ; 0333 1-66: *** - .byte %00000110 ; 0334 1-66: ** - .byte %01100110 ; 0335 1-66: ** ** - .byte %00111100 ; 0336 1-66: **** - .byte %00000000 ; 0337 1-66: + .byte %00111100 ; 0330 1-66: **** + .byte %01100110 ; 0331 1-66: ** ** + .byte %00000110 ; 0332 1-66: ** + .byte %00011100 ; 0333 1-66: *** + .byte %00000110 ; 0334 1-66: ** + .byte %01100110 ; 0335 1-66: ** ** + .byte %00111100 ; 0336 1-66: **** + .byte %00000000 ; 0337 1-66: - .byte %00111100 ; 0338 1-67: **** - .byte %01100110 ; 0339 1-67: ** ** - .byte %00000110 ; 033A 1-67: ** - .byte %00011100 ; 033B 1-67: *** - .byte %00000110 ; 033C 1-67: ** - .byte %01100110 ; 033D 1-67: ** ** - .byte %00111100 ; 033E 1-67: **** - .byte %00000000 ; 033F 1-67: + .byte %00111100 ; 0338 1-67: **** + .byte %01100110 ; 0339 1-67: ** ** + .byte %00000110 ; 033A 1-67: ** + .byte %00011100 ; 033B 1-67: *** + .byte %00000110 ; 033C 1-67: ** + .byte %01100110 ; 033D 1-67: ** ** + .byte %00111100 ; 033E 1-67: **** + .byte %00000000 ; 033F 1-67: - .byte %00000110 ; 0340 1-68: ** - .byte %00001110 ; 0341 1-68: *** - .byte %00011110 ; 0342 1-68: **** - .byte %01100110 ; 0343 1-68: ** ** + .byte %00000110 ; 0340 1-68: ** + .byte %00001110 ; 0341 1-68: *** + .byte %00011110 ; 0342 1-68: **** + .byte %01100110 ; 0343 1-68: ** ** .byte %01111111 ; 0344 1-68: ******* - .byte %00000110 ; 0345 1-68: ** - .byte %00000110 ; 0346 1-68: ** - .byte %00000000 ; 0347 1-68: + .byte %00000110 ; 0345 1-68: ** + .byte %00000110 ; 0346 1-68: ** + .byte %00000000 ; 0347 1-68: - .byte %00000110 ; 0348 1-69: ** - .byte %00001110 ; 0349 1-69: *** - .byte %00011110 ; 034A 1-69: **** - .byte %01100110 ; 034B 1-69: ** ** + .byte %00000110 ; 0348 1-69: ** + .byte %00001110 ; 0349 1-69: *** + .byte %00011110 ; 034A 1-69: **** + .byte %01100110 ; 034B 1-69: ** ** .byte %01111111 ; 034C 1-69: ******* - .byte %00000110 ; 034D 1-69: ** - .byte %00000110 ; 034E 1-69: ** - .byte %00000000 ; 034F 1-69: + .byte %00000110 ; 034D 1-69: ** + .byte %00000110 ; 034E 1-69: ** + .byte %00000000 ; 034F 1-69: - .byte %01111110 ; 0350 1-6a: ****** - .byte %01100000 ; 0351 1-6a: ** - .byte %01111100 ; 0352 1-6a: ***** - .byte %00000110 ; 0353 1-6a: ** - .byte %00000110 ; 0354 1-6a: ** - .byte %01100110 ; 0355 1-6a: ** ** - .byte %00111100 ; 0356 1-6a: **** - .byte %00000000 ; 0357 1-6a: + .byte %01111110 ; 0350 1-6a: ****** + .byte %01100000 ; 0351 1-6a: ** + .byte %01111100 ; 0352 1-6a: ***** + .byte %00000110 ; 0353 1-6a: ** + .byte %00000110 ; 0354 1-6a: ** + .byte %01100110 ; 0355 1-6a: ** ** + .byte %00111100 ; 0356 1-6a: **** + .byte %00000000 ; 0357 1-6a: - .byte %01111110 ; 0358 1-6b: ****** - .byte %01100000 ; 0359 1-6b: ** - .byte %01111100 ; 035A 1-6b: ***** - .byte %00000110 ; 035B 1-6b: ** - .byte %00000110 ; 035C 1-6b: ** - .byte %01100110 ; 035D 1-6b: ** ** - .byte %00111100 ; 035E 1-6b: **** - .byte %00000000 ; 035F 1-6b: + .byte %01111110 ; 0358 1-6b: ****** + .byte %01100000 ; 0359 1-6b: ** + .byte %01111100 ; 035A 1-6b: ***** + .byte %00000110 ; 035B 1-6b: ** + .byte %00000110 ; 035C 1-6b: ** + .byte %01100110 ; 035D 1-6b: ** ** + .byte %00111100 ; 035E 1-6b: **** + .byte %00000000 ; 035F 1-6b: - .byte %00111100 ; 0360 1-6c: **** - .byte %01100110 ; 0361 1-6c: ** ** - .byte %01100000 ; 0362 1-6c: ** - .byte %01111100 ; 0363 1-6c: ***** - .byte %01100110 ; 0364 1-6c: ** ** - .byte %01100110 ; 0365 1-6c: ** ** - .byte %00111100 ; 0366 1-6c: **** - .byte %00000000 ; 0367 1-6c: + .byte %00111100 ; 0360 1-6c: **** + .byte %01100110 ; 0361 1-6c: ** ** + .byte %01100000 ; 0362 1-6c: ** + .byte %01111100 ; 0363 1-6c: ***** + .byte %01100110 ; 0364 1-6c: ** ** + .byte %01100110 ; 0365 1-6c: ** ** + .byte %00111100 ; 0366 1-6c: **** + .byte %00000000 ; 0367 1-6c: - .byte %00111100 ; 0368 1-6d: **** - .byte %01100110 ; 0369 1-6d: ** ** - .byte %01100000 ; 036A 1-6d: ** - .byte %01111100 ; 036B 1-6d: ***** - .byte %01100110 ; 036C 1-6d: ** ** - .byte %01100110 ; 036D 1-6d: ** ** - .byte %00111100 ; 036E 1-6d: **** - .byte %00000000 ; 036F 1-6d: + .byte %00111100 ; 0368 1-6d: **** + .byte %01100110 ; 0369 1-6d: ** ** + .byte %01100000 ; 036A 1-6d: ** + .byte %01111100 ; 036B 1-6d: ***** + .byte %01100110 ; 036C 1-6d: ** ** + .byte %01100110 ; 036D 1-6d: ** ** + .byte %00111100 ; 036E 1-6d: **** + .byte %00000000 ; 036F 1-6d: - .byte %01111110 ; 0370 1-6e: ****** - .byte %01100110 ; 0371 1-6e: ** ** - .byte %00001100 ; 0372 1-6e: ** - .byte %00011000 ; 0373 1-6e: ** - .byte %00011000 ; 0374 1-6e: ** - .byte %00011000 ; 0375 1-6e: ** - .byte %00011000 ; 0376 1-6e: ** - .byte %00000000 ; 0377 1-6e: + .byte %01111110 ; 0370 1-6e: ****** + .byte %01100110 ; 0371 1-6e: ** ** + .byte %00001100 ; 0372 1-6e: ** + .byte %00011000 ; 0373 1-6e: ** + .byte %00011000 ; 0374 1-6e: ** + .byte %00011000 ; 0375 1-6e: ** + .byte %00011000 ; 0376 1-6e: ** + .byte %00000000 ; 0377 1-6e: - .byte %01111110 ; 0378 1-6f: ****** - .byte %01100110 ; 0379 1-6f: ** ** - .byte %00001100 ; 037A 1-6f: ** - .byte %00011000 ; 037B 1-6f: ** - .byte %00011000 ; 037C 1-6f: ** - .byte %00011000 ; 037D 1-6f: ** - .byte %00011000 ; 037E 1-6f: ** - .byte %00000000 ; 037F 1-6f: + .byte %01111110 ; 0378 1-6f: ****** + .byte %01100110 ; 0379 1-6f: ** ** + .byte %00001100 ; 037A 1-6f: ** + .byte %00011000 ; 037B 1-6f: ** + .byte %00011000 ; 037C 1-6f: ** + .byte %00011000 ; 037D 1-6f: ** + .byte %00011000 ; 037E 1-6f: ** + .byte %00000000 ; 037F 1-6f: - .byte %00111100 ; 0380 1-70: **** - .byte %01100110 ; 0381 1-70: ** ** - .byte %01100110 ; 0382 1-70: ** ** - .byte %00111100 ; 0383 1-70: **** - .byte %01100110 ; 0384 1-70: ** ** - .byte %01100110 ; 0385 1-70: ** ** - .byte %00111100 ; 0386 1-70: **** - .byte %00000000 ; 0387 1-70: + .byte %00111100 ; 0380 1-70: **** + .byte %01100110 ; 0381 1-70: ** ** + .byte %01100110 ; 0382 1-70: ** ** + .byte %00111100 ; 0383 1-70: **** + .byte %01100110 ; 0384 1-70: ** ** + .byte %01100110 ; 0385 1-70: ** ** + .byte %00111100 ; 0386 1-70: **** + .byte %00000000 ; 0387 1-70: - .byte %00111100 ; 0388 1-71: **** - .byte %01100110 ; 0389 1-71: ** ** - .byte %01100110 ; 038A 1-71: ** ** - .byte %00111100 ; 038B 1-71: **** - .byte %01100110 ; 038C 1-71: ** ** - .byte %01100110 ; 038D 1-71: ** ** - .byte %00111100 ; 038E 1-71: **** - .byte %00000000 ; 038F 1-71: + .byte %00111100 ; 0388 1-71: **** + .byte %01100110 ; 0389 1-71: ** ** + .byte %01100110 ; 038A 1-71: ** ** + .byte %00111100 ; 038B 1-71: **** + .byte %01100110 ; 038C 1-71: ** ** + .byte %01100110 ; 038D 1-71: ** ** + .byte %00111100 ; 038E 1-71: **** + .byte %00000000 ; 038F 1-71: - .byte %00111100 ; 0390 1-72: **** - .byte %01100110 ; 0391 1-72: ** ** - .byte %01100110 ; 0392 1-72: ** ** - .byte %00111110 ; 0393 1-72: ***** - .byte %00000110 ; 0394 1-72: ** - .byte %01100110 ; 0395 1-72: ** ** - .byte %00111100 ; 0396 1-72: **** - .byte %00000000 ; 0397 1-72: + .byte %00111100 ; 0390 1-72: **** + .byte %01100110 ; 0391 1-72: ** ** + .byte %01100110 ; 0392 1-72: ** ** + .byte %00111110 ; 0393 1-72: ***** + .byte %00000110 ; 0394 1-72: ** + .byte %01100110 ; 0395 1-72: ** ** + .byte %00111100 ; 0396 1-72: **** + .byte %00000000 ; 0397 1-72: - .byte %00111100 ; 0398 1-73: **** - .byte %01100110 ; 0399 1-73: ** ** - .byte %01100110 ; 039A 1-73: ** ** - .byte %00111110 ; 039B 1-73: ***** - .byte %00000110 ; 039C 1-73: ** - .byte %01100110 ; 039D 1-73: ** ** - .byte %00111100 ; 039E 1-73: **** - .byte %00000000 ; 039F 1-73: + .byte %00111100 ; 0398 1-73: **** + .byte %01100110 ; 0399 1-73: ** ** + .byte %01100110 ; 039A 1-73: ** ** + .byte %00111110 ; 039B 1-73: ***** + .byte %00000110 ; 039C 1-73: ** + .byte %01100110 ; 039D 1-73: ** ** + .byte %00111100 ; 039E 1-73: **** + .byte %00000000 ; 039F 1-73: - .byte %00000000 ; 03A0 1-74: - .byte %00000000 ; 03A1 1-74: - .byte %00011000 ; 03A2 1-74: ** - .byte %00000000 ; 03A3 1-74: - .byte %00000000 ; 03A4 1-74: - .byte %00011000 ; 03A5 1-74: ** - .byte %00000000 ; 03A6 1-74: - .byte %00000000 ; 03A7 1-74: + .byte %00000000 ; 03A0 1-74: + .byte %00000000 ; 03A1 1-74: + .byte %00011000 ; 03A2 1-74: ** + .byte %00000000 ; 03A3 1-74: + .byte %00000000 ; 03A4 1-74: + .byte %00011000 ; 03A5 1-74: ** + .byte %00000000 ; 03A6 1-74: + .byte %00000000 ; 03A7 1-74: - .byte %00000000 ; 03A8 1-75: - .byte %00000000 ; 03A9 1-75: - .byte %00011000 ; 03AA 1-75: ** - .byte %00000000 ; 03AB 1-75: - .byte %00000000 ; 03AC 1-75: - .byte %00011000 ; 03AD 1-75: ** - .byte %00000000 ; 03AE 1-75: - .byte %00000000 ; 03AF 1-75: + .byte %00000000 ; 03A8 1-75: + .byte %00000000 ; 03A9 1-75: + .byte %00011000 ; 03AA 1-75: ** + .byte %00000000 ; 03AB 1-75: + .byte %00000000 ; 03AC 1-75: + .byte %00011000 ; 03AD 1-75: ** + .byte %00000000 ; 03AE 1-75: + .byte %00000000 ; 03AF 1-75: - .byte %00000000 ; 03B0 1-76: - .byte %00000000 ; 03B1 1-76: - .byte %00011000 ; 03B2 1-76: ** - .byte %00000000 ; 03B3 1-76: - .byte %00000000 ; 03B4 1-76: - .byte %00011000 ; 03B5 1-76: ** - .byte %00011000 ; 03B6 1-76: ** - .byte %00110000 ; 03B7 1-76: ** + .byte %00000000 ; 03B0 1-76: + .byte %00000000 ; 03B1 1-76: + .byte %00011000 ; 03B2 1-76: ** + .byte %00000000 ; 03B3 1-76: + .byte %00000000 ; 03B4 1-76: + .byte %00011000 ; 03B5 1-76: ** + .byte %00011000 ; 03B6 1-76: ** + .byte %00110000 ; 03B7 1-76: ** - .byte %00000000 ; 03B8 1-77: - .byte %00000000 ; 03B9 1-77: - .byte %00011000 ; 03BA 1-77: ** - .byte %00000000 ; 03BB 1-77: - .byte %00000000 ; 03BC 1-77: - .byte %00011000 ; 03BD 1-77: ** - .byte %00011000 ; 03BE 1-77: ** - .byte %00110000 ; 03BF 1-77: ** + .byte %00000000 ; 03B8 1-77: + .byte %00000000 ; 03B9 1-77: + .byte %00011000 ; 03BA 1-77: ** + .byte %00000000 ; 03BB 1-77: + .byte %00000000 ; 03BC 1-77: + .byte %00011000 ; 03BD 1-77: ** + .byte %00011000 ; 03BE 1-77: ** + .byte %00110000 ; 03BF 1-77: ** - .byte %00001110 ; 03C0 1-78: *** - .byte %00011000 ; 03C1 1-78: ** - .byte %00110000 ; 03C2 1-78: ** - .byte %01100000 ; 03C3 1-78: ** - .byte %00110000 ; 03C4 1-78: ** - .byte %00011000 ; 03C5 1-78: ** - .byte %00001110 ; 03C6 1-78: *** - .byte %00000000 ; 03C7 1-78: + .byte %00001110 ; 03C0 1-78: *** + .byte %00011000 ; 03C1 1-78: ** + .byte %00110000 ; 03C2 1-78: ** + .byte %01100000 ; 03C3 1-78: ** + .byte %00110000 ; 03C4 1-78: ** + .byte %00011000 ; 03C5 1-78: ** + .byte %00001110 ; 03C6 1-78: *** + .byte %00000000 ; 03C7 1-78: - .byte %00001110 ; 03C8 1-79: *** - .byte %00011000 ; 03C9 1-79: ** - .byte %00110000 ; 03CA 1-79: ** - .byte %01100000 ; 03CB 1-79: ** - .byte %00110000 ; 03CC 1-79: ** - .byte %00011000 ; 03CD 1-79: ** - .byte %00001110 ; 03CE 1-79: *** - .byte %00000000 ; 03CF 1-79: + .byte %00001110 ; 03C8 1-79: *** + .byte %00011000 ; 03C9 1-79: ** + .byte %00110000 ; 03CA 1-79: ** + .byte %01100000 ; 03CB 1-79: ** + .byte %00110000 ; 03CC 1-79: ** + .byte %00011000 ; 03CD 1-79: ** + .byte %00001110 ; 03CE 1-79: *** + .byte %00000000 ; 03CF 1-79: - .byte %00000000 ; 03D0 1-7a: - .byte %00000000 ; 03D1 1-7a: - .byte %01111110 ; 03D2 1-7a: ****** - .byte %00000000 ; 03D3 1-7a: - .byte %01111110 ; 03D4 1-7a: ****** - .byte %00000000 ; 03D5 1-7a: - .byte %00000000 ; 03D6 1-7a: - .byte %00000000 ; 03D7 1-7a: + .byte %00000000 ; 03D0 1-7a: + .byte %00000000 ; 03D1 1-7a: + .byte %01111110 ; 03D2 1-7a: ****** + .byte %00000000 ; 03D3 1-7a: + .byte %01111110 ; 03D4 1-7a: ****** + .byte %00000000 ; 03D5 1-7a: + .byte %00000000 ; 03D6 1-7a: + .byte %00000000 ; 03D7 1-7a: - .byte %00000000 ; 03D8 1-7b: - .byte %00000000 ; 03D9 1-7b: - .byte %01111110 ; 03DA 1-7b: ****** - .byte %00000000 ; 03DB 1-7b: - .byte %01111110 ; 03DC 1-7b: ****** - .byte %00000000 ; 03DD 1-7b: - .byte %00000000 ; 03DE 1-7b: - .byte %00000000 ; 03DF 1-7b: + .byte %00000000 ; 03D8 1-7b: + .byte %00000000 ; 03D9 1-7b: + .byte %01111110 ; 03DA 1-7b: ****** + .byte %00000000 ; 03DB 1-7b: + .byte %01111110 ; 03DC 1-7b: ****** + .byte %00000000 ; 03DD 1-7b: + .byte %00000000 ; 03DE 1-7b: + .byte %00000000 ; 03DF 1-7b: - .byte %01110000 ; 03E0 1-7c: *** - .byte %00011000 ; 03E1 1-7c: ** - .byte %00001100 ; 03E2 1-7c: ** - .byte %00000110 ; 03E3 1-7c: ** - .byte %00001100 ; 03E4 1-7c: ** - .byte %00011000 ; 03E5 1-7c: ** - .byte %01110000 ; 03E6 1-7c: *** - .byte %00000000 ; 03E7 1-7c: + .byte %01110000 ; 03E0 1-7c: *** + .byte %00011000 ; 03E1 1-7c: ** + .byte %00001100 ; 03E2 1-7c: ** + .byte %00000110 ; 03E3 1-7c: ** + .byte %00001100 ; 03E4 1-7c: ** + .byte %00011000 ; 03E5 1-7c: ** + .byte %01110000 ; 03E6 1-7c: *** + .byte %00000000 ; 03E7 1-7c: - .byte %01110000 ; 03E8 1-7d: *** - .byte %00011000 ; 03E9 1-7d: ** - .byte %00001100 ; 03EA 1-7d: ** - .byte %00000110 ; 03EB 1-7d: ** - .byte %00001100 ; 03EC 1-7d: ** - .byte %00011000 ; 03ED 1-7d: ** - .byte %01110000 ; 03EE 1-7d: *** - .byte %00000000 ; 03EF 1-7d: + .byte %01110000 ; 03E8 1-7d: *** + .byte %00011000 ; 03E9 1-7d: ** + .byte %00001100 ; 03EA 1-7d: ** + .byte %00000110 ; 03EB 1-7d: ** + .byte %00001100 ; 03EC 1-7d: ** + .byte %00011000 ; 03ED 1-7d: ** + .byte %01110000 ; 03EE 1-7d: *** + .byte %00000000 ; 03EF 1-7d: - .byte %00111100 ; 03F0 1-7e: **** - .byte %01100110 ; 03F1 1-7e: ** ** - .byte %00000110 ; 03F2 1-7e: ** - .byte %00001100 ; 03F3 1-7e: ** - .byte %00011000 ; 03F4 1-7e: ** - .byte %00000000 ; 03F5 1-7e: - .byte %00011000 ; 03F6 1-7e: ** - .byte %00000000 ; 03F7 1-7e: + .byte %00111100 ; 03F0 1-7e: **** + .byte %01100110 ; 03F1 1-7e: ** ** + .byte %00000110 ; 03F2 1-7e: ** + .byte %00001100 ; 03F3 1-7e: ** + .byte %00011000 ; 03F4 1-7e: ** + .byte %00000000 ; 03F5 1-7e: + .byte %00011000 ; 03F6 1-7e: ** + .byte %00000000 ; 03F7 1-7e: - .byte %00111100 ; 03F8 1-7f: **** - .byte %01100110 ; 03F9 1-7f: ** ** - .byte %00000110 ; 03FA 1-7f: ** - .byte %00001100 ; 03FB 1-7f: ** - .byte %00011000 ; 03FC 1-7f: ** - .byte %00000000 ; 03FD 1-7f: - .byte %00011000 ; 03FE 1-7f: ** - .byte %00000000 ; 03FF 1-7f: + .byte %00111100 ; 03F8 1-7f: **** + .byte %01100110 ; 03F9 1-7f: ** ** + .byte %00000110 ; 03FA 1-7f: ** + .byte %00001100 ; 03FB 1-7f: ** + .byte %00011000 ; 03FC 1-7f: ** + .byte %00000000 ; 03FD 1-7f: + .byte %00011000 ; 03FE 1-7f: ** + .byte %00000000 ; 03FF 1-7f: - .byte %00111100 ; 0400 1-80: **** - .byte %01100110 ; 0401 1-80: ** ** - .byte %01101110 ; 0402 1-80: ** *** - .byte %01101110 ; 0403 1-80: ** *** - .byte %01100000 ; 0404 1-80: ** - .byte %01100010 ; 0405 1-80: ** * - .byte %00111100 ; 0406 1-80: **** - .byte %00000000 ; 0407 1-80: + .byte %00111100 ; 0400 1-80: **** + .byte %01100110 ; 0401 1-80: ** ** + .byte %01101110 ; 0402 1-80: ** *** + .byte %01101110 ; 0403 1-80: ** *** + .byte %01100000 ; 0404 1-80: ** + .byte %01100010 ; 0405 1-80: ** * + .byte %00111100 ; 0406 1-80: **** + .byte %00000000 ; 0407 1-80: - .byte %00111100 ; 0408 1-81: **** - .byte %01100110 ; 0409 1-81: ** ** - .byte %01101110 ; 040A 1-81: ** *** - .byte %01101110 ; 040B 1-81: ** *** - .byte %01100000 ; 040C 1-81: ** - .byte %01100010 ; 040D 1-81: ** * - .byte %00111100 ; 040E 1-81: **** - .byte %00000000 ; 040F 1-81: + .byte %00111100 ; 0408 1-81: **** + .byte %01100110 ; 0409 1-81: ** ** + .byte %01101110 ; 040A 1-81: ** *** + .byte %01101110 ; 040B 1-81: ** *** + .byte %01100000 ; 040C 1-81: ** + .byte %01100010 ; 040D 1-81: ** * + .byte %00111100 ; 040E 1-81: **** + .byte %00000000 ; 040F 1-81: - .byte %00011000 ; 0410 1-82: ** - .byte %00111100 ; 0411 1-82: **** - .byte %01100110 ; 0412 1-82: ** ** - .byte %01111110 ; 0413 1-82: ****** - .byte %01100110 ; 0414 1-82: ** ** - .byte %01100110 ; 0415 1-82: ** ** - .byte %01100110 ; 0416 1-82: ** ** - .byte %00000000 ; 0417 1-82: + .byte %00011000 ; 0410 1-82: ** + .byte %00111100 ; 0411 1-82: **** + .byte %01100110 ; 0412 1-82: ** ** + .byte %01111110 ; 0413 1-82: ****** + .byte %01100110 ; 0414 1-82: ** ** + .byte %01100110 ; 0415 1-82: ** ** + .byte %01100110 ; 0416 1-82: ** ** + .byte %00000000 ; 0417 1-82: - .byte %00011000 ; 0418 1-83: ** - .byte %00111100 ; 0419 1-83: **** - .byte %01100110 ; 041A 1-83: ** ** - .byte %01111110 ; 041B 1-83: ****** - .byte %01100110 ; 041C 1-83: ** ** - .byte %01100110 ; 041D 1-83: ** ** - .byte %01100110 ; 041E 1-83: ** ** - .byte %00000000 ; 041F 1-83: + .byte %00011000 ; 0418 1-83: ** + .byte %00111100 ; 0419 1-83: **** + .byte %01100110 ; 041A 1-83: ** ** + .byte %01111110 ; 041B 1-83: ****** + .byte %01100110 ; 041C 1-83: ** ** + .byte %01100110 ; 041D 1-83: ** ** + .byte %01100110 ; 041E 1-83: ** ** + .byte %00000000 ; 041F 1-83: - .byte %01111100 ; 0420 1-84: ***** - .byte %01100110 ; 0421 1-84: ** ** - .byte %01100110 ; 0422 1-84: ** ** - .byte %01111100 ; 0423 1-84: ***** - .byte %01100110 ; 0424 1-84: ** ** - .byte %01100110 ; 0425 1-84: ** ** - .byte %01111100 ; 0426 1-84: ***** - .byte %00000000 ; 0427 1-84: + .byte %01111100 ; 0420 1-84: ***** + .byte %01100110 ; 0421 1-84: ** ** + .byte %01100110 ; 0422 1-84: ** ** + .byte %01111100 ; 0423 1-84: ***** + .byte %01100110 ; 0424 1-84: ** ** + .byte %01100110 ; 0425 1-84: ** ** + .byte %01111100 ; 0426 1-84: ***** + .byte %00000000 ; 0427 1-84: - .byte %01111100 ; 0428 1-85: ***** - .byte %01100110 ; 0429 1-85: ** ** - .byte %01100110 ; 042A 1-85: ** ** - .byte %01111100 ; 042B 1-85: ***** - .byte %01100110 ; 042C 1-85: ** ** - .byte %01100110 ; 042D 1-85: ** ** - .byte %01111100 ; 042E 1-85: ***** - .byte %00000000 ; 042F 1-85: + .byte %01111100 ; 0428 1-85: ***** + .byte %01100110 ; 0429 1-85: ** ** + .byte %01100110 ; 042A 1-85: ** ** + .byte %01111100 ; 042B 1-85: ***** + .byte %01100110 ; 042C 1-85: ** ** + .byte %01100110 ; 042D 1-85: ** ** + .byte %01111100 ; 042E 1-85: ***** + .byte %00000000 ; 042F 1-85: - .byte %00111100 ; 0430 1-86: **** - .byte %01100110 ; 0431 1-86: ** ** - .byte %01100000 ; 0432 1-86: ** - .byte %01100000 ; 0433 1-86: ** - .byte %01100000 ; 0434 1-86: ** - .byte %01100110 ; 0435 1-86: ** ** - .byte %00111100 ; 0436 1-86: **** - .byte %00000000 ; 0437 1-86: + .byte %00111100 ; 0430 1-86: **** + .byte %01100110 ; 0431 1-86: ** ** + .byte %01100000 ; 0432 1-86: ** + .byte %01100000 ; 0433 1-86: ** + .byte %01100000 ; 0434 1-86: ** + .byte %01100110 ; 0435 1-86: ** ** + .byte %00111100 ; 0436 1-86: **** + .byte %00000000 ; 0437 1-86: - .byte %00111100 ; 0438 1-87: **** - .byte %01100110 ; 0439 1-87: ** ** - .byte %01100000 ; 043A 1-87: ** - .byte %01100000 ; 043B 1-87: ** - .byte %01100000 ; 043C 1-87: ** - .byte %01100110 ; 043D 1-87: ** ** - .byte %00111100 ; 043E 1-87: **** - .byte %00000000 ; 043F 1-87: + .byte %00111100 ; 0438 1-87: **** + .byte %01100110 ; 0439 1-87: ** ** + .byte %01100000 ; 043A 1-87: ** + .byte %01100000 ; 043B 1-87: ** + .byte %01100000 ; 043C 1-87: ** + .byte %01100110 ; 043D 1-87: ** ** + .byte %00111100 ; 043E 1-87: **** + .byte %00000000 ; 043F 1-87: - .byte %01111000 ; 0440 1-88: **** - .byte %01101100 ; 0441 1-88: ** ** - .byte %01100110 ; 0442 1-88: ** ** - .byte %01100110 ; 0443 1-88: ** ** - .byte %01100110 ; 0444 1-88: ** ** - .byte %01101100 ; 0445 1-88: ** ** - .byte %01111000 ; 0446 1-88: **** - .byte %00000000 ; 0447 1-88: + .byte %01111000 ; 0440 1-88: **** + .byte %01101100 ; 0441 1-88: ** ** + .byte %01100110 ; 0442 1-88: ** ** + .byte %01100110 ; 0443 1-88: ** ** + .byte %01100110 ; 0444 1-88: ** ** + .byte %01101100 ; 0445 1-88: ** ** + .byte %01111000 ; 0446 1-88: **** + .byte %00000000 ; 0447 1-88: - .byte %01111000 ; 0448 1-89: **** - .byte %01101100 ; 0449 1-89: ** ** - .byte %01100110 ; 044A 1-89: ** ** - .byte %01100110 ; 044B 1-89: ** ** - .byte %01100110 ; 044C 1-89: ** ** - .byte %01101100 ; 044D 1-89: ** ** - .byte %01111000 ; 044E 1-89: **** - .byte %00000000 ; 044F 1-89: + .byte %01111000 ; 0448 1-89: **** + .byte %01101100 ; 0449 1-89: ** ** + .byte %01100110 ; 044A 1-89: ** ** + .byte %01100110 ; 044B 1-89: ** ** + .byte %01100110 ; 044C 1-89: ** ** + .byte %01101100 ; 044D 1-89: ** ** + .byte %01111000 ; 044E 1-89: **** + .byte %00000000 ; 044F 1-89: - .byte %01111110 ; 0450 1-8a: ****** - .byte %01100000 ; 0451 1-8a: ** - .byte %01100000 ; 0452 1-8a: ** - .byte %01111000 ; 0453 1-8a: **** - .byte %01100000 ; 0454 1-8a: ** - .byte %01100000 ; 0455 1-8a: ** - .byte %01111110 ; 0456 1-8a: ****** - .byte %00000000 ; 0457 1-8a: + .byte %01111110 ; 0450 1-8a: ****** + .byte %01100000 ; 0451 1-8a: ** + .byte %01100000 ; 0452 1-8a: ** + .byte %01111000 ; 0453 1-8a: **** + .byte %01100000 ; 0454 1-8a: ** + .byte %01100000 ; 0455 1-8a: ** + .byte %01111110 ; 0456 1-8a: ****** + .byte %00000000 ; 0457 1-8a: - .byte %01111110 ; 0458 1-8b: ****** - .byte %01100000 ; 0459 1-8b: ** - .byte %01100000 ; 045A 1-8b: ** - .byte %01111000 ; 045B 1-8b: **** - .byte %01100000 ; 045C 1-8b: ** - .byte %01100000 ; 045D 1-8b: ** - .byte %01111110 ; 045E 1-8b: ****** - .byte %00000000 ; 045F 1-8b: + .byte %01111110 ; 0458 1-8b: ****** + .byte %01100000 ; 0459 1-8b: ** + .byte %01100000 ; 045A 1-8b: ** + .byte %01111000 ; 045B 1-8b: **** + .byte %01100000 ; 045C 1-8b: ** + .byte %01100000 ; 045D 1-8b: ** + .byte %01111110 ; 045E 1-8b: ****** + .byte %00000000 ; 045F 1-8b: - .byte %01111110 ; 0460 1-8c: ****** - .byte %01100000 ; 0461 1-8c: ** - .byte %01100000 ; 0462 1-8c: ** - .byte %01111000 ; 0463 1-8c: **** - .byte %01100000 ; 0464 1-8c: ** - .byte %01100000 ; 0465 1-8c: ** - .byte %01100000 ; 0466 1-8c: ** - .byte %00000000 ; 0467 1-8c: + .byte %01111110 ; 0460 1-8c: ****** + .byte %01100000 ; 0461 1-8c: ** + .byte %01100000 ; 0462 1-8c: ** + .byte %01111000 ; 0463 1-8c: **** + .byte %01100000 ; 0464 1-8c: ** + .byte %01100000 ; 0465 1-8c: ** + .byte %01100000 ; 0466 1-8c: ** + .byte %00000000 ; 0467 1-8c: - .byte %01111110 ; 0468 1-8d: ****** - .byte %01100000 ; 0469 1-8d: ** - .byte %01100000 ; 046A 1-8d: ** - .byte %01111000 ; 046B 1-8d: **** - .byte %01100000 ; 046C 1-8d: ** - .byte %01100000 ; 046D 1-8d: ** - .byte %01100000 ; 046E 1-8d: ** - .byte %00000000 ; 046F 1-8d: + .byte %01111110 ; 0468 1-8d: ****** + .byte %01100000 ; 0469 1-8d: ** + .byte %01100000 ; 046A 1-8d: ** + .byte %01111000 ; 046B 1-8d: **** + .byte %01100000 ; 046C 1-8d: ** + .byte %01100000 ; 046D 1-8d: ** + .byte %01100000 ; 046E 1-8d: ** + .byte %00000000 ; 046F 1-8d: - .byte %00111100 ; 0470 1-8e: **** - .byte %01100110 ; 0471 1-8e: ** ** - .byte %01100000 ; 0472 1-8e: ** - .byte %01101110 ; 0473 1-8e: ** *** - .byte %01100110 ; 0474 1-8e: ** ** - .byte %01100110 ; 0475 1-8e: ** ** - .byte %00111100 ; 0476 1-8e: **** - .byte %00000000 ; 0477 1-8e: + .byte %00111100 ; 0470 1-8e: **** + .byte %01100110 ; 0471 1-8e: ** ** + .byte %01100000 ; 0472 1-8e: ** + .byte %01101110 ; 0473 1-8e: ** *** + .byte %01100110 ; 0474 1-8e: ** ** + .byte %01100110 ; 0475 1-8e: ** ** + .byte %00111100 ; 0476 1-8e: **** + .byte %00000000 ; 0477 1-8e: - .byte %00111100 ; 0478 1-8f: **** - .byte %01100110 ; 0479 1-8f: ** ** - .byte %01100000 ; 047A 1-8f: ** - .byte %01101110 ; 047B 1-8f: ** *** - .byte %01100110 ; 047C 1-8f: ** ** - .byte %01100110 ; 047D 1-8f: ** ** - .byte %00111100 ; 047E 1-8f: **** - .byte %00000000 ; 047F 1-8f: + .byte %00111100 ; 0478 1-8f: **** + .byte %01100110 ; 0479 1-8f: ** ** + .byte %01100000 ; 047A 1-8f: ** + .byte %01101110 ; 047B 1-8f: ** *** + .byte %01100110 ; 047C 1-8f: ** ** + .byte %01100110 ; 047D 1-8f: ** ** + .byte %00111100 ; 047E 1-8f: **** + .byte %00000000 ; 047F 1-8f: - .byte %01100110 ; 0480 1-90: ** ** - .byte %01100110 ; 0481 1-90: ** ** - .byte %01100110 ; 0482 1-90: ** ** - .byte %01111110 ; 0483 1-90: ****** - .byte %01100110 ; 0484 1-90: ** ** - .byte %01100110 ; 0485 1-90: ** ** - .byte %01100110 ; 0486 1-90: ** ** - .byte %00000000 ; 0487 1-90: + .byte %01100110 ; 0480 1-90: ** ** + .byte %01100110 ; 0481 1-90: ** ** + .byte %01100110 ; 0482 1-90: ** ** + .byte %01111110 ; 0483 1-90: ****** + .byte %01100110 ; 0484 1-90: ** ** + .byte %01100110 ; 0485 1-90: ** ** + .byte %01100110 ; 0486 1-90: ** ** + .byte %00000000 ; 0487 1-90: - .byte %01100110 ; 0488 1-91: ** ** - .byte %01100110 ; 0489 1-91: ** ** - .byte %01100110 ; 048A 1-91: ** ** - .byte %01111110 ; 048B 1-91: ****** - .byte %01100110 ; 048C 1-91: ** ** - .byte %01100110 ; 048D 1-91: ** ** - .byte %01100110 ; 048E 1-91: ** ** - .byte %00000000 ; 048F 1-91: + .byte %01100110 ; 0488 1-91: ** ** + .byte %01100110 ; 0489 1-91: ** ** + .byte %01100110 ; 048A 1-91: ** ** + .byte %01111110 ; 048B 1-91: ****** + .byte %01100110 ; 048C 1-91: ** ** + .byte %01100110 ; 048D 1-91: ** ** + .byte %01100110 ; 048E 1-91: ** ** + .byte %00000000 ; 048F 1-91: - .byte %00111100 ; 0490 1-92: **** - .byte %00011000 ; 0491 1-92: ** - .byte %00011000 ; 0492 1-92: ** - .byte %00011000 ; 0493 1-92: ** - .byte %00011000 ; 0494 1-92: ** - .byte %00011000 ; 0495 1-92: ** - .byte %00111100 ; 0496 1-92: **** - .byte %00000000 ; 0497 1-92: + .byte %00111100 ; 0490 1-92: **** + .byte %00011000 ; 0491 1-92: ** + .byte %00011000 ; 0492 1-92: ** + .byte %00011000 ; 0493 1-92: ** + .byte %00011000 ; 0494 1-92: ** + .byte %00011000 ; 0495 1-92: ** + .byte %00111100 ; 0496 1-92: **** + .byte %00000000 ; 0497 1-92: - .byte %00111100 ; 0498 1-93: **** - .byte %00011000 ; 0499 1-93: ** - .byte %00011000 ; 049A 1-93: ** - .byte %00011000 ; 049B 1-93: ** - .byte %00011000 ; 049C 1-93: ** - .byte %00011000 ; 049D 1-93: ** - .byte %00111100 ; 049E 1-93: **** - .byte %00000000 ; 049F 1-93: + .byte %00111100 ; 0498 1-93: **** + .byte %00011000 ; 0499 1-93: ** + .byte %00011000 ; 049A 1-93: ** + .byte %00011000 ; 049B 1-93: ** + .byte %00011000 ; 049C 1-93: ** + .byte %00011000 ; 049D 1-93: ** + .byte %00111100 ; 049E 1-93: **** + .byte %00000000 ; 049F 1-93: - .byte %00011110 ; 04A0 1-94: **** - .byte %00001100 ; 04A1 1-94: ** - .byte %00001100 ; 04A2 1-94: ** - .byte %00001100 ; 04A3 1-94: ** - .byte %00001100 ; 04A4 1-94: ** - .byte %01101100 ; 04A5 1-94: ** ** - .byte %00111000 ; 04A6 1-94: *** - .byte %00000000 ; 04A7 1-94: + .byte %00011110 ; 04A0 1-94: **** + .byte %00001100 ; 04A1 1-94: ** + .byte %00001100 ; 04A2 1-94: ** + .byte %00001100 ; 04A3 1-94: ** + .byte %00001100 ; 04A4 1-94: ** + .byte %01101100 ; 04A5 1-94: ** ** + .byte %00111000 ; 04A6 1-94: *** + .byte %00000000 ; 04A7 1-94: - .byte %00011110 ; 04A8 1-95: **** - .byte %00001100 ; 04A9 1-95: ** - .byte %00001100 ; 04AA 1-95: ** - .byte %00001100 ; 04AB 1-95: ** - .byte %00001100 ; 04AC 1-95: ** - .byte %01101100 ; 04AD 1-95: ** ** - .byte %00111000 ; 04AE 1-95: *** - .byte %00000000 ; 04AF 1-95: + .byte %00011110 ; 04A8 1-95: **** + .byte %00001100 ; 04A9 1-95: ** + .byte %00001100 ; 04AA 1-95: ** + .byte %00001100 ; 04AB 1-95: ** + .byte %00001100 ; 04AC 1-95: ** + .byte %01101100 ; 04AD 1-95: ** ** + .byte %00111000 ; 04AE 1-95: *** + .byte %00000000 ; 04AF 1-95: - .byte %01100110 ; 04B0 1-96: ** ** - .byte %01101100 ; 04B1 1-96: ** ** - .byte %01111000 ; 04B2 1-96: **** - .byte %01110000 ; 04B3 1-96: *** - .byte %01111000 ; 04B4 1-96: **** - .byte %01101100 ; 04B5 1-96: ** ** - .byte %01100110 ; 04B6 1-96: ** ** - .byte %00000000 ; 04B7 1-96: + .byte %01100110 ; 04B0 1-96: ** ** + .byte %01101100 ; 04B1 1-96: ** ** + .byte %01111000 ; 04B2 1-96: **** + .byte %01110000 ; 04B3 1-96: *** + .byte %01111000 ; 04B4 1-96: **** + .byte %01101100 ; 04B5 1-96: ** ** + .byte %01100110 ; 04B6 1-96: ** ** + .byte %00000000 ; 04B7 1-96: - .byte %01100110 ; 04B8 1-97: ** ** - .byte %01101100 ; 04B9 1-97: ** ** - .byte %01111000 ; 04BA 1-97: **** - .byte %01110000 ; 04BB 1-97: *** - .byte %01111000 ; 04BC 1-97: **** - .byte %01101100 ; 04BD 1-97: ** ** - .byte %01100110 ; 04BE 1-97: ** ** - .byte %00000000 ; 04BF 1-97: + .byte %01100110 ; 04B8 1-97: ** ** + .byte %01101100 ; 04B9 1-97: ** ** + .byte %01111000 ; 04BA 1-97: **** + .byte %01110000 ; 04BB 1-97: *** + .byte %01111000 ; 04BC 1-97: **** + .byte %01101100 ; 04BD 1-97: ** ** + .byte %01100110 ; 04BE 1-97: ** ** + .byte %00000000 ; 04BF 1-97: - .byte %01100000 ; 04C0 1-98: ** - .byte %01100000 ; 04C1 1-98: ** - .byte %01100000 ; 04C2 1-98: ** - .byte %01100000 ; 04C3 1-98: ** - .byte %01100000 ; 04C4 1-98: ** - .byte %01100000 ; 04C5 1-98: ** - .byte %01111110 ; 04C6 1-98: ****** - .byte %00000000 ; 04C7 1-98: + .byte %01100000 ; 04C0 1-98: ** + .byte %01100000 ; 04C1 1-98: ** + .byte %01100000 ; 04C2 1-98: ** + .byte %01100000 ; 04C3 1-98: ** + .byte %01100000 ; 04C4 1-98: ** + .byte %01100000 ; 04C5 1-98: ** + .byte %01111110 ; 04C6 1-98: ****** + .byte %00000000 ; 04C7 1-98: - .byte %01100000 ; 04C8 1-99: ** - .byte %01100000 ; 04C9 1-99: ** - .byte %01100000 ; 04CA 1-99: ** - .byte %01100000 ; 04CB 1-99: ** - .byte %01100000 ; 04CC 1-99: ** - .byte %01100000 ; 04CD 1-99: ** - .byte %01111110 ; 04CE 1-99: ****** - .byte %00000000 ; 04CF 1-99: + .byte %01100000 ; 04C8 1-99: ** + .byte %01100000 ; 04C9 1-99: ** + .byte %01100000 ; 04CA 1-99: ** + .byte %01100000 ; 04CB 1-99: ** + .byte %01100000 ; 04CC 1-99: ** + .byte %01100000 ; 04CD 1-99: ** + .byte %01111110 ; 04CE 1-99: ****** + .byte %00000000 ; 04CF 1-99: .byte %01100011 ; 04D0 1-9a: ** ** .byte %01110111 ; 04D1 1-9a: *** *** @@ -1391,7 +1400,7 @@ .byte %01100011 ; 04D4 1-9a: ** ** .byte %01100011 ; 04D5 1-9a: ** ** .byte %01100011 ; 04D6 1-9a: ** ** - .byte %00000000 ; 04D7 1-9a: + .byte %00000000 ; 04D7 1-9a: .byte %01100011 ; 04D8 1-9b: ** ** .byte %01110111 ; 04D9 1-9b: *** *** @@ -1400,169 +1409,169 @@ .byte %01100011 ; 04DC 1-9b: ** ** .byte %01100011 ; 04DD 1-9b: ** ** .byte %01100011 ; 04DE 1-9b: ** ** - .byte %00000000 ; 04DF 1-9b: + .byte %00000000 ; 04DF 1-9b: - .byte %01100110 ; 04E0 1-9c: ** ** - .byte %01110110 ; 04E1 1-9c: *** ** - .byte %01111110 ; 04E2 1-9c: ****** - .byte %01111110 ; 04E3 1-9c: ****** - .byte %01101110 ; 04E4 1-9c: ** *** - .byte %01100110 ; 04E5 1-9c: ** ** - .byte %01100110 ; 04E6 1-9c: ** ** - .byte %00000000 ; 04E7 1-9c: + .byte %01100110 ; 04E0 1-9c: ** ** + .byte %01110110 ; 04E1 1-9c: *** ** + .byte %01111110 ; 04E2 1-9c: ****** + .byte %01111110 ; 04E3 1-9c: ****** + .byte %01101110 ; 04E4 1-9c: ** *** + .byte %01100110 ; 04E5 1-9c: ** ** + .byte %01100110 ; 04E6 1-9c: ** ** + .byte %00000000 ; 04E7 1-9c: - .byte %01100110 ; 04E8 1-9d: ** ** - .byte %01110110 ; 04E9 1-9d: *** ** - .byte %01111110 ; 04EA 1-9d: ****** - .byte %01111110 ; 04EB 1-9d: ****** - .byte %01101110 ; 04EC 1-9d: ** *** - .byte %01100110 ; 04ED 1-9d: ** ** - .byte %01100110 ; 04EE 1-9d: ** ** - .byte %00000000 ; 04EF 1-9d: + .byte %01100110 ; 04E8 1-9d: ** ** + .byte %01110110 ; 04E9 1-9d: *** ** + .byte %01111110 ; 04EA 1-9d: ****** + .byte %01111110 ; 04EB 1-9d: ****** + .byte %01101110 ; 04EC 1-9d: ** *** + .byte %01100110 ; 04ED 1-9d: ** ** + .byte %01100110 ; 04EE 1-9d: ** ** + .byte %00000000 ; 04EF 1-9d: - .byte %00111100 ; 04F0 1-9e: **** - .byte %01100110 ; 04F1 1-9e: ** ** - .byte %01100110 ; 04F2 1-9e: ** ** - .byte %01100110 ; 04F3 1-9e: ** ** - .byte %01100110 ; 04F4 1-9e: ** ** - .byte %01100110 ; 04F5 1-9e: ** ** - .byte %00111100 ; 04F6 1-9e: **** - .byte %00000000 ; 04F7 1-9e: + .byte %00111100 ; 04F0 1-9e: **** + .byte %01100110 ; 04F1 1-9e: ** ** + .byte %01100110 ; 04F2 1-9e: ** ** + .byte %01100110 ; 04F3 1-9e: ** ** + .byte %01100110 ; 04F4 1-9e: ** ** + .byte %01100110 ; 04F5 1-9e: ** ** + .byte %00111100 ; 04F6 1-9e: **** + .byte %00000000 ; 04F7 1-9e: - .byte %00111100 ; 04F8 1-9f: **** - .byte %01100110 ; 04F9 1-9f: ** ** - .byte %01100110 ; 04FA 1-9f: ** ** - .byte %01100110 ; 04FB 1-9f: ** ** - .byte %01100110 ; 04FC 1-9f: ** ** - .byte %01100110 ; 04FD 1-9f: ** ** - .byte %00111100 ; 04FE 1-9f: **** - .byte %00000000 ; 04FF 1-9f: + .byte %00111100 ; 04F8 1-9f: **** + .byte %01100110 ; 04F9 1-9f: ** ** + .byte %01100110 ; 04FA 1-9f: ** ** + .byte %01100110 ; 04FB 1-9f: ** ** + .byte %01100110 ; 04FC 1-9f: ** ** + .byte %01100110 ; 04FD 1-9f: ** ** + .byte %00111100 ; 04FE 1-9f: **** + .byte %00000000 ; 04FF 1-9f: - .byte %01111100 ; 0500 1-a0: ***** - .byte %01100110 ; 0501 1-a0: ** ** - .byte %01100110 ; 0502 1-a0: ** ** - .byte %01111100 ; 0503 1-a0: ***** - .byte %01100000 ; 0504 1-a0: ** - .byte %01100000 ; 0505 1-a0: ** - .byte %01100000 ; 0506 1-a0: ** - .byte %00000000 ; 0507 1-a0: + .byte %01111100 ; 0500 1-a0: ***** + .byte %01100110 ; 0501 1-a0: ** ** + .byte %01100110 ; 0502 1-a0: ** ** + .byte %01111100 ; 0503 1-a0: ***** + .byte %01100000 ; 0504 1-a0: ** + .byte %01100000 ; 0505 1-a0: ** + .byte %01100000 ; 0506 1-a0: ** + .byte %00000000 ; 0507 1-a0: - .byte %01111100 ; 0508 1-a1: ***** - .byte %01100110 ; 0509 1-a1: ** ** - .byte %01100110 ; 050A 1-a1: ** ** - .byte %01111100 ; 050B 1-a1: ***** - .byte %01100000 ; 050C 1-a1: ** - .byte %01100000 ; 050D 1-a1: ** - .byte %01100000 ; 050E 1-a1: ** - .byte %00000000 ; 050F 1-a1: + .byte %01111100 ; 0508 1-a1: ***** + .byte %01100110 ; 0509 1-a1: ** ** + .byte %01100110 ; 050A 1-a1: ** ** + .byte %01111100 ; 050B 1-a1: ***** + .byte %01100000 ; 050C 1-a1: ** + .byte %01100000 ; 050D 1-a1: ** + .byte %01100000 ; 050E 1-a1: ** + .byte %00000000 ; 050F 1-a1: - .byte %00111100 ; 0510 1-a2: **** - .byte %01100110 ; 0511 1-a2: ** ** - .byte %01100110 ; 0512 1-a2: ** ** - .byte %01100110 ; 0513 1-a2: ** ** - .byte %01100110 ; 0514 1-a2: ** ** - .byte %00111100 ; 0515 1-a2: **** - .byte %00001110 ; 0516 1-a2: *** - .byte %00000000 ; 0517 1-a2: + .byte %00111100 ; 0510 1-a2: **** + .byte %01100110 ; 0511 1-a2: ** ** + .byte %01100110 ; 0512 1-a2: ** ** + .byte %01100110 ; 0513 1-a2: ** ** + .byte %01100110 ; 0514 1-a2: ** ** + .byte %00111100 ; 0515 1-a2: **** + .byte %00001110 ; 0516 1-a2: *** + .byte %00000000 ; 0517 1-a2: - .byte %00111100 ; 0518 1-a3: **** - .byte %01100110 ; 0519 1-a3: ** ** - .byte %01100110 ; 051A 1-a3: ** ** - .byte %01100110 ; 051B 1-a3: ** ** - .byte %01100110 ; 051C 1-a3: ** ** - .byte %00111100 ; 051D 1-a3: **** - .byte %00001110 ; 051E 1-a3: *** - .byte %00000000 ; 051F 1-a3: + .byte %00111100 ; 0518 1-a3: **** + .byte %01100110 ; 0519 1-a3: ** ** + .byte %01100110 ; 051A 1-a3: ** ** + .byte %01100110 ; 051B 1-a3: ** ** + .byte %01100110 ; 051C 1-a3: ** ** + .byte %00111100 ; 051D 1-a3: **** + .byte %00001110 ; 051E 1-a3: *** + .byte %00000000 ; 051F 1-a3: - .byte %01111100 ; 0520 1-a4: ***** - .byte %01100110 ; 0521 1-a4: ** ** - .byte %01100110 ; 0522 1-a4: ** ** - .byte %01111100 ; 0523 1-a4: ***** - .byte %01111000 ; 0524 1-a4: **** - .byte %01101100 ; 0525 1-a4: ** ** - .byte %01100110 ; 0526 1-a4: ** ** - .byte %00000000 ; 0527 1-a4: + .byte %01111100 ; 0520 1-a4: ***** + .byte %01100110 ; 0521 1-a4: ** ** + .byte %01100110 ; 0522 1-a4: ** ** + .byte %01111100 ; 0523 1-a4: ***** + .byte %01111000 ; 0524 1-a4: **** + .byte %01101100 ; 0525 1-a4: ** ** + .byte %01100110 ; 0526 1-a4: ** ** + .byte %00000000 ; 0527 1-a4: - .byte %01111100 ; 0528 1-a5: ***** - .byte %01100110 ; 0529 1-a5: ** ** - .byte %01100110 ; 052A 1-a5: ** ** - .byte %01111100 ; 052B 1-a5: ***** - .byte %01111000 ; 052C 1-a5: **** - .byte %01101100 ; 052D 1-a5: ** ** - .byte %01100110 ; 052E 1-a5: ** ** - .byte %00000000 ; 052F 1-a5: + .byte %01111100 ; 0528 1-a5: ***** + .byte %01100110 ; 0529 1-a5: ** ** + .byte %01100110 ; 052A 1-a5: ** ** + .byte %01111100 ; 052B 1-a5: ***** + .byte %01111000 ; 052C 1-a5: **** + .byte %01101100 ; 052D 1-a5: ** ** + .byte %01100110 ; 052E 1-a5: ** ** + .byte %00000000 ; 052F 1-a5: - .byte %00111100 ; 0530 1-a6: **** - .byte %01100110 ; 0531 1-a6: ** ** - .byte %01100000 ; 0532 1-a6: ** - .byte %00111100 ; 0533 1-a6: **** - .byte %00000110 ; 0534 1-a6: ** - .byte %01100110 ; 0535 1-a6: ** ** - .byte %00111100 ; 0536 1-a6: **** - .byte %00000000 ; 0537 1-a6: + .byte %00111100 ; 0530 1-a6: **** + .byte %01100110 ; 0531 1-a6: ** ** + .byte %01100000 ; 0532 1-a6: ** + .byte %00111100 ; 0533 1-a6: **** + .byte %00000110 ; 0534 1-a6: ** + .byte %01100110 ; 0535 1-a6: ** ** + .byte %00111100 ; 0536 1-a6: **** + .byte %00000000 ; 0537 1-a6: - .byte %00111100 ; 0538 1-a7: **** - .byte %01100110 ; 0539 1-a7: ** ** - .byte %01100000 ; 053A 1-a7: ** - .byte %00111100 ; 053B 1-a7: **** - .byte %00000110 ; 053C 1-a7: ** - .byte %01100110 ; 053D 1-a7: ** ** - .byte %00111100 ; 053E 1-a7: **** - .byte %00000000 ; 053F 1-a7: + .byte %00111100 ; 0538 1-a7: **** + .byte %01100110 ; 0539 1-a7: ** ** + .byte %01100000 ; 053A 1-a7: ** + .byte %00111100 ; 053B 1-a7: **** + .byte %00000110 ; 053C 1-a7: ** + .byte %01100110 ; 053D 1-a7: ** ** + .byte %00111100 ; 053E 1-a7: **** + .byte %00000000 ; 053F 1-a7: - .byte %01111110 ; 0540 1-a8: ****** - .byte %00011000 ; 0541 1-a8: ** - .byte %00011000 ; 0542 1-a8: ** - .byte %00011000 ; 0543 1-a8: ** - .byte %00011000 ; 0544 1-a8: ** - .byte %00011000 ; 0545 1-a8: ** - .byte %00011000 ; 0546 1-a8: ** - .byte %00000000 ; 0547 1-a8: + .byte %01111110 ; 0540 1-a8: ****** + .byte %00011000 ; 0541 1-a8: ** + .byte %00011000 ; 0542 1-a8: ** + .byte %00011000 ; 0543 1-a8: ** + .byte %00011000 ; 0544 1-a8: ** + .byte %00011000 ; 0545 1-a8: ** + .byte %00011000 ; 0546 1-a8: ** + .byte %00000000 ; 0547 1-a8: - .byte %01111110 ; 0548 1-a9: ****** - .byte %00011000 ; 0549 1-a9: ** - .byte %00011000 ; 054A 1-a9: ** - .byte %00011000 ; 054B 1-a9: ** - .byte %00011000 ; 054C 1-a9: ** - .byte %00011000 ; 054D 1-a9: ** - .byte %00011000 ; 054E 1-a9: ** - .byte %00000000 ; 054F 1-a9: + .byte %01111110 ; 0548 1-a9: ****** + .byte %00011000 ; 0549 1-a9: ** + .byte %00011000 ; 054A 1-a9: ** + .byte %00011000 ; 054B 1-a9: ** + .byte %00011000 ; 054C 1-a9: ** + .byte %00011000 ; 054D 1-a9: ** + .byte %00011000 ; 054E 1-a9: ** + .byte %00000000 ; 054F 1-a9: - .byte %01100110 ; 0550 1-aa: ** ** - .byte %01100110 ; 0551 1-aa: ** ** - .byte %01100110 ; 0552 1-aa: ** ** - .byte %01100110 ; 0553 1-aa: ** ** - .byte %01100110 ; 0554 1-aa: ** ** - .byte %01100110 ; 0555 1-aa: ** ** - .byte %00111100 ; 0556 1-aa: **** - .byte %00000000 ; 0557 1-aa: + .byte %01100110 ; 0550 1-aa: ** ** + .byte %01100110 ; 0551 1-aa: ** ** + .byte %01100110 ; 0552 1-aa: ** ** + .byte %01100110 ; 0553 1-aa: ** ** + .byte %01100110 ; 0554 1-aa: ** ** + .byte %01100110 ; 0555 1-aa: ** ** + .byte %00111100 ; 0556 1-aa: **** + .byte %00000000 ; 0557 1-aa: - .byte %01100110 ; 0558 1-ab: ** ** - .byte %01100110 ; 0559 1-ab: ** ** - .byte %01100110 ; 055A 1-ab: ** ** - .byte %01100110 ; 055B 1-ab: ** ** - .byte %01100110 ; 055C 1-ab: ** ** - .byte %01100110 ; 055D 1-ab: ** ** - .byte %00111100 ; 055E 1-ab: **** - .byte %00000000 ; 055F 1-ab: + .byte %01100110 ; 0558 1-ab: ** ** + .byte %01100110 ; 0559 1-ab: ** ** + .byte %01100110 ; 055A 1-ab: ** ** + .byte %01100110 ; 055B 1-ab: ** ** + .byte %01100110 ; 055C 1-ab: ** ** + .byte %01100110 ; 055D 1-ab: ** ** + .byte %00111100 ; 055E 1-ab: **** + .byte %00000000 ; 055F 1-ab: - .byte %01100110 ; 0560 1-ac: ** ** - .byte %01100110 ; 0561 1-ac: ** ** - .byte %01100110 ; 0562 1-ac: ** ** - .byte %01100110 ; 0563 1-ac: ** ** - .byte %01100110 ; 0564 1-ac: ** ** - .byte %00111100 ; 0565 1-ac: **** - .byte %00011000 ; 0566 1-ac: ** - .byte %00000000 ; 0567 1-ac: + .byte %01100110 ; 0560 1-ac: ** ** + .byte %01100110 ; 0561 1-ac: ** ** + .byte %01100110 ; 0562 1-ac: ** ** + .byte %01100110 ; 0563 1-ac: ** ** + .byte %01100110 ; 0564 1-ac: ** ** + .byte %00111100 ; 0565 1-ac: **** + .byte %00011000 ; 0566 1-ac: ** + .byte %00000000 ; 0567 1-ac: - .byte %01100110 ; 0568 1-ad: ** ** - .byte %01100110 ; 0569 1-ad: ** ** - .byte %01100110 ; 056A 1-ad: ** ** - .byte %01100110 ; 056B 1-ad: ** ** - .byte %01100110 ; 056C 1-ad: ** ** - .byte %00111100 ; 056D 1-ad: **** - .byte %00011000 ; 056E 1-ad: ** - .byte %00000000 ; 056F 1-ad: + .byte %01100110 ; 0568 1-ad: ** ** + .byte %01100110 ; 0569 1-ad: ** ** + .byte %01100110 ; 056A 1-ad: ** ** + .byte %01100110 ; 056B 1-ad: ** ** + .byte %01100110 ; 056C 1-ad: ** ** + .byte %00111100 ; 056D 1-ad: **** + .byte %00011000 ; 056E 1-ad: ** + .byte %00000000 ; 056F 1-ad: .byte %01100011 ; 0570 1-ae: ** ** .byte %01100011 ; 0571 1-ae: ** ** @@ -1571,7 +1580,7 @@ .byte %01111111 ; 0574 1-ae: ******* .byte %01110111 ; 0575 1-ae: *** *** .byte %01100011 ; 0576 1-ae: ** ** - .byte %00000000 ; 0577 1-ae: + .byte %00000000 ; 0577 1-ae: .byte %01100011 ; 0578 1-af: ** ** .byte %01100011 ; 0579 1-af: ** ** @@ -1580,727 +1589,727 @@ .byte %01111111 ; 057C 1-af: ******* .byte %01110111 ; 057D 1-af: *** *** .byte %01100011 ; 057E 1-af: ** ** - .byte %00000000 ; 057F 1-af: + .byte %00000000 ; 057F 1-af: - .byte %01100110 ; 0580 1-b0: ** ** - .byte %01100110 ; 0581 1-b0: ** ** - .byte %00111100 ; 0582 1-b0: **** - .byte %00011000 ; 0583 1-b0: ** - .byte %00111100 ; 0584 1-b0: **** - .byte %01100110 ; 0585 1-b0: ** ** - .byte %01100110 ; 0586 1-b0: ** ** - .byte %00000000 ; 0587 1-b0: + .byte %01100110 ; 0580 1-b0: ** ** + .byte %01100110 ; 0581 1-b0: ** ** + .byte %00111100 ; 0582 1-b0: **** + .byte %00011000 ; 0583 1-b0: ** + .byte %00111100 ; 0584 1-b0: **** + .byte %01100110 ; 0585 1-b0: ** ** + .byte %01100110 ; 0586 1-b0: ** ** + .byte %00000000 ; 0587 1-b0: - .byte %01100110 ; 0588 1-b1: ** ** - .byte %01100110 ; 0589 1-b1: ** ** - .byte %00111100 ; 058A 1-b1: **** - .byte %00011000 ; 058B 1-b1: ** - .byte %00111100 ; 058C 1-b1: **** - .byte %01100110 ; 058D 1-b1: ** ** - .byte %01100110 ; 058E 1-b1: ** ** - .byte %00000000 ; 058F 1-b1: + .byte %01100110 ; 0588 1-b1: ** ** + .byte %01100110 ; 0589 1-b1: ** ** + .byte %00111100 ; 058A 1-b1: **** + .byte %00011000 ; 058B 1-b1: ** + .byte %00111100 ; 058C 1-b1: **** + .byte %01100110 ; 058D 1-b1: ** ** + .byte %01100110 ; 058E 1-b1: ** ** + .byte %00000000 ; 058F 1-b1: - .byte %01100110 ; 0590 1-b2: ** ** - .byte %01100110 ; 0591 1-b2: ** ** - .byte %01100110 ; 0592 1-b2: ** ** - .byte %00111100 ; 0593 1-b2: **** - .byte %00011000 ; 0594 1-b2: ** - .byte %00011000 ; 0595 1-b2: ** - .byte %00011000 ; 0596 1-b2: ** - .byte %00000000 ; 0597 1-b2: + .byte %01100110 ; 0590 1-b2: ** ** + .byte %01100110 ; 0591 1-b2: ** ** + .byte %01100110 ; 0592 1-b2: ** ** + .byte %00111100 ; 0593 1-b2: **** + .byte %00011000 ; 0594 1-b2: ** + .byte %00011000 ; 0595 1-b2: ** + .byte %00011000 ; 0596 1-b2: ** + .byte %00000000 ; 0597 1-b2: - .byte %01100110 ; 0598 1-b3: ** ** - .byte %01100110 ; 0599 1-b3: ** ** - .byte %01100110 ; 059A 1-b3: ** ** - .byte %00111100 ; 059B 1-b3: **** - .byte %00011000 ; 059C 1-b3: ** - .byte %00011000 ; 059D 1-b3: ** - .byte %00011000 ; 059E 1-b3: ** - .byte %00000000 ; 059F 1-b3: + .byte %01100110 ; 0598 1-b3: ** ** + .byte %01100110 ; 0599 1-b3: ** ** + .byte %01100110 ; 059A 1-b3: ** ** + .byte %00111100 ; 059B 1-b3: **** + .byte %00011000 ; 059C 1-b3: ** + .byte %00011000 ; 059D 1-b3: ** + .byte %00011000 ; 059E 1-b3: ** + .byte %00000000 ; 059F 1-b3: - .byte %01111110 ; 05A0 1-b4: ****** - .byte %00000110 ; 05A1 1-b4: ** - .byte %00001100 ; 05A2 1-b4: ** - .byte %00011000 ; 05A3 1-b4: ** - .byte %00110000 ; 05A4 1-b4: ** - .byte %01100000 ; 05A5 1-b4: ** - .byte %01111110 ; 05A6 1-b4: ****** - .byte %00000000 ; 05A7 1-b4: + .byte %01111110 ; 05A0 1-b4: ****** + .byte %00000110 ; 05A1 1-b4: ** + .byte %00001100 ; 05A2 1-b4: ** + .byte %00011000 ; 05A3 1-b4: ** + .byte %00110000 ; 05A4 1-b4: ** + .byte %01100000 ; 05A5 1-b4: ** + .byte %01111110 ; 05A6 1-b4: ****** + .byte %00000000 ; 05A7 1-b4: - .byte %01111110 ; 05A8 1-b5: ****** - .byte %00000110 ; 05A9 1-b5: ** - .byte %00001100 ; 05AA 1-b5: ** - .byte %00011000 ; 05AB 1-b5: ** - .byte %00110000 ; 05AC 1-b5: ** - .byte %01100000 ; 05AD 1-b5: ** - .byte %01111110 ; 05AE 1-b5: ****** - .byte %00000000 ; 05AF 1-b5: + .byte %01111110 ; 05A8 1-b5: ****** + .byte %00000110 ; 05A9 1-b5: ** + .byte %00001100 ; 05AA 1-b5: ** + .byte %00011000 ; 05AB 1-b5: ** + .byte %00110000 ; 05AC 1-b5: ** + .byte %01100000 ; 05AD 1-b5: ** + .byte %01111110 ; 05AE 1-b5: ****** + .byte %00000000 ; 05AF 1-b5: - .byte %00111100 ; 05B0 1-b6: **** - .byte %00110000 ; 05B1 1-b6: ** - .byte %00110000 ; 05B2 1-b6: ** - .byte %00110000 ; 05B3 1-b6: ** - .byte %00110000 ; 05B4 1-b6: ** - .byte %00110000 ; 05B5 1-b6: ** - .byte %00111100 ; 05B6 1-b6: **** - .byte %00000000 ; 05B7 1-b6: + .byte %00111100 ; 05B0 1-b6: **** + .byte %00110000 ; 05B1 1-b6: ** + .byte %00110000 ; 05B2 1-b6: ** + .byte %00110000 ; 05B3 1-b6: ** + .byte %00110000 ; 05B4 1-b6: ** + .byte %00110000 ; 05B5 1-b6: ** + .byte %00111100 ; 05B6 1-b6: **** + .byte %00000000 ; 05B7 1-b6: - .byte %00111100 ; 05B8 1-b7: **** - .byte %00110000 ; 05B9 1-b7: ** - .byte %00110000 ; 05BA 1-b7: ** - .byte %00110000 ; 05BB 1-b7: ** - .byte %00110000 ; 05BC 1-b7: ** - .byte %00110000 ; 05BD 1-b7: ** - .byte %00111100 ; 05BE 1-b7: **** - .byte %00000000 ; 05BF 1-b7: + .byte %00111100 ; 05B8 1-b7: **** + .byte %00110000 ; 05B9 1-b7: ** + .byte %00110000 ; 05BA 1-b7: ** + .byte %00110000 ; 05BB 1-b7: ** + .byte %00110000 ; 05BC 1-b7: ** + .byte %00110000 ; 05BD 1-b7: ** + .byte %00111100 ; 05BE 1-b7: **** + .byte %00000000 ; 05BF 1-b7: - .byte %01100000 ; 05C0 1-b8: ** - .byte %00110000 ; 05C1 1-b8: ** - .byte %00011000 ; 05C2 1-b8: ** - .byte %00001100 ; 05C3 1-b8: ** - .byte %00000110 ; 05C4 1-b8: ** + .byte %01100000 ; 05C0 1-b8: ** + .byte %00110000 ; 05C1 1-b8: ** + .byte %00011000 ; 05C2 1-b8: ** + .byte %00001100 ; 05C3 1-b8: ** + .byte %00000110 ; 05C4 1-b8: ** .byte %00000011 ; 05C5 1-b8: ** - .byte %00000000 ; 05C6 1-b8: - .byte %00000000 ; 05C7 1-b8: + .byte %00000000 ; 05C6 1-b8: + .byte %00000000 ; 05C7 1-b8: - .byte %01100000 ; 05C8 1-b9: ** - .byte %00110000 ; 05C9 1-b9: ** - .byte %00011000 ; 05CA 1-b9: ** - .byte %00001100 ; 05CB 1-b9: ** - .byte %00000110 ; 05CC 1-b9: ** + .byte %01100000 ; 05C8 1-b9: ** + .byte %00110000 ; 05C9 1-b9: ** + .byte %00011000 ; 05CA 1-b9: ** + .byte %00001100 ; 05CB 1-b9: ** + .byte %00000110 ; 05CC 1-b9: ** .byte %00000011 ; 05CD 1-b9: ** - .byte %00000000 ; 05CE 1-b9: - .byte %00000000 ; 05CF 1-b9: + .byte %00000000 ; 05CE 1-b9: + .byte %00000000 ; 05CF 1-b9: - .byte %00111100 ; 05D0 1-ba: **** - .byte %00001100 ; 05D1 1-ba: ** - .byte %00001100 ; 05D2 1-ba: ** - .byte %00001100 ; 05D3 1-ba: ** - .byte %00001100 ; 05D4 1-ba: ** - .byte %00001100 ; 05D5 1-ba: ** - .byte %00111100 ; 05D6 1-ba: **** - .byte %00000000 ; 05D7 1-ba: + .byte %00111100 ; 05D0 1-ba: **** + .byte %00001100 ; 05D1 1-ba: ** + .byte %00001100 ; 05D2 1-ba: ** + .byte %00001100 ; 05D3 1-ba: ** + .byte %00001100 ; 05D4 1-ba: ** + .byte %00001100 ; 05D5 1-ba: ** + .byte %00111100 ; 05D6 1-ba: **** + .byte %00000000 ; 05D7 1-ba: - .byte %00111100 ; 05D8 1-bb: **** - .byte %00001100 ; 05D9 1-bb: ** - .byte %00001100 ; 05DA 1-bb: ** - .byte %00001100 ; 05DB 1-bb: ** - .byte %00001100 ; 05DC 1-bb: ** - .byte %00001100 ; 05DD 1-bb: ** - .byte %00111100 ; 05DE 1-bb: **** - .byte %00000000 ; 05DF 1-bb: + .byte %00111100 ; 05D8 1-bb: **** + .byte %00001100 ; 05D9 1-bb: ** + .byte %00001100 ; 05DA 1-bb: ** + .byte %00001100 ; 05DB 1-bb: ** + .byte %00001100 ; 05DC 1-bb: ** + .byte %00001100 ; 05DD 1-bb: ** + .byte %00111100 ; 05DE 1-bb: **** + .byte %00000000 ; 05DF 1-bb: - .byte %00000000 ; 05E0 1-bc: - .byte %00011000 ; 05E1 1-bc: ** - .byte %00111100 ; 05E2 1-bc: **** - .byte %01100110 ; 05E3 1-bc: ** ** - .byte %00000000 ; 05E4 1-bc: - .byte %00000000 ; 05E5 1-bc: - .byte %00000000 ; 05E6 1-bc: - .byte %00000000 ; 05E7 1-bc: + .byte %00000000 ; 05E0 1-bc: + .byte %00011000 ; 05E1 1-bc: ** + .byte %00111100 ; 05E2 1-bc: **** + .byte %01100110 ; 05E3 1-bc: ** ** + .byte %00000000 ; 05E4 1-bc: + .byte %00000000 ; 05E5 1-bc: + .byte %00000000 ; 05E6 1-bc: + .byte %00000000 ; 05E7 1-bc: - .byte %00000000 ; 05E8 1-bd: - .byte %00011000 ; 05E9 1-bd: ** - .byte %00111100 ; 05EA 1-bd: **** - .byte %01100110 ; 05EB 1-bd: ** ** - .byte %00000000 ; 05EC 1-bd: - .byte %00000000 ; 05ED 1-bd: - .byte %00000000 ; 05EE 1-bd: - .byte %00000000 ; 05EF 1-bd: + .byte %00000000 ; 05E8 1-bd: + .byte %00011000 ; 05E9 1-bd: ** + .byte %00111100 ; 05EA 1-bd: **** + .byte %01100110 ; 05EB 1-bd: ** ** + .byte %00000000 ; 05EC 1-bd: + .byte %00000000 ; 05ED 1-bd: + .byte %00000000 ; 05EE 1-bd: + .byte %00000000 ; 05EF 1-bd: - .byte %00000000 ; 05F0 1-be: - .byte %00000000 ; 05F1 1-be: - .byte %00000000 ; 05F2 1-be: - .byte %00000000 ; 05F3 1-be: - .byte %00000000 ; 05F4 1-be: - .byte %00000000 ; 05F5 1-be: + .byte %00000000 ; 05F0 1-be: + .byte %00000000 ; 05F1 1-be: + .byte %00000000 ; 05F2 1-be: + .byte %00000000 ; 05F3 1-be: + .byte %00000000 ; 05F4 1-be: + .byte %00000000 ; 05F5 1-be: .byte %01111111 ; 05F6 1-be: ******* - .byte %00000000 ; 05F7 1-be: + .byte %00000000 ; 05F7 1-be: - .byte %00000000 ; 05F8 1-bf: - .byte %00000000 ; 05F9 1-bf: - .byte %00000000 ; 05FA 1-bf: - .byte %00000000 ; 05FB 1-bf: - .byte %00000000 ; 05FC 1-bf: - .byte %00000000 ; 05FD 1-bf: + .byte %00000000 ; 05F8 1-bf: + .byte %00000000 ; 05F9 1-bf: + .byte %00000000 ; 05FA 1-bf: + .byte %00000000 ; 05FB 1-bf: + .byte %00000000 ; 05FC 1-bf: + .byte %00000000 ; 05FD 1-bf: .byte %01111111 ; 05FE 1-bf: ******* - .byte %00000000 ; 05FF 1-bf: + .byte %00000000 ; 05FF 1-bf: - .byte %00011000 ; 0600 1-c0: ** - .byte %00011000 ; 0601 1-c0: ** - .byte %00011000 ; 0602 1-c0: ** - .byte %00000000 ; 0603 1-c0: - .byte %00000000 ; 0604 1-c0: - .byte %00000000 ; 0605 1-c0: - .byte %00000000 ; 0606 1-c0: - .byte %00000000 ; 0607 1-c0: + .byte %00011000 ; 0600 1-c0: ** + .byte %00011000 ; 0601 1-c0: ** + .byte %00011000 ; 0602 1-c0: ** + .byte %00000000 ; 0603 1-c0: + .byte %00000000 ; 0604 1-c0: + .byte %00000000 ; 0605 1-c0: + .byte %00000000 ; 0606 1-c0: + .byte %00000000 ; 0607 1-c0: - .byte %00011000 ; 0608 1-c1: ** - .byte %00011000 ; 0609 1-c1: ** - .byte %00011000 ; 060A 1-c1: ** - .byte %00000000 ; 060B 1-c1: - .byte %00000000 ; 060C 1-c1: - .byte %00000000 ; 060D 1-c1: - .byte %00000000 ; 060E 1-c1: - .byte %00000000 ; 060F 1-c1: + .byte %00011000 ; 0608 1-c1: ** + .byte %00011000 ; 0609 1-c1: ** + .byte %00011000 ; 060A 1-c1: ** + .byte %00000000 ; 060B 1-c1: + .byte %00000000 ; 060C 1-c1: + .byte %00000000 ; 060D 1-c1: + .byte %00000000 ; 060E 1-c1: + .byte %00000000 ; 060F 1-c1: - .byte %00000000 ; 0610 1-c2: - .byte %00000000 ; 0611 1-c2: - .byte %00111100 ; 0612 1-c2: **** - .byte %00000110 ; 0613 1-c2: ** - .byte %00111110 ; 0614 1-c2: ***** - .byte %01100110 ; 0615 1-c2: ** ** - .byte %00111110 ; 0616 1-c2: ***** - .byte %00000000 ; 0617 1-c2: + .byte %00000000 ; 0610 1-c2: + .byte %00000000 ; 0611 1-c2: + .byte %00111100 ; 0612 1-c2: **** + .byte %00000110 ; 0613 1-c2: ** + .byte %00111110 ; 0614 1-c2: ***** + .byte %01100110 ; 0615 1-c2: ** ** + .byte %00111110 ; 0616 1-c2: ***** + .byte %00000000 ; 0617 1-c2: - .byte %00000000 ; 0618 1-c3: - .byte %00000000 ; 0619 1-c3: - .byte %00111100 ; 061A 1-c3: **** - .byte %00000110 ; 061B 1-c3: ** - .byte %00111110 ; 061C 1-c3: ***** - .byte %01100110 ; 061D 1-c3: ** ** - .byte %00111110 ; 061E 1-c3: ***** - .byte %00000000 ; 061F 1-c3: + .byte %00000000 ; 0618 1-c3: + .byte %00000000 ; 0619 1-c3: + .byte %00111100 ; 061A 1-c3: **** + .byte %00000110 ; 061B 1-c3: ** + .byte %00111110 ; 061C 1-c3: ***** + .byte %01100110 ; 061D 1-c3: ** ** + .byte %00111110 ; 061E 1-c3: ***** + .byte %00000000 ; 061F 1-c3: - .byte %00000000 ; 0620 1-c4: - .byte %01100000 ; 0621 1-c4: ** - .byte %01100000 ; 0622 1-c4: ** - .byte %01111100 ; 0623 1-c4: ***** - .byte %01100110 ; 0624 1-c4: ** ** - .byte %01100110 ; 0625 1-c4: ** ** - .byte %01111100 ; 0626 1-c4: ***** - .byte %00000000 ; 0627 1-c4: + .byte %00000000 ; 0620 1-c4: + .byte %01100000 ; 0621 1-c4: ** + .byte %01100000 ; 0622 1-c4: ** + .byte %01111100 ; 0623 1-c4: ***** + .byte %01100110 ; 0624 1-c4: ** ** + .byte %01100110 ; 0625 1-c4: ** ** + .byte %01111100 ; 0626 1-c4: ***** + .byte %00000000 ; 0627 1-c4: - .byte %00000000 ; 0628 1-c5: - .byte %01100000 ; 0629 1-c5: ** - .byte %01100000 ; 062A 1-c5: ** - .byte %01111100 ; 062B 1-c5: ***** - .byte %01100110 ; 062C 1-c5: ** ** - .byte %01100110 ; 062D 1-c5: ** ** - .byte %01111100 ; 062E 1-c5: ***** - .byte %00000000 ; 062F 1-c5: + .byte %00000000 ; 0628 1-c5: + .byte %01100000 ; 0629 1-c5: ** + .byte %01100000 ; 062A 1-c5: ** + .byte %01111100 ; 062B 1-c5: ***** + .byte %01100110 ; 062C 1-c5: ** ** + .byte %01100110 ; 062D 1-c5: ** ** + .byte %01111100 ; 062E 1-c5: ***** + .byte %00000000 ; 062F 1-c5: - .byte %00000000 ; 0630 1-c6: - .byte %00000000 ; 0631 1-c6: - .byte %00111100 ; 0632 1-c6: **** - .byte %01100000 ; 0633 1-c6: ** - .byte %01100000 ; 0634 1-c6: ** - .byte %01100000 ; 0635 1-c6: ** - .byte %00111100 ; 0636 1-c6: **** - .byte %00000000 ; 0637 1-c6: + .byte %00000000 ; 0630 1-c6: + .byte %00000000 ; 0631 1-c6: + .byte %00111100 ; 0632 1-c6: **** + .byte %01100000 ; 0633 1-c6: ** + .byte %01100000 ; 0634 1-c6: ** + .byte %01100000 ; 0635 1-c6: ** + .byte %00111100 ; 0636 1-c6: **** + .byte %00000000 ; 0637 1-c6: - .byte %00000000 ; 0638 1-c7: - .byte %00000000 ; 0639 1-c7: - .byte %00111100 ; 063A 1-c7: **** - .byte %01100000 ; 063B 1-c7: ** - .byte %01100000 ; 063C 1-c7: ** - .byte %01100000 ; 063D 1-c7: ** - .byte %00111100 ; 063E 1-c7: **** - .byte %00000000 ; 063F 1-c7: + .byte %00000000 ; 0638 1-c7: + .byte %00000000 ; 0639 1-c7: + .byte %00111100 ; 063A 1-c7: **** + .byte %01100000 ; 063B 1-c7: ** + .byte %01100000 ; 063C 1-c7: ** + .byte %01100000 ; 063D 1-c7: ** + .byte %00111100 ; 063E 1-c7: **** + .byte %00000000 ; 063F 1-c7: - .byte %00000000 ; 0640 1-c8: - .byte %00000110 ; 0641 1-c8: ** - .byte %00000110 ; 0642 1-c8: ** - .byte %00111110 ; 0643 1-c8: ***** - .byte %01100110 ; 0644 1-c8: ** ** - .byte %01100110 ; 0645 1-c8: ** ** - .byte %00111110 ; 0646 1-c8: ***** - .byte %00000000 ; 0647 1-c8: + .byte %00000000 ; 0640 1-c8: + .byte %00000110 ; 0641 1-c8: ** + .byte %00000110 ; 0642 1-c8: ** + .byte %00111110 ; 0643 1-c8: ***** + .byte %01100110 ; 0644 1-c8: ** ** + .byte %01100110 ; 0645 1-c8: ** ** + .byte %00111110 ; 0646 1-c8: ***** + .byte %00000000 ; 0647 1-c8: - .byte %00000000 ; 0648 1-c9: - .byte %00000110 ; 0649 1-c9: ** - .byte %00000110 ; 064A 1-c9: ** - .byte %00111110 ; 064B 1-c9: ***** - .byte %01100110 ; 064C 1-c9: ** ** - .byte %01100110 ; 064D 1-c9: ** ** - .byte %00111110 ; 064E 1-c9: ***** - .byte %00000000 ; 064F 1-c9: + .byte %00000000 ; 0648 1-c9: + .byte %00000110 ; 0649 1-c9: ** + .byte %00000110 ; 064A 1-c9: ** + .byte %00111110 ; 064B 1-c9: ***** + .byte %01100110 ; 064C 1-c9: ** ** + .byte %01100110 ; 064D 1-c9: ** ** + .byte %00111110 ; 064E 1-c9: ***** + .byte %00000000 ; 064F 1-c9: - .byte %00000000 ; 0650 1-ca: - .byte %00000000 ; 0651 1-ca: - .byte %00111100 ; 0652 1-ca: **** - .byte %01100110 ; 0653 1-ca: ** ** - .byte %01111110 ; 0654 1-ca: ****** - .byte %01100000 ; 0655 1-ca: ** - .byte %00111100 ; 0656 1-ca: **** - .byte %00000000 ; 0657 1-ca: + .byte %00000000 ; 0650 1-ca: + .byte %00000000 ; 0651 1-ca: + .byte %00111100 ; 0652 1-ca: **** + .byte %01100110 ; 0653 1-ca: ** ** + .byte %01111110 ; 0654 1-ca: ****** + .byte %01100000 ; 0655 1-ca: ** + .byte %00111100 ; 0656 1-ca: **** + .byte %00000000 ; 0657 1-ca: - .byte %00000000 ; 0658 1-cb: - .byte %00000000 ; 0659 1-cb: - .byte %00111100 ; 065A 1-cb: **** - .byte %01100110 ; 065B 1-cb: ** ** - .byte %01111110 ; 065C 1-cb: ****** - .byte %01100000 ; 065D 1-cb: ** - .byte %00111100 ; 065E 1-cb: **** - .byte %00000000 ; 065F 1-cb: + .byte %00000000 ; 0658 1-cb: + .byte %00000000 ; 0659 1-cb: + .byte %00111100 ; 065A 1-cb: **** + .byte %01100110 ; 065B 1-cb: ** ** + .byte %01111110 ; 065C 1-cb: ****** + .byte %01100000 ; 065D 1-cb: ** + .byte %00111100 ; 065E 1-cb: **** + .byte %00000000 ; 065F 1-cb: - .byte %00000000 ; 0660 1-cc: - .byte %00001110 ; 0661 1-cc: *** - .byte %00011000 ; 0662 1-cc: ** - .byte %00111110 ; 0663 1-cc: ***** - .byte %00011000 ; 0664 1-cc: ** - .byte %00011000 ; 0665 1-cc: ** - .byte %00011000 ; 0666 1-cc: ** - .byte %00000000 ; 0667 1-cc: + .byte %00000000 ; 0660 1-cc: + .byte %00001110 ; 0661 1-cc: *** + .byte %00011000 ; 0662 1-cc: ** + .byte %00111110 ; 0663 1-cc: ***** + .byte %00011000 ; 0664 1-cc: ** + .byte %00011000 ; 0665 1-cc: ** + .byte %00011000 ; 0666 1-cc: ** + .byte %00000000 ; 0667 1-cc: - .byte %00000000 ; 0668 1-cd: - .byte %00001110 ; 0669 1-cd: *** - .byte %00011000 ; 066A 1-cd: ** - .byte %00111110 ; 066B 1-cd: ***** - .byte %00011000 ; 066C 1-cd: ** - .byte %00011000 ; 066D 1-cd: ** - .byte %00011000 ; 066E 1-cd: ** - .byte %00000000 ; 066F 1-cd: + .byte %00000000 ; 0668 1-cd: + .byte %00001110 ; 0669 1-cd: *** + .byte %00011000 ; 066A 1-cd: ** + .byte %00111110 ; 066B 1-cd: ***** + .byte %00011000 ; 066C 1-cd: ** + .byte %00011000 ; 066D 1-cd: ** + .byte %00011000 ; 066E 1-cd: ** + .byte %00000000 ; 066F 1-cd: - .byte %00000000 ; 0670 1-ce: - .byte %00000000 ; 0671 1-ce: - .byte %00111110 ; 0672 1-ce: ***** - .byte %01100110 ; 0673 1-ce: ** ** - .byte %01100110 ; 0674 1-ce: ** ** - .byte %00111110 ; 0675 1-ce: ***** - .byte %00000110 ; 0676 1-ce: ** - .byte %01111100 ; 0677 1-ce: ***** + .byte %00000000 ; 0670 1-ce: + .byte %00000000 ; 0671 1-ce: + .byte %00111110 ; 0672 1-ce: ***** + .byte %01100110 ; 0673 1-ce: ** ** + .byte %01100110 ; 0674 1-ce: ** ** + .byte %00111110 ; 0675 1-ce: ***** + .byte %00000110 ; 0676 1-ce: ** + .byte %01111100 ; 0677 1-ce: ***** - .byte %00000000 ; 0678 1-cf: - .byte %00000000 ; 0679 1-cf: - .byte %00111110 ; 067A 1-cf: ***** - .byte %01100110 ; 067B 1-cf: ** ** - .byte %01100110 ; 067C 1-cf: ** ** - .byte %00111110 ; 067D 1-cf: ***** - .byte %00000110 ; 067E 1-cf: ** - .byte %01111100 ; 067F 1-cf: ***** + .byte %00000000 ; 0678 1-cf: + .byte %00000000 ; 0679 1-cf: + .byte %00111110 ; 067A 1-cf: ***** + .byte %01100110 ; 067B 1-cf: ** ** + .byte %01100110 ; 067C 1-cf: ** ** + .byte %00111110 ; 067D 1-cf: ***** + .byte %00000110 ; 067E 1-cf: ** + .byte %01111100 ; 067F 1-cf: ***** - .byte %00000000 ; 0680 1-d0: - .byte %01100000 ; 0681 1-d0: ** - .byte %01100000 ; 0682 1-d0: ** - .byte %01111100 ; 0683 1-d0: ***** - .byte %01100110 ; 0684 1-d0: ** ** - .byte %01100110 ; 0685 1-d0: ** ** - .byte %01100110 ; 0686 1-d0: ** ** - .byte %00000000 ; 0687 1-d0: + .byte %00000000 ; 0680 1-d0: + .byte %01100000 ; 0681 1-d0: ** + .byte %01100000 ; 0682 1-d0: ** + .byte %01111100 ; 0683 1-d0: ***** + .byte %01100110 ; 0684 1-d0: ** ** + .byte %01100110 ; 0685 1-d0: ** ** + .byte %01100110 ; 0686 1-d0: ** ** + .byte %00000000 ; 0687 1-d0: - .byte %00000000 ; 0688 1-d1: - .byte %01100000 ; 0689 1-d1: ** - .byte %01100000 ; 068A 1-d1: ** - .byte %01111100 ; 068B 1-d1: ***** - .byte %01100110 ; 068C 1-d1: ** ** - .byte %01100110 ; 068D 1-d1: ** ** - .byte %01100110 ; 068E 1-d1: ** ** - .byte %00000000 ; 068F 1-d1: + .byte %00000000 ; 0688 1-d1: + .byte %01100000 ; 0689 1-d1: ** + .byte %01100000 ; 068A 1-d1: ** + .byte %01111100 ; 068B 1-d1: ***** + .byte %01100110 ; 068C 1-d1: ** ** + .byte %01100110 ; 068D 1-d1: ** ** + .byte %01100110 ; 068E 1-d1: ** ** + .byte %00000000 ; 068F 1-d1: - .byte %00000000 ; 0690 1-d2: - .byte %00011000 ; 0691 1-d2: ** - .byte %00000000 ; 0692 1-d2: - .byte %00111000 ; 0693 1-d2: *** - .byte %00011000 ; 0694 1-d2: ** - .byte %00011000 ; 0695 1-d2: ** - .byte %00111100 ; 0696 1-d2: **** - .byte %00000000 ; 0697 1-d2: + .byte %00000000 ; 0690 1-d2: + .byte %00011000 ; 0691 1-d2: ** + .byte %00000000 ; 0692 1-d2: + .byte %00111000 ; 0693 1-d2: *** + .byte %00011000 ; 0694 1-d2: ** + .byte %00011000 ; 0695 1-d2: ** + .byte %00111100 ; 0696 1-d2: **** + .byte %00000000 ; 0697 1-d2: - .byte %00000000 ; 0698 1-d3: - .byte %00011000 ; 0699 1-d3: ** - .byte %00000000 ; 069A 1-d3: - .byte %00111000 ; 069B 1-d3: *** - .byte %00011000 ; 069C 1-d3: ** - .byte %00011000 ; 069D 1-d3: ** - .byte %00111100 ; 069E 1-d3: **** - .byte %00000000 ; 069F 1-d3: + .byte %00000000 ; 0698 1-d3: + .byte %00011000 ; 0699 1-d3: ** + .byte %00000000 ; 069A 1-d3: + .byte %00111000 ; 069B 1-d3: *** + .byte %00011000 ; 069C 1-d3: ** + .byte %00011000 ; 069D 1-d3: ** + .byte %00111100 ; 069E 1-d3: **** + .byte %00000000 ; 069F 1-d3: - .byte %00000000 ; 06A0 1-d4: - .byte %00000110 ; 06A1 1-d4: ** - .byte %00000000 ; 06A2 1-d4: - .byte %00000110 ; 06A3 1-d4: ** - .byte %00000110 ; 06A4 1-d4: ** - .byte %00000110 ; 06A5 1-d4: ** - .byte %00000110 ; 06A6 1-d4: ** - .byte %00111100 ; 06A7 1-d4: **** + .byte %00000000 ; 06A0 1-d4: + .byte %00000110 ; 06A1 1-d4: ** + .byte %00000000 ; 06A2 1-d4: + .byte %00000110 ; 06A3 1-d4: ** + .byte %00000110 ; 06A4 1-d4: ** + .byte %00000110 ; 06A5 1-d4: ** + .byte %00000110 ; 06A6 1-d4: ** + .byte %00111100 ; 06A7 1-d4: **** - .byte %00000000 ; 06A8 1-d5: - .byte %00000110 ; 06A9 1-d5: ** - .byte %00000000 ; 06AA 1-d5: - .byte %00000110 ; 06AB 1-d5: ** - .byte %00000110 ; 06AC 1-d5: ** - .byte %00000110 ; 06AD 1-d5: ** - .byte %00000110 ; 06AE 1-d5: ** - .byte %00111100 ; 06AF 1-d5: **** + .byte %00000000 ; 06A8 1-d5: + .byte %00000110 ; 06A9 1-d5: ** + .byte %00000000 ; 06AA 1-d5: + .byte %00000110 ; 06AB 1-d5: ** + .byte %00000110 ; 06AC 1-d5: ** + .byte %00000110 ; 06AD 1-d5: ** + .byte %00000110 ; 06AE 1-d5: ** + .byte %00111100 ; 06AF 1-d5: **** - .byte %00000000 ; 06B0 1-d6: - .byte %01100000 ; 06B1 1-d6: ** - .byte %01100000 ; 06B2 1-d6: ** - .byte %01101100 ; 06B3 1-d6: ** ** - .byte %01111000 ; 06B4 1-d6: **** - .byte %01101100 ; 06B5 1-d6: ** ** - .byte %01100110 ; 06B6 1-d6: ** ** - .byte %00000000 ; 06B7 1-d6: + .byte %00000000 ; 06B0 1-d6: + .byte %01100000 ; 06B1 1-d6: ** + .byte %01100000 ; 06B2 1-d6: ** + .byte %01101100 ; 06B3 1-d6: ** ** + .byte %01111000 ; 06B4 1-d6: **** + .byte %01101100 ; 06B5 1-d6: ** ** + .byte %01100110 ; 06B6 1-d6: ** ** + .byte %00000000 ; 06B7 1-d6: - .byte %00000000 ; 06B8 1-d7: - .byte %01100000 ; 06B9 1-d7: ** - .byte %01100000 ; 06BA 1-d7: ** - .byte %01101100 ; 06BB 1-d7: ** ** - .byte %01111000 ; 06BC 1-d7: **** - .byte %01101100 ; 06BD 1-d7: ** ** - .byte %01100110 ; 06BE 1-d7: ** ** - .byte %00000000 ; 06BF 1-d7: + .byte %00000000 ; 06B8 1-d7: + .byte %01100000 ; 06B9 1-d7: ** + .byte %01100000 ; 06BA 1-d7: ** + .byte %01101100 ; 06BB 1-d7: ** ** + .byte %01111000 ; 06BC 1-d7: **** + .byte %01101100 ; 06BD 1-d7: ** ** + .byte %01100110 ; 06BE 1-d7: ** ** + .byte %00000000 ; 06BF 1-d7: - .byte %00000000 ; 06C0 1-d8: - .byte %00111000 ; 06C1 1-d8: *** - .byte %00011000 ; 06C2 1-d8: ** - .byte %00011000 ; 06C3 1-d8: ** - .byte %00011000 ; 06C4 1-d8: ** - .byte %00011000 ; 06C5 1-d8: ** - .byte %00111100 ; 06C6 1-d8: **** - .byte %00000000 ; 06C7 1-d8: + .byte %00000000 ; 06C0 1-d8: + .byte %00111000 ; 06C1 1-d8: *** + .byte %00011000 ; 06C2 1-d8: ** + .byte %00011000 ; 06C3 1-d8: ** + .byte %00011000 ; 06C4 1-d8: ** + .byte %00011000 ; 06C5 1-d8: ** + .byte %00111100 ; 06C6 1-d8: **** + .byte %00000000 ; 06C7 1-d8: - .byte %00000000 ; 06C8 1-d9: - .byte %00111000 ; 06C9 1-d9: *** - .byte %00011000 ; 06CA 1-d9: ** - .byte %00011000 ; 06CB 1-d9: ** - .byte %00011000 ; 06CC 1-d9: ** - .byte %00011000 ; 06CD 1-d9: ** - .byte %00111100 ; 06CE 1-d9: **** - .byte %00000000 ; 06CF 1-d9: + .byte %00000000 ; 06C8 1-d9: + .byte %00111000 ; 06C9 1-d9: *** + .byte %00011000 ; 06CA 1-d9: ** + .byte %00011000 ; 06CB 1-d9: ** + .byte %00011000 ; 06CC 1-d9: ** + .byte %00011000 ; 06CD 1-d9: ** + .byte %00111100 ; 06CE 1-d9: **** + .byte %00000000 ; 06CF 1-d9: - .byte %00000000 ; 06D0 1-da: - .byte %00000000 ; 06D1 1-da: - .byte %01100110 ; 06D2 1-da: ** ** + .byte %00000000 ; 06D0 1-da: + .byte %00000000 ; 06D1 1-da: + .byte %01100110 ; 06D2 1-da: ** ** .byte %01111111 ; 06D3 1-da: ******* .byte %01111111 ; 06D4 1-da: ******* .byte %01101011 ; 06D5 1-da: ** * ** .byte %01100011 ; 06D6 1-da: ** ** - .byte %00000000 ; 06D7 1-da: + .byte %00000000 ; 06D7 1-da: - .byte %00000000 ; 06D8 1-db: - .byte %00000000 ; 06D9 1-db: - .byte %01100110 ; 06DA 1-db: ** ** + .byte %00000000 ; 06D8 1-db: + .byte %00000000 ; 06D9 1-db: + .byte %01100110 ; 06DA 1-db: ** ** .byte %01111111 ; 06DB 1-db: ******* .byte %01111111 ; 06DC 1-db: ******* .byte %01101011 ; 06DD 1-db: ** * ** .byte %01100011 ; 06DE 1-db: ** ** - .byte %00000000 ; 06DF 1-db: + .byte %00000000 ; 06DF 1-db: - .byte %00000000 ; 06E0 1-dc: - .byte %00000000 ; 06E1 1-dc: - .byte %01111100 ; 06E2 1-dc: ***** - .byte %01100110 ; 06E3 1-dc: ** ** - .byte %01100110 ; 06E4 1-dc: ** ** - .byte %01100110 ; 06E5 1-dc: ** ** - .byte %01100110 ; 06E6 1-dc: ** ** - .byte %00000000 ; 06E7 1-dc: + .byte %00000000 ; 06E0 1-dc: + .byte %00000000 ; 06E1 1-dc: + .byte %01111100 ; 06E2 1-dc: ***** + .byte %01100110 ; 06E3 1-dc: ** ** + .byte %01100110 ; 06E4 1-dc: ** ** + .byte %01100110 ; 06E5 1-dc: ** ** + .byte %01100110 ; 06E6 1-dc: ** ** + .byte %00000000 ; 06E7 1-dc: - .byte %00000000 ; 06E8 1-dd: - .byte %00000000 ; 06E9 1-dd: - .byte %01111100 ; 06EA 1-dd: ***** - .byte %01100110 ; 06EB 1-dd: ** ** - .byte %01100110 ; 06EC 1-dd: ** ** - .byte %01100110 ; 06ED 1-dd: ** ** - .byte %01100110 ; 06EE 1-dd: ** ** - .byte %00000000 ; 06EF 1-dd: + .byte %00000000 ; 06E8 1-dd: + .byte %00000000 ; 06E9 1-dd: + .byte %01111100 ; 06EA 1-dd: ***** + .byte %01100110 ; 06EB 1-dd: ** ** + .byte %01100110 ; 06EC 1-dd: ** ** + .byte %01100110 ; 06ED 1-dd: ** ** + .byte %01100110 ; 06EE 1-dd: ** ** + .byte %00000000 ; 06EF 1-dd: - .byte %00000000 ; 06F0 1-de: - .byte %00000000 ; 06F1 1-de: - .byte %00111100 ; 06F2 1-de: **** - .byte %01100110 ; 06F3 1-de: ** ** - .byte %01100110 ; 06F4 1-de: ** ** - .byte %01100110 ; 06F5 1-de: ** ** - .byte %00111100 ; 06F6 1-de: **** - .byte %00000000 ; 06F7 1-de: + .byte %00000000 ; 06F0 1-de: + .byte %00000000 ; 06F1 1-de: + .byte %00111100 ; 06F2 1-de: **** + .byte %01100110 ; 06F3 1-de: ** ** + .byte %01100110 ; 06F4 1-de: ** ** + .byte %01100110 ; 06F5 1-de: ** ** + .byte %00111100 ; 06F6 1-de: **** + .byte %00000000 ; 06F7 1-de: - .byte %00000000 ; 06F8 1-df: - .byte %00000000 ; 06F9 1-df: - .byte %00111100 ; 06FA 1-df: **** - .byte %01100110 ; 06FB 1-df: ** ** - .byte %01100110 ; 06FC 1-df: ** ** - .byte %01100110 ; 06FD 1-df: ** ** - .byte %00111100 ; 06FE 1-df: **** - .byte %00000000 ; 06FF 1-df: + .byte %00000000 ; 06F8 1-df: + .byte %00000000 ; 06F9 1-df: + .byte %00111100 ; 06FA 1-df: **** + .byte %01100110 ; 06FB 1-df: ** ** + .byte %01100110 ; 06FC 1-df: ** ** + .byte %01100110 ; 06FD 1-df: ** ** + .byte %00111100 ; 06FE 1-df: **** + .byte %00000000 ; 06FF 1-df: - .byte %00000000 ; 0700 1-e0: - .byte %00000000 ; 0701 1-e0: - .byte %01111100 ; 0702 1-e0: ***** - .byte %01100110 ; 0703 1-e0: ** ** - .byte %01100110 ; 0704 1-e0: ** ** - .byte %01111100 ; 0705 1-e0: ***** - .byte %01100000 ; 0706 1-e0: ** - .byte %01100000 ; 0707 1-e0: ** + .byte %00000000 ; 0700 1-e0: + .byte %00000000 ; 0701 1-e0: + .byte %01111100 ; 0702 1-e0: ***** + .byte %01100110 ; 0703 1-e0: ** ** + .byte %01100110 ; 0704 1-e0: ** ** + .byte %01111100 ; 0705 1-e0: ***** + .byte %01100000 ; 0706 1-e0: ** + .byte %01100000 ; 0707 1-e0: ** - .byte %00000000 ; 0708 1-e1: - .byte %00000000 ; 0709 1-e1: - .byte %01111100 ; 070A 1-e1: ***** - .byte %01100110 ; 070B 1-e1: ** ** - .byte %01100110 ; 070C 1-e1: ** ** - .byte %01111100 ; 070D 1-e1: ***** - .byte %01100000 ; 070E 1-e1: ** - .byte %01100000 ; 070F 1-e1: ** + .byte %00000000 ; 0708 1-e1: + .byte %00000000 ; 0709 1-e1: + .byte %01111100 ; 070A 1-e1: ***** + .byte %01100110 ; 070B 1-e1: ** ** + .byte %01100110 ; 070C 1-e1: ** ** + .byte %01111100 ; 070D 1-e1: ***** + .byte %01100000 ; 070E 1-e1: ** + .byte %01100000 ; 070F 1-e1: ** - .byte %00000000 ; 0710 1-e2: - .byte %00000000 ; 0711 1-e2: - .byte %00111110 ; 0712 1-e2: ***** - .byte %01100110 ; 0713 1-e2: ** ** - .byte %01100110 ; 0714 1-e2: ** ** - .byte %00111110 ; 0715 1-e2: ***** - .byte %00000110 ; 0716 1-e2: ** - .byte %00000110 ; 0717 1-e2: ** + .byte %00000000 ; 0710 1-e2: + .byte %00000000 ; 0711 1-e2: + .byte %00111110 ; 0712 1-e2: ***** + .byte %01100110 ; 0713 1-e2: ** ** + .byte %01100110 ; 0714 1-e2: ** ** + .byte %00111110 ; 0715 1-e2: ***** + .byte %00000110 ; 0716 1-e2: ** + .byte %00000110 ; 0717 1-e2: ** - .byte %00000000 ; 0718 1-e3: - .byte %00000000 ; 0719 1-e3: - .byte %00111110 ; 071A 1-e3: ***** - .byte %01100110 ; 071B 1-e3: ** ** - .byte %01100110 ; 071C 1-e3: ** ** - .byte %00111110 ; 071D 1-e3: ***** - .byte %00000110 ; 071E 1-e3: ** - .byte %00000110 ; 071F 1-e3: ** + .byte %00000000 ; 0718 1-e3: + .byte %00000000 ; 0719 1-e3: + .byte %00111110 ; 071A 1-e3: ***** + .byte %01100110 ; 071B 1-e3: ** ** + .byte %01100110 ; 071C 1-e3: ** ** + .byte %00111110 ; 071D 1-e3: ***** + .byte %00000110 ; 071E 1-e3: ** + .byte %00000110 ; 071F 1-e3: ** - .byte %00000000 ; 0720 1-e4: - .byte %00000000 ; 0721 1-e4: - .byte %01111100 ; 0722 1-e4: ***** - .byte %01100110 ; 0723 1-e4: ** ** - .byte %01100000 ; 0724 1-e4: ** - .byte %01100000 ; 0725 1-e4: ** - .byte %01100000 ; 0726 1-e4: ** - .byte %00000000 ; 0727 1-e4: + .byte %00000000 ; 0720 1-e4: + .byte %00000000 ; 0721 1-e4: + .byte %01111100 ; 0722 1-e4: ***** + .byte %01100110 ; 0723 1-e4: ** ** + .byte %01100000 ; 0724 1-e4: ** + .byte %01100000 ; 0725 1-e4: ** + .byte %01100000 ; 0726 1-e4: ** + .byte %00000000 ; 0727 1-e4: - .byte %00000000 ; 0728 1-e5: - .byte %00000000 ; 0729 1-e5: - .byte %01111100 ; 072A 1-e5: ***** - .byte %01100110 ; 072B 1-e5: ** ** - .byte %01100000 ; 072C 1-e5: ** - .byte %01100000 ; 072D 1-e5: ** - .byte %01100000 ; 072E 1-e5: ** - .byte %00000000 ; 072F 1-e5: + .byte %00000000 ; 0728 1-e5: + .byte %00000000 ; 0729 1-e5: + .byte %01111100 ; 072A 1-e5: ***** + .byte %01100110 ; 072B 1-e5: ** ** + .byte %01100000 ; 072C 1-e5: ** + .byte %01100000 ; 072D 1-e5: ** + .byte %01100000 ; 072E 1-e5: ** + .byte %00000000 ; 072F 1-e5: - .byte %00000000 ; 0730 1-e6: - .byte %00000000 ; 0731 1-e6: - .byte %00111110 ; 0732 1-e6: ***** - .byte %01100000 ; 0733 1-e6: ** - .byte %00111100 ; 0734 1-e6: **** - .byte %00000110 ; 0735 1-e6: ** - .byte %01111100 ; 0736 1-e6: ***** - .byte %00000000 ; 0737 1-e6: + .byte %00000000 ; 0730 1-e6: + .byte %00000000 ; 0731 1-e6: + .byte %00111110 ; 0732 1-e6: ***** + .byte %01100000 ; 0733 1-e6: ** + .byte %00111100 ; 0734 1-e6: **** + .byte %00000110 ; 0735 1-e6: ** + .byte %01111100 ; 0736 1-e6: ***** + .byte %00000000 ; 0737 1-e6: - .byte %00000000 ; 0738 1-e7: - .byte %00000000 ; 0739 1-e7: - .byte %00111110 ; 073A 1-e7: ***** - .byte %01100000 ; 073B 1-e7: ** - .byte %00111100 ; 073C 1-e7: **** - .byte %00000110 ; 073D 1-e7: ** - .byte %01111100 ; 073E 1-e7: ***** - .byte %00000000 ; 073F 1-e7: + .byte %00000000 ; 0738 1-e7: + .byte %00000000 ; 0739 1-e7: + .byte %00111110 ; 073A 1-e7: ***** + .byte %01100000 ; 073B 1-e7: ** + .byte %00111100 ; 073C 1-e7: **** + .byte %00000110 ; 073D 1-e7: ** + .byte %01111100 ; 073E 1-e7: ***** + .byte %00000000 ; 073F 1-e7: - .byte %00000000 ; 0740 1-e8: - .byte %00011000 ; 0741 1-e8: ** - .byte %01111110 ; 0742 1-e8: ****** - .byte %00011000 ; 0743 1-e8: ** - .byte %00011000 ; 0744 1-e8: ** - .byte %00011000 ; 0745 1-e8: ** - .byte %00001110 ; 0746 1-e8: *** - .byte %00000000 ; 0747 1-e8: + .byte %00000000 ; 0740 1-e8: + .byte %00011000 ; 0741 1-e8: ** + .byte %01111110 ; 0742 1-e8: ****** + .byte %00011000 ; 0743 1-e8: ** + .byte %00011000 ; 0744 1-e8: ** + .byte %00011000 ; 0745 1-e8: ** + .byte %00001110 ; 0746 1-e8: *** + .byte %00000000 ; 0747 1-e8: - .byte %00000000 ; 0748 1-e9: - .byte %00011000 ; 0749 1-e9: ** - .byte %01111110 ; 074A 1-e9: ****** - .byte %00011000 ; 074B 1-e9: ** - .byte %00011000 ; 074C 1-e9: ** - .byte %00011000 ; 074D 1-e9: ** - .byte %00001110 ; 074E 1-e9: *** - .byte %00000000 ; 074F 1-e9: + .byte %00000000 ; 0748 1-e9: + .byte %00011000 ; 0749 1-e9: ** + .byte %01111110 ; 074A 1-e9: ****** + .byte %00011000 ; 074B 1-e9: ** + .byte %00011000 ; 074C 1-e9: ** + .byte %00011000 ; 074D 1-e9: ** + .byte %00001110 ; 074E 1-e9: *** + .byte %00000000 ; 074F 1-e9: - .byte %00000000 ; 0750 1-ea: - .byte %00000000 ; 0751 1-ea: - .byte %01100110 ; 0752 1-ea: ** ** - .byte %01100110 ; 0753 1-ea: ** ** - .byte %01100110 ; 0754 1-ea: ** ** - .byte %01100110 ; 0755 1-ea: ** ** - .byte %00111110 ; 0756 1-ea: ***** - .byte %00000000 ; 0757 1-ea: + .byte %00000000 ; 0750 1-ea: + .byte %00000000 ; 0751 1-ea: + .byte %01100110 ; 0752 1-ea: ** ** + .byte %01100110 ; 0753 1-ea: ** ** + .byte %01100110 ; 0754 1-ea: ** ** + .byte %01100110 ; 0755 1-ea: ** ** + .byte %00111110 ; 0756 1-ea: ***** + .byte %00000000 ; 0757 1-ea: - .byte %00000000 ; 0758 1-eb: - .byte %00000000 ; 0759 1-eb: - .byte %01100110 ; 075A 1-eb: ** ** - .byte %01100110 ; 075B 1-eb: ** ** - .byte %01100110 ; 075C 1-eb: ** ** - .byte %01100110 ; 075D 1-eb: ** ** - .byte %00111110 ; 075E 1-eb: ***** - .byte %00000000 ; 075F 1-eb: + .byte %00000000 ; 0758 1-eb: + .byte %00000000 ; 0759 1-eb: + .byte %01100110 ; 075A 1-eb: ** ** + .byte %01100110 ; 075B 1-eb: ** ** + .byte %01100110 ; 075C 1-eb: ** ** + .byte %01100110 ; 075D 1-eb: ** ** + .byte %00111110 ; 075E 1-eb: ***** + .byte %00000000 ; 075F 1-eb: - .byte %00000000 ; 0760 1-ec: - .byte %00000000 ; 0761 1-ec: - .byte %01100110 ; 0762 1-ec: ** ** - .byte %01100110 ; 0763 1-ec: ** ** - .byte %01100110 ; 0764 1-ec: ** ** - .byte %00111100 ; 0765 1-ec: **** - .byte %00011000 ; 0766 1-ec: ** - .byte %00000000 ; 0767 1-ec: + .byte %00000000 ; 0760 1-ec: + .byte %00000000 ; 0761 1-ec: + .byte %01100110 ; 0762 1-ec: ** ** + .byte %01100110 ; 0763 1-ec: ** ** + .byte %01100110 ; 0764 1-ec: ** ** + .byte %00111100 ; 0765 1-ec: **** + .byte %00011000 ; 0766 1-ec: ** + .byte %00000000 ; 0767 1-ec: - .byte %00000000 ; 0768 1-ed: - .byte %00000000 ; 0769 1-ed: - .byte %01100110 ; 076A 1-ed: ** ** - .byte %01100110 ; 076B 1-ed: ** ** - .byte %01100110 ; 076C 1-ed: ** ** - .byte %00111100 ; 076D 1-ed: **** - .byte %00011000 ; 076E 1-ed: ** - .byte %00000000 ; 076F 1-ed: + .byte %00000000 ; 0768 1-ed: + .byte %00000000 ; 0769 1-ed: + .byte %01100110 ; 076A 1-ed: ** ** + .byte %01100110 ; 076B 1-ed: ** ** + .byte %01100110 ; 076C 1-ed: ** ** + .byte %00111100 ; 076D 1-ed: **** + .byte %00011000 ; 076E 1-ed: ** + .byte %00000000 ; 076F 1-ed: - .byte %00000000 ; 0770 1-ee: - .byte %00000000 ; 0771 1-ee: + .byte %00000000 ; 0770 1-ee: + .byte %00000000 ; 0771 1-ee: .byte %01100011 ; 0772 1-ee: ** ** .byte %01101011 ; 0773 1-ee: ** * ** .byte %01111111 ; 0774 1-ee: ******* - .byte %00111110 ; 0775 1-ee: ***** - .byte %00110110 ; 0776 1-ee: ** ** - .byte %00000000 ; 0777 1-ee: + .byte %00111110 ; 0775 1-ee: ***** + .byte %00110110 ; 0776 1-ee: ** ** + .byte %00000000 ; 0777 1-ee: - .byte %00000000 ; 0778 1-ef: - .byte %00000000 ; 0779 1-ef: + .byte %00000000 ; 0778 1-ef: + .byte %00000000 ; 0779 1-ef: .byte %01100011 ; 077A 1-ef: ** ** .byte %01101011 ; 077B 1-ef: ** * ** .byte %01111111 ; 077C 1-ef: ******* - .byte %00111110 ; 077D 1-ef: ***** - .byte %00110110 ; 077E 1-ef: ** ** - .byte %00000000 ; 077F 1-ef: + .byte %00111110 ; 077D 1-ef: ***** + .byte %00110110 ; 077E 1-ef: ** ** + .byte %00000000 ; 077F 1-ef: - .byte %00000000 ; 0780 1-f0: - .byte %00000000 ; 0781 1-f0: - .byte %01100110 ; 0782 1-f0: ** ** - .byte %00111100 ; 0783 1-f0: **** - .byte %00011000 ; 0784 1-f0: ** - .byte %00111100 ; 0785 1-f0: **** - .byte %01100110 ; 0786 1-f0: ** ** - .byte %00000000 ; 0787 1-f0: + .byte %00000000 ; 0780 1-f0: + .byte %00000000 ; 0781 1-f0: + .byte %01100110 ; 0782 1-f0: ** ** + .byte %00111100 ; 0783 1-f0: **** + .byte %00011000 ; 0784 1-f0: ** + .byte %00111100 ; 0785 1-f0: **** + .byte %01100110 ; 0786 1-f0: ** ** + .byte %00000000 ; 0787 1-f0: - .byte %00000000 ; 0788 1-f1: - .byte %00000000 ; 0789 1-f1: - .byte %01100110 ; 078A 1-f1: ** ** - .byte %00111100 ; 078B 1-f1: **** - .byte %00011000 ; 078C 1-f1: ** - .byte %00111100 ; 078D 1-f1: **** - .byte %01100110 ; 078E 1-f1: ** ** - .byte %00000000 ; 078F 1-f1: + .byte %00000000 ; 0788 1-f1: + .byte %00000000 ; 0789 1-f1: + .byte %01100110 ; 078A 1-f1: ** ** + .byte %00111100 ; 078B 1-f1: **** + .byte %00011000 ; 078C 1-f1: ** + .byte %00111100 ; 078D 1-f1: **** + .byte %01100110 ; 078E 1-f1: ** ** + .byte %00000000 ; 078F 1-f1: - .byte %00000000 ; 0790 1-f2: - .byte %00000000 ; 0791 1-f2: - .byte %01100110 ; 0792 1-f2: ** ** - .byte %01100110 ; 0793 1-f2: ** ** - .byte %01100110 ; 0794 1-f2: ** ** - .byte %00111110 ; 0795 1-f2: ***** - .byte %00001100 ; 0796 1-f2: ** - .byte %01111000 ; 0797 1-f2: **** + .byte %00000000 ; 0790 1-f2: + .byte %00000000 ; 0791 1-f2: + .byte %01100110 ; 0792 1-f2: ** ** + .byte %01100110 ; 0793 1-f2: ** ** + .byte %01100110 ; 0794 1-f2: ** ** + .byte %00111110 ; 0795 1-f2: ***** + .byte %00001100 ; 0796 1-f2: ** + .byte %01111000 ; 0797 1-f2: **** - .byte %00000000 ; 0798 1-f3: - .byte %00000000 ; 0799 1-f3: - .byte %01100110 ; 079A 1-f3: ** ** - .byte %01100110 ; 079B 1-f3: ** ** - .byte %01100110 ; 079C 1-f3: ** ** - .byte %00111110 ; 079D 1-f3: ***** - .byte %00001100 ; 079E 1-f3: ** - .byte %01111000 ; 079F 1-f3: **** + .byte %00000000 ; 0798 1-f3: + .byte %00000000 ; 0799 1-f3: + .byte %01100110 ; 079A 1-f3: ** ** + .byte %01100110 ; 079B 1-f3: ** ** + .byte %01100110 ; 079C 1-f3: ** ** + .byte %00111110 ; 079D 1-f3: ***** + .byte %00001100 ; 079E 1-f3: ** + .byte %01111000 ; 079F 1-f3: **** - .byte %00000000 ; 07A0 1-f4: - .byte %00000000 ; 07A1 1-f4: - .byte %01111110 ; 07A2 1-f4: ****** - .byte %00001100 ; 07A3 1-f4: ** - .byte %00011000 ; 07A4 1-f4: ** - .byte %00110000 ; 07A5 1-f4: ** - .byte %01111110 ; 07A6 1-f4: ****** - .byte %00000000 ; 07A7 1-f4: + .byte %00000000 ; 07A0 1-f4: + .byte %00000000 ; 07A1 1-f4: + .byte %01111110 ; 07A2 1-f4: ****** + .byte %00001100 ; 07A3 1-f4: ** + .byte %00011000 ; 07A4 1-f4: ** + .byte %00110000 ; 07A5 1-f4: ** + .byte %01111110 ; 07A6 1-f4: ****** + .byte %00000000 ; 07A7 1-f4: - .byte %00000000 ; 07A8 1-f5: - .byte %00000000 ; 07A9 1-f5: - .byte %01111110 ; 07AA 1-f5: ****** - .byte %00001100 ; 07AB 1-f5: ** - .byte %00011000 ; 07AC 1-f5: ** - .byte %00110000 ; 07AD 1-f5: ** - .byte %01111110 ; 07AE 1-f5: ****** - .byte %00000000 ; 07AF 1-f5: + .byte %00000000 ; 07A8 1-f5: + .byte %00000000 ; 07A9 1-f5: + .byte %01111110 ; 07AA 1-f5: ****** + .byte %00001100 ; 07AB 1-f5: ** + .byte %00011000 ; 07AC 1-f5: ** + .byte %00110000 ; 07AD 1-f5: ** + .byte %01111110 ; 07AE 1-f5: ****** + .byte %00000000 ; 07AF 1-f5: - .byte %00011100 ; 07B0 1-f6: *** - .byte %00110000 ; 07B1 1-f6: ** - .byte %00011000 ; 07B2 1-f6: ** - .byte %01110000 ; 07B3 1-f6: *** - .byte %00011000 ; 07B4 1-f6: ** - .byte %00110000 ; 07B5 1-f6: ** - .byte %00011100 ; 07B6 1-f6: *** - .byte %00000000 ; 07B7 1-f6: + .byte %00011100 ; 07B0 1-f6: *** + .byte %00110000 ; 07B1 1-f6: ** + .byte %00011000 ; 07B2 1-f6: ** + .byte %01110000 ; 07B3 1-f6: *** + .byte %00011000 ; 07B4 1-f6: ** + .byte %00110000 ; 07B5 1-f6: ** + .byte %00011100 ; 07B6 1-f6: *** + .byte %00000000 ; 07B7 1-f6: - .byte %00011100 ; 07B8 1-f7: *** - .byte %00110000 ; 07B9 1-f7: ** - .byte %00011000 ; 07BA 1-f7: ** - .byte %01110000 ; 07BB 1-f7: *** - .byte %00011000 ; 07BC 1-f7: ** - .byte %00110000 ; 07BD 1-f7: ** - .byte %00011100 ; 07BE 1-f7: *** - .byte %00000000 ; 07BF 1-f7: + .byte %00011100 ; 07B8 1-f7: *** + .byte %00110000 ; 07B9 1-f7: ** + .byte %00011000 ; 07BA 1-f7: ** + .byte %01110000 ; 07BB 1-f7: *** + .byte %00011000 ; 07BC 1-f7: ** + .byte %00110000 ; 07BD 1-f7: ** + .byte %00011100 ; 07BE 1-f7: *** + .byte %00000000 ; 07BF 1-f7: - .byte %00011000 ; 07C0 1-f8: ** - .byte %00011000 ; 07C1 1-f8: ** - .byte %00011000 ; 07C2 1-f8: ** - .byte %00000000 ; 07C3 1-f8: - .byte %00000000 ; 07C4 1-f8: - .byte %00011000 ; 07C5 1-f8: ** - .byte %00011000 ; 07C6 1-f8: ** - .byte %00011000 ; 07C7 1-f8: ** + .byte %00011000 ; 07C0 1-f8: ** + .byte %00011000 ; 07C1 1-f8: ** + .byte %00011000 ; 07C2 1-f8: ** + .byte %00000000 ; 07C3 1-f8: + .byte %00000000 ; 07C4 1-f8: + .byte %00011000 ; 07C5 1-f8: ** + .byte %00011000 ; 07C6 1-f8: ** + .byte %00011000 ; 07C7 1-f8: ** - .byte %00011000 ; 07C8 1-f9: ** - .byte %00011000 ; 07C9 1-f9: ** - .byte %00011000 ; 07CA 1-f9: ** - .byte %00000000 ; 07CB 1-f9: - .byte %00000000 ; 07CC 1-f9: - .byte %00011000 ; 07CD 1-f9: ** - .byte %00011000 ; 07CE 1-f9: ** - .byte %00011000 ; 07CF 1-f9: ** + .byte %00011000 ; 07C8 1-f9: ** + .byte %00011000 ; 07C9 1-f9: ** + .byte %00011000 ; 07CA 1-f9: ** + .byte %00000000 ; 07CB 1-f9: + .byte %00000000 ; 07CC 1-f9: + .byte %00011000 ; 07CD 1-f9: ** + .byte %00011000 ; 07CE 1-f9: ** + .byte %00011000 ; 07CF 1-f9: ** - .byte %00111000 ; 07D0 1-fa: *** - .byte %00001100 ; 07D1 1-fa: ** - .byte %00011000 ; 07D2 1-fa: ** - .byte %00001110 ; 07D3 1-fa: *** - .byte %00011000 ; 07D4 1-fa: ** - .byte %00001100 ; 07D5 1-fa: ** - .byte %00111000 ; 07D6 1-fa: *** - .byte %00000000 ; 07D7 1-fa: + .byte %00111000 ; 07D0 1-fa: *** + .byte %00001100 ; 07D1 1-fa: ** + .byte %00011000 ; 07D2 1-fa: ** + .byte %00001110 ; 07D3 1-fa: *** + .byte %00011000 ; 07D4 1-fa: ** + .byte %00001100 ; 07D5 1-fa: ** + .byte %00111000 ; 07D6 1-fa: *** + .byte %00000000 ; 07D7 1-fa: - .byte %00111000 ; 07D8 1-fb: *** - .byte %00001100 ; 07D9 1-fb: ** - .byte %00011000 ; 07DA 1-fb: ** - .byte %00001110 ; 07DB 1-fb: *** - .byte %00011000 ; 07DC 1-fb: ** - .byte %00001100 ; 07DD 1-fb: ** - .byte %00111000 ; 07DE 1-fb: *** - .byte %00000000 ; 07DF 1-fb: + .byte %00111000 ; 07D8 1-fb: *** + .byte %00001100 ; 07D9 1-fb: ** + .byte %00011000 ; 07DA 1-fb: ** + .byte %00001110 ; 07DB 1-fb: *** + .byte %00011000 ; 07DC 1-fb: ** + .byte %00001100 ; 07DD 1-fb: ** + .byte %00111000 ; 07DE 1-fb: *** + .byte %00000000 ; 07DF 1-fb: .byte %00110011 ; 07E0 1-fc: ** ** .byte %11111111 ; 07E1 1-fc: ******** - .byte %11001100 ; 07E2 1-fc: ** ** - .byte %00000000 ; 07E3 1-fc: - .byte %00000000 ; 07E4 1-fc: - .byte %00000000 ; 07E5 1-fc: - .byte %00000000 ; 07E6 1-fc: - .byte %00000000 ; 07E7 1-fc: + .byte %11001100 ; 07E2 1-fc: ** ** + .byte %00000000 ; 07E3 1-fc: + .byte %00000000 ; 07E4 1-fc: + .byte %00000000 ; 07E5 1-fc: + .byte %00000000 ; 07E6 1-fc: + .byte %00000000 ; 07E7 1-fc: .byte %00110011 ; 07E8 1-fd: ** ** .byte %11111111 ; 07E9 1-fd: ******** - .byte %11001100 ; 07EA 1-fd: ** ** - .byte %00000000 ; 07EB 1-fd: - .byte %00000000 ; 07EC 1-fd: - .byte %00000000 ; 07ED 1-fd: - .byte %00000000 ; 07EE 1-fd: - .byte %00000000 ; 07EF 1-fd: + .byte %11001100 ; 07EA 1-fd: ** ** + .byte %00000000 ; 07EB 1-fd: + .byte %00000000 ; 07EC 1-fd: + .byte %00000000 ; 07ED 1-fd: + .byte %00000000 ; 07EE 1-fd: + .byte %00000000 ; 07EF 1-fd: - .byte %00000000 ; 07F0 1-fe: - .byte %00000000 ; 07F1 1-fe: - .byte %00000000 ; 07F2 1-fe: - .byte %00000000 ; 07F3 1-fe: - .byte %00000000 ; 07F4 1-fe: - .byte %00000000 ; 07F5 1-fe: - .byte %00000000 ; 07F6 1-fe: - .byte %00000000 ; 07F7 1-fe: + .byte %00000000 ; 07F0 1-fe: + .byte %00000000 ; 07F1 1-fe: + .byte %00000000 ; 07F2 1-fe: + .byte %00000000 ; 07F3 1-fe: + .byte %00000000 ; 07F4 1-fe: + .byte %00000000 ; 07F5 1-fe: + .byte %00000000 ; 07F6 1-fe: + .byte %00000000 ; 07F7 1-fe: - .byte %00000000 ; 07F8 1-ff: - .byte %00000000 ; 07F9 1-ff: - .byte %00000000 ; 07FA 1-ff: - .byte %00000000 ; 07FB 1-ff: - .byte %00000000 ; 07FC 1-ff: - .byte %00000000 ; 07FD 1-ff: - .byte %00000000 ; 07FE 1-ff: - .byte %00000000 ; 07FF 1-ff: + .byte %00000000 ; 07F8 1-ff: + .byte %00000000 ; 07F9 1-ff: + .byte %00000000 ; 07FA 1-ff: + .byte %00000000 ; 07FB 1-ff: + .byte %00000000 ; 07FC 1-ff: + .byte %00000000 ; 07FD 1-ff: + .byte %00000000 ; 07FE 1-ff: + .byte %00000000 ; 07FF 1-ff: .byte %11111111 ; 0800 2-00: ******** .byte %11111111 ; 0801 2-00: ******** @@ -2322,21 +2331,21 @@ .byte %00110011 ; 0810 2-02: ** ** .byte %00110011 ; 0811 2-02: ** ** - .byte %11001100 ; 0812 2-02: ** ** - .byte %11001100 ; 0813 2-02: ** ** + .byte %11001100 ; 0812 2-02: ** ** + .byte %11001100 ; 0813 2-02: ** ** .byte %00110011 ; 0814 2-02: ** ** .byte %00110011 ; 0815 2-02: ** ** - .byte %11001100 ; 0816 2-02: ** ** - .byte %11001100 ; 0817 2-02: ** ** + .byte %11001100 ; 0816 2-02: ** ** + .byte %11001100 ; 0817 2-02: ** ** .byte %00110011 ; 0818 2-03: ** ** .byte %00110011 ; 0819 2-03: ** ** - .byte %11001100 ; 081A 2-03: ** ** - .byte %11001100 ; 081B 2-03: ** ** + .byte %11001100 ; 081A 2-03: ** ** + .byte %11001100 ; 081B 2-03: ** ** .byte %00110011 ; 081C 2-03: ** ** .byte %00110011 ; 081D 2-03: ** ** - .byte %11001100 ; 081E 2-03: ** ** - .byte %11001100 ; 081F 2-03: ** ** + .byte %11001100 ; 081E 2-03: ** ** + .byte %11001100 ; 081F 2-03: ** ** .byte %11111111 ; 0820 2-04: ******** .byte %11100111 ; 0821 2-04: *** *** @@ -2359,8 +2368,8 @@ .byte %11111111 ; 0830 2-06: ******** .byte %11101111 ; 0831 2-06: *** **** .byte %11001111 ; 0832 2-06: ** **** - .byte %10000000 ; 0833 2-06: * - .byte %10000000 ; 0834 2-06: * + .byte %10000000 ; 0833 2-06: * + .byte %10000000 ; 0834 2-06: * .byte %11001111 ; 0835 2-06: ** **** .byte %11101111 ; 0836 2-06: *** **** .byte %11111111 ; 0837 2-06: ******** @@ -2368,8 +2377,8 @@ .byte %11111111 ; 0838 2-07: ******** .byte %11101111 ; 0839 2-07: *** **** .byte %11001111 ; 083A 2-07: ** **** - .byte %10000000 ; 083B 2-07: * - .byte %10000000 ; 083C 2-07: * + .byte %10000000 ; 083B 2-07: * + .byte %10000000 ; 083C 2-07: * .byte %11001111 ; 083D 2-07: ** **** .byte %11101111 ; 083E 2-07: *** **** .byte %11111111 ; 083F 2-07: ******** @@ -2394,7 +2403,7 @@ .byte %11111111 ; 0850 2-0a: ******** .byte %11111111 ; 0851 2-0a: ******** - .byte %11111100 ; 0852 2-0a: ****** + .byte %11111100 ; 0852 2-0a: ****** .byte %11000001 ; 0853 2-0a: ** * .byte %10001001 ; 0854 2-0a: * * * .byte %11001001 ; 0855 2-0a: ** * * @@ -2403,15 +2412,15 @@ .byte %11111111 ; 0858 2-0b: ******** .byte %11111111 ; 0859 2-0b: ******** - .byte %11111100 ; 085A 2-0b: ****** + .byte %11111100 ; 085A 2-0b: ****** .byte %11000001 ; 085B 2-0b: ** * .byte %10001001 ; 085C 2-0b: * * * .byte %11001001 ; 085D 2-0b: ** * * .byte %11001001 ; 085E 2-0b: ** * * .byte %11111111 ; 085F 2-0b: ******** - .byte %10000000 ; 0860 2-0c: * - .byte %10000000 ; 0861 2-0c: * + .byte %10000000 ; 0860 2-0c: * + .byte %10000000 ; 0861 2-0c: * .byte %11111111 ; 0862 2-0c: ******** .byte %11111111 ; 0863 2-0c: ******** .byte %11111111 ; 0864 2-0c: ******** @@ -2419,8 +2428,8 @@ .byte %11111111 ; 0866 2-0c: ******** .byte %11111111 ; 0867 2-0c: ******** - .byte %10000000 ; 0868 2-0d: * - .byte %10000000 ; 0869 2-0d: * + .byte %10000000 ; 0868 2-0d: * + .byte %10000000 ; 0869 2-0d: * .byte %11111111 ; 086A 2-0d: ******** .byte %11111111 ; 086B 2-0d: ******** .byte %11111111 ; 086C 2-0d: ******** @@ -2465,46 +2474,46 @@ .byte %11111111 ; 088F 2-11: ******** .byte %00110011 ; 0890 2-12: ** ** - .byte %01100110 ; 0891 2-12: ** ** - .byte %11001100 ; 0892 2-12: ** ** + .byte %01100110 ; 0891 2-12: ** ** + .byte %11001100 ; 0892 2-12: ** ** .byte %10011001 ; 0893 2-12: * ** * .byte %00110011 ; 0894 2-12: ** ** - .byte %01100110 ; 0895 2-12: ** ** - .byte %11001100 ; 0896 2-12: ** ** + .byte %01100110 ; 0895 2-12: ** ** + .byte %11001100 ; 0896 2-12: ** ** .byte %10011001 ; 0897 2-12: * ** * .byte %00110011 ; 0898 2-13: ** ** - .byte %01100110 ; 0899 2-13: ** ** - .byte %11001100 ; 089A 2-13: ** ** + .byte %01100110 ; 0899 2-13: ** ** + .byte %11001100 ; 089A 2-13: ** ** .byte %10011001 ; 089B 2-13: * ** * .byte %00110011 ; 089C 2-13: ** ** - .byte %01100110 ; 089D 2-13: ** ** - .byte %11001100 ; 089E 2-13: ** ** + .byte %01100110 ; 089D 2-13: ** ** + .byte %11001100 ; 089E 2-13: ** ** .byte %10011001 ; 089F 2-13: * ** * - .byte %11001100 ; 08A0 2-14: ** ** - .byte %01100110 ; 08A1 2-14: ** ** + .byte %11001100 ; 08A0 2-14: ** ** + .byte %01100110 ; 08A1 2-14: ** ** .byte %00110011 ; 08A2 2-14: ** ** .byte %10011001 ; 08A3 2-14: * ** * - .byte %11001100 ; 08A4 2-14: ** ** - .byte %01100110 ; 08A5 2-14: ** ** + .byte %11001100 ; 08A4 2-14: ** ** + .byte %01100110 ; 08A5 2-14: ** ** .byte %00110011 ; 08A6 2-14: ** ** .byte %10011001 ; 08A7 2-14: * ** * - .byte %11001100 ; 08A8 2-15: ** ** - .byte %01100110 ; 08A9 2-15: ** ** + .byte %11001100 ; 08A8 2-15: ** ** + .byte %01100110 ; 08A9 2-15: ** ** .byte %00110011 ; 08AA 2-15: ** ** .byte %10011001 ; 08AB 2-15: * ** * - .byte %11001100 ; 08AC 2-15: ** ** - .byte %01100110 ; 08AD 2-15: ** ** + .byte %11001100 ; 08AC 2-15: ** ** + .byte %01100110 ; 08AD 2-15: ** ** .byte %00110011 ; 08AE 2-15: ** ** .byte %10011001 ; 08AF 2-15: * ** * .byte %11111111 ; 08B0 2-16: ******** .byte %11111111 ; 08B1 2-16: ******** .byte %11111111 ; 08B2 2-16: ******** - .byte %00000000 ; 08B3 2-16: - .byte %00000000 ; 08B4 2-16: + .byte %00000000 ; 08B3 2-16: + .byte %00000000 ; 08B4 2-16: .byte %11111111 ; 08B5 2-16: ******** .byte %11111111 ; 08B6 2-16: ******** .byte %11111111 ; 08B7 2-16: ******** @@ -2512,29 +2521,29 @@ .byte %11111111 ; 08B8 2-17: ******** .byte %11111111 ; 08B9 2-17: ******** .byte %11111111 ; 08BA 2-17: ******** - .byte %00000000 ; 08BB 2-17: - .byte %00000000 ; 08BC 2-17: + .byte %00000000 ; 08BB 2-17: + .byte %00000000 ; 08BC 2-17: .byte %11111111 ; 08BD 2-17: ******** .byte %11111111 ; 08BE 2-17: ******** .byte %11111111 ; 08BF 2-17: ******** - .byte %11111100 ; 08C0 2-18: ****** - .byte %11111100 ; 08C1 2-18: ****** - .byte %11111100 ; 08C2 2-18: ****** - .byte %11111100 ; 08C3 2-18: ****** - .byte %11111100 ; 08C4 2-18: ****** - .byte %11111100 ; 08C5 2-18: ****** - .byte %11111100 ; 08C6 2-18: ****** - .byte %11111100 ; 08C7 2-18: ****** + .byte %11111100 ; 08C0 2-18: ****** + .byte %11111100 ; 08C1 2-18: ****** + .byte %11111100 ; 08C2 2-18: ****** + .byte %11111100 ; 08C3 2-18: ****** + .byte %11111100 ; 08C4 2-18: ****** + .byte %11111100 ; 08C5 2-18: ****** + .byte %11111100 ; 08C6 2-18: ****** + .byte %11111100 ; 08C7 2-18: ****** - .byte %11111100 ; 08C8 2-19: ****** - .byte %11111100 ; 08C9 2-19: ****** - .byte %11111100 ; 08CA 2-19: ****** - .byte %11111100 ; 08CB 2-19: ****** - .byte %11111100 ; 08CC 2-19: ****** - .byte %11111100 ; 08CD 2-19: ****** - .byte %11111100 ; 08CE 2-19: ****** - .byte %11111100 ; 08CF 2-19: ****** + .byte %11111100 ; 08C8 2-19: ****** + .byte %11111100 ; 08C9 2-19: ****** + .byte %11111100 ; 08CA 2-19: ****** + .byte %11111100 ; 08CB 2-19: ****** + .byte %11111100 ; 08CC 2-19: ****** + .byte %11111100 ; 08CD 2-19: ****** + .byte %11111100 ; 08CE 2-19: ****** + .byte %11111100 ; 08CF 2-19: ****** .byte %11111111 ; 08D0 2-1a: ******** .byte %11111111 ; 08D1 2-1a: ******** @@ -2542,8 +2551,8 @@ .byte %11111111 ; 08D3 2-1a: ******** .byte %00110011 ; 08D4 2-1a: ** ** .byte %00110011 ; 08D5 2-1a: ** ** - .byte %11001100 ; 08D6 2-1a: ** ** - .byte %11001100 ; 08D7 2-1a: ** ** + .byte %11001100 ; 08D6 2-1a: ** ** + .byte %11001100 ; 08D7 2-1a: ** ** .byte %11111111 ; 08D8 2-1b: ******** .byte %11111111 ; 08D9 2-1b: ******** @@ -2551,8 +2560,8 @@ .byte %11111111 ; 08DB 2-1b: ******** .byte %00110011 ; 08DC 2-1b: ** ** .byte %00110011 ; 08DD 2-1b: ** ** - .byte %11001100 ; 08DE 2-1b: ** ** - .byte %11001100 ; 08DF 2-1b: ** ** + .byte %11001100 ; 08DE 2-1b: ** ** + .byte %11001100 ; 08DF 2-1b: ** ** .byte %11100111 ; 08E0 2-1c: *** *** .byte %11100111 ; 08E1 2-1c: *** *** @@ -2575,8 +2584,8 @@ .byte %11100111 ; 08F0 2-1e: *** *** .byte %11100111 ; 08F1 2-1e: *** *** .byte %11100111 ; 08F2 2-1e: *** *** - .byte %11100000 ; 08F3 2-1e: *** - .byte %11100000 ; 08F4 2-1e: *** + .byte %11100000 ; 08F3 2-1e: *** + .byte %11100000 ; 08F4 2-1e: *** .byte %11100111 ; 08F5 2-1e: *** *** .byte %11100111 ; 08F6 2-1e: *** *** .byte %11100111 ; 08F7 2-1e: *** *** @@ -2584,8 +2593,8 @@ .byte %11100111 ; 08F8 2-1f: *** *** .byte %11100111 ; 08F9 2-1f: *** *** .byte %11100111 ; 08FA 2-1f: *** *** - .byte %11100000 ; 08FB 2-1f: *** - .byte %11100000 ; 08FC 2-1f: *** + .byte %11100000 ; 08FB 2-1f: *** + .byte %11100000 ; 08FC 2-1f: *** .byte %11100111 ; 08FD 2-1f: *** *** .byte %11100111 ; 08FE 2-1f: *** *** .byte %11100111 ; 08FF 2-1f: *** *** @@ -2593,8 +2602,8 @@ .byte %11100111 ; 0900 2-20: *** *** .byte %11100111 ; 0901 2-20: *** *** .byte %11100111 ; 0902 2-20: *** *** - .byte %00000000 ; 0903 2-20: - .byte %00000000 ; 0904 2-20: + .byte %00000000 ; 0903 2-20: + .byte %00000000 ; 0904 2-20: .byte %11100111 ; 0905 2-20: *** *** .byte %11100111 ; 0906 2-20: *** *** .byte %11100111 ; 0907 2-20: *** *** @@ -2602,8 +2611,8 @@ .byte %11100111 ; 0908 2-21: *** *** .byte %11100111 ; 0909 2-21: *** *** .byte %11100111 ; 090A 2-21: *** *** - .byte %00000000 ; 090B 2-21: - .byte %00000000 ; 090C 2-21: + .byte %00000000 ; 090B 2-21: + .byte %00000000 ; 090C 2-21: .byte %11100111 ; 090D 2-21: *** *** .byte %11100111 ; 090E 2-21: *** *** .byte %11100111 ; 090F 2-21: *** *** @@ -2611,8 +2620,8 @@ .byte %11100111 ; 0910 2-22: *** *** .byte %11100111 ; 0911 2-22: *** *** .byte %11100111 ; 0912 2-22: *** *** - .byte %11100000 ; 0913 2-22: *** - .byte %11100000 ; 0914 2-22: *** + .byte %11100000 ; 0913 2-22: *** + .byte %11100000 ; 0914 2-22: *** .byte %11111111 ; 0915 2-22: ******** .byte %11111111 ; 0916 2-22: ******** .byte %11111111 ; 0917 2-22: ******** @@ -2620,8 +2629,8 @@ .byte %11100111 ; 0918 2-23: *** *** .byte %11100111 ; 0919 2-23: *** *** .byte %11100111 ; 091A 2-23: *** *** - .byte %11100000 ; 091B 2-23: *** - .byte %11100000 ; 091C 2-23: *** + .byte %11100000 ; 091B 2-23: *** + .byte %11100000 ; 091C 2-23: *** .byte %11111111 ; 091D 2-23: ******** .byte %11111111 ; 091E 2-23: ******** .byte %11111111 ; 091F 2-23: ******** @@ -2650,8 +2659,8 @@ .byte %11111111 ; 0933 2-26: ******** .byte %11111111 ; 0934 2-26: ******** .byte %11111111 ; 0935 2-26: ******** - .byte %00000000 ; 0936 2-26: - .byte %00000000 ; 0937 2-26: + .byte %00000000 ; 0936 2-26: + .byte %00000000 ; 0937 2-26: .byte %11111111 ; 0938 2-27: ******** .byte %11111111 ; 0939 2-27: ******** @@ -2659,14 +2668,14 @@ .byte %11111111 ; 093B 2-27: ******** .byte %11111111 ; 093C 2-27: ******** .byte %11111111 ; 093D 2-27: ******** - .byte %00000000 ; 093E 2-27: - .byte %00000000 ; 093F 2-27: + .byte %00000000 ; 093E 2-27: + .byte %00000000 ; 093F 2-27: .byte %11111111 ; 0940 2-28: ******** .byte %11111111 ; 0941 2-28: ******** .byte %11111111 ; 0942 2-28: ******** - .byte %11100000 ; 0943 2-28: *** - .byte %11100000 ; 0944 2-28: *** + .byte %11100000 ; 0943 2-28: *** + .byte %11100000 ; 0944 2-28: *** .byte %11100111 ; 0945 2-28: *** *** .byte %11100111 ; 0946 2-28: *** *** .byte %11100111 ; 0947 2-28: *** *** @@ -2674,8 +2683,8 @@ .byte %11111111 ; 0948 2-29: ******** .byte %11111111 ; 0949 2-29: ******** .byte %11111111 ; 094A 2-29: ******** - .byte %11100000 ; 094B 2-29: *** - .byte %11100000 ; 094C 2-29: *** + .byte %11100000 ; 094B 2-29: *** + .byte %11100000 ; 094C 2-29: *** .byte %11100111 ; 094D 2-29: *** *** .byte %11100111 ; 094E 2-29: *** *** .byte %11100111 ; 094F 2-29: *** *** @@ -2683,8 +2692,8 @@ .byte %11100111 ; 0950 2-2a: *** *** .byte %11100111 ; 0951 2-2a: *** *** .byte %11100111 ; 0952 2-2a: *** *** - .byte %00000000 ; 0953 2-2a: - .byte %00000000 ; 0954 2-2a: + .byte %00000000 ; 0953 2-2a: + .byte %00000000 ; 0954 2-2a: .byte %11111111 ; 0955 2-2a: ******** .byte %11111111 ; 0956 2-2a: ******** .byte %11111111 ; 0957 2-2a: ******** @@ -2692,8 +2701,8 @@ .byte %11100111 ; 0958 2-2b: *** *** .byte %11100111 ; 0959 2-2b: *** *** .byte %11100111 ; 095A 2-2b: *** *** - .byte %00000000 ; 095B 2-2b: - .byte %00000000 ; 095C 2-2b: + .byte %00000000 ; 095B 2-2b: + .byte %00000000 ; 095C 2-2b: .byte %11111111 ; 095D 2-2b: ******** .byte %11111111 ; 095E 2-2b: ******** .byte %11111111 ; 095F 2-2b: ******** @@ -2701,8 +2710,8 @@ .byte %11111111 ; 0960 2-2c: ******** .byte %11111111 ; 0961 2-2c: ******** .byte %11111111 ; 0962 2-2c: ******** - .byte %00000000 ; 0963 2-2c: - .byte %00000000 ; 0964 2-2c: + .byte %00000000 ; 0963 2-2c: + .byte %00000000 ; 0964 2-2c: .byte %11100111 ; 0965 2-2c: *** *** .byte %11100111 ; 0966 2-2c: *** *** .byte %11100111 ; 0967 2-2c: *** *** @@ -2710,8 +2719,8 @@ .byte %11111111 ; 0968 2-2d: ******** .byte %11111111 ; 0969 2-2d: ******** .byte %11111111 ; 096A 2-2d: ******** - .byte %00000000 ; 096B 2-2d: - .byte %00000000 ; 096C 2-2d: + .byte %00000000 ; 096B 2-2d: + .byte %00000000 ; 096C 2-2d: .byte %11100111 ; 096D 2-2d: *** *** .byte %11100111 ; 096E 2-2d: *** *** .byte %11100111 ; 096F 2-2d: *** *** @@ -2756,19 +2765,19 @@ .byte %11111111 ; 0991 2-32: ******** .byte %11111111 ; 0992 2-32: ******** .byte %11111111 ; 0993 2-32: ******** - .byte %00000000 ; 0994 2-32: - .byte %00000000 ; 0995 2-32: - .byte %00000000 ; 0996 2-32: - .byte %00000000 ; 0997 2-32: + .byte %00000000 ; 0994 2-32: + .byte %00000000 ; 0995 2-32: + .byte %00000000 ; 0996 2-32: + .byte %00000000 ; 0997 2-32: .byte %11111111 ; 0998 2-33: ******** .byte %11111111 ; 0999 2-33: ******** .byte %11111111 ; 099A 2-33: ******** .byte %11111111 ; 099B 2-33: ******** - .byte %00000000 ; 099C 2-33: - .byte %00000000 ; 099D 2-33: - .byte %00000000 ; 099E 2-33: - .byte %00000000 ; 099F 2-33: + .byte %00000000 ; 099C 2-33: + .byte %00000000 ; 099D 2-33: + .byte %00000000 ; 099E 2-33: + .byte %00000000 ; 099F 2-33: .byte %11111111 ; 09A0 2-34: ******** .byte %11111111 ; 09A1 2-34: ******** @@ -2806,19 +2815,19 @@ .byte %11001111 ; 09BE 2-37: ** **** .byte %11001111 ; 09BF 2-37: ** **** - .byte %11110000 ; 09C0 2-38: **** - .byte %11110000 ; 09C1 2-38: **** - .byte %11110000 ; 09C2 2-38: **** - .byte %11110000 ; 09C3 2-38: **** + .byte %11110000 ; 09C0 2-38: **** + .byte %11110000 ; 09C1 2-38: **** + .byte %11110000 ; 09C2 2-38: **** + .byte %11110000 ; 09C3 2-38: **** .byte %11111111 ; 09C4 2-38: ******** .byte %11111111 ; 09C5 2-38: ******** .byte %11111111 ; 09C6 2-38: ******** .byte %11111111 ; 09C7 2-38: ******** - .byte %11110000 ; 09C8 2-39: **** - .byte %11110000 ; 09C9 2-39: **** - .byte %11110000 ; 09CA 2-39: **** - .byte %11110000 ; 09CB 2-39: **** + .byte %11110000 ; 09C8 2-39: **** + .byte %11110000 ; 09C9 2-39: **** + .byte %11110000 ; 09CA 2-39: **** + .byte %11110000 ; 09CB 2-39: **** .byte %11111111 ; 09CC 2-39: ******** .byte %11111111 ; 09CD 2-39: ******** .byte %11111111 ; 09CE 2-39: ******** @@ -2828,19 +2837,19 @@ .byte %11111111 ; 09D1 2-3a: ******** .byte %11111111 ; 09D2 2-3a: ******** .byte %11111111 ; 09D3 2-3a: ******** - .byte %11110000 ; 09D4 2-3a: **** - .byte %11110000 ; 09D5 2-3a: **** - .byte %11110000 ; 09D6 2-3a: **** - .byte %11110000 ; 09D7 2-3a: **** + .byte %11110000 ; 09D4 2-3a: **** + .byte %11110000 ; 09D5 2-3a: **** + .byte %11110000 ; 09D6 2-3a: **** + .byte %11110000 ; 09D7 2-3a: **** .byte %11111111 ; 09D8 2-3b: ******** .byte %11111111 ; 09D9 2-3b: ******** .byte %11111111 ; 09DA 2-3b: ******** .byte %11111111 ; 09DB 2-3b: ******** - .byte %11110000 ; 09DC 2-3b: **** - .byte %11110000 ; 09DD 2-3b: **** - .byte %11110000 ; 09DE 2-3b: **** - .byte %11110000 ; 09DF 2-3b: **** + .byte %11110000 ; 09DC 2-3b: **** + .byte %11110000 ; 09DD 2-3b: **** + .byte %11110000 ; 09DE 2-3b: **** + .byte %11110000 ; 09DF 2-3b: **** .byte %00001111 ; 09E0 2-3c: **** .byte %00001111 ; 09E1 2-3c: **** @@ -2864,19 +2873,19 @@ .byte %00001111 ; 09F1 2-3e: **** .byte %00001111 ; 09F2 2-3e: **** .byte %00001111 ; 09F3 2-3e: **** - .byte %11110000 ; 09F4 2-3e: **** - .byte %11110000 ; 09F5 2-3e: **** - .byte %11110000 ; 09F6 2-3e: **** - .byte %11110000 ; 09F7 2-3e: **** + .byte %11110000 ; 09F4 2-3e: **** + .byte %11110000 ; 09F5 2-3e: **** + .byte %11110000 ; 09F6 2-3e: **** + .byte %11110000 ; 09F7 2-3e: **** .byte %00001111 ; 09F8 2-3f: **** .byte %00001111 ; 09F9 2-3f: **** .byte %00001111 ; 09FA 2-3f: **** .byte %00001111 ; 09FB 2-3f: **** - .byte %11110000 ; 09FC 2-3f: **** - .byte %11110000 ; 09FD 2-3f: **** - .byte %11110000 ; 09FE 2-3f: **** - .byte %11110000 ; 09FF 2-3f: **** + .byte %11110000 ; 09FC 2-3f: **** + .byte %11110000 ; 09FD 2-3f: **** + .byte %11110000 ; 09FE 2-3f: **** + .byte %11110000 ; 09FF 2-3f: **** .byte %11111111 ; 0A00 2-40: ******** .byte %11111111 ; 0A01 2-40: ******** @@ -2934,18 +2943,18 @@ .byte %10011001 ; 0A30 2-46: * ** * .byte %10011001 ; 0A31 2-46: * ** * - .byte %00000000 ; 0A32 2-46: + .byte %00000000 ; 0A32 2-46: .byte %10011001 ; 0A33 2-46: * ** * - .byte %00000000 ; 0A34 2-46: + .byte %00000000 ; 0A34 2-46: .byte %10011001 ; 0A35 2-46: * ** * .byte %10011001 ; 0A36 2-46: * ** * .byte %11111111 ; 0A37 2-46: ******** .byte %10011001 ; 0A38 2-47: * ** * .byte %10011001 ; 0A39 2-47: * ** * - .byte %00000000 ; 0A3A 2-47: + .byte %00000000 ; 0A3A 2-47: .byte %10011001 ; 0A3B 2-47: * ** * - .byte %00000000 ; 0A3C 2-47: + .byte %00000000 ; 0A3C 2-47: .byte %10011001 ; 0A3D 2-47: * ** * .byte %10011001 ; 0A3E 2-47: * ** * .byte %11111111 ; 0A3F 2-47: ******** @@ -2990,18 +2999,18 @@ .byte %10011001 ; 0A61 2-4c: * ** * .byte %11000011 ; 0A62 2-4c: ** ** .byte %11000111 ; 0A63 2-4c: ** *** - .byte %10011000 ; 0A64 2-4c: * ** + .byte %10011000 ; 0A64 2-4c: * ** .byte %10011001 ; 0A65 2-4c: * ** * - .byte %11000000 ; 0A66 2-4c: ** + .byte %11000000 ; 0A66 2-4c: ** .byte %11111111 ; 0A67 2-4c: ******** .byte %11000011 ; 0A68 2-4d: ** ** .byte %10011001 ; 0A69 2-4d: * ** * .byte %11000011 ; 0A6A 2-4d: ** ** .byte %11000111 ; 0A6B 2-4d: ** *** - .byte %10011000 ; 0A6C 2-4d: * ** + .byte %10011000 ; 0A6C 2-4d: * ** .byte %10011001 ; 0A6D 2-4d: * ** * - .byte %11000000 ; 0A6E 2-4d: ** + .byte %11000000 ; 0A6E 2-4d: ** .byte %11111111 ; 0A6F 2-4d: ******** .byte %11111001 ; 0A70 2-4e: ***** * @@ -3061,7 +3070,7 @@ .byte %11111111 ; 0AA0 2-54: ******** .byte %10011001 ; 0AA1 2-54: * ** * .byte %11000011 ; 0AA2 2-54: ** ** - .byte %00000000 ; 0AA3 2-54: + .byte %00000000 ; 0AA3 2-54: .byte %11000011 ; 0AA4 2-54: ** ** .byte %10011001 ; 0AA5 2-54: * ** * .byte %11111111 ; 0AA6 2-54: ******** @@ -3070,7 +3079,7 @@ .byte %11111111 ; 0AA8 2-55: ******** .byte %10011001 ; 0AA9 2-55: * ** * .byte %11000011 ; 0AAA 2-55: ** ** - .byte %00000000 ; 0AAB 2-55: + .byte %00000000 ; 0AAB 2-55: .byte %11000011 ; 0AAC 2-55: ** ** .byte %10011001 ; 0AAD 2-55: * ** * .byte %11111111 ; 0AAE 2-55: ******** @@ -3149,7 +3158,7 @@ .byte %11111111 ; 0AEF 2-5d: ******** .byte %11111111 ; 0AF0 2-5e: ******** - .byte %11111100 ; 0AF1 2-5e: ****** + .byte %11111100 ; 0AF1 2-5e: ****** .byte %11111001 ; 0AF2 2-5e: ***** * .byte %11110011 ; 0AF3 2-5e: **** ** .byte %11100111 ; 0AF4 2-5e: *** *** @@ -3158,7 +3167,7 @@ .byte %11111111 ; 0AF7 2-5e: ******** .byte %11111111 ; 0AF8 2-5f: ******** - .byte %11111100 ; 0AF9 2-5f: ****** + .byte %11111100 ; 0AF9 2-5f: ****** .byte %11111001 ; 0AFA 2-5f: ***** * .byte %11110011 ; 0AFB 2-5f: **** ** .byte %11100111 ; 0AFC 2-5f: *** *** @@ -3242,7 +3251,7 @@ .byte %11110001 ; 0B41 2-68: **** * .byte %11100001 ; 0B42 2-68: *** * .byte %10011001 ; 0B43 2-68: * ** * - .byte %10000000 ; 0B44 2-68: * + .byte %10000000 ; 0B44 2-68: * .byte %11111001 ; 0B45 2-68: ***** * .byte %11111001 ; 0B46 2-68: ***** * .byte %11111111 ; 0B47 2-68: ******** @@ -3251,7 +3260,7 @@ .byte %11110001 ; 0B49 2-69: **** * .byte %11100001 ; 0B4A 2-69: *** * .byte %10011001 ; 0B4B 2-69: * ** * - .byte %10000000 ; 0B4C 2-69: * + .byte %10000000 ; 0B4C 2-69: * .byte %11111001 ; 0B4D 2-69: ***** * .byte %11111001 ; 0B4E 2-69: ***** * .byte %11111111 ; 0B4F 2-69: ******** @@ -3688,22 +3697,22 @@ .byte %10000001 ; 0CCE 2-99: * * .byte %11111111 ; 0CCF 2-99: ******** - .byte %10011100 ; 0CD0 2-9a: * *** - .byte %10001000 ; 0CD1 2-9a: * * - .byte %10000000 ; 0CD2 2-9a: * - .byte %10010100 ; 0CD3 2-9a: * * * - .byte %10011100 ; 0CD4 2-9a: * *** - .byte %10011100 ; 0CD5 2-9a: * *** - .byte %10011100 ; 0CD6 2-9a: * *** + .byte %10011100 ; 0CD0 2-9a: * *** + .byte %10001000 ; 0CD1 2-9a: * * + .byte %10000000 ; 0CD2 2-9a: * + .byte %10010100 ; 0CD3 2-9a: * * * + .byte %10011100 ; 0CD4 2-9a: * *** + .byte %10011100 ; 0CD5 2-9a: * *** + .byte %10011100 ; 0CD6 2-9a: * *** .byte %11111111 ; 0CD7 2-9a: ******** - .byte %10011100 ; 0CD8 2-9b: * *** - .byte %10001000 ; 0CD9 2-9b: * * - .byte %10000000 ; 0CDA 2-9b: * - .byte %10010100 ; 0CDB 2-9b: * * * - .byte %10011100 ; 0CDC 2-9b: * *** - .byte %10011100 ; 0CDD 2-9b: * *** - .byte %10011100 ; 0CDE 2-9b: * *** + .byte %10011100 ; 0CD8 2-9b: * *** + .byte %10001000 ; 0CD9 2-9b: * * + .byte %10000000 ; 0CDA 2-9b: * + .byte %10010100 ; 0CDB 2-9b: * * * + .byte %10011100 ; 0CDC 2-9b: * *** + .byte %10011100 ; 0CDD 2-9b: * *** + .byte %10011100 ; 0CDE 2-9b: * *** .byte %11111111 ; 0CDF 2-9b: ******** .byte %10011001 ; 0CE0 2-9c: * ** * @@ -3868,22 +3877,22 @@ .byte %11100111 ; 0D6E 2-ad: *** *** .byte %11111111 ; 0D6F 2-ad: ******** - .byte %10011100 ; 0D70 2-ae: * *** - .byte %10011100 ; 0D71 2-ae: * *** - .byte %10011100 ; 0D72 2-ae: * *** - .byte %10010100 ; 0D73 2-ae: * * * - .byte %10000000 ; 0D74 2-ae: * - .byte %10001000 ; 0D75 2-ae: * * - .byte %10011100 ; 0D76 2-ae: * *** + .byte %10011100 ; 0D70 2-ae: * *** + .byte %10011100 ; 0D71 2-ae: * *** + .byte %10011100 ; 0D72 2-ae: * *** + .byte %10010100 ; 0D73 2-ae: * * * + .byte %10000000 ; 0D74 2-ae: * + .byte %10001000 ; 0D75 2-ae: * * + .byte %10011100 ; 0D76 2-ae: * *** .byte %11111111 ; 0D77 2-ae: ******** - .byte %10011100 ; 0D78 2-af: * *** - .byte %10011100 ; 0D79 2-af: * *** - .byte %10011100 ; 0D7A 2-af: * *** - .byte %10010100 ; 0D7B 2-af: * * * - .byte %10000000 ; 0D7C 2-af: * - .byte %10001000 ; 0D7D 2-af: * * - .byte %10011100 ; 0D7E 2-af: * *** + .byte %10011100 ; 0D78 2-af: * *** + .byte %10011100 ; 0D79 2-af: * *** + .byte %10011100 ; 0D7A 2-af: * *** + .byte %10010100 ; 0D7B 2-af: * * * + .byte %10000000 ; 0D7C 2-af: * + .byte %10001000 ; 0D7D 2-af: * * + .byte %10011100 ; 0D7E 2-af: * *** .byte %11111111 ; 0D7F 2-af: ******** .byte %10011001 ; 0D80 2-b0: * ** * @@ -3963,7 +3972,7 @@ .byte %11100111 ; 0DC2 2-b8: *** *** .byte %11110011 ; 0DC3 2-b8: **** ** .byte %11111001 ; 0DC4 2-b8: ***** * - .byte %11111100 ; 0DC5 2-b8: ****** + .byte %11111100 ; 0DC5 2-b8: ****** .byte %11111111 ; 0DC6 2-b8: ******** .byte %11111111 ; 0DC7 2-b8: ******** @@ -3972,7 +3981,7 @@ .byte %11100111 ; 0DCA 2-b9: *** *** .byte %11110011 ; 0DCB 2-b9: **** ** .byte %11111001 ; 0DCC 2-b9: ***** * - .byte %11111100 ; 0DCD 2-b9: ****** + .byte %11111100 ; 0DCD 2-b9: ****** .byte %11111111 ; 0DCE 2-b9: ******** .byte %11111111 ; 0DCF 2-b9: ******** @@ -4018,7 +4027,7 @@ .byte %11111111 ; 0DF3 2-be: ******** .byte %11111111 ; 0DF4 2-be: ******** .byte %11111111 ; 0DF5 2-be: ******** - .byte %10000000 ; 0DF6 2-be: * + .byte %10000000 ; 0DF6 2-be: * .byte %11111111 ; 0DF7 2-be: ******** .byte %11111111 ; 0DF8 2-bf: ******** @@ -4027,7 +4036,7 @@ .byte %11111111 ; 0DFB 2-bf: ******** .byte %11111111 ; 0DFC 2-bf: ******** .byte %11111111 ; 0DFD 2-bf: ******** - .byte %10000000 ; 0DFE 2-bf: * + .byte %10000000 ; 0DFE 2-bf: * .byte %11111111 ; 0DFF 2-bf: ******** .byte %11100111 ; 0E00 2-c0: *** *** @@ -4267,19 +4276,19 @@ .byte %11111111 ; 0ED0 2-da: ******** .byte %11111111 ; 0ED1 2-da: ******** .byte %10011001 ; 0ED2 2-da: * ** * - .byte %10000000 ; 0ED3 2-da: * - .byte %10000000 ; 0ED4 2-da: * - .byte %10010100 ; 0ED5 2-da: * * * - .byte %10011100 ; 0ED6 2-da: * *** + .byte %10000000 ; 0ED3 2-da: * + .byte %10000000 ; 0ED4 2-da: * + .byte %10010100 ; 0ED5 2-da: * * * + .byte %10011100 ; 0ED6 2-da: * *** .byte %11111111 ; 0ED7 2-da: ******** .byte %11111111 ; 0ED8 2-db: ******** .byte %11111111 ; 0ED9 2-db: ******** .byte %10011001 ; 0EDA 2-db: * ** * - .byte %10000000 ; 0EDB 2-db: * - .byte %10000000 ; 0EDC 2-db: * - .byte %10010100 ; 0EDD 2-db: * * * - .byte %10011100 ; 0EDE 2-db: * *** + .byte %10000000 ; 0EDB 2-db: * + .byte %10000000 ; 0EDC 2-db: * + .byte %10010100 ; 0EDD 2-db: * * * + .byte %10011100 ; 0EDE 2-db: * *** .byte %11111111 ; 0EDF 2-db: ******** .byte %11111111 ; 0EE0 2-dc: ******** @@ -4446,18 +4455,18 @@ .byte %11111111 ; 0F70 2-ee: ******** .byte %11111111 ; 0F71 2-ee: ******** - .byte %10011100 ; 0F72 2-ee: * *** - .byte %10010100 ; 0F73 2-ee: * * * - .byte %10000000 ; 0F74 2-ee: * + .byte %10011100 ; 0F72 2-ee: * *** + .byte %10010100 ; 0F73 2-ee: * * * + .byte %10000000 ; 0F74 2-ee: * .byte %11000001 ; 0F75 2-ee: ** * .byte %11001001 ; 0F76 2-ee: ** * * .byte %11111111 ; 0F77 2-ee: ******** .byte %11111111 ; 0F78 2-ef: ******** .byte %11111111 ; 0F79 2-ef: ******** - .byte %10011100 ; 0F7A 2-ef: * *** - .byte %10010100 ; 0F7B 2-ef: * * * - .byte %10000000 ; 0F7C 2-ef: * + .byte %10011100 ; 0F7A 2-ef: * *** + .byte %10010100 ; 0F7B 2-ef: * * * + .byte %10000000 ; 0F7C 2-ef: * .byte %11000001 ; 0F7D 2-ef: ** * .byte %11001001 ; 0F7E 2-ef: ** * * .byte %11111111 ; 0F7F 2-ef: ******** @@ -4570,8 +4579,8 @@ .byte %11000111 ; 0FDE 2-fb: ** *** .byte %11111111 ; 0FDF 2-fb: ******** - .byte %11001100 ; 0FE0 2-fc: ** ** - .byte %00000000 ; 0FE1 2-fc: + .byte %11001100 ; 0FE0 2-fc: ** ** + .byte %00000000 ; 0FE1 2-fc: .byte %00110011 ; 0FE2 2-fc: ** ** .byte %11111111 ; 0FE3 2-fc: ******** .byte %11111111 ; 0FE4 2-fc: ******** @@ -4579,8 +4588,8 @@ .byte %11111111 ; 0FE6 2-fc: ******** .byte %11111111 ; 0FE7 2-fc: ******** - .byte %11001100 ; 0FE8 2-fd: ** ** - .byte %00000000 ; 0FE9 2-fd: + .byte %11001100 ; 0FE8 2-fd: ** ** + .byte %00000000 ; 0FE9 2-fd: .byte %00110011 ; 0FEA 2-fd: ** ** .byte %11111111 ; 0FEB 2-fd: ******** .byte %11111111 ; 0FEC 2-fd: ******** @@ -4605,4 +4614,3 @@ .byte %11111111 ; 0FFD 2-ff: ******** .byte %11111111 ; 0FFE 2-ff: ******** .byte %11111111 ; 0FFF 2-ff: ******** - diff --git a/libsrc/nes/ppu.s b/libsrc/nes/ppu.s index 06dc10a65..92e056fb4 100644 --- a/libsrc/nes/ppu.s +++ b/libsrc/nes/ppu.s @@ -68,6 +68,8 @@ ;----------------------------------------------------------------------------- +.segment "ONCE" + .proc ppuinit lda #%10101000 @@ -104,7 +106,6 @@ .endproc - ;----------------------------------------------------------------------------- .proc paletteinit @@ -126,7 +127,7 @@ bne @loop rts - + .endproc ;----------------------------------------------------------------------------- @@ -136,7 +137,7 @@ paldata: .repeat 2 .byte $0f ; 0 black - .byte $14 ; 4 violett + .byte $14 ; 4 violet .byte $3b ; 3 cyan .byte $3d ; 1 white diff --git a/libsrc/nes/ppubuf.s b/libsrc/nes/ppubuf.s index 3708b93c1..f08fc1a71 100644 --- a/libsrc/nes/ppubuf.s +++ b/libsrc/nes/ppubuf.s @@ -101,7 +101,7 @@ @end: stx ringread sty ringcount - rts + rts .endproc diff --git a/libsrc/nes/sysuname.s b/libsrc/nes/sysuname.s index 2606d1a60..fcab503e1 100644 --- a/libsrc/nes/sysuname.s +++ b/libsrc/nes/sysuname.s @@ -35,5 +35,5 @@ utsdata: ; machine .asciiz "NES" - + diff --git a/libsrc/nes/tgi/nes-64-56-2.s b/libsrc/nes/tgi/nes-64-56-2.s index 70e23e119..e6b7c5437 100644 --- a/libsrc/nes/tgi/nes-64-56-2.s +++ b/libsrc/nes/tgi/nes-64-56-2.s @@ -60,7 +60,6 @@ yres: .word 56 ; Max Y resolution .addr BAR .addr TEXTSTYLE .addr OUTTEXT - .addr 0 ; IRQ entry is unused ; ------------------------------------------------------------------------ ; Data. @@ -80,12 +79,6 @@ TEMP2 = tmp4 TEMP3 = sreg TEMP4 = sreg+1 -; Line routine stuff (must be on zpage) -PB = ptr3 ; (2) LINE -UB = ptr4 ; (2) LINE -ERR = regsave ; (2) LINE -NX = regsave+2 ; (2) LINE - ; Absolute variables used in the code .bss @@ -96,17 +89,6 @@ ERROR: .res 1 ; Error code COLOR: .res 1 ; Current color PALETTE: .res 2 ; The current palette -; Line routine stuff - -OGora: -COUNT: .res 2 -OUkos: -NY: .res 2 -Y3: -DX: .res 1 -DY: .res 1 -AY: .res 1 - ; Constants and tables .rodata @@ -243,6 +225,7 @@ SETCOLOR: ; SETVIEWPAGE: +; rts ; ------------------------------------------------------------------------ ; SETDRAWPAGE: Set the drawable page. Called with the new page in A (0..n). diff --git a/libsrc/nes/tgi_colors.s b/libsrc/nes/tgi_colors.s deleted file mode 100644 index 6ef3729b4..000000000 --- a/libsrc/nes/tgi_colors.s +++ /dev/null @@ -1,8 +0,0 @@ -; -; Target-specific black & white values for use by the target-shared TGI kernel -; - - .include "tgi-kernel.inc" - - .export tgi_color_black:zp = $00 - .export tgi_color_white:zp = $01 diff --git a/libsrc/nes/waitvblank.s b/libsrc/nes/waitvblank.s deleted file mode 100644 index 408646904..000000000 --- a/libsrc/nes/waitvblank.s +++ /dev/null @@ -1,18 +0,0 @@ -; -; Written by Groepaz/Hitmen <groepaz@gmx.net> -; Cleanup by Ullrich von Bassewitz <uz@cc65.org> -; -; void waitvblank(void); -; - - .export _waitvblank - - .include "nes.inc" - -.proc _waitvblank - -wait: lda PPU_STATUS - bpl wait - rts - -.endproc diff --git a/libsrc/nes/waitvsync.s b/libsrc/nes/waitvsync.s new file mode 100644 index 000000000..9f811c0a9 --- /dev/null +++ b/libsrc/nes/waitvsync.s @@ -0,0 +1,18 @@ +; +; Written by Groepaz <groepaz@gmx.net> +; Cleanup by Ullrich von Bassewitz <uz@cc65.org> +; +; void waitvsync(void); +; + + .export _waitvsync + + .include "nes.inc" + +.proc _waitvsync + +wait: bit PPU_STATUS + bpl wait + rts + +.endproc diff --git a/libsrc/none/crt0.s b/libsrc/none/crt0.s new file mode 100644 index 000000000..596fbcd46 --- /dev/null +++ b/libsrc/none/crt0.s @@ -0,0 +1,21 @@ + .export _exit + .export __STARTUP__ : absolute = 1 ; Mark as startup + .import zerobss, _main + .import initlib, donelib + .import __STACKSTART__ ; Linker generated + + .include "zeropage.inc" + + .segment "STARTUP" + + lda #<__STACKSTART__ + ldx #>__STACKSTART__ + sta sp + stx sp+1 + jsr zerobss + jsr initlib + jsr _main +_exit: pha + jsr donelib + pla + rts diff --git a/libsrc/none/ctype.s b/libsrc/none/ctype.s new file mode 100644 index 000000000..1301965eb --- /dev/null +++ b/libsrc/none/ctype.s @@ -0,0 +1,5 @@ +; Character specification table. +; +; uses the "common" definition + + .include "ctype_common.inc" diff --git a/libsrc/osic1p/bootstrap.s b/libsrc/osic1p/bootstrap.s index 2a501b980..e88e257fd 100644 --- a/libsrc/osic1p/bootstrap.s +++ b/libsrc/osic1p/bootstrap.s @@ -6,16 +6,16 @@ ; add "-u __BOOT__" to the cl65/ld65 command line. Then, the linker ; will import this symbol name; and, link this module at the front ; of your program file. -; - .export __BOOT__:abs = 1 - .import __RAM_START__, __RAM_SIZE__, __BSS_RUN__ + .export __BOOT__ : abs = 1 + + .import __MAIN_START__, __MAIN_SIZE__, __BSS_RUN__ ; ------------------------------------------------------------------------ -load_addr := __RAM_START__ -load_size = __BSS_RUN__ - __RAM_START__ -ram_top := __RAM_START__ + __RAM_SIZE__ +load_addr := __MAIN_START__ +load_size = __BSS_RUN__ - __MAIN_START__ +ram_top := __MAIN_START__ + __MAIN_SIZE__ .segment "BOOT" @@ -50,16 +50,15 @@ LINEDIST = $20 ; Offset in video RAM between two lines ldx #>load_addr sta load stx load+1 - lda #<load_size - eor #$FF - sta count ; store (-size - 1) - lda #>load_size - eor #$FF - sta count+1 -L1: inc count ; pre-count one's-complement upwards + ldx #(<load_size) + 1 + stx count + ldx #(>load_size) + 1 + stx count+1 ; save size with each byte incremented separately + +L1: dec count bnz L2 - inc count+1 + dec count+1 bze L3 L2: jsr GETCHAR ; (doesn't change .Y) sta (load),y diff --git a/libsrc/osic1p/cclear.s b/libsrc/osic1p/cclear.s index 2036c38e0..e399f14a9 100644 --- a/libsrc/osic1p/cclear.s +++ b/libsrc/osic1p/cclear.s @@ -9,19 +9,18 @@ ; .export _cclearxy, _cclear - .import popa, _gotoxy, cputdirect + .import gotoxy, cputdirect .importzp tmp1 _cclearxy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length and run into _cclear _cclear: cmp #0 ; Is the length zero? beq L9 ; Jump if done - sta tmp1 + sta tmp1 L1: lda #' ' jsr cputdirect ; Direct output dec tmp1 diff --git a/libsrc/osic1p/cgetc.s b/libsrc/osic1p/cgetc.s index 5ddca2870..380353b77 100644 --- a/libsrc/osic1p/cgetc.s +++ b/libsrc/osic1p/cgetc.s @@ -1,50 +1,41 @@ -; -; char cgetc (void); -; - - .constructor initcgetc - .export _cgetc - .import cursor - - .include "osic1p.inc" - .include "extzp.inc" - .include "zeropage.inc" - -; Initialize one-character buffer that is filled by kbhit() - .segment "INIT" -initcgetc: - lda #$00 - sta CHARBUF ; No character in buffer initially - rts - -; Input routine from 65V PROM MONITOR, show cursor if enabled - .code -_cgetc: - lda CHARBUF ; character in buffer available? - beq nobuffer - tax ; save character in X - lda #$00 - sta CHARBUF ; empty buffer - beq restorex ; restore X and return -nobuffer: - lda cursor ; show cursor? - beq nocursor - ldy CURS_X - lda (SCREEN_PTR),y ; fetch current character - sta tmp1 ; save it - lda #$A1 ; full white square - sta (SCREEN_PTR),y ; store at cursor position -nocursor: - jsr INPUTC ; get input character in A - ldx cursor - beq done ; was cursor on? - tax ; save A in X - lda tmp1 ; fetch saved character - ldy CURS_X - sta (SCREEN_PTR),y ; store at cursor position - -restorex: - txa ; restore saved character from X -done: - ldx #$00 ; high byte of int return value - rts +; +; char cgetc (void); +; + + .export _cgetc + .import cursor + .import _kbhit + + .include "osic1p.inc" + .include "extzp.inc" + .include "zeropage.inc" + +; Input routine, show cursor if enabled + .code +_cgetc: + ldx CHARBUF ; character in buffer available? + bne done + lda cursor ; show cursor? + beq nocursor + ldy CURS_X + lda (SCREEN_PTR),y ; fetch current character + sta tmp1 ; save it + lda #$A1 ; full white square + sta (SCREEN_PTR),y ; store at cursor position + +nocursor: + jsr _kbhit ; get input character in A + tax ; save A in X, set flags + beq nocursor ; until a key is actually pressed + lda cursor + beq done ; was cursor on? + lda tmp1 ; fetch saved character + ldy CURS_X + sta (SCREEN_PTR),y ; store at cursor position + +done: + lda #$00 + sta CHARBUF ; empty buffer + txa ; restore saved character from X + ldx #$00 ; high byte of int return value + rts diff --git a/libsrc/osic1p/chline.s b/libsrc/osic1p/chline.s index be40d40af..ae2df5014 100644 --- a/libsrc/osic1p/chline.s +++ b/libsrc/osic1p/chline.s @@ -9,13 +9,12 @@ ; .export _chlinexy, _chline - .import popa, _gotoxy, cputdirect + .import gotoxy, cputdirect .importzp tmp1 _chlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length _chline: diff --git a/libsrc/osic1p/crt0.s b/libsrc/osic1p/crt0.s index 62342c206..56abb7cdb 100644 --- a/libsrc/osic1p/crt0.s +++ b/libsrc/osic1p/crt0.s @@ -8,7 +8,7 @@ .import _main .export __STARTUP__ : absolute = 1 ; Mark as startup -.import __RAM_START__, __RAM_SIZE__ ; Linker generated +.import __MAIN_START__, __MAIN_SIZE__ ; Linker generated .import __STACKSIZE__ .import zerobss, initlib, donelib @@ -32,10 +32,10 @@ _init: ldx #$FF ; Initialize stack pointer to $01FF ; --------------------------------------------------------------------------- ; Set cc65 argument stack pointer - lda #<(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) + lda #<(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) + ldx #>(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) sta sp - lda #>(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) - sta sp+1 + stx sp+1 ; --------------------------------------------------------------------------- ; Initialize memory storage diff --git a/libsrc/osic1p/ctype.s b/libsrc/osic1p/ctype.s index fa901c189..1301965eb 100644 --- a/libsrc/osic1p/ctype.s +++ b/libsrc/osic1p/ctype.s @@ -1,289 +1,5 @@ -; ; Character specification table. ; -; Ullrich von Bassewitz, 02.06.1998 -; 2003-05-02, Greg King -; -; Copied from cbm/ctype.s +; uses the "common" definition -; The following 256-byte-wide table specifies attributes for the isxxx type -; of functions. Doing it by a table means some overhead in space, but it -; has major advantages: -; -; * It is fast. If it weren't for the slow parameter-passing of cc65, -; one even could define C-language macroes for the isxxx functions -; (as it usually is done, on other platforms). -; -; * It is highly portable. The only unportable part is the table itself; -; all real code goes into the common library. -; -; * We save some code in the isxxx functions. - -; This table is taken from Craig S. Bruce's technical docs. for the ACE OS. - - .include "ctype.inc" - -; The table is read-only, put it into the RODATA segment. - - .rodata - -__ctype: - .byte CT_CTRL ; 0/00 ___rvs_@___ - .byte CT_CTRL ; 1/01 ___rvs_a___ - .byte CT_CTRL ; 2/02 ___rvs_b___ - .byte CT_CTRL ; 3/03 ___rvs_c___ - .byte CT_CTRL ; 4/04 ___rvs_d___ - .byte CT_CTRL ; 5/05 ___rvs_e___ - .byte CT_CTRL ; 6/06 ___rvs_f___ - .byte CT_CTRL ; 7/07 _BEL/rvs_g_ - .byte CT_CTRL ; 8/08 ___rvs_h___ - .byte CT_CTRL | CT_OTHER_WS | CT_SPACE_TAB ; 9/09 _TAB/rvs_i_ - .byte CT_CTRL | CT_OTHER_WS ; 10/0a _BOL/rvs_j_ - .byte CT_CTRL ; 11/0b ___rvs_k___ - .byte CT_CTRL ; 12/0c ___rvs_l___ - .byte CT_CTRL | CT_OTHER_WS ; 13/0d _CR_/rvs_m_ - .byte CT_CTRL ; 14/0e ___rvs_n___ - .byte CT_CTRL ; 15/0f ___rvs_o___ - .byte CT_CTRL ; 16/10 ___rvs_p___ - .byte CT_CTRL | CT_OTHER_WS ; 17/11 _VT_/rvs_q_ - .byte CT_CTRL ; 18/12 ___rvs_r___ - .byte CT_CTRL | CT_OTHER_WS ; 19/13 HOME/rvs_s_ - .byte CT_CTRL | CT_OTHER_WS ; 20/14 _BS_/rvs_t_ - .byte CT_CTRL ; 21/15 ___rvs_u___ - .byte CT_CTRL ; 22/16 ___rvs_v___ - .byte CT_CTRL ; 23/17 ___rvs_w___ - .byte CT_CTRL ; 24/18 ___rvs_x___ - .byte CT_CTRL ; 25/19 ___rvs_y___ - .byte CT_CTRL ; 26/1a ___rvs_z___ - .byte CT_CTRL ; 27/1b ___rvs_[___ - .byte CT_CTRL ; 28/1c ___rvs_\___ - .byte CT_CTRL | CT_OTHER_WS ; 29/1d cursr-right - .byte CT_CTRL ; 30/1e ___rvs_^___ - .byte CT_CTRL ; 31/1f _rvs_under_ - .byte CT_SPACE | CT_SPACE_TAB ; 32/20 ___SPACE___ - .byte $00 ; 33/21 _____!_____ - .byte $00 ; 34/22 _____"_____ - .byte $00 ; 35/23 _____#_____ - .byte $00 ; 36/24 _____$_____ - .byte $00 ; 37/25 _____%_____ - .byte $00 ; 38/26 _____&_____ - .byte $00 ; 39/27 _____'_____ - .byte $00 ; 40/28 _____(_____ - .byte $00 ; 41/29 _____)_____ - .byte $00 ; 42/2a _____*_____ - .byte $00 ; 43/2b _____+_____ - .byte $00 ; 44/2c _____,_____ - .byte $00 ; 45/2d _____-_____ - .byte $00 ; 46/2e _____._____ - .byte $00 ; 47/2f _____/_____ - .byte CT_DIGIT | CT_XDIGIT ; 48/30 _____0_____ - .byte CT_DIGIT | CT_XDIGIT ; 49/31 _____1_____ - .byte CT_DIGIT | CT_XDIGIT ; 50/32 _____2_____ - .byte CT_DIGIT | CT_XDIGIT ; 51/33 _____3_____ - .byte CT_DIGIT | CT_XDIGIT ; 52/34 _____4_____ - .byte CT_DIGIT | CT_XDIGIT ; 53/35 _____5_____ - .byte CT_DIGIT | CT_XDIGIT ; 54/36 _____6_____ - .byte CT_DIGIT | CT_XDIGIT ; 55/37 _____7_____ - .byte CT_DIGIT | CT_XDIGIT ; 56/38 _____8_____ - .byte CT_DIGIT | CT_XDIGIT ; 57/39 _____9_____ - .byte $00 ; 58/3a _____:_____ - .byte $00 ; 59/3b _____;_____ - .byte $00 ; 60/3c _____<_____ - .byte $00 ; 61/3d _____=_____ - .byte $00 ; 62/3e _____>_____ - .byte $00 ; 63/3f _____?_____ - - .byte $00 ; 64/40 _____@_____ - .byte CT_LOWER | CT_XDIGIT ; 65/41 _____a_____ - .byte CT_LOWER | CT_XDIGIT ; 66/42 _____b_____ - .byte CT_LOWER | CT_XDIGIT ; 67/43 _____c_____ - .byte CT_LOWER | CT_XDIGIT ; 68/44 _____d_____ - .byte CT_LOWER | CT_XDIGIT ; 69/45 _____e_____ - .byte CT_LOWER | CT_XDIGIT ; 70/46 _____f_____ - .byte CT_LOWER ; 71/47 _____g_____ - .byte CT_LOWER ; 72/48 _____h_____ - .byte CT_LOWER ; 73/49 _____i_____ - .byte CT_LOWER ; 74/4a _____j_____ - .byte CT_LOWER ; 75/4b _____k_____ - .byte CT_LOWER ; 76/4c _____l_____ - .byte CT_LOWER ; 77/4d _____m_____ - .byte CT_LOWER ; 78/4e _____n_____ - .byte CT_LOWER ; 79/4f _____o_____ - .byte CT_LOWER ; 80/50 _____p_____ - .byte CT_LOWER ; 81/51 _____q_____ - .byte CT_LOWER ; 82/52 _____r_____ - .byte CT_LOWER ; 83/53 _____s_____ - .byte CT_LOWER ; 84/54 _____t_____ - .byte CT_LOWER ; 85/55 _____u_____ - .byte CT_LOWER ; 86/56 _____v_____ - .byte CT_LOWER ; 87/57 _____w_____ - .byte CT_LOWER ; 88/58 _____x_____ - .byte CT_LOWER ; 89/59 _____y_____ - .byte CT_LOWER ; 90/5a _____z_____ - .byte $00 ; 91/5b _____[_____ - .byte $00 ; 92/5c _____\_____ - .byte $00 ; 93/5d _____]_____ - .byte $00 ; 94/5e _____^_____ - .byte $00 ; 95/5f _UNDERLINE_ - .byte $00 ; 96/60 _A`_grave__ - .byte $00 ; 97/61 _A'_acute__ - .byte $00 ; 98/62 _A^_circum_ - .byte $00 ; 99/63 _A~_tilde__ - .byte $00 ; 100/64 _A"_dieres_ - .byte $00 ; 101/65 _A__ring___ - .byte $00 ; 102/66 _AE________ - .byte $00 ; 103/67 _C,cedilla_ - .byte $00 ; 104/68 _E`_grave__ - .byte $00 ; 105/69 _E'_acute__ - .byte $00 ; 106/6a _E^_circum_ - .byte $00 ; 107/6b _E"_dieres_ - .byte $00 ; 108/6c _I`_grave__ - .byte $00 ; 109/6d _I'_acute__ - .byte $00 ; 110/6e _I^_circum_ - .byte $00 ; 111/6f _I"_dieres_ - .byte $00 ; 112/70 _D-_Eth_lr_ - .byte $00 ; 113/71 _N~_tilde__ - .byte $00 ; 114/72 _O`_grave__ - .byte $00 ; 115/73 _O'_acute__ - .byte $00 ; 116/74 _O^_circum_ - .byte $00 ; 117/75 _O~_tilde__ - .byte $00 ; 118/76 _O"_dieres_ - .byte $00 ; 119/77 __multiply_ - .byte $00 ; 120/78 _O/_slash__ - .byte $00 ; 121/79 _U`_grave__ - .byte $00 ; 122/7a _U'_acute__ - .byte $00 ; 123/7b _U^_circum_ - .byte $00 ; 124/7c _U"_dieres_ - .byte $00 ; 125/7d _Y'_acute__ - .byte $00 ; 126/7e _cap_thorn_ - .byte $00 ; 127/7f _Es-sed_B__ - - .byte CT_CTRL ; 128/80 __bullet___ - .byte CT_CTRL ; 129/81 __v_line___ - .byte CT_CTRL ; 130/82 __h_line___ - .byte CT_CTRL ; 131/83 ___cross___ - .byte CT_CTRL ; 132/84 _tl_corner_ - .byte CT_CTRL ; 133/85 _tr_corner_ - .byte CT_CTRL ; 134/86 _bl_corner_ - .byte CT_CTRL ; 135/87 _br_corner_ - .byte CT_CTRL ; 136/88 ___l_tee___ - .byte CT_CTRL ; 137/89 ___r_tee___ - .byte CT_CTRL ; 138/8a ___t_tee___ - .byte CT_CTRL ; 139/8b ___b_tee___ - .byte CT_CTRL ; 140/8c ___heart___ - .byte CT_CTRL | CT_OTHER_WS ; 141/8d _CR/diamond - .byte CT_CTRL ; 142/8e ___club____ - .byte CT_CTRL ; 143/8f ___spade___ - .byte CT_CTRL ; 144/90 _s_circle__ - .byte CT_CTRL | CT_OTHER_WS ; 145/91 _cursor-up_ - .byte CT_CTRL ; 146/92 ___pound___ - .byte CT_CTRL | CT_OTHER_WS ; 147/93 _CLS/check_ - .byte CT_CTRL | CT_OTHER_WS ; 148/94 __INSert___ - .byte CT_CTRL ; 149/95 ____+/-____ - .byte CT_CTRL ; 150/96 __divide___ - .byte CT_CTRL ; 151/97 __degree___ - .byte CT_CTRL ; 152/98 _c_checker_ - .byte CT_CTRL ; 153/99 _f_checker_ - .byte CT_CTRL ; 154/9a _solid_sq__ - .byte CT_CTRL ; 155/9b __cr_char__ - .byte CT_CTRL ; 156/9c _up_arrow__ - .byte CT_CTRL | CT_OTHER_WS ; 157/9d cursor-left - .byte CT_CTRL ; 158/9e _left_arro_ - .byte CT_CTRL ; 159/9f _right_arr_ - .byte CT_SPACE | CT_SPACE_TAB ; 160/a0 _req space_ - .byte $00 ; 161/a1 _!_invertd_ - .byte $00 ; 162/a2 ___cent____ - .byte $00 ; 163/a3 ___pound___ - .byte $00 ; 164/a4 __currency_ - .byte $00 ; 165/a5 ____yen____ - .byte $00 ; 166/a6 _|_broken__ - .byte $00 ; 167/a7 __section__ - .byte $00 ; 168/a8 __umulaut__ - .byte $00 ; 169/a9 _copyright_ - .byte $00 ; 170/aa __fem_ord__ - .byte $00 ; 171/ab _l_ang_quo_ - .byte $00 ; 172/ac ____not____ - .byte $00 ; 173/ad _syl_hyphn_ - .byte $00 ; 174/ae _registerd_ - .byte $00 ; 175/af _overline__ - .byte $00 ; 176/b0 __degrees__ - .byte $00 ; 177/b1 ____+/-____ - .byte $00 ; 178/b2 _2_supersc_ - .byte $00 ; 179/b3 _3_supersc_ - .byte $00 ; 180/b4 ___acute___ - .byte $00 ; 181/b5 ____mu_____ - .byte $00 ; 182/b6 _paragraph_ - .byte $00 ; 183/b7 __mid_dot__ - .byte $00 ; 184/b8 __cedilla__ - .byte $00 ; 185/b9 _1_supersc_ - .byte $00 ; 186/ba __mas_ord__ - .byte $00 ; 187/bb _r_ang_quo_ - .byte $00 ; 188/bc ____1/4____ - .byte $00 ; 189/bd ____1/2____ - .byte $00 ; 190/be ____3/4____ - .byte $00 ; 191/bf _?_invertd_ - - .byte $00 ; 192/c0 _____`_____ - .byte CT_UPPER | CT_XDIGIT ; 193/c1 _____A_____ - .byte CT_UPPER | CT_XDIGIT ; 194/c2 _____B_____ - .byte CT_UPPER | CT_XDIGIT ; 195/c3 _____C_____ - .byte CT_UPPER | CT_XDIGIT ; 196/c4 _____D_____ - .byte CT_UPPER | CT_XDIGIT ; 197/c5 _____E_____ - .byte CT_UPPER | CT_XDIGIT ; 198/c6 _____F_____ - .byte CT_UPPER ; 199/c7 _____G_____ - .byte CT_UPPER ; 200/c8 _____H_____ - .byte CT_UPPER ; 201/c9 _____I_____ - .byte CT_UPPER ; 202/ca _____J_____ - .byte CT_UPPER ; 203/cb _____K_____ - .byte CT_UPPER ; 204/cc _____L_____ - .byte CT_UPPER ; 205/cd _____M_____ - .byte CT_UPPER ; 206/ce _____N_____ - .byte CT_UPPER ; 207/cf _____O_____ - .byte CT_UPPER ; 208/d0 _____P_____ - .byte CT_UPPER ; 209/d1 _____Q_____ - .byte CT_UPPER ; 210/d2 _____R_____ - .byte CT_UPPER ; 211/d3 _____S_____ - .byte CT_UPPER ; 212/d4 _____T_____ - .byte CT_UPPER ; 213/d5 _____U_____ - .byte CT_UPPER ; 214/d6 _____V_____ - .byte CT_UPPER ; 215/d7 _____W_____ - .byte CT_UPPER ; 216/d8 _____X_____ - .byte CT_UPPER ; 217/d9 _____Y_____ - .byte CT_UPPER ; 218/da _____Z_____ - .byte $00 ; 219/db _____{_____ - .byte $00 ; 220/dc _____|_____ - .byte $00 ; 221/dd _____}_____ - .byte $00 ; 222/de _____~_____ - .byte $00 ; 223/df ___HOUSE___ - .byte $00 ; 224/e0 _a`_grave__ - .byte $00 ; 225/e1 _a'_acute__ - .byte $00 ; 226/e2 _a^_circum_ - .byte $00 ; 227/e3 _a~_tilde__ - .byte $00 ; 228/e4 _a"_dieres_ - .byte $00 ; 229/e5 _a__ring___ - .byte $00 ; 230/e6 _ae________ - .byte $00 ; 231/e7 _c,cedilla_ - .byte $00 ; 232/e8 _e`_grave__ - .byte $00 ; 233/e9 _e'_acute__ - .byte $00 ; 234/ea _e^_circum_ - .byte $00 ; 235/eb _e"_dieres_ - .byte $00 ; 236/ec _i`_grave__ - .byte $00 ; 237/ed _i'_acute__ - .byte $00 ; 238/ee _i^_circum_ - .byte $00 ; 239/ef _i"_dieres_ - .byte $00 ; 240/f0 _o^x_Eth_s_ - .byte $00 ; 241/f1 _n~_tilda__ - .byte $00 ; 242/f2 _o`_grave__ - .byte $00 ; 243/f3 _o'_acute__ - .byte $00 ; 244/f4 _o^_circum_ - .byte $00 ; 245/f5 _o~_tilde__ - .byte $00 ; 246/f6 _o"_dieres_ - .byte $00 ; 247/f7 __divide___ - .byte $00 ; 248/f8 _o/_slash__ - .byte $00 ; 249/f9 _u`_grave__ - .byte $00 ; 250/fa _u'_acute__ - .byte $00 ; 251/fb _u^_circum_ - .byte $00 ; 252/fc _u"_dieres_ - .byte $00 ; 253/fd _y'_acute__ - .byte $00 ; 254/fe _sm_thorn__ - .byte $00 ; 255/ff _y"_dieres_ + .include "ctype_common.inc" diff --git a/libsrc/osic1p/cvline.s b/libsrc/osic1p/cvline.s index 84e5a45bf..7a393bdc8 100644 --- a/libsrc/osic1p/cvline.s +++ b/libsrc/osic1p/cvline.s @@ -8,13 +8,12 @@ ; .export _cvlinexy, _cvline - .import popa, _gotoxy, putchar, newline + .import gotoxy, putchar, newline .importzp tmp1 _cvlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length and run into _cvline _cvline: diff --git a/libsrc/osic1p/doesclrscr.s b/libsrc/osic1p/doesclrscr.s new file mode 100644 index 000000000..3d15e8ade --- /dev/null +++ b/libsrc/osic1p/doesclrscr.s @@ -0,0 +1,14 @@ +; +; 2016-06, Christian Groessler +; 2017-06-26, Greg King +; +; unsigned char doesclrscrafterexit (void); +; +; Returns 0/1 if, after program termination, the screen isn't/is cleared. +; + + .import return1 + +; cc65's OSI programs return to the monitor ROM which clears the screen. + + .export _doesclrscrafterexit := return1 diff --git a/libsrc/osic1p/gotoxy.s b/libsrc/osic1p/gotoxy.s index f76537349..b9666a722 100644 --- a/libsrc/osic1p/gotoxy.s +++ b/libsrc/osic1p/gotoxy.s @@ -6,10 +6,13 @@ ; ; void gotoxy (unsigned char x, unsigned char y); ; - .export _gotoxy + .export gotoxy, _gotoxy .import popa, plot .include "extzp.inc" +gotoxy: + jsr popa ; Get Y + _gotoxy: sta CURS_Y ; Set Y jsr popa ; Get X diff --git a/libsrc/osic1p/kbhit.s b/libsrc/osic1p/kbhit.s index b616b4a3f..8744baf61 100644 --- a/libsrc/osic1p/kbhit.s +++ b/libsrc/osic1p/kbhit.s @@ -10,38 +10,195 @@ ; in tmp1 and that is set to zero after the first round. ; + .constructor initkbhit .export _kbhit .include "osic1p.inc" .include "extzp.inc" .include "zeropage.inc" -_kbhit: - lda #%11011111 ; Mask for only checking the column for the - sta tmp1 ; ESC key in the first keyboard row. +; Internal state that needs to be preserved across calls. +.segment "EXTZP" : zeropage + +LASTSCAN: .res 1 ; Result of previous keyboard scan +DBNCCNT: .res 1 ; Debounce counter +KBDTMP: .res 1 ; Temporary values +CTRLSHIFT: .res 1 ; State of CTRL and SHIFT keys + +; Initialize one-character buffer that is filled by kbhit() + .segment "ONCE" +initkbhit: + lda #$00 + sta CHARBUF ; No character in buffer initially + + sta LASTSCAN ; Initialize keyboard state + sta DBNCCNT + sta KBDTMP + sta CTRLSHIFT - lda #%11111110 ; Mask for first keyboard row -scan: - sta KBD ; Select keyboard row - tax ; Save A - lda KBD ; Read keyboard columns - ora tmp1 ; Mask out uninteresting keys (only relevant in - ; first row) - cmp #$FF ; No keys pressed? - bne keypressed - lda #$00 ; For remaining rows no keys masked - sta tmp1 - txa ; Restore A - sec ; Want to shift in ones - rol a ; Rotate row select to next bit position - cmp #$FF ; Done? - bne scan ; If not, continue - lda #$00 ; Return false - tax ; High byte of return is also zero - sta CHARBUF ; No character in buffer rts -keypressed: - jsr INPUTC ; Get input character in A - sta CHARBUF ; Save in buffer + +; Routine to get character from keyboard and return it in A. +; Based on the OSI ROM routine at $FD00 but uses different +; storage locations to avoid corrupting CC65 run-time code. + +_kbhit: lda CHARBUF ; Check for previously saved character + beq LFD05 ldx #$00 ; High byte of return is always zero - lda #$01 ; Return true + rts ; A contains non-zero character code meaning true +LFD05: lda #$80 ; Bit mask for initial keyboard row +LFD06: jsr LFCBE ; Write keyboard row + jsr LFCC6 ; Read keyboard column + bne LFD13 ; Branch if a key in this column was pressed + lsr a ; Otherwise shift mask to next row + bne LFD06 ; If not done yet, check next row + beq LFD3A ; Branch if last row reached and no key pressed +LFD13: lsr a ; Have a key press. Shift LSB into carry + bcc LFD1F ; Branch if no key pressed in column 0 + txa ; Key pressed in row zero. Get the column data + and #$20 ; Mask only the bit for <ESC> as it is the only key in row zero that returns key press + beq LFD3A ; Branch if <ESC> was not the key + lda #$1B ; Set character to <ESC> + bne LFD50 ; Do more processing +LFD1F: jsr LFE86 ; Shift to find bit that is set (in Y) + tya ; Get bit + sta KBDTMP ; Save it + asl a ; Multiply by 7 by shifting left three times (X8)... + asl a + asl a + sec ; ...then subtracting one + sbc KBDTMP + sta KBDTMP ; Save value*7 for later lookup in table + txa ; Get the keyboard column + lsr a ; Shift out bit zero (only key there is <SHIFT LOCK>) + asl a ; And shift back + jsr LFE86 ; Shift to find bit that is set (in Y) + beq LFD47 ; Branch if no keys pressed + lda #$00 +LFD3A: sta CTRLSHIFT ; Save state of <CTRL> and shift keys +LFD3D: sta LASTSCAN + lda #$02 ; Count used for key debouncing + sta DBNCCNT + ldx #$00 ; High byte of return is always zero + lda #$00 ; Return false rts +LFD47: clc + tya ; Get bit number of pressed key + adc KBDTMP ; Add previously calculated offset for keyboard row*7 + tay + lda LFF3B,y ; Read ASCII code for key from table +LFD50: cmp LASTSCAN ; Debounce - same as last key scan? + bne LFD3D ; If not, try again + dec DBNCCNT ; Decrement debounce counter + beq LFD5F ; Branch if done debouncing + jsr LFCDF ; Wait for short delay to debounce keyboard + beq _kbhit ; Go back and scan keyboard. +LFD5F: ldx #$64 ; Was <CONTROL> key down? + cmp CTRLSHIFT + bne LFD68 ; Branch if not + ldx #$0F +LFD68: stx DBNCCNT + sta CTRLSHIFT + cmp #$21 + bmi LFDD0 ; Done, return key + cmp #$5F + beq LFDD0 ; Done, return key + lda #$01 + jsr LFCBE ; Write keyboard row + jsr LFCCF ; Read keyboard column + sta KBDTMP + tax + and #$06 + bne LFDA2 + bit LASTSCAN + bvc LFDBB + txa + eor #$01 + and #$01 + beq LFDBB + lda #$20 + bit KBDTMP + bvc LFDC3 + lda #$C0 + bne LFDC3 +LFDA2: bit LASTSCAN + bvc LFDAA + txa + beq LFDBB +LFDAA: ldy LASTSCAN + cpy #$31 + bcc LFDB9 + cpy #$3C + bcs LFDB9 + lda #$F0 + bne LFDBB +LFDB9: lda #$10 +LFDBB: bit KBDTMP + bvc LFDC3 + clc + adc #$C0 +LFDC3: clc + adc LASTSCAN + and #$7F + bit KBDTMP + bpl LFDD0 + ora #$80 +LFDD0: sta KBDTMP ; Save pressed key and return in A + sta CHARBUF + rts + +; Write keyboard row with value in A. +; Invert the bits before writing. +; Returns original value of A. + +LFCBE: eor #$FF + sta KBD + eor #$FF + rts + +; Read keyboard column and return in X. +; Sets Z flag if no keys were pressed. +; Saves current value of A. + +LFCC6: pha ; Save A + jsr LFCCF ; Read keyboard column + tax ; Save in X + pla ; Restore A + dex ; Decrement and then increment to + inx ; preserve value of X but set flags + rts + +; Read keyboard column. +; Invert the bits (pressed key(s) will show up as ones). + +LFCCF: lda KBD ; Read keyboard hardware + eor #$FF ; Invert the bits + rts + +; Short fixed delay routine. + +LFCDF: ldy #$10 +LFCE1: ldx #$40 +LFCE3: dex + bne LFCE3 + dey + bne LFCE1 + rts + +; Shift A left until we find a 1 in the most significant bit. +; Return the bit number in Y. + +LFE86: ldy #$08 +LFE88: dey + asl a + bcc LFE88 + rts + +; Lookup table of keyboard keys for each scan row. +LFF3B: .byte $BD + .byte 'P', ';', '/', ' ', 'Z', 'A', 'Q' + .byte ',', 'M', 'N', 'B', 'V', 'C', 'X' + .byte 'K', 'J', 'H', 'G', 'F', 'D', 'S' + .byte 'I', 'U', 'Y', 'T', 'R', 'E', 'W' + .byte $00, $00, $0D, $0A, 'O', 'L', '.' + .byte $00, '_', '-', ':', '0', '9', '8' + .byte '7', '6', '5', '4', '3', '2', '1' diff --git a/libsrc/osic1p/osic1p.inc b/libsrc/osic1p/osic1p.inc index eabeaf79e..9f8620dcb 100644 --- a/libsrc/osic1p/osic1p.inc +++ b/libsrc/osic1p/osic1p.inc @@ -1,4 +1,3 @@ -; Addresses -INPUTC := $FD00 ; Input character from keyboard -RESET := $FF00 ; Reset address, show boot prompt -KBD := $DF00 ; Polled keyboard register +; Addresses +RESET := $FF00 ; Reset address, show boot prompt +KBD := $DF00 ; Polled keyboard register diff --git a/libsrc/osic1p/osiscreen.inc b/libsrc/osic1p/osiscreen.inc index 66c5e9fb0..509b4cf79 100644 --- a/libsrc/osic1p/osiscreen.inc +++ b/libsrc/osic1p/osiscreen.inc @@ -1,184 +1,184 @@ -; -; Macro definitions for screen layout modules -; - - .include "extzp.inc" - -.linecont + - -; -; Internal function for screensize() -; -.macro osi_screensize ScrWidth, ScrHeight - ; Macro implementation of internal screensize - ; function for given width and height in - ; characters - - .export screensize - -.proc screensize - ldx #ScrWidth - ldy #ScrHeight - rts -.endproc -.endmacro - -; -; void clrscr (void); -; -.macro osi_clrscr ScrBase, ScrRamSize - - .export _clrscr - -.proc _clrscr - lda #<ScrBase ; Fill whole video RAM with blanks by calling - ldx #>ScrBase ; memset appropriately - jsr pushax - - lda #' ' - ldx #$00 - jsr pushax - - lda #<ScrRamSize - ldx #>ScrRamSize - jsr _memset - - lda #$00 ; Cursor in upper left corner - sta CURS_X - sta CURS_Y - - jmp plot ; Set the cursor position -.endproc - -.endmacro - -; -; cputc/cputcxy for Challenger 1P -; Based on PET/CBM implementation -; - -.macro osi_cputfuncs ScrBase, ScrFirstChar, ScrWidth, ScrHeight, \ - ScrollDist, ScrLo, ScrHi - - ; Number of characters to move for scrolling - ; by one line -ScrollLength = (ScrHeight - 1) * ScrollDist - -; -; void cputcxy (unsigned char x, unsigned char y, char c); -; void cputc (char c); -; - .export _cputcxy, _cputc, cputdirect, putchar - .export newline, plot - -_cputcxy: - pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x - pla ; Restore C - -; Plot a character - also used as internal function - -_cputc: cmp #$0A ; CR? - bne L1 - lda #0 - sta CURS_X - beq plot ; Recalculate pointers - -L1: cmp #$0D ; LF? - beq newline ; Recalculate pointers - -cputdirect: - jsr putchar ; Write the character to the screen - -; Advance cursor position, register Y contains horizontal position after -; putchar - - cpy #(ScrWidth - 1) ; Check whether line is full - bne L3 - jsr newline ; New line - ldy #$FF ; + cr -L3: iny - sty CURS_X - rts - -newline: - inc CURS_Y - lda CURS_Y - cmp #ScrHeight ; Screen height - bne plot - dec CURS_Y ; Bottom of screen reached, scroll - - ; Scroll destination address - lda #<(ScrBase + ScrFirstChar) - ldx #>(ScrBase + ScrFirstChar) - jsr pushax - - ; Scroll source address - lda #<(ScrBase + ScrFirstChar + ScrollDist) - ldx #>(ScrBase + ScrFirstChar + ScrollDist) - jsr pushax - - ; Number of characters to move - lda #<ScrollLength - ldx #>ScrollLength - jsr _memmove - - ; Address of first character in last line - ; of screen - lda #<(ScrBase + ScrFirstChar + ScrollLength) - sta ptr1 - lda #>(ScrBase + ScrFirstChar + ScrollLength) - sta ptr1+1 - - ldy #ScrWidth ; Fill last line with blanks - lda #' ' -clrln: sta (ptr1),y - dey - bpl clrln - -plot: ldy CURS_Y - lda ScrLo,y - sta SCREEN_PTR - lda ScrHi,y - sta SCREEN_PTR+1 - rts - -; Write one character to the screen without doing anything else, return X -; position in register Y - -putchar: - ldy CURS_X - sta (SCREEN_PTR),y ; Set char - rts - -.endmacro - -.macro osi_screen_funcs ScrBase, ScrRamSize, ScrFirstChar, \ - ScrWidth, ScrHeight, ScrollDist - - .import popa, _gotoxy - .import _memmove, _memset, pushax - .importzp ptr1 - -.rodata - -; Screen address tables - offset to real screen -ScrTabLo: - .repeat ScrHeight, I - .byte <(ScrBase + ScrFirstChar + I * ScrollDist) - .endrep - -ScrTabHi: - .repeat ScrHeight, I - .byte >(ScrBase + ScrFirstChar + I * ScrollDist) - .endrep - -.code - -osi_cputfuncs ScrBase, ScrFirstChar, ScrWidth, ScrHeight, \ - ScrollDist, ScrTabLo, ScrTabHi -osi_screensize ScrWidth, ScrHeight -osi_clrscr ScrBase, ScrRamSize - -.endmacro \ No newline at end of file +; +; Macro definitions for screen layout modules +; + + .include "extzp.inc" + +.linecont + + +; +; Internal function for screensize() +; +.macro osi_screensize ScrWidth, ScrHeight + ; Macro implementation of internal screensize + ; function for given width and height in + ; characters + + .export screensize + +.proc screensize + ldx #ScrWidth + ldy #ScrHeight + rts +.endproc +.endmacro + +; +; void clrscr (void); +; +.macro osi_clrscr ScrBase, ScrRamSize + + .export _clrscr + +.proc _clrscr + lda #<ScrBase ; Fill whole video RAM with blanks by calling + ldx #>ScrBase ; memset appropriately + jsr pushax + + lda #' ' + ldx #$00 + jsr pushax + + lda #<ScrRamSize + ldx #>ScrRamSize + jsr _memset + + lda #$00 ; Cursor in upper left corner + sta CURS_X + sta CURS_Y + + jmp plot ; Set the cursor position +.endproc + +.endmacro + +; +; cputc/cputcxy for Challenger 1P +; Based on PET/CBM implementation +; + +.macro osi_cputfuncs ScrBase, ScrFirstChar, ScrWidth, ScrHeight, \ + ScrollDist, ScrLo, ScrHi + + ; Number of characters to move for scrolling + ; by one line +ScrollLength = (ScrHeight - 1) * ScrollDist + +; +; void cputcxy (unsigned char x, unsigned char y, char c); +; void cputc (char c); +; + .export _cputcxy, _cputc, cputdirect, putchar + .export newline, plot + +_cputcxy: + pha ; Save C + jsr gotoxy ; Set cursor, drop x and y + pla ; Restore C + +; Plot a character - also used as internal function + +_cputc: cmp #$0D ; CR? + bne L1 + lda #0 + sta CURS_X + beq plot ; Recalculate pointers + +L1: cmp #$0A ; LF? + beq newline ; Recalculate pointers + +cputdirect: + jsr putchar ; Write the character to the screen + +; Advance cursor position, register Y contains horizontal position after +; putchar + + cpy #(ScrWidth - 1) ; Check whether line is full + bne L3 + jsr newline ; New line + ldy #$FF ; + cr +L3: iny + sty CURS_X + rts + +newline: + inc CURS_Y + lda CURS_Y + cmp #ScrHeight ; Screen height + bne plot + dec CURS_Y ; Bottom of screen reached, scroll + + ; Scroll destination address + lda #<(ScrBase + ScrFirstChar) + ldx #>(ScrBase + ScrFirstChar) + jsr pushax + + ; Scroll source address + lda #<(ScrBase + ScrFirstChar + ScrollDist) + ldx #>(ScrBase + ScrFirstChar + ScrollDist) + jsr pushax + + ; Number of characters to move + lda #<ScrollLength + ldx #>ScrollLength + jsr _memmove + + ; Address of first character in last line + ; of screen + lda #<(ScrBase + ScrFirstChar + ScrollLength) + sta ptr1 + lda #>(ScrBase + ScrFirstChar + ScrollLength) + sta ptr1+1 + + ldy #ScrWidth ; Fill last line with blanks + lda #' ' +clrln: sta (ptr1),y + dey + bpl clrln + +plot: ldy CURS_Y + lda ScrLo,y + sta SCREEN_PTR + lda ScrHi,y + sta SCREEN_PTR+1 + rts + +; Write one character to the screen without doing anything else, return X +; position in register Y + +putchar: + ldy CURS_X + sta (SCREEN_PTR),y ; Set char + rts + +.endmacro + +.macro osi_screen_funcs ScrBase, ScrRamSize, ScrFirstChar, \ + ScrWidth, ScrHeight, ScrollDist + + .import gotoxy + .import _memmove, _memset, pushax + .importzp ptr1 + +.rodata + +; Screen address tables - offset to real screen +ScrTabLo: + .repeat ScrHeight, I + .byte <(ScrBase + ScrFirstChar + I * ScrollDist) + .endrep + +ScrTabHi: + .repeat ScrHeight, I + .byte >(ScrBase + ScrFirstChar + I * ScrollDist) + .endrep + + +.code + +osi_cputfuncs ScrBase, ScrFirstChar, ScrWidth, ScrHeight, \ + ScrollDist, ScrTabLo, ScrTabHi +osi_screensize ScrWidth, ScrHeight +osi_clrscr ScrBase, ScrRamSize + +.endmacro diff --git a/libsrc/osic1p/revers.s b/libsrc/osic1p/revers.s new file mode 100644 index 000000000..bb178f647 --- /dev/null +++ b/libsrc/osic1p/revers.s @@ -0,0 +1,9 @@ +; +; 2017-06-26, Greg King +; +; unsigned char __fastcall__ revers (unsigned char onoff) +; + + .import return0 + + .export _revers := return0 ; no attribute diff --git a/libsrc/pce/_printf.s b/libsrc/pce/_printf.s new file mode 100644 index 000000000..e1d2a1cf4 --- /dev/null +++ b/libsrc/pce/_printf.s @@ -0,0 +1,791 @@ +; +; _printf: Basic layer for all printf type functions. +; +; 2000-10-21, Ullrich von Bassewitz +; 2021-05-04, Greg King +; + + .include "zeropage.inc" + + .export __printf + + .import popax, pushax, pusheax, decsp6, push1, axlong, axulong + .import _ltoa, _ultoa + .import _strlower, _strlen + + .macpack generic + +; ---------------------------------------------------------------------------- +; We will store variables into the register bank in the zeropage. Define +; equates for these variables. + +ArgList = regbank+0 ; Argument list pointer +Format = regbank+2 ; Format string +OutData = regbank+4 ; Function parameters + +; ---------------------------------------------------------------------------- +; Other zero page cells + +Base = ptr1 +FSave = ptr1 +FCount = ptr2 + +.code + +; ---------------------------------------------------------------------------- +; Get one character from the format string, and increment the pointer. Will +; return zero in .Y. + +GetFormatChar: + ldy #0 + lda (Format),y +IncFormatPtr: + inc Format + bne @L1 + inc Format+1 +@L1: rts + +; ---------------------------------------------------------------------------- +; Output a pad character: outfunc (d, &padchar, 1) + +OutputPadChar: + lda PadChar + +; ---------------------------------------------------------------------------- +; Call the output function with one character in .A + +Output1: + sta CharArg + jsr PushOutData + lda #<CharArg + ldx #>CharArg + jsr pushax + jsr push1 + jmp CallOutFunc ; fout (OutData, &CharArg, 1) + +; ---------------------------------------------------------------------------- +; Decrement the argument list pointer by 2 + +DecArgList2: + lda ArgList + sub #2 + sta ArgList + bcs @L1 + dec ArgList+1 +@L1: rts + +; ---------------------------------------------------------------------------- +; Get an unsigned int or long argument depending on the IsLong flag. + +GetUnsignedArg: + lda IsLong ; Check flag + bne GetLongArg ; Long sets all + jsr GetIntArg ; Get an integer argument + jmp axulong ; Convert to unsigned long + +; ---------------------------------------------------------------------------- +; Get an signed int or long argument depending on the IsLong flag. + +GetSignedArg: + lda IsLong ; Check flag + bne GetLongArg ; Long sets all + jsr GetIntArg ; Get an integer argument + jmp axlong ; Convert to long + +; ---------------------------------------------------------------------------- +; Get a long argument from the argument list. Returns 0 in .Y. + +GetLongArg: + jsr GetIntArg ; Get high word + sta sreg + stx sreg+1 + +; Run into GetIntArg fetching the low word + +; ---------------------------------------------------------------------------- +; Get an integer argument from the argument list. Returns 0 in .Y. + +GetIntArg: + jsr DecArgList2 + ldy #1 + lda (ArgList),y + tax + dey + lda (ArgList),y + rts + +; ---------------------------------------------------------------------------- +; Read an integer from the format string. Will return zero in .Y. + +ReadInt: + ldy #0 + sty ptr1 + sty ptr1+1 ; Start with zero +@Loop: lda (Format),y ; Get format string character + sub #'0' ; Make number from ascii digit + bcc @L9 ; Jump if done + cmp #9+1 + bcs @L9 ; Jump if done + +; Skip the digit character + + jsr IncFormatPtr + +; Add the digit to the value we have in ptr1 + + pha ; Save digit value + lda ptr1 + ldx ptr1+1 + asl ptr1 + rol ptr1+1 ; * 2 + asl ptr1 + rol ptr1+1 ; * 4, assume carry clear + adc ptr1 + sta ptr1 + txa + adc ptr1+1 + sta ptr1+1 ; * 5 + asl ptr1 + rol ptr1+1 ; * 10, assume carry clear + pla + adc ptr1 ; Add digit value + sta ptr1 + bcc @Loop + inc ptr1+1 + bcs @Loop ; Branch always + +; We're done converting + +@L9: lda ptr1 + ldx ptr1+1 ; Load result + rts + + +; ---------------------------------------------------------------------------- +; Put a character into the argument buffer and increment the buffer index + +PutBuf: ldy BufIdx + inc BufIdx + sta Buf,y + rts + +; ---------------------------------------------------------------------------- +; Get a pointer to the current buffer end and push it onto the stack + +PushBufPtr: + lda #<Buf + ldx #>Buf + add BufIdx + bcc @L1 + inx +@L1: jmp pushax + +; ---------------------------------------------------------------------------- +; Push OutData onto the software stack + +PushOutData: + lda OutData + ldx OutData+1 + jmp pushax + +; ---------------------------------------------------------------------------- +; Output Width pad characters +; + +PadLoop: + jsr OutputPadChar +OutputPadding: + inc Width + bne PadLoop + inc Width+1 + bne PadLoop + rts + +; ---------------------------------------------------------------------------- +; Output the argument itself: outfunc (d, str, arglen); +; + +OutputArg: + jsr PushOutData + lda Str + ldx Str+1 + jsr pushax + lda ArgLen + ldx ArgLen+1 + jsr pushax + jmp CallOutFunc + +; ---------------------------------------------------------------------------- +; ltoa: Wrapper for _ltoa that pushes all arguments + +ltoa: sty Base ; Save base + jsr pusheax ; Push value + jsr PushBufPtr ; Push the buffer pointer... + lda Base ; Restore base + jmp _ltoa ; ultoa (l, s, base); + + +; ---------------------------------------------------------------------------- +; ultoa: Wrapper for _ultoa that pushes all arguments + +ultoa: sty Base ; Save base + jsr pusheax ; Push value + jsr PushBufPtr ; Push the buffer pointer... + lda Base ; Restore base + jmp _ultoa ; ultoa (l, s, base); + + +; ---------------------------------------------------------------------------- +; + +__printf: + +; Save the register bank variables into the save area + + pha ; Save low byte of ap + ldy #5 + +; The PC-Engine puts the zero-page at $2000. The indexed-by-.Y addressing mode +; doesn't allow zero-page addressing. Therefore, the operand must be redirected +; explicitly. + +Save: lda regbank+$2000,y + sta RegSave,y + dey + bpl Save + pla ; Restore low byte of ap + +; Get the parameters from the stack + + sta ArgList ; Argument list pointer + stx ArgList+1 + + jsr popax ; Format string + sta Format + stx Format+1 + + jsr popax ; Output descriptor + sta OutData + stx OutData+1 + +; Initialize the output counter in the output descriptor to zero + + lda #0 + tay + sta (OutData),y + iny + sta (OutData),y + +; Get the output function from the output descriptor and remember it + + iny + lda (OutData),y + sta CallOutFunc+1 + iny + lda (OutData),y + sta CallOutFunc+2 + +; Start parsing the format string + +MainLoop: + lda Format ; Remember current format pointer + sta FSave + lda Format+1 + sta FSave+1 + + ldy #0 ; Index +@L1: lda (Format),y ; Get next char + beq @L2 ; Jump on end of string + cmp #'%' ; Format spec? + beq @L2 + iny ; Bump pointer + bne @L1 + inc Format+1 ; Bump high byte of pointer + bne @L1 ; Branch always + +; Found a '%' character or end of string. Update the Format pointer so it is +; current (points to this character). + +@L2: tya ; Low byte of offset + add Format + sta Format + bcc @L3 + inc Format+1 + +; Calculate, how many characters must be output. Beware: This number may +; be zero. .A still contains the low byte of the pointer. + +@L3: sub FSave + sta FCount + lda Format+1 + sbc FSave+1 + sta FCount+1 + ora FCount ; Is the result zero? + beq @L4 ; Jump if yes + +; Output the characters that we have until now. To make the call to out +; faster, build the stack frame by hand (don't use pushax) + + jsr decsp6 ; 3 args + ldy #5 + lda OutData+1 + sta (sp),y + dey + lda OutData + sta (sp),y + dey + lda FSave+1 + sta (sp),y + dey + lda FSave + sta (sp),y + dey + lda FCount+1 + sta (sp),y + dey + lda FCount + sta (sp),y + jsr CallOutFunc ; Call the output function + +; We're back from out(), or we didn't call it. Check for end of string. + +@L4: jsr GetFormatChar ; Get one char, zero in .Y + tax ; End of format string reached? + bne NotDone ; End not reached + +; End of format string reached. Restore the zeropage registers and return. + + ldx #5 +Rest: lda RegSave,x + +; The indexed-by-.X addressing mode does allow zero-page addressing. +; Therefore, this operand doesn't need to be redirected explicitly. + + sta regbank,x + dex + bpl Rest + rts + +; Still a valid format character. Check for '%' and a '%%' sequence. Output +; anything that is not a format specifier. On intro, .Y is zero. + +NotDone: + cmp #'%' + bne @L1 + lda (Format),y ; Check for "%%" + cmp #'%' + bne FormatSpec ; Jump if really a format specifier + jsr IncFormatPtr ; Skip the second '%' +@L1: jsr Output1 ; Output the character... + jmp MainLoop ; ...and continue + +; We have a real format specifier +; Format is: %[flags][width][.precision][mod]type +; .Y is zero on entry. + +FormatSpec: + +; Initialize the flags + + lda #0 + ldx #FormatVarSize-1 +@L1: sta FormatVars,x + dex + bpl @L1 + +; Start with reading the flags if there are any. .X is $FF which is used +; for "true" + +ReadFlags: + lda (Format),y ; Get next char... + cmp #'-' + bne @L1 + stx LeftJust + beq @L4 + +@L1: cmp #'+' + bne @L2 + stx AddSign + beq @L4 + +@L2: cmp #' ' + bne @L3 + stx AddBlank + beq @L4 + +@L3: cmp #'#' + bne ReadPadding + stx AltForm + +@L4: jsr IncFormatPtr + jmp ReadFlags ; ...and start over + +; Done with flags, read the pad char. .Y is still zero if we come here. + +ReadPadding: + ldx #' ' ; PadChar + cmp #'0' + bne @L1 + tax ; PadChar is '0' + jsr IncFormatPtr + lda (Format),y ; Read current for later +@L1: stx PadChar + +; Read the width. Even here, .Y is still zero. .A contains the current character +; from the format string. + +ReadWidth: + cmp #'*' + bne @L1 + jsr IncFormatPtr + jsr GetIntArg ; Width is an additional argument + jmp @L2 + +@L1: jsr ReadInt ; Read integer from format string... +@L2: sta Width + stx Width+1 ; ...and remember in Width + +; Read the precision. Even here, .Y is still zero. + + sty Prec ; Assume Precision is zero + sty Prec+1 + lda (Format),y ; Load next format string char + cmp #'.' ; Precision given? + bne ReadMod ; Branch if no precision given + +ReadPrec: + jsr IncFormatPtr ; Skip the '.' + lda (Format),y + cmp #'*' ; Variable precision? + bne @L1 + jsr IncFormatPtr ; Skip the '*' + jsr GetIntArg ; Get integer argument + jmp @L2 + +@L1: jsr ReadInt ; Read integer from format string +@L2: sta Prec + stx Prec+1 + +; Read the modifiers. .Y is still zero. + +ReadMod: + lda (Format),y + cmp #'z' ; size_t - same as unsigned + beq @L2 + cmp #'h' ; short - same as int + beq @L2 + cmp #'t' ; ptrdiff_t - same as int + beq @L2 + cmp #'j' ; intmax_t/uintmax_t - same as long + beq @L1 + cmp #'L' ; long double + beq @L1 + cmp #'l' ; long int + bne DoFormat +@L1: lda #$FF + sta IsLong +@L2: jsr IncFormatPtr + jmp ReadMod + +; Initialize the argument buffer pointers. We use a static buffer (ArgBuf) to +; assemble strings. A zero page index (BufIdx) is used to keep the current +; write position. A pointer to the buffer (Str) is used to point to the +; argument in case we will not use the buffer but a user-supplied string. +; .Y is zero when we come here. + +DoFormat: + sty BufIdx ; Clear BufIdx + ldx #<Buf + stx Str + ldx #>Buf + stx Str+1 + +; Skip the current format character, then check it (current char in .A) + + jsr IncFormatPtr + +; Is it a character? + + cmp #'c' + bne CheckInt + +; It is a character + + jsr GetIntArg ; Get the argument (promoted to int) + sta Buf ; Place it as zero terminated string... + lda #0 + sta Buf+1 ; ...into the buffer + jmp HaveArg ; Done + +; Is it an integer? + +CheckInt: + cmp #'d' + beq @L1 + cmp #'i' + bne CheckCount + +; It is an integer + +@L1: ldx #0 + lda AddBlank ; Add a blank for positives? + beq @L2 ; Jump if no + ldx #' ' +@L2: lda AddSign ; Add a plus for positives (precedence)? + beq @L3 + ldx #'+' +@L3: stx Leader + +; Integer argument + + jsr GetSignedArg ; Get argument as a long + ldy sreg+1 ; Check sign + bmi @Int1 + ldy Leader + beq @Int1 + sty Buf + inc BufIdx + +@Int1: ldy #10 ; Base + jsr ltoa ; Push arguments, call _ltoa + jmp HaveArg + +; Is it a count pseudo format? + +CheckCount: + cmp #'n' + bne CheckOctal + +; It is a count pseudo argument + + jsr GetIntArg + sta ptr1 + stx ptr1+1 ; Get user supplied pointer + ldy #0 + lda (OutData),y ; Low byte of OutData->ccount + sta (ptr1),y + iny + lda (OutData),y ; High byte of OutData->ccount + sta (ptr1),y + jmp MainLoop ; Done + +; Check for an octal digit + +CheckOctal: + cmp #'o' + bne CheckPointer + +; Integer in octal representation + + jsr GetSignedArg ; Get argument as a long + ldy AltForm ; Alternative form? + beq @Oct1 ; Jump if no + pha ; Save low byte of value + stx tmp1 + ora tmp1 + ora sreg + ora sreg+1 + ora Prec + ora Prec+1 ; Check if value or Prec != 0 + beq @Oct1 + lda #'0' + jsr PutBuf + pla ; Restore low byte + +@Oct1: ldy #8 ; Load base + jsr ltoa ; Push arguments, call _ltoa + jmp HaveArg + +; Check for a pointer specifier (%p) + +CheckPointer: + cmp #'p' + bne CheckString + +; It's a pointer. Use %#x conversion + + ldx #0 + stx IsLong ; IsLong = 0; + inx + stx AltForm ; AltForm = 1; + lda #'x' + bne IsHex ; Branch always + +; Check for a string specifier (%s) + +CheckString: + cmp #'s' + bne CheckUnsigned + +; It's a string + + jsr GetIntArg ; Get 16bit argument + sta Str + stx Str+1 + jmp HaveArg + +; Check for an unsigned integer (%u) + +CheckUnsigned: + cmp #'u' + bne CheckHex + +; It's an unsigned integer + + jsr GetUnsignedArg ; Get argument as unsigned long + ldy #10 ; Load base + jsr ultoa ; Push arguments, call _ultoa + jmp HaveArg + +; Check for a hexadecimal integer (%x) + +CheckHex: + cmp #'x' + beq IsHex + cmp #'X' + bne UnknownFormat + +; Hexadecimal integer + +IsHex: pha ; Save the format spec + lda AltForm + beq @L1 + lda #'0' + jsr PutBuf + lda #'X' + jsr PutBuf + +@L1: jsr GetUnsignedArg ; Get argument as an unsigned long + ldy #16 ; Load base + jsr ultoa ; Push arguments, call _ultoa + + pla ; Get the format spec + cmp #'x' ; Lower case? + bne @L2 + lda Str + ldx Str+1 + jsr _strlower ; Make characters lower case +@L2: jmp HaveArg + +; Unknown format character, skip it + +UnknownFormat: + jmp MainLoop + +; We have the argument, do argument string formatting + +HaveArg: + +; ArgLen = strlen (Str); + + lda Str + ldx Str+1 + jsr _strlen ; Get length of argument + sta ArgLen + stx ArgLen+1 + +; if (Prec && Prec < ArgLen) ArgLen = Prec; + + lda Prec + ora Prec+1 + beq @L1 + ldx Prec + cpx ArgLen + lda Prec+1 + tay + sbc ArgLen+1 + bcs @L1 + stx ArgLen + sty ArgLen+1 + +; if (Width > ArgLen) { +; Width -= ArgLen; /* padcount */ +; } else { +; Width = 0; +; } +; Since width is used as a counter below, calculate -(width+1) + +@L1: sec + lda Width + sbc ArgLen + tax + lda Width+1 + sbc ArgLen+1 + bcs @L2 + lda #0 + tax +@L2: eor #$FF + sta Width+1 + txa + eor #$FF + sta Width + +; /* Do padding on the left side if needed */ +; if (!leftjust) { +; /* argument right justified */ +; while (width) { +; fout (d, &padchar, 1); +; --width; +; } +; } + + lda LeftJust + bne @L3 + jsr OutputPadding + +; Output the argument itself + +@L3: jsr OutputArg + +; /* Output right padding bytes if needed */ +; if (leftjust) { +; /* argument left justified */ +; while (width) { +; fout (d, &padchar, 1); +; --width; +; } +; } + + lda LeftJust + beq @L4 + jsr OutputPadding + +; Done, parse next chars from format string + +@L4: jmp MainLoop + + +; ---------------------------------------------------------------------------- +; Local data (all static) + +.bss + +; Save area for the zero page registers +RegSave: .res regbanksize + +; One character argument for OutFunc +CharArg: .byte 0 + +; Format variables +FormatVars: +LeftJust: .byte 0 +AddSign: .byte 0 +AddBlank: .byte 0 +AltForm: .byte 0 +PadChar: .byte 0 +Width: .word 0 +Prec: .word 0 +IsLong: .byte 0 +Leader: .byte 0 +BufIdx: .byte 0 ; Argument string pointer +FormatVarSize = * - FormatVars + +; Argument buffer and pointer +Buf: .res 20 +Str: .word 0 +ArgLen: .res 2 + +.data + +; Stuff from OutData. Is used as a vector +CallOutFunc: jmp $0000 diff --git a/libsrc/pce/_scrsize.s b/libsrc/pce/_scrsize.s index 038622a6f..e730aa83b 100644 --- a/libsrc/pce/_scrsize.s +++ b/libsrc/pce/_scrsize.s @@ -1,9 +1,11 @@ ; ; Screen size variables ; + .export screensize + .export xsize, ysize + .include "pce.inc" - .export screensize screensize: ldx xsize ldy ysize @@ -12,7 +14,6 @@ screensize: ; FIXME: changing the video mode allows for different screen sizes .rodata - .export xsize, ysize xsize: .byte charsperline ysize: .byte screenrows diff --git a/libsrc/pce/call.s b/libsrc/pce/call.s new file mode 100644 index 000000000..f99879866 --- /dev/null +++ b/libsrc/pce/call.s @@ -0,0 +1,16 @@ +; +; CC65 runtime: call function via pointer in ax +; +; 1998-08-06, Ullrich von Bassewitz +; 2018-02-28, Greg King +; + + .export callax + .importzp ptr1 + +callax: sta ptr1 + stx ptr1+1 + +; The PC-Engine puts the zero-page at $2000. + + jmp (ptr1 + $2000) ; go there diff --git a/libsrc/pce/callptr4.s b/libsrc/pce/callptr4.s new file mode 100644 index 000000000..7829cdb8e --- /dev/null +++ b/libsrc/pce/callptr4.s @@ -0,0 +1,14 @@ +; +; CC65 runtime: call function via pointer in ptr4 +; +; 2018-02-28, Greg King +; + + .export callptr4 + .importzp ptr4 + +callptr4: + +; The PC-Engine puts the zero-page at $2000. + + jmp (ptr4 + $2000) diff --git a/libsrc/pce/cclear.s b/libsrc/pce/cclear.s new file mode 100644 index 000000000..e6277eed0 --- /dev/null +++ b/libsrc/pce/cclear.s @@ -0,0 +1,25 @@ +; +; Ullrich von Bassewitz, 08.08.1998 +; +; void cclearxy (unsigned char x, unsigned char y, unsigned char length); +; void cclear (unsigned char length); +; + + .export _cclearxy, _cclear + .import gotoxy, cputdirect + .importzp tmp1 + +_cclearxy: + pha ; Save the length + jsr gotoxy ; Call this one, will pop params + pla ; Restore the length and run into _cclear + +_cclear: + cmp #0 ; Is the length zero? + beq L9 ; Jump if done + sta tmp1 +L1: lda #$20 ; Blank - screen code + jsr cputdirect ; Direct output + dec tmp1 + bne L1 +L9: rts diff --git a/libsrc/pce/chline.s b/libsrc/pce/chline.s index 8bf8f1626..25644a72a 100644 --- a/libsrc/pce/chline.s +++ b/libsrc/pce/chline.s @@ -6,15 +6,15 @@ ; .export _chlinexy, _chline - .import popa, _gotoxy, cputdirect + + .import gotoxy, cputdirect .importzp tmp1 .include "pce.inc" _chlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length _chline: @@ -26,7 +26,3 @@ L1: lda #CH_HLINE ; Horizontal line, screen code dec tmp1 bne L1 L9: rts - - - - diff --git a/libsrc/pce/clock.s b/libsrc/pce/clock.s index 261739df8..1d7579a2f 100644 --- a/libsrc/pce/clock.s +++ b/libsrc/pce/clock.s @@ -2,32 +2,39 @@ ; clock_t clock (void); ; - .include "pce.inc" - .include "extzp.inc" - - .export _clock - .forceimport ticktock - .importzp sreg .constructor initclock + .export _clock + + .forceimport ticktock ; make sure that tickcount changes + .importzp tickcount, sreg -.proc _clock +; Make the process clock start at zero. - lda tickcount+3 - sta sreg+1 - lda tickcount+2 - sta sreg - ldx tickcount+1 - lda tickcount - rts - -.endproc - - .segment "INIT" + .segment "ONCE" initclock: - lda #0 - ldx #3 -@lp: sta tickcount,x + ldx #4 - 1 +@lp: stz tickcount,x dex bpl @lp rts + +; ------------------------------------------------------------------------ +.code + +; This function might be interrupted while it is reading the several bytes of +; the clock. They are read again if that happens. (We do not want to stop +; interrupts because that might cause glitches in interrupt-driven graphics +; and sound.) + +.proc _clock + lda tickcount + ldy tickcount+3 + sty sreg+1 + ldy tickcount+2 + sty sreg + ldx tickcount+1 + cmp tickcount + bne _clock ; clock changed; reread it + rts +.endproc diff --git a/libsrc/pce/clrscr.s b/libsrc/pce/clrscr.s index e3f40bb8b..476277886 100644 --- a/libsrc/pce/clrscr.s +++ b/libsrc/pce/clrscr.s @@ -1,25 +1,26 @@ +; +; Clear (erase) the screen. +; +; Support the full 128- x 64-tile background. +; + + .export _clrscr + + .import plot .include "pce.inc" .include "extzp.inc" - .import plot - .export _clrscr _clrscr: - - st0 #VDC_MAWR - st1 #<$0000 - st2 #>$0000 - + VREG VDC_MAWR, $0000 st0 #VDC_VWR + ldy #$40 rowloop: ldx #$80 colloop: - lda #' ' - sta a:VDC_DATA_LO - lda #$02 - sta a:VDC_DATA_HI - + st1 #' ' ; low byte of char. index + st2 #$02 ; background color, high nybble of char. index dex bne colloop dey diff --git a/libsrc/pce/color.s b/libsrc/pce/color.s index 0ff991a2e..a527cb2c0 100644 --- a/libsrc/pce/color.s +++ b/libsrc/pce/color.s @@ -4,21 +4,26 @@ ; unsigned char __fastcall__ bordercolor (unsigned char color); ; + .export _textcolor, _bgcolor, _bordercolor + .export colors - .export _textcolor, _bgcolor, _bordercolor + .import return0 .include "pce.inc" .include "extzp.inc" +_bordercolor := return0 ; always black + _textcolor: - ldx CHARCOLOR ; get old value - sta CHARCOLOR ; set new value + ldx CHARCOLOR ; get old value + sta CHARCOLOR ; set new value txa rts _bgcolor: - ldx BGCOLOR ; get old value - sta BGCOLOR ; set new value + and #$0F + ldx BGCOLOR ; get old value + sta BGCOLOR ; set new value asl a tay @@ -32,32 +37,25 @@ _bgcolor: txa rts -_bordercolor: - lda #0 - tax - rts +.rodata - .rodata - .export colors - -colors: - ; G R B - .word ((0<<6)+(0<<3)+(0)) ; 0 black - .word ((7<<6)+(7<<3)+(7)) ; 1 white - .word ((0<<6)+(7<<3)+(0)) ; 2 red - .word ((7<<6)+(0<<3)+(7)) ; 3 cyan - .word ((0<<6)+(5<<3)+(7)) ; 4 violett - .word ((7<<6)+(0<<3)+(0)) ; 5 green - .word ((0<<6)+(0<<3)+(7)) ; 6 blue - .word ((7<<6)+(7<<3)+(0)) ; 7 yellow - .word ((5<<6)+(7<<3)+(0)) ; 8 orange - .word ((3<<6)+(4<<3)+(3)) ; 9 brown - .word ((4<<6)+(7<<3)+(4)) ; a light red - .word ((3<<6)+(3<<3)+(3)) ; b dark grey - .word ((4<<6)+(4<<3)+(4)) ; c middle grey - .word ((7<<6)+(4<<3)+(4)) ; d light green - .word ((4<<6)+(4<<3)+(7)) ; e light blue - .word ((6<<6)+(6<<3)+(6)) ; f light gray + ; G R B +colors: .word ((0<<6)+(0<<3)+(0)) ; $0 black + .word ((7<<6)+(7<<3)+(7)) ; $1 white + .word ((0<<6)+(7<<3)+(0)) ; $2 red + .word ((7<<6)+(0<<3)+(7)) ; $3 cyan + .word ((0<<6)+(5<<3)+(7)) ; $4 violet + .word ((7<<6)+(0<<3)+(0)) ; $5 green + .word ((0<<6)+(0<<3)+(7)) ; $6 blue + .word ((7<<6)+(7<<3)+(0)) ; $7 yellow + .word ((5<<6)+(7<<3)+(0)) ; $8 orange + .word ((3<<6)+(4<<3)+(3)) ; $9 brown + .word ((4<<6)+(7<<3)+(4)) ; $A light red + .word ((3<<6)+(3<<3)+(3)) ; $B dark grey + .word ((4<<6)+(4<<3)+(4)) ; $C middle grey + .word ((7<<6)+(4<<3)+(4)) ; $D light green + .word ((4<<6)+(4<<3)+(7)) ; $E light blue + .word ((6<<6)+(6<<3)+(6)) ; $F light gray ;------------------------------------------------------------------------------- ; force the init constructor to be imported diff --git a/libsrc/pce/conio.s b/libsrc/pce/conio.s index b2bb0f9d5..ac306f193 100644 --- a/libsrc/pce/conio.s +++ b/libsrc/pce/conio.s @@ -1,36 +1,28 @@ + .constructor initconio, 24 + + .import vdc_init + .import psg_init + .import colors + .import _pce_font + .importzp ptr1, tmp1 + .include "pce.inc" .include "extzp.inc" - .import vce_init - .import psg_init - .import colors - .importzp ptr1, tmp1 - - .constructor initconio - - .macpack longbranch - - .segment "INIT" + .segment "ONCE" initconio: - jsr vce_init + jsr vdc_init jsr psg_init - jsr conio_init - jsr set_palette - - st0 #VDC_CR - st1 #<$0088 - st2 #>$0088 - rts + jsr load_font set_palette: stz VCE_ADDR_LO stz VCE_ADDR_HI - ldx #0 -@lp: - ldy #16 -@lp1: - lda colors,x + clx +@lp: ldy #16 ; size of a palette + +@lp1: lda colors,x sta VCE_DATA_LO lda colors+1,x sta VCE_DATA_HI @@ -39,79 +31,57 @@ set_palette: inx inx - cpx #16*2 - jne @lp + cpx #16 * 2 ; 16 palettes + bne @lp - stz VCE_ADDR_LO - stz VCE_ADDR_HI - stz VCE_DATA_LO - stz VCE_DATA_HI + sty BGCOLOR ; white on black + iny + sty CHARCOLOR + VREG VDC_CR, $0088 ; enable background and vertical-blank interrupt rts -conio_init: - ; Load font - st0 #VDC_MAWR - st1 #<$2000 - st2 #>$2000 +; Load the conio font into the VDC. +load_font: + VREG VDC_MAWR, $2000 + st0 #VDC_VWR - ; ptr to font data - lda #<font + stz tmp1 ; #%00000000 + bsr copy ; make normal characters + + dec tmp1 ; #%11111111 +; bsr copy ; make reversed characters +; rts ; (fall through) + +; Point to the font data. +copy: lda #<_pce_font + ldx #>_pce_font sta ptr1 - lda #>font - sta ptr1+1 + stx ptr1+1 - st0 #VDC_VWR ; VWR - - lda #0 - sta tmp1 - jsr copy - - lda #<font - sta ptr1 - lda #>font - sta ptr1+1 - - lda #$ff - sta tmp1 - jsr copy - - ldx #0 - stx BGCOLOR - inx - stx CHARCOLOR - - rts - -copy: ldy #$80 ; 128 chars charloop: ldx #$08 ; 8 bytes/char lineloop: lda (ptr1) eor tmp1 - sta a:VDC_DATA_LO ; bitplane 0 - stz a:VDC_DATA_HI ; bitplane 1 + sta VDC_DATA_LO ; bitplane 0 + st2 #>$0000 ; bitplane 1 - clc ; increment font pointer - lda ptr1 - adc #$01 - sta ptr1 - lda ptr1+1 - adc #$00 - sta ptr1+1 - dex - bne lineloop ; next bitplane 0 byte - ldx #$08 ; fill bitplane 2/3 with 0 + inc ptr1 ; increment font pointer + bne @noC + inc ptr1+1 +@noC: dex + bne lineloop ; next bitplane-0 byte + + ldx #$08 ; fill bitplanes 2 and 3 with 0 fillloop: - st1 #$00 - st2 #$00 + st1 #<$0000 + st2 #>$0000 dex bne fillloop ; next byte + dey bne charloop ; next character rts - -font: - .include "vga.inc" diff --git a/libsrc/pce/cpeekc.s b/libsrc/pce/cpeekc.s new file mode 100644 index 000000000..e144f94ac --- /dev/null +++ b/libsrc/pce/cpeekc.s @@ -0,0 +1,24 @@ +; +; 2020-07-14, Groepaz +; +; char cpeekc (void); +; +; get character from current position, do NOT advance cursor + + .export _cpeekc + + .include "pce.inc" + .include "extzp.inc" + +_cpeekc: + st0 #VDC_MARR ; Memory-Address Read + ldy SCREEN_PTR + ldx SCREEN_PTR+1 + sty VDC_DATA_LO + stx VDC_DATA_HI + + st0 #VDC_VRR ; VRAM Read Register + lda VDC_DATA_LO ; character + and #<~$80 ; remove reverse bit + ldx #0 + rts diff --git a/libsrc/pce/cpeekcolor.s b/libsrc/pce/cpeekcolor.s new file mode 100644 index 000000000..8b96d29d4 --- /dev/null +++ b/libsrc/pce/cpeekcolor.s @@ -0,0 +1,28 @@ +; +; 2020-07-14, Groepaz +; +; unsigned char cpeekcolor (void); +; +; get color from current position, do NOT advance cursor + + .export _cpeekcolor + + .include "pce.inc" + .include "extzp.inc" + +_cpeekcolor: + st0 #VDC_MARR ; Memory-Address Read + ldy SCREEN_PTR + ldx SCREEN_PTR+1 + sty VDC_DATA_LO + stx VDC_DATA_HI + + st0 #VDC_VRR ; VRAM Read Register + lda VDC_DATA_HI + and #<~$02 + lsr a + lsr a + lsr a + lsr a + ldx #0 + rts diff --git a/libsrc/pce/cpeekrevers.s b/libsrc/pce/cpeekrevers.s new file mode 100644 index 000000000..3f208fd10 --- /dev/null +++ b/libsrc/pce/cpeekrevers.s @@ -0,0 +1,26 @@ +; +; 2020-07-14, Groepaz +; +; unsigned char cpeekrevers (void); +; +; get inverse flag from current position, do NOT advance cursor + + .export _cpeekrevers + + .include "pce.inc" + .include "extzp.inc" + +_cpeekrevers: + st0 #VDC_MARR ; Memory-Address Read + ldy SCREEN_PTR + ldx SCREEN_PTR+1 + sty VDC_DATA_LO + stx VDC_DATA_HI + + st0 #VDC_VRR ; VRAM Read Register + lda VDC_DATA_LO ; character (bit 7 is revers bit) + rol a + rol a + and #1 + ldx #0 + rts diff --git a/libsrc/pce/cpeeks.s b/libsrc/pce/cpeeks.s new file mode 100644 index 000000000..fe5e28687 --- /dev/null +++ b/libsrc/pce/cpeeks.s @@ -0,0 +1,63 @@ +; +; 2020-07-14, Groepaz +; +; void cpeeks (char* s, unsigned length); +; +; get string from current position, do NOT advance cursor + + .export _cpeeks + + .import popax + .importzp ptr1, ptr2, tmp1, tmp2 + + .macpack generic + + .include "pce.inc" + .include "extzp.inc" + +_cpeeks: + eor #<$FFFF ; counting a word upward is faster + sta ptr2 ; so, we use -(length + 1) + txa + eor #>$FFFF + sta ptr2+1 + + st0 #VDC_MARR ; Memory-Address Read + ldy SCREEN_PTR + ldx SCREEN_PTR+1 + sty VDC_DATA_LO + stx VDC_DATA_HI + + st0 #VDC_VRR ; VRAM Read Register + + jsr popax + sta tmp1 ; (will be a .Y index) + stx ptr1+1 + + ldx #<$0000 + stx ptr1 + beq L2 ; branch always + +L3: ldy tmp2 + lda VDC_DATA_LO ; get character + bit VDC_DATA_HI ; we need to "read" the highbyte to advance the address + iny + sty tmp2 + and #<~$80 ; remove reverse bit + + ldy tmp1 + sta (ptr1),y + iny + bne L1 + inc ptr1+1 +L1: sty tmp1 + +L2: inc ptr2 ; count length + bne L3 + inc ptr2+1 + bne L3 + + txa ; terminate the string + ldy tmp1 + sta (ptr1),y + rts diff --git a/libsrc/pce/cputc.s b/libsrc/pce/cputc.s index 8d1cec8eb..626d3ef8e 100644 --- a/libsrc/pce/cputc.s +++ b/libsrc/pce/cputc.s @@ -5,95 +5,78 @@ .export _cputcxy, _cputc, cputdirect, putchar .export newline, plot - .import popa, _gotoxy + .forceimport initconio ; force conio initiation + + .import gotoxy .import PLOT .import xsize - - .importzp tmp3,tmp4 + .importzp tmp3, tmp4 .include "pce.inc" .include "extzp.inc" _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C ; Plot a character - also used as internal function -_cputc: cmp #$0d ; CR? +_cputc: cmp #$0D ; CR? bne L1 - lda #0 - sta CURS_X - beq plot ; Recalculate pointers + stz CURS_X + bra plot ; Recalculate pointer -L1: cmp #$0a ; LF? - beq newline ; Recalculate pointers +L1: cmp #$0A ; LF? + beq newline ; Recalculate pointer ; Printable char of some sort cputdirect: jsr putchar ; Write the character to the screen -; Advance cursor position +; Move the cursor (rightwards) to the next position. advance: ldy CURS_X iny cpy xsize bne L3 - jsr newline ; new line - ldy #0 ; + cr + inc CURS_Y ; new line + cly ; + CR L3: sty CURS_X - jmp plot -newline: - inc CURS_Y - -; Set cursor position, calculate RAM pointers +; Set cursor position; calculate VRAM pointer. plot: ldy CURS_X ldx CURS_Y clc jmp PLOT ; Set the new cursor -; Write one character to the screen without doing anything else, return X -; position in Y +newline: + inc CURS_Y + bra plot + +; Write one character to the screen without doing anything else. putchar: + ora RVS ; Set reverse bit - ora RVS ; Set revers bit + st0 #VDC_MAWR ; Memory-Address Write + ldy SCREEN_PTR + ldx SCREEN_PTR+1 + sty VDC_DATA_LO + stx VDC_DATA_HI - tax - - st0 #VDC_MAWR ; Memory Adress Write - - lda SCREEN_PTR - sta a:VDC_DATA_LO - - lda SCREEN_PTR + 1 - sta a:VDC_DATA_HI - - st0 #VDC_VWR ; VWR - - txa - sta a:VDC_DATA_LO ; character - - lda CHARCOLOR + st0 #VDC_VWR ; VRAM Write Register + sta VDC_DATA_LO ; character + lda CHARCOLOR ; palette number asl a asl a asl a asl a - - ora #$02 - sta a:VDC_DATA_HI + ora #>$0200 ; high nybble of char. index + sta VDC_DATA_HI rts - -;------------------------------------------------------------------------------- -; force the init constructor to be imported - - .import initconio -conio_init = initconio diff --git a/libsrc/pce/crt0.s b/libsrc/pce/crt0.s index e92e9eca3..d6dee3ef4 100644 --- a/libsrc/pce/crt0.s +++ b/libsrc/pce/crt0.s @@ -1,131 +1,113 @@ ; -; Startup code for cc65 (PCEngine version) +; Start-up code for cc65 (PC-Engine version) ; -; by Groepaz/Hitmen <groepaz@gmx.net> +; by Groepaz/Hitmen <groepaz@gmx.net>, ; based on code by Ullrich von Bassewitz <uz@cc65.org> ; -; This must be the *first* file on the linker command line +; 2018-02-24, Greg King ; .export _exit - .export __STARTUP__ : absolute = 1 ; Mark as startup + .export __STARTUP__ : absolute = 1 ; Mark as start-up .import initlib, donelib - .import push0, _main, zerobss - .import initheap - .import IRQStub + .import push0, _main + .import IRQStub, __nmi + .importzp sp - ; Linker generated - .import __RAM_START__, __RAM_SIZE__ - .import __ROM0_START__, __ROM0_SIZE__ - .import __ROM_START__, __ROM_SIZE__ - .import __STARTUP_LOAD__,__STARTUP_RUN__, __STARTUP_SIZE__ - .import __CODE_LOAD__,__CODE_RUN__, __CODE_SIZE__ - .import __RODATA_LOAD__,__RODATA_RUN__, __RODATA_SIZE__ - .import __DATA_LOAD__,__DATA_RUN__, __DATA_SIZE__ - .import __BSS_SIZE__ + ; Linker-generated + .import __CARTSIZE__ + .import __DATA_LOAD__, __DATA_RUN__, __DATA_SIZE__ + .import __BSS_RUN__, __BSS_SIZE__ + .import __MAIN_START__, __MAIN_SIZE__, __STACKSIZE__ .include "pce.inc" .include "extzp.inc" - .importzp sp - .importzp ptr1,ptr2 - .importzp tmp1,tmp2,tmp3 - ; ------------------------------------------------------------------------ -; Place the startup code in a special segment. +; Place the start-up code in a special segment. - .segment "STARTUP" +.segment "STARTUP" -start: - - ; setup the CPU and System-IRQ - - ; Initialize CPU - - sei + ; Initialize the CPU. +start: sei nop - csh ; set high speed CPU mode - nop - cld + csh ; Set high-speed CPU mode nop - ; Setup stack and memory mapping + ; Set up the stack and the memory mapping. ldx #$FF ; Stack top ($21FF) txs - ; at startup all MPRs are set to 0, so init them - lda #$ff - tam #%00000001 ; 0000-1FFF = Hardware page + ; At power-on, most MPRs have random values; so, initiate them. + lda #$FF + tam #%00000001 ; $0000-$1FFF = Hardware bank lda #$F8 - tam #%00000010 ; 2000-3FFF = Work RAM - - ; FIXME: setup a larger block of memory to use with C-code + tam #%00000010 ; $2000-$3FFF = Work RAM ;lda #$F7 - ;tam #%00000100 ; 4000-5FFF = Save RAM - ;lda #1 - ;tam #%00001000 ; 6000-7FFF Page 2 - ;lda #2 - ;tam #%00010000 ; 8000-9FFF Page 3 - ;lda #3 - ;tam #%00100000 ; A000-BFFF Page 4 + ;tam #%00000100 ; $4000-$47FF = 2K Battery-backed RAM ;lda #4 - ;tam #%01000000 ; C000-DFFF Page 5 - ;lda #0 - ;tam #%10000000 ; e000-fFFF hucard/syscard bank 0 + ;tam #%00001000 ; $6000-$7FFF - ; Clear work RAM (2000-3FFF) - stz <$00 - tii $2000, $2001, $1FFF + lda #$01 + ldx #>$8000 + cpx #>__CARTSIZE__ + bcc @L1 ;(blt) + tam #%00010000 ; $8000-$9FFF = ROM bank 1 (32K block of ROM) + inc a + tam #%00100000 ; $A000-$BFFF = ROM bank 2 + inc a +@L1: tam #%01000000 ; $C000-$DFFF = ROM bank 3 (32K) or 1 (16K) + ;lda #$00 ; (The reset default) + ;tam #%10000000 ; $E000-$FFFF Hucard/Syscard bank 0 - ; Initialize hardware + ; Initialize the hardware. stz TIMER_CTRL ; Timer off - lda #$07 + lda #%00000111 sta IRQ_MASK ; Interrupts off - stz IRQ_STATUS ; Acknowledge timer - ; FIXME; i dont know why the heck this one doesnt work when called from a constructor :/ + ; FIXME; I don't know why the heck this one doesn't work when called from a constructor. -Groepaz :-/ +.if 0 ; It now seems to work (at least, in Mednafen). -Greg King .import vdc_init jsr vdc_init +.endif - ; Turn on background and VD interrupt/IRQ1 - lda #$05 - sta IRQ_MASK ; IRQ1=on - - ; Clear the BSS data - jsr zerobss + ; Allow interrupts from the VDC. + lda #%00000101 + sta IRQ_MASK ; IRQ1 = on ; Copy the .data segment to RAM tii __DATA_LOAD__, __DATA_RUN__, __DATA_SIZE__ - ; setup the stack - lda #<(__RAM_START__+__RAM_SIZE__) - sta sp - lda #>(__RAM_START__+__RAM_SIZE__) - sta sp + 1 + ; Clear the .bss segment + stz __BSS_RUN__ + tii __BSS_RUN__, __BSS_RUN__ + 1, __BSS_SIZE__ - 1 - ; Call module constructors + ; Set up the stack + lda #<(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) + ldx #>(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) + sta sp + stx sp+1 + + ; Call the module constructors. jsr initlib - cli ; allow IRQ only after constructors have run + stz IRQ_STATUS ; Clear IRQs + cli ; Allow IRQ only after constructors have run ; Pass an empty command line jsr push0 ; argc jsr push0 ; argv ldy #4 ; Argument size - jsr _main ; call the users code + jsr _main ; Call the user's code - ; Call module destructors. This is also the _exit entry. -_exit: - jsr donelib ; Run module destructors + ; Call the module destructors. This is also the exit() entry. +_exit: jsr donelib - ; reset the PCEngine (start over) + ; Reset the PCEngine (start over). jmp start -_nmi: - rti - .export initmainargs initmainargs: rts @@ -133,10 +115,10 @@ initmainargs: ; ------------------------------------------------------------------------ ; hardware vectors ; ------------------------------------------------------------------------ - .segment "VECTORS" +.segment "VECTORS" - .word IRQStub ; $fff6 IRQ2 (External IRQ, BRK) - .word IRQStub ; $fff8 IRQ1 (VDC) - .word IRQStub ; $fffa Timer - .word _nmi ; $fffc NMI - .word start ; $fffe reset + .word IRQStub ; $FFF6 IRQ2 (External IRQ, BRK) + .word IRQStub ; $FFF8 IRQ1 (VDC) + .word IRQStub ; $FFFA Timer + .word __nmi ; $FFFC NMI + .word start ; $FFFE reset diff --git a/libsrc/pce/ctype.s b/libsrc/pce/ctype.s deleted file mode 100644 index fa9a65c8b..000000000 --- a/libsrc/pce/ctype.s +++ /dev/null @@ -1,161 +0,0 @@ -; -; Stefan Haubenthal with minor changes from Ullrich von Bassewitz, 2003-05-02 -; -; Character specification table. -; - - .include "ctype.inc" - -; The tables are readonly, put them into the rodata segment - -.rodata - -; The following 256 byte wide table specifies attributes for the isxxx type -; of functions. Doing it by a table means some overhead in space, but it -; has major advantages: -; -; * It is fast. If it were'nt for the slow parameter passing of cc65, one -; could even define macros for the isxxx functions (this is usually -; done on other platforms). -; -; * It is highly portable. The only unportable part is the table itself, -; all real code goes into the common library. -; -; * We save some code in the isxxx functions. - - -__ctype: - .repeat 2 - .byte CT_CTRL ; 0/00 ___ctrl_@___ - .byte CT_CTRL ; 1/01 ___ctrl_A___ - .byte CT_CTRL ; 2/02 ___ctrl_B___ - .byte CT_CTRL ; 3/03 ___ctrl_C___ - .byte CT_CTRL ; 4/04 ___ctrl_D___ - .byte CT_CTRL ; 5/05 ___ctrl_E___ - .byte CT_CTRL ; 6/06 ___ctrl_F___ - .byte CT_CTRL ; 7/07 ___ctrl_G___ - .byte CT_CTRL ; 8/08 ___ctrl_H___ - .byte CT_CTRL | CT_OTHER_WS | CT_SPACE_TAB - ; 9/09 ___ctrl_I___ - .byte CT_CTRL | CT_OTHER_WS ; 10/0a ___ctrl_J___ - .byte CT_CTRL | CT_OTHER_WS ; 11/0b ___ctrl_K___ - .byte CT_CTRL | CT_OTHER_WS ; 12/0c ___ctrl_L___ - .byte CT_CTRL | CT_OTHER_WS ; 13/0d ___ctrl_M___ - .byte CT_CTRL ; 14/0e ___ctrl_N___ - .byte CT_CTRL ; 15/0f ___ctrl_O___ - .byte CT_CTRL ; 16/10 ___ctrl_P___ - .byte CT_CTRL ; 17/11 ___ctrl_Q___ - .byte CT_CTRL ; 18/12 ___ctrl_R___ - .byte CT_CTRL ; 19/13 ___ctrl_S___ - .byte CT_CTRL ; 20/14 ___ctrl_T___ - .byte CT_CTRL ; 21/15 ___ctrl_U___ - .byte CT_CTRL ; 22/16 ___ctrl_V___ - .byte CT_CTRL ; 23/17 ___ctrl_W___ - .byte CT_CTRL ; 24/18 ___ctrl_X___ - .byte CT_CTRL ; 25/19 ___ctrl_Y___ - .byte CT_CTRL ; 26/1a ___ctrl_Z___ - .byte CT_CTRL ; 27/1b ___ctrl_[___ - .byte CT_CTRL ; 28/1c ___ctrl_\___ - .byte CT_CTRL ; 29/1d ___ctrl_]___ - .byte CT_CTRL ; 30/1e ___ctrl_^___ - .byte CT_CTRL ; 31/1f ___ctrl_____ - .byte CT_SPACE | CT_SPACE_TAB ; 32/20 ___SPACE___ - .byte CT_NONE ; 33/21 _____!_____ - .byte CT_NONE ; 34/22 _____"_____ - .byte CT_NONE ; 35/23 _____#_____ - .byte CT_NONE ; 36/24 _____$_____ - .byte CT_NONE ; 37/25 _____%_____ - .byte CT_NONE ; 38/26 _____&_____ - .byte CT_NONE ; 39/27 _____'_____ - .byte CT_NONE ; 40/28 _____(_____ - .byte CT_NONE ; 41/29 _____)_____ - .byte CT_NONE ; 42/2a _____*_____ - .byte CT_NONE ; 43/2b _____+_____ - .byte CT_NONE ; 44/2c _____,_____ - .byte CT_NONE ; 45/2d _____-_____ - .byte CT_NONE ; 46/2e _____._____ - .byte CT_NONE ; 47/2f _____/_____ - .byte CT_DIGIT | CT_XDIGIT ; 48/30 _____0_____ - .byte CT_DIGIT | CT_XDIGIT ; 49/31 _____1_____ - .byte CT_DIGIT | CT_XDIGIT ; 50/32 _____2_____ - .byte CT_DIGIT | CT_XDIGIT ; 51/33 _____3_____ - .byte CT_DIGIT | CT_XDIGIT ; 52/34 _____4_____ - .byte CT_DIGIT | CT_XDIGIT ; 53/35 _____5_____ - .byte CT_DIGIT | CT_XDIGIT ; 54/36 _____6_____ - .byte CT_DIGIT | CT_XDIGIT ; 55/37 _____7_____ - .byte CT_DIGIT | CT_XDIGIT ; 56/38 _____8_____ - .byte CT_DIGIT | CT_XDIGIT ; 57/39 _____9_____ - .byte CT_NONE ; 58/3a _____:_____ - .byte CT_NONE ; 59/3b _____;_____ - .byte CT_NONE ; 60/3c _____<_____ - .byte CT_NONE ; 61/3d _____=_____ - .byte CT_NONE ; 62/3e _____>_____ - .byte CT_NONE ; 63/3f _____?_____ - - .byte CT_NONE ; 64/40 _____@_____ - .byte CT_UPPER | CT_XDIGIT ; 65/41 _____A_____ - .byte CT_UPPER | CT_XDIGIT ; 66/42 _____B_____ - .byte CT_UPPER | CT_XDIGIT ; 67/43 _____C_____ - .byte CT_UPPER | CT_XDIGIT ; 68/44 _____D_____ - .byte CT_UPPER | CT_XDIGIT ; 69/45 _____E_____ - .byte CT_UPPER | CT_XDIGIT ; 70/46 _____F_____ - .byte CT_UPPER ; 71/47 _____G_____ - .byte CT_UPPER ; 72/48 _____H_____ - .byte CT_UPPER ; 73/49 _____I_____ - .byte CT_UPPER ; 74/4a _____J_____ - .byte CT_UPPER ; 75/4b _____K_____ - .byte CT_UPPER ; 76/4c _____L_____ - .byte CT_UPPER ; 77/4d _____M_____ - .byte CT_UPPER ; 78/4e _____N_____ - .byte CT_UPPER ; 79/4f _____O_____ - .byte CT_UPPER ; 80/50 _____P_____ - .byte CT_UPPER ; 81/51 _____Q_____ - .byte CT_UPPER ; 82/52 _____R_____ - .byte CT_UPPER ; 83/53 _____S_____ - .byte CT_UPPER ; 84/54 _____T_____ - .byte CT_UPPER ; 85/55 _____U_____ - .byte CT_UPPER ; 86/56 _____V_____ - .byte CT_UPPER ; 87/57 _____W_____ - .byte CT_UPPER ; 88/58 _____X_____ - .byte CT_UPPER ; 89/59 _____Y_____ - .byte CT_UPPER ; 90/5a _____Z_____ - .byte CT_NONE ; 91/5b _____[_____ - .byte CT_NONE ; 92/5c _____\_____ - .byte CT_NONE ; 93/5d _____]_____ - .byte CT_NONE ; 94/5e _____^_____ - .byte CT_NONE ; 95/5f _UNDERLINE_ - .byte CT_NONE ; 96/60 ___grave___ - .byte CT_LOWER | CT_XDIGIT ; 97/61 _____a_____ - .byte CT_LOWER | CT_XDIGIT ; 98/62 _____b_____ - .byte CT_LOWER | CT_XDIGIT ; 99/63 _____c_____ - .byte CT_LOWER | CT_XDIGIT ; 100/64 _____d_____ - .byte CT_LOWER | CT_XDIGIT ; 101/65 _____e_____ - .byte CT_LOWER | CT_XDIGIT ; 102/66 _____f_____ - .byte CT_LOWER ; 103/67 _____g_____ - .byte CT_LOWER ; 104/68 _____h_____ - .byte CT_LOWER ; 105/69 _____i_____ - .byte CT_LOWER ; 106/6a _____j_____ - .byte CT_LOWER ; 107/6b _____k_____ - .byte CT_LOWER ; 108/6c _____l_____ - .byte CT_LOWER ; 109/6d _____m_____ - .byte CT_LOWER ; 110/6e _____n_____ - .byte CT_LOWER ; 111/6f _____o_____ - .byte CT_LOWER ; 112/70 _____p_____ - .byte CT_LOWER ; 113/71 _____q_____ - .byte CT_LOWER ; 114/72 _____r_____ - .byte CT_LOWER ; 115/73 _____s_____ - .byte CT_LOWER ; 116/74 _____t_____ - .byte CT_LOWER ; 117/75 _____u_____ - .byte CT_LOWER ; 118/76 _____v_____ - .byte CT_LOWER ; 119/77 _____w_____ - .byte CT_LOWER ; 120/78 _____x_____ - .byte CT_LOWER ; 121/79 _____y_____ - .byte CT_LOWER ; 122/7a _____z_____ - .byte CT_NONE ; 123/7b _____{_____ - .byte CT_NONE ; 124/7c _____|_____ - .byte CT_NONE ; 125/7d _____}_____ - .byte CT_NONE ; 126/7e _____~_____ - .byte CT_OTHER_WS ; 127/7f ____DEL____ - .endrepeat - - diff --git a/libsrc/pce/cvline.s b/libsrc/pce/cvline.s index abd74a5c7..c02378bfa 100644 --- a/libsrc/pce/cvline.s +++ b/libsrc/pce/cvline.s @@ -6,15 +6,15 @@ ; .export _cvlinexy, _cvline - .import popa, _gotoxy, putchar, newline + + .import gotoxy, putchar, newline .importzp tmp1 .include "pce.inc" _cvlinexy: pha ; Save the length - jsr popa ; Get y - jsr _gotoxy ; Call this one, will pop params + jsr gotoxy ; Call this one, will pop params pla ; Restore the length and run into _cvline _cvline: @@ -27,6 +27,3 @@ L1: lda #CH_VLINE ; Vertical bar dec tmp1 bne L1 L9: rts - - - diff --git a/libsrc/pce/extzp.s b/libsrc/pce/extzp.s index 26dc589b1..3ac0a1446 100644 --- a/libsrc/pce/extzp.s +++ b/libsrc/pce/extzp.s @@ -4,15 +4,15 @@ ; zeropage locations for exclusive use by the library ; - .include "extzp.inc" + .include "extzp.inc" - .segment "EXTZP" : zeropage +.segment "EXTZP" : zeropage -CURS_X: .res 1 -CURS_Y: .res 1 -SCREEN_PTR: .res 2 -CHARCOLOR: .res 1 -RVS: .res 1 -BGCOLOR: .res 1 -tickcount: .res 4 -vdc_flags: .res 1 +CURS_X: .res 1 +CURS_Y: .res 1 +SCREEN_PTR: .res 2 +CHARCOLOR: .res 1 +RVS: .res 1 +BGCOLOR: .res 1 +tickcount: .res 4 +vdc_flags: .res 1 diff --git a/libsrc/pce/gotox.s b/libsrc/pce/gotox.s new file mode 100644 index 000000000..fe8a23734 --- /dev/null +++ b/libsrc/pce/gotox.s @@ -0,0 +1,14 @@ +; +; void __fastcall__ gotox (unsigned char x); +; + + .export _gotox + + .import plot + + .include "pce.inc" + .include "extzp.inc" + +_gotox: + sta CURS_X ; Set X + jmp plot ; Set the cursor position diff --git a/libsrc/pce/gotoxy.s b/libsrc/pce/gotoxy.s index fb61646d1..49f0c602a 100644 --- a/libsrc/pce/gotoxy.s +++ b/libsrc/pce/gotoxy.s @@ -1,22 +1,19 @@ ; -; void gotoxy (unsigned char x, unsigned char y); +; void __fastcall__ gotoxy (unsigned char x, unsigned char y); ; - .export _gotoxy + .export gotoxy, _gotoxy + .import popa, plot .include "pce.inc" .include "extzp.inc" +gotoxy: + jsr popa ; Get Y + _gotoxy: sta CURS_Y ; Set Y jsr popa ; Get X sta CURS_X ; Set X jmp plot ; Set the cursor position - -;------------------------------------------------------------------------------- -; force the init constructor to be imported - - .import initconio -conio_init = initconio - diff --git a/libsrc/pce/gotoy.s b/libsrc/pce/gotoy.s new file mode 100644 index 000000000..9585b035b --- /dev/null +++ b/libsrc/pce/gotoy.s @@ -0,0 +1,14 @@ +; +; void __fastcall__ gotoy (unsigned char y); +; + + .export _gotoy + + .import plot + + .include "pce.inc" + .include "extzp.inc" + +_gotoy: + sta CURS_Y ; Set Y + jmp plot ; Set the cursor position diff --git a/libsrc/pce/irq.s b/libsrc/pce/irq.s index f34303d07..7ab42d8a8 100644 --- a/libsrc/pce/irq.s +++ b/libsrc/pce/irq.s @@ -2,7 +2,7 @@ ; IRQ handling (PCE version) ; - .export initirq, doneirq, IRQStub + .export initirq, doneirq, IRQStub, __nmi .import __INTERRUPTOR_COUNT__, callirq_y @@ -10,7 +10,7 @@ .include "extzp.inc" ; ------------------------------------------------------------------------ -.segment "INIT" +.segment "ONCE" ; a constructor ; @@ -32,7 +32,7 @@ IRQStub: ; Save the display-source flags (and, release the interrupt). ; - ldy a:VDC_CTRL + ldy VDC_CTRL sty vdc_flags ldy #<(__INTERRUPTOR_COUNT__ * 2) @@ -45,4 +45,4 @@ IRQStub: pla plx @L1: ply - rti +__nmi: rti diff --git a/libsrc/pce/joy/pce-stdjoy.s b/libsrc/pce/joy/pce-stdjoy.s index 746929dd2..2de3d0c4c 100644 --- a/libsrc/pce/joy/pce-stdjoy.s +++ b/libsrc/pce/joy/pce-stdjoy.s @@ -1,4 +1,3 @@ - ; ; Standard joystick driver for the PCEngine ; @@ -17,31 +16,19 @@ ; Driver signature - .byte $6A, $6F, $79 ; "joy" - .byte JOY_API_VERSION ; Driver API version number + .byte $6A, $6F, $79 ; "joy" + .byte JOY_API_VERSION ; Driver API version number ; Library reference .addr $0000 -; Button state masks (8 values) - - .byte $10 ; JOY_UP - .byte $40 ; JOY_DOWN - .byte $80 ; JOY_LEFT - .byte $20 ; JOY_RIGHT - .byte $01 ; JOY_FIRE_A - .byte $02 ; JOY_FIRE_B - .byte $04 ; JOY_SELECT - .byte $08 ; JOY_RUN - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READJOY - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants @@ -49,13 +36,17 @@ JOY_COUNT = 4 ; Number of joysticks we support +.bss + +padbuffer: .res JOY_COUNT + .code ; ------------------------------------------------------------------------ ; INSTALL routine. Is called after the driver is loaded into memory. If ; possible, check if the hardware is present and determine the amount of ; memory available. -; Must return an JOY_ERR_xx code in a/x. +; Must return a JOY_ERR_xx code in a/x. ; INSTALL: @@ -80,7 +71,7 @@ UNINSTALL: COUNT: lda #<JOY_COUNT - ldx #>JOY_COUNT + clx ; ldx #>JOY_COUNT rts ; ------------------------------------------------------------------------ @@ -98,11 +89,10 @@ READJOY: joy1: lda padbuffer,x - ldx #0 rts read_joy: - ; reset multitap counter + ; Reset Multitap counter. lda #$01 sta JOY_CTRL pha @@ -120,7 +110,7 @@ read_joy: cly nextpad: lda #$01 - sta JOY_CTRL ; sel = 1 + sta JOY_CTRL ; sel = 1 pha pla nop ; some delay is required @@ -131,29 +121,22 @@ nextpad: asl a asl a asl a - sta padbuffer, y ; store new value + sta padbuffer,y ; store new value stz JOY_CTRL pha pla - nop ; some delay is required nop lda JOY_CTRL and #$0F - ora padbuffer, y ; second half of new value + ora padbuffer,y ; second half of new value eor #$FF - sta padbuffer, y ; store new value + sta padbuffer,y ; store new value iny - cpy #$05 + cpy #.sizeof(padbuffer) bcc nextpad rts - -.bss - -padbuffer: - .res 4 - diff --git a/libsrc/pce/joy_stat_stddrv.s b/libsrc/pce/joy_stat_stddrv.s index 2424c456b..87af5617c 100644 --- a/libsrc/pce/joy_stat_stddrv.s +++ b/libsrc/pce/joy_stat_stddrv.s @@ -7,8 +7,7 @@ ; .export _joy_static_stddrv + .import _pce_stdjoy_joy -.rodata - _joy_static_stddrv := _pce_stdjoy_joy diff --git a/libsrc/pce/joy_stddrv.s b/libsrc/pce/joy_stddrv.s deleted file mode 100644 index ba397409a..000000000 --- a/libsrc/pce/joy_stddrv.s +++ /dev/null @@ -1,13 +0,0 @@ -; -; Name of the standard joystick driver -; -; Oliver Schmidt, 2012-11-01 -; -; const char joy_stddrv[]; -; - - .export _joy_stddrv - -.rodata - -_joy_stddrv: .asciiz "pce-stdjoy.joy" diff --git a/libsrc/pce/kplot.s b/libsrc/pce/kplot.s index e4426d005..ae31710f3 100644 --- a/libsrc/pce/kplot.s +++ b/libsrc/pce/kplot.s @@ -4,36 +4,27 @@ .include "pce.inc" .include "extzp.inc" -PLOT: - bcs @getpos +PLOT: bcs @getpos tya ;clc ; already cleared - adc _plotlo,x + adc plotlo,x sta SCREEN_PTR - lda _plothi,x - adc #0 + cla + adc plothi,x sta SCREEN_PTR+1 @getpos: ldx CURS_Y ldy CURS_X rts - .rodata +.rodata -_plotlo: - .repeat screenrows,line +plotlo: .repeat screenrows,line .byte <($0000+(line*$80)) .endrepeat -_plothi: - .repeat screenrows,line +plothi: .repeat screenrows,line .byte >($0000+(line*$80)) .endrepeat - -;------------------------------------------------------------------------------- -; force the init constructor to be imported - - .import initconio -conio_init = initconio diff --git a/libsrc/pce/memcpy.s b/libsrc/pce/memcpy.s index 40f831e30..98db6a964 100644 --- a/libsrc/pce/memcpy.s +++ b/libsrc/pce/memcpy.s @@ -17,7 +17,7 @@ .export _memcpy .export memcpy_increment, memcpy_transfer, memcpy_getparams - .import incsp2, popax + .import incsp2, popax, popptr1 .importzp sp, ptr1, ptr2, ptr3 @@ -81,13 +81,11 @@ memcpy_getparams: jsr incsp2 ; drop src address jmp popax ; get pointer; return it as result -@L1: jsr popax - sta ptr1 - stx ptr1+1 ; save src +@L1: jsr popptr1 ; save src ; (Direct stack access is six cycles faster [total cycle count].) - ldy #1 ; save dest + iny ; (Y=0 by popptr1, need '1' here) save dest lda (sp),y ; get high byte tax lda (sp) ; get low byte @@ -97,7 +95,7 @@ memcpy_getparams: ; ---------------------------------------------------------------------- ; The transfer instructions use inline arguments. -; Therefore, we must build the instruction, in the DATA segment. +; Therefore, we must build the instruction in the DATA segment. .data diff --git a/libsrc/pce/psg.s b/libsrc/pce/psg.s index b1d610fa1..7087c2084 100644 --- a/libsrc/pce/psg.s +++ b/libsrc/pce/psg.s @@ -1,11 +1,11 @@ - .include "pce.inc" - .export psg_init - .segment "INIT" + .include "pce.inc" + + .segment "ONCE" psg_init: - clx - stz PSG_GLOBAL_PAN ; Clear global balance + stz PSG_GLOBAL_PAN ; Silence global balance + ldx #6 - 1 psg_clear_loop: stx PSG_CHAN_SELECT ; Select channel @@ -17,14 +17,12 @@ psg_clear_loop: stz PSG_LFO_FREQ ; Clear LFO frequency stz PSG_LFO_CTRL ; Clear LFO control - cly + ldy #$20 psg_clear_waveform: stz PSG_CHAN_DATA ; Clear waveform byte - iny - cpy #$20 + dey bne psg_clear_waveform - inx - cpx #$06 - bne psg_clear_loop + dex + bpl psg_clear_loop rts diff --git a/libsrc/pce/revers.s b/libsrc/pce/revers.s index 17a74508c..ff9957efd 100644 --- a/libsrc/pce/revers.s +++ b/libsrc/pce/revers.s @@ -1,28 +1,23 @@ +; +; 1998-08-07, Ullrich von Bassewitz +; 2015-11-23, Greg King +; +; unsigned char __fastcall__ revers (unsigned char onoff); +; - .include "pce.inc" - .include "extzp.inc" + .export _revers - .export _revers + .importzp RVS .proc _revers - - ldx #$00 ; Assume revers off - tay ; Test onoff - beq L1 ; Jump if off - ldx #$80 ; Load on value - ldy #$00 ; Assume old value is zero -L1: lda RVS ; Load old value - stx RVS ; Set new value - beq L2 ; Jump if old value zero - iny ; Make old value = 1 -L2: ldx #$00 ; Load high byte of result - tya ; Load low byte, set CC + cmp #$01 ; False or true? + cla + ror a ; Either $00 or $80 + ldy RVS ; Load old value + sta RVS ; Set new value + tya + asl a + rol a ; Either $00 or $01 + clx rts - .endproc - -;------------------------------------------------------------------------------- -; force the init constructor to be imported - - .import initconio -conio_init = initconio diff --git a/libsrc/pce/ticktock.s b/libsrc/pce/ticktock.s index 4e4d44d9a..b1974ee4d 100644 --- a/libsrc/pce/ticktock.s +++ b/libsrc/pce/ticktock.s @@ -1,10 +1,9 @@ - .interruptor ticktock, 24 + .interruptor ticktock - .include "pce.inc" .include "extzp.inc" ticktock: - bbr5 vdc_flags,@s1 ; not vertical-blank interrupt + bbr5 vdc_flags,@s1 ; skip if not vertical-blank interrupt ; Increment the system tick counter. inc tickcount diff --git a/libsrc/pce/vce.s b/libsrc/pce/vce.s index af69c5ed1..d7f5bdc1d 100644 --- a/libsrc/pce/vce.s +++ b/libsrc/pce/vce.s @@ -1,15 +1,16 @@ - .include "pce.inc" - .export vce_init - .segment "INIT" + .include "pce.inc" + + .segment "ONCE" vce_init: ; Set CTA to zero stz VCE_ADDR_LO stz VCE_ADDR_HI - ldy #$01 + + ldy #$01 ; Only background palettes vce_clear_bank: - ldx #$00 + clx ; ldx #<$0100 ; <(16 * 16) vce_clear_color: stz VCE_DATA_LO ; Clear color (LSB) stz VCE_DATA_HI ; Clear color (MSB) diff --git a/libsrc/pce/vdc.s b/libsrc/pce/vdc.s index 878c79321..8495a9163 100644 --- a/libsrc/pce/vdc.s +++ b/libsrc/pce/vdc.s @@ -1,41 +1,32 @@ + .export vdc_init .include "pce.inc" ; FIXME: implement selection of different video modes at runtime HIRES = 1 - .export vdc_init - vdc_init: - lda a:VDC_CTRL + lda VDC_CTRL - VREG $00, $0000 ; MAWR - VREG $01, $0000 ; MARR - VREG $05, $0000 ; CR - VREG $06, $0000 ; RCR - VREG $07, $0000 ; BXR - VREG $08, $0000 ; BYR - VREG $09, $0070 ; MAWR - VREG $0C, $1702 ; CRTC - VSR - VREG $0D, $00DF ; CRTC - VDS - VREG $0E, $000C ; CRTC - VDE - VREG $0F, $0000 ; DCR + VREG VDC_CR , $0000 ; disable display and interrupts + VREG VDC_BXR, $0000 ; no scrolling + VREG VDC_BYR, $0000 + VREG VDC_MWR, $0070 ; 128 x 64 tiles (1024 x 512 pixels) + VREG VDC_VSR, $1702 ; CRTC + VREG VDC_VDR, $00DF ; CRTC - VDS + VREG VDC_VCR, $000C ; CRTC - VDE + VREG VDC_DCR, $0000 .if HIRES - - VREG $0A, $0C02 ; CRTC - HSR - VREG $0B, $043C ; CRTC - HDS + VREG VDC_HSR, $0C02 ; CRTC + VREG VDC_HDR, $043C ; CRTC - HDS lda #$06 - sta VCE_CTRL - .else - - VREG $0A, $0202 ; CRTC - HSR - VREG $0B, $041F ; CRTC - HDS + VREG VDC_HSR, $0202 ; CRTC + VREG VDC_HDR, $041F ; CRTC - HDS lda #$04 +.endif sta VCE_CTRL -.endif - - lda a:VDC_CTRL + lda VDC_CTRL rts diff --git a/libsrc/pce/vga.inc b/libsrc/pce/vga.s similarity index 95% rename from libsrc/pce/vga.inc rename to libsrc/pce/vga.s index 9317d6ce4..630fbe8db 100644 --- a/libsrc/pce/vga.inc +++ b/libsrc/pce/vga.s @@ -1,6 +1,15 @@ +;---------------------------------------------------------------------------- +; VGA font for the PC-Engine conio implementation -; VGA charset for the PC-Engine conio implementation + .export _pce_font +; The character tiles use only two colors from each pallette. Color zero +; comes from pallette zero; color one is different in each pallette. The +; color of a character is set by choosing one of the 16 pallettes. + +.rodata + +_pce_font: .byte $00, $00, $00, $00, $00, $00, $00, $00 .byte %00000000 diff --git a/libsrc/pce/waitvblank.s b/libsrc/pce/waitvblank.s deleted file mode 100644 index b9f0f902f..000000000 --- a/libsrc/pce/waitvblank.s +++ /dev/null @@ -1,18 +0,0 @@ -; -; void waitvblank (void); -; - - .include "pce.inc" - .include "extzp.inc" - - .forceimport ticktock - .export _waitvblank - -.proc _waitvblank - - lda tickcount -@lp: cmp tickcount - beq @lp - rts - -.endproc diff --git a/libsrc/pce/waitvsync.s b/libsrc/pce/waitvsync.s new file mode 100644 index 000000000..fed10c4e8 --- /dev/null +++ b/libsrc/pce/waitvsync.s @@ -0,0 +1,18 @@ +; +; Written by Groepaz <groepaz@gmx.net> +; +; void waitvsync (void); +; + + .export _waitvsync + + .forceimport ticktock ; make sure that tickcount changes + + .include "extzp.inc" + +.proc _waitvsync + lda tickcount +@lp: cmp tickcount + beq @lp + rts +.endproc diff --git a/libsrc/pce/wherex.s b/libsrc/pce/wherex.s new file mode 100644 index 000000000..3abe49cb6 --- /dev/null +++ b/libsrc/pce/wherex.s @@ -0,0 +1,24 @@ +; +; Ullrich von Bassewitz, 2003-05-02 +; +; unsigned char wherex (void); +; + + .export _wherex + + .include "pce.inc" + .include "extzp.inc" + +.proc _wherex + + lda CURS_X + ldx #$00 + rts + +.endproc + +;------------------------------------------------------------------------------- +; force the init constructor to be imported + + .import initconio +conio_init = initconio diff --git a/libsrc/pce/wherey.s b/libsrc/pce/wherey.s new file mode 100644 index 000000000..7061790ab --- /dev/null +++ b/libsrc/pce/wherey.s @@ -0,0 +1,24 @@ +; +; Ullrich von Bassewitz, 2003-05-02 +; +; unsigned char wherey (void); +; + + .export _wherey + + .include "pce.inc" + .include "extzp.inc" + +.proc _wherey + + lda CURS_Y + ldx #$00 + rts + +.endproc + +;------------------------------------------------------------------------------- +; force the init constructor to be imported + + .import initconio +conio_init = initconio diff --git a/libsrc/pet/break.s b/libsrc/pet/break.s index 49585ffef..42cd95bfa 100644 --- a/libsrc/pet/break.s +++ b/libsrc/pet/break.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 26.11.1998 ; -; void set_brk (unsigned Addr); +; void __fastcall__ set_brk (unsigned Addr); ; void reset_brk (void); ; diff --git a/libsrc/pet/cbm_load.c b/libsrc/pet/cbm_load.c new file mode 100644 index 000000000..1823f6537 --- /dev/null +++ b/libsrc/pet/cbm_load.c @@ -0,0 +1,59 @@ +/* +** 2020-10-15, Greg King +** +** unsigned int __fastcall__ cbm_load (const char* name, +** unsigned char device, +** void* data); +*/ + +#include <cbm.h> +#include <limits.h> + +/* Loads file "name" from the given device to the given address, or to the load +** address of the file if "data" is the null pointer (like load"name",8,1 +** in BASIC). +** Returns the number of bytes that were loaded if loading was successful; +** otherwise 0; "_oserror" contains an error-code, then. +*/ +unsigned int __fastcall__ cbm_load (const char* name, unsigned char device, void* data) +{ + void* load; + int length; + unsigned int size = 0; + + if (cbm_open (1, device, CBM_READ, name) != 0) { + /* Can't load from a file that can't be openned. */ + return 0; + } + + /* Get the file's load address. */ + if (cbm_read (1, &load, sizeof load) != sizeof load) { + /* Either the file wasn't found, or it was too short. (Note: + ** the computer openned a file even if the drive couldn't open one.) + */ + cbm_close (1); + return 0; + } + + /* If "data" doesn't hold an address, then use the file's address. */ + if (data == (void*)0x0000) { + data = load; + } + + /* Pull the file into RAM. [Note that, if cbm_read() grabbed more + ** than 32767 bytes at a time, then its result would look negative, + ** which would cancel the load.] + */ + do { + size += (length = cbm_read (1, data, INT_MAX)); + data = (unsigned char*)data + length; + } while (length == INT_MAX && cbm_k_readst() == 0); + cbm_close (1); + + /* "length" is -1 if there was an error. */ + if (length < 0) { + size = 0; + } + + return size; +} diff --git a/libsrc/pet/cpeekcolor.s b/libsrc/pet/cpeekcolor.s new file mode 100644 index 000000000..ed275ec95 --- /dev/null +++ b/libsrc/pet/cpeekcolor.s @@ -0,0 +1,8 @@ +; +; 2017-06-03, Greg King +; +; unsigned char cpeekcolor (void); +; + + .import return1 + .export _cpeekcolor := return1 ; always COLOR_WHITE diff --git a/libsrc/pet/cputc.s b/libsrc/pet/cputc.s index f38d2759a..9b2c22323 100644 --- a/libsrc/pet/cputc.s +++ b/libsrc/pet/cputc.s @@ -7,14 +7,13 @@ .export _cputcxy, _cputc, cputdirect, putchar .export newline, plot - .import popa, _gotoxy + .import gotoxy .include "pet.inc" _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C ; Plot a character - also used as internal function diff --git a/libsrc/pet/crt0.s b/libsrc/pet/crt0.s index c1c805308..e56a7eca4 100644 --- a/libsrc/pet/crt0.s +++ b/libsrc/pet/crt0.s @@ -12,7 +12,6 @@ .include "zeropage.inc" .include "pet.inc" - .include "../cbm/cbm.inc" ; ------------------------------------------------------------------------ ; Startup code @@ -94,7 +93,7 @@ L2: lda zpsave,x ; ------------------------------------------------------------------------ -.segment "INITBSS" +.segment "INIT" zpsave: .res zpspace diff --git a/libsrc/pet/irq.s b/libsrc/pet/irq.s index ddaf43ca5..9da45f1df 100644 --- a/libsrc/pet/irq.s +++ b/libsrc/pet/irq.s @@ -9,7 +9,7 @@ ; ------------------------------------------------------------------------ -.segment "INIT" +.segment "ONCE" initirq: lda IRQVec diff --git a/libsrc/pet/joy/pet-ptvjoy.s b/libsrc/pet/joy/pet-ptvjoy.s index 229055fcb..c098072fb 100644 --- a/libsrc/pet/joy/pet-ptvjoy.s +++ b/libsrc/pet/joy/pet-ptvjoy.s @@ -10,6 +10,7 @@ .include "joy-kernel.inc" .include "joy-error.inc" + .include "pet.inc" .macpack module @@ -28,34 +29,18 @@ .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $00 ; JOY_FIRE2 unavailable - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants JOY_COUNT = 2 ; Number of joysticks we support -VIA_PRA := $E841 ; Port register A -VIA_DDRA := $E843 ; Data direction register A - - .code ; ------------------------------------------------------------------------ @@ -101,9 +86,9 @@ READ: lda #%10000000 ; via port A Data-Direction ; Read joystick 1 joy1: lda #$80 ; via port A read/write - sta VIA_PRA ; (output one at PA7) + sta VIA_PA1 ; (output one at PA7) - lda VIA_PRA ; via port A read/write + lda VIA_PA1 ; via port A read/write and #$1f ; get bit 4-0 (PA4-PA0) eor #$1f rts @@ -111,13 +96,13 @@ joy1: lda #$80 ; via port A read/write ; Read joystick 2 joy2: lda #$00 ; via port A read/write - sta VIA_PRA ; (output zero at PA7) + sta VIA_PA1 ; (output zero at PA7) - lda VIA_PRA ; via port A read/write + lda VIA_PA1 ; via port A read/write and #$0f ; get bit 3-0 (PA3-PA0) sta tmp1 ; joy 4 directions - lda VIA_PRA ; via port A read/write + lda VIA_PA1 ; via port A read/write and #%00100000 ; get bit 5 (PA5) lsr ora tmp1 diff --git a/libsrc/pet/joy/pet-stdjoy.s b/libsrc/pet/joy/pet-stdjoy.s index 5847c2b09..75b9f7465 100644 --- a/libsrc/pet/joy/pet-stdjoy.s +++ b/libsrc/pet/joy/pet-stdjoy.s @@ -27,24 +27,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $00 ; JOY_FIRE2 unavailable - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants @@ -97,7 +85,7 @@ READ: joy1: lda #0 sta VIA_DDRA - lda VIA_PRA + lda VIA_PA1 and #$0f cmp #$0c bne @notc1 @@ -114,7 +102,7 @@ joy1: joy2: lda #0 sta VIA_DDRA - lda VIA_PRA + lda VIA_PA1 lsr lsr lsr diff --git a/libsrc/pet/kbrepeat.s b/libsrc/pet/kbrepeat.s new file mode 100644 index 000000000..100d8502a --- /dev/null +++ b/libsrc/pet/kbrepeat.s @@ -0,0 +1,29 @@ +; +; unsigned char __fastcall__ kbrepeat (unsigned char mode); +; +; 2017-06-16, Groepaz +; 2017-09-05, Greg King +; + + .export _kbrepeat + + .include "pet.inc" + +_kbrepeat: + ldx #>$0000 + ldy SCR_LINELEN + cpy #40 + 1 + bcc L1 ; branch if screen is 40 columns wide + + ldy KBDREPEAT80 ; get old value + sta KBDREPEAT80 ; store new value + tya ; return old value + rts + +L1: tay + lda KBDREPEAT40B ; get REPEAT-key flag (used by some editor ROMs) + lsr a ; move bit 0 into bit 7 + ror a + ora KBDREPEAT40 ; combine with old key-REPEAT flags + sty KBDREPEAT40 + rts diff --git a/libsrc/pet/kbsout.s b/libsrc/pet/kbsout.s index 1e8912324..8b21378af 100644 --- a/libsrc/pet/kbsout.s +++ b/libsrc/pet/kbsout.s @@ -1,19 +1,20 @@ ; ; Ullrich von Bassewitz, 19.11.2002 ; -; BSOUT replacement function for the PETs +; BSOUT/CHROUT replacement function for the PETs ; .export BSOUT + .export CHROUT + .import checkst .proc BSOUT - jsr $FFD2 ; Call kernal function + jsr $FFD2 ; Call Kernal function jmp checkst ; Check status, return carry on error .endproc - - +CHROUT := BSOUT diff --git a/libsrc/pet/kckout.s b/libsrc/pet/kckout.s index 8c5f4d415..65c4e8142 100644 --- a/libsrc/pet/kckout.s +++ b/libsrc/pet/kckout.s @@ -15,5 +15,3 @@ .endproc - - diff --git a/libsrc/pet/kclose.s b/libsrc/pet/kclose.s index 1da034017..c7eb19ea0 100644 --- a/libsrc/pet/kclose.s +++ b/libsrc/pet/kclose.s @@ -10,7 +10,7 @@ .proc CLOSE - + ldx PET_DETECT cpx #PET_4000 bne @L1 @@ -19,4 +19,3 @@ .endproc - diff --git a/libsrc/pet/kernal.s b/libsrc/pet/kernal.s index 1a9dd6f67..fc8d62c4a 100644 --- a/libsrc/pet/kernal.s +++ b/libsrc/pet/kernal.s @@ -4,25 +4,12 @@ ; PET kernal functions ; + .include "cbm_kernal.inc" + .export CLRCH .export BASIN + .export CHRIN .export STOP .export GETIN .export CLALL .export UDTIM - - - - - - -;----------------------------------------------------------------------------- -; Functions that are available in the kernal jump table - -CLRCH = $FFCC -BASIN = $FFCF -STOP = $FFE1 -GETIN = $FFE4 -CLALL = $FFE7 -UDTIM = $FFEA - diff --git a/libsrc/pet/krdtim.s b/libsrc/pet/krdtim.s index 355cce3d8..cce218928 100644 --- a/libsrc/pet/krdtim.s +++ b/libsrc/pet/krdtim.s @@ -5,7 +5,7 @@ ; .export RDTIM - + .include "pet.inc" @@ -20,4 +20,3 @@ .endproc - diff --git a/libsrc/pet/ksetlfs.s b/libsrc/pet/ksetlfs.s index 6e9065ac7..50e6471e3 100644 --- a/libsrc/pet/ksetlfs.s +++ b/libsrc/pet/ksetlfs.s @@ -15,7 +15,6 @@ stx DEVNUM ; Device address sty SECADR ; Secondary address rts - + .endproc - diff --git a/libsrc/pet/ksetnam.s b/libsrc/pet/ksetnam.s index 0bf6411bd..9a911e38b 100644 --- a/libsrc/pet/ksetnam.s +++ b/libsrc/pet/ksetnam.s @@ -10,7 +10,7 @@ .proc SETNAM - + sta FNLEN stx FNADR sty FNADR+1 @@ -18,4 +18,3 @@ .endproc - diff --git a/libsrc/pet/mainargs.s b/libsrc/pet/mainargs.s index 8ba6e3117..bc685b699 100644 --- a/libsrc/pet/mainargs.s +++ b/libsrc/pet/mainargs.s @@ -16,10 +16,10 @@ NAME_LEN = 16 ; Maximum length of command-name ;--------------------------------------------------------------------------- -; Get possible command-line arguments. Goes into the special INIT segment, +; Get possible command-line arguments. Goes into the special ONCE segment, ; which may be reused after the startup code is run -.segment "INIT" +.segment "ONCE" .proc initmainargs @@ -111,7 +111,7 @@ done: lda #<argv .endproc -.segment "INITBSS" +.segment "INIT" term: .res 1 name: .res NAME_LEN + 1 diff --git a/libsrc/pet/randomize.s b/libsrc/pet/randomize.s index 2c0fe722a..44bf4c38e 100644 --- a/libsrc/pet/randomize.s +++ b/libsrc/pet/randomize.s @@ -11,7 +11,7 @@ .include "pet.inc" -__randomize: +__randomize: ldx TIME+2 lda TIME+1 ; Use 60HZ clock jmp _srand ; Initialize generator diff --git a/libsrc/pet/waitvsync.s b/libsrc/pet/waitvsync.s new file mode 100644 index 000000000..39b562e43 --- /dev/null +++ b/libsrc/pet/waitvsync.s @@ -0,0 +1,16 @@ +; +; Written by Robin Harbron, requires 12" monitor +; +; void waitvsync (void); +; + + .export _waitvsync + + .include "pet.inc" + +_waitvsync: +@l1: + lda VIA_PB + and #%00100000 + bne @l1 + rts diff --git a/libsrc/plus4/break.s b/libsrc/plus4/break.s index 248a558c7..03d2ee97a 100644 --- a/libsrc/plus4/break.s +++ b/libsrc/plus4/break.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 27.09.1998 ; -; void set_brk (unsigned Addr); +; void __fastcall__ set_brk (unsigned Addr); ; void reset_brk (void); ; @@ -55,7 +55,7 @@ uservec: jmp $FFFF ; Patched at runtime -; Break handler, called if a break occurs. +; Break handler, called if a break occurs. .proc brk_handler @@ -91,4 +91,3 @@ uservec: jmp $FFFF ; Patched at runtime .endproc - diff --git a/libsrc/plus4/cgetc.s b/libsrc/plus4/cgetc.s index 7ff568101..62863c06e 100644 --- a/libsrc/plus4/cgetc.s +++ b/libsrc/plus4/cgetc.s @@ -7,6 +7,7 @@ .export _cgetc .import cursor + .include "cbm_kernal.inc" .include "plus4.inc" ; -------------------------------------------------------------------------- @@ -59,12 +60,14 @@ L2: sta ENABLE_ROM ; Bank in the ROM .constructor initkbd .destructor donekbd -.segment "INIT" ; Special init code segment may get overwritten +.segment "ONCE" ; Special init code segment may get overwritten .proc initkbd - ldy #15 + ldy #7 @L1: lda fnkeys,y + sta FKEY_SPACE+8,y + lda #$01 ; Lower 8 places are all $01 sta FKEY_SPACE,y dey bpl @L1 @@ -72,6 +75,8 @@ L2: sta ENABLE_ROM ; Bank in the ROM .endproc +fnkeys: .byte 133, 137, 134, 138, 135, 139, 136, 140 + .segment "LOWCODE" ; Accesses the ROM - must go into low mem @@ -87,11 +92,3 @@ L2: sta ENABLE_ROM ; Bank in the ROM rts .endproc - - -; Function key table, readonly - -.rodata -fnkeys: .byte $01, $01, $01, $01, $01, $01, $01, $01 - .byte 133, 137, 134, 138, 135, 139, 136, 140 - diff --git a/libsrc/plus4/clrscr.s b/libsrc/plus4/clrscr.s index 720a5e6e4..a67016255 100644 --- a/libsrc/plus4/clrscr.s +++ b/libsrc/plus4/clrscr.s @@ -6,6 +6,7 @@ .export _clrscr + .include "cbm_kernal.inc" .include "plus4.inc" .segment "LOWCODE" ; Must go into low memory @@ -16,9 +17,3 @@ sta ENABLE_RAM ; Switch back to RAM rts ; Return to caller .endproc - - - - - - diff --git a/libsrc/plus4/cputc.s b/libsrc/plus4/cputc.s index a83a9c60b..a72b4012a 100644 --- a/libsrc/plus4/cputc.s +++ b/libsrc/plus4/cputc.s @@ -7,7 +7,7 @@ .export _cputcxy, _cputc, cputdirect, putchar .export newline, plot - .import popa, _gotoxy + .import gotoxy .import PLOT .include "plus4.inc" @@ -15,8 +15,7 @@ _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C ; Plot a character - also used as internal function @@ -75,10 +74,9 @@ L5: inc CURS_Y ; Handle character if high bit set L10: and #$7F - cmp #$7E ; PI? + cmp #$7F ; PI? bne L11 lda #$5E ; Load screen code for PI - bne cputdirect L11: ora #$40 bne cputdirect diff --git a/libsrc/plus4/crt0.s b/libsrc/plus4/crt0.s index ae3297562..6b44a2b7e 100644 --- a/libsrc/plus4/crt0.s +++ b/libsrc/plus4/crt0.s @@ -9,7 +9,7 @@ .import callirq_y, initlib, donelib .import callmain, zerobss .import __INTERRUPTOR_COUNT__ - .import __RAM_START__, __RAM_SIZE__ ; Linker generated + .import __MAIN_START__, __MAIN_SIZE__ ; Linker generated .import __STACKSIZE__ ; Linker generated .importzp ST @@ -50,12 +50,12 @@ L1: lda sp,x ; of the usable RAM. tsx - stx spsave ; save system stk ptr + stx spsave ; Save system stk ptr - lda #<(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) + lda #<(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) + ldx #>(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) sta sp - lda #>(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) - sta sp+1 + stx sp+1 ; Set up the IRQ vector in the banked RAM; and, switch off the ROM. @@ -195,8 +195,6 @@ spsave: .res 1 irqcount: .byte 0 -.segment "INITBSS" +.segment "INIT" zpsave: .res zpspace - - diff --git a/libsrc/plus4/fast.s b/libsrc/plus4/fast.s new file mode 100644 index 000000000..e48813969 --- /dev/null +++ b/libsrc/plus4/fast.s @@ -0,0 +1,22 @@ +; +; Marco van den Heuvel, 2018-03-20 +; +; void fast (void); +; /* Switch the CPU into double clock mode. */ +; + + .export _fast + + .include "plus4.inc" + + +.proc _fast + + lda TED_CLK + and #%11111101 + sta TED_CLK + rts + +.endproc + + diff --git a/libsrc/plus4/isfast.s b/libsrc/plus4/isfast.s new file mode 100644 index 000000000..ff104d97f --- /dev/null +++ b/libsrc/plus4/isfast.s @@ -0,0 +1,22 @@ +; +; Marco van den Heuvel, 2018-03-20 +; +; unsigned char isfast (void); +; /* Returns 1 if the CPU is in double clock mode. */ +; + + .export _isfast + + .include "plus4.inc" + + +.proc _isfast + + lda TED_CLK + lsr + and #$01 + ldx #$00 + rts + +.endproc + diff --git a/libsrc/plus4/joy/plus4-stdjoy.s b/libsrc/plus4/joy/plus4-stdjoy.s index 29316bf22..e8e85fedc 100644 --- a/libsrc/plus4/joy/plus4-stdjoy.s +++ b/libsrc/plus4/joy/plus4-stdjoy.s @@ -1,17 +1,15 @@ ; -; Standard joystick driver for the Plus/4. May be used multiple times when linked -; to the statically application. +; Standard joystick driver for the Plus/4 and C16. +; May be used multiple times when linked statically to an application. ; -; Ullrich von Bassewitz, 2002-12-21 +; 2002-12-21, Ullrich von Bassewitz +; 2016-06-18, Greg King ; - .include "zeropage.inc" - .include "joy-kernel.inc" .include "joy-error.inc" .include "plus4.inc" - .macpack generic .macpack module @@ -26,31 +24,19 @@ ; Driver signature - .byte $6A, $6F, $79 ; "joy" + .byte $6A, $6F, $79 ; ASCII "joy" .byte JOY_API_VERSION ; Driver API version number ; Library reference .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $00 ; JOY_FIRE2 unavailable - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants @@ -98,16 +84,20 @@ COUNT: ; READ: Read a particular joystick passed in A. ; -READ: ldy #$FA ; Load index for joystick #1 +READ: ldy #%11111011 ; Load index for joystick #1 tax ; Test joystick number beq @L1 - ldy #$FB ; Load index for joystick #2 + ldy #%11111101 ; Load index for joystick #2 + ldx #>$0000 ; (Return unsigned int) @L1: sei - sty TED_KBD - lda TED_KBD + sty TED_KBD ; Read a joystick ... + lda TED_KBD ; ... and some keys -- it's unavoidable cli - ldx #$00 ; Clear high byte - and #$1F - eor #$1F - rts + eor #%11111111 +; The push buttons are in bits 6 and 7. Both of them cannot be %1 together. +; Therefore, bit 6 can be merged with bit 7. + + clc + adc #%01000000 + rts diff --git a/libsrc/plus4/kbasin.s b/libsrc/plus4/kbasin.s index 507043866..3bbee9f74 100644 --- a/libsrc/plus4/kbasin.s +++ b/libsrc/plus4/kbasin.s @@ -1,10 +1,11 @@ ; ; Ullrich von Bassewitz, 22.11.2002 ; -; BASIN replacement function +; BASIN/CHRIN replacement function ; - + .export BASIN + .export CHRIN .include "plus4.inc" @@ -17,4 +18,4 @@ rts ; Return to caller .endproc - +CHRIN := BASIN diff --git a/libsrc/plus4/kbrepeat.s b/libsrc/plus4/kbrepeat.s new file mode 100644 index 000000000..9c0dc6855 --- /dev/null +++ b/libsrc/plus4/kbrepeat.s @@ -0,0 +1,14 @@ +; +; unsigned char __fastcall__ kbrepeat (unsigned char mode); +; + + .export _kbrepeat + + .include "plus4.inc" + +_kbrepeat: + ldx KBDREPEAT ; get old value + sta KBDREPEAT ; store new value + txa ; return old value + ldx #0 + rts diff --git a/libsrc/plus4/kbsout.s b/libsrc/plus4/kbsout.s index a86a334b2..8b6df19ff 100644 --- a/libsrc/plus4/kbsout.s +++ b/libsrc/plus4/kbsout.s @@ -1,10 +1,11 @@ ; ; Ullrich von Bassewitz, 22.11.2002 ; -; BSOUT replacement function +; BSOUT/CHROUT replacement function ; .export BSOUT + .export CHROUT .include "plus4.inc" @@ -17,4 +18,4 @@ rts ; Return to caller .endproc - +CHROUT := BSOUT diff --git a/libsrc/plus4/kplot.s b/libsrc/plus4/kplot.s index 7035b05d5..7883c28a6 100644 --- a/libsrc/plus4/kplot.s +++ b/libsrc/plus4/kplot.s @@ -6,16 +6,17 @@ .export PLOT +.scope KERNAL + .include "cbm_kernal.inc" +.endscope + .include "plus4.inc" .segment "LOWCODE" ; Must go into low memory .proc PLOT sta ENABLE_ROM ; Enable the ROM - jsr $FFF0 ; Call the ROM routine + jsr KERNAL::PLOT ; Call the ROM routine sta ENABLE_RAM ; Switch back to RAM rts ; Return to caller .endproc - - - diff --git a/libsrc/plus4/kscnkey.s b/libsrc/plus4/kscnkey.s new file mode 100644 index 000000000..e7e2ab986 --- /dev/null +++ b/libsrc/plus4/kscnkey.s @@ -0,0 +1,19 @@ +; +; 2002-11-22, Ullrich von Bassewitz +; 2016-08-07, Greg King +; +; SCNKEY replacement function +; + + .export SCNKEY + + .include "plus4.inc" + +.segment "LOWCODE" ; Must go into low memory + +.proc SCNKEY + sta ENABLE_ROM ; Enable the ROM + jsr $FF9F ; Call the ROM routine + sta ENABLE_RAM ; Switch back to RAM + rts ; Return to caller +.endproc diff --git a/libsrc/plus4/kudtim.s b/libsrc/plus4/kudtim.s new file mode 100644 index 000000000..d35190788 --- /dev/null +++ b/libsrc/plus4/kudtim.s @@ -0,0 +1,19 @@ +; +; 2002-11-22, Ullrich von Bassewitz +; 2016-08-07, Greg King +; +; UDTIM replacement function +; + + .export UDTIM + + .include "plus4.inc" + +.segment "LOWCODE" ; Must go into low memory + +.proc UDTIM + sta ENABLE_ROM ; Enable the ROM + jsr $FFEA ; Call the ROM routine + sta ENABLE_RAM ; Switch back to RAM + rts ; Return to caller +.endproc diff --git a/libsrc/plus4/mainargs.s b/libsrc/plus4/mainargs.s index 59879978e..42e2ba029 100644 --- a/libsrc/plus4/mainargs.s +++ b/libsrc/plus4/mainargs.s @@ -32,10 +32,10 @@ MAXARGS = 10 ; Maximum number of arguments allowed REM = $8f ; BASIC token-code NAME_LEN = 16 ; Maximum length of command-name -; Get possible command-line arguments. Goes into the special INIT segment, +; Get possible command-line arguments. Goes into the special ONCE segment, ; which may be reused after the startup code is run -.segment "INIT" +.segment "ONCE" initmainargs: @@ -125,7 +125,7 @@ done: lda #<argv stx __argv + 1 rts -.segment "INITBSS" +.segment "INIT" term: .res 1 name: .res NAME_LEN + 1 diff --git a/libsrc/plus4/randomize.s b/libsrc/plus4/randomize.s index 2a7f6a44b..796ad118b 100644 --- a/libsrc/plus4/randomize.s +++ b/libsrc/plus4/randomize.s @@ -11,7 +11,7 @@ .include "plus4.inc" -__randomize: +__randomize: ldx TED_VLINELO ; Use TED rasterline as high byte lda TIME+2 ; Use 60HZ clock as low byte jmp _srand ; Initialize generator diff --git a/libsrc/plus4/ser/plus4-stdser.s b/libsrc/plus4/ser/plus4-stdser.s index 47dd96042..bb44a4cf9 100644 --- a/libsrc/plus4/ser/plus4-stdser.s +++ b/libsrc/plus4/ser/plus4-stdser.s @@ -1,14 +1,14 @@ ; -; Serial driver for the builtin 6551 ACIA of the Plus/4. +; Serial driver for the built-in 6551 ACIA of the Plus/4. ; ; Ullrich von Bassewitz, 2003-12-13 ; ; The driver is based on the cc65 rs232 module, which in turn is based on -; Craig Bruce device driver for the Switftlink/Turbo-232. +; Craig Bruce's device driver for the Switftlink/Turbo-232. ; ; SwiftLink/Turbo-232 v0.90 device driver, by Craig Bruce, 14-Apr-1998. ; -; This software is Public Domain. It is in Buddy assembler format. +; This (C. Bruce) software is Public Domain. It is in Buddy assembler format. ; ; This device driver uses the SwiftLink RS-232 Serial Cartridge, available from ; Creative Micro Designs, Inc, and also supports the extensions of the Turbo232 @@ -17,7 +17,7 @@ ; ; The code assumes that the kernal + I/O are in context. On the C128, call ; it from Bank 15. On the C64, don't flip out the Kernal unless a suitable -; NMI catcher is put into the RAM under then Kernal. For the SuperCPU, the +; NMI catcher is put into the RAM under the Kernal. For the SuperCPU, the ; interrupt handling assumes that the 65816 is in 6502-emulation mode. ; @@ -36,7 +36,7 @@ ; Driver signature - .byte $73, $65, $72 ; "ser" + .byte $73, $65, $72 ; ASCII "ser" .byte SER_API_VERSION ; Serial API version number ; Library reference @@ -45,24 +45,24 @@ ; Jump table - .word INSTALL - .word UNINSTALL - .word OPEN - .word CLOSE - .word GET - .word PUT - .word STATUS - .word IOCTL - .word IRQ + .word SER_INSTALL + .word SER_UNINSTALL + .word SER_OPEN + .word SER_CLOSE + .word SER_GET + .word SER_PUT + .word SER_STATUS + .word SER_IOCTL + .word SER_IRQ ;---------------------------------------------------------------------------- ; I/O definitions -ACIA = $DE00 -ACIA_DATA = ACIA+0 ; Data register -ACIA_STATUS = ACIA+1 ; Status register -ACIA_CMD = ACIA+2 ; Command register -ACIA_CTRL = ACIA+3 ; Control register +ACIA := $FD00 +ACIA_DATA := ACIA+0 ; Data register +ACIA_STATUS := ACIA+1 ; Status register +ACIA_CMD := ACIA+2 ; Command register +ACIA_CTRL := ACIA+3 ; Control register ;---------------------------------------------------------------------------- ; @@ -130,25 +130,25 @@ ParityTable: .code ;---------------------------------------------------------------------------- -; INSTALL routine. Is called after the driver is loaded into memory. If +; SER_INSTALL routine. Is called after the driver is loaded into memory. If ; possible, check if the hardware is present. ; Must return an SER_ERR_xx code in a/x. ; ; Since we don't have to manage the IRQ vector on the Plus/4, this is actually ; the same as: ; -; UNINSTALL routine. Is called before the driver is removed from memory. +; SER_UNINSTALL routine. Is called before the driver is removed from memory. ; Must return an SER_ERR_xx code in a/x. ; ; and: ; -; CLOSE: Close the port, disable interrupts and flush the buffer. Called +; SER_CLOSE: Close the port, disable interrupts and flush the buffer. Called ; without parameters. Must return an error code in a/x. ; -INSTALL: -UNINSTALL: -CLOSE: +SER_INSTALL: +SER_UNINSTALL: +SER_CLOSE: ; Deactivate DTR and disable 6551 interrupts @@ -165,7 +165,7 @@ CLOSE: ; PARAMS routine. A pointer to a ser_params structure is passed in ptr1. ; Must return an SER_ERR_xx code in a/x. -OPEN: +SER_OPEN: ; Check if the handshake setting is valid @@ -244,12 +244,13 @@ InvBaud: rts ;---------------------------------------------------------------------------- -; GET: Will fetch a character from the receive buffer and store it into the +; SER_GET: Will fetch a character from the receive buffer and store it into the ; variable pointer to by ptr1. If no data is available, SER_ERR_NO_DATA is ; return. ; -GET: ldx SendFreeCnt ; Send data if necessary +SER_GET: + ldx SendFreeCnt ; Send data if necessary inx ; X == $FF? beq @L1 lda #$00 @@ -288,11 +289,11 @@ GET: ldx SendFreeCnt ; Send data if necessary rts ;---------------------------------------------------------------------------- -; PUT: Output character in A. +; SER_PUT: Output character in A. ; Must return an error code in a/x. ; -PUT: +SER_PUT: ; Try to send @@ -322,34 +323,37 @@ PUT: rts ;---------------------------------------------------------------------------- -; STATUS: Return the status in the variable pointed to by ptr1. +; SER_STATUS: Return the status in the variable pointed to by ptr1. ; Must return an error code in a/x. ; -STATUS: lda ACIA_STATUS +SER_STATUS: + lda ACIA_STATUS ldx #0 sta (ptr1,x) txa ; SER_ERR_OK rts ;---------------------------------------------------------------------------- -; IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl +; SER_IOCTL: Driver defined entry point. The wrapper will pass a pointer to ioctl ; specific data in ptr1, and the ioctl code in A. ; Must return an error code in a/x. ; -IOCTL: lda #<SER_ERR_INV_IOCTL ; We don't support ioclts for now +SER_IOCTL: + lda #<SER_ERR_INV_IOCTL ; We don't support ioclts for now ldx #>SER_ERR_INV_IOCTL rts ; Run into IRQ instead ;---------------------------------------------------------------------------- -; IRQ: Called from the builtin runtime IRQ handler as a subroutine. All +; SER_IRQ: Called from the builtin runtime IRQ handler as a subroutine. All ; registers are already save, no parameters are passed, but the carry flag ; is clear on entry. The routine must return with carry set if the interrupt ; was handled, otherwise with carry clear. ; -IRQ: lda ACIA_STATUS ; Check ACIA status for receive interrupt +SER_IRQ: + lda ACIA_STATUS ; Check ACIA status for receive interrupt and #$08 beq @L9 ; Jump if no ACIA interrupt (carry still clear) lda ACIA_DATA ; Get byte from ACIA @@ -405,5 +409,3 @@ IRQ: lda ACIA_STATUS ; Check ACIA status for receive interrupt jmp @L0 .endproc - - diff --git a/libsrc/plus4/slow.s b/libsrc/plus4/slow.s new file mode 100644 index 000000000..18b8c231c --- /dev/null +++ b/libsrc/plus4/slow.s @@ -0,0 +1,22 @@ +; +; Marco van den Heuvel, 2018-03-28 +; +; void slow (void); +; /* Switch the CPU into single clock mode. */ +; + + .export _slow + + .include "plus4.inc" + + +.proc _slow + + lda TED_CLK + ora #%00000010 + sta TED_CLK + rts + +.endproc + + diff --git a/libsrc/plus4/systime.s b/libsrc/plus4/systime.s deleted file mode 100644 index 273e394a4..000000000 --- a/libsrc/plus4/systime.s +++ /dev/null @@ -1,28 +0,0 @@ -; -; Ullrich von Bassewitz, 12.11.2002 -; -; time_t _systime (void); -; /* Similar to time(), but: -; ** - Is not ISO C -; ** - Does not take the additional pointer -; ** - Does not set errno when returning -1 -; */ -; - - .export __systime - - .importzp sreg - -.code - -.proc __systime - - lda #$FF - tax - sta sreg - sta sreg+1 - rts ; Return -1 - -.endproc - - diff --git a/libsrc/plus4/waitvsync.s b/libsrc/plus4/waitvsync.s new file mode 100644 index 000000000..32b81b52b --- /dev/null +++ b/libsrc/plus4/waitvsync.s @@ -0,0 +1,17 @@ +; +; Written by Groepaz <groepaz@gmx.net> +; +; void waitvsync (void); +; + + .export _waitvsync + + .include "plus4.inc" + +_waitvsync: +@l1: + lda TED_VLINEHI + and #$01 + ora TED_VLINELO + bne @l1 + rts diff --git a/libsrc/runtime/add.s b/libsrc/runtime/add.s index 6fb2dacf7..a4658cc13 100644 --- a/libsrc/runtime/add.s +++ b/libsrc/runtime/add.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 05.08.1998 +; Christian Krueger, 11-Mar-2017, spend two bytes for one cycle, improved 65SC02 optimization ; ; CC65 runtime: add ints ; @@ -8,32 +9,46 @@ ; called a lot! .export tosadda0, tosaddax - .importzp sp + .importzp sp, tmp1 .macpack cpu tosadda0: ldx #0 tosaddax: - clc -.if (.cpu .bitand CPU_ISET_65SC02) - adc (sp) ; 65SC02 version - saves 2 cycles - ldy #1 -.else - ldy #0 - adc (sp),y ; lo byte - iny -.endif - pha ; save it - txa - adc (sp),y ; hi byte - tax - clc - lda sp - adc #2 - sta sp - bcc L1 - inc sp+1 -L1: pla ; Restore low byte - rts + clc ; (2) +.if (.cpu .bitand ::CPU_ISET_65SC02) + + adc (sp) ; (7) + tay ; (9) + inc sp ; (14) + bne hiadd ; (17) + inc sp+1 ; (-1+5) +hiadd: txa ; (19) + adc (sp) ; (24) + tax ; (26) + inc sp ; (31) + bne done ; (34) + inc sp+1 ; (-1+5) +done: tya ; (36) + +.else + + ldy #0 ; (4) + adc (sp),y ; (9) lo byte + iny ; (11) + sta tmp1 ; (14) save it + txa ; (16) + adc (sp),y ; (21) hi byte + tax ; (23) + clc ; (25) + lda sp ; (28) + adc #2 ; (30) + sta sp ; (33) + bcc L1 ; (36) + inc sp+1 ; (-1+5) +L1: lda tmp1 ; (39) restore low byte + +.endif + rts ; (6502: 45 cycles, 26 bytes <-> 65SC02: 42 cycles, 22 bytes ) diff --git a/libsrc/runtime/along.s b/libsrc/runtime/along.s index 661b3124a..bd3462915 100644 --- a/libsrc/runtime/along.s +++ b/libsrc/runtime/along.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 23.11.2002 +; Christian Krueger, 11-Mar-2017, saved 5 bytes ; ; CC65 runtime: Convert char in ax into a long ; @@ -9,16 +10,11 @@ ; Convert A from char to long in EAX +along: ldx #$ff + cmp #$80 ; Positive? + bcs store ; no, apply $FF + aulong: ldx #0 - stx sreg +store: stx sreg stx sreg+1 rts - -along: cmp #$80 ; Positive? - bcc aulong ; Yes, handle like unsigned type - ldx #$ff - stx sreg - stx sreg+1 - rts - - diff --git a/libsrc/runtime/aslax1.s b/libsrc/runtime/aslax1.s index 14f0be3cc..97ac71c45 100644 --- a/libsrc/runtime/aslax1.s +++ b/libsrc/runtime/aslax1.s @@ -6,7 +6,7 @@ .export aslax1, shlax1 .importzp tmp1 - + aslax1: shlax1: stx tmp1 asl A diff --git a/libsrc/runtime/axlong.s b/libsrc/runtime/axlong.s index 6d97b5025..1fbd53ef0 100644 --- a/libsrc/runtime/axlong.s +++ b/libsrc/runtime/axlong.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 25.10.2000 +; Christian Krueger, 02-Mar-2017, some bytes saved ; ; CC65 runtime: Convert int in ax into a long ; @@ -9,18 +10,12 @@ ; Convert AX from int to long in EAX +axlong: ldy #$ff + cpx #$80 ; Positive? + bcs store ; No, apply $FF + axulong: ldy #0 - sty sreg +store: sty sreg sty sreg+1 rts - -axlong: cpx #$80 ; Positive? - bcc axulong ; Yes, handle like unsigned type - ldy #$ff - sty sreg - sty sreg+1 - rts - - - diff --git a/libsrc/runtime/bcast.s b/libsrc/runtime/bcast.s new file mode 100644 index 000000000..bc228d1b7 --- /dev/null +++ b/libsrc/runtime/bcast.s @@ -0,0 +1,21 @@ +; +; acqn, 01.16.2020 +; +; CC65 runtime: boolean cast +; + + .export bcasta, bcastax + +bcastax: + cpx #0 + bne L1 + +bcasta: + tax + beq L0 ; Zero already in X + +L1: ldx #0 + lda #1 + +L0: rts + diff --git a/libsrc/runtime/callptr4.s b/libsrc/runtime/callptr4.s new file mode 100644 index 000000000..9a15609aa --- /dev/null +++ b/libsrc/runtime/callptr4.s @@ -0,0 +1,10 @@ +; +; CC65 runtime: call function via pointer in ptr4 +; + + .export callptr4 + .importzp ptr4 + +callptr4: + jmp (ptr4) ; jump there + diff --git a/libsrc/runtime/condes.s b/libsrc/runtime/condes.s index c04f71808..a99b713f5 100644 --- a/libsrc/runtime/condes.s +++ b/libsrc/runtime/condes.s @@ -23,7 +23,7 @@ ; -------------------------------------------------------------------------- ; Initialize library modules -.segment "INIT" +.segment "ONCE" .proc initlib diff --git a/libsrc/runtime/decsp1.s b/libsrc/runtime/decsp1.s index 5aa7fa204..3c673664a 100644 --- a/libsrc/runtime/decsp1.s +++ b/libsrc/runtime/decsp1.s @@ -20,4 +20,4 @@ - + diff --git a/libsrc/runtime/div.s b/libsrc/runtime/div.s index cdd340272..e10ebc57d 100644 --- a/libsrc/runtime/div.s +++ b/libsrc/runtime/div.s @@ -5,18 +5,18 @@ ; ; When negating values, we will ignore the possibility here, that one of the -; values if $8000, in which case the negate will fail. +; values is $8000, in which case the negate will fail. .export tosdiva0, tosdivax - .import popsargs, udiv16, negax - .importzp sreg, tmp1, tmp2 + .import popsargsudiv16, negax + .importzp ptr1, tmp1, tmp2 tosdiva0: ldx #0 tosdivax: - jsr popsargs ; Get arguments from stack, adjust sign - jsr udiv16 ; Do the division - ldx sreg+1 ; Load high byte of result + jsr popsargsudiv16 ; Get arguments from stack, adjust sign + ; and do the division + ldx ptr1+1 ; Load high byte of result ; Adjust the sign of the result. tmp1 contains the high byte of the left ; operand, tmp2 contains the high byte of the right operand. @@ -27,11 +27,11 @@ tosdivax: ; Result is negative - lda sreg ; Load low byte of result + lda ptr1 ; Load low byte of result jmp negax ; Adjust the sign ; Result is positive -Pos: lda sreg +Pos: lda ptr1 ; Load low byte of result rts diff --git a/libsrc/runtime/idiv32by16r16.s b/libsrc/runtime/idiv32by16r16.s index 12e7feb51..098e3dbfc 100644 --- a/libsrc/runtime/idiv32by16r16.s +++ b/libsrc/runtime/idiv32by16r16.s @@ -29,19 +29,18 @@ idiv32by16r16: stx ptr3+1 lda ptr2+1 + cmp #$80 eor tmp1 sta tmp1 - bit ptr2+1 - bpl @L3 + bcc @L3 ; Negate the value in ptr1:ptr2 ldx #0 ldy #4 - sec -@L2: lda ptr1,x - eor #$FF - adc #$00 +; sec +@L2: lda #$00 + sbc ptr1,x sta ptr1,x inx dey diff --git a/libsrc/runtime/imul8x8r16.s b/libsrc/runtime/imul8x8r16.s index e1aea30ae..fe08c855d 100644 --- a/libsrc/runtime/imul8x8r16.s +++ b/libsrc/runtime/imul8x8r16.s @@ -1,6 +1,7 @@ ; ; 2010-11-02, Ullrich von Bassewitz ; 2014-09-10, Greg King +; 2019-11-05, Piotr Fusik ; ; CC65 runtime: 8x8 => 16 signed multiplication ; @@ -23,32 +24,19 @@ imul8x8r16: sta ptr3 imul8x8r16m: +; Extend sign of Left-Hand Side + lda #$7f + cmp ptr3 + adc #$80 + sta ptr3+1 + +; Clear .XY accumulator + ldy #<$0000 ldx #>$0000 - bit ptr3 - bpl @L7 - dex -@L7: stx ptr3+1 ; Extend sign of Left-Hand Side - ldy #<$0000 ; Clear .XY accumulator - ldx #>$0000 + +; Check the multiplier sign. lda ptr1 - bmi NegMult - bpl @L2 ; Branch always - -@L0: tya ; Add current multiplicand - add ptr3 - tay - txa - adc ptr3+1 - tax - -@L1: asl ptr3 - rol ptr3+1 -@L2: lsr ptr1 ; Get next bit of Right-Hand Side into carry - bcs @L0 - bnz @L1 ; Loop if more one-bits in multiplier - - tya ; Put result into cc65's accumulator - rts + bpl PosStart ; The multiplier is negative. ; Therefore, make it positive; and, subtract when multiplying. @@ -56,20 +44,45 @@ NegMult: eor #%11111111 sta ptr1 inc ptr1 - bnz @L2 ; Branch always + bnz NegStart ; Branch always -@L0: tya ; Subtract current multiplicand - sub ptr3 +NegAdd: + tya ; Subtract current multiplicand +; sec + sbc ptr3 tay txa sbc ptr3+1 tax -@L1: asl ptr3 +NegShift: + asl ptr3 rol ptr3+1 -@L2: lsr ptr1 ; Get next bit of Right-Hand Side into carry - bcs @L0 - bnz @L1 ; Loop if more one-bits in multiplier +NegStart: + lsr ptr1 ; Get next bit of Right-Hand Side into carry + bcs NegAdd + bnz NegShift ; Loop if more one-bits in multiplier + + tya ; Put result into cc65's accumulator + rts + +; The multiplier is positive. + +PosAdd: + tya ; Add current multiplicand + add ptr3 + tay + txa + adc ptr3+1 + tax + +PosShift: + asl ptr3 + rol ptr3+1 +PosStart: + lsr ptr1 ; Get next bit of Right-Hand Side into carry + bcs PosAdd + bnz PosShift ; Loop if more one-bits in multiplier tya ; Put result into cc65's accumulator rts diff --git a/libsrc/runtime/incaxy.s b/libsrc/runtime/incaxy.s index 0ee7d879f..faeacf709 100644 --- a/libsrc/runtime/incaxy.s +++ b/libsrc/runtime/incaxy.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 05.08.1998 ; -; CC65 runtime: Increment ax by valie in y +; CC65 runtime: Increment ax by value in y ; .export incaxy, incax4 diff --git a/libsrc/runtime/incsp1.s b/libsrc/runtime/incsp1.s index 43c92dc82..2272e200f 100644 --- a/libsrc/runtime/incsp1.s +++ b/libsrc/runtime/incsp1.s @@ -19,4 +19,4 @@ - + diff --git a/libsrc/runtime/incsp2.s b/libsrc/runtime/incsp2.s index 067154b86..0ed0ffcdf 100644 --- a/libsrc/runtime/incsp2.s +++ b/libsrc/runtime/incsp2.s @@ -2,7 +2,7 @@ ; Ullrich von Bassewitz, 25.10.2000 ; ; CC65 runtime: Increment the stackpointer by 2. For performance reasons, -; this modules does also contain the popax function. +; this module also contains the popax function. .export popax, incsp2 .importzp sp diff --git a/libsrc/runtime/incsp3.s b/libsrc/runtime/incsp3.s index 29067a55e..f54b13920 100644 --- a/libsrc/runtime/incsp3.s +++ b/libsrc/runtime/incsp3.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/incsp4.s b/libsrc/runtime/incsp4.s index 51e9229bb..736438fce 100644 --- a/libsrc/runtime/incsp4.s +++ b/libsrc/runtime/incsp4.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/incsp5.s b/libsrc/runtime/incsp5.s index 164c62524..55cf780d4 100644 --- a/libsrc/runtime/incsp5.s +++ b/libsrc/runtime/incsp5.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/incsp6.s b/libsrc/runtime/incsp6.s index 1a393840e..94c536e7c 100644 --- a/libsrc/runtime/incsp6.s +++ b/libsrc/runtime/incsp6.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/incsp7.s b/libsrc/runtime/incsp7.s index 8a5838137..be8784ecb 100644 --- a/libsrc/runtime/incsp7.s +++ b/libsrc/runtime/incsp7.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/jmpvec.s b/libsrc/runtime/jmpvec.s index ed77a0789..29a18b1db 100644 --- a/libsrc/runtime/jmpvec.s +++ b/libsrc/runtime/jmpvec.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 2002-12-26 ; -; CC65 runtime: Jump vector that resides in the data segment so it's address +; CC65 runtime: Jump vector that resides in the data segment so its address ; may be patched at runtime. ; diff --git a/libsrc/runtime/laddeq.s b/libsrc/runtime/laddeq.s index 2632ec909..57bec0629 100644 --- a/libsrc/runtime/laddeq.s +++ b/libsrc/runtime/laddeq.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 07.04.2000 +; Christian Krueger, 12-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: += operator ; @@ -10,6 +11,7 @@ .export laddeq1, laddeqa, laddeq .importzp sreg, ptr1, tmp1 + .macpack cpu laddeq1: lda #$01 @@ -20,14 +22,20 @@ laddeqa: stx sreg+1 laddeq: sty ptr1+1 ; Store high byte of address - ldy #$00 ; Address low byte clc +.if (.cpu .bitand ::CPU_ISET_65SC02) + adc (ptr1) + sta (ptr1) + ldy #$01 ; Address byte 1 +.else + ldy #$00 ; Address low byte adc (ptr1),y sta (ptr1),y + iny ; Address byte 1 +.endif pha ; Save byte 0 of result for later - iny ; Address byte 1 txa adc (ptr1),y ; Load byte 1 sta (ptr1),y diff --git a/libsrc/runtime/land.s b/libsrc/runtime/land.s index 506c071a4..8e21ebb60 100644 --- a/libsrc/runtime/land.s +++ b/libsrc/runtime/land.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 06.08.1998 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: and on longs ; @@ -8,17 +9,28 @@ .import addysp1 .importzp sp, sreg, tmp1 - + .macpack cpu + tosand0ax: +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz sreg + stz sreg+1 +.else ldy #$00 sty sreg sty sreg+1 +.endif tosandeax: +.if (.cpu .bitand ::CPU_ISET_65SC02) + and (sp) ; byte 0 + ldy #1 +.else ldy #0 and (sp),y ; byte 0 - sta tmp1 iny +.endif + sta tmp1 txa and (sp),y ; byte 1 tax diff --git a/libsrc/runtime/lbcast.s b/libsrc/runtime/lbcast.s new file mode 100644 index 000000000..208442c44 --- /dev/null +++ b/libsrc/runtime/lbcast.s @@ -0,0 +1,20 @@ +; +; acqn, 01.16.2020 +; +; CC65 runtime: boolean cast for longs +; + + .export bcasteax + .importzp sreg, tmp1 + +bcasteax: + stx tmp1 + ldx #0 ; High byte of result + ora tmp1 + ora sreg + ora sreg+1 + beq L0 + + lda #1 +L0: rts + diff --git a/libsrc/runtime/ldauisp.s b/libsrc/runtime/ldauisp.s index 1afcf2487..54f4d1bd1 100644 --- a/libsrc/runtime/ldauisp.s +++ b/libsrc/runtime/ldauisp.s @@ -21,4 +21,4 @@ ldauiysp: lda (ptr1),y rts - + diff --git a/libsrc/runtime/ldec.s b/libsrc/runtime/ldec.s index 53b60095d..f8e59d5c0 100644 --- a/libsrc/runtime/ldec.s +++ b/libsrc/runtime/ldec.s @@ -1,5 +1,6 @@ ; -; Ullrich von Bassewitz, 29.12.1999 +; Piotr Fusik, 09.03.2018 +; originally by Ullrich von Bassewitz ; ; CC65 runtime: Decrement eax by value in Y ; @@ -11,16 +12,25 @@ deceaxy: sty tmp1 sec sbc tmp1 - sta tmp1 - txa - sbc #0 - tax - lda sreg - sbc #0 - sta sreg - lda sreg+1 - sbc #0 - sta sreg+1 - lda tmp1 - rts + bcs @L9 + +; Borrow from X. + + dex + cpx #$FF + bne @L9 + +; X wrapped from zero to $FF, borrow from sreg. + + dec sreg + cpx sreg + bne @L9 + +; sreg wrapped from zero to $FF, borrow from sreg+1. + + dec sreg+1 + +; Done. + +@L9: rts diff --git a/libsrc/runtime/leave.s b/libsrc/runtime/leave.s index 8f4e055f5..95dcdec9d 100644 --- a/libsrc/runtime/leave.s +++ b/libsrc/runtime/leave.s @@ -1,5 +1,6 @@ -; +; ; Ullrich von Bassewitz, 06.08.1998 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: function epilogue ; @@ -13,6 +14,8 @@ .import addysp .importzp sp + .macpack cpu + leave00: lda #0 leave0: ldx #0 @@ -24,6 +27,20 @@ leavey0: ldx #0 ; return < 256 leavey: jsr addysp ; drop stack frame + +.if (.cpu .bitand ::CPU_ISET_65SC02) + +leave: tay ; save A a sec + lda (sp) ; that's the pushed arg size + sec ; Count the byte, the count's stored in + adc sp + sta sp + bcc L1 + inc sp+1 +L1: tya ; Get return value back + +.else + leave: pha ; save A a sec ldy #0 lda (sp),y ; that's the pushed arg size @@ -33,5 +50,7 @@ leave: pha ; save A a sec bcc L1 inc sp+1 L1: pla ; Get return value back + +.endif rts diff --git a/libsrc/runtime/leq.s b/libsrc/runtime/leq.s index 44316aa08..ac9894b53 100644 --- a/libsrc/runtime/leq.s +++ b/libsrc/runtime/leq.s @@ -7,7 +7,7 @@ .export toseqeax .import toslcmp, booleq -toseqeax: +toseqeax: jsr toslcmp ; Set flags jmp booleq ; Convert to boolean diff --git a/libsrc/runtime/lmod.s b/libsrc/runtime/lmod.s index 74deb23f0..b8e796dea 100644 --- a/libsrc/runtime/lmod.s +++ b/libsrc/runtime/lmod.s @@ -1,6 +1,6 @@ ; ; Ullrich von Bassewitz, 07.08.1998 -; +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; CC65 runtime: modulo operation for long signed ints ; @@ -11,12 +11,19 @@ .import poplsargs, udiv32, negeax .importzp sreg, ptr1, ptr2, tmp1, tmp3, tmp4 + .macpack cpu + tosmod0ax: +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz sreg + stz sreg+1 +.else ldy #$00 sty sreg sty sreg+1 +.endif -tosmodeax: +tosmodeax: jsr poplsargs ; Get arguments from stack, adjust sign jsr udiv32 ; Do the division, remainder is in (ptr2:tmp3:tmp4) diff --git a/libsrc/runtime/lmul.s b/libsrc/runtime/lmul.s index 7ad2b2aa4..90d5f1e97 100644 --- a/libsrc/runtime/lmul.s +++ b/libsrc/runtime/lmul.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 13.08.1998 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: multiplication for long (unsigned) ints ; @@ -8,20 +9,32 @@ .import addysp1 .importzp sp, sreg, tmp1, tmp2, tmp3, tmp4, ptr1, ptr3, ptr4 + .macpack cpu + tosmul0ax: tosumul0ax: - ldy #$00 +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz sreg + stz sreg+1 +.else + ldy #$00 sty sreg sty sreg+1 +.endif tosmuleax: tosumuleax: mul32: sta ptr1 stx ptr1+1 ; op2 now in ptr1/sreg +.if (.cpu .bitand ::CPU_ISET_65SC02) + lda (sp) + ldy #1 +.else ldy #0 lda (sp),y - sta ptr3 iny +.endif + sta ptr3 lda (sp),y sta ptr3+1 iny @@ -50,7 +63,7 @@ L0: lsr tmp4 bcc L1 clc adc ptr3 - pha + tax lda ptr3+1 adc tmp2 sta tmp2 @@ -60,7 +73,7 @@ L0: lsr tmp4 lda ptr4+1 adc tmp4 sta tmp4 - pla + txa L1: dey bpl L0 lda ptr1 ; Load the low result word diff --git a/libsrc/runtime/lor.s b/libsrc/runtime/lor.s index a74b33059..f2204b981 100644 --- a/libsrc/runtime/lor.s +++ b/libsrc/runtime/lor.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 06.08.1998 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: or on longs ; @@ -7,18 +8,29 @@ .export tosor0ax, tosoreax .import addysp1 .importzp sp, sreg, tmp1 - + + .macpack cpu tosor0ax: +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz sreg + stz sreg+1 +.else ldy #$00 sty sreg - sty sreg+1 + sty sreg+1 +.endif tosoreax: +.if (.cpu .bitand ::CPU_ISET_65SC02) + ora (sp) + ldy #1 +.else ldy #0 ora (sp),y ; byte 0 - sta tmp1 iny +.endif + sta tmp1 txa ora (sp),y ; byte 1 tax diff --git a/libsrc/runtime/lpop.s b/libsrc/runtime/lpop.s index 7d281db52..a90ea5fcb 100644 --- a/libsrc/runtime/lpop.s +++ b/libsrc/runtime/lpop.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 29.12.1999 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: long pop ; @@ -8,6 +9,7 @@ .import incsp4 .importzp sp, sreg + .macpack cpu popeax: ldy #3 lda (sp),y @@ -18,8 +20,12 @@ popeax: ldy #3 dey lda (sp),y tax +.if (.cpu .bitand ::CPU_ISET_65SC02) + lda (sp) +.else dey lda (sp),y +.endif jmp incsp4 diff --git a/libsrc/runtime/lpush.s b/libsrc/runtime/lpush.s index 074b4320a..0bc67b523 100644 --- a/libsrc/runtime/lpush.s +++ b/libsrc/runtime/lpush.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 06.08.1998 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: long push ; @@ -11,13 +12,20 @@ .import decsp4 .importzp sp, sreg + .macpack cpu + pushl0: lda #0 tax push0ax: - ldy #0 +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz sreg + stz sreg+1 +.else + ldy #$00 sty sreg sty sreg+1 +.endif pusheax: pha ; decsp will destroy A (but not X) jsr decsp4 @@ -30,8 +38,12 @@ pusheax: dey txa sta (sp),y - dey pla +.if (.cpu .bitand ::CPU_ISET_65SC02) + sta (sp) +.else + dey sta (sp),y +.endif rts diff --git a/libsrc/runtime/lrsub.s b/libsrc/runtime/lrsub.s index fd519ca4f..5e8d0b543 100644 --- a/libsrc/runtime/lrsub.s +++ b/libsrc/runtime/lrsub.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 05.08.1998 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: long sub reversed ; @@ -11,18 +12,30 @@ .import addysp1 .importzp sp, sreg, tmp1 + .macpack cpu + tosrsub0ax: +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz sreg + stz sreg+1 +.else ldy #$00 sty sreg sty sreg+1 +.endif -tosrsubeax: - ldy #0 +tosrsubeax: sec +.if (.cpu .bitand ::CPU_ISET_65SC02) + sbc (sp) + ldy #1 +.else + ldy #0 sbc (sp),y ; byte 0 + iny +.endif sta tmp1 ; use as temp storage txa - iny sbc (sp),y ; byte 1 tax iny diff --git a/libsrc/runtime/lsave.s b/libsrc/runtime/lsave.s index fa21e463e..d5f4c45b3 100644 --- a/libsrc/runtime/lsave.s +++ b/libsrc/runtime/lsave.s @@ -1,7 +1,8 @@ ; ; Ullrich von Bassewitz, 08.08.1998 +; Christian Krueger, 11-Mar-2017, optimization ; -; CC65 runtime: save ax into temp storage/restore ax from temp storage +; CC65 runtime: save eax into temp storage/restore eax from temp storage ; .export saveeax, resteax @@ -10,11 +11,10 @@ saveeax: sta regsave stx regsave+1 - lda sreg - sta regsave+2 - lda sreg+1 - sta regsave+3 - lda regsave + ldy sreg + sty regsave+2 + ldy sreg+1 + sty regsave+3 rts resteax: @@ -25,4 +25,3 @@ resteax: ldx regsave+1 lda regsave rts - diff --git a/libsrc/runtime/lsub.s b/libsrc/runtime/lsub.s index 926d52e51..4c50ded14 100644 --- a/libsrc/runtime/lsub.s +++ b/libsrc/runtime/lsub.s @@ -1,6 +1,6 @@ ; ; Ullrich von Bassewitz, 05.08.1998 -; +; Christian Krueger, 11-Mar-2017, ímproved 65SC02 optimization ; CC65 runtime: long sub ; @@ -14,14 +14,19 @@ .macpack cpu tossub0ax: +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz sreg + stz sreg+1 +.else ldy #$00 sty sreg sty sreg+1 +.endif tossubeax: sec eor #$FF -.if (.cpu .bitand CPU_ISET_65SC02) +.if (.cpu .bitand ::CPU_ISET_65SC02) adc (sp) ; 65SC02 version - saves 2 cycles ldy #1 .else diff --git a/libsrc/runtime/lsubeq.s b/libsrc/runtime/lsubeq.s index 9f5853d29..b16ab18e1 100644 --- a/libsrc/runtime/lsubeq.s +++ b/libsrc/runtime/lsubeq.s @@ -1,5 +1,6 @@ -; +; ; Ullrich von Bassewitz, 07.04.2000 +; Christian Krueger, 12-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: -= operator ; @@ -10,6 +11,7 @@ .export lsubeq1, lsubeqa, lsubeq .importzp sreg, ptr1 + .macpack cpu lsubeq1: lda #$01 @@ -20,15 +22,20 @@ lsubeqa: stx sreg+1 lsubeq: sty ptr1+1 ; Store high byte of address - ldy #$00 ; Address low byte - sec + sec eor #$FF + .if (.cpu .bitand ::CPU_ISET_65SC02) + adc (ptr1) ; Subtract byte 0 + sta (ptr1) + ldy #$01 ; Address byte 1 + .else + ldy #$00 ; Address low byte adc (ptr1),y ; Subtract byte 0 sta (ptr1),y - pha ; Save byte 0 of result for later - iny ; Address byte 1 + .endif + pha ; Save byte 0 of result for later txa eor #$FF adc (ptr1),y ; Subtract byte 1 diff --git a/libsrc/runtime/ltest.s b/libsrc/runtime/ltest.s index 6027b8dd4..d0caf2197 100644 --- a/libsrc/runtime/ltest.s +++ b/libsrc/runtime/ltest.s @@ -17,6 +17,6 @@ utsteax: beq L9 tya ldy #1 ; Force NE -L9: rts +L9: rts diff --git a/libsrc/runtime/ludiv.s b/libsrc/runtime/ludiv.s index 149c98a78..e2e27371e 100644 --- a/libsrc/runtime/ludiv.s +++ b/libsrc/runtime/ludiv.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 17.08.1998 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: division for long unsigned ints ; @@ -8,12 +9,19 @@ .import addysp1 .importzp sp, sreg, tmp3, tmp4, ptr1, ptr2, ptr3, ptr4 + .macpack cpu + tosudiv0ax: +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz sreg + stz sreg+1 +.else ldy #$00 sty sreg sty sreg+1 +.endif -tosudiveax: +tosudiveax: jsr getlop ; Get the paramameters jsr udiv32 ; Do the division lda ptr1 ; Result is in ptr1:sreg @@ -30,10 +38,15 @@ getlop: sta ptr3 ; Put right operand in place lda sreg+1 sta ptr4+1 +.if (.cpu .bitand ::CPU_ISET_65SC02) + lda (sp) + ldy #1 +.else ldy #0 ; Put left operand in place lda (sp),y - sta ptr1 iny +.endif + sta ptr1 lda (sp),y sta ptr1+1 iny @@ -65,7 +78,7 @@ L0: asl ptr1 ; Do a subtraction. we do not have enough space to store the intermediate ; result, so we may have to do the subtraction twice. - pha + tax cmp ptr3 lda ptr2+1 sbc ptr3+1 @@ -78,9 +91,9 @@ L0: asl ptr1 ; Overflow, do the subtraction again, this time store the result sta tmp4 ; We have the high byte already - pla + txa sbc ptr3 ; byte 0 - pha + tax lda ptr2+1 sbc ptr3+1 sta ptr2+1 ; byte 1 @@ -89,7 +102,7 @@ L0: asl ptr1 sta tmp3 ; byte 2 inc ptr1 ; Set result bit -L1: pla +L1: txa dey bne L0 sta ptr2 diff --git a/libsrc/runtime/lumod.s b/libsrc/runtime/lumod.s index e290e1167..09909c0c9 100644 --- a/libsrc/runtime/lumod.s +++ b/libsrc/runtime/lumod.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 27.09.1998 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: modulo operation for long unsigned ints ; @@ -8,10 +9,17 @@ .import getlop, udiv32 .importzp sreg, tmp3, tmp4, ptr2 -tosumod0ax: + .macpack cpu + +tosumod0ax: +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz sreg + stz sreg+1 +.else ldy #$00 sty sreg sty sreg+1 +.endif tosumodeax: jsr getlop ; Get the paramameters diff --git a/libsrc/runtime/lxor.s b/libsrc/runtime/lxor.s index ce21ef35b..a92a59959 100644 --- a/libsrc/runtime/lxor.s +++ b/libsrc/runtime/lxor.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 06.08.1998 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: xor on longs ; @@ -8,16 +9,28 @@ .import addysp1 .importzp sp, sreg, tmp1 + .macpack cpu + tosxor0ax: +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz sreg + stz sreg+1 +.else ldy #$00 sty sreg sty sreg+1 +.endif -tosxoreax: +tosxoreax: +.if (.cpu .bitand ::CPU_ISET_65SC02) + eor (sp) ; byte 0 + ldy #1 +.else ldy #0 eor (sp),y ; byte 0 - sta tmp1 iny +.endif + sta tmp1 txa eor (sp),y ; byte 1 tax diff --git a/libsrc/runtime/makebool.s b/libsrc/runtime/makebool.s index a15b24b93..643f418aa 100644 --- a/libsrc/runtime/makebool.s +++ b/libsrc/runtime/makebool.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 05.10.1998 +; Christian Krueger, 11-Mar-2017, optimization ; ; CC65 runtime: Make boolean according to flags ; @@ -9,14 +10,14 @@ boolne: bne ret1 - ldx #$00 +ret0: ldx #$00 txa rts -booleq: beq ret1 - ldx #$00 - txa +booleq: bne ret0 +ret1: ldx #$00 + lda #$01 rts @@ -44,17 +45,9 @@ boolult: boolugt: - beq L1 + beq ret0 booluge: - bcs ret1 -L1: ldx #$00 + ldx #$00 txa + rol a rts - - -ret1: ldx #$00 - lda #$01 - rts - - - diff --git a/libsrc/runtime/mod.s b/libsrc/runtime/mod.s index c4331ed85..58e740575 100644 --- a/libsrc/runtime/mod.s +++ b/libsrc/runtime/mod.s @@ -5,19 +5,19 @@ ; ; When negating values, we will ignore the possibility here, that one of the -; values if $8000, in which case the negate will fail. +; values is $8000, in which case the negate will fail. .export tosmoda0, tosmodax - .import popsargs, udiv16, negax - .importzp ptr1, tmp1 + .import popsargsudiv16, negax + .importzp sreg, tmp1 tosmoda0: ldx #0 tosmodax: - jsr popsargs ; Get arguments from stack, adjust sign - jsr udiv16 ; Do the division - lda ptr1 ; Load low byte of result - ldx ptr1+1 ; Load high byte of result + jsr popsargsudiv16 ; Get arguments from stack, adjust sign + ; and do the division + lda sreg ; Load low byte of result + ldx sreg+1 ; Load high byte of result ; Adjust the sign of the result. tmp1 contains the high byte of the left ; operand, tmp2 contains the high byte of the right operand. The sign of diff --git a/libsrc/runtime/mul.s b/libsrc/runtime/mul.s index 6344e3a32..68cdea0c6 100644 --- a/libsrc/runtime/mul.s +++ b/libsrc/runtime/mul.s @@ -6,8 +6,8 @@ .export tosumulax, tosmulax .import mul8x16, mul8x16a ; in mul8.s - .import popsreg - .importzp sreg, tmp1, ptr4 + .import popptr1 + .importzp tmp1, ptr1, ptr4 ;--------------------------------------------------------------------------- @@ -19,12 +19,12 @@ tosumulax: txa ; High byte zero beq @L3 ; Do 8x16 multiplication if high byte zero stx ptr4+1 ; Save right operand - jsr popsreg ; Get left operand + jsr popptr1 ; Get left operand (Y=0, X untouched by popptr1) -; Do ptr4:ptr4+1 * sreg:sreg+1 --> AX +; Do ptr4:ptr4+1 * ptr1:ptr1+1 --> AX - lda #0 - ldx sreg+1 ; Get high byte into register for speed + tya ; A = 0 + ldy ptr1+1 ; check if lhs is 8 bit only beq @L4 ; -> we can do 8x16 after swap sta tmp1 ldy #16 ; Number of bits @@ -34,12 +34,12 @@ tosumulax: @L0: bcc @L1 clc - adc sreg - pha - txa ; hi byte of left op + adc ptr1 + tax + lda ptr1+1 ; Hi byte of left op adc tmp1 sta tmp1 - pla + txa @L1: ror tmp1 ror a @@ -56,14 +56,15 @@ tosumulax: @L3: jmp mul8x16 -; If the high byte of rhs is zero, swap the operands and use the 8x16 -; routine. On entry, A and X are zero +; If the high byte of lhs is zero, swap the operands in ptr1/4 and +; use the 8x16 routine. On entry, A and Y are zero and X has the value +; of ptr4+1 -@L4: ldy sreg ; Save right operand (8 bit) +@L4: stx ptr1+1 ; Store hi-byte from ptr4 + ldy ptr1 ; Save right operand (8 bit) ldx ptr4 ; Copy left 16 bit operand to right - stx sreg - ldx ptr4+1 ; Don't store, this is done later + stx ptr1 sty ptr4 ; Copy low 8 bit of right op to left ldy #8 - jmp mul8x16a + jmp mul8x16a ; There, ptr4+1 will be also cleared diff --git a/libsrc/runtime/mul8.s b/libsrc/runtime/mul8.s index 9d4dfcbf4..395d64a4c 100644 --- a/libsrc/runtime/mul8.s +++ b/libsrc/runtime/mul8.s @@ -6,8 +6,8 @@ .export tosumula0, tosmula0 .export mul8x16, mul8x16a - .import popsreg - .importzp sreg, ptr4 + .import popptr1 + .importzp ptr1, ptr4 ;--------------------------------------------------------------------------- @@ -16,11 +16,11 @@ tosmula0: tosumula0: sta ptr4 -mul8x16:jsr popsreg ; Get left operand +mul8x16:jsr popptr1 ; Get left operand (Y=0 by popptr1) - lda #0 ; Clear byte 1 + tya ; Clear byte 1 ldy #8 ; Number of bits - ldx sreg+1 ; Get into register for speed + ldx ptr1+1 ; check if lhs is 8 bit only beq mul8x8 ; Do 8x8 multiplication if high byte zero mul8x16a: sta ptr4+1 ; Clear byte 2 @@ -29,12 +29,12 @@ mul8x16a: @L0: bcc @L1 clc - adc sreg - pha - txa ; hi byte of left op + adc ptr1 + tax + lda ptr1+1 ; hi byte of left op adc ptr4+1 sta ptr4+1 - pla + txa @L1: ror ptr4+1 ror a @@ -52,7 +52,7 @@ mul8x8: lsr ptr4 ; Get first bit into carry @L0: bcc @L1 clc - adc sreg + adc ptr1 @L1: ror ror ptr4 dey diff --git a/libsrc/runtime/mulax3.s b/libsrc/runtime/mulax3.s index c35b05dcc..342379605 100644 --- a/libsrc/runtime/mulax3.s +++ b/libsrc/runtime/mulax3.s @@ -1,12 +1,13 @@ ; ; Ullrich von Bassewitz, 04.10.2001 ; -; CC65 runtime: Multiply the primary register +; CC65 runtime: Multiply the primary register by 3 ; +; Don't touch the Y-register here, the optimizer relies on it! .export mulax3 .importzp ptr1 - + .proc mulax3 sta ptr1 diff --git a/libsrc/runtime/mulax5.s b/libsrc/runtime/mulax5.s index 9af599806..99f0ffce0 100644 --- a/libsrc/runtime/mulax5.s +++ b/libsrc/runtime/mulax5.s @@ -1,8 +1,9 @@ ; ; Ullrich von Bassewitz, 04.10.2001 ; -; CC65 runtime: Multiply the primary register +; CC65 runtime: Multiply the primary register by 5 ; +; Don't touch the Y-register here, the optimizer relies on it! .export mulax5 .importzp ptr1 diff --git a/libsrc/runtime/mulax7.s b/libsrc/runtime/mulax7.s index 90313180c..6f2b2bf61 100644 --- a/libsrc/runtime/mulax7.s +++ b/libsrc/runtime/mulax7.s @@ -4,6 +4,7 @@ ; ; CC65 runtime: Multiply the primary register by 7 ; +; Don't touch the Y-register here, the optimizer relies on it! .export mulax7 .importzp ptr1 diff --git a/libsrc/runtime/mulax9.s b/libsrc/runtime/mulax9.s index d2dd89529..064eb458b 100644 --- a/libsrc/runtime/mulax9.s +++ b/libsrc/runtime/mulax9.s @@ -4,6 +4,7 @@ ; ; CC65 runtime: Multiply the primary register by 9 ; +; Don't touch the Y-register here, the optimizer relies on it! .export mulax9 .importzp ptr1 diff --git a/libsrc/runtime/neg.s b/libsrc/runtime/negabs.s similarity index 59% rename from libsrc/runtime/neg.s rename to libsrc/runtime/negabs.s index a428fd1e4..ef660f1da 100644 --- a/libsrc/runtime/neg.s +++ b/libsrc/runtime/negabs.s @@ -1,11 +1,16 @@ ; ; Ullrich von Bassewitz, 05.08.1998 ; +; int abs (int x); +; and ; CC65 runtime: negation on ints ; .export negax + .export _abs +_abs: cpx #$00 ; Test hi byte + bpl L1 ; Don't touch if positive negax: clc eor #$FF adc #1 @@ -15,7 +20,7 @@ negax: clc adc #0 tax pla - rts + L1: rts diff --git a/libsrc/runtime/or.s b/libsrc/runtime/or.s index 8570c0cd7..735f30f61 100644 --- a/libsrc/runtime/or.s +++ b/libsrc/runtime/or.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 05.08.1998 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: or on ints ; @@ -8,13 +9,20 @@ .import addysp1 .importzp sp, tmp1 + .macpack cpu + tosora0: ldx #$00 tosorax: +.if (.cpu .bitand ::CPU_ISET_65SC02) + ora (sp) + ldy #1 +.else ldy #0 ora (sp),y - sta tmp1 iny +.endif + sta tmp1 txa ora (sp),y tax diff --git a/libsrc/runtime/popptr1.s b/libsrc/runtime/popptr1.s new file mode 100644 index 000000000..1d04330ab --- /dev/null +++ b/libsrc/runtime/popptr1.s @@ -0,0 +1,19 @@ +; +; Christian Kruger, 20-May-2018 +; +; CC65 runtime: Pop 2 bytes from stack to ptr1. +; X is untouched, low byte in A, Y is defined to be 0! + + .export popptr1 + .import incsp2 + .importzp sp, ptr1 + +.proc popptr1 ; 14 bytes (four usages = at least 2 bytes saved) + ldy #1 + lda (sp),y ; get hi byte + sta ptr1+1 ; into ptr hi + dey ; no optimization for 65C02 here to have Y=0 at exit! + lda (sp),y ; get lo byte + sta ptr1 ; to ptr lo + jmp incsp2 +.endproc diff --git a/libsrc/runtime/pushaff.s b/libsrc/runtime/pushaff.s index 08d988bb2..ae2142b0e 100644 --- a/libsrc/runtime/pushaff.s +++ b/libsrc/runtime/pushaff.s @@ -17,4 +17,4 @@ .endproc - + diff --git a/libsrc/runtime/pushax.s b/libsrc/runtime/pushax.s index cba313c2f..ac181b994 100644 --- a/libsrc/runtime/pushax.s +++ b/libsrc/runtime/pushax.s @@ -30,6 +30,6 @@ pusha0: ldx #0 pla ; (31) dey ; (33) sta (sp),y ; (38) - rts ; (44) + rts ; (44) .endproc diff --git a/libsrc/runtime/return0.s b/libsrc/runtime/return0.s index c061e013c..331f3334f 100644 --- a/libsrc/runtime/return0.s +++ b/libsrc/runtime/return0.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/return1.s b/libsrc/runtime/return1.s index 76153f3e1..e39cdf74e 100644 --- a/libsrc/runtime/return1.s +++ b/libsrc/runtime/return1.s @@ -17,4 +17,4 @@ - + diff --git a/libsrc/runtime/rsub.s b/libsrc/runtime/rsub.s index 475a69e76..69ee6da22 100644 --- a/libsrc/runtime/rsub.s +++ b/libsrc/runtime/rsub.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 05.08.1998 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: sub ints reversed ; @@ -8,6 +9,8 @@ .import addysp1 .importzp sp, tmp1 + .macpack cpu + ; ; AX = AX - TOS ; @@ -15,12 +18,17 @@ tosrsuba0: ldx #0 tosrsubax: - ldy #0 sec +.if (.cpu .bitand CPU_ISET_65SC02) + sbc (sp) + ldy #1 +.else + ldy #0 sbc (sp),y ; lo byte + iny +.endif sta tmp1 ; save lo byte txa - iny sbc (sp),y ; hi byte tax lda tmp1 diff --git a/libsrc/runtime/shelp.s b/libsrc/runtime/shelp.s index b1ebeb798..9762dbf44 100644 --- a/libsrc/runtime/shelp.s +++ b/libsrc/runtime/shelp.s @@ -1,17 +1,17 @@ ; ; Ullrich von Bassewitz, 07.08.1998 ; -; CC65 runtime: helper stuff for mod/div/mul with signed ints +; CC65 runtime: helper stuff for mod/div with signed ints ; ; When negating values, we will ignore the possibility here, that one of the -; values if $8000, in which case the negate will fail. +; values is $8000, in which case the negate will fail. - .export popsargs - .import negax, popax - .importzp sreg, tmp1, tmp2, ptr4 + .export popsargsudiv16 + .import negax, popax, udiv16 + .importzp tmp1, tmp2, ptr1, ptr4 -popsargs: +popsargsudiv16: stx tmp2 ; Remember sign cpx #0 bpl L1 @@ -24,7 +24,6 @@ L1: sta ptr4 cpx #0 bpl L2 jsr negax -L2: sta sreg - stx sreg+1 - rts - +L2: sta ptr1 + stx ptr1+1 + jmp udiv16 ; Call the division diff --git a/libsrc/runtime/staxspi.s b/libsrc/runtime/staxspi.s index 90738e0d2..3114f449c 100644 --- a/libsrc/runtime/staxspi.s +++ b/libsrc/runtime/staxspi.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 26.10.2000 +; Christian Krueger, 12-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: Store a/x indirect into address at top of stack with index ; @@ -8,6 +9,8 @@ .import incsp2 .importzp sp, tmp1, ptr1 + .macpack cpu + .proc staxspidx sty tmp1 ; Save Y @@ -15,8 +18,12 @@ ldy #1 lda (sp),y sta ptr1+1 +.if (.cpu .bitand ::CPU_ISET_65SC02) + lda (sp) +.else dey lda (sp),y +.endif sta ptr1 ; Address now in ptr1 ldy tmp1 ; Restore Y iny ; Address high byte diff --git a/libsrc/runtime/steaxspi.s b/libsrc/runtime/steaxspi.s index b85725050..9686e5c35 100644 --- a/libsrc/runtime/steaxspi.s +++ b/libsrc/runtime/steaxspi.s @@ -6,7 +6,7 @@ .export steaxspidx - .import popax + .import popptr1 .importzp sreg, ptr1, tmp1, tmp2, tmp3 @@ -15,9 +15,7 @@ sta tmp1 stx tmp2 sty tmp3 - jsr popax ; get the pointer - sta ptr1 - stx ptr1+1 + jsr popptr1 ; get the pointer ldy tmp3 lda tmp1 sta (ptr1),y diff --git a/libsrc/runtime/stkchk.s b/libsrc/runtime/stkchk.s index 6186fe4e2..ceab4c703 100644 --- a/libsrc/runtime/stkchk.s +++ b/libsrc/runtime/stkchk.s @@ -28,7 +28,7 @@ ; Initialization code. This is a constructor, so it is called on startup if ; the linker has detected references to this module. -.segment "INIT" +.segment "ONCE" .proc initstkchk @@ -101,7 +101,7 @@ Fail: lda #4 ; ---------------------------------------------------------------------------- ; Data -.segment "INITBSS" +.segment "INIT" ; Initial stack pointer value. Stack is reset to this in case of overflows to ; allow program exit processing. diff --git a/libsrc/runtime/swap.s b/libsrc/runtime/swap.s index e91eeca31..5358e08d3 100644 --- a/libsrc/runtime/swap.s +++ b/libsrc/runtime/swap.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 06.08.1998 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: swap ax with TOS ; @@ -7,6 +8,8 @@ .export swapstk .importzp sp, ptr4 + .macpack cpu + swapstk: sta ptr4 stx ptr4+1 @@ -15,11 +18,18 @@ swapstk: tax lda ptr4+1 sta (sp),y +.if (.cpu .bitand ::CPU_ISET_65SC02) + lda (sp) + tay + lda ptr4 + sta (sp) + tya +.else dey lda (sp),y pha lda ptr4 sta (sp),y pla +.endif rts ; whew! - diff --git a/libsrc/runtime/udiv.s b/libsrc/runtime/udiv.s index 93548d049..4115382c8 100644 --- a/libsrc/runtime/udiv.s +++ b/libsrc/runtime/udiv.s @@ -3,9 +3,10 @@ ; ; CC65 runtime: division for unsigned ints ; +; Don't use tmp1 here, the signed division tunnels data with it! .export tosudiva0, tosudivax, udiv16 - .import popsreg + .import popptr1 .importzp sreg, ptr1, ptr4 @@ -14,50 +15,50 @@ tosudiva0: tosudivax: sta ptr4 stx ptr4+1 ; Save right operand - jsr popsreg ; Get left operand + jsr popptr1 ; Get left operand ; Do the division jsr udiv16 -; Result is in sreg, remainder in ptr1 +; Result is in ptr1, remainder in sreg - lda sreg - ldx sreg+1 + lda ptr1 + ldx ptr1+1 rts ;--------------------------------------------------------------------------- -; 16by16 division. Divide sreg by ptr4. Result is in sreg, remainder in ptr1 +; 16by16 division. Divide ptr1 by ptr4. Result is in ptr1, remainder in sreg ; (see mult-div.s from "The Fridge"). ; This is also the entry point for the signed division udiv16: lda #0 - sta ptr1+1 + sta sreg+1 ldy #16 ldx ptr4+1 beq udiv16by8a -L0: asl sreg - rol sreg+1 - rol a +L0: asl ptr1 rol ptr1+1 + rol a + rol sreg+1 - pha + tax cmp ptr4 - lda ptr1+1 + lda sreg+1 sbc ptr4+1 bcc L1 - sta ptr1+1 - pla + sta sreg+1 + txa sbc ptr4 - pha - inc sreg + tax + inc ptr1 -L1: pla +L1: txa dey bne L0 - sta ptr1 + sta sreg rts @@ -65,18 +66,18 @@ L1: pla ; 16by8 division udiv16by8a: -@L0: asl sreg - rol sreg+1 +@L0: asl ptr1 + rol ptr1+1 rol a bcs @L1 cmp ptr4 bcc @L2 @L1: sbc ptr4 - inc sreg + inc ptr1 @L2: dey bne @L0 - sta ptr1 + sta sreg rts diff --git a/libsrc/runtime/udiv32by16r16.s b/libsrc/runtime/udiv32by16r16.s index 9897f9908..27f1176dd 100644 --- a/libsrc/runtime/udiv32by16r16.s +++ b/libsrc/runtime/udiv32by16r16.s @@ -34,19 +34,19 @@ L0: asl ptr1 rol a rol sreg+1 - pha + tax cmp ptr3 lda sreg+1 sbc ptr3+1 bcc L1 sta sreg+1 - pla + txa sbc ptr3 - pha + tax inc ptr1 -L1: pla +L1: txa dey bne L0 sta sreg diff --git a/libsrc/runtime/umod.s b/libsrc/runtime/umod.s index 92ebb5f91..205df59d7 100644 --- a/libsrc/runtime/umod.s +++ b/libsrc/runtime/umod.s @@ -5,24 +5,24 @@ ; .export tosumoda0, tosumodax - .import popsreg, udiv16 - .importzp ptr1, ptr4 + .import popptr1, udiv16 + .importzp sreg, ptr4 tosumoda0: ldx #0 tosumodax: sta ptr4 stx ptr4+1 ; Save right operand - jsr popsreg ; Get right operand + jsr popptr1 ; Get right operand ; Do the division jsr udiv16 -; Result is in sreg, remainder in ptr1 +; Result is in ptr1, remainder in sreg - lda ptr1 - ldx ptr1+1 + lda sreg + ldx sreg+1 rts - + diff --git a/libsrc/runtime/umul16x16r32.s b/libsrc/runtime/umul16x16r32.s index 9ecd1596e..cfcf82d9e 100644 --- a/libsrc/runtime/umul16x16r32.s +++ b/libsrc/runtime/umul16x16r32.s @@ -12,7 +12,7 @@ ;--------------------------------------------------------------------------- ; 16x16 => 32 unsigned multiplication routine. Because the overhead for a -; 16x16 => 16 unsigned multiplication routine is small, we will tag it with +; 16x16 => 16 unsigned multiplication routine is small, we will tag it with ; the matching labels, as well. ; ; routine LHS RHS result result also in @@ -42,11 +42,11 @@ umul16x16r16m: clc adc ptr3 - pha + tax lda ptr3+1 adc sreg+1 sta sreg+1 - pla + txa @L1: ror sreg+1 ror a diff --git a/libsrc/runtime/umul8x16r24.s b/libsrc/runtime/umul8x16r24.s index ff7d0bae6..54d730558 100644 --- a/libsrc/runtime/umul8x16r24.s +++ b/libsrc/runtime/umul8x16r24.s @@ -9,6 +9,7 @@ .include "zeropage.inc" + .macpack cpu ;--------------------------------------------------------------------------- ; 8x16 => 24 unsigned multiplication routine. Because the overhead for a @@ -30,25 +31,29 @@ umul8x16r16: umul8x16r24m: umul8x16r16m: +.if (.cpu .bitand ::CPU_ISET_65SC02) + stz ptr1+1 + stz sreg +.else ldx #0 stx ptr1+1 stx sreg +.endif ldy #8 ; Number of bits - ldx ptr3 ; Get into register for speed lda ptr1 ror a ; Get next bit into carry @L0: bcc @L1 clc - pha - txa + tax + lda ptr3 adc ptr1+1 sta ptr1+1 lda ptr3+1 adc sreg sta sreg - pla + txa @L1: ror sreg ror ptr1+1 diff --git a/libsrc/runtime/xor.s b/libsrc/runtime/xor.s index 825c576d1..e03922926 100644 --- a/libsrc/runtime/xor.s +++ b/libsrc/runtime/xor.s @@ -1,5 +1,6 @@ ; ; Ullrich von Bassewitz, 05.08.1998 +; Christian Krueger, 11-Mar-2017, added 65SC02 optimization ; ; CC65 runtime: xor on ints ; @@ -8,13 +9,20 @@ .import addysp1 .importzp sp, tmp1 + .macpack cpu + tosxora0: ldx #$00 tosxorax: +.if (.cpu .bitand CPU_ISET_65SC02) + eor (sp) + ldy #1 +.else ldy #0 eor (sp),y - sta tmp1 iny +.endif + sta tmp1 txa eor (sp),y tax diff --git a/libsrc/serial/ser-kernel.s b/libsrc/serial/ser-kernel.s index 4c5b455b6..b6c57a3b5 100644 --- a/libsrc/serial/ser-kernel.s +++ b/libsrc/serial/ser-kernel.s @@ -39,7 +39,7 @@ ser_sig: .byte $73, $65, $72, SER_API_VERSION ; "ser", version .code ;---------------------------------------------------------------------------- -; unsigned char __fastcall__ ser_install (void* driver); +; unsigned char __fastcall__ ser_install (const void* driver); ; /* Install the driver once it is loaded */ diff --git a/libsrc/sim6502/crt0.s b/libsrc/sim6502/crt0.s index d1831ad81..c04a2b8a6 100644 --- a/libsrc/sim6502/crt0.s +++ b/libsrc/sim6502/crt0.s @@ -5,22 +5,23 @@ ; .export _exit + .export startup .export __STARTUP__ : absolute = 1 ; Mark as startup .import zerobss, callmain .import initlib, donelib .import exit - .import __RAM_START__, __RAM_SIZE__ ; Linker generated + .import __MAIN_START__, __MAIN_SIZE__ ; Linker generated .import __STACKSIZE__ ; Linker generated .include "zeropage.inc" .segment "STARTUP" - cld +startup:cld ldx #$FF txs - lda #<(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) - ldx #>(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) + lda #<(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) + ldx #>(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) sta sp stx sp+1 jsr zerobss diff --git a/libsrc/sim6502/ctype.s b/libsrc/sim6502/ctype.s index 35968f982..1301965eb 100644 --- a/libsrc/sim6502/ctype.s +++ b/libsrc/sim6502/ctype.s @@ -1,159 +1,5 @@ -; -; Ullrich von Bassewitz, 2003-10-10 -; ; Character specification table. ; +; uses the "common" definition - .include "ctype.inc" - -; The tables are readonly, put them into the rodata segment - -.rodata - -; The following 256 byte wide table specifies attributes for the isxxx type -; of functions. Doing it by a table means some overhead in space, but it -; has major advantages: -; -; * It is fast. If it weren't for the slow parameter passing of cc65, one -; could even define macros for the isxxx functions (this is usually -; done on other platforms). -; -; * It is highly portable. The only unportable part is the table itself, -; all real code goes into the common library. -; -; * We save some code in the isxxx functions. - - -__ctype: - .byte CT_CTRL ; 0/00 ___ctrl_@___ - .byte CT_CTRL ; 1/01 ___ctrl_A___ - .byte CT_CTRL ; 2/02 ___ctrl_B___ - .byte CT_CTRL ; 3/03 ___ctrl_C___ - .byte CT_CTRL ; 4/04 ___ctrl_D___ - .byte CT_CTRL ; 5/05 ___ctrl_E___ - .byte CT_CTRL ; 6/06 ___ctrl_F___ - .byte CT_CTRL ; 7/07 ___ctrl_G___ - .byte CT_CTRL ; 8/08 ___ctrl_H___ - .byte CT_CTRL | CT_OTHER_WS | CT_SPACE_TAB - ; 9/09 ___ctrl_I___ - .byte CT_CTRL | CT_OTHER_WS ; 10/0a ___ctrl_J___ - .byte CT_CTRL | CT_OTHER_WS ; 11/0b ___ctrl_K___ - .byte CT_CTRL | CT_OTHER_WS ; 12/0c ___ctrl_L___ - .byte CT_CTRL | CT_OTHER_WS ; 13/0d ___ctrl_M___ - .byte CT_CTRL ; 14/0e ___ctrl_N___ - .byte CT_CTRL ; 15/0f ___ctrl_O___ - .byte CT_CTRL ; 16/10 ___ctrl_P___ - .byte CT_CTRL ; 17/11 ___ctrl_Q___ - .byte CT_CTRL ; 18/12 ___ctrl_R___ - .byte CT_CTRL ; 19/13 ___ctrl_S___ - .byte CT_CTRL ; 20/14 ___ctrl_T___ - .byte CT_CTRL ; 21/15 ___ctrl_U___ - .byte CT_CTRL ; 22/16 ___ctrl_V___ - .byte CT_CTRL ; 23/17 ___ctrl_W___ - .byte CT_CTRL ; 24/18 ___ctrl_X___ - .byte CT_CTRL ; 25/19 ___ctrl_Y___ - .byte CT_CTRL ; 26/1a ___ctrl_Z___ - .byte CT_CTRL ; 27/1b ___ctrl_[___ - .byte CT_CTRL ; 28/1c ___ctrl_\___ - .byte CT_CTRL ; 29/1d ___ctrl_]___ - .byte CT_CTRL ; 30/1e ___ctrl_^___ - .byte CT_CTRL ; 31/1f ___ctrl_____ - .byte CT_SPACE | CT_SPACE_TAB ; 32/20 ___SPACE___ - .byte CT_NONE ; 33/21 _____!_____ - .byte CT_NONE ; 34/22 _____"_____ - .byte CT_NONE ; 35/23 _____#_____ - .byte CT_NONE ; 36/24 _____$_____ - .byte CT_NONE ; 37/25 _____%_____ - .byte CT_NONE ; 38/26 _____&_____ - .byte CT_NONE ; 39/27 _____'_____ - .byte CT_NONE ; 40/28 _____(_____ - .byte CT_NONE ; 41/29 _____)_____ - .byte CT_NONE ; 42/2a _____*_____ - .byte CT_NONE ; 43/2b _____+_____ - .byte CT_NONE ; 44/2c _____,_____ - .byte CT_NONE ; 45/2d _____-_____ - .byte CT_NONE ; 46/2e _____._____ - .byte CT_NONE ; 47/2f _____/_____ - .byte CT_DIGIT | CT_XDIGIT ; 48/30 _____0_____ - .byte CT_DIGIT | CT_XDIGIT ; 49/31 _____1_____ - .byte CT_DIGIT | CT_XDIGIT ; 50/32 _____2_____ - .byte CT_DIGIT | CT_XDIGIT ; 51/33 _____3_____ - .byte CT_DIGIT | CT_XDIGIT ; 52/34 _____4_____ - .byte CT_DIGIT | CT_XDIGIT ; 53/35 _____5_____ - .byte CT_DIGIT | CT_XDIGIT ; 54/36 _____6_____ - .byte CT_DIGIT | CT_XDIGIT ; 55/37 _____7_____ - .byte CT_DIGIT | CT_XDIGIT ; 56/38 _____8_____ - .byte CT_DIGIT | CT_XDIGIT ; 57/39 _____9_____ - .byte CT_NONE ; 58/3a _____:_____ - .byte CT_NONE ; 59/3b _____;_____ - .byte CT_NONE ; 60/3c _____<_____ - .byte CT_NONE ; 61/3d _____=_____ - .byte CT_NONE ; 62/3e _____>_____ - .byte CT_NONE ; 63/3f _____?_____ - - .byte CT_NONE ; 64/40 _____@_____ - .byte CT_UPPER | CT_XDIGIT ; 65/41 _____A_____ - .byte CT_UPPER | CT_XDIGIT ; 66/42 _____B_____ - .byte CT_UPPER | CT_XDIGIT ; 67/43 _____C_____ - .byte CT_UPPER | CT_XDIGIT ; 68/44 _____D_____ - .byte CT_UPPER | CT_XDIGIT ; 69/45 _____E_____ - .byte CT_UPPER | CT_XDIGIT ; 70/46 _____F_____ - .byte CT_UPPER ; 71/47 _____G_____ - .byte CT_UPPER ; 72/48 _____H_____ - .byte CT_UPPER ; 73/49 _____I_____ - .byte CT_UPPER ; 74/4a _____J_____ - .byte CT_UPPER ; 75/4b _____K_____ - .byte CT_UPPER ; 76/4c _____L_____ - .byte CT_UPPER ; 77/4d _____M_____ - .byte CT_UPPER ; 78/4e _____N_____ - .byte CT_UPPER ; 79/4f _____O_____ - .byte CT_UPPER ; 80/50 _____P_____ - .byte CT_UPPER ; 81/51 _____Q_____ - .byte CT_UPPER ; 82/52 _____R_____ - .byte CT_UPPER ; 83/53 _____S_____ - .byte CT_UPPER ; 84/54 _____T_____ - .byte CT_UPPER ; 85/55 _____U_____ - .byte CT_UPPER ; 86/56 _____V_____ - .byte CT_UPPER ; 87/57 _____W_____ - .byte CT_UPPER ; 88/58 _____X_____ - .byte CT_UPPER ; 89/59 _____Y_____ - .byte CT_UPPER ; 90/5a _____Z_____ - .byte CT_NONE ; 91/5b _____[_____ - .byte CT_NONE ; 92/5c _____\_____ - .byte CT_NONE ; 93/5d _____]_____ - .byte CT_NONE ; 94/5e _____^_____ - .byte CT_NONE ; 95/5f _UNDERLINE_ - .byte CT_NONE ; 96/60 ___grave___ - .byte CT_LOWER | CT_XDIGIT ; 97/61 _____a_____ - .byte CT_LOWER | CT_XDIGIT ; 98/62 _____b_____ - .byte CT_LOWER | CT_XDIGIT ; 99/63 _____c_____ - .byte CT_LOWER | CT_XDIGIT ; 100/64 _____d_____ - .byte CT_LOWER | CT_XDIGIT ; 101/65 _____e_____ - .byte CT_LOWER | CT_XDIGIT ; 102/66 _____f_____ - .byte CT_LOWER ; 103/67 _____g_____ - .byte CT_LOWER ; 104/68 _____h_____ - .byte CT_LOWER ; 105/69 _____i_____ - .byte CT_LOWER ; 106/6a _____j_____ - .byte CT_LOWER ; 107/6b _____k_____ - .byte CT_LOWER ; 108/6c _____l_____ - .byte CT_LOWER ; 109/6d _____m_____ - .byte CT_LOWER ; 110/6e _____n_____ - .byte CT_LOWER ; 111/6f _____o_____ - .byte CT_LOWER ; 112/70 _____p_____ - .byte CT_LOWER ; 113/71 _____q_____ - .byte CT_LOWER ; 114/72 _____r_____ - .byte CT_LOWER ; 115/73 _____s_____ - .byte CT_LOWER ; 116/74 _____t_____ - .byte CT_LOWER ; 117/75 _____u_____ - .byte CT_LOWER ; 118/76 _____v_____ - .byte CT_LOWER ; 119/77 _____w_____ - .byte CT_LOWER ; 120/78 _____x_____ - .byte CT_LOWER ; 121/79 _____y_____ - .byte CT_LOWER ; 122/7a _____z_____ - .byte CT_NONE ; 123/7b _____{_____ - .byte CT_NONE ; 124/7c _____|_____ - .byte CT_NONE ; 125/7d _____}_____ - .byte CT_NONE ; 126/7e _____~_____ - .byte CT_OTHER_WS ; 127/7f ____DEL____ - - .res 128, CT_NONE ; 128-255 + .include "ctype_common.inc" diff --git a/libsrc/sim6502/exehdr.s b/libsrc/sim6502/exehdr.s index 865bd6553..09d099da5 100644 --- a/libsrc/sim6502/exehdr.s +++ b/libsrc/sim6502/exehdr.s @@ -1,11 +1,19 @@ ; ; Oliver Schmidt, 2013-05-16 ; -; This module supplies a 1 byte header identifying the simulator type +; This module supplies a header used by sim65. ; .export __EXEHDR__ : absolute = 1 ; Linker referenced + .importzp sp + .import __MAIN_START__ + .import startup .segment "EXEHDR" - .byte .defined(__SIM65C02__) + .byte $73, $69, $6D, $36, $35 ; 'sim65' + .byte 2 ; header version + .byte .defined(__SIM65C02__) ; CPU type + .byte sp ; sp address + .addr __MAIN_START__ ; load address + .addr startup ; reset address diff --git a/libsrc/sim6502/mainargs.s b/libsrc/sim6502/mainargs.s index 1daa23ace..a3c8dee6d 100644 --- a/libsrc/sim6502/mainargs.s +++ b/libsrc/sim6502/mainargs.s @@ -5,7 +5,7 @@ .constructor initmainargs, 24 .import __argc, __argv, args - .segment "INIT" + .segment "ONCE" initmainargs: lda #<__argv diff --git a/libsrc/sim6502/paravirt.s b/libsrc/sim6502/paravirt.s index 81b655c73..0d8e528b1 100644 --- a/libsrc/sim6502/paravirt.s +++ b/libsrc/sim6502/paravirt.s @@ -7,11 +7,11 @@ ; int __fastcall__ write (int fd, const void* buf, unsigned count); ; - .export args, exit, _open, _close, _read, _write + .export exit, args, _open, _close, _read, _write -args := $FFF0 -exit := $FFF1 -_open := $FFF2 -_close := $FFF3 -_read := $FFF4 -_write := $FFF5 +_open := $FFF4 +_close := $FFF5 +_read := $FFF6 +_write := $FFF7 +args := $FFF8 +exit := $FFF9 diff --git a/libsrc/supervision/crt0.s b/libsrc/supervision/crt0.s index d78bfeab5..fbae1fc46 100644 --- a/libsrc/supervision/crt0.s +++ b/libsrc/supervision/crt0.s @@ -31,9 +31,10 @@ reset: ; Initialize data. jsr copydata - lda #>(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) - sta sp+1 ; Set argument stack ptr - stz sp ; #<(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) + lda #<(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) + ldx #>(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) + sta sp + stx sp+1 ; Set argument stack ptr jsr initlib jsr _main _exit: jsr donelib @@ -66,16 +67,14 @@ not_dma: ; Removing this segment gives only a warning. .segment "FFF0" .proc reset32kcode - lda #(6<<5) + lda #(6<<5) | SV_LCD_ON | SV_NMI_ENABLE_ON sta sv_bank ; Now, the 32Kbyte image can reside in the top of 64Kbyte and 128Kbyte ROMs. jmp reset .endproc - .segment "VECTOR" + .segment "VECTORS" .word nmi .word reset32kcode .word irq - - diff --git a/libsrc/supervision/ctype.s b/libsrc/supervision/ctype.s index 1892554fd..1301965eb 100644 --- a/libsrc/supervision/ctype.s +++ b/libsrc/supervision/ctype.s @@ -1,162 +1,5 @@ -; -; Ullrich von Bassewitz, 2003-10-10 -; ; Character specification table. ; +; uses the "common" definition - .include "ctype.inc" - -; The tables are readonly, put them into the rodata segment - -.rodata - -; The following 256 byte wide table specifies attributes for the isxxx type -; of functions. Doing it by a table means some overhead in space, but it -; has major advantages: -; -; * It is fast. If it weren't for the slow parameter passing of cc65, one -; could even define macros for the isxxx functions (this is usually -; done on other platforms). -; -; * It is highly portable. The only unportable part is the table itself, -; all real code goes into the common library. -; -; * We save some code in the isxxx functions. - - -__ctype: - .byte CT_CTRL ; 0/00 ___ctrl_@___ - .byte CT_CTRL ; 1/01 ___ctrl_A___ - .byte CT_CTRL ; 2/02 ___ctrl_B___ - .byte CT_CTRL ; 3/03 ___ctrl_C___ - .byte CT_CTRL ; 4/04 ___ctrl_D___ - .byte CT_CTRL ; 5/05 ___ctrl_E___ - .byte CT_CTRL ; 6/06 ___ctrl_F___ - .byte CT_CTRL ; 7/07 ___ctrl_G___ - .byte CT_CTRL ; 8/08 ___ctrl_H___ - .byte CT_CTRL | CT_OTHER_WS | CT_SPACE_TAB - ; 9/09 ___ctrl_I___ - .byte CT_CTRL | CT_OTHER_WS ; 10/0a ___ctrl_J___ - .byte CT_CTRL | CT_OTHER_WS ; 11/0b ___ctrl_K___ - .byte CT_CTRL | CT_OTHER_WS ; 12/0c ___ctrl_L___ - .byte CT_CTRL | CT_OTHER_WS ; 13/0d ___ctrl_M___ - .byte CT_CTRL ; 14/0e ___ctrl_N___ - .byte CT_CTRL ; 15/0f ___ctrl_O___ - .byte CT_CTRL ; 16/10 ___ctrl_P___ - .byte CT_CTRL ; 17/11 ___ctrl_Q___ - .byte CT_CTRL ; 18/12 ___ctrl_R___ - .byte CT_CTRL ; 19/13 ___ctrl_S___ - .byte CT_CTRL ; 20/14 ___ctrl_T___ - .byte CT_CTRL ; 21/15 ___ctrl_U___ - .byte CT_CTRL ; 22/16 ___ctrl_V___ - .byte CT_CTRL ; 23/17 ___ctrl_W___ - .byte CT_CTRL ; 24/18 ___ctrl_X___ - .byte CT_CTRL ; 25/19 ___ctrl_Y___ - .byte CT_CTRL ; 26/1a ___ctrl_Z___ - .byte CT_CTRL ; 27/1b ___ctrl_[___ - .byte CT_CTRL ; 28/1c ___ctrl_\___ - .byte CT_CTRL ; 29/1d ___ctrl_]___ - .byte CT_CTRL ; 30/1e ___ctrl_^___ - .byte CT_CTRL ; 31/1f ___ctrl_____ - .byte CT_SPACE | CT_SPACE_TAB ; 32/20 ___SPACE___ - .byte CT_NONE ; 33/21 _____!_____ - .byte CT_NONE ; 34/22 _____"_____ - .byte CT_NONE ; 35/23 _____#_____ - .byte CT_NONE ; 36/24 _____$_____ - .byte CT_NONE ; 37/25 _____%_____ - .byte CT_NONE ; 38/26 _____&_____ - .byte CT_NONE ; 39/27 _____'_____ - .byte CT_NONE ; 40/28 _____(_____ - .byte CT_NONE ; 41/29 _____)_____ - .byte CT_NONE ; 42/2a _____*_____ - .byte CT_NONE ; 43/2b _____+_____ - .byte CT_NONE ; 44/2c _____,_____ - .byte CT_NONE ; 45/2d _____-_____ - .byte CT_NONE ; 46/2e _____._____ - .byte CT_NONE ; 47/2f _____/_____ - .byte CT_DIGIT | CT_XDIGIT ; 48/30 _____0_____ - .byte CT_DIGIT | CT_XDIGIT ; 49/31 _____1_____ - .byte CT_DIGIT | CT_XDIGIT ; 50/32 _____2_____ - .byte CT_DIGIT | CT_XDIGIT ; 51/33 _____3_____ - .byte CT_DIGIT | CT_XDIGIT ; 52/34 _____4_____ - .byte CT_DIGIT | CT_XDIGIT ; 53/35 _____5_____ - .byte CT_DIGIT | CT_XDIGIT ; 54/36 _____6_____ - .byte CT_DIGIT | CT_XDIGIT ; 55/37 _____7_____ - .byte CT_DIGIT | CT_XDIGIT ; 56/38 _____8_____ - .byte CT_DIGIT | CT_XDIGIT ; 57/39 _____9_____ - .byte CT_NONE ; 58/3a _____:_____ - .byte CT_NONE ; 59/3b _____;_____ - .byte CT_NONE ; 60/3c _____<_____ - .byte CT_NONE ; 61/3d _____=_____ - .byte CT_NONE ; 62/3e _____>_____ - .byte CT_NONE ; 63/3f _____?_____ - - .byte CT_NONE ; 64/40 _____@_____ - .byte CT_UPPER | CT_XDIGIT ; 65/41 _____A_____ - .byte CT_UPPER | CT_XDIGIT ; 66/42 _____B_____ - .byte CT_UPPER | CT_XDIGIT ; 67/43 _____C_____ - .byte CT_UPPER | CT_XDIGIT ; 68/44 _____D_____ - .byte CT_UPPER | CT_XDIGIT ; 69/45 _____E_____ - .byte CT_UPPER | CT_XDIGIT ; 70/46 _____F_____ - .byte CT_UPPER ; 71/47 _____G_____ - .byte CT_UPPER ; 72/48 _____H_____ - .byte CT_UPPER ; 73/49 _____I_____ - .byte CT_UPPER ; 74/4a _____J_____ - .byte CT_UPPER ; 75/4b _____K_____ - .byte CT_UPPER ; 76/4c _____L_____ - .byte CT_UPPER ; 77/4d _____M_____ - .byte CT_UPPER ; 78/4e _____N_____ - .byte CT_UPPER ; 79/4f _____O_____ - .byte CT_UPPER ; 80/50 _____P_____ - .byte CT_UPPER ; 81/51 _____Q_____ - .byte CT_UPPER ; 82/52 _____R_____ - .byte CT_UPPER ; 83/53 _____S_____ - .byte CT_UPPER ; 84/54 _____T_____ - .byte CT_UPPER ; 85/55 _____U_____ - .byte CT_UPPER ; 86/56 _____V_____ - .byte CT_UPPER ; 87/57 _____W_____ - .byte CT_UPPER ; 88/58 _____X_____ - .byte CT_UPPER ; 89/59 _____Y_____ - .byte CT_UPPER ; 90/5a _____Z_____ - .byte CT_NONE ; 91/5b _____[_____ - .byte CT_NONE ; 92/5c _____\_____ - .byte CT_NONE ; 93/5d _____]_____ - .byte CT_NONE ; 94/5e _____^_____ - .byte CT_NONE ; 95/5f _UNDERLINE_ - .byte CT_NONE ; 96/60 ___grave___ - .byte CT_LOWER | CT_XDIGIT ; 97/61 _____a_____ - .byte CT_LOWER | CT_XDIGIT ; 98/62 _____b_____ - .byte CT_LOWER | CT_XDIGIT ; 99/63 _____c_____ - .byte CT_LOWER | CT_XDIGIT ; 100/64 _____d_____ - .byte CT_LOWER | CT_XDIGIT ; 101/65 _____e_____ - .byte CT_LOWER | CT_XDIGIT ; 102/66 _____f_____ - .byte CT_LOWER ; 103/67 _____g_____ - .byte CT_LOWER ; 104/68 _____h_____ - .byte CT_LOWER ; 105/69 _____i_____ - .byte CT_LOWER ; 106/6a _____j_____ - .byte CT_LOWER ; 107/6b _____k_____ - .byte CT_LOWER ; 108/6c _____l_____ - .byte CT_LOWER ; 109/6d _____m_____ - .byte CT_LOWER ; 110/6e _____n_____ - .byte CT_LOWER ; 111/6f _____o_____ - .byte CT_LOWER ; 112/70 _____p_____ - .byte CT_LOWER ; 113/71 _____q_____ - .byte CT_LOWER ; 114/72 _____r_____ - .byte CT_LOWER ; 115/73 _____s_____ - .byte CT_LOWER ; 116/74 _____t_____ - .byte CT_LOWER ; 117/75 _____u_____ - .byte CT_LOWER ; 118/76 _____v_____ - .byte CT_LOWER ; 119/77 _____w_____ - .byte CT_LOWER ; 120/78 _____x_____ - .byte CT_LOWER ; 121/79 _____y_____ - .byte CT_LOWER ; 122/7a _____z_____ - .byte CT_NONE ; 123/7b _____{_____ - .byte CT_NONE ; 124/7c _____|_____ - .byte CT_NONE ; 125/7d _____}_____ - .byte CT_NONE ; 126/7e _____~_____ - .byte CT_OTHER_WS ; 127/7f ____DEL____ - - .res 128, CT_NONE ; 128-255 - - - + .include "ctype_common.inc" diff --git a/libsrc/supervision/joy/supervision-stdjoy.s b/libsrc/supervision/joy/supervision-stdjoy.s new file mode 100644 index 000000000..ef790ec0b --- /dev/null +++ b/libsrc/supervision/joy/supervision-stdjoy.s @@ -0,0 +1,82 @@ +; +; Standard joystick driver for the Supervision +; + + .include "joy-kernel.inc" + .include "joy-error.inc" + .include "supervision.inc" + + .macpack module + + +; ------------------------------------------------------------------------ +; Header. Includes jump table + + module_header _supervision_stdjoy_joy + +; Driver signature + + .byte $6A, $6F, $79 ; "joy" + .byte JOY_API_VERSION ; Driver API version number + +; Library reference + + .addr $0000 + +; Jump table. + + .addr INSTALL + .addr UNINSTALL + .addr COUNT + .addr READJOY + +; ------------------------------------------------------------------------ +; Constants + +JOY_COUNT = 1 ; Number of joysticks we support + + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. If +; possible, check if the hardware is present and determine the amount of +; memory available. +; Must return an JOY_ERR_xx code in a/x. +; + +INSTALL: + lda #<JOY_ERR_OK + ldx #>JOY_ERR_OK + +; rts ; Run into UNINSTALL instead + +; ------------------------------------------------------------------------ +; DEINSTALL routine. Is called before the driver is removed from memory. +; Can do cleanup or whatever. Must not return anything. +; + +UNINSTALL: + rts + + +; ------------------------------------------------------------------------ +; COUNT: Return the total number of available joysticks in a/x. +; +;unsigned char __fastcall__ joy_count (void); + +COUNT: + lda #<JOY_COUNT + ldx #>JOY_COUNT + rts + +; ------------------------------------------------------------------------ +; READ: Read a particular joystick passed in A. +; +;unsigned char __fastcall__ joy_read (unsigned char joystick); + +READJOY: + lda sv_control + eor #$FF + ldx #0 + rts diff --git a/libsrc/supervision/joy_stat_stddrv.s b/libsrc/supervision/joy_stat_stddrv.s new file mode 100644 index 000000000..4daa13e34 --- /dev/null +++ b/libsrc/supervision/joy_stat_stddrv.s @@ -0,0 +1,12 @@ +; +; Address of the static standard joystick driver +; +; Oliver Schmidt, 2012-11-01 +; +; const void joy_static_stddrv[]; +; + + .export _joy_static_stddrv + .import _supervision_stdjoy_joy + +_joy_static_stddrv := _supervision_stdjoy_joy diff --git a/libsrc/supervision/libref.s b/libsrc/supervision/libref.s new file mode 100644 index 000000000..e4afa7eb1 --- /dev/null +++ b/libsrc/supervision/libref.s @@ -0,0 +1,8 @@ +; +; Oliver Schmidt, 2013-05-31 +; + + .export joy_libref + .import _exit + +joy_libref := _exit diff --git a/libsrc/sym1/beep.s b/libsrc/sym1/beep.s new file mode 100644 index 000000000..edb5f23e4 --- /dev/null +++ b/libsrc/sym1/beep.s @@ -0,0 +1,17 @@ +; +; Wayne Parham (wayne@parhamdata.com) +; +; void beep (void); +; + +.include "sym1.inc" + +.export _beep + +.segment "CODE" + +.proc _beep: near + + jmp BEEP ; Beep + +.endproc diff --git a/libsrc/sym1/crt0.s b/libsrc/sym1/crt0.s new file mode 100644 index 000000000..5d4e0449b --- /dev/null +++ b/libsrc/sym1/crt0.s @@ -0,0 +1,57 @@ +; +; Startup code for cc65 (Sym-1 version) +; + + .export _init, _exit + .export __STARTUP__ : absolute = 1 ; Mark as startup + + .import _main + .import initlib, donelib, copydata, zerobss + .import __RAM_START__, __RAM_SIZE__ ; Linker generated + .import __STACKSIZE__ ; Linker generated + + .include "zeropage.inc" + .include "sym1.inc" + + +; Place the startup code in a special segment + +.segment "STARTUP" + + +; A little light housekeeping + +_init: jsr ACCESS ; Unlock System RAM + cld ; Clear decimal mode + +; Turn off console echo + + lda TECHO + and #$7F + sta TECHO + +; Set cc65 argument stack pointer + + lda #<(__RAM_START__ + __RAM_SIZE__) + sta sp + lda #>(__RAM_START__ + __RAM_SIZE__) + sta sp+1 + +; Initialize memory storage + + jsr zerobss ; Clear BSS segment + jsr copydata ; Initialize DATA segment + jsr initlib ; Run constructors + +; Call main() + + jsr _main + +; Back from main (this is also the _exit entry) + +_exit: jsr donelib ; Run destructors + lda TECHO + ora #$80 ; Re-enable console echo + sta TECHO + jmp NACCES ; Lock System RAM + ; Re-enter Sym-1 monitor diff --git a/libsrc/sym1/ctype.s b/libsrc/sym1/ctype.s new file mode 100644 index 000000000..1301965eb --- /dev/null +++ b/libsrc/sym1/ctype.s @@ -0,0 +1,5 @@ +; Character specification table. +; +; uses the "common" definition + + .include "ctype_common.inc" diff --git a/libsrc/sym1/display.s b/libsrc/sym1/display.s new file mode 100644 index 000000000..160b98806 --- /dev/null +++ b/libsrc/sym1/display.s @@ -0,0 +1,17 @@ +; +; Wayne Parham (wayne@parhamdata.com) +; +; void fdisp (void); +; + +.include "sym1.inc" + +.export _fdisp + +.segment "CODE" + +.proc _fdisp: near + + jmp SCAND ; Flash Display + +.endproc diff --git a/libsrc/sym1/read.s b/libsrc/sym1/read.s new file mode 100644 index 000000000..5f6a71144 --- /dev/null +++ b/libsrc/sym1/read.s @@ -0,0 +1,53 @@ +; +; Wayne Parham (wayne@parhamdata.com) +; +; int __fastcall__ read (int fd, void* buf, unsigned count); +; + +.include "sym1.inc" + +.import popax, popptr1 +.importzp ptr1, ptr2, ptr3 + +.export _read + +.proc _read + + sta ptr3 + stx ptr3+1 ; Count in ptr3 + inx + stx ptr2+1 ; Increment and store in ptr2 + tax + inx + stx ptr2 + jsr popptr1 ; Buffer address in ptr1 + jsr popax + +begin: dec ptr2 + bne getch + dec ptr2+1 + beq done ; If buffer full, return + +getch: jsr INTCHR ; Get character using Monitor ROM call + jsr OUTCHR ; Echo it + and #$7F ; Clear top bit + cmp #$07 ; Check for '\a' + bne chkcr ; ...if BEL character + jsr BEEP ; Make beep sound +chkcr: cmp #$0D ; Check for '\r' + bne putch ; ...if CR character + lda #$0A ; Replace with '\n' + jsr OUTCHR ; and echo it + +putch: ldy #$00 ; Put char into return buffer + sta (ptr1),y + inc ptr1 ; Increment pointer + bne begin + inc ptr1+1 + bne begin + +done: lda ptr3 + ldx ptr3+1 + rts ; Return count + +.endproc diff --git a/libsrc/sym1/tapeio.s b/libsrc/sym1/tapeio.s new file mode 100644 index 000000000..078ea7abd --- /dev/null +++ b/libsrc/sym1/tapeio.s @@ -0,0 +1,46 @@ +; +; Wayne Parham (wayne@parhamdata.com) +; +; int __fastcall__ loadt (unsigned char id); +; int __fastcall__ dumpt (unsigned char id, void* start_addr, void* end_addr); +; + +.include "sym1.inc" + +.import popa, popax, return0, return1 + +.export _loadt, _dumpt + +.segment "CODE" + +.proc _loadt: near + + sta P1L ; Tape record ID to P1L + ldx #$00 + stx P1H + ldy #$80 + jsr LOADT ; Read data from tape + bcs error + jmp return0 ; Return 0 if sucessful +error: jmp return1 ; or 1 if not + +.endproc + +.proc _dumpt: near + + sta P3L ; End address + stx P3H + jsr popax + sta P2L ; Start address + stx P2H + jsr popa + sta P1L ; Tape Record ID + ldx #$00 + stx P1H + ldy #$80 + jsr DUMPT ; Write data to tape + bcs error + jmp return0 ; Return 0 if sucessful +error: jmp return1 ; or 1 if not + +.endproc diff --git a/libsrc/sym1/write.s b/libsrc/sym1/write.s new file mode 100644 index 000000000..008902e58 --- /dev/null +++ b/libsrc/sym1/write.s @@ -0,0 +1,51 @@ +; +; Wayne Parham (wayne@parhamdata.com) +; +; int __fastcall__ write (int fd, const void* buf, int count); +; + +.include "sym1.inc" + +.import popax, popptr1 +.importzp ptr1, ptr2, ptr3 + +.export _write + +.proc _write + + sta ptr3 + stx ptr3+1 ; Count in ptr3 + inx + stx ptr2+1 ; Increment and store in ptr2 + tax + inx + stx ptr2 + jsr popptr1 ; Buffer address in ptr1 + jsr popax + +begin: dec ptr2 + bne outch + dec ptr2+1 + beq done + +outch: ldy #0 + lda (ptr1),y + jsr OUTCHR ; Send character using Monitor call + cmp #$07 ; Check for '\a' + bne chklf ; ...if BEL character + jsr BEEP ; Make beep sound +chklf: cmp #$0A ; Check for 'n' + bne next ; ...if LF character + lda #$0D ; Add a carriage return + jsr OUTCHR + +next: inc ptr1 + bne begin + inc ptr1+1 + jmp begin + +done: lda ptr3 + ldx ptr3+1 + rts ; Return count + +.endproc diff --git a/libsrc/telestrat/_scrsize.s b/libsrc/telestrat/_scrsize.s new file mode 100644 index 000000000..75bd456ce --- /dev/null +++ b/libsrc/telestrat/_scrsize.s @@ -0,0 +1,19 @@ +; +; 2003-04-13, Ullrich von Bassewitz +; 2013-07-16, Greg King +; +; Screen size variables +; + + .export screensize + .include "telestrat.inc" + +.proc screensize + + ldx #SCREEN_XSIZE + ldy #SCREEN_YSIZE + rts + +.endproc + + diff --git a/libsrc/telestrat/bgcolor.s b/libsrc/telestrat/bgcolor.s new file mode 100644 index 000000000..90a63e6de --- /dev/null +++ b/libsrc/telestrat/bgcolor.s @@ -0,0 +1,14 @@ +; 2019-07-02, Jede (jede@oric.org) +; + + .export _bgcolor + .import BGCOLOR + + .include "telestrat.inc" + +.proc _bgcolor + ldx BGCOLOR ; Get previous color + sta BGCOLOR + txa ; Return previous color + rts +.endproc diff --git a/libsrc/telestrat/bordercolor.s b/libsrc/telestrat/bordercolor.s new file mode 100644 index 000000000..c29ecc0e7 --- /dev/null +++ b/libsrc/telestrat/bordercolor.s @@ -0,0 +1,14 @@ +; +; Ullrich von Bassewitz, 06.08.1998 +; +; unsigned char __fastcall__ bordercolor (unsigned char color); +; + + .export _bordercolor + + .import return0 + + .include "telestrat.inc" + +_bordercolor := return0 + diff --git a/libsrc/telestrat/cclear.s b/libsrc/telestrat/cclear.s new file mode 100644 index 000000000..804381e89 --- /dev/null +++ b/libsrc/telestrat/cclear.s @@ -0,0 +1,35 @@ +; +; 2019-07-07, Jede (jede@oric.org) +; +; void cclearxy (unsigned char x, unsigned char y, unsigned char length); +; void cclear (unsigned char length); +; + + .export _cclearxy, _cclear + .import update_adscr, display_conio + + .importzp tmp1 + .import popax + .include "telestrat.inc" + + +_cclearxy: + pha ; Save the length + jsr popax ; Get X and Y + sta SCRY ; Store Y + stx SCRX ; Store X + jsr update_adscr + pla ; Restore the length and run into _cclear + +_cclear: + tax ; Is the length equal to zero? + beq @L2 ; Yes we skip +@L1: + stx tmp1 ; Save X + lda #' ' ; Erase current char + jsr display_conio + ldx tmp1 + dex + bne @L1 +@L2: + rts diff --git a/libsrc/telestrat/cgetc.s b/libsrc/telestrat/cgetc.s new file mode 100644 index 000000000..b76c62ee0 --- /dev/null +++ b/libsrc/telestrat/cgetc.s @@ -0,0 +1,42 @@ +; +; jede jede@oric.org 2017-10-01 +; + .export _cgetc + + .import cursor + + .export store_char + + .include "telestrat.inc" + +.proc _cgetc + ; This routine could be quicker if we wrote in page 2 variables, + ; But it's better to use telemon routine in that case, because telemon can manage 4 I/O + ldx cursor ; If cursor equal to 0, then switch off cursor + beq switchoff_cursor + + ldx #$00 ; x is the first screen + BRK_TELEMON(XCSSCR) ; Display cursor + jmp start ; Could be replaced by a bne/beq but 'jmp' is cleaner than a bne/beq which could expect some matters + +switchoff_cursor: + ; At this step X is equal to $00, X must be set, because it's the id of the screen (telestrat can handle 4 virtuals screen) + BRK_TELEMON(XCOSCR) ; Switch off cursor + + +start: + lda store_char ; Does kbhit store a value in store_char ? + bne @out ; Yes, we returns A and we reset store_char +@wait_key: + BRK_TELEMON XRD0 ; Waits until key is pressed + bcs @wait_key + ldx #$00 + rts +@out: + ldx #$00 + stx store_char + rts +.endproc +.bss +store_char: + .byte 0 diff --git a/libsrc/telestrat/chline.s b/libsrc/telestrat/chline.s new file mode 100644 index 000000000..cd7628eca --- /dev/null +++ b/libsrc/telestrat/chline.s @@ -0,0 +1,34 @@ +; +; void chlinexy (unsigned char x, unsigned char y, unsigned char length); +; void chline (unsigned char length); +; + + .export _chlinexy, _chline + + .import rvs, display_conio, update_adscr + .import popax + + .include "telestrat.inc" + + +_chlinexy: + pha ; Save the length + jsr popax ; Get X and Y + sta SCRY ; Store Y + stx SCRX ; Store X + jsr update_adscr + pla ; Restore the length and run into _chline + +_chline: + tax ; Is the length zero? + beq @L9 ; Jump if done +@L1: + lda #'-' ; Horizontal line screen code + ora rvs + + jsr display_conio + +@L2: dex + bne @L1 +@L9: rts + diff --git a/libsrc/telestrat/clock.s b/libsrc/telestrat/clock.s new file mode 100644 index 000000000..c5478c7ac --- /dev/null +++ b/libsrc/telestrat/clock.s @@ -0,0 +1,28 @@ +; +; Jede, 2021-03-10 +; +; clock_t clock (void); +; + + .export _clock + .importzp sreg + + .include "telestrat.inc" + +.proc _clock + +; Clear the timer high 16 bits + + ldy #$00 + sty sreg + sty sreg+1 + +; Read the timer + + sei ; Disable interrupts + lda TIMEUD ; TIMED contains 1/10 of a second from clock. Telestrat main cardridge simulate a clock from VIA6522 timer + ldx TIMEUD+1 + cli ; Reenable interrupts + + rts +.endproc diff --git a/libsrc/telestrat/close.s b/libsrc/telestrat/close.s new file mode 100644 index 000000000..53186ff42 --- /dev/null +++ b/libsrc/telestrat/close.s @@ -0,0 +1,16 @@ +; jede jede@oric.org 2017-01-22 + + .export _close + + .import addysp,popax + + .include "zeropage.inc" + .include "telestrat.inc" + .include "errno.inc" + .include "fcntl.inc" + +; int __fastcall__ close (int fd); +.proc _close + BRK_TELEMON XCLOSE ; Launch primitive ROM + rts +.endproc diff --git a/libsrc/telestrat/clrscr.s b/libsrc/telestrat/clrscr.s new file mode 100644 index 000000000..749e40b8f --- /dev/null +++ b/libsrc/telestrat/clrscr.s @@ -0,0 +1,47 @@ +; +; jede jede@oric.org 2017-02-25 +; + + .export _clrscr + .import OLD_CHARCOLOR, OLD_BGCOLOR, BGCOLOR, CHARCOLOR + + .include "telestrat.inc" + +.proc _clrscr + ; Switch to text mode + BRK_TELEMON(XTEXT) + + lda #<SCREEN ; Get position screen + ldy #>SCREEN + sta RES + sty RES+1 + + ldy #<(SCREEN+SCREEN_XSIZE*SCREEN_YSIZE) + ldx #>(SCREEN+SCREEN_XSIZE*SCREEN_YSIZE) + lda #' ' + BRK_TELEMON XFILLM ; Calls XFILLM : it fills A value from RES address and size of X and Y value + + + ; reset prompt position + lda #<SCREEN + sta ADSCR + lda #>SCREEN + sta ADSCR+1 + + lda #$00 + sta SCRDY + + ; reset display position + ldx #$00 + stx SCRY + stx SCRX + + stx OLD_BGCOLOR ; Black + stx BGCOLOR + + ldx #$07 ; White + stx OLD_CHARCOLOR + stx CHARCOLOR + + rts +.endproc diff --git a/libsrc/telestrat/cputc.s b/libsrc/telestrat/cputc.s new file mode 100644 index 000000000..13714b32d --- /dev/null +++ b/libsrc/telestrat/cputc.s @@ -0,0 +1,100 @@ +; 2018-04-13, Jede (jede@oric.org) +; + +; void cputc (char c); +; + + .export _cputc, _cputcxy, cputdirect, display_conio + .export CHARCOLOR, OLD_CHARCOLOR, BGCOLOR, OLD_BGCOLOR + + .import update_adscr + .import popax + + .include "telestrat.inc" + + +_cputcxy: + pha ; Save C + jsr popax ; Get X and Y + sta SCRY ; Store Y + stx SCRX ; Store X + jsr update_adscr + pla + +_cputc: + cmp #$0D + bne @not_CR + ldy #$00 + sty SCRX + rts +@not_CR: + cmp #$0A + bne not_LF + + inc SCRY + jmp update_adscr + +cputdirect: +not_LF: + ldx CHARCOLOR + cpx OLD_CHARCOLOR + beq do_not_change_color_foreground + + stx OLD_CHARCOLOR ; Store CHARCOLOR into OLD_CHARCOLOR + + + pha + txa ; Swap X to A because, X contains CHARCOLOR + + jsr display_conio + + pla + +do_not_change_color_foreground: + ldx BGCOLOR + cpx OLD_BGCOLOR + beq do_not_change_color + + stx OLD_BGCOLOR + + pha + txa ; Swap X to A because, X contains BGCOLOR + ora #%00010000 ; Add 16 because background color is an attribute between 16 and 23. 17 is red background for example + + jsr display_conio + pla + +do_not_change_color: + ; it continues to display_conio + + + +.proc display_conio + ; This routine is used to displays char on screen + ldy SCRX + sta (ADSCR),y + iny + cpy #SCREEN_XSIZE + bne @no_inc + ldy #$00 + sty SCRX + + inc SCRY + + jmp update_adscr + +@no_inc: + sty SCRX + rts +.endproc + +.bss +CHARCOLOR: + .res 1 +OLD_CHARCOLOR: + .res 1 +BGCOLOR: + .res 1 +OLD_BGCOLOR: + .res 1 + diff --git a/libsrc/telestrat/crt0.s b/libsrc/telestrat/crt0.s new file mode 100644 index 000000000..df75520ce --- /dev/null +++ b/libsrc/telestrat/crt0.s @@ -0,0 +1,90 @@ +; +; Startup code for cc65 (Oric version) +; +; By Debrune Jrme <jede@oric.org> and Ullrich von Bassewitz <uz@cc65.org> +; + + .export _exit + .export __STARTUP__ : absolute = 1 ; Mark as startup + + .import initlib, donelib + .import callmain, zerobss + .import __MAIN_START__, __MAIN_SIZE__ + + .include "zeropage.inc" + +; ------------------------------------------------------------------------ +; Place the startup code in a special segment. + +.segment "STARTUP" + + tsx + stx spsave ; Save system stk ptr + +; Save space by putting some of the start-up code in a segment +; that will be re-used. + + jsr init + +; Clear the BSS variables (after the constructors have been run). + + jsr zerobss + +; Push the command-line arguments; and, call main(). + + jsr callmain + +; Call the module destructors. This is also the exit() entry. + +_exit: jsr donelib + +; Restore the system stuff. + + ldx spsave + txs + +; Copy back the zero-page stuff. + + ldx #zpspace - 1 +L2: lda zpsave,x + sta sp,x + dex + bpl L2 + +; Back to BASIC. + + rts + +; ------------------------------------------------------------------------ +; Put this code in a place that will be re-used by BSS, the heap, +; and the C stack. + +.segment "ONCE" + +; Save the zero-page area that we're about to use. + +init: ldx #zpspace - 1 +L1: lda sp,x + sta zpsave,x + dex + bpl L1 + + +; Set up the C stack. + + lda #<(__MAIN_START__ + __MAIN_SIZE__) + ldx #>(__MAIN_START__ + __MAIN_SIZE__) + sta sp + stx sp+1 ; Set argument stack ptr + +; Call the module constructors. + + jmp initlib + +; ------------------------------------------------------------------------ + +.segment "INIT" + +spsave: .res 1 +stsave: .res 1 +zpsave: .res zpspace diff --git a/libsrc/telestrat/ctype.s b/libsrc/telestrat/ctype.s new file mode 100644 index 000000000..db61b1bb7 --- /dev/null +++ b/libsrc/telestrat/ctype.s @@ -0,0 +1,5 @@ +; Character specification table. +; +; same as for "atmos" target + +.include "../atmos/ctype.s" diff --git a/libsrc/telestrat/cvline.s b/libsrc/telestrat/cvline.s new file mode 100644 index 000000000..0d6086216 --- /dev/null +++ b/libsrc/telestrat/cvline.s @@ -0,0 +1,40 @@ +; +; Ullrich von Bassewitz, 2003-04-13 +; +; void cvlinexy (unsigned char x, unsigned char y, unsigned char length); +; void cvline (unsigned char length); +; + + .export _cvlinexy, _cvline + + .import rvs, display_conio, update_adscr + + .import popax + + .include "telestrat.inc" + + +_cvlinexy: + pha ; Save the length + jsr popax ; Get X and Y + sta SCRY ; Store Y + stx SCRX ; Store X + jsr update_adscr + pla ; Restore the length and run into _cvline + +_cvline: + tax ; Is the length zero? + beq @L9 ; Jump if done +@L1: + lda #'|' + ora rvs + ldy SCRX + sta (ADSCR),y + ; compute next line + inc SCRY + jsr update_adscr +@L2: dex + bne @L1 +@L9: rts + + diff --git a/libsrc/telestrat/gotox.s b/libsrc/telestrat/gotox.s new file mode 100644 index 000000000..72004bc0a --- /dev/null +++ b/libsrc/telestrat/gotox.s @@ -0,0 +1,12 @@ +; +; jede jede@oric.org 2017-02-25 +; + .export _gotox + .import OLD_CHARCOLOR, OLD_BGCOLOR + + .include "telestrat.inc" + +.proc _gotox + sta SCRX + rts +.endproc diff --git a/libsrc/telestrat/gotoxy.s b/libsrc/telestrat/gotoxy.s new file mode 100644 index 000000000..c0907a623 --- /dev/null +++ b/libsrc/telestrat/gotoxy.s @@ -0,0 +1,53 @@ +; +; 2017-02-25, jede <jede@oric.org> +; 2017-06-15, Greg King +; +; void gotoxy (unsigned char x, unsigned char y); +; + + .export gotoxy, _gotoxy, update_adscr + + .import popa, OLD_CHARCOLOR, OLD_BGCOLOR + + .include "telestrat.inc" + +gotoxy: jsr popa ; Get Y + +.proc _gotoxy + +; This function moves only the display cursor; it does not move the prompt position. +; In telemon, there is a position for the prompt, and another for the cursor. + + sta SCRY + + + jsr popa + sta SCRX + +; Update address video ram position when SCRY is modified (update_adscr) +; Fall through +.endproc + +.proc update_adscr + + lda #<SCREEN + sta ADSCR + + lda #>SCREEN + sta ADSCR+1 + + ldy SCRY + beq out +loop: + lda ADSCR + clc + adc #SCREEN_XSIZE + bcc skip + inc ADSCR+1 +skip: + sta ADSCR + dey + bne loop +out: + rts +.endproc diff --git a/libsrc/telestrat/gotoy.s b/libsrc/telestrat/gotoy.s new file mode 100644 index 000000000..008d4413f --- /dev/null +++ b/libsrc/telestrat/gotoy.s @@ -0,0 +1,13 @@ +; +; jede jede@oric.org 2017-02-25 +; + .export _gotoy + + .import update_adscr + + .include "telestrat.inc" + +.proc _gotoy + sta SCRY + jmp update_adscr +.endproc diff --git a/libsrc/telestrat/initcwd.s b/libsrc/telestrat/initcwd.s new file mode 100644 index 000000000..7d38dd563 --- /dev/null +++ b/libsrc/telestrat/initcwd.s @@ -0,0 +1,27 @@ +; +; Jede (jede@oric.org) 24.09.2017 +; + + .export initcwd + .import __cwd + + .include "zeropage.inc" + .include "telestrat.inc" + + +initcwd: + BRK_TELEMON(XGETCWD) + + sta ptr1 + sty ptr1+1 + + ldy #$00 +loop: + lda (ptr1),y + sta __cwd,y + beq done + iny + bne loop + +done: + rts diff --git a/libsrc/telestrat/irq.s b/libsrc/telestrat/irq.s new file mode 100644 index 000000000..9027f263e --- /dev/null +++ b/libsrc/telestrat/irq.s @@ -0,0 +1,59 @@ +; +; IRQ handling (Oric version) +; + + .export initirq, doneirq + .import callirq + + .include "telestrat.inc" + +; ------------------------------------------------------------------------ + +.segment "ONCE" + +initirq: + lda IRQVec + ldx IRQVec+1 + sta IRQInd+1 + stx IRQInd+2 + lda #<IRQStub + ldx #>IRQStub + jmp setvec + +; ------------------------------------------------------------------------ + +.code + +doneirq: + lda IRQInd+1 + ldx IRQInd+2 +setvec: sei + sta IRQVec + stx IRQVec+1 + cli + rts + +; ------------------------------------------------------------------------ + +.segment "LOWCODE" + +IRQStub: + cld ; Just to be sure + pha + txa + pha + tya + pha + jsr callirq ; Call the functions + pla + tay + pla + tax + pla + jmp IRQInd ; Jump to the saved IRQ vector + +; ------------------------------------------------------------------------ + +.data + +IRQInd: jmp $0000 diff --git a/libsrc/telestrat/joy/telestrat.s b/libsrc/telestrat/joy/telestrat.s new file mode 100644 index 000000000..0f5d28651 --- /dev/null +++ b/libsrc/telestrat/joy/telestrat.s @@ -0,0 +1,114 @@ +; +; Telestrat joystick driver +; +; 2002-12-20, Based on Ullrich von Bassewitz's code. +; 2017-11-01, Stefan Haubenthal +; 2020-05-20, Jede +; + + .include "joy-kernel.inc" + .include "joy-error.inc" + .include "telestrat.inc" + + .macpack module + + +; ------------------------------------------------------------------------ +; Header. Includes jump table + + module_header _telestrat_joy + +; Driver signature + + .byte $6A, $6F, $79 ; "joy" + .byte JOY_API_VERSION ; Driver API version number + +; Library reference + + .addr $0000 + +; Jump table. + + .addr INSTALL + .addr UNINSTALL + .addr COUNT + .addr READ + +; ------------------------------------------------------------------------ +; Constants + +JOY_COUNT = 2 ; Number of joysticks we support + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. If +; possible, check if the hardware is present and determine the amount of +; memory available. +; Must return an JOY_ERR_xx code in a/x. +; + +INSTALL: + lda #%11000000 + sta VIA2::DDRB + sta VIA2::PRB + ; We could detect joysticks because with previous command bit0,1,2,3,4 should be set to 1 after + ; But if some one press fire or press direction, we could reach others values which could break joystick detection. + lda #<JOY_ERR_OK + ldx #>JOY_ERR_OK +; rts ; Run into UNINSTALL instead + +; ------------------------------------------------------------------------ +; UNINSTALL routine. Is called before the driver is removed from memory. +; Can do cleanup or whatever. Must not return anything. +; + +UNINSTALL: + rts + + +; ------------------------------------------------------------------------ +; COUNT: Return the total number of available joysticks in a/x. +; + +COUNT: + lda #<JOY_COUNT + ldx #>JOY_COUNT + rts + +; ------------------------------------------------------------------------ +; READ: Read a particular joystick passed in A. +; +; How telestrat joysticks works +; PB7 and PB6 select right or left port +; When PB7 and PB6 are high, it controls two CA3083 (2 NPN transistors array) bases. +; In that case, PB0 to PB4 are set to high (it means no action are pressed) +; When the user press something then bit will be set to 0. +; Bit 0 is right +; Bit 1 is left +; Bit 2 is fire +; ... + +READ: + beq right + + lda VIA2::PRB + and #%01111111 + ora #%01000000 + sta VIA2::PRB + ; then read + lda VIA2::PRB + eor #%01011111 + + rts +right: + lda VIA2::PRB + and #%10111111 + ora #%10000000 + sta VIA2::PRB + + ; then read + lda VIA2::PRB + eor #%10011111 + + rts diff --git a/libsrc/telestrat/joy_stat_stddrv.s b/libsrc/telestrat/joy_stat_stddrv.s new file mode 100644 index 000000000..0c4c3667b --- /dev/null +++ b/libsrc/telestrat/joy_stat_stddrv.s @@ -0,0 +1,14 @@ +; +; Address of the static standard joystick driver +; +; Oliver Schmidt, 2012-11-01 +; +; const void joy_static_stddrv[]; +; + + .export _joy_static_stddrv + .import _telestrat_joy + +.rodata + +_joy_static_stddrv := _telestrat_joy diff --git a/libsrc/nes/joy_stddrv.s b/libsrc/telestrat/joy_stddrv.s similarity index 77% rename from libsrc/nes/joy_stddrv.s rename to libsrc/telestrat/joy_stddrv.s index b99659746..c8d8c2495 100644 --- a/libsrc/nes/joy_stddrv.s +++ b/libsrc/telestrat/joy_stddrv.s @@ -10,4 +10,4 @@ .rodata -_joy_stddrv: .asciiz "nes-stdjoy.joy" +_joy_stddrv: .asciiz "telestrat.joy" diff --git a/libsrc/telestrat/kbhit.s b/libsrc/telestrat/kbhit.s new file mode 100644 index 000000000..aea345036 --- /dev/null +++ b/libsrc/telestrat/kbhit.s @@ -0,0 +1,29 @@ +; +; Jede, 2021-02-01 +; +; int kbhit (void); +; + + .export _kbhit + + .import store_char + + .include "telestrat.inc" + +_kbhit: + lda store_char ; Check if a key has been detected previously + beq @call_telemon ; No, calls Telemon routine + lda #$01 ; There is a key pressed previously, return 1 + ldx #$00 + rts +@call_telemon: + BRK_TELEMON XRD0 + + ldx #$00 + bcs @no_char_action + sta store_char + lda #$01 + rts +@no_char_action: + tax + rts diff --git a/libsrc/telestrat/libref.s b/libsrc/telestrat/libref.s new file mode 100644 index 000000000..c737396a5 --- /dev/null +++ b/libsrc/telestrat/libref.s @@ -0,0 +1,9 @@ +; +; Jede (jede@oric.org), 2017-10-16 +; + + .export joy_libref, tgi_libref + .import _exit + +joy_libref := _exit +tgi_libref := _exit diff --git a/libsrc/telestrat/mainargs.s b/libsrc/telestrat/mainargs.s new file mode 100644 index 000000000..b7ffb4ec7 --- /dev/null +++ b/libsrc/telestrat/mainargs.s @@ -0,0 +1,120 @@ +; +; 2003-03-07, Ullrich von Bassewitz +; 2011-01-28, Stefan Haubenthal +; 2014-09-10, Greg King +; +; Set up arguments for main +; + + .constructor initmainargs, 24 + .import __argc, __argv + .import ptr1 + .include "telestrat.inc" + .macpack generic + +MAXARGS = 10 ; Maximum number of arguments allowed + + + + + +; Assume that the program was loaded, a moment ago, by the traditional LOAD +; statement. Save the "most-recent filename" as argument #0. +initmainargs: + + ldx #0 ; Limit the length +L0: lda BUFEDT,x + beq L3 + cmp #' ' + bne L1 + lda #0 + beq L3 +L1: sta name,x + inx + cpx #FNAME_LEN + bne L0 + lda #0 +L3: + sta name,x + inc __argc ; argc always is equal to, at least, 1 + + + ldy #1 * 2 ; Point to second argv slot + +next: lda BUFEDT,x + beq done ; End of line reached + inx + cmp #' ' ; Skip leading spaces + beq next + +found: cmp #'"' ; Is the argument quoted? + beq setterm ; Jump if so + dex ; Reset pointer to first argument character + + lda #' ' ; A space ends the argument +setterm:sta term ; Set end of argument marker + +; Now, store a pointer, to the argument, into the next slot. + + txa ; Get low byte + clc + adc #<BUFEDT + bcc L4 + inc L5+1 +L4: + sta argv,y ; argv[y]=&arg +L5: + lda #>BUFEDT + sta argv+1,y + iny + iny + inc __argc ; Found another arg + +; Search for the end of the argument + + + +argloop:lda BUFEDT,x + beq done + inx + cmp term + bne argloop + +; We've found the end of the argument. X points one character behind it, and +; A contains the terminating character. To make the argument a valid C string, +; replace the terminating character by a zero. + + lda #0 + sta BUFEDT-1,x + +; Check if the maximum number of command line arguments is reached. If not, +; parse the next one. + + lda __argc ; Get low byte of argument count + cmp #MAXARGS ; Maximum number of arguments reached? + bcc next ; Parse next one if not + + +done: lda #<argv + ldx #>argv + sta __argv + stx __argv + 1 + rts + + +.segment "INIT" + +term: .res 1 + + +.data + +name: .res FNAME_LEN + 1 +args: .res SCREEN_XSIZE * 2 - 1 + +param_found: + .res 1 +; char* argv[MAXARGS+1]={name}; +argv: + .addr name + .res MAXARGS * 2 diff --git a/libsrc/telestrat/open.s b/libsrc/telestrat/open.s new file mode 100644 index 000000000..f59d3d31a --- /dev/null +++ b/libsrc/telestrat/open.s @@ -0,0 +1,33 @@ + .export _open + + .import addysp,popax + + .importzp sp,tmp2,tmp3,tmp1 + + + .include "telestrat.inc" + .include "errno.inc" + .include "fcntl.inc" + +; int open (const char* name, int flags, ...); /* May take a mode argument */ +.proc _open +; Throw away any additional parameters passed through the ellipsis + + dey ; Parm count < 4 shouldn't be needed to be... + dey ; ...checked (it generates a c compiler warning) + dey + dey + beq parmok ; Branch if parameter count ok + jsr addysp ; Fix stack, throw away unused parameters + +; Parameters ok. Pop the flags and save them into tmp3 + +parmok: + jsr popax ; Get flagss + sta tmp3 ; save flags +; Get the filename from stack and parse it. Bail out if is not ok + jsr popax ; Get name + ldy tmp3 ; Get flags again + BRK_TELEMON XOPEN ; launch primitive ROM + rts +.endproc diff --git a/libsrc/telestrat/orixhdr.s b/libsrc/telestrat/orixhdr.s new file mode 100644 index 000000000..78d6c945a --- /dev/null +++ b/libsrc/telestrat/orixhdr.s @@ -0,0 +1,35 @@ +; +; By Debrune Jérôme <jede@oric.org> + +; + + ; The following symbol is used by the linker config. file + ; to force this module to be included into the output file. + .export __ORIXHDR__:abs = 1 + + ; These symbols, also, come from the configuration file. + .import __AUTORUN__, __PROGFLAG__ + .import __MAIN_START__, __MAIN_LAST__ + + +; ------------------------------------------------------------------------ +; Orix header see http://orix.oric.org/doku.php?id=orix:header for specs + +.segment "ORIXHDR" + + .byte $01, $00 ; Non C64 marker (same as o65 format) + + .byte "ori" ; Magic number + + .byte $01 ; Version of the header + .byte $00,%00000000 ; 6502 only + .byte $00,$00 ; Type of language + .byte $00,$00 ; OS version + + .byte $00 ; Reserved + .byte $00 ; Auto or not + + .word __MAIN_START__ ; Address of start of file + .word __MAIN_LAST__ - 1 ; Address of end of file + .word __MAIN_START__ ; Address of start of file + diff --git a/libsrc/telestrat/oserror.s b/libsrc/telestrat/oserror.s new file mode 100644 index 000000000..e3b9e619a --- /dev/null +++ b/libsrc/telestrat/oserror.s @@ -0,0 +1,17 @@ +; +; Jede, 2017-10-27 +; +; int __fastcall__ _osmaperrno (unsigned char oserror); +; /* Map a system specific error into a system independent code */ +; + + .include "errno.inc" + .export __osmaperrno + +.proc __osmaperrno + + lda #<EUNKNOWN + ldx #>EUNKNOWN + rts + +.endproc diff --git a/libsrc/telestrat/read.s b/libsrc/telestrat/read.s new file mode 100644 index 000000000..f31909f45 --- /dev/null +++ b/libsrc/telestrat/read.s @@ -0,0 +1,42 @@ +; +; jede jede@oric.org 2017-01-22 +; + + .export _read + + .import popax + + .include "zeropage.inc" + .include "telestrat.inc" + +;int read (int fd, void* buf, unsigned count); + +.proc _read + + sta ptr1 ; count + stx ptr1+1 ; count + jsr popax ; get buf + + sta PTR_READ_DEST + stx PTR_READ_DEST+1 + sta ptr2 ; in order to calculate nb of bytes read + stx ptr2+1 + + jsr popax ; get FD + + tax ; send FD to X + + lda ptr1 + ldy ptr1+1 + BRK_TELEMON XFREAD + ; compute nb of bytes read + lda PTR_READ_DEST+1 + sec + sbc ptr2+1 + tax + lda PTR_READ_DEST + sec + sbc ptr2 + ; here A and X contains number of bytes read + rts +.endproc diff --git a/libsrc/telestrat/revers.s b/libsrc/telestrat/revers.s new file mode 100644 index 000000000..ad3e1f909 --- /dev/null +++ b/libsrc/telestrat/revers.s @@ -0,0 +1,37 @@ +; +; Ullrich von Bassewitz, 07.08.1998 +; +; unsigned char revers (unsigned char onoff); +; + + .export _revers + .export rvs + +; ------------------------------------------------------------------------ +; + +.code +.proc _revers + + ldx #$00 ; Assume revers off + tay ; Test onoff + beq L1 ; Jump if off + ldx #$80 ; Load on value + ldy #$00 ; Assume old value is zero +L1: lda rvs ; Load old value + stx rvs ; Set new value + beq L2 ; Jump if old value zero + iny ; Make old value = 1 +L2: ldx #$00 ; Load high byte of result + tya ; Load low byte, set CC + rts + +.endproc + +; ------------------------------------------------------------------------ +; + +.bss +rvs: .res 1 + + diff --git a/libsrc/telestrat/sound.s b/libsrc/telestrat/sound.s new file mode 100644 index 000000000..2a786a452 --- /dev/null +++ b/libsrc/telestrat/sound.s @@ -0,0 +1,42 @@ +; +; jede jede@oric.org 2017-01-22 + + .export _kbdclick1,_oups,_ping,_explode,_shoot,_zap + .include "telestrat.inc" + +.proc _kbdclick1 + ldx #<sound_bip_keyboard + ldy #>sound_bip_keyboard + BRK_TELEMON XSONPS + rts +sound_bip_keyboard: + .byte $1f,$00,$00,$00,$00,$00,$00,$3e,$10,$00,$00,$1f,$00,$00 +.endproc + +.proc _explode + BRK_TELEMON XEXPLO + rts +.endproc + +.proc _oups + BRK_TELEMON XOUPS + rts +.endproc + +.proc _ping + BRK_TELEMON XPING + rts +.endproc + +.proc _shoot + BRK_TELEMON XSHOOT + rts +.endproc + +.proc _zap + BRK_TELEMON XZAP + rts +.endproc + + + diff --git a/libsrc/telestrat/syschdir.s b/libsrc/telestrat/syschdir.s new file mode 100644 index 000000000..6257880b8 --- /dev/null +++ b/libsrc/telestrat/syschdir.s @@ -0,0 +1,32 @@ +; +; Jede (jede@oric.org), 2021-02-22 +; +; unsigned char _syschdir (const char* name, ...); +; + + .export __syschdir + .import addysp, popax + .importzp tmp1 + .import initcwd + + .include "telestrat.inc" + .include "zeropage.inc" + + +__syschdir: + ; Throw away all parameters except the name + dey + dey + jsr addysp + + ; Get name + jsr popax + + stx tmp1 + ldy tmp1 + + ; Call telemon primitive + + BRK_TELEMON(XPUTCWD) + + jmp initcwd ; Update cwd diff --git a/libsrc/telestrat/sysmkdir.s b/libsrc/telestrat/sysmkdir.s new file mode 100644 index 000000000..6b0d62264 --- /dev/null +++ b/libsrc/telestrat/sysmkdir.s @@ -0,0 +1,33 @@ +; +; Jede (jede@oric.org), 2017-10-27 +; +; unsigned char _sysmkdir (const char* name, ...); +; +; This routine only works with Orix + + + .export __sysmkdir + .import addysp, popax + + .include "telestrat.inc" + .include "zeropage.inc" + +__sysmkdir: + ; Throw away all parameters except the name + dey + dey + jsr addysp + + ; Get name + jsr popax + + stx tmp1 + ldy tmp1 + + ldx #$00 ; X register is used to set if all folders must be created + + ; Call telemon primitive + + BRK_TELEMON(XMKDIR) + + rts diff --git a/libsrc/telestrat/sysremove.s b/libsrc/telestrat/sysremove.s new file mode 100644 index 000000000..565dfc111 --- /dev/null +++ b/libsrc/telestrat/sysremove.s @@ -0,0 +1,16 @@ +; +; Jede, 10.11.2017 +; +; unsigned char __fastcall__ _sysremove (const char* name); +; + + .export __sysremove + + + .include "zeropage.inc" + .include "telestrat.inc" + +__sysremove: + ; Push name + BRK_TELEMON(XRM) + rts diff --git a/libsrc/telestrat/sysuname.s b/libsrc/telestrat/sysuname.s new file mode 100644 index 000000000..51af1d8fe --- /dev/null +++ b/libsrc/telestrat/sysuname.s @@ -0,0 +1,46 @@ +; +; Ullrich von Bassewitz, 2003-08-12 +; +; unsigned char __fastcall__ _sysuname (struct utsname* buf); +; + + .export __sysuname, utsdata + + .import utscopy + + __sysuname = utscopy + +;-------------------------------------------------------------------------- +; Data. We define a fixed utsname struct here and just copy it. + +.rodata + +utsdata: + ; sysname + .asciiz "cc65" + + ; nodename + .asciiz "" + + ; release + .byte ((.VERSION >> 8) & $0F) + '0' + .byte '.' + .if ((.VERSION >> 4) & $0F) > 9 + .byte ((.VERSION >> 4) & $0F) / 10 + '0' + .byte ((.VERSION >> 4) & $0F) .MOD 10 + '0' + .else + .byte ((.VERSION >> 4) & $0F) + '0' + .endif + .byte $00 + + ; version + .if (.VERSION & $0F) > 9 + .byte (.VERSION & $0F) / 10 + '0' + .byte (.VERSION & $0F) .MOD 10 + '0' + .else + .byte (.VERSION & $0F) + '0' + .endif + .byte $00 + + ; machine + .asciiz "Oric Telestrat" diff --git a/libsrc/telestrat/textcolor.s b/libsrc/telestrat/textcolor.s new file mode 100644 index 000000000..d851aaaab --- /dev/null +++ b/libsrc/telestrat/textcolor.s @@ -0,0 +1,14 @@ +; 2019-07-02, Jede (jede@oric.org) +; + + .export _textcolor + .import CHARCOLOR, OLD_CHARCOLOR + .include "telestrat.inc" + +.proc _textcolor + ldx CHARCOLOR ; Get previous color + sta CHARCOLOR + stx OLD_CHARCOLOR + txa ; Return previous color + rts +.endproc diff --git a/libsrc/telestrat/tgi/telestrat-228-200-3.s b/libsrc/telestrat/tgi/telestrat-228-200-3.s new file mode 100644 index 000000000..402e04e7e --- /dev/null +++ b/libsrc/telestrat/tgi/telestrat-228-200-3.s @@ -0,0 +1,385 @@ +; +; Graphics driver for the 228x200x3 palette mode on the Telestrat +; +; Jede (jede@oric.org), 2017-10-15 + + .include "zeropage.inc" + + .include "tgi-kernel.inc" + .include "tgi-error.inc" + .include "telestrat.inc" + + .macpack generic + .macpack module + +XSIZE = 6 ; System font width +YSIZE = 8 ; System font height + +; ------------------------------------------------------------------------ +; Header. Includes jump table and constants. + + module_header _telestrat_228_200_3_tgi + +; The first part of the header is a structure that has a signature, +; and defines the capabilities of the driver. + + .byte "tgi" + .byte TGI_API_VERSION ; TGI API version number + .addr $0000 ; Library reference + .word 228 ; x resolution + .word 200 ; y resolution + .byte 3 ; Number of drawing colors + .byte 1 ; Number of screens available + .byte XSIZE ; System font x size + .byte YSIZE ; System font y size + .word $011C ; Aspect ratio (based on 4/3 display) + .byte 0 ; TGI driver flags + +; Next comes the jump table. Currently, all entries must be valid; +; and, may point to an RTS, for test versions (function not implemented). + + .addr INSTALL + .addr UNINSTALL + .addr INIT + .addr DONE + .addr GETERROR + .addr CONTROL + .addr CLEAR + .addr SETVIEWPAGE + .addr SETDRAWPAGE + .addr SETCOLOR + .addr SETPALETTE + .addr GETPALETTE + .addr GETDEFPALETTE + .addr SETPIXEL + .addr GETPIXEL + .addr LINE + .addr BAR + .addr CIRCLE + .addr TEXTSTYLE + .addr OUTTEXT + +; ------------------------------------------------------------------------ +; Data. + +; Variables mapped to the zero-page segment variables. These are +; used for passing parameters to the driver. + +X1 := ptr1 +Y1 := ptr2 +X2 := ptr3 +Y2 := ptr4 + +; Absolute variables used in the code + +.bss + +ERROR: .res 1 ; Error code +MODE: .res 1 ; Graphics mode +PALETTE: .res 2 + +; Constant table + +.rodata + +; Default colors: black background, white foreground +; (The third "color" actually flips a pixel +; between the foreground and background colors.) +; +DEFPALETTE: .byte 0, 1 + +.code + +; ------------------------------------------------------------------------ +; INIT: Changes an already installed device from text mode to graphics mode. +; Note that INIT/DONE may be called multiple times while the driver +; is loaded, while INSTALL is called only once. So, any code that is needed +; to initialize variables and so on must go here. Setting palette and +; clearing the screen are not needed because they are called by the graphics +; kernel later. +; The graphics kernel never will call INIT when a graphics mode is already +; active, so there is no need to protect against that. +; +; Must set an error code: YES +; + +INIT: + +; Switch into graphics mode. + BRK_TELEMON(XHIRES) + +; Done, reset the error code. + + lda #TGI_ERR_OK + sta ERROR + rts + +; ------------------------------------------------------------------------ +; GETERROR: Return the error code in A, and clear it. + +GETERROR: + ldx #TGI_ERR_OK + lda ERROR + stx ERROR + rts +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. May +; initialize anything that has to be done just once. Is probably empty +; most of the time. +; +; Must set an error code: NO +; + +INSTALL: + +; ------------------------------------------------------------------------ +; UNINSTALL routine. Is called before the driver is removed from memory. May +; clean up anything done by INSTALL, but probably is empty most of the time. +; +; Must set an error code: NO +; + +UNINSTALL: + rts + +; ------------------------------------------------------------------------ +; DONE: Will be called to switch the graphics device back into text mode. +; The graphics kernel never will call DONE when no graphics mode is active, +; so there is no need to protect against that. +; +; Must set an error code: NO +; + +DONE: + BRK_TELEMON(XTEXT) + rts +; ------------------------------------------------------------------------ +; CONTROL: Platform-/driver-specific entry point. +; +; Must set an error code: YES +; + +CONTROL: + ; not done yet + rts + +; ------------------------------------------------------------------------ +; CLEAR: Clears the screen. +; +; Must set an error code: NO +; + +CLEAR: + BRK_TELEMON(XEFFHI) + rts + +; ------------------------------------------------------------------------ +; SETVIEWPAGE: Set the visible page. Called with the new page in A (0..n). +; The page number already is checked to be valid, by the graphics kernel. +; +; Must set an error code: NO (will be called only if page OK) +; + +SETVIEWPAGE: + +; ------------------------------------------------------------------------ +; SETDRAWPAGE: Set the drawable page. Called with the new page in A (0..n). +; The page number already is checked to be valid, by the graphics kernel. +; +; Must set an error code: NO (will be called only if page OK) +; + +SETDRAWPAGE: + rts + +; ------------------------------------------------------------------------ +; SETCOLOR: Set the drawing color (in A). The new color already is checked +; to be in a valid range (0..maxcolor-1). +; +; Must set an error code: NO (will be called only if color OK) +; + +SETCOLOR: + ; not done yet + rts + +; ------------------------------------------------------------------------ +; SETPALETTE: Set the palette (not available with all drivers/hardware). +; A pointer to the palette is passed in ptr1. Must set an error if palettes +; are not supported. +; +; Must set an error code: YES +; + +SETPALETTE: + ; not done yet + rts + +flipcolor: + ; not done yet + rts + +; ------------------------------------------------------------------------ +; GETPALETTE: Return the current palette in A/X. Even drivers that cannot +; set the palette should return the default palette here, so there's no +; way for this function to fail. +; +; Must set an error code: NO +; + +GETPALETTE: + ; not done yet + rts + +; ------------------------------------------------------------------------ +; GETDEFPALETTE: Return the default palette for the driver in A/X. All +; drivers should return something reasonable here, even drivers that don't +; support palettes; otherwise, the caller has no way to determine the colors +; of the (not changeable) palette. +; +; Must set an error code: NO (all drivers must have a default palette) +; + +GETDEFPALETTE: + lda #<DEFPALETTE + ldx #>DEFPALETTE + rts + +; ------------------------------------------------------------------------ +; SETPIXEL: Draw one pixel at X1/Y1 = ptr1/ptr2 with the current drawing +; color. The co-ordinates passed to this function are never outside the +; visible screen area, so there is no need for clipping inside this function. +; +; Must set an error code: NO +; + +SETPIXEL: + lda #$80 + +SETPIXELSETMODE: + sta HRSFB + lda X1 + sta HRS1 + lda Y1 + sta HRS2 + + + + BRK_TELEMON(XCURSE) + + rts + +; ------------------------------------------------------------------------ +; GETPIXEL: Read the color value of a pixel, and return it in A/X. The +; co-ordinates passed to this function are never outside the visible screen +; area, so there is no need for clipping inside this function. + +GETPIXEL: + ; not done yet + rts + +; ------------------------------------------------------------------------ +; LINE: Draw a line from X1/Y1 to X2/Y2, where X1/Y1 = ptr1/ptr2 and +; X2/Y2 = ptr3/ptr4, using the current drawing color. +; +; Must set an error code: NO +; + +LINE: + ; not done yet + lda X1 + sta HRS1 + lda Y1 + sta HRS2 + + lda X2 + sta HRS3 + lda Y2 + sta HRS4 + + lda X1+1 + sta HRS1+1 + + lda Y1+1 + sta HRS2+1 + + lda X2+1 + sta HRS3+1 + + lda Y2+1 + sta HRS4+1 + + lda #$FF + sta HRSPAT + + BRK_TELEMON(XDRAWA) + rts + + + +CIRCLE: + ; not done yet + rts + +; ------------------------------------------------------------------------ +; BAR: Draw a filled rectangle with the corners X1/Y1, X2/Y2, where +; X1/Y1 = ptr1/ptr2 and X2/Y2 = ptr3/ptr4, using the current drawing color. +; Contrary to most other functions, the graphics kernel will sort and clip +; the co-ordinates before calling the driver; so, on entry, the following +; conditions are valid: +; X1 <= X2 +; Y1 <= Y2 +; (X1 >= 0) && (X1 < XRES) +; (X2 >= 0) && (X2 < XRES) +; (Y1 >= 0) && (Y1 < YRES) +; (Y2 >= 0) && (Y2 < YRES) +; +; Must set an error code: NO +; + +BAR: + ; not done yet + rts + +; ------------------------------------------------------------------------ +; TEXTSTYLE: Set the style used when calling OUTTEXT. Text scaling in the x +; and y directions is passed in X/Y, the text direction is passed in A. +; +; Must set an error code: NO +; + +TEXTSTYLE: + rts + + +; ------------------------------------------------------------------------ +; OUTTEXT: Output text at x/y = ptr1/ptr2, using the current color and the +; current text style. The text to output is given as a zero-terminated +; string with its address in ptr3. +; +; Must set an error code: NO +; + +OUTTEXT: + ; put hires cursor in X & Y + lda #$00 + jsr SETPIXELSETMODE + + + ; count the length of the string + ldy #$00 +loop: + lda (ptr3),y + beq out + iny + bne loop +out: + ; XSCHAR routine from telemon needs to have the length of the string in X register + ; copy Y register to X register. It could be optimized in 65C02 with TYX + tya + tax + + lda ptr3 ; XSCHAR needs in A and Y the address of the string + ldy ptr3+1 + BRK_TELEMON(XSCHAR) + rts diff --git a/libsrc/telestrat/tgi/telestrat-240-200-2.s b/libsrc/telestrat/tgi/telestrat-240-200-2.s new file mode 100644 index 000000000..d619fc6f1 --- /dev/null +++ b/libsrc/telestrat/tgi/telestrat-240-200-2.s @@ -0,0 +1,378 @@ +; +; Graphics driver for the 240x200x2 monochrome mode on the Atmos +; +; Jede (jede@oric.org), 2017-10-15 + + + .include "zeropage.inc" + + .include "tgi-kernel.inc" + .include "tgi-error.inc" + .include "telestrat.inc" + + .macpack generic + .macpack module + +XSIZE = 6 ; System font width +YSIZE = 8 ; System font height + +; ------------------------------------------------------------------------ +; Header. Includes jump table and constants. + + module_header _telestrat_240_200_2_tgi + +; First part of the header is a structure that has a magic and defines the +; capabilities of the driver + + .byte $74, $67, $69 ; "tgi" + .byte TGI_API_VERSION ; TGI API version number + .addr $0000 ; Library reference + .word 240 ; X resolution + .word 200 ; Y resolution + .byte 2 ; Number of drawing colors + .byte 1 ; Number of screens available + .byte XSIZE ; System font X size + .byte YSIZE ; System font Y size + .word $011C ; Aspect ratio (based on 4/3 display) + .byte 0 ; TGI driver flags + +; Next comes the jump table. Currently all entries must be valid and may point +; to an RTS for test versions (function not implemented). + + .addr INSTALL + .addr UNINSTALL + .addr INIT + .addr DONE + .addr GETERROR + .addr CONTROL + .addr CLEAR + .addr SETVIEWPAGE + .addr SETDRAWPAGE + .addr SETCOLOR + .addr SETPALETTE + .addr GETPALETTE + .addr GETDEFPALETTE + .addr SETPIXEL + .addr GETPIXEL + .addr LINE + .addr BAR + .addr TEXTSTYLE + .addr OUTTEXT + +; ------------------------------------------------------------------------ +; Data. + +; Variables mapped to the zero page segment variables. Some of these are +; used for passing parameters to the driver. + +X1 := ptr1 +Y1 := ptr2 +X2 := ptr3 +Y2 := ptr4 + +; Absolute variables used in the code + +.bss + +ERROR: .res 1 ; Error code +MODE: .res 1 ; Graphics mode + +; Constant table + +.rodata + +DEFPALETTE: .byte 0, 1 + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. May +; initialize anything that has to be done just once. Is probably empty +; most of the time. +; +; Must set an error code: NO +; + +INSTALL: + +; ------------------------------------------------------------------------ +; UNINSTALL routine. Is called before the driver is removed from memory. May +; clean up anything done by INSTALL but is probably empty most of the time. +; +; Must set an error code: NO +; + +UNINSTALL: + rts + +; ------------------------------------------------------------------------ +; INIT: Changes an already installed device from text mode to graphics +; mode. +; Note that INIT/DONE may be called multiple times while the driver +; is loaded, while INSTALL is only called once, so any code that is needed +; to initializes variables and so on must go here. Setting palette and +; clearing the screen is not needed because this is called by the graphics +; kernel later. +; The graphics kernel will never call INIT when a graphics mode is already +; active, so there is no need to protect against that. +; +; Must set an error code: YES +; + +INIT: + +; Switch into graphics mode + + BRK_TELEMON(XHIRES) + +; Done, reset the error code + + lda #TGI_ERR_OK + sta ERROR + rts + +; ------------------------------------------------------------------------ +; DONE: Will be called to switch the graphics device back into text mode. +; The graphics kernel will never call DONE when no graphics mode is active, +; so there is no need to protect against that. +; +; Must set an error code: NO +; + +DONE: + BRK_TELEMON(XTEXT) + rts + +; ------------------------------------------------------------------------ +; GETERROR: Return the error code in A and clear it. + +GETERROR: + ldx #TGI_ERR_OK + lda ERROR + stx ERROR + rts + +; ------------------------------------------------------------------------ +; CONTROL: Platform/driver specific entry point. +; +; Must set an error code: YES +; + +CONTROL: + ; not done yet + rts + +; ------------------------------------------------------------------------ +; CLEAR: Clears the screen. +; +; Must set an error code: NO +; + +CLEAR: + BRK_TELEMON(XEFFHI) + rts + +; ------------------------------------------------------------------------ +; SETVIEWPAGE: Set the visible page. Called with the new page in A (0..n). +; The page number is already checked to be valid by the graphics kernel. +; +; Must set an error code: NO (will only be called if page ok) +; + +SETVIEWPAGE: + +; ------------------------------------------------------------------------ +; SETDRAWPAGE: Set the drawable page. Called with the new page in A (0..n). +; The page number is already checked to be valid by the graphics kernel. +; +; Must set an error code: NO (will only be called if page ok) +; + +SETDRAWPAGE: + rts + +; ------------------------------------------------------------------------ +; SETCOLOR: Set the drawing color (in A). The new color is already checked +; to be in a valid range (0..maxcolor-1). +; +; Must set an error code: NO (will only be called if color ok) +; + +SETCOLOR: + ;not done yet + rts + +; ------------------------------------------------------------------------ +; SETPALETTE: Set the palette (not available with all drivers/hardware). +; A pointer to the palette is passed in ptr1. Must set an error if palettes +; are not supported +; +; Must set an error code: YES +; + +SETPALETTE: + lda #TGI_ERR_INV_FUNC ; This resolution has no palette + sta ERROR + rts + +; ------------------------------------------------------------------------ +; GETPALETTE: Return the current palette in A/X. Even drivers that cannot +; set the palette should return the default palette here, so there's no +; way for this function to fail. +; +; Must set an error code: NO +; + +GETPALETTE: + +; ------------------------------------------------------------------------ +; GETDEFPALETTE: Return the default palette for the driver in A/X. All +; drivers should return something reasonable here, even drivers that don't +; support palettes, otherwise the caller has no way to determine the colors +; of the (not changeable) palette. +; +; Must set an error code: NO (all drivers must have a default palette) +; + +GETDEFPALETTE: + ; not done yet + rts + +; ------------------------------------------------------------------------ +; SETPIXEL: Draw one pixel at X1/Y1 = ptr1/ptr2 with the current drawing +; color. The coordinates passed to this function are never outside the +; visible screen area, so there is no need for clipping inside this function. +; +; Must set an error code: NO +; + +SETPIXEL: + lda #$80 ; curset on +SETPIXELSETMODE: + sta HRSFB + + lda X1 + sta HRS1 + lda Y1 + sta HRS2 + + + + BRK_TELEMON(XCURSE) + + rts + +; ------------------------------------------------------------------------ +; GETPIXEL: Read the color value of a pixel and return it in A/X. The +; coordinates passed to this function are never outside the visible screen +; area, so there is no need for clipping inside this function. + +GETPIXEL: + ; not done yet + rts + +; ------------------------------------------------------------------------ +; LINE: Draw a line from X1/Y1 to X2/Y2, where X1/Y1 = ptr1/ptr2 and +; X2/Y2 = ptr3/ptr4 using the current drawing color. +; +; Must set an error code: NO +; + +LINE: + + lda X1 + sta HRS1 + lda Y1 + sta HRS2 + + lda X2 + sta HRS3 + lda Y2 + sta HRS4 + + + lda X1+1 + sta HRS1+1 + + lda Y1+1 + sta HRS2+1 + + lda X2+1 + sta HRS3+1 + + lda Y2+1 + sta HRS4+1 + + lda #$FF + sta HRSPAT + + BRK_TELEMON(XDRAWA) + + rts + +CIRCLE: + ; not done yet + rts + +; ------------------------------------------------------------------------ +; BAR: Draw a filled rectangle with the corners X1/Y1, X2/Y2, where +; X1/Y1 = ptr1/ptr2 and X2/Y2 = ptr3/ptr4 using the current drawing color. +; Contrary to most other functions, the graphics kernel will sort and clip +; the coordinates before calling the driver, so on entry the following +; conditions are valid: +; X1 <= X2 +; Y1 <= Y2 +; (X1 >= 0) && (X1 < XRES) +; (X2 >= 0) && (X2 < XRES) +; (Y1 >= 0) && (Y1 < YRES) +; (Y2 >= 0) && (Y2 < YRES) +; +; Must set an error code: NO +; + +BAR: + ; not done yet + rts + +; ------------------------------------------------------------------------ +; TEXTSTYLE: Set the style used when calling OUTTEXT. Text scaling in X and Y +; direction is passend in X/Y, the text direction is passed in A. +; +; Must set an error code: NO +; + +TEXTSTYLE: + rts + + +; ------------------------------------------------------------------------ +; OUTTEXT: Output text at X/Y = ptr1/ptr2 using the current color and the +; current text style. The text to output is given as a zero terminated +; string with address in ptr3. +; +; Must set an error code: NO +; + +OUTTEXT: + ; put hires cursor in X & Y + lda #$00 + jsr SETPIXELSETMODE + + + ; count the length of the string + ldy #$00 +loop: + lda (ptr3),y + beq out + iny + bne loop +out: + ; XSCHAR routine from telemon needs to have the length of the string in X register + ; copy Y register to X register. It could be optimized in 65C02 with TYX + tya + tax + + lda ptr3 ; XSCHAR needs in A and Y the address of the string + ldy ptr3+1 + BRK_TELEMON(XSCHAR) + rts diff --git a/libsrc/telestrat/tgi_stat_stddrv.s b/libsrc/telestrat/tgi_stat_stddrv.s new file mode 100644 index 000000000..2b0d96761 --- /dev/null +++ b/libsrc/telestrat/tgi_stat_stddrv.s @@ -0,0 +1,14 @@ +; +; Address of the static standard tgi driver +; +; Jede (jede@oric.org), 2017-10-15 +; +; const void tgi_static_stddrv[]; +; + + .export _tgi_static_stddrv + .import _telestrat_240_200_2_tgi + +.rodata + +_tgi_static_stddrv := _telestrat_240_200_2_tgi diff --git a/libsrc/telestrat/tgi_stddrv.s b/libsrc/telestrat/tgi_stddrv.s new file mode 100644 index 000000000..959fa457e --- /dev/null +++ b/libsrc/telestrat/tgi_stddrv.s @@ -0,0 +1,13 @@ +; +; Name of the standard TGI driver +; +; 2022-02-02, Greg King +; +; const char tgi_stddrv[]; +; + + .export _tgi_stddrv + +.rodata + +_tgi_stddrv: .asciiz "telestrat-240-200-2.tgi" diff --git a/libsrc/telestrat/wherex.s b/libsrc/telestrat/wherex.s new file mode 100644 index 000000000..8616003c8 --- /dev/null +++ b/libsrc/telestrat/wherex.s @@ -0,0 +1,14 @@ +; +; jede jede@oric.org 2017-02-25 +; + .export _wherex + + .importzp sp + + .include "telestrat.inc" + +.proc _wherex + ldx #$00 + lda SCRX + rts +.endproc diff --git a/libsrc/telestrat/wherey.s b/libsrc/telestrat/wherey.s new file mode 100644 index 000000000..c05b5f5c8 --- /dev/null +++ b/libsrc/telestrat/wherey.s @@ -0,0 +1,12 @@ +; +; jede jede@oric.org 2017-02-25 +; + .export _wherey + + .include "telestrat.inc" + +.proc _wherey + ldx #$00 + lda SCRY + rts +.endproc diff --git a/libsrc/telestrat/write.s b/libsrc/telestrat/write.s new file mode 100644 index 000000000..2ce2657ac --- /dev/null +++ b/libsrc/telestrat/write.s @@ -0,0 +1,87 @@ +; +; jede jede@oric.org 2017-01-22 + + .export _write + .import popax, popptr1 + + .include "zeropage.inc" + .include "telestrat.inc" + +; int write (int fd, const void* buf, int count); +.proc _write + + sta ptr3 + stx ptr3+1 ; save count as result + + inx + stx ptr2+1 + tax + inx + stx ptr2 ; save count with each byte incremented separately + + jsr popptr1 ; get buf + + jsr popax ; get fd + + sta tmp1 ; save fd + + ; if fd=0001 then it stdout + cpx #0 + beq next + jmp L1 +next: + cmp #1 + beq L1 + + ; here it's a file opened + lda ptr1 + sta PTR_READ_DEST + lda ptr1+1 + sta PTR_READ_DEST+1 + lda ptr3 + ldy ptr3+1 + ldx tmp1 ; send fd in X + BRK_TELEMON XFWRITE + ; compute nb of bytes written + + + lda PTR_READ_DEST+1 + sec + sbc ptr1+1 + tax + lda PTR_READ_DEST + sec + sbc ptr1 + rts + + +L1: dec ptr2 + bne L2 + dec ptr2+1 + beq L9 +L2: ldy #0 + lda (ptr1),y + tax + cpx #$0A ; check for \n + bne L3 + BRK_TELEMON XWR0 ; macro send char to screen (channel 0 in telemon terms) + lda #$0D ; return to the beggining of the line + BRK_TELEMON XWR0 ; macro + + + ldx #$0D +L3: + BRK_TELEMON XWR0 ; macro + + inc ptr1 + bne L1 + inc ptr1+1 + jmp L1 + + ; no error, return count + +L9: lda ptr3 + ldx ptr3+1 + rts + +.endproc diff --git a/libsrc/tgi/tgi-kernel.s b/libsrc/tgi/tgi-kernel.s index ed65760af..cbd655279 100644 --- a/libsrc/tgi/tgi-kernel.s +++ b/libsrc/tgi/tgi-kernel.s @@ -6,7 +6,6 @@ .import tgi_libref .importzp ptr1 - .interruptor tgi_irq ; Export as IRQ handler .include "tgi-kernel.inc" .include "tgi-error.inc" @@ -81,7 +80,6 @@ tgi_line: jmp $0000 tgi_bar: jmp $0000 tgi_textstyle: jmp $0000 tgi_outtext: jmp $0000 -tgi_irq: .byte $60, $00, $00 ; RTS plus two dummy bytes ; Driver header signature .rodata @@ -90,7 +88,7 @@ tgi_sig: .byte $74, $67, $69, TGI_API_VERSION ; "tgi", version .code ;---------------------------------------------------------------------------- -; void __fastcall__ tgi_install (void* driver); +; void __fastcall__ tgi_install (const void* driver); ; /* Install an already loaded driver. */ @@ -144,20 +142,13 @@ _tgi_install: dex bpl @L3 -; Install the IRQ vector if the driver needs it. - - lda tgi_irq+2 ; Check high byte of IRQ vector - beq @L4 ; Jump if vector invalid - lda #$4C ; Jump opcode - sta tgi_irq ; Activate IRQ routine - ; Initialize some other variables lda #$00 -@L4: ldx #csize-1 -@L5: sta cstart,x ; Clear error/mode/curx/cury/... + ldx #csize-1 +@L4: sta cstart,x ; Clear error/mode/curx/cury/... dex - bpl @L5 + bpl @L4 rts @@ -206,9 +197,6 @@ _tgi_uninstall: jsr tgi_uninstall ; Allow the driver to clean up - lda #$60 ; RTS opcode - sta tgi_irq ; Disable IRQ entry point - ; Clear driver pointer and error code tgi_clear_ptr: diff --git a/libsrc/tgi/tgi_arc.c b/libsrc/tgi/tgi_arc.c index e505b7b69..c0baabbde 100644 --- a/libsrc/tgi/tgi_arc.c +++ b/libsrc/tgi/tgi_arc.c @@ -70,16 +70,16 @@ void __fastcall__ tgi_arc (int x, int y, unsigned char rx, unsigned char ry, } /* Calculate the start coords */ - x1 = x + tgi_imulround (rx, cc65_cos (sa)); - y1 = y - tgi_imulround (ry, cc65_sin (sa)); + x1 = x + tgi_imulround (rx, _cos (sa)); + y1 = y - tgi_imulround (ry, _sin (sa)); do { sa += inc; if (sa >= ea) { sa = ea; done = 1; } - x2 = x + tgi_imulround (rx, cc65_cos (sa)); - y2 = y - tgi_imulround (ry, cc65_sin (sa)); + x2 = x + tgi_imulround (rx, _cos (sa)); + y2 = y - tgi_imulround (ry, _sin (sa)); tgi_line (x1, y1, x2, y2); x1 = x2; y1 = y2; diff --git a/libsrc/tgi/tgi_bar.s b/libsrc/tgi/tgi_bar.s index 476f9d7a4..0e424c1f0 100644 --- a/libsrc/tgi/tgi_bar.s +++ b/libsrc/tgi/tgi_bar.s @@ -8,7 +8,7 @@ .include "tgi-kernel.inc" .importzp ptr1, ptr2, ptr3, ptr4 - .import popax + .import popax, popptr1 .proc _tgi_bar @@ -24,9 +24,7 @@ sta ptr2 ; Y1 stx ptr2+1 - jsr popax - sta ptr1 ; X1 - stx ptr1+1 + jsr popptr1 ; X1 ; Make sure X1 is less than X2. Swap both if not. diff --git a/libsrc/tgi/tgi_clippedline.s b/libsrc/tgi/tgi_clippedline.s index b32b819ec..b0f1dd456 100644 --- a/libsrc/tgi/tgi_clippedline.s +++ b/libsrc/tgi/tgi_clippedline.s @@ -159,7 +159,7 @@ tgi_clip_sign: .res 1 ;---------------------------------------------------------------------------- -; Multiplicate value in y/a by dy, then divide by dx. +; Multiply value in y/a by dy, then divide by dx. ; .code @@ -176,7 +176,7 @@ tgi_clip_sign: .res 1 lda tgi_clip_dy ldx tgi_clip_dy+1 ; rhs - jsr umul16x16r32 ; Multiplicate + jsr umul16x16r32 ; Multiply ; Move the result of the multiplication into ptr1:ptr2 @@ -199,7 +199,7 @@ done: bit tmp1 ;---------------------------------------------------------------------------- -; Multiplicate value in y/a by dx, then divide by dy. +; Multiply value in y/a by dx, then divide by dy. ; .code @@ -216,7 +216,7 @@ done: bit tmp1 lda tgi_clip_dx ldx tgi_clip_dx+1 ; rhs - jsr umul16x16r32 ; Multiplicate + jsr umul16x16r32 ; Multiply ; Move the result of the multiplication into ptr1:ptr2 diff --git a/libsrc/tgi/tgi_getset.s b/libsrc/tgi/tgi_getset.s index aded19d71..152470503 100644 --- a/libsrc/tgi/tgi_getset.s +++ b/libsrc/tgi/tgi_getset.s @@ -1,8 +1,9 @@ ; -; Ullrich von Bassewitz, 22.06.2002 +; 2002-06-22, Ullrich von Bassewitz +; 2018-07-27, Greg King ; -; Helper function for getpixel/setpixel. Load X/Y from stack and check if -; the coordinates are valid. Return carry clear if so. +; Helper function for getpixel/setpixel. Load X/Y from arguments; +; and, check if the co-ordinates are valid. Return carry clear if so. ; .include "tgi-kernel.inc" @@ -15,13 +16,14 @@ jsr tgi_popxy ; Pop X/Y into ptr1/ptr2 -; Are the coordinates out of range? First check if any coord is negative. +; Are the co-ordinates out of range? First, check if any coord is negative. - txa - ora ptr2+1 + txa ; (.X = ptr2+1 from tgi_popxy) + ora ptr1+1 + sec ; Return carry set if number is negative bmi @L9 ; Bail out if negative -; Check if X is larger than the maximum x coord. If so, bail out +; Check if X is larger than the maximum x coord. If so, bail out. lda ptr1 cmp _tgi_xres @@ -38,4 +40,3 @@ @L9: rts .endproc - diff --git a/libsrc/tgi/tgi_gettextheight.s b/libsrc/tgi/tgi_gettextheight.s index 38df6a69a..bd05386c1 100644 --- a/libsrc/tgi/tgi_gettextheight.s +++ b/libsrc/tgi/tgi_gettextheight.s @@ -15,7 +15,7 @@ ; */ ; -.proc _tgi_gettextheight +.proc _tgi_gettextheight ldy _tgi_font bne @L2 ; Jump if vector font diff --git a/libsrc/tgi/tgi_imulround.s b/libsrc/tgi/tgi_imulround.s index 238c69fc8..7b7f25b78 100644 --- a/libsrc/tgi/tgi_imulround.s +++ b/libsrc/tgi/tgi_imulround.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 2009-11-05 ; -; Helper function for graphics functions: Multiply two values, one being +; Helper function for graphics functions: Multiply two values, one being ; an 8.8 fixed point one, and return the rounded and scaled result. ; ; The module has two entry points: One is C callable and expects the @@ -33,7 +33,7 @@ _tgi_imulround: ; ASM callable entry point tgi_imulround: -; Multiplicate +; Multiply jsr imul16x16r32 @@ -60,4 +60,4 @@ tgi_imulround: tya rts - + diff --git a/libsrc/tgi/tgi_lineto.s b/libsrc/tgi/tgi_lineto.s index abe4b3f96..6934bfe2c 100644 --- a/libsrc/tgi/tgi_lineto.s +++ b/libsrc/tgi/tgi_lineto.s @@ -17,7 +17,7 @@ @L1: lda _tgi_curx,y sta tgi_clip_x1,y dey - bpl @L1 + bpl @L1 pla jsr tgi_linepop ; Pop x2/y2 jmp tgi_clippedline ; Call the line clipper diff --git a/libsrc/tgi/tgi_outtext.s b/libsrc/tgi/tgi_outtext.s index 079cea3af..e0a3c6d25 100644 --- a/libsrc/tgi/tgi_outtext.s +++ b/libsrc/tgi/tgi_outtext.s @@ -125,7 +125,7 @@ VectorFont: jsr MoveCursor ; Move the graphics cursor ; Next char in string - + inc text bne @L1 inc text+1 diff --git a/libsrc/tgi/tgi_pieslice.c b/libsrc/tgi/tgi_pieslice.c index 60d2f1d13..748d1819a 100644 --- a/libsrc/tgi/tgi_pieslice.c +++ b/libsrc/tgi/tgi_pieslice.c @@ -57,8 +57,8 @@ void __fastcall__ tgi_pieslice (int x, int y, unsigned char rx, unsigned char ry tgi_arc (x, y, rx, ry, sa, ea); /* ... and close it */ - tgi_line (x, y, x + tgi_imulround (rx, cc65_cos (sa)), y - tgi_imulround (ry, cc65_sin (sa))); - tgi_line (x, y, x + tgi_imulround (rx, cc65_cos (ea)), y - tgi_imulround (ry, cc65_sin (ea))); + tgi_line (x, y, x + tgi_imulround (rx, _cos (sa)), y - tgi_imulround (ry, _sin (sa))); + tgi_line (x, y, x + tgi_imulround (rx, _cos (ea)), y - tgi_imulround (ry, _sin (ea))); } diff --git a/libsrc/tgi/tgi_popxy.s b/libsrc/tgi/tgi_popxy.s index 55b259dab..2d9ac5d05 100644 --- a/libsrc/tgi/tgi_popxy.s +++ b/libsrc/tgi/tgi_popxy.s @@ -1,22 +1,19 @@ ; -; Ullrich von Bassewitz, 02.10.2002 +; 2002-10-02, Ullrich von Bassewitz +; 2018-05-20, Christian Kruger ; -; Helper function for tgi functions. Pops X/Y from stack into ptr1/ptr2 +; Helper function for TGI functions. Pops X/Y from arguments into ptr1/ptr2. ; .include "tgi-kernel.inc" - .import popax - .importzp ptr1, ptr2 + .import popptr1 + .importzp ptr2 .proc tgi_popxy sta ptr2 ; Y stx ptr2+1 - jsr popax - sta ptr1 ; X - stx ptr1+1 - rts + jmp popptr1 ; X .endproc - diff --git a/libsrc/tgi/tgi_setcolor.s b/libsrc/tgi/tgi_setcolor.s index 8e6fdc555..16f075767 100644 --- a/libsrc/tgi/tgi_setcolor.s +++ b/libsrc/tgi/tgi_setcolor.s @@ -1,5 +1,6 @@ ; -; Ullrich von Bassewitz, 21.06.2002 +; 2002-06-21, Ullrich von Bassewitz +; 2020-06-04, Greg King ; ; void __fastcall__ tgi_setcolor (unsigned char color); ; /* Set the current drawing color */ @@ -11,9 +12,11 @@ cmp _tgi_colorcount ; Compare to available colors bcs @L1 - sta _tgi_color ; Remember the drawing color +@L0: sta _tgi_color ; Remember the drawing color jmp tgi_setcolor ; Call the driver -@L1: jmp tgi_inv_arg ; Invalid argument + +@L1: ldx _tgi_colorcount + beq @L0 ; Zero means 256 colors + jmp tgi_inv_arg ; Invalid argument .endproc - diff --git a/libsrc/tgi/tgi_vectorchar.s b/libsrc/tgi/tgi_vectorchar.s index bd4cc84c4..3e5e6a3dc 100644 --- a/libsrc/tgi/tgi_vectorchar.s +++ b/libsrc/tgi/tgi_vectorchar.s @@ -79,9 +79,9 @@ GetProcessedCoord: jsr GetOp -; Multiplicate with the scale factor. +; Multiply with the scale factor. - jmp tgi_imulround ; Multiplicate, round and scale + jmp tgi_imulround ; Multiply, round and scale ;---------------------------------------------------------------------------- ; Add the base coordinate with offset in Y to the value in A/X @@ -133,7 +133,7 @@ GetProcessedCoord: .code .proc _tgi_vectorchar -; Multiplicate the char value by two and save into Y +; Multiply the char value by two and save into Y asl a tay diff --git a/libsrc/tgi/tgidrv_line.inc b/libsrc/tgi/tgidrv_line.inc index e904b5117..5fd6b229e 100644 --- a/libsrc/tgi/tgidrv_line.inc +++ b/libsrc/tgi/tgidrv_line.inc @@ -269,7 +269,7 @@ abs: ; A/Y := abs (A/Y) cpy #$00 bpl :+ - + ; A/Y := neg (A/Y) neg: clc eor #$FF diff --git a/libsrc/vic20/break.s b/libsrc/vic20/break.s index 9a5ef02e7..fc1edc727 100644 --- a/libsrc/vic20/break.s +++ b/libsrc/vic20/break.s @@ -1,7 +1,7 @@ ; ; Ullrich von Bassewitz, 27.09.1998 ; -; void set_brk (unsigned Addr); +; void __fastcall__ set_brk (unsigned Addr); ; void reset_brk (void); ; diff --git a/libsrc/vic20/c_readst.s b/libsrc/vic20/c_readst.s new file mode 100644 index 000000000..2cb11bb21 --- /dev/null +++ b/libsrc/vic20/c_readst.s @@ -0,0 +1,28 @@ +; +; 1999-06-03, Ullrich von Bassewitz +; 2021-01-12, Greg King +; +; unsigned char cbm_k_readst (void); +; +; This version works around a bug in VIC-20 Kernal's READST function. +; + + .include "vic20.inc" + .include "../cbm/cbm.inc" + + .export _cbm_k_readst + + +_cbm_k_readst: + ldx #>$0000 + lda DEVNUM + cmp #CBMDEV_RS232 + beq @L1 + + jmp READST + +; Work-around: Read the RS-232 status variable directly. + +@L1: lda RSSTAT + stx RSSTAT ; reset the status bits + rts diff --git a/libsrc/vic20/cgetc.s b/libsrc/vic20/cgetc.s index 4d3a30ea2..1a5c8d5a2 100644 --- a/libsrc/vic20/cgetc.s +++ b/libsrc/vic20/cgetc.s @@ -7,6 +7,7 @@ .export _cgetc .import cursor + .include "cbm_kernal.inc" .include "vic20.inc" _cgetc: lda KEY_COUNT ; Get number of characters @@ -40,8 +41,7 @@ L3: jsr KBDREAD ; Read char and return in A bne seton ; Go set it on lda CURS_FLAG ; Is the cursor currently off? bne crs9 ; Jump if yes - lda #1 - sta CURS_FLAG ; Mark it as off + inc CURS_FLAG ; Mark it as off lda CURS_STATE ; Cursor currently displayed? beq crs8 ; Jump if no ldy CURS_X ; Get the character column diff --git a/libsrc/vic20/clrscr.s b/libsrc/vic20/clrscr.s index 8d4994eac..a3c519cb1 100644 --- a/libsrc/vic20/clrscr.s +++ b/libsrc/vic20/clrscr.s @@ -6,9 +6,6 @@ .export _clrscr - .include "vic20.inc" + .include "cbm_kernal.inc" _clrscr = CLRSCR - - - diff --git a/libsrc/vic20/cputc.s b/libsrc/vic20/cputc.s index 7a1014c1c..a6919ceaf 100644 --- a/libsrc/vic20/cputc.s +++ b/libsrc/vic20/cputc.s @@ -1,5 +1,6 @@ ; -; Ullrich von Bassewitz, 06.08.1998 +; 1998-08-06, Ullrich von Bassewitz +; 2020-10-09, Greg King ; ; void cputcxy (unsigned char x, unsigned char y, char c); ; void cputc (char c); @@ -7,82 +8,96 @@ .export _cputcxy, _cputc, cputdirect, putchar .export newline, plot - .import popa, _gotoxy + .import gotoxy .import PLOT +.scope KERNAL + .include "cbm_kernal.inc" +.endscope + .include "vic20.inc" +; VIC-20 KERNAL routines (such as PLOT) do not always leave the color RAM +; pointer CRAM_PTR pointing at the color RAM location matching the screen +; RAM pointer SCREEN_PTR. Instead they update it when they need it to be +; correct by calling UPDCRAMPTR. +; +; We make things more efficient by having conio always update CRAM_PTR when +; we move the screen pointer to avoid extra calls to ensure it's updated +; before doing screen output. (Among other things, We replace the ROM +; version of PLOT with our own in libsrc/vic20/kplot.s to ensure this +; precondition.) +; +; However, this means that CRAM_PTR may be (and is, after a cold boot) +; incorrect for us at program startup, causing cputc() not to work. We fix +; this with a constructor that ensures CRAM_PTR matches SCREEN_PTR. +; + UPDCRAMPTR := KERNAL::UPDCRAMPTR ; .constructor doesn't understand namespaces + .constructor UPDCRAMPTR _cputcxy: pha ; Save C - jsr popa ; Get Y - jsr _gotoxy ; Set cursor, drop x + jsr gotoxy ; Set cursor, drop x and y pla ; Restore C -; Plot a character - also used as internal function +; Plot a character -- also used as an internal function -_cputc: cmp #$0A ; CR? - bne L1 - lda #0 - sta CURS_X - beq plot ; Recalculate pointers - -L1: cmp #$0D ; LF? +_cputc: cmp #$0D ; Is it CBM '\n'? beq newline ; Recalculate pointers + cmp #$0A ; Is it CBM '\r'? + beq cr -; Printable char of some sort +; Printable char. of some sort +; Convert it from PetSCII into a screen-code - cmp #' ' - bcc cputdirect ; Other control char + cmp #$FF ; BASIC token? + bne convert + lda #$DE ; Pi symbol +convert: tay - bmi L10 - cmp #$60 - bcc L2 - and #$DF - bne cputdirect ; Branch always -L2: and #$3F + lsr a ; Divide by 256/8 + lsr a + lsr a + lsr a + lsr a + tax ; .X = %00000xxx + tya + eor pet_to_screen,x cputdirect: jsr putchar ; Write the character to the screen -; Advance cursor position +; Advance the cursor position advance: iny cpy #XSIZE bne L3 - jsr newline ; new line - ldy #0 ; + cr + jsr newline ; Wrap around + +cr: ldy #$00 ; Do carriage-return L3: sty CURS_X rts + +; Move down by one full screen-line. Note: this routine doesn't scroll. +; +; (Both screen RAM and color RAM are aligned to page boundaries. +; Therefore, the lower bytes of their addresses have the same values. +; Shorten the code by taking advantage of that fact.) + newline: clc lda #XSIZE adc SCREEN_PTR sta SCREEN_PTR - bcc L4 - inc SCREEN_PTR+1 - clc -L4: lda #XSIZE - adc CRAM_PTR sta CRAM_PTR bcc L5 + inc SCREEN_PTR+1 inc CRAM_PTR+1 L5: inc CURS_Y rts -; Handle character if high bit set - -L10: and #$7F - cmp #$7E ; PI? - bne L11 - lda #$5E ; Load screen code for PI - bne cputdirect -L11: ora #$40 - bne cputdirect - - ; Set cursor position, calculate RAM pointers @@ -92,14 +107,19 @@ plot: ldy CURS_X jmp PLOT ; Set the new cursor - -; Write one character to the screen without doing anything else, return X -; position in Y +; Write one character to the screen without doing anything else, +; return the X position in .Y putchar: ora RVS ; Set revers bit ldy CURS_X - sta (SCREEN_PTR),y ; Set char + sta (SCREEN_PTR),y ; Set char. lda CHARCOLOR sta (CRAM_PTR),y ; Set color rts + + + .rodata +pet_to_screen: + .byte %10000000,%00000000,%01000000,%00100000 ; PetSCII -> screen-code + .byte %01000000,%11000000,%10000000,%10000000 diff --git a/libsrc/vic20/crt0.s b/libsrc/vic20/crt0.s index 6a0f94a03..c5486063b 100644 --- a/libsrc/vic20/crt0.s +++ b/libsrc/vic20/crt0.s @@ -8,12 +8,11 @@ .import zerobss, push0 .import callmain .import RESTOR, BSOUT, CLRCH - .import __RAM_START__, __RAM_SIZE__ ; Linker generated + .import __MAIN_START__, __MAIN_SIZE__ ; Linker generated .import __STACKSIZE__ ; Linker generated .importzp ST .include "zeropage.inc" - .include "vic20.inc" ; ------------------------------------------------------------------------ ; Startup code @@ -44,10 +43,10 @@ L1: lda sp,x tsx stx spsave ; Save the system stack ptr - lda #<(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) + lda #<(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) + ldx #>(__MAIN_START__ + __MAIN_SIZE__ + __STACKSIZE__) sta sp - lda #>(__RAM_START__ + __RAM_SIZE__ + __STACKSIZE__) - sta sp+1 ; Set argument stack ptr + stx sp+1 ; Set argument stack ptr ; Call the module constructors. @@ -86,7 +85,7 @@ L2: lda zpsave,x ; ------------------------------------------------------------------------ -.segment "INITBSS" +.segment "INIT" zpsave: .res zpspace diff --git a/libsrc/vic20/emd/vic20-georam.s b/libsrc/vic20/emd/vic20-georam.s new file mode 100644 index 000000000..a960e9a1a --- /dev/null +++ b/libsrc/vic20/emd/vic20-georam.s @@ -0,0 +1,352 @@ +; +; Extended memory driver for the GEORAM cartridge through the masC=erade +; c64 cartridge adapter. Driver works without problems when statically +; linked. +; +; Marco van den Heuvel, 2018-03-18 +; + + .include "zeropage.inc" + + .include "em-kernel.inc" + .include "em-error.inc" + + + .macpack generic + .macpack module + + +; ------------------------------------------------------------------------ +; Header. Includes jump table + + module_header _vic20_georam_emd + +; Driver signature + + .byte $65, $6d, $64 ; "emd" + .byte EMD_API_VERSION ; EM API version number + +; Library reference + + .addr $0000 + +; Jump table + + .addr INSTALL + .addr UNINSTALL + .addr PAGECOUNT + .addr MAP + .addr USE + .addr COMMIT + .addr COPYFROM + .addr COPYTO + +; ------------------------------------------------------------------------ +; Constants + +GR_WINDOW = $9800 ; Address of GEORAM window +GR_PAGE_LO = $9CFE ; Page register low +GR_PAGE_HI = $9CFF ; Page register high + +; ------------------------------------------------------------------------ +; Data. + +.data + +pagecount: .res 2 ; Number of available pages + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. If +; possible, check if the hardware is present and determine the amount of +; memory available. +; Must return an EM_ERR_xx code in a/x. +; + +INSTALL: + ldx GR_WINDOW + cpx GR_WINDOW + bne @notpresent + inc GR_WINDOW + cpx GR_WINDOW + beq @notpresent + + lda #4 + jsr check + cpy GR_WINDOW + beq @has64k + lda #8 + jsr check + cpy GR_WINDOW + beq @has128k + lda #16 + jsr check + cpy GR_WINDOW + beq @has256k + lda #32 + jsr check + cpy GR_WINDOW + beq @has512k + lda #64 + jsr check + cpy GR_WINDOW + beq @has1024k + lda #128 + jsr check + cpy GR_WINDOW + beq @has2048k + ldx #>16384 + bne @setok + +@has64k: + ldx #>256 + bne @setok +@has128k: + ldx #>512 + bne @setok +@has256k: + ldx #>1024 + bne @setok +@has512k: + ldx #>2048 + bne @setok +@has1024k: + ldx #>4096 + bne @setok +@has2048k: + ldx #>8192 + bne @setok + +@notpresent: + lda #<EM_ERR_NO_DEVICE + ldx #>EM_ERR_NO_DEVICE + rts + +@setok: + lda #0 + sta pagecount + stx pagecount+1 + lda #<EM_ERR_OK + ldx #>EM_ERR_OK + rts + +check: + ldx #0 + stx GR_PAGE_LO + stx GR_PAGE_HI + ldy GR_WINDOW + iny + sta GR_PAGE_HI + sty GR_WINDOW + ldx #0 + stx GR_PAGE_HI +; rts ; Run into UNINSTALL instead + +; ------------------------------------------------------------------------ +; UNINSTALL routine. Is called before the driver is removed from memory. +; Can do cleanup or whatever. Must not return anything. +; + +UNINSTALL: + rts + + +; ------------------------------------------------------------------------ +; PAGECOUNT: Return the total number of available pages in a/x. +; + +PAGECOUNT: + lda pagecount + ldx pagecount+1 + rts + +; ------------------------------------------------------------------------ +; USE: Tell the driver that the window is now associated with a given page. +; The GeoRAM cartridge does not copy but actually map the window, so USE is +; identical to MAP. + +USE = MAP + +; ------------------------------------------------------------------------ +; MAP: Map the page in a/x into memory and return a pointer to the page in +; a/x. The contents of the currently mapped page (if any) may be discarded +; by the driver. +; + +MAP: sta tmp1 + txa + asl tmp1 + rol a + asl tmp1 + rol a + + sta GR_PAGE_HI + lda tmp1 + lsr a + lsr a + sta GR_PAGE_LO + + lda #<GR_WINDOW + ldx #>GR_WINDOW + +; Use the RTS from COMMIT below to save a precious byte of storage + +; ------------------------------------------------------------------------ +; COMMIT: Commit changes in the memory window to extended storage. + +COMMIT: rts + +; ------------------------------------------------------------------------ +; COPYFROM: Copy from extended into linear memory. A pointer to a structure +; describing the request is passed in a/x. +; The function must not return anything. +; + +COPYFROM: + jsr setup + +; Setup is: +; +; - ptr1 contains the struct pointer +; - ptr2 contains the linear memory buffer +; - ptr3 contains -(count-1) +; - tmp1 contains the low page register value +; - tmp2 contains the high page register value +; - X contains the page offset +; - Y contains zero + + jmp @L5 + +@L1: lda GR_WINDOW,x + sta (ptr2),y + iny + bne @L2 + inc ptr2+1 +@L2: inx + beq @L4 + +; Bump count and repeat + +@L3: inc ptr3 + bne @L1 + inc ptr3+1 + bne @L1 + rts + +; Bump page register + +@L4: inc tmp1 ; Bump low page register + bit tmp1 ; Check for overflow in bit 6 + bvc @L6 ; Jump if no overflow + inc tmp2 +@L5: lda tmp2 + sta GR_PAGE_HI +@L6: lda tmp1 + sta GR_PAGE_LO + jmp @L3 + +; ------------------------------------------------------------------------ +; COPYTO: Copy from linear into extended memory. A pointer to a structure +; describing the request is passed in a/x. +; The function must not return anything. +; + +COPYTO: + jsr setup + +; Setup is: +; +; - ptr1 contains the struct pointer +; - ptr2 contains the linear memory buffer +; - ptr3 contains -(count-1) +; - tmp1 contains the low page register value +; - tmp2 contains the high page register value +; - X contains the page offset +; - Y contains zero + + jmp @L5 + +@L1: lda (ptr2),y + sta GR_WINDOW,x + iny + bne @L2 + inc ptr2+1 +@L2: inx + beq @L4 + +; Bump count and repeat + +@L3: inc ptr3 + bne @L1 + inc ptr3+1 + bne @L1 + rts + +; Bump page register + +@L4: inc tmp1 ; Bump low page register + bit tmp1 ; Check for overflow in bit 6 + bvc @L6 ; Jump if no overflow + inc tmp2 +@L5: lda tmp2 + sta GR_PAGE_HI +@L6: lda tmp1 + sta GR_PAGE_LO + jmp @L3 + +; ------------------------------------------------------------------------ +; Helper function for COPYFROM and COPYTO: Store the pointer to the request +; structure and prepare data for the copy + +setup: sta ptr1 + stx ptr1+1 ; Save passed pointer + +; Get the page number from the struct and adjust it so that it may be used +; with the hardware. That is: lower 6 bits in tmp1, high bits in tmp2. + + ldy #EM_COPY::PAGE+1 + lda (ptr1),y + sta tmp2 + dey + lda (ptr1),y + asl a + rol tmp2 + asl a + rol tmp2 + lsr a + lsr a + sta tmp1 + +; Get the buffer pointer into ptr2 + + ldy #EM_COPY::BUF + lda (ptr1),y + sta ptr2 + iny + lda (ptr1),y + sta ptr2+1 + +; Get the count, calculate -(count-1) and store it into ptr3 + + ldy #EM_COPY::COUNT + lda (ptr1),y + eor #$FF + sta ptr3 + iny + lda (ptr1),y + eor #$FF + sta ptr3+1 + +; Get the page offset into X and clear Y + + ldy #EM_COPY::OFFS + lda (ptr1),y + tax + ldy #$00 + +; Done + + rts + + diff --git a/libsrc/vic20/emd/vic20-rama.s b/libsrc/vic20/emd/vic20-rama.s new file mode 100644 index 000000000..133c3974b --- /dev/null +++ b/libsrc/vic20/emd/vic20-rama.s @@ -0,0 +1,258 @@ +; +; Extended memory driver for the VIC20 $A000-$BFFF RAM. Driver works without +; problems when statically linked. +; +; Marco van den Heuvel, 2018-03-16 +; + + .include "zeropage.inc" + + .include "em-kernel.inc" + .include "em-error.inc" + + + .macpack generic + .macpack module + + +; ------------------------------------------------------------------------ +; Header. Includes jump table + + module_header _vic20_rama_emd + +; Driver signature + + .byte $65, $6d, $64 ; "emd" + .byte EMD_API_VERSION ; EM API version number + +; Library reference + + .addr $0000 + +; Jump table + + .addr INSTALL + .addr UNINSTALL + .addr PAGECOUNT + .addr MAP + .addr USE + .addr COMMIT + .addr COPYFROM + .addr COPYTO + +; ------------------------------------------------------------------------ +; Constants + +BASE = $A000 +PAGES = ($C000 - BASE) / 256 + +; ------------------------------------------------------------------------ +; Data. + +.bss +curpage: .res 1 ; Current page number +window: .res 256 ; Memory "window" + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. If +; possible, check if the hardware is present and determine the amount of +; memory available. +; Must return an EM_ERR_xx code in a/x. +; + +INSTALL: + lda $A000 ; see what is at address $A000 + inc $A000 ; see if it can be changed + cmp $A000 ; did it stick ? + beq nomem + dec $A000 + + ldx #$FF + stx curpage ; Invalidate the current page + inx ; X = 0 + txa ; A = X = EM_ERR_OK + rts + +nomem: ldx #>EM_ERR_NO_DEVICE + lda #<EM_ERR_NO_DEVICE +; rts ; Run into UNINSTALL instead + +; ------------------------------------------------------------------------ +; UNINSTALL routine. Is called before the driver is removed from memory. +; Can do cleanup or whatever. Must not return anything. +; + +UNINSTALL: + rts + + +; ------------------------------------------------------------------------ +; PAGECOUNT: Return the total number of available pages in a/x. +; + +PAGECOUNT: + lda #<PAGES + ldx #>PAGES + rts + +; ------------------------------------------------------------------------ +; MAP: Map the page in a/x into memory and return a pointer to the page in +; a/x. The contents of the currently mapped page (if any) may be discarded +; by the driver. +; + +MAP: sta curpage ; Remember the new page + + clc + adc #>BASE + sta ptr1+1 + ldy #$00 + sty ptr1 + + lda #<window + sta ptr2 + lda #>window + sta ptr2+1 + +; Transfer one page + + jsr transfer ; Transfer one page + +; Return the memory window + + lda #<window + ldx #>window ; Return the window address + rts + +; ------------------------------------------------------------------------ +; USE: Tell the driver that the window is now associated with a given page. + +USE: sta curpage ; Remember the page + lda #<window + ldx #>window ; Return the window + rts + +; ------------------------------------------------------------------------ +; COMMIT: Commit changes in the memory window to extended storage. + +COMMIT: lda curpage ; Get the current page + bmi done ; Jump if no page mapped + + clc + adc #>BASE + sta ptr2+1 + ldy #$00 + sty ptr2 + + lda #<window + sta ptr1 + lda #>window + sta ptr1+1 + +; Transfer one page. Y must be zero on entry + +transfer: + +; Unroll the following loop + +loop: .repeat 8 + lda (ptr1),y + sta (ptr2),y + iny + .endrepeat + + bne loop + +; Done + +done: rts + +; ------------------------------------------------------------------------ +; COPYFROM: Copy from extended into linear memory. A pointer to a structure +; describing the request is passed in a/x. +; The function must not return anything. +; + +COPYFROM: + sta ptr3 + stx ptr3+1 ; Save the passed em_copy pointer + + ldy #EM_COPY::OFFS + lda (ptr3),y + sta ptr1 + ldy #EM_COPY::PAGE + lda (ptr3),y + clc + adc #>BASE + sta ptr1+1 ; From + + ldy #EM_COPY::BUF + lda (ptr3),y + sta ptr2 + iny + lda (ptr3),y + sta ptr2+1 ; To + +common: ldy #EM_COPY::COUNT+1 + lda (ptr3),y ; Get number of pages + beq @L2 ; Skip if no full pages + sta tmp1 + +; Copy full pages allowing interrupts after each page copied + + ldy #$00 +@L1: jsr transfer + inc ptr1+1 + inc ptr2+1 + dec tmp1 + bne @L1 + +; Copy the remainder of the page + +@L2: ldy #EM_COPY::COUNT + lda (ptr3),y ; Get bytes in last page + beq @L4 + tax + +; Transfer the bytes in the last page + + ldy #$00 +@L3: lda (ptr1),y + sta (ptr2),y + iny + dex + bne @L3 + +; Done + +@L4: rts + +; ------------------------------------------------------------------------ +; COPYTO: Copy from linear into extended memory. A pointer to a structure +; describing the request is passed in a/x. +; The function must not return anything. +; + +COPYTO: sta ptr3 + stx ptr3+1 ; Save the passed em_copy pointer + + ldy #EM_COPY::OFFS + lda (ptr3),y + sta ptr2 + ldy #EM_COPY::PAGE + lda (ptr3),y + clc + adc #>BASE + sta ptr2+1 ; To + + ldy #EM_COPY::BUF + lda (ptr3),y + sta ptr1 + iny + lda (ptr3),y + sta ptr1+1 ; From + + jmp common + diff --git a/libsrc/vic20/get_tv.s b/libsrc/vic20/get_tv.s index 7182c0df7..9194a2c55 100644 --- a/libsrc/vic20/get_tv.s +++ b/libsrc/vic20/get_tv.s @@ -1,12 +1,11 @@ ; -; Stefan Haubenthal, 2004-10-07 -; Based on code from Pu-239 +; Stefan Haubenthal, 2018-04-10 +; Based on code by Mike ; ; unsigned char get_tv (void); ; /* Return the video mode the machine is using */ ; - .include "vic20.inc" .include "get_tv.inc" ;-------------------------------------------------------------------------- @@ -14,18 +13,13 @@ .proc _get_tv -NTSC_LINES = 261 ; detect the system lda #TV::NTSC tax -@L0: ldy VIC_HLINE - cpy #1 - bne @L0 ; wait for line 1 -@L1: ldy VIC_HLINE - beq @L2 ; line 0 reached -> NTSC - cpy #NTSC_LINES/2+2 - bne @L1 + ldy $EDE4 ; VIC init table + cpy #5 + beq @L0 lda #TV::PAL -@L2: rts ; system detected: 0 for NTSC, 1 for PAL +@L0: rts ; system detected: 0 for NTSC, 1 for PAL .endproc diff --git a/libsrc/vic20/irq.s b/libsrc/vic20/irq.s index ca47347f8..4c7c832ac 100644 --- a/libsrc/vic20/irq.s +++ b/libsrc/vic20/irq.s @@ -9,7 +9,7 @@ ; ------------------------------------------------------------------------ -.segment "INIT" +.segment "ONCE" initirq: lda IRQVec diff --git a/libsrc/vic20/joy/vic20-ptvjoy.s b/libsrc/vic20/joy/vic20-ptvjoy.s index cdd4c274f..496653e9d 100644 --- a/libsrc/vic20/joy/vic20-ptvjoy.s +++ b/libsrc/vic20/joy/vic20-ptvjoy.s @@ -30,29 +30,16 @@ .addr $0000 -; Button state masks (8 values) - - .byte $01 ; JOY_UP - .byte $02 ; JOY_DOWN - .byte $04 ; JOY_LEFT - .byte $08 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $00 ; JOY_FIRE2 unavailable - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants -VIA1_PRB := VIA1 ; User port register JOY_COUNT = 3 ; Number of joysticks we support @@ -103,20 +90,31 @@ joy1: lda #$7F ; mask for VIA2 JOYBIT: sw3 ldy VIA2_DDRB ; remember the date of DDRB sta VIA2_DDRB ; set JOYBITS on this VIA for input - lda VIA2_JOY ; read JOYBIT: sw3 + lda VIA2_PB ; read JOYBIT: sw3 sty VIA2_DDRB ; restore the state of DDRB asl ; Shift sw3 into carry ldy VIA1_DDRA ; remember the state of DDRA stx VIA1_DDRA ; set JOYBITS on this VIA for input - lda VIA1_JOY ; read JOYBITS: sw0,sw1,sw2,sw4 + lda VIA1_PA1 ; read JOYBITS: sw0,sw1,sw2,sw4 sty VIA1_DDRA ; restore the state of DDRA cli ; necessary? - ror ; Shift sw3 into bit 7 - and #$9E ; Mask relevant bits - eor #$9E ; Active states are inverted + php ; Save sw3 in carry + lsr ; Shift sw0,sw1,sw2,sw4 into bits 1-4 + tax ; Save sw0,sw1,sw2 + and #$10 ; Extract sw4 in bit 4 + sta tmp1 ; Save sw4 in bit 4 + txa ; Restore sw0,sw1,sw2 + lsr ; Shift sw0,sw1,sw2 into bits 0-2 + and #$07 ; Mask bits 0-2 + plp ; Restore sw3 in carry + bcc @L0 ; Is sw3 set? + ora #$08 ; Yes: Add sw3 in bit 3 +@L0: ora tmp1 ; Add sw4 in bit 4 + eor #$1F ; Active states are inverted + ldx #0 rts ; Read joystick 2 @@ -128,28 +126,27 @@ joy2: lda #%10000000 ; via port B Data-Direction bne joy3 lda #$80 ; via port B read/write - sta VIA1_PRB ; (output one at PB7) + sta VIA1_PB ; (output one at PB7) - lda VIA1_PRB ; via port B read/write - and #$1f ; get bit 4-0 (PB4-PB0) - eor #$1f + lda VIA1_PB ; via port B read/write + and #$1F ; get bit 4-0 (PB4-PB0) + eor #$1F rts ; Read joystick 3 joy3: lda #$00 ; via port B read/write - sta VIA1_PRB ; (output zero at PB7) + sta VIA1_PB ; (output zero at PB7) - lda VIA1_PRB ; via port B read/write - and #$0f ; get bit 3-0 (PB3-PB0) + lda VIA1_PB ; via port B read/write + and #$0F ; get bit 3-0 (PB3-PB0) sta tmp1 ; joy 4 directions - lda VIA1_PRB ; via port B read/write + lda VIA1_PB ; via port B read/write and #%00100000 ; get bit 5 (PB5) lsr ora tmp1 - eor #$1f + eor #$1F ldx #0 rts - diff --git a/libsrc/vic20/joy/vic20-stdjoy.s b/libsrc/vic20/joy/vic20-stdjoy.s index 56fb35ae4..ee8dc93d7 100644 --- a/libsrc/vic20/joy/vic20-stdjoy.s +++ b/libsrc/vic20/joy/vic20-stdjoy.s @@ -30,24 +30,12 @@ .addr $0000 -; Button state masks (8 values) - - .byte $02 ; JOY_UP - .byte $04 ; JOY_DOWN - .byte $08 ; JOY_LEFT - .byte $80 ; JOY_RIGHT - .byte $10 ; JOY_FIRE - .byte $00 ; JOY_FIRE2 unavailable - .byte $00 ; Future expansion - .byte $00 ; Future expansion - ; Jump table. .addr INSTALL .addr UNINSTALL .addr COUNT .addr READ - .addr 0 ; IRQ entry unused ; ------------------------------------------------------------------------ ; Constants @@ -102,20 +90,29 @@ READ: lda #$7F ; mask for VIA2 JOYBIT: sw3 ldy VIA2_DDRB ; remember the date of DDRB sta VIA2_DDRB ; set JOYBITS on this VIA for input - lda VIA2_JOY ; read JOYBIT: sw3 + lda VIA2_PB ; read JOYBIT: sw3 sty VIA2_DDRB ; restore the state of DDRB asl ; Shift sw3 into carry ldy VIA1_DDRA ; remember the state of DDRA stx VIA1_DDRA ; set JOYBITS on this VIA for input - lda VIA1_JOY ; read JOYBITS: sw0,sw1,sw2,sw4 + lda VIA1_PA1 ; read JOYBITS: sw0,sw1,sw2,sw4 sty VIA1_DDRA ; restore the state of DDRA cli ; necessary? - ror ; Shift sw3 into bit 7 - and #$9E ; Mask relevant bits - eor #$9E ; Active states are inverted + php ; Save sw3 in carry + lsr ; Shift sw0,sw1,sw2,sw4 into bits 1-4 + tax ; Save sw0,sw1,sw2 + and #$10 ; Extract sw4 in bit 4 + sta tmp1 ; Save sw4 in bit 4 + txa ; Restore sw0,sw1,sw2 + lsr ; Shift sw0,sw1,sw2 into bits 0-2 + and #$07 ; Mask bits 0-2 + plp ; Restore sw3 in carry + bcc @L0 ; Is sw3 set? + ora #$08 ; Yes: Add sw3 in bit 3 +@L0: ora tmp1 ; Add sw4 in bit 4 + eor #$1F ; Active states are inverted + ldx #0 rts - - diff --git a/libsrc/vic20/kbrepeat.s b/libsrc/vic20/kbrepeat.s new file mode 100644 index 000000000..dce4949fb --- /dev/null +++ b/libsrc/vic20/kbrepeat.s @@ -0,0 +1,14 @@ +; +; unsigned char __fastcall__ kbrepeat (unsigned char mode); +; + + .export _kbrepeat + + .include "vic20.inc" + +_kbrepeat: + ldx KBDREPEAT ; get old value + sta KBDREPEAT ; store new value + txa ; return old value + ldx #0 + rts diff --git a/libsrc/vic20/kernal.s b/libsrc/vic20/kernal.s index 35bedb466..7c54b205f 100644 --- a/libsrc/vic20/kernal.s +++ b/libsrc/vic20/kernal.s @@ -1,9 +1,14 @@ ; ; Ullrich von Bassewitz, 19.11.2002 ; -; VIC20 kernal functions +; VIC20 Kernal functions ; + .include "cbm_kernal.inc" + + .export CLRSCR + .export KBDREAD + .export CINT .export IOINIT .export RAMTAS @@ -31,7 +36,9 @@ .export CKOUT .export CLRCH .export BASIN + .export CHRIN .export BSOUT + .export CHROUT .export LOAD .export SAVE .export SETTIM @@ -42,47 +49,3 @@ .export UDTIM .export SCREEN .export IOBASE - - -;----------------------------------------------------------------------------- -; All functions are available in the kernal jump table - -CINT = $FF81 -IOINIT = $FF84 -RAMTAS = $FF87 -RESTOR = $FF8A -VECTOR = $FF8D -SETMSG = $FF90 -SECOND = $FF93 -TKSA = $FF96 -MEMTOP = $FF99 -MEMBOT = $FF9C -SCNKEY = $FF9F -SETTMO = $FFA2 -ACPTR = $FFA5 -CIOUT = $FFA8 -UNTLK = $FFAB -UNLSN = $FFAE -LISTEN = $FFB1 -TALK = $FFB4 -READST = $FFB7 -SETLFS = $FFBA -SETNAM = $FFBD -OPEN = $FFC0 -CLOSE = $FFC3 -CHKIN = $FFC6 -CKOUT = $FFC9 -CLRCH = $FFCC -BASIN = $FFCF -BSOUT = $FFD2 -LOAD = $FFD5 -SAVE = $FFD8 -SETTIM = $FFDB -RDTIM = $FFDE -STOP = $FFE1 -GETIN = $FFE4 -CLALL = $FFE7 -UDTIM = $FFEA -SCREEN = $FFED -IOBASE = $FFF3 - diff --git a/libsrc/vic20/kplot.s b/libsrc/vic20/kplot.s index 2f4de2754..1a943d374 100644 --- a/libsrc/vic20/kplot.s +++ b/libsrc/vic20/kplot.s @@ -7,15 +7,16 @@ .export PLOT +.scope KERNAL + .include "cbm_kernal.inc" +.endscope .proc PLOT - bcs @L1 - jsr $FFF0 ; Set cursor position - jmp $EAB2 ; Set pointer to color RAM + bcs @L1 + jsr KERNAL::PLOT ; Set cursor position using original ROM PLOT + jmp KERNAL::UPDCRAMPTR ; Set pointer to color RAM to match new cursor position -@L1: jmp $FFF0 ; Get cursor position +@L1: jmp KERNAL::PLOT ; Get cursor position .endproc - - diff --git a/libsrc/vic20/libref.s b/libsrc/vic20/libref.s index e4afa7eb1..333a66894 100644 --- a/libsrc/vic20/libref.s +++ b/libsrc/vic20/libref.s @@ -1,8 +1,14 @@ ; -; Oliver Schmidt, 2013-05-31 +; 2013-05-31, Oliver Schmidt +; 2018-03-11, Sven Michael Klose ; + .export em_libref .export joy_libref + .export tgi_libref + .import _exit +em_libref := _exit joy_libref := _exit +tgi_libref := _exit diff --git a/libsrc/vic20/mainargs.s b/libsrc/vic20/mainargs.s index a41a1c495..84e256615 100644 --- a/libsrc/vic20/mainargs.s +++ b/libsrc/vic20/mainargs.s @@ -32,10 +32,10 @@ MAXARGS = 10 ; Maximum number of arguments allowed REM = $8f ; BASIC token-code NAME_LEN = 16 ; Maximum length of command-name -; Get possible command-line arguments. Goes into the special INIT segment, +; Get possible command-line arguments. Goes into the special ONCE segment, ; which may be reused after the startup code is run -.segment "INIT" +.segment "ONCE" initmainargs: @@ -102,7 +102,7 @@ argloop:lda BASIC_BUF,x inx cmp term bne argloop - + ; We've found the end of the argument. X points one character behind it, and ; A contains the terminating character. To make the argument a valid C string, ; replace the terminating character by a zero. @@ -125,7 +125,7 @@ done: lda #<argv stx __argv + 1 rts -.segment "INITBSS" +.segment "INIT" term: .res 1 name: .res NAME_LEN + 1 diff --git a/libsrc/vic20/tgi/vic20-hi.s b/libsrc/vic20/tgi/vic20-hi.s new file mode 100644 index 000000000..826a09c14 --- /dev/null +++ b/libsrc/vic20/tgi/vic20-hi.s @@ -0,0 +1,1008 @@ +; +; Graphics driver for a 160x192x2 mode on the VIC-20. +; +; Based on C64 TGI driver +; +; 2018-03-11, Sven Michael Klose +; 2020-07-06, Greg King +; + + .include "zeropage.inc" + .include "vic20.inc" + + .include "tgi-kernel.inc" + .include "tgi-error.inc" + + .macpack generic + .macpack module + + +; ------------------------------------------------------------------------ +; Constants + +COLS = 20 +ROWS = 12 +XRES = COLS * 8 +YRES = ROWS * 16 + +TGI_IOCTL_VIC20_SET_PATTERN = $01 + +; ------------------------------------------------------------------------ +; Header. Includes jump table and constants. + + module_header _vic20_hi_tgi + +; First part of the header is a structure that has a magic and defines the +; capabilities of the driver + + .byte $74, $67, $69 ; ASCII "tgi" + .byte TGI_API_VERSION ; TGI API version number + .addr $0000 ; Library reference + .word XRES ; X resolution + .word YRES ; Y resolution + .byte 2 ; Number of drawing colors + .byte 1 ; Number of screens available + .byte 8 ; System font X size + .byte 8 ; System font Y size + .word $0180 ; Aspect ratio 2.5:3 + .byte 0 ; TGI driver flags + +; Next comes the jump table. With the exception of IRQ, all entries must be +; valid and may point to an RTS for test versions (function not implemented). + + .addr INSTALL + .addr UNINSTALL + .addr INIT + .addr DONE + .addr GETERROR + .addr CONTROL + .addr CLEAR + .addr SETVIEWPAGE + .addr SETDRAWPAGE + .addr SETCOLOR + .addr SETPALETTE + .addr GETPALETTE + .addr GETDEFPALETTE + .addr SETPIXEL + .addr GETPIXEL + .addr LINE + .addr BAR + .addr TEXTSTYLE + .addr OUTTEXT + +; ------------------------------------------------------------------------ +; Data. + +; Variables mapped to the zero-page segment variables. Some of these are +; used for passing parameters to the driver. + +X1 := ptr1 +Y1 := ptr2 +X2 := ptr3 +Y2 := ptr4 +TEXT := ptr3 + +POINT := regsave +SOURCE := tmp1 +DEST := tmp3 + +; Absolute variables used in the code + +.bss + +ERROR: .res 1 ; Error code +PALETTE: .res 2 ; The current palette + +CURCOL: .res 1 ; Current color. +BITMASK: .res 1 ; $00 = clear, $FF = set pixels + +; BAR variables + +XPOSR: .res 1 ; Used by BAR. +PATTERN: .res 2 ; Address of pattern. +USERPATTERN: .res 2 ; User-defined pattern set via CONTROL. +COUNTER: .res 2 +TMP: .res 1 +MASKS: .res 1 +MASKD: .res 1 +XCPOS: .res 1 +HEIGHT: .res 1 + +; Line variables + +CHUNK := X2 ; Used in the line routine +OLDCHUNK := X2+1 ; Ditto +TEMP := tmp4 +TEMP2 := sreg +DX: .res 2 +DY: .res 2 + +; Text output stuff + +TEXTMAGX: .res 1 +TEXTMAGY: .res 1 +TEXTDIR: .res 1 + +; Constants and tables + +.rodata + +DEFPALETTE: .byte $00, $01 ; White on black +PALETTESIZE = * - DEFPALETTE + +BITTAB: .byte $80, $40, $20, $10, $08, $04, $02, $01 +BITCHUNK: .byte $FF, $7F, $3F, $1F, $0F, $07, $03, $01 + +CHARROM := $8000 ; Character ROM base address +CBASE := $9400 ; Color memory base address +SBASE := $1000 ; Screen memory base address +.assert (<SBASE) = $0, error, "Error, SBASE must be page aligned" +VBASE := $1100 ; Video memory base address + +; These numbers are added to Kernal's default VIC settings. +; They make the Video Interface Controller show graphics instead of text. + +.proc VICREGS + .byte <+2 ; Left_edge + 2 + .byte <-2 ; Top_edge - 2 + .byte <-2 ; Columns - 2 + .byte <-(11 << 1) + 1 ; Rows - 11, chars. are 8 x 16 pixels + .byte 0 + .byte <+$0C ; Font_address = $1000 +.endproc + +XADDRS_L: + .repeat COLS, n + .byte <(VBASE + YRES * n) + .endrep + +XADDRS_H: + .repeat COLS, n + .byte >(VBASE + YRES * n) + .endrep + +MASKS_LEFT: + .byte %11111111 +MASKD_RIGHT: + .byte %01111111 + .byte %00111111 + .byte %00011111 + .byte %00001111 + .byte %00000111 + .byte %00000011 + .byte %00000001 +MASKD_LEFT: + .byte %00000000 +MASKS_RIGHT: + .byte %10000000 + .byte %11000000 + .byte %11100000 + .byte %11110000 + .byte %11111000 + .byte %11111100 + .byte %11111110 + .byte %11111111 + +PATTERN_EMPTY: + .byte %00000000 + .byte %00000000 + .byte %00000000 + .byte %00000000 + .byte %00000000 + .byte %00000000 + .byte %00000000 + .byte %00000000 + +PATTERN_SOLID: + .byte %11111111 + .byte %11111111 + .byte %11111111 + .byte %11111111 + .byte %11111111 + .byte %11111111 + .byte %11111111 + .byte %11111111 + +.code + +; ------------------------------------------------------------------------ +; INSTALL routine. Is called after the driver is loaded into memory. May +; initialize anything that has to be done just once. Is probably empty +; most of the time. +; +; Must set an error code: NO +; + +.proc INSTALL + +; Reset user-defined pattern. + + lda #$00 + sta PATTERN + sta PATTERN+1 + rts +.endproc + +; ------------------------------------------------------------------------ +; UNINSTALL routine. Is called before the driver is removed from memory. May +; clean up anything done by INSTALL; but is probably empty most of the time. +; +; Must set an error code: NO +; + +.proc UNINSTALL + rts +.endproc + +; ------------------------------------------------------------------------ +; INIT: Changes an already installed device from text mode to graphics +; mode. +; Note that INIT/DONE may be called multiple times while the driver +; is loaded, while INSTALL is called only once, so any code that is needed +; to initialize variables and so on must go here. Setting the palette +; is not needed because that is done by the graphics kernel later. +; The graphics kernel never will call INIT when a graphics mode already is +; active; so, there is no need to protect against that. +; +; Must set an error code: YES +; + +.proc INIT + +; Initialize variables + + ldy #$FF + sty BITMASK + iny ; (ldy #$00) + sty ERROR ; Set to TGI_ERR_OK + +; Make screen columns. + + sty tmp2 + lda #>SBASE + sta tmp2+1 + clc + ldx #$10 + +@NEXT_ROW: + txa + +@NEXT_COLUMN: + sta (tmp2),y + iny + adc #ROWS + bcc @NEXT_COLUMN + +; Step to next row on screen. + + inx + cpx #ROWS+$10 + bne @NEXT_ROW + +; Set up VIC. + + ldx #.sizeof(VICREGS) - 1 +@L2: clc + lda $EDE4,x + adc VICREGS,x + sta VIC,x + dex + bpl @L2 + + jmp CLEAR +.endproc + +; ------------------------------------------------------------------------ +; DONE: Will be called to switch the graphics device back into text mode. +; The graphics kernel never will call DONE when no graphics mode is active; +; so, there is no need to protect against that. +; +; Must set an error code: NO +; + +.proc DONE + jmp $E518 ; Kernal console init. +.endproc + +; ------------------------------------------------------------------------ +; GETERROR: Return the error code in A, and clear it. + +.proc GETERROR + ldx #TGI_ERR_OK + lda ERROR + stx ERROR + rts +.endproc + +; ------------------------------------------------------------------------ +; CONTROL: Platform-/driver-specific entry point. +; +; Must set an error code: YES +; + +.proc CONTROL + +; Set user-defined pattern. + + cmp #TGI_IOCTL_VIC20_SET_PATTERN + bne @INVALID_FUNC + + lda ptr1 + sta USERPATTERN + lda ptr1+1 + sta USERPATTERN+1 + + lda #TGI_ERR_OK + .byte $2C ;(bit $1234) + +; Return with error code for invalid function index. + +@INVALID_FUNC: + lda #TGI_ERR_INV_FUNC + sta ERROR + rts +.endproc + +; ------------------------------------------------------------------------ +; CLEAR: Clears the screen. All pixels are set to the background color. +; +; Must set an error code: NO +; + +.proc CLEAR + lda #%00000000 + tay ; (ldy #$00) +@L1: sta VBASE + $0000,y + sta VBASE + $0100,y + sta VBASE + $0200,y + sta VBASE + $0300,y + sta VBASE + $0400,y + sta VBASE + $0500,y + sta VBASE + $0600,y + sta VBASE + $0700,y + sta VBASE + $0800,y + sta VBASE + $0900,y + sta VBASE + $0A00,y + sta VBASE + $0B00,y + sta VBASE + $0C00,y + sta VBASE + $0D00,y + sta VBASE + $0E00,y + iny + bne @L1 + rts +.endproc + +; ------------------------------------------------------------------------ +; SETVIEWPAGE: Set the visible page. Called with the new page in .A (0..n). +; The page number already is checked, to be valid, by the graphics kernel. +; +; Must set an error code: NO (will be called only if page OK) +; + +.proc SETVIEWPAGE + rts +.endproc + +; ------------------------------------------------------------------------ +; SETDRAWPAGE: Set the drawable page. Called with the new page in .A (0..n-1). +; The page number already is checked, to be valid, by the graphics kernel. +; +; Must set an error code: NO (will be called only if page OK) +; + +.proc SETDRAWPAGE + rts +.endproc + +; ------------------------------------------------------------------------ +; SETCOLOR: Set the drawing color (in .A). The new color already is checked +; to be in a valid range (0..maxcolor). +; +; Must set an error code: NO (will be called only if color OK) +; + +.proc SETCOLOR + sta CURCOL + tax + beq @L1 + lda #$FF +@L1: sta BITMASK + rts +.endproc + +; ------------------------------------------------------------------------ +; SETPALETTE: Set the palette (not available with all drivers/hardware). +; A pointer to the palette is passed in ptr1. Must set an error if palettes +; are not supported +; +; Must set an error code: YES +; + +.proc SETPALETTE + ldy #PALETTESIZE - 1 +@L1: lda (ptr1),y ; Copy the palette + and #$0F ; Make a valid color + sta PALETTE,y + dey + bpl @L1 + +; Initialize the color map with the new color settings. + + iny ; Set .Y to $00 + lda PALETTE+1 ; Foreground color +@L2: sta CBASE + $0000,y + sta CBASE + $0100,y + iny + bne @L2 + + lda PALETTE ; Background color + asl a ; Put it in high nybble + asl a + asl a + asl a + sta tmp2 + lda VIC_COLOR + and #$0F + ora tmp2 + sta VIC_COLOR + +; Done, reset the error code + + ;ldy #TGI_ERR_OK ; (Already zero) + sty ERROR + rts +.endproc + +; ------------------------------------------------------------------------ +; GETPALETTE: Return the current palette in ".XA". Even drivers that cannot +; set the palette should return the default palette here; so, there's no +; way for this function to fail. +; +; Must set an error code: NO +; + +.proc GETPALETTE + lda #<PALETTE + ldx #>PALETTE + rts +.endproc + +; ------------------------------------------------------------------------ +; GETDEFPALETTE: Return the default palette for the driver in ".XA". All +; drivers should return something reasonable here, even drivers that don't +; support palettes; otherwise, the caller has no way to determine the colors +; of the (not changeable) palette. +; +; Must set an error code: NO (all drivers must have a default palette) +; + +.proc GETDEFPALETTE + lda #<DEFPALETTE + ldx #>DEFPALETTE + rts +.endproc + +; ------------------------------------------------------------------------ +; SETPIXEL: Draw one pixel at X1/Y1 = ptr1/ptr2 with the current drawing +; color. The co-ordinates passed to this function never are outside the +; visible screen area; so, there's no need for clipping inside this function. +; +; Must set an error code: NO +; + +.proc SETPIXEL + jsr CALC ; Calculate co-ordinates + + ldy #$00 + lda (POINT),Y + eor BITMASK + and BITTAB,X + eor (POINT),Y + sta (POINT),Y + rts +.endproc + +; ------------------------------------------------------------------------ +; GETPIXEL: Read the color value of a pixel; and return it in ".XA". The +; co-ordinates passed to this function never are outside the visible screen +; area; so, there's no need for clipping inside this function. + + +.proc GETPIXEL + jsr CALC ; Calculate co-ordinates + + ldy #$00 + lda (POINT),Y + and BITTAB,X + beq @L1 + iny + tya ; Get color value into .A +@L1: ldx #>$0000 ; Clear high byte + rts +.endproc + +; ------------------------------------------------------------------------ +; TEXTSTYLE: Set the style used when calling OUTTEXT. Text scalings in x and y +; directions are passed in .X/.Y; the text direction is passed in .A. +; +; Must set an error code: NO +; + +.proc TEXTSTYLE + stx TEXTMAGX + sty TEXTMAGY + sta TEXTDIR + rts +.endproc + +; ------------------------------------------------------------------------ +; OUTTEXT: Output text at X/Y = ptr1/ptr2 using the current color and the +; current text style. The text to output is given as a zero-terminated +; string with address in ptr3. +; +; Must set an error code: NO +; + +.proc OUTTEXT + rts +.endproc + +; ------------------------------------------------------------------------ +; Calculate address and X offset in char. line, to plot the pixel at X1/Y1. + +.proc CALC + lda X1+1 + bne @L1 + lda Y1+1 + bne @L1 + + lda X1 + lsr + lsr + lsr + tay + + lda XADDRS_L,y + clc + adc Y1 + sta POINT + lda XADDRS_H,y + adc #$00 + sta POINT+1 + + lda X1 + and #7 + tax + +@L1: rts +.endproc + +; ------------------------------------------------------------------------ +; LINE: Draw a line from X1/Y1 to X2/Y2, where X1/Y1 = ptr1/ptr2 and +; X2/Y2 = ptr3/ptr4 using the current drawing color. +; +; X1,X2 etc. are set up above (x2=LINNUM in particular) +; Format is LINE x2,y2,x1,y1 +; +; Must set an error code: NO +; + +.proc LINE + +@CHECK: lda X2 ; Make sure x1 < x2 + sec + sbc X1 + tax + lda X2+1 + sbc X1+1 + bpl @CONT + lda Y2 ; If not, swap P1 and P2 + ldy Y1 + sta Y1 + sty Y2 + lda Y2+1 + ldy Y1+1 + sta Y1+1 + sty Y2+1 + lda X1 + ldy X2 + sty X1 + sta X2 + lda X2+1 + ldy X1+1 + sta X1+1 + sty X2+1 + bcc @CHECK + +@CONT: sta DX+1 + stx DX + + ldx #$C8 ; INY + lda Y2 ; Calculate dy + sec + sbc Y1 + tay + lda Y2+1 + sbc Y1+1 + bpl @DYPOS ; Is y2 >= y1? + lda Y1 ; Otherwise, dy = y1 - y2 + sec + sbc Y2 + tay + ldx #$88 ; DEY + +@DYPOS: sty DY ; 8-bit DY -- FIX ME? + stx YINCDEC + stx XINCDEC + + lda X1 + lsr + lsr + lsr + tay + lda XADDRS_L,y + sta POINT + lda XADDRS_H,y + sta POINT+1 + ldy Y1 + + lda X1 + and #7 + tax + lda BITCHUNK,X + sta OLDCHUNK + sta CHUNK + + ldx DY + cpx DX ; Who's bigger: dy or dx? + bcc STEPINX ; If dx, then... + lda DX+1 + bne STEPINX + +; +; Big steps in Y +; +; X is now counter, Y is y co-ordinate +; +; On entry, X=DY=number of loop iterations, and Y=Y1 +STEPINY: + lda #$00 + sta OLDCHUNK ; So plotting routine will work right + lda CHUNK + lsr ; Strip the bit + eor CHUNK + sta CHUNK + txa + bne @CONT ; If dy=0, it's just a point + inx +@CONT: lsr ; Init. counter to dy/2 +; +; Main loop +; +YLOOP: sta TEMP + + lda (POINT),y ; Plot + eor BITMASK + and CHUNK + eor (POINT),y + sta (POINT),y +YINCDEC: + iny ; Advance Y co-ordinate + lda TEMP ; Restore A + sec + sbc DX + bcc YFIXX +YCONT: dex ; X is counter + bne YLOOP +YCONT2: lda (POINT),y ; Plot endpoint + eor BITMASK + and CHUNK + eor (POINT),y + sta (POINT),y + rts + +YFIXX: ; x=x+1 + adc DY + lsr CHUNK + bne YCONT ; If we pass a column boundary, + ror CHUNK ; then reset CHUNK to $80 + sta TEMP2 + lda POINT + adc #YRES + sta POINT + bcc @CONT + inc POINT+1 +@CONT: lda TEMP2 + dex + bne YLOOP + beq YCONT2 + +; +; Big steps in X direction +; +; On entry, X=DY=number of loop iterations, and Y=Y1 + +.bss +COUNTHI: + .byte $00 ; Temporary counter, + ; used only once +.code +STEPINX: + ldx DX + lda DX+1 + sta COUNTHI + cmp #$80 + ror ; Need bit for initialization + sta Y1 ; High byte of counter + txa + bne @CONT ; Could be $100 + dec COUNTHI +@CONT: ror +; +; Main loop +; +XLOOP: lsr CHUNK + beq XFIXC ; If we pass a column boundary... +XCONT1: sbc DY + bcc XFIXY ; Time to step in Y? +XCONT2: dex + bne XLOOP + dec COUNTHI ; High bits set? + bpl XLOOP + + lsr CHUNK ; Advance to last point + jmp LINEPLOT ; Plot the last chunk +; +; CHUNK has passed a column; so, plot and increment pointer; +; and fix up CHUNK, OLDCHUNK. +; +XFIXC: sta TEMP + jsr LINEPLOT + lda #$FF + sta CHUNK + sta OLDCHUNK + lda POINT + clc + adc #YRES + sta POINT + lda TEMP + bcc XCONT1 + inc POINT+1 + jmp XCONT1 +; +; Check to make sure there isn't a high bit; plot chunk; +; and update Y co-ordinate. +; +XFIXY: dec Y1 ; Maybe high bit set + bpl XCONT2 + adc DX + sta TEMP + lda DX+1 + adc #$FF ; Hi byte + sta Y1 + + jsr LINEPLOT ; Plot chunk + lda CHUNK + sta OLDCHUNK + + lda TEMP +XINCDEC: + iny ; Y co-ord + jmp XCONT2 + +; +; Subroutine to plot chunks/points (to save a little +; room, gray hair, etc.) +; +LINEPLOT: ; Plot the line chunk + lda (POINT),Y + eor BITMASK + ora CHUNK + and OLDCHUNK + eor CHUNK + eor (POINT),Y + sta (POINT),Y + rts +.endproc + +; In: xpos, ypos, width, height +; ------------------------------------------------------------------------ +; BAR: Draw a filled rectangle with the corners X1/Y1, X2/Y2, where +; X1/Y1 = ptr1/ptr2 and X2/Y2 = ptr3/ptr4 using the current drawing color. +; Contrary to most other functions, the graphics kernel will sort and clip +; the co-ordinates before calling the driver; so, on entry, the following +; conditions are valid: +; X1 <= X2 +; Y1 <= Y2 +; (X1 >= 0) && (X1 < XRES) +; (X2 >= 0) && (X2 < XRES) +; (Y1 >= 0) && (Y1 < YRES) +; (Y2 >= 0) && (Y2 < YRES) +; +; Must set an error code: NO +; + +.proc BAR + +; Set user pattern if available. + + lda USERPATTERN + ora USERPATTERN+1 + beq @GET_PATTERN_BY_COLOR + + lda USERPATTERN + sta PATTERN + lda USERPATTERN+1 + sta PATTERN+1 + jmp @GOT_PATTERN + +; Determine pattern based on current colour. + +@GET_PATTERN_BY_COLOR: + lda #<PATTERN_SOLID + ldx #>PATTERN_SOLID + ldy CURCOL + bne @L2 + lda #<PATTERN_EMPTY + ldx #>PATTERN_EMPTY +@L2: sta PATTERN + stx PATTERN+1 + +@GOT_PATTERN: + +; Get starting POINT on screen. + + jsr CALC + sty XCPOS + lda POINT ; One off for VFILL/VCOPY. + sec + sbc #1 + sta POINT + bcs @L3 + dec POINT+1 +@L3: + +; Get height for VFILL. + + lda Y2 + sec + sbc Y1 + sta HEIGHT + +; Get rightmost char column. + + lda X2 + and #7 + sta XPOSR + +; Get width in characters. + + lda X2 + lsr + lsr + lsr + sec + sbc XCPOS + beq @DRAW_SINGLE_COLUMN + sta COUNTER + +; Draw left end. + + lda X1 + and #7 + tax + lda MASKD_LEFT,x + sta MASKD + lda MASKS_LEFT,x + sta MASKS + jsr VFILL + jsr INCPOINTX + +; Draw middle. + + dec COUNTER + beq @DRAW_RIGHT_END +@L1: jsr VCOPY + jsr INCPOINTX + dec COUNTER + bne @L1 + +; Draw right end. + +@DRAW_RIGHT_END: + ldx XPOSR + lda MASKD_RIGHT,x + sta MASKD + lda MASKS_RIGHT,x + sta MASKS + jmp VFILL + +; Draw left end. + +@DRAW_SINGLE_COLUMN: + lda X1 + and #7 + tax + ldy XPOSR + lda MASKS_LEFT,x + and MASKS_RIGHT,y + sta MASKS + lda MASKD_LEFT,x + ora MASKD_RIGHT,y + sta MASKD + jmp VFILL +.endproc + +; In: HEIGHT, PATTERN +; MASKS: Source mask (ANDed with pattern). +; MASKD: Destination mask (ANDed with screen). +; POINT: Starting address. +; ------------------------------------------------------------------------ +; Fill column with pattern using masks. +; + +.proc VFILL + lda PATTERN + sta @MOD_PATTERN+1 + lda PATTERN+1 + sta @MOD_PATTERN+2 + ldy HEIGHT + lda Y1 + and #7 + tax + +@L1: lda (POINT),y + and MASKD + sta TMP +@MOD_PATTERN: + lda $FFFF,x + and MASKS + ora TMP + sta (POINT),y + inx + txa + and #7 + tax + dey + bne @L1 + + rts +.endproc + +; In: HEIGHT, PATTERN, POINT +; ------------------------------------------------------------------------ +; Fill column with pattern. +; + +.proc VCOPY + lda PATTERN + sta @MOD_PATTERN+1 + lda PATTERN+1 + sta @MOD_PATTERN+2 + ldy HEIGHT + lda Y1 + and #7 + tax + +@MOD_PATTERN: +@L1: lda $FFFF,x + sta (POINT),y + inx + txa + and #7 + tax + dey + bne @L1 + + rts +.endproc + +.proc INCPOINTX + lda POINT + clc + adc #YRES + sta POINT + bcc @L1 + inc POINT+1 +@L1: rts +.endproc diff --git a/libsrc/vic20/tgi_stat_stddrv.s b/libsrc/vic20/tgi_stat_stddrv.s new file mode 100644 index 000000000..6a94d66aa --- /dev/null +++ b/libsrc/vic20/tgi_stat_stddrv.s @@ -0,0 +1,8 @@ +; +; Address of the static standard TGI driver +; +; const void tgi_static_stddrv[]; +; + + .import _vic20_hi_tgi + .export _tgi_static_stddrv := _vic20_hi_tgi diff --git a/libsrc/vic20/tgi_stddrv.s b/libsrc/vic20/tgi_stddrv.s new file mode 100644 index 000000000..d56af37e7 --- /dev/null +++ b/libsrc/vic20/tgi_stddrv.s @@ -0,0 +1,13 @@ +; +; Name of the standard TGI driver +; +; 2018-03-11, Sven Michael Klose +; +; const char tgi_stddrv[]; +; + + .export _tgi_stddrv + +.rodata + +_tgi_stddrv: .asciiz "vic20-hi.tgi" diff --git a/libsrc/vic20/tgihdr.s b/libsrc/vic20/tgihdr.s new file mode 100644 index 000000000..30258162d --- /dev/null +++ b/libsrc/vic20/tgihdr.s @@ -0,0 +1,67 @@ +; +; This code sits immediately after the BASIC stub program. +; Therefore, it's executed by that stub. +; +; 2018-04-17, Greg King +; + + .export __TGIHDR__ : abs = 1 ; Mark as TGI housekeeper + + .import __MAIN_LAST__ + .importzp ptr1, ptr2, tmp1 + + +basic_reset := $C000 ; vector to BASIC's cold-start code + +; This code moves the program to $2000. That move allows $1000 - $1FFF +; to be used by the TGI driver to hold its graphics data. + +.segment "TGI1HDR" + + lda #<(tgi1end + prog_size) ; source + ldx #>(tgi1end + prog_size) + sta ptr1 + stx ptr1+1 + + lda #<(tgi2hdr + prog_size) ; destination + ldx #>(tgi2hdr + prog_size) + sta ptr2 + stx ptr2+1 + + ldx #<~prog_size + lda #>~prog_size ; use -(prog_size + 1) + sta tmp1 + + ldy #<$0000 + +; Copy loop + +@L1: inx ; bump counter's low byte + beq @L4 + +@L2: tya ; will .Y underflow? + bne @L3 + dec ptr1+1 ; yes, do next lower page + dec ptr2+1 +@L3: dey + + lda (ptr1),y + sta (ptr2),y + jmp @L1 + +@L4: inc tmp1 ; bump counter's high byte + bne @L2 + + jmp tgi2hdr ; go to moved program +tgi1end: + +.segment "TGI2HDR" + +tgi2hdr: + jsr tgi2end ; run actual program + jmp (basic_reset) +tgi2end: + +; The length of the TGI program (including the TGI2HDR segment) + +prog_size = __MAIN_LAST__ - tgi2hdr diff --git a/libsrc/vic20/waitvsync.s b/libsrc/vic20/waitvsync.s new file mode 100644 index 000000000..1c76f2497 --- /dev/null +++ b/libsrc/vic20/waitvsync.s @@ -0,0 +1,16 @@ +; +; Written by Groepaz <groepaz@gmx.net> +; +; void waitvsync (void); +; + + .export _waitvsync + + .include "vic20.inc" + +_waitvsync: +@l2: + lda VIC_HLINE + bne @l2 + rts + diff --git a/libsrc/zlib/adler32.s b/libsrc/zlib/adler32.s index e54e25e77..1bb5588db 100644 --- a/libsrc/zlib/adler32.s +++ b/libsrc/zlib/adler32.s @@ -1,13 +1,15 @@ ; -; Piotr Fusik, 18.11.2001 +; 2001-11-18, Piotr Fusik +; 2018-05-20, Christian Kruger ; -; unsigned long __fastcall__ adler32 (unsigned long adler, unsigned char* buf, +; unsigned long __fastcall__ adler32 (unsigned long adler, +; const unsigned char* buf, ; unsigned len); ; .export _adler32 - .import incsp2, incsp4, popax, popeax + .import incsp2, incsp4, popptr1, popeax .importzp sreg, ptr1, ptr2, tmp1 BASE = 65521 ; largest prime smaller than 65536 @@ -20,9 +22,7 @@ _adler32: @L1: sta ptr2 stx ptr2+1 ; ptr1 = buf - jsr popax - sta ptr1 - stx ptr1+1 + jsr popptr1 ; if (buf == NULL) return 1L; ora ptr1+1 beq @L0 @@ -80,6 +80,7 @@ _adler32: ; return 1L @L0: sta sreg sta sreg+1 + tax ; (popptr1 doesn't set .X) lda #1 ; ignore adler jmp incsp4 diff --git a/libsrc/zlib/crc32.s b/libsrc/zlib/crc32.s index 26955dbed..41b5fe9db 100644 --- a/libsrc/zlib/crc32.s +++ b/libsrc/zlib/crc32.s @@ -1,13 +1,15 @@ ; -; Piotr Fusik, 14.11.2001 +; 2001-11-14, Piotr Fusik +; 2018-05-20, Christian Kruger ; -; unsigned long __fastcall__ crc32 (unsigned long crc, unsigned char* buf, +; unsigned long __fastcall__ crc32 (unsigned long crc, +; const unsigned char* buf, ; unsigned len); ; .export _crc32 - .import compleax, incsp2, incsp4, popax, popeax + .import compleax, incsp2, incsp4, popptr1, popeax .importzp sreg, ptr1, ptr2, tmp1, tmp2 POLYNOMIAL = $EDB88320 @@ -67,9 +69,7 @@ _crc32: @L1: sta ptr2 stx ptr2+1 ; ptr1 = buf - jsr popax - sta ptr1 - stx ptr1+1 + jsr popptr1 ; if (buf == NULL) return 0; ora ptr1+1 beq @L0 @@ -118,6 +118,7 @@ _crc32: ; return 0L @L0: sta sreg sta sreg+1 + tax ; (popptr1 doesn't set .X) ; ignore crc jmp incsp4 @@ -130,5 +131,3 @@ table_0: .res 256 table_1: .res 256 table_2: .res 256 table_3: .res 256 - - diff --git a/libsrc/zlib/inflatemem.s b/libsrc/zlib/inflatemem.s index bcf473bdd..80c19f223 100644 --- a/libsrc/zlib/inflatemem.s +++ b/libsrc/zlib/inflatemem.s @@ -1,35 +1,42 @@ ; -; Piotr Fusik, 21.09.2003 +; 2017-11-07, Piotr Fusik ; -; unsigned __fastcall__ inflatemem (char* dest, const char* source); +; unsigned __fastcall__ inflatemem (unsigned char* dest, +; const unsigned char* source); +; +; NOTE: Be extremely careful with modifications, because this code is heavily +; optimized for size (for example assumes certain register and flag values +; when its internal routines return). Test with the gunzip65 sample. ; .export _inflatemem .import incsp2 - .importzp sp, sreg, ptr1, ptr2, ptr3, ptr4, tmp1 + .importzp sp, sreg, ptr1, ptr2, ptr3, ptr4 ; -------------------------------------------------------------------------- ; ; Constants ; -; Maximum length of a Huffman code. -MAX_BITS = 15 +; Argument values for getBits. +GET_1_BIT = $81 +GET_2_BITS = $82 +GET_3_BITS = $84 +GET_4_BITS = $88 +GET_5_BITS = $90 +GET_6_BITS = $a0 +GET_7_BITS = $c0 -; All Huffman trees are stored in the bitsCount, bitsPointer_l -; and bitsPointer_h arrays. There may be two trees: the literal/length tree -; and the distance tree, or just one - the temporary tree. +; Huffman trees. +TREE_SIZE = 16 +PRIMARY_TREE = 0 +DISTANCE_TREE = TREE_SIZE -; Index in the mentioned arrays for the beginning of the literal/length tree -; or the temporary tree. -PRIMARY_TREE = 0 - -; Index in the mentioned arrays for the beginning of the distance tree. -DISTANCE_TREE = MAX_BITS - -; Size of each array. -TREES_SIZE = 2*MAX_BITS +; Alphabet. +LENGTH_SYMBOLS = 1+29+2 ; EOF, 29 length symbols, two unused symbols +DISTANCE_SYMBOLS = 30 +CONTROL_SYMBOLS = LENGTH_SYMBOLS+DISTANCE_SYMBOLS ; -------------------------------------------------------------------------- @@ -38,30 +45,26 @@ TREES_SIZE = 2*MAX_BITS ; ; Pointer to the compressed data. -inputPointer = ptr1 ; 2 bytes +inputPointer := ptr1 ; 2 bytes ; Pointer to the uncompressed data. -outputPointer = ptr2 ; 2 bytes +outputPointer := ptr2 ; 2 bytes ; Local variables. ; As far as there is no conflict, same memory locations are used ; for different variables. -inflateDynamicBlock_cnt = ptr3 ; 1 byte -inflateCodes_src = ptr3 ; 2 bytes -buildHuffmanTree_src = ptr3 ; 2 bytes -getNextLength_last = ptr3 ; 1 byte -getNextLength_index = ptr3+1 ; 1 byte - -buildHuffmanTree_ptr = ptr4 ; 2 bytes -fetchCode_ptr = ptr4 ; 2 bytes -getBits_tmp = ptr4 ; 1 byte - -moveBlock_len = sreg ; 2 bytes -inflateDynamicBlock_np = sreg ; 1 byte -inflateDynamicBlock_nd = sreg+1 ; 1 byte - -getBit_hold = tmp1 ; 1 byte +inflateStored_pageCounter := ptr3 ; 1 byte +inflateDynamic_symbol := ptr3 ; 1 byte +inflateDynamic_lastLength := ptr3+1 ; 1 byte + .assert ptr4 = ptr3 + 2, error, "Need three bytes for inflateDynamic_tempCodes" +inflateDynamic_tempCodes := ptr3+1 ; 3 bytes +inflateDynamic_allCodes := inflateDynamic_tempCodes+1 ; 1 byte +inflateDynamic_primaryCodes := inflateDynamic_tempCodes+2 ; 1 byte +inflateCodes_sourcePointer := ptr3 ; 2 bytes +inflateCodes_lengthMinus2 := ptr4 ; 1 byte +getBits_base := sreg ; 1 byte +getBit_buffer := sreg+1 ; 1 byte ; -------------------------------------------------------------------------- @@ -75,45 +78,59 @@ _inflatemem: sta inputPointer stx inputPointer+1 ; outputPointer = dest -.ifpc02 - lda (sp) ldy #1 -.else - ldy #0 - lda (sp),y - iny -.endif - sta outputPointer lda (sp),y sta outputPointer+1 + dey + lda (sp),y + sta outputPointer -; ldy #1 - sty getBit_hold -inflatemem_1: +; ldy #0 + sty getBit_buffer + +inflate_blockLoop: ; Get a bit of EOF and two bits of block type - ldx #3 - lda #0 +; ldy #0 + sty getBits_base + lda #GET_3_BITS jsr getBits lsr a ; A and Z contain block type, C contains EOF flag ; Save EOF flag php -; Go to the routine decompressing this block - jsr callExtr - plp - bcc inflatemem_1 -; C flag is set! + bne inflateCompressed -; return outputPointer - dest; +; Decompress a 'stored' data block. +; ldy #0 + sty getBit_buffer ; ignore bits until byte boundary + jsr getWord ; skip the length we don't need + jsr getWord ; get the one's complement length + sta inflateStored_pageCounter + bcs inflateStored_firstByte ; jmp +inflateStored_copyByte: + jsr getByte +; sec +inflateStoreByte: + jsr storeByte + bcc inflateCodes_loop +inflateStored_firstByte: + inx + bne inflateStored_copyByte + inc inflateStored_pageCounter + bne inflateStored_copyByte + +; Block decompressed. +inflate_nextBlock: + plp + bcc inflate_blockLoop + +; Decompression complete. +; return outputPointer - dest lda outputPointer -.ifpc02 - sbc (sp) ; C flag is set - ldy #1 -.else - ldy #0 - sbc (sp),y ; C flag is set +; ldy #0 +; sec + sbc (sp),y iny -.endif pha lda outputPointer+1 sbc (sp),y @@ -122,442 +139,361 @@ inflatemem_1: ; pop dest jmp incsp2 -; -------------------------------------------------------------------------- -; Go to proper block decoding routine. - -callExtr: - bne inflateCompressedBlock - -; -------------------------------------------------------------------------- -; Decompress a 'stored' data block. - -inflateCopyBlock: -; Ignore bits until byte boundary - ldy #1 - sty getBit_hold -; Get 16-bit length - ldx #inputPointer - lda (0,x) - sta moveBlock_len - lda (inputPointer),y - sta moveBlock_len+1 -; Skip the length and one's complement of it - lda #4 - clc - adc inputPointer - sta inputPointer - bcc moveBlock - inc inputPointer+1 -; jmp moveBlock - -; -------------------------------------------------------------------------- -; Copy block of length moveBlock_len from (0,x) to the output. - -moveBlock: - ldy moveBlock_len - beq moveBlock_1 -.ifpc02 -.else - ldy #0 -.endif - inc moveBlock_len+1 -moveBlock_1: - lda (0,x) -.ifpc02 - sta (outputPointer) -.else - sta (outputPointer),y -.endif - inc 0,x - bne moveBlock_2 - inc 1,x -moveBlock_2: - inc outputPointer - bne moveBlock_3 - inc outputPointer+1 -moveBlock_3: -.ifpc02 - dey -.else - dec moveBlock_len -.endif - bne moveBlock_1 - dec moveBlock_len+1 - bne moveBlock_1 - rts - -; -------------------------------------------------------------------------- +inflateCompressed: ; Decompress a Huffman-coded data block -; (A = 1: fixed, A = 2: dynamic). +; A=1: fixed block, initialize with fixed codes +; A=2: dynamic block, start by clearing all code lengths +; A=3: invalid compressed data, not handled in this routine + eor #2 -inflateCompressedBlock: - lsr a - bne inflateDynamicBlock -; Note: inflateDynamicBlock may assume that A = 1 - -; -------------------------------------------------------------------------- -; Decompress a Huffman-coded data block with default Huffman trees -; (defined by the DEFLATE format): -; literalCodeLength: 144 times 8, 112 times 9 -; endCodeLength: 7 -; lengthCodeLength: 23 times 7, 6 times 8 -; distanceCodeLength: 30 times 5+DISTANCE_TREE, 2 times 8 -; (two 8-bit codes from the primary tree are not used). - -inflateFixedBlock: - ldx #159 - stx distanceCodeLength+32 - lda #8 -inflateFixedBlock_1: - sta literalCodeLength-1,x - sta literalCodeLength+159-1,x - dex - bne inflateFixedBlock_1 - ldx #112 -; lda #9 -inflateFixedBlock_2: - inc literalCodeLength+144-1,x ; sta - dex - bne inflateFixedBlock_2 - ldx #24 -; lda #7 -inflateFixedBlock_3: - dec endCodeLength-1,x ; sta - dex - bne inflateFixedBlock_3 - ldx #30 - lda #5+DISTANCE_TREE -inflateFixedBlock_4: - sta distanceCodeLength-1,x - dex - bne inflateFixedBlock_4 - beq inflateCodes ; branch always - -; -------------------------------------------------------------------------- -; Decompress a Huffman-coded data block, reading Huffman trees first. - -inflateDynamicBlock: -; numberOfPrimaryCodes = 257 + getBits(5) - ldx #5 -; lda #1 - jsr getBits - sta inflateDynamicBlock_np -; numberOfDistanceCodes = 1 + getBits(5) - ldx #5 - lda #1+29+1 - jsr getBits - sta inflateDynamicBlock_nd -; numberOfTemporaryCodes = 4 + getBits(4) - lda #4 +; ldy #0 +inflateCompressed_setCodeLengths: tax - jsr getBits - sta inflateDynamicBlock_cnt -; Get lengths of temporary codes in the order stored in tempCodeLengthOrder - txa ; lda #0 - tay -inflateDynamicBlock_1: - ldx #3 ; A = 0 - jsr getBits ; does not change Y -inflateDynamicBlock_2: - ldx tempCodeLengthOrder,y - sta literalCodeLength,x - lda #0 + beq inflateCompressed_setLiteralCodeLength +; fixed Huffman literal codes: +; 144 8-bit codes +; 112 9-bit codes + lda #4 + cpy #144 + rol a +inflateCompressed_setLiteralCodeLength: + sta literalSymbolCodeLength,y + beq inflateCompressed_setControlCodeLength +; fixed Huffman control codes: +; 24 7-bit codes +; 6 8-bit codes +; 2 meaningless 8-bit codes +; 30 5-bit distance codes + lda #5+DISTANCE_TREE + cpy #LENGTH_SYMBOLS + bcs inflateCompressed_setControlCodeLength + cpy #24 + adc #$100+2-DISTANCE_TREE +inflateCompressed_setControlCodeLength: + cpy #CONTROL_SYMBOLS + bcs inflateCompressed_noControlSymbol + sta controlSymbolCodeLength,y +inflateCompressed_noControlSymbol: iny - cpy inflateDynamicBlock_cnt - bcc inflateDynamicBlock_1 - cpy #19 - bcc inflateDynamicBlock_2 - ror literalCodeLength+19 ; C flag is set, so this will set b7 + bne inflateCompressed_setCodeLengths + + tax + beq inflateDynamic + +; Decompress a block +inflateCodes: + jsr buildHuffmanTree +inflateCodes_loop: + jsr fetchPrimaryCode + bcc inflateStoreByte + beq inflate_nextBlock +; Copy sequence from look-behind buffer +; ldy #0 + sty getBits_base + cmp #9 + bcc inflateCodes_setSequenceLength + tya +; lda #0 + cpx #1+28 + bcs inflateCodes_setSequenceLength + dex + txa + lsr a + ror getBits_base + inc getBits_base + lsr a + rol getBits_base + jsr getAMinus1BitsMax8 +; sec + adc #0 +inflateCodes_setSequenceLength: + sta inflateCodes_lengthMinus2 + ldx #DISTANCE_TREE + jsr fetchCode + cmp #4 + bcc inflateCodes_setOffsetLowByte + inc getBits_base + lsr a + jsr getAMinus1BitsMax8 +inflateCodes_setOffsetLowByte: + eor #$ff + sta inflateCodes_sourcePointer + lda getBits_base + cpx #10 + bcc inflateCodes_setOffsetHighByte + lda getNPlus1Bits_mask-10,x + jsr getBits + clc +inflateCodes_setOffsetHighByte: + eor #$ff +; clc + adc outputPointer+1 + sta inflateCodes_sourcePointer+1 + jsr copyByte + jsr copyByte +inflateCodes_copyByte: + jsr copyByte + dec inflateCodes_lengthMinus2 + bne inflateCodes_copyByte + beq inflateCodes_loop ; jmp + +inflateDynamic: +; Decompress a block reading Huffman trees first +; ldy #0 +; numberOfPrimaryCodes = 257 + getBits(5) +; numberOfDistanceCodes = 1 + getBits(5) +; numberOfTemporaryCodes = 4 + getBits(4) + ldx #3 +inflateDynamic_getHeader: + lda inflateDynamic_headerBits-1,x + jsr getBits +; sec + adc inflateDynamic_headerBase-1,x + sta inflateDynamic_tempCodes-1,x + dex + bne inflateDynamic_getHeader + +; Get lengths of temporary codes in the order stored in inflateDynamic_tempSymbols +; ldx #0 +inflateDynamic_getTempCodeLengths: + lda #GET_3_BITS + jsr getBits + ldy inflateDynamic_tempSymbols,x + sta literalSymbolCodeLength,y + ldy #0 + inx + cpx inflateDynamic_tempCodes + bcc inflateDynamic_getTempCodeLengths + ; Build the tree for temporary codes jsr buildHuffmanTree ; Use temporary codes to get lengths of literal/length and distance codes - ldx #0 - ldy #1 - stx getNextLength_last -inflateDynamicBlock_3: - jsr getNextLength - sta literalCodeLength,x - inx - bne inflateDynamicBlock_3 -inflateDynamicBlock_4: - jsr getNextLength -inflateDynamicBlock_5: - sta endCodeLength,x - inx - cpx inflateDynamicBlock_np - bcc inflateDynamicBlock_4 - lda #0 - cpx #1+29 - bcc inflateDynamicBlock_5 -inflateDynamicBlock_6: - jsr getNextLength - cmp #0 - beq inflateDynamicBlock_7 - adc #DISTANCE_TREE-1 ; C flag is set -inflateDynamicBlock_7: - sta endCodeLength,x - inx - cpx inflateDynamicBlock_nd - bcc inflateDynamicBlock_6 - ror endCodeLength,x ; C flag is set, so this will set b7 -; jmp inflateCodes - -; -------------------------------------------------------------------------- -; Decompress a data block basing on given Huffman trees. - -inflateCodes: - jsr buildHuffmanTree -inflateCodes_1: - jsr fetchPrimaryCode - bcs inflateCodes_2 -; Literal code -.ifpc02 - sta (outputPointer) -.else - ldy #0 - sta (outputPointer),y -.endif - inc outputPointer - bne inflateCodes_1 - inc outputPointer+1 - bcc inflateCodes_1 ; branch always -; End of block -inflateCodes_ret: - rts -inflateCodes_2: - beq inflateCodes_ret -; Restore a block from the look-behind buffer - jsr getValue - sta moveBlock_len - tya - jsr getBits - sta moveBlock_len+1 - ldx #DISTANCE_TREE - jsr fetchCode - jsr getValue - sec - eor #$ff - adc outputPointer - sta inflateCodes_src +; ldx #0 +; sec +inflateDynamic_decodeLength: +; C=1: literal codes +; C=0: control codes + stx inflateDynamic_symbol php - tya - jsr getBits - plp - eor #$ff - adc outputPointer+1 - sta inflateCodes_src+1 - ldx #inflateCodes_src - jsr moveBlock - beq inflateCodes_1 ; branch always - -; -------------------------------------------------------------------------- -; Build Huffman trees basing on code lengths (in bits). -; stored in the *CodeLength arrays. -; A byte with its highest bit set marks the end. - -buildHuffmanTree: - lda #<literalCodeLength - sta buildHuffmanTree_src - lda #>literalCodeLength - sta buildHuffmanTree_src+1 -; Clear bitsCount and bitsPointer_l - ldy #2*TREES_SIZE+1 - lda #0 -buildHuffmanTree_1: - sta bitsCount-1,y - dey - bne buildHuffmanTree_1 - beq buildHuffmanTree_3 ; branch always -; Count number of codes of each length -buildHuffmanTree_2: - tax - inc bitsPointer_l,x - iny - bne buildHuffmanTree_3 - inc buildHuffmanTree_src+1 -buildHuffmanTree_3: - lda (buildHuffmanTree_src),y - bpl buildHuffmanTree_2 -; Calculate a pointer for each length - ldx #0 - lda #<sortedCodes - ldy #>sortedCodes - clc -buildHuffmanTree_4: - sta bitsPointer_l,x - tya - sta bitsPointer_h,x - lda bitsPointer_l+1,x - adc bitsPointer_l,x ; C flag is zero - bcc buildHuffmanTree_5 - iny -buildHuffmanTree_5: - inx - cpx #TREES_SIZE - bcc buildHuffmanTree_4 - lda #>literalCodeLength - sta buildHuffmanTree_src+1 - ldy #0 - bcs buildHuffmanTree_9 ; branch always -; Put codes into their place in sorted table -buildHuffmanTree_6: - beq buildHuffmanTree_7 - tax - lda bitsPointer_l-1,x - sta buildHuffmanTree_ptr - lda bitsPointer_h-1,x - sta buildHuffmanTree_ptr+1 - tya - ldy bitsCount-1,x - inc bitsCount-1,x - sta (buildHuffmanTree_ptr),y - tay -buildHuffmanTree_7: - iny - bne buildHuffmanTree_9 - inc buildHuffmanTree_src+1 - ldx #MAX_BITS-1 -buildHuffmanTree_8: - lda bitsCount,x - sta literalCount,x - dex - bpl buildHuffmanTree_8 -buildHuffmanTree_9: - lda (buildHuffmanTree_src),y - bpl buildHuffmanTree_6 - rts - -; -------------------------------------------------------------------------- -; Decode next code length using temporary codes. - -getNextLength: - stx getNextLength_index - dey - bne getNextLength_1 ; Fetch a temporary code jsr fetchPrimaryCode ; Temporary code 0..15: put this length - ldy #1 - cmp #16 - bcc getNextLength_2 + bpl inflateDynamic_storeLengths ; Temporary code 16: repeat last length 3 + getBits(2) times ; Temporary code 17: put zero length 3 + getBits(3) times ; Temporary code 18: put zero length 11 + getBits(7) times - tay - ldx tempExtraBits-16,y - lda tempBaseValue-16,y + tax jsr getBits - cpy #17 + cpx #GET_3_BITS + bcc inflateDynamic_code16 + beq inflateDynamic_code17 +; sec + adc #7 +inflateDynamic_code17: +; ldy #0 + sty inflateDynamic_lastLength +inflateDynamic_code16: tay - txa ; lda #0 - bcs getNextLength_2 -getNextLength_1: - lda getNextLength_last -getNextLength_2: - sta getNextLength_last - ldx getNextLength_index + lda inflateDynamic_lastLength + iny + iny +inflateDynamic_storeLengths: + iny + plp + ldx inflateDynamic_symbol +inflateDynamic_storeLength: + bcc inflateDynamic_controlSymbolCodeLength + sta literalSymbolCodeLength,x + inx + cpx #1 +inflateDynamic_storeNext: + dey + bne inflateDynamic_storeLength + sta inflateDynamic_lastLength + beq inflateDynamic_decodeLength ; jmp +inflateDynamic_controlSymbolCodeLength: + cpx inflateDynamic_primaryCodes + bcc inflateDynamic_storeControl +; the code lengths we skip here were zero-initialized +; in inflateCompressed_setControlCodeLength + bne inflateDynamic_noStartDistanceTree + ldx #LENGTH_SYMBOLS +inflateDynamic_noStartDistanceTree: + ora #DISTANCE_TREE +inflateDynamic_storeControl: + sta controlSymbolCodeLength,x + inx + cpx inflateDynamic_allCodes + bcc inflateDynamic_storeNext + dey +; ldy #0 + jmp inflateCodes + +; Build Huffman trees basing on code lengths (in bits) +; stored in the *SymbolCodeLength arrays +buildHuffmanTree: +; Clear nBitCode_literalCount, nBitCode_controlCount + tya +; lda #0 +buildHuffmanTree_clear: + sta nBitCode_clearFrom,y + iny + bne buildHuffmanTree_clear +; Count number of codes of each length +; ldy #0 +buildHuffmanTree_countCodeLengths: + ldx literalSymbolCodeLength,y + inc nBitCode_literalCount,x + bne buildHuffmanTree_notAllLiterals + stx allLiteralsCodeLength +buildHuffmanTree_notAllLiterals: + cpy #CONTROL_SYMBOLS + bcs buildHuffmanTree_noControlSymbol + ldx controlSymbolCodeLength,y + inc nBitCode_controlCount,x +buildHuffmanTree_noControlSymbol: + iny + bne buildHuffmanTree_countCodeLengths +; Calculate offsets of symbols sorted by code length +; lda #0 + ldx #$100-4*TREE_SIZE +buildHuffmanTree_calculateOffsets: + sta nBitCode_literalOffset+4*TREE_SIZE-$100,x + clc + adc nBitCode_literalCount+4*TREE_SIZE-$100,x + inx + bne buildHuffmanTree_calculateOffsets +; Put symbols in their place in the sorted array +; ldy #0 +buildHuffmanTree_assignCode: + tya + ldx literalSymbolCodeLength,y + ldy nBitCode_literalOffset,x + inc nBitCode_literalOffset,x + sta codeToLiteralSymbol,y + tay + cpy #CONTROL_SYMBOLS + bcs buildHuffmanTree_noControlSymbol2 + ldx controlSymbolCodeLength,y + ldy nBitCode_controlOffset,x + inc nBitCode_controlOffset,x + sta codeToControlSymbol,y + tay +buildHuffmanTree_noControlSymbol2: + iny + bne buildHuffmanTree_assignCode rts -; -------------------------------------------------------------------------- -; Read a code basing on the primary tree. - +; Read Huffman code using the primary tree fetchPrimaryCode: ldx #PRIMARY_TREE -; jmp fetchCode - -; -------------------------------------------------------------------------- -; Read a code from input basing on the tree specified in X. +; Read a code from input using the tree specified in X. ; Return low byte of this code in A. -; For the literal/length tree, the C flag is set if the code is non-literal. - +; Return C flag reset for literal code, set for length code. fetchCode: - lda #0 -fetchCode_1: +; ldy #0 + tya +fetchCode_nextBit: jsr getBit rol a inx + bcs fetchCode_ge256 +; are all 256 literal codes of this length? + cpx allLiteralsCodeLength + beq fetchCode_allLiterals +; is it literal code of length X? sec - sbc bitsCount-1,x - bcs fetchCode_1 - adc bitsCount-1,x ; C flag is zero - cmp literalCount-1,x - sta fetchCode_ptr - ldy bitsPointer_l-1,x - lda bitsPointer_h-1,x - sta fetchCode_ptr+1 - lda (fetchCode_ptr),y + sbc nBitCode_literalCount,x + bcs fetchCode_notLiteral +; literal code +; clc + adc nBitCode_literalOffset,x + tax + lda codeToLiteralSymbol,x +fetchCode_allLiterals: + clc + rts +; code >= 256, must be control +fetchCode_ge256: +; sec + sbc nBitCode_literalCount,x + sec +; is it control code of length X? +fetchCode_notLiteral: +; sec + sbc nBitCode_controlCount,x + bcs fetchCode_nextBit +; control code +; clc + adc nBitCode_controlOffset,x + tax + lda codeToControlSymbol,x + and #$1f ; make distance symbols zero-based + tax +; sec rts -; -------------------------------------------------------------------------- -; Decode low byte of a value (length or distance), basing on the code in A. -; The result is the base value for this code plus some bits read from input. - -getValue: - tay - ldx lengthExtraBits-1,y - lda lengthBaseValue_l-1,y - pha - lda lengthBaseValue_h-1,y - tay - pla -; jmp getBits - -; -------------------------------------------------------------------------- -; Read X-bit number from the input and add it to A. -; Increment Y if overflow. -; If X > 8, read only 8 bits. -; On return X holds number of unread bits: X = (X > 8 ? X - 8 : 0); - +; Read A minus 1 bits, but no more than 8 +getAMinus1BitsMax8: + rol getBits_base + tax + cmp #9 + bcs getByte + lda getNPlus1Bits_mask-2,x getBits: - cpx #0 - beq getBits_ret -.ifpc02 - stz getBits_tmp - dec getBits_tmp -.else - pha - lda #$ff - sta getBits_tmp - pla -.endif -getBits_1: - jsr getBit - bcc getBits_2 - sbc getBits_tmp ; C flag is set - bcc getBits_2 - iny -getBits_2: - dex - beq getBits_ret - asl getBits_tmp - bmi getBits_1 -getBits_ret: + jsr getBits_loop +getBits_normalizeLoop: + lsr getBits_base + ror a + bcc getBits_normalizeLoop rts -; -------------------------------------------------------------------------- -; Read a single bit from input, return it in the C flag. +; Read 16 bits +getWord: + jsr getByte + tax +; Read 8 bits +getByte: + lda #$80 +getBits_loop: + jsr getBit + ror a + bcc getBits_loop + rts +; Read one bit, return in the C flag getBit: - lsr getBit_hold - bne getBit_ret + lsr getBit_buffer + bne getBit_return pha -.ifpc02 - lda (inputPointer) -.else - sty getBit_hold - ldy #0 +; ldy #0 lda (inputPointer),y - ldy getBit_hold -.endif inc inputPointer - bne getBit_1 + bne getBit_samePage inc inputPointer+1 -getBit_1: - ror a ; C flag is set - sta getBit_hold +getBit_samePage: + sec + ror a + sta getBit_buffer pla -getBit_ret: +getBit_return: + rts + +; Copy a previously written byte +copyByte: + ldy outputPointer + lda (inflateCodes_sourcePointer),y + ldy #0 +; Write a byte +storeByte: +; ldy #0 + sta (outputPointer),y + inc outputPointer + bne storeByte_return + inc outputPointer+1 + inc inflateCodes_sourcePointer+1 +storeByte_return: rts @@ -567,57 +503,17 @@ getBit_ret: ; .rodata -; -------------------------------------------------------------------------- -; Arrays for the temporary codes. -; Order, in which lengths of the temporary codes are stored. -tempCodeLengthOrder: - .byte 16,17,18,0,8,7,9,6,10,5,11,4,12,3,13,2,14,1,15 +getNPlus1Bits_mask: + .byte GET_1_BIT,GET_2_BITS,GET_3_BITS,GET_4_BITS,GET_5_BITS,GET_6_BITS,GET_7_BITS -; Base values. -tempBaseValue: - .byte 3,3,11 +inflateDynamic_tempSymbols: + .byte GET_2_BITS,GET_3_BITS,GET_7_BITS,0,8,7,9,6,10,5,11,4,12,3,13,2,14,1,15 -; Number of extra bits to read. -tempExtraBits: - .byte 2,3,7 - -; -------------------------------------------------------------------------- -; Arrays for the length and distance codes. - -; Base values. -lengthBaseValue_l: - .byte <3,<4,<5,<6,<7,<8,<9,<10 - .byte <11,<13,<15,<17,<19,<23,<27,<31 - .byte <35,<43,<51,<59,<67,<83,<99,<115 - .byte <131,<163,<195,<227,<258 -distanceBaseValue_l: - .byte <1,<2,<3,<4,<5,<7,<9,<13 - .byte <17,<25,<33,<49,<65,<97,<129,<193 - .byte <257,<385,<513,<769,<1025,<1537,<2049,<3073 - .byte <4097,<6145,<8193,<12289,<16385,<24577 -lengthBaseValue_h: - .byte >3,>4,>5,>6,>7,>8,>9,>10 - .byte >11,>13,>15,>17,>19,>23,>27,>31 - .byte >35,>43,>51,>59,>67,>83,>99,>115 - .byte >131,>163,>195,>227,>258 -distanceBaseValue_h: - .byte >1,>2,>3,>4,>5,>7,>9,>13 - .byte >17,>25,>33,>49,>65,>97,>129,>193 - .byte >257,>385,>513,>769,>1025,>1537,>2049,>3073 - .byte >4097,>6145,>8193,>12289,>16385,>24577 - -; Number of extra bits to read. -lengthExtraBits: - .byte 0,0,0,0,0,0,0,0 - .byte 1,1,1,1,2,2,2,2 - .byte 3,3,3,3,4,4,4,4 - .byte 5,5,5,5,0 -distanceExtraBits: - .byte 0,0,0,0,1,1,2,2 - .byte 3,3,4,4,5,5,6,6 - .byte 7,7,8,8,9,9,10,10 - .byte 11,11,12,12,13,13 +inflateDynamic_headerBits: + .byte GET_4_BITS,GET_5_BITS,GET_5_BITS +inflateDynamic_headerBase: + .byte 3,LENGTH_SYMBOLS,0 ; -------------------------------------------------------------------------- @@ -627,47 +523,28 @@ distanceExtraBits: .bss -; Number of literal codes of each length in the primary tree -; (MAX_BITS bytes, overlap with literalCodeLength). -literalCount: +; Data for building trees. -; -------------------------------------------------------------------------- -; Data for building the primary tree. - -; Lengths of literal codes. -literalCodeLength: +literalSymbolCodeLength: .res 256 -; Length of the end code. -endCodeLength: +controlSymbolCodeLength: + .res CONTROL_SYMBOLS + +; Huffman trees. + +nBitCode_clearFrom: +nBitCode_literalCount: + .res 2*TREE_SIZE +nBitCode_controlCount: + .res 2*TREE_SIZE +nBitCode_literalOffset: + .res 2*TREE_SIZE +nBitCode_controlOffset: + .res 2*TREE_SIZE +allLiteralsCodeLength: .res 1 -; Lengths of length codes. -lengthCodeLength: - .res 29 - -; -------------------------------------------------------------------------- -; Data for building the distance tree. - -; Lengths of distance codes. -distanceCodeLength: - .res 30 -; For two unused codes in the fixed trees and an 'end' mark. - .res 3 - -; -------------------------------------------------------------------------- -; The Huffman trees. - -; Number of codes of each length. -bitsCount: - .res TREES_SIZE -; Pointers to sorted codes of each length. -bitsPointer_l: - .res TREES_SIZE+1 -bitsPointer_h: - .res TREES_SIZE - -; Sorted codes. -sortedCodes: - .res 256+1+29+30+2 - - +codeToLiteralSymbol: + .res 256 +codeToControlSymbol: + .res CONTROL_SYMBOLS diff --git a/libsrc/zlib/uncompress.c b/libsrc/zlib/uncompress.c index 4e449a3ef..61838b47d 100644 --- a/libsrc/zlib/uncompress.c +++ b/libsrc/zlib/uncompress.c @@ -6,11 +6,11 @@ #include <zlib.h> -int __fastcall__ uncompress (char* dest, unsigned* destLen, - const char* source, unsigned sourceLen) +int __fastcall__ uncompress (unsigned char* dest, unsigned* destLen, + const unsigned char* source, unsigned sourceLen) { unsigned len; - unsigned char* ptr; + const unsigned char* ptr = source + sourceLen - 4; unsigned long csum; /* source[0]: Compression method and flags bits 0 to 3: Compression method (must be Z_DEFLATED) @@ -22,10 +22,9 @@ int __fastcall__ uncompress (char* dest, unsigned* destLen, */ if ((source[0] & 0x8f) != Z_DEFLATED || source[1] & 0x20) return Z_DATA_ERROR; - if ((((unsigned) source[0] << 8) | (unsigned char) source[1]) % 31) + if ((((unsigned) source[0] << 8) | source[1]) % 31) return Z_DATA_ERROR; *destLen = len = inflatemem(dest, source + 2); - ptr = (unsigned char*) source + sourceLen - 4; csum = adler32(adler32(0L, Z_NULL, 0), dest, len); if ((unsigned char) csum != ptr[3] || (unsigned char) (csum >> 8) != ptr[2] diff --git a/samples/Makefile b/samples/Makefile index 951706ce6..4007e3522 100644 --- a/samples/Makefile +++ b/samples/Makefile @@ -4,144 +4,578 @@ # This Makefile requires GNU make # -# Enter the target system here -SYS = c64 +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= c64 -# Determine the path to the executables and libraries. If the samples -# directory is part of a complete source tree, use the stuff from that -# source tree; otherwise, use the "install" directories. -ifeq "$(wildcard ../src)" "" -# No source tree -MOUS = /usr/lib/cc65/mou/$(SYS)*.mou -TGI = /usr/lib/cc65/tgi/$(SYS)*.tgi -ifneq "$(wildcard /usr/local/lib/cc65)" "" -MOUS = /usr/local/lib/cc65/mou/$(SYS)*.mou -TGI = /usr/local/lib/cc65/tgi/$(SYS)*.tgi -endif -ifdef CC65_HOME -MOUS = $(CC65_HOME)/mou/$(SYS)*.mou -TGI = $(CC65_HOME)/tgi/$(SYS)*.tgi -endif -CLIB = --lib $(SYS).lib -CL = cl65 -CC = cc65 -AS = ca65 -LD = ld65 +# Just the usual way to define a variable +# containing a single space character. +SPACE := +SPACE += +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q else -# "samples/" is a part of a complete source tree. -export CC65_HOME := $(abspath ..) -MOUS = ../mou/$(SYS)*.mou -TGI = ../tgi/$(SYS)*.tgi -CLIB = ../lib/$(SYS).lib -CL = ../bin/cl65 -CC = ../bin/cc65 -AS = ../bin/ca65 -LD = ../bin/ld65 + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r endif -# This one comes with VICE -C1541 = c1541 +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 +else + AS := $(if $(wildcard ../bin/ca65*),../bin/ca65,ca65) + CC := $(if $(wildcard ../bin/cc65*),../bin/cc65,cc65) + CL := $(if $(wildcard ../bin/cl65*),../bin/cl65,cl65) + LD := $(if $(wildcard ../bin/ld65*),../bin/ld65,ld65) +endif + +ifneq ($(filter disk samples.%,$(MAKECMDGOALS)),) + ifdef CC65_HOME + TARGET_PATH = $(CC65_HOME)/target + else + TARGET_PATH := $(if $(wildcard ../target),../target,$(shell $(CL) --print-target-path)) + endif + + # If TARGET_PATH contains spaces then it is presumed to contain escaped spaces. GNU make + # has very limited support for paths containing spaces. $(wildcard) is the only function + # that is aware of escaped spaces. However, $(wildcard) never returns paths with escaped + # spaces !!! So if it e.g. finds 4 files in a path with 2 spaces then one ends up with a + # return value consisting of 12 plain words :-(( + # + # Fortunately we can work around that behaviour here because we know that the files we + # are looking for have known extensions. So we can $(filter) the in our example above 12 + # words for file extensions so we come up with 4 path fragments. Then we remove those + # path fragments with $(notdir) from the file names. + # + # So far so good. But here we want to process files from different paths in a single + # recipe further down below and therefore want to prepend the paths to the files with + # $(addprefix). However, $(foreach) isn't aware of escaped spaces (only $(wildcard) is). + # Therefore, we need to replace the spaces with some other character temporarily in order + # to have $(foreach) generate one invocation per file. We use the character '?' for that + # purpose here, just because it is known to not be part of file names. + # + # Inside the recipe generated per file we then replace the '?' again with a space. As we + # want to be compatible with cmd.exe for execution we're not using an escaped space but + # rather double-quote the whole path. + # + # Note: The "strange" $(wildcard) further down below just serves the purpose to unescape + # spaces for cmd.exe. This could have as well been done with another $(subst). + + SUBST_TARGET_PATH := $(subst \$(SPACE),?,$(TARGET_PATH)) + + EMD := $(wildcard $(TARGET_PATH)/$(SYS)/drv/emd/*) + MOU := $(wildcard $(TARGET_PATH)/$(SYS)/drv/mou/*) + TGI := $(wildcard $(TARGET_PATH)/$(SYS)/drv/tgi/*) + + EMD := $(addprefix $(SUBST_TARGET_PATH)/$(SYS)/drv/emd/,$(notdir $(filter %.emd,$(EMD)))) + MOU := $(addprefix $(SUBST_TARGET_PATH)/$(SYS)/drv/mou/,$(notdir $(filter %.mou,$(MOU)))) + TGI := $(addprefix $(SUBST_TARGET_PATH)/$(SYS)/drv/tgi/,$(notdir $(filter %.tgi,$(TGI)))) + + # This one comes with the VICE emulator. + # See http://vice-emu.sourceforge.net/ + C1541 ?= c1541 + + # For this one, see https://applecommander.github.io/ + AC ?= ac.jar + + # For this one, see https://www.horus.com/~hias/atari/ + DIR2ATR ?= dir2atr +endif + +DISK_c64 = samples.d64 +DISK_apple2 = samples.dsk +DISK_apple2enh = samples.dsk +DISK_atari = samples.atr +DISK_atarixl = samples.atr # -------------------------------------------------------------------------- # System-dependent settings +# For convenience, these groups and lines are sorted alphabetically, first +# by target-machine group, then by mission, then by program and sub-target. # The Apple machines need the start address adjusted when using TGI -LDFLAGS_mandelbrot_apple2 = --start-addr 0x4000 -LDFLAGS_tgidemo_apple2 = --start-addr 0x4000 +LDFLAGS_mandelbrot_apple2 = --start-addr 0x4000 LDFLAGS_mandelbrot_apple2enh = --start-addr 0x4000 -LDFLAGS_tgidemo_apple2enh = --start-addr 0x4000 +LDFLAGS_tgidemo_apple2 = --start-addr 0x4000 +LDFLAGS_tgidemo_apple2enh = --start-addr 0x4000 -# The Apple ][ needs the start address adjusted for the mousetest -LDFLAGS_mousetest_apple2 = --start-addr 0x4000 +# The Apple ][ needs the start address adjusted for the mousedemo +LDFLAGS_mousedemo_apple2 = --start-addr 0x4000 -# The atarixl target needs the start address adjusted when using TGI -LDFLAGS_mandelbrot_atarixl = --start-addr 0x4000 -LDFLAGS_tgidemo_atarixl = --start-addr 0x4000 +# The Apple machines need the end address adjusted for large programs +LDFLAGS_gunzip65_apple2 = -D __HIMEM__=0xBF00 +LDFLAGS_gunzip65_apple2enh = -D __HIMEM__=0xBF00 # The atari target needs to reserve some memory when using TGI LDFLAGS_mandelbrot_atari = -D __RESERVED_MEMORY__=0x2000 -LDFLAGS_tgidemo_atari = -D __RESERVED_MEMORY__=0x2000 +LDFLAGS_tgidemo_atari = -D __RESERVED_MEMORY__=0x2000 + +# The atarixl target needs the start address adjusted when using TGI +LDFLAGS_mandelbrot_atarixl = --start-addr 0x4000 +LDFLAGS_tgidemo_atarixl = --start-addr 0x4000 # -------------------------------------------------------------------------- # Generic rules +.PHONY: samples all mostlyclean clean install zip disk platforms + %: %.c %: %.s .c.o: - @echo $< - @$(CC) $(CFLAGS) -Oirs --codesize 500 -T -g -t $(SYS) $< - @$(AS) $(<:.c=.s) + $(CC) $(CFLAGS) -Ors --codesize 500 -T -g -t $(SYS) $< + $(AS) $(<:.c=.s) .s.o: - @echo $< - @$(AS) $(AFLAGS) -t $(SYS) $< + $(AS) $(ASFLAGS) -t $(SYS) $< .PRECIOUS: %.o .o: - @$(LD) $(LDFLAGS_$(@F)_$(SYS)) -o $@ -t $(SYS) -m $@.map $^ $(CLIB) +ifeq ($(SYS),vic20) + $(LD) $(LDFLAGS_$(@F)_$(SYS)) $(LDFLAGS) -o $@ -C vic20-32k.cfg -m $@.map $^ $(SYS).lib +else + $(LD) $(LDFLAGS_$(@F)_$(SYS)) $(LDFLAGS) -o $@ -t $(SYS) -m $@.map $^ $(SYS).lib +endif # -------------------------------------------------------------------------- -# List of executables. This list could be made target-dependent by checking -# $(SYS). +# Lists of subdirectories -EXELIST = ascii \ - diodemo \ - enumdevdir \ - fire \ - gunzip65 \ - hello \ - mandelbrot \ - mousetest \ - multdemo \ - nachtm \ - ovrldemo \ - plasma \ - sieve \ - tgidemo +# disasm depends on cpp +DIRLIST = tutorial geos atari2600 atari5200 apple2 gamate lynx supervision sym1 cbm # -------------------------------------------------------------------------- -# Rules to make the binaries +# Lists of executables -.PHONY: all -all: $(EXELIST) +EXELIST_apple2 = \ + ascii \ + checkversion \ + diodemo \ + enumdevdir \ + gunzip65 \ + hello \ + mandelbrot \ + mousedemo \ + multdemo \ + ovrldemo \ + sieve \ + tinyshell \ + tgidemo + +EXELIST_apple2enh = $(EXELIST_apple2) + +EXELIST_atari = \ + ascii \ + checkversion \ + gunzip65 \ + hello \ + mandelbrot \ + mousedemo \ + multdemo \ + ovrldemo \ + sieve \ + tinyshell \ + tgidemo + +EXELIST_atarixl = $(EXELIST_atari) + +EXELIST_atari2600 = \ + notavailable + +EXELIST_atari5200 = \ + notavailable + +EXELIST_atmos = \ + ascii \ + checkversion \ + hello \ + mandelbrot \ + sieve \ + tgidemo + +EXELIST_bbc = \ + notavailable + +EXELIST_c64 = \ + ascii \ + checkversion \ + enumdevdir \ + gunzip65 \ + hello \ + mandelbrot \ + mousedemo \ + multdemo \ + ovrldemo \ + sieve \ + tinyshell \ + tgidemo + +EXELIST_c128 = \ + ascii \ + checkversion \ + enumdevdir \ + gunzip65 \ + hello \ + mandelbrot \ + mousedemo \ + sieve \ + tinyshell \ + tgidemo + +EXELIST_c16 = \ + ascii \ + checkversion \ + enumdevdir \ + tinyshell \ + hello + +EXELIST_cbm510 = \ + ascii \ + checkversion \ + gunzip65 \ + hello \ + mousedemo \ + tinyshell \ + sieve + +EXELIST_cbm610 = \ + ascii \ + checkversion \ + gunzip65 \ + hello \ + tinyshell \ + sieve + +EXELIST_creativision = \ + ascii \ + hello + +EXELIST_cx16 = \ + ascii \ + checkversion \ + enumdevdir \ + gunzip65 \ + hello \ + mandelbrot \ + mousedemo \ + sieve \ + tinyshell \ + tgidemo + +EXELIST_gamate = \ + hello + +EXELIST_geos-cbm = \ + ascii \ + checkversion \ + diodemo + +EXELIST_geos-apple = \ + ascii + +EXELIST_lunix = \ + notavailable + +EXELIST_lynx = \ + notavailable + +EXELIST_nes = \ + hello + +EXELIST_osic1p = \ + notavailable + +EXELIST_pce = \ + hello + +EXELIST_pet = \ + ascii \ + checkversion \ + enumdevdir \ + hello \ + tinyshell \ + sieve + +EXELIST_plus4 = \ + ascii \ + checkversion \ + enumdevdir \ + gunzip65 \ + hello \ + tinyshell \ + sieve + +EXELIST_sim6502 = \ + checkversion \ + gunzip65 + +EXELIST_sim65c02 = $(EXELIST_sim6502) + +EXELIST_supervision = \ + notavailable + +EXELIST_sym1 = \ + notavailable + +EXELIST_telestrat = \ + ascii \ + checkversion \ + gunzip65 \ + hello \ + mandelbrot \ + sieve \ + tgidemo + +EXELIST_vic20 = \ + ascii \ + checkversion \ + enumdevdir \ + hello \ + mandelbrot \ + sieve \ + tgidemo + +# Unlisted targets will try to build everything. +# That lets us learn what they cannot build, and what settings +# we need to use for programs that can be built and run. +ifndef EXELIST_$(SYS) +EXELIST_$(SYS) := ${patsubst %.c,%,$(wildcard *.c)} +endif + +define SUBDIR_recipe + +@+$(MAKE) -C $(dir) --no-print-directory $@ + +endef # SUBDIR_recipe + +# -------------------------------------------------------------------------- +# Rules to make the binaries and the disk + +samples: $(EXELIST_$(SYS)) + $(foreach dir,$(DIRLIST),$(SUBDIR_recipe)) + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: generic samples not available for" $(SYS) +endif + +disk: $(DISK_$(SYS)) + +all: + +# -------------------------------------------------------------------------- +# List of every supported platform +TARGETS := \ + apple2 \ + apple2enh \ + atari \ + atarixl \ + atari2600 \ + atari5200 \ + atmos \ + bbc \ + c128 \ + c16 \ + c64 \ + cbm510 \ + cbm610 \ + creativision \ + cx16 \ + gamate \ + lunix \ + lynx \ + nes \ + osic1p \ + pce \ + pet \ + plus4 \ + sim6502 \ + sim65c02 \ + supervision \ + sym1 \ + telestrat \ + vic20 + +# -------------------------------------------------------------------------- +# Rule to make the binaries for every platform + +define TARGET_recipe + +@$(MAKE) -j2 SYS:=$(T) +@$(MAKE) --no-print-directory clean SYS:=$(T) + +endef # TARGET_recipe + +platforms: + $(foreach T,$(TARGETS),$(TARGET_recipe)) # -------------------------------------------------------------------------- # Overlay rules. Overlays need special ld65 configuration files. Also, the # overlay file-names are shortenned to fit the Atari's 8.3-character limit. -multdemo: multidemo.o - @$(LD) -o $@ -C $(SYS)-overlay.cfg -m $@.map $^ $(CLIB) +multdemo: multidemo.o + $(LD) $(LDFLAGS) -o $@ -C $(SYS)-overlay.cfg -m $@.map $^ $(SYS).lib -ovrldemo: overlaydemo.o - @$(LD) -o $@ -C $(SYS)-overlay.cfg -m $@.map $^ $(CLIB) +ovrldemo: overlaydemo.o + $(LD) $(LDFLAGS) -o $@ -C $(SYS)-overlay.cfg -m $@.map $^ $(SYS).lib + +OVERLAYLIST := $(foreach I,1 2 3,multdemo.$I ovrldemo.$I) + +# -------------------------------------------------------------------------- +# TGI programs on the VIC-20 need a special ld65 configuration file. + +ifeq ($(SYS),vic20) +mandelbrot.o: override CFLAGS += -D DYN_DRV=0 +mandelbrot: mandelbrot.o + $(LD) $(LDFLAGS) -o $@ -C vic20-tgi.cfg -m $@.map $^ $(SYS).lib + +# tgidemo needs at least 16K of RAM expansion. +tgidemo.o: override CFLAGS += -D DYN_DRV=0 +tgidemo: tgidemo.o + $(LD) -D __HIMEM__=0x6000 $(LDFLAGS) -o $@ -C vic20-tgi.cfg -m $@.map $^ $(SYS).lib +endif + +# -------------------------------------------------------------------------- +# some programs link against getsp.o + +getsp.o: getsp.s + $(AS) $(ASFLAGS) -t $(SYS) $< + +ifneq ($(SYS),vic20) +tinyshell: tinyshell.o getsp.o + $(LD) $(LDFLAGS) -t $(SYS) -o $@ $^ $(SYS).lib +endif + +# some programs need more memory on the vic20 +ifeq ($(SYS),vic20) +tinyshell: tinyshell.o getsp.o + $(LD) $(LDFLAGS) -o $@ -C vic20-32k.cfg -m $@.map $^ $(SYS).lib +endif # -------------------------------------------------------------------------- # Rule to make a CBM disk with all samples. Needs the c1541 program that comes # with the VICE emulator. -.PHONY: disk -disk: samples.d64 +define D64_WRITE_PRG_recipe -samples.d64: all - @$(C1541) -format samples,AA d64 $@ > /dev/null - @for exe in $(EXELIST); do\ - $(C1541) -attach $@ -write $$exe > /dev/null || exit $$?;\ - done - @for mod in $(TGI) $(MOUS); do\ - $(C1541) -attach $@ -write $$mod > /dev/null || exit $$?;\ - done +$(C1541) -attach $@ -write "$(subst ?,$(SPACE),$(file))" $(notdir $(file)),p >$(NULLDEV) + +endef # D64_WRITE_PRG_recipe + +define D64_WRITE_SEQ_recipe + +$(C1541) -attach $@ -write "$(subst ?,$(SPACE),$(file))" $(notdir $(file)),s >$(NULLDEV) + +endef # D64_WRITE_SEQ_recipe + +samples.d64: samples + @$(C1541) -format "samples,00" d64 $@ >$(NULLDEV) + $(foreach file,$(EXELIST_$(SYS)),$(D64_WRITE_PRG_recipe)) + $(foreach file,$(OVERLAYLIST),$(D64_WRITE_PRG_recipe)) + $(foreach file,$(EMD) $(MOU) $(TGI),$(D64_WRITE_SEQ_recipe)) + +# -------------------------------------------------------------------------- +# Rule to make an Apple II disk with all samples. Needs the AppleCommander +# program, available at https://applecommander.github.io/, and a template disk +# named 'prodos.dsk'. + +define DSK_WRITE_BIN_recipe + +$(if $(findstring BF00,$(LDFLAGS_$(notdir $(file))_$(SYS))), \ + java -jar $(AC) -p $@ $(notdir $(file)).system sys <"$(wildcard $(TARGET_PATH)/$(SYS)/util/loader.system)") +java -jar $(AC) -as $@ $(notdir $(file)) <"$(file)" + +endef # DSK_WRITE_BIN_recipe + +define DSK_WRITE_REL_recipe + +java -jar $(AC) -p $@ $(notdir $(file)) rel 0 <"$(subst ?,$(SPACE),$(file))" + +endef # DSK_WRITE_REL_recipe + +samples.dsk: samples + cp prodos.dsk $@ + $(foreach file,$(EXELIST_$(SYS)),$(DSK_WRITE_BIN_recipe)) + $(foreach file,$(OVERLAYLIST),$(DSK_WRITE_REL_recipe)) + $(foreach file,$(EMD) $(MOU) $(TGI),$(DSK_WRITE_REL_recipe)) + +# -------------------------------------------------------------------------- +# Rule to make an Atari disk with all samples. Needs the dir2atr program +# available at http://www.horus.com/~hias/atari/ and the MyDos4534 variant +# of dos.sys and dup.sys. + +define ATR_WRITE_recipe + +cp "$(subst ?,$(SPACE),$(file))" atr/$(notdir $(file)) + +endef # ATR_WRITE_recipe + +samples.atr: samples + @mkdir atr + cp "dos.sys" atr/dos.sys + cp "dup.sys" atr/dup.sys + @$(foreach file,$(EXELIST_$(SYS)),$(ATR_WRITE_recipe)) + @$(foreach file,$(OVERLAYLIST),$(ATR_WRITE_recipe)) + @$(foreach file,$(EMD) $(MOU) $(TGI),$(ATR_WRITE_recipe)) + $(DIR2ATR) -d -b MyDos4534 3200 $@ atr + @$(RMDIR) atr + +# -------------------------------------------------------------------------- +# Installation rules + +INSTALL = install +samplesdir = $(PREFIX)/share/cc65/samples + +install: + $(INSTALL) -d $(DESTDIR)$(samplesdir) + $(INSTALL) -d $(DESTDIR)$(samplesdir)/geos + $(INSTALL) -d $(DESTDIR)$(samplesdir)/tutorial + $(INSTALL) -d $(DESTDIR)$(samplesdir)/atari2600 + $(INSTALL) -d $(DESTDIR)$(samplesdir)/atari5200 + $(INSTALL) -d $(DESTDIR)$(samplesdir)/apple2 + $(INSTALL) -d $(DESTDIR)$(samplesdir)/cbm + $(INSTALL) -d $(DESTDIR)$(samplesdir)/gamate + $(INSTALL) -d $(DESTDIR)$(samplesdir)/supervision + $(INSTALL) -m0644 *.* $(DESTDIR)$(samplesdir) + $(INSTALL) -m0644 readme.txt $(DESTDIR)$(samplesdir) + $(INSTALL) -m0644 Makefile $(DESTDIR)$(samplesdir) + $(INSTALL) -m0644 geos/*.* $(DESTDIR)$(samplesdir)/geos + $(INSTALL) -m0644 tutorial/*.* $(DESTDIR)$(samplesdir)/tutorial + $(INSTALL) -m0644 atari2600/*.* $(DESTDIR)$(samplesdir)/atari2600 + $(INSTALL) -m0644 atari5200/*.* $(DESTDIR)$(samplesdir)/atari5200 + $(INSTALL) -m0644 apple2/*.* $(DESTDIR)$(samplesdir)/apple2 + $(INSTALL) -m0644 cbm/*.* $(DESTDIR)$(samplesdir)/cbm + $(INSTALL) -m0644 gamate/*.* $(DESTDIR)$(samplesdir)/gamate + $(INSTALL) -m0644 supervision/*.* $(DESTDIR)$(samplesdir)/supervision + +# -------------------------------------------------------------------------- +# Packaging rules + +zip: + @cd .. && zip -r cc65 samples/ # -------------------------------------------------------------------------- # Clean-up rules -.PHONY: clean -clean: - $(RM) *~ *.map *.o *.s *.lbl +mostlyclean: + @$(DEL) *.lbl *.map *.o 2>$(NULLDEV) +# we cant use .s since we have asm files in the directory that we want to keep + @$(DEL) ${patsubst %.c,%.s,$(wildcard *.c)} 2>$(NULLDEV) -.PHONY: zap -zap: clean - $(RM) $(EXELIST) samples.d64 - $(RM) multdemo.? ovrldemo.? +clean: mostlyclean + @$(DEL) $(EXELIST_$(SYS)) $(DISK_$(SYS)) 2>$(NULLDEV) + @$(DEL) multdemo.? ovrldemo.? 2>$(NULLDEV) + $(foreach dir,$(DIRLIST),$(SUBDIR_recipe)) diff --git a/samples/README b/samples/README deleted file mode 100644 index edd06ff02..000000000 --- a/samples/README +++ /dev/null @@ -1,122 +0,0 @@ - -This directory contains sample programs for the cc65 compiler. - -Below is a short description for each of the programs together with a list of -the supported platforms. - -Please note: - - * The supplied makefile needs GNU make. It works out of the box on Linux - and similar systems. If you're using Windows, you will have to compile - the programs manually. - - * The makefile specifies the C64 as the default target platform, because all - but one - of the programs run on this platform. When compiling for another platform, - you will have to change the line that specifies the target system at the - top of the makefile. - - -List of supplied sample programs: - ------------------------------------------------------------------------------ -Name: ascii -Description: Shows the ASCII (or ATASCII, PETSCII) codes of typed - characters. Written and contributed by Greg King - <gngking@erols.com>. -Platforms: All platforms with conio or stdio (compile time configurable). - ------------------------------------------------------------------------------ -Name: diodemo -Description: A disc copy program written and contributed by Oliver - Schmidt, <ol.sc@web.de>. Supports single or dual disc copy. -Platforms: The program does depend on conio and dio (direct disk i/o), - so it does currently compile for the Atari and Apple ][ - machines. - ------------------------------------------------------------------------------ -Name: enumdevdir -Description: Enumerates all devices, directories and files. Written and - contributed by Oliver Schmidt, <ol.sc@web.de>. -Platforms: All systems with device enumeration and directory access - (currently the C64, the C128 and the Apple ][). - ------------------------------------------------------------------------------ -Name: fire -Description: Another graphics demo written by groepaz/hitmen. -Platforms: The program is currently only running on the C64, but should - be portable to the C128 and CBM510 (and maybe more machines). - ------------------------------------------------------------------------------ -Name: gunzip65 -Description: A gunzip utility for 6502 based machines written by Piotr - Fusik <fox@scene.pl>. -Platforms: Runs on all platforms with file I/O (currently the Atari, the - Apple ][ and most Commodore machines). - ------------------------------------------------------------------------------ -Name: hello -Description: A nice "Hello world" type program that uses the conio - console I/O library for output. -Platforms: Runs on all platforms that support conio, which means: - Apple ][, Atari, C16, C64, C128, CBM510, CBM610, PET, Plus/4 - ------------------------------------------------------------------------------ -Name: mandelbrot -Description: A mandelbrot demo using integer arithmetic. The demo was - written by groepaz/hitmen and converted to cc65 using TGI - graphics by Stephan Haubenthal. -Platforms: Runs on all platforms that have TGI support: - Apple ][, C64, C128, Oric Atmos, Geos and Lynx. - ------------------------------------------------------------------------------ -Name: mousetest -Description: Tests and shows how to use the mouse. -Platforms: All systems with mouse and conio support: - C64, C128, CBM510, Atari, Apple ][ - ------------------------------------------------------------------------------ -Name: multidemo -Description: Shows how to combine multiple cc65 features incl. overlays - and extended memory drivers. Written and contributed by - Oliver Schmidt, <ol.sc@web.de>. -Platforms: All systems with an overlay linker config, disk directory - access and EMD support (currently the C64, the C128, - the Atari and the Apple ][). - ------------------------------------------------------------------------------ -Name: nachtm -Description: Plays "Eine kleine Nachtmusik" by Wolfgang Amadeus Mozart -Platforms: All systems that have the Commodore SID (Sound Interface - Device): - C64, C128, CBM510, CBM610 - ------------------------------------------------------------------------------ -Name: overlaydemo -Description: Shows how to load overlay files from disk. Written and - contributed by Oliver Schmidt, <ol.sc@web.de>. -Platforms: All systems with an overlay linker config (currently the C64, - the C128, the Atari and the Apple ][). - ------------------------------------------------------------------------------ -Name: plasma -Description: A fancy graphics demo written by groepaz/hitmen. -Platforms: The program needs a VIC, or a TED, so it runs on the following - systems: - C64, C128, CBM510, Plus/4 - ------------------------------------------------------------------------------ -Name: sieve -Description: Implements the "Sieve of Eratosthenes" as a way to find all - prime numbers in a specific number interval. Often used as - a benchmark program. -Platforms: All systems with conio and clock support: - Atari, C16, C64, C128, CBM510, CBM610, PET, Plus/4, - Apple ][ (without timing due to missing clock support) - ------------------------------------------------------------------------------ -Name: tgidemo -Description: Shows some of the graphics capabilities of the "tiny graphics - interface". -Platforms: Runs on all platforms that have TGI support: - Apple ][, C64, C128, Oric Atmos, Geos and Lynx. diff --git a/samples/apple2/Makefile b/samples/apple2/Makefile new file mode 100644 index 000000000..55e84aed6 --- /dev/null +++ b/samples/apple2/Makefile @@ -0,0 +1,94 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= apple2 + +# For this one see https://applecommander.github.io/ +AC ?= ac.jar + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) +endif + +EXELIST_apple2 = \ + hgrshow \ + hgrtest \ + dhgrshow + +ifneq ($(EXELIST_$(SYS)),) +samples: $(EXELIST_$(SYS)) +else +samples: notavailable +endif + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: apple2 tests not available for" $(SYS) +else +# suppress the "nothing to be done for 'samples' message + @echo > $(NULLDEV) +endif + +disk: hgr.dsk dhgr.dsk + +hgr.dsk: hgrshow hgrtest + cp prodos.dsk $@ + java -jar $(AC) -as $@ hgrshow <hgrshow + java -jar $(AC) -as $@ hgrtest <hgrtest + java -jar $(AC) -p $@ astronaut.hgr bin 0x2000 <astronaut.hgr + java -jar $(AC) -p $@ chips.hgr bin 0x2000 <chips.hgr + java -jar $(AC) -p $@ macrometer.hgr bin 0x2000 <macrometer.hgr + java -jar $(AC) -p $@ mariner.hgr bin 0x2000 <mariner.hgr + java -jar $(AC) -p $@ rose.hgr bin 0x2000 <rose.hgr + java -jar $(AC) -p $@ werner.hgr bin 0x2000 <werner.hgr + java -jar $(AC) -p $@ winston.hgr bin 0x2000 <winston.hgr + +hgrshow: hgrshow.c + $(CL) -Oirs -t apple2 --start-addr 0x4000 -m hgrshow.map $^ + +hgrtest: hgrtest.c werner.s + $(CL) -Oirs -t apple2 -C apple2-hgr.cfg -m hgrtest.map $^ + +dhgr.dsk: dhgrshow + cp prodos.dsk $@ + java -jar $(AC) -as $@ dhgrshow <dhgrshow + java -jar $(AC) -p $@ catface.dhgr bin 0x2000 <catface.dhgr + java -jar $(AC) -p $@ gatsby.dhgr bin 0x2000 <gatsby.dhgr + java -jar $(AC) -p $@ girl.dhgr bin 0x2000 <girl.dhgr + java -jar $(AC) -p $@ monarch.dhgr bin 0x2000 <monarch.dhgr + java -jar $(AC) -p $@ superman.dhgr bin 0x2000 <superman.dhgr + java -jar $(AC) -p $@ venice.dhgr bin 0x2000 <venice.dhgr + +dhgrshow: dhgrshow.c + $(CL) -Oirs -t apple2enh --start-addr 0x4000 -m dhgrshow.map $^ + +clean: + @$(DEL) hgr.dsk dhgr.dsk 2>$(NULLDEV) + @$(DEL) hgrshow hgrshow.map 2>$(NULLDEV) + @$(DEL) hgrtest hgrtest.map 2>$(NULLDEV) + @$(DEL) dhgrshow dhgrshow.map 2>$(NULLDEV) diff --git a/samples/apple2/astronaut.hgr b/samples/apple2/astronaut.hgr new file mode 100644 index 000000000..f19f0099a Binary files /dev/null and b/samples/apple2/astronaut.hgr differ diff --git a/samples/apple2/catface.dhgr b/samples/apple2/catface.dhgr new file mode 100644 index 000000000..1f373d9d0 Binary files /dev/null and b/samples/apple2/catface.dhgr differ diff --git a/samples/apple2/chips.hgr b/samples/apple2/chips.hgr new file mode 100644 index 000000000..c8302db4d Binary files /dev/null and b/samples/apple2/chips.hgr differ diff --git a/samples/apple2/dhgrshow.c b/samples/apple2/dhgrshow.c new file mode 100644 index 000000000..8bc8bcebd --- /dev/null +++ b/samples/apple2/dhgrshow.c @@ -0,0 +1,46 @@ +// cl65 -t apple2enh --start-addr 0x4000 dhgrshow.c + +#include <tgi.h> +#include <conio.h> +#include <fcntl.h> +#include <string.h> +#include <unistd.h> +#include <dirent.h> +#include <peekpoke.h> + +void main (void) +{ + unsigned old; + DIR *dir; + struct dirent *ent; + + old = videomode (VIDEOMODE_80x24); + tgi_install (a2e_hi_tgi); + tgi_init (); + POKE (0xC05E, 0); + + dir = opendir ("."); + while (ent = readdir (dir)) { + char *ext; + int hgr; + + ext = strrchr (ent->d_name, '.'); + if (!ext || strcasecmp (ext, ".dhgr")) + continue; + + hgr = open (ent->d_name, O_RDONLY); + POKE (0xC055, 0); + read (hgr, (void*)0x2000, 0x2000); + POKE (0xC054, 0); + read (hgr, (void*)0x2000, 0x2000); + close (hgr); + + if (cgetc () == '\r') + break; + } + closedir (dir); + + POKE (0xC05F, 0); + tgi_uninstall (); + videomode (old); +} diff --git a/samples/apple2/gatsby.dhgr b/samples/apple2/gatsby.dhgr new file mode 100644 index 000000000..dc3750e66 Binary files /dev/null and b/samples/apple2/gatsby.dhgr differ diff --git a/samples/apple2/girl.dhgr b/samples/apple2/girl.dhgr new file mode 100644 index 000000000..af332edbe Binary files /dev/null and b/samples/apple2/girl.dhgr differ diff --git a/samples/apple2/hgrshow.c b/samples/apple2/hgrshow.c new file mode 100644 index 000000000..518395715 --- /dev/null +++ b/samples/apple2/hgrshow.c @@ -0,0 +1,37 @@ +// cl65 -t apple2 --start-addr 0x4000 hgrshow.c + +#include <tgi.h> +#include <conio.h> +#include <fcntl.h> +#include <string.h> +#include <unistd.h> +#include <dirent.h> + +void main (void) +{ + DIR *dir; + struct dirent *ent; + + tgi_install (a2_hi_tgi); + tgi_init (); + + dir = opendir ("."); + while (ent = readdir (dir)) { + char *ext; + int hgr; + + ext = strrchr (ent->d_name, '.'); + if (!ext || strcasecmp (ext, ".hgr")) + continue; + + hgr = open (ent->d_name, O_RDONLY); + read (hgr, (void*)0x2000, 0x2000); + close (hgr); + + if (cgetc () == '\r') + break; + } + closedir (dir); + + tgi_uninstall (); +} diff --git a/samples/apple2/hgrtest.c b/samples/apple2/hgrtest.c new file mode 100644 index 000000000..7323cbb73 --- /dev/null +++ b/samples/apple2/hgrtest.c @@ -0,0 +1,26 @@ +// cl65 -t apple2 -C apple2-hgr.cfg hgrtest.c werner.s + +#include <tgi.h> +#include <conio.h> + +#pragma code-name (push, "LOWCODE") + +void say (const char* text) +{ + tgi_setcolor (TGI_COLOR_BLACK); + tgi_outtextxy (41, 33, text); +} + +#pragma code-name (pop) + +void main (void) +{ + tgi_install (a2_hi_tgi); + tgi_init (); + cgetc (); + + say ("Hi Dude !"); + cgetc (); + + tgi_uninstall (); +} diff --git a/samples/apple2/macrometer.hgr b/samples/apple2/macrometer.hgr new file mode 100644 index 000000000..925df6e41 Binary files /dev/null and b/samples/apple2/macrometer.hgr differ diff --git a/samples/apple2/mariner.hgr b/samples/apple2/mariner.hgr new file mode 100644 index 000000000..2024a7596 Binary files /dev/null and b/samples/apple2/mariner.hgr differ diff --git a/samples/apple2/monarch.dhgr b/samples/apple2/monarch.dhgr new file mode 100644 index 000000000..8812c4b2d Binary files /dev/null and b/samples/apple2/monarch.dhgr differ diff --git a/samples/apple2/rose.hgr b/samples/apple2/rose.hgr new file mode 100644 index 000000000..d18fd83f0 Binary files /dev/null and b/samples/apple2/rose.hgr differ diff --git a/samples/apple2/superman.dhgr b/samples/apple2/superman.dhgr new file mode 100644 index 000000000..4886227c2 Binary files /dev/null and b/samples/apple2/superman.dhgr differ diff --git a/samples/apple2/venice.dhgr b/samples/apple2/venice.dhgr new file mode 100644 index 000000000..9d3cb4c85 Binary files /dev/null and b/samples/apple2/venice.dhgr differ diff --git a/samples/apple2/werner.hgr b/samples/apple2/werner.hgr new file mode 100644 index 000000000..2405e2409 Binary files /dev/null and b/samples/apple2/werner.hgr differ diff --git a/samples/apple2/werner.s b/samples/apple2/werner.s new file mode 100644 index 000000000..f9200f694 --- /dev/null +++ b/samples/apple2/werner.s @@ -0,0 +1,2 @@ +.segment "HGR" +.incbin "werner.hgr" diff --git a/samples/apple2/winston.hgr b/samples/apple2/winston.hgr new file mode 100644 index 000000000..074ff178d Binary files /dev/null and b/samples/apple2/winston.hgr differ diff --git a/samples/ascii.c b/samples/ascii.c index fd293e213..0d191c966 100644 --- a/samples/ascii.c +++ b/samples/ascii.c @@ -58,7 +58,7 @@ int main(void) { /* This prompt fits on the VIC-20's narrow screen. */ - PRINT("Type characters to see\r\ntheir hexadecimal code\r\nnumbers:\r\n\n"); + PRINT("Type characters to see\r\ntheir hexadecimal code\r\nnumbers - 'Q' quits:\r\n\n"); screensize(&width, &height); /* get the screen's dimensions */ width /= 6; /* get number of codes on a line */ cursor(true); diff --git a/samples/atari2600/Makefile b/samples/atari2600/Makefile new file mode 100644 index 000000000..bd2ebc41a --- /dev/null +++ b/samples/atari2600/Makefile @@ -0,0 +1,59 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= atari2600 + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 + SP = $(CC65_HOME)/bin/sp65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) + SP := $(if $(wildcard ../../bin/sp65*),../../bin/sp65,sp65) +endif + +EXELIST_atari2600 = \ + hello + +ifneq ($(EXELIST_$(SYS)),) +samples: $(EXELIST_$(SYS)) +else +samples: notavailable +endif + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: atari 2600 samples not available for" $(SYS) +else +# suppress the "nothing to be done for 'samples' message + @echo > $(NULLDEV) +endif + +hello: hello.c + $(CL) -t $(SYS) -O -o hello -m hello.map hello.c + +clean: + @$(DEL) $(EXELIST_atari2600) 2>$(NULLDEV) + @$(DEL) *.map 2>$(NULLDEV) diff --git a/samples/atari2600/hello.c b/samples/atari2600/hello.c new file mode 100644 index 000000000..4785ad90b --- /dev/null +++ b/samples/atari2600/hello.c @@ -0,0 +1,56 @@ +/*****************************************************************************/ +/* */ +/* Atari VCS 2600 sample C program */ +/* */ +/* Florent Flament (contact@florentflament.com), 2017 */ +/* */ +/*****************************************************************************/ + +#include <atari2600.h> + +// PAL Timings +// Roughly computed based on Stella Programmer's guide (Steve Wright) +// scanlines count per section. +#define VBLANK_TIM64 51 // 45 lines * 76 cycles/line / 64 cycles/tick +#define KERNAL_T1024 17 // 228 lines * 76 cycles/line / 1024 cycles/tick +#define OVERSCAN_TIM64 42 // 36 lines * 76 cycles/line / 64 cycles/tick + +// Testing memory zones +const unsigned char rodata_v[] = "Hello!"; +unsigned char data_v = 0x77; +unsigned char bss_v; + +void main(void) { + unsigned char color = 0x79; // Stack variable + bss_v = 0x88; // Testing BSS variable + + for/*ever*/(;;) { + // Vertical Sync signal + TIA.vsync = 0x02; + TIA.wsync = 0x00; + TIA.wsync = 0x00; + TIA.wsync = 0x00; + TIA.vsync = 0x00; + + // Vertical Blank timer setting + RIOT.tim64t = VBLANK_TIM64; + + // Doing frame computation during blank + TIA.colubk = color++; // Update color + + // Wait for end of Vertical Blank + while (RIOT.timint == 0) {} + TIA.wsync = 0x00; + TIA.vblank = 0x00; // Turn on beam + + // Display frame + RIOT.t1024t = KERNAL_T1024; + while (RIOT.timint == 0) {} + TIA.wsync = 0x00; + TIA.vblank = 0x02; // Turn off beam + + // Overscan + RIOT.tim64t = OVERSCAN_TIM64; + while (RIOT.timint == 0) {} + } +} diff --git a/samples/atari5200/Makefile b/samples/atari5200/Makefile new file mode 100644 index 000000000..2fbda11d9 --- /dev/null +++ b/samples/atari5200/Makefile @@ -0,0 +1,56 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= atari5200 + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) +endif + +EXELIST_atari5200 = \ + hello + +ifneq ($(EXELIST_$(SYS)),) +samples: $(EXELIST_$(SYS)) +else +samples: notavailable +endif + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: atari 5200 tests not available for" $(SYS) +else +# suppress the "nothing to be done for 'samples' message + @echo > $(NULLDEV) +endif + +hello: hello.c + $(CL) -t atari5200 -o hello hello.c + +clean: + @$(DEL) hello 2>$(NULLDEV) diff --git a/samples/atari5200/hello.c b/samples/atari5200/hello.c new file mode 100644 index 000000000..e1a7a0137 --- /dev/null +++ b/samples/atari5200/hello.c @@ -0,0 +1,109 @@ +/* +** Fancy hello world program using cc65. +** +** Ullrich von Bassewitz (ullrich@von-bassewitz.de) +** +** TEST version for atari5200 conio, using all four colors +*/ + + + +#include <stdlib.h> +#include <string.h> +#include <conio.h> +#include <joystick.h> + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +static const char Text [] = "Hello world!"; +static unsigned char colors[] = { COLOR_WHITE, COLOR_GREEN, COLOR_RED, COLOR_BLACK }; + + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +int main (void) +{ + unsigned char XSize, YSize; + unsigned char PosY; + unsigned char i = 0; + + /* Set screen colors */ + (void) textcolor (COLOR_WHITE); + (void) bordercolor (COLOR_BLACK); + (void) bgcolor (COLOR_BLACK); + + /* Clear the screen, put cursor in upper left corner */ + clrscr (); + + /* Ask for the screen size */ + screensize (&XSize, &YSize); + + /* Install joystick driver */ + joy_install (joy_static_stddrv); + + while (1) { + /* Draw a border around the screen */ + + /* Top line */ + cputc (CH_ULCORNER); + chline (XSize - 2); + cputc (CH_URCORNER); + + /* Vertical line, left side */ + cvlinexy (0, 1, YSize - 2); + + /* Bottom line */ + cputc (CH_LLCORNER); + chline (XSize - 2); + cputc (CH_LRCORNER); + + /* Vertical line, right side */ + cvlinexy (XSize - 1, 1, YSize - 2); + + /* Write the greeting in the mid of the screen */ + gotoxy ((XSize - strlen (Text)) / 2, YSize / 2); + cprintf ("%s", Text); + + PosY = wherey (); + textcolor (colors[i]); /* switch to color #0 */ + cputsxy(3, ++PosY, "COLOR 0"); + textcolor ((colors[i] + 1) & 3); /* switch to color #1 */ + cputsxy(3, ++PosY, "COLOR 1"); + textcolor ((colors[i] + 2) & 3); /* switch to color #2 */ + cputsxy(3, ++PosY, "COLOR 2"); + textcolor ((colors[i] + 3) & 3); /* switch to color #3 */ /* color #3 is the background color. So written text isn't visible. */ + cputsxy(3, ++PosY, "COLOR 3"); + + /* Wait for the user to press and release a button */ + while (!joy_read (JOY_1)) + ; + while (joy_read (JOY_1)) + ; + + i = (i + 1) & 3; + + /* Change colors */ + textcolor (colors[i]); + bgcolor ((colors[i] + 3) & 3); + + /* Clear the screen again */ + clrscr (); + } + /* not reached */ + + joy_uninstall (); + + /* Done */ + return EXIT_SUCCESS; +} diff --git a/samples/cbm/Makefile b/samples/cbm/Makefile new file mode 100644 index 000000000..03387a061 --- /dev/null +++ b/samples/cbm/Makefile @@ -0,0 +1,164 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= c64 + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 + SP = $(CC65_HOME)/bin/sp65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) + SP := $(if $(wildcard ../../bin/sp65*),../../bin/sp65,sp65) +endif + +ifneq ($(filter disk samples.%,$(MAKECMDGOALS)),) + ifdef CC65_HOME + TARGET_PATH = $(CC65_HOME)/target + else + TARGET_PATH := $(if $(wildcard ../target),../target,$(shell $(CL) --print-target-path)) + endif + + # If TARGET_PATH contains spaces then it is presumed to contain escaped spaces. GNU make + # has very limited support for paths containing spaces. $(wildcard) is the only function + # that is aware of escaped spaces. However, $(wildcard) never returns paths with escaped + # spaces !!! So if it e.g. finds 4 files in a path with 2 spaces then one ends up with a + # return value consisting of 12 plain words :-(( + # + # Fortunately we can work around that behaviour here because we know that the files we + # are looking for have known extensions. So we can $(filter) the in our example above 12 + # words for file extensions so we come up with 4 path fragments. Then we remove those + # path fragments with $(notdir) from the file names. + # + # So far so good. But here we want to process files from different paths in a single + # recipe further down below and therefore want to prepend the paths to the files with + # $(addprefix). However, $(foreach) isn't aware of escaped spaces (only $(wildcard) is). + # Therefore, we need to replace the spaces with some other character temporarily in order + # to have $(foreach) generate one invocation per file. We use the character '?' for that + # purpose here, just because it is known to not be part of file names. + # + # Inside the recipe generated per file we then replace the '?' again with a space. As we + # want to be compatible with cmd.exe for execution we're not using an escaped space but + # rather double-quote the whole path. + # + # Note: The "strange" $(wildcard) further down below just serves the purpose to unescape + # spaces for cmd.exe. This could have as well been done with another $(subst). + + SUBST_TARGET_PATH := $(subst \$(SPACE),?,$(TARGET_PATH)) + + EMD := $(wildcard $(TARGET_PATH)/$(SYS)/drv/emd/*) + MOU := $(wildcard $(TARGET_PATH)/$(SYS)/drv/mou/*) + TGI := $(wildcard $(TARGET_PATH)/$(SYS)/drv/tgi/*) + + EMD := $(addprefix $(SUBST_TARGET_PATH)/$(SYS)/drv/emd/,$(notdir $(filter %.emd,$(EMD)))) + MOU := $(addprefix $(SUBST_TARGET_PATH)/$(SYS)/drv/mou/,$(notdir $(filter %.mou,$(MOU)))) + TGI := $(addprefix $(SUBST_TARGET_PATH)/$(SYS)/drv/tgi/,$(notdir $(filter %.tgi,$(TGI)))) + + # This one comes with the VICE emulator. + # See http://vice-emu.sourceforge.net/ + C1541 ?= c1541 +endif + +DISK_c64 = samples.d64 + +EXELIST_c64 = \ + fire \ + plasma \ + nachtm + +EXELIST_c128 = \ + fire \ + plasma \ + nachtm + +EXELIST_cbm510 = \ + fire \ + plasma \ + nachtm + +EXELIST_cbm610 = \ + nachtm + +EXELIST_plus4 = \ + plasma + +EXELIST_c16 = \ + notavailable + +EXELIST_pet = \ + notavailable + +EXELIST_vic20 = \ + notavailable + +ifneq ($(EXELIST_$(SYS)),) +samples: $(EXELIST_$(SYS)) +else +samples: notavailable +endif + +disk: $(DISK_$(SYS)) + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: cbm samples not available for" $(SYS) +else +# suppress the "nothing to be done for 'samples' message + @echo > $(NULLDEV) +endif + +fire: fire.c + $(CL) -t $(SYS) -O -o fire -m fire.map fire.c +plasma: plasma.c + $(CL) -t $(SYS) -O -o plasma -m plasma.map plasma.c +nachtm: nachtm.c + $(CL) -t $(SYS) -O -o nachtm -m nachtm.map nachtm.c + +# -------------------------------------------------------------------------- +# Rule to make a CBM disk with all samples. Needs the c1541 program that comes +# with the VICE emulator. + +define D64_WRITE_PRG_recipe + +$(C1541) -attach $@ -write "$(subst ?,$(SPACE),$(file))" $(notdir $(file)),p >$(NULLDEV) + +endef # D64_WRITE_PRG_recipe + +define D64_WRITE_SEQ_recipe + +$(C1541) -attach $@ -write "$(subst ?,$(SPACE),$(file))" $(notdir $(file)),s >$(NULLDEV) + +endef # D64_WRITE_SEQ_recipe + +samples.d64: samples + @$(C1541) -format "samples,00" d64 $@ >$(NULLDEV) + $(foreach file,$(EXELIST_$(SYS)),$(D64_WRITE_PRG_recipe)) +# $(foreach file,$(OVERLAYLIST),$(D64_WRITE_PRG_recipe)) +# $(foreach file,$(EMD) $(MOU) $(TGI),$(D64_WRITE_SEQ_recipe)) + +clean: + @$(DEL) $(EXELIST_$(SYS)) 2>$(NULLDEV) + @$(DEL) *.map 2>$(NULLDEV) + @$(DEL) $(DISK_$(SYS)) 2>$(NULLDEV) diff --git a/samples/fire.c b/samples/cbm/fire.c similarity index 98% rename from samples/fire.c rename to samples/cbm/fire.c index 44eb07c88..40eff0707 100644 --- a/samples/fire.c +++ b/samples/cbm/fire.c @@ -17,6 +17,7 @@ #include <string.h> /* for memset */ #include <time.h> #include <conio.h> +#include <cbm.h> @@ -60,9 +61,9 @@ #ifdef DOVSYNC -# define waitvsync() while ((signed char)VIC.ctrl1 >= 0) +# define WAITVSYNC() waitvsync() #else -# define waitvsync() +# define WAITVSYNC() #endif @@ -203,12 +204,12 @@ int main (void) while (!kbhit()) { /* Build page 1, then make it visible */ fire (SCREEN1); - waitvsync (); + WAITVSYNC (); outb (&VIC.addr, PAGE1); /* Build page 2, then make it visible */ fire (SCREEN2); - waitvsync (); + WAITVSYNC (); outb (&VIC.addr, PAGE2); /* Count frames */ diff --git a/samples/nachtm.c b/samples/cbm/nachtm.c similarity index 99% rename from samples/nachtm.c rename to samples/cbm/nachtm.c index 0b962fa5d..02801da24 100644 --- a/samples/nachtm.c +++ b/samples/cbm/nachtm.c @@ -972,12 +972,12 @@ static void MakeNiceScreen (void) /* Clear the screen hide the cursor, set colors */ #ifdef __CBM610__ - textcolor (COLOR_WHITE); + (void)textcolor (COLOR_WHITE); #else - textcolor (COLOR_GRAY3); + (void)textcolor (COLOR_GRAY3); #endif - bordercolor (COLOR_BLACK); - bgcolor (COLOR_BLACK); + (void)bordercolor (COLOR_BLACK); + (void)bgcolor (COLOR_BLACK); clrscr (); cursor (0); diff --git a/samples/plasma.c b/samples/cbm/plasma.c similarity index 97% rename from samples/plasma.c rename to samples/cbm/plasma.c index 7b092ec81..f48d6dc77 100644 --- a/samples/plasma.c +++ b/samples/cbm/plasma.c @@ -1,7 +1,7 @@ /*****************************************************************************\ ** plasma test program for cc65. ** ** ** -** (w)2001 by groepaz/hitmen ** +** (w)2001 by groepaz ** ** ** ** Cleanup and porting by Ullrich von Bassewitz. ** ** ** @@ -12,6 +12,7 @@ #include <stdlib.h> #include <time.h> #include <conio.h> +#include <cc65.h> @@ -53,7 +54,6 @@ #pragma static-locals (1); - static const unsigned char sinustable[0x100] = { 0x80, 0x7d, 0x7a, 0x77, 0x74, 0x70, 0x6d, 0x6a, 0x67, 0x64, 0x61, 0x5e, 0x5b, 0x58, 0x55, 0x52, @@ -130,8 +130,6 @@ static void doplasma (register unsigned char* scrn) } } - - static void makechar (void) { static const unsigned char bittab[8] = { @@ -146,7 +144,7 @@ static void makechar (void) for (i = 0; i < 8; ++i){ b = 0; for (ii = 0; ii < 8; ++ii) { - if ((rand() & 0xFF) > s) { + if ((rand() & 0xFFu) > s) { b |= bittab[ii]; } } @@ -292,12 +290,11 @@ int main (void) gotoxy (0, 1); cprintf ("frames: %lu", f); gotoxy (0, 2); cprintf ("fps : %lu.%u", fps, fps10); - /* Wait for a key, then end */ - cputsxy (0, 4, "Press any key when done..."); - (void) cgetc (); + if (doesclrscrafterexit ()) { + cputsxy (0, 4, "Press any key when done..."); + (void) cgetc (); + } /* Done */ return EXIT_SUCCESS; } - - diff --git a/samples/checkversion.c b/samples/checkversion.c new file mode 100644 index 000000000..1d3494a87 --- /dev/null +++ b/samples/checkversion.c @@ -0,0 +1,40 @@ + +/* Until 2.19 the __CC65__ macro was defined as (VER_MAJOR * 0x100) + (VER_MINOR * 0x10), + * which caused it to contain broken values in compiler releases 2.16 to 2.19. The + * macro was fixed some time after 2.19 to (VER_MAJOR * 0x100) + VER_MINOR. + * + * The following strategy can be used to still compare for less or greater versions, + * should this really be necessary or wanted - it is not recommended afterall. + */ + +#include <stdio.h> +#include <stdlib.h> + +#if ((__CC65__ & 0xff00) > 3) || ((__CC65__ & 0x000f) > 0) +/* compiler version is 2.19-git or higher */ +# define VER_MAJOR ((__CC65__ >> 8) & 0xff) +# define VER_MINOR (__CC65__ & 0xff) +#elif ((__CC65__ & 0xff00) == 3) +/* broken values in version 2.16 - 2.19-git before the bug was fixed */ +# define VER_MAJOR 2 +# define VER_MINOR (((__CC65__ >> 4) & 0x0f) + 16) +#else +/* values before 2.16 */ +# define VER_MAJOR ((__CC65__ >> 8) & 0xff) +# define VER_MINOR ((__CC65__ >> 4) & 0x0f) +#endif + +/* define a new value that will work for comparing all versions */ +#define VERSION ((VER_MAJOR << 8) + VER_MINOR) + +int main(void) +{ + printf("__CC65__ defined as %04x\n", __CC65__); + printf("compiler version is %u.%u\n", VER_MAJOR, VER_MINOR); + if (__CC65__ == VERSION) { + printf("__CC65__ is defined correctly as (VER_MAJOR * 0x100) + VER_MINOR\n"); + return EXIT_SUCCESS; + } + printf("__CC65__ is incorrectly defined as (VER_MAJOR * 0x100) + (VER_MINOR * 0x10)\n"); + return EXIT_FAILURE; +} diff --git a/samples/diodemo.c b/samples/diodemo.c index 752c2f78a..3e52f2fa9 100644 --- a/samples/diodemo.c +++ b/samples/diodemo.c @@ -36,6 +36,7 @@ #include <conio.h> #include <ctype.h> #include <errno.h> +#include <cc65.h> #include <dio.h> @@ -123,6 +124,11 @@ int main (int argc, const char* argv[]) clrscr (); screensize (&ScreenX, &ScreenY); + /* Allow user to read exit messages */ + if (doesclrscrafterexit ()) { + atexit ((void (*)) cgetc); + } + cputs ("Floppy Disk Copy\r\n"); chline (16); cputs ("\r\n"); diff --git a/samples/disasm/.gitignore b/samples/disasm/.gitignore new file mode 100644 index 000000000..46c4eca80 --- /dev/null +++ b/samples/disasm/.gitignore @@ -0,0 +1,2 @@ +*.s +image.bin diff --git a/samples/disasm/Makefile b/samples/disasm/Makefile new file mode 100644 index 000000000..f1d93f5da --- /dev/null +++ b/samples/disasm/Makefile @@ -0,0 +1,59 @@ +# Sample makefile using a preprocessor against info files +# and the --sync-lines option + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 + DA = $(CC65_HOME)/bin/da65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) + DA := $(if $(wildcard ../../bin/da65*),../../bin/da65,da65) +endif + +CPP = cpp +#CPPFLAGS = -DTEST_ERROR + +ASMS = fixed.s bank0.s bank1.s +DAIS = fixed.dai bank0.dai bank1.dai + +.SUFFIXES: .da .dai .s + +samples: image.bin $(ASMS) + +$(DAIS): fixed.da + +.da.dai: + $(CPP) -o $@ $(CPPFLAGS) $< + +.dai.s: + $(DA) --sync-lines -o $@ -i $< image.bin + +image.bin: image.s image.cfg + $(CL) -t none -C image.cfg -o image.bin image.s + +clean: + @$(DEL) $(ASMS) 2>$(NULLDEV) + @$(DEL) $(DAIS) 2>$(NULLDEV) + @$(DEL) image.bin 2>$(NULLDEV) + diff --git a/samples/disasm/bank0.da b/samples/disasm/bank0.da new file mode 100644 index 000000000..4fb96ce93 --- /dev/null +++ b/samples/disasm/bank0.da @@ -0,0 +1,16 @@ +// Da65 input file before preprocessed by cpp +// Bank0 ROM map + +#define TARGET_BANK 0 +global { + inputoffs $00010; + inputsize $4000; + startaddr $8000; + cpu "6502"; +}; + +#include "fixed.da" + +label { addr $8000; name "Bank0ProcA"; }; +label { addr $8123; name "Bank0ProcB"; }; +range { start $A000; end $BFFF; name "Bank0Data"; type ByteTable; }; diff --git a/samples/disasm/bank1.da b/samples/disasm/bank1.da new file mode 100644 index 000000000..fd5e324a9 --- /dev/null +++ b/samples/disasm/bank1.da @@ -0,0 +1,16 @@ +// Da65 input file before preprocessed by cpp +// Bank1 ROM map + +#define TARGET_BANK 1 +global { + inputoffs $04010; + inputsize $4000; + startaddr $8000; + cpu "6502"; +}; + +#include "fixed.da" + +range { start $8000; end $AFFF; name "Bank1Data"; type ByteTable; }; +label { addr $B000; name "Bank1ProcA"; }; +label { addr $B123; name "Bank1ProcB"; }; diff --git a/samples/disasm/fixed.da b/samples/disasm/fixed.da new file mode 100644 index 000000000..f8ad4ba27 --- /dev/null +++ b/samples/disasm/fixed.da @@ -0,0 +1,30 @@ +// Da65 input file before preprocessed by cpp +// RAM and Fixed ROM map + +#ifndef FIXED_DA_INCLUDED +#define FIXED_DA_INCLUDED + +#ifndef TARGET_BANK +#define TARGET_BANK -1 +global { + inputoffs $0C010; + inputsize $4000; + startaddr $C000; + cpu "6502"; +}; +#endif /* !defined(TARGET_BANK) */ + +// ---- RAM map ---- +label { addr $00; name "VariableA"; }; +label { addr $01; name "VariableB"; }; +label { addr $0100; name "Stack"; size $0100; }; +#if defined(TEST_ERROR) && TARGET_BANK == 0 +erroneous_line; +#endif + +// ---- Fixed ROM map ---- +label { addr $C000; name "CommonProcA"; }; +label { addr $C123; name "CommonProcB"; }; +range { start $E123; end $FFFF; name "CommonData"; type ByteTable; }; + +#endif /* !defined(FIXED_DA_INCLUDED) */ diff --git a/samples/disasm/image.cfg b/samples/disasm/image.cfg new file mode 100644 index 000000000..2225c722f --- /dev/null +++ b/samples/disasm/image.cfg @@ -0,0 +1,15 @@ + +MEMORY { + HEADER: file = %O, start = $0000, size = $0010, fill = yes; + BANK00: file = %O, start = $8000, size = $4000, fill = yes; + BANK01: file = %O, start = $8000, size = $4000, fill = yes; + BANK02: file = %O, start = $8000, size = $4000, fill = yes; + FIXED: file = %O, start = $c000, size = $4000, fill = yes; +} +SEGMENTS { + HDR: load = HEADER, type = rw, optional = yes, define = yes; + BANK0: load = BANK00, type = rw, optional = yes, define = yes; + BANK1: load = BANK01, type = rw, optional = yes, define = yes; + BANK2: load = BANK02, type = rw, optional = yes, define = yes; + FIX: load = FIXED, type = rw, optional = yes, define = yes; +} diff --git a/samples/enumdevdir.c b/samples/enumdevdir.c index f270b43af..bf1ff3bbb 100644 --- a/samples/enumdevdir.c +++ b/samples/enumdevdir.c @@ -8,39 +8,55 @@ #include <stdio.h> -#include <conio.h> #include <string.h> #include <unistd.h> #include <stdlib.h> +#include <stdbool.h> #include <device.h> #include <dirent.h> +#include <cc65.h> -void printdir (char *newdir) +/* returns true for error, false for OK */ +bool printdir (char *newdir) { - char olddir[FILENAME_MAX]; - char curdir[FILENAME_MAX]; + char *olddir; + char *curdir; DIR *dir; struct dirent *ent; char *subdirs = NULL; unsigned dirnum = 0; unsigned num; - getcwd (olddir, sizeof (olddir)); + olddir = malloc (FILENAME_MAX); + if (olddir == NULL) { + perror ("cannot allocate memory"); + return true; + } + + getcwd (olddir, FILENAME_MAX); if (chdir (newdir)) { /* If chdir() fails we just print the ** directory name - as done for files. */ printf (" Dir %s\n", newdir); - return; + free (olddir); + return false; + } + + curdir = malloc (FILENAME_MAX); + if (curdir == NULL) { + perror ("cannot allocate memory"); + return true; } /* We call getcwd() in order to print the ** absolute pathname for a subdirectory. */ - getcwd (curdir, sizeof (curdir)); + getcwd (curdir, FILENAME_MAX); printf (" Dir %s:\n", curdir); + free (curdir); /* Calling opendir() always with "." avoids ** fiddling around with pathname separators. @@ -65,18 +81,27 @@ void printdir (char *newdir) closedir (dir); for (num = 0; num < dirnum; ++num) { - printdir (subdirs + FILENAME_MAX * num); + if (printdir (subdirs + FILENAME_MAX * num)) + break; } free (subdirs); chdir (olddir); + free (olddir); + return false; } void main (void) { unsigned char device; - char devicedir[FILENAME_MAX]; + char *devicedir; + + devicedir = malloc (FILENAME_MAX); + if (devicedir == NULL) { + perror ("cannot allocate memory"); + return; + } /* Calling getfirstdevice()/getnextdevice() does _not_ turn on the motor ** of a drive-type device and does _not_ check for a disk in the drive. @@ -88,7 +113,7 @@ void main (void) /* Calling getdevicedir() _does_ check for a (formatted) disk in a ** floppy-disk-type device and returns NULL if that check fails. */ - if (getdevicedir (device, devicedir, sizeof (devicedir))) { + if (getdevicedir (device, devicedir, FILENAME_MAX)) { printdir (devicedir); } else { printf (" N/A\n"); @@ -97,5 +122,9 @@ void main (void) device = getnextdevice (device); } - cgetc (); + if (doesclrscrafterexit ()) { + getchar (); + } + + free (devicedir); } diff --git a/samples/gamate/Makefile b/samples/gamate/Makefile new file mode 100644 index 000000000..cfb8505cc --- /dev/null +++ b/samples/gamate/Makefile @@ -0,0 +1,57 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= gamate + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) +endif + +EXELIST_gamate = \ + nachtm.bin + +ifneq ($(EXELIST_$(SYS)),) +samples: $(EXELIST_$(SYS)) +else +samples: notavailable +endif + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: gamate tests not available for" $(SYS) +else +# suppress the "nothing to be done for 'samples' message + @echo > $(NULLDEV) +endif + +nachtm.bin: nachtm.c + $(CL) -Os -l nachtm.lst -t gamate -o nachtm.bin nachtm.c + ../../util/gamate/gamate-fixcart nachtm.bin + +clean: + @$(DEL) nachtm.bin nachtm.lst 2>$(NULLDEV) diff --git a/testcode/lib/gamate/nachtm.c b/samples/gamate/nachtm.c similarity index 100% rename from testcode/lib/gamate/nachtm.c rename to samples/gamate/nachtm.c diff --git a/samples/geos/Makefile b/samples/geos/Makefile new file mode 100644 index 000000000..1fc49a873 --- /dev/null +++ b/samples/geos/Makefile @@ -0,0 +1,135 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= geos-cbm + +# If SYS was given on the commandline, redirect "c64" to "geos-cbm" and +# "apple2enh" to "geos-apple" +ifeq ($(origin SYS),command line) + ifeq ($(SYS),c64) + override SYS = geos-cbm + $(info GEOS: c64 -> geos-cbm) + endif + ifeq ($(SYS),apple2enh) + override SYS = geos-apple + $(info GEOS: apple2enh -> geos-apple) + endif +endif + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 + SP = $(CC65_HOME)/bin/sp65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) + SP := $(if $(wildcard ../../bin/sp65*),../../bin/sp65,sp65) +endif + +DIRLIST = grc + +define SUBDIR_recipe + +@+$(MAKE) SYS=$(SYS) -C $(dir) --no-print-directory $@ + +endef # SUBDIR_recipe + +EXELIST_geos-cbm = \ + bitmap-demo.cvt \ + filesel.cvt \ + geosver.cvt \ + getid.cvt \ + hello1.cvt \ + hello2.cvt \ + overlay-demo.cvt \ + vector-demo.cvt \ + yesno.cvt + +EXELIST_geos-apple = \ + bitmap-demo.cvt \ + filesel.cvt \ + hello1.cvt \ + hello2.cvt \ + overlay-demo.cvt \ + vector-demo.cvt \ + yesno.cvt + +# omitted: dialog.c grphstr.c inittab.c menu.c +# TODO: geosconio.cvt rmvprot.cvt + +ifneq ($(EXELIST_$(SYS)),) +samples: $(EXELIST_$(SYS)) + $(foreach dir,$(DIRLIST),$(SUBDIR_recipe)) +else +samples: + ifeq ($(MAKELEVEL),0) + @echo "info: geos samples not available for" $(SYS) + else +# suppress the "nothing to be done for 'samples' message + @echo > $(NULLDEV) + endif +endif + +bitmap.c: logo.pcx + $(SP) -r logo.pcx -c geos-bitmap -w bitmap.c,ident=bitmap + +bitmap-demo.cvt: bitmap.c bitmap-demores.grc bitmap-demo.c + $(CL) -t $(SYS) -O -o bitmap-demo.cvt -m bitmap-demo.map bitmap-demores.grc bitmap-demo.c + +filesel.cvt: fileselres.grc filesel.c + $(CL) -t $(SYS) -O -o filesel.cvt -m filesel.map fileselres.grc filesel.c + +geosconio.cvt: geosconiores.grc geosconio.c + $(CL) -t $(SYS) -O -o geosconio.cvt -m geosconio.map geosconiores.grc geosconio.c + +geosver.cvt: geosverres.grc geosver.c + $(CL) -t $(SYS) -O -o geover.cvt -m geosver.map geosverres.grc geosver.c + +getid.cvt: getidres.grc getid.c + $(CL) -t $(SYS) -O -o getid.cvt -m getid.map getidres.grc getid.c + +hello1.cvt: hello1res.grc hello1.c + $(CL) -t $(SYS) -O -o hello1.cvt -m hello1.map hello1res.grc hello1.c + +hello2.cvt: hello2res.grc hello2.c + $(CL) -t $(SYS) -O -o hello2.cvt -m hello2.map hello2res.grc hello2.c + +overlay-demo.cvt: overlay-demores.grc overlay-demo.c + $(CL) -t $(SYS) -O -o overlay-demo.cvt -m overlay-demo.map overlay-demores.grc overlay-demo.c + +rmvprot.cvt: rmvprotres.grc rmvprot.c + $(CL) -t $(SYS) -O -o rmvprot.cvt -m rmvprot.map rmvprotres.grc rmvprot.c + +vector-demo.cvt: vector-demores.grc vector-demo.c + $(CL) -t $(SYS) -O -o vector-demo.cvt -m vector-demo.map vector-demores.grc vector-demo.c + +yesno.cvt: yesnores.grc yesno.c + $(CL) -t $(SYS) -O -o yesno.cvt -m yesno.map yesnores.grc yesno.c + + +clean: + @$(DEL) overlay-demores.h 2>$(NULLDEV) + @$(DEL) bitmap.c 2>$(NULLDEV) + @$(DEL) *.cvt 2>$(NULLDEV) + @$(DEL) *.map 2>$(NULLDEV) + $(foreach dir,$(DIRLIST),$(SUBDIR_recipe)) diff --git a/samples/geos/dialog.c b/samples/geos/dialog.c index 27199a493..c3231e855 100644 --- a/samples/geos/dialog.c +++ b/samples/geos/dialog.c @@ -1,4 +1,4 @@ -/* Note: +/* Note: ** This is just a sample piece of code that shows how to use some structs - ** it may not even run. */ @@ -28,5 +28,5 @@ static const dlgBoxStr myDialog = { void main (void) { - DoDlgBox (&myDialog); + DoDlgBox (&myDialog); } diff --git a/samples/geos/filesel.c b/samples/geos/filesel.c index c0a591eb9..fcca258bb 100644 --- a/samples/geos/filesel.c +++ b/samples/geos/filesel.c @@ -1,11 +1,11 @@ /* GEOSLib example - + using DlgBoxFileSelect - + Maciej 'YTM/Elysium' Witkowiak <ytm@elysium.pl> - + 26.12.1999 */ diff --git a/samples/geos/geosconio.c b/samples/geos/geosconio.c index 963fa06a0..55acac38e 100644 --- a/samples/geos/geosconio.c +++ b/samples/geos/geosconio.c @@ -9,16 +9,16 @@ void main(void) char ch; DlgBoxOk("Now the screen will be", "cleared."); - + clrscr(); - + DlgBoxOk("Now a character will be", "written at 20,20"); - + gotoxy(20, 20); cputc('A'); DlgBoxOk("Now a string will be", "written at 0,1"); - + cputsxy(0, 1, CBOLDON "Just" COUTLINEON "a " CITALICON "string." CPLAINTEXT ); DlgBoxOk("Write text and finish it", "with a dot."); @@ -31,7 +31,7 @@ void main(void) cursor(0); DlgBoxOk("Seems that it is all for conio.", "Let's test mouse routines."); - + mouse_init(1); cputsxy(0, 2, CBOLDON "Now you can't see mouse (press any key)" CPLAINTEXT); mouse_hide(); diff --git a/samples/geos/geosver.c b/samples/geos/geosver.c new file mode 100644 index 000000000..fa8351e0d --- /dev/null +++ b/samples/geos/geosver.c @@ -0,0 +1,62 @@ +#include <geos.h> +#include <conio.h> + +// Let's define the window we're operating +struct window wholeScreen = {0, SC_PIX_HEIGHT-1, 0, SC_PIX_WIDTH-1}; + + +void main (void) +{ + unsigned char os = get_ostype(); + char *machine = NULL; + char *version = NULL; + unsigned char good = 1; + + SetPattern(0); + InitDrawWindow(&wholeScreen); + Rectangle(); + gotoxy(0, 4); + if (os == GEOS4) { + machine = "plus4"; + version = "GEOS v3.5"; + } else { + if ((os & GEOS128) == GEOS128) { + machine = "c128"; + } else { + machine = "c64"; + } + os &= 0x7f; + if (os == GEOS_V10) { + version = "GEOS v1.0"; + } else if (os == GEOS_V11) { + version = "GEOS v1.1"; + } else if (os == GEOS_V12) { + version = "GEOS v1.2"; + } else if (os == GEOS_V13) { + version = "GEOS v1.3"; + } else if (os == GEOS_V15) { + version = "GEOS v1.5"; + } else if (os == GEOS_V20) { + version = "GEOS v2.0"; + } else if (os == MEGAPATCH3) { + version = "MegaPatch 3"; + } else if (os == GATEWAY) { + version = "GateWay"; + } else if ((os & WHEELS) == WHEELS) { + version = "Wheels"; + } else { + version = "Unknown GEOS version"; + good = 0; + } + } + + if (good) { + cprintf("%s (%s)", version, machine); + } else { + cprintf("%s (%s) (%d)", version, machine, os); + } + + Sleep(10*50); + + return; +} diff --git a/samples/geos/geosverres.grc b/samples/geos/geosverres.grc new file mode 100644 index 000000000..9a3d72a26 --- /dev/null +++ b/samples/geos/geosverres.grc @@ -0,0 +1,8 @@ + +; this is the resource file for geosver.c, a GEOS application example + +HEADER APPLICATION "geosver" "GEOSver" "V1.0" { +dostype USR +author "Marco van den Heuvel" +info "This is a C prog compiled with cc65 and GEOSLib." +} diff --git a/samples/geos/getid.c b/samples/geos/getid.c index 4331e27e8..200a1478e 100644 --- a/samples/geos/getid.c +++ b/samples/geos/getid.c @@ -16,7 +16,7 @@ const graphicStr Table = { void Exit(void) { - exit(0); + exit(EXIT_SUCCESS); } void Menu = { diff --git a/samples/geos/grc/Makefile b/samples/geos/grc/Makefile new file mode 100644 index 000000000..ef30a6e03 --- /dev/null +++ b/samples/geos/grc/Makefile @@ -0,0 +1,70 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= geos-cbm + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 + GRC = $(CC65_HOME)/bin/grc65 +else + AS := $(if $(wildcard ../../../bin/ca65*),../../../bin/ca65,ca65) + CC := $(if $(wildcard ../../../bin/cc65*),../../../bin/cc65,cc65) + CL := $(if $(wildcard ../../../bin/cl65*),../../../bin/cl65,cl65) + LD := $(if $(wildcard ../../../bin/ld65*),../../../bin/ld65,ld65) + GRC := $(if $(wildcard ../../../bin/grc65*),../../../bin/grc65,grc65) +endif + +EXELIST_geos-cbm = \ + test.s \ + vlir.cvt + +ifneq ($(EXELIST_$(SYS)),) +samples: $(EXELIST_$(SYS)) +else +samples: + ifeq ($(MAKELEVEL),0) + @echo "info: grc sample not available for" $(SYS) + else +# suppress the "nothing to be done for 'samples' message + @echo > $(NULLDEV) + endif +endif + +test.s: test.grc + $(GRC) -s test.s test.grc + +vlir.cvt: vlir.grc vlir0.s vlir1.s vlir2.s +# using separate calls here for demonstration purposes: + $(GRC) -t $(SYS) -s vlir.s vlir.grc + $(AS) -t $(SYS) vlir.s + $(AS) -t $(SYS) vlir0.s + $(AS) -t $(SYS) vlir1.s + $(AS) -t $(SYS) vlir2.s + $(LD) -t $(SYS) -o vlir.cvt vlir.o vlir0.o vlir1.o vlir2.o $(SYS).lib + +# you can also do the above in one command: +# $(CL) -t $(SYS) -o vlir.cvt vlir.grc vlir0.s vlir1.s vlir2.s + +clean: + @$(DEL) test.s test.h 2>$(NULLDEV) + @$(DEL) vlir.s vlir.cvt vlir.c vlir.h 2>$(NULLDEV) + @$(DEL) *.o 2>$(NULLDEV) diff --git a/testcode/grc/test.grc b/samples/geos/grc/test.grc similarity index 100% rename from testcode/grc/test.grc rename to samples/geos/grc/test.grc diff --git a/testcode/grc/vlir.grc b/samples/geos/grc/vlir.grc similarity index 100% rename from testcode/grc/vlir.grc rename to samples/geos/grc/vlir.grc diff --git a/testcode/grc/vlir0.s b/samples/geos/grc/vlir0.s similarity index 91% rename from testcode/grc/vlir0.s rename to samples/geos/grc/vlir0.s index 2e9a3ffd9..fd869835c 100644 --- a/testcode/grc/vlir0.s +++ b/samples/geos/grc/vlir0.s @@ -5,10 +5,10 @@ ; include some GEOS defines - .include "../../libsrc/geos/inc/const.inc" - .include "../../libsrc/geos/inc/jumptab.inc" - .include "../../libsrc/geos/inc/geossym.inc" - .include "../../libsrc/geos/inc/geosmac.inc" + .include "../../../libsrc/geos-common/const.inc" + .include "../../../libsrc/geos-cbm/jumptab.inc" + .include "../../../libsrc/geos-cbm/geossym.inc" + .include "../../../libsrc/geos-common/geosmac.inc" ; import load addresses for all VLIR chains ; these labels are defined upon linking with ld65 diff --git a/testcode/grc/vlir1.s b/samples/geos/grc/vlir1.s similarity index 82% rename from testcode/grc/vlir1.s rename to samples/geos/grc/vlir1.s index eae34565e..170442af7 100644 --- a/testcode/grc/vlir1.s +++ b/samples/geos/grc/vlir1.s @@ -5,10 +5,10 @@ ; include some GEOS defines - .include "../../libsrc/geos/inc/const.inc" - .include "../../libsrc/geos/inc/jumptab.inc" - .include "../../libsrc/geos/inc/geossym.inc" - .include "../../libsrc/geos/inc/geosmac.inc" + .include "../../../libsrc/geos-common/const.inc" + .include "../../../libsrc/geos-cbm/jumptab.inc" + .include "../../../libsrc/geos-cbm/geossym.inc" + .include "../../../libsrc/geos-common/geosmac.inc" ; export names of functions that will be used in the main program diff --git a/testcode/grc/vlir2.s b/samples/geos/grc/vlir2.s similarity index 78% rename from testcode/grc/vlir2.s rename to samples/geos/grc/vlir2.s index 9d180c847..8dfb79464 100644 --- a/testcode/grc/vlir2.s +++ b/samples/geos/grc/vlir2.s @@ -5,10 +5,10 @@ ; similar to vlir1.s except the fact that this is chain #2 - .include "../../libsrc/geos/inc/const.inc" - .include "../../libsrc/geos/inc/jumptab.inc" - .include "../../libsrc/geos/inc/geossym.inc" - .include "../../libsrc/geos/inc/geosmac.inc" + .include "../../../libsrc/geos-common/const.inc" + .include "../../../libsrc/geos-cbm/jumptab.inc" + .include "../../../libsrc/geos-cbm/geossym.inc" + .include "../../../libsrc/geos-common/geosmac.inc" .export OVERLAY2_Function1 .export OVERLAY2_Function2 diff --git a/samples/geos/hello1.c b/samples/geos/hello1.c index fd46d157d..bd51dd1b9 100644 --- a/samples/geos/hello1.c +++ b/samples/geos/hello1.c @@ -1,11 +1,11 @@ /* GEOSLib example - + Hello, world example - with DBox - + Maciej 'YTM/Elysium' Witkowiak <ytm@elysium.pl> - + 26.12.1999 */ @@ -18,7 +18,7 @@ void main (void) DlgBoxOk(CBOLDON "Hello, world" CPLAINTEXT, "This is written in C!"); - + // Normal apps exit from main into system's mainloop, and app finish // when user selects it from icons or menu, but here we want to exit // immediately. @@ -26,7 +26,7 @@ void main (void) // MainLoop(); // we can do: // (nothing as this is the end of main function) - // exit(0); + // exit(EXIT_SUCCESS); // return; return; diff --git a/samples/geos/hello2.c b/samples/geos/hello2.c index d41bdb3c9..ae93fa1a4 100644 --- a/samples/geos/hello2.c +++ b/samples/geos/hello2.c @@ -1,11 +1,11 @@ /* GEOSLib example - + Hello, world example - using graphic functions - + Maciej 'YTM/Alliance' Witkowiak <ytm@friko.onet.pl> - + 26.12.1999 */ @@ -25,18 +25,18 @@ void main (void) SetPattern(0); InitDrawWindow(&wholeScreen); Rectangle(); - + // Now some texts PutString(COUTLINEON "This is compiled using cc65!" CPLAINTEXT, 20, 10); PutString(CBOLDON "This is bold", 30, 10); PutString(CULINEON "and this is bold and underline!", 40, 10); PutString(CPLAINTEXT "This is plain text", 50, 10); - + // Wait for 5 secs... // Note that this is multitasking sleep, and if there are any icons/menus onscreen, // they would be usable, in this case you have only pointer usable Sleep(5*50); - + // Normal apps exit from main into system's mainloop, and app finish // when user selects it from icons or menu, but here we want to exit // immediately. @@ -44,7 +44,7 @@ void main (void) // MainLoop(); // we can do: // (nothing as this is the end of main function) - // exit(0); + // exit(EXIT_SUCCESS); // return; return; diff --git a/samples/geos/overlay-demo.c b/samples/geos/overlay-demo.c index a37f6bdcb..73ab0e3c0 100644 --- a/samples/geos/overlay-demo.c +++ b/samples/geos/overlay-demo.c @@ -33,7 +33,7 @@ void foo(void) { /* Functions resident in an overlay can access all program variables and ** constants at any time without any precautions because those are never - ** placed in overlays. The string constant "One" is an example for such + ** placed in overlays. The string constant "One" is an example for such ** a constant resident in the main program. */ show("One"); diff --git a/samples/geos/rmvprot.c b/samples/geos/rmvprot.c index 4f8798f98..152f6cf0f 100644 --- a/samples/geos/rmvprot.c +++ b/samples/geos/rmvprot.c @@ -1,12 +1,12 @@ /* GEOSLib example - + This small application removes GEOS disk write protection tag. e.g. boot disk is always protected after boot-up - + Maciej 'YTM/Elysium' Witkowiak <ytm@elysium.pl> - + 21.03.2000 */ @@ -60,7 +60,7 @@ void main(void) { // Here we clear the screen. Not really needed anyway... GraphicsString(&clearScreen); - + // Get the name of current disk to show it in dialog box GetPtrCurDkNm(diskName); diff --git a/testcode/lib/getsp.s b/samples/getsp.s similarity index 100% rename from testcode/lib/getsp.s rename to samples/getsp.s diff --git a/samples/gunzip65.c b/samples/gunzip65.c index 2ad029467..9d21c2137 100644 --- a/samples/gunzip65.c +++ b/samples/gunzip65.c @@ -14,6 +14,11 @@ #include <string.h> #include <zlib.h> +#ifdef __CC65__ +#include <stdlib.h> +#include <cc65.h> +#endif + #ifndef __CC65__ /* ** Emulate inflatemem() if using original zlib. @@ -191,6 +196,13 @@ int main(void) FILE* fp; unsigned length; +#ifdef __CC65__ + /* allow user to read exit messages */ + if (doesclrscrafterexit()) { + atexit((void (*)) getchar); + } +#endif /* __CC65__ */ + /* read GZIP file */ puts("GZIP file name:"); fp = fopen(get_fname(), "rb"); diff --git a/samples/hello.c b/samples/hello.c index 385112367..255dccd00 100644 --- a/samples/hello.c +++ b/samples/hello.c @@ -34,11 +34,10 @@ int main (void) { unsigned char XSize, YSize; - /* Set screen colors, hide the cursor */ - textcolor (COLOR_WHITE); - bordercolor (COLOR_BLACK); - bgcolor (COLOR_BLACK); - cursor (0); + /* Set screen colors */ + (void) textcolor (COLOR_WHITE); + (void) bordercolor (COLOR_BLACK); + (void) bgcolor (COLOR_BLACK); /* Clear the screen, put cursor in upper left corner */ clrscr (); @@ -68,7 +67,7 @@ int main (void) gotoxy ((XSize - strlen (Text)) / 2, YSize / 2); cprintf ("%s", Text); -#if defined(__NES__) || defined(__PCE__) || defined(__GAMATE__) +#if defined(__NES__) || defined(__PCE__) || defined(__GAMATE__) || defined(__ATARI5200__) /* Wait for the user to press a button */ joy_install (joy_static_stddrv); @@ -78,7 +77,7 @@ int main (void) #else /* Wait for the user to press a key */ - (void) cgetc (); + cgetc (); #endif diff --git a/samples/lynx/Makefile b/samples/lynx/Makefile new file mode 100644 index 000000000..b4ef64af0 --- /dev/null +++ b/samples/lynx/Makefile @@ -0,0 +1,59 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= lynx + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f +else + NULLDEV = /dev/null + DEL = $(RM) +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) +endif + +EXELIST_lynx = \ + hello.lnx \ + mandelbrot.lnx \ + tgidemo.lnx + +.PHONY: samples clean + +ifneq ($(EXELIST_$(SYS)),) +samples: $(EXELIST_$(SYS)) +else +samples: +# recipe used to skip systems that will not work with any program in this dir +ifeq ($(MAKELEVEL),0) + @echo "info: Lynx tests not available for" $(SYS) +else +# Suppress the "nothing to be done for 'samples' message. + @echo "" > $(NULLDEV) +endif +endif + +.SUFFIXES: +.SUFFIXES: .c .lnx + +%.lnx : %.c + $(CL) -t $(SYS) -Oris -m $*.map -o $@ $< + +clean: + @$(DEL) *.o *.map *.lnx 2>$(NULLDEV) diff --git a/samples/lynx/hello.c b/samples/lynx/hello.c new file mode 100644 index 000000000..5e6832514 --- /dev/null +++ b/samples/lynx/hello.c @@ -0,0 +1,43 @@ +/* Atari Lynx version of samples/hello.c, using TGI instead of conio */ + +#include <tgi.h> + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + +static const char Text[] = "Hello world!"; + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + +void main (void) +{ + unsigned int XMax, YMax; + + tgi_install (tgi_static_stddrv); + tgi_init (); + + /* Set screen color. */ + tgi_setcolor (TGI_COLOR_WHITE); + + /* Clear the screen. */ + tgi_clear(); + + /* Ask for the screen size. */ + XMax = tgi_getmaxx (); + YMax = tgi_getmaxy (); + + /* Draw a frame around the screen. */ + tgi_line (0, 0, XMax, 0); + tgi_lineto (XMax, YMax); + tgi_lineto (0, YMax); + tgi_lineto (0, 0); + + /* Write the greeting in the middle of the screen. */ + tgi_outtextxy ((tgi_getxres () - tgi_gettextwidth (Text)) / 2, + (tgi_getyres () - tgi_gettextheight (Text)) / 2, Text); +} diff --git a/samples/lynx/mandelbrot.c b/samples/lynx/mandelbrot.c new file mode 100644 index 000000000..ce49fbf7a --- /dev/null +++ b/samples/lynx/mandelbrot.c @@ -0,0 +1,86 @@ +/*****************************************************************************\ +** mandelbrot sample program for Atari Lynx ** +** ** +** (w) 2002 by groepaz/hitmen, TGI support by Stefan Haubenthal ** +\*****************************************************************************/ + + + +#include <stdlib.h> +#include <tgi.h> + + + +/* Graphics definitions */ +#define SCREEN_X (tgi_getxres()) +#define SCREEN_Y (tgi_getyres()) +#define MAXCOL (tgi_getcolorcount()) + +#define maxiterations 32 +#define fpshift (10) +#define tofp(_x) ((_x)<<fpshift) +#define fromfp(_x) ((_x)>>fpshift) +#define fpabs(_x) (abs(_x)) + +#define mulfp(_a,_b) ((((signed long)_a)*(_b))>>fpshift) +#define divfp(_a,_b) ((((signed long)_a)<<fpshift)/(_b)) + +/* Use static local variables for speed */ +#pragma static-locals (1); + + + +static void mandelbrot (signed short x1, signed short y1, signed short x2, + signed short y2) +{ + /* */ + register signed short r, r1, i; + register signed short xs, ys, xx, yy; + register signed short x, y; + register unsigned char count; + register unsigned char maxcol = MAXCOL; + + /* Calc stepwidth */ + xs = ((x2 - x1) / (SCREEN_X)); + ys = ((y2 - y1) / (SCREEN_Y)); + + yy = y1; + for (y = 0; y < (SCREEN_Y); y++) { + yy += ys; + xx = x1; + for (x = 0; x < (SCREEN_X); x++) { + xx += xs; + /* Do iterations */ + r = 0; + i = 0; + for (count = 0; (count < maxiterations) && + (fpabs (r) < tofp (2)) && (fpabs (i) < tofp (2)); + ++count) { + r1 = (mulfp (r, r) - mulfp (i, i)) + xx; + /* i = (mulfp(mulfp(r,i),tofp(2)))+yy; */ + i = (((signed long) r * i) >> (fpshift - 1)) + yy; + r = r1; + } + if (count == maxiterations) { + tgi_setcolor (0); + } else { + tgi_setcolor (count % maxcol); + } + /* Set pixel */ + tgi_setpixel (x, y); + } + } +} + +void main (void) +{ + /* Install the graphics driver */ + tgi_install (tgi_static_stddrv); + + /* Initialize graphics */ + tgi_init (); + tgi_clear (); + + /* Calc mandelbrot set */ + mandelbrot (tofp (-2), tofp (-2), tofp (2), tofp (2)); +} diff --git a/samples/lynx/tgidemo.c b/samples/lynx/tgidemo.c new file mode 100644 index 000000000..e92a078dc --- /dev/null +++ b/samples/lynx/tgidemo.c @@ -0,0 +1,179 @@ +/* Tgidemo modified for the Atari Lynx. +** +** Press any of the Lynx's option buttons to go to the next screen. +*/ + +#include <cc65.h> +#include <conio.h> +#include <tgi.h> +#include <time.h> + + +#define COLOR_BACK TGI_COLOR_BLACK +#define COLOR_FORE TGI_COLOR_WHITE + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +/* Driver stuff */ +static unsigned MaxX; +static unsigned MaxY; +static unsigned AspectRatio; + + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +/* The Lynx draws too fast. This function delays +** the drawing so that we can watch it. +*/ +static void wait (unsigned char ticks) +{ + clock_t T = clock () + ticks; + + while (clock () < T) {} +} + + + +static void DoCircles (void) +{ + unsigned char I; + unsigned char Color = COLOR_BACK; + const unsigned X = MaxX / 2; + const unsigned Y = MaxY / 2; + const unsigned Limit = (X < Y) ? Y : X; + + tgi_setcolor (COLOR_FORE); + tgi_clear (); + + tgi_line (0, 0, MaxX, MaxY); + tgi_line (0, MaxY, MaxX, 0); + while (!kbhit ()) { + Color = (Color == COLOR_FORE) ? COLOR_BACK : COLOR_FORE; + tgi_setcolor (Color); + for (I = 10; I <= Limit; I += 10) { + tgi_ellipse (X, Y, I, tgi_imulround (I, AspectRatio)); + wait (9); + } + } + + cgetc (); +} + + + +static void DoCheckerboard (void) +{ + unsigned X, Y; + unsigned char Color = COLOR_BACK; + + tgi_clear (); + + while (1) { + for (Y = 0; Y <= MaxY - 2; Y += 10) { + for (X = 0; X <= MaxX; X += 10) { + Color = (Color == COLOR_FORE) ? COLOR_BACK : COLOR_FORE; + tgi_setcolor (Color); + tgi_bar (X, Y, X+9, Y+9); + if (kbhit ()) { + cgetc (); + return; + } + wait (1); + } + Color = Color == COLOR_FORE ? COLOR_BACK : COLOR_FORE; + } + Color = Color == COLOR_FORE ? COLOR_BACK : COLOR_FORE; + } +} + + + +static void DoDiagram (void) +{ + int XOrigin, YOrigin; + int Amp; + int X, Y; + unsigned I; + + tgi_setcolor (COLOR_FORE); + tgi_clear (); + + /* Determine zero and amplitude */ + YOrigin = MaxY / 2; + XOrigin = 10; + Amp = (MaxY - 19) / 2; + + /* Y axis */ + tgi_line (XOrigin, 10, XOrigin, MaxY-10); + tgi_line (XOrigin-2, 12, XOrigin, 10); + tgi_lineto (XOrigin+2, 12); + + /* X axis */ + tgi_line (XOrigin, YOrigin, MaxX-10, YOrigin); + tgi_line (MaxX-12, YOrigin-2, MaxX-10, YOrigin); + tgi_lineto (MaxX-12, YOrigin+2); + + /* Sine */ + tgi_gotoxy (XOrigin, YOrigin); + for (I = 0; I <= 360; ++I) { + /* Calculate the next points */ + X = (int)(((long)(MaxX - 19) * I) / 360); + Y = (int)(((long)Amp * -_sin (I)) / 256); + + /* Draw the line */ + tgi_lineto (XOrigin + X, YOrigin + Y); + } + + cgetc (); +} + + + +static void DoLines (void) +{ + unsigned X; + const unsigned Min = (MaxX < MaxY) ? MaxX : MaxY; + + tgi_setcolor (COLOR_FORE); + tgi_clear (); + + for (X = 0; X <= Min; X += 10) { + tgi_line (0, 0, Min, X); + tgi_line (0, 0, X, Min); + tgi_line (Min, Min, 0, Min-X); + tgi_line (Min, Min, Min-X, 0); + wait (9); + } + + cgetc (); +} + + + +void main (void) +{ + /* Install the driver */ + tgi_install (tgi_static_stddrv); + tgi_init (); + + /* Get stuff from the driver */ + MaxX = tgi_getmaxx (); + MaxY = tgi_getmaxy (); + AspectRatio = tgi_getaspectratio (); + + /* Do graphics stuff */ + DoCircles (); + DoCheckerboard (); + DoDiagram (); + DoLines (); +} diff --git a/samples/mandelbrot.c b/samples/mandelbrot.c index 5d3d661c9..519f3d823 100644 --- a/samples/mandelbrot.c +++ b/samples/mandelbrot.c @@ -10,6 +10,7 @@ #include <time.h> #include <conio.h> #include <tgi.h> +#include <cc65.h> @@ -30,6 +31,7 @@ /* Workaround missing clock stuff */ #ifdef __APPLE2__ # define clock() 0 +# undef CLK_TCK # define CLK_TCK 1 #endif @@ -50,8 +52,9 @@ void mandelbrot (signed short x1, signed short y1, signed short x2, register signed short r, r1, i; register signed short xs, ys, xx, yy; register signed short x, y; + register unsigned char maxcol = MAXCOL; - /* calc stepwidth */ + /* Calc stepwidth */ xs = ((x2 - x1) / (SCREEN_X)); ys = ((y2 - y1) / (SCREEN_Y)); @@ -61,7 +64,7 @@ void mandelbrot (signed short x1, signed short y1, signed short x2, xx = x1; for (x = 0; x < (SCREEN_X); x++) { xx += xs; - /* do iterations */ + /* Do iterations */ r = 0; i = 0; for (count = 0; (count < maxiterations) && @@ -75,12 +78,18 @@ void mandelbrot (signed short x1, signed short y1, signed short x2, if (count == maxiterations) { tgi_setcolor (0); } else { - if (MAXCOL == 2) + switch (maxcol) { + case 2: tgi_setcolor (1); - else - tgi_setcolor (count % MAXCOL); + break; + case 0: /* 256 colors */ + tgi_setcolor (count); + break; + default: + tgi_setcolor (count % maxcol); + } } - /* set pixel */ + /* Set pixel */ tgi_setpixel (x, y); } } @@ -107,6 +116,9 @@ int main (void) if (err != TGI_ERR_OK) { cprintf ("Error #%d initializing graphics.\r\n%s\r\n", err, tgi_geterrormsg (err)); + if (doesclrscrafterexit ()) { + cgetc (); + } exit (EXIT_FAILURE); }; cprintf ("ok.\n\r"); @@ -117,15 +129,15 @@ int main (void) t = clock (); - /* calc mandelbrot set */ + /* Calc mandelbrot set */ mandelbrot (tofp (-2), tofp (-2), tofp (2), tofp (2)); t = clock () - t; /* Fetch the character from the keyboard buffer and discard it */ - (void) cgetc (); + cgetc (); - /* shut down gfx mode and return to textmode */ + /* Shut down gfx mode and return to textmode */ tgi_done (); /* Calculate stats */ @@ -136,9 +148,11 @@ int main (void) /* Output stats */ cprintf ("time : %lu.%us\n\r", sec, sec10); - /* Wait for a key, then end */ - cputs ("Press any key when done...\n\r"); - (void) cgetc (); + if (doesclrscrafterexit ()) { + /* Wait for a key, then end */ + cputs ("Press any key when done...\n\r"); + cgetc (); + } /* Done */ return EXIT_SUCCESS; diff --git a/samples/mousetest.c b/samples/mousedemo.c similarity index 97% rename from samples/mousetest.c rename to samples/mousedemo.c index 4a849cb98..d1b48e9ee 100644 --- a/samples/mousetest.c +++ b/samples/mousedemo.c @@ -1,6 +1,6 @@ /* -** Test/demo program for mouse usage. -** Will work for the C64/C128/CBM510/Atari/Apple2. +** Demo program for mouse usage. +** Supports the C64/C128/CBM510/Atari/Apple2. ** ** 2001-09-13, Ullrich von Bassewitz ** 2013-09-05, Greg King @@ -17,6 +17,7 @@ #include <conio.h> #include <ctype.h> #include <dbg.h> +#include <cc65.h> #define max(a,b) (((a) > (b)) ? (a) : (b)) #define min(a,b) (((a) < (b)) ? (a) : (b)) @@ -57,7 +58,9 @@ static void __fastcall__ CheckError (const char* S, unsigned char Error) /* Wait for a key-press, so that some platforms can show the error ** message before they remove the current screen. */ - cgetc(); + if (doesclrscrafterexit ()) { + cgetc (); + } exit (EXIT_FAILURE); } } diff --git a/samples/multidemo.c b/samples/multidemo.c index 74039cfd6..02bb6fcac 100644 --- a/samples/multidemo.c +++ b/samples/multidemo.c @@ -11,15 +11,16 @@ #include <string.h> -#include <conio.h> #include <stdio.h> #include <stdlib.h> #include <dirent.h> #include <em.h> +#include <cc65.h> #ifndef __CBM__ #include <fcntl.h> #include <unistd.h> #else +#include <cbm.h> #include <device.h> #endif @@ -229,14 +230,14 @@ void main (void) } log ("Press any key..."); - cgetc (); + getchar (); if (loadoverlay (1)) { log ("Calling overlay 1 from main"); /* The linker makes sure that the call to foo() ends up at the right mem ** addr. However it's up to user to make sure that the - right - overlay - ** is actually loaded before making the the call. + ** is actually loaded before making the call. */ foo (); } @@ -254,6 +255,8 @@ void main (void) foobar (); } - log ("Press any key..."); - cgetc (); + if (doesclrscrafterexit ()) { + log ("Press any key..."); + getchar (); + } } diff --git a/samples/overlaydemo.c b/samples/overlaydemo.c index 42e757153..dde6b70ab 100644 --- a/samples/overlaydemo.c +++ b/samples/overlaydemo.c @@ -10,11 +10,12 @@ #include <stdio.h> -#include <conio.h> +#include <cc65.h> #ifndef __CBM__ #include <fcntl.h> #include <unistd.h> #else +#include <cbm.h> #include <device.h> #endif @@ -111,7 +112,7 @@ void main (void) /* The linker makes sure that the call to foo() ends up at the right mem ** addr. However it's up to user to make sure that the - right - overlay - ** is actually loaded before making the the call. + ** is actually loaded before making the call. */ foo (); } @@ -130,5 +131,7 @@ void main (void) foobar (); } - cgetc (); + if (doesclrscrafterexit ()) { + getchar (); + } } diff --git a/samples/readme.txt b/samples/readme.txt new file mode 100644 index 000000000..1a5b1c9ff --- /dev/null +++ b/samples/readme.txt @@ -0,0 +1,248 @@ + +This directory contains sample programs for the cc65 compiler. + +The programs contained here are +- used as samples and referenced from within the documentation (this is their + main purpose) +- installed into the filesystem +- compiled (but NOT run) by the CI test + +----------------------------------------------------------------------------- + +Below is a short description for each of the programs, together with a list +of the supported platforms. + +Please note: + + * The supplied makefile needs GNU make. It works out of the box on Linux and + similar systems. If you're using Windows, then consider installing Cygwin + or MSys2. + + * The makefile specifies the C64 as the default target system because most + of the programs run on that platform. When compiling for another system, + you will have to change the line that specifies the target system at the + top of the makefile, specify the system with SYS=<target> on the make + command line, or set a SYS environment variable. For example: + + make SYS=apple2 + + * Use "make disk" to build a disk image with all sample programs. + + * All programs in the root of the "samples" directory have been written to + be portable and work on more than one target. Programs that are specific + to a certain target live in a subdirectory with the name of the target. + +List of supplied sample programs: + +----------------------------------------------------------------------------- +Name: ascii +Description: Shows the ASCII (or ATASCII, PETSCII) codes of typed + characters. Written and contributed by Greg King + <greg.king5@verizon.com>. +Platforms: All platforms with conio or stdio (compile time configurable). + +----------------------------------------------------------------------------- +Name: diodemo +Description: A disc copy program written and contributed by Oliver + Schmidt, <ol.sc@web.de>. Supports single or dual disc copy. +Platforms: The program does depend on conio and dio (direct disk i/o), + so it currently does compile for only the Atari and Apple ][ + machines. + +----------------------------------------------------------------------------- +Name: enumdevdir +Description: Enumerates all devices, directories, and files. Written and + contributed by Oliver Schmidt, <ol.sc@web.de>. +Platforms: All systems with device enumeration and directory access + (currently the Commodore machines, the Commander X16, + and the Apple ][). + +----------------------------------------------------------------------------- +Name: gunzip65 +Description: A gunzip utility for 6502-based machines, written by Piotr + Fusik <fox@scene.pl>. +Platforms: Runs on all platforms with file I/O (currently the Atari, the + Apple ][, Commodore machines, and the Commander X16). + +----------------------------------------------------------------------------- +Name: hello +Description: A nice "Hello world" type program that uses the conio + console I/O library for output. +Platforms: Runs on all platforms that support conio, which means: + Apple ][, Atari, Commodore machines, Commander X16, + Creativision, Gamate, NES. + +----------------------------------------------------------------------------- +Name: mandelbrot +Description: A mandelbrot demo using integer arithmetic. The demo was + written by groepaz, and converted to cc65 using TGI graphics + by Stefan Haubenthal. +Platforms: Runs on all platforms that have TGI support: + Apple ][, Atari, C64, C128, Oric Atmos and Telestrat, GEOS, + and NES. + +----------------------------------------------------------------------------- +Name: mousedemo +Description: Shows how to use the mouse. +Platforms: All systems with mouse and conio support: + C64, C128, CBM510, Atari, Apple ][. + +----------------------------------------------------------------------------- +Name: multidemo +Description: Shows how to combine multiple cc65 features incl. overlays + and extended memory drivers. Written and contributed by + Oliver Schmidt, <ol.sc@web.de>. +Platforms: All systems with an overlay linker config., disk directory + access, and EMD support (currently the C64, the C128, + the Atari, and the Apple ][). + +----------------------------------------------------------------------------- +Name: overlaydemo +Description: Shows how to load overlay files from disk. Written and + contributed by Oliver Schmidt, <ol.sc@web.de>. +Platforms: All systems with an overlay linker config. (currently the C64, + the C128, the Atari, and the Apple ][). + +----------------------------------------------------------------------------- +Name: sieve +Description: Implements the "Sieve of Eratosthenes" as a way to find all + prime numbers in a specific number interval. Often used as + a benchmark program. +Platforms: All systems with conio and clock support: + Atari, Commodore machines (VIC-20 needs memory expansion), + Commander X16, Apple ][ (without timing due to missing clock + support). + +----------------------------------------------------------------------------- +Name: tinyshell +Description: Simple ("tiny") shell to test filename and directory functions. +Platforms: Runs on all platforms that have stdio support + +----------------------------------------------------------------------------- +Name: tgidemo +Description: Shows some of the graphics capabilities of the "Tiny Graphics + Interface". +Platforms: Runs on all platforms that have TGI support: + Apple ][, Atari, C64, C128, Oric Atmos and Telestrat, GEOS, + NES, and Lynx. + +============================================================================= + +Platform-specific samples follow: + +atari 2600: +----------- + +Name: hello +Description: A "Hello world" type program. +Platforms: Runs on only the Atari 2600 Video Console System. +----------------------------------------------------------------------------- + +atari 5200: +----------- + +Name: hello +Description: A "Hello world" type program. +Platforms: Runs on only the Atari 5200 Video Console System. +----------------------------------------------------------------------------- + +apple2: +------- + +Name: hgrtest +Description: shows how to incorporate a hires screen right into the binary, + thus allowing to place content both below and above the hires + video ram without multiple files nor copying stuff around (plus + having a nice splash screen as bonus). It basically demos how to + make use of apple2-hgr.cfg. + +Name: hgrshow +Description: is a (single) hires program showing how to load (single) hires + screens from files without support from TGI. TGI could be used + to "paint" on the loaded screens. + +Name: dhgrshow +Description: is a double hires program showing how to load double hires + screens from files. TGI is used for most of the I/O address + manipulation, but (in contrast to hgrshow) is not actually + functional. + +----------------------------------------------------------------------------- + +cbm: +---- + +Name: fire +Description: Another graphics demo written by groepaz. +Platforms: C64, C128, CBM510 + +----------------------------------------------------------------------------- +Name: nachtm +Description: Plays "Eine kleine Nachtmusik" by Wolfgang Amadeus Mozart. +Platforms: All systems that have the Commodore SID (Sound Interface + Device): + C64, C128, CBM510, CBM610. + +----------------------------------------------------------------------------- +Name: plasma +Description: A fancy graphics demo written by groepaz. +Platforms: The program needs a VIC-II or a TED, so it runs on the following + systems: + C64, C128, CBM510, Plus/4. +----------------------------------------------------------------------------- + +gamate: +------- + +Name: nachtm +Description: Plays "Eine kleine Nachtmusik" by Wolfgang Amadeus Mozart. +----------------------------------------------------------------------------- + +lynx: +----- + +These programs are adapted for the Atari Lynx because its library has no conio +output or stdio. + +Name: hello +Description: A nice "Hello world" type program that uses the TGI graphics + library for output. + +Name: mandelbrot +Description: A mandelbrot demo using integer arithmetic. The demo was + written by groepaz, and converted to cc65 using TGI graphics + by Stefan Haubenthal. + +Name: tgidemo +Description: Shows some of the graphics capabilities of the "Tiny Graphics + Interface". + +----------------------------------------------------------------------------- + +sym1: +----- + +Name: symHello +Description: Hello World for Sym-1 + +Name: symTiny +Description: Hello World for Sym-1 (tiny version without printf) + +Name: symDisplay +Description: Sym-1 front panel display example + +Name: symIO +Description: Sym-1 digital I/O interface example + +Name: symNotepad +Description: Sym-1 Notepad + +----------------------------------------------------------------------------- + +supervision: +------------ + +Name: hello +Description: A "Hello world" type program. +Platforms: Runs on only the Watara Supervision game console. +---------------------------------------------------------------------------- diff --git a/samples/supervision/Makefile b/samples/supervision/Makefile new file mode 100644 index 000000000..097329384 --- /dev/null +++ b/samples/supervision/Makefile @@ -0,0 +1,59 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= supervision + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 + SP = $(CC65_HOME)/bin/sp65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) + SP := $(if $(wildcard ../../bin/sp65*),../../bin/sp65,sp65) +endif + +EXELIST_supervision = \ + hello + +ifneq ($(EXELIST_$(SYS)),) +samples: $(EXELIST_$(SYS)) +else +samples: notavailable +endif + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: supervision samples not available for" $(SYS) +else +# suppress the "nothing to be done for 'samples' message + @echo > $(NULLDEV) +endif + +hello: hello.c + $(CL) -t $(SYS) -O -o hello -m hello.map hello.c + +clean: + @$(DEL) $(EXELIST_supervision) 2>$(NULLDEV) + @$(DEL) *.map 2>$(NULLDEV) diff --git a/samples/supervision/hello.c b/samples/supervision/hello.c new file mode 100644 index 000000000..ed03e82f3 --- /dev/null +++ b/samples/supervision/hello.c @@ -0,0 +1,95 @@ +/*****************************************************************************/ +/* */ +/* Watara Supervision sample C program */ +/* */ +/* Fabrizio Caruso (fabrizio_caruso@hotmail.com), 2019 */ +/* Greg King (greg.king5@verizon.net), 2021 */ +/* */ +/*****************************************************************************/ + +#include <supervision.h> +#include <string.h> + +/* Number of words per screen line (Remark: Last 4 words aren't displayed) */ +#define WORDS_PER_LINE (160/8+4) + +struct sv_vram { + unsigned int v[160/8][8][WORDS_PER_LINE]; +}; +#define SV_VRAM ((*(struct sv_vram *)0x4000).v) + +/* Character definitions in 8x8 format */ +/* That format gives us a screen of 20 columns and 20 rows */ +static const unsigned char h_char[] = {0x66,0x66,0x66,0x7E,0x66,0x66,0x66,0x00}; +static const unsigned char e_char[] = {0x7E,0x60,0x60,0x78,0x60,0x60,0x7E,0x00}; +static const unsigned char l_char[] = {0x60,0x60,0x60,0x60,0x60,0x60,0x7E,0x00}; +static const unsigned char o_char[] = {0x3C,0x66,0x66,0x66,0x66,0x66,0x3C,0x00}; +static const unsigned char w_char[] = {0x63,0x63,0x63,0x6B,0x7F,0x77,0x63,0x00}; +static const unsigned char r_char[] = {0x7C,0x66,0x66,0x7C,0x78,0x6C,0x66,0x00}; +static const unsigned char d_char[] = {0x78,0x6C,0x66,0x66,0x66,0x6C,0x78,0x00}; + +static void clear_screen(void) +{ + memset(SV_VIDEO, 0, 0x2000); +} + +/* Necessary conversion to have 2 bits per pixel with darkest hue */ +/* Remark: The Supervision uses 2 bits per pixel, and bits are mapped into pixels in reversed order */ +static unsigned int __fastcall__ double_reversed_bits(unsigned char) +{ + __asm__("stz ptr2"); + __asm__("stz ptr2+1"); + __asm__("ldy #$08"); +L1: __asm__("lsr a"); + __asm__("php"); + __asm__("rol ptr2"); + __asm__("rol ptr2+1"); + __asm__("plp"); + __asm__("rol ptr2"); + __asm__("rol ptr2+1"); + __asm__("dey"); + __asm__("bne %g", L1); + __asm__("lda ptr2"); + __asm__("ldx ptr2+1"); + return __AX__; +} + +static void display_char(const unsigned char x, const unsigned char y, const unsigned char *ch) +{ + unsigned char k; + + for(k=0;k<8;++k) + { + SV_VRAM[y][k][x] = double_reversed_bits(ch[k]); + } +} + +static void init_lcd(void) +{ + SV_LCD.width = 160; + SV_LCD.height = 160; +} + +static void hello(unsigned char x, unsigned char y) +{ + display_char(x+ 0,y,h_char); + display_char(x+ 1,y,e_char); + display_char(x+ 2,y,l_char); + display_char(x+ 3,y,l_char); + display_char(x+ 4,y,o_char); + + display_char(x+ 6,y,w_char); + display_char(x+ 7,y,o_char); + display_char(x+ 8,y,r_char); + display_char(x+ 9,y,l_char); + display_char(x+10,y,d_char); +} + +void main(void) +{ + init_lcd(); + clear_screen(); + + hello(2,3); + hello(7,16); +} diff --git a/samples/sym1/Makefile b/samples/sym1/Makefile new file mode 100644 index 000000000..281b5bcd0 --- /dev/null +++ b/samples/sym1/Makefile @@ -0,0 +1,77 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= sym1 + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) +endif + +EXELIST_sym1 = \ + symHello.bin symTiny.bin symDisplay.bin symIO.bin symNotepad.bin symExtendedMemory.bin + +ifneq ($(EXELIST_$(SYS)),) +samples: $(EXELIST_$(SYS)) +else +samples: notavailable +endif + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: sym1 tests not available for" $(SYS) +else +# suppress the "nothing to be done for 'samples' message + @echo > $(NULLDEV) +endif + +symHello.bin: symHello.c + $(CL) -t sym1 -O -o symHello.bin symHello.c + +symTiny.bin: symTiny.c + $(CL) -t sym1 -O -o symTiny.bin symTiny.c + +symDisplay.bin: symDisplay.c + $(CL) -t sym1 -O -o symDisplay.bin symDisplay.c + +symIO.bin: symIO.c + $(CL) -t sym1 -C sym1-32k.cfg -O -o symIO.bin symIO.c + +symNotepad.bin: symNotepad.c + $(CL) -t sym1 -C sym1-32k.cfg -O -o symNotepad.bin symNotepad.c + +symExtendedMemory.bin: symExtendedMemory.c + $(CL) -t sym1 -C sym1-32k.cfg -O -o symExtendedMemory.bin symExtendedMemory.c + + +clean: + @$(DEL) symHello.bin 2>$(NULLDEV) + @$(DEL) symTiny.bin 2>$(NULLDEV) + @$(DEL) symDisplay.bin 2>$(NULLDEV) + @$(DEL) symIO.bin 2>$(NULLDEV) + @$(DEL) symNotepad.bin 2>$(NULLDEV) + @$(DEL) symExtendedMemory.bin 2>$(NULLDEV) diff --git a/samples/sym1/symDisplay.c b/samples/sym1/symDisplay.c new file mode 100644 index 000000000..43d18f911 --- /dev/null +++ b/samples/sym1/symDisplay.c @@ -0,0 +1,358 @@ +// -------------------------------------------------------------------------- +// Sym-1 front panel display example +// +// Wayne Parham +// +// wayne@parhamdata.com +// -------------------------------------------------------------------------- + +#include <stdio.h> +#include <sym1.h> + +int main (void) { + int delay = 10; + int flashes = 255; + int displayable = 1; + int e = 0; + int r = 0; + int d = 0; + int i = 0; + int l = 0; + int t = 0; + int z = 0; + char c = 0x00; + char buffer[41] = { 0x00 }; + + puts ("\nType a message (40 chars max) and press ENTER, please:\n"); + + while ( (c != '\n') && (i < 40) ) { + c = getchar(); + buffer[i] = c; + i++; + if ( i == 40 ) { + puts ("\n\n--- Reached 40 character limit. ---"); + } + } + + i--; // index is one past end + + while ( z == 0 ) { + puts ("\n\nHow many times (0 for forever) to repeat?"); + c = getchar(); + if ( (c >= '0') && (c <= '9') ) {// between 1 and 9 loops allowed + z = 1; // a number was pressed + t = c - '0'; // convert char to int + puts ("\n\nLook at the front panel.\n"); + } + else { + puts ("\nWhat?"); + z = 0; // keep asking for a number + } + } + + z = 0; + while ( (z < t) || (t == 0) ) { + + z++; + + putchar ( '\r' ); // Send CR to console + + DISPLAY.d0 = DISP_SPACE; // Clear the display + DISPLAY.d1 = DISP_SPACE; + DISPLAY.d2 = DISP_SPACE; + DISPLAY.d3 = DISP_SPACE; + DISPLAY.d4 = DISP_SPACE; + DISPLAY.d5 = DISP_SPACE; + DISPLAY.d6 = DISP_SPACE; + + for ( d = 0; d < flashes ; d++ ) { + fdisp(); // Display + } + + for ( l = 0; l <= i; l++ ) { + + displayable = 1; // Assume character is mapped + + switch ( buffer[l] ) { // Put the typed charaters + case '1': // into the display buffer + DISPLAY.d6 = DISP_1; // one at a time + break; + case '2': + DISPLAY.d6 = DISP_2; + break; + case '3': + DISPLAY.d6 = DISP_3; + break; + case '4': + DISPLAY.d6 = DISP_4; + break; + case '5': + DISPLAY.d6 = DISP_5; + break; + case '6': + DISPLAY.d6 = DISP_6; + break; + case '7': + DISPLAY.d6 = DISP_7; + break; + case '8': + DISPLAY.d6 = DISP_8; + break; + case '9': + DISPLAY.d6 = DISP_9; + break; + case '0': + DISPLAY.d6 = DISP_0; + break; + case 'A': + DISPLAY.d6 = DISP_A; + break; + case 'a': + DISPLAY.d6 = DISP_A; + break; + case 'B': + DISPLAY.d6 = DISP_b; + break; + case 'b': + DISPLAY.d6 = DISP_b; + break; + case 'C': + DISPLAY.d6 = DISP_C; + break; + case 'c': + DISPLAY.d6 = DISP_c; + break; + case 'D': + DISPLAY.d6 = DISP_d; + break; + case 'd': + DISPLAY.d6 = DISP_d; + break; + case 'E': + DISPLAY.d6 = DISP_E; + break; + case 'e': + DISPLAY.d6 = DISP_e; + break; + case 'F': + DISPLAY.d6 = DISP_F; + break; + case 'f': + DISPLAY.d6 = DISP_F; + break; + case 'G': + DISPLAY.d6 = DISP_G; + break; + case 'g': + DISPLAY.d6 = DISP_g; + break; + case 'H': + DISPLAY.d6 = DISP_H; + break; + case 'h': + DISPLAY.d6 = DISP_h; + break; + case 'I': + DISPLAY.d6 = DISP_I; + break; + case 'i': + DISPLAY.d6 = DISP_i; + break; + case 'J': + DISPLAY.d6 = DISP_J; + break; + case 'j': + DISPLAY.d6 = DISP_J; + break; + case 'K': + DISPLAY.d6 = DISP_K; + break; + case 'k': + DISPLAY.d6 = DISP_K; + break; + case 'L': + DISPLAY.d6 = DISP_L; + break; + case 'l': + DISPLAY.d6 = DISP_L; + break; + case 'M': + DISPLAY.d0 = DISPLAY.d1; + DISPLAY.d1 = DISPLAY.d2; + DISPLAY.d2 = DISPLAY.d3; + DISPLAY.d3 = DISPLAY.d4; + DISPLAY.d4 = DISPLAY.d5; + DISPLAY.d5 = DISP_M_1; + DISPLAY.d6 = DISP_M_2; + break; + case 'm': + DISPLAY.d0 = DISPLAY.d1; + DISPLAY.d1 = DISPLAY.d2; + DISPLAY.d2 = DISPLAY.d3; + DISPLAY.d3 = DISPLAY.d4; + DISPLAY.d4 = DISPLAY.d5; + DISPLAY.d5 = DISP_M_1; + DISPLAY.d6 = DISP_M_2; + break; + case 'N': + DISPLAY.d6 = DISP_n; + break; + case 'n': + DISPLAY.d6 = DISP_n; + break; + case 'O': + DISPLAY.d6 = DISP_O; + break; + case 'o': + DISPLAY.d6 = DISP_o; + break; + case 'P': + DISPLAY.d6 = DISP_P; + break; + case 'p': + DISPLAY.d6 = DISP_P; + break; + case 'Q': + DISPLAY.d6 = DISP_q; + break; + case 'q': + DISPLAY.d6 = DISP_q; + break; + case 'R': + DISPLAY.d6 = DISP_r; + break; + case 'r': + DISPLAY.d6 = DISP_r; + break; + case 'S': + DISPLAY.d6 = DISP_S; + break; + case 's': + DISPLAY.d6 = DISP_S; + break; + case 'T': + DISPLAY.d6 = DISP_t; + break; + case 't': + DISPLAY.d6 = DISP_t; + break; + case 'U': + DISPLAY.d6 = DISP_U; + break; + case 'u': + DISPLAY.d6 = DISP_u; + break; + case 'V': + DISPLAY.d0 = DISPLAY.d1; + DISPLAY.d1 = DISPLAY.d2; + DISPLAY.d2 = DISPLAY.d3; + DISPLAY.d3 = DISPLAY.d4; + DISPLAY.d4 = DISPLAY.d5; + DISPLAY.d5 = DISP_V_1; + DISPLAY.d6 = DISP_V_2; + break; + case 'v': + DISPLAY.d0 = DISPLAY.d1; + DISPLAY.d1 = DISPLAY.d2; + DISPLAY.d2 = DISPLAY.d3; + DISPLAY.d3 = DISPLAY.d4; + DISPLAY.d4 = DISPLAY.d5; + DISPLAY.d5 = DISP_V_1; + DISPLAY.d6 = DISP_V_2; + break; + case 'W': + DISPLAY.d0 = DISPLAY.d1; + DISPLAY.d1 = DISPLAY.d2; + DISPLAY.d2 = DISPLAY.d3; + DISPLAY.d3 = DISPLAY.d4; + DISPLAY.d4 = DISPLAY.d5; + DISPLAY.d5 = DISP_W_1; + DISPLAY.d6 = DISP_W_2; + break; + case 'w': + DISPLAY.d0 = DISPLAY.d1; + DISPLAY.d1 = DISPLAY.d2; + DISPLAY.d2 = DISPLAY.d3; + DISPLAY.d3 = DISPLAY.d4; + DISPLAY.d4 = DISPLAY.d5; + DISPLAY.d5 = DISP_W_1; + DISPLAY.d6 = DISP_W_2; + break; + case 'Y': + DISPLAY.d6 = DISP_Y; + break; + case 'y': + DISPLAY.d6 = DISP_Y; + break; + case 'Z': + DISPLAY.d6 = DISP_Z; + break; + case 'z': + DISPLAY.d6 = DISP_Z; + break; + case ' ': + DISPLAY.d6 = DISP_SPACE; + break; + case '.': + DISPLAY.d6 = DISP_PERIOD; + break; + case '-': + DISPLAY.d6 = DISP_HYPHEN; + break; + case '\'': + DISPLAY.d6 = DISP_APOSTR; + break; + case '"': + DISPLAY.d6 = DISP_APOSTR; + break; + case '=': + DISPLAY.d6 = DISP_EQUAL; + break; + case '_': + DISPLAY.d6 = DISP_BOTTOM; + break; + case '/': + DISPLAY.d6 = DISP_SLASH; + break; + case '\\': + DISPLAY.d6 = DISP_BACKSLASH; + break; + default: + displayable = 0; // Character not mapped + } + + if ( displayable ) { + + putchar ( buffer[l] ); // Send it to the console + + DISPLAY.d0 = DISPLAY.d1; // Scroll to the left + DISPLAY.d1 = DISPLAY.d2; + DISPLAY.d2 = DISPLAY.d3; + DISPLAY.d3 = DISPLAY.d4; + DISPLAY.d4 = DISPLAY.d5; + DISPLAY.d5 = DISPLAY.d6; + + for ( d = 0; d < flashes ; d++ ) { + fdisp(); // Display + } + } + } + + for ( e = 0; e < 6; e++ ) { // Gradually fill the + DISPLAY.d0 = DISPLAY.d1; // display with spaces + DISPLAY.d1 = DISPLAY.d2; + DISPLAY.d2 = DISPLAY.d3; + DISPLAY.d3 = DISPLAY.d4; + DISPLAY.d4 = DISPLAY.d5; + DISPLAY.d5 = DISP_SPACE; + DISPLAY.d6 = DISP_SPACE; + for ( d = 0; d < flashes ; d++ ) { + fdisp(); // Display + } + } + } + + puts ("\n\nEnjoy your day!\n\n"); + + return 0; +} diff --git a/samples/sym1/symExtendedMemory.c b/samples/sym1/symExtendedMemory.c new file mode 100644 index 000000000..897276e6f --- /dev/null +++ b/samples/sym1/symExtendedMemory.c @@ -0,0 +1,101 @@ +// -------------------------------------------------------------------------- +// Sym-1 Extended Memory +// +// Wayne Parham +// +// wayne@parhamdata.com +// -------------------------------------------------------------------------- +// +// Note: This program examines memory above the monitor ROM (8000-8FFF) to +// Determine what, if any, memory is available. It then adds whatever +// 4K segments it finds to the heap. +// +// Memory Segment Remark +// 0x9000 Usually available +// 0xA000 System I/O, always unavailable +// 0xB000 Used by RAE, but normally available +// 0xC000 Used by BASIC, normally unavailable +// 0xD000 Used by BASIC, normally unavailable +// 0xE000 Used by RAE, but normally available +// 0xF000 Normally available, but only to FF7F +// +// -------------------------------------------------------------------------- + +#include <sym1.h> +#include <stdio.h> +#include <stdlib.h> +#include <string.h> + +#define STD_MEM 0x7FFF // Last address of standard memory +#define SEGMENT 0x9000 // First 4K segment of extended memory +#define SEG_END 0x0FFF // Last location of segment +#define BLOCK_SIZE 0x1000 // Size of segment +#define TOP_END 0x0F7F // Last location of memory +#define TOP_SIZE 0x0F80 // Size of top segment +#define UNAVAILABLE 0xA000 // System I/O area + +int main (void) { + int error = 0; + unsigned heap_size = 0x0000; + char* segment = (char*) SEGMENT; + + printf ( "Analyzing memory.\n\n" ); + + heap_size = _heapmemavail(); + + printf ( "Main memory has %u bytes available.\n", heap_size ); + + if ( heap_size > STD_MEM ) { + printf ( "Extended memory already installed.\n" ); + } else { + + while ( (int) segment < 0xEFFF ) { // Iterate through 4K memory blocks + if( (int) segment != UNAVAILABLE ) { + segment[0] = 0x00; // Check beginning of segment + if ( segment[0] != 0x00 ) + error = 1; + segment[0] = 0xFF; + if ( segment[0] != 0xFF ) + error = 1; + segment[SEG_END] = 0x00; // Check end of segment + if ( segment[SEG_END] != 0x00 ) + error = 1; + segment[SEG_END] = 0xFF; + if ( segment[SEG_END] != 0xFF ) + error = 1; + if ( ! error ) { // If memory found, add to the heap + printf ( "Memory found at location %p, ", segment ); + _heapadd ( segment, BLOCK_SIZE ); + heap_size = _heapmemavail(); + printf( "so the system now has %u bytes available.\n", heap_size ); + } else { + error = 0; + } + } + segment += 0x1000; // Increment to next segment + } + + segment[0] = 0x00; // Check beginning of top memory segment + if ( segment[0] != 0x00 ) + error = 1; + segment[0] = 0xFF; + if ( segment[0] != 0xFF ) + error = 1; + segment[TOP_END] = 0x00; // Check end of usable memory + if ( segment[TOP_END] != 0x00 ) + error = 1; + segment[TOP_END] = 0xFF; + if ( segment[TOP_END] != 0xFF ) + error = 1; + if ( ! error ) { // If memory found, add to the heap + printf ( "Memory found at location %p, ", segment ); + _heapadd ( segment, TOP_SIZE ); + heap_size = _heapmemavail(); + printf( "so the system now has %u bytes available.\n", heap_size ); + } + } + + puts ("\nEnjoy your day!\n"); + + return 0; +} diff --git a/samples/sym1/symHello.c b/samples/sym1/symHello.c new file mode 100644 index 000000000..afc1d94c5 --- /dev/null +++ b/samples/sym1/symHello.c @@ -0,0 +1,39 @@ +// -------------------------------------------------------------------------- +// Hello World for Sym-1 +// +// Wayne Parham +// +// wayne@parhamdata.com +// -------------------------------------------------------------------------- + +#include <stdio.h> +#include <sym1.h> + +int main (void) { + char c = 0x00; + int d = 0x00; + int l = 0x00; + + printf ("\nHello World!\n\n"); + + for ( l = 0; l < 2; l++ ) { + beep(); + for ( d = 0; d < 10 ; d++ ) { + } + } + printf ("Type a line and press ENTER, please.\n\n"); + + while ( c != '\n' ) { + c = getchar(); + } + + printf ("\n\nThanks!\n\n"); + + for ( l = 0; l < 5; l++ ) { + beep(); + for ( d = 0; d < 10 ; d++ ) { + } + } + + return 0; +} diff --git a/samples/sym1/symIO.c b/samples/sym1/symIO.c new file mode 100644 index 000000000..bb46dc3df --- /dev/null +++ b/samples/sym1/symIO.c @@ -0,0 +1,172 @@ +// -------------------------------------------------------------------------- +// Sym-1 digital I/O interface example +// +// Wayne Parham +// +// wayne@parhamdata.com +// -------------------------------------------------------------------------- + +#include <sym1.h> +#include <stdio.h> +#include <stdlib.h> +#include <string.h> + +int main (void) { + unsigned char ddr1a = 0x00; + unsigned char ior1a = 0x00; + unsigned char ddr1b = 0x00; + unsigned char ior1b = 0x00; + unsigned char ddr2a = 0x00; + unsigned char ior2a = 0x00; + unsigned char ddr2b = 0x00; + unsigned char ior2b = 0x00; + unsigned char ddr3a = 0x00; + unsigned char ior3a = 0x00; + unsigned char ddr3b = 0x00; + unsigned char ior3b = 0x00; + unsigned char val = 0x00; + int going = 0x01; + int instr = 0x01; + int l = 0x00; + char* vp = 0x00; + char cmd[20] = { 0x00 }; + + while ( going ) { + + putchar ( '\r' ); + for ( l = 0; l < 25; l++ ) { + putchar ( '\n' ); + } + + ddr1a = VIA1.ddra; + ior1a = VIA1.pra; + ddr1b = VIA1.ddrb; + ior1b = VIA1.prb; + ddr2a = VIA2.ddra; + ior2a = VIA2.pra; + ddr2b = VIA2.ddrb; + ior2b = VIA2.prb; + ddr3a = VIA3.ddra; + ior3a = VIA3.pra; + ddr3b = VIA3.ddrb; + ior3b = VIA3.prb; + + puts ("================== Digital I/O Status =================="); + puts (" Port1A Port1B Port2A Port2B Port3A Port3B" ); + printf ("DDR %02X %02X %02X %02X %02X %02X\n\r",ddr1a,ddr1b,ddr2a,ddr2b,ddr3a,ddr3b); + printf ("IOR %02X %02X %02X %02X %02X %02X\n\r",ior1a,ior1b,ior2a,ior2b,ior3a,ior3b); + puts ("========================================================\n"); + + if ( instr ) { + puts ("You can set any register by typing 'register value' so"); + puts ("as an example, to set register IOR2A with the top five"); + puts ("bits off and the bottom three on, type 'IOR2A 07'."); + puts ("Press ENTER without any command to see register values"); + puts ("without changing any of them. Type 'help' to see these"); + puts ("instructions again and type 'quit' to end the program.\n"); + puts ("Available registers: DDR1A, IOR1A, DDR1B, IOR1B, DDR2A"); + puts ("IOR2A, DDR2B, IOR2B, DDR3A, IOR3A, DDR3B and IOR3B."); + instr = 0; + } + + printf ("\n Command: "); + + fgets ( cmd, sizeof(cmd)-1, stdin ); + cmd[strlen(cmd)-1] = '\0'; + + if ( strncasecmp(cmd, "quit", 4) == 0 ) { + going = 0; + } + else if ( strncasecmp(cmd, "help", 4) == 0 ) { + instr = 1; + } + else if ( strncasecmp(cmd, "ddr1a", 5) == 0 ) { + vp = strchr ( cmd, ' ' ); + if ( vp ) { + val = (unsigned char) strtol( vp, NULL, 0 ); + VIA1.ddra = val; + } + } + else if ( strncasecmp(cmd, "ior1a", 5) == 0 ) { + vp = strchr ( cmd, ' ' ); + if ( vp ) { + val = (unsigned char) strtol( vp, NULL, 0 ); + VIA1.pra = val; + } + } + else if ( strncasecmp(cmd, "ddr1b", 5) == 0 ) { + vp = strchr ( cmd, ' ' ); + if ( vp ) { + val = (unsigned char) strtol( vp, NULL, 0 ); + VIA1.ddrb = val; + } + } + else if ( strncasecmp(cmd, "ior1b", 5) == 0 ) { + vp = strchr ( cmd, ' ' ); + if ( vp ) { + val = (unsigned char) strtol( vp, NULL, 0 ); + VIA1.prb = val; + } + } + else if ( strncasecmp(cmd, "ddr2a", 5) == 0 ) { + vp = strchr ( cmd, ' ' ); + if ( vp ) { + val = (unsigned char) strtol( vp, NULL, 0 ); + VIA2.ddra = val; + } + } + else if ( strncasecmp(cmd, "ior2a", 5) == 0 ) { + vp = strchr ( cmd, ' ' ); + if ( vp ) { + val = (unsigned char) strtol( vp, NULL, 0 ); + VIA2.pra = val; + } + } + else if ( strncasecmp(cmd, "ddr2b", 5) == 0 ) { + vp = strchr ( cmd, ' ' ); + if ( vp ) { + val = (unsigned char) strtol( vp, NULL, 0 ); + VIA2.ddrb = val; + } + } + else if ( strncasecmp(cmd, "ior2b", 5) == 0 ) { + vp = strchr ( cmd, ' ' ); + if ( vp ) { + val = (unsigned char) strtol( vp, NULL, 0 ); + VIA2.prb = val; + } + } + else if ( strncasecmp(cmd, "ddr3a", 5) == 0 ) { + vp = strchr ( cmd, ' ' ); + if ( vp ) { + val = (unsigned char) strtol( vp, NULL, 0 ); + VIA3.ddra = val; + } + } + else if ( strncasecmp(cmd, "ior3a", 5) == 0 ) { + vp = strchr ( cmd, ' ' ); + if ( vp ) { + val = (unsigned char) strtol( vp, NULL, 0 ); + VIA3.pra = val; + } + } + else if ( strncasecmp(cmd, "ddr3b", 5) == 0 ) { + vp = strchr ( cmd, ' ' ); + if ( vp ) { + val = (unsigned char) strtol( vp, NULL, 0 ); + VIA3.ddrb = val; + } + } + else if ( strncasecmp(cmd, "ior3b", 5) == 0 ) { + vp = strchr (cmd, ' ' ); + if ( vp ) { + val = (unsigned char) strtol( vp, NULL, 0 ); + VIA3.prb = val; + } + } + } + + puts ("\n\nEnjoy your day!\n\n"); + + return 0; +} diff --git a/samples/sym1/symNotepad.c b/samples/sym1/symNotepad.c new file mode 100644 index 000000000..6fb6db902 --- /dev/null +++ b/samples/sym1/symNotepad.c @@ -0,0 +1,192 @@ +// -------------------------------------------------------------------------- +// Sym-1 Notepad +// +// Wayne Parham +// +// wayne@parhamdata.com +// -------------------------------------------------------------------------- +// +// Note: This program requires RAM memory in locations 0xE000 - 0xEFFF +// Alternatively, the tape I/O buffer location and size can be +// changed by altering the defined TAPIO values below. +// +// -------------------------------------------------------------------------- + +#include <sym1.h> +#include <stdio.h> +#include <stdlib.h> +#include <string.h> + +#define TAPIO_ADDRESS 0xE000 +#define TAPIO_MAX_SIZE 0x0FFF + +int main (void) { + char c = 0x00; + int l = 0x00; + int p = 0x00; + int error = 0x00; + int running = 0x01; + int writing = 0x01; + int instruction_needed = 0x01; + int heap_size = 0x00; + char* tapio = (char*) TAPIO_ADDRESS; + char* buffer; + + heap_size = _heapmaxavail(); + + if ( heap_size > TAPIO_MAX_SIZE ) { // No need to malloc more than + heap_size = TAPIO_MAX_SIZE; // the interface allows + } + + buffer = malloc ( heap_size ); + memset ( buffer, 0x00, heap_size ); + + if ( buffer == 0x00 ) { + puts ("Memory full."); + running = 0; + } + + tapio[0] = 0x00; // Check tape interface memory + if ( tapio[0] != 0x00 ) + error = 1; + + tapio[0] = 0xFF; + if ( tapio[0] != 0xFF ) + error = 1; + + tapio[TAPIO_MAX_SIZE] = 0x00; + if ( tapio[TAPIO_MAX_SIZE] != 0x00 ) + error = 1; + + tapio[TAPIO_MAX_SIZE] = 0xFF; + if ( tapio[TAPIO_MAX_SIZE] != 0xFF ) + error = 1; + + if ( error ) { + printf ("\nNo memory at location %p, aborting.\n", tapio); + running = 0; + } + else { + memset ( tapio, 0, TAPIO_MAX_SIZE ); + } + + + while ( running ) { + + putchar ( '\r' ); + for ( l = 0; l < 25; l++ ) { + putchar ( '\n' ); + } + + puts ("===================== Sym-1 Notepad ===================="); + + if ( instruction_needed ) { + puts ("Enter text and you can save it to tape for reloading"); + puts ("later. There are four special 'command' characters:\n"); + puts (" Control-S Save to tape"); + puts (" Control-L Load from tape"); + puts (" Control-C Clear memory"); + puts (" Control-X Exit"); + puts ("========================================================\n"); + } + + while ( writing ) { + + c = getchar(); + + if ( c == 0x08 ) { // Backspace + if ( p > 0 ) { + buffer[p] = 0x00; + p--; + } + } + else if ( c == 0x13 ) { // Save + puts ("\n========================= Save ========================="); + puts ("\nPress any key to save."); + c = getchar(); + for ( l = 0; l <= p; l++ ) { + tapio[l] = buffer[l]; + } + l++; + tapio[l] = 0x00; + puts ("Saving to tape."); + error = dumpt ( 'N', tapio, tapio+p ); + if ( error ) { + puts ("\nTape error."); + } + else + { + putchar ( '\r' ); + for ( l = 0; l < 25; l++ ) { + putchar ( '\n' ); + } + } + puts ("===================== Sym-1 Notepad ====================\n"); + for ( l = 0; l <= p; l++ ) { + putchar ( buffer[l] ); + } + } + else if ( c == 0x0C ) { // Load + p = 0; + puts ("\nLoading from tape."); + memset ( buffer, 0, heap_size ); + memset ( tapio, 0, TAPIO_MAX_SIZE ); + error = loadt ( 'N' ); + if ( error ) { + puts ("\nTape error."); + puts ("===================== Sym-1 Notepad ====================\n"); + } + else + { + for ( l = 0; l <= heap_size; l++ ) { + buffer[l] = tapio[l]; + } + + p = strlen ( buffer ); + + putchar ( '\r' ); + for ( l = 0; l < 25; l++ ) { + putchar ( '\n' ); + } + puts ("===================== Sym-1 Notepad ====================\n"); + + for ( l = 0; l <= p; l++ ) { + putchar ( buffer[l] ); + } + } + } + else if ( c == 0x03 ) { // Clear + p = 0; + memset ( buffer, 0, heap_size ); + putchar ( '\r' ); + for ( l = 0; l < 25; l++ ) { + putchar ( '\n' ); + } + puts ("===================== Sym-1 Notepad ====================\n"); + } + else if ( c == 0x18 ) { // Exit + writing = 0; + running = 0; + } + else { + if ( p >= heap_size - 1 ) { + puts ("\n========================= End ========================="); + puts ("Buffer full."); + } + else { + if ( c == '\n' ) { + putchar ( '\n' ); + } + buffer[p] = c; + } + p++; + } + } + } + + free ( buffer ); + + puts ("\nEnjoy your day!\n"); + + return 0; +} diff --git a/samples/sym1/symTiny.c b/samples/sym1/symTiny.c new file mode 100644 index 000000000..574ac36bc --- /dev/null +++ b/samples/sym1/symTiny.c @@ -0,0 +1,42 @@ +// -------------------------------------------------------------------------- +// Hello World for Sym-1 +// +// Uses only getchar, putchar and puts, generating smaller code than printf +// +// Wayne Parham +// +// wayne@parhamdata.com +// -------------------------------------------------------------------------- + +#include <stdio.h> +#include <sym1.h> + +int main (void) { + char c = 0x00; + int d = 0x00; + int l = 0x00; + + puts ("Hello World!\n"); + + puts ("Type a line and press ENTER, please:\n"); + + for ( l = 0; l < 2; l++ ) { + beep(); + for ( d = 0; d < 10 ; d++ ) { + } + } + + while ( c != '\n' ) { + c = getchar(); + } + + puts ("\n\nThanks!\n"); + + for ( l = 0; l < 5; l++ ) { + beep(); + for ( d = 0; d < 10 ; d++ ) { + } + } + + return 0; +} diff --git a/samples/tgidemo.c b/samples/tgidemo.c index a08020640..f193a1b83 100644 --- a/samples/tgidemo.c +++ b/samples/tgidemo.c @@ -38,16 +38,21 @@ static unsigned AspectRatio; static void CheckError (const char* S) { unsigned char Error = tgi_geterror (); + if (Error != TGI_ERR_OK) { - printf ("%s: %d\n", S, Error); + printf ("%s: %u\n", S, Error); + if (doesclrscrafterexit ()) { + cgetc (); + } exit (EXIT_FAILURE); } } +#if DYN_DRV static void DoWarning (void) -/* Warn the user that the TGI driver is needed for this program */ +/* Warn the user that the dynamic TGI driver is needed for this program */ { printf ("Warning: This program needs the TGI\n" "driver on disk! Press 'y' if you have\n" @@ -55,33 +60,35 @@ static void DoWarning (void) if (tolower (cgetc ()) != 'y') { exit (EXIT_SUCCESS); } - printf ("Ok. Please wait patiently...\n"); + printf ("OK. Please wait patiently...\n"); } +#endif static void DoCircles (void) { - static const unsigned char Palette[2] = { TGI_COLOR_WHITE, TGI_COLOR_ORANGE }; + static const unsigned char Palette[2] = { TGI_COLOR_WHITE, TGI_COLOR_BLUE }; unsigned char I; - unsigned char Color = COLOR_FORE; - unsigned X = MaxX / 2; - unsigned Y = MaxY / 2; + unsigned char Color = COLOR_BACK; + const unsigned X = MaxX / 2; + const unsigned Y = MaxY / 2; + const unsigned Limit = (X < Y) ? Y : X; tgi_setpalette (Palette); + tgi_setcolor (COLOR_FORE); + tgi_clear (); + tgi_line (0, 0, MaxX, MaxY); + tgi_line (0, MaxY, MaxX, 0); while (!kbhit ()) { - tgi_setcolor (COLOR_FORE); - tgi_line (0, 0, MaxX, MaxY); - tgi_line (0, MaxY, MaxX, 0); + Color = (Color == COLOR_FORE) ? COLOR_BACK : COLOR_FORE; tgi_setcolor (Color); - for (I = 10; I < 240; I += 10) { + for (I = 10; I <= Limit; I += 10) { tgi_ellipse (X, Y, I, tgi_imulround (I, AspectRatio)); } - Color = Color == COLOR_FORE ? COLOR_BACK : COLOR_FORE; } cgetc (); - tgi_clear (); } @@ -90,19 +97,19 @@ static void DoCheckerboard (void) { static const unsigned char Palette[2] = { TGI_COLOR_WHITE, TGI_COLOR_BLACK }; unsigned X, Y; - unsigned char Color; + unsigned char Color = COLOR_BACK; tgi_setpalette (Palette); - Color = COLOR_BACK; + tgi_clear (); + while (1) { for (Y = 0; Y <= MaxY; Y += 10) { for (X = 0; X <= MaxX; X += 10) { + Color = (Color == COLOR_FORE) ? COLOR_BACK : COLOR_FORE; tgi_setcolor (Color); tgi_bar (X, Y, X+9, Y+9); - Color = Color == COLOR_FORE ? COLOR_BACK : COLOR_FORE; if (kbhit ()) { cgetc (); - tgi_clear (); return; } } @@ -124,8 +131,9 @@ static void DoDiagram (void) tgi_setpalette (Palette); tgi_setcolor (COLOR_FORE); + tgi_clear (); - /* Determine zero and aplitude */ + /* Determine zero and amplitude */ YOrigin = MaxY / 2; XOrigin = 10; Amp = (MaxY - 19) / 2; @@ -146,14 +154,13 @@ static void DoDiagram (void) /* Calculate the next points */ X = (int) (((long) (MaxX - 19) * I) / 360); - Y = (int) (((long) Amp * -cc65_sin (I)) / 256); + Y = (int) (((long) Amp * -_sin (I)) / 256); /* Draw the line */ tgi_lineto (XOrigin + X, YOrigin + Y); } cgetc (); - tgi_clear (); } @@ -162,19 +169,20 @@ static void DoLines (void) { static const unsigned char Palette[2] = { TGI_COLOR_WHITE, TGI_COLOR_BLACK }; unsigned X; + const unsigned Min = (MaxX < MaxY) ? MaxX : MaxY; tgi_setpalette (Palette); tgi_setcolor (COLOR_FORE); + tgi_clear (); - for (X = 0; X <= MaxY; X += 10) { - tgi_line (0, 0, MaxY, X); - tgi_line (0, 0, X, MaxY); - tgi_line (MaxY, MaxY, 0, MaxY-X); - tgi_line (MaxY, MaxY, MaxY-X, 0); + for (X = 0; X <= Min; X += 10) { + tgi_line (0, 0, Min, X); + tgi_line (0, 0, X, Min); + tgi_line (Min, Min, 0, Min-X); + tgi_line (Min, Min, Min-X, 0); } cgetc (); - tgi_clear (); } @@ -198,7 +206,6 @@ int main (void) tgi_init (); CheckError ("tgi_init"); - tgi_clear (); /* Get stuff from the driver */ MaxX = tgi_getmaxx (); diff --git a/testcode/lib/tinyshell.c b/samples/tinyshell.c similarity index 88% rename from testcode/lib/tinyshell.c rename to samples/tinyshell.c index de57a3d0e..71e9b56e3 100644 --- a/testcode/lib/tinyshell.c +++ b/samples/tinyshell.c @@ -1,9 +1,9 @@ /* ** Simple ("tiny") shell to test filename and directory functions. -** Copyright (c) 2013, Christian Groessler, chris@groessler.org +** Copyright (c) 2013,2016 Christian Groessler, chris@groessler.org */ -#define VERSION_ASC "0.90" +#define VERSION_ASC "0.91" #ifdef __ATARI__ #define UPPERCASE /* define (e.g. for Atari) to convert filenames etc. to upper case */ @@ -18,7 +18,7 @@ #define CHECK_SP #endif -#define KEYB_BUFSZ 80 +#define KEYB_BUFSZ 127 #define PROMPT ">>> " #include <stdio.h> @@ -55,16 +55,18 @@ extern unsigned int getsp(void); /* comes from getsp.s */ #define CMD_PWD 11 #define CMD_CLS 12 #define CMD_VERBOSE 13 +#define CMD_EXEC 14 static unsigned char verbose; static unsigned char terminate; static unsigned char cmd; -static unsigned char *cmd_asc, *arg1, *arg2, *arg3; -static unsigned char keyb_buf[KEYB_BUFSZ]; +static char *cmd_asc, *arg1, *arg2, *arg3, *args; /* 'args': everything after command */ +static char keyb_buf[KEYB_BUFSZ + 1]; +static char keyb_buf2[KEYB_BUFSZ + 1]; static size_t cpbuf_sz = 4096; struct cmd_table { - unsigned char *name; + char *name; unsigned char code; } cmd_table[] = { { "help", CMD_HELP }, @@ -88,6 +90,7 @@ struct cmd_table { { "mv", CMD_RENAME }, { "ren", CMD_RENAME }, { "pwd", CMD_PWD }, + { "exec", CMD_EXEC }, #ifdef __ATARI__ { "cls", CMD_CLS }, #endif @@ -134,6 +137,17 @@ static void get_command(void) return; } + /* put everything after first string into 'args' */ + + strcpy(keyb_buf2, keyb_buf); /* use a backup copy for 'args' */ + + /* skip over the first non-whitespace item */ + cmd_asc = strtok(keyb_buf2, " \t\n"); + if (cmd_asc) + args = strtok(NULL, ""); /* get everything */ + else + *args = 0; /* no arguments */ + /* split input into cmd, arg1, arg2, arg3 */ /* get and parse command */ @@ -172,17 +186,17 @@ static void cmd_help(void) puts("cd, chdir - change directory or drive"); puts("md, mkdir - make directory or drive"); puts("rd, rmdir - remove directory or drive"); + puts("exec - run program"); #ifdef __ATARI__ puts("cls - clear screen"); #endif puts("verbose - set verbosity level"); - puts("sorry, you cannot start programs here"); } static void cmd_ls(void) { DIR *dir; - unsigned char *arg; + char *arg; struct dirent *dirent; #ifdef __ATARI__ char need_free = 0; @@ -340,10 +354,26 @@ static void cmd_rename(void) printf("rename failed: %s\n", strerror(errno)); } +static void cmd_exec(void) +{ + char *progname, *arguments; + + progname = strtok(args, " \t\n"); + if (! progname) { + puts("usage: exec <progname> [arguments]"); + return; + } + arguments = strtok(NULL, ""); + + /*printf("exec: %s %s\n", progname, arguments ? arguments : "");*/ + (void)exec(progname, arguments); + printf("exec error: %s\n", strerror(errno)); +} + static void cmd_copy(void) { int srcfd = -1, dstfd = -1; - unsigned char *buf; + char *buf; int readsz, writesz; if (!arg2 || arg3) { @@ -446,6 +476,7 @@ static void run_command(void) case CMD_RMDIR: cmd_rmdir(); return; case CMD_PWD: cmd_pwd(); return; #endif + case CMD_EXEC: cmd_exec(); return; case CMD_RENAME: cmd_rename(); return; case CMD_COPY: cmd_copy(); return; #ifdef __ATARI__ diff --git a/samples/tutorial/Makefile b/samples/tutorial/Makefile new file mode 100644 index 000000000..eb8627c29 --- /dev/null +++ b/samples/tutorial/Makefile @@ -0,0 +1,95 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= c64 + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) +endif + +EXELIST_atari2600 = \ + notavailable + +EXELIST_atari5200 = \ + notavailable + +EXELIST_bbc = \ + notavailable + +EXELIST_creativision = \ + notavailable + +EXELIST_gamate = \ + notavailable + +EXELIST_geos-cbm = \ + notavailable + +EXELIST_geos-apple = \ + notavailable + +EXELIST_lunix = \ + notavailable + +EXELIST_lynx = \ + notavailable + +EXELIST_nes = \ + notavailable + +EXELIST_osic1p = \ + notavailable + +EXELIST_pce = \ + notavailable + +EXELIST_supervision = \ + notavailable + +# Unlisted targets will try to build everything. +# That lets us learn what they cannot build, and what settings +# we need to use for programs that can be built and run. +ifndef EXELIST_$(SYS) +EXELIST_$(SYS) := ${patsubst %.c,%,$(wildcard *.c)} +endif + +samples: $(EXELIST_$(SYS)) + +hello: hello.c text.s + $(CL) -t $(SYS) -o hello hello.c text.s + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: tutorial sample not available for" $(SYS) +else +# suppress the "nothing to be done for 'samples' message + @echo > $(NULLDEV) +endif + +clean: + @$(DEL) hello 2>$(NULLDEV) diff --git a/src/.gitignore b/src/.gitignore index d2b9fe751..3b4d0f7ad 100644 --- a/src/.gitignore +++ b/src/.gitignore @@ -1,6 +1,9 @@ +.vs/ ipch/ *.suo *.sdf *.opensdf +*.VC.db +*.VC.VC.opendb *.vcxproj.filters *.vcxproj.user diff --git a/src/Makefile b/src/Makefile index 5aafc4bb8..8356d0001 100644 --- a/src/Makefile +++ b/src/Makefile @@ -2,27 +2,35 @@ ifneq ($(shell echo),) CMD_EXE = 1 endif -PROGS = ar65 \ - ca65 \ - cc65 \ - cl65 \ - co65 \ - da65 \ - grc65 \ - ld65 \ - od65 \ - sim65 \ +ifneq ($(V),1) + Q=@ +else + Q= +endif + +PROGS = ar65 \ + ca65 \ + cc65 \ + chrcvt65 \ + cl65 \ + co65 \ + da65 \ + grc65 \ + ld65 \ + od65 \ + sim65 \ sp65 .PHONY: all mostlyclean clean install zip avail unavail bin $(PROGS) .SUFFIXES: -bindir := $(prefix)/bin -datadir := $(if $(prefix),$(prefix)/share/cc65,$(abspath ..)) +bindir := $(PREFIX)/bin +datadir := $(PREFIX)/share/cc65 CA65_INC = $(datadir)/asminc CC65_INC = $(datadir)/include +CL65_TGT = $(datadir)/target LD65_LIB = $(datadir)/lib LD65_OBJ = $(datadir)/lib LD65_CFG = $(datadir)/cfg @@ -50,20 +58,19 @@ ifdef USER_CFLAGS $(info USER_CFLAGS: $(USER_CFLAGS)) endif -ifdef GIT_SHA - $(info GIT_SHA: $(GIT_SHA)) -else - GIT_SHA := $(shell git rev-parse --short HEAD 2>$(NULLDEV)) - ifneq ($(words $(GIT_SHA)),1) - GIT_SHA := N/A - $(info GIT_SHA: N/A) +ifndef BUILD_ID + BUILD_ID := Git $(shell git rev-parse --short HEAD 2>$(NULLDEV) || svnversion 2>$(NULLDEV)) + ifneq ($(words $(BUILD_ID)),2) + BUILD_ID := N/A endif endif +$(info BUILD_ID: $(BUILD_ID)) -CFLAGS += -MMD -MP -O -I common \ +CFLAGS += -MMD -MP -O3 -I common \ -Wall -Wextra -Wno-char-subscripts $(USER_CFLAGS) \ - -DGIT_SHA=$(GIT_SHA) -DCA65_INC=$(CA65_INC) -DCC65_INC=$(CC65_INC) \ - -DLD65_LIB=$(LD65_LIB) -DLD65_OBJ=$(LD65_OBJ) -DLD65_CFG=$(LD65_CFG) + -DCA65_INC="\"$(CA65_INC)\"" -DCC65_INC="\"$(CC65_INC)\"" -DCL65_TGT="\"$(CL65_TGT)\"" \ + -DLD65_LIB="\"$(LD65_LIB)\"" -DLD65_OBJ="\"$(LD65_OBJ)\"" -DLD65_CFG="\"$(LD65_CFG)\"" \ + -DBUILD_ID="\"$(BUILD_ID)\"" LDLIBS += -lm @@ -104,7 +111,6 @@ $(RM) /usr/local/bin/$(prog) endef # UNAVAIL_recipe install: - $(if $(prefix),,$(error variable `prefix' must be set)) $(INSTALL) -d $(DESTDIR)$(bindir) $(INSTALL) ../bin/* $(DESTDIR)$(bindir) @@ -118,6 +124,7 @@ endif # CMD_EXE zip: @cd .. && zip cc65 bin/* + @echo 'https://github.com/cc65/cc65/commits/'$(word 2,$(BUILD_ID))|zip -zq ../cc65 define OBJS_template @@ -145,7 +152,7 @@ endef # PROG_template ../wrk/%.o: %.c @echo $< - @$(CC) -c $(CFLAGS) -o $@ $< + $(Q)$(CC) -c $(CFLAGS) -o $@ $< ../bin: @$(call MKDIR,$@) diff --git a/src/ar65.vcxproj b/src/ar65.vcxproj index b077134ce..27d12dadc 100644 --- a/src/ar65.vcxproj +++ b/src/ar65.vcxproj @@ -1,5 +1,5 @@ <?xml version="1.0" encoding="utf-8"?> -<Project DefaultTargets="Build" ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> +<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <ItemGroup Label="ProjectConfigurations"> <ProjectConfiguration Include="Debug|Win32"> <Configuration>Debug</Configuration> @@ -13,65 +13,39 @@ <PropertyGroup Label="Globals"> <ProjectGuid>{5E8C19C6-B167-440C-8BEF-3CBF109CDB49}</ProjectGuid> <Keyword>Win32Proj</Keyword> - <RootNamespace>ar65</RootNamespace> </PropertyGroup> + <ImportGroup Label="PropertySheets"> + <Import Project="cc65.props" /> + </ImportGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> <UseDebugLibraries>true</UseDebugLibraries> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> <UseDebugLibraries>false</UseDebugLibraries> - <WholeProgramOptimization>true</WholeProgramOptimization> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> <ImportGroup Label="ExtensionSettings"> </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> <PropertyGroup Label="UserMacros" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <LinkIncremental>true</LinkIncremental> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> <ClCompile> - <PrecompiledHeader> - </PrecompiledHeader> - <WarningLevel>Level3</WarningLevel> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;_DEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;_DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>true</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> <ClCompile> - <WarningLevel>Level3</WarningLevel> - <PrecompiledHeader> - </PrecompiledHeader> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;NDEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>false</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemGroup> diff --git a/src/ar65/del.h b/src/ar65/del.h index 6100fe60a..dd45d0ec5 100644 --- a/src/ar65/del.h +++ b/src/ar65/del.h @@ -49,6 +49,6 @@ void DelObjFiles (int argc, char* argv []); -/* End of del.h */ +/* End of del.h */ #endif diff --git a/src/ar65/error.c b/src/ar65/error.c index 47ee90aa5..7f1e0f611 100644 --- a/src/ar65/error.c +++ b/src/ar65/error.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/ar65/error.h b/src/ar65/error.h index 4052ee3eb..b311287a1 100644 --- a/src/ar65/error.h +++ b/src/ar65/error.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/ar65/exports.c b/src/ar65/exports.c index b3bb4cebe..b1e133e72 100644 --- a/src/ar65/exports.c +++ b/src/ar65/exports.c @@ -113,8 +113,8 @@ void ExpInsert (const char* Name, const ObjData* Module) while (1) { if (strcmp (L->Name, Name) == 0) { /* Duplicate entry */ - Warning ("External symbol `%s' in module `%s', library `%s', " - "is duplicated in module `%s'", + Warning ("External symbol '%s' in module '%s', library '%s', " + "is duplicated in module '%s'", Name, L->Module->Name, LibName, Module->Name); } if (L->Next == 0) { diff --git a/src/ar65/library.c b/src/ar65/library.c index c72e6e3cf..d12fb198a 100644 --- a/src/ar65/library.c +++ b/src/ar65/library.c @@ -36,6 +36,12 @@ #include <stdio.h> #include <string.h> #include <errno.h> +#if defined(_WIN32) +# include <process.h> +#else +# include <sys/types.h> +# include <unistd.h> +#endif /* common */ #include "cmdline.h" @@ -95,11 +101,11 @@ static void ReadHeader (void) /* Read the header fields, checking magic and version */ Header.Magic = Read32 (Lib); if (Header.Magic != LIB_MAGIC) { - Error ("`%s' is not a valid library file", LibName); + Error ("'%s' is not a valid library file", LibName); } Header.Version = Read16 (Lib); if (Header.Version != LIB_VERSION) { - Error ("Wrong data version in `%s'", LibName); + Error ("Wrong data version in '%s'", LibName); } Header.Flags = Read16 (Lib); Header.IndexOffs = Read32 (Lib); @@ -229,11 +235,11 @@ void LibOpen (const char* Name, int MustExist, int NeedTemp) /* File does not exist */ if (MustExist) { - Error ("Library `%s' does not exist", Name); + Error ("Library '%s' does not exist", Name); } else { /* Announce the library's creation if ar65 is verbose. */ Print (stdout, 1, - "%s: Library `%s' will be created.\n", ProgName, Name); + "%s: Library '%s' will be created.\n", ProgName, Name); } } else { @@ -249,9 +255,8 @@ void LibOpen (const char* Name, int MustExist, int NeedTemp) if (NeedTemp) { /* Create the temporary library name */ - NewLibName = xmalloc (strlen (Name) + strlen (".temp") + 1); - strcpy (NewLibName, Name); - strcat (NewLibName, ".temp"); + NewLibName = xmalloc (strlen (Name) + (sizeof (".temp-") - 1) + 2 * sizeof (unsigned int) + 1); + sprintf (NewLibName, "%s.temp-%X", Name, (unsigned int)getpid ()); /* Create the temporary library */ NewLib = fopen (NewLibName, "w+b"); @@ -317,7 +322,7 @@ static void LibCheckExports (ObjData* O) unsigned I; /* Let the user know what we do */ - Print (stdout, 2, "Module `%s' (%u exports):\n", O->Name, CollCount (&O->Exports)); + Print (stdout, 2, "Module '%s' (%u exports):\n", O->Name, CollCount (&O->Exports)); /* Insert the exports into the global table */ for (I = 0; I < CollCount (&O->Exports); ++I) { @@ -381,7 +386,7 @@ void LibClose (void) /* Reopen the library and truncate it */ Lib = fopen (LibName, "wb"); if (Lib == 0) { - Error ("Cannot open library `%s' for writing: %s", + Error ("Cannot open library '%s' for writing: %s", LibName, strerror (errno)); } @@ -389,19 +394,21 @@ void LibClose (void) fseek (NewLib, 0, SEEK_SET); while ((Count = fread (Buf, 1, sizeof (Buf), NewLib)) != 0) { if (fwrite (Buf, 1, Count, Lib) != Count) { - Error ("Cannot write to `%s': %s", LibName, strerror (errno)); + Error ("Cannot write to '%s': %s", LibName, strerror (errno)); } } } /* Close both files */ if (Lib && fclose (Lib) != 0) { - Error ("Problem closing `%s': %s", LibName, strerror (errno)); + Error ("Problem closing '%s': %s", LibName, strerror (errno)); } if (NewLib && fclose (NewLib) != 0) { - Error ("Problem closing temporary library file: %s", strerror (errno)); + Error ("Problem closing temporary library file '%s': %s", + NewLibName, strerror (errno)); } if (NewLibName && remove (NewLibName) != 0) { - Error ("Problem deleting temporary library file: %s", strerror (errno)); + Error ("Problem deleting temporary library file '%s': %s", + NewLibName, strerror (errno)); } } diff --git a/src/ar65/list.c b/src/ar65/list.c index 656299860..367c950dc 100644 --- a/src/ar65/list.c +++ b/src/ar65/list.c @@ -36,6 +36,9 @@ #include <stdio.h> #include <stdlib.h> +/* common */ +#include "print.h" + /* ar65 */ #include "error.h" #include "library.h" @@ -73,8 +76,10 @@ void ListObjFiles (int argc, char* argv []) /* Get the entry */ O = CollConstAt (&ObjPool, I); + /* Print the size if verbose */ + Print (stdout, 1, "%5lu ", O->Size); /* Print the name */ - printf ("%s\n", O->Name); + puts (O->Name); } diff --git a/src/ar65/main.c b/src/ar65/main.c index 9b9097ea4..48561027f 100644 --- a/src/ar65/main.c +++ b/src/ar65/main.c @@ -62,9 +62,9 @@ static void Usage (void) { fprintf (stderr, "Usage: %s <operation ...> lib file|module ...\n" "Operations are some of:\n" - "\ta\tAdd modules\n" + "\tr\tAdd modules\n" "\td\tDelete modules\n" - "\tl\tList library contents\n" + "\tt\tList library table\n" "\tv\tIncrease verbosity (put before other operation)\n" "\tx\tExtract modules\n" "\tV\tPrint the archiver version\n", @@ -94,13 +94,10 @@ int main (int argc, char* argv []) /* Get the argument */ const char* Arg = ArgVec [I]; - /* Check for an option */ - if (strlen (Arg) != 1) { - Usage (); - } switch (Arg [0]) { - case 'a': + case 'r': /* POSIX.2 */ + case 'a': /* staying compatible */ AddObjFiles (ArgCount - I - 1, &ArgVec[I+1]); break; @@ -108,7 +105,11 @@ int main (int argc, char* argv []) DelObjFiles (ArgCount - I - 1, &ArgVec [I+1]); break; - case 'l': + case 't': /* POSIX.2 */ + case 'l': /* staying compatible */ + if (Arg [1] == 'v') { + ++Verbosity; + } ListObjFiles (ArgCount - I - 1, &ArgVec [I+1]); break; @@ -121,7 +122,7 @@ int main (int argc, char* argv []) break; case 'V': - fprintf (stderr, "ar65 V%s\n", GetVersionAsString ()); + fprintf (stderr, "%s V%s\n", ProgName, GetVersionAsString ()); break; default: diff --git a/src/ar65/objdata.c b/src/ar65/objdata.c index 5a8f0c5fb..252ebe6ab 100644 --- a/src/ar65/objdata.c +++ b/src/ar65/objdata.c @@ -165,5 +165,5 @@ void DelObjData (const char* Module) } /* Not found! */ - Warning ("Module `%s' not found in library `%s'", Module, LibName); + Warning ("Module '%s' not found in library '%s'", Module, LibName); } diff --git a/src/ar65/objfile.c b/src/ar65/objfile.c index 0434f7e59..ac7dccb0d 100644 --- a/src/ar65/objfile.c +++ b/src/ar65/objfile.c @@ -68,7 +68,7 @@ static const char* GetModule (const char* Name) /* Must not end with a path separator */ if (*Module == 0) { - Error ("Cannot make module name from `%s'", Name); + Error ("Cannot make module name from '%s'", Name); } /* Done */ @@ -82,11 +82,11 @@ static void ObjReadHeader (FILE* Obj, ObjHeader* H, const char* Name) { H->Magic = Read32 (Obj); if (H->Magic != OBJ_MAGIC) { - Error ("`%s' is not an object file", Name); + Error ("'%s' is not an object file", Name); } H->Version = Read16 (Obj); if (H->Version != OBJ_VERSION) { - Error ("Object file `%s' has wrong version", Name); + Error ("Object file '%s' has wrong version", Name); } H->Flags = Read16 (Obj); H->OptionOffs = Read32 (Obj); @@ -236,7 +236,7 @@ void ObjAdd (const char* Name) /* Open the object file */ FILE* Obj = fopen (Name, "rb"); if (Obj == 0) { - Error ("Could not open `%s': %s", Name, strerror (errno)); + Error ("Could not open '%s': %s", Name, strerror (errno)); } /* Get the modification time of the object file. There's a race condition @@ -248,7 +248,7 @@ void ObjAdd (const char* Name) ** here. */ if (FileStat (Name, &StatBuf) != 0) { - Error ("Cannot stat object file `%s': %s", Name, strerror (errno)); + Error ("Cannot stat object file '%s': %s", Name, strerror (errno)); } /* Read and check the header */ @@ -267,7 +267,7 @@ void ObjAdd (const char* Name) ** and the external one. */ if (difftime ((time_t)O->MTime, StatBuf.st_mtime) > 0.0) { - Warning ("Replacing module `%s' by older version in library `%s'", + Warning ("Replacing module '%s' by older version in library '%s'", O->Name, LibName); } @@ -313,13 +313,13 @@ void ObjExtract (const char* Name) /* Bail out if the module does not exist */ if (O == 0) { - Error ("Module `%s' not found in library `%s'", Module, LibName); + Error ("Module '%s' not found in library '%s'", Module, LibName); } /* Open the output file */ Obj = fopen (Name, "w+b"); if (Obj == 0) { - Error ("Cannot open target file `%s': %s", Name, strerror (errno)); + Error ("Cannot open target file '%s': %s", Name, strerror (errno)); } /* Copy the complete object file data from the library to the new object @@ -329,11 +329,11 @@ void ObjExtract (const char* Name) /* Close the file */ if (fclose (Obj) != 0) { - Error ("Problem closing object file `%s': %s", Name, strerror (errno)); + Error ("Problem closing object file '%s': %s", Name, strerror (errno)); } /* Set access and modification time */ if (SetFileTimes (Name, O->MTime) != 0) { - Error ("Cannot set mod time on `%s': %s", Name, strerror (errno)); + Error ("Cannot set mod time on '%s': %s", Name, strerror (errno)); } } diff --git a/src/ca65.vcxproj b/src/ca65.vcxproj index 4e02fa2a9..3cc6019f2 100644 --- a/src/ca65.vcxproj +++ b/src/ca65.vcxproj @@ -1,5 +1,5 @@ <?xml version="1.0" encoding="utf-8"?> -<Project DefaultTargets="Build" ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> +<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <ItemGroup Label="ProjectConfigurations"> <ProjectConfiguration Include="Debug|Win32"> <Configuration>Debug</Configuration> @@ -13,65 +13,39 @@ <PropertyGroup Label="Globals"> <ProjectGuid>{D28CB737-E6CA-49C4-8CE9-FF05F86DD4EC}</ProjectGuid> <Keyword>Win32Proj</Keyword> - <RootNamespace>ca65</RootNamespace> </PropertyGroup> + <ImportGroup Label="PropertySheets"> + <Import Project="cc65.props" /> + </ImportGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> <UseDebugLibraries>true</UseDebugLibraries> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> <UseDebugLibraries>false</UseDebugLibraries> - <WholeProgramOptimization>true</WholeProgramOptimization> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> <ImportGroup Label="ExtensionSettings"> </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> <PropertyGroup Label="UserMacros" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <LinkIncremental>true</LinkIncremental> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> - <OutDir>$(SolutionDir)..\bin\</OutDir> </PropertyGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> <ClCompile> - <PrecompiledHeader> - </PrecompiledHeader> - <WarningLevel>Level3</WarningLevel> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;_DEBUG</PreprocessorDefinitions> - <TreatWarningAsError>true</TreatWarningAsError> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> + <PreprocessorDefinitions>_CONSOLE;_DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>true</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> <ClCompile> - <WarningLevel>Level3</WarningLevel> - <PrecompiledHeader> - </PrecompiledHeader> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;NDEBUG</PreprocessorDefinitions> - <TreatWarningAsError>true</TreatWarningAsError> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> + <PreprocessorDefinitions>_CONSOLE;NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>false</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemGroup> diff --git a/src/ca65/anonname.c b/src/ca65/anonname.c index 90b73fcab..fca20c8cd 100644 --- a/src/ca65/anonname.c +++ b/src/ca65/anonname.c @@ -72,7 +72,7 @@ StrBuf* AnonName (StrBuf* Buf, const char* Spec) int IsAnonName (const StrBuf* Name) /* Check if the given symbol name is that of an anonymous symbol */ -{ +{ if (SB_GetLen (Name) < sizeof (AnonTag) - 1) { /* Too short */ return 0; diff --git a/src/ca65/anonname.h b/src/ca65/anonname.h index 142cd9f87..7d5671c68 100644 --- a/src/ca65/anonname.h +++ b/src/ca65/anonname.h @@ -58,7 +58,7 @@ StrBuf* AnonName (StrBuf* Buf, const char* Spec); int IsAnonName (const StrBuf* Name); /* Check if the given symbol name is that of an anonymous symbol */ - + /* End of anonname.h */ diff --git a/src/ca65/condasm.c b/src/ca65/condasm.c index 24cbae696..6198f4017 100644 --- a/src/ca65/condasm.c +++ b/src/ca65/condasm.c @@ -386,6 +386,16 @@ void DoConditionals (void) CalcOverallIfCond (); break; + case TOK_IFP4510: + D = AllocIf (".IFP4510", 1); + NextTok (); + if (IfCond) { + SetIfCond (D, GetCPU() == CPU_4510); + } + ExpectSep (); + CalcOverallIfCond (); + break; + case TOK_IFP816: D = AllocIf (".IFP816", 1); NextTok (); @@ -406,6 +416,16 @@ void DoConditionals (void) CalcOverallIfCond (); break; + case TOK_IFPDTV: + D = AllocIf (".IFPDTV", 1); + NextTok (); + if (IfCond) { + SetIfCond (D, GetCPU() == CPU_6502DTV); + } + ExpectSep (); + CalcOverallIfCond (); + break; + case TOK_IFPSC02: D = AllocIf (".IFPSC02", 1); NextTok (); @@ -457,8 +477,10 @@ int CheckConditionals (void) case TOK_IFNDEF: case TOK_IFNREF: case TOK_IFP02: + case TOK_IFP4510: case TOK_IFP816: case TOK_IFPC02: + case TOK_IFPDTV: case TOK_IFPSC02: case TOK_IFREF: DoConditionals (); diff --git a/src/ca65/dbginfo.c b/src/ca65/dbginfo.c index 8a55f9ddc..c9dd7ab6d 100644 --- a/src/ca65/dbginfo.c +++ b/src/ca65/dbginfo.c @@ -211,7 +211,7 @@ void DbgInfoFile (void) void DbgInfoFunc (void) /* Parse and handle func subcommand of the .dbg pseudo instruction */ { - static const char* StorageKeys[] = { + static const char* const StorageKeys[] = { "EXTERN", "STATIC", }; @@ -352,7 +352,7 @@ void DbgInfoLine (void) void DbgInfoSym (void) /* Parse and handle SYM subcommand of the .dbg pseudo instruction */ { - static const char* StorageKeys[] = { + static const char* const StorageKeys[] = { "AUTO", "EXTERN", "REGISTER", @@ -468,7 +468,7 @@ void DbgInfoCheck (void) /* Search for the symbol name */ S->Sym = SymFindAny (S->Scope, GetStrBuf (S->AsmName)); if (S->Sym == 0) { - PError (&S->Pos, "Assembler symbol `%s' not found", + PError (&S->Pos, "Assembler symbol '%s' not found", GetString (S->AsmName)); } else { /* Set the backlink */ diff --git a/src/ca65/ea.h b/src/ca65/ea.h index 9a038047c..d861e9a6c 100644 --- a/src/ca65/ea.h +++ b/src/ca65/ea.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2004 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/ca65/ea65.c b/src/ca65/ea65.c index 5f76f2966..275d90b56 100644 --- a/src/ca65/ea65.c +++ b/src/ca65/ea65.c @@ -40,6 +40,7 @@ #include "expr.h" #include "instr.h" #include "nexttok.h" +#include "global.h" @@ -53,6 +54,20 @@ void GetEA (EffAddr* A) /* Parse an effective address, return the result in A */ { unsigned long Restrictions; + token_t IndirectEnter; + token_t IndirectLeave; + const char* IndirectExpect; + + /* Choose syntax for indirection */ + if (BracketAsIndirect) { + IndirectEnter = TOK_LBRACK; + IndirectLeave = TOK_RBRACK; + IndirectExpect = "']' expected"; + } else { + IndirectEnter = TOK_LPAREN; + IndirectLeave = TOK_RPAREN; + IndirectExpect = "')' expected"; + } /* Clear the output struct */ A->AddrModeSet = 0; @@ -97,23 +112,7 @@ void GetEA (EffAddr* A) NextTok (); A->AddrModeSet = AM65_ACCU; - } else if (CurTok.Tok == TOK_LBRACK) { - - /* [dir] or [dir],y */ - NextTok (); - A->Expr = Expression (); - Consume (TOK_RBRACK, "']' expected"); - if (CurTok.Tok == TOK_COMMA) { - /* [dir],y */ - NextTok (); - Consume (TOK_Y, "`Y' expected"); - A->AddrModeSet = AM65_DIR_IND_LONG_Y; - } else { - /* [dir] */ - A->AddrModeSet = AM65_DIR_IND_LONG | AM65_ABS_IND_LONG; - } - - } else if (CurTok.Tok == TOK_LPAREN) { + } else if (CurTok.Tok == IndirectEnter) { /* One of the indirect modes */ NextTok (); @@ -127,33 +126,60 @@ void GetEA (EffAddr* A) /* (adr,x) */ NextTok (); A->AddrModeSet = AM65_ABS_X_IND | AM65_DIR_X_IND; - ConsumeRParen (); + Consume (IndirectLeave, IndirectExpect); } else if (CurTok.Tok == TOK_S) { /* (rel,s),y */ NextTok (); A->AddrModeSet = AM65_STACK_REL_IND_Y; - ConsumeRParen (); + Consume (IndirectLeave, IndirectExpect); ConsumeComma (); - Consume (TOK_Y, "`Y' expected"); + Consume (TOK_Y, "'Y' expected"); } else { Error ("Syntax error"); } } else { - /* (adr) or (adr),y */ - ConsumeRParen (); + /* (adr), (adr),y or (adr),z */ + Consume (IndirectLeave, IndirectExpect); if (CurTok.Tok == TOK_COMMA) { /* (adr),y */ NextTok (); - Consume (TOK_Y, "`Y' expected"); - A->AddrModeSet = AM65_DIR_IND_Y; + switch (CurTok.Tok) { + case TOK_Z: + /* only set by scanner.c if in 4510-mode */ + NextTok (); + A->AddrModeSet = AM65_DIR_IND; + break; + default: + Consume (TOK_Y, "'Y' expected"); + A->AddrModeSet = AM65_DIR_IND_Y; + break; + } } else { /* (adr) */ - A->AddrModeSet = AM65_ABS_IND | AM65_ABS_IND_LONG | AM65_DIR_IND; + A->AddrModeSet = (CPU == CPU_4510) ? AM65_ABS_IND + : AM65_ABS_IND | AM65_ABS_IND_LONG | AM65_DIR_IND; } } + } else if (CurTok.Tok == TOK_LBRACK) { + + /* Never executed if BracketAsIndirect feature is enabled. */ + /* [dir] or [dir],y */ + NextTok (); + A->Expr = Expression (); + Consume (TOK_RBRACK, "']' expected"); + if (CurTok.Tok == TOK_COMMA) { + /* [dir],y */ + NextTok (); + Consume (TOK_Y, "'Y' expected"); + A->AddrModeSet = AM65_DIR_IND_LONG_Y; + } else { + /* [dir] */ + A->AddrModeSet = AM65_DIR_IND_LONG | AM65_ABS_IND_LONG; + } + } else { /* Remaining stuff: diff --git a/src/ca65/ea65.h b/src/ca65/ea65.h index 066d9b0cc..c5b139572 100644 --- a/src/ca65/ea65.h +++ b/src/ca65/ea65.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/ca65/easw16.c b/src/ca65/easw16.c index 578a25734..081828991 100644 --- a/src/ca65/easw16.c +++ b/src/ca65/easw16.c @@ -147,4 +147,4 @@ void GetSweet16EA (EffAddr* A) } - + diff --git a/src/ca65/easw16.h b/src/ca65/easw16.h index 81dfd0fa2..03a48c437 100644 --- a/src/ca65/easw16.h +++ b/src/ca65/easw16.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2004 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -65,4 +65,4 @@ void GetSweet16EA (EffAddr* A); - + diff --git a/src/ca65/enum.c b/src/ca65/enum.c index f0561b692..339b3230f 100644 --- a/src/ca65/enum.c +++ b/src/ca65/enum.c @@ -146,7 +146,7 @@ void DoEnum (void) } /* End of enum definition */ - Consume (TOK_ENDENUM, "`.ENDENUM' expected"); + Consume (TOK_ENDENUM, "'.ENDENUM' expected"); /* Free the base expression */ FreeExpr (BaseExpr); diff --git a/src/ca65/enum.h b/src/ca65/enum.h index 7d73a97b8..b954588dd 100644 --- a/src/ca65/enum.h +++ b/src/ca65/enum.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/ca65/error.c b/src/ca65/error.c index 38195d669..7e1457964 100644 --- a/src/ca65/error.c +++ b/src/ca65/error.c @@ -84,7 +84,7 @@ static void VPrintMsg (const FilePos* Pos, const char* Desc, SB_Terminate (&Msg); /* Format the message header */ - SB_Printf (&S, "%s(%u): %s: ", + SB_Printf (&S, "%s:%u: %s: ", SB_GetConstBuf (GetFileName (Pos->Name)), Pos->Line, Desc); @@ -144,7 +144,7 @@ static void AddNotifications (const Collection* LineInfos) break; case LI_TYPE_EXT: - Msg = "Assembler code generated from this line"; + Msg = "Assembly code generated from this line"; break; case LI_TYPE_MACRO: diff --git a/src/ca65/expr.c b/src/ca65/expr.c index ff4232c00..812b6e90c 100644 --- a/src/ca65/expr.c +++ b/src/ca65/expr.c @@ -171,6 +171,25 @@ int IsFarRange (long Val) +static const ExprNode* ResolveSymbolChain(const ExprNode* E) +/* Recursive helper function for IsEasyConst */ +{ + if (E->Op == EXPR_SYMBOL) { + SymEntry* Sym = E->V.Sym; + + if (Sym == 0 || Sym->Expr == 0 || SymHasUserMark (Sym)) { + return 0; + } else { + SymMarkUser (Sym); + E = ResolveSymbolChain (Sym->Expr); + SymUnmarkUser (Sym); + } + } + return E; +} + + + int IsEasyConst (const ExprNode* E, long* Val) /* Do some light checking if the given node is a constant. Don't care if E is ** a complex expression. If E is a constant, return true and place its value @@ -178,12 +197,10 @@ int IsEasyConst (const ExprNode* E, long* Val) */ { /* Resolve symbols, follow symbol chains */ - while (E->Op == EXPR_SYMBOL) { - E = SymResolve (E->V.Sym); - if (E == 0) { - /* Could not resolve */ - return 0; - } + E = ResolveSymbolChain (E); + if (E == 0) { + /* Could not resolve */ + return 0; } /* Symbols resolved, check for a literal */ @@ -699,7 +716,7 @@ static ExprNode* FuncAddrSize (void) /* Cheap local symbol */ Sym = SymFindLocal (SymLast, &CurTok.SVal, SYM_FIND_EXISTING); if (Sym == 0) { - Error ("Unknown symbol or scope: `%m%p'", &CurTok.SVal); + Error ("Unknown symbol or scope: '%m%p'", &CurTok.SVal); } else { AddrSize = Sym->AddrSize; } @@ -739,13 +756,13 @@ static ExprNode* FuncAddrSize (void) if (Sym) { AddrSize = Sym->AddrSize; } else { - Error ("Unknown symbol or scope: `%m%p%m%p'", &ScopeName, &Name); + Error ("Unknown symbol or scope: '%m%p%m%p'", &ScopeName, &Name); } } if (AddrSize == 0) { - Warning (1, "Unknown address size: `%m%p%m%p'", &ScopeName, &Name); + Warning (1, "Unknown address size: '%m%p%m%p'", &ScopeName, &Name); } /* Free the string buffers */ @@ -780,7 +797,7 @@ static ExprNode* FuncSizeOf (void) /* Cheap local symbol */ Sym = SymFindLocal (SymLast, &CurTok.SVal, SYM_FIND_EXISTING); if (Sym == 0) { - Error ("Unknown symbol or scope: `%m%p'", &CurTok.SVal); + Error ("Unknown symbol or scope: '%m%p'", &CurTok.SVal); } else { SizeSym = GetSizeOfSymbol (Sym); } @@ -832,7 +849,7 @@ static ExprNode* FuncSizeOf (void) if (Sym) { SizeSym = GetSizeOfSymbol (Sym); } else { - Error ("Unknown symbol or scope: `%m%p%m%p'", + Error ("Unknown symbol or scope: '%m%p%m%p'", &ScopeName, &Name); } } @@ -840,7 +857,7 @@ static ExprNode* FuncSizeOf (void) /* Check if we have a size */ if (SizeSym == 0 || !SymIsConst (SizeSym, &Size)) { - Error ("Size of `%m%p%m%p' is unknown", &ScopeName, &Name); + Error ("Size of '%m%p%m%p' is unknown", &ScopeName, &Name); Size = 0; } @@ -1209,11 +1226,11 @@ static ExprNode* Factor (void) SB_GetLen (&CurTok.SVal) == 1) { /* A character constant */ N = GenLiteralExpr (TgtTranslateChar (SB_At (&CurTok.SVal, 0))); + NextTok (); } else { N = GenLiteral0 (); /* Dummy */ Error ("Syntax error"); } - NextTok (); break; } return N; @@ -1691,7 +1708,7 @@ ExprNode* GenLiteralExpr (long Val) ExprNode* GenLiteral0 (void) -/* Return an expression tree that encodes the the number zero */ +/* Return an expression tree that encodes the number zero */ { return GenLiteralExpr (0); } @@ -1865,6 +1882,28 @@ ExprNode* GenWordExpr (ExprNode* Expr) +ExprNode* GenNearAddrExpr (ExprNode* Expr) +/* A word sized expression that will error if given a far expression at assemble time. */ +{ + long Val; + /* Special handling for const expressions */ + if (IsEasyConst (Expr, &Val)) { + FreeExpr (Expr); + Expr = GenLiteralExpr (Val & 0xFFFF); + if (Val > 0xFFFF) + { + Error("Range error: constant too large for assumed near address."); + } + } else { + ExprNode* Operand = Expr; + Expr = NewExprNode (EXPR_NEARADDR); + Expr->Left = Operand; + } + return Expr; +} + + + ExprNode* GenFarAddrExpr (ExprNode* Expr) /* Force the given expression into a far address and return the result. */ { diff --git a/src/ca65/expr.h b/src/ca65/expr.h index 03c2c26d8..c098aa1e2 100644 --- a/src/ca65/expr.h +++ b/src/ca65/expr.h @@ -81,7 +81,7 @@ ExprNode* GenLiteralExpr (long Val); /* Return an expression tree that encodes the given literal value */ ExprNode* GenLiteral0 (void); -/* Return an expression tree that encodes the the number zero */ +/* Return an expression tree that encodes the number zero */ ExprNode* GenSymExpr (struct SymEntry* Sym); /* Return an expression node that encodes the given symbol */ @@ -109,6 +109,9 @@ ExprNode* GenByteExpr (ExprNode* Expr); ExprNode* GenWordExpr (ExprNode* Expr); /* Force the given expression into a word and return the result. */ +ExprNode* GenNearAddrExpr (ExprNode* Expr); +/* A word sized expression that will error if given a far expression at assemble time. */ + ExprNode* GenFarAddrExpr (ExprNode* Expr); /* Force the given expression into a far address and return the result. */ @@ -169,7 +172,7 @@ ExprNode* FuncHiByte (void); /* Handle the .HIBYTE builtin function */ ExprNode* MakeBoundedExpr (ExprNode* Expr, unsigned Size); -/* Force the given expression into a specific size of ForceRange is true */ +/* Force the given expression into a specific size if ForceRange is true */ ExprNode* BoundedExpr (ExprNode* (*ExprFunc) (void), unsigned Size); /* Parse an expression and force it within a given size if ForceRange is true */ diff --git a/src/ca65/feature.c b/src/ca65/feature.c index 3462d5501..b11345338 100644 --- a/src/ca65/feature.c +++ b/src/ca65/feature.c @@ -48,7 +48,7 @@ /* Names of the features */ -static const char* FeatureKeys[FEAT_COUNT] = { +static const char* const FeatureKeys[FEAT_COUNT] = { "dollar_is_pc", "labels_without_colons", "loose_string_term", @@ -64,6 +64,8 @@ static const char* FeatureKeys[FEAT_COUNT] = { "force_range", "underline_in_numbers", "addrsize", + "bracket_as_indirect", + "string_escapes", }; @@ -121,6 +123,8 @@ feature_t SetFeature (const StrBuf* Key) case FEAT_FORCE_RANGE: ForceRange = 1; break; case FEAT_UNDERLINE_IN_NUMBERS: UnderlineInNumbers= 1; break; case FEAT_ADDRSIZE: AddrSize = 1; break; + case FEAT_BRACKET_AS_INDIRECT: BracketAsIndirect = 1; break; + case FEAT_STRING_ESCAPES: StringEscapes = 1; break; default: /* Keep gcc silent */ break; } diff --git a/src/ca65/feature.h b/src/ca65/feature.h index 3a520a54a..876f3c4a8 100644 --- a/src/ca65/feature.h +++ b/src/ca65/feature.h @@ -66,6 +66,8 @@ typedef enum { FEAT_FORCE_RANGE, FEAT_UNDERLINE_IN_NUMBERS, FEAT_ADDRSIZE, + FEAT_BRACKET_AS_INDIRECT, + FEAT_STRING_ESCAPES, /* Special value: Number of features available */ FEAT_COUNT diff --git a/src/ca65/filetab.c b/src/ca65/filetab.c index ce4b15c03..4ca32631e 100644 --- a/src/ca65/filetab.c +++ b/src/ca65/filetab.c @@ -211,7 +211,7 @@ unsigned GetFileIndex (const StrBuf* Name) /* If we don't have this index, print a diagnostic and use the main file */ if (F == 0) { - Error ("File name `%m%p' not found in file table", Name); + Error ("File name '%m%p' not found in file table", Name); return 0; } else { return F->Index; @@ -316,7 +316,7 @@ static void CreateDepFile (const char* Name, FileType Types) /* Open the file */ FILE* F = fopen (Name, "w"); if (F == 0) { - Fatal ("Cannot open dependency file `%s': %s", Name, strerror (errno)); + Fatal ("Cannot open dependency file '%s': %s", Name, strerror (errno)); } /* Print the output file followed by a tab char */ diff --git a/src/ca65/global.c b/src/ca65/global.c index e77b9201c..a216fc406 100644 --- a/src/ca65/global.c +++ b/src/ca65/global.c @@ -66,6 +66,7 @@ unsigned char DbgSyms = 0; /* Add debug symbols */ unsigned char LineCont = 0; /* Allow line continuation */ unsigned char LargeAlignment = 0; /* Don't warn about large alignments */ unsigned char RelaxChecks = 0; /* Relax a few assembler checks */ +unsigned char StringEscapes = 0; /* Allow C-style escapes in strings */ /* Emulation features */ unsigned char DollarIsPC = 0; /* Allow the $ symbol as current PC */ @@ -83,4 +84,4 @@ unsigned char CComments = 0; /* Allow C like comments */ unsigned char ForceRange = 0; /* Force values into expected range */ unsigned char UnderlineInNumbers = 0; /* Allow underlines in numbers */ unsigned char AddrSize = 0; /* Allow .ADDRSIZE function */ - +unsigned char BracketAsIndirect = 0; /* Use '[]' not '()' for indirection */ diff --git a/src/ca65/global.h b/src/ca65/global.h index fb254f835..77d90beca 100644 --- a/src/ca65/global.h +++ b/src/ca65/global.h @@ -68,6 +68,7 @@ extern unsigned char DbgSyms; /* Add debug symbols */ extern unsigned char LineCont; /* Allow line continuation */ extern unsigned char LargeAlignment; /* Don't warn about large alignments */ extern unsigned char RelaxChecks; /* Relax a few assembler checks */ +extern unsigned char StringEscapes; /* Allow C-style escapes in strings */ /* Emulation features */ extern unsigned char DollarIsPC; /* Allow the $ symbol as current PC */ @@ -85,6 +86,7 @@ extern unsigned char CComments; /* Allow C like comments */ extern unsigned char ForceRange; /* Force values into expected range */ extern unsigned char UnderlineInNumbers; /* Allow underlines in numbers */ extern unsigned char AddrSize; /* Allow .ADDRSIZE function */ +extern unsigned char BracketAsIndirect; /* Use '[]' not '()' for indirection */ diff --git a/src/ca65/incpath.c b/src/ca65/incpath.c index ff21b175d..8ea67df6f 100644 --- a/src/ca65/incpath.c +++ b/src/ca65/incpath.c @@ -76,9 +76,9 @@ void FinishIncludePaths (void) /* Add some compiled-in search paths if defined at compile time. */ #if defined(CA65_INC) && !defined(_WIN32) - AddSearchPath (IncSearchPath, STRINGIZE (CA65_INC)); + AddSearchPath (IncSearchPath, CA65_INC); #endif /* Add paths relative to the parent directory of the Windows binary. */ - AddSubSearchPathFromWinBin (IncSearchPath, "asminc"); + AddSubSearchPathFromBin (IncSearchPath, "asminc"); } diff --git a/src/ca65/instr.c b/src/ca65/instr.c index 500db1985..834edfb5f 100644 --- a/src/ca65/instr.c +++ b/src/ca65/instr.c @@ -73,6 +73,9 @@ static void PutPCRel8 (const InsDesc* Ins); static void PutPCRel16 (const InsDesc* Ins); /* Handle branches with an 16 bit distance and PER */ +static void PutPCRel4510 (const InsDesc* Ins); +/* Handle branches with a 16 bit distance for 4510 */ + static void PutBlockMove (const InsDesc* Ins); /* Handle the blockmove instructions (65816) */ @@ -89,7 +92,7 @@ static void PutSEP (const InsDesc* Ins); /* Emit a SEP instruction (65816), track register sizes */ static void PutTAMn (const InsDesc* Ins); -/* Emit a TAMn instruction (HuC6280). Since this is a two byte instruction with +/* Emit a TAMn instruction (HuC6280). Because this is a two-byte instruction with ** implicit addressing mode, the opcode byte in the table is actually the ** second operand byte. The TAM instruction is the more generic form, it takes ** an immediate argument. @@ -101,9 +104,9 @@ static void PutTMA (const InsDesc* Ins); */ static void PutTMAn (const InsDesc* Ins); -/* Emit a TMAn instruction (HuC6280). Since this is a two byte instruction with +/* Emit a TMAn instruction (HuC6280). Because this is a two-byte instruction with ** implicit addressing mode, the opcode byte in the table is actually the -** second operand byte. The TAM instruction is the more generic form, it takes +** second operand byte. The TMA instruction is the more generic form, it takes ** an immediate argument. */ @@ -125,6 +128,9 @@ static void PutRTS (const InsDesc* Ins attribute ((unused))); static void PutAll (const InsDesc* Ins); /* Handle all other instructions */ +static void Put4510 (const InsDesc* Ins); +/* Handle instructions of 4510 not matching any EATab */ + static void PutSweet16 (const InsDesc* Ins); /* Handle a generic sweet16 instruction */ @@ -297,6 +303,91 @@ static const struct { } }; +/* Instruction table for the 6502 with DTV extra opcodes (DTV) and +** those illegal instructions (X) which are supported by DTV. +** Note: illegals opcodes which contain more subinstructions +** (ASO, DCM, LSE, LXA, SBX and SHS) are not enlisted. +*/ +static const struct { + unsigned Count; + InsDesc Ins[71]; +} InsTab6502DTV = { + sizeof (InsTab6502DTV.Ins) / sizeof (InsTab6502DTV.Ins[0]), + { + { "ADC", 0x080A26C, 0x60, 0, PutAll }, + { "ALR", 0x0800000, 0x4B, 0, PutAll }, /* X */ + { "ANC", 0x0800000, 0x0B, 0, PutAll }, /* X */ + { "AND", 0x080A26C, 0x20, 0, PutAll }, + { "ANE", 0x0800000, 0x8B, 0, PutAll }, /* X */ + { "ARR", 0x0800000, 0x6B, 0, PutAll }, /* X */ + { "ASL", 0x000006e, 0x02, 1, PutAll }, + { "AXS", 0x0800000, 0xCB, 0, PutAll }, /* X */ + { "BCC", 0x0020000, 0x90, 0, PutPCRel8 }, + { "BCS", 0x0020000, 0xb0, 0, PutPCRel8 }, + { "BEQ", 0x0020000, 0xf0, 0, PutPCRel8 }, + { "BIT", 0x000000C, 0x00, 2, PutAll }, + { "BMI", 0x0020000, 0x30, 0, PutPCRel8 }, + { "BNE", 0x0020000, 0xd0, 0, PutPCRel8 }, + { "BPL", 0x0020000, 0x10, 0, PutPCRel8 }, + { "BRA", 0x0020000, 0x12, 0, PutPCRel8 }, /* DTV */ + { "BRK", 0x0000001, 0x00, 0, PutAll }, + { "BVC", 0x0020000, 0x50, 0, PutPCRel8 }, + { "BVS", 0x0020000, 0x70, 0, PutPCRel8 }, + { "CLC", 0x0000001, 0x18, 0, PutAll }, + { "CLD", 0x0000001, 0xd8, 0, PutAll }, + { "CLI", 0x0000001, 0x58, 0, PutAll }, + { "CLV", 0x0000001, 0xb8, 0, PutAll }, + { "CMP", 0x080A26C, 0xc0, 0, PutAll }, + { "CPX", 0x080000C, 0xe0, 1, PutAll }, + { "CPY", 0x080000C, 0xc0, 1, PutAll }, + { "DEC", 0x000006C, 0x00, 3, PutAll }, + { "DEX", 0x0000001, 0xca, 0, PutAll }, + { "DEY", 0x0000001, 0x88, 0, PutAll }, + { "EOR", 0x080A26C, 0x40, 0, PutAll }, + { "INC", 0x000006c, 0x00, 4, PutAll }, + { "INX", 0x0000001, 0xe8, 0, PutAll }, + { "INY", 0x0000001, 0xc8, 0, PutAll }, + { "JMP", 0x0000808, 0x4c, 6, PutJMP }, + { "JSR", 0x0000008, 0x20, 7, PutAll }, + { "LAS", 0x0000200, 0xBB, 0, PutAll }, /* X */ + { "LAX", 0x080A30C, 0xA3, 11, PutAll }, /* X */ + { "LDA", 0x080A26C, 0xa0, 0, PutAll }, + { "LDX", 0x080030C, 0xa2, 1, PutAll }, + { "LDY", 0x080006C, 0xa0, 1, PutAll }, + { "LSR", 0x000006F, 0x42, 1, PutAll }, + { "NOP", 0x080006D, 0x00, 10, PutAll }, /* X */ + { "ORA", 0x080A26C, 0x00, 0, PutAll }, + { "PHA", 0x0000001, 0x48, 0, PutAll }, + { "PHP", 0x0000001, 0x08, 0, PutAll }, + { "PLA", 0x0000001, 0x68, 0, PutAll }, + { "PLP", 0x0000001, 0x28, 0, PutAll }, + { "RLA", 0x000A26C, 0x23, 0, PutAll }, /* X */ + { "ROL", 0x000006F, 0x22, 1, PutAll }, + { "ROR", 0x000006F, 0x62, 1, PutAll }, + { "RRA", 0x000A26C, 0x63, 0, PutAll }, /* X */ + { "RTI", 0x0000001, 0x40, 0, PutAll }, + { "RTS", 0x0000001, 0x60, 0, PutAll }, + { "SAC", 0x0800000, 0x32, 1, PutAll }, /* DTV */ + { "SBC", 0x080A26C, 0xe0, 0, PutAll }, + { "SEC", 0x0000001, 0x38, 0, PutAll }, + { "SED", 0x0000001, 0xf8, 0, PutAll }, + { "SEI", 0x0000001, 0x78, 0, PutAll }, + { "SHA", 0x0002200, 0x93, 1, PutAll }, /* X */ + { "SHX", 0x0000200, 0x9e, 1, PutAll }, /* X */ + { "SHY", 0x0000040, 0x9c, 1, PutAll }, /* X */ + { "SIR", 0x0800000, 0x42, 1, PutAll }, /* DTV */ + { "STA", 0x000A26C, 0x80, 0, PutAll }, + { "STX", 0x000010c, 0x82, 1, PutAll }, + { "STY", 0x000002c, 0x80, 1, PutAll }, + { "TAX", 0x0000001, 0xaa, 0, PutAll }, + { "TAY", 0x0000001, 0xa8, 0, PutAll }, + { "TSX", 0x0000001, 0xba, 0, PutAll }, + { "TXA", 0x0000001, 0x8a, 0, PutAll }, + { "TXS", 0x0000001, 0x9a, 0, PutAll }, + { "TYA", 0x0000001, 0x98, 0, PutAll } + } +}; + /* Instruction table for the 65SC02 */ static const struct { unsigned Count; @@ -376,7 +467,7 @@ static const struct { /* Instruction table for the 65C02 */ static const struct { unsigned Count; - InsDesc Ins[98]; + InsDesc Ins[100]; } InsTab65C02 = { sizeof (InsTab65C02.Ins) / sizeof (InsTab65C02.Ins[0]), { @@ -467,6 +558,7 @@ static const struct { { "SMB6", 0x0000004, 0xE7, 1, PutAll }, { "SMB7", 0x0000004, 0xF7, 1, PutAll }, { "STA", 0x000A66C, 0x80, 0, PutAll }, + { "STP", 0x0000001, 0xdb, 0, PutAll }, { "STX", 0x000010c, 0x82, 1, PutAll }, { "STY", 0x000002c, 0x80, 1, PutAll }, { "STZ", 0x000006c, 0x04, 5, PutAll }, @@ -477,14 +569,158 @@ static const struct { { "TSX", 0x0000001, 0xba, 0, PutAll }, { "TXA", 0x0000001, 0x8a, 0, PutAll }, { "TXS", 0x0000001, 0x9a, 0, PutAll }, - { "TYA", 0x0000001, 0x98, 0, PutAll } + { "TYA", 0x0000001, 0x98, 0, PutAll }, + { "WAI", 0x0000001, 0xcb, 0, PutAll } + } +}; + +/* Instruction table for the 4510 */ +static const struct { + unsigned Count; + InsDesc Ins[133]; +} InsTab4510 = { + sizeof (InsTab4510.Ins) / sizeof (InsTab4510.Ins[0]), + { + { "ADC", 0x080A66C, 0x60, 0, PutAll }, + { "AND", 0x080A66C, 0x20, 0, PutAll }, + { "ASL", 0x000006e, 0x02, 1, PutAll }, + { "ASR", 0x0000026, 0x43, 0, Put4510 }, + { "ASW", 0x0000008, 0xcb, 6, PutAll }, + { "BBR0", 0x0000000, 0x0F, 0, PutBitBranch }, + { "BBR1", 0x0000000, 0x1F, 0, PutBitBranch }, + { "BBR2", 0x0000000, 0x2F, 0, PutBitBranch }, + { "BBR3", 0x0000000, 0x3F, 0, PutBitBranch }, + { "BBR4", 0x0000000, 0x4F, 0, PutBitBranch }, + { "BBR5", 0x0000000, 0x5F, 0, PutBitBranch }, + { "BBR6", 0x0000000, 0x6F, 0, PutBitBranch }, + { "BBR7", 0x0000000, 0x7F, 0, PutBitBranch }, + { "BBS0", 0x0000000, 0x8F, 0, PutBitBranch }, + { "BBS1", 0x0000000, 0x9F, 0, PutBitBranch }, + { "BBS2", 0x0000000, 0xAF, 0, PutBitBranch }, + { "BBS3", 0x0000000, 0xBF, 0, PutBitBranch }, + { "BBS4", 0x0000000, 0xCF, 0, PutBitBranch }, + { "BBS5", 0x0000000, 0xDF, 0, PutBitBranch }, + { "BBS6", 0x0000000, 0xEF, 0, PutBitBranch }, + { "BBS7", 0x0000000, 0xFF, 0, PutBitBranch }, + { "BCC", 0x0020000, 0x90, 0, PutPCRel8 }, + { "BCS", 0x0020000, 0xb0, 0, PutPCRel8 }, + { "BEQ", 0x0020000, 0xf0, 0, PutPCRel8 }, + { "BIT", 0x0A0006C, 0x00, 2, PutAll }, + { "BMI", 0x0020000, 0x30, 0, PutPCRel8 }, + { "BNE", 0x0020000, 0xd0, 0, PutPCRel8 }, + { "BPL", 0x0020000, 0x10, 0, PutPCRel8 }, + { "BRA", 0x0020000, 0x80, 0, PutPCRel8 }, + { "BRK", 0x0000001, 0x00, 0, PutAll }, + { "BSR", 0x0040000, 0x63, 0, PutPCRel4510 }, + { "BVC", 0x0020000, 0x50, 0, PutPCRel8 }, + { "BVS", 0x0020000, 0x70, 0, PutPCRel8 }, + { "CLC", 0x0000001, 0x18, 0, PutAll }, + { "CLD", 0x0000001, 0xd8, 0, PutAll }, + { "CLE", 0x0000001, 0x02, 0, PutAll }, + { "CLI", 0x0000001, 0x58, 0, PutAll }, + { "CLV", 0x0000001, 0xb8, 0, PutAll }, + { "CMP", 0x080A66C, 0xc0, 0, PutAll }, + { "CPX", 0x080000C, 0xe0, 1, PutAll }, + { "CPY", 0x080000C, 0xc0, 1, PutAll }, + { "CPZ", 0x080000C, 0xd0, 1, Put4510 }, + { "DEA", 0x0000001, 0x00, 3, PutAll }, /* == DEC */ + { "DEC", 0x000006F, 0x00, 3, PutAll }, + { "DEW", 0x0000004, 0xc3, 9, PutAll }, + { "DEX", 0x0000001, 0xca, 0, PutAll }, + { "DEY", 0x0000001, 0x88, 0, PutAll }, + { "DEZ", 0x0000001, 0x3B, 0, PutAll }, + { "EOM", 0x0000001, 0xea, 0, PutAll }, + { "EOR", 0x080A66C, 0x40, 0, PutAll }, + { "INA", 0x0000001, 0x00, 4, PutAll }, /* == INC */ + { "INC", 0x000006f, 0x00, 4, PutAll }, + { "INW", 0x0000004, 0xe3, 9, PutAll }, + { "INX", 0x0000001, 0xe8, 0, PutAll }, + { "INY", 0x0000001, 0xc8, 0, PutAll }, + { "INZ", 0x0000001, 0x1B, 0, PutAll }, + { "JMP", 0x0010808, 0x4c, 6, PutAll }, + { "JSR", 0x0010808, 0x20, 7, Put4510 }, + { "LBCC", 0x0040000, 0x93, 0, PutPCRel4510 }, + { "LBCS", 0x0040000, 0xb3, 0, PutPCRel4510 }, + { "LBEQ", 0x0040000, 0xf3, 0, PutPCRel4510 }, + { "LBMI", 0x0040000, 0x33, 0, PutPCRel4510 }, + { "LBNE", 0x0040000, 0xd3, 0, PutPCRel4510 }, + { "LBPL", 0x0040000, 0x13, 0, PutPCRel4510 }, + { "LBRA", 0x0040000, 0x83, 0, PutPCRel4510 }, + { "LBVC", 0x0040000, 0x53, 0, PutPCRel4510 }, + { "LBVS", 0x0040000, 0x73, 0, PutPCRel4510 }, + { "LDA", 0x090A66C, 0xa0, 0, Put4510 }, + { "LDX", 0x080030C, 0xa2, 1, PutAll }, + { "LDY", 0x080006C, 0xa0, 1, PutAll }, + { "LDZ", 0x0800048, 0xa3, 1, Put4510 }, + { "LSR", 0x000006F, 0x42, 1, PutAll }, + { "MAP", 0x0000001, 0x5C, 0, PutAll }, + { "NEG", 0x0000001, 0x42, 0, PutAll }, + { "NOP", 0x0000001, 0xea, 0, PutAll }, /* == EOM */ + { "ORA", 0x080A66C, 0x00, 0, PutAll }, + { "PHA", 0x0000001, 0x48, 0, PutAll }, + { "PHD", 0x8000008, 0xf4, 1, PutAll }, /* == PHW */ + { "PHP", 0x0000001, 0x08, 0, PutAll }, + { "PHW", 0x8000008, 0xf4, 1, PutAll }, + { "PHX", 0x0000001, 0xda, 0, PutAll }, + { "PHY", 0x0000001, 0x5a, 0, PutAll }, + { "PHZ", 0x0000001, 0xdb, 0, PutAll }, + { "PLA", 0x0000001, 0x68, 0, PutAll }, + { "PLP", 0x0000001, 0x28, 0, PutAll }, + { "PLX", 0x0000001, 0xfa, 0, PutAll }, + { "PLY", 0x0000001, 0x7a, 0, PutAll }, + { "PLZ", 0x0000001, 0xfb, 0, PutAll }, + { "RMB0", 0x0000004, 0x07, 1, PutAll }, + { "RMB1", 0x0000004, 0x17, 1, PutAll }, + { "RMB2", 0x0000004, 0x27, 1, PutAll }, + { "RMB3", 0x0000004, 0x37, 1, PutAll }, + { "RMB4", 0x0000004, 0x47, 1, PutAll }, + { "RMB5", 0x0000004, 0x57, 1, PutAll }, + { "RMB6", 0x0000004, 0x67, 1, PutAll }, + { "RMB7", 0x0000004, 0x77, 1, PutAll }, + { "ROL", 0x000006F, 0x22, 1, PutAll }, + { "ROR", 0x000006F, 0x62, 1, PutAll }, + { "ROW", 0x0000008, 0xeb, 6, PutAll }, + { "RTI", 0x0000001, 0x40, 0, PutAll }, + { "RTN", 0x0800000, 0x62, 1, PutAll }, + { "RTS", 0x0000001, 0x60, 0, PutAll }, + { "SBC", 0x080A66C, 0xe0, 0, PutAll }, + { "SEC", 0x0000001, 0x38, 0, PutAll }, + { "SED", 0x0000001, 0xf8, 0, PutAll }, + { "SEE", 0x0000001, 0x03, 0, PutAll }, + { "SEI", 0x0000001, 0x78, 0, PutAll }, + { "SMB0", 0x0000004, 0x87, 1, PutAll }, + { "SMB1", 0x0000004, 0x97, 1, PutAll }, + { "SMB2", 0x0000004, 0xA7, 1, PutAll }, + { "SMB3", 0x0000004, 0xB7, 1, PutAll }, + { "SMB4", 0x0000004, 0xC7, 1, PutAll }, + { "SMB5", 0x0000004, 0xD7, 1, PutAll }, + { "SMB6", 0x0000004, 0xE7, 1, PutAll }, + { "SMB7", 0x0000004, 0xF7, 1, PutAll }, + { "STA", 0x010A66C, 0x80, 0, Put4510 }, + { "STX", 0x000030c, 0x82, 1, Put4510 }, + { "STY", 0x000006c, 0x80, 1, Put4510 }, + { "STZ", 0x000006c, 0x04, 5, PutAll }, + { "TAB", 0x0000001, 0x5b, 0, PutAll }, + { "TAX", 0x0000001, 0xaa, 0, PutAll }, + { "TAY", 0x0000001, 0xa8, 0, PutAll }, + { "TAZ", 0x0000001, 0x4b, 0, PutAll }, + { "TBA", 0x0000001, 0x7b, 0, PutAll }, + { "TRB", 0x000000c, 0x10, 1, PutAll }, + { "TSB", 0x000000c, 0x00, 1, PutAll }, + { "TSX", 0x0000001, 0xba, 0, PutAll }, + { "TSY", 0x0000001, 0x0b, 0, PutAll }, + { "TXA", 0x0000001, 0x8a, 0, PutAll }, + { "TXS", 0x0000001, 0x9a, 0, PutAll }, + { "TYA", 0x0000001, 0x98, 0, PutAll }, + { "TYS", 0x0000001, 0x2b, 0, PutAll }, + { "TZA", 0x0000001, 0x6b, 0, PutAll }, } }; /* Instruction table for the 65816 */ static const struct { unsigned Count; - InsDesc Ins[99]; + InsDesc Ins[100]; } InsTab65816 = { sizeof (InsTab65816.Ins) / sizeof (InsTab65816.Ins[0]), { @@ -499,7 +735,7 @@ static const struct { { "BNE", 0x0020000, 0xd0, 0, PutPCRel8 }, { "BPL", 0x0020000, 0x10, 0, PutPCRel8 }, { "BRA", 0x0020000, 0x80, 0, PutPCRel8 }, - { "BRK", 0x0000001, 0x00, 0, PutAll }, + { "BRK", 0x0000005, 0x00, 6, PutAll }, { "BRL", 0x0040000, 0x82, 0, PutPCRel16 }, { "BVC", 0x0020000, 0x50, 0, PutPCRel8 }, { "BVS", 0x0020000, 0x70, 0, PutPCRel8 }, @@ -585,6 +821,7 @@ static const struct { { "TYA", 0x0000001, 0x98, 0, PutAll }, { "TYX", 0x0000001, 0xbb, 0, PutAll }, { "WAI", 0x0000001, 0xcb, 0, PutAll }, + { "WDM", 0x0000004, 0x42, 6, PutAll }, { "XBA", 0x0000001, 0xeb, 0, PutAll }, { "XCE", 0x0000001, 0xfb, 0, PutAll } } @@ -607,7 +844,7 @@ static const struct { { "BNZ", AMSW16_BRA, 0x07, 0, PutSweet16Branch }, { "BP", AMSW16_BRA, 0x04, 0, PutSweet16Branch }, { "BR", AMSW16_BRA, 0x01, 0, PutSweet16Branch }, - { "BS", AMSW16_BRA, 0x0B, 0, PutSweet16Branch }, + { "BS", AMSW16_BRA, 0x0C, 0, PutSweet16Branch }, { "BZ", AMSW16_BRA, 0x06, 0, PutSweet16Branch }, { "CPR", AMSW16_REG, 0xD0, 0, PutSweet16 }, { "DCR", AMSW16_REG, 0xF0, 0, PutSweet16 }, @@ -778,12 +1015,14 @@ static const InsTable* InsTabs[CPU_COUNT] = { (const InsTable*) &InsTabNone, (const InsTable*) &InsTab6502, (const InsTable*) &InsTab6502X, + (const InsTable*) &InsTab6502DTV, (const InsTable*) &InsTab65SC02, (const InsTable*) &InsTab65C02, (const InsTable*) &InsTab65816, (const InsTable*) &InsTabSweet16, (const InsTable*) &InsTabHuC6280, 0, /* Mitsubishi 740 */ + (const InsTable*) &InsTab4510, }; const InsTable* InsTab = (const InsTable*) &InsTab6502; @@ -795,73 +1034,73 @@ static unsigned char EATab[12][AM65I_COUNT] = { 0x00, 0x00, 0x05, 0x0D, 0x0F, 0x15, 0x1D, 0x1F, 0x00, 0x19, 0x12, 0x00, 0x07, 0x11, 0x17, 0x01, 0x00, 0x00, 0x00, 0x03, 0x13, 0x09, 0x00, 0x09, - 0x00, 0x00, 0x00 + 0x00, 0x00, 0x00, 0x00 }, { /* Table 1 */ 0x08, 0x08, 0x04, 0x0C, 0x00, 0x14, 0x1C, 0x00, 0x14, 0x1C, 0x00, 0x80, 0x00, 0x10, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x80 + 0x00, 0x00, 0x80, 0x00 }, { /* Table 2 */ 0x00, 0x00, 0x24, 0x2C, 0x0F, 0x34, 0x3C, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x89, 0x00, 0x00, - 0x00, 0x00, 0x00 + 0x00, 0x00, 0x00, 0x00 }, { /* Table 3 */ 0x3A, 0x3A, 0xC6, 0xCE, 0x00, 0xD6, 0xDE, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00 + 0x00, 0x00, 0x00, 0x00 }, { /* Table 4 */ 0x1A, 0x1A, 0xE6, 0xEE, 0x00, 0xF6, 0xFE, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00 + 0x00, 0x00, 0x00, 0x00 }, { /* Table 5 */ 0x00, 0x00, 0x60, 0x98, 0x00, 0x70, 0x9E, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00 + 0x00, 0x00, 0x00, 0x00 }, { /* Table 6 */ 0x00, 0x00, 0x00, 0x00, 0x10, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x20, 0x00, 0x00, 0x00, 0x00, 0x30, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x90 + 0x00, 0x00, 0x90, 0x00 }, - { /* Table 7 */ + { /* Table 7 (Subroutine opcodes) */ 0x00, 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, + 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, 0x00, 0x00, 0xDC, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00 + 0x00, 0x00, 0x00, 0x00 }, { /* Table 8 */ 0x00, 0x40, 0x01, 0x41, 0x00, 0x09, 0x49, 0x00, 0x00, 0x00, 0x00, 0x51, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x40, 0x00, 0x00, - 0x00, 0x00, 0x00 + 0x00, 0x00, 0x00, 0x00 }, { /* Table 9 */ 0x00, 0x00, 0x00, 0x10, 0x00, 0x20, 0x30, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, - 0x00, 0x00, 0x00 + 0x00, 0x00, 0x00, 0x00 }, { /* Table 10 (NOPs) */ 0xea, 0x00, 0x04, 0x0c, 0x00, 0x14, 0x1c, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x80, - 0x00, 0x00, 0x00 + 0x00, 0x00, 0x00, 0x00 }, { /* Table 11 (LAX) */ 0x08, 0x08, 0x04, 0x0C, 0x00, 0x14, 0x1C, 0x00, 0x14, 0x1C, 0x00, 0x80, 0x00, 0x10, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x08, - 0x00, 0x00, 0x80 + 0x00, 0x00, 0x80, 0x00 }, }; @@ -906,6 +1145,7 @@ unsigned char ExtBytes[AM65I_COUNT] = { 2, /* Blockmove (65816) */ 7, /* Block transfer (HuC6280) */ 2, /* Absolute Indirect long */ + 2, /* Immidiate word */ }; /* Table that encodes the additional bytes for each SWEET16 instruction */ @@ -939,7 +1179,7 @@ static int EvalEA (const InsDesc* Ins, EffAddr* A) A->AddrModeSet &= Ins->AddrMode; /* If we have an expression, check it and remove any addressing modes that - ** are too small for the expression size. Since we have to study the + ** are too small for the expression size. Because we have to study the ** expression anyway, do also replace it by a simpler one if possible. */ if (A->Expr) { @@ -967,9 +1207,9 @@ static int EvalEA (const InsDesc* Ins, EffAddr* A) } else { ED.AddrSize = DataAddrSize; /* If the default address size of the data segment is unequal - ** to zero page addressing, but zero page addressing is - ** allowed by the instruction, mark all symbols in the - ** expression tree. This mark will be checked at end of + ** to zero page addressing, but zero page addressing is + ** allowed by the instruction, mark all symbols in the + ** expression tree. This mark will be checked at end of ** assembly, and a warning is issued, if a zero page symbol ** was guessed wrong here. */ @@ -1031,7 +1271,7 @@ static int EvalEA (const InsDesc* Ins, EffAddr* A) ** limit the expression to the maximum possible value. */ if (A->AddrMode == AM65I_IMM_ACCU || A->AddrMode == AM65I_IMM_INDEX || - A->AddrMode == AM65I_IMM_IMPLICIT) { + A->AddrMode == AM65I_IMM_IMPLICIT || A->AddrMode == AM65I_IMM_IMPLICIT_WORD) { if (ForceRange && A->Expr) { A->Expr = MakeBoundedExpr (A->Expr, ExtBytes[A->AddrMode]); } @@ -1063,7 +1303,7 @@ static void EmitCode (EffAddr* A) ** mode, force this address into 16 bit range to allow ** addressing inside a 64K segment. */ - Emit2 (A->Opcode, GenWordExpr (A->Expr)); + Emit2 (A->Opcode, GenNearAddrExpr (A->Expr)); } else { Emit2 (A->Opcode, A->Expr); } @@ -1134,13 +1374,47 @@ static void PutPCRel16 (const InsDesc* Ins) +static void PutPCRel4510 (const InsDesc* Ins) +/* Handle branches with a 16 bit distance */ +{ + /* 16 bit branch opcode is 8 bit branch opcode or'ed with 0x03 */ + EmitPCRel (Ins->BaseCode, GenBranchExpr (2), 2); +} + + + static void PutBlockMove (const InsDesc* Ins) /* Handle the blockmove instructions (65816) */ { + ExprNode* Arg1; + ExprNode* Arg2; + Emit0 (Ins->BaseCode); - EmitByte (Expression ()); + + if (CurTok.Tok == TOK_HASH) { + /* The operand is a bank-byte expression. */ + NextTok (); + Arg1 = Expression (); + } else { + /* The operand is a far-address expression. + ** Use only its bank part. + */ + Arg1 = FuncBankByte (); + } ConsumeComma (); - EmitByte (Expression ()); + + if (CurTok.Tok == TOK_HASH) { + NextTok (); + Arg2 = Expression (); + } else { + Arg2 = FuncBankByte (); + } + + /* The operands are written in Assembly code as source, destination; + ** but, they're assembled as <destination> <source>. + */ + EmitByte (Arg2); + EmitByte (Arg1); } @@ -1226,7 +1500,7 @@ static void PutSEP (const InsDesc* Ins) static void PutTAMn (const InsDesc* Ins) -/* Emit a TAMn instruction (HuC6280). Since this is a two byte instruction with +/* Emit a TAMn instruction (HuC6280). Because this is a two-byte instruction with ** implicit addressing mode, the opcode byte in the table is actually the ** second operand byte. The TAM instruction is the more generic form, it takes ** an immediate argument. @@ -1256,7 +1530,7 @@ static void PutTMA (const InsDesc* Ins) } else { /* Make sure just one bit is set */ if ((Val & (Val - 1)) != 0) { - Error ("Argument to TAM must be a power of two"); + Error ("Argument of TMA must be a power of two"); } } } @@ -1264,9 +1538,9 @@ static void PutTMA (const InsDesc* Ins) static void PutTMAn (const InsDesc* Ins) -/* Emit a TMAn instruction (HuC6280). Since this is a two byte instruction with +/* Emit a TMAn instruction (HuC6280). Because this is a two-byte instruction with ** implicit addressing mode, the opcode byte in the table is actually the -** second operand byte. The TAM instruction is the more generic form, it takes +** second operand byte. The TMA instruction is the more generic form, it takes ** an immediate argument. */ { @@ -1381,6 +1655,53 @@ static void PutAll (const InsDesc* Ins) +static void Put4510 (const InsDesc* Ins) +/* Handle all other instructions, with modifications for 4510 */ +{ + /* The 4510 uses all 256 possible opcodes, so the last ones were crammed + ** in where an opcode was still undefined. As a result, some of those + ** don't follow any rules for encoding the addressmodes. So the EATab + ** approach does not work always. In this function, the wrongly calculated + ** opcode is replaced by the correct one "on the fly". Suggestions for a + ** better approach are welcome. + ** + ** These are: + ** $47 -> $44 : ASR $12 + ** $57 -> $54 : ASR $12,X + ** $93 -> $82 : STA ($12,SP),Y + ** $9c -> $8b : STY $1234,X + ** $9e -> $9b : STX $1234,Y + ** $af -> $ab : LDZ $1234 + ** $bf -> $bb : LDZ $1234,X + ** $b3 -> $e2 : LDA ($12,SP),Y + ** $d0 -> $c2 : CPZ #$00 + ** $fc -> $23 : JSR ($1234,X) + */ + EffAddr A; + + /* Evaluate the addressing mode used */ + if (EvalEA (Ins, &A)) { + switch (A.Opcode) { + case 0x47: A.Opcode = 0x44; break; + case 0x57: A.Opcode = 0x54; break; + case 0x93: A.Opcode = 0x82; break; + case 0x9C: A.Opcode = 0x8B; break; + case 0x9E: A.Opcode = 0x9B; break; + case 0xAF: A.Opcode = 0xAB; break; + case 0xBF: A.Opcode = 0xBB; break; + case 0xB3: A.Opcode = 0xE2; break; + case 0xD0: A.Opcode = 0xC2; break; + case 0xFC: A.Opcode = 0x23; break; + default: /* Keep opcode as it is */ break; + } + + /* No error, output code */ + EmitCode (&A); + } +} + + + /*****************************************************************************/ /* Handler functions for SWEET16 */ /*****************************************************************************/ diff --git a/src/ca65/instr.h b/src/ca65/instr.h index 1f2ce262b..fe18d2110 100644 --- a/src/ca65/instr.h +++ b/src/ca65/instr.h @@ -85,6 +85,7 @@ #define AM65_BLOCKMOVE 0x01000000UL #define AM65_BLOCKXFER 0x02000000UL #define AM65_ABS_IND_LONG 0x04000000UL +#define AM65_IMM_IMPLICIT_WORD 0x08000000UL /* PHW #$1234 (4510 only) */ /* Bitmask for all ZP operations that have correspondent ABS ops */ #define AM65_SET_ZP (AM65_DIR | AM65_DIR_X | AM65_DIR_Y | AM65_DIR_IND | AM65_DIR_X_IND) @@ -100,15 +101,16 @@ /* Bitmask for all FAR operations */ #define AM65_ALL_FAR (AM65_ABS_LONG | AM65_ABS_LONG_X) - + /* Bitmask for all immediate operations */ -#define AM65_ALL_IMM (AM65_IMM_ACCU | AM65_IMM_INDEX | AM65_IMM_IMPLICIT) +#define AM65_ALL_IMM (AM65_IMM_ACCU | AM65_IMM_INDEX | AM65_IMM_IMPLICIT | AM65_IMM_IMPLICIT_WORD) /* Bit numbers and count */ #define AM65I_IMM_ACCU 21 #define AM65I_IMM_INDEX 22 #define AM65I_IMM_IMPLICIT 23 -#define AM65I_COUNT 27 +#define AM65I_IMM_IMPLICIT_WORD 27 +#define AM65I_COUNT 28 diff --git a/src/ca65/istack.c b/src/ca65/istack.c index 8cda7dd2f..7a95e7e8c 100644 --- a/src/ca65/istack.c +++ b/src/ca65/istack.c @@ -81,7 +81,7 @@ void PushInput (int (*Func) (void*), void* Data, const char* Desc) /* Check for a stack overflow */ if (ICount > ISTACK_MAX) { Fatal ("Maximum input stack nesting exceeded"); - } + } /* Create a new stack element */ E = xmalloc (sizeof (*E)); diff --git a/src/ca65/lineinfo.c b/src/ca65/lineinfo.c index 92fecec58..4f29a29d2 100644 --- a/src/ca65/lineinfo.c +++ b/src/ca65/lineinfo.c @@ -368,6 +368,14 @@ void NewAsmLine (void) /* Start a new line using the current line info */ AsmLineInfo = StartLine (&CurTok.Pos, LI_TYPE_ASM, 0); + + /* If the first LineInfo in the list came from a .dbg line, then we want + ** errors and warnings to show it as an additional note, not as the primary + ** line. Therefore, swap the first two LineInfo items. + */ + if (GetLineInfoType (CollAtUnchecked (&CurLineInfo, 0)) == LI_TYPE_EXT) { + CollMove (&CurLineInfo, 1, 0); + } } @@ -421,7 +429,7 @@ void ReleaseFullLineInfo (Collection* LineInfos) /* Walk over all entries */ for (I = 0; I < CollCount (LineInfos); ++I) { - /* Release the the line info */ + /* Release the line info */ ReleaseLineInfo (CollAt (LineInfos, I)); } diff --git a/src/ca65/listing.c b/src/ca65/listing.c index b3f3d9282..9f2396612 100644 --- a/src/ca65/listing.c +++ b/src/ca65/listing.c @@ -304,7 +304,7 @@ void CreateListing (void) /* Open the real listing file */ F = fopen (SB_GetConstBuf (&ListingName), "w"); if (F == 0) { - Fatal ("Cannot open listing file `%s': %s", + Fatal ("Cannot open listing file '%s': %s", SB_GetConstBuf (&ListingName), strerror (errno)); } diff --git a/src/ca65/macro.c b/src/ca65/macro.c index 1f6812ce0..d9f1f385c 100644 --- a/src/ca65/macro.c +++ b/src/ca65/macro.c @@ -375,7 +375,7 @@ static void MacSkipDef (unsigned Style) if (CurTok.Tok != TOK_EOF) { SkipUntilSep (); } else { - Error ("`.ENDMACRO' expected"); + Error ("'.ENDMACRO' expected"); } } else { /* Skip until end of line */ @@ -409,7 +409,7 @@ void MacDef (unsigned Style) /* Did we already define that macro? */ if (HT_Find (&MacroTab, &CurTok.SVal) != 0) { /* Macro is already defined */ - Error ("A macro named `%m%p' is already defined", &CurTok.SVal); + Error ("A macro named '%m%p' is already defined", &CurTok.SVal); /* Skip tokens until we reach the final .endmacro */ MacSkipDef (Style); return; @@ -438,9 +438,7 @@ void MacDef (unsigned Style) /* Parse the parameter list */ if (HaveParams) { - while (CurTok.Tok == TOK_IDENT) { - /* Create a struct holding the identifier */ IdDesc* I = NewIdDesc (&CurTok.SVal); @@ -449,9 +447,10 @@ void MacDef (unsigned Style) M->Params = I; } else { IdDesc* List = M->Params; + while (1) { if (SB_Compare (&List->Id, &CurTok.SVal) == 0) { - Error ("Duplicate symbol `%m%p'", &CurTok.SVal); + Error ("Duplicate symbol '%m%p'", &CurTok.SVal); } if (List->Next == 0) { break; @@ -490,6 +489,22 @@ void MacDef (unsigned Style) ** the .LOCAL command is detected and removed, at this time. */ while (1) { + /* Check for include */ + if (CurTok.Tok == TOK_INCLUDE && Style == MAC_STYLE_CLASSIC) { + /* Include another file */ + NextTok (); + /* Name must follow */ + if (CurTok.Tok != TOK_STRCON) { + ErrorSkip ("String constant expected"); + } else { + SB_Terminate (&CurTok.SVal); + if (NewInputFile (SB_GetConstBuf (&CurTok.SVal)) == 0) { + /* Error opening the file, skip remainder of line */ + SkipUntilSep (); + } + } + NextTok (); + } /* Check for end of macro */ if (Style == MAC_STYLE_CLASSIC) { @@ -500,7 +515,7 @@ void MacDef (unsigned Style) } /* May not have end of file in a macro definition */ if (CurTok.Tok == TOK_EOF) { - Error ("`.ENDMACRO' expected"); + Error ("'.ENDMACRO' expected"); goto Done; } } else { @@ -512,9 +527,7 @@ void MacDef (unsigned Style) /* Check for a .LOCAL declaration */ if (CurTok.Tok == TOK_LOCAL && Style == MAC_STYLE_CLASSIC) { - while (1) { - IdDesc* I; /* Skip .local or comma */ @@ -553,6 +566,7 @@ void MacDef (unsigned Style) if (CurTok.Tok == TOK_IDENT) { unsigned Count = 0; IdDesc* I = M->Params; + while (I) { if (SB_Compare (&I->Id, &CurTok.SVal) == 0) { /* Local param name, replace it */ @@ -623,7 +637,7 @@ void MacUndef (const StrBuf* Name, unsigned char Style) static int MacExpand (void* Data) -/* If we're currently expanding a macro, set the the scanner token and +/* If we're currently expanding a macro, set the scanner token and ** attribute to the next value and return true. If we are not expanding ** a macro, return false. */ @@ -787,9 +801,6 @@ static void StartExpClassic (MacExp* E) { token_t Term; - /* Skip the macro name */ - NextTok (); - /* Does this invocation have any arguments? */ if (!TokIsSep (CurTok.Tok)) { @@ -873,9 +884,6 @@ static void StartExpDefine (MacExp* E) */ unsigned Count = E->M->ParamCount; - /* Skip the current token */ - NextTok (); - /* Read the actual parameters */ while (Count--) { TokNode* Last; @@ -930,7 +938,7 @@ static void StartExpDefine (MacExp* E) if (CurTok.Tok == TOK_COMMA) { NextTok (); } else { - Error ("`,' expected"); + Error ("',' expected"); } } } @@ -951,14 +959,19 @@ static void StartExpDefine (MacExp* E) void MacExpandStart (Macro* M) /* Start expanding a macro */ { + FilePos Pos; MacExp* E; /* Check the argument */ PRECONDITION (M && (M->Style != MAC_STYLE_DEFINE || DisableDefines == 0)); + /* Remember the current file position, then skip the macro name token */ + Pos = CurTok.Pos; + NextTok (); + /* We cannot expand an incomplete macro */ if (M->Incomplete) { - Error ("Cannot expand an incomplete macro"); + PError (&Pos, "Cannot expand an incomplete macro"); return; } @@ -966,7 +979,7 @@ void MacExpandStart (Macro* M) ** to force an endless loop and assembler crash. */ if (MacExpansions >= MAX_MACEXPANSIONS) { - Error ("Too many nested macro expansions"); + PError (&Pos, "Too many nested macro expansions"); return; } diff --git a/src/ca65/macro.h b/src/ca65/macro.h index bb7b817a8..7f4335706 100644 --- a/src/ca65/macro.h +++ b/src/ca65/macro.h @@ -62,7 +62,7 @@ struct StrBuf; struct Macro; typedef struct Macro Macro; - + /*****************************************************************************/ /* Code */ diff --git a/src/ca65/main.c b/src/ca65/main.c index 0016c46f3..b1ef3a3db 100644 --- a/src/ca65/main.c +++ b/src/ca65/main.c @@ -123,7 +123,6 @@ static void Usage (void) " --large-alignment\t\tDon't warn about large alignments\n" " --listing name\t\tCreate a listing file if assembly was ok\n" " --list-bytes n\t\tMaximum number of bytes per listing line\n" - " --macpack-dir dir\t\tSet a macro package directory\n" " --memory-model model\t\tSet the memory model\n" " --pagelength n\t\tSet the page length for the listing\n" " --relax-checks\t\tRelax some checks (see docs)\n" @@ -169,7 +168,7 @@ static void NewSymbol (const char* SymName, long Val) /* Check if have already a symbol with this name */ if (SymIsDef (Sym)) { - AbEnd ("`%s' is already defined", SymName); + AbEnd ("'%s' is already defined", SymName); } /* Generate an expression for the symbol */ @@ -202,13 +201,21 @@ static void SetSys (const char* Sys) break; case TGT_MODULE: - AbEnd ("Cannot use `module' as a target for the assembler"); + AbEnd ("Cannot use 'module' as a target for the assembler"); + break; + + case TGT_ATARI2600: + NewSymbol ("__ATARI2600__", 1); break; case TGT_ATARI5200: NewSymbol ("__ATARI5200__", 1); break; + case TGT_ATARI7800: + NewSymbol ("__ATARI7800__", 1); + break; + case TGT_ATARI: NewSymbol ("__ATARI__", 1); break; @@ -226,6 +233,10 @@ static void SetSys (const char* Sys) CBMSystem ("__C64__"); break; + case TGT_C65: + CBMSystem ("__C65__"); + break; + case TGT_VIC20: CBMSystem ("__VIC20__"); break; @@ -274,6 +285,10 @@ static void SetSys (const char* Sys) NewSymbol ("__GEOS_CBM__", 1); break; + case TGT_CREATIVISION: + NewSymbol ("__CREATIVISION__", 1); + break; + case TGT_GEOS_APPLE: NewSymbol ("__GEOS__", 1); NewSymbol ("__GEOS_APPLE__", 1); @@ -287,6 +302,10 @@ static void SetSys (const char* Sys) NewSymbol ("__ATMOS__", 1); break; + case TGT_TELESTRAT: + NewSymbol ("__TELESTRAT__", 1); + break; + case TGT_NES: NewSymbol ("__NES__", 1); break; @@ -315,8 +334,16 @@ static void SetSys (const char* Sys) NewSymbol ("__PCE__", 1); break; + case TGT_CX16: + CBMSystem ("__CX16__"); + break; + + case TGT_SYM1: + NewSymbol ("__SYM1__", 1); + break; + default: - AbEnd ("Invalid target name: `%s'", Sys); + AbEnd ("Invalid target name: '%s'", Sys); } @@ -331,7 +358,7 @@ static void FileNameOption (const char* Opt, const char* Arg, StrBuf* Name) { /* Cannot have the option twice */ if (SB_NotEmpty (Name)) { - AbEnd ("Cannot use option `%s' twice", Opt); + AbEnd ("Cannot use option '%s' twice", Opt); } /* Remember the file name for later */ SB_CopyStr (Name, Arg); @@ -412,7 +439,7 @@ static void OptCPU (const char* Opt attribute ((unused)), const char* Arg) { cpu_t CPU = FindCPU (Arg); if (CPU == CPU_UNKNOWN) { - AbEnd ("Invalid CPU: `%s'", Arg); + AbEnd ("Invalid CPU: '%s'", Arg); } else { SetCPU (CPU); } @@ -463,7 +490,7 @@ static void OptFeature (const char* Opt attribute ((unused)), const char* Arg) /* Set the feature, check for errors */ if (SetFeature (SB_InitFromString (&Feature, Arg)) == FEAT_UNKNOWN) { - AbEnd ("Illegal emulation feature: `%s'", Arg); + AbEnd ("Illegal emulation feature: '%s'", Arg); } } @@ -518,7 +545,7 @@ static void OptListBytes (const char* Opt, const char* Arg) /* Check the bounds */ if (Num != 0 && (Num < MIN_LIST_BYTES || Num > MAX_LIST_BYTES)) { - AbEnd ("Argument for option `%s' is out of range", Opt); + AbEnd ("Argument for option '%s' is out of range", Opt); } /* Use the value */ @@ -534,7 +561,7 @@ static void OptListing (const char* Opt, const char* Arg) ** the filename is empty or begins with the option char. */ if (Arg == 0 || *Arg == '\0' || *Arg == '-') { - Fatal ("The meaning of `%s' has changed. It does now " + Fatal ("The meaning of '%s' has changed. It does now " "expect a file name as argument.", Opt); } @@ -551,7 +578,7 @@ static void OptMemoryModel (const char* Opt, const char* Arg) /* Check the current memory model */ if (MemoryModel != MMODEL_UNKNOWN) { - AbEnd ("Cannot use option `%s' twice", Opt); + AbEnd ("Cannot use option '%s' twice", Opt); } /* Translate the memory model name and check it */ @@ -619,7 +646,8 @@ static void OptVersion (const char* Opt attribute ((unused)), const char* Arg attribute ((unused))) /* Print the assembler version */ { - fprintf (stderr, "ca65 V%s\n", GetVersionAsString ()); + fprintf (stderr, "%s V%s\n", ProgName, GetVersionAsString ()); + exit(EXIT_SUCCESS); } @@ -746,7 +774,7 @@ static void OneLine (void) */ if (CurTok.Tok != TOK_COLON) { if (HadWS || !NoColonLabels) { - Error ("`:' expected"); + Error ("':' expected"); /* Try some smart error recovery */ if (CurTok.Tok == TOK_NAMESPACE) { NextTok (); @@ -791,7 +819,7 @@ static void OneLine (void) } else if (PCAssignment && (CurTok.Tok == TOK_STAR || CurTok.Tok == TOK_PC)) { NextTok (); if (CurTok.Tok != TOK_EQ) { - Error ("`=' expected"); + Error ("'=' expected"); SkipUntilSep (); } else { /* Skip the equal sign */ @@ -1024,7 +1052,7 @@ int main (int argc, char* argv []) } else { /* Filename. Check if we already had one */ if (InFile) { - fprintf (stderr, "%s: Don't know what to do with `%s'\n", + fprintf (stderr, "%s: Don't know what to do with '%s'\n", ProgName, Arg); exit (EXIT_FAILURE); } else { diff --git a/src/ca65/nexttok.c b/src/ca65/nexttok.c index 1521ed0c2..54733740e 100644 --- a/src/ca65/nexttok.c +++ b/src/ca65/nexttok.c @@ -179,7 +179,7 @@ static void FuncConcat (void) ** by the string token just created. */ if (CurTok.Tok != TOK_RPAREN) { - Error ("`)' expected"); + Error ("')' expected"); } else { CurTok.Tok = TOK_STRCON; SB_Copy (&CurTok.SVal, &Buf); @@ -253,7 +253,7 @@ static void FuncIdent (void) SB_Copy (&Buf, &CurTok.SVal); NextTok (); if (CurTok.Tok != TOK_RPAREN) { - Error ("`)' expected"); + Error ("')' expected"); } else { CurTok.Tok = Id; SB_Copy (&CurTok.SVal, &Buf); @@ -600,7 +600,7 @@ static void FuncSPrintF (void) ** by the string token just created. */ if (CurTok.Tok != TOK_RPAREN) { - Error ("`)' expected"); + Error ("')' expected"); } else { CurTok.Tok = TOK_STRCON; SB_Copy (&CurTok.SVal, &R); @@ -660,7 +660,7 @@ static void FuncString (void) ** by the string token just created. */ if (CurTok.Tok != TOK_RPAREN) { - Error ("`)' expected"); + Error ("')' expected"); } else { CurTok.Tok = TOK_STRCON; SB_Copy (&CurTok.SVal, &Buf); @@ -754,7 +754,7 @@ void ConsumeSep (void) void ConsumeLParen (void) /* Consume a left paren */ { - Consume (TOK_LPAREN, "`(' expected"); + Consume (TOK_LPAREN, "'(' expected"); } @@ -762,7 +762,7 @@ void ConsumeLParen (void) void ConsumeRParen (void) /* Consume a right paren */ { - Consume (TOK_RPAREN, "`)' expected"); + Consume (TOK_RPAREN, "')' expected"); } @@ -770,7 +770,7 @@ void ConsumeRParen (void) void ConsumeComma (void) /* Consume a comma */ { - Consume (TOK_COMMA, "`,' expected"); + Consume (TOK_COMMA, "',' expected"); } diff --git a/src/ca65/objfile.c b/src/ca65/objfile.c index dfa0d146e..b475d15df 100644 --- a/src/ca65/objfile.c +++ b/src/ca65/objfile.c @@ -113,7 +113,7 @@ static void ObjWriteError (void) remove (OutFile); /* Now abort with a fatal error */ - Fatal ("Cannot write to output file `%s': %s", OutFile, strerror (Error)); + Fatal ("Cannot write to output file '%s': %s", OutFile, strerror (Error)); } @@ -170,7 +170,7 @@ void ObjOpen (void) /* Create the output file */ F = fopen (OutFile, "w+b"); if (F == 0) { - Fatal ("Cannot open output file `%s': %s", OutFile, strerror (errno)); + Fatal ("Cannot open output file '%s': %s", OutFile, strerror (errno)); } /* Write a dummy header */ diff --git a/src/ca65/options.c b/src/ca65/options.c index c71296a57..84d7148be 100644 --- a/src/ca65/options.c +++ b/src/ca65/options.c @@ -182,4 +182,4 @@ void WriteOptions (void) - + diff --git a/src/ca65/pseudo.c b/src/ca65/pseudo.c index 4db780318..843f5b9d2 100644 --- a/src/ca65/pseudo.c +++ b/src/ca65/pseudo.c @@ -151,7 +151,7 @@ static unsigned char OptionalAddrSize (void) static void SetBoolOption (unsigned char* Flag) /* Read a on/off/+/- option and set flag accordingly */ { - static const char* Keys[] = { + static const char* const Keys[] = { "OFF", "ON", }; @@ -167,13 +167,13 @@ static void SetBoolOption (unsigned char* Flag) switch (GetSubKey (Keys, sizeof (Keys) / sizeof (Keys [0]))) { case 0: *Flag = 0; NextTok (); break; case 1: *Flag = 1; NextTok (); break; - default: ErrorSkip ("`on' or `off' expected"); break; + default: ErrorSkip ("'on' or 'off' expected"); break; } } else if (TokIsSep (CurTok.Tok)) { /* Without anything assume switch on */ *Flag = 1; } else { - ErrorSkip ("`on' or `off' expected"); + ErrorSkip ("'on' or 'off' expected"); } } @@ -451,7 +451,7 @@ static void DoASCIIZ (void) static void DoAssert (void) /* Add an assertion */ { - static const char* ActionTab [] = { + static const char* const ActionTab [] = { "WARN", "WARNING", "ERROR", "LDWARN", "LDWARNING", @@ -566,21 +566,25 @@ static void DoBss (void) -static void DoByte (void) -/* Define bytes */ +static void DoByteBase (int EnableTranslation) +/* Define bytes or literals */ { /* Element type for the generated array */ static const char EType[1] = { GT_BYTE }; /* Record type information */ Span* S = OpenSpan (); - StrBuf Type = STATIC_STRBUF_INITIALIZER; + StrBuf Type = AUTO_STRBUF_INITIALIZER; /* Parse arguments */ while (1) { if (CurTok.Tok == TOK_STRCON) { - /* A string, translate into target charset and emit */ - TgtTranslateStrBuf (&CurTok.SVal); + /* A string, translate into target charset + if appropriate */ + if (EnableTranslation) { + TgtTranslateStrBuf (&CurTok.SVal); + } + /* Emit */ EmitStrBuf (&CurTok.SVal); NextTok (); } else { @@ -598,9 +602,14 @@ static void DoByte (void) } } - /* Close the span, then add type information to it */ + /* Close the span, then add type information to it. + ** Note: empty string operands emit nothing; + ** so, add a type only if there's a span. + */ S = CloseSpan (S); - SetSpanType (S, GenArrayType (&Type, GetSpanSize (S), EType, sizeof (EType))); + if (S != 0) { + SetSpanType (S, GenArrayType (&Type, GetSpanSize (S), EType, sizeof (EType))); + } /* Free the type string */ SB_Done (&Type); @@ -608,6 +617,14 @@ static void DoByte (void) +static void DoByte (void) +/* Define bytes with translation */ +{ + DoByteBase (1); +} + + + static void DoCase (void) /* Switch the IgnoreCase option */ { @@ -618,16 +635,16 @@ static void DoCase (void) static void DoCharMap (void) -/* Allow custome character mappings */ +/* Allow custom character mappings */ { long Index; long Code; /* Read the index as numerical value */ Index = ConstExpression (); - if (Index <= 0 || Index > 255) { + if (Index < 0 || Index > 255) { /* Value out of range */ - ErrorSkip ("Range error"); + ErrorSkip ("Index range error"); return; } @@ -638,7 +655,7 @@ static void DoCharMap (void) Code = ConstExpression (); if (Code < 0 || Code > 255) { /* Value out of range */ - ErrorSkip ("Range error"); + ErrorSkip ("Code range error"); return; } @@ -659,7 +676,7 @@ static void DoCode (void) static void DoConDes (void) /* Export a symbol as constructor/destructor */ { - static const char* Keys[] = { + static const char* const Keys[] = { "CONSTRUCTOR", "DESTRUCTOR", "INTERRUPTOR", @@ -744,7 +761,7 @@ static void DoData (void) static void DoDbg (void) /* Add debug information from high level code */ { - static const char* Keys[] = { + static const char* const Keys[] = { "FILE", "FUNC", "LINE", @@ -816,8 +833,17 @@ static void DoDebugInfo (void) static void DoDefine (void) -/* Define a one line macro */ +/* Define a one-line macro */ { + /* The function is called with the .DEFINE token in place, because we need + ** to disable .define macro expansions before reading the next token. + ** Otherwise, the name of the macro might be expanded; therefore, + ** we never would see it. + */ + DisableDefineStyleMacros (); + NextTok (); + EnableDefineStyleMacros (); + MacDef (MAC_STYLE_DEFINE); } @@ -1012,7 +1038,7 @@ static void DoFeature (void) /* Set the feature and check for errors */ if (SetFeature (&CurTok.SVal) == FEAT_UNKNOWN) { /* Not found */ - ErrorSkip ("Invalid feature: `%m%p'", &CurTok.SVal); + ErrorSkip ("Invalid feature: '%m%p'", &CurTok.SVal); return; } else { /* Skip the keyword */ @@ -1039,7 +1065,7 @@ static void DoFileOpt (void) if (CurTok.Tok == TOK_IDENT) { /* Option given as keyword */ - static const char* Keys [] = { + static const char* const Keys [] = { "AUTHOR", "COMMENT", "COMPILER" }; @@ -1237,7 +1263,7 @@ static void DoIncBin (void) char* PathName = SearchFile (BinSearchPath, SB_GetConstBuf (&Name)); if (PathName == 0 || (F = fopen (PathName, "rb")) == 0) { /* Not found or cannot open, print an error and bail out */ - ErrorSkip ("Cannot open include file `%m%p': %s", &Name, strerror (errno)); + ErrorSkip ("Cannot open include file '%m%p': %s", &Name, strerror (errno)); xfree (PathName); goto ExitPoint; } @@ -1263,7 +1289,7 @@ static void DoIncBin (void) */ SB_Terminate (&Name); if (FileStat (SB_GetConstBuf (&Name), &StatBuf) != 0) { - Fatal ("Cannot stat input file `%m%p': %s", &Name, strerror (errno)); + Fatal ("Cannot stat input file '%m%p': %s", &Name, strerror (errno)); } /* Add the file to the input file table */ @@ -1300,7 +1326,7 @@ static void DoIncBin (void) size_t BytesRead = fread (Buf, 1, BytesToRead, F); if (BytesToRead != BytesRead) { /* Some sort of error */ - ErrorSkip ("Cannot read from include file `%m%p': %s", + ErrorSkip ("Cannot read from include file '%m%p': %s", &Name, strerror (errno)); break; } @@ -1388,7 +1414,7 @@ static void DoList (void) /* Enable/disable the listing */ { /* Get the setting */ - unsigned char List; + unsigned char List = 0; SetBoolOption (&List); /* Manage the counter */ @@ -1401,6 +1427,14 @@ static void DoList (void) +static void DoLiteral (void) +/* Define bytes without translation */ +{ + DoByteBase (0); +} + + + static void DoLoBytes (void) /* Define bytes, extracting the lo byte from each expression in the list */ { @@ -1530,6 +1564,22 @@ static void DoP816 (void) +static void DoP4510 (void) +/* Switch to 4510 CPU */ +{ + SetCPU (CPU_4510); +} + + + +static void DoPDTV (void) +/* Switch to C64DTV CPU */ +{ + SetCPU (CPU_6502DTV); +} + + + static void DoPageLength (void) /* Set the page length for the listing */ { @@ -1538,6 +1588,19 @@ static void DoPageLength (void) +static void DoPopCharmap (void) +/* Restore a charmap */ +{ + if (TgtTranslateStackIsEmpty ()) { + ErrorSkip ("Charmap stack is empty"); + return; + } + + TgtTranslatePop (); +} + + + static void DoPopCPU (void) /* Pop an old CPU setting from the CPU stack */ { @@ -1627,6 +1690,16 @@ static void DoPSC02 (void) +static void DoPushCharmap (void) +/* Save the current charmap */ +{ + if (!TgtTranslatePush ()) { + ErrorSkip ("Charmap stack overflow"); + } +} + + + static void DoPushCPU (void) /* Push the current CPU setting onto the CPU stack */ { @@ -1657,6 +1730,17 @@ static void DoPushSeg (void) +static void DoReferTo (void) +/* Mark given symbol as referenced */ +{ + SymEntry* Sym = ParseAnySymName (SYM_ALLOC_NEW); + if (Sym) { + SymRef (Sym); + } +} + + + static void DoReloc (void) /* Enter relocatable mode */ { @@ -1858,12 +1942,12 @@ static void DoTag (void) static void DoUnDef (void) -/* Undefine a define style macro */ +/* Undefine a define-style macro */ { /* The function is called with the .UNDEF token in place, because we need ** to disable .define macro expansions before reading the next token. - ** Otherwise the name of the macro would be expanded, so we would never - ** see it. + ** Otherwise, the name of the macro would be expanded; therefore, + ** we never would see it. */ DisableDefineStyleMacros (); NextTok (); @@ -1883,7 +1967,7 @@ static void DoUnDef (void) static void DoUnexpected (void) /* Got an unexpected keyword */ { - Error ("Unexpected `%m%p'", &Keyword); + Error ("Unexpected '%m%p'", &Keyword); SkipUntilSep (); } @@ -1949,7 +2033,7 @@ static void DoZeropage (void) /* Control commands flags */ enum { ccNone = 0x0000, /* No special flags */ - ccKeepToken = 0x0001 /* Do not skip the current token */ + ccKeepToken = 0x0001 /* Do not skip the control token */ }; /* Control command table */ @@ -1988,7 +2072,7 @@ static CtrlDesc CtrlCmdTab [] = { { ccNone, DoDbg, }, { ccNone, DoDByt }, { ccNone, DoDebugInfo }, - { ccNone, DoDefine }, + { ccKeepToken, DoDefine }, { ccNone, DoUnexpected }, /* .DEFINED */ { ccNone, DoUnexpected }, /* .DEFINEDMACRO */ { ccNone, DoDelMac }, @@ -2033,8 +2117,10 @@ static CtrlDesc CtrlCmdTab [] = { { ccKeepToken, DoConditionals }, /* .IFNDEF */ { ccKeepToken, DoConditionals }, /* .IFNREF */ { ccKeepToken, DoConditionals }, /* .IFP02 */ + { ccKeepToken, DoConditionals }, /* .IFP4510 */ { ccKeepToken, DoConditionals }, /* .IFP816 */ { ccKeepToken, DoConditionals }, /* .IFPC02 */ + { ccKeepToken, DoConditionals }, /* .IFPDTV */ { ccKeepToken, DoConditionals }, /* .IFPSC02 */ { ccKeepToken, DoConditionals }, /* .IFREF */ { ccNone, DoImport }, @@ -2048,6 +2134,7 @@ static CtrlDesc CtrlCmdTab [] = { { ccNone, DoLineCont }, { ccNone, DoList }, { ccNone, DoListBytes }, + { ccNone, DoLiteral }, { ccNone, DoUnexpected }, /* .LOBYTE */ { ccNone, DoLoBytes }, { ccNone, DoUnexpected }, /* .LOCAL */ @@ -2063,17 +2150,22 @@ static CtrlDesc CtrlCmdTab [] = { { ccNone, DoOrg }, { ccNone, DoOut }, { ccNone, DoP02 }, + { ccNone, DoP4510 }, { ccNone, DoP816 }, { ccNone, DoPageLength }, { ccNone, DoUnexpected }, /* .PARAMCOUNT */ { ccNone, DoPC02 }, + { ccNone, DoPDTV }, + { ccNone, DoPopCharmap }, { ccNone, DoPopCPU }, { ccNone, DoPopSeg }, { ccNone, DoProc }, { ccNone, DoPSC02 }, + { ccNone, DoPushCharmap }, { ccNone, DoPushCPU }, { ccNone, DoPushSeg }, { ccNone, DoUnexpected }, /* .REFERENCED */ + { ccNone, DoReferTo }, /* .REFERTO */ { ccNone, DoReloc }, { ccNone, DoRepeat }, { ccNone, DoRes }, @@ -2149,4 +2241,7 @@ void CheckPseudo (void) if (!IS_IsEmpty (&CPUStack)) { Warning (1, "CPU stack is not empty"); } + if (!TgtTranslateStackIsEmpty ()) { + Warning (1, "Charmap stack is not empty"); + } } diff --git a/src/ca65/scanner.c b/src/ca65/scanner.c index 799321066..bf0a85183 100644 --- a/src/ca65/scanner.c +++ b/src/ca65/scanner.c @@ -216,8 +216,10 @@ struct DotKeyword { { ".IFNDEF", TOK_IFNDEF }, { ".IFNREF", TOK_IFNREF }, { ".IFP02", TOK_IFP02 }, + { ".IFP4510", TOK_IFP4510 }, { ".IFP816", TOK_IFP816 }, { ".IFPC02", TOK_IFPC02 }, + { ".IFPDTV", TOK_IFPDTV }, { ".IFPSC02", TOK_IFPSC02 }, { ".IFREF", TOK_IFREF }, { ".IMPORT", TOK_IMPORT }, @@ -232,6 +234,7 @@ struct DotKeyword { { ".LINECONT", TOK_LINECONT }, { ".LIST", TOK_LIST }, { ".LISTBYTES", TOK_LISTBYTES }, + { ".LITERAL", TOK_LITERAL }, { ".LOBYTE", TOK_LOBYTE }, { ".LOBYTES", TOK_LOBYTES }, { ".LOCAL", TOK_LOCAL }, @@ -251,19 +254,25 @@ struct DotKeyword { { ".ORG", TOK_ORG }, { ".OUT", TOK_OUT }, { ".P02", TOK_P02 }, + { ".P4510", TOK_P4510 }, { ".P816", TOK_P816 }, { ".PAGELEN", TOK_PAGELENGTH }, { ".PAGELENGTH", TOK_PAGELENGTH }, { ".PARAMCOUNT", TOK_PARAMCOUNT }, { ".PC02", TOK_PC02 }, + { ".PDTV", TOK_PDTV }, + { ".POPCHARMAP", TOK_POPCHARMAP }, { ".POPCPU", TOK_POPCPU }, { ".POPSEG", TOK_POPSEG }, { ".PROC", TOK_PROC }, { ".PSC02", TOK_PSC02 }, + { ".PUSHCHARMAP", TOK_PUSHCHARMAP }, { ".PUSHCPU", TOK_PUSHCPU }, { ".PUSHSEG", TOK_PUSHSEG }, { ".REF", TOK_REFERENCED }, { ".REFERENCED", TOK_REFERENCED }, + { ".REFERTO", TOK_REFERTO }, + { ".REFTO", TOK_REFERTO }, { ".RELOC", TOK_RELOC }, { ".REPEAT", TOK_REPEAT }, { ".RES", TOK_RES }, @@ -408,7 +417,7 @@ static void IFNextChar (CharSource* S) /* If we come here, we have a new input line. To avoid problems ** with strange line terminators, remove all whitespace from the - ** end of the line, the add a single newline. + ** end of the line, then add a single newline. */ Len = SB_GetLen (&S->V.File.Line); while (Len > 0 && IsSpace (SB_AtUnchecked (&S->V.File.Line, Len-1))) { @@ -499,7 +508,7 @@ int NewInputFile (const char* Name) /* Main file */ F = fopen (Name, "r"); if (F == 0) { - Fatal ("Cannot open input file `%s': %s", Name, strerror (errno)); + Fatal ("Cannot open input file '%s': %s", Name, strerror (errno)); } } else { /* We are on include level. Search for the file in the include @@ -508,7 +517,7 @@ int NewInputFile (const char* Name) PathName = SearchFile (IncSearchPath, Name); if (PathName == 0 || (F = fopen (PathName, "r")) == 0) { /* Not found or cannot open, print an error and bail out */ - Error ("Cannot open include file `%s': %s", Name, strerror (errno)); + Error ("Cannot open include file '%s': %s", Name, strerror (errno)); goto ExitPoint; } @@ -525,7 +534,7 @@ int NewInputFile (const char* Name) ** here. */ if (FileStat (Name, &Buf) != 0) { - Fatal ("Cannot stat input file `%s': %s", Name, strerror (errno)); + Fatal ("Cannot stat input file '%s': %s", Name, strerror (errno)); } /* Add the file to the input file table and remember the index */ @@ -792,6 +801,43 @@ static void ReadStringConst (int StringTerm) break; } + if (C == '\\' && StringEscapes) { + NextChar (); + + switch (C) { + case EOF: + Error ("Unterminated escape sequence in string constant"); + break; + case '\\': + case '\'': + case '"': + break; + case 't': + C = '\x09'; + break; + case 'r': + C = '\x0D'; + break; + case 'n': + C = '\x0A'; + break; + case 'x': + NextChar (); + if (IsXDigit (C)) { + char high_nibble = DigitVal (C) << 4; + NextChar (); + if (IsXDigit (C)) { + C = high_nibble | DigitVal (C); + break; + } + } + /* FALLTHROUGH */ + default: + Error ("Unsupported escape sequence in string constant"); + break; + } + } + /* Append the char to the string */ SB_AppendChar (&CurTok.SVal, C); @@ -1052,7 +1098,7 @@ Again: /* Not found */ if (!LeadingDotInIdents) { /* Invalid pseudo instruction */ - Error ("`%m%p' is not a recognized control command", &CurTok.SVal); + Error ("'%m%p' is not a recognized control command", &CurTok.SVal); goto Again; } @@ -1109,60 +1155,76 @@ Again: /* Check for special names. Bail out if we have identified the type of ** the token. Go on if the token is an identifier. */ - if (SB_GetLen (&CurTok.SVal) == 1) { - switch (toupper (SB_AtUnchecked (&CurTok.SVal, 0))) { + switch (SB_GetLen (&CurTok.SVal)) { + case 1: + switch (toupper (SB_AtUnchecked (&CurTok.SVal, 0))) { - case 'A': - if (C == ':') { - NextChar (); - CurTok.Tok = TOK_OVERRIDE_ABS; - } else { - CurTok.Tok = TOK_A; - } - return; - - case 'F': - if (C == ':') { - NextChar (); - CurTok.Tok = TOK_OVERRIDE_FAR; + case 'A': + if (C == ':') { + NextChar (); + CurTok.Tok = TOK_OVERRIDE_ABS; + } else { + CurTok.Tok = TOK_A; + } return; - } - break; - case 'S': - if (CPU == CPU_65816) { - CurTok.Tok = TOK_S; + case 'F': + if (C == ':') { + NextChar (); + CurTok.Tok = TOK_OVERRIDE_FAR; + return; + } + break; + + case 'S': + if ((CPU == CPU_4510) || (CPU == CPU_65816)) { + CurTok.Tok = TOK_S; + return; + } + break; + + case 'X': + CurTok.Tok = TOK_X; return; - } - break; - case 'X': - CurTok.Tok = TOK_X; - return; - - case 'Y': - CurTok.Tok = TOK_Y; - return; - - case 'Z': - if (C == ':') { - NextChar (); - CurTok.Tok = TOK_OVERRIDE_ZP; + case 'Y': + CurTok.Tok = TOK_Y; return; - } - break; - default: - break; - } + case 'Z': + if (C == ':') { + NextChar (); + CurTok.Tok = TOK_OVERRIDE_ZP; + return; + } else { + if (CPU == CPU_4510) { + CurTok.Tok = TOK_Z; + return; + } + } + break; - } else if (CPU == CPU_SWEET16 && - (CurTok.IVal = Sweet16Reg (&CurTok.SVal)) >= 0) { + default: + break; + } + break; + case 2: + if ((CPU == CPU_4510) && + (toupper (SB_AtUnchecked (&CurTok.SVal, 0)) == 'S') && + (toupper (SB_AtUnchecked (&CurTok.SVal, 1)) == 'P')) { - /* A sweet16 register number in sweet16 mode */ - CurTok.Tok = TOK_REG; - return; + CurTok.Tok = TOK_S; + return; + } + /* FALL THROUGH */ + default: + if (CPU == CPU_SWEET16 && + (CurTok.IVal = Sweet16Reg (&CurTok.SVal)) >= 0) { + /* A sweet16 register number in sweet16 mode */ + CurTok.Tok = TOK_REG; + return; + } } /* Check for define style macro */ @@ -1459,7 +1521,7 @@ CharAgain: -int GetSubKey (const char** Keys, unsigned Count) +int GetSubKey (const char* const* Keys, unsigned Count) /* Search for a subkey in a table of keywords. The current token must be an ** identifier and all keys must be in upper case. The identifier will be ** uppercased in the process. The function returns the index of the keyword, diff --git a/src/ca65/scanner.h b/src/ca65/scanner.h index c445aefa6..4fd9041c1 100644 --- a/src/ca65/scanner.h +++ b/src/ca65/scanner.h @@ -84,7 +84,7 @@ void UpcaseSVal (void); void NextRawTok (void); /* Read the next raw token from the input stream */ -int GetSubKey (const char** Keys, unsigned Count); +int GetSubKey (const char* const* Keys, unsigned Count); /* Search for a subkey in a table of keywords. The current token must be an ** identifier and all keys must be in upper case. The identifier will be ** uppercased in the process. The function returns the index of the keyword, diff --git a/src/ca65/segment.c b/src/ca65/segment.c index 35a41ffe1..26b568711 100644 --- a/src/ca65/segment.c +++ b/src/ca65/segment.c @@ -134,7 +134,7 @@ static Segment* NewSegment (const char* Name, unsigned char AddrSize) /* Check the segment name for invalid names */ if (!ValidSegName (Name)) { - Error ("Illegal segment name: `%s'", Name); + Error ("Illegal segment name: '%s'", Name); } /* Create a new segment and return it */ @@ -306,7 +306,7 @@ void SegAlign (unsigned long Alignment, int FillVal) ActiveSeg->Align = CombinedAlignment; /* Output a warning for larger alignments if not suppressed */ - if (CombinedAlignment > LARGE_ALIGNMENT && !LargeAlignment) { + if (CombinedAlignment >= LARGE_ALIGNMENT && !LargeAlignment) { Warning (0, "Combined alignment is suspiciously large (%lu)", CombinedAlignment); } @@ -411,13 +411,13 @@ void SegDone (void) /* We cannot evaluate the expression now, leave the job for ** the linker. However, we can check if the address size - ** matches the fragment size. Mismatches are errors in + ** matches the fragment size. Mismatches are errors in ** most situations. */ if ((F->Len == 1 && ED.AddrSize > ADDR_SIZE_ZP) || (F->Len == 2 && ED.AddrSize > ADDR_SIZE_ABS) || (F->Len == 3 && ED.AddrSize > ADDR_SIZE_FAR)) { - LIError (&F->LI, "Range error"); + LIError (&F->LI, "Range error (Address size %u does not match fragment size %u)", ED.AddrSize, F->Len); } } diff --git a/src/ca65/span.c b/src/ca65/span.c index a4faea121..5ab3fc955 100644 --- a/src/ca65/span.c +++ b/src/ca65/span.c @@ -204,7 +204,7 @@ static Span* MergeSpan (Span* S) void SetSpanType (Span* S, const StrBuf* Type) /* Set the generic type of the span to Type */ -{ +{ /* Ignore the call if we won't generate debug infos */ if (DbgSyms) { S->Type = GetStrBufId (Type); @@ -354,7 +354,7 @@ static int CollectSpans (void* Entry, void* Data) return 0; } - + void WriteSpans (void) /* Write all spans to the object file */ diff --git a/src/ca65/struct.c b/src/ca65/struct.c index 195f29ba4..ecbaa2a71 100644 --- a/src/ca65/struct.c +++ b/src/ca65/struct.c @@ -5,7 +5,6 @@ /* .STRUCT/.UNION commands */ /* */ /* */ -/* */ /* (C) 2003-2011, Ullrich von Bassewitz */ /* Roemerstrasse 52 */ /* D-70794 Filderstadt */ @@ -73,21 +72,22 @@ enum { static long Member (long AllocSize) /* Read one struct member and return its size */ { - long Multiplicator; + long Multiplier; - /* A multiplicator may follow */ + /* A multiplier may follow */ if (CurTok.Tok != TOK_SEP) { - Multiplicator = ConstExpression (); - if (Multiplicator <= 0) { + Multiplier = ConstExpression (); + if (Multiplier <= 0) { ErrorSkip ("Range error"); - Multiplicator = 1; + Multiplier = 1; } - AllocSize *= Multiplicator; + AllocSize *= Multiplier; } /* Check the size for a reasonable value */ - if (AllocSize >= 0x10000) { + if (AllocSize >= 0x1000000) { ErrorSkip ("Range error"); + AllocSize = 1; } /* Return the size */ @@ -102,10 +102,11 @@ static long DoStructInternal (long Offs, unsigned Type) long Size = 0; /* Outside of other structs, we need a name. Inside another struct or - ** union, the struct may be anonymous, in which case no new lexical level + ** union, the struct may be anonymous; in which case, no new lexical level ** is started. */ int Anon = (CurTok.Tok != TOK_IDENT); + if (!Anon) { /* Enter a new scope, then skip the name */ SymEnterLevel (&CurTok.SVal, SCOPE_STRUCT, ADDR_SIZE_ABS, 0); @@ -121,7 +122,6 @@ static long DoStructInternal (long Offs, unsigned Type) while (CurTok.Tok != TOK_ENDSTRUCT && CurTok.Tok != TOK_ENDUNION && CurTok.Tok != TOK_EOF) { - long MemberSize; SymTable* Struct; SymEntry* Sym; @@ -132,14 +132,14 @@ static long DoStructInternal (long Offs, unsigned Type) continue; } - /* The format is "[identifier] storage-allocator [, multiplicator]" */ + /* The format is "[identifier ].storage-allocator[ multiplier]" */ Sym = 0; if (CurTok.Tok == TOK_IDENT) { - - /* Beware: An identifier may also be a macro, in which case we have - ** to start over. + /* Beware: An identifier may be a macro also; + ** in which case, we must start over. */ Macro* M = FindMacro (&CurTok.SVal); + if (M) { MacExpandStart (M); continue; @@ -155,10 +155,9 @@ static long DoStructInternal (long Offs, unsigned Type) NextTok (); } - /* Read storage allocators */ - MemberSize = 0; /* In case of errors, use zero */ + /* Read the storage allocator */ + MemberSize = 0; /* In case of errors or .ORG, use zero */ switch (CurTok.Tok) { - case TOK_BYTE: NextTok (); MemberSize = Member (1); @@ -190,6 +189,21 @@ static long DoStructInternal (long Offs, unsigned Type) } break; + case TOK_ORG: + NextTok (); + if (CurTok.Tok == TOK_SEP) { + ErrorSkip ("Address is missing"); + } else { + Offs = ConstExpression (); + + /* Check the address for a reasonable value */ + if (Offs >= 0x1000000) { + ErrorSkip ("Range error"); + Offs = 0; + } + } + break; + case TOK_TAG: NextTok (); Struct = ParseScopedSymTable (); @@ -244,8 +258,8 @@ static long DoStructInternal (long Offs, unsigned Type) ConsumeSep (); } - /* If this is not a anon struct, enter a special symbol named ".size" - ** into the symbol table of the struct that holds the size of the + /* If this is not an anon. struct, enter a special symbol named ".size" + ** into the symbol table, of the struct, that holds the size of the ** struct. Since the symbol starts with a dot, it cannot be accessed ** by user code. ** Leave the struct scope level. @@ -261,9 +275,9 @@ static long DoStructInternal (long Offs, unsigned Type) /* End of struct/union definition */ if (Type == STRUCT) { - Consume (TOK_ENDSTRUCT, "`.ENDSTRUCT' expected"); + Consume (TOK_ENDSTRUCT, "'.ENDSTRUCT' expected"); } else { - Consume (TOK_ENDUNION, "`.ENDUNION' expected"); + Consume (TOK_ENDUNION, "'.ENDUNION' expected"); } /* Return the size of the struct */ diff --git a/src/ca65/struct.h b/src/ca65/struct.h index 1fdaf9d60..e927c477c 100644 --- a/src/ca65/struct.h +++ b/src/ca65/struct.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/ca65/studyexpr.c b/src/ca65/studyexpr.c index 366b50ff1..40e9b7aab 100644 --- a/src/ca65/studyexpr.c +++ b/src/ca65/studyexpr.c @@ -43,6 +43,7 @@ /* ca65 */ #include "error.h" +#include "expr.h" #include "segment.h" #include "studyexpr.h" #include "symtab.h" @@ -187,6 +188,70 @@ static void ED_MergeAddrSize (ExprDesc* ED, const ExprDesc* Right) } +static void ED_MergeAddrSizeAND (ExprNode* Expr, ExprDesc* ED, const ExprDesc* Right) +/* Merge the address sizes of two expressions into ED, special case for AND operator */ +{ + int ConstL, ConstR; + int Size, ConstSize; + long Val, ValR; + + if (ED->AddrSize == ADDR_SIZE_DEFAULT) { + /* If ED is valid, ADDR_SIZE_DEFAULT gets always overridden, otherwise + ** it takes precedence over anything else. + */ + if (ED_IsValid (ED)) { + ED->AddrSize = Right->AddrSize; + } + } else if (Right->AddrSize == ADDR_SIZE_DEFAULT) { + /* If Right is valid, ADDR_SIZE_DEFAULT gets always overridden, + ** otherwise it takes precedence over anything else. + */ + if (!ED_IsValid (Right)) { + ED->AddrSize = Right->AddrSize; + } + } else { + /* Neither ED nor Right has a default address size, use the smaller of + ** the two. + */ + if (Right->AddrSize < ED->AddrSize) { + ED->AddrSize = Right->AddrSize; + } + } + /* Check if either side of the expression is constant */ + ConstL = IsConstExpr (Expr->Left, &Val); + ConstR = IsConstExpr (Expr->Right, &ValR); + if (!ConstL && !ConstR) { + /* If neither part of the expression is constant, the above is all we can do */ + return; + } + /* We start assuming the left side is constant, left value is in Val, right + size in Size */ + Size = Right->AddrSize; + /* Now check if the right side is constant, and if so put the right value + into Val and the Left size into Size. */ + if (ConstR) { + Val = ValR; + Size = ED->AddrSize; + } + /* Figure out the size of the constant value */ + if (IsByteRange (Val)) { + ConstSize = ADDR_SIZE_ZP; + } else if (IsWordRange (Val)) { + ConstSize = ADDR_SIZE_ABS; + } else if (IsFarRange (Val)) { + ConstSize = ADDR_SIZE_FAR; + } else { + ConstSize = ADDR_SIZE_LONG; + } + + if (Size == ADDR_SIZE_DEFAULT) { + ED->AddrSize = ConstSize; + } else { + /* use the smaller of the two sizes */ + ED->AddrSize = (ConstSize < Size) ? ConstSize : Size; + } +} + static ED_SymRef* ED_FindSymRef (ExprDesc* ED, SymEntry* Sym) /* Find a symbol reference and return it. Return NULL if the reference does @@ -489,7 +554,11 @@ static void StudyBinaryExpr (ExprNode* Expr, ExprDesc* D) /* Merge references and update address size */ ED_MergeRefs (D, &Right); - ED_MergeAddrSize (D, &Right); + if (Expr->Op == EXPR_AND) { + ED_MergeAddrSizeAND (Expr, D, &Right); + } else { + ED_MergeAddrSize (D, &Right); + } } @@ -524,7 +593,7 @@ static void StudySymbol (ExprNode* Expr, ExprDesc* D) if (SymHasUserMark (Sym)) { LIError (&Sym->DefLines, - "Circular reference in definition of symbol `%m%p'", + "Circular reference in definition of symbol '%m%p'", GetSymName (Sym)); ED_SetError (D); } else { @@ -711,7 +780,7 @@ static void StudyMul (ExprNode* Expr, ExprDesc* D) */ if (ED_IsConst (D) && ED_IsValid (&Right)) { - /* Multiplicate both, result goes into Right */ + /* Multiply both, result goes into Right */ ED_Mul (&Right, D); /* Move result into D */ @@ -719,7 +788,7 @@ static void StudyMul (ExprNode* Expr, ExprDesc* D) } else if (ED_IsConst (&Right) && ED_IsValid (D)) { - /* Multiplicate both */ + /* Multiply both */ ED_Mul (D, &Right); } else { @@ -1277,6 +1346,26 @@ static void StudyDWord (ExprNode* Expr, ExprDesc* D) +static void StudyNearAddr (ExprNode* Expr, ExprDesc* D) +/* Study an EXPR_NEARADDR expression node */ +{ + /* Study the expression */ + StudyExprInternal (Expr->Left, D); + + /* We can handle only const expressions */ + if (!ED_IsConst (D)) { + ED_Invalidate (D); + } + + /* Promote to absolute if smaller. */ + if (D->AddrSize < ADDR_SIZE_ABS) + { + D->AddrSize = ADDR_SIZE_ABS; + } +} + + + static void StudyExprInternal (ExprNode* Expr, ExprDesc* D) /* Study an expression tree and place the contents into D */ { @@ -1435,6 +1524,10 @@ static void StudyExprInternal (ExprNode* Expr, ExprDesc* D) StudyDWord (Expr, D); break; + case EXPR_NEARADDR: + StudyNearAddr (Expr, D); + break; + default: Internal ("Unknown Op type: %u", Expr->Op); break; diff --git a/src/ca65/studyexpr.h b/src/ca65/studyexpr.h index 389bce5a3..a81f6c9c8 100644 --- a/src/ca65/studyexpr.h +++ b/src/ca65/studyexpr.h @@ -36,7 +36,7 @@ #ifndef STUDYEXPR_H #define STUDYEXPR_H - + /* common */ #include "exprdefs.h" diff --git a/src/ca65/symbol.c b/src/ca65/symbol.c index 0b02aab45..f1c259082 100644 --- a/src/ca65/symbol.c +++ b/src/ca65/symbol.c @@ -95,7 +95,7 @@ SymTable* ParseScopedIdent (StrBuf* Name, StrBuf* FullName) if (Scope == 0) { /* Scope not found */ SB_Terminate (FullName); - Error ("No such scope: `%m%p'", FullName); + Error ("No such scope: '%m%p'", FullName); return 0; } @@ -139,7 +139,7 @@ SymTable* ParseScopedIdent (StrBuf* Name, StrBuf* FullName) Scope = SymFindScope (Scope, Name, SYM_FIND_EXISTING); if (Scope == 0) { /* Scope not found */ - Error ("No such scope: `%m%p'", FullName); + Error ("No such scope: '%m%p'", FullName); return 0; } @@ -187,7 +187,7 @@ SymEntry* ParseScopedSymName (SymFindAction Action) ** may not expect NULL to be returned if Action contains SYM_ALLOC_NEW, ** create a new symbol. */ - if (Action & SYM_ALLOC_NEW) { + if (Action & SYM_ALLOC_NEW) { Sym = NewSymEntry (&Ident, SF_NONE); } else { Sym = 0; diff --git a/src/ca65/symentry.c b/src/ca65/symentry.c index 06c537cf6..1048bfbc2 100644 --- a/src/ca65/symentry.c +++ b/src/ca65/symentry.c @@ -213,24 +213,24 @@ void SymDef (SymEntry* S, ExprNode* Expr, unsigned char AddrSize, unsigned Flags { if (S->Flags & SF_IMPORT) { /* Defined symbol is marked as imported external symbol */ - Error ("Symbol `%m%p' is already an import", GetSymName (S)); + Error ("Symbol '%m%p' is already an import", GetSymName (S)); return; } if ((Flags & SF_VAR) != 0 && (S->Flags & (SF_EXPORT | SF_GLOBAL))) { /* Variable symbols cannot be exports or globals */ - Error ("Var symbol `%m%p' cannot be an export or global symbol", GetSymName (S)); + Error ("Var symbol '%m%p' cannot be an export or global symbol", GetSymName (S)); return; } if (S->Flags & SF_DEFINED) { /* Multiple definition. In case of a variable, this is legal. */ if ((S->Flags & SF_VAR) == 0) { - Error ("Symbol `%m%p' is already defined", GetSymName (S)); + Error ("Symbol '%m%p' is already defined", GetSymName (S)); S->Flags |= SF_MULTDEF; return; } else { /* Redefinition must also be a variable symbol */ if ((Flags & SF_VAR) == 0) { - Error ("Symbol `%m%p' is already different kind", GetSymName (S)); + Error ("Symbol '%m%p' is already different kind", GetSymName (S)); return; } /* Delete the current symbol expression, since it will get @@ -285,7 +285,7 @@ void SymDef (SymEntry* S, ExprNode* Expr, unsigned char AddrSize, unsigned Flags S->ExportSize = S->AddrSize; } else if (S->AddrSize > S->ExportSize) { /* We're exporting a symbol smaller than it actually is */ - Warning (1, "Symbol `%m%p' is %s but exported %s", + Warning (1, "Symbol '%m%p' is %s but exported %s", GetSymName (S), AddrSizeToStr (S->AddrSize), AddrSizeToStr (S->ExportSize)); } @@ -315,13 +315,13 @@ void SymImport (SymEntry* S, unsigned char AddrSize, unsigned Flags) /* Mark the given symbol as an imported symbol */ { if (S->Flags & SF_DEFINED) { - Error ("Symbol `%m%p' is already defined", GetSymName (S)); + Error ("Symbol '%m%p' is already defined", GetSymName (S)); S->Flags |= SF_MULTDEF; return; } if (S->Flags & SF_EXPORT) { /* The symbol is already marked as exported symbol */ - Error ("Cannot import exported symbol `%m%p'", GetSymName (S)); + Error ("Cannot import exported symbol '%m%p'", GetSymName (S)); return; } @@ -337,16 +337,16 @@ void SymImport (SymEntry* S, unsigned char AddrSize, unsigned Flags) */ if (S->Flags & SF_IMPORT) { if ((Flags & SF_FORCED) != (S->Flags & SF_FORCED)) { - Error ("Redeclaration mismatch for symbol `%m%p'", GetSymName (S)); + Error ("Redeclaration mismatch for symbol '%m%p'", GetSymName (S)); } if (AddrSize != S->AddrSize) { - Error ("Address size mismatch for symbol `%m%p'", GetSymName (S)); + Error ("Address size mismatch for symbol '%m%p'", GetSymName (S)); } } if (S->Flags & SF_GLOBAL) { S->Flags &= ~SF_GLOBAL; if (AddrSize != S->AddrSize) { - Error ("Address size mismatch for symbol `%m%p'", GetSymName (S)); + Error ("Address size mismatch for symbol '%m%p'", GetSymName (S)); } } @@ -369,12 +369,12 @@ void SymExport (SymEntry* S, unsigned char AddrSize, unsigned Flags) /* Check if it's ok to export the symbol */ if (S->Flags & SF_IMPORT) { /* The symbol is already marked as imported external symbol */ - Error ("Symbol `%m%p' is already an import", GetSymName (S)); + Error ("Symbol '%m%p' is already an import", GetSymName (S)); return; } if (S->Flags & SF_VAR) { /* Variable symbols cannot be exported */ - Error ("Var symbol `%m%p' cannot be exported", GetSymName (S)); + Error ("Var symbol '%m%p' cannot be exported", GetSymName (S)); return; } @@ -383,7 +383,7 @@ void SymExport (SymEntry* S, unsigned char AddrSize, unsigned Flags) */ if (S->Flags & SF_GLOBAL) { if (AddrSize != S->ExportSize) { - Error ("Address size mismatch for symbol `%m%p'", GetSymName (S)); + Error ("Address size mismatch for symbol '%m%p'", GetSymName (S)); } S->Flags &= ~SF_GLOBAL; @@ -398,7 +398,7 @@ void SymExport (SymEntry* S, unsigned char AddrSize, unsigned Flags) */ if ((S->Flags & (SF_EXPORT|SF_DEFINED)) == SF_EXPORT) { if (S->ExportSize != AddrSize) { - Error ("Address size mismatch for symbol `%m%p'", GetSymName (S)); + Error ("Address size mismatch for symbol '%m%p'", GetSymName (S)); } } S->ExportSize = AddrSize; @@ -412,7 +412,7 @@ void SymExport (SymEntry* S, unsigned char AddrSize, unsigned Flags) S->ExportSize = S->AddrSize; } else if (S->AddrSize > S->ExportSize) { /* We're exporting a symbol smaller than it actually is */ - Warning (1, "Symbol `%m%p' is %s but exported %s", + Warning (1, "Symbol '%m%p' is %s but exported %s", GetSymName (S), AddrSizeToStr (S->AddrSize), AddrSizeToStr (S->ExportSize)); } @@ -434,7 +434,7 @@ void SymGlobal (SymEntry* S, unsigned char AddrSize, unsigned Flags) { if (S->Flags & SF_VAR) { /* Variable symbols cannot be exported or imported */ - Error ("Var symbol `%m%p' cannot be made global", GetSymName (S)); + Error ("Var symbol '%m%p' cannot be made global", GetSymName (S)); return; } @@ -447,7 +447,7 @@ void SymGlobal (SymEntry* S, unsigned char AddrSize, unsigned Flags) AddrSize = GetCurrentSegAddrSize (); } if (AddrSize != S->AddrSize) { - Error ("Address size mismatch for symbol `%m%p'", GetSymName (S)); + Error ("Address size mismatch for symbol '%m%p'", GetSymName (S)); } return; } @@ -459,12 +459,12 @@ void SymGlobal (SymEntry* S, unsigned char AddrSize, unsigned Flags) if ((S->Flags & SF_DEFINED) == 0) { /* Symbol is undefined */ if (AddrSize != S->ExportSize) { - Error ("Address size mismatch for symbol `%m%p'", GetSymName (S)); + Error ("Address size mismatch for symbol '%m%p'", GetSymName (S)); } } else if (AddrSize != ADDR_SIZE_DEFAULT) { /* Symbol is defined and address size given */ if (AddrSize != S->ExportSize) { - Error ("Address size mismatch for symbol `%m%p'", GetSymName (S)); + Error ("Address size mismatch for symbol '%m%p'", GetSymName (S)); } } return; @@ -476,7 +476,7 @@ void SymGlobal (SymEntry* S, unsigned char AddrSize, unsigned Flags) */ if (S->Flags & SF_GLOBAL) { if (AddrSize != S->ExportSize) { - Error ("Address size mismatch for symbol `%m%p'", GetSymName (S)); + Error ("Address size mismatch for symbol '%m%p'", GetSymName (S)); } return; } @@ -494,7 +494,7 @@ void SymGlobal (SymEntry* S, unsigned char AddrSize, unsigned Flags) S->ExportSize = S->AddrSize; } else if (S->AddrSize > S->ExportSize) { /* We're exporting a symbol smaller than it actually is */ - Warning (1, "Symbol `%m%p' is %s but exported %s", + Warning (1, "Symbol '%m%p' is %s but exported %s", GetSymName (S), AddrSizeToStr (S->AddrSize), AddrSizeToStr (S->ExportSize)); } @@ -537,45 +537,45 @@ void SymConDes (SymEntry* S, unsigned char AddrSize, unsigned Type, unsigned Pri /* Check for errors */ if (S->Flags & SF_IMPORT) { /* The symbol is already marked as imported external symbol */ - Error ("Symbol `%m%p' is already an import", GetSymName (S)); + Error ("Symbol '%m%p' is already an import", GetSymName (S)); return; } if (S->Flags & SF_VAR) { /* Variable symbols cannot be exported or imported */ - Error ("Var symbol `%m%p' cannot be exported", GetSymName (S)); + Error ("Var symbol '%m%p' cannot be exported", GetSymName (S)); return; } + /* If the symbol is already defined, check symbol size against the + ** exported size. + */ + if (S->Flags & SF_DEFINED) { + if (AddrSize == ADDR_SIZE_DEFAULT) { + /* Use the real size of the symbol */ + AddrSize = S->AddrSize; + } else if (S->AddrSize != AddrSize) { + Error ("Address size mismatch for symbol '%m%p'", GetSymName (S)); + } + } + /* If the symbol was already marked as an export or global, check if ** this was done specifiying the same address size. In case of a global ** declaration, silently remove the global flag. */ if (S->Flags & (SF_EXPORT | SF_GLOBAL)) { if (S->ExportSize != AddrSize) { - Error ("Address size mismatch for symbol `%m%p'", GetSymName (S)); + Error ("Address size mismatch for symbol '%m%p'", GetSymName (S)); } S->Flags &= ~SF_GLOBAL; } S->ExportSize = AddrSize; - /* If the symbol is already defined, check symbol size against the - ** exported size. - */ - if (S->Flags & SF_DEFINED) { - if (S->ExportSize == ADDR_SIZE_DEFAULT) { - /* Use the real size of the symbol */ - S->ExportSize = S->AddrSize; - } else if (S->AddrSize != S->ExportSize) { - Error ("Address size mismatch for symbol `%m%p'", GetSymName (S)); - } - } - /* If the symbol already was declared as a condes of this type, ** check if the new priority value is the same as the old one. */ if (S->ConDesPrio[Type] != CD_PRIO_NONE) { if (S->ConDesPrio[Type] != Prio) { - Error ("Redeclaration mismatch for symbol `%m%p'", GetSymName (S)); + Error ("Redeclaration mismatch for symbol '%m%p'", GetSymName (S)); } } S->ConDesPrio[Type] = Prio; diff --git a/src/ca65/symtab.c b/src/ca65/symtab.c index 35d5a8066..afe7b3ad6 100644 --- a/src/ca65/symtab.c +++ b/src/ca65/symtab.c @@ -178,7 +178,7 @@ static SymTable* NewSymTable (SymTable* Parent, const StrBuf* Name) } } else { /* Duplicate scope name */ - Internal ("Duplicate scope name: `%m%p'", Name); + Internal ("Duplicate scope name: '%m%p'", Name); } } } @@ -216,7 +216,7 @@ void SymEnterLevel (const StrBuf* ScopeName, unsigned char Type, /* Check if the scope has been defined before */ if (CurrentScope->Flags & ST_DEFINED) { - Error ("Duplicate scope `%m%p'", ScopeName); + Error ("Duplicate scope '%m%p'", ScopeName); } } else { @@ -502,7 +502,7 @@ static void SymCheckUndefined (SymEntry* S) if (Sym->Flags & SF_IMPORT) { /* The symbol is already marked as import */ LIError (&S->RefLines, - "Symbol `%s' is already an import", + "Symbol '%s' is already an import", GetString (Sym->Name)); } if ((Sym->Flags & SF_EXPORT) == 0) { @@ -516,7 +516,7 @@ static void SymCheckUndefined (SymEntry* S) if (Sym->AddrSize > Sym->ExportSize) { /* We're exporting a symbol smaller than it actually is */ LIWarning (&Sym->DefLines, 1, - "Symbol `%m%p' is %s but exported %s", + "Symbol '%m%p' is %s but exported %s", GetSymName (Sym), AddrSizeToStr (Sym->AddrSize), AddrSizeToStr (Sym->ExportSize)); @@ -541,7 +541,7 @@ static void SymCheckUndefined (SymEntry* S) if (S->Flags & SF_EXPORT) { /* We will not auto-import an export */ LIError (&S->RefLines, - "Exported symbol `%m%p' was never defined", + "Exported symbol '%m%p' was never defined", GetSymName (S)); } else { if (AutoImport) { @@ -554,7 +554,7 @@ static void SymCheckUndefined (SymEntry* S) } else { /* Error */ LIError (&S->RefLines, - "Symbol `%m%p' is undefined", + "Symbol '%m%p' is undefined", GetSymName (S)); } } @@ -616,7 +616,7 @@ void SymCheck (void) ReleaseFullLineInfo (&S->RefLines); } else if ((S->Flags & SF_DEFINED) != 0 && (S->Flags & SF_REFERENCED) == 0) { LIWarning (&S->DefLines, 2, - "Symbol `%m%p' is defined but never used", + "Symbol '%m%p' is defined but never used", GetSymName (S)); } @@ -625,7 +625,7 @@ void SymCheck (void) if ((S->Flags & (SF_REFERENCED | SF_FORCED)) == SF_NONE) { /* Imported symbol is not referenced */ LIWarning (&S->DefLines, 2, - "Symbol `%m%p' is imported but never used", + "Symbol '%m%p' is imported but never used", GetSymName (S)); } else { /* Give the import an id, count imports */ @@ -653,7 +653,7 @@ void SymCheck (void) } else if (S->AddrSize > S->ExportSize) { /* We're exporting a symbol smaller than it actually is */ LIWarning (&S->DefLines, 1, - "Symbol `%m%p' is %s but exported %s", + "Symbol '%m%p' is %s but exported %s", GetSymName (S), AddrSizeToStr (S->AddrSize), AddrSizeToStr (S->ExportSize)); @@ -673,7 +673,7 @@ void SymCheck (void) const FilePos* P = S->GuessedUse[S->AddrSize - 1]; if (P) { PWarning (P, 0, - "Didn't use %s addressing for `%m%p'", + "Didn't use %s addressing for '%m%p'", AddrSizeToStr (S->AddrSize), GetSymName (S)); } diff --git a/src/ca65/token.h b/src/ca65/token.h index bfc013a3d..b8bbb6d6e 100644 --- a/src/ca65/token.h +++ b/src/ca65/token.h @@ -66,6 +66,7 @@ typedef enum token_t { TOK_A, /* A)ccumulator */ TOK_X, /* X register */ TOK_Y, /* Y register */ + TOK_Z, /* Z register */ TOK_S, /* S register */ TOK_REG, /* Sweet16 R.. register (in sweet16 mode) */ @@ -192,8 +193,10 @@ typedef enum token_t { TOK_IFNDEF, TOK_IFNREF, TOK_IFP02, + TOK_IFP4510, TOK_IFP816, TOK_IFPC02, + TOK_IFPDTV, TOK_IFPSC02, TOK_IFREF, TOK_IMPORT, @@ -207,6 +210,7 @@ typedef enum token_t { TOK_LINECONT, TOK_LIST, TOK_LISTBYTES, + TOK_LITERAL, TOK_LOBYTE, TOK_LOBYTES, TOK_LOCAL, @@ -222,17 +226,22 @@ typedef enum token_t { TOK_ORG, TOK_OUT, TOK_P02, + TOK_P4510, TOK_P816, TOK_PAGELENGTH, TOK_PARAMCOUNT, TOK_PC02, + TOK_PDTV, + TOK_POPCHARMAP, TOK_POPCPU, TOK_POPSEG, TOK_PROC, TOK_PSC02, + TOK_PUSHCHARMAP, TOK_PUSHCPU, TOK_PUSHSEG, TOK_REFERENCED, + TOK_REFERTO, TOK_RELOC, TOK_REPEAT, TOK_RES, diff --git a/src/ca65/ulabel.c b/src/ca65/ulabel.c index 9712f4942..1127c3743 100644 --- a/src/ca65/ulabel.c +++ b/src/ca65/ulabel.c @@ -160,7 +160,7 @@ void ULabDef (void) */ ULabel* L = CollAtUnchecked (&ULabList, ULabDefCount); CHECK (L->Val == 0); - L->Val = GenCurrentPC (); + L->Val = GenCurrentPC (); ReleaseFullLineInfo (&L->LineInfos); GetFullLineInfo (&L->LineInfos); } else { @@ -200,7 +200,7 @@ ExprNode* ULabResolve (unsigned Index) void ULabDone (void) -/* Run through all unnamed labels, check for anomalies and errors and do +/* Run through all unnamed labels, check for anomalies and errors and do ** necessary cleanups. */ { diff --git a/src/cc65.props b/src/cc65.props new file mode 100644 index 000000000..ef5a37fea --- /dev/null +++ b/src/cc65.props @@ -0,0 +1,62 @@ +<Project> + <PropertyGroup Label="UserMacros"> + </PropertyGroup> + <!-- VS2017 compatibility. --> + <PropertyGroup Condition="$(MSBuildVersion.Split('.')[0]) == '15'"> + <PlatformToolset Condition="'$(PlatformToolset)' == ''">v141</PlatformToolset> + <WindowsTargetPlatformVersion Condition="'$(WindowsTargetPlatformVersion)' == ''">$([Microsoft.Build.Utilities.ToolLocationHelper]::GetLatestSDKTargetPlatformVersion('Windows', '10.0'))</WindowsTargetPlatformVersion> + </PropertyGroup> + <!-- Common settings. --> + <PropertyGroup> + <PlatformToolset Condition="'$(PlatformToolset)' == ''">v142</PlatformToolset> + <WindowsTargetPlatformVersion Condition="'$(WindowsTargetPlatformVersion)' == ''">10.0</WindowsTargetPlatformVersion> + <IntDir>$(SolutionDir)..\wrk\$(MSBuildProjectName)\$(Configuration)\</IntDir> + <OutDir>$(SolutionDir)..\bin\</OutDir> + <OutDir Condition="$(MSBuildProjectName) == 'common'">$(IntDir)</OutDir> + </PropertyGroup> + <ItemDefinitionGroup> + <ClCompile> + <PrecompiledHeader>NotUsing</PrecompiledHeader> + <WarningLevel>Level3</WarningLevel> + <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_WIN32_WINNT=0x0601;WINVER=0x0601;NTDDI_VERSION=0x06010000;%(PreprocessorDefinitions)</PreprocessorDefinitions> + <AdditionalIncludeDirectories Condition="$(MSBuildProjectName) != 'common'">common</AdditionalIncludeDirectories> + </ClCompile> + <Link> + <AdditionalDependencies Condition="$(MSBuildProjectName) != 'common'">$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> + </Link> + </ItemDefinitionGroup> + <!-- Debug settings. --> + <PropertyGroup Condition="'$(Configuration)'=='Debug'"> + <LinkIncremental>true</LinkIncremental> + </PropertyGroup> + <ItemDefinitionGroup Condition="'$(Configuration)'=='Debug'"> + <ClCompile> + <RuntimeLibrary>MultiThreadedDebugDLL</RuntimeLibrary> + <BufferSecurityCheck>true</BufferSecurityCheck> + </ClCompile> + <Link> + <GenerateDebugInformation>true</GenerateDebugInformation> + </Link> + </ItemDefinitionGroup> + <!-- Release settings. --> + <PropertyGroup Condition="'$(Configuration)'=='Release'"> + <LinkIncremental>false</LinkIncremental> + <WholeProgramOptimization>true</WholeProgramOptimization> + </PropertyGroup> + <ItemDefinitionGroup Condition="'$(Configuration)'=='Release'"> + <ClCompile> + <RuntimeLibrary>MultiThreaded</RuntimeLibrary> + <FunctionLevelLinking>true</FunctionLevelLinking> + <Optimization>MaxSpeed</Optimization> + <BufferSecurityCheck>false</BufferSecurityCheck> + <ControlFlowGuard>false</ControlFlowGuard> + </ClCompile> + <Link> + <GenerateDebugInformation>false</GenerateDebugInformation> + <EnableCOMDATFolding>true</EnableCOMDATFolding> + <OptimizeReferences>true</OptimizeReferences> + <LinkTimeCodeGeneration>UseLinkTimeCodeGeneration</LinkTimeCodeGeneration> + </Link> + </ItemDefinitionGroup> +</Project> diff --git a/src/cc65.sln b/src/cc65.sln index 9d0f2cc2e..4ae2816ad 100644 --- a/src/cc65.sln +++ b/src/cc65.sln @@ -58,6 +58,11 @@ Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "sim65", "sim65.vcxproj", "{ {71DC1F68-BFC4-478C-8655-C8E9C9654D2B} = {71DC1F68-BFC4-478C-8655-C8E9C9654D2B} EndProjectSection EndProject +Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "chrcvt65", "chrcvt65.vcxproj", "{1C7A3FEF-DD0B-4B10-BC33-C3BE29BF67CC}" + ProjectSection(ProjectDependencies) = postProject + {71DC1F68-BFC4-478C-8655-C8E9C9654D2B} = {71DC1F68-BFC4-478C-8655-C8E9C9654D2B} + EndProjectSection +EndProject Global GlobalSection(SolutionConfigurationPlatforms) = preSolution Debug|Win32 = Debug|Win32 @@ -112,6 +117,10 @@ Global {002A366E-2863-46A8-BDDE-DDF534AAEC73}.Debug|Win32.Build.0 = Debug|Win32 {002A366E-2863-46A8-BDDE-DDF534AAEC73}.Release|Win32.ActiveCfg = Release|Win32 {002A366E-2863-46A8-BDDE-DDF534AAEC73}.Release|Win32.Build.0 = Release|Win32 + {1C7A3FEF-DD0B-4B10-BC33-C3BE29BF67CC}.Debug|Win32.ActiveCfg = Debug|Win32 + {1C7A3FEF-DD0B-4B10-BC33-C3BE29BF67CC}.Debug|Win32.Build.0 = Debug|Win32 + {1C7A3FEF-DD0B-4B10-BC33-C3BE29BF67CC}.Release|Win32.ActiveCfg = Release|Win32 + {1C7A3FEF-DD0B-4B10-BC33-C3BE29BF67CC}.Release|Win32.Build.0 = Release|Win32 EndGlobalSection GlobalSection(SolutionProperties) = preSolution HideSolutionNode = FALSE diff --git a/src/cc65.vcxproj b/src/cc65.vcxproj index 1c1f993fe..5cddc1862 100644 --- a/src/cc65.vcxproj +++ b/src/cc65.vcxproj @@ -1,5 +1,5 @@ <?xml version="1.0" encoding="utf-8"?> -<Project DefaultTargets="Build" ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> +<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <ItemGroup Label="ProjectConfigurations"> <ProjectConfiguration Include="Debug|Win32"> <Configuration>Debug</Configuration> @@ -13,65 +13,39 @@ <PropertyGroup Label="Globals"> <ProjectGuid>{B17EDBD5-DC04-4970-9CBD-56A98B6A3FCA}</ProjectGuid> <Keyword>Win32Proj</Keyword> - <RootNamespace>cc65</RootNamespace> </PropertyGroup> + <ImportGroup Label="PropertySheets"> + <Import Project="cc65.props" /> + </ImportGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> <UseDebugLibraries>true</UseDebugLibraries> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> <UseDebugLibraries>false</UseDebugLibraries> - <WholeProgramOptimization>true</WholeProgramOptimization> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> <ImportGroup Label="ExtensionSettings"> </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> <PropertyGroup Label="UserMacros" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <LinkIncremental>true</LinkIncremental> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> - <OutDir>$(SolutionDir)..\bin\</OutDir> </PropertyGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> <ClCompile> - <PrecompiledHeader> - </PrecompiledHeader> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;_DEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <WarningLevel>Level3</WarningLevel> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;_DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>true</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> <ClCompile> - <WarningLevel>Level3</WarningLevel> - <PrecompiledHeader> - </PrecompiledHeader> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;NDEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>false</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemGroup> @@ -86,12 +60,15 @@ <ClInclude Include="cc65\codeinfo.h" /> <ClInclude Include="cc65\codelab.h" /> <ClInclude Include="cc65\codeopt.h" /> + <ClInclude Include="cc65\codeoptutil.h" /> <ClInclude Include="cc65\codeseg.h" /> <ClInclude Include="cc65\compile.h" /> <ClInclude Include="cc65\coptadd.h" /> <ClInclude Include="cc65\coptc02.h" /> <ClInclude Include="cc65\coptcmp.h" /> <ClInclude Include="cc65\coptind.h" /> + <ClInclude Include="cc65\coptjmp.h" /> + <ClInclude Include="cc65\coptmisc.h" /> <ClInclude Include="cc65\coptneg.h" /> <ClInclude Include="cc65\coptptrload.h" /> <ClInclude Include="cc65\coptptrstore.h" /> @@ -116,6 +93,7 @@ <ClInclude Include="cc65\hexval.h" /> <ClInclude Include="cc65\ident.h" /> <ClInclude Include="cc65\incpath.h" /> + <ClInclude Include="cc65\initdata.h" /> <ClInclude Include="cc65\input.h" /> <ClInclude Include="cc65\lineinfo.h" /> <ClInclude Include="cc65\litpool.h" /> @@ -134,6 +112,7 @@ <ClInclude Include="cc65\shiftexpr.h" /> <ClInclude Include="cc65\stackptr.h" /> <ClInclude Include="cc65\standard.h" /> + <ClInclude Include="cc65\staticassert.h" /> <ClInclude Include="cc65\stdfunc.h" /> <ClInclude Include="cc65\stdnames.h" /> <ClInclude Include="cc65\stmt.h" /> @@ -145,6 +124,7 @@ <ClInclude Include="cc65\typecmp.h" /> <ClInclude Include="cc65\typeconv.h" /> <ClInclude Include="cc65\util.h" /> + <ClInclude Include="cc65\wrappedcall.h" /> </ItemGroup> <ItemGroup> <ClCompile Include="cc65\anonname.c" /> @@ -158,12 +138,15 @@ <ClCompile Include="cc65\codeinfo.c" /> <ClCompile Include="cc65\codelab.c" /> <ClCompile Include="cc65\codeopt.c" /> + <ClCompile Include="cc65\codeoptutil.c" /> <ClCompile Include="cc65\codeseg.c" /> <ClCompile Include="cc65\compile.c" /> <ClCompile Include="cc65\coptadd.c" /> <ClCompile Include="cc65\coptc02.c" /> <ClCompile Include="cc65\coptcmp.c" /> <ClCompile Include="cc65\coptind.c" /> + <ClCompile Include="cc65\coptjmp.c" /> + <ClCompile Include="cc65\coptmisc.c" /> <ClCompile Include="cc65\coptneg.c" /> <ClCompile Include="cc65\coptptrload.c" /> <ClCompile Include="cc65\coptptrstore.c" /> @@ -188,6 +171,7 @@ <ClCompile Include="cc65\hexval.c" /> <ClCompile Include="cc65\ident.c" /> <ClCompile Include="cc65\incpath.c" /> + <ClCompile Include="cc65\initdata.c" /> <ClCompile Include="cc65\input.c" /> <ClCompile Include="cc65\lineinfo.c" /> <ClCompile Include="cc65\litpool.c" /> @@ -207,6 +191,7 @@ <ClCompile Include="cc65\shiftexpr.c" /> <ClCompile Include="cc65\stackptr.c" /> <ClCompile Include="cc65\standard.c" /> + <ClCompile Include="cc65\staticassert.c" /> <ClCompile Include="cc65\stdfunc.c" /> <ClCompile Include="cc65\stdnames.c" /> <ClCompile Include="cc65\stmt.c" /> @@ -218,6 +203,7 @@ <ClCompile Include="cc65\typecmp.c" /> <ClCompile Include="cc65\typeconv.c" /> <ClCompile Include="cc65\util.c" /> + <ClCompile Include="cc65\wrappedcall.c" /> </ItemGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.targets" /> <ImportGroup Label="ExtensionTargets"> diff --git a/src/cc65/anonname.c b/src/cc65/anonname.c index d02253d82..23891bf0e 100644 --- a/src/cc65/anonname.c +++ b/src/cc65/anonname.c @@ -61,6 +61,17 @@ static const char AnonTag[] = "$anon"; +char* AnonFieldName (char* Buf, const char* Spec, int ANumber) +/* Get a name for an anonymous field of a struct or union. The given buffer is +** expected to be IDENTSIZE characters long. A pointer to the buffer is returned. +*/ +{ + xsprintf (Buf, IDENTSIZE, "%s-%s-%04X", AnonTag, Spec, ANumber); + return Buf; +} + + + char* AnonName (char* Buf, const char* Spec) /* Get a name for an anonymous variable or type. The given buffer is expected ** to be IDENTSIZE characters long. A pointer to the buffer is returned. diff --git a/src/cc65/anonname.h b/src/cc65/anonname.h index dfaa1bdaa..a88b131b5 100644 --- a/src/cc65/anonname.h +++ b/src/cc65/anonname.h @@ -44,6 +44,11 @@ +char* AnonFieldName (char* Buf, const char* Spec, int ANumber); +/* Get a name for an anonymous field of a struct or union. The given buffer is +** expected to be IDENTSIZE characters long. A pointer to the buffer is returned. +*/ + char* AnonName (char* Buf, const char* Spec); /* Get a name for an anonymous variable or type. The given buffer is expected ** to be IDENTSIZE characters long. A pointer to the buffer is returned. diff --git a/src/cc65/asmlabel.c b/src/cc65/asmlabel.c index 09aee3b92..7d5db75e6 100644 --- a/src/cc65/asmlabel.c +++ b/src/cc65/asmlabel.c @@ -42,6 +42,17 @@ /* cc65 */ #include "asmlabel.h" #include "error.h" +#include "segments.h" + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +static struct Segments* CurrentFunctionSegment; @@ -51,19 +62,26 @@ -unsigned GetLocalLabel (void) -/* Get an unused label. Will never return zero. */ +void UseLabelPoolFromSegments (struct Segments* Seg) +/* Use the info in segments for generating new label numbers */ { - /* Number to generate unique labels */ - static unsigned NextLabel = 0; + CurrentFunctionSegment = Seg; +} + + + +unsigned GetLocalLabel (void) +/* Get an unused assembler label for the function. Will never return zero. */ +{ + PRECONDITION (CurrentFunctionSegment != 0); /* Check for an overflow */ - if (NextLabel >= 0xFFFF) { + if (CurrentFunctionSegment->NextLabel >= 0xFFFF) { Internal ("Local label overflow"); } /* Return the next label */ - return ++NextLabel; + return ++CurrentFunctionSegment->NextLabel; } @@ -98,3 +116,60 @@ int IsLocalLabelName (const char* Name) /* Local label name */ return 1; } + + + +unsigned GetLocalDataLabel (void) +/* Get an unused local data label. Will never return zero. */ +{ + PRECONDITION (CurrentFunctionSegment != 0); + + /* Check for an overflow */ + if (CurrentFunctionSegment->NextDataLabel >= 0xFFFF) { + Internal ("Local data label overflow"); + } + + /* Return the next label */ + return ++CurrentFunctionSegment->NextDataLabel; +} + + + +const char* LocalDataLabelName (unsigned L) +/* Make a label name from the given data label number. The label name will be +** created in static storage and overwritten when calling the function again. +*/ +{ + static char Buf[64]; + sprintf (Buf, "M%04X", L); + return Buf; +} + + + +unsigned GetPooledLiteralLabel (void) +/* Get an unused literal label. Will never return zero. */ +{ + /* Number to generate unique labels */ + static unsigned NextLabel = 0; + + /* Check for an overflow */ + if (NextLabel >= 0xFFFF) { + Internal ("Literal label overflow"); + } + + /* Return the next label */ + return ++NextLabel; +} + + + +const char* PooledLiteralLabelName (unsigned L) +/* Make a litral label name from the given label number. The label name will be +** created in static storage and overwritten when calling the function again. +*/ +{ + static char Buf[64]; + sprintf (Buf, "S%04X", L); + return Buf; +} diff --git a/src/cc65/asmlabel.h b/src/cc65/asmlabel.h index 4a76643a5..dbfe2f443 100644 --- a/src/cc65/asmlabel.h +++ b/src/cc65/asmlabel.h @@ -38,14 +38,27 @@ +/*****************************************************************************/ +/* Forwards */ +/*****************************************************************************/ + + + +struct Segments; + + + /*****************************************************************************/ /* Code */ /*****************************************************************************/ +void UseLabelPoolFromSegments (struct Segments* Seg); +/* Use the info in segments for generating new label numbers */ + unsigned GetLocalLabel (void); -/* Get an unused assembler label. Will never return zero. */ +/* Get an unused assembler label for the function. Will never return zero. */ const char* LocalLabelName (unsigned L); /* Make a label name from the given label number. The label name will be @@ -56,6 +69,22 @@ const char* LocalLabelName (unsigned L); int IsLocalLabelName (const char* Name); /* Return true if Name is the name of a local label */ +unsigned GetLocalDataLabel (void); +/* Get an unused local data label. Will never return zero. */ + +const char* LocalDataLabelName (unsigned L); +/* Make a label name from the given data label number. The label name will be +** created in static storage and overwritten when calling the function again. +*/ + +unsigned GetPooledLiteralLabel (void); +/* Get an unused literal label. Will never return zero. */ + +const char* PooledLiteralLabelName (unsigned L); +/* Make a litral label name from the given label number. The label name will be +** created in static storage and overwritten when calling the function again. +*/ + /* End of asmlabel.h */ diff --git a/src/cc65/asmstmt.c b/src/cc65/asmstmt.c index 59c1332ff..d182140fd 100644 --- a/src/cc65/asmstmt.c +++ b/src/cc65/asmstmt.c @@ -41,12 +41,14 @@ /* cc65 */ #include "asmlabel.h" #include "codegen.h" +#include "codeseg.h" #include "datatype.h" #include "error.h" #include "expr.h" #include "function.h" #include "litpool.h" #include "scanner.h" +#include "segments.h" #include "stackptr.h" #include "symtab.h" #include "asmstmt.h" @@ -100,7 +102,7 @@ static SymEntry* AsmGetSym (unsigned Arg, unsigned Type) /* Did we find a symbol with this name? */ if (Sym == 0) { - Error ("Undefined symbol `%s' for argument %u", CurTok.Ident, Arg); + Error ("Undefined symbol '%s' for argument %u", CurTok.Ident, Arg); AsmErrorSkip (); return 0; } @@ -127,14 +129,13 @@ static SymEntry* AsmGetSym (unsigned Arg, unsigned Type) static void ParseByteArg (StrBuf* T, unsigned Arg) /* Parse the %b format specifier */ { - ExprDesc Expr; char Buf [16]; /* We expect an argument separated by a comma */ ConsumeComma (); /* Evaluate the expression */ - ConstAbsIntExpr (hie1, &Expr); + ExprDesc Expr = NoCodeConstAbsIntExpr (hie1); /* Check the range but allow negative values if the type is signed */ if (IsSignUnsigned (Expr.Type)) { @@ -161,14 +162,13 @@ static void ParseByteArg (StrBuf* T, unsigned Arg) static void ParseWordArg (StrBuf* T, unsigned Arg) /* Parse the %w format specifier */ { - ExprDesc Expr; char Buf [16]; /* We expect an argument separated by a comma */ ConsumeComma (); /* Evaluate the expression */ - ConstAbsIntExpr (hie1, &Expr); + ExprDesc Expr = NoCodeConstAbsIntExpr (hie1); /* Check the range but allow negative values if the type is signed */ if (IsSignUnsigned (Expr.Type)) { @@ -195,14 +195,13 @@ static void ParseWordArg (StrBuf* T, unsigned Arg) static void ParseLongArg (StrBuf* T, unsigned Arg attribute ((unused))) /* Parse the %l format specifier */ { - ExprDesc Expr; char Buf [16]; /* We expect an argument separated by a comma */ ConsumeComma (); /* Evaluate the expression */ - ConstAbsIntExpr (hie1, &Expr); + ExprDesc Expr = NoCodeConstAbsIntExpr (hie1); /* Convert into a hex number */ xsprintf (Buf, sizeof (Buf), "$%08lX", Expr.IVal & 0xFFFFFFFF); @@ -214,7 +213,9 @@ static void ParseLongArg (StrBuf* T, unsigned Arg attribute ((unused))) static void ParseGVarArg (StrBuf* T, unsigned Arg) -/* Parse the %v format specifier */ +/* Parse the %v format specifier. +** ### FIXME: Asm names should be generated in the same place. +*/ { /* Parse the symbol name parameter and check the type */ SymEntry* Sym = AsmGetSym (Arg, SC_STATIC); @@ -226,7 +227,6 @@ static void ParseGVarArg (StrBuf* T, unsigned Arg) /* Check for external linkage */ if (Sym->Flags & (SC_EXTERN | SC_STORAGE | SC_FUNC)) { /* External linkage or a function */ - /* ### FIXME: Asm name should be generated by codegen */ SB_AppendChar (T, '_'); SB_AppendStr (T, Sym->Name); } else if (Sym->Flags & SC_REGISTER) { @@ -235,9 +235,7 @@ static void ParseGVarArg (StrBuf* T, unsigned Arg) SB_AppendStr (T, Buf); } else { /* Static variable */ - char Buf [16]; - xsprintf (Buf, sizeof (Buf), "L%04X", Sym->V.Label); - SB_AppendStr (T, Buf); + SB_AppendStr (T, LocalDataLabelName (Sym->V.L.Label)); } } @@ -287,11 +285,11 @@ static void ParseLabelArg (StrBuf* T, unsigned Arg attribute ((unused))) } else { - /* Add a new label symbol if we don't have one until now */ + /* Add a new C label symbol if we don't have one until now */ SymEntry* Entry = AddLabelSym (CurTok.Ident, SC_REF); /* Append the label name to the buffer */ - SB_AppendStr (T, LocalLabelName (Entry->V.Label)); + SB_AppendStr (T, LocalLabelName (Entry->V.L.Label)); /* Eat the label name */ NextToken (); @@ -326,7 +324,7 @@ static void ParseStrArg (StrBuf* T, unsigned Arg attribute ((unused))) break; default: - ConstAbsIntExpr (hie1, &Expr); + Expr = NoCodeConstAbsIntExpr (hie1); xsprintf (Buf, sizeof (Buf), "%ld", Expr.IVal); SB_AppendStr (T, Buf); break; @@ -422,6 +420,15 @@ void AsmStatement (void) /* Skip the ASM */ NextToken (); + /* An optional volatile qualifier disables optimization for + ** the entire function [same as #pragma optimize(push, off)]. + */ + if (CurTok.Tok == TOK_VOLATILE) { + /* Don't optimize the Current code Segment */ + CS->Code->Optimize = 0; + NextToken (); + } + /* Need left parenthesis */ if (!ConsumeLParen ()) { return; diff --git a/src/cc65/assignment.c b/src/cc65/assignment.c index f0607ac58..9834ae5d1 100644 --- a/src/cc65/assignment.c +++ b/src/cc65/assignment.c @@ -42,6 +42,7 @@ #include "expr.h" #include "loadexpr.h" #include "scanner.h" +#include "stackptr.h" #include "stdnames.h" #include "typecmp.h" #include "typeconv.h" @@ -54,144 +55,384 @@ -void Assignment (ExprDesc* Expr) -/* Parse an assignment */ +static void CopyStruct (ExprDesc* LExpr, ExprDesc* RExpr) +/* Copy the struct/union represented by RExpr to the one represented by LExpr */ +{ + /* If the size is that of a basic type (char, int, long), we will copy + ** the struct using the primary register, otherwise we will use memcpy. + */ + const Type* ltype = LExpr->Type; + const Type* stype = GetStructReplacementType (ltype); + int UseReg = (stype != ltype); + + if (UseReg) { + /* Back up the address of lhs only if it is in the primary */ + PushAddr (LExpr); + } else { + /* Push the address of lhs as the destination of memcpy */ + ED_AddrExpr (LExpr); + LoadExpr (CF_NONE, LExpr); + g_push (CF_PTR | CF_UNSIGNED, 0); + } + + /* Get the expression on the right of the '=' */ + hie1 (RExpr); + + /* Check for equality of the structs/unions */ + if (TypeCmp (ltype, RExpr->Type).C < TC_STRICT_COMPATIBLE) { + TypeCompatibilityDiagnostic (ltype, RExpr->Type, 1, + "Incompatible types in assignment to '%s' from '%s'"); + } + + /* Do we copy the value directly using the primary? */ + if (UseReg) { + + /* Check if the value of the rhs is not in the primary yet */ + if (!ED_IsLocPrimary (RExpr)) { + /* Just load the value into the primary as the replacement type. */ + LoadExpr (TypeOf (stype) | CF_FORCECHAR, RExpr); + } + + /* Store it into the location referred in the primary */ + Store (LExpr, stype); + + /* Value is in primary as an rvalue */ + ED_FinalizeRValLoad (LExpr); + + } else { + + /* The rhs cannot happen to be loaded in the primary as it is too big */ + if (!ED_IsLocExpr (RExpr)) { + ED_AddrExpr (RExpr); + LoadExpr (CF_NONE, RExpr); + } + + /* Push the address of the rhs as the source of memcpy */ + g_push (CF_PTR | CF_UNSIGNED, 0); + + /* Load the size of the struct or union into the primary */ + g_getimmed (CF_INT | CF_UNSIGNED | CF_CONST, SizeOf (ltype), 0); + + /* Call the memcpy function */ + g_call (CF_FIXARGC, Func_memcpy, 4); + + /* The result is an rvalue referenced in the primary */ + ED_FinalizeRValLoad (LExpr); + + /* Restore the indirection level of lhs */ + ED_IndExpr (LExpr); + } + + /* Clear the tested flag set during loading. This is not neccessary + ** currently (and probably ever) as a struct/union cannot be converted + ** to a boolean in C, but there is no harm to be future-proof. + */ + ED_MarkAsUntested (LExpr); +} + + + +void DoIncDecBitField (ExprDesc* Expr, long Val, unsigned KeepResult) +/* Process inc/dec for bit-field */ +{ + int AddrSP; + unsigned Flags; /* Internal codegen flags */ + unsigned Mask; + unsigned ChunkFlags; + const Type* ChunkType; + + /* Determine the type to operate on the whole byte chunk containing the bit-field */ + ChunkType = GetBitFieldChunkType (Expr->Type); + + /* Determine code generator flags */ + Flags = TypeOf (Expr->Type) | CF_FORCECHAR; + ChunkFlags = TypeOf (ChunkType); + if ((ChunkFlags & CF_TYPEMASK) == CF_CHAR) { + ChunkFlags |= CF_FORCECHAR; + } + + /* Get the address on stack for the store */ + PushAddr (Expr); + + /* We may need the pushed address later */ + AddrSP = StackPtr; + + /* Get bit mask to limit the range of the value */ + Mask = (0x0001U << Expr->Type->A.B.Width) - 1U; + + /* Fetch the lhs into the primary register if needed */ + LoadExpr (CF_NONE, Expr); + + /* Handle for add and sub */ + if (Val > 0) { + g_inc (Flags | CF_CONST, Val); + } else if (Val < 0) { + g_dec (Flags | CF_CONST, -Val); + } + + /* Apply the mask */ + g_and (Flags | CF_CONST, Mask); + + /* Do integral promotion without sign-extension if needed */ + g_typecast (ChunkFlags | CF_UNSIGNED, Flags); + + /* Shift it into the right position */ + g_asl (ChunkFlags | CF_CONST, Expr->Type->A.B.Offs); + + /* Push the interim result on stack */ + g_push (ChunkFlags & ~CF_FORCECHAR, 0); + + /* If the original lhs was using the primary, it is now accessible only via + ** the pushed address. Reload that address. + */ + if (ED_IsLocPrimaryOrExpr (Expr)) { + g_getlocal (CF_PTR, AddrSP); + } + + /* Load the whole data chunk containing the bits to be changed */ + LoadExpr (ChunkFlags, Expr); + + if (KeepResult == OA_NEED_OLD) { + /* Save the original expression value */ + g_save (ChunkFlags | CF_FORCECHAR); + } + + /* Get the bits that are not to be affected */ + g_and (ChunkFlags | CF_CONST, ~(Mask << Expr->Type->A.B.Offs)); + + /* Restore the bits that are not to be affected */ + g_or (ChunkFlags & ~CF_FORCECHAR, 0); + + /* Store the whole data chunk containing the changed bits back */ + Store (Expr, ChunkType); + + if (KeepResult == OA_NEED_OLD) { + /* Restore the original expression value */ + g_restore (ChunkFlags | CF_FORCECHAR); + } +} + + + +static void OpAssignBitField (const GenDesc* Gen, ExprDesc* Expr, const char* Op) +/* Parse an "=" (if 'Gen' is 0) or "op=" operation for bit-field lhs */ { ExprDesc Expr2; - Type* ltype = Expr->Type; + CodeMark PushPos; + int AddrSP; + unsigned Mask; + unsigned Flags; + unsigned ChunkFlags; + const Type* ChunkType; + ED_Init (&Expr2); + Expr2.Flags |= Expr->Flags & E_MASK_KEEP_SUBEXPR; - /* We must have an lvalue for an assignment */ - if (ED_IsRVal (Expr)) { - Error ("Invalid lvalue in assignment"); + /* Determine the type to operate on the whole byte chunk containing the bit-field */ + ChunkType = GetBitFieldChunkType (Expr->Type); + + /* Determine code generator flags */ + Flags = TypeOf (Expr->Type) | CF_FORCECHAR; + ChunkFlags = TypeOf (ChunkType); + if ((ChunkFlags & CF_TYPEMASK) == CF_CHAR) { + ChunkFlags |= CF_FORCECHAR; } - /* Check for assignment to const */ - if (IsQualConst (ltype)) { - Error ("Assignment to const"); - } + /* Get the address on stack for the store */ + PushAddr (Expr); - /* Skip the '=' token */ - NextToken (); + /* We may need the pushed address later */ + AddrSP = StackPtr; - /* cc65 does not have full support for handling structs by value. Since - ** assigning structs is one of the more useful operations from this - ** family, allow it here. - */ - if (IsClassStruct (ltype)) { + /* Get bit mask to limit the range of the value */ + Mask = (0x0001U << Expr->Type->A.B.Width) - 1U; - /* Get the size of the left hand side. */ - unsigned Size = SizeOf (ltype); + if (Gen != 0) { - /* If the size is that of a basic type (char, int, long), we will copy - ** the struct using the primary register, otherwise we use memcpy. In - ** the former case, push the address only if really needed. - */ - int UseReg = 1; - Type* stype; - switch (Size) { - case SIZEOF_CHAR: stype = type_uchar; break; - case SIZEOF_INT: stype = type_uint; break; - case SIZEOF_LONG: stype = type_ulong; break; - default: stype = ltype; UseReg = 0; break; - } - if (UseReg) { - PushAddr (Expr); - } else { - ED_MakeRVal (Expr); - LoadExpr (CF_NONE, Expr); - g_push (CF_PTR | CF_UNSIGNED, 0); - } - - /* Get the expression on the right of the '=' into the primary */ - hie1 (&Expr2); - - /* Check for equality of the structs */ - if (TypeCmp (ltype, Expr2.Type) < TC_STRICT_COMPATIBLE) { - Error ("Incompatible types"); - } - - /* Check if the right hand side is an lvalue */ - if (ED_IsLVal (&Expr2)) { - /* We have an lvalue. Do we copy using the primary? */ - if (UseReg) { - /* Just use the replacement type */ - Expr2.Type = stype; - - /* Load the value into the primary */ - LoadExpr (CF_FORCECHAR, &Expr2); - - /* Store it into the new location */ - Store (Expr, stype); - - } else { - - /* We will use memcpy. Push the address of the rhs */ - ED_MakeRVal (&Expr2); - LoadExpr (CF_NONE, &Expr2); - - /* Push the address (or whatever is in ax in case of errors) */ - g_push (CF_PTR | CF_UNSIGNED, 0); - - /* Load the size of the struct into the primary */ - g_getimmed (CF_INT | CF_UNSIGNED | CF_CONST, CheckedSizeOf (ltype), 0); - - /* Call the memcpy function */ - g_call (CF_FIXARGC, Func_memcpy, 4); - } - - } else { - - /* We have an rvalue. This can only happen if a function returns - ** a struct, since there is no other way to generate an expression - ** that has a struct as an rvalue result. We allow only 1, 2, and 4 - ** byte sized structs, and do direct assignment. - */ - if (UseReg) { - /* Do the store */ - Store (Expr, stype); - } else { - /* Print a diagnostic */ - Error ("Structs of this size are not supported"); - /* Adjust the stack so we won't run in an internal error later */ - pop (CF_PTR); - } - - } - - } else if (ED_IsBitField (Expr)) { - - CodeMark AndPos; - CodeMark PushPos; - - unsigned Mask; - unsigned Flags; - - /* If the bit-field fits within one byte, do the following operations - ** with bytes. - */ - if (Expr->BitOffs / CHAR_BITS == (Expr->BitOffs + Expr->BitWidth - 1) / CHAR_BITS) { - Expr->Type = type_uchar; - } - - /* Determine code generator flags */ - Flags = TypeOf (Expr->Type); - - /* Assignment to a bit field. Get the address on stack for the store. */ - PushAddr (Expr); - - /* Load the value from the location */ - Expr->Flags &= ~E_BITFIELD; + /* Fetch the lhs into the primary register if needed */ LoadExpr (CF_NONE, Expr); - /* Mask unwanted bits */ - Mask = (0x0001U << Expr->BitWidth) - 1U; - GetCodePos (&AndPos); - g_and (Flags | CF_CONST, ~(Mask << Expr->BitOffs)); - - /* Push it on stack */ + /* Backup them on stack */ GetCodePos (&PushPos); - g_push (Flags, 0); + g_push (Flags & ~CF_FORCECHAR, 0); + + } + + /* Read the expression on the right side of the '=' or 'op=' */ + MarkedExprWithCheck (hie1, &Expr2); + + /* The rhs must be an integer (or a float, but we don't support that yet */ + if (!IsClassInt (Expr2.Type)) { + Error ("Invalid right operand for binary operator '%s'", Op); + /* Continue. Wrong code will be generated, but the compiler won't + ** break, so this is the best error recovery. + */ + } + + /* Special treatment if the value is constant. + ** Beware: Expr2 may contain side effects, so there must not be + ** code generated for Expr2. + */ + if (ED_IsConstAbsInt (&Expr2) && ED_CodeRangeIsEmpty (&Expr2)) { + + if (Gen == 0) { + + /* Get the value and apply the mask */ + unsigned Val = (unsigned)(Expr2.IVal & Mask); + + /* Load the whole data chunk containing the bits to be changed */ + LoadExpr (ChunkFlags, Expr); + + /* If the value is equal to the mask now, all bits are one, and we + ** can skip the mask operation. + */ + if (Val != Mask) { + /* Get the bits that are not to be affected */ + g_and (ChunkFlags | CF_CONST, ~(Mask << Expr->Type->A.B.Offs)); + } + + /* Restore the bits that are not to be affected */ + g_or (ChunkFlags | CF_CONST, Val << Expr->Type->A.B.Offs); + + /* Store the whole data chunk containing the changed bits back */ + Store (Expr, ChunkType); + + /* Done */ + goto Done; + + } else { + + /* Since we will operate with a constant, we can remove the push if + ** the generator has the NOPUSH flag set. + */ + if (Gen->Flags & GEN_NOPUSH) { + RemoveCode (&PushPos); + } + + /* Special handling for add and sub - some sort of a hack, but short code */ + if (Gen->Func == g_add) { + g_inc (Flags | CF_CONST, Expr2.IVal); + } else if (Gen->Func == g_sub) { + g_dec (Flags | CF_CONST, Expr2.IVal); + } else { + if (Expr2.IVal == 0) { + /* Check for div by zero/mod by zero */ + if (Gen->Func == g_div) { + Error ("Division by zero"); + } else if (Gen->Func == g_mod) { + Error ("Modulo operation with zero"); + } + } + + /* Adjust the types of the operands if needed */ + if (Gen->Func == g_div || Gen->Func == g_mod) { + unsigned AdjustedFlags = Flags; + if (Expr->Type->A.B.Width < INT_BITS || IsSignSigned (Expr->Type)) { + AdjustedFlags = (Flags & ~CF_UNSIGNED) | CF_CONST; + AdjustedFlags = g_typeadjust (AdjustedFlags, TypeOf (Expr2.Type) | CF_CONST); + } + Gen->Func (g_typeadjust (Flags, AdjustedFlags) | CF_CONST, Expr2.IVal); + } else { + Gen->Func ((Flags & ~CF_FORCECHAR) | CF_CONST, Expr2.IVal); + } + } + + } + + } else { + + /* Do 'op' if provided */ + if (Gen != 0) { + + /* Load rhs into the primary */ + LoadExpr (CF_NONE, &Expr2); + + /* Adjust the types of the operands if needed */ + if (Gen->Func == g_div || Gen->Func == g_mod) { + unsigned AdjustedFlags = Flags; + if (Expr->Type->A.B.Width < INT_BITS || IsSignSigned (Expr->Type)) { + AdjustedFlags = (Flags & ~CF_UNSIGNED) | CF_CONST; + AdjustedFlags = g_typeadjust (AdjustedFlags, TypeOf (Expr2.Type) | CF_CONST); + } + Gen->Func (g_typeadjust (Flags, AdjustedFlags), 0); + } else { + Gen->Func (g_typeadjust (Flags, TypeOf (Expr2.Type)), 0); + } + + } else { + + /* Do type conversion if necessary */ + TypeConversion (&Expr2, Expr->Type); + + /* If necessary, load rhs into the primary register */ + LoadExpr (CF_NONE, &Expr2); + + } + + } + + /* Apply the mask */ + g_and (Flags | CF_CONST, Mask); + + /* Do integral promotion without sign-extension if needed */ + g_typecast (ChunkFlags | CF_UNSIGNED, Flags); + + /* Shift it into the right position */ + g_asl (ChunkFlags | CF_CONST, Expr->Type->A.B.Offs); + + /* Push the interim result on stack */ + g_push (ChunkFlags & ~CF_FORCECHAR, 0); + + /* If the original lhs was using the primary, it is now accessible only via + ** the pushed address. Reload that address. + */ + if (ED_IsLocPrimaryOrExpr (Expr)) { + g_getlocal (CF_PTR, AddrSP); + } + + /* Load the whole data chunk containing the bits to be changed */ + LoadExpr (ChunkFlags, Expr); + + /* Get the bits that are not to be affected */ + g_and (ChunkFlags | CF_CONST, ~(Mask << Expr->Type->A.B.Offs)); + + /* Restore the bits that are not to be affected */ + g_or (ChunkFlags & ~CF_FORCECHAR, 0); + + /* Store the whole data chunk containing the changed bits back */ + Store (Expr, ChunkType); + +Done: + + /* Value is in primary as an rvalue */ + ED_FinalizeRValLoad (Expr); +} + + + +static void OpAssignArithmetic (const GenDesc* Gen, ExprDesc* Expr, const char* Op) +/* Parse an "=" (if 'Gen' is 0) or "op=" operation for arithmetic lhs */ +{ + ExprDesc Expr2; + CodeMark PushPos; + + unsigned Flags; + int MustScale; + + ED_Init (&Expr2); + Expr2.Flags |= Expr->Flags & E_MASK_KEEP_SUBEXPR; + + /* Determine code generator flags */ + Flags = TypeOf (Expr->Type); + + /* Determine the type of the lhs */ + MustScale = Gen != 0 && (Gen->Func == g_add || Gen->Func == g_sub) && + IsTypePtr (Expr->Type); + + /* Get the address on stack for the store */ + PushAddr (Expr); + + if (Gen == 0) { /* Read the expression on the right side of the '=' */ MarkedExprWithCheck (hie1, &Expr2); @@ -199,70 +440,286 @@ void Assignment (ExprDesc* Expr) /* Do type conversion if necessary. Beware: Do not use char type ** here! */ - TypeConversion (&Expr2, ltype); + TypeConversion (&Expr2, Expr->Type); - /* Special treatment if the value is constant. */ - /* Beware: Expr2 may contain side effects, so there must not be + /* If necessary, load the value into the primary register */ + LoadExpr (CF_NONE, &Expr2); + + } else { + + /* Load the original value if necessary */ + LoadExpr (CF_NONE, Expr); + + /* Push lhs on stack */ + GetCodePos (&PushPos); + g_push (Flags, 0); + + /* Read the expression on the right side of the '=' or 'op=' */ + MarkedExprWithCheck (hie1, &Expr2); + + /* The rhs must be an integer (or a float, but we don't support that yet */ + if (!IsClassInt (Expr2.Type)) { + Error ("Invalid right operand for binary operator '%s'", Op); + /* Continue. Wrong code will be generated, but the compiler won't + ** break, so this is the best error recovery. + */ + } + + /* Special treatment if the value is constant. + ** Beware: Expr2 may contain side effects, so there must not be ** code generated for Expr2. */ if (ED_IsConstAbsInt (&Expr2) && ED_CodeRangeIsEmpty (&Expr2)) { - /* Get the value and apply the mask */ - unsigned Val = (unsigned) (Expr2.IVal & Mask); - - /* Since we will do the OR with a constant, we can remove the push */ - RemoveCode (&PushPos); - - /* If the value is equal to the mask now, all bits are one, and we - ** can remove the mask operation from above. + /* Since we will operate with a constant, we can remove the push if + ** the generator has the NOPUSH flag set. */ - if (Val == Mask) { - RemoveCode (&AndPos); + if (Gen->Flags & GEN_NOPUSH) { + RemoveCode (&PushPos); + } + if (MustScale) { + /* lhs is a pointer, scale rhs */ + Expr2.IVal *= CheckedSizeOf (Expr->Type+1); } - /* Generate the or operation */ - g_or (Flags | CF_CONST, Val << Expr->BitOffs); + /* If the lhs is character sized, the operation may be later done + ** with characters. + */ + if (CheckedSizeOf (Expr->Type) == SIZEOF_CHAR) { + Flags |= CF_FORCECHAR; + } + + /* Special handling for add and sub - some sort of a hack, but short code */ + if (Gen->Func == g_add) { + g_inc (Flags | CF_CONST, Expr2.IVal); + } else if (Gen->Func == g_sub) { + g_dec (Flags | CF_CONST, Expr2.IVal); + } else { + if (Expr2.IVal == 0) { + /* Check for div by zero/mod by zero */ + if (Gen->Func == g_div) { + Error ("Division by zero"); + } else if (Gen->Func == g_mod) { + Error ("Modulo operation with zero"); + } + } + Gen->Func (Flags | CF_CONST, Expr2.IVal); + } } else { /* If necessary, load the value into the primary register */ LoadExpr (CF_NONE, &Expr2); - /* Apply the mask */ - g_and (Flags | CF_CONST, Mask); + if (MustScale) { + /* lhs is a pointer, scale rhs */ + g_scale (TypeOf (Expr2.Type), CheckedSizeOf (Expr->Type+1)); + } - /* Shift it into the right position */ - g_asl (Flags | CF_CONST, Expr->BitOffs); + /* If the lhs is character sized, the operation may be later done + ** with characters. + */ + if (CheckedSizeOf (Expr->Type) == SIZEOF_CHAR) { + Flags |= CF_FORCECHAR; + } + + /* Adjust the types of the operands if needed */ + Gen->Func (g_typeadjust (Flags, TypeOf (Expr2.Type)), 0); - /* Or both values */ - g_or (Flags, 0); } - - /* Generate a store instruction */ - Store (Expr, 0); - - /* Restore the expression type */ - Expr->Type = ltype; - - } else { - - /* Get the address on stack if needed */ - PushAddr (Expr); - - /* Read the expression on the right side of the '=' */ - hie1 (&Expr2); - - /* Do type conversion if necessary */ - TypeConversion (&Expr2, ltype); - - /* If necessary, load the value into the primary register */ - LoadExpr (CF_NONE, &Expr2); - - /* Generate a store instruction */ - Store (Expr, 0); - } - /* Value is still in primary and not an lvalue */ - ED_MakeRValExpr (Expr); + /* Generate a store instruction */ + Store (Expr, 0); + + /* Value is in primary as an rvalue */ + ED_FinalizeRValLoad (Expr); +} + + + +void OpAssign (const GenDesc* Gen, ExprDesc* Expr, const char* Op) +/* Parse an "=" (if 'Gen' is 0) or "op=" operation */ +{ + const Type* ltype = Expr->Type; + + ExprDesc Expr2; + ED_Init (&Expr2); + Expr2.Flags |= Expr->Flags & E_MASK_KEEP_SUBEXPR; + + /* Only "=" accept struct/union */ + if (IsClassStruct (ltype) ? Gen != 0 : !IsClassScalar (ltype)) { + Error ("Invalid left operand for binary operator '%s'", Op); + /* Continue. Wrong code will be generated, but the compiler won't + ** break, so this is the best error recovery. + */ + } else { + /* Check for assignment to incomplete type */ + if (IsIncompleteESUType (ltype)) { + Error ("Assignment to incomplete type '%s'", GetFullTypeName (ltype)); + } else if (ED_IsRVal (Expr)) { + /* Assignment can only be used with lvalues */ + if (IsTypeArray (ltype)) { + Error ("Array type '%s' is not assignable", GetFullTypeName (ltype)); + } else if (IsTypeFunc (ltype)) { + Error ("Function type '%s' is not assignable", GetFullTypeName (ltype)); + } else { + Error ("Assignment to rvalue"); + } + } else if (IsQualConst (ltype)) { + /* Check for assignment to const */ + Error ("Assignment to const"); + } + } + + /* Skip the '=' or 'op=' token */ + NextToken (); + + /* cc65 does not have full support for handling structs or unions. Since + ** assigning structs is one of the more useful operations from this family, + ** allow it here. + ** Note: IsClassStruct() is also true for union types. + */ + if (IsClassStruct (ltype)) { + /* Copy the struct or union by value */ + CopyStruct (Expr, &Expr2); + } else if (IsTypeFragBitField (ltype)) { + /* Special care is needed for bit-fields if they don't fit in full bytes */ + OpAssignBitField (Gen, Expr, Op); + } else { + /* Normal straight 'op=' */ + OpAssignArithmetic (Gen, Expr, Op); + } + + /* Expression has had side effects */ + Expr->Flags |= E_SIDE_EFFECTS; + + /* Propagate viral flags */ + ED_PropagateFrom (Expr, &Expr2); +} + + + +void OpAddSubAssign (const GenDesc* Gen, ExprDesc *Expr, const char* Op) +/* Parse a "+=" or "-=" operation */ +{ + ExprDesc Expr2; + unsigned lflags; + unsigned rflags; + int MustScale; + + /* We currently only handle non-bit-fields in some addressing modes here */ + if (IsTypeBitField (Expr->Type) || ED_IsLocPrimaryOrExpr (Expr)) { + /* Use generic routine instead */ + OpAssign (Gen, Expr, Op); + return; + } + + /* There must be an integer or pointer on the left side */ + if (!IsClassInt (Expr->Type) && !IsTypePtr (Expr->Type)) { + Error ("Invalid left operand for binary operator '%s'", Op); + /* Continue. Wrong code will be generated, but the compiler won't + ** break, so this is the best error recovery. + */ + } else { + /* We must have an lvalue */ + if (ED_IsRVal (Expr)) { + Error ("Invalid lvalue in assignment"); + } else if (IsQualConst (Expr->Type)) { + /* The left side must not be const qualified */ + Error ("Assignment to const"); + } + } + + /* Skip the operator */ + NextToken (); + + /* Check if we have a pointer expression and must scale rhs */ + MustScale = IsTypePtr (Expr->Type); + + /* Initialize the code generator flags */ + lflags = 0; + rflags = 0; + + ED_Init (&Expr2); + Expr2.Flags |= Expr->Flags & E_MASK_KEEP_SUBEXPR; + + /* Evaluate the rhs. We expect an integer here, since float is not + ** supported + */ + hie1 (&Expr2); + if (!IsClassInt (Expr2.Type)) { + Error ("Invalid right operand for binary operator '%s'", Op); + /* Continue. Wrong code will be generated, but the compiler won't + ** break, so this is the best error recovery. + */ + } + + /* Setup the code generator flags */ + lflags |= TypeOf (Expr->Type) | GlobalModeFlags (Expr) | CF_FORCECHAR; + rflags |= TypeOf (Expr2.Type) | CF_FORCECHAR; + + if (ED_IsConstAbs (&Expr2)) { + /* The resulting value is a constant */ + rflags |= CF_CONST; + lflags |= CF_CONST; + + /* Scale it */ + if (MustScale) { + Expr2.IVal *= CheckedSizeOf (Indirect (Expr->Type)); + } + } else { + /* Not constant, load into the primary */ + LoadExpr (CF_NONE, &Expr2); + + /* Convert the type of the rhs to that of the lhs */ + g_typecast (lflags, rflags & ~CF_FORCECHAR); + + if (MustScale) { + /* lhs is a pointer, scale rhs */ + g_scale (TypeOf (Expr2.Type), CheckedSizeOf (Indirect (Expr->Type))); + } + } + + /* Output apropriate code depending on the location */ + switch (ED_GetLoc (Expr)) { + + case E_LOC_ABS: + case E_LOC_GLOBAL: + case E_LOC_STATIC: + case E_LOC_REGISTER: + case E_LOC_LITERAL: + case E_LOC_CODE: + /* Absolute numeric addressed variable, global variable, local + ** static variable, register variable, pooled literal or code + ** label location. + */ + if (Gen->Tok == TOK_PLUS_ASSIGN) { + g_addeqstatic (lflags, Expr->Name, Expr->IVal, Expr2.IVal); + } else { + g_subeqstatic (lflags, Expr->Name, Expr->IVal, Expr2.IVal); + } + break; + + case E_LOC_STACK: + /* Value on the stack */ + if (Gen->Tok == TOK_PLUS_ASSIGN) { + g_addeqlocal (lflags, Expr->IVal, Expr2.IVal); + } else { + g_subeqlocal (lflags, Expr->IVal, Expr2.IVal); + } + break; + + default: + Internal ("Invalid location in Store(): 0x%04X", ED_GetLoc (Expr)); + } + + /* Expression is an rvalue in the primary now */ + ED_FinalizeRValLoad (Expr); + + /* Expression has had side effects */ + Expr->Flags |= E_SIDE_EFFECTS; + + /* Propagate viral flags */ + ED_PropagateFrom (Expr, &Expr2); } diff --git a/src/cc65/assignment.h b/src/cc65/assignment.h index 278c5ef72..6098118b4 100644 --- a/src/cc65/assignment.h +++ b/src/cc65/assignment.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2002-2004 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -43,14 +43,38 @@ +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +/* Whether to save/restore the original lhs or result value */ +enum { + OA_NEED_NONE, + OA_NEED_OLD, + OA_NEED_NEW, +}; + +/* Forward */ +struct GenDesc; + + + /*****************************************************************************/ /* Code */ /*****************************************************************************/ -void Assignment (ExprDesc* lval); -/* Parse an assignment */ +void DoIncDecBitField (ExprDesc* Expr, long Val, unsigned KeepResult); +/* Process inc/dec for bit-field */ + +void OpAssign (const struct GenDesc* Gen, ExprDesc* lval, const char* Op); +/* Parse an "=" (if 'Gen' is 0) or "op=" operation */ + +void OpAddSubAssign (const struct GenDesc* Gen, ExprDesc *Expr, const char* Op); +/* Parse a "+=" or "-=" operation */ diff --git a/src/cc65/casenode.c b/src/cc65/casenode.c index f5e751f08..e7da64995 100644 --- a/src/cc65/casenode.c +++ b/src/cc65/casenode.c @@ -95,7 +95,7 @@ void FreeCaseNodeColl (Collection* Nodes) int SearchCaseNode (const Collection* Nodes, unsigned char Key, int* Index) /* Search for a node in the given collection. If the node has been found, ** set Index to the index of the node and return true. If the node was not -** found, set Index the the insertion position of the node and return +** found, set Index the insertion position of the node and return ** false. */ { diff --git a/src/cc65/casenode.h b/src/cc65/casenode.h index aef546f19..df80e62fd 100644 --- a/src/cc65/casenode.h +++ b/src/cc65/casenode.h @@ -116,7 +116,7 @@ void FreeCaseNodeColl (Collection* Nodes); int SearchCaseNode (const Collection* Nodes, unsigned char Key, int* Index); /* Search for a node in the given collection. If the node has been found, ** set Index to the index of the node and return true. If the node was not -** found, set Index the the insertion position of the node and return +** found, set Index to the insertion position of the node and return ** false. */ diff --git a/src/cc65/codeent.c b/src/cc65/codeent.c index 729248e95..928815934 100644 --- a/src/cc65/codeent.c +++ b/src/cc65/codeent.c @@ -33,6 +33,8 @@ +#include <errno.h> +#include <limits.h> #include <stdlib.h> /* common */ @@ -43,13 +45,16 @@ #include "xsprintf.h" /* cc65 */ +#include "asmlabel.h" #include "codeent.h" #include "codeinfo.h" +#include "codelab.h" #include "error.h" #include "global.h" -#include "codelab.h" +#include "ident.h" #include "opcodes.h" #include "output.h" +#include "reginfo.h" @@ -94,42 +99,11 @@ static char* GetArgCopy (const char* Arg) -static int NumArg (const char* Arg, unsigned long* Num) -/* If the given argument is numerical, convert it and return true. Otherwise -** set Num to zero and return false. -*/ +static void FreeParsedArg (char* ArgBase) +/* Free a code entry parsed argument */ { - char* End; - unsigned long Val; - - /* Determine the base */ - int Base = 10; - if (*Arg == '$') { - ++Arg; - Base = 16; - } else if (*Arg == '%') { - ++Arg; - Base = 2; - } - - /* Convert the value. strtol is not exactly what we want here, but it's - ** cheap and may be replaced by something fancier later. - */ - Val = strtoul (Arg, &End, Base); - - /* Check if the conversion was successful */ - if (*End != '\0') { - - /* Could not convert */ - *Num = 0; - return 0; - - } else { - - /* Conversion ok */ - *Num = Val; - return 1; - + if (ArgBase != 0 && ArgBase != EmptyArg) { + xfree (ArgBase); } } @@ -198,6 +172,10 @@ static void SetUseChgInfo (CodeEntry* E, const OPCDesc* D) if (Info && Info->ByteUse != REG_NONE) { /* These addressing modes will never change the zp loc */ E->Use |= Info->WordUse; + + if ((E->Use & REG_SP) != 0) { + E->Use |= SLV_IND; + } } break; @@ -205,6 +183,145 @@ static void SetUseChgInfo (CodeEntry* E, const OPCDesc* D) /* Keep gcc silent */ break; } + + /* Append processor flags as well as special usages */ + switch (E->OPC) { + + case OP65_ADC: + case OP65_SBC: + E->Use |= PSTATE_C; + E->Chg |= PSTATE_CZVN; + break; + case OP65_ROL: + case OP65_ROR: + E->Use |= PSTATE_C; + E->Chg |= PSTATE_CZN; + break; + case OP65_ASL: + case OP65_LSR: + E->Chg |= PSTATE_CZN; + break; + case OP65_CMP: + case OP65_CPX: + case OP65_CPY: + E->Chg |= PSTATE_CZN; + break; + case OP65_BIT: + E->Chg |= PSTATE_ZVN; + if (E->AM != AM65_IMM) { + E->Chg &= ~(PSTATE_V | PSTATE_N); + } + break; + case OP65_BRK: + E->Chg |= PSTATE_B; + break; + case OP65_CLC: + case OP65_SEC: + E->Chg |= PSTATE_C; + break; + case OP65_CLD: + case OP65_SED: + E->Chg |= PSTATE_D; + break; + case OP65_CLI: + case OP65_SEI: + E->Chg |= PSTATE_I; + break; + case OP65_CLV: + E->Chg |= PSTATE_V; + break; + case OP65_TRB: + case OP65_TSB: + E->Chg |= PSTATE_Z; + break; + case OP65_BCC: + case OP65_BCS: + case OP65_JCC: + case OP65_JCS: + E->Use |= PSTATE_C; + break; + case OP65_BEQ: + case OP65_BNE: + case OP65_JEQ: + case OP65_JNE: + E->Use |= PSTATE_Z; + break; + case OP65_BMI: + case OP65_BPL: + case OP65_JMI: + case OP65_JPL: + E->Use |= PSTATE_N; + break; + case OP65_BVC: + case OP65_BVS: + case OP65_JVC: + case OP65_JVS: + E->Use |= PSTATE_V; + break; + case OP65_BRA: + case OP65_JMP: + break; + case OP65_AND: + case OP65_EOR: + case OP65_ORA: + case OP65_DEA: + case OP65_DEC: + case OP65_DEX: + case OP65_DEY: + case OP65_INA: + case OP65_INC: + case OP65_INX: + case OP65_INY: + case OP65_LDA: + case OP65_LDX: + case OP65_LDY: + case OP65_TAX: + case OP65_TAY: + case OP65_TXA: + case OP65_TYA: + E->Chg |= PSTATE_ZN; + break; + case OP65_TSX: + E->Use |= SLV_SP65; + E->Chg |= PSTATE_ZN; + break; + case OP65_TXS: + E->Chg |= SLV_SP65; + break; + case OP65_PLA: + case OP65_PLX: + case OP65_PLY: + E->Use |= SLV_SP65; + E->Chg |= SLV_PL65 | PSTATE_ZN; + break; + case OP65_PLP: + E->Use |= SLV_SP65; + E->Chg |= SLV_PL65 | PSTATE_ALL; + break; + case OP65_PHA: + case OP65_PHX: + case OP65_PHY: + E->Use |= SLV_SP65; + E->Chg |= SLV_PH65; + break; + case OP65_PHP: + E->Use |= SLV_SP65 | PSTATE_ALL; + E->Chg |= SLV_PH65; + break; + case OP65_RTI: + E->Chg |= PSTATE_ALL; + break; + case OP65_RTS: + break; + case OP65_STA: + case OP65_STX: + case OP65_STY: + case OP65_STZ: + case OP65_JSR: + case OP65_NOP: + default: + break; + } } } @@ -216,6 +333,244 @@ static void SetUseChgInfo (CodeEntry* E, const OPCDesc* D) +int ParseOpcArgStr (const char* Arg, unsigned short* ArgInfo, struct StrBuf* Name, long* Offset) +/* Break the opcode argument string into a symbol name/label part plus an offset. +** Both parts are optional, but if there are any characters in the string that +** can't be parsed, it's an failure. +** The caller is responsible for managing the StrBuf. +** Return whether parsing succeeds or not. +*/ +{ + unsigned short Flags = 0; + const char* OffsetPart = 0; + const char* NameEnd = 0; + int Negative = 0; + int Parentheses = 0; + unsigned long NumVal = 0; + long long AccOffset = 0; + char* End; /* Used for checking errors */ + + if (ArgInfo != 0) { + *ArgInfo = 0; + } + *Offset = 0; + + /* A numeric address is treated as an unnamed address with the numeric part as the offset */ + if (IsDigit (Arg[0]) || Arg[0] == '$') { + /* A call to a numeric address */ + SB_Clear (Name); + SB_Terminate (Name); + OffsetPart = Arg; + } else { + /* <, >, ^ */ + if (Arg[0] == '<') { + Flags |= AIF_LOBYTE; + } else if (Arg[0] == '>') { + Flags |= AIF_HIBYTE; + } else if (Arg[0] == '^') { + Flags |= AIF_BANKBYTE; + } + + if ((Flags & (AIF_FAR)) != 0) { + /* Skip this char */ + ++Arg; + } + + /* Skip spaces */ + while (Arg[0] == ' ') { + ++Arg; + } + + /* Strip parentheses off if exist */ + if (Arg[0] == '(') { + /* Skip this char */ + ++Arg; + + End = strchr (Arg, ')'); + if (End == 0 || End[1] != '\0') { + /* Not closed at the end, bail out */ + *Offset = 0; + if (ArgInfo != 0) { + *ArgInfo = Flags | AIF_FAILURE; + } + return 0; + } + + /* Found */ + Parentheses = 1; + + /* Skip spaces */ + while (Arg[0] == ' ') { + ++Arg; + } + } + + /* If the symbol name starts with an underline, it is an external symbol. + ** If the symbol does not start with an underline, it may be a built-in + ** symbol. + */ + if (Arg[0] == '_') { + Flags |= AIF_EXTERNAL; + } else { + Flags |= AIF_BUILTIN; + } + + /* Rip off the offset if present. */ + OffsetPart = strchr (Arg, '+'); + if (OffsetPart == 0) { + OffsetPart = strchr (Arg, '-'); + } + + if (OffsetPart != 0) { + /* Get the real arg name */ + NameEnd = strchr (Arg, ' '); + if (NameEnd == 0 || NameEnd > OffsetPart) { + NameEnd = OffsetPart; + } + SB_CopyBuf (Name, Arg, NameEnd - Arg); + SB_Terminate (Name); + + } else { + /* No offset */ + if (Parentheses == 0) { + SB_CopyStr (Name, Arg); + } else { + SB_CopyBuf (Name, Arg, End - Arg); + } + SB_Terminate (Name); + } + + if ((Flags & AIF_EXTERNAL) == 0) { + if (SB_GetLen (Name) > 0) { + Flags |= AIF_HAS_NAME; + + /* See if the name is a local label */ + if (IsLocalLabelName (SB_GetConstBuf (Name))) { + Flags |= AIF_LOCAL; + } + } + + } else { + if (SB_GetLen (Name) <= 0) { + /* Invalid external name */ + Flags &= ~AIF_EXTERNAL; + *Offset = 0; + if (ArgInfo != 0) { + *ArgInfo = Flags | AIF_FAILURE; + } + return 0; + } + Flags |= AIF_HAS_NAME; + } + + /* A byte size expression with no parentheses but an offset is not + ** handled correctly for now, so just bail out in such cases. + */ + if ((Flags & AIF_FAR) != 0 && + Parentheses == 0 && + OffsetPart != 0 && + OffsetPart[0] != '\0') { + /* Bail out */ + *Offset = 0; + if (ArgInfo != 0) { + *ArgInfo = Flags | AIF_FAILURE; + } + return 0; + } + } + + /* Get the offset */ + while (OffsetPart != 0 && + OffsetPart[0] != '\0' && + OffsetPart[0] != ')') { + /* Skip spaces */ + while (OffsetPart[0] == ' ') { + ++OffsetPart; + } + + Negative = 0; + if (OffsetPart[0] == '+') { + ++OffsetPart; + } else if (OffsetPart[0] == '-') { + Negative = 1; + ++OffsetPart; + } + + /* Skip spaces */ + while (OffsetPart[0] == ' ') { + ++OffsetPart; + } + + /* Determine the base and convert the value. strtol/strtoul is not + ** exactly what we want here, but it's cheap and may be replaced by + ** something fancier later. + */ + if (OffsetPart[0] == '$') { + /* Base 16 hexedemical */ + NumVal = strtoul (OffsetPart+1, &End, 16); + } else if (OffsetPart[0] != '%') { + /* Base 10 decimal */ + NumVal = strtoul (OffsetPart, &End, 10); + } else { + /* Base 2 binary */ + NumVal = strtoul (OffsetPart+1, &End, 2); + } + + /* Check if the conversion was successful */ + if (*End != '\0' && *End != ' ' && *End != '+' && *End != '-' && *End != ')') { + /* Could not convert */ + *Offset = 0; + if (ArgInfo != 0) { + *ArgInfo = Flags | AIF_FAILURE; + } + return 0; + } + + /* Check for out of range result */ + if (NumVal == ULONG_MAX && errno == ERANGE) { + /* Could not convert */ + *Offset = 0; + if (ArgInfo != 0) { + *ArgInfo = Flags | AIF_FAILURE; + } + return 0; + } + + /* This argument does have an offset */ + Flags |= AIF_HAS_OFFSET; + + if (Negative) { + AccOffset -= (long long)NumVal; + } else { + AccOffset += (long long)NumVal; + } + + /* See if there are more */ + Arg = OffsetPart; + OffsetPart = strchr (Arg, '+'); + if (OffsetPart == 0) { + OffsetPart = strchr (Arg, '-'); + } + } + + if (AccOffset > LONG_MAX || AccOffset < LONG_MIN) { + /* Could not convert */ + *Offset = 0; + if (ArgInfo != 0) { + *ArgInfo = Flags | AIF_FAILURE; + } + return 0; + } + *Offset = (long)AccOffset; + if (ArgInfo != 0) { + *ArgInfo = Flags & ~AIF_FAILURE; + } + + return 1; +} + + + const char* MakeHexArg (unsigned Num) /* Convert Num into a string in the form $XY, suitable for passing it as an ** argument to NewCodeEntry, and return a pointer to the string. @@ -231,6 +586,34 @@ const char* MakeHexArg (unsigned Num) +void PreparseArg (CodeEntry* E) +/* Parse the argument string and memorize the result for the code entry */ +{ + StrBuf B = AUTO_STRBUF_INITIALIZER; + + /* Parse the argument string */ + if (ParseOpcArgStr (E->Arg, &E->ArgInfo, &B, &E->ArgOff)) { + E->ArgBase = SB_GetBuf (&B); + + if ((E->ArgInfo & (AIF_HAS_NAME | AIF_HAS_OFFSET)) == AIF_HAS_OFFSET) { + E->Flags |= CEF_NUMARG; + + /* Use the new numerical value */ + E->Num = E->ArgOff; + } + + } else { + /* Parsing fails. Issue an error/warning so that this could be spotted and fixed. */ + E->ArgBase = EmptyArg; + SB_Done (&B); + if (Debug) { + Warning ("Parsing argument \"%s\" failed!", E->Arg); + } + } +} + + + CodeEntry* NewCodeEntry (opc_t OPC, am_t AM, const char* Arg, CodeLabel* JumpTo, LineInfo* LI) /* Create a new code entry, initialize and return it */ @@ -242,15 +625,24 @@ CodeEntry* NewCodeEntry (opc_t OPC, am_t AM, const char* Arg, CodeEntry* E = xmalloc (sizeof (CodeEntry)); /* Initialize the fields */ - E->OPC = D->OPC; - E->AM = AM; - E->Size = GetInsnSize (E->OPC, E->AM); - E->Arg = GetArgCopy (Arg); - E->Flags = NumArg (E->Arg, &E->Num)? CEF_NUMARG : 0; /* Needs E->Arg */ - E->Info = D->Info; - E->JumpTo = JumpTo; - E->LI = UseLineInfo (LI); - E->RI = 0; + E->OPC = D->OPC; + E->AM = AM; + E->Size = GetInsnSize (E->OPC, E->AM); + E->Arg = GetArgCopy (Arg); + E->Flags = 0; + E->Info = D->Info; + E->ArgInfo = 0; + E->JumpTo = JumpTo; + E->LI = UseLineInfo (LI); + E->RI = 0; + + /* Parse the argument string if it's given */ + if (Arg == 0 || Arg[0] == '\0') { + E->ArgBase = EmptyArg; + } else { + PreparseArg (E); + } + SetUseChgInfo (E, D); InitCollection (&E->Labels); @@ -268,6 +660,9 @@ CodeEntry* NewCodeEntry (opc_t OPC, am_t AM, const char* Arg, void FreeCodeEntry (CodeEntry* E) /* Free the given code entry */ { + /* Free the argument base string if we have one */ + FreeParsedArg (E->ArgBase); + /* Free the string argument if we have one */ FreeArg (E->Arg); @@ -332,9 +727,8 @@ void CE_ClearJumpTo (CodeEntry* E) /* Clear the JumpTo entry */ E->JumpTo = 0; - /* Clear the argument and assign the empty one */ - FreeArg (E->Arg); - E->Arg = EmptyArg; + /* Clear the argument */ + CE_SetArg (E, 0); } @@ -353,13 +747,106 @@ void CE_MoveLabel (CodeLabel* L, CodeEntry* E) void CE_SetArg (CodeEntry* E, const char* Arg) -/* Replace the argument by the new one. */ +/* Replace the whole argument by the new one. */ { + /* Free the old parsed argument base */ + FreeParsedArg (E->ArgBase); + /* Free the old argument */ FreeArg (E->Arg); /* Assign the new one */ E->Arg = GetArgCopy (Arg); + + /* Parse the new argument string */ + PreparseArg (E); + + /* Update the Use and Chg in E */ + SetUseChgInfo (E, GetOPCDesc (E->OPC)); +} + + + +void CE_SetArgBaseAndOff (CodeEntry* E, const char* ArgBase, long ArgOff) +/* Replace the new argument base and offset. Argument base is always applied. +** Argument offset is applied if and only if E has the AIF_HAS_OFFSET flag set. +*/ +{ + if (ArgBase != 0 && ArgBase[0] != '\0') { + + /* The argument base is not blank */ + char Buf[IDENTSIZE + 16]; + char* Str = Buf; + size_t Len = strlen (ArgBase) + 16; + if (Len >= sizeof (Buf)) { + Str = xmalloc (Len); + } + + if ((E->ArgInfo & AIF_FAR) == 0) { + if (CE_HasArgOffset (E)) { + sprintf (Str, "%s%+ld", ArgBase, ArgOff); + } else { + sprintf (Str, "%s", ArgBase); + } + CE_SetArg (E, Str); + } else { + /* A byte expression */ + const char* Expr = ""; + if ((E->ArgInfo & AIF_FAR) == AIF_LOBYTE) { + Expr = "<"; + } else if ((E->ArgInfo & AIF_FAR) == AIF_HIBYTE) { + Expr = ">"; + } else if ((E->ArgInfo & AIF_FAR) == AIF_BANKBYTE) { + Expr = "^"; + } else { + Internal ("Invalid byte size flag in CE_SetArgBaseAndOff"); + } + + if (CE_HasArgOffset (E)) { + sprintf (Str, "%s(%s%+ld)", Expr, ArgBase, ArgOff); + } else { + sprintf (Str, "%s(%s)", Expr, ArgBase); + } + } + + CE_SetArg (E, Str); + + if (Str != Buf) { + xfree (Str); + } + + } else { + /* The argument has no base */ + if ((E->ArgInfo & AIF_HAS_OFFSET) != 0) { + /* This is a numeric argument */ + E->Flags |= CEF_NUMARG; + CE_SetNumArg (E, ArgOff); + } else { + /* Empty argument */ + CE_SetArg (E, EmptyArg); + } + } +} + + + +void CE_SetArgBase (CodeEntry* E, const char* ArgBase) +/* Replace the argument base by the new one. +** The entry must have an existing base. +*/ +{ + /* Check that the entry has a base name */ + CHECK (CE_HasArgBase (E)); + + CE_SetArgBaseAndOff (E, ArgBase, E->ArgOff); +} + + + +void CE_SetArgOffset (CodeEntry* E, long ArgOff) +/* Replace the argument offset by the new one */ +{ + CE_SetArgBaseAndOff (E, E->ArgBase, ArgOff); } @@ -372,24 +859,45 @@ void CE_SetNumArg (CodeEntry* E, long Num) char Buf[16]; /* Check that the entry has a numerical argument */ - CHECK (E->Flags & CEF_NUMARG); + CHECK (CE_HasNumArg (E)); /* Make the new argument string */ if (E->Size == 2) { Num &= 0xFF; xsprintf (Buf, sizeof (Buf), "$%02X", (unsigned) Num); - } else if (E->Size == 3) { + } else if (E->Size == 3 || E->Size == 5) { Num &= 0xFFFF; xsprintf (Buf, sizeof (Buf), "$%04X", (unsigned) Num); } else { Internal ("Invalid instruction size in CE_SetNumArg"); } - /* Replace the argument by the new one */ + /* Replace the whole argument by the new one */ CE_SetArg (E, Buf); +} - /* Use the new numerical value */ - E->Num = Num; + + +int CE_IsArgStrParsed (const CodeEntry* E) +/* Return true if the argument of E was successfully parsed last time */ +{ + return (E->ArgInfo & AIF_FAILURE) == 0; +} + + + +int CE_HasArgBase (const CodeEntry* E) +/* Return true if the argument of E has a non-blank base name */ +{ + return (E->ArgInfo & AIF_HAS_NAME) != 0 && E->ArgBase[0] != '\0'; +} + + + +int CE_HasArgOffset (const CodeEntry* E) +/* Return true if the argument of E has a non-zero offset */ +{ + return (E->ArgInfo & AIF_HAS_OFFSET) != 0 && E->ArgOff != 0; } @@ -472,6 +980,11 @@ int CE_UseLoadFlags (CodeEntry* E) } } + /* PHP will use all flags */ + if (E->OPC == OP65_PHP) { + return 1; + } + /* Anything else */ return 0; } @@ -489,6 +1002,228 @@ void CE_FreeRegInfo (CodeEntry* E) +static void DeduceZ (RegContents* C, short Val) +/* Auto-set Z flag */ +{ + if (RegValIsUnknown (Val)) { + C->PFlags |= UNKNOWN_PFVAL_Z; + } else { + C->PFlags &= ~UNKNOWN_PFVAL_Z; + if (Val == 0) { + C->PFlags |= PFVAL_Z; + } + } +} + + + +static void DeduceZN (RegContents* C, short Val) +/* Auto-set Z/N flags */ +{ + if (RegValIsUnknown (Val)) { + C->PFlags |= UNKNOWN_PFVAL_ZN; + } else { + C->PFlags &= ~UNKNOWN_PFVAL_ZN; + if (Val == 0) { + C->PFlags |= PFVAL_Z; + } else if (Val & PFVAL_N) { + C->PFlags |= PFVAL_N; + } + } +} + + + +static short KnownOpADCDeduceCZVN (RegContents* Out, RegContents* In, short Rhs) +/* Do the ADC and auto-set C/Z/V/N flags. +** Both operands and the C flag must be known. +*/ +{ + short SVal, UVal; + SVal = (signed char)(In->RegA & 0xFF) + (signed char)(Rhs & 0xFF); + UVal = (In->RegA & 0xFF) + (Rhs & 0xFF); + if (In->PFlags & PFVAL_C) { + ++SVal; + ++UVal; + } + + Out->PFlags &= ~UNKNOWN_PFVAL_CZVN; + if (UVal > 0xFF) { + Out->PFlags |= PFVAL_C; + } + + if (SVal < -128 || SVal > 127) { + Out->PFlags |= PFVAL_V; + } + + DeduceZN (Out, UVal); + + return UVal; +} + + + +static short KnownOpSBCDeduceCZVN (RegContents* Out, RegContents* In, short Rhs) +/* Do the SBC and auto-set C/Z/V/N flags. +** Both operands and the C flag must be known. +*/ +{ + short SVal, UVal; + SVal = (signed char)(In->RegA & 0xFF) - (signed char)(Rhs & 0xFF); + UVal = (In->RegA & 0xFF) - (Rhs & 0xFF); + if ((In->PFlags & PFVAL_C) == 0) { + --SVal; + --UVal; + } + + Out->PFlags &= ~UNKNOWN_PFVAL_CZVN; + if (UVal >= 0) { + Out->PFlags |= PFVAL_C; + } + + if (SVal < -128 || SVal > 127) { + Out->PFlags |= PFVAL_V; + } + + DeduceZN (Out, UVal); + + return UVal; +} + + + +static short KnownOpCmpDeduceCZN (RegContents* C, short Lhs, short Rhs) +/* Do the CMP and auto-set C/Z/N flags. +** Both operands must be known. + */ +{ + short Val = (Lhs & 0xFF) - (Rhs & 0xFF); + + C->PFlags &= ~UNKNOWN_PFVAL_C; + if (Val >= 0) { + C->PFlags |= PFVAL_C; + } + DeduceZN (C, Val); + + return Val; +} + + + +static short AnyOpASLDeduceCZN (RegContents* C, short Shiftee) +/* Do the ASL and auto-set C/Z/N flags */ +{ + if (RegValIsKnown (Shiftee)) { + C->PFlags &= ~UNKNOWN_PFVAL_C; + if (Shiftee & 0x80U) { + C->PFlags |= PFVAL_C; + } + Shiftee = (Shiftee << 1) & 0xFF; + } + DeduceZN (C, Shiftee); + + return Shiftee; +} + + + +static short AnyOpLSRDeduceCZN (RegContents* C, short Shiftee) +/* Do the LSR and auto-set C/Z/N flags */ +{ + if (RegValIsKnown (Shiftee)) { + C->PFlags &= ~UNKNOWN_PFVAL_C; + if (Shiftee & 0x01U) { + C->PFlags |= PFVAL_C; + } + Shiftee = (Shiftee >> 1) & 0xFF; + } + DeduceZN (C, Shiftee); + + return Shiftee; +} + + + +static short AnyOpROLDeduceCZN (RegContents* C, short PFlags, short Shiftee) +/* Do the ROL and auto-set C/Z/N flags */ +{ + if (RegValIsKnown (Shiftee) && PStatesAreKnown (PFlags, PSTATE_C)) { + C->PFlags &= ~UNKNOWN_PFVAL_C; + if (Shiftee & 0x80U) { + C->PFlags |= PFVAL_C; + } + Shiftee = (Shiftee << 1) & 0xFF; + if (PFlags & PFVAL_C) { + Shiftee |= 0x01U; + } + } else { + Shiftee = UNKNOWN_REGVAL; + } + DeduceZN (C, Shiftee); + + return Shiftee; +} + + + +static short AnyOpRORDeduceCZN (RegContents* C, short PFlags, short Shiftee) +/* Do the ROR and auto-set C/Z/N flags */ +{ + if (RegValIsKnown (Shiftee) && PStatesAreKnown (PFlags, PSTATE_C)) { + C->PFlags &= ~UNKNOWN_PFVAL_C; + if (Shiftee & 0x01U) { + C->PFlags |= PFVAL_C; + } + Shiftee = (Shiftee >> 1) & 0xFF; + if (PFlags & PFVAL_C) { + Shiftee |= 0x80U; + } + } else { + Shiftee = UNKNOWN_REGVAL; + } + DeduceZN (C, Shiftee); + + return Shiftee; +} + + + +static void BranchDeduceOnProcessorFlag (RegContents* True, RegContents* False, unsigned short PTrueFlag) +/* Auto-set the corresponding C/Z/V/N flag output for both True/Flase code flows */ +{ + PTrueFlag &= 0xFF; + unsigned short Mask = ~(PTrueFlag * 0x0101U) & 0xFFFFU; + True->PFlags &= Mask; + True->PFlags |= PTrueFlag; + False->PFlags &= Mask; +} + + + +static int MightAffectKnownZP (CodeEntry* E, RegContents* In) +/* TODO: This is supposed to check if any builtin ZP could be affected. +** It simply returns TRUE in most cases for now. +*/ +{ + unsigned Index = 0; + + if (E->AM == AM65_ZP || + E->AM == AM65_ABS || + (E->AM == AM65_ZPX && RegValIsKnown (In->RegX) && (Index = In->RegX & 0xFF)) || + (E->AM == AM65_ZPY && RegValIsKnown (In->RegY) && (Index = In->RegY & 0xFF)) || + (E->AM == AM65_ABSX && RegValIsKnown (In->RegX) && (Index = In->RegX & 0xFF)) || + (E->AM == AM65_ABSY && RegValIsKnown (In->RegY) && (Index = In->RegY & 0xFF))) { + return 1; + } else if ((E->AM == AM65_ZP_IND) || + (E->AM == AM65_ZPX_IND && RegValIsKnown (In->RegX) && (Index = In->RegX & 0xFF)) || + (E->AM == AM65_ZP_INDY && RegValIsKnown (In->RegY) && (Index = In->RegY & 0xFF))) { + return 1; + } + return 1; +} + + + void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) /* Generate register info for this instruction. If an old info exists, it is ** overwritten. @@ -497,9 +1232,13 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) /* Pointers to the register contents */ RegContents* In; RegContents* Out; + RegContents* BranchOut; /* Function register usage */ - unsigned short Use, Chg; + unsigned Use, Chg; + + /* Value in question */ + short Val = UNKNOWN_REGVAL; /* If we don't have a register info struct, allocate one. */ if (E->RI == 0) { @@ -516,18 +1255,46 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) /* Get pointers to the register contents */ In = &E->RI->In; Out = &E->RI->Out; + BranchOut = &E->RI->Out2; /* Handle the different instructions */ switch (E->OPC) { case OP65_ADC: - /* We don't know the value of the carry, so the result is - ** always unknown. - */ Out->RegA = UNKNOWN_REGVAL; + Out->PFlags |= UNKNOWN_PFVAL_CZVN; + Out->ZNRegs = ZNREG_A; + if (PStatesAreKnown (In->PFlags, PSTATE_C) && + RegValIsKnown (In->RegA)) { + if (CE_IsConstImm (E)) { + Out->RegA = KnownOpADCDeduceCZVN (Out, In, (short) E->Num); + } else if (E->AM == AM65_ZP) { + switch (GetKnownReg (E->Use & REG_ZP, In)) { + case REG_TMP1: + Out->RegA = KnownOpADCDeduceCZVN (Out, In, In->Tmp1); + break; + case REG_PTR1_LO: + Out->RegA = KnownOpADCDeduceCZVN (Out, In, In->Ptr1Lo); + break; + case REG_PTR1_HI: + Out->RegA = KnownOpADCDeduceCZVN (Out, In, In->Ptr1Hi); + break; + case REG_SREG_LO: + Out->RegA = KnownOpADCDeduceCZVN (Out, In, In->SRegLo); + break; + case REG_SREG_HI: + Out->RegA = KnownOpADCDeduceCZVN (Out, In, In->SRegHi); + break; + default: + break; + } + } + } break; case OP65_AND: + Out->RegA = UNKNOWN_REGVAL; + Out->ZNRegs = ZNREG_A; if (RegValIsKnown (In->RegA)) { if (CE_IsConstImm (E)) { Out->RegA = In->RegA & (short) E->Num; @@ -549,145 +1316,315 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) Out->RegA = In->RegA & In->SRegHi; break; default: - Out->RegA = UNKNOWN_REGVAL; break; } - } else { - Out->RegA = UNKNOWN_REGVAL; } } else if (CE_IsKnownImm (E, 0)) { /* A and $00 does always give zero */ Out->RegA = 0; } + DeduceZN (Out, Out->RegA); break; case OP65_ASL: - if (E->AM == AM65_ACC && RegValIsKnown (In->RegA)) { - Out->RegA = (In->RegA << 1) & 0xFF; + Out->PFlags |= UNKNOWN_PFVAL_CZN; + Out->ZNRegs = ZNREG_NONE; + if (E->AM == AM65_ACC) { + Out->RegA = AnyOpASLDeduceCZN (Out, In->RegA); + Out->ZNRegs = ZNREG_A; } else if (E->AM == AM65_ZP) { switch (GetKnownReg (E->Chg & REG_ZP, In)) { case REG_TMP1: - Out->Tmp1 = (In->Tmp1 << 1) & 0xFF; + Out->Tmp1 = AnyOpASLDeduceCZN (Out, In->Tmp1); + Out->ZNRegs = ZNREG_TMP1; break; case REG_PTR1_LO: - Out->Ptr1Lo = (In->Ptr1Lo << 1) & 0xFF; + Out->Ptr1Lo = AnyOpASLDeduceCZN (Out, In->Ptr1Lo); + Out->ZNRegs = ZNREG_PTR1_LO; break; case REG_PTR1_HI: - Out->Ptr1Hi = (In->Ptr1Hi << 1) & 0xFF; + Out->Ptr1Hi = AnyOpASLDeduceCZN (Out, In->Ptr1Hi); + Out->ZNRegs = ZNREG_PTR1_HI; break; case REG_SREG_LO: - Out->SRegLo = (In->SRegLo << 1) & 0xFF; + Out->SRegLo = AnyOpASLDeduceCZN (Out, In->SRegLo); + Out->ZNRegs = ZNREG_SREG_LO; break; case REG_SREG_HI: - Out->SRegHi = (In->SRegHi << 1) & 0xFF; + Out->SRegHi = AnyOpASLDeduceCZN (Out, In->SRegHi); + Out->ZNRegs = ZNREG_SREG_HI; break; } - } else if (E->AM == AM65_ZPX) { + } else if (MightAffectKnownZP (E, In)) { /* Invalidates all ZP registers */ RC_InvalidateZP (Out); } break; case OP65_BCC: + BranchDeduceOnProcessorFlag (Out, BranchOut, PFVAL_C); break; case OP65_BCS: + BranchDeduceOnProcessorFlag (BranchOut, Out, PFVAL_C); break; case OP65_BEQ: + BranchDeduceOnProcessorFlag (BranchOut, Out, PFVAL_Z); break; case OP65_BIT: + Out->ZNRegs = ZNREG_NONE; + if (E->AM == AM65_ZP) { + switch (GetKnownReg (E->Chg & REG_ZP, In)) { + case REG_TMP1: + Val = In->Tmp1; + break; + case REG_PTR1_LO: + Val = In->Ptr1Lo; + break; + case REG_PTR1_HI: + Val = In->Ptr1Hi; + break; + case REG_SREG_LO: + Val = In->SRegLo; + break; + case REG_SREG_HI: + Val = In->SRegHi; + break; + } + } else if (CE_IsConstImm (E)) { + /* 65C02 special */ + Val = (short) E->Num; + } + + /* BIT is unique with regards to the Z/V/N flags: + ** - The Z is set/cleared according to whether the AND result is zero. + ** - The V is coped directly from Bit 6 of the orginal argument. + ** - The N is coped directly from Bit 7 of the orginal argument. + ** Note the V/N flags are not affected in imm addressing mode supported by 65c02! + */ + if (E->AM == AM65_IMM) { + if (RegValIsKnown (Val)) { + Out->PFlags &= ~(UNKNOWN_PFVAL_V | UNKNOWN_PFVAL_N); + if (Val & PFVAL_V) { + Out->PFlags |= PFVAL_V; + } + Out->PFlags &= ~UNKNOWN_PFVAL_V; + if (Val & PFVAL_V) { + Out->PFlags |= PFVAL_V; + } + } else { + Out->PFlags |= UNKNOWN_PFVAL_V | UNKNOWN_PFVAL_N; + } + } + if ((RegValIsKnown (Val) && RegValIsKnown (In->RegA))) { + Val &= In->RegA; + } else if (((RegValIsKnown (Val) && Val == 0) || + (RegValIsKnown (In->RegA) && In->RegA == 0))) { + Val = 0; + } + DeduceZ (Out, Val); break; case OP65_BMI: + BranchDeduceOnProcessorFlag (BranchOut, Out, PFVAL_N); break; case OP65_BNE: + BranchDeduceOnProcessorFlag (Out, BranchOut, PFVAL_Z); break; case OP65_BPL: + BranchDeduceOnProcessorFlag (Out, BranchOut, PFVAL_N); break; case OP65_BRA: break; case OP65_BRK: + Out->PFlags &= ~UNKNOWN_PFVAL_B; + Out->PFlags |= PFVAL_B; break; case OP65_BVC: + BranchDeduceOnProcessorFlag (Out, BranchOut, PFVAL_V); break; case OP65_BVS: + BranchDeduceOnProcessorFlag (BranchOut, Out, PFVAL_V); break; case OP65_CLC: + Out->PFlags &= ~UNKNOWN_PFVAL_C; break; case OP65_CLD: + Out->PFlags &= ~UNKNOWN_PFVAL_D; break; case OP65_CLI: + Out->PFlags &= ~UNKNOWN_PFVAL_I; break; case OP65_CLV: + Out->PFlags &= ~UNKNOWN_PFVAL_V; break; case OP65_CMP: + Out->PFlags |= UNKNOWN_PFVAL_CZN; + Out->ZNRegs = ZNREG_NONE; + if (RegValIsKnown (In->RegA)) { + if (CE_IsConstImm (E)) { + KnownOpCmpDeduceCZN (Out, In->RegA, (short)E->Num); + } else if (E->AM == AM65_ZP) { + switch (GetKnownReg (E->Use & REG_ZP, In)) { + case REG_TMP1: + KnownOpCmpDeduceCZN (Out, In->RegA, In->Tmp1); + break; + case REG_PTR1_LO: + KnownOpCmpDeduceCZN (Out, In->RegA, In->Ptr1Lo); + break; + case REG_PTR1_HI: + KnownOpCmpDeduceCZN (Out, In->RegA, In->Ptr1Hi); + break; + case REG_SREG_LO: + KnownOpCmpDeduceCZN (Out, In->RegA, In->SRegLo); + break; + case REG_SREG_HI: + KnownOpCmpDeduceCZN (Out, In->RegA, In->SRegHi); + break; + default: + break; + } + } + } break; case OP65_CPX: + Out->PFlags |= UNKNOWN_PFVAL_CZN; + Out->ZNRegs = ZNREG_NONE; + if (RegValIsKnown (In->RegX)) { + if (CE_IsConstImm (E)) { + KnownOpCmpDeduceCZN (Out, In->RegX, (short)E->Num); + } else if (E->AM == AM65_ZP) { + switch (GetKnownReg (E->Use & REG_ZP, In)) { + case REG_TMP1: + KnownOpCmpDeduceCZN (Out, In->RegX, In->Tmp1); + break; + case REG_PTR1_LO: + KnownOpCmpDeduceCZN (Out, In->RegX, In->Ptr1Lo); + break; + case REG_PTR1_HI: + KnownOpCmpDeduceCZN (Out, In->RegX, In->Ptr1Hi); + break; + case REG_SREG_LO: + KnownOpCmpDeduceCZN (Out, In->RegX, In->SRegLo); + break; + case REG_SREG_HI: + KnownOpCmpDeduceCZN (Out, In->RegX, In->SRegHi); + break; + default: + break; + } + } + } break; case OP65_CPY: + Out->PFlags |= UNKNOWN_PFVAL_CZN; + Out->ZNRegs = ZNREG_NONE; + if (RegValIsKnown (In->RegY)) { + if (CE_IsConstImm (E)) { + KnownOpCmpDeduceCZN (Out, In->RegY, (short)E->Num); + } else if (E->AM == AM65_ZP) { + switch (GetKnownReg (E->Use & REG_ZP, In)) { + case REG_TMP1: + KnownOpCmpDeduceCZN (Out, In->RegY, In->Tmp1); + break; + case REG_PTR1_LO: + KnownOpCmpDeduceCZN (Out, In->RegY, In->Ptr1Lo); + break; + case REG_PTR1_HI: + KnownOpCmpDeduceCZN (Out, In->RegY, In->Ptr1Hi); + break; + case REG_SREG_LO: + KnownOpCmpDeduceCZN (Out, In->RegY, In->SRegLo); + break; + case REG_SREG_HI: + KnownOpCmpDeduceCZN (Out, In->RegY, In->SRegHi); + break; + default: + break; + } + } + } break; case OP65_DEA: + Out->ZNRegs = ZNREG_A; if (RegValIsKnown (In->RegA)) { Out->RegA = (In->RegA - 1) & 0xFF; } + DeduceZN (Out, Out->RegA); break; case OP65_DEC: - if (E->AM == AM65_ACC && RegValIsKnown (In->RegA)) { - Out->RegA = (In->RegA - 1) & 0xFF; + Out->ZNRegs = ZNREG_NONE; + if (E->AM == AM65_ACC) { + if (RegValIsKnown (In->RegA)) { + Val = Out->RegA = (In->RegA - 1) & 0xFF; + } + Out->ZNRegs = ZNREG_A; } else if (E->AM == AM65_ZP) { switch (GetKnownReg (E->Chg & REG_ZP, In)) { case REG_TMP1: - Out->Tmp1 = (In->Tmp1 - 1) & 0xFF; + Val = Out->Tmp1 = (In->Tmp1 - 1) & 0xFF; + Out->ZNRegs = ZNREG_TMP1; break; case REG_PTR1_LO: - Out->Ptr1Lo = (In->Ptr1Lo - 1) & 0xFF; + Val = Out->Ptr1Lo = (In->Ptr1Lo - 1) & 0xFF; + Out->ZNRegs = ZNREG_PTR1_LO; break; case REG_PTR1_HI: - Out->Ptr1Hi = (In->Ptr1Hi - 1) & 0xFF; + Val = Out->Ptr1Hi = (In->Ptr1Hi - 1) & 0xFF; + Out->ZNRegs = ZNREG_PTR1_HI; break; case REG_SREG_LO: - Out->SRegLo = (In->SRegLo - 1) & 0xFF; + Val = Out->SRegLo = (In->SRegLo - 1) & 0xFF; + Out->ZNRegs = ZNREG_SREG_LO; break; case REG_SREG_HI: - Out->SRegHi = (In->SRegHi - 1) & 0xFF; + Val = Out->SRegHi = (In->SRegHi - 1) & 0xFF; + Out->ZNRegs = ZNREG_SREG_HI; break; } - } else if (E->AM == AM65_ZPX) { + } else if (MightAffectKnownZP (E, In)) { /* Invalidates all ZP registers */ RC_InvalidateZP (Out); } + DeduceZN (Out, Val); break; case OP65_DEX: + Out->ZNRegs = ZNREG_X; if (RegValIsKnown (In->RegX)) { Out->RegX = (In->RegX - 1) & 0xFF; } + DeduceZN (Out, Out->RegX); break; case OP65_DEY: + Out->ZNRegs = ZNREG_Y; if (RegValIsKnown (In->RegY)) { Out->RegY = (In->RegY - 1) & 0xFF; } + DeduceZN (Out, Out->RegY); break; case OP65_EOR: + Out->RegA = UNKNOWN_REGVAL; + Out->ZNRegs = ZNREG_A; if (RegValIsKnown (In->RegA)) { if (CE_IsConstImm (E)) { Out->RegA = In->RegA ^ (short) E->Num; @@ -709,82 +1646,104 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) Out->RegA = In->RegA ^ In->SRegHi; break; default: - Out->RegA = UNKNOWN_REGVAL; break; } - } else { - Out->RegA = UNKNOWN_REGVAL; } } + DeduceZN (Out, Out->RegA); break; case OP65_INA: + Out->ZNRegs = ZNREG_A; if (RegValIsKnown (In->RegA)) { Out->RegA = (In->RegA + 1) & 0xFF; } + DeduceZN (Out, Out->RegA); break; case OP65_INC: - if (E->AM == AM65_ACC && RegValIsKnown (In->RegA)) { - Out->RegA = (In->RegA + 1) & 0xFF; + Out->ZNRegs = ZNREG_NONE; + if (E->AM == AM65_ACC) { + if (RegValIsKnown (In->RegA)) { + Val = Out->RegA = (In->RegA + 1) & 0xFF; + } + Out->ZNRegs = ZNREG_A; } else if (E->AM == AM65_ZP) { - switch (GetKnownReg (E->Chg & REG_ZP, In)) { + switch (GetKnownReg (E->Chg & REG_ZP, 0)) { case REG_TMP1: - Out->Tmp1 = (In->Tmp1 + 1) & 0xFF; + Val = Out->Tmp1 = (In->Tmp1 + 1) & 0xFF; + Out->ZNRegs = ZNREG_TMP1; break; case REG_PTR1_LO: - Out->Ptr1Lo = (In->Ptr1Lo + 1) & 0xFF; + Val = Out->Ptr1Lo = (In->Ptr1Lo + 1) & 0xFF; + Out->ZNRegs = ZNREG_PTR1_LO; break; case REG_PTR1_HI: - Out->Ptr1Hi = (In->Ptr1Hi + 1) & 0xFF; + Val = Out->Ptr1Hi = (In->Ptr1Hi + 1) & 0xFF; + Out->ZNRegs = ZNREG_PTR1_HI; break; case REG_SREG_LO: - Out->SRegLo = (In->SRegLo + 1) & 0xFF; + Val = Out->SRegLo = (In->SRegLo + 1) & 0xFF; + Out->ZNRegs = ZNREG_SREG_LO; break; case REG_SREG_HI: - Out->SRegHi = (In->SRegHi + 1) & 0xFF; + Val = Out->SRegHi = (In->SRegHi + 1) & 0xFF; + Out->ZNRegs = ZNREG_SREG_HI; break; } - } else if (E->AM == AM65_ZPX) { + } else if (MightAffectKnownZP (E, In)) { /* Invalidates all ZP registers */ RC_InvalidateZP (Out); } + DeduceZN (Out, Val); break; case OP65_INX: + Out->ZNRegs = ZNREG_X; if (RegValIsKnown (In->RegX)) { Out->RegX = (In->RegX + 1) & 0xFF; } + DeduceZN (Out, Out->RegX); break; case OP65_INY: + Out->ZNRegs = ZNREG_Y; if (RegValIsKnown (In->RegY)) { Out->RegY = (In->RegY + 1) & 0xFF; } + DeduceZN (Out, Out->RegY); break; case OP65_JCC: + BranchDeduceOnProcessorFlag (Out, BranchOut, PFVAL_C); break; case OP65_JCS: + BranchDeduceOnProcessorFlag (BranchOut, Out, PFVAL_C); break; case OP65_JEQ: + BranchDeduceOnProcessorFlag (BranchOut, Out, PFVAL_Z); break; case OP65_JMI: + BranchDeduceOnProcessorFlag (BranchOut, Out, PFVAL_N); break; case OP65_JMP: break; case OP65_JNE: + BranchDeduceOnProcessorFlag (Out, BranchOut, PFVAL_Z); break; case OP65_JPL: + BranchDeduceOnProcessorFlag (Out, BranchOut, PFVAL_N); break; case OP65_JSR: + Out->ZNRegs = ZNREG_NONE; + /* Get the code info for the function */ GetFuncInfo (E->Arg, &Use, &Chg); if (Chg & REG_A) { @@ -811,6 +1770,9 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) if (Chg & REG_SREG_HI) { Out->SRegHi = UNKNOWN_REGVAL; } + /* FIXME: Quick hack to set flags on process status: */ + Out->PFlags |= ((Chg & PSTATE_ALL) >> PSTATE_BITS_SHIFT) * 0x0101U; + /* ## FIXME: Quick hack for some known functions: */ if (strcmp (E->Arg, "complax") == 0) { if (RegValIsKnown (In->RegA)) { @@ -819,30 +1781,42 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) if (RegValIsKnown (In->RegX)) { Out->RegX = (In->RegX ^ 0xFF); } + } else if (strncmp (E->Arg, "asrax", 5) == 0 || + strncmp (E->Arg, "shrax", 5) == 0) { + if (RegValIsKnown (In->RegX)) { + if (In->RegX == 0x00 || In->RegX == 0xFF) { + Out->RegX = In->RegX; + } + } } else if (strcmp (E->Arg, "tosandax") == 0) { - if (In->RegA == 0) { + if (RegValIsKnown (In->RegA) && In->RegA == 0) { Out->RegA = 0; } - if (In->RegX == 0) { + if (RegValIsKnown (In->RegX) && In->RegX == 0) { Out->RegX = 0; } } else if (strcmp (E->Arg, "tosaslax") == 0) { if (RegValIsKnown (In->RegA) && (In->RegA & 0x0F) >= 8) { - printf ("Hey!\n"); Out->RegA = 0; } } else if (strcmp (E->Arg, "tosorax") == 0) { - if (In->RegA == 0xFF) { + if (RegValIsKnown (In->RegA) && In->RegA == 0xFF) { Out->RegA = 0xFF; } - if (In->RegX == 0xFF) { + if (RegValIsKnown (In->RegX) && In->RegX == 0xFF) { Out->RegX = 0xFF; } } else if (strcmp (E->Arg, "tosshlax") == 0) { - if ((In->RegA & 0x0F) >= 8) { + if (RegValIsKnown (In->RegA) && (In->RegA & 0x0F) >= 8) { Out->RegA = 0; } - } else if (FindBoolCmpCond (E->Arg) != CMP_INV || + } else if (strcmp (E->Arg, "tosshrax") == 0) { + if (RegValIsKnown (In->RegA) && (In->RegA & 0x0F) >= 8) { + Out->RegX = 0; + } + } else if (strcmp (E->Arg, "bcastax") == 0 || + strcmp (E->Arg, "bnegax") == 0 || + FindBoolCmpCond (E->Arg) != CMP_INV || FindTosCmpCond (E->Arg) != CMP_INV) { /* Result is boolean value, so X is zero on output */ Out->RegX = 0; @@ -850,12 +1824,16 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) break; case OP65_JVC: + BranchDeduceOnProcessorFlag (Out, BranchOut, PFVAL_V); break; case OP65_JVS: + BranchDeduceOnProcessorFlag (BranchOut, Out, PFVAL_V); break; case OP65_LDA: + Out->RegA = UNKNOWN_REGVAL; + Out->ZNRegs = ZNREG_A; if (CE_IsConstImm (E)) { Out->RegA = (unsigned char) E->Num; } else if (E->AM == AM65_ZP) { @@ -876,16 +1854,15 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) Out->RegA = In->SRegHi; break; default: - Out->RegA = UNKNOWN_REGVAL; break; } - } else { - /* A is now unknown */ - Out->RegA = UNKNOWN_REGVAL; } + DeduceZN (Out, Out->RegA); break; case OP65_LDX: + Out->RegX = UNKNOWN_REGVAL; + Out->ZNRegs = ZNREG_X; if (CE_IsConstImm (E)) { Out->RegX = (unsigned char) E->Num; } else if (E->AM == AM65_ZP) { @@ -906,16 +1883,15 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) Out->RegX = In->SRegHi; break; default: - Out->RegX = UNKNOWN_REGVAL; break; } - } else { - /* X is now unknown */ - Out->RegX = UNKNOWN_REGVAL; } + DeduceZN (Out, Out->RegX); break; case OP65_LDY: + Out->RegY = UNKNOWN_REGVAL; + Out->ZNRegs = ZNREG_Y; if (CE_IsConstImm (E)) { Out->RegY = (unsigned char) E->Num; } else if (E->AM == AM65_ZP) { @@ -936,37 +1912,42 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) Out->RegY = In->SRegHi; break; default: - Out->RegY = UNKNOWN_REGVAL; break; } - } else { - /* Y is now unknown */ - Out->RegY = UNKNOWN_REGVAL; } + DeduceZN (Out, Out->RegY); break; case OP65_LSR: - if (E->AM == AM65_ACC && RegValIsKnown (In->RegA)) { - Out->RegA = (In->RegA >> 1) & 0xFF; + Out->PFlags |= UNKNOWN_PFVAL_CZN; + Out->ZNRegs = ZNREG_NONE; + if (E->AM == AM65_ACC) { + Out->RegA = AnyOpLSRDeduceCZN (Out, In->RegA); + Out->ZNRegs = ZNREG_A; } else if (E->AM == AM65_ZP) { - switch (GetKnownReg (E->Chg & REG_ZP, In)) { + switch (GetKnownReg (E->Chg & REG_ZP, 0)) { case REG_TMP1: - Out->Tmp1 = (In->Tmp1 >> 1) & 0xFF; + Out->Tmp1 = AnyOpLSRDeduceCZN (Out, In->Tmp1); + Out->ZNRegs = ZNREG_TMP1; break; case REG_PTR1_LO: - Out->Ptr1Lo = (In->Ptr1Lo >> 1) & 0xFF; + Out->Ptr1Lo = AnyOpLSRDeduceCZN (Out, In->Ptr1Lo); + Out->ZNRegs = ZNREG_PTR1_LO; break; case REG_PTR1_HI: - Out->Ptr1Hi = (In->Ptr1Hi >> 1) & 0xFF; + Out->Ptr1Hi = AnyOpLSRDeduceCZN (Out, In->Ptr1Hi); + Out->ZNRegs = ZNREG_PTR1_HI; break; case REG_SREG_LO: - Out->SRegLo = (In->SRegLo >> 1) & 0xFF; + Out->SRegLo = AnyOpLSRDeduceCZN (Out, In->SRegLo); + Out->ZNRegs = ZNREG_SREG_LO; break; case REG_SREG_HI: - Out->SRegHi = (In->SRegHi >> 1) & 0xFF; + Out->SRegHi = AnyOpLSRDeduceCZN (Out, In->SRegHi); + Out->ZNRegs = ZNREG_SREG_HI; break; } - } else if (E->AM == AM65_ZPX) { + } else if (MightAffectKnownZP (E, In)) { /* Invalidates all ZP registers */ RC_InvalidateZP (Out); } @@ -976,6 +1957,8 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) break; case OP65_ORA: + Out->RegA = UNKNOWN_REGVAL; + Out->ZNRegs = ZNREG_A; if (RegValIsKnown (In->RegA)) { if (CE_IsConstImm (E)) { Out->RegA = In->RegA | (short) E->Num; @@ -997,17 +1980,14 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) Out->RegA = In->RegA | In->SRegHi; break; default: - Out->RegA = UNKNOWN_REGVAL; break; } - } else { - /* A is now unknown */ - Out->RegA = UNKNOWN_REGVAL; } } else if (CE_IsKnownImm (E, 0xFF)) { /* ORA with 0xFF does always give 0xFF */ Out->RegA = 0xFF; } + DeduceZN (Out, Out->RegA); break; case OP65_PHA: @@ -1024,93 +2004,150 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) case OP65_PLA: Out->RegA = UNKNOWN_REGVAL; + Out->PFlags |= UNKNOWN_PFVAL_ZN; + Out->ZNRegs = ZNREG_A; break; case OP65_PLP: + Out->PFlags = UNKNOWN_PFVAL_ALL; + Out->ZNRegs = ZNREG_NONE; break; case OP65_PLX: Out->RegX = UNKNOWN_REGVAL; + Out->PFlags |= UNKNOWN_PFVAL_ZN; + Out->ZNRegs = ZNREG_X; break; case OP65_PLY: Out->RegY = UNKNOWN_REGVAL; + Out->PFlags |= UNKNOWN_PFVAL_ZN; + Out->ZNRegs = ZNREG_Y; break; case OP65_ROL: - /* We don't know the value of the carry bit */ + Out->PFlags |= UNKNOWN_PFVAL_CZN; + Out->ZNRegs = ZNREG_NONE; if (E->AM == AM65_ACC) { - Out->RegA = UNKNOWN_REGVAL; + Out->RegA = AnyOpROLDeduceCZN (Out, In->PFlags, In->RegA); + Out->ZNRegs = ZNREG_A; } else if (E->AM == AM65_ZP) { - switch (GetKnownReg (E->Chg & REG_ZP, In)) { + switch (GetKnownReg (E->Chg & REG_ZP, 0)) { case REG_TMP1: - Out->Tmp1 = UNKNOWN_REGVAL; + Out->Tmp1 = AnyOpROLDeduceCZN (Out, In->PFlags, In->Tmp1); + Out->ZNRegs = ZNREG_TMP1; break; case REG_PTR1_LO: - Out->Ptr1Lo = UNKNOWN_REGVAL; + Out->Ptr1Lo = AnyOpROLDeduceCZN (Out, In->PFlags, In->Ptr1Lo); + Out->ZNRegs = ZNREG_PTR1_LO; break; case REG_PTR1_HI: - Out->Ptr1Hi = UNKNOWN_REGVAL; + Out->Ptr1Hi = AnyOpROLDeduceCZN (Out, In->PFlags, In->Ptr1Hi); + Out->ZNRegs = ZNREG_PTR1_HI; break; case REG_SREG_LO: - Out->SRegLo = UNKNOWN_REGVAL; + Out->SRegLo = AnyOpROLDeduceCZN (Out, In->PFlags, In->SRegLo); + Out->ZNRegs = ZNREG_SREG_LO; break; case REG_SREG_HI: - Out->SRegHi = UNKNOWN_REGVAL; + Out->SRegHi = AnyOpROLDeduceCZN (Out, In->PFlags, In->SRegHi); + Out->ZNRegs = ZNREG_SREG_HI; break; } - } else if (E->AM == AM65_ZPX) { + } else if (MightAffectKnownZP (E, In)) { /* Invalidates all ZP registers */ RC_InvalidateZP (Out); } break; case OP65_ROR: - /* We don't know the value of the carry bit */ + Out->PFlags |= UNKNOWN_PFVAL_CZN; + Out->ZNRegs = ZNREG_NONE; if (E->AM == AM65_ACC) { - Out->RegA = UNKNOWN_REGVAL; + Out->RegA = AnyOpRORDeduceCZN (Out, In->PFlags, In->RegA); + Out->ZNRegs = ZNREG_A; } else if (E->AM == AM65_ZP) { - switch (GetKnownReg (E->Chg & REG_ZP, In)) { + switch (GetKnownReg (E->Chg & REG_ZP, 0)) { case REG_TMP1: - Out->Tmp1 = UNKNOWN_REGVAL; + Out->Tmp1 = AnyOpRORDeduceCZN (Out, In->PFlags, In->Tmp1); + Out->ZNRegs = ZNREG_TMP1; break; case REG_PTR1_LO: - Out->Ptr1Lo = UNKNOWN_REGVAL; + Out->Ptr1Lo = AnyOpRORDeduceCZN (Out, In->PFlags, In->Ptr1Lo); + Out->ZNRegs = ZNREG_PTR1_LO; break; case REG_PTR1_HI: - Out->Ptr1Hi = UNKNOWN_REGVAL; + Out->Ptr1Hi = AnyOpRORDeduceCZN (Out, In->PFlags, In->Ptr1Hi); + Out->ZNRegs = ZNREG_PTR1_HI; break; case REG_SREG_LO: - Out->SRegLo = UNKNOWN_REGVAL; + Out->SRegLo = AnyOpRORDeduceCZN (Out, In->PFlags, In->SRegLo); + Out->ZNRegs = ZNREG_SREG_LO; break; case REG_SREG_HI: - Out->SRegHi = UNKNOWN_REGVAL; + Out->SRegHi = AnyOpRORDeduceCZN (Out, In->PFlags, In->SRegHi); + Out->ZNRegs = ZNREG_SREG_HI; break; } - } else if (E->AM == AM65_ZPX) { + } else if (MightAffectKnownZP (E, In)) { /* Invalidates all ZP registers */ RC_InvalidateZP (Out); } break; case OP65_RTI: + Out->PFlags |= UNKNOWN_PFVAL_ALL; break; case OP65_RTS: break; case OP65_SBC: - /* We don't know the value of the carry bit */ Out->RegA = UNKNOWN_REGVAL; + Out->PFlags |= UNKNOWN_PFVAL_CZVN; + Out->ZNRegs = ZNREG_A; + if (PStatesAreKnown (In->PFlags, PSTATE_C) && + RegValIsKnown (In->RegA)) { + if (CE_IsConstImm (E)) { + Out->RegA = KnownOpSBCDeduceCZVN (Out, In, (short) E->Num); + } + else if (E->AM == AM65_ZP) { + switch (GetKnownReg(E->Use & REG_ZP, In)) { + case REG_TMP1: + Out->RegA = KnownOpSBCDeduceCZVN (Out, In, In->Tmp1); + break; + case REG_PTR1_LO: + Out->RegA = KnownOpSBCDeduceCZVN (Out, In, In->Ptr1Lo); + break; + case REG_PTR1_HI: + Out->RegA = KnownOpSBCDeduceCZVN (Out, In, In->Ptr1Hi); + break; + case REG_SREG_LO: + Out->RegA = KnownOpSBCDeduceCZVN (Out, In, In->SRegLo); + break; + case REG_SREG_HI: + Out->RegA = KnownOpSBCDeduceCZVN (Out, In, In->SRegHi); + break; + default: + break; + } + } + } break; case OP65_SEC: + Out->PFlags &= ~UNKNOWN_PFVAL_C; + Out->PFlags |= PFVAL_C; break; case OP65_SED: + Out->PFlags &= ~UNKNOWN_PFVAL_D; + Out->PFlags |= PFVAL_D; break; case OP65_SEI: + Out->PFlags &= ~UNKNOWN_PFVAL_I; + Out->PFlags |= PFVAL_I; break; case OP65_STA: @@ -1132,12 +2169,15 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) Out->SRegHi = In->RegA; break; } - } else if (E->AM == AM65_ZPX) { + } else if (MightAffectKnownZP (E, In)) { /* Invalidates all ZP registers */ RC_InvalidateZP (Out); } break; + case OP65_STP: + break; + case OP65_STX: if (E->AM == AM65_ZP) { switch (GetKnownReg (E->Chg & REG_ZP, 0)) { @@ -1157,7 +2197,7 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) Out->SRegHi = In->RegX; break; } - } else if (E->AM == AM65_ZPX) { + } else if (MightAffectKnownZP (E, In)) { /* Invalidates all ZP registers */ RC_InvalidateZP (Out); } @@ -1182,7 +2222,7 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) Out->SRegHi = In->RegY; break; } - } else if (E->AM == AM65_ZPX) { + } else if (MightAffectKnownZP (E, In)) { /* Invalidates all ZP registers */ RC_InvalidateZP (Out); } @@ -1207,7 +2247,7 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) Out->SRegHi = 0; break; } - } else if (E->AM == AM65_ZPX) { + } else if (MightAffectKnownZP (E, In)) { /* Invalidates all ZP registers */ RC_InvalidateZP (Out); } @@ -1215,37 +2255,44 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) case OP65_TAX: Out->RegX = In->RegA; + Out->ZNRegs = ZNREG_AX; + DeduceZN (Out, Out->RegX); break; case OP65_TAY: Out->RegY = In->RegA; + Out->ZNRegs = ZNREG_AY; + DeduceZN (Out, Out->RegY); break; case OP65_TRB: - if (E->AM == AM65_ZPX) { - /* Invalidates all ZP registers */ - RC_InvalidateZP (Out); - } else if (E->AM == AM65_ZP) { + Out->ZNRegs = ZNREG_NONE; + if (E->AM == AM65_ZP) { if (RegValIsKnown (In->RegA)) { switch (GetKnownReg (E->Chg & REG_ZP, In)) { case REG_TMP1: + Val = Out->Tmp1 & In->RegA; Out->Tmp1 &= ~In->RegA; break; case REG_PTR1_LO: + Val = Out->Ptr1Lo & In->RegA; Out->Ptr1Lo &= ~In->RegA; break; case REG_PTR1_HI: + Val = Out->Ptr1Hi & In->RegA; Out->Ptr1Hi &= ~In->RegA; break; case REG_SREG_LO: + Val = Out->SRegLo & In->RegA; Out->SRegLo &= ~In->RegA; break; case REG_SREG_HI: + Val = Out->SRegHi & In->RegA; Out->SRegHi &= ~In->RegA; break; } } else { - switch (GetKnownReg (E->Chg & REG_ZP, In)) { + switch (GetKnownReg (E->Chg & REG_ZP, 0)) { case REG_TMP1: Out->Tmp1 = UNKNOWN_REGVAL; break; @@ -1263,34 +2310,41 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) break; } } + } else if (MightAffectKnownZP (E, In)) { + /* Invalidates all ZP registers */ + RC_InvalidateZP (Out); } + DeduceZ (Out, Val); break; case OP65_TSB: - if (E->AM == AM65_ZPX) { - /* Invalidates all ZP registers */ - RC_InvalidateZP (Out); - } else if (E->AM == AM65_ZP) { + Out->ZNRegs = ZNREG_NONE; + if (E->AM == AM65_ZP) { if (RegValIsKnown (In->RegA)) { switch (GetKnownReg (E->Chg & REG_ZP, In)) { case REG_TMP1: + Val = Out->Tmp1 & In->RegA; Out->Tmp1 |= In->RegA; break; case REG_PTR1_LO: + Val = Out->Ptr1Lo & In->RegA; Out->Ptr1Lo |= In->RegA; break; case REG_PTR1_HI: + Val = Out->Ptr1Hi & In->RegA; Out->Ptr1Hi |= In->RegA; break; case REG_SREG_LO: + Val = Out->SRegLo & In->RegA; Out->SRegLo |= In->RegA; break; case REG_SREG_HI: + Val = Out->SRegHi & In->RegA; Out->SRegHi |= In->RegA; break; } } else { - switch (GetKnownReg (E->Chg & REG_ZP, In)) { + switch (GetKnownReg (E->Chg & REG_ZP, 0)) { case REG_TMP1: Out->Tmp1 = UNKNOWN_REGVAL; break; @@ -1308,22 +2362,34 @@ void CE_GenRegInfo (CodeEntry* E, RegContents* InputRegs) break; } } + } else if (MightAffectKnownZP (E, In)) { + /* Invalidates all ZP registers */ + RC_InvalidateZP (Out); } + DeduceZ (Out, Val); break; case OP65_TSX: Out->RegX = UNKNOWN_REGVAL; + Out->PFlags |= UNKNOWN_PFVAL_ZN; + Out->ZNRegs = ZNREG_X; break; case OP65_TXA: Out->RegA = In->RegX; + Out->ZNRegs = ZNREG_AX; + DeduceZN (Out, Out->RegA); break; case OP65_TXS: + Out->ZNRegs = ZNREG_X; + DeduceZN (Out, In->RegX); break; case OP65_TYA: Out->RegA = In->RegY; + Out->ZNRegs = ZNREG_AY; + DeduceZN (Out, Out->RegA); break; default: @@ -1349,6 +2415,7 @@ static char* RegInfoDesc (unsigned U, char* Buf) strcat (Buf, U & REG_PTR2? "2" : "_"); strcat (Buf, U & REG_SAVE? "V" : "_"); strcat (Buf, U & REG_SP? "S" : "_"); + sprintf (Buf + 10, "_%02X", (U & PSTATE_ALL) >> PSTATE_BITS_SHIFT); return Buf; } @@ -1373,11 +2440,59 @@ static char* RegContentDesc (const RegContents* RC, char* Buf) } B += 5; if (RegValIsUnknown (RC->RegY)) { - strcpy (B, "Y:XX"); + strcpy (B, "Y:XX "); } else { - sprintf (B, "Y:%02X", RC->RegY); + sprintf (B, "Y:%02X ", RC->RegY); } - B += 4; + B += 5; + if (PStatesAreUnknown (RC->PFlags, PSTATE_C)) { + strcpy (B, "~"); + } else { + strcpy (B, RC->PFlags & PFVAL_C ? "C" : "_"); + } + B += 1; + if (PStatesAreUnknown (RC->PFlags, PSTATE_Z)) { + strcpy (B, "~"); + } else { + strcpy (B, RC->PFlags & PFVAL_Z ? "Z" : "_"); + } + B += 1; + if (PStatesAreUnknown (RC->PFlags, PSTATE_I)) { + strcpy (B, "~"); + } else { + strcpy (B, RC->PFlags & PFVAL_I ? "I" : "_"); + } + B += 1; + if (PStatesAreUnknown (RC->PFlags, PSTATE_D)) { + strcpy (B, "~"); + } else { + strcpy (B, RC->PFlags & PFVAL_D ? "D" : "_"); + } + B += 1; + if (PStatesAreUnknown (RC->PFlags, PSTATE_U)) { + strcpy (B, "~"); + } else { + strcpy (B, RC->PFlags & PFVAL_U ? "U" : "_"); + } + B += 1; + if (PStatesAreUnknown (RC->PFlags, PSTATE_B)) { + strcpy (B, "~"); + } else { + strcpy (B, RC->PFlags & PFVAL_B ? "B" : "_"); + } + B += 1; + if (PStatesAreUnknown (RC->PFlags, PSTATE_V)) { + strcpy (B, "~"); + } else { + strcpy (B, RC->PFlags & PFVAL_V ? "V" : "_"); + } + B += 1; + if (PStatesAreUnknown (RC->PFlags, PSTATE_N)) { + strcpy (B, "~"); + } else { + strcpy (B, RC->PFlags & PFVAL_N ? "N" : "_"); + } + B += 1; return Buf; } @@ -1472,7 +2587,7 @@ void CE_Output (const CodeEntry* E) if (Debug) { char Use [128]; char Chg [128]; - WriteOutput ("%*s; USE: %-12s CHG: %-12s SIZE: %u", + WriteOutput ("%*s; USE: %-15s CHG: %-15s SIZE: %u", (int)(30-Chars), "", RegInfoDesc (E->Use, Use), RegInfoDesc (E->Chg, Chg), @@ -1481,7 +2596,7 @@ void CE_Output (const CodeEntry* E) if (E->RI) { char RegIn[32]; char RegOut[32]; - WriteOutput (" In %s Out %s", + WriteOutput (" In %s Out %s", RegContentDesc (&E->RI->In, RegIn), RegContentDesc (&E->RI->Out, RegOut)); } diff --git a/src/cc65/codeent.h b/src/cc65/codeent.h index 4d0289086..ee1dd0220 100644 --- a/src/cc65/codeent.h +++ b/src/cc65/codeent.h @@ -61,6 +61,7 @@ /* Flags used */ #define CEF_USERMARK 0x0001U /* Generic mark by user functions */ #define CEF_NUMARG 0x0002U /* Insn has numerical argument */ +#define CEF_DONT_REMOVE 0x0004U /* Insn shouldn't be removed, marked by user functions */ /* Code entry structure */ typedef struct CodeEntry CodeEntry; @@ -72,14 +73,32 @@ struct CodeEntry { char* Arg; /* Argument as string */ unsigned long Num; /* Numeric argument */ unsigned short Info; /* Additional code info */ - unsigned short Use; /* Registers used */ - unsigned short Chg; /* Registers changed/destroyed */ + unsigned short ArgInfo; /* Additional argument info */ + unsigned int Use; /* Registers used */ + unsigned int Chg; /* Registers changed/destroyed */ CodeLabel* JumpTo; /* Jump label */ Collection Labels; /* Labels for this instruction */ LineInfo* LI; /* Source line info for this insn */ RegInfo* RI; /* Register info for this insn */ + char* ArgBase; /* Argument broken into a base and an offset, */ + long ArgOff; /* only done when requested. */ }; +/* */ +#define AIF_HAS_NAME 0x0001U /* Argument has a name part */ +#define AIF_HAS_OFFSET 0x0002U /* Argument has a numeric part */ +#define AIF_BUILTIN 0x0004U /* The name is built-in */ +#define AIF_EXTERNAL 0x0008U /* The name is external */ +#define AIF_LOCAL 0x0010U /* The name is a local label */ +#define AIF_ZP_NAME 0x0020U /* The name is a zp location */ +#define AIF_LOBYTE 0x0100U +#define AIF_HIBYTE 0x0200U +#define AIF_BANKBYTE 0x0400U +#define AIF_FAILURE 0x8000U /* Argument was not parsed successfully */ + +#define AIF_WORD (AIF_LOBYTE | AIF_HIBYTE) +#define AIF_FAR (AIF_LOBYTE | AIF_HIBYTE | AIF_BANKBYTE) + /*****************************************************************************/ @@ -88,6 +107,14 @@ struct CodeEntry { +int ParseOpcArgStr (const char* Arg, unsigned short* ArgInfo, struct StrBuf* Name, long* Offset); +/* Break the opcode argument string into a symbol name/label part plus an offset. +** Both parts are optional, but if there are any characters in the string that +** can't be parsed, it's an failure. +** The caller is responsible for managing the StrBuf. +** Return whether parsing succeeds or not. +*/ + const char* MakeHexArg (unsigned Num); /* Convert Num into a string in the form $XY, suitable for passing it as an ** argument to NewCodeEntry, and return a pointer to the string. @@ -96,6 +123,9 @@ const char* MakeHexArg (unsigned Num); ** safe). */ +void PreparseArg (CodeEntry* E); +/* Parse the argument string and memorize the result for the code entry */ + CodeEntry* NewCodeEntry (opc_t OPC, am_t AM, const char* Arg, CodeLabel* JumpTo, LineInfo* LI); /* Create a new code entry, initialize and return it */ @@ -150,6 +180,16 @@ INLINE CodeLabel* CE_GetLabel (CodeEntry* E, unsigned Index) # define CE_GetLabel(E, Index) CollAt (&(E)->Labels, (Index)) #endif +#if defined(HAVE_INLINE) +INLINE void CE_ReplaceLabel (CodeEntry* E, CodeLabel* L, unsigned Index) +/* Replace the code label at the specified index with L */ +{ + CollReplace (&E->Labels, L, Index); +} +#else +# define CE_ReplaceLabel(E, L, Index) CollReplace (&(E)->Labels, (L), (Index)) +#endif + void CE_MoveLabel (CodeLabel* L, CodeEntry* E); /* Move the code label L from it's former owner to the code entry E. */ @@ -196,11 +236,33 @@ INLINE int CE_HasNumArg (const CodeEntry* E) void CE_SetArg (CodeEntry* E, const char* Arg); /* Replace the argument by the new one. */ +void CE_SetArgBaseAndOff (CodeEntry* E, const char* ArgBase, long ArgOff); +/* Replace the new argument base and offset. Argument base is always applied. +** Argument offset is applied if and only if E has the AIF_HAS_OFFSET flag set. +*/ + +void CE_SetArgBase (CodeEntry* E, const char* ArgBase); +/* Replace the argument base by the new one. +** The entry must have an existing base. +*/ + +void CE_SetArgOffset (CodeEntry* E, long ArgOff); +/* Replace the argument offset by the new one */ + void CE_SetNumArg (CodeEntry* E, long Num); /* Set a new numeric argument for the given code entry that must already ** have a numeric argument. */ +int CE_IsArgStrParsed (const CodeEntry* E); +/* Return true if the argument of E was successfully parsed last time */ + +int CE_HasArgBase (const CodeEntry* E); +/* Return true if the argument of E has a non-blank base name */ + +int CE_HasArgOffset (const CodeEntry* E); +/* Return true if the argument of E has a non-zero offset */ + int CE_IsConstImm (const CodeEntry* E); /* Return true if the argument of E is a constant immediate value */ diff --git a/src/cc65/codegen.c b/src/cc65/codegen.c index f6ec2f51a..326d751b6 100644 --- a/src/cc65/codegen.c +++ b/src/cc65/codegen.c @@ -33,13 +33,17 @@ +#include <inttypes.h> +#include <limits.h> #include <stdio.h> #include <string.h> #include <stdarg.h> /* common */ +#include "addrsize.h" #include "check.h" #include "cpu.h" +#include "shift.h" #include "strbuf.h" #include "xmalloc.h" #include "xsprintf.h" @@ -55,6 +59,7 @@ #include "global.h" #include "segments.h" #include "stackptr.h" +#include "stdfunc.h" #include "textseg.h" #include "util.h" #include "codegen.h" @@ -91,19 +96,24 @@ static void CheckLocalOffs (unsigned Offs) -static const char* GetLabelName (unsigned Flags, unsigned long Label, long Offs) +static const char* GetLabelName (unsigned Flags, uintptr_t Label, long Offs) { static char Buf [256]; /* Label name */ /* Create the correct label name */ switch (Flags & CF_ADDRMASK) { + case CF_IMM: + /* Immediate constant values */ + xsprintf (Buf, sizeof (Buf), "$%04X", (unsigned)((Offs) & 0xFFFF)); + break; + case CF_STATIC: - /* Static memory cell */ + /* Local static memory cell */ if (Offs) { - xsprintf (Buf, sizeof (Buf), "%s%+ld", LocalLabelName (Label), Offs); + xsprintf (Buf, sizeof (Buf), "%s%+ld", LocalDataLabelName (Label), Offs); } else { - xsprintf (Buf, sizeof (Buf), "%s", LocalLabelName (Label)); + xsprintf (Buf, sizeof (Buf), "%s", LocalDataLabelName (Label)); } break; @@ -116,9 +126,19 @@ static const char* GetLabelName (unsigned Flags, unsigned long Label, long Offs) } break; + case CF_LITERAL: + /* Literal */ + /* Static memory cell */ + if (Offs) { + xsprintf (Buf, sizeof (Buf), "%s%+ld", PooledLiteralLabelName (Label), Offs); + } else { + xsprintf (Buf, sizeof (Buf), "%s", PooledLiteralLabelName (Label)); + } + break; + case CF_ABSOLUTE: /* Absolute address */ - xsprintf (Buf, sizeof (Buf), "$%04X", (int)((Label+Offs) & 0xFFFF)); + xsprintf (Buf, sizeof (Buf), "$%04X", (unsigned)((Label+Offs) & 0xFFFF)); break; case CF_REGVAR: @@ -126,6 +146,15 @@ static const char* GetLabelName (unsigned Flags, unsigned long Label, long Offs) xsprintf (Buf, sizeof (Buf), "regbank+%u", (unsigned)((Label+Offs) & 0xFFFF)); break; + case CF_CODE: + /* Code label location */ + if (Offs) { + xsprintf (Buf, sizeof (Buf), "%s%+ld", LocalLabelName (Label), Offs); + } else { + xsprintf (Buf, sizeof (Buf), "%s", LocalLabelName (Label)); + } + break; + default: Internal ("Invalid address flags: %04X", Flags); } @@ -158,6 +187,7 @@ void g_preamble (void) switch (CPU) { case CPU_6502: AddTextLine ("\t.setcpu\t\t\"6502\""); break; case CPU_6502X: AddTextLine ("\t.setcpu\t\t\"6502X\""); break; + case CPU_6502DTV: AddTextLine ("\t.setcpu\t\t\"6502DTV\""); break; case CPU_65SC02: AddTextLine ("\t.setcpu\t\t\"65SC02\""); break; case CPU_65C02: AddTextLine ("\t.setcpu\t\t\"65C02\""); break; case CPU_65816: AddTextLine ("\t.setcpu\t\t\"65816\""); break; @@ -233,6 +263,9 @@ void g_usebss (void) void g_segname (segment_t Seg) /* Emit the name of a segment if necessary */ { + unsigned char AddrSize; + const char* Name; + /* Emit a segment directive for the data style segments */ DataSeg* S; switch (Seg) { @@ -242,7 +275,13 @@ void g_segname (segment_t Seg) default: S = 0; break; } if (S) { - DS_AddLine (S, ".segment\t\"%s\"", GetSegName (Seg)); + Name = GetSegName (Seg); + AddrSize = GetSegAddrSize (Name); + if (AddrSize != ADDR_SIZE_INVALID) { + DS_AddLine (S, ".segment\t\"%s\": %s", Name, AddrSizeToStr (AddrSize)); + } else { + DS_AddLine (S, ".segment\t\"%s\"", Name); + } } } @@ -342,25 +381,7 @@ void g_defcodelabel (unsigned label) void g_defdatalabel (unsigned label) /* Define a local data label */ { - AddDataLine ("%s:", LocalLabelName (label)); -} - - - -void g_aliasdatalabel (unsigned label, unsigned baselabel, long offs) -/* Define label as a local alias for baselabel+offs */ -{ - /* We need an intermediate buffer here since LocalLabelName uses a - ** static buffer which changes with each call. - */ - StrBuf L = AUTO_STRBUF_INITIALIZER; - SB_AppendStr (&L, LocalLabelName (label)); - SB_Terminate (&L); - AddDataLine ("%s\t:=\t%s+%ld", - SB_GetConstBuf (&L), - LocalLabelName (baselabel), - offs); - SB_Done (&L); + AddDataLine ("%s:", LocalDataLabelName (label)); } @@ -380,6 +401,33 @@ void g_defgloblabel (const char* Name) +void g_defliterallabel (unsigned label) +/* Define a literal data label */ +{ + /* Literal labels are always data labels */ + AddDataLine ("%s:", PooledLiteralLabelName (label)); +} + + + +void g_aliasliterallabel (unsigned label, unsigned baselabel, long offs) +/* Define label as an alias for baselabel+offs */ +{ + /* We need an intermediate buffer here since LocalLabelName uses a + ** static buffer which changes with each call. + */ + StrBuf L = AUTO_STRBUF_INITIALIZER; + SB_AppendStr (&L, PooledLiteralLabelName (label)); + SB_Terminate (&L); + AddDataLine ("%s\t:=\t%s+%ld", + SB_GetConstBuf (&L), + PooledLiteralLabelName (baselabel), + offs); + SB_Done (&L); +} + + + void g_defexport (const char* Name, int ZP) /* Export the given label */ { @@ -413,7 +461,8 @@ void g_importstartup (void) void g_importmainargs (void) -/* Forced import of a special symbol that handles arguments to main */ +/* Forced import of a special symbol that handles arguments to main. This will + happen only when the compiler sees a main function that takes arguments. */ { AddTextLine ("\t.forceimport\tinitmainargs"); } @@ -642,7 +691,7 @@ void g_restore_regvars (int StackOffs, int RegOffs, unsigned Bytes) -void g_getimmed (unsigned Flags, unsigned long Val, long Offs) +void g_getimmed (unsigned Flags, uintptr_t Val, long Offs) /* Load a constant into the primary register */ { unsigned char B1, B2, B3, B4; @@ -728,7 +777,7 @@ void g_getimmed (unsigned Flags, unsigned long Val, long Offs) -void g_getstatic (unsigned flags, unsigned long label, long offs) +void g_getstatic (unsigned flags, uintptr_t label, long offs) /* Fetch an static memory cell into the primary register */ { /* Create the correct label name */ @@ -1007,7 +1056,7 @@ void g_leavariadic (int Offs) -void g_putstatic (unsigned flags, unsigned long label, long offs) +void g_putstatic (unsigned flags, uintptr_t label, long offs) /* Store the primary register into the specified static memory cell */ { /* Create the correct label name */ @@ -1119,7 +1168,9 @@ void g_putind (unsigned Flags, unsigned Offs) /* Overflow - we need to add the low byte also */ AddCodeLine ("ldy #$00"); AddCodeLine ("clc"); - AddCodeLine ("pha"); + if ((Flags & CF_NOKEEP) == 0) { + AddCodeLine ("pha"); + } AddCodeLine ("lda #$%02X", Offs & 0xFF); AddCodeLine ("adc (sp),y"); AddCodeLine ("sta (sp),y"); @@ -1127,7 +1178,9 @@ void g_putind (unsigned Flags, unsigned Offs) AddCodeLine ("lda #$%02X", (Offs >> 8) & 0xFF); AddCodeLine ("adc (sp),y"); AddCodeLine ("sta (sp),y"); - AddCodeLine ("pla"); + if ((Flags & CF_NOKEEP) == 0) { + AddCodeLine ("pla"); + } /* Complete address is on stack, new offset is zero */ Offs = 0; @@ -1137,12 +1190,15 @@ void g_putind (unsigned Flags, unsigned Offs) /* We can just add the high byte */ AddCodeLine ("ldy #$01"); AddCodeLine ("clc"); - AddCodeLine ("pha"); + if ((Flags & CF_NOKEEP) == 0) { + AddCodeLine ("pha"); + } AddCodeLine ("lda #$%02X", (Offs >> 8) & 0xFF); AddCodeLine ("adc (sp),y"); AddCodeLine ("sta (sp),y"); - AddCodeLine ("pla"); - + if ((Flags & CF_NOKEEP) == 0) { + AddCodeLine ("pla"); + } /* Offset is now just the low byte */ Offs &= 0x00FF; } @@ -1320,52 +1376,133 @@ void g_reglong (unsigned Flags) +static unsigned g_intpromotion (unsigned flags) +/* Return new flags for integral promotions for types smaller than int. */ +{ + /* https://port70.net/~nsz/c/c89/c89-draft.html#3.2.1.1 + ** A char, a short int, or an int bit-field, or their signed or unsigned varieties, or an + ** object that has enumeration type, may be used in an expression wherever an int or + ** unsigned int may be used. If an int can represent all values of the original type, the value + ** is converted to an int; otherwise it is converted to an unsigned int. + ** These are called the integral promotions. + */ + + if ((flags & CF_TYPEMASK) == CF_CHAR) { + /* int can represent all unsigned chars, so unsigned char is promoted to int. */ + flags &= ~CF_TYPEMASK; + flags &= ~CF_UNSIGNED; + flags |= CF_INT; + return flags; + } else if ((flags & CF_TYPEMASK) == CF_SHORT) { + /* int cannot represent all unsigned shorts, so unsigned short is promoted to + ** unsigned int. + */ + flags &= ~CF_TYPEMASK; + flags |= CF_INT; + return flags; + } else { + /* Otherwise, the type is not smaller than int, so leave it alone. */ + return flags; + } +} + + + unsigned g_typeadjust (unsigned lhs, unsigned rhs) /* Adjust the integer operands before doing a binary operation. lhs is a flags ** value, that corresponds to the value on TOS, rhs corresponds to the value -** in (e)ax. The return value is the the flags value for the resulting type. +** in (e)ax. The return value is the flags value for the resulting type. */ { - unsigned ltype, rtype; - unsigned result; - /* Get the type spec from the flags */ - ltype = lhs & CF_TYPEMASK; - rtype = rhs & CF_TYPEMASK; + unsigned ltype = lhs & CF_TYPEMASK; + unsigned rtype = rhs & CF_TYPEMASK; /* Check if a conversion is needed */ if (ltype == CF_LONG && rtype != CF_LONG && (rhs & CF_CONST) == 0) { /* We must promote the primary register to long */ g_reglong (rhs); - /* Get the new rhs type */ - rhs = (rhs & ~CF_TYPEMASK) | CF_LONG; - rtype = CF_LONG; } else if (ltype != CF_LONG && (lhs & CF_CONST) == 0 && rtype == CF_LONG) { /* We must promote the lhs to long */ - if (lhs & CF_REG) { + if (lhs & CF_PRIMARY) { g_reglong (lhs); } else { g_toslong (lhs); } - /* Get the new rhs type */ - lhs = (lhs & ~CF_TYPEMASK) | CF_LONG; - ltype = CF_LONG; } - /* Determine the result type for the operation: - ** - The result is const if both operands are const. - ** - The result is unsigned if one of the operands is unsigned. - ** - The result is long if one of the operands is long. - ** - Otherwise the result is int sized. + /* Result is const if both operands are const. */ + unsigned const_flag = (lhs & CF_CONST) & (rhs & CF_CONST); + + /* https://port70.net/~nsz/c/c89/c89-draft.html#3.2.1.5 + ** Many binary operators that expect operands of arithmetic type cause conversions and yield + ** result types in a similar way. The purpose is to yield a common type, which is also the type + ** of the result. This pattern is called the usual arithmetic conversions. */ - result = (lhs & CF_CONST) & (rhs & CF_CONST); - result |= (lhs & CF_UNSIGNED) | (rhs & CF_UNSIGNED); - if (rtype == CF_LONG || ltype == CF_LONG) { - result |= CF_LONG; - } else { - result |= CF_INT; + + /* Note that this logic is largely duplicated by ArithmeticConvert. */ + + /* Before we apply the integral promotions, we check if both types are the same character type. + ** If so, we return that type, rather than int, which would be returned by the standard + ** rules. This is only a performance optimization allowing the use of unsigned and/or char + ** operations; it does not affect correctness, as the flags are only used for code generation, + ** and not to determine types of other expressions containing this one. For codgen, CF_CHAR + ** means the operands are char and the result is int (unless CF_FORCECHAR is also set, in + ** which case the result is char). This special case part is not duplicated by + ** ArithmeticConvert. + */ + if ((lhs & CF_TYPEMASK) == CF_CHAR && (rhs & CF_TYPEMASK) == CF_CHAR && + (lhs & CF_UNSIGNED) == (rhs & CF_UNSIGNED)) { + /* Signedness flags are the same, so just use one of them. */ + const unsigned unsigned_flag = lhs & CF_UNSIGNED; + return const_flag | unsigned_flag | CF_CHAR; } - return result; + + /* Apply integral promotions for types char/short. */ + lhs = g_intpromotion (lhs); + rhs = g_intpromotion (rhs); + ltype = lhs & CF_TYPEMASK; + rtype = rhs & CF_TYPEMASK; + + /* If either operand has type unsigned long int, the other operand is converted to + ** unsigned long int. + */ + if ((ltype == CF_LONG && (lhs & CF_UNSIGNED)) || + (rtype == CF_LONG && (rhs & CF_UNSIGNED))) { + return const_flag | CF_UNSIGNED | CF_LONG; + } + + /* Otherwise, if one operand has type long int and the other has type unsigned int, + ** if a long int can represent all values of an unsigned int, the operand of type unsigned int + ** is converted to long int ; if a long int cannot represent all the values of an unsigned int, + ** both operands are converted to unsigned long int. + */ + if ((ltype == CF_LONG && rtype == CF_INT && (rhs & CF_UNSIGNED)) || + (rtype == CF_LONG && ltype == CF_INT && (rhs & CF_UNSIGNED))) { + /* long can represent all unsigneds, so we are in the first sub-case. */ + return const_flag | CF_LONG; + } + + /* Otherwise, if either operand has type long int, the other operand is converted to long int. + */ + if (ltype == CF_LONG || rtype == CF_LONG) { + return const_flag | CF_LONG; + } + + /* Otherwise, if either operand has type unsigned int, the other operand is converted to + ** unsigned int. + */ + if ((ltype == CF_INT && (lhs & CF_UNSIGNED)) || + (rtype == CF_INT && (rhs & CF_UNSIGNED))) { + return const_flag | CF_UNSIGNED | CF_INT; + } + + /* Otherwise, both operands have type int. */ + CHECK (ltype == CF_INT); + CHECK (!(lhs & CF_UNSIGNED)); + CHECK (rtype == CF_INT); + CHECK (!(rhs & CF_UNSIGNED)); + return const_flag | CF_INT; } @@ -1423,106 +1560,24 @@ void g_scale (unsigned flags, long val) ** pointer points to. */ { - int p2; - /* Value may not be zero */ if (val == 0) { Internal ("Data type has no size"); } else if (val > 0) { - /* Scale up */ - if ((p2 = PowerOf2 (val)) > 0 && p2 <= 4) { - - /* Factor is 2, 4, 8 and 16, use special function */ - switch (flags & CF_TYPEMASK) { - - case CF_CHAR: - if (flags & CF_FORCECHAR) { - while (p2--) { - AddCodeLine ("asl a"); - } - break; - } - /* FALLTHROUGH */ - - case CF_INT: - if (flags & CF_UNSIGNED) { - AddCodeLine ("jsr shlax%d", p2); - } else { - AddCodeLine ("jsr aslax%d", p2); - } - break; - - case CF_LONG: - if (flags & CF_UNSIGNED) { - AddCodeLine ("jsr shleax%d", p2); - } else { - AddCodeLine ("jsr asleax%d", p2); - } - break; - - default: - typeerror (flags); - - } - - } else if (val != 1) { - - /* Use a multiplication instead */ + /* Use a multiplication instead */ + if (val != 1) { g_mul (flags | CF_CONST, val); - } } else { /* Scale down */ val = -val; - if ((p2 = PowerOf2 (val)) > 0 && p2 <= 4) { - /* Factor is 2, 4, 8 and 16 use special function */ - switch (flags & CF_TYPEMASK) { - - case CF_CHAR: - if (flags & CF_FORCECHAR) { - if (flags & CF_UNSIGNED) { - while (p2--) { - AddCodeLine ("lsr a"); - } - break; - } else if (p2 <= 2) { - AddCodeLine ("cmp #$80"); - AddCodeLine ("ror a"); - break; - } - } - /* FALLTHROUGH */ - - case CF_INT: - if (flags & CF_UNSIGNED) { - AddCodeLine ("jsr lsrax%d", p2); - } else { - AddCodeLine ("jsr asrax%d", p2); - } - break; - - case CF_LONG: - if (flags & CF_UNSIGNED) { - AddCodeLine ("jsr lsreax%d", p2); - } else { - AddCodeLine ("jsr asreax%d", p2); - } - break; - - default: - typeerror (flags); - - } - - } else if (val != 1) { - - /* Use a division instead */ + /* Use a division instead */ + if (val != 1) { g_div (flags | CF_CONST, val); - } } } @@ -1539,16 +1594,17 @@ void g_addlocal (unsigned flags, int offs) /* Add a local variable to ax */ { unsigned L; + int NewOff; /* Correct the offset and check it */ - offs -= StackPtr; - CheckLocalOffs (offs); + NewOff = offs - StackPtr; + CheckLocalOffs (NewOff); switch (flags & CF_TYPEMASK) { case CF_CHAR: L = GetLocalLabel(); - AddCodeLine ("ldy #$%02X", offs & 0xFF); + AddCodeLine ("ldy #$%02X", NewOff & 0xFF); AddCodeLine ("clc"); AddCodeLine ("adc (sp),y"); AddCodeLine ("bcc %s", LocalLabelName (L)); @@ -1557,7 +1613,7 @@ void g_addlocal (unsigned flags, int offs) break; case CF_INT: - AddCodeLine ("ldy #$%02X", offs & 0xFF); + AddCodeLine ("ldy #$%02X", NewOff & 0xFF); AddCodeLine ("clc"); AddCodeLine ("adc (sp),y"); AddCodeLine ("pha"); @@ -1583,7 +1639,7 @@ void g_addlocal (unsigned flags, int offs) -void g_addstatic (unsigned flags, unsigned long label, long offs) +void g_addstatic (unsigned flags, uintptr_t label, long offs) /* Add a static variable to ax */ { unsigned L; @@ -1633,7 +1689,7 @@ void g_addstatic (unsigned flags, unsigned long label, long offs) -void g_addeqstatic (unsigned flags, unsigned long label, long offs, +void g_addeqstatic (unsigned flags, uintptr_t label, long offs, unsigned long val) /* Emit += for a static variable */ { @@ -1649,7 +1705,9 @@ void g_addeqstatic (unsigned flags, unsigned long label, long offs, if (flags & CF_CONST) { if (val == 1) { AddCodeLine ("inc %s", lbuf); - AddCodeLine ("lda %s", lbuf); + if ((flags & CF_NOKEEP) == 0) { + AddCodeLine ("lda %s", lbuf); + } } else { AddCodeLine ("lda #$%02X", (int)(val & 0xFF)); AddCodeLine ("clc"); @@ -1679,8 +1737,10 @@ void g_addeqstatic (unsigned flags, unsigned long label, long offs, AddCodeLine ("bne %s", LocalLabelName (L)); AddCodeLine ("inc %s+1", lbuf); g_defcodelabel (L); - AddCodeLine ("lda %s", lbuf); /* Hmmm... */ - AddCodeLine ("ldx %s+1", lbuf); + if ((flags & CF_NOKEEP) == 0) { + AddCodeLine ("lda %s", lbuf); /* Hmmm... */ + AddCodeLine ("ldx %s+1", lbuf); + } } else { AddCodeLine ("lda #$%02X", (int)(val & 0xFF)); AddCodeLine ("clc"); @@ -1691,13 +1751,17 @@ void g_addeqstatic (unsigned flags, unsigned long label, long offs, AddCodeLine ("bcc %s", LocalLabelName (L)); AddCodeLine ("inc %s+1", lbuf); g_defcodelabel (L); - AddCodeLine ("ldx %s+1", lbuf); + if ((flags & CF_NOKEEP) == 0) { + AddCodeLine ("ldx %s+1", lbuf); + } } else { AddCodeLine ("lda #$%02X", (unsigned char)(val >> 8)); AddCodeLine ("adc %s+1", lbuf); AddCodeLine ("sta %s+1", lbuf); - AddCodeLine ("tax"); - AddCodeLine ("lda %s", lbuf); + if ((flags & CF_NOKEEP) == 0) { + AddCodeLine ("tax"); + AddCodeLine ("lda %s", lbuf); + } } } } else { @@ -1707,8 +1771,10 @@ void g_addeqstatic (unsigned flags, unsigned long label, long offs, AddCodeLine ("txa"); AddCodeLine ("adc %s+1", lbuf); AddCodeLine ("sta %s+1", lbuf); - AddCodeLine ("tax"); - AddCodeLine ("lda %s", lbuf); + if ((flags & CF_NOKEEP) == 0) { + AddCodeLine ("tax"); + AddCodeLine ("lda %s", lbuf); + } } break; @@ -1790,9 +1856,11 @@ void g_addeqlocal (unsigned flags, int Offs, unsigned long val) AddCodeLine ("lda #$%02X", (int) ((val >> 8) & 0xFF)); AddCodeLine ("adc (sp),y"); AddCodeLine ("sta (sp),y"); - AddCodeLine ("tax"); - AddCodeLine ("dey"); - AddCodeLine ("lda (sp),y"); + if ((flags & CF_NOKEEP) == 0) { + AddCodeLine ("tax"); + AddCodeLine ("dey"); + AddCodeLine ("lda (sp),y"); + } } else { g_getimmed (flags, val, 0); AddCodeLine ("jsr addeqysp"); @@ -1856,7 +1924,7 @@ void g_addeqind (unsigned flags, unsigned offs, unsigned long val) -void g_subeqstatic (unsigned flags, unsigned long label, long offs, +void g_subeqstatic (unsigned flags, uintptr_t label, long offs, unsigned long val) /* Emit -= for a static variable */ { @@ -1872,7 +1940,9 @@ void g_subeqstatic (unsigned flags, unsigned long label, long offs, if (flags & CF_CONST) { if (val == 1) { AddCodeLine ("dec %s", lbuf); - AddCodeLine ("lda %s", lbuf); + if ((flags & CF_NOKEEP) == 0) { + AddCodeLine ("lda %s", lbuf); + } } else { AddCodeLine ("lda %s", lbuf); AddCodeLine ("sec"); @@ -1906,13 +1976,17 @@ void g_subeqstatic (unsigned flags, unsigned long label, long offs, AddCodeLine ("bcs %s", LocalLabelName (L)); AddCodeLine ("dec %s+1", lbuf); g_defcodelabel (L); - AddCodeLine ("ldx %s+1", lbuf); + if ((flags & CF_NOKEEP) == 0) { + AddCodeLine ("ldx %s+1", lbuf); + } } else { AddCodeLine ("lda %s+1", lbuf); AddCodeLine ("sbc #$%02X", (unsigned char)(val >> 8)); AddCodeLine ("sta %s+1", lbuf); - AddCodeLine ("tax"); - AddCodeLine ("lda %s", lbuf); + if ((flags & CF_NOKEEP) == 0) { + AddCodeLine ("tax"); + AddCodeLine ("lda %s", lbuf); + } } } else { AddCodeLine ("eor #$FF"); @@ -1923,8 +1997,10 @@ void g_subeqstatic (unsigned flags, unsigned long label, long offs, AddCodeLine ("eor #$FF"); AddCodeLine ("adc %s+1", lbuf); AddCodeLine ("sta %s+1", lbuf); - AddCodeLine ("tax"); - AddCodeLine ("lda %s", lbuf); + if ((flags & CF_NOKEEP) == 0) { + AddCodeLine ("tax"); + AddCodeLine ("lda %s", lbuf); + } } break; @@ -2065,34 +2141,43 @@ void g_addaddr_local (unsigned flags attribute ((unused)), int offs) /* Add the offset */ offs -= StackPtr; - if (offs != 0) { - /* We cannot address more then 256 bytes of locals anyway */ - L = GetLocalLabel(); - CheckLocalOffs (offs); - AddCodeLine ("clc"); - AddCodeLine ("adc #$%02X", offs & 0xFF); - /* Do also skip the CLC insn below */ - AddCodeLine ("bcc %s", LocalLabelName (L)); - AddCodeLine ("inx"); - } + if (IS_Get (&CodeSizeFactor) <= 100) { + if (offs != 0) { + /* We cannot address more then 256 bytes of locals anyway */ + g_inc (CF_INT | CF_CONST, offs); + } + /* Add the current stackpointer value */ + AddCodeLine ("jsr leaaxsp"); + } else { + if (offs != 0) { + /* We cannot address more then 256 bytes of locals anyway */ + L = GetLocalLabel(); + CheckLocalOffs (offs); + AddCodeLine ("clc"); + AddCodeLine ("adc #$%02X", offs & 0xFF); + /* Do also skip the CLC insn below */ + AddCodeLine ("bcc %s", LocalLabelName (L)); + AddCodeLine ("inx"); + } - /* Add the current stackpointer value */ - AddCodeLine ("clc"); - if (L != 0) { - /* Label was used above */ - g_defcodelabel (L); + /* Add the current stackpointer value */ + AddCodeLine ("clc"); + if (L != 0) { + /* Label was used above */ + g_defcodelabel (L); + } + AddCodeLine ("adc sp"); + AddCodeLine ("tay"); + AddCodeLine ("txa"); + AddCodeLine ("adc sp+1"); + AddCodeLine ("tax"); + AddCodeLine ("tya"); } - AddCodeLine ("adc sp"); - AddCodeLine ("tay"); - AddCodeLine ("txa"); - AddCodeLine ("adc sp+1"); - AddCodeLine ("tax"); - AddCodeLine ("tya"); } -void g_addaddr_static (unsigned flags, unsigned long label, long offs) +void g_addaddr_static (unsigned flags, uintptr_t label, long offs) /* Add the address of a static variable to ax */ { /* Create the correct label name */ @@ -2175,7 +2260,7 @@ void g_restore (unsigned flags) void g_cmp (unsigned flags, unsigned long val) -/* Immidiate compare. The primary register will not be changed, Z flag +/* Immediate compare. The primary register will not be changed, Z flag ** will be set. */ { @@ -2210,7 +2295,7 @@ void g_cmp (unsigned flags, unsigned long val) -static void oper (unsigned Flags, unsigned long Val, const char** Subs) +static void oper (unsigned Flags, unsigned long Val, const char* const* Subs) /* Encode a binary operation. subs is a pointer to four strings: ** 0 --> Operate on ints ** 1 --> Operate on unsigneds @@ -2372,7 +2457,7 @@ void g_call (unsigned Flags, const char* Label, unsigned ArgSize) void g_callind (unsigned Flags, unsigned ArgSize, int Offs) /* Call subroutine indirect */ { - if ((Flags & CF_LOCAL) == 0) { + if ((Flags & CF_ADDRMASK) != CF_STACK) { /* Address is in a/x */ if ((Flags & CF_FIXARGC) == 0) { /* Pass arg count */ @@ -2424,6 +2509,36 @@ void g_falsejump (unsigned flags attribute ((unused)), unsigned label) +void g_branch (unsigned Label) +/* Branch unconditionally to Label if the CPU has the BRA instruction. +** Otherwise, jump to Label. +** Use this function, instead of g_jump(), only where it is certain that +** the label cannot be farther away from the branch than -128/+127 bytes. +*/ +{ + if ((CPUIsets[CPU] & (CPU_ISET_65SC02 | CPU_ISET_6502DTV)) != 0) { + AddCodeLine ("bra %s", LocalLabelName (Label)); + } else { + g_jump (Label); + } +} + + + +void g_lateadjustSP (unsigned label) +/* Adjust stack based on non-immediate data */ +{ + AddCodeLine ("pha"); + AddCodeLine ("lda %s", LocalDataLabelName (label)); + AddCodeLine ("clc"); + AddCodeLine ("adc sp"); + AddCodeLine ("sta sp"); + AddCodeLine ("lda %s+1", LocalDataLabelName (label)); + AddCodeLine ("adc sp+1"); + AddCodeLine ("sta sp+1"); + AddCodeLine ("pla"); +} + void g_drop (unsigned Space) /* Drop space allocated on the stack */ { @@ -2498,7 +2613,7 @@ void g_stackcheck (void) void g_add (unsigned flags, unsigned long val) /* Primary = TOS + Primary */ { - static const char* ops[12] = { + static const char* const ops[4] = { "tosaddax", "tosaddax", "tosaddeax", "tosaddeax" }; @@ -2514,8 +2629,8 @@ void g_add (unsigned flags, unsigned long val) void g_sub (unsigned flags, unsigned long val) /* Primary = TOS - Primary */ { - static const char* ops[12] = { - "tossubax", "tossubax", "tossubeax", "tossubeax", + static const char* const ops[4] = { + "tossubax", "tossubax", "tossubeax", "tossubeax" }; if (flags & CF_CONST) { @@ -2530,8 +2645,8 @@ void g_sub (unsigned flags, unsigned long val) void g_rsub (unsigned flags, unsigned long val) /* Primary = Primary - TOS */ { - static const char* ops[12] = { - "tosrsubax", "tosrsubax", "tosrsubeax", "tosrsubeax", + static const char* const ops[4] = { + "tosrsubax", "tosrsubax", "tosrsubeax", "tosrsubeax" }; oper (flags, val, ops); } @@ -2541,17 +2656,30 @@ void g_rsub (unsigned flags, unsigned long val) void g_mul (unsigned flags, unsigned long val) /* Primary = TOS * Primary */ { - static const char* ops[12] = { - "tosmulax", "tosumulax", "tosmuleax", "tosumuleax", + static const char* const ops[4] = { + "tosmulax", "tosumulax", "tosmuleax", "tosumuleax" }; - int p2; - /* Do strength reduction if the value is constant and a power of two */ - if (flags & CF_CONST && (p2 = PowerOf2 (val)) >= 0) { - /* Generate a shift instead */ - g_asl (flags, p2); - return; + if (flags & CF_CONST) { + + /* Deal with negative values if it's signed multiplication */ + int Negation = (flags & CF_UNSIGNED) == 0 && (long)val < 0; + int p2 = PowerOf2 (Negation ? 0UL - val : val); + + /* Check if we can use shift instead of multiplication */ + if (p2 == 0 || (p2 > 0 && IS_Get (&CodeSizeFactor) >= (Negation ? 100 : 0))) { + /* Generate a shift instead */ + g_asl (flags, p2); + + /* Negate the result if val is negative */ + if (Negation) { + g_neg (flags); + } + + /* Done */ + return; + } } /* If the right hand side is const, the lhs is not on stack but still @@ -2648,24 +2776,110 @@ void g_mul (unsigned flags, unsigned long val) void g_div (unsigned flags, unsigned long val) /* Primary = TOS / Primary */ { - static const char* ops[12] = { - "tosdivax", "tosudivax", "tosdiveax", "tosudiveax", + static const char* const ops[4] = { + "tosdivax", "tosudivax", "tosdiveax", "tosudiveax" }; /* Do strength reduction if the value is constant and a power of two */ - int p2; - if ((flags & CF_CONST) && (p2 = PowerOf2 (val)) >= 0) { + if (flags & CF_CONST) { + + /* Deal with negative values as well as different sizes */ + int Negation = (flags & CF_UNSIGNED) == 0 && (long)val < 0; + unsigned long NegatedVal = 0UL - val; + int p2 = PowerOf2 (Negation ? NegatedVal : val); + /* Generate a shift instead */ - g_asr (flags, p2); - } else { - /* Generate a division */ - if (flags & CF_CONST) { - /* lhs is not on stack */ - flags &= ~CF_FORCECHAR; /* Handle chars as ints */ - g_push (flags & ~CF_CONST, 0); + if ((flags & CF_UNSIGNED) != 0 && p2 > 0) { + g_asr (flags, p2); + return; } - oper (flags, val, ops); + + /* Check if we can afford using shift instead of multiplication at the + ** cost of code size */ + if (p2 == 0 || (p2 > 0 && IS_Get (&CodeSizeFactor) >= (Negation ? 200 : 170))) { + /* Generate a conditional shift instead */ + if (p2 > 0) { + unsigned int DoShiftLabel = GetLocalLabel (); + unsigned int EndLabel = GetLocalLabel (); + unsigned long MaskedVal = Negation ? val : NegatedVal; + + /* GitHub #169 - if abs(expr) < abs(val), the result is always 0. + ** First, check whether expr >= 0 and skip to the shift if true. + */ + switch (flags & CF_TYPEMASK) { + case CF_CHAR: + if (flags & CF_FORCECHAR) { + MaskedVal &= 0xFF; + AddCodeLine ("cmp #$00"); + AddCodeLine ("bpl %s", LocalLabelName (DoShiftLabel)); + break; + } + /* FALLTHROUGH */ + + case CF_INT: + MaskedVal &= 0xFFFF; + AddCodeLine ("cpx #$00"); + AddCodeLine ("bpl %s", LocalLabelName (DoShiftLabel)); + break; + + case CF_LONG: + MaskedVal &= 0xFFFFFFFF; + AddCodeLine ("ldy sreg+1"); + AddCodeLine ("bpl %s", LocalLabelName (DoShiftLabel)); + break; + + default: + typeerror (flags); + break; + } + /* Second, check whether expr <= -asb(val) and skip to the + ** shift if true. The original content of expr has to be saved + ** before the checking comparison and restored after that, as + ** the content in Primary register will be destroyed. + ** The result of the comparison is a boolean. We can store + ** it in the Carry flag with a LSR and branch on it later. + */ + g_save (flags); + g_le (flags | CF_UNSIGNED, MaskedVal); + AddCodeLine ("lsr a"); + g_restore (flags); + AddCodeLine ("bcs %s", LocalLabelName (DoShiftLabel)); + + /* The result is 0. We can just load 0 and skip the shifting. */ + g_getimmed (flags | CF_ABSOLUTE, 0, 0); + + /* TODO: replace with BEQ? Would it be optimized? */ + g_jump (EndLabel); + + /* Do the shift. The sign of the result may need to be corrected + ** later. + */ + g_defcodelabel (DoShiftLabel); + g_asr (flags, p2); + g_defcodelabel (EndLabel); + } + + /* Negate the result as long as val < 0, even if val == -1 and no + ** shift was generated. + */ + if (Negation) { + g_neg (flags); + } + + /* Done */ + return; + } + + /* If we go here, we didn't emit code. Push the lhs on stack and fall + ** into the normal, non-optimized stuff. + */ + flags &= ~CF_FORCECHAR; /* Handle chars as ints */ + g_push (flags & ~CF_CONST, 0); } + + /* Generate a division */ + oper (flags, val, ops); + } @@ -2673,8 +2887,8 @@ void g_div (unsigned flags, unsigned long val) void g_mod (unsigned flags, unsigned long val) /* Primary = TOS % Primary */ { - static const char* ops[12] = { - "tosmodax", "tosumodax", "tosmodeax", "tosumodeax", + static const char* const ops[4] = { + "tosmodax", "tosumodax", "tosmodeax", "tosumodeax" }; int p2; @@ -2698,8 +2912,8 @@ void g_mod (unsigned flags, unsigned long val) void g_or (unsigned flags, unsigned long val) /* Primary = TOS | Primary */ { - static const char* ops[12] = { - "tosorax", "tosorax", "tosoreax", "tosoreax", + static const char* const ops[4] = { + "tosorax", "tosorax", "tosoreax", "tosoreax" }; /* If the right hand side is const, the lhs is not on stack but still @@ -2768,8 +2982,8 @@ void g_or (unsigned flags, unsigned long val) void g_xor (unsigned flags, unsigned long val) /* Primary = TOS ^ Primary */ { - static const char* ops[12] = { - "tosxorax", "tosxorax", "tosxoreax", "tosxoreax", + static const char* const ops[4] = { + "tosxorax", "tosxorax", "tosxoreax", "tosxoreax" }; @@ -2836,8 +3050,8 @@ void g_xor (unsigned flags, unsigned long val) void g_and (unsigned Flags, unsigned long Val) /* Primary = TOS & Primary */ { - static const char* ops[12] = { - "tosandax", "tosandax", "tosandeax", "tosandeax", + static const char* const ops[4] = { + "tosandax", "tosandax", "tosandeax", "tosandeax" }; /* If the right hand side is const, the lhs is not on stack but still @@ -2928,28 +3142,68 @@ void g_and (unsigned Flags, unsigned long Val) void g_asr (unsigned flags, unsigned long val) /* Primary = TOS >> Primary */ { - static const char* ops[12] = { - "tosasrax", "tosshrax", "tosasreax", "tosshreax", + static const char* const ops[4] = { + "tosasrax", "tosshrax", "tosasreax", "tosshreax" }; - /* If the right hand side is const, the lhs is not on stack but still + /* If the right hand side is const, the lhs is not on stack, but still ** in the primary register. */ if (flags & CF_CONST) { - switch (flags & CF_TYPEMASK) { - case CF_CHAR: + if (flags & CF_FORCECHAR) { + val &= 7; + if ((flags & CF_UNSIGNED) != 0) { + /* Instead of `val` right shifts, we can also do `9 - val` left rotates + ** and a mask. This saves 3 bytes and 8 cycles for `val == 7` and + ** 1 byte and 4 cycles for `val == 6`. + */ + if (val < 6) { + while (val--) { + AddCodeLine ("lsr a"); /* 1 byte, 2 cycles */ + } + } else { + unsigned i; + /* The first ROL shifts in garbage and sets carry to the high bit. + ** The garbage is cleaned up by the mask. + */ + for (i = val; i < 9; ++i) { + AddCodeLine ("rol a"); /* 1 byte, 2 cycles */ + } + /* 2 bytes, 2 cycles */ + AddCodeLine ("and #$%02X", 0xFF >> val); + } + return; + } else if (val <= 2) { + while (val--) { + AddCodeLine ("cmp #$80"); + AddCodeLine ("ror a"); + } + return; + } + AddCodeLine ("ldx #$00"); + if ((flags & CF_UNSIGNED) == 0) { + unsigned L = GetLocalLabel (); + + AddCodeLine ("cmp #$80"); /* Sign bit into carry */ + AddCodeLine ("bcc %s", LocalLabelName (L)); + AddCodeLine ("dex"); /* Make $FF */ + g_defcodelabel (L); + } + } + /* FALLTHROUGH */ + case CF_INT: val &= 0x0F; if (val >= 8) { + AddCodeLine ("txa"); if (flags & CF_UNSIGNED) { - AddCodeLine ("txa"); AddCodeLine ("ldx #$00"); } else { - unsigned L = GetLocalLabel(); + unsigned L = GetLocalLabel (); + AddCodeLine ("cpx #$80"); /* Sign bit into carry */ - AddCodeLine ("txa"); AddCodeLine ("ldx #$00"); AddCodeLine ("bcc %s", LocalLabelName (L)); AddCodeLine ("dex"); /* Make $FF */ @@ -2967,9 +3221,9 @@ void g_asr (unsigned flags, unsigned long val) } if (val > 0) { if (flags & CF_UNSIGNED) { - AddCodeLine ("jsr shrax%ld", val); + AddCodeLine ("jsr shrax%lu", val); } else { - AddCodeLine ("jsr asrax%ld", val); + AddCodeLine ("jsr asrax%lu", val); } } return; @@ -2980,7 +3234,8 @@ void g_asr (unsigned flags, unsigned long val) AddCodeLine ("ldx #$00"); AddCodeLine ("lda sreg+1"); if ((flags & CF_UNSIGNED) == 0) { - unsigned L = GetLocalLabel(); + unsigned L = GetLocalLabel (); + AddCodeLine ("bpl %s", LocalLabelName (L)); AddCodeLine ("dex"); g_defcodelabel (L); @@ -2993,7 +3248,8 @@ void g_asr (unsigned flags, unsigned long val) AddCodeLine ("ldy #$00"); AddCodeLine ("ldx sreg+1"); if ((flags & CF_UNSIGNED) == 0) { - unsigned L = GetLocalLabel(); + unsigned L = GetLocalLabel (); + AddCodeLine ("bpl %s", LocalLabelName (L)); AddCodeLine ("dey"); g_defcodelabel (L); @@ -3009,7 +3265,8 @@ void g_asr (unsigned flags, unsigned long val) AddCodeLine ("ldy sreg+1"); AddCodeLine ("sty sreg"); if ((flags & CF_UNSIGNED) == 0) { - unsigned L = GetLocalLabel(); + unsigned L = GetLocalLabel (); + AddCodeLine ("cpy #$80"); AddCodeLine ("ldy #$00"); AddCodeLine ("bcc %s", LocalLabelName (L)); @@ -3031,9 +3288,9 @@ void g_asr (unsigned flags, unsigned long val) } if (val > 0) { if (flags & CF_UNSIGNED) { - AddCodeLine ("jsr shreax%ld", val); + AddCodeLine ("jsr shreax%lu", val); } else { - AddCodeLine ("jsr asreax%ld", val); + AddCodeLine ("jsr asreax%lu", val); } } return; @@ -3059,19 +3316,36 @@ void g_asr (unsigned flags, unsigned long val) void g_asl (unsigned flags, unsigned long val) /* Primary = TOS << Primary */ { - static const char* ops[12] = { - "tosaslax", "tosshlax", "tosasleax", "tosshleax", + static const char* const ops[4] = { + "tosaslax", "tosshlax", "tosasleax", "tosshleax" }; - - /* If the right hand side is const, the lhs is not on stack but still + /* If the right hand side is const, the lhs is not on stack, but still ** in the primary register. */ if (flags & CF_CONST) { - switch (flags & CF_TYPEMASK) { - case CF_CHAR: + if ((flags & CF_FORCECHAR) != 0) { + val &= 7; + /* Large shifts are faster and smaller with ROR. See g_asr for detailed + ** byte and cycle counts. + */ + if (val < 6) { + while (val--) { + AddCodeLine ("asl a"); + } + } else { + unsigned i; + for (i = val; i < 9; ++i) { + AddCodeLine ("ror a"); + } + AddCodeLine ("and #$%02X", (~0U << val) & 0xFF); + } + return; + } + /* FALLTHROUGH */ + case CF_INT: val &= 0x0F; if (val >= 8) { @@ -3089,9 +3363,9 @@ void g_asl (unsigned flags, unsigned long val) } if (val > 0) { if (flags & CF_UNSIGNED) { - AddCodeLine ("jsr shlax%ld", val); + AddCodeLine ("jsr shlax%lu", val); } else { - AddCodeLine ("jsr aslax%ld", val); + AddCodeLine ("jsr aslax%lu", val); } } return; @@ -3130,9 +3404,9 @@ void g_asl (unsigned flags, unsigned long val) } if (val > 0) { if (flags & CF_UNSIGNED) { - AddCodeLine ("jsr shleax%ld", val); + AddCodeLine ("jsr shleax%lu", val); } else { - AddCodeLine ("jsr asleax%ld", val); + AddCodeLine ("jsr asleax%lu", val); } } return; @@ -3437,8 +3711,8 @@ void g_dec (unsigned flags, unsigned long val) void g_eq (unsigned flags, unsigned long val) /* Test for equal */ { - static const char* ops[12] = { - "toseqax", "toseqax", "toseqeax", "toseqeax", + static const char* const ops[4] = { + "toseqax", "toseqax", "toseqeax", "toseqeax" }; unsigned L; @@ -3491,8 +3765,8 @@ void g_eq (unsigned flags, unsigned long val) void g_ne (unsigned flags, unsigned long val) /* Test for not equal */ { - static const char* ops[12] = { - "tosneax", "tosneax", "tosneeax", "tosneeax", + static const char* const ops[4] = { + "tosneax", "tosneax", "tosneeax", "tosneeax" }; unsigned L; @@ -3545,8 +3819,8 @@ void g_ne (unsigned flags, unsigned long val) void g_lt (unsigned flags, unsigned long val) /* Test for less than */ { - static const char* ops[12] = { - "tosltax", "tosultax", "toslteax", "tosulteax", + static const char* const ops[4] = { + "tosltax", "tosultax", "toslteax", "tosulteax" }; unsigned Label; @@ -3564,7 +3838,7 @@ void g_lt (unsigned flags, unsigned long val) /* Give a warning in some special cases */ if (val == 0) { - Warning ("Condition is never true"); + Warning ("Comparison of unsigned type < 0 is always false"); AddCodeLine ("jsr return0"); return; } @@ -3707,8 +3981,8 @@ void g_lt (unsigned flags, unsigned long val) void g_le (unsigned flags, unsigned long val) /* Test for less than or equal to */ { - static const char* ops[12] = { - "tosleax", "tosuleax", "tosleeax", "tosuleeax", + static const char* const ops[4] = { + "tosleax", "tosuleax", "tosleeax", "tosuleeax" }; @@ -3822,8 +4096,8 @@ void g_le (unsigned flags, unsigned long val) void g_gt (unsigned flags, unsigned long val) /* Test for greater than */ { - static const char* ops[12] = { - "tosgtax", "tosugtax", "tosgteax", "tosugteax", + static const char* const ops[4] = { + "tosgtax", "tosugtax", "tosgteax", "tosugteax" }; @@ -3953,8 +4227,8 @@ void g_gt (unsigned flags, unsigned long val) void g_ge (unsigned flags, unsigned long val) /* Test for greater than or equal to */ { - static const char* ops[12] = { - "tosgeax", "tosugeax", "tosgeeax", "tosugeeax", + static const char* const ops[4] = { + "tosgeax", "tosugeax", "tosgeeax", "tosugeeax" }; unsigned Label; @@ -4122,7 +4396,7 @@ void g_res (unsigned n) -void g_defdata (unsigned flags, unsigned long val, long offs) +void g_defdata (unsigned flags, uintptr_t val, long offs) /* Define data with the size given in flags */ { if (flags & CF_CONST) { @@ -4131,15 +4405,15 @@ void g_defdata (unsigned flags, unsigned long val, long offs) switch (flags & CF_TYPEMASK) { case CF_CHAR: - AddDataLine ("\t.byte\t$%02lX", val & 0xFF); + AddDataLine ("\t.byte\t$%02"PRIXPTR, val & 0xFF); break; case CF_INT: - AddDataLine ("\t.word\t$%04lX", val & 0xFFFF); + AddDataLine ("\t.word\t$%04"PRIXPTR, val & 0xFFFF); break; case CF_LONG: - AddDataLine ("\t.dword\t$%08lX", val & 0xFFFFFFFF); + AddDataLine ("\t.dword\t$%08"PRIXPTR, val & 0xFFFFFFFF); break; default: @@ -4241,7 +4515,7 @@ void g_initauto (unsigned Label, unsigned Size) AddCodeLine ("lda %s,y", GetLabelName (CF_STATIC, Label, 0)); AddCodeLine ("sta (sp),y"); AddCodeLine ("iny"); - AddCodeLine ("cpy #$%02X", (unsigned char) Size); + AddCmpCodeIfSizeNot256 ("cpy #$%02X", Size); AddCodeLine ("bne %s", LocalLabelName (CodeLabel)); } } @@ -4266,16 +4540,295 @@ void g_initstatic (unsigned InitLabel, unsigned VarLabel, unsigned Size) AddCodeLine ("lda %s,y", GetLabelName (CF_STATIC, InitLabel, 0)); AddCodeLine ("sta %s,y", GetLabelName (CF_STATIC, VarLabel, 0)); AddCodeLine ("iny"); - AddCodeLine ("cpy #$%02X", (unsigned char) Size); + AddCmpCodeIfSizeNot256 ("cpy #$%02X", Size); AddCodeLine ("bne %s", LocalLabelName (CodeLabel)); } else { - /* Use the easy way here: memcpy */ + /* Use the easy way here: memcpy() */ g_getimmed (CF_STATIC, VarLabel, 0); AddCodeLine ("jsr pushax"); g_getimmed (CF_STATIC, InitLabel, 0); AddCodeLine ("jsr pushax"); g_getimmed (CF_INT | CF_UNSIGNED | CF_CONST, Size, 0); - AddCodeLine ("jsr %s", GetLabelName (CF_EXTERNAL, (unsigned long) "memcpy", 0)); + AddCodeLine ("jsr %s", GetLabelName (CF_EXTERNAL, (uintptr_t) "memcpy", 0)); + } +} + + + +/*****************************************************************************/ +/* Bit-fields */ +/*****************************************************************************/ + + + +void g_testbitfield (unsigned Flags, unsigned BitOffs, unsigned BitWidth) +/* Test bit-field in primary. */ +{ + /* Since the end is inclusive and cannot be negative here, we subtract 1 from the sum */ + unsigned MSBit = BitOffs + BitWidth - 1U; + unsigned Bytes = MSBit / CHAR_BITS + 1U - BitOffs / CHAR_BITS; + unsigned HeadMask = (0xFF << (BitOffs % CHAR_BITS)) & 0xFF; + unsigned TailMask = ((1U << (MSBit % CHAR_BITS + 1U)) - 1U) & 0xFF; + unsigned UntestedBytes = ((1U << Bytes) - 1U) << (BitOffs / CHAR_BITS); + + /* We don't use these flags for now. Could CF_NOKEEP be potentially interesting? */ + Flags &= ~CF_STYPEMASK; + + /* If we need to do a test, then we avoid shifting (ASR only shifts one bit at a time, + ** so is slow) and just AND the head and tail bytes with the appropriate mask, then + ** OR the results with the rest bytes. + */ + if (Bytes == 1) { + HeadMask = TailMask = HeadMask & TailMask; + } + + /* Get the head byte */ + switch (BitOffs / CHAR_BITS) { + case 0: + if (HeadMask == 0xFF && Bytes == 1) { + AddCodeLine ("tax"); + UntestedBytes &= ~0x1; + } + break; + case 1: + if (HeadMask != 0xFF || TailMask == 0xFF) { + AddCodeLine ("txa"); + UntestedBytes &= ~0x2; + } + break; + case 2: + if (HeadMask != 0xFF || TailMask == 0xFF) { + AddCodeLine ("lda sreg"); + UntestedBytes &= ~0x4; + } + break; + case 3: + /* In this case we'd have HeadMask == TailMask and only 1 byte, but anyways... */ + if (HeadMask != 0xFF || TailMask == 0xFF) { + AddCodeLine ("lda sreg+1"); + UntestedBytes &= ~0x8; + } + break; + default: + break; + } + + /* Keep in mind that the head is NOT always "Byte 0" */ + if (HeadMask != 0xFF) { + AddCodeLine ("and #$%02X", HeadMask); + /* Abuse the "Byte 0" flag so that this head content will be saved by the routine */ + UntestedBytes |= 0x1; + } + + /* If there is only 1 byte to test, we have done with it */ + if (Bytes == 1) { + return; + } + + /* Handle the tail byte */ + if (TailMask != 0xFF) { + /* If we have to do any more masking operation, register A will be used for that, + ** and its current content in it must be saved. + */ + if (UntestedBytes & 0x1) { + AddCodeLine ("sta tmp1"); + } + + /* Test the tail byte */ + switch (MSBit / CHAR_BITS) { + case 1: + AddCodeLine ("txa"); + UntestedBytes &= ~0x2; + break; + case 2: + AddCodeLine ("lda sreg"); + UntestedBytes &= ~0x4; + break; + case 3: + AddCodeLine ("lda sreg+1"); + UntestedBytes &= ~0x8; + break; + default: + break; + } + AddCodeLine ("and #$%02X", TailMask); + + if (UntestedBytes & 0x1) { + AddCodeLine ("ora tmp1"); + } + } + + /* OR the rest bytes together, which could never need masking */ + if (UntestedBytes & 0x2) { + AddCodeLine ("stx tmp1"); + AddCodeLine ("ora tmp1"); + } + if (UntestedBytes & 0x4) { + AddCodeLine ("ora sreg"); + } + if (UntestedBytes & 0x8) { + AddCodeLine ("ora sreg+1"); + } +} + + + +void g_extractbitfield (unsigned Flags, unsigned FullWidthFlags, int IsSigned, + unsigned BitOffs, unsigned BitWidth) +/* Extract bits from bit-field in primary. */ +{ + unsigned EndBit = BitOffs + BitWidth; + unsigned long ZeroExtendMask = 0; /* Zero if we don't need to zero-extend. */ + + /* Shift right by the bit offset; no code is emitted if BitOffs is zero */ + g_asr (Flags | CF_CONST, BitOffs); + + /* To zero-extend, we will and by the width if the field doesn't end on a char or + ** int boundary. If it does end on a boundary, then zeros will have already been shifted in, + ** but we need to clear the high byte for char. g_and emits no code if the mask is all ones. + ** This is here so the signed and unsigned branches can use it. + */ + if (EndBit == CHAR_BITS) { + /* We need to clear the high byte, since CF_FORCECHAR was set. */ + ZeroExtendMask = 0xFF; + } else if (EndBit != INT_BITS && EndBit != LONG_BITS) { + ZeroExtendMask = shl_l (1UL, BitWidth) - 1UL; + } + + /* Handle signed bit-fields. */ + if (IsSigned) { + unsigned SignBitPos = BitWidth - 1U; + unsigned SignBitByte = SignBitPos / CHAR_BITS; + unsigned SignBitPosInByte = SignBitPos % CHAR_BITS; + + if (ZeroExtendMask != 0) { + /* The universal trick is: + ** x = bits & bit_mask + ** m = 1 << (bit_width - 1) + ** r = (x ^ m) - m + ** which works for long as well. + */ + + if (SignBitByte + 1U == sizeofarg (FullWidthFlags)) { + /* We can just sign-extend on the high byte if it is the only affected one */ + unsigned char SignBitMask = (1UL << SignBitPosInByte) & 0xFF; + unsigned char Mask = ((2UL << (SignBitPos % CHAR_BITS)) - 1UL) & 0xFF; + + /* Move the correct byte to .A */ + switch (SignBitByte) { + case 0: + break; + case 1: + AddCodeLine ("tay"); + AddCodeLine ("txa"); + break; + case 3: + AddCodeLine ("tay"); + AddCodeLine ("lda sreg+1"); + break; + default: + FAIL ("Invalid Byte for sign bit"); + } + + /* Use .A to do the ops on the correct byte */ + AddCodeLine ("and #$%02X", Mask); + AddCodeLine ("eor #$%02X", SignBitMask); + AddCodeLine ("sec"); + AddCodeLine ("sbc #$%02X", SignBitMask); + + /* Move the correct byte from .A */ + switch (SignBitByte) { + case 0: + break; + case 1: + AddCodeLine ("tax"); + AddCodeLine ("tya"); + break; + case 3: + AddCodeLine ("sta sreg+1"); + AddCodeLine ("tya"); + break; + default: + FAIL ("Invalid Byte for sign bit"); + } + } else { + unsigned long SignBitMask = 1UL << SignBitPos; + unsigned long Mask = (2UL << SignBitPos) - 1UL; + g_and (FullWidthFlags | CF_CONST, Mask); + g_xor (FullWidthFlags | CF_CONST, SignBitMask); + g_dec (FullWidthFlags | CF_CONST, SignBitMask); + } + } else { + unsigned char SignBitMask = (1UL << SignBitPosInByte) & 0xFF; + unsigned ZeroExtendLabel = GetLocalLabel (); + + /* Save .A because the sign-bit test will destroy it. */ + AddCodeLine ("tay"); + + /* Move the correct byte to .A */ + switch (SignBitByte) { + case 0: + break; + case 1: + AddCodeLine ("txa"); + break; + case 3: + AddCodeLine ("lda sreg+1"); + break; + default: + FAIL ("Invalid Byte for sign bit"); + } + + /* Test the sign bit */ + AddCodeLine ("and #$%02X", SignBitMask); + AddCodeLine ("beq %s", LocalLabelName (ZeroExtendLabel)); + + if (SignBitByte + 1U == sizeofarg (FullWidthFlags)) { + /* We can just sign-extend on the high byte if it is the only affected one */ + unsigned char Mask = ~((2UL << (SignBitPos % CHAR_BITS)) - 1UL) & 0xFF; + + /* Use .A to do the ops on the correct byte */ + switch (SignBitByte) { + case 0: + AddCodeLine ("tya"); + AddCodeLine ("ora #$%02X", Mask); + /* We could jump over the following tya instead, but that wouldn't be faster + ** than taking this extra tay and then the tya. + */ + AddCodeLine ("tay"); + break; + case 1: + AddCodeLine ("txa"); + AddCodeLine ("ora #$%02X", Mask); + AddCodeLine ("tax"); + break; + case 3: + AddCodeLine ("lda sreg+1"); + AddCodeLine ("ora #$%02X", Mask); + AddCodeLine ("sta sreg+1"); + break; + default: + FAIL ("Invalid Byte for sign bit"); + } + } else { + /* Since we are going to get back .A later anyways, we may just do the op on the + ** higher bytes with whatever content currently in it. + */ + unsigned long Mask = ~((2UL << SignBitPos) - 1UL); + g_or (FullWidthFlags | CF_CONST, Mask); + } + + /* Get back .A. We need to duplicate the TYA, rather than move it before + ** the branch to share with the other label, because TYA changes some condition codes. + */ + g_defcodelabel (ZeroExtendLabel); + AddCodeLine ("tya"); + } + } else { + /* Unsigned bit-field, needs only zero-extension. */ + if (ZeroExtendMask != 0) { + g_and (FullWidthFlags | CF_CONST, ZeroExtendMask); + } } } diff --git a/src/cc65/codegen.h b/src/cc65/codegen.h index 4ad375618..cb62d78bd 100644 --- a/src/cc65/codegen.h +++ b/src/cc65/codegen.h @@ -37,6 +37,7 @@ #define CODEGEN_H +#include <inttypes.h> /* common */ #include "coll.h" @@ -61,34 +62,38 @@ #define CF_NONE 0x0000 /* No special flags */ /* Values for the actual type */ -#define CF_CHAR 0x0003 /* Operation on characters */ -#define CF_INT 0x0001 /* Operation on ints */ +#define CF_CHAR 0x0007 /* Operation on characters */ +#define CF_INT 0x0003 /* Operation on ints */ +#define CF_SHORT CF_INT /* Alias */ #define CF_PTR CF_INT /* Alias for readability */ -#define CF_LONG 0x0000 /* Operation on longs */ -#define CF_FLOAT 0x0004 /* Operation on a float */ +#define CF_LONG 0x0001 /* Operation on longs */ +#define CF_FLOAT 0x0010 /* Operation on a float */ /* Signedness */ #define CF_UNSIGNED 0x0008 /* Value is unsigned */ /* Masks for retrieving type information */ -#define CF_TYPEMASK 0x0007 /* Type information */ -#define CF_STYPEMASK 0x000F /* Includes signedness */ +#define CF_TYPEMASK 0x0017 /* Type information */ +#define CF_STYPEMASK 0x001F /* Includes signedness */ -#define CF_NOKEEP 0x0010 /* Value may get destroyed when storing */ -#define CF_CONST 0x0020 /* Constant value available */ -#define CF_CONSTADDR 0x0040 /* Constant address value available */ +#define CF_CONST 0x0040 /* Constant value available */ #define CF_TEST 0x0080 /* Test value */ #define CF_FIXARGC 0x0100 /* Function has fixed arg count */ #define CF_FORCECHAR 0x0200 /* Handle chars as chars, not ints */ -#define CF_REG 0x0800 /* Value is in primary register */ +#define CF_NOKEEP 0x0400 /* Value may get destroyed when storing */ -/* Type of static address */ -#define CF_ADDRMASK 0xF000 /* Type of address */ -#define CF_STATIC 0x0000 /* Static local */ -#define CF_EXTERNAL 0x1000 /* Static external */ -#define CF_ABSOLUTE 0x2000 /* Numeric absolute address */ -#define CF_LOCAL 0x4000 /* Auto variable */ -#define CF_REGVAR 0x8000 /* Register variable */ +/* Type of address */ +#define CF_ADDRMASK 0xF000 /* Bit mask of address type */ +#define CF_IMM 0x0000 /* Value is pure rvalue and has no storage */ +#define CF_ABSOLUTE 0x1000 /* Numeric absolute address */ +#define CF_EXTERNAL 0x2000 /* External */ +#define CF_REGVAR 0x4000 /* Register variable */ +#define CF_LITERAL 0x7000 /* Literal */ +#define CF_PRIMARY 0x8000 /* Value is in primary register */ +#define CF_EXPR 0x9000 /* Value is addressed by primary register */ +#define CF_STATIC 0xA000 /* Local static */ +#define CF_CODE 0xB000 /* C code label location */ +#define CF_STACK 0xC000 /* Function-local auto on stack */ @@ -143,9 +148,6 @@ void g_defcodelabel (unsigned label); void g_defdatalabel (unsigned label); /* Define a local data label */ -void g_aliasdatalabel (unsigned label, unsigned baselabel, long offs); -/* Define label as a local alias for baselabel+offs */ - /*****************************************************************************/ @@ -157,6 +159,12 @@ void g_aliasdatalabel (unsigned label, unsigned baselabel, long offs); void g_defgloblabel (const char* Name); /* Define a global label with the given name */ +void g_defliterallabel (unsigned label); +/* Define a literal data label */ + +void g_aliasliterallabel (unsigned label, unsigned baselabel, long offs); +/* Define label as an alias for baselabel+offs */ + void g_defexport (const char* Name, int ZP); /* Export the given label */ @@ -209,7 +217,7 @@ void g_reglong (unsigned Flags); unsigned g_typeadjust (unsigned lhs, unsigned rhs); /* Adjust the integer operands before doing a binary operation. lhs is a flags ** value, that corresponds to the value on TOS, rhs corresponds to the value -** in (e)ax. The return value is the the flags value for the resulting type. +** in (e)ax. The return value is the flags value for the resulting type. */ unsigned g_typecast (unsigned lhs, unsigned rhs); @@ -263,10 +271,10 @@ void g_restore_regvars (int StackOffs, int RegOffs, unsigned Bytes); -void g_getimmed (unsigned Flags, unsigned long Val, long Offs); +void g_getimmed (unsigned Flags, uintptr_t Val, long Offs); /* Load a constant into the primary register */ -void g_getstatic (unsigned Flags, unsigned long Label, long Offs); +void g_getstatic (unsigned Flags, uintptr_t Label, long Offs); /* Fetch an static memory cell into the primary register */ void g_getlocal (unsigned Flags, int Offs); @@ -293,7 +301,7 @@ void g_leavariadic (int Offs); -void g_putstatic (unsigned flags, unsigned long label, long offs); +void g_putstatic (unsigned flags, uintptr_t label, long offs); /* Store the primary register into the specified static memory cell */ void g_putlocal (unsigned Flags, int Offs, long Val); @@ -315,7 +323,7 @@ void g_putind (unsigned flags, unsigned offs); void g_addlocal (unsigned flags, int offs); /* Add a local variable to ax */ -void g_addstatic (unsigned flags, unsigned long label, long offs); +void g_addstatic (unsigned flags, uintptr_t label, long offs); /* Add a static variable to ax */ @@ -326,7 +334,7 @@ void g_addstatic (unsigned flags, unsigned long label, long offs); -void g_addeqstatic (unsigned flags, unsigned long label, long offs, +void g_addeqstatic (unsigned flags, uintptr_t label, long offs, unsigned long val); /* Emit += for a static variable */ @@ -336,7 +344,7 @@ void g_addeqlocal (unsigned flags, int offs, unsigned long val); void g_addeqind (unsigned flags, unsigned offs, unsigned long val); /* Emit += for the location with address in ax */ -void g_subeqstatic (unsigned flags, unsigned long label, long offs, +void g_subeqstatic (unsigned flags, uintptr_t label, long offs, unsigned long val); /* Emit -= for a static variable */ @@ -357,7 +365,7 @@ void g_subeqind (unsigned flags, unsigned offs, unsigned long val); void g_addaddr_local (unsigned flags, int offs); /* Add the address of a local variable to ax */ -void g_addaddr_static (unsigned flags, unsigned long label, long offs); +void g_addaddr_static (unsigned flags, uintptr_t label, long offs); /* Add the address of a static variable to ax */ @@ -375,7 +383,7 @@ void g_restore (unsigned flags); /* Copy hold register to primary. */ void g_cmp (unsigned flags, unsigned long val); -/* Immidiate compare. The primary register will not be changed, Z flag +/* Immediate compare. The primary register will not be changed, Z flag ** will be set. */ @@ -405,6 +413,16 @@ void g_truejump (unsigned flags, unsigned label); void g_falsejump (unsigned flags, unsigned label); /* Jump to label if zero flag set */ +void g_branch (unsigned Label); +/* Branch unconditionally to Label if the CPU has the BRA instruction. +** Otherwise, jump to Label. +** Use this function, instead of g_jump(), only where it is certain that +** the label cannot be farther away from the branch than -128/+127 bytes. +*/ + +void g_lateadjustSP (unsigned label); +/* Adjust stack based on non-immediate data */ + void g_drop (unsigned Space); /* Drop space allocated on the stack */ @@ -443,7 +461,7 @@ void g_ge (unsigned flags, unsigned long val); void g_res (unsigned n); /* Reserve static storage, n bytes */ -void g_defdata (unsigned flags, unsigned long val, long offs); +void g_defdata (unsigned flags, uintptr_t val, long offs); /* Define data with the size given in flags */ void g_defbytes (const void* bytes, unsigned count); @@ -463,6 +481,17 @@ void g_initstatic (unsigned InitLabel, unsigned VarLabel, unsigned Size); +/*****************************************************************************/ +/* Bit-fields */ +/*****************************************************************************/ + +void g_testbitfield (unsigned Flags, unsigned BitOffs, unsigned BitWidth); +/* Test bit-field in primary. */ + +void g_extractbitfield (unsigned Flags, unsigned FullWidthFlags, int IsSigned, + unsigned BitOffs, unsigned BitWidth); +/* Extract bits from bit-field in primary. */ + /*****************************************************************************/ /* Switch statement */ /*****************************************************************************/ diff --git a/src/cc65/codeinfo.c b/src/cc65/codeinfo.c index de51781a6..88f8a5138 100644 --- a/src/cc65/codeinfo.c +++ b/src/cc65/codeinfo.c @@ -46,6 +46,7 @@ #include "codeseg.h" #include "datatype.h" #include "error.h" +#include "funcdesc.h" #include "global.h" #include "reginfo.h" #include "symtab.h" @@ -64,298 +65,335 @@ static const char CmpSuffixTab [][4] = { "eq", "ne", "gt", "ge", "lt", "le", "ugt", "uge", "ult", "ule" }; +/* Table with the bool transformers */ +static const char BoolTransformerTab [][8] = { + "booleq", "boolne", + "boolgt", "boolge", "boollt", "boolle", + "boolugt", "booluge", "boolult", "boolule" +}; + /* Table listing the function names and code info values for known internally ** used functions. This table should get auto-generated in the future. */ typedef struct FuncInfo FuncInfo; struct FuncInfo { const char* Name; /* Function name */ - unsigned short Use; /* Register usage */ - unsigned short Chg; /* Changed/destroyed registers */ + unsigned Use; /* Register usage */ + unsigned Chg; /* Changed/destroyed registers */ }; -/* Note for the shift functions: Shifts are done modulo 32, so all shift +/* Functions that change the SP are regarded as using the SP as well. +** The callax/jmpvec functions may call a function that uses/changes more +** registers, so we should further check the info of the called function +** or just play it safe. +** Note for the shift functions: Shifts are done modulo 32, so all shift ** routines are marked to use only the A register. The remainder is ignored ** anyway. */ static const FuncInfo FuncInfoTable[] = { - { "addeq0sp", REG_AX, REG_AXY }, - { "addeqysp", REG_AXY, REG_AXY }, - { "addysp", REG_Y, REG_NONE }, - { "aslax1", REG_AX, REG_AX | REG_TMP1 }, - { "aslax2", REG_AX, REG_AX | REG_TMP1 }, - { "aslax3", REG_AX, REG_AX | REG_TMP1 }, - { "aslax4", REG_AX, REG_AX | REG_TMP1 }, - { "aslaxy", REG_AXY, REG_AXY | REG_TMP1 }, - { "asleax1", REG_EAX, REG_EAX | REG_TMP1 }, - { "asleax2", REG_EAX, REG_EAX | REG_TMP1 }, - { "asleax3", REG_EAX, REG_EAX | REG_TMP1 }, - { "asleax4", REG_EAX, REG_EAXY | REG_TMP1 }, - { "asrax1", REG_AX, REG_AX | REG_TMP1 }, - { "asrax2", REG_AX, REG_AX | REG_TMP1 }, - { "asrax3", REG_AX, REG_AX | REG_TMP1 }, - { "asrax4", REG_AX, REG_AX | REG_TMP1 }, - { "asraxy", REG_AXY, REG_AXY | REG_TMP1 }, - { "asreax1", REG_EAX, REG_EAX | REG_TMP1 }, - { "asreax2", REG_EAX, REG_EAX | REG_TMP1 }, - { "asreax3", REG_EAX, REG_EAX | REG_TMP1 }, - { "asreax4", REG_EAX, REG_EAXY | REG_TMP1 }, - { "bnega", REG_A, REG_AX }, - { "bnegax", REG_AX, REG_AX }, - { "bnegeax", REG_EAX, REG_EAX }, - { "booleq", REG_NONE, REG_AX }, - { "boolge", REG_NONE, REG_AX }, - { "boolgt", REG_NONE, REG_AX }, - { "boolle", REG_NONE, REG_AX }, - { "boollt", REG_NONE, REG_AX }, - { "boolne", REG_NONE, REG_AX }, - { "booluge", REG_NONE, REG_AX }, - { "boolugt", REG_NONE, REG_AX }, - { "boolule", REG_NONE, REG_AX }, - { "boolult", REG_NONE, REG_AX }, - { "callax", REG_AX, REG_ALL }, - { "complax", REG_AX, REG_AX }, - { "decax1", REG_AX, REG_AX }, - { "decax2", REG_AX, REG_AX }, - { "decax3", REG_AX, REG_AX }, - { "decax4", REG_AX, REG_AX }, - { "decax5", REG_AX, REG_AX }, - { "decax6", REG_AX, REG_AX }, - { "decax7", REG_AX, REG_AX }, - { "decax8", REG_AX, REG_AX }, - { "decaxy", REG_AXY, REG_AX | REG_TMP1 }, - { "deceaxy", REG_EAXY, REG_EAX }, - { "decsp1", REG_NONE, REG_Y }, - { "decsp2", REG_NONE, REG_A }, - { "decsp3", REG_NONE, REG_A }, - { "decsp4", REG_NONE, REG_A }, - { "decsp5", REG_NONE, REG_A }, - { "decsp6", REG_NONE, REG_A }, - { "decsp7", REG_NONE, REG_A }, - { "decsp8", REG_NONE, REG_A }, - { "incax1", REG_AX, REG_AX }, - { "incax2", REG_AX, REG_AX }, - { "incax3", REG_AX, REG_AXY | REG_TMP1 }, - { "incax4", REG_AX, REG_AXY | REG_TMP1 }, - { "incax5", REG_AX, REG_AXY | REG_TMP1 }, - { "incax6", REG_AX, REG_AXY | REG_TMP1 }, - { "incax7", REG_AX, REG_AXY | REG_TMP1 }, - { "incax8", REG_AX, REG_AXY | REG_TMP1 }, - { "incaxy", REG_AXY, REG_AXY | REG_TMP1 }, - { "incsp1", REG_NONE, REG_NONE }, - { "incsp2", REG_NONE, REG_Y }, - { "incsp3", REG_NONE, REG_Y }, - { "incsp4", REG_NONE, REG_Y }, - { "incsp5", REG_NONE, REG_Y }, - { "incsp6", REG_NONE, REG_Y }, - { "incsp7", REG_NONE, REG_Y }, - { "incsp8", REG_NONE, REG_Y }, - { "laddeq", REG_EAXY|REG_PTR1_LO, REG_EAXY | REG_PTR1_HI }, - { "laddeq0sp", REG_EAX, REG_EAXY }, - { "laddeq1", REG_Y | REG_PTR1_LO, REG_EAXY | REG_PTR1_HI }, - { "laddeqa", REG_AY | REG_PTR1_LO, REG_EAXY | REG_PTR1_HI }, - { "laddeqysp", REG_EAXY, REG_EAXY }, - { "ldaidx", REG_AXY, REG_AX | REG_PTR1 }, - { "ldauidx", REG_AXY, REG_AX | REG_PTR1 }, - { "ldax0sp", REG_NONE, REG_AXY }, - { "ldaxi", REG_AX, REG_AXY | REG_PTR1 }, - { "ldaxidx", REG_AXY, REG_AXY | REG_PTR1 }, - { "ldaxysp", REG_Y, REG_AXY }, - { "ldeax0sp", REG_NONE, REG_EAXY }, - { "ldeaxi", REG_AX, REG_EAXY | REG_PTR1 }, - { "ldeaxidx", REG_AXY, REG_EAXY | REG_PTR1 }, - { "ldeaxysp", REG_Y, REG_EAXY }, - { "leaa0sp", REG_A, REG_AX }, - { "leaaxsp", REG_AX, REG_AX }, - { "lsubeq", REG_EAXY|REG_PTR1_LO, REG_EAXY | REG_PTR1_HI }, - { "lsubeq0sp", REG_EAX, REG_EAXY }, - { "lsubeq1", REG_Y | REG_PTR1_LO, REG_EAXY | REG_PTR1_HI }, - { "lsubeqa", REG_AY | REG_PTR1_LO, REG_EAXY | REG_PTR1_HI }, - { "lsubeqysp", REG_EAXY, REG_EAXY }, - { "mulax10", REG_AX, REG_AX | REG_PTR1 }, - { "mulax3", REG_AX, REG_AX | REG_PTR1 }, - { "mulax5", REG_AX, REG_AX | REG_PTR1 }, - { "mulax6", REG_AX, REG_AX | REG_PTR1 }, - { "mulax7", REG_AX, REG_AX | REG_PTR1 }, - { "mulax9", REG_AX, REG_AX | REG_PTR1 }, - { "negax", REG_AX, REG_AX }, - { "push0", REG_NONE, REG_AXY }, - { "push0ax", REG_AX, REG_Y | REG_SREG }, - { "push1", REG_NONE, REG_AXY }, - { "push2", REG_NONE, REG_AXY }, - { "push3", REG_NONE, REG_AXY }, - { "push4", REG_NONE, REG_AXY }, - { "push5", REG_NONE, REG_AXY }, - { "push6", REG_NONE, REG_AXY }, - { "push7", REG_NONE, REG_AXY }, - { "pusha", REG_A, REG_Y }, - { "pusha0", REG_A, REG_XY }, - { "pusha0sp", REG_NONE, REG_AY }, - { "pushaFF", REG_A, REG_Y }, - { "pushax", REG_AX, REG_Y }, - { "pushaysp", REG_Y, REG_AY }, - { "pushc0", REG_NONE, REG_A | REG_Y }, - { "pushc1", REG_NONE, REG_A | REG_Y }, - { "pushc2", REG_NONE, REG_A | REG_Y }, - { "pusheax", REG_EAX, REG_Y }, - { "pushl0", REG_NONE, REG_AXY }, - { "pushw", REG_AX, REG_AXY | REG_PTR1 }, - { "pushw0sp", REG_NONE, REG_AXY }, - { "pushwidx", REG_AXY, REG_AXY | REG_PTR1 }, - { "pushwysp", REG_Y, REG_AXY }, - { "regswap", REG_AXY, REG_AXY | REG_TMP1 }, - { "regswap1", REG_XY, REG_A }, - { "regswap2", REG_XY, REG_A | REG_Y }, - { "return0", REG_NONE, REG_AX }, - { "return1", REG_NONE, REG_AX }, - { "shlax1", REG_AX, REG_AX | REG_TMP1 }, - { "shlax2", REG_AX, REG_AX | REG_TMP1 }, - { "shlax3", REG_AX, REG_AX | REG_TMP1 }, - { "shlax4", REG_AX, REG_AX | REG_TMP1 }, - { "shlaxy", REG_AXY, REG_AXY | REG_TMP1 }, - { "shleax1", REG_EAX, REG_EAX | REG_TMP1 }, - { "shleax2", REG_EAX, REG_EAX | REG_TMP1 }, - { "shleax3", REG_EAX, REG_EAX | REG_TMP1 }, - { "shleax4", REG_EAX, REG_EAXY | REG_TMP1 }, - { "shrax1", REG_AX, REG_AX | REG_TMP1 }, - { "shrax2", REG_AX, REG_AX | REG_TMP1 }, - { "shrax3", REG_AX, REG_AX | REG_TMP1 }, - { "shrax4", REG_AX, REG_AX | REG_TMP1 }, - { "shraxy", REG_AXY, REG_AXY | REG_TMP1 }, - { "shreax1", REG_EAX, REG_EAX | REG_TMP1 }, - { "shreax2", REG_EAX, REG_EAX | REG_TMP1 }, - { "shreax3", REG_EAX, REG_EAX | REG_TMP1 }, - { "shreax4", REG_EAX, REG_EAXY | REG_TMP1 }, - { "staspidx", REG_A | REG_Y, REG_Y | REG_TMP1 | REG_PTR1 }, - { "stax0sp", REG_AX, REG_Y }, - { "staxspidx", REG_AXY, REG_TMP1 | REG_PTR1 }, - { "staxysp", REG_AXY, REG_Y }, - { "steax0sp", REG_EAX, REG_Y }, - { "steaxysp", REG_EAXY, REG_Y }, - { "subeq0sp", REG_AX, REG_AXY }, - { "subeqysp", REG_AXY, REG_AXY }, - { "subysp", REG_Y, REG_AY }, - { "tosadd0ax", REG_AX, REG_EAXY | REG_TMP1 }, - { "tosadda0", REG_A, REG_AXY }, - { "tosaddax", REG_AX, REG_AXY }, - { "tosaddeax", REG_EAX, REG_EAXY | REG_TMP1 }, - { "tosand0ax", REG_AX, REG_EAXY | REG_TMP1 }, - { "tosanda0", REG_A, REG_AXY }, - { "tosandax", REG_AX, REG_AXY }, - { "tosandeax", REG_EAX, REG_EAXY | REG_TMP1 }, - { "tosaslax", REG_A, REG_AXY | REG_TMP1 }, - { "tosasleax", REG_A, REG_EAXY | REG_TMP1 }, - { "tosasrax", REG_A, REG_AXY | REG_TMP1 }, - { "tosasreax", REG_A, REG_EAXY | REG_TMP1 }, - { "tosdiv0ax", REG_AX, REG_ALL }, - { "tosdiva0", REG_A, REG_ALL }, - { "tosdivax", REG_AX, REG_ALL }, - { "tosdiveax", REG_EAX, REG_ALL }, - { "toseq00", REG_NONE, REG_AXY | REG_SREG }, - { "toseqa0", REG_A, REG_AXY | REG_SREG }, - { "toseqax", REG_AX, REG_AXY | REG_SREG }, - { "toseqeax", REG_EAX, REG_AXY | REG_PTR1 }, - { "tosge00", REG_NONE, REG_AXY | REG_SREG }, - { "tosgea0", REG_A, REG_AXY | REG_SREG }, - { "tosgeax", REG_AX, REG_AXY | REG_SREG }, - { "tosgeeax", REG_EAX, REG_AXY | REG_PTR1 }, - { "tosgt00", REG_NONE, REG_AXY | REG_SREG }, - { "tosgta0", REG_A, REG_AXY | REG_SREG }, - { "tosgtax", REG_AX, REG_AXY | REG_SREG }, - { "tosgteax", REG_EAX, REG_AXY | REG_PTR1 }, - { "tosicmp", REG_AX, REG_AXY | REG_SREG }, - { "tosicmp0", REG_A, REG_AXY | REG_SREG }, - { "toslcmp", REG_EAX, REG_A | REG_Y | REG_PTR1 }, - { "tosle00", REG_NONE, REG_AXY | REG_SREG }, - { "toslea0", REG_A, REG_AXY | REG_SREG }, - { "tosleax", REG_AX, REG_AXY | REG_SREG }, - { "tosleeax", REG_EAX, REG_AXY | REG_PTR1 }, - { "toslt00", REG_NONE, REG_AXY | REG_SREG }, - { "toslta0", REG_A, REG_AXY | REG_SREG }, - { "tosltax", REG_AX, REG_AXY | REG_SREG }, - { "toslteax", REG_EAX, REG_AXY | REG_PTR1 }, - { "tosmod0ax", REG_AX, REG_ALL }, - { "tosmodeax", REG_EAX, REG_ALL }, - { "tosmul0ax", REG_AX, REG_ALL }, - { "tosmula0", REG_A, REG_ALL }, - { "tosmulax", REG_AX, REG_ALL }, - { "tosmuleax", REG_EAX, REG_ALL }, - { "tosne00", REG_NONE, REG_AXY | REG_SREG }, - { "tosnea0", REG_A, REG_AXY | REG_SREG }, - { "tosneax", REG_AX, REG_AXY | REG_SREG }, - { "tosneeax", REG_EAX, REG_AXY | REG_PTR1 }, - { "tosor0ax", REG_AX, REG_EAXY | REG_TMP1 }, - { "tosora0", REG_A, REG_AXY | REG_TMP1 }, - { "tosorax", REG_AX, REG_AXY | REG_TMP1 }, - { "tosoreax", REG_EAX, REG_EAXY | REG_TMP1 }, - { "tosrsub0ax", REG_AX, REG_EAXY | REG_TMP1 }, - { "tosrsuba0", REG_A, REG_AXY | REG_TMP1 }, - { "tosrsubax", REG_AX, REG_AXY | REG_TMP1 }, - { "tosrsubeax", REG_EAX, REG_EAXY | REG_TMP1 }, - { "tosshlax", REG_A, REG_AXY | REG_TMP1 }, - { "tosshleax", REG_A, REG_EAXY | REG_TMP1 }, - { "tosshrax", REG_A, REG_AXY | REG_TMP1 }, - { "tosshreax", REG_A, REG_EAXY | REG_TMP1 }, - { "tossub0ax", REG_AX, REG_EAXY }, - { "tossuba0", REG_A, REG_AXY }, - { "tossubax", REG_AX, REG_AXY }, - { "tossubeax", REG_EAX, REG_EAXY }, - { "tosudiv0ax", REG_AX, REG_ALL & ~REG_SAVE }, - { "tosudiva0", REG_A, REG_EAXY | REG_PTR1 }, /* also ptr4 */ - { "tosudivax", REG_AX, REG_EAXY | REG_PTR1 }, /* also ptr4 */ - { "tosudiveax", REG_EAX, REG_ALL & ~REG_SAVE }, - { "tosuge00", REG_NONE, REG_AXY | REG_SREG }, - { "tosugea0", REG_A, REG_AXY | REG_SREG }, - { "tosugeax", REG_AX, REG_AXY | REG_SREG }, - { "tosugeeax", REG_EAX, REG_AXY | REG_PTR1 }, - { "tosugt00", REG_NONE, REG_AXY | REG_SREG }, - { "tosugta0", REG_A, REG_AXY | REG_SREG }, - { "tosugtax", REG_AX, REG_AXY | REG_SREG }, - { "tosugteax", REG_EAX, REG_AXY | REG_PTR1 }, - { "tosule00", REG_NONE, REG_AXY | REG_SREG }, - { "tosulea0", REG_A, REG_AXY | REG_SREG }, - { "tosuleax", REG_AX, REG_AXY | REG_SREG }, - { "tosuleeax", REG_EAX, REG_AXY | REG_PTR1 }, - { "tosult00", REG_NONE, REG_AXY | REG_SREG }, - { "tosulta0", REG_A, REG_AXY | REG_SREG }, - { "tosultax", REG_AX, REG_AXY | REG_SREG }, - { "tosulteax", REG_EAX, REG_AXY | REG_PTR1 }, - { "tosumod0ax", REG_AX, REG_ALL & ~REG_SAVE }, - { "tosumoda0", REG_A, REG_EAXY | REG_PTR1 }, /* also ptr4 */ - { "tosumodax", REG_AX, REG_EAXY | REG_PTR1 }, /* also ptr4 */ - { "tosumodeax", REG_EAX, REG_ALL & ~REG_SAVE }, - { "tosumul0ax", REG_AX, REG_ALL }, - { "tosumula0", REG_A, REG_ALL }, - { "tosumulax", REG_AX, REG_ALL }, - { "tosumuleax", REG_EAX, REG_ALL }, - { "tosxor0ax", REG_AX, REG_EAXY | REG_TMP1 }, - { "tosxora0", REG_A, REG_AXY | REG_TMP1 }, - { "tosxorax", REG_AX, REG_AXY | REG_TMP1 }, - { "tosxoreax", REG_EAX, REG_EAXY | REG_TMP1 }, - { "tsteax", REG_EAX, REG_Y }, - { "utsteax", REG_EAX, REG_Y }, + { "addeq0sp", SLV_TOP | REG_AX, PSTATE_ALL | REG_AXY }, + { "addeqysp", SLV_IND | REG_AXY, PSTATE_ALL | REG_AXY }, + { "addysp", REG_SP | REG_Y, PSTATE_ALL | REG_SP }, + { "along", REG_A, PSTATE_ALL | REG_X | REG_SREG }, + { "aslax1", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "aslax2", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "aslax3", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "aslax4", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "aslaxy", REG_AXY, PSTATE_ALL | REG_AXY | REG_TMP1 }, + { "asleax1", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "asleax2", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "asleax3", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "asleax4", REG_EAX, PSTATE_ALL | REG_EAXY | REG_TMP1 }, + { "asrax1", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "asrax2", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "asrax3", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "asrax4", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "asraxy", REG_AXY, PSTATE_ALL | REG_AXY | REG_TMP1 }, + { "asreax1", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "asreax2", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "asreax3", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "asreax4", REG_EAX, PSTATE_ALL | REG_EAXY | REG_TMP1 }, + { "aulong", REG_NONE, PSTATE_ALL | REG_X | REG_SREG }, + { "axlong", REG_X, PSTATE_ALL | REG_Y | REG_SREG }, + { "axulong", REG_NONE, PSTATE_ALL | REG_Y | REG_SREG }, + { "bcasta", REG_A, PSTATE_ALL | REG_AX }, + { "bcastax", REG_AX, PSTATE_ALL | REG_AX }, + { "bcasteax", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "bnega", REG_A, PSTATE_ALL | REG_AX }, + { "bnegax", REG_AX, PSTATE_ALL | REG_AX }, + { "bnegeax", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "booleq", PSTATE_Z, PSTATE_ALL | REG_AX }, + { "boolge", PSTATE_N, PSTATE_ALL | REG_AX }, + { "boolgt", PSTATE_ZN, PSTATE_ALL | REG_AX }, + { "boolle", PSTATE_ZN, PSTATE_ALL | REG_AX }, + { "boollt", PSTATE_N, PSTATE_ALL | REG_AX }, + { "boolne", PSTATE_Z, PSTATE_ALL | REG_AX }, + { "booluge", PSTATE_C, PSTATE_ALL | REG_AX }, + { "boolugt", PSTATE_CZ, PSTATE_ALL | REG_AX }, + { "boolule", PSTATE_CZ, PSTATE_ALL | REG_AX }, + { "boolult", PSTATE_C, PSTATE_ALL | REG_AX }, + { "callax", REG_AX, PSTATE_ALL | REG_ALL }, /* PSTATE_ZN | REG_PTR1 */ + { "complax", REG_AX, PSTATE_ALL | REG_AX }, + { "decax1", REG_AX, PSTATE_ALL | REG_AX }, + { "decax2", REG_AX, PSTATE_ALL | REG_AX }, + { "decax3", REG_AX, PSTATE_ALL | REG_AX }, + { "decax4", REG_AX, PSTATE_ALL | REG_AX }, + { "decax5", REG_AX, PSTATE_ALL | REG_AX }, + { "decax6", REG_AX, PSTATE_ALL | REG_AX }, + { "decax7", REG_AX, PSTATE_ALL | REG_AX }, + { "decax8", REG_AX, PSTATE_ALL | REG_AX }, + { "decaxy", REG_AXY, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "deceaxy", REG_EAXY, PSTATE_ALL | REG_EAX }, + { "decsp1", REG_SP, PSTATE_ALL | REG_SP | REG_Y }, + { "decsp2", REG_SP, PSTATE_ALL | REG_SP | REG_A }, + { "decsp3", REG_SP, PSTATE_ALL | REG_SP | REG_A }, + { "decsp4", REG_SP, PSTATE_ALL | REG_SP | REG_A }, + { "decsp5", REG_SP, PSTATE_ALL | REG_SP | REG_A }, + { "decsp6", REG_SP, PSTATE_ALL | REG_SP | REG_A }, + { "decsp7", REG_SP, PSTATE_ALL | REG_SP | REG_A }, + { "decsp8", REG_SP, PSTATE_ALL | REG_SP | REG_A }, + { "enter", REG_SP | REG_Y, PSTATE_ALL | REG_SP | REG_AY }, + { "incax1", REG_AX, PSTATE_ALL | REG_AX }, + { "incax2", REG_AX, PSTATE_ALL | REG_AX }, + { "incax3", REG_AX, PSTATE_ALL | REG_AXY | REG_TMP1 }, + { "incax4", REG_AX, PSTATE_ALL | REG_AXY | REG_TMP1 }, + { "incax5", REG_AX, PSTATE_ALL | REG_AXY | REG_TMP1 }, + { "incax6", REG_AX, PSTATE_ALL | REG_AXY | REG_TMP1 }, + { "incax7", REG_AX, PSTATE_ALL | REG_AXY | REG_TMP1 }, + { "incax8", REG_AX, PSTATE_ALL | REG_AXY | REG_TMP1 }, + { "incaxy", REG_AXY, PSTATE_ALL | REG_AXY | REG_TMP1 }, + { "incsp1", REG_SP, PSTATE_ALL | REG_SP }, + { "incsp2", REG_SP, PSTATE_ALL | REG_SP | REG_Y }, + { "incsp3", REG_SP, PSTATE_ALL | REG_SP | REG_Y }, + { "incsp4", REG_SP, PSTATE_ALL | REG_SP | REG_Y }, + { "incsp5", REG_SP, PSTATE_ALL | REG_SP | REG_Y }, + { "incsp6", REG_SP, PSTATE_ALL | REG_SP | REG_Y }, + { "incsp7", REG_SP, PSTATE_ALL | REG_SP | REG_Y }, + { "incsp8", REG_SP, PSTATE_ALL | REG_SP | REG_Y }, + { "jmpvec", REG_EVERYTHING, PSTATE_ALL | REG_ALL }, /* NONE */ + { "laddeq", REG_EAXY | REG_PTR1_LO, PSTATE_ALL | REG_EAXY | REG_PTR1_HI }, + { "laddeq0sp", SLV_TOP | REG_EAX, PSTATE_ALL | REG_EAXY }, + { "laddeq1", REG_Y | REG_PTR1_LO, PSTATE_ALL | REG_EAXY | REG_PTR1_HI }, + { "laddeqa", REG_AY | REG_PTR1_LO, PSTATE_ALL | REG_EAXY | REG_PTR1_HI }, + { "laddeqysp", SLV_IND | REG_EAXY, PSTATE_ALL | REG_EAXY }, + { "ldaidx", REG_AXY, PSTATE_ALL | REG_AX | REG_PTR1 }, + { "ldauidx", REG_AXY, PSTATE_ALL | REG_AX | REG_PTR1 }, + { "ldax0sp", SLV_TOP, PSTATE_ALL | REG_AXY }, + { "ldaxi", REG_AX, PSTATE_ALL | REG_AXY | REG_PTR1 }, + { "ldaxidx", REG_AXY, PSTATE_ALL | REG_AXY | REG_PTR1 }, + { "ldaxysp", SLV_IND | REG_Y, PSTATE_ALL | REG_AXY }, + { "ldeax0sp", SLV_TOP, PSTATE_ALL | REG_EAXY }, + { "ldeaxi", REG_AX, PSTATE_ALL | REG_EAXY | REG_PTR1 }, + { "ldeaxidx", REG_AXY, PSTATE_ALL | REG_EAXY | REG_PTR1 }, + { "ldeaxysp", SLV_IND | REG_Y, PSTATE_ALL | REG_EAXY }, + { "leaa0sp", REG_SP | REG_A, PSTATE_ALL | REG_AX }, + { "leaaxsp", REG_SP | REG_AX, PSTATE_ALL | REG_AX }, + { "leave00", REG_SP, PSTATE_ALL | REG_SP | REG_AXY }, + { "leave0", REG_SP, PSTATE_ALL | REG_SP | REG_XY }, + { "leave", REG_SP, PSTATE_ALL | REG_SP | REG_Y }, + { "leavey00", REG_SP, PSTATE_ALL | REG_SP | REG_AXY }, + { "leavey0", REG_SP, PSTATE_ALL | REG_SP | REG_XY }, + { "leavey", REG_SP | REG_Y, PSTATE_ALL | REG_SP | REG_Y }, + { "lsubeq", REG_EAXY | REG_PTR1_LO, PSTATE_ALL | REG_EAXY | REG_PTR1_HI }, + { "lsubeq0sp", SLV_TOP | REG_EAX, PSTATE_ALL | REG_EAXY }, + { "lsubeq1", REG_Y | REG_PTR1_LO, PSTATE_ALL | REG_EAXY | REG_PTR1_HI }, + { "lsubeqa", REG_AY | REG_PTR1_LO, PSTATE_ALL | REG_EAXY | REG_PTR1_HI }, + { "lsubeqysp", SLV_IND | REG_EAXY, PSTATE_ALL | REG_EAXY }, + { "mulax10", REG_AX, PSTATE_ALL | REG_AX | REG_PTR1 }, + { "mulax3", REG_AX, PSTATE_ALL | REG_AX | REG_PTR1 }, + { "mulax5", REG_AX, PSTATE_ALL | REG_AX | REG_PTR1 }, + { "mulax6", REG_AX, PSTATE_ALL | REG_AX | REG_PTR1 }, + { "mulax7", REG_AX, PSTATE_ALL | REG_AX | REG_PTR1 }, + { "mulax9", REG_AX, PSTATE_ALL | REG_AX | REG_PTR1 }, + { "negax", REG_AX, PSTATE_ALL | REG_AX }, + { "negeax", REG_EAX, PSTATE_ALL | REG_EAX }, + { "popa", SLV_TOP, PSTATE_ALL | REG_SP | REG_AY }, + { "popax", SLV_TOP, PSTATE_ALL | REG_SP | REG_AXY }, + { "popeax", SLV_TOP, PSTATE_ALL | REG_SP | REG_EAXY }, + { "push0", REG_SP, PSTATE_ALL | REG_SP | REG_AXY }, + { "push0ax", REG_SP | REG_AX, PSTATE_ALL | REG_SP | REG_Y | REG_SREG }, + { "push1", REG_SP, PSTATE_ALL | REG_SP | REG_AXY }, + { "push2", REG_SP, PSTATE_ALL | REG_SP | REG_AXY }, + { "push3", REG_SP, PSTATE_ALL | REG_SP | REG_AXY }, + { "push4", REG_SP, PSTATE_ALL | REG_SP | REG_AXY }, + { "push5", REG_SP, PSTATE_ALL | REG_SP | REG_AXY }, + { "push6", REG_SP, PSTATE_ALL | REG_SP | REG_AXY }, + { "push7", REG_SP, PSTATE_ALL | REG_SP | REG_AXY }, + { "pusha", REG_SP | REG_A, PSTATE_ALL | REG_SP | REG_Y }, + { "pusha0", REG_SP | REG_A, PSTATE_ALL | REG_SP | REG_XY }, + { "pusha0sp", SLV_TOP, PSTATE_ALL | REG_SP | REG_AY }, + { "pushaFF", REG_SP | REG_A, PSTATE_ALL | REG_SP | REG_Y }, + { "pushax", REG_SP | REG_AX, PSTATE_ALL | REG_SP | REG_Y }, + { "pushaysp", SLV_IND | REG_Y, PSTATE_ALL | REG_SP | REG_AY }, + { "pushc0", REG_SP, PSTATE_ALL | REG_SP | REG_A | REG_Y }, + { "pushc1", REG_SP, PSTATE_ALL | REG_SP | REG_A | REG_Y }, + { "pushc2", REG_SP, PSTATE_ALL | REG_SP | REG_A | REG_Y }, + { "pusheax", REG_SP | REG_EAX, PSTATE_ALL | REG_SP | REG_Y }, + { "pushl0", REG_SP, PSTATE_ALL | REG_SP | REG_AXY }, + { "pushw", REG_SP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_PTR1 }, + { "pushw0sp", SLV_TOP, PSTATE_ALL | REG_SP | REG_AXY }, + { "pushwidx", REG_SP | REG_AXY, PSTATE_ALL | REG_SP | REG_AXY | REG_PTR1 }, + { "pushwysp", SLV_IND | REG_Y, PSTATE_ALL | REG_SP | REG_AXY }, + { "regswap", REG_AXY, PSTATE_ALL | REG_AXY | REG_TMP1 }, + { "regswap1", REG_XY, PSTATE_ALL | REG_A }, + { "regswap2", REG_XY, PSTATE_ALL | REG_A | REG_Y }, + { "resteax", REG_SAVE, PSTATE_ZN | REG_EAX }, /* also uses regsave+2/+3 */ + { "return0", REG_NONE, PSTATE_ALL | REG_AX }, + { "return1", REG_NONE, PSTATE_ALL | REG_AX }, + { "saveeax", REG_EAX, PSTATE_ZN | REG_Y | REG_SAVE }, /* also regsave+2/+3 */ + { "shlax1", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "shlax2", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "shlax3", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "shlax4", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "shlaxy", REG_AXY, PSTATE_ALL | REG_AXY | REG_TMP1 }, + { "shleax1", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "shleax2", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "shleax3", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "shleax4", REG_EAX, PSTATE_ALL | REG_EAXY | REG_TMP1 }, + { "shrax1", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "shrax2", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "shrax3", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "shrax4", REG_AX, PSTATE_ALL | REG_AX | REG_TMP1 }, + { "shraxy", REG_AXY, PSTATE_ALL | REG_AXY | REG_TMP1 }, + { "shreax1", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "shreax2", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "shreax3", REG_EAX, PSTATE_ALL | REG_EAX | REG_TMP1 }, + { "shreax4", REG_EAX, PSTATE_ALL | REG_EAXY | REG_TMP1 }, + { "staspidx", SLV_TOP | REG_AY, PSTATE_ALL | REG_SP | REG_Y | REG_TMP1 | REG_PTR1 }, + { "stax0sp", REG_SP | REG_AX, PSTATE_ALL | SLV_TOP | REG_Y }, + { "staxspidx", SLV_TOP | REG_AXY, PSTATE_ALL | REG_SP | REG_TMP1 | REG_PTR1 }, + { "staxysp", REG_SP | REG_AXY, PSTATE_ALL | SLV_IND | REG_Y }, + { "steax0sp", REG_SP | REG_EAX, PSTATE_ALL | SLV_TOP | REG_Y }, + { "steaxspidx", SLV_TOP | REG_EAXY, PSTATE_ALL | REG_SP | REG_Y | REG_TMP1 | REG_PTR1 }, /* also tmp2, tmp3 */ + { "steaxysp", REG_SP | REG_EAXY, PSTATE_ALL | SLV_IND | REG_Y }, + { "subeq0sp", SLV_TOP | REG_AX, PSTATE_ALL | REG_AXY }, + { "subeqysp", SLV_IND | REG_AXY, PSTATE_ALL | REG_AXY }, + { "subysp", REG_SP | REG_Y, PSTATE_ALL | REG_SP | REG_AY }, + { "swapstk", SLV_TOP | REG_AX, PSTATE_ALL | SLV_TOP | REG_AXY }, /* also ptr4 */ + { "tosadd0ax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tosadda0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY }, + { "tosaddax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY }, + { "tosaddeax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tosand0ax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tosanda0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY }, + { "tosandax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY }, + { "tosandeax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tosaslax", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_TMP1 }, + { "tosasleax", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tosasrax", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_TMP1 }, + { "tosasreax", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tosdiv0ax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_ALL }, + { "tosdiva0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_ALL }, + { "tosdivax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_ALL }, + { "tosdiveax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_ALL }, + { "toseq00", SLV_TOP, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "toseqa0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "toseqax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "toseqeax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_AXY | REG_PTR1 }, + { "tosge00", SLV_TOP, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosgea0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosgeax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosgeeax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_AXY | REG_PTR1 }, + { "tosgt00", SLV_TOP, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosgta0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosgtax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosgteax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_AXY | REG_PTR1 }, + { "tosicmp", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosicmp0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosint", SLV_TOP, PSTATE_ALL | REG_SP | REG_Y }, + { "toslcmp", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_A | REG_Y | REG_PTR1 }, + { "tosle00", SLV_TOP, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "toslea0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosleax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosleeax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_AXY | REG_PTR1 }, + { "toslong", SLV_TOP, PSTATE_ALL | REG_SP | REG_Y }, + { "toslt00", SLV_TOP, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "toslta0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosltax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "toslteax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_AXY | REG_PTR1 }, + { "tosmod0ax", SLV_TOP | REG_AX, PSTATE_ALL | REG_ALL }, + { "tosmodeax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_ALL }, + { "tosmul0ax", SLV_TOP | REG_AX, PSTATE_ALL | REG_ALL }, + { "tosmula0", SLV_TOP | REG_A, PSTATE_ALL | REG_ALL }, + { "tosmulax", SLV_TOP | REG_AX, PSTATE_ALL | REG_ALL }, + { "tosmuleax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_ALL }, + { "tosne00", SLV_TOP, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosnea0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosneax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosneeax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_AXY | REG_PTR1 }, + { "tosor0ax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tosora0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_TMP1 }, + { "tosorax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_TMP1 }, + { "tosoreax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tosrsub0ax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tosrsuba0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_TMP1 }, + { "tosrsubax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_TMP1 }, + { "tosrsubeax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tosshlax", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_TMP1 }, + { "tosshleax", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tosshrax", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_TMP1 }, + { "tosshreax", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tossub0ax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_EAXY }, + { "tossuba0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY }, + { "tossubax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY }, + { "tossubeax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_EAXY }, + { "tosudiv0ax", SLV_TOP | REG_AX, PSTATE_ALL | (REG_ALL & ~REG_SAVE) }, + { "tosudiva0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_EAXY | REG_PTR1 }, /* also ptr4 */ + { "tosudivax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_EAXY | REG_PTR1 }, /* also ptr4 */ + { "tosudiveax", SLV_TOP | REG_EAX, PSTATE_ALL | (REG_ALL & ~REG_SAVE) }, + { "tosuge00", SLV_TOP, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosugea0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosugeax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosugeeax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_AXY | REG_PTR1 }, + { "tosugt00", SLV_TOP, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosugta0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosugtax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosugteax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_AXY | REG_PTR1 }, + { "tosule00", SLV_TOP, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosulea0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosuleax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosuleeax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_AXY | REG_PTR1 }, + { "tosulong", SLV_TOP, PSTATE_ALL | REG_SP | REG_Y }, + { "tosult00", SLV_TOP, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosulta0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosultax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_SREG }, + { "tosulteax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_AXY | REG_PTR1 }, + { "tosumod0ax", SLV_TOP | REG_AX, PSTATE_ALL | (REG_ALL & ~REG_SAVE) }, + { "tosumoda0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_EAXY | REG_PTR1 }, /* also ptr4 */ + { "tosumodax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_EAXY | REG_PTR1 }, /* also ptr4 */ + { "tosumodeax", SLV_TOP | REG_EAX, PSTATE_ALL | (REG_ALL & ~REG_SAVE) }, + { "tosumul0ax", SLV_TOP | REG_AX, PSTATE_ALL | REG_ALL }, + { "tosumula0", SLV_TOP | REG_A, PSTATE_ALL | REG_ALL }, + { "tosumulax", SLV_TOP | REG_AX, PSTATE_ALL | REG_ALL }, + { "tosumuleax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_ALL }, + { "tosxor0ax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tosxora0", SLV_TOP | REG_A, PSTATE_ALL | REG_SP | REG_AXY | REG_TMP1 }, + { "tosxorax", SLV_TOP | REG_AX, PSTATE_ALL | REG_SP | REG_AXY | REG_TMP1 }, + { "tosxoreax", SLV_TOP | REG_EAX, PSTATE_ALL | REG_SP | REG_EAXY | REG_TMP1 }, + { "tsteax", REG_EAX, PSTATE_ALL | REG_Y }, + { "utsteax", REG_EAX, PSTATE_ALL | REG_Y }, }; #define FuncInfoCount (sizeof(FuncInfoTable) / sizeof(FuncInfoTable[0])) /* Table with names of zero page locations used by the compiler */ static const ZPInfo ZPInfoTable[] = { - { 0, "ptr1", REG_PTR1_LO, REG_PTR1 }, - { 0, "ptr1+1", REG_PTR1_HI, REG_PTR1 }, - { 0, "ptr2", REG_PTR2_LO, REG_PTR2 }, - { 0, "ptr2+1", REG_PTR2_HI, REG_PTR2 }, - { 4, "ptr3", REG_NONE, REG_NONE }, - { 4, "ptr4", REG_NONE, REG_NONE }, - { 7, "regbank", REG_NONE, REG_NONE }, - { 0, "regsave", REG_SAVE_LO, REG_SAVE }, - { 0, "regsave+1", REG_SAVE_HI, REG_SAVE }, - { 0, "sp", REG_SP_LO, REG_SP }, - { 0, "sp+1", REG_SP_HI, REG_SP }, - { 0, "sreg", REG_SREG_LO, REG_SREG }, - { 0, "sreg+1", REG_SREG_HI, REG_SREG }, - { 0, "tmp1", REG_TMP1, REG_TMP1 }, - { 0, "tmp2", REG_NONE, REG_NONE }, - { 0, "tmp3", REG_NONE, REG_NONE }, - { 0, "tmp4", REG_NONE, REG_NONE }, + { 0, "ptr1", 2, REG_PTR1_LO, REG_PTR1 }, + { 0, "ptr1+1", 1, REG_PTR1_HI, REG_PTR1 }, + { 0, "ptr2", 2, REG_PTR2_LO, REG_PTR2 }, + { 0, "ptr2+1", 1, REG_PTR2_HI, REG_PTR2 }, + { 4, "ptr3", 2, REG_NONE, REG_NONE }, + { 4, "ptr4", 2, REG_NONE, REG_NONE }, + { 7, "regbank", 6, REG_NONE, REG_NONE }, + { 0, "regsave", 4, REG_SAVE_LO, REG_SAVE }, + { 0, "regsave+1", 3, REG_SAVE_HI, REG_SAVE }, + { 0, "sp", 2, REG_SP_LO, REG_SP }, + { 0, "sp+1", 1, REG_SP_HI, REG_SP }, + { 0, "sreg", 2, REG_SREG_LO, REG_SREG }, + { 0, "sreg+1", 1, REG_SREG_HI, REG_SREG }, + { 0, "tmp1", 1, REG_TMP1, REG_TMP1 }, + { 0, "tmp2", 1, REG_NONE, REG_NONE }, + { 0, "tmp3", 1, REG_NONE, REG_NONE }, + { 0, "tmp4", 1, REG_NONE, REG_NONE }, }; #define ZPInfoCount (sizeof(ZPInfoTable) / sizeof(ZPInfoTable[0])) @@ -367,6 +405,83 @@ static const ZPInfo ZPInfoTable[] = { +static int IsAddrOnZP (long Address) +/* Return true if the Address is within the ZP range. +** FIXME: ZP range may vary depending on the CPU settings. +*/ +{ + /* ZP in range [0x00, 0xFF] */ + return Address >= 0 && Address < 0x100; +} + + + +int IsZPArg (const char* Name) +/* Exam if the main part of the arg string indicates a ZP loc */ +{ + unsigned short ArgInfo = 0; + long Offset = 0; + StrBuf NameBuf = AUTO_STRBUF_INITIALIZER; + SymEntry* E = 0; + const ZPInfo* Info = 0; + + if (!ParseOpcArgStr (Name, &ArgInfo, &NameBuf, &Offset)) { + /* Parsing failed */ + SB_Done (&NameBuf); + return 0; + } + + if ((ArgInfo & AIF_HAS_NAME) == 0) { + /* Numeric locs have no names */ + SB_Done (&NameBuf); + + /* We can check it against the ZP boundary if it is known */ + return IsAddrOnZP (Offset); + } + + if ((ArgInfo & AIF_BUILTIN) != 0) { + /* Search for the name in the list of builtin ZPs */ + Info = GetZPInfo (SB_GetConstBuf (&NameBuf)); + + SB_Done (&NameBuf); + + /* Do we know the ZP? */ + if (Info != 0) { + /* Use the information we have */ + return Offset >= 0 && Offset < (int)Info->Size; + } + + /* Assume it be non-ZP */ + return 0; + } + + if ((ArgInfo & AIF_EXTERNAL) == 0) { + /* We don't support local variables on ZP */ + SB_Done (&NameBuf); + return 0; + } + + /* Search for the symbol in the global symbol table skipping the underline + ** in its name. + */ + E = FindGlobalSym (SB_GetConstBuf (&NameBuf) + 1); + + SB_Done (&NameBuf); + + /* We are checking the offset against the symbol size rather than the actual + ** zeropage boundary, since we can't magically ensure that until linking and + ** can only trust the user in writing the correct code for now. + */ + if (E != 0 && (E->Flags & SC_ZEROPAGE) != 0) { + return Offset >= 0 && (unsigned)Offset < CheckedSizeOf (E->Type); + } + + /* Not found on ZP */ + return 0; +} + + + static int CompareFuncInfo (const void* Key, const void* Info) /* Compare function for bsearch */ { @@ -375,10 +490,10 @@ static int CompareFuncInfo (const void* Key, const void* Info) -void GetFuncInfo (const char* Name, unsigned short* Use, unsigned short* Chg) +fncls_t GetFuncInfo (const char* Name, unsigned int* Use, unsigned int* Chg) /* For the given function, lookup register information and store it into ** the given variables. If the function is unknown, assume it will use and -** load all registers. +** load all registers as well as touching the processor flags. */ { /* If the function name starts with an underline, it is an external @@ -392,7 +507,8 @@ void GetFuncInfo (const char* Name, unsigned short* Use, unsigned short* Chg) /* Did we find it in the top-level table? */ if (E && IsTypeFunc (E->Type)) { - FuncDesc* D = E->V.F.Func; + FuncDesc* D = GetFuncDesc (E->Type); + *Use = REG_NONE; /* A variadic function will use the Y register (the parameter list ** size is passed there). A fastcall function will use the A or A/X @@ -400,21 +516,40 @@ void GetFuncInfo (const char* Name, unsigned short* Use, unsigned short* Chg) ** we assume that any function will destroy all registers. */ if ((D->Flags & FD_VARIADIC) != 0) { - *Use = REG_Y; - } else if (D->ParamCount > 0 && - (AutoCDecl ? - IsQualFastcall (E->Type) : - !IsQualCDecl (E->Type))) { - /* Will use registers depending on the last param. */ - switch (CheckedSizeOf (D->LastParam->Type)) { - case 1u: - *Use = REG_A; - break; - case 2u: - *Use = REG_AX; - break; - default: - *Use = REG_EAX; + *Use = REG_Y | REG_SP | SLV_TOP; + } else if (D->Flags & FD_CALL_WRAPPER) { + /* Wrappers may go to any functions, so mark them as using all + ** registers. + */ + *Use = REG_EAXY; + } else if (D->ParamCount > 0 || (D->Flags & FD_EMPTY) != 0) { + /* Will use registers depending on the last param. If the last + ** param has incomplete type, or if the function has not been + ** prototyped yet, just assume __EAX__. + */ + if (IsFastcallFunc (E->Type)) { + if (D->LastParam != 0) { + switch (SizeOf (D->LastParam->Type)) { + case 1u: + *Use = REG_A; + break; + case 2u: + *Use = REG_AX; + break; + default: + *Use = REG_EAX; + } + if (D->ParamCount > 1) { + /* Passes other params on the stack */ + *Use |= REG_SP | SLV_TOP; + } + } else { + /* We'll assume all */ + *Use = REG_EAX | REG_SP | SLV_TOP; + } + } else { + /* Passes all params on the stack */ + *Use = REG_SP | SLV_TOP; } } else { /* Will not use any registers */ @@ -424,8 +559,11 @@ void GetFuncInfo (const char* Name, unsigned short* Use, unsigned short* Chg) /* Will destroy all registers */ *Chg = REG_ALL; + /* and will destroy all processor flags */ + *Chg |= PSTATE_ALL; + /* Done */ - return; + return FNCLS_GLOBAL; } } else if (IsDigit (Name[0]) || Name[0] == '$') { @@ -436,7 +574,8 @@ void GetFuncInfo (const char* Name, unsigned short* Use, unsigned short* Chg) */ *Use = REG_ALL; *Chg = REG_ALL; - return; + *Chg |= PSTATE_ALL; + return FNCLS_NUMERIC; } else { @@ -449,6 +588,9 @@ void GetFuncInfo (const char* Name, unsigned short* Use, unsigned short* Chg) /* Use the information we have */ *Use = Info->Use; *Chg = Info->Chg; + if ((*Use & (SLV_TOP | SLV_IND)) != 0) { + *Use |= REG_SP; + } } else { /* It's an internal function we have no information for. If in ** debug mode, output an additional warning, so we have a chance @@ -456,19 +598,23 @@ void GetFuncInfo (const char* Name, unsigned short* Use, unsigned short* Chg) ** use and change all registers. */ if (Debug) { - fprintf (stderr, "No info about internal function `%s'\n", Name); + fprintf (stderr, "No info about internal function '%s'\n", Name); } *Use = REG_ALL; *Chg = REG_ALL; + *Chg |= PSTATE_ALL; } - return; + return FNCLS_BUILTIN; } /* Function not found - assume that the primary register is input, and all - ** registers are changed + ** registers and processor flags are changed */ *Use = REG_EAXY; *Chg = REG_ALL; + *Chg |= PSTATE_ALL; + + return FNCLS_UNKNOWN; } @@ -831,3 +977,112 @@ cmp_t FindTosCmpCond (const char* Name) return CMP_INV; } } + + + +const char* GetCmpSuffix (cmp_t Cond) +/* Return the compare suffix by the given a compare condition or 0 on failure */ +{ + /* Check for the correct subroutine name */ + if (Cond >= 0 && + Cond != CMP_INV && + (unsigned)Cond < sizeof (CmpSuffixTab) / sizeof (CmpSuffixTab[0])) { + return CmpSuffixTab[Cond]; + } else { + /* Not found */ + return 0; + } +} + + + +char* GetBoolCmpSuffix (char* Buf, cmp_t Cond) +/* Search for a boolean transformer subroutine (eg. booleq) by the given compare +** condition. +** Return the output buffer filled with the name of the correct subroutine or 0 +** on failure. +*/ +{ + /* Check for the correct boolean transformer subroutine name */ + const char* Suf = GetCmpSuffix (Cond); + + if (Suf != 0) { + sprintf (Buf, "bool%s", Suf); + return Buf; + } else { + /* Not found */ + return 0; + } +} + + + +char* GetTosCmpSuffix (char* Buf, cmp_t Cond) +/* Search for a TOS compare function (eg. tosgtax) by the given compare condition. +** Return the output buffer filled with the name of the correct function or 0 on +** failure. +*/ +{ + /* Check for the correct TOS function name */ + const char* Suf = GetCmpSuffix (Cond); + + if (Suf != 0) { + sprintf (Buf, "tos%sax", Suf); + return Buf; + } else { + /* Not found */ + return 0; + } +} + + + +const char* GetBoolTransformer (cmp_t Cond) +/* Get the bool transformer corresponding to the given compare condition */ +{ + if (Cond > CMP_INV && Cond < CMP_END) { + return BoolTransformerTab[Cond]; + } + + /* Not found */ + return 0; +} + + +cmp_t GetNegatedCond (cmp_t Cond) +/* Get the logically opposite compare condition */ +{ + switch (Cond) { + case CMP_EQ: return CMP_NE; + case CMP_NE: return CMP_EQ; + case CMP_GT: return CMP_LE; + case CMP_GE: return CMP_LT; + case CMP_LT: return CMP_GE; + case CMP_LE: return CMP_GT; + case CMP_UGT: return CMP_ULE; + case CMP_UGE: return CMP_ULT; + case CMP_ULT: return CMP_UGE; + case CMP_ULE: return CMP_UGT; + default: return CMP_INV; + } +} + + + +cmp_t GetRevertedCond (cmp_t Cond) +/* Get the compare condition in reverted order of operands */ +{ + switch (Cond) { + case CMP_EQ: return CMP_EQ; + case CMP_NE: return CMP_NE; + case CMP_GT: return CMP_LT; + case CMP_GE: return CMP_LE; + case CMP_LT: return CMP_GT; + case CMP_LE: return CMP_GE; + case CMP_UGT: return CMP_ULT; + case CMP_UGE: return CMP_ULE; + case CMP_ULT: return CMP_UGT; + case CMP_ULE: return CMP_UGE; + default: return CMP_INV; + } +} diff --git a/src/cc65/codeinfo.h b/src/cc65/codeinfo.h index be0bfbf01..14ef54d8f 100644 --- a/src/cc65/codeinfo.h +++ b/src/cc65/codeinfo.h @@ -57,7 +57,7 @@ struct CodeSeg; /* Forward to struct RegContents */ struct RegContents; -/* Defines for registers. */ +/* Defines for registers */ #define REG_NONE 0x0000U #define REG_A 0x0001U #define REG_X 0x0002U @@ -74,6 +74,23 @@ struct RegContents; #define REG_SP_LO 0x1000U #define REG_SP_HI 0x2000U +/* Defines for some special register usage */ +#define SLV_IND 0x00010000U /* Accesses (sp),y */ +#define SLV_TOP 0x00020000U /* Accesses (sp),0 */ +#define SLV_SP65 0x00200000U /* Accesses 6502 stack pointer */ +#define SLV_PH65 0x00400000U /* Pushes onto 6502 stack */ +#define SLV_PL65 0x00800000U /* Pops from 6502 stack */ + +/* Defines for processor states */ +#define PSTATE_NONE 0x00000000U +#define PSTATE_C 0x01000000U /* Carry */ +#define PSTATE_Z 0x02000000U /* Zero */ +#define PSTATE_I 0x04000000U /* Interrupt */ +#define PSTATE_D 0x08000000U /* Decimal */ +#define PSTATE_U 0x10000000U /* Unused */ +#define PSTATE_B 0x20000000U /* Break */ +#define PSTATE_V 0x40000000U /* Overflow */ +#define PSTATE_N 0x80000000U /* Negative */ /* Combined register defines */ #define REG_PTR1 (REG_PTR1_LO | REG_PTR1_HI) @@ -90,13 +107,23 @@ struct RegContents; #define REG_ZP 0xFFF8U #define REG_ALL 0xFFFFU +#define PSTATE_CZ (PSTATE_C | PSTATE_Z) +#define PSTATE_CZN (PSTATE_C | PSTATE_Z | PSTATE_N) +#define PSTATE_CZVN (PSTATE_C | PSTATE_Z | PSTATE_V | PSTATE_N) +#define PSTATE_ZN (PSTATE_Z | PSTATE_N) +#define PSTATE_ZVN (PSTATE_Z | PSTATE_V | PSTATE_N) +#define PSTATE_6502 0xE7000000U +#define PSTATE_ALL 0xFF000000U +#define REG_EVERYTHING 0xFFFFFFFFU + /* Zero page register info */ typedef struct ZPInfo ZPInfo; struct ZPInfo { unsigned char Len; /* Length of the following string */ - char Name[11]; /* Name of zero page symbol */ + char Name[10]; /* Name of zero page symbol */ + unsigned char Size; /* Maximum buffer size of this register */ unsigned short ByteUse; /* Register info for this symbol */ unsigned short WordUse; /* Register info for 16 bit access */ }; @@ -115,21 +142,38 @@ typedef enum { CMP_UGT, CMP_UGE, CMP_ULT, - CMP_ULE + CMP_ULE, + + /* End of the enumeration */ + CMP_END } cmp_t; +/* Defines for the conditions in a compare */ +typedef enum { + FNCLS_UNKNOWN = -1, /* Unknown */ + FNCLS_BUILTIN, /* Builtin */ + FNCLS_GLOBAL, /* Found in global sym table minus the leading underscore */ + FNCLS_NUMERIC /* A call to a numeric address */ +} fncls_t; + + + /*****************************************************************************/ /* Code */ /*****************************************************************************/ -void GetFuncInfo (const char* Name, unsigned short* Use, unsigned short* Chg); +int IsZPArg (const char* Arg); +/* Exam if the main part of the arg string indicates a ZP loc */ + +fncls_t GetFuncInfo (const char* Name, unsigned int* Use, unsigned int* Chg); /* For the given function, lookup register information and store it into ** the given variables. If the function is unknown, assume it will use and ** load all registers. +** Return the whatever category the function is in. */ const ZPInfo* GetZPInfo (const char* Name); @@ -174,7 +218,30 @@ cmp_t FindTosCmpCond (const char* Name); ** Return the condition code or CMP_INV on failure. */ +const char* GetBoolTransformer (cmp_t Cond); +/* Get the bool transformer corresponding to the given compare condition */ +cmp_t GetNegatedCond (cmp_t Cond); +/* Get the logically opposite compare condition */ + +cmp_t GetRevertedCond (cmp_t Cond); +/* Get the compare condition in reverted order of operands */ + +const char* GetCmpSuffix (cmp_t Cond); +/* Return the compare suffix by the given a compare condition or 0 on failure */ + +char* GetBoolCmpSuffix (char* Buf, cmp_t Cond); +/* Search for a boolean transformer subroutine (eg. booleq) by the given compare +** condition. +** Return the output buffer filled with the name of the correct subroutine or 0 +** on failure. +*/ + +char* GetTosCmpSuffix (char* Buf, cmp_t Cond); +/* Search for a TOS compare function (eg. tosgtax) by the given compare condition. +** Return the output buffer filled with the name of the correct function or 0 on +** failure. +*/ /* End of codeinfo.h */ diff --git a/src/cc65/codelab.c b/src/cc65/codelab.c index f36520835..0909702fd 100644 --- a/src/cc65/codelab.c +++ b/src/cc65/codelab.c @@ -90,8 +90,12 @@ void CL_AddRef (CodeLabel* L, struct CodeEntry* E) /* The insn at E jumps to this label */ E->JumpTo = L; - /* Replace the code entry argument with the name of the new label */ - CE_SetArg (E, L->Name); + if (CE_HasArgBase (E)) { + /* Replace the code entry argument base with the name of the new label */ + CE_SetArgBase (E, L->Name); + } else { + CE_SetArgBaseAndOff (E, L->Name, 0); + } /* Remember that in the label */ CollAppend (&L->JumpFrom, E); @@ -112,6 +116,7 @@ void CL_MoveRefs (CodeLabel* OldLabel, CodeLabel* NewLabel) CodeEntry* E = CL_GetRef (OldLabel, Count); /* Change the reference to the new label */ + CHECK (E->JumpTo != NULL); CHECK (E->JumpTo == OldLabel); CL_AddRef (NewLabel, E); diff --git a/src/cc65/codeopt.c b/src/cc65/codeopt.c index 9eb175105..440b10751 100644 --- a/src/cc65/codeopt.c +++ b/src/cc65/codeopt.c @@ -48,7 +48,6 @@ #include "xsprintf.h" /* cc65 */ -#include "asmlabel.h" #include "codeent.h" #include "codeinfo.h" #include "codeopt.h" @@ -56,6 +55,8 @@ #include "coptc02.h" #include "coptcmp.h" #include "coptind.h" +#include "coptjmp.h" +#include "coptmisc.h" #include "coptneg.h" #include "coptptrload.h" #include "coptptrstore.h" @@ -72,549 +73,6 @@ -/*****************************************************************************/ -/* Optimize loads */ -/*****************************************************************************/ - - - -static unsigned OptLoad1 (CodeSeg* S) -/* Search for a call to ldaxysp where X is not used later and replace it by -** a load of just the A register. -*/ -{ - unsigned I; - unsigned Changes = 0; - - /* Walk over the entries */ - I = 0; - while (I < CS_GetEntryCount (S)) { - - CodeEntry* E; - - /* Get next entry */ - E = CS_GetEntry (S, I); - - /* Check for the sequence */ - if (CE_IsCallTo (E, "ldaxysp") && - RegValIsKnown (E->RI->In.RegY) && - !RegXUsed (S, I+1)) { - - CodeEntry* X; - - /* Reload the Y register */ - const char* Arg = MakeHexArg (E->RI->In.RegY - 1); - X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); - CS_InsertEntry (S, X, I+1); - - /* Load from stack */ - X = NewCodeEntry (OP65_LDA, AM65_ZP_INDY, "sp", 0, E->LI); - CS_InsertEntry (S, X, I+2); - - /* Now remove the call to the subroutine */ - CS_DelEntry (S, I); - - /* Remember, we had changes */ - ++Changes; - - } - - /* Next entry */ - ++I; - - } - - /* Return the number of changes made */ - return Changes; -} - - - -static unsigned OptLoad2 (CodeSeg* S) -/* Replace calls to ldaxysp by inline code */ -{ - unsigned I; - unsigned Changes = 0; - - /* Walk over the entries */ - I = 0; - while (I < CS_GetEntryCount (S)) { - - CodeEntry* L[3]; - - /* Get next entry */ - L[0] = CS_GetEntry (S, I); - - /* Check for the sequence */ - if (CE_IsCallTo (L[0], "ldaxysp")) { - - CodeEntry* X; - - /* Followed by sta abs/stx abs? */ - if (CS_GetEntries (S, L+1, I+1, 2) && - L[1]->OPC == OP65_STA && - L[2]->OPC == OP65_STX && - (L[1]->Arg == 0 || - L[2]->Arg == 0 || - strcmp (L[1]->Arg, L[2]->Arg) != 0) && - !CS_RangeHasLabel (S, I+1, 2) && - !RegXUsed (S, I+3)) { - - /* A/X are stored into memory somewhere and X is not used - ** later - */ - - /* lda (sp),y */ - X = NewCodeEntry (OP65_LDA, AM65_ZP_INDY, "sp", 0, L[0]->LI); - CS_InsertEntry (S, X, I+3); - - /* sta abs */ - X = NewCodeEntry (OP65_STA, L[2]->AM, L[2]->Arg, 0, L[2]->LI); - CS_InsertEntry (S, X, I+4); - - /* dey */ - X = NewCodeEntry (OP65_DEY, AM65_IMP, 0, 0, L[0]->LI); - CS_InsertEntry (S, X, I+5); - - /* lda (sp),y */ - X = NewCodeEntry (OP65_LDA, AM65_ZP_INDY, "sp", 0, L[0]->LI); - CS_InsertEntry (S, X, I+6); - - /* sta abs */ - X = NewCodeEntry (OP65_STA, L[1]->AM, L[1]->Arg, 0, L[1]->LI); - CS_InsertEntry (S, X, I+7); - - /* Now remove the call to the subroutine and the sta/stx */ - CS_DelEntries (S, I, 3); - - } else { - - /* Standard replacement */ - - /* lda (sp),y */ - X = NewCodeEntry (OP65_LDA, AM65_ZP_INDY, "sp", 0, L[0]->LI); - CS_InsertEntry (S, X, I+1); - - /* tax */ - X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, L[0]->LI); - CS_InsertEntry (S, X, I+2); - - /* dey */ - X = NewCodeEntry (OP65_DEY, AM65_IMP, 0, 0, L[0]->LI); - CS_InsertEntry (S, X, I+3); - - /* lda (sp),y */ - X = NewCodeEntry (OP65_LDA, AM65_ZP_INDY, "sp", 0, L[0]->LI); - CS_InsertEntry (S, X, I+4); - - /* Now remove the call to the subroutine */ - CS_DelEntry (S, I); - - } - - /* Remember, we had changes */ - ++Changes; - - } - - /* Next entry */ - ++I; - } - - /* Return the number of changes made */ - return Changes; -} - - - -static unsigned OptLoad3 (CodeSeg* S) -/* Remove repeated loads from one and the same memory location */ -{ - unsigned Changes = 0; - CodeEntry* Load = 0; - - /* Walk over the entries */ - unsigned I = 0; - while (I < CS_GetEntryCount (S)) { - - /* Get next entry */ - CodeEntry* E = CS_GetEntry (S, I); - - /* Forget a preceeding load if we have a label */ - if (Load && CE_HasLabel (E)) { - Load = 0; - } - - /* Check if this insn is a load */ - if (E->Info & OF_LOAD) { - - CodeEntry* N; - - /* If we had a preceeding load that is identical, remove this one. - ** If it is not identical, or we didn't have one, remember it. - */ - if (Load != 0 && - E->OPC == Load->OPC && - E->AM == Load->AM && - ((E->Arg == 0 && Load->Arg == 0) || - strcmp (E->Arg, Load->Arg) == 0) && - (N = CS_GetNextEntry (S, I)) != 0 && - (N->Info & OF_CBRA) == 0) { - - /* Now remove the call to the subroutine */ - CS_DelEntry (S, I); - - /* Remember, we had changes */ - ++Changes; - - /* Next insn */ - continue; - - } else { - - Load = E; - - } - - } else if ((E->Info & OF_CMP) == 0 && (E->Info & OF_CBRA) == 0) { - /* Forget the first load on occurance of any insn we don't like */ - Load = 0; - } - - /* Next entry */ - ++I; - } - - /* Return the number of changes made */ - return Changes; -} - - - -/*****************************************************************************/ -/* Decouple operations */ -/*****************************************************************************/ - - - -static unsigned OptDecouple (CodeSeg* S) -/* Decouple operations, that is, do the following replacements: -** -** dex -> ldx #imm -** inx -> ldx #imm -** dey -> ldy #imm -** iny -> ldy #imm -** tax -> ldx #imm -** txa -> lda #imm -** tay -> ldy #imm -** tya -> lda #imm -** lda zp -> lda #imm -** ldx zp -> ldx #imm -** ldy zp -> ldy #imm -** -** Provided that the register values are known of course. -*/ -{ - unsigned Changes = 0; - unsigned I; - - /* Walk over the entries */ - I = 0; - while (I < CS_GetEntryCount (S)) { - - const char* Arg; - - /* Get next entry and it's input register values */ - CodeEntry* E = CS_GetEntry (S, I); - const RegContents* In = &E->RI->In; - - /* Assume we have no replacement */ - CodeEntry* X = 0; - - /* Check the instruction */ - switch (E->OPC) { - - case OP65_DEA: - if (RegValIsKnown (In->RegA)) { - Arg = MakeHexArg ((In->RegA - 1) & 0xFF); - X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); - } - break; - - case OP65_DEX: - if (RegValIsKnown (In->RegX)) { - Arg = MakeHexArg ((In->RegX - 1) & 0xFF); - X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); - } - break; - - case OP65_DEY: - if (RegValIsKnown (In->RegY)) { - Arg = MakeHexArg ((In->RegY - 1) & 0xFF); - X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); - } - break; - - case OP65_INA: - if (RegValIsKnown (In->RegA)) { - Arg = MakeHexArg ((In->RegA + 1) & 0xFF); - X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); - } - break; - - case OP65_INX: - if (RegValIsKnown (In->RegX)) { - Arg = MakeHexArg ((In->RegX + 1) & 0xFF); - X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); - } - break; - - case OP65_INY: - if (RegValIsKnown (In->RegY)) { - Arg = MakeHexArg ((In->RegY + 1) & 0xFF); - X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); - } - break; - - case OP65_LDA: - if (E->AM == AM65_ZP) { - switch (GetKnownReg (E->Use & REG_ZP, In)) { - case REG_TMP1: - Arg = MakeHexArg (In->Tmp1); - X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); - break; - - case REG_PTR1_LO: - Arg = MakeHexArg (In->Ptr1Lo); - X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); - break; - - case REG_PTR1_HI: - Arg = MakeHexArg (In->Ptr1Hi); - X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); - break; - - case REG_SREG_LO: - Arg = MakeHexArg (In->SRegLo); - X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); - break; - - case REG_SREG_HI: - Arg = MakeHexArg (In->SRegHi); - X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); - break; - } - } - break; - - case OP65_LDX: - if (E->AM == AM65_ZP) { - switch (GetKnownReg (E->Use & REG_ZP, In)) { - case REG_TMP1: - Arg = MakeHexArg (In->Tmp1); - X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); - break; - - case REG_PTR1_LO: - Arg = MakeHexArg (In->Ptr1Lo); - X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); - break; - - case REG_PTR1_HI: - Arg = MakeHexArg (In->Ptr1Hi); - X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); - break; - - case REG_SREG_LO: - Arg = MakeHexArg (In->SRegLo); - X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); - break; - - case REG_SREG_HI: - Arg = MakeHexArg (In->SRegHi); - X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); - break; - } - } - break; - - case OP65_LDY: - if (E->AM == AM65_ZP) { - switch (GetKnownReg (E->Use, In)) { - case REG_TMP1: - Arg = MakeHexArg (In->Tmp1); - X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); - break; - - case REG_PTR1_LO: - Arg = MakeHexArg (In->Ptr1Lo); - X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); - break; - - case REG_PTR1_HI: - Arg = MakeHexArg (In->Ptr1Hi); - X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); - break; - - case REG_SREG_LO: - Arg = MakeHexArg (In->SRegLo); - X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); - break; - - case REG_SREG_HI: - Arg = MakeHexArg (In->SRegHi); - X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); - break; - } - } - break; - - case OP65_TAX: - if (E->RI->In.RegA >= 0) { - Arg = MakeHexArg (In->RegA); - X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); - } - break; - - case OP65_TAY: - if (E->RI->In.RegA >= 0) { - Arg = MakeHexArg (In->RegA); - X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); - } - break; - - case OP65_TXA: - if (E->RI->In.RegX >= 0) { - Arg = MakeHexArg (In->RegX); - X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); - } - break; - - case OP65_TYA: - if (E->RI->In.RegY >= 0) { - Arg = MakeHexArg (In->RegY); - X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); - } - break; - - default: - /* Avoid gcc warnings */ - break; - - } - - /* Insert the replacement if we have one */ - if (X) { - CS_InsertEntry (S, X, I+1); - CS_DelEntry (S, I); - ++Changes; - } - - /* Next entry */ - ++I; - - } - - /* Return the number of changes made */ - return Changes; -} - - - -/*****************************************************************************/ -/* Optimize stack pointer ops */ -/*****************************************************************************/ - - - -static unsigned IsDecSP (const CodeEntry* E) -/* Check if this is an insn that decrements the stack pointer. If so, return -** the decrement. If not, return zero. -** The function expects E to be a subroutine call. -*/ -{ - if (strncmp (E->Arg, "decsp", 5) == 0) { - if (E->Arg[5] >= '1' && E->Arg[5] <= '8') { - return (E->Arg[5] - '0'); - } - } else if (strcmp (E->Arg, "subysp") == 0 && RegValIsKnown (E->RI->In.RegY)) { - return E->RI->In.RegY; - } - - /* If we come here, it's not a decsp op */ - return 0; -} - - - -static unsigned OptStackPtrOps (CodeSeg* S) -/* Merge adjacent calls to decsp into one. NOTE: This function won't merge all -** known cases! -*/ -{ - unsigned Changes = 0; - unsigned I; - - /* Walk over the entries */ - I = 0; - while (I < CS_GetEntryCount (S)) { - - unsigned Dec1; - unsigned Dec2; - const CodeEntry* N; - - /* Get the next entry */ - const CodeEntry* E = CS_GetEntry (S, I); - - /* Check for decspn or subysp */ - if (E->OPC == OP65_JSR && - (Dec1 = IsDecSP (E)) > 0 && - (N = CS_GetNextEntry (S, I)) != 0 && - (Dec2 = IsDecSP (N)) > 0 && - (Dec1 += Dec2) <= 255 && - !CE_HasLabel (N)) { - - CodeEntry* X; - char Buf[20]; - - /* We can combine the two */ - if (Dec1 <= 8) { - /* Insert a call to decsp */ - xsprintf (Buf, sizeof (Buf), "decsp%u", Dec1); - X = NewCodeEntry (OP65_JSR, AM65_ABS, Buf, 0, N->LI); - CS_InsertEntry (S, X, I+2); - } else { - /* Insert a call to subysp */ - const char* Arg = MakeHexArg (Dec1); - X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, N->LI); - CS_InsertEntry (S, X, I+2); - X = NewCodeEntry (OP65_JSR, AM65_ABS, "subysp", 0, N->LI); - CS_InsertEntry (S, X, I+3); - } - - /* Delete the old code */ - CS_DelEntries (S, I, 2); - - /* Regenerate register info */ - CS_GenRegInfo (S); - - /* Remember we had changes */ - ++Changes; - - } else { - - /* Next entry */ - ++I; - } - - } - - /* Return the number of changes made */ - return Changes; -} - - - /*****************************************************************************/ /* struct OptFunc */ /*****************************************************************************/ @@ -659,6 +117,7 @@ static OptFunc DOptBNegAX3 = { OptBNegAX3, "OptBNegAX3", 100, 0, static OptFunc DOptBNegAX4 = { OptBNegAX4, "OptBNegAX4", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptBoolTrans = { OptBoolTrans, "OptBoolTrans", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptBranchDist = { OptBranchDist, "OptBranchDist", 0, 0, 0, 0, 0, 0 }; +static OptFunc DOptBranchDist2 = { OptBranchDist2, "OptBranchDist2", 0, 0, 0, 0, 0, 0 }; static OptFunc DOptCmp1 = { OptCmp1, "OptCmp1", 42, 0, 0, 0, 0, 0 }; static OptFunc DOptCmp2 = { OptCmp2, "OptCmp2", 85, 0, 0, 0, 0, 0 }; static OptFunc DOptCmp3 = { OptCmp3, "OptCmp3", 75, 0, 0, 0, 0, 0 }; @@ -675,6 +134,7 @@ static OptFunc DOptDeadCode = { OptDeadCode, "OptDeadCode", 100, 0, static OptFunc DOptDeadJumps = { OptDeadJumps, "OptDeadJumps", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptDecouple = { OptDecouple, "OptDecouple", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptDupLoads = { OptDupLoads, "OptDupLoads", 0, 0, 0, 0, 0, 0 }; +static OptFunc DOptGotoSPAdj = { OptGotoSPAdj, "OptGotoSPAdj", 0, 0, 0, 0, 0, 0 }; static OptFunc DOptIndLoads1 = { OptIndLoads1, "OptIndLoads1", 0, 0, 0, 0, 0, 0 }; static OptFunc DOptIndLoads2 = { OptIndLoads2, "OptIndLoads2", 0, 0, 0, 0, 0, 0 }; static OptFunc DOptJumpCascades = { OptJumpCascades, "OptJumpCascades", 100, 0, 0, 0, 0, 0 }; @@ -686,9 +146,6 @@ static OptFunc DOptLoad2 = { OptLoad2, "OptLoad2", 200, 0, static OptFunc DOptLoad3 = { OptLoad3, "OptLoad3", 0, 0, 0, 0, 0, 0 }; static OptFunc DOptNegAX1 = { OptNegAX1, "OptNegAX1", 165, 0, 0, 0, 0, 0 }; static OptFunc DOptNegAX2 = { OptNegAX2, "OptNegAX2", 200, 0, 0, 0, 0, 0 }; -static OptFunc DOptRTS = { OptRTS, "OptRTS", 100, 0, 0, 0, 0, 0 }; -static OptFunc DOptRTSJumps1 = { OptRTSJumps1, "OptRTSJumps1", 100, 0, 0, 0, 0, 0 }; -static OptFunc DOptRTSJumps2 = { OptRTSJumps2, "OptRTSJumps2", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptPrecalc = { OptPrecalc, "OptPrecalc", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptPtrLoad1 = { OptPtrLoad1, "OptPtrLoad1", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptPtrLoad2 = { OptPtrLoad2, "OptPtrLoad2", 100, 0, 0, 0, 0, 0 }; @@ -704,18 +161,26 @@ static OptFunc DOptPtrLoad14 = { OptPtrLoad14, "OptPtrLoad14", 108, 0, static OptFunc DOptPtrLoad15 = { OptPtrLoad15, "OptPtrLoad15", 86, 0, 0, 0, 0, 0 }; static OptFunc DOptPtrLoad16 = { OptPtrLoad16, "OptPtrLoad16", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptPtrLoad17 = { OptPtrLoad17, "OptPtrLoad17", 190, 0, 0, 0, 0, 0 }; +static OptFunc DOptPtrLoad18 = { OptPtrLoad18, "OptPtrLoad18", 100, 0, 0, 0, 0, 0 }; +static OptFunc DOptPtrLoad19 = { OptPtrLoad19, "OptPtrLoad19", 65, 0, 0, 0, 0, 0 }; static OptFunc DOptPtrStore1 = { OptPtrStore1, "OptPtrStore1", 65, 0, 0, 0, 0, 0 }; static OptFunc DOptPtrStore2 = { OptPtrStore2, "OptPtrStore2", 65, 0, 0, 0, 0, 0 }; static OptFunc DOptPtrStore3 = { OptPtrStore3, "OptPtrStore3", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptPush1 = { OptPush1, "OptPush1", 65, 0, 0, 0, 0, 0 }; static OptFunc DOptPush2 = { OptPush2, "OptPush2", 50, 0, 0, 0, 0, 0 }; -static OptFunc DOptPushPop = { OptPushPop, "OptPushPop", 0, 0, 0, 0, 0, 0 }; +static OptFunc DOptPushPop1 = { OptPushPop1, "OptPushPop1", 0, 0, 0, 0, 0, 0 }; +static OptFunc DOptPushPop2 = { OptPushPop2, "OptPushPop2", 0, 0, 0, 0, 0, 0 }; +static OptFunc DOptRTS = { OptRTS, "OptRTS", 100, 0, 0, 0, 0, 0 }; +static OptFunc DOptRTSJumps1 = { OptRTSJumps1, "OptRTSJumps1", 100, 0, 0, 0, 0, 0 }; +static OptFunc DOptRTSJumps2 = { OptRTSJumps2, "OptRTSJumps2", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptShift1 = { OptShift1, "OptShift1", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptShift2 = { OptShift2, "OptShift2", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptShift3 = { OptShift3, "OptShift3", 17, 0, 0, 0, 0, 0 }; static OptFunc DOptShift4 = { OptShift4, "OptShift4", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptShift5 = { OptShift5, "OptShift5", 110, 0, 0, 0, 0, 0 }; static OptFunc DOptShift6 = { OptShift6, "OptShift6", 200, 0, 0, 0, 0, 0 }; +static OptFunc DOptShiftBack = { OptShiftBack, "OptShiftBack", 0, 0, 0, 0, 0, 0 }; +static OptFunc DOptSignExtended = { OptSignExtended, "OptSignExtended", 0, 0, 0, 0, 0, 0 }; static OptFunc DOptSize1 = { OptSize1, "OptSize1", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptSize2 = { OptSize2, "OptSize2", 100, 0, 0, 0, 0, 0 }; static OptFunc DOptStackOps = { OptStackOps, "OptStackOps", 100, 0, 0, 0, 0, 0 }; @@ -758,6 +223,7 @@ static OptFunc* OptFuncs[] = { &DOptBNegAX4, &DOptBoolTrans, &DOptBranchDist, + &DOptBranchDist2, &DOptCmp1, &DOptCmp2, &DOptCmp3, @@ -774,6 +240,7 @@ static OptFunc* OptFuncs[] = { &DOptDeadJumps, &DOptDecouple, &DOptDupLoads, + &DOptGotoSPAdj, &DOptIndLoads1, &DOptIndLoads2, &DOptJumpCascades, @@ -794,6 +261,8 @@ static OptFunc* OptFuncs[] = { &DOptPtrLoad15, &DOptPtrLoad16, &DOptPtrLoad17, + &DOptPtrLoad18, + &DOptPtrLoad19, &DOptPtrLoad2, &DOptPtrLoad3, &DOptPtrLoad4, @@ -805,7 +274,7 @@ static OptFunc* OptFuncs[] = { &DOptPtrStore3, &DOptPush1, &DOptPush2, - &DOptPushPop, + &DOptPushPop1, &DOptRTS, &DOptRTSJumps1, &DOptRTSJumps2, @@ -815,6 +284,8 @@ static OptFunc* OptFuncs[] = { &DOptShift4, &DOptShift5, &DOptShift6, + &DOptShiftBack, + &DOptSignExtended, &DOptSize1, &DOptSize2, &DOptStackOps, @@ -870,7 +341,7 @@ static OptFunc* GetOptFunc (const char* Name) OptFunc* F = FindOptFunc (Name); if (F == 0) { /* Not found */ - AbEnd ("Optimization step `%s' not found", Name); + AbEnd ("Optimization step '%s' not found", Name); } return F; } @@ -911,8 +382,12 @@ void ListOptSteps (FILE* F) /* List all optimization steps */ { unsigned I; + + fprintf (F, "any\n"); for (I = 0; I < OPTFUNC_COUNT; ++I) { - fprintf (F, "%s\n", OptFuncs[I]->Name); + if (OptFuncs[I]->Func != 0) { + fprintf (F, "%s\n", OptFuncs[I]->Name); + } } } @@ -922,7 +397,6 @@ static void ReadOptStats (const char* Name) /* Read the optimizer statistics file */ { char Buf [256]; - unsigned Lines; /* Try to open the file */ FILE* F = fopen (Name, "r"); @@ -932,7 +406,6 @@ static void ReadOptStats (const char* Name) } /* Read and parse the lines */ - Lines = 0; while (fgets (Buf, sizeof (Buf), F) != 0) { char* B; @@ -944,9 +417,6 @@ static void ReadOptStats (const char* Name) unsigned long TotalRuns; unsigned long TotalChanges; - /* Count lines */ - ++Lines; - /* Remove trailing white space including the line terminator */ B = Buf; Len = strlen (B); @@ -1055,10 +525,10 @@ static void WriteDebugOutput (CodeSeg* S, const char* Step) /* Output a header line */ if (Step == 0) { /* Initial output */ - WriteOutput ("Initial code for function `%s':\n", + WriteOutput ("Initial code for function '%s':\n", S->Func? S->Func->Name : "<global>"); } else { - WriteOutput ("Code after applying `%s':\n", Step); + WriteOutput ("Code after applying '%s':\n", Step); } /* Output the code segment */ @@ -1073,10 +543,10 @@ static unsigned RunOptFunc (CodeSeg* S, OptFunc* F, unsigned Max) { unsigned Changes, C; - /* Don't run the function if it is disabled or if it is prohibited by the + /* Don't run the function if it is removed, disabled or prohibited by the ** code size factor */ - if (F->Disabled || F->CodeSizeFactor > S->CodeSizeFactor) { + if (F->Func == 0 || F->Disabled || F->CodeSizeFactor > S->CodeSizeFactor) { return 0; } @@ -1120,17 +590,20 @@ static unsigned RunOptGroup1 (CodeSeg* S) { unsigned Changes = 0; + Changes += RunOptFunc (S, &DOptGotoSPAdj, 1); Changes += RunOptFunc (S, &DOptStackPtrOps, 5); + Changes += RunOptFunc (S, &DOptAdd3, 1); /* Before OptPtrLoad5! */ Changes += RunOptFunc (S, &DOptPtrStore1, 1); Changes += RunOptFunc (S, &DOptPtrStore2, 1); Changes += RunOptFunc (S, &DOptPtrStore3, 1); - Changes += RunOptFunc (S, &DOptAdd3, 1); /* Before OptPtrLoad5! */ Changes += RunOptFunc (S, &DOptPtrLoad1, 1); Changes += RunOptFunc (S, &DOptPtrLoad2, 1); Changes += RunOptFunc (S, &DOptPtrLoad3, 1); Changes += RunOptFunc (S, &DOptPtrLoad4, 1); Changes += RunOptFunc (S, &DOptPtrLoad5, 1); Changes += RunOptFunc (S, &DOptPtrLoad6, 1); + Changes += RunOptFunc (S, &DOptPtrLoad18, 1); /* Before OptPtrLoad7 */ + Changes += RunOptFunc (S, &DOptPtrLoad19, 1); /* Before OptPtrLoad7 */ Changes += RunOptFunc (S, &DOptPtrLoad7, 1); Changes += RunOptFunc (S, &DOptPtrLoad11, 1); Changes += RunOptFunc (S, &DOptPtrLoad12, 1); @@ -1210,7 +683,6 @@ static unsigned RunOptGroup3 (CodeSeg* S) C += RunOptFunc (S, &DOptAdd6, 1); C += RunOptFunc (S, &DOptJumpCascades, 1); C += RunOptFunc (S, &DOptDeadJumps, 1); - C += RunOptFunc (S, &DOptRTS, 1); C += RunOptFunc (S, &DOptDeadCode, 1); C += RunOptFunc (S, &DOptBoolTrans, 1); C += RunOptFunc (S, &DOptJumpTarget1, 1); @@ -1239,8 +711,11 @@ static unsigned RunOptGroup3 (CodeSeg* S) C += RunOptFunc (S, &DOptTransfers4, 1); C += RunOptFunc (S, &DOptStore1, 1); C += RunOptFunc (S, &DOptStore5, 1); - C += RunOptFunc (S, &DOptPushPop, 1); + C += RunOptFunc (S, &DOptPushPop1, 1); + C += RunOptFunc (S, &DOptPushPop2, 1); C += RunOptFunc (S, &DOptPrecalc, 1); + C += RunOptFunc (S, &DOptShiftBack, 1); + C += RunOptFunc (S, &DOptSignExtended, 1); Changes += C; @@ -1365,11 +840,20 @@ static unsigned RunOptGroup7 (CodeSeg* S) /* Adjust branch distances */ Changes += RunOptFunc (S, &DOptBranchDist, 3); - /* Replace conditional branches to RTS. If we had changes, we must run dead - ** code elimination again, since the change may have introduced dead code. - */ + /* Replace conditional branches to RTS */ C = RunOptFunc (S, &DOptRTSJumps2, 1); + + /* Replace JSR followed by RTS to JMP */ + C += RunOptFunc (S, &DOptRTS, 1); + + /* Replace JMP/BRA to JMP by direct JMP */ + C += RunOptFunc (S, &DOptJumpCascades, 1); + C += RunOptFunc (S, &DOptBranchDist2, 1); + Changes += C; + /* If we had changes, we must run dead code elimination again, + ** since the changes may have introduced dead code. + */ if (C) { Changes += RunOptFunc (S, &DOptDeadCode, 1); } @@ -1398,7 +882,7 @@ void RunOpt (CodeSeg* S) /* Print the name of the function we are working on */ if (S->Func) { - Print (stdout, 1, "Running optimizer for function `%s'\n", S->Func->Name); + Print (stdout, 1, "Running optimizer for function '%s'\n", S->Func->Name); } else { Print (stdout, 1, "Running optimizer for global code segment\n"); } diff --git a/src/cc65/codeoptutil.c b/src/cc65/codeoptutil.c new file mode 100644 index 000000000..173d5185f --- /dev/null +++ b/src/cc65/codeoptutil.c @@ -0,0 +1,3192 @@ +/*****************************************************************************/ +/* */ +/* codeoptutil.c */ +/* */ +/* Optimize operations that take operands via the stack */ +/* */ +/* */ +/* */ +/* (C) 2001 Ullrich von Bassewitz */ +/* Wacholderweg 14 */ +/* D-70597 Stuttgart */ +/* EMail: uz@cc65.org */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#include <stdlib.h> + +/* common */ +#include "chartype.h" +#include "xmalloc.h" + +/* cc65 */ +#include "codeinfo.h" +#include "codeoptutil.h" +#include "error.h" + + + +/*****************************************************************************/ +/* Load tracking code */ +/*****************************************************************************/ + + + +void ClearLoadRegInfo (LoadRegInfo* LRI) +/* Clear a LoadRegInfo struct */ +{ + LRI->Flags = LI_NONE; + LRI->LoadIndex = -1; + LRI->LoadEntry = 0; + LRI->LoadYIndex = -1; + LRI->LoadYEntry = 0; + LRI->ChgIndex = -1; + LRI->ChgEntry = 0; + LRI->Offs = 0; +} + + + +void CopyLoadRegInfo (LoadRegInfo* To, LoadRegInfo* From) +/* Copy a LoadRegInfo struct */ +{ + To->Flags = From->Flags; + To->LoadIndex = From->LoadIndex; + To->LoadEntry = From->LoadEntry; + To->LoadYIndex = From->LoadYIndex; + To->LoadYEntry = From->LoadYEntry; + To->ChgIndex = From->ChgIndex; + To->ChgEntry = From->ChgEntry; + To->Offs = From->Offs; +} + + + +void FinalizeLoadRegInfo (LoadRegInfo* LRI, CodeSeg* S) +/* Prepare a LoadRegInfo struct for use */ +{ + /* Get the entries */ + if (LRI->LoadIndex >= 0) { + LRI->LoadEntry = CS_GetEntry (S, LRI->LoadIndex); + } else { + LRI->LoadEntry = 0; + } + if (LRI->LoadYIndex >= 0) { + LRI->LoadYEntry = CS_GetEntry (S, LRI->LoadYIndex); + } else { + LRI->LoadYEntry = 0; + } + if (LRI->ChgIndex >= 0) { + LRI->ChgEntry = CS_GetEntry (S, LRI->ChgIndex); + } else { + LRI->ChgEntry = 0; + } + + /* Load from src not modified before op can be treated as direct */ + if ((LRI->Flags & (LI_SRC_CHG | LI_Y_SRC_CHG)) == 0 && + (LRI->Flags & (LI_CHECK_ARG | LI_CHECK_Y)) != 0) { + LRI->Flags |= LI_DIRECT; + if ((LRI->Flags & LI_CHECK_Y) != 0) { + LRI->Flags |= LI_RELOAD_Y; + } + } + /* We cannot ldy src,y or reload unknown Y */ + if ((LRI->Flags & (LI_CHECK_Y | LI_RELOAD_Y)) == (LI_CHECK_Y | LI_RELOAD_Y) && + (LRI->LoadYEntry == 0 || + (LRI->LoadYEntry->Use & REG_Y) == REG_Y)) { + LRI->Flags &= ~LI_DIRECT; + } +} + + + +void AdjustLoadRegInfo (LoadRegInfo* LRI, int Index, int Change) +/* Adjust a load register info struct after deleting or inserting an entry +** with a given index +*/ +{ + CHECK (abs (Change) == 1); + if (Change < 0) { + /* Deletion */ + if (Index < LRI->LoadIndex) { + --LRI->LoadIndex; + } else if (Index == LRI->LoadIndex) { + /* Has been removed */ + LRI->LoadIndex = -1; + LRI->LoadEntry = 0; + } + if (Index < LRI->LoadYIndex) { + --LRI->LoadIndex; + } else if (Index == LRI->LoadYIndex) { + /* Has been removed */ + LRI->LoadYIndex = -1; + LRI->LoadYEntry = 0; + } + if (Index < LRI->ChgIndex) { + --LRI->ChgIndex; + } else if (Index == LRI->ChgIndex) { + /* Has been removed */ + LRI->ChgIndex = -1; + LRI->ChgEntry = 0; + } + } else { + /* Insertion */ + if (Index <= LRI->LoadIndex) { + ++LRI->LoadIndex; + } + if (Index <= LRI->LoadYIndex) { + ++LRI->LoadYIndex; + } + if (Index <= LRI->ChgIndex) { + ++LRI->ChgIndex; + } + } +} + + + +void ClearLoadInfo (LoadInfo* LI) +/* Clear a LoadInfo struct */ +{ + ClearLoadRegInfo (&LI->A); + ClearLoadRegInfo (&LI->X); + ClearLoadRegInfo (&LI->Y); +} + + + +void CopyLoadInfo (LoadInfo* To, LoadInfo* From) +/* Copy a LoadInfo struct */ +{ + CopyLoadRegInfo (&To->A, &From->A); + CopyLoadRegInfo (&To->X, &From->X); + CopyLoadRegInfo (&To->Y, &From->Y); +} + + + +void FinalizeLoadInfo (LoadInfo* LI, CodeSeg* S) +/* Prepare a LoadInfo struct for use */ +{ + /* Get the entries */ + FinalizeLoadRegInfo (&LI->A, S); + FinalizeLoadRegInfo (&LI->X, S); + FinalizeLoadRegInfo (&LI->Y, S); +} + + + +void AdjustLoadInfo (LoadInfo* LI, int Index, int Change) +/* Adjust a load info struct after deleting entry with a given index */ +{ + AdjustLoadRegInfo (&LI->A, Index, Change); + AdjustLoadRegInfo (&LI->X, Index, Change); + AdjustLoadRegInfo (&LI->Y, Index, Change); +} + + + +RegInfo* GetLastChangedRegInfo (StackOpData* D, LoadRegInfo* Reg) +/* Get RegInfo of the last insn entry that changed the reg */ +{ + CodeEntry* E; + + if (Reg->ChgIndex >= 0 && (E = CS_GetEntry (D->Code, Reg->ChgIndex)) != 0) { + return E->RI; + } + + return 0; +} + + + +static int Affected (LoadRegInfo* LRI, const CodeEntry* E) +/* Check if the result of the same loading code as in LRI may be changed by E. +** If any part of the arg is used, it could be unsafe to add such a store before E. +** If any part of the arg is changed, it could be unsafe to add such a load after E. +*/ +{ + fncls_t fncls; + unsigned int Use; + unsigned int Chg; + unsigned int UseToCheck = 0; + unsigned int ChgToCheck = 0; + const ZPInfo* ZI = 0; + unsigned Res = 0; + CodeEntry* AE = 0; + CodeEntry* YE = 0; + + if ((LRI->Flags & (LI_CHECK_ARG | LI_CHECK_Y | LI_RELOAD_Y)) == 0) { + /* Nothing to check */ + return 0; + } + + if (E->AM == AM65_ACC || E->AM == AM65_BRA || E->AM == AM65_IMM || E->AM == AM65_IMP) { + goto L_Result; + } + CHECK ((LRI->Flags & LI_CHECK_ARG) == 0 || LRI->LoadIndex < 0 || LRI->LoadEntry != 0); + CHECK ((LRI->Flags & (LI_CHECK_Y | LI_RELOAD_Y)) == 0 || LRI->LoadYIndex < 0 || LRI->LoadYEntry != 0); + + if ((LRI->Flags & LI_CHECK_ARG) != 0) { + AE = LRI->LoadEntry; + if (AE != 0) { + /* We ignore processor flags for loading args. + ** Further more, Reg A can't be used as the index. + */ + UseToCheck |= AE->Use & ~REG_A & REG_ALL; + ChgToCheck |= AE->Chg & ~REG_A & REG_ALL; + + /* Check if the argument has been parsed successfully */ + if (!CE_IsArgStrParsed (AE)) { + /* Bail out and play it safe*/ + goto L_Affected; + } + /* We have to manually set up the use/chg flags for builtin functions */ + ZI = GetZPInfo (AE->ArgBase); + if (ZI != 0) { + UseToCheck |= ZI->ByteUse; + ChgToCheck |= ZI->ByteUse; + } + } else { + /* We don't know what regs could have been used for the src. + ** So we just assume all. + */ + UseToCheck |= ~REG_A & REG_ALL; + ChgToCheck |= ~REG_A & REG_ALL; + } + } + + if ((LRI->Flags & LI_CHECK_Y) != 0) { + YE = LRI->LoadYEntry; + if (YE != 0) { + UseToCheck |= YE->Use; + + /* Check if the argument has been parsed successfully */ + if (!CE_IsArgStrParsed (YE)) { + /* Bail out and play it safe*/ + goto L_Affected; + } + /* We have to manually set up the use/chg flags for builtin functions */ + ZI = GetZPInfo (YE->ArgBase); + if (ZI != 0) { + UseToCheck |= ZI->ByteUse; + ChgToCheck |= ZI->ByteUse; + } + } else { + /* We don't know what regs could have been used by Y. + ** So we just assume all. + */ + UseToCheck |= ~REG_A & REG_ALL; + ChgToCheck |= ~REG_A & REG_ALL; + } + } + + if (E->OPC == OP65_JSR) { + /* Try to know about the function */ + fncls = GetFuncInfo (E->Arg, &Use, &Chg); + if (fncls == FNCLS_BUILTIN) { + /* Builtin functions are usually harmless */ + if ((ChgToCheck & Use & REG_ALL) != 0) { + Res |= LI_SRC_USE; + } + if ((UseToCheck & Chg & REG_ALL) != 0) { + Res |= LI_SRC_CHG; + } + goto L_Result; + } + /* Otherwise play it safe */ + goto L_Affected; + + } else { + if ((E->Info & (OF_READ | OF_WRITE)) != 0) { + + /* Check if the argument has been parsed successfully */ + if (!CE_IsArgStrParsed (E)) { + /* Bail out and play it safe*/ + goto L_Affected; + } + + /* These opc may operate on memory locations. In some cases we can + ** be sure that the src is unaffected as E doesn't overlap with it. + ** However, if we don't know what memory locations could have been + ** used for the src, we just assume all. + */ + if (E->AM == AM65_ABS || + E->AM == AM65_ZP || + (E->AM == AM65_ZP_INDY && strcmp (E->ArgBase, "sp") == 0) + ) { + if ((LRI->Flags & LI_CHECK_ARG) != 0) { + if (AE == 0 || + (AE->AM != AM65_ABS && + AE->AM != AM65_ZP && + (AE->AM != AM65_ZP_INDY || + strcmp (AE->ArgBase, "sp") != 0)) || + (AE->ArgOff == E->ArgOff && + strcmp (AE->ArgBase, E->ArgBase) == 0)) { + + if ((E->Info & OF_READ) != 0) { + /* Used */ + Res |= LI_SRC_USE; + } + if ((E->Info & OF_WRITE) != 0) { + /* Changed */ + Res |= LI_SRC_CHG; + } + } + } + + if ((LRI->Flags & LI_CHECK_Y) != 0) { + /* If we don't know what memory location could have been + ** used by Y, we just assume all. + */ + if (YE == 0 || + (YE->ArgOff == E->ArgOff && strcmp (YE->ArgBase, E->ArgBase) == 0)) { + + if ((E->Info & OF_READ) != 0) { + /* Used */ + Res |= LI_Y_SRC_USE; + } + if ((E->Info & OF_WRITE) != 0) { + /* Changed */ + Res |= LI_Y_SRC_CHG; + } + } + } + + /* Otherwise unaffected */ + goto L_Result; + } + /* We could've check further for more cases where the load target + ** isn't modified, but for now let's save the trouble and just play + ** it safe. + */ + goto L_Affected; + } + } + +L_Affected: + if ((E->Info & OF_READ) != 0) { + /* Used */ + Res |= LI_SRC_USE; + if ((LRI->Flags & LI_CHECK_Y) != 0) { + Res |= LI_Y_SRC_USE; + } + } + if ((E->Info & OF_WRITE) != 0) { + /* Changed */ + Res |= LI_SRC_CHG; + if ((LRI->Flags & LI_CHECK_Y) != 0) { + Res |= LI_Y_SRC_CHG; + } + } + +L_Result: + if ((LRI->Flags & LI_RELOAD_Y) != 0 && + (E->Use & REG_Y) != 0) { + Res |= LI_Y_USE; + } + if ((LRI->Flags & LI_CHECK_Y) != 0 && + (E->Chg & REG_Y) != 0) { + Res |= LI_Y_CHG; + } + + return Res; +} + + + +static void HonourUseAndChg (LoadRegInfo* LRI, unsigned Reg, const CodeEntry* E, int I) +/* Honour use and change flags for an instruction */ +{ + if ((E->Chg & Reg) != 0) { + /* This changes the content of the reg */ + ClearLoadRegInfo (LRI); + LRI->ChgIndex = I; + LRI->Flags = 0; + } else { + LRI->Flags |= Affected (LRI, E); + } +} + + + +void PrepairLoadRegInfoForArgCheck (CodeSeg* S, LoadRegInfo* LRI, CodeEntry* E) +/* Set the load src flags and remember to check for load src change if necessary. +** Note: this doesn't assume reloading Y. +*/ +{ + if (E->AM == AM65_IMM) { + /* These insns are all ok and replaceable */ + LRI->Flags |= LI_DIRECT; + } else if (E->AM == AM65_ZP || E->AM == AM65_ABS) { + /* These insns are replaceable only if they are not modified later */ + LRI->Flags |= LI_CHECK_ARG; + } else if (E->AM == AM65_ZPY || E->AM == AM65_ABSY) { + /* These insns are replaceable only if they are not modified later */ + LRI->Flags |= LI_CHECK_ARG | LI_CHECK_Y; + } else if ((E->AM == AM65_ZP_INDY) && + strcmp (E->Arg, "sp") == 0) { + /* A load from the stack with known offset is also ok, but in this + ** case we must reload the index register later. Please note that + ** a load indirect via other zero page locations is not ok, since + ** these locations may change between the push and the actual + ** operation. + */ + LRI->Flags |= LI_CHECK_ARG | LI_CHECK_Y; + } + + /* If the load offset has a known value, we can just remember and reload + ** it into the index register later. + */ + if ((LRI->Flags & LI_CHECK_Y) != 0) { + if (RegValIsKnown (E->RI->In.RegY)) { + LRI->Offs = (unsigned char)E->RI->In.RegY; + LRI->Flags &= ~LI_CHECK_Y; + LRI->Flags |= LI_RELOAD_Y; + } + } + + /* Watch for any change of the load target */ + if ((LRI->Flags & LI_CHECK_ARG) != 0) { + LRI->LoadIndex = CS_GetEntryIndex (S, E); + LRI->LoadEntry = E; + } + + /* We need to check if the src of Y is changed */ + if (LRI->LoadYIndex >= 0) { + LRI->LoadYEntry = CS_GetEntry (S, LRI->LoadYIndex); + } else { + LRI->LoadYEntry = 0; + } +} + + + +void SetIfOperandSrcAffected (LoadInfo* LLI, CodeEntry* E) +/* Check and flag operand src that may be affected */ +{ + LLI->A.Flags |= Affected (&LLI->A, E); + LLI->X.Flags |= Affected (&LLI->X, E); + LLI->Y.Flags |= Affected (&LLI->Y, E); +} + + + +void SetIfOperandLoadUnremovable (LoadInfo* LI, unsigned Used) +/* Check and flag operand load that may be unremovable */ +{ + /* Disallow removing the loads if the registers are used */ + if ((Used & REG_A) != 0) { + LI->A.Flags |= LI_DONT_REMOVE; + } + if ((Used & REG_X) != 0) { + LI->X.Flags |= LI_DONT_REMOVE; + } + if ((Used & REG_Y) != 0) { + LI->Y.Flags |= LI_DONT_REMOVE; + } +} + + + +unsigned int TrackLoads (LoadInfo* LI, CodeSeg* S, int I) +/* Track loads for a code entry. +** Return used registers. +*/ +{ + unsigned Used; + CodeEntry* E = CS_GetEntry (S, I); + CHECK (E != 0); + + /* By default */ + Used = E->Use; + + /* Whether we had a load or xfer op before or not, the newly loaded value + ** will be the real one used for the pushax/op unless it's overwritten, + ** so we can just reset the flags about it in such cases. + */ + if (E->Info & OF_LOAD) { + + LoadRegInfo* LRI = 0; + + /* Determine, which register was loaded */ + if (E->Chg & REG_A) { + LRI = &LI->A; + } else if (E->Chg & REG_X) { + LRI = &LI->X; + } else if (E->Chg & REG_Y) { + LRI = &LI->Y; + } + CHECK (LRI != 0); + + /* Remember the load */ + LRI->LoadIndex = I; + LRI->ChgIndex = I; + LRI->LoadYIndex = -1; + + /* Set load flags */ + LRI->Flags = LI_LOAD_INSN; + if (E->AM == AM65_IMM) { + /* These insns are all ok and replaceable */ + LRI->Flags |= LI_DIRECT; + } else if (E->AM == AM65_ZP || E->AM == AM65_ABS) { + /* These insns are replaceable only if they are not modified later */ + LRI->Flags |= LI_CHECK_ARG; + } else if (E->AM == AM65_ZPY || E->AM == AM65_ABSY) { + /* These insns are replaceable only if they are not modified later */ + LRI->Flags |= LI_CHECK_ARG | LI_CHECK_Y; + } else if (E->AM == AM65_ZP_INDY && + strcmp (E->Arg, "sp") == 0) { + /* A load from the stack with known offset is also ok, but in this + ** case we must reload the index register later. Please note that + ** a load indirect via other zero page locations is not ok, since + ** these locations may change between the push and the actual + ** operation. + */ + LRI->Flags |= LI_CHECK_ARG | LI_CHECK_Y | LI_SP; + + /* Reg Y can be regarded as unused if this load is removed */ + Used &= ~REG_Y; + if (LRI == &LI->A) { + LI->Y.Flags |= LI_USED_BY_A; + } else { + LI->Y.Flags |= LI_USED_BY_X; + } + } + + /* If the load offset has a known value, we can just remember and reload + ** it into the index register later. + */ + if ((LRI->Flags & LI_CHECK_Y) != 0) { + if (RegValIsKnown (E->RI->In.RegY)) { + LRI->Offs = (unsigned char)E->RI->In.RegY; + LRI->Flags &= ~LI_CHECK_Y; + LRI->Flags |= LI_RELOAD_Y; + } else { + /* We need to check if the src of Y is changed */ + LRI->LoadYIndex = LI->Y.LoadIndex; + } + } + + /* Watch for any change of the load target */ + if ((LRI->Flags & LI_CHECK_ARG) != 0) { + LRI->LoadEntry = CS_GetEntry (S, I); + } + + if (LRI->LoadYIndex >= 0) { + LRI->LoadYEntry = CS_GetEntry (S, LRI->LoadYIndex); + } else { + LRI->LoadYEntry = 0; + } + + } else if (E->Info & OF_XFR) { + + /* Determine source and target of the transfer and handle the TSX insn */ + LoadRegInfo* Src; + LoadRegInfo* Tgt; + switch (E->OPC) { + case OP65_TAX: + Src = &LI->A; + Tgt = &LI->X; + Used &= ~REG_A; + Src->Flags |= LI_USED_BY_X; + break; + case OP65_TAY: + Src = &LI->A; + Tgt = &LI->Y; + Used &= ~REG_A; + Src->Flags |= LI_USED_BY_Y; + break; + case OP65_TXA: + Src = &LI->X; + Tgt = &LI->A; + Used &= ~REG_X; + Src->Flags |= LI_USED_BY_A; + break; + case OP65_TYA: + Src = &LI->Y; + Tgt = &LI->A; + Used &= ~REG_Y; + Src->Flags |= LI_USED_BY_A; + break; + case OP65_TSX: + ClearLoadRegInfo (&LI->X); + return Used; + case OP65_TXS: + return Used; + default: Internal ("Unknown XFR insn in TrackLoads"); + } + + /* Transfer the data */ + Tgt->LoadIndex = Src->LoadIndex; + Tgt->LoadEntry = Src->LoadEntry; + Tgt->LoadYIndex = Src->LoadYIndex; + Tgt->LoadYEntry = Src->LoadYEntry; + Tgt->ChgIndex = I; + Tgt->Offs = Src->Offs; + Tgt->Flags = Src->Flags; + + } else if (CE_IsCallTo (E, "ldaxysp") && RegValIsKnown (E->RI->In.RegY)) { + + /* Both registers set, Y changed */ + LI->A.LoadIndex = I; + LI->A.ChgIndex = I; + LI->A.Flags = (LI_LOAD_INSN | LI_DIRECT | LI_RELOAD_Y | LI_SP); + LI->A.Offs = (unsigned char) E->RI->In.RegY - 1; + + LI->X.LoadIndex = I; + LI->X.ChgIndex = I; + LI->X.Flags = (LI_LOAD_INSN | LI_DIRECT | LI_RELOAD_Y | LI_SP); + LI->X.Offs = (unsigned char) E->RI->In.RegY; + + /* Reg Y can be regarded as unused if this load is removed */ + Used &= ~REG_Y; + LI->Y.Flags |= LI_USED_BY_A | LI_USED_BY_X; + + } else { + HonourUseAndChg (&LI->A, REG_A, E, I); + HonourUseAndChg (&LI->X, REG_X, E, I); + HonourUseAndChg (&LI->Y, REG_Y, E, I); + } + + return Used; +} + + + +void SetDontRemoveEntryFlag (LoadRegInfo* LRI) +/* Flag the entry as non-removable according to register flags */ +{ + if (LRI->Flags & LI_DONT_REMOVE) { + if (LRI->LoadEntry != 0) { + LRI->LoadEntry->Flags |= CEF_DONT_REMOVE; + + /* If the load requires Y, then Y shouldn't be removed either */ + if (LRI->LoadYEntry != 0) { + LRI->LoadYEntry->Flags |= CEF_DONT_REMOVE; + } + } + } +} + + + +void ResetDontRemoveEntryFlag (LoadRegInfo* LRI) +/* Unflag the entry as non-removable according to register flags */ +{ + if (LRI->LoadEntry != 0) { + LRI->LoadEntry->Flags &= ~CEF_DONT_REMOVE; + } + + if (LRI->LoadYEntry != 0) { + LRI->LoadYEntry->Flags &= ~CEF_DONT_REMOVE; + } + + if (LRI->ChgEntry != 0) { + LRI->ChgEntry->Flags &= ~CEF_DONT_REMOVE; + } +} + + + +void SetDontRemoveEntryFlags (StackOpData* D) +/* Flag the entries as non-removable according to register flags */ +{ + SetDontRemoveEntryFlag (&D->Lhs.A); + SetDontRemoveEntryFlag (&D->Lhs.X); + SetDontRemoveEntryFlag (&D->Lhs.Y); + SetDontRemoveEntryFlag (&D->Rhs.A); + SetDontRemoveEntryFlag (&D->Rhs.X); + SetDontRemoveEntryFlag (&D->Rhs.Y); + SetDontRemoveEntryFlag (&D->Rv.A); + SetDontRemoveEntryFlag (&D->Rv.X); + SetDontRemoveEntryFlag (&D->Rv.Y); +} + + + +void ResetDontRemoveEntryFlags (StackOpData* D) +/* Unflag the entries as non-removable according to register flags */ +{ + ResetDontRemoveEntryFlag (&D->Lhs.A); + ResetDontRemoveEntryFlag (&D->Lhs.X); + ResetDontRemoveEntryFlag (&D->Lhs.Y); + ResetDontRemoveEntryFlag (&D->Rhs.A); + ResetDontRemoveEntryFlag (&D->Rhs.X); + ResetDontRemoveEntryFlag (&D->Rhs.Y); + ResetDontRemoveEntryFlag (&D->Rv.A); + ResetDontRemoveEntryFlag (&D->Rv.X); + ResetDontRemoveEntryFlag (&D->Rv.Y); +} + + + +void ResetStackOpData (StackOpData* Data) +/* Reset the given data structure */ +{ + Data->OptFunc = 0; + Data->ZPUsage = REG_NONE; + Data->ZPChanged = REG_NONE; + Data->UsedRegs = REG_NONE; + Data->RhsMultiChg = 0; + + ClearLoadInfo (&Data->Lhs); + ClearLoadInfo (&Data->Rhs); + ClearLoadInfo (&Data->Rv); + + Data->PushIndex = -1; + Data->OpIndex = -1; +} + + + +/*****************************************************************************/ +/* Helpers */ +/*****************************************************************************/ + + + +void InsertEntry (StackOpData* D, CodeEntry* E, int Index) +/* Insert a new entry. Depending on Index, D->PushIndex and D->OpIndex will +** be adjusted by this function. +*/ +{ + /* Insert the entry into the code segment */ + CS_InsertEntry (D->Code, E, Index); + + /* Adjust register loads if necessary */ + AdjustLoadInfo (&D->Lhs, Index, 1); + AdjustLoadInfo (&D->Rhs, Index, 1); + + /* Adjust the indices if necessary */ + if (D->PushEntry && Index <= D->PushIndex) { + ++D->PushIndex; + } + if (D->OpEntry && Index <= D->OpIndex) { + ++D->OpIndex; + } +} + + + +void DelEntry (StackOpData* D, int Index) +/* Delete an entry. Depending on Index, D->PushIndex and D->OpIndex will be +** adjusted by this function, and PushEntry/OpEntry may get invalidated. +*/ +{ + /* Delete the entry from the code segment */ + CS_DelEntry (D->Code, Index); + + /* Adjust register loads if necessary */ + AdjustLoadInfo (&D->Lhs, Index, -1); + AdjustLoadInfo (&D->Rhs, Index, -1); + + /* Adjust the other indices if necessary */ + if (Index < D->PushIndex) { + --D->PushIndex; + } else if (Index == D->PushIndex) { + D->PushEntry = 0; + } + if (Index < D->OpIndex) { + --D->OpIndex; + } else if (Index == D->OpIndex) { + D->OpEntry = 0; + } +} + + + +void AdjustStackOffset (StackOpData* D, unsigned Offs) +/* Adjust the offset for all stack accesses in the range PushIndex to OpIndex. +** OpIndex is adjusted according to the insertions. +*/ +{ + /* Walk over all entries */ + int I = D->PushIndex + 1; + while (I < D->OpIndex) { + + CodeEntry* E = CS_GetEntry (D->Code, I); + + /* Check against some things that should not happen */ + CHECK ((E->Use & SLV_TOP) != SLV_TOP); + + /* Check if this entry does a stack access, and if so, if it's a plain + ** load from stack, since this is needed later. + */ + int Correction = 0; + if ((E->Use & SLV_IND) == SLV_IND) { + + if (E->OPC != OP65_JSR) { + /* Check against some things that should not happen */ + CHECK (E->AM == AM65_ZP_INDY && E->RI->In.RegY >= (short) Offs); + CHECK (strcmp (E->Arg, "sp") == 0); + + /* We need to correct this one */ + Correction = 2; + + } else { + /* We need to correct this one */ + Correction = 1; + } + + } + + if (Correction) { + /* Get the code entry before this one. If it's a LDY, adjust the + ** value. + */ + CodeEntry* P = CS_GetPrevEntry (D->Code, I); + if (P && P->OPC == OP65_LDY && CE_IsConstImm (P) && !CE_HasLabel (E)) { + /* The Y load is just before the stack access, adjust it */ + CE_SetNumArg (P, P->Num - Offs); + } else { + /* Insert a new load instruction before the stack access */ + const char* Arg = MakeHexArg (E->RI->In.RegY - Offs); + CodeEntry* X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); + InsertEntry (D, X, I++); + } + + /* If we need the value of Y later, be sure to reload it */ + unsigned R = REG_Y | (E->Chg & ~REG_A); + R = GetRegInfo (D->Code, I + 1, R) & R; + if ((R & REG_Y) != 0) { + const char* Arg = MakeHexArg (E->RI->In.RegY); + if ((R & PSTATE_ZN) != 0 && (R & ~(REG_Y | PSTATE_ZN)) == 0) { + CodeEntry* N; + if ((N = CS_GetNextEntry (D->Code, I)) != 0 && + ((N->Info & OF_ZBRA) != 0) && N->JumpTo != 0) { + /* The Y register is used but the load instruction loads A + ** and is followed by a branch that evaluates the zero flag. + ** This means that we cannot just insert the load insn + ** for the Y register at this place, because it would + ** destroy the Z flag. Instead place load insns at the + ** target of the branch and after it. + ** Note: There is a chance that this code won't work. The + ** jump may be a backwards jump (in which case the stack + ** offset has already been adjusted) or there may be other + ** instructions between the load and the conditional jump. + ** Currently the compiler does not generate such code, but + ** it is possible to force the optimizer into something + ** invalid by use of inline assembler. + ** Note: In reality, this route is never taken as all + ** callers of this function will just give up with + ** optimization whenever they detect a branch. + */ + + /* Add load insn after the branch */ + CodeEntry* X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); + InsertEntry (D, X, I+2); + + /* Add load insn before branch target */ + CodeEntry* Y = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); + int J = CS_GetEntryIndex (D->Code, N->JumpTo->Owner); + CHECK (J > I); /* Must not happen */ + InsertEntry (D, Y, J); + + /* Move the label to the new insn */ + CodeLabel* L = CS_GenLabel (D->Code, Y); + CS_MoveLabelRef (D->Code, N, L); + + /* Skip the next two instructions in the next round */ + I += 2; + } else { + /* This could be suboptimal but it will always work (unless stack overflows) */ + CodeEntry* X = NewCodeEntry (OP65_PHP, AM65_IMP, 0, 0, E->LI); + InsertEntry (D, X, I+1); + X = NewCodeEntry (OP65_LDY, AM65_IMM, 0, 0, E->LI); + InsertEntry (D, X, I+2); + X = NewCodeEntry (OP65_PLP, AM65_IMP, 0, 0, E->LI); + InsertEntry (D, X, I+3); + /* Skip the three inserted instructions in the next round */ + I += 3; + } + } else { + CodeEntry* X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); + InsertEntry (D, X, I+1); + /* Skip this instruction in the next round */ + ++I; + } + } + } + + /* Next entry */ + ++I; + } + + /* If we have rhs load insns that load from stack, we'll have to adjust + ** the offsets for these also. + */ + if ((D->Rhs.A.Flags & (LI_RELOAD_Y | LI_SP | LI_CHECK_Y)) == (LI_RELOAD_Y | LI_SP)) { + D->Rhs.A.Offs -= Offs; + } + if ((D->Rhs.X.Flags & (LI_RELOAD_Y | LI_SP | LI_CHECK_Y)) == (LI_RELOAD_Y | LI_SP)) { + D->Rhs.X.Offs -= Offs; + } +} + + + +int IsRegVar (StackOpData* D) +/* If the value pushed is that of a zeropage variable that is unchanged until Op, +** replace ZPLo and ZPHi in the given StackOpData struct by the variable and return true. +** Otherwise leave D untouched and return false. +*/ +{ + CodeEntry* LoadA = D->Lhs.A.LoadEntry; + CodeEntry* LoadX = D->Lhs.X.LoadEntry; + unsigned Len; + + /* Must be unchanged till Op */ + if ((D->Lhs.A.Flags & (LI_DIRECT | LI_RELOAD_Y)) != LI_DIRECT || + (D->Lhs.X.Flags & (LI_DIRECT | LI_RELOAD_Y)) != LI_DIRECT) { + return 0; + } + + /* Must have both load insns */ + if (LoadA == 0 || LoadX == 0) { + return 0; + } + + /* Must be loads from zp */ + if (LoadA->AM != AM65_ZP || LoadX->AM != AM65_ZP) { + return 0; + } + + /* Must be the same zp loc with high byte in X */ + Len = strlen (LoadA->Arg); + if (strncmp (LoadA->Arg, LoadX->Arg, Len) != 0 || + strcmp (LoadX->Arg + Len, "+1") != 0) { + return 0; + } + + /* Use the zero page location directly */ + D->ZPLo = LoadA->Arg; + D->ZPHi = LoadX->Arg; + return 1; +} + + + +void AddStoreLhsA (StackOpData* D) +/* Add a store to zero page after the push insn */ +{ + CodeEntry* X = NewCodeEntry (OP65_STA, AM65_ZP, D->ZPLo, 0, D->PushEntry->LI); + InsertEntry (D, X, D->PushIndex+1); +} + + + +void AddStoreLhsX (StackOpData* D) +/* Add a store to zero page after the push insn */ +{ + CodeEntry* X = NewCodeEntry (OP65_STX, AM65_ZP, D->ZPHi, 0, D->PushEntry->LI); + InsertEntry (D, X, D->PushIndex+1); +} + + + +void ReplacePushByStore (StackOpData* D) +/* Replace the call to the push subroutine by a store into the zero page +** location (actually, the push is not replaced, because we need it for +** later, but the name is still ok since the push will get removed at the +** end of each routine). +*/ +{ + /* Store the value into the zeropage instead of pushing it. Check high + ** byte first so that the store is later in A/X order. + */ + if ((D->Lhs.X.Flags & LI_DIRECT) == 0) { + AddStoreLhsX (D); + } + if ((D->Lhs.A.Flags & LI_DIRECT) == 0) { + AddStoreLhsA (D); + } +} + + + +void AddOpLow (StackOpData* D, opc_t OPC, LoadInfo* LI) +/* Add an op for the low byte of an operator. This function honours the +** OP_DIRECT and OP_RELOAD_Y flags and generates the necessary instructions. +** All code is inserted at the current insertion point. +*/ +{ + CodeEntry* X; + + if ((LI->A.Flags & LI_DIRECT) != 0) { + /* Op with a variable location. If the location is on the stack, we + ** need to reload the Y register. + */ + if ((LI->A.Flags & LI_RELOAD_Y) == 0) { + + /* opc ... */ + CodeEntry* LoadA = LI->A.LoadEntry; + X = NewCodeEntry (OPC, LoadA->AM, LoadA->Arg, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + + } else { + + if ((LI->A.Flags & LI_CHECK_Y) == 0) { + /* ldy #offs */ + X = NewCodeEntry (OP65_LDY, AM65_IMM, MakeHexArg (LI->A.Offs), 0, D->OpEntry->LI); + } else { + /* ldy src */ + X = NewCodeEntry (OP65_LDY, LI->A.LoadYEntry->AM, LI->A.LoadYEntry->Arg, 0, D->OpEntry->LI); + } + InsertEntry (D, X, D->IP++); + + if (LI->A.LoadEntry->OPC == OP65_JSR) { + /* opc (sp),y */ + X = NewCodeEntry (OPC, AM65_ZP_INDY, "sp", 0, D->OpEntry->LI); + } else { + /* opc src,y */ + X = NewCodeEntry (OPC, LI->A.LoadEntry->AM, LI->A.LoadEntry->Arg, 0, D->OpEntry->LI); + } + InsertEntry (D, X, D->IP++); + + } + + /* In both cases, we can remove the load */ + LI->A.Flags |= LI_REMOVE; + + } else { + + /* Op with temp storage */ + X = NewCodeEntry (OPC, AM65_ZP, D->ZPLo, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + + } +} + + + +void AddOpHigh (StackOpData* D, opc_t OPC, LoadInfo* LI, int KeepResult) +/* Add an op for the high byte of an operator. Special cases (constant values +** or similar) have to be checked separately, the function covers only the +** generic case. Code is inserted at the insertion point. +*/ +{ + CodeEntry* X; + + if (KeepResult) { + /* pha */ + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + } + + /* txa */ + X = NewCodeEntry (OP65_TXA, AM65_IMP, 0, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + + if ((LI->X.Flags & LI_DIRECT) != 0) { + + if ((LI->X.Flags & LI_RELOAD_Y) == 0) { + + /* opc xxx */ + CodeEntry* LoadX = LI->X.LoadEntry; + X = NewCodeEntry (OPC, LoadX->AM, LoadX->Arg, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + + } else { + + if ((LI->X.Flags & LI_CHECK_Y) == 0) { + /* ldy #const */ + X = NewCodeEntry (OP65_LDY, AM65_IMM, MakeHexArg (LI->X.Offs), 0, D->OpEntry->LI); + } else { + /* ldy src */ + X = NewCodeEntry (OP65_LDY, LI->X.LoadYEntry->AM, LI->X.LoadYEntry->Arg, 0, D->OpEntry->LI); + } + InsertEntry (D, X, D->IP++); + + if (LI->X.LoadEntry->OPC == OP65_JSR) { + /* opc (sp),y */ + X = NewCodeEntry (OPC, AM65_ZP_INDY, "sp", 0, D->OpEntry->LI); + } else { + /* opc src,y */ + X = NewCodeEntry (OPC, LI->X.LoadEntry->AM, LI->X.LoadEntry->Arg, 0, D->OpEntry->LI); + } + InsertEntry (D, X, D->IP++); + } + + /* In both cases, we can remove the load */ + LI->X.Flags |= LI_REMOVE; + + } else { + /* opc zphi */ + X = NewCodeEntry (OPC, AM65_ZP, D->ZPHi, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + } + + if (KeepResult) { + /* tax */ + X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + + /* pla */ + X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + } +} + + + +void RemoveRegLoads (StackOpData* D, LoadInfo* LI) +/* Remove register load insns */ +{ + if ((LI->A.Flags & LI_REMOVE) == LI_REMOVE) { + if (LI->A.LoadIndex >= 0 && + (LI->A.LoadEntry->Flags & CEF_DONT_REMOVE) == 0) { + DelEntry (D, LI->A.LoadIndex); + LI->A.LoadEntry = 0; + } + if (LI->A.LoadYIndex >= 0 && + (LI->A.LoadYEntry->Flags & CEF_DONT_REMOVE) == 0) { + DelEntry (D, LI->A.LoadYIndex); + } + if (LI->A.ChgIndex >= 0 && + (LI->A.ChgEntry->Flags & CEF_DONT_REMOVE) == 0) { + DelEntry (D, LI->A.ChgIndex); + } + } + + if (LI->A.LoadEntry != 0 && + (LI->A.Flags & LI_RELOAD_Y) != 0 && + LI->A.LoadYIndex >= 0) { + /* If an entry is using Y and not removed, then its Y load mustn't be removed */ + LI->A.LoadYEntry->Flags |= CEF_DONT_REMOVE; + } + + if ((LI->X.Flags & LI_REMOVE) == LI_REMOVE) { + if (LI->X.LoadIndex >= 0 && + (LI->X.LoadEntry->Flags & CEF_DONT_REMOVE) == 0) { + DelEntry (D, LI->X.LoadIndex); + LI->X.LoadEntry = 0; + } + if (LI->X.LoadYIndex >= 0 && + (LI->X.LoadYEntry->Flags & CEF_DONT_REMOVE) == 0) { + DelEntry (D, LI->X.LoadYIndex); + } + if (LI->X.ChgIndex >= 0 && + (LI->X.ChgEntry->Flags & CEF_DONT_REMOVE) == 0) { + DelEntry (D, LI->X.ChgIndex); + } + } + + if (LI->X.LoadEntry != 0 && + (LI->X.Flags & LI_RELOAD_Y) != 0 && + LI->X.LoadYIndex >= 0) { + /* If an entry is using Y and not removed, then its Y load mustn't be removed */ + LI->X.LoadYEntry->Flags |= CEF_DONT_REMOVE; + } +} + + + +void RemoveRemainders (StackOpData* D) +/* Remove the code that is unnecessary after translation of the sequence */ +{ + /* Remove the register loads for lhs and rhs if nothing prevents that */ + RemoveRegLoads (D, &D->Lhs); + RemoveRegLoads (D, &D->Rhs); + + /* Remove the push and the operator routine */ + DelEntry (D, D->OpIndex); + DelEntry (D, D->PushIndex); +} + + + +static int CmpHarmless (const void* Key, const void* Entry) +/* Compare function for bsearch */ +{ + return strcmp (Key, *(const char**)Entry); +} + + + +int HarmlessCall (const CodeEntry* E, int PushedBytes) +/* Check if this is a call to a harmless subroutine that will not interrupt +** the pushax/op sequence when encountered. +*/ +{ + unsigned Use = 0, Chg = 0; + if (GetFuncInfo (E->Arg, &Use, &Chg) == FNCLS_BUILTIN) { + if ((Chg & REG_SP) != 0) { + return 0; + } + if ((Use & REG_SP) != 0 && + ((Use & (SLV_IND | SLV_TOP)) != SLV_IND || + RegValIsUnknown (E->RI->In.RegY) || + E->RI->In.RegY < PushedBytes)) { + /* If we are using the stack, and we don't have "indirect" + ** addressing mode, or the value of Y is unknown, or less + ** than two, we cannot cope with this piece of code. Having + ** an unknown value of Y means that we cannot correct the + ** stack offset, while having an offset less than PushedBytes + ** means that the code works with the value on stack which + ** is to be removed. + */ + return 0; + } + return 1; + } else { + static const char* const Tab[] = { + "_abs", + }; + + void* R = bsearch (E->Arg, + Tab, + sizeof (Tab) / sizeof (Tab[0]), + sizeof (Tab[0]), + CmpHarmless); + return (R != 0); + } +} + + + +/*****************************************************************************/ +/* Load tracking code */ +/*****************************************************************************/ + + + +/*****************************************************************************/ +/* Helpers */ +/*****************************************************************************/ + + + +const char* GetZPName (unsigned ZPLoc) +/* Get the name strings of certain known ZP Regs */ +{ + if ((ZPLoc & REG_TMP1) != 0) { + return "tmp1"; + } + if ((ZPLoc & REG_PTR1_LO) != 0) { + return "ptr1"; + } + if ((ZPLoc & REG_PTR1_HI) != 0) { + return "ptr1+1"; + } + if ((ZPLoc & REG_PTR2_LO) != 0) { + return "ptr2"; + } + if ((ZPLoc & REG_PTR2_HI) != 0) { + return "ptr2+1"; + } + if ((ZPLoc & REG_SREG_LO) != 0) { + return "sreg"; + } + if ((ZPLoc & REG_SREG_HI) != 0) { + return "sreg+1"; + } + if ((ZPLoc & REG_SAVE_LO) != 0) { + return "save"; + } + if ((ZPLoc & REG_SAVE_HI) != 0) { + return "save+1"; + } + if ((ZPLoc & REG_SP_LO) != 0) { + return "sp"; + } + if ((ZPLoc & REG_SP_HI) != 0) { + return "sp+1"; + } + + return 0; +} + +unsigned FindAvailableBackupLoc (BackupInfo* B, unsigned Type) +/* Find a ZP loc for storing the backup and fill in the info. +** The allowed types are specified with the Type parameter. +** For convenience, all types are aloowed if none is specified. +** Return the type of the found loc. +*/ +{ + unsigned SizeType = Type & BU_SIZE_MASK; + Type &= BU_TYPE_MASK; + if (Type == 0) { + Type = BU_TYPE_MASK; + } + + if (SizeType == BU_B8 && (Type & BU_REG) != 0 && (B->ZPUsage & REG_Y) == 0) { + /* Use the Y Reg only */ + B->Type = BU_REG | SizeType; + B->Where = REG_Y; + B->ZPUsage |= REG_Y; + return B->Type; + } + + if (SizeType == BU_B8 && (Type & BU_ZP) != 0) { + /* For now we only check for tmp1 and sreg */ + if ((B->ZPUsage & REG_TMP1) == 0) { + B->Type = BU_ZP | BU_B8; + B->Where = REG_TMP1; + B->ZPUsage |= REG_TMP1; + return B->Type; + } + if ((B->ZPUsage & REG_SREG_LO) == 0) { + B->Type = BU_ZP | BU_B8; + B->Where = REG_SREG_LO; + B->ZPUsage |= REG_SREG_LO; + return B->Type; + } + if ((B->ZPUsage & REG_SREG_HI) == 0) { + B->Type = BU_ZP | BU_B8; + B->Where = REG_SREG_HI; + B->ZPUsage |= REG_SREG_HI; + return B->Type; + } + } + + if (SizeType == BU_B16 && (Type & BU_ZP) != 0) { + /* For now we only check for ptr1, sreg and ptr2 */ + if ((B->ZPUsage & REG_PTR1) == 0) { + B->Type = BU_ZP | BU_B16; + B->Where = REG_PTR1; + B->ZPUsage |= REG_PTR1; + return B->Type; + } + if ((B->ZPUsage & REG_SREG) == 0) { + B->Type = BU_ZP | BU_B16; + B->Where = REG_SREG; + B->ZPUsage |= REG_SREG; + return B->Type; + } + if ((B->ZPUsage & REG_PTR2) == 0) { + B->Type = BU_ZP | BU_B16; + B->Where = REG_PTR2; + B->ZPUsage |= REG_PTR2; + return B->Type; + } + } + + if (SizeType == BU_B24 && (Type & BU_ZP) != 0) { + /* For now we only check for certain combinations of + ** tmp1 + (ptr1, sreg or ptr2). + */ + if ((B->ZPUsage & (REG_TMP1 | REG_PTR1)) == 0) { + B->Type = BU_ZP | BU_B24; + B->Where = REG_TMP1 | REG_PTR1; + B->ZPUsage |= REG_TMP1 | REG_PTR1; + return B->Type; + } + if ((B->ZPUsage & (REG_TMP1 | REG_SREG)) == 0) { + B->Type = BU_ZP | BU_B24; + B->Where = REG_TMP1 | REG_SREG; + B->ZPUsage |= REG_TMP1 | REG_SREG; + return B->Type; + } + if ((B->ZPUsage & (REG_TMP1 | REG_PTR2)) == 0) { + B->Type = BU_ZP | BU_B24; + B->Where = REG_TMP1 | REG_PTR2; + B->ZPUsage |= REG_TMP1 | REG_PTR2; + return B->Type; + } + } + + if (SizeType < BU_B32 && (Type & BU_SP6502) != 0) { + /* Even for BU_B24, we just push/pop all 3 of AXY */ + B->Type = BU_SP6502 | BU_B16; + B->Where = 0; + return B->Type; + } + + if (SizeType != BU_B24 && SizeType <= BU_B32 && (Type & BU_SP) != 0) { + /* We may also use pusha/popa, pushax/popax and pusheax/popeax */ + B->Type = BU_SP | SizeType; + B->Where = 0; + return B->Type; + } + + /* No available */ + return BU_UNKNOWN; +} + + + +void AdjustEntryIndices (Collection* Indices, int Index, int Change) +/* Adjust a load register info struct after deleting or inserting successive +** entries with a given index. +*/ +{ + int I; + int* IndexPtr; + + if (Change > 0) { + /* Insertion */ + for (I = 0; I < (int)CollCount (Indices); ++I) { + IndexPtr = CollAtUnchecked (Indices, I); + if (Index <= *IndexPtr) { + *IndexPtr += Change; + } + } + } else if (Change < 0) { + /* Deletion */ + for (I = 0; I < (int)CollCount (Indices); ++I) { + IndexPtr = CollAtUnchecked (Indices, I); + if (Index <= *IndexPtr + Change) { + *IndexPtr += Change; + } else if (Index <= *IndexPtr) { + /* Has been removed */ + *IndexPtr = -1; + /*CollDelete (Indices, I);*/ + --I; + } + } + } +} + + + +void DelEntryIdx (CodeSeg* S, int Idx, Collection* Indices) +/* Delete an entry and adjust Indices if necessary */ +{ + CS_DelEntry (S, Idx); + AdjustEntryIndices (Indices, Idx, -1); +} + + + +void DelEntriesIdx (CodeSeg* S, int Idx, int Count, Collection* Indices) +/* Delete entries and adjust Indices if necessary */ +{ + CS_DelEntries (S, Idx, Count); + AdjustEntryIndices (Indices, Idx, -Count); +} + + + +void RemoveFlaggedRegLoads (CodeSeg* S, LoadRegInfo* LRI, Collection* Indices) +/* Remove flagged register load insns */ +{ + if ((LRI->Flags & LI_REMOVE) == LI_REMOVE) { + if (LRI->LoadIndex >= 0 && + (LRI->LoadEntry->Flags & CEF_DONT_REMOVE) == 0) { + DelEntryIdx (S, LRI->LoadIndex, Indices); + LRI->LoadEntry = 0; + } + if (LRI->LoadYIndex >= 0 && + (LRI->LoadYEntry->Flags & CEF_DONT_REMOVE) == 0) { + DelEntryIdx (S, LRI->LoadYIndex, Indices); + } + if (LRI->ChgIndex >= 0 && + (LRI->ChgEntry->Flags & CEF_DONT_REMOVE) == 0) { + DelEntryIdx (S, LRI->ChgIndex, Indices); + } + } + + if (LRI->LoadEntry != 0 && + (LRI->Flags & LI_RELOAD_Y) != 0 && + LRI->LoadYIndex >= 0) { + /* If an entry is using Y and not removed, then its Y load mustn't be removed */ + LRI->LoadYEntry->Flags |= CEF_DONT_REMOVE; + } +} + + +void RemoveFlaggedLoads (CodeSeg* S, LoadInfo* LI, Collection* Indices) +/* Remove flagged load insns */ +{ + RemoveFlaggedRegLoads (S, &LI->A, Indices); + RemoveFlaggedRegLoads (S, &LI->X, Indices); + RemoveFlaggedRegLoads (S, &LI->Y, Indices); +} + + + +static int BackupAAt (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices, int After) +/* Backup the content of A Before or After the specified index Idx depending on the After param */ +{ + CodeEntry* E; + CodeEntry* X; + int OldIdx; + + /* Adjust the insertion point if necessary */ + if (After) { + ++Idx; + } + OldIdx = Idx; + + /* Cannot insert after the last insn */ + CHECK ((unsigned)Idx < CollCount (&S->Entries)); + + /* Get the entry at Idx */ + E = CS_GetEntry (S, Idx); + + if (E->RI != 0 && RegValIsKnown (E->RI->In.RegA)) { + /* Just memorize the value */ + B->Type = BU_IMM | BU_B8; + B->Imm = E->RI->In.RegA; + + } else { + FindAvailableBackupLoc (B, BU_B8); + switch (B->Type & BU_TYPE_MASK) { + case BU_REG: + if ((B->Where & REG_X) != 0) { + X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } else if ((B->Where & REG_Y) != 0) { + X = NewCodeEntry (OP65_TAY, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + break; + + case BU_ZP: + X = NewCodeEntry (OP65_STA, AM65_ZP, GetZPName (B->Where), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_SP6502: + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_SP: + if ((B->ZPUsage & REG_Y) == 0) { + X = NewCodeEntry (OP65_JSR, AM65_ABS, "pusha", 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to do backup */ + return 0; + + default: + /* Unable to do backup */ + return 0; + } + } + + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx, Idx - OldIdx); + + /* Move labels if it was an insertion before Idx */ + if (!After) { + CS_MoveLabels (S, E, CS_GetEntry (S, OldIdx)); + } + + /* Done */ + return 1; +} + + + +static int BackupXAt (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices, int After) +/* Backup the content of X before or after the specified index Idx depending on the param After */ +{ + CodeEntry* E; + CodeEntry* X; + int OldIdx; + + /* Adjust the insertion point if necessary */ + if (After) { + ++Idx; + } + OldIdx = Idx; + + /* Cannot insert after the last insn */ + CHECK ((unsigned)Idx < CollCount (&S->Entries)); + + /* Get the entry at Idx */ + E = CS_GetEntry (S, Idx); + + if (E->RI != 0 && RegValIsKnown (E->RI->In.RegX)) { + /* Just memorize the value */ + B->Type = BU_IMM | BU_B8; + B->Imm = E->RI->In.RegX; + + } else { + FindAvailableBackupLoc (B, BU_B8); + switch (B->Type & BU_TYPE_MASK) { + case BU_ZP: + X = NewCodeEntry (OP65_STX, AM65_ZP, GetZPName(B->Where), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_SP6502: + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_TXA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to do backup */ + return 0; + + case BU_SP: + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_TXA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_JSR, AM65_ABS, "pusha", 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to do backup */ + return 0; + + case BU_REG: + /* Fallthrough */ + default: + + /* Unable to do backup */ + return 0; + } + } + + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx, Idx - OldIdx); + + /* Move labels if it was an insertion before Idx */ + if (!After) { + CS_MoveLabels (S, E, CS_GetEntry (S, OldIdx)); + } + + /* Done */ + return 1; +} + + + +static int BackupYAt (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices, int After) +/* Backup the content of Y before or after the specified index Idx depending on the param After */ +{ + CodeEntry* E; + CodeEntry* X; + int OldIdx; + + /* Adjust the insertion point if necessary */ + if (After) { + ++Idx; + } + OldIdx = Idx; + + /* Cannot insert after the last insn */ + CHECK ((unsigned)Idx < CollCount (&S->Entries)); + + /* Get the entry at Idx */ + E = CS_GetEntry (S, Idx); + + if (E->RI != 0 && RegValIsKnown (E->RI->In.RegY)) { + /* Just memorize the value */ + B->Type = BU_IMM | BU_B8; + B->Imm = E->RI->In.RegY; + + } else { + FindAvailableBackupLoc (B, BU_B8); + switch (B->Type & BU_TYPE_MASK) { + case BU_ZP: + X = NewCodeEntry (OP65_STY, AM65_ZP, GetZPName(B->Where), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_SP6502: + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_TYA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to do backup */ + return 0; + + case BU_SP: + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_TYA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_JSR, AM65_ABS, "pusha", 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to do backup */ + return 0; + + case BU_REG: + /* Fallthrough */ + default: + + /* Unable to do backup */ + return 0; + } + } + + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx, Idx - OldIdx); + + /* Move labels if it was an insertion before Idx */ + if (!After) { + CS_MoveLabels (S, E, CS_GetEntry (S, OldIdx)); + } + + /* Done */ + return 1; +} + + + +static int BackupAXAt (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices, int After) +/* Backup the content of AX Before or After the specified index Idx depending on the After param */ +{ + CodeEntry* E; + CodeEntry* X; + int OldIdx; + StrBuf Arg; + + SB_Init (&Arg); + + /* Adjust the insertion point if necessary */ + if (After) { + ++Idx; + } + OldIdx = Idx; + + /* Cannot insert after the last insn */ + CHECK ((unsigned)Idx < CollCount (&S->Entries)); + + /* Get the entry at Idx */ + E = CS_GetEntry (S, Idx); + + if (E->RI != 0 && RegValIsKnown (E->RI->In.RegA) && RegValIsKnown (E->RI->In.RegX)) { + /* Just memorize the value */ + B->Type = BU_IMM | BU_B16; + B->Imm = E->RI->In.RegA | (E->RI->In.RegX << 8); + + } else { + FindAvailableBackupLoc (B, BU_B16); + switch (B->Type & BU_TYPE_MASK) { + case BU_ZP: + SB_AppendStr (&Arg, GetZPName (B->Where)); + SB_Terminate (&Arg); + X = NewCodeEntry (OP65_STA, AM65_ZP, SB_GetConstBuf (&Arg), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + SB_AppendStr (&Arg, "+1"); + SB_Terminate (&Arg); + X = NewCodeEntry (OP65_STX, AM65_ZP, SB_GetConstBuf (&Arg), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_SP6502: + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TXA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to do backup */ + return 0; + + case BU_SP: + if ((B->ZPUsage & REG_Y) == 0) { + X = NewCodeEntry (OP65_JSR, AM65_ABS, "pushax", 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to do backup */ + return 0; + + case BU_REG: + /* Fallthrough */ + + default: + /* Unable to do backup */ + return 0; + } + } + + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx, Idx - OldIdx); + + /* Move labels if it was an insertion before Idx */ + if (!After) { + CS_MoveLabels (S, E, CS_GetEntry (S, OldIdx)); + } + + SB_Done (&Arg); + + /* Done */ + return 1; +} + + + +static int BackupAXYAt (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices, int After) +/* Backup the content of AXY before or after the specified index Idx depending on the param After. +** This doesn't allow separating the backup of Y from that of AX for now. +*/ +{ + CodeEntry* E; + CodeEntry* X; + int OldIdx; + StrBuf Arg; + + SB_Init (&Arg); + + /* Adjust the insertion point if necessary */ + if (After) { + ++Idx; + } + OldIdx = Idx; + + /* Cannot insert after the last insn */ + CHECK ((unsigned)Idx < CollCount (&S->Entries)); + + /* Get the entry at Idx */ + E = CS_GetEntry (S, Idx); + + if (E->RI != 0 && + RegValIsKnown (E->RI->In.RegA) && + RegValIsKnown (E->RI->In.RegX) && + RegValIsKnown (E->RI->In.RegY)) { + /* Just memorize the value */ + B->Type = BU_IMM | BU_B24; + B->Imm = E->RI->In.RegA | (E->RI->In.RegX << 8) | (E->RI->In.RegY << 16); + + } else { + FindAvailableBackupLoc (B, BU_B24); + switch (B->Type & BU_TYPE_MASK) { + case BU_ZP: + CHECK ((B->Where & REG_TMP1) != 0); + SB_AppendStr (&Arg, GetZPName (B->Where & ~REG_TMP1)); + SB_Terminate (&Arg); + X = NewCodeEntry (OP65_STA, AM65_ZP, SB_GetConstBuf (&Arg), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + SB_AppendStr (&Arg, "+1"); + SB_Terminate (&Arg); + X = NewCodeEntry (OP65_STX, AM65_ZP, SB_GetConstBuf (&Arg), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_STY, AM65_ZP, GetZPName (B->Where & REG_TMP1), 0, E->LI); + CS_InsertEntry(S, X, Idx++); + break; + + case BU_SP6502: + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TXA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TYA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to do backup */ + return 0; + + case BU_SP: + if ((B->ZPUsage & REG_AY) == 0) { + X = NewCodeEntry (OP65_JSR, AM65_ABS, "pushax", 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TYA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_JSR, AM65_ABS, "pusha", 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to do backup */ + return 0; + + case BU_REG: + /* Fallthrough */ + + default: + /* Unable to do backup */ + return 0; + } + } + + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx, Idx - OldIdx); + + /* Move labels if it was an insertion before Idx */ + if (!After) { + CS_MoveLabels (S, E, CS_GetEntry (S, OldIdx)); + } + + SB_Done (&Arg); + + /* Done */ + return 1; +} + + + +int BackupABefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Backup the content of A Before the specified index Idx */ +{ + return BackupAAt (S, B, Idx, Indices, 0); +} + + + +int BackupXBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Backup the content of X before the specified index Idx */ +{ + return BackupXAt (S, B, Idx, Indices, 0); +} + + + +int BackupYBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Backup the content of Y before the specified index Idx */ +{ + return BackupYAt (S, B, Idx, Indices, 0); +} + + + +int BackupAXBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Backup the content of AX before the specified index Idx */ +{ + return BackupAXAt (S, B, Idx, Indices, 0); +} + + + +int BackupAXYBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Backup the content of AXY before the specified index Idx. +** This doesn't allow separating the backup of Y from that of AX for now. +*/ +{ + return BackupAXYAt (S, B, Idx, Indices, 0); +} + + + +int BackupAAfter (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Backup the content of A after the specified index Idx */ +{ + return BackupAAt (S, B, Idx, Indices, 1); +} + + + +int BackupXAfter (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Backup the content of X after the specified index Idx */ +{ + return BackupXAt (S, B, Idx, Indices, 1); +} + + + +int BackupYAfter (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Backup the content of Y after the specified index Idx */ +{ + return BackupYAt (S, B, Idx, Indices, 1); +} + + + +int BackupAXAfter (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Backup the content of AX after the specified index Idx */ +{ + return BackupAXAt (S, B, Idx, Indices, 1); +} + + + +int BackupAXYAfter (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Backup the content of AXY after the specified index Idx. +** This doesn't allow separating the backup of Y from that of AX for now. +*/ +{ + return BackupAXYAt (S, B, Idx, Indices, 1); +} + + + +int RestoreABefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Restore the content of Y before the specified index Idx */ +{ + CodeEntry* E; + CodeEntry* X; + int OldIdx = Idx; + + /* Get the entry at Idx */ + E = CS_GetEntry (S, Idx); + + switch (B->Type & BU_TYPE_MASK) { + case BU_IMM: + /* Just use the memorized value */ + X = NewCodeEntry (OP65_LDA, AM65_IMM, MakeHexArg (B->Imm & 0xFF), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_REG: + if ((B->Where & REG_X) != 0) { + X = NewCodeEntry (OP65_TXA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } else if ((B->Where & REG_Y) != 0) { + X = NewCodeEntry (OP65_TYA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } + break; + + case BU_ZP: + X = NewCodeEntry (OP65_LDA, AM65_ZP, GetZPName (B->Where), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_SP6502: + X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_SP: + if ((B->ZPUsage & REG_Y) == 0) { + X = NewCodeEntry (OP65_JSR, AM65_ABS, "popa", 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to restore */ + return 0; + + default: + /* Unable to restore */ + return 0; + } + + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx, Idx - OldIdx); + + /* Done */ + return 1; +} + + + +int RestoreXBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Restore the content of X before the specified index Idx */ +{ + CodeEntry* E; + CodeEntry* X; + int OldIdx = Idx; + + /* Get the entry at Idx */ + E = CS_GetEntry (S, Idx); + + switch (B->Type & BU_TYPE_MASK) { + case BU_IMM: + /* Just use the memorized value */ + X = NewCodeEntry (OP65_LDX, AM65_IMM, MakeHexArg (B->Imm & 0xFF), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_REG: + if ((B->Where & REG_A) != 0) { + X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } else if ((B->Where & REG_Y) != 0) { + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } + X = NewCodeEntry (OP65_TYA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } + } + break; + + case BU_ZP: + X = NewCodeEntry (OP65_LDX, AM65_ZP, GetZPName (B->Where), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_SP6502: + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to restore */ + return 0; + + case BU_SP: + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_JSR, AM65_ABS, "popa", 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to restore */ + return 0; + + default: + /* Unable to restore */ + return 0; + } + + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx, Idx - OldIdx); + + /* Done */ + return 1; +} + + + +int RestoreYBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Restore the content of Y before the specified index Idx */ +{ + CodeEntry* E; + CodeEntry* X; + int OldIdx = Idx; + + /* Get the entry at Idx */ + E = CS_GetEntry (S, Idx); + + switch (B->Type & BU_TYPE_MASK) { + case BU_IMM: + /* Just use the memorized value */ + X = NewCodeEntry (OP65_LDY, AM65_IMM, MakeHexArg (B->Imm & 0xFF), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_REG: + if ((B->Where & REG_A) != 0) { + X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } else if ((B->Where & REG_X) != 0) { + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } + X = NewCodeEntry (OP65_TXA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAY, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } + } + break; + + case BU_ZP: + X = NewCodeEntry (OP65_LDY, AM65_ZP, GetZPName (B->Where), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_SP6502: + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAY, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to restore */ + return 0; + + case BU_SP: + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_JSR, AM65_ABS, "popa", 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAY, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to restore */ + return 0; + + default: + /* Unable to restore */ + return 0; + } + + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx, Idx - OldIdx); + + /* Done */ + return 1; +} + + + +int RestoreAXBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Restore the content of AX before the specified index Idx */ +{ + CodeEntry* E; + CodeEntry* X; + StrBuf Arg; + int OldIdx = Idx; + + SB_Init (&Arg); + + /* Get the entry at Idx */ + E = CS_GetEntry (S, Idx); + + switch (B->Type & BU_TYPE_MASK) { + case BU_REG: + /* Just use the memorized value */ + X = NewCodeEntry (OP65_LDA, AM65_IMM, MakeHexArg (B->Imm & 0xFF), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_LDX, AM65_IMM, MakeHexArg ((B->Imm >> 8) & 0xFF), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_ZP: + SB_AppendStr (&Arg, GetZPName (B->Where)); + SB_Terminate (&Arg); + X = NewCodeEntry (OP65_LDA, AM65_ZP, SB_GetConstBuf (&Arg), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + SB_AppendStr (&Arg, "+1"); + SB_Terminate (&Arg); + X = NewCodeEntry (OP65_LDX, AM65_ZP, SB_GetConstBuf (&Arg), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_SP6502: + if ((B->ZPUsage & REG_A) == 0) { + X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to restore */ + return 0; + + case BU_SP: + if ((B->ZPUsage & REG_Y) == 0) { + X = NewCodeEntry (OP65_JSR, AM65_ABS, "popax", 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + } + + /* Unable to restore */ + return 0; + + default: + /* Unable to restore */ + return 0; + } + + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx, Idx - OldIdx); + + SB_Done (&Arg); + + return 1; +} + + + +int RestoreAXYBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices) +/* Restore the content of AXY before the specified index Idx. +** This only allows restore from compacted AXY backup for now. +*/ +{ + CodeEntry* E; + CodeEntry* X; + int OldIdx = Idx; + StrBuf Arg; + + SB_Init (&Arg); + + /* Get the entry at Idx */ + E = CS_GetEntry (S, Idx); + + switch (B->Type & BU_TYPE_MASK) { + case BU_IMM: + /* Just use memorized value */ + X = NewCodeEntry (OP65_LDA, AM65_IMM, MakeHexArg (B->Imm & 0xFF), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_LDX, AM65_IMM, MakeHexArg ((B->Imm >> 8) & 0xFF), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_LDY, AM65_IMM, MakeHexArg ((B->Imm >> 16) & 0xFF), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_ZP: + CHECK ((B->Where & REG_TMP1) != 0); + SB_AppendStr (&Arg, GetZPName (B->Where & ~REG_TMP1)); + SB_Terminate (&Arg); + X = NewCodeEntry (OP65_LDA, AM65_ZP, SB_GetConstBuf (&Arg), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + SB_AppendStr (&Arg, "+1"); + SB_Terminate (&Arg); + X = NewCodeEntry (OP65_LDX, AM65_ZP, SB_GetConstBuf (&Arg), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_LDY, AM65_ZP, GetZPName (B->Where & REG_TMP1), 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_SP6502: + X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAY, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + case BU_SP: + X = NewCodeEntry (OP65_JSR, AM65_ABS, "popa", 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAY, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_JSR, AM65_ABS, "popax", 0, E->LI); + CS_InsertEntry (S, X, Idx++); + break; + + default: + /* Unable to restorep */ + return 0; + } + + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx, Idx - OldIdx); + + SB_Done (&Arg); + + /* Done */ + return 1; +} + + + +int BackupArgAfter (CodeSeg* S, BackupInfo* B, int Idx, const CodeEntry* E, Collection* Indices) +/* Backup the content of the opc arg of the entry E after the specified index Idx. +** Reg A/Y will be used to transfer the content from a memory location to another +** regardless of whether it is in use. +*/ +{ + CodeEntry* X; + int OldIdx = Idx; + unsigned ArgSize; + unsigned Use, Chg; + StrBuf SrcArg; + StrBuf DstArg; + + SB_Init (&SrcArg); + SB_Init (&DstArg); + + /* We only recognize opc with an arg for now, as well as a special case for ldaxysp */ + if ((E->OPC != OP65_JSR || strcmp (E->Arg, "ldaxysp") == 0) && + E->AM != AM65_BRA) { + /* Get size of the arg */ + if ((E->Info & OF_LBRA) != 0 || strcmp (E->Arg, "ldaxysp") == 0) { + ArgSize = BU_B16; + } else { + ArgSize = BU_B8; + } + + if (E->AM == AM65_IMM && CE_HasNumArg (E)) { + /* Just memorize the value */ + B->Type = BU_IMM | ArgSize; + B->Imm = E->Num; + + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx + 1, Idx - OldIdx); + + /* Done */ + return 1; + + } + + if (E->Size != 1 && E->AM != AM65_IMP) { + + /* We only recognize opc with an arg for now */ + FindAvailableBackupLoc (B, ArgSize); + switch (B->Type & BU_TYPE_MASK) { + case BU_ZP: + X = NewCodeEntry (OP65_LDA, E->AM, E->Arg, 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + SB_AppendStr (&DstArg, GetZPName (B->Where)); + SB_Terminate (&DstArg); + X = NewCodeEntry (OP65_STA, AM65_ZP, SB_GetConstBuf (&DstArg), 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + if (ArgSize == BU_B16) { + SB_AppendStr (&SrcArg, E->Arg); + SB_AppendStr (&SrcArg, "+1"); + SB_Terminate (&SrcArg); + X = NewCodeEntry (OP65_LDA, E->AM, SB_GetConstBuf (&SrcArg), 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + SB_AppendStr (&DstArg, "+1"); + SB_Terminate (&DstArg); + X = NewCodeEntry (OP65_STA, AM65_ZP, SB_GetConstBuf (&DstArg), 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + } + break; + + case BU_REG: + CHECK (ArgSize == BU_B8 && B->Where == REG_Y); + if (E->AM == AM65_ZP || E->AM == AM65_ABS) { + X = NewCodeEntry (OP65_LDY, E->AM, E->Arg, 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + } else { + X = NewCodeEntry (OP65_LDA, E->AM, E->Arg, 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + X = NewCodeEntry (OP65_TAY, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + } + break; + + case BU_SP6502: + X = NewCodeEntry (OP65_LDA, E->AM, E->Arg, 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + if (ArgSize == BU_B16) { + SB_AppendStr (&SrcArg, E->Arg); + SB_AppendStr (&SrcArg, "+1"); + SB_Terminate (&SrcArg); + X = NewCodeEntry (OP65_LDA, E->AM, SB_GetConstBuf (&SrcArg), 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + } + break; + + case BU_SP: + X = NewCodeEntry (OP65_LDA, E->AM, E->Arg, 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + if (ArgSize != BU_B16) { + X = NewCodeEntry (OP65_JSR, AM65_ABS, "pusha", 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + } else { + SB_AppendStr (&SrcArg, E->Arg); + SB_AppendStr (&SrcArg, "+1"); + SB_Terminate (&SrcArg); + if ((B->ZPUsage & REG_X) == 0) { + if (E->AM == AM65_ZP) { + X = NewCodeEntry (OP65_LDX, E->AM, SB_GetConstBuf (&SrcArg), 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + X = NewCodeEntry (OP65_JSR, AM65_ABS, "pushax", 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + } else { + X = NewCodeEntry (OP65_LDA, E->AM, SB_GetConstBuf (&SrcArg), 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + X = NewCodeEntry (OP65_JSR, AM65_ABS, "pushax", 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + } + } else { + X = NewCodeEntry (OP65_JSR, AM65_ABS, "pusha", 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + X = NewCodeEntry (OP65_LDA, AM65_ZP, SB_GetConstBuf (&DstArg), 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + X = NewCodeEntry (OP65_JSR, AM65_ABS, "pusha", 0, E->LI); + CS_InsertEntry (S, X, ++Idx); + } + } + break; + } + + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx + 1, Idx - OldIdx); + + /* Done */ + return 1; + } + } else if (E->OPC == OP65_JSR) { + /* For function calls we load their arguments instead */ + GetFuncInfo (E->Arg, &Use, &Chg); + if ((Use & ~REG_AXY) == 0) { + if (Use == REG_A) { + ArgSize = BU_B8; + return BackupAAfter (S, B, Idx, Indices); + } else if (Use == REG_AX) { + ArgSize = BU_B16; + return BackupAXAfter (S, B, Idx, Indices); + } else if (Use == REG_AXY) { + /* This is actually a 16-bit word plus a 8-bit byte */ + ArgSize = BU_B24; + return BackupAXYAfter (S, B, Idx, Indices); + } + + /* We don't recognize other usage patterns for now */ + } + } + + SB_Done (&SrcArg); + SB_Done (&DstArg); + + /* Unable to do backup */ + return 0; +} + +static int LoadAAt (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices, int After) +/* Reload into A the same arg according to LoadRegInfo before or after Idx +** depending on the After param. +*/ +{ + CodeEntry* E; + CodeEntry* O; /* Old entry at Idx */ + CodeEntry* X; + int Success = 0; + int OldIdx; + unsigned Use, Chg; + + /* Adjust the insertion point if necessary */ + if (After) { + ++Idx; + } + OldIdx = Idx; + + E = LRI->LoadEntry; + CHECK (E != 0); + + O = CS_GetEntry (S, OldIdx); + + /* We only recognize opc with an arg for now, as well as a special case for ldaxysp */ + if ((E->OPC != OP65_JSR || strcmp (E->Arg, "ldaxysp") == 0) && + E->AM != AM65_BRA && E->AM != AM65_IMP) { + if (E->Size != 1 && E->AM != AM65_IMP) { + + /* FIXME: The load flags only reflect the situation by the time it reaches the range end */ + if ((LRI->Flags & (LI_DIRECT | LI_CHECK_ARG | LI_CHECK_Y)) != 0) { + if ((LRI->Flags & LI_RELOAD_Y) != 0) { + if ((LRI->Flags & LI_CHECK_Y) == 0) { + X = NewCodeEntry (OP65_LDY, AM65_IMM, MakeHexArg (LRI->Offs), 0, E->LI); + } else { + X = NewCodeEntry (OP65_LDY, LRI->LoadYEntry->AM, LRI->LoadYEntry->Arg, 0, E->LI); + } + CS_InsertEntry (S, X, Idx++); + } + X = NewCodeEntry (OP65_LDA, E->AM, E->Arg, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + + Success = 1; + } + } + } else if (E->OPC == OP65_JSR) { + + /* For other function calls we load their arguments instead */ + GetFuncInfo (E->Arg, &Use, &Chg); + if ((Use & ~REG_AXY) == 0) { + if (Use == REG_X) { + X = NewCodeEntry (OP65_TXA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } else if (Use == REG_Y) { + X = NewCodeEntry (OP65_TYA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } else if (Use == REG_A) { + /* nothing to do */ + } else { + /* We don't recognize other usage patterns for now */ + return 0; + } + + Success = 1; + } + } + + if (Success) { + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx, Idx - OldIdx); + + /* Move labels if it was an insertion before Idx */ + CS_MoveLabels (S, O, CS_GetEntry (S, OldIdx)); + + /* Done */ + return 1; + } + + /* Unable to load */ + return 0; +} + + + +static int LoadXAt (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices, int After) +/* Reload into X the same arg according to LoadRegInfo before or after Idx +** depending on the After param. +*/ +{ + CodeEntry* E; + CodeEntry* O; /* Old entry at Idx */ + CodeEntry* X; + int Success = 0; + int OldIdx; + unsigned Use, Chg; + + /* Adjust the insertion point if necessary */ + if (After) { + ++Idx; + } + OldIdx = Idx; + + E = LRI->LoadEntry; + CHECK (E != 0); + + O = CS_GetEntry (S, OldIdx); + + /* We only recognize opc with an arg for now, as well as a special case for ldaxysp */ + if ((E->OPC != OP65_JSR || strcmp (E->Arg, "ldaxysp") == 0) && + E->AM != AM65_BRA && E->AM != AM65_IMP) { + if (E->Size != 1 && E->AM != AM65_IMP) { + + /* FIXME: The load flags only reflect the situation by the time it reaches the range end */ + if ((LRI->Flags & (LI_DIRECT | LI_CHECK_ARG | LI_CHECK_Y)) != 0) { + if ((LRI->Flags & LI_RELOAD_Y) != 0) { + if ((LRI->Flags & LI_CHECK_Y) == 0) { + X = NewCodeEntry (OP65_LDY, AM65_IMM, MakeHexArg (LRI->Offs), 0, E->LI); + } else { + X = NewCodeEntry (OP65_LDY, LRI->LoadYEntry->AM, LRI->LoadYEntry->Arg, 0, E->LI); + } + CS_InsertEntry (S, X, Idx++); + + /* ldx does support AM65_ZPY and AM65_ABSY */ + if (E->AM == AM65_ZPY || E->AM == AM65_ABSY) { + X = NewCodeEntry (OP65_LDX, E->AM, E->Arg, 0, E->LI); + } else { + X = NewCodeEntry (OP65_LDA, E->AM, E->Arg, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, E->LI); + } + CS_InsertEntry (S, X, Idx++); + } else { + X = NewCodeEntry (OP65_LDX, E->AM, E->Arg, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } + + Success = 1; + } + } + } else if (E->OPC == OP65_JSR) { + /* For function calls we load their arguments instead */ + GetFuncInfo (E->Arg, &Use, &Chg); + if ((Use & ~REG_AXY) == 0) { + if (Use == REG_A) { + X = NewCodeEntry (OP65_TAY, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } else if (Use == REG_Y) { + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TYA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } else if (Use == REG_X) { + /* nothing to do */ + } else { + /* We don't recognize other usage patterns for now */ + return 0; + } + + Success = 1; + } + } + + if (Success) { + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx, Idx - OldIdx); + + /* Move labels if it was an insertion before Idx */ + CS_MoveLabels (S, O, CS_GetEntry (S, OldIdx)); + + /* Done */ + return 1; + } + + /* Unable to load */ + return 0; +} + + + +static int LoadYAt (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices, int After) +/* Reload into Y the same arg according to LoadRegInfo before or after Idx +** depending on the After param. +*/ +{ + CodeEntry* E; + CodeEntry* O; /* Old entry at Idx */ + CodeEntry* X; + int Success = 0; + int OldIdx; + unsigned Use, Chg; + + /* Adjust the insertion point if necessary */ + if (After) { + ++Idx; + } + OldIdx = Idx; + + E = LRI->LoadEntry; + CHECK (E != 0); + + O = CS_GetEntry (S, OldIdx); + + /* We only recognize opc with an arg for now, as well as a special case for ldaxysp */ + if ((E->OPC != OP65_JSR || strcmp (E->Arg, "ldaxysp") == 0) && + E->AM != AM65_BRA && E->AM != AM65_IMP) { + if (E->Size != 1 && E->AM != AM65_IMP) { + + /* FIXME: The load flags only reflect the situation by the time it reaches the range end */ + if ((LRI->Flags & (LI_DIRECT | LI_CHECK_ARG | LI_CHECK_Y)) != 0) { + if ((LRI->Flags & LI_RELOAD_Y) != 0) { + if ((LRI->Flags & LI_CHECK_Y) == 0) { + X = NewCodeEntry (OP65_LDY, AM65_IMM, MakeHexArg (LRI->Offs), 0, E->LI); + } else { + X = NewCodeEntry (OP65_LDY, LRI->LoadYEntry->AM, LRI->LoadYEntry->Arg, 0, E->LI); + } + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_LDA, E->AM, E->Arg, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAY, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } else { + X = NewCodeEntry (OP65_LDY, E->AM, E->Arg, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } + + Success = 1; + } + } + } else if (E->OPC == OP65_JSR) { + /* For function calls we load their arguments instead */ + GetFuncInfo (E->Arg, &Use, &Chg); + if ((Use & ~REG_AXY) == 0) { + if (Use == REG_A) { + X = NewCodeEntry (OP65_TAY, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } else if (Use == REG_X) { + X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TXA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_TAY, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, Idx++); + } else if (Use == REG_Y) { + /* nothing to do */ + } else { + /* We don't recognize other usage patterns for now */ + return 0; + } + + Success = 1; + } + } + + if (Success) { + /* Adjust all indices at once */ + AdjustEntryIndices (Indices, OldIdx, Idx - OldIdx); + + /* Move labels if it was an insertion before Idx */ + CS_MoveLabels (S, O, CS_GetEntry (S, OldIdx)); + + /* Done */ + return 1; + } + + /* Unable to load */ + return 0; +} + + + +int LoadABefore (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices) +/* Reload into A the same arg according to LoadRegInfo at Idx */ +{ + return LoadAAt (S, Idx, LRI, Indices, 0); +} + + + +int LoadXBefore (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices) +/* Reload into X the same arg according to LoadRegInfo at Idx */ +{ + return LoadXAt (S, Idx, LRI, Indices, 0); +} + + + +int LoadYBefore (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices) +/* Reload into Y the same arg according to LoadRegInfo at Idx */ +{ + return LoadYAt (S, Idx, LRI, Indices, 0); +} + + + +int LoadAAfter (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices) +/* Reload into A the same arg according to LoadRegInfo after Idx */ +{ + return LoadAAt (S, Idx, LRI, Indices, 1); +} + + + +int LoadXAfter (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices) +/* Reload into X the same arg according to LoadRegInfo after Idx */ +{ + return LoadXAt (S, Idx, LRI, Indices, 1); +} + + + +int LoadYAfter (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices) +/* Reload into Y the same arg according to LoadRegInfo after Idx */ +{ + return LoadYAt (S, Idx, LRI, Indices, 1); +} + + + +unsigned GetRegAccessedInOpenRange (CodeSeg* S, int First, int Last) +/* Get what ZPs, registers or processor states are used or changed in the range +** (First, Last). +** The code block must be basic without any jump backwards. +*/ +{ + CodeEntry* X; + unsigned ZPAccessed = 0; + + CHECK (Last <= (int)CollCount (&S->Entries)); + + while (++First < Last) { + X = CS_GetEntry (S, First); + ZPAccessed |= X->Use | X->Chg; + } + + return ZPAccessed; +} + + + +unsigned GetRegUsageInOpenRange (CodeSeg* S, int First, int Last, unsigned* Use, unsigned* Chg) +/* Get what ZPs, registers or processor states are used or changed in the range +** (First, Last) in output parameters Use and Chg. +** Return what ZP regs are used before changed in this range. +** The code block must be basic without any jump backwards. +*/ +{ + CodeEntry* X; + unsigned U = 0; + unsigned C = 0; + + CHECK (Last <= (int)CollCount (&S->Entries)); + + /* Clear the output flags first */ + if (Use != 0) { + *Use = 0; + } + if (Chg != 0) { + *Chg = 0; + } + + while (++First < Last) { + X = CS_GetEntry (S, First); + if (Use != 0) { + *Use |= X->Use; + } + if (Chg != 0) { + *Chg |= X->Chg; + } + /* Used before changed */ + U |= ~C & X->Use; + C |= X->Chg; + } + + return U; +} + + + +int IsArgSameInOpenRange (CodeSeg* S, int First, int Last, CodeEntry* E) +/* Check if the loading the opc arg gives the same result everywhere between (First, Last). +** The code block in the range must be basic without any jump backwards. +** Note: this always checks Y if any of the LI_CHECK_Y / LI_RELOAD_Y flags is set. +*/ +{ + LoadRegInfo LRI; + CodeEntry* X; + unsigned CheckedFlags = LI_SRC_CHG; + + CHECK (Last <= (int)CollCount (&S->Entries)); + + /* TODO: We'll currently give up finding the src of Y */ + ClearLoadRegInfo (&LRI); + PrepairLoadRegInfoForArgCheck (S, &LRI, E); + + /* TODO: We don't currently check for all cases */ + if ((LRI.Flags & (LI_DIRECT | LI_CHECK_ARG | LI_CHECK_Y | LI_RELOAD_Y)) == 0) { + /* Just bail out as if the src would change right away */ + return 0; + } + + /* If there's no need to check */ + if ((LRI.Flags & (LI_CHECK_ARG | LI_CHECK_Y | LI_RELOAD_Y)) == 0) { + return 1; + } + + /* This always checks Y */ + if ((LRI.Flags & (LI_CHECK_Y | LI_RELOAD_Y)) != 0) { + LRI.Flags |= LI_CHECK_Y; + LRI.Flags &= ~LI_RELOAD_Y; + CheckedFlags |= LI_Y_CHG; + } + + while (++First < Last) { + X = CS_GetEntry (S, First); + if ((Affected (&LRI, X) & CheckedFlags) != 0) { + return 0; + } + } + + /* No change found */ + return 1; +} + + + +int FindArgFirstChangeInOpenRange (CodeSeg* S, int First, int Last, CodeEntry* E) +/* Find the first possible spot where the loaded arg of E might be changed in +** the range (First, Last). The code block in the range must be basic without +** any jump backwards. +** Return the index of the found entry, or Last if not found. +** Note: changes of Y are always ignored even if the LI_RELOAD_Y flag is not set. +*/ +{ + LoadRegInfo LRI; + CodeEntry* X; + unsigned CheckedFlags = LI_SRC_CHG; + + CHECK (Last <= (int)CollCount (&S->Entries)); + + /* TODO: We'll currently give up finding the src of Y */ + ClearLoadRegInfo (&LRI); + PrepairLoadRegInfoForArgCheck (S, &LRI, E); + + /* TODO: We don't currently check for all cases */ + if ((LRI.Flags & (LI_DIRECT | LI_CHECK_ARG | LI_CHECK_Y)) == 0) { + /* Just bail out as if the src would change right away */ + return First + 1; + } + + /* If there's no need to check */ + if ((LRI.Flags & (LI_CHECK_ARG | LI_CHECK_Y)) == 0) { + return Last; + } + + while (++First < Last) { + X = CS_GetEntry (S, First); + if ((Affected (&LRI, X) & CheckedFlags) != 0) { + return First; + } + } + + /* Not found */ + return Last; +} + + + +int FindArgLastUsageInOpenRange (CodeSeg* S, int First, int Last, CodeEntry* E, int ReloadY) +/* Find the last index where the arg of E might be used or changed in the range (First, Last). +** ReloadY indicates whether Y is supposed to be reloaded. +** The code block in the range must be basic without any jump backwards. +** Return the index of the found entry, or First if not found. +*/ +{ + LoadRegInfo LRI; + CodeEntry* X; + unsigned CheckedFlags = LI_SRC_USE | LI_SRC_CHG; + int Found = First; + + CHECK (Last <= (int)CollCount (&S->Entries)); + + /* TODO: We'll currently give up finding the src of Y */ + ClearLoadRegInfo (&LRI); + PrepairLoadRegInfoForArgCheck (S, &LRI, E); + + /* Whether Y is to be reloaded */ + if (ReloadY) { + /* Always reload Y */ + if ((LRI.Flags & LI_CHECK_Y) != 0) { + LRI.Flags |= LI_RELOAD_Y; + } + } else if ((LRI.Flags & LI_RELOAD_Y) != 0) { + /* Always check Y */ + LRI.Flags |= LI_CHECK_Y; + LRI.Flags &= ~LI_RELOAD_Y; + } + + /* TODO: We don't currently check for all cases */ + if ((LRI.Flags & (LI_DIRECT | LI_CHECK_ARG | LI_CHECK_Y | LI_RELOAD_Y)) == 0) { + /* Just bail out as if the src would change everywhere */ + return First < Last ? Last - 1 : First; + } + + if ((LRI.Flags & LI_CHECK_Y) != 0) { + CheckedFlags |= LI_Y_SRC_USE | LI_Y_SRC_CHG; + } + + if ((LRI.Flags & LI_RELOAD_Y) != 0) { + CheckedFlags |= LI_Y_USE; + } else if ((LRI.Flags & LI_CHECK_Y) != 0) { + CheckedFlags |= LI_Y_CHG; + } + + while (++First < Last) { + X = CS_GetEntry (S, First); + if ((Affected (&LRI, X) & CheckedFlags) != 0) { + Found = First; + } + } + + /* Result */ + return Found; +} + + + +int FindRegFirstChangeInOpenRange (CodeSeg* S, int First, int Last, unsigned what) +/* Find the first possible spot where the queried ZPs, registers and/or processor +** states might be changed in the range (First, Last). The code block in the +** range must be basic without any jump backwards. +** Return the index of the found entry, or Last if not found. +*/ +{ + CodeEntry* X; + + CHECK (Last <= (int)CollCount (&S->Entries)); + + while (++First < Last) { + X = CS_GetEntry (S, First); + if ((X->Chg & what) != 0) { + return First; + } + } + + /* Not found */ + return Last; +} + + + +int FindRegFirstUseInOpenRange (CodeSeg* S, int First, int Last, unsigned what) +/* Find the first possible spot where the queried ZPs, registers and/or processor +** states might be used in the range (First, Last). The code block in the range +** must be basic without any jump backwards. +** Return the index of the found entry, or Last if not found. +*/ +{ + CodeEntry* X; + + CHECK (Last <= (int)CollCount (&S->Entries)); + + while (++First < Last) { + X = CS_GetEntry (S, First); + if ((X->Use & what) != 0) { + return First; + } + } + + /* Not found */ + return Last; +} + + + +int FindRegLastChangeInOpenRange (CodeSeg* S, int First, int Last, unsigned what) +/* Find the last possible spot where the queried ZPs, registers and/or processor +** states might be changed in the range (First, Last). The code block in the +** range must be basic without any jump backwards. +** Return the index of the found entry, or First if not found. +*/ +{ + CodeEntry* X; + int Found = First; + + CHECK (Last <= (int)CollCount (&S->Entries)); + + while (++First < Last) { + X = CS_GetEntry (S, First); + if ((X->Chg & what) != 0) { + Found = First; + } + } + + return Found; +} + + + +int FindRegLastUseInOpenRange (CodeSeg* S, int First, int Last, unsigned what) +/* Find the last possible spot where the queried ZPs, registers and/or processor +** states might be used in the range (First, Last). The code block in the range +** must be basic without any jump backwards. +** Return the index of the found entry, or First if not found. +*/ +{ + CodeEntry* X; + int Found = First; + + CHECK (Last <= (int)CollCount (&S->Entries)); + + while (++First < Last) { + X = CS_GetEntry (S, First); + if ((X->Use & what) != 0) { + Found = First; + } + } + + return Found; +} diff --git a/src/cc65/codeoptutil.h b/src/cc65/codeoptutil.h new file mode 100644 index 000000000..140b11236 --- /dev/null +++ b/src/cc65/codeoptutil.h @@ -0,0 +1,469 @@ +/*****************************************************************************/ +/* */ +/* codeoptutil.h */ +/* */ +/* Optimize operations that take operands via the stack */ +/* */ +/* */ +/* */ +/* (C) 2001 Ullrich von Bassewitz */ +/* Wacholderweg 14 */ +/* D-70597 Stuttgart */ +/* EMail: uz@cc65.org */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef CODEOPTUTIL_H +#define CODEOPTUTIL_H + + + +/* cc65 */ +#include "codeent.h" +#include "codeseg.h" + + + +/*****************************************************************************/ +/* Load tracking data */ +/*****************************************************************************/ + + + +/* LoadRegInfo flags set by DirectOp */ +typedef enum { + LI_NONE = 0x00, + LI_DIRECT = 0x01, /* Direct op may be used */ + LI_RELOAD_Y = 0x02, /* Reload index register Y */ + LI_REMOVE = 0x04, /* Load may be removed */ + LI_DONT_REMOVE = 0x08, /* Load may not be removed */ + LI_CHECK_ARG = 0x10, /* Load src might be modified later */ + LI_CHECK_Y = 0x20, /* Indexed load src might be modified later */ + LI_SRC_USE = 0x40, /* src of Opc argument is possibly used */ + LI_SRC_CHG = 0x80, /* src of Opc argument is possibly modified */ + LI_Y_SRC_USE = 0x0100, /* src of Opc addressing Y is possibly used */ + LI_Y_SRC_CHG = 0x0200, /* src of Opc addressing Y is possibly modified */ + LI_Y_USE = 0x0400, /* Opc addressing Y is possibly used */ + LI_Y_CHG = 0x0800, /* Opc addressing Y is possibly modified */ + LI_USED_BY_A = 0x1000, /* Content used by RegA */ + LI_USED_BY_X = 0x2000, /* Content used by RegX */ + LI_USED_BY_Y = 0x4000, /* Content used by RegY */ + LI_SP = 0x8000, /* Content on stack */ + LI_LOAD_INSN = 0x010000, /* Is a load insn */ +} LI_FLAGS; + +/* Structure that tells us how to load the lhs values */ +typedef struct LoadRegInfo LoadRegInfo; +struct LoadRegInfo { + LI_FLAGS Flags; /* Tells us how to load */ + int LoadIndex; /* Index of load insn, -1 if invalid */ + CodeEntry* LoadEntry; /* The actual entry, 0 if invalid */ + int LoadYIndex; /* Index of Y-load insn, -1 if invalid */ + CodeEntry* LoadYEntry; /* The actual Y-load entry, 0 if invalid */ + int ChgIndex; /* Index of last change */ + CodeEntry* ChgEntry; /* The actual change entry */ + int Offs; /* Stack offset if data is on stack */ +}; + +/* Now combined for both registers */ +typedef struct LoadInfo LoadInfo; +struct LoadInfo { + LoadRegInfo A; /* Info for A register */ + LoadRegInfo X; /* Info for X register */ + LoadRegInfo Y; /* Info for Y register */ +}; + +/* Structure forward decl */ +typedef struct StackOpData StackOpData; + +/* Structure that holds the needed data */ +struct StackOpData { + CodeSeg* Code; /* Pointer to code segment */ + unsigned Flags; /* Flags to remember things */ + + /* Pointer to optimizer subfunction description */ + const void* OptFunc; + + /* ZP register usage inside the sequence */ + unsigned ZPUsage; + unsigned ZPChanged; + + /* Freedom of registers inside the sequence */ + unsigned UsedRegs; /* Registers used */ + + /* Whether the rhs is changed multiple times */ + int RhsMultiChg; + + /* Register load information for lhs, rhs and rv */ + LoadInfo Lhs; + LoadInfo Rhs; + LoadInfo Rv; + + /* Several indices of insns in the code segment */ + int PushIndex; /* Index of call to pushax in codeseg */ + int OpIndex; /* Index of actual operation */ + + /* Pointers to insns in the code segment */ + CodeEntry* PrevEntry; /* Entry before the call to pushax */ + CodeEntry* PushEntry; /* Pointer to entry with call to pushax */ + CodeEntry* OpEntry; /* Pointer to entry with op */ + CodeEntry* NextEntry; /* Entry after the op */ + + const char* ZPLo; /* Lo byte of zero page loc to use */ + const char* ZPHi; /* Hi byte of zero page loc to use */ + unsigned IP; /* Insertion point used by some routines */ +}; + + + +/*****************************************************************************/ +/* Load tracking code */ +/*****************************************************************************/ + + + +void ClearLoadRegInfo (LoadRegInfo* LRI); +/* Clear a LoadRegInfo struct */ + +void CopyLoadRegInfo (LoadRegInfo* To, LoadRegInfo* From); +/* Copy a LoadRegInfo struct */ + +void FinalizeLoadRegInfo (LoadRegInfo* LRI, CodeSeg* S); +/* Prepare a LoadRegInfo struct for use */ + +void AdjustLoadRegInfo (LoadRegInfo* LRI, int Index, int Change); +/* Adjust a load register info struct after deleting or inserting an entry +** with a given index +*/ + +void ClearLoadInfo (LoadInfo* LI); +/* Clear a LoadInfo struct */ + +void CopyLoadInfo (LoadInfo* To, LoadInfo* From); +/* Copy a LoadInfo struct */ + +void FinalizeLoadInfo (LoadInfo* LI, CodeSeg* S); +/* Prepare a LoadInfo struct for use */ + +void AdjustLoadInfo (LoadInfo* LI, int Index, int Change); +/* Adjust a load info struct after deleting entry with a given index */ + +RegInfo* GetLastChangedRegInfo (StackOpData* D, LoadRegInfo* Reg); +/* Get RegInfo of the last insn entry that changed the reg */ + +void PrepairLoadRegInfoForArgCheck (CodeSeg* S, LoadRegInfo* LRI, CodeEntry* E); +/* Set the load src flags and remember to check for load src change if necessary */ + +void SetIfOperandSrcAffected (LoadInfo* LLI, CodeEntry* E); +/* Check and flag operand src that may be affected */ + +void SetIfOperandLoadUnremovable (LoadInfo* LI, unsigned Used); +/* Check and flag operand load that may be unremovable */ + +unsigned int TrackLoads (LoadInfo* LI, CodeSeg* S, int I); +/* Track loads for a code entry. +** Return used registers. +*/ + +void SetDontRemoveEntryFlag (LoadRegInfo* LRI); +/* Flag the entry as non-removable according to register flags */ + +void ResetDontRemoveEntryFlag (LoadRegInfo* LRI); +/* Unflag the entry as non-removable according to register flags */ + +void SetDontRemoveEntryFlags (StackOpData* D); +/* Flag the entries as non-removable according to register flags */ + +void ResetDontRemoveEntryFlags (StackOpData* D); +/* Unflag the entries as non-removable according to register flags */ + +void ResetStackOpData (StackOpData* Data); +/* Reset the given data structure */ + + + +/*****************************************************************************/ +/* Helpers */ +/*****************************************************************************/ + + + +void InsertEntry (StackOpData* D, CodeEntry* E, int Index); +/* Insert a new entry. Depending on Index, D->PushIndex and D->OpIndex will +** be adjusted by this function. +*/ + +void DelEntry (StackOpData* D, int Index); +/* Delete an entry. Depending on Index, D->PushIndex and D->OpIndex will be +** adjusted by this function, and PushEntry/OpEntry may get invalidated. +*/ + +void AdjustStackOffset (StackOpData* D, unsigned Offs); +/* Adjust the offset for all stack accesses in the range PushIndex to OpIndex. +** OpIndex is adjusted according to the insertions. +*/ + +int IsRegVar (StackOpData* D); +/* If the value pushed is that of a zeropage variable that is unchanged until Op, +** replace ZPLo and ZPHi in the given StackOpData struct by the variable and return true. +** Otherwise leave D untouched and return false. +*/ + +void AddStoreLhsA (StackOpData* D); +/* Add a store to zero page after the push insn */ + +void AddStoreLhsX (StackOpData* D); +/* Add a store to zero page after the push insn */ + +void ReplacePushByStore (StackOpData* D); +/* Replace the call to the push subroutine by a store into the zero page +** location (actually, the push is not replaced, because we need it for +** later, but the name is still ok since the push will get removed at the +** end of each routine). +*/ + +void AddOpLow (StackOpData* D, opc_t OPC, LoadInfo* LI); +/* Add an op for the low byte of an operator. This function honours the +** OP_DIRECT and OP_RELOAD_Y flags and generates the necessary instructions. +** All code is inserted at the current insertion point. +*/ + +void AddOpHigh (StackOpData* D, opc_t OPC, LoadInfo* LI, int KeepResult); +/* Add an op for the high byte of an operator. Special cases (constant values +** or similar) have to be checked separately, the function covers only the +** generic case. Code is inserted at the insertion point. +*/ + +void RemoveRegLoads (StackOpData* D, LoadInfo* LI); +/* Remove register load insns */ + + +void RemoveRemainders (StackOpData* D); +/* Remove the code that is unnecessary after translation of the sequence */ + +int HarmlessCall (const CodeEntry* E, int PushedBytes); +/* Check if this is a call to a harmless subroutine that will not interrupt +** the pushax/op sequence when encountered. +*/ + + + +/*****************************************************************************/ +/* Helpers */ +/*****************************************************************************/ + + + +/* Backup location types */ +#define BU_UNKNOWN 0x00000000U /* Unknown */ +#define BU_IMM 0x00000000U /* Immediate */ +#define BU_REG 0x01000000U /* In register */ +#define BU_ZP 0x02000000U /* On ZP */ +#define BU_SP6502 0x04000000U /* On 6502 stack */ +#define BU_SP 0x08000000U /* On CC65 stack */ +#define BU_B8 0x00000000U /* Size of 8-bit */ +#define BU_B16 0x10000000U /* Size of 16-bit */ +#define BU_B24 0x20000000U /* Size of 24-bit */ +#define BU_B32 0x30000000U /* Size of 32-bit */ +#define BU_TYPE_MASK 0x0F000000U /* Type mask */ +#define BU_SIZE_MASK 0xF0000000U /* Size mask */ + +typedef struct { + unsigned Type; /* Backup location type and size */ + unsigned ZPUsage; /* ZP unusable for backup */ + union { + unsigned Where; /* Backup location */ + unsigned Imm; /* Backed-up value */ + unsigned char* Bytes; /* Pointer to backed-up value */ + }; +} BackupInfo; + + + +const char* GetZPName (unsigned ZPLoc); +/* Get the name strings of certain known ZP Regs */ + +unsigned FindAvailableBackupLoc (BackupInfo* B, unsigned Type); +/* Find a ZP loc for storing the backup and fill in the info. +** The allowed types are specified with the Type parameter. +** For convenience, all types are aloowed if none is specified. +** Return the type of the found loc. +*/ + +void AdjustEntryIndices (Collection* Indices, int Index, int Change); +/* Adjust a load register info struct after deleting or inserting successive +** entries with a given index. +*/ + +void DelEntryIdx (CodeSeg* S, int Idx, Collection* Indices); +/* Delete an entry and adjust Indices if necessary */ + +void DelEntriesIdx (CodeSeg* S, int Idx, int Count, Collection* Indices); +/* Delete entries and adjust Indices if necessary */ + +void RemoveFlaggedRegLoads (CodeSeg* S, LoadRegInfo* LRI, Collection* Indices); +/* Remove flagged register load insns */ + +void RemoveFlaggedLoads (CodeSeg* S, LoadInfo* LI, Collection* Indices); +/* Remove flagged load insns */ + +int BackupABefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Backup the content of A before the specified index Idx */ + +int BackupXBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Backup the content of X before the specified index Idx */ + +int BackupYBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Backup the content of Y before the specified index Idx */ + +int BackupAXBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Backup the content of AX before the specified index Idx */ + +int BackupAXYBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Backup the content of AXY before the specified index Idx. +** This doesn't allow separating the backup of Y from that of AX for now. +*/ + +int BackupAAfter (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Backup the content of A after the specified index Idx */ + +int BackupXAfter (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Backup the content of X after the specified index Idx */ + +int BackupYAfter (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Backup the content of Y after the specified index Idx */ + +int BackupAXAfter (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Backup the content of AX after the specified index Idx */ + +int BackupAXYAfter (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Backup the content of AXY after the specified index Idx. +** This doesn't allow separating the backup of Y from that of AX for now. +*/ + +int RestoreABefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Restore the content of Y before the specified index Idx */ + +int RestoreXBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Restore the content of X before the specified index Idx */ + +int RestoreYBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Restore the content of Y before the specified index Idx */ + +int RestoreAXBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Restore the content of AX before the specified index Idx */ + +int RestoreAXYBefore (CodeSeg* S, BackupInfo* B, int Idx, Collection* Indices); +/* Restore the content of AXY before the specified index Idx. +** This only allows restore from compacted AXY backup for now. +*/ + +int BackupArgAfter (CodeSeg* S, BackupInfo* B, int Idx, const CodeEntry* E, Collection* Indices); +/* Backup the content of the opc arg of the entry E after the specified index Idx. +** Reg A/Y will be used to transfer the content from a memory location to another +** regardless of whether it is in use. +*/ + +int LoadABefore (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices); +/* Reload into A the same arg according to LoadRegInfo at Idx */ + +int LoadXBefore (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices); +/* Reload into X the same arg according to LoadRegInfo at Idx */ + +int LoadYBefore (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices); +/* Reload into Y the same arg according to LoadRegInfo at Idx */ + +int LoadAAfter (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices); +/* Reload into A the same arg according to LoadRegInfo after Idx */ + +int LoadXAfter (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices); +/* Reload into X the same arg according to LoadRegInfo after Idx */ + +int LoadYAfter (CodeSeg* S, int Idx, const LoadRegInfo* LRI, Collection* Indices); +/* Reload into Y the same arg according to LoadRegInfo after Idx */ + +unsigned GetRegAccessedInOpenRange (CodeSeg* S, int First, int Last); +/* Get what ZPs, registers or processor states are used or changed in the range +** (First, Last). +** The code block must be basic without any jump backwards. +*/ + +unsigned GetRegUsageInOpenRange (CodeSeg* S, int First, int Last, unsigned* Use, unsigned* Chg); +/* Get what ZPs, registers or processor states are used or changed in the range +** (First, Last) in output parameters Use and Chg. +** Return what ZP regs are used before changed in this range. +** The code block must be basic without any jump backwards. +*/ + +int IsArgSameInOpenRange (CodeSeg* S, int First, int Last, CodeEntry* E); +/* Check if the loading the opc arg gives the same result everywhere between (First, Last). +** The code block in the range must be basic without any jump backwards. +** Note: this always checks Y if any of the LI_CHECK_Y / LI_RELOAD_Y flags is set. +*/ + +int FindArgFirstChangeInOpenRange (CodeSeg* S, int First, int Last, CodeEntry* E); +/* Find the first possible spot where the loaded arg of E might be changed in +** the range (First, Last). The code block in the range must be basic without +** any jump backwards. +** Return the index of the found entry, or Last if not found. +** Note: changes of Y are always ignored even if the LI_RELOAD_Y flag is not set. +*/ + +int FindArgLastUsageInOpenRange (CodeSeg* S, int First, int Last, CodeEntry* E, int ReloadY); +/* Find the last index where the arg of E might be used or changed in the range (First, Last). +** ReloadY indicates whether Y is supposed to be reloaded. +** The code block in the range must be basic without any jump backwards. +** Return the index of the found entry, or First if not found. +*/ + +int FindRegFirstChangeInOpenRange (CodeSeg* S, int First, int Last, unsigned what); +/* Find the first possible spot where the queried ZPs, registers and/or processor +** states might be changed in the range (First, Last). The code block in the +** range must be basic without any jump backwards. +** Return the index of the found entry, or Last if not found. +*/ + +int FindRegFirstUseInOpenRange (CodeSeg* S, int First, int Last, unsigned what); +/* Find the first possible spot where the queried ZPs, registers and/or processor +** states might be used in the range (First, Last). The code block in the range +** must be basic without any jump backwards. +** Return the index of the found entry, or Last if not found. +*/ + +int FindRegLastChangeInOpenRange (CodeSeg* S, int First, int Last, unsigned what); +/* Find the last possible spot where the queried ZPs, registers and/or processor +** states might be changed in the range (First, Last). The code block in the +** range must be basic without any jump backwards. +** Return the index of the found entry, or First if not found. +*/ + +int FindRegLastUseInOpenRange (CodeSeg* S, int First, int Last, unsigned what); +/* Find the last possible spot where the queried ZPs, registers and/or processor +** states might be used in the range (First, Last). The code block in the range +** must be basic without any jump backwards. +** Return the index of the found entry, or First if not found. +*/ + +/* End of codeoptutil.h */ + +#endif diff --git a/src/cc65/codeseg.c b/src/cc65/codeseg.c index a808a26f7..e621147ab 100644 --- a/src/cc65/codeseg.c +++ b/src/cc65/codeseg.c @@ -183,6 +183,37 @@ static void CS_RemoveLabelFromHash (CodeSeg* S, CodeLabel* L) +static CodeLabel* PickRefLab (CodeEntry* E) +/* Pick a reference label and move it to index 0 in E. */ +{ + unsigned I; + unsigned LabelCount = CE_GetLabelCount (E); + CHECK (LabelCount > 0); + /* Use either the first one as reference label, or a label with a Ref that has no JumpTo. + ** This is a hack to partially work around #1211. Refs with no JumpTo are labels used + ** in data segments. (They are not tracked.) If a data segment is the only reference, + ** the label will be pruned away, but the data reference will remain, causing linking to fail. + */ + CodeLabel* L0 = CE_GetLabel (E, 0); + for (I = 1; I < LabelCount; ++I) { + unsigned J; + CodeLabel* L = CE_GetLabel (E, I); + unsigned RefCount = CL_GetRefCount (L); + for (J = 0; J < RefCount; ++J) { + CodeEntry* EJ = CL_GetRef (L, J); + if (EJ->JumpTo == NULL) { + /* Move it to the beginning since it's simpler to handle the removal this way. */ + CE_ReplaceLabel (E, L, 0); + CE_ReplaceLabel (E, L0, I); + return L; + } + } + } + return L0; +} + + + /*****************************************************************************/ /* Functions for parsing instructions */ /*****************************************************************************/ @@ -251,6 +282,8 @@ static CodeEntry* ParseInsn (CodeSeg* S, LineInfo* LI, const char* L) char Reg; CodeEntry* E; CodeLabel* Label; + const char* ArgBase = Arg; + int IsLabel = 0; /* Read the first token and skip white space after it */ L = SkipSpace (ReadToken (L, " \t:", Mnemo, sizeof (Mnemo))); @@ -317,12 +350,12 @@ static CodeEntry* ParseInsn (CodeSeg* S, LineInfo* LI, const char* L) /* Expect zp x indirect */ L = SkipSpace (L+1); if (toupper (*L) != 'X') { - Error ("ASM code error: `X' expected"); + Error ("ASM code error: 'X' expected"); return 0; } L = SkipSpace (L+1); if (*L != ')') { - Error ("ASM code error: `)' expected"); + Error ("ASM code error: ')' expected"); return 0; } L = SkipSpace (L+1); @@ -337,7 +370,7 @@ static CodeEntry* ParseInsn (CodeSeg* S, LineInfo* LI, const char* L) if (*L == ',') { L = SkipSpace (L+1); if (toupper (*L) != 'Y') { - Error ("ASM code error: `Y' expected"); + Error ("ASM code error: 'Y' expected"); return 0; } L = SkipSpace (L+1); @@ -372,13 +405,13 @@ static CodeEntry* ParseInsn (CodeSeg* S, LineInfo* LI, const char* L) if ((OPC->Info & OF_BRA) != 0) { /* Branch */ AM = AM65_BRA; - } else if (GetZPInfo(Arg) != 0) { + } else if (IsZPArg (Arg)) { AM = AM65_ZP; } else { /* Check for subroutine call to local label */ if ((OPC->Info & OF_CALL) && IsLocalLabelName (Arg)) { Error ("ASM code error: " - "Cannot use local label `%s' in subroutine call", + "Cannot use local label '%s' in subroutine call", Arg); } AM = AM65_ABS; @@ -393,12 +426,15 @@ static CodeEntry* ParseInsn (CodeSeg* S, LineInfo* LI, const char* L) Reg = toupper (*L); L = SkipSpace (L+1); if (Reg == 'X') { - if (GetZPInfo(Arg) != 0) { + if (IsZPArg (Arg)) { AM = AM65_ZPX; } else { AM = AM65_ABSX; } } else if (Reg == 'Y') { + /* On 6502 only LDX and STX support AM65_ZPY. + ** We just play it simple and safe for now. + */ AM = AM65_ABSY; } else { Error ("ASM code error: syntax error"); @@ -414,29 +450,43 @@ static CodeEntry* ParseInsn (CodeSeg* S, LineInfo* LI, const char* L) } - /* If the instruction is a branch, check for the label and generate it - ** if it does not exist. This may lead to unused labels (if the label + /* We do now have the addressing mode in AM. Allocate a new CodeEntry + ** structure and half-initialize it. We'll set the argument and the label + ** later. + */ + E = NewCodeEntry (OPC->OPC, AM, Arg, 0, LI); + + /* If the instruction is a branch or accessing memory data, check if for + ** the argument could refer to a label. If it does but the label does not + ** exist yet, generate it. This may lead to unused labels (if the label ** is actually an external one) which are removed by the CS_MergeLabels ** function later. */ - Label = 0; - if (AM == AM65_BRA) { - - /* Generate the hash over the label, then search for the label */ - unsigned Hash = HashStr (Arg) % CS_LABEL_HASH_SIZE; - Label = CS_FindLabel (S, Arg, Hash); - - /* If we don't have the label, it's a forward ref - create it */ - if (Label == 0) { - /* Generate a new label */ - Label = CS_NewCodeLabel (S, Arg, Hash); - } + if ((E->Info & OF_CALL) == 0 && + (E->ArgInfo & AIF_HAS_NAME) != 0) { + ArgBase = E->ArgBase; + IsLabel = (E->ArgInfo & AIF_LOCAL) != 0; } - /* We do now have the addressing mode in AM. Allocate a new CodeEntry - ** structure and initialize it. - */ - E = NewCodeEntry (OPC->OPC, AM, Arg, Label, LI); + if (AM == AM65_BRA || IsLabel) { + + /* Generate the hash over the label, then search for the label */ + unsigned Hash = HashStr (ArgBase) % CS_LABEL_HASH_SIZE; + Label = CS_FindLabel (S, ArgBase, Hash); + + /* If we don't have the label, it's a forward ref - create it unless + ** it's an external function. + */ + if (Label == 0 && (OPC->OPC != OP65_JMP || IsLabel)) { + /* Generate a new label */ + Label = CS_NewCodeLabel (S, ArgBase, Hash); + } + + if (Label != 0) { + /* Assign the jump */ + CL_AddRef (Label, E); + } + } /* Return the new code entry */ return E; @@ -532,7 +582,7 @@ void CS_AddVLine (CodeSeg* S, LineInfo* LI, const char* Format, va_list ap) case '.': /* Control instruction */ ReadToken (L, " \t", Token, sizeof (Token)); - Error ("ASM code error: Pseudo instruction `%s' not supported", Token); + Error ("ASM code error: Pseudo instruction '%s' not supported", Token); break; default: @@ -780,7 +830,7 @@ CodeLabel* CS_AddLabel (CodeSeg* S, const char* Name) if (L) { /* We found it - be sure it does not already have an owner */ if (L->Owner) { - Error ("ASM label `%s' is already defined", Name); + Error ("ASM label '%s' is already defined", Name); return L; } } else { @@ -790,7 +840,7 @@ CodeLabel* CS_AddLabel (CodeSeg* S, const char* Name) /* Safety. This call is quite costly, but safety is better */ if (CollIndex (&S->Labels, L) >= 0) { - Error ("ASM label `%s' is already defined", Name); + Error ("ASM label '%s' is already defined", Name); return L; } @@ -906,7 +956,7 @@ void CS_MergeLabels (CodeSeg* S) /* Print some debugging output */ if (Debug) { - printf ("Removing unused global label `%s'", X->Name); + printf ("Removing unused global label '%s'", X->Name); } /* And free the label */ @@ -933,8 +983,10 @@ void CS_MergeLabels (CodeSeg* S) continue; } - /* We have at least one label. Use the first one as reference label. */ - RefLab = CE_GetLabel (E, 0); + /* Pick a label to keep, all references will be moved to this one, and the other labels + ** will be deleted. PickRefLab moves this to index 0. + */ + RefLab = PickRefLab (E); /* Walk through the remaining labels and change references to these ** labels to a reference to the one and only label. Delete the labels @@ -1046,8 +1098,13 @@ void CS_MoveLabelRef (CodeSeg* S, struct CodeEntry* E, CodeLabel* L) /* Be sure that code entry references a label */ PRECONDITION (OldLabel != 0); - /* Remove the reference to our label */ - CS_RemoveLabelRef (S, E); + /* Delete the entry from the label */ + CollDeleteItem (&OldLabel->JumpFrom, E); + + /* If there are no more references, delete the label */ + if (CollCount (&OldLabel->JumpFrom) == 0) { + CS_DelLabel (S, OldLabel); + } /* Use the new label */ CL_AddRef (L, E); @@ -1351,7 +1408,7 @@ void CS_OutputEpilogue (const CodeSeg* S) */ { if (S->Func) { - WriteOutput ("\n.endproc\n\n"); + WriteOutput (".endproc\n\n"); } } @@ -1421,6 +1478,9 @@ void CS_Output (CodeSeg* S) CE_Output (E); } + /* Prettyier formatting */ + WriteOutput ("\n"); + /* If debug info is enabled, terminate the last line number information */ if (DebugInfo) { WriteOutput ("\t.dbg\tline\n"); @@ -1463,6 +1523,7 @@ void CS_GenRegInfo (CodeSeg* S) /* On entry, the register contents are unknown */ RC_Invalidate (&Regs); + RC_InvalidatePS (&Regs); CurrentRegs = &Regs; /* Walk over all insns and note just the changes from one insn to the @@ -1497,6 +1558,7 @@ void CS_GenRegInfo (CodeSeg* S) Regs = J->RI->Out2; } else { RC_Invalidate (&Regs); + RC_InvalidatePS (&Regs); } Entry = 1; } else { @@ -1516,6 +1578,7 @@ void CS_GenRegInfo (CodeSeg* S) */ Done = 0; RC_Invalidate (&Regs); + RC_InvalidatePS (&Regs); break; } if (J->RI->Out2.RegA != Regs.RegA) { @@ -1536,6 +1599,9 @@ void CS_GenRegInfo (CodeSeg* S) if (J->RI->Out2.Tmp1 != Regs.Tmp1) { Regs.Tmp1 = UNKNOWN_REGVAL; } + unsigned PF = J->RI->Out2.PFlags ^ Regs.PFlags; + Regs.PFlags |= ((PF >> 8) | PF | (PF << 8)) & UNKNOWN_PFVAL_ALL; + Regs.ZNRegs &= J->RI->Out2.ZNRegs; ++Entry; } @@ -1555,9 +1621,9 @@ void CS_GenRegInfo (CodeSeg* S) /* If this insn is a branch on zero flag, we may have more info on ** register contents for one of both flow directions, but only if - ** there is a previous instruction. + ** we've gone through a previous instruction. */ - if ((E->Info & OF_ZBRA) != 0 && (P = CS_GetPrevEntry (S, I)) != 0) { + if (LabelCount == 0 && (E->Info & OF_ZBRA) != 0 && (P = CS_GetPrevEntry (S, I)) != 0) { /* Get the branch condition */ bc_t BC = GetBranchCond (E->OPC); diff --git a/src/cc65/compile.c b/src/cc65/compile.c index 9f1ab29f5..d1f78098d 100644 --- a/src/cc65/compile.c +++ b/src/cc65/compile.c @@ -37,7 +37,9 @@ #include <time.h> /* common */ +#include "addrsize.h" #include "debugflag.h" +#include "segnames.h" #include "version.h" #include "xmalloc.h" #include "xsprintf.h" @@ -51,8 +53,10 @@ #include "declare.h" #include "error.h" #include "expr.h" +#include "funcdesc.h" #include "function.h" #include "global.h" +#include "initdata.h" #include "input.h" #include "litpool.h" #include "macrotab.h" @@ -60,6 +64,7 @@ #include "pragma.h" #include "preproc.h" #include "standard.h" +#include "staticassert.h" #include "symtab.h" @@ -75,6 +80,7 @@ static void Parse (void) { int comma; SymEntry* Entry; + FuncDesc* FuncDef = 0; /* Go... */ NextToken (); @@ -107,11 +113,17 @@ static void Parse (void) continue; } + /* Check for a _Static_assert */ + if (CurTok.Tok == TOK_STATIC_ASSERT) { + ParseStaticAssert (); + continue; + } + /* Read variable defs and functions */ ParseDeclSpec (&Spec, SC_EXTERN | SC_STATIC, T_INT); /* Don't accept illegal storage classes */ - if ((Spec.StorageClass & SC_TYPE) == 0) { + if ((Spec.StorageClass & SC_TYPEMASK) == 0) { if ((Spec.StorageClass & SC_AUTO) != 0 || (Spec.StorageClass & SC_REGISTER) != 0) { Error ("Illegal storage class"); @@ -131,14 +143,10 @@ static void Parse (void) comma = 0; while (1) { - Declaration Decl; + Declaration Decl; /* Read the next declaration */ ParseDecl (&Spec, &Decl, DM_NEED_IDENT); - if (Decl.Ident[0] == '\0') { - NextToken (); - break; - } /* Check if we must reserve storage for the variable. We do this, ** @@ -149,29 +157,38 @@ static void Parse (void) ** ** This means that "extern int i;" will not get storage allocated. */ - if ((Decl.StorageClass & SC_FUNC) != SC_FUNC && - (Decl.StorageClass & SC_TYPEMASK) != SC_TYPEDEF && - ((Spec.Flags & DS_DEF_STORAGE) != 0 || - (Decl.StorageClass & (SC_EXTERN|SC_STATIC)) == SC_STATIC || - ((Decl.StorageClass & SC_EXTERN) != 0 && - CurTok.Tok == TOK_ASSIGN))) { - - /* We will allocate storage */ - Decl.StorageClass |= SC_STORAGE | SC_DEF; + if ((Decl.StorageClass & SC_FUNC) != SC_FUNC && + (Decl.StorageClass & SC_TYPEMASK) != SC_TYPEDEF) { + if ((Spec.Flags & DS_DEF_STORAGE) != 0 || + (Decl.StorageClass & (SC_EXTERN|SC_STATIC)) == SC_STATIC || + ((Decl.StorageClass & SC_EXTERN) != 0 && + CurTok.Tok == TOK_ASSIGN)) { + /* We will allocate storage */ + Decl.StorageClass |= SC_STORAGE; + } else { + /* It's a declaration */ + Decl.StorageClass |= SC_DECL; + } } /* If this is a function declarator that is not followed by a comma - ** or semicolon, it must be followed by a function body. If this is - ** the case, convert an empty parameter list into one accepting no - ** parameters (same as void) as required by the standard. + ** or semicolon, it must be followed by a function body. */ - if ((Decl.StorageClass & SC_FUNC) != 0 && - (CurTok.Tok != TOK_COMMA) && - (CurTok.Tok != TOK_SEMI)) { + if ((Decl.StorageClass & SC_FUNC) != 0) { + if (CurTok.Tok != TOK_COMMA && CurTok.Tok != TOK_SEMI) { + /* A definition */ + Decl.StorageClass |= SC_DEF; - FuncDesc* D = GetFuncDesc (Decl.Type); - if (D->Flags & FD_EMPTY) { - D->Flags = (D->Flags & ~(FD_EMPTY | FD_VARIADIC)) | FD_VOID_PARAM; + /* Convert an empty parameter list into one accepting no + ** parameters (same as void) as required by the standard. + */ + FuncDef = GetFuncDesc (Decl.Type); + if (FuncDef->Flags & FD_EMPTY) { + FuncDef->Flags = (FuncDef->Flags & ~FD_EMPTY) | FD_VOID_PARAM; + } + } else { + /* Just a declaration */ + Decl.StorageClass |= SC_DECL; } } @@ -190,18 +207,27 @@ static void Parse (void) /* Allow initialization */ if (CurTok.Tok == TOK_ASSIGN) { + /* This is a definition */ + if (SymIsDef (Entry)) { + Error ("Global variable '%s' has already been defined", + Entry->Name); + } + Entry->Flags |= SC_DEF; + /* We cannot initialize types of unknown size, or ** void types in ISO modes. */ if (Size == 0) { - if (!IsTypeVoid (Decl.Type)) { + if (!IsEmptiableObjectType (Decl.Type)) { if (!IsTypeArray (Decl.Type)) { /* Size is unknown and not an array */ - Error ("Variable `%s' has unknown size", Decl.Ident); + Error ("Cannot initialize variable '%s' of unknown size", Decl.Ident); } } else if (IS_Get (&Standard) != STD_CC65) { /* We cannot declare variables of type void */ - Error ("Illegal type for variable `%s'", Decl.Ident); + Error ("Illegal type '%s' for variable '%s'", + GetFullTypeName (Decl.Type), + Decl.Ident); } } @@ -227,27 +253,51 @@ static void Parse (void) if (IsTypeVoid (Decl.Type)) { /* We cannot declare variables of type void */ - Error ("Illegal type for variable `%s'", Decl.Ident); + Error ("Illegal type for variable '%s'", Decl.Ident); Entry->Flags &= ~(SC_STORAGE | SC_DEF); - } else if (Size == 0) { + } else if (Size == 0 && SymIsDef (Entry) && !IsEmptiableObjectType (Decl.Type)) { /* Size is unknown. Is it an array? */ if (!IsTypeArray (Decl.Type)) { - Error ("Variable `%s' has unknown size", Decl.Ident); + Error ("Variable '%s' has unknown size", Decl.Ident); } - Entry->Flags &= ~(SC_STORAGE | SC_DEF); - } + } else { + /* A global (including static) uninitialized variable is + ** only a tentative definition. For example, this is valid: + ** int i; + ** int i; + ** static int j; + ** static int j = 42; + ** Code for them will be generated by FinishCompile(). + ** For now, just save the BSS segment name + ** (can be set by #pragma bss-name). + */ + const char* bssName = GetSegName (SEG_BSS); - /* Allocate storage if it is still needed */ - if (Entry->Flags & SC_STORAGE) { + if (Entry->V.BssName && strcmp (Entry->V.BssName, bssName) != 0) { + Error ("Global variable '%s' already was defined in the '%s' segment.", + Entry->Name, Entry->V.BssName); + } + Entry->V.BssName = xstrdup (bssName); - /* Switch to the BSS segment */ + /* This is to make the automatical zeropage setting of the symbol + ** work right. + */ g_usebss (); + } + } - /* Define a label */ - g_defgloblabel (Entry->Name); - - /* Allocate space for uninitialized variable */ - g_res (Size); + /* Make the symbol zeropage according to the segment address size */ + if ((Entry->Flags & SC_EXTERN) != 0) { + if (GetSegAddrSize (GetSegName (CS->CurDSeg)) == ADDR_SIZE_ZP) { + Entry->Flags |= SC_ZEROPAGE; + /* Check for enum forward declaration. + ** Warn about it when extensions are not allowed. + */ + if (Size == 0 && IsTypeEnum (Decl.Type)) { + if (IS_Get (&Standard) != STD_CC65) { + Warning ("ISO C forbids forward references to 'enum' types"); + } + } } } @@ -271,15 +321,11 @@ static void Parse (void) /* Prototype only */ NextToken (); } else { - - /* Function body. Check for duplicate function definitions */ - if (SymIsDef (Entry)) { - Error ("Body for function `%s' has already been defined", - Entry->Name); - } - /* Parse the function body */ - NewFunc (Entry); + NewFunc (Entry, FuncDef); + + /* Make sure we aren't omitting any work */ + CheckDeferredOpAllDone (); } } @@ -303,7 +349,7 @@ void Compile (const char* FileName) struct tm* TM; /* Since strftime is locale dependent, we need the abbreviated month names - ** in english. + ** in English. */ static const char MonthNames[12][4] = { "Jan", "Feb", "Mar", "Apr", "May", "Jun", @@ -324,17 +370,22 @@ void Compile (const char* FileName) ** changes using #pragma later. */ if (IS_Get (&Optimize)) { - long CodeSize = IS_Get (&CodeSizeFactor); DefineNumericMacro ("__OPT__", 1); + } + { + long CodeSize = IS_Get (&CodeSizeFactor); if (CodeSize > 100) { DefineNumericMacro ("__OPT_i__", CodeSize); } - if (IS_Get (&EnableRegVars)) { - DefineNumericMacro ("__OPT_r__", 1); - } - if (IS_Get (&InlineStdFuncs)) { - DefineNumericMacro ("__OPT_s__", 1); - } + } + if (IS_Get (&EnableRegVars)) { + DefineNumericMacro ("__OPT_r__", 1); + } + if (IS_Get (&InlineStdFuncs)) { + DefineNumericMacro ("__OPT_s__", 1); + } + if (IS_Get (&EagerlyInlineFuncs)) { + DefineNumericMacro ("__EAGERLY_INLINE_FUNCS__", 1); } /* __TIME__ and __DATE__ macros */ @@ -350,12 +401,20 @@ void Compile (const char* FileName) /* DefineNumericMacro ("__STDC__", 1); <- not now */ DefineNumericMacro ("__STDC_HOSTED__", 1); + InitDeferredOps (); + /* Create the base lexical level */ EnterGlobalLevel (); /* Create the global code and data segments */ CreateGlobalSegments (); + /* There shouldn't be needs for local labels outside a function, but the + ** current code generator still tries to get some at times even though the + ** code were ill-formed. So just set it up with the global segment list. + */ + UseLabelPoolFromSegments (GS); + /* Initialize the literal pool */ InitLiteralPool (); @@ -382,11 +441,61 @@ void Compile (const char* FileName) } else { + /* Used for emitting externals */ + SymEntry* Entry; + /* Ok, start the ball rolling... */ Parse (); + /* Reset the BSS segment name to its default; so that the below strcmp() + ** will work as expected, at the beginning of the list of variables + */ + SetSegName (SEG_BSS, SEGNAME_BSS); + + /* Walk over all global symbols and generate code for uninitialized + ** global variables. + */ + for (Entry = GetGlobalSymTab ()->SymHead; Entry; Entry = Entry->NextSym) { + if ((Entry->Flags & (SC_STORAGE | SC_DEF | SC_STATIC)) == (SC_STORAGE | SC_STATIC)) { + /* Assembly definition of uninitialized global variable */ + SymEntry* Sym = GetSymType (Entry->Type); + unsigned Size = SizeOf (Entry->Type); + if (Size == 0 && IsTypeArray (Entry->Type)) { + if (GetElementCount (Entry->Type) == UNSPECIFIED) { + /* Assume array size of 1 */ + SetElementCount (Entry->Type, 1); + Size = SizeOf (Entry->Type); + Warning ("Incomplete array '%s[]' assumed to have one element", Entry->Name); + } + + Sym = GetSymType (GetElementType (Entry->Type)); + } + + /* For non-ESU types, Size != 0 */ + if (Size != 0 || (Sym != 0 && SymIsDef (Sym))) { + /* Set the segment name only when it changes */ + if (strcmp (GetSegName (SEG_BSS), Entry->V.BssName) != 0) { + SetSegName (SEG_BSS, Entry->V.BssName); + g_segname (SEG_BSS); + } + g_usebss (); + g_defgloblabel (Entry->Name); + g_res (Size); + + /* Mark as defined; so that it will be exported, not imported */ + Entry->Flags |= SC_DEF; + } else { + /* Tentative declared variable is still of incomplete type */ + Error ("Definition of '%s' has type '%s' that is never completed", + Entry->Name, + GetFullTypeName (Entry->Type)); + } + } + } } + DoneDeferredOps (); + if (Debug) { PrintMacroStats (stdout); } @@ -398,26 +507,27 @@ void Compile (const char* FileName) void FinishCompile (void) -/* Emit literals, externals, debug info, do cleanup and optimizations */ +/* Emit literals, debug info, do cleanup and optimizations */ { - SymTable* SymTab; - SymEntry* Func; + SymEntry* Entry; + + /* Walk over all global symbols and do clean-up and optimizations for + ** functions. + */ + for (Entry = GetGlobalSymTab ()->SymHead; Entry; Entry = Entry->NextSym) { + if (SymIsOutputFunc (Entry)) { + /* Continue with previous label numbers */ + UseLabelPoolFromSegments (Entry->V.F.Seg); - /* Walk over all functions, doing cleanup, optimizations ... */ - SymTab = GetGlobalSymTab (); - Func = SymTab->SymHead; - while (Func) { - if (SymIsOutputFunc (Func)) { /* Function which is defined and referenced or extern */ - MoveLiteralPool (Func->V.F.LitPool); - CS_MergeLabels (Func->V.F.Seg->Code); - RunOpt (Func->V.F.Seg->Code); + MoveLiteralPool (Entry->V.F.LitPool); + CS_MergeLabels (Entry->V.F.Seg->Code); + RunOpt (Entry->V.F.Seg->Code); } - Func = Func->NextSym; } /* Output the literal pool */ - OutputLiteralPool (); + OutputGlobalLiteralPool (); /* Emit debug infos if enabled */ EmitDebugInfo (); diff --git a/src/cc65/compile.h b/src/cc65/compile.h index 2d15c8200..7af14ef7e 100644 --- a/src/cc65/compile.h +++ b/src/cc65/compile.h @@ -48,7 +48,7 @@ void Compile (const char* FileName); /* Top level compile routine. Will setup things and call the parser. */ void FinishCompile (void); -/* Emit literals, externals, do cleanup and optimizations */ +/* Emit literals, debug info, do cleanup and optimizations */ diff --git a/src/cc65/coptadd.c b/src/cc65/coptadd.c index 07bd2bf98..bc67f7a74 100644 --- a/src/cc65/coptadd.c +++ b/src/cc65/coptadd.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2001-2005, Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/cc65/coptcmp.c b/src/cc65/coptcmp.c index 9e9c20502..92401a858 100644 --- a/src/cc65/coptcmp.c +++ b/src/cc65/coptcmp.c @@ -176,14 +176,14 @@ static int IsImmCmp16 (CodeEntry** L) { return (L[0]->OPC == OP65_CPX && L[0]->AM == AM65_IMM && - (L[0]->Flags & CEF_NUMARG) != 0 && + CE_HasNumArg (L[0]) && !CE_HasLabel (L[0]) && (L[1]->OPC == OP65_JNE || L[1]->OPC == OP65_BNE) && L[1]->JumpTo != 0 && !CE_HasLabel (L[1]) && L[2]->OPC == OP65_CMP && L[2]->AM == AM65_IMM && - (L[2]->Flags & CEF_NUMARG) != 0 && + CE_HasNumArg (L[2]) && (L[3]->Info & OF_CBRA) != 0 && L[3]->JumpTo != 0 && (L[1]->JumpTo->Owner == L[3] || L[1]->JumpTo == L[3]->JumpTo)); @@ -309,10 +309,10 @@ unsigned OptCmp1 (CodeSeg* S) /* Insert the ora instead */ X = NewCodeEntry (OP65_ORA, L[0]->AM, L[0]->Arg, 0, L[0]->LI); - CS_InsertEntry (S, X, I); + CS_InsertEntry (S, X, I+3); /* Remove all other instructions */ - CS_DelEntries (S, I+1, 3); + CS_DelEntries (S, I, 3); /* Remember, we had changes */ ++Changes; @@ -448,11 +448,7 @@ unsigned OptCmp3 (CodeSeg* S) Delete = 1; break; - case CMP_UGT: - case CMP_UGE: - case CMP_ULT: - case CMP_ULE: - case CMP_INV: + default: /* Leave it alone */ break; } @@ -819,6 +815,7 @@ unsigned OptCmp8 (CodeSeg* S) /* We are able to evaluate the compare at compile time. Check if ** one or more branches are ahead. */ + unsigned ProtectCompare = 0; unsigned JumpsChanged = 0; CodeEntry* N; while ((N = CS_GetNextEntry (S, I)) != 0 && /* Followed by something.. */ @@ -878,6 +875,21 @@ unsigned OptCmp8 (CodeSeg* S) CodeEntry* X = NewCodeEntry (OP65_JMP, AM65_BRA, LabelName, L, N->LI); CS_InsertEntry (S, X, I+2); CS_DelEntry (S, I+1); + /* Normally we can remove the compare as well, + ** but some comparisons generate code with a + ** shared branch operation. This prevents the unsafe + ** removal of the compare for known problem cases. + */ + if ( + /* Jump to branch that relies on the comparison. */ + (L->Owner->Info & (OF_CBRA | OF_ZBRA)) || + /* Jump to boolean transformer that relies on the comparison. */ + (L->Owner->OPC == OP65_JSR && + (FindBoolCmpCond (L->Owner->Arg)) != CMP_INV) + ) + { + ++ProtectCompare; + } } /* Remember, we had changes */ @@ -885,11 +897,10 @@ unsigned OptCmp8 (CodeSeg* S) ++Changes; } - /* If we have made changes above, we may also remove the compare */ - if (JumpsChanged) { + /* Delete the original compare, if safe to do so. */ + if (JumpsChanged && !ProtectCompare) { CS_DelEntry (S, I); } - } NextEntry: @@ -933,7 +944,9 @@ unsigned OptCmp9 (CodeSeg* S) if (L[0]->OPC == OP65_SBC && CS_GetEntries (S, L+1, I+1, 4) && (L[1]->OPC == OP65_BVC || - L[1]->OPC == OP65_BVS) && + L[1]->OPC == OP65_BVS || + L[1]->OPC == OP65_JVC || + L[1]->OPC == OP65_JVS) && L[1]->JumpTo != 0 && L[1]->JumpTo->Owner == L[3] && L[2]->OPC == OP65_EOR && diff --git a/src/cc65/coptind.c b/src/cc65/coptind.c index ca9d5effd..a080cfb20 100644 --- a/src/cc65/coptind.c +++ b/src/cc65/coptind.c @@ -124,46 +124,6 @@ static int MemAccess (CodeSeg* S, unsigned From, unsigned To, const CodeEntry* N -static int GetBranchDist (CodeSeg* S, unsigned From, CodeEntry* To) -/* Get the branch distance between the two entries and return it. The distance -** will be negative for backward jumps and positive for forward jumps. -*/ -{ - /* Get the index of the branch target */ - unsigned TI = CS_GetEntryIndex (S, To); - - /* Determine the branch distance */ - int Distance = 0; - if (TI >= From) { - /* Forward branch, do not count the current insn */ - unsigned J = From+1; - while (J < TI) { - CodeEntry* N = CS_GetEntry (S, J++); - Distance += N->Size; - } - } else { - /* Backward branch */ - unsigned J = TI; - while (J < From) { - CodeEntry* N = CS_GetEntry (S, J++); - Distance -= N->Size; - } - } - - /* Return the calculated distance */ - return Distance; -} - - - -static int IsShortDist (int Distance) -/* Return true if the given distance is a short branch distance */ -{ - return (Distance >= -125 && Distance <= 125); -} - - - static short ZPRegVal (unsigned short Use, const RegContents* RC) /* Return the contents of the given zeropage register */ { @@ -184,838 +144,6 @@ static short ZPRegVal (unsigned short Use, const RegContents* RC) -static short RegVal (unsigned short Use, const RegContents* RC) -/* Return the contents of the given register */ -{ - if ((Use & REG_A) != 0) { - return RC->RegA; - } else if ((Use & REG_X) != 0) { - return RC->RegX; - } else if ((Use & REG_Y) != 0) { - return RC->RegY; - } else { - return ZPRegVal (Use, RC); - } -} - - - -/*****************************************************************************/ -/* Replace jumps to RTS by RTS */ -/*****************************************************************************/ - - - -unsigned OptRTSJumps1 (CodeSeg* S) -/* Replace jumps to RTS by RTS */ -{ - unsigned Changes = 0; - - /* Walk over all entries minus the last one */ - unsigned I = 0; - while (I < CS_GetEntryCount (S)) { - - /* Get the next entry */ - CodeEntry* E = CS_GetEntry (S, I); - - /* Check if it's an unconditional branch to a local target */ - if ((E->Info & OF_UBRA) != 0 && - E->JumpTo != 0 && - E->JumpTo->Owner->OPC == OP65_RTS) { - - /* Insert an RTS instruction */ - CodeEntry* X = NewCodeEntry (OP65_RTS, AM65_IMP, 0, 0, E->LI); - CS_InsertEntry (S, X, I+1); - - /* Delete the jump */ - CS_DelEntry (S, I); - - /* Remember, we had changes */ - ++Changes; - - } - - /* Next entry */ - ++I; - - } - - /* Return the number of changes made */ - return Changes; -} - - - -unsigned OptRTSJumps2 (CodeSeg* S) -/* Replace long conditional jumps to RTS or to a final target */ -{ - unsigned Changes = 0; - - /* Walk over all entries minus the last one */ - unsigned I = 0; - while (I < CS_GetEntryCount (S) - 1) { - - /* Get the next entry */ - CodeEntry* E = CS_GetEntry (S, I); - - /* Check if it's an conditional branch to a local target */ - if ((E->Info & OF_CBRA) != 0 && /* Conditional branch */ - (E->Info & OF_LBRA) != 0 && /* Long branch */ - E->JumpTo != 0) { /* Local label */ - - - /* Get the jump target and the next entry. There's always a next - ** entry, because we don't cover the last entry in the loop. - */ - CodeEntry* X = 0; - CodeEntry* T = E->JumpTo->Owner; - CodeEntry* N = CS_GetNextEntry (S, I); - - /* Check if it's a jump to an RTS insn */ - if (T->OPC == OP65_RTS) { - - /* It's a jump to RTS. Create a conditional branch around an - ** RTS insn. - */ - X = NewCodeEntry (OP65_RTS, AM65_IMP, 0, 0, T->LI); - - } else if (T->OPC == OP65_JMP && T->JumpTo == 0) { - - /* It's a jump to a label outside the function. Create a - ** conditional branch around a jump to the external label. - */ - X = NewCodeEntry (OP65_JMP, AM65_ABS, T->Arg, T->JumpTo, T->LI); - - } - - /* If we have a replacement insn, insert it */ - if (X) { - - CodeLabel* LN; - opc_t NewBranch; - - /* Insert the new insn */ - CS_InsertEntry (S, X, I+1); - - /* Create a conditional branch with the inverse condition - ** around the replacement insn - */ - - /* Get the new branch opcode */ - NewBranch = MakeShortBranch (GetInverseBranch (E->OPC)); - - /* Get the label attached to N, create a new one if needed */ - LN = CS_GenLabel (S, N); - - /* Generate the branch */ - X = NewCodeEntry (NewBranch, AM65_BRA, LN->Name, LN, E->LI); - CS_InsertEntry (S, X, I+1); - - /* Delete the long branch */ - CS_DelEntry (S, I); - - /* Remember, we had changes */ - ++Changes; - - } - } - - /* Next entry */ - ++I; - - } - - /* Return the number of changes made */ - return Changes; -} - - - -/*****************************************************************************/ -/* Remove dead jumps */ -/*****************************************************************************/ - - - -unsigned OptDeadJumps (CodeSeg* S) -/* Remove dead jumps (jumps to the next instruction) */ -{ - unsigned Changes = 0; - - /* Walk over all entries minus the last one */ - unsigned I = 0; - while (I < CS_GetEntryCount (S)) { - - /* Get the next entry */ - CodeEntry* E = CS_GetEntry (S, I); - - /* Check if it's a branch, if it has a local target, and if the target - ** is the next instruction. - */ - if (E->AM == AM65_BRA && - E->JumpTo && - E->JumpTo->Owner == CS_GetNextEntry (S, I)) { - - /* Delete the dead jump */ - CS_DelEntry (S, I); - - /* Remember, we had changes */ - ++Changes; - - } else { - - /* Next entry */ - ++I; - - } - } - - /* Return the number of changes made */ - return Changes; -} - - - -/*****************************************************************************/ -/* Remove dead code */ -/*****************************************************************************/ - - - -unsigned OptDeadCode (CodeSeg* S) -/* Remove dead code (code that follows an unconditional jump or an rts/rti -** and has no label) -*/ -{ - unsigned Changes = 0; - - /* Walk over all entries */ - unsigned I = 0; - while (I < CS_GetEntryCount (S)) { - - CodeEntry* N; - CodeLabel* LN; - - /* Get this entry */ - CodeEntry* E = CS_GetEntry (S, I); - - /* Check if it's an unconditional branch, and if the next entry has - ** no labels attached, or if the label is just used so that the insn - ** can jump to itself. - */ - if ((E->Info & OF_DEAD) != 0 && /* Dead code follows */ - (N = CS_GetNextEntry (S, I)) != 0 && /* Has next entry */ - (!CE_HasLabel (N) || /* Don't has a label */ - ((N->Info & OF_UBRA) != 0 && /* Uncond branch */ - (LN = N->JumpTo) != 0 && /* Jumps to known label */ - LN->Owner == N && /* Attached to insn */ - CL_GetRefCount (LN) == 1))) { /* Only reference */ - - /* Delete the next entry */ - CS_DelEntry (S, I+1); - - /* Remember, we had changes */ - ++Changes; - - } else { - - /* Next entry */ - ++I; - - } - } - - /* Return the number of changes made */ - return Changes; -} - - - -/*****************************************************************************/ -/* Optimize jump cascades */ -/*****************************************************************************/ - - - -unsigned OptJumpCascades (CodeSeg* S) -/* Optimize jump cascades (jumps to jumps). In such a case, the jump is -** replaced by a jump to the final location. This will in some cases produce -** worse code, because some jump targets are no longer reachable by short -** branches, but this is quite rare, so there are more advantages than -** disadvantages. -*/ -{ - unsigned Changes = 0; - - /* Walk over all entries */ - unsigned I = 0; - while (I < CS_GetEntryCount (S)) { - - CodeEntry* N; - CodeLabel* OldLabel; - - /* Get this entry */ - CodeEntry* E = CS_GetEntry (S, I); - - /* Check: - ** - if it's a branch, - ** - if it has a jump label, - ** - if this jump label is not attached to the instruction itself, - ** - if the target instruction is itself a branch, - ** - if either the first branch is unconditional or the target of - ** the second branch is internal to the function. - ** The latter condition will avoid conditional branches to targets - ** outside of the function (usually incspx), which won't simplify the - ** code, since conditional far branches are emulated by a short branch - ** around a jump. - */ - if ((E->Info & OF_BRA) != 0 && - (OldLabel = E->JumpTo) != 0 && - (N = OldLabel->Owner) != E && - (N->Info & OF_BRA) != 0 && - ((E->Info & OF_CBRA) == 0 || - N->JumpTo != 0)) { - - /* Check if we can use the final target label. That is the case, - ** if the target branch is an absolute branch; or, if it is a - ** conditional branch checking the same condition as the first one. - */ - if ((N->Info & OF_UBRA) != 0 || - ((E->Info & OF_CBRA) != 0 && - GetBranchCond (E->OPC) == GetBranchCond (N->OPC))) { - - /* This is a jump cascade and we may jump to the final target, - ** provided that the other insn does not jump to itself. If - ** this is the case, we can also jump to ourselves, otherwise - ** insert a jump to the new instruction and remove the old one. - */ - CodeEntry* X; - CodeLabel* LN = N->JumpTo; - - if (LN != 0 && LN->Owner == N) { - - /* We found a jump to a jump to itself. Replace our jump - ** by a jump to itself. - */ - CodeLabel* LE = CS_GenLabel (S, E); - X = NewCodeEntry (E->OPC, E->AM, LE->Name, LE, E->LI); - - } else { - - /* Jump to the final jump target */ - X = NewCodeEntry (E->OPC, E->AM, N->Arg, N->JumpTo, E->LI); - - } - - /* Insert it behind E */ - CS_InsertEntry (S, X, I+1); - - /* Remove E */ - CS_DelEntry (S, I); - - /* Remember, we had changes */ - ++Changes; - - /* Check if both are conditional branches, and the condition of - ** the second is the inverse of that of the first. In this case, - ** the second branch will never be taken, and we may jump directly - ** to the instruction behind this one. - */ - } else if ((E->Info & OF_CBRA) != 0 && (N->Info & OF_CBRA) != 0) { - - CodeEntry* X; /* Instruction behind N */ - CodeLabel* LX; /* Label attached to X */ - - /* Get the branch conditions of both branches */ - bc_t BC1 = GetBranchCond (E->OPC); - bc_t BC2 = GetBranchCond (N->OPC); - - /* Check the branch conditions */ - if (BC1 != GetInverseCond (BC2)) { - /* Condition not met */ - goto NextEntry; - } - - /* We may jump behind this conditional branch. Get the - ** pointer to the next instruction - */ - if ((X = CS_GetNextEntry (S, CS_GetEntryIndex (S, N))) == 0) { - /* N is the last entry, bail out */ - goto NextEntry; - } - - /* Get the label attached to X, create a new one if needed */ - LX = CS_GenLabel (S, X); - - /* Move the reference from E to the new label */ - CS_MoveLabelRef (S, E, LX); - - /* Remember, we had changes */ - ++Changes; - } - } - -NextEntry: - /* Next entry */ - ++I; - - } - - /* Return the number of changes made */ - return Changes; -} - - - -/*****************************************************************************/ -/* Optimize jsr/rts */ -/*****************************************************************************/ - - - -unsigned OptRTS (CodeSeg* S) -/* Optimize subroutine calls followed by an RTS. The subroutine call will get -** replaced by a jump. Don't bother to delete the RTS if it does not have a -** label, the dead code elimination should take care of it. -*/ -{ - unsigned Changes = 0; - - /* Walk over all entries minus the last one */ - unsigned I = 0; - while (I < CS_GetEntryCount (S)) { - - CodeEntry* N; - - /* Get this entry */ - CodeEntry* E = CS_GetEntry (S, I); - - /* Check if it's a subroutine call and if the following insn is RTS */ - if (E->OPC == OP65_JSR && - (N = CS_GetNextEntry (S, I)) != 0 && - N->OPC == OP65_RTS) { - - /* Change the jsr to a jmp and use the additional info for a jump */ - E->AM = AM65_BRA; - CE_ReplaceOPC (E, OP65_JMP); - - /* Remember, we had changes */ - ++Changes; - - } - - /* Next entry */ - ++I; - - } - - /* Return the number of changes made */ - return Changes; -} - - - -/*****************************************************************************/ -/* Optimize jump targets */ -/*****************************************************************************/ - - - -unsigned OptJumpTarget1 (CodeSeg* S) -/* If the instruction preceeding an unconditional branch is the same as the -** instruction preceeding the jump target, the jump target may be moved -** one entry back. This is a size optimization, since the instruction before -** the branch gets removed. -*/ -{ - unsigned Changes = 0; - CodeEntry* E1; /* Entry 1 */ - CodeEntry* E2; /* Entry 2 */ - CodeEntry* T1; /* Jump target entry 1 */ - CodeLabel* TL1; /* Target label 1 */ - - /* Walk over the entries */ - unsigned I = 0; - while (I < CS_GetEntryCount (S)) { - - /* Get next entry */ - E2 = CS_GetNextEntry (S, I); - - /* Check if we have a jump or branch without a label attached, and - ** a jump target, which is not attached to the jump itself - */ - if (E2 != 0 && - (E2->Info & OF_UBRA) != 0 && - !CE_HasLabel (E2) && - E2->JumpTo && - E2->JumpTo->Owner != E2) { - - /* Get the entry preceeding the branch target */ - T1 = CS_GetPrevEntry (S, CS_GetEntryIndex (S, E2->JumpTo->Owner)); - if (T1 == 0) { - /* There is no such entry */ - goto NextEntry; - } - - /* The entry preceeding the branch target may not be the branch - ** insn. - */ - if (T1 == E2) { - goto NextEntry; - } - - /* Get the entry preceeding the jump */ - E1 = CS_GetEntry (S, I); - - /* Check if both preceeding instructions are identical */ - if (!CodeEntriesAreEqual (E1, T1)) { - /* Not equal, try next */ - goto NextEntry; - } - - /* Get the label for the instruction preceeding the jump target. - ** This routine will create a new label if the instruction does - ** not already have one. - */ - TL1 = CS_GenLabel (S, T1); - - /* Change the jump target to point to this new label */ - CS_MoveLabelRef (S, E2, TL1); - - /* If the instruction preceeding the jump has labels attached, - ** move references to this label to the new label. - */ - if (CE_HasLabel (E1)) { - CS_MoveLabels (S, E1, T1); - } - - /* Remove the entry preceeding the jump */ - CS_DelEntry (S, I); - - /* Remember, we had changes */ - ++Changes; - - } else { -NextEntry: - /* Next entry */ - ++I; - } - } - - /* Return the number of changes made */ - return Changes; -} - - - -unsigned OptJumpTarget2 (CodeSeg* S) -/* If a bcs jumps to a sec insn or a bcc jumps to clc, skip this insn, since -** it's job is already done. -*/ -{ - unsigned Changes = 0; - - /* Walk over the entries */ - unsigned I = 0; - while (I < CS_GetEntryCount (S)) { - - /* OP that may be skipped */ - opc_t OPC; - - /* Jump target insn, old and new */ - CodeEntry* T; - CodeEntry* N; - - /* New jump label */ - CodeLabel* L; - - /* Get next entry */ - CodeEntry* E = CS_GetEntry (S, I); - - /* Check if this is a bcc insn */ - if (E->OPC == OP65_BCC || E->OPC == OP65_JCC) { - OPC = OP65_CLC; - } else if (E->OPC == OP65_BCS || E->OPC == OP65_JCS) { - OPC = OP65_SEC; - } else { - /* Not what we're looking for */ - goto NextEntry; - } - - /* Must have a jump target */ - if (E->JumpTo == 0) { - goto NextEntry; - } - - /* Get the owner insn of the jump target and check if it's the one, we - ** will skip if present. - */ - T = E->JumpTo->Owner; - if (T->OPC != OPC) { - goto NextEntry; - } - - /* Get the entry following the branch target */ - N = CS_GetNextEntry (S, CS_GetEntryIndex (S, T)); - if (N == 0) { - /* There is no such entry */ - goto NextEntry; - } - - /* Get the label for the instruction following the jump target. - ** This routine will create a new label if the instruction does - ** not already have one. - */ - L = CS_GenLabel (S, N); - - /* Change the jump target to point to this new label */ - CS_MoveLabelRef (S, E, L); - - /* Remember that we had changes */ - ++Changes; - -NextEntry: - /* Next entry */ - ++I; - } - - /* Return the number of changes made */ - return Changes; -} - - - -unsigned OptJumpTarget3 (CodeSeg* S) -/* Jumps to load instructions of a register, that do already have the matching -** register contents may skip the load instruction, since it's job is already -** done. -*/ -{ - unsigned Changes = 0; - unsigned I; - - /* Walk over the entries */ - I = 0; - while (I < CS_GetEntryCount (S)) { - - CodeEntry* N; - - /* Get next entry */ - CodeEntry* E = CS_GetEntry (S, I); - - /* Check if this is a load insn with a label and the next insn is not - ** a conditional branch that needs the flags from the load. - */ - if ((E->Info & OF_LOAD) != 0 && - CE_IsConstImm (E) && - CE_HasLabel (E) && - (N = CS_GetNextEntry (S, I)) != 0 && - !CE_UseLoadFlags (N)) { - - unsigned J; - int K; - - /* New jump label */ - CodeLabel* LN = 0; - - /* Walk over all insn that jump here */ - for (J = 0; J < CE_GetLabelCount (E); ++J) { - - /* Get the label */ - CodeLabel* L = CE_GetLabel (E, J); - - /* Loop over all insn that reference this label. Since we may - ** eventually remove a reference in the loop, we must loop - ** from end down to start. - */ - for (K = CL_GetRefCount (L) - 1; K >= 0; --K) { - - /* Get the entry that jumps here */ - CodeEntry* Jump = CL_GetRef (L, K); - - /* Get the register info from this insn */ - short Val = RegVal (E->Chg, &Jump->RI->Out2); - - /* Check if the outgoing value is the one thats's loaded */ - if (Val == (unsigned char) E->Num) { - - /* OK, skip the insn. First, generate a label for the - ** next insn after E. - */ - if (LN == 0) { - LN = CS_GenLabel (S, N); - } - - /* Change the jump target to point to this new label */ - CS_MoveLabelRef (S, Jump, LN); - - /* Remember that we had changes */ - ++Changes; - } - } - } - - } - - /* Next entry */ - ++I; - } - - /* Return the number of changes made */ - return Changes; -} - - - -/*****************************************************************************/ -/* Optimize conditional branches */ -/*****************************************************************************/ - - - -unsigned OptCondBranches1 (CodeSeg* S) -/* Performs several optimization steps: -** -** - If an immediate load of a register is followed by a conditional jump that -** is never taken because the load of the register sets the flags in such a -** manner, remove the conditional branch. -** - If the conditional branch is always taken because of the register load, -** replace it by a jmp. -** - If a conditional branch jumps around an unconditional branch, remove the -** conditional branch and make the jump a conditional branch with the -** inverse condition of the first one. -*/ -{ - unsigned Changes = 0; - - /* Walk over the entries */ - unsigned I = 0; - while (I < CS_GetEntryCount (S)) { - - CodeEntry* N; - CodeLabel* L; - - /* Get next entry */ - CodeEntry* E = CS_GetEntry (S, I); - - /* Check if it's a register load */ - if ((E->Info & OF_LOAD) != 0 && /* It's a load instruction */ - E->AM == AM65_IMM && /* ..with immidiate addressing */ - (E->Flags & CEF_NUMARG) != 0 && /* ..and a numeric argument. */ - (N = CS_GetNextEntry (S, I)) != 0 && /* There is a following entry */ - (N->Info & OF_CBRA) != 0 && /* ..which is a conditional branch */ - !CE_HasLabel (N)) { /* ..and does not have a label */ - - /* Get the branch condition */ - bc_t BC = GetBranchCond (N->OPC); - - /* Check the argument against the branch condition */ - if ((BC == BC_EQ && E->Num != 0) || - (BC == BC_NE && E->Num == 0) || - (BC == BC_PL && (E->Num & 0x80) != 0) || - (BC == BC_MI && (E->Num & 0x80) == 0)) { - - /* Remove the conditional branch */ - CS_DelEntry (S, I+1); - - /* Remember, we had changes */ - ++Changes; - - } else if ((BC == BC_EQ && E->Num == 0) || - (BC == BC_NE && E->Num != 0) || - (BC == BC_PL && (E->Num & 0x80) == 0) || - (BC == BC_MI && (E->Num & 0x80) != 0)) { - - /* The branch is always taken, replace it by a jump */ - CE_ReplaceOPC (N, OP65_JMP); - - /* Remember, we had changes */ - ++Changes; - } - - } - - if ((E->Info & OF_CBRA) != 0 && /* It's a conditional branch */ - (L = E->JumpTo) != 0 && /* ..referencing a local label */ - (N = CS_GetNextEntry (S, I)) != 0 && /* There is a following entry */ - (N->Info & OF_UBRA) != 0 && /* ..which is an uncond branch, */ - !CE_HasLabel (N) && /* ..has no label attached */ - L->Owner == CS_GetNextEntry (S, I+1)) { /* ..and jump target follows */ - - /* Replace the jump by a conditional branch with the inverse branch - ** condition than the branch around it. - */ - CE_ReplaceOPC (N, GetInverseBranch (E->OPC)); - - /* Remove the conditional branch */ - CS_DelEntry (S, I); - - /* Remember, we had changes */ - ++Changes; - - } - - /* Next entry */ - ++I; - - } - - /* Return the number of changes made */ - return Changes; -} - - - -unsigned OptCondBranches2 (CodeSeg* S) -/* If on entry to a "rol a" instruction the accu is zero, and a beq/bne follows, -** we can remove the rol and branch on the state of the carry flag. -*/ -{ - unsigned Changes = 0; - unsigned I; - - /* Walk over the entries */ - I = 0; - while (I < CS_GetEntryCount (S)) { - - CodeEntry* N; - - /* Get next entry */ - CodeEntry* E = CS_GetEntry (S, I); - - /* Check if it's a rol insn with A in accu and a branch follows */ - if (E->OPC == OP65_ROL && - E->AM == AM65_ACC && - E->RI->In.RegA == 0 && - !CE_HasLabel (E) && - (N = CS_GetNextEntry (S, I)) != 0 && - (N->Info & OF_ZBRA) != 0 && - !RegAUsed (S, I+1)) { - - /* Replace the branch condition */ - switch (GetBranchCond (N->OPC)) { - case BC_EQ: CE_ReplaceOPC (N, OP65_JCC); break; - case BC_NE: CE_ReplaceOPC (N, OP65_JCS); break; - default: Internal ("Unknown branch condition in OptCondBranches2"); - } - - /* Delete the rol insn */ - CS_DelEntry (S, I); - - /* Remember, we had changes */ - ++Changes; - } - - /* Next entry */ - ++I; - } - - /* Return the number of changes made */ - return Changes; -} - - - /*****************************************************************************/ /* Remove unused loads and stores */ /*****************************************************************************/ @@ -1132,6 +260,70 @@ unsigned OptUnusedStores (CodeSeg* S) +unsigned OptLoad3 (CodeSeg* S) +/* Remove repeated loads from one and the same memory location */ +{ + unsigned Changes = 0; + CodeEntry* Load = 0; + + /* Walk over the entries */ + unsigned I = 0; + while (I < CS_GetEntryCount (S)) { + + /* Get next entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Forget a preceeding load if we have a label */ + if (Load && CE_HasLabel (E)) { + Load = 0; + } + + /* Check if this insn is a load */ + if (E->Info & OF_LOAD) { + + CodeEntry* N; + + /* If we had a preceeding load that is identical, remove this one. + ** If it is not identical, or we didn't have one, remember it. + */ + if (Load != 0 && + E->OPC == Load->OPC && + E->AM == Load->AM && + ((E->Arg == 0 && Load->Arg == 0) || + strcmp (E->Arg, Load->Arg) == 0) && + (N = CS_GetNextEntry (S, I)) != 0 && + (N->Info & OF_CBRA) == 0) { + + /* Now remove the call to the subroutine */ + CS_DelEntry (S, I); + + /* Remember, we had changes */ + ++Changes; + + /* Next insn */ + continue; + + } else { + + Load = E; + + } + + } else if ((E->Info & OF_CMP) == 0 && (E->Info & OF_CBRA) == 0) { + /* Forget the first load on occurance of any insn we don't like */ + Load = 0; + } + + /* Next entry */ + ++I; + } + + /* Return the number of changes made */ + return Changes; +} + + + unsigned OptDupLoads (CodeSeg* S) /* Remove loads of registers where the value loaded is already in the register. */ { @@ -1147,8 +339,9 @@ unsigned OptDupLoads (CodeSeg* S) /* Get next entry */ CodeEntry* E = CS_GetEntry (S, I); - /* Assume we won't delete the entry */ + /* Assume we won't delete or replace the entry */ int Delete = 0; + opc_t NewOPC = OP65_INVALID; /* Get a pointer to the input registers of the insn */ const RegContents* In = &E->RI->In; @@ -1218,7 +411,7 @@ unsigned OptDupLoads (CodeSeg* S) E->AM != AM65_ABSY && E->AM != AM65_ZPY) { /* Use the A register instead */ - CE_ReplaceOPC (E, OP65_STA); + NewOPC = OP65_STA; } break; @@ -1242,11 +435,11 @@ unsigned OptDupLoads (CodeSeg* S) */ } else if (RegValIsKnown (In->RegY)) { if (In->RegY == In->RegA) { - CE_ReplaceOPC (E, OP65_STA); + NewOPC = OP65_STA; } else if (In->RegY == In->RegX && E->AM != AM65_ABSX && E->AM != AM65_ZPX) { - CE_ReplaceOPC (E, OP65_STX); + NewOPC = OP65_STX; } } break; @@ -1319,6 +512,14 @@ unsigned OptDupLoads (CodeSeg* S) } else { + if (NewOPC != OP65_INVALID) { + /* Replace the opcode */ + CE_ReplaceOPC (E, NewOPC); + + /* Remember, we had changes */ + ++Changes; + } + /* Next entry */ ++I; @@ -1471,7 +672,7 @@ unsigned OptTransfers2 (CodeSeg* S) (N = CS_GetNextEntry (S, I)) != 0 && !CE_HasLabel (N) && (N->Info & OF_XFR) != 0 && - GetRegInfo (S, I+2, E->Chg) != E->Chg) { + (GetRegInfo (S, I+2, E->Chg & REG_ALL) & E->Chg & REG_ALL) == 0) { CodeEntry* X = 0; @@ -1595,7 +796,7 @@ unsigned OptTransfers3 (CodeSeg* S) } /* Does this insn change the target register of the transfer? */ - } else if (E->Chg & XferEntry->Chg) { + } else if (E->Chg & XferEntry->Chg & ~PSTATE_ZN) { /* We *may* add code here to remove the transfer, but I'm ** currently not sure about the consequences, so I won't @@ -1622,8 +823,9 @@ unsigned OptTransfers3 (CodeSeg* S) ** isn't used later, and we have an address mode match, we can ** replace the transfer by a store and remove the store here. */ - if ((GetRegInfo (S, I, XferEntry->Chg) & XferEntry->Chg) == 0 && - (StoreEntry->AM == AM65_ABS || + if ((GetRegInfo (S, I, XferEntry->Chg & REG_ALL) & + XferEntry->Chg & REG_ALL) == 0 && + (StoreEntry->AM == AM65_ABS || StoreEntry->AM == AM65_ZP) && (StoreEntry->AM != AM65_ZP || (StoreEntry->Chg & UsedRegs) == 0) && @@ -1772,7 +974,7 @@ unsigned OptTransfers4 (CodeSeg* S) } /* Does this insn change the target register of the load? */ - } else if (E->Chg & LoadEntry->Chg) { + } else if (E->Chg & LoadEntry->Chg & ~PSTATE_ZN) { /* We *may* add code here to remove the load, but I'm ** currently not sure about the consequences, so I won't @@ -1788,9 +990,10 @@ unsigned OptTransfers4 (CodeSeg* S) ** isn't used later, and we have an address mode match, we can ** replace the transfer by a load and remove the initial load. */ - if ((GetRegInfo (S, I, LoadEntry->Chg) & LoadEntry->Chg) == 0 && - (LoadEntry->AM == AM65_ABS || - LoadEntry->AM == AM65_ZP || + if ((GetRegInfo (S, I, LoadEntry->Chg & REG_ALL) & + LoadEntry->Chg & REG_ALL) == 0 && + (LoadEntry->AM == AM65_ABS || + LoadEntry->AM == AM65_ZP || LoadEntry->AM == AM65_IMM) && !MemAccess (S, Load+1, Xfer-1, LoadEntry)) { @@ -1866,8 +1069,8 @@ unsigned OptTransfers4 (CodeSeg* S) -unsigned OptPushPop (CodeSeg* S) -/* Remove a PHA/PLA sequence were A is not used later */ +unsigned OptPushPop1 (CodeSeg* S) +/* Remove a PHA/PLA sequence were A not used later */ { unsigned Changes = 0; unsigned Push = 0; /* Index of push insn */ @@ -1892,6 +1095,7 @@ unsigned OptPushPop (CodeSeg* S) while (I < CS_GetEntryCount (S)) { CodeEntry* X; + CodeEntry* N; /* Get next entry */ CodeEntry* E = CS_GetEntry (S, I); @@ -1944,11 +1148,13 @@ unsigned OptPushPop (CodeSeg* S) if (E->OPC == OP65_STA && (E->AM == AM65_ABS || E->AM == AM65_ZP) && !CE_HasLabel (E) && - !RegAUsed (S, I+1) && + ((N = CS_GetNextEntry (S, I)) == 0 || + (!CE_UseLoadFlags (N) && + !RegAUsed (S, I+1))) && !MemAccess (S, Push+1, Pop-1, E)) { /* Insert a STA after the PHA */ - X = NewCodeEntry (E->OPC, E->AM, E->Arg, E->JumpTo, E->LI); + X = NewCodeEntry (OP65_STA, E->AM, E->Arg, E->JumpTo, E->LI); CS_InsertEntry (S, X, Push+1); /* Remove the PHA instead */ @@ -1963,7 +1169,7 @@ unsigned OptPushPop (CodeSeg* S) /* Remember we had changes */ ++Changes; - } else if ((E->Info & OF_CBRA) == 0 && + } else if (!CE_UseLoadFlags (E) && (!RegAUsed (S, I) || !ChgA)) { /* We can remove the PHA and PLA instructions */ @@ -1993,6 +1199,95 @@ unsigned OptPushPop (CodeSeg* S) +unsigned OptPushPop2 (CodeSeg* S) +/* Remove a PHP/PLP sequence were no processor flags changed inside */ +{ + unsigned Changes = 0; + unsigned Push = 0; /* Index of push insn */ + unsigned Pop = 0; /* Index of pop insn */ + enum { + Searching, + FoundPush, + FoundPop + } State = Searching; + + /* Walk over the entries. Look for a push instruction that is followed by + ** a pop later, where the pop is not followed by an conditional branch, + ** and where the value of the A register is not used later on. + ** Look out for the following problems: + ** + ** - There may be another PHP/PLP inside the sequence: Restart it. + ** - All jumps inside the sequence must not go outside the sequence, + ** otherwise it would be too complicated to remove the PHP/PLP. + */ + unsigned I = 0; + while (I < CS_GetEntryCount (S)) { + + /* Get next entry */ + CodeEntry* E = CS_GetEntry (S, I); + + switch (State) { + + case Searching: + if (E->OPC == OP65_PHP) { + /* Found start of sequence */ + Push = I; + State = FoundPush; + } + break; + + case FoundPush: + if (E->OPC == OP65_PHP) { + /* Inner push/pop, restart */ + Push = I; + } else if (E->OPC == OP65_PLP) { + /* Found a matching pop */ + Pop = I; + /* Check that the block between Push and Pop is a basic + ** block (one entry, one exit). Otherwise ignore it. + */ + if (CS_IsBasicBlock (S, Push, Pop)) { + State = FoundPop; + } else { + /* Go into searching mode again */ + State = Searching; + } + } else if ((E->Info & OF_BRA) == 0 && + (E->Info & OF_STORE) == 0 && + E->OPC != OP65_NOP && + E->OPC != OP65_TSX) { + /* Don't bother skipping dead code */ + State = Searching; + } + break; + + case FoundPop: + /* We can remove the PHP and PLP instructions */ + CS_DelEntry (S, Pop); + CS_DelEntry (S, Push); + + /* Correct I so we continue with THIS insn */ + I -= 3; + + /* Remember we had changes */ + ++Changes; + + /* Go into search mode again */ + State = Searching; + break; + + } + + /* Next entry */ + ++I; + } + + /* Return the number of changes made */ + return Changes; +} + + + unsigned OptPrecalc (CodeSeg* S) /* Replace immediate operations with the accu where the current contents are ** known by a load of the final value. @@ -2042,30 +1337,70 @@ unsigned OptPrecalc (CodeSeg* S) } break; - case OP65_EOR: - if (RegValIsKnown (Out->RegA)) { - /* Accu op zp with known contents */ - Arg = MakeHexArg (Out->RegA); - } - break; - case OP65_ADC: case OP65_SBC: - /* If this is an operation with an immediate operand of zero, - ** and the register is zero, the operation won't give us any - ** results we don't already have (including the flags), so - ** remove it. Something like this is generated as a result of - ** a compare where parts of the values are known to be zero. - */ - if (In->RegA == 0 && CE_IsKnownImm (E, 0x00)) { - /* 0-0 or 0+0 -> remove */ - CS_DelEntry (S, I); - ++Changes; + if (CE_IsKnownImm (E, 0x00)) { + /* If this is an operation with an immediate operand of zero, + ** and the Z/N flags reflect the current states of the content + ** in A, then the operation won't give us any results we don't + ** already have (including the flags) as long as the C flag is + ** set normally (cleared for ADC and set for SBC) for the + ** operation. So we can remove the operation if it is the + ** normal case or the result in A is not used later. + ** Something like this is generated as a result of a compare + ** where parts of the values are known to be zero. + ** The only situation where we need to leave things as they + ** are is when an indeterminate V flag is being tested later, + ** because ADC/SBC #0 always clears it. + */ + int CondC = PStatesAreKnown (In->PFlags, PSTATE_C) && + ((E->OPC == OP65_ADC && (In->PFlags & PFVAL_C) == 0) || + (E->OPC == OP65_SBC && (In->PFlags & PFVAL_C) != 0)); + int CondV = PStatesAreKnown (In->PFlags, PSTATE_V) && (In->PFlags & PFVAL_V) == 0; + int CondZN = (In->ZNRegs & ZNREG_A) != 0; + unsigned R = 0; + if (CondC) { + R = (CondV ? 0 : PSTATE_V) | (CondZN ? 0 : PSTATE_ZN); + } else { + R = REG_A | PSTATE_CZVN; + } + if (R != 0) { + /* Collect info on all flags in one round to save time */ + R = GetRegInfo (S, I + 1, R); + } + CondV = (CondC && CondV) || (R & PSTATE_V) == 0; + CondZN = (CondC && CondZN) || (R & PSTATE_ZN) == 0; + /* This is done last as it could change the info used by the two above */ + CondC = CondC || (R & (REG_A | PSTATE_C)) == 0; + if (CondC && CondV && CondZN) { + /* ?+0, ?-0 or result unused -> remove */ + CS_DelEntry (S, I); + ++Changes; + } + } else if (E->OPC == OP65_ADC && In->RegA == 0) { + /* 0 + arg. In this case we need only care about the C/V flags and + ** let the load set the Z/N flags properly. + */ + int CondC = PStatesAreClear (In->PFlags, PSTATE_C); + int CondV = PStatesAreClear (In->PFlags, PSTATE_V); + unsigned R = (CondC ? 0 : REG_A | PSTATE_C) | (CondC && CondV ? 0 : PSTATE_V); + if (R) { + R = GetRegInfo (S, I + 1, R); + } + CondV = (CondC && CondV) || (R & PSTATE_V) == 0; + CondC = CondC || (R & (REG_A | PSTATE_C)) == 0; + if (CondC && CondV) { + /* 0 + arg -> replace with lda arg */ + CE_ReplaceOPC (E, OP65_LDA); + ++Changes; + } } break; case OP65_AND: - if (CE_IsKnownImm (E, 0xFF)) { + if (CE_IsKnownImm (E, 0xFF) && + ((In->ZNRegs & ZNREG_A) != 0 || + (GetRegInfo (S, I + 1, PSTATE_ZN) & PSTATE_ZN) == 0)) { /* AND with 0xFF, remove */ CS_DelEntry (S, I); ++Changes; @@ -2083,7 +1418,9 @@ unsigned OptPrecalc (CodeSeg* S) break; case OP65_ORA: - if (CE_IsKnownImm (E, 0x00)) { + if (CE_IsKnownImm (E, 0x00) && + ((In->ZNRegs & ZNREG_A) != 0 || + (GetRegInfo (S, I + 1, PSTATE_ZN) & PSTATE_ZN) == 0)) { /* ORA with zero, remove */ CS_DelEntry (S, I); ++Changes; @@ -2100,6 +1437,23 @@ unsigned OptPrecalc (CodeSeg* S) } break; + case OP65_EOR: + if (CE_IsKnownImm (E, 0x00) && + ((In->ZNRegs & ZNREG_A) != 0 || + (GetRegInfo (S, I + 1, PSTATE_ZN) & PSTATE_ZN) == 0)) { + /* EOR with zero, remove */ + CS_DelEntry (S, I); + ++Changes; + } else if (RegValIsKnown (Out->RegA)) { + /* Accu op zp with known contents */ + Arg = MakeHexArg (Out->RegA); + } else if (In->RegA == 0) { + /* EOR but A contains 0x00 - replace by lda */ + CE_ReplaceOPC (E, OP65_LDA); + ++Changes; + } + break; + default: break; @@ -2123,60 +1477,45 @@ unsigned OptPrecalc (CodeSeg* S) -/*****************************************************************************/ -/* Optimize branch types */ -/*****************************************************************************/ - - - -unsigned OptBranchDist (CodeSeg* S) -/* Change branches for the distance needed. */ +unsigned OptShiftBack (CodeSeg* S) +/* Remove a pair of shifts to the opposite directions if none of the bits of +** the register A or the Z/N flags modified by these shifts are used later. +*/ { unsigned Changes = 0; + CodeEntry* E; + CodeEntry* N; + unsigned CheckStates; /* Walk over the entries */ unsigned I = 0; while (I < CS_GetEntryCount (S)) { /* Get next entry */ - CodeEntry* E = CS_GetEntry (S, I); + E = CS_GetEntry (S, I); - /* Check if it's a conditional branch to a local label. */ - if (E->Info & OF_CBRA) { + /* Check if it's a register load or transfer insn */ + if (E->OPC == OP65_ROL && + (N = CS_GetNextEntry (S, I)) != 0 && + (N->OPC == OP65_LSR || + N->OPC == OP65_ROR) && + !CE_HasLabel (N)) { + CheckStates = PSTATE_ZN; + if (N->OPC == OP65_LSR && + !PStatesAreClear (E->RI->Out.PFlags, PSTATE_C)) { + CheckStates |= REG_A; + } + if ((GetRegInfo (S, I+2, CheckStates) & CheckStates) == 0) { - /* Is this a branch to a local symbol? */ - if (E->JumpTo != 0) { + /* Remove the shifts */ + CS_DelEntries (S, I, 2); - /* Check if the branch distance is short */ - int IsShort = IsShortDist (GetBranchDist (S, I, E->JumpTo->Owner)); - - /* Make the branch short/long according to distance */ - if ((E->Info & OF_LBRA) == 0 && !IsShort) { - /* Short branch but long distance */ - CE_ReplaceOPC (E, MakeLongBranch (E->OPC)); - ++Changes; - } else if ((E->Info & OF_LBRA) != 0 && IsShort) { - /* Long branch but short distance */ - CE_ReplaceOPC (E, MakeShortBranch (E->OPC)); - ++Changes; - } - - } else if ((E->Info & OF_LBRA) == 0) { - - /* Short branch to external symbol - make it long */ - CE_ReplaceOPC (E, MakeLongBranch (E->OPC)); + /* Remember, we had changes */ ++Changes; + /* Continue with next insn */ + continue; } - - } else if ((CPUIsets[CPU] & CPU_ISET_65SC02) != 0 && - (E->Info & OF_UBRA) != 0 && - E->JumpTo != 0 && - IsShortDist (GetBranchDist (S, I, E->JumpTo->Owner))) { - - /* The jump is short and may be replaced by a BRA on the 65C02 CPU */ - CE_ReplaceOPC (E, OP65_BRA); - ++Changes; } /* Next entry */ @@ -2189,96 +1528,85 @@ unsigned OptBranchDist (CodeSeg* S) } - -/*****************************************************************************/ -/* Optimize indirect loads */ -/*****************************************************************************/ - - - -unsigned OptIndLoads1 (CodeSeg* S) +unsigned OptSignExtended (CodeSeg* S) /* Change ** -** lda (zp),y +** lda xxx ; X is 0 +** bpl L1 +** dex/ldx #$FF +** L1: cpx #$00 +** bpl L2 +** +** or +** +** lda xxx ; X is 0 +** bpl L1 +** dex/ldx #$FF +** L1: cpx #$80 +** bcc/bmi L2 ** ** into +** lda xxx ; X is 0 +** bpl L2 +** dex/ldx #$FF ** -** lda (zp,x) -** -** provided that x and y are both zero. +** provided the C flag isn't used later. */ { unsigned Changes = 0; - unsigned I; + CodeEntry* L[5]; + CodeEntry* X; + unsigned CheckStates; /* Walk over the entries */ - I = 0; + unsigned I = 0; while (I < CS_GetEntryCount (S)) { /* Get next entry */ - CodeEntry* E = CS_GetEntry (S, I); + L[0] = CS_GetEntry (S, I); - /* Check if it's what we're looking for */ - if (E->OPC == OP65_LDA && - E->AM == AM65_ZP_INDY && - E->RI->In.RegY == 0 && - E->RI->In.RegX == 0) { + /* Check if it's a register load or transfer insn */ + if (L[0]->OPC == OP65_LDA && + CS_GetEntries (S, L+1, I+1, 4) && + !CS_RangeHasLabel (S, I+1, 2) && + CE_GetLabelCount (L[3]) == 1 && + L[1]->JumpTo == CE_GetLabel (L[3], 0) && + (L[1]->Info & OF_CBRA) != 0 && + GetBranchCond (L[1]->OPC) == BC_PL && + RegValIsKnown (L[2]->RI->Out.RegX) && + L[2]->RI->Out.RegX == 0xFF && + L[2]->OPC != OP65_JSR && + (L[2]->Chg & REG_AXY) == REG_X) { - /* Replace by the same insn with other addressing mode */ - CodeEntry* X = NewCodeEntry (E->OPC, AM65_ZPX_IND, E->Arg, 0, E->LI); - CS_InsertEntry (S, X, I+1); + /* We find a sign extention */ + CheckStates = PSTATE_CZN; + if (L[3]->OPC == OP65_CPX && + CE_IsConstImm (L[3]) && + (L[4]->Info & OF_CBRA) != 0 && + ((L[3]->Num == 0x00 && + GetBranchCond (L[4]->OPC) == BC_PL) || + ((L[3]->Num == 0x80 && + GetBranchCond (L[4]->OPC) == BC_CC && + GetBranchCond (L[4]->OPC) == BC_MI)))) { - /* Remove the old insn */ - CS_DelEntry (S, I); - ++Changes; - } - - /* Next entry */ - ++I; - - } - - /* Return the number of changes made */ - return Changes; -} - - - -unsigned OptIndLoads2 (CodeSeg* S) -/* Change -** -** lda (zp,x) -** -** into -** -** lda (zp),y -** -** provided that x and y are both zero. -*/ -{ - unsigned Changes = 0; - unsigned I; - - /* Walk over the entries */ - I = 0; - while (I < CS_GetEntryCount (S)) { - - /* Get next entry */ - CodeEntry* E = CS_GetEntry (S, I); - - /* Check if it's what we're looking for */ - if (E->OPC == OP65_LDA && - E->AM == AM65_ZPX_IND && - E->RI->In.RegY == 0 && - E->RI->In.RegX == 0) { - - /* Replace by the same insn with other addressing mode */ - CodeEntry* X = NewCodeEntry (E->OPC, AM65_ZP_INDY, E->Arg, 0, E->LI); - CS_InsertEntry (S, X, I+1); - - /* Remove the old insn */ - CS_DelEntry (S, I); - ++Changes; + /* Check if the processor states set by the CPX are unused later */ + if ((GetRegInfo (S, I+5, CheckStates) & CheckStates) == 0) { + + /* Change the target of the sign extention branch */ + X = NewCodeEntry (OP65_JPL, L[4]->AM, L[4]->Arg, L[4]->JumpTo, L[4]->LI); + CS_InsertEntry (S, X, I+1); + CS_DelEntry (S, I+2); + + /* Remove the old conditional branch */ + CS_DelEntries (S, I+3, 2); + + /* Remember, we had changes */ + ++Changes; + + /* Continue with the current insn */ + continue; + } + } } /* Next entry */ diff --git a/src/cc65/coptind.h b/src/cc65/coptind.h index 90e27d547..c7ecf4194 100644 --- a/src/cc65/coptind.h +++ b/src/cc65/coptind.h @@ -49,69 +49,15 @@ -unsigned OptRTSJumps1 (CodeSeg* S); -/* Replace jumps to RTS by RTS */ - -unsigned OptRTSJumps2 (CodeSeg* S); -/* Replace long conditional jumps to RTS */ - -unsigned OptDeadJumps (CodeSeg* S); -/* Remove dead jumps (jumps to the next instruction) */ - -unsigned OptDeadCode (CodeSeg* S); -/* Remove dead code (code that follows an unconditional jump or an rts/rti -** and has no label) -*/ - -unsigned OptJumpCascades (CodeSeg* S); -/* Optimize jump cascades (jumps to jumps). In such a case, the jump is -** replaced by a jump to the final location. This will in some cases produce -** worse code, because some jump targets are no longer reachable by short -** branches, but this is quite rare, so there are more advantages than -** disadvantages. -*/ - -unsigned OptRTS (CodeSeg* S); -/* Optimize subroutine calls followed by an RTS. The subroutine call will get -** replaced by a jump. Don't bother to delete the RTS if it does not have a -** label, the dead code elimination should take care of it. -*/ - -unsigned OptJumpTarget1 (CodeSeg* S); -/* If the instruction preceeding an unconditional branch is the same as the -** instruction preceeding the jump target, the jump target may be moved -** one entry back. This is a size optimization, since the instruction before -** the branch gets removed. -*/ - -unsigned OptJumpTarget2 (CodeSeg* S); -/* If a bcs jumps to a sec insn or a bcc jumps to clc, skip this insn, since -** it's job is already done. -*/ - -unsigned OptJumpTarget3 (CodeSeg* S); -/* Jumps to load instructions of a register, that do already have the matching -** register contents may skip the load instruction, since it's job is already -** done. -*/ - -unsigned OptCondBranches1 (CodeSeg* S); -/* If an immidiate load of a register is followed by a conditional jump that -** is never taken because the load of the register sets the flags in such a -** manner, remove the conditional branch. -*/ - -unsigned OptCondBranches2 (CodeSeg* S); -/* If on entry to a "rol a" instruction the accu is zero, and a beq/bne follows, -** we can remove the rol and branch on the state of the carry. -*/ - unsigned OptUnusedLoads (CodeSeg* S); /* Remove loads of registers where the value loaded is not used later. */ unsigned OptUnusedStores (CodeSeg* S); /* Remove stores into zero page registers that aren't used later */ +unsigned OptLoad3 (CodeSeg* S); +/* Remove repeated loads from one and the same memory location */ + unsigned OptDupLoads (CodeSeg* S); /* Remove loads of registers where the value loaded is already in the register. */ @@ -136,39 +82,45 @@ unsigned OptTransfers4 (CodeSeg* S); ** by a load of the second register if possible. */ -unsigned OptPushPop (CodeSeg* S); -/* Remove a PHA/PLA sequence were A is not used later */ +unsigned OptPushPop1 (CodeSeg* S); +/* Remove a PHA/PLA sequence were A not used later */ + +unsigned OptPushPop2 (CodeSeg* S); +/* Remove a PHP/PLP sequence were no processor flags changed inside */ unsigned OptPrecalc (CodeSeg* S); /* Replace immediate operations with the accu where the current contents are ** known by a load of the final value. */ -unsigned OptBranchDist (CodeSeg* S); -/* Change branches for the distance needed. */ - -unsigned OptIndLoads1 (CodeSeg* S); -/* Change -** -** lda (zp),y -** -** into -** -** lda (zp,x) -** -** provided that x and y are both zero. +unsigned OptShiftBack (CodeSeg* S); +/* Remove a pair of shifts to the opposite directions if none of the bits of +** the register A or the Z/N flags modified by these shifts are used later. */ -unsigned OptIndLoads2 (CodeSeg* S); +unsigned OptSignExtended (CodeSeg* S); /* Change ** -** lda (zp,x) +** lda xxx ; X is 0 +** bpl L1 +** dex/ldx #$FF +** L1: cpx #$00 +** bpl L2 +** +** or +** +** lda xxx ; X is 0 +** bpl L1 +** dex/ldx #$FF +** L1: cpx #$80 +** bcc/bmi L2 ** ** into +** lda xxx ; X is 0 +** bpl L2 +** dex/ldx #$FF ** -** lda (zp),y -** -** provided that x and y are both zero. +** provided the C flag isn't used later. */ diff --git a/src/cc65/coptjmp.c b/src/cc65/coptjmp.c new file mode 100644 index 000000000..9dd4a29c5 --- /dev/null +++ b/src/cc65/coptjmp.c @@ -0,0 +1,1040 @@ +/*****************************************************************************/ +/* */ +/* coptjmp.c */ +/* */ +/* Low level optimizations regarding branches and jumps */ +/* */ +/* */ +/* */ +/* (C) 2001-2009, Ullrich von Bassewitz */ +/* Roemerstrasse 52 */ +/* D-70794 Filderstadt */ +/* EMail: uz@cc65.org */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +/* common */ +#include "cpu.h" + +/* cc65 */ +#include "codeent.h" +#include "coptjmp.h" +#include "codeinfo.h" +#include "codeopt.h" +#include "error.h" + + + +/*****************************************************************************/ +/* Helper functions */ +/*****************************************************************************/ + + + +static int GetBranchDist (CodeSeg* S, unsigned From, CodeEntry* To) +/* Get the branch distance between the two entries and return it. The distance +** will be negative for backward jumps and positive for forward jumps. +*/ +{ + /* Get the index of the branch target */ + unsigned TI = CS_GetEntryIndex (S, To); + + /* Determine the branch distance */ + int Distance = 0; + if (TI >= From) { + /* Forward branch, do not count the current insn */ + unsigned J = From+1; + while (J < TI) { + CodeEntry* N = CS_GetEntry (S, J++); + Distance += N->Size; + } + } else { + /* Backward branch */ + unsigned J = TI; + while (J < From) { + CodeEntry* N = CS_GetEntry (S, J++); + Distance -= N->Size; + } + } + + /* Return the calculated distance */ + return Distance; +} + + + +static int IsShortDist (int Distance) +/* Return true if the given distance is a short branch distance */ +{ + return (Distance >= -125 && Distance <= 125); +} + + + +static short ZPRegVal (unsigned short Use, const RegContents* RC) +/* Return the contents of the given zeropage register */ +{ + if ((Use & REG_TMP1) != 0) { + return RC->Tmp1; + } else if ((Use & REG_PTR1_LO) != 0) { + return RC->Ptr1Lo; + } else if ((Use & REG_PTR1_HI) != 0) { + return RC->Ptr1Hi; + } else if ((Use & REG_SREG_LO) != 0) { + return RC->SRegLo; + } else if ((Use & REG_SREG_HI) != 0) { + return RC->SRegHi; + } else { + return UNKNOWN_REGVAL; + } +} + + + +static short RegVal (unsigned short Use, const RegContents* RC) +/* Return the contents of the given register */ +{ + if ((Use & REG_A) != 0) { + return RC->RegA; + } else if ((Use & REG_X) != 0) { + return RC->RegX; + } else if ((Use & REG_Y) != 0) { + return RC->RegY; + } else { + return ZPRegVal (Use, RC); + } +} + + + +/*****************************************************************************/ +/* Optimize branch types */ +/*****************************************************************************/ + + + +unsigned OptBranchDist (CodeSeg* S) +/* Change branches for the distance needed. */ +{ + unsigned Changes = 0; + + /* Walk over the entries */ + unsigned I = 0; + while (I < CS_GetEntryCount (S)) { + + /* Get next entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Check if it's a conditional branch to a local label. */ + if (E->Info & OF_CBRA) { + + /* Is this a branch to a local symbol? */ + if (E->JumpTo != 0) { + + /* Check if the branch distance is short */ + int IsShort = IsShortDist (GetBranchDist (S, I, E->JumpTo->Owner)); + + /* Make the branch short/long according to distance */ + if ((E->Info & OF_LBRA) == 0 && !IsShort) { + /* Short branch but long distance */ + CE_ReplaceOPC (E, MakeLongBranch (E->OPC)); + ++Changes; + } else if ((E->Info & OF_LBRA) != 0 && IsShort) { + /* Long branch but short distance */ + CE_ReplaceOPC (E, MakeShortBranch (E->OPC)); + ++Changes; + } + + } else if ((E->Info & OF_LBRA) == 0) { + + /* Short branch to external symbol - make it long */ + CE_ReplaceOPC (E, MakeLongBranch (E->OPC)); + ++Changes; + + } + + } else if ((CPUIsets[CPU] & (CPU_ISET_65SC02 |CPU_ISET_6502DTV)) != 0 && + (E->Info & OF_UBRA) != 0 && + E->JumpTo != 0 && + IsShortDist (GetBranchDist (S, I, E->JumpTo->Owner))) { + + /* The jump is short and may be replaced by a BRA on the 65C02 CPU */ + CE_ReplaceOPC (E, OP65_BRA); + ++Changes; + } + + /* Next entry */ + ++I; + + } + + /* Return the number of changes made */ + return Changes; +} + + + +unsigned OptBranchDist2 (CodeSeg* S) +/* Change BRA to JMP if target is an external symbol */ +{ + unsigned Changes = 0; + + /* Walk over the entries */ + unsigned I = 0; + while (I < CS_GetEntryCount (S)) { + + /* Get next entry */ + CodeEntry* E = CS_GetEntry (S, I); + + if ((CPUIsets[CPU] & (CPU_ISET_65SC02 |CPU_ISET_6502DTV)) != 0 && /* CPU has BRA */ + (E->Info & OF_UBRA) != 0 && /* is a unconditional branch */ + E->JumpTo == NULL) { /* target is extern */ + /* BRA jumps to external symbol and must be replaced by a JMP on the 65C02 CPU */ + CE_ReplaceOPC (E, OP65_JMP); + ++Changes; + } + + /* Next entry */ + ++I; + + } + + /* Return the number of changes made */ + return Changes; +} + + + +/*****************************************************************************/ +/* Replace jumps to RTS by RTS */ +/*****************************************************************************/ + + + +unsigned OptRTSJumps1 (CodeSeg* S) +/* Replace jumps to RTS by RTS */ +{ + unsigned Changes = 0; + + /* Walk over all entries minus the last one */ + unsigned I = 0; + while (I < CS_GetEntryCount (S)) { + + /* Get the next entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Check if it's an unconditional branch to a local target */ + if ((E->Info & OF_UBRA) != 0 && + E->JumpTo != 0 && + E->JumpTo->Owner->OPC == OP65_RTS) { + + /* Insert an RTS instruction */ + CodeEntry* X = NewCodeEntry (OP65_RTS, AM65_IMP, 0, 0, E->LI); + CS_InsertEntry (S, X, I+1); + + /* Delete the jump */ + CS_DelEntry (S, I); + + /* Remember, we had changes */ + ++Changes; + + } + + /* Next entry */ + ++I; + + } + + /* Return the number of changes made */ + return Changes; +} + + + +unsigned OptRTSJumps2 (CodeSeg* S) +/* Replace long conditional jumps to RTS or to a final target */ +{ + unsigned Changes = 0; + + /* Walk over all entries minus the last one */ + unsigned I = 0; + while (I < CS_GetEntryCount (S) - 1) { + + /* Get the next entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Check if it's an conditional branch to a local target */ + if ((E->Info & OF_CBRA) != 0 && /* Conditional branch */ + (E->Info & OF_LBRA) != 0 && /* Long branch */ + E->JumpTo != 0) { /* Local label */ + + + /* Get the jump target and the next entry. There's always a next + ** entry, because we don't cover the last entry in the loop. + */ + CodeEntry* X = 0; + CodeEntry* T = E->JumpTo->Owner; + CodeEntry* N = CS_GetNextEntry (S, I); + + /* Check if it's a jump to an RTS insn */ + if (T->OPC == OP65_RTS) { + + /* It's a jump to RTS. Create a conditional branch around an + ** RTS insn. + */ + X = NewCodeEntry (OP65_RTS, AM65_IMP, 0, 0, T->LI); + + } else if (T->OPC == OP65_JMP && T->JumpTo == 0) { + + /* It's a jump to a label outside the function. Create a + ** conditional branch around a jump to the external label. + */ + X = NewCodeEntry (OP65_JMP, AM65_ABS, T->Arg, T->JumpTo, T->LI); + + } + + /* If we have a replacement insn, insert it */ + if (X) { + + CodeLabel* LN; + opc_t NewBranch; + + /* Insert the new insn */ + CS_InsertEntry (S, X, I+1); + + /* Create a conditional branch with the inverse condition + ** around the replacement insn + */ + + /* Get the new branch opcode */ + NewBranch = MakeShortBranch (GetInverseBranch (E->OPC)); + + /* Get the label attached to N, create a new one if needed */ + LN = CS_GenLabel (S, N); + + /* Generate the branch */ + X = NewCodeEntry (NewBranch, AM65_BRA, LN->Name, LN, E->LI); + CS_InsertEntry (S, X, I+1); + + /* Delete the long branch */ + CS_DelEntry (S, I); + + /* Remember, we had changes */ + ++Changes; + + } + } + + /* Next entry */ + ++I; + + } + + /* Return the number of changes made */ + return Changes; +} + + + +/*****************************************************************************/ +/* Remove dead jumps */ +/*****************************************************************************/ + + + +unsigned OptDeadJumps (CodeSeg* S) +/* Remove dead jumps (jumps to the next instruction) */ +{ + unsigned Changes = 0; + + /* Walk over all entries minus the last one */ + unsigned I = 0; + while (I < CS_GetEntryCount (S)) { + + /* Get the next entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Check if it's a branch, if it has a local target, and if the target + ** is the next instruction. + */ + if (E->AM == AM65_BRA && + E->JumpTo && + E->JumpTo->Owner == CS_GetNextEntry (S, I)) { + + /* Delete the dead jump */ + CS_DelEntry (S, I); + + /* Remember, we had changes */ + ++Changes; + + } else { + + /* Next entry */ + ++I; + + } + } + + /* Return the number of changes made */ + return Changes; +} + + + +/*****************************************************************************/ +/* Remove dead code */ +/*****************************************************************************/ + + + +unsigned OptDeadCode (CodeSeg* S) +/* Remove dead code (code that follows an unconditional jump or an rts/rti +** and has no label) +*/ +{ + unsigned Changes = 0; + + /* Walk over all entries */ + unsigned I = 0; + while (I < CS_GetEntryCount (S)) { + + CodeEntry* N; + CodeLabel* LN; + + /* Get this entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Check if it's an unconditional branch, and if the next entry has + ** no labels attached, or if the label is just used so that the insn + ** can jump to itself. + */ + if ((E->Info & OF_DEAD) != 0 && /* Dead code follows */ + (N = CS_GetNextEntry (S, I)) != 0 && /* Has next entry */ + (!CE_HasLabel (N) || /* Don't has a label */ + ((N->Info & OF_UBRA) != 0 && /* Uncond branch */ + (LN = N->JumpTo) != 0 && /* Jumps to known label */ + LN->Owner == N && /* Attached to insn */ + CL_GetRefCount (LN) == 1))) { /* Only reference */ + + /* Delete the next entry */ + CS_DelEntry (S, I+1); + + /* Remember, we had changes */ + ++Changes; + + } else { + + /* Next entry */ + ++I; + + } + } + + /* Return the number of changes made */ + return Changes; +} + + + +/*****************************************************************************/ +/* Optimize jump cascades */ +/*****************************************************************************/ + + + +unsigned OptJumpCascades (CodeSeg* S) +/* Optimize jump cascades (jumps to jumps). In such a case, the jump is +** replaced by a jump to the final location. This will in some cases produce +** worse code, because some jump targets are no longer reachable by short +** branches, but this is quite rare, so there are more advantages than +** disadvantages. +*/ +{ + unsigned Changes = 0; + + /* Walk over all entries */ + unsigned I = 0; + while (I < CS_GetEntryCount (S)) { + + CodeEntry* N; + CodeLabel* OldLabel; + + /* Get this entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Check: + ** - if it's a branch, + ** - if it has a jump label, + ** - if this jump label is not attached to the instruction itself, + ** - if the target instruction is itself a branch, + ** - if either the first branch is unconditional or the target of + ** the second branch is internal to the function. + ** The latter condition will avoid conditional branches to targets + ** outside of the function (usually incspx), which won't simplify the + ** code, since conditional far branches are emulated by a short branch + ** around a jump. + */ + if ((E->Info & OF_BRA) != 0 && + (OldLabel = E->JumpTo) != 0 && + (N = OldLabel->Owner) != E && + (N->Info & OF_BRA) != 0 && + ((E->Info & OF_CBRA) == 0 || + N->JumpTo != 0)) { + + /* Check if we can use the final target label. That is the case, + ** if the target branch is an absolute branch; or, if it is a + ** conditional branch checking the same condition as the first one. + */ + if ((N->Info & OF_UBRA) != 0 || + ((E->Info & OF_CBRA) != 0 && + GetBranchCond (E->OPC) == GetBranchCond (N->OPC))) { + + /* This is a jump cascade and we may jump to the final target, + ** provided that the other insn does not jump to itself. If + ** this is the case, we can also jump to ourselves, otherwise + ** insert a jump to the new instruction and remove the old one. + */ + CodeEntry* X; + CodeLabel* LN = N->JumpTo; + + if (LN != 0 && LN->Owner == N) { + + /* We found a jump to a jump to itself. Replace our jump + ** by a jump to itself. + */ + CodeLabel* LE = CS_GenLabel (S, E); + X = NewCodeEntry (E->OPC, E->AM, LE->Name, LE, E->LI); + + } else { + + /* Jump to the final jump target */ + X = NewCodeEntry (E->OPC, E->AM, N->Arg, N->JumpTo, E->LI); + + } + + /* Insert it behind E */ + CS_InsertEntry (S, X, I+1); + + /* Remove E */ + CS_DelEntry (S, I); + + /* Remember, we had changes */ + ++Changes; + + /* Check if both are conditional branches, and the condition of + ** the second is the inverse of that of the first. In this case, + ** the second branch will never be taken, and we may jump directly + ** to the instruction behind this one. + */ + } else if ((E->Info & OF_CBRA) != 0 && (N->Info & OF_CBRA) != 0) { + + CodeEntry* X; /* Instruction behind N */ + CodeLabel* LX; /* Label attached to X */ + + /* Get the branch conditions of both branches */ + bc_t BC1 = GetBranchCond (E->OPC); + bc_t BC2 = GetBranchCond (N->OPC); + + /* Check the branch conditions */ + if (BC1 != GetInverseCond (BC2)) { + /* Condition not met */ + goto NextEntry; + } + + /* We may jump behind this conditional branch. Get the + ** pointer to the next instruction + */ + if ((X = CS_GetNextEntry (S, CS_GetEntryIndex (S, N))) == 0) { + /* N is the last entry, bail out */ + goto NextEntry; + } + + /* Get the label attached to X, create a new one if needed */ + LX = CS_GenLabel (S, X); + + /* Move the reference from E to the new label */ + CS_MoveLabelRef (S, E, LX); + + /* Remember, we had changes */ + ++Changes; + } + } + +NextEntry: + /* Next entry */ + ++I; + + } + + /* Return the number of changes made */ + return Changes; +} + + + +/*****************************************************************************/ +/* Optimize jsr/rts */ +/*****************************************************************************/ + + + +unsigned OptRTS (CodeSeg* S) +/* Optimize subroutine calls followed by an RTS. The subroutine call will get +** replaced by a jump. Don't bother to delete the RTS if it does not have a +** label, the dead code elimination should take care of it. +*/ +{ + unsigned Changes = 0; + + /* Walk over all entries minus the last one */ + unsigned I = 0; + while (I < CS_GetEntryCount (S)) { + + CodeEntry* N; + + /* Get this entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Check if it's a subroutine call and if the following insn is RTS */ + if (E->OPC == OP65_JSR && + (N = CS_GetNextEntry (S, I)) != 0 && + N->OPC == OP65_RTS) { + + /* Change the jsr to a jmp and use the additional info for a jump */ + E->AM = AM65_BRA; + CE_ReplaceOPC (E, OP65_JMP); + + /* Remember, we had changes */ + ++Changes; + + } + + /* Next entry */ + ++I; + + } + + /* Return the number of changes made */ + return Changes; +} + + + +/*****************************************************************************/ +/* Optimize jump targets */ +/*****************************************************************************/ + + + +unsigned OptJumpTarget1 (CodeSeg* S) +/* If the instruction preceeding an unconditional branch is the same as the +** instruction preceeding the jump target, the jump target may be moved +** one entry back. This is a size optimization, since the instruction before +** the branch gets removed. +*/ +{ + unsigned Changes = 0; + CodeEntry* E1; /* Entry 1 */ + CodeEntry* E2; /* Entry 2 */ + CodeEntry* T1; /* Jump target entry 1 */ + CodeLabel* TL1; /* Target label 1 */ + + /* Walk over the entries */ + unsigned I = 0; + while (I < CS_GetEntryCount (S)) { + + /* Get next entry */ + E2 = CS_GetNextEntry (S, I); + + /* Check if we have a jump or branch without a label attached, and + ** a jump target, which is not attached to the jump itself + */ + if (E2 != 0 && + (E2->Info & OF_UBRA) != 0 && + !CE_HasLabel (E2) && + E2->JumpTo && + E2->JumpTo->Owner != E2) { + + /* Get the entry preceeding the branch target */ + T1 = CS_GetPrevEntry (S, CS_GetEntryIndex (S, E2->JumpTo->Owner)); + if (T1 == 0) { + /* There is no such entry */ + goto NextEntry; + } + + /* The entry preceeding the branch target may not be the branch + ** insn. + */ + if (T1 == E2) { + goto NextEntry; + } + + /* Get the entry preceeding the jump */ + E1 = CS_GetEntry (S, I); + + /* Check if both preceeding instructions are identical */ + if (!CodeEntriesAreEqual (E1, T1)) { + /* Not equal, try next */ + goto NextEntry; + } + + /* Get the label for the instruction preceeding the jump target. + ** This routine will create a new label if the instruction does + ** not already have one. + */ + TL1 = CS_GenLabel (S, T1); + + /* Change the jump target to point to this new label */ + CS_MoveLabelRef (S, E2, TL1); + + /* If the instruction preceeding the jump has labels attached, + ** move references to this label to the new label. + */ + if (CE_HasLabel (E1)) { + CS_MoveLabels (S, E1, T1); + } + + /* Remove the entry preceeding the jump */ + CS_DelEntry (S, I); + + /* Remember, we had changes */ + ++Changes; + + } else { +NextEntry: + /* Next entry */ + ++I; + } + } + + /* Return the number of changes made */ + return Changes; +} + + + +unsigned OptJumpTarget2 (CodeSeg* S) +/* If a bcs jumps to a sec insn or a bcc jumps to clc, skip this insn, since +** it's job is already done. +*/ +{ + unsigned Changes = 0; + + /* Walk over the entries */ + unsigned I = 0; + while (I < CS_GetEntryCount (S)) { + + /* OP that may be skipped */ + opc_t OPC; + + /* Jump target insn, old and new */ + CodeEntry* T; + CodeEntry* N; + + /* New jump label */ + CodeLabel* L; + + /* Get next entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Check if this is a bcc insn */ + if (E->OPC == OP65_BCC || E->OPC == OP65_JCC) { + OPC = OP65_CLC; + } else if (E->OPC == OP65_BCS || E->OPC == OP65_JCS) { + OPC = OP65_SEC; + } else { + /* Not what we're looking for */ + goto NextEntry; + } + + /* Must have a jump target */ + if (E->JumpTo == 0) { + goto NextEntry; + } + + /* Get the owner insn of the jump target and check if it's the one, we + ** will skip if present. + */ + T = E->JumpTo->Owner; + if (T->OPC != OPC) { + goto NextEntry; + } + + /* Get the entry following the branch target */ + N = CS_GetNextEntry (S, CS_GetEntryIndex (S, T)); + if (N == 0) { + /* There is no such entry */ + goto NextEntry; + } + + /* Get the label for the instruction following the jump target. + ** This routine will create a new label if the instruction does + ** not already have one. + */ + L = CS_GenLabel (S, N); + + /* Change the jump target to point to this new label */ + CS_MoveLabelRef (S, E, L); + + /* Remember that we had changes */ + ++Changes; + +NextEntry: + /* Next entry */ + ++I; + } + + /* Return the number of changes made */ + return Changes; +} + + + +unsigned OptJumpTarget3 (CodeSeg* S) +/* Jumps to load instructions of a register, that do already have the matching +** register contents may skip the load instruction, since it's job is already +** done. +*/ +{ + unsigned Changes = 0; + unsigned I; + + /* Walk over the entries */ + I = 0; + while (I < CS_GetEntryCount (S)) { + + CodeEntry* N; + + /* Get next entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Check if this is a load insn with a label and the next insn is not + ** a conditional branch that needs the flags from the load. + */ + if ((E->Info & OF_LOAD) != 0 && + CE_IsConstImm (E) && + CE_HasLabel (E) && + (N = CS_GetNextEntry (S, I)) != 0 && + !CE_UseLoadFlags (N)) { + + unsigned J; + int K; + + /* New jump label */ + CodeLabel* LN = 0; + + /* Walk over all insn that jump here */ + for (J = 0; J < CE_GetLabelCount (E); ++J) { + + /* Get the label */ + CodeLabel* L = CE_GetLabel (E, J); + + /* Loop over all insn that reference this label. Since we may + ** eventually remove a reference in the loop, we must loop + ** from end down to start. + */ + for (K = CL_GetRefCount (L) - 1; K >= 0; --K) { + + /* Get the entry that jumps here */ + CodeEntry* Jump = CL_GetRef (L, K); + + /* Get the register info from this insn */ + short Val = RegVal (E->Chg, &Jump->RI->Out2); + + /* Check if the outgoing value is the one thats's loaded */ + if (Val == (unsigned char) E->Num) { + + /* OK, skip the insn. First, generate a label for the + ** next insn after E. + */ + if (LN == 0) { + LN = CS_GenLabel (S, N); + } + + /* Change the jump target to point to this new label */ + CS_MoveLabelRef (S, Jump, LN); + + /* Remember that we had changes */ + ++Changes; + } + } + } + + } + + /* Next entry */ + ++I; + } + + /* Return the number of changes made */ + return Changes; +} + + + +/*****************************************************************************/ +/* Optimize conditional branches */ +/*****************************************************************************/ + + + +unsigned OptCondBranches1 (CodeSeg* S) +/* Performs several optimization steps: +** +** - If an immediate load of a register is followed by a conditional jump that +** is never taken because the load of the register sets the flags in such a +** manner, remove the conditional branch. +** - If the conditional branch is always taken because of the register load, +** replace it by a jmp. +** - If a conditional branch jumps around an unconditional branch, remove the +** conditional branch and make the jump a conditional branch with the +** inverse condition of the first one. +*/ +{ + unsigned Changes = 0; + + /* Walk over the entries */ + unsigned I = 0; + while (I < CS_GetEntryCount (S)) { + + CodeEntry* N; + CodeLabel* L; + + /* Get next entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Check if it's a register load */ + if ((E->Info & OF_LOAD) != 0 && /* It's a load instruction */ + E->AM == AM65_IMM && /* ..with immidiate addressing */ + CE_HasNumArg (E) && /* ..and a numeric argument. */ + (N = CS_GetNextEntry (S, I)) != 0 && /* There is a following entry */ + (N->Info & OF_CBRA) != 0 && /* ..which is a conditional branch */ + !CE_HasLabel (N)) { /* ..and does not have a label */ + + /* Get the branch condition */ + bc_t BC = GetBranchCond (N->OPC); + + /* Check the argument against the branch condition */ + if ((BC == BC_EQ && E->Num != 0) || + (BC == BC_NE && E->Num == 0) || + (BC == BC_PL && (E->Num & 0x80) != 0) || + (BC == BC_MI && (E->Num & 0x80) == 0)) { + + /* Remove the conditional branch */ + CS_DelEntry (S, I+1); + + /* Remember, we had changes */ + ++Changes; + + } else if ((BC == BC_EQ && E->Num == 0) || + (BC == BC_NE && E->Num != 0) || + (BC == BC_PL && (E->Num & 0x80) == 0) || + (BC == BC_MI && (E->Num & 0x80) != 0)) { + + /* The branch is always taken, replace it by a jump */ + CE_ReplaceOPC (N, OP65_JMP); + + /* Remember, we had changes */ + ++Changes; + } + + } + + if ((E->Info & OF_CBRA) != 0 && /* It's a conditional branch */ + (L = E->JumpTo) != 0 && /* ..referencing a local label */ + (N = CS_GetNextEntry (S, I)) != 0 && /* There is a following entry */ + (N->Info & OF_UBRA) != 0 && /* ..which is an uncond branch, */ + !CE_HasLabel (N) && /* ..has no label attached */ + L->Owner == CS_GetNextEntry (S, I+1)) { /* ..and jump target follows */ + + /* Replace the jump by a conditional branch with the inverse branch + ** condition than the branch around it. + */ + CE_ReplaceOPC (N, GetInverseBranch (E->OPC)); + + /* Remove the conditional branch */ + CS_DelEntry (S, I); + + /* Remember, we had changes */ + ++Changes; + + } + + /* Next entry */ + ++I; + + } + + /* Return the number of changes made */ + return Changes; +} + + + +unsigned OptCondBranches2 (CodeSeg* S) +/* If on entry to a "rol a" instruction the accu is zero, and a beq/bne follows, +** we can remove the rol and branch on the state of the carry flag. +*/ +{ + unsigned Changes = 0; + unsigned I; + + /* Walk over the entries */ + I = 0; + while (I < CS_GetEntryCount (S)) { + + CodeEntry* N; + + /* Get next entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Check if it's a rol insn with A in accu and a branch follows */ + if (E->OPC == OP65_ROL && + E->AM == AM65_ACC && + E->RI->In.RegA == 0 && + !CE_HasLabel (E) && + (N = CS_GetNextEntry (S, I)) != 0 && + (N->Info & OF_ZBRA) != 0 && + !RegAUsed (S, I+1)) { + + /* Replace the branch condition */ + switch (GetBranchCond (N->OPC)) { + case BC_EQ: CE_ReplaceOPC (N, OP65_JCC); break; + case BC_NE: CE_ReplaceOPC (N, OP65_JCS); break; + default: Internal ("Unknown branch condition in OptCondBranches2"); + } + + /* Delete the rol insn */ + CS_DelEntry (S, I); + + /* Remember, we had changes */ + ++Changes; + } + + /* Next entry */ + ++I; + } + + /* Return the number of changes made */ + return Changes; +} diff --git a/src/cc65/coptjmp.h b/src/cc65/coptjmp.h new file mode 100644 index 000000000..8df53415d --- /dev/null +++ b/src/cc65/coptjmp.h @@ -0,0 +1,119 @@ +/*****************************************************************************/ +/* */ +/* coptjmp.h */ +/* */ +/* Low level optimizations regarding branches and jumps */ +/* */ +/* */ +/* */ +/* (C) 2001-2009, Ullrich von Bassewitz */ +/* Roemerstrasse 52 */ +/* D-70794 Filderstadt */ +/* EMail: uz@cc65.org */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef COPTJMP_H +#define COPTJMP_H + + + +/* cc65 */ +#include "codeseg.h" + + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +unsigned OptBranchDist (CodeSeg* S); +/* Change branches for the distance needed. */ + +unsigned OptBranchDist2 (CodeSeg* S); +/* If BRA points to an external symbol, change it to JMP */ + +unsigned OptRTSJumps1 (CodeSeg* S); +/* Replace jumps to RTS by RTS */ + +unsigned OptRTSJumps2 (CodeSeg* S); +/* Replace long conditional jumps to RTS */ + +unsigned OptDeadJumps (CodeSeg* S); +/* Remove dead jumps (jumps to the next instruction) */ + +unsigned OptDeadCode (CodeSeg* S); +/* Remove dead code (code that follows an unconditional jump or an rts/rti +** and has no label) +*/ + +unsigned OptJumpCascades (CodeSeg* S); +/* Optimize jump cascades (jumps to jumps). In such a case, the jump is +** replaced by a jump to the final location. This will in some cases produce +** worse code, because some jump targets are no longer reachable by short +** branches, but this is quite rare, so there are more advantages than +** disadvantages. +*/ + +unsigned OptRTS (CodeSeg* S); +/* Optimize subroutine calls followed by an RTS. The subroutine call will get +** replaced by a jump. Don't bother to delete the RTS if it does not have a +** label, the dead code elimination should take care of it. +*/ + +unsigned OptJumpTarget1 (CodeSeg* S); +/* If the instruction preceeding an unconditional branch is the same as the +** instruction preceeding the jump target, the jump target may be moved +** one entry back. This is a size optimization, since the instruction before +** the branch gets removed. +*/ + +unsigned OptJumpTarget2 (CodeSeg* S); +/* If a bcs jumps to a sec insn or a bcc jumps to clc, skip this insn, since +** it's job is already done. +*/ + +unsigned OptJumpTarget3 (CodeSeg* S); +/* Jumps to load instructions of a register, that do already have the matching +** register contents may skip the load instruction, since it's job is already +** done. +*/ + +unsigned OptCondBranches1 (CodeSeg* S); +/* If an immidiate load of a register is followed by a conditional jump that +** is never taken because the load of the register sets the flags in such a +** manner, remove the conditional branch. +*/ + +unsigned OptCondBranches2 (CodeSeg* S); +/* If on entry to a "rol a" instruction the accu is zero, and a beq/bne follows, +** we can remove the rol and branch on the state of the carry. +*/ + + + +/* End of coptjmp.h */ + +#endif diff --git a/src/cc65/coptmisc.c b/src/cc65/coptmisc.c new file mode 100644 index 000000000..523fbf17c --- /dev/null +++ b/src/cc65/coptmisc.c @@ -0,0 +1,735 @@ +/*****************************************************************************/ +/* */ +/* codemisc.c */ +/* */ +/* Miscellaneous optimization operations */ +/* */ +/* */ +/* */ +/* (C) 2001-2012, Ullrich von Bassewitz */ +/* Roemerstrasse 52 */ +/* D-70794 Filderstadt */ +/* EMail: uz@cc65.org */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#include <stdlib.h> + +/* common */ +#include "chartype.h" +#include "xsprintf.h" + +/* cc65 */ +#include "codeent.h" +#include "codeinfo.h" +#include "coptmisc.h" +#include "error.h" +#include "symtab.h" + + + +/*****************************************************************************/ +/* Decouple operations */ +/*****************************************************************************/ + + + +unsigned OptDecouple (CodeSeg* S) +/* Decouple operations, that is, do the following replacements: +** +** dex -> ldx #imm +** inx -> ldx #imm +** dey -> ldy #imm +** iny -> ldy #imm +** tax -> ldx #imm +** txa -> lda #imm +** tay -> ldy #imm +** tya -> lda #imm +** lda zp -> lda #imm +** ldx zp -> ldx #imm +** ldy zp -> ldy #imm +** +** Provided that the register values are known of course. +*/ +{ + unsigned Changes = 0; + unsigned I; + + /* Walk over the entries */ + I = 0; + while (I < CS_GetEntryCount (S)) { + + const char* Arg; + + /* Get next entry and it's input register values */ + CodeEntry* E = CS_GetEntry (S, I); + const RegContents* In = &E->RI->In; + + /* Assume we have no replacement */ + CodeEntry* X = 0; + + /* Check the instruction */ + switch (E->OPC) { + + case OP65_DEA: + if (RegValIsKnown (In->RegA)) { + Arg = MakeHexArg ((In->RegA - 1) & 0xFF); + X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); + } + break; + + case OP65_DEX: + if (RegValIsKnown (In->RegX)) { + Arg = MakeHexArg ((In->RegX - 1) & 0xFF); + X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); + } + break; + + case OP65_DEY: + if (RegValIsKnown (In->RegY)) { + Arg = MakeHexArg ((In->RegY - 1) & 0xFF); + X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); + } + break; + + case OP65_INA: + if (RegValIsKnown (In->RegA)) { + Arg = MakeHexArg ((In->RegA + 1) & 0xFF); + X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); + } + break; + + case OP65_INX: + if (RegValIsKnown (In->RegX)) { + Arg = MakeHexArg ((In->RegX + 1) & 0xFF); + X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); + } + break; + + case OP65_INY: + if (RegValIsKnown (In->RegY)) { + Arg = MakeHexArg ((In->RegY + 1) & 0xFF); + X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); + } + break; + + case OP65_LDA: + if (E->AM == AM65_ZP) { + switch (GetKnownReg (E->Use & REG_ZP, In)) { + case REG_TMP1: + Arg = MakeHexArg (In->Tmp1); + X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); + break; + + case REG_PTR1_LO: + Arg = MakeHexArg (In->Ptr1Lo); + X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); + break; + + case REG_PTR1_HI: + Arg = MakeHexArg (In->Ptr1Hi); + X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); + break; + + case REG_SREG_LO: + Arg = MakeHexArg (In->SRegLo); + X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); + break; + + case REG_SREG_HI: + Arg = MakeHexArg (In->SRegHi); + X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); + break; + } + } + break; + + case OP65_LDX: + if (E->AM == AM65_ZP) { + switch (GetKnownReg (E->Use & REG_ZP, In)) { + case REG_TMP1: + Arg = MakeHexArg (In->Tmp1); + X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); + break; + + case REG_PTR1_LO: + Arg = MakeHexArg (In->Ptr1Lo); + X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); + break; + + case REG_PTR1_HI: + Arg = MakeHexArg (In->Ptr1Hi); + X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); + break; + + case REG_SREG_LO: + Arg = MakeHexArg (In->SRegLo); + X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); + break; + + case REG_SREG_HI: + Arg = MakeHexArg (In->SRegHi); + X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); + break; + } + } + break; + + case OP65_LDY: + if (E->AM == AM65_ZP) { + switch (GetKnownReg (E->Use, In)) { + case REG_TMP1: + Arg = MakeHexArg (In->Tmp1); + X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); + break; + + case REG_PTR1_LO: + Arg = MakeHexArg (In->Ptr1Lo); + X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); + break; + + case REG_PTR1_HI: + Arg = MakeHexArg (In->Ptr1Hi); + X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); + break; + + case REG_SREG_LO: + Arg = MakeHexArg (In->SRegLo); + X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); + break; + + case REG_SREG_HI: + Arg = MakeHexArg (In->SRegHi); + X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); + break; + } + } + break; + + case OP65_TAX: + if (E->RI->In.RegA >= 0) { + Arg = MakeHexArg (In->RegA); + X = NewCodeEntry (OP65_LDX, AM65_IMM, Arg, 0, E->LI); + } + break; + + case OP65_TAY: + if (E->RI->In.RegA >= 0) { + Arg = MakeHexArg (In->RegA); + X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); + } + break; + + case OP65_TXA: + if (E->RI->In.RegX >= 0) { + Arg = MakeHexArg (In->RegX); + X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); + } + break; + + case OP65_TYA: + if (E->RI->In.RegY >= 0) { + Arg = MakeHexArg (In->RegY); + X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, E->LI); + } + break; + + default: + /* Avoid gcc warnings */ + break; + + } + + /* Insert the replacement if we have one */ + if (X) { + CS_InsertEntry (S, X, I+1); + CS_DelEntry (S, I); + ++Changes; + } + + /* Next entry */ + ++I; + + } + + /* Return the number of changes made */ + return Changes; +} + + + +unsigned OptIndLoads1 (CodeSeg* S) +/* Change +** +** lda (zp),y +** +** into +** +** lda (zp,x) +** +** provided that x and y are both zero. +*/ +{ + unsigned Changes = 0; + unsigned I; + + /* Walk over the entries */ + I = 0; + while (I < CS_GetEntryCount (S)) { + + /* Get next entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Check if it's what we're looking for */ + if (E->OPC == OP65_LDA && + E->AM == AM65_ZP_INDY && + E->RI->In.RegY == 0 && + E->RI->In.RegX == 0) { + + /* Replace by the same insn with other addressing mode */ + CodeEntry* X = NewCodeEntry (E->OPC, AM65_ZPX_IND, E->Arg, 0, E->LI); + CS_InsertEntry (S, X, I+1); + + /* Remove the old insn */ + CS_DelEntry (S, I); + ++Changes; + } + + /* Next entry */ + ++I; + + } + + /* Return the number of changes made */ + return Changes; +} + + + +unsigned OptIndLoads2 (CodeSeg* S) +/* Change +** +** lda (zp,x) +** +** into +** +** lda (zp),y +** +** provided that x and y are both zero. +*/ +{ + unsigned Changes = 0; + unsigned I; + + /* Walk over the entries */ + I = 0; + while (I < CS_GetEntryCount (S)) { + + /* Get next entry */ + CodeEntry* E = CS_GetEntry (S, I); + + /* Check if it's what we're looking for */ + if (E->OPC == OP65_LDA && + E->AM == AM65_ZPX_IND && + E->RI->In.RegY == 0 && + E->RI->In.RegX == 0) { + + /* Replace by the same insn with other addressing mode */ + CodeEntry* X = NewCodeEntry (E->OPC, AM65_ZP_INDY, E->Arg, 0, E->LI); + CS_InsertEntry (S, X, I+1); + + /* Remove the old insn */ + CS_DelEntry (S, I); + ++Changes; + } + + /* Next entry */ + ++I; + + } + + /* Return the number of changes made */ + return Changes; +} + + + +/*****************************************************************************/ +/* Optimize stack pointer ops */ +/*****************************************************************************/ + + + +static unsigned IsDecSP (const CodeEntry* E) +/* Check if this is an insn that decrements the stack pointer. If so, return +** the decrement. If not, return zero. +** The function expects E to be a subroutine call. +*/ +{ + if (strncmp (E->Arg, "decsp", 5) == 0) { + if (E->Arg[5] >= '1' && E->Arg[5] <= '8') { + return (E->Arg[5] - '0'); + } + } else if (strcmp (E->Arg, "subysp") == 0 && RegValIsKnown (E->RI->In.RegY)) { + return E->RI->In.RegY; + } + + /* If we come here, it's not a decsp op */ + return 0; +} + + + +unsigned OptStackPtrOps (CodeSeg* S) +/* Merge adjacent calls to decsp into one. NOTE: This function won't merge all +** known cases! +*/ +{ + unsigned Changes = 0; + unsigned I; + + /* Walk over the entries */ + I = 0; + while (I < CS_GetEntryCount (S)) { + + unsigned Dec1; + unsigned Dec2; + const CodeEntry* N; + + /* Get the next entry */ + const CodeEntry* E = CS_GetEntry (S, I); + + /* Check for decspn or subysp */ + if (E->OPC == OP65_JSR && + (Dec1 = IsDecSP (E)) > 0 && + (N = CS_GetNextEntry (S, I)) != 0 && + (Dec2 = IsDecSP (N)) > 0 && + (Dec1 += Dec2) <= 255 && + !CE_HasLabel (N)) { + + CodeEntry* X; + char Buf[20]; + + /* We can combine the two */ + if (Dec1 <= 8) { + /* Insert a call to decsp */ + xsprintf (Buf, sizeof (Buf), "decsp%u", Dec1); + X = NewCodeEntry (OP65_JSR, AM65_ABS, Buf, 0, N->LI); + CS_InsertEntry (S, X, I+2); + } else { + /* Insert a call to subysp */ + const char* Arg = MakeHexArg (Dec1); + X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, N->LI); + CS_InsertEntry (S, X, I+2); + X = NewCodeEntry (OP65_JSR, AM65_ABS, "subysp", 0, N->LI); + CS_InsertEntry (S, X, I+3); + } + + /* Delete the old code */ + CS_DelEntries (S, I, 2); + + /* Regenerate register info */ + CS_GenRegInfo (S); + + /* Remember we had changes */ + ++Changes; + + } else { + + /* Next entry */ + ++I; + } + + } + + /* Return the number of changes made */ + return Changes; +} + + + +unsigned OptGotoSPAdj (CodeSeg* S) +/* Optimize SP adjustment for forward 'goto' */ +{ + unsigned Changes = 0; + unsigned I; + + /* Walk over the entries */ + I = 0; + while (I < CS_GetEntryCount (S)) { + + CodeEntry* L[10], *X; + unsigned short adjustment; + const char* Arg; + + /* Get next entry */ + L[0] = CS_GetEntry (S, I); + + /* Check for the sequence generated by g_lateadjustSP */ + if (L[0]->OPC == OP65_PHA && + CS_GetEntries (S, L+1, I+1, 9) && + L[1]->OPC == OP65_LDA && + L[1]->AM == AM65_ABS && + L[2]->OPC == OP65_CLC && + L[3]->OPC == OP65_ADC && + strcmp (L[3]->Arg, "sp") == 0 && + L[6]->OPC == OP65_ADC && + strcmp (L[6]->Arg, "sp+1") == 0 && + L[9]->OPC == OP65_JMP) { + adjustment = FindSPAdjustment (L[1]->Arg); + + if (adjustment == 0) { + /* No SP adjustment needed, remove the whole sequence */ + CS_DelEntries (S, I, 9); + } + else if (adjustment >= 65536 - 8) { + /* If adjustment is in range [-8, 0) we use decsp* calls */ + char Buf[20]; + adjustment = 65536 - adjustment; + xsprintf (Buf, sizeof (Buf), "decsp%u", adjustment); + X = NewCodeEntry (OP65_JSR, AM65_ABS, Buf, 0, L[1]->LI); + CS_InsertEntry (S, X, I + 9); + + /* Delete the old code */ + CS_DelEntries (S, I, 9); + } + else if (adjustment >= 65536 - 255) { + /* For range [-255, -8) we have ldy #, jsr subysp */ + adjustment = 65536 - adjustment; + Arg = MakeHexArg (adjustment); + X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, L[1]->LI); + CS_InsertEntry (S, X, I + 9); + X = NewCodeEntry (OP65_JSR, AM65_ABS, "subysp", 0, L[1]->LI); + CS_InsertEntry (S, X, I + 10); + + /* Delete the old code */ + CS_DelEntries (S, I, 9); + } + else if (adjustment > 255) { + /* For ranges [-32768, 255) and (255, 32767) the only modification + ** is to replace the absolute with immediate addressing + */ + Arg = MakeHexArg (adjustment & 0xff); + X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, L[1]->LI); + CS_InsertEntry (S, X, I + 1); + Arg = MakeHexArg (adjustment >> 8); + X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, L[5]->LI); + CS_InsertEntry (S, X, I + 6); + + /* Delete the old code */ + CS_DelEntry (S, I + 2); + CS_DelEntry (S, I + 6); + } + else if (adjustment > 8) { + /* For range (8, 255] we have ldy #, jsr addysp */ + Arg = MakeHexArg (adjustment & 0xff); + X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, L[1]->LI); + CS_InsertEntry (S, X, I + 9); + X = NewCodeEntry (OP65_JSR, AM65_ABS, "addysp", 0, L[1]->LI); + CS_InsertEntry (S, X, I + 10); + + /* Delete the old code */ + CS_DelEntries (S, I, 9); + } + else { + /* If adjustment is in range (0, 8] we use incsp* calls */ + char Buf[20]; + xsprintf (Buf, sizeof (Buf), "incsp%u", adjustment); + X = NewCodeEntry (OP65_JSR, AM65_ABS, Buf, 0, L[1]->LI); + CS_InsertEntry (S, X, I + 9); + + /* Delete the old code */ + CS_DelEntries (S, I, 9); + } + /* Regenerate register info */ + CS_GenRegInfo (S); + + /* Remember we had changes */ + Changes++; + + } else { + + /* Next entry */ + ++I; + } + + } + + /* Return the number of changes made */ + return Changes; +} + + + +/*****************************************************************************/ +/* Optimize stack load ops */ +/*****************************************************************************/ + + + +unsigned OptLoad1 (CodeSeg* S) +/* Search for a call to ldaxysp where X is not used later and replace it by +** a load of just the A register. +*/ +{ + unsigned I; + unsigned Changes = 0; + + /* Walk over the entries */ + I = 0; + while (I < CS_GetEntryCount (S)) { + + CodeEntry* E; + + /* Get next entry */ + E = CS_GetEntry (S, I); + + /* Check for the sequence */ + if (CE_IsCallTo (E, "ldaxysp") && + RegValIsKnown (E->RI->In.RegY) && + !RegXUsed (S, I+1)) { + + CodeEntry* X; + + /* Reload the Y register */ + const char* Arg = MakeHexArg (E->RI->In.RegY - 1); + X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); + CS_InsertEntry (S, X, I+1); + + /* Load from stack */ + X = NewCodeEntry (OP65_LDA, AM65_ZP_INDY, "sp", 0, E->LI); + CS_InsertEntry (S, X, I+2); + + /* Now remove the call to the subroutine */ + CS_DelEntry (S, I); + + /* Remember, we had changes */ + ++Changes; + + } + + /* Next entry */ + ++I; + + } + + /* Return the number of changes made */ + return Changes; +} + + + +unsigned OptLoad2 (CodeSeg* S) +/* Replace calls to ldaxysp by inline code */ +{ + unsigned I; + unsigned Changes = 0; + + /* Walk over the entries */ + I = 0; + while (I < CS_GetEntryCount (S)) { + + CodeEntry* L[3]; + + /* Get next entry */ + L[0] = CS_GetEntry (S, I); + + /* Check for the sequence */ + if (CE_IsCallTo (L[0], "ldaxysp")) { + + CodeEntry* X; + + /* Followed by sta abs/stx abs? */ + if (CS_GetEntries (S, L+1, I+1, 2) && + L[1]->OPC == OP65_STA && + L[2]->OPC == OP65_STX && + (L[1]->Arg == 0 || + L[2]->Arg == 0 || + strcmp (L[1]->Arg, L[2]->Arg) != 0) && + !CS_RangeHasLabel (S, I+1, 2) && + !RegXUsed (S, I+3)) { + + /* A/X are stored into memory somewhere and X is not used + ** later + */ + + /* lda (sp),y */ + X = NewCodeEntry (OP65_LDA, AM65_ZP_INDY, "sp", 0, L[0]->LI); + CS_InsertEntry (S, X, I+3); + + /* sta abs */ + X = NewCodeEntry (OP65_STA, L[2]->AM, L[2]->Arg, 0, L[2]->LI); + CS_InsertEntry (S, X, I+4); + + /* dey */ + X = NewCodeEntry (OP65_DEY, AM65_IMP, 0, 0, L[0]->LI); + CS_InsertEntry (S, X, I+5); + + /* lda (sp),y */ + X = NewCodeEntry (OP65_LDA, AM65_ZP_INDY, "sp", 0, L[0]->LI); + CS_InsertEntry (S, X, I+6); + + /* sta abs */ + X = NewCodeEntry (OP65_STA, L[1]->AM, L[1]->Arg, 0, L[1]->LI); + CS_InsertEntry (S, X, I+7); + + /* Now remove the call to the subroutine and the sta/stx */ + CS_DelEntries (S, I, 3); + + } else { + + /* Standard replacement */ + + /* lda (sp),y */ + X = NewCodeEntry (OP65_LDA, AM65_ZP_INDY, "sp", 0, L[0]->LI); + CS_InsertEntry (S, X, I+1); + + /* tax */ + X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, L[0]->LI); + CS_InsertEntry (S, X, I+2); + + /* dey */ + X = NewCodeEntry (OP65_DEY, AM65_IMP, 0, 0, L[0]->LI); + CS_InsertEntry (S, X, I+3); + + /* lda (sp),y */ + X = NewCodeEntry (OP65_LDA, AM65_ZP_INDY, "sp", 0, L[0]->LI); + CS_InsertEntry (S, X, I+4); + + /* Now remove the call to the subroutine */ + CS_DelEntry (S, I); + + } + + /* Remember, we had changes */ + ++Changes; + + } + + /* Next entry */ + ++I; + } + + /* Return the number of changes made */ + return Changes; +} diff --git a/src/cc65/coptmisc.h b/src/cc65/coptmisc.h new file mode 100644 index 000000000..89242351c --- /dev/null +++ b/src/cc65/coptmisc.h @@ -0,0 +1,113 @@ +/*****************************************************************************/ +/* */ +/* codemisc.h */ +/* */ +/* Miscellaneous optimization operations */ +/* */ +/* */ +/* */ +/* (C) 2001-2012, Ullrich von Bassewitz */ +/* Roemerstrasse 52 */ +/* D-70794 Filderstadt */ +/* EMail: uz@cc65.org */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef COPTMISC_H +#define COPTMISC_H + + + +/* cc65 */ +#include "codeseg.h" + + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +unsigned OptDecouple (CodeSeg* S); +/* Decouple operations, that is, do the following replacements: +** +** dex -> ldx #imm +** inx -> ldx #imm +** dey -> ldy #imm +** iny -> ldy #imm +** tax -> ldx #imm +** txa -> lda #imm +** tay -> ldy #imm +** tya -> lda #imm +** lda zp -> lda #imm +** ldx zp -> ldx #imm +** ldy zp -> ldy #imm +** +** Provided that the register values are known of course. +*/ + +unsigned OptIndLoads1 (CodeSeg* S); +/* Change +** +** lda (zp),y +** +** into +** +** lda (zp,x) +** +** provided that x and y are both zero. +*/ + +unsigned OptIndLoads2 (CodeSeg* S); +/* Change +** +** lda (zp,x) +** +** into +** +** lda (zp),y +** +** provided that x and y are both zero. +*/ + +unsigned OptStackPtrOps (CodeSeg* S); +/* Merge adjacent calls to decsp into one. NOTE: This function won't merge all +** known cases! +*/ + +unsigned OptGotoSPAdj (CodeSeg* S); +/* Optimize SP adjustment for forward 'goto' */ + +unsigned OptLoad1 (CodeSeg* S); +/* Search for a call to ldaxysp where X is not used later and replace it by +** a load of just the A register. +*/ + +unsigned OptLoad2 (CodeSeg* S); +/* Replace calls to ldaxysp by inline code */ + + +/* End of coptmisc.h */ + +#endif diff --git a/src/cc65/coptneg.c b/src/cc65/coptneg.c index 03b39eb42..27171c68d 100644 --- a/src/cc65/coptneg.c +++ b/src/cc65/coptneg.c @@ -68,15 +68,15 @@ unsigned OptBNegA1 (CodeSeg* S) CodeEntry* E = CS_GetEntry (S, I); /* Check for a ldx */ - if (E->OPC == OP65_LDX && - E->AM == AM65_IMM && - (E->Flags & CEF_NUMARG) != 0 && - E->Num == 0 && - CS_GetEntries (S, L, I+1, 2) && - L[0]->OPC == OP65_LDA && - (L[0]->Use & REG_X) == 0 && - !CE_HasLabel (L[0]) && - CE_IsCallTo (L[1], "bnega") && + if (E->OPC == OP65_LDX && + E->AM == AM65_IMM && + CE_HasNumArg (E) && + E->Num == 0 && + CS_GetEntries (S, L, I+1, 2) && + L[0]->OPC == OP65_LDA && + (L[0]->Use & REG_X) == 0 && + !CE_HasLabel (L[0]) && + CE_IsCallTo (L[1], "bnega") && !CE_HasLabel (L[1])) { /* Remove the ldx instruction */ @@ -480,7 +480,7 @@ unsigned OptNegAX2 (CodeSeg* S) ** eor #$FF ** clc ** adc #$01 -** bne L1 +** bcc L1 ** inx ** L1: ** @@ -528,8 +528,8 @@ unsigned OptNegAX2 (CodeSeg* S) /* Get the label attached to the insn following the call */ L = CS_GenLabel (S, P); - /* bne L */ - X = NewCodeEntry (OP65_BNE, AM65_BRA, L->Name, L, E->LI); + /* bcc L */ + X = NewCodeEntry (OP65_BCC, AM65_BRA, L->Name, L, E->LI); CS_InsertEntry (S, X, I+5); /* inx */ diff --git a/src/cc65/coptneg.h b/src/cc65/coptneg.h index f549fc553..844d8b886 100644 --- a/src/cc65/coptneg.h +++ b/src/cc65/coptneg.h @@ -155,7 +155,7 @@ unsigned OptNegAX2 (CodeSeg* S); ** eor #$FF ** clc ** adc #$01 -** bne L1 +** bcc L1 ** inx ** L1: ** diff --git a/src/cc65/coptptrload.c b/src/cc65/coptptrload.c index ee783c93f..046e65d79 100644 --- a/src/cc65/coptptrload.c +++ b/src/cc65/coptptrload.c @@ -988,7 +988,7 @@ unsigned OptPtrLoad12 (CodeSeg* S) L[4]->OPC == OP65_CLC && L[5]->OPC == OP65_ADC && CE_IsKnownImm (L[5], 1) && - L[6]->OPC == OP65_BCC && + (L[6]->OPC == OP65_BCC || L[6]->OPC == OP65_JCC) && L[6]->JumpTo != 0 && L[6]->JumpTo->Owner == L[8] && L[7]->OPC == OP65_INX && @@ -1457,3 +1457,217 @@ unsigned OptPtrLoad17 (CodeSeg* S) /* Return the number of changes made */ return Changes; } + + + +unsigned OptPtrLoad18 (CodeSeg* S) +/* Search for the sequence: +** +** ldx #$xx +** lda #$yy +** clc +** adc xxx +** bcc L +** inx +** L: ldy #$00 +** jsr ldauidx +** +** and replace it by: +** +** ldy xxx +** ldx #$00 +** lda $xxyy,y +** +** This is similar to OptPtrLoad3 but works on a constant address +** instead of a label. Also, the initial X and A loads are reversed. +** Must be run before OptPtrLoad7(). +*/ +{ + unsigned Changes = 0; + + /* Walk over the entries */ + unsigned I = 0; + while (I < CS_GetEntryCount (S)) { + + CodeEntry* L[8]; + + /* Get next entry */ + L[0] = CS_GetEntry (S, I); + + /* Check for the sequence */ + if (L[0]->OPC == OP65_LDX && + L[0]->AM == AM65_IMM && + CS_GetEntries (S, L+1, I+1, 7) && + L[1]->OPC == OP65_LDA && + L[1]->AM == AM65_IMM && + L[2]->OPC == OP65_CLC && + L[3]->OPC == OP65_ADC && + (L[3]->AM == AM65_ABS || L[3]->AM == AM65_ZP) && + (L[4]->OPC == OP65_BCC || L[4]->OPC == OP65_JCC) && + L[4]->JumpTo != 0 && + L[4]->JumpTo->Owner == L[6] && + L[5]->OPC == OP65_INX && + L[6]->OPC == OP65_LDY && + CE_IsKnownImm (L[6], 0) && + CE_IsCallTo (L[7], "ldauidx") && + !CS_RangeHasLabel (S, I+1, 5) && + !CE_HasLabel (L[7]) && + L[0]->Arg[0] == '$' && + L[1]->Arg[0] == '$' && + strlen (L[0]->Arg) == 3 && + strlen (L[1]->Arg) == 3 ) { + + CodeEntry* X; + char* Label; + + /* We will create all the new stuff behind the current one so + ** we keep the line references. + */ + X = NewCodeEntry (OP65_LDY, L[3]->AM, L[3]->Arg, 0, L[0]->LI); + CS_InsertEntry (S, X, I+8); + + X = NewCodeEntry (OP65_LDX, AM65_IMM, "$00", 0, L[0]->LI); + CS_InsertEntry (S, X, I+9); + + Label = xmalloc(6); + sprintf(Label, "$%s%s", L[0]->Arg+1, L[1]->Arg+1); + X = NewCodeEntry (OP65_LDA, AM65_ABSY, Label, 0, L[0]->LI); + CS_InsertEntry (S, X, I+10); + xfree (Label); + + /* Remove the old code */ + CS_DelEntries (S, I, 8); + + /* Remember, we had changes */ + ++Changes; + + } + + /* Next entry */ + ++I; + + } + + /* Return the number of changes made */ + return Changes; +} + + + +unsigned OptPtrLoad19 (CodeSeg* S) +/* Search for the sequence: +** +** ldx #0 +** and #mask (any value < 0x80) +** jsr aslax1/shlax1 +** clc +** adc #<(label+0) +** tay +** txa +** adc #>(label+0) +** tax +** tya +** ldy #$01 +** jsr ldaxidx +** +** and replace it by: +** +** and #mask (remove if == 0x7F) +** asl +** tay +** lda label,y +** ldx label+1,y +*/ +{ + unsigned Changes = 0; + unsigned I; + + /* Walk over the entries */ + I = 0; + while (I < CS_GetEntryCount (S)) { + + CodeEntry* L[12]; + + /* Get next entry */ + L[0] = CS_GetEntry (S, I); + + /* Check for the sequence */ + if (L[0]->OPC == OP65_LDX && + CE_IsKnownImm(L[0], 0) && + CS_GetEntries (S, L+1, I+1, 11) && + L[1]->OPC == OP65_AND && + L[1]->AM == AM65_IMM && + CE_HasNumArg (L[1]) && L[1]->Num <= 0x7F && + L[2]->OPC == OP65_JSR && + L[3]->OPC == OP65_CLC && + L[4]->OPC == OP65_ADC && + L[5]->OPC == OP65_TAY && + L[6]->OPC == OP65_TXA && + L[7]->OPC == OP65_ADC && + L[8]->OPC == OP65_TAX && + L[9]->OPC == OP65_TYA && + L[10]->OPC == OP65_LDY && + CE_IsKnownImm(L[10], 1) && + L[4]->Arg[0] == '<' && + L[7]->Arg[0] == '>' && + strlen(L[4]->Arg) > 3 && + strlen(L[7]->Arg) > 3 && + strcmp(L[4]->Arg+1, L[7]->Arg+1) == 0 && + (strcmp (L[2]->Arg, "aslax1") == 0 || + strcmp (L[2]->Arg, "shlax1") == 0) && + CE_IsCallTo (L[11], "ldaxidx") && + !CS_RangeHasLabel (S, I+1, 11)) { + + CodeEntry* X; + char* Label; + int Len = strlen(L[4]->Arg); + + /* Track the insertion point */ + unsigned IP = I + 12; + + /* asl a */ + X = NewCodeEntry (OP65_ASL, AM65_ACC, "a", 0, L[2]->LI); + CS_InsertEntry (S, X, IP++); + + /* tay */ + X = NewCodeEntry (OP65_TAY, AM65_IMP, 0, 0, L[2]->LI); + CS_InsertEntry (S, X, IP++); + + /* lda label,y */ + /* allocate Label memory */ + Label = memcpy (xmalloc (Len), L[4]->Arg+2, Len-3); + Label[Len-3] = '\0'; + X = NewCodeEntry (OP65_LDA, AM65_ABSY, Label, 0, L[10]->LI); + CS_InsertEntry (S, X, IP++); + + /* ldx label+1,y */ + strcpy(&Label[Len-3], "+1"); + X = NewCodeEntry (OP65_LDX, AM65_ABSY, Label, 0, L[10]->LI); + CS_InsertEntry (S, X, IP++); + /* free Label memory */ + xfree (Label); + + /* Remove the old code */ + /* Remove the AND only if it's == 0x7F, since ASL erases high bit */ + if (L[1]->Num == 0x7F) { + CS_DelEntries (S, I+1, 11); + } else { + CS_DelEntries (S, I+2, 10); + } + + /* Remove the ldx #0 */ + CS_DelEntry(S, I); + + /* Remember, we had changes */ + ++Changes; + + } + + /* Next entry */ + ++I; + + } + + /* Return the number of changes made */ + return Changes; +} diff --git a/src/cc65/coptptrload.h b/src/cc65/coptptrload.h index fd93bf5c2..d4e0e2ed4 100644 --- a/src/cc65/coptptrload.h +++ b/src/cc65/coptptrload.h @@ -233,7 +233,7 @@ unsigned OptPtrLoad11 (CodeSeg* S); */ unsigned OptPtrLoad12 (CodeSeg* S); -/* Search for the sequence: +/* Search for the sequence: ** ** lda regbank+n ** ldx regbank+n+1 @@ -356,6 +356,53 @@ unsigned OptPtrLoad17 (CodeSeg* S); ** the step with less than 200% so it gets executed when -Oi is in effect. */ +unsigned OptPtrLoad18 (CodeSeg* S); +/* Search for the sequence: +** +** ldx #$xx +** lda #$yy +** clc +** adc xxx +** bcc L +** inx +** L: ldy #$00 +** jsr ldauidx +** +** and replace it by: +** +** ldy xxx +** ldx #$00 +** lda $xxyy,y +** +** This is similar to OptPtrLoad3 but works on a constant address +** instead of a label. Also, the initial X and A loads are reversed. +*/ + + +unsigned OptPtrLoad19 (CodeSeg* S); +/* Search for the sequence: +** +** ldx #0 +** and #mask (any value < 0x80) +** jsr aslax1/shlax1 +** clc +** adc #<(label+0) +** tay +** txa +** adc #>(label+0) +** tax +** tya +** ldy #$01 +** jsr ldaxidx +** +** and replace it by: +** +** and #mask (remove if == 0x7F) +** asl +** tay +** lda label,y +** ldx label+1,y +*/ /* End of coptptrload.h */ diff --git a/src/cc65/coptpush.c b/src/cc65/coptpush.c index 5c3daffca..34d794c64 100644 --- a/src/cc65/coptpush.c +++ b/src/cc65/coptpush.c @@ -56,12 +56,14 @@ unsigned OptPush1 (CodeSeg* S) ** ** ldy #xx+2 ** jsr pushwysp +** ldy #$00 ; present if later code expects Y = 0 ** -** saving 3 bytes and several cycles. +** saving several cycles. */ { unsigned I; unsigned Changes = 0; + unsigned R; /* Walk over the entries */ I = 0; @@ -79,7 +81,7 @@ unsigned OptPush1 (CodeSeg* S) (L[1] = CS_GetNextEntry (S, I)) != 0 && !CE_HasLabel (L[1]) && CE_IsCallTo (L[1], "pushax") && - !RegAXUsed (S, I+2)) { + ((R = (GetRegInfo (S, I+2, REG_AXY))) & REG_AX) == 0) { /* Insert new code behind the pushax */ const char* Arg; @@ -94,12 +96,25 @@ unsigned OptPush1 (CodeSeg* S) X = NewCodeEntry (OP65_JSR, AM65_ABS, "pushwysp", 0, L[1]->LI); CS_InsertEntry (S, X, I+3); + /* pushax sets Y = 0 and following code might rely on this */ + if ((R & REG_Y) != 0) { + /* ldy #0 */ + X = NewCodeEntry (OP65_LDY, AM65_IMM, MakeHexArg (0), 0, L[1]->LI); + CS_InsertEntry (S, X, I+4); + } + /* Delete the old code */ CS_DelEntries (S, I, 2); /* Remember, we had changes */ ++Changes; + /* Skip the handled lines */ + if ((R & REG_Y) == 0) { + ++I; + } else { + I += 2; + } } /* Next entry */ diff --git a/src/cc65/coptpush.h b/src/cc65/coptpush.h index 0d637e824..aa5548517 100644 --- a/src/cc65/coptpush.h +++ b/src/cc65/coptpush.h @@ -52,16 +52,16 @@ unsigned OptPush1 (CodeSeg* S); /* Given a sequence ** -** ldy #xx ** jsr ldaxysp ** jsr pushax ** -** If a/x are not used later, replace that by +** If a/x are not used later, and Y is known, replace that by ** ** ldy #xx+2 ** jsr pushwysp +** ldy #$00 ; present if later code expects Y = 0 ** -** saving 3 bytes and several cycles. +** saving several cycles. */ unsigned OptPush2 (CodeSeg* S); diff --git a/src/cc65/coptshift.c b/src/cc65/coptshift.c index 92210ebb5..aef3f64bc 100644 --- a/src/cc65/coptshift.c +++ b/src/cc65/coptshift.c @@ -341,7 +341,10 @@ unsigned OptShift2 (CodeSeg* S) L[0] = CS_GetEntry (S, I); /* Check for the sequence */ - if ((L[0]->OPC == OP65_BPL || L[0]->OPC == OP65_BCC) && + if ((L[0]->OPC == OP65_BPL || + L[0]->OPC == OP65_BCC || + L[0]->OPC == OP65_JPL || + L[0]->OPC == OP65_JCC) && L[0]->JumpTo != 0 && CS_GetEntries (S, L+1, I+1, 3) && L[1]->OPC == OP65_DEX && diff --git a/src/cc65/coptsize.c b/src/cc65/coptsize.c index 5c23e637c..a5da4736d 100644 --- a/src/cc65/coptsize.c +++ b/src/cc65/coptsize.c @@ -76,730 +76,730 @@ static const CallDesc CallTable [] = { { "addeqysp", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "addeq0sp" },{ "laddeq", { - /* A X Y SRegLo */ - 1, 0, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 1, 0, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "laddeq1" },{ "laddeq", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "laddeqa" },{ "laddeqysp", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "laddeq0sp" },{ "ldaxidx", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, 1, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, 1, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "ldaxi" },{ "ldaxysp", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, 1, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, 1, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "ldax0sp" },{ "ldeaxidx", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, 3, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, 3, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "ldeaxi" },{ "ldeaxysp", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, 3, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, 3, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "ldeax0sp" },{ "leaaxsp", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "leaa0sp" },{ "lsubeq", { - /* A X Y SRegLo */ - 1, 0, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 1, 0, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "lsubeq1" },{ "lsubeq", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "lsubeqa" },{ "lsubeqysp", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "lsubeq0sp" },{ "pusha", { - /* A X Y SRegLo */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_SLOWER, "pushc0" },{ "pusha", { - /* A X Y SRegLo */ - 1, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 1, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_SLOWER, "pushc1" },{ "pusha", { - /* A X Y SRegLo */ - 2, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 2, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_SLOWER, "pushc2" },{ "pushax", { - /* A X Y SRegLo */ - 0, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 0, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "push0" },{ "pushax", { - /* A X Y SRegLo */ - 1, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 1, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_SLOWER, "push1" },{ "pushax", { - /* A X Y SRegLo */ - 2, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 2, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_SLOWER, "push2" },{ "pushax", { - /* A X Y SRegLo */ - 3, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 3, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_SLOWER, "push3" },{ "pushax", { - /* A X Y SRegLo */ - 4, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 4, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_SLOWER, "push4" },{ "pushax", { - /* A X Y SRegLo */ - 5, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 5, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_SLOWER, "push5" },{ "pushax", { - /* A X Y SRegLo */ - 6, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 6, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_SLOWER, "push6" },{ "pushax", { - /* A X Y SRegLo */ - 7, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 7, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_SLOWER, "push7" },{ "pushax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "pusha0" },{ "pushax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0xFF, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0xFF, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_SLOWER, "pushaFF" },{ "pushaysp", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "pusha0sp" },{ "pusheax", { - /* A X Y SRegLo */ - 0, 0, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 0, 0, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "pushl0" },{ "pusheax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "push0ax" },{ "pushwidx", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, 1, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, 1, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "pushw" },{ "pushwysp", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, 3, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, 3, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "pushw0sp" },{ "staxysp", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "stax0sp" },{ "steaxysp", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "steax0sp" },{ "subeqysp", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "subeq0sp" },{ "tosaddax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosadda0" },{ "tosaddeax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosadd0ax" },{ "tosandax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosanda0" },{ "tosandeax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosand0ax" },{ "tosdivax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosdiva0" },{ "tosdiveax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosdiv0ax" },{ "toseqax", { - /* A X Y SRegLo */ - 0, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 0, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "toseq00" },{ "toseqax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "toseqa0" },{ "tosgeax", { - /* A X Y SRegLo */ - 0, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 0, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosge00" },{ "tosgeax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosgea0" },{ "tosgtax", { - /* A X Y SRegLo */ - 0, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 0, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosgt00" },{ "tosgtax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosgta0" },{ "tosicmp", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosicmp0" },{ "tosleax", { - /* A X Y SRegLo */ - 0, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 0, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosle00" },{ "tosleax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "toslea0" },{ "tosltax", { - /* A X Y SRegLo */ - 0, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + 0, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "toslt00" },{ "tosltax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "toslta0" },{ "tosmodax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosmoda0" },{ "tosmodeax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosmod0ax" },{ "tosmulax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosmula0" },{ "tosmuleax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosmul0ax" },{ "tosneax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosnea0" },{ "tosorax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosora0" },{ "tosoreax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosor0ax" },{ "tosrsubax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosrsuba0" },{ "tosrsubeax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosrsub0ax" },{ "tossubax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tossuba0" },{ "tossubeax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tossub0ax" },{ "tosudivax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosudiva0" },{ "tosudiveax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosudiv0ax" },{ "tosugeax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosugea0" },{ "tosugtax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosugta0" },{ "tosuleax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosulea0" },{ "tosultax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosulta0" },{ "tosumodax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosumoda0" },{ "tosumodeax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosumod0ax" },{ "tosumulax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosumula0" },{ "tosumuleax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosumul0ax" },{ "tosxorax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosxora0" },{ "tosxoreax", { - /* A X Y SRegLo */ - UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, - /* SRegHi Ptr1Lo Ptr1Hi Tmp1 */ - 0, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL + /* A X Y SRegLo SRegHi */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, 0, 0, + /* Ptr1Lo Ptr1Hi Tmp1 PFlags ZNRegs */ + UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_REGVAL, UNKNOWN_PFVAL_ALL, ZNREG_NONE }, F_NONE, "tosxor0ax" diff --git a/src/cc65/coptstop.c b/src/cc65/coptstop.c index cf6392bd3..08f6c820e 100644 --- a/src/cc65/coptstop.c +++ b/src/cc65/coptstop.c @@ -6,7 +6,7 @@ /* */ /* */ /* */ -/* (C) 2001-2013, Ullrich von Bassewitz */ +/* (C) 2001-2019, Ullrich von Bassewitz */ /* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ @@ -41,48 +41,12 @@ /* cc65 */ #include "codeent.h" #include "codeinfo.h" +#include "codeoptutil.h" #include "coptstop.h" #include "error.h" -/*****************************************************************************/ -/* Load tracking data */ -/*****************************************************************************/ - - - -/* LoadRegInfo flags set by DirectOp */ -typedef enum { - LI_NONE = 0x00, - LI_DIRECT = 0x01, /* Direct op may be used */ - LI_RELOAD_Y = 0x02, /* Reload index register Y */ - LI_REMOVE = 0x04, /* Load may be removed */ - LI_DONT_REMOVE = 0x08, /* Load may not be removed */ - LI_DUP_LOAD = 0x10, /* Duplicate load */ -} LI_FLAGS; - -/* Structure that tells us how to load the lhs values */ -typedef struct LoadRegInfo LoadRegInfo; -struct LoadRegInfo { - LI_FLAGS Flags; /* Tells us how to load */ - int LoadIndex; /* Index of load insn, -1 if invalid */ - CodeEntry* LoadEntry; /* The actual entry, 0 if invalid */ - int XferIndex; /* Index of transfer insn */ - CodeEntry* XferEntry; /* The actual transfer entry */ - int Offs; /* Stack offset if data is on stack */ -}; - -/* Now combined for both registers */ -typedef struct LoadInfo LoadInfo; -struct LoadInfo { - LoadRegInfo A; /* Info for A register */ - LoadRegInfo X; /* Info for X register */ - LoadRegInfo Y; /* Info for Y register */ -}; - - - /*****************************************************************************/ /* Data */ /*****************************************************************************/ @@ -91,18 +55,27 @@ struct LoadInfo { /* Flags for the functions */ typedef enum { - OP_NONE = 0x00, /* Nothing special */ - OP_A_KNOWN = 0x01, /* Value of A must be known */ - OP_X_ZERO = 0x02, /* X must be zero */ - OP_LHS_LOAD = 0x04, /* Must have load insns for LHS */ - OP_LHS_LOAD_DIRECT = 0x0C, /* Must have direct load insn for LHS */ - OP_RHS_LOAD = 0x10, /* Must have load insns for RHS */ - OP_RHS_LOAD_DIRECT = 0x30, /* Must have direct load insn for RHS */ + OP_NONE = 0x00, /* Nothing special */ + OP_A_KNOWN = 0x01, /* Value of A must be known */ + OP_X_ZERO = 0x02, /* X must be zero */ + OP_LHS_LOAD = 0x04, /* Must have load insns for LHS */ + OP_LHS_SAME_BY_OP = 0x08, /* Load result of LHS must be the same if relocated to op */ + OP_LHS_LOAD_DIRECT = 0x0C, /* Must have direct load insn for LHS */ + OP_RHS_LOAD = 0x10, /* Must have load insns for RHS */ + OP_RHS_SAME_BY_OP = 0x20, /* Load result of RHS must be the same if relocated to op */ + OP_RHS_LOAD_DIRECT = 0x30, /* Must have direct load insn for RHS */ + OP_AX_INTERCHANGE = 0x40, /* Preconditions of A/X may be interchanged */ + OP_LR_INTERCHANGE = 0x80, /* Preconditions of LHS/RHS may be interchanged */ + OP_LHS_SAME_BY_PUSH = 0x0100, /* LHS must load the same content if relocated to push */ + OP_RHS_SAME_BY_PUSH = 0x0200, /* RHS must load the same content if relocated to push */ + OP_LHS_SAME_BY_RHS = 0x0400, /* LHS must load the same content if relocated to RHS */ + OP_RHS_SAME_BY_LHS = 0x0800, /* RHS must load the same content if relocated to LHS */ + OP_LHS_REMOVE = 0x1000, /* LHS must be removable or RHS may use ZP store/load */ + OP_LHS_REMOVE_DIRECT = 0x3000, /* LHS must be directly removable */ + OP_RHS_REMOVE = 0x4000, /* RHS must be removable or LHS may use ZP store/load */ + OP_RHS_REMOVE_DIRECT = 0xC000, /* RHS must be directly removable */ } OP_FLAGS; -/* Structure forward decl */ -typedef struct StackOpData StackOpData; - /* Structure that describes an optimizer subfunction for a specific op */ typedef unsigned (*OptFunc) (StackOpData* D); typedef struct OptFuncDesc OptFuncDesc; @@ -113,261 +86,6 @@ struct OptFuncDesc { OP_FLAGS Flags; /* Flags */ }; -/* Structure that holds the needed data */ -struct StackOpData { - CodeSeg* Code; /* Pointer to code segment */ - unsigned Flags; /* Flags to remember things */ - - /* Pointer to optimizer subfunction description */ - const OptFuncDesc* OptFunc; - - /* ZP register usage inside the sequence */ - unsigned UsedRegs; - - /* Register load information for lhs and rhs */ - LoadInfo Lhs; - LoadInfo Rhs; - - /* Several indices of insns in the code segment */ - int PushIndex; /* Index of call to pushax in codeseg */ - int OpIndex; /* Index of actual operation */ - - /* Pointers to insns in the code segment */ - CodeEntry* PrevEntry; /* Entry before the call to pushax */ - CodeEntry* PushEntry; /* Pointer to entry with call to pushax */ - CodeEntry* OpEntry; /* Pointer to entry with op */ - CodeEntry* NextEntry; /* Entry after the op */ - - const char* ZPLo; /* Lo byte of zero page loc to use */ - const char* ZPHi; /* Hi byte of zero page loc to use */ - unsigned IP; /* Insertion point used by some routines */ -}; - - - -/*****************************************************************************/ -/* Load tracking code */ -/*****************************************************************************/ - - - -static void ClearLoadRegInfo (LoadRegInfo* RI) -/* Clear a LoadRegInfo struct */ -{ - RI->Flags = LI_NONE; - RI->LoadIndex = -1; - RI->XferIndex = -1; - RI->Offs = 0; -} - - - -static void FinalizeLoadRegInfo (LoadRegInfo* RI, CodeSeg* S) -/* Prepare a LoadRegInfo struct for use */ -{ - /* Get the entries */ - if (RI->LoadIndex >= 0) { - RI->LoadEntry = CS_GetEntry (S, RI->LoadIndex); - } else { - RI->LoadEntry = 0; - } - if (RI->XferIndex >= 0) { - RI->XferEntry = CS_GetEntry (S, RI->XferIndex); - } else { - RI->XferEntry = 0; - } -} - - - -static void ClearLoadInfo (LoadInfo* LI) -/* Clear a LoadInfo struct */ -{ - ClearLoadRegInfo (&LI->A); - ClearLoadRegInfo (&LI->X); - ClearLoadRegInfo (&LI->Y); -} - - - -static void AdjustLoadRegInfo (LoadRegInfo* RI, int Index, int Change) -/* Adjust a load register info struct after deleting or inserting an entry -** with a given index -*/ -{ - CHECK (abs (Change) == 1); - if (Change < 0) { - /* Deletion */ - if (Index < RI->LoadIndex) { - --RI->LoadIndex; - } else if (Index == RI->LoadIndex) { - /* Has been removed */ - RI->LoadIndex = -1; - RI->LoadEntry = 0; - } - if (Index < RI->XferIndex) { - --RI->XferIndex; - } else if (Index == RI->XferIndex) { - /* Has been removed */ - RI->XferIndex = -1; - RI->XferEntry = 0; - } - } else { - /* Insertion */ - if (Index <= RI->LoadIndex) { - ++RI->LoadIndex; - } - if (Index <= RI->XferIndex) { - ++RI->XferIndex; - } - } -} - - - -static void FinalizeLoadInfo (LoadInfo* LI, CodeSeg* S) -/* Prepare a LoadInfo struct for use */ -{ - /* Get the entries */ - FinalizeLoadRegInfo (&LI->A, S); - FinalizeLoadRegInfo (&LI->X, S); - FinalizeLoadRegInfo (&LI->Y, S); -} - - - -static void AdjustLoadInfo (LoadInfo* LI, int Index, int Change) -/* Adjust a load info struct after deleting entry with a given index */ -{ - AdjustLoadRegInfo (&LI->A, Index, Change); - AdjustLoadRegInfo (&LI->X, Index, Change); - AdjustLoadRegInfo (&LI->Y, Index, Change); -} - - - -static void HonourUseAndChg (LoadRegInfo* RI, unsigned Reg, const CodeEntry* E) -/* Honour use and change flags for an instruction */ -{ - if (E->Chg & Reg) { - ClearLoadRegInfo (RI); - } else if ((E->Use & Reg) && RI->LoadIndex >= 0) { - RI->Flags |= LI_DONT_REMOVE; - } -} - - - -static void TrackLoads (LoadInfo* LI, CodeEntry* E, int I) -/* Track loads for a code entry */ -{ - if (E->Info & OF_LOAD) { - - LoadRegInfo* RI = 0; - - /* Determine, which register was loaded */ - if (E->Chg & REG_A) { - RI = &LI->A; - } else if (E->Chg & REG_X) { - RI = &LI->X; - } else if (E->Chg & REG_Y) { - RI = &LI->Y; - } - CHECK (RI != 0); - - /* If we had a load or xfer op before, this is a duplicate load which - ** can cause problems if it encountered between the pushax and the op, - ** so remember it. - */ - if (RI->LoadIndex >= 0 || RI->XferIndex >= 0) { - RI->Flags |= LI_DUP_LOAD; - } - - /* Remember the load */ - RI->LoadIndex = I; - RI->XferIndex = -1; - - /* Set load flags */ - RI->Flags &= ~(LI_DIRECT | LI_RELOAD_Y); - if (E->AM == AM65_IMM || E->AM == AM65_ZP || E->AM == AM65_ABS) { - /* These insns are all ok and replaceable */ - RI->Flags |= LI_DIRECT; - } else if (E->AM == AM65_ZP_INDY && - RegValIsKnown (E->RI->In.RegY) && - strcmp (E->Arg, "sp") == 0) { - /* A load from the stack with known offset is also ok, but in this - ** case we must reload the index register later. Please note that - ** a load indirect via other zero page locations is not ok, since - ** these locations may change between the push and the actual - ** operation. - */ - RI->Offs = (unsigned char) E->RI->In.RegY; - RI->Flags |= (LI_DIRECT | LI_RELOAD_Y); - } - - - } else if (E->Info & OF_XFR) { - - /* Determine source and target of the transfer and handle the TSX insn */ - LoadRegInfo* Src; - LoadRegInfo* Tgt; - switch (E->OPC) { - case OP65_TAX: Src = &LI->A; Tgt = &LI->X; break; - case OP65_TAY: Src = &LI->A; Tgt = &LI->Y; break; - case OP65_TXA: Src = &LI->X; Tgt = &LI->A; break; - case OP65_TYA: Src = &LI->Y; Tgt = &LI->A; break; - case OP65_TSX: ClearLoadRegInfo (&LI->X); return; - case OP65_TXS: return; - default: Internal ("Unknown XFR insn in TrackLoads"); - } - - /* If we had a load or xfer op before, this is a duplicate load which - ** can cause problems if it encountered between the pushax and the op, - ** so remember it. - */ - if (Tgt->LoadIndex >= 0 || Tgt->XferIndex >= 0) { - Tgt->Flags |= LI_DUP_LOAD; - } - - /* Transfer the data */ - Tgt->LoadIndex = Src->LoadIndex; - Tgt->XferIndex = I; - Tgt->Offs = Src->Offs; - Tgt->Flags &= ~(LI_DIRECT | LI_RELOAD_Y); - Tgt->Flags |= Src->Flags & (LI_DIRECT | LI_RELOAD_Y); - - } else if (CE_IsCallTo (E, "ldaxysp") && RegValIsKnown (E->RI->In.RegY)) { - - /* If we had a load or xfer op before, this is a duplicate load which - ** can cause problems if it encountered between the pushax and the op, - ** so remember it for both registers involved. - */ - if (LI->A.LoadIndex >= 0 || LI->A.XferIndex >= 0) { - LI->A.Flags |= LI_DUP_LOAD; - } - if (LI->X.LoadIndex >= 0 || LI->X.XferIndex >= 0) { - LI->X.Flags |= LI_DUP_LOAD; - } - - /* Both registers set, Y changed */ - LI->A.LoadIndex = I; - LI->A.XferIndex = -1; - LI->A.Flags |= (LI_DIRECT | LI_RELOAD_Y); - LI->A.Offs = (unsigned char) E->RI->In.RegY - 1; - - LI->X.LoadIndex = I; - LI->X.XferIndex = -1; - LI->X.Flags |= (LI_DIRECT | LI_RELOAD_Y); - LI->X.Offs = (unsigned char) E->RI->In.RegY; - - ClearLoadRegInfo (&LI->Y); - } else { - HonourUseAndChg (&LI->A, REG_A, E); - HonourUseAndChg (&LI->X, REG_X, E); - HonourUseAndChg (&LI->Y, REG_Y, E); - } -} - /*****************************************************************************/ @@ -376,348 +94,49 @@ static void TrackLoads (LoadInfo* LI, CodeEntry* E, int I) -static void InsertEntry (StackOpData* D, CodeEntry* E, int Index) -/* Insert a new entry. Depending on Index, D->PushIndex and D->OpIndex will -** be adjusted by this function. -*/ +static int SameRegAValue (StackOpData* D) +/* Check if Rhs Reg A == Lhs Reg A */ { - /* Insert the entry into the code segment */ - CS_InsertEntry (D->Code, E, Index); + RegInfo* LRI = GetLastChangedRegInfo (D, &D->Lhs.A); + RegInfo* RRI = GetLastChangedRegInfo (D, &D->Rhs.A); - /* Adjust register loads if necessary */ - AdjustLoadInfo (&D->Lhs, Index, 1); - AdjustLoadInfo (&D->Rhs, Index, 1); + /* RHS can have a -1 ChgIndex only if it is carried over from LHS */ + if (RRI == 0 || + (D->Rhs.A.ChgIndex >= 0 && + D->Rhs.A.ChgIndex == D->Lhs.A.ChgIndex) || + (LRI != 0 && + RegValIsKnown (LRI->Out.RegA) && + RegValIsKnown (RRI->Out.RegA) && + (LRI->Out.RegA & 0xFF) == (RRI->Out.RegA & 0xFF))) { - /* Adjust the indices if necessary */ - if (D->PushEntry && Index <= D->PushIndex) { - ++D->PushIndex; - } - if (D->OpEntry && Index <= D->OpIndex) { - ++D->OpIndex; + return 1; } + + return 0; + } -static void DelEntry (StackOpData* D, int Index) -/* Delete an entry. Depending on Index, D->PushIndex and D->OpIndex will be -** adjusted by this function, and PushEntry/OpEntry may get invalidated. -*/ +static int SameRegXValue (StackOpData* D) +/* Check if Rhs Reg X == Lhs Reg X */ { - /* Delete the entry from the code segment */ - CS_DelEntry (D->Code, Index); + RegInfo* LRI = GetLastChangedRegInfo (D, &D->Lhs.X); + RegInfo* RRI = GetLastChangedRegInfo (D, &D->Rhs.X); - /* Adjust register loads if necessary */ - AdjustLoadInfo (&D->Lhs, Index, -1); - AdjustLoadInfo (&D->Rhs, Index, -1); + if (RRI == 0 || + (D->Rhs.X.ChgIndex >= 0 && + D->Rhs.X.ChgIndex == D->Lhs.X.ChgIndex) || + (LRI != 0 && + RegValIsKnown (LRI->Out.RegX) && + RegValIsKnown (RRI->Out.RegX) && + (LRI->Out.RegX & 0xFF) == (RRI->Out.RegX & 0xFF))) { - /* Adjust the other indices if necessary */ - if (Index < D->PushIndex) { - --D->PushIndex; - } else if (Index == D->PushIndex) { - D->PushEntry = 0; - } - if (Index < D->OpIndex) { - --D->OpIndex; - } else if (Index == D->OpIndex) { - D->OpEntry = 0; - } -} - - - -static void AdjustStackOffset (StackOpData* D, unsigned Offs) -/* Adjust the offset for all stack accesses in the range PushIndex to OpIndex. -** OpIndex is adjusted according to the insertions. -*/ -{ - /* Walk over all entries */ - int I = D->PushIndex + 1; - while (I < D->OpIndex) { - - CodeEntry* E = CS_GetEntry (D->Code, I); - - int NeedCorrection = 0; - if ((E->Use & REG_SP) != 0) { - - /* Check for some things that should not happen */ - CHECK (E->AM == AM65_ZP_INDY || E->RI->In.RegY >= (short) Offs); - CHECK (strcmp (E->Arg, "sp") == 0); - - /* We need to correct this one */ - NeedCorrection = 1; - - } else if (CE_IsCallTo (E, "ldaxysp")) { - - /* We need to correct this one */ - NeedCorrection = 1; - - } - - if (NeedCorrection) { - - /* Get the code entry before this one. If it's a LDY, adjust the - ** value. - */ - CodeEntry* P = CS_GetPrevEntry (D->Code, I); - if (P && P->OPC == OP65_LDY && CE_IsConstImm (P)) { - - /* The Y load is just before the stack access, adjust it */ - CE_SetNumArg (P, P->Num - Offs); - - } else { - - /* Insert a new load instruction before the stack access */ - const char* Arg = MakeHexArg (E->RI->In.RegY - Offs); - CodeEntry* X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); - InsertEntry (D, X, I++); - - } - - /* If we need the value of Y later, be sure to reload it */ - if (RegYUsed (D->Code, I+1)) { - const char* Arg = MakeHexArg (E->RI->In.RegY); - CodeEntry* X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, E->LI); - InsertEntry (D, X, I+1); - - /* Skip this instruction in the next round */ - ++I; - } - } - - /* Next entry */ - ++I; + return 1; } - /* If we have rhs load insns that load from stack, we'll have to adjust - ** the offsets for these also. - */ - if (D->Rhs.A.Flags & LI_RELOAD_Y) { - D->Rhs.A.Offs -= Offs; - } - if (D->Rhs.X.Flags & LI_RELOAD_Y) { - D->Rhs.X.Offs -= Offs; - } -} + return 0; - - -static void AddStoreA (StackOpData* D) -/* Add a store to zero page after the push insn */ -{ - CodeEntry* X = NewCodeEntry (OP65_STA, AM65_ZP, D->ZPLo, 0, D->PushEntry->LI); - InsertEntry (D, X, D->PushIndex+1); -} - - - -static void AddStoreX (StackOpData* D) -/* Add a store to zero page after the push insn */ -{ - CodeEntry* X = NewCodeEntry (OP65_STX, AM65_ZP, D->ZPHi, 0, D->PushEntry->LI); - InsertEntry (D, X, D->PushIndex+1); -} - - - -static void ReplacePushByStore (StackOpData* D) -/* Replace the call to the push subroutine by a store into the zero page -** location (actually, the push is not replaced, because we need it for -** later, but the name is still ok since the push will get removed at the -** end of each routine). -*/ -{ - /* Store the value into the zeropage instead of pushing it. Check high - ** byte first so that the store is later in A/X order. - */ - if ((D->Lhs.X.Flags & LI_DIRECT) == 0) { - AddStoreX (D); - } - if ((D->Lhs.A.Flags & LI_DIRECT) == 0) { - AddStoreA (D); - } -} - - - -static void AddOpLow (StackOpData* D, opc_t OPC, LoadInfo* LI) -/* Add an op for the low byte of an operator. This function honours the -** OP_DIRECT and OP_RELOAD_Y flags and generates the necessary instructions. -** All code is inserted at the current insertion point. -*/ -{ - CodeEntry* X; - - if ((LI->A.Flags & LI_DIRECT) != 0) { - /* Op with a variable location. If the location is on the stack, we - ** need to reload the Y register. - */ - if ((LI->A.Flags & LI_RELOAD_Y) == 0) { - - /* opc ... */ - CodeEntry* LoadA = LI->A.LoadEntry; - X = NewCodeEntry (OPC, LoadA->AM, LoadA->Arg, 0, D->OpEntry->LI); - InsertEntry (D, X, D->IP++); - - } else { - - /* ldy #offs */ - const char* Arg = MakeHexArg (LI->A.Offs); - X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, D->OpEntry->LI); - InsertEntry (D, X, D->IP++); - - /* opc (sp),y */ - X = NewCodeEntry (OPC, AM65_ZP_INDY, "sp", 0, D->OpEntry->LI); - InsertEntry (D, X, D->IP++); - - } - - /* In both cases, we can remove the load */ - LI->A.Flags |= LI_REMOVE; - - } else { - - /* Op with temp storage */ - X = NewCodeEntry (OPC, AM65_ZP, D->ZPLo, 0, D->OpEntry->LI); - InsertEntry (D, X, D->IP++); - - } -} - - - -static void AddOpHigh (StackOpData* D, opc_t OPC, LoadInfo* LI, int KeepResult) -/* Add an op for the high byte of an operator. Special cases (constant values -** or similar) have to be checked separately, the function covers only the -** generic case. Code is inserted at the insertion point. -*/ -{ - CodeEntry* X; - - if (KeepResult) { - /* pha */ - X = NewCodeEntry (OP65_PHA, AM65_IMP, 0, 0, D->OpEntry->LI); - InsertEntry (D, X, D->IP++); - } - - /* txa */ - X = NewCodeEntry (OP65_TXA, AM65_IMP, 0, 0, D->OpEntry->LI); - InsertEntry (D, X, D->IP++); - - if ((LI->X.Flags & LI_DIRECT) != 0) { - - if ((LI->X.Flags & LI_RELOAD_Y) == 0) { - - /* opc xxx */ - CodeEntry* LoadX = LI->X.LoadEntry; - X = NewCodeEntry (OPC, LoadX->AM, LoadX->Arg, 0, D->OpEntry->LI); - InsertEntry (D, X, D->IP++); - - } else { - - /* ldy #const */ - const char* Arg = MakeHexArg (LI->X.Offs); - X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, D->OpEntry->LI); - InsertEntry (D, X, D->IP++); - - /* opc (sp),y */ - X = NewCodeEntry (OPC, AM65_ZP_INDY, "sp", 0, D->OpEntry->LI); - InsertEntry (D, X, D->IP++); - } - - /* In both cases, we can remove the load */ - LI->X.Flags |= LI_REMOVE; - - } else { - /* opc zphi */ - X = NewCodeEntry (OPC, AM65_ZP, D->ZPHi, 0, D->OpEntry->LI); - InsertEntry (D, X, D->IP++); - } - - if (KeepResult) { - /* tax */ - X = NewCodeEntry (OP65_TAX, AM65_IMP, 0, 0, D->OpEntry->LI); - InsertEntry (D, X, D->IP++); - - /* pla */ - X = NewCodeEntry (OP65_PLA, AM65_IMP, 0, 0, D->OpEntry->LI); - InsertEntry (D, X, D->IP++); - } -} - - - -static void RemoveRegLoads (StackOpData* D, LoadInfo* LI) -/* Remove register load insns */ -{ - /* Both registers may be loaded with one insn, but DelEntry will in this - ** case clear the other one. - */ - if ((LI->A.Flags & (LI_REMOVE | LI_DONT_REMOVE)) == LI_REMOVE) { - if (LI->A.LoadIndex >= 0) { - DelEntry (D, LI->A.LoadIndex); - } - if (LI->A.XferIndex >= 0) { - DelEntry (D, LI->A.XferIndex); - } - } - if ((LI->X.Flags & (LI_REMOVE | LI_DONT_REMOVE)) == LI_REMOVE) { - if (LI->X.LoadIndex >= 0) { - DelEntry (D, LI->X.LoadIndex); - } - if (LI->X.XferIndex >= 0) { - DelEntry (D, LI->X.XferIndex); - } - } -} - - - -static void RemoveRemainders (StackOpData* D) -/* Remove the code that is unnecessary after translation of the sequence */ -{ - /* Remove the register loads for lhs and rhs */ - RemoveRegLoads (D, &D->Lhs); - RemoveRegLoads (D, &D->Rhs); - - /* Remove the push and the operator routine */ - DelEntry (D, D->OpIndex); - DelEntry (D, D->PushIndex); -} - - - -static int IsRegVar (StackOpData* D) -/* If the value pushed is that of a zeropage variable, replace ZPLo and ZPHi -** in the given StackOpData struct by the variable and return true. Otherwise -** leave D untouched and return false. -*/ -{ - CodeEntry* LoadA = D->Lhs.A.LoadEntry; - CodeEntry* LoadX = D->Lhs.X.LoadEntry; - unsigned Len; - - /* Must have both load insns */ - if (LoadA == 0 || LoadX == 0) { - return 0; - } - - /* Must be loads from zp */ - if (LoadA->AM != AM65_ZP || LoadX->AM != AM65_ZP) { - return 0; - } - - /* Must be the same zp loc with high byte in X */ - Len = strlen (LoadA->Arg); - if (strncmp (LoadA->Arg, LoadX->Arg, Len) != 0 || - strcmp (LoadX->Arg + Len, "+1") != 0) { - return 0; - } - - /* Use the zero page location directly */ - D->ZPLo = LoadA->Arg; - D->ZPHi = LoadX->Arg; - return 1; } @@ -765,12 +184,13 @@ static unsigned Opt_toseqax_tosneax (StackOpData* D, const char* BoolTransformer X = NewCodeEntry (OP65_CMP, LoadA->AM, LoadA->Arg, 0, D->OpEntry->LI); InsertEntry (D, X, D->IP++); - /* Lhs load entries can be removed */ + /* Lhs load entries can be removed if not used later */ D->Lhs.X.Flags |= LI_REMOVE; D->Lhs.A.Flags |= LI_REMOVE; } else if ((D->Rhs.A.Flags & (LI_DIRECT | LI_RELOAD_Y)) == LI_DIRECT && - (D->Rhs.X.Flags & (LI_DIRECT | LI_RELOAD_Y)) == LI_DIRECT) { + (D->Rhs.X.Flags & (LI_DIRECT | LI_RELOAD_Y)) == LI_DIRECT && + D->RhsMultiChg == 0) { CodeEntry* LoadX = D->Rhs.X.LoadEntry; CodeEntry* LoadA = D->Rhs.A.LoadEntry; @@ -789,7 +209,7 @@ static unsigned Opt_toseqax_tosneax (StackOpData* D, const char* BoolTransformer X = NewCodeEntry (OP65_CMP, LoadA->AM, LoadA->Arg, 0, D->OpEntry->LI); InsertEntry (D, X, D->IP++); - /* Rhs load entries can be removed */ + /* Rhs load entries must be removed */ D->Rhs.X.Flags |= LI_REMOVE; D->Rhs.A.Flags |= LI_REMOVE; @@ -811,8 +231,8 @@ static unsigned Opt_toseqax_tosneax (StackOpData* D, const char* BoolTransformer } else { /* Save lhs into zeropage, then compare */ - AddStoreX (D); - AddStoreA (D); + AddStoreLhsX (D); + AddStoreLhsA (D); D->IP = D->OpIndex+1; @@ -844,9 +264,6 @@ static unsigned Opt_tosshift (StackOpData* D, const char* Name) { CodeEntry* X; - /* Store the value into the zeropage instead of pushing it */ - ReplacePushByStore (D); - /* If the lhs is direct (but not stack relative), we can just reload the ** data later. */ @@ -871,15 +288,15 @@ static unsigned Opt_tosshift (StackOpData* D, const char* Name) X = NewCodeEntry (OP65_LDX, LoadX->AM, LoadX->Arg, 0, D->OpEntry->LI); InsertEntry (D, X, D->IP++); - /* Lhs load entries can be removed */ + /* Lhs load entries can be removed if not used later */ D->Lhs.X.Flags |= LI_REMOVE; D->Lhs.A.Flags |= LI_REMOVE; } else { /* Save lhs into zeropage and reload later */ - AddStoreX (D); - AddStoreA (D); + AddStoreLhsX (D); + AddStoreLhsA (D); /* Be sure to setup IP after adding the stores, otherwise it will get ** messed up. @@ -923,8 +340,8 @@ static unsigned Opt___bzero (StackOpData* D) /* Check if we're using a register variable */ if (!IsRegVar (D)) { /* Store the value into the zeropage instead of pushing it */ - AddStoreX (D); - AddStoreA (D); + AddStoreLhsX (D); + AddStoreLhsA (D); } /* If the return value of __bzero is used, we have to add code to reload @@ -1015,8 +432,8 @@ static unsigned Opt_staspidx (StackOpData* D) /* Check if we're using a register variable */ if (!IsRegVar (D)) { /* Store the value into the zeropage instead of pushing it */ - AddStoreX (D); - AddStoreA (D); + AddStoreLhsX (D); + AddStoreLhsA (D); } /* Replace the store subroutine call by a direct op */ @@ -1036,12 +453,13 @@ static unsigned Opt_staxspidx (StackOpData* D) /* Optimize the staxspidx sequence */ { CodeEntry* X; + const char* Arg = 0; /* Check if we're using a register variable */ if (!IsRegVar (D)) { /* Store the value into the zeropage instead of pushing it */ - AddStoreX (D); - AddStoreA (D); + AddStoreLhsX (D); + AddStoreLhsA (D); } /* Inline the store */ @@ -1052,7 +470,7 @@ static unsigned Opt_staxspidx (StackOpData* D) if (RegValIsKnown (D->OpEntry->RI->In.RegY)) { /* Value of Y is known */ - const char* Arg = MakeHexArg (D->OpEntry->RI->In.RegY + 1); + Arg = MakeHexArg (D->OpEntry->RI->In.RegY + 1); X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, D->OpEntry->LI); } else { X = NewCodeEntry (OP65_INY, AM65_IMP, 0, 0, D->OpEntry->LI); @@ -1061,7 +479,7 @@ static unsigned Opt_staxspidx (StackOpData* D) if (RegValIsKnown (D->OpEntry->RI->In.RegX)) { /* Value of X is known */ - const char* Arg = MakeHexArg (D->OpEntry->RI->In.RegX); + Arg = MakeHexArg (D->OpEntry->RI->In.RegX); X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, D->OpEntry->LI); } else { /* Value unknown */ @@ -1076,7 +494,12 @@ static unsigned Opt_staxspidx (StackOpData* D) /* If we remove staxspidx, we must restore the Y register to what the ** function would return. */ - X = NewCodeEntry (OP65_LDY, AM65_IMM, "$00", 0, D->OpEntry->LI); + if (RegValIsKnown (D->OpEntry->RI->In.RegY)) { + Arg = MakeHexArg (D->OpEntry->RI->In.RegY); + X = NewCodeEntry (OP65_LDY, AM65_IMM, Arg, 0, D->OpEntry->LI); + } else { + X = NewCodeEntry (OP65_DEY, AM65_IMP, 0, 0, D->OpEntry->LI); + } InsertEntry (D, X, D->OpIndex+5); /* Remove the push and the call to the staxspidx function */ @@ -1119,8 +542,8 @@ static unsigned Opt_tosaddax (StackOpData* D) int Signed = (strcmp (N->Arg, "ldaidx") == 0); /* Store the value into the zeropage instead of pushing it */ - AddStoreX (D); - AddStoreA (D); + AddStoreLhsX (D); + AddStoreLhsA (D); /* Replace the ldy by a tay. Be sure to create the new entry before ** deleting the ldy, since we will reference the line info from this @@ -1318,6 +741,10 @@ static unsigned Opt_tosgeax (StackOpData* D) X = NewCodeEntry (OP65_ROL, AM65_ACC, "a", 0, D->OpEntry->LI); InsertEntry (D, X, D->IP++); + /* Rhs load entries must be removed */ + D->Rhs.X.Flags |= LI_REMOVE; + D->Rhs.A.Flags |= LI_REMOVE; + /* Remove the push and the call to the tosgeax function */ RemoveRemainders (D); @@ -1372,6 +799,10 @@ static unsigned Opt_tosltax (StackOpData* D) X = NewCodeEntry (OP65_ROL, AM65_ACC, "a", 0, D->OpEntry->LI); InsertEntry (D, X, D->IP++); + /* Rhs load entries must be removed */ + D->Rhs.X.Flags |= LI_REMOVE; + D->Rhs.A.Flags |= LI_REMOVE; + /* Remove the push and the call to the tosltax function */ RemoveRemainders (D); @@ -1449,6 +880,10 @@ static unsigned Opt_tossubax (StackOpData* D) /* Add code for high operand */ AddOpHigh (D, OP65_SBC, &D->Rhs, 1); + /* Rhs load entries must be removed */ + D->Rhs.X.Flags |= LI_REMOVE; + D->Rhs.A.Flags |= LI_REMOVE; + /* Remove the push and the call to the tossubax function */ RemoveRemainders (D); @@ -1488,6 +923,10 @@ static unsigned Opt_tosugeax (StackOpData* D) X = NewCodeEntry (OP65_ROL, AM65_ACC, "a", 0, D->OpEntry->LI); InsertEntry (D, X, D->IP++); + /* Rhs load entries must be removed */ + D->Rhs.X.Flags |= LI_REMOVE; + D->Rhs.A.Flags |= LI_REMOVE; + /* Remove the push and the call to the tosugeax function */ RemoveRemainders (D); @@ -1531,6 +970,10 @@ static unsigned Opt_tosugtax (StackOpData* D) X = NewCodeEntry (OP65_JSR, AM65_ABS, "boolugt", 0, D->OpEntry->LI); InsertEntry (D, X, D->IP++); + /* Rhs load entries must be removed */ + D->Rhs.X.Flags |= LI_REMOVE; + D->Rhs.A.Flags |= LI_REMOVE; + /* Remove the push and the call to the operator function */ RemoveRemainders (D); @@ -1574,6 +1017,10 @@ static unsigned Opt_tosuleax (StackOpData* D) X = NewCodeEntry (OP65_JSR, AM65_ABS, "boolule", 0, D->OpEntry->LI); InsertEntry (D, X, D->IP++); + /* Rhs load entries must be removed */ + D->Rhs.X.Flags |= LI_REMOVE; + D->Rhs.A.Flags |= LI_REMOVE; + /* Remove the push and the call to the operator function */ RemoveRemainders (D); @@ -1605,6 +1052,10 @@ static unsigned Opt_tosultax (StackOpData* D) X = NewCodeEntry (OP65_JSR, AM65_ABS, "boolult", 0, D->OpEntry->LI); InsertEntry (D, X, D->IP++); + /* Rhs load entries must be removed */ + D->Rhs.X.Flags |= LI_REMOVE; + D->Rhs.A.Flags |= LI_REMOVE; + /* Remove the push and the call to the operator function */ RemoveRemainders (D); @@ -1648,35 +1099,273 @@ static unsigned Opt_tosxorax (StackOpData* D) +/*****************************************************************************/ +/* Optimization functions when hi-bytes can be ignored */ +/*****************************************************************************/ + + + +static unsigned Opt_a_toscmpbool (StackOpData* D, const char* BoolTransformer) +/* Optimize the TOS compare sequence with a bool transformer */ +{ + CodeEntry* X; + cmp_t Cond; + + D->IP = D->OpIndex + 1; + + if (!D->RhsMultiChg && + (D->Rhs.A.Flags & LI_DIRECT) != 0 && + (D->Rhs.A.LoadEntry->Flags & CEF_DONT_REMOVE) == 0) { + + /* cmp */ + AddOpLow (D, OP65_CMP, &D->Rhs); + + /* Rhs low-byte load must be removed and hi-byte load may be removed */ + D->Rhs.X.Flags |= LI_REMOVE; + D->Rhs.A.Flags |= LI_REMOVE; + + } else if ((D->Lhs.A.Flags & LI_DIRECT) != 0) { + /* If the lhs is direct (but not stack relative), encode compares with lhs, + ** effectively reversing the order (which doesn't matter for == and !=). + */ + Cond = FindBoolCmpCond (BoolTransformer); + Cond = GetRevertedCond (Cond); + BoolTransformer = GetBoolTransformer (Cond); + + /* This shouldn't fail */ + CHECK (BoolTransformer); + + /* cmp */ + AddOpLow (D, OP65_CMP, &D->Lhs); + + /* Lhs load entries can be removed if not used later */ + D->Lhs.X.Flags |= LI_REMOVE; + D->Lhs.A.Flags |= LI_REMOVE; + + } else { + /* We'll do reverse-compare */ + Cond = FindBoolCmpCond (BoolTransformer); + Cond = GetRevertedCond (Cond); + BoolTransformer = GetBoolTransformer (Cond); + + /* This shouldn't fail */ + CHECK (BoolTransformer); + + /* Save lhs into zeropage */ + AddStoreLhsA (D); + + /* cmp */ + X = NewCodeEntry (OP65_CMP, AM65_ZP, D->ZPLo, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + + } + + /* Create a call to the boolean transformer function. This is needed for all + ** variants. + */ + X = NewCodeEntry (OP65_JSR, AM65_ABS, BoolTransformer, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + + /* Remove the push and the call to the TOS function */ + RemoveRemainders (D); + + /* We changed the sequence */ + return 1; +} + + + +static unsigned Opt_a_toseq (StackOpData* D) +/* Optimize the toseqax sequence */ +{ + return Opt_a_toscmpbool (D, "booleq"); +} + + + +static unsigned Opt_a_tosicmp (StackOpData* D) +/* Replace tosicmp with CMP */ +{ + CodeEntry* X; + RegInfo* RI; + const char* Arg; + + if (!SameRegAValue (D)) { + /* Because of SameRegAValue */ + CHECK (D->Rhs.A.ChgIndex >= 0); + + /* Store LHS in ZP and reload it before op */ + X = NewCodeEntry (OP65_STA, AM65_ZP, D->ZPLo, 0, D->PushEntry->LI); + InsertEntry (D, X, D->PushIndex + 1); + X = NewCodeEntry (OP65_LDA, AM65_ZP, D->ZPLo, 0, D->PushEntry->LI); + InsertEntry (D, X, D->OpIndex); + + D->IP = D->OpIndex + 1; + + if ((D->Rhs.A.Flags & LI_DIRECT) == 0) { + /* RHS src is not directly comparable */ + X = NewCodeEntry (OP65_STA, AM65_ZP, D->ZPHi, 0, D->OpEntry->LI); + InsertEntry (D, X, D->Rhs.A.ChgIndex + 1); + + /* Cmp with stored RHS */ + X = NewCodeEntry (OP65_CMP, AM65_ZP, D->ZPHi, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + } else { + if ((D->Rhs.A.Flags & LI_RELOAD_Y) == 0) { + /* Cmp directly with RHS src */ + X = NewCodeEntry (OP65_CMP, AM65_ZP, D->Rhs.A.LoadEntry->Arg, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + } else { + /* ldy #offs */ + if ((D->Rhs.A.Flags & LI_CHECK_Y) == 0) { + X = NewCodeEntry (OP65_LDY, AM65_IMM, MakeHexArg (D->Rhs.A.Offs), 0, D->OpEntry->LI); + } else { + X = NewCodeEntry (OP65_LDY, D->Rhs.A.LoadYEntry->AM, D->Rhs.A.LoadYEntry->Arg, 0, D->OpEntry->LI); + } + InsertEntry (D, X, D->IP++); + + /* cmp src,y OR cmp (sp),y */ + if (D->Rhs.A.LoadEntry->OPC == OP65_JSR) { + /* opc (sp),y */ + X = NewCodeEntry (OP65_CMP, AM65_ZP_INDY, "sp", 0, D->OpEntry->LI); + } else { + /* opc src,y */ + X = NewCodeEntry (OP65_CMP, D->Rhs.A.LoadEntry->AM, D->Rhs.A.LoadEntry->Arg, 0, D->OpEntry->LI); + } + InsertEntry (D, X, D->IP++); + } + + /* RHS may be removed */ + D->Rhs.A.Flags |= LI_REMOVE; + D->Rhs.X.Flags |= LI_REMOVE; + } + + /* Fix up the N/V flags: N = ~C, V = 0 */ + Arg = MakeHexArg (0); + X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + X = NewCodeEntry (OP65_SBC, AM65_IMM, Arg, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + Arg = MakeHexArg (0x01); + X = NewCodeEntry (OP65_ORA, AM65_IMM, Arg, 0, D->OpEntry->LI); + InsertEntry (D, X, D->IP++); + + /* jeq L1 */ + CodeLabel* Label = CS_GenLabel (D->Code, CS_GetEntry (D->Code, D->IP)); + X = NewCodeEntry (OP65_JEQ, AM65_BRA, Label->Name, Label, X->LI); + InsertEntry (D, X, D->IP-3); + + } else { + /* Just clear A,Z,N; and set C */ + Arg = MakeHexArg (0); + if ((RI = GetLastChangedRegInfo (D, &D->Lhs.A)) != 0 && + RegValIsKnown (RI->Out.RegA) && + (RI->Out.RegA & 0xFF) == 0) { + + X = NewCodeEntry (OP65_CMP, AM65_IMM, Arg, 0, D->OpEntry->LI); + InsertEntry (D, X, D->OpIndex + 1); + } else { + X = NewCodeEntry (OP65_LDA, AM65_IMM, Arg, 0, D->OpEntry->LI); + InsertEntry (D, X, D->OpIndex + 1); + X = NewCodeEntry (OP65_CMP, AM65_IMM, Arg, 0, D->OpEntry->LI); + InsertEntry (D, X, D->OpIndex + 2); + } + } + + /* Remove the push and the call to the operator function */ + RemoveRemainders (D); + + return 1; +} + + + +static unsigned Opt_a_tosne (StackOpData* D) +/* Optimize the tosneax sequence */ +{ + return Opt_a_toscmpbool (D, "boolne"); +} + + + +static unsigned Opt_a_tosuge (StackOpData* D) +/* Optimize the tosgeax and tosugeax sequences */ +{ + return Opt_a_toscmpbool (D, "booluge"); +} + + + +static unsigned Opt_a_tosugt (StackOpData* D) +/* Optimize the tosgtax and tosugtax sequences */ +{ + return Opt_a_toscmpbool (D, "boolugt"); +} + + + +static unsigned Opt_a_tosule (StackOpData* D) +/* Optimize the tosleax and tosuleax sequences */ +{ + return Opt_a_toscmpbool (D, "boolule"); +} + + + +static unsigned Opt_a_tosult (StackOpData* D) +/* Optimize the tosltax and tosultax sequences */ +{ + return Opt_a_toscmpbool (D, "boolult"); +} + + + /*****************************************************************************/ /* Code */ /*****************************************************************************/ +/* The first column of these two tables must be sorted in lexical order */ + static const OptFuncDesc FuncTable[] = { - { "__bzero", Opt___bzero, REG_NONE, OP_X_ZERO | OP_A_KNOWN }, - { "staspidx", Opt_staspidx, REG_NONE, OP_NONE }, - { "staxspidx", Opt_staxspidx, REG_AX, OP_NONE }, - { "tosaddax", Opt_tosaddax, REG_NONE, OP_NONE }, - { "tosandax", Opt_tosandax, REG_NONE, OP_NONE }, - { "tosaslax", Opt_tosaslax, REG_NONE, OP_NONE }, - { "tosasrax", Opt_tosasrax, REG_NONE, OP_NONE }, - { "toseqax", Opt_toseqax, REG_NONE, OP_NONE }, - { "tosgeax", Opt_tosgeax, REG_NONE, OP_RHS_LOAD_DIRECT }, - { "tosltax", Opt_tosltax, REG_NONE, OP_RHS_LOAD_DIRECT }, - { "tosneax", Opt_tosneax, REG_NONE, OP_NONE }, - { "tosorax", Opt_tosorax, REG_NONE, OP_NONE }, - { "tosshlax", Opt_tosshlax, REG_NONE, OP_NONE }, - { "tosshrax", Opt_tosshrax, REG_NONE, OP_NONE }, - { "tossubax", Opt_tossubax, REG_NONE, OP_RHS_LOAD_DIRECT }, - { "tosugeax", Opt_tosugeax, REG_NONE, OP_RHS_LOAD_DIRECT }, - { "tosugtax", Opt_tosugtax, REG_NONE, OP_RHS_LOAD_DIRECT }, - { "tosuleax", Opt_tosuleax, REG_NONE, OP_RHS_LOAD_DIRECT }, - { "tosultax", Opt_tosultax, REG_NONE, OP_RHS_LOAD_DIRECT }, - { "tosxorax", Opt_tosxorax, REG_NONE, OP_NONE }, + { "__bzero", Opt___bzero, REG_NONE, OP_X_ZERO | OP_A_KNOWN }, + { "staspidx", Opt_staspidx, REG_NONE, OP_NONE }, + { "staxspidx", Opt_staxspidx, REG_AX, OP_NONE }, + { "tosaddax", Opt_tosaddax, REG_NONE, OP_NONE }, + { "tosandax", Opt_tosandax, REG_NONE, OP_NONE }, + { "tosaslax", Opt_tosaslax, REG_NONE, OP_NONE }, + { "tosasrax", Opt_tosasrax, REG_NONE, OP_NONE }, + { "toseqax", Opt_toseqax, REG_NONE, OP_LR_INTERCHANGE | OP_RHS_REMOVE_DIRECT }, + { "tosgeax", Opt_tosgeax, REG_NONE, OP_RHS_REMOVE_DIRECT | OP_RHS_LOAD_DIRECT }, + { "tosltax", Opt_tosltax, REG_NONE, OP_RHS_REMOVE_DIRECT | OP_RHS_LOAD_DIRECT }, + { "tosneax", Opt_tosneax, REG_NONE, OP_LR_INTERCHANGE | OP_RHS_REMOVE_DIRECT }, + { "tosorax", Opt_tosorax, REG_NONE, OP_NONE }, + { "tosshlax", Opt_tosshlax, REG_NONE, OP_NONE }, + { "tosshrax", Opt_tosshrax, REG_NONE, OP_NONE }, + { "tossubax", Opt_tossubax, REG_NONE, OP_RHS_REMOVE_DIRECT | OP_RHS_LOAD_DIRECT }, + { "tosugeax", Opt_tosugeax, REG_NONE, OP_RHS_REMOVE_DIRECT | OP_RHS_LOAD_DIRECT }, + { "tosugtax", Opt_tosugtax, REG_NONE, OP_RHS_REMOVE_DIRECT | OP_RHS_LOAD_DIRECT }, + { "tosuleax", Opt_tosuleax, REG_NONE, OP_RHS_REMOVE_DIRECT | OP_RHS_LOAD_DIRECT }, + { "tosultax", Opt_tosultax, REG_NONE, OP_RHS_REMOVE_DIRECT | OP_RHS_LOAD_DIRECT }, + { "tosxorax", Opt_tosxorax, REG_NONE, OP_NONE }, }; -#define FUNC_COUNT (sizeof(FuncTable) / sizeof(FuncTable[0])) + +static const OptFuncDesc FuncRegATable[] = { + { "toseqax", Opt_a_toseq, REG_NONE, OP_NONE }, + { "tosgeax", Opt_a_tosuge, REG_NONE, OP_NONE }, + { "tosgtax", Opt_a_tosugt, REG_NONE, OP_NONE }, + { "tosicmp", Opt_a_tosicmp, REG_NONE, OP_NONE }, + { "tosleax", Opt_a_tosule, REG_NONE, OP_NONE }, + { "tosltax", Opt_a_tosult, REG_NONE, OP_NONE }, + { "tosneax", Opt_a_tosne, REG_NONE, OP_NONE }, + { "tosugeax", Opt_a_tosuge, REG_NONE, OP_NONE }, + { "tosugtax", Opt_a_tosugt, REG_NONE, OP_NONE }, + { "tosuleax", Opt_a_tosule, REG_NONE, OP_NONE }, + { "tosultax", Opt_a_tosult, REG_NONE, OP_NONE }, +}; + +#define FUNC_COUNT(Table) (sizeof(Table) / sizeof(Table[0])) @@ -1688,96 +1377,12 @@ static int CmpFunc (const void* Key, const void* Func) -static const OptFuncDesc* FindFunc (const char* Name) +static const OptFuncDesc* FindFunc (const OptFuncDesc FuncTable[], size_t Count, const char* Name) /* Find the function with the given name. Return a pointer to the table entry ** or NULL if the function was not found. */ { - return bsearch (Name, FuncTable, FUNC_COUNT, sizeof(OptFuncDesc), CmpFunc); -} - - - -static int CmpHarmless (const void* Key, const void* Entry) -/* Compare function for bsearch */ -{ - return strcmp (Key, *(const char**)Entry); -} - - - -static int HarmlessCall (const char* Name) -/* Check if this is a call to a harmless subroutine that will not interrupt -** the pushax/op sequence when encountered. -*/ -{ - static const char* Tab[] = { - "aslax1", - "aslax2", - "aslax3", - "aslax4", - "aslaxy", - "asrax1", - "asrax2", - "asrax3", - "asrax4", - "asraxy", - "bnegax", - "complax", - "decax1", - "decax2", - "decax3", - "decax4", - "decax5", - "decax6", - "decax7", - "decax8", - "decaxy", - "incax1", - "incax2", - "incax3", - "incax4", - "incax5", - "incax6", - "incax7", - "incax8", - "incaxy", - "ldaxidx", - "ldaxysp", - "negax", - "shlax1", - "shlax2", - "shlax3", - "shlax4", - "shlaxy", - "shrax1", - "shrax2", - "shrax3", - "shrax4", - "shraxy", - }; - - void* R = bsearch (Name, - Tab, - sizeof (Tab) / sizeof (Tab[0]), - sizeof (Tab[0]), - CmpHarmless); - return (R != 0); -} - - - -static void ResetStackOpData (StackOpData* Data) -/* Reset the given data structure */ -{ - Data->OptFunc = 0; - Data->UsedRegs = REG_NONE; - - ClearLoadInfo (&Data->Lhs); - ClearLoadInfo (&Data->Rhs); - - Data->PushIndex = -1; - Data->OpIndex = -1; + return bsearch (Name, FuncTable, Count, sizeof(OptFuncDesc), CmpFunc); } @@ -1785,61 +1390,295 @@ static void ResetStackOpData (StackOpData* Data) static int PreCondOk (StackOpData* D) /* Check if the preconditions for a call to the optimizer subfunction are ** satisfied. As a side effect, this function will also choose the zero page -** register to use. +** register to use for temporary storage. */ { + LoadInfo* Lhs; + LoadInfo* Rhs; + LoadRegInfo* LhsLo; + LoadRegInfo* LhsHi; + LoadRegInfo* RhsLo; + LoadRegInfo* RhsHi; + short LoVal; + short HiVal; + int I; + int Passed = 0; + /* Check the flags */ - unsigned UnusedRegs = D->OptFunc->UnusedRegs; + const OptFuncDesc* Desc = D->OptFunc; + unsigned UnusedRegs = Desc->UnusedRegs; if (UnusedRegs != REG_NONE && (GetRegInfo (D->Code, D->OpIndex+1, UnusedRegs) & UnusedRegs) != 0) { /* Cannot optimize */ return 0; } - if ((D->OptFunc->Flags & OP_A_KNOWN) != 0 && - RegValIsUnknown (D->OpEntry->RI->In.RegA)) { - /* Cannot optimize */ - return 0; - } - if ((D->OptFunc->Flags & OP_X_ZERO) != 0 && - D->OpEntry->RI->In.RegX != 0) { - /* Cannot optimize */ - return 0; - } - if ((D->OptFunc->Flags & OP_LHS_LOAD) != 0) { - if (D->Lhs.A.LoadIndex < 0 || D->Lhs.X.LoadIndex < 0) { - /* Cannot optimize */ - return 0; - } else if ((D->OptFunc->Flags & OP_LHS_LOAD_DIRECT) != 0) { - if ((D->Lhs.A.Flags & D->Lhs.X.Flags & LI_DIRECT) == 0) { + + Passed = 0; + LoVal = D->OpEntry->RI->In.RegA; + HiVal = D->OpEntry->RI->In.RegX; + /* Check normally first, then interchange A/X and check again if necessary */ + for (I = (Desc->Flags & OP_AX_INTERCHANGE ? 0 : 1); !Passed && I < 2; ++I) { + + do { + if ((Desc->Flags & OP_A_KNOWN) != 0 && + RegValIsUnknown (LoVal)) { /* Cannot optimize */ - return 0; + break; } - } - } - if ((D->OptFunc->Flags & OP_RHS_LOAD) != 0) { - if (D->Rhs.A.LoadIndex < 0 || D->Rhs.X.LoadIndex < 0) { - /* Cannot optimize */ - return 0; - } else if ((D->OptFunc->Flags & OP_RHS_LOAD_DIRECT) != 0) { - if ((D->Rhs.A.Flags & D->Rhs.X.Flags & LI_DIRECT) == 0) { + if ((Desc->Flags & OP_X_ZERO) != 0 && + HiVal != 0) { /* Cannot optimize */ - return 0; + break; } - } + Passed = 1; + } while (0); + + /* Interchange A/X */ + LoVal = D->OpEntry->RI->In.RegX; + HiVal = D->OpEntry->RI->In.RegA; } - if ((D->Rhs.A.Flags | D->Rhs.X.Flags) & LI_DUP_LOAD) { + if (!Passed) { /* Cannot optimize */ return 0; } - /* Determine the zero page locations to use */ - if ((D->UsedRegs & REG_PTR1) == REG_NONE) { + Passed = 0; + Lhs = &D->Lhs; + Rhs = &D->Rhs; + /* Check normally first, then interchange LHS/RHS and check again if necessary */ + for (I = (Desc->Flags & OP_LR_INTERCHANGE ? 0 : 1); !Passed && I < 2; ++I) { + + do { + LhsLo = &Lhs->A; + LhsHi = &Lhs->X; + RhsLo = &Rhs->A; + RhsHi = &Rhs->X; + /* Currently we have only LHS/RHS checks with identical requirements for A/X, + ** so we don't need to check twice for now. + */ + + if ((Desc->Flags & OP_LHS_LOAD) != 0) { + if ((LhsLo->Flags & LhsHi->Flags & LI_LOAD_INSN) == 0) { + /* Cannot optimize */ + break; + } else if ((Desc->Flags & OP_LHS_LOAD_DIRECT) != 0) { + if ((LhsLo->Flags & LhsHi->Flags & LI_DIRECT) == 0) { + /* Cannot optimize */ + break; + } + } + } + if ((Desc->Flags & OP_RHS_LOAD) != 0) { + if ((RhsLo->Flags & RhsHi->Flags & LI_LOAD_INSN) == 0) { + /* Cannot optimize */ + break; + } else if ((Desc->Flags & OP_RHS_LOAD_DIRECT) != 0) { + if ((RhsLo->Flags & RhsHi->Flags & LI_DIRECT) == 0) { + /* Cannot optimize */ + break; + } + } + } + if ((Desc->Flags & OP_LHS_REMOVE) != 0) { + /* Check if the load entries cannot be removed */ + if ((LhsLo->LoadEntry != 0 && (LhsLo->LoadEntry->Flags & CEF_DONT_REMOVE) != 0) || + (LhsHi->LoadEntry != 0 && (LhsHi->LoadEntry->Flags & CEF_DONT_REMOVE) != 0)) { + if ((Desc->Flags & OP_LHS_REMOVE_DIRECT) != 0) { + /* Cannot optimize */ + break; + } + } + } + if ((Desc->Flags & OP_RHS_REMOVE) != 0) { + if ((RhsLo->LoadEntry != 0 && (RhsLo->LoadEntry->Flags & CEF_DONT_REMOVE) != 0) || + (RhsHi->LoadEntry != 0 && (RhsHi->LoadEntry->Flags & CEF_DONT_REMOVE) != 0)) { + if ((Desc->Flags & OP_RHS_REMOVE_DIRECT) != 0) { + /* Cannot optimize */ + break; + } + } + } + if (D->RhsMultiChg && (Desc->Flags & OP_RHS_REMOVE_DIRECT) != 0) { + /* Cannot optimize */ + break; + } + Passed = 1; + } while (0); + + /* Interchange LHS/RHS for next round */ + Lhs = &D->Rhs; + Rhs = &D->Lhs; + } + if (!Passed) { + /* Cannot optimize */ + return 0; + } + + /* Determine the zero page locations to use. We've tracked the used + ** ZP locations, so try to find some for us that are unused. + */ + if ((D->ZPUsage & REG_PTR1) == REG_NONE) { D->ZPLo = "ptr1"; D->ZPHi = "ptr1+1"; - } else if ((D->UsedRegs & REG_SREG) == REG_NONE) { + } else if ((D->ZPUsage & REG_SREG) == REG_NONE) { D->ZPLo = "sreg"; D->ZPHi = "sreg+1"; - } else if ((D->UsedRegs & REG_PTR2) == REG_NONE) { + } else if ((D->ZPUsage & REG_PTR2) == REG_NONE) { + D->ZPLo = "ptr2"; + D->ZPHi = "ptr2+1"; + } else { + /* No registers available */ + return 0; + } + + /* Determine if we have a basic block */ + return CS_IsBasicBlock (D->Code, D->PushIndex, D->OpIndex); +} + + + +static int RegAPreCondOk (StackOpData* D) +/* Check if the preconditions for a call to the RegA-only optimizer subfunction +** are satisfied. As a side effect, this function will also choose the zero page +** register to use for temporary storage. +*/ +{ + LoadInfo* Lhs; + LoadInfo* Rhs; + LoadRegInfo* LhsLo; + LoadRegInfo* RhsLo; + short LhsLoVal, LhsHiVal; + short RhsLoVal, RhsHiVal; + int I; + int Passed = 0; + + /* Check the flags */ + const OptFuncDesc* Desc = D->OptFunc; + unsigned UnusedRegs = Desc->UnusedRegs; + if (UnusedRegs != REG_NONE && + (GetRegInfo (D->Code, D->OpIndex+1, UnusedRegs) & UnusedRegs) != 0) { + /* Cannot optimize */ + return 0; + } + + Passed = 0; + LhsLoVal = D->PushEntry->RI->In.RegA; + LhsHiVal = D->PushEntry->RI->In.RegX; + RhsLoVal = D->OpEntry->RI->In.RegA; + RhsHiVal = D->OpEntry->RI->In.RegX; + /* Check normally first, then interchange A/X and check again if necessary */ + for (I = (Desc->Flags & OP_AX_INTERCHANGE ? 0 : 1); !Passed && I < 2; ++I) { + + do { + if (LhsHiVal != RhsHiVal) { + /* Cannot optimize */ + break; + } + if ((Desc->Flags & OP_A_KNOWN) != 0 && + RegValIsUnknown (LhsLoVal)) { + /* Cannot optimize */ + break; + } + if ((Desc->Flags & OP_X_ZERO) != 0 && + LhsHiVal != 0) { + /* Cannot optimize */ + break; + } + Passed = 1; + } while (0); + + /* Suppress warning about unused assignment in GCC */ + (void)RhsLoVal; + + /* Interchange A/X */ + LhsLoVal = D->PushEntry->RI->In.RegX; + LhsHiVal = D->PushEntry->RI->In.RegA; + RhsLoVal = D->OpEntry->RI->In.RegX; + RhsHiVal = D->OpEntry->RI->In.RegA; + } + if (!Passed) { + /* Cannot optimize */ + return 0; + } + + Passed = 0; + Lhs = &D->Lhs; + Rhs = &D->Rhs; + /* Check normally first, then interchange LHS/RHS and check again if necessary */ + for (I = (Desc->Flags & OP_LR_INTERCHANGE ? 0 : 1); !Passed && I < 2; ++I) { + + do { + LhsLo = &Lhs->A; + RhsLo = &Rhs->A; + /* Currently we have only LHS/RHS checks with identical requirements for A/X, + ** so we don't need to check twice for now. + */ + + if ((Desc->Flags & OP_LHS_LOAD) != 0) { + if ((LhsLo->Flags & LI_LOAD_INSN) == 0) { + /* Cannot optimize */ + break; + } else if ((Desc->Flags & OP_LHS_LOAD_DIRECT) != 0) { + if ((LhsLo->Flags & LI_DIRECT) == 0) { + /* Cannot optimize */ + break; + } + } + } + if ((Desc->Flags & OP_RHS_LOAD) != 0) { + if ((RhsLo->Flags & LI_LOAD_INSN) == 0) { + /* Cannot optimize */ + break; + } else if ((Desc->Flags & OP_RHS_LOAD_DIRECT) != 0) { + if ((RhsLo->Flags & LI_DIRECT) == 0) { + /* Cannot optimize */ + break; + } + } + } + if ((Desc->Flags & OP_LHS_REMOVE) != 0) { + /* Check if the load entries cannot be removed */ + if ((LhsLo->LoadEntry != 0 && (LhsLo->LoadEntry->Flags & CEF_DONT_REMOVE) != 0)) { + if ((Desc->Flags & OP_LHS_REMOVE_DIRECT) != 0) { + /* Cannot optimize */ + break; + } + } + } + if ((Desc->Flags & OP_RHS_REMOVE) != 0) { + if ((RhsLo->LoadEntry != 0 && (RhsLo->LoadEntry->Flags & CEF_DONT_REMOVE) != 0)) { + if ((Desc->Flags & OP_RHS_REMOVE_DIRECT) != 0) { + /* Cannot optimize */ + break; + } + } + } + if (D->RhsMultiChg && (Desc->Flags & OP_RHS_REMOVE_DIRECT) != 0) { + /* Cannot optimize */ + break; + } + Passed = 1; + } while (0); + + /* Interchange LHS/RHS for next round */ + Lhs = &D->Rhs; + Rhs = &D->Lhs; + } + if (!Passed) { + /* Cannot optimize */ + return 0; + } + + /* Determine the zero page locations to use. We've tracked the used + ** ZP locations, so try to find some for us that are unused. + */ + if ((D->ZPUsage & REG_PTR1) == REG_NONE) { + D->ZPLo = "ptr1"; + D->ZPHi = "ptr1+1"; + } else if ((D->ZPUsage & REG_SREG) == REG_NONE) { + D->ZPLo = "sreg"; + D->ZPHi = "sreg+1"; + } else if ((D->ZPUsage & REG_PTR2) == REG_NONE) { D->ZPLo = "ptr2"; D->ZPHi = "ptr2+1"; } else { @@ -1862,13 +1701,15 @@ static int PreCondOk (StackOpData* D) unsigned OptStackOps (CodeSeg* S) /* Optimize operations that take operands via the stack */ { - unsigned Changes = 0; /* Number of changes in one run */ - StackOpData Data; - int I; - int OldEntryCount; /* Old number of entries */ - unsigned UsedRegs = 0; /* Registers used */ - unsigned ChangedRegs = 0;/* Registers changed */ - + unsigned Changes = 0; /* Number of changes in one run */ + StackOpData Data; + int I; + int OldEntryCount; /* Old number of entries */ + unsigned Used; /* What registers would be used */ + unsigned PushedRegs = 0; /* Track if the same regs are used after the push */ + int RhsAChgIndex; /* Track if rhs is changed more than once */ + int RhsXChgIndex; /* Track if rhs is changed more than once */ + int IsRegAOptFunc = 0; /* Whether to use the RegA-only optimizations */ enum { Initialize, @@ -1895,6 +1736,8 @@ unsigned OptStackOps (CodeSeg* S) ** ** Since we need a zero page register later, do also check the ** intermediate code for zero page use. + ** When hibytes of both oprands are equal, we may have more specialized + ** optimization for the op. */ I = 0; while (I < (int)CS_GetEntryCount (S)) { @@ -1907,7 +1750,6 @@ unsigned OptStackOps (CodeSeg* S) case Initialize: ResetStackOpData (&Data); - UsedRegs = ChangedRegs = REG_NONE; State = Search; /* FALLTHROUGH */ @@ -1916,15 +1758,30 @@ unsigned OptStackOps (CodeSeg* S) ** what is in a register once pushax is encountered. */ if (CE_HasLabel (E)) { - /* Currently we don't track across branches */ + /* Currently we don't track across branches. + ** Treat this as a change to all regs. + */ ClearLoadInfo (&Data.Lhs); + Data.Lhs.A.ChgIndex = I; + Data.Lhs.X.ChgIndex = I; + Data.Lhs.Y.ChgIndex = I; } if (CE_IsCallTo (E, "pushax")) { + /* Disallow removing Lhs loads if the registers are used */ + SetIfOperandLoadUnremovable (&Data.Lhs, Data.UsedRegs); + + /* The Lhs regs are also used as the default Rhs until changed */ + PushedRegs = REG_AXY; + CopyLoadInfo (&Data.Rhs, &Data.Lhs); + Data.PushIndex = I; + Data.PushEntry = E; State = FoundPush; } else { /* Track load insns */ - TrackLoads (&Data.Lhs, E, I); + Used = TrackLoads (&Data.Lhs, S, I); + Data.UsedRegs &= ~E->Chg; + Data.UsedRegs |= Used; } break; @@ -1934,48 +1791,47 @@ unsigned OptStackOps (CodeSeg* S) ** for code that will disable us from translating the sequence. */ if (CE_HasLabel (E)) { - /* Currently we don't track across branches */ + /* Currently we don't track across branches. + ** Treat this as a change to all regs. + */ ClearLoadInfo (&Data.Rhs); + Data.Rhs.A.ChgIndex = I; + Data.Rhs.X.ChgIndex = I; + Data.Rhs.Y.ChgIndex = I; } if (E->OPC == OP65_JSR) { - /* Subroutine call: Check if this is one of the functions, ** we're going to replace. */ - Data.OptFunc = FindFunc (E->Arg); + if (SameRegXValue (&Data)) { + Data.OptFunc = FindFunc (FuncRegATable, FUNC_COUNT (FuncRegATable), E->Arg); + IsRegAOptFunc = 1; + } + if (Data.OptFunc == 0) { + Data.OptFunc = FindFunc (FuncTable, FUNC_COUNT (FuncTable), E->Arg); + IsRegAOptFunc = 0; + } if (Data.OptFunc) { + /* Disallow removing Rhs loads if the registers are used */ + SetIfOperandLoadUnremovable (&Data.Rhs, Data.UsedRegs); + /* Remember the op index and go on */ Data.OpIndex = I; Data.OpEntry = E; State = FoundOp; break; - } else if (!HarmlessCall (E->Arg)) { - /* A call to an unkown subroutine: We need to start - ** over after the last pushax. Note: This will also - ** happen if we encounter a call to pushax! + } else if (!HarmlessCall (E, 2)) { + /* The call might use or change the content that we are + ** going to access later via the stack pointer. In any + ** case, we need to start over after the last pushax. + ** Note: This will also happen if we encounter a call + ** to pushax! */ I = Data.PushIndex; State = Initialize; break; - } else { - /* Track register usage */ - Data.UsedRegs |= (E->Use | E->Chg); - TrackLoads (&Data.Rhs, E, I); } - - } else if (E->Info & OF_STORE && (E->Chg & REG_ZP) == 0) { - - /* Too dangerous - there may be a change of a variable - ** within the sequence. - */ - I = Data.PushIndex; - State = Initialize; - break; - - } else if ((E->Use & REG_SP) != 0 && - (E->AM != AM65_ZP_INDY || - RegValIsUnknown (E->RI->In.RegY) || - E->RI->In.RegY < 2)) { + } else if (((E->Chg | E->Use) & REG_SP) != 0) { /* If we are using the stack, and we don't have "indirect Y" ** addressing mode, or the value of Y is unknown, or less @@ -1985,53 +1841,93 @@ unsigned OptStackOps (CodeSeg* S) ** that the code works with the value on stack which is to ** be removed. */ - I = Data.PushIndex; - State = Initialize; - break; + if (E->AM == AM65_ZPX_IND || + ((E->Chg | E->Use) & SLV_IND) == 0 || + (RegValIsUnknown (E->RI->In.RegY) || + E->RI->In.RegY < 2)) { + I = Data.PushIndex; + State = Initialize; + break; + } - } else { - /* Other stuff: Track register usage */ - Data.UsedRegs |= (E->Use | E->Chg); - TrackLoads (&Data.Rhs, E, I); } - /* If the registers from the push (A/X) are used before they're - ** changed, we cannot change the sequence, because this would - ** with a high probability change the register contents. - */ - UsedRegs |= E->Use; - if ((UsedRegs & ~ChangedRegs) & REG_AX) { - I = Data.PushIndex; - State = Initialize; - break; + + /* Memorize the old rhs load indices before refreshing them */ + RhsAChgIndex = Data.Rhs.A.ChgIndex; + RhsXChgIndex = Data.Rhs.X.ChgIndex; + + /* Keep tracking Lhs src if necessary */ + SetIfOperandSrcAffected (&Data.Lhs, E); + + /* Track register usage */ + Used = TrackLoads (&Data.Rhs, S, I); + + Data.ZPUsage |= (E->Use | E->Chg); + /* The changes could depend on the use */ + Data.UsedRegs &= ~E->Chg; + Data.UsedRegs |= Used; + Data.ZPChanged |= E->Chg; + + /* Check if any parts of Lhs are used again before overwritten */ + if (PushedRegs != 0) { + if ((PushedRegs & E->Use) != 0) { + SetIfOperandLoadUnremovable (&Data.Lhs, PushedRegs & E->Use); + } + PushedRegs &= ~E->Chg; + } + /* Check if rhs is changed again after the push */ + if ((RhsAChgIndex != Data.Lhs.A.ChgIndex && + RhsAChgIndex != Data.Rhs.A.ChgIndex) || + (RhsXChgIndex != Data.Lhs.X.ChgIndex && + RhsXChgIndex != Data.Rhs.X.ChgIndex)) { + /* This will disable those sub-opts that require removing + ** the rhs as they can't handle such cases correctly. + */ + Data.RhsMultiChg = 1; } - ChangedRegs |= E->Chg; break; case FoundOp: /* Track zero page location usage beyond this point */ - Data.UsedRegs |= GetRegInfo (S, I, REG_SREG | REG_PTR1 | REG_PTR2); + Data.ZPUsage |= GetRegInfo (S, I, REG_SREG | REG_PTR1 | REG_PTR2); /* Finalize the load info */ FinalizeLoadInfo (&Data.Lhs, S); FinalizeLoadInfo (&Data.Rhs, S); - /* If the Lhs loads do load from zeropage, we have to include - ** them into UsedRegs registers used. The Rhs loads have already - ** been tracked. + /* Check if the lhs loads from zeropage. If this is true, these + ** zero page locations have to be added to ZPUsage, because + ** they cannot be used for intermediate storage. In addition, + ** if one of these zero page locations is destroyed between + ** pushing the lhs and the actual operation, we cannot use the + ** original zero page locations for the final op, but must + ** use another ZP location to save them. */ + Data.ZPChanged &= REG_ZP; if (Data.Lhs.A.LoadEntry && Data.Lhs.A.LoadEntry->AM == AM65_ZP) { - Data.UsedRegs |= Data.Lhs.A.LoadEntry->Use; + Data.ZPUsage |= Data.Lhs.A.LoadEntry->Use; + if ((Data.Lhs.A.LoadEntry->Use & Data.ZPChanged) != 0) { + Data.Lhs.A.Flags &= ~(LI_DIRECT | LI_RELOAD_Y); + } } if (Data.Lhs.X.LoadEntry && Data.Lhs.X.LoadEntry->AM == AM65_ZP) { - Data.UsedRegs |= Data.Lhs.X.LoadEntry->Use; + Data.ZPUsage |= Data.Lhs.X.LoadEntry->Use; + if ((Data.Lhs.X.LoadEntry->Use & Data.ZPChanged) != 0) { + Data.Lhs.X.Flags &= ~(LI_DIRECT | LI_RELOAD_Y); + } } + /* Flag entries that can't be removed */ + SetDontRemoveEntryFlags (&Data); + /* Check the preconditions. If they aren't ok, reset the insn - ** pointer to the pushax and start over. We will loose part of + ** pointer to the pushax and start over. We will lose part of ** load tracking but at least a/x has probably lost between ** pushax and here and will be tracked again when restarting. */ - if (!PreCondOk (&Data)) { + if (IsRegAOptFunc ? !RegAPreCondOk (&Data) : !PreCondOk (&Data)) { + /* Unflag entries that can't be removed */ + ResetDontRemoveEntryFlags (&Data); I = Data.PushIndex; State = Initialize; break; @@ -2055,7 +1951,11 @@ unsigned OptStackOps (CodeSeg* S) CS_GenRegInfo (S); /* Call the optimizer function */ - Changes += Data.OptFunc->Func (&Data); + const OptFuncDesc* Desc = Data.OptFunc; + Changes += Desc->Func (&Data); + + /* Unflag entries that can't be removed */ + ResetDontRemoveEntryFlags (&Data); /* Since the function may have added or deleted entries, ** correct the index. diff --git a/src/cc65/coptstore.c b/src/cc65/coptstore.c index 56343c95b..b0dfe3b6d 100644 --- a/src/cc65/coptstore.c +++ b/src/cc65/coptstore.c @@ -380,48 +380,48 @@ unsigned OptStore5 (CodeSeg* S) ** sta something ** stx something-else ** -** and replace it by +** and, replace it by ** -** lda foo -** sta something ** lda bar ** sta something-else +** lda foo +** sta something ** -** if X is not used later. This replacement doesn't save any cycles or bytes, -** but it keeps the value of X, which may be reused later. +** if the new value of X is not used later. That replacement doesn't save any +** cycles or bytes; but, it keeps the old value of X, which may be reused later. */ { unsigned Changes = 0; + unsigned I = 0; /* Walk over the entries */ - unsigned I = 0; while (I < CS_GetEntryCount (S)) { - CodeEntry* L[4]; /* Get next entry */ L[0] = CS_GetEntry (S, I); /* Check for the sequence */ - if (L[0]->OPC == OP65_LDA && - !CS_RangeHasLabel (S, I+1, 3) && - CS_GetEntries (S, L+1, I+1, 3) && - L[1]->OPC == OP65_LDX && - L[2]->OPC == OP65_STA && - L[3]->OPC == OP65_STX && + if (L[0]->OPC == OP65_LDA && + !CS_RangeHasLabel (S, I+1, 3) && + CS_GetEntries (S, L+1, I+1, 3) && + L[1]->OPC == OP65_LDX && + L[2]->OPC == OP65_STA && + L[3]->OPC == OP65_STX && !RegXUsed (S, I+4)) { - CodeEntry* X; + CodeEntry* E = CS_GetEntry (S, I+1); - /* Insert the code after the sequence */ - X = NewCodeEntry (OP65_LDA, L[1]->AM, L[1]->Arg, 0, L[1]->LI); - CS_InsertEntry (S, X, I+4); - X = NewCodeEntry (OP65_STA, L[3]->AM, L[3]->Arg, 0, L[3]->LI); - CS_InsertEntry (S, X, I+5); + /* Move the high-byte code to the beginning of the sequence */ + CS_MoveEntry (S, I+1, I); + CS_MoveEntry (S, I+3, I+1); - /* Delete the old code */ - CS_DelEntry (S, I+3); - CS_DelEntry (S, I+1); + /* Change from the X register to the A register */ + CE_ReplaceOPC (E, OP65_LDA); + CE_ReplaceOPC (CS_GetEntry (S, I+1), OP65_STA); + + /* Move labels from the old first entry to the new first entry */ + CS_MoveLabels (S, CS_GetEntry (S, I+2), E); /* Remember, we had changes */ ++Changes; @@ -429,7 +429,6 @@ unsigned OptStore5 (CodeSeg* S) /* Next entry */ ++I; - } /* Return the number of changes made */ diff --git a/src/cc65/coptsub.c b/src/cc65/coptsub.c index 3d75c1f72..08e65fe1d 100644 --- a/src/cc65/coptsub.c +++ b/src/cc65/coptsub.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2001-2006, Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/cc65/copttest.c b/src/cc65/copttest.c index 5628a42c3..f2d55244f 100644 --- a/src/cc65/copttest.c +++ b/src/cc65/copttest.c @@ -153,7 +153,7 @@ unsigned OptTest2 (CodeSeg* S) (L[2]->Info & OF_FBRA) != 0 && L[1]->AM == L[0]->AM && strcmp (L[0]->Arg, L[1]->Arg) == 0 && - (GetRegInfo (S, I+2, L[1]->Chg) & L[1]->Chg) == 0) { + (GetRegInfo (S, I+2, L[1]->Chg & ~PSTATE_ZN) & L[1]->Chg & ~PSTATE_ZN) == 0) { /* Remove the load */ CS_DelEntry (S, I+1); diff --git a/src/cc65/datatype.c b/src/cc65/datatype.c index 8c9d6dcb0..6d9afa403 100644 --- a/src/cc65/datatype.c +++ b/src/cc65/datatype.c @@ -59,16 +59,24 @@ /* Predefined type strings */ -Type type_schar[] = { TYPE(T_SCHAR), TYPE(T_END) }; -Type type_uchar[] = { TYPE(T_UCHAR), TYPE(T_END) }; -Type type_int[] = { TYPE(T_INT), TYPE(T_END) }; -Type type_uint[] = { TYPE(T_UINT), TYPE(T_END) }; -Type type_long[] = { TYPE(T_LONG), TYPE(T_END) }; -Type type_ulong[] = { TYPE(T_ULONG), TYPE(T_END) }; -Type type_void[] = { TYPE(T_VOID), TYPE(T_END) }; -Type type_size_t[] = { TYPE(T_SIZE_T), TYPE(T_END) }; -Type type_float[] = { TYPE(T_FLOAT), TYPE(T_END) }; -Type type_double[] = { TYPE(T_DOUBLE), TYPE(T_END) }; +const Type type_char[] = { TYPE(T_CHAR), TYPE(T_END) }; +const Type type_schar[] = { TYPE(T_SCHAR), TYPE(T_END) }; +const Type type_uchar[] = { TYPE(T_UCHAR), TYPE(T_END) }; +const Type type_int[] = { TYPE(T_INT), TYPE(T_END) }; +const Type type_uint[] = { TYPE(T_UINT), TYPE(T_END) }; +const Type type_long[] = { TYPE(T_LONG), TYPE(T_END) }; +const Type type_ulong[] = { TYPE(T_ULONG), TYPE(T_END) }; +const Type type_bool[] = { TYPE(T_INT), TYPE(T_END) }; +const Type type_void[] = { TYPE(T_VOID), TYPE(T_END) }; +const Type type_size_t[] = { TYPE(T_SIZE_T), TYPE(T_END) }; +const Type type_float[] = { TYPE(T_FLOAT), TYPE(T_END) }; +const Type type_double[] = { TYPE(T_DOUBLE), TYPE(T_END) }; + +/* More predefined type strings */ +const Type type_char_p[] = { TYPE(T_PTR), TYPE(T_CHAR), TYPE(T_END) }; +const Type type_c_char_p[] = { TYPE(T_PTR), TYPE(T_C_CHAR), TYPE(T_END) }; +const Type type_void_p[] = { TYPE(T_PTR), TYPE(T_VOID), TYPE(T_END) }; +const Type type_c_void_p[] = { TYPE(T_PTR), TYPE(T_C_VOID), TYPE(T_END) }; @@ -78,6 +86,297 @@ Type type_double[] = { TYPE(T_DOUBLE), TYPE(T_END) }; +static struct StrBuf* GetFullTypeNameWestEast (struct StrBuf* West, struct StrBuf* East, const Type* T) +/* Return the name string of the given type split into a western part and an +** eastern part. +*/ +{ + struct StrBuf Buf = AUTO_STRBUF_INITIALIZER; + + if (IsTypeArray (T)) { + + long Count = GetElementCount (T); + if (!SB_IsEmpty (East)) { + if (Count > 0) { + SB_Printf (&Buf, "[%ld]", Count); + } else { + SB_Printf (&Buf, "[]"); + } + SB_Append (East, &Buf); + SB_Terminate (East); + + } else { + if (Count > 0) { + SB_Printf (East, "[%ld]", Count); + } else { + SB_Printf (East, "[]"); + } + + if (!SB_IsEmpty (West)) { + /* Add parentheses to West */ + SB_Printf (&Buf, "(%s)", SB_GetConstBuf (West)); + SB_Copy (West, &Buf); + SB_Terminate (West); + } + } + + /* Get element type */ + GetFullTypeNameWestEast (West, East, T + 1); + + } else if (IsTypeFunc (T)) { + + FuncDesc* D = GetFuncDesc (T); + struct StrBuf ParamList = AUTO_STRBUF_INITIALIZER; + + /* First argument */ + SymEntry* Param = D->SymTab->SymHead; + unsigned I; + for (I = 0; I < D->ParamCount; ++I) { + CHECK (Param != 0 && (Param->Flags & SC_PARAM) != 0); + if (I > 0) { + SB_AppendStr (&ParamList, ", "); + } + SB_AppendStr (&ParamList, SB_GetConstBuf (GetFullTypeNameBuf (&Buf, Param->Type))); + SB_Clear (&Buf); + /* Next argument */ + Param = Param->NextSym; + } + if ((D->Flags & FD_VARIADIC) == 0) { + if (D->ParamCount == 0 && (D->Flags & FD_EMPTY) == 0) { + SB_AppendStr (&ParamList, "void"); + } + } else { + if (D->ParamCount > 0) { + SB_AppendStr (&ParamList, ", ..."); + } else { + SB_AppendStr (&ParamList, "..."); + } + } + SB_Terminate (&ParamList); + + /* Join the existing West and East together */ + if (!SB_IsEmpty (East)) { + SB_Append (West, East); + SB_Terminate (West); + SB_Clear (East); + } + + if (SB_IsEmpty (West)) { + /* Just use the param list */ + SB_Printf (West, "(%s)", SB_GetConstBuf (&ParamList)); + } else { + /* Append the param list to the existing West */ + SB_Printf (&Buf, "(%s)(%s)", SB_GetConstBuf (West), SB_GetConstBuf (&ParamList)); + SB_Printf (West, "%s", SB_GetConstBuf (&Buf)); + } + SB_Done (&ParamList); + + /* Return type */ + GetFullTypeNameWestEast (West, East, T + 1); + + } else if (IsTypePtr (T)) { + + int QualCount = 0; + + SB_Printf (&Buf, "*"); + + /* Add qualifiers */ + if ((GetQualifier (T) & ~T_QUAL_NEAR) != T_QUAL_NONE) { + QualCount = GetQualifierTypeCodeNameBuf (&Buf, T->C, T_QUAL_NEAR); + } + + if (!SB_IsEmpty (West)) { + if (QualCount > 0) { + SB_AppendChar (&Buf, ' '); + } + SB_Append (&Buf, West); + } + + SB_Copy (West, &Buf); + SB_Terminate (West); + + /* Get indirection type */ + GetFullTypeNameWestEast (West, East, T + 1); + + } else { + + /* Add qualifiers */ + if ((GetQualifier (T) & ~T_QUAL_NEAR) != 0) { + if (GetQualifierTypeCodeNameBuf (&Buf, T->C, T_QUAL_NEAR) > 0) { + SB_AppendChar (&Buf, ' '); + } + } + + if (!IsTypeBitField (T)) { + SB_AppendStr (&Buf, GetSymTypeName (T)); + } else { + SB_AppendStr (&Buf, GetBasicTypeName (T + 1)); + } + + if (!SB_IsEmpty (West)) { + SB_AppendChar (&Buf, ' '); + SB_Append (&Buf, West); + } + + SB_Copy (West, &Buf); + SB_Terminate (West); + } + + SB_Done (&Buf); + return West; +} + + + +const char* GetBasicTypeName (const Type* T) +/* Return a const name string of the basic type. +** Return "type" for unknown basic types. +*/ +{ + switch (GetRawType (T)) { + case T_TYPE_ENUM: return "enum"; + case T_TYPE_BITFIELD: return "bit-field"; + case T_TYPE_FLOAT: return "float"; + case T_TYPE_DOUBLE: return "double"; + case T_TYPE_VOID: return "void"; + case T_TYPE_STRUCT: return "struct"; + case T_TYPE_UNION: return "union"; + case T_TYPE_ARRAY: return "array"; + case T_TYPE_PTR: return "pointer"; + case T_TYPE_FUNC: return "function"; + case T_TYPE_NONE: /* FALLTHROUGH */ + default: break; + } + if (IsClassInt (T)) { + if (IsRawSignSigned (T)) { + switch (GetRawType (T)) { + case T_TYPE_CHAR: return "signed char"; + case T_TYPE_SHORT: return "short"; + case T_TYPE_INT: return "int"; + case T_TYPE_LONG: return "long"; + case T_TYPE_LONGLONG: return "long long"; + default: + return "signed integer"; + } + } else if (IsRawSignUnsigned (T)) { + switch (GetRawType (T)) { + case T_TYPE_CHAR: return "unsigned char"; + case T_TYPE_SHORT: return "unsigned short"; + case T_TYPE_INT: return "unsigned int"; + case T_TYPE_LONG: return "unsigned long"; + case T_TYPE_LONGLONG: return "unsigned long long"; + default: + return "unsigned integer"; + } + } else { + switch (GetRawType (T)) { + case T_TYPE_CHAR: return "char"; + case T_TYPE_SHORT: return "short"; + case T_TYPE_INT: return "int"; + case T_TYPE_LONG: return "long"; + case T_TYPE_LONGLONG: return "long long"; + default: + return "integer"; + } + } + } + return "type"; +} + + + +const char* GetFullTypeName (const Type* T) +/* Return the full name string of the given type */ +{ + struct StrBuf* Buf = NewDiagnosticStrBuf (); + GetFullTypeNameBuf (Buf, T); + + return SB_GetConstBuf (Buf); +} + + + +struct StrBuf* GetFullTypeNameBuf (struct StrBuf* S, const Type* T) +/* Return the full name string of the given type */ +{ + struct StrBuf East = AUTO_STRBUF_INITIALIZER; + GetFullTypeNameWestEast (S, &East, T); + + /* Join West and East */ + SB_Append (S, &East); + SB_Terminate (S); + SB_Done (&East); + + return S; +} + + + +int GetQualifierTypeCodeNameBuf (struct StrBuf* S, TypeCode Qual, TypeCode IgnoredQual) +/* Return the names of the qualifiers of the type. +** Qualifiers to be ignored can be specified with the IgnoredQual flags. +** Return the count of added qualifier names. +*/ +{ + int Count = 0; + + Qual &= T_MASK_QUAL & ~IgnoredQual; + if (Qual & T_QUAL_CONST) { + if (!SB_IsEmpty (S)) { + SB_AppendChar (S, ' '); + } + SB_AppendStr (S, "const"); + ++Count; + } + if (Qual & T_QUAL_VOLATILE) { + if (Count > 0) { + SB_AppendChar (S, ' '); + } + SB_AppendStr (S, "volatile"); + ++Count; + } + if (Qual & T_QUAL_RESTRICT) { + if (Count > 0) { + SB_AppendChar (S, ' '); + } + SB_AppendStr (S, "restrict"); + ++Count; + } + if (Qual & T_QUAL_NEAR) { + if (Count > 0) { + SB_AppendChar (S, ' '); + } + SB_AppendStr (S, "__near__"); + ++Count; + } + if (Qual & T_QUAL_FAR) { + SB_AppendStr (S, "__far__"); + ++Count; + } + if (Qual & T_QUAL_FASTCALL) { + if (Count > 0) { + SB_AppendChar (S, ' '); + } + SB_AppendStr (S, "__fastcall__"); + ++Count; + } + if (Qual & T_QUAL_CDECL) { + if (Count > 0) { + SB_AppendChar (S, ' '); + } + SB_AppendStr (S, "__cdecl__"); + ++Count; + } + + if (Count > 0) { + SB_Terminate (S); + } + + return Count; +} + + + unsigned TypeLen (const Type* T) /* Return the length of the type string */ { @@ -146,14 +445,6 @@ int SignExtendChar (int C) -TypeCode GetDefaultChar (void) -/* Return the default char type (signed/unsigned) depending on the settings */ -{ - return IS_Get (&SignedChars)? T_SCHAR : T_UCHAR; -} - - - Type* GetCharArrayType (unsigned Len) /* Return the type for a char array of the given length */ { @@ -163,7 +454,7 @@ Type* GetCharArrayType (unsigned Len) /* Fill the type string */ T[0].C = T_ARRAY; T[0].A.L = Len; /* Array length is in the L attribute */ - T[1].C = GetDefaultChar (); + T[1].C = T_CHAR; T[2].C = T_END; /* Return the new type */ @@ -182,13 +473,13 @@ Type* GetImplicitFuncType (void) Type* T = TypeAlloc (3); /* func/returns int/terminator */ /* Prepare the function descriptor */ - F->Flags = FD_EMPTY | FD_VARIADIC; + F->Flags = FD_EMPTY; F->SymTab = &EmptySymTab; F->TagTab = &EmptySymTab; /* Fill the type string */ T[0].C = T_FUNC | CodeAddrSizeQualifier (); - T[0].A.P = F; + T[0].A.F = F; T[1].C = T_INT; T[2].C = T_END; @@ -198,187 +489,225 @@ Type* GetImplicitFuncType (void) -Type* PointerTo (const Type* T) -/* Return a type string that is "pointer to T". The type string is allocated -** on the heap and may be freed after use. +const Type* GetStructReplacementType (const Type* SType) +/* Get a replacement type for passing a struct/union in the primary register */ +{ + const Type* NewType; + /* If the size is less than or equal to that of a long, we will copy the + ** struct using the primary register, otherwise we will use memcpy. + */ + switch (SizeOf (SType)) { + case 1: NewType = type_uchar; break; + case 2: NewType = type_uint; break; + case 3: /* FALLTHROUGH */ + case 4: NewType = type_ulong; break; + default: NewType = SType; break; + } + + return NewType; +} + + + +long GetIntegerTypeMin (const Type* Type) +/* Get the smallest possible value of the integer type. +** The type must have a known size. */ { - /* Get the size of the type string including the terminator */ - unsigned Size = TypeLen (T) + 1; - - /* Allocate the new type string */ - Type* P = TypeAlloc (Size + 1); - - /* Create the return type... */ - P[0].C = T_PTR | (T[0].C & T_QUAL_ADDRSIZE); - memcpy (P+1, T, Size * sizeof (Type)); - - /* ...and return it */ - return P; -} - - - -static TypeCode PrintTypeComp (FILE* F, TypeCode C, TypeCode Mask, const char* Name) -/* Check for a specific component of the type. If it is there, print the -** name and remove it. Return the type with the component removed. -*/ -{ - if ((C & Mask) == Mask) { - fprintf (F, "%s ", Name); - C &= ~Mask; + if (SizeOf (Type) == 0) { + Internal ("Incomplete type used in GetIntegerTypeMin"); } - return C; -} - - -void PrintType (FILE* F, const Type* T) -/* Output translation of type array. */ -{ - /* Walk over the type string */ - while (T->C != T_END) { - - /* Get the type code */ - TypeCode C = T->C; - - /* Print any qualifiers */ - C = PrintTypeComp (F, C, T_QUAL_CONST, "const"); - C = PrintTypeComp (F, C, T_QUAL_VOLATILE, "volatile"); - C = PrintTypeComp (F, C, T_QUAL_RESTRICT, "restrict"); - C = PrintTypeComp (F, C, T_QUAL_NEAR, "__near__"); - C = PrintTypeComp (F, C, T_QUAL_FAR, "__far__"); - C = PrintTypeComp (F, C, T_QUAL_FASTCALL, "__fastcall__"); - C = PrintTypeComp (F, C, T_QUAL_CDECL, "__cdecl__"); - - /* Signedness. Omit the signedness specifier for long and int */ - if ((C & T_MASK_TYPE) != T_TYPE_INT && (C & T_MASK_TYPE) != T_TYPE_LONG) { - C = PrintTypeComp (F, C, T_SIGN_SIGNED, "signed"); - } - C = PrintTypeComp (F, C, T_SIGN_UNSIGNED, "unsigned"); - - /* Now check the real type */ - switch (C & T_MASK_TYPE) { - case T_TYPE_CHAR: - fprintf (F, "char"); - break; - case T_TYPE_SHORT: - fprintf (F, "short"); - break; - case T_TYPE_INT: - fprintf (F, "int"); - break; - case T_TYPE_LONG: - fprintf (F, "long"); - break; - case T_TYPE_LONGLONG: - fprintf (F, "long long"); - break; - case T_TYPE_FLOAT: - fprintf (F, "float"); - break; - case T_TYPE_DOUBLE: - fprintf (F, "double"); - break; - case T_TYPE_VOID: - fprintf (F, "void"); - break; - case T_TYPE_STRUCT: - fprintf (F, "struct %s", ((SymEntry*) T->A.P)->Name); - break; - case T_TYPE_UNION: - fprintf (F, "union %s", ((SymEntry*) T->A.P)->Name); - break; - case T_TYPE_ARRAY: - /* Recursive call */ - PrintType (F, T + 1); - if (T->A.L == UNSPECIFIED) { - fprintf (F, " []"); - } else { - fprintf (F, " [%ld]", T->A.L); - } - return; - case T_TYPE_PTR: - /* Recursive call */ - PrintType (F, T + 1); - fprintf (F, " *"); - return; - case T_TYPE_FUNC: - fprintf (F, "function returning "); - break; - default: - fprintf (F, "unknown type: %04lX", T->C); - } - - /* Next element */ - ++T; - } -} - - - -void PrintFuncSig (FILE* F, const char* Name, Type* T) -/* Print a function signature. */ -{ - /* Get the function descriptor */ - const FuncDesc* D = GetFuncDesc (T); - - /* Print a comment with the function signature */ - PrintType (F, GetFuncReturn (T)); - if (IsQualNear (T)) { - fprintf (F, " __near__"); - } - if (IsQualFar (T)) { - fprintf (F, " __far__"); - } - if (IsQualFastcall (T)) { - fprintf (F, " __fastcall__"); - } - if (IsQualCDecl (T)) { - fprintf (F, " __cdecl__"); - } - fprintf (F, " %s (", Name); - - /* Parameters */ - if (D->Flags & FD_VOID_PARAM) { - fprintf (F, "void"); + if (IsSignSigned (Type)) { + /* The smallest possible signed value of N-byte integer is -pow(2, 8*N-1) */ + return (long)((unsigned long)(-1L) << (CHAR_BITS * SizeOf (Type) - 1U)); } else { - unsigned I; - SymEntry* E = D->SymTab->SymHead; - for (I = 0; I < D->ParamCount; ++I) { - if (I > 0) { - fprintf (F, ", "); - } - if (SymIsRegVar (E)) { - fprintf (F, "register "); - } - PrintType (F, E->Type); - E = E->NextSym; + return 0; + } +} + + + +unsigned long GetIntegerTypeMax (const Type* Type) +/* Get the largest possible value of the integer type. +** The type must have a known size. +*/ +{ + if (SizeOf (Type) == 0) { + Internal ("Incomplete type used in GetIntegerTypeMax"); + } + + if (IsSignSigned (Type)) { + /* Min signed value of N-byte integer is pow(2, 8*N-1) - 1 */ + return (1UL << (CHAR_BITS * SizeOf (Type) - 1U)) - 1UL; + } else { + /* Max signed value of N-byte integer is pow(2, 8*N) - 1. However, + ** workaround is needed as in ISO C it is UB if the shift count is + ** equal to the bit width of the left operand type. + */ + return (1UL << 1U << (CHAR_BITS * SizeOf (Type) - 1U)) - 1UL; + } +} + + + +static unsigned GetBitFieldMinimalTypeSize (unsigned BitWidth) +/* Return the size of the smallest integer type that may have BitWidth bits */ +{ + /* Since all integer types supported in cc65 for bit-fields have sizes that + ** are powers of 2, we can just use this bit-twiddling trick. + */ + unsigned V = (int)(BitWidth - 1U) / (int)CHAR_BITS; + V |= V >> 1; + V |= V >> 2; + V |= V >> 4; + V |= V >> 8; + V |= V >> 16; + + /* Return the result size */ + return V + 1U; +} + + +static unsigned TypeOfBySize (unsigned Size) +/* Get the code generator replacement type of the object by its size */ +{ + unsigned NewType; + /* If the size is less than or equal to that of a a long, we will copy + ** the struct using the primary register, otherwise we use memcpy. + */ + switch (Size) { + case 1: NewType = CF_CHAR; break; + case 2: NewType = CF_INT; break; + case 3: /* FALLTHROUGH */ + case 4: NewType = CF_LONG; break; + default: NewType = CF_NONE; break; + } + + return NewType; +} + + + +const Type* GetUnderlyingType (const Type* Type) +/* Get the underlying type of an enum or other integer class type */ +{ + if (IsISOChar (Type)) { + return IS_Get (&SignedChars) ? type_schar : type_uchar; + } else if (IsTypeEnum (Type)) { + /* This should not happen, but just in case */ + if (Type->A.S == 0) { + Internal ("Enum tag type error in GetUnderlyingTypeCode"); + } + + /* If incomplete enum type is used, just return its raw type */ + if (Type->A.S->V.E.Type != 0) { + return Type->A.S->V.E.Type; + } + } else if (IsTypeBitField (Type)) { + /* We consider the smallest type that can represent all values of the + ** bit-field, instead of the type used in the declaration, the truly + ** underlying of the bit-field. + */ + switch (GetBitFieldMinimalTypeSize (Type->A.B.Width)) { + case SIZEOF_CHAR: Type = IsSignSigned (Type) ? type_schar : type_uchar; break; + case SIZEOF_INT: Type = IsSignSigned (Type) ? type_int : type_uint; break; + case SIZEOF_LONG: Type = IsSignSigned (Type) ? type_long : type_ulong; break; + default: Type = IsSignSigned (Type) ? type_int : type_uint; break; } } - /* End of parameter list */ - fprintf (F, ")"); + return Type; } -void PrintRawType (FILE* F, const Type* T) -/* Print a type string in raw format (for debugging) */ +TypeCode GetUnderlyingTypeCode (const Type* Type) +/* Get the type code of the unqualified underlying type of TCode. +** Return UnqualifiedType (TCode) if TCode is not scalar. +*/ { - while (T->C != T_END) { - fprintf (F, "%04lX ", T->C); - ++T; + TypeCode Underlying = UnqualifiedType (Type->C); + + if (IsISOChar (Type)) { + + return IS_Get (&SignedChars) ? T_SCHAR : T_UCHAR; + + } else if (IsTypeEnum (Type)) { + TypeCode TCode; + + /* This should not happen, but just in case */ + if (Type->A.S == 0) { + Internal ("Enum tag type error in GetUnderlyingTypeCode"); + } + + /* Inspect the underlying type of the enum */ + if (Type->A.S->V.E.Type == 0) { + /* Incomplete enum type is used */ + return Underlying; + } + TCode = UnqualifiedType (Type->A.S->V.E.Type->C); + + /* Replace the type code with integer */ + Underlying = (TCode & ~T_MASK_TYPE); + switch (TCode & T_MASK_SIZE) { + case T_SIZE_INT: Underlying |= T_TYPE_INT; break; + case T_SIZE_LONG: Underlying |= T_TYPE_LONG; break; + case T_SIZE_SHORT: Underlying |= T_TYPE_SHORT; break; + case T_SIZE_CHAR: Underlying |= T_TYPE_CHAR; break; + case T_SIZE_LONGLONG: Underlying |= T_TYPE_LONGLONG; break; + default: Underlying |= T_TYPE_INT; break; + } + } else if (IsTypeBitField (Type)) { + /* We consider the smallest type that can represent all values of the + ** bit-field, instead of the type used in the declaration, the truly + ** underlying of the bit-field. + */ + switch (GetBitFieldMinimalTypeSize (Type->A.B.Width)) { + case SIZEOF_CHAR: Underlying = T_CHAR; break; + case SIZEOF_INT: Underlying = T_INT; break; + case SIZEOF_LONG: Underlying = T_LONG; break; + case SIZEOF_LONGLONG: Underlying = T_LONGLONG; break; + default: Underlying = T_INT; break; + } + Underlying &= ~T_MASK_SIGN; + Underlying |= Type->C & T_MASK_SIGN; } - fprintf (F, "\n"); + + return Underlying; } -int TypeHasAttr (const Type* T) -/* Return true if the given type has attribute data */ +const Type* GetBitFieldChunkType (const Type* Type) +/* Get the type needed to operate on the byte chunk containing the bit-field */ { - return IsClassStruct (T) || IsTypeArray (T) || IsClassFunc (T); + unsigned ChunkSize; + if ((Type->A.B.Width - 1U) / CHAR_BITS == + (Type->A.B.Offs + Type->A.B.Width - 1U) / CHAR_BITS) { + /* T bit-field fits within its underlying type */ + return GetUnderlyingType (Type); + } + + ChunkSize = GetBitFieldMinimalTypeSize (Type->A.B.Offs + Type->A.B.Width); + if (ChunkSize < SizeOf (Type + 1)) { + /* The end of the bit-field is offset by some bits so that it requires + ** more bytes to be accessed as a whole than its underlying type does. + ** Note: In cc65 the bit offset is always less than CHAR_BITS. + */ + switch (ChunkSize) { + case SIZEOF_CHAR: return IsSignSigned (Type) ? type_schar : type_uchar; + case SIZEOF_INT: return IsSignSigned (Type) ? type_int : type_uint; + case SIZEOF_LONG: return IsSignSigned (Type) ? type_long : type_ulong; + default: return IsSignSigned (Type) ? type_int : type_uint; + } + } + + /* We can always use the declarartion integer type as the chunk type. + ** Note: A bit-field will not occupy bits located in bytes more than that + ** of its declaration type in cc65. So this is OK. + */ + return Type + 1; } @@ -386,14 +715,18 @@ int TypeHasAttr (const Type* T) unsigned SizeOf (const Type* T) /* Compute size of object represented by type array. */ { - switch (UnqualifiedType (T->C)) { + switch (GetUnderlyingTypeCode (T)) { case T_VOID: - return 0; /* Assume voids have size zero */ + /* A void variable is a cc65 extension. + ** Get its size (in bytes). + */ + return T->A.U; /* Beware: There's a chance that this triggers problems in other parts - of the compiler. The solution is to fix the callers, because calling - SizeOf() with a function type as argument is bad. */ + ** of the compiler. The solution is to fix the callers, because calling + ** SizeOf() with a function type as argument is bad. + */ case T_FUNC: return 0; /* Size of function is unknown */ @@ -420,9 +753,6 @@ unsigned SizeOf (const Type* T) case T_ULONGLONG: return SIZEOF_LONGLONG; - case T_ENUM: - return SIZEOF_INT; - case T_FLOAT: return SIZEOF_FLOAT; @@ -431,17 +761,22 @@ unsigned SizeOf (const Type* T) case T_STRUCT: case T_UNION: - return ((SymEntry*) T->A.P)->V.S.Size; + return T->A.S->V.S.Size; case T_ARRAY: if (T->A.L == UNSPECIFIED) { /* Array with unspecified size */ return 0; } else { - return T->A.L * SizeOf (T + 1); + return T->A.U * SizeOf (T + 1); } + case T_ENUM: + /* Incomplete enum type */ + return 0; + default: + Internal ("Unknown type in SizeOf: %04lX", T->C); return 0; @@ -470,7 +805,11 @@ unsigned CheckedSizeOf (const Type* T) { unsigned Size = SizeOf (T); if (Size == 0) { - Error ("Size of data type is unknown"); + if (HasUnknownSize (T + 1)) { + Error ("Size of type '%s' is unknown", GetFullTypeName (T)); + } else { + Error ("Size of type '%s' is 0", GetFullTypeName (T)); + } Size = SIZEOF_CHAR; /* Don't return zero */ } return Size; @@ -486,7 +825,11 @@ unsigned CheckedPSizeOf (const Type* T) { unsigned Size = PSizeOf (T); if (Size == 0) { - Error ("Size of data type is unknown"); + if (HasUnknownSize (T + 1)) { + Error ("Pointer to type '%s' of unknown size", GetFullTypeName (T + 1)); + } else { + Error ("Pointer to type '%s' of 0 size", GetFullTypeName (T + 1)); + } Size = SIZEOF_CHAR; /* Don't return zero */ } return Size; @@ -497,7 +840,9 @@ unsigned CheckedPSizeOf (const Type* T) unsigned TypeOf (const Type* T) /* Get the code generator base type of the object */ { - switch (UnqualifiedType (T->C)) { + unsigned NewType; + + switch (GetUnderlyingTypeCode (T)) { case T_SCHAR: return CF_CHAR; @@ -507,7 +852,6 @@ unsigned TypeOf (const Type* T) case T_SHORT: case T_INT: - case T_ENUM: return CF_INT; case T_USHORT: @@ -528,13 +872,24 @@ unsigned TypeOf (const Type* T) return CF_FLOAT; case T_FUNC: - return (((FuncDesc*) T->A.P)->Flags & FD_VARIADIC)? 0 : CF_FIXARGC; + /* Treat this as a function pointer */ + return CF_INT | CF_UNSIGNED; case T_STRUCT: case T_UNION: + NewType = TypeOfBySize (SizeOf (T)); + if (NewType != CF_NONE) { + return NewType; + } /* Address of ... */ return CF_INT | CF_UNSIGNED; + case T_VOID: + case T_ENUM: + /* Incomplete enum type */ + Error ("Incomplete type '%s'", GetFullTypeName (T)); + return CF_INT; + default: Error ("Illegal type %04lX", T->C); return CF_INT; @@ -543,7 +898,20 @@ unsigned TypeOf (const Type* T) -Type* Indirect (Type* T) +unsigned FuncTypeOf (const Type* T) +/* Get the code generator flag for calling the function */ +{ + if (GetUnderlyingTypeCode (T) == T_FUNC) { + return (T->A.F->Flags & FD_VARIADIC) ? 0 : CF_FIXARGC; + } else { + Error ("Illegal function type %04lX", T->C); + return 0; + } +} + + + +const Type* Indirect (const Type* T) /* Do one indirection for the given type, that is, return the type where the ** given type points to. */ @@ -557,22 +925,436 @@ Type* Indirect (Type* T) -Type* ArrayToPtr (Type* T) +Type* IndirectModifiable (Type* T) +/* Do one indirection for the given type, that is, return the type where the +** given type points to. +*/ +{ + /* We are expecting a pointer expression */ + CHECK (IsClassPtr (T)); + + /* Skip the pointer or array token itself */ + return T + 1; +} + + + +Type* NewPointerTo (const Type* T) +/* Return a type string that is "pointer to T". The type string is allocated +** on the heap and may be freed after use. +*/ +{ + /* Get the size of the type string including the terminator */ + unsigned Size = TypeLen (T) + 1; + + /* Allocate the new type string */ + Type* P = TypeAlloc (Size + 1); + + /* Create the return type... */ + P[0].C = T_PTR | (T[0].C & T_QUAL_ADDRSIZE); + memcpy (P+1, T, Size * sizeof (Type)); + + /* ...and return it */ + return P; +} + + + +const Type* AddressOf (const Type* T) +/* Return a type string that is "address of T". The type string is allocated +** on the heap and may be freed after use. +*/ +{ + /* Get the size of the type string including the terminator */ + unsigned Size = TypeLen (T) + 1; + + /* Allocate the new type string */ + Type* P = TypeAlloc (Size + 1); + + /* Create the return type... */ + P[0].C = T_PTR | (T[0].C & T_QUAL_ADDRSIZE) | T_QUAL_CONST; + memcpy (P+1, T, Size * sizeof (Type)); + + /* ...and return it */ + return P; +} + + + +Type* ArrayToPtr (const Type* T) /* Convert an array to a pointer to it's first element */ { /* Return pointer to first element */ - return PointerTo (GetElementType (T)); + return NewPointerTo (GetElementType (T)); +} + + + +const Type* PtrConversion (const Type* T) +/* If the type is a function, convert it to pointer to function. If the +** expression is an array, convert it to pointer to first element. Otherwise +** return T. +*/ +{ + if (IsTypeFunc (T)) { + return AddressOf (T); + } else if (IsTypeArray (T)) { + return AddressOf (GetElementType (T)); + } else { + return T; + } +} + + + +const Type* StdConversion (const Type* T) +/* If the type is a function, convert it to pointer to function. If the +** expression is an array, convert it to pointer to first element. If the +** type is an integer, do integeral promotion. Otherwise return T. +*/ +{ + if (IsTypeFunc (T)) { + return AddressOf (T); + } else if (IsTypeArray (T)) { + return AddressOf (GetElementType (T)); + } else if (IsClassInt (T)) { + return IntPromotion (T); + } else { + return T; + } +} + + + +const Type* IntPromotion (const Type* T) +/* Apply the integer promotions to T and return the result. The returned type +** string may be T if there is no need to change it. +*/ +{ + /* We must have an int to apply int promotions */ + PRECONDITION (IsClassInt (T)); + + /* https://port70.net/~nsz/c/c89/c89-draft.html#3.2.1.1 + ** A char, a short int, or an int bit-field, or their signed or unsigned varieties, or + ** an object that has enumeration type, may be used in an expression wherever an int or + ** unsigned int may be used. If an int can represent all values of the original type, + ** the value is converted to an int; otherwise it is converted to an unsigned int. + ** These are called the integral promotions. + */ + + if (IsTypeBitField (T)) { + /* As we now support long bit-fields, we need modified rules for them: + ** - If an int can represent all values of the bit-field, the bit-field is converted + ** to an int; + ** - Otherwise, if an unsigned int can represent all values of the bit-field, the + ** bit-field is converted to an unsigned int; + ** - Otherwise, the bit-field will have its declared integer type. + ** These rules are borrowed from C++ and seem to be consistent with GCC/Clang's. + */ + if (T->A.B.Width > INT_BITS) { + return IsSignUnsigned (T) ? type_ulong : type_long; + } + return T->A.B.Width == INT_BITS && IsSignUnsigned (T) ? type_uint : type_int; + } else if (IsTypeChar (T)) { + /* An integer can represent all values from either signed or unsigned char, so convert + ** chars to int. + */ + return type_int; + } else if (IsTypeShort (T)) { + /* An integer cannot represent all values from unsigned short, so convert unsigned short + ** to unsigned int. + */ + return IsSignUnsigned (T) ? type_uint : type_int; + } else if (!IsIncompleteESUType (T)) { + /* The type is a complete type not smaller than int, so leave it alone. */ + return T; + } else { + /* Otherwise, this is an incomplete enum, and there is expceted to be an error already. + ** Assume int to avoid further errors. + */ + return type_int; + } +} + + + +const Type* ArithmeticConvert (const Type* lhst, const Type* rhst) +/* Perform the usual arithmetic conversions for binary operators. */ +{ + /* https://port70.net/~nsz/c/c89/c89-draft.html#3.2.1.5 + ** Many binary operators that expect operands of arithmetic type cause conversions and yield + ** result types in a similar way. The purpose is to yield a common type, which is also the type + ** of the result. This pattern is called the usual arithmetic conversions. + */ + + /* There are additional rules for floating point types that we don't bother with, since + ** floating point types are not (yet) supported. + ** The integral promotions are performed on both operands. + */ + lhst = IntPromotion (lhst); + rhst = IntPromotion (rhst); + + /* If either operand has type unsigned long int, the other operand is converted to + ** unsigned long int. + */ + if ((IsTypeLong (lhst) && IsSignUnsigned (lhst)) || + (IsTypeLong (rhst) && IsSignUnsigned (rhst))) { + return type_ulong; + } + + /* Otherwise, if one operand has type long int and the other has type unsigned int, + ** if a long int can represent all values of an unsigned int, the operand of type unsigned int + ** is converted to long int ; if a long int cannot represent all the values of an unsigned int, + ** both operands are converted to unsigned long int. + */ + if ((IsTypeLong (lhst) && IsTypeInt (rhst) && IsSignUnsigned (rhst)) || + (IsTypeLong (rhst) && IsTypeInt (lhst) && IsSignUnsigned (lhst))) { + /* long can represent all unsigneds, so we are in the first sub-case. */ + return type_long; + } + + /* Otherwise, if either operand has type long int, the other operand is converted to long int. + */ + if (IsTypeLong (lhst) || IsTypeLong (rhst)) { + return type_long; + } + + /* Otherwise, if either operand has type unsigned int, the other operand is converted to + ** unsigned int. + */ + if ((IsTypeInt (lhst) && IsSignUnsigned (lhst)) || + (IsTypeInt (rhst) && IsSignUnsigned (rhst))) { + return type_uint; + } + + /* Otherwise, both operands have type int. */ + CHECK (IsTypeInt (lhst)); + CHECK (IsSignSigned (lhst)); + CHECK (IsTypeInt (rhst)); + CHECK (IsSignSigned (rhst)); + return type_int; +} + + + +const Type* SignedType (const Type* T) +/* Get signed counterpart of the integral type */ +{ + switch (GetUnderlyingTypeCode (T) & T_MASK_TYPE) { + case T_TYPE_CHAR: + return type_schar; + + case T_TYPE_INT: + case T_TYPE_SHORT: + return type_int; + + case T_TYPE_LONG: + return type_long; + + default: + Internal ("Unknown type code: %lX", GetUnderlyingTypeCode (T)); + return T; + } +} + + + +const Type* UnsignedType (const Type* T) +/* Get unsigned counterpart of the integral type */ +{ + switch (GetUnderlyingTypeCode (T) & T_MASK_TYPE) { + case T_TYPE_CHAR: + return type_uchar; + + case T_TYPE_INT: + case T_TYPE_SHORT: + return type_uint; + + case T_TYPE_LONG: + return type_ulong; + + default: + Internal ("Unknown type code: %lX", GetUnderlyingTypeCode (T)); + return T; + } +} + + + +Type* NewBitFieldType (const Type* T, unsigned BitOffs, unsigned BitWidth) +/* Return a type string that is "T : BitWidth" aligned on BitOffs. The type +** string is allocated on the heap and may be freed after use. +*/ +{ + Type* P; + + /* The type specifier must be integeral */ + CHECK (IsClassInt (T)); + + /* Allocate the new type string */ + P = TypeAlloc (3); + + /* Create the return type... */ + P[0].C = IsSignSigned (T) ? T_SBITFIELD : T_UBITFIELD; + P[0].C |= (T[0].C & T_QUAL_ADDRSIZE); + P[0].A.B.Offs = BitOffs; + P[0].A.B.Width = BitWidth; + + /* Get the declaration type */ + memcpy (&P[1], GetUnderlyingType (T), sizeof (P[1])); + + /* Get done... */ + P[2].C = T_END; + + /* ...and return it */ + return P; +} + + + +int IsTypeFragBitField (const Type* T) +/* Return true if this is a bit-field that shares byte space with other fields */ +{ + return IsTypeBitField (T) && + (T->A.B.Offs != 0 || T->A.B.Width != CHAR_BITS * SizeOf (T)); +} + + + +int IsClassObject (const Type* T) +/* Return true if this is a fully described object type */ +{ + return !IsTypeFunc (T) && !IsClassIncomplete (T); +} + + + +int IsClassIncomplete (const Type* T) +/* Return true if this is an object type lacking size info */ +{ + if (IsTypeArray (T)) { + return GetElementCount (T) == UNSPECIFIED || IsClassIncomplete (T + 1); + } + return IsTypeVoid (T) || IsIncompleteESUType (T); +} + + + +int IsClassArithmetic (const Type* T) +/* Return true if this is an integer or real floating type */ +{ + return IsClassInt (T) || IsClassFloat (T); +} + + + +int IsClassBasic (const Type* T) +/* Return true if this is a char, integer or floating type */ +{ + return IsClassChar (T) || IsClassInt (T) || IsClassFloat (T); +} + + + +int IsClassScalar (const Type* T) +/* Return true if this is an arithmetic or pointer type */ +{ + return IsClassArithmetic (T) || IsTypePtr (T); +} + + + +int IsClassDerived (const Type* T) +/* Return true if this is an array, struct, union, function or pointer type */ +{ + return IsTypeArray (T) || IsClassStruct (T) || IsClassFunc (T) || IsTypePtr (T); +} + + + +int IsClassAggregate (const Type* T) +/* Return true if this is an array or struct type */ +{ + return IsTypeArray (T) || IsTypeStruct (T); +} + + + +int IsRelationType (const Type* T) +/* Return true if this is an arithmetic, array or pointer type */ +{ + return IsClassArithmetic (T) || IsClassPtr (T); +} + + + +int IsCastType (const Type* T) +/* Return true if this type can be used for casting */ +{ + return IsClassScalar (T) || IsTypeVoid (T); +} + + + +int IsESUType (const Type* T) +/* Return true if this is an enum/struct/union type */ +{ + return IsClassStruct (T) || IsTypeEnum (T); +} + + + +int IsIncompleteESUType (const Type* T) +/* Return true if this is an incomplete ESU type */ +{ + SymEntry* Sym = GetSymType (T); + + return Sym != 0 && !SymIsDef (Sym); +} + + + +int IsEmptiableObjectType (const Type* T) +/* Return true if this is a struct/union/void type that can have zero size */ +{ + return IsClassStruct (T) || IsTypeVoid (T); +} + + + +int HasUnknownSize (const Type* T) +/* Return true if this is an incomplete ESU type or an array of unknown size */ +{ + if (IsTypeArray (T)) { + return GetElementCount (T) == UNSPECIFIED || HasUnknownSize (T + 1); + } + return IsIncompleteESUType (T); } int IsVariadicFunc (const Type* T) /* Return true if this is a function type or pointer to function type with -** variable parameter list +** variable parameter list. +** Check fails if the type is not a function or a pointer to function. */ { - FuncDesc* F = GetFuncDesc (T); - return (F->Flags & FD_VARIADIC) != 0; + return (GetFuncDesc (T)->Flags & FD_VARIADIC) != 0; +} + + + +int IsFastcallFunc (const Type* T) +/* Return true if this is a function type or pointer to function type by +** __fastcall__ calling convention. +** Check fails if the type is not a function or a pointer to function. +*/ +{ + if (UnqualifiedType (T->C) == T_PTR) { + /* Pointer to function */ + ++T; + } + return !IsVariadicFunc (T) && (AutoCDecl ? IsQualFastcall (T) : !IsQualCDecl (T)); } @@ -589,7 +1371,7 @@ FuncDesc* GetFuncDesc (const Type* T) CHECK (IsClassFunc (T)); /* Get the function descriptor from the type attributes */ - return T->A.P; + return T->A.F; } @@ -606,12 +1388,12 @@ void SetFuncDesc (Type* T, FuncDesc* F) CHECK (IsClassFunc (T)); /* Set the function descriptor */ - T->A.P = F; + T->A.F = F; } -Type* GetFuncReturn (Type* T) +const Type* GetFuncReturn (const Type* T) /* Return a pointer to the return type of a function or pointer-to-function type */ { if (UnqualifiedType (T->C) == T_PTR) { @@ -628,6 +1410,37 @@ Type* GetFuncReturn (Type* T) +Type* GetFuncReturnModifiable (Type* T) +/* Return a non-const pointer to the return type of a function or pointer-to-function type */ +{ + if (UnqualifiedType (T->C) == T_PTR) { + /* Pointer to function */ + ++T; + } + + /* Be sure it's a function type */ + CHECK (IsClassFunc (T)); + + /* Return a pointer to the return type */ + return T + 1; +} + + + +const FuncDesc* GetFuncDefinitionDesc (const Type* T) +/* Get the function descriptor of the function definition */ +{ + const FuncDesc* D; + + /* Be sure it's a function type */ + CHECK (IsClassFunc (T)); + + D = GetFuncDesc (T); + return D->FuncDef != 0 ? D->FuncDef : D; +} + + + long GetElementCount (const Type* T) /* Get the element count of the array specified in T (which must be of ** array type). @@ -650,7 +1463,7 @@ void SetElementCount (Type* T, long Count) -Type* GetElementType (Type* T) +const Type* GetElementType (const Type* T) /* Return the element type of the given array type. */ { CHECK (IsTypeArray (T)); @@ -659,7 +1472,7 @@ Type* GetElementType (Type* T) -Type* GetBaseElementType (Type* T) +const Type* GetBaseElementType (const Type* T) /* Return the base element type of a given type. If T is not an array, this ** will return. Otherwise it will return the base element type, which means ** the element type that is not an array. @@ -673,63 +1486,26 @@ Type* GetBaseElementType (Type* T) -SymEntry* GetSymEntry (const Type* T) -/* Return a SymEntry pointer from a type */ +struct SymEntry* GetESUSymEntry (const Type* T) +/* Return a SymEntry pointer from an enum/struct/union type */ { - /* Only structs or unions have a SymEntry attribute */ - CHECK (IsClassStruct (T)); + /* Only enums, structs or unions have a SymEntry attribute */ + CHECK (IsClassStruct (T) || IsTypeEnum (T)); /* Return the attribute */ - return T->A.P; + return T->A.S; } -void SetSymEntry (Type* T, SymEntry* S) -/* Set the SymEntry pointer for a type */ +void SetESUSymEntry (Type* T, struct SymEntry* S) +/* Set the SymEntry pointer for an enum/struct/union type */ { - /* Only structs or unions have a SymEntry attribute */ - CHECK (IsClassStruct (T)); + /* Only enums, structs or unions have a SymEntry attribute */ + CHECK (IsClassStruct (T) || IsTypeEnum (T)); /* Set the attribute */ - T->A.P = S; -} - - - -Type* IntPromotion (Type* T) -/* Apply the integer promotions to T and return the result. The returned type -** string may be T if there is no need to change it. -*/ -{ - /* We must have an int to apply int promotions */ - PRECONDITION (IsClassInt (T)); - - /* An integer can represent all values from either signed or unsigned char, - ** so convert chars to int and leave all other types alone. - */ - if (IsTypeChar (T)) { - return type_int; - } else { - return T; - } -} - - - -Type* PtrConversion (Type* T) -/* If the type is a function, convert it to pointer to function. If the -** expression is an array, convert it to pointer to first element. Otherwise -** return T. -*/ -{ - if (IsTypeFunc (T)) { - return PointerTo (T); - } else if (IsTypeArray (T)) { - return ArrayToPtr (T); - } else { - return T; - } + T->A.S = S; } @@ -751,3 +1527,101 @@ TypeCode AddrSizeQualifier (unsigned AddrSize) } } + + + +int TypeHasAttr (const Type* T) +/* Return true if the given type has attribute data */ +{ + return IsClassStruct (T) || IsTypeArray (T) || IsClassFunc (T); +} + + + +void PrintType (FILE* F, const Type* T) +/* Print fulle name of the type */ +{ + StrBuf Buf = AUTO_STRBUF_INITIALIZER; + fprintf (F, "%s", SB_GetConstBuf (GetFullTypeNameBuf (&Buf, T))); + SB_Done (&Buf); +} + + + +void PrintFuncSig (FILE* F, const char* Name, const Type* T) +/* Print a function signature */ +{ + StrBuf Buf = AUTO_STRBUF_INITIALIZER; + StrBuf ParamList = AUTO_STRBUF_INITIALIZER; + StrBuf East = AUTO_STRBUF_INITIALIZER; + StrBuf West = AUTO_STRBUF_INITIALIZER; + + /* Get the function descriptor used in definition */ + const FuncDesc* D = GetFuncDefinitionDesc (T); + + /* Get the parameter list string. Start from the first parameter */ + SymEntry* Param = D->SymTab->SymHead; + unsigned I; + for (I = 0; I < D->ParamCount; ++I) { + CHECK (Param != 0 && (Param->Flags & SC_PARAM) != 0); + if (I > 0) { + SB_AppendStr (&ParamList, ", "); + } + if (SymIsRegVar (Param)) { + SB_AppendStr (&ParamList, "register "); + } + if (!HasAnonName (Param)) { + SB_AppendStr (&Buf, Param->Name); + } + SB_AppendStr (&ParamList, SB_GetConstBuf (GetFullTypeNameBuf (&Buf, Param->Type))); + SB_Clear (&Buf); + /* Next argument */ + Param = Param->NextSym; + } + if ((D->Flags & FD_VARIADIC) == 0) { + if (D->ParamCount == 0 && (D->Flags & FD_EMPTY) == 0) { + SB_AppendStr (&ParamList, "void"); + } + } else { + if (D->ParamCount > 0) { + SB_AppendStr (&ParamList, ", ..."); + } else { + SB_AppendStr (&ParamList, "..."); + } + } + SB_Terminate (&ParamList); + + /* Get the function qualifiers */ + if (GetQualifierTypeCodeNameBuf (&Buf, T->C, T_QUAL_NONE) > 0) { + /* Append a space between the qualifiers and the name */ + SB_AppendChar (&Buf, ' '); + } + SB_Terminate (&Buf); + + /* Get the signature string without the return type */ + SB_Printf (&West, "%s%s (%s)", SB_GetConstBuf (&Buf), Name, SB_GetConstBuf (&ParamList)); + SB_Done (&Buf); + SB_Done (&ParamList); + + /* Complete with the return type */ + GetFullTypeNameWestEast (&West, &East, GetFuncReturn (T)); + SB_Append (&West, &East); + SB_Terminate (&West); + + /* Output */ + fprintf (F, "%s", SB_GetConstBuf (&West)); + SB_Done (&East); + SB_Done (&West); +} + + + +void PrintRawType (FILE* F, const Type* T) +/* Print a type string in raw hex format (for debugging) */ +{ + while (T->C != T_END) { + fprintf (F, "%04lX ", T->C); + ++T; + } + fprintf (F, "\n"); +} diff --git a/src/cc65/datatype.h b/src/cc65/datatype.h index 92b3d0122..e8ba7b6c0 100644 --- a/src/cc65/datatype.h +++ b/src/cc65/datatype.h @@ -51,11 +51,21 @@ /*****************************************************************************/ -/* Data */ +/* Forward declarations */ /*****************************************************************************/ +struct StrBuf; +struct SymEntry; + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + /* Basic data types */ enum { @@ -68,65 +78,71 @@ enum { T_TYPE_INT = 0x000003, T_TYPE_LONG = 0x000004, T_TYPE_LONGLONG = 0x000005, - T_TYPE_ENUM = 0x000006, - T_TYPE_FLOAT = 0x000007, - T_TYPE_DOUBLE = 0x000008, - T_TYPE_VOID = 0x000009, - T_TYPE_STRUCT = 0x00000A, - T_TYPE_UNION = 0x00000B, - T_TYPE_ARRAY = 0x00000C, - T_TYPE_PTR = 0x00000D, - T_TYPE_FUNC = 0x00000E, - T_MASK_TYPE = 0x00000F, + T_TYPE_ENUM = 0x000008, + T_TYPE_BITFIELD = 0x000009, + T_TYPE_FLOAT = 0x00000A, + T_TYPE_DOUBLE = 0x00000B, + T_TYPE_VOID = 0x000010, + T_TYPE_STRUCT = 0x000011, + T_TYPE_UNION = 0x000012, + T_TYPE_ARRAY = 0x000018, + T_TYPE_PTR = 0x000019, + T_TYPE_FUNC = 0x00001A, + T_MASK_TYPE = 0x00001F, /* Type classes */ T_CLASS_NONE = 0x000000, - T_CLASS_INT = 0x000010, - T_CLASS_FLOAT = 0x000020, - T_CLASS_PTR = 0x000030, - T_CLASS_STRUCT = 0x000040, - T_CLASS_FUNC = 0x000050, - T_MASK_CLASS = 0x000070, + T_CLASS_INT = 0x000020, + T_CLASS_FLOAT = 0x000040, + T_CLASS_PTR = 0x000060, + T_CLASS_STRUCT = 0x000080, + T_CLASS_FUNC = 0x0000A0, + T_MASK_CLASS = 0x0000E0, /* Type signedness */ T_SIGN_NONE = 0x000000, - T_SIGN_UNSIGNED = 0x000080, - T_SIGN_SIGNED = 0x000100, - T_MASK_SIGN = 0x000180, + T_SIGN_UNSIGNED = 0x000100, + T_SIGN_SIGNED = 0x000200, + T_MASK_SIGN = 0x000300, /* Type size modifiers */ T_SIZE_NONE = 0x000000, - T_SIZE_SHORT = 0x000200, - T_SIZE_LONG = 0x000400, - T_SIZE_LONGLONG = 0x000600, - T_MASK_SIZE = 0x000600, + T_SIZE_CHAR = 0x001000, + T_SIZE_SHORT = 0x002000, + T_SIZE_INT = 0x003000, + T_SIZE_LONG = 0x004000, + T_SIZE_LONGLONG = 0x005000, + T_MASK_SIZE = 0x00F000, /* Type qualifiers */ T_QUAL_NONE = 0x000000, - T_QUAL_CONST = 0x000800, - T_QUAL_VOLATILE = 0x001000, - T_QUAL_RESTRICT = 0x002000, - T_QUAL_NEAR = 0x004000, - T_QUAL_FAR = 0x008000, + T_QUAL_CONST = 0x010000, + T_QUAL_VOLATILE = 0x020000, + T_QUAL_RESTRICT = 0x040000, + T_QUAL_CVR = T_QUAL_CONST | T_QUAL_VOLATILE | T_QUAL_RESTRICT, + T_QUAL_NEAR = 0x080000, + T_QUAL_FAR = 0x100000, T_QUAL_ADDRSIZE = T_QUAL_NEAR | T_QUAL_FAR, - T_QUAL_FASTCALL = 0x010000, - T_QUAL_CDECL = 0x020000, + T_QUAL_FASTCALL = 0x200000, + T_QUAL_CDECL = 0x400000, T_QUAL_CCONV = T_QUAL_FASTCALL | T_QUAL_CDECL, - T_MASK_QUAL = 0x03F800, + T_MASK_QUAL = 0x7F0000, /* Types */ - T_CHAR = T_TYPE_CHAR | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_NONE, - T_SCHAR = T_TYPE_CHAR | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_NONE, - T_UCHAR = T_TYPE_CHAR | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_NONE, + T_CHAR = T_TYPE_CHAR | T_CLASS_INT | T_SIGN_NONE | T_SIZE_CHAR, + T_SCHAR = T_TYPE_CHAR | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_CHAR, + T_UCHAR = T_TYPE_CHAR | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_CHAR, T_SHORT = T_TYPE_SHORT | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_SHORT, T_USHORT = T_TYPE_SHORT | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_SHORT, - T_INT = T_TYPE_INT | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_NONE, - T_UINT = T_TYPE_INT | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_NONE, + T_INT = T_TYPE_INT | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_INT, + T_UINT = T_TYPE_INT | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_INT, T_LONG = T_TYPE_LONG | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_LONG, T_ULONG = T_TYPE_LONG | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_LONG, T_LONGLONG = T_TYPE_LONGLONG | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_LONGLONG, T_ULONGLONG = T_TYPE_LONGLONG | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_LONGLONG, - T_ENUM = T_TYPE_ENUM | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_NONE, + T_ENUM = T_TYPE_ENUM | T_CLASS_INT | T_SIGN_NONE | T_SIZE_NONE, + T_SBITFIELD = T_TYPE_BITFIELD | T_CLASS_INT | T_SIGN_SIGNED | T_SIZE_NONE, + T_UBITFIELD = T_TYPE_BITFIELD | T_CLASS_INT | T_SIGN_UNSIGNED | T_SIZE_NONE, T_FLOAT = T_TYPE_FLOAT | T_CLASS_FLOAT | T_SIGN_NONE | T_SIZE_NONE, T_DOUBLE = T_TYPE_DOUBLE | T_CLASS_FLOAT | T_SIGN_NONE | T_SIZE_NONE, T_VOID = T_TYPE_VOID | T_CLASS_NONE | T_SIGN_NONE | T_SIZE_NONE, @@ -136,6 +152,10 @@ enum { T_PTR = T_TYPE_PTR | T_CLASS_PTR | T_SIGN_NONE | T_SIZE_NONE, T_FUNC = T_TYPE_FUNC | T_CLASS_FUNC | T_SIGN_NONE | T_SIZE_NONE, + /* More types for convenience */ + T_C_CHAR = T_CHAR | T_QUAL_CONST, + T_C_VOID = T_VOID | T_QUAL_CONST, + /* Aliases */ T_SIZE_T = T_UINT, }; @@ -148,11 +168,16 @@ typedef unsigned long TypeCode; /* Type entry */ typedef struct Type Type; struct Type { - TypeCode C; /* Code for this entry */ + TypeCode C; /* Code for this entry */ union { - void* P; /* Arbitrary attribute pointer */ - long L; /* Numeric attribute value */ - unsigned long U; /* Dito, unsigned */ + struct FuncDesc* F; /* Function description pointer */ + struct SymEntry* S; /* Enum/struct/union tag symbol entry pointer */ + long L; /* Numeric attribute value */ + unsigned long U; /* Dito, unsigned */ + struct { + unsigned Offs; /* Bit offset into storage unit */ + unsigned Width; /* Width in bits */ + } B; /* Data for bit fields */ } A; /* Type attribute if necessary */ }; @@ -187,19 +212,24 @@ struct Type { #define PTR_BITS (8 * SIZEOF_PTR) /* Predefined type strings */ -extern Type type_schar[]; -extern Type type_uchar[]; -extern Type type_int[]; -extern Type type_uint[]; -extern Type type_long[]; -extern Type type_ulong[]; -extern Type type_void[]; -extern Type type_size_t[]; -extern Type type_float[]; -extern Type type_double[]; +extern const Type type_char[]; +extern const Type type_schar[]; +extern const Type type_uchar[]; +extern const Type type_int[]; +extern const Type type_uint[]; +extern const Type type_long[]; +extern const Type type_ulong[]; +extern const Type type_bool[]; +extern const Type type_void[]; +extern const Type type_size_t[]; +extern const Type type_float[]; +extern const Type type_double[]; -/* Forward for the SymEntry struct */ -struct SymEntry; +/* More predefined type strings */ +extern const Type type_char_p[]; +extern const Type type_c_char_p[]; +extern const Type type_void_p[]; +extern const Type type_c_void_p[]; @@ -209,6 +239,23 @@ struct SymEntry; +const char* GetBasicTypeName (const Type* T); +/* Return a const name string of the basic type. +** Return "type" for unknown basic types. +*/ + +const char* GetFullTypeName (const Type* T); +/* Return the full name string of the given type */ + +struct StrBuf* GetFullTypeNameBuf (struct StrBuf* S, const Type* T); +/* Return the full name string of the given type */ + +int GetQualifierTypeCodeNameBuf (struct StrBuf* S, TypeCode Qual, TypeCode IgnoredQual); +/* Return the names of the qualifiers of the type. +** Qualifiers to be ignored can be specified with the IgnoredQual flags. +** Return the count of added qualifier names. +*/ + unsigned TypeLen (const Type* T); /* Return the length of the type string */ @@ -229,41 +276,24 @@ void TypeFree (Type* T); int SignExtendChar (int C); /* Do correct sign extension of a character */ -TypeCode GetDefaultChar (void); -/* Return the default char type (signed/unsigned) depending on the settings */ - Type* GetCharArrayType (unsigned Len); /* Return the type for a char array of the given length */ Type* GetImplicitFuncType (void); /* Return a type string for an inplicitly declared function */ -Type* PointerTo (const Type* T); -/* Return a type string that is "pointer to T". The type string is allocated -** on the heap and may be freed after use. +const Type* GetStructReplacementType (const Type* SType); +/* Get a replacement type for passing a struct/union in the primary register */ + +long GetIntegerTypeMin (const Type* Type); +/* Get the smallest possible value of the integer type. +** The type must have a known size. */ -void PrintType (FILE* F, const Type* T); -/* Output translation of type array. */ - -void PrintRawType (FILE* F, const Type* T); -/* Print a type string in raw format (for debugging) */ - -void PrintFuncSig (FILE* F, const char* Name, Type* T); -/* Print a function signature. */ - -int TypeHasAttr (const Type* T); -/* Return true if the given type has attribute data */ - -#if defined(HAVE_INLINE) -INLINE void CopyTypeAttr (const Type* Src, Type* Dest) -/* Copy attribute data from Src to Dest */ -{ - Dest->A = Src->A; -} -#else -# define CopyTypeAttr(Src, Dest) ((Dest)->A = (Src)->A) -#endif +unsigned long GetIntegerTypeMax (const Type* Type); +/* Get the largest possible value of the integer type. +** The type must have a known size. +*/ #if defined(HAVE_INLINE) INLINE TypeCode UnqualifiedType (TypeCode T) @@ -275,6 +305,17 @@ INLINE TypeCode UnqualifiedType (TypeCode T) # define UnqualifiedType(T) ((T) & ~T_MASK_QUAL) #endif +const Type* GetUnderlyingType (const Type* Type); +/* Get the underlying type of an enum or other integer class type */ + +TypeCode GetUnderlyingTypeCode (const Type* Type); +/* Get the type code of the unqualified underlying type of TCode. +** Return TCode if it is not scalar. +*/ + +const Type* GetBitFieldChunkType (const Type* Type); +/* Get the type needed to operate on the byte chunk containing the bit-field */ + unsigned SizeOf (const Type* T); /* Compute size of object represented by type array. */ @@ -295,132 +336,286 @@ unsigned CheckedPSizeOf (const Type* T); unsigned TypeOf (const Type* T); /* Get the code generator base type of the object */ -Type* Indirect (Type* T); +unsigned FuncTypeOf (const Type* T); +/* Get the code generator flag for calling the function */ + +const Type* Indirect (const Type* T); /* Do one indirection for the given type, that is, return the type where the ** given type points to. */ -Type* ArrayToPtr (Type* T); +Type* IndirectModifiable (Type* T); +/* Do one indirection for the given type, that is, return the type where the +** given type points to. +*/ + +Type* NewPointerTo (const Type* T); +/* Return a type string that is "pointer to T". The type string is allocated +** on the heap and may be freed after use. +*/ + +const Type* AddressOf (const Type* T); +/* Return a type string that is "address of T". The type string is allocated +** on the heap and may be freed after use. +*/ + +Type* ArrayToPtr (const Type* T); /* Convert an array to a pointer to it's first element */ +const Type* PtrConversion (const Type* T); +/* If the type is a function, convert it to pointer to function. If the +** expression is an array, convert it to pointer to first element. Otherwise +** return T. +*/ + +const Type* StdConversion (const Type* T); +/* If the type is a function, convert it to pointer to function. If the +** expression is an array, convert it to pointer to first element. If the +** type is an integer, do integeral promotion. Otherwise return T. +*/ + +const Type* IntPromotion (const Type* T); +/* Apply the integer promotions to T and return the result. The returned type +** string may be T if there is no need to change it. +*/ + +const Type* ArithmeticConvert (const Type* lhst, const Type* rhst); +/* Perform the usual arithmetic conversions for binary operators. */ + +const Type* SignedType (const Type* T); +/* Get signed counterpart of the integral type */ + +const Type* UnsignedType (const Type* T); +/* Get unsigned counterpart of the integral type */ + +Type* NewBitFieldType (const Type* T, unsigned BitOffs, unsigned BitWidth); +/* Return a type string that is "T : BitWidth" aligned on BitOffs. The type +** string is allocated on the heap and may be freed after use. +*/ + #if defined(HAVE_INLINE) -INLINE TypeCode GetType (const Type* T) +INLINE TypeCode GetRawType (const Type* T) /* Get the raw type */ { return (T->C & T_MASK_TYPE); } #else -# define GetType(T) ((T)->C & T_MASK_TYPE) +# define GetRawType(T) ((T)->C & T_MASK_TYPE) #endif #if defined(HAVE_INLINE) INLINE int IsTypeChar (const Type* T) -/* Return true if this is a character type */ +/* Return true if this is a char type */ { - return (GetType (T) == T_TYPE_CHAR); + return (GetRawType (GetUnderlyingType (T)) == T_TYPE_CHAR); } #else -# define IsTypeChar(T) (GetType (T) == T_TYPE_CHAR) +# define IsTypeChar(T) (GetRawType (GetUnderlyingType (T)) == T_TYPE_CHAR) +#endif + +#if defined(HAVE_INLINE) +INLINE int IsTypeShort (const Type* T) +/* Return true if this is a short type (signed or unsigned) */ +{ + return (GetRawType (GetUnderlyingType (T)) == T_TYPE_SHORT); +} +#else +# define IsTypeShort(T) (GetRawType (GetUnderlyingType (T)) == T_TYPE_SHORT) #endif #if defined(HAVE_INLINE) INLINE int IsTypeInt (const Type* T) /* Return true if this is an int type (signed or unsigned) */ { - return (GetType (T) == T_TYPE_INT); + return (GetRawType (GetUnderlyingType (T)) == T_TYPE_INT); } #else -# define IsTypeInt(T) (GetType (T) == T_TYPE_INT) +# define IsTypeInt(T) (GetRawType (GetUnderlyingType (T)) == T_TYPE_INT) #endif #if defined(HAVE_INLINE) INLINE int IsTypeLong (const Type* T) -/* Return true if this is a long type (signed or unsigned) */ +/* Return true if this is a long int type (signed or unsigned) */ { - return (GetType (T) == T_TYPE_LONG); + return (GetRawType (GetUnderlyingType (T)) == T_TYPE_LONG); } #else -# define IsTypeLong(T) (GetType (T) == T_TYPE_LONG) +# define IsTypeLong(T) (GetRawType (GetUnderlyingType (T)) == T_TYPE_LONG) +#endif + +#if defined(HAVE_INLINE) +INLINE int IsISOChar (const Type* T) +/* Return true if this is a narrow character type (without signed/unsigned) */ +{ + return (UnqualifiedType (T->C) == T_CHAR); +} +#else +# define IsISOChar(T) (UnqualifiedType ((T)->C) == T_CHAR) +#endif + +#if defined(HAVE_INLINE) +INLINE int IsClassChar (const Type* T) +/* Return true if this is a narrow character type (including signed/unsigned). +** For now this is the same as IsRawTypeChar(T). +*/ +{ + return (GetRawType (T) == T_TYPE_CHAR); +} +#else +# define IsClassChar(T) (GetRawType (T) == T_TYPE_CHAR) +#endif + +#if defined(HAVE_INLINE) +INLINE int IsRawTypeChar (const Type* T) +/* Return true if this is a char raw type (including signed/unsigned) */ +{ + return (GetRawType (T) == T_TYPE_CHAR); +} +#else +# define IsRawTypeChar(T) (GetRawType (T) == T_TYPE_CHAR) +#endif + +#if defined(HAVE_INLINE) +INLINE int IsRawTypeInt (const Type* T) +/* Return true if this is an int raw type (signed or unsigned) */ +{ + return (GetRawType (T) == T_TYPE_INT); +} +#else +# define IsRawTypeInt(T) (GetRawType (T) == T_TYPE_INT) +#endif + +#if defined(HAVE_INLINE) +INLINE int IsRawTypeLong (const Type* T) +/* Return true if this is a long raw type (signed or unsigned) */ +{ + return (GetRawType (T) == T_TYPE_LONG); +} +#else +# define IsRawTypeLong(T) (GetRawType (T) == T_TYPE_LONG) #endif #if defined(HAVE_INLINE) INLINE int IsTypeFloat (const Type* T) /* Return true if this is a float type */ { - return (GetType (T) == T_TYPE_FLOAT); + return (GetRawType (T) == T_TYPE_FLOAT); } #else -# define IsTypeFloat(T) (GetType (T) == T_TYPE_FLOAT) +# define IsTypeFloat(T) (GetRawType (T) == T_TYPE_FLOAT) #endif #if defined(HAVE_INLINE) INLINE int IsTypeDouble (const Type* T) /* Return true if this is a double type */ { - return (GetType (T) == T_TYPE_DOUBLE); + return (GetRawType (T) == T_TYPE_DOUBLE); } #else -# define IsTypeDouble(T) (GetType (T) == T_TYPE_DOUBLE) +# define IsTypeDouble(T) (GetRawType (T) == T_TYPE_DOUBLE) #endif #if defined(HAVE_INLINE) INLINE int IsTypePtr (const Type* T) /* Return true if this is a pointer type */ { - return (GetType (T) == T_TYPE_PTR); + return (GetRawType (T) == T_TYPE_PTR); } #else -# define IsTypePtr(T) (GetType (T) == T_TYPE_PTR) +# define IsTypePtr(T) (GetRawType (T) == T_TYPE_PTR) #endif +#if defined(HAVE_INLINE) +INLINE int IsTypeEnum (const Type* T) +/* Return true if this is an enum type */ +{ + return (GetRawType (T) == T_TYPE_ENUM); +} +#else +# define IsTypeEnum(T) (GetRawType (T) == T_TYPE_ENUM) +#endif + +#if defined(HAVE_INLINE) +INLINE int IsTypeSignedBitField (const Type* T) +/* Return true if this is a signed bit-field */ +{ + return (UnqualifiedType (T->C) == T_SBITFIELD); +} +#else +# define IsTypeSignedBitField(T) (UnqualifiedType ((T)->C) == T_SBITFIELD) +#endif + +#if defined(HAVE_INLINE) +INLINE int IsTypeUnsignedBitField (const Type* T) +/* Return true if this is an unsigned bit-field */ +{ + return (UnqualifiedType (T->C) == T_UBITFIELD); +} +#else +# define IsTypeUnsignedBitField(T) (UnqualifiedType ((T)->C) == T_UBITFIELD) +#endif + +#if defined(HAVE_INLINE) +INLINE int IsTypeBitField (const Type* T) +/* Return true if this is a bit-field (either signed or unsigned) */ +{ + return IsTypeSignedBitField (T) || IsTypeUnsignedBitField (T); +} +#else +# define IsTypeBitField(T) (IsTypeSignedBitField (T) || IsTypeUnsignedBitField (T)) +#endif + +int IsTypeFragBitField (const Type* T); +/* Return true if this is a bit-field that shares byte space with other fields */ + #if defined(HAVE_INLINE) INLINE int IsTypeStruct (const Type* T) /* Return true if this is a struct type */ { - return (GetType (T) == T_TYPE_STRUCT); + return (GetRawType (T) == T_TYPE_STRUCT); } #else -# define IsTypeStruct(T) (GetType (T) == T_TYPE_STRUCT) +# define IsTypeStruct(T) (GetRawType (T) == T_TYPE_STRUCT) #endif #if defined(HAVE_INLINE) INLINE int IsTypeUnion (const Type* T) /* Return true if this is a union type */ { - return (GetType (T) == T_TYPE_UNION); + return (GetRawType (T) == T_TYPE_UNION); } #else -# define IsTypeUnion(T) (GetType (T) == T_TYPE_UNION) +# define IsTypeUnion(T) (GetRawType (T) == T_TYPE_UNION) #endif #if defined(HAVE_INLINE) INLINE int IsTypeArray (const Type* T) /* Return true if this is an array type */ { - return (GetType (T) == T_TYPE_ARRAY); + return (GetRawType (T) == T_TYPE_ARRAY); } #else -# define IsTypeArray(T) (GetType (T) == T_TYPE_ARRAY) +# define IsTypeArray(T) (GetRawType (T) == T_TYPE_ARRAY) #endif #if defined(HAVE_INLINE) INLINE int IsTypeVoid (const Type* T) /* Return true if this is a void type */ { - return (GetType (T) == T_TYPE_VOID); + return (GetRawType (T) == T_TYPE_VOID); } #else -# define IsTypeVoid(T) (GetType (T) == T_TYPE_VOID) +# define IsTypeVoid(T) (GetRawType (T) == T_TYPE_VOID) #endif #if defined(HAVE_INLINE) INLINE int IsTypeFunc (const Type* T) /* Return true if this is a function class */ { - return (GetType (T) == T_TYPE_FUNC); + return (GetRawType (T) == T_TYPE_FUNC); } #else -# define IsTypeFunc(T) (GetType (T) == T_TYPE_FUNC) +# define IsTypeFunc(T) (GetRawType (T) == T_TYPE_FUNC) #endif #if defined(HAVE_INLINE) @@ -475,7 +670,7 @@ INLINE int IsClassPtr (const Type* T) #if defined(HAVE_INLINE) INLINE int IsClassStruct (const Type* T) -/* Return true if this is a struct type */ +/* Return true if this is a struct or union type */ { return (GetClass (T) == T_CLASS_STRUCT); } @@ -493,14 +688,73 @@ INLINE int IsClassFunc (const Type* T) # define IsClassFunc(T) (GetClass (T) == T_CLASS_FUNC) #endif +int IsClassObject (const Type* T); +/* Return true if this is a fully described object type */ + +int IsClassIncomplete (const Type* T); +/* Return true if this is an object type lacking size info */ + +int IsClassArithmetic (const Type* T); +/* Return true if this is an integer or real floating type */ + +int IsClassBasic (const Type* T); +/* Return true if this is a char, integer or floating type */ + +int IsClassScalar (const Type* T); +/* Return true if this is an arithmetic or pointer type */ + +int IsClassDerived (const Type* T); +/* Return true if this is an array, struct, union, function or pointer type */ + +int IsClassAggregate (const Type* T); +/* Return true if this is an array or struct type */ + +int IsRelationType (const Type* T); +/* Return true if this is an arithmetic, array or pointer type */ + +int IsCastType (const Type* T); +/* Return true if this type can be used for casting */ + +int IsESUType (const Type* T); +/* Return true if this is an enum/struct/union type */ + +int IsIncompleteESUType (const Type* T); +/* Return true if this is an incomplete ESU type */ + +int IsEmptiableObjectType (const Type* T); +/* Return true if this is a struct/union/void type that can have zero size */ + +int HasUnknownSize (const Type* T); +/* Return true if this is an incomplete ESU type or an array of unknown size */ + #if defined(HAVE_INLINE) -INLINE TypeCode GetSignedness (const Type* T) -/* Get the sign of a type */ +INLINE TypeCode GetRawSignedness (const Type* T) +/* Get the raw signedness of a type */ { - return (T->C & T_MASK_SIGN); + return ((T)->C & T_MASK_SIGN); } #else -# define GetSignedness(T) ((T)->C & T_MASK_SIGN) +# define GetRawSignedness(T) ((T)->C & T_MASK_SIGN) +#endif + +#if defined(HAVE_INLINE) +INLINE TypeCode GetSignedness (const Type* T) +/* Get the signedness of a type */ +{ + return (GetUnderlyingTypeCode (T) & T_MASK_SIGN); +} +#else +# define GetSignedness(T) (GetUnderlyingTypeCode (T) & T_MASK_SIGN) +#endif + +#if defined(HAVE_INLINE) +INLINE int IsRawSignUnsigned (const Type* T) +/* Return true if this is an unsigned raw type */ +{ + return (GetRawSignedness (T) == T_SIGN_UNSIGNED); +} +#else +# define IsRawSignUnsigned(T) (GetRawSignedness (T) == T_SIGN_UNSIGNED) #endif #if defined(HAVE_INLINE) @@ -513,6 +767,16 @@ INLINE int IsSignUnsigned (const Type* T) # define IsSignUnsigned(T) (GetSignedness (T) == T_SIGN_UNSIGNED) #endif +#if defined(HAVE_INLINE) +INLINE int IsRawSignSigned (const Type* T) +/* Return true if this is a signed raw type */ +{ + return (GetRawSignedness (T) == T_SIGN_SIGNED); +} +#else +# define IsRawSignSigned(T) (GetRawSignedness (T) == T_SIGN_SIGNED) +#endif + #if defined(HAVE_INLINE) INLINE int IsSignSigned (const Type* T) /* Return true if this is a signed type */ @@ -523,6 +787,26 @@ INLINE int IsSignSigned (const Type* T) # define IsSignSigned(T) (GetSignedness (T) == T_SIGN_SIGNED) #endif +#if defined(HAVE_INLINE) +INLINE TypeCode GetRawSizeModifier (const Type* T) +/* Get the size modifier of a raw type */ +{ + return (T->C & T_MASK_SIZE); +} +#else +# define GetRawSizeModifier(T) ((T)->C & T_MASK_SIZE) +#endif + +#if defined(HAVE_INLINE) +INLINE TypeCode GetSizeModifier (const Type* T) +/* Get the size modifier of a type */ +{ + return (GetUnderlyingTypeCode (T) & T_MASK_SIZE); +} +#else +# define GetSizeModifier(T) (GetUnderlyingTypeCode (T) & T_MASK_SIZE) +#endif + #if defined(HAVE_INLINE) INLINE TypeCode GetQualifier (const Type* T) /* Get the qualifier from the given type string */ @@ -615,18 +899,15 @@ INLINE int IsQualCConv (const Type* T) int IsVariadicFunc (const Type* T) attribute ((const)); /* Return true if this is a function type or pointer to function type with -** variable parameter list +** variable parameter list. +** Check fails if the type is not a function or a pointer to function. */ -#if defined(HAVE_INLINE) -INLINE TypeCode GetSizeModifier (const Type* T) -/* Get the size modifier of a type */ -{ - return (T->C & T_MASK_SIZE); -} -#else -# define GetSizeModifier(T) ((T)->C & T_MASK_SIZE) -#endif +int IsFastcallFunc (const Type* T) attribute ((const)); +/* Return true if this is a function type or pointer to function type with +** __fastcall__ calling convention. +** Check fails if the type is not a function or a pointer to function. +*/ FuncDesc* GetFuncDesc (const Type* T) attribute ((const)); /* Get the FuncDesc pointer from a function or pointer-to-function type */ @@ -634,9 +915,15 @@ FuncDesc* GetFuncDesc (const Type* T) attribute ((const)); void SetFuncDesc (Type* T, FuncDesc* F); /* Set the FuncDesc pointer in a function or pointer-to-function type */ -Type* GetFuncReturn (Type* T) attribute ((const)); +const Type* GetFuncReturn (const Type* T) attribute ((const)); /* Return a pointer to the return type of a function or pointer-to-function type */ +Type* GetFuncReturnModifiable (Type* T) attribute ((const)); +/* Return a non-const pointer to the return type of a function or pointer-to-function type */ + +const FuncDesc* GetFuncDefinitionDesc (const Type* T) attribute ((const)); +/* Get the function descriptor of the function definition */ + long GetElementCount (const Type* T); /* Get the element count of the array specified in T (which must be of ** array type). @@ -647,31 +934,20 @@ void SetElementCount (Type* T, long Count); ** array type). */ -Type* GetElementType (Type* T); +const Type* GetElementType (const Type* T); /* Return the element type of the given array type. */ -Type* GetBaseElementType (Type* T); +const Type* GetBaseElementType (const Type* T); /* Return the base element type of a given type. If T is not an array, this ** will return. Otherwise it will return the base element type, which means ** the element type that is not an array. */ -struct SymEntry* GetSymEntry (const Type* T) attribute ((const)); -/* Return a SymEntry pointer from a type */ +struct SymEntry* GetESUSymEntry (const Type* T) attribute ((const)); +/* Return a SymEntry pointer from an enum/struct/union type */ -void SetSymEntry (Type* T, struct SymEntry* S); -/* Set the SymEntry pointer for a type */ - -Type* IntPromotion (Type* T); -/* Apply the integer promotions to T and return the result. The returned type -** string may be T if there is no need to change it. -*/ - -Type* PtrConversion (Type* T); -/* If the type is a function, convert it to pointer to function. If the -** expression is an array, convert it to pointer to first element. Otherwise -** return T. -*/ +void SetESUSymEntry (Type* T, struct SymEntry* S); +/* Set the SymEntry pointer for an enum/struct/union type */ TypeCode AddrSizeQualifier (unsigned AddrSize); /* Return T_QUAL_NEAR or T_QUAL_FAR depending on the address size */ @@ -696,6 +972,28 @@ INLINE TypeCode DataAddrSizeQualifier (void) # define DataAddrSizeQualifier() (AddrSizeQualifier (DataAddrSize)) #endif +int TypeHasAttr (const Type* T); +/* Return true if the given type has attribute data */ + +#if defined(HAVE_INLINE) +INLINE void CopyTypeAttr (const Type* Src, Type* Dest) +/* Copy attribute data from Src to Dest */ +{ + Dest->A = Src->A; +} +#else +# define CopyTypeAttr(Src, Dest) ((Dest)->A = (Src)->A) +#endif + +void PrintType (FILE* F, const Type* T); +/* Print fulle name of the type */ + +void PrintFuncSig (FILE* F, const char* Name, const Type* T); +/* Print a function signature */ + +void PrintRawType (FILE* F, const Type* T); +/* Print a type string in raw hex format (for debugging) */ + /* End of datatype.h */ diff --git a/src/cc65/declare.c b/src/cc65/declare.c index 163084835..7cc7444b6 100644 --- a/src/cc65/declare.c +++ b/src/cc65/declare.c @@ -33,6 +33,7 @@ +#include <limits.h> #include <stdio.h> #include <string.h> #include <errno.h> @@ -40,6 +41,7 @@ /* common */ #include "addrsize.h" #include "mmodel.h" +#include "shift.h" #include "xmalloc.h" /* cc65 */ @@ -57,39 +59,23 @@ #include "pragma.h" #include "scanner.h" #include "standard.h" +#include "staticassert.h" #include "symtab.h" +#include "wrappedcall.h" #include "typeconv.h" -/*****************************************************************************/ -/* Data */ -/*****************************************************************************/ - - - -typedef struct StructInitData StructInitData; -struct StructInitData { - unsigned Size; /* Size of struct */ - unsigned Offs; /* Current offset in struct */ - unsigned BitVal; /* Summed up bit-field value */ - unsigned ValBits; /* Valid bits in Val */ -}; - - - /*****************************************************************************/ /* Forwards */ /*****************************************************************************/ -static void ParseTypeSpec (DeclSpec* D, long Default, TypeCode Qualifiers); +static void ParseTypeSpec (DeclSpec* D, long Default, TypeCode Qualifiers, + int* SignednessSpecified); /* Parse a type specifier */ -static unsigned ParseInitInternal (Type* T, int AllowFlexibleMembers); -/* Parse initialization of variables. Return the number of data bytes. */ - /*****************************************************************************/ @@ -101,7 +87,7 @@ static unsigned ParseInitInternal (Type* T, int AllowFlexibleMembers); static void DuplicateQualifier (const char* Name) /* Print an error message */ { - Warning ("Duplicate qualifier: `%s'", Name); + Warning ("Duplicate qualifier: '%s'", Name); } @@ -249,18 +235,21 @@ static void OptionalInt (void) -static void OptionalSigned (void) +static void OptionalSigned (int* SignednessSpecified) /* Eat an optional "signed" token */ { if (CurTok.Tok == TOK_SIGNED) { /* Skip it */ NextToken (); + if (SignednessSpecified != NULL) { + *SignednessSpecified = 1; + } } } -static void InitDeclSpec (DeclSpec* D) +void InitDeclSpec (DeclSpec* D) /* Initialize the DeclSpec struct for use */ { D->StorageClass = 0; @@ -407,6 +396,79 @@ static void FixQualifiers (Type* DataType) +static unsigned ParseOneStorageClass (void) +/* Parse and return a storage class */ +{ + unsigned StorageClass = 0; + + /* Check the storage class given */ + switch (CurTok.Tok) { + + case TOK_EXTERN: + StorageClass = SC_EXTERN | SC_STATIC; + NextToken (); + break; + + case TOK_STATIC: + StorageClass = SC_STATIC; + NextToken (); + break; + + case TOK_REGISTER: + StorageClass = SC_REGISTER | SC_STATIC; + NextToken (); + break; + + case TOK_AUTO: + StorageClass = SC_AUTO; + NextToken (); + break; + + case TOK_TYPEDEF: + StorageClass = SC_TYPEDEF; + NextToken (); + break; + + default: + break; + } + + return StorageClass; +} + + + +static void CheckArrayElementType (Type* DataType) +/* Check if data type consists of arrays of incomplete element types */ +{ + Type* T = DataType; + + while (T->C != T_END) { + if (IsTypeArray (T)) { + ++T; + if (IsIncompleteESUType (T)) { + /* We cannot have an array of incomplete elements */ + Error ("Array of incomplete element type '%s'", GetFullTypeName (T)); + } else if (SizeOf (T) == 0) { + /* If the array is multi-dimensional, try to get the true + ** element type. + */ + if (IsTypeArray (T)) { + continue; + } + /* We could support certain 0-size element types as an extension */ + if (!IsTypeVoid (T) || IS_Get (&Standard) != STD_CC65) { + Error ("Array of 0-size element type '%s'", GetFullTypeName (T)); + } + } + } else { + ++T; + } + } +} + + + static void ParseStorageClass (DeclSpec* D, unsigned DefStorage) /* Parse a storage class */ { @@ -414,64 +476,122 @@ static void ParseStorageClass (DeclSpec* D, unsigned DefStorage) D->Flags &= ~DS_DEF_STORAGE; /* Check the storage class given */ - switch (CurTok.Tok) { - - case TOK_EXTERN: - D->StorageClass = SC_EXTERN | SC_STATIC; - NextToken (); - break; - - case TOK_STATIC: - D->StorageClass = SC_STATIC; - NextToken (); - break; - - case TOK_REGISTER: - D->StorageClass = SC_REGISTER | SC_STATIC; - NextToken (); - break; - - case TOK_AUTO: - D->StorageClass = SC_AUTO; - NextToken (); - break; - - case TOK_TYPEDEF: - D->StorageClass = SC_TYPEDEF; - NextToken (); - break; - - default: - /* No storage class given, use default */ - D->Flags |= DS_DEF_STORAGE; - D->StorageClass = DefStorage; - break; + D->StorageClass = ParseOneStorageClass (); + if (D->StorageClass == 0) { + /* No storage class given, use default */ + D->Flags |= DS_DEF_STORAGE; + D->StorageClass = DefStorage; + } else { + unsigned StorageClass = ParseOneStorageClass (); + while (StorageClass != 0) { + if (D->StorageClass == StorageClass) { + Warning ("Duplicate storage class specifier"); + } else { + Error ("Conflicting storage class specifier"); + } + StorageClass = ParseOneStorageClass (); + } } } -static void ParseEnumDecl (void) -/* Process an enum declaration . */ +static SymEntry* ESUForwardDecl (const char* Name, unsigned Flags, unsigned* DSFlags) +/* Handle an enum, struct or union forward decl */ { - int EnumVal; - ident Ident; - - /* Accept forward definitions */ - if (CurTok.Tok != TOK_LCURLY) { - return; + /* Try to find an enum/struct/union with the given name. If there is none, + ** insert a forward declaration into the current lexical level. + */ + SymEntry* Entry = FindTagSym (Name); + if (Entry == 0) { + if ((Flags & SC_ESUTYPEMASK) != SC_ENUM) { + Entry = AddStructSym (Name, Flags, 0, 0, DSFlags); + } else { + Entry = AddEnumSym (Name, Flags, 0, 0, DSFlags); + } + } else if ((Entry->Flags & SC_TYPEMASK) != (Flags & SC_ESUTYPEMASK)) { + /* Already defined, but not the same type class */ + Error ("Symbol '%s' is already different kind", Name); } + return Entry; +} + + + +static const Type* GetEnumeratorType (long Min, unsigned long Max, int Signed) +/* GitHub #1093 - We use unsigned types to save spaces whenever possible. +** If both the signed and unsigned integer types of the same minimum size +** capable of representing all values of the enum, we prefer the unsigned +** one. +** Return 0 if impossible to represent Min and Max as the same integer type. +*/ +{ + const Type* Underlying = type_int; /* default type */ + + /* Change the underlying type if necessary */ + if (Min < 0 || Signed) { + /* We can't use unsigned types if there are any negative values */ + if (Max > (unsigned long)INT32_MAX) { + /* No way to represent both Min and Max as the same integer type */ + Underlying = 0; + } else if (Min < INT16_MIN || Max > (unsigned long)INT16_MAX) { + Underlying = type_long; + } else if (Min < INT8_MIN || Max > (unsigned long)INT8_MAX) { + Underlying = type_int; + } else { + Underlying = type_schar; + } + } else { + if (Max > UINT16_MAX) { + Underlying = type_ulong; + } else if (Max > UINT8_MAX) { + Underlying = type_uint; + } else { + Underlying = type_uchar; + } + } + + return Underlying; +} + + + +static SymEntry* ParseEnumDecl (const char* Name, unsigned* DSFlags) +/* Process an enum declaration */ +{ + SymTable* FieldTab; + long EnumVal; + int IsSigned; + int IsIncremented; + ident Ident; + long MinConstant = 0; + unsigned long MaxConstant = 0; + const Type* NewType = 0; /* new member type */ + const Type* MemberType = type_int; /* default member type */ + unsigned Flags = 0; + unsigned PrevErrorCount = ErrorCount; + + + if (CurTok.Tok != TOK_LCURLY) { + /* Just a forward definition */ + return ESUForwardDecl (Name, SC_ENUM, DSFlags); + } + + /* Add a forward declaration for the enum tag in the current lexical level */ + AddEnumSym (Name, 0, 0, 0, DSFlags); /* Skip the opening curly brace */ NextToken (); /* Read the enum tags */ - EnumVal = 0; + EnumVal = -1L; while (CurTok.Tok != TOK_RCURLY) { /* We expect an identifier */ if (CurTok.Tok != TOK_IDENT) { - Error ("Identifier expected"); + Error ("Identifier expected for enumerator declarator"); + /* Avoid excessive errors */ + NextToken (); continue; } @@ -481,57 +601,176 @@ static void ParseEnumDecl (void) /* Check for an assigned value */ if (CurTok.Tok == TOK_ASSIGN) { - ExprDesc Expr; + NextToken (); - ConstAbsIntExpr (hie1, &Expr); - EnumVal = Expr.IVal; + ExprDesc Expr = NoCodeConstAbsIntExpr (hie1); + EnumVal = Expr.IVal; + MemberType = Expr.Type; + IsSigned = IsSignSigned (MemberType); + IsIncremented = 0; + + } else { + + /* Defaulted with the same signedness as the previous member's */ + IsSigned = IsSignSigned (MemberType) && + (unsigned long)EnumVal != GetIntegerTypeMax (MemberType); + + /* Enumerate. Signed integer overflow is UB but unsigned integers + ** are guaranteed to wrap around. + */ + EnumVal = (long)((unsigned long)EnumVal + 1UL); + + if (UnqualifiedType (MemberType->C) == T_ULONG && EnumVal == 0) { + /* Warn on 'unsigned long' overflow in enumeration */ + Warning ("Enumerator '%s' overflows the range of '%s'", + Ident, + GetBasicTypeName (type_ulong)); + } + + IsIncremented = 1; } - /* Add an entry to the symbol table */ - AddConstSym (Ident, type_int, SC_ENUM, EnumVal++); + /* Track down the min/max values and evaluate the type of EnumVal + ** using GetEnumeratorType in a tricky way. + */ + if (!IsSigned || EnumVal >= 0) { + if ((unsigned long)EnumVal > MaxConstant) { + MaxConstant = (unsigned long)EnumVal; + } + NewType = GetEnumeratorType (0, EnumVal, IsSigned); + } else { + if (EnumVal < MinConstant) { + MinConstant = EnumVal; + } + NewType = GetEnumeratorType (EnumVal, 0, 1); + } + + /* GetEnumeratorType above should never fail, but just in case */ + if (NewType == 0) { + Internal ("Unexpected failure with GetEnumeratorType: %lx", EnumVal); + NewType = type_ulong; + } else if (SizeOf (NewType) < SizeOf (type_int)) { + /* Integer constants are not shorter than int */ + NewType = type_int; + } + + /* Warn if the incremented value exceeds the range of the previous + ** type. + */ + if (IsIncremented && + EnumVal >= 0 && + NewType->C != UnqualifiedType (MemberType->C)) { + /* The possible overflow here can only be when EnumVal > 0 */ + Warning ("Enumerator '%s' (value = %lu) is of type '%s'", + Ident, + (unsigned long)EnumVal, + GetBasicTypeName (NewType)); + } + + /* Warn if the value exceeds range of 'int' in standard mode */ + if (IS_Get (&Standard) != STD_CC65 && NewType->C != T_INT) { + if (!IsSigned || EnumVal >= 0) { + Warning ("ISO C restricts enumerator values to range of 'int'\n" + "\tEnumerator '%s' (value = %lu) is too large", + Ident, + (unsigned long)EnumVal); + } else { + Warning ("ISO C restricts enumerator values to range of 'int'\n" + "\tEnumerator '%s' (value = %ld) is too small", + Ident, + EnumVal); + } + } + + /* Add an entry of the enumerator to the symbol table */ + AddConstSym (Ident, NewType, SC_ENUMERATOR | SC_CONST, EnumVal); + + /* Use this type for following members */ + MemberType = NewType; /* Check for end of definition */ - if (CurTok.Tok != TOK_COMMA) + if (CurTok.Tok != TOK_COMMA) { break; + } NextToken (); } ConsumeRCurly (); + + /* Check if there have been any members. Error if none */ + if (NewType == 0) { + Error ("Empty enum is invalid"); + } + + /* This evaluates the underlying type of the whole enum */ + MemberType = GetEnumeratorType (MinConstant, MaxConstant, 0); + if (MemberType == 0) { + /* It is very likely that the program is wrong */ + Error ("Enumeration values cannot be represented all as 'long'\n" + "\tMin enumerator value = %ld, Max enumerator value = %lu", + MinConstant, MaxConstant); + + /* Avoid more errors */ + MemberType = type_long; + } + + FieldTab = GetSymTab (); + + /* Return a fictitious symbol if errors occurred during parsing */ + if (PrevErrorCount != ErrorCount) { + Flags |= SC_FICTITIOUS; + } + + return AddEnumSym (Name, Flags, MemberType, FieldTab, DSFlags); } -static int ParseFieldWidth (Declaration* Decl) +static int ParseFieldWidth (Declaration* D) /* Parse an optional field width. Returns -1 if no field width is specified, ** otherwise the width of the field. */ { - ExprDesc Expr; - if (CurTok.Tok != TOK_COLON) { /* No bit-field declaration */ return -1; } + if (!IsClassInt (D->Type)) { + /* Only integer types may be used for bit-fields */ + Error ("Bit-field has invalid type '%s', must be integral", + GetBasicTypeName (D->Type)); + + /* Avoid a diagnostic storm by giving the bit-field the widest valid + ** signed type, and continuing to parse. + */ + D->Type[0].C = T_INT; + } + + /* We currently support integral types up to long */ + if (SizeOf (D->Type) > SizeOf (type_ulong)) { + /* Only long-sized or smaller types may be used for bit-fields, for now */ + Error ("cc65 currently supports only long-sized and smaller bit-field types"); + + /* Avoid a diagnostic storm */ + D->Type[0].C = T_INT; + } + /* Read the width */ NextToken (); - ConstAbsIntExpr (hie1, &Expr); + ExprDesc Expr = NoCodeConstAbsIntExpr (hie1); + if (Expr.IVal < 0) { Error ("Negative width in bit-field"); return -1; } - if (Expr.IVal > (int) INT_BITS) { + if (Expr.IVal > (long)(SizeOf (D->Type) * CHAR_BITS)) { Error ("Width of bit-field exceeds its type"); return -1; } - if (Expr.IVal == 0 && Decl->Ident[0] != '\0') { + if (Expr.IVal == 0 && D->Ident[0] != '\0') { Error ("Zero width for named bit-field"); return -1; } - if (!IsTypeInt (Decl->Type)) { - /* Only integer types may be used for bit-fields */ - Error ("Bit-field has invalid type"); - return -1; - } /* Return the field width */ return (int) Expr.IVal; @@ -539,34 +778,41 @@ static int ParseFieldWidth (Declaration* Decl) -static SymEntry* StructOrUnionForwardDecl (const char* Name, unsigned Type) -/* Handle a struct or union forward decl */ +static unsigned PadWithBitField (unsigned StructSize, unsigned BitOffs) +/* Pad the current struct with an anonymous bit-field aligned to the next byte. +** Return how many bits are used to pad. +*/ { - /* Try to find a struct/union with the given name. If there is none, - ** insert a forward declaration into the current lexical level. + /* MSVC complains about unary negation of unsigned, + ** so it has been rewritten as subtraction. */ - SymEntry* Entry = FindTagSym (Name); - if (Entry == 0) { - Entry = AddStructSym (Name, Type, 0, 0); - } else if ((Entry->Flags & SC_TYPEMASK) != Type) { - /* Already defined, but no struct */ - Error ("Symbol `%s' is already different kind", Name); - } - return Entry; + unsigned PaddingBits = (0 - BitOffs) % CHAR_BITS; + + /* We need an anonymous name */ + ident Ident; + AnonName (Ident, "bit-field"); + + /* Add an anonymous bit-field that aligns to the next + ** byte. + */ + AddBitField (Ident, type_uchar, StructSize, BitOffs, PaddingBits, + /*SignednessSpecified=*/1); + + return PaddingBits; } -static unsigned CopyAnonStructFields (const Declaration* Decl, int Offs) -/* Copy fields from an anon union/struct into the current lexical level. The -** function returns the size of the embedded struct/union. +static unsigned AliasAnonStructFields (const Declaration* D, SymEntry* Anon) +/* Create alias fields from an anon union/struct in the current lexical level. +** The function returns the count of created aliases. */ { - /* Get the pointer to the symbol table entry of the anon struct */ - SymEntry* Entry = GetSymEntry (Decl->Type); + unsigned Count = 0; + SymEntry* Alias; - /* Get the size of the anon struct */ - unsigned Size = Entry->V.S.Size; + /* Get the pointer to the symbol table entry of the anon struct */ + SymEntry* Entry = GetESUSymEntry (D->Type); /* Get the symbol table containing the fields. If it is empty, there has ** been an error before, so bail out. @@ -574,7 +820,7 @@ static unsigned CopyAnonStructFields (const Declaration* Decl, int Offs) SymTable* Tab = Entry->V.S.SymTab; if (Tab == 0) { /* Incomplete definition - has been flagged before */ - return Size; + return 0; } /* Get a pointer to the list of symbols. Then walk the list adding copies @@ -583,10 +829,13 @@ static unsigned CopyAnonStructFields (const Declaration* Decl, int Offs) Entry = Tab->SymHead; while (Entry) { - /* Enter a copy of this symbol adjusting the offset. We will just - ** reuse the type string here. - */ - AddLocalSym (Entry->Name, Entry->Type, SC_STRUCTFIELD, Offs + Entry->V.Offs); + /* Enter an alias of this symbol */ + if (!IsAnonName (Entry->Name)) { + Alias = AddLocalSym (Entry->Name, Entry->Type, SC_STRUCTFIELD|SC_ALIAS, 0); + Alias->V.A.Field = Entry; + Alias->V.A.Offs = Anon->V.Offs + Entry->V.Offs; + ++Count; + } /* Currently, there can not be any attributes, but if there will be ** some in the future, we want to know this. @@ -597,13 +846,13 @@ static unsigned CopyAnonStructFields (const Declaration* Decl, int Offs) Entry = Entry->NextSym; } - /* Return the size of the embedded struct */ - return Size; + /* Return the count of created aliases */ + return Count; } -static SymEntry* ParseUnionDecl (const char* Name) +static SymEntry* ParseUnionDecl (const char* Name, unsigned* DSFlags) /* Parse a union declaration. */ { @@ -611,15 +860,21 @@ static SymEntry* ParseUnionDecl (const char* Name) unsigned FieldSize; int FieldWidth; /* Width in bits, -1 if not a bit-field */ SymTable* FieldTab; + SymEntry* UnionTagEntry; + SymEntry* Entry; + unsigned Flags = 0; + unsigned PrevErrorCount = ErrorCount; if (CurTok.Tok != TOK_LCURLY) { - /* Just a forward declaration. */ - return StructOrUnionForwardDecl (Name, SC_UNION); + /* Just a forward declaration */ + return ESUForwardDecl (Name, SC_UNION, DSFlags); } - /* Add a forward declaration for the struct in the current lexical level */ - AddStructSym (Name, SC_UNION, 0, 0); + /* Add a forward declaration for the union tag in the current lexical level */ + UnionTagEntry = AddStructSym (Name, SC_UNION, 0, 0, DSFlags); + + UnionTagEntry->V.S.ACount = 0; /* Skip the curly brace */ NextToken (); @@ -633,8 +888,9 @@ static SymEntry* ParseUnionDecl (const char* Name) /* Get the type of the entry */ DeclSpec Spec; + int SignednessSpecified = 0; InitDeclSpec (&Spec); - ParseTypeSpec (&Spec, -1, T_QUAL_NONE); + ParseTypeSpec (&Spec, -1, T_QUAL_NONE, &SignednessSpecified); /* Read fields with this type */ while (1) { @@ -655,32 +911,54 @@ static SymEntry* ParseUnionDecl (const char* Name) /* Check for fields without a name */ if (Decl.Ident[0] == '\0') { /* In cc65 mode, we allow anonymous structs/unions within - ** a struct. + ** a union. */ if (IS_Get (&Standard) >= STD_CC65 && IsClassStruct (Decl.Type)) { /* This is an anonymous struct or union. Copy the fields ** into the current level. */ - CopyAnonStructFields (&Decl, 0); - + AnonFieldName (Decl.Ident, "field", UnionTagEntry->V.S.ACount); } else { /* A non bit-field without a name is legal but useless */ Warning ("Declaration does not declare anything"); } - goto NextMember; + } + + /* Check for incomplete types including 'void' */ + if (IsClassIncomplete (Decl.Type)) { + Error ("Field '%s' has incomplete type '%s'", + Decl.Ident, + GetFullTypeName (Decl.Type)); } /* Handle sizes */ - FieldSize = CheckedSizeOf (Decl.Type); + FieldSize = SizeOf (Decl.Type); if (FieldSize > UnionSize) { UnionSize = FieldSize; } /* Add a field entry to the table. */ if (FieldWidth > 0) { - AddBitField (Decl.Ident, 0, 0, FieldWidth); - } else { - AddLocalSym (Decl.Ident, Decl.Type, SC_STRUCTFIELD, 0); + /* For a union, allocate space for the type specified by the + ** bit-field. + */ + AddBitField (Decl.Ident, Decl.Type, 0, 0, FieldWidth, + SignednessSpecified); + } else if (Decl.Ident[0] != '\0') { + Entry = AddLocalSym (Decl.Ident, Decl.Type, SC_STRUCTFIELD, 0); + if (IsAnonName (Decl.Ident)) { + Entry->V.A.ANumber = UnionTagEntry->V.S.ACount++; + AliasAnonStructFields (&Decl, Entry); + } + + /* Check if the field itself has a flexible array member */ + if (IsClassStruct (Decl.Type)) { + SymEntry* Sym = GetSymType (Decl.Type); + if (Sym && SymHasFlexibleArrayMember (Sym)) { + Entry->Flags |= SC_HAVEFAM; + Flags |= SC_HAVEFAM; + } + } } NextMember: if (CurTok.Tok != TOK_COMMA) { @@ -695,33 +973,49 @@ NextMember: if (CurTok.Tok != TOK_COMMA) { NextToken (); /* Remember the symbol table and leave the struct level */ - FieldTab = GetSymTab (); + FieldTab = GetFieldSymTab (); LeaveStructLevel (); + /* Return a fictitious symbol if errors occurred during parsing */ + if (PrevErrorCount != ErrorCount) { + Flags |= SC_FICTITIOUS; + } + + /* Empty union is not supported now */ + if (UnionSize == 0) { + Error ("Empty union type '%s' is not supported", Name); + } + /* Make a real entry from the forward decl and return it */ - return AddStructSym (Name, SC_UNION, UnionSize, FieldTab); + return AddStructSym (Name, SC_UNION | SC_DEF | Flags, UnionSize, FieldTab, DSFlags); } -static SymEntry* ParseStructDecl (const char* Name) +static SymEntry* ParseStructDecl (const char* Name, unsigned* DSFlags) /* Parse a struct declaration. */ { unsigned StructSize; int FlexibleMember; - int BitOffs; /* Bit offset for bit-fields */ + unsigned BitOffs; /* Bit offset for bit-fields */ int FieldWidth; /* Width in bits, -1 if not a bit-field */ SymTable* FieldTab; + SymEntry* StructTagEntry; + SymEntry* Entry; + unsigned Flags = 0; + unsigned PrevErrorCount = ErrorCount; if (CurTok.Tok != TOK_LCURLY) { - /* Just a forward declaration. */ - return StructOrUnionForwardDecl (Name, SC_STRUCT); + /* Just a forward declaration */ + return ESUForwardDecl (Name, SC_STRUCT, DSFlags); } - /* Add a forward declaration for the struct in the current lexical level */ - AddStructSym (Name, SC_STRUCT, 0, 0); + /* Add a forward declaration for the struct tag in the current lexical level */ + StructTagEntry = AddStructSym (Name, SC_STRUCT, 0, 0, DSFlags); + + StructTagEntry->V.S.ACount = 0; /* Skip the curly brace */ NextToken (); @@ -737,14 +1031,21 @@ static SymEntry* ParseStructDecl (const char* Name) /* Get the type of the entry */ DeclSpec Spec; + + /* Check for a _Static_assert */ + if (CurTok.Tok == TOK_STATIC_ASSERT) { + ParseStaticAssert (); + continue; + } + + int SignednessSpecified = 0; InitDeclSpec (&Spec); - ParseTypeSpec (&Spec, -1, T_QUAL_NONE); + ParseTypeSpec (&Spec, -1, T_QUAL_NONE, &SignednessSpecified); /* Read fields with this type */ while (1) { Declaration Decl; - ident Ident; /* If we had a flexible array member before, no other fields can ** follow. @@ -761,23 +1062,20 @@ static SymEntry* ParseStructDecl (const char* Name) FieldWidth = ParseFieldWidth (&Decl); /* If this is not a bit field, or the bit field is too large for - ** the remainder of the current member, or we have a bit field + ** the remainder of the allocated unit, or we have a bit field ** with width zero, align the struct to the next member by adding ** a member with an anonymous name. */ if (BitOffs > 0) { - if (FieldWidth <= 0 || (BitOffs + FieldWidth) > (int) INT_BITS) { - - /* We need an anonymous name */ - AnonName (Ident, "bit-field"); - + if (FieldWidth <= 0 || + (BitOffs + FieldWidth) > CHAR_BITS * SizeOf (Decl.Type)) { /* Add an anonymous bit-field that aligns to the next - ** storage unit. + ** byte. */ - AddBitField (Ident, StructSize, BitOffs, INT_BITS - BitOffs); + unsigned PaddingBits = PadWithBitField (StructSize, BitOffs); /* No bits left */ - StructSize += SIZEOF_INT; + StructSize += (BitOffs + PaddingBits) / CHAR_BITS; BitOffs = 0; } } @@ -798,6 +1096,8 @@ static SymEntry* ParseStructDecl (const char* Name) Error ("Flexible array member cannot be first struct field"); } FlexibleMember = 1; + Flags |= SC_HAVEFAM; + /* Assume zero for size calculations */ SetElementCount (Decl.Type, FLEXIBLE); } @@ -813,37 +1113,57 @@ static SymEntry* ParseStructDecl (const char* Name) /* This is an anonymous struct or union. Copy the ** fields into the current level. */ - StructSize += CopyAnonStructFields (&Decl, StructSize); - + AnonFieldName (Decl.Ident, "field", StructTagEntry->V.S.ACount); } else { /* A non bit-field without a name is legal but useless */ Warning ("Declaration does not declare anything"); } - goto NextMember; } else { /* A bit-field without a name will get an anonymous one */ AnonName (Decl.Ident, "bit-field"); } } + /* Check for incomplete types including 'void' */ + if (IsClassIncomplete (Decl.Type)) { + Error ("Field '%s' has incomplete type '%s'", + Decl.Ident, + GetFullTypeName (Decl.Type)); + } + /* Add a field entry to the table */ if (FieldWidth > 0) { - /* Add full byte from the bit offset to the variable offset. - ** This simplifies handling he bit-field as a char type - ** in expressions. + /* Full bytes have already been added to the StructSize, + ** which is passed to the offset of AddBitField. BitOffs + ** is always within a char, which simplifies handling the + ** bit-field as a char type in expressions. */ - unsigned Offs = StructSize + (BitOffs / CHAR_BITS); - AddBitField (Decl.Ident, Offs, BitOffs % CHAR_BITS, FieldWidth); + CHECK (BitOffs < CHAR_BITS); + AddBitField (Decl.Ident, Decl.Type, StructSize, BitOffs, + FieldWidth, SignednessSpecified); BitOffs += FieldWidth; - CHECK (BitOffs <= (int) INT_BITS); - if (BitOffs == INT_BITS) { - StructSize += SIZEOF_INT; - BitOffs = 0; + CHECK (BitOffs <= CHAR_BITS * SizeOf (Decl.Type)); + /* Add any full bytes to the struct size. */ + StructSize += BitOffs / CHAR_BITS; + BitOffs %= CHAR_BITS; + } else if (Decl.Ident[0] != '\0') { + Entry = AddLocalSym (Decl.Ident, Decl.Type, SC_STRUCTFIELD, StructSize); + if (IsAnonName (Decl.Ident)) { + Entry->V.A.ANumber = StructTagEntry->V.S.ACount++; + AliasAnonStructFields (&Decl, Entry); } - } else { - AddLocalSym (Decl.Ident, Decl.Type, SC_STRUCTFIELD, StructSize); + + /* Check if the field itself has a flexible array member */ + if (IsClassStruct (Decl.Type)) { + SymEntry* Sym = GetSymType (Decl.Type); + if (Sym && SymHasFlexibleArrayMember (Sym)) { + Entry->Flags |= SC_HAVEFAM; + Flags |= SC_HAVEFAM; + } + } + if (!FlexibleMember) { - StructSize += CheckedSizeOf (Decl.Type); + StructSize += SizeOf (Decl.Type); } } @@ -855,30 +1175,51 @@ NextMember: if (CurTok.Tok != TOK_COMMA) { ConsumeSemi (); } - /* If we have bits from bit-fields left, add them to the size. */ if (BitOffs > 0) { - StructSize += ((BitOffs + CHAR_BITS - 1) / CHAR_BITS); + /* If we have bits from bit-fields left, pad the struct to next byte */ + unsigned PaddingBits = PadWithBitField (StructSize, BitOffs); + + /* No bits left */ + StructSize += (BitOffs + PaddingBits) / CHAR_BITS; } /* Skip the closing brace */ NextToken (); /* Remember the symbol table and leave the struct level */ - FieldTab = GetSymTab (); + FieldTab = GetFieldSymTab (); LeaveStructLevel (); + /* Return a fictitious symbol if errors occurred during parsing */ + if (PrevErrorCount != ErrorCount) { + Flags |= SC_FICTITIOUS; + } + + /* Empty struct is not supported now */ + if (StructSize == 0) { + Error ("Empty struct type '%s' is not supported", Name); + } + /* Make a real entry from the forward decl and return it */ - return AddStructSym (Name, SC_STRUCT, StructSize, FieldTab); + return AddStructSym (Name, SC_STRUCT | SC_DEF | Flags, StructSize, FieldTab, DSFlags); } -static void ParseTypeSpec (DeclSpec* D, long Default, TypeCode Qualifiers) -/* Parse a type specifier */ +static void ParseTypeSpec (DeclSpec* D, long Default, TypeCode Qualifiers, + int* SignednessSpecified) +/* Parse a type specifier. Store whether one of "signed" or "unsigned" was +** specified, so bit-fields of unspecified signedness can be treated as +** unsigned; without special handling, it would be treated as signed. +*/ { ident Ident; SymEntry* Entry; + if (SignednessSpecified != NULL) { + *SignednessSpecified = 0; + } + /* Assume we have an explicit type */ D->Flags &= ~DS_DEF_TYPE; @@ -891,24 +1232,28 @@ static void ParseTypeSpec (DeclSpec* D, long Default, TypeCode Qualifiers) case TOK_VOID: NextToken (); D->Type[0].C = T_VOID; + D->Type[0].A.U = 0; D->Type[1].C = T_END; break; case TOK_CHAR: NextToken (); - D->Type[0].C = GetDefaultChar(); + D->Type[0].C = T_CHAR; D->Type[1].C = T_END; break; case TOK_LONG: NextToken (); if (CurTok.Tok == TOK_UNSIGNED) { + if (SignednessSpecified != NULL) { + *SignednessSpecified = 1; + } NextToken (); OptionalInt (); D->Type[0].C = T_ULONG; D->Type[1].C = T_END; } else { - OptionalSigned (); + OptionalSigned (SignednessSpecified); OptionalInt (); D->Type[0].C = T_LONG; D->Type[1].C = T_END; @@ -918,12 +1263,15 @@ static void ParseTypeSpec (DeclSpec* D, long Default, TypeCode Qualifiers) case TOK_SHORT: NextToken (); if (CurTok.Tok == TOK_UNSIGNED) { + if (SignednessSpecified != NULL) { + *SignednessSpecified = 1; + } NextToken (); OptionalInt (); D->Type[0].C = T_USHORT; D->Type[1].C = T_END; } else { - OptionalSigned (); + OptionalSigned (SignednessSpecified); OptionalInt (); D->Type[0].C = T_SHORT; D->Type[1].C = T_END; @@ -937,6 +1285,9 @@ static void ParseTypeSpec (DeclSpec* D, long Default, TypeCode Qualifiers) break; case TOK_SIGNED: + if (SignednessSpecified != NULL) { + *SignednessSpecified = 1; + } NextToken (); switch (CurTok.Tok) { @@ -972,6 +1323,9 @@ static void ParseTypeSpec (DeclSpec* D, long Default, TypeCode Qualifiers) break; case TOK_UNSIGNED: + if (SignednessSpecified != NULL) { + *SignednessSpecified = 1; + } NextToken (); switch (CurTok.Tok) { @@ -1030,10 +1384,10 @@ static void ParseTypeSpec (DeclSpec* D, long Default, TypeCode Qualifiers) /* Remember we have an extra type decl */ D->Flags |= DS_EXTRA_TYPE; /* Declare the union in the current scope */ - Entry = ParseUnionDecl (Ident); + Entry = ParseUnionDecl (Ident, &D->Flags); /* Encode the union entry into the type */ D->Type[0].C = T_UNION; - SetSymEntry (D->Type, Entry); + SetESUSymEntry (D->Type, Entry); D->Type[1].C = T_END; break; @@ -1049,47 +1403,69 @@ static void ParseTypeSpec (DeclSpec* D, long Default, TypeCode Qualifiers) /* Remember we have an extra type decl */ D->Flags |= DS_EXTRA_TYPE; /* Declare the struct in the current scope */ - Entry = ParseStructDecl (Ident); + Entry = ParseStructDecl (Ident, &D->Flags); /* Encode the struct entry into the type */ D->Type[0].C = T_STRUCT; - SetSymEntry (D->Type, Entry); + SetESUSymEntry (D->Type, Entry); D->Type[1].C = T_END; break; case TOK_ENUM: NextToken (); - if (CurTok.Tok != TOK_LCURLY) { - /* Named enum */ - if (CurTok.Tok == TOK_IDENT) { - /* Find an entry with this name */ - Entry = FindTagSym (CurTok.Ident); - if (Entry) { - if (SymIsLocal (Entry) && (Entry->Flags & SC_ENUM) == 0) { - Error ("Symbol `%s' is already different kind", Entry->Name); - } - } else { - /* Insert entry into table ### */ - } - /* Skip the identifier */ - NextToken (); - } else { + /* Named enum */ + if (CurTok.Tok == TOK_IDENT) { + strcpy (Ident, CurTok.Ident); + NextToken (); + } else { + if (CurTok.Tok != TOK_LCURLY) { Error ("Identifier expected"); + } else { + AnonName (Ident, "enum"); } } /* Remember we have an extra type decl */ D->Flags |= DS_EXTRA_TYPE; /* Parse the enum decl */ - ParseEnumDecl (); - D->Type[0].C = T_INT; + Entry = ParseEnumDecl (Ident, &D->Flags); + /* Encode the enum entry into the type */ + D->Type[0].C |= T_ENUM; + SetESUSymEntry (D->Type, Entry); D->Type[1].C = T_END; + /* The signedness of enums is determined by the type, so say this is specified to avoid + ** the int -> unsigned int handling for plain int bit-fields in AddBitField. + */ + if (SignednessSpecified) { + *SignednessSpecified = 1; + } break; case TOK_IDENT: - Entry = FindSym (CurTok.Ident); - if (Entry && SymIsTypeDef (Entry)) { - /* It's a typedef */ - NextToken (); - TypeCopy (D->Type, Entry->Type); + /* This could be a label */ + if (NextTok.Tok != TOK_COLON || GetLexicalLevel () == LEX_LEVEL_STRUCT) { + Entry = FindSym (CurTok.Ident); + if (Entry && SymIsTypeDef (Entry)) { + /* It's a typedef */ + NextToken (); + TypeCopy (D->Type, Entry->Type); + /* If it's a typedef, we should actually use whether the signedness was + ** specified on the typedef, but that information has been lost. Treat the + ** signedness as being specified to work around the ICE in #1267. + ** Unforunately, this will cause plain int bit-fields defined via typedefs + ** to be treated as signed rather than unsigned. + */ + if (SignednessSpecified) { + *SignednessSpecified = 1; + } + break; + } + } else { + /* This is a label. Use the default type flag to end the loop + ** in DeclareLocals. The type code used here doesn't matter as + ** long as it has no qualifiers. + */ + D->Flags |= DS_DEF_TYPE; + D->Type[0].C = T_INT; + D->Type[1].C = T_END; break; } /* FALL THROUGH */ @@ -1113,21 +1489,35 @@ static void ParseTypeSpec (DeclSpec* D, long Default, TypeCode Qualifiers) -static Type* ParamTypeCvt (Type* T) -/* If T is an array, convert it to a pointer else do nothing. Return the -** resulting type. +static const Type* ParamTypeCvt (Type* T) +/* If T is an array or a function, convert it to a pointer else do nothing. +** Return the resulting type. */ { + Type* Tmp = 0; + if (IsTypeArray (T)) { - T->C = T_PTR; + Tmp = ArrayToPtr (T); + } else if (IsTypeFunc (T)) { + Tmp = NewPointerTo (T); } + + if (Tmp != 0) { + /* Do several fixes on qualifiers */ + FixQualifiers (Tmp); + + /* Replace the type */ + TypeCopy (T, Tmp); + TypeFree (Tmp); + } + return T; } static void ParseOldStyleParamList (FuncDesc* F) -/* Parse an old style (K&R) parameter list */ +/* Parse an old-style (K&R) parameter list */ { /* Some fix point tokens that are used for error recovery */ static const token_t TokenList[] = { TOK_COMMA, TOK_RPAREN, TOK_SEMI }; @@ -1191,6 +1581,13 @@ static void ParseOldStyleParamList (FuncDesc* F) /* Read the parameter */ ParseDecl (&Spec, &Decl, DM_NEED_IDENT); + + /* Warn about new local type declaration */ + if ((Spec.Flags & DS_NEW_TYPE_DECL) != 0) { + Warning ("'%s' will be invisible out of this function", + GetFullTypeName (Spec.Type)); + } + if (Decl.Ident[0] != '\0') { /* We have a name given. Search for the symbol */ @@ -1206,10 +1603,10 @@ static void ParseOldStyleParamList (FuncDesc* F) Sym->Flags &= ~SC_DEFTYPE; } else { /* Type has already been changed */ - Error ("Redefinition for parameter `%s'", Sym->Name); + Error ("Redefinition for parameter '%s'", Sym->Name); } } else { - Error ("Unknown identifier: `%s'", Decl.Ident); + Error ("Unknown identifier: '%s'", Decl.Ident); } } @@ -1229,7 +1626,7 @@ static void ParseOldStyleParamList (FuncDesc* F) static void ParseAnsiParamList (FuncDesc* F) -/* Parse a new style (ANSI) parameter list */ +/* Parse a new-style (ANSI) parameter list */ { /* Parse params */ while (CurTok.Tok != TOK_RPAREN) { @@ -1258,6 +1655,12 @@ static void ParseAnsiParamList (FuncDesc* F) Spec.StorageClass = SC_AUTO | SC_PARAM | SC_DEF; } + /* Warn about new local type declaration */ + if ((Spec.Flags & DS_NEW_TYPE_DECL) != 0) { + Warning ("'%s' will be invisible out of this function", + GetFullTypeName (Spec.Type)); + } + /* Allow parameters without a name, but remember if we had some to ** eventually print an error message later. */ @@ -1286,7 +1689,7 @@ static void ParseAnsiParamList (FuncDesc* F) /* If the parameter is a struct or union, emit a warning */ if (IsClassStruct (Decl.Type)) { if (IS_Get (&WarnStructParam)) { - Warning ("Passing struct by value for parameter `%s'", Decl.Ident); + Warning ("Passing struct by value for parameter '%s'", Decl.Ident); } } @@ -1312,8 +1715,9 @@ static void ParseAnsiParamList (FuncDesc* F) static FuncDesc* ParseFuncDecl (void) /* Parse the argument list of a function. */ { - unsigned Offs; SymEntry* Sym; + SymEntry* WrappedCall; + unsigned int WrappedCallData; /* Create a new function descriptor */ FuncDesc* F = NewFuncDesc (); @@ -1323,32 +1727,30 @@ static FuncDesc* ParseFuncDecl (void) /* Check for several special parameter lists */ if (CurTok.Tok == TOK_RPAREN) { - /* Parameter list is empty */ - F->Flags |= (FD_EMPTY | FD_VARIADIC); + /* Parameter list is empty (K&R-style) */ + F->Flags |= FD_EMPTY; } else if (CurTok.Tok == TOK_VOID && NextTok.Tok == TOK_RPAREN) { /* Parameter list declared as void */ NextToken (); F->Flags |= FD_VOID_PARAM; } else if (CurTok.Tok == TOK_IDENT && (NextTok.Tok == TOK_COMMA || NextTok.Tok == TOK_RPAREN)) { - /* If the identifier is a typedef, we have a new style parameter list, - ** if it's some other identifier, it's an old style parameter list. + /* If the identifier is a typedef, we have a new-style parameter list; + ** if it's some other identifier, it's an old-style parameter list. */ Sym = FindSym (CurTok.Ident); if (Sym == 0 || !SymIsTypeDef (Sym)) { - /* Old style (K&R) function. */ + /* Old-style (K&R) function. */ F->Flags |= FD_OLDSTYLE; } } /* Parse params */ if ((F->Flags & FD_OLDSTYLE) == 0) { - - /* New style function */ + /* New-style function */ ParseAnsiParamList (F); - } else { - /* Old style function */ + /* Old-style function */ ParseOldStyleParamList (F); } @@ -1359,26 +1761,21 @@ static FuncDesc* ParseFuncDecl (void) */ F->LastParam = GetSymTab()->SymTail; - /* Assign offsets. If the function has a variable parameter list, - ** there's one additional byte (the arg size). + /* It is allowed to use incomplete types in function prototypes, so we + ** won't always get to know the parameter sizes here and may do that later. */ - Offs = (F->Flags & FD_VARIADIC)? 1 : 0; - Sym = F->LastParam; - while (Sym) { - unsigned Size = CheckedSizeOf (Sym->Type); - if (SymIsRegVar (Sym)) { - Sym->V.R.SaveOffs = Offs; - } else { - Sym->V.Offs = Offs; - } - Offs += Size; - F->ParamSize += Size; - Sym = Sym->PrevSym; - } + F->Flags |= FD_INCOMPLETE_PARAM; /* Leave the lexical level remembering the symbol tables */ RememberFunctionLevel (F); + /* Did we have a WrappedCall for this function? */ + GetWrappedCall((void **) &WrappedCall, &WrappedCallData); + if (WrappedCall) { + F->WrappedCall = WrappedCall; + F->WrappedCallData = WrappedCallData; + } + /* Return the function descriptor */ return F; } @@ -1403,7 +1800,7 @@ static void Declarator (const DeclSpec* Spec, Declaration* D, declmode_t Mode) NextToken (); /* Allow const, restrict, and volatile qualifiers */ - Qualifiers |= OptionalQualifiers (T_QUAL_CONST | T_QUAL_VOLATILE | T_QUAL_RESTRICT); + Qualifiers |= OptionalQualifiers (T_QUAL_CVR); /* Parse the type that the pointer points to */ Declarator (Spec, D, Mode); @@ -1446,6 +1843,7 @@ static void Declarator (const DeclSpec* Spec, Declaration* D, declmode_t Mode) /* Function declaration */ FuncDesc* F; + SymEntry* PrevEntry; /* Skip the opening paren */ NextToken (); @@ -1459,10 +1857,20 @@ static void Declarator (const DeclSpec* Spec, Declaration* D, declmode_t Mode) Qualifiers &= ~T_QUAL_FASTCALL; } + /* Was there a previous entry? If so, copy WrappedCall info from it */ + PrevEntry = FindGlobalSym (D->Ident); + if (PrevEntry && PrevEntry->Flags & SC_FUNC) { + FuncDesc* D = GetFuncDesc (PrevEntry->Type); + if (D->WrappedCall && !F->WrappedCall) { + F->WrappedCall = D->WrappedCall; + F->WrappedCallData = D->WrappedCallData; + } + } + /* Add the function type. Be sure to bounds check the type buffer */ NeedTypeSpace (D, 1); D->Type[D->Index].C = T_FUNC | Qualifiers; - D->Type[D->Index].A.P = F; + D->Type[D->Index].A.F = F; ++D->Index; /* Qualifiers now used */ @@ -1483,11 +1891,10 @@ static void Declarator (const DeclSpec* Spec, Declaration* D, declmode_t Mode) /* Read the size if it is given */ if (CurTok.Tok != TOK_RBRACK) { - ExprDesc Expr; - ConstAbsIntExpr (hie1, &Expr); + ExprDesc Expr = NoCodeConstAbsIntExpr (hie1); if (Expr.IVal <= 0) { if (D->Ident[0] != '\0') { - Error ("Size of array `%s' is invalid", D->Ident); + Error ("Size of array '%s' is invalid", D->Ident); } else { Error ("Size of array is invalid"); } @@ -1509,16 +1916,16 @@ static void Declarator (const DeclSpec* Spec, Declaration* D, declmode_t Mode) /* If we have remaining qualifiers, flag them as invalid */ if (Qualifiers & T_QUAL_NEAR) { - Error ("Invalid `__near__' qualifier"); + Error ("Invalid '__near__' qualifier"); } if (Qualifiers & T_QUAL_FAR) { - Error ("Invalid `__far__' qualifier"); + Error ("Invalid '__far__' qualifier"); } if (Qualifiers & T_QUAL_FASTCALL) { - Error ("Invalid `__fastcall__' qualifier"); + Error ("Invalid '__fastcall__' qualifier"); } if (Qualifiers & T_QUAL_CDECL) { - Error ("Invalid `__cdecl__' qualifier"); + Error ("Invalid '__cdecl__' qualifier"); } } @@ -1538,7 +1945,7 @@ Type* ParseType (Type* T) /* Get a type without a default */ InitDeclSpec (&Spec); - ParseTypeSpec (&Spec, -1, T_QUAL_NONE); + ParseTypeSpec (&Spec, -1, T_QUAL_NONE, NULL); /* Parse additional declarators */ ParseDecl (&Spec, &Decl, DM_NO_IDENT); @@ -1555,6 +1962,9 @@ Type* ParseType (Type* T) void ParseDecl (const DeclSpec* Spec, Declaration* D, declmode_t Mode) /* Parse a variable, type or function declaration */ { + /* Used to check if we have any errors during parsing this */ + unsigned PrevErrorCount = ErrorCount; + /* Initialize the Declaration struct */ InitDeclaration (D); @@ -1571,6 +1981,9 @@ void ParseDecl (const DeclSpec* Spec, Declaration* D, declmode_t Mode) /* Do several fixes on qualifiers */ FixQualifiers (D->Type); + /* Check if the data type consists of any arrays of forbidden types */ + CheckArrayElementType (D->Type); + /* If we have a function, add a special storage class */ if (IsTypeFunc (D->Type)) { D->StorageClass |= SC_FUNC; @@ -1583,7 +1996,7 @@ void ParseDecl (const DeclSpec* Spec, Declaration* D, declmode_t Mode) if (IsTypeFunc (D->Type) || IsTypeFuncPtr (D->Type)) { /* A function. Check the return type */ - Type* RetType = GetFuncReturn (D->Type); + Type* RetType = GetFuncReturnModifiable (D->Type); /* Functions may not return functions or arrays */ if (IsTypeFunc (RetType)) { @@ -1595,7 +2008,7 @@ void ParseDecl (const DeclSpec* Spec, Declaration* D, declmode_t Mode) /* The return type must not be qualified */ if (GetQualifier (RetType) != T_QUAL_NONE && RetType[1].C == T_END) { - if (GetType (RetType) == T_TYPE_VOID) { + if (GetRawType (RetType) == T_TYPE_VOID) { /* A qualified void type is always an error */ Error ("function definition has qualified void return type"); } else { @@ -1612,7 +2025,7 @@ void ParseDecl (const DeclSpec* Spec, Declaration* D, declmode_t Mode) ** have the C89 standard enabled explicitly. */ if (IS_Get (&Standard) >= STD_C99) { - Warning ("Implicit `int' return type is an obsolete feature"); + Warning ("Implicit 'int' return type is an obsolete feature"); } GetFuncDesc (D->Type)->Flags |= FD_OLDSTYLE_INTRET; } @@ -1628,22 +2041,31 @@ void ParseDecl (const DeclSpec* Spec, Declaration* D, declmode_t Mode) ** for variables with implicit int type. */ if ((Spec->Flags & DS_DEF_TYPE) != 0 && IS_Get (&Standard) >= STD_C99) { - Warning ("Implicit `int' is an obsolete feature"); + Warning ("Implicit 'int' is an obsolete feature"); } } - /* Check the size of the generated type */ if (!IsTypeFunc (D->Type) && !IsTypeVoid (D->Type)) { + /* Check the size of the generated type */ unsigned Size = SizeOf (D->Type); if (Size >= 0x10000) { if (D->Ident[0] != '\0') { - Error ("Size of `%s' is invalid (0x%06X)", D->Ident, Size); + Error ("Size of '%s' is invalid (0x%06X)", D->Ident, Size); } else { Error ("Invalid size in declaration (0x%06X)", Size); } } } + if (PrevErrorCount != ErrorCount) { + /* Make the declaration fictitious if is is not parsed correctly */ + D->StorageClass |= SC_FICTITIOUS; + + if (Mode == DM_NEED_IDENT && D->Ident[0] == '\0') { + /* Use a fictitious name for the identifier if it is missing */ + AnonName (D->Ident, "global"); + } + } } @@ -1663,7 +2085,7 @@ void ParseDeclSpec (DeclSpec* D, unsigned DefStorage, long DefType) ParseStorageClass (D, DefStorage); /* Parse the type specifiers passing any initial type qualifiers */ - ParseTypeSpec (D, DefType, Qualifiers); + ParseTypeSpec (D, DefType, Qualifiers, NULL); } @@ -1678,574 +2100,3 @@ void CheckEmptyDecl (const DeclSpec* D) Warning ("Useless declaration"); } } - - - -static void SkipInitializer (unsigned BracesExpected) -/* Skip the remainder of an initializer in case of errors. Try to be somewhat -** smart so we don't have too many following errors. -*/ -{ - while (CurTok.Tok != TOK_CEOF && CurTok.Tok != TOK_SEMI && BracesExpected > 0) { - switch (CurTok.Tok) { - case TOK_RCURLY: --BracesExpected; break; - case TOK_LCURLY: ++BracesExpected; break; - default: break; - } - NextToken (); - } -} - - - -static unsigned OpeningCurlyBraces (unsigned BracesNeeded) -/* Accept any number of opening curly braces around an initialization, skip -** them and return the number. If the number of curly braces is less than -** BracesNeeded, issue a warning. -*/ -{ - unsigned BraceCount = 0; - while (CurTok.Tok == TOK_LCURLY) { - ++BraceCount; - NextToken (); - } - if (BraceCount < BracesNeeded) { - Error ("`{' expected"); - } - return BraceCount; -} - - - -static void ClosingCurlyBraces (unsigned BracesExpected) -/* Accept and skip the given number of closing curly braces together with -** an optional comma. Output an error messages, if the input does not contain -** the expected number of braces. -*/ -{ - while (BracesExpected) { - if (CurTok.Tok == TOK_RCURLY) { - NextToken (); - } else if (CurTok.Tok == TOK_COMMA && NextTok.Tok == TOK_RCURLY) { - NextToken (); - NextToken (); - } else { - Error ("`}' expected"); - return; - } - --BracesExpected; - } -} - - - -static void DefineData (ExprDesc* Expr) -/* Output a data definition for the given expression */ -{ - switch (ED_GetLoc (Expr)) { - - case E_LOC_ABS: - /* Absolute: numeric address or const */ - g_defdata (TypeOf (Expr->Type) | CF_CONST, Expr->IVal, 0); - break; - - case E_LOC_GLOBAL: - /* Global variable */ - g_defdata (CF_EXTERNAL, Expr->Name, Expr->IVal); - break; - - case E_LOC_STATIC: - case E_LOC_LITERAL: - /* Static variable or literal in the literal pool */ - g_defdata (CF_STATIC, Expr->Name, Expr->IVal); - break; - - case E_LOC_REGISTER: - /* Register variable. Taking the address is usually not - ** allowed. - */ - if (IS_Get (&AllowRegVarAddr) == 0) { - Error ("Cannot take the address of a register variable"); - } - g_defdata (CF_REGVAR, Expr->Name, Expr->IVal); - break; - - case E_LOC_STACK: - case E_LOC_PRIMARY: - case E_LOC_EXPR: - Error ("Non constant initializer"); - break; - - default: - Internal ("Unknown constant type: 0x%04X", ED_GetLoc (Expr)); - } -} - - - -static void OutputBitFieldData (StructInitData* SI) -/* Output bit field data */ -{ - /* Ignore if we have no data */ - if (SI->ValBits > 0) { - - /* Output the data */ - g_defdata (CF_INT | CF_UNSIGNED | CF_CONST, SI->BitVal, 0); - - /* Clear the data from SI and account for the size */ - SI->BitVal = 0; - SI->ValBits = 0; - SI->Offs += SIZEOF_INT; - } -} - - - -static void ParseScalarInitInternal (Type* T, ExprDesc* ED) -/* Parse initializaton for scalar data types. This function will not output the -** data but return it in ED. -*/ -{ - /* Optional opening brace */ - unsigned BraceCount = OpeningCurlyBraces (0); - - /* We warn if an initializer for a scalar contains braces, because this is - ** quite unusual and often a sign for some problem in the input. - */ - if (BraceCount > 0) { - Warning ("Braces around scalar initializer"); - } - - /* Get the expression and convert it to the target type */ - ConstExpr (hie1, ED); - TypeConversion (ED, T); - - /* Close eventually opening braces */ - ClosingCurlyBraces (BraceCount); -} - - - -static unsigned ParseScalarInit (Type* T) -/* Parse initializaton for scalar data types. Return the number of data bytes. */ -{ - ExprDesc ED; - - /* Parse initialization */ - ParseScalarInitInternal (T, &ED); - - /* Output the data */ - DefineData (&ED); - - /* Done */ - return SizeOf (T); -} - - - -static unsigned ParsePointerInit (Type* T) -/* Parse initializaton for pointer data types. Return the number of data bytes. */ -{ - /* Optional opening brace */ - unsigned BraceCount = OpeningCurlyBraces (0); - - /* Expression */ - ExprDesc ED; - ConstExpr (hie1, &ED); - TypeConversion (&ED, T); - - /* Output the data */ - DefineData (&ED); - - /* Close eventually opening braces */ - ClosingCurlyBraces (BraceCount); - - /* Done */ - return SIZEOF_PTR; -} - - - -static unsigned ParseArrayInit (Type* T, int AllowFlexibleMembers) -/* Parse initializaton for arrays. Return the number of data bytes. */ -{ - int Count; - - /* Get the array data */ - Type* ElementType = GetElementType (T); - unsigned ElementSize = CheckedSizeOf (ElementType); - long ElementCount = GetElementCount (T); - - /* Special handling for a character array initialized by a literal */ - if (IsTypeChar (ElementType) && - (CurTok.Tok == TOK_SCONST || CurTok.Tok == TOK_WCSCONST || - (CurTok.Tok == TOK_LCURLY && - (NextTok.Tok == TOK_SCONST || NextTok.Tok == TOK_WCSCONST)))) { - - /* Char array initialized by string constant */ - int NeedParen; - - /* If we initializer is enclosed in brackets, remember this fact and - ** skip the opening bracket. - */ - NeedParen = (CurTok.Tok == TOK_LCURLY); - if (NeedParen) { - NextToken (); - } - - /* Translate into target charset */ - TranslateLiteral (CurTok.SVal); - - /* If the array is one too small for the string literal, omit the - ** trailing zero. - */ - Count = GetLiteralSize (CurTok.SVal); - if (ElementCount != UNSPECIFIED && - ElementCount != FLEXIBLE && - Count == ElementCount + 1) { - /* Omit the trailing zero */ - --Count; - } - - /* Output the data */ - g_defbytes (GetLiteralStr (CurTok.SVal), Count); - - /* Skip the string */ - NextToken (); - - /* If the initializer was enclosed in curly braces, we need a closing - ** one. - */ - if (NeedParen) { - ConsumeRCurly (); - } - - } else { - - /* Curly brace */ - ConsumeLCurly (); - - /* Initialize the array members */ - Count = 0; - while (CurTok.Tok != TOK_RCURLY) { - /* Flexible array members may not be initialized within - ** an array (because the size of each element may differ - ** otherwise). - */ - ParseInitInternal (ElementType, 0); - ++Count; - if (CurTok.Tok != TOK_COMMA) - break; - NextToken (); - } - - /* Closing curly braces */ - ConsumeRCurly (); - } - - if (ElementCount == UNSPECIFIED) { - /* Number of elements determined by initializer */ - SetElementCount (T, Count); - ElementCount = Count; - } else if (ElementCount == FLEXIBLE && AllowFlexibleMembers) { - /* In non ANSI mode, allow initialization of flexible array - ** members. - */ - ElementCount = Count; - } else if (Count < ElementCount) { - g_zerobytes ((ElementCount - Count) * ElementSize); - } else if (Count > ElementCount) { - Error ("Too many initializers"); - } - return ElementCount * ElementSize; -} - - - -static unsigned ParseStructInit (Type* T, int AllowFlexibleMembers) -/* Parse initialization of a struct or union. Return the number of data bytes. */ -{ - SymEntry* Entry; - SymTable* Tab; - StructInitData SI; - - - /* Consume the opening curly brace */ - ConsumeLCurly (); - - /* Get a pointer to the struct entry from the type */ - Entry = GetSymEntry (T); - - /* Get the size of the struct from the symbol table entry */ - SI.Size = Entry->V.S.Size; - - /* Check if this struct definition has a field table. If it doesn't, it - ** is an incomplete definition. - */ - Tab = Entry->V.S.SymTab; - if (Tab == 0) { - Error ("Cannot initialize variables with incomplete type"); - /* Try error recovery */ - SkipInitializer (1); - /* Nothing initialized */ - return 0; - } - - /* Get a pointer to the list of symbols */ - Entry = Tab->SymHead; - - /* Initialize fields */ - SI.Offs = 0; - SI.BitVal = 0; - SI.ValBits = 0; - while (CurTok.Tok != TOK_RCURLY) { - - /* */ - if (Entry == 0) { - Error ("Too many initializers"); - SkipInitializer (1); - return SI.Offs; - } - - /* Parse initialization of one field. Bit-fields need a special - ** handling. - */ - if (SymIsBitField (Entry)) { - - ExprDesc ED; - unsigned Val; - unsigned Shift; - - /* Calculate the bitmask from the bit-field data */ - unsigned Mask = (1U << Entry->V.B.BitWidth) - 1U; - - /* Safety ... */ - CHECK (Entry->V.B.Offs * CHAR_BITS + Entry->V.B.BitOffs == - SI.Offs * CHAR_BITS + SI.ValBits); - - /* This may be an anonymous bit-field, in which case it doesn't - ** have an initializer. - */ - if (IsAnonName (Entry->Name)) { - /* Account for the data and output it if we have a full word */ - SI.ValBits += Entry->V.B.BitWidth; - CHECK (SI.ValBits <= INT_BITS); - if (SI.ValBits == INT_BITS) { - OutputBitFieldData (&SI); - } - goto NextMember; - } else { - /* Read the data, check for a constant integer, do a range - ** check. - */ - ParseScalarInitInternal (type_uint, &ED); - if (!ED_IsConstAbsInt (&ED)) { - Error ("Constant initializer expected"); - ED_MakeConstAbsInt (&ED, 1); - } - if (ED.IVal > (long) Mask) { - Warning ("Truncating value in bit-field initializer"); - ED.IVal &= (long) Mask; - } - Val = (unsigned) ED.IVal; - } - - /* Add the value to the currently stored bit-field value */ - Shift = (Entry->V.B.Offs - SI.Offs) * CHAR_BITS + Entry->V.B.BitOffs; - SI.BitVal |= (Val << Shift); - - /* Account for the data and output it if we have a full word */ - SI.ValBits += Entry->V.B.BitWidth; - CHECK (SI.ValBits <= INT_BITS); - if (SI.ValBits == INT_BITS) { - OutputBitFieldData (&SI); - } - - } else { - - /* Standard member. We should never have stuff from a - ** bit-field left - */ - CHECK (SI.ValBits == 0); - - /* Flexible array members may only be initialized if they are - ** the last field (or part of the last struct field). - */ - SI.Offs += ParseInitInternal (Entry->Type, AllowFlexibleMembers && Entry->NextSym == 0); - } - - /* More initializers? */ - if (CurTok.Tok != TOK_COMMA) { - break; - } - - /* Skip the comma */ - NextToken (); - -NextMember: - /* Next member. For unions, only the first one can be initialized */ - if (IsTypeUnion (T)) { - /* Union */ - Entry = 0; - } else { - /* Struct */ - Entry = Entry->NextSym; - } - } - - /* Consume the closing curly brace */ - ConsumeRCurly (); - - /* If we have data from a bit-field left, output it now */ - OutputBitFieldData (&SI); - - /* If there are struct fields left, reserve additional storage */ - if (SI.Offs < SI.Size) { - g_zerobytes (SI.Size - SI.Offs); - SI.Offs = SI.Size; - } - - /* Return the actual number of bytes initialized. This number may be - ** larger than sizeof (Struct) if flexible array members are present and - ** were initialized (possible in non ANSI mode). - */ - return SI.Offs; -} - - - -static unsigned ParseVoidInit (void) -/* Parse an initialization of a void variable (special cc65 extension). -** Return the number of bytes initialized. -*/ -{ - ExprDesc Expr; - unsigned Size; - - /* Opening brace */ - ConsumeLCurly (); - - /* Allow an arbitrary list of values */ - Size = 0; - do { - ConstExpr (hie1, &Expr); - switch (UnqualifiedType (Expr.Type[0].C)) { - - case T_SCHAR: - case T_UCHAR: - if (ED_IsConstAbsInt (&Expr)) { - /* Make it byte sized */ - Expr.IVal &= 0xFF; - } - DefineData (&Expr); - Size += SIZEOF_CHAR; - break; - - case T_SHORT: - case T_USHORT: - case T_INT: - case T_UINT: - case T_PTR: - case T_ARRAY: - if (ED_IsConstAbsInt (&Expr)) { - /* Make it word sized */ - Expr.IVal &= 0xFFFF; - } - DefineData (&Expr); - Size += SIZEOF_INT; - break; - - case T_LONG: - case T_ULONG: - if (ED_IsConstAbsInt (&Expr)) { - /* Make it dword sized */ - Expr.IVal &= 0xFFFFFFFF; - } - DefineData (&Expr); - Size += SIZEOF_LONG; - break; - - default: - Error ("Illegal type in initialization"); - break; - - } - - if (CurTok.Tok != TOK_COMMA) { - break; - } - NextToken (); - - } while (CurTok.Tok != TOK_RCURLY); - - /* Closing brace */ - ConsumeRCurly (); - - /* Return the number of bytes initialized */ - return Size; -} - - - -static unsigned ParseInitInternal (Type* T, int AllowFlexibleMembers) -/* Parse initialization of variables. Return the number of data bytes. */ -{ - switch (UnqualifiedType (T->C)) { - - case T_SCHAR: - case T_UCHAR: - case T_SHORT: - case T_USHORT: - case T_INT: - case T_UINT: - case T_LONG: - case T_ULONG: - case T_FLOAT: - case T_DOUBLE: - return ParseScalarInit (T); - - case T_PTR: - return ParsePointerInit (T); - - case T_ARRAY: - return ParseArrayInit (T, AllowFlexibleMembers); - - case T_STRUCT: - case T_UNION: - return ParseStructInit (T, AllowFlexibleMembers); - - case T_VOID: - if (IS_Get (&Standard) == STD_CC65) { - /* Special cc65 extension in non ANSI mode */ - return ParseVoidInit (); - } - /* FALLTHROUGH */ - - default: - Error ("Illegal type"); - return SIZEOF_CHAR; - - } -} - - - -unsigned ParseInit (Type* T) -/* Parse initialization of variables. Return the number of data bytes. */ -{ - /* Parse the initialization. Flexible array members can only be initialized - ** in cc65 mode. - */ - unsigned Size = ParseInitInternal (T, IS_Get (&Standard) == STD_CC65); - - /* The initialization may not generate code on global level, because code - ** outside function scope will never get executed. - */ - if (HaveGlobalCode ()) { - Error ("Non constant initializers"); - RemoveGlobalCode (); - } - - /* Return the size needed for the initialization */ - return Size; -} diff --git a/src/cc65/declare.h b/src/cc65/declare.h index 117ac14a6..2b8b36f1c 100644 --- a/src/cc65/declare.h +++ b/src/cc65/declare.h @@ -57,6 +57,9 @@ #define DS_DEF_STORAGE 0x0001U /* Default storage class used */ #define DS_DEF_TYPE 0x0002U /* Default type used */ #define DS_EXTRA_TYPE 0x0004U /* Extra type declared */ +#define DS_NEW_TYPE_DECL 0x0010U /* New type declared */ +#define DS_NEW_TYPE_DEF 0x0020U /* New type defined */ +#define DS_NEW_TYPE (DS_NEW_TYPE_DECL | DS_NEW_TYPE_DEF) /* Result of ParseDeclSpec */ typedef struct DeclSpec DeclSpec; @@ -93,6 +96,9 @@ typedef enum { +void InitDeclSpec (DeclSpec* D); +/* Initialize the DeclSpec struct for use */ + Type* ParseType (Type* Type); /* Parse a complete type specification */ @@ -108,11 +114,6 @@ void CheckEmptyDecl (const DeclSpec* D); ** warning if not. */ -unsigned ParseInit (Type* T); -/* Parse initialization of variables. Return the number of initialized data -** bytes. -*/ - /* End of declare.h */ diff --git a/src/cc65/declattr.c b/src/cc65/declattr.c index bdaea20d6..37048e69b 100644 --- a/src/cc65/declattr.c +++ b/src/cc65/declattr.c @@ -225,7 +225,7 @@ void ParseAttribute (Declaration* D) } else { /* Attribute not known, maybe typo */ - Error ("Illegal attribute: `%s'", AttrName); + Error ("Illegal attribute: '%s'", AttrName); /* Skip until end of attribute */ ErrorSkip (); diff --git a/src/cc65/error.c b/src/cc65/error.c index 5218d195c..f0e023969 100644 --- a/src/cc65/error.c +++ b/src/cc65/error.c @@ -38,7 +38,9 @@ #include <stdarg.h> /* common */ +#include "coll.h" #include "print.h" +#include "strbuf.h" /* cc65 */ #include "global.h" @@ -66,11 +68,17 @@ IntStack WarningsAreErrors = INTSTACK(0); /* Treat warnings as errors */ /* Warn about: */ IntStack WarnConstComparison= INTSTACK(1); /* - constant comparison results */ IntStack WarnNoEffect = INTSTACK(1); /* - statements without an effect */ -IntStack WarnStructParam = INTSTACK(1); /* - structs passed by val */ +IntStack WarnPointerSign = INTSTACK(1); /* - pointer conversion to pointer differing in signedness */ +IntStack WarnPointerTypes = INTSTACK(1); /* - pointer conversion to incompatible pointer type */ +IntStack WarnRemapZero = INTSTACK(1); /* - remapping character code zero */ +IntStack WarnReturnType = INTSTACK(1); /* - control reaches end of non-void function */ +IntStack WarnStructParam = INTSTACK(0); /* - structs passed by val */ +IntStack WarnUnknownPragma = INTSTACK(1); /* - unknown #pragmas */ +IntStack WarnUnreachableCode= INTSTACK(1); /* - unreachable code */ IntStack WarnUnusedLabel = INTSTACK(1); /* - unused labels */ IntStack WarnUnusedParam = INTSTACK(1); /* - unused parameters */ IntStack WarnUnusedVar = INTSTACK(1); /* - unused variables */ -IntStack WarnUnknownPragma = INTSTACK(1); /* - unknown #pragmas */ +IntStack WarnUnusedFunc = INTSTACK(1); /* - unused functions */ /* Map the name of a warning to the intstack that holds its state */ typedef struct WarnMapEntry WarnMapEntry; @@ -79,17 +87,25 @@ struct WarnMapEntry { const char* Name; }; static WarnMapEntry WarnMap[] = { - /* Keep sorted, even if this isn't used for now */ - { &WarningsAreErrors, "error" }, + /* Keep names sorted, even if it isn't used for now */ { &WarnConstComparison, "const-comparison" }, + { &WarningsAreErrors, "error" }, { &WarnNoEffect, "no-effect" }, + { &WarnPointerSign, "pointer-sign" }, + { &WarnPointerTypes, "pointer-types" }, + { &WarnRemapZero, "remap-zero" }, + { &WarnReturnType, "return-type" }, { &WarnStructParam, "struct-param" }, { &WarnUnknownPragma, "unknown-pragma" }, + { &WarnUnreachableCode, "unreachable-code" }, + { &WarnUnusedFunc, "unused-func" }, { &WarnUnusedLabel, "unused-label" }, { &WarnUnusedParam, "unused-param" }, { &WarnUnusedVar, "unused-var" }, }; +Collection DiagnosticStrBufs; + /*****************************************************************************/ @@ -113,7 +129,7 @@ void Fatal (const char* Format, ...) LineNum = GetCurrentLine (); } - fprintf (stderr, "%s(%u): Fatal: ", FileName, LineNum); + fprintf (stderr, "%s:%u: Fatal: ", FileName, LineNum); va_start (ap, Format); vfprintf (stderr, Format, ap); @@ -143,7 +159,7 @@ void Internal (const char* Format, ...) LineNum = GetCurrentLine (); } - fprintf (stderr, "%s(%u): Internal compiler error:\n", + fprintf (stderr, "%s:%u: Internal compiler error:\n", FileName, LineNum); va_start (ap, Format); @@ -170,7 +186,7 @@ void Internal (const char* Format, ...) static void IntError (const char* Filename, unsigned LineNo, const char* Msg, va_list ap) /* Print an error message - internal function*/ { - fprintf (stderr, "%s(%u): Error: ", Filename, LineNo); + fprintf (stderr, "%s:%u: Error: ", Filename, LineNo); vfprintf (stderr, Msg, ap); fprintf (stderr, "\n"); @@ -178,7 +194,7 @@ static void IntError (const char* Filename, unsigned LineNo, const char* Msg, va Print (stderr, 1, "Input: %.*s\n", (int) SB_GetLen (Line), SB_GetConstBuf (Line)); } ++ErrorCount; - if (ErrorCount > 10) { + if (ErrorCount > 20) { Fatal ("Too many errors"); } } @@ -234,7 +250,7 @@ static void IntWarning (const char* Filename, unsigned LineNo, const char* Msg, } else if (IS_Get (&WarnEnable)) { - fprintf (stderr, "%s(%u): Warning: ", Filename, LineNo); + fprintf (stderr, "%s:%u: Warning: ", Filename, LineNo); vfprintf (stderr, Msg, ap); fprintf (stderr, "\n"); @@ -319,5 +335,53 @@ void ListWarnings (FILE* F) void ErrorReport (void) /* Report errors (called at end of compile) */ { - Print (stdout, 1, "%u errors, %u warnings\n", ErrorCount, WarningCount); + unsigned int V = (ErrorCount != 0 ? 0 : 1); + Print (stdout, V, "%u errors and %u warnings generated.\n", ErrorCount, WarningCount); +} + + + +/*****************************************************************************/ +/* Tracked StrBufs */ +/*****************************************************************************/ + + + +void InitDiagnosticStrBufs (void) +/* Init tracking string buffers used for diagnostics */ +{ + InitCollection (&DiagnosticStrBufs); +} + + + +void DoneDiagnosticStrBufs (void) +/* Done with tracked string buffers used for diagnostics */ +{ + ClearDiagnosticStrBufs (); + DoneCollection (&DiagnosticStrBufs); +} + + + +void ClearDiagnosticStrBufs (void) +/* Free all tracked string buffers */ +{ + unsigned I; + + for (I = 0; I < CollCount (&DiagnosticStrBufs); ++I) { + SB_Done (CollAtUnchecked (&DiagnosticStrBufs, I)); + } + + CollDeleteAll (&DiagnosticStrBufs); +} + + + +struct StrBuf* NewDiagnosticStrBuf (void) +/* Get a new tracked string buffer */ +{ + StrBuf *Buf = NewStrBuf (); + CollAppend (&DiagnosticStrBufs, Buf); + return Buf; } diff --git a/src/cc65/error.h b/src/cc65/error.h index 9aec10c77..c4420c434 100644 --- a/src/cc65/error.h +++ b/src/cc65/error.h @@ -64,12 +64,21 @@ extern IntStack WarnEnable; /* Enable warnings */ extern IntStack WarningsAreErrors; /* Treat warnings as errors */ /* Warn about: */ extern IntStack WarnConstComparison; /* - constant comparison results */ +extern IntStack WarnPointerSign; /* - pointer conversion to pointer differing in signedness */ +extern IntStack WarnPointerTypes; /* - pointer conversion to incompatible pointer type */ extern IntStack WarnNoEffect; /* - statements without an effect */ +extern IntStack WarnRemapZero; /* - remapping character code zero */ +extern IntStack WarnReturnType; /* - control reaches end of non-void function */ extern IntStack WarnStructParam; /* - structs passed by val */ +extern IntStack WarnUnknownPragma; /* - unknown #pragmas */ +extern IntStack WarnUnreachableCode; /* - unreachable code */ extern IntStack WarnUnusedLabel; /* - unused labels */ extern IntStack WarnUnusedParam; /* - unused parameters */ extern IntStack WarnUnusedVar; /* - unused variables */ -extern IntStack WarnUnknownPragma; /* - unknown #pragmas */ +extern IntStack WarnUnusedFunc; /* - unused functions */ + +/* Forward */ +struct StrBuf; @@ -114,6 +123,18 @@ void ListWarnings (FILE* F); void ErrorReport (void); /* Report errors (called at end of compile) */ +void InitDiagnosticStrBufs (void); +/* Init tracking string buffers used for diagnostics */ + +void DoneDiagnosticStrBufs (void); +/* Done with tracked string buffers used for diagnostics */ + +void ClearDiagnosticStrBufs (void); +/* Free all tracked string buffers */ + +struct StrBuf* NewDiagnosticStrBuf (void); +/* Get a new tracked string buffer */ + /* End of error.h */ diff --git a/src/cc65/expr.c b/src/cc65/expr.c index 34cf550a2..eb0afb38b 100644 --- a/src/cc65/expr.c +++ b/src/cc65/expr.c @@ -1,7 +1,7 @@ /* expr.c ** ** 1998-06-21, Ullrich von Bassewitz -** 2015-06-26, Greg King +** 2020-11-20, Greg King */ @@ -25,6 +25,7 @@ #include "funcdesc.h" #include "function.h" #include "global.h" +#include "initdata.h" #include "litpool.h" #include "loadexpr.h" #include "macrotab.h" @@ -47,18 +48,6 @@ -/* Generator attributes */ -#define GEN_NOPUSH 0x01 /* Don't push lhs */ -#define GEN_COMM 0x02 /* Operator is commutative */ -#define GEN_NOFUNC 0x04 /* Not allowed for function pointers */ - -/* Map a generator function and its attributes to a token */ -typedef struct { - token_t Tok; /* Token to map to */ - unsigned Flags; /* Flags for generator function */ - void (*Func) (unsigned, unsigned long); /* Generator func */ -} GenDesc; - /* Descriptors for the operations */ static GenDesc GenPASGN = { TOK_PLUS_ASSIGN, GEN_NOPUSH, g_add }; static GenDesc GenSASGN = { TOK_MINUS_ASSIGN, GEN_NOPUSH, g_sub }; @@ -73,24 +62,38 @@ static GenDesc GenOASGN = { TOK_OR_ASSIGN, GEN_NOPUSH, g_or }; +/*****************************************************************************/ +/* Forward declarations */ +/*****************************************************************************/ + + + +static void parseadd (ExprDesc* Expr, int DoArrayRef); +static void PostInc (ExprDesc* Expr); +static void PostDec (ExprDesc* Expr); + + + /*****************************************************************************/ /* Helper functions */ /*****************************************************************************/ -static unsigned GlobalModeFlags (const ExprDesc* Expr) +unsigned GlobalModeFlags (const ExprDesc* Expr) /* Return the addressing mode flags for the given expression */ { switch (ED_GetLoc (Expr)) { + case E_LOC_NONE: return CF_IMM; case E_LOC_ABS: return CF_ABSOLUTE; case E_LOC_GLOBAL: return CF_EXTERNAL; case E_LOC_STATIC: return CF_STATIC; case E_LOC_REGISTER: return CF_REGVAR; - case E_LOC_STACK: return CF_NONE; - case E_LOC_PRIMARY: return CF_NONE; - case E_LOC_EXPR: return CF_NONE; - case E_LOC_LITERAL: return CF_STATIC; /* Same as static */ + case E_LOC_STACK: return CF_STACK; + case E_LOC_PRIMARY: return CF_PRIMARY; + case E_LOC_EXPR: return CF_EXPR; + case E_LOC_LITERAL: return CF_LITERAL; + case E_LOC_CODE: return CF_CODE; default: Internal ("GlobalModeFlags: Invalid location flags value: 0x%04X", Expr->Flags); /* NOTREACHED */ @@ -139,32 +142,7 @@ void MarkedExprWithCheck (void (*Func) (ExprDesc*), ExprDesc* Expr) -static Type* promoteint (Type* lhst, Type* rhst) -/* In an expression with two ints, return the type of the result */ -{ - /* Rules for integer types: - ** - If one of the values is a long, the result is long. - ** - If one of the values is unsigned, the result is also unsigned. - ** - Otherwise the result is an int. - */ - if (IsTypeLong (lhst) || IsTypeLong (rhst)) { - if (IsSignUnsigned (lhst) || IsSignUnsigned (rhst)) { - return type_ulong; - } else { - return type_long; - } - } else { - if (IsSignUnsigned (lhst) || IsSignUnsigned (rhst)) { - return type_uint; - } else { - return type_int; - } - } -} - - - -static unsigned typeadjust (ExprDesc* lhs, ExprDesc* rhs, int NoPush) +static unsigned typeadjust (ExprDesc* lhs, const ExprDesc* rhs, int NoPush) /* Adjust the two values for a binary operation. lhs is expected on stack or ** to be constant, rhs is expected to be in the primary register or constant. ** The function will put the type of the result into lhs and return the @@ -178,26 +156,36 @@ static unsigned typeadjust (ExprDesc* lhs, ExprDesc* rhs, int NoPush) unsigned flags; /* Get the type strings */ - Type* lhst = lhs->Type; - Type* rhst = rhs->Type; + const Type* lhst = lhs->Type; + const Type* rhst = rhs->Type; /* Generate type adjustment code if needed */ ltype = TypeOf (lhst); - if (ED_IsLocAbs (lhs)) { + if (ED_IsConstAbsInt (lhs) && ltype == CF_INT && lhs->IVal >= 0 && lhs->IVal < 256) { + /* If the lhs is a int constant that fits in an unsigned char, use unsigned char. + ** g_typeadjust will either promote this to int or unsigned int as appropriate + ** based on the other operand. See comment in hie_internal. + */ + ltype = CF_CHAR | CF_UNSIGNED; + } + if (ED_IsLocNone (lhs)) { ltype |= CF_CONST; } if (NoPush) { /* Value is in primary register*/ - ltype |= CF_REG; + ltype |= CF_PRIMARY; } rtype = TypeOf (rhst); - if (ED_IsLocAbs (rhs)) { + if (ED_IsConstAbsInt (rhs) && rtype == CF_INT && rhs->IVal >= 0 && rhs->IVal < 256) { + rtype = CF_CHAR | CF_UNSIGNED; + } + if (ED_IsLocNone (rhs)) { rtype |= CF_CONST; } flags = g_typeadjust (ltype, rtype); /* Set the type of the result */ - lhs->Type = promoteint (lhst, rhst); + lhs->Type = ArithmeticConvert (lhst, rhst); /* Return the code generator flags */ return flags; @@ -205,11 +193,50 @@ static unsigned typeadjust (ExprDesc* lhs, ExprDesc* rhs, int NoPush) +void LimitExprValue (ExprDesc* Expr) +/* Limit the constant value of the expression to the range of its type */ +{ + switch (GetUnderlyingTypeCode (Expr->Type)) { + case T_INT: + case T_SHORT: + Expr->IVal = (int16_t)Expr->IVal; + break; + + case T_UINT: + case T_USHORT: + case T_PTR: + case T_ARRAY: + Expr->IVal = (uint16_t)Expr->IVal; + break; + + case T_LONG: + Expr->IVal = (int32_t)Expr->IVal; + break; + + case T_ULONG: + Expr->IVal = (uint32_t)Expr->IVal; + break; + + case T_SCHAR: + Expr->IVal = (int8_t)Expr->IVal; + break; + + case T_UCHAR: + Expr->IVal = (uint8_t)Expr->IVal; + break; + + default: + Internal ("hie_internal: constant result type %s\n", GetFullTypeName (Expr->Type)); + } +} + + + static const GenDesc* FindGen (token_t Tok, const GenDesc* Table) /* Find a token in a generator table */ { while (Table->Tok != TOK_INVALID) { - if (Table->Tok == Tok) { + if ((token_t)Table->Tok == Tok) { return Table; } ++Table; @@ -243,6 +270,23 @@ static int TypeSpecAhead (void) +static unsigned ExprCheckedSizeOf (const Type* T) +/* Specially checked SizeOf() used in 'sizeof' expressions */ +{ + unsigned Size = SizeOf (T); + SymEntry* Sym; + + if (Size == 0) { + Sym = GetSymType (T); + if (Sym == 0 || !SymIsDef (Sym)) { + Error ("Cannot apply 'sizeof' to incomplete type '%s'", GetFullTypeName (T)); + } + } + return Size; +} + + + void PushAddr (const ExprDesc* Expr) /* If the expression contains an address that was somehow evaluated, ** push this address on the stack. This is a helper function for all @@ -259,13 +303,15 @@ void PushAddr (const ExprDesc* Expr) -static void WarnConstCompareResult (void) +static void WarnConstCompareResult (const ExprDesc* Expr) /* If the result of a comparison is constant, this is suspicious when not in ** preprocessor mode. */ { - if (!Preprocessing && IS_Get (&WarnConstComparison) != 0) { - Warning ("Result of comparison is constant"); + if (!Preprocessing && + !ED_NeedsConst (Expr) && + IS_Get (&WarnConstComparison) != 0) { + Warning ("Result of comparison is always %s", Expr->IVal != 0 ? "true" : "false"); } } @@ -277,52 +323,380 @@ static void WarnConstCompareResult (void) -static unsigned FunctionParamList (FuncDesc* Func, int IsFastcall) -/* Parse a function parameter list and pass the parameters to the called -** function. Depending on several criteria this may be done by just pushing -** each parameter separately, or creating the parameter frame once and then -** storing into this frame. -** The function returns the size of the parameters pushed. +typedef enum { + DOT_INC, + DOT_DEC, +} DeferredOpType; + + +typedef struct { + ExprDesc Expr; + DeferredOpType OpType; +} DeferredOp; + +Collection DeferredOps; + + + +void InitDeferredOps (void) +/* Init the collection for storing deferred ops */ +{ + InitCollection (&DeferredOps); +} + + + +void DoneDeferredOps (void) +/* Deinit the collection for storing deferred ops */ +{ + DoneCollection (&DeferredOps); +} + + + +static void DeferInc (const ExprDesc* Expr) +/* Defer the post-inc and put it in a queue */ +{ + if (ED_IsUneval (Expr)) { + return; + } + DeferredOp* Op = xmalloc (sizeof (DeferredOp)); + memcpy (&Op->Expr, Expr, sizeof (ExprDesc)); + Op->OpType = DOT_INC; + CollAppend (&DeferredOps, Op); +} + + + +static void DeferDec (const ExprDesc* Expr) +/* Defer the post-dec and put it in a queue */ +{ + if (ED_IsUneval (Expr)) { + return; + } + DeferredOp* Op = xmalloc (sizeof (DeferredOp)); + memcpy (&Op->Expr, Expr, sizeof (ExprDesc)); + Op->OpType = DOT_DEC; + CollAppend (&DeferredOps, Op); +} + + + +static void DoInc (ExprDesc* Expr, unsigned KeepResult) +/* Do increment */ +{ + unsigned Flags; + long Val; + + /* Get the increment value in bytes */ + Val = IsTypePtr (Expr->Type) ? CheckedSizeOf (Expr->Type + 1) : 1; + + /* Special treatment is needed for bit-fields */ + if (IsTypeFragBitField (Expr->Type)) { + DoIncDecBitField (Expr, Val, KeepResult); + return; + } + + /* Get the flags */ + Flags = TypeOf (Expr->Type) | GlobalModeFlags (Expr) | CF_FORCECHAR | CF_CONST; + if (KeepResult != OA_NEED_NEW) { + /* No need to get the result */ + Flags |= CF_NOKEEP; + } + + if (KeepResult == OA_NEED_OLD) { + + Flags |= CF_FORCECHAR; + + /* Push the address if needed */ + PushAddr (Expr); + + /* Save the original value */ + LoadExpr (CF_NONE, Expr); + g_save (Flags); + + /* Do the increment */ + g_inc (Flags | CF_CONST, Val); + + /* Store the result back */ + Store (Expr, 0); + + /* Restore the original value */ + g_restore (Flags); + + } else { + + /* Check the location of the data */ + switch (ED_GetLoc (Expr)) { + + case E_LOC_ABS: + /* Absolute numeric addressed variable */ + g_addeqstatic (Flags, Expr->IVal, 0, Val); + break; + + case E_LOC_GLOBAL: + case E_LOC_STATIC: + case E_LOC_REGISTER: + case E_LOC_LITERAL: + case E_LOC_CODE: + /* Global variabl, static variable, register variable, pooled + ** literal or code label location. + */ + g_addeqstatic (Flags, Expr->Name, Expr->IVal, Val); + break; + + case E_LOC_STACK: + /* Value on the stack */ + g_addeqlocal (Flags, Expr->IVal, Val); + break; + + case E_LOC_PRIMARY: + /* The primary register */ + g_inc (Flags, Val); + break; + + case E_LOC_EXPR: + /* An expression referenced in the primary register */ + g_addeqind (Flags, Expr->IVal, Val); + break; + + default: + Internal ("Invalid location in DoInc(): 0x%04X", ED_GetLoc (Expr)); + } + + } +} + + + +static void DoDec (ExprDesc* Expr, unsigned KeepResult) +/* Do decrement */ +{ + unsigned Flags; + long Val; + + /* Get the decrement value in bytes */ + Val = IsTypePtr (Expr->Type) ? CheckedSizeOf (Expr->Type + 1) : 1; + + /* Special treatment is needed for bit-fields */ + if (IsTypeFragBitField (Expr->Type)) { + DoIncDecBitField (Expr, -Val, KeepResult); + return; + } + + /* Get the flags */ + Flags = TypeOf (Expr->Type) | GlobalModeFlags (Expr) | CF_FORCECHAR | CF_CONST; + if (KeepResult != OA_NEED_NEW) { + /* No need to get the result */ + Flags |= CF_NOKEEP; + } + + if (KeepResult == OA_NEED_OLD) { + + Flags |= CF_FORCECHAR; + + /* Push the address if needed */ + PushAddr (Expr); + + /* Save the original value */ + LoadExpr (CF_NONE, Expr); + g_save (Flags); + + /* Do the decrement */ + g_dec (Flags | CF_CONST, Val); + + /* Store the result back */ + Store (Expr, 0); + + /* Restore the original value */ + g_restore (Flags); + + } else { + + /* Check the location of the data */ + switch (ED_GetLoc (Expr)) { + + case E_LOC_ABS: + /* Absolute numeric addressed variable */ + g_subeqstatic (Flags, Expr->IVal, 0, Val); + break; + + case E_LOC_GLOBAL: + case E_LOC_STATIC: + case E_LOC_REGISTER: + case E_LOC_LITERAL: + case E_LOC_CODE: + /* Global variabl, static variable, register variable, pooled + ** literal or code label location. + */ + g_subeqstatic (Flags, Expr->Name, Expr->IVal, Val); + break; + + case E_LOC_STACK: + /* Value on the stack */ + g_subeqlocal (Flags, Expr->IVal, Val); + break; + + case E_LOC_PRIMARY: + /* The primary register */ + g_dec (Flags, Val); + break; + + case E_LOC_EXPR: + /* An expression referenced in the primary register */ + g_subeqind (Flags, Expr->IVal, Val); + break; + + default: + Internal ("Invalid location in DoDec(): 0x%04X", ED_GetLoc (Expr)); + } + + } +} + + + +int GetDeferredOpCount (void) +/* Return how many deferred operations are still waiting in the queque */ +{ + return (int)CollCount (&DeferredOps); +} + + + +void CheckDeferredOpAllDone (void) +/* Check if all deferred operations are done at sequence points. +** Die off if check fails. */ { - ExprDesc Expr; + if (GetDeferredOpCount () > 0) { + Internal ("Code generation messed up: missing operations past sequence points."); + } +} + + + +void DoDeferred (unsigned Flags, ExprDesc* Expr) +/* Do deferred operations such as post-inc/dec at sequence points */ +{ + int I; + unsigned Size = 0; + int Count = GetDeferredOpCount (); + + /* Nothing to be done */ + if (Count <= 0) { + return; + } + + /* Backup some regs/processor flags around the inc/dec */ + if ((Flags & SQP_KEEP_TEST) != 0 && ED_NeedsTest (Expr)) { + /* Sufficient to add a pair of PHP/PLP for all cases */ + AddCodeLine ("php"); + } + + /* Backup the content of EAX around the inc/dec */ + if ((Flags & SQP_KEEP_EAX) != 0 && ED_NeedsPrimary (Expr)) { + /* Get the size */ + Size = CheckedSizeOf (Expr->Type); + + if (Size < 2) { + AddCodeLine ("pha"); + } else if (Size < 3) { + AddCodeLine ("sta regsave"); + AddCodeLine ("stx regsave+1"); + } else { + AddCodeLine ("jsr saveeax"); + } + } + + for (I = 0; I < Count; ++I) { + DeferredOp* Op = CollAtUnchecked (&DeferredOps, I); + switch (Op->OpType) { + + case DOT_INC: + DoInc (&Op->Expr, OA_NEED_NONE); + break; + + case DOT_DEC: + DoDec (&Op->Expr, OA_NEED_NONE); + break; + } + xfree (&Op->Expr); + } + CollDeleteAll (&DeferredOps); + + /* Restore the content of EAX around the inc/dec */ + if ((Flags & SQP_KEEP_EAX) != 0 && ED_NeedsPrimary (Expr)) { + if (Size < 2) { + AddCodeLine ("pla"); + } else if (Size < 3) { + AddCodeLine ("lda regsave"); + AddCodeLine ("ldx regsave+1"); + } else { + AddCodeLine ("jsr resteax"); + } + } + + /* Restore the regs/processor flags around the inc/dec */ + if ((Flags & SQP_KEEP_TEST) != 0 && ED_NeedsTest (Expr)) { + /* Sufficient to pop the processor flags */ + AddCodeLine ("plp"); + } + + /* Expression has had side effects */ + Expr->Flags |= E_SIDE_EFFECTS; +} + + + +static unsigned FunctionArgList (FuncDesc* Func, int IsFastcall, ExprDesc* ED) +/* Parse the argument list of the called function and pass the arguments to it. +** Depending on several criteria, this may be done by just pushing into each +** parameter separately, or creating the parameter frame once and then storing +** arguments into this frame one by one. +** The function returns the size of the arguments pushed in bytes. +*/ +{ + ExprDesc Expr; /* Initialize variables */ SymEntry* Param = 0; /* Keep gcc silent */ - unsigned ParamSize = 0; /* Size of parameters pushed */ - unsigned ParamCount = 0; /* Number of parameters pushed */ + unsigned PushedSize = 0; /* Size of arguments pushed */ + unsigned PushedCount = 0; /* Number of arguments pushed */ unsigned FrameSize = 0; /* Size of parameter frame */ - unsigned FrameParams = 0; /* Number of params in frame */ + unsigned FrameParams = 0; /* Number of parameters in frame */ int FrameOffs = 0; /* Offset into parameter frame */ int Ellipsis = 0; /* Function is variadic */ + /* Make sure the size of all parameters are known */ + int ParamComplete = F_CheckParamList (Func, 1); + /* As an optimization, we may allocate the complete parameter frame at - ** once instead of pushing each parameter as it comes. We may do that, + ** once instead of pushing into each parameter as it comes. We may do that, ** if... ** ** - optimizations that increase code size are enabled (allocating the ** stack frame at once gives usually larger code). - ** - we have more than one parameter to push (don't count the last param - ** for __fastcall__ functions). + ** - we have more than one parameter to push into (don't count the last + ** parameter for __fastcall__ functions). ** ** The FrameSize variable will contain a value > 0 if storing into a frame ** (instead of pushing) is enabled. ** */ - if (IS_Get (&CodeSizeFactor) >= 200) { - + if (ParamComplete && IS_Get (&CodeSizeFactor) >= 200) { /* Calculate the number and size of the parameters */ FrameParams = Func->ParamCount; FrameSize = Func->ParamSize; if (FrameParams > 0 && IsFastcall) { - /* Last parameter is not pushed */ + /* Last parameter is not pushed into */ FrameSize -= CheckedSizeOf (Func->LastParam->Type); --FrameParams; } /* Do we have more than one parameter in the frame? */ if (FrameParams > 1) { - /* Okeydokey, setup the frame */ + /* Okeydokey, set up the frame */ FrameOffs = StackPtr; g_space (FrameSize); StackPtr -= FrameSize; @@ -332,25 +706,29 @@ static unsigned FunctionParamList (FuncDesc* Func, int IsFastcall) } } - /* Parse the actual parameter list */ + /* Parse the actual argument list */ while (CurTok.Tok != TOK_RPAREN) { + unsigned Flags; /* Code generator flags, not expression flags */ - unsigned Flags; + ED_Init (&Expr); + + /* This way, the info of the last parameter won't be cleared */ + Expr.Flags |= ED->Flags & E_MASK_KEEP_SUBEXPR; /* Count arguments */ - ++ParamCount; + ++PushedCount; /* Fetch the pointer to the next argument, check for too many args */ - if (ParamCount <= Func->ParamCount) { + if (PushedCount <= Func->ParamCount) { /* Beware: If there are parameters with identical names, they - ** cannot go into the same symbol table, which means that in this + ** cannot go into the same symbol table, which means that, in this ** case of errorneous input, the number of nodes in the symbol - ** table and ParamCount are NOT equal. We have to handle this case + ** table and PushedCount are NOT equal. We have to handle this case ** below to avoid segmentation violations. Since we know that this ** problem can only occur if there is more than one parameter, ** we will just use the last one. */ - if (ParamCount == 1) { + if (PushedCount == 1) { /* First argument */ Param = Func->SymTab->SymHead; } else if (Param->NextSym != 0) { @@ -359,95 +737,125 @@ static unsigned FunctionParamList (FuncDesc* Func, int IsFastcall) CHECK ((Param->Flags & SC_PARAM) != 0); } } else if (!Ellipsis) { - /* Too many arguments. Do we have an open param list? */ - if ((Func->Flags & FD_VARIADIC) == 0) { + /* Too many arguments. Do we have an open or empty param. list? */ + if ((Func->Flags & (FD_VARIADIC | FD_EMPTY)) == 0) { /* End of param list reached, no ellipsis */ Error ("Too many arguments in function call"); } - /* Assume an ellipsis even in case of errors to avoid an error + /* Assume an ellipsis even in case of errors, to avoid an error ** message for each other argument. */ Ellipsis = 1; } - /* Evaluate the parameter expression */ + /* Evaluate the argument expression */ hie1 (&Expr); - /* If we don't have an argument spec, accept anything, otherwise - ** convert the actual argument to the type needed. - */ - Flags = CF_NONE; - if (!Ellipsis) { - - /* Convert the argument to the parameter type if needed */ - TypeConversion (&Expr, Param->Type); - - /* If we have a prototype, chars may be pushed as chars */ - Flags |= CF_FORCECHAR; - - } else { - - /* No prototype available. Convert array to "pointer to first - ** element", and function to "pointer to function". + /* Skip to the next parameter if there are any incomplete types */ + if (ParamComplete) { + /* If we don't have an argument spec., accept anything; otherwise, + ** convert the actual argument to the type needed. */ - Expr.Type = PtrConversion (Expr.Type); + Flags = CF_NONE; + if (!Ellipsis) { - } + /* Convert the argument to the parameter type if needed */ + TypeConversion (&Expr, Param->Type); - /* Load the value into the primary if it is not already there */ - LoadExpr (Flags, &Expr); + /* If we have a prototype, chars may be pushed as chars */ + Flags |= CF_FORCECHAR; - /* Use the type of the argument for the push */ - Flags |= TypeOf (Expr.Type); - - /* If this is a fastcall function, don't push the last argument */ - if (ParamCount != Func->ParamCount || !IsFastcall) { - unsigned ArgSize = sizeofarg (Flags); - if (FrameSize > 0) { - /* We have the space already allocated, store in the frame. - ** Because of invalid type conversions (that have produced an - ** error before), we can end up here with a non-aligned stack - ** frame. Since no output will be generated anyway, handle - ** these cases gracefully instead of doing a CHECK. - */ - if (FrameSize >= ArgSize) { - FrameSize -= ArgSize; - } else { - FrameSize = 0; - } - FrameOffs -= ArgSize; - /* Store */ - g_putlocal (Flags | CF_NOKEEP, FrameOffs, Expr.IVal); } else { - /* Push the argument */ - g_push (Flags, Expr.IVal); + + /* No prototype available. Convert array to "pointer to first + ** element", function to "pointer to function" and do integral + ** promotion if necessary. + */ + TypeConversion (&Expr, StdConversion (Expr.Type)); + } - /* Calculate total parameter size */ - ParamSize += ArgSize; + /* Handle struct/union specially */ + if (IsClassStruct (Expr.Type)) { + /* Use the replacement type */ + Flags |= TypeOf (GetStructReplacementType (Expr.Type)); + + /* Load the value into the primary if it is not already there */ + LoadExpr (Flags, &Expr); + } else { + /* Load the value into the primary if it is not already there */ + LoadExpr (CF_NONE, &Expr); + + /* Use the type of the argument for the push */ + Flags |= TypeOf (Expr.Type); + } + + /* If this is a fastcall function, don't push the last argument */ + if ((CurTok.Tok == TOK_COMMA && NextTok.Tok != TOK_RPAREN) || !IsFastcall) { + unsigned ArgSize = sizeofarg (Flags); + + if (FrameSize > 0) { + /* We have the space already allocated, store in the frame. + ** Because of invalid type conversions (that have produced an + ** error before), we can end up here with a non-aligned stack + ** frame. Since no output will be generated anyway, handle + ** these cases gracefully instead of doing a CHECK. + */ + if (FrameSize >= ArgSize) { + FrameSize -= ArgSize; + } else { + FrameSize = 0; + } + FrameOffs -= ArgSize; + /* Store */ + g_putlocal (Flags | CF_NOKEEP, FrameOffs, Expr.IVal); + } else { + /* Push the argument */ + g_push (Flags, Expr.IVal); + } + + /* Calculate total parameter size */ + PushedSize += ArgSize; + } } + /* Propagate viral flags */ + ED_PropagateFrom (ED, &Expr); + /* Check for end of argument list */ if (CurTok.Tok != TOK_COMMA) { break; } NextToken (); + + /* Check for stray comma */ + if (CurTok.Tok == TOK_RPAREN) { + Error ("Argument expected after comma"); + break; + } + + DoDeferred (SQP_KEEP_NONE, &Expr); } - /* Check if we had enough parameters */ - if (ParamCount < Func->ParamCount) { + /* Append last deferred inc/dec before the function is called. + ** The last parameter needs to be preserved if it is passed in AX/EAX Regs. + */ + DoDeferred (IsFastcall && PushedCount > 0 ? SQP_KEEP_EAX : SQP_KEEP_NONE, &Expr); + + /* Check if we had enough arguments */ + if (PushedCount < Func->ParamCount) { Error ("Too few arguments in function call"); } - /* The function returns the size of all parameters pushed onto the stack. - ** However, if there are parameters missing (which is an error and was - ** flagged by the compiler) AND a stack frame was preallocated above, - ** we would loose track of the stackpointer and generate an internal error + /* The function returns the size of all arguments pushed onto the stack. + ** However, if there are parameters missed (which is an error, and was + ** flagged by the compiler), AND a stack frame was preallocated above, + ** we would lose track of the stackpointer, and generate an internal error ** later. So we correct the value by the parameters that should have been - ** pushed to avoid an internal compiler error. Since an error was + ** pushed into, to avoid an internal compiler error. Since an error was ** generated before, no code will be output anyway. */ - return ParamSize + FrameSize; + return PushedSize + FrameSize; } @@ -457,11 +865,12 @@ static void FunctionCall (ExprDesc* Expr) { FuncDesc* Func; /* Function descriptor */ int IsFuncPtr; /* Flag */ - unsigned ParamSize; /* Number of parameter bytes */ + unsigned ArgSize; /* Number of arguments bytes */ CodeMark Mark; int PtrOffs = 0; /* Offset of function pointer on stack */ - int IsFastcall = 0; /* True if it's a fast-call function */ + int IsFastcall = 0; /* True if we are fast-calling the function */ int PtrOnStack = 0; /* True if a pointer copy is on stack */ + const Type* ReturnType; /* Skip the left paren */ NextToken (); @@ -472,11 +881,14 @@ static void FunctionCall (ExprDesc* Expr) /* Handle function pointers transparently */ IsFuncPtr = IsTypeFuncPtr (Expr->Type); if (IsFuncPtr) { - /* Check whether it's a fastcall function that has parameters */ - IsFastcall = (Func->Flags & FD_VARIADIC) == 0 && Func->ParamCount > 0 && - (AutoCDecl ? - IsQualFastcall (Expr->Type + 1) : - !IsQualCDecl (Expr->Type + 1)); + /* Check whether it's a fastcall function that has parameters. + ** Note: if a function is forward-declared in the old K & R style, then + ** it may be called with any number of arguments, even though its + ** parameter count is zero. Handle K & R functions as though there are + ** parameters. + */ + IsFastcall = (Func->ParamCount > 0 || (Func->Flags & FD_EMPTY) != 0) && + IsFastcallFunc (Expr->Type + 1); /* Things may be difficult, depending on where the function pointer ** resides. If the function pointer is an expression of some sort @@ -486,14 +898,14 @@ static void FunctionCall (ExprDesc* Expr) ** For fastcall functions we do also need to place a copy of the ** pointer on stack, since we cannot use a/x. */ - PtrOnStack = IsFastcall || !ED_IsConst (Expr); + PtrOnStack = IsFastcall || !ED_IsConstAddr (Expr); if (PtrOnStack) { /* Not a global or local variable, or a fastcall function. Load ** the pointer into the primary and mark it as an expression. */ LoadExpr (CF_NONE, Expr); - ED_MakeRValExpr (Expr); + ED_FinalizeRValLoad (Expr); /* Remember the code position */ GetCodePos (&Mark); @@ -511,7 +923,7 @@ static void FunctionCall (ExprDesc* Expr) } /* Check for known standard functions and inline them */ - if (Expr->Name != 0) { + if (Expr->Name != 0 && !ED_IsUneval (Expr)) { int StdFunc = FindStdFunc ((const char*) Expr->Name); if (StdFunc >= 0) { /* Inline this function */ @@ -521,14 +933,12 @@ static void FunctionCall (ExprDesc* Expr) } /* If we didn't inline the function, get fastcall info */ - IsFastcall = (Func->Flags & FD_VARIADIC) == 0 && - (AutoCDecl ? - IsQualFastcall (Expr->Type) : - !IsQualCDecl (Expr->Type)); + IsFastcall = (Func->ParamCount > 0 || (Func->Flags & FD_EMPTY) != 0) && + IsFastcallFunc (Expr->Type); } - /* Parse the parameter list */ - ParamSize = FunctionParamList (Func, IsFastcall); + /* Parse the argument list and pass them to the called function */ + ArgSize = FunctionArgList (Func, IsFastcall, Expr); /* We need the closing paren here */ ConsumeRParen (); @@ -536,6 +946,10 @@ static void FunctionCall (ExprDesc* Expr) /* Special handling for function pointers */ if (IsFuncPtr) { + if (Func->WrappedCall) { + Warning ("Calling a wrapped function via a pointer, wrapped-call will not be used"); + } + /* If the function is not a fastcall function, load the pointer to ** the function into the primary. */ @@ -543,11 +957,11 @@ static void FunctionCall (ExprDesc* Expr) /* Not a fastcall function - we may use the primary */ if (PtrOnStack) { - /* If we have no parameters, the pointer is still in the + /* If we have no arguments, the pointer is still in the ** primary. Remove the code to push it and correct the ** stack pointer. */ - if (ParamSize == 0) { + if (ArgSize == 0) { RemoveCode (&Mark); PtrOnStack = 0; } else { @@ -560,7 +974,7 @@ static void FunctionCall (ExprDesc* Expr) } /* Call the function */ - g_callind (TypeOf (Expr->Type+1), ParamSize, PtrOffs); + g_callind (FuncTypeOf (Expr->Type+1), ArgSize, PtrOffs); } else { @@ -569,7 +983,7 @@ static void FunctionCall (ExprDesc* Expr) ** Since fastcall functions may never be variadic, we can use the ** index register for this purpose. */ - g_callind (CF_LOCAL, ParamSize, PtrOffs); + g_callind (CF_STACK, ArgSize, PtrOffs); } /* If we have a pointer on stack, remove it */ @@ -584,13 +998,75 @@ static void FunctionCall (ExprDesc* Expr) } else { /* Normal function */ - g_call (TypeOf (Expr->Type), (const char*) Expr->Name, ParamSize); + if (Func->WrappedCall) { + char tmp[64]; + StrBuf S = AUTO_STRBUF_INITIALIZER; + + if (Func->WrappedCallData == WRAPPED_CALL_USE_BANK) { + /* Store the bank attribute in tmp4 */ + SB_AppendStr (&S, "ldy #<.bank(_"); + SB_AppendStr (&S, (const char*) Expr->Name); + SB_AppendChar (&S, ')'); + } else { + /* Store the WrappedCall data in tmp4 */ + sprintf(tmp, "ldy #%u", Func->WrappedCallData); + SB_AppendStr (&S, tmp); + } + g_asmcode (&S); + SB_Clear(&S); + + SB_AppendStr (&S, "sty tmp4"); + g_asmcode (&S); + SB_Clear(&S); + + /* Store the original function address in ptr4 */ + SB_AppendStr (&S, "ldy #<(_"); + SB_AppendStr (&S, (const char*) Expr->Name); + SB_AppendChar (&S, ')'); + g_asmcode (&S); + SB_Clear(&S); + + SB_AppendStr (&S, "sty ptr4"); + g_asmcode (&S); + SB_Clear(&S); + + SB_AppendStr (&S, "ldy #>(_"); + SB_AppendStr (&S, (const char*) Expr->Name); + SB_AppendChar (&S, ')'); + g_asmcode (&S); + SB_Clear(&S); + + SB_AppendStr (&S, "sty ptr4+1"); + g_asmcode (&S); + SB_Clear(&S); + + SB_Done (&S); + + g_call (FuncTypeOf (Expr->Type), Func->WrappedCall->Name, ArgSize); + } else { + g_call (FuncTypeOf (Expr->Type), (const char*) Expr->Name, ArgSize); + } } /* The function result is an rvalue in the primary register */ - ED_MakeRValExpr (Expr); - Expr->Type = GetFuncReturn (Expr->Type); + ED_FinalizeRValLoad (Expr); + ReturnType = GetFuncReturn (Expr->Type); + + /* Handle struct/union specially */ + if (IsClassStruct (ReturnType)) { + /* If there is no replacement type, then it is just the address */ + if (ReturnType == GetStructReplacementType (ReturnType)) { + /* Dereference it */ + ED_IndExpr (Expr); + ED_MarkExprAsRVal (Expr); + } + } + + Expr->Type = ReturnType; + + /* We assume all function calls had side effects */ + Expr->Flags |= E_SIDE_EFFECTS; } @@ -600,23 +1076,20 @@ static void Primary (ExprDesc* E) { SymEntry* Sym; - /* Initialize fields in the expression stucture */ - ED_Init (E); - /* Character and integer constants. */ if (CurTok.Tok == TOK_ICONST || CurTok.Tok == TOK_CCONST) { - E->IVal = CurTok.IVal; - E->Flags = E_LOC_ABS | E_RTYPE_RVAL; - E->Type = CurTok.Type; + E->IVal = CurTok.IVal; + E->Flags |= E_LOC_NONE | E_RTYPE_RVAL; + E->Type = CurTok.Type; NextToken (); return; } /* Floating point constant */ if (CurTok.Tok == TOK_FCONST) { - E->FVal = CurTok.FVal; - E->Flags = E_LOC_ABS | E_RTYPE_RVAL; - E->Type = CurTok.Type; + E->V.FVal = CurTok.FVal; + E->Flags |= E_LOC_NONE | E_RTYPE_RVAL; + E->Type = CurTok.Type; NextToken (); return; } @@ -650,8 +1123,27 @@ static void Primary (ExprDesc* E) return; } + unsigned Flags = E->Flags & E_MASK_KEEP_MAKE; + switch (CurTok.Tok) { + case TOK_BOOL_AND: + /* A computed goto label address */ + if (IS_Get (&Standard) >= STD_CC65) { + SymEntry* Entry; + NextToken (); + Entry = AddLabelSym (CurTok.Ident, SC_REF | SC_GOTO_IND); + /* output its label */ + E->Flags = E_RTYPE_RVAL | E_LOC_CODE | E_ADDRESS_OF; + E->Name = Entry->V.L.Label; + E->Type = type_void_p; + NextToken (); + } else { + Error ("Computed gotos are a C extension, not supported with this --standard"); + ED_MakeConstAbsInt (E, 1); + } + break; + case TOK_IDENT: /* Identifier. Get a pointer to the symbol table entry */ Sym = E->Sym = FindSym (CurTok.Ident); @@ -664,12 +1156,12 @@ static void Primary (ExprDesc* E) /* Check for illegal symbol types */ CHECK ((Sym->Flags & SC_LABEL) != SC_LABEL); - if (Sym->Flags & SC_TYPE) { + if (Sym->Flags & SC_ESUTYPEMASK) { /* Cannot use type symbols */ Error ("Variable identifier expected"); /* Assume an int type to make E valid */ - E->Flags = E_LOC_STACK | E_RTYPE_LVAL; - E->Type = type_int; + E->Flags |= E_LOC_STACK | E_RTYPE_LVAL; + E->Type = type_int; return; } @@ -682,12 +1174,12 @@ static void Primary (ExprDesc* E) /* Check for legal symbol types */ if ((Sym->Flags & SC_CONST) == SC_CONST) { /* Enum or some other numeric constant */ - E->Flags = E_LOC_ABS | E_RTYPE_RVAL; + E->Flags = E_LOC_NONE | E_RTYPE_RVAL; E->IVal = Sym->V.ConstVal; } else if ((Sym->Flags & SC_FUNC) == SC_FUNC) { /* Function */ E->Flags = E_LOC_GLOBAL | E_RTYPE_LVAL; - E->Name = (unsigned long) Sym->Name; + E->Name = (uintptr_t) Sym->Name; } else if ((Sym->Flags & SC_AUTO) == SC_AUTO) { /* Local variable. If this is a parameter for a variadic ** function, we have to add some address calculations, and the @@ -708,12 +1200,12 @@ static void Primary (ExprDesc* E) E->Name = Sym->V.R.RegOffs; } else if ((Sym->Flags & SC_STATIC) == SC_STATIC) { /* Static variable */ - if (Sym->Flags & (SC_EXTERN | SC_STORAGE)) { + if (Sym->Flags & (SC_EXTERN | SC_STORAGE | SC_DECL)) { E->Flags = E_LOC_GLOBAL | E_RTYPE_LVAL; - E->Name = (unsigned long) Sym->Name; + E->Name = (uintptr_t) Sym->Name; } else { E->Flags = E_LOC_STATIC | E_RTYPE_LVAL; - E->Name = Sym->V.Label; + E->Name = Sym->V.L.Label; } } else { /* Local static variable */ @@ -723,12 +1215,12 @@ static void Primary (ExprDesc* E) /* We've made all variables lvalues above. However, this is ** not always correct: An array is actually the address of its - ** first element, which is a rvalue, and a function is a + ** first element, which is an rvalue, and a function is an ** rvalue, too, because we cannot store anything in a function. ** So fix the flags depending on the type. */ if (IsTypeArray (E->Type) || IsTypeFunc (E->Type)) { - ED_MakeRVal (E); + ED_AddrExpr (E); } } else { @@ -740,27 +1232,27 @@ static void Primary (ExprDesc* E) /* IDENT is either an auto-declared function or an undefined variable. */ if (CurTok.Tok == TOK_LPAREN) { - /* C99 doesn't allow calls to undefined functions, so + /* C99 doesn't allow calls to undeclared functions, so ** generate an error and otherwise a warning. Declare a ** function returning int. For that purpose, prepare a ** function signature for a function having an empty param ** list and returning int. */ if (IS_Get (&Standard) >= STD_C99) { - Error ("Call to undefined function `%s'", Ident); + Error ("Call to undeclared function '%s'", Ident); } else { - Warning ("Call to undefined function `%s'", Ident); + Warning ("Call to undeclared function '%s'", Ident); } Sym = AddGlobalSym (Ident, GetImplicitFuncType(), SC_EXTERN | SC_REF | SC_FUNC); E->Type = Sym->Type; E->Flags = E_LOC_GLOBAL | E_RTYPE_RVAL; - E->Name = (unsigned long) Sym->Name; + E->Name = (uintptr_t) Sym->Name; } else { /* Undeclared Variable */ Sym = AddLocalSym (Ident, type_int, SC_AUTO | SC_REF, 0); E->Flags = E_LOC_STACK | E_RTYPE_LVAL; E->Type = type_int; - Error ("Undefined symbol: `%s'", Ident); + Error ("Undefined symbol: '%s'", Ident); } } @@ -769,9 +1261,13 @@ static void Primary (ExprDesc* E) case TOK_SCONST: case TOK_WCSCONST: /* String literal */ - E->LVal = UseLiteral (CurTok.SVal); + if ((Flags & E_EVAL_UNEVAL) != E_EVAL_UNEVAL) { + E->V.LVal = UseLiteral (CurTok.SVal); + } else { + E->V.LVal = CurTok.SVal; + } E->Type = GetCharArrayType (GetLiteralSize (CurTok.SVal)); - E->Flags = E_LOC_LITERAL | E_RTYPE_RVAL; + E->Flags = E_LOC_LITERAL | E_RTYPE_RVAL | E_ADDRESS_OF; E->IVal = 0; E->Name = GetLiteralLabel (CurTok.SVal); NextToken (); @@ -780,7 +1276,7 @@ static void Primary (ExprDesc* E) case TOK_ASM: /* ASM statement */ AsmStatement (); - E->Flags = E_LOC_EXPR | E_RTYPE_RVAL; + E->Flags = E_RTYPE_RVAL | E_EVAL_MAYBE_UNUSED | E_SIDE_EFFECTS; E->Type = type_void; break; @@ -809,310 +1305,58 @@ static void Primary (ExprDesc* E) /* Illegal primary. Be sure to skip the token to avoid endless ** error loops. */ - Error ("Expression expected"); - NextToken (); + if (CurTok.Tok == TOK_LCURLY) { + /* Statement block */ + NextToken (); + Error ("Expression expected"); + E->Flags |= E_EVAL_MAYBE_UNUSED; + hie0 (E); + if (CurTok.Tok == TOK_RCURLY) { + NextToken (); + } + break; + } else { + /* Let's see if this is a C99-style declaration */ + DeclSpec Spec; + InitDeclSpec (&Spec); + ParseDeclSpec (&Spec, -1, T_QUAL_NONE); + + if (Spec.Type->C != T_END) { + + Error ("Mixed declarations and code are not supported in cc65"); + while (CurTok.Tok != TOK_SEMI) { + Declaration Decl; + + /* Parse one declaration */ + ParseDecl (&Spec, &Decl, DM_ACCEPT_IDENT); + if (CurTok.Tok == TOK_ASSIGN) { + NextToken (); + ParseInit (Decl.Type); + } + if (CurTok.Tok == TOK_COMMA) { + NextToken (); + } else { + break; + } + } + } else { + Error ("Expression expected"); + E->Flags |= E_EVAL_MAYBE_UNUSED; + NextToken (); + } + } ED_MakeConstAbsInt (E, 1); break; } -} - - -static void ArrayRef (ExprDesc* Expr) -/* Handle an array reference. This function needs a rewrite. */ -{ - int ConstBaseAddr; - ExprDesc Subscript; - CodeMark Mark1; - CodeMark Mark2; - TypeCode Qualifiers; - Type* ElementType; - Type* tptr1; - - - /* Skip the bracket */ - NextToken (); - - /* Get the type of left side */ - tptr1 = Expr->Type; - - /* We can apply a special treatment for arrays that have a const base - ** address. This is true for most arrays and will produce a lot better - ** code. Check if this is a const base address. - */ - ConstBaseAddr = ED_IsRVal (Expr) && - (ED_IsLocConst (Expr) || ED_IsLocStack (Expr)); - - /* If we have a constant base, we delay the address fetch */ - GetCodePos (&Mark1); - if (!ConstBaseAddr) { - /* Get a pointer to the array into the primary */ - LoadExpr (CF_NONE, Expr); - - /* Get the array pointer on stack. Do not push more than 16 - ** bit, even if this value is greater, since we cannot handle - ** other than 16bit stuff when doing indexing. - */ - GetCodePos (&Mark2); - g_push (CF_PTR, 0); - } - - /* TOS now contains ptr to array elements. Get the subscript. */ - MarkedExprWithCheck (hie0, &Subscript); - - /* Check the types of array and subscript. We can either have a - ** pointer/array to the left, in which case the subscript must be of an - ** integer type, or we have an integer to the left, in which case the - ** subscript must be a pointer/array. - ** Since we do the necessary checking here, we can rely later on the - ** correct types. - */ - Qualifiers = T_QUAL_NONE; - if (IsClassPtr (Expr->Type)) { - if (!IsClassInt (Subscript.Type)) { - Error ("Array subscript is not an integer"); - /* To avoid any compiler errors, make the expression a valid int */ - ED_MakeConstAbsInt (&Subscript, 0); - } - if (IsTypeArray (Expr->Type)) { - Qualifiers = GetQualifier (Expr->Type); - } - ElementType = Indirect (Expr->Type); - } else if (IsClassInt (Expr->Type)) { - if (!IsClassPtr (Subscript.Type)) { - Error ("Subscripted value is neither array nor pointer"); - /* To avoid compiler errors, make the subscript a char[] at - ** address 0. - */ - ED_MakeConstAbs (&Subscript, 0, GetCharArrayType (1)); - } else if (IsTypeArray (Subscript.Type)) { - Qualifiers = GetQualifier (Subscript.Type); - } - ElementType = Indirect (Subscript.Type); - } else { - Error ("Cannot subscript"); - /* To avoid compiler errors, fake both the array and the subscript, so - ** we can just proceed. - */ - ED_MakeConstAbs (Expr, 0, GetCharArrayType (1)); - ED_MakeConstAbsInt (&Subscript, 0); - ElementType = Indirect (Expr->Type); - } - - /* The element type has the combined qualifiers from itself and the array, - ** it is a member of (if any). - */ - if (GetQualifier (ElementType) != (GetQualifier (ElementType) | Qualifiers)) { - ElementType = TypeDup (ElementType); - ElementType->C |= Qualifiers; - } - - /* If the subscript is a bit-field, load it and make it an rvalue */ - if (ED_IsBitField (&Subscript)) { - LoadExpr (CF_NONE, &Subscript); - ED_MakeRValExpr (&Subscript); - } - - /* Check if the subscript is constant absolute value */ - if (ED_IsConstAbs (&Subscript) && ED_CodeRangeIsEmpty (&Subscript)) { - - /* The array subscript is a numeric constant. If we had pushed the - ** array base address onto the stack before, we can remove this value, - ** since we can generate expression+offset. - */ - if (!ConstBaseAddr) { - RemoveCode (&Mark2); - } else { - /* Get an array pointer into the primary */ - LoadExpr (CF_NONE, Expr); - } - - if (IsClassPtr (Expr->Type)) { - - /* Lhs is pointer/array. Scale the subscript value according to - ** the element size. - */ - Subscript.IVal *= CheckedSizeOf (ElementType); - - /* Remove the address load code */ - RemoveCode (&Mark1); - - /* In case of an array, we can adjust the offset of the expression - ** already in Expr. If the base address was a constant, we can even - ** remove the code that loaded the address into the primary. - */ - if (IsTypeArray (Expr->Type)) { - - /* Adjust the offset */ - Expr->IVal += Subscript.IVal; - - } else { - - /* It's a pointer, so we do have to load it into the primary - ** first (if it's not already there). - */ - if (ConstBaseAddr || ED_IsLVal (Expr)) { - LoadExpr (CF_NONE, Expr); - ED_MakeRValExpr (Expr); - } - - /* Use the offset */ - Expr->IVal = Subscript.IVal; - } - - } else { - - /* Scale the rhs value according to the element type */ - g_scale (TypeOf (tptr1), CheckedSizeOf (ElementType)); - - /* Add the subscript. Since arrays are indexed by integers, - ** we will ignore the true type of the subscript here and - ** use always an int. #### Use offset but beware of LoadExpr! - */ - g_inc (CF_INT | CF_CONST, Subscript.IVal); - - } - - } else { - - /* Array subscript is not constant. Load it into the primary */ - GetCodePos (&Mark2); - LoadExpr (CF_NONE, &Subscript); - - /* Do scaling */ - if (IsClassPtr (Expr->Type)) { - - /* Indexing is based on unsigneds, so we will just use the integer - ** portion of the index (which is in (e)ax, so there's no further - ** action required). - */ - g_scale (CF_INT, CheckedSizeOf (ElementType)); - - } else { - - /* Get the int value on top. If we come here, we're sure, both - ** values are 16 bit (the first one was truncated if necessary - ** and the second one is a pointer). Note: If ConstBaseAddr is - ** true, we don't have a value on stack, so to "swap" both, just - ** push the subscript. - */ - if (ConstBaseAddr) { - g_push (CF_INT, 0); - LoadExpr (CF_NONE, Expr); - ConstBaseAddr = 0; - } else { - g_swap (CF_INT); - } - - /* Scale it */ - g_scale (TypeOf (tptr1), CheckedSizeOf (ElementType)); - - } - - /* The offset is now in the primary register. It we didn't have a - ** constant base address for the lhs, the lhs address is already - ** on stack, and we must add the offset. If the base address was - ** constant, we call special functions to add the address to the - ** offset value. - */ - if (!ConstBaseAddr) { - - /* The array base address is on stack and the subscript is in the - ** primary. Add both. - */ - g_add (CF_INT, 0); - - } else { - - /* The subscript is in the primary, and the array base address is - ** in Expr. If the subscript has itself a constant address, it is - ** often a better idea to reverse again the order of the - ** evaluation. This will generate better code if the subscript is - ** a byte sized variable. But beware: This is only possible if the - ** subscript was not scaled, that is, if this was a byte array - ** or pointer. - */ - if ((ED_IsLocConst (&Subscript) || ED_IsLocStack (&Subscript)) && - CheckedSizeOf (ElementType) == SIZEOF_CHAR) { - - unsigned Flags; - - /* Reverse the order of evaluation */ - if (CheckedSizeOf (Subscript.Type) == SIZEOF_CHAR) { - Flags = CF_CHAR; - } else { - Flags = CF_INT; - } - RemoveCode (&Mark2); - - /* Get a pointer to the array into the primary. */ - LoadExpr (CF_NONE, Expr); - - /* Add the variable */ - if (ED_IsLocStack (&Subscript)) { - g_addlocal (Flags, Subscript.IVal); - } else { - Flags |= GlobalModeFlags (&Subscript); - g_addstatic (Flags, Subscript.Name, Subscript.IVal); - } - } else { - - if (ED_IsLocAbs (Expr)) { - /* Constant numeric address. Just add it */ - g_inc (CF_INT, Expr->IVal); - } else if (ED_IsLocStack (Expr)) { - /* Base address is a local variable address */ - if (IsTypeArray (Expr->Type)) { - g_addaddr_local (CF_INT, Expr->IVal); - } else { - g_addlocal (CF_PTR, Expr->IVal); - } - } else { - /* Base address is a static variable address */ - unsigned Flags = CF_INT | GlobalModeFlags (Expr); - if (ED_IsRVal (Expr)) { - /* Add the address of the location */ - g_addaddr_static (Flags, Expr->Name, Expr->IVal); - } else { - /* Add the contents of the location */ - g_addstatic (Flags, Expr->Name, Expr->IVal); - } - } - } - - - } - - /* The result is an expression in the primary */ - ED_MakeRValExpr (Expr); - - } - - /* Result is of element type */ - Expr->Type = ElementType; - - /* An array element is actually a variable. So the rules for variables - ** with respect to the reference type apply: If it's an array, it is - ** a rvalue, otherwise it's an lvalue. (A function would also be a rvalue, - ** but an array cannot contain functions). - */ - if (IsTypeArray (Expr->Type)) { - ED_MakeRVal (Expr); - } else { - ED_MakeLVal (Expr); - } - - /* Consume the closing bracket */ - ConsumeRBrack (); + E->Flags |= Flags; } static void StructRef (ExprDesc* Expr) -/* Process struct field after . or ->. */ +/* Process struct/union field after . or ->. */ { - ident Ident; - SymEntry* Field; Type* FinalType; TypeCode Q; @@ -1125,78 +1369,109 @@ static void StructRef (ExprDesc* Expr) return; } - /* Get the symbol table entry and check for a struct field */ - strcpy (Ident, CurTok.Ident); + /* Get the symbol table entry and check for a struct/union field */ NextToken (); - Field = FindStructField (Expr->Type, Ident); - if (Field == 0) { - Error ("Struct/union has no field named `%s'", Ident); + const SymEntry Field = FindStructField (Expr->Type, CurTok.Ident); + if (Field.Type == 0) { + Error ("No field named '%s' found in '%s'", CurTok.Ident, GetFullTypeName (Expr->Type)); /* Make the expression an integer at address zero */ ED_MakeConstAbs (Expr, 0, type_int); return; } - /* If we have a struct pointer that is an lvalue and not already in the - ** primary, load it now. - */ - if (ED_IsLVal (Expr) && IsTypePtr (Expr->Type)) { + if (IsTypePtr (Expr->Type)) { - /* Load into the primary */ + /* pointer->field */ + if (!ED_IsQuasiConst (Expr) && !ED_IsLocPrimary (Expr)) { + /* If we have a non-const struct/union pointer that is not in the + ** primary yet, load its content now to get the base address. + */ + LoadExpr (CF_NONE, Expr); + ED_FinalizeRValLoad (Expr); + } + /* Dereference the address expression */ + ED_IndExpr (Expr); + + } else if (ED_IsRVal (Expr) && + ED_IsLocPrimary (Expr) && + Expr->Type == GetStructReplacementType (Expr->Type)) { + + /* A struct/union is usually an lvalue. If not, it is a struct/union + ** passed in the primary register, which is usually the result returned + ** from a function. However, it is possible that this rvalue is the + ** result of certain kind of operations on an lvalue such as assignment, + ** and there are no reasons to disallow such use cases. So we just rely + ** on the check upon function returns to catch the unsupported cases and + ** dereference the rvalue address of the struct/union here all the time. + */ + ED_IndExpr (Expr); + + } else if (!ED_IsLocQuasiConst (Expr) && !ED_IsLocPrimaryOrExpr (Expr)) { + /* Load the base address into the primary (and use it as a reference + ** later) if it's not quasi-const or in the primary already. + */ LoadExpr (CF_NONE, Expr); - - /* Make it an lvalue expression */ - ED_MakeLValExpr (Expr); } - /* The type is the type of the field plus any qualifiers from the struct */ + /* Clear the tested flag set during loading */ + ED_MarkAsUntested (Expr); + + /* The type is the field type plus any qualifiers from the struct/union */ if (IsClassStruct (Expr->Type)) { Q = GetQualifier (Expr->Type); } else { Q = GetQualifier (Indirect (Expr->Type)); } - if (GetQualifier (Field->Type) == (GetQualifier (Field->Type) | Q)) { - FinalType = Field->Type; + if (GetQualifier (Field.Type) == (GetQualifier (Field.Type) | Q)) { + FinalType = Field.Type; } else { - FinalType = TypeDup (Field->Type); + FinalType = TypeDup (Field.Type); FinalType->C |= Q; } - /* A struct is usually an lvalue. If not, it is a struct in the primary - ** register. - */ - if (ED_IsRVal (Expr) && ED_IsLocExpr (Expr) && !IsTypePtr (Expr->Type)) { + if (ED_IsRVal (Expr) && ED_IsLocPrimary (Expr) && !IsTypePtr (Expr->Type)) { unsigned Flags = 0; unsigned BitOffs; /* Get the size of the type */ - unsigned Size = SizeOf (Expr->Type); + unsigned StructSize = SizeOf (Expr->Type); + unsigned FieldSize = SizeOf (Field.Type); /* Safety check */ - CHECK (Field->V.Offs + Size <= SIZEOF_LONG); + CHECK (Field.V.Offs + FieldSize <= StructSize); - /* The type of the operation depends on the type of the struct */ - switch (Size) { - case 1: Flags = CF_CHAR | CF_UNSIGNED | CF_CONST; break; - case 2: Flags = CF_INT | CF_UNSIGNED | CF_CONST; break; - case 3: /* FALLTHROUGH */ - case 4: Flags = CF_LONG | CF_UNSIGNED | CF_CONST; break; - default: Internal ("Invalid struct size: %u", Size); break; + /* The type of the operation depends on the type of the struct/union */ + switch (StructSize) { + case 1: + Flags = CF_CHAR | CF_UNSIGNED | CF_CONST; + break; + case 2: + Flags = CF_INT | CF_UNSIGNED | CF_CONST; + break; + case 3: + /* FALLTHROUGH */ + case 4: + Flags = CF_LONG | CF_UNSIGNED | CF_CONST; + break; + default: + Internal ("Invalid '%s' size: %u", GetFullTypeName (Expr->Type), StructSize); + break; } /* Generate a shift to get the field in the proper position in the ** primary. For bit fields, mask the value. */ - BitOffs = Field->V.Offs * CHAR_BITS; - if (SymIsBitField (Field)) { - BitOffs += Field->V.B.BitOffs; + BitOffs = Field.V.Offs * CHAR_BITS; + if (SymIsBitField (&Field)) { + BitOffs += Field.Type->A.B.Offs; g_asr (Flags, BitOffs); /* Mask the value. This is unnecessary if the shift executed above ** moved only zeroes into the value. */ - if (BitOffs + Field->V.B.BitWidth != Size * CHAR_BITS) { + if (BitOffs + Field.Type->A.B.Width != FieldSize * CHAR_BITS) { g_and (CF_INT | CF_UNSIGNED | CF_CONST, - (0x0001U << Field->V.B.BitWidth) - 1U); + (0x0001U << Field.Type->A.B.Width) - 1U); } } else { g_asr (Flags, BitOffs); @@ -1207,29 +1482,23 @@ static void StructRef (ExprDesc* Expr) } else { - /* Set the struct field offset */ - Expr->IVal += Field->V.Offs; + /* Set the struct/union field offset */ + Expr->IVal += Field.V.Offs; /* Use the new type */ Expr->Type = FinalType; - /* An struct member is actually a variable. So the rules for variables - ** with respect to the reference type apply: If it's an array, it is - ** a rvalue, otherwise it's an lvalue. (A function would also be a rvalue, - ** but a struct field cannot be a function). + /* The usual rules for variables with respect to the reference types + ** apply to struct/union fields as well: If a field is an array, it is + ** virtually an rvalue address, otherwise it's an lvalue reference. (A + ** function would also be an rvalue address, but a struct/union cannot + ** contain functions). */ if (IsTypeArray (Expr->Type)) { - ED_MakeRVal (Expr); - } else { - ED_MakeLVal (Expr); + ED_AddrExpr (Expr); } - /* Make the expression a bit field if necessary */ - if (SymIsBitField (Field)) { - ED_MakeBitField (Expr, Field->V.B.BitOffs, Field->V.B.BitWidth); - } } - } @@ -1244,14 +1513,15 @@ static void hie11 (ExprDesc *Expr) Primary (Expr); /* Check for a rhs */ - while (CurTok.Tok == TOK_LBRACK || CurTok.Tok == TOK_LPAREN || + while (CurTok.Tok == TOK_INC || CurTok.Tok == TOK_DEC || + CurTok.Tok == TOK_LBRACK || CurTok.Tok == TOK_LPAREN || CurTok.Tok == TOK_DOT || CurTok.Tok == TOK_PTR_REF) { switch (CurTok.Tok) { case TOK_LBRACK: /* Array reference */ - ArrayRef (Expr); + parseadd (Expr, 1); break; case TOK_LPAREN: @@ -1264,7 +1534,7 @@ static void hie11 (ExprDesc *Expr) ** Since we don't have a name, invent one. */ ED_MakeConstAbs (Expr, 0, GetImplicitFuncType ()); - Expr->Name = (long) IllegalFunc; + Expr->Name = (uintptr_t) IllegalFunc; } /* Call the function */ FunctionCall (Expr); @@ -1272,7 +1542,7 @@ static void hie11 (ExprDesc *Expr) case TOK_DOT: if (!IsClassStruct (Expr->Type)) { - Error ("Struct expected"); + Error ("Struct or union expected"); } StructRef (Expr); break; @@ -1283,11 +1553,19 @@ static void hie11 (ExprDesc *Expr) Expr->Type = ArrayToPtr (Expr->Type); } if (!IsClassPtr (Expr->Type) || !IsClassStruct (Indirect (Expr->Type))) { - Error ("Struct pointer expected"); + Error ("Struct pointer or union pointer expected"); } StructRef (Expr); break; + case TOK_INC: + PostInc (Expr); + break; + + case TOK_DEC: + PostDec (Expr); + break; + default: Internal ("Invalid token in hie11: %d", CurTok.Tok); @@ -1317,23 +1595,18 @@ void Store (ExprDesc* Expr, const Type* StoreType) switch (ED_GetLoc (Expr)) { case E_LOC_ABS: - /* Absolute: numeric address or const */ + /* Absolute numeric addressed variable */ g_putstatic (Flags, Expr->IVal, 0); break; case E_LOC_GLOBAL: - /* Global variable */ - g_putstatic (Flags, Expr->Name, Expr->IVal); - break; - case E_LOC_STATIC: - case E_LOC_LITERAL: - /* Static variable or literal in the literal pool */ - g_putstatic (Flags, Expr->Name, Expr->IVal); - break; - case E_LOC_REGISTER: - /* Register variable */ + case E_LOC_LITERAL: + case E_LOC_CODE: + /* Global variabl, static variable, register variable, pooled + ** literal or code label location. + */ g_putstatic (Flags, Expr->Name, Expr->IVal); break; @@ -1347,10 +1620,14 @@ void Store (ExprDesc* Expr, const Type* StoreType) break; case E_LOC_EXPR: - /* An expression in the primary register */ + /* An expression referenced in the primary register */ g_putind (Flags, Expr->IVal); break; + case E_LOC_NONE: + /* We may get here as a result of previous compiler errors */ + break; + default: Internal ("Invalid location in Store(): 0x%04X", ED_GetLoc (Expr)); } @@ -1364,9 +1641,6 @@ void Store (ExprDesc* Expr, const Type* StoreType) static void PreInc (ExprDesc* Expr) /* Handle the preincrement operators */ { - unsigned Flags; - unsigned long Val; - /* Skip the operator token */ NextToken (); @@ -1382,57 +1656,14 @@ static void PreInc (ExprDesc* Expr) Error ("Increment of read-only variable"); } - /* Get the data type */ - Flags = TypeOf (Expr->Type) | GlobalModeFlags (Expr) | CF_FORCECHAR | CF_CONST; - - /* Get the increment value in bytes */ - Val = IsTypePtr (Expr->Type)? CheckedPSizeOf (Expr->Type) : 1; - - /* Check the location of the data */ - switch (ED_GetLoc (Expr)) { - - case E_LOC_ABS: - /* Absolute: numeric address or const */ - g_addeqstatic (Flags, Expr->IVal, 0, Val); - break; - - case E_LOC_GLOBAL: - /* Global variable */ - g_addeqstatic (Flags, Expr->Name, Expr->IVal, Val); - break; - - case E_LOC_STATIC: - case E_LOC_LITERAL: - /* Static variable or literal in the literal pool */ - g_addeqstatic (Flags, Expr->Name, Expr->IVal, Val); - break; - - case E_LOC_REGISTER: - /* Register variable */ - g_addeqstatic (Flags, Expr->Name, Expr->IVal, Val); - break; - - case E_LOC_STACK: - /* Value on the stack */ - g_addeqlocal (Flags, Expr->IVal, Val); - break; - - case E_LOC_PRIMARY: - /* The primary register */ - g_inc (Flags, Val); - break; - - case E_LOC_EXPR: - /* An expression in the primary register */ - g_addeqind (Flags, Expr->IVal, Val); - break; - - default: - Internal ("Invalid location in PreInc(): 0x%04X", ED_GetLoc (Expr)); - } + /* Do the increment */ + DoInc (Expr, OA_NEED_NEW); /* Result is an expression, no reference */ - ED_MakeRValExpr (Expr); + ED_FinalizeRValLoad (Expr); + + /* Expression has had side effects */ + Expr->Flags |= E_SIDE_EFFECTS; } @@ -1440,9 +1671,6 @@ static void PreInc (ExprDesc* Expr) static void PreDec (ExprDesc* Expr) /* Handle the predecrement operators */ { - unsigned Flags; - unsigned long Val; - /* Skip the operator token */ NextToken (); @@ -1458,57 +1686,14 @@ static void PreDec (ExprDesc* Expr) Error ("Decrement of read-only variable"); } - /* Get the data type */ - Flags = TypeOf (Expr->Type) | GlobalModeFlags (Expr) | CF_FORCECHAR | CF_CONST; - - /* Get the increment value in bytes */ - Val = IsTypePtr (Expr->Type)? CheckedPSizeOf (Expr->Type) : 1; - - /* Check the location of the data */ - switch (ED_GetLoc (Expr)) { - - case E_LOC_ABS: - /* Absolute: numeric address or const */ - g_subeqstatic (Flags, Expr->IVal, 0, Val); - break; - - case E_LOC_GLOBAL: - /* Global variable */ - g_subeqstatic (Flags, Expr->Name, Expr->IVal, Val); - break; - - case E_LOC_STATIC: - case E_LOC_LITERAL: - /* Static variable or literal in the literal pool */ - g_subeqstatic (Flags, Expr->Name, Expr->IVal, Val); - break; - - case E_LOC_REGISTER: - /* Register variable */ - g_subeqstatic (Flags, Expr->Name, Expr->IVal, Val); - break; - - case E_LOC_STACK: - /* Value on the stack */ - g_subeqlocal (Flags, Expr->IVal, Val); - break; - - case E_LOC_PRIMARY: - /* The primary register */ - g_inc (Flags, Val); - break; - - case E_LOC_EXPR: - /* An expression in the primary register */ - g_subeqind (Flags, Expr->IVal, Val); - break; - - default: - Internal ("Invalid location in PreDec(): 0x%04X", ED_GetLoc (Expr)); - } + /* Do the decrement */ + DoDec (Expr, OA_NEED_NEW); /* Result is an expression, no reference */ - ED_MakeRValExpr (Expr); + ED_FinalizeRValLoad (Expr); + + /* Expression has had side effects */ + Expr->Flags |= E_SIDE_EFFECTS; } @@ -1534,28 +1719,42 @@ static void PostInc (ExprDesc* Expr) /* Get the data type */ Flags = TypeOf (Expr->Type); - /* Push the address if needed */ - PushAddr (Expr); + /* We are allowed by the C standard to defer the inc operation until after + ** the expression is used, so that we don't need to save and reload + ** the original value. + */ - /* Fetch the value and save it (since it's the result of the expression) */ - LoadExpr (CF_NONE, Expr); - g_save (Flags | CF_FORCECHAR); + /* Emit smaller code if a char variable is at a constant location */ + if ((Flags & CF_TYPEMASK) == CF_CHAR && ED_IsLocConst (Expr) && !IsTypeBitField (Expr->Type)) { + + LoadExpr (CF_NONE, Expr); + AddCodeLine ("inc %s", ED_GetLabelName (Expr, 0)); + + /* Expression has had side effects */ + Expr->Flags |= E_SIDE_EFFECTS; - /* If we have a pointer expression, increment by the size of the type */ - if (IsTypePtr (Expr->Type)) { - g_inc (Flags | CF_CONST | CF_FORCECHAR, CheckedSizeOf (Expr->Type + 1)); } else { - g_inc (Flags | CF_CONST | CF_FORCECHAR, 1); + + if (ED_IsLocPrimaryOrExpr (Expr)) { + + /* Do the increment */ + DoInc (Expr, OA_NEED_OLD); + + /* Expression has had side effects */ + Expr->Flags |= E_SIDE_EFFECTS; + + } else { + + /* Defer the increment until after the value of this expression is used */ + DeferInc (Expr); + + /* Just return */ + return; + } } - /* Store the result back */ - Store (Expr, 0); - - /* Restore the original value in the primary register */ - g_restore (Flags | CF_FORCECHAR); - /* The result is always an expression, no reference */ - ED_MakeRValExpr (Expr); + ED_FinalizeRValLoad (Expr); } @@ -1567,7 +1766,7 @@ static void PostDec (ExprDesc* Expr) NextToken (); - /* The expression to increment must be an lvalue */ + /* The expression to decrement must be an lvalue */ if (!ED_IsLVal (Expr)) { Error ("Invalid lvalue"); return; @@ -1581,28 +1780,37 @@ static void PostDec (ExprDesc* Expr) /* Get the data type */ Flags = TypeOf (Expr->Type); - /* Push the address if needed */ - PushAddr (Expr); + /* Emit smaller code if a char variable is at a constant location */ + if ((Flags & CF_TYPEMASK) == CF_CHAR && ED_IsLocConst (Expr) && !IsTypeBitField (Expr->Type)) { - /* Fetch the value and save it (since it's the result of the expression) */ - LoadExpr (CF_NONE, Expr); - g_save (Flags | CF_FORCECHAR); + LoadExpr (CF_NONE, Expr); + AddCodeLine ("dec %s", ED_GetLabelName (Expr, 0)); + + /* Expression has had side effects */ + Expr->Flags |= E_SIDE_EFFECTS; - /* If we have a pointer expression, increment by the size of the type */ - if (IsTypePtr (Expr->Type)) { - g_dec (Flags | CF_CONST | CF_FORCECHAR, CheckedSizeOf (Expr->Type + 1)); } else { - g_dec (Flags | CF_CONST | CF_FORCECHAR, 1); + + if (ED_IsLocPrimaryOrExpr (Expr)) { + + /* Do the decrement */ + DoDec (Expr, OA_NEED_OLD); + + /* Expression has had side effects */ + Expr->Flags |= E_SIDE_EFFECTS; + + } else { + + /* Defer the decrement until after the value of this expression is used */ + DeferDec (Expr); + + /* Just return */ + return; + } } - /* Store the result back */ - Store (Expr, 0); - - /* Restore the original value in the primary register */ - g_restore (Flags | CF_FORCECHAR); - /* The result is always an expression, no reference */ - ED_MakeRValExpr (Expr); + ED_FinalizeRValLoad (Expr); } @@ -1610,8 +1818,6 @@ static void PostDec (ExprDesc* Expr) static void UnaryOp (ExprDesc* Expr) /* Handle unary -/+ and ~ */ { - unsigned Flags; - /* Remember the operator token and skip it */ token_t Tok = CurTok.Tok; NextToken (); @@ -1625,20 +1831,33 @@ static void UnaryOp (ExprDesc* Expr) ED_MakeConstAbsInt (Expr, 1); } - /* Check for a constant expression */ + /* Check for a constant numeric expression */ if (ED_IsConstAbs (Expr)) { - /* Value is constant */ + /* Value is numeric */ switch (Tok) { case TOK_MINUS: Expr->IVal = -Expr->IVal; break; case TOK_PLUS: break; case TOK_COMP: Expr->IVal = ~Expr->IVal; break; default: Internal ("Unexpected token: %d", Tok); } + + /* Adjust the type of the expression */ + Expr->Type = IntPromotion (Expr->Type); + + /* Limit the calculated value to the range of its type */ + LimitExprValue (Expr); + } else { + unsigned Flags; + /* Value is not constant */ LoadExpr (CF_NONE, Expr); - /* Get the type of the expression */ + /* Adjust the type of the expression */ + Expr->Type = IntPromotion (Expr->Type); + TypeConversion (Expr, Expr->Type); + + /* Get code generation flags */ Flags = TypeOf (Expr->Type); /* Handle the operation */ @@ -1649,8 +1868,8 @@ static void UnaryOp (ExprDesc* Expr) default: Internal ("Unexpected token: %d", Tok); } - /* The result is a rvalue in the primary */ - ED_MakeRValExpr (Expr); + /* The result is an rvalue in the primary */ + ED_FinalizeRValLoad (Expr); } } @@ -1679,26 +1898,28 @@ void hie10 (ExprDesc* Expr) case TOK_BOOL_NOT: NextToken (); - if (evalexpr (CF_NONE, hie10, Expr) == 0) { - /* Constant expression */ + BoolExpr (hie10, Expr); + if (ED_IsConstAbs (Expr)) { + /* Constant numeric expression */ Expr->IVal = !Expr->IVal; + } else if (ED_IsAddrExpr (Expr)) { + /* Address != NULL, so !Address == 0 */ + ED_MakeConstBool (Expr, 0); } else { + /* Not constant, load into the primary */ + LoadExpr (CF_NONE, Expr); g_bneg (TypeOf (Expr->Type)); - ED_MakeRValExpr (Expr); + ED_FinalizeRValLoad (Expr); ED_TestDone (Expr); /* bneg will set cc */ } + /* The result type is always boolean */ + Expr->Type = type_bool; break; case TOK_STAR: NextToken (); ExprWithCheck (hie10, Expr); - if (ED_IsLVal (Expr) || !(ED_IsLocConst (Expr) || ED_IsLocStack (Expr))) { - /* Not a const, load it into the primary and make it a - ** calculated value. - */ - LoadExpr (CF_NONE, Expr); - ED_MakeRValExpr (Expr); - } + /* If the expression is already a pointer to function, the ** additional dereferencing operator must be ignored. A function ** itself is represented as "pointer to function", so any number @@ -1707,8 +1928,16 @@ void hie10 (ExprDesc* Expr) */ if (IsTypeFuncPtr (Expr->Type) || IsTypeFunc (Expr->Type)) { /* Expression not storable */ - ED_MakeRVal (Expr); + ED_MarkExprAsRVal (Expr); } else { + if (!ED_IsQuasiConstAddr (Expr)) { + /* Not a constant address, load the pointer into the primary + ** and make it a calculated value. + */ + LoadExpr (CF_NONE, Expr); + ED_FinalizeRValLoad (Expr); + } + if (IsClassPtr (Expr->Type)) { Expr->Type = Indirect (Expr->Type); } else { @@ -1718,8 +1947,8 @@ void hie10 (ExprDesc* Expr) ** address -- it already is the location of the first element. */ if (!IsTypeArray (Expr->Type)) { - /* The * operator yields an lvalue */ - ED_MakeLVal (Expr); + /* The * operator yields an lvalue reference */ + ED_IndExpr (Expr); } } break; @@ -1728,20 +1957,23 @@ void hie10 (ExprDesc* Expr) NextToken (); ExprWithCheck (hie10, Expr); /* The & operator may be applied to any lvalue, and it may be - ** applied to functions, even if they're no lvalues. + ** applied to functions and arrays, even if they're not lvalues. */ - if (ED_IsRVal (Expr) && !IsTypeFunc (Expr->Type) && !IsTypeArray (Expr->Type)) { - Error ("Illegal address"); - } else { - if (ED_IsBitField (Expr)) { - Error ("Cannot take address of bit-field"); - /* Do it anyway, just to avoid further warnings */ - Expr->Flags &= ~E_BITFIELD; + if (!IsTypeFunc (Expr->Type) && !IsTypeArray (Expr->Type)) { + if (ED_IsRVal (Expr)) { + Error ("Illegal address"); + /* Continue anyway, just to avoid further warnings */ } - Expr->Type = PointerTo (Expr->Type); - /* The & operator yields an rvalue */ - ED_MakeRVal (Expr); + + if (IsTypeBitField (Expr->Type)) { + Error ("Cannot take address of bit-field"); + /* Continue anyway, just to avoid further warnings */ + Expr->Type = GetUnderlyingType (Expr->Type); + } + /* The & operator yields an rvalue address */ + ED_AddrExpr (Expr); } + Expr->Type = AddressOf (Expr->Type); break; case TOK_SIZEOF: @@ -1749,21 +1981,25 @@ void hie10 (ExprDesc* Expr) if (TypeSpecAhead ()) { Type T[MAXTYPELEN]; NextToken (); - Size = CheckedSizeOf (ParseType (T)); + Size = ExprCheckedSizeOf (ParseType (T)); ConsumeRParen (); } else { /* Remember the output queue pointer */ CodeMark Mark; GetCodePos (&Mark); - hie10 (Expr); - /* If the expression is a literal string, release it, so it - ** won't be output as data if not used elsewhere. - */ - if (ED_IsLocLiteral (Expr)) { - ReleaseLiteral (Expr->LVal); + + /* The expression shall be unevaluated */ + ExprDesc Uneval; + ED_Init (&Uneval); + ED_MarkForUneval (&Uneval); + hie10 (&Uneval); + if (IsTypeBitField (Uneval.Type)) { + Error ("Cannot apply 'sizeof' to bit-field"); + Size = 0; + } else { + /* Calculate the size */ + Size = ExprCheckedSizeOf (Uneval.Type); } - /* Calculate the size */ - Size = CheckedSizeOf (Expr->Type); /* Remove any generated code */ RemoveCode (&Mark); } @@ -1782,13 +2018,6 @@ void hie10 (ExprDesc* Expr) /* An expression */ hie11 (Expr); - /* Handle post increment */ - switch (CurTok.Tok) { - case TOK_INC: PostInc (Expr); break; - case TOK_DEC: PostDec (Expr); break; - default: break; - } - } break; } @@ -1802,7 +2031,6 @@ static void hie_internal (const GenDesc* Ops, /* List of generators */ int* UsedGen) /* Helper function */ { - ExprDesc Expr2; CodeMark Mark1; CodeMark Mark2; const GenDesc* Gen; @@ -1817,6 +2045,10 @@ static void hie_internal (const GenDesc* Ops, /* List of generators */ *UsedGen = 0; while ((Gen = FindGen (CurTok.Tok, Ops)) != 0) { + ExprDesc Expr2; + ED_Init (&Expr2); + Expr2.Flags |= Expr->Flags & E_MASK_KEEP_SUBEXPR; + /* Tell the caller that we handled it's ops */ *UsedGen = 1; @@ -1873,7 +2105,7 @@ static void hie_internal (const GenDesc* Ops, /* List of generators */ RemoveCode (&Mark1); /* Get the type of the result */ - Expr->Type = promoteint (Expr->Type, Expr2.Type); + Expr->Type = ArithmeticConvert (Expr->Type, Expr2.Type); /* Handle the op differently for signed and unsigned types */ if (IsSignSigned (Expr->Type)) { @@ -1952,7 +2184,19 @@ static void hie_internal (const GenDesc* Ops, /* List of generators */ } } + /* Limit the calculated value to the range of its type */ + LimitExprValue (Expr); + } else if (lconst && (Gen->Flags & GEN_COMM) && !rconst) { + /* If the LHS constant is an int that fits into an unsigned char, change the + ** codegen type to unsigned char. If the RHS is also an unsigned char, then + ** g_typeadjust will return unsigned int (instead of int, which would be + ** returned without this modification). This allows more efficient operations, + ** but does not affect correctness for the same reasons explained in g_typeadjust. + */ + if (ltype == CF_INT && Expr->IVal >= 0 && Expr->IVal < 256) { + ltype = CF_CHAR | CF_UNSIGNED; + } /* The left side is constant, the right side is not, and the ** operator allows swapping the operands. We haven't pushed the @@ -1965,18 +2209,18 @@ static void hie_internal (const GenDesc* Ops, /* List of generators */ if ((Gen->Flags & GEN_NOPUSH) == 0) { g_push (ltype, 0); } else { - ltype |= CF_REG; /* Value is in register */ + ltype |= CF_PRIMARY; /* Value is in register */ } /* Determine the type of the operation result. */ type |= g_typeadjust (ltype, rtype); - Expr->Type = promoteint (Expr->Type, Expr2.Type); + Expr->Type = ArithmeticConvert (Expr->Type, Expr2.Type); /* Generate code */ Gen->Func (type, Expr->IVal); - /* We have a rvalue in the primary now */ - ED_MakeRValExpr (Expr); + /* We have an rvalue in the primary now */ + ED_FinalizeRValLoad (Expr); } else { @@ -1987,6 +2231,10 @@ static void hie_internal (const GenDesc* Ops, /* List of generators */ unsigned rtype = TypeOf (Expr2.Type); type = 0; if (rconst) { + /* As above, but for the RHS. */ + if (rtype == CF_INT && Expr2.IVal >= 0 && Expr2.IVal < 256) { + rtype = CF_CHAR | CF_UNSIGNED; + } /* Second value is constant - check for div */ type |= CF_CONST; rtype |= CF_CONST; @@ -1997,20 +2245,23 @@ static void hie_internal (const GenDesc* Ops, /* List of generators */ } if ((Gen->Flags & GEN_NOPUSH) != 0) { RemoveCode (&Mark2); - ltype |= CF_REG; /* Value is in register */ + ltype |= CF_PRIMARY; /* Value is in register */ } } /* Determine the type of the operation result. */ type |= g_typeadjust (ltype, rtype); - Expr->Type = promoteint (Expr->Type, Expr2.Type); + Expr->Type = ArithmeticConvert (Expr->Type, Expr2.Type); /* Generate code */ Gen->Func (type, Expr2.IVal); - /* We have a rvalue in the primary now */ - ED_MakeRValExpr (Expr); + /* We have an rvalue in the primary now */ + ED_FinalizeRValLoad (Expr); } + + /* Propagate viral flags */ + ED_PropagateFrom (Expr, &Expr2); } } @@ -2021,8 +2272,6 @@ static void hie_compare (const GenDesc* Ops, /* List of generators */ void (*hienext) (ExprDesc*)) /* Helper function for the compare operators */ { - ExprDesc Expr2; - CodeMark Mark0; CodeMark Mark1; CodeMark Mark2; const GenDesc* Gen; @@ -2031,11 +2280,14 @@ static void hie_compare (const GenDesc* Ops, /* List of generators */ int rconst; /* Operand is a constant */ - GetCodePos (&Mark0); ExprWithCheck (hienext, Expr); while ((Gen = FindGen (CurTok.Tok, Ops)) != 0) { + ExprDesc Expr2; + ED_Init (&Expr2); + Expr2.Flags |= Expr->Flags & E_MASK_KEEP_SUBEXPR; + /* Remember the generator function */ void (*GenFunc) (unsigned, unsigned long) = Gen->Func; @@ -2043,20 +2295,20 @@ static void hie_compare (const GenDesc* Ops, /* List of generators */ Tok = CurTok.Tok; NextToken (); - /* If lhs is a function, convert it to pointer to function */ + /* If lhs is a function, convert it to the address of the function */ if (IsTypeFunc (Expr->Type)) { - Expr->Type = PointerTo (Expr->Type); + Expr->Type = AddressOf (Expr->Type); } /* Get the lhs on stack */ GetCodePos (&Mark1); ltype = TypeOf (Expr->Type); if (ED_IsConstAbs (Expr)) { - /* Constant value */ + /* Numeric constant value */ GetCodePos (&Mark2); g_push (ltype | CF_CONST, Expr->IVal); } else { - /* Value not constant */ + /* Value not numeric constant */ LoadExpr (CF_NONE, Expr); GetCodePos (&Mark2); g_push (ltype, 0); @@ -2065,28 +2317,33 @@ static void hie_compare (const GenDesc* Ops, /* List of generators */ /* Get the right hand side */ MarkedExprWithCheck (hienext, &Expr2); - /* If rhs is a function, convert it to pointer to function */ + /* If rhs is a function, convert it to the address of the function */ if (IsTypeFunc (Expr2.Type)) { - Expr2.Type = PointerTo (Expr2.Type); + Expr2.Type = AddressOf (Expr2.Type); } - /* Check for a constant expression */ + /* Check for a numeric constant expression */ rconst = (ED_IsConstAbs (&Expr2) && ED_CodeRangeIsEmpty (&Expr2)); if (!rconst) { - /* Not constant, load into the primary */ + /* Not numeric constant, load into the primary */ LoadExpr (CF_NONE, &Expr2); } + /* Check if operands have allowed types for this operation */ + if (!IsRelationType (Expr->Type) || !IsRelationType (Expr2.Type)) { + /* Output only one message even if both sides are wrong */ + TypeCompatibilityDiagnostic (Expr->Type, Expr2.Type, 1, + "Comparing types '%s' with '%s' is invalid"); + /* Avoid further errors */ + ED_MakeConstAbsInt (Expr, 0); + ED_MakeConstAbsInt (&Expr2, 0); + } + /* Some operations aren't allowed on function pointers */ if ((Gen->Flags & GEN_NOFUNC) != 0) { - /* Output only one message even if both sides are wrong */ - if (IsTypeFuncPtr (Expr->Type)) { - Error ("Invalid left operand for relational operator"); - /* Avoid further errors */ - ED_MakeConstAbsInt (Expr, 0); - ED_MakeConstAbsInt (&Expr2, 0); - } else if (IsTypeFuncPtr (Expr2.Type)) { - Error ("Invalid right operand for relational operator"); + if ((IsTypeFuncPtr (Expr->Type) || IsTypeFuncPtr (Expr2.Type))) { + /* Output only one message even if both sides are wrong */ + Error ("Cannot use function pointers in this relation operation"); /* Avoid further errors */ ED_MakeConstAbsInt (Expr, 0); ED_MakeConstAbsInt (&Expr2, 0); @@ -2095,34 +2352,104 @@ static void hie_compare (const GenDesc* Ops, /* List of generators */ /* Make sure, the types are compatible */ if (IsClassInt (Expr->Type)) { - if (!IsClassInt (Expr2.Type) && !(IsClassPtr(Expr2.Type) && ED_IsNullPtr(Expr))) { - Error ("Incompatible types"); + if (!IsClassInt (Expr2.Type) && !ED_IsNullPtr (Expr)) { + if (IsClassPtr (Expr2.Type)) { + TypeCompatibilityDiagnostic (Expr->Type, PtrConversion (Expr2.Type), 0, + "Comparing integer '%s' with pointer '%s'"); + } else { + TypeCompatibilityDiagnostic (Expr->Type, Expr2.Type, 1, + "Comparing types '%s' with '%s' is invalid"); + } } } else if (IsClassPtr (Expr->Type)) { if (IsClassPtr (Expr2.Type)) { - /* Both pointers are allowed in comparison if they point to - ** the same type, or if one of them is a void pointer. - */ - Type* left = Indirect (Expr->Type); - Type* right = Indirect (Expr2.Type); - if (TypeCmp (left, right) < TC_QUAL_DIFF && left->C != T_VOID && right->C != T_VOID) { - /* Incompatible pointers */ - Error ("Incompatible types"); + /* Pointers are allowed in comparison */ + if (TypeCmp (Expr->Type, Expr2.Type).C < TC_STRICT_COMPATIBLE) { + /* Warn about distinct pointer types */ + TypeCompatibilityDiagnostic (PtrConversion (Expr->Type), PtrConversion (Expr2.Type), 0, + "Distinct pointer types comparing '%s' with '%s'"); } } else if (!ED_IsNullPtr (&Expr2)) { - Error ("Incompatible types"); + if (IsClassInt (Expr2.Type)) { + TypeCompatibilityDiagnostic (PtrConversion (Expr->Type), Expr2.Type, 0, + "Comparing pointer type '%s' with integer type '%s'"); + } else { + TypeCompatibilityDiagnostic (Expr->Type, Expr2.Type, 1, + "Comparing types '%s' with '%s' is invalid"); + } } } - /* Check for const operands */ - if (ED_IsConstAbs (Expr) && rconst) { + /* Check for numeric constant operands */ + if ((ED_IsAddrExpr (Expr) && ED_IsNullPtr (&Expr2)) || + (ED_IsNullPtr (Expr) && ED_IsAddrExpr (&Expr2))) { + + /* Object addresses are inequal to null pointer */ + Expr->IVal = (Tok != TOK_EQ); + if (ED_IsNullPtr (&Expr2)) { + if (Tok == TOK_LT || Tok == TOK_LE) { + Expr->IVal = 0; + } + } else { + if (Tok == TOK_GT || Tok == TOK_GE) { + Expr->IVal = 0; + } + } + + /* Get rid of unwanted flags */ + ED_MakeConstBool (Expr, Expr->IVal); + + /* The result is constant, this is suspicious when not in + ** preprocessor mode. + */ + WarnConstCompareResult (Expr); + + if (ED_CodeRangeIsEmpty (&Expr2)) { + /* Both operands are static, remove the load code */ + RemoveCode (&Mark1); + } else { + /* Drop pushed lhs */ + g_drop (sizeofarg (ltype)); + pop (ltype); + } + + } else if (ED_IsAddrExpr (Expr) && + ED_IsAddrExpr (&Expr2) && + Expr->Sym == Expr2.Sym) { + + /* Evaluate the result for static addresses */ + unsigned long Val1 = Expr->IVal; + unsigned long Val2 = Expr2.IVal; + switch (Tok) { + case TOK_EQ: Expr->IVal = (Val1 == Val2); break; + case TOK_NE: Expr->IVal = (Val1 != Val2); break; + case TOK_LT: Expr->IVal = (Val1 < Val2); break; + case TOK_LE: Expr->IVal = (Val1 <= Val2); break; + case TOK_GE: Expr->IVal = (Val1 >= Val2); break; + case TOK_GT: Expr->IVal = (Val1 > Val2); break; + default: Internal ("hie_compare: got token 0x%X\n", Tok); + } + + /* Get rid of unwanted flags */ + ED_MakeConstBool (Expr, Expr->IVal); /* If the result is constant, this is suspicious when not in ** preprocessor mode. */ - WarnConstCompareResult (); + WarnConstCompareResult (Expr); - /* Both operands are constant, remove the generated code */ + if (ED_CodeRangeIsEmpty (&Expr2)) { + /* Both operands are static, remove the load code */ + RemoveCode (&Mark1); + } else { + /* Drop pushed lhs */ + g_drop (sizeofarg (ltype)); + pop (ltype); + } + + } else if (ED_IsConstAbs (Expr) && rconst) { + + /* Both operands are numeric constant, remove the generated code */ RemoveCode (&Mark1); /* Determine if this is a signed or unsigned compare */ @@ -2158,11 +2485,21 @@ static void hie_compare (const GenDesc* Ops, /* List of generators */ } } + /* Get rid of unwanted flags */ + ED_MakeConstBool (Expr, Expr->IVal); + + /* If the result is constant, this is suspicious when not in + ** preprocessor mode. + */ + WarnConstCompareResult (Expr); + } else { /* Determine the signedness of the operands */ int LeftSigned = IsSignSigned (Expr->Type); int RightSigned = IsSignSigned (Expr2.Type); + int CmpSigned = IsClassInt (Expr->Type) && IsClassInt (Expr2.Type) && + IsSignSigned (ArithmeticConvert (Expr->Type, Expr2.Type)); /* If the right hand side is constant, and the generator function ** expects the lhs in the primary, remove the push of the primary @@ -2173,12 +2510,12 @@ static void hie_compare (const GenDesc* Ops, /* List of generators */ flags |= CF_CONST; if ((Gen->Flags & GEN_NOPUSH) != 0) { RemoveCode (&Mark2); - ltype |= CF_REG; /* Value is in register */ + ltype |= CF_PRIMARY; /* Value is in register */ } } /* Determine the type of the operation. */ - if (IsTypeChar (Expr->Type) && rconst) { + if (IsTypeChar (Expr->Type) && rconst && (!LeftSigned || RightSigned)) { /* Left side is unsigned char, right side is constant. ** Determine the minimum and maximum values @@ -2191,20 +2528,6 @@ static void hie_compare (const GenDesc* Ops, /* List of generators */ LeftMin = 0; LeftMax = 255; } - /* An integer value is always represented as a signed in the - ** ExprDesc structure. This may lead to false results below, - ** if it is actually unsigned, but interpreted as signed - ** because of the representation. Fortunately, in this case, - ** the actual value doesn't matter, since it's always greater - ** than what can be represented in a char. So correct the - ** value accordingly. - */ - if (!RightSigned && Expr2.IVal < 0) { - /* Correct the value so it is an unsigned. It will then - ** anyway match one of the cases below. - */ - Expr2.IVal = LeftMax + 1; - } /* Comparing a char against a constant may have a constant ** result. Please note: It is not possible to remove the code @@ -2215,48 +2538,48 @@ static void hie_compare (const GenDesc* Ops, /* List of generators */ case TOK_EQ: if (Expr2.IVal < LeftMin || Expr2.IVal > LeftMax) { - ED_MakeConstAbsInt (Expr, 0); - WarnConstCompareResult (); + ED_MakeConstBool (Expr, 0); + WarnConstCompareResult (Expr); goto Done; } break; case TOK_NE: if (Expr2.IVal < LeftMin || Expr2.IVal > LeftMax) { - ED_MakeConstAbsInt (Expr, 1); - WarnConstCompareResult (); + ED_MakeConstBool (Expr, 1); + WarnConstCompareResult (Expr); goto Done; } break; case TOK_LT: if (Expr2.IVal <= LeftMin || Expr2.IVal > LeftMax) { - ED_MakeConstAbsInt (Expr, Expr2.IVal > LeftMax); - WarnConstCompareResult (); + ED_MakeConstBool (Expr, Expr2.IVal > LeftMax); + WarnConstCompareResult (Expr); goto Done; } break; case TOK_LE: if (Expr2.IVal < LeftMin || Expr2.IVal >= LeftMax) { - ED_MakeConstAbsInt (Expr, Expr2.IVal >= LeftMax); - WarnConstCompareResult (); + ED_MakeConstBool (Expr, Expr2.IVal >= LeftMax); + WarnConstCompareResult (Expr); goto Done; } break; case TOK_GE: if (Expr2.IVal <= LeftMin || Expr2.IVal > LeftMax) { - ED_MakeConstAbsInt (Expr, Expr2.IVal <= LeftMin); - WarnConstCompareResult (); + ED_MakeConstBool (Expr, Expr2.IVal <= LeftMin); + WarnConstCompareResult (Expr); goto Done; } break; case TOK_GT: if (Expr2.IVal < LeftMin || Expr2.IVal >= LeftMax) { - ED_MakeConstAbsInt (Expr, Expr2.IVal < LeftMin); - WarnConstCompareResult (); + ED_MakeConstBool (Expr, Expr2.IVal < LeftMin); + WarnConstCompareResult (Expr); goto Done; } break; @@ -2270,7 +2593,8 @@ static void hie_compare (const GenDesc* Ops, /* List of generators */ ** since the right side constant is in a valid range. */ flags |= (CF_CHAR | CF_FORCECHAR); - if (!LeftSigned) { + if (!LeftSigned || !RightSigned) { + CmpSigned = 0; flags |= CF_UNSIGNED; } @@ -2284,19 +2608,21 @@ static void hie_compare (const GenDesc* Ops, /* List of generators */ if (rconst) { flags |= CF_FORCECHAR; } - if (!LeftSigned) { + if (!LeftSigned || !RightSigned) { + CmpSigned = 0; flags |= CF_UNSIGNED; } + } else { unsigned rtype = TypeOf (Expr2.Type) | (flags & CF_CONST); flags |= g_typeadjust (ltype, rtype); } - /* If the left side is an unsigned and the right is a constant, - ** we may be able to change the compares to something more + /* If the comparison is made as unsigned types and the right is a + ** constant, we may be able to change the compares to something more ** effective. */ - if (!LeftSigned && rconst) { + if (!CmpSigned && rconst) { switch (Tok) { @@ -2349,14 +2675,17 @@ static void hie_compare (const GenDesc* Ops, /* List of generators */ GenFunc (flags, Expr2.IVal); /* The result is an rvalue in the primary */ - ED_MakeRValExpr (Expr); + ED_FinalizeRValLoad (Expr); + + /* Condition codes are set */ + ED_TestDone (Expr); } - /* Result type is always int */ - Expr->Type = type_int; + /* Result type is always boolean */ +Done: Expr->Type = type_bool; -Done: /* Condition codes are set */ - ED_TestDone (Expr); + /* Propagate viral flags */ + ED_PropagateFrom (Expr, &Expr2); } } @@ -2378,59 +2707,165 @@ static void hie9 (ExprDesc *Expr) -static void parseadd (ExprDesc* Expr) -/* Parse an expression with the binary plus operator. Expr contains the -** unprocessed left hand side of the expression and will contain the -** result of the expression on return. +static void parseadd (ExprDesc* Expr, int DoArrayRef) +/* Parse an expression with the binary plus or subscript operator. Expr contains +** the unprocessed left hand side of the expression and will contain the result +** of the expression on return. If DoArrayRef is zero, this evaluates the binary +** plus operation. Otherwise, this evaluates the subscript operation. */ { ExprDesc Expr2; unsigned flags; /* Operation flags */ CodeMark Mark; /* Remember code position */ - Type* lhst; /* Type of left hand side */ - Type* rhst; /* Type of right hand side */ + const Type* lhst; /* Type of left hand side */ + const Type* rhst; /* Type of right hand side */ + int lscale; + int rscale; + int AddDone; /* No need to generate runtime code */ - /* Skip the PLUS token */ + ED_Init (&Expr2); + Expr2.Flags |= Expr->Flags & E_MASK_KEEP_SUBEXPR; + + /* Skip the PLUS or opening bracket token */ NextToken (); /* Get the left hand side type, initialize operation flags */ lhst = Expr->Type; flags = 0; + lscale = rscale = 1; + AddDone = 0; - /* Check for constness on both sides */ - if (ED_IsConst (Expr)) { + /* We can only do constant expressions for: + ** - integer addition: + ** - numeric + numeric + ** - (integer)(base + offset) + numeric + ** - numeric + (integer)(base + offset) + ** - pointer offset: + ** - (pointer)numeric + numeric * scale + ** - (base + offset) + numeric * scale + ** - (pointer)numeric + (integer)(base + offset) * 1 + ** - numeric * scale + (pointer)numeric + ** - numeric * scale + (base + offset) + ** - (integer)(base + offset) * 1 + (pointer)numeric + */ + if (ED_IsQuasiConst (Expr)) { /* The left hand side is a constant of some sort. Good. Get rhs */ - ExprWithCheck (hie9, &Expr2); - if (ED_IsConstAbs (&Expr2)) { + ExprWithCheck (DoArrayRef ? hie0 : hie9, &Expr2); - /* Right hand side is a constant numeric value. Get the rhs type */ - rhst = Expr2.Type; + /* Right hand side is constant. Get the rhs type */ + rhst = Expr2.Type; + if (ED_IsQuasiConst (&Expr2)) { /* Both expressions are constants. Check for pointer arithmetic */ if (IsClassPtr (lhst) && IsClassInt (rhst)) { /* Left is pointer, right is int, must scale rhs */ - Expr->IVal += Expr2.IVal * CheckedPSizeOf (lhst); - /* Result type is a pointer */ + rscale = CheckedPSizeOf (lhst); + /* Operate on pointers, result type is a pointer */ + flags = CF_PTR; } else if (IsClassInt (lhst) && IsClassPtr (rhst)) { /* Left is int, right is pointer, must scale lhs */ - Expr->IVal = Expr->IVal * CheckedPSizeOf (rhst) + Expr2.IVal; - /* Result type is a pointer */ - Expr->Type = Expr2.Type; - } else if (IsClassInt (lhst) && IsClassInt (rhst)) { + lscale = CheckedPSizeOf (rhst); + /* Operate on pointers, result type is a pointer */ + flags = CF_PTR; + } else if (!DoArrayRef && IsClassInt (lhst) && IsClassInt (rhst)) { /* Integer addition */ - Expr->IVal += Expr2.IVal; - typeadjust (Expr, &Expr2, 1); + flags = CF_INT; } else { /* OOPS */ - Error ("Invalid operands for binary operator `+'"); + AddDone = -1; + /* Avoid further errors */ + ED_MakeConstAbsInt (Expr, 0); + } + + if (!AddDone) { + /* Do constant calculation if we can */ + if (ED_IsAbs (&Expr2) && + (ED_IsAbs (Expr) || lscale == 1)) { + if (IsClassInt (lhst) && IsClassInt (rhst)) { + Expr->Type = ArithmeticConvert (Expr->Type, Expr2.Type); + } + Expr->IVal = Expr->IVal * lscale + Expr2.IVal * rscale; + AddDone = 1; + } else if (ED_IsAbs (Expr) && + (ED_IsAbs (&Expr2) || rscale == 1)) { + if (IsClassInt (lhst) && IsClassInt (rhst)) { + Expr2.Type = ArithmeticConvert (Expr2.Type, Expr->Type); + } + Expr2.IVal = Expr->IVal * lscale + Expr2.IVal * rscale; + /* Adjust the flags */ + Expr2.Flags |= Expr->Flags & ~E_MASK_KEEP_SUBEXPR; + /* Get the symbol and the name */ + *Expr = Expr2; + AddDone = 1; + } + } + + if (AddDone) { + /* Adjust the result for addition */ + if (!DoArrayRef) { + if (IsClassPtr (lhst)) { + /* Result type is a pointer */ + Expr->Type = lhst; + } else if (IsClassPtr (rhst)) { + /* Result type is a pointer */ + Expr->Type = rhst; + } else { + /* Limit the calculated value to the range of its type */ + LimitExprValue (Expr); + } + + /* The result is always an rvalue */ + ED_MarkExprAsRVal (Expr); + } + } else { + /* Decide the order */ + if (!ED_IsAbs (&Expr2) && rscale > 1) { + /* Rhs needs scaling but is not numeric. Load it. */ + LoadExpr (CF_NONE, &Expr2); + /* Scale rhs */ + g_scale (CF_INT, rscale); + /* Generate the code for the add */ + if (ED_IsAbs (Expr)) { + /* Numeric constant */ + g_inc (flags | CF_CONST, Expr->IVal); + } else if (ED_IsLocStack (Expr)) { + /* Local stack address */ + g_addaddr_local (flags, Expr->IVal); + } else { + /* Static address */ + g_addaddr_static (flags | GlobalModeFlags (Expr), Expr->Name, Expr->IVal); + } + } else { + /* Lhs is not numeric. Load it. */ + LoadExpr (CF_NONE, Expr); + /* Scale lhs if necessary */ + if (lscale != 1) { + g_scale (CF_INT, lscale); + } + /* Generate the code for the add */ + if (ED_IsAbs (&Expr2)) { + /* Numeric constant */ + g_inc (flags | CF_CONST, Expr2.IVal); + } else if (ED_IsLocStack (&Expr2)) { + /* Local stack address */ + g_addaddr_local (flags, Expr2.IVal); + } else { + /* Static address */ + g_addaddr_static (flags | GlobalModeFlags (&Expr2), Expr2.Name, Expr2.IVal); + } + } + + /* Result is an rvalue in primary register */ + ED_FinalizeRValLoad (Expr); } } else { - /* lhs is a constant and rhs is not constant. Load rhs into - ** the primary. + /* lhs is constant and rhs is not constant. Load rhs into the + ** primary. */ + GetCodePos (&Mark); LoadExpr (CF_NONE, &Expr2); /* Beware: The check above (for lhs) lets not only pass numeric @@ -2438,98 +2873,107 @@ static void parseadd (ExprDesc* Expr) ** with an offset. We have to check for that here. */ - /* First, get the rhs type. */ - rhst = Expr2.Type; - /* Setup flags */ - if (ED_IsLocAbs (Expr)) { + if (ED_IsAbs (Expr)) { /* A numerical constant */ flags |= CF_CONST; } else { /* Constant address label */ - flags |= GlobalModeFlags (Expr) | CF_CONSTADDR; + flags |= GlobalModeFlags (Expr); } /* Check for pointer arithmetic */ if (IsClassPtr (lhst) && IsClassInt (rhst)) { /* Left is pointer, right is int, must scale rhs */ - g_scale (CF_INT, CheckedPSizeOf (lhst)); + rscale = CheckedPSizeOf (lhst); + g_scale (CF_INT, rscale); /* Operate on pointers, result type is a pointer */ flags |= CF_PTR; - /* Generate the code for the add */ - if (ED_GetLoc (Expr) == E_LOC_ABS) { - /* Numeric constant */ - g_inc (flags, Expr->IVal); - } else { - /* Constant address */ - g_addaddr_static (flags, Expr->Name, Expr->IVal); - } } else if (IsClassInt (lhst) && IsClassPtr (rhst)) { - /* Left is int, right is pointer, must scale lhs. */ - unsigned ScaleFactor = CheckedPSizeOf (rhst); - + lscale = CheckedPSizeOf (rhst); /* Operate on pointers, result type is a pointer */ flags |= CF_PTR; Expr->Type = Expr2.Type; - - /* Since we do already have rhs in the primary, if lhs is - ** not a numeric constant, and the scale factor is not one - ** (no scaling), we must take the long way over the stack. - */ - if (ED_IsLocAbs (Expr)) { - /* Numeric constant, scale lhs */ - Expr->IVal *= ScaleFactor; - /* Generate the code for the add */ - g_inc (flags, Expr->IVal); - } else if (ScaleFactor == 1) { - /* Constant address but no need to scale */ - g_addaddr_static (flags, Expr->Name, Expr->IVal); - } else { - /* Constant address that must be scaled */ - g_push (TypeOf (Expr2.Type), 0); /* rhs --> stack */ - g_getimmed (flags, Expr->Name, Expr->IVal); - g_scale (CF_PTR, ScaleFactor); - g_add (CF_PTR, 0); - } - } else if (IsClassInt (lhst) && IsClassInt (rhst)) { + } else if (!DoArrayRef && IsClassInt (lhst) && IsClassInt (rhst)) { /* Integer addition */ flags |= typeadjust (Expr, &Expr2, 1); - /* Generate the code for the add */ - if (ED_IsLocAbs (Expr)) { - /* Numeric constant */ - g_inc (flags, Expr->IVal); - } else { - /* Constant address */ - g_addaddr_static (flags, Expr->Name, Expr->IVal); - } } else { /* OOPS */ - Error ("Invalid operands for binary operator `+'"); - flags = CF_INT; + AddDone = -1; } - /* Result is a rvalue in primary register */ - ED_MakeRValExpr (Expr); + /* Generate the code for the add */ + if (!AddDone) { + if (ED_IsAbs (Expr) && + Expr->IVal >= 0 && + Expr->IVal * lscale < 256) { + /* Numeric constant */ + g_inc (flags, Expr->IVal * lscale); + AddDone = 1; + } + } + + if (!AddDone) { + if (ED_IsLocQuasiConst (&Expr2) && + rscale == 1 && + CheckedSizeOf (rhst) == SIZEOF_CHAR) { + /* Change the order back */ + RemoveCode (&Mark); + /* Load lhs */ + LoadExpr (CF_NONE, Expr); + /* Use new flags */ + flags = CF_CHAR | GlobalModeFlags (&Expr2); + /* Add the variable */ + if (ED_IsLocStack (&Expr2)) { + g_addlocal (flags, Expr2.IVal); + } else { + g_addstatic (flags, Expr2.Name, Expr2.IVal); + } + } else if (ED_IsAbs (Expr)) { + /* Numeric constant */ + g_inc (flags, Expr->IVal * lscale); + } else if (lscale == 1) { + if (ED_IsLocStack (Expr)) { + /* Constant address */ + g_addaddr_local (flags, Expr->IVal); + } else { + g_addaddr_static (flags, Expr->Name, Expr->IVal); + } + } else { + /* Since we do already have rhs in the primary, if lhs is + ** not a numeric constant, and the scale factor is not one + ** (no scaling), we must take the long way over the stack. + */ + g_push (TypeOf (Expr2.Type), 0); /* rhs --> stack */ + LoadExpr (CF_NONE, Expr); + g_scale (CF_PTR, lscale); + g_add (CF_PTR, 0); + } + } + + /* Result is an rvalue in primary register */ + ED_FinalizeRValLoad (Expr); } } else { /* Left hand side is not constant. Get the value onto the stack. */ - LoadExpr (CF_NONE, Expr); /* --> primary register */ + LoadExpr (CF_NONE, Expr); /* --> primary register */ GetCodePos (&Mark); - g_push (TypeOf (Expr->Type), 0); /* --> stack */ + flags = TypeOf (Expr->Type); /* default codegen type */ + g_push (flags, 0); /* --> stack */ /* Evaluate the rhs */ - MarkedExprWithCheck (hie9, &Expr2); + MarkedExprWithCheck (DoArrayRef ? hie0 : hie9, &Expr2); + + /* Get the rhs type */ + rhst = Expr2.Type; /* Check for a constant rhs expression */ if (ED_IsConstAbs (&Expr2) && ED_CodeRangeIsEmpty (&Expr2)) { - /* Right hand side is a constant. Get the rhs type */ - rhst = Expr2.Type; - - /* Remove pushed value from stack */ + /* Rhs is a numeric constant. Remove pushed lhs from stack. */ RemoveCode (&Mark); /* Check for pointer arithmetic */ @@ -2544,13 +2988,12 @@ static void parseadd (ExprDesc* Expr) /* Operate on pointers, result type is a pointer */ flags = CF_PTR; Expr->Type = Expr2.Type; - } else if (IsClassInt (lhst) && IsClassInt (rhst)) { + } else if (!DoArrayRef && IsClassInt (lhst) && IsClassInt (rhst)) { /* Integer addition */ flags = typeadjust (Expr, &Expr2, 1); } else { /* OOPS */ - Error ("Invalid operands for binary operator `+'"); - flags = CF_INT; + AddDone = -1; } /* Generate code for the add */ @@ -2558,54 +3001,110 @@ static void parseadd (ExprDesc* Expr) } else { - /* Not constant, load into the primary */ - LoadExpr (CF_NONE, &Expr2); - - /* lhs and rhs are not constant. Get the rhs type. */ - rhst = Expr2.Type; - - /* Check for pointer arithmetic */ + /* Lhs and rhs are not so "numeric constant". Check for pointer arithmetic. */ if (IsClassPtr (lhst) && IsClassInt (rhst)) { /* Left is pointer, right is int, must scale rhs */ - g_scale (CF_INT, CheckedPSizeOf (lhst)); + rscale = CheckedPSizeOf (lhst); + if (ED_IsAbs (&Expr2)) { + Expr2.IVal *= rscale; + /* Load rhs into the primary */ + LoadExpr (CF_NONE, &Expr2); + } else { + /* Load rhs into the primary */ + LoadExpr (CF_NONE, &Expr2); + g_scale (CF_INT, rscale); + } /* Operate on pointers, result type is a pointer */ flags = CF_PTR; } else if (IsClassInt (lhst) && IsClassPtr (rhst)) { /* Left is int, right is pointer, must scale lhs */ - g_tosint (TypeOf (lhst)); /* Make sure TOS is int */ - g_swap (CF_INT); /* Swap TOS and primary */ - g_scale (CF_INT, CheckedPSizeOf (rhst)); + lscale = CheckedPSizeOf (rhst); + if (ED_CodeRangeIsEmpty (&Expr2)) { + RemoveCode (&Mark); /* Remove pushed value from stack */ + g_scale (CF_INT, lscale); + g_push (CF_PTR, 0); /* --> stack */ + LoadExpr (CF_NONE, &Expr2); /* Load rhs into primary register */ + } else { + g_tosint (TypeOf (lhst)); /* Make sure TOS is int */ + LoadExpr (CF_NONE, &Expr2); /* Load rhs into primary register */ + if (lscale != 1) { + g_swap (CF_INT); /* Swap TOS and primary */ + g_scale (CF_INT, CheckedPSizeOf (rhst)); + } + } /* Operate on pointers, result type is a pointer */ flags = CF_PTR; Expr->Type = Expr2.Type; - } else if (IsClassInt (lhst) && IsClassInt (rhst)) { - /* Integer addition. Note: Result is never constant. - ** Problem here is that typeadjust does not know if the - ** variable is an rvalue or lvalue, so if both operands - ** are dereferenced constant numeric addresses, typeadjust - ** thinks the operation works on constants. Removing - ** CF_CONST here means handling the symptoms, however, the - ** whole parser is such a mess that I fear to break anything - ** when trying to apply another solution. - */ - flags = typeadjust (Expr, &Expr2, 0) & ~CF_CONST; + } else if (!DoArrayRef && IsClassInt (lhst) && IsClassInt (rhst)) { + /* Integer addition */ + flags = typeadjust (Expr, &Expr2, 0); + /* Load rhs into the primary */ + LoadExpr (CF_NONE, &Expr2); } else { /* OOPS */ - Error ("Invalid operands for binary operator `+'"); - flags = CF_INT; + AddDone = -1; + /* We can't just goto End as that would leave the stack unbalanced */ } - /* Generate code for the add */ - g_add (flags, 0); + /* Generate code for the add (the & is a hack here) */ + g_add (flags & ~CF_CONST, 0); } - /* Result is a rvalue in primary register */ - ED_MakeRValExpr (Expr); + /* Result is an rvalue in primary register */ + ED_FinalizeRValLoad (Expr); } - /* Condition codes not set */ + /* Deal with array ref */ + if (DoArrayRef) { + /* Check the types of array and subscript */ + if (IsClassPtr (lhst)) { + if (!IsClassInt (rhst)) { + Error ("Array subscript is not an integer"); + ED_MakeConstAbs (Expr, 0, GetCharArrayType (1)); + } + } else if (IsClassInt (lhst)) { + if (!IsClassPtr (rhst)) { + Error ("Subscripted value is neither array nor pointer"); + ED_MakeConstAbs (Expr, 0, GetCharArrayType (1)); + } + } else { + Error ("Cannot subscript"); + ED_MakeConstAbs (Expr, 0, GetCharArrayType (1)); + } + + /* The final result is usually an lvalue expression of element type + ** referenced in the primary, unless it is once again an array. We can just + ** assume the usual case first, and change it later if necessary. + */ + ED_IndExpr (Expr); + Expr->Type = Indirect (Expr->Type); + + /* An array element is actually a variable. So the rules for variables with + ** respect to the reference type apply: If it's an array, it is virtually + ** an rvalue address, otherwise it's an lvalue reference. (A function would + ** also be an rvalue address, but an array cannot contain functions). + */ + if (IsTypeArray (Expr->Type)) { + ED_AddrExpr (Expr); + } + + /* Consume the closing bracket */ + ConsumeRBrack (); + } else { + if (AddDone < 0) { + Error ("Invalid operands for binary operator '+'"); + } else { + /* Array and function types must be converted to pointer types */ + Expr->Type = StdConversion (Expr->Type); + } + } + + /* Condition code not set */ ED_MarkAsUntested (Expr); + + /* Propagate viral flags */ + ED_PropagateFrom (Expr, &Expr2); } @@ -2618,16 +3117,19 @@ static void parsesub (ExprDesc* Expr) { ExprDesc Expr2; unsigned flags; /* Operation flags */ - Type* lhst; /* Type of left hand side */ - Type* rhst; /* Type of right hand side */ + const Type* lhst; /* Type of left hand side */ + const Type* rhst; /* Type of right hand side */ CodeMark Mark1; /* Save position of output queue */ CodeMark Mark2; /* Another position in the queue */ - int rscale; /* Scale factor for the result */ + int rscale; /* Scale factor for pointer arithmetics */ + int SubDone; /* No need to generate runtime code */ + ED_Init (&Expr2); + Expr2.Flags |= Expr->Flags & E_MASK_KEEP_SUBEXPR; /* lhs cannot be function or pointer to function */ if (IsTypeFunc (Expr->Type) || IsTypeFuncPtr (Expr->Type)) { - Error ("Invalid left operand for binary operator `-'"); + Error ("Invalid left operand for binary operator '-'"); /* Make it pointer to char to avoid further errors */ Expr->Type = type_uchar; } @@ -2637,11 +3139,13 @@ static void parsesub (ExprDesc* Expr) /* Get the left hand side type, initialize operation flags */ lhst = Expr->Type; + flags = CF_INT; /* Default result type */ rscale = 1; /* Scale by 1, that is, don't scale */ + SubDone = 0; /* Generate runtime code by default */ /* Remember the output queue position, then bring the value onto the stack */ GetCodePos (&Mark1); - LoadExpr (CF_NONE, Expr); /* --> primary register */ + LoadExpr (CF_NONE, Expr); /* --> primary register */ GetCodePos (&Mark2); g_push (TypeOf (lhst), 0); /* --> stack */ @@ -2650,147 +3154,237 @@ static void parsesub (ExprDesc* Expr) /* rhs cannot be function or pointer to function */ if (IsTypeFunc (Expr2.Type) || IsTypeFuncPtr (Expr2.Type)) { - Error ("Invalid right operand for binary operator `-'"); + Error ("Invalid right operand for binary operator '-'"); /* Make it pointer to char to avoid further errors */ Expr2.Type = type_uchar; } - /* Check for a constant rhs expression */ - if (ED_IsConstAbs (&Expr2) && ED_CodeRangeIsEmpty (&Expr2)) { + /* Get the rhs type */ + rhst = Expr2.Type; - /* The right hand side is constant. Get the rhs type. */ - rhst = Expr2.Type; + if (IsClassPtr (lhst)) { + /* We'll have to scale the result */ + rscale = PSizeOf (lhst); + /* We cannot scale by 0-size or unknown-size */ + if (rscale == 0 && (IsClassPtr (rhst) || IsClassInt (rhst))) { + TypeCompatibilityDiagnostic (lhst, rhst, + 1, "Invalid pointer types in subtraction: '%s' and '%s'"); + /* Avoid further errors */ + rscale = 1; + } + /* Generate code for pointer subtraction */ + flags = CF_PTR; + } - /* Check left hand side */ - if (ED_IsConstAbs (Expr)) { + /* We can only do constant expressions for: + ** - integer subtraction: + ** - numeric - numeric + ** - (integer)(base + offset) - numeric + ** - (integer)(same_base + offset) - (integer)(same_base + offset) + ** - pointer offset: + ** - (pointer)numeric - numeric * scale + ** - (base + offset) - numeric * scale + ** - (same_base + offset) - (integer)(same_base + offset) * 1 + ** - pointer diff: + ** - (numeric - numeric) / scale + ** - ((same_base + offset) - (same_base + offset)) / scale + ** - ((base + offset) - (pointer)numeric) / 1 + */ + if (IsClassPtr (lhst) && IsClassPtr (rhst)) { - /* Both sides are constant, remove generated code */ - RemoveCode (&Mark1); + /* Pointer Diff. We've got the scale factor and flags above */ + typecmp_t Cmp = TypeCmp (lhst, rhst); + if (Cmp.C < TC_STRICT_COMPATIBLE) { + TypeCompatibilityDiagnostic (lhst, rhst, + 1, "Incompatible pointer types in subtraction: '%s' and '%s'"); + } - /* Check for pointer arithmetic */ - if (IsClassPtr (lhst) && IsClassInt (rhst)) { - /* Left is pointer, right is int, must scale rhs */ - Expr->IVal -= Expr2.IVal * CheckedPSizeOf (lhst); - /* Operate on pointers, result type is a pointer */ - } else if (IsClassPtr (lhst) && IsClassPtr (rhst)) { - /* Left is pointer, right is pointer, must scale result */ - if (TypeCmp (Indirect (lhst), Indirect (rhst)) < TC_QUAL_DIFF) { - Error ("Incompatible pointer types"); - } else { - Expr->IVal = (Expr->IVal - Expr2.IVal) / - CheckedPSizeOf (lhst); + /* Operate on pointers, result type is an integer */ + Expr->Type = type_int; + + /* Check for a constant rhs expression */ + if (ED_IsQuasiConst (&Expr2) && ED_CodeRangeIsEmpty (&Expr2)) { + /* The right hand side is constant. Check left hand side. */ + if (ED_IsQuasiConst (Expr)) { + /* We can't do all 'ptr1 - ptr2' constantly at the moment */ + if (Expr->Sym == Expr2.Sym) { + Expr->IVal = (Expr->IVal - Expr2.IVal) / rscale; + /* Get rid of unneeded flags etc. */ + ED_MakeConstAbsInt (Expr, Expr->IVal); + /* No runtime code */ + SubDone = 1; + } else if (rscale == 1 && ED_IsConstAbs (&Expr2)) { + Expr->IVal = (Expr->IVal - Expr2.IVal) / rscale; + /* No runtime code */ + SubDone = 1; } - /* Operate on pointers, result type is an integer */ - Expr->Type = type_int; + } + } + + if (!SubDone) { + /* We'll do runtime code */ + if (ED_IsConstAbs (&Expr2) && ED_CodeRangeIsEmpty (&Expr2)) { + /* Remove pushed value from stack */ + RemoveCode (&Mark2); + /* Do the subtraction */ + g_dec (CF_INT | CF_CONST, Expr2.IVal); + } else { + /* load into the primary */ + LoadExpr (CF_NONE, &Expr2); + /* Generate code for the sub */ + g_sub (CF_INT, 0); + } + /* We must scale the result */ + if (rscale != 1) { + g_scale (CF_INT, -rscale); + } + /* Result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); + } else { + /* Remove pushed value from stack */ + RemoveCode (&Mark1); + /* The result is always an rvalue */ + ED_MarkExprAsRVal (Expr); + } + + } else if (ED_IsQuasiConst (&Expr2) && ED_CodeRangeIsEmpty (&Expr2)) { + + /* Right hand side is constant. Check left hand side. */ + if (ED_IsQuasiConst (Expr)) { + + /* Both sides are constant. Check for pointer arithmetic */ + if (IsClassPtr (lhst) && IsClassInt (rhst)) { + /* Pointer subtraction. We've got the scale factor and flags above */ } else if (IsClassInt (lhst) && IsClassInt (rhst)) { - /* Integer subtraction */ - typeadjust (Expr, &Expr2, 1); - Expr->IVal -= Expr2.IVal; + /* Integer subtraction. We'll adjust the types later */ } else { /* OOPS */ - Error ("Invalid operands for binary operator `-'"); + Error ("Invalid operands for binary operator '-'"); } - /* Result is constant, condition codes not set */ - ED_MarkAsUntested (Expr); + /* We can't make all subtraction expressions constant */ + if (ED_IsConstAbs (&Expr2)) { + Expr->IVal -= Expr2.IVal * rscale; + /* No runtime code */ + SubDone = 1; + } else if (rscale == 1 && Expr->Sym == Expr2.Sym) { + /* The result is the diff of the offsets */ + Expr->IVal -= Expr2.IVal; + /* Get rid of unneeded bases and flags etc. */ + ED_MakeConstAbs (Expr, Expr->IVal, Expr->Type); + /* No runtime code */ + SubDone = 1; + } + + if (SubDone) { + /* Remove loaded and pushed value from stack */ + RemoveCode (&Mark1); + if (IsClassInt (lhst)) { + /* Just adjust the result type */ + Expr->Type = ArithmeticConvert (Expr->Type, Expr2.Type); + /* And limit the calculated value to the range of it */ + LimitExprValue (Expr); + } + /* The result is always an rvalue */ + ED_MarkExprAsRVal (Expr); + } else { + if (ED_IsConstAbs (&Expr2)) { + /* Remove pushed value from stack */ + RemoveCode (&Mark2); + if (IsClassInt (lhst)) { + /* Adjust the types */ + flags = typeadjust (Expr, &Expr2, 1); + } + /* Do the subtraction */ + g_dec (flags | CF_CONST, Expr2.IVal * rscale); + } else { + if (IsClassInt (lhst)) { + /* Adjust the types */ + flags = typeadjust (Expr, &Expr2, 0); + } + /* Load rhs into the primary */ + LoadExpr (CF_NONE, &Expr2); + g_scale (TypeOf (rhst), rscale); + /* Generate code for the sub (the & is a hack here) */ + g_sub (flags & ~CF_CONST, 0); + } + /* Result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); + } } else { - /* Left hand side is not constant, right hand side is. - ** Remove pushed value from stack. - */ - RemoveCode (&Mark2); - + /* Left hand side is not constant, right hand side is */ if (IsClassPtr (lhst) && IsClassInt (rhst)) { - /* Left is pointer, right is int, must scale rhs */ - Expr2.IVal *= CheckedPSizeOf (lhst); - /* Operate on pointers, result type is a pointer */ - flags = CF_PTR; - } else if (IsClassPtr (lhst) && IsClassPtr (rhst)) { - /* Left is pointer, right is pointer, must scale result */ - if (TypeCmp (Indirect (lhst), Indirect (rhst)) < TC_QUAL_DIFF) { - Error ("Incompatible pointer types"); - } else { - rscale = CheckedPSizeOf (lhst); - } - /* Operate on pointers, result type is an integer */ - flags = CF_PTR; - Expr->Type = type_int; + /* Pointer subtraction. We've got the scale factor and flags above */ } else if (IsClassInt (lhst) && IsClassInt (rhst)) { - /* Integer subtraction */ - flags = typeadjust (Expr, &Expr2, 1); + /* Integer subtraction. We'll adjust the types later */ } else { /* OOPS */ - Error ("Invalid operands for binary operator `-'"); + Error ("Invalid operands for binary operator '-'"); flags = CF_INT; } - /* Do the subtraction */ - g_dec (flags | CF_CONST, Expr2.IVal); - - /* If this was a pointer subtraction, we must scale the result */ - if (rscale != 1) { - g_scale (flags, -rscale); + if (ED_IsConstAbs (&Expr2)) { + /* Remove pushed value from stack */ + RemoveCode (&Mark2); + if (IsClassInt (lhst)) { + /* Adjust the types */ + flags = typeadjust (Expr, &Expr2, 1); + } + /* Do the subtraction */ + g_dec (flags | CF_CONST, Expr2.IVal * rscale); + } else { + if (IsClassInt (lhst)) { + /* Adjust the types */ + flags = typeadjust (Expr, &Expr2, 0); + } + /* Load rhs into the primary */ + LoadExpr (CF_NONE, &Expr2); + g_scale (TypeOf (rhst), rscale); + /* Generate code for the sub (the & is a hack here) */ + g_sub (flags & ~CF_CONST, 0); } - /* Result is a rvalue in the primary register */ - ED_MakeRValExpr (Expr); - ED_MarkAsUntested (Expr); - + /* Result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); } } else { - /* Not constant, load into the primary */ - LoadExpr (CF_NONE, &Expr2); + /* We'll use the pushed lhs on stack instead of the original source */ + ED_FinalizeRValLoad (Expr); - /* Right hand side is not constant. Get the rhs type. */ - rhst = Expr2.Type; + /* Right hand side is not constant, load into the primary */ + LoadExpr (CF_NONE, &Expr2); /* Check for pointer arithmetic */ if (IsClassPtr (lhst) && IsClassInt (rhst)) { /* Left is pointer, right is int, must scale rhs */ - g_scale (CF_INT, CheckedPSizeOf (lhst)); - /* Operate on pointers, result type is a pointer */ - flags = CF_PTR; - } else if (IsClassPtr (lhst) && IsClassPtr (rhst)) { - /* Left is pointer, right is pointer, must scale result */ - if (TypeCmp (Indirect (lhst), Indirect (rhst)) < TC_QUAL_DIFF) { - Error ("Incompatible pointer types"); - } else { - rscale = CheckedPSizeOf (lhst); - } - /* Operate on pointers, result type is an integer */ - flags = CF_PTR; - Expr->Type = type_int; + g_scale (CF_INT, rscale); } else if (IsClassInt (lhst) && IsClassInt (rhst)) { - /* Integer subtraction. If the left hand side descriptor says that - ** the lhs is const, we have to remove this mark, since this is no - ** longer true, lhs is on stack instead. - */ - if (ED_IsLocAbs (Expr)) { - ED_MakeRValExpr (Expr); - } /* Adjust operand types */ flags = typeadjust (Expr, &Expr2, 0); } else { /* OOPS */ - Error ("Invalid operands for binary operator `-'"); - flags = CF_INT; + Error ("Invalid operands for binary operator '-'"); } /* Generate code for the sub (the & is a hack here) */ g_sub (flags & ~CF_CONST, 0); - /* If this was a pointer subtraction, we must scale the result */ - if (rscale != 1) { - g_scale (flags, -rscale); - } - - /* Result is a rvalue in the primary register */ - ED_MakeRValExpr (Expr); - ED_MarkAsUntested (Expr); + /* Result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); } + + /* Result type is either a pointer or an integer */ + Expr->Type = StdConversion (Expr->Type); + + /* Condition code not set */ + ED_MarkAsUntested (Expr); + + /* Propagate viral flags */ + ED_PropagateFrom (Expr, &Expr2); } @@ -2801,7 +3395,7 @@ void hie8 (ExprDesc* Expr) ExprWithCheck (hie9, Expr); while (CurTok.Tok == TOK_PLUS || CurTok.Tok == TOK_MINUS) { if (CurTok.Tok == TOK_PLUS) { - parseadd (Expr); + parseadd (Expr, 0); } else { parsesub (Expr); } @@ -2885,16 +3479,14 @@ static void hieAndPP (ExprDesc* Expr) ** called recursively from the preprocessor. */ { - ExprDesc Expr2; - - ConstAbsIntExpr (hie2, Expr); + *Expr = NoCodeConstAbsIntExpr (hie2); while (CurTok.Tok == TOK_BOOL_AND) { /* Skip the && */ NextToken (); /* Get rhs */ - ConstAbsIntExpr (hie2, &Expr2); + ExprDesc Expr2 = NoCodeConstAbsIntExpr (hie2); /* Combine the two */ Expr->IVal = (Expr->IVal && Expr2.IVal); @@ -2908,16 +3500,14 @@ static void hieOrPP (ExprDesc *Expr) ** called recursively from the preprocessor. */ { - ExprDesc Expr2; - - ConstAbsIntExpr (hieAndPP, Expr); + *Expr = NoCodeConstAbsIntExpr (hieAndPP); while (CurTok.Tok == TOK_BOOL_OR) { /* Skip the && */ NextToken (); /* Get rhs */ - ConstAbsIntExpr (hieAndPP, &Expr2); + ExprDesc Expr2 = NoCodeConstAbsIntExpr (hieAndPP); /* Combine the two */ Expr->IVal = (Expr->IVal || Expr2.IVal); @@ -2926,61 +3516,174 @@ static void hieOrPP (ExprDesc *Expr) -static void hieAnd (ExprDesc* Expr, unsigned TrueLab, int* BoolOp) -/* Process "exp && exp" */ +static int hieAnd (ExprDesc* Expr, unsigned* TrueLab, int* TrueLabAllocated) +/* Process "exp && exp". This should only be called within hieOr. +** Return true if logic AND does occur. +*/ { - int FalseLab; - ExprDesc Expr2; + unsigned Flags = Expr->Flags & E_MASK_KEEP_SUBEXPR; + int HasFalseJump = 0, HasTrueJump = 0; + CodeMark Start; + /* The label that we will use for false expressions */ + int FalseLab = 0; + + /* Get lhs */ + GetCodePos (&Start); ExprWithCheck (hie2, Expr); + if ((Flags & E_EVAL_UNEVAL) == E_EVAL_UNEVAL) { + RemoveCode (&Start); + } + if (CurTok.Tok == TOK_BOOL_AND) { - /* Tell our caller that we're evaluating a boolean */ - *BoolOp = 1; + ExprDesc Expr2; - /* Get a label that we will use for false expressions */ - FalseLab = GetLocalLabel (); + /* Check type */ + if (!ED_IsBool (Expr)) { + Error ("Scalar expression expected"); + ED_MakeConstBool (Expr, 0); + } else if ((Flags & E_EVAL_UNEVAL) != E_EVAL_UNEVAL) { + if (!ED_IsConstBool (Expr)) { + /* Set the test flag */ + ED_RequireTest (Expr); - /* If the expr hasn't set condition codes, set the force-test flag */ - if (!ED_IsTested (Expr)) { - ED_MarkForTest (Expr); + /* Load the value */ + LoadExpr (CF_FORCECHAR, Expr); + + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_TEST, Expr); + + /* Clear the test flag */ + ED_RequireNoTest (Expr); + + if (HasFalseJump == 0) { + /* Remember that the jump is used */ + HasFalseJump = 1; + /* Get a label for false expressions */ + FalseLab = GetLocalLabel (); + } + + /* Generate the jump */ + g_falsejump (CF_NONE, FalseLab); + } else { + /* Constant boolean subexpression could still have deferred inc/dec + ** operations, so just flush their side-effects at this sequence + ** point. + */ + DoDeferred (SQP_KEEP_NONE, Expr); + + if (ED_IsConstFalse (Expr)) { + /* Skip remaining */ + Flags |= E_EVAL_UNEVAL; + } + } } - /* Load the value */ - LoadExpr (CF_FORCECHAR, Expr); - - /* Generate the jump */ - g_falsejump (CF_NONE, FalseLab); - /* Parse more boolean and's */ while (CurTok.Tok == TOK_BOOL_AND) { + ED_Init (&Expr2); + Expr2.Flags = Flags; + /* Skip the && */ NextToken (); /* Get rhs */ + GetCodePos (&Start); hie2 (&Expr2); - if (!ED_IsTested (&Expr2)) { - ED_MarkForTest (&Expr2); + if ((Flags & E_EVAL_UNEVAL) == E_EVAL_UNEVAL) { + RemoveCode (&Start); } - LoadExpr (CF_FORCECHAR, &Expr2); - /* Do short circuit evaluation */ - if (CurTok.Tok == TOK_BOOL_AND) { - g_falsejump (CF_NONE, FalseLab); - } else { - /* Last expression - will evaluate to true */ - g_truejump (CF_NONE, TrueLab); + /* Check type */ + if (!ED_IsBool (&Expr2)) { + Error ("Scalar expression expected"); + ED_MakeConstBool (&Expr2, 0); + } else if ((Flags & E_EVAL_UNEVAL) != E_EVAL_UNEVAL) { + if (!ED_IsConstBool (&Expr2)) { + ED_RequireTest (&Expr2); + LoadExpr (CF_FORCECHAR, &Expr2); + + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_TEST, &Expr2); + + /* Do short circuit evaluation */ + if (CurTok.Tok == TOK_BOOL_AND) { + if (HasFalseJump == 0) { + /* Remember that the jump is used */ + HasFalseJump = 1; + /* Get a label for false expressions */ + FalseLab = GetLocalLabel (); + } + g_falsejump (CF_NONE, FalseLab); + } else { + /* We need the true label for the last expression */ + HasTrueJump = 1; + } + } else { + /* Constant boolean subexpression could still have deferred inc/ + ** dec operations, so just flush their side-effects at this + ** sequence point. + */ + DoDeferred (SQP_KEEP_NONE, &Expr2); + + if (ED_IsConstFalse (&Expr2)) { + /* Skip remaining */ + Flags |= E_EVAL_UNEVAL; + /* The value of the expression will be false */ + ED_MakeConstBool (Expr, 0); + } + } + } + + /* Propagate viral flags */ + if ((Expr->Flags & E_EVAL_UNEVAL) != E_EVAL_UNEVAL) { + ED_PropagateFrom (Expr, &Expr2); + } + + } + + /* Last expression */ + if ((Flags & E_EVAL_UNEVAL) != E_EVAL_UNEVAL) { + if (HasFalseJump || HasTrueJump) { + if (*TrueLabAllocated == 0) { + /* Get a label that we will use for true expressions */ + *TrueLab = GetLocalLabel (); + *TrueLabAllocated = 1; + } + if (!ED_IsConstAbs (&Expr2)) { + /* Will branch to true and fall to false */ + g_truejump (CF_NONE, *TrueLab); + } else { + /* Will jump away */ + g_jump (*TrueLab); + } + /* The result is an rvalue in primary */ + ED_FinalizeRValLoad (Expr); + /* No need to test as the result will be jumped to */ + ED_TestDone (Expr); } } - /* Define the false jump label here */ - g_defcodelabel (FalseLab); + if (HasFalseJump) { + /* Define the false jump label here */ + g_defcodelabel (FalseLab); + } - /* The result is an rvalue in primary */ - ED_MakeRValExpr (Expr); - ED_TestDone (Expr); /* Condition codes are set */ + /* Convert to bool */ + if ((ED_IsConstAbs (Expr) && Expr->IVal != 0) || + ED_IsAddrExpr (Expr)) { + ED_MakeConstBool (Expr, 1); + } else { + Expr->Type = type_bool; + } + + /* Tell our caller that we're evaluating a boolean */ + return 1; } + + return 0; } @@ -2988,71 +3691,161 @@ static void hieAnd (ExprDesc* Expr, unsigned TrueLab, int* BoolOp) static void hieOr (ExprDesc *Expr) /* Process "exp || exp". */ { - ExprDesc Expr2; - int BoolOp = 0; /* Did we have a boolean op? */ - int AndOp; /* Did we have a && operation? */ + unsigned Flags = Expr->Flags & E_MASK_KEEP_SUBEXPR; + int AndOp; /* Did we have a && operation? */ unsigned TrueLab; /* Jump to this label if true */ - unsigned DoneLab; - - /* Get a label */ - TrueLab = GetLocalLabel (); + int HasTrueJump = 0; + CodeMark Start; /* Call the next level parser */ - hieAnd (Expr, TrueLab, &BoolOp); + GetCodePos (&Start); + AndOp = hieAnd (Expr, &TrueLab, &HasTrueJump); + if ((Flags & E_EVAL_UNEVAL) == E_EVAL_UNEVAL) { + RemoveCode (&Start); + } /* Any boolean or's? */ if (CurTok.Tok == TOK_BOOL_OR) { - /* If the expr hasn't set condition codes, set the force-test flag */ - if (!ED_IsTested (Expr)) { - ED_MarkForTest (Expr); + /* Check type */ + if (!ED_IsBool (Expr)) { + Error ("Scalar expression expected"); + ED_MakeConstBool (Expr, 0); + } else if ((Flags & E_EVAL_UNEVAL) != E_EVAL_UNEVAL) { + + if (!ED_IsConstBool (Expr)) { + /* Test the lhs if we haven't had && operators. If we had them, the + ** jump is already in place and there's no need to do the test. + */ + if (!AndOp) { + /* Set the test flag */ + ED_RequireTest (Expr); + + /* Get first expr */ + LoadExpr (CF_FORCECHAR, Expr); + + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_TEST, Expr); + + /* Clear the test flag */ + ED_RequireNoTest (Expr); + + if (HasTrueJump == 0) { + /* Get a label that we will use for true expressions */ + TrueLab = GetLocalLabel(); + HasTrueJump = 1; + } + + /* Jump to TrueLab if true */ + g_truejump (CF_NONE, TrueLab); + } + } else { + /* Constant boolean subexpression could still have deferred inc/dec + ** operations, so just flush their side-effects at this sequence + ** point. + */ + DoDeferred (SQP_KEEP_NONE, Expr); + + if (ED_IsConstTrue (Expr)) { + /* Skip remaining */ + Flags |= E_EVAL_UNEVAL; + } + } } - /* Get first expr */ - LoadExpr (CF_FORCECHAR, Expr); - - /* For each expression jump to TrueLab if true. Beware: If we - ** had && operators, the jump is already in place! - */ - if (!BoolOp) { - g_truejump (CF_NONE, TrueLab); - } - - /* Remember that we had a boolean op */ - BoolOp = 1; - /* while there's more expr */ while (CurTok.Tok == TOK_BOOL_OR) { + ExprDesc Expr2; + ED_Init (&Expr2); + Expr2.Flags = Flags; + /* skip the || */ NextToken (); - /* Get a subexpr */ - AndOp = 0; - hieAnd (&Expr2, TrueLab, &AndOp); - if (!ED_IsTested (&Expr2)) { - ED_MarkForTest (&Expr2); + /* Get rhs subexpression */ + GetCodePos (&Start); + AndOp = hieAnd (&Expr2, &TrueLab, &HasTrueJump); + if ((Flags & E_EVAL_UNEVAL) == E_EVAL_UNEVAL) { + RemoveCode (&Start); } - LoadExpr (CF_FORCECHAR, &Expr2); - /* If there is more to come, add shortcut boolean eval. */ - g_truejump (CF_NONE, TrueLab); + /* Check type */ + if (!ED_IsBool (&Expr2)) { + Error ("Scalar expression expected"); + ED_MakeConstBool (&Expr2, 0); + } else if ((Flags & E_EVAL_UNEVAL) != E_EVAL_UNEVAL) { + + if (!ED_IsConstBool (&Expr2)) { + /* If there is more to come, add shortcut boolean eval */ + if (!AndOp) { + ED_RequireTest (&Expr2); + LoadExpr (CF_FORCECHAR, &Expr2); + + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_TEST, &Expr2); + + if (HasTrueJump == 0) { + TrueLab = GetLocalLabel(); + HasTrueJump = 1; + } + g_truejump (CF_NONE, TrueLab); + } + } else { + /* Constant boolean subexpression could still have deferred inc/ + ** dec operations, so just flush their side-effects at this + ** sequence point. + */ + DoDeferred (SQP_KEEP_NONE, &Expr2); + + if (ED_IsConstTrue (&Expr2)) { + /* Skip remaining */ + Flags |= E_EVAL_UNEVAL; + /* The result is always true */ + ED_MakeConstBool (Expr, 1); + } + } + } + + /* Propagate viral flags */ + if ((Expr->Flags & E_EVAL_UNEVAL) != E_EVAL_UNEVAL) { + ED_PropagateFrom (Expr, &Expr2); + } } - /* The result is an rvalue in primary */ - ED_MakeRValExpr (Expr); - ED_TestDone (Expr); /* Condition codes are set */ + /* Convert to bool */ + if ((ED_IsConstAbs (Expr) && Expr->IVal != 0) || + ED_IsAddrExpr (Expr)) { + ED_MakeConstBool (Expr, 1); + } else { + Expr->Type = type_bool; + } } - /* If we really had boolean ops, generate the end sequence */ - if (BoolOp) { - DoneLab = GetLocalLabel (); - g_getimmed (CF_INT | CF_CONST, 0, 0); /* Load FALSE */ - g_falsejump (CF_NONE, DoneLab); - g_defcodelabel (TrueLab); - g_getimmed (CF_INT | CF_CONST, 1, 0); /* Load TRUE */ - g_defcodelabel (DoneLab); + /* If we really had boolean ops, generate the end sequence if necessary */ + if (HasTrueJump) { + if ((Flags & E_EVAL_UNEVAL) != E_EVAL_UNEVAL) { + /* False case needs to jump over true case */ + unsigned DoneLab = GetLocalLabel (); + /* Load false only if the result is not true */ + g_getimmed (CF_INT | CF_CONST, 0, 0); /* Load FALSE */ + g_falsejump (CF_NONE, DoneLab); + + /* Load the true value */ + g_defcodelabel (TrueLab); + g_getimmed (CF_INT | CF_CONST, 1, 0); /* Load TRUE */ + g_defcodelabel (DoneLab); + } else { + /* Load the true value */ + g_defcodelabel (TrueLab); + g_getimmed (CF_INT | CF_CONST, 1, 0); /* Load TRUE */ + } + + /* The result is an rvalue in primary */ + ED_FinalizeRValLoad (Expr); + /* Condition codes are set */ + ED_TestDone (Expr); } } @@ -3061,8 +3854,9 @@ static void hieOr (ExprDesc *Expr) static void hieQuest (ExprDesc* Expr) /* Parse the ternary operator */ { - int FalseLab; - int TrueLab; + int FalseLab = 0; + int TrueLab = 0; + CodeMark SkippedBranch; CodeMark TrueCodeEnd; ExprDesc Expr2; /* Expression 2 */ ExprDesc Expr3; /* Expression 3 */ @@ -3070,7 +3864,6 @@ static void hieQuest (ExprDesc* Expr) int Expr3IsNULL; /* Expression 3 is a NULL pointer */ Type* ResultType; /* Type of result */ - /* Call the lower level eval routine */ if (Preprocessing) { ExprWithCheck (hieOrPP, Expr); @@ -3080,61 +3873,147 @@ static void hieQuest (ExprDesc* Expr) /* Check if it's a ternary expression */ if (CurTok.Tok == TOK_QUEST) { + + /* The constant condition must be compile-time known as well */ + int ConstantCond = ED_IsConstBool (Expr); + unsigned Flags = Expr->Flags & E_MASK_KEEP_RESULT; + + ED_Init (&Expr2); + Expr2.Flags = Flags; + ED_Init (&Expr3); + Expr3.Flags = Flags; + NextToken (); - if (!ED_IsTested (Expr)) { - /* Condition codes not set, request a test */ - ED_MarkForTest (Expr); + + /* Convert non-integer constant to boolean constant, so that we may just + ** check it in the same way. + */ + if (ED_IsConstTrue (Expr)) { + ED_MakeConstBool (Expr, 1); + } else if (ED_IsConstFalse (Expr)) { + ED_MakeConstBool (Expr, 0); + } + + if (!ConstantCond) { + /* Condition codes not set, request a test */ + ED_RequireTest (Expr); + LoadExpr (CF_NONE, Expr); + + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_TEST, Expr); + + FalseLab = GetLocalLabel (); + g_falsejump (CF_NONE, FalseLab); + } else { + /* Constant boolean subexpression could still have deferred inc/dec + ** operations, so just flush their side-effects at this sequence point. + */ + DoDeferred (SQP_KEEP_NONE, Expr); + + if (Expr->IVal == 0) { + /* Remember the current code position */ + GetCodePos (&SkippedBranch); + } } - LoadExpr (CF_NONE, Expr); - FalseLab = GetLocalLabel (); - g_falsejump (CF_NONE, FalseLab); /* Parse second expression. Remember for later if it is a NULL pointer ** expression, then load it into the primary. */ - ExprWithCheck (hie1, &Expr2); + ExprWithCheck (hie0, &Expr2); Expr2IsNULL = ED_IsNullPtr (&Expr2); - if (!IsTypeVoid (Expr2.Type)) { + if (!IsTypeVoid (Expr2.Type) && + ED_YetToLoad (&Expr2) && + (!ConstantCond || !ED_IsConst (&Expr2))) { /* Load it into the primary */ LoadExpr (CF_NONE, &Expr2); - ED_MakeRValExpr (&Expr2); - Expr2.Type = PtrConversion (Expr2.Type); + + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_EXPR, &Expr2); + + ED_FinalizeRValLoad (&Expr2); + } else { + /* Constant boolean subexpression could still have deferred inc/ + ** dec operations, so just flush their side-effects at this + ** sequence point. + */ + DoDeferred (SQP_KEEP_NONE, &Expr2); } + Expr2.Type = PtrConversion (Expr2.Type); - /* Remember the current code position */ - GetCodePos (&TrueCodeEnd); + if (!ConstantCond) { + /* Remember the current code position */ + GetCodePos (&TrueCodeEnd); - /* Jump around the evaluation of the third expression */ - TrueLab = GetLocalLabel (); - ConsumeColon (); - g_jump (TrueLab); + /* Jump around the evaluation of the third expression */ + TrueLab = GetLocalLabel (); - /* Jump here if the first expression was false */ - g_defcodelabel (FalseLab); + ConsumeColon (); + + g_jump (TrueLab); + + /* Jump here if the first expression was false */ + g_defcodelabel (FalseLab); + } else { + if (Expr->IVal == 0) { + /* Expr2 is unevaluated when the condition is false */ + Expr2.Flags |= E_EVAL_UNEVAL; + + /* Remove the load code of Expr2 */ + RemoveCode (&SkippedBranch); + } else { + /* Remember the current code position */ + GetCodePos (&SkippedBranch); + } + ConsumeColon(); + } /* Parse third expression. Remember for later if it is a NULL pointer ** expression, then load it into the primary. */ ExprWithCheck (hie1, &Expr3); Expr3IsNULL = ED_IsNullPtr (&Expr3); - if (!IsTypeVoid (Expr3.Type)) { + if (!IsTypeVoid (Expr3.Type) && + ED_YetToLoad (&Expr3) && + (!ConstantCond || !ED_IsConst (&Expr3))) { /* Load it into the primary */ LoadExpr (CF_NONE, &Expr3); - ED_MakeRValExpr (&Expr3); - Expr3.Type = PtrConversion (Expr3.Type); + + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_EXPR, &Expr3); + + ED_FinalizeRValLoad (&Expr3); + } else { + /* Constant boolean subexpression could still have deferred inc/ + ** dec operations, so just flush their side-effects at this + ** sequence point. + */ + DoDeferred (SQP_KEEP_NONE, &Expr3); + } + Expr3.Type = PtrConversion (Expr3.Type); + + if (ConstantCond && Expr->IVal != 0) { + /* Expr3 is unevaluated when the condition is true */ + Expr3.Flags |= E_EVAL_UNEVAL; + + /* Remove the load code of Expr3 */ + RemoveCode (&SkippedBranch); } /* Check if any conversions are needed, if so, do them. ** Conversion rules for ?: expression are: ** - if both expressions are int expressions, default promotion ** rules for ints apply. - ** - if both expressions are pointers of the same type, the - ** result of the expression is of this type. + ** - if both expressions have the same structure, union or void type, + ** the result has the same type. + ** - if both expressions are pointers to compatible types (possibly + ** qualified differently), the result of the expression is an + ** appropriately qualified version of the composite type. + ** - if one of the expressions is a pointer and the other is a + ** pointer to (possibly qualified) void, the resulting type is a + ** pointer to appropriately qualified void. ** - if one of the expressions is a pointer and the other is - ** a zero constant, the resulting type is that of the pointer - ** type. - ** - if both expressions are void expressions, the result is of - ** type void. + ** a null pointer constant, the resulting type is that of the + ** pointer type. ** - all other cases are flagged by an error. */ if (IsClassInt (Expr2.Type) && IsClassInt (Expr3.Type)) { @@ -3144,7 +4023,7 @@ static void hieQuest (ExprDesc* Expr) /* Get common type */ - ResultType = promoteint (Expr2.Type, Expr3.Type); + ResultType = TypeDup (ArithmeticConvert (Expr2.Type, Expr3.Type)); /* Convert the third expression to this type if needed */ TypeConversion (&Expr3, ResultType); @@ -3156,292 +4035,83 @@ static void hieQuest (ExprDesc* Expr) TypeConversion (&Expr2, ResultType); GetCodePos (&CvtCodeEnd); - /* If we had conversion code, move it to the right place */ - if (!CodeRangeIsEmpty (&CvtCodeStart, &CvtCodeEnd)) { - MoveCode (&CvtCodeStart, &CvtCodeEnd, &TrueCodeEnd); + if (!ConstantCond) { + /* If we had conversion code, move it to the right place */ + if (!CodeRangeIsEmpty (&CvtCodeStart, &CvtCodeEnd)) { + MoveCode (&CvtCodeStart, &CvtCodeEnd, &TrueCodeEnd); + } } } else if (IsClassPtr (Expr2.Type) && IsClassPtr (Expr3.Type)) { - /* Must point to same type */ - if (TypeCmp (Indirect (Expr2.Type), Indirect (Expr3.Type)) < TC_EQUAL) { - Error ("Incompatible pointer types"); - } - /* Result has the common type */ - ResultType = Expr2.Type; - } else if (IsClassPtr (Expr2.Type) && Expr3IsNULL) { - /* Result type is pointer, no cast needed */ - ResultType = Expr2.Type; - } else if (Expr2IsNULL && IsClassPtr (Expr3.Type)) { - /* Result type is pointer, no cast needed */ - ResultType = Expr3.Type; - } else if (IsTypeVoid (Expr2.Type) && IsTypeVoid (Expr3.Type)) { - /* Result type is void */ - ResultType = Expr3.Type; - } else { - Error ("Incompatible types"); - ResultType = Expr2.Type; /* Doesn't matter here */ - } - - /* Define the final label */ - g_defcodelabel (TrueLab); - - /* Setup the target expression */ - ED_MakeRValExpr (Expr); - Expr->Type = ResultType; - } -} - - - -static void opeq (const GenDesc* Gen, ExprDesc* Expr, const char* Op) -/* Process "op=" operators. */ -{ - ExprDesc Expr2; - unsigned flags; - CodeMark Mark; - int MustScale; - - /* op= can only be used with lvalues */ - if (!ED_IsLVal (Expr)) { - Error ("Invalid lvalue in assignment"); - return; - } - - /* The left side must not be const qualified */ - if (IsQualConst (Expr->Type)) { - Error ("Assignment to const"); - } - - /* There must be an integer or pointer on the left side */ - if (!IsClassInt (Expr->Type) && !IsTypePtr (Expr->Type)) { - Error ("Invalid left operand type"); - /* Continue. Wrong code will be generated, but the compiler won't - ** break, so this is the best error recovery. - */ - } - - /* Skip the operator token */ - NextToken (); - - /* Determine the type of the lhs */ - flags = TypeOf (Expr->Type); - MustScale = (Gen->Func == g_add || Gen->Func == g_sub) && IsTypePtr (Expr->Type); - - /* Get the lhs address on stack (if needed) */ - PushAddr (Expr); - - /* Fetch the lhs into the primary register if needed */ - LoadExpr (CF_NONE, Expr); - - /* Bring the lhs on stack */ - GetCodePos (&Mark); - g_push (flags, 0); - - /* Evaluate the rhs */ - MarkedExprWithCheck (hie1, &Expr2); - - /* The rhs must be an integer (or a float, but we don't support that yet */ - if (!IsClassInt (Expr2.Type)) { - Error ("Invalid right operand for binary operator `%s'", Op); - /* Continue. Wrong code will be generated, but the compiler won't - ** break, so this is the best error recovery. - */ - } - - /* Check for a constant expression */ - if (ED_IsConstAbs (&Expr2) && ED_CodeRangeIsEmpty (&Expr2)) { - /* The resulting value is a constant. If the generator has the NOPUSH - ** flag set, don't push the lhs. - */ - if (Gen->Flags & GEN_NOPUSH) { - RemoveCode (&Mark); - } - if (MustScale) { - /* lhs is a pointer, scale rhs */ - Expr2.IVal *= CheckedSizeOf (Expr->Type+1); - } - - /* If the lhs is character sized, the operation may be later done - ** with characters. - */ - if (CheckedSizeOf (Expr->Type) == SIZEOF_CHAR) { - flags |= CF_FORCECHAR; - } - - /* Special handling for add and sub - some sort of a hack, but short code */ - if (Gen->Func == g_add) { - g_inc (flags | CF_CONST, Expr2.IVal); - } else if (Gen->Func == g_sub) { - g_dec (flags | CF_CONST, Expr2.IVal); - } else { - if (Expr2.IVal == 0) { - /* Check for div by zero/mod by zero */ - if (Gen->Func == g_div) { - Error ("Division by zero"); - } else if (Gen->Func == g_mod) { - Error ("Modulo operation with zero"); + /* If one of the two is 'void *', the result type is a pointer to + ** appropriately qualified void. + */ + if (IsTypeVoid (Indirect (Expr2.Type))) { + ResultType = NewPointerTo (Indirect (Expr2.Type)); + ResultType[1].C |= GetQualifier (Indirect (Expr3.Type)); + } else if (IsTypeVoid (Indirect (Expr3.Type))) { + ResultType = NewPointerTo (Indirect (Expr3.Type)); + ResultType[1].C |= GetQualifier (Indirect (Expr2.Type)); + } else { + /* Must point to compatible types */ + if (TypeCmp (Expr2.Type, Expr3.Type).C < TC_VOID_PTR) { + TypeCompatibilityDiagnostic (Expr2.Type, Expr3.Type, + 1, "Incompatible pointer types in ternary: '%s' and '%s'"); + /* Avoid further errors */ + ResultType = NewPointerTo (type_void); + } else { + /* Result has the composite type */ + ResultType = TypeDup (Expr2.Type); + TypeComposition (ResultType, Expr3.Type); } } - Gen->Func (flags | CF_CONST, Expr2.IVal); - } - } else { - - /* rhs is not constant. Load into the primary */ - LoadExpr (CF_NONE, &Expr2); - if (MustScale) { - /* lhs is a pointer, scale rhs */ - g_scale (TypeOf (Expr2.Type), CheckedSizeOf (Expr->Type+1)); + } else if (IsClassPtr (Expr2.Type) && Expr3IsNULL) { + /* Result type is pointer, no cast needed */ + ResultType = TypeDup (Expr2.Type); + } else if (Expr2IsNULL && IsClassPtr (Expr3.Type)) { + /* Result type is pointer, no cast needed */ + ResultType = TypeDup (Expr3.Type); + } else if (IsTypeVoid (Expr2.Type) && IsTypeVoid (Expr3.Type)) { + /* Result type is void */ + ResultType = TypeDup (type_void); + } else { + if (IsClassStruct (Expr2.Type) && IsClassStruct (Expr3.Type) && + TypeCmp (Expr2.Type, Expr3.Type).C == TC_IDENTICAL) { + /* Result type is struct/union */ + ResultType = TypeDup (Expr2.Type); + } else { + TypeCompatibilityDiagnostic (Expr2.Type, Expr3.Type, 1, + "Incompatible types in ternary '%s' with '%s'"); + ResultType = TypeDup (Expr2.Type); /* Doesn't matter here */ + } } - /* If the lhs is character sized, the operation may be later done - ** with characters. - */ - if (CheckedSizeOf (Expr->Type) == SIZEOF_CHAR) { - flags |= CF_FORCECHAR; + if (!ConstantCond) { + /* Define the final label */ + g_defcodelabel (TrueLab); + /* Set up the result expression type */ + ED_FinalizeRValLoad (Expr); + /* Restore the original evaluation flags */ + Expr->Flags = (Expr->Flags & ~E_MASK_KEEP_RESULT) | Flags; + } else { + if (Expr->IVal != 0) { + *Expr = Expr2; + } else { + *Expr = Expr3; + } } - /* Adjust the types of the operands if needed */ - Gen->Func (g_typeadjust (flags, TypeOf (Expr2.Type)), 0); - } - Store (Expr, 0); - ED_MakeRValExpr (Expr); -} + /* Setup the target expression */ + Expr->Type = ResultType; - - -static void addsubeq (const GenDesc* Gen, ExprDesc *Expr, const char* Op) -/* Process the += and -= operators */ -{ - ExprDesc Expr2; - unsigned lflags; - unsigned rflags; - int MustScale; - - - /* We're currently only able to handle some adressing modes */ - if (ED_GetLoc (Expr) == E_LOC_EXPR || ED_GetLoc (Expr) == E_LOC_PRIMARY) { - /* Use generic routine */ - opeq (Gen, Expr, Op); - return; - } - - /* We must have an lvalue */ - if (ED_IsRVal (Expr)) { - Error ("Invalid lvalue in assignment"); - return; - } - - /* The left side must not be const qualified */ - if (IsQualConst (Expr->Type)) { - Error ("Assignment to const"); - } - - /* There must be an integer or pointer on the left side */ - if (!IsClassInt (Expr->Type) && !IsTypePtr (Expr->Type)) { - Error ("Invalid left operand type"); - /* Continue. Wrong code will be generated, but the compiler won't - ** break, so this is the best error recovery. - */ - } - - /* Skip the operator */ - NextToken (); - - /* Check if we have a pointer expression and must scale rhs */ - MustScale = IsTypePtr (Expr->Type); - - /* Initialize the code generator flags */ - lflags = 0; - rflags = 0; - - /* Evaluate the rhs. We expect an integer here, since float is not - ** supported - */ - hie1 (&Expr2); - if (!IsClassInt (Expr2.Type)) { - Error ("Invalid right operand for binary operator `%s'", Op); - /* Continue. Wrong code will be generated, but the compiler won't - ** break, so this is the best error recovery. - */ - } - if (ED_IsConstAbs (&Expr2)) { - /* The resulting value is a constant. Scale it. */ - if (MustScale) { - Expr2.IVal *= CheckedSizeOf (Indirect (Expr->Type)); + /* Propagate viral flags */ + if ((Expr2.Flags & E_EVAL_UNEVAL) != E_EVAL_UNEVAL) { + ED_PropagateFrom (Expr, &Expr2); } - rflags |= CF_CONST; - lflags |= CF_CONST; - } else { - /* Not constant, load into the primary */ - LoadExpr (CF_NONE, &Expr2); - if (MustScale) { - /* lhs is a pointer, scale rhs */ - g_scale (TypeOf (Expr2.Type), CheckedSizeOf (Indirect (Expr->Type))); + if ((Expr3.Flags & E_EVAL_UNEVAL) != E_EVAL_UNEVAL) { + ED_PropagateFrom (Expr, &Expr3); } } - - /* Setup the code generator flags */ - lflags |= TypeOf (Expr->Type) | GlobalModeFlags (Expr) | CF_FORCECHAR; - rflags |= TypeOf (Expr2.Type) | CF_FORCECHAR; - - /* Convert the type of the lhs to that of the rhs */ - g_typecast (lflags, rflags); - - /* Output apropriate code depending on the location */ - switch (ED_GetLoc (Expr)) { - - case E_LOC_ABS: - /* Absolute: numeric address or const */ - if (Gen->Tok == TOK_PLUS_ASSIGN) { - g_addeqstatic (lflags, Expr->Name, Expr->IVal, Expr2.IVal); - } else { - g_subeqstatic (lflags, Expr->Name, Expr->IVal, Expr2.IVal); - } - break; - - case E_LOC_GLOBAL: - /* Global variable */ - if (Gen->Tok == TOK_PLUS_ASSIGN) { - g_addeqstatic (lflags, Expr->Name, Expr->IVal, Expr2.IVal); - } else { - g_subeqstatic (lflags, Expr->Name, Expr->IVal, Expr2.IVal); - } - break; - - case E_LOC_STATIC: - case E_LOC_LITERAL: - /* Static variable or literal in the literal pool */ - if (Gen->Tok == TOK_PLUS_ASSIGN) { - g_addeqstatic (lflags, Expr->Name, Expr->IVal, Expr2.IVal); - } else { - g_subeqstatic (lflags, Expr->Name, Expr->IVal, Expr2.IVal); - } - break; - - case E_LOC_REGISTER: - /* Register variable */ - if (Gen->Tok == TOK_PLUS_ASSIGN) { - g_addeqstatic (lflags, Expr->Name, Expr->IVal, Expr2.IVal); - } else { - g_subeqstatic (lflags, Expr->Name, Expr->IVal, Expr2.IVal); - } - break; - - case E_LOC_STACK: - /* Value on the stack */ - if (Gen->Tok == TOK_PLUS_ASSIGN) { - g_addeqlocal (lflags, Expr->IVal, Expr2.IVal); - } else { - g_subeqlocal (lflags, Expr->IVal, Expr2.IVal); - } - break; - - default: - Internal ("Invalid location in Store(): 0x%04X", ED_GetLoc (Expr)); - } - - /* Expression is a rvalue in the primary now */ - ED_MakeRValExpr (Expr); } @@ -3453,47 +4123,47 @@ void hie1 (ExprDesc* Expr) switch (CurTok.Tok) { case TOK_ASSIGN: - Assignment (Expr); + OpAssign (0, Expr, "="); break; case TOK_PLUS_ASSIGN: - addsubeq (&GenPASGN, Expr, "+="); + OpAddSubAssign (&GenPASGN, Expr, "+="); break; case TOK_MINUS_ASSIGN: - addsubeq (&GenSASGN, Expr, "-="); + OpAddSubAssign (&GenSASGN, Expr, "-="); break; case TOK_MUL_ASSIGN: - opeq (&GenMASGN, Expr, "*="); + OpAssign (&GenMASGN, Expr, "*="); break; case TOK_DIV_ASSIGN: - opeq (&GenDASGN, Expr, "/="); + OpAssign (&GenDASGN, Expr, "/="); break; case TOK_MOD_ASSIGN: - opeq (&GenMOASGN, Expr, "%="); + OpAssign (&GenMOASGN, Expr, "%="); break; case TOK_SHL_ASSIGN: - opeq (&GenSLASGN, Expr, "<<="); + OpAssign (&GenSLASGN, Expr, "<<="); break; case TOK_SHR_ASSIGN: - opeq (&GenSRASGN, Expr, ">>="); + OpAssign (&GenSRASGN, Expr, ">>="); break; case TOK_AND_ASSIGN: - opeq (&GenAASGN, Expr, "&="); + OpAssign (&GenAASGN, Expr, "&="); break; case TOK_XOR_ASSIGN: - opeq (&GenXOASGN, Expr, "^="); + OpAssign (&GenXOASGN, Expr, "^="); break; case TOK_OR_ASSIGN: - opeq (&GenOASGN, Expr, "|="); + OpAssign (&GenOASGN, Expr, "|="); break; default: @@ -3506,60 +4176,76 @@ void hie1 (ExprDesc* Expr) void hie0 (ExprDesc *Expr) /* Parse comma operator. */ { + unsigned Flags = Expr->Flags & E_MASK_KEEP_MAKE; + unsigned PrevErrorCount = ErrorCount; + CodeMark Start, End; + + /* Remember the current code position */ + GetCodePos (&Start); + hie1 (Expr); while (CurTok.Tok == TOK_COMMA) { + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_NONE, Expr); + + /* If the expression has no observable effect and isn't cast to type + ** void, emit a warning and remove useless code if any. + */ + GetCodePos (&End); + if (CodeRangeIsEmpty (&Start, &End) || + (Expr->Flags & E_SIDE_EFFECTS) == 0) { + + if (!ED_MayHaveNoEffect (Expr) && + IS_Get (&WarnNoEffect) && + PrevErrorCount == ErrorCount) { + Warning ("Left-hand operand of comma expression has no effect"); + } + + /* Remove code with no effect */ + RemoveCode (&Start); + } + + PrevErrorCount = ErrorCount; + + /* Remember the current code position */ + GetCodePos (&Start); + + /* Keep viral flags propagated from subexpressions */ + Flags |= Expr->Flags & E_MASK_VIRAL; + + /* Reset the expression */ + ED_Init (Expr); + Expr->Flags = Flags & ~E_MASK_VIRAL; NextToken (); hie1 (Expr); - } -} - - -int evalexpr (unsigned Flags, void (*Func) (ExprDesc*), ExprDesc* Expr) -/* Will evaluate an expression via the given function. If the result is a -** constant, 0 is returned and the value is put in the Expr struct. If the -** result is not constant, LoadExpr is called to bring the value into the -** primary register and 1 is returned. -*/ -{ - /* Evaluate */ - ExprWithCheck (Func, Expr); - - /* Check for a constant expression */ - if (ED_IsConstAbs (Expr)) { - /* Constant expression */ - return 0; - } else { - /* Not constant, load into the primary */ - LoadExpr (Flags, Expr); - return 1; + /* Propagate viral flags */ + Expr->Flags |= Flags & E_MASK_VIRAL; } } void Expression0 (ExprDesc* Expr) -/* Evaluate an expression via hie0 and put the result into the primary register */ -{ - ExprWithCheck (hie0, Expr); - LoadExpr (CF_NONE, Expr); -} - - - -void ConstExpr (void (*Func) (ExprDesc*), ExprDesc* Expr) -/* Will evaluate an expression via the given function. If the result is not -** a constant of some sort, a diagnostic will be printed, and the value is -** replaced by a constant one to make sure there are no internal errors that -** result from this input error. +/* Evaluate an expression via hie0 and put the result into the primary register. +** The expression is completely evaluated and all side effects complete. */ { - ExprWithCheck (Func, Expr); - if (!ED_IsConst (Expr)) { - Error ("Constant expression expected"); - /* To avoid any compiler errors, make the expression a valid const */ - ED_MakeConstAbsInt (Expr, 1); + unsigned Flags = Expr->Flags & E_MASK_KEEP_RESULT; + + /* Only check further after the expression is evaluated */ + ExprWithCheck (hie0, Expr); + + if ((Expr->Flags & Flags & E_MASK_EVAL) != (Flags & E_MASK_EVAL)) { + Internal ("Expression flags tampered: %08X", Flags); } + + if (ED_YetToLoad (Expr)) { + LoadExpr (CF_NONE, Expr); + } + + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_EXPR, Expr); } @@ -3573,25 +4259,57 @@ void BoolExpr (void (*Func) (ExprDesc*), ExprDesc* Expr) { ExprWithCheck (Func, Expr); if (!ED_IsBool (Expr)) { - Error ("Boolean expression expected"); + Error ("Scalar expression expected"); /* To avoid any compiler errors, make the expression a valid int */ - ED_MakeConstAbsInt (Expr, 1); + ED_MakeConstBool (Expr, 1); } } -void ConstAbsIntExpr (void (*Func) (ExprDesc*), ExprDesc* Expr) -/* Will evaluate an expression via the given function. If the result is not -** a constant numeric integer value, a diagnostic will be printed, and the -** value is replaced by a constant one to make sure there are no internal -** errors that result from this input error. +ExprDesc NoCodeConstExpr (void (*Func) (ExprDesc*)) +/* Get an expression evaluated via the given function. If the result is not a +** constant expression without runtime code generated, a diagnostic will be +** printed, and the value is replaced by a constant one to make sure there are +** no internal errors that result from this input error. */ { - ExprWithCheck (Func, Expr); - if (!ED_IsConstAbsInt (Expr)) { + ExprDesc Expr; + ED_Init (&Expr); + + Expr.Flags |= E_EVAL_C_CONST; + MarkedExprWithCheck (Func, &Expr); + if (!ED_IsConst (&Expr) || !ED_CodeRangeIsEmpty (&Expr)) { + Error ("Constant expression expected"); + /* To avoid any compiler errors, make the expression a valid const */ + Expr.Flags &= E_MASK_RTYPE | E_MASK_KEEP_RESULT; + Expr.Flags |= E_LOC_NONE; + } + + /* Return by value */ + return Expr; +} + + + +ExprDesc NoCodeConstAbsIntExpr (void (*Func) (ExprDesc*)) +/* Get an expression evaluated via the given function. If the result is not a +** constant numeric integer value without runtime code generated, a diagnostic +** will be printed, and the value is replaced by a constant one to make sure +** there are no internal errors that result from this input error. +*/ +{ + ExprDesc Expr; + ED_Init (&Expr); + + Expr.Flags |= E_EVAL_C_CONST; + MarkedExprWithCheck (Func, &Expr); + if (!ED_IsConstAbsInt (&Expr) || !ED_CodeRangeIsEmpty (&Expr)) { Error ("Constant integer expression expected"); /* To avoid any compiler errors, make the expression a valid const */ - ED_MakeConstAbsInt (Expr, 1); + ED_MakeConstAbsInt (&Expr, 1); } + + /* Return by value */ + return Expr; } diff --git a/src/cc65/expr.h b/src/cc65/expr.h index a6c183cbd..abdf8ab0d 100644 --- a/src/cc65/expr.h +++ b/src/cc65/expr.h @@ -17,12 +17,40 @@ +/*****************************************************************************/ +/* data */ +/*****************************************************************************/ + + + +#define SQP_KEEP_NONE 0x00 +#define SQP_KEEP_TEST 0x01U +#define SQP_KEEP_EAX 0x02U +#define SQP_KEEP_EXPR 0x03U /* SQP_KEEP_TEST | SQP_KEEP_EAX */ + +/* Generator attributes */ +#define GEN_NOPUSH 0x01 /* Don't push lhs */ +#define GEN_COMM 0x02 /* Operator is commutative */ +#define GEN_NOFUNC 0x04 /* Not allowed for function pointers */ + +/* Map a generator function and its attributes to a token */ +typedef struct GenDesc { + long Tok; /* Token to map to */ + unsigned Flags; /* Flags for generator function */ + void (*Func) (unsigned, unsigned long); /* Generator func */ +} GenDesc; + + + /*****************************************************************************/ /* code */ /*****************************************************************************/ +unsigned GlobalModeFlags (const ExprDesc* Expr); +/* Return the addressing mode flags for the given expression */ + void ExprWithCheck (void (*Func) (ExprDesc*), ExprDesc* Expr); /* Call an expression function with checks. */ @@ -31,6 +59,9 @@ void MarkedExprWithCheck (void (*Func) (ExprDesc*), ExprDesc* Expr); ** generated code. */ +void LimitExprValue (ExprDesc* Expr); +/* Limit the constant value of the expression to the range of its type */ + void PushAddr (const ExprDesc* Expr); /* If the expression contains an address that was somehow evaluated, ** push this address on the stack. This is a helper function for all @@ -38,27 +69,32 @@ void PushAddr (const ExprDesc* Expr); ** must be saved if it's not constant, before evaluating the rhs. */ +void InitDeferredOps (void); +/* Init the collection for storing deferred ops */ + +void DoneDeferredOps (void); +/* Deinit the collection for storing deferred ops */ + +int GetDeferredOpCount (void); +/* Return how many deferred operations are still waiting in the queque */ + +void CheckDeferredOpAllDone (void); +/* Check if all deferred operations are done at sequence points. +** Die off if check fails. +*/ + +void DoDeferred (unsigned Flags, ExprDesc* Expr); +/* Do deferred operations such as post-inc/dec at sequence points */ + void Store (ExprDesc* Expr, const Type* StoreType); /* Store the primary register into the location denoted by lval. If StoreType ** is given, use this type when storing instead of lval->Type. If StoreType ** is NULL, use lval->Type instead. */ -int evalexpr (unsigned flags, void (*Func) (ExprDesc*), ExprDesc* Expr); -/* Will evaluate an expression via the given function. If the result is a -** constant, 0 is returned and the value is put in the Expr struct. If the -** result is not constant, LoadExpr is called to bring the value into the -** primary register and 1 is returned. -*/ - void Expression0 (ExprDesc* Expr); -/* Evaluate an expression via hie0 and put the result into the primary register */ - -void ConstExpr (void (*Func) (ExprDesc*), ExprDesc* Expr); -/* Will evaluate an expression via the given function. If the result is not -** a constant of some sort, a diagnostic will be printed, and the value is -** replaced by a constant one to make sure there are no internal errors that -** result from this input error. +/* Evaluate an expression via hie0 and put the result into the primary register. +** The expression is completely evaluated and all side effects complete. */ void BoolExpr (void (*Func) (ExprDesc*), ExprDesc* Expr); @@ -68,11 +104,18 @@ void BoolExpr (void (*Func) (ExprDesc*), ExprDesc* Expr); ** are no internal errors that result from this input error. */ -void ConstAbsIntExpr (void (*Func) (ExprDesc*), ExprDesc* Expr); -/* Will evaluate an expression via the given function. If the result is not -** a constant numeric integer value, a diagnostic will be printed, and the -** value is replaced by a constant one to make sure there are no internal -** errors that result from this input error. +ExprDesc NoCodeConstExpr (void (*Func) (ExprDesc*)); +/* Get an expression evaluated via the given function. If the result is not a +** constant expression without runtime code generated, a diagnostic will be +** printed, and the value is replaced by a constant one to make sure there are +** no internal errors that result from this input error. +*/ + +ExprDesc NoCodeConstAbsIntExpr (void (*Func) (ExprDesc*)); +/* Get an expression evaluated via the given function. If the result is not a +** constant numeric integer value without runtime code generated, a diagnostic +** will be printed, and the value is replaced by a constant one to make sure +** there are no internal errors that result from this input error. */ void hie10 (ExprDesc* lval); diff --git a/src/cc65/exprdesc.c b/src/cc65/exprdesc.c index 405c277a0..7d0ace004 100644 --- a/src/cc65/exprdesc.c +++ b/src/cc65/exprdesc.c @@ -44,7 +44,6 @@ #include "exprdesc.h" #include "stackptr.h" #include "symentry.h" -#include "exprdesc.h" @@ -57,26 +56,63 @@ ExprDesc* ED_Init (ExprDesc* Expr) /* Initialize an ExprDesc */ { - Expr->Sym = 0; Expr->Type = 0; - Expr->Flags = 0; + Expr->Flags = E_NEED_EAX; Expr->Name = 0; + Expr->Sym = 0; Expr->IVal = 0; - Expr->FVal = FP_D_Make (0.0); - Expr->LVal = 0; - Expr->BitOffs = 0; - Expr->BitWidth = 0; + memset (&Expr->V, 0, sizeof (Expr->V)); return Expr; } -void ED_MakeBitField (ExprDesc* Expr, unsigned BitOffs, unsigned BitWidth) -/* Make this expression a bit field expression */ +#if !defined(HAVE_INLINE) +int ED_IsLocQuasiConst (const ExprDesc* Expr) +/* Return true if the expression is a constant location of some sort or on the +** stack. +*/ { - Expr->Flags |= E_BITFIELD; - Expr->BitOffs = BitOffs; - Expr->BitWidth = BitWidth; + return ED_IsLocConst (Expr) || ED_IsLocStack (Expr); +} +#endif + + + +#if !defined(HAVE_INLINE) +int ED_IsLocPrimaryOrExpr (const ExprDesc* Expr) +/* Return true if the expression is E_LOC_PRIMARY or E_LOC_EXPR */ +{ + return ED_IsLocPrimary (Expr) || ED_IsLocExpr (Expr); +} +#endif + + + +#if !defined(HAVE_INLINE) +int ED_IsIndExpr (const ExprDesc* Expr) +/* Check if the expression is a reference to its value */ +{ + return (Expr->Flags & E_ADDRESS_OF) == 0 && !ED_IsLocNone (Expr); +} +#endif + + + +int ED_YetToLoad (const ExprDesc* Expr) +/* Check if the expression needs to be loaded somehow. */ +{ + return ED_NeedsPrimary (Expr) || + ED_YetToTest (Expr) || + (ED_IsLVal (Expr) && IsQualVolatile (Expr->Type)); +} + + + +void ED_MarkForUneval (ExprDesc* Expr) +/* Mark the expression as not to be evaluated */ +{ + Expr->Flags = (Expr->Flags & ~E_MASK_EVAL) | E_EVAL_UNEVAL; } @@ -116,8 +152,9 @@ const char* ED_GetLabelName (const ExprDesc* Expr, long Offs) /* Generate a label depending on the location */ switch (ED_GetLoc (Expr)) { + case E_LOC_NONE: case E_LOC_ABS: - /* Absolute: numeric address or const */ + /* Absolute numeric addressed variable */ SB_Printf (&Buf, "$%04X", (int)(Offs & 0xFFFF)); break; @@ -138,6 +175,15 @@ const char* ED_GetLabelName (const ExprDesc* Expr, long Offs) case E_LOC_LITERAL: /* Literal in the literal pool */ + if (Offs) { + SB_Printf (&Buf, "%s%+ld", PooledLiteralLabelName (Expr->Name), Offs); + } else { + SB_Printf (&Buf, "%s", PooledLiteralLabelName (Expr->Name)); + } + break; + + case E_LOC_CODE: + /* Code label location */ if (Offs) { SB_Printf (&Buf, "%s%+ld", LocalLabelName (Expr->Name), Offs); } else { @@ -168,62 +214,195 @@ int ED_GetStackOffs (const ExprDesc* Expr, int Offs) -ExprDesc* ED_MakeConstAbs (ExprDesc* Expr, long Value, Type* Type) -/* Make Expr an absolute const with the given value and type. */ +ExprDesc* ED_MakeConstAbs (ExprDesc* Expr, long Value, const Type* Type) +/* Replace Expr with an absolute const with the given value and type */ { - Expr->Sym = 0; Expr->Type = Type; - Expr->Flags = E_LOC_ABS | E_RTYPE_RVAL | (Expr->Flags & E_HAVE_MARKS); + Expr->Flags = E_LOC_NONE | E_RTYPE_RVAL | (Expr->Flags & E_MASK_KEEP_MAKE); Expr->Name = 0; + Expr->Sym = 0; Expr->IVal = Value; - Expr->FVal = FP_D_Make (0.0); + memset (&Expr->V, 0, sizeof (Expr->V)); return Expr; } ExprDesc* ED_MakeConstAbsInt (ExprDesc* Expr, long Value) -/* Make Expr a constant integer expression with the given value */ +/* Replace Expr with a constant integer expression with the given value */ +{ + Expr->Type = type_int; + Expr->Flags = E_LOC_NONE | E_RTYPE_RVAL | (Expr->Flags & E_MASK_KEEP_MAKE); + Expr->Name = 0; + Expr->Sym = 0; + Expr->IVal = Value; + memset (&Expr->V, 0, sizeof (Expr->V)); + return Expr; +} + + + +ExprDesc* ED_MakeConstBool (ExprDesc* Expr, long Value) +/* Replace Expr with a constant boolean expression with the given value */ { Expr->Sym = 0; - Expr->Type = type_int; - Expr->Flags = E_LOC_ABS | E_RTYPE_RVAL | (Expr->Flags & E_HAVE_MARKS); + Expr->Type = type_bool; + Expr->Flags = E_LOC_NONE | E_RTYPE_RVAL | (Expr->Flags & E_MASK_KEEP_MAKE); Expr->Name = 0; Expr->IVal = Value; - Expr->FVal = FP_D_Make (0.0); + memset (&Expr->V, 0, sizeof (Expr->V)); return Expr; } -ExprDesc* ED_MakeRValExpr (ExprDesc* Expr) -/* Convert Expr into a rvalue which is in the primary register without an -** offset. -*/ +ExprDesc* ED_FinalizeRValLoad (ExprDesc* Expr) +/* Finalize the result of LoadExpr to be an rvalue in the primary register */ { + Expr->Flags &= ~(E_MASK_LOC | E_MASK_RTYPE | E_ADDRESS_OF); + Expr->Flags &= ~E_CC_SET; + Expr->Flags |= (E_LOC_PRIMARY | E_RTYPE_RVAL); Expr->Sym = 0; - Expr->Flags &= ~(E_MASK_LOC | E_MASK_RTYPE | E_BITFIELD | E_NEED_TEST | E_CC_SET); - Expr->Flags |= (E_LOC_EXPR | E_RTYPE_RVAL); Expr->Name = 0; Expr->IVal = 0; /* No offset */ - Expr->FVal = FP_D_Make (0.0); + memset (&Expr->V, 0, sizeof (Expr->V)); return Expr; } -ExprDesc* ED_MakeLValExpr (ExprDesc* Expr) -/* Convert Expr into a lvalue which is in the primary register without an -** offset. +ExprDesc* ED_AddrExpr (ExprDesc* Expr) +/* Take address of Expr. The result is always an rvalue */ +{ + switch (Expr->Flags & E_MASK_LOC) { + case E_LOC_NONE: + Error ("Cannot get the address of a numeric constant"); + break; + + case E_LOC_EXPR: + Expr->Flags &= ~(E_MASK_LOC | E_MASK_RTYPE); + Expr->Flags |= E_ADDRESS_OF | E_LOC_PRIMARY | E_RTYPE_RVAL; + break; + + default: + if ((Expr->Flags & E_ADDRESS_OF) == 0) { + Expr->Flags &= ~E_MASK_RTYPE; + Expr->Flags |= E_ADDRESS_OF | E_RTYPE_RVAL; + } else { + /* Due to the way we handle arrays, this may happen if we take + ** the address of a pointer to an array element. + */ + if (!IsTypePtr (Expr->Type)) { + Error ("Cannot get the address of an address"); + } + Expr->Flags &= ~E_MASK_RTYPE; + Expr->Flags |= E_RTYPE_RVAL; + } + break; + } + return Expr; +} + + + +ExprDesc* ED_IndExpr (ExprDesc* Expr) +/* Dereference Expr */ +{ + switch (Expr->Flags & E_MASK_LOC) { + case E_LOC_NONE: + Expr->Flags &= ~(E_MASK_LOC | E_MASK_RTYPE); + Expr->Flags |= E_LOC_ABS | E_RTYPE_LVAL; + break; + + case E_LOC_PRIMARY: + Expr->Flags &= ~(E_MASK_LOC | E_MASK_RTYPE); + Expr->Flags |= E_LOC_EXPR | E_RTYPE_LVAL; + break; + + default: + if ((Expr->Flags & E_ADDRESS_OF) != 0) { + Expr->Flags &= ~(E_MASK_RTYPE | E_ADDRESS_OF); + Expr->Flags |= E_RTYPE_LVAL; + } else { + /* Due to the limitation of LoadExpr, this may happen after we + ** have loaded the value from a referenced address, in which + ** case the content in the primary no longer refers to the + ** original address. We simply mark this as E_LOC_EXPR so that + ** some info about the original location can be retained. + ** If it's really meant to dereference a "pointer value", it + ** should be done in two steps where the pointervalue should + ** be the manually loaded first before a call into this, and + ** the offset should be manually cleared somewhere outside. + */ + Expr->Flags &= ~(E_MASK_LOC | E_MASK_RTYPE); + Expr->Flags |= E_LOC_EXPR | E_RTYPE_LVAL; + } + break; + } + return Expr; +} + + + +#if !defined(HAVE_INLINE) +int ED_IsAbs (const ExprDesc* Expr) +/* Return true if the expression denotes a numeric value or address. */ +{ + return (Expr->Flags & (E_MASK_LOC)) == (E_LOC_NONE) || + (Expr->Flags & (E_MASK_LOC|E_ADDRESS_OF)) == (E_LOC_ABS|E_ADDRESS_OF); +} +#endif + + + +#if !defined(HAVE_INLINE) +int ED_IsConstAbs (const ExprDesc* Expr) +/* Return true if the expression denotes a constant absolute value. This can be +** a numeric constant, cast to any type. */ { - Expr->Sym = 0; - Expr->Flags &= ~(E_MASK_LOC | E_MASK_RTYPE | E_BITFIELD | E_NEED_TEST | E_CC_SET); - Expr->Flags |= (E_LOC_EXPR | E_RTYPE_LVAL); - Expr->Name = 0; - Expr->IVal = 0; /* No offset */ - Expr->FVal = FP_D_Make (0.0); - return Expr; + return ED_IsRVal (Expr) && ED_IsAbs (Expr); +} +#endif + + + +int ED_IsConstAbsInt (const ExprDesc* Expr) +/* Return true if the expression is a constant (numeric) integer. */ +{ + return ED_IsConstAbs (Expr) && IsClassInt (Expr->Type); +} + + + +int ED_IsConstBool (const ExprDesc* Expr) +/* Return true if the expression can be constantly evaluated as a boolean. */ +{ + return ED_IsConstAbsInt (Expr) || ED_IsAddrExpr (Expr); +} + + + +int ED_IsConstTrue (const ExprDesc* Expr) +/* Return true if the constant expression can be evaluated as boolean true at +** compile time. +*/ +{ + /* Non-zero arithmetics and objects addresses are boolean true */ + return (ED_IsConstAbsInt (Expr) && Expr->IVal != 0) || + (ED_IsAddrExpr (Expr)); +} + + + +int ED_IsConstFalse (const ExprDesc* Expr) +/* Return true if the constant expression can be evaluated as boolean false at +** compile time. +*/ +{ + /* Zero arithmetics and null pointers are boolean false */ + return (ED_IsConstAbsInt (Expr) && Expr->IVal == 0) || + ED_IsNullPtr (Expr); } @@ -234,16 +413,36 @@ int ED_IsConst (const ExprDesc* Expr) ** similar. */ { - return ED_IsRVal (Expr) && (Expr->Flags & E_LOC_CONST) != 0; + return (Expr->Flags & E_MASK_LOC) == E_LOC_NONE || ED_IsConstAddr (Expr); } -int ED_IsConstAbsInt (const ExprDesc* Expr) -/* Return true if the expression is a constant (numeric) integer. */ +int ED_IsQuasiConst (const ExprDesc* Expr) +/* Return true if the expression denotes a quasi-constant of some sort. This +** can be a numeric constant, a constant address or a stack variable address. +*/ { - return (Expr->Flags & (E_MASK_LOC|E_MASK_RTYPE)) == (E_LOC_ABS|E_RTYPE_RVAL) && - IsClassInt (Expr->Type); + return (Expr->Flags & E_MASK_LOC) == E_LOC_NONE || ED_IsQuasiConstAddr (Expr); +} + + +int ED_IsConstAddr (const ExprDesc* Expr) +/* Return true if the expression denotes a constant address of some sort. This +** can be the address of a global variable (maybe with offset) or similar. +*/ +{ + return ED_IsAddrExpr (Expr) && ED_IsLocConst (Expr); +} + + + +int ED_IsQuasiConstAddr (const ExprDesc* Expr) +/* Return true if the expression denotes a quasi-constant address of some sort. +** This can be a constant address or a stack variable address. +*/ +{ + return ED_IsAddrExpr (Expr) && ED_IsLocQuasiConst (Expr); } @@ -251,8 +450,8 @@ int ED_IsConstAbsInt (const ExprDesc* Expr) int ED_IsNullPtr (const ExprDesc* Expr) /* Return true if the given expression is a NULL pointer constant */ { - return (Expr->Flags & (E_MASK_LOC|E_MASK_RTYPE|E_BITFIELD)) == - (E_LOC_ABS|E_RTYPE_RVAL) && + return (Expr->Flags & (E_MASK_LOC|E_MASK_RTYPE)) == + (E_LOC_NONE|E_RTYPE_RVAL) && Expr->IVal == 0 && IsClassInt (Expr->Type); } @@ -260,14 +459,15 @@ int ED_IsNullPtr (const ExprDesc* Expr) int ED_IsBool (const ExprDesc* Expr) -/* Return true of the expression can be treated as a boolean, that is, it can +/* Return true if the expression can be treated as a boolean, that is, it can ** be an operand to a compare operation. */ { /* Either ints, floats, or pointers can be used in a boolean context */ return IsClassInt (Expr->Type) || IsClassFloat (Expr->Type) || - IsClassPtr (Expr->Type); + IsClassPtr (Expr->Type) || + IsClassFunc (Expr->Type); } @@ -289,11 +489,16 @@ void PrintExprDesc (FILE* F, ExprDesc* E) "Raw type: (unknown)\n"); } fprintf (F, "IVal: 0x%08lX\n", E->IVal); - fprintf (F, "FVal: %f\n", FP_D_ToFloat (E->FVal)); + fprintf (F, "FVal: %f\n", FP_D_ToFloat (E->V.FVal)); Flags = E->Flags; Sep = '('; fprintf (F, "Flags: 0x%04X ", Flags); + if ((Flags & E_MASK_LOC) == E_LOC_NONE) { + fprintf (F, "%cE_LOC_NONE", Sep); + Flags &= ~E_LOC_NONE; + Sep = ','; + } if (Flags & E_LOC_ABS) { fprintf (F, "%cE_LOC_ABS", Sep); Flags &= ~E_LOC_ABS; @@ -334,14 +539,9 @@ void PrintExprDesc (FILE* F, ExprDesc* E) Flags &= ~E_LOC_LITERAL; Sep = ','; } - if (Flags & E_RTYPE_LVAL) { - fprintf (F, "%cE_RTYPE_LVAL", Sep); - Flags &= ~E_RTYPE_LVAL; - Sep = ','; - } - if (Flags & E_BITFIELD) { - fprintf (F, "%cE_BITFIELD", Sep); - Flags &= ~E_BITFIELD; + if (Flags & E_LOC_CODE) { + fprintf (F, "%cE_LOC_CODE", Sep); + Flags &= ~E_LOC_CODE; Sep = ','; } if (Flags & E_NEED_TEST) { @@ -354,6 +554,16 @@ void PrintExprDesc (FILE* F, ExprDesc* E) Flags &= ~E_CC_SET; Sep = ','; } + if (Flags & E_RTYPE_LVAL) { + fprintf (F, "%cE_RTYPE_LVAL", Sep); + Flags &= ~E_RTYPE_LVAL; + Sep = ','; + } + if (Flags & E_ADDRESS_OF) { + fprintf (F, "%cE_ADDRESS_OF", Sep); + Flags &= ~E_ADDRESS_OF; + Sep = ','; + } if (Flags) { fprintf (F, "%c,0x%04X", Sep, Flags); Sep = ','; @@ -361,15 +571,15 @@ void PrintExprDesc (FILE* F, ExprDesc* E) if (Sep != '(') { fputc (')', F); } - fprintf (F, "\nName: 0x%08lX\n", E->Name); + fprintf (F, "\nName: 0x%08lX\n", (unsigned long)E->Name); } -Type* ReplaceType (ExprDesc* Expr, const Type* NewType) +const Type* ReplaceType (ExprDesc* Expr, const Type* NewType) /* Replace the type of Expr by a copy of Newtype and return the old type string */ { - Type* OldType = Expr->Type; + const Type* OldType = Expr->Type; Expr->Type = TypeDup (NewType); return OldType; } diff --git a/src/cc65/exprdesc.h b/src/cc65/exprdesc.h index 99a17313e..a1674a7cc 100644 --- a/src/cc65/exprdesc.h +++ b/src/cc65/exprdesc.h @@ -38,6 +38,7 @@ +#include <inttypes.h> #include <string.h> /* common */ @@ -58,35 +59,140 @@ /* Defines for the flags field of the expression descriptor */ enum { - /* Location: Where is the value we're talking about? */ - E_MASK_LOC = 0x00FF, - E_LOC_ABS = 0x0001, /* Absolute: numeric address or const */ + /* Location: Where is the value we're talking about? + ** + ** Remarks: + ** - E_LOC_<else> refers to any other than E_LOC_NONE and E_LOC_PRIMARY. + ** - E_LOC_EXPR can be regarded as a generalized E_LOC_<else>. + ** - E_LOC_NONE can be regarded as E_LOC_PRIMARY + E_ADDRESS_OF unless + ** remarked otherwise (see below). + ** - An E_LOC_NONE value is not considered to be an "address". + ** - ref-load doesn't change the location, while rval-load puts into the + ** primary register a "temporary" that is the straight integer rvalue or + ** a "delegate" to the real rvalue somewhere else. + ** - ref-load doesn't change the rval/lval category of the expression, + ** while rval-load converts it to an rvalue if it wasn't. + ** - In practice, ref-load is unimplemented, and can be simulated with + ** adding E_ADDRESS_OF temporaily through LoadExpr + FinalizeLoad, + ** whilst val-load is done with LoadExpr + FinalizeRValLoad. + ** + ** E_LOC_NONE -- ref-load -> + E_LOADED (int rvalue) + ** E_LOC_PRIMARY -- ref-load -> + E_LOADED (unchanged) + ** E_LOC_<else> -- ref-load -> + E_LOADED (reference lvalue) + ** + E_ADDRESS_OF -- ref-load -> + E_LOADED (address rvalue) + ** E_LOC_NONE -- val-load -> E_LOC_PRIMARY (int rvalue) + ** E_LOC_PRIMARY -- val-load -> E_LOC_PRIMARY (unchanged) + ** E_LOC_<else> -- val-load -> E_LOC_PRIMARY (rvalue/delegate) + ** + E_ADDRESS_OF -- val-load -> E_LOC_PRIMARY (address rvalue) + ** E_LOC_NONE -- take address -> (error) + ** E_LOC_PRIMARY -- take address -> + E_ADDRESS_OF (or error) + ** E_LOC_EXPR -- take address -> E_LOC_PRIMARY (address) + ** E_LOC_<else> -- take address -> + E_ADDRESS_OF (address) + ** + E_ADDRESS_OF -- take address -> (error) + ** E_LOC_NONE -- dereference -> E_LOC_ABS (lvalue reference) + ** E_LOC_PRIMARY -- dereference -> E_LOC_EXPR (lvalue reference) + ** E_LOC_<else> -- dereference -> E_LOC_EXPR (pointed-to-value, must load) + ** + E_ADDRESS_OF -- dereference -> (lvalue reference) + */ + E_MASK_LOC = 0x01FF, + E_LOC_NONE = 0x0000, /* Pure rvalue with no storage */ + E_LOC_ABS = 0x0001, /* Absolute numeric addressed variable */ E_LOC_GLOBAL = 0x0002, /* Global variable */ E_LOC_STATIC = 0x0004, /* Static variable */ E_LOC_REGISTER = 0x0008, /* Register variable */ E_LOC_STACK = 0x0010, /* Value on the stack */ - E_LOC_PRIMARY = 0x0020, /* The primary register */ - E_LOC_EXPR = 0x0040, /* An expression in the primary register */ + E_LOC_PRIMARY = 0x0020, /* Temporary in primary register */ + E_LOC_EXPR = 0x0040, /* A location that the primary register points to */ E_LOC_LITERAL = 0x0080, /* Literal in the literal pool */ + E_LOC_CODE = 0x0100, /* C code label location (&&Label) */ - /* Constant location of some sort (only if rval) */ - E_LOC_CONST = E_LOC_ABS | E_LOC_GLOBAL | E_LOC_STATIC | - E_LOC_REGISTER | E_LOC_LITERAL, + /* Immutable location addresses (immutable bases and offsets) */ + E_LOC_CONST = E_LOC_NONE | E_LOC_ABS | E_LOC_GLOBAL | E_LOC_STATIC | + E_LOC_REGISTER | E_LOC_LITERAL | E_LOC_CODE, - /* Reference? */ - E_MASK_RTYPE = 0x0100, + /* Not-so-immutable location addresses (stack offsets may change dynamically) */ + E_LOC_QUASICONST = E_LOC_CONST | E_LOC_STACK, + + /* Expression type modifiers */ + E_ADDRESS_OF = 0x0400, /* Expression is the address of the lvalue */ + + /* lvalue/rvalue in C language's sense */ + E_MASK_RTYPE = 0x0800, E_RTYPE_RVAL = 0x0000, - E_RTYPE_LVAL = 0x0100, + E_RTYPE_LVAL = 0x0800, - /* Bit-field? */ - E_BITFIELD = 0x0200, + /* Expression status */ + E_LOADED = 0x1000, /* Expression is loaded in primary */ + E_CC_SET = 0x2000, /* Condition codes are set */ + E_HAVE_MARKS = 0x4000, /* Code marks are valid */ + E_SIDE_EFFECTS = 0x8000, /* Expression has had side effects */ - /* Test */ - E_NEED_TEST = 0x0400, /* Expression needs a test to set cc */ - E_CC_SET = 0x0800, /* Condition codes are set */ + /* Optimization hints */ + E_MASK_NEED = 0x030000, + E_NEED_EAX = 0x000000, /* Expression result needs to be loaded in Primary */ + E_NEED_NONE = 0x010000, /* Expression result is unused */ + E_NEED_TEST = 0x020000, /* Expression needs a test to set cc */ - E_HAVE_MARKS = 0x1000, /* Code marks are valid */ + /* Expression evaluation requirements. + ** Usage: (Flags & E_EVAL_<Flag>) == E_EVAL_<Flag> + ** + ** Remark: + ** - Expression result, that is the "final value" of the expression, is no + ** more than one of the effects of the whole expression. Effects other + ** than it are usually consided "side-effects" in this regard. + ** - The compiler front end cannot know things determined by the linker, + ** such as the actual address of an object with static storage. What it + ** can know is categorized as "compiler-known" here. + ** - The concept "immutable" here means that once something is determined + ** (not necessarily by the compiler), it will never change. This is not + ** the same meaning as the "constant" word in the C standard. + ** - The concept "compile-time" ( not to be confued with "compiler-known"), + ** or "static" (compared to "run-time" as in "_Static_assert" in C, not + ** to be confused with the "static" storage) here means that something + ** has no run-time behaviors, enforced by the fact that it generates no + ** target code (hence "no-code"). It is closely related to the concepts + ** above but not the same. + ** - An "unevaluated" expression is special and different from the above: + ** while it generates no code, cannot change its "value" (it actually has + ** no value), and must be completely handled by the compiler front-end, + ** it is unique in that it is not "evaluated" while the others are, and + ** the codegen routine of such an expression is usually separated from + ** the normally evaluated ones. Therefore it is treated differently from + ** the above and uses a separate flag that implies none of the above. + ** - The "maybe-unused" flag is to suppress the checking and warning on + ** expressions with no effects. It doesn't have any special meanings + ** beyond that, and is independent from the E_NEED_<flag>s. All + ** "unevaluated" expressions are flagged as "maybe-unused" just to + ** avoid unnecessary warnings. + ** + ** Relationship of some concepts: + ** - "no-code" implies "no-side-effects" + ** - "immutable" = "compiler-known" OR "no-code" + ** - "constant expression" in C = "compiler-known" AND "no-code", with minor differences + */ + E_MASK_EVAL = 0xFC0000, + E_EVAL_NONE = 0x000000, /* No requirements */ + E_EVAL_IMMUTABLE_RESULT = 0x040000, /* Expression result must be immutable */ + E_EVAL_COMPILER_KNOWN = 0x0C0000, /* Expression result must be known to the compiler */ + E_EVAL_NO_SIDE_EFFECTS = 0x100000, /* Evaluation must have no side effects */ + E_EVAL_NO_CODE = 0x340000, /* Evaluation must generate no code */ + E_EVAL_MAYBE_UNUSED = 0x400000, /* Expression result may be unused */ + E_EVAL_UNEVAL = 0xC00000, /* Expression is unevaluated */ + /* Expression result must be known to the compiler and generate no code to load */ + E_EVAL_C_CONST = E_EVAL_COMPILER_KNOWN | E_EVAL_NO_CODE, + + /* Flags to combine from subexpressions */ + E_MASK_VIRAL = E_SIDE_EFFECTS, + + /* Flags to keep in subexpressions of most operations other than ternary */ + E_MASK_KEEP_SUBEXPR = E_MASK_EVAL, + + /* Flags to keep for the two result subexpressions of the ternary operation */ + E_MASK_KEEP_RESULT = E_MASK_NEED | E_MASK_EVAL, + + /* Flags to keep when using the ED_Make functions */ + E_MASK_KEEP_MAKE = E_HAVE_MARKS | E_MASK_KEEP_RESULT, }; /* Forward */ @@ -95,17 +201,15 @@ struct Literal; /* Describe the result of an expression */ typedef struct ExprDesc ExprDesc; struct ExprDesc { - struct SymEntry* Sym; /* Symbol table entry if known */ - Type* Type; /* Type array of expression */ - unsigned Flags; - unsigned long Name; /* Name or label number */ + const Type* Type; /* C type of the expression */ + unsigned Flags; /* Properties of the expression */ + uintptr_t Name; /* Name pointer or label number */ + struct SymEntry* Sym; /* Symbol table entry if any */ long IVal; /* Integer value if expression constant */ - Double FVal; /* Floating point value */ - struct Literal* LVal; /* Literal value */ - - /* Bit field stuff */ - unsigned BitOffs; /* Bit offset for bit fields */ - unsigned BitWidth; /* Bit width for bit fields */ + union { + Double FVal; /* Floating point value */ + struct Literal* LVal; /* Literal value */ + } V; /* Start and end of generated code */ CodeMark Start; @@ -134,8 +238,18 @@ INLINE int ED_GetLoc (const ExprDesc* Expr) #endif #if defined(HAVE_INLINE) -INLINE int ED_IsLocAbs (const ExprDesc* Expr) +INLINE int ED_IsLocNone (const ExprDesc* Expr) /* Return true if the expression is an absolute value */ +{ + return (Expr->Flags & E_MASK_LOC) == E_LOC_NONE; +} +#else +# define ED_IsLocNone(Expr) (((Expr)->Flags & E_MASK_LOC) == E_LOC_NONE) +#endif + +#if defined(HAVE_INLINE) +INLINE int ED_IsLocAbs (const ExprDesc* Expr) +/* Return true if the expression is referenced with an absolute address */ { return (Expr->Flags & E_MASK_LOC) == E_LOC_ABS; } @@ -150,7 +264,7 @@ INLINE int ED_IsLocRegister (const ExprDesc* Expr) return (Expr->Flags & E_MASK_LOC) == E_LOC_REGISTER; } #else -# define ED_IsLocRegister(Expr) (((Expr)->Flags & E_MASK_LOC) == E_LOC_REGISTER) +# define ED_IsLocRegister(Expr) (((Expr)->Flags & E_MASK_LOC) == E_LOC_REGISTER) #endif #if defined(HAVE_INLINE) @@ -186,7 +300,7 @@ INLINE int ED_IsLocExpr (const ExprDesc* Expr) #if defined(HAVE_INLINE) INLINE int ED_IsLocLiteral (const ExprDesc* Expr) /* Return true if the expression is a string from the literal pool */ -{ +{ return (Expr->Flags & E_MASK_LOC) == E_LOC_LITERAL; } #else @@ -197,73 +311,65 @@ INLINE int ED_IsLocLiteral (const ExprDesc* Expr) INLINE int ED_IsLocConst (const ExprDesc* Expr) /* Return true if the expression is a constant location of some sort */ { - return (Expr->Flags & E_LOC_CONST) != 0; + return ((Expr)->Flags & E_MASK_LOC & ~E_LOC_CONST) == 0; } #else -# define ED_IsLocConst(Expr) (((Expr)->Flags & E_LOC_CONST) != 0) +# define ED_IsLocConst(Expr) (((Expr)->Flags & E_MASK_LOC & ~E_LOC_CONST) == 0) #endif #if defined(HAVE_INLINE) -INLINE int ED_IsLVal (const ExprDesc* Expr) -/* Return true if the expression is a reference */ +INLINE int ED_IsLocQuasiConst (const ExprDesc* Expr) +/* Return true if the expression is a constant location of some sort or on the +** stack. +*/ { - return (Expr->Flags & E_MASK_RTYPE) == E_RTYPE_LVAL; + return ED_IsLocConst (Expr) || ED_IsLocStack (Expr); } #else -# define ED_IsLVal(Expr) (((Expr)->Flags & E_MASK_RTYPE) == E_RTYPE_LVAL) +int ED_IsLocQuasiConst (const ExprDesc* Expr); +/* Return true if the expression denotes a constant address of some sort. This +** can be the address of a global variable (maybe with offset) or similar. +*/ #endif #if defined(HAVE_INLINE) -INLINE int ED_IsRVal (const ExprDesc* Expr) -/* Return true if the expression is a rvalue */ -{ - return (Expr->Flags & E_MASK_RTYPE) == E_RTYPE_RVAL; -} -#else -# define ED_IsRVal(Expr) (((Expr)->Flags & E_MASK_RTYPE) == E_RTYPE_RVAL) -#endif - -#if defined(HAVE_INLINE) -INLINE void ED_MakeLVal (ExprDesc* Expr) -/* Make the expression a lvalue. */ -{ - Expr->Flags |= E_RTYPE_LVAL; -} -#else -# define ED_MakeLVal(Expr) do { (Expr)->Flags |= E_RTYPE_LVAL; } while (0) -#endif - -#if defined(HAVE_INLINE) -INLINE void ED_MakeRVal (ExprDesc* Expr) -/* Make the expression a rvalue. */ -{ - Expr->Flags &= ~E_RTYPE_LVAL; -} -#else -# define ED_MakeRVal(Expr) do { (Expr)->Flags &= ~E_RTYPE_LVAL; } while (0) -#endif - -#if defined(HAVE_INLINE) -INLINE int ED_IsBitField (const ExprDesc* Expr) -/* Return true if the expression is a bit field */ -{ - return (Expr->Flags & E_BITFIELD) != 0; -} -#else -# define ED_IsBitField(Expr) (((Expr)->Flags & E_BITFIELD) != 0) -#endif - -void ED_MakeBitField (ExprDesc* Expr, unsigned BitOffs, unsigned BitWidth); -/* Make this expression a bit field expression */ - -#if defined(HAVE_INLINE) -INLINE void ED_MarkForTest (ExprDesc* Expr) +INLINE void ED_RequireTest (ExprDesc* Expr) /* Mark the expression for a test. */ { Expr->Flags |= E_NEED_TEST; } #else -# define ED_MarkForTest(Expr) do { (Expr)->Flags |= E_NEED_TEST; } while (0) +# define ED_RequireTest(Expr) do { (Expr)->Flags |= E_NEED_TEST; } while (0) +#endif + +#if defined(HAVE_INLINE) +INLINE void ED_RequireNoTest (ExprDesc* Expr) +/* Mark the expression not for a test. */ +{ + Expr->Flags &= ~E_NEED_TEST; +} +#else +# define ED_RequireNoTest(Expr) do { (Expr)->Flags &= ~E_NEED_TEST; } while (0) +#endif + +#if defined(HAVE_INLINE) +INLINE int ED_GetNeeds (const ExprDesc* Expr) +/* Get flags about what the expression needs. */ +{ + return (Expr->Flags & E_MASK_NEED); +} +#else +# define ED_GetNeeds(Expr) ((Expr)->Flags & E_MASK_NEED) +#endif + +#if defined(HAVE_INLINE) +INLINE int ED_NeedsPrimary (const ExprDesc* Expr) +/* Check if the expression needs to be in Primary. */ +{ + return (Expr->Flags & E_MASK_NEED) == E_NEED_EAX; +} +#else +# define ED_NeedsPrimary(Expr) (((Expr)->Flags & E_MASK_NEED) == E_NEED_EAX) #endif #if defined(HAVE_INLINE) @@ -276,15 +382,25 @@ INLINE int ED_NeedsTest (const ExprDesc* Expr) # define ED_NeedsTest(Expr) (((Expr)->Flags & E_NEED_TEST) != 0) #endif +#if defined(HAVE_INLINE) +INLINE int ED_YetToTest (const ExprDesc* Expr) +/* Check if the expression needs to be tested but not yet. */ +{ + return ((Expr)->Flags & (E_NEED_TEST | E_CC_SET)) == E_NEED_TEST; +} +#else +# define ED_YetToTest(Expr) (((Expr)->Flags & (E_NEED_TEST | E_CC_SET)) == E_NEED_TEST) +#endif + #if defined(HAVE_INLINE) INLINE void ED_TestDone (ExprDesc* Expr) /* Mark the expression as tested and condition codes set. */ { - Expr->Flags = (Expr->Flags & ~E_NEED_TEST) | E_CC_SET; + Expr->Flags |= E_CC_SET; } #else # define ED_TestDone(Expr) \ - do { (Expr)->Flags = ((Expr)->Flags & ~E_NEED_TEST) | E_CC_SET; } while (0) + do { (Expr)->Flags |= E_CC_SET; } while (0) #endif #if defined(HAVE_INLINE) @@ -307,6 +423,97 @@ INLINE void ED_MarkAsUntested (ExprDesc* Expr) # define ED_MarkAsUntested(Expr) do { (Expr)->Flags &= ~E_CC_SET; } while (0) #endif +#if defined(HAVE_INLINE) +INLINE int ED_IsLoaded (const ExprDesc* Expr) +/* Check if the expression is loaded. +** NOTE: This is currently unused and not working due to code complexity. +*/ +{ + return (Expr->Flags & E_LOADED) != 0; +} +#else +# define ED_IsLoaded(Expr) (((Expr)->Flags & E_LOADED) != 0) +#endif + +int ED_YetToLoad (const ExprDesc* Expr); +/* Check if the expression is yet to be loaded somehow. */ + +#if defined(HAVE_INLINE) +INLINE int ED_NeedsConst (const ExprDesc* Expr) +/* Check if the expression need be immutable */ +{ + return (Expr->Flags & E_EVAL_IMMUTABLE_RESULT) == E_EVAL_IMMUTABLE_RESULT; +} +#else +# define ED_NeedsConst(Expr) (((Expr)->Flags & E_EVAL_IMMUTABLE_RESULT) == E_EVAL_IMMUTABLE_RESULT) +#endif + +void ED_MarkForUneval (ExprDesc* Expr); +/* Mark the expression as not to be evaluated */ + +#if defined(HAVE_INLINE) +INLINE int ED_IsUneval (const ExprDesc* Expr) +/* Check if the expression is not to be evaluated */ +{ + return (Expr->Flags & E_EVAL_UNEVAL) == E_EVAL_UNEVAL; +} +#else +# define ED_IsUneval(Expr) (((Expr)->Flags & E_EVAL_UNEVAL) == E_EVAL_UNEVAL) +#endif + +#if defined(HAVE_INLINE) +INLINE int ED_MayHaveNoEffect (const ExprDesc* Expr) +/* Check if the expression may be present without effects */ +{ + return (Expr->Flags & E_EVAL_MAYBE_UNUSED) == E_EVAL_MAYBE_UNUSED; +} +#else +# define ED_MayHaveNoEffect(Expr) (((Expr)->Flags & E_EVAL_MAYBE_UNUSED) == E_EVAL_MAYBE_UNUSED) +#endif + +#if defined(HAVE_INLINE) +INLINE void ED_PropagateFrom (ExprDesc* Expr, const ExprDesc* SubExpr) +/* Propagate viral flags from subexpression */ +{ + Expr->Flags |= SubExpr->Flags & E_MASK_VIRAL; +} +#else +# define ED_PropagateFrom(Expr, SubExpr) (void)((Expr)->Flags |= (SubExpr)->Flags & E_MASK_VIRAL) +#endif + +#if defined(HAVE_INLINE) +INLINE int ED_IsLocPrimaryOrExpr (const ExprDesc* Expr) +/* Return true if the expression is E_LOC_PRIMARY or E_LOC_EXPR */ +{ + return ED_IsLocPrimary (Expr) || ED_IsLocExpr (Expr); +} +#else +int ED_IsLocPrimaryOrExpr (const ExprDesc* Expr); +/* Return true if the expression is E_LOC_PRIMARY or E_LOC_EXPR */ +#endif + +#if defined(HAVE_INLINE) +INLINE int ED_IsAddrExpr (const ExprDesc* Expr) +/* Check if the expression is taken address of instead of its value. +*/ +{ + return (Expr->Flags & E_ADDRESS_OF) != 0; +} +#else +# define ED_IsAddrExpr(Expr) (((Expr)->Flags & E_ADDRESS_OF) != 0) +#endif + +#if defined(HAVE_INLINE) +INLINE int ED_IsIndExpr (const ExprDesc* Expr) +/* Check if the expression is a reference to its value */ +{ + return (Expr->Flags & E_ADDRESS_OF) == 0 && !ED_IsLocNone (Expr); +} +#else +int ED_IsIndExpr (const ExprDesc* Expr); +/* Check if the expression is a reference to its value */ +#endif + void ED_SetCodeRange (ExprDesc* Expr, const CodeMark* Start, const CodeMark* End); /* Set the code range for this expression */ @@ -324,20 +531,113 @@ int ED_GetStackOffs (const ExprDesc* Expr, int Offs); ** an additional offset in Offs. */ -ExprDesc* ED_MakeConstAbs (ExprDesc* Expr, long Value, Type* Type); -/* Make Expr an absolute const with the given value and type. */ +ExprDesc* ED_MakeConstAbs (ExprDesc* Expr, long Value, const Type* Type); +/* Replace Expr with an absolute const with the given value and type */ ExprDesc* ED_MakeConstAbsInt (ExprDesc* Expr, long Value); -/* Make Expr a constant integer expression with the given value */ +/* Replace Expr with an constant integer with the given value */ -ExprDesc* ED_MakeRValExpr (ExprDesc* Expr); -/* Convert Expr into a rvalue which is in the primary register without an -** offset. +ExprDesc* ED_MakeConstBool (ExprDesc* Expr, long Value); +/* Replace Expr with a constant boolean expression with the given value */ + +ExprDesc* ED_FinalizeRValLoad (ExprDesc* Expr); +/* Finalize the result of LoadExpr to be an rvalue in the primary register */ + +#if defined(HAVE_INLINE) +INLINE int ED_IsLVal (const ExprDesc* Expr) +/* Return true if the expression is a reference */ +{ + return ((Expr)->Flags & E_MASK_RTYPE) == E_RTYPE_LVAL; +} +#else +# define ED_IsLVal(Expr) (((Expr)->Flags & E_MASK_RTYPE) == E_RTYPE_LVAL) +#endif + +#if defined(HAVE_INLINE) +INLINE int ED_IsRVal (const ExprDesc* Expr) +/* Return true if the expression is an rvalue */ +{ + return ((Expr)->Flags & E_MASK_RTYPE) == E_RTYPE_RVAL; +} +#else +# define ED_IsRVal(Expr) (((Expr)->Flags & E_MASK_RTYPE) == E_RTYPE_RVAL) +#endif + +#if defined(HAVE_INLINE) +INLINE void ED_MarkExprAsLVal (ExprDesc* Expr) +/* Mark the expression as an lvalue. +** HINT: Consider using ED_IndExpr instead of this, unless you know what +** consequence there will be, as there are both a big part in the code +** assuming rvalue = const and a big part assuming rvalue = address. +*/ +{ + Expr->Flags |= E_RTYPE_LVAL; +} +#else +# define ED_MarkExprAsLVal(Expr) do { (Expr)->Flags |= E_RTYPE_LVAL; } while (0) +#endif + +#if defined(HAVE_INLINE) +INLINE void ED_MarkExprAsRVal (ExprDesc* Expr) +/* Mark the expression as an rvalue. +** HINT: Consider using ED_AddrExpr instead of this, unless you know what +** consequence there will be, as there are both a big part in the code +** assuming rvalue = const and a big part assuming rvalue = address. +*/ +{ + Expr->Flags &= ~E_RTYPE_LVAL; +} +#else +# define ED_MarkExprAsRVal(Expr) do { (Expr)->Flags &= ~E_RTYPE_LVAL; } while (0) +#endif + +ExprDesc* ED_AddrExpr (ExprDesc* Expr); +/* Take address of Expr */ + +ExprDesc* ED_IndExpr (ExprDesc* Expr); +/* Dereference Expr */ + +#if defined(HAVE_INLINE) +INLINE int ED_IsAbs (const ExprDesc* Expr) +/* Return true if the expression denotes a numeric value or address. */ +{ + return (Expr->Flags & (E_MASK_LOC)) == (E_LOC_NONE) || + (Expr->Flags & (E_MASK_LOC|E_ADDRESS_OF)) == (E_LOC_ABS|E_ADDRESS_OF); +} +#else +int ED_IsAbs (const ExprDesc* Expr); +/* Return true if the expression denotes a numeric value or address. */ +#endif + +#if defined(HAVE_INLINE) +INLINE int ED_IsConstAbs (const ExprDesc* Expr) +/* Return true if the expression denotes a constant absolute value. This can be +** a numeric constant, cast to any type. +*/ +{ + return ED_IsRVal (Expr) && ED_IsAbs (Expr); +} +#else +int ED_IsConstAbs (const ExprDesc* Expr); +/* Return true if the expression denotes a constant absolute value. This can be +** a numeric constant, cast to any type. +*/ +#endif + +int ED_IsConstAbsInt (const ExprDesc* Expr); +/* Return true if the expression is a constant (numeric) integer. */ + +int ED_IsConstBool (const ExprDesc* Expr); +/* Return true if the expression can be constantly evaluated as a boolean. */ + +int ED_IsConstTrue (const ExprDesc* Expr); +/* Return true if the constant expression can be evaluated as boolean true at +** compile time. */ -ExprDesc* ED_MakeLValExpr (ExprDesc* Expr); -/* Convert Expr into a lvalue which is in the primary register without an -** offset. +int ED_IsConstFalse (const ExprDesc* Expr); +/* Return true if the constant expression can be evaluated as boolean false at +** compile time. */ int ED_IsConst (const ExprDesc* Expr); @@ -346,34 +646,33 @@ int ED_IsConst (const ExprDesc* Expr); ** similar. */ -#if defined(HAVE_INLINE) -INLINE int ED_IsConstAbs (const ExprDesc* Expr) -/* Return true if the expression denotes a constant absolute value. This can be -** a numeric constant, cast to any type. +int ED_IsQuasiConst (const ExprDesc* Expr); +/* Return true if the expression denotes a quasi-constant of some sort. This +** can be a numeric constant, a constant address or a stack variable address. */ -{ - return (Expr->Flags & (E_MASK_LOC|E_MASK_RTYPE)) == (E_LOC_ABS|E_RTYPE_RVAL); -} -#else -# define ED_IsConstAbs(E) \ - (((E)->Flags & (E_MASK_LOC|E_MASK_RTYPE)) == (E_LOC_ABS|E_RTYPE_RVAL)) -#endif -int ED_IsConstAbsInt (const ExprDesc* Expr); -/* Return true if the expression is a constant (numeric) integer. */ +int ED_IsConstAddr (const ExprDesc* Expr); +/* Return true if the expression denotes a constant address of some sort. This +** can be the address of a global variable (maybe with offset) or similar. +*/ + +int ED_IsQuasiConstAddr (const ExprDesc* Expr); +/* Return true if the expression denotes a quasi-constant address of some sort. +** This can be a constant address or a stack variable address. +*/ int ED_IsNullPtr (const ExprDesc* Expr); /* Return true if the given expression is a NULL pointer constant */ int ED_IsBool (const ExprDesc* Expr); -/* Return true of the expression can be treated as a boolean, that is, it can -** be an operand to a compare operation. +/* Return true if the expression can be treated as a boolean, that is, it can +** be an operand to a compare operation with 0/NULL. */ void PrintExprDesc (FILE* F, ExprDesc* Expr); /* Print an ExprDesc */ -Type* ReplaceType (ExprDesc* Expr, const Type* NewType); +const Type* ReplaceType (ExprDesc* Expr, const Type* NewType); /* Replace the type of Expr by a copy of Newtype and return the old type string */ diff --git a/src/cc65/funcdesc.c b/src/cc65/funcdesc.c index b9561a97c..2291b35ee 100644 --- a/src/cc65/funcdesc.c +++ b/src/cc65/funcdesc.c @@ -54,12 +54,15 @@ FuncDesc* NewFuncDesc (void) FuncDesc* F = (FuncDesc*) xmalloc (sizeof (FuncDesc)); /* Nullify the fields */ - F->Flags = 0; - F->SymTab = 0; - F->TagTab = 0; - F->ParamCount = 0; - F->ParamSize = 0; - F->LastParam = 0; + F->Flags = 0; + F->SymTab = 0; + F->TagTab = 0; + F->ParamCount = 0; + F->ParamSize = 0; + F->LastParam = 0; + F->FuncDef = 0; + F->WrappedCall = 0; + F->WrappedCallData = 0; /* Return the new struct */ return F; diff --git a/src/cc65/funcdesc.h b/src/cc65/funcdesc.h index b79c6a055..e065c7602 100644 --- a/src/cc65/funcdesc.h +++ b/src/cc65/funcdesc.h @@ -45,28 +45,33 @@ /* Masks for the Flags field in FuncDesc */ -#define FD_NONE 0x0000U /* No flags */ -#define FD_EMPTY 0x0001U /* Function with empty param list */ -#define FD_VOID_PARAM 0x0002U /* Function with a void param list */ -#define FD_VARIADIC 0x0004U /* Function with variable param list */ -#define FD_OLDSTYLE 0x0010U /* Old style (K&R) function */ -#define FD_OLDSTYLE_INTRET 0x0020U /* K&R func has implicit int return */ -#define FD_UNNAMED_PARAMS 0x0040U /* Function has unnamed params */ +#define FD_NONE 0x0000U /* No flags */ +#define FD_EMPTY 0x0001U /* Function with empty param list */ +#define FD_VOID_PARAM 0x0002U /* Function with a void param list */ +#define FD_VARIADIC 0x0004U /* Function with variable param list */ +#define FD_INCOMPLETE_PARAM 0x0008U /* Function with param of unknown size */ +#define FD_OLDSTYLE 0x0010U /* Old style (K&R) function */ +#define FD_OLDSTYLE_INTRET 0x0020U /* K&R func has implicit int return */ +#define FD_UNNAMED_PARAMS 0x0040U /* Function has unnamed params */ +#define FD_CALL_WRAPPER 0x0080U /* This function is used as a wrapper */ /* Bits that must be ignored when comparing funcs */ -#define FD_IGNORE (FD_OLDSTYLE | FD_OLDSTYLE_INTRET | FD_UNNAMED_PARAMS) - +#define FD_IGNORE (FD_INCOMPLETE_PARAM | FD_OLDSTYLE | FD_OLDSTYLE_INTRET | FD_UNNAMED_PARAMS | FD_CALL_WRAPPER) +#define WRAPPED_CALL_USE_BANK 0x0100U /* WrappedCall uses .bank() */ /* Function descriptor */ typedef struct FuncDesc FuncDesc; struct FuncDesc { - unsigned Flags; /* Bitmapped flags FD_... */ - struct SymTable* SymTab; /* Symbol table */ - struct SymTable* TagTab; /* Symbol table for structs/enums */ - unsigned ParamCount; /* Number of parameters */ - unsigned ParamSize; /* Size of the parameters */ - struct SymEntry* LastParam; /* Pointer to last parameter */ + unsigned Flags; /* Bitmapped flags FD_... */ + struct SymTable* SymTab; /* Symbol table */ + struct SymTable* TagTab; /* Symbol table for structs/enums */ + unsigned ParamCount; /* Number of parameters */ + unsigned ParamSize; /* Size of the parameters */ + struct SymEntry* LastParam; /* Pointer to last parameter */ + struct FuncDesc* FuncDef; /* Descriptor used in definition */ + struct SymEntry* WrappedCall; /* Pointer to the WrappedCall */ + unsigned int WrappedCallData; /* The WrappedCall's user data */ }; diff --git a/src/cc65/function.c b/src/cc65/function.c index 22b305739..452181af9 100644 --- a/src/cc65/function.c +++ b/src/cc65/function.c @@ -61,26 +61,6 @@ -/* Enumeration for function flags */ -typedef enum { - FF_NONE = 0x0000, - FF_HAS_RETURN = 0x0001, /* Function has a return statement */ - FF_IS_MAIN = 0x0002, /* This is the main function */ - FF_VOID_RETURN = 0x0004, /* Function returning void */ -} funcflags_t; - -/* Structure that holds all data needed for function activation */ -struct Function { - struct SymEntry* FuncEntry; /* Symbol table entry */ - Type* ReturnType; /* Function return type */ - FuncDesc* Desc; /* Function descriptor */ - int Reserved; /* Reserved local space */ - unsigned RetLab; /* Return code label */ - int TopLevelSP; /* SP at function top level */ - unsigned RegOffs; /* Register variable space offset */ - funcflags_t Flags; /* Function flags */ -}; - /* Pointer to current function */ Function* CurrentFunc = 0; @@ -92,7 +72,7 @@ Function* CurrentFunc = 0; -static Function* NewFunction (struct SymEntry* Sym) +static Function* NewFunction (struct SymEntry* Sym, FuncDesc* D) /* Create a new function activation structure and return it */ { /* Allocate a new structure */ @@ -101,13 +81,15 @@ static Function* NewFunction (struct SymEntry* Sym) /* Initialize the fields */ F->FuncEntry = Sym; F->ReturnType = GetFuncReturn (Sym->Type); - F->Desc = GetFuncDesc (Sym->Type); + F->Desc = D; F->Reserved = 0; - F->RetLab = GetLocalLabel (); + F->RetLab = 0; F->TopLevelSP = 0; F->RegOffs = RegisterSpace; F->Flags = IsTypeVoid (F->ReturnType) ? FF_VOID_RETURN : FF_NONE; + InitCollection (&F->LocalsBlockStack); + /* Return the new structure */ return F; } @@ -117,11 +99,74 @@ static Function* NewFunction (struct SymEntry* Sym) static void FreeFunction (Function* F) /* Free a function activation structure */ { + DoneCollection (&F->LocalsBlockStack); xfree (F); } +int F_CheckParamList (FuncDesc* D, int RequireAll) +/* Check and set the parameter sizes. +** If RequireAll is true, emit errors on parameters of incomplete types. +** Return true if all parameters have complete types. +*/ +{ + unsigned I = 0; + unsigned Offs; + SymEntry* Param; + unsigned ParamSize = 0; + unsigned IncompleteCount = 0; + + /* Don't bother to check unnecessarily */ + if ((D->Flags & FD_INCOMPLETE_PARAM) == 0) { + return 1; + } + + /* Assign offsets. If the function has a variable parameter list, + ** there's one additional byte (the arg size). + */ + Offs = (D->Flags & FD_VARIADIC) ? 1 : 0; + Param = D->LastParam; + while (Param) { + unsigned Size = SizeOf (Param->Type); + if (RequireAll && IsIncompleteESUType (Param->Type)) { + if (D->Flags & FD_UNNAMED_PARAMS) { + Error ("Parameter %u has incomplete type '%s'", + D->ParamCount - I, + GetFullTypeName (Param->Type)); + } else { + Error ("Parameter '%s' has incomplete type '%s'", + Param->Name, + GetFullTypeName (Param->Type)); + } + ++IncompleteCount; + } + if (SymIsRegVar (Param)) { + Param->V.R.SaveOffs = Offs; + } else { + Param->V.Offs = Offs; + } + Offs += Size; + ParamSize += Size; + Param = Param->PrevSym; + ++I; + } + + /* If all parameters have complete types, set the total size description, + ** clear the FD_INCOMPLETE_PARAM flag and return true. + */ + if (IncompleteCount == 0) { + D->ParamSize = ParamSize; + D->Flags &= ~FD_INCOMPLETE_PARAM; + return 1; + } + + /* Otherwise return false */ + return 0; +} + + + const char* F_GetFuncName (const Function* F) /* Return the name of the current function */ { @@ -146,7 +191,7 @@ unsigned F_GetParamSize (const Function* F) -Type* F_GetReturnType (Function* F) +const Type* F_GetReturnType (Function* F) /* Get the return type for the function */ { return F->ReturnType; @@ -210,6 +255,14 @@ int F_HasOldStyleIntRet (const Function* F) +void F_SetRetLab (Function* F, unsigned NewRetLab) +/* Change the return jump label */ +{ + F->RetLab = NewRetLab; +} + + + unsigned F_GetRetLab (const Function* F) /* Return the return jump label */ { @@ -312,7 +365,7 @@ static void F_RestoreRegVars (Function* F) } /* Get the first symbol from the function symbol table */ - Sym = F->FuncEntry->V.F.Func->SymTab->SymHead; + Sym = F->Desc->SymTab->SymHead; /* Walk through all symbols checking for register variables */ while (Sym) { @@ -392,21 +445,39 @@ static void F_EmitDebugInfo (void) -void NewFunc (SymEntry* Func) +void NewFunc (SymEntry* Func, FuncDesc* D) /* Parse argument declarations and function body. */ { + int ParamComplete; /* If all paramemters have complete types */ int C99MainFunc = 0;/* Flag for C99 main function returning int */ SymEntry* Param; + const Type* RType; /* Real type used for struct parameters */ + const Type* ReturnType; /* Return type */ - /* Get the function descriptor from the function entry */ - FuncDesc* D = Func->V.F.Func; + /* Remember this function descriptor used for definition */ + GetFuncDesc (Func->Type)->FuncDef = D; /* Allocate the function activation record for the function */ - CurrentFunc = NewFunction (Func); + CurrentFunc = NewFunction (Func, D); /* Reenter the lexical level */ ReenterFunctionLevel (D); + /* Check return type */ + ReturnType = F_GetReturnType (CurrentFunc); + if (IsIncompleteESUType (ReturnType)) { + /* There are already diagnostics on returning arrays or functions */ + if (!IsTypeArray (ReturnType) && !IsTypeFunc (ReturnType)) { + Error ("Function has incomplete return type '%s'", + GetFullTypeName (ReturnType)); + } + } + + /* Check and set the parameter sizes. All parameter must have complete + ** types now. + */ + ParamComplete = F_CheckParamList (D, 1); + /* Check if the function header contains unnamed parameters. These are ** only allowed in cc65 mode. */ @@ -439,14 +510,14 @@ void NewFunc (SymEntry* Func) /* Main cannot be a fastcall function */ if (IsQualFastcall (Func->Type)) { - Error ("`main' cannot be declared as __fastcall__"); + Error ("'main' cannot be declared as __fastcall__"); } /* If cc65 extensions aren't enabled, don't allow a main function that ** doesn't return an int. */ - if (IS_Get (&Standard) != STD_CC65 && CurrentFunc->ReturnType[0].C != T_INT) { - Error ("`main' must always return an int"); + if (IS_Get (&Standard) != STD_CC65 && ReturnType[0].C != T_INT) { + Error ("'main' must always return an int"); } /* Add a forced import of a symbol that is contained in the startup @@ -468,7 +539,7 @@ void NewFunc (SymEntry* Func) /* Determine if this is a main function in a C99 environment that ** returns an int. */ - if (IsTypeInt (F_GetReturnType (CurrentFunc)) && + if (IsRawTypeInt (F_GetReturnType (CurrentFunc)) && IS_Get (&Standard) == STD_C99) { C99MainFunc = 1; } @@ -477,20 +548,23 @@ void NewFunc (SymEntry* Func) /* Allocate code and data segments for this function */ Func->V.F.Seg = PushSegments (Func); + /* Use the info in the segments for generating new local labels */ + UseLabelPoolFromSegments (Func->V.F.Seg); + + /* Set return label. This has to be done after the segments are pushed */ + F_SetRetLab (CurrentFunc, GetLocalLabel ()); + /* Allocate a new literal pool */ PushLiteralPool (Func); /* If this is a fastcall function, push the last parameter onto the stack */ - if ((D->Flags & FD_VARIADIC) == 0 && D->ParamCount > 0 && - (AutoCDecl ? - IsQualFastcall (Func->Type) : - !IsQualCDecl (Func->Type))) { + if (D->ParamCount > 0 && IsFastcallFunc (Func->Type)) { unsigned Flags; /* Generate the push */ - if (IsTypeFunc (D->LastParam->Type)) { - /* Pointer to function */ - Flags = CF_PTR; + /* Handle struct/union specially */ + if (IsClassStruct (D->LastParam->Type)) { + Flags = TypeOf (GetStructReplacementType (D->LastParam->Type)) | CF_FORCECHAR; } else { Flags = TypeOf (D->LastParam->Type) | CF_FORCECHAR; } @@ -498,7 +572,7 @@ void NewFunc (SymEntry* Func) } /* Generate function entry code if needed */ - g_enter (TypeOf (Func->Type), F_GetParamSize (CurrentFunc)); + g_enter (FuncTypeOf (Func->Type), F_GetParamSize (CurrentFunc)); /* If stack checking code is requested, emit a call to the helper routine */ if (IS_Get (&CheckStack)) { @@ -508,39 +582,58 @@ void NewFunc (SymEntry* Func) /* Setup the stack */ StackPtr = 0; - /* Walk through the parameter list and allocate register variable space - ** for parameters declared as register. Generate code to swap the contents - ** of the register bank with the save area on the stack. - */ - Param = D->SymTab->SymHead; - while (Param && (Param->Flags & SC_PARAM) != 0) { + /* Emit code to handle the parameters if all of them have complete types */ + if (ParamComplete) { + /* Walk through the parameter list and allocate register variable space + ** for parameters declared as register. Generate code to swap the contents + ** of the register bank with the save area on the stack. + */ + Param = D->SymTab->SymHead; + while (Param && (Param->Flags & SC_PARAM) != 0) { - /* Check for a register variable */ - if (SymIsRegVar (Param)) { + /* Check if we need copy for struct/union type */ + RType = Param->Type; + if (IsClassStruct (RType)) { + RType = GetStructReplacementType (RType); - /* Allocate space */ - int Reg = F_AllocRegVar (CurrentFunc, Param->Type); - - /* Could we allocate a register? */ - if (Reg < 0) { - /* No register available: Convert parameter to auto */ - CvtRegVarToAuto (Param); - } else { - /* Remember the register offset */ - Param->V.R.RegOffs = Reg; - - /* Generate swap code */ - g_swap_regvars (Param->V.R.SaveOffs, Reg, CheckedSizeOf (Param->Type)); + /* If there is no replacement type, then it is just the address. + ** We don't currently support this case. + */ + if (RType == Param->Type) { + Error ("Passing '%s' of this size by value is not supported", GetFullTypeName (Param->Type)); + } } - } - /* Next parameter */ - Param = Param->NextSym; + /* Check for a register variable */ + if (SymIsRegVar (Param)) { + + /* Allocate space */ + int Reg = F_AllocRegVar (CurrentFunc, RType); + + /* Could we allocate a register? */ + if (Reg < 0) { + /* No register available: Convert parameter to auto */ + CvtRegVarToAuto (Param); + } else { + /* Remember the register offset */ + Param->V.R.RegOffs = Reg; + + /* Generate swap code */ + g_swap_regvars (Param->V.R.SaveOffs, Reg, CheckedSizeOf (RType)); + } + } + + /* Next parameter */ + Param = Param->NextSym; + } } /* Need a starting curly brace */ ConsumeLCurly (); + /* Make sure there is always something on the stack of local variable blocks */ + CollAppend (&CurrentFunc->LocalsBlockStack, 0); + /* Parse local variable declarations if any */ DeclareLocals (); @@ -551,15 +644,15 @@ void NewFunc (SymEntry* Func) /* Now process statements in this block */ while (CurTok.Tok != TOK_RCURLY && CurTok.Tok != TOK_CEOF) { - Statement (0); + AnyStatement (0); } /* If this is not a void function, and not the main function in a C99 ** environment returning int, output a warning if we didn't see a return ** statement. */ - if (!F_HasVoidReturn (CurrentFunc) && !F_HasReturn (CurrentFunc) && !C99MainFunc) { - Warning ("Control reaches end of non-void function"); + if (!F_HasVoidReturn (CurrentFunc) && !F_HasReturn (CurrentFunc) && !C99MainFunc && IS_Get (&WarnReturnType)) { + Warning ("Control reaches end of non-void function [-Wreturn-type]"); } /* If this is the main function in a C99 environment returning an int, let @@ -596,6 +689,11 @@ void NewFunc (SymEntry* Func) /* Restore the old literal pool, remembering the one for the function */ Func->V.F.LitPool = PopLiteralPool (); + /* If --local-strings was given, output the literals now */ + if (IS_Get (&LocalStrings)) { + OutputLocalLiteralPool (Func->V.F.LitPool); + } + /* Switch back to the old segments */ PopSegments (); diff --git a/src/cc65/function.h b/src/cc65/function.h index 627457277..f7f83cdc8 100644 --- a/src/cc65/function.h +++ b/src/cc65/function.h @@ -36,17 +36,40 @@ #ifndef FUNCTION_H #define FUNCTION_H - +#include "coll.h" /*****************************************************************************/ -/* data */ +/* Data */ /*****************************************************************************/ +/* Enumeration for function flags */ +typedef enum { + FF_NONE = 0x0000, + FF_HAS_RETURN = 0x0001, /* Function has a return statement */ + FF_IS_MAIN = 0x0002, /* This is the main function */ + FF_VOID_RETURN = 0x0004, /* Function returning void */ +} funcflags_t; + +/* Structure that holds all data needed for function activation */ +struct Function { + struct SymEntry* FuncEntry; /* Symbol table entry */ + const Type* ReturnType; /* Function return type */ + FuncDesc* Desc; /* Function descriptor */ + int Reserved; /* Reserved local space */ + unsigned RetLab; /* Return code label */ + int TopLevelSP; /* SP at function top level */ + unsigned RegOffs; /* Register variable space offset */ + funcflags_t Flags; /* Function flags */ + Collection LocalsBlockStack; /* Stack of blocks with local vars */ +}; /* Structure that holds all data needed for function activation */ typedef struct Function Function; +/* Forward declaration */ +struct FuncDesc; + /* Function activation data for current function (or NULL) */ extern Function* CurrentFunc; @@ -58,6 +81,12 @@ extern Function* CurrentFunc; +int F_CheckParamList (FuncDesc* D, int RequireAll); +/* Check and set the parameter sizes. +** If RequireAll is true, emit errors on parameters of incomplete types. +** Return true if all parameters have complete types. +*/ + const char* F_GetFuncName (const Function* F); /* Return the name of the current function */ @@ -67,7 +96,7 @@ unsigned F_GetParamCount (const Function* F); unsigned F_GetParamSize (const Function* F); /* Return the parameter size for the current function */ -Type* F_GetReturnType (Function* F); +const Type* F_GetReturnType (Function* F); /* Get the return type for the function */ int F_HasVoidReturn (const Function* F); @@ -91,6 +120,9 @@ int F_IsOldStyle (const Function* F); int F_HasOldStyleIntRet (const Function* F); /* Return true if this is an old style (K&R) function with an implicit int return */ +void F_SetRetLab (Function* F, unsigned NewRetLab); +/* Change the return jump label */ + unsigned F_GetRetLab (const Function* F); /* Return the return jump label */ @@ -118,7 +150,7 @@ int F_AllocRegVar (Function* F, const Type* Type); ** bank (zero page storage). If there is no register space left, return -1. */ -void NewFunc (struct SymEntry* Func); +void NewFunc (struct SymEntry* Func, struct FuncDesc* D); /* Parse argument declarations and function body. */ diff --git a/src/cc65/global.c b/src/cc65/global.c index dbdd72f3c..8b9838dc5 100644 --- a/src/cc65/global.c +++ b/src/cc65/global.c @@ -53,7 +53,8 @@ unsigned RegisterSpace = 6; /* Space available for register vars */ /* Stackable options */ IntStack WritableStrings = INTSTACK(0); /* Literal strings are r/w */ IntStack LocalStrings = INTSTACK(0); /* Emit string literals immediately */ -IntStack InlineStdFuncs = INTSTACK(0); /* Inline some known functions */ +IntStack InlineStdFuncs = INTSTACK(0); /* Inline some standard functions */ +IntStack EagerlyInlineFuncs = INTSTACK(0); /* Eagerly inline some known functions */ IntStack EnableRegVars = INTSTACK(0); /* Enable register variables */ IntStack AllowRegVarAddr = INTSTACK(0); /* Allow taking addresses of register vars */ IntStack RegVarsToCallStack = INTSTACK(0); /* Save reg variables on call stack */ @@ -65,6 +66,7 @@ IntStack CodeSizeFactor = INTSTACK(100);/* Size factor for generated code */ IntStack DataAlignment = INTSTACK(1); /* Alignment for data */ /* File names */ -StrBuf DepName = STATIC_STRBUF_INITIALIZER; /* Name of dependencies file */ -StrBuf FullDepName = STATIC_STRBUF_INITIALIZER; /* Name of full dependencies file */ -StrBuf DepTarget = STATIC_STRBUF_INITIALIZER; /* Name of dependency target */ +StrBuf DepName = STATIC_STRBUF_INITIALIZER; /* Name of dependencies file */ +StrBuf FullDepName = STATIC_STRBUF_INITIALIZER; /* Name of full dependencies file */ +StrBuf DepTarget = STATIC_STRBUF_INITIALIZER; /* Name of dependency target */ +StrBuf DebugTableName = STATIC_STRBUF_INITIALIZER; /* Name of debug table dump file */ diff --git a/src/cc65/global.h b/src/cc65/global.h index 8b0af5a83..266035346 100644 --- a/src/cc65/global.h +++ b/src/cc65/global.h @@ -61,12 +61,13 @@ extern unsigned RegisterSpace; /* Space available for register /* Stackable options */ extern IntStack WritableStrings; /* Literal strings are r/w */ extern IntStack LocalStrings; /* Emit string literals immediately */ -extern IntStack InlineStdFuncs; /* Inline some known functions */ +extern IntStack InlineStdFuncs; /* Inline some standard functions */ +extern IntStack EagerlyInlineFuncs; /* Eagerly inline some known functions */ extern IntStack EnableRegVars; /* Enable register variables */ extern IntStack AllowRegVarAddr; /* Allow taking addresses of register vars */ extern IntStack RegVarsToCallStack; /* Save reg variables on call stack */ extern IntStack StaticLocals; /* Make local variables static */ -extern IntStack SignedChars; /* Make characters signed by default */ +extern IntStack SignedChars; /* Use 'signed char' as the underlying type of 'char' */ extern IntStack CheckStack; /* Generate stack overflow checks */ extern IntStack Optimize; /* Optimize flag */ extern IntStack CodeSizeFactor; /* Size factor for generated code */ @@ -76,6 +77,7 @@ extern IntStack DataAlignment; /* Alignment for data */ extern StrBuf DepName; /* Name of dependencies file */ extern StrBuf FullDepName; /* Name of full dependencies file */ extern StrBuf DepTarget; /* Name of dependency target */ +extern StrBuf DebugTableName; /* Name of debug table dump file */ diff --git a/src/cc65/goto.c b/src/cc65/goto.c index 6e282c636..7d3ff1a6a 100644 --- a/src/cc65/goto.c +++ b/src/cc65/goto.c @@ -33,9 +33,17 @@ +#include "asmlabel.h" +#include "codeent.h" #include "codegen.h" +#include "codeseg.h" +#include "cpu.h" #include "error.h" +#include "exprdesc.h" +#include "expr.h" +#include "loadexpr.h" #include "scanner.h" +#include "standard.h" #include "symtab.h" #include "goto.h" @@ -54,21 +62,108 @@ void GotoStatement (void) NextToken (); /* Label name must follow */ - if (CurTok.Tok != TOK_IDENT) { - - Error ("Label name expected"); - - } else { + if (CurTok.Tok == TOK_IDENT) { /* Add a new label symbol if we don't have one until now */ - SymEntry* Entry = AddLabelSym (CurTok.Ident, SC_REF); + SymEntry* Entry = AddLabelSym (CurTok.Ident, SC_REF | SC_GOTO); /* Jump to the label */ - g_jump (Entry->V.Label); - } + g_jump (Entry->V.L.Label); - /* Eat the label name */ - NextToken (); + /* Eat the label name */ + NextToken (); + + } else if (CurTok.Tok == TOK_STAR && IS_Get (&Standard) >= STD_CC65) { + SymEntry *arr, *idx, *cur; + SymTable *tab; + ExprDesc desc; + CodeEntry *E; + unsigned char val; + + ED_Init (&desc); + + NextToken (); + + /* arr[foo], we only support simple foo for now */ + if (CurTok.Tok == TOK_IDENT && + (arr = FindSym (CurTok.Ident))) { + NextToken (); + + /* Find array size */ + if (!IsTypeArray (arr->Type) || SizeOf (arr->Type) == 0 || + !(arr->Flags & SC_STATIC) || + SizeOf (GetElementType(arr->Type)) != 2) { + Error ("Expected a static array"); + } else if (GetElementCount (arr->Type) > 127) { + Error ("Only arrays with <= 127 labels are supported, got %lu", + GetElementCount (arr->Type)); + } + + ConsumeLBrack (); + + if (CurTok.Tok == TOK_ICONST) { + val = (unsigned char)CurTok.IVal; + NextToken (); + + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_NONE, &desc); + + if (CPUIsets[CPU] & CPU_ISET_65SC02) { + AddCodeLine ("ldx #$%02X", val * 2); + AddCodeLine ("jmp (.loword(%s),x)", arr->AsmName); + } else { + AddCodeLine ("ldy #$%02X", val * 2); + AddCodeLine ("lda %s,y", arr->AsmName); + AddCodeLine ("ldx %s+1,y", arr->AsmName); + AddCodeLine ("jmp callax"); + } + } else if (CurTok.Tok == TOK_IDENT && + (idx = FindSym (CurTok.Ident))) { + hie10 (&desc); + LoadExpr (CF_NONE, &desc); + + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_EAX, &desc); + + AddCodeLine ("asl a"); + + if (CPUIsets[CPU] & CPU_ISET_65SC02) { + AddCodeLine ("tax"); + AddCodeLine ("jmp (.loword(%s),x)", arr->AsmName); + } else { + AddCodeLine ("tay"); + AddCodeLine ("lda %s,y", arr->AsmName); + AddCodeLine ("ldx %s+1,y", arr->AsmName); + AddCodeLine ("jmp callax"); + } + } else { + Error ("Only simple expressions are supported for computed goto"); + } + + ConsumeRBrack (); + + /* Loop over all target labels, specifying this as a jump point. + ** It's not exact -- if there's multiple gotos, the last will be used; + ** but, it's needed only so the optimizer does not remove the labels. + */ + E = CS_GetEntry (CS->Code, CS_GetEntryCount (CS->Code) - 1); + tab = GetLabelSymTab (); + if (tab) { + cur = tab->SymHead; + while (cur) { + if ((cur->Flags & SC_GOTO_IND) != 0) { + cur->V.L.IndJumpFrom = E; + } + cur = cur->NextSym; + } + } + } else { + /* It was not TOK_IDENT, or we couldn't find the symbol */ + Error ("Array name expected"); + } + } else { + Error ("Label name expected"); + } } @@ -80,7 +175,11 @@ void DoLabel (void) SymEntry* Entry = AddLabelSym (CurTok.Ident, SC_DEF); /* Emit the jump label */ - g_defcodelabel (Entry->V.Label); + CodeLabel* L = CS_AddLabel (CS->Code, LocalLabelName (Entry->V.L.Label)); + + if (Entry->V.L.IndJumpFrom) { + CollAppend (&L->JumpFrom, Entry->V.L.IndJumpFrom); + } /* Eat the ident and colon */ NextToken (); diff --git a/src/cc65/hexval.c b/src/cc65/hexval.c index 37e43da14..ce4e33acf 100644 --- a/src/cc65/hexval.c +++ b/src/cc65/hexval.c @@ -54,7 +54,7 @@ unsigned HexVal (int C) */ { if (!IsXDigit (C)) { - Error ("Invalid hexadecimal digit: `%c'", C); + Error ("Invalid hexadecimal digit: '%c'", C); } if (IsDigit (C)) { return C - '0'; diff --git a/src/cc65/hexval.h b/src/cc65/hexval.h index 0361ee0cf..68ea5e40f 100644 --- a/src/cc65/hexval.h +++ b/src/cc65/hexval.h @@ -45,7 +45,7 @@ unsigned HexVal (int C); -/* Convert a hex digit into a value. The function will emit an error for +/* Convert a hex digit into a value. The function will emit an error for ** invalid hex digits. */ diff --git a/src/cc65/ident.c b/src/cc65/ident.c index 7748095c7..dc59c4868 100644 --- a/src/cc65/ident.c +++ b/src/cc65/ident.c @@ -35,7 +35,7 @@ /* common */ #include "chartype.h" - + /* cc65 */ #include "ident.h" diff --git a/src/cc65/incpath.c b/src/cc65/incpath.c index ab164d5ca..85f6e070b 100644 --- a/src/cc65/incpath.c +++ b/src/cc65/incpath.c @@ -77,9 +77,9 @@ void FinishIncludePaths (void) /* Add some compiled-in search paths if defined at compile time. */ #if defined(CC65_INC) && !defined(_WIN32) - AddSearchPath (SysIncSearchPath, STRINGIZE (CC65_INC)); + AddSearchPath (SysIncSearchPath, CC65_INC); #endif /* Add paths relative to the parent directory of the Windows binary. */ - AddSubSearchPathFromWinBin (SysIncSearchPath, "include"); + AddSubSearchPathFromBin (SysIncSearchPath, "include"); } diff --git a/src/cc65/initdata.c b/src/cc65/initdata.c new file mode 100644 index 000000000..99dacdca9 --- /dev/null +++ b/src/cc65/initdata.c @@ -0,0 +1,807 @@ +/*****************************************************************************/ +/* */ +/* initdata.c */ +/* */ +/* Parse and generate initializer data */ +/* */ +/* */ +/* */ +/* (C) 1998-2015, Ullrich von Bassewitz */ +/* Roemerstrasse 52 */ +/* D-70794 Filderstadt */ +/* EMail: uz@cc65.org */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#include <limits.h> +#include <stdio.h> +#include <string.h> +#include <errno.h> + +/* common */ +#include "addrsize.h" +#include "mmodel.h" +#include "shift.h" +#include "xmalloc.h" + +/* cc65 */ +#include "anonname.h" +#include "codegen.h" +#include "datatype.h" +#include "declattr.h" +#include "error.h" +#include "expr.h" +#include "exprdesc.h" +#include "funcdesc.h" +#include "function.h" +#include "global.h" +#include "litpool.h" +#include "pragma.h" +#include "scanner.h" +#include "shift.h" +#include "standard.h" +#include "symtab.h" +#include "wrappedcall.h" +#include "typeconv.h" +#include "initdata.h" + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +typedef struct StructInitData StructInitData; +struct StructInitData { + unsigned Size; /* Size of struct */ + unsigned Offs; /* Current offset in struct */ + unsigned BitVal; /* Summed up bit-field value */ + unsigned ValBits; /* Valid bits in Val */ +}; + + + +/*****************************************************************************/ +/* Forwards */ +/*****************************************************************************/ + + + +static unsigned ParseInitInternal (Type* T, int* Braces, int AllowFlexibleMembers); +/* Parse initialization of variables. Return the number of data bytes. */ + + + +/*****************************************************************************/ +/* code */ +/*****************************************************************************/ + + + +static void SkipInitializer (int BracesExpected) +/* Skip the remainder of an initializer in case of errors. Try to be somewhat +** smart so we don't have too many following errors. +*/ +{ + while (CurTok.Tok != TOK_CEOF && CurTok.Tok != TOK_SEMI && BracesExpected >= 0) { + switch (CurTok.Tok) { + case TOK_RCURLY: --BracesExpected; break; + case TOK_LCURLY: ++BracesExpected; break; + default: break; + } + if (BracesExpected >= 0) { + NextToken (); + } + } +} + + + +static unsigned OpeningCurlyBraces (unsigned BracesNeeded) +/* Accept any number of opening curly braces around an initialization, skip +** them and return the number. If the number of curly braces is less than +** BracesNeeded, issue a warning. +*/ +{ + unsigned BraceCount = 0; + while (CurTok.Tok == TOK_LCURLY) { + ++BraceCount; + NextToken (); + } + if (BraceCount < BracesNeeded) { + Error ("'{' expected"); + } + return BraceCount; +} + + + +static void ClosingCurlyBraces (unsigned BracesExpected) +/* Accept and skip the given number of closing curly braces together with +** an optional comma. Output an error messages, if the input does not contain +** the expected number of braces. +*/ +{ + while (BracesExpected) { + /* TODO: Skip all excess initializers until next closing curly brace */ + if (CurTok.Tok == TOK_RCURLY) { + NextToken (); + } else if (CurTok.Tok == TOK_COMMA && NextTok.Tok == TOK_RCURLY) { + NextToken (); + NextToken (); + } else { + Error ("'}' expected"); + return; + } + --BracesExpected; + } +} + + + +static void DefineData (ExprDesc* Expr) +/* Output a data definition for the given expression */ +{ + switch (ED_GetLoc (Expr)) { + + case E_LOC_NONE: + /* Immediate numeric value with no storage */ + g_defdata (CF_IMM | TypeOf (Expr->Type) | CF_CONST, Expr->IVal, 0); + break; + + case E_LOC_ABS: + /* Absolute numeric address */ + g_defdata (CF_ABSOLUTE | TypeOf (Expr->Type) | CF_CONST, Expr->IVal, 0); + break; + + case E_LOC_GLOBAL: + /* Global variable */ + g_defdata (CF_EXTERNAL, Expr->Name, Expr->IVal); + break; + + case E_LOC_STATIC: + /* Static variable */ + g_defdata (CF_STATIC, Expr->Name, Expr->IVal); + break; + + case E_LOC_LITERAL: + /* Literal in the literal pool */ + g_defdata (CF_LITERAL, Expr->Name, Expr->IVal); + break; + + case E_LOC_REGISTER: + /* Register variable. Taking the address is usually not + ** allowed. + */ + if (IS_Get (&AllowRegVarAddr) == 0) { + Error ("Cannot take the address of a register variable"); + } + g_defdata (CF_REGVAR, Expr->Name, Expr->IVal); + break; + + case E_LOC_CODE: + /* Code label location */ + g_defdata (CF_CODE, Expr->Name, Expr->IVal); + break; + + case E_LOC_STACK: + case E_LOC_PRIMARY: + case E_LOC_EXPR: + Error ("Non constant initializer"); + break; + + default: + Internal ("Unknown constant type: 0x%04X", ED_GetLoc (Expr)); + } +} + + + +static void DefineBitFieldData (StructInitData* SI) +/* Output bit field data */ +{ + /* Ignore if we have no data */ + if (SI->ValBits > 0) { + + /* Output the data */ + g_defdata (CF_CHAR | CF_UNSIGNED | CF_CONST, SI->BitVal, 0); + + /* Update the data from SI and account for the size */ + if (SI->ValBits >= CHAR_BITS) { + SI->BitVal >>= CHAR_BITS; + SI->ValBits -= CHAR_BITS; + } else { + SI->BitVal = 0; + SI->ValBits = 0; + } + SI->Offs += SIZEOF_CHAR; + } +} + + + +static void DefineStrData (Literal* Lit, unsigned Count) +{ + /* Translate into target charset */ + TranslateLiteral (Lit); + + /* Output the data */ + g_defbytes (GetLiteralStr (Lit), Count); +} + + + +static ExprDesc ParseScalarInitInternal (const Type* T) +/* Parse initializaton for scalar data types. This function will not output the +** data but return it in ED. +*/ +{ + /* Optional opening brace */ + unsigned BraceCount = OpeningCurlyBraces (0); + + /* We warn if an initializer for a scalar contains braces, because this is + ** quite unusual and often a sign for some problem in the input. + */ + if (BraceCount > 0) { + Warning ("Braces around scalar initializer"); + } + + /* Get the expression and convert it to the target type */ + ExprDesc ED = NoCodeConstExpr (hie1); + TypeConversion (&ED, T); + + /* Close eventually opening braces */ + ClosingCurlyBraces (BraceCount); + + return ED; +} + + + +static unsigned ParseScalarInit (const Type* T) +/* Parse initializaton for scalar data types. Return the number of data bytes. */ +{ + /* Parse initialization */ + ExprDesc ED = ParseScalarInitInternal (T); + + /* Output the data */ + DefineData (&ED); + + /* Do this anyways for safety */ + DoDeferred (SQP_KEEP_NONE, &ED); + + /* Done */ + return SizeOf (T); +} + + + +static unsigned ParsePointerInit (const Type* T) +/* Parse initializaton for pointer data types. Return the number of data bytes. */ +{ + /* Optional opening brace */ + unsigned BraceCount = OpeningCurlyBraces (0); + + /* Expression */ + ExprDesc ED = NoCodeConstExpr (hie1); + TypeConversion (&ED, T); + + /* Output the data */ + DefineData (&ED); + + /* Do this anyways for safety */ + DoDeferred (SQP_KEEP_NONE, &ED); + + /* Close eventually opening braces */ + ClosingCurlyBraces (BraceCount); + + /* Done */ + return SIZEOF_PTR; +} + + + +static unsigned ParseArrayInit (Type* T, int* Braces, int AllowFlexibleMembers) +/* Parse initializaton for arrays. Return the number of data bytes. */ +{ + int Count; + int HasCurly = 0; + + /* Get the array data */ + Type* ElementType = IndirectModifiable (T); + unsigned ElementSize = SizeOf (ElementType); + long ElementCount = GetElementCount (T); + + /* Special handling for a character array initialized by a literal */ + if (IsClassChar (ElementType) && + (CurTok.Tok == TOK_SCONST || CurTok.Tok == TOK_WCSCONST || + (CurTok.Tok == TOK_LCURLY && + (NextTok.Tok == TOK_SCONST || NextTok.Tok == TOK_WCSCONST)))) { + + /* Char array initialized by string constant */ + int NeedParen; + + /* If we initializer is enclosed in brackets, remember this fact and + ** skip the opening bracket. + */ + NeedParen = (CurTok.Tok == TOK_LCURLY); + if (NeedParen) { + NextToken (); + } + + /* If the array is one too small for the string literal, omit the + ** trailing zero. + */ + Count = GetLiteralSize (CurTok.SVal); + if (ElementCount != UNSPECIFIED && + ElementCount != FLEXIBLE && + Count == ElementCount + 1) { + /* Omit the trailing zero */ + --Count; + } + + /* Output the data */ + DefineStrData (CurTok.SVal, Count); + + /* Skip the string */ + NextToken (); + + /* If the initializer was enclosed in curly braces, we need a closing + ** one. + */ + if (NeedParen) { + ConsumeRCurly (); + } + + } else { + + /* Arrays can be initialized without a pair of curly braces */ + if (*Braces == 0 || CurTok.Tok == TOK_LCURLY) { + /* Consume the opening curly brace */ + HasCurly = ConsumeLCurly (); + *Braces += HasCurly; + } + + /* Initialize the array members */ + Count = 0; + while (CurTok.Tok != TOK_RCURLY) { + /* Flexible array members may not be initialized within + ** an array (because the size of each element may differ + ** otherwise). + */ + ParseInitInternal (ElementType, Braces, 0); + ++Count; + if (CurTok.Tok != TOK_COMMA) + break; + NextToken (); + } + + if (HasCurly) { + /* Closing curly braces */ + ConsumeRCurly (); + } + } + + /* Size of 'void' elements are determined after initialization */ + if (ElementSize == 0) { + ElementSize = SizeOf (ElementType); + } + + if (ElementCount == UNSPECIFIED) { + /* Number of elements determined by initializer */ + SetElementCount (T, Count); + ElementCount = Count; + } else if (ElementCount == FLEXIBLE) { + if (AllowFlexibleMembers) { + /* In non ANSI mode, allow initialization of flexible array + ** members. + */ + ElementCount = Count; + } else { + /* Forbid */ + Error ("Initializing flexible array member is forbidden"); + ElementCount = Count; + } + } else if (Count < ElementCount) { + g_zerobytes ((ElementCount - Count) * ElementSize); + } else if (Count > ElementCount && HasCurly) { + Error ("Excess elements in array initializer"); + } + return ElementCount * ElementSize; +} + + + +static unsigned ParseStructInit (Type* T, int* Braces, int AllowFlexibleMembers) +/* Parse initialization of a struct or union. Return the number of data bytes. */ +{ + SymEntry* Sym; + SymTable* Tab; + StructInitData SI; + int HasCurly = 0; + int SkipComma = 0; + + + /* Fields can be initialized without a pair of curly braces */ + if (*Braces == 0 || CurTok.Tok == TOK_LCURLY) { + /* Consume the opening curly brace */ + HasCurly = ConsumeLCurly (); + *Braces += HasCurly; + } + + /* Get a pointer to the struct entry from the type */ + Sym = GetESUSymEntry (T); + + /* Get the size of the struct from the symbol table entry */ + SI.Size = Sym->V.S.Size; + + /* Check if this struct definition has a field table. If it doesn't, it + ** is an incomplete definition. + */ + Tab = Sym->V.S.SymTab; + if (Tab == 0) { + Error ("Cannot initialize variables with incomplete type"); + /* Try error recovery */ + SkipInitializer (HasCurly); + /* Nothing initialized */ + return 0; + } + + /* Get a pointer to the list of symbols */ + Sym = Tab->SymHead; + + /* Initialize fields */ + SI.Offs = 0; + SI.BitVal = 0; + SI.ValBits = 0; + while (CurTok.Tok != TOK_RCURLY) { + + /* Check for excess elements */ + if (Sym == 0) { + /* Is there just one trailing comma before a closing curly? */ + if (NextTok.Tok == TOK_RCURLY && CurTok.Tok == TOK_COMMA) { + /* Skip comma and exit scope */ + NextToken (); + break; + } + + if (HasCurly) { + Error ("Excess elements in %s initializer", GetBasicTypeName (T)); + SkipInitializer (HasCurly); + } + return SI.Offs; + } + + /* Check for special members that don't consume the initializer */ + if ((Sym->Flags & SC_ALIAS) == SC_ALIAS) { + /* Just skip */ + goto NextMember; + } + + /* This may be an anonymous bit-field, in which case it doesn't + ** have an initializer. + */ + if (SymIsBitField (Sym) && (IsAnonName (Sym->Name))) { + /* Account for the data and output it if we have at least a full + ** byte. We may have more if there was storage unit overlap, for + ** example two consecutive 7 bit fields. Those would be packed + ** into 2 bytes. + */ + SI.ValBits += Sym->Type->A.B.Width; + CHECK (SI.ValBits <= CHAR_BIT * sizeof(SI.BitVal)); + /* TODO: Generalize this so any type can be used. */ + CHECK (SI.ValBits <= LONG_BITS); + while (SI.ValBits >= CHAR_BITS) { + DefineBitFieldData (&SI); + } + /* Avoid consuming the comma if any */ + goto NextMember; + } + + /* Skip comma this round */ + if (SkipComma) { + NextToken (); + SkipComma = 0; + } + + if (SymIsBitField (Sym)) { + + /* Parse initialization of one field. Bit-fields need a special + ** handling. + */ + ExprDesc Field; + ED_Init (&Field); + unsigned long Val; + unsigned Shift; + + /* Calculate the bitmask from the bit-field data */ + unsigned long Mask = shl_l (1UL, Sym->Type->A.B.Width) - 1UL; + + /* Safety ... */ + CHECK (Sym->V.Offs * CHAR_BITS + Sym->Type->A.B.Offs == + SI.Offs * CHAR_BITS + SI.ValBits); + + /* Read the data, check for a constant integer, do a range check */ + Field = ParseScalarInitInternal (IntPromotion (Sym->Type)); + if (!ED_IsConstAbsInt (&Field)) { + Error ("Constant initializer expected"); + ED_MakeConstAbsInt (&Field, 1); + } + + /* Truncate the initializer value to the width of the bit-field and check if we lost + ** any useful bits. + */ + Val = (unsigned long) Field.IVal & Mask; + if (IsSignUnsigned (Sym->Type)) { + if (Field.IVal < 0 || (unsigned long) Field.IVal != Val) { + Warning (IsSignUnsigned (Field.Type) ? + "Implicit truncation from '%s' to '%s : %u' in bit-field initializer" + " changes value from %lu to %lu" : + "Implicit truncation from '%s' to '%s : %u' in bit-field initializer" + " changes value from %ld to %lu", + GetFullTypeName (Field.Type), GetFullTypeName (Sym->Type), + Sym->Type->A.B.Width, Field.IVal, Val); + } + } else { + /* Sign extend back to full width of host long. */ + unsigned ShiftBits = sizeof (long) * CHAR_BIT - Sym->Type->A.B.Width; + long RestoredVal = asr_l (asl_l (Val, ShiftBits), ShiftBits); + if (Field.IVal != RestoredVal) { + Warning (IsSignUnsigned (Field.Type) ? + "Implicit truncation from '%s' to '%s : %u' in bit-field initializer" + " changes value from %lu to %ld" : + "Implicit truncation from '%s' to '%s : %u' in bit-field initializer" + " changes value from %ld to %ld", + GetFullTypeName (Field.Type), GetFullTypeName (Sym->Type), + Sym->Type->A.B.Width, Field.IVal, RestoredVal); + } + } + + /* Add the value to the currently stored bit-field value */ + Shift = (Sym->V.Offs - SI.Offs) * CHAR_BITS + Sym->Type->A.B.Offs; + SI.BitVal |= (Val << Shift); + + /* Account for the data and output any full bytes we have. */ + SI.ValBits += Sym->Type->A.B.Width; + /* Make sure unsigned is big enough to hold the value, 32 bits. + ** This cannot be more than 32 bits because a 16-bit or 32-bit + ** bit-field will always be byte-aligned with padding before it + ** if there are bits from prior fields that haven't been output + ** yet. + */ + CHECK (SI.ValBits <= CHAR_BIT * sizeof(SI.BitVal)); + /* TODO: Generalize this so any type can be used. */ + CHECK (SI.ValBits <= LONG_BITS); + while (SI.ValBits >= CHAR_BITS) { + DefineBitFieldData (&SI); + } + + } else { + + /* Standard member. We should never have stuff from a + ** bit-field left because an anonymous member was added + ** for padding by ParseStructDecl. + */ + CHECK (SI.ValBits == 0); + + /* Flexible array members may only be initialized if they are + ** the last field (or part of the last struct field). + */ + SI.Offs += ParseInitInternal (Sym->Type, Braces, AllowFlexibleMembers && Sym->NextSym == 0); + } + + /* More initializers? */ + if (CurTok.Tok != TOK_COMMA) { + break; + } + + /* Skip the comma next round */ + SkipComma = 1; + +NextMember: + /* Next member. For unions, only the first one can be initialized */ + if (IsTypeUnion (T)) { + /* Union */ + Sym = 0; + } else { + /* Struct */ + Sym = Sym->NextSym; + } + } + + if (HasCurly) { + /* Consume the closing curly brace */ + ConsumeRCurly (); + } + + /* If we have data from a bit-field left, output it now */ + CHECK (SI.ValBits < CHAR_BITS); + DefineBitFieldData (&SI); + + /* If there are struct fields left, reserve additional storage */ + if (SI.Offs < SI.Size) { + g_zerobytes (SI.Size - SI.Offs); + SI.Offs = SI.Size; + } + + /* Return the actual number of bytes initialized. This number may be + ** larger than sizeof (Struct) if flexible array members are present and + ** were initialized (possible in non ANSI mode). + */ + return SI.Offs; +} + + + +static unsigned ParseVoidInit (Type* T) +/* Parse an initialization of a void variable (special cc65 extension). +** Return the number of bytes initialized. +*/ +{ + unsigned Size; + + /* Opening brace */ + ConsumeLCurly (); + + /* Allow an arbitrary list of values */ + Size = 0; + do { + ExprDesc Expr = NoCodeConstExpr (hie1); + switch (GetUnderlyingTypeCode (&Expr.Type[0])) { + + case T_SCHAR: + case T_UCHAR: + if (ED_IsConstAbsInt (&Expr)) { + /* Make it byte sized */ + Expr.IVal &= 0xFF; + } + DefineData (&Expr); + Size += SIZEOF_CHAR; + break; + + case T_SHORT: + case T_USHORT: + case T_INT: + case T_UINT: + case T_PTR: + case T_ARRAY: + if (ED_IsConstAbsInt (&Expr)) { + /* Make it word sized */ + Expr.IVal &= 0xFFFF; + } + DefineData (&Expr); + Size += SIZEOF_INT; + break; + + case T_LONG: + case T_ULONG: + if (ED_IsConstAbsInt (&Expr)) { + /* Make it dword sized */ + Expr.IVal &= 0xFFFFFFFF; + } + DefineData (&Expr); + Size += SIZEOF_LONG; + break; + + default: + Error ("Illegal type in initialization"); + break; + + } + + if (CurTok.Tok != TOK_COMMA) { + break; + } + NextToken (); + + } while (CurTok.Tok != TOK_RCURLY); + + /* Closing brace */ + ConsumeRCurly (); + + /* Number of bytes determined by initializer */ + if (T->A.U != 0 && T->A.U != Size) { + Error ("'void' array initialized with elements of variant sizes"); + } else { + T->A.U = Size; + } + + /* Return the number of bytes initialized */ + return Size; +} + + + +static unsigned ParseInitInternal (Type* T, int *Braces, int AllowFlexibleMembers) +/* Parse initialization of variables. Return the number of data bytes. */ +{ + switch (GetUnderlyingTypeCode (T)) { + + case T_SCHAR: + case T_UCHAR: + case T_SHORT: + case T_USHORT: + case T_INT: + case T_UINT: + case T_LONG: + case T_ULONG: + case T_FLOAT: + case T_DOUBLE: + return ParseScalarInit (T); + + case T_PTR: + return ParsePointerInit (T); + + case T_ARRAY: + return ParseArrayInit (T, Braces, AllowFlexibleMembers); + + case T_STRUCT: + case T_UNION: + return ParseStructInit (T, Braces, AllowFlexibleMembers); + + case T_ENUM: + /* Incomplete enum type must have already raised errors. + ** Just proceed to consume the value. + */ + return ParseScalarInit (T); + + case T_VOID: + if (IS_Get (&Standard) == STD_CC65) { + /* Special cc65 extension in non-ANSI mode */ + return ParseVoidInit (T); + } + /* FALLTHROUGH */ + + default: + Error ("Illegal type"); + return SIZEOF_CHAR; + + } +} + + + +unsigned ParseInit (Type* T) +/* Parse initialization of variables. Return the number of data bytes. */ +{ + /* Current curly braces layers */ + int Braces = 0; + + /* Parse the initialization. Flexible array members can only be initialized + ** in cc65 mode. + */ + unsigned Size = ParseInitInternal (T, &Braces, IS_Get (&Standard) == STD_CC65); + + /* The initialization may not generate code on global level, because code + ** outside function scope will never get executed. + */ + if (HaveGlobalCode ()) { + Error ("Non constant initializers"); + RemoveGlobalCode (); + } + + /* Return the size needed for the initialization */ + return Size; +} diff --git a/src/cc65/initdata.h b/src/cc65/initdata.h new file mode 100644 index 000000000..6fa3f20b3 --- /dev/null +++ b/src/cc65/initdata.h @@ -0,0 +1,61 @@ +/*****************************************************************************/ +/* */ +/* initdata.h */ +/* */ +/* Parse and generate initializer data */ +/* */ +/* */ +/* */ +/* (C) 1998-2009, Ullrich von Bassewitz */ +/* Roemerstrasse 52 */ +/* D-70794 Filderstadt */ +/* EMail: uz@cc65.org */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef INITDATA_H +#define INITDATA_H + + + +/* cc65 */ +#include "datatype.h" + + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +unsigned ParseInit (Type* T); +/* Parse initialization of variables. Return the number of initialized data +** bytes. +*/ + + + +/* End of initdata.h */ + +#endif diff --git a/src/cc65/input.c b/src/cc65/input.c index 005e0c668..22a66e1f7 100644 --- a/src/cc65/input.c +++ b/src/cc65/input.c @@ -174,7 +174,7 @@ static AFile* NewAFile (IFile* IF, FILE* F) struct stat Buf; if (FileStat (IF->Name, &Buf) != 0) { /* Error */ - Fatal ("Cannot stat `%s': %s", IF->Name, strerror (errno)); + Fatal ("Cannot stat '%s': %s", IF->Name, strerror (errno)); } IF->Size = (unsigned long) Buf.st_size; IF->MTime = (unsigned long) Buf.st_mtime; @@ -251,7 +251,7 @@ void OpenMainFile (const char* Name) FILE* F = fopen (Name, "r"); if (F == 0) { /* Cannot open */ - Fatal ("Cannot open input file `%s': %s", Name, strerror (errno)); + Fatal ("Cannot open input file '%s': %s", Name, strerror (errno)); } /* Allocate a new AFile structure for the file */ @@ -284,7 +284,7 @@ void OpenIncludeFile (const char* Name, InputType IT) /* Search for the file */ N = SearchFile ((IT == IT_SYSINC)? SysIncSearchPath : UsrIncSearchPath, Name); if (N == 0) { - PPError ("Include file `%s' not found", Name); + PPError ("Include file '%s' not found", Name); return; } @@ -303,12 +303,12 @@ void OpenIncludeFile (const char* Name, InputType IT) F = fopen (IF->Name, "r"); if (F == 0) { /* Error opening the file */ - PPError ("Cannot open include file `%s': %s", IF->Name, strerror (errno)); + PPError ("Cannot open include file '%s': %s", IF->Name, strerror (errno)); return; } /* Debugging output */ - Print (stdout, 1, "Opened include file `%s'\n", IF->Name); + Print (stdout, 1, "Opened include file '%s'\n", IF->Name); /* Allocate a new AFile structure */ (void) NewAFile (IF, F); @@ -619,7 +619,7 @@ static void CreateDepFile (const char* Name, InputType Types) /* Open the file */ FILE* F = fopen (Name, "w"); if (F == 0) { - Fatal ("Cannot open dependency file `%s': %s", Name, strerror (errno)); + Fatal ("Cannot open dependency file '%s': %s", Name, strerror (errno)); } /* If a dependency target was given, use it, otherwise use the output diff --git a/src/cc65/lineinfo.h b/src/cc65/lineinfo.h index 8dbe06846..f365b4f01 100644 --- a/src/cc65/lineinfo.h +++ b/src/cc65/lineinfo.h @@ -37,7 +37,7 @@ #define LINEINFO_H - + /* common */ #include "strbuf.h" @@ -50,7 +50,7 @@ /* Input file structure */ -struct IFile; +struct IFile; diff --git a/src/cc65/litpool.c b/src/cc65/litpool.c index c427310d9..95228179d 100644 --- a/src/cc65/litpool.c +++ b/src/cc65/litpool.c @@ -99,7 +99,7 @@ static Literal* NewLiteral (const void* Buf, unsigned Len) Literal* L = xmalloc (sizeof (*L)); /* Initialize the fields */ - L->Label = GetLocalLabel (); + L->Label = GetPooledLiteralLabel (); L->RefCount = 0; L->Output = 0; SB_Init (&L->Data); @@ -130,7 +130,7 @@ static void OutputLiteral (Literal* L) TranslateLiteral (L); /* Define the label for the literal */ - g_defdatalabel (L->Label); + g_defliterallabel (L->Label); /* Output the literal data */ g_defbytes (SB_GetConstBuf (&L->Data), SB_GetLen (&L->Data)); @@ -147,18 +147,6 @@ Literal* UseLiteral (Literal* L) /* Increase the reference count */ ++L->RefCount; - /* If --local-strings was given, immediately output the literal */ - if (IS_Get (&LocalStrings)) { - /* Switch to the proper data segment */ - if (IS_Get (&WritableStrings)) { - g_usedata (); - } else { - g_userodata (); - } - /* Output the literal */ - OutputLiteral (L); - } - /* Return the literal */ return L; } @@ -435,12 +423,12 @@ static void OutputReadOnlyLiterals (Collection* Literals) if (C != 0) { /* This literal is part of a longer literal, merge them */ - g_aliasdatalabel (L->Label, C->Label, GetLiteralSize (C) - GetLiteralSize (L)); + g_aliasliterallabel (L->Label, C->Label, GetLiteralSize (C) - GetLiteralSize (L)); } else { /* Define the label for the literal */ - g_defdatalabel (L->Label); + g_defliterallabel (L->Label); /* Output the literal data */ g_defbytes (SB_GetConstBuf (&L->Data), SB_GetLen (&L->Data)); @@ -454,12 +442,20 @@ static void OutputReadOnlyLiterals (Collection* Literals) -void OutputLiteralPool (void) -/* Output the global literal pool */ +void OutputLocalLiteralPool (LiteralPool* Pool) +/* Output the local literal pool */ { /* Output both sorts of literals */ - OutputWritableLiterals (&GlobalPool->WritableLiterals); - OutputReadOnlyLiterals (&GlobalPool->ReadOnlyLiterals); + OutputWritableLiterals (&Pool->WritableLiterals); + OutputReadOnlyLiterals (&Pool->ReadOnlyLiterals); +} + + + +void OutputGlobalLiteralPool (void) +/* Output the global literal pool */ +{ + OutputLocalLiteralPool (GlobalPool); } diff --git a/src/cc65/litpool.h b/src/cc65/litpool.h index 6efdfb089..78f432138 100644 --- a/src/cc65/litpool.h +++ b/src/cc65/litpool.h @@ -113,8 +113,11 @@ void MoveLiteralPool (LiteralPool* LocalPool); ** function will free LocalPool after moving the used string literals. */ -void OutputLiteralPool (void); -/* Output the literal pool */ +void OutputLocalLiteralPool (LiteralPool* Pool); +/* Output the local literal pool */ + +void OutputGlobalLiteralPool (void); +/* Output the global literal pool */ Literal* AddLiteral (const char* S); /* Add a literal string to the literal pool. Return the literal. */ diff --git a/src/cc65/loadexpr.c b/src/cc65/loadexpr.c index fa37c6bbd..0b75e0a9c 100644 --- a/src/cc65/loadexpr.c +++ b/src/cc65/loadexpr.c @@ -48,14 +48,14 @@ -static void LoadConstant (unsigned Flags, ExprDesc* Expr) -/* Load the primary register with some constant value. */ +static void LoadAddress (unsigned Flags, ExprDesc* Expr) +/* Load the primary register with some address value. */ { switch (ED_GetLoc (Expr)) { case E_LOC_ABS: - /* Number constant */ - g_getimmed (Flags | TypeOf (Expr->Type) | CF_CONST, Expr->IVal, 0); + /* Numberic address */ + g_getimmed (Flags | CF_IMM | CF_CONST, Expr->IVal, 0); break; case E_LOC_GLOBAL: @@ -64,11 +64,15 @@ static void LoadConstant (unsigned Flags, ExprDesc* Expr) break; case E_LOC_STATIC: - case E_LOC_LITERAL: - /* Static symbol or literal, load address */ + /* Static symbol, load address */ g_getimmed ((Flags | CF_STATIC) & ~CF_CONST, Expr->Name, Expr->IVal); break; + case E_LOC_LITERAL: + /* Literal, load address */ + g_getimmed ((Flags | CF_LITERAL) & ~CF_CONST, Expr->Name, Expr->IVal); + break; + case E_LOC_REGISTER: /* Register variable. Taking the address is usually not ** allowed. @@ -79,41 +83,103 @@ static void LoadConstant (unsigned Flags, ExprDesc* Expr) g_getimmed ((Flags | CF_REGVAR) & ~CF_CONST, Expr->Name, Expr->IVal); break; + case E_LOC_CODE: + /* Code label, load address */ + g_getimmed ((Flags | CF_CODE) & ~CF_CONST, Expr->Name, Expr->IVal); + break; + case E_LOC_STACK: g_leasp (Expr->IVal); break; + case E_LOC_PRIMARY: + case E_LOC_EXPR: + if (Expr->IVal != 0) { + /* We have an expression in the primary plus a constant + ** offset. Adjust the value in the primary accordingly. + */ + g_inc (Flags | CF_CONST, Expr->IVal); + } + break; + default: - Internal ("Unknown constant type: %04X", Expr->Flags); + Internal ("Unknown address type: %04X", Expr->Flags); } } void LoadExpr (unsigned Flags, struct ExprDesc* Expr) -/* Load an expression into the primary register if it is not already there. */ +/* Load an expression into the primary register if it is not already there. +** If Flags contains any CF_TYPEMASK bits, it then overrides the codegen type +** info that would be otherwise taken from the expression type. +** Note: This function can't modify the content in Expr since there are many +** instances of the "GetCodePos + LoadExpr (maybe indirectly) + RemoveCode" +** code pattern here and there which assumes that Expr should be unchanged, +** unfortunately. +*/ { - if (ED_IsLVal (Expr)) { + if (!ED_IsAddrExpr (Expr)) { - /* Dereferenced lvalue. If this is a bit field its type is unsigned. - ** But if the field is completely contained in the lower byte, we will - ** throw away the high byte anyway and may therefore load just the - ** low byte. + /* Lvalue. If this is a bit field its type is unsigned. But if the + ** field is completely contained in the lower byte, we will throw away + ** the high byte anyway and may therefore load just the low byte. */ - if (ED_IsBitField (Expr)) { - Flags |= (Expr->BitOffs + Expr->BitWidth <= CHAR_BITS)? CF_CHAR : CF_INT; - Flags |= CF_UNSIGNED; - } else { - Flags |= TypeOf (Expr->Type); - } - if (ED_NeedsTest (Expr)) { - Flags |= CF_TEST; + int AdjustBitField = 0; + unsigned BitFieldFullWidthFlags = 0; + if ((Flags & CF_TYPEMASK) == 0) { + if (IsTypeFragBitField (Expr->Type)) { + /* We need to adjust the bits in this case. */ + AdjustBitField = 1; + + /* Flags we need operate on the whole bit-field, without CF_FORCECHAR. */ + BitFieldFullWidthFlags = Flags | TypeOf (Expr->Type); + + /* Flags we need operate on the whole chunk containing the bit-field. */ + Flags |= TypeOf (GetBitFieldChunkType (Expr->Type)); + + /* If we're adjusting, then only load a char (not an int) and do only char ops; + ** We will clear the high byte in the adjustment. CF_FORCECHAR does nothing if + ** the type is not CF_CHAR; + ** If adjusting, then we're sign extending manually, so do everything unsigned + ** to make shifts faster. + */ + Flags |= CF_UNSIGNED | CF_FORCECHAR; + BitFieldFullWidthFlags |= CF_UNSIGNED; + } else { + /* If Expr is an incomplete ESY type, bail out */ + if (IsIncompleteESUType (Expr->Type)) { + return; + } + Flags |= TypeOf (Expr->Type); + } } + if (ED_YetToTest (Expr)) { + /* If we're only testing, we do not need to promote char to int. + ** CF_FORCECHAR does nothing if the type is not CF_CHAR. + */ + Flags |= CF_FORCECHAR; + + /* Setting CF_TEST will cause the load to perform optimizations and not actually load + ** all bits of the bit-field, instead just computing the condition codes. Therefore, + ** if adjustment is required, we do not set CF_TEST here, but handle it below. + */ + if (!AdjustBitField) { + Flags |= CF_TEST; + } + } + + /* Load the content of Expr */ switch (ED_GetLoc (Expr)) { + case E_LOC_NONE: + /* Immediate number constant */ + g_getimmed (Flags | CF_IMM | TypeOf (Expr->Type) | CF_CONST, Expr->IVal, 0); + break; + case E_LOC_ABS: - /* Absolute: numeric address or const */ + /* Absolute numeric addressed variable */ g_getstatic (Flags | CF_ABSOLUTE, Expr->IVal, 0); break; @@ -123,23 +189,40 @@ void LoadExpr (unsigned Flags, struct ExprDesc* Expr) break; case E_LOC_STATIC: - case E_LOC_LITERAL: - /* Static variable or literal in the literal pool */ + /* Static variable */ g_getstatic (Flags | CF_STATIC, Expr->Name, Expr->IVal); break; + case E_LOC_LITERAL: + /* Literal in the literal pool */ + g_getstatic (Flags | CF_LITERAL, Expr->Name, Expr->IVal); + break; + case E_LOC_REGISTER: /* Register variable */ g_getstatic (Flags | CF_REGVAR, Expr->Name, Expr->IVal); break; + case E_LOC_CODE: + /* Code label location */ + g_getstatic (Flags | CF_CODE, Expr->Name, Expr->IVal); + break; + case E_LOC_STACK: /* Value on the stack */ g_getlocal (Flags, Expr->IVal); break; case E_LOC_PRIMARY: - /* The primary register - just test if necessary */ + /* The primary register */ + if (Expr->IVal != 0) { + /* We have an expression in the primary plus a constant + ** offset. Adjust the value in the primary accordingly. + */ + g_inc (Flags | CF_CONST, Expr->IVal); + + /* We might want to clear the offset, but we can't */ + } if (Flags & CF_TEST) { g_test (Flags); } @@ -148,24 +231,33 @@ void LoadExpr (unsigned Flags, struct ExprDesc* Expr) case E_LOC_EXPR: /* Reference to address in primary with offset in Expr */ g_getind (Flags, Expr->IVal); + + /* Since the content in primary is now overwritten with the + ** dereference value, we might want to change the expression + ** loc to E_LOC_PRIMARY as well. That way we could be able to + ** call this function as many times as we want. Unfortunately, + ** we can't. + */ break; default: Internal ("Invalid location in LoadExpr: 0x%04X", ED_GetLoc (Expr)); } - /* Handle bit fields. The actual type may have been casted or - ** converted, so be sure to always use unsigned ints for the - ** operations. + /* Handle bit fields if necessary. The actual type may have been casted or converted, + ** so be sure to always use unsigned ints for the operations. */ - if (ED_IsBitField (Expr)) { - unsigned F = CF_INT | CF_UNSIGNED | CF_CONST | (Flags & CF_TEST); - /* Shift right by the bit offset */ - g_asr (F, Expr->BitOffs); - /* And by the width if the field doesn't end on an int boundary */ - if (Expr->BitOffs + Expr->BitWidth != CHAR_BITS && - Expr->BitOffs + Expr->BitWidth != INT_BITS) { - g_and (F, (0x0001U << Expr->BitWidth) - 1U); + if (AdjustBitField) { + /* We always need to do something with the low byte, so there is no opportunity + ** for optimization by skipping it. + */ + CHECK (Expr->Type->A.B.Offs < CHAR_BITS); + + if (ED_YetToTest (Expr)) { + g_testbitfield (Flags, Expr->Type->A.B.Offs, Expr->Type->A.B.Width); + } else { + g_extractbitfield (Flags, BitFieldFullWidthFlags, IsSignSigned (Expr->Type), + Expr->Type->A.B.Offs, Expr->Type->A.B.Width); } } @@ -173,27 +265,21 @@ void LoadExpr (unsigned Flags, struct ExprDesc* Expr) ED_TestDone (Expr); } else { - /* An rvalue */ - if (ED_IsLocExpr (Expr)) { - if (Expr->IVal != 0) { - /* We have an expression in the primary plus a constant - ** offset. Adjust the value in the primary accordingly. - */ - Flags |= TypeOf (Expr->Type); - g_inc (Flags | CF_CONST, Expr->IVal); - } - } else { - /* Constant of some sort, load it into the primary */ - LoadConstant (Flags, Expr); - } + /* An address */ + Flags |= CF_INT | CF_UNSIGNED; + /* Constant of some sort, load it into the primary */ + LoadAddress (Flags, Expr); /* Are we testing this value? */ - if (ED_NeedsTest (Expr)) { + if (ED_YetToTest (Expr)) { /* Yes, force a test */ - Flags |= TypeOf (Expr->Type); g_test (Flags); ED_TestDone (Expr); } } + if (ED_IsLVal (Expr) && IsQualVolatile (Expr->Type)) { + /* Expression has had side effects */ + Expr->Flags |= E_SIDE_EFFECTS; + } } diff --git a/src/cc65/loadexpr.h b/src/cc65/loadexpr.h index 3f13311f1..90862e33a 100644 --- a/src/cc65/loadexpr.h +++ b/src/cc65/loadexpr.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2004 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -55,7 +55,10 @@ struct ExprDesc; void LoadExpr (unsigned Flags, struct ExprDesc* Expr); -/* Load an expression into the primary register if it is not already there. */ +/* Load an expression into the primary register if it is not already there. +** If Flags contains any CF_TYPEMASK bits, it then overrides the codegen type +** info that would be otherwise taken from the expression type. +*/ diff --git a/src/cc65/locals.c b/src/cc65/locals.c index ffadb1bd5..ad36bded0 100644 --- a/src/cc65/locals.c +++ b/src/cc65/locals.c @@ -46,12 +46,15 @@ #include "expr.h" #include "function.h" #include "global.h" +#include "initdata.h" #include "loadexpr.h" #include "locals.h" #include "stackptr.h" #include "standard.h" +#include "staticassert.h" #include "symtab.h" #include "typeconv.h" +#include "input.h" @@ -62,31 +65,31 @@ static unsigned AllocLabel (void (*UseSeg) ()) -/* Switch to a segment, define a local label and return it */ +/* Switch to a segment, define a local data label and return it */ { - unsigned Label; + unsigned DataLabel; /* Switch to the segment */ UseSeg (); /* Define the variable label */ - Label = GetLocalLabel (); - g_defdatalabel (Label); + DataLabel = GetLocalDataLabel (); + g_defdatalabel (DataLabel); /* Return the label */ - return Label; + return DataLabel; } -static void AllocStorage (unsigned Label, void (*UseSeg) (), unsigned Size) -/* Reserve Size bytes of BSS storage prefixed by a local label. */ +static void AllocStorage (unsigned DataLabel, void (*UseSeg) (), unsigned Size) +/* Reserve Size bytes of BSS storage prefixed by a local data label. */ { /* Switch to the segment */ UseSeg (); /* Define the variable label */ - g_defdatalabel (Label); + g_defdatalabel (DataLabel); /* Reserve space for the data */ g_res (Size); @@ -120,8 +123,6 @@ static void ParseRegisterDecl (Declaration* Decl, int Reg) /* Check for an optional initialization */ if (CurTok.Tok == TOK_ASSIGN) { - ExprDesc Expr; - /* Skip the '=' */ NextToken (); @@ -142,7 +143,7 @@ static void ParseRegisterDecl (Declaration* Decl, int Reg) ** we cannot allow that here. */ if (ParseInit (Sym->Type) != Size) { - Error ("Cannot initialize flexible array members of storage class `register'"); + Error ("Cannot initialize flexible array members of storage class 'register'"); } /* Generate code to copy this data into the variable space */ @@ -150,6 +151,9 @@ static void ParseRegisterDecl (Declaration* Decl, int Reg) } else { + ExprDesc Expr; + ED_Init (&Expr); + /* Parse the expression */ hie1 (&Expr); @@ -162,15 +166,21 @@ static void ParseRegisterDecl (Declaration* Decl, int Reg) /* Store the value into the variable */ g_putstatic (CF_REGVAR | TypeOf (Sym->Type), Reg, 0); + /* This has to be done at sequence point */ + DoDeferred (SQP_KEEP_NONE, &Expr); } /* Mark the variable as referenced */ Sym->Flags |= SC_REF; } - /* Cannot allocate a variable of zero size */ - if (Size == 0) { - Error ("Variable `%s' has unknown size", Decl->Ident); + /* Cannot allocate a variable of unknown size */ + if (HasUnknownSize (Sym->Type)) { + if (IsTypeArray (Decl->Type)) { + Error ("Array '%s' has unknown size", Decl->Ident); + } else { + Error ("Variable '%s' has unknown size", Decl->Ident); + } } } @@ -201,8 +211,6 @@ static void ParseAutoDecl (Declaration* Decl) /* Check for an optional initialization */ if (CurTok.Tok == TOK_ASSIGN) { - ExprDesc Expr; - /* Skip the '=' */ NextToken (); @@ -240,6 +248,9 @@ static void ParseAutoDecl (Declaration* Decl) } else { + ExprDesc Expr; + ED_Init (&Expr); + /* Allocate previously reserved local space */ F_AllocLocalSpace (CurrentFunc); @@ -259,17 +270,26 @@ static void ParseAutoDecl (Declaration* Decl) Flags |= CF_CONST; } else { LoadExpr (CF_NONE, &Expr); - ED_MakeRVal (&Expr); + ED_MarkExprAsRVal (&Expr); } /* Push the value */ g_push (Flags | TypeOf (Sym->Type), Expr.IVal); + /* This has to be done at sequence point */ + DoDeferred (SQP_KEEP_NONE, &Expr); } /* Mark the variable as referenced */ Sym->Flags |= SC_REF; + /* Make note of auto variables initialized in current block. + ** We abuse the Collection somewhat by using it to store line + ** numbers. + */ + CollReplace (&CurrentFunc->LocalsBlockStack, (void *)(size_t)GetCurrentLine (), + CollCount (&CurrentFunc->LocalsBlockStack) - 1); + } else { /* Non-initialized local variable. Just keep track of ** the space needed. @@ -286,7 +306,7 @@ static void ParseAutoDecl (Declaration* Decl) Decl->StorageClass = (Decl->StorageClass & ~SC_AUTO) | SC_STATIC; /* Generate a label, but don't define it */ - DataLabel = GetLocalLabel (); + DataLabel = GetLocalDataLabel (); /* Add the symbol to the symbol table. */ Sym = AddLocalSym (Decl->Ident, Decl->Type, Decl->StorageClass, DataLabel); @@ -294,8 +314,6 @@ static void ParseAutoDecl (Declaration* Decl) /* Allow assignments */ if (CurTok.Tok == TOK_ASSIGN) { - ExprDesc Expr; - /* Skip the '=' */ NextToken (); @@ -319,6 +337,9 @@ static void ParseAutoDecl (Declaration* Decl) } else { + ExprDesc Expr; + ED_Init (&Expr); + /* Allocate space for the variable */ AllocStorage (DataLabel, g_usebss, Size); @@ -332,7 +353,10 @@ static void ParseAutoDecl (Declaration* Decl) LoadExpr (CF_NONE, &Expr); /* Store the value into the variable */ - g_putstatic (TypeOf (Sym->Type), DataLabel, 0); + g_putstatic (CF_STATIC | TypeOf (Sym->Type), DataLabel, 0); + + /* This has to be done at sequence point */ + DoDeferred (SQP_KEEP_NONE, &Expr); } /* Mark the variable as referenced */ @@ -346,9 +370,13 @@ static void ParseAutoDecl (Declaration* Decl) } } - /* Cannot allocate a variable of zero size */ - if (Size == 0) { - Error ("Variable `%s' has unknown size", Decl->Ident); + /* Cannot allocate an incomplete variable */ + if (HasUnknownSize (Sym->Type)) { + if (IsTypeArray (Decl->Type)) { + Error ("Array '%s' has unknown size", Decl->Ident); + } else { + Error ("Variable '%s' has unknown size", Decl->Ident); + } } } @@ -360,7 +388,7 @@ static void ParseStaticDecl (Declaration* Decl) unsigned Size; /* Generate a label, but don't define it */ - unsigned DataLabel = GetLocalLabel (); + unsigned DataLabel = GetLocalDataLabel (); /* Add the symbol to the symbol table. */ SymEntry* Sym = AddLocalSym (Decl->Ident, Decl->Type, @@ -400,9 +428,13 @@ static void ParseStaticDecl (Declaration* Decl) } - /* Cannot allocate a variable of zero size */ - if (Size == 0) { - Error ("Variable `%s' has unknown size", Decl->Ident); + /* Cannot allocate an incomplete variable */ + if (HasUnknownSize (Sym->Type)) { + if (IsTypeArray (Decl->Type)) { + Error ("Array '%s' has unknown size", Decl->Ident); + } else { + Error ("Variable '%s' has unknown size", Decl->Ident); + } } } @@ -417,13 +449,24 @@ static void ParseOneDecl (const DeclSpec* Spec) /* Read the declaration */ ParseDecl (Spec, &Decl, DM_NEED_IDENT); - /* Set the correct storage class for functions */ + /* Check if there are any non-extern storage classes set for function + ** declarations. Function can only be declared inside functions with the + ** 'extern' storage class specifier or no storage class specifier at all. + */ if ((Decl.StorageClass & SC_FUNC) == SC_FUNC) { - /* Function prototypes are always external */ - if ((Decl.StorageClass & SC_EXTERN) == 0) { - Warning ("Function must be extern"); + + /* Check if there are explicitly specified non-external storage classes */ + if ((Spec->Flags & DS_DEF_STORAGE) != DS_DEF_STORAGE && + (Decl.StorageClass & SC_EXTERN) == 0 && + (Decl.StorageClass & SC_STORAGEMASK) != 0) { + Error ("Illegal storage class on function"); } - Decl.StorageClass |= SC_EXTERN; + + /* The default storage class could be wrong. Just clear them */ + Decl.StorageClass &= ~SC_STORAGEMASK; + + /* This is always a declaration */ + Decl.StorageClass |= SC_DECL; } /* If we don't have a name, this was flagged as an error earlier. @@ -434,13 +477,14 @@ static void ParseOneDecl (const DeclSpec* Spec) } /* If the symbol is not marked as external, it will be defined now */ - if ((Decl.StorageClass & SC_EXTERN) == 0) { + if ((Decl.StorageClass & SC_DECL) == 0 && + (Decl.StorageClass & SC_EXTERN) == 0) { Decl.StorageClass |= SC_DEF; } /* Handle anything that needs storage (no functions, no typdefs) */ - if ((Decl.StorageClass & SC_FUNC) != SC_FUNC && - (Decl.StorageClass & SC_TYPEMASK) != SC_TYPEDEF) { + if ((Decl.StorageClass & SC_DEF) == SC_DEF && + (Decl.StorageClass & SC_TYPEMASK) != SC_TYPEDEF) { /* If we have a register variable, try to allocate a register and ** convert the declaration to "auto" if this is not possible. @@ -459,13 +503,6 @@ static void ParseOneDecl (const DeclSpec* Spec) } else if ((Decl.StorageClass & SC_AUTO) == SC_AUTO) { /* Auto variable */ ParseAutoDecl (&Decl); - } else if ((Decl.StorageClass & SC_EXTERN) == SC_EXTERN) { - /* External identifier - may not get initialized */ - if (CurTok.Tok == TOK_ASSIGN) { - Error ("Cannot initialize externals"); - } - /* Add the external symbol to the symbol table */ - AddLocalSym (Decl.Ident, Decl.Type, Decl.StorageClass, 0); } else if ((Decl.StorageClass & SC_STATIC) == SC_STATIC) { /* Static variable */ ParseStaticDecl (&Decl); @@ -475,10 +512,29 @@ static void ParseOneDecl (const DeclSpec* Spec) } else { - /* Add the symbol to the symbol table */ - AddLocalSym (Decl.Ident, Decl.Type, Decl.StorageClass, 0); + if ((Decl.StorageClass & SC_EXTERN) == SC_EXTERN) { + /* External identifier - may not get initialized */ + if (CurTok.Tok == TOK_ASSIGN) { + Error ("Cannot initialize extern variable '%s'", Decl.Ident); + /* Avoid excess errors */ + NextToken (); + ParseInit (Decl.Type); + } + } + + if ((Decl.StorageClass & SC_EXTERN) == SC_EXTERN || + (Decl.StorageClass & SC_FUNC) == SC_FUNC) { + /* Add the global symbol to the local symbol table */ + AddGlobalSym (Decl.Ident, Decl.Type, Decl.StorageClass); + } else { + /* Add the local symbol to the local symbol table */ + AddLocalSym (Decl.Ident, Decl.Type, Decl.StorageClass, 0); + } } + + /* Make sure we aren't missing some work */ + CheckDeferredOpAllDone (); } @@ -489,6 +545,9 @@ void DeclareLocals (void) /* Remember the current stack pointer */ int InitialStack = StackPtr; + /* A place to store info about potential initializations of auto variables */ + CollAppend (&CurrentFunc->LocalsBlockStack, 0); + /* Loop until we don't find any more variables */ while (1) { @@ -500,6 +559,13 @@ void DeclareLocals (void) ** declarations. */ DeclSpec Spec; + + /* Check for a _Static_assert */ + if (CurTok.Tok == TOK_STATIC_ASSERT) { + ParseStaticAssert (); + continue; + } + ParseDeclSpec (&Spec, SC_AUTO, T_INT); if ((Spec.Flags & DS_DEF_STORAGE) != 0 && /* No storage spec */ (Spec.Flags & DS_DEF_TYPE) != 0 && /* No type given */ @@ -538,6 +604,11 @@ void DeclareLocals (void) /* Be sure to allocate any reserved space for locals */ F_AllocLocalSpace (CurrentFunc); + /* No auto variables were inited. No new block on the stack then. */ + if (CollLast (&CurrentFunc->LocalsBlockStack) == NULL) { + CollPop (&CurrentFunc->LocalsBlockStack); + } + /* In case we've allocated local variables in this block, emit a call to ** the stack checking routine if stack checks are enabled. */ diff --git a/src/cc65/loop.c b/src/cc65/loop.c index c15c37a79..cc8ccdec9 100644 --- a/src/cc65/loop.c +++ b/src/cc65/loop.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2004 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -39,7 +39,7 @@ /* cc65 */ #include "error.h" -#include "loop.h" +#include "loop.h" #include "stackptr.h" diff --git a/src/cc65/loop.h b/src/cc65/loop.h index fa2859f61..1174443b4 100644 --- a/src/cc65/loop.h +++ b/src/cc65/loop.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2004 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/cc65/macrotab.c b/src/cc65/macrotab.c index daf5cd7b8..c04024dc8 100644 --- a/src/cc65/macrotab.c +++ b/src/cc65/macrotab.c @@ -245,7 +245,7 @@ void AddMacroArg (Macro* M, const char* Arg) for (I = 0; I < CollCount (&M->FormalArgs); ++I) { if (strcmp (CollAtUnchecked (&M->FormalArgs, I), Arg) == 0) { /* Found */ - Error ("Duplicate macro parameter: `%s'", Arg); + PPError ("Duplicate macro parameter: '%s'", Arg); break; } } diff --git a/src/cc65/main.c b/src/cc65/main.c index abe2af56e..c08616efa 100644 --- a/src/cc65/main.c +++ b/src/cc65/main.c @@ -88,7 +88,7 @@ static void Usage (void) " -O\t\t\t\tOptimize code\n" " -Oi\t\t\t\tOptimize code, inline more code\n" " -Or\t\t\t\tEnable register variables\n" - " -Os\t\t\t\tInline some known functions\n" + " -Os\t\t\t\tInline some standard functions\n" " -T\t\t\t\tInclude source as comment\n" " -V\t\t\t\tPrint the compiler version number\n" " -W warning[,...]\t\tSuppress warnings\n" @@ -114,13 +114,17 @@ static void Usage (void) " --create-full-dep name\tCreate a full make dependency file\n" " --data-name seg\t\tSet the name of the DATA segment\n" " --debug\t\t\tDebug mode\n" + " --debug-tables name\t\tWrite symbol table debug info to a file\n" " --debug-info\t\t\tAdd debug info to object file\n" " --debug-opt name\t\tDebug optimization steps\n" + " --debug-opt-output\t\tDebug output of each optimization step\n" " --dep-target target\t\tUse this dependency target\n" " --disable-opt name\t\tDisable an optimization step\n" + " --eagerly-inline-funcs\tEagerly inline some known functions\n" " --enable-opt name\t\tEnable an optimization step\n" " --help\t\t\tHelp (this text)\n" " --include-dir dir\t\tSet an include directory search path\n" + " --inline-stdfuncs\t\tInline some standard functions\n" " --list-opt-steps\t\tList all optimizer steps and exit\n" " --list-warnings\t\tList available warning types for -W\n" " --local-strings\t\tEmit string literals immediately\n" @@ -158,13 +162,21 @@ static void SetSys (const char* Sys) break; case TGT_MODULE: - AbEnd ("Cannot use `module' as a target for the compiler"); + AbEnd ("Cannot use 'module' as a target for the compiler"); + break; + + case TGT_ATARI2600: + DefineNumericMacro ("__ATARI2600__", 1); break; case TGT_ATARI5200: DefineNumericMacro ("__ATARI5200__", 1); break; + case TGT_ATARI7800: + DefineNumericMacro ("__ATARI7800__", 1); + break; + case TGT_ATARI: DefineNumericMacro ("__ATARI__", 1); break; @@ -230,6 +242,10 @@ static void SetSys (const char* Sys) DefineNumericMacro ("__GEOS_CBM__", 1); break; + case TGT_CREATIVISION: + DefineNumericMacro ("__CREATIVISION__", 1); + break; + case TGT_GEOS_APPLE: DefineNumericMacro ("__GEOS__", 1); DefineNumericMacro ("__GEOS_APPLE__", 1); @@ -243,6 +259,10 @@ static void SetSys (const char* Sys) DefineNumericMacro ("__ATMOS__", 1); break; + case TGT_TELESTRAT: + DefineNumericMacro ("__TELESTRAT__", 1); + break; + case TGT_NES: DefineNumericMacro ("__NES__", 1); break; @@ -271,8 +291,16 @@ static void SetSys (const char* Sys) DefineNumericMacro ("__PCE__", 1); break; + case TGT_CX16: + cbmsys ("__CX16__"); + break; + + case TGT_SYM1: + DefineNumericMacro ("__SYM1__", 1); + break; + default: - AbEnd ("Unknown target system type %d", Target); + AbEnd ("Unknown target system '%s'", Sys); } /* Initialize the translation tables for the target system */ @@ -286,7 +314,11 @@ static void FileNameOption (const char* Opt, const char* Arg, StrBuf* Name) { /* Cannot have the option twice */ if (SB_NotEmpty (Name)) { - AbEnd ("Cannot use option `%s' twice", Opt); + AbEnd ("Cannot use option '%s' twice", Opt); + } + /* A typo in OptTab[] might allow a NULL Arg */ + if (Arg == 0) { + Internal ("Typo in OptTab[]; option '%s' should require an argument", Opt); } /* Remember the file name for later */ SB_CopyStr (Name, Arg); @@ -344,7 +376,7 @@ static void CheckSegName (const char* Seg) { /* Print an error and abort if the name is not ok */ if (!ValidSegName (Seg)) { - AbEnd ("Segment name `%s' is invalid", Seg); + AbEnd ("Segment name '%s' is invalid", Seg); } } @@ -440,8 +472,9 @@ static void OptCPU (const char* Opt, const char* Arg) /* Find the CPU from the given name */ CPU = FindCPU (Arg); if (CPU != CPU_6502 && CPU != CPU_6502X && CPU != CPU_65SC02 && - CPU != CPU_65C02 && CPU != CPU_65816 && CPU != CPU_HUC6280) { - AbEnd ("Invalid argument for %s: `%s'", Opt, Arg); + CPU != CPU_65C02 && CPU != CPU_65816 && CPU != CPU_HUC6280 && + CPU != CPU_6502DTV) { + AbEnd ("Invalid argument for %s: '%s'", Opt, Arg); } } @@ -466,7 +499,11 @@ static void OptDebug (const char* Opt attribute ((unused)), ++Debug; } - +static void OptDebugTables (const char* Opt, const char* Arg) +/* Dump tables to file */ +{ + FileNameOption (Opt, Arg, &DebugTableName); +} static void OptDebugInfo (const char* Opt attribute ((unused)), const char* Arg attribute ((unused))) @@ -486,7 +523,7 @@ static void OptDebugOpt (const char* Opt attribute ((unused)), const char* Arg) /* Open the file */ FILE* F = fopen (Arg, "r"); if (F == 0) { - AbEnd ("Cannot open `%s': %s", Arg, strerror (errno)); + AbEnd ("Cannot open '%s': %s", Arg, strerror (errno)); } /* Read line by line, ignore empty lines and switch optimization @@ -544,7 +581,7 @@ static void OptDebugOpt (const char* Opt attribute ((unused)), const char* Arg) -static void OptDebugOptOutput (const char* Opt attribute ((unused)), +static void OptDebugOptOutput (const char* Opt attribute ((unused)), const char* Arg attribute ((unused))) /* Output optimization steps */ { @@ -569,6 +606,16 @@ static void OptDisableOpt (const char* Opt attribute ((unused)), const char* Arg +static void OptEagerlyInlineFuncs (const char* Opt attribute((unused)), + const char* Arg attribute((unused))) +/* Eagerly inline some known functions */ +{ + IS_Set (&InlineStdFuncs, 1); + IS_Set (&EagerlyInlineFuncs, 1); +} + + + static void OptEnableOpt (const char* Opt attribute ((unused)), const char* Arg) /* Enable an optimization step */ { @@ -596,6 +643,15 @@ static void OptIncludeDir (const char* Opt attribute ((unused)), const char* Arg +static void OptInlineStdFuncs (const char* Opt attribute((unused)), + const char* Arg attribute((unused))) +/* Inline some standard functions */ +{ + IS_Set (&InlineStdFuncs, 1); +} + + + static void OptListOptSteps (const char* Opt attribute ((unused)), const char* Arg attribute ((unused))) /* List all optimizer steps */ @@ -638,7 +694,7 @@ static void OptMemoryModel (const char* Opt, const char* Arg) /* Check the current memory model */ if (MemoryModel != MMODEL_UNKNOWN) { - AbEnd ("Cannot use option `%s' twice", Opt); + AbEnd ("Cannot use option '%s' twice", Opt); } /* Translate the memory model name and check it */ @@ -689,7 +745,7 @@ static void OptRodataName (const char* Opt attribute ((unused)), const char* Arg static void OptSignedChars (const char* Opt attribute ((unused)), const char* Arg attribute ((unused))) -/* Make default characters signed */ +/* Use 'signed char' as the underlying type of 'char' */ { IS_Set (&SignedChars, 1); } @@ -702,7 +758,7 @@ static void OptStandard (const char* Opt, const char* Arg) /* Find the standard from the given name */ standard_t Std = FindStandard (Arg); if (Std == STD_UNKNOWN) { - AbEnd ("Invalid argument for %s: `%s'", Opt, Arg); + AbEnd ("Invalid argument for %s: '%s'", Opt, Arg); } else if (IS_Get (&Standard) != STD_UNKNOWN) { AbEnd ("Option %s given more than once", Opt); } else { @@ -742,7 +798,7 @@ static void OptVersion (const char* Opt attribute ((unused)), const char* Arg attribute ((unused))) /* Print the compiler version */ { - fprintf (stderr, "cc65 V%s\n", GetVersionAsString ()); + fprintf (stderr, "%s V%s\n", ProgName, GetVersionAsString ()); exit (EXIT_SUCCESS); } @@ -807,39 +863,42 @@ int main (int argc, char* argv[]) { /* Program long options */ static const LongOpt OptTab[] = { - { "--add-source", 0, OptAddSource }, - { "--all-cdecl", 0, OptAllCDecl }, - { "--bss-name", 1, OptBssName }, - { "--check-stack", 0, OptCheckStack }, - { "--code-name", 1, OptCodeName }, - { "--codesize", 1, OptCodeSize }, - { "--cpu", 1, OptCPU }, - { "--create-dep", 1, OptCreateDep }, - { "--create-full-dep", 1, OptCreateFullDep }, - { "--data-name", 1, OptDataName }, - { "--debug", 0, OptDebug }, - { "--debug-info", 0, OptDebugInfo }, - { "--debug-opt", 1, OptDebugOpt }, - { "--debug-opt-output", 0, OptDebugOptOutput }, - { "--dep-target", 1, OptDepTarget }, - { "--disable-opt", 1, OptDisableOpt }, - { "--enable-opt", 1, OptEnableOpt }, - { "--help", 0, OptHelp }, - { "--include-dir", 1, OptIncludeDir }, - { "--list-opt-steps", 0, OptListOptSteps }, - { "--list-warnings", 0, OptListWarnings }, - { "--local-strings", 0, OptLocalStrings }, - { "--memory-model", 1, OptMemoryModel }, - { "--register-space", 1, OptRegisterSpace }, - { "--register-vars", 0, OptRegisterVars }, - { "--rodata-name", 1, OptRodataName }, - { "--signed-chars", 0, OptSignedChars }, - { "--standard", 1, OptStandard }, - { "--static-locals", 0, OptStaticLocals }, - { "--target", 1, OptTarget }, - { "--verbose", 0, OptVerbose }, - { "--version", 0, OptVersion }, - { "--writable-strings", 0, OptWritableStrings }, + { "--add-source", 0, OptAddSource }, + { "--all-cdecl", 0, OptAllCDecl }, + { "--bss-name", 1, OptBssName }, + { "--check-stack", 0, OptCheckStack }, + { "--code-name", 1, OptCodeName }, + { "--codesize", 1, OptCodeSize }, + { "--cpu", 1, OptCPU }, + { "--create-dep", 1, OptCreateDep }, + { "--create-full-dep", 1, OptCreateFullDep }, + { "--data-name", 1, OptDataName }, + { "--debug", 0, OptDebug }, + { "--debug-tables", 1, OptDebugTables }, + { "--debug-info", 0, OptDebugInfo }, + { "--debug-opt", 1, OptDebugOpt }, + { "--debug-opt-output", 0, OptDebugOptOutput }, + { "--dep-target", 1, OptDepTarget }, + { "--disable-opt", 1, OptDisableOpt }, + { "--eagerly-inline-funcs", 0, OptEagerlyInlineFuncs }, + { "--enable-opt", 1, OptEnableOpt }, + { "--help", 0, OptHelp }, + { "--include-dir", 1, OptIncludeDir }, + { "--inline-stdfuncs", 0, OptInlineStdFuncs }, + { "--list-opt-steps", 0, OptListOptSteps }, + { "--list-warnings", 0, OptListWarnings }, + { "--local-strings", 0, OptLocalStrings }, + { "--memory-model", 1, OptMemoryModel }, + { "--register-space", 1, OptRegisterSpace }, + { "--register-vars", 0, OptRegisterVars }, + { "--rodata-name", 1, OptRodataName }, + { "--signed-chars", 0, OptSignedChars }, + { "--standard", 1, OptStandard }, + { "--static-locals", 0, OptStaticLocals }, + { "--target", 1, OptTarget }, + { "--verbose", 0, OptVerbose }, + { "--version", 0, OptVersion }, + { "--writable-strings", 0, OptWritableStrings }, }; unsigned I; @@ -853,6 +912,9 @@ int main (int argc, char* argv[]) /* Initialize the default segment names */ InitSegNames (); + /* Initialize the segment address sizes table */ + InitSegAddrSizes (); + /* Initialize the include search paths */ InitIncludePaths (); @@ -903,10 +965,6 @@ int main (int argc, char* argv[]) OptTarget (Arg, GetArg (&I, 2)); break; - case 'u': - OptCreateDep (Arg, 0); - break; - case 'v': OptVerbose (Arg, 0); break; @@ -951,6 +1009,9 @@ int main (int argc, char* argv[]) case 's': IS_Set (&InlineStdFuncs, 1); break; + default: + UnknownOption (Arg); + break; } } break; @@ -1013,13 +1074,16 @@ int main (int argc, char* argv[]) IS_Set (&Standard, STD_DEFAULT); } + /* Track string buffer allocation */ + InitDiagnosticStrBufs (); + /* Go! */ Compile (InputFile); /* Create the output file if we didn't had any errors */ if (PreprocessOnly == 0 && (ErrorCount == 0 || Debug)) { - /* Emit literals, externals, do cleanup and optimizations */ + /* Emit literals, do cleanup and optimizations */ FinishCompile (); /* Open the file */ @@ -1027,7 +1091,7 @@ int main (int argc, char* argv[]) /* Write the output to the file */ WriteAsmOutput (); - Print (stdout, 1, "Wrote output to `%s'\n", OutputFilename); + Print (stdout, 1, "Wrote output to '%s'\n", OutputFilename); /* Close the file, check for errors */ CloseOutputFile (); @@ -1036,6 +1100,12 @@ int main (int argc, char* argv[]) CreateDependencies (); } + /* Done with tracked string buffer allocation */ + DoneDiagnosticStrBufs (); + + /* Free up the segment address sizes table */ + DoneSegAddrSizes (); + /* Return an apropriate exit code */ return (ErrorCount > 0)? EXIT_FAILURE : EXIT_SUCCESS; } diff --git a/src/cc65/opcodes.c b/src/cc65/opcodes.c index a7b91ca9a..aeea0297b 100644 --- a/src/cc65/opcodes.c +++ b/src/cc65/opcodes.c @@ -61,394 +61,394 @@ const OPCDesc OPCTable[OP65_COUNT] = { { OP65_ADC, /* opcode */ "adc", /* mnemonic */ 0, /* size */ - REG_A, /* use */ - REG_A, /* chg */ - OF_SETF /* flags */ + OF_SETF | OF_READ, /* flags */ + REG_A | PSTATE_C, /* use */ + REG_A | PSTATE_CZVN /* chg */ }, { OP65_AND, /* opcode */ "and", /* mnemonic */ 0, /* size */ + OF_SETF | OF_READ, /* flags */ REG_A, /* use */ - REG_A, /* chg */ - OF_SETF /* flags */ + REG_A | PSTATE_ZN /* chg */ }, { OP65_ASL, /* opcode */ "asl", /* mnemonic */ 0, /* size */ + OF_SETF | OF_NOIMP | OF_RMW, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_SETF | OF_NOIMP /* flags */ + PSTATE_CZN /* chg */ }, { OP65_BCC, /* opcode */ "bcc", /* mnemonic */ 2, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA /* flags */ + OF_CBRA, /* flags */ + PSTATE_C, /* use */ + REG_NONE /* chg */ }, { OP65_BCS, /* opcode */ "bcs", /* mnemonic */ 2, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA /* flags */ + OF_CBRA, /* flags */ + PSTATE_C, /* use */ + REG_NONE /* chg */ }, { OP65_BEQ, /* opcode */ "beq", /* mnemonic */ 2, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA | OF_ZBRA | OF_FBRA /* flags */ + OF_CBRA | OF_ZBRA | OF_FBRA, /* flags */ + PSTATE_Z, /* use */ + REG_NONE /* chg */ }, { OP65_BIT, /* opcode */ "bit", /* mnemonic */ 0, /* size */ + OF_READ, /* flags */ REG_A, /* use */ - REG_NONE, /* chg */ - OF_SETF /* flags */ + PSTATE_ZVN /* chg */ }, { OP65_BMI, /* opcode */ "bmi", /* mnemonic */ 2, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA | OF_FBRA /* flags */ + OF_CBRA | OF_FBRA, /* flags */ + PSTATE_N, /* use */ + REG_NONE /* chg */ }, { OP65_BNE, /* opcode */ "bne", /* mnemonic */ 2, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA | OF_ZBRA | OF_FBRA /* flags */ + OF_CBRA | OF_ZBRA | OF_FBRA, /* flags */ + PSTATE_Z, /* use */ + REG_NONE /* chg */ }, { OP65_BPL, /* opcode */ "bpl", /* mnemonic */ 2, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA | OF_FBRA /* flags */ + OF_CBRA | OF_FBRA, /* flags */ + PSTATE_N, /* use */ + REG_NONE /* chg */ }, { OP65_BRA, /* opcode */ "bra", /* mnemonic */ 2, /* size */ + OF_UBRA, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_UBRA /* flags */ + REG_NONE /* chg */ }, { OP65_BRK, /* opcode */ "brk", /* mnemonic */ 1, /* size */ + OF_NONE, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + PSTATE_B /* chg */ }, { OP65_BVC, /* opcode */ "bvc", /* mnemonic */ 2, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA /* flags */ + OF_CBRA, /* flags */ + PSTATE_V, /* use */ + REG_NONE /* chg */ }, { OP65_BVS, /* opcode */ "bvs", /* mnemonic */ 2, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA /* flags */ + OF_CBRA, /* flags */ + PSTATE_V, /* use */ + REG_NONE /* chg */ }, { OP65_CLC, /* opcode */ "clc", /* mnemonic */ 1, /* size */ + OF_NONE, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + PSTATE_C /* chg */ }, { OP65_CLD, /* opcode */ "cld", /* mnemonic */ 1, /* size */ + OF_NONE, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + PSTATE_D /* chg */ }, { OP65_CLI, /* opcode */ "cli", /* mnemonic */ 1, /* size */ + OF_NONE, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + PSTATE_I /* chg */ }, { OP65_CLV, /* opcode */ "clv", /* mnemonic */ 1, /* size */ + OF_NONE, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + PSTATE_V /* chg */ }, { OP65_CMP, /* opcode */ "cmp", /* mnemonic */ 0, /* size */ + OF_SETF | OF_CMP | OF_READ, /* flags */ REG_A, /* use */ - REG_NONE, /* chg */ - OF_SETF | OF_CMP /* flags */ + PSTATE_CZN /* chg */ }, { OP65_CPX, /* opcode */ "cpx", /* mnemonic */ 0, /* size */ + OF_SETF | OF_CMP | OF_READ, /* flags */ REG_X, /* use */ - REG_NONE, /* chg */ - OF_SETF | OF_CMP /* flags */ + PSTATE_CZN /* chg */ }, { OP65_CPY, /* opcode */ "cpy", /* mnemonic */ 0, /* size */ + OF_SETF | OF_CMP | OF_READ, /* flags */ REG_Y, /* use */ - REG_NONE, /* chg */ - OF_SETF | OF_CMP /* flags */ + PSTATE_CZN /* chg */ }, { OP65_DEA, /* opcode */ "dea", /* mnemonic */ 1, /* size */ + OF_REG_INCDEC | OF_SETF, /* flags */ REG_A, /* use */ - REG_A, /* chg */ - OF_REG_INCDEC | OF_SETF /* flags */ + REG_A | PSTATE_ZN /* chg */ }, { OP65_DEC, /* opcode */ "dec", /* mnemonic */ 0, /* size */ + OF_SETF | OF_NOIMP | OF_RMW, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_SETF | OF_NOIMP /* flags */ + PSTATE_ZN /* chg */ }, { OP65_DEX, /* opcode */ "dex", /* mnemonic */ 1, /* size */ + OF_REG_INCDEC | OF_SETF, /* flags */ REG_X, /* use */ - REG_X, /* chg */ - OF_REG_INCDEC | OF_SETF /* flags */ + REG_X | PSTATE_ZN /* chg */ }, { OP65_DEY, /* opcode */ "dey", /* mnemonic */ 1, /* size */ + OF_REG_INCDEC | OF_SETF, /* flags */ REG_Y, /* use */ - REG_Y, /* chg */ - OF_REG_INCDEC | OF_SETF /* flags */ + REG_Y | PSTATE_ZN /* chg */ }, { OP65_EOR, /* opcode */ "eor", /* mnemonic */ 0, /* size */ + OF_SETF | OF_READ, /* flags */ REG_A, /* use */ - REG_A, /* chg */ - OF_SETF /* flags */ + REG_A | PSTATE_ZN /* chg */ }, { OP65_INA, /* opcode */ "ina", /* mnemonic */ 1, /* size */ + OF_REG_INCDEC | OF_SETF, /* flags */ REG_A, /* use */ - REG_A, /* chg */ - OF_REG_INCDEC | OF_SETF /* flags */ + REG_A | PSTATE_ZN /* chg */ }, { OP65_INC, /* opcode */ "inc", /* mnemonic */ 0, /* size */ + OF_SETF | OF_NOIMP | OF_RMW, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_SETF | OF_NOIMP /* flags */ + PSTATE_ZN /* chg */ }, { OP65_INX, /* opcode */ "inx", /* mnemonic */ 1, /* size */ + OF_REG_INCDEC | OF_SETF, /* flags */ REG_X, /* use */ - REG_X, /* chg */ - OF_REG_INCDEC | OF_SETF /* flags */ + REG_X | PSTATE_ZN /* chg */ }, { OP65_INY, /* opcode */ "iny", /* mnemonic */ 1, /* size */ + OF_REG_INCDEC | OF_SETF, /* flags */ REG_Y, /* use */ - REG_Y, /* chg */ - OF_REG_INCDEC | OF_SETF /* flags */ + REG_Y | PSTATE_ZN /* chg */ }, { OP65_JCC, /* opcode */ "jcc", /* mnemonic */ 5, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA | OF_LBRA /* flags */ + OF_CBRA | OF_LBRA, /* flags */ + PSTATE_C, /* use */ + REG_NONE /* chg */ }, { OP65_JCS, /* opcode */ "jcs", /* mnemonic */ 5, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA | OF_LBRA /* flags */ + OF_CBRA | OF_LBRA, /* flags */ + PSTATE_C, /* use */ + REG_NONE /* chg */ }, { OP65_JEQ, /* opcode */ "jeq", /* mnemonic */ 5, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA | OF_LBRA | OF_ZBRA | OF_FBRA /* flags */ + OF_CBRA | OF_LBRA | OF_ZBRA | OF_FBRA, /* flags */ + PSTATE_Z, /* use */ + REG_NONE /* chg */ }, { OP65_JMI, /* opcode */ "jmi", /* mnemonic */ 5, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA | OF_LBRA | OF_FBRA /* flags */ + OF_CBRA | OF_LBRA | OF_FBRA, /* flags */ + PSTATE_N, /* use */ + REG_NONE /* chg */ }, { OP65_JMP, /* opcode */ "jmp", /* mnemonic */ 3, /* size */ + OF_UBRA | OF_LBRA | OF_READ, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_UBRA | OF_LBRA /* flags */ + REG_NONE /* chg */ }, { OP65_JNE, /* opcode */ "jne", /* mnemonic */ 5, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA | OF_LBRA | OF_ZBRA | OF_FBRA /* flags */ + OF_CBRA | OF_LBRA | OF_ZBRA | OF_FBRA, /* flags */ + PSTATE_Z, /* use */ + REG_NONE /* chg */ }, { OP65_JPL, /* opcode */ "jpl", /* mnemonic */ 5, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA | OF_LBRA | OF_FBRA /* flags */ + OF_CBRA | OF_LBRA | OF_FBRA, /* flags */ + PSTATE_N, /* use */ + REG_NONE /* chg */ }, { OP65_JSR, /* opcode */ "jsr", /* mnemonic */ 3, /* size */ + OF_CALL | OF_READ, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CALL /* flags */ + REG_NONE /* chg */ }, { OP65_JVC, /* opcode */ "jvc", /* mnemonic */ 5, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA | OF_LBRA /* flags */ + OF_CBRA | OF_LBRA, /* flags */ + PSTATE_V, /* use */ + REG_NONE /* chg */ }, { OP65_JVS, /* opcode */ "jvs", /* mnemonic */ 5, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_CBRA | OF_LBRA /* flags */ + OF_CBRA | OF_LBRA, /* flags */ + PSTATE_V, /* use */ + REG_NONE /* chg */ }, { OP65_LDA, /* opcode */ "lda", /* mnemonic */ 0, /* size */ + OF_LOAD | OF_SETF | OF_READ, /* flags */ REG_NONE, /* use */ - REG_A, /* chg */ - OF_LOAD | OF_SETF /* flags */ + REG_A | PSTATE_ZN /* chg */ }, { OP65_LDX, /* opcode */ "ldx", /* mnemonic */ 0, /* size */ + OF_LOAD | OF_SETF | OF_READ, /* flags */ REG_NONE, /* use */ - REG_X, /* chg */ - OF_LOAD | OF_SETF /* flags */ + REG_X | PSTATE_ZN /* chg */ }, { OP65_LDY, /* opcode */ "ldy", /* mnemonic */ 0, /* size */ + OF_LOAD | OF_SETF | OF_READ, /* flags */ REG_NONE, /* use */ - REG_Y, /* chg */ - OF_LOAD | OF_SETF /* flags */ + REG_Y | PSTATE_ZN /* chg */ }, { OP65_LSR, /* opcode */ "lsr", /* mnemonic */ 0, /* size */ + OF_SETF | OF_NOIMP | OF_RMW, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_SETF | OF_NOIMP /* flags */ + PSTATE_CZN /* chg */ }, { OP65_NOP, /* opcode */ "nop", /* mnemonic */ 1, /* size */ + OF_NONE, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + REG_NONE /* chg */ }, { OP65_ORA, /* opcode */ "ora", /* mnemonic */ 0, /* size */ + OF_SETF | OF_READ, /* flags */ REG_A, /* use */ - REG_A, /* chg */ - OF_SETF /* flags */ + REG_A | PSTATE_ZN /* chg */ }, { OP65_PHA, /* opcode */ "pha", /* mnemonic */ 1, /* size */ + OF_NONE, /* flags */ REG_A, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + REG_NONE /* chg */ }, { OP65_PHP, /* opcode */ "php", /* mnemonic */ 1, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + OF_NONE, /* flags */ + PSTATE_ALL, /* use */ + REG_NONE /* chg */ }, { OP65_PHX, /* opcode */ "phx", /* mnemonic */ 1, /* size */ + OF_NONE, /* flags */ REG_X, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + REG_NONE /* chg */ }, { OP65_PHY, /* opcode */ "phy", /* mnemonic */ 1, /* size */ + OF_NONE, /* flags */ REG_Y, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + REG_NONE /* chg */ }, { OP65_PLA, /* opcode */ "pla", /* mnemonic */ 1, /* size */ + OF_SETF, /* flags */ REG_NONE, /* use */ - REG_A, /* chg */ - OF_SETF /* flags */ + REG_A | PSTATE_ZN /* chg */ }, { OP65_PLP, /* opcode */ "plp", /* mnemonic */ 1, /* size */ + OF_NONE, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + PSTATE_ALL /* chg */ }, { OP65_PLX, /* opcode */ "plx", /* mnemonic */ 1, /* size */ + OF_SETF, /* flags */ REG_NONE, /* use */ - REG_X, /* chg */ - OF_SETF /* flags */ + REG_X | PSTATE_ZN /* chg */ }, { OP65_PLY, /* opcode */ "ply", /* mnemonic */ 1, /* size */ + OF_SETF, /* flags */ REG_NONE, /* use */ - REG_Y, /* chg */ - OF_SETF /* flags */ + REG_Y | PSTATE_ZN /* chg */ }, { OP65_ROL, /* opcode */ "rol", /* mnemonic */ 0, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_SETF | OF_NOIMP /* flags */ + OF_SETF | OF_NOIMP | OF_RMW, /* flags */ + PSTATE_C, /* use */ + PSTATE_CZN /* chg */ }, { OP65_ROR, /* opcode */ "ror", /* mnemonic */ 0, /* size */ - REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_SETF | OF_NOIMP /* flags */ + OF_SETF | OF_NOIMP | OF_RMW, /* flags */ + PSTATE_C, /* use */ + PSTATE_CZN /* chg */ }, /* Mark RTI as "uses all registers but doesn't change them", so the ** optimizer won't remove preceeding loads. @@ -456,128 +456,135 @@ const OPCDesc OPCTable[OP65_COUNT] = { { OP65_RTI, /* opcode */ "rti", /* mnemonic */ 1, /* size */ + OF_RET, /* flags */ REG_AXY, /* use */ - REG_NONE, /* chg */ - OF_RET /* flags */ + PSTATE_ALL /* chg */ }, { OP65_RTS, /* opcode */ "rts", /* mnemonic */ 1, /* size */ + OF_RET, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_RET /* flags */ + REG_NONE /* chg */ }, { OP65_SBC, /* opcode */ "sbc", /* mnemonic */ 0, /* size */ - REG_A, /* use */ - REG_A, /* chg */ - OF_SETF /* flags */ + OF_SETF | OF_READ, /* flags */ + REG_A | PSTATE_C, /* use */ + REG_A | PSTATE_CZVN /* chg */ }, { OP65_SEC, /* opcode */ "sec", /* mnemonic */ 1, /* size */ + OF_NONE, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + PSTATE_C /* chg */ }, { OP65_SED, /* opcode */ "sed", /* mnemonic */ 1, /* size */ + OF_NONE, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + PSTATE_D /* chg */ }, { OP65_SEI, /* opcode */ "sei", /* mnemonic */ 1, /* size */ + OF_NONE, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_NONE /* flags */ + PSTATE_I /* chg */ }, { OP65_STA, /* opcode */ "sta", /* mnemonic */ 0, /* size */ + OF_STORE | OF_WRITE, /* flags */ REG_A, /* use */ - REG_NONE, /* chg */ - OF_STORE /* flags */ + REG_NONE /* chg */ + }, + { OP65_STP, /* opcode */ + "stp", /* mnemonic */ + 1, /* size */ + OF_NONE, /* flags */ + REG_NONE, /* use */ + REG_NONE /* chg */ }, { OP65_STX, /* opcode */ "stx", /* mnemonic */ 0, /* size */ + OF_STORE | OF_WRITE, /* flags */ REG_X, /* use */ - REG_NONE, /* chg */ - OF_STORE /* flags */ + REG_NONE /* chg */ }, { OP65_STY, /* opcode */ "sty", /* mnemonic */ 0, /* size */ + OF_STORE | OF_WRITE, /* flags */ REG_Y, /* use */ - REG_NONE, /* chg */ - OF_STORE /* flags */ + REG_NONE /* chg */ }, { OP65_STZ, /* opcode */ "stz", /* mnemonic */ 0, /* size */ + OF_STORE | OF_WRITE, /* flags */ REG_NONE, /* use */ - REG_NONE, /* chg */ - OF_STORE /* flags */ + REG_NONE /* chg */ }, { OP65_TAX, /* opcode */ "tax", /* mnemonic */ 1, /* size */ + OF_XFR | OF_SETF, /* flags */ REG_A, /* use */ - REG_X, /* chg */ - OF_XFR | OF_SETF /* flags */ + REG_X | PSTATE_ZN /* chg */ }, { OP65_TAY, /* opcode */ "tay", /* mnemonic */ 1, /* size */ + OF_XFR | OF_SETF, /* flags */ REG_A, /* use */ - REG_Y, /* chg */ - OF_XFR | OF_SETF /* flags */ + REG_Y | PSTATE_ZN /* chg */ }, { OP65_TRB, /* opcode */ "trb", /* mnemonic */ 0, /* size */ + OF_RMW, /* flags */ REG_A, /* use */ - REG_NONE, /* chg */ - OF_SETF /* flags */ + PSTATE_Z /* chg */ }, { OP65_TSB, /* opcode */ "tsb", /* mnemonic */ 0, /* size */ + OF_RMW, /* flags */ REG_A, /* use */ - REG_NONE, /* chg */ - OF_SETF /* flags */ + PSTATE_Z /* chg */ }, { OP65_TSX, /* opcode */ "tsx", /* mnemonic */ 1, /* size */ + OF_XFR | OF_SETF, /* flags */ REG_NONE, /* use */ - REG_X, /* chg */ - OF_XFR | OF_SETF /* flags */ + REG_X | PSTATE_ZN /* chg */ }, { OP65_TXA, /* opcode */ "txa", /* mnemonic */ 1, /* size */ + OF_XFR | OF_SETF, /* flags */ REG_X, /* use */ - REG_A, /* chg */ - OF_XFR | OF_SETF /* flags */ + REG_A | PSTATE_ZN /* chg */ }, { OP65_TXS, /* opcode */ "txs", /* mnemonic */ 1, /* size */ + OF_XFR, /* flags */ REG_X, /* use */ - REG_NONE, /* chg */ - OF_XFR /* flags */ + REG_NONE /* chg */ }, { OP65_TYA, /* opcode */ "tya", /* mnemonic */ 1, /* size */ + OF_XFR | OF_SETF, /* flags */ REG_Y, /* use */ - REG_A, /* chg */ - OF_XFR | OF_SETF /* flags */ + REG_A | PSTATE_ZN /* chg */ }, }; @@ -642,6 +649,7 @@ unsigned GetInsnSize (opc_t OPC, am_t AM) case AM65_IMM: return 2; case AM65_ZP: return 2; case AM65_ZPX: return 2; + case AM65_ZPY: return 2; case AM65_ABS: return 3; case AM65_ABSX: return 3; case AM65_ABSY: return 3; @@ -726,7 +734,7 @@ opc_t MakeShortBranch (opc_t OPC) case OP65_BVS: case OP65_JVS: return OP65_BVS; case OP65_BRA: - case OP65_JMP: return (CPUIsets[CPU] & CPU_ISET_65SC02)? OP65_BRA : OP65_JMP; + case OP65_JMP: return (CPUIsets[CPU] & (CPU_ISET_65SC02 | CPU_ISET_6502DTV)) ? OP65_BRA : OP65_JMP; default: Internal ("MakeShortBranch: Invalid opcode: %d", OPC); return 0; diff --git a/src/cc65/opcodes.h b/src/cc65/opcodes.h index 349de32a4..980cc649a 100644 --- a/src/cc65/opcodes.h +++ b/src/cc65/opcodes.h @@ -114,6 +114,7 @@ typedef enum { OP65_SED, OP65_SEI, OP65_STA, + OP65_STP, /* 65c02, 65816 stop */ OP65_STX, OP65_STY, OP65_STZ, @@ -127,14 +128,17 @@ typedef enum { OP65_TYA, /* Number of opcodes available */ - OP65_COUNT + OP65_COUNT, + + /* Invalid opcode */ + OP65_INVALID = OP65_COUNT, } opc_t; /* 65XX addressing modes */ typedef enum { AM65_IMP, /* implicit */ AM65_ACC, /* accumulator */ - AM65_IMM, /* immidiate */ + AM65_IMM, /* immediate */ AM65_ZP, /* zeropage */ AM65_ZPX, /* zeropage,X */ AM65_ZPY, /* zeropage,Y */ @@ -172,22 +176,25 @@ typedef enum { #define OF_XFR 0x0100U /* Transfer instruction */ #define OF_CALL 0x0200U /* A subroutine call */ #define OF_REG_INCDEC 0x0400U /* A register increment or decrement */ -#define OF_SETF 0x0800U /* Insn will set all load flags (not carry) */ +#define OF_SETF 0x0800U /* Insn will set both Z and N flags according to the result */ #define OF_CMP 0x1000U /* A compare A/X/Y instruction */ #define OF_NOIMP 0x2000U /* Implicit addressing mode is actually A */ +#define OF_READ 0x4000U /* Read from the memory address */ +#define OF_WRITE 0x8000U /* Write to the memory address */ /* Combined infos */ #define OF_BRA (OF_UBRA | OF_CBRA) /* Operation is a jump/branch */ #define OF_DEAD (OF_UBRA | OF_RET) /* Dead end - no exec behind this point */ +#define OF_RMW (OF_READ | OF_WRITE) /* Read, Modify and Write */ /* Opcode description */ typedef struct { opc_t OPC; /* Opcode */ char Mnemo[9]; /* Mnemonic */ unsigned char Size; /* Size, 0 = check addressing mode */ - unsigned short Use; /* Registers used by this insn */ - unsigned short Chg; /* Registers changed by this insn */ unsigned short Info; /* Additional information */ + unsigned int Use; /* Registers used by this insn */ + unsigned int Chg; /* Registers changed by this insn */ } OPCDesc; /* Opcode description table */ diff --git a/src/cc65/output.c b/src/cc65/output.c index e0b06ef99..6ce5334ca 100644 --- a/src/cc65/output.c +++ b/src/cc65/output.c @@ -102,9 +102,9 @@ void OpenOutputFile () /* Open the file */ OutputFile = fopen (OutputFilename, "w"); if (OutputFile == 0) { - Fatal ("Cannot open output file `%s': %s", OutputFilename, strerror (errno)); + Fatal ("Cannot open output file '%s': %s", OutputFilename, strerror (errno)); } - Print (stdout, 1, "Opened output file `%s'\n", OutputFilename); + Print (stdout, 1, "Opened output file '%s'\n", OutputFilename); } @@ -120,9 +120,9 @@ void OpenDebugOutputFile (const char* Name) /* Open the file */ OutputFile = fopen (Name, "w"); if (OutputFile == 0) { - Fatal ("Cannot open debug output file `%s': %s", Name, strerror (errno)); + Fatal ("Cannot open debug output file '%s': %s", Name, strerror (errno)); } - Print (stdout, 1, "Opened debug output file `%s'\n", Name); + Print (stdout, 1, "Opened debug output file '%s'\n", Name); } @@ -138,7 +138,7 @@ void CloseOutputFile () remove (OutputFilename); Fatal ("Cannot write to output file (disk full?)"); } - Print (stdout, 1, "Closed output file `%s'\n", OutputFilename); + Print (stdout, 1, "Closed output file '%s'\n", OutputFilename); OutputFile = 0; } diff --git a/src/cc65/pragma.c b/src/cc65/pragma.c index f42274922..b0478ce2a 100644 --- a/src/cc65/pragma.c +++ b/src/cc65/pragma.c @@ -37,6 +37,7 @@ #include <string.h> /* common */ +#include "addrsize.h" #include "chartype.h" #include "segnames.h" #include "tgttrans.h" @@ -45,12 +46,14 @@ #include "codegen.h" #include "error.h" #include "expr.h" +#include "funcdesc.h" #include "global.h" #include "litpool.h" #include "scanner.h" #include "scanstrbuf.h" #include "symtab.h" #include "pragma.h" +#include "wrappedcall.h" @@ -64,6 +67,7 @@ typedef enum { PRAGMA_ILLEGAL = -1, PRAGMA_ALIGN, + PRAGMA_ALLOW_EAGER_INLINE, PRAGMA_BSS_NAME, PRAGMA_BSSSEG, /* obsolete */ PRAGMA_CHARMAP, @@ -74,10 +78,12 @@ typedef enum { PRAGMA_CODESIZE, PRAGMA_DATA_NAME, PRAGMA_DATASEG, /* obsolete */ + PRAGMA_INLINE_STDFUNCS, PRAGMA_LOCAL_STRINGS, + PRAGMA_MESSAGE, PRAGMA_OPTIMIZE, - PRAGMA_REGVARADDR, PRAGMA_REGISTER_VARS, + PRAGMA_REGVARADDR, PRAGMA_REGVARS, /* obsolete */ PRAGMA_RODATA_NAME, PRAGMA_RODATASEG, /* obsolete */ @@ -86,6 +92,7 @@ typedef enum { PRAGMA_STATIC_LOCALS, PRAGMA_STATICLOCALS, /* obsolete */ PRAGMA_WARN, + PRAGMA_WRAPPED_CALL, PRAGMA_WRITABLE_STRINGS, PRAGMA_ZPSYM, PRAGMA_COUNT @@ -96,31 +103,35 @@ static const struct Pragma { const char* Key; /* Keyword */ pragma_t Tok; /* Token */ } Pragmas[PRAGMA_COUNT] = { - { "align", PRAGMA_ALIGN }, - { "bss-name", PRAGMA_BSS_NAME }, - { "bssseg", PRAGMA_BSSSEG }, /* obsolete */ - { "charmap", PRAGMA_CHARMAP }, - { "check-stack", PRAGMA_CHECK_STACK }, - { "checkstack", PRAGMA_CHECKSTACK }, /* obsolete */ - { "code-name", PRAGMA_CODE_NAME }, - { "codeseg", PRAGMA_CODESEG }, /* obsolete */ - { "codesize", PRAGMA_CODESIZE }, - { "data-name", PRAGMA_DATA_NAME }, - { "dataseg", PRAGMA_DATASEG }, /* obsolete */ - { "local-strings", PRAGMA_LOCAL_STRINGS }, - { "optimize", PRAGMA_OPTIMIZE }, - { "register-vars", PRAGMA_REGISTER_VARS }, - { "regvaraddr", PRAGMA_REGVARADDR }, - { "regvars", PRAGMA_REGVARS }, /* obsolete */ - { "rodata-name", PRAGMA_RODATA_NAME }, - { "rodataseg", PRAGMA_RODATASEG }, /* obsolete */ - { "signed-chars", PRAGMA_SIGNED_CHARS }, - { "signedchars", PRAGMA_SIGNEDCHARS }, /* obsolete */ - { "static-locals", PRAGMA_STATIC_LOCALS }, - { "staticlocals", PRAGMA_STATICLOCALS }, /* obsolete */ - { "warn", PRAGMA_WARN }, - { "writable-strings", PRAGMA_WRITABLE_STRINGS }, - { "zpsym", PRAGMA_ZPSYM }, + { "align", PRAGMA_ALIGN }, + { "allow-eager-inline", PRAGMA_ALLOW_EAGER_INLINE }, + { "bss-name", PRAGMA_BSS_NAME }, + { "bssseg", PRAGMA_BSSSEG }, /* obsolete */ + { "charmap", PRAGMA_CHARMAP }, + { "check-stack", PRAGMA_CHECK_STACK }, + { "checkstack", PRAGMA_CHECKSTACK }, /* obsolete */ + { "code-name", PRAGMA_CODE_NAME }, + { "codeseg", PRAGMA_CODESEG }, /* obsolete */ + { "codesize", PRAGMA_CODESIZE }, + { "data-name", PRAGMA_DATA_NAME }, + { "dataseg", PRAGMA_DATASEG }, /* obsolete */ + { "inline-stdfuncs", PRAGMA_INLINE_STDFUNCS }, + { "local-strings", PRAGMA_LOCAL_STRINGS }, + { "message", PRAGMA_MESSAGE }, + { "optimize", PRAGMA_OPTIMIZE }, + { "register-vars", PRAGMA_REGISTER_VARS }, + { "regvaraddr", PRAGMA_REGVARADDR }, + { "regvars", PRAGMA_REGVARS }, /* obsolete */ + { "rodata-name", PRAGMA_RODATA_NAME }, + { "rodataseg", PRAGMA_RODATASEG }, /* obsolete */ + { "signed-chars", PRAGMA_SIGNED_CHARS }, + { "signedchars", PRAGMA_SIGNEDCHARS }, /* obsolete */ + { "static-locals", PRAGMA_STATIC_LOCALS }, + { "staticlocals", PRAGMA_STATICLOCALS }, /* obsolete */ + { "warn", PRAGMA_WARN }, + { "wrapped-call", PRAGMA_WRAPPED_CALL }, + { "writable-strings", PRAGMA_WRITABLE_STRINGS }, + { "zpsym", PRAGMA_ZPSYM }, }; /* Result of ParsePushPop */ @@ -347,7 +358,7 @@ static int BoolKeyword (StrBuf* Ident) } /* Error */ - Error ("Pragma argument must be one of `on', `off', `true' or `false'"); + Error ("Pragma argument must be one of 'on', 'off', 'true' or 'false'"); return 0; } @@ -379,11 +390,13 @@ static void StringPragma (StrBuf* B, void (*Func) (const char*)) static void SegNamePragma (StrBuf* B, segment_t Seg) /* Handle a pragma that expects a segment name parameter */ { - StrBuf S = AUTO_STRBUF_INITIALIZER; const char* Name; + unsigned char AddrSize = ADDR_SIZE_INVALID; + StrBuf S = AUTO_STRBUF_INITIALIZER; + StrBuf A = AUTO_STRBUF_INITIALIZER; + int Push = 0; /* Check for the "push" or "pop" keywords */ - int Push = 0; switch (ParsePushPop (B)) { case PP_NONE: @@ -396,7 +409,13 @@ static void SegNamePragma (StrBuf* B, segment_t Seg) case PP_POP: /* Pop the old value and output it */ PopSegName (Seg); - g_segname (Seg); + + /* BSS variables are output at the end of the compilation. Don't + ** bother to change their segment, now. + */ + if (Seg != SEG_BSS) { + g_segname (Seg); + } /* Done */ goto ExitPoint; @@ -415,24 +434,135 @@ static void SegNamePragma (StrBuf* B, segment_t Seg) goto ExitPoint; } - /* Get the string */ + /* Get the name string of the segment */ Name = SB_GetConstBuf (&S); /* Check if the name is valid */ if (ValidSegName (Name)) { - /* Set the new name */ + /* Skip the following comma */ + SB_SkipWhite (B); + if (SB_Peek (B) == ',') { + SB_Skip (B); + SB_SkipWhite (B); + + /* A string argument must follow */ + if (!GetString (B, &A)) { + goto ExitPoint; + } + + /* Get the address size for the segment */ + AddrSize = AddrSizeFromStr (SB_GetConstBuf (&A)); + + /* Set the address size for the segment if valid */ + if (AddrSize != ADDR_SIZE_INVALID) { + SetSegAddrSize (Name, AddrSize); + } else { + Warning ("Invalid address size for segment!"); + } + } + + /* Set the new name and optionally address size */ if (Push) { PushSegName (Seg, Name); } else { SetSegName (Seg, Name); } - g_segname (Seg); + + /* BSS variables are output at the end of the compilation. Don't + ** bother to change their segment, now. + */ + if (Seg != SEG_BSS) { + g_segname (Seg); + } } else { /* Segment name is invalid */ - Error ("Illegal segment name: `%s'", Name); + Error ("Illegal segment name: '%s'", Name); + + } + +ExitPoint: + /* Call the string buf destructor */ + SB_Done (&S); + SB_Done (&A); +} + + +static void WrappedCallPragma (StrBuf* B) +/* Handle the wrapped-call pragma */ +{ + StrBuf S = AUTO_STRBUF_INITIALIZER; + const char *Name; + long Val; + SymEntry *Entry; + + /* Check for the "push" or "pop" keywords */ + switch (ParsePushPop (B)) { + + case PP_NONE: + Error ("Push or pop required"); + break; + + case PP_PUSH: + break; + + case PP_POP: + PopWrappedCall(); + + /* Done */ + goto ExitPoint; + + case PP_ERROR: + /* Bail out */ + goto ExitPoint; + + default: + Internal ("Invalid result from ParsePushPop"); + + } + + /* A symbol argument must follow */ + if (!SB_GetSym (B, &S, NULL)) { + goto ExitPoint; + } + + /* Skip the following comma */ + if (!GetComma (B)) { + /* Error already flagged by GetComma */ + Error ("Value or the word 'bank' required for wrapped-call identifier"); + goto ExitPoint; + } + + /* Next must be either a numeric value, or "bank" */ + if (HasStr (B, "bank")) { + Val = WRAPPED_CALL_USE_BANK; + } else if (!GetNumber (B, &Val)) { + Error ("Value required for wrapped-call identifier"); + goto ExitPoint; + } + + if (!(Val == WRAPPED_CALL_USE_BANK) && (Val < 0 || Val > 255)) { + Error ("Identifier must be between 0-255"); + goto ExitPoint; + } + + /* Get the string */ + Name = SB_GetConstBuf (&S); + Entry = FindSym(Name); + + /* Check if the name is valid */ + if (Entry && (Entry->Flags & SC_FUNC) == SC_FUNC) { + + PushWrappedCall(Entry, (unsigned int) Val); + Entry->Flags |= SC_REF; + GetFuncDesc (Entry->Type)->Flags |= FD_CALL_WRAPPER; + + } else { + + /* Segment name is invalid */ + Error ("Wrapped-call target does not exist or is not a function"); } @@ -452,13 +582,8 @@ static void CharMapPragma (StrBuf* B) if (!GetNumber (B, &Index)) { return; } - if (Index < 1 || Index > 255) { - if (Index == 0) { - /* For groepaz */ - Error ("Remapping 0 is not allowed"); - } else { - Error ("Character index out of range"); - } + if (Index < 0 || Index > 255) { + Error ("Character index out of range"); return; } @@ -471,16 +596,23 @@ static void CharMapPragma (StrBuf* B) if (!GetNumber (B, &C)) { return; } - if (C < 1 || C > 255) { - if (C == 0) { - /* For groepaz */ - Error ("Remapping 0 is not allowed"); - } else { - Error ("Character code out of range"); - } + if (C < 0 || C > 255) { + Error ("Character code out of range"); return; } + /* Warn about remapping character code 0x00 + ** (except when remapping it back to itself). + */ + if (Index + C != 0 && IS_Get (&WarnRemapZero)) { + if (Index == 0) { + Warning ("Remapping from 0 is dangerous with string functions"); + } + else if (C == 0) { + Warning ("Remapping to 0 can make string functions stop unexpectedly"); + } + } + /* Remap the character */ TgtTranslateSet ((unsigned) Index, (unsigned char) C); } @@ -549,7 +681,7 @@ static void WarnPragma (StrBuf* B) static void FlagPragma (StrBuf* B, IntStack* Stack) -/* Handle a pragma that expects a boolean paramater */ +/* Handle a pragma that expects a boolean parameter */ { StrBuf Ident = AUTO_STRBUF_INITIALIZER; long Val; @@ -599,7 +731,7 @@ ExitPoint: static void IntPragma (StrBuf* B, IntStack* Stack, long Low, long High) -/* Handle a pragma that expects an int paramater */ +/* Handle a pragma that expects an int parameter */ { long Val; int Push; @@ -650,6 +782,13 @@ static void IntPragma (StrBuf* B, IntStack* Stack, long Low, long High) +static void MakeMessage (const char* Message) +{ + fprintf (stderr, "%s:%u: Note: %s\n", GetInputName (CurTok.LI), GetInputLine (CurTok.LI), Message); +} + + + static void ParsePragma (void) /* Parse the contents of the _Pragma statement */ { @@ -679,7 +818,7 @@ static void ParsePragma (void) ** for unknown pragmas, but warn about them if enabled (the default). */ if (IS_Get (&WarnUnknownPragma)) { - Warning ("Unknown pragma `%s'", SB_GetConstBuf (&Ident)); + Warning ("Unknown pragma '%s'", SB_GetConstBuf (&Ident)); } goto ExitPoint; } @@ -701,6 +840,10 @@ static void ParsePragma (void) IntPragma (&B, &DataAlignment, 1, 4096); break; + case PRAGMA_ALLOW_EAGER_INLINE: + FlagPragma (&B, &EagerlyInlineFuncs); + break; + case PRAGMA_BSSSEG: Warning ("#pragma bssseg is obsolete, please use #pragma bss-name instead"); /* FALLTHROUGH */ @@ -737,10 +880,18 @@ static void ParsePragma (void) SegNamePragma (&B, SEG_DATA); break; + case PRAGMA_INLINE_STDFUNCS: + FlagPragma (&B, &InlineStdFuncs); + break; + case PRAGMA_LOCAL_STRINGS: FlagPragma (&B, &LocalStrings); break; + case PRAGMA_MESSAGE: + StringPragma (&B, MakeMessage); + break; + case PRAGMA_OPTIMIZE: FlagPragma (&B, &Optimize); break; @@ -777,6 +928,10 @@ static void ParsePragma (void) FlagPragma (&B, &StaticLocals); break; + case PRAGMA_WRAPPED_CALL: + WrappedCallPragma(&B); + break; + case PRAGMA_WARN: WarnPragma (&B); break; diff --git a/src/cc65/pragma.h b/src/cc65/pragma.h index f12dbaa83..d1b94fa23 100644 --- a/src/cc65/pragma.h +++ b/src/cc65/pragma.h @@ -6,10 +6,10 @@ /* */ /* */ /* */ -/* (C) 1998-2002 Ullrich von Bassewitz */ -/* Wacholderweg 14 */ -/* D-70597 Stuttgart */ -/* EMail: uz@cc65.org */ +/* (C) 1998-2002, Ullrich von Bassewitz */ +/* Roemerstrasse 52 */ +/* D-70794 Filderstadt */ +/* EMail: uz@cc65.org */ /* */ /* */ /* This software is provided 'as-is', without any expressed or implied */ diff --git a/src/cc65/preproc.c b/src/cc65/preproc.c index 99ce6acc1..a607e3217 100644 --- a/src/cc65/preproc.c +++ b/src/cc65/preproc.c @@ -71,7 +71,7 @@ unsigned char Preprocessing = 0; /* Management data for #if */ -#define MAX_IFS 64 +#define MAX_IFS 256 #define IFCOND_NONE 0x00U #define IFCOND_SKIP 0x01U #define IFCOND_ELSE 0x02U @@ -304,7 +304,7 @@ static void OldStyleComment (void) } } else { if (CurC == '/' && NextC == '*') { - PPWarning ("`/*' found inside a comment"); + PPWarning ("'/*' found inside a comment"); } NextChar (); } @@ -491,7 +491,7 @@ static void ReadMacroArgs (MacroExp* E) NewStyleComment (); } else if (CurC == '\0') { /* End of input inside macro argument list */ - PPError ("Unterminated argument list invoking macro `%s'", E->M->Name); + PPError ("Unterminated argument list invoking macro '%s'", E->M->Name); ClearLine (); break; @@ -611,7 +611,7 @@ static void MacroArgSubst (MacroExp* E) NextChar (); SkipWhitespace (0); if (!IsSym (Ident) || (ArgIdx = FindMacroArg (E->M, Ident)) < 0) { - PPError ("`#' is not followed by a macro parameter"); + PPError ("'#' is not followed by a macro parameter"); } else { /* Make a valid string from Replacement */ Arg = ME_GetActual (E, ArgIdx); @@ -782,7 +782,7 @@ static void DefineMacro (void) /* Ellipsis */ NextChar (); if (CurC != '.' || NextC != '.') { - PPError ("`...' expected"); + PPError ("'...' expected"); ClearLine (); return; } @@ -803,7 +803,7 @@ static void DefineMacro (void) /* __VA_ARGS__ is only allowed in C89 mode */ if (!C89 && strcmp (Ident, "__VA_ARGS__") == 0) { - PPWarning ("`__VA_ARGS__' can only appear in the expansion " + PPWarning ("'__VA_ARGS__' can only appear in the expansion " "of a C99 variadic macro"); } @@ -823,7 +823,7 @@ static void DefineMacro (void) /* Check for a right paren and eat it if we find one */ if (CurC != ')') { - PPError ("`)' expected"); + PPError ("')' expected"); ClearLine (); return; } @@ -900,7 +900,7 @@ static unsigned Pass1 (StrBuf* Source, StrBuf* Target) if (HaveParen) { SkipWhitespace (0); if (CurC != ')') { - PPError ("`)' expected"); + PPError ("')' expected"); } else { NextChar (); } @@ -1042,8 +1042,6 @@ static void DoError (void) static int DoIf (int Skip) /* Process #if directive */ { - ExprDesc Expr; - /* We're about to abuse the compiler expression parser to evaluate the ** #if expression. Save the current tokens to come back here later. ** NOTE: Yes, this is a hack, but it saves a complete separate expression @@ -1078,7 +1076,7 @@ static int DoIf (int Skip) NextToken (); /* Call the expression parser */ - ConstExpr (hie1, &Expr); + ExprDesc Expr = NoCodeConstExpr (hie1); /* End preprocessing mode */ Preprocessing = 0; @@ -1138,7 +1136,7 @@ static void DoInclude (void) break; default: - PPError ("`\"' or `<' expected"); + PPError ("'\"' or '<' expected"); goto Done; } NextChar (); @@ -1295,7 +1293,7 @@ void Preprocess (void) PPError ("Duplicate #else"); } } else { - PPError ("Unexpected `#else'"); + PPError ("Unexpected '#else'"); } break; @@ -1314,7 +1312,7 @@ void Preprocess (void) /* Remove the clause that needs a terminator */ Skip = (IfStack[IfIndex--] & IFCOND_SKIP) != 0; } else { - PPError ("Unexpected `#endif'"); + PPError ("Unexpected '#endif'"); } break; @@ -1387,7 +1385,7 @@ void Preprocess (void) } if (NextLine () == 0) { if (IfIndex >= 0) { - PPError ("`#endif' expected"); + PPError ("'#endif' expected"); } return; } @@ -1398,7 +1396,7 @@ void Preprocess (void) Done: if (Verbosity > 1 && SB_NotEmpty (Line)) { - printf ("%s(%u): %.*s\n", GetCurrentFile (), GetCurrentLine (), + printf ("%s:%u: %.*s\n", GetCurrentFile (), GetCurrentLine (), (int) SB_GetLen (Line), SB_GetConstBuf (Line)); } } diff --git a/src/cc65/preproc.h b/src/cc65/preproc.h index 8d7b3c374..78a91a590 100644 --- a/src/cc65/preproc.h +++ b/src/cc65/preproc.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2004 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -44,7 +44,7 @@ -/* Set when the preprocessor calls ConstExpr() recursively */ +/* Set when the preprocessor calls NoCodeConstExpr() recursively */ extern unsigned char Preprocessing; diff --git a/src/cc65/reginfo.c b/src/cc65/reginfo.c index 383c6ec24..601f0f688 100644 --- a/src/cc65/reginfo.c +++ b/src/cc65/reginfo.c @@ -74,6 +74,15 @@ void RC_InvalidateZP (RegContents* C) +void RC_InvalidatePS (RegContents* C) +/* Invalidate processor status */ +{ + C->PFlags = UNKNOWN_PFVAL_ALL; + C->ZNRegs = ZNREG_NONE; +} + + + static void RC_Dump1 (FILE* F, const char* Desc, short Val) /* Dump one register value */ { @@ -102,6 +111,44 @@ void RC_Dump (FILE* F, const RegContents* RC) +#if !defined(HAVE_INLINE) +int PStatesAreKnown (unsigned short PFlags, unsigned WhatStates) +/* Return true if all queried processor states are known. +** Note: WhatStates takes PSTATE_* rather than PFVAL_*. +*/ +{ + return ((PFlags << (PSTATE_BITS_SHIFT - 8)) & WhatStates & PSTATE_BITS_MASK) == 0; +} +#endif + + + +#if !defined(HAVE_INLINE) +int PStatesAreSet (unsigned short PFlags, unsigned WhatStates) +/* Return true if all queried processor states are known to be set. +** Note: WhatStates takes PSTATE_* rather than PFVAL_*. +*/ +{ + return (PFlags & (WhatStates >> (PSTATE_BITS_SHIFT - 8))) == 0 && + (PFlags & (WhatStates >> PSTATE_BITS_SHIFT)) == WhatStates >> PSTATE_BITS_SHIFT; +} +#endif + + + +#if !defined(HAVE_INLINE) +int PStatesAreClear (unsigned short PFlags, unsigned WhatStates) +/* Return true if all queried processor states are known to be cleared. +** Note: WhatStates takes PSTATE_* rather than PFVAL_*. +*/ +{ + return (PFlags & (WhatStates >> (PSTATE_BITS_SHIFT - 8))) == 0 && + (PFlags & (WhatStates >> PSTATE_BITS_SHIFT)) == 0; +} +#endif + + + RegInfo* NewRegInfo (const RegContents* RC) /* Allocate a new register info, initialize and return it. If RC is not ** a NULL pointer, it is used to initialize both, the input and output @@ -120,6 +167,9 @@ RegInfo* NewRegInfo (const RegContents* RC) RC_Invalidate (&RI->In); RC_Invalidate (&RI->Out); RC_Invalidate (&RI->Out2); + RC_InvalidatePS (&RI->In); + RC_InvalidatePS (&RI->Out); + RC_InvalidatePS (&RI->Out2); } /* Return the new struct */ diff --git a/src/cc65/reginfo.h b/src/cc65/reginfo.h index 7354c301f..2066ab505 100644 --- a/src/cc65/reginfo.h +++ b/src/cc65/reginfo.h @@ -54,6 +54,69 @@ /* Encoding for an unknown register value */ #define UNKNOWN_REGVAL -1 +/* Encoding for an unknown processor status: +** For Bit N in the flags, ((flags >> N) & 0x0101) == 0x0101 means 'unknown' +*/ +#define UNKNOWN_PFVAL_C 0x0101U /* Carray */ +#define UNKNOWN_PFVAL_Z 0x0202U /* Zero */ +#define UNKNOWN_PFVAL_I 0x0404U /* Interrupt */ +#define UNKNOWN_PFVAL_D 0x0808U /* Decimal */ +#define UNKNOWN_PFVAL_U 0x1010U /* Unused */ +#define UNKNOWN_PFVAL_B 0x2020U /* Break */ +#define UNKNOWN_PFVAL_V 0x4040U /* Overflow */ +#define UNKNOWN_PFVAL_N 0x8080U /* Negative */ +#define UNKNOWN_PFVAL_CZ (UNKNOWN_PFVAL_C | UNKNOWN_PFVAL_Z) +#define UNKNOWN_PFVAL_CZN (UNKNOWN_PFVAL_N | UNKNOWN_PFVAL_CZ) +#define UNKNOWN_PFVAL_CZVN (UNKNOWN_PFVAL_V | UNKNOWN_PFVAL_CZN) +#define UNKNOWN_PFVAL_ZN (UNKNOWN_PFVAL_Z | UNKNOWN_PFVAL_N) +#define UNKNOWN_PFVAL_ZVN (UNKNOWN_PFVAL_V | UNKNOWN_PFVAL_ZN) +#define UNKNOWN_PFVAL_6502 0xE7E7U +#define UNKNOWN_PFVAL_ALL 0xFFFFU + +/* Encoding for a known processor status */ +#define PFVAL_C 0x0001U /* Carray set */ +#define PFVAL_Z 0x0002U /* Zero set */ +#define PFVAL_I 0x0004U /* Interrupt set */ +#define PFVAL_D 0x0008U /* Decimal set */ +#define PFVAL_U 0x0010U /* Unused set */ +#define PFVAL_B 0x0020U /* Break set */ +#define PFVAL_V 0x0040U /* Overflow set */ +#define PFVAL_N 0x0080U /* Negative set */ +#define PFVAL_CZ (PFVAL_C | PFVAL_Z) +#define PFVAL_CZN (PFVAL_N | PFVAL_CZ) +#define PFVAL_CZVN (PFVAL_V | PFVAL_CZN) +#define PFVAL_ZN (PFVAL_Z | PFVAL_N) +#define PFVAL_ZVN (PFVAL_V | PFVAL_ZN) +#define PFVAL_6502 0x00E7U +#define PFVAL_ALL 0x00FFU + +/* Used for functions to convert the processor states to processor flags */ +#define PSTATE_BITS_SHIFT 24 +#define PSTATE_BITS_MASK (0xFFU << PSTATE_BITS_SHIFT) + +/* Encoding for unknown Z/N status origin */ +#define UNKNOWN_ZNREG 0x0000U + +/* Encoding for known register Z/N status origins */ +#define ZNREG_NONE 0x0000U /* None */ +#define ZNREG_A REG_A +#define ZNREG_X REG_X +#define ZNREG_Y REG_Y +#define ZNREG_TMP1 REG_TMP1 +#define ZNREG_PTR1_LO REG_PTR1_LO +#define ZNREG_PTR1_HI REG_PTR1_HI +#define ZNREG_PTR2_LO REG_PTR2_LO +#define ZNREG_PTR2_HI REG_PTR2_HI +#define ZNREG_SREG_LO REG_SREG_LO +#define ZNREG_SREG_HI REG_SREG_HI +#define ZNREG_SAVE_LO REG_SAVE_LO +#define ZNREG_SAVE_HI REG_SAVE_HI +#define ZNREG_AX (REG_A | REG_X) +#define ZNREG_AY (REG_A | REG_Y) +#define ZNREG_AXY (REG_A | REG_X | REG_Y) + + + /* Register contents */ typedef struct RegContents RegContents; struct RegContents { @@ -65,6 +128,8 @@ struct RegContents { short Ptr1Lo; short Ptr1Hi; short Tmp1; + unsigned short PFlags; /* Processor flags */ + unsigned short ZNRegs; /* Which register(s) the Z/N flags reflect */ }; /* Register change info */ @@ -89,6 +154,9 @@ void RC_Invalidate (RegContents* C); void RC_InvalidateZP (RegContents* C); /* Invalidate all ZP registers */ +void RC_InvalidatePS (RegContents* C); +/* Invalidate processor status */ + void RC_Dump (FILE* F, const RegContents* RC); /* Dump the contents of the given RegContents struct */ @@ -112,6 +180,56 @@ INLINE int RegValIsUnknown (short Val) # define RegValIsUnknown(S) ((S) < 0) #endif +#if defined(HAVE_INLINE) +INLINE int PStatesAreKnown (unsigned short PFlags, unsigned WhatStates) +/* Return true if all queried processor states are known. +** Note: WhatStates takes PSTATE_* rather than PFVAL_*. +*/ +{ + return ((PFlags << (PSTATE_BITS_SHIFT - 8)) & WhatStates & PSTATE_BITS_MASK) == 0; +} +#else +int PStatesAreKnown (unsigned short PFlags, unsigned WhatStates); +#endif + +#if defined(HAVE_INLINE) +INLINE int PStatesAreUnknown (unsigned short PFlags, unsigned WhatStates) +/* Return true if any queried processor states are unknown. +** Note: WhatStates takes PSTATE_* rather than PFVAL_*. +*/ +{ + return !PStatesAreKnown (PFlags, WhatStates); +} +#else +# define PStatesAreUnknown(V, B) (!PStatesAreKnown (V, B)) +#endif + +#if defined(HAVE_INLINE) +INLINE int PStatesAreSet (unsigned short PFlags, unsigned WhatStates) +/* Return true if all queried processor states are known to be set. +** Note: WhatStates takes PSTATE_* rather than PFVAL_*. +*/ +{ + return (PFlags & (WhatStates >> (PSTATE_BITS_SHIFT - 8))) == 0 && + (PFlags & (WhatStates >> PSTATE_BITS_SHIFT)) == WhatStates >> PSTATE_BITS_SHIFT; +} +#else +int PStatesAreSet (unsigned short PFlags, unsigned WhatStates); +#endif + +#if defined(HAVE_INLINE) +INLINE int PStatesAreClear (unsigned short PFlags, unsigned WhatStates) +/* Return true if the queried processor states are known to be cleared. +** Note: WhatStates takes PSTATE_* rather than PFVAL_*. +*/ +{ + return (PFlags & (WhatStates >> (PSTATE_BITS_SHIFT - 8))) == 0 && + (PFlags & (WhatStates >> PSTATE_BITS_SHIFT)) == 0; +} +#else +int PStatesAreClear (unsigned short PFlags, unsigned WhatStates); +#endif + RegInfo* NewRegInfo (const RegContents* RC); /* Allocate a new register info, initialize and return it. If RC is not ** a NULL pointer, it is used to initialize both, the input and output diff --git a/src/cc65/scanner.c b/src/cc65/scanner.c index 16d43e2ea..70203d027 100644 --- a/src/cc65/scanner.c +++ b/src/cc65/scanner.c @@ -86,6 +86,7 @@ static const struct Keyword { unsigned char Std; /* Token supported in which standards? */ } Keywords [] = { { "_Pragma", TOK_PRAGMA, TT_C89 | TT_C99 | TT_CC65 }, /* !! */ + { "_Static_assert", TOK_STATIC_ASSERT, TT_CC65 }, /* C11 */ { "__AX__", TOK_AX, TT_C89 | TT_C99 | TT_CC65 }, { "__A__", TOK_A, TT_C89 | TT_C99 | TT_CC65 }, { "__EAX__", TOK_EAX, TT_C89 | TT_C99 | TT_CC65 }, @@ -267,6 +268,7 @@ static int ParseChar (void) { int C; int HadError; + int Count; /* Check for escape chars */ if (CurC == '\\') { @@ -336,31 +338,18 @@ static int ParseChar (void) case '6': case '7': /* Octal constant */ - HadError = 0; + Count = 1; C = HexVal (CurC); - while (IsODigit (NextC)) { - if ((C << 3) >= 256) { - if (!HadError) { - Error ("Octal character constant out of range"); - HadError = 1; - } - } else { - C = (C << 3) | HexVal (NextC); - } + while (IsODigit (NextC) && Count++ < 3) { + C = (C << 3) | HexVal (NextC); NextChar (); } + if (C >= 256) + Error ("Octal character constant out of range"); break; default: - Error ("Illegal character constant"); - C = ' '; - /* Try to do error recovery, otherwise the compiler will spit - ** out thousands of errors in this place and abort. - */ - if (CurC != '\'' && CurC != '\0') { - while (NextC != '\'' && NextC != '\"' && NextC != '\0') { - NextChar (); - } - } + C = CurC; + Error ("Illegal escaped character: 0x%02X", CurC); break; } } else { @@ -389,7 +378,7 @@ static void CharConst (void) /* Check for closing quote */ if (CurC != '\'') { - Error ("`\'' expected"); + Error ("'\'' expected"); } else { /* Skip the quote */ NextChar (); @@ -476,8 +465,8 @@ static void NumericConst (void) unsigned DigitVal; unsigned long IVal; /* Value */ - /* Check for a leading hex or octal prefix and determine the possible - ** integer types. + /* Check for a leading hex, octal or binary prefix and determine the + ** possible integer types. */ if (CurC == '0') { /* Gobble 0 and examine next char */ @@ -485,6 +474,9 @@ static void NumericConst (void) if (toupper (CurC) == 'X') { Base = Prefix = 16; NextChar (); /* gobble "x" */ + } else if (toupper (CurC) == 'B' && IS_Get (&Standard) >= STD_CC65) { + Base = Prefix = 2; + NextChar (); /* gobble 'b' */ } else { Base = 10; /* Assume 10 for now - see below */ Prefix = 8; /* Actual prefix says octal */ @@ -539,10 +531,12 @@ static void NumericConst (void) if (!IsFloat) { unsigned Types; - int HaveSuffix; + unsigned WarnTypes = 0; - /* Check for a suffix and determine the possible types */ - HaveSuffix = 1; + /* Check for a suffix and determine the possible types. It is always + ** possible to convert the data to unsigned long even if the IT_ULONG + ** flag were not set, but we are not doing that. + */ if (toupper (CurC) == 'U') { /* Unsigned type */ NextChar (); @@ -557,17 +551,18 @@ static void NumericConst (void) NextChar (); if (toupper (CurC) != 'U') { Types = IT_LONG | IT_ULONG; + WarnTypes = IT_ULONG; } else { NextChar (); Types = IT_ULONG; } } else { - HaveSuffix = 0; if (Prefix == 10) { /* Decimal constants are of any type but uint */ Types = IT_INT | IT_LONG | IT_ULONG; + WarnTypes = IT_LONG | IT_ULONG; } else { - /* Octal or hex constants are of any type */ + /* Binary, octal and hex constants can be of any type */ Types = IT_INT | IT_UINT | IT_LONG | IT_ULONG; } } @@ -577,11 +572,14 @@ static void NumericConst (void) /* Out of range for int */ Types &= ~IT_INT; /* If the value is in the range 0x8000..0xFFFF, unsigned int is not - ** allowed, and we don't have a type specifying suffix, emit a - ** warning, because the constant is of type long. + ** allowed, and we don't have a long type specifying suffix, emit a + ** warning, because the constant is of type long while the user + ** might expect an unsigned int. */ - if (IVal <= 0xFFFF && (Types & IT_UINT) == 0 && !HaveSuffix) { - Warning ("Constant is long"); + if (IVal <= 0xFFFF && + (Types & IT_UINT) == 0 && + (WarnTypes & IT_LONG) != 0) { + Warning ("Integer constant is long"); } } if (IVal > 0xFFFF) { @@ -591,6 +589,15 @@ static void NumericConst (void) if (IVal > 0x7FFFFFFF) { /* Out of range for long int */ Types &= ~IT_LONG; + /* If the value is in the range 0x80000000..0xFFFFFFFF, decimal, + ** and we have no unsigned type specifying suffix, emit a warning, + ** because the constant is of type unsigned long while the user + ** might expect a signed integer constant, especially if there is + ** a preceding unary op or when it is used in constant calculation. + */ + if (WarnTypes & IT_ULONG) { + Warning ("Integer constant is unsigned long"); + } } /* Now set the type string to the smallest type in types */ @@ -1056,7 +1063,7 @@ int Consume (token_t Token, const char* ErrorMsg) int ConsumeColon (void) /* Check for a colon and skip it. */ { - return Consume (TOK_COLON, "`:' expected"); + return Consume (TOK_COLON, "':' expected"); } @@ -1069,7 +1076,7 @@ int ConsumeSemi (void) NextToken (); return 1; } else { - Error ("`;' expected"); + Error ("';' expected"); if (CurTok.Tok == TOK_COLON || CurTok.Tok == TOK_COMMA) { NextToken (); } @@ -1087,7 +1094,7 @@ int ConsumeComma (void) NextToken (); return 1; } else { - Error ("`,' expected"); + Error ("',' expected"); if (CurTok.Tok == TOK_SEMI) { NextToken (); } @@ -1100,7 +1107,7 @@ int ConsumeComma (void) int ConsumeLParen (void) /* Check for a left parenthesis and skip it */ { - return Consume (TOK_LPAREN, "`(' expected"); + return Consume (TOK_LPAREN, "'(' expected"); } @@ -1108,7 +1115,7 @@ int ConsumeLParen (void) int ConsumeRParen (void) /* Check for a right parenthesis and skip it */ { - return Consume (TOK_RPAREN, "`)' expected"); + return Consume (TOK_RPAREN, "')' expected"); } @@ -1116,7 +1123,7 @@ int ConsumeRParen (void) int ConsumeLBrack (void) /* Check for a left bracket and skip it */ { - return Consume (TOK_LBRACK, "`[' expected"); + return Consume (TOK_LBRACK, "'[' expected"); } @@ -1124,7 +1131,7 @@ int ConsumeLBrack (void) int ConsumeRBrack (void) /* Check for a right bracket and skip it */ { - return Consume (TOK_RBRACK, "`]' expected"); + return Consume (TOK_RBRACK, "']' expected"); } @@ -1132,7 +1139,7 @@ int ConsumeRBrack (void) int ConsumeLCurly (void) /* Check for a left curly brace and skip it */ { - return Consume (TOK_LCURLY, "`{' expected"); + return Consume (TOK_LCURLY, "'{' expected"); } @@ -1140,5 +1147,5 @@ int ConsumeLCurly (void) int ConsumeRCurly (void) /* Check for a right curly brace and skip it */ { - return Consume (TOK_RCURLY, "`}' expected"); + return Consume (TOK_RCURLY, "'}' expected"); } diff --git a/src/cc65/scanner.h b/src/cc65/scanner.h index 1242d78fd..e6a362bf3 100644 --- a/src/cc65/scanner.h +++ b/src/cc65/scanner.h @@ -173,6 +173,7 @@ typedef enum token_t { TOK_WCSCONST, TOK_ATTRIBUTE, + TOK_STATIC_ASSERT, TOK_FAR, TOK_NEAR, TOK_A, @@ -204,7 +205,7 @@ struct Token { struct Literal* SVal; /* String literal is any */ ident Ident; /* Identifier if IDENT */ LineInfo* LI; /* Source line where the token comes from */ - Type* Type; /* Type if integer or float constant */ + const Type* Type; /* Type if integer or float constant */ }; extern Token CurTok; /* The current token */ diff --git a/src/cc65/scanstrbuf.c b/src/cc65/scanstrbuf.c index 91abc8cb3..2e3be8854 100644 --- a/src/cc65/scanstrbuf.c +++ b/src/cc65/scanstrbuf.c @@ -185,7 +185,7 @@ int SB_GetSym (StrBuf* B, StrBuf* Ident, const char* SpecialChars) SB_AppendChar (Ident, C); SB_Skip (B); C = SB_Peek (B); - } while (IsIdent (C) || IsDigit (C) || + } while (IsIdent (C) || IsDigit (C) || (C != '\0' && strchr (SpecialChars, C) != 0)); SB_Terminate (Ident); return 1; @@ -271,7 +271,7 @@ int SB_GetNumber (StrBuf* B, long* Val) SB_Skip (B); *Val = SignExtendChar (TgtTranslateChar (ParseChar (B))); if (SB_Peek (B) != '\'') { - Error ("`\'' expected"); + Error ("'\'' expected"); return 0; } else { /* Skip the quote */ diff --git a/src/cc65/segments.c b/src/cc65/segments.c index 5e493e8f5..8283b9da5 100644 --- a/src/cc65/segments.c +++ b/src/cc65/segments.c @@ -37,6 +37,7 @@ #include <string.h> /* common */ +#include "addrsize.h" #include "chartype.h" #include "check.h" #include "coll.h" @@ -61,6 +62,13 @@ +/* Table struct for address sizes of segments */ +typedef struct { + StrBuf Name; + unsigned char AddrSize; +} SegAddrSize_t; + + /* Pointer to the current segment list. Output goes here. */ Segments* CS = 0; @@ -70,6 +78,9 @@ Segments* GS = 0; /* Actual names for the segments */ static StrStack SegmentNames[SEG_COUNT]; +/* Address size for the segments */ +static Collection SegmentAddrSizes; + /* We're using a collection for the stack instead of a linked list. Since ** functions may not be nested (at least in the current implementation), the ** maximum stack depth is 2, so there is not really a need for a better @@ -85,6 +96,85 @@ static Collection SegmentStack = STATIC_COLLECTION_INITIALIZER; +void InitSegAddrSizes (void) +/* Initialize the segment address sizes */ +{ + InitCollection (&SegmentAddrSizes); +} + + + +void DoneSegAddrSizes (void) +/* Free the segment address sizes */ +{ + SegAddrSize_t* A; + int I; + for (I = 0; I < (int)CollCount (&SegmentAddrSizes); ++I) { + A = CollAtUnchecked (&SegmentAddrSizes, I); + SB_Done (&A->Name); + xfree (A); + } + DoneCollection (&SegmentAddrSizes); +} + + + +static SegAddrSize_t* FindSegAddrSize (const char* Name) +/* Find already specified address size for a segment by name. +** Return the found struct or 0 if not found. +*/ +{ + SegAddrSize_t* A; + int I; + for (I = 0; I < (int)CollCount (&SegmentAddrSizes); ++I) { + A = CollAtUnchecked (&SegmentAddrSizes, I); + if (A && strcmp (SB_GetConstBuf (&A->Name), Name) == 0) { + return A; + } + } + return 0; +} + + + +void SetSegAddrSize (const char* Name, unsigned char AddrSize) +/* Set the address size for a segment */ +{ + SegAddrSize_t* A = FindSegAddrSize (Name); + if (!A) { + /* New one */ + A = xmalloc (sizeof (SegAddrSize_t)); + SB_Init (&A->Name); + SB_CopyStr (&A->Name, Name); + SB_Terminate (&A->Name); + CollAppend (&SegmentAddrSizes, A); + } else { + /* Check for mismatching address sizes */ + if (A->AddrSize != AddrSize) { + Warning ("Segment address size changed from last time!"); + } + } + + /* Set the address size anyway */ + A->AddrSize = AddrSize; +} + + + +unsigned char GetSegAddrSize (const char* Name) +/* Get the address size of the given segment. +** Return ADDR_SIZE_INVALID if not found. +*/ +{ + SegAddrSize_t* A = FindSegAddrSize (Name); + if (A) { + return A->AddrSize; + } + return ADDR_SIZE_INVALID; +} + + + void InitSegNames (void) /* Initialize the segment names */ { @@ -143,12 +233,14 @@ static Segments* NewSegments (SymEntry* Func) Segments* S = xmalloc (sizeof (Segments)); /* Initialize the fields */ - S->Text = NewTextSeg (Func); - S->Code = NewCodeSeg (GetSegName (SEG_CODE), Func); - S->Data = NewDataSeg (GetSegName (SEG_DATA), Func); - S->ROData = NewDataSeg (GetSegName (SEG_RODATA), Func); - S->BSS = NewDataSeg (GetSegName (SEG_BSS), Func); - S->CurDSeg = SEG_DATA; + S->Text = NewTextSeg (Func); + S->Code = NewCodeSeg (GetSegName (SEG_CODE), Func); + S->Data = NewDataSeg (GetSegName (SEG_DATA), Func); + S->ROData = NewDataSeg (GetSegName (SEG_RODATA), Func); + S->BSS = NewDataSeg (GetSegName (SEG_BSS), Func); + S->CurDSeg = SEG_DATA; + S->NextLabel = 0; + S->NextDataLabel = 0; /* Return the new struct */ return S; @@ -289,14 +381,14 @@ void OutputSegments (const Segments* S) /* Output the text segment */ TS_Output (S->Text); + /* Output the code segment */ + CS_Output (S->Code); + /* Output the three data segments */ DS_Output (S->Data); DS_Output (S->ROData); DS_Output (S->BSS); - /* Output the code segment */ - CS_Output (S->Code); - /* Output the code segment epiloque */ CS_OutputEpilogue (S->Code); } diff --git a/src/cc65/segments.h b/src/cc65/segments.h index f55be688b..91d702df6 100644 --- a/src/cc65/segments.h +++ b/src/cc65/segments.h @@ -86,6 +86,8 @@ struct Segments { struct DataSeg* ROData; /* Readonly data segment */ struct DataSeg* BSS; /* Segment for uninitialized data */ segment_t CurDSeg; /* Current data segment */ + unsigned NextLabel; /* Number to generate unique code labels */ + unsigned NextDataLabel; /* Number to generate unique data labels */ }; /* Pointer to the current segment list. Output goes here. */ @@ -101,6 +103,19 @@ extern Segments* GS; /*****************************************************************************/ +void InitSegAddrSizes (void); +/* Initialize the segment address sizes */ + +void DoneSegAddrSizes (void); +/* Free the segment address sizes */ + +void SetSegAddrSize (const char* Name, unsigned char AddrSize); +/* Set the address size for a segment */ + +unsigned char GetSegAddrSize (const char* Name); +/* Get the address size of the given segment. +** Return ADDR_SIZE_INVALID if not found. +*/ void InitSegNames (void); /* Initialize the segment names */ diff --git a/src/cc65/shiftexpr.c b/src/cc65/shiftexpr.c index c61514f43..eb879a475 100644 --- a/src/cc65/shiftexpr.c +++ b/src/cc65/shiftexpr.c @@ -61,15 +61,14 @@ void ShiftExpr (struct ExprDesc* Expr) /* Parse the << and >> operators. */ { - ExprDesc Expr2; CodeMark Mark1; CodeMark Mark2; token_t Tok; /* The operator token */ - Type* EffType; /* Effective lhs type */ - Type* ResultType; /* Type of the result */ + const Type* ResultType; /* Type of the result */ unsigned ExprBits; /* Bits of the lhs operand */ unsigned GenFlags; /* Generator flags */ unsigned ltype; + int lconst; /* Operand is a constant */ int rconst; /* Operand is a constant */ @@ -78,6 +77,10 @@ void ShiftExpr (struct ExprDesc* Expr) while (CurTok.Tok == TOK_SHL || CurTok.Tok == TOK_SHR) { + ExprDesc Expr2; + ED_Init (&Expr2); + Expr2.Flags |= Expr->Flags & E_MASK_KEEP_SUBEXPR; + /* All operators that call this function expect an int on the lhs */ if (!IsClassInt (Expr->Type)) { Error ("Integer expression expected"); @@ -89,7 +92,7 @@ void ShiftExpr (struct ExprDesc* Expr) NextToken (); /* Get the type of the result */ - ResultType = EffType = IntPromotion (Expr->Type); + ResultType = IntPromotion (Expr->Type); /* Prepare the code generator flags */ GenFlags = TypeOf (ResultType); @@ -100,7 +103,8 @@ void ShiftExpr (struct ExprDesc* Expr) /* Get the lhs on stack */ GetCodePos (&Mark1); ltype = TypeOf (Expr->Type); - if (ED_IsConstAbs (Expr)) { + lconst = ED_IsConstAbs (Expr); + if (lconst) { /* Constant value */ GetCodePos (&Mark2); g_push (ltype | CF_CONST, Expr->IVal); @@ -112,7 +116,7 @@ void ShiftExpr (struct ExprDesc* Expr) } /* Get the right hand side */ - ExprWithCheck (hie8, &Expr2); + MarkedExprWithCheck (hie8, &Expr2); /* Check the type of the rhs */ if (!IsClassInt (Expr2.Type)) { @@ -121,7 +125,7 @@ void ShiftExpr (struct ExprDesc* Expr) } /* Check for a constant right side expression */ - rconst = ED_IsConstAbs (&Expr2); + rconst = ED_IsConstAbs (&Expr2) && ED_CodeRangeIsEmpty (&Expr2); if (!rconst) { /* Not constant, load into the primary */ @@ -139,54 +143,59 @@ void ShiftExpr (struct ExprDesc* Expr) ** the operand, the behaviour is undefined according to the ** standard. */ - if (Expr2.IVal < 0 || Expr2.IVal >= (long) ExprBits) { + if (Expr2.IVal < 0) { - Warning ("Shift count too large for operand type"); + Warning ("Shift count '%ld' is negative", Expr2.IVal); + Expr2.IVal &= ExprBits - 1; + + } else if (Expr2.IVal >= (long) ExprBits) { + + Warning ("Shift count '%ld' >= width of type", Expr2.IVal); Expr2.IVal &= ExprBits - 1; } - /* If the shift count is zero, nothing happens */ - if (Expr2.IVal == 0) { + /* If the shift count is zero, nothing happens. If the left hand + ** side is a constant, the result is constant. + */ + if (Expr2.IVal == 0 || lconst) { - /* Result is already in Expr, remove the generated code */ - RemoveCode (&Mark1); + /* Set the type */ + Expr->Type = ResultType; - /* Done */ - goto Next; - } + if (lconst) { - /* If the left hand side is a constant, the result is constant */ - if (ED_IsConstAbs (Expr)) { + /* Evaluate the result */ + switch (Tok) { + case TOK_SHL: Expr->IVal <<= Expr2.IVal; break; + case TOK_SHR: Expr->IVal >>= Expr2.IVal; break; + default: /* Shutup gcc */ break; + } - /* Evaluate the result */ - switch (Tok) { - case TOK_SHL: Expr->IVal <<= Expr2.IVal; break; - case TOK_SHR: Expr->IVal >>= Expr2.IVal; break; - default: /* Shutup gcc */ break; + /* Limit the calculated value to the range of its type */ + LimitExprValue (Expr); } - /* Both operands are constant, remove the generated code */ + /* Result is already got, remove the generated code */ RemoveCode (&Mark1); /* Done */ - goto Next; + continue; } - /* If we're shifting an integer or unsigned to the right, the - ** lhs has a const address, and the shift count is larger than 8, + /* If we're shifting an integer or unsigned to the right, the lhs + ** has a quasi-const address, and the shift count is larger than 8, ** we can load just the high byte as a char with the correct ** signedness, and reduce the shift count by 8. If the remaining ** shift count is zero, we're done. */ if (Tok == TOK_SHR && - IsTypeInt (Expr->Type) && + IsClassInt (Expr->Type) && + SizeOf (Expr->Type) == SIZEOF_INT && ED_IsLVal (Expr) && - (ED_IsLocConst (Expr) || ED_IsLocStack (Expr)) && + ED_IsLocQuasiConst (Expr) && Expr2.IVal >= 8) { - Type* OldType; - /* Increase the address by one and decrease the shift count */ ++Expr->IVal; Expr2.IVal -= 8; @@ -194,7 +203,6 @@ void ShiftExpr (struct ExprDesc* Expr) /* Replace the type of the expression temporarily by the ** corresponding char type. */ - OldType = Expr->Type; if (IsSignUnsigned (Expr->Type)) { Expr->Type = type_uchar; } else { @@ -207,9 +215,6 @@ void ShiftExpr (struct ExprDesc* Expr) /* Generate again code for the load, this time with the new type */ LoadExpr (CF_NONE, Expr); - /* Reset the type */ - Expr->Type = OldType; - /* If the shift count is now zero, we're done */ if (Expr2.IVal == 0) { /* Be sure to mark the value as in the primary */ @@ -227,11 +232,13 @@ void ShiftExpr (struct ExprDesc* Expr) } MakeRVal: - /* We have a rvalue in the primary now */ - ED_MakeRValExpr (Expr); + /* We have an rvalue in the primary now */ + ED_FinalizeRValLoad (Expr); -Next: /* Set the type of the result */ Expr->Type = ResultType; + + /* Propagate from subexpressions */ + Expr->Flags |= Expr2.Flags & E_MASK_VIRAL; } } diff --git a/src/cc65/shiftexpr.h b/src/cc65/shiftexpr.h index 2a000fd58..1f1a8c283 100644 --- a/src/cc65/shiftexpr.h +++ b/src/cc65/shiftexpr.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2004 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/cc65/stackptr.c b/src/cc65/stackptr.c index 1f10e8500..1381d68b4 100644 --- a/src/cc65/stackptr.c +++ b/src/cc65/stackptr.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2004-2006 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/cc65/stackptr.h b/src/cc65/stackptr.h index 4f90f8dcc..4e5ea732e 100644 --- a/src/cc65/stackptr.h +++ b/src/cc65/stackptr.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2004-2006 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/cc65/standard.c b/src/cc65/standard.c index 36897a059..f26b63c20 100644 --- a/src/cc65/standard.c +++ b/src/cc65/standard.c @@ -50,7 +50,7 @@ IntStack Standard = INTSTACK(STD_UNKNOWN); /* Table mapping names to standards, sorted by standard. */ -static const char* StdNames[STD_COUNT] = { +static const char* const StdNames[STD_COUNT] = { "c89", "c99", "cc65" }; diff --git a/src/cc65/staticassert.c b/src/cc65/staticassert.c new file mode 100644 index 000000000..1bf8dd4c5 --- /dev/null +++ b/src/cc65/staticassert.c @@ -0,0 +1,105 @@ +/*****************************************************************************/ +/* */ +/* staticassert.h */ +/* */ +/* _Static_assert handling for the cc65 C compiler */ +/* */ +/* */ +/* */ +/* Copyright 2020 The cc65 Authors */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +/* cc65 */ +#include "error.h" +#include "expr.h" +#include "litpool.h" +#include "scanner.h" +#include "staticassert.h" + + + +/*****************************************************************************/ +/* _Static_assert handling functions */ +/*****************************************************************************/ + + + +void ParseStaticAssert () +{ + /* + ** static_assert-declaration ::= + ** _Static_assert ( constant-expression ) ; + ** _Static_assert ( constant-expression , string-literal ) ; + */ + ExprDesc Expr; + int failed; + + /* Skip the _Static_assert token itself */ + CHECK (CurTok.Tok == TOK_STATIC_ASSERT); + NextToken (); + + /* We expect an opening paren */ + if (!ConsumeLParen ()) { + return; + } + + /* Parse assertion condition */ + Expr = NoCodeConstAbsIntExpr (hie1); + failed = !Expr.IVal; + + /* If there is a comma, we also have an error message. The message is optional because we + ** support the C2X syntax with only an expression. + */ + if (CurTok.Tok == TOK_COMMA) { + /* Skip the comma. */ + NextToken (); + + /* String literal */ + if (CurTok.Tok != TOK_SCONST) { + Error ("String literal expected for static_assert message"); + return; + } + + /* Issue an error including the message if the static_assert failed. */ + if (failed) { + Error ("static_assert failed '%s'", GetLiteralStr (CurTok.SVal)); + } + + /* Consume the string constant, now that we don't need it anymore. + ** This should never fail since we checked the token type above. + */ + if (!Consume (TOK_SCONST, "String literal expected")) { + return; + } + } else { + /* No message. */ + if (failed) { + Error ("static_assert failed"); + } + } + + /* Closing paren and semi-colon needed */ + ConsumeRParen (); + ConsumeSemi (); +} diff --git a/src/cc65/staticassert.h b/src/cc65/staticassert.h new file mode 100644 index 000000000..cf6314424 --- /dev/null +++ b/src/cc65/staticassert.h @@ -0,0 +1,51 @@ +/*****************************************************************************/ +/* */ +/* staticassert.h */ +/* */ +/* _Static_assert handling for the cc65 C compiler */ +/* */ +/* */ +/* */ +/* Copyright 2020 The cc65 Authors */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef STATICASSERT_H +#define STATICASSERT_H + + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +void ParseStaticAssert (void); +/* Handle _Static_assert. These are a C11 feature. */ + + + +/* End of staticassert.h */ + +#endif diff --git a/src/cc65/stdfunc.c b/src/cc65/stdfunc.c index 182cad1ef..5ed5ce671 100644 --- a/src/cc65/stdfunc.c +++ b/src/cc65/stdfunc.c @@ -141,7 +141,7 @@ static long ArrayElementCount (const ArgDesc* Arg) -static void ParseArg (ArgDesc* Arg, Type* Type) +static void ParseArg (ArgDesc* Arg, const Type* Type, ExprDesc* Expr) /* Parse one argument but do not push it onto the stack. Make all fields in ** Arg valid. */ @@ -152,6 +152,10 @@ static void ParseArg (ArgDesc* Arg, Type* Type) /* Remember the required argument type */ Arg->ArgType = Type; + /* Init expression */ + ED_Init (&Arg->Expr); + Arg->Expr.Flags |= Expr->Flags & E_MASK_KEEP_SUBEXPR; + /* Read the expression we're going to pass to the function */ MarkedExprWithCheck (hie1, &Arg->Expr); @@ -181,6 +185,22 @@ static void ParseArg (ArgDesc* Arg, Type* Type) /* Use the type of the argument for the push */ Arg->Flags |= TypeOf (Arg->Expr.Type); + + /* Propagate from subexpressions */ + Expr->Flags |= Arg->Expr.Flags & E_MASK_VIRAL; +} + + + +void AddCmpCodeIfSizeNot256 (const char* Code, long Size) +/* Add a line of Assembly code that compares an index register +** only if it isn't comparing to #<256. (If the next line +** is "bne", then this will avoid a redundant line.) +*/ +{ + if (Size != 256) { + AddCodeLine (Code, (unsigned int)Size); + } } @@ -195,9 +215,9 @@ static void StdFunc_memcpy (FuncDesc* F attribute ((unused)), ExprDesc* Expr) /* Handle the memcpy function */ { /* Argument types: (void*, const void*, size_t) */ - static Type Arg1Type[] = { TYPE(T_PTR), TYPE(T_VOID), TYPE(T_END) }; - static Type Arg2Type[] = { TYPE(T_PTR), TYPE(T_VOID|T_QUAL_CONST), TYPE(T_END) }; - static Type Arg3Type[] = { TYPE(T_SIZE_T), TYPE(T_END) }; + static const Type* Arg1Type = type_void_p; + static const Type* Arg2Type = type_c_void_p; + static const Type* Arg3Type = type_size_t; ArgDesc Arg1, Arg2, Arg3; unsigned ParamSize = 0; @@ -205,14 +225,14 @@ static void StdFunc_memcpy (FuncDesc* F attribute ((unused)), ExprDesc* Expr) int Offs; /* Argument #1 */ - ParseArg (&Arg1, Arg1Type); + ParseArg (&Arg1, Arg1Type, Expr); g_push (Arg1.Flags, Arg1.Expr.IVal); GetCodePos (&Arg1.End); ParamSize += SizeOf (Arg1Type); ConsumeComma (); /* Argument #2 */ - ParseArg (&Arg2, Arg2Type); + ParseArg (&Arg2, Arg2Type, Expr); g_push (Arg2.Flags, Arg2.Expr.IVal); GetCodePos (&Arg2.End); ParamSize += SizeOf (Arg2Type); @@ -223,11 +243,14 @@ static void StdFunc_memcpy (FuncDesc* F attribute ((unused)), ExprDesc* Expr) ** also ignored for the calculation of the parameter size, since it is ** not passed via the stack. */ - ParseArg (&Arg3, Arg3Type); + ParseArg (&Arg3, Arg3Type, Expr); if (Arg3.Flags & CF_CONST) { LoadExpr (CF_NONE, &Arg3.Expr); } + /* We still need to append deferred inc/dec before calling into the function */ + DoDeferred (SQP_KEEP_EAX, &Arg3.Expr); + /* Emit the actual function call. This will also cleanup the stack. */ g_call (CF_FIXARGC, Func_memcpy, ParamSize); @@ -248,264 +271,277 @@ static void StdFunc_memcpy (FuncDesc* F attribute ((unused)), ExprDesc* Expr) goto ExitPoint; } - /* We've generated the complete code for the function now and know the - ** types of all parameters. Check for situations where better code can - ** be generated. If such a situation is detected, throw away the - ** generated, and emit better code. - */ - if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && - ((ED_IsRVal (&Arg2.Expr) && ED_IsLocConst (&Arg2.Expr)) || - (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr))) && - ((ED_IsRVal (&Arg1.Expr) && ED_IsLocConst (&Arg1.Expr)) || - (ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr)))) { + if (IS_Get (&InlineStdFuncs)) { - int Reg1 = ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr); - int Reg2 = ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr); - - /* Drop the generated code */ - RemoveCode (&Arg1.Expr.Start); - - /* We need a label */ - Label = GetLocalLabel (); - - /* Generate memcpy code */ - if (Arg3.Expr.IVal <= 127) { - - AddCodeLine ("ldy #$%02X", (unsigned char) (Arg3.Expr.IVal-1)); - AddCodeLine ("lda #$%02X", (unsigned char) Arg2.Expr.IVal); - g_defcodelabel (Label); - if (Reg2) { - AddCodeLine ("lda (%s),y", ED_GetLabelName (&Arg2.Expr, 0)); - } else { - AddCodeLine ("lda %s,y", ED_GetLabelName (&Arg2.Expr, 0)); - } - if (Reg1) { - AddCodeLine ("sta (%s),y", ED_GetLabelName (&Arg1.Expr, 0)); - } else { - AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, 0)); - } - AddCodeLine ("dey"); - AddCodeLine ("bpl %s", LocalLabelName (Label)); - - } else { - - AddCodeLine ("ldy #$00"); - AddCodeLine ("lda #$%02X", (unsigned char) Arg2.Expr.IVal); - g_defcodelabel (Label); - if (Reg2) { - AddCodeLine ("lda (%s),y", ED_GetLabelName (&Arg2.Expr, 0)); - } else { - AddCodeLine ("lda %s,y", ED_GetLabelName (&Arg2.Expr, 0)); - } - if (Reg1) { - AddCodeLine ("sta (%s),y", ED_GetLabelName (&Arg1.Expr, 0)); - } else { - AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, 0)); - } - AddCodeLine ("iny"); - AddCodeLine ("cpy #$%02X", (unsigned char) Arg3.Expr.IVal); - AddCodeLine ("bne %s", LocalLabelName (Label)); - - } - - /* memcpy returns the address, so the result is actually identical - ** to the first argument. + /* We've generated the complete code for the function now and know the + ** types of all parameters. Check for situations where better code can + ** be generated. If such a situation is detected, throw away the + ** generated, and emit better code. */ - *Expr = Arg1.Expr; + if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && + ((ED_IsRVal (&Arg2.Expr) && ED_IsLocConst (&Arg2.Expr)) || + (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr))) && + ((ED_IsRVal (&Arg1.Expr) && ED_IsLocConst (&Arg1.Expr)) || + (ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr)))) { - } else if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && - ED_IsRVal (&Arg2.Expr) && ED_IsLocConst (&Arg2.Expr) && - ED_IsRVal (&Arg1.Expr) && ED_IsLocStack (&Arg1.Expr) && - (Arg1.Expr.IVal - StackPtr) + Arg3.Expr.IVal < 256) { + int Reg1 = ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr); + int Reg2 = ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr); - /* It is possible to just use one index register even if the stack - ** offset is not zero, by adjusting the offset to the constant - ** address accordingly. But we cannot do this if the data in - ** question is in the register space or at an absolute address less - ** than 256. Register space is zero page, which means that the - ** address calculation could overflow in the linker. - */ - int AllowOneIndex = !ED_IsLocRegister (&Arg2.Expr) && - !(ED_IsLocAbs (&Arg2.Expr) && Arg2.Expr.IVal < 256); + /* Drop the generated code */ + RemoveCode (&Arg1.Expr.Start); - /* Calculate the real stack offset */ - Offs = ED_GetStackOffs (&Arg1.Expr, 0); + /* We need a label */ + Label = GetLocalLabel (); - /* Drop the generated code */ - RemoveCode (&Arg1.Expr.Start); + /* Generate memcpy code */ + if (Arg3.Expr.IVal <= 129) { - /* We need a label */ - Label = GetLocalLabel (); - - /* Generate memcpy code */ - if (Arg3.Expr.IVal <= 127 && !AllowOneIndex) { - - if (Offs == 0) { - AddCodeLine ("ldy #$%02X", (unsigned char) (Offs + Arg3.Expr.IVal - 1)); + AddCodeLine ("ldy #$%02X", (unsigned char) (Arg3.Expr.IVal-1)); g_defcodelabel (Label); - AddCodeLine ("lda %s,y", ED_GetLabelName (&Arg2.Expr, -Offs)); - AddCodeLine ("sta (sp),y"); + if (Reg2) { + AddCodeLine ("lda (%s),y", ED_GetLabelName (&Arg2.Expr, 0)); + } else { + AddCodeLine ("lda %s,y", ED_GetLabelName (&Arg2.Expr, 0)); + } + if (Reg1) { + AddCodeLine ("sta (%s),y", ED_GetLabelName (&Arg1.Expr, 0)); + } else { + AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, 0)); + } AddCodeLine ("dey"); AddCodeLine ("bpl %s", LocalLabelName (Label)); + } else { - AddCodeLine ("ldx #$%02X", (unsigned char) (Arg3.Expr.IVal-1)); - AddCodeLine ("ldy #$%02X", (unsigned char) (Offs + Arg3.Expr.IVal - 1)); + + AddCodeLine ("ldy #$00"); g_defcodelabel (Label); - AddCodeLine ("lda %s,x", ED_GetLabelName (&Arg2.Expr, 0)); - AddCodeLine ("sta (sp),y"); - AddCodeLine ("dey"); - AddCodeLine ("dex"); - AddCodeLine ("bpl %s", LocalLabelName (Label)); + if (Reg2) { + AddCodeLine ("lda (%s),y", ED_GetLabelName (&Arg2.Expr, 0)); + } else { + AddCodeLine ("lda %s,y", ED_GetLabelName (&Arg2.Expr, 0)); + } + if (Reg1) { + AddCodeLine ("sta (%s),y", ED_GetLabelName (&Arg1.Expr, 0)); + } else { + AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, 0)); + } + AddCodeLine ("iny"); + AddCmpCodeIfSizeNot256 ("cpy #$%02X", Arg3.Expr.IVal); + AddCodeLine ("bne %s", LocalLabelName (Label)); + } - } else { - - if (Offs == 0 || AllowOneIndex) { - AddCodeLine ("ldy #$%02X", (unsigned char) Offs); - g_defcodelabel (Label); - AddCodeLine ("lda %s,y", ED_GetLabelName (&Arg2.Expr, -Offs)); - AddCodeLine ("sta (sp),y"); - AddCodeLine ("iny"); - AddCodeLine ("cpy #$%02X", (unsigned char) (Offs + Arg3.Expr.IVal)); - AddCodeLine ("bne %s", LocalLabelName (Label)); - } else { - AddCodeLine ("ldx #$00"); - AddCodeLine ("ldy #$%02X", (unsigned char) Offs); - g_defcodelabel (Label); - AddCodeLine ("lda %s,x", ED_GetLabelName (&Arg2.Expr, 0)); - AddCodeLine ("sta (sp),y"); - AddCodeLine ("iny"); - AddCodeLine ("inx"); - AddCodeLine ("cpx #$%02X", (unsigned char) Arg3.Expr.IVal); - AddCodeLine ("bne %s", LocalLabelName (Label)); - } + /* memcpy returns the address, so the result is actually identical + ** to the first argument. + */ + *Expr = Arg1.Expr; + /* Bail out, no need for further processing */ + goto ExitPoint; } - /* memcpy returns the address, so the result is actually identical - ** to the first argument. - */ - *Expr = Arg1.Expr; + if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && + ED_IsRVal (&Arg2.Expr) && ED_IsLocConst (&Arg2.Expr) && + ED_IsRVal (&Arg1.Expr) && ED_IsLocStack (&Arg1.Expr) && + (Arg1.Expr.IVal - StackPtr) + Arg3.Expr.IVal < 256) { - } else if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && - ED_IsRVal (&Arg2.Expr) && ED_IsLocStack (&Arg2.Expr) && - (Arg2.Expr.IVal - StackPtr) + Arg3.Expr.IVal < 256 && - ED_IsRVal (&Arg1.Expr) && ED_IsLocConst (&Arg1.Expr)) { + /* It is possible to just use one index register even if the stack + ** offset is not zero, by adjusting the offset to the constant + ** address accordingly. But we cannot do this if the data in + ** question is in the register space or at an absolute address less + ** than 256. Register space is zero page, which means that the + ** address calculation could overflow in the linker. + */ + int AllowOneIndex = !ED_IsLocRegister (&Arg2.Expr) && + !(ED_IsLocNone (&Arg2.Expr) && Arg2.Expr.IVal < 256); - /* It is possible to just use one index register even if the stack - ** offset is not zero, by adjusting the offset to the constant - ** address accordingly. But we cannot do this if the data in - ** question is in the register space or at an absolute address less - ** than 256. Register space is zero page, which means that the - ** address calculation could overflow in the linker. - */ - int AllowOneIndex = !ED_IsLocRegister (&Arg1.Expr) && - !(ED_IsLocAbs (&Arg1.Expr) && Arg1.Expr.IVal < 256); + /* Calculate the real stack offset */ + Offs = ED_GetStackOffs (&Arg1.Expr, 0); - /* Calculate the real stack offset */ - Offs = ED_GetStackOffs (&Arg2.Expr, 0); + /* Drop the generated code */ + RemoveCode (&Arg1.Expr.Start); - /* Drop the generated code */ - RemoveCode (&Arg1.Expr.Start); + /* We need a label */ + Label = GetLocalLabel (); - /* We need a label */ - Label = GetLocalLabel (); + /* Generate memcpy code */ + if (Arg3.Expr.IVal <= 129 && !AllowOneIndex) { - /* Generate memcpy code */ - if (Arg3.Expr.IVal <= 127 && !AllowOneIndex) { + if (Offs == 0) { + AddCodeLine ("ldy #$%02X", (unsigned char) (Offs + Arg3.Expr.IVal - 1)); + g_defcodelabel (Label); + AddCodeLine ("lda %s,y", ED_GetLabelName (&Arg2.Expr, -Offs)); + AddCodeLine ("sta (sp),y"); + AddCodeLine ("dey"); + AddCodeLine ("bpl %s", LocalLabelName (Label)); + } else { + AddCodeLine ("ldx #$%02X", (unsigned char) (Arg3.Expr.IVal-1)); + AddCodeLine ("ldy #$%02X", (unsigned char) (Offs + Arg3.Expr.IVal - 1)); + g_defcodelabel (Label); + AddCodeLine ("lda %s,x", ED_GetLabelName (&Arg2.Expr, 0)); + AddCodeLine ("sta (sp),y"); + AddCodeLine ("dey"); + AddCodeLine ("dex"); + AddCodeLine ("bpl %s", LocalLabelName (Label)); + } - if (Offs == 0) { + } else { + + if (Offs == 0 || AllowOneIndex) { + AddCodeLine ("ldy #$%02X", (unsigned char) Offs); + g_defcodelabel (Label); + AddCodeLine ("lda %s,y", ED_GetLabelName (&Arg2.Expr, -Offs)); + AddCodeLine ("sta (sp),y"); + AddCodeLine ("iny"); + AddCmpCodeIfSizeNot256 ("cpy #$%02X", Offs + Arg3.Expr.IVal); + AddCodeLine ("bne %s", LocalLabelName (Label)); + } else { + AddCodeLine ("ldx #$00"); + AddCodeLine ("ldy #$%02X", (unsigned char) Offs); + g_defcodelabel (Label); + AddCodeLine ("lda %s,x", ED_GetLabelName (&Arg2.Expr, 0)); + AddCodeLine ("sta (sp),y"); + AddCodeLine ("iny"); + AddCodeLine ("inx"); + AddCmpCodeIfSizeNot256 ("cpx #$%02X", Arg3.Expr.IVal); + AddCodeLine ("bne %s", LocalLabelName (Label)); + } + + } + + /* memcpy returns the address, so the result is actually identical + ** to the first argument. + */ + *Expr = Arg1.Expr; + + /* Bail out, no need for further processing */ + goto ExitPoint; + } + + if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && + ED_IsRVal (&Arg2.Expr) && ED_IsLocStack (&Arg2.Expr) && + (Arg2.Expr.IVal - StackPtr) + Arg3.Expr.IVal < 256 && + ED_IsRVal (&Arg1.Expr) && ED_IsLocConst (&Arg1.Expr)) { + + /* It is possible to just use one index register even if the stack + ** offset is not zero, by adjusting the offset to the constant + ** address accordingly. But we cannot do this if the data in + ** question is in the register space or at an absolute address less + ** than 256. Register space is zero page, which means that the + ** address calculation could overflow in the linker. + */ + int AllowOneIndex = !ED_IsLocRegister (&Arg1.Expr) && + !(ED_IsLocNone (&Arg1.Expr) && Arg1.Expr.IVal < 256); + + /* Calculate the real stack offset */ + Offs = ED_GetStackOffs (&Arg2.Expr, 0); + + /* Drop the generated code */ + RemoveCode (&Arg1.Expr.Start); + + /* We need a label */ + Label = GetLocalLabel (); + + /* Generate memcpy code */ + if (Arg3.Expr.IVal <= 129 && !AllowOneIndex) { + + if (Offs == 0) { + AddCodeLine ("ldy #$%02X", (unsigned char) (Arg3.Expr.IVal - 1)); + g_defcodelabel (Label); + AddCodeLine ("lda (sp),y"); + AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, 0)); + AddCodeLine ("dey"); + AddCodeLine ("bpl %s", LocalLabelName (Label)); + } else { + AddCodeLine ("ldx #$%02X", (unsigned char) (Arg3.Expr.IVal-1)); + AddCodeLine ("ldy #$%02X", (unsigned char) (Offs + Arg3.Expr.IVal - 1)); + g_defcodelabel (Label); + AddCodeLine ("lda (sp),y"); + AddCodeLine ("sta %s,x", ED_GetLabelName (&Arg1.Expr, 0)); + AddCodeLine ("dey"); + AddCodeLine ("dex"); + AddCodeLine ("bpl %s", LocalLabelName (Label)); + } + + } else { + + if (Offs == 0 || AllowOneIndex) { + AddCodeLine ("ldy #$%02X", (unsigned char) Offs); + g_defcodelabel (Label); + AddCodeLine ("lda (sp),y"); + AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, -Offs)); + AddCodeLine ("iny"); + AddCmpCodeIfSizeNot256 ("cpy #$%02X", Offs + Arg3.Expr.IVal); + AddCodeLine ("bne %s", LocalLabelName (Label)); + } else { + AddCodeLine ("ldx #$00"); + AddCodeLine ("ldy #$%02X", (unsigned char) Offs); + g_defcodelabel (Label); + AddCodeLine ("lda (sp),y"); + AddCodeLine ("sta %s,x", ED_GetLabelName (&Arg1.Expr, 0)); + AddCodeLine ("iny"); + AddCodeLine ("inx"); + AddCmpCodeIfSizeNot256 ("cpx #$%02X", Arg3.Expr.IVal); + AddCodeLine ("bne %s", LocalLabelName (Label)); + } + + } + + /* memcpy returns the address, so the result is actually identical + ** to the first argument. + */ + *Expr = Arg1.Expr; + + /* Bail out, no need for further processing */ + goto ExitPoint; + } + + if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && + ED_IsRVal (&Arg2.Expr) && ED_IsLocStack (&Arg2.Expr) && + (Offs = ED_GetStackOffs (&Arg2.Expr, 0)) == 0) { + + /* Drop the generated code but leave the load of the first argument*/ + RemoveCode (&Arg1.Push); + + /* We need a label */ + Label = GetLocalLabel (); + + /* Generate memcpy code */ + AddCodeLine ("sta ptr1"); + AddCodeLine ("stx ptr1+1"); + if (Arg3.Expr.IVal <= 129) { AddCodeLine ("ldy #$%02X", (unsigned char) (Arg3.Expr.IVal - 1)); g_defcodelabel (Label); AddCodeLine ("lda (sp),y"); - AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, 0)); + AddCodeLine ("sta (ptr1),y"); AddCodeLine ("dey"); AddCodeLine ("bpl %s", LocalLabelName (Label)); } else { - AddCodeLine ("ldx #$%02X", (unsigned char) (Arg3.Expr.IVal-1)); - AddCodeLine ("ldy #$%02X", (unsigned char) (Offs + Arg3.Expr.IVal - 1)); + AddCodeLine ("ldy #$00"); g_defcodelabel (Label); AddCodeLine ("lda (sp),y"); - AddCodeLine ("sta %s,x", ED_GetLabelName (&Arg1.Expr, 0)); - AddCodeLine ("dey"); - AddCodeLine ("dex"); - AddCodeLine ("bpl %s", LocalLabelName (Label)); - } - - } else { - - if (Offs == 0 || AllowOneIndex) { - AddCodeLine ("ldy #$%02X", (unsigned char) Offs); - g_defcodelabel (Label); - AddCodeLine ("lda (sp),y"); - AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, -Offs)); + AddCodeLine ("sta (ptr1),y"); AddCodeLine ("iny"); - AddCodeLine ("cpy #$%02X", (unsigned char) (Offs + Arg3.Expr.IVal)); - AddCodeLine ("bne %s", LocalLabelName (Label)); - } else { - AddCodeLine ("ldx #$00"); - AddCodeLine ("ldy #$%02X", (unsigned char) Offs); - g_defcodelabel (Label); - AddCodeLine ("lda (sp),y"); - AddCodeLine ("sta %s,x", ED_GetLabelName (&Arg1.Expr, 0)); - AddCodeLine ("iny"); - AddCodeLine ("inx"); - AddCodeLine ("cpx #$%02X", (unsigned char) Arg3.Expr.IVal); + AddCmpCodeIfSizeNot256 ("cpy #$%02X", Arg3.Expr.IVal); AddCodeLine ("bne %s", LocalLabelName (Label)); } + /* Reload result - X hasn't changed by the code above */ + AddCodeLine ("lda ptr1"); + + /* The function result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); + Expr->Type = GetFuncReturn (Expr->Type); + + /* Bail out, no need for further processing */ + goto ExitPoint; } - - /* memcpy returns the address, so the result is actually identical - ** to the first argument. - */ - *Expr = Arg1.Expr; - - } else if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && - ED_IsRVal (&Arg2.Expr) && ED_IsLocStack (&Arg2.Expr) && - (Offs = ED_GetStackOffs (&Arg2.Expr, 0)) == 0) { - - /* Drop the generated code but leave the load of the first argument*/ - RemoveCode (&Arg1.Push); - - /* We need a label */ - Label = GetLocalLabel (); - - /* Generate memcpy code */ - AddCodeLine ("sta ptr1"); - AddCodeLine ("stx ptr1+1"); - if (Arg3.Expr.IVal <= 127) { - AddCodeLine ("ldy #$%02X", (unsigned char) (Arg3.Expr.IVal - 1)); - g_defcodelabel (Label); - AddCodeLine ("lda (sp),y"); - AddCodeLine ("sta (ptr1),y"); - AddCodeLine ("dey"); - AddCodeLine ("bpl %s", LocalLabelName (Label)); - } else { - AddCodeLine ("ldy #$00"); - g_defcodelabel (Label); - AddCodeLine ("lda (sp),y"); - AddCodeLine ("sta (ptr1),y"); - AddCodeLine ("iny"); - AddCodeLine ("cpy #$%02X", (unsigned char) Arg3.Expr.IVal); - AddCodeLine ("bne %s", LocalLabelName (Label)); - } - - /* Reload result - X hasn't changed by the code above */ - AddCodeLine ("lda ptr1"); - - /* The function result is an rvalue in the primary register */ - ED_MakeRValExpr (Expr); - Expr->Type = GetFuncReturn (Expr->Type); - - } else { - - /* The function result is an rvalue in the primary register */ - ED_MakeRValExpr (Expr); - Expr->Type = GetFuncReturn (Expr->Type); - } + /* The function result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); + Expr->Type = GetFuncReturn (Expr->Type); + ExitPoint: /* We expect the closing brace */ ConsumeRParen (); @@ -523,9 +559,9 @@ static void StdFunc_memset (FuncDesc* F attribute ((unused)), ExprDesc* Expr) /* Handle the memset function */ { /* Argument types: (void*, int, size_t) */ - static Type Arg1Type[] = { TYPE(T_PTR), TYPE(T_VOID), TYPE(T_END) }; - static Type Arg2Type[] = { TYPE(T_INT), TYPE(T_END) }; - static Type Arg3Type[] = { TYPE(T_SIZE_T), TYPE(T_END) }; + static const Type* Arg1Type = type_void_p; + static const Type* Arg2Type = type_int; + static const Type* Arg3Type = type_size_t; ArgDesc Arg1, Arg2, Arg3; int MemSet = 1; /* Use real memset if true */ @@ -533,7 +569,7 @@ static void StdFunc_memset (FuncDesc* F attribute ((unused)), ExprDesc* Expr) unsigned Label; /* Argument #1 */ - ParseArg (&Arg1, Arg1Type); + ParseArg (&Arg1, Arg1Type, Expr); g_push (Arg1.Flags, Arg1.Expr.IVal); GetCodePos (&Arg1.End); ParamSize += SizeOf (Arg1Type); @@ -542,7 +578,7 @@ static void StdFunc_memset (FuncDesc* F attribute ((unused)), ExprDesc* Expr) /* Argument #2. This argument is special in that we will call another ** function if it is a constant zero. */ - ParseArg (&Arg2, Arg2Type); + ParseArg (&Arg2, Arg2Type, Expr); if ((Arg2.Flags & CF_CONST) != 0 && Arg2.Expr.IVal == 0) { /* Don't call memset, call bzero instead */ MemSet = 0; @@ -559,11 +595,14 @@ static void StdFunc_memset (FuncDesc* F attribute ((unused)), ExprDesc* Expr) ** also ignored for the calculation of the parameter size, since it is ** not passed via the stack. */ - ParseArg (&Arg3, Arg3Type); + ParseArg (&Arg3, Arg3Type, Expr); if (Arg3.Flags & CF_CONST) { LoadExpr (CF_NONE, &Arg3.Expr); } + /* We still need to append deferred inc/dec before calling into the function */ + DoDeferred (SQP_KEEP_EAX, &Arg3.Expr); + /* Emit the actual function call. This will also cleanup the stack. */ g_call (CF_FIXARGC, MemSet? Func_memset : Func__bzero, ParamSize); @@ -584,140 +623,151 @@ static void StdFunc_memset (FuncDesc* F attribute ((unused)), ExprDesc* Expr) goto ExitPoint; } - /* We've generated the complete code for the function now and know the - ** types of all parameters. Check for situations where better code can - ** be generated. If such a situation is detected, throw away the - ** generated, and emit better code. - ** Note: Lots of improvements would be possible here, but I will - ** concentrate on the most common case: memset with arguments 2 and 3 - ** being constant numerical values. Some checks have shown that this - ** covers nearly 90% of all memset calls. - */ - if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && - ED_IsConstAbsInt (&Arg2.Expr) && - ((ED_IsRVal (&Arg1.Expr) && ED_IsLocConst (&Arg1.Expr)) || - (ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr)))) { + if (IS_Get (&InlineStdFuncs)) { - int Reg = ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr); + /* We've generated the complete code for the function now and know the + ** types of all parameters. Check for situations where better code can + ** be generated. If such a situation is detected, throw away the + ** generated, and emit better code. + ** Note: Lots of improvements would be possible here, but I will + ** concentrate on the most common case: memset with arguments 2 and 3 + ** being constant numerical values. Some checks have shown that this + ** covers nearly 90% of all memset calls. + */ + if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && + ED_IsConstAbsInt (&Arg2.Expr) && + ((ED_IsRVal (&Arg1.Expr) && ED_IsLocConst (&Arg1.Expr)) || + (ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr)))) { - /* Drop the generated code */ - RemoveCode (&Arg1.Expr.Start); + int Reg = ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr); - /* We need a label */ - Label = GetLocalLabel (); + /* Drop the generated code */ + RemoveCode (&Arg1.Expr.Start); - /* Generate memset code */ - if (Arg3.Expr.IVal <= 127) { + /* We need a label */ + Label = GetLocalLabel (); + + /* Generate memset code */ + if (Arg3.Expr.IVal <= 129) { + + AddCodeLine ("ldy #$%02X", (unsigned char) (Arg3.Expr.IVal-1)); + AddCodeLine ("lda #$%02X", (unsigned char) Arg2.Expr.IVal); + g_defcodelabel (Label); + if (Reg) { + AddCodeLine ("sta (%s),y", ED_GetLabelName (&Arg1.Expr, 0)); + } else { + AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, 0)); + } + AddCodeLine ("dey"); + AddCodeLine ("bpl %s", LocalLabelName (Label)); - AddCodeLine ("ldy #$%02X", (unsigned char) (Arg3.Expr.IVal-1)); - AddCodeLine ("lda #$%02X", (unsigned char) Arg2.Expr.IVal); - g_defcodelabel (Label); - if (Reg) { - AddCodeLine ("sta (%s),y", ED_GetLabelName (&Arg1.Expr, 0)); } else { - AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, 0)); + + AddCodeLine ("ldy #$00"); + AddCodeLine ("lda #$%02X", (unsigned char) Arg2.Expr.IVal); + g_defcodelabel (Label); + if (Reg) { + AddCodeLine ("sta (%s),y", ED_GetLabelName (&Arg1.Expr, 0)); + } else { + AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, 0)); + } + AddCodeLine ("iny"); + AddCmpCodeIfSizeNot256 ("cpy #$%02X", Arg3.Expr.IVal); + AddCodeLine ("bne %s", LocalLabelName (Label)); + } - AddCodeLine ("dey"); - AddCodeLine ("bpl %s", LocalLabelName (Label)); - } else { - - AddCodeLine ("ldy #$00"); - AddCodeLine ("lda #$%02X", (unsigned char) Arg2.Expr.IVal); - g_defcodelabel (Label); - if (Reg) { - AddCodeLine ("sta (%s),y", ED_GetLabelName (&Arg1.Expr, 0)); - } else { - AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, 0)); - } - AddCodeLine ("iny"); - AddCodeLine ("cpy #$%02X", (unsigned char) Arg3.Expr.IVal); - AddCodeLine ("bne %s", LocalLabelName (Label)); + /* memset returns the address, so the result is actually identical + ** to the first argument. + */ + *Expr = Arg1.Expr; + /* Bail out, no need for further processing */ + goto ExitPoint; } - /* memset returns the address, so the result is actually identical - ** to the first argument. - */ - *Expr = Arg1.Expr; + if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && + ED_IsConstAbsInt (&Arg2.Expr) && + ED_IsRVal (&Arg1.Expr) && ED_IsLocStack (&Arg1.Expr) && + (Arg1.Expr.IVal - StackPtr) + Arg3.Expr.IVal < 256) { - } else if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && - ED_IsConstAbsInt (&Arg2.Expr) && - ED_IsRVal (&Arg1.Expr) && ED_IsLocStack (&Arg1.Expr) && - (Arg1.Expr.IVal - StackPtr) + Arg3.Expr.IVal < 256) { + /* Calculate the real stack offset */ + int Offs = ED_GetStackOffs (&Arg1.Expr, 0); - /* Calculate the real stack offset */ - int Offs = ED_GetStackOffs (&Arg1.Expr, 0); + /* Drop the generated code */ + RemoveCode (&Arg1.Expr.Start); - /* Drop the generated code */ - RemoveCode (&Arg1.Expr.Start); + /* We need a label */ + Label = GetLocalLabel (); - /* We need a label */ - Label = GetLocalLabel (); - - /* Generate memset code */ - AddCodeLine ("ldy #$%02X", (unsigned char) Offs); - AddCodeLine ("lda #$%02X", (unsigned char) Arg2.Expr.IVal); - g_defcodelabel (Label); - AddCodeLine ("sta (sp),y"); - AddCodeLine ("iny"); - AddCodeLine ("cpy #$%02X", (unsigned char) (Offs + Arg3.Expr.IVal)); - AddCodeLine ("bne %s", LocalLabelName (Label)); - - /* memset returns the address, so the result is actually identical - ** to the first argument. - */ - *Expr = Arg1.Expr; - - } else if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && - ED_IsConstAbsInt (&Arg2.Expr) && - (Arg2.Expr.IVal != 0 || IS_Get (&CodeSizeFactor) > 200)) { - - /* Remove all of the generated code but the load of the first - ** argument. - */ - RemoveCode (&Arg1.Push); - - /* We need a label */ - Label = GetLocalLabel (); - - /* Generate code */ - AddCodeLine ("sta ptr1"); - AddCodeLine ("stx ptr1+1"); - if (Arg3.Expr.IVal <= 127) { - AddCodeLine ("ldy #$%02X", (unsigned char) (Arg3.Expr.IVal-1)); + /* Generate memset code */ + AddCodeLine ("ldy #$%02X", (unsigned char) Offs); AddCodeLine ("lda #$%02X", (unsigned char) Arg2.Expr.IVal); g_defcodelabel (Label); - AddCodeLine ("sta (ptr1),y"); - AddCodeLine ("dey"); - AddCodeLine ("bpl %s", LocalLabelName (Label)); - } else { - AddCodeLine ("ldy #$00"); - AddCodeLine ("lda #$%02X", (unsigned char) Arg2.Expr.IVal); - g_defcodelabel (Label); - AddCodeLine ("sta (ptr1),y"); + AddCodeLine ("sta (sp),y"); AddCodeLine ("iny"); - AddCodeLine ("cpy #$%02X", (unsigned char) Arg3.Expr.IVal); + AddCmpCodeIfSizeNot256 ("cpy #$%02X", Offs + Arg3.Expr.IVal); AddCodeLine ("bne %s", LocalLabelName (Label)); + + /* memset returns the address, so the result is actually identical + ** to the first argument. + */ + *Expr = Arg1.Expr; + + /* Bail out, no need for further processing */ + goto ExitPoint; } - /* Load the function result pointer into a/x (x is still valid). This - ** code will get removed by the optimizer if it is not used later. - */ - AddCodeLine ("lda ptr1"); + if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 && + ED_IsConstAbsInt (&Arg2.Expr) && + (Arg2.Expr.IVal != 0 || IS_Get (&CodeSizeFactor) > 200)) { - /* The function result is an rvalue in the primary register */ - ED_MakeRValExpr (Expr); - Expr->Type = GetFuncReturn (Expr->Type); + /* Remove all of the generated code but the load of the first + ** argument. + */ + RemoveCode (&Arg1.Push); - } else { + /* We need a label */ + Label = GetLocalLabel (); - /* The function result is an rvalue in the primary register */ - ED_MakeRValExpr (Expr); - Expr->Type = GetFuncReturn (Expr->Type); + /* Generate code */ + AddCodeLine ("sta ptr1"); + AddCodeLine ("stx ptr1+1"); + if (Arg3.Expr.IVal <= 129) { + AddCodeLine ("ldy #$%02X", (unsigned char) (Arg3.Expr.IVal-1)); + AddCodeLine ("lda #$%02X", (unsigned char) Arg2.Expr.IVal); + g_defcodelabel (Label); + AddCodeLine ("sta (ptr1),y"); + AddCodeLine ("dey"); + AddCodeLine ("bpl %s", LocalLabelName (Label)); + } else { + AddCodeLine ("ldy #$00"); + AddCodeLine ("lda #$%02X", (unsigned char) Arg2.Expr.IVal); + g_defcodelabel (Label); + AddCodeLine ("sta (ptr1),y"); + AddCodeLine ("iny"); + AddCmpCodeIfSizeNot256 ("cpy #$%02X", Arg3.Expr.IVal); + AddCodeLine ("bne %s", LocalLabelName (Label)); + } + /* Load the function result pointer into a/x (x is still valid). This + ** code will get removed by the optimizer if it is not used later. + */ + AddCodeLine ("lda ptr1"); + + /* The function result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); + Expr->Type = GetFuncReturn (Expr->Type); + + /* Bail out, no need for further processing */ + goto ExitPoint; + } } + /* The function result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); + Expr->Type = GetFuncReturn (Expr->Type); + ExitPoint: /* We expect the closing brace */ ConsumeRParen (); @@ -735,8 +785,8 @@ static void StdFunc_strcmp (FuncDesc* F attribute ((unused)), ExprDesc* Expr) /* Handle the strcmp function */ { /* Argument types: (const char*, const char*) */ - static Type Arg1Type[] = { TYPE(T_PTR), TYPE(T_CHAR|T_QUAL_CONST), TYPE(T_END) }; - static Type Arg2Type[] = { TYPE(T_PTR), TYPE(T_CHAR|T_QUAL_CONST), TYPE(T_END) }; + static const Type* Arg1Type = type_c_char_p; + static const Type* Arg2Type = type_c_char_p; ArgDesc Arg1, Arg2; unsigned ParamSize = 0; @@ -745,18 +795,14 @@ static void StdFunc_strcmp (FuncDesc* F attribute ((unused)), ExprDesc* Expr) int IsArray; int Offs; - /* Setup the argument type string */ - Arg1Type[1].C = GetDefaultChar () | T_QUAL_CONST; - Arg2Type[1].C = GetDefaultChar () | T_QUAL_CONST; - /* Argument #1 */ - ParseArg (&Arg1, Arg1Type); + ParseArg (&Arg1, Arg1Type, Expr); g_push (Arg1.Flags, Arg1.Expr.IVal); ParamSize += SizeOf (Arg1Type); ConsumeComma (); /* Argument #2. */ - ParseArg (&Arg2, Arg2Type); + ParseArg (&Arg2, Arg2Type, Expr); /* Since strcmp is a fastcall function, we must load the ** arg into the primary if it is not already there. This parameter is @@ -767,6 +813,9 @@ static void StdFunc_strcmp (FuncDesc* F attribute ((unused)), ExprDesc* Expr) LoadExpr (CF_NONE, &Arg2.Expr); } + /* We still need to append deferred inc/dec before calling into the function */ + DoDeferred (SQP_KEEP_EAX, &Arg2.Expr); + /* Emit the actual function call. This will also cleanup the stack. */ g_call (CF_FIXARGC, Func_strcmp, ParamSize); @@ -779,146 +828,146 @@ static void StdFunc_strcmp (FuncDesc* F attribute ((unused)), ExprDesc* Expr) ECount1 = ECount2; } - /* If the second argument is the empty string literal, we can generate - ** more efficient code. - */ - if (ED_IsLocLiteral (&Arg2.Expr) && - IS_Get (&WritableStrings) == 0 && - GetLiteralSize (Arg2.Expr.LVal) == 1 && - GetLiteralStr (Arg2.Expr.LVal)[0] == '\0') { + if (IS_Get (&InlineStdFuncs)) { - /* Drop the generated code so we have the first argument in the - ** primary + /* If the second argument is the empty string literal, we can generate + ** more efficient code. */ - RemoveCode (&Arg1.Push); + if (ED_IsLocLiteral (&Arg2.Expr) && + IS_Get (&WritableStrings) == 0 && + GetLiteralSize (Arg2.Expr.V.LVal) == 1 && + GetLiteralStr (Arg2.Expr.V.LVal)[0] == '\0') { - /* We don't need the literal any longer */ - ReleaseLiteral (Arg2.Expr.LVal); - - /* We do now have Arg1 in the primary. Load the first character from - ** this string and cast to int. This is the function result. - */ - IsArray = IsTypeArray (Arg1.Type) && ED_IsRVal (&Arg1.Expr); - if (IsArray && ED_IsLocStack (&Arg1.Expr) && - (Offs = ED_GetStackOffs (&Arg1.Expr, 0) < 256)) { - /* Drop the generated code */ - RemoveCode (&Arg1.Load); - - /* Generate code */ - AddCodeLine ("ldy #$%02X", Offs); - AddCodeLine ("ldx #$00"); - AddCodeLine ("lda (sp),y"); - } else if (IsArray && ED_IsLocConst (&Arg1.Expr)) { - /* Drop the generated code */ - RemoveCode (&Arg1.Load); - - /* Generate code */ - AddCodeLine ("ldx #$00"); - AddCodeLine ("lda %s", ED_GetLabelName (&Arg1.Expr, 0)); - } else { - /* Drop part of the generated code so we have the first argument - ** in the primary + /* Drop the generated code so we have the first argument in the + ** primary */ RemoveCode (&Arg1.Push); - /* Fetch the first char */ - g_getind (CF_CHAR | CF_UNSIGNED, 0); + /* We don't need the literal any longer */ + ReleaseLiteral (Arg2.Expr.V.LVal); + + /* We do now have Arg1 in the primary. Load the first character from + ** this string and cast to int. This is the function result. + */ + IsArray = IsTypeArray (Arg1.Type) && ED_IsRVal (&Arg1.Expr); + if (IsArray && ED_IsLocStack (&Arg1.Expr) && + (Offs = ED_GetStackOffs (&Arg1.Expr, 0) < 256)) { + /* Drop the generated code */ + RemoveCode (&Arg1.Load); + + /* Generate code */ + AddCodeLine ("ldy #$%02X", Offs); + AddCodeLine ("ldx #$00"); + AddCodeLine ("lda (sp),y"); + } else if (IsArray && ED_IsLocConst (&Arg1.Expr)) { + /* Drop the generated code */ + RemoveCode (&Arg1.Load); + + /* Generate code */ + AddCodeLine ("ldx #$00"); + AddCodeLine ("lda %s", ED_GetLabelName (&Arg1.Expr, 0)); + } else { + /* Drop part of the generated code so we have the first argument + ** in the primary + */ + RemoveCode (&Arg1.Push); + + /* Fetch the first char */ + g_getind (CF_CHAR | CF_UNSIGNED, 0); + } + + } else if ((IS_Get (&CodeSizeFactor) >= 165) && + ((ED_IsRVal (&Arg2.Expr) && ED_IsLocConst (&Arg2.Expr)) || + (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr))) && + ((ED_IsRVal (&Arg1.Expr) && ED_IsLocConst (&Arg1.Expr)) || + (ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr))) && + (IS_Get (&EagerlyInlineFuncs) || (ECount1 > 0 && ECount1 < 256))) { + + unsigned Entry, Loop, Fin; /* Labels */ + const char* Load; + const char* Compare; + + if (ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr)) { + Load = "lda (%s),y"; + } else { + Load = "lda %s,y"; + } + if (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr)) { + Compare = "cmp (%s),y"; + } else { + Compare = "cmp %s,y"; + } + + /* Drop the generated code */ + RemoveCode (&Arg1.Expr.Start); + + /* We need labels */ + Entry = GetLocalLabel (); + Loop = GetLocalLabel (); + Fin = GetLocalLabel (); + + /* Generate strcmp code */ + AddCodeLine ("ldy #$00"); + AddCodeLine ("beq %s", LocalLabelName (Entry)); + g_defcodelabel (Loop); + AddCodeLine ("tax"); + AddCodeLine ("beq %s", LocalLabelName (Fin)); + AddCodeLine ("iny"); + g_defcodelabel (Entry); + AddCodeLine (Load, ED_GetLabelName (&Arg1.Expr, 0)); + AddCodeLine (Compare, ED_GetLabelName (&Arg2.Expr, 0)); + AddCodeLine ("beq %s", LocalLabelName (Loop)); + AddCodeLine ("ldx #$01"); + AddCodeLine ("bcs %s", LocalLabelName (Fin)); + AddCodeLine ("ldx #$FF"); + g_defcodelabel (Fin); + + } else if ((IS_Get (&CodeSizeFactor) > 190) && + ((ED_IsRVal (&Arg2.Expr) && ED_IsLocConst (&Arg2.Expr)) || + (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr))) && + (IS_Get (&EagerlyInlineFuncs) || (ECount1 > 0 && ECount1 < 256))) { + + unsigned Entry, Loop, Fin; /* Labels */ + const char* Compare; + + if (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr)) { + Compare = "cmp (%s),y"; + } else { + Compare = "cmp %s,y"; + } + + /* Drop the generated code */ + RemoveCode (&Arg1.Push); + + /* We need labels */ + Entry = GetLocalLabel (); + Loop = GetLocalLabel (); + Fin = GetLocalLabel (); + + /* Store Arg1 into ptr1 */ + AddCodeLine ("sta ptr1"); + AddCodeLine ("stx ptr1+1"); + + /* Generate strcmp code */ + AddCodeLine ("ldy #$00"); + AddCodeLine ("beq %s", LocalLabelName (Entry)); + g_defcodelabel (Loop); + AddCodeLine ("tax"); + AddCodeLine ("beq %s", LocalLabelName (Fin)); + AddCodeLine ("iny"); + g_defcodelabel (Entry); + AddCodeLine ("lda (ptr1),y"); + AddCodeLine (Compare, ED_GetLabelName (&Arg2.Expr, 0)); + AddCodeLine ("beq %s", LocalLabelName (Loop)); + AddCodeLine ("ldx #$01"); + AddCodeLine ("bcs %s", LocalLabelName (Fin)); + AddCodeLine ("ldx #$FF"); + g_defcodelabel (Fin); } - - } else if ((IS_Get (&CodeSizeFactor) >= 165) && - ((ED_IsRVal (&Arg2.Expr) && ED_IsLocConst (&Arg2.Expr)) || - (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr))) && - ((ED_IsRVal (&Arg1.Expr) && ED_IsLocConst (&Arg1.Expr)) || - (ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr))) && - (IS_Get (&InlineStdFuncs) || (ECount1 > 0 && ECount1 < 256))) { - - - unsigned Entry, Loop, Fin; /* Labels */ - const char* Load; - const char* Compare; - - if (ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr)) { - Load = "lda (%s),y"; - } else { - Load = "lda %s,y"; - } - if (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr)) { - Compare = "cmp (%s),y"; - } else { - Compare = "cmp %s,y"; - } - - /* Drop the generated code */ - RemoveCode (&Arg1.Expr.Start); - - /* We need labels */ - Entry = GetLocalLabel (); - Loop = GetLocalLabel (); - Fin = GetLocalLabel (); - - /* Generate strcmp code */ - AddCodeLine ("ldy #$00"); - AddCodeLine ("beq %s", LocalLabelName (Entry)); - g_defcodelabel (Loop); - AddCodeLine ("tax"); - AddCodeLine ("beq %s", LocalLabelName (Fin)); - AddCodeLine ("iny"); - g_defcodelabel (Entry); - AddCodeLine (Load, ED_GetLabelName (&Arg1.Expr, 0)); - AddCodeLine (Compare, ED_GetLabelName (&Arg2.Expr, 0)); - AddCodeLine ("beq %s", LocalLabelName (Loop)); - AddCodeLine ("ldx #$01"); - AddCodeLine ("bcs %s", LocalLabelName (Fin)); - AddCodeLine ("ldx #$FF"); - g_defcodelabel (Fin); - - } else if ((IS_Get (&CodeSizeFactor) > 190) && - ((ED_IsRVal (&Arg2.Expr) && ED_IsLocConst (&Arg2.Expr)) || - (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr))) && - (IS_Get (&InlineStdFuncs) || (ECount1 > 0 && ECount1 < 256))) { - - - unsigned Entry, Loop, Fin; /* Labels */ - const char* Compare; - - if (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr)) { - Compare = "cmp (%s),y"; - } else { - Compare = "cmp %s,y"; - } - - /* Drop the generated code */ - RemoveCode (&Arg1.Push); - - /* We need labels */ - Entry = GetLocalLabel (); - Loop = GetLocalLabel (); - Fin = GetLocalLabel (); - - /* Store Arg1 into ptr1 */ - AddCodeLine ("sta ptr1"); - AddCodeLine ("stx ptr1+1"); - - /* Generate strcmp code */ - AddCodeLine ("ldy #$00"); - AddCodeLine ("beq %s", LocalLabelName (Entry)); - g_defcodelabel (Loop); - AddCodeLine ("tax"); - AddCodeLine ("beq %s", LocalLabelName (Fin)); - AddCodeLine ("iny"); - g_defcodelabel (Entry); - AddCodeLine ("lda (ptr1),y"); - AddCodeLine (Compare, ED_GetLabelName (&Arg2.Expr, 0)); - AddCodeLine ("beq %s", LocalLabelName (Loop)); - AddCodeLine ("ldx #$01"); - AddCodeLine ("bcs %s", LocalLabelName (Fin)); - AddCodeLine ("ldx #$FF"); - g_defcodelabel (Fin); - } /* The function result is an rvalue in the primary register */ - ED_MakeRValExpr (Expr); + ED_FinalizeRValLoad (Expr); Expr->Type = GetFuncReturn (Expr->Type); /* We expect the closing brace */ @@ -937,20 +986,16 @@ static void StdFunc_strcpy (FuncDesc* F attribute ((unused)), ExprDesc* Expr) /* Handle the strcpy function */ { /* Argument types: (char*, const char*) */ - static Type Arg1Type[] = { TYPE(T_PTR), TYPE(T_CHAR), TYPE(T_END) }; - static Type Arg2Type[] = { TYPE(T_PTR), TYPE(T_CHAR|T_QUAL_CONST), TYPE(T_END) }; + static const Type* Arg1Type = type_char_p; + static const Type* Arg2Type = type_c_char_p; ArgDesc Arg1, Arg2; unsigned ParamSize = 0; long ECount; unsigned L1; - /* Setup the argument type string */ - Arg1Type[1].C = GetDefaultChar (); - Arg2Type[1].C = GetDefaultChar () | T_QUAL_CONST; - /* Argument #1 */ - ParseArg (&Arg1, Arg1Type); + ParseArg (&Arg1, Arg1Type, Expr); g_push (Arg1.Flags, Arg1.Expr.IVal); GetCodePos (&Arg1.End); ParamSize += SizeOf (Arg1Type); @@ -961,153 +1006,168 @@ static void StdFunc_strcpy (FuncDesc* F attribute ((unused)), ExprDesc* Expr) ** also ignored for the calculation of the parameter size, since it is ** not passed via the stack. */ - ParseArg (&Arg2, Arg2Type); + ParseArg (&Arg2, Arg2Type, Expr); if (Arg2.Flags & CF_CONST) { LoadExpr (CF_NONE, &Arg2.Expr); } + /* We still need to append deferred inc/dec before calling into the function */ + DoDeferred (SQP_KEEP_EAX, &Arg2.Expr); + /* Emit the actual function call. This will also cleanup the stack. */ g_call (CF_FIXARGC, Func_strcpy, ParamSize); /* Get the element count of argument 1 if it is an array */ ECount = ArrayElementCount (&Arg1); - /* We've generated the complete code for the function now and know the - ** types of all parameters. Check for situations where better code can - ** be generated. If such a situation is detected, throw away the - ** generated, and emit better code. - */ - if (((ED_IsRVal (&Arg2.Expr) && ED_IsLocConst (&Arg2.Expr)) || - (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr))) && - ((ED_IsRVal (&Arg1.Expr) && ED_IsLocConst (&Arg1.Expr)) || - (ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr))) && - (IS_Get (&InlineStdFuncs) || - (ECount != UNSPECIFIED && ECount < 256))) { + if (IS_Get (&InlineStdFuncs)) { - const char* Load; - const char* Store; - if (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr)) { - Load = "lda (%s),y"; - } else { - Load = "lda %s,y"; - } - if (ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr)) { - Store = "sta (%s),y"; - } else { - Store = "sta %s,y"; - } - - /* Drop the generated code */ - RemoveCode (&Arg1.Expr.Start); - - /* We need labels */ - L1 = GetLocalLabel (); - - /* Generate strcpy code */ - AddCodeLine ("ldy #$FF"); - g_defcodelabel (L1); - AddCodeLine ("iny"); - AddCodeLine (Load, ED_GetLabelName (&Arg2.Expr, 0)); - AddCodeLine (Store, ED_GetLabelName (&Arg1.Expr, 0)); - AddCodeLine ("bne %s", LocalLabelName (L1)); - - /* strcpy returns argument #1 */ - *Expr = Arg1.Expr; - - } else if (ED_IsRVal (&Arg2.Expr) && ED_IsLocStack (&Arg2.Expr) && - StackPtr >= -255 && - ED_IsRVal (&Arg1.Expr) && ED_IsLocConst (&Arg1.Expr)) { - - /* It is possible to just use one index register even if the stack - ** offset is not zero, by adjusting the offset to the constant - ** address accordingly. But we cannot do this if the data in - ** question is in the register space or at an absolute address less - ** than 256. Register space is zero page, which means that the - ** address calculation could overflow in the linker. + /* We've generated the complete code for the function now and know the + ** types of all parameters. Check for situations where better code can + ** be generated. If such a situation is detected, throw away the + ** generated, and emit better code. */ - int AllowOneIndex = !ED_IsLocRegister (&Arg1.Expr) && - !(ED_IsLocAbs (&Arg1.Expr) && Arg1.Expr.IVal < 256); + if (((ED_IsRVal (&Arg2.Expr) && ED_IsLocConst (&Arg2.Expr)) || + (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr))) && + ((ED_IsRVal (&Arg1.Expr) && ED_IsLocConst (&Arg1.Expr)) || + (ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr))) && + (IS_Get (&EagerlyInlineFuncs) || + (ECount != UNSPECIFIED && ECount < 256))) { - /* Calculate the real stack offset */ - int Offs = ED_GetStackOffs (&Arg2.Expr, 0); + const char* Load; + const char* Store; + if (ED_IsLVal (&Arg2.Expr) && ED_IsLocRegister (&Arg2.Expr)) { + Load = "lda (%s),y"; + } else { + Load = "lda %s,y"; + } + if (ED_IsLVal (&Arg1.Expr) && ED_IsLocRegister (&Arg1.Expr)) { + Store = "sta (%s),y"; + } else { + Store = "sta %s,y"; + } - /* Drop the generated code */ - RemoveCode (&Arg1.Expr.Start); + /* Drop the generated code */ + RemoveCode (&Arg1.Expr.Start); - /* We need labels */ - L1 = GetLocalLabel (); + /* We need labels */ + L1 = GetLocalLabel (); - /* Generate strcpy code */ - AddCodeLine ("ldy #$%02X", (unsigned char) (Offs - 1)); - if (Offs == 0 || AllowOneIndex) { + /* Generate strcpy code */ + AddCodeLine ("ldy #$FF"); g_defcodelabel (L1); AddCodeLine ("iny"); - AddCodeLine ("lda (sp),y"); - AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, -Offs)); - } else { - AddCodeLine ("ldx #$FF"); - g_defcodelabel (L1); - AddCodeLine ("iny"); - AddCodeLine ("inx"); - AddCodeLine ("lda (sp),y"); - AddCodeLine ("sta %s,x", ED_GetLabelName (&Arg1.Expr, 0)); + AddCodeLine (Load, ED_GetLabelName (&Arg2.Expr, 0)); + AddCodeLine (Store, ED_GetLabelName (&Arg1.Expr, 0)); + AddCodeLine ("bne %s", LocalLabelName (L1)); + + /* strcpy returns argument #1 */ + *Expr = Arg1.Expr; + + /* Bail out, no need for further processing */ + goto ExitPoint; } - AddCodeLine ("bne %s", LocalLabelName (L1)); - /* strcpy returns argument #1 */ - *Expr = Arg1.Expr; + if (ED_IsRVal (&Arg2.Expr) && ED_IsLocStack (&Arg2.Expr) && + StackPtr >= -255 && + ED_IsRVal (&Arg1.Expr) && ED_IsLocConst (&Arg1.Expr)) { - } else if (ED_IsRVal (&Arg2.Expr) && ED_IsLocConst (&Arg2.Expr) && - ED_IsRVal (&Arg1.Expr) && ED_IsLocStack (&Arg1.Expr) && - StackPtr >= -255) { + /* It is possible to just use one index register even if the stack + ** offset is not zero, by adjusting the offset to the constant + ** address accordingly. But we cannot do this if the data in + ** question is in the register space or at an absolute address less + ** than 256. Register space is zero page, which means that the + ** address calculation could overflow in the linker. + */ + int AllowOneIndex = !ED_IsLocRegister (&Arg1.Expr) && + !(ED_IsLocNone (&Arg1.Expr) && Arg1.Expr.IVal < 256); - /* It is possible to just use one index register even if the stack - ** offset is not zero, by adjusting the offset to the constant - ** address accordingly. But we cannot do this if the data in - ** question is in the register space or at an absolute address less - ** than 256. Register space is zero page, which means that the - ** address calculation could overflow in the linker. - */ - int AllowOneIndex = !ED_IsLocRegister (&Arg2.Expr) && - !(ED_IsLocAbs (&Arg2.Expr) && Arg2.Expr.IVal < 256); + /* Calculate the real stack offset */ + int Offs = ED_GetStackOffs (&Arg2.Expr, 0); - /* Calculate the real stack offset */ - int Offs = ED_GetStackOffs (&Arg1.Expr, 0); + /* Drop the generated code */ + RemoveCode (&Arg1.Expr.Start); - /* Drop the generated code */ - RemoveCode (&Arg1.Expr.Start); + /* We need labels */ + L1 = GetLocalLabel (); - /* We need labels */ - L1 = GetLocalLabel (); + /* Generate strcpy code */ + AddCodeLine ("ldy #$%02X", (unsigned char) (Offs - 1)); + if (Offs == 0 || AllowOneIndex) { + g_defcodelabel (L1); + AddCodeLine ("iny"); + AddCodeLine ("lda (sp),y"); + AddCodeLine ("sta %s,y", ED_GetLabelName (&Arg1.Expr, -Offs)); + } else { + AddCodeLine ("ldx #$FF"); + g_defcodelabel (L1); + AddCodeLine ("iny"); + AddCodeLine ("inx"); + AddCodeLine ("lda (sp),y"); + AddCodeLine ("sta %s,x", ED_GetLabelName (&Arg1.Expr, 0)); + } + AddCodeLine ("bne %s", LocalLabelName (L1)); - /* Generate strcpy code */ - AddCodeLine ("ldy #$%02X", (unsigned char) (Offs - 1)); - if (Offs == 0 || AllowOneIndex) { - g_defcodelabel (L1); - AddCodeLine ("iny"); - AddCodeLine ("lda %s,y", ED_GetLabelName (&Arg2.Expr, -Offs)); - AddCodeLine ("sta (sp),y"); - } else { - AddCodeLine ("ldx #$FF"); - g_defcodelabel (L1); - AddCodeLine ("iny"); - AddCodeLine ("inx"); - AddCodeLine ("lda %s,x", ED_GetLabelName (&Arg2.Expr, 0)); - AddCodeLine ("sta (sp),y"); + /* strcpy returns argument #1 */ + *Expr = Arg1.Expr; + + /* Bail out, no need for further processing */ + goto ExitPoint; } - AddCodeLine ("bne %s", LocalLabelName (L1)); - /* strcpy returns argument #1 */ - *Expr = Arg1.Expr; + if (ED_IsRVal (&Arg2.Expr) && ED_IsLocConst (&Arg2.Expr) && + ED_IsRVal (&Arg1.Expr) && ED_IsLocStack (&Arg1.Expr) && + StackPtr >= -255) { - } else { + /* It is possible to just use one index register even if the stack + ** offset is not zero, by adjusting the offset to the constant + ** address accordingly. But we cannot do this if the data in + ** question is in the register space or at an absolute address less + ** than 256. Register space is zero page, which means that the + ** address calculation could overflow in the linker. + */ + int AllowOneIndex = !ED_IsLocRegister (&Arg2.Expr) && + !(ED_IsLocNone (&Arg2.Expr) && Arg2.Expr.IVal < 256); - /* The function result is an rvalue in the primary register */ - ED_MakeRValExpr (Expr); - Expr->Type = GetFuncReturn (Expr->Type); + /* Calculate the real stack offset */ + int Offs = ED_GetStackOffs (&Arg1.Expr, 0); + /* Drop the generated code */ + RemoveCode (&Arg1.Expr.Start); + + /* We need labels */ + L1 = GetLocalLabel (); + + /* Generate strcpy code */ + AddCodeLine ("ldy #$%02X", (unsigned char) (Offs - 1)); + if (Offs == 0 || AllowOneIndex) { + g_defcodelabel (L1); + AddCodeLine ("iny"); + AddCodeLine ("lda %s,y", ED_GetLabelName (&Arg2.Expr, -Offs)); + AddCodeLine ("sta (sp),y"); + } else { + AddCodeLine ("ldx #$FF"); + g_defcodelabel (L1); + AddCodeLine ("iny"); + AddCodeLine ("inx"); + AddCodeLine ("lda %s,x", ED_GetLabelName (&Arg2.Expr, 0)); + AddCodeLine ("sta (sp),y"); + } + AddCodeLine ("bne %s", LocalLabelName (L1)); + + /* strcpy returns argument #1 */ + *Expr = Arg1.Expr; + + /* Bail out, no need for further processing */ + goto ExitPoint; + } } + /* The function result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); + Expr->Type = GetFuncReturn (Expr->Type); + +ExitPoint: /* We expect the closing brace */ ConsumeRParen (); } @@ -1123,7 +1183,7 @@ static void StdFunc_strcpy (FuncDesc* F attribute ((unused)), ExprDesc* Expr) static void StdFunc_strlen (FuncDesc* F attribute ((unused)), ExprDesc* Expr) /* Handle the strlen function */ { - static Type ArgType[] = { TYPE(T_PTR), TYPE(T_CHAR|T_QUAL_CONST), TYPE(T_END) }; + static const Type* ArgType = type_c_char_p; ExprDesc Arg; int IsArray; int IsPtr; @@ -1131,14 +1191,15 @@ static void StdFunc_strlen (FuncDesc* F attribute ((unused)), ExprDesc* Expr) long ECount; unsigned L; - - - /* Setup the argument type string */ - ArgType[1].C = GetDefaultChar () | T_QUAL_CONST; + ED_Init (&Arg); + Arg.Flags |= Expr->Flags & E_MASK_KEEP_SUBEXPR; /* Evaluate the parameter */ hie1 (&Arg); + /* We still need to append deferred inc/dec before calling into the function */ + DoDeferred (SQP_KEEP_EAX, &Arg); + /* Check if the argument is an array. If so, remember the element count. ** Otherwise set the element count to undefined. */ @@ -1164,127 +1225,152 @@ static void StdFunc_strlen (FuncDesc* F attribute ((unused)), ExprDesc* Expr) /* Do type conversion */ TypeConversion (&Arg, ArgType); - /* If the expression is a literal, and if string literals are read - ** only, we can calculate the length of the string and remove it - ** from the literal pool. Otherwise we have to calculate the length - ** at runtime. - */ - if (ED_IsLocLiteral (&Arg) && IS_Get (&WritableStrings) == 0) { + if (IS_Get (&Optimize)) { - /* Constant string literal */ - ED_MakeConstAbs (Expr, GetLiteralSize (Arg.LVal) - 1, type_size_t); + /* If the expression is a literal, and if string literals are read + ** only, we can calculate the length of the string and remove it + ** from the literal pool. Otherwise we have to calculate the length + ** at runtime. + */ + if (ED_IsLocLiteral (&Arg) && IS_Get (&WritableStrings) == 0) { - /* We don't need the literal any longer */ - ReleaseLiteral (Arg.LVal); + /* Constant string literal */ + ED_MakeConstAbs (Expr, GetLiteralSize (Arg.V.LVal) - 1, type_size_t); - /* We will inline strlen for arrays with constant addresses, if either the - ** inlining was forced on the command line, or the array is smaller than - ** 256, so the inlining is considered safe. - */ - } else if (ED_IsLocConst (&Arg) && IsArray && - (IS_Get (&InlineStdFuncs) || IsByteIndex)) { - - /* Generate the strlen code */ - L = GetLocalLabel (); - AddCodeLine ("ldy #$FF"); - g_defcodelabel (L); - AddCodeLine ("iny"); - AddCodeLine ("lda %s,y", ED_GetLabelName (&Arg, 0)); - AddCodeLine ("bne %s", LocalLabelName (L)); - AddCodeLine ("tax"); - AddCodeLine ("tya"); - - /* The function result is an rvalue in the primary register */ - ED_MakeRValExpr (Expr); - Expr->Type = type_size_t; - - /* We will inline strlen for arrays on the stack, if the array is - ** completely within the reach of a byte sized index register. - */ - } else if (ED_IsLocStack (&Arg) && IsArray && IsByteIndex && - (Arg.IVal - StackPtr) + ECount < 256) { - - /* Calculate the true stack offset */ - int Offs = ED_GetStackOffs (&Arg, 0); - - /* Generate the strlen code */ - L = GetLocalLabel (); - AddCodeLine ("ldx #$FF"); - AddCodeLine ("ldy #$%02X", (unsigned char) (Offs-1)); - g_defcodelabel (L); - AddCodeLine ("inx"); - AddCodeLine ("iny"); - AddCodeLine ("lda (sp),y"); - AddCodeLine ("bne %s", LocalLabelName (L)); - AddCodeLine ("txa"); - AddCodeLine ("ldx #$00"); - - /* The function result is an rvalue in the primary register */ - ED_MakeRValExpr (Expr); - Expr->Type = type_size_t; - - /* strlen for a string that is pointed to by a register variable will only - ** get inlined if requested on the command line, since we cannot know how - ** big the buffer actually is, so inlining is not always safe. - */ - } else if (ED_IsLocRegister (&Arg) && ED_IsLVal (&Arg) && IsPtr && - IS_Get (&InlineStdFuncs)) { - - /* Generate the strlen code */ - L = GetLocalLabel (); - AddCodeLine ("ldy #$FF"); - g_defcodelabel (L); - AddCodeLine ("iny"); - AddCodeLine ("lda (%s),y", ED_GetLabelName (&Arg, 0)); - AddCodeLine ("bne %s", LocalLabelName (L)); - AddCodeLine ("tax"); - AddCodeLine ("tya"); - - /* The function result is an rvalue in the primary register */ - ED_MakeRValExpr (Expr); - Expr->Type = type_size_t; - - /* Last check: We will inline a generic strlen routine if inlining was - ** requested on the command line, and the code size factor is more than - ** 400 (code is 13 bytes vs. 3 for a jsr call). - */ - } else if (IS_Get (&CodeSizeFactor) > 400 && IS_Get (&InlineStdFuncs)) { - - /* Load the expression into the primary */ - LoadExpr (CF_NONE, &Arg); - - /* Inline the function */ - L = GetLocalLabel (); - AddCodeLine ("sta ptr1"); - AddCodeLine ("stx ptr1+1"); - AddCodeLine ("ldy #$FF"); - g_defcodelabel (L); - AddCodeLine ("iny"); - AddCodeLine ("lda (ptr1),y"); - AddCodeLine ("bne %s", LocalLabelName (L)); - AddCodeLine ("tax"); - AddCodeLine ("tya"); - - /* The function result is an rvalue in the primary register */ - ED_MakeRValExpr (Expr); - Expr->Type = type_size_t; - - } else { - - /* Load the expression into the primary */ - LoadExpr (CF_NONE, &Arg); - - /* Call the strlen function */ - AddCodeLine ("jsr _%s", Func_strlen); - - /* The function result is an rvalue in the primary register */ - ED_MakeRValExpr (Expr); - Expr->Type = type_size_t; + /* We don't need the literal any longer */ + ReleaseLiteral (Arg.V.LVal); + /* Bail out, no need for further improvements */ + goto ExitPoint; + } } + if (IS_Get (&InlineStdFuncs)) { + + /* We will inline strlen for arrays with constant addresses, if either + ** requested on the command line, or the array is smaller than 256, + ** so the inlining is considered safe. + */ + if (ED_IsLocConst (&Arg) && IsArray && + (IS_Get (&EagerlyInlineFuncs) || IsByteIndex)) { + + /* Generate the strlen code */ + L = GetLocalLabel (); + AddCodeLine ("ldy #$FF"); + g_defcodelabel (L); + AddCodeLine ("iny"); + AddCodeLine ("ldx %s,y", ED_GetLabelName (&Arg, 0)); + AddCodeLine ("bne %s", LocalLabelName (L)); + AddCodeLine ("tya"); + + /* The function result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); + Expr->Type = type_size_t; + + /* Bail out, no need for further processing */ + goto ExitPoint; + } + + /* We will inline strlen for arrays on the stack, if the array is + ** completely within the reach of a byte sized index register. + */ + if (ED_IsLocStack (&Arg) && IsArray && IsByteIndex && + (Arg.IVal - StackPtr) + ECount < 256) { + + /* Calculate the true stack offset */ + int Offs = ED_GetStackOffs (&Arg, 0); + + /* Generate the strlen code */ + L = GetLocalLabel (); + AddCodeLine ("ldx #$FF"); + AddCodeLine ("ldy #$%02X", (unsigned char) (Offs-1)); + g_defcodelabel (L); + AddCodeLine ("inx"); + AddCodeLine ("iny"); + AddCodeLine ("lda (sp),y"); + AddCodeLine ("bne %s", LocalLabelName (L)); + AddCodeLine ("txa"); + AddCodeLine ("ldx #$00"); + + /* The function result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); + Expr->Type = type_size_t; + + /* Bail out, no need for further processing */ + goto ExitPoint; + } + + /* strlen for a string that is pointed to by a register variable will only + ** get inlined if requested on the command line, since we cannot know how + ** big the buffer actually is, so inlining is not always safe. + */ + if (ED_IsLocRegister (&Arg) && ED_IsLVal (&Arg) && IsPtr && + IS_Get (&EagerlyInlineFuncs)) { + + /* Generate the strlen code */ + L = GetLocalLabel (); + AddCodeLine ("ldy #$FF"); + g_defcodelabel (L); + AddCodeLine ("iny"); + AddCodeLine ("lda (%s),y", ED_GetLabelName (&Arg, 0)); + AddCodeLine ("bne %s", LocalLabelName (L)); + AddCodeLine ("tax"); + AddCodeLine ("tya"); + + /* The function result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); + Expr->Type = type_size_t; + + /* Bail out, no need for further processing */ + goto ExitPoint; + } + + /* Last check: We will inline a generic strlen routine if inlining was + ** requested on the command line, and the code size factor is more than + ** 400 (code is 13 bytes vs. 3 for a jsr call). + */ + if (IS_Get (&CodeSizeFactor) > 400 && IS_Get (&EagerlyInlineFuncs)) { + + /* Load the expression into the primary */ + LoadExpr (CF_NONE, &Arg); + + /* Inline the function */ + L = GetLocalLabel (); + AddCodeLine ("sta ptr1"); + AddCodeLine ("stx ptr1+1"); + AddCodeLine ("ldy #$FF"); + g_defcodelabel (L); + AddCodeLine ("iny"); + AddCodeLine ("lda (ptr1),y"); + AddCodeLine ("bne %s", LocalLabelName (L)); + AddCodeLine ("tax"); + AddCodeLine ("tya"); + + /* The function result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); + Expr->Type = type_size_t; + + /* Bail out, no need for further processing */ + goto ExitPoint; + } + } + + /* Load the expression into the primary */ + LoadExpr (CF_NONE, &Arg); + + /* Call the strlen function */ + AddCodeLine ("jsr _%s", Func_strlen); + + /* The function result is an rvalue in the primary register */ + ED_FinalizeRValLoad (Expr); + Expr->Type = type_size_t; + +ExitPoint: /* We expect the closing brace */ ConsumeRParen (); + + /* Propagate from subexpressions */ + Expr->Flags |= Arg.Flags & E_MASK_VIRAL; } @@ -1325,4 +1411,7 @@ void HandleStdFunc (int Index, FuncDesc* F, ExprDesc* lval) /* Call the handler function */ D->Handler (F, lval); + + /* We assume all function calls had side effects */ + lval->Flags |= E_SIDE_EFFECTS; } diff --git a/src/cc65/stdfunc.h b/src/cc65/stdfunc.h index 7fc3abd3e..e944d70b9 100644 --- a/src/cc65/stdfunc.h +++ b/src/cc65/stdfunc.h @@ -50,6 +50,12 @@ +void AddCmpCodeIfSizeNot256 (const char* Code, long Size); +/* Add a line of Assembly code that compares an index register +** only if it isn't comparing to #<256. (If the next line +** is "bne", then this will avoid a redundant line.) +*/ + int FindStdFunc (const char* Name); /* Determine if the given function is a known standard function that may be ** called in a special way. If so, return the index, otherwise return -1. @@ -61,5 +67,4 @@ void HandleStdFunc (int Index, struct FuncDesc* F, ExprDesc* lval); /* End of stdfunc.h */ - #endif diff --git a/src/cc65/stmt.c b/src/cc65/stmt.c index 84b516dc3..7355e88a8 100644 --- a/src/cc65/stmt.c +++ b/src/cc65/stmt.c @@ -115,7 +115,7 @@ static void CheckSemi (int* PendingToken) { int HaveToken = (CurTok.Tok == TOK_SEMI); if (!HaveToken) { - Error ("`;' expected"); + Error ("';' expected"); /* Try to be smart about errors */ if (CurTok.Tok == TOK_COLON || CurTok.Tok == TOK_COMMA) { HaveToken = 1; @@ -163,7 +163,7 @@ static int IfStatement (void) TestResult = TestInParens (Label1, 0); /* Parse the if body */ - GotBreak = Statement (0); + GotBreak = AnyStatement (0); /* Else clause present? */ if (CurTok.Tok != TOK_ELSE) { @@ -187,7 +187,7 @@ static int IfStatement (void) /* If the if expression was always true, the code in the else branch ** is never executed. Output a warning if this is the case. */ - if (TestResult == TESTEXPR_TRUE) { + if (TestResult == TESTEXPR_TRUE && IS_Get (&WarnUnreachableCode)) { Warning ("Unreachable code"); } @@ -195,7 +195,7 @@ static int IfStatement (void) g_defcodelabel (Label1); /* Total break only if both branches had a break. */ - GotBreak &= Statement (0); + GotBreak &= AnyStatement (0); /* Generate the label for the else clause */ g_defcodelabel (Label2); @@ -225,13 +225,13 @@ static void DoStatement (void) g_defcodelabel (LoopLabel); /* Parse the loop body */ - Statement (0); + AnyStatement (0); /* Output the label for a continue */ g_defcodelabel (ContinueLabel); /* Parse the end condition */ - Consume (TOK_WHILE, "`while' expected"); + Consume (TOK_WHILE, "'while' expected"); TestInParens (LoopLabel, 1); ConsumeSemi (); @@ -273,9 +273,6 @@ static void WhileStatement (void) /* Remember the current position */ GetCodePos (&CondCodeStart); - /* Emit the code position label */ - g_defcodelabel (CondLabel); - /* Test the loop condition */ TestInParens (LoopLabel, 1); @@ -286,7 +283,10 @@ static void WhileStatement (void) g_defcodelabel (LoopLabel); /* Loop body */ - Statement (&PendingToken); + AnyStatement (&PendingToken); + + /* Emit the while condition label */ + g_defcodelabel (CondLabel); /* Move the test code here */ GetCodePos (&Here); @@ -309,30 +309,56 @@ static void WhileStatement (void) static void ReturnStatement (void) /* Handle the 'return' statement */ { - ExprDesc Expr; + ExprDesc Expr; + const Type* ReturnType; + ED_Init (&Expr); NextToken (); if (CurTok.Tok != TOK_SEMI) { /* Evaluate the return expression */ hie0 (&Expr); - /* If we return something in a void function, print an error and - ** ignore the value. Otherwise convert the value to the type of the - ** return. + /* If we return something in a function with void or incomplete return + ** type, print an error and ignore the value. Otherwise convert the + ** value to the type of the return. */ if (F_HasVoidReturn (CurrentFunc)) { - Error ("Returning a value in function with return type void"); + Error ("Returning a value in function with return type 'void'"); } else { - /* Convert the return value to the type of the function result */ - TypeConversion (&Expr, F_GetReturnType (CurrentFunc)); - /* Load the value into the primary */ - LoadExpr (CF_NONE, &Expr); + /* Check the return type first */ + ReturnType = F_GetReturnType (CurrentFunc); + if (IsIncompleteESUType (ReturnType)) { + /* Avoid excess errors */ + if (ErrorCount == 0) { + Error ("Returning a value in function with incomplete return type"); + } + } else { + /* Convert the return value to the type of the function result */ + TypeConversion (&Expr, ReturnType); + + /* Load the value into the primary */ + if (IsClassStruct (Expr.Type)) { + /* Handle struct/union specially */ + ReturnType = GetStructReplacementType (Expr.Type); + if (ReturnType == Expr.Type) { + Error ("Returning '%s' of this size by value is not supported", GetFullTypeName (Expr.Type)); + } + LoadExpr (TypeOf (ReturnType), &Expr); + + } else { + /* Load the value into the primary */ + LoadExpr (CF_NONE, &Expr); + } + } + + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_EAX, &Expr); } } else if (!F_HasVoidReturn (CurrentFunc) && !F_HasOldStyleIntRet (CurrentFunc)) { - Error ("Function `%s' must return a value", F_GetFuncName (CurrentFunc)); + Error ("Function '%s' must return a value", F_GetFuncName (CurrentFunc)); } /* Mark the function as having a return statement */ @@ -361,7 +387,7 @@ static void BreakStatement (void) /* Check if we are inside a loop */ if (L == 0) { /* Error: No current loop */ - Error ("`break' statement not within loop or switch"); + Error ("'break' statement not within loop or switch"); return; } @@ -396,7 +422,7 @@ static void ContinueStatement (void) /* Did we find it? */ if (L == 0) { - Error ("`continue' statement not within a loop"); + Error ("'continue' statement not within a loop"); return; } @@ -412,8 +438,6 @@ static void ContinueStatement (void) static void ForStatement (void) /* Handle a 'for' statement */ { - ExprDesc lval1; - ExprDesc lval3; int HaveIncExpr; CodeMark IncExprStart; CodeMark IncExprEnd; @@ -438,6 +462,10 @@ static void ForStatement (void) /* Parse the initializer expression */ if (CurTok.Tok != TOK_SEMI) { + /* The value of the expression is unused */ + ExprDesc lval1; + ED_Init (&lval1); + lval1.Flags = E_NEED_NONE; Expression0 (&lval1); } ConsumeSemi (); @@ -463,6 +491,10 @@ static void ForStatement (void) /* Parse the increment expression */ HaveIncExpr = (CurTok.Tok != TOK_RPAREN); if (HaveIncExpr) { + /* The value of the expression is unused */ + ExprDesc lval3; + ED_Init (&lval3); + lval3.Flags = E_NEED_NONE; Expression0 (&lval3); } @@ -477,7 +509,7 @@ static void ForStatement (void) /* Loop body */ g_defcodelabel (BodyLabel); - Statement (&PendingToken); + AnyStatement (&PendingToken); /* If we had an increment expression, move the code to the bottom of ** the loop. In this case we don't need to jump there at the end of @@ -504,15 +536,19 @@ static void ForStatement (void) -static int CompoundStatement (void) +static int CompoundStatement (int* PendingToken) /* Compound statement. Allow any number of statements inside braces. The ** function returns true if the last statement was a break or return. */ { - int GotBreak; + int GotBreak = 0; /* Remember the stack at block entry */ int OldStack = StackPtr; + unsigned OldBlockStackSize = CollCount (&CurrentFunc->LocalsBlockStack); + + /* Skip '{' */ + NextToken (); /* Enter a new lexical level */ EnterBlockLevel (); @@ -521,19 +557,26 @@ static int CompoundStatement (void) DeclareLocals (); /* Now process statements in this block */ - GotBreak = 0; while (CurTok.Tok != TOK_RCURLY) { if (CurTok.Tok != TOK_CEOF) { - GotBreak = Statement (0); + GotBreak = AnyStatement (0); } else { break; } } - /* Clean up the stack. */ + /* Clean up the stack if the codeflow may reach the end */ if (!GotBreak) { g_space (StackPtr - OldStack); } + + /* If the segment had autoinited variables, let's pop it of a stack + ** of such blocks. + */ + if (OldBlockStackSize != CollCount (&CurrentFunc->LocalsBlockStack)) { + CollPop (&CurrentFunc->LocalsBlockStack); + } + StackPtr = OldStack; /* Emit references to imports/exports for this block */ @@ -542,12 +585,86 @@ static int CompoundStatement (void) /* Leave the lexical level */ LeaveBlockLevel (); + /* Skip '}' */ + CheckTok (TOK_RCURLY, "'}' expected", PendingToken); + return GotBreak; } -int Statement (int* PendingToken) +static void Statement (int* PendingToken) +/* Single-line statement */ +{ + ExprDesc Expr; + unsigned PrevErrorCount; + CodeMark Start, End; + + /* Remember the current error count and code position */ + PrevErrorCount = ErrorCount; + GetCodePos (&Start); + + /* Actual statement */ + ED_Init (&Expr); + Expr.Flags |= E_NEED_NONE; + Expression0 (&Expr); + + /* If the statement has no observable effect and isn't cast to type + ** void, emit a warning and remove useless code if any. + */ + GetCodePos (&End); + if (CodeRangeIsEmpty (&Start, &End) || + (Expr.Flags & E_SIDE_EFFECTS) == 0) { + + if (!ED_MayHaveNoEffect (&Expr) && + IS_Get (&WarnNoEffect) && + PrevErrorCount == ErrorCount) { + Warning ("Statement has no effect"); + } + + /* Remove code with no effect */ + RemoveCode (&Start); + } + + CheckSemi (PendingToken); +} + + + +static int ParseAnyLabels (void) +/* Return -1 if there are any labels with a statement */ +{ + unsigned PrevErrorCount = ErrorCount; + int HasLabels = 0; + for (;;) { + if (CurTok.Tok == TOK_IDENT && NextTok.Tok == TOK_COLON) { + /* C 'goto' label */ + DoLabel (); + } else if (CurTok.Tok == TOK_CASE) { + /* C 'case' label */ + CaseLabel (); + } else if (CurTok.Tok == TOK_DEFAULT) { + /* C 'default' label */ + DefaultLabel (); + } else { + /* No labels */ + break; + } + HasLabels = 1; + } + + if (HasLabels) { + if (PrevErrorCount != ErrorCount || CheckLabelWithoutStatement ()) { + return -1; + } + } + + return 0; +} + + + +int AnyStatement (int* PendingToken) /* Statement parser. Returns 1 if the statement does a return/break, returns ** 0 otherwise. If the PendingToken pointer is not NULL, the function will ** not skip the terminating token of the statement (closing brace or @@ -557,37 +674,27 @@ int Statement (int* PendingToken) ** NULL, the function will skip the token. */ { - ExprDesc Expr; - int GotBreak; - CodeMark Start, End; - /* Assume no pending token */ if (PendingToken) { *PendingToken = 0; } - /* Check for a label. A label is always part of a statement, it does not + /* Handle any labels. A label is always part of a statement, it does not ** replace one. */ - while (CurTok.Tok == TOK_IDENT && NextTok.Tok == TOK_COLON) { - /* Handle the label */ - DoLabel (); - if (CheckLabelWithoutStatement ()) { - return 0; - } + if (ParseAnyLabels ()) { + return 0; } switch (CurTok.Tok) { - case TOK_LCURLY: - NextToken (); - GotBreak = CompoundStatement (); - CheckTok (TOK_RCURLY, "`{' expected", PendingToken); - return GotBreak; - case TOK_IF: return IfStatement (); + case TOK_SWITCH: + SwitchStatement (); + break; + case TOK_WHILE: WhileStatement (); break; @@ -596,10 +703,15 @@ int Statement (int* PendingToken) DoStatement (); break; - case TOK_SWITCH: - SwitchStatement (); + case TOK_FOR: + ForStatement (); break; + case TOK_GOTO: + GotoStatement (); + CheckSemi (PendingToken); + return 1; + case TOK_RETURN: ReturnStatement (); CheckSemi (PendingToken); @@ -615,55 +727,22 @@ int Statement (int* PendingToken) CheckSemi (PendingToken); return 1; - case TOK_FOR: - ForStatement (); - break; - - case TOK_GOTO: - GotoStatement (); - CheckSemi (PendingToken); - return 1; - - case TOK_SEMI: - /* Ignore it */ - CheckSemi (PendingToken); - break; - case TOK_PRAGMA: DoPragma (); break; - case TOK_CASE: - CaseLabel (); - CheckLabelWithoutStatement (); + case TOK_SEMI: + /* Empty statement. Ignore it */ + CheckSemi (PendingToken); break; - case TOK_DEFAULT: - DefaultLabel (); - CheckLabelWithoutStatement (); - break; + case TOK_LCURLY: + return CompoundStatement (PendingToken); default: - /* Remember the current code position */ - GetCodePos (&Start); - /* Actual statement */ - ExprWithCheck (hie0, &Expr); - /* Load the result only if it is an lvalue and the type is - ** marked as volatile. Otherwise the load is useless. - */ - if (ED_IsLVal (&Expr) && IsQualVolatile (Expr.Type)) { - LoadExpr (CF_NONE, &Expr); - } - /* If the statement didn't generate code, and is not of type - ** void, emit a warning. - */ - GetCodePos (&End); - if (CodeRangeIsEmpty (&Start, &End) && - !IsTypeVoid (Expr.Type) && - IS_Get (&WarnNoEffect)) { - Warning ("Statement has no effect"); - } - CheckSemi (PendingToken); + /* Simple statement */ + Statement (PendingToken); + break; } return 0; } diff --git a/src/cc65/stmt.h b/src/cc65/stmt.h index 04ef728a3..8cff99d92 100644 --- a/src/cc65/stmt.h +++ b/src/cc65/stmt.h @@ -44,7 +44,7 @@ -int Statement (int* PendingToken); +int AnyStatement (int* PendingToken); /* Statement parser. Returns 1 if the statement does a return/break, returns ** 0 otherwise. If the PendingToken pointer is not NULL, the function will ** not skip the terminating token of the statement (closing brace or diff --git a/src/cc65/swstmt.c b/src/cc65/swstmt.c index 0aefc051c..00555ffc3 100644 --- a/src/cc65/swstmt.c +++ b/src/cc65/swstmt.c @@ -97,7 +97,6 @@ void SwitchStatement (void) SwitchCtrl* OldSwitch; /* Pointer to old switch control data */ SwitchCtrl SwitchData; /* New switch data */ - /* Eat the "switch" token */ NextToken (); @@ -105,6 +104,8 @@ void SwitchStatement (void) ** integer type. */ ConsumeLParen (); + + ED_Init (&SwitchExpr); Expression0 (&SwitchExpr); if (!IsClassInt (SwitchExpr.Type)) { Error ("Switch quantity is not an integer"); @@ -132,7 +133,7 @@ void SwitchStatement (void) /* Setup the control structure, save the old and activate the new one */ SwitchData.Nodes = NewCollection (); - SwitchData.ExprType = UnqualifiedType (SwitchExpr.Type[0].C); + SwitchData.ExprType = GetUnderlyingTypeCode (&SwitchExpr.Type[0]); SwitchData.Depth = SizeOf (SwitchExpr.Type); SwitchData.DefaultLabel = 0; OldSwitch = Switch; @@ -144,15 +145,10 @@ void SwitchStatement (void) /* Create a loop so we may use break. */ AddLoop (ExitLabel, 0); - /* Make sure a curly brace follows */ - if (CurTok.Tok != TOK_LCURLY) { - Error ("`{' expected"); - } - - /* Parse the following statement, which will actually be a compound - ** statement because of the curly brace at the current input position + /* Parse the following statement, which may actually be a compound + ** statement if there is a curly brace at the current input position */ - HaveBreak = Statement (&RCurlyBrace); + HaveBreak = AnyStatement (&RCurlyBrace); /* Check if we had any labels */ if (CollCount (SwitchData.Nodes) == 0 && SwitchData.DefaultLabel == 0) { @@ -199,7 +195,7 @@ void SwitchStatement (void) /* Free the case value tree */ FreeCaseNodeColl (SwitchData.Nodes); - /* If the case statement was (correctly) terminated by a closing curly + /* If the case statement was terminated by a closing curly ** brace, skip it now. */ if (RCurlyBrace) { @@ -210,18 +206,17 @@ void SwitchStatement (void) void CaseLabel (void) -/* Handle a case sabel */ +/* Handle a case label */ { ExprDesc CaseExpr; /* Case label expression */ long Val; /* Case label value */ unsigned CodeLabel; /* Code label for this case */ - /* Skip the "case" token */ NextToken (); /* Read the selector expression */ - ConstAbsIntExpr (hie1, &CaseExpr); + CaseExpr = NoCodeConstAbsIntExpr (hie1); Val = CaseExpr.IVal; /* Now check if we're inside a switch statement */ @@ -308,7 +303,7 @@ void DefaultLabel (void) } else { /* case keyword outside a switch statement */ - Error ("`default' label not within a switch statement"); + Error ("'default' label not within a switch statement"); } diff --git a/src/cc65/symentry.c b/src/cc65/symentry.c index 980ee27f2..cc790c931 100644 --- a/src/cc65/symentry.c +++ b/src/cc65/symentry.c @@ -71,6 +71,7 @@ SymEntry* NewSymEntry (const char* Name, unsigned Flags) E->Type = 0; E->Attr = 0; E->AsmName = 0; + E->V.BssName = 0; memcpy (E->Name, Name, Len+1); /* Return the new entry */ @@ -82,8 +83,19 @@ SymEntry* NewSymEntry (const char* Name, unsigned Flags) void FreeSymEntry (SymEntry* E) /* Free a symbol entry */ { + unsigned i; + TypeFree (E->Type); xfree (E->AsmName); + + if (E->Flags & SC_LABEL) { + for (i = 0; i < CollCount (E->V.L.DefsOrRefs); i++) { + xfree (CollAt (E->V.L.DefsOrRefs, i)); + } + + DoneCollection (E->V.L.DefsOrRefs); + } + xfree (E); } @@ -92,29 +104,38 @@ void FreeSymEntry (SymEntry* E) void DumpSymEntry (FILE* F, const SymEntry* E) /* Dump the given symbol table entry to the file in readable form */ { - static const struct { + typedef const struct { const char* Name; unsigned Val; - } Flags [] = { - /* Beware: Order is important! */ + } SCFlagTable; + + static SCFlagTable ESUTypes[] = { { "SC_TYPEDEF", SC_TYPEDEF }, - { "SC_BITFIELD", SC_BITFIELD }, - { "SC_STRUCTFIELD", SC_STRUCTFIELD }, { "SC_UNION", SC_UNION }, { "SC_STRUCT", SC_STRUCT }, - { "SC_AUTO", SC_AUTO }, - { "SC_REGISTER", SC_REGISTER }, - { "SC_STATIC", SC_STATIC }, - { "SC_EXTERN", SC_EXTERN }, { "SC_ENUM", SC_ENUM }, + }; + + static SCFlagTable Types[] = { + { "SC_BITFIELD", SC_BITFIELD }, + { "SC_STRUCTFIELD", SC_STRUCTFIELD }, + { "SC_ENUMERATOR", SC_ENUMERATOR }, { "SC_CONST", SC_CONST }, { "SC_LABEL", SC_LABEL }, { "SC_PARAM", SC_PARAM }, { "SC_FUNC", SC_FUNC }, + }; + + static SCFlagTable Storages[] = { + { "SC_AUTO", SC_AUTO }, + { "SC_REGISTER", SC_REGISTER }, + { "SC_STATIC", SC_STATIC }, + { "SC_EXTERN", SC_EXTERN }, { "SC_STORAGE", SC_STORAGE }, + { "SC_ZEROPAGE", SC_ZEROPAGE }, + { "SC_DECL", SC_DECL }, { "SC_DEF", SC_DEF }, { "SC_REF", SC_REF }, - { "SC_ZEROPAGE", SC_ZEROPAGE }, }; unsigned I; @@ -131,10 +152,28 @@ void DumpSymEntry (FILE* F, const SymEntry* E) /* Print the flags */ SymFlags = E->Flags; fprintf (F, " Flags:"); - for (I = 0; I < sizeof (Flags) / sizeof (Flags[0]) && SymFlags != 0; ++I) { - if ((SymFlags & Flags[I].Val) == Flags[I].Val) { - SymFlags &= ~Flags[I].Val; - fprintf (F, " %s", Flags[I].Name); + /* Enum, struct, union and typedefs */ + if ((SymFlags & SC_ESUTYPEMASK) != 0) { + for (I = 0; I < sizeof (ESUTypes) / sizeof (ESUTypes[0]); ++I) { + if ((SymFlags & SC_ESUTYPEMASK) == ESUTypes[I].Val) { + SymFlags &= ~SC_ESUTYPEMASK; + fprintf (F, " %s", ESUTypes[I].Name); + break; + } + } + } + /* Other type flags */ + for (I = 0; I < sizeof (Types) / sizeof (Types[0]) && SymFlags != 0; ++I) { + if ((SymFlags & Types[I].Val) == Types[I].Val) { + SymFlags &= ~Types[I].Val; + fprintf (F, " %s", Types[I].Name); + } + } + /* Storage flags */ + for (I = 0; I < sizeof (Storages) / sizeof (Storages[0]) && SymFlags != 0; ++I) { + if ((SymFlags & Storages[I].Val) == Storages[I].Val) { + SymFlags &= ~Storages[I].Val; + fprintf (F, " %s", Storages[I].Name); } } if (SymFlags != 0) { @@ -239,7 +278,40 @@ void CvtRegVarToAuto (SymEntry* Sym) -void ChangeSymType (SymEntry* Entry, Type* T) +SymEntry* GetSymType (const Type* T) +/* Get the symbol entry of the enum/struct/union type +** Return 0 if it is not an enum/struct/union. +*/ +{ + if ((IsClassStruct (T) || IsTypeEnum (T))) { + return T->A.S; + } + return 0; +} + + + +const char* GetSymTypeName (const Type* T) +/* Return a name string of the type or the symbol name if it is an ESU type. +** Note: This may use a static buffer that could be overwritten by other calls. +*/ +{ + static char TypeName [IDENTSIZE + 16]; + SymEntry* Sym; + + Sym = GetSymType (T); + if (Sym == 0) { + return GetBasicTypeName (T); + } + sprintf (TypeName, "%s %s", GetBasicTypeName (T), + Sym->Name[0] != '\0' ? Sym->Name : "<unknown>"); + + return TypeName; +} + + + +void ChangeSymType (SymEntry* Entry, const Type* T) /* Change the type of the given symbol */ { TypeFree (Entry->Type); diff --git a/src/cc65/symentry.h b/src/cc65/symentry.h index 4fa84255b..bcf586510 100644 --- a/src/cc65/symentry.h +++ b/src/cc65/symentry.h @@ -58,6 +58,7 @@ struct Segments; struct LiteralPool; +struct CodeEntry; @@ -68,38 +69,59 @@ struct LiteralPool; /* Storage classes and flags */ -#define SC_AUTO 0x0001U /* Auto variable */ -#define SC_REGISTER 0x0002U /* Register variable */ -#define SC_STATIC 0x0004U /* Static */ -#define SC_EXTERN 0x0008U /* Extern linkage */ - -#define SC_ENUM 0x0030U /* An enum */ -#define SC_CONST 0x0020U /* A numeric constant with a type */ -#define SC_LABEL 0x0040U /* A goto label */ -#define SC_PARAM 0x0080U /* A function parameter */ -#define SC_FUNC 0x0100U /* A function */ +#define SC_NONE 0x0000U /* Nothing */ +#define SC_STRUCT 0x0001U /* Struct */ +#define SC_UNION 0x0002U /* Union */ +#define SC_ENUM 0x0003U /* Enum */ +#define SC_TYPEDEF 0x0004U /* Typedef */ +#define SC_ESUTYPEMASK 0x0007U /* Mask for above types */ +#define SC_ENUMERATOR 0x0008U /* An enumerator */ +#define SC_BITFIELD 0x0010U /* A bit-field inside a struct or union */ +#define SC_TYPEMASK 0x001FU /* Mask for above types */ +#define SC_FUNC 0x0020U /* A function */ +#define SC_LABEL 0x0040U /* A goto code label */ +#define SC_CONST 0x0080U /* A numeric constant with a type */ +#define SC_PARAM 0x0100U /* A function parameter */ #define SC_DEFTYPE 0x0200U /* Parameter has default type (=int, old style) */ -#define SC_STORAGE 0x0400U /* Symbol with associated storage */ -#define SC_DEFAULT 0x0800U /* Flag: default storage class was used */ +#define SC_STRUCTFIELD 0x0400U /* Struct or union field */ + +#define SC_ZEROPAGE 0x0800U /* Symbol marked as zeropage */ #define SC_DEF 0x1000U /* Symbol is defined */ #define SC_REF 0x2000U /* Symbol is referenced */ +#define SC_DECL 0x4000U /* Symbol is declared in global scope */ +#define SC_STORAGE 0x8000U /* Symbol with associated storage */ -#define SC_TYPE 0x4000U /* This is a type, struct, typedef, etc. */ -#define SC_STRUCT 0x4001U /* Struct */ -#define SC_UNION 0x4002U /* Union */ -#define SC_STRUCTFIELD 0x4003U /* Struct or union field */ -#define SC_BITFIELD 0x4004U /* A bit-field inside a struct or union */ -#define SC_TYPEDEF 0x4005U /* A typedef */ -#define SC_TYPEMASK 0x400FU /* Mask for above types */ +#define SC_AUTO 0x010000U /* Auto variable */ +#define SC_REGISTER 0x020000U /* Register variable */ +#define SC_STATIC 0x040000U /* Static - not to be confused with other *_STATIC */ +#define SC_EXTERN 0x080000U /* Extern linkage */ +#define SC_STORAGEMASK 0x0F0000U /* Storage type mask */ -#define SC_ZEROPAGE 0x8000U /* Symbol marked as zeropage */ +#define SC_HAVEATTR 0x100000U /* Symbol has attributes */ -#define SC_HAVEATTR 0x10000U /* Symbol has attributes */ +#define SC_GOTO 0x200000U +#define SC_SPADJUSTMENT 0x400000U +#define SC_GOTO_IND 0x800000U /* Indirect goto */ + +#define SC_ALIAS 0x01000000U /* Alias of anonymous field */ +#define SC_FICTITIOUS 0x02000000U /* Symbol is fictitious */ +#define SC_HAVEFAM 0x04000000U /* Type has a Flexible Array Member */ +/* Label definition or reference */ +typedef struct DefOrRef DefOrRef; +struct DefOrRef { + unsigned Line; + size_t LocalsBlockId; + unsigned Flags; + int StackPtr; + unsigned Depth; + unsigned LateSP_Label; +}; + /* Symbol table entry */ typedef struct SymEntry SymEntry; struct SymEntry { @@ -119,8 +141,23 @@ struct SymEntry { /* Offset for locals or struct members */ int Offs; + /* Data for anonymous struct or union members */ + struct { + int Offs; /* Byte offset into struct */ + unsigned ANumber; /* Numeric ID */ + SymEntry* Field; /* The real field aliased */ + } A; + + /* Label name for static symbols */ - unsigned Label; + struct { + unsigned Label; + Collection *DefsOrRefs; + struct CodeEntry *IndJumpFrom; + } L; + + /* Value of SP adjustment needed after forward 'goto' */ + unsigned short SPAdjustment; /* Register bank offset and offset of the saved copy on stack for ** register variables. @@ -137,22 +174,23 @@ struct SymEntry { struct { struct SymTable* SymTab; /* Member symbol table */ unsigned Size; /* Size of the union/struct */ + unsigned ACount; /* Count of anonymous fields */ } S; - /* Data for bit fields */ + /* Data for enums */ struct { - unsigned Offs; /* Byte offset into struct */ - unsigned BitOffs; /* Bit offset into storage unit */ - unsigned BitWidth; /* Width in bits */ - } B; + struct SymTable* SymTab; /* Member symbol table */ + const Type* Type; /* Underlying type */ + } E; /* Data for functions */ struct { - struct FuncDesc* Func; /* Function descriptor */ struct Segments* Seg; /* Segments for this function */ struct LiteralPool* LitPool; /* Literal pool for this function */ } F; + /* Segment name for tentantive global definitions */ + const char* BssName; } V; char Name[1]; /* Name, dynamically allocated */ }; @@ -188,10 +226,10 @@ INLINE int SymIsBitField (const SymEntry* Sym) INLINE int SymIsTypeDef (const SymEntry* Sym) /* Return true if the given entry is a typedef entry */ { - return ((Sym->Flags & SC_TYPEDEF) == SC_TYPEDEF); + return ((Sym->Flags & SC_TYPEMASK) == SC_TYPEDEF); } #else -# define SymIsTypeDef(Sym) (((Sym)->Flags & SC_TYPEDEF) == SC_TYPEDEF) +# define SymIsTypeDef(Sym) (((Sym)->Flags & SC_TYPEMASK) == SC_TYPEDEF) #endif #if defined(HAVE_INLINE) @@ -219,15 +257,25 @@ INLINE int SymIsRegVar (const SymEntry* Sym) /* Return true if the given entry is a register variable */ /* ### HACK! Fix the ugly type flags! */ { - return ((Sym->Flags & (SC_REGISTER|SC_TYPE)) == SC_REGISTER); + return ((Sym->Flags & (SC_REGISTER | SC_TYPEMASK)) == SC_REGISTER); } #else -# define SymIsRegVar(Sym) (((Sym)->Flags & (SC_REGISTER|SC_TYPE)) == SC_REGISTER) +# define SymIsRegVar(Sym) (((Sym)->Flags & (SC_REGISTER | SC_TYPEMASK)) == SC_REGISTER) #endif int SymIsOutputFunc (const SymEntry* Sym); /* Return true if this is a function that must be output */ +#if defined(HAVE_INLINE) +INLINE int SymHasFlexibleArrayMember (const SymEntry* Sym) +/* Return true if the given entry has a flexible array member */ +{ + return ((Sym->Flags & SC_HAVEFAM) == SC_HAVEFAM); +} +#else +# define SymHasFlexibleArrayMember(Sym) (((Sym)->Flags & SC_HAVEFAM) == SC_HAVEFAM) +#endif + #if defined(HAVE_INLINE) INLINE const char* SymGetAsmName (const SymEntry* Sym) /* Return the assembler label name for the symbol (beware: may be NULL!) */ @@ -260,7 +308,17 @@ void SymSetAsmName (SymEntry* Sym); void CvtRegVarToAuto (SymEntry* Sym); /* Convert a register variable to an auto variable */ -void ChangeSymType (SymEntry* Entry, Type* T); +SymEntry* GetSymType (const Type* T); +/* Get the symbol entry of the enum/struct/union type +** Return 0 if it is not an enum/struct/union. +*/ + +const char* GetSymTypeName (const Type* T); +/* Return a name string of the type or the symbol name if it is an ESU type. +** Note: This may use a static buffer that could be overwritten by other calls. +*/ + +void ChangeSymType (SymEntry* Entry, const Type* T); /* Change the type of the given symbol */ void ChangeAsmName (SymEntry* Entry, const char* NewAsmName); diff --git a/src/cc65/symtab.c b/src/cc65/symtab.c index fdf459873..aa4a9a44a 100644 --- a/src/cc65/symtab.c +++ b/src/cc65/symtab.c @@ -37,6 +37,7 @@ #include <stdlib.h> #include <stdarg.h> #include <string.h> +#include <errno.h> /* common */ #include "check.h" @@ -45,6 +46,7 @@ #include "xmalloc.h" /* cc65 */ +#include "anonname.h" #include "asmcode.h" #include "asmlabel.h" #include "codegen.h" @@ -52,10 +54,13 @@ #include "declare.h" #include "error.h" #include "funcdesc.h" +#include "function.h" #include "global.h" +#include "input.h" #include "stackptr.h" #include "symentry.h" #include "typecmp.h" +#include "typeconv.h" #include "symtab.h" @@ -64,8 +69,6 @@ /* Data */ /*****************************************************************************/ - - /* An empty symbol table */ SymTable EmptySymTab = { 0, /* PrevTab */ @@ -84,14 +87,18 @@ SymTable EmptySymTab = { #define SYMTAB_SIZE_LABEL 7U /* The current and root symbol tables */ -static unsigned LexicalLevel = 0; /* For safety checks */ +static unsigned LexLevelDepth = 0; /* For safety checks */ +static LexicalLevel* CurrentLex = 0; static SymTable* SymTab0 = 0; static SymTable* SymTab = 0; static SymTable* TagTab0 = 0; static SymTable* TagTab = 0; +static SymTable* FieldTab = 0; static SymTable* LabelTab = 0; +static SymTable* SPAdjustTab = 0; +static SymTable* FailSafeTab = 0; /* For errors */ - +static FILE* DebugTableFile = 0; /*****************************************************************************/ /* struct SymTable */ @@ -139,7 +146,6 @@ static void FreeSymTable (SymTable* S) } - /*****************************************************************************/ /* Check symbols in a table */ /*****************************************************************************/ @@ -166,11 +172,15 @@ static void CheckSymTable (SymTable* Tab) !SymHasAttr (Entry, atUnused)) { if (Flags & SC_PARAM) { if (IS_Get (&WarnUnusedParam)) { - Warning ("Parameter `%s' is never used", Entry->Name); + Warning ("Parameter '%s' is never used", Entry->Name); + } + } else if (Flags & SC_FUNC) { + if (IS_Get (&WarnUnusedFunc)) { + Warning ("Function '%s' is defined but never used", Entry->Name); } } else { if (IS_Get (&WarnUnusedVar)) { - Warning ("`%s' is defined but never used", Entry->Name); + Warning ("Variable '%s' is defined but never used", Entry->Name); } } } @@ -180,11 +190,11 @@ static void CheckSymTable (SymTable* Tab) if (Flags & SC_LABEL) { if (!SymIsDef (Entry)) { /* Undefined label */ - Error ("Undefined label: `%s'", Entry->Name); + Error ("Undefined label: '%s'", Entry->Name); } else if (!SymIsRef (Entry)) { /* Defined but not used */ if (IS_Get (&WarnUnusedLabel)) { - Warning ("`%s' is defined but never used", Entry->Name); + Warning ("Label '%s' is defined but never used", Entry->Name); } } } @@ -204,47 +214,139 @@ static void CheckSymTable (SymTable* Tab) -unsigned GetLexicalLevel (void) -/* Return the current lexical level */ +unsigned GetLexicalLevelDepth (void) +/* Return the current lexical level depth */ { - return LexicalLevel; + return LexLevelDepth; } +unsigned GetLexicalLevel (void) +/* Return the current lexical level */ +{ + if (CurrentLex != 0) { + return CurrentLex->CurrentLevel; + } + return LEX_LEVEL_NONE; +} + + + +void PushLexicalLevel (unsigned NewLevel) +/* Enter the specified lexical level */ +{ + LexicalLevel* L = xmalloc (sizeof (LexicalLevel)); + L->PrevLex = CurrentLex; + CurrentLex = L; + CurrentLex->CurrentLevel = NewLevel; + ++LexLevelDepth; +} + + + +void PopLexicalLevel (void) +/* Exit the current lexical level */ +{ + LexicalLevel* L; + PRECONDITION (CurrentLex != 0 && LexLevelDepth > 0); + L = CurrentLex; + CurrentLex = L->PrevLex; + xfree (L); + --LexLevelDepth; +} + void EnterGlobalLevel (void) /* Enter the program global lexical level */ { + const char* OutName = NULL; + if (!SB_IsEmpty (&DebugTableName)) { + OutName = SB_GetConstBuf (&DebugTableName); + } + + if (OutName) { + /* Open the table file */ + DebugTableFile = fopen (OutName, "w"); + if (DebugTableFile == 0) { + Error ("Cannot create table dump file '%s': %s", OutName, strerror (errno)); + } + } + else if (Debug) { + DebugTableFile = stdout; + } + /* Safety */ - PRECONDITION (++LexicalLevel == LEX_LEVEL_GLOBAL); + PRECONDITION (GetLexicalLevel () == LEX_LEVEL_NONE); + + /* Enter global lexical level */ + PushLexicalLevel (LEX_LEVEL_GLOBAL); /* Create and assign the symbol table */ SymTab0 = SymTab = NewSymTable (SYMTAB_SIZE_GLOBAL); /* Create and assign the tag table */ TagTab0 = TagTab = NewSymTable (SYMTAB_SIZE_GLOBAL); + + /* Create and assign the table of SP adjustment symbols */ + SPAdjustTab = NewSymTable (SYMTAB_SIZE_GLOBAL); + + /* Create and assign the table of fictitious symbols used with errors */ + FailSafeTab = NewSymTable (SYMTAB_SIZE_GLOBAL); } - - void LeaveGlobalLevel (void) /* Leave the program global lexical level */ { /* Safety */ - PRECONDITION (LexicalLevel-- == LEX_LEVEL_GLOBAL); + PRECONDITION (GetLexicalLevel () == LEX_LEVEL_GLOBAL); /* Check the tables */ CheckSymTable (SymTab0); /* Dump the tables if requested */ - if (Debug) { - PrintSymTable (SymTab0, stdout, "Global symbol table"); - PrintSymTable (TagTab0, stdout, "Global tag table"); + if (DebugTableFile) { + SymEntry* Entry; + StrBuf* Header; + + PrintSymTable (SymTab0, DebugTableFile, "Global symbol table"); + PrintSymTable (TagTab0, DebugTableFile, "Global tag table"); + + Entry = TagTab0->SymHead; + if (Entry) { + fputs ("\nGlobal struct and union definitions", DebugTableFile); + fputs ("\n=========================\n", DebugTableFile); + + do { + if (!((Entry->Flags & SC_STRUCT) || (Entry->Flags & SC_UNION)) || !Entry->V.S.SymTab) { + continue; + } + + Header = NewStrBuf(); + if(Entry->Flags & SC_STRUCT) { + SB_AppendStr (Header, "SC_STRUCT: "); + } + else { + SB_AppendStr (Header, "SC_UNION: "); + } + SB_AppendStr (Header, Entry->Name); + SB_Terminate (Header); + + PrintSymTable (Entry->V.S.SymTab, DebugTableFile, SB_GetConstBuf (Header)); + } while ((Entry = Entry->NextSym)); + } + + /* Close the file */ + if (DebugTableFile != stdout && fclose (DebugTableFile) != 0) { + Error ("Error closing table dump file '%s': %s", SB_GetConstBuf(&DebugTableName), strerror (errno)); + } } /* Don't delete the symbol and struct tables! */ SymTab = 0; TagTab = 0; + + /* Exit global lexical level */ + PopLexicalLevel (); } @@ -254,8 +356,8 @@ void EnterFunctionLevel (void) { SymTable* S; - /* New lexical level */ - ++LexicalLevel; + /* Enter function lexical level */ + PushLexicalLevel (LEX_LEVEL_FUNCTION); /* Get a new symbol table and make it current */ S = NewSymTable (SYMTAB_SIZE_FUNCTION); @@ -278,8 +380,11 @@ void EnterFunctionLevel (void) void RememberFunctionLevel (struct FuncDesc* F) /* Remember the symbol tables for the level and leave the level without checks */ { - /* Leave the lexical level */ - --LexicalLevel; + /* Safety */ + PRECONDITION (GetLexicalLevel () == LEX_LEVEL_FUNCTION); + + /* Leave function lexical level */ + PopLexicalLevel (); /* Remember the tables */ F->SymTab = SymTab; @@ -296,8 +401,8 @@ void RememberFunctionLevel (struct FuncDesc* F) void ReenterFunctionLevel (struct FuncDesc* F) /* Reenter the function lexical level using the existing tables from F */ { - /* New lexical level */ - ++LexicalLevel; + /* Enter function lexical level */ + PushLexicalLevel (LEX_LEVEL_FUNCTION); /* Make the tables current again */ F->SymTab->PrevTab = SymTab; @@ -315,13 +420,28 @@ void ReenterFunctionLevel (struct FuncDesc* F) void LeaveFunctionLevel (void) /* Leave function lexical level */ { - /* Leave the lexical level */ - --LexicalLevel; + /* Safety */ + PRECONDITION (GetLexicalLevel () == LEX_LEVEL_FUNCTION); + + /* Leave function lexical level */ + PopLexicalLevel (); /* Check the tables */ CheckSymTable (SymTab); CheckSymTable (LabelTab); + /* Dump the tables if requested */ + if (DebugTableFile) { + StrBuf* SymbolHeader = NewStrBuf(); + + SB_AppendStr (SymbolHeader, "SC_FUNC: "); + SB_AppendStr (SymbolHeader, CurrentFunc->FuncEntry->AsmName); + SB_AppendStr (SymbolHeader, ": Symbol table"); + SB_Terminate (SymbolHeader); + + PrintSymTable (SymTab, DebugTableFile, SB_GetConstBuf(SymbolHeader)); + } + /* Drop the label table if it is empty */ if (LabelTab->SymCount == 0) { FreeSymTable (LabelTab); @@ -340,8 +460,8 @@ void EnterBlockLevel (void) { SymTable* S; - /* New lexical level */ - ++LexicalLevel; + /* Enter block lexical level */ + PushLexicalLevel (LEX_LEVEL_BLOCK); /* Get a new symbol table and make it current */ S = NewSymTable (SYMTAB_SIZE_BLOCK); @@ -359,8 +479,11 @@ void EnterBlockLevel (void) void LeaveBlockLevel (void) /* Leave a nested block in a function */ { - /* Leave the lexical level */ - --LexicalLevel; + /* Safety */ + PRECONDITION (GetLexicalLevel () == LEX_LEVEL_BLOCK); + + /* Leave block lexical level */ + PopLexicalLevel (); /* Check the tables */ CheckSymTable (SymTab); @@ -377,13 +500,16 @@ void EnterStructLevel (void) { SymTable* S; + /* Enter struct lexical level */ + PushLexicalLevel (LEX_LEVEL_STRUCT); + /* Get a new symbol table and make it current. Note: Structs and enums ** nested in struct scope are NOT local to the struct but visible in the ** outside scope. So we will NOT create a new struct or enum table. */ - S = NewSymTable (SYMTAB_SIZE_BLOCK); - S->PrevTab = SymTab; - SymTab = S; + S = NewSymTable (SYMTAB_SIZE_STRUCT); + S->PrevTab = FieldTab; + FieldTab = S; } @@ -391,8 +517,14 @@ void EnterStructLevel (void) void LeaveStructLevel (void) /* Leave a nested block for a struct definition */ { + /* Safety */ + PRECONDITION (GetLexicalLevel () == LEX_LEVEL_STRUCT); + + /* Leave struct lexical level */ + PopLexicalLevel (); + /* Don't delete the table */ - SymTab = SymTab->PrevTab; + FieldTab = FieldTab->PrevTab; } @@ -482,31 +614,52 @@ SymEntry* FindTagSym (const char* Name) -SymEntry* FindStructField (const Type* T, const char* Name) -/* Find a struct field in the fields list */ +SymEntry FindStructField (const Type* T, const char* Name) +/* Find a struct/union field in the fields list. +** Return the info about the found field symbol filled in an entry struct by +** value, or an empty entry struct if the field is not found. +*/ { - SymEntry* Field = 0; + SymEntry* Entry = 0; + SymEntry Field; + int Offs = 0; - /* The given type may actually be a pointer to struct */ + /* The given type may actually be a pointer to struct/union */ if (IsTypePtr (T)) { ++T; } - /* Non-structs do not have any struct fields... */ + /* Only structs/unions have struct/union fields... */ if (IsClassStruct (T)) { /* Get a pointer to the struct/union type */ - const SymEntry* Struct = GetSymEntry (T); + const SymEntry* Struct = GetESUSymEntry (T); CHECK (Struct != 0); - /* Now search in the struct symbol table. Beware: The table may not - ** exist. + /* Now search in the struct/union symbol table. Beware: The table may + ** not exist. */ if (Struct->V.S.SymTab) { - Field = FindSymInTable (Struct->V.S.SymTab, Name, HashStr (Name)); + Entry = FindSymInTable (Struct->V.S.SymTab, Name, HashStr (Name)); + + if (Entry != 0) { + Offs = Entry->V.Offs; + } + + while (Entry != 0 && (Entry->Flags & SC_ALIAS) == SC_ALIAS) { + /* Get the real field */ + Entry = Entry->V.A.Field; + } } } + if (Entry != 0) { + Field = *Entry; + Field.V.Offs = Offs; + } else { + memset (&Field, 0, sizeof(SymEntry)); + } + return Field; } @@ -518,6 +671,130 @@ SymEntry* FindStructField (const Type* T, const char* Name) +static int IsDistinctRedef (const Type* lhst, const Type* rhst, typecmpcode_t Code, typecmpflag_t Flags) +/* Return if type compatibility result is "worse" than Code or if any bit of +** qualifier Flags is set. +*/ +{ + typecmp_t Result = TypeCmp (lhst, rhst); + if (Result.C < Code || (Result.F & TCF_MASK_QUAL & Flags) != 0) { + return 1; + } + return 0; +} + + +static int HandleSymRedefinition (SymEntry* Entry, const Type* T, unsigned Flags) +/* Check and handle redefinition of existing symbols. +** Complete array sizes and function descriptors as well. +** Return true if there *is* an error. +*/ +{ + /* Get the type info of the existing symbol */ + Type* E_Type = Entry->Type; + unsigned E_SCType = Entry->Flags & SC_TYPEMASK; + unsigned SCType = Flags & SC_TYPEMASK; + + /* Some symbols may be redeclared if certain requirements are met */ + if (E_SCType == SC_TYPEDEF) { + + /* Existing typedefs cannot be redeclared as anything different */ + if (SCType == SC_TYPEDEF) { + if (IsDistinctRedef (E_Type, T, TC_IDENTICAL, TCF_MASK_QUAL)) { + Error ("Conflicting types for typedef '%s'", Entry->Name); + Entry = 0; + } + } else { + Error ("Redefinition of typedef '%s' as different kind of symbol", Entry->Name); + Entry = 0; + } + + } else if ((Entry->Flags & SC_FUNC) == SC_FUNC) { + + /* In case of a function, use the new type descriptor, since it + ** contains pointers to the new symbol tables that are needed if + ** an actual function definition follows. Be sure not to use the + ** new descriptor if it contains a function declaration with an + ** empty parameter list. + */ + if (IsTypeFunc (T)) { + + /* Check for duplicate function definitions */ + if (SymIsDef (Entry) && (Flags & SC_DEF) == SC_DEF) { + Error ("Body for function '%s' has already been defined", + Entry->Name); + Entry = 0; + } else { + /* New type must be compatible with the composite prototype */ + if (IsDistinctRedef (E_Type, T, TC_EQUAL, TCF_MASK_QUAL)) { + Error ("Conflicting function types for '%s'", Entry->Name); + TypeCompatibilityDiagnostic (T, E_Type, 0, "'%s' vs '%s'"); + Entry = 0; + } else { + /* Refine the existing composite prototype with this new + ** one. + */ + RefineFuncDesc (Entry->Type, T); + } + } + + } else { + Error ("Redefinition of function '%s' as different kind of symbol", Entry->Name); + Entry = 0; + } + + } else { + + /* Redeclarations of ESU types are checked elsewhere */ + if (IsTypeArray (T) && IsTypeArray (E_Type)) { + + /* Get the array sizes */ + long Size = GetElementCount (T); + long ESize = GetElementCount (E_Type); + + /* If we are handling arrays, the old entry or the new entry may be + ** an incomplete declaration. Accept this, and if the exsting entry + ** is incomplete, complete it. + */ + if ((Size != UNSPECIFIED && ESize != UNSPECIFIED && Size != ESize) || + IsDistinctRedef (E_Type + 1, T + 1, TC_IDENTICAL, TCF_MASK_QUAL)) { + /* Conflicting element types */ + Error ("Conflicting array types for '%s[]'", Entry->Name); + Entry = 0; + } else { + /* Check if we have a size in the existing definition */ + if (ESize == UNSPECIFIED) { + /* Existing, size not given, use size from new def */ + SetElementCount (E_Type, Size); + } + } + + } else { + + /* New type must be equivalent */ + if (SCType != E_SCType) { + Error ("Redefinition of '%s' as different kind of symbol", Entry->Name); + Entry = 0; + } else if (IsDistinctRedef (E_Type, T, TC_EQUAL, TCF_MASK_QUAL)) { + Error ("Conflicting types for '%s'", Entry->Name); + Entry = 0; + } else if (E_SCType == SC_ENUMERATOR) { + /* Enumerators aren't allowed to be redeclared at all, even if + ** all occurences are identical. The current code logic won't + ** get here, but let's just do it. + */ + Error ("Redeclaration of enumerator constant '%s'", Entry->Name); + Entry = 0; + } + } + } + + /* Return if there are any errors */ + return Entry == 0; +} + + + static void AddSymEntry (SymTable* T, SymEntry* S) /* Add a symbol to a symbol table */ { @@ -546,44 +823,76 @@ static void AddSymEntry (SymTable* T, SymEntry* S) -SymEntry* AddStructSym (const char* Name, unsigned Type, unsigned Size, SymTable* Tab) -/* Add a struct/union entry and return it */ +SymEntry* AddEnumSym (const char* Name, unsigned Flags, const Type* Type, SymTable* Tab, unsigned* DSFlags) +/* Add an enum entry and return it */ { + SymTable* CurTagTab = TagTab; SymEntry* Entry; - /* Type must be struct or union */ - PRECONDITION (Type == SC_STRUCT || Type == SC_UNION); + if ((Flags & SC_FICTITIOUS) == 0) { + /* Do we have an entry with this name already? */ + Entry = FindSymInTable (CurTagTab, Name, HashStr (Name)); + } else { + /* Add a fictitious symbol in the fail-safe table */ + Entry = 0; + CurTagTab = FailSafeTab; + } - /* Do we have an entry with this name already? */ - Entry = FindSymInTable (TagTab, Name, HashStr (Name)); if (Entry) { /* We do have an entry. This may be a forward, so check it. */ - if ((Entry->Flags & SC_TYPEMASK) != Type) { - /* Existing symbol is not a struct */ - Error ("Symbol `%s' is already different kind", Name); - } else if (Size > 0 && Entry->V.S.Size > 0) { - /* Both structs are definitions. */ - Error ("Multiple definition for `%s'", Name); - } else { - /* Define the struct size if it is given */ - if (Size > 0) { - Entry->V.S.SymTab = Tab; - Entry->V.S.Size = Size; + if ((Entry->Flags & SC_TYPEMASK) != SC_ENUM) { + /* Existing symbol is not an enum */ + Error ("Symbol '%s' is already different kind", Name); + Entry = 0; + } else if (Type != 0) { + /* Define the struct size if the underlying type is given. */ + if (Entry->V.E.Type != 0) { + /* Both are definitions. */ + Error ("Multiple definition for 'enum %s'", Name); + Entry = 0; + } else { + Entry->V.E.SymTab = Tab; + Entry->V.E.Type = Type; + Entry->Flags &= ~SC_DECL; + Entry->Flags |= SC_DEF; + + /* Remember this is the first definition of this type */ + if (DSFlags != 0) { + *DSFlags |= DS_NEW_TYPE_DEF; + } } } - } else { + if (Entry == 0) { + /* Use the fail-safe table for fictitious symbols */ + CurTagTab = FailSafeTab; + } + } + + if (Entry == 0) { /* Create a new entry */ - Entry = NewSymEntry (Name, Type); + Entry = NewSymEntry (Name, SC_ENUM); - /* Set the struct data */ - Entry->V.S.SymTab = Tab; - Entry->V.S.Size = Size; + /* Set the enum type data */ + Entry->V.E.SymTab = Tab; + Entry->V.E.Type = Type; + + if (Type != 0) { + Entry->Flags |= SC_DEF; + } + + /* Remember this is the first definition of this type */ + if (CurTagTab != FailSafeTab && DSFlags != 0) { + if ((Entry->Flags & SC_DEF) != 0) { + *DSFlags |= DS_NEW_TYPE_DEF; + } + *DSFlags |= DS_NEW_TYPE_DECL; + } /* Add it to the current table */ - AddSymEntry (TagTab, Entry); + AddSymEntry (CurTagTab, Entry); } /* Return the entry */ @@ -592,29 +901,125 @@ SymEntry* AddStructSym (const char* Name, unsigned Type, unsigned Size, SymTable -SymEntry* AddBitField (const char* Name, unsigned Offs, unsigned BitOffs, unsigned Width) +SymEntry* AddStructSym (const char* Name, unsigned Flags, unsigned Size, SymTable* Tab, unsigned* DSFlags) +/* Add a struct/union entry and return it */ +{ + SymTable* CurTagTab = TagTab; + SymEntry* Entry; + unsigned Type = (Flags & SC_TYPEMASK); + + /* Type must be struct or union */ + PRECONDITION (Type == SC_STRUCT || Type == SC_UNION); + + if ((Flags & SC_FICTITIOUS) == 0) { + /* Do we have an entry with this name already? */ + Entry = FindSymInTable (CurTagTab, Name, HashStr (Name)); + } else { + /* Add a fictitious symbol in the fail-safe table */ + Entry = 0; + CurTagTab = FailSafeTab; + } + + if (Entry) { + + /* We do have an entry. This may be a forward, so check it. */ + if ((Entry->Flags & SC_TYPEMASK) != Type) { + /* Existing symbol is not a struct */ + Error ("Symbol '%s' is already different kind", Name); + Entry = 0; + } else if ((Entry->Flags & Flags & SC_DEF) == SC_DEF) { + /* Both structs are definitions. */ + if (Type == SC_STRUCT) { + Error ("Multiple definition for 'struct %s'", Name); + } else { + Error ("Multiple definition for 'union %s'", Name); + } + Entry = 0; + } else { + /* Define the struct size if it is a definition */ + if ((Flags & SC_DEF) == SC_DEF) { + Entry->Flags = Flags; + Entry->V.S.SymTab = Tab; + Entry->V.S.Size = Size; + + /* Remember this is the first definition of this type */ + if (DSFlags != 0) { + *DSFlags |= DS_NEW_TYPE_DEF; + } + } + } + + if (Entry == 0) { + /* Use the fail-safe table for fictitious symbols */ + CurTagTab = FailSafeTab; + } + } + + if (Entry == 0) { + + /* Create a new entry */ + Entry = NewSymEntry (Name, Flags); + + /* Set the struct data */ + Entry->V.S.SymTab = Tab; + Entry->V.S.Size = Size; + + /* Remember this is the first definition of this type */ + if (CurTagTab != FailSafeTab && DSFlags != 0) { + if ((Entry->Flags & SC_DEF) != 0) { + *DSFlags |= DS_NEW_TYPE_DEF; + } + *DSFlags |= DS_NEW_TYPE_DECL; + } + + /* Add it to the current tag table */ + AddSymEntry (CurTagTab, Entry); + } + + /* Return the entry */ + return Entry; +} + + + +SymEntry* AddBitField (const char* Name, const Type* T, unsigned Offs, + unsigned BitOffs, unsigned BitWidth, int SignednessSpecified) /* Add a bit field to the local symbol table and return the symbol entry */ { /* Do we have an entry with this name already? */ - SymEntry* Entry = FindSymInTable (SymTab, Name, HashStr (Name)); + SymEntry* Entry = FindSymInTable (FieldTab, Name, HashStr (Name)); if (Entry) { /* We have a symbol with this name already */ - Error ("Multiple definition for `%s'", Name); + Error ("Multiple definition for bit-field '%s'", Name); } else { /* Create a new entry */ Entry = NewSymEntry (Name, SC_BITFIELD); - /* Set the symbol attributes. Bit-fields are always of type unsigned */ - Entry->Type = type_uint; - Entry->V.B.Offs = Offs; - Entry->V.B.BitOffs = BitOffs; - Entry->V.B.BitWidth = Width; + /* Set the symbol attributes. Bit-fields are always integral types. */ + Entry->Type = NewBitFieldType (T, BitOffs, BitWidth); + Entry->V.Offs = Offs; + + if (!SignednessSpecified) { + /* int is treated as signed int everywhere except bit-fields; switch it to unsigned, + ** since this is allowed for bit-fields and avoids sign-extension, so is much faster. + ** enums set SignednessSpecified to 1 to avoid this adjustment. Character types + ** actually distinguish 3 types of char; char may either be signed or unsigned, which + ** is controlled by `--signed-chars`. In bit-fields, however, we perform the same + ** `char -> unsigned char` adjustment that is performed with other integral types. + */ + CHECK ((Entry->Type->C & T_MASK_SIGN) == T_SIGN_SIGNED || + IsTypeChar (Entry->Type)); + Entry->Type[0].C &= ~T_MASK_SIGN; + Entry->Type[0].C |= T_SIGN_UNSIGNED; + Entry->Type[1].C &= ~T_MASK_SIGN; + Entry->Type[1].C |= T_SIGN_UNSIGNED; + } /* Add the entry to the symbol table */ - AddSymEntry (SymTab, Entry); + AddSymEntry (FieldTab, Entry); } @@ -627,16 +1032,13 @@ SymEntry* AddBitField (const char* Name, unsigned Offs, unsigned BitOffs, unsign SymEntry* AddConstSym (const char* Name, const Type* T, unsigned Flags, long Val) /* Add an constant symbol to the symbol table and return it */ { - /* Enums must be inserted in the global symbol table */ - SymTable* Tab = ((Flags & SC_ENUM) == SC_ENUM)? SymTab0 : SymTab; - /* Do we have an entry with this name already? */ - SymEntry* Entry = FindSymInTable (Tab, Name, HashStr (Name)); + SymEntry* Entry = FindSymInTable (SymTab, Name, HashStr (Name)); if (Entry) { if ((Entry->Flags & SC_CONST) != SC_CONST) { - Error ("Symbol `%s' is already different kind", Name); + Error ("Symbol '%s' is already different kind", Name); } else { - Error ("Multiple definition for `%s'", Name); + Error ("Multiple definition for constant '%s'", Name); } return Entry; } @@ -644,14 +1046,14 @@ SymEntry* AddConstSym (const char* Name, const Type* T, unsigned Flags, long Val /* Create a new entry */ Entry = NewSymEntry (Name, Flags); - /* Enum values are ints */ + /* We only have integer constants for now */ Entry->Type = TypeDup (T); - /* Set the enum data */ + /* Set the constant data */ Entry->V.ConstVal = Val; /* Add the entry to the symbol table */ - AddSymEntry (Tab, Entry); + AddSymEntry (SymTab, Entry); /* Return the entry */ return Entry; @@ -659,17 +1061,117 @@ SymEntry* AddConstSym (const char* Name, const Type* T, unsigned Flags, long Val -SymEntry* AddLabelSym (const char* Name, unsigned Flags) -/* Add a goto label to the label table */ +DefOrRef* AddDefOrRef (SymEntry* E, unsigned Flags) +/* Add definition or reference to the SymEntry and preserve its attributes */ { + DefOrRef *DOR; + + DOR = xmalloc (sizeof (DefOrRef)); + CollAppend (E->V.L.DefsOrRefs, DOR); + DOR->Line = GetCurrentLine (); + DOR->LocalsBlockId = (size_t)CollLast (&CurrentFunc->LocalsBlockStack); + DOR->Flags = Flags; + DOR->StackPtr = StackPtr; + DOR->Depth = CollCount (&CurrentFunc->LocalsBlockStack); + DOR->LateSP_Label = GetLocalDataLabel (); + + return DOR; +} + + + +unsigned short FindSPAdjustment (const char* Name) +/* Search for an entry in the table of SP adjustments */ +{ + SymEntry* Entry = FindSymInTable (SPAdjustTab, Name, HashStr (Name)); + + if (!Entry) { + Internal ("No SP adjustment label entry found"); + } + + return Entry->V.SPAdjustment; +} + + + +SymEntry* AddLabelSym (const char* Name, unsigned Flags) +/* Add a C goto label to the label table */ +{ + unsigned i; + DefOrRef *DOR, *NewDOR; + /* We juggle it so much that a shortcut will help with clarity */ + Collection *AIC = &CurrentFunc->LocalsBlockStack; + /* Do we have an entry with this name already? */ SymEntry* Entry = FindSymInTable (LabelTab, Name, HashStr (Name)); if (Entry) { if (SymIsDef (Entry) && (Flags & SC_DEF) != 0) { /* Trying to define the label more than once */ - Error ("Label `%s' is defined more than once", Name); + Error ("Label '%s' is defined more than once", Name); } + + NewDOR = AddDefOrRef (Entry, Flags); + + /* Walk through all occurrences of the label so far and evaluate + ** their relationship with the one passed to the function. + */ + for (i = 0; i < CollCount (Entry->V.L.DefsOrRefs); i++) { + DOR = CollAt (Entry->V.L.DefsOrRefs, i); + + if ((DOR->Flags & SC_DEF) && (Flags & SC_REF) && (Flags & (SC_GOTO | SC_GOTO_IND))) { + /* We're processing a goto and here is its destination label. + ** This means the difference between SP values is already known, + ** so we simply emit the SP adjustment code. + */ + if (StackPtr != DOR->StackPtr) { + g_space (StackPtr - DOR->StackPtr); + } + + /* Are we jumping into a block with initalization of an object that + ** has automatic storage duration? Let's emit a warning. + */ + if ((size_t)CollLast (AIC) != DOR->LocalsBlockId && + (CollCount (AIC) < DOR->Depth || + (size_t)CollAt (AIC, DOR->Depth - 1) != DOR->LocalsBlockId)) { + Warning ("Goto at line %d to label %s jumps into a block with " + "initialization of an object that has automatic storage duration", + GetCurrentLine (), Name); + } + } + + + if ((DOR->Flags & SC_REF) && (DOR->Flags & (SC_GOTO | SC_GOTO_IND)) && (Flags & SC_DEF)) { + /* We're processing a label, let's update all gotos encountered + ** so far + */ + if (DOR->Flags & SC_GOTO) { + SymEntry *E; + g_userodata (); + g_defdatalabel (DOR->LateSP_Label); + g_defdata (CF_CONST | CF_INT, StackPtr - DOR->StackPtr, 0); + + /* Optimizer will need the information about the value of SP adjustment + ** later, so let's preserve it. + */ + E = NewSymEntry (LocalDataLabelName (DOR->LateSP_Label), SC_SPADJUSTMENT); + E->V.SPAdjustment = StackPtr - DOR->StackPtr; + AddSymEntry (SPAdjustTab, E); + } + + /* Are we jumping into a block with initalization of an object that + ** has automatic storage duration? Let's emit a warning. + */ + if ((size_t)CollLast (AIC) != DOR->LocalsBlockId && + (CollCount (AIC) >= DOR->Depth || + (size_t)CollLast (AIC) >= (size_t)DOR->Line)) + Warning ("Goto at line %d to label %s jumps into a block with " + "initialization of an object that has automatic storage duration", + DOR->Line, Name); + } + + } + Entry->Flags |= Flags; } else { @@ -678,16 +1180,26 @@ SymEntry* AddLabelSym (const char* Name, unsigned Flags) Entry = NewSymEntry (Name, SC_LABEL | Flags); /* Set a new label number */ - Entry->V.Label = GetLocalLabel (); + Entry->V.L.Label = GetLocalLabel (); + Entry->V.L.IndJumpFrom = NULL; + + /* Create Collection for label definition and references */ + Entry->V.L.DefsOrRefs = NewCollection (); + NewDOR = AddDefOrRef (Entry, Flags); /* Generate the assembler name of the label */ - Entry->AsmName = xstrdup (LocalLabelName (Entry->V.Label)); + Entry->AsmName = xstrdup (LocalLabelName (Entry->V.L.Label)); /* Add the entry to the label table */ AddSymEntry (LabelTab, Entry); } + /* We are processing a goto, but the label has not yet been defined */ + if (!SymIsDef (Entry) && (Flags & SC_REF) && (Flags & SC_GOTO)) { + g_lateadjustSP (NewDOR->LateSP_Label); + } + /* Return the entry */ return Entry; } @@ -695,43 +1207,84 @@ SymEntry* AddLabelSym (const char* Name, unsigned Flags) SymEntry* AddLocalSym (const char* Name, const Type* T, unsigned Flags, int Offs) -/* Add a local symbol and return the symbol entry */ +/* Add a local or struct/union field symbol and return the symbol entry */ { + SymTable* Tab = (Flags & SC_STRUCTFIELD) == 0 ? SymTab : FieldTab; + ident Ident; + /* Do we have an entry with this name already? */ - SymEntry* Entry = FindSymInTable (SymTab, Name, HashStr (Name)); + SymEntry* Entry = FindSymInTable (Tab, Name, HashStr (Name)); if (Entry) { /* We have a symbol with this name already */ - Error ("Multiple definition for `%s'", Name); + if (HandleSymRedefinition (Entry, T, Flags)) { + Entry = 0; + } else if ((Flags & SC_ESUTYPEMASK) != SC_TYPEDEF) { + /* Redefinitions are not allowed */ + if (SymIsDef (Entry) && (Flags & SC_DEF) == SC_DEF) { + Error ("Multiple definition of '%s'", Entry->Name); + Entry = 0; + } else if ((Flags & (SC_AUTO | SC_REGISTER)) != 0 && + (Entry->Flags & SC_EXTERN) != 0) { + /* Check for local storage class conflict */ + Error ("Declaration of '%s' with no linkage follows extern declaration", + Name); + Entry = 0; + } else { + /* If a static declaration follows a non-static declaration, + ** then it is an error. + */ + if ((Flags & SC_DEF) && + (Flags & SC_EXTERN) == 0 && + (Entry->Flags & SC_EXTERN) != 0) { + Error ("Static declaration of '%s' follows extern declaration", Name); + Entry = 0; + } + } + } - } else { + if (Entry == 0) { + if ((Flags & SC_PARAM) != 0) { + /* Use anonymous names */ + Name = AnonName (Ident, "param"); + } else { + /* Use the fail-safe table for fictitious symbols */ + Tab = FailSafeTab; + } + } + } + if (Entry == 0) { /* Create a new entry */ Entry = NewSymEntry (Name, Flags); /* Set the symbol attributes */ Entry->Type = TypeDup (T); - if ((Flags & SC_AUTO) == SC_AUTO) { + + if ((Flags & SC_STRUCTFIELD) == SC_STRUCTFIELD || + (Flags & SC_ESUTYPEMASK) == SC_TYPEDEF) { + if ((Flags & SC_ALIAS) != SC_ALIAS) { + Entry->V.Offs = Offs; + } + } else if ((Flags & SC_AUTO) == SC_AUTO) { Entry->V.Offs = Offs; } else if ((Flags & SC_REGISTER) == SC_REGISTER) { Entry->V.R.RegOffs = Offs; Entry->V.R.SaveOffs = StackPtr; - } else if ((Flags & SC_EXTERN) == SC_EXTERN) { - Entry->V.Label = Offs; + } else if ((Flags & SC_EXTERN) == SC_EXTERN || + (Flags & SC_FUNC) == SC_FUNC) { + Entry->V.L.Label = Offs; SymSetAsmName (Entry); } else if ((Flags & SC_STATIC) == SC_STATIC) { - /* Generate the assembler name from the label number */ - Entry->V.Label = Offs; - Entry->AsmName = xstrdup (LocalLabelName (Entry->V.Label)); - } else if ((Flags & SC_STRUCTFIELD) == SC_STRUCTFIELD) { - Entry->V.Offs = Offs; + /* Generate the assembler name from the data label number */ + Entry->V.L.Label = Offs; + Entry->AsmName = xstrdup (LocalDataLabelName (Entry->V.L.Label)); } else { Internal ("Invalid flags in AddLocalSym: %04X", Flags); } /* Add the entry to the symbol table */ - AddSymEntry (SymTab, Entry); - + AddSymEntry (Tab, Entry); } /* Return the entry */ @@ -743,99 +1296,69 @@ SymEntry* AddLocalSym (const char* Name, const Type* T, unsigned Flags, int Offs SymEntry* AddGlobalSym (const char* Name, const Type* T, unsigned Flags) /* Add an external or global symbol to the symbol table and return the entry */ { - /* There is some special handling for functions, so check if it is one */ - int IsFunc = IsTypeFunc (T); - - /* Functions must be inserted in the global symbol table */ - SymTable* Tab = IsFunc? SymTab0 : SymTab; + /* Start from the local symbol table */ + SymTable* Tab = SymTab; /* Do we have an entry with this name already? */ - SymEntry* Entry = FindSymInTable (Tab, Name, HashStr (Name)); + SymEntry* Entry = FindSymInTree (Tab, Name); if (Entry) { - Type* EType; - /* We have a symbol with this name already */ - if (Entry->Flags & SC_TYPE) { - Error ("Multiple definition for `%s'", Name); - return Entry; - } - - /* Get the type string of the existing symbol */ - EType = Entry->Type; - - /* If we are handling arrays, the old entry or the new entry may be an - ** incomplete declaration. Accept this, and if the exsting entry is - ** incomplete, complete it. - */ - if (IsTypeArray (T) && IsTypeArray (EType)) { - - /* Get the array sizes */ - long Size = GetElementCount (T); - long ESize = GetElementCount (EType); - - if ((Size != UNSPECIFIED && ESize != UNSPECIFIED && Size != ESize) || - TypeCmp (T + 1, EType + 1) < TC_EQUAL) { - /* Types not identical: Conflicting types */ - Error ("Conflicting types for `%s'", Name); - return Entry; - } else { - /* Check if we have a size in the existing definition */ - if (ESize == UNSPECIFIED) { - /* Existing, size not given, use size from new def */ - SetElementCount (EType, Size); - } - } - - } else { - /* New type must be identical */ - if (TypeCmp (EType, T) < TC_EQUAL) { - Error ("Conflicting types for `%s'", Name); - return Entry; - } - - /* In case of a function, use the new type descriptor, since it - ** contains pointers to the new symbol tables that are needed if - ** an actual function definition follows. Be sure not to use the - ** new descriptor if it contains a function declaration with an - ** empty parameter list. + if (HandleSymRedefinition (Entry, T, Flags)) { + Entry = 0; + } else if ((Entry->Flags & (SC_AUTO | SC_REGISTER)) != 0) { + /* Check for local storage class conflict */ + Error ("Extern declaration of '%s' follows declaration with no linkage", + Name); + Entry = 0; + } else if ((Flags & SC_ESUTYPEMASK) != SC_TYPEDEF) { + /* If a static declaration follows a non-static declaration, then + ** diagnose the conflict. It will warn and compile an extern + ** declaration if both declarations are global, otherwise give an + ** error. */ - if (IsFunc) { - /* Get the function descriptor from the new type */ - FuncDesc* F = GetFuncDesc (T); - /* Use this new function descriptor if it doesn't contain - ** an empty parameter list. + if (Tab == SymTab0 && + (Flags & SC_EXTERN) == 0 && + (Entry->Flags & SC_EXTERN) != 0) { + Warning ("Static declaration of '%s' follows non-static declaration", Name); + } else if ((Flags & SC_EXTERN) != 0 && + (Entry->Owner == SymTab0 || (Entry->Flags & SC_DEF) != 0) && + (Entry->Flags & SC_EXTERN) == 0) { + /* It is OK if a global extern declaration follows a global + ** non-static declaration, but an error if either of them is + ** local, as the two would be referring to different objects. + ** It is an error as well if a global non-static declaration + ** follows a global static declaration. */ - if ((F->Flags & FD_EMPTY) == 0) { - Entry->V.F.Func = F; - SetFuncDesc (EType, F); + if (Entry->Owner == SymTab0) { + if ((Flags & SC_STORAGE) == 0) { + /* Linkage must be unchanged */ + Flags &= ~SC_EXTERN; + } else { + Error ("Non-static declaration of '%s' follows static declaration", Name); + } + } else { + Error ("Extern declaration of '%s' follows static declaration", Name); + Entry = 0; } } + + if (Entry) { + /* Add the new flags */ + Entry->Flags |= Flags; + } } - /* If a static declaration follows a non-static declaration, then - ** warn about the conflict. (It will compile a public declaration.) - */ - if ((Flags & SC_EXTERN) == 0 && (Entry->Flags & SC_EXTERN) != 0) { - Warning ("static declaration follows non-static declaration of `%s'.", Name); + if (Entry == 0) { + /* Use the fail-safe table for fictitious symbols */ + Tab = FailSafeTab; } - /* An extern declaration must not change the current linkage. */ - if (IsFunc || (Flags & (SC_EXTERN | SC_DEF)) == SC_EXTERN) { - Flags &= ~SC_EXTERN; - } - - /* If a public declaration follows a static declaration, then - ** warn about the conflict. (It will compile a public declaration.) - */ - if ((Flags & SC_EXTERN) != 0 && (Entry->Flags & SC_EXTERN) == 0) { - Warning ("public declaration follows static declaration of `%s'.", Name); - } - - /* Add the new flags */ - Entry->Flags |= Flags; - - } else { + } else if ((Flags & (SC_EXTERN | SC_FUNC)) != 0) { + /* Add the new declaration to the global symbol table instead */ + Tab = SymTab0; + } + if (Entry == 0 || Entry->Owner != Tab) { /* Create a new entry */ Entry = NewSymEntry (Name, Flags); @@ -843,12 +1366,9 @@ SymEntry* AddGlobalSym (const char* Name, const Type* T, unsigned Flags) /* Set the symbol attributes */ Entry->Type = TypeDup (T); - /* If this is a function, set the function descriptor and clear - ** additional fields. - */ - if (IsFunc) { - Entry->V.F.Func = GetFuncDesc (Entry->Type); - Entry->V.F.Seg = 0; + /* If this is a function, clear additional fields */ + if (IsTypeFunc (T)) { + Entry->V.F.Seg = 0; } /* Add the assembler name of the symbol */ @@ -886,6 +1406,22 @@ SymTable* GetGlobalSymTab (void) +SymTable* GetFieldSymTab (void) +/* Return the current field symbol table */ +{ + return FieldTab; +} + + + +SymTable* GetLabelSymTab (void) +/* Return the global symbol table */ +{ + return LabelTab; +} + + + int SymIsLocal (SymEntry* Sym) /* Return true if the symbol is defined in the highest lexical level */ { @@ -904,7 +1440,7 @@ void MakeZPSym (const char* Name) if (Entry) { Entry->Flags |= SC_ZEROPAGE; } else { - Error ("Undefined symbol: `%s'", Name); + Error ("Undefined symbol: '%s'", Name); } } @@ -980,14 +1516,14 @@ void EmitDebugInfo (void) /* For cosmetic reasons in the output file, we will insert two tabs ** on global level and just one on local level. */ - if (LexicalLevel == LEX_LEVEL_GLOBAL) { + if (GetLexicalLevel () == LEX_LEVEL_GLOBAL) { Head = "\t.dbg\t\tsym"; } else { Head = "\t.dbg\tsym"; } Sym = SymTab->SymHead; while (Sym) { - if ((Sym->Flags & (SC_CONST|SC_TYPE)) == 0) { + if ((Sym->Flags & (SC_CONST | SC_TYPEMASK)) == 0) { if (Sym->Flags & SC_AUTO) { AddTextLine ("%s, \"%s\", \"00\", auto, %d", Head, Sym->Name, Sym->V.Offs); diff --git a/src/cc65/symtab.h b/src/cc65/symtab.h index 39782d6ab..1df61a822 100644 --- a/src/cc65/symtab.h +++ b/src/cc65/symtab.h @@ -65,12 +65,22 @@ struct SymTable { /* An empty symbol table */ extern SymTable EmptySymTab; -/* Forwards */ -struct FuncDesc; +/* Lexical level linked list node type */ +typedef struct LexicalLevel LexicalLevel; +struct LexicalLevel { + LexicalLevel* PrevLex; + unsigned CurrentLevel; +}; /* Predefined lexical levels */ +#define LEX_LEVEL_NONE 0U #define LEX_LEVEL_GLOBAL 1U #define LEX_LEVEL_FUNCTION 2U +#define LEX_LEVEL_BLOCK 3U +#define LEX_LEVEL_STRUCT 4U + +/* Forwards */ +struct FuncDesc; @@ -80,9 +90,18 @@ struct FuncDesc; +unsigned GetLexicalLevelDepth (void); +/* Return the current lexical level depth */ + unsigned GetLexicalLevel (void); /* Return the current lexical level */ +void PushLexicalLevel (unsigned NewLevel); +/* Enter the specified lexical level */ + +void PopLexicalLevel (void); +/* Exit the current lexical level */ + void EnterGlobalLevel (void); /* Enter the program global lexical level */ @@ -133,9 +152,14 @@ SymEntry* FindLocalSym (const char* Name); SymEntry* FindTagSym (const char* Name); /* Find the symbol with the given name in the tag table */ -SymEntry* FindStructField (const Type* TypeArray, const char* Name); -/* Find a struct field in the fields list */ +SymEntry FindStructField (const Type* TypeArray, const char* Name); +/* Find a struct/union field in the fields list. +** Return the info about the found field symbol filled in an entry struct by +** value, or an empty entry struct if the field is not found. +*/ +unsigned short FindSPAdjustment (const char* Name); +/* Search for an entry in the table of SP adjustments */ /*****************************************************************************/ @@ -144,10 +168,14 @@ SymEntry* FindStructField (const Type* TypeArray, const char* Name); -SymEntry* AddStructSym (const char* Name, unsigned Type, unsigned Size, SymTable* Tab); +SymEntry* AddEnumSym (const char* Name, unsigned Flags, const Type* Type, SymTable* Tab, unsigned* DSFlags); +/* Add an enum entry and return it */ + +SymEntry* AddStructSym (const char* Name, unsigned Flags, unsigned Size, SymTable* Tab, unsigned* DSFlags); /* Add a struct/union entry and return it */ -SymEntry* AddBitField (const char* Name, unsigned Offs, unsigned BitOffs, unsigned Width); +SymEntry* AddBitField (const char* Name, const Type* Type, unsigned Offs, + unsigned BitOffs, unsigned BitWidth, int SignednessSpecified); /* Add a bit field to the local symbol table and return the symbol entry */ SymEntry* AddConstSym (const char* Name, const Type* T, unsigned Flags, long Val); @@ -157,7 +185,7 @@ SymEntry* AddLabelSym (const char* Name, unsigned Flags); /* Add a goto label to the symbol table */ SymEntry* AddLocalSym (const char* Name, const Type* T, unsigned Flags, int Offs); -/* Add a local symbol and return the symbol entry */ +/* Add a local or struct/union field symbol and return the symbol entry */ SymEntry* AddGlobalSym (const char* Name, const Type* T, unsigned Flags); /* Add an external or global symbol to the symbol table and return the entry */ @@ -176,6 +204,12 @@ SymTable* GetSymTab (void); SymTable* GetGlobalSymTab (void); /* Return the global symbol table */ +SymTable* GetFieldSymTab (void); +/* Return the current field symbol table */ + +SymTable* GetLabelSymTab (void); +/* Return the label symbol table */ + int SymIsLocal (SymEntry* Sym); /* Return true if the symbol is defined in the highest lexical level */ diff --git a/src/cc65/testexpr.c b/src/cc65/testexpr.c index 5bb7bf7e4..bad8b95f1 100644 --- a/src/cc65/testexpr.c +++ b/src/cc65/testexpr.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2004 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -32,7 +32,7 @@ /*****************************************************************************/ - + /* cc65 */ #include "codegen.h" #include "error.h" @@ -58,14 +58,19 @@ unsigned Test (unsigned Label, int Invert) ExprDesc Expr; unsigned Result; + ED_Init (&Expr); + /* Read a boolean expression */ BoolExpr (hie0, &Expr); - /* Check for a constant expression */ + /* Check for a constant numeric expression */ if (ED_IsConstAbs (&Expr)) { + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_NONE, &Expr); + /* Result is constant, so we know the outcome */ - Result = (Expr.IVal != 0); + Result = (Expr.IVal != 0) ? TESTEXPR_TRUE : TESTEXPR_FALSE; /* Constant rvalue */ if (!Invert && Expr.IVal == 0) { @@ -75,19 +80,33 @@ unsigned Test (unsigned Label, int Invert) g_jump (Label); } + } else if (ED_IsAddrExpr (&Expr)) { + + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_NONE, &Expr); + + /* Object addresses are non-NULL */ + Result = TESTEXPR_TRUE; + + /* Condition is always true */ + if (Invert) { + g_jump (Label); + } + } else { /* Result is unknown */ Result = TESTEXPR_UNKNOWN; - /* If the expr hasn't set condition codes, set the force-test flag */ - if (!ED_IsTested (&Expr)) { - ED_MarkForTest (&Expr); - } + /* Set the test flag */ + ED_RequireTest (&Expr); /* Load the value into the primary register */ LoadExpr (CF_FORCECHAR, &Expr); + /* Append deferred inc/dec at sequence point */ + DoDeferred (SQP_KEEP_TEST, &Expr); + /* Generate the jump */ if (Invert) { g_truejump (CF_NONE, Label); diff --git a/src/cc65/testexpr.h b/src/cc65/testexpr.h index 478280a28..84b957af2 100644 --- a/src/cc65/testexpr.h +++ b/src/cc65/testexpr.h @@ -44,9 +44,9 @@ -#define TESTEXPR_UNKNOWN 0 /* Result of expression unknown */ +#define TESTEXPR_UNKNOWN -1 /* Result of expression unknown */ #define TESTEXPR_TRUE 1 /* Expression yields true */ -#define TESTEXPR_FALSE 2 /* Expression yields false */ +#define TESTEXPR_FALSE 0 /* Expression yields false */ diff --git a/src/cc65/typecmp.c b/src/cc65/typecmp.c index 673dfa163..6052f4a84 100644 --- a/src/cc65/typecmp.c +++ b/src/cc65/typecmp.c @@ -36,6 +36,7 @@ #include <string.h> /* cc65 */ +#include "error.h" #include "funcdesc.h" #include "global.h" #include "symtab.h" @@ -49,51 +50,6 @@ -static void SetResult (typecmp_t* Result, typecmp_t Val) -/* Set a new result value if it is less than the existing one */ -{ - if (Val < *Result) { - /* printf ("SetResult = %d\n", Val); */ - *Result = Val; - } -} - - - -static int ParamsHaveDefaultPromotions (const FuncDesc* F) -/* Check if any of the parameters of function F has a default promotion. In -** this case, the function is not compatible with an empty parameter name list -** declaration. -*/ -{ - /* Get the symbol table */ - const SymTable* Tab = F->SymTab; - - /* Get the first parameter in the list */ - const SymEntry* Sym = Tab->SymHead; - - /* Walk over all parameters */ - while (Sym && (Sym->Flags & SC_PARAM)) { - - /* If this is an integer type, check if the promoted type is equal - ** to the original type. If not, we have a default promotion. - */ - if (IsClassInt (Sym->Type)) { - if (IntPromotion (Sym->Type) != Sym->Type) { - return 1; - } - } - - /* Get the pointer to the next param */ - Sym = Sym->NextSym; - } - - /* No default promotions in the parameter list */ - return 0; -} - - - static int EqualFuncParams (const FuncDesc* F1, const FuncDesc* F2) /* Compare two function symbol tables regarding function parameters. Return 1 ** if they are equal and 0 otherwise. @@ -111,8 +67,8 @@ static int EqualFuncParams (const FuncDesc* F1, const FuncDesc* F2) while (Sym1 && (Sym1->Flags & SC_PARAM) && Sym2 && (Sym2->Flags & SC_PARAM)) { /* Get the symbol types */ - Type* Type1 = Sym1->Type; - Type* Type2 = Sym2->Type; + const Type* Type1 = Sym1->Type; + const Type* Type2 = Sym2->Type; /* If either of both functions is old style, apply the default ** promotions to the parameter type. @@ -129,7 +85,7 @@ static int EqualFuncParams (const FuncDesc* F1, const FuncDesc* F2) } /* Compare this field */ - if (TypeCmp (Type1, Type2) < TC_EQUAL) { + if (TypeCmp (Type1, Type2).C < TC_EQUAL) { /* Field types not equal */ return 0; } @@ -148,37 +104,135 @@ static int EqualFuncParams (const FuncDesc* F1, const FuncDesc* F2) -static int EqualSymTables (SymTable* Tab1, SymTable* Tab2) -/* Compare two symbol tables. Return 1 if they are equal and 0 otherwise */ +static void SetResult (typecmp_t* Result, typecmpcode_t Val) +/* Set a new result value if it is less than the existing one */ { - /* Compare the parameter lists */ - SymEntry* Sym1 = Tab1->SymHead; - SymEntry* Sym2 = Tab2->SymHead; - - /* Compare the fields */ - while (Sym1 && Sym2) { - - /* Compare the names of this field */ - if (!HasAnonName (Sym1) || !HasAnonName (Sym2)) { - if (strcmp (Sym1->Name, Sym2->Name) != 0) { - /* Names are not identical */ - return 0; + if (Val < Result->C) { + if (Result->Indirections > 0) { + if (Val >= TC_STRICT_COMPATIBLE) { + /* Arrays etc. */ + Result->C = Val; + } else if (Result->Indirections == 1) { + /* C Standard allows implicit conversion as long as one side is + ** a pointer to void type, but doesn't care which side is. + */ + if ((Result->F & TCF_MASK_VOID_PTR) != 0) { + Result->C = TC_VOID_PTR; + } else if (Val == TC_SIGN_DIFF) { + /* Special treatment with pointee signedness difference */ + Result->C = TC_PTR_SIGN_DIFF; + } else { + /* Incompatible */ + Result->C = TC_PTR_INCOMPATIBLE; + } + } else { + /* Pointer-to-pointer types must have compatible pointte types, + ** or they are just incompatible. + */ + Result->C = TC_PTR_INCOMPATIBLE; } + } else { + Result->C = Val; } + /* printf ("SetResult = %d\n", Val); */ + } +} - /* Compare the types of this field */ - if (TypeCmp (Sym1->Type, Sym2->Type) < TC_EQUAL) { - /* Field types not equal */ - return 0; + + +static typecmp_t* CmpQuals (const Type* lhst, const Type* rhst, typecmp_t* Result) +/* Copare the types regarding thier qualifiers. Return the Result */ +{ + TypeCode LeftQual, RightQual; + + /* Get the left and right qualifiers */ + LeftQual = GetQualifier (lhst); + RightQual = GetQualifier (rhst); + + /* If type is function without a calling convention set explicitly, + ** then assume the default one. + */ + if (IsTypeFunc (lhst)) { + if ((LeftQual & T_QUAL_CCONV) == T_QUAL_NONE) { + LeftQual |= (AutoCDecl || IsVariadicFunc (lhst)) ? T_QUAL_CDECL : T_QUAL_FASTCALL; + } + } + if (IsTypeFunc (rhst)) { + if ((RightQual & T_QUAL_CCONV) == T_QUAL_NONE) { + RightQual |= (AutoCDecl || IsVariadicFunc (rhst)) ? T_QUAL_CDECL : T_QUAL_FASTCALL; } - - /* Get the pointers to the next fields */ - Sym1 = Sym1->NextSym; - Sym2 = Sym2->NextSym; } - /* Check both pointers against NULL to compare the field count */ - return (Sym1 == 0 && Sym2 == 0); + /* Default address size qualifiers */ + if ((LeftQual & T_QUAL_ADDRSIZE) == T_QUAL_NONE) { + LeftQual |= (IsTypeFunc (lhst) ? CodeAddrSizeQualifier () : DataAddrSizeQualifier ()); + } + if ((RightQual & T_QUAL_ADDRSIZE) == T_QUAL_NONE) { + RightQual |= (IsTypeFunc (rhst) ? CodeAddrSizeQualifier () : DataAddrSizeQualifier ()); + } + + /* Just return if nothing to do */ + if (LeftQual == RightQual) { + return Result; + } + + /* On the first indirection level, different qualifiers mean that the types + ** are still compatible. On the second level, that is a (maybe minor) error. + ** We create a special return-code if a qualifier is dropped from a pointer. + ** But, different calling conventions are incompatible. Starting from the + ** next level, the types are incompatible if the qualifiers differ. + */ + /* (Debugging statement) */ + /* printf ("Ind = %d %06X != %06X\n", Result->Indirections, LeftQual, RightQual); */ + switch (Result->Indirections) { + case 0: + /* Compare C qualifiers */ + if ((LeftQual & T_QUAL_CVR) > (RightQual & T_QUAL_CVR)) { + Result->F |= TCF_QUAL_IMPLICIT; + } else if ((LeftQual & T_QUAL_CVR) != (RightQual & T_QUAL_CVR)) { + Result->F |= TCF_QUAL_DIFF; + } + + /* Compare address size qualifiers */ + if ((LeftQual & T_QUAL_ADDRSIZE) != (RightQual & T_QUAL_ADDRSIZE)) { + Result->F |= TCF_ADDRSIZE_QUAL_DIFF; + } + + /* Compare function calling conventions */ + if ((LeftQual & T_QUAL_CCONV) != (RightQual & T_QUAL_CCONV)) { + SetResult (Result, TC_INCOMPATIBLE); + } + break; + + case 1: + /* A non-const value on the right is compatible to a + ** const one to the left, same for volatile. + */ + if ((LeftQual & T_QUAL_CVR) > (RightQual & T_QUAL_CVR)) { + Result->F |= TCF_PTR_QUAL_IMPLICIT; + } else if ((LeftQual & T_QUAL_CVR) != (RightQual & T_QUAL_CVR)) { + Result->F |= TCF_PTR_QUAL_DIFF; + } + + /* Compare address size qualifiers */ + if ((LeftQual & T_QUAL_ADDRSIZE) != (RightQual & T_QUAL_ADDRSIZE)) { + Result->F |= TCF_ADDRSIZE_QUAL_DIFF; + } + + /* Compare function calling conventions */ + if ((!IsTypeFunc (lhst) && !IsTypeFunc (rhst)) || + (LeftQual & T_QUAL_CCONV) == (RightQual & T_QUAL_CCONV)) { + break; + } + /* else fall through */ + + default: + /* Pointer types mismatch */ + SetResult (Result, TC_INCOMPATIBLE); + break; + } + + return Result; } @@ -186,120 +240,126 @@ static int EqualSymTables (SymTable* Tab1, SymTable* Tab2) static void DoCompare (const Type* lhs, const Type* rhs, typecmp_t* Result) /* Recursively compare two types. */ { - unsigned Indirections; - unsigned ElementCount; SymEntry* Sym1; SymEntry* Sym2; - SymTable* Tab1; - SymTable* Tab2; FuncDesc* F1; FuncDesc* F2; + TypeCode LeftType, RightType; + long LeftCount, RightCount; - /* Initialize stuff */ - Indirections = 0; - ElementCount = 0; - /* Compare two types. Determine, where they differ */ while (lhs->C != T_END) { - TypeCode LeftType, RightType; - TypeCode LeftSign, RightSign; - TypeCode LeftQual, RightQual; - long LeftCount, RightCount; - /* Check if the end of the type string is reached */ if (rhs->C == T_END) { /* End of comparison reached */ + break; + } + + /* Compare qualifiers */ + if (CmpQuals (lhs, rhs, Result)->C == TC_INCOMPATIBLE) { return; } - /* Get the raw left and right types, signs and qualifiers */ - LeftType = GetType (lhs); - RightType = GetType (rhs); - LeftSign = GetSignedness (lhs); - RightSign = GetSignedness (rhs); - LeftQual = GetQualifier (lhs); - RightQual = GetQualifier (rhs); + /* Get the left and right types */ + LeftType = (GetUnderlyingTypeCode (lhs) & T_MASK_TYPE); + RightType = (GetUnderlyingTypeCode (rhs) & T_MASK_TYPE); - /* If the left type is a pointer and the right is an array, both - ** are compatible. + /* If one side is a pointer and the other side is an array, both are + ** compatible. */ if (LeftType == T_TYPE_PTR && RightType == T_TYPE_ARRAY) { RightType = T_TYPE_PTR; + SetResult (Result, TC_PTR_DECAY); + } + if (LeftType == T_TYPE_ARRAY && RightType == T_TYPE_PTR) { + LeftType = T_TYPE_PTR; + SetResult (Result, TC_STRICT_COMPATIBLE); } - /* If the raw types are not identical, the types are incompatible */ + /* Bit-fields are considered compatible if they have the same + ** signedness, bit-offset and bit-width. + */ + if (IsTypeBitField (lhs) || IsTypeBitField (rhs)) { + if (!IsTypeBitField (lhs) || + !IsTypeBitField (rhs) || + lhs->A.B.Offs != rhs->A.B.Offs || + lhs->A.B.Width != rhs->A.B.Width) { + SetResult (Result, TC_INCOMPATIBLE); + } + if (LeftType != RightType) { + SetResult (Result, TC_STRICT_COMPATIBLE); + } + } + + /* If the underlying types are not identical, the types are incompatible */ if (LeftType != RightType) { SetResult (Result, TC_INCOMPATIBLE); return; } - /* On indirection level zero, a qualifier or sign difference is - ** accepted. The types are no longer equal, but compatible. - */ - if (LeftSign != RightSign) { - if (ElementCount == 0) { - SetResult (Result, TC_SIGN_DIFF); - } else { - SetResult (Result, TC_INCOMPATIBLE); - return; - } - } + /* Enums must be handled specially */ + if ((IsTypeEnum (lhs) || IsTypeEnum (rhs))) { - if (LeftType == T_TYPE_FUNC) { - /* If a calling convention wasn't set explicitly, - ** then assume the default one. - */ - if ((LeftQual & T_QUAL_CCONV) == T_QUAL_NONE) { - LeftQual |= (AutoCDecl || IsVariadicFunc (lhs)) ? T_QUAL_CDECL : T_QUAL_FASTCALL; - } - if ((RightQual & T_QUAL_CCONV) == T_QUAL_NONE) { - RightQual |= (AutoCDecl || IsVariadicFunc (rhs)) ? T_QUAL_CDECL : T_QUAL_FASTCALL; - } - } + /* Compare the tag types */ + Sym1 = IsTypeEnum (lhs) ? GetESUSymEntry (lhs) : 0; + Sym2 = IsTypeEnum (rhs) ? GetESUSymEntry (rhs) : 0; - if (LeftQual != RightQual) { - /* On the first indirection level, different qualifiers mean - ** that the types still are compatible. On the second level, - ** that is a (maybe minor) error. We create a special return-code - ** if a qualifier is dropped from a pointer. But, different calling - ** conventions are incompatible. Starting from the next level, - ** the types are incompatible if the qualifiers differ. - */ - /* (Debugging statement) */ - /* printf ("Ind = %d %06X != %06X\n", Indirections, LeftQual, RightQual); */ - switch (Indirections) { - case 0: + if (Sym1 != Sym2) { + if (Sym1 == 0 || Sym2 == 0) { + + /* Only one is an enum. So they can't be identical */ SetResult (Result, TC_STRICT_COMPATIBLE); - break; - case 1: - /* A non-const value on the right is compatible to a - ** const one to the left, same for volatile. + } else { + /* For the two to be identical, they must be in the same + ** scope and have the same name. */ - if ((LeftQual & T_QUAL_CONST) < (RightQual & T_QUAL_CONST) || - (LeftQual & T_QUAL_VOLATILE) < (RightQual & T_QUAL_VOLATILE)) { - SetResult (Result, TC_QUAL_DIFF); - } else { - SetResult (Result, TC_STRICT_COMPATIBLE); - } + if (Sym1->Owner != Sym2->Owner || + strcmp (Sym1->Name, Sym2->Name) != 0) { - if (LeftType != T_TYPE_FUNC || (LeftQual & T_QUAL_CCONV) == (RightQual & T_QUAL_CCONV)) { - break; + /* If any one of the two is incomplete, we can't guess + ** their underlying types and have to assume that they + ** be incompatible. + */ + if (SizeOf (lhs) == 0 || SizeOf (rhs) == 0) { + SetResult (Result, TC_INCOMPATIBLE); + return; + } } - /* else fall through */ - - default: - SetResult (Result, TC_INCOMPATIBLE); - return; + } } + + } + + /* 'char' is neither 'signed char' nor 'unsigned char' */ + if ((IsISOChar (lhs) && !IsISOChar (rhs)) || + (!IsISOChar (lhs) && IsISOChar (rhs))) { + SetResult (Result, TC_SIGN_DIFF); + } + + /* On indirection level zero, a sign difference is accepted. + ** The types are no longer equal, but compatible. + */ + if (GetSignedness (lhs) != GetSignedness (rhs)) { + SetResult (Result, TC_SIGN_DIFF); } /* Check for special type elements */ switch (LeftType) { case T_TYPE_PTR: - ++Indirections; + ++Result->Indirections; + if (Result->Indirections == 1) { + if ((GetUnderlyingTypeCode (lhs + 1) & T_MASK_TYPE) == T_TYPE_VOID) { + Result->F |= TCF_VOID_PTR_ON_LEFT; + } + if ((GetUnderlyingTypeCode (rhs + 1) & T_MASK_TYPE) == T_TYPE_VOID) { + Result->F |= TCF_VOID_PTR_ON_RIGHT; + } + } else { + Result->F &= ~TCF_MASK_VOID_PTR; + } break; case T_TYPE_FUNC: @@ -307,29 +367,16 @@ static void DoCompare (const Type* lhs, const Type* rhs, typecmp_t* Result) F1 = GetFuncDesc (lhs); F2 = GetFuncDesc (rhs); - /* If one of both functions has an empty parameter list (which - ** does also mean, it is not a function definition, because the - ** flag is reset in this case), it is considered equal to any - ** other definition, provided that the other has no default - ** promotions in the parameter list. If none of both parameter - ** lists is empty, we have to check the parameter lists and - ** other attributes. + /* If one of both function declarations has an empty parameter + ** list (which does also mean, it is not a function definition, + ** because the flag is reset in this case), it is ignored for + ** parameter comparison and considered equal to the other one, + ** provided both have the same return type and other attributes. + ** If neither of both parameter lists is empty, we have to check + ** the parameter lists. */ - if (F1->Flags & FD_EMPTY) { - if ((F2->Flags & FD_EMPTY) == 0) { - if (ParamsHaveDefaultPromotions (F2)) { - /* Flags differ */ - SetResult (Result, TC_INCOMPATIBLE); - return; - } - } - } else if (F2->Flags & FD_EMPTY) { - if (ParamsHaveDefaultPromotions (F1)) { - /* Flags differ */ - SetResult (Result, TC_INCOMPATIBLE); - return; - } - } else { + if ((F1->Flags & FD_EMPTY) == 0 && + (F2->Flags & FD_EMPTY) == 0) { /* Check the remaining flags */ if ((F1->Flags & ~FD_IGNORE) != (F2->Flags & ~FD_IGNORE)) { @@ -353,64 +400,57 @@ static void DoCompare (const Type* lhs, const Type* rhs, typecmp_t* Result) /* Check member count */ LeftCount = GetElementCount (lhs); RightCount = GetElementCount (rhs); - if (LeftCount != UNSPECIFIED && - RightCount != UNSPECIFIED && - LeftCount != RightCount) { - /* Member count given but different */ - SetResult (Result, TC_INCOMPATIBLE); - return; + if (LeftCount != RightCount) { + if (LeftCount != UNSPECIFIED && + RightCount != UNSPECIFIED) { + /* Member count given but different */ + SetResult (Result, TC_INCOMPATIBLE); + return; + } + + /* We take into account which side is more specified */ + if (LeftCount == UNSPECIFIED) { + SetResult (Result, TC_UNSPECIFY); + } else { + SetResult (Result, TC_EQUAL); + } } break; case T_TYPE_STRUCT: case T_TYPE_UNION: - /* Compare the fields recursively. To do that, we fetch the - ** pointer to the struct definition from the type, and compare - ** the fields. - */ - Sym1 = GetSymEntry (lhs); - Sym2 = GetSymEntry (rhs); + /* Compare the tag types */ + Sym1 = GetESUSymEntry (lhs); + Sym2 = GetESUSymEntry (rhs); - /* If one symbol has a name, the names must be identical */ - if (!HasAnonName (Sym1) || !HasAnonName (Sym2)) { - if (strcmp (Sym1->Name, Sym2->Name) != 0) { - /* Names are not identical */ + CHECK (Sym1 != 0 || Sym2 != 0); + + if (Sym1 != Sym2) { + /* Both must be in the same scope and have the same name to + ** be identical. + */ + if (Sym1->Owner != Sym2->Owner || + strcmp (Sym1->Name, Sym2->Name) != 0) { + /* This shouldn't happen in the current code base, but + ** we still handle this case to be future-proof. + */ SetResult (Result, TC_INCOMPATIBLE); return; } } - /* Get the field tables from the struct entry */ - Tab1 = Sym1->V.S.SymTab; - Tab2 = Sym2->V.S.SymTab; - - /* One or both structs may be forward definitions. In this case, - ** the symbol tables are both non existant. Assume that the - ** structs are equal in this case. - */ - if (Tab1 != 0 && Tab2 != 0) { - - if (EqualSymTables (Tab1, Tab2) == 0) { - /* Field lists are not equal */ - SetResult (Result, TC_INCOMPATIBLE); - return; - } - - } - - /* Structs are equal */ + /* Both are identical */ break; } /* Next type string element */ ++lhs; ++rhs; - ++ElementCount; } - /* Check if end of rhs reached */ - if (rhs->C == T_END) { - SetResult (Result, TC_EQUAL); + /* Check if lhs and rhs both reached ends */ + if (lhs->C == T_END && rhs->C == T_END) { + SetResult (Result, TC_IDENTICAL); } else { SetResult (Result, TC_INCOMPATIBLE); } @@ -422,7 +462,7 @@ typecmp_t TypeCmp (const Type* lhs, const Type* rhs) /* Compare two types and return the result */ { /* Assume the types are identical */ - typecmp_t Result = TC_IDENTICAL; + typecmp_t Result = TYPECMP_INITIALIZER; #if 0 printf ("Left : "); PrintRawType (stdout, lhs); @@ -437,3 +477,21 @@ typecmp_t TypeCmp (const Type* lhs, const Type* rhs) /* Return the result */ return Result; } + + + +void TypeCompatibilityDiagnostic (const Type* NewType, const Type* OldType, int IsError, const char* Msg) +/* Print error or warning message about type compatibility with proper type names */ +{ + StrBuf NewTypeName = STATIC_STRBUF_INITIALIZER; + StrBuf OldTypeName = STATIC_STRBUF_INITIALIZER; + GetFullTypeNameBuf (&NewTypeName, NewType); + GetFullTypeNameBuf (&OldTypeName, OldType); + if (IsError) { + Error (Msg, SB_GetConstBuf (&NewTypeName), SB_GetConstBuf (&OldTypeName)); + } else { + Warning (Msg, SB_GetConstBuf (&NewTypeName), SB_GetConstBuf (&OldTypeName)); + } + SB_Done (&OldTypeName); + SB_Done (&NewTypeName); +} diff --git a/src/cc65/typecmp.h b/src/cc65/typecmp.h index 5f95e42a1..367df5245 100644 --- a/src/cc65/typecmp.h +++ b/src/cc65/typecmp.h @@ -48,18 +48,44 @@ -/* Degree of type compatibility. Must be in ascending order */ +/* Degree of type compatibility affected. Must be in ascending order */ typedef enum { - TC_INCOMPATIBLE, /* Distinct types */ - TC_SIGN_DIFF, /* Signedness differs */ - TC_COMPATIBLE = TC_SIGN_DIFF, /* Compatible types */ - TC_QUAL_DIFF, /* Types differ in qualifier of pointer */ - TC_STRICT_COMPATIBLE, /* Strict compatibility */ - TC_EQUAL, /* Types are equal */ - TC_IDENTICAL /* Types are identical */ + TC_INCOMPATIBLE, /* Distinct types */ + TC_SIGN_DIFF, /* Signedness differs */ + TC_PTR_SIGN_DIFF, /* Pointee signedness differs */ + TC_PTR_INCOMPATIBLE, /* Distinct pointer types */ + TC_VOID_PTR, /* Non-void and void pointers */ + TC_STRICT_COMPATIBLE, /* Strict compatibility according to the C Standard */ + TC_PTR_DECAY, /* rhs is an array and lhs is a pointer */ + TC_EQUAL, /* Array types with unspecified lengths */ + TC_UNSPECIFY, /* lhs has unspecified length while rhs has specified length */ + TC_IDENTICAL /* Types are identical */ +} typecmpcode_t; + +/* Degree of type compatibility affected by qualifiers as well as some extra info */ +typedef enum { + TCF_NONE = 0x00, /* None of the below */ + TCF_VOID_PTR_ON_LEFT = 0x01, /* lhs is a void pointer */ + TCF_VOID_PTR_ON_RIGHT = 0x02, /* rhs is a void pointer */ + TCF_MASK_VOID_PTR = TCF_VOID_PTR_ON_LEFT | TCF_VOID_PTR_ON_RIGHT, + TCF_QUAL_DIFF = 0x04, /* CVR qualifiers differ in a way that doesn't matter */ + TCF_QUAL_IMPLICIT = 0x08, /* CVR qualifiers of lhs are stricter than those of rhs */ + TCF_PTR_QUAL_DIFF = 0x10, /* CVR qualifiers of pointers differ */ + TCF_PTR_QUAL_IMPLICIT = 0x20, /* CVR qualifiers of pointers are stricter on lhs than those on rhs */ + TCF_MASK_C_QUAL_DIFF = 0x3C, /* All C Standard qualifiers */ + TCF_ADDRSIZE_QUAL_DIFF = 0x40, /* Address size qualifiers differ */ + TCF_CCONV_QUAL_DIFF = 0x80, /* Function calling conventions differ. Unused now */ + TCF_INCOMPATIBLE_QUAL = TCF_ADDRSIZE_QUAL_DIFF | TCF_CCONV_QUAL_DIFF, + TCF_MASK_QUAL = TCF_MASK_C_QUAL_DIFF | TCF_INCOMPATIBLE_QUAL, +} typecmpflag_t; + +typedef struct { + typecmpcode_t C; + typecmpflag_t F; + int Indirections; } typecmp_t; - +#define TYPECMP_INITIALIZER { TC_IDENTICAL, TCF_NONE, 0 } /*****************************************************************************/ /* Code */ @@ -70,6 +96,9 @@ typedef enum { typecmp_t TypeCmp (const Type* lhs, const Type* rhs); /* Compare two types and return the result */ +void TypeCompatibilityDiagnostic (const Type* NewType, const Type* OldType, int IsError, const char* Msg); +/* Print error or warning message about type compatibility with proper type names */ + /* End of typecmp.h */ diff --git a/src/cc65/typeconv.c b/src/cc65/typeconv.c index e4edd6a2e..c72b2c5eb 100644 --- a/src/cc65/typeconv.c +++ b/src/cc65/typeconv.c @@ -42,8 +42,8 @@ #include "declare.h" #include "error.h" #include "expr.h" +#include "funcdesc.h" #include "loadexpr.h" -#include "scanner.h" #include "typecmp.h" #include "typeconv.h" @@ -58,9 +58,9 @@ static void DoConversion (ExprDesc* Expr, const Type* NewType) /* Emit code to convert the given expression to a new type. */ { - Type* OldType; - unsigned OldSize; - unsigned NewSize; + const Type* OldType; + unsigned OldBits; + unsigned NewBits; /* Remember the old type */ @@ -70,21 +70,30 @@ static void DoConversion (ExprDesc* Expr, const Type* NewType) ** conversion void -> void. */ if (IsTypeVoid (NewType)) { - ED_MakeRVal (Expr); /* Never an lvalue */ + ED_MarkExprAsRVal (Expr); /* Never an lvalue */ goto ExitPoint; } /* Don't allow casts from void to something else. */ if (IsTypeVoid (OldType)) { - Error ("Cannot convert from `void' to something else"); + Error ("Cannot convert from 'void' to something else"); goto ExitPoint; } /* Get the sizes of the types. Since we've excluded void types, checking ** for known sizes makes sense here. */ - OldSize = CheckedSizeOf (OldType); - NewSize = CheckedSizeOf (NewType); + if (IsTypeBitField (OldType)) { + OldBits = OldType->A.B.Width; + } else { + OldBits = CheckedSizeOf (OldType) * CHAR_BITS; + } + + /* If the new type is a bit-field, we use its underlying type instead */ + if (IsTypeBitField (NewType)) { + NewType = GetUnderlyingType (NewType); + } + NewBits = CheckedSizeOf (NewType) * CHAR_BITS; /* lvalue? */ if (ED_IsLVal (Expr)) { @@ -97,27 +106,23 @@ static void DoConversion (ExprDesc* Expr, const Type* NewType) ** If both sizes are equal, do also leave the value alone. ** If the new size is larger, we must convert the value. */ - if (NewSize > OldSize) { + if (NewBits > OldBits) { /* Load the value into the primary */ LoadExpr (CF_NONE, Expr); /* Emit typecast code */ - g_typecast (TypeOf (NewType), TypeOf (OldType) | CF_FORCECHAR); + g_typecast (TypeOf (NewType), TypeOf (OldType)); /* Value is now in primary and an rvalue */ - ED_MakeRValExpr (Expr); + ED_FinalizeRValLoad (Expr); } - } else if (ED_IsLocAbs (Expr)) { + } else if (ED_IsConstAbs (Expr)) { /* A cast of a constant numeric value to another type. Be sure ** to handle sign extension correctly. */ - /* Get the current and new size of the value */ - unsigned OldBits = OldSize * 8; - unsigned NewBits = NewSize * 8; - /* Check if the new datatype will have a smaller range. If it ** has a larger range, things are OK, since the value is ** internally already represented by a long. @@ -136,22 +141,31 @@ static void DoConversion (ExprDesc* Expr, const Type* NewType) } } + /* Do the integer constant <-> absolute address conversion if necessary */ + if (IsClassPtr (NewType)) { + Expr->Flags &= ~E_MASK_LOC; + Expr->Flags |= E_LOC_ABS | E_ADDRESS_OF; + } else if (IsClassInt (NewType)) { + Expr->Flags &= ~(E_MASK_LOC | E_ADDRESS_OF); + Expr->Flags |= E_LOC_NONE; + } + } else { /* The value is not a constant. If the sizes of the types are ** not equal, add conversion code. Be sure to convert chars ** correctly. */ - if (OldSize != NewSize) { + if (OldBits != NewBits) { /* Load the value into the primary */ LoadExpr (CF_NONE, Expr); /* Emit typecast code. */ - g_typecast (TypeOf (NewType), TypeOf (OldType) | CF_FORCECHAR); + g_typecast (TypeOf (NewType), TypeOf (OldType)); - /* Value is now a rvalue in the primary */ - ED_MakeRValExpr (Expr); + /* Value is now an rvalue in the primary */ + ED_FinalizeRValLoad (Expr); } } @@ -162,7 +176,7 @@ ExitPoint: -void TypeConversion (ExprDesc* Expr, Type* NewType) +void TypeConversion (ExprDesc* Expr, const Type* NewType) /* Do an automatic conversion of the given expression to the new type. Output ** warnings or errors where this automatic conversion is suspicious or ** impossible. @@ -177,24 +191,25 @@ void TypeConversion (ExprDesc* Expr, Type* NewType) printf ("\n"); PrintRawType (stdout, NewType); #endif - /* First, do some type checking */ - if (IsTypeVoid (NewType) || IsTypeVoid (Expr->Type)) { - /* If one of the sides are of type void, output a more apropriate - ** error message. - */ - Error ("Illegal type"); + typecmp_t Result = TYPECMP_INITIALIZER; + int HasError = 0; + const char* Msg = 0; + const Type* OldType = Expr->Type; + + + /* If one of the sides is of type void, it is an error */ + if (IsTypeVoid (NewType) || IsTypeVoid (OldType)) { + HasError = 1; } - /* If Expr is a function, convert it to pointer to function */ - if (IsTypeFunc(Expr->Type)) { - Expr->Type = PointerTo (Expr->Type); - } - - /* If both types are equal, no conversion is needed */ - if (TypeCmp (Expr->Type, NewType) >= TC_EQUAL) { - /* We're already done */ - return; + /* If both types are the same, no conversion is needed */ + Result = TypeCmp (NewType, OldType); + if (Result.C < TC_IDENTICAL && (IsTypeArray (OldType) || IsTypeFunc (OldType))) { + /* If Expr is an array or a function, convert it to a pointer */ + Expr->Type = PtrConversion (Expr->Type); + /* Recompare */ + Result = TypeCmp (NewType, Expr->Type); } /* Check for conversion problems */ @@ -202,72 +217,85 @@ void TypeConversion (ExprDesc* Expr, Type* NewType) /* Handle conversions to int type */ if (IsClassPtr (Expr->Type)) { - /* Pointer -> int conversion. Convert array to pointer */ - if (IsTypeArray (Expr->Type)) { - Expr->Type = ArrayToPtr (Expr->Type); - } Warning ("Converting pointer to integer without a cast"); } else if (!IsClassInt (Expr->Type) && !IsClassFloat (Expr->Type)) { - Error ("Incompatible types"); + HasError = 1; } - } else if (IsClassFloat (NewType)) { - if (!IsClassFloat (Expr->Type) && !IsClassInt (Expr->Type)) { - Error ("Incompatible types"); + HasError = 1; } - } else if (IsClassPtr (NewType)) { /* Handle conversions to pointer type */ if (IsClassPtr (Expr->Type)) { - /* Convert array to pointer */ - if (IsTypeArray (Expr->Type)) { - Expr->Type = ArrayToPtr (Expr->Type); - } - - /* Pointer to pointer assignment is valid, if: + /* Implicit pointer-to-pointer conversion is valid, if: ** - both point to the same types, or ** - the rhs pointer is a void pointer, or ** - the lhs pointer is a void pointer. + ** Note: We additionally allow converting function pointers to and from + ** void pointers, just with warnings. */ - if (!IsTypeVoid (Indirect (NewType)) && !IsTypeVoid (Indirect (Expr->Type))) { - /* Compare the types */ - switch (TypeCmp (NewType, Expr->Type)) { - - case TC_INCOMPATIBLE: - Error ("Incompatible pointer types"); - break; - - case TC_QUAL_DIFF: - Error ("Pointer types differ in type qualifiers"); - break; - - default: - /* Ok */ - break; + if (Result.C == TC_PTR_SIGN_DIFF) { + /* Specific warning for pointee signedness difference */ + if (IS_Get (&WarnPointerSign)) { + TypeCompatibilityDiagnostic (NewType, Expr->Type, + 0, "Pointer conversion to '%s' from '%s' changes pointee signedness"); + } + } else if ((Result.C <= TC_PTR_INCOMPATIBLE || + (Result.F & TCF_INCOMPATIBLE_QUAL) != 0)) { + /* Incompatible pointee types or qualifiers */ + if (IS_Get (&WarnPointerTypes)) { + TypeCompatibilityDiagnostic (NewType, Expr->Type, + 0, "Incompatible pointer conversion to '%s' from '%s'"); } } + if ((Result.F & TCF_PTR_QUAL_DIFF) != 0) { + /* Discarding qualifiers is a bad thing and we always warn */ + TypeCompatibilityDiagnostic (NewType, Expr->Type, + 0, "Pointer conversion to '%s' from '%s' discards qualifiers"); + } + } else if (IsClassInt (Expr->Type)) { - /* Int to pointer assignment is valid only for constant zero */ + /* Int to pointer conversion is valid only for constant zero */ if (!ED_IsConstAbsInt (Expr) || Expr->IVal != 0) { Warning ("Converting integer to pointer without a cast"); } } else { - Error ("Incompatible types"); + HasError = 1; } - } else { - - /* Invalid automatic conversion */ - Error ("Incompatible types"); - + } else if (Result.C < TC_IDENTICAL) { + /* Invalid automatic conversion */ + HasError = 1; } - /* Do the actual conversion */ - DoConversion (Expr, NewType); + /* Set default diagnostic message */ + if (Msg == 0) { + Msg = "Converting to '%s' from '%s'"; + } + + if (HasError) { + TypeCompatibilityDiagnostic (NewType, OldType, 1, Msg); + } else { + /* Both types must be complete */ + if (!IsIncompleteESUType (NewType) && !IsIncompleteESUType (Expr->Type)) { + /* Do the actual conversion */ + DoConversion (Expr, NewType); + } else { + /* We should have already generated error elsewhere so that we + ** could just silently fail here to avoid excess errors, but to + ** be safe, we must ensure that we do have errors. + */ + if (IsIncompleteESUType (NewType)) { + Error ("Conversion to incomplete type '%s'", GetFullTypeName (NewType)); + } else { + Error ("Conversion from incomplete type '%s'", GetFullTypeName (Expr->Type)); + } + } + } } @@ -289,9 +317,193 @@ void TypeCast (ExprDesc* Expr) /* Read the expression we have to cast */ hie10 (Expr); - /* Convert functions and arrays to "pointer to" object */ - Expr->Type = PtrConversion (Expr->Type); + /* Only allow casts to arithmetic, pointer or void types */ + if (IsCastType (NewType)) { + if (!IsIncompleteESUType (NewType)) { + /* Convert functions and arrays to "pointer to" object */ + Expr->Type = PtrConversion (Expr->Type); - /* Convert the value. */ - DoConversion (Expr, NewType); + if (TypeCmp (NewType, Expr->Type).C >= TC_PTR_INCOMPATIBLE) { + /* If the new type has the same underlying presentation, just + ** use it to replace the old one. + */ + ReplaceType (Expr, NewType); + } else if (IsCastType (Expr->Type)) { + /* Convert the value. The result has always the new type */ + DoConversion (Expr, NewType); + } else { + TypeCompatibilityDiagnostic (NewType, Expr->Type, 1, + "Cast to incompatible type '%s' from '%s'"); + } + } else { + Error ("Cast to incomplete type '%s'", + GetFullTypeName (NewType)); + } + } else { + Error ("Arithmetic or pointer type expected but %s is used", + GetBasicTypeName (NewType)); + } + + /* If the new type is void, the cast expression can have no effects */ + if (IsTypeVoid (NewType)) { + Expr->Flags |= E_EVAL_MAYBE_UNUSED; + } + + /* The result is always an rvalue */ + ED_MarkExprAsRVal (Expr); +} + + + +static void ComposeFuncParamList (const FuncDesc* F1, const FuncDesc* F2) +/* Compose two function symbol tables regarding function parameters into F1 */ +{ + /* Get the symbol tables */ + const SymTable* Tab1 = F1->SymTab; + const SymTable* Tab2 = F2->SymTab; + + /* Compose the parameter lists */ + SymEntry* Sym1 = Tab1->SymHead; + SymEntry* Sym2 = Tab2->SymHead; + + /* Sanity check */ + CHECK ((F1->Flags & FD_EMPTY) == 0 && (F2->Flags & FD_EMPTY) == 0); + + /* Compose the fields */ + while (Sym1 && (Sym1->Flags & SC_PARAM) && Sym2 && (Sym2->Flags & SC_PARAM)) { + + /* Get the symbol types */ + const Type* Type1 = Sym1->Type; + const Type* Type2 = Sym2->Type; + + /* If either of both functions is old style, apply the default + ** promotions to the parameter type. + */ + if (F1->Flags & FD_OLDSTYLE) { + if (IsClassInt (Type1)) { + Type1 = IntPromotion (Type1); + } + } + if (F2->Flags & FD_OLDSTYLE) { + if (IsClassInt (Type2)) { + Type2 = IntPromotion (Type2); + } + } + + /* When we compose two function parameter lists with any FD_OLDSTYLE + ** flags set, we are either refining the declaration of the function + ** with its definition seen, or determining the result type of a + ** ternary operation. In either case, we can just replace the types + ** with the promoted ones since the original types of the parameters + ** only matters inside the function definition. + */ + if (Type1 != Sym1->Type) { + Sym1->Type = TypeDup (Type1); + } + + /* Compose this field */ + TypeComposition (Sym1->Type, Type2); + + /* Get the pointers to the next fields */ + Sym1 = Sym1->NextSym; + Sym2 = Sym2->NextSym; + } +} + + + +void TypeComposition (Type* lhs, const Type* rhs) +/* Recursively compose two types into lhs. The two types must have compatible +** type or this fails with a critical check. +*/ +{ + FuncDesc* F1; + FuncDesc* F2; + long LeftCount, RightCount; + + /* Compose two types */ + while (lhs->C != T_END) { + + /* Check if the end of the type string is reached */ + if (rhs->C == T_END) { + break; + } + + /* Check for sanity */ + CHECK (GetUnderlyingTypeCode (lhs) == GetUnderlyingTypeCode (rhs)); + + /* Check for special type elements */ + if (IsTypeFunc (lhs)) { + /* Compose the function descriptors */ + F1 = GetFuncDesc (lhs); + F2 = GetFuncDesc (rhs); + + /* If F1 has an empty parameter list (which does also mean, it is + ** not a function definition, because the flag is reset in this + ** case), its declaration is replaced by the other declaration. If + ** neither of the parameter lists is empty, we have to compose them + ** as well as other attributes. + */ + if ((F1->Flags & FD_EMPTY) == FD_EMPTY) { + if ((F2->Flags & FD_EMPTY) == 0) { + /* Copy the parameters and flags */ + TypeCopy (lhs, rhs); + F1->Flags = F2->Flags; + } + } else if ((F2->Flags & FD_EMPTY) == 0) { + /* Compose the parameter lists */ + ComposeFuncParamList (F1, F2); + /* Prefer non-old-style */ + if ((F2->Flags & FD_OLDSTYLE) == 0) { + F1->Flags &= ~FD_OLDSTYLE; + } + } + } else if (IsTypeArray (lhs)) { + /* Check member count */ + LeftCount = GetElementCount (lhs); + RightCount = GetElementCount (rhs); + + /* Set composite type if it is requested */ + if (LeftCount != UNSPECIFIED) { + SetElementCount (lhs, LeftCount); + } else if (RightCount != UNSPECIFIED) { + SetElementCount (lhs, RightCount); + } + } else { + /* Combine the qualifiers */ + if (IsClassPtr (lhs)) { + ++lhs; + ++rhs; + lhs->C |= GetQualifier (rhs); + } + } + + /* Next type string element */ + ++lhs; + ++rhs; + } + + return; +} + + + +FuncDesc* RefineFuncDesc (Type* OldType, const Type* NewType) +/* Refine the existing function descriptor with a new one */ +{ + FuncDesc* Old = GetFuncDesc (OldType); + FuncDesc* New = GetFuncDesc (NewType); + + CHECK (Old != 0 && New != 0); + + if ((New->Flags & FD_EMPTY) == 0) { + if ((Old->Flags & FD_EMPTY) == 0) { + TypeComposition (OldType, NewType); + } else { + TypeCopy (OldType, NewType); + Old->Flags &= ~FD_EMPTY; + } + } + + return Old; } diff --git a/src/cc65/typeconv.h b/src/cc65/typeconv.h index 8321aded4..839c5e43e 100644 --- a/src/cc65/typeconv.h +++ b/src/cc65/typeconv.h @@ -49,7 +49,7 @@ -void TypeConversion (ExprDesc* Expr, Type* NewType); +void TypeConversion (ExprDesc* Expr, const Type* NewType); /* Do an automatic conversion of the given expression to the new type. Output ** warnings or errors where this automatic conversion is suspicious or ** impossible. @@ -58,6 +58,14 @@ void TypeConversion (ExprDesc* Expr, Type* NewType); void TypeCast (ExprDesc* Expr); /* Handle an explicit cast. */ +void TypeComposition (Type* lhs, const Type* rhs); +/* Recursively compose two types into lhs. The two types must have compatible +** type or this fails with a critical check. +*/ + +FuncDesc* RefineFuncDesc (Type* OldType, const Type* NewType); +/* Refine the existing function descriptor with a new one */ + /* End of typeconv.h */ diff --git a/src/cc65/wrappedcall.c b/src/cc65/wrappedcall.c new file mode 100644 index 000000000..ecf2c3a53 --- /dev/null +++ b/src/cc65/wrappedcall.c @@ -0,0 +1,102 @@ +/*****************************************************************************/ +/* */ +/* wrappedcall.c */ +/* */ +/* WrappedCall management */ +/* */ +/* */ +/* */ +/* (C) 2017, Mega Cat Studios */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#include <stdarg.h> +#include <string.h> + +/* common */ +#include "chartype.h" +#include "check.h" +#include "coll.h" +#include "scanner.h" +#include "intptrstack.h" +#include "xmalloc.h" + +/* cc65 */ +#include "codeent.h" +#include "error.h" +#include "wrappedcall.h" + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + +/* WrappedCalls */ +static IntPtrStack WrappedCalls; + + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +void PushWrappedCall (void *Ptr, unsigned int Val) +/* Push the current WrappedCall */ +{ + if (IPS_IsFull (&WrappedCalls)) { + Error ("WrappedCall stack overflow"); + } else { + IPS_Push (&WrappedCalls, Val, Ptr); + } +} + + + +void PopWrappedCall (void) +/* Remove the current WrappedCall */ +{ + if (IPS_GetCount (&WrappedCalls) < 1) { + Error ("WrappedCall stack is empty"); + } else { + IPS_Drop (&WrappedCalls); + } +} + + + +void GetWrappedCall (void **Ptr, unsigned int *Val) +/* Get the current WrappedCall */ +{ + if (IPS_GetCount (&WrappedCalls) < 1) { + *Ptr = NULL; + *Val = 0; + } else { + long Temp; + IPS_Get (&WrappedCalls, &Temp, Ptr); + *Val = (unsigned int) Temp; + } +} diff --git a/src/cc65/wrappedcall.h b/src/cc65/wrappedcall.h new file mode 100644 index 000000000..9a1bb51bf --- /dev/null +++ b/src/cc65/wrappedcall.h @@ -0,0 +1,65 @@ +/*****************************************************************************/ +/* */ +/* wrappedcall.h */ +/* */ +/* Wrapped-call management */ +/* */ +/* */ +/* */ +/* (C) 2017, Mega Cat Studios */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef WRAPPEDCALL_H +#define WRAPPEDCALL_H + + + +#include <stdio.h> + +/* common */ +#include "attrib.h" + +/* cc65 */ +#include "opcodes.h" + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +void PushWrappedCall (void *Ptr, unsigned int Val); +/* Push the current WrappedCall */ + +void PopWrappedCall (void); +/* Pop the current WrappedCall */ + +void GetWrappedCall (void **Ptr, unsigned int *Val); +/* Get the current WrappedCall, if any */ + + +/* End of wrappedcall.h */ + +#endif diff --git a/src/chrcvt65.vcxproj b/src/chrcvt65.vcxproj new file mode 100644 index 000000000..1e5c753b5 --- /dev/null +++ b/src/chrcvt65.vcxproj @@ -0,0 +1,61 @@ +<?xml version="1.0" encoding="utf-8"?> +<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> + <ItemGroup Label="ProjectConfigurations"> + <ProjectConfiguration Include="Debug|Win32"> + <Configuration>Debug</Configuration> + <Platform>Win32</Platform> + </ProjectConfiguration> + <ProjectConfiguration Include="Release|Win32"> + <Configuration>Release</Configuration> + <Platform>Win32</Platform> + </ProjectConfiguration> + </ItemGroup> + <PropertyGroup Label="Globals"> + <ProjectGuid>{1C7A3FEF-DD0B-4B10-BC33-C3BE29BF67CC}</ProjectGuid> + <Keyword>Win32Proj</Keyword> + </PropertyGroup> + <ImportGroup Label="PropertySheets"> + <Import Project="cc65.props" /> + </ImportGroup> + <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> + <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> + <UseDebugLibraries>true</UseDebugLibraries> + </PropertyGroup> + <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> + <UseDebugLibraries>false</UseDebugLibraries> + </PropertyGroup> + <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> + <ImportGroup Label="ExtensionSettings"> + </ImportGroup> + <PropertyGroup Label="UserMacros" /> + <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> + </PropertyGroup> + <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> + </PropertyGroup> + <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> + <ClCompile> + <PreprocessorDefinitions>_CONSOLE;_DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> + </ClCompile> + <Link> + <SubSystem>Console</SubSystem> + </Link> + </ItemDefinitionGroup> + <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> + <ClCompile> + <PreprocessorDefinitions>_CONSOLE;NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> + </ClCompile> + <Link> + <SubSystem>Console</SubSystem> + </Link> + </ItemDefinitionGroup> + <ItemGroup> + <ClCompile Include="chrcvt65\error.c" /> + <ClCompile Include="chrcvt65\main.c" /> + </ItemGroup> + <ItemGroup> + <ClInclude Include="chrcvt65\error.h" /> + </ItemGroup> + <Import Project="$(VCTargetsPath)\Microsoft.Cpp.targets" /> + <ImportGroup Label="ExtensionTargets"> + </ImportGroup> +</Project> \ No newline at end of file diff --git a/src/chrcvt/error.c b/src/chrcvt65/error.c similarity index 97% rename from src/chrcvt/error.c rename to src/chrcvt65/error.c index 424080d83..d6bc57fdf 100644 --- a/src/chrcvt/error.c +++ b/src/chrcvt65/error.c @@ -2,7 +2,7 @@ /* */ /* error.c */ /* */ -/* Error handling for the chrcvt vector font converter */ +/* Error handling for the chrcvt65 vector font converter */ /* */ /* */ /* */ diff --git a/src/chrcvt/error.h b/src/chrcvt65/error.h similarity index 97% rename from src/chrcvt/error.h rename to src/chrcvt65/error.h index 93f59ccfd..c5d1474e9 100644 --- a/src/chrcvt/error.h +++ b/src/chrcvt65/error.h @@ -2,7 +2,7 @@ /* */ /* error.h */ /* */ -/* Error handling for the chrcvt vector font converter */ +/* Error handling for the chrcvt65 vector font converter */ /* */ /* */ /* */ diff --git a/src/chrcvt/main.c b/src/chrcvt65/main.c similarity index 93% rename from src/chrcvt/main.c rename to src/chrcvt65/main.c index 7b1c3219e..b2a21a114 100644 --- a/src/chrcvt/main.c +++ b/src/chrcvt65/main.c @@ -2,7 +2,7 @@ /* */ /* main.c */ /* */ -/* Main program of the chrcvt vector font converter */ +/* Main program of the chrcvt65 vector font converter */ /* */ /* */ /* */ @@ -46,7 +46,7 @@ #include "xmalloc.h" #include "version.h" -/* chrcvt */ +/* chrcvt65 */ #include "error.h" @@ -219,8 +219,8 @@ static void OptVersion (const char* Opt attribute ((unused)), /* Print the assembler version */ { fprintf (stderr, - "%s V%s - (C) Copyright 2009, Ullrich von Bassewitz\n", - ProgName, GetVersionAsString ()); + "%s V%s\n", ProgName, GetVersionAsString ()); + exit(EXIT_SUCCESS); } @@ -325,7 +325,7 @@ static void ConvertFile (const char* Input, const char* Output) /* Try to open the file for reading */ FILE* F = fopen (Input, "rb"); if (F == 0) { - Error ("Cannot open input file `%s': %s", Input, strerror (errno)); + Error ("Cannot open input file '%s': %s", Input, strerror (errno)); } /* Seek to the end and determine the size */ @@ -337,9 +337,9 @@ static void ConvertFile (const char* Input, const char* Output) /* Check if the size is reasonable */ if (Size > 32*1024) { - Error ("Input file `%s' is too large (max = 32k)", Input); + Error ("Input file '%s' is too large (max = 32k)", Input); } else if (Size < 0x100) { - Error ("Input file `%s' is too small to be a vector font file", Input); + Error ("Input file '%s' is too small to be a vector font file", Input); } /* Allocate memory for the file */ @@ -347,7 +347,7 @@ static void ConvertFile (const char* Input, const char* Output) /* Read the file contents into the buffer */ if (fread (Buf, 1, (size_t) Size, F) != (size_t) Size) { - Error ("Error reading from input file `%s'", Input); + Error ("Error reading from input file '%s'", Input); } /* Close the file */ @@ -355,14 +355,14 @@ static void ConvertFile (const char* Input, const char* Output) /* Verify the header */ if (memcmp (Buf, ChrHeader, sizeof (ChrHeader)) != 0) { - Error ("Invalid format for `%s': invalid header", Input); + Error ("Invalid format for '%s': invalid header", Input); } MsgEnd = memchr (Buf + sizeof (ChrHeader), 0x1A, 0x80); if (MsgEnd == 0) { - Error ("Invalid format for `%s': description not found", Input); + Error ("Invalid format for '%s': description not found", Input); } if (MsgEnd[1] != 0x80 || MsgEnd[2] != 0x00) { - Error ("Invalid format for `%s': wrong header size", Input); + Error ("Invalid format for '%s': wrong header size", Input); } /* We expect the file to hold chars from 0x20 (space) to 0x7E (tilde) */ @@ -372,9 +372,9 @@ static void ConvertFile (const char* Input, const char* Output) if (FirstChar > 0x20 || LastChar < 0x7E) { Print (stderr, 1, "FirstChar = $%04X, CharCount = %u\n", FirstChar, CharCount); - Error ("File `%s' doesn't contain the chars we need", Input); + Error ("File '%s' doesn't contain the chars we need", Input); } else if (LastChar >= 0x100) { - Error ("File `%s' contains too many character definitions", Input); + Error ("File '%s' contains too many character definitions", Input); } /* Print the copyright from the header */ @@ -405,7 +405,7 @@ static void ConvertFile (const char* Input, const char* Output) /* Check if the offset is valid */ if (Remaining <= 0) { - Error ("Invalid data offset in input file `%s'", Input); + Error ("Invalid data offset in input file '%s'", Input); } /* Convert the vector data and place it into the buffer */ @@ -422,7 +422,7 @@ static void ConvertFile (const char* Input, const char* Output) /* The baseline must be zero, otherwise we cannot convert */ if (Buf[0x89] != 0) { - Error ("Baseline of font in `%s' is not zero", Input); + Error ("Baseline of font in '%s' is not zero", Input); } /* If the output file is NULL, use the name of the input file with ".tch" @@ -435,33 +435,33 @@ static void ConvertFile (const char* Input, const char* Output) /* Open the output file */ F = fopen (Output, "wb"); if (F == 0) { - Error ("Cannot open output file `%s': %s", Output, strerror (errno)); + Error ("Cannot open output file '%s': %s", Output, strerror (errno)); } /* Write the header to the output file */ if (fwrite (TchHeader, 1, sizeof (TchHeader), F) != sizeof (TchHeader)) { - Error ("Error writing to `%s' (disk full?)", Output); + Error ("Error writing to '%s' (disk full?)", Output); } /* Write the width table to the output file */ if (fwrite (WidthBuf, 1, 0x5F, F) != 0x5F) { - Error ("Error writing to `%s' (disk full?)", Output); + Error ("Error writing to '%s' (disk full?)", Output); } /* Write the offsets to the output file */ if (fwrite (SB_GetConstBuf (&Offsets), 1, 0x5F * 2, F) != 0x5F * 2) { - Error ("Error writing to `%s' (disk full?)", Output); + Error ("Error writing to '%s' (disk full?)", Output); } /* Write the data to the output file */ Offs = SB_GetLen (&VectorData); if (fwrite (SB_GetConstBuf (&VectorData), 1, Offs, F) != Offs) { - Error ("Error writing to `%s' (disk full?)", Output); + Error ("Error writing to '%s' (disk full?)", Output); } /* Close the output file */ if (fclose (F) != 0) { - Error ("Error closing to `%s': %s", Output, strerror (errno)); + Error ("Error closing to '%s': %s", Output, strerror (errno)); } /* Done */ @@ -482,7 +482,7 @@ int main (int argc, char* argv []) unsigned I; /* Initialize the cmdline module */ - InitCmdLine (&argc, &argv, "chrcvt"); + InitCmdLine (&argc, &argv, "chrcvt65"); /* Check the parameters */ I = 1; diff --git a/src/cl65.vcxproj b/src/cl65.vcxproj index 64c1126b1..67b7eb087 100644 --- a/src/cl65.vcxproj +++ b/src/cl65.vcxproj @@ -1,5 +1,5 @@ <?xml version="1.0" encoding="utf-8"?> -<Project DefaultTargets="Build" ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> +<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <ItemGroup Label="ProjectConfigurations"> <ProjectConfiguration Include="Debug|Win32"> <Configuration>Debug</Configuration> @@ -13,65 +13,39 @@ <PropertyGroup Label="Globals"> <ProjectGuid>{F657912F-050A-488B-B203-50ED5715CDD7}</ProjectGuid> <Keyword>Win32Proj</Keyword> - <RootNamespace>cl65</RootNamespace> </PropertyGroup> + <ImportGroup Label="PropertySheets"> + <Import Project="cc65.props" /> + </ImportGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> <UseDebugLibraries>true</UseDebugLibraries> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> <UseDebugLibraries>false</UseDebugLibraries> - <WholeProgramOptimization>true</WholeProgramOptimization> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> <ImportGroup Label="ExtensionSettings"> </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> <PropertyGroup Label="UserMacros" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <LinkIncremental>true</LinkIncremental> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> <ClCompile> - <PrecompiledHeader> - </PrecompiledHeader> - <WarningLevel>Level3</WarningLevel> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;_DEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;_DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>true</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> <ClCompile> - <WarningLevel>Level3</WarningLevel> - <PrecompiledHeader> - </PrecompiledHeader> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;NDEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>false</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemGroup> diff --git a/src/cl65/error.c b/src/cl65/error.c index ee2adcfcc..9c234681f 100644 --- a/src/cl65/error.c +++ b/src/cl65/error.c @@ -39,7 +39,7 @@ /* common */ #include "cmdline.h" - + /* cl65 */ #include "global.h" #include "error.h" diff --git a/src/cl65/error.h b/src/cl65/error.h index b1ff30660..fdf55c758 100644 --- a/src/cl65/error.h +++ b/src/cl65/error.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/cl65/main.c b/src/cl65/main.c index 4268a569b..67e9444f4 100644 --- a/src/cl65/main.c +++ b/src/cl65/main.c @@ -73,6 +73,7 @@ #include "filetype.h" #include "fname.h" #include "mmodel.h" +#include "searchpath.h" #include "strbuf.h" #include "target.h" #include "version.h" @@ -111,6 +112,9 @@ static CmdDesc CO65 = { 0, 0, 0, 0, 0, 0, 0 }; static CmdDesc LD65 = { 0, 0, 0, 0, 0, 0, 0 }; static CmdDesc GRC = { 0, 0, 0, 0, 0, 0, 0 }; +/* Pseudo-command to track files we want to delete */ +static CmdDesc RM = { 0, 0, 0, 0, 0, 0, 0 }; + /* Variables controlling the steps we're doing */ static int DoLink = 1; static int DoAssemble = 1; @@ -137,7 +141,8 @@ static int Module = 0; #define MODULE_EXT ".o65" /* Name of the target specific runtime library */ -static char* TargetLib = 0; +static char* TargetLib = 0; +static int NoTargetLib = 0; @@ -157,21 +162,77 @@ static char* TargetLib = 0; +/*****************************************************************************/ +/* Credential functions */ +/*****************************************************************************/ + + + +static void DisableAssembling (void) +{ + DoAssemble = 0; +} + + + +static void DisableLinking (void) +{ + DoLink = 0; +} + + + +static void DisableAssemblingAndLinking (void) +{ + DisableAssembling (); + DisableLinking (); +} + + + /*****************************************************************************/ /* Command structure handling */ /*****************************************************************************/ +static char* CmdAllocArg (const char* Arg, unsigned Len) +/* Alloc (potentially quoted) argument */ +{ + char* Alloc; + +/* The Microsoft docs say on spawnvp(): +** Spaces embedded in strings may cause unexpected behavior; for example, +** passing _spawn the string "hi there" will result in the new process getting +** two arguments, "hi" and "there". If the intent was to have the new process +** open a file named "hi there", the process would fail. You can avoid this by +** quoting the string: "\"hi there\"". +*/ +#if defined(_WIN32) + /* Quote argument if it contains space(s) */ + if (memchr (Arg, ' ', Len)) { + Alloc = xmalloc (Len + 3); + Alloc[0] = '"'; + memcpy (Alloc + 1, Arg, Len); + Alloc[Len + 1] = '"'; + Alloc[Len + 2] = '\0'; + } else +#endif + { + Alloc = xmalloc (Len + 1); + memcpy (Alloc, Arg, Len); + Alloc[Len] = '\0'; + } + return Alloc; +} + + + static void CmdExpand (CmdDesc* Cmd) /* Expand the argument vector */ { - unsigned NewMax = Cmd->ArgMax + 10; - char** NewArgs = xmalloc (NewMax * sizeof (char*)); - memcpy (NewArgs, Cmd->Args, Cmd->ArgMax * sizeof (char*)); - xfree (Cmd->Args); - Cmd->Args = NewArgs; - Cmd->ArgMax = NewMax; + Cmd->ArgMax += 10; + Cmd->Args = xrealloc (Cmd->Args, Cmd->ArgMax * sizeof (char*)); } @@ -186,7 +247,7 @@ static void CmdAddArg (CmdDesc* Cmd, const char* Arg) /* Add a copy of the new argument, allow a NULL pointer */ if (Arg) { - Cmd->Args[Cmd->ArgCount++] = xstrdup (Arg); + Cmd->Args[Cmd->ArgCount++] = CmdAllocArg (Arg, strlen (Arg)); } else { Cmd->Args[Cmd->ArgCount++] = 0; } @@ -221,9 +282,7 @@ static void CmdAddArgList (CmdDesc* Cmd, const char* ArgList) } /* Add the new argument */ - Cmd->Args[Cmd->ArgCount] = memcpy (xmalloc (Len + 1), Arg, Len); - Cmd->Args[Cmd->ArgCount][Len] = '\0'; - ++Cmd->ArgCount; + Cmd->Args[Cmd->ArgCount++] = CmdAllocArg (Arg, Len); /* If the argument was terminated by a comma, skip it, otherwise ** we're done. @@ -261,12 +320,8 @@ static void CmdAddFile (CmdDesc* Cmd, const char* File) { /* Expand the file vector if needed */ if (Cmd->FileCount == Cmd->FileMax) { - unsigned NewMax = Cmd->FileMax + 10; - char** NewFiles = xmalloc (NewMax * sizeof (char*)); - memcpy (NewFiles, Cmd->Files, Cmd->FileMax * sizeof (char*)); - xfree (Cmd->Files); - Cmd->Files = NewFiles; - Cmd->FileMax = NewMax; + Cmd->FileMax += 10; + Cmd->Files = xrealloc (Cmd->Files, Cmd->FileMax * sizeof (char*)); } /* If the file name is not NULL (which is legal and is used to terminate @@ -279,7 +334,7 @@ static void CmdAddFile (CmdDesc* Cmd, const char* File) for (I = 0; I < Cmd->FileCount; ++I) { if (strcmp (Cmd->Files[I], File) == 0) { /* Duplicate file */ - Warning ("Duplicate file in argument list: `%s'", File); + Warning ("Duplicate file in argument list: '%s'", File); /* No need to search further */ break; } @@ -351,19 +406,14 @@ static void CmdPrint (CmdDesc* Cmd, FILE* F) static void SetTargetFiles (void) /* Set the target system files */ { - /* Determine the names of the target specific library file */ - if (Target != TGT_NONE) { + /* Get a pointer to the system name and its length */ + const char* TargetName = GetTargetName (Target); + unsigned TargetNameLen = strlen (TargetName); - /* Get a pointer to the system name and its length */ - const char* TargetName = GetTargetName (Target); - unsigned TargetNameLen = strlen (TargetName); - - /* Set the library file */ - TargetLib = xmalloc (TargetNameLen + 4 + 1); - memcpy (TargetLib, TargetName, TargetNameLen); - strcpy (TargetLib + TargetNameLen, ".lib"); - - } + /* Set the library file */ + TargetLib = xmalloc (TargetNameLen + 4 + 1); + memcpy (TargetLib, TargetName, TargetNameLen); + strcpy (TargetLib + TargetNameLen, ".lib"); } @@ -392,7 +442,7 @@ static void ExecProgram (CmdDesc* Cmd) /* Check the result code */ if (Status < 0) { /* Error executing the program */ - Error ("Cannot execute `%s': %s", Cmd->Name, strerror (errno)); + Error ("Cannot execute '%s': %s", Cmd->Name, strerror (errno)); } else if (Status != 0) { /* Called program had an error */ exit (Status); @@ -401,6 +451,20 @@ static void ExecProgram (CmdDesc* Cmd) +static void RemoveTempFiles (void) +{ + unsigned I; + + for (I = 0; I < RM.FileCount; ++I) { + if (remove (RM.Files[I]) < 0) { + Warning ("Cannot remove temporary file '%s': %s", + RM.Files[I], strerror (errno)); + } + } +} + + + static void Link (void) /* Link the resulting executable */ { @@ -437,17 +501,20 @@ static void Link (void) CmdSetTarget (&LD65, Target); } - /* Determine which target libraries are needed */ - SetTargetFiles (); - /* Add all object files as parameters */ for (I = 0; I < LD65.FileCount; ++I) { CmdAddArg (&LD65, LD65.Files [I]); } - /* Add the system runtime library */ - if (TargetLib) { - CmdAddArg (&LD65, TargetLib); + /* Add the target library if it is not disabled */ + if (!NoTargetLib) + { + /* Determine which target library is needed */ + SetTargetFiles (); + + if (TargetLib) { + CmdAddArg (&LD65, TargetLib); + } } /* Terminate the argument list with a NULL pointer */ @@ -471,11 +538,13 @@ static void AssembleFile (const char* File, unsigned ArgCount) /* Check if this is the last processing step */ if (DoLink) { /* We're linking later. Add the output file of the assembly - ** the the file list of the linker. The name of the output + ** to the file list of the linker. The name of the output ** file is that of the input file with ".s" replaced by ".o". */ char* ObjName = MakeFilename (File, ".o"); CmdAddFile (&LD65, ObjName); + /* This is just a temporary file, schedule it for removal */ + CmdAddFile (&RM, ObjName); xfree (ObjName); } else { /* This is the final step. If an output name is given, set it */ @@ -515,7 +584,7 @@ static void AssembleIntermediate (const char* SourceFile) /* Remove the input file */ if (remove (AsmName) < 0) { - Warning ("Cannot remove temporary file `%s': %s", + Warning ("Cannot remove temporary file '%s': %s", AsmName, strerror (errno)); } @@ -699,12 +768,13 @@ static void Usage (void) " -o name\t\t\tName the output file\n" " -r\t\t\t\tEnable register variables\n" " -t sys\t\t\tSet the target system\n" - " -u sym\t\t\tForce an import of symbol `sym'\n" + " -u sym\t\t\tForce an import of symbol 'sym'\n" " -v\t\t\t\tVerbose mode\n" " -vm\t\t\t\tVerbose map file\n" " -C name\t\t\tUse linker config file\n" " -Cl\t\t\t\tMake local variables static\n" " -D sym[=defn]\t\t\tDefine a preprocessor symbol\n" + " -E\t\t\t\tStop after the preprocessing stage\n" " -I dir\t\t\tSet a compiler include directory path\n" " -L path\t\t\tSpecify a library search path\n" " -Ln name\t\t\tCreate a VICE label file\n" @@ -722,6 +792,7 @@ static void Usage (void) "\n" "Long options:\n" " --add-source\t\t\tInclude source as comment\n" + " --all-cdecl\t\t\tMake functions default to __cdecl__\n" " --asm-args options\t\tPass options to the assembler\n" " --asm-define sym[=v]\t\tDefine an assembler symbol\n" " --asm-include-dir dir\t\tSet an assembler include directory\n" @@ -743,11 +814,10 @@ static void Usage (void) " --debug\t\t\tDebug mode\n" " --debug-info\t\t\tAdd debug info\n" " --feature name\t\tSet an emulation feature\n" - " --force-import sym\t\tForce an import of symbol `sym'\n" + " --force-import sym\t\tForce an import of symbol 'sym'\n" " --help\t\t\tHelp (this text)\n" " --include-dir dir\t\tSet a compiler include directory path\n" " --ld-args options\t\tPass options to the linker\n" - " --lib file\t\t\tLink this library\n" " --lib-path path\t\tSpecify a library search path\n" " --list-targets\t\tList all available targets\n" " --listing name\t\tCreate an assembler listing file\n" @@ -756,9 +826,11 @@ static void Usage (void) " --memory-model model\t\tSet the memory model\n" " --module\t\t\tLink as a module\n" " --module-id id\t\tSpecify a module ID for the linker\n" + " --no-target-lib\t\tDon't link the target library\n" " --o65-model model\t\tOverride the o65 model\n" " --obj file\t\t\tLink this object file\n" " --obj-path path\t\tSpecify an object file search path\n" + " --print-target-path\t\tPrint the target file path\n" " --register-space b\t\tSet space available for register variables\n" " --register-vars\t\tEnable register variables\n" " --rodata-name seg\t\tSet the name of the RODATA segment\n" @@ -784,6 +856,14 @@ static void OptAddSource (const char* Opt attribute ((unused)), } +static void OptAllCDecl (const char* Opt attribute ((unused)), + const char* Arg attribute ((unused))) +/* Make functions default to __cdecl__ */ +{ + CmdAddArg (&CC65, "--all-cdecl"); +} + + static void OptAsmArgs (const char* Opt attribute ((unused)), const char* Arg) /* Pass arguments to the assembler */ @@ -1010,14 +1090,6 @@ static void OptLdArgs (const char* Opt attribute ((unused)), const char* Arg) -static void OptLib (const char* Opt attribute ((unused)), const char* Arg) -/* Library file follows (linker) */ -{ - CmdAddArg2 (&LD65, "--lib", Arg); -} - - - static void OptLibPath (const char* Opt attribute ((unused)), const char* Arg) /* Library search path (linker) */ { @@ -1102,6 +1174,15 @@ static void OptModuleId (const char* Opt attribute ((unused)), const char* Arg) +static void OptNoTargetLib (const char* Opt attribute ((unused)), + const char* Arg attribute ((unused))) +/* Disable the target library */ +{ + NoTargetLib = 1; +} + + + static void OptO65Model (const char* Opt attribute ((unused)), const char* Arg) /* Handle the --o65-model option */ { @@ -1126,6 +1207,42 @@ static void OptObjPath (const char* Opt attribute ((unused)), const char* Arg) +static void OptPrintTargetPath (const char* Opt attribute ((unused)), + const char* Arg attribute ((unused))) +/* Print the target file path */ +{ + char* TargetPath; + char* tmp; + + SearchPaths* TargetPaths = NewSearchPath (); + AddSubSearchPathFromEnv (TargetPaths, "CC65_HOME", "target"); +#if defined(CL65_TGT) && !defined(_WIN32) + AddSearchPath (TargetPaths, CL65_TGT); +#endif + AddSubSearchPathFromBin (TargetPaths, "target"); + + TargetPath = SearchFile (TargetPaths, "."); + if (!TargetPath) { + fprintf (stderr, "%s: error - could not determine target path\n", ProgName); + exit (EXIT_FAILURE); + } + tmp = strrchr(TargetPath, '.'); + if (tmp) { + *(--tmp) = 0; + } + while (*TargetPath) { + if (*TargetPath == ' ') { + /* Escape spaces */ + putchar ('\\'); + } + putchar (*TargetPath++); + } + putchar ('\n'); + exit (EXIT_SUCCESS); +} + + + static void OptRegisterSpace (const char* Opt attribute ((unused)), const char* Arg) /* Handle the --register-space option */ { @@ -1190,9 +1307,9 @@ static void OptTarget (const char* Opt attribute ((unused)), const char* Arg) { Target = FindTarget (Arg); if (Target == TGT_UNKNOWN) { - Error ("No such target system: `%s'", Arg); + Error ("No such target system: '%s'", Arg); } else if (Target == TGT_MODULE) { - Error ("Cannot use `module' as target, use --module instead"); + Error ("Cannot use 'module' as target, use --module instead"); } } @@ -1214,7 +1331,8 @@ static void OptVersion (const char* Opt attribute ((unused)), const char* Arg attribute ((unused))) /* Print version number */ { - fprintf (stderr, "cl65 V%s\n", GetVersionAsString ()); + fprintf (stderr, "%s V%s\n", ProgName, GetVersionAsString ()); + exit(EXIT_SUCCESS); } @@ -1240,56 +1358,58 @@ int main (int argc, char* argv []) { /* Program long options */ static const LongOpt OptTab[] = { - { "--add-source", 0, OptAddSource }, - { "--asm-args", 1, OptAsmArgs }, - { "--asm-define", 1, OptAsmDefine }, - { "--asm-include-dir", 1, OptAsmIncludeDir }, - { "--bin-include-dir", 1, OptBinIncludeDir }, - { "--bss-label", 1, OptBssLabel }, - { "--bss-name", 1, OptBssName }, - { "--cc-args", 1, OptCCArgs }, - { "--cfg-path", 1, OptCfgPath }, - { "--check-stack", 0, OptCheckStack }, - { "--code-label", 1, OptCodeLabel }, - { "--code-name", 1, OptCodeName }, - { "--codesize", 1, OptCodeSize }, - { "--config", 1, OptConfig }, - { "--cpu", 1, OptCPU }, - { "--create-dep", 1, OptCreateDep }, - { "--create-full-dep", 1, OptCreateFullDep }, - { "--data-label", 1, OptDataLabel }, - { "--data-name", 1, OptDataName }, - { "--debug", 0, OptDebug }, - { "--debug-info", 0, OptDebugInfo }, - { "--feature", 1, OptFeature }, - { "--force-import", 1, OptForceImport }, - { "--help", 0, OptHelp }, - { "--include-dir", 1, OptIncludeDir }, - { "--ld-args", 1, OptLdArgs }, - { "--lib", 1, OptLib }, - { "--lib-path", 1, OptLibPath }, - { "--list-targets", 0, OptListTargets }, - { "--listing", 1, OptListing }, - { "--list-bytes", 1, OptListBytes }, - { "--mapfile", 1, OptMapFile }, - { "--memory-model", 1, OptMemoryModel }, - { "--module", 0, OptModule }, - { "--module-id", 1, OptModuleId }, - { "--o65-model", 1, OptO65Model }, - { "--obj", 1, OptObj }, - { "--obj-path", 1, OptObjPath }, - { "--register-space", 1, OptRegisterSpace }, - { "--register-vars", 0, OptRegisterVars }, - { "--rodata-name", 1, OptRodataName }, - { "--signed-chars", 0, OptSignedChars }, - { "--standard", 1, OptStandard }, - { "--start-addr", 1, OptStartAddr }, - { "--static-locals", 0, OptStaticLocals }, - { "--target", 1, OptTarget }, - { "--verbose", 0, OptVerbose }, - { "--version", 0, OptVersion }, - { "--zeropage-label", 1, OptZeropageLabel }, - { "--zeropage-name", 1, OptZeropageName }, + { "--add-source", 0, OptAddSource }, + { "--all-cdecl", 0, OptAllCDecl }, + { "--asm-args", 1, OptAsmArgs }, + { "--asm-define", 1, OptAsmDefine }, + { "--asm-include-dir", 1, OptAsmIncludeDir }, + { "--bin-include-dir", 1, OptBinIncludeDir }, + { "--bss-label", 1, OptBssLabel }, + { "--bss-name", 1, OptBssName }, + { "--cc-args", 1, OptCCArgs }, + { "--cfg-path", 1, OptCfgPath }, + { "--check-stack", 0, OptCheckStack }, + { "--code-label", 1, OptCodeLabel }, + { "--code-name", 1, OptCodeName }, + { "--codesize", 1, OptCodeSize }, + { "--config", 1, OptConfig }, + { "--cpu", 1, OptCPU }, + { "--create-dep", 1, OptCreateDep }, + { "--create-full-dep", 1, OptCreateFullDep }, + { "--data-label", 1, OptDataLabel }, + { "--data-name", 1, OptDataName }, + { "--debug", 0, OptDebug }, + { "--debug-info", 0, OptDebugInfo }, + { "--feature", 1, OptFeature }, + { "--force-import", 1, OptForceImport }, + { "--help", 0, OptHelp }, + { "--include-dir", 1, OptIncludeDir }, + { "--ld-args", 1, OptLdArgs }, + { "--lib-path", 1, OptLibPath }, + { "--list-targets", 0, OptListTargets }, + { "--listing", 1, OptListing }, + { "--list-bytes", 1, OptListBytes }, + { "--mapfile", 1, OptMapFile }, + { "--memory-model", 1, OptMemoryModel }, + { "--module", 0, OptModule }, + { "--module-id", 1, OptModuleId }, + { "--no-target-lib", 0, OptNoTargetLib }, + { "--o65-model", 1, OptO65Model }, + { "--obj", 1, OptObj }, + { "--obj-path", 1, OptObjPath }, + { "--print-target-path", 0, OptPrintTargetPath}, + { "--register-space", 1, OptRegisterSpace }, + { "--register-vars", 0, OptRegisterVars }, + { "--rodata-name", 1, OptRodataName }, + { "--signed-chars", 0, OptSignedChars }, + { "--standard", 1, OptStandard }, + { "--start-addr", 1, OptStartAddr }, + { "--static-locals", 0, OptStaticLocals }, + { "--target", 1, OptTarget }, + { "--verbose", 0, OptVerbose }, + { "--version", 0, OptVersion }, + { "--zeropage-label", 1, OptZeropageLabel }, + { "--zeropage-name", 1, OptZeropageName }, }; char* CmdPath; @@ -1377,8 +1497,7 @@ int main (int argc, char* argv []) case 'S': /* Dont assemble and link the created files */ - DoAssemble = 0; - DoLink = 0; + DisableAssemblingAndLinking (); break; case 'T': @@ -1391,12 +1510,19 @@ int main (int argc, char* argv []) OptVersion (Arg, 0); break; + case 'E': + /* Forward -E to compiler */ + CmdAddArg (&CC65, Arg); + DisableAssemblingAndLinking (); + break; + case 'W': if (Arg[2] == 'a' && Arg[3] == '\0') { /* -Wa: Pass options to assembler */ OptAsmArgs (Arg, GetArg (&I, 3)); } else if (Arg[2] == 'c' && Arg[3] == '\0') { /* -Wc: Pass options to compiler */ + /* Remember -Wc sub arguments in cc65 arg struct */ OptCCArgs (Arg, GetArg (&I, 3)); } else if (Arg[2] == 'l' && Arg[3] == '\0') { /* -Wl: Pass options to linker */ @@ -1409,7 +1535,7 @@ int main (int argc, char* argv []) case 'c': /* Don't link the resulting files */ - DoLink = 0; + DisableLinking (); break; case 'd': @@ -1510,12 +1636,12 @@ int main (int argc, char* argv []) break; case FILETYPE_O65: - /* Add the the object file converter files */ + /* Add the object file converter files */ ConvertO65 (Arg); break; default: - Error ("Don't know what to do with `%s'", Arg); + Error ("Don't know what to do with '%s'", Arg); } @@ -1535,6 +1661,8 @@ int main (int argc, char* argv []) Link (); } + RemoveTempFiles (); + /* Return an apropriate exit code */ return EXIT_SUCCESS; } diff --git a/src/cl65/spawn-unix.inc b/src/cl65/spawn-unix.inc index 283285c76..36eb7aab4 100644 --- a/src/cl65/spawn-unix.inc +++ b/src/cl65/spawn-unix.inc @@ -82,7 +82,7 @@ int spawnvp (int Mode attribute ((unused)), const char* File, char* const argv [ /* The son - exec the program */ if (execvp (File, argv) < 0) { - Error ("Cannot exec `%s': %s", File, strerror (errno)); + Error ("Cannot exec '%s': %s", File, strerror (errno)); } } else { @@ -94,7 +94,7 @@ int spawnvp (int Mode attribute ((unused)), const char* File, char* const argv [ /* Examine the child status */ if (!WIFEXITED (Status)) { - Error ("Subprocess `%s' aborted by signal %d", File, WTERMSIG (Status)); + Error ("Subprocess '%s' aborted by signal %d", File, WTERMSIG (Status)); } } diff --git a/src/co65.vcxproj b/src/co65.vcxproj index c66c8aac8..9f5959d89 100644 --- a/src/co65.vcxproj +++ b/src/co65.vcxproj @@ -1,5 +1,5 @@ <?xml version="1.0" encoding="utf-8"?> -<Project DefaultTargets="Build" ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> +<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <ItemGroup Label="ProjectConfigurations"> <ProjectConfiguration Include="Debug|Win32"> <Configuration>Debug</Configuration> @@ -13,65 +13,39 @@ <PropertyGroup Label="Globals"> <ProjectGuid>{F5DB5D1A-05BC-48FE-B346-4E96DD522AA2}</ProjectGuid> <Keyword>Win32Proj</Keyword> - <RootNamespace>co65</RootNamespace> </PropertyGroup> + <ImportGroup Label="PropertySheets"> + <Import Project="cc65.props" /> + </ImportGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> <UseDebugLibraries>true</UseDebugLibraries> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> <UseDebugLibraries>false</UseDebugLibraries> - <WholeProgramOptimization>true</WholeProgramOptimization> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> <ImportGroup Label="ExtensionSettings"> </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> <PropertyGroup Label="UserMacros" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <LinkIncremental>true</LinkIncremental> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> <ClCompile> - <PrecompiledHeader> - </PrecompiledHeader> - <WarningLevel>Level3</WarningLevel> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;_DEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;_DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>true</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> <ClCompile> - <WarningLevel>Level3</WarningLevel> - <PrecompiledHeader> - </PrecompiledHeader> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;NDEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>false</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemGroup> diff --git a/src/co65/convert.c b/src/co65/convert.c index af036ebf7..ec6d68401 100644 --- a/src/co65/convert.c +++ b/src/co65/convert.c @@ -394,7 +394,7 @@ void Convert (const O65Data* D) switch (O->Type) { case O65_OPT_FILENAME: - Print (stdout, 1, "O65 filename option: `%s'\n", + Print (stdout, 1, "O65 filename option: '%s'\n", GetO65OptionText (O)); break; @@ -402,7 +402,7 @@ void Convert (const O65Data* D) if (O->Len == 2) { Warning ("Operating system option without data found"); } else { - Print (stdout, 1, "O65 operating system option: `%s'\n", + Print (stdout, 1, "O65 operating system option: '%s'\n", GetO65OSName (O->Data[0])); switch (O->Data[0]) { case O65_OS_CC65_MODULE: @@ -418,7 +418,7 @@ void Convert (const O65Data* D) break; case O65_OPT_ASM: - Print (stdout, 1, "O65 assembler option: `%s'\n", + Print (stdout, 1, "O65 assembler option: '%s'\n", GetO65OptionText (O)); break; @@ -427,11 +427,11 @@ void Convert (const O65Data* D) xfree (Author); } Author = xstrdup (GetO65OptionText (O)); - Print (stdout, 1, "O65 author option: `%s'\n", Author); + Print (stdout, 1, "O65 author option: '%s'\n", Author); break; case O65_OPT_TIMESTAMP: - Print (stdout, 1, "O65 timestamp option: `%s'\n", + Print (stdout, 1, "O65 timestamp option: '%s'\n", GetO65OptionText (O)); break; @@ -450,11 +450,11 @@ void Convert (const O65Data* D) /* Open the output file */ F = fopen (OutputName, "w"); if (F == 0) { - Error ("Cannot open `%s': %s", OutputName, strerror (errno)); + Error ("Cannot open '%s': %s", OutputName, strerror (errno)); } /* Create a header */ - fprintf (F, ";\n; File generated by co65 v %s using model `%s'\n;\n", + fprintf (F, ";\n; File generated by co65 v %s using model '%s'\n;\n", GetVersionAsString (), GetModelName (Model)); /* Select the CPU */ diff --git a/src/co65/convert.h b/src/co65/convert.h index 22ef25424..5045acedd 100644 --- a/src/co65/convert.h +++ b/src/co65/convert.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -56,7 +56,7 @@ struct O65Data; void Convert (const struct O65Data* D); -/* Convert the o65 file in D */ +/* Convert the o65 file in D */ diff --git a/src/co65/error.c b/src/co65/error.c index 1c1625207..dc3e4e73b 100644 --- a/src/co65/error.c +++ b/src/co65/error.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -81,7 +81,7 @@ void Error (const char* Format, ...) void Internal (const char* Format, ...) /* Print an internal error message and die */ { - va_list ap; + va_list ap; va_start (ap, Format); fprintf (stderr, "%s: Internal error: ", ProgName); vfprintf (stderr, Format, ap); diff --git a/src/co65/error.h b/src/co65/error.h index 4fb9d370d..23901e52e 100644 --- a/src/co65/error.h +++ b/src/co65/error.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/co65/fileio.c b/src/co65/fileio.c index 9241797c6..18813d5e4 100644 --- a/src/co65/fileio.c +++ b/src/co65/fileio.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/co65/fileio.h b/src/co65/fileio.h index c5e9a003c..150c4fca7 100644 --- a/src/co65/fileio.h +++ b/src/co65/fileio.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/co65/global.c b/src/co65/global.c index bc9b0099b..405cda7d5 100644 --- a/src/co65/global.c +++ b/src/co65/global.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/co65/global.h b/src/co65/global.h index 29c17ca29..8f1e0c4f8 100644 --- a/src/co65/global.h +++ b/src/co65/global.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/co65/main.c b/src/co65/main.c index 5e0ee2ed7..33ecdbf6f 100644 --- a/src/co65/main.c +++ b/src/co65/main.c @@ -112,7 +112,7 @@ static void CheckLabelName (const char* Label) } if (*L) { - Error ("Label name `%s' is invalid", Label); + Error ("Label name '%s' is invalid", Label); } } @@ -123,7 +123,7 @@ static void CheckSegName (const char* Seg) { /* Print an error and abort if the name is not ok */ if (!ValidSegName (Seg)) { - Error ("Segment name `%s' is invalid", Seg); + Error ("Segment name '%s' is invalid", Seg); } } @@ -244,7 +244,7 @@ static void OptO65Model (const char* Opt attribute ((unused)), const char* Arg) /* Search for the model name */ Model = FindModel (Arg); if (Model == O65_MODEL_INVALID) { - Error ("Unknown o65 model `%s'", Arg); + Error ("Unknown o65 model '%s'", Arg); } } @@ -263,7 +263,8 @@ static void OptVersion (const char* Opt attribute ((unused)), const char* Arg attribute ((unused))) /* Print the assembler version */ { - fprintf (stderr, "co65 V%s\n", GetVersionAsString ()); + fprintf (stderr, "%s V%s\n", ProgName, GetVersionAsString ()); + exit(EXIT_SUCCESS); } @@ -386,7 +387,7 @@ int main (int argc, char* argv []) } else { /* Filename. Check if we already had one */ if (InputName) { - Error ("Don't know what to do with `%s'", Arg); + Error ("Don't know what to do with '%s'", Arg); } else { InputName = Arg; } diff --git a/src/co65/model.c b/src/co65/model.c index 87a6966b7..2206993bf 100644 --- a/src/co65/model.c +++ b/src/co65/model.c @@ -52,8 +52,8 @@ O65Model Model = O65_MODEL_NONE; /* Name table */ -static const char* NameTable[O65_MODEL_COUNT] = { - "none", +static const char* const NameTable[O65_MODEL_COUNT] = { + "none", "os/a65", "lunix", "cc65-module" diff --git a/src/co65/o65.c b/src/co65/o65.c index 3496995a8..81c07bb8c 100644 --- a/src/co65/o65.c +++ b/src/co65/o65.c @@ -361,7 +361,7 @@ O65Data* ReadO65File (const char* Name) /* Open the o65 input file */ FILE* F = fopen (Name, "rb"); if (F == 0) { - Error ("Cannot open `%s': %s", Name, strerror (errno)); + Error ("Cannot open '%s': %s", Name, strerror (errno)); } /* Read the file data */ diff --git a/src/common.vcxproj b/src/common.vcxproj index 053d23981..df99fc4a9 100644 --- a/src/common.vcxproj +++ b/src/common.vcxproj @@ -1,5 +1,5 @@ <?xml version="1.0" encoding="utf-8"?> -<Project DefaultTargets="Build" ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> +<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <ItemGroup Label="ProjectConfigurations"> <ProjectConfiguration Include="Debug|Win32"> <Configuration>Debug</Configuration> @@ -10,6 +10,40 @@ <Platform>Win32</Platform> </ProjectConfiguration> </ItemGroup> + <PropertyGroup Label="Globals"> + <ProjectGuid>{71DC1F68-BFC4-478C-8655-C8E9C9654D2B}</ProjectGuid> + <Keyword>Win32Proj</Keyword> + </PropertyGroup> + <ImportGroup Label="PropertySheets"> + <Import Project="cc65.props" /> + </ImportGroup> + <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> + <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> + <ConfigurationType>StaticLibrary</ConfigurationType> + <UseDebugLibraries>true</UseDebugLibraries> + </PropertyGroup> + <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> + <ConfigurationType>StaticLibrary</ConfigurationType> + <UseDebugLibraries>false</UseDebugLibraries> + </PropertyGroup> + <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> + <ImportGroup Label="ExtensionSettings"> + </ImportGroup> + <PropertyGroup Label="UserMacros" /> + <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> + </PropertyGroup> + <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> + </PropertyGroup> + <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> + <ClCompile> + <PreprocessorDefinitions>_LIB;_DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> + </ClCompile> + </ItemDefinitionGroup> + <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> + <ClCompile> + <PreprocessorDefinitions>_LIB;NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> + </ClCompile> + </ItemDefinitionGroup> <ItemGroup> <ClInclude Include="common\abend.h" /> <ClInclude Include="common\addrsize.h" /> @@ -38,8 +72,8 @@ <ClInclude Include="common\hashtab.h" /> <ClInclude Include="common\hlldbgsym.h" /> <ClInclude Include="common\inline.h" /> + <ClInclude Include="common\intptrstack.h" /> <ClInclude Include="common\intstack.h" /> - <ClInclude Include="common\inttypes.h" /> <ClInclude Include="common\libdefs.h" /> <ClInclude Include="common\lidefs.h" /> <ClInclude Include="common\matchpat.h" /> @@ -87,6 +121,7 @@ <ClCompile Include="common\gentype.c" /> <ClCompile Include="common\hashfunc.c" /> <ClCompile Include="common\hashtab.c" /> + <ClCompile Include="common\intptrstack.c" /> <ClCompile Include="common\intstack.c" /> <ClCompile Include="common\matchpat.c" /> <ClCompile Include="common\mmodel.c" /> @@ -104,79 +139,6 @@ <ClCompile Include="common\xmalloc.c" /> <ClCompile Include="common\xsprintf.c" /> </ItemGroup> - <PropertyGroup Label="Globals"> - <ProjectGuid>{71DC1F68-BFC4-478C-8655-C8E9C9654D2B}</ProjectGuid> - <Keyword>Win32Proj</Keyword> - <RootNamespace>common</RootNamespace> - </PropertyGroup> - <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> - <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> - <ConfigurationType>StaticLibrary</ConfigurationType> - <UseDebugLibraries>true</UseDebugLibraries> - <PlatformToolset>v120</PlatformToolset> - </PropertyGroup> - <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> - <UseDebugLibraries>false</UseDebugLibraries> - <WholeProgramOptimization>true</WholeProgramOptimization> - <ConfigurationType>StaticLibrary</ConfigurationType> - <PlatformToolset>v120</PlatformToolset> - </PropertyGroup> - <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> - <ImportGroup Label="ExtensionSettings"> - </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> - <PropertyGroup Label="UserMacros" /> - <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> - <OutDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</OutDir> - </PropertyGroup> - <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" /> - <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> - <OutDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</OutDir> - </PropertyGroup> - <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <ClCompile> - <PrecompiledHeader> - </PrecompiledHeader> - <WarningLevel>Level3</WarningLevel> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_LIB;_DEBUG</PreprocessorDefinitions> - <TreatWarningAsError>true</TreatWarningAsError> - </ClCompile> - <Link> - <SubSystem>Windows</SubSystem> - <GenerateDebugInformation>true</GenerateDebugInformation> - </Link> - <Lib /> - <Lib> - <OutputFile>$(IntDir)$(TargetName)$(TargetExt)</OutputFile> - </Lib> - </ItemDefinitionGroup> - <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <ClCompile> - <WarningLevel>Level3</WarningLevel> - <PrecompiledHeader> - </PrecompiledHeader> - <FunctionLevelLinking>true</FunctionLevelLinking> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_LIB;NDEBUG</PreprocessorDefinitions> - <TreatWarningAsError>true</TreatWarningAsError> - </ClCompile> - <Link> - <SubSystem>Windows</SubSystem> - <GenerateDebugInformation>true</GenerateDebugInformation> - <EnableCOMDATFolding>true</EnableCOMDATFolding> - <OptimizeReferences>true</OptimizeReferences> - </Link> - <Lib /> - <Lib> - <OutputFile>$(IntDir)$(TargetName)$(TargetExt)</OutputFile> - </Lib> - </ItemDefinitionGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.targets" /> <ImportGroup Label="ExtensionTargets"> </ImportGroup> diff --git a/src/common/check.c b/src/common/check.c index c6c5d2d95..0d0e6ef4b 100644 --- a/src/common/check.c +++ b/src/common/check.c @@ -75,5 +75,5 @@ static void DefaultCheckFailed (const char* Msg, const char* Cond, const char* File, unsigned Line) { /* Output a diagnostic and abort */ - AbEnd ("%s%s, file `%s', line %u", Msg, Cond, File, Line); + AbEnd ("%s%s, file '%s', line %u", Msg, Cond, File, Line); } diff --git a/src/common/cmdline.c b/src/common/cmdline.c index 0f6622934..4de79a419 100644 --- a/src/common/cmdline.c +++ b/src/common/cmdline.c @@ -239,7 +239,7 @@ void NeedArg (const char* Opt) void InvArg (const char* Opt, const char* Arg) /* Print an error about an invalid option argument and exit. */ { - AbEnd ("Invalid argument for %s: `%s'", Opt, Arg); + AbEnd ("Invalid argument for %s: '%s'", Opt, Arg); } @@ -247,7 +247,7 @@ void InvArg (const char* Opt, const char* Arg) void InvDef (const char* Def) /* Print an error about an invalid definition and die */ { - AbEnd ("Invalid definition: `%s'", Def); + AbEnd ("Invalid definition: '%s'", Def); } diff --git a/src/common/coll.c b/src/common/coll.c index aa2aa6470..8fb702bdc 100644 --- a/src/common/coll.c +++ b/src/common/coll.c @@ -161,7 +161,7 @@ void CollAppend (Collection* C, void* Item) { /* Insert the item at the end of the current list */ CollInsert (C, Item, C->Count); -} +} #endif @@ -341,22 +341,23 @@ void CollReplaceExpand (Collection* C, void* Item, unsigned Index) void CollMove (Collection* C, unsigned OldIndex, unsigned NewIndex) /* Move an item from one position in the collection to another. OldIndex -** is the current position of the item, NewIndex is the new index after +** is the current position of the item, NewIndex is the new index before ** the function has done it's work. Existing entries with indices NewIndex -** and up are moved one position upwards. +** and up might be moved one position upwards. */ { - /* Get the item and remove it from the collection */ + /* Get the item; and, remove it from the collection */ void* Item = CollAt (C, OldIndex); + CollDelete (C, OldIndex); /* Correct NewIndex if needed */ - if (NewIndex >= OldIndex) { + if (NewIndex > OldIndex) { /* Position has changed with removal */ --NewIndex; } - /* Now insert it at the new position */ + /* Now, insert it at the new position */ CollInsert (C, Item, NewIndex); } diff --git a/src/common/coll.h b/src/common/coll.h index 5114862c4..99e337d7a 100644 --- a/src/common/coll.h +++ b/src/common/coll.h @@ -268,9 +268,9 @@ void CollReplaceExpand (Collection* C, void* Item, unsigned Index); void CollMove (Collection* C, unsigned OldIndex, unsigned NewIndex); /* Move an item from one position in the collection to another. OldIndex -** is the current position of the item, NewIndex is the new index after +** is the current position of the item, NewIndex is the new index before ** the function has done it's work. Existing entries with indices NewIndex -** and up are moved one position upwards. +** and up might be moved one position upwards. */ void CollMoveMultiple (Collection* C, unsigned Start, unsigned Count, unsigned Target); diff --git a/src/common/cpu.c b/src/common/cpu.c index 142d55258..b55a5ab00 100644 --- a/src/common/cpu.c +++ b/src/common/cpu.c @@ -55,12 +55,14 @@ const char* CPUNames[CPU_COUNT] = { "none", "6502", "6502X", + "6502DTV", "65SC02", "65C02", "65816", "sweet16", "huc6280", "m740", + "4510", }; /* Tables with CPU instruction sets */ @@ -68,12 +70,14 @@ const unsigned CPUIsets[CPU_COUNT] = { CPU_ISET_NONE, CPU_ISET_6502, CPU_ISET_6502 | CPU_ISET_6502X, + CPU_ISET_6502 | CPU_ISET_6502DTV, CPU_ISET_6502 | CPU_ISET_65SC02, CPU_ISET_6502 | CPU_ISET_65SC02 | CPU_ISET_65C02, CPU_ISET_6502 | CPU_ISET_65SC02 | CPU_ISET_65C02 | CPU_ISET_65816, CPU_ISET_SWEET16, CPU_ISET_6502 | CPU_ISET_65SC02 | CPU_ISET_65C02 | CPU_ISET_HUC6280, CPU_ISET_6502 | CPU_ISET_M740, + CPU_ISET_6502 | CPU_ISET_65SC02 | CPU_ISET_65C02 | CPU_ISET_4510, }; @@ -93,20 +97,20 @@ int ValidAddrSizeForCPU (unsigned char AddrSize) return 1; case ADDR_SIZE_ZP: - /* Not supported by None and Sweet16 */ - return (CPU != CPU_NONE && CPU != CPU_SWEET16); + /* Not supported by Sweet16 */ + return (CPU != CPU_SWEET16); case ADDR_SIZE_ABS: - /* Not supported by None */ - return (CPU != CPU_NONE); + /* Always supported */ + return 1; case ADDR_SIZE_FAR: - /* Only supported by 65816 */ - return (CPU == CPU_65816); + /* Supported by "none" and 65816 */ + return (CPU == CPU_NONE || CPU == CPU_65816); case ADDR_SIZE_LONG: - /* Not supported by any CPU */ - return 0; + /* "none" supports all sizes */ + return (CPU == CPU_NONE); default: FAIL ("Invalid address size"); diff --git a/src/common/cpu.h b/src/common/cpu.h index 5bdbdef8c..2e75feaaf 100644 --- a/src/common/cpu.h +++ b/src/common/cpu.h @@ -50,12 +50,14 @@ typedef enum { CPU_NONE, /* No CPU - for assembler */ CPU_6502, CPU_6502X, /* "Extended", that is: with illegal opcodes */ + CPU_6502DTV, /* CPU_6502 + DTV extra and illegal opcodes */ CPU_65SC02, CPU_65C02, CPU_65816, CPU_SWEET16, CPU_HUC6280, /* Used in PC engine */ CPU_M740, /* Mitsubishi 740 series MCUs */ + CPU_4510, /* CPU of C65 */ CPU_COUNT /* Number of different CPUs */ } cpu_t; @@ -64,12 +66,14 @@ enum { CPU_ISET_NONE = 1 << CPU_NONE, CPU_ISET_6502 = 1 << CPU_6502, CPU_ISET_6502X = 1 << CPU_6502X, + CPU_ISET_6502DTV = 1 << CPU_6502DTV, CPU_ISET_65SC02 = 1 << CPU_65SC02, CPU_ISET_65C02 = 1 << CPU_65C02, CPU_ISET_65816 = 1 << CPU_65816, CPU_ISET_SWEET16 = 1 << CPU_SWEET16, CPU_ISET_HUC6280 = 1 << CPU_HUC6280, CPU_ISET_M740 = 1 << CPU_M740, + CPU_ISET_4510 = 1 << CPU_4510, }; /* CPU used */ diff --git a/src/common/debugflag.c b/src/common/debugflag.c index 7d2e80009..0a452ae36 100644 --- a/src/common/debugflag.c +++ b/src/common/debugflag.c @@ -32,7 +32,7 @@ /*****************************************************************************/ - + /* common */ #include "debugflag.h" diff --git a/src/common/debugflag.h b/src/common/debugflag.h index d325a9eb9..39034044e 100644 --- a/src/common/debugflag.h +++ b/src/common/debugflag.h @@ -31,7 +31,7 @@ /* */ /*****************************************************************************/ - + #ifndef DEBUGFLAG_H #define DEBUGFLAG_H diff --git a/src/common/exprdefs.c b/src/common/exprdefs.c index d9a5adf6b..6639e3d02 100644 --- a/src/common/exprdefs.c +++ b/src/common/exprdefs.c @@ -218,6 +218,10 @@ static void InternalDumpExpr (const ExprNode* Expr, const ExprNode* (*ResolveSym printf (" DWORD"); break; + case EXPR_NEARADDR: + printf (" NEARADDR"); + break; + default: AbEnd ("Unknown Op type: %u", Expr->Op); diff --git a/src/common/exprdefs.h b/src/common/exprdefs.h index 5465c4f25..bf2b7a2da 100644 --- a/src/common/exprdefs.h +++ b/src/common/exprdefs.h @@ -99,6 +99,7 @@ #define EXPR_WORD1 (EXPR_UNARYNODE | 0x0D) #define EXPR_FARADDR (EXPR_UNARYNODE | 0x0E) #define EXPR_DWORD (EXPR_UNARYNODE | 0x0F) +#define EXPR_NEARADDR (EXPR_UNARYNODE | 0x10) diff --git a/src/common/filepos.c b/src/common/filepos.c index 51488ffe5..b2cac79e1 100644 --- a/src/common/filepos.c +++ b/src/common/filepos.c @@ -60,7 +60,7 @@ int CompareFilePos (const FilePos* P1, const FilePos* P2) ** compare rates file index over line over column. */ { - if (P1->Name > P2->Name) { + if (P1->Name > P2->Name) { return 1; } else if (P1->Name < P2->Name) { return -1; diff --git a/src/common/fp.c b/src/common/fp.c index 0c4d2790c..0682f9f9e 100644 --- a/src/common/fp.c +++ b/src/common/fp.c @@ -134,7 +134,7 @@ Float FP_F_Sub (Float Left, Float Right) Float FP_F_Mul (Float Left, Float Right) -/* Multiplicate two floats */ +/* Multiply two floats */ { Float D; D.V = Left.V * Right.V; @@ -220,7 +220,7 @@ Double FP_D_Sub (Double Left, Double Right) Double FP_D_Mul (Double Left, Double Right) -/* Multiplicate two floats */ +/* Multiply two floats */ { Double D; D.V = Left.V * Right.V; diff --git a/src/common/fp.h b/src/common/fp.h index 978359b8b..4e89e2316 100644 --- a/src/common/fp.h +++ b/src/common/fp.h @@ -102,7 +102,7 @@ Float FP_F_Sub (Float Left, Float Right); /* Subtract two floats */ Float FP_F_Mul (Float Left, Float Right); -/* Multiplicate two floats */ +/* Multiply two floats */ Float FP_F_Div (Float Left, Float Right); /* Divide two floats */ @@ -129,7 +129,7 @@ Double FP_D_Sub (Double Left, Double Right); /* Subtract two floats */ Double FP_D_Mul (Double Left, Double Right); -/* Multiplicate two floats */ +/* Multiply two floats */ Double FP_D_Div (Double Left, Double Right); /* Divide two floats */ diff --git a/src/common/fragdefs.h b/src/common/fragdefs.h index c3e589cb2..80dcad491 100644 --- a/src/common/fragdefs.h +++ b/src/common/fragdefs.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/common/inline.h b/src/common/inline.h index b90b3d1f4..2453547ac 100644 --- a/src/common/inline.h +++ b/src/common/inline.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2001-2005 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/common/intptrstack.c b/src/common/intptrstack.c new file mode 100644 index 000000000..de02c09e7 --- /dev/null +++ b/src/common/intptrstack.c @@ -0,0 +1,90 @@ +/*****************************************************************************/ +/* */ +/* intptrstack.c */ +/* */ +/* Integer+ptr stack used for program settings */ +/* */ +/* */ +/* */ +/* (C) 2017, Mega Cat Studios */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +/* common */ +#include "check.h" +#include "intptrstack.h" + + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +void IPS_Get (const IntPtrStack* S, long *Val, void **Ptr) +/* Get the value on top of an int stack */ +{ + PRECONDITION (S->Count > 0); + if (Val) *Val = S->Stack[S->Count-1].val; + if (Ptr) *Ptr = S->Stack[S->Count-1].ptr; +} + + + +void IPS_Set (IntPtrStack* S, long Val, void *Ptr) +/* Set the value on top of an int stack */ +{ + PRECONDITION (S->Count > 0); + S->Stack[S->Count-1].val = Val; + S->Stack[S->Count-1].ptr = Ptr; +} + + + +void IPS_Drop (IntPtrStack* S) +/* Drop a value from an int stack */ +{ + PRECONDITION (S->Count > 0); + --S->Count; +} + + + +void IPS_Push (IntPtrStack* S, long Val, void *Ptr) +/* Push a value onto an int stack */ +{ + PRECONDITION (S->Count < sizeof (S->Stack) / sizeof (S->Stack[0])); + S->Stack[S->Count].val = Val; + S->Stack[S->Count++].ptr = Ptr; +} + + + +void IPS_Pop (IntPtrStack* S, long *Val, void **Ptr) +/* Pop a value from an int stack */ +{ + PRECONDITION (S->Count > 0); + if (Val) *Val = S->Stack[--S->Count].val; + if (Ptr) *Ptr = S->Stack[S->Count].ptr; +} diff --git a/src/common/intptrstack.h b/src/common/intptrstack.h new file mode 100644 index 000000000..4e9cf08f4 --- /dev/null +++ b/src/common/intptrstack.h @@ -0,0 +1,121 @@ +/*****************************************************************************/ +/* */ +/* intptrstack.h */ +/* */ +/* Integer+ptr stack used for program settings */ +/* */ +/* */ +/* */ +/* (C) 2017, Mega Cat Studios */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef INTPTRSTACK_H +#define INTPTRSTACK_H + + + +#include "inline.h" + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +typedef struct IntPtrStack IntPtrStack; +struct IntPtrInner { + long val; + void *ptr; +}; +struct IntPtrStack { + unsigned Count; + struct IntPtrInner Stack[8]; +}; + +/* An initializer for an empty int stack */ +#define STATIC_INTPTRSTACK_INITIALIZER { 0, { 0, 0 }, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0} } } + +/* Declare an int stack with the given value as first element */ +#define INTPTRSTACK(Val, Ptr) { 1, { {Val, Ptr}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0}, {0, 0} } } + + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +#if defined(HAVE_INLINE) +INLINE int IPS_IsFull (const IntPtrStack* S) +/* Return true if there is no space left on the given int stack */ +{ + return (S->Count >= sizeof (S->Stack) / sizeof (S->Stack[0])); +} +#else +# define IPS_IsFull(S) ((S)->Count >= sizeof ((S)->Stack) / sizeof ((S)->Stack[0])) +#endif + +#if defined(HAVE_INLINE) +INLINE int IPS_IsEmpty (const IntPtrStack* S) +/* Return true if there are no values on the given int stack */ +{ + return (S->Count == 0); +} +#else +# define IPS_IsEmpty(S) ((S)->Count == 0) +#endif + +#if defined(HAVE_INLINE) +INLINE unsigned IPS_GetCount (const IntPtrStack* S) +/* Return the number of elements on the given int stack */ +{ + return S->Count; +} +#else +# define IPS_GetCount(S) (S)->Count +#endif + +void IPS_Get (const IntPtrStack* S, long *Val, void **Ptr); +/* Get the value on top of an int stack */ + +void IPS_Set (IntPtrStack* S, long Val, void *Ptr); +/* Set the value on top of an int stack */ + +void IPS_Drop (IntPtrStack* S); +/* Drop a value from an int stack */ + +void IPS_Push (IntPtrStack* S, long Val, void *Ptr); +/* Push a value onto an int stack */ + +void IPS_Pop (IntPtrStack* S, long *Val, void **Ptr); +/* Pop a value from an int stack */ + + + +/* End of IntPtrStack.h */ + +#endif diff --git a/src/common/optdefs.h b/src/common/optdefs.h index fae517667..95af8ebba 100644 --- a/src/common/optdefs.h +++ b/src/common/optdefs.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/common/searchpath.c b/src/common/searchpath.c index 78443f34c..3628dab5c 100644 --- a/src/common/searchpath.c +++ b/src/common/searchpath.c @@ -44,6 +44,12 @@ #else /* Anyone else */ # include <unistd.h> +# include <stdio.h> +# include <limits.h> +# ifndef PATH_MAX +# define PATH_MAX 4096 +# endif +# include "cmdline.h" #endif /* common */ @@ -157,36 +163,142 @@ void AddSubSearchPathFromEnv (SearchPaths* P, const char* EnvVar, const char* Su SB_Done (&Dir); } +#ifdef _WIN32 +#define PATHSEP "\\" +#undef PATH_MAX +#define PATH_MAX _MAX_PATH +#else +#define PATHSEP "/" -void AddSubSearchPathFromWinBin (SearchPaths* P, const char* SubDir) -{ -/* Windows only: -** Add a search path from the running binary, adding a subdirectory to -** the parent directory of the directory containing the binary. + +/* + on POSIX-compatible operating system, a binary can be started in + 3 distinct ways: + + 1) using absolute path; in which case argv[0] starts with '/' + 2) using relative path; in which case argv[0] contains '/', but + does not start with it. e.g.: ./ca65 ; bin/cc65 + 3) using PATH environment variable, which is a colon-separated + list of directories which will be searched for a command + name used unprefixed. see execlp() and execvp() in man 3p exec: + +> The argument file is used to construct a pathname that identifies the new +> process image file. If the file argument contains a <slash> character, +> the file argument shall be used as the pathname for this file. +> Otherwise, the path prefix for this file is obtained by a search of the +> directories passed as the environment variable PATH (see the Base +> Definitions volume of POSIX.1*2008, Chapter 8, Environment Variables). +> If this environment variable is not present, the results of the search +> are implementation-defined. + */ -#if defined(_WIN32) - char Dir[_MAX_PATH]; + + +static int SearchPathBin(const char* bin, char* buf, size_t buflen) +/* search colon-separated list of paths in PATH environment variable +** for the full path of argv[0]. +** returns 1 if successfull, in which case buf will contain the full path. +** bin = binary name (from argv[0]), buf = work buffer, buflen = sizeof buf +*/ +{ + char* p = getenv ("PATH"); + char* o; + size_t l; + + if (!p) { + return 0; + } + for (;;) { + o = buf; + l = buflen; + while (l && *p && *p != ':') { + *(o++) = *(p++); + l--; + } + snprintf (o, l, "/%s", bin); + if (access (buf, X_OK) == 0) { + return 1; + } + if (*p == ':') { + p++; + } else if (!p) { + break; + } + } + return 0; +} + + + +static char* GetProgPath(char* pathbuf, char* a0) +/* search for the full path of the binary using the argv[0] parameter +** passed to int main(), according to the description above. +** +** the binary name will be passed to realpath(3p) to have all symlinks +** resolved and gratuitous path components like "../" removed. +** +** argument "pathbuf" is a work buffer of size PATH_MAX, +** "a0" the original argv[0]. +** returns pathbuf with the full path of the binary. +*/ +{ + char tmp[PATH_MAX]; + + if (!strchr(a0, '/')) { + /* path doesn't contain directory separator, so it was looked up + via PATH environment variable */ + SearchPathBin (a0, tmp, PATH_MAX); + a0 = tmp; + } + + /* realpath returns the work buffer passed to it, so checking the + return value is superfluous. gcc11 warns anyway. */ + if (realpath (a0, pathbuf)) {} + + return pathbuf; +} + +#endif + +void AddSubSearchPathFromBin (SearchPaths* P, const char* SubDir) +/* Add a search path from the running binary, adding a subdirectory to +** the parent directory of the directory containing the binary. +** +** currently this will work on POSIX systems and on Windows. Should +** we run into build errors on systems that are neither, we must add +** another exception below. +*/ +{ char* Ptr; + char Dir[PATH_MAX]; + +#if defined(_WIN32) if (GetModuleFileName (NULL, Dir, _MAX_PATH) == 0) { return; } +#else /* POSIX */ + + GetProgPath(Dir, ArgVec[0]); + +#endif + /* Remove binary name */ - Ptr = strrchr (Dir, '\\'); + Ptr = strrchr (Dir, PATHSEP[0]); if (Ptr == 0) { return; } *Ptr = '\0'; /* Check for 'bin' directory */ - Ptr = strrchr (Dir, '\\'); + Ptr = strrchr (Dir, PATHSEP[0]); if (Ptr == 0) { return; } - if (strcmp (Ptr++, "\\bin") != 0) { + if (strcmp (Ptr++, PATHSEP "bin") != 0) { return; } @@ -195,13 +307,6 @@ void AddSubSearchPathFromWinBin (SearchPaths* P, const char* SubDir) /* Add the search path */ AddSearchPath (P, Dir); - -#else - - (void) P; - (void) SubDir; - -#endif } @@ -210,9 +315,9 @@ int PushSearchPath (SearchPaths* P, const char* NewPath) ** that it's not already there. If the path is already at the first position, ** return zero, otherwise return a non zero value. */ -{ +{ /* Generate a clean copy of NewPath */ - char* Path = CleanupPath (NewPath); + char* Path = CleanupPath (NewPath); /* If we have paths, check if Path is already at position zero */ if (CollCount (P) > 0 && strcmp (CollConstAt (P, 0), Path) == 0) { @@ -238,6 +343,18 @@ void PopSearchPath (SearchPaths* P) +char* GetSearchPath (SearchPaths* P, unsigned Index) +/* Return the search path at the given index, if the index is valid, return an +** empty string otherwise. +*/ +{ + if (Index < CollCount (P)) + return CollAtUnchecked (P, Index); + return ""; +} + + + char* SearchFile (const SearchPaths* P, const char* File) /* Search for a file in a list of directories. Return a pointer to a malloced ** area that contains the complete path, if found, return 0 otherwise. diff --git a/src/common/searchpath.h b/src/common/searchpath.h index 6f5bafa7a..371388d38 100644 --- a/src/common/searchpath.h +++ b/src/common/searchpath.h @@ -48,10 +48,6 @@ -/* Convert argument to C string */ -#define _STRINGIZE(arg) #arg -#define STRINGIZE(arg) _STRINGIZE(arg) - /* A search path is a pointer to the list */ typedef struct Collection SearchPaths; @@ -79,9 +75,8 @@ void AddSubSearchPathFromEnv (SearchPaths* P, const char* EnvVar, const char* Su ** the environment variable value. */ -void AddSubSearchPathFromWinBin (SearchPaths* P, const char* SubDir); -/* Windows only: -** Add a search path from the running binary, adding a subdirectory to +void AddSubSearchPathFromBin (SearchPaths* P, const char* SubDir); +/* Add a search path from the running binary, adding a subdirectory to ** the parent directory of the directory containing the binary. */ @@ -94,6 +89,11 @@ int PushSearchPath (SearchPaths* P, const char* NewPath); void PopSearchPath (SearchPaths* P); /* Remove a search path from the head of an existing search path list */ +char* GetSearchPath (SearchPaths* P, unsigned Index); +/* Return the search path at the given index, if the index is valid, return an +** empty string otherwise. +*/ + char* SearchFile (const SearchPaths* P, const char* File); /* Search for a file in a list of directories. Return a pointer to a malloced ** area that contains the complete path, if found, return 0 otherwise. diff --git a/src/common/segnames.c b/src/common/segnames.c index bb9aac351..ea8a0125a 100644 --- a/src/common/segnames.c +++ b/src/common/segnames.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/common/segnames.h b/src/common/segnames.h index 0d57d6ac3..c4401a302 100644 --- a/src/common/segnames.h +++ b/src/common/segnames.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/common/strstack.c b/src/common/strstack.c index 508af178e..6b9fb0f8b 100644 --- a/src/common/strstack.c +++ b/src/common/strstack.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2004 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -32,12 +32,12 @@ /*****************************************************************************/ - + /* common */ #include "check.h" #include "strstack.h" #include "xmalloc.h" - + /*****************************************************************************/ diff --git a/src/common/strstack.h b/src/common/strstack.h index d29a47993..b0ff22bfb 100644 --- a/src/common/strstack.h +++ b/src/common/strstack.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2004 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/common/strutil.c b/src/common/strutil.c index dabed34cd..60284e860 100644 --- a/src/common/strutil.c +++ b/src/common/strutil.c @@ -66,7 +66,7 @@ char* StrCopy (char* Dest, size_t DestSize, const char* Source) int StrCaseCmp (const char* S1, const char* S2) -/* Compare two strings ignoring case */ +/* Compare two strings ignoring case */ { int Diff; while ((Diff = toupper (*S1) - toupper (*S2)) == 0 && *S1) { @@ -77,4 +77,4 @@ int StrCaseCmp (const char* S1, const char* S2) } - + diff --git a/src/common/target.c b/src/common/target.c index e89010123..4a851034a 100644 --- a/src/common/target.c +++ b/src/common/target.c @@ -134,54 +134,62 @@ static const unsigned char CTPET[256] = { /* One entry in the target map */ typedef struct TargetEntry TargetEntry; struct TargetEntry { - char Name[12]; /* Target name */ - target_t Id; /* Target id */ + char Name[13]; /* Target name */ + target_t Id; /* Target ID */ }; -/* Table that maps target names to ids. Sorted alphabetically for bsearch. -** Allows mupltiple entries for one target id (target name aliases). +/* Table that maps target names to IDs. Sorted alphabetically for bsearch(). +** Allows multiple entries for one target ID (target name aliases). */ static const TargetEntry TargetMap[] = { - { "apple2", TGT_APPLE2 }, - { "apple2enh", TGT_APPLE2ENH }, - { "atari", TGT_ATARI }, - { "atari5200", TGT_ATARI5200 }, - { "atarixl", TGT_ATARIXL }, - { "atmos", TGT_ATMOS }, - { "bbc", TGT_BBC }, - { "c128", TGT_C128 }, - { "c16", TGT_C16 }, - { "c64", TGT_C64 }, - { "cbm510", TGT_CBM510 }, - { "cbm610", TGT_CBM610 }, - { "gamate", TGT_GAMATE }, - { "geos", TGT_GEOS_CBM }, - { "geos-apple", TGT_GEOS_APPLE }, - { "geos-cbm", TGT_GEOS_CBM }, - { "lunix", TGT_LUNIX }, - { "lynx", TGT_LYNX }, - { "module", TGT_MODULE }, - { "nes", TGT_NES }, - { "none", TGT_NONE }, - { "osic1p", TGT_OSIC1P }, - { "pce", TGT_PCENGINE }, - { "pet", TGT_PET }, - { "plus4", TGT_PLUS4 }, - { "sim6502", TGT_SIM6502 }, - { "sim65c02", TGT_SIM65C02 }, - { "supervision", TGT_SUPERVISION }, - { "vc20", TGT_VIC20 }, - { "vic20", TGT_VIC20 }, + { "apple2", TGT_APPLE2 }, + { "apple2enh", TGT_APPLE2ENH }, + { "atari", TGT_ATARI }, + { "atari2600", TGT_ATARI2600 }, + { "atari5200", TGT_ATARI5200 }, + { "atari7800", TGT_ATARI7800 }, + { "atarixl", TGT_ATARIXL }, + { "atmos", TGT_ATMOS }, + { "bbc", TGT_BBC }, + { "c128", TGT_C128 }, + { "c16", TGT_C16 }, + { "c64", TGT_C64 }, + { "c65", TGT_C65 }, + { "cbm510", TGT_CBM510 }, + { "cbm610", TGT_CBM610 }, + { "creativision", TGT_CREATIVISION }, + { "cx16", TGT_CX16 }, + { "gamate", TGT_GAMATE }, + { "geos", TGT_GEOS_CBM }, + { "geos-apple", TGT_GEOS_APPLE }, + { "geos-cbm", TGT_GEOS_CBM }, + { "lunix", TGT_LUNIX }, + { "lynx", TGT_LYNX }, + { "module", TGT_MODULE }, + { "nes", TGT_NES }, + { "none", TGT_NONE }, + { "osic1p", TGT_OSIC1P }, + { "pce", TGT_PCENGINE }, + { "pet", TGT_PET }, + { "plus4", TGT_PLUS4 }, + { "sim6502", TGT_SIM6502 }, + { "sim65c02", TGT_SIM65C02 }, + { "supervision", TGT_SUPERVISION }, + { "sym1", TGT_SYM1 }, + { "telestrat", TGT_TELESTRAT }, + { "vic20", TGT_VIC20 }, }; #define MAP_ENTRY_COUNT (sizeof (TargetMap) / sizeof (TargetMap[0])) -/* Table with target properties by target id */ +/* Table with target properties by target ID */ static const TargetProperties PropertyTable[TGT_COUNT] = { { "none", CPU_6502, BINFMT_BINARY, CTNone }, { "module", CPU_6502, BINFMT_O65, CTNone }, { "atari", CPU_6502, BINFMT_BINARY, CTAtari }, + { "atari2600", CPU_6502, BINFMT_BINARY, CTNone }, { "atari5200", CPU_6502, BINFMT_BINARY, CTAtari }, + { "atari7800", CPU_6502, BINFMT_BINARY, CTNone }, { "atarixl", CPU_6502, BINFMT_BINARY, CTAtari }, { "vic20", CPU_6502, BINFMT_BINARY, CTPET }, { "c16", CPU_6502, BINFMT_BINARY, CTPET }, @@ -196,16 +204,21 @@ static const TargetProperties PropertyTable[TGT_COUNT] = { { "apple2", CPU_6502, BINFMT_BINARY, CTNone }, { "apple2enh", CPU_65C02, BINFMT_BINARY, CTNone }, { "geos-cbm", CPU_6502, BINFMT_BINARY, CTNone }, + { "creativision", CPU_6502, BINFMT_BINARY, CTNone }, { "geos-apple", CPU_65C02, BINFMT_BINARY, CTNone }, { "lunix", CPU_6502, BINFMT_O65, CTNone }, { "atmos", CPU_6502, BINFMT_BINARY, CTNone }, + { "telestrat", CPU_6502, BINFMT_BINARY, CTNone }, { "nes", CPU_6502, BINFMT_BINARY, CTNone }, { "supervision", CPU_65SC02, BINFMT_BINARY, CTNone }, - { "lynx", CPU_65C02, BINFMT_BINARY, CTNone }, + { "lynx", CPU_65SC02, BINFMT_BINARY, CTNone }, { "sim6502", CPU_6502, BINFMT_BINARY, CTNone }, { "sim65c02", CPU_65C02, BINFMT_BINARY, CTNone }, { "pce", CPU_HUC6280, BINFMT_BINARY, CTNone }, { "gamate", CPU_6502, BINFMT_BINARY, CTNone }, + { "c65", CPU_4510, BINFMT_BINARY, CTPET }, + { "cx16", CPU_65C02, BINFMT_BINARY, CTPET }, + { "sym1", CPU_6502, BINFMT_BINARY, CTNone }, }; /* Target system */ @@ -228,7 +241,7 @@ static int Compare (const void* Key, const void* Entry) target_t FindTarget (const char* Name) -/* Find a target by name and return the target id. TGT_UNKNOWN is returned if +/* Find a target by name and return the target ID. TGT_UNKNOWN is returned if ** the given name is no valid target. */ { @@ -236,7 +249,7 @@ target_t FindTarget (const char* Name) const TargetEntry* T; T = bsearch (Name, TargetMap, MAP_ENTRY_COUNT, sizeof (TargetMap[0]), Compare); - /* Return the target id */ + /* Return the target ID */ return (T == 0)? TGT_UNKNOWN : T->Id; } @@ -245,7 +258,7 @@ target_t FindTarget (const char* Name) const TargetProperties* GetTargetProperties (target_t Target) /* Return the properties for a target */ { - /* Must have a valid target id */ + /* Must have a valid target ID */ PRECONDITION (Target >= 0 && Target < TGT_COUNT); /* Return the array entry */ diff --git a/src/common/target.h b/src/common/target.h index 6366b725f..7087048e2 100644 --- a/src/common/target.h +++ b/src/common/target.h @@ -55,7 +55,9 @@ typedef enum { TGT_NONE, TGT_MODULE, TGT_ATARI, + TGT_ATARI2600, TGT_ATARI5200, + TGT_ATARI7800, TGT_ATARIXL, TGT_VIC20, TGT_C16, @@ -70,9 +72,11 @@ typedef enum { TGT_APPLE2, TGT_APPLE2ENH, TGT_GEOS_CBM, + TGT_CREATIVISION, TGT_GEOS_APPLE, TGT_LUNIX, TGT_ATMOS, + TGT_TELESTRAT, TGT_NES, TGT_SUPERVISION, TGT_LYNX, @@ -80,13 +84,16 @@ typedef enum { TGT_SIM65C02, TGT_PCENGINE, TGT_GAMATE, + TGT_C65, + TGT_CX16, + TGT_SYM1, TGT_COUNT /* Number of target systems */ } target_t; /* Collection of target properties */ typedef struct TargetProperties TargetProperties; struct TargetProperties { - const char Name[12]; /* Name of the target */ + const char Name[13]; /* Name of the target */ cpu_t DefaultCPU; /* Default CPU for this target */ unsigned char BinFmt; /* Default binary format for this target */ const unsigned char* CharMap; /* Character translation table */ @@ -98,7 +105,8 @@ extern target_t Target; /* Types of available output formats */ #define BINFMT_DEFAULT 0 /* Default (binary) */ #define BINFMT_BINARY 1 /* Straight binary format */ -#define BINFMT_O65 2 /* Andre Fachats o65 format */ +#define BINFMT_O65 2 /* Andre Fachat's o65 format */ +#define BINFMT_ATARIEXE 3 /* Standard Atari binary load */ @@ -122,5 +130,4 @@ const char* GetTargetName (target_t Target); /* End of target.h */ - #endif diff --git a/src/common/tgttrans.c b/src/common/tgttrans.c index 95bdf8662..3310eab81 100644 --- a/src/common/tgttrans.c +++ b/src/common/tgttrans.c @@ -39,6 +39,8 @@ #include "check.h" #include "target.h" #include "tgttrans.h" +#include "coll.h" +#include "xmalloc.h" @@ -68,6 +70,9 @@ static unsigned char Tab[256] = { 0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF, }; +#define MAX_CHARMAP_STACK 16 +static Collection CharmapStack = STATIC_COLLECTION_INITIALIZER; + /*****************************************************************************/ @@ -124,6 +129,55 @@ void TgtTranslateStrBuf (StrBuf* Buf) void TgtTranslateSet (unsigned Index, unsigned char C) /* Set the translation code for the given character */ { - CHECK (Index > 0 && Index < sizeof (Tab)); + CHECK (Index < sizeof (Tab)); Tab[Index] = C; } + + + +int TgtTranslatePush (void) +/* Pushes the current translation table to the internal stack +** Returns 1 on success, 0 on stack full +*/ +{ + unsigned char* TempTab; + + if (CollCount (&CharmapStack) >= MAX_CHARMAP_STACK) { + return 0; + } + + TempTab = xmalloc (sizeof (Tab)); + memcpy (TempTab, Tab, sizeof (Tab)); + + CollAppend (&CharmapStack, TempTab); + return 1; +} + + + +int TgtTranslatePop (void) +/* Pops a translation table from the internal stack into the current table +** Returns 1 on success, 0 on stack empty +*/ +{ + unsigned char* TempTab; + + if (CollCount (&CharmapStack) == 0) { + return 0; + } + + TempTab = CollPop (&CharmapStack); + + memcpy (Tab, TempTab, sizeof (Tab)); + + xfree (TempTab); + return 1; +} + + + +int TgtTranslateStackIsEmpty (void) +/* Returns 1 if the internal stack is empty */ +{ + return CollCount (&CharmapStack) == 0; +} diff --git a/src/common/tgttrans.h b/src/common/tgttrans.h index 46981ec0f..a86d126db 100644 --- a/src/common/tgttrans.h +++ b/src/common/tgttrans.h @@ -70,6 +70,19 @@ void TgtTranslateStrBuf (StrBuf* Buf); void TgtTranslateSet (unsigned Index, unsigned char C); /* Set the translation code for the given character */ +int TgtTranslatePush (void); +/* Pushes the current translation table to the internal stack +** Returns 1 on success, 0 on stack full +*/ + +int TgtTranslatePop (void); +/* Pops a translation table from the internal stack into the current table +** Returns 1 on success, 0 on stack empty +*/ + +int TgtTranslateStackIsEmpty (void); +/* Returns 1 if the internal stack is empty */ + /* End of tgttrans.h */ diff --git a/src/common/va_copy.h b/src/common/va_copy.h index 2f56efa1a..413d96bdd 100644 --- a/src/common/va_copy.h +++ b/src/common/va_copy.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2004 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -41,7 +41,7 @@ #include <stdarg.h> - + /* No action if we have a working va_copy */ #if !defined(va_copy) diff --git a/src/common/version.c b/src/common/version.c index 4e61a5f83..270eab118 100644 --- a/src/common/version.c +++ b/src/common/version.c @@ -47,9 +47,48 @@ #define VER_MAJOR 2U -#define VER_MINOR 15U - +#define VER_MINOR 19U +/* +** Note: until 2.19 the __CC65__ macro was defined as (VER_MAJOR * 0x100) + VER_MINOR * 0x10 +** which resulted in broken values starting at version 2.16 of the compiler: +** +** version __CC65__ identifies as +** +** 2.0 0x0200 2.0 +** 2.1 0x0210 2.16 +** 2.2 0x0220 2.32 +** 2.3 0x0230 2.48 +** 2.4 0x0240 2.64 +** 2.5 0x0250 2.80 +** 2.6 0x0260 2.96 +** 2.7 0x0270 2.112 +** 2.8 0x0280 2.128 +** 2.9 0x0290 2.144 +** 2.10 0x02a0 2.160 +** 2.11 0x02b0 2.176 +** 2.12 0x02c0 2.192 +** 2.13 0x02d0 2.208 +** 2.14 0x02e0 2.224 +** 2.15 0x02f0 2.240 +** 2.16 0x0300 3.0 +** 2.17 0x0310 3.16 +** 2.18 0x0320 3.32 +** 2.19 0x0330 3.48 +** 2.19-git 0x0213 2.19 +** +** to keep damage low(er), we should do the following: +** +** - bump to 3.1 (skip 3.0) before 2.32 +** - bump to 4.0 before 3.16 +** +** That way at least each value is unique, and checking compiler version(s) can +** still work to some degree, should it really be necessary. +** +** Some preprocessor kludges can be used to still check for greater or lesser +** versions - see the checkversion program in the samples directory. +** +*/ /*****************************************************************************/ /* Code */ @@ -61,8 +100,8 @@ const char* GetVersionAsString (void) /* Returns the version number as a string in a static buffer */ { static char Buf[60]; -#if defined(GIT_SHA) - xsnprintf (Buf, sizeof (Buf), "%u.%u - Git %s", VER_MAJOR, VER_MINOR, STRINGIZE (GIT_SHA)); +#if defined(BUILD_ID) + xsnprintf (Buf, sizeof (Buf), "%u.%u - %s", VER_MAJOR, VER_MINOR, BUILD_ID); #else xsnprintf (Buf, sizeof (Buf), "%u.%u", VER_MAJOR, VER_MINOR); #endif @@ -74,5 +113,8 @@ const char* GetVersionAsString (void) unsigned GetVersionAsNumber (void) /* Returns the version number as a combined unsigned for use in a #define */ { - return ((VER_MAJOR * 0x100) + (VER_MINOR * 0x10)); +#if VER_MINOR >= 0x100 +#error "VER_MINOR must be smaller than 0x100 - time to bump the major version!" +#endif + return ((VER_MAJOR * 0x100) + VER_MINOR); } diff --git a/src/common/xmalloc.c b/src/common/xmalloc.c index 327d378fe..192e8fadd 100644 --- a/src/common/xmalloc.c +++ b/src/common/xmalloc.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2000-2006 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/common/xmalloc.h b/src/common/xmalloc.h index eb196b6a1..fc919a16f 100644 --- a/src/common/xmalloc.h +++ b/src/common/xmalloc.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2000-2006 Ullrich von Bassewitz */ -/* Rmerstrae 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/common/xsprintf.c b/src/common/xsprintf.c index d50ad7a68..a3fbc676b 100644 --- a/src/common/xsprintf.c +++ b/src/common/xsprintf.c @@ -33,6 +33,7 @@ +#include <inttypes.h> #include <stdio.h> #include <stddef.h> #include <string.h> @@ -41,7 +42,6 @@ /* common */ #include "chartype.h" #include "check.h" -#include "inttypes.h" #include "strbuf.h" #include "va_copy.h" #include "xsprintf.h" @@ -352,14 +352,14 @@ static void StoreOffset (PrintfCtrl* P) /* Store the current output offset (%n format spec) */ { switch (P->LengthMod) { - case lmChar: *va_arg (P->ap, int*) = P->BufFill; - case lmShort: *va_arg (P->ap, int*) = P->BufFill; - case lmInt: *va_arg (P->ap, int*) = P->BufFill; - case lmLong: *va_arg (P->ap, long*) = P->BufFill; - case lmIntMax: *va_arg (P->ap, intmax_t*) = P->BufFill; - case lmSizeT: *va_arg (P->ap, size_t*) = P->BufFill; - case lmPtrDiffT: *va_arg (P->ap, ptrdiff_t*) = P->BufFill; - default: FAIL ("Invalid size modifier for %n format spec in xvsnprintf"); + case lmChar: *va_arg (P->ap, int*) = P->BufFill; break; + case lmShort: *va_arg (P->ap, int*) = P->BufFill; break; + case lmInt: *va_arg (P->ap, int*) = P->BufFill; break; + case lmLong: *va_arg (P->ap, long*) = P->BufFill; break; + case lmIntMax: *va_arg (P->ap, intmax_t*) = P->BufFill; break; + case lmSizeT: *va_arg (P->ap, size_t*) = P->BufFill; break; + case lmPtrDiffT: *va_arg (P->ap, ptrdiff_t*) = P->BufFill; break; + default: FAIL ("Invalid size modifier for %n format spec. in xvsnprintf()"); } } @@ -580,7 +580,7 @@ int xvsnprintf (char* Buf, size_t Size, const char* Format, va_list ap) CHECK (S != 0); /* Handle the length by using a precision */ if ((P.Flags & fPrec) != 0) { - /* Precision already specified, use length of string + /* Precision already specified, use length of string ** if less. */ if ((unsigned) P.Prec > SB_GetLen (S)) { diff --git a/src/common/xsprintf.h b/src/common/xsprintf.h index a37b71914..4d32a7410 100644 --- a/src/common/xsprintf.h +++ b/src/common/xsprintf.h @@ -33,9 +33,9 @@ -/* We need a way to output a StrBuf, but on the other side, we don't want to -** switch off gcc's printf format string checking. So we cheat as follows: -** %m (which is a gcc extension and doesn't take an argument) switches %p +/* We need a way to output a StrBuf, but on the other side, we don't want to +** switch off gcc's printf format string checking. So we cheat as follows: +** %m (which is a gcc extension and doesn't take an argument) switches %p ** between outputting a pointer and a string buf. This works just one time, ** so each StrBuf needs in fact a %m%p spec. There's no way to apply a width ** and precision to such a StrBuf, but *not* using %p would bring up a warning diff --git a/src/da65.vcxproj b/src/da65.vcxproj index 7810844dc..a40daf1d6 100644 --- a/src/da65.vcxproj +++ b/src/da65.vcxproj @@ -1,5 +1,5 @@ <?xml version="1.0" encoding="utf-8"?> -<Project DefaultTargets="Build" ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> +<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <ItemGroup Label="ProjectConfigurations"> <ProjectConfiguration Include="Debug|Win32"> <Configuration>Debug</Configuration> @@ -13,65 +13,39 @@ <PropertyGroup Label="Globals"> <ProjectGuid>{0BCFB793-2B25-40E2-B265-75848824AC4C}</ProjectGuid> <Keyword>Win32Proj</Keyword> - <RootNamespace>da65</RootNamespace> </PropertyGroup> + <ImportGroup Label="PropertySheets"> + <Import Project="cc65.props" /> + </ImportGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> <UseDebugLibraries>true</UseDebugLibraries> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> <UseDebugLibraries>false</UseDebugLibraries> - <WholeProgramOptimization>true</WholeProgramOptimization> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> <ImportGroup Label="ExtensionSettings"> </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> <PropertyGroup Label="UserMacros" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <LinkIncremental>true</LinkIncremental> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> <ClCompile> - <PrecompiledHeader> - </PrecompiledHeader> - <WarningLevel>Level3</WarningLevel> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;_DEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;_DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>true</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> <ClCompile> - <WarningLevel>Level3</WarningLevel> - <PrecompiledHeader> - </PrecompiledHeader> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;NDEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>false</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemGroup> @@ -86,8 +60,10 @@ <ClCompile Include="da65\infofile.c" /> <ClCompile Include="da65\labels.c" /> <ClCompile Include="da65\main.c" /> + <ClCompile Include="da65\opc4510.c" /> <ClCompile Include="da65\opc6502.c" /> <ClCompile Include="da65\opc6502x.c" /> + <ClCompile Include="da65\opc6502dtv.c" /> <ClCompile Include="da65\opc65816.c" /> <ClCompile Include="da65\opc65c02.c" /> <ClCompile Include="da65\opc65sc02.c" /> @@ -109,8 +85,10 @@ <ClInclude Include="da65\handler.h" /> <ClInclude Include="da65\infofile.h" /> <ClInclude Include="da65\labels.h" /> + <ClInclude Include="da65\opc4510.h" /> <ClInclude Include="da65\opc6502.h" /> <ClInclude Include="da65\opc6502x.h" /> + <ClInclude Include="da65\opc6502dtv.h" /> <ClInclude Include="da65\opc65816.h" /> <ClInclude Include="da65\opc65c02.h" /> <ClInclude Include="da65\opc65sc02.h" /> diff --git a/src/da65/asminc.c b/src/da65/asminc.c index 06a397d52..4d9da2594 100644 --- a/src/da65/asminc.c +++ b/src/da65/asminc.c @@ -133,7 +133,7 @@ void AsmInc (const char* Filename, char CommentStart, int IgnoreUnknown) SB_Terminate (&Ident); } else { if (!IgnoreUnknown) { - Error ("%s(%u): Syntax error", Filename, Line); + Error ("%s:%u: Syntax error", Filename, Line); } continue; } @@ -148,7 +148,7 @@ void AsmInc (const char* Filename, char CommentStart, int IgnoreUnknown) ++L; } else { if (!IgnoreUnknown) { - Error ("%s(%u): Missing `='", Filename, Line); + Error ("%s:%u: Missing '='", Filename, Line); } continue; } @@ -192,7 +192,7 @@ void AsmInc (const char* Filename, char CommentStart, int IgnoreUnknown) /* Must have at least one digit */ if (Digits == 0) { if (!IgnoreUnknown) { - Error ("%s(%u): Error in number format", Filename, Line); + Error ("%s:%u: Error in number format", Filename, Line); } continue; } @@ -213,7 +213,7 @@ void AsmInc (const char* Filename, char CommentStart, int IgnoreUnknown) /* Check for a comment character or end of line */ if (*L != CommentStart && *L != '\0') { if (!IgnoreUnknown) { - Error ("%s(%u): Trailing garbage", Filename, Line); + Error ("%s:%u: Trailing garbage", Filename, Line); } continue; } diff --git a/src/da65/asminc.h b/src/da65/asminc.h index bf48710e9..6d58cd155 100644 --- a/src/da65/asminc.h +++ b/src/da65/asminc.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2005 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/da65/code.c b/src/da65/code.c index 9aff732b3..3fb6a21d3 100644 --- a/src/da65/code.c +++ b/src/da65/code.c @@ -78,12 +78,12 @@ void LoadCode (void) /* Open the file */ F = fopen (InFile, "rb"); if (F == 0) { - Error ("Cannot open `%s': %s", InFile, strerror (errno)); + Error ("Cannot open '%s': %s", InFile, strerror (errno)); } /* Seek to the end to get the size of the file */ if (fseek (F, 0, SEEK_END) != 0) { - Error ("Cannot seek on file `%s': %s", InFile, strerror (errno)); + Error ("Cannot seek on file '%s': %s", InFile, strerror (errno)); } Size = ftell (F); @@ -101,7 +101,7 @@ void LoadCode (void) ** the file. */ if (fseek (F, InputOffs, SEEK_SET) != 0) { - Error ("Cannot seek on file `%s': %s", InFile, strerror (errno)); + Error ("Cannot seek on file '%s': %s", InFile, strerror (errno)); } Size -= InputOffs; @@ -130,10 +130,10 @@ void LoadCode (void) /* Check if the size is larger than what we can read */ if (Size == 0) { - Error ("Nothing to read from input file `%s'", InFile); + Error ("Nothing to read from input file '%s'", InFile); } if (Size > MaxCount) { - Warning ("File `%s' is too large, ignoring %ld bytes", + Warning ("File '%s' is too large, ignoring %ld bytes", InFile, Size - MaxCount); } else if (MaxCount > Size) { MaxCount = (unsigned) Size; @@ -142,7 +142,7 @@ void LoadCode (void) /* Read from the file and remember the number of bytes read */ Count = fread (CodeBuf + StartAddr, 1, MaxCount, F); if (ferror (F) || Count != MaxCount) { - Error ("Error reading from `%s': %s", InFile, strerror (errno)); + Error ("Error reading from '%s': %s", InFile, strerror (errno)); } /* Close the file */ diff --git a/src/da65/code.h b/src/da65/code.h index 0d21e61e1..50e68ebdf 100644 --- a/src/da65/code.h +++ b/src/da65/code.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2000-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/da65/comments.c b/src/da65/comments.c index 64b64ca28..7c671131f 100644 --- a/src/da65/comments.c +++ b/src/da65/comments.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2006 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -36,7 +36,7 @@ /* common */ #include "xmalloc.h" -/* da65 */ +/* da65 */ #include "attrtab.h" #include "comments.h" #include "error.h" diff --git a/src/da65/comments.h b/src/da65/comments.h index 1b8bc1771..1d95111a9 100644 --- a/src/da65/comments.h +++ b/src/da65/comments.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2006 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/da65/error.h b/src/da65/error.h index d0221bcc4..8027b3c1f 100644 --- a/src/da65/error.h +++ b/src/da65/error.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2000-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/da65/global.c b/src/da65/global.c index e2b1fd144..e258aecdd 100644 --- a/src/da65/global.c +++ b/src/da65/global.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2000-2006 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -59,6 +59,7 @@ unsigned char PassCount = 2; /* How many passed do we do? */ signed char NewlineAfterJMP = -1; /* Add a newline after a JMP insn? */ signed char NewlineAfterRTS = -1; /* Add a newline after a RTS insn? */ long StartAddr = -1L; /* Start/load address of the program */ +unsigned char SyncLines = 0; /* Accept line markers in the info file */ long InputOffs = -1L; /* Offset into input file */ long InputSize = -1L; /* Number of bytes to read from input */ diff --git a/src/da65/global.h b/src/da65/global.h index 14b113399..c85c7a79e 100644 --- a/src/da65/global.h +++ b/src/da65/global.h @@ -60,6 +60,7 @@ extern unsigned char PassCount; /* How many passed do we do? */ extern signed char NewlineAfterJMP;/* Add a newline after a JMP insn? */ extern signed char NewlineAfterRTS;/* Add a newline after a RTS insn? */ extern long StartAddr; /* Start/load address of the program */ +extern unsigned char SyncLines; /* Accept line markers in the info file */ extern long InputOffs; /* Offset into input file */ extern long InputSize; /* Number of bytes to read from input */ diff --git a/src/da65/handler.c b/src/da65/handler.c index 0806301fe..255b8da86 100644 --- a/src/da65/handler.c +++ b/src/da65/handler.c @@ -36,6 +36,7 @@ #include <stdarg.h> /* common */ +#include "xmalloc.h" #include "xsprintf.h" /* da65 */ @@ -50,6 +51,8 @@ +static unsigned short SubroutineParamSize[0x10000]; + /*****************************************************************************/ /* Helper functions */ /*****************************************************************************/ @@ -226,6 +229,13 @@ void OH_Immediate (const OpcDesc* D) +void OH_ImmediateWord (const OpcDesc* D) +{ + OneLine (D, "#$%04X", GetCodeWord (PC+1)); +} + + + void OH_Direct (const OpcDesc* D) { /* Get the operand */ @@ -336,7 +346,12 @@ void OH_Relative (const OpcDesc* D) GenerateLabel (D->Flags, Addr); /* Output the line */ - OneLine (D, "%s", GetAddrArg (D->Flags, Addr)); + if (HaveLabel(Addr)) { + OneLine (D, "%s", GetAddrArg (D->Flags, Addr)); + } else { + /* No label -- make a relative address expression */ + OneLine (D, "* + (%d)", (int) Offs + 2); + } } @@ -348,6 +363,23 @@ void OH_RelativeLong (const OpcDesc* D attribute ((unused))) +void OH_RelativeLong4510 (const OpcDesc* D attribute ((unused))) +{ + /* Get the operand */ + signed short Offs = GetCodeWord (PC+1); + + /* Calculate the target address */ + unsigned Addr = (((int) PC+2) + Offs) & 0xFFFF; + + /* Generate a label in pass 1 */ + GenerateLabel (D->Flags, Addr); + + /* Output the line */ + OneLine (D, "%s", GetAddrArg (D->Flags, Addr)); +} + + + void OH_DirectIndirect (const OpcDesc* D) { /* Get the operand */ @@ -376,6 +408,20 @@ void OH_DirectIndirectY (const OpcDesc* D) +void OH_DirectIndirectZ (const OpcDesc* D) +{ + /* Get the operand */ + unsigned Addr = GetCodeByte (PC+1); + + /* Generate a label in pass 1 */ + GenerateLabel (D->Flags, Addr); + + /* Output the line */ + OneLine (D, "(%s),z", GetAddrArg (D->Flags, Addr)); +} + + + void OH_DirectXIndirect (const OpcDesc* D) { /* Get the operand */ @@ -406,6 +452,8 @@ void OH_AbsoluteIndirect (const OpcDesc* D) void OH_BitBranch (const OpcDesc* D) { + char* BranchLabel; + /* Get the operands */ unsigned char TestAddr = GetCodeByte (PC+1); signed char BranchOffs = GetCodeByte (PC+2); @@ -421,8 +469,16 @@ void OH_BitBranch (const OpcDesc* D) GenerateLabel (D->Flags, TestAddr); GenerateLabel (flLabel, BranchAddr); + /* Make a copy of an operand, so that + ** the other operand can't overwrite it. + ** [GetAddrArg() uses a statically-stored buffer.] + */ + BranchLabel = xstrdup (GetAddrArg (flLabel, BranchAddr)); + /* Output the line */ - OneLine (D, "%s,%s", GetAddrArg (D->Flags, TestAddr), GetAddrArg (flLabel, BranchAddr)); + OneLine (D, "%s,%s", GetAddrArg (D->Flags, TestAddr), BranchLabel); + + xfree (BranchLabel); } @@ -499,7 +555,16 @@ void OH_DirectIndirectLongX (const OpcDesc* D attribute ((unused))) void OH_StackRelativeIndirectY (const OpcDesc* D attribute ((unused))) { - Error ("Not implemented"); + /* Output the line */ + OneLine (D, "($%02X,s),y", GetCodeByte (PC+1)); +} + + + +void OH_StackRelativeIndirectY4510 (const OpcDesc* D attribute ((unused))) +{ + /* Output the line */ + OneLine (D, "($%02X,sp),y", GetCodeByte (PC+1)); } @@ -518,8 +583,10 @@ void OH_DirectIndirectLongY (const OpcDesc* D attribute ((unused))) -void OH_BlockMove (const OpcDesc* D attribute ((unused))) +void OH_BlockMove (const OpcDesc* D) { + char* DstLabel; + /* Get source operand */ unsigned Src = GetCodeWord (PC+1); /* Get destination operand */ @@ -529,11 +596,19 @@ void OH_BlockMove (const OpcDesc* D attribute ((unused))) GenerateLabel (D->Flags, Src); GenerateLabel (D->Flags, Dst); + /* Make a copy of an operand, so that + ** the other operand can't overwrite it. + ** [GetAddrArg() uses a statically-stored buffer.] + */ + DstLabel = xstrdup (GetAddrArg (D->Flags, Dst)); + /* Output the line */ - OneLine (D, "%s%s,%s%s,#$%02X", + OneLine (D, "%s%s,%s%s,$%04X", GetAbsOverride (D->Flags, Src), GetAddrArg (D->Flags, Src), - GetAbsOverride (D->Flags, Dst), GetAddrArg (D->Flags, Dst), + GetAbsOverride (D->Flags, Dst), DstLabel, GetCodeWord (PC+5)); + + xfree (DstLabel); } @@ -662,3 +737,46 @@ void OH_JmpAbsoluteIndirect (const OpcDesc* D) } SeparatorLine (); } + + + +void OH_JmpAbsoluteXIndirect (const OpcDesc* D) +{ + OH_AbsoluteXIndirect (D); + if (NewlineAfterJMP) { + LineFeed (); + } + SeparatorLine (); +} + + + +void OH_JsrAbsolute (const OpcDesc* D) +{ + unsigned ParamSize = SubroutineParamSize[GetCodeWord (PC+1)]; + OH_Absolute (D); + if (ParamSize > 0) { + unsigned RemainingBytes; + unsigned BytesLeft; + PC += D->Size; + RemainingBytes = GetRemainingBytes (); + if (RemainingBytes < ParamSize) { + ParamSize = RemainingBytes; + } + BytesLeft = ParamSize; + while (BytesLeft > 0) { + unsigned Chunk = (BytesLeft > BytesPerLine) ? BytesPerLine : BytesLeft; + DataByteLine (Chunk); + BytesLeft -= Chunk; + PC += Chunk; + } + PC -= D->Size; + } +} + + + +void SetSubroutineParamSize (unsigned Addr, unsigned Size) +{ + SubroutineParamSize[Addr] = Size; +} diff --git a/src/da65/handler.h b/src/da65/handler.h index 77da618c1..eaa66e7fd 100644 --- a/src/da65/handler.h +++ b/src/da65/handler.h @@ -57,6 +57,7 @@ void OH_Illegal (const OpcDesc* D attribute ((unused))); void OH_Accumulator (const OpcDesc*); void OH_Implicit (const OpcDesc*); void OH_Immediate (const OpcDesc*); +void OH_ImmediateWord (const OpcDesc*); void OH_Direct (const OpcDesc*); void OH_DirectX (const OpcDesc*); void OH_DirectY (const OpcDesc*); @@ -67,8 +68,10 @@ void OH_AbsoluteLong (const OpcDesc*); void OH_AbsoluteLongX (const OpcDesc*); void OH_Relative (const OpcDesc*); void OH_RelativeLong (const OpcDesc*); +void OH_RelativeLong4510 (const OpcDesc*); void OH_DirectIndirect (const OpcDesc*); void OH_DirectIndirectY (const OpcDesc*); +void OH_DirectIndirectZ (const OpcDesc*); void OH_DirectXIndirect (const OpcDesc*); void OH_AbsoluteIndirect (const OpcDesc*); @@ -82,6 +85,7 @@ void OH_ImmediateAbsoluteX (const OpcDesc*); void OH_StackRelative (const OpcDesc*); void OH_DirectIndirectLongX (const OpcDesc*); void OH_StackRelativeIndirectY (const OpcDesc*); +void OH_StackRelativeIndirectY4510 (const OpcDesc*); void OH_DirectIndirectLong (const OpcDesc*); void OH_DirectIndirectLongY (const OpcDesc*); void OH_BlockMove (const OpcDesc*); @@ -94,12 +98,15 @@ void OH_AccumulatorBit (const OpcDesc*); void OH_AccumulatorBitBranch (const OpcDesc*); void OH_JmpDirectIndirect (const OpcDesc* D); void OH_SpecialPage (const OpcDesc*); - + /* Handlers for special instructions */ void OH_Rts (const OpcDesc*); void OH_JmpAbsolute (const OpcDesc*); void OH_JmpAbsoluteIndirect (const OpcDesc* D); +void OH_JmpAbsoluteXIndirect (const OpcDesc* D); +void OH_JsrAbsolute (const OpcDesc*); +void SetSubroutineParamSize (unsigned Addr, unsigned Size); /* End of handler.h */ diff --git a/src/da65/infofile.c b/src/da65/infofile.c index e8ce66cf7..6db82cb36 100644 --- a/src/da65/infofile.c +++ b/src/da65/infofile.c @@ -59,6 +59,7 @@ #include "opctable.h" #include "scanner.h" #include "segment.h" +#include "handler.h" @@ -376,17 +377,19 @@ static void LabelSection (void) /* Parse a label section */ { static const IdentTok LabelDefs[] = { - { "COMMENT", INFOTOK_COMMENT }, - { "ADDR", INFOTOK_ADDR }, - { "NAME", INFOTOK_NAME }, - { "SIZE", INFOTOK_SIZE }, + { "COMMENT", INFOTOK_COMMENT }, + { "ADDR", INFOTOK_ADDR }, + { "NAME", INFOTOK_NAME }, + { "SIZE", INFOTOK_SIZE }, + { "PARAMSIZE", INFOTOK_PARAMSIZE }, }; /* Locals - initialize to avoid gcc warnings */ - char* Name = 0; - char* Comment = 0; - long Value = -1; - long Size = -1; + char* Name = 0; + char* Comment = 0; + long Value = -1; + long Size = -1; + long ParamSize = -1; /* Skip the token */ InfoNextTok (); @@ -448,6 +451,17 @@ static void LabelSection (void) InfoNextTok (); break; + case INFOTOK_PARAMSIZE: + InfoNextTok (); + if (ParamSize >= 0) { + InfoError ("ParamSize already given"); + } + InfoAssureInt (); + InfoRangeCheck (1, 0x10000); + ParamSize = InfoIVal; + InfoNextTok (); + break; + default: Internal ("Unexpected token: %u", InfoTok); } @@ -484,6 +498,9 @@ static void LabelSection (void) } else { AddExtLabelRange ((unsigned) Value, Name, Size); } + if (ParamSize >= 0) { + SetSubroutineParamSize ((unsigned) Value, (unsigned) ParamSize); + } /* Define the comment */ if (Comment) { diff --git a/src/da65/infofile.h b/src/da65/infofile.h index b8b3f53a8..49ddfcd5d 100644 --- a/src/da65/infofile.h +++ b/src/da65/infofile.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2000-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/da65/labels.c b/src/da65/labels.c index 547a79869..542205c11 100644 --- a/src/da65/labels.c +++ b/src/da65/labels.c @@ -92,10 +92,14 @@ static void AddLabel (unsigned Addr, attr_t Attr, const char* Name) ** have a name (you guessed that, didn't you?). */ if (ExistingAttr == Attr && - ((Name == 0 && SymTab[Addr] == 0) || strcmp (SymTab[Addr], Name) == 0)) { + ((Name == 0 && SymTab[Addr] == 0) || + (Name != 0 && SymTab[Addr] != 0 && + strcmp (SymTab[Addr], Name) == 0))) { return; } - Error ("Duplicate label for address $%04X: %s/%s", Addr, SymTab[Addr], Name); + Error ("Duplicate label for address $%04X (%s): '%s'", Addr, + SymTab[Addr] == 0 ? "<unnamed label>" : SymTab[Addr], + Name == 0 ? "<unnamed label>" : Name); } /* Create a new label (xstrdup will return NULL if input NULL) */ @@ -264,11 +268,11 @@ const char* GetLabel (unsigned Addr, unsigned RefFrom) ** of unnamed labels, to determine the name. */ { - static const char* FwdLabels[] = { + static const char* const FwdLabels[] = { ":+", ":++", ":+++", ":++++", ":+++++", ":++++++", ":+++++++", ":++++++++", ":+++++++++", ":++++++++++" }; - static const char* BackLabels[] = { + static const char* const BackLabels[] = { ":-", ":--", ":---", ":----", ":-----", ":------", ":-------", ":--------", ":---------", ":----------" }; diff --git a/src/da65/main.c b/src/da65/main.c index 8c37e1ae2..1fc07f006 100644 --- a/src/da65/main.c +++ b/src/da65/main.c @@ -82,6 +82,7 @@ static void Usage (void) " -v\t\t\tIncrease verbosity\n" " -F\t\t\tAdd formfeeds to the output\n" " -S addr\t\tSet the start/load address\n" + " -s\t\t\tAccept line markers in the info file\n" " -V\t\t\tPrint the disassembler version\n" "\n" "Long options:\n" @@ -98,6 +99,7 @@ static void Usage (void) " --mnemonic-column n\tSpecify mnemonic start column\n" " --pagelength n\tSet the page length for the listing\n" " --start-addr addr\tSet the start/load address\n" + " --sync-lines\t\tAccept line markers in the info file\n" " --text-column n\tSpecify text start column\n" " --verbose\t\tIncrease verbosity\n" " --version\t\tPrint the disassembler version\n", @@ -312,6 +314,15 @@ static void OptStartAddr (const char* Opt, const char* Arg) +static void OptSyncLines (const char* Opt attribute ((unused)), + const char* Arg attribute ((unused))) +/* Handle the --sync-lines option */ +{ + SyncLines = 1; +} + + + static void OptTextColumn (const char* Opt, const char* Arg) /* Handle the --text-column option */ { @@ -340,7 +351,8 @@ static void OptVersion (const char* Opt attribute ((unused)), const char* Arg attribute ((unused))) /* Print the disassembler version */ { - fprintf (stderr, "da65 V%s\n", GetVersionAsString ()); + fprintf (stderr, "%s V%s\n", ProgName, GetVersionAsString ()); + exit(EXIT_SUCCESS); } @@ -349,6 +361,7 @@ static void OneOpcode (unsigned RemainingBytes) /* Disassemble one opcode */ { unsigned I; + unsigned OldPC = PC; /* Get the opcode from the current address */ unsigned char OPC = GetCodeByte (PC); @@ -475,7 +488,7 @@ static void OneOpcode (unsigned RemainingBytes) /* Change back to the default CODE segment if ** a named segment stops at the current address. */ - for (I = D->Size; I >= 1; --I) { + for (I = PC - OldPC; I > 0; --I) { if (IsSegmentEnd (PC - I)) { EndSegment (); break; @@ -537,6 +550,7 @@ int main (int argc, char* argv []) { "--mnemonic-column", 1, OptMnemonicColumn }, { "--pagelength", 1, OptPageLength }, { "--start-addr", 1, OptStartAddr }, + { "--sync-lines", 0, OptSyncLines }, { "--text-column", 1, OptTextColumn }, { "--verbose", 0, OptVerbose }, { "--version", 0, OptVersion }, @@ -587,6 +601,10 @@ int main (int argc, char* argv []) OptStartAddr (Arg, GetArg (&I, 2)); break; + case 's': + OptSyncLines (Arg, 0); + break; + case 'V': OptVersion (Arg, 0); break; @@ -599,7 +617,7 @@ int main (int argc, char* argv []) } else { /* Filename. Check if we already had one */ if (InFile) { - fprintf (stderr, "%s: Don't know what to do with `%s'\n", + fprintf (stderr, "%s: Don't know what to do with '%s'\n", ProgName, Arg); exit (EXIT_FAILURE); } else { diff --git a/src/da65/opc4510.c b/src/da65/opc4510.c new file mode 100644 index 000000000..0356499e8 --- /dev/null +++ b/src/da65/opc4510.c @@ -0,0 +1,306 @@ +/*****************************************************************************/ +/* */ +/* opc4510.c */ +/* */ +/* 4510 opcode description table */ +/* */ +/* */ +/* */ +/* (C) 2003-2011, Ullrich von Bassewitz */ +/* Roemerstrasse 52 */ +/* D-70794 Filderstadt */ +/* EMail: uz@cc65.org */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +/* da65 */ +#include "handler.h" +#include "opc4510.h" + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +/* Descriptions for all opcodes */ +const OpcDesc OpcTable_4510[256] = { + { "brk", 1, flNone, OH_Implicit }, /* $00 */ + { "ora", 2, flUseLabel, OH_DirectXIndirect }, /* $01 */ + { "cle", 1, flNone, OH_Implicit }, /* $02 */ + { "see", 1, flNone, OH_Implicit }, /* $03 */ + { "tsb", 2, flUseLabel, OH_Direct }, /* $04 */ + { "ora", 2, flUseLabel, OH_Direct }, /* $05 */ + { "asl", 2, flUseLabel, OH_Direct }, /* $06 */ + { "rmb0", 2, flUseLabel, OH_Direct }, /* $07 */ + { "php", 1, flNone, OH_Implicit }, /* $08 */ + { "ora", 2, flNone, OH_Immediate }, /* $09 */ + { "asl", 1, flNone, OH_Accumulator }, /* $0a */ + { "tsy", 1, flNone, OH_Implicit }, /* $0b */ + { "tsb", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $0c */ + { "ora", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $0d */ + { "asl", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $0e */ + { "bbr0", 3, flUseLabel, OH_BitBranch }, /* $0f */ + { "bpl", 2, flLabel, OH_Relative }, /* $10 */ + { "ora", 2, flUseLabel, OH_DirectIndirectY }, /* $11 */ + { "ora", 2, flUseLabel, OH_DirectIndirectZ }, /* $12 */ + { "lbpl", 3, flLabel, OH_RelativeLong4510 }, /* $13 */ + { "trb", 2, flUseLabel, OH_Direct }, /* $14 */ + { "ora", 2, flUseLabel, OH_DirectX }, /* $15 */ + { "asl", 2, flUseLabel, OH_DirectX }, /* $16 */ + { "rmb1", 2, flUseLabel, OH_Direct }, /* $17 */ + { "clc", 1, flNone, OH_Implicit }, /* $18 */ + { "ora", 3, flUseLabel, OH_AbsoluteY }, /* $19 */ + { "inc", 1, flNone, OH_Accumulator }, /* $1a */ + { "inz", 1, flNone, OH_Implicit }, /* $1b */ + { "trb", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $1c */ + { "ora", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $1d */ + { "asl", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $1e */ + { "bbr1", 3, flUseLabel, OH_BitBranch }, /* $1f */ + { "jsr", 3, flLabel, OH_Absolute }, /* $20 */ + { "and", 2, flUseLabel, OH_DirectXIndirect }, /* $21 */ + { "jsr", 3, flLabel, OH_JmpAbsoluteIndirect }, /* $22 */ + { "jsr", 3, flLabel, OH_JmpAbsoluteXIndirect }, /* $23 */ + { "bit", 2, flUseLabel, OH_Direct }, /* $24 */ + { "and", 2, flUseLabel, OH_Direct }, /* $25 */ + { "rol", 2, flUseLabel, OH_Direct }, /* $26 */ + { "rmb2", 2, flUseLabel, OH_Direct }, /* $27 */ + { "plp", 1, flNone, OH_Implicit }, /* $28 */ + { "and", 2, flNone, OH_Immediate }, /* $29 */ + { "rol", 1, flNone, OH_Accumulator }, /* $2a */ + { "tys", 1, flNone, OH_Implicit }, /* $2b */ + { "bit", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $2c */ + { "and", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $2d */ + { "rol", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $2e */ + { "bbr2", 3, flUseLabel, OH_BitBranch }, /* $2f */ + { "bmi", 2, flLabel, OH_Relative }, /* $30 */ + { "and", 2, flUseLabel, OH_DirectIndirectY }, /* $31 */ + { "and", 2, flUseLabel, OH_DirectIndirectZ }, /* $32 */ + { "lbmi", 3, flLabel, OH_RelativeLong4510 }, /* $33 */ + { "bit", 2, flUseLabel, OH_DirectX }, /* $34 */ + { "and", 2, flUseLabel, OH_DirectX }, /* $35 */ + { "rol", 2, flUseLabel, OH_DirectX }, /* $36 */ + { "rmb3", 2, flUseLabel, OH_Direct }, /* $37 */ + { "sec", 1, flNone, OH_Implicit }, /* $38 */ + { "and", 3, flUseLabel, OH_AbsoluteY }, /* $39 */ + { "dec", 1, flNone, OH_Accumulator }, /* $3a */ + { "dez", 1, flNone, OH_Implicit }, /* $3b */ + { "bit", 3, flUseLabel, OH_AbsoluteX }, /* $3c */ + { "and", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $3d */ + { "rol", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $3e */ + { "bbr3", 3, flUseLabel, OH_BitBranch }, /* $3f */ + { "rti", 1, flNone, OH_Rts }, /* $40 */ + { "eor", 2, flUseLabel, OH_DirectXIndirect }, /* $41 */ + { "neg", 1, flNone, OH_Implicit }, /* $42 */ + { "asr", 1, flNone, OH_Accumulator }, /* $43 */ + { "asr", 2, flUseLabel, OH_Direct }, /* $44 */ + { "eor", 2, flUseLabel, OH_Direct }, /* $45 */ + { "lsr", 2, flUseLabel, OH_Direct }, /* $46 */ + { "rmb4", 2, flUseLabel, OH_Direct }, /* $47 */ + { "pha", 1, flNone, OH_Implicit }, /* $48 */ + { "eor", 2, flNone, OH_Immediate }, /* $49 */ + { "lsr", 1, flNone, OH_Accumulator }, /* $4a */ + { "taz", 1, flNone, OH_Implicit }, /* $4b */ + { "jmp", 3, flLabel, OH_JmpAbsolute }, /* $4c */ + { "eor", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $4d */ + { "lsr", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $4e */ + { "bbr4", 3, flUseLabel, OH_BitBranch }, /* $4f */ + { "bvc", 2, flLabel, OH_Relative }, /* $50 */ + { "eor", 2, flUseLabel, OH_DirectIndirectY }, /* $51 */ + { "eor", 2, flUseLabel, OH_DirectIndirectZ }, /* $52 */ + { "lbvc", 3, flLabel, OH_RelativeLong4510 }, /* $53 */ + { "asr", 2, flUseLabel, OH_DirectX }, /* $54 */ + { "eor", 2, flUseLabel, OH_DirectX }, /* $55 */ + { "lsr", 2, flUseLabel, OH_DirectX }, /* $56 */ + { "rmb5", 2, flUseLabel, OH_Direct }, /* $57 */ + { "cli", 1, flNone, OH_Implicit }, /* $58 */ + { "eor", 3, flUseLabel, OH_AbsoluteY }, /* $59 */ + { "phy", 1, flNone, OH_Implicit }, /* $5a */ + { "tab", 1, flNone, OH_Implicit }, /* $5b */ + { "map", 1, flNone, OH_Implicit }, /* $5c */ + { "eor", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $5d */ + { "lsr", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $5e */ + { "bbr5", 3, flUseLabel, OH_BitBranch }, /* $5f */ + { "rts", 1, flNone, OH_Rts }, /* $60 */ + { "adc", 2, flUseLabel, OH_DirectXIndirect }, /* $61 */ + { "rtn", 2, flNone, OH_Immediate }, /* $62 */ + { "bsr", 3, flLabel, OH_RelativeLong4510 }, /* $63 */ + { "stz", 2, flUseLabel, OH_Direct }, /* $64 */ + { "adc", 2, flUseLabel, OH_Direct }, /* $65 */ + { "ror", 2, flUseLabel, OH_Direct }, /* $66 */ + { "rmb6", 2, flUseLabel, OH_Direct, }, /* $67 */ + { "pla", 1, flNone, OH_Implicit }, /* $68 */ + { "adc", 2, flNone, OH_Immediate }, /* $69 */ + { "ror", 1, flNone, OH_Accumulator }, /* $6a */ + { "tza", 1, flNone, OH_Implicit }, /* $6b */ + { "jmp", 3, flLabel, OH_JmpAbsoluteIndirect }, /* $6c */ + { "adc", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $6d */ + { "ror", 3, flUseLabel, OH_Absolute }, /* $6e */ + { "bbr6", 3, flUseLabel, OH_BitBranch }, /* $6f */ + { "bvs", 2, flLabel, OH_Relative }, /* $70 */ + { "adc", 2, flUseLabel, OH_DirectIndirectY }, /* $71 */ + { "adc", 2, flUseLabel, OH_DirectIndirectZ }, /* $72 */ + { "lbvs", 3, flLabel, OH_RelativeLong4510 }, /* $73 */ + { "stz", 2, flUseLabel, OH_DirectX }, /* $74 */ + { "adc", 2, flUseLabel, OH_DirectX }, /* $75 */ + { "ror", 2, flUseLabel, OH_DirectX }, /* $76 */ + { "rmb7", 2, flUseLabel, OH_Direct }, /* $77 */ + { "sei", 1, flNone, OH_Implicit }, /* $78 */ + { "adc", 3, flUseLabel, OH_AbsoluteY }, /* $79 */ + { "ply", 1, flNone, OH_Implicit }, /* $7a */ + { "tba", 1, flNone, OH_Implicit }, /* $7b */ + { "jmp", 3, flLabel, OH_AbsoluteXIndirect }, /* $7c */ + { "adc", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $7d */ + { "ror", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $7e */ + { "bbr7", 3, flUseLabel, OH_BitBranch }, /* $7f */ + { "bra", 2, flLabel, OH_Relative }, /* $80 */ + { "sta", 2, flUseLabel, OH_DirectXIndirect }, /* $81 */ + { "sta", 2, flNone, OH_StackRelativeIndirectY4510}, /* $82 */ + { "lbra", 3, flLabel, OH_RelativeLong4510 }, /* $83 */ + { "sty", 2, flUseLabel, OH_Direct }, /* $84 */ + { "sta", 2, flUseLabel, OH_Direct }, /* $85 */ + { "stx", 2, flUseLabel, OH_Direct }, /* $86 */ + { "smb0", 2, flUseLabel, OH_Direct }, /* $87 */ + { "dey", 1, flNone, OH_Implicit }, /* $88 */ + { "bit", 2, flNone, OH_Immediate }, /* $89 */ + { "txa", 1, flNone, OH_Implicit }, /* $8a */ + { "sty", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $8b */ + { "sty", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $8c */ + { "sta", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $8d */ + { "stx", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $8e */ + { "bbs0", 3, flUseLabel, OH_BitBranch }, /* $8f */ + { "bcc", 2, flLabel, OH_Relative }, /* $90 */ + { "sta", 2, flUseLabel, OH_DirectIndirectY }, /* $91 */ + { "sta", 2, flUseLabel, OH_DirectIndirectZ }, /* $92 */ + { "lbcc", 3, flLabel, OH_RelativeLong4510 }, /* $93 */ + { "sty", 2, flUseLabel, OH_DirectX }, /* $94 */ + { "sta", 2, flUseLabel, OH_DirectX }, /* $95 */ + { "stx", 2, flUseLabel, OH_DirectY }, /* $96 */ + { "smb1", 2, flUseLabel, OH_Direct }, /* $97 */ + { "tya", 1, flNone, OH_Implicit }, /* $98 */ + { "sta", 3, flUseLabel, OH_AbsoluteY }, /* $99 */ + { "txs", 1, flNone, OH_Implicit }, /* $9a */ + { "stx", 3, flUseLabel|flAbsOverride, OH_AbsoluteY }, /* $9b */ + { "stz", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $9c */ + { "sta", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $9d */ + { "stz", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $9e */ + { "bbs1", 3, flUseLabel, OH_BitBranch }, /* $9f */ + { "ldy", 2, flNone, OH_Immediate }, /* $a0 */ + { "lda", 2, flUseLabel, OH_DirectXIndirect }, /* $a1 */ + { "ldx", 2, flNone, OH_Immediate }, /* $a2 */ + { "ldz", 2, flNone, OH_Immediate }, /* $a3 */ + { "ldy", 2, flUseLabel, OH_Direct }, /* $a4 */ + { "lda", 2, flUseLabel, OH_Direct }, /* $a5 */ + { "ldx", 2, flUseLabel, OH_Direct }, /* $a6 */ + { "smb2", 2, flUseLabel, OH_Direct }, /* $a7 */ + { "tay", 1, flNone, OH_Implicit }, /* $a8 */ + { "lda", 2, flNone, OH_Immediate }, /* $a9 */ + { "tax", 1, flNone, OH_Implicit }, /* $aa */ + { "ldz", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ab */ + { "ldy", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ac */ + { "lda", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ad */ + { "ldx", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ae */ + { "bbs2", 3, flUseLabel, OH_BitBranch }, /* $af */ + { "bcs", 2, flLabel, OH_Relative }, /* $b0 */ + { "lda", 2, flUseLabel, OH_DirectIndirectY }, /* $b1 */ + { "lda", 2, flUseLabel, OH_DirectIndirectZ }, /* $b2 */ + { "lbcs", 3, flLabel, OH_RelativeLong4510 }, /* $b3 */ + { "ldy", 2, flUseLabel, OH_DirectX }, /* $b4 */ + { "lda", 2, flUseLabel, OH_DirectX }, /* $b5 */ + { "ldx", 2, flUseLabel, OH_DirectY }, /* $b6 */ + { "smb3", 2, flUseLabel, OH_Direct }, /* $b7 */ + { "clv", 1, flNone, OH_Implicit }, /* $b8 */ + { "lda", 3, flUseLabel, OH_AbsoluteY }, /* $b9 */ + { "tsx", 1, flNone, OH_Implicit }, /* $ba */ + { "ldz", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $bb */ + { "ldy", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $bc */ + { "lda", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $bd */ + { "ldx", 3, flUseLabel|flAbsOverride, OH_AbsoluteY }, /* $be */ + { "bbs3", 3, flUseLabel, OH_BitBranch }, /* $bf */ + { "cpy", 2, flNone, OH_Immediate }, /* $c0 */ + { "cmp", 2, flUseLabel, OH_DirectXIndirect }, /* $c1 */ + { "cpz", 2, flNone, OH_Immediate }, /* $c2 */ + { "dew", 2, flUseLabel, OH_Direct }, /* $c3 */ + { "cpy", 2, flUseLabel, OH_Direct }, /* $c4 */ + { "cmp", 2, flUseLabel, OH_Direct }, /* $c5 */ + { "dec", 2, flUseLabel, OH_Direct }, /* $c6 */ + { "smb4", 2, flUseLabel, OH_Direct }, /* $c7 */ + { "iny", 1, flNone, OH_Implicit }, /* $c8 */ + { "cmp", 2, flNone, OH_Immediate }, /* $c9 */ + { "dex", 1, flNone, OH_Implicit }, /* $ca */ + { "asw", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $cb */ + { "cpy", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $cc */ + { "cmp", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $cd */ + { "dec", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ce */ + { "bbs4", 3, flUseLabel, OH_BitBranch }, /* $cf */ + { "bne", 2, flLabel, OH_Relative }, /* $d0 */ + { "cmp", 2, flUseLabel, OH_DirectIndirectY }, /* $d1 */ + { "cmp", 2, flUseLabel, OH_DirectIndirectZ }, /* $d2 */ + { "lbne", 3, flLabel, OH_RelativeLong4510 }, /* $d3 */ + { "cpz", 2, flUseLabel, OH_Direct }, /* $d4 */ + { "cmp", 2, flUseLabel, OH_DirectX }, /* $d5 */ + { "dec", 2, flUseLabel, OH_DirectX }, /* $d6 */ + { "smb5", 2, flUseLabel, OH_Direct }, /* $d7 */ + { "cld", 1, flNone, OH_Implicit }, /* $d8 */ + { "cmp", 3, flUseLabel, OH_AbsoluteY }, /* $d9 */ + { "phx", 1, flNone, OH_Implicit }, /* $da */ + { "phz", 1, flNone, OH_Implicit }, /* $db */ + { "cpz", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $dc */ + { "cmp", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $dd */ + { "dec", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $de */ + { "bbs5", 3, flUseLabel, OH_BitBranch }, /* $df */ + { "cpx", 2, flNone, OH_Immediate }, /* $e0 */ + { "sbc", 2, flUseLabel, OH_DirectXIndirect }, /* $e1 */ + { "lda", 2, flNone, OH_StackRelativeIndirectY4510}, /* $e2 */ + { "inw", 2, flUseLabel, OH_Direct }, /* $e3 */ + { "cpx", 2, flUseLabel, OH_Direct }, /* $e4 */ + { "sbc", 2, flUseLabel, OH_Direct }, /* $e5 */ + { "inc", 2, flUseLabel, OH_Direct }, /* $e6 */ + { "smb6", 2, flUseLabel, OH_Direct }, /* $e7 */ + { "inx", 1, flNone, OH_Implicit }, /* $e8 */ + { "sbc", 2, flNone, OH_Immediate }, /* $e9 */ + { "eom", 1, flNone, OH_Implicit }, /* $ea */ + { "row", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $eb */ + { "cpx", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ec */ + { "sbc", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ed */ + { "inc", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ee */ + { "bbs6", 3, flUseLabel, OH_BitBranch }, /* $ef */ + { "beq", 2, flLabel, OH_Relative }, /* $f0 */ + { "sbc", 2, flUseLabel, OH_DirectIndirectY }, /* $f1 */ + { "sbc", 2, flUseLabel, OH_DirectIndirectZ }, /* $f2 */ + { "lbeq", 3, flLabel, OH_RelativeLong4510 }, /* $f3 */ + { "phw", 3, flNone, OH_ImmediateWord }, /* $f4 */ + { "sbc", 2, flUseLabel, OH_DirectX }, /* $f5 */ + { "inc", 2, flUseLabel, OH_DirectX }, /* $f6 */ + { "smb7", 2, flUseLabel, OH_Direct }, /* $f7 */ + { "sed", 1, flNone, OH_Implicit }, /* $f8 */ + { "sbc", 3, flUseLabel, OH_AbsoluteY }, /* $f9 */ + { "plx", 1, flNone, OH_Implicit }, /* $fa */ + { "plz", 1, flNone, OH_Implicit }, /* $fb */ + { "phw", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $fc */ + { "sbc", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $fd */ + { "inc", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $fe */ + { "bbs7", 3, flUseLabel, OH_BitBranch }, /* $ff */ +}; diff --git a/src/da65/opc4510.h b/src/da65/opc4510.h new file mode 100644 index 000000000..a87254cd1 --- /dev/null +++ b/src/da65/opc4510.h @@ -0,0 +1,58 @@ +/*****************************************************************************/ +/* */ +/* opc4510.h */ +/* */ +/* 4510 opcode description table */ +/* */ +/* */ +/* */ +/* (C) 2003 Ullrich von Bassewitz */ +/* Roemerstrasse 52 */ +/* D-70794 Filderstadt */ +/* EMail: uz@cc65.org */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef OPC4510_H +#define OPC4510_H + + + +#include "opcdesc.h" + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +/* Descriptions for all opcodes */ +extern const OpcDesc OpcTable_4510[256]; + + + +/* End of opc4510.h */ + +#endif diff --git a/src/da65/opc6502.c b/src/da65/opc6502.c index 27f734d56..8fc6f6aea 100644 --- a/src/da65/opc6502.c +++ b/src/da65/opc6502.c @@ -79,7 +79,7 @@ const OpcDesc OpcTable_6502[256] = { { "ora", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $1d */ { "asl", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $1e */ { "", 1, flIllegal, OH_Illegal, }, /* $1f */ - { "jsr", 3, flLabel, OH_Absolute }, /* $20 */ + { "jsr", 3, flLabel, OH_JsrAbsolute }, /* $20 */ { "and", 2, flUseLabel, OH_DirectXIndirect }, /* $21 */ { "", 1, flIllegal, OH_Illegal, }, /* $22 */ { "", 1, flIllegal, OH_Illegal, }, /* $23 */ diff --git a/src/da65/opc6502.h b/src/da65/opc6502.h index c890e241b..f9d03c085 100644 --- a/src/da65/opc6502.h +++ b/src/da65/opc6502.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/da65/opc6502dtv.c b/src/da65/opc6502dtv.c new file mode 100644 index 000000000..fe83ad598 --- /dev/null +++ b/src/da65/opc6502dtv.c @@ -0,0 +1,308 @@ +/*****************************************************************************/ +/* */ +/* opc6502dtv.c */ +/* */ +/* 6502 opcode description table with NMOS illegals and DTV opcodes */ +/* */ +/* */ +/* */ +/* (C) 2003-2011, Ullrich von Bassewitz */ +/* Roemerstrasse 52 */ +/* D-70794 Filderstadt */ +/* EMail: uz@cc65.org */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +/* da65 */ +#include "handler.h" +#include "opc6502dtv.h" + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +/* Descriptions for all opcodes. Base table from opc6502x.c with DTV opcodes, +** where illegal opcodes are filtered based on their support on DTV. +*/ +const OpcDesc OpcTable_6502DTV[256] = { + { "brk", 1, flNone, OH_Implicit }, /* $00 */ + { "ora", 2, flUseLabel, OH_DirectXIndirect }, /* $01 */ + { "", 1, flIllegal, OH_Illegal, }, /* $02 */ + { "", 1, flIllegal, OH_Illegal, }, /* $03 */ + { "nop", 2, flUseLabel, OH_Direct }, /* $04 */ + { "ora", 2, flUseLabel, OH_Direct }, /* $05 */ + { "asl", 2, flUseLabel, OH_Direct }, /* $06 */ + { "", 1, flIllegal, OH_Illegal, }, /* $07 */ + { "php", 1, flNone, OH_Implicit }, /* $08 */ + { "ora", 2, flNone, OH_Immediate }, /* $09 */ + { "asl", 1, flNone, OH_Accumulator }, /* $0a */ + { "anc", 2, flNone, OH_Immediate }, /* $0b */ + { "nop", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $0c */ + { "ora", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $0d */ + { "asl", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $0e */ + { "", 1, flIllegal, OH_Illegal, }, /* $0f */ + { "bpl", 2, flLabel, OH_Relative }, /* $10 */ + { "ora", 2, flUseLabel, OH_DirectIndirectY }, /* $11 */ + { "bra", 2, flLabel, OH_Relative }, /* $12 */ + { "", 1, flIllegal, OH_Illegal, }, /* $13 */ + { "nop", 2, flUseLabel, OH_DirectX }, /* $14 */ + { "ora", 2, flUseLabel, OH_DirectX }, /* $15 */ + { "asl", 2, flUseLabel, OH_DirectX }, /* $16 */ + { "", 1, flIllegal, OH_Illegal, }, /* $17 */ + { "clc", 1, flNone, OH_Implicit }, /* $18 */ + { "ora", 3, flUseLabel, OH_AbsoluteY }, /* $19 */ + { "nop", 1, flNone, OH_Implicit }, /* $1a */ + { "", 1, flIllegal, OH_Illegal, }, /* $1b */ + { "nop", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $1c */ + { "ora", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $1d */ + { "asl", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $1e */ + { "", 1, flIllegal, OH_Illegal, }, /* $1f */ + { "jsr", 3, flLabel, OH_Absolute }, /* $20 */ + { "and", 2, flUseLabel, OH_DirectXIndirect }, /* $21 */ + { "", 1, flIllegal, OH_Illegal, }, /* $22 */ + { "rla", 2, flUseLabel, OH_DirectXIndirect }, /* $23 */ + { "bit", 2, flUseLabel, OH_Direct }, /* $24 */ + { "and", 2, flUseLabel, OH_Direct }, /* $25 */ + { "rol", 2, flUseLabel, OH_Direct }, /* $26 */ + { "rla", 2, flUseLabel, OH_Direct }, /* $27 */ + { "plp", 1, flNone, OH_Implicit }, /* $28 */ + { "and", 2, flNone, OH_Immediate }, /* $29 */ + { "rol", 1, flNone, OH_Accumulator }, /* $2a */ + { "anc", 2, flNone, OH_Immediate }, /* $2b */ + { "bit", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $2c */ + { "and", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $2d */ + { "rol", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $2e */ + { "rla", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $2f */ + { "bmi", 2, flLabel, OH_Relative }, /* $30 */ + { "and", 2, flUseLabel, OH_DirectIndirectY }, /* $31 */ + { "sac", 2, flNone, OH_Immediate }, /* $32 */ + { "rla", 2, flUseLabel, OH_DirectIndirectY }, /* $33 */ + { "nop", 2, flUseLabel, OH_DirectX }, /* $34 */ + { "and", 2, flUseLabel, OH_DirectX }, /* $35 */ + { "rol", 2, flUseLabel, OH_DirectX }, /* $36 */ + { "rla", 2, flUseLabel, OH_DirectX }, /* $37 */ + { "sec", 1, flNone, OH_Implicit }, /* $38 */ + { "and", 3, flUseLabel, OH_AbsoluteY }, /* $39 */ + { "nop", 1, flNone, OH_Implicit }, /* $3a */ + { "rla", 3, flUseLabel, OH_AbsoluteY }, /* $3b */ + { "nop", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $3c */ + { "and", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $3d */ + { "rol", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $3e */ + { "rla", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $3f */ + { "rti", 1, flNone, OH_Rts }, /* $40 */ + { "eor", 2, flUseLabel, OH_DirectXIndirect }, /* $41 */ + { "sir", 2, flNone, OH_Immediate }, /* $42 */ + { "", 1, flIllegal, OH_Illegal, }, /* $43 */ + { "nop", 2, flUseLabel, OH_Direct }, /* $44 */ + { "eor", 2, flUseLabel, OH_Direct }, /* $45 */ + { "lsr", 2, flUseLabel, OH_Direct }, /* $46 */ + { "", 1, flIllegal, OH_Illegal, }, /* $47 */ + { "pha", 1, flNone, OH_Implicit }, /* $48 */ + { "eor", 2, flNone, OH_Immediate }, /* $49 */ + { "lsr", 1, flNone, OH_Accumulator }, /* $4a */ + { "alr", 2, flNone, OH_Immediate }, /* $4b */ + { "jmp", 3, flLabel, OH_JmpAbsolute }, /* $4c */ + { "eor", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $4d */ + { "lsr", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $4e */ + { "", 1, flIllegal, OH_Illegal, }, /* $4f */ + { "bvc", 2, flLabel, OH_Relative }, /* $50 */ + { "eor", 2, flUseLabel, OH_DirectIndirectY }, /* $51 */ + { "", 1, flIllegal, OH_Illegal, }, /* $52 */ + { "", 1, flIllegal, OH_Illegal, }, /* $53 */ + { "nop", 2, flUseLabel, OH_DirectX }, /* $54 */ + { "eor", 2, flUseLabel, OH_DirectX }, /* $55 */ + { "lsr", 2, flUseLabel, OH_DirectX }, /* $56 */ + { "", 1, flIllegal, OH_Illegal, }, /* $57 */ + { "cli", 1, flNone, OH_Implicit }, /* $58 */ + { "eor", 3, flUseLabel, OH_AbsoluteY }, /* $59 */ + { "nop", 1, flNone, OH_Implicit }, /* $5a */ + { "", 1, flIllegal, OH_Illegal, }, /* $5b */ + { "nop", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $5c */ + { "eor", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $5d */ + { "lsr", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $5e */ + { "", 1, flIllegal, OH_Illegal, }, /* $5f */ + { "rts", 1, flNone, OH_Rts }, /* $60 */ + { "adc", 2, flUseLabel, OH_DirectXIndirect }, /* $61 */ + { "", 1, flIllegal, OH_Illegal, }, /* $62 */ + { "rra", 2, flUseLabel, OH_DirectXIndirect }, /* $63 */ + { "nop", 2, flUseLabel, OH_Direct }, /* $64 */ + { "adc", 2, flUseLabel, OH_Direct }, /* $65 */ + { "ror", 2, flUseLabel, OH_Direct }, /* $66 */ + { "rra", 2, flUseLabel, OH_Direct }, /* $67 */ + { "pla", 1, flNone, OH_Implicit }, /* $68 */ + { "adc", 2, flNone, OH_Immediate }, /* $69 */ + { "ror", 1, flNone, OH_Accumulator }, /* $6a */ + { "arr", 2, flNone, OH_Immediate }, /* $6b */ + { "jmp", 3, flLabel, OH_JmpAbsoluteIndirect }, /* $6c */ + { "adc", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $6d */ + { "ror", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $6e */ + { "rra", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $6f */ + { "bvs", 2, flLabel, OH_Relative }, /* $70 */ + { "adc", 2, flUseLabel, OH_DirectIndirectY }, /* $71 */ + { "", 1, flIllegal, OH_Illegal, }, /* $72 */ + { "rra", 2, flUseLabel, OH_DirectIndirectY }, /* $73 */ + { "nop", 2, flUseLabel, OH_DirectX }, /* $74 */ + { "adc", 2, flUseLabel, OH_DirectX }, /* $75 */ + { "ror", 2, flUseLabel, OH_DirectX }, /* $76 */ + { "rra", 2, flUseLabel, OH_DirectX }, /* $77 */ + { "sei", 1, flNone, OH_Implicit }, /* $78 */ + { "adc", 3, flUseLabel, OH_AbsoluteY }, /* $79 */ + { "nop", 1, flNone, OH_Implicit }, /* $7a */ + { "rra", 3, flUseLabel, OH_AbsoluteY }, /* $7b */ + { "nop", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $7c */ + { "adc", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $7d */ + { "ror", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $7e */ + { "rra", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $7f */ + { "nop", 2, flNone, OH_Immediate }, /* $80 */ + { "sta", 2, flUseLabel, OH_DirectXIndirect }, /* $81 */ + { "nop", 2, flNone, OH_Immediate }, /* $82 */ + { "", 1, flIllegal, OH_Illegal, }, /* $83 */ + { "sty", 2, flUseLabel, OH_Direct }, /* $84 */ + { "sta", 2, flUseLabel, OH_Direct }, /* $85 */ + { "stx", 2, flUseLabel, OH_Direct }, /* $86 */ + { "", 1, flIllegal, OH_Illegal, }, /* $87 */ + { "dey", 1, flNone, OH_Implicit }, /* $88 */ + { "nop", 2, flNone, OH_Immediate }, /* $89 */ + { "txa", 1, flNone, OH_Implicit }, /* $8a */ + { "", 1, flIllegal, OH_Illegal, }, /* $8b */ + { "sty", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $8c */ + { "sta", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $8d */ + { "stx", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $8e */ + { "", 1, flIllegal, OH_Illegal, }, /* $8f */ + { "bcc", 2, flLabel, OH_Relative }, /* $90 */ + { "sta", 2, flUseLabel, OH_DirectIndirectY }, /* $91 */ + { "", 1, flIllegal, OH_Illegal, }, /* $92 */ + { "", 1, flIllegal, OH_Illegal, }, /* $93 */ + { "sty", 2, flUseLabel, OH_DirectX }, /* $94 */ + { "sta", 2, flUseLabel, OH_DirectX }, /* $95 */ + { "stx", 2, flUseLabel, OH_DirectY }, /* $96 */ + { "", 1, flIllegal, OH_Illegal, }, /* $97 */ + { "tya", 1, flNone, OH_Implicit }, /* $98 */ + { "sta", 3, flUseLabel, OH_AbsoluteY }, /* $99 */ + { "txs", 1, flNone, OH_Implicit }, /* $9a */ + { "", 1, flIllegal, OH_Illegal, }, /* $9b */ + { "shy", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $9c */ + { "sta", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $9d */ + { "shx", 3, flUseLabel, OH_AbsoluteY }, /* $9e */ + { "", 1, flIllegal, OH_Illegal, }, /* $9f */ + { "ldy", 2, flNone, OH_Immediate }, /* $a0 */ + { "lda", 2, flUseLabel, OH_DirectXIndirect }, /* $a1 */ + { "ldx", 2, flNone, OH_Immediate }, /* $a2 */ + { "lax", 2, flUseLabel, OH_DirectXIndirect }, /* $a3 */ + { "ldy", 2, flUseLabel, OH_Direct }, /* $a4 */ + { "lda", 2, flUseLabel, OH_Direct }, /* $a5 */ + { "ldx", 2, flUseLabel, OH_Direct }, /* $a6 */ + { "lax", 2, flUseLabel, OH_Direct }, /* $a7 */ + { "tay", 1, flNone, OH_Implicit }, /* $a8 */ + { "lda", 2, flNone, OH_Immediate }, /* $a9 */ + { "tax", 1, flNone, OH_Implicit }, /* $aa */ + { "lax", 2, flNone, OH_Immediate }, /* $ab */ + { "ldy", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ac */ + { "lda", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ad */ + { "ldx", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ae */ + { "lax", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $af */ + { "bcs", 2, flLabel, OH_Relative }, /* $b0 */ + { "lda", 2, flUseLabel, OH_DirectIndirectY }, /* $b1 */ + { "", 1, flIllegal, OH_Illegal, }, /* $b2 */ + { "lax", 2, flUseLabel, OH_DirectIndirectY }, /* $b3 */ + { "ldy", 2, flUseLabel, OH_DirectX }, /* $b4 */ + { "lda", 2, flUseLabel, OH_DirectX }, /* $b5 */ + { "ldx", 2, flUseLabel, OH_DirectY }, /* $b6 */ + { "lax", 2, flUseLabel, OH_DirectY }, /* $b7 */ + { "clv", 1, flNone, OH_Implicit }, /* $b8 */ + { "lda", 3, flUseLabel, OH_AbsoluteY }, /* $b9 */ + { "tsx", 1, flNone, OH_Implicit }, /* $ba */ + { "las", 3, flUseLabel, OH_AbsoluteY }, /* $bb */ + { "ldy", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $bc */ + { "lda", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $bd */ + { "ldx", 3, flUseLabel|flAbsOverride, OH_AbsoluteY }, /* $be */ + { "lax", 3, flUseLabel|flAbsOverride, OH_AbsoluteY }, /* $bf */ + { "cpy", 2, flNone, OH_Immediate }, /* $c0 */ + { "cmp", 2, flUseLabel, OH_DirectXIndirect }, /* $c1 */ + { "nop", 2, flNone, OH_Immediate }, /* $c2 */ + { "", 1, flIllegal, OH_Illegal, }, /* $c3 */ + { "cpy", 2, flUseLabel, OH_Direct }, /* $c4 */ + { "cmp", 2, flUseLabel, OH_Direct }, /* $c5 */ + { "dec", 2, flUseLabel, OH_Direct }, /* $c6 */ + { "", 1, flIllegal, OH_Illegal, }, /* $c7 */ + { "iny", 1, flNone, OH_Implicit }, /* $c8 */ + { "cmp", 2, flNone, OH_Immediate }, /* $c9 */ + { "dex", 1, flNone, OH_Implicit }, /* $ca */ + { "axs", 2, flNone, OH_Immediate }, /* $cb */ + { "cpy", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $cc */ + { "cmp", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $cd */ + { "dec", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ce */ + { "", 1, flIllegal, OH_Illegal, }, /* $cf */ + { "bne", 2, flLabel, OH_Relative }, /* $d0 */ + { "cmp", 2, flUseLabel, OH_DirectIndirectY }, /* $d1 */ + { "", 1, flIllegal, OH_Illegal, }, /* $d2 */ + { "", 1, flIllegal, OH_Illegal, }, /* $d3 */ + { "nop", 2, flUseLabel, OH_DirectX }, /* $d4 */ + { "cmp", 2, flUseLabel, OH_DirectX }, /* $d5 */ + { "dec", 2, flUseLabel, OH_DirectX }, /* $d6 */ + { "", 1, flIllegal, OH_Illegal, }, /* $d7 */ + { "cld", 1, flNone, OH_Implicit }, /* $d8 */ + { "cmp", 3, flUseLabel, OH_AbsoluteY }, /* $d9 */ + { "nop", 1, flNone, OH_Implicit }, /* $da */ + { "", 1, flIllegal, OH_Illegal, }, /* $db */ + { "nop", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $dc */ + { "cmp", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $dd */ + { "dec", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $de */ + { "", 1, flIllegal, OH_Illegal, }, /* $df */ + { "cpx", 2, flNone, OH_Immediate }, /* $e0 */ + { "sbc", 2, flUseLabel, OH_DirectXIndirect }, /* $e1 */ + { "nop", 2, flNone, OH_Immediate }, /* $e2 */ + { "", 1, flIllegal, OH_Illegal, }, /* $e3 */ + { "cpx", 2, flUseLabel, OH_Direct }, /* $e4 */ + { "sbc", 2, flUseLabel, OH_Direct }, /* $e5 */ + { "inc", 2, flUseLabel, OH_Direct }, /* $e6 */ + { "", 1, flIllegal, OH_Illegal, }, /* $e7 */ + { "inx", 1, flNone, OH_Implicit }, /* $e8 */ + { "sbc", 2, flNone, OH_Immediate }, /* $e9 */ + { "nop", 1, flNone, OH_Implicit }, /* $ea */ + { "sbc", 2, flNone, OH_Immediate }, /* $eb */ + { "cpx", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ec */ + { "sbc", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ed */ + { "inc", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ee */ + { "", 1, flIllegal, OH_Illegal, }, /* $ef */ + { "beq", 2, flLabel, OH_Relative }, /* $f0 */ + { "sbc", 2, flUseLabel, OH_DirectIndirectY }, /* $f1 */ + { "", 1, flIllegal, OH_Illegal, }, /* $f2 */ + { "", 1, flIllegal, OH_Illegal, }, /* $f3 */ + { "nop", 2, flUseLabel, OH_DirectX }, /* $f4 */ + { "sbc", 2, flUseLabel, OH_DirectX }, /* $f5 */ + { "inc", 2, flUseLabel, OH_DirectX }, /* $f6 */ + { "", 1, flIllegal, OH_Illegal, }, /* $f7 */ + { "sed", 1, flNone, OH_Implicit }, /* $f8 */ + { "sbc", 3, flUseLabel, OH_AbsoluteY }, /* $f9 */ + { "nop", 1, flNone, OH_Implicit }, /* $fa */ + { "", 1, flIllegal, OH_Illegal, }, /* $fb */ + { "nop", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $fc */ + { "sbc", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $fd */ + { "inc", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $fe */ + { "", 1, flIllegal, OH_Illegal, }, /* $ff */ +}; diff --git a/src/da65/opc6502dtv.h b/src/da65/opc6502dtv.h new file mode 100644 index 000000000..33b485029 --- /dev/null +++ b/src/da65/opc6502dtv.h @@ -0,0 +1,61 @@ +/*****************************************************************************/ +/* */ +/* opc6502dtv.h */ +/* */ +/* 6502 opcode description table with NMOS illegals and DTV opcodes */ +/* */ +/* */ +/* */ +/* (C) 2003-2011, Ullrich von Bassewitz */ +/* Roemerstrasse 52 */ +/* D-70794 Filderstadt */ +/* EMail: uz@cc65.org */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef OPC6502DTV_H +#define OPC6502DTV_H + + + +#include "opcdesc.h" + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +/* Descriptions for all opcodes */ +extern const OpcDesc OpcTable_6502DTV[256]; + + + +/* End of opc6502dtv.h */ +#endif + + + + diff --git a/src/da65/opc6502x.h b/src/da65/opc6502x.h index e086f87ae..23cd9068c 100644 --- a/src/da65/opc6502x.h +++ b/src/da65/opc6502x.h @@ -58,4 +58,4 @@ extern const OpcDesc OpcTable_6502X[256]; - + diff --git a/src/da65/opc65816.c b/src/da65/opc65816.c index 2cd2aaee8..b7775d2e2 100644 --- a/src/da65/opc65816.c +++ b/src/da65/opc65816.c @@ -79,7 +79,7 @@ const OpcDesc OpcTable_65816[256] = { { "ora", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $1d */ { "asl", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $1e */ { "ora", 4, flUseLabel, OH_AbsoluteLongX }, /* $1f */ - { "jsr", 3, flLabel, OH_Absolute }, /* $20 */ + { "jsr", 3, flLabel, OH_JsrAbsolute }, /* $20 */ { "and", 2, flUseLabel, OH_DirectXIndirect }, /* $21 */ { "jsl", 3, flLabel, OH_AbsoluteLong }, /* $22 */ { "and", 2, flNone, OH_StackRelative }, /* $23 */ diff --git a/src/da65/opc65816.h b/src/da65/opc65816.h index 12ffc4a37..341fbf085 100644 --- a/src/da65/opc65816.h +++ b/src/da65/opc65816.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/da65/opc65c02.c b/src/da65/opc65c02.c index 00520e729..b69558f2a 100644 --- a/src/da65/opc65c02.c +++ b/src/da65/opc65c02.c @@ -79,7 +79,7 @@ const OpcDesc OpcTable_65C02[256] = { { "ora", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $1d */ { "asl", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $1e */ { "bbr1", 3, flUseLabel, OH_BitBranch }, /* $1f */ - { "jsr", 3, flLabel, OH_Absolute }, /* $20 */ + { "jsr", 3, flLabel, OH_JsrAbsolute }, /* $20 */ { "and", 2, flUseLabel, OH_DirectXIndirect }, /* $21 */ { "", 1, flIllegal, OH_Illegal, }, /* $22 */ { "", 1, flIllegal, OH_Illegal, }, /* $23 */ @@ -157,7 +157,7 @@ const OpcDesc OpcTable_65C02[256] = { { "", 1, flIllegal, OH_Illegal, }, /* $6b */ { "jmp", 3, flLabel, OH_JmpAbsoluteIndirect }, /* $6c */ { "adc", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $6d */ - { "ror", 3, flUseLabel, OH_Absolute }, /* $6e */ + { "ror", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $6e */ { "bbr6", 3, flUseLabel, OH_BitBranch }, /* $6f */ { "bvs", 2, flLabel, OH_Relative }, /* $70 */ { "adc", 2, flUseLabel, OH_DirectIndirectY }, /* $71 */ @@ -250,7 +250,7 @@ const OpcDesc OpcTable_65C02[256] = { { "iny", 1, flNone, OH_Implicit }, /* $c8 */ { "cmp", 2, flNone, OH_Immediate }, /* $c9 */ { "dex", 1, flNone, OH_Implicit }, /* $ca */ - { "", 1, flIllegal, OH_Illegal, }, /* $cb */ + { "wai", 1, flNone, OH_Implicit }, /* $cb */ { "cpy", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $cc */ { "cmp", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $cd */ { "dec", 3, flUseLabel|flAbsOverride, OH_Absolute }, /* $ce */ @@ -266,7 +266,7 @@ const OpcDesc OpcTable_65C02[256] = { { "cld", 1, flNone, OH_Implicit }, /* $d8 */ { "cmp", 3, flUseLabel, OH_AbsoluteY }, /* $d9 */ { "phx", 1, flNone, OH_Implicit }, /* $da */ - { "", 1, flIllegal, OH_Illegal, }, /* $db */ + { "stp", 1, flNone, OH_Implicit }, /* $db */ { "", 1, flIllegal, OH_Illegal, }, /* $dc */ { "cmp", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $dd */ { "dec", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $de */ diff --git a/src/da65/opc65c02.h b/src/da65/opc65c02.h index 38138aa51..aa2fa9756 100644 --- a/src/da65/opc65c02.h +++ b/src/da65/opc65c02.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/da65/opc65sc02.c b/src/da65/opc65sc02.c index 90549d00f..82e10bd96 100644 --- a/src/da65/opc65sc02.c +++ b/src/da65/opc65sc02.c @@ -79,7 +79,7 @@ const OpcDesc OpcTable_65SC02[256] = { { "ora", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $1d */ { "asl", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $1e */ { "", 1, flIllegal, OH_Illegal, }, /* $1f */ - { "jsr", 3, flLabel, OH_Absolute }, /* $20 */ + { "jsr", 3, flLabel, OH_JsrAbsolute }, /* $20 */ { "and", 2, flUseLabel, OH_DirectXIndirect }, /* $21 */ { "", 1, flIllegal, OH_Illegal, }, /* $22 */ { "", 1, flIllegal, OH_Illegal, }, /* $23 */ diff --git a/src/da65/opc65sc02.h b/src/da65/opc65sc02.h index 391f425ea..c00a8e91f 100644 --- a/src/da65/opc65sc02.h +++ b/src/da65/opc65sc02.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/da65/opcdesc.h b/src/da65/opcdesc.h index 7913131cd..399a0962d 100644 --- a/src/da65/opcdesc.h +++ b/src/da65/opcdesc.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2000-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/da65/opchuc6280.c b/src/da65/opchuc6280.c index df6ba587b..6c5b0b1ad 100644 --- a/src/da65/opchuc6280.c +++ b/src/da65/opchuc6280.c @@ -54,7 +54,7 @@ const OpcDesc OpcTable_HuC6280[256] = { { "tsb", 2, flUseLabel, OH_Direct }, /* $04 */ { "ora", 2, flUseLabel, OH_Direct }, /* $05 */ { "asl", 2, flUseLabel, OH_Direct }, /* $06 */ - { "rmb0", 1, flUseLabel, OH_Direct, }, /* $07 */ + { "rmb0", 2, flUseLabel, OH_Direct, }, /* $07 */ { "php", 1, flNone, OH_Implicit }, /* $08 */ { "ora", 2, flNone, OH_Immediate }, /* $09 */ { "asl", 1, flNone, OH_Accumulator }, /* $0a */ @@ -70,7 +70,7 @@ const OpcDesc OpcTable_HuC6280[256] = { { "trb", 2, flUseLabel, OH_Direct }, /* $14 */ { "ora", 2, flUseLabel, OH_DirectX }, /* $15 */ { "asl", 2, flUseLabel, OH_DirectX }, /* $16 */ - { "rmb1", 1, flUseLabel, OH_Direct, }, /* $17 */ + { "rmb1", 2, flUseLabel, OH_Direct, }, /* $17 */ { "clc", 1, flNone, OH_Implicit }, /* $18 */ { "ora", 3, flUseLabel, OH_AbsoluteY }, /* $19 */ { "inc", 1, flNone, OH_Accumulator }, /* $1a */ @@ -86,7 +86,7 @@ const OpcDesc OpcTable_HuC6280[256] = { { "bit", 2, flUseLabel, OH_Direct }, /* $24 */ { "and", 2, flUseLabel, OH_Direct }, /* $25 */ { "rol", 2, flUseLabel, OH_Direct }, /* $26 */ - { "rmb2", 1, flUseLabel, OH_Direct, }, /* $27 */ + { "rmb2", 2, flUseLabel, OH_Direct, }, /* $27 */ { "plp", 1, flNone, OH_Implicit }, /* $28 */ { "and", 2, flNone, OH_Immediate }, /* $29 */ { "rol", 1, flNone, OH_Accumulator }, /* $2a */ @@ -102,7 +102,7 @@ const OpcDesc OpcTable_HuC6280[256] = { { "bit", 2, flUseLabel, OH_DirectX }, /* $34 */ { "and", 2, flUseLabel, OH_DirectX }, /* $35 */ { "rol", 2, flUseLabel, OH_DirectX }, /* $36 */ - { "rmb3", 1, flUseLabel, OH_Direct, }, /* $37 */ + { "rmb3", 2, flUseLabel, OH_Direct, }, /* $37 */ { "sec", 1, flNone, OH_Implicit }, /* $38 */ { "and", 3, flUseLabel, OH_AbsoluteY }, /* $39 */ { "dec", 1, flNone, OH_Accumulator }, /* $3a */ @@ -114,11 +114,11 @@ const OpcDesc OpcTable_HuC6280[256] = { { "rti", 1, flNone, OH_Rts }, /* $40 */ { "eor", 2, flUseLabel, OH_DirectXIndirect }, /* $41 */ { "say", 1, flNone, OH_Implicit, }, /* $42 */ - { "tmai", 2, flNone, OH_Immediate, }, /* $43 */ + { "tma", 2, flNone, OH_Immediate, }, /* $43 */ { "bsr", 2, flLabel, OH_Relative, }, /* $44 */ { "eor", 2, flUseLabel, OH_Direct }, /* $45 */ { "lsr", 2, flUseLabel, OH_Direct }, /* $46 */ - { "rmb4", 1, flUseLabel, OH_Direct, }, /* $47 */ + { "rmb4", 2, flUseLabel, OH_Direct, }, /* $47 */ { "pha", 1, flNone, OH_Implicit }, /* $48 */ { "eor", 2, flNone, OH_Immediate }, /* $49 */ { "lsr", 1, flNone, OH_Accumulator }, /* $4a */ @@ -130,11 +130,11 @@ const OpcDesc OpcTable_HuC6280[256] = { { "bvc", 2, flLabel, OH_Relative }, /* $50 */ { "eor", 2, flUseLabel, OH_DirectIndirectY }, /* $51 */ { "eor", 2, flUseLabel, OH_DirectIndirect }, /* $52 */ - { "tami", 2, flNone, OH_Immediate, }, /* $53 */ + { "tam", 2, flNone, OH_Immediate, }, /* $53 */ { "csl", 1, flNone, OH_Implicit, }, /* $54 */ { "eor", 2, flUseLabel, OH_DirectX }, /* $55 */ { "lsr", 2, flUseLabel, OH_DirectX }, /* $56 */ - { "rmb5", 1, flUseLabel, OH_Direct, }, /* $57 */ + { "rmb5", 2, flUseLabel, OH_Direct, }, /* $57 */ { "cli", 1, flNone, OH_Implicit }, /* $58 */ { "eor", 3, flUseLabel, OH_AbsoluteY }, /* $59 */ { "phy", 1, flNone, OH_Implicit }, /* $5a */ @@ -150,7 +150,7 @@ const OpcDesc OpcTable_HuC6280[256] = { { "stz", 2, flUseLabel, OH_Direct }, /* $64 */ { "adc", 2, flUseLabel, OH_Direct }, /* $65 */ { "ror", 2, flUseLabel, OH_Direct }, /* $66 */ - { "rmb6", 1, flUseLabel, OH_Direct, }, /* $67 */ + { "rmb6", 2, flUseLabel, OH_Direct, }, /* $67 */ { "pla", 1, flNone, OH_Implicit }, /* $68 */ { "adc", 2, flNone, OH_Immediate }, /* $69 */ { "ror", 1, flNone, OH_Accumulator }, /* $6a */ @@ -166,12 +166,12 @@ const OpcDesc OpcTable_HuC6280[256] = { { "stz", 2, flUseLabel, OH_DirectX }, /* $74 */ { "adc", 2, flUseLabel, OH_DirectX }, /* $75 */ { "ror", 2, flUseLabel, OH_DirectX }, /* $76 */ - { "rmb7", 1, flUseLabel, OH_Direct, }, /* $77 */ + { "rmb7", 2, flUseLabel, OH_Direct, }, /* $77 */ { "sei", 1, flNone, OH_Implicit }, /* $78 */ { "adc", 3, flUseLabel, OH_AbsoluteY }, /* $79 */ { "ply", 1, flNone, OH_Implicit }, /* $7a */ { "", 1, flIllegal, OH_Illegal, }, /* $7b */ - { "jmp", 3, flLabel, OH_AbsoluteXIndirect }, /* $7c */ + { "jmp", 3, flLabel, OH_JmpAbsoluteXIndirect }, /* $7c */ { "adc", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $7d */ { "ror", 3, flUseLabel|flAbsOverride, OH_AbsoluteX }, /* $7e */ { "bbr7", 3, flUseLabel, OH_BitBranch }, /* $7f */ @@ -182,7 +182,7 @@ const OpcDesc OpcTable_HuC6280[256] = { { "sty", 2, flUseLabel, OH_Direct }, /* $84 */ { "sta", 2, flUseLabel, OH_Direct }, /* $85 */ { "stx", 2, flUseLabel, OH_Direct }, /* $86 */ - { "smb0", 1, flUseLabel, OH_Direct, }, /* $87 */ + { "smb0", 2, flUseLabel, OH_Direct, }, /* $87 */ { "dey", 1, flNone, OH_Implicit }, /* $88 */ { "bit", 2, flNone, OH_Immediate }, /* $89 */ { "txa", 1, flNone, OH_Implicit }, /* $8a */ @@ -198,7 +198,7 @@ const OpcDesc OpcTable_HuC6280[256] = { { "sty", 2, flUseLabel, OH_DirectX }, /* $94 */ { "sta", 2, flUseLabel, OH_DirectX }, /* $95 */ { "stx", 2, flUseLabel, OH_DirectY }, /* $96 */ - { "smb1", 1, flUseLabel, OH_Direct, }, /* $97 */ + { "smb1", 2, flUseLabel, OH_Direct, }, /* $97 */ { "tya", 1, flNone, OH_Implicit }, /* $98 */ { "sta", 3, flUseLabel, OH_AbsoluteY }, /* $99 */ { "txs", 1, flNone, OH_Implicit }, /* $9a */ @@ -214,7 +214,7 @@ const OpcDesc OpcTable_HuC6280[256] = { { "ldy", 2, flUseLabel, OH_Direct }, /* $a4 */ { "lda", 2, flUseLabel, OH_Direct }, /* $a5 */ { "ldx", 2, flUseLabel, OH_Direct }, /* $a6 */ - { "smb2", 1, flUseLabel, OH_Direct, }, /* $a7 */ + { "smb2", 2, flUseLabel, OH_Direct, }, /* $a7 */ { "tay", 1, flNone, OH_Implicit }, /* $a8 */ { "lda", 2, flNone, OH_Immediate }, /* $a9 */ { "tax", 1, flNone, OH_Implicit }, /* $aa */ @@ -230,7 +230,7 @@ const OpcDesc OpcTable_HuC6280[256] = { { "ldy", 2, flUseLabel, OH_DirectX }, /* $b4 */ { "lda", 2, flUseLabel, OH_DirectX }, /* $b5 */ { "ldx", 2, flUseLabel, OH_DirectY }, /* $b6 */ - { "smb3", 1, flUseLabel, OH_Direct, }, /* $b7 */ + { "smb3", 2, flUseLabel, OH_Direct, }, /* $b7 */ { "clv", 1, flNone, OH_Implicit }, /* $b8 */ { "lda", 3, flUseLabel, OH_AbsoluteY }, /* $b9 */ { "tsx", 1, flNone, OH_Implicit }, /* $ba */ @@ -246,7 +246,7 @@ const OpcDesc OpcTable_HuC6280[256] = { { "cpy", 2, flUseLabel, OH_Direct }, /* $c4 */ { "cmp", 2, flUseLabel, OH_Direct }, /* $c5 */ { "dec", 2, flUseLabel, OH_Direct }, /* $c6 */ - { "smb4", 1, flUseLabel, OH_Direct, }, /* $c7 */ + { "smb4", 2, flUseLabel, OH_Direct, }, /* $c7 */ { "iny", 1, flNone, OH_Implicit }, /* $c8 */ { "cmp", 2, flNone, OH_Immediate }, /* $c9 */ { "dex", 1, flNone, OH_Implicit }, /* $ca */ @@ -262,7 +262,7 @@ const OpcDesc OpcTable_HuC6280[256] = { { "csh", 1, flNone, OH_Implicit, }, /* $d4 */ { "cmp", 2, flUseLabel, OH_DirectX }, /* $d5 */ { "dec", 2, flUseLabel, OH_DirectX }, /* $d6 */ - { "smb5", 1, flUseLabel, OH_Direct, }, /* $d7 */ + { "smb5", 2, flUseLabel, OH_Direct, }, /* $d7 */ { "cld", 1, flNone, OH_Implicit }, /* $d8 */ { "cmp", 3, flUseLabel, OH_AbsoluteY }, /* $d9 */ { "phx", 1, flNone, OH_Implicit }, /* $da */ @@ -278,7 +278,7 @@ const OpcDesc OpcTable_HuC6280[256] = { { "cpx", 2, flUseLabel, OH_Direct }, /* $e4 */ { "sbc", 2, flUseLabel, OH_Direct }, /* $e5 */ { "inc", 2, flUseLabel, OH_Direct }, /* $e6 */ - { "smb6", 1, flUseLabel, OH_Direct, }, /* $e7 */ + { "smb6", 2, flUseLabel, OH_Direct, }, /* $e7 */ { "inx", 1, flNone, OH_Implicit }, /* $e8 */ { "sbc", 2, flNone, OH_Immediate }, /* $e9 */ { "nop", 1, flNone, OH_Implicit }, /* $ea */ @@ -294,7 +294,7 @@ const OpcDesc OpcTable_HuC6280[256] = { { "set", 1, flNone, OH_Implicit, }, /* $f4 */ { "sbc", 2, flUseLabel, OH_DirectX }, /* $f5 */ { "inc", 2, flUseLabel, OH_DirectX }, /* $f6 */ - { "smb7", 1, flUseLabel, OH_Direct, }, /* $f7 */ + { "smb7", 2, flUseLabel, OH_Direct, }, /* $f7 */ { "sed", 1, flNone, OH_Implicit }, /* $f8 */ { "sbc", 3, flUseLabel, OH_AbsoluteY }, /* $f9 */ { "plx", 1, flNone, OH_Implicit }, /* $fa */ diff --git a/src/da65/opctable.c b/src/da65/opctable.c index c85805faf..255a3557f 100644 --- a/src/da65/opctable.c +++ b/src/da65/opctable.c @@ -35,8 +35,10 @@ /* da65 */ #include "error.h" +#include "opc4510.h" #include "opc6502.h" #include "opc6502x.h" +#include "opc6502dtv.h" #include "opc65816.h" #include "opc65c02.h" #include "opc65sc02.h" @@ -69,10 +71,12 @@ void SetOpcTable (cpu_t CPU) switch (CPU) { case CPU_6502: OpcTable = OpcTable_6502; break; case CPU_6502X: OpcTable = OpcTable_6502X; break; + case CPU_6502DTV: OpcTable = OpcTable_6502DTV; break; case CPU_65SC02: OpcTable = OpcTable_65SC02; break; case CPU_65C02: OpcTable = OpcTable_65C02; break; case CPU_HUC6280: OpcTable = OpcTable_HuC6280; break; case CPU_M740: OpcTable = OpcTable_M740; break; + case CPU_4510: OpcTable = OpcTable_4510; break; default: Error ("Unsupported CPU"); } } diff --git a/src/da65/opctable.h b/src/da65/opctable.h index d5c81b216..7c871f7b0 100644 --- a/src/da65/opctable.h +++ b/src/da65/opctable.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2000-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -38,7 +38,7 @@ -/* common */ +/* common */ #include "cpu.h" /* da65 */ diff --git a/src/da65/output.c b/src/da65/output.c index 4daacb1ee..5b0b6b79c 100644 --- a/src/da65/output.c +++ b/src/da65/output.c @@ -96,7 +96,7 @@ void OpenOutput (const char* Name) if (Name != 0) { F = fopen (Name, "w"); if (F == 0) { - Error ("Cannot open `%s': %s", Name, strerror (errno)); + Error ("Cannot open '%s': %s", Name, strerror (errno)); } } else { F = stdout; diff --git a/src/da65/scanner.c b/src/da65/scanner.c index 8dc8d393a..33fb3a826 100644 --- a/src/da65/scanner.c +++ b/src/da65/scanner.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2000-2005 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -41,6 +41,8 @@ /* common */ #include "chartype.h" #include "xsprintf.h" +#include "xmalloc.h" +#include "strbuf.h" /* ld65 */ #include "global.h" @@ -72,6 +74,7 @@ static int C = ' '; static unsigned InputLine = 1; static unsigned InputCol = 0; static FILE* InputFile = 0; +static char* InputSrcName = 0; @@ -91,7 +94,8 @@ void InfoWarning (const char* Format, ...) xvsprintf (Buf, sizeof (Buf), Format, ap); va_end (ap); - Warning ("%s(%u): %s", InfoFile, InfoErrorLine, Buf); + fprintf (stderr, "%s:%u: Warning: %s\n", + InputSrcName, InfoErrorLine, Buf); } @@ -106,11 +110,14 @@ void InfoError (const char* Format, ...) xvsprintf (Buf, sizeof (Buf), Format, ap); va_end (ap); - Error ("%s(%u): %s", InfoFile, InfoErrorLine, Buf); + fprintf (stderr, "%s:%u: Error: %s\n", + InputSrcName, InfoErrorLine, Buf); + exit (EXIT_FAILURE); } + /*****************************************************************************/ /* Code */ /*****************************************************************************/ @@ -149,17 +156,179 @@ static unsigned DigitVal (int C) +static void SkipBlanks (int SingleLine) +{ + while (C != EOF && (!SingleLine || C != '\n') && IsSpace (C)) { + NextChar (); + } +} + + + +static long GetDecimalToken (void) +{ + long Value = 0; + + while (C != EOF && IsDigit (C)) { + Value = Value * 10 + DigitVal (C); + NextChar (); + } + return Value; +} + + + +static int GetEncodedChar (char* Buf, unsigned* IPtr, unsigned Size) +{ + char Decoded = 0; + int Count; + + if (C == EOF) { + return -1; + } else if (C != '\\') { + Decoded = C; + NextChar (); + goto Store; + } + NextChar (); /* consume '\\' */ + if (C == EOF) { + return -1; + } else if (IsODigit (C)) { + Count = 3; + do { + Decoded = Decoded * 8 + DigitVal (C); + NextChar (); + --Count; + } while (Count > 0 && C != EOF && IsODigit (C)); + } else if (C == 'x') { + NextChar (); /* consume 'x' */ + Count = 2; + while (Count > 0 && C != EOF && IsXDigit (C)) { + Decoded = Decoded * 16 + DigitVal (C); + NextChar (); + --Count; + } + } else { + switch (C) { + case '"': case '\'': case '\\': + Decoded = C; break; + case 't': Decoded = '\t'; break; + case 'r': Decoded = '\r'; break; + case 'n': Decoded = '\n'; break; + default: return -1; + } + NextChar (); + } +Store: + if (*IPtr < Size - 1) { + Buf [(*IPtr)++] = Decoded; + } + Buf [*IPtr] = 0; + return 0; +} + + + +static void LineMarkerOrComment () +/* Handle a line beginning with '#'. Possible interpretations are: +** - #line <lineno> ["<filename>"] (C preprocessor input) +** - # <lineno> "<filename>" [<flag>]... (gcc preprocessor output) +** - #<comment> +*/ +{ + unsigned long LineNo = 0; + int LineDirective = 0; + StrBuf SrcNameBuf = AUTO_STRBUF_INITIALIZER; + + /* Skip the first "# " */ + NextChar (); + SkipBlanks (1); + + /* Check "line" */ + if (C == 'l') { + char MaybeLine [6]; + unsigned I; + for (I = 0; I < sizeof MaybeLine - 1 && C != EOF && IsAlNum (C); ++I) { + MaybeLine [I] = C; + NextChar (); + } + MaybeLine [I] = 0; + if (strcmp (MaybeLine, "line") != 0) { + goto NotMarker; + } + LineDirective = 1; + SkipBlanks (1); + } + + /* Get line number */ + if (C == EOF || !IsDigit (C)) { + goto NotMarker; + } + LineNo = GetDecimalToken (); + SkipBlanks (1); + + /* Get the source file name */ + if (C != '\"') { + /* The source file name is missing */ + if (LineDirective && C == '\n') { + /* got #line <lineno> */ + NextChar (); + InputLine = LineNo; + goto Last; + } else { + goto NotMarker; + } + } + NextChar (); + while (C != EOF && C != '\n' && C != '\"') { + char DecodeBuf [2]; + unsigned I = 0; + if (GetEncodedChar (DecodeBuf, &I, sizeof DecodeBuf) < 0) { + goto BadMarker; + } + SB_AppendBuf (&SrcNameBuf, DecodeBuf, I); + } + if (C != '\"') { + goto BadMarker; + } + NextChar (); + + /* Ignore until the end of line */ + while (C != EOF && C != '\n') { + NextChar (); + } + + /* Accepted a line marker */ + SB_Terminate (&SrcNameBuf); + xfree (InputSrcName); + InputSrcName = SB_GetBuf (&SrcNameBuf); + SB_Init (&SrcNameBuf); + InputLine = (unsigned)LineNo; + NextChar (); + goto Last; + +BadMarker: + InfoWarning ("Bad line marker"); +NotMarker: + while (C != EOF && C != '\n') { + NextChar (); + } + NextChar (); +Last: + SB_Done (&SrcNameBuf); +} + + + void InfoNextTok (void) /* Read the next token from the input stream */ { unsigned I; - int Esc; + char DecodeBuf [2]; Again: /* Skip whitespace */ - while (IsSpace (C)) { - NextChar (); - } + SkipBlanks (0); /* Remember the current position */ InfoErrorLine = InputLine; @@ -198,11 +367,7 @@ Again: /* Decimal number? */ if (IsDigit (C)) { - InfoIVal = 0; - while (IsDigit (C)) { - InfoIVal = InfoIVal * 10 + DigitVal (C); - NextChar (); - } + InfoIVal = GetDecimalToken (); InfoTok = INFOTOK_INTCON; return; } @@ -248,38 +413,32 @@ Again: case '\"': NextChar (); I = 0; - while (C != '\"') { - Esc = (C == '\\'); - if (Esc) { - NextChar (); - } - if (C == EOF || C == '\n') { - InfoError ("Unterminated string"); - } - if (Esc) { - switch (C) { - case '\"': C = '\"'; break; - case '\'': C = '\''; break; - default: InfoError ("Invalid escape char: %c", C); + InfoSVal[0] = '\0'; + while (C != EOF && C != '\"') { + if (GetEncodedChar (InfoSVal, &I, sizeof InfoSVal) < 0) { + if (C == EOF) { + InfoError ("Unterminated string"); + } else { + InfoError ("Invalid escape char: %c", C); } } - if (I < CFG_MAX_IDENT_LEN) { - InfoSVal [I++] = C; - } - NextChar (); + } + if (C != '\"') { + InfoError ("Unterminated string"); } NextChar (); - InfoSVal [I] = '\0'; InfoTok = INFOTOK_STRCON; break; case '\'': NextChar (); - if (C == EOF || IsControl (C)) { + if (C == EOF || IsControl (C) || C == '\'') { InfoError ("Invalid character constant"); } - InfoIVal = C; - NextChar (); + if (GetEncodedChar (DecodeBuf, &I, sizeof DecodeBuf) < 0 || I != 1) { + InfoError ("Invalid character constant"); + } + InfoIVal = DecodeBuf [0]; if (C != '\'') { InfoError ("Unterminated character constant"); } @@ -288,8 +447,13 @@ Again: break; case '#': - /* Comment */ - while (C != '\n' && C != EOF) { + /* # lineno "sourcefile" or # comment */ + if (SyncLines && InputCol == 1) { + LineMarkerOrComment (); + } else { + do { + NextChar (); + } while (C != EOF && C != '\n'); NextChar (); } if (C != EOF) { @@ -298,12 +462,27 @@ Again: InfoTok = INFOTOK_EOF; break; + case '/': + /* C++ style comment */ + NextChar (); + if (C != '/') { + InfoError ("Invalid token '/'"); + } + do { + NextChar (); + } while (C != '\n' && C != EOF); + if (C != EOF) { + goto Again; + } + InfoTok = INFOTOK_EOF; + break; + case EOF: InfoTok = INFOTOK_EOF; break; default: - InfoError ("Invalid character `%c'", C); + InfoError ("Invalid character '%c'", C); } } @@ -324,7 +503,7 @@ void InfoConsume (unsigned T, const char* Msg) void InfoConsumeLCurly (void) /* Consume a left curly brace */ { - InfoConsume (INFOTOK_LCURLY, "`{' expected"); + InfoConsume (INFOTOK_LCURLY, "'{' expected"); } @@ -332,7 +511,7 @@ void InfoConsumeLCurly (void) void InfoConsumeRCurly (void) /* Consume a right curly brace */ { - InfoConsume (INFOTOK_RCURLY, "`}' expected"); + InfoConsume (INFOTOK_RCURLY, "'}' expected"); } @@ -340,7 +519,7 @@ void InfoConsumeRCurly (void) void InfoConsumeSemi (void) /* Consume a semicolon */ { - InfoConsume (INFOTOK_SEMI, "`;' expected"); + InfoConsume (INFOTOK_SEMI, "';' expected"); } @@ -348,7 +527,7 @@ void InfoConsumeSemi (void) void InfoConsumeColon (void) /* Consume a colon */ { - InfoConsume (INFOTOK_COLON, "`:' expected"); + InfoConsume (INFOTOK_COLON, "':' expected"); } @@ -484,14 +663,8 @@ void InfoSetName (const char* Name) /* Set a name for a config file */ { InfoFile = Name; -} - - - -const char* InfoGetName (void) -/* Get the name of the config file */ -{ - return InfoFile? InfoFile : ""; + xfree(InputSrcName); + InputSrcName = xstrdup(Name); } @@ -510,7 +683,7 @@ void InfoOpenInput (void) /* Open the file */ InputFile = fopen (InfoFile, "r"); if (InputFile == 0) { - Error ("Cannot open `%s': %s", InfoFile, strerror (errno)); + Error ("Cannot open '%s': %s", InfoFile, strerror (errno)); } /* Initialize variables */ diff --git a/src/da65/scanner.h b/src/da65/scanner.h index f7f090fad..d4e38177b 100644 --- a/src/da65/scanner.h +++ b/src/da65/scanner.h @@ -105,6 +105,7 @@ typedef enum token_t { INFOTOK_COMMENT, INFOTOK_ADDR, INFOTOK_SIZE, + INFOTOK_PARAMSIZE, /* ASMINC section */ INFOTOK_FILE, diff --git a/src/dbginfo/dbginfo.c b/src/dbginfo/dbginfo.c index e0d8894f9..fdebe6910 100644 --- a/src/dbginfo/dbginfo.c +++ b/src/dbginfo/dbginfo.c @@ -183,7 +183,7 @@ typedef struct DbgInfo DbgInfo; struct DbgInfo { /* First we have all items in collections sorted by id. The ids are - ** continous, so an access by id is almost as cheap as an array access. + ** continuous, so an access by id is almost as cheap as an array access. ** The collections are also used when the objects are deleted, so they're ** actually the ones that "own" the items. */ @@ -680,7 +680,7 @@ static char* SB_StrDup (const StrBuf* B) static Collection* CollInit (Collection* C) /* Initialize a collection and return it. */ { - /* Intialize the fields. */ + /* Initialize the fields. */ C->Count = 0; C->Size = 0; C->Items = 0; @@ -1349,7 +1349,7 @@ static int CompareFileInfoByName (const void* L, const void* R) static LibInfo* NewLibInfo (const StrBuf* Name) -/* Create a new LibInfo struct, intialize and return it */ +/* Create a new LibInfo struct, initialize and return it */ { /* Allocate memory */ LibInfo* L = xmalloc (sizeof (LibInfo) + SB_GetLen (Name)); @@ -1463,7 +1463,7 @@ static int CompareLineInfoByLine (const void* L, const void* R) static ModInfo* NewModInfo (const StrBuf* Name) -/* Create a new ModInfo struct, intialize and return it */ +/* Create a new ModInfo struct, initialize and return it */ { /* Allocate memory */ ModInfo* M = xmalloc (sizeof (ModInfo) + SB_GetLen (Name)); @@ -1536,7 +1536,7 @@ static int CompareModInfoByName (const void* L, const void* R) static ScopeInfo* NewScopeInfo (const StrBuf* Name) -/* Create a new ScopeInfo struct, intialize and return it */ +/* Create a new ScopeInfo struct, initialize and return it */ { /* Allocate memory */ ScopeInfo* S = xmalloc (sizeof (ScopeInfo) + SB_GetLen (Name)); @@ -1697,7 +1697,7 @@ static int CompareSegInfoByName (const void* L, const void* R) static SpanInfo* NewSpanInfo (void) -/* Create a new SpanInfo struct, intialize and return it */ +/* Create a new SpanInfo struct, initialize and return it */ { /* Allocate memory */ SpanInfo* S = xmalloc (sizeof (SpanInfo)); @@ -1779,7 +1779,7 @@ static int CompareSpanInfoByAddr (const void* L, const void* R) static SymInfo* NewSymInfo (const StrBuf* Name) -/* Create a new SymInfo struct, intialize and return it */ +/* Create a new SymInfo struct, initialize and return it */ { /* Allocate memory */ SymInfo* S = xmalloc (sizeof (SymInfo) + SB_GetLen (Name)); @@ -2147,7 +2147,7 @@ static TypeInfo* ParseTypeString (InputData* D, StrBuf* Type) I += GT_GET_SIZE (A[I]) + 1; } else { /* Unknown type in type string */ - ParseError (D, CC65_ERROR, "Unkown type in type value"); + ParseError (D, CC65_ERROR, "Unknown type in type value"); return 0; } break; @@ -2687,7 +2687,7 @@ static void NextToken (InputData* D) break; default: - ParseError (D, CC65_ERROR, "Invalid input character `%c'", D->C); + ParseError (D, CC65_ERROR, "Invalid input character '%c'", D->C); } } @@ -2733,7 +2733,7 @@ static int StrConstFollows (InputData* D) static int Consume (InputData* D, Token Tok, const char* Name) -/* Check for a token and consume it. Return true if the token was comsumed, +/* Check for a token and consume it. Return true if the token was consumed, ** return false otherwise. */ { @@ -6936,7 +6936,7 @@ const cc65_scopeinfo* cc65_scope_byspan (cc65_dbginfo Handle, unsigned SpanId) const cc65_scopeinfo* cc65_childscopes_byid (cc65_dbginfo Handle, unsigned Id) /* Return the direct child scopes of a scope with a given id. The function ** returns NULL if no scope with this id was found, otherwise a list of the -** direct childs. +** direct children. */ { const DbgInfo* Info; diff --git a/src/dbginfo/dbginfo.h b/src/dbginfo/dbginfo.h index 7317e575f..38d891e7c 100644 --- a/src/dbginfo/dbginfo.h +++ b/src/dbginfo/dbginfo.h @@ -135,7 +135,7 @@ struct cc65_csymdata { unsigned char csym_kind; /* Kind of c symbol */ unsigned char csym_sc; /* Storage class of c symbol */ int csym_offs; /* Offset for auto and register */ - unsigned type_id; /* Id of the data type */ + unsigned type_id; /* Id of the data type */ unsigned symbol_id; /* Attached asm symbol if any */ unsigned scope_id; /* Scope of c symbol */ const char* csym_name; /* Name of the symbol */ diff --git a/src/grc65.vcxproj b/src/grc65.vcxproj index 211ad7cce..fbd44fa3e 100644 --- a/src/grc65.vcxproj +++ b/src/grc65.vcxproj @@ -1,5 +1,5 @@ <?xml version="1.0" encoding="utf-8"?> -<Project DefaultTargets="Build" ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> +<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <ItemGroup Label="ProjectConfigurations"> <ProjectConfiguration Include="Debug|Win32"> <Configuration>Debug</Configuration> @@ -13,65 +13,39 @@ <PropertyGroup Label="Globals"> <ProjectGuid>{E0FD0AB3-3BEE-496F-8108-A8E0F8933F39}</ProjectGuid> <Keyword>Win32Proj</Keyword> - <RootNamespace>grc65</RootNamespace> </PropertyGroup> + <ImportGroup Label="PropertySheets"> + <Import Project="cc65.props" /> + </ImportGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> <UseDebugLibraries>true</UseDebugLibraries> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> <UseDebugLibraries>false</UseDebugLibraries> - <WholeProgramOptimization>true</WholeProgramOptimization> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> <ImportGroup Label="ExtensionSettings"> </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> <PropertyGroup Label="UserMacros" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <LinkIncremental>true</LinkIncremental> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> <ClCompile> - <PrecompiledHeader> - </PrecompiledHeader> - <WarningLevel>Level3</WarningLevel> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;_DEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;_DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>true</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> <ClCompile> - <WarningLevel>Level3</WarningLevel> - <PrecompiledHeader> - </PrecompiledHeader> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;NDEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>false</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemGroup> diff --git a/src/grc65/main.c b/src/grc65/main.c index 1b417c64d..349b5c110 100644 --- a/src/grc65/main.c +++ b/src/grc65/main.c @@ -151,12 +151,12 @@ static void OptTarget (const char* Opt attribute ((unused)), const char* Arg) break; case TGT_UNKNOWN: - AbEnd ("Unknown target system `%s'", Arg); + AbEnd ("Unknown target system '%s'", Arg); break; default: /* Target is known but unsupported */ - AbEnd ("Unsupported target system `%s'", Arg); + AbEnd ("Unsupported target system '%s'", Arg); break; } } @@ -166,7 +166,8 @@ static void OptVersion (const char* Opt attribute ((unused)), const char* Arg attribute ((unused))) /* Print the program version */ { - fprintf (stderr, "grc65 V%s\n", GetVersionAsString ()); + fprintf (stderr, "%s V%s\n", ProgName, GetVersionAsString ()); + exit(EXIT_SUCCESS); } @@ -225,18 +226,18 @@ static void openSFile (void) } -static int findToken (const char **tokenTbl, const char *token) +static int findToken (const char * const *tokenTbl, const char *token) { /* takes as input table of tokens and token, returns position in table or -1 if not found */ - int a = 0; + int i; - while (strlen (tokenTbl[a]) != 0) { - if (strcmp (tokenTbl[a], token) == 0) break; - a++; + for (i = 0; tokenTbl[i][0]; i++) { + if (strcmp (tokenTbl[i], token) == 0) { + return i; + } } - if (strlen (tokenTbl[a]) == 0) a = -1; - return a; + return -1; } @@ -860,7 +861,7 @@ static char *filterInput (FILE *F, char *tbl) } if (a == EOF) { tbl[i] = '\0'; - xrealloc (tbl, i + 1); + tbl = xrealloc (tbl, i + 1); break; } if (IsSpace (a)) { diff --git a/src/ld65.vcxproj b/src/ld65.vcxproj index acb9b4240..9e4b08621 100644 --- a/src/ld65.vcxproj +++ b/src/ld65.vcxproj @@ -1,5 +1,5 @@ <?xml version="1.0" encoding="utf-8"?> -<Project DefaultTargets="Build" ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> +<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <ItemGroup Label="ProjectConfigurations"> <ProjectConfiguration Include="Debug|Win32"> <Configuration>Debug</Configuration> @@ -13,65 +13,39 @@ <PropertyGroup Label="Globals"> <ProjectGuid>{26C749A0-814C-47A2-9D36-AE92AE932FE4}</ProjectGuid> <Keyword>Win32Proj</Keyword> - <RootNamespace>ld65</RootNamespace> </PropertyGroup> + <ImportGroup Label="PropertySheets"> + <Import Project="cc65.props" /> + </ImportGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> <UseDebugLibraries>true</UseDebugLibraries> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> <UseDebugLibraries>false</UseDebugLibraries> - <WholeProgramOptimization>true</WholeProgramOptimization> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> <ImportGroup Label="ExtensionSettings"> </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> <PropertyGroup Label="UserMacros" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <LinkIncremental>true</LinkIncremental> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> <ClCompile> - <PrecompiledHeader> - </PrecompiledHeader> - <WarningLevel>Level3</WarningLevel> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;_DEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;_DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>true</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> <ClCompile> - <WarningLevel>Level3</WarningLevel> - <PrecompiledHeader> - </PrecompiledHeader> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;NDEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>false</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemGroup> @@ -105,6 +79,7 @@ <ClInclude Include="ld65\span.h" /> <ClInclude Include="ld65\spool.h" /> <ClInclude Include="ld65\tpool.h" /> + <ClInclude Include="ld65\xex.h" /> </ItemGroup> <ItemGroup> <ClCompile Include="ld65\asserts.c" /> @@ -138,8 +113,9 @@ <ClCompile Include="ld65\span.c" /> <ClCompile Include="ld65\spool.c" /> <ClCompile Include="ld65\tpool.c" /> + <ClCompile Include="ld65\xex.c" /> </ItemGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.targets" /> <ImportGroup Label="ExtensionTargets"> </ImportGroup> -</Project> \ No newline at end of file +</Project> diff --git a/src/ld65/asserts.c b/src/ld65/asserts.c index 276b13595..e9bae83e5 100644 --- a/src/ld65/asserts.c +++ b/src/ld65/asserts.c @@ -129,7 +129,7 @@ void CheckAssertions (void) /* If the expression is not constant, we're not able to handle it */ if (!IsConstExpr (A->Expr)) { - Warning ("Cannot evaluate assertion in module `%s', line %u", + Warning ("Cannot evaluate assertion in module '%s', line %u", Module, Line); } else if (GetExprVal (A->Expr) == 0) { @@ -140,16 +140,16 @@ void CheckAssertions (void) case ASSERT_ACT_WARN: case ASSERT_ACT_LDWARN: - Warning ("%s(%u): %s", Module, Line, Message); + Warning ("%s:%u: %s", Module, Line, Message); break; case ASSERT_ACT_ERROR: case ASSERT_ACT_LDERROR: - Error ("%s(%u): %s", Module, Line, Message); + Error ("%s:%u: %s", Module, Line, Message); break; default: - Internal ("Invalid assertion action (%u) in module `%s', " + Internal ("Invalid assertion action (%u) in module '%s', " "line %u (file corrupt?)", A->Action, Module, Line); break; diff --git a/src/ld65/bin.c b/src/ld65/bin.c index ada4f1e3c..bd822cc23 100644 --- a/src/ld65/bin.c +++ b/src/ld65/bin.c @@ -154,7 +154,7 @@ static void BinWriteMem (BinDesc* D, MemoryArea* M) SegDesc* S = CollAtUnchecked (&M->SegList, I); /* Keep the user happy */ - Print (stdout, 1, " Writing `%s'\n", GetString (S->Name)); + Print (stdout, 1, " Writing '%s'\n", GetString (S->Name)); /* Writes do only occur in the load area and not for BSS segments */ DoWrite = (S->Flags & SF_BSS) == 0 && /* No BSS segment */ @@ -169,18 +169,6 @@ static void BinWriteMem (BinDesc* D, MemoryArea* M) PrintNumVal ("Address", Addr); PrintNumVal ("FileOffs", (unsigned long) ftell (D->F)); - /* Check if the alignment for the segment from the linker config is - ** a multiple for that of the segment. - */ - if ((S->RunAlignment % S->Seg->Alignment) != 0) { - /* Segment requires another alignment than configured - ** in the linker. - */ - Warning ("Segment `%s' is not aligned properly. Resulting " - "executable may not be functional.", - GetString (S->Name)); - } - /* If this is the run memory area, we must apply run alignment. If ** this is not the run memory area but the load memory area (which ** means that both are different), we must apply load alignment. @@ -205,8 +193,13 @@ static void BinWriteMem (BinDesc* D, MemoryArea* M) NewAddr += M->Start; } if (DoWrite || (M->Flags & MF_FILL) != 0) { - WriteMult (D->F, M->FillVal, NewAddr-Addr); - PrintNumVal ("SF_OFFSET", NewAddr - Addr); + /* Seek in "overwrite" segments */ + if (S->Flags & SF_OVERWRITE) { + fseek (D->F, NewAddr - M->Start + M->FileOffs, SEEK_SET); + } else { + WriteMult (D->F, M->FillVal, NewAddr-Addr); + PrintNumVal ("SF_OFFSET", NewAddr - Addr); + } } Addr = NewAddr; } @@ -233,6 +226,13 @@ static void BinWriteMem (BinDesc* D, MemoryArea* M) unsigned long P = ftell (D->F); SegWrite (D->Filename, D->F, S->Seg, BinWriteExpr, D); PrintNumVal ("Wrote", (unsigned long) (ftell (D->F) - P)); + /* If we have just written an OVERWRITE segement, move position to the + ** end of file, so that subsequent segments are written in the correct + ** place. + */ + if (S->Flags & SF_OVERWRITE) { + fseek (D->F, 0, SEEK_END); + } } else if (M->Flags & MF_FILL) { WriteMult (D->F, S->Seg->FillVal, S->Seg->Size); PrintNumVal ("Filled", (unsigned long) S->Seg->Size); @@ -293,23 +293,23 @@ void BinWriteTarget (BinDesc* D, struct File* F) /* Open the file */ D->F = fopen (D->Filename, "wb"); if (D->F == 0) { - Error ("Cannot open `%s': %s", D->Filename, strerror (errno)); + Error ("Cannot open '%s': %s", D->Filename, strerror (errno)); } /* Keep the user happy */ - Print (stdout, 1, "Opened `%s'...\n", D->Filename); + Print (stdout, 1, "Opened '%s'...\n", D->Filename); /* Dump all memory areas */ for (I = 0; I < CollCount (&F->MemoryAreas); ++I) { /* Get this entry */ MemoryArea* M = CollAtUnchecked (&F->MemoryAreas, I); - Print (stdout, 1, " Dumping `%s'\n", GetString (M->Name)); + Print (stdout, 1, " Dumping '%s'\n", GetString (M->Name)); BinWriteMem (D, M); } /* Close the file */ if (fclose (D->F) != 0) { - Error ("Cannot write to `%s': %s", D->Filename, strerror (errno)); + Error ("Cannot write to '%s': %s", D->Filename, strerror (errno)); } /* Reset the file and filename */ diff --git a/src/ld65/binfmt.c b/src/ld65/binfmt.c index a510f94b7..f4f2678fe 100644 --- a/src/ld65/binfmt.c +++ b/src/ld65/binfmt.c @@ -73,6 +73,7 @@ int RelocatableBinFmt (unsigned Format) switch (Format) { case BINFMT_BINARY: + case BINFMT_ATARIEXE: Reloc = 0; break; diff --git a/src/ld65/condes.c b/src/ld65/condes.c index d8c378211..734b64ebd 100644 --- a/src/ld65/condes.c +++ b/src/ld65/condes.c @@ -281,7 +281,7 @@ const ConDesImport* ConDesGetImport (unsigned Type) /* Check the parameters */ PRECONDITION (Type <= CD_TYPE_MAX); - /* Return the import */ + /* Return the import */ Import = &ConDes[Type].Import; return (Import->Name != INVALID_STRING_ID)? Import : 0; } diff --git a/src/ld65/config.c b/src/ld65/config.c index 8e7a049c7..c22ced1ef 100644 --- a/src/ld65/config.c +++ b/src/ld65/config.c @@ -68,6 +68,7 @@ #include "objdata.h" #include "scanner.h" #include "spool.h" +#include "xex.h" @@ -149,6 +150,7 @@ static Collection CfgSymbols = STATIC_COLLECTION_INITIALIZER; /* Descriptor holding information about the binary formats */ static BinDesc* BinFmtDesc = 0; static O65Desc* O65FmtDesc = 0; +static XexDesc* XexFmtDesc = 0; @@ -226,7 +228,7 @@ static MemoryArea* CfgGetMemory (unsigned Name) { MemoryArea* M = CfgFindMemory (Name); if (M == 0) { - CfgError (&CfgErrorPos, "Invalid memory area `%s'", GetString (Name)); + CfgError (&CfgErrorPos, "Invalid memory area '%s'", GetString (Name)); } return M; } @@ -320,7 +322,7 @@ static MemoryArea* CreateMemoryArea (const FilePos* Pos, unsigned Name) MemoryArea* M = CfgFindMemory (Name); if (M) { CfgError (&CfgErrorPos, - "Memory area `%s' defined twice", + "Memory area '%s' defined twice", GetString (Name)); } @@ -343,7 +345,7 @@ static SegDesc* NewSegDesc (unsigned Name) /* Check for duplicate names */ SegDesc* S = CfgFindSegDesc (Name); if (S) { - CfgError (&CfgErrorPos, "Segment `%s' defined twice", GetString (Name)); + CfgError (&CfgErrorPos, "Segment '%s' defined twice", GetString (Name)); } /* Allocate memory */ @@ -543,6 +545,7 @@ static void ParseFiles (void) { "FORMAT", CFGTOK_FORMAT }, }; static const IdentTok Formats [] = { + { "ATARI", CFGTOK_ATARIEXE }, { "O65", CFGTOK_O65 }, { "BIN", CFGTOK_BIN }, { "BINARY", CFGTOK_BIN }, @@ -566,7 +569,7 @@ static void ParseFiles (void) F = FindFile (GetStrBufId (&CfgSVal)); if (F == 0) { CfgError (&CfgErrorPos, - "File `%s' not found in MEMORY section", + "File '%s' not found in MEMORY section", SB_GetConstBuf (&CfgSVal)); } @@ -607,6 +610,10 @@ static void ParseFiles (void) F->Format = BINFMT_O65; break; + case CFGTOK_ATARIEXE: + F->Format = BINFMT_ATARIEXE; + break; + default: Error ("Unexpected format token"); } @@ -653,6 +660,7 @@ static void ParseSegments (void) { "RW", CFGTOK_RW }, { "BSS", CFGTOK_BSS }, { "ZP", CFGTOK_ZP }, + { "OVERWRITE", CFGTOK_OVERWRITE }, }; unsigned Count; @@ -724,7 +732,7 @@ static void ParseSegments (void) case CFGTOK_OFFSET: FlagAttr (&S->Attr, SA_OFFSET, "OFFSET"); - S->Addr = CfgCheckedConstExpr (1, 0x1000000); + S->Addr = CfgCheckedConstExpr (0, 0x1000000); S->Flags |= SF_OFFSET; break; @@ -745,7 +753,7 @@ static void ParseSegments (void) case CFGTOK_START: FlagAttr (&S->Attr, SA_START, "START"); - S->Addr = CfgCheckedConstExpr (1, 0x1000000); + S->Addr = CfgCheckedConstExpr (0, 0x1000000); S->Flags |= SF_START; break; @@ -753,11 +761,12 @@ static void ParseSegments (void) FlagAttr (&S->Attr, SA_TYPE, "TYPE"); CfgSpecialToken (Types, ENTRY_COUNT (Types), "Type"); switch (CfgTok) { - case CFGTOK_RO: S->Flags |= SF_RO; break; - case CFGTOK_RW: /* Default */ break; - case CFGTOK_BSS: S->Flags |= SF_BSS; break; - case CFGTOK_ZP: S->Flags |= (SF_BSS | SF_ZP); break; - default: Internal ("Unexpected token: %d", CfgTok); + case CFGTOK_RO: S->Flags |= SF_RO; break; + case CFGTOK_RW: /* Default */ break; + case CFGTOK_BSS: S->Flags |= SF_BSS; break; + case CFGTOK_ZP: S->Flags |= (SF_BSS | SF_ZP); break; + case CFGTOK_OVERWRITE: S->Flags |= (SF_OVERWRITE | SF_RO); break; + default: Internal ("Unexpected token: %d", CfgTok); } CfgNextTok (); break; @@ -796,7 +805,7 @@ static void ParseSegments (void) */ if ((S->Flags & SF_BSS) != 0 && (S->Load != S->Run)) { CfgWarning (&CfgErrorPos, - "Segment with type `bss' has both LOAD and RUN " + "Segment with type 'bss' has both LOAD and RUN " "memory areas assigned"); } @@ -804,7 +813,7 @@ static void ParseSegments (void) if ((S->Flags & SF_RO) == 0) { if (S->Run->Flags & MF_RO) { CfgError (&CfgErrorPos, - "Cannot put r/w segment `%s' in r/o memory area `%s'", + "Cannot put r/w segment '%s' in r/o memory area '%s'", GetString (S->Name), GetString (S->Run->Name)); } } @@ -993,6 +1002,87 @@ static void ParseO65 (void) +static void ParseXex (void) +/* Parse the o65 format section */ +{ + static const IdentTok Attributes [] = { + { "RUNAD", CFGTOK_RUNAD }, + { "INITAD", CFGTOK_INITAD }, + }; + + /* Remember the attributes read */ + /* Bitmask to remember the attributes we got already */ + enum { + atNone = 0x0000, + atRunAd = 0x0001, + }; + unsigned AttrFlags = atNone; + Import *RunAd = 0; + Import *InitAd; + MemoryArea *InitMem; + + /* Read the attributes */ + while (CfgTok == CFGTOK_IDENT) { + + /* Map the identifier to a token */ + cfgtok_t AttrTok; + CfgSpecialToken (Attributes, ENTRY_COUNT (Attributes), "Attribute"); + AttrTok = CfgTok; + + /* An optional assignment follows */ + CfgNextTok (); + CfgOptionalAssign (); + + /* Check which attribute was given */ + switch (AttrTok) { + + case CFGTOK_RUNAD: + /* Cannot have this attribute twice */ + FlagAttr (&AttrFlags, atRunAd, "RUNAD"); + /* We expect an identifier */ + CfgAssureIdent (); + /* Generate an import for the symbol */ + RunAd = InsertImport (GenImport (GetStrBufId (&CfgSVal), ADDR_SIZE_ABS)); + /* Remember the file position */ + CollAppend (&RunAd->RefLines, GenLineInfo (&CfgErrorPos)); + /* Eat the identifier token */ + CfgNextTok (); + break; + + case CFGTOK_INITAD: + /* We expect a memory area followed by a colon and an identifier */ + CfgAssureIdent (); + InitMem = CfgGetMemory (GetStrBufId (&CfgSVal)); + CfgNextTok (); + CfgConsumeColon (); + CfgAssureIdent (); + /* Generate an import for the symbol */ + InitAd = InsertImport (GenImport (GetStrBufId (&CfgSVal), ADDR_SIZE_ABS)); + /* Remember the file position */ + CollAppend (&InitAd->RefLines, GenLineInfo (&CfgErrorPos)); + /* Eat the identifier token */ + CfgNextTok (); + /* Add to XEX */ + if (XexAddInitAd (XexFmtDesc, InitMem, InitAd)) + CfgError (&CfgErrorPos, "INITAD already given for memory area"); + break; + + default: + FAIL ("Unexpected attribute token"); + + } + + /* Skip an optional comma */ + CfgOptionalComma (); + } + + /* Set the RUNAD import if we have one */ + if ( RunAd ) + XexSetRunAd (XexFmtDesc, RunAd); +} + + + static void ParseFormats (void) /* Parse a target format section */ { @@ -1000,6 +1090,7 @@ static void ParseFormats (void) { "O65", CFGTOK_O65 }, { "BIN", CFGTOK_BIN }, { "BINARY", CFGTOK_BIN }, + { "ATARI", CFGTOK_ATARIEXE }, }; while (CfgTok == CFGTOK_IDENT) { @@ -1020,6 +1111,10 @@ static void ParseFormats (void) ParseO65 (); break; + case CFGTOK_ATARIEXE: + ParseXex (); + break; + case CFGTOK_BIN: /* No attribibutes available */ break; @@ -1509,7 +1604,7 @@ static void ParseConfig (void) CfgNextTok (); /* Expected a curly brace */ - CfgConsume (CFGTOK_LCURLY, "`{' expected"); + CfgConsume (CFGTOK_LCURLY, "'{' expected"); /* Read the block */ switch (BlockTok) { @@ -1544,7 +1639,7 @@ static void ParseConfig (void) } /* Skip closing brace */ - CfgConsume (CFGTOK_RCURLY, "`}' expected"); + CfgConsume (CFGTOK_RCURLY, "'}' expected"); } while (CfgTok != CFGTOK_EOF); } @@ -1557,6 +1652,7 @@ void CfgRead (void) /* Create the descriptors for the binary formats */ BinFmtDesc = NewBinDesc (); O65FmtDesc = NewO65Desc (); + XexFmtDesc = NewXexDesc (); /* If we have a config name given, open the file, otherwise we will read ** from a buffer. @@ -1601,7 +1697,7 @@ static void ProcessSegments (void) */ if ((S->Flags & SF_BSS) != 0 && S->Seg != 0 && !IsBSSType (S->Seg)) { CfgWarning (GetSourcePos (S->LI), - "Segment `%s' with type `bss' contains initialized data", + "Segment '%s' with type 'bss' contains initialized data", GetString (S->Name)); } @@ -1630,7 +1726,7 @@ static void ProcessSegments (void) /* Print a warning if the segment is not optional */ if ((S->Flags & SF_OPTIONAL) == 0) { CfgWarning (&CfgErrorPos, - "Segment `%s' does not exist", + "Segment '%s' does not exist", GetString (S->Name)); } @@ -1663,7 +1759,7 @@ static void ProcessSymbols (void) if (O65GetImport (O65FmtDesc, Sym->Name) != 0) { CfgError ( GetSourcePos (Sym->LI), - "Exported o65 symbol `%s' cannot also be an o65 import", + "Exported o65 symbol '%s' cannot also be an o65 import", GetString (Sym->Name) ); } @@ -1675,7 +1771,7 @@ static void ProcessSymbols (void) if (O65GetExport (O65FmtDesc, Sym->Name) != 0) { CfgError ( GetSourcePos (Sym->LI), - "Duplicate exported o65 symbol: `%s'", + "Duplicate exported o65 symbol: '%s'", GetString (Sym->Name) ); } @@ -1689,7 +1785,7 @@ static void ProcessSymbols (void) if (O65GetExport (O65FmtDesc, Sym->Name) != 0) { CfgError ( GetSourcePos (Sym->LI), - "Imported o65 symbol `%s' cannot also be an o65 export", + "Imported o65 symbol '%s' cannot also be an o65 export", GetString (Sym->Name) ); } @@ -1701,7 +1797,7 @@ static void ProcessSymbols (void) if (O65GetImport (O65FmtDesc, Sym->Name) != 0) { CfgError ( GetSourcePos (Sym->LI), - "Duplicate imported o65 symbol: `%s'", + "Duplicate imported o65 symbol: '%s'", GetString (Sym->Name) ); } @@ -1795,6 +1891,7 @@ unsigned CfgProcess (void) for (I = 0; I < CollCount (&MemoryAreas); ++I) { unsigned J; unsigned long Addr; + unsigned Overwrites = 0; /* Get the next memory area */ MemoryArea* M = CollAtUnchecked (&MemoryAreas, I); @@ -1810,7 +1907,7 @@ unsigned CfgProcess (void) */ if (!IsConstExpr (M->StartExpr)) { CfgError (GetSourcePos (M->LI), - "Start address of memory area `%s' is not constant", + "Start address of memory area '%s' is not constant", GetString (M->Name)); } Addr = M->Start = GetExprVal (M->StartExpr); @@ -1835,7 +1932,7 @@ unsigned CfgProcess (void) /* Resolve the size expression */ if (!IsConstExpr (M->SizeExpr)) { CfgError (GetSourcePos (M->LI), - "Size of memory area `%s' is not constant", + "Size of memory area '%s' is not constant", GetString (M->Name)); } M->Size = GetExprVal (M->SizeExpr); @@ -1848,6 +1945,27 @@ unsigned CfgProcess (void) /* Remember the start address before handling this segment */ unsigned long StartAddr = Addr; + /* Take note of "overwrite" segments and make sure there are no + ** other segment types following them in current memory region. + */ + if (S->Flags & SF_OVERWRITE) { + if (S->Flags & (SF_OFFSET | SF_START)) { + ++Overwrites; + } else { + CfgError (GetSourcePos (M->LI), + "Segment '%s' of type 'overwrite' requires either" + " 'Start' or 'Offset' attribute to be specified", + GetString (S->Name)); + } + } else { + if (Overwrites > 0) { + CfgError (GetSourcePos (M->LI), + "Segment '%s' is preceded by at least one segment" + " of type 'overwrite'", + GetString (S->Name)); + } + } + /* Some actions depend on whether this is the load or run memory ** area. */ @@ -1855,6 +1973,25 @@ unsigned CfgProcess (void) /* This is the run (and maybe load) memory area. Handle ** alignment and explict start address and offset. */ + + /* Check if the alignment for the segment from the linker + ** config is a multiple for that of the segment. + ** If START or OFFSET is provided instead of ALIGN, check + ** if its address fits alignment requirements. + */ + unsigned long AlignedBy = (S->Flags & SF_START) ? S->Addr + : (S->Flags & SF_OFFSET) ? (S->Addr + M->Start) + : S->RunAlignment; + if ((AlignedBy % S->Seg->Alignment) != 0) { + /* Segment requires another alignment than configured + ** in the linker. + */ + CfgWarning (GetSourcePos (S->LI), + "Segment '%s' isn't aligned properly; the" + " resulting executable might not be functional.", + GetString (S->Name)); + } + if (S->Flags & SF_ALIGN) { /* Align the address */ unsigned long NewAddr = AlignAddr (Addr, S->RunAlignment); @@ -1865,8 +2002,8 @@ unsigned CfgProcess (void) */ if (M->FillLevel == 0 && NewAddr > Addr) { CfgWarning (GetSourcePos (S->LI), - "First segment in memory area `%s' does " - "already need fill bytes for alignment", + "The first segment in memory area '%s' " + "needs fill bytes for alignment.", GetString (M->Name)); } @@ -1882,22 +2019,33 @@ unsigned CfgProcess (void) /* An offset was given, no address, make an address */ NewAddr += M->Start; } - if (NewAddr < Addr) { - /* Offset already too large */ - ++Overflows; - if (S->Flags & SF_OFFSET) { - CfgWarning (GetSourcePos (S->LI), - "Segment `%s' offset is too small in `%s' by %lu byte%c", - GetString (S->Name), GetString (M->Name), - Addr - NewAddr, (Addr - NewAddr == 1) ? ' ' : 's'); + + if (S->Flags & SF_OVERWRITE) { + if (NewAddr < M->Start) { + CfgError (GetSourcePos (S->LI), + "Segment '%s' begins before memory area '%s'", + GetString (S->Name), GetString (M->Name)); } else { - CfgWarning (GetSourcePos (S->LI), - "Segment `%s' start address is too low in `%s' by %lu byte%c", - GetString (S->Name), GetString (M->Name), - Addr - NewAddr, (Addr - NewAddr == 1) ? ' ' : 's'); + Addr = NewAddr; } } else { - Addr = NewAddr; + if (NewAddr < Addr) { + /* Offset already too large */ + ++Overflows; + if (S->Flags & SF_OFFSET) { + CfgWarning (GetSourcePos (S->LI), + "Segment '%s' offset is too small in '%s' by %lu byte%c", + GetString (S->Name), GetString (M->Name), + Addr - NewAddr, (Addr - NewAddr == 1) ? ' ' : 's'); + } else { + CfgWarning (GetSourcePos (S->LI), + "Segment '%s' start address is too low in '%s' by %lu byte%c", + GetString (S->Name), GetString (M->Name), + Addr - NewAddr, (Addr - NewAddr == 1) ? ' ' : 's'); + } + } else { + Addr = NewAddr; + } } } @@ -1938,7 +2086,7 @@ unsigned CfgProcess (void) ++Overflows; M->Flags |= MF_OVERFLOW; CfgWarning (GetSourcePos (M->LI), - "Segment `%s' overflows memory area `%s' by %lu byte%c", + "Segment '%s' overflows memory area '%s' by %lu byte%c", GetString (S->Name), GetString (M->Name), M->FillLevel - M->Size, (M->FillLevel - M->Size == 1) ? ' ' : 's'); } @@ -1959,10 +2107,12 @@ unsigned CfgProcess (void) Addr += S->Seg->Size; /* If this segment will go out to the file, or its place - ** in the file will be filled, then increase the file size. + ** in the file will be filled, then increase the file size, + ** unless it's an OVERWRITE segment. */ if (S->Load == M && - ((S->Flags & SF_BSS) == 0 || (M->Flags & MF_FILL) != 0)) { + ((S->Flags & SF_BSS) == 0 || (M->Flags & MF_FILL) != 0) && + (S->Flags & SF_OVERWRITE) == 0) { M->F->Size += Addr - StartAddr; } } @@ -2044,6 +2194,10 @@ void CfgWriteTarget (void) O65WriteTarget (O65FmtDesc, F); break; + case BINFMT_ATARIEXE: + XexWriteTarget (XexFmtDesc, F); + break; + default: Internal ("Invalid binary format: %u", F->Format); @@ -2063,7 +2217,7 @@ void CfgWriteTarget (void) MemoryArea* M = CollAtUnchecked (&F->MemoryAreas, J); /* Debugging */ - Print (stdout, 2, "Skipping `%s'...\n", GetString (M->Name)); + Print (stdout, 2, "Skipping '%s'...\n", GetString (M->Name)); /* Walk throught the segments */ for (K = 0; K < CollCount (&M->SegList); ++K) { diff --git a/src/ld65/config.h b/src/ld65/config.h index 6a36af6cc..d97675b21 100644 --- a/src/ld65/config.h +++ b/src/ld65/config.h @@ -96,6 +96,7 @@ struct SegDesc { #define SF_RUN_DEF 0x0200 /* RUN symbols already defined */ #define SF_LOAD_DEF 0x0400 /* LOAD symbols already defined */ #define SF_FILLVAL 0x0800 /* Segment has separate fill value */ +#define SF_OVERWRITE 0x1000 /* Segment can overwrite (part of) another one */ diff --git a/src/ld65/dbgfile.c b/src/ld65/dbgfile.c index 386706f66..204aff9d8 100644 --- a/src/ld65/dbgfile.c +++ b/src/ld65/dbgfile.c @@ -107,7 +107,7 @@ void CreateDbgFile (void) /* Open the debug info file */ FILE* F = fopen (DbgFileName, "w"); if (F == 0) { - Error ("Cannot create debug file `%s': %s", DbgFileName, strerror (errno)); + Error ("Cannot create debug file '%s': %s", DbgFileName, strerror (errno)); } /* Output version information */ @@ -166,6 +166,6 @@ void CreateDbgFile (void) /* Close the file */ if (fclose (F) != 0) { - Error ("Error closing debug file `%s': %s", DbgFileName, strerror (errno)); + Error ("Error closing debug file '%s': %s", DbgFileName, strerror (errno)); } } diff --git a/src/ld65/dbgfile.h b/src/ld65/dbgfile.h index b8e1a534f..cabb60f8a 100644 --- a/src/ld65/dbgfile.h +++ b/src/ld65/dbgfile.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/ld65/error.h b/src/ld65/error.h index b49d8919c..75b8e0bc1 100644 --- a/src/ld65/error.h +++ b/src/ld65/error.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/ld65/exports.c b/src/ld65/exports.c index e7ef3d413..9149f54d1 100644 --- a/src/ld65/exports.c +++ b/src/ld65/exports.c @@ -166,13 +166,13 @@ Import* ReadImport (FILE* F, ObjData* Obj) */ if (ObjHasFiles (I->Obj)) { const LineInfo* LI = GetImportPos (I); - Error ("Invalid import size in for `%s', imported from %s(%u): 0x%02X", + Error ("Invalid import size in for '%s', imported from %s:%u: 0x%02X", GetString (I->Name), GetSourceName (LI), GetSourceLine (LI), I->AddrSize); } else { - Error ("Invalid import size in for `%s', imported from %s: 0x%02X", + Error ("Invalid import size in for '%s', imported from %s: 0x%02X", GetString (I->Name), GetObjFileName (I->Obj), I->AddrSize); @@ -199,7 +199,7 @@ Import* GenImport (unsigned Name, unsigned char AddrSize) /* We have no object file information and no line info for a new ** import */ - Error ("Invalid import size 0x%02X for symbol `%s'", + Error ("Invalid import size 0x%02X for symbol '%s'", I->AddrSize, GetString (I->Name)); } @@ -481,10 +481,10 @@ void InsertExport (Export* E) Imp->Exp = E; Imp = Imp->Next; } - } else { - /* Duplicate entry, ignore it */ - Warning ("Duplicate external identifier: `%s'", - GetString (L->Name)); + } else if (AllowMultDef == 0) { + /* Duplicate entry, this is fatal unless allowed by the user */ + Error ("Duplicate external identifier: '%s'", + GetString (L->Name)); } return; } @@ -662,7 +662,7 @@ long GetExportVal (const Export* E) { if (E->Expr == 0) { /* OOPS */ - Internal ("`%s' is an undefined external", GetString (E->Name)); + Internal ("'%s' is an undefined external", GetString (E->Name)); } return GetExprVal (E->Expr); } @@ -690,18 +690,23 @@ static void CheckSymType (const Export* E) */ if (E->Obj) { /* The export comes from an object file */ - SB_Printf (&ExportLoc, "%s, %s(%u)", + SB_Printf (&ExportLoc, "%s, %s:%u", GetString (E->Obj->Name), GetSourceName (ExportLI), GetSourceLine (ExportLI)); - } else { - SB_Printf (&ExportLoc, "%s(%u)", + } else if (ExportLI) { + SB_Printf (&ExportLoc, "%s:%u", GetSourceName (ExportLI), GetSourceLine (ExportLI)); + } else { + /* The export is linker generated and we don't have line + ** information (likely from command line define) + */ + SB_Printf (&ExportLoc, "%s", GetObjFileName (E->Obj)); } if (I->Obj) { /* The import comes from an object file */ - SB_Printf (&ImportLoc, "%s, %s(%u)", + SB_Printf (&ImportLoc, "%s, %s:%u", GetString (I->Obj->Name), GetSourceName (ImportLI), GetSourceLine (ImportLI)); @@ -709,7 +714,7 @@ static void CheckSymType (const Export* E) /* The import is linker generated and we have line ** information */ - SB_Printf (&ImportLoc, "%s(%u)", + SB_Printf (&ImportLoc, "%s:%u", GetSourceName (ImportLI), GetSourceLine (ImportLI)); } else { @@ -720,9 +725,9 @@ static void CheckSymType (const Export* E) } /* Output the diagnostic */ - Warning ("Address size mismatch for `%s': " - "Exported from %s as `%s', " - "import in %s as `%s'", + Warning ("Address size mismatch for '%s': " + "Exported from %s as '%s', " + "import in %s as '%s'", GetString (E->Name), SB_GetConstBuf (&ExportLoc), ExpAddrSize, @@ -769,17 +774,22 @@ static void PrintUnresolved (ExpCheckFunc F, void* Data) if (E->Expr == 0 && E->ImpCount > 0 && F (E->Name, Data) == 0) { /* Unresolved external */ Import* Imp = E->ImpList; - fprintf (stderr, - "Unresolved external `%s' referenced in:\n", - GetString (E->Name)); + const char* name = GetString (E->Name); while (Imp) { - unsigned J; - for (J = 0; J < CollCount (&Imp->RefLines); ++J) { - const LineInfo* LI = CollConstAt (&Imp->RefLines, J); - fprintf (stderr, - " %s(%u)\n", - GetSourceName (LI), - GetSourceLine (LI)); + unsigned J, count = CollCount (&Imp->RefLines); + /* The count is 0 when the import was not added by an input file, + but by the compiler itself. */ + if (count == 0) { + fprintf (stderr, "Error: Unresolved external '%s'\n", name); + } else { + for (J = 0; J < count; ++J) { + const LineInfo* LI = CollConstAt (&Imp->RefLines, J); + fprintf (stderr, + "%s:%u: Error: Unresolved external '%s'\n", + GetSourceName (LI), + GetSourceLine (LI), + name); + } } Imp = Imp->Next; } @@ -991,7 +1001,7 @@ void PrintImportMap (FILE* F) const LineInfo* LI = GetImportPos (Imp); if (LI) { fprintf (F, - " %-25s %s(%u)\n", + " %-25s %s:%u\n", GetObjFileName (Imp->Obj), GetSourceName (LI), GetSourceLine (LI)); @@ -1053,7 +1063,7 @@ void CircularRefError (const Export* E) /* Print an error about a circular reference using to define the given export */ { const LineInfo* LI = GetExportPos (E); - Error ("Circular reference for symbol `%s', %s(%u)", + Error ("Circular reference for symbol '%s', %s:%u", GetString (E->Name), GetSourceName (LI), GetSourceLine (LI)); diff --git a/src/ld65/expr.c b/src/ld65/expr.c index efdff899e..ff210e315 100644 --- a/src/ld65/expr.c +++ b/src/ld65/expr.c @@ -321,20 +321,18 @@ long GetExprVal (ExprNode* Expr) return GetExprVal (Expr->Left) * GetExprVal (Expr->Right); case EXPR_DIV: - Left = GetExprVal (Expr->Left); Right = GetExprVal (Expr->Right); if (Right == 0) { Error ("Division by zero"); } - return Left / Right; + return GetExprVal (Expr->Left) / Right; case EXPR_MOD: - Left = GetExprVal (Expr->Left); Right = GetExprVal (Expr->Right); if (Right == 0) { Error ("Modulo operation with zero"); } - return Left % Right; + return GetExprVal (Expr->Left) % Right; case EXPR_OR: return GetExprVal (Expr->Left) | GetExprVal (Expr->Right); @@ -403,17 +401,20 @@ long GetExprVal (ExprNode* Expr) case EXPR_BANK: GetSegExprVal (Expr->Left, &D); - if (D.TooComplex || D.Seg == 0) { - Error ("Argument for .BANK is not segment relative or too complex"); + if (D.TooComplex) { + Error ("Argument of .BANK() is too complex"); + } + if (D.Seg == 0) { + Error ("Argument of .BANK() isn't a label attached to a segment"); } if (D.Seg->MemArea == 0) { - Error ("Segment `%s' is referenced by .BANK but " - "not assigned to a memory area", + Error ("Segment '%s' is referenced by .BANK()," + " but not assigned to a memory area", GetString (D.Seg->Name)); } if (D.Seg->MemArea->BankExpr == 0) { - Error ("Memory area `%s' is referenced by .BANK but " - "has no BANK attribute", + Error ("Memory area '%s' is referenced by .BANK()," + " but has no BANK attribute", GetString (D.Seg->MemArea->Name)); } return GetExprVal (D.Seg->MemArea->BankExpr); @@ -442,6 +443,10 @@ long GetExprVal (ExprNode* Expr) case EXPR_DWORD: return GetExprVal (Expr->Left) & 0xFFFFFFFF; + case EXPR_NEARADDR: + /* Assembler was expected to validate this truncation. */ + return GetExprVal (Expr->Left) & 0xFFFF; + default: Internal ("Unknown expression Op type: %u", Expr->Op); /* NOTREACHED */ @@ -453,13 +458,15 @@ long GetExprVal (ExprNode* Expr) static void GetSegExprValInternal (ExprNode* Expr, SegExprDesc* D, int Sign) /* Check if the given expression consists of a segment reference and only -** constant values, additions and subtractions. If anything else is found, +** constant values, additions, and subtractions. If anything else is found, ** set D->TooComplex to true. ** Internal, recursive routine. */ { Export* E; + CHECK (Expr != 0); + switch (Expr->Op) { case EXPR_LITERAL: @@ -475,7 +482,7 @@ static void GetSegExprValInternal (ExprNode* Expr, SegExprDesc* D, int Sign) */ if (ExportHasMark (E)) { CircularRefError (E); - } else { + } else if (E->Expr != 0) { MarkExport (E); GetSegExprValInternal (E->Expr, D, Sign); UnmarkExport (E); diff --git a/src/ld65/extsyms.c b/src/ld65/extsyms.c index b250125a7..cca10f3ad 100644 --- a/src/ld65/extsyms.c +++ b/src/ld65/extsyms.c @@ -89,7 +89,7 @@ ExtSym* NewExtSym (ExtSymTab* Tab, unsigned Name) ExtSym* E = GetExtSym (Tab, Name); if (E != 0) { /* We do already have a symbol with this name */ - Error ("Duplicate external symbol `%s'", GetString (Name)); + Error ("Duplicate external symbol '%s'", GetString (Name)); } /* Allocate memory for the structure */ diff --git a/src/ld65/filepath.c b/src/ld65/filepath.c index 17cd451de..1ceb2333e 100644 --- a/src/ld65/filepath.c +++ b/src/ld65/filepath.c @@ -89,17 +89,17 @@ void InitSearchPaths (void) /* Add some compiled-in search paths if defined at compile time. */ #if defined(LD65_LIB) && !defined(_WIN32) - AddSearchPath (LibDefaultPath, STRINGIZE (LD65_LIB)); + AddSearchPath (LibDefaultPath, LD65_LIB); #endif #if defined(LD65_OBJ) && !defined(_WIN32) - AddSearchPath (ObjDefaultPath, STRINGIZE (LD65_OBJ)); + AddSearchPath (ObjDefaultPath, LD65_OBJ); #endif #if defined(LD65_CFG) && !defined(_WIN32) - AddSearchPath (CfgDefaultPath, STRINGIZE (LD65_CFG)); + AddSearchPath (CfgDefaultPath, LD65_CFG); #endif /* Add paths relative to the parent directory of the Windows binary. */ - AddSubSearchPathFromWinBin (LibDefaultPath, "lib"); - AddSubSearchPathFromWinBin (ObjDefaultPath, "lib"); - AddSubSearchPathFromWinBin (CfgDefaultPath, "cfg"); + AddSubSearchPathFromBin (LibDefaultPath, "lib"); + AddSubSearchPathFromBin (ObjDefaultPath, "lib"); + AddSubSearchPathFromBin (CfgDefaultPath, "cfg"); } diff --git a/src/ld65/fragment.h b/src/ld65/fragment.h index 7d6dd9201..34eb5b695 100644 --- a/src/ld65/fragment.h +++ b/src/ld65/fragment.h @@ -100,7 +100,7 @@ INLINE const char* GetFragmentSourceName (const Fragment* F) #if defined(HAVE_INLINE) INLINE unsigned GetFragmentSourceLine (const Fragment* F) /* Return the source file line for this fragment */ -{ +{ return GetSourceLineFromList (&F->LineInfos); } #else diff --git a/src/ld65/global.c b/src/ld65/global.c index dc0c8d521..8f43232fe 100644 --- a/src/ld65/global.c +++ b/src/ld65/global.c @@ -52,7 +52,10 @@ unsigned ModuleId = 0; /* Id for o65 module */ unsigned char HaveStartAddr = 0; /* Start address not given */ unsigned long StartAddr = 0x200; /* Start address */ -unsigned char VerboseMap = 0; /* Verbose map file */ +unsigned char VerboseMap = 0; /* Verbose map file */ +unsigned char AllowMultDef = 0; /* Allow multiple definitions */ +unsigned char LargeAlignment = 0; /* Don't warn about large alignments */ + const char* MapFileName = 0; /* Name of the map file */ const char* LabelFileName = 0; /* Name of the label file */ const char* DbgFileName = 0; /* Name of the debug file */ diff --git a/src/ld65/global.h b/src/ld65/global.h index 4b873f027..a923f6de5 100644 --- a/src/ld65/global.h +++ b/src/ld65/global.h @@ -53,6 +53,9 @@ extern unsigned char HaveStartAddr; /* True if start address was given */ extern unsigned long StartAddr; /* Start address */ extern unsigned char VerboseMap; /* Verbose map file */ +extern unsigned char AllowMultDef; /* Allow multiple definitions */ +extern unsigned char LargeAlignment; /* Don't warn about large alignments */ + extern const char* MapFileName; /* Name of the map file */ extern const char* LabelFileName; /* Name of the label file */ extern const char* DbgFileName; /* Name of the debug file */ diff --git a/src/ld65/library.c b/src/ld65/library.c index 0dadcfa67..dd964cff2 100644 --- a/src/ld65/library.c +++ b/src/ld65/library.c @@ -112,7 +112,7 @@ static void CloseLibrary (Library* L) { /* Close the library file */ if (fclose (L->F) != 0) { - Error ("Error closing `%s': %s", GetString (L->Name), strerror (errno)); + Error ("Error closing '%s': %s", GetString (L->Name), strerror (errno)); } L->F = 0; } @@ -144,7 +144,7 @@ static void LibSeek (Library* L, unsigned long Offs) /* Do a seek in the library checking for errors */ { if (fseek (L->F, Offs, SEEK_SET) != 0) { - Error ("Seek error in `%s' (%lu): %s", + Error ("Seek error in '%s' (%lu): %s", GetString (L->Name), Offs, strerror (errno)); } } @@ -158,7 +158,7 @@ static void LibReadHeader (Library* L) L->Header.Magic = LIB_MAGIC; L->Header.Version = Read16 (L->F); if (L->Header.Version != LIB_VERSION) { - Error ("Wrong data version in `%s'", GetString (L->Name)); + Error ("Wrong data version in '%s'", GetString (L->Name)); } L->Header.Flags = Read16 (L->F); L->Header.IndexOffs = Read32 (L->F); @@ -171,12 +171,12 @@ static void LibReadObjHeader (Library* L, ObjData* O) { O->Header.Magic = Read32 (L->F); if (O->Header.Magic != OBJ_MAGIC) { - Error ("Object file `%s' in library `%s' is invalid", + Error ("Object file '%s' in library '%s' is invalid", GetObjFileName (O), GetString (L->Name)); } O->Header.Version = Read16 (L->F); if (O->Header.Version != OBJ_VERSION) { - Error ("Object file `%s' in library `%s' has wrong version", + Error ("Object file '%s' in library '%s' has wrong version", GetObjFileName (O), GetString (L->Name)); } O->Header.Flags = Read16 (L->F); diff --git a/src/ld65/lineinfo.c b/src/ld65/lineinfo.c index 25eca4fcd..d2c1de0f7 100644 --- a/src/ld65/lineinfo.c +++ b/src/ld65/lineinfo.c @@ -162,7 +162,7 @@ void ReadLineInfoList (FILE* F, ObjData* O, Collection* LineInfos) ** therefore be part of the line infos read from the object file. */ if (LineInfoIndex >= CollCount (&O->LineInfos)) { - Internal ("Invalid line info index %u in module `%s' - max is %u", + Internal ("Invalid line info index %u in module '%s' - max is %u", LineInfoIndex, GetObjFileName (O), CollCount (&O->LineInfos)); diff --git a/src/ld65/main.c b/src/ld65/main.c index 95ed14396..f2415a914 100644 --- a/src/ld65/main.c +++ b/src/ld65/main.c @@ -123,28 +123,30 @@ static void Usage (void) " -m name\t\tCreate a map file\n" " -o name\t\tName the default output file\n" " -t sys\t\tSet the target system\n" - " -u sym\t\tForce an import of symbol `sym'\n" + " -u sym\t\tForce an import of symbol 'sym'\n" " -v\t\t\tVerbose mode\n" " -vm\t\t\tVerbose map file\n" "\n" "Long options:\n" - " --cfg-path path\tSpecify a config file search path\n" - " --config name\t\tUse linker config file\n" - " --dbgfile name\tGenerate debug information\n" - " --define sym=val\tDefine a symbol\n" - " --end-group\t\tEnd a library group\n" - " --force-import sym\tForce an import of symbol `sym'\n" - " --help\t\tHelp (this text)\n" - " --lib file\t\tLink this library\n" - " --lib-path path\tSpecify a library search path\n" - " --mapfile name\tCreate a map file\n" - " --module-id id\tSpecify a module id\n" - " --obj file\t\tLink this object file\n" - " --obj-path path\tSpecify an object file search path\n" - " --start-addr addr\tSet the default start address\n" - " --start-group\t\tStart a library group\n" - " --target sys\t\tSet the target system\n" - " --version\t\tPrint the linker version\n", + " --allow-multiple-definition\tAllow multiple definitions\n" + " --cfg-path path\t\tSpecify a config file search path\n" + " --config name\t\t\tUse linker config file\n" + " --dbgfile name\t\tGenerate debug information\n" + " --define sym=val\t\tDefine a symbol\n" + " --end-group\t\t\tEnd a library group\n" + " --force-import sym\t\tForce an import of symbol 'sym'\n" + " --help\t\t\tHelp (this text)\n" + " --large-alignment\t\tDon't warn about large alignments\n" + " --lib file\t\t\tLink this library\n" + " --lib-path path\t\tSpecify a library search path\n" + " --mapfile name\t\tCreate a map file\n" + " --module-id id\t\tSpecify a module id\n" + " --obj file\t\t\tLink this object file\n" + " --obj-path path\t\tSpecify an object file search path\n" + " --start-addr addr\t\tSet the default start address\n" + " --start-group\t\t\tStart a library group\n" + " --target sys\t\t\tSet the target system\n" + " --version\t\t\tPrint the linker version\n", ProgName); } @@ -214,13 +216,13 @@ static void LinkFile (const char* Name, FILETYPE Type) /* We must have a valid name now */ if (PathName == 0) { - Error ("Input file `%s' not found", Name); + Error ("Input file '%s' not found", Name); } /* Try to open the file */ F = fopen (PathName, "rb"); if (F == 0) { - Error ("Cannot open `%s': %s", PathName, strerror (errno)); + Error ("Cannot open '%s': %s", PathName, strerror (errno)); } /* Read the magic word */ @@ -246,7 +248,7 @@ static void LinkFile (const char* Name, FILETYPE Type) default: fclose (F); - Error ("File `%s' has unknown type", PathName); + Error ("File '%s' has unknown type", PathName); } @@ -322,7 +324,7 @@ static void OptConfig (const char* Opt attribute ((unused)), const char* Arg) PathName = SearchFile (CfgDefaultPath, Arg); } if (PathName == 0) { - Error ("Cannot find config file `%s'", Arg); + Error ("Cannot find config file '%s'", Arg); } /* Read the config */ @@ -376,7 +378,7 @@ static void OptForceImport (const char* Opt attribute ((unused)), const char* Ar /* Get the address size and check it */ unsigned char AddrSize = AddrSizeFromStr (ColPos+1); if (AddrSize == ADDR_SIZE_INVALID) { - Error ("Invalid address size `%s'", ColPos+1); + Error ("Invalid address size '%s'", ColPos+1); } /* Create a copy of the argument */ @@ -405,6 +407,14 @@ static void OptHelp (const char* Opt attribute ((unused)), +static void OptLargeAlignment (const char* Opt attribute ((unused)), + const char* Arg attribute ((unused))) +/* Don't warn about large alignments */ +{ + LargeAlignment = 1; +} + + static void OptLib (const char* Opt attribute ((unused)), const char* Arg) /* Link a library */ { @@ -509,7 +519,7 @@ static void OptTarget (const char* Opt attribute ((unused)), const char* Arg) /* Map the target name to a target id */ Target = FindTarget (Arg); if (Target == TGT_UNKNOWN) { - Error ("Invalid target name: `%s'", Arg); + Error ("Invalid target name: '%s'", Arg); } /* Set the target binary format */ @@ -526,7 +536,7 @@ static void OptTarget (const char* Opt attribute ((unused)), const char* Arg) PathName = SearchFile (CfgDefaultPath, SB_GetBuf (&FileName)); } if (PathName == 0) { - Error ("Cannot find config file `%s'", SB_GetBuf (&FileName)); + Error ("Cannot find config file '%s'", SB_GetBuf (&FileName)); } /* Free file name memory */ @@ -543,7 +553,17 @@ static void OptVersion (const char* Opt attribute ((unused)), const char* Arg attribute ((unused))) /* Print the assembler version */ { - fprintf (stderr, "ld65 V%s\n", GetVersionAsString ()); + fprintf (stderr, "%s V%s\n", ProgName, GetVersionAsString ()); + exit(EXIT_SUCCESS); +} + + + +static void OptMultDef (const char* Opt attribute ((unused)), + const char* Arg attribute ((unused))) +/* Set flag to allow multiple definitions of a global symbol */ +{ + AllowMultDef = 1; } @@ -598,23 +618,25 @@ static void ParseCommandLine(void) { /* Program long options */ static const LongOpt OptTab[] = { - { "--cfg-path", 1, OptCfgPath }, - { "--config", 1, CmdlOptConfig }, - { "--dbgfile", 1, OptDbgFile }, - { "--define", 1, OptDefine }, - { "--end-group", 0, CmdlOptEndGroup }, - { "--force-import", 1, OptForceImport }, - { "--help", 0, OptHelp }, - { "--lib", 1, OptLib }, - { "--lib-path", 1, OptLibPath }, - { "--mapfile", 1, OptMapFile }, - { "--module-id", 1, OptModuleId }, - { "--obj", 1, OptObj }, - { "--obj-path", 1, OptObjPath }, - { "--start-addr", 1, OptStartAddr }, - { "--start-group", 0, CmdlOptStartGroup }, - { "--target", 1, CmdlOptTarget }, - { "--version", 0, OptVersion }, + { "--allow-multiple-definition", 0, OptMultDef }, + { "--cfg-path", 1, OptCfgPath }, + { "--config", 1, CmdlOptConfig }, + { "--dbgfile", 1, OptDbgFile }, + { "--define", 1, OptDefine }, + { "--end-group", 0, CmdlOptEndGroup }, + { "--force-import", 1, OptForceImport }, + { "--help", 0, OptHelp }, + { "--large-alignment", 0, OptLargeAlignment }, + { "--lib", 1, OptLib }, + { "--lib-path", 1, OptLibPath }, + { "--mapfile", 1, OptMapFile }, + { "--module-id", 1, OptModuleId }, + { "--obj", 1, OptObj }, + { "--obj-path", 1, OptObjPath }, + { "--start-addr", 1, OptStartAddr }, + { "--start-group", 0, CmdlOptStartGroup }, + { "--target", 1, CmdlOptTarget }, + { "--version", 0, OptVersion }, }; unsigned I; diff --git a/src/ld65/mapfile.c b/src/ld65/mapfile.c index 0cf9b651b..10d65960e 100644 --- a/src/ld65/mapfile.c +++ b/src/ld65/mapfile.c @@ -67,7 +67,7 @@ void CreateMapFile (int ShortMap) /* Open the map file */ FILE* F = fopen (MapFileName, "w"); if (F == 0) { - Error ("Cannot create map file `%s': %s", MapFileName, strerror (errno)); + Error ("Cannot create map file '%s': %s", MapFileName, strerror (errno)); } /* Write a modules list */ @@ -93,7 +93,7 @@ void CreateMapFile (int ShortMap) ** requested */ if (VerboseMap || S->Size > 0) { - fprintf (F, + fprintf (F, " %-17s Offs=%06lX Size=%06lX " "Align=%05lX Fill=%04lX\n", GetString (S->Seg->Name), S->Offs, S->Size, @@ -132,7 +132,7 @@ void CreateMapFile (int ShortMap) /* Close the file */ if (fclose (F) != 0) { - Error ("Error closing map file `%s': %s", MapFileName, strerror (errno)); + Error ("Error closing map file '%s': %s", MapFileName, strerror (errno)); } } @@ -144,7 +144,7 @@ void CreateLabelFile (void) /* Open the label file */ FILE* F = fopen (LabelFileName, "w"); if (F == 0) { - Error ("Cannot create label file `%s': %s", LabelFileName, strerror (errno)); + Error ("Cannot create label file '%s': %s", LabelFileName, strerror (errno)); } /* Print the labels for the export symbols */ @@ -155,6 +155,6 @@ void CreateLabelFile (void) /* Close the file */ if (fclose (F) != 0) { - Error ("Error closing label file `%s': %s", LabelFileName, strerror (errno)); + Error ("Error closing label file '%s': %s", LabelFileName, strerror (errno)); } } diff --git a/src/ld65/o65.c b/src/ld65/o65.c index aceb5158a..5e10ae6f4 100644 --- a/src/ld65/o65.c +++ b/src/ld65/o65.c @@ -633,7 +633,8 @@ static unsigned O65WriteExpr (ExprNode* E, int Signed, unsigned Size, if (E->Op == EXPR_BYTE0 || E->Op == EXPR_BYTE1 || E->Op == EXPR_BYTE2 || E->Op == EXPR_BYTE3 || E->Op == EXPR_WORD0 || E->Op == EXPR_WORD1 || - E->Op == EXPR_FARADDR || E->Op == EXPR_DWORD) { + E->Op == EXPR_FARADDR || E->Op == EXPR_DWORD || + E->Op == EXPR_NEARADDR) { /* Use the real expression */ Expr = E->Left; } @@ -678,6 +679,7 @@ static unsigned O65WriteExpr (ExprNode* E, int Signed, unsigned Size, case EXPR_WORD1: BinVal = (BinVal >> 16) & 0xFFFF; break; case EXPR_FARADDR: BinVal &= 0xFFFFFFUL; break; case EXPR_DWORD: BinVal &= 0xFFFFFFFFUL; break; + case EXPR_NEARADDR: BinVal &= 0xFFFF; break; } WriteVal (D->F, BinVal, Size); @@ -784,7 +786,7 @@ static void O65WriteSeg (O65Desc* D, SegDesc** Seg, unsigned Count, int DoWrite) S = Seg [I]; /* Keep the user happy */ - Print (stdout, 1, " Writing `%s'\n", GetString (S->Name)); + Print (stdout, 1, " Writing '%s'\n", GetString (S->Name)); /* Write this segment */ if (DoWrite) { @@ -805,7 +807,7 @@ static void O65WriteSeg (O65Desc* D, SegDesc** Seg, unsigned Count, int DoWrite) /* Check the size of the segment for overflow */ if ((D->Header.Mode & MF_SIZE_MASK) == MF_SIZE_16BIT && D->SegSize > 0xFFFF) { - Error ("Segment overflow in file `%s'", D->Filename); + Error ("Segment overflow in file '%s'", D->Filename); } } @@ -940,7 +942,7 @@ static void O65WriteExports (O65Desc* D) */ Export* E = FindExport (NameIdx); if (E == 0 || IsUnresolvedExport (E)) { - Internal ("Unresolved export `%s' found in O65WriteExports", Name); + Internal ("Unresolved export '%s' found in O65WriteExports", Name); } /* Get the expression for the symbol */ @@ -958,7 +960,7 @@ static void O65WriteExports (O65Desc* D) /* Bail out if we cannot handle the expression */ if (ED.TooComplex) { - Error ("Expression for symbol `%s' is too complex", Name); + Error ("Expression for symbol '%s' is too complex", Name); } /* Determine the segment id for the expression */ @@ -977,7 +979,7 @@ static void O65WriteExports (O65Desc* D) /* For some reason, we didn't find this segment in the list of ** segments written to the o65 file. */ - Error ("Segment for symbol `%s' is undefined", Name); + Error ("Segment for symbol '%s' is undefined", Name); } SegmentID = O65SegType (Seg); @@ -1207,7 +1209,7 @@ void O65SetExport (O65Desc* D, unsigned Ident) */ Export* E = FindExport (Ident); if (E == 0 || IsUnresolvedExport (E)) { - Error ("Unresolved export: `%s'", GetString (Ident)); + Error ("Unresolved export: '%s'", GetString (Ident)); } /* Insert the entry into the table */ @@ -1370,11 +1372,11 @@ void O65WriteTarget (O65Desc* D, File* F) /* Open the file */ D->F = fopen (D->Filename, "wb"); if (D->F == 0) { - Error ("Cannot open `%s': %s", D->Filename, strerror (errno)); + Error ("Cannot open '%s': %s", D->Filename, strerror (errno)); } /* Keep the user happy */ - Print (stdout, 1, "Opened `%s'...\n", D->Filename); + Print (stdout, 1, "Opened '%s'...\n", D->Filename); /* Define some more options: A timestamp, the linker version and the ** filename @@ -1428,7 +1430,7 @@ void O65WriteTarget (O65Desc* D, File* F) /* Close the file */ if (fclose (D->F) != 0) { - Error ("Cannot write to `%s': %s", D->Filename, strerror (errno)); + Error ("Cannot write to '%s': %s", D->Filename, strerror (errno)); } /* Reset the file and filename */ diff --git a/src/ld65/o65.h b/src/ld65/o65.h index 2112537ff..68ed94ba7 100644 --- a/src/ld65/o65.h +++ b/src/ld65/o65.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1999-2005 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/ld65/objdata.c b/src/ld65/objdata.c index 7e83f9107..88a7bded4 100644 --- a/src/ld65/objdata.c +++ b/src/ld65/objdata.c @@ -184,7 +184,7 @@ unsigned MakeGlobalStringId (const ObjData* O, unsigned Index) /* Convert a local string id into a global one and return it. */ { if (Index >= O->StringCount) { - Error ("Invalid string index (%u) in module `%s'", + Error ("Invalid string index (%u) in module '%s'", Index, GetObjFileName (O)); } return O->Strings[Index]; @@ -214,7 +214,7 @@ struct Section* GetObjSection (const ObjData* O, unsigned Id) /* Get a section from an object file checking for a valid index */ { if (Id >= CollCount (&O->Sections)) { - Error ("Invalid section index (%u) in module `%s'", + Error ("Invalid section index (%u) in module '%s'", Id, GetObjFileName (O)); } return CollAtUnchecked (&O->Sections, Id); @@ -226,7 +226,7 @@ struct Import* GetObjImport (const ObjData* O, unsigned Id) /* Get an import from an object file checking for a valid index */ { if (Id >= CollCount (&O->Imports)) { - Error ("Invalid import index (%u) in module `%s'", + Error ("Invalid import index (%u) in module '%s'", Id, GetObjFileName (O)); } return CollAtUnchecked (&O->Imports, Id); @@ -238,7 +238,7 @@ struct Export* GetObjExport (const ObjData* O, unsigned Id) /* Get an export from an object file checking for a valid index */ { if (Id >= CollCount (&O->Exports)) { - Error ("Invalid export index (%u) in module `%s'", + Error ("Invalid export index (%u) in module '%s'", Id, GetObjFileName (O)); } return CollAtUnchecked (&O->Exports, Id); @@ -250,7 +250,7 @@ struct DbgSym* GetObjDbgSym (const ObjData* O, unsigned Id) /* Get a debug symbol from an object file checking for a valid index */ { if (Id >= CollCount (&O->DbgSyms)) { - Error ("Invalid debug symbol index (%u) in module `%s'", + Error ("Invalid debug symbol index (%u) in module '%s'", Id, GetObjFileName (O)); } return CollAtUnchecked (&O->DbgSyms, Id); @@ -262,7 +262,7 @@ struct Scope* GetObjScope (const ObjData* O, unsigned Id) /* Get a scope from an object file checking for a valid index */ { if (Id >= CollCount (&O->Scopes)) { - Error ("Invalid scope index (%u) in module `%s'", + Error ("Invalid scope index (%u) in module '%s'", Id, GetObjFileName (O)); } return CollAtUnchecked (&O->Scopes, Id); diff --git a/src/ld65/objfile.c b/src/ld65/objfile.c index 870ca5221..a44e3239a 100644 --- a/src/ld65/objfile.c +++ b/src/ld65/objfile.c @@ -67,7 +67,7 @@ static unsigned GetModule (const char* Name) /* Make a module name from the file name */ const char* Module = FindName (Name); if (*Module == 0) { - Error ("Cannot make module name from `%s'", Name); + Error ("Cannot make module name from '%s'", Name); } return GetStringId (Module); } @@ -79,7 +79,7 @@ static void ObjReadHeader (FILE* Obj, ObjHeader* H, const char* Name) { H->Version = Read16 (Obj); if (H->Version != OBJ_VERSION) { - Error ("Object file `%s' has wrong version, expected %08X, got %08X", + Error ("Object file '%s' has wrong version, expected %08X, got %08X", Name, OBJ_VERSION, H->Version); } H->Flags = Read16 (Obj); diff --git a/src/ld65/scanner.c b/src/ld65/scanner.c index 0f6ea58de..718951aa5 100644 --- a/src/ld65/scanner.c +++ b/src/ld65/scanner.c @@ -92,7 +92,7 @@ void CfgWarning (const FilePos* Pos, const char* Format, ...) SB_VPrintf (&Buf, Format, ap); va_end (ap); - Warning ("%s(%u): %s", + Warning ("%s:%u: %s", GetString (Pos->Name), Pos->Line, SB_GetConstBuf (&Buf)); SB_Done (&Buf); } @@ -109,7 +109,7 @@ void CfgError (const FilePos* Pos, const char* Format, ...) SB_VPrintf (&Buf, Format, ap); va_end (ap); - Error ("%s(%u): %s", + Error ("%s:%u: %s", GetString (Pos->Name), Pos->Line, SB_GetConstBuf (&Buf)); SB_Done (&Buf); } @@ -196,7 +196,7 @@ static void StrVal (void) default: CfgWarning (&CfgErrorPos, - "Unkown escape sequence `%%%c'", C); + "Unknown escape sequence '%%%c'", C); SB_AppendChar (&CfgSVal, '%'); SB_AppendChar (&CfgSVal, C); NextChar (); @@ -389,7 +389,7 @@ Again: break; default: - CfgError (&CfgErrorPos, "Invalid character `%c'", C); + CfgError (&CfgErrorPos, "Invalid character '%c'", C); } } @@ -410,7 +410,7 @@ void CfgConsume (cfgtok_t T, const char* Msg) void CfgConsumeSemi (void) /* Consume a semicolon */ { - CfgConsume (CFGTOK_SEMI, "`;' expected"); + CfgConsume (CFGTOK_SEMI, "';' expected"); } @@ -418,7 +418,7 @@ void CfgConsumeSemi (void) void CfgConsumeColon (void) /* Consume a colon */ { - CfgConsume (CFGTOK_COLON, "`:' expected"); + CfgConsume (CFGTOK_COLON, "':' expected"); } @@ -490,7 +490,6 @@ void CfgSpecialToken (const IdentTok* Table, unsigned Size, const char* Name) /* We need an identifier */ if (CfgTok == CFGTOK_IDENT) { - /* Make it upper case */ SB_ToUpper (&CfgSVal); @@ -502,9 +501,12 @@ void CfgSpecialToken (const IdentTok* Table, unsigned Size, const char* Name) } } + /* Not found */ + CfgError (&CfgErrorPos, "%s expected, got '%s'", Name, SB_GetConstBuf(&CfgSVal)); + return; } - /* Not found or no identifier */ + /* No identifier */ CfgError (&CfgErrorPos, "%s expected", Name); } @@ -556,7 +558,7 @@ void CfgOpenInput (void) /* Open the file */ InputFile = fopen (CfgName, "r"); if (InputFile == 0) { - Error ("Cannot open `%s': %s", CfgName, strerror (errno)); + Error ("Cannot open '%s': %s", CfgName, strerror (errno)); } /* Initialize variables */ diff --git a/src/ld65/scanner.h b/src/ld65/scanner.h index 006ccfceb..aeabbdca8 100644 --- a/src/ld65/scanner.h +++ b/src/ld65/scanner.h @@ -93,6 +93,8 @@ typedef enum { CFGTOK_ID, CFGTOK_VERSION, CFGTOK_FORMAT, + CFGTOK_RUNAD, + CFGTOK_INITAD, CFGTOK_LOAD, CFGTOK_RUN, @@ -105,7 +107,9 @@ typedef enum { CFGTOK_RW, CFGTOK_BSS, CFGTOK_ZP, + CFGTOK_OVERWRITE, + CFGTOK_ATARIEXE, CFGTOK_O65, CFGTOK_BIN, diff --git a/src/ld65/scopes.c b/src/ld65/scopes.c index edf0d0da2..cf40fac01 100644 --- a/src/ld65/scopes.c +++ b/src/ld65/scopes.c @@ -147,7 +147,7 @@ void PrintDbgScopes (FILE* F) case SCOPE_ENUM: fputs (",type=enum", F); break; default: - Error ("Module `%s': Unknown scope type %u", + Error ("Module '%s': Unknown scope type %u", GetObjFileName (O), S->Type); } diff --git a/src/ld65/segments.c b/src/ld65/segments.c index 9c3972ac5..10d2cda2c 100644 --- a/src/ld65/segments.c +++ b/src/ld65/segments.c @@ -144,7 +144,7 @@ Segment* GetSegment (unsigned Name, unsigned char AddrSize, const char* ObjName) if (ObjName == 0) { ObjName = "[linker generated]"; } - Error ("Module `%s': Type mismatch for segment `%s'", ObjName, + Error ("Module '%s': Type mismatch for segment '%s'", ObjName, GetString (Name)); } } @@ -210,7 +210,7 @@ Section* ReadSection (FILE* F, ObjData* O) /* Print some data */ Print (stdout, 2, - "Module `%s': Found segment `%s', size = %u, alignment = %lu, type = %u\n", + "Module '%s': Found segment '%s', size = %u, alignment = %lu, type = %u\n", GetObjFileName (O), GetString (Name), Size, Alignment, Type); /* Get the segment for this section */ @@ -226,13 +226,13 @@ Section* ReadSection (FILE* F, ObjData* O) if (Sec->Alignment > 1) { Alignment = LeastCommonMultiple (S->Alignment, Sec->Alignment); if (Alignment > MAX_ALIGNMENT) { - Error ("Combined alignment for segment `%s' is %lu which exceeds " - "%lu. Last module requiring alignment was `%s'.", + Error ("Combined alignment for segment '%s' is %lu which exceeds " + "%lu. Last module requiring alignment was '%s'.", GetString (Name), Alignment, MAX_ALIGNMENT, GetObjFileName (O)); - } else if (Alignment >= LARGE_ALIGNMENT) { - Warning ("Combined alignment for segment `%s' is suspiciously " - "large (%lu). Last module requiring alignment was `%s'.", + } else if (Alignment >= LARGE_ALIGNMENT && !LargeAlignment) { + Warning ("Combined alignment for segment '%s' is suspiciously " + "large (%lu). Last module requiring alignment was '%s'.", GetString (Name), Alignment, GetObjFileName (O)); } S->Alignment = Alignment; @@ -270,7 +270,7 @@ Section* ReadSection (FILE* F, ObjData* O) break; default: - Error ("Unknown fragment type in module `%s', segment `%s': %02X", + Error ("Unknown fragment type in module '%s', segment '%s': %02X", GetObjFileName (O), GetString (S->Name), Type); /* NOTREACHED */ return 0; @@ -502,19 +502,19 @@ void SegWrite (const char* TgtName, FILE* Tgt, Segment* S, SegWriteFunc F, void* break; case SEG_EXPR_RANGE_ERROR: - Error ("Range error in module `%s', line %u", + Error ("Range error in module '%s', line %u", GetFragmentSourceName (Frag), GetFragmentSourceLine (Frag)); break; case SEG_EXPR_TOO_COMPLEX: - Error ("Expression too complex in module `%s', line %u", + Error ("Expression too complex in module '%s', line %u", GetFragmentSourceName (Frag), GetFragmentSourceLine (Frag)); break; case SEG_EXPR_INVALID: - Error ("Invalid expression in module `%s', line %u", + Error ("Invalid expression in module '%s', line %u", GetFragmentSourceName (Frag), GetFragmentSourceLine (Frag)); break; @@ -657,7 +657,7 @@ void CheckSegments (void) /* Check it */ if (S->Size > 0 && S->Dumped == 0) { - Error ("Missing memory area assignment for segment `%s'", + Error ("Missing memory area assignment for segment '%s'", GetString (S->Name)); } } diff --git a/src/ld65/xex.c b/src/ld65/xex.c new file mode 100644 index 000000000..94f3920b5 --- /dev/null +++ b/src/ld65/xex.c @@ -0,0 +1,436 @@ +/*****************************************************************************/ +/* */ +/* xex.c */ +/* */ +/* Module to handle the Atari XEX binary format */ +/* */ +/* */ +/* */ +/* (C) 2018 Daniel Serpell */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#include <stdio.h> +#include <string.h> +#include <errno.h> + +/* common */ +#include "alignment.h" +#include "print.h" +#include "xmalloc.h" + +/* ld65 */ +#include "xex.h" +#include "config.h" +#include "exports.h" +#include "expr.h" +#include "error.h" +#include "global.h" +#include "fileio.h" +#include "lineinfo.h" +#include "memarea.h" +#include "segments.h" +#include "spool.h" + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + +/* Linked list of memory area initialization addresses */ +typedef struct XexInitAd { + MemoryArea *InitMem; + Import *InitAd; + struct XexInitAd *next; +} XexInitAd; + + +struct XexDesc { + unsigned Undef; /* Count of undefined externals */ + FILE* F; /* Output file */ + const char* Filename; /* Name of output file */ + Import* RunAd; /* Run Address */ + XexInitAd* InitAds; /* List of Init Addresses */ + unsigned long HeadPos; /* Position in the file of current header */ + unsigned long HeadEnd; /* End address of current header */ + unsigned long HeadSize; /* Last header size, can be removed if zero */ +}; + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +XexDesc* NewXexDesc (void) +/* Create a new XEX format descriptor */ +{ + /* Allocate memory for a new XexDesc struct */ + XexDesc* D = xmalloc (sizeof (XexDesc)); + + /* Initialize the fields */ + D->Undef = 0; + D->F = 0; + D->Filename = 0; + D->RunAd = 0; + D->InitAds = 0; + D->HeadPos = 0; + D->HeadEnd = 0; + D->HeadSize = 0; + + /* Return the created struct */ + return D; +} + + + +void FreeXexDesc (XexDesc* D) +/* Free a XEX format descriptor */ +{ + xfree (D); +} + + + +void XexSetRunAd (XexDesc* D, Import *RunAd) +/* Set the RUNAD export */ +{ + D->RunAd = RunAd; +} + +XexInitAd* XexSearchInitMem(XexDesc* D, MemoryArea *InitMem) +{ + XexInitAd* I; + for (I=D->InitAds; I != 0; I=I->next) + { + if (I->InitMem == InitMem) + return I; + } + return NULL; +} + + +int XexAddInitAd (XexDesc* D, MemoryArea *InitMem, Import *InitAd) +/* Sets and INITAD for the given memory area */ +{ + XexInitAd* I; + + /* Search for repeated entry */ + if (XexSearchInitMem (D, InitMem)) + return 1; + + I = xmalloc (sizeof (XexInitAd)); + I->InitAd = InitAd; + I->InitMem = InitMem; + I->next = D->InitAds; + D->InitAds = I; + return 0; +} + +static unsigned XexWriteExpr (ExprNode* E, int Signed, unsigned Size, + unsigned long Offs attribute ((unused)), + void* Data) +/* Called from SegWrite for an expression. Evaluate the expression, check the +** range and write the expression value to the file. +*/ +{ + /* There's a predefined function to handle constant expressions */ + return SegWriteConstExpr (((XexDesc*)Data)->F, E, Signed, Size); +} + + + +static void PrintNumVal (const char* Name, unsigned long V) +/* Print a numerical value for debugging */ +{ + Print (stdout, 2, " %s = 0x%lx\n", Name, V); +} + + + +static void XexStartSegment (XexDesc *D, unsigned long Addr, unsigned long Size) +{ + /* Skip segment without size */ + if (!Size) + return; + + /* Store current position */ + unsigned long Pos = ftell (D->F); + unsigned long End = Addr + Size - 1; + + /* See if last header can be expanded into this one */ + if (D->HeadPos && ((D->HeadEnd + 1) == Addr)) { + /* Expand current header */ + D->HeadEnd = End; + D->HeadSize += Size; + fseek (D->F, D->HeadPos + 2, SEEK_SET); + Write16 (D->F, End); + /* Seek to old position */ + fseek (D->F, Pos, SEEK_SET); + } + else + { + if (D->HeadSize == 0) { + /* Last header had no data, replace */ + Pos = D->HeadPos; + fseek (D->F, Pos, SEEK_SET); + } + + /* If we are at start of file, write XEX heder */ + if (Pos == 0) + Write16 (D->F, 0xFFFF); + + /* Writes a new segment header */ + D->HeadPos = ftell (D->F); + D->HeadEnd = End; + D->HeadSize = Size; + Write16 (D->F, Addr); + Write16 (D->F, End); + } +} + + + +static void XexFakeSegment (XexDesc *D, unsigned long Addr) +{ + /* See if last header can be expanded into this one, we are done */ + if (D->HeadPos && ((D->HeadEnd + 1) == Addr)) + return; + + /* If we are at start of file, write XEX heder */ + if (ftell (D->F) == 0) + Write16 (D->F, 0xFFFF); + + /* Writes a new (invalid) segment header */ + D->HeadPos = ftell (D->F); + D->HeadEnd = Addr - 1; + D->HeadSize = 0; + Write16 (D->F, Addr); + Write16 (D->F, D->HeadEnd); +} + + + +static unsigned long XexWriteMem (XexDesc* D, MemoryArea* M) +/* Write the segments of one memory area to a file */ +{ + unsigned I; + + /* Store initial position to get total file size */ + unsigned long StartPos = ftell (D->F); + + /* Get the start address and size of this memory area */ + unsigned long Addr = M->Start; + + /* Walk over all segments in this memory area */ + for (I = 0; I < CollCount (&M->SegList); ++I) { + + int DoWrite; + + /* Get the segment */ + SegDesc* S = CollAtUnchecked (&M->SegList, I); + + /* Keep the user happy */ + Print (stdout, 1, " ATARI EXE Writing `%s'\n", GetString (S->Name)); + + /* Writes do only occur in the load area and not for BSS segments */ + DoWrite = (S->Flags & SF_BSS) == 0 && /* No BSS segment */ + S->Load == M && /* LOAD segment */ + S->Seg->Dumped == 0; /* Not already written */ + + /* If this is the run memory area, we must apply run alignment. If + ** this is not the run memory area but the load memory area (which + ** means that both are different), we must apply load alignment. + ** Beware: DoWrite may be true even if this is the run memory area, + ** because it may be also the load memory area. + */ + if (S->Run == M) { + + /* Handle ALIGN and OFFSET/START */ + if (S->Flags & SF_ALIGN) { + /* Align the address */ + unsigned long NewAddr = AlignAddr (Addr, S->RunAlignment); + if (DoWrite || (M->Flags & MF_FILL) != 0) { + XexStartSegment (D, Addr, NewAddr - Addr); + WriteMult (D->F, M->FillVal, NewAddr - Addr); + PrintNumVal ("SF_ALIGN", NewAddr - Addr); + } + Addr = NewAddr; + } else if (S->Flags & (SF_OFFSET | SF_START)) { + unsigned long NewAddr = S->Addr; + if (S->Flags & SF_OFFSET) { + /* It's an offset, not a fixed address, make an address */ + NewAddr += M->Start; + } + if (DoWrite || (M->Flags & MF_FILL) != 0) { + /* "overwrite" segments are not supported */ + if (S->Flags & SF_OVERWRITE) { + Error ("ATARI file format does not support overwrite for segment '%s'.", + GetString (S->Name)); + } else { + XexStartSegment (D, Addr, NewAddr - Addr); + WriteMult (D->F, M->FillVal, NewAddr-Addr); + PrintNumVal ("SF_OFFSET", NewAddr - Addr); + } + } + Addr = NewAddr; + } + + } else if (S->Load == M) { + + /* Handle ALIGN_LOAD */ + if (S->Flags & SF_ALIGN_LOAD) { + /* Align the address */ + unsigned long NewAddr = AlignAddr (Addr, S->LoadAlignment); + if (DoWrite || (M->Flags & MF_FILL) != 0) { + XexStartSegment (D, Addr, NewAddr - Addr); + WriteMult (D->F, M->FillVal, NewAddr - Addr); + PrintNumVal ("SF_ALIGN_LOAD", NewAddr - Addr); + } + Addr = NewAddr; + } + + } + + /* Now write the segment to disk if it is not a BSS type segment and + ** if the memory area is the load area. + */ + if (DoWrite) { + /* Start a segment with only one byte, will fix later */ + XexFakeSegment (D, Addr); + unsigned long P = ftell (D->F); + SegWrite (D->Filename, D->F, S->Seg, XexWriteExpr, D); + unsigned long Size = ftell (D->F) - P; + /* Fix segment size */ + XexStartSegment (D, Addr, Size); + PrintNumVal ("Wrote", Size); + } else if (M->Flags & MF_FILL) { + XexStartSegment (D, Addr, S->Seg->Size); + WriteMult (D->F, S->Seg->FillVal, S->Seg->Size); + PrintNumVal ("Filled", (unsigned long) S->Seg->Size); + } + + /* If this was the load memory area, mark the segment as dumped */ + if (S->Load == M) { + S->Seg->Dumped = 1; + } + + /* Calculate the new address */ + Addr += S->Seg->Size; + } + + /* If a fill was requested, fill the remaining space */ + if ((M->Flags & MF_FILL) != 0 && M->FillLevel < M->Size) { + unsigned long ToFill = M->Size - M->FillLevel; + Print (stdout, 2, " Filling 0x%lx bytes with 0x%02x\n", + ToFill, M->FillVal); + XexStartSegment (D, Addr, ToFill); + WriteMult (D->F, M->FillVal, ToFill); + M->FillLevel = M->Size; + } + + /* If the last segment is empty, remove */ + if (D->HeadSize == 0 && D->HeadPos) { + fseek (D->F, D->HeadPos, SEEK_SET); + } + + return ftell (D->F) - StartPos; +} + + + +static int XexUnresolved (unsigned Name attribute ((unused)), void* D) +/* Called if an unresolved symbol is encountered */ +{ + /* Unresolved symbols are an error in XEX format. Bump the counter + ** and return zero telling the caller that the symbol is indeed + ** unresolved. + */ + ((XexDesc*) D)->Undef++; + return 0; +} + + + +void XexWriteTarget (XexDesc* D, struct File* F) +/* Write a XEX output file */ +{ + unsigned I; + + /* Place the filename in the control structure */ + D->Filename = GetString (F->Name); + + /* Check for unresolved symbols. The function XexUnresolved is called + ** if we get an unresolved symbol. + */ + D->Undef = 0; /* Reset the counter */ + CheckUnresolvedImports (XexUnresolved, D); + if (D->Undef > 0) { + /* We had unresolved symbols, cannot create output file */ + Error ("%u unresolved external(s) found - cannot create output file", D->Undef); + } + + /* Open the file */ + D->F = fopen (D->Filename, "wb"); + if (D->F == 0) { + Error ("Cannot open `%s': %s", D->Filename, strerror (errno)); + } + D->HeadPos = 0; + + /* Keep the user happy */ + Print (stdout, 1, "Opened `%s'...\n", D->Filename); + + /* Dump all memory areas */ + for (I = 0; I < CollCount (&F->MemoryAreas); ++I) { + /* Get this entry */ + MemoryArea* M = CollAtUnchecked (&F->MemoryAreas, I); + /* See if we have an init address for this area */ + XexInitAd* I = XexSearchInitMem (D, M); + Print (stdout, 1, " ATARI EXE Dumping `%s'\n", GetString (M->Name)); + if (XexWriteMem (D, M) && I) { + Write16 (D->F, 0x2E2); + Write16 (D->F, 0x2E3); + Write16 (D->F, GetExportVal (I->InitAd->Exp)); + /* Always write a new segment header after an INITAD segment */ + D->HeadPos = 0; + } + } + + /* Write RUNAD at file end */ + if (D->RunAd) { + Write16 (D->F, 0x2E0); + Write16 (D->F, 0x2E1); + Write16 (D->F, GetExportVal (D->RunAd->Exp)); + } + + /* Close the file */ + if (fclose (D->F) != 0) { + Error ("Cannot write to `%s': %s", D->Filename, strerror (errno)); + } + + /* Reset the file and filename */ + D->F = 0; + D->Filename = 0; +} diff --git a/src/ld65/xex.h b/src/ld65/xex.h new file mode 100644 index 000000000..2eb80de86 --- /dev/null +++ b/src/ld65/xex.h @@ -0,0 +1,77 @@ +/*****************************************************************************/ +/* */ +/* xex.h */ +/* */ +/* Module to handle the Atari EXE binary format */ +/* */ +/* */ +/* */ +/* (C) 2018 Daniel Serpell */ +/* */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + + + +#ifndef XEX_H +#define XEX_H + + + +#include "config.h" +#include "exports.h" + + + +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +/* Structure describing the format */ +typedef struct XexDesc XexDesc; + + + +/*****************************************************************************/ +/* Code */ +/*****************************************************************************/ + + + +XexDesc* NewXexDesc (void); +/* Create a new XEX format descriptor */ + +void FreeXexDesc (XexDesc* D); +/* Free a XEX format descriptor */ + +void XexWriteTarget (XexDesc* D, File* F); +/* Write a XEX output file */ + +void XexSetRunAd (XexDesc* D, Import *RunAd); +/* Set the RUNAD export */ + +int XexAddInitAd (XexDesc* D, MemoryArea *InitMem, Import *InitAd); +/* Sets and INITAD for the given memory area */ + +/* End of xex.h */ + +#endif diff --git a/src/msbuild.cmd b/src/msbuild.cmd new file mode 100644 index 000000000..2e1821f0a --- /dev/null +++ b/src/msbuild.cmd @@ -0,0 +1,18 @@ +@echo off + +if exist "C:\Program Files (x86)\Microsoft Visual Studio\2017\BuildTools\Common7\Tools\VsDevCmd.bat" goto vs2017 +if exist "C:\Program Files (x86)\Microsoft Visual Studio\2019\Community\Common7\Tools\VsDevCmd.bat" goto vs2019 + +echo Error: VsDevCmd.bat not found! +goto:eof + +:vs2017 +call "C:\Program Files (x86)\Microsoft Visual Studio\2017\BuildTools\Common7\Tools\VsDevCmd.bat" +goto run + +:vs2019 +call "C:\Program Files (x86)\Microsoft Visual Studio\2019\Community\Common7\Tools\VsDevCmd.bat" +goto run + +:run +msbuild.exe %* diff --git a/src/od65.vcxproj b/src/od65.vcxproj index c788ac961..1a1527067 100644 --- a/src/od65.vcxproj +++ b/src/od65.vcxproj @@ -1,5 +1,5 @@ <?xml version="1.0" encoding="utf-8"?> -<Project DefaultTargets="Build" ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> +<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <ItemGroup Label="ProjectConfigurations"> <ProjectConfiguration Include="Debug|Win32"> <Configuration>Debug</Configuration> @@ -13,65 +13,39 @@ <PropertyGroup Label="Globals"> <ProjectGuid>{FF8576C2-1253-44FE-A51B-D9AE35F3CEAD}</ProjectGuid> <Keyword>Win32Proj</Keyword> - <RootNamespace>od65</RootNamespace> </PropertyGroup> + <ImportGroup Label="PropertySheets"> + <Import Project="cc65.props" /> + </ImportGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> <UseDebugLibraries>true</UseDebugLibraries> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> <UseDebugLibraries>false</UseDebugLibraries> - <WholeProgramOptimization>true</WholeProgramOptimization> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> <ImportGroup Label="ExtensionSettings"> </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> <PropertyGroup Label="UserMacros" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <LinkIncremental>true</LinkIncremental> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> <ClCompile> - <PrecompiledHeader> - </PrecompiledHeader> - <WarningLevel>Level3</WarningLevel> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;_DEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;_DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>true</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> <ClCompile> - <WarningLevel>Level3</WarningLevel> - <PrecompiledHeader> - </PrecompiledHeader> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;NDEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>false</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemGroup> diff --git a/src/od65/dump.c b/src/od65/dump.c index 2f538fe1d..1a8c4dbb1 100644 --- a/src/od65/dump.c +++ b/src/od65/dump.c @@ -933,7 +933,7 @@ void DumpObjSegSize (FILE* F, unsigned long Offset) unsigned Len = strlen (Name); /* Skip segment flags, read size */ - (void) ReadVar (F); + (void) ReadVar (F); Size = ReadVar (F); /* Skip alignment, type and fragment count */ diff --git a/src/od65/error.h b/src/od65/error.h index 8e1469a34..8a3ac0652 100644 --- a/src/od65/error.h +++ b/src/od65/error.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/od65/fileio.c b/src/od65/fileio.c index a8d31c730..1689c4734 100644 --- a/src/od65/fileio.c +++ b/src/od65/fileio.c @@ -53,7 +53,7 @@ void FileSetPos (FILE* F, unsigned long Pos) /* Seek to the given absolute position, fail on errors */ -{ +{ if (fseek (F, Pos, SEEK_SET) != 0) { Error ("Cannot seek: %s", strerror (errno)); } diff --git a/src/od65/fileio.h b/src/od65/fileio.h index 068c4d9a3..af5559f6b 100644 --- a/src/od65/fileio.h +++ b/src/od65/fileio.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 1998-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ diff --git a/src/od65/main.c b/src/od65/main.c index 802290ffd..ce71608ed 100644 --- a/src/od65/main.c +++ b/src/od65/main.c @@ -209,6 +209,7 @@ static void OptVersion (const char* Opt attribute ((unused)), /* Print the assembler version */ { fprintf (stderr, "%s V%s\n", ProgName, GetVersionAsString ()); + exit(EXIT_SUCCESS); } @@ -221,7 +222,7 @@ static void DumpFile (const char* Name) /* Try to open the file */ FILE* F = fopen (Name, "rb"); if (F == 0) { - Error ("Cannot open `%s': %s", Name, strerror (errno)); + Error ("Cannot open '%s': %s", Name, strerror (errno)); } /* Read the magic word */ diff --git a/src/sim65.vcxproj b/src/sim65.vcxproj index f87b4db6b..97fc3855a 100644 --- a/src/sim65.vcxproj +++ b/src/sim65.vcxproj @@ -1,5 +1,5 @@ <?xml version="1.0" encoding="utf-8"?> -<Project DefaultTargets="Build" ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> +<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <ItemGroup Label="ProjectConfigurations"> <ProjectConfiguration Include="Debug|Win32"> <Configuration>Debug</Configuration> @@ -13,66 +13,39 @@ <PropertyGroup Label="Globals"> <ProjectGuid>{002A366E-2863-46A8-BDDE-DDF534AAEC73}</ProjectGuid> <Keyword>Win32Proj</Keyword> - <RootNamespace>sim65</RootNamespace> </PropertyGroup> + <ImportGroup Label="PropertySheets"> + <Import Project="cc65.props" /> + </ImportGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> <UseDebugLibraries>true</UseDebugLibraries> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> <UseDebugLibraries>false</UseDebugLibraries> - <WholeProgramOptimization>true</WholeProgramOptimization> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> <ImportGroup Label="ExtensionSettings"> </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> <PropertyGroup Label="UserMacros" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <LinkIncremental>true</LinkIncremental> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <LinkIncremental>false</LinkIncremental> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> <ClCompile> - <PrecompiledHeader> - </PrecompiledHeader> - <WarningLevel>Level3</WarningLevel> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;_DEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;_DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>true</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> <ClCompile> - <WarningLevel>Level3</WarningLevel> - <PrecompiledHeader> - </PrecompiledHeader> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;NDEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>false</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemGroup> diff --git a/src/sim65/6502.c b/src/sim65/6502.c index 312eb2fe1..6c23b0dfc 100644 --- a/src/sim65/6502.c +++ b/src/sim65/6502.c @@ -11,6 +11,7 @@ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ +/* Mar-2017, Christian Krueger, added support for 65SC02 */ /* */ /* This software is provided 'as-is', without any expressed or implied */ /* warranty. In no event will the authors be held liable for any damages */ @@ -31,7 +32,12 @@ /* */ /*****************************************************************************/ - +/* Known bugs and limitations of the 65C02 simulation: + * support currently only on the level of 65SC02: + BBRx, BBSx, RMBx, SMBx, WAI, and STP are unsupported + * BCD flag handling equals 6502 (unchecked if bug is simulated or wrong for + 6502) +*/ #include "memory.h" #include "error.h" @@ -67,6 +73,8 @@ static unsigned HaveNMIRequest; /* IRQ request active */ static unsigned HaveIRQRequest; +/* flag to print cycles at program termination */ +int PrintCycles; /*****************************************************************************/ @@ -75,12 +83,11 @@ static unsigned HaveIRQRequest; -/* Return the flags as a boolean value (0/1) */ +/* Return the flags as boolean values (0/1) */ #define GET_CF() ((Regs.SR & CF) != 0) #define GET_ZF() ((Regs.SR & ZF) != 0) #define GET_IF() ((Regs.SR & IF) != 0) #define GET_DF() ((Regs.SR & DF) != 0) -#define GET_BF() ((Regs.SR & BF) != 0) #define GET_OF() ((Regs.SR & OF) != 0) #define GET_SF() ((Regs.SR & SF) != 0) @@ -91,7 +98,6 @@ static unsigned HaveIRQRequest; #define SET_ZF(f) do { if (f) { Regs.SR |= ZF; } else { Regs.SR &= ~ZF; } } while (0) #define SET_IF(f) do { if (f) { Regs.SR |= IF; } else { Regs.SR &= ~IF; } } while (0) #define SET_DF(f) do { if (f) { Regs.SR |= DF; } else { Regs.SR &= ~DF; } } while (0) -#define SET_BF(f) do { if (f) { Regs.SR |= BF; } else { Regs.SR &= ~BF; } } while (0) #define SET_OF(f) do { if (f) { Regs.SR |= OF; } else { Regs.SR &= ~OF; } } while (0) #define SET_SF(f) do { if (f) { Regs.SR |= SF; } else { Regs.SR &= ~SF; } } while (0) @@ -107,8 +113,8 @@ static unsigned HaveIRQRequest; #define PCH ((Regs.PC >> 8) & 0xFF) /* Stack operations */ -#define PUSH(Val) MemWriteByte (0x0100 + Regs.SP--, Val) -#define POP() MemReadByte (0x0100 + ++Regs.SP) +#define PUSH(Val) MemWriteByte (0x0100 | (Regs.SP-- & 0xFF), Val) +#define POP() MemReadByte (0x0100 | (++Regs.SP & 0xFF)) /* Test for page cross */ #define PAGE_CROSS(addr,offs) ((((addr) & 0xFF) + offs) >= 0x100) @@ -203,7 +209,23 @@ static unsigned HaveIRQRequest; unsigned Addr; \ Cycles = 5; \ ZPAddr = MemReadByte (Regs.PC+1); \ - Addr = MemReadZPWord (ZPAddr) + Regs.YR; \ + Addr = MemReadZPWord (ZPAddr); \ + if (PAGE_CROSS (Addr, Regs.YR)) { \ + ++Cycles; \ + } \ + Addr += Regs.YR; \ + Regs.AC = Regs.AC op MemReadByte (Addr); \ + TEST_ZF (Regs.AC); \ + TEST_SF (Regs.AC); \ + Regs.PC += 2 + +/* (zp) */ +#define AC_OP_ZPIND(op) \ + unsigned char ZPAddr; \ + unsigned Addr; \ + Cycles = 5; \ + ZPAddr = MemReadByte (Regs.PC+1); \ + Addr = MemReadZPWord (ZPAddr); \ Regs.AC = Regs.AC op MemReadByte (Addr); \ TEST_ZF (Regs.AC); \ TEST_SF (Regs.AC); \ @@ -232,6 +254,9 @@ static unsigned HaveIRQRequest; } \ TEST_CF (Regs.AC); \ SET_OF ((res < -128) || (res > 127)); \ + if (CPU != CPU_6502) { \ + ++Cycles; \ + } \ } else { \ Regs.AC += rhs + GET_CF (); \ TEST_ZF (Regs.AC); \ @@ -311,6 +336,9 @@ static unsigned HaveIRQRequest; TEST_SF (res); \ SET_CF (res <= 0xFF); \ SET_OF (((old^rhs) & (old^res) & 0x80)); \ + if (CPU != CPU_6502) { \ + ++Cycles; \ + } \ } else { \ Regs.AC -= rhs + (!GET_CF ()); \ TEST_ZF (Regs.AC); \ @@ -342,11 +370,14 @@ static void OPC_6502_00 (void) { Cycles = 7; Regs.PC += 2; - SET_BF (1); PUSH (PCH); PUSH (PCL); PUSH (Regs.SR); SET_IF (1); + if (CPU != CPU_6502) + { + SET_DF (0); + } Regs.PC = MemReadWord (0xFFFE); } @@ -360,6 +391,21 @@ static void OPC_6502_01 (void) +static void OPC_65SC02_04 (void) +/* Opcode $04: TSB zp */ +{ + unsigned char ZPAddr; + unsigned char Val; + Cycles = 5; + ZPAddr = MemReadByte (Regs.PC+1); + Val = MemReadByte (ZPAddr); + SET_ZF ((Val & Regs.AC) == 0); + MemWriteByte (ZPAddr, (unsigned char)(Val | Regs.AC)); + Regs.PC += 2; +} + + + static void OPC_6502_05 (void) /* Opcode $05: ORA zp */ { @@ -375,7 +421,7 @@ static void OPC_6502_06 (void) unsigned Val; Cycles = 5; ZPAddr = MemReadByte (Regs.PC+1); - Val = MemReadByte (ZPAddr) << 1; + Val = MemReadByte (ZPAddr) << 1; MemWriteByte (ZPAddr, (unsigned char) Val); TEST_ZF (Val & 0xFF); TEST_SF (Val); @@ -389,7 +435,7 @@ static void OPC_6502_08 (void) /* Opcode $08: PHP */ { Cycles = 3; - PUSH (Regs.SR & ~BF); + PUSH (Regs.SR); Regs.PC += 1; } @@ -417,6 +463,21 @@ static void OPC_6502_0A (void) +static void OPC_65SC02_0C (void) +/* Opcode $0C: TSB abs */ +{ + unsigned Addr; + unsigned char Val; + Cycles = 6; + Addr = MemReadWord (Regs.PC+1); + Val = MemReadByte (Addr); + SET_ZF ((Val & Regs.AC) == 0); + MemWriteByte (Addr, (unsigned char) (Val | Regs.AC)); + Regs.PC += 3; +} + + + static void OPC_6502_0D (void) /* Opcode $0D: ORA abs */ { @@ -432,7 +493,7 @@ static void OPC_6502_0E (void) unsigned Val; Cycles = 6; Addr = MemReadWord (Regs.PC+1); - Val = MemReadByte (Addr) << 1; + Val = MemReadByte (Addr) << 1; MemWriteByte (Addr, (unsigned char) Val); TEST_ZF (Val & 0xFF); TEST_SF (Val); @@ -458,6 +519,29 @@ static void OPC_6502_11 (void) +static void OPC_65SC02_12 (void) +/* Opcode $12: ORA (zp) */ +{ + AC_OP_ZPIND (|); +} + + + +static void OPC_65SC02_14 (void) +/* Opcode $14: TRB zp */ +{ + unsigned char ZPAddr; + unsigned char Val; + Cycles = 5; + ZPAddr = MemReadByte (Regs.PC+1); + Val = MemReadByte (ZPAddr); + SET_ZF ((Val & Regs.AC) == 0); + MemWriteByte (ZPAddr, (unsigned char)(Val & ~Regs.AC)); + Regs.PC += 2; +} + + + static void OPC_6502_15 (void) /* Opcode $15: ORA zp,x */ { @@ -473,7 +557,7 @@ static void OPC_6502_16 (void) unsigned Val; Cycles = 6; ZPAddr = MemReadByte (Regs.PC+1) + Regs.XR; - Val = MemReadByte (ZPAddr) << 1; + Val = MemReadByte (ZPAddr) << 1; MemWriteByte (ZPAddr, (unsigned char) Val); TEST_ZF (Val & 0xFF); TEST_SF (Val); @@ -501,6 +585,33 @@ static void OPC_6502_19 (void) +static void OPC_65SC02_1A (void) +/* Opcode $1A: INC a */ +{ + Cycles = 2; + Regs.AC = (Regs.AC + 1) & 0xFF; + TEST_ZF (Regs.AC); + TEST_SF (Regs.AC); + Regs.PC += 1; +} + + + +static void OPC_65SC02_1C (void) +/* Opcode $1C: TRB abs */ +{ + unsigned Addr; + unsigned char Val; + Cycles = 6; + Addr = MemReadWord (Regs.PC+1); + Val = MemReadByte (Addr); + SET_ZF ((Val & Regs.AC) == 0); + MemWriteByte (Addr, (unsigned char) (Val & ~Regs.AC)); + Regs.PC += 3; +} + + + static void OPC_6502_1D (void) /* Opcode $1D: ORA abs,x */ { @@ -516,7 +627,9 @@ static void OPC_6502_1E (void) unsigned Val; Cycles = 7; Addr = MemReadWord (Regs.PC+1) + Regs.XR; - Val = MemReadByte (Addr) << 1; + if (CPU != CPU_6502 && !PAGE_CROSS (Addr, Regs.XR)) + --Cycles; + Val = MemReadByte (Addr) << 1; MemWriteByte (Addr, (unsigned char) Val); TEST_ZF (Val & 0xFF); TEST_SF (Val); @@ -531,7 +644,7 @@ static void OPC_6502_20 (void) { unsigned Addr; Cycles = 6; - Addr = MemReadWord (Regs.PC+1); + Addr = MemReadWord (Regs.PC+1); Regs.PC += 2; PUSH (PCH); PUSH (PCL); @@ -557,7 +670,7 @@ static void OPC_6502_24 (void) unsigned char Val; Cycles = 3; ZPAddr = MemReadByte (Regs.PC+1); - Val = MemReadByte (ZPAddr); + Val = MemReadByte (ZPAddr); SET_SF (Val & 0x80); SET_OF (Val & 0x40); SET_ZF ((Val & Regs.AC) == 0); @@ -581,7 +694,7 @@ static void OPC_6502_26 (void) unsigned Val; Cycles = 5; ZPAddr = MemReadByte (Regs.PC+1); - Val = MemReadByte (ZPAddr); + Val = MemReadByte (ZPAddr); ROL (Val); MemWriteByte (ZPAddr, Val); Regs.PC += 2; @@ -593,7 +706,9 @@ static void OPC_6502_28 (void) /* Opcode $28: PLP */ { Cycles = 4; - Regs.SR = (POP () & ~BF); + + /* Bits 5 and 4 aren't used, and always are 1! */ + Regs.SR = (POP () | 0x30); Regs.PC += 1; } @@ -624,8 +739,8 @@ static void OPC_6502_2C (void) unsigned Addr; unsigned char Val; Cycles = 4; - Addr = MemReadByte (Regs.PC+1); - Val = MemReadByte (Addr); + Addr = MemReadWord (Regs.PC+1); + Val = MemReadByte (Addr); SET_SF (Val & 0x80); SET_OF (Val & 0x40); SET_ZF ((Val & Regs.AC) == 0); @@ -649,7 +764,7 @@ static void OPC_6502_2E (void) unsigned Val; Cycles = 6; Addr = MemReadWord (Regs.PC+1); - Val = MemReadByte (Addr); + Val = MemReadByte (Addr); ROL (Val); MemWriteByte (Addr, Val); Regs.PC += 3; @@ -673,6 +788,30 @@ static void OPC_6502_31 (void) +static void OPC_65SC02_32 (void) +/* Opcode $32: AND (zp) */ +{ + AC_OP_ZPIND (&); +} + + + +static void OPC_65SC02_34 (void) +/* Opcode $34: BIT zp,x */ +{ + unsigned char ZPAddr; + unsigned char Val; + Cycles = 4; + ZPAddr = MemReadByte (Regs.PC+1) + Regs.XR; + Val = MemReadByte (ZPAddr); + SET_SF (Val & 0x80); + SET_OF (Val & 0x40); + SET_ZF ((Val & Regs.AC) == 0); + Regs.PC += 2; +} + + + static void OPC_6502_35 (void) /* Opcode $35: AND zp,x */ { @@ -688,7 +827,7 @@ static void OPC_6502_36 (void) unsigned Val; Cycles = 6; ZPAddr = MemReadByte (Regs.PC+1) + Regs.XR; - Val = MemReadByte (ZPAddr); + Val = MemReadByte (ZPAddr); ROL (Val); MemWriteByte (ZPAddr, Val); Regs.PC += 2; @@ -714,6 +853,36 @@ static void OPC_6502_39 (void) +static void OPC_65SC02_3A (void) +/* Opcode $3A: DEC a */ +{ + Cycles = 2; + Regs.AC = (Regs.AC - 1) & 0xFF; + TEST_ZF (Regs.AC); + TEST_SF (Regs.AC); + Regs.PC += 1; +} + + + +static void OPC_65SC02_3C (void) +/* Opcode $3C: BIT abs,x */ +{ + unsigned Addr; + unsigned char Val; + Cycles = 4; + Addr = MemReadWord (Regs.PC+1); + if (PAGE_CROSS (Addr, Regs.XR)) + ++Cycles; + Val = MemReadByte (Addr + Regs.XR); + SET_SF (Val & 0x80); + SET_OF (Val & 0x40); + SET_ZF ((Val & Regs.AC) == 0); + Regs.PC += 3; +} + + + static void OPC_6502_3D (void) /* Opcode $3D: AND abs,x */ { @@ -729,7 +898,9 @@ static void OPC_6502_3E (void) unsigned Val; Cycles = 7; Addr = MemReadWord (Regs.PC+1) + Regs.XR; - Val = MemReadByte (Addr); + if (CPU != CPU_6502 && !PAGE_CROSS (Addr, Regs.XR)) + --Cycles; + Val = MemReadByte (Addr); ROL (Val); MemWriteByte (Addr, Val); Regs.PC += 2; @@ -741,7 +912,9 @@ static void OPC_6502_40 (void) /* Opcode $40: RTI */ { Cycles = 6; - Regs.SR = POP (); + + /* Bits 5 and 4 aren't used, and always are 1! */ + Regs.SR = POP () | 0x30; Regs.PC = POP (); /* PCL */ Regs.PC |= (POP () << 8); /* PCH */ } @@ -756,6 +929,15 @@ static void OPC_6502_41 (void) +static void OPC_65C02_44 (void) +/* Opcode $44: 'zp' 3 cycle NOP */ +{ + Cycles = 3; + Regs.PC += 2; +} + + + static void OPC_6502_45 (void) /* Opcode $45: EOR zp */ { @@ -771,7 +953,7 @@ static void OPC_6502_46 (void) unsigned char Val; Cycles = 5; ZPAddr = MemReadByte (Regs.PC+1); - Val = MemReadByte (ZPAddr); + Val = MemReadByte (ZPAddr); SET_CF (Val & 0x01); Val >>= 1; MemWriteByte (ZPAddr, Val); @@ -839,7 +1021,7 @@ static void OPC_6502_4E (void) unsigned char Val; Cycles = 6; Addr = MemReadWord (Regs.PC+1); - Val = MemReadByte (Addr); + Val = MemReadByte (Addr); SET_CF (Val & 0x01); Val >>= 1; MemWriteByte (Addr, Val); @@ -866,6 +1048,14 @@ static void OPC_6502_51 (void) +static void OPC_65SC02_52 (void) +/* Opcode $52: EOR (zp) */ +{ + AC_OP_ZPIND (^); +} + + + static void OPC_6502_55 (void) /* Opcode $55: EOR zp,x */ { @@ -881,7 +1071,7 @@ static void OPC_6502_56 (void) unsigned char Val; Cycles = 6; ZPAddr = MemReadByte (Regs.PC+1) + Regs.XR; - Val = MemReadByte (ZPAddr); + Val = MemReadByte (ZPAddr); SET_CF (Val & 0x01); Val >>= 1; MemWriteByte (ZPAddr, Val); @@ -910,6 +1100,25 @@ static void OPC_6502_59 (void) +static void OPC_65SC02_5A (void) +/* Opcode $5A: PHY */ +{ + Cycles = 3; + PUSH (Regs.YR); + Regs.PC += 1; +} + + + +static void OPC_65C02_5C (void) +/* Opcode $5C: 'Absolute' 8 cycle NOP */ +{ + Cycles = 8; + Regs.PC += 3; +} + + + static void OPC_6502_5D (void) /* Opcode $5D: EOR abs,x */ { @@ -925,7 +1134,9 @@ static void OPC_6502_5E (void) unsigned char Val; Cycles = 7; Addr = MemReadWord (Regs.PC+1) + Regs.XR; - Val = MemReadByte (Addr); + if (CPU != CPU_6502 && !PAGE_CROSS (Addr, Regs.XR)) + --Cycles; + Val = MemReadByte (Addr); SET_CF (Val & 0x01); Val >>= 1; MemWriteByte (Addr, Val); @@ -954,13 +1165,25 @@ static void OPC_6502_61 (void) unsigned Addr; Cycles = 6; ZPAddr = MemReadByte (Regs.PC+1) + Regs.XR; - Addr = MemReadZPWord (ZPAddr); + Addr = MemReadZPWord (ZPAddr); ADC (MemReadByte (Addr)); Regs.PC += 2; } +static void OPC_65SC02_64 (void) +/* Opcode $64: STZ zp */ +{ + unsigned char ZPAddr; + Cycles = 3; + ZPAddr = MemReadByte (Regs.PC+1); + MemWriteByte (ZPAddr, 0); + Regs.PC += 2; +} + + + static void OPC_6502_65 (void) /* Opcode $65: ADC zp */ { @@ -980,7 +1203,7 @@ static void OPC_6502_66 (void) unsigned Val; Cycles = 5; ZPAddr = MemReadByte (Regs.PC+1); - Val = MemReadByte (ZPAddr); + Val = MemReadByte (ZPAddr); ROR (Val); MemWriteByte (ZPAddr, Val); Regs.PC += 2; @@ -1024,20 +1247,31 @@ static void OPC_6502_6C (void) /* Opcode $6C: JMP (ind) */ { unsigned PC, Lo, Hi; - Cycles = 5; PC = Regs.PC; Lo = MemReadWord (PC+1); - /* Emulate the 6502 bug */ - Regs.PC = MemReadByte (Lo); - Hi = (Lo & 0xFF00) | ((Lo + 1) & 0xFF); - Regs.PC |= (MemReadByte (Hi) << 8); + if (CPU == CPU_6502) + { + /* Emulate the 6502 bug */ + Cycles = 5; + Regs.PC = MemReadByte (Lo); + Hi = (Lo & 0xFF00) | ((Lo + 1) & 0xFF); + Regs.PC |= (MemReadByte (Hi) << 8); - /* Output a warning if the bug is triggered */ - if (Hi != Lo + 1) { - Warning ("6502 indirect jump bug triggered at $%04X, ind addr = $%04X", - PC, Lo); + /* Output a warning if the bug is triggered */ + if (Hi != Lo + 1) + { + Warning ("6502 indirect jump bug triggered at $%04X, ind addr = $%04X", + PC, Lo); + } } + else + { + Cycles = 6; + Regs.PC = MemReadWord(Lo); + } + + ParaVirtHooks (&Regs); } @@ -1048,6 +1282,8 @@ static void OPC_65C02_6C (void) /* 6502 bug fixed here */ Cycles = 5; Regs.PC = MemReadWord (MemReadWord (Regs.PC+1)); + + ParaVirtHooks (&Regs); } @@ -1104,6 +1340,32 @@ static void OPC_6502_71 (void) +static void OPC_65SC02_72 (void) +/* Opcode $72: ADC (zp) */ +{ + unsigned char ZPAddr; + unsigned Addr; + Cycles = 5; + ZPAddr = MemReadByte (Regs.PC+1); + Addr = MemReadZPWord (ZPAddr); + ADC (MemReadByte (Addr)); + Regs.PC += 2; +} + + + +static void OPC_65SC02_74 (void) +/* Opcode $74: STZ zp,x */ +{ + unsigned char ZPAddr; + Cycles = 4; + ZPAddr = MemReadByte (Regs.PC+1) + Regs.XR; + MemWriteByte (ZPAddr, 0); + Regs.PC += 2; +} + + + static void OPC_6502_75 (void) /* Opcode $75: ADC zp,x */ { @@ -1123,7 +1385,7 @@ static void OPC_6502_76 (void) unsigned Val; Cycles = 6; ZPAddr = MemReadByte (Regs.PC+1) + Regs.XR; - Val = MemReadByte (ZPAddr); + Val = MemReadByte (ZPAddr); ROR (Val); MemWriteByte (ZPAddr, Val); Regs.PC += 2; @@ -1146,7 +1408,7 @@ static void OPC_6502_79 (void) { unsigned Addr; Cycles = 4; - Addr = MemReadWord (Regs.PC+1); + Addr = MemReadWord (Regs.PC+1); if (PAGE_CROSS (Addr, Regs.YR)) { ++Cycles; } @@ -1156,12 +1418,38 @@ static void OPC_6502_79 (void) +static void OPC_65SC02_7A (void) +/* Opcode $7A: PLY */ +{ + Cycles = 4; + Regs.YR = POP (); + TEST_ZF (Regs.YR); + TEST_SF (Regs.YR); + Regs.PC += 1; +} + + + +static void OPC_65SC02_7C (void) +/* Opcode $7C: JMP (ind,X) */ +{ + unsigned PC, Adr; + Cycles = 6; + PC = Regs.PC; + Adr = MemReadWord (PC+1); + Regs.PC = MemReadWord(Adr+Regs.XR); + + ParaVirtHooks (&Regs); +} + + + static void OPC_6502_7D (void) /* Opcode $7D: ADC abs,x */ { unsigned Addr; Cycles = 4; - Addr = MemReadWord (Regs.PC+1); + Addr = MemReadWord (Regs.PC+1); if (PAGE_CROSS (Addr, Regs.XR)) { ++Cycles; } @@ -1177,8 +1465,10 @@ static void OPC_6502_7E (void) unsigned Addr; unsigned Val; Cycles = 7; - Addr = MemReadByte (Regs.PC+1) + Regs.XR; - Val = MemReadByte (Addr); + Addr = MemReadWord (Regs.PC+1) + Regs.XR; + if (CPU != CPU_6502 && !PAGE_CROSS (Addr, Regs.XR)) + --Cycles; + Val = MemReadByte (Addr); ROR (Val); MemWriteByte (Addr, Val); Regs.PC += 3; @@ -1186,6 +1476,14 @@ static void OPC_6502_7E (void) +static void OPC_65SC02_80 (void) +/* Opcode $80: BRA */ +{ + BRANCH (1); +} + + + static void OPC_6502_81 (void) /* Opcode $81: STA (zp,x) */ { @@ -1193,7 +1491,7 @@ static void OPC_6502_81 (void) unsigned Addr; Cycles = 6; ZPAddr = MemReadByte (Regs.PC+1) + Regs.XR; - Addr = MemReadZPWord (ZPAddr); + Addr = MemReadZPWord (ZPAddr); MemWriteByte (Addr, Regs.AC); Regs.PC += 2; } @@ -1248,6 +1546,20 @@ static void OPC_6502_88 (void) +static void OPC_65SC02_89 (void) +/* Opcode $89: BIT #imm */ +{ + unsigned char Val; + Cycles = 2; + Val = MemReadByte (Regs.PC+1); + SET_SF (Val & 0x80); + SET_OF (Val & 0x40); + SET_ZF ((Val & Regs.AC) == 0); + Regs.PC += 2; +} + + + static void OPC_6502_8A (void) /* Opcode $8A: TXA */ { @@ -1311,7 +1623,21 @@ static void OPC_6502_91 (void) unsigned Addr; Cycles = 6; ZPAddr = MemReadByte (Regs.PC+1); - Addr = MemReadZPWord (ZPAddr) + Regs.YR; + Addr = MemReadZPWord (ZPAddr) + Regs.YR; + MemWriteByte (Addr, Regs.AC); + Regs.PC += 2; +} + + + +static void OPC_65SC02_92 (void) +/* Opcode $92: sta (zp) */ +{ + unsigned char ZPAddr; + unsigned Addr; + Cycles = 5; + ZPAddr = MemReadByte (Regs.PC+1); + Addr = MemReadZPWord (ZPAddr); MemWriteByte (Addr, Regs.AC); Regs.PC += 2; } @@ -1371,7 +1697,7 @@ static void OPC_6502_99 (void) { unsigned Addr; Cycles = 5; - Addr = MemReadWord (Regs.PC+1) + Regs.YR; + Addr = MemReadWord (Regs.PC+1) + Regs.YR; MemWriteByte (Addr, Regs.AC); Regs.PC += 3; } @@ -1388,18 +1714,42 @@ static void OPC_6502_9A (void) +static void OPC_65SC02_9C (void) +/* Opcode $9C: STZ abs */ +{ + unsigned Addr; + Cycles = 4; + Addr = MemReadWord (Regs.PC+1); + MemWriteByte (Addr, 0); + Regs.PC += 3; +} + + + static void OPC_6502_9D (void) /* Opcode $9D: STA abs,x */ { unsigned Addr; Cycles = 5; - Addr = MemReadWord (Regs.PC+1) + Regs.XR; + Addr = MemReadWord (Regs.PC+1) + Regs.XR; MemWriteByte (Addr, Regs.AC); Regs.PC += 3; } +static void OPC_65SC02_9E (void) +/* Opcode $9E: STZ abs,x */ +{ + unsigned Addr; + Cycles = 5; + Addr = MemReadWord (Regs.PC+1) + Regs.XR; + MemWriteByte (Addr, 0); + Regs.PC += 3; +} + + + static void OPC_6502_A0 (void) /* Opcode $A0: LDY #imm */ { @@ -1523,7 +1873,7 @@ static void OPC_6502_AC (void) { unsigned Addr; Cycles = 4; - Addr = MemReadWord (Regs.PC+1); + Addr = MemReadWord (Regs.PC+1); Regs.YR = MemReadByte (Addr); TEST_ZF (Regs.YR); TEST_SF (Regs.YR); @@ -1537,7 +1887,7 @@ static void OPC_6502_AD (void) { unsigned Addr; Cycles = 4; - Addr = MemReadWord (Regs.PC+1); + Addr = MemReadWord (Regs.PC+1); Regs.AC = MemReadByte (Addr); TEST_ZF (Regs.AC); TEST_SF (Regs.AC); @@ -1551,7 +1901,7 @@ static void OPC_6502_AE (void) { unsigned Addr; Cycles = 4; - Addr = MemReadWord (Regs.PC+1); + Addr = MemReadWord (Regs.PC+1); Regs.XR = MemReadByte (Addr); TEST_ZF (Regs.XR); TEST_SF (Regs.XR); @@ -1575,7 +1925,7 @@ static void OPC_6502_B1 (void) unsigned Addr; Cycles = 5; ZPAddr = MemReadByte (Regs.PC+1); - Addr = MemReadZPWord (ZPAddr); + Addr = MemReadZPWord (ZPAddr); if (PAGE_CROSS (Addr, Regs.YR)) { ++Cycles; } @@ -1587,6 +1937,22 @@ static void OPC_6502_B1 (void) +static void OPC_65SC02_B2 (void) +/* Opcode $B2: LDA (zp) */ +{ + unsigned char ZPAddr; + unsigned Addr; + Cycles = 5; + ZPAddr = MemReadByte (Regs.PC+1); + Addr = MemReadZPWord (ZPAddr); + Regs.AC = MemReadByte (Addr); + TEST_ZF (Regs.AC); + TEST_SF (Regs.AC); + Regs.PC += 2; +} + + + static void OPC_6502_B4 (void) /* Opcode $B4: LDY zp,x */ { @@ -1660,7 +2026,7 @@ static void OPC_6502_BA (void) /* Opcode $BA: TSX */ { Cycles = 2; - Regs.XR = Regs.SP; + Regs.XR = Regs.SP & 0xFF; TEST_ZF (Regs.XR); TEST_SF (Regs.XR); Regs.PC += 1; @@ -1736,7 +2102,7 @@ static void OPC_6502_C1 (void) unsigned Addr; Cycles = 6; ZPAddr = MemReadByte (Regs.PC+1) + Regs.XR; - Addr = MemReadZPWord (ZPAddr); + Addr = MemReadZPWord (ZPAddr); CMP (Regs.AC, MemReadByte (Addr)); Regs.PC += 2; } @@ -1774,7 +2140,7 @@ static void OPC_6502_C6 (void) unsigned char Val; Cycles = 5; ZPAddr = MemReadByte (Regs.PC+1); - Val = MemReadByte (ZPAddr) - 1; + Val = MemReadByte (ZPAddr) - 1; MemWriteByte (ZPAddr, Val); TEST_ZF (Val); TEST_SF (Val); @@ -1822,7 +2188,7 @@ static void OPC_6502_CC (void) { unsigned Addr; Cycles = 4; - Addr = MemReadWord (Regs.PC+1); + Addr = MemReadWord (Regs.PC+1); CMP (Regs.YR, MemReadByte (Addr)); Regs.PC += 3; } @@ -1834,7 +2200,7 @@ static void OPC_6502_CD (void) { unsigned Addr; Cycles = 4; - Addr = MemReadWord (Regs.PC+1); + Addr = MemReadWord (Regs.PC+1); CMP (Regs.AC, MemReadByte (Addr)); Regs.PC += 3; } @@ -1872,7 +2238,7 @@ static void OPC_6502_D1 (void) unsigned Addr; Cycles = 5; ZPAddr = MemReadByte (Regs.PC+1); - Addr = MemReadWord (ZPAddr); + Addr = MemReadWord (ZPAddr); if (PAGE_CROSS (Addr, Regs.YR)) { ++Cycles; } @@ -1882,6 +2248,20 @@ static void OPC_6502_D1 (void) +static void OPC_65SC02_D2 (void) +/* Opcode $D2: CMP (zp) */ +{ + unsigned ZPAddr; + unsigned Addr; + Cycles = 5; + ZPAddr = MemReadByte (Regs.PC+1); + Addr = MemReadWord (ZPAddr); + CMP (Regs.AC, MemReadByte (Addr)); + Regs.PC += 2; +} + + + static void OPC_6502_D5 (void) /* Opcode $D5: CMP zp,x */ { @@ -1935,6 +2315,16 @@ static void OPC_6502_D9 (void) +static void OPC_65SC02_DA (void) +/* Opcode $DA: PHX */ +{ + Cycles = 3; + PUSH (Regs.XR); + Regs.PC += 1; +} + + + static void OPC_6502_DD (void) /* Opcode $DD: CMP abs,x */ { @@ -1957,7 +2347,7 @@ static void OPC_6502_DE (void) unsigned char Val; Cycles = 7; Addr = MemReadWord (Regs.PC+1) + Regs.XR; - Val = MemReadByte (Addr) - 1; + Val = MemReadByte (Addr) - 1; MemWriteByte (Addr, Val); TEST_ZF (Val); TEST_SF (Val); @@ -1983,7 +2373,7 @@ static void OPC_6502_E1 (void) unsigned Addr; Cycles = 6; ZPAddr = MemReadByte (Regs.PC+1) + Regs.XR; - Addr = MemReadZPWord (ZPAddr); + Addr = MemReadZPWord (ZPAddr); SBC (MemReadByte (Addr)); Regs.PC += 2; } @@ -2021,7 +2411,7 @@ static void OPC_6502_E6 (void) unsigned char Val; Cycles = 5; ZPAddr = MemReadByte (Regs.PC+1); - Val = MemReadByte (ZPAddr) + 1; + Val = MemReadByte (ZPAddr) + 1; MemWriteByte (ZPAddr, Val); TEST_ZF (Val); TEST_SF (Val); @@ -2062,6 +2452,42 @@ static void OPC_6502_EA (void) +static void OPC_65C02_NOP11(void) +/* Opcode 'Illegal' 1 cycle NOP */ +{ + Cycles = 1; + Regs.PC += 1; +} + + + +static void OPC_65C02_NOP22 (void) +/* Opcode 'Illegal' 2 byte 2 cycle NOP */ +{ + Cycles = 2; + Regs.PC += 2; +} + + + +static void OPC_65C02_NOP24 (void) +/* Opcode 'Illegal' 2 byte 4 cycle NOP */ +{ + Cycles = 4; + Regs.PC += 2; +} + + + +static void OPC_65C02_NOP34 (void) +/* Opcode 'Illegal' 3 byte 4 cycle NOP */ +{ + Cycles = 4; + Regs.PC += 3; +} + + + static void OPC_6502_EC (void) /* Opcode $EC: CPX abs */ { @@ -2079,7 +2505,7 @@ static void OPC_6502_ED (void) { unsigned Addr; Cycles = 4; - Addr = MemReadWord (Regs.PC+1); + Addr = MemReadWord (Regs.PC+1); SBC (MemReadByte (Addr)); Regs.PC += 3; } @@ -2093,7 +2519,7 @@ static void OPC_6502_EE (void) unsigned char Val; Cycles = 6; Addr = MemReadWord (Regs.PC+1); - Val = MemReadByte (Addr) + 1; + Val = MemReadByte (Addr) + 1; MemWriteByte (Addr, Val); TEST_ZF (Val); TEST_SF (Val); @@ -2117,7 +2543,7 @@ static void OPC_6502_F1 (void) unsigned Addr; Cycles = 5; ZPAddr = MemReadByte (Regs.PC+1); - Addr = MemReadZPWord (ZPAddr); + Addr = MemReadZPWord (ZPAddr); if (PAGE_CROSS (Addr, Regs.YR)) { ++Cycles; } @@ -2127,6 +2553,20 @@ static void OPC_6502_F1 (void) +static void OPC_65SC02_F2 (void) +/* Opcode $F2: SBC (zp) */ +{ + unsigned char ZPAddr; + unsigned Addr; + Cycles = 5; + ZPAddr = MemReadByte (Regs.PC+1); + Addr = MemReadZPWord (ZPAddr); + SBC (MemReadByte (Addr)); + Regs.PC += 2; +} + + + static void OPC_6502_F5 (void) /* Opcode $F5: SBC zp,x */ { @@ -2146,7 +2586,7 @@ static void OPC_6502_F6 (void) unsigned char Val; Cycles = 6; ZPAddr = MemReadByte (Regs.PC+1) + Regs.XR; - Val = MemReadByte (ZPAddr) + 1; + Val = MemReadByte (ZPAddr) + 1; MemWriteByte (ZPAddr, Val); TEST_ZF (Val); TEST_SF (Val); @@ -2158,7 +2598,9 @@ static void OPC_6502_F6 (void) static void OPC_6502_F8 (void) /* Opcode $F8: SED */ { + Cycles = 2; SET_DF (1); + Regs.PC += 1; } @@ -2168,7 +2610,7 @@ static void OPC_6502_F9 (void) { unsigned Addr; Cycles = 4; - Addr = MemReadWord (Regs.PC+1); + Addr = MemReadWord (Regs.PC+1); if (PAGE_CROSS (Addr, Regs.YR)) { ++Cycles; } @@ -2178,12 +2620,24 @@ static void OPC_6502_F9 (void) +static void OPC_65SC02_FA (void) +/* Opcode $7A: PLX */ +{ + Cycles = 4; + Regs.XR = POP (); + TEST_ZF (Regs.XR); + TEST_SF (Regs.XR); + Regs.PC += 1; +} + + + static void OPC_6502_FD (void) /* Opcode $FD: SBC abs,x */ { unsigned Addr; Cycles = 4; - Addr = MemReadWord (Regs.PC+1); + Addr = MemReadWord (Regs.PC+1); if (PAGE_CROSS (Addr, Regs.XR)) { ++Cycles; } @@ -2200,7 +2654,7 @@ static void OPC_6502_FE (void) unsigned char Val; Cycles = 7; Addr = MemReadWord (Regs.PC+1) + Regs.XR; - Val = MemReadByte (Addr) + 1; + Val = MemReadByte (Addr) + 1; MemWriteByte (Addr, Val); TEST_ZF (Val); TEST_SF (Val); @@ -2481,260 +2935,260 @@ static const OPFunc OP6502Table[256] = { static const OPFunc OP65C02Table[256] = { OPC_6502_00, OPC_6502_01, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65C02_NOP22, // $02 + OPC_65C02_NOP11, // $03 + OPC_65SC02_04, OPC_6502_05, OPC_6502_06, - OPC_Illegal, + OPC_Illegal, // $07: RMB0 currently unsupported OPC_6502_08, OPC_6502_09, OPC_6502_0A, - OPC_Illegal, - OPC_Illegal, + OPC_65C02_NOP11, // $0B + OPC_65SC02_0C, OPC_6502_0D, OPC_6502_0E, - OPC_Illegal, + OPC_Illegal, // $0F: BBR0 currently unsupported OPC_6502_10, OPC_6502_11, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_12, + OPC_65C02_NOP11, // $13 + OPC_65SC02_14, OPC_6502_15, OPC_6502_16, - OPC_Illegal, + OPC_Illegal, // $17: RMB1 currently unsupported OPC_6502_18, OPC_6502_19, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_1A, + OPC_65C02_NOP11, // $1B + OPC_65SC02_1C, OPC_6502_1D, OPC_6502_1E, - OPC_Illegal, + OPC_Illegal, // $1F: BBR1 currently unsupported OPC_6502_20, OPC_6502_21, - OPC_Illegal, - OPC_Illegal, + OPC_65C02_NOP22, // $22 + OPC_65C02_NOP11, // $23 OPC_6502_24, OPC_6502_25, OPC_6502_26, - OPC_Illegal, + OPC_Illegal, // $27: RMB2 currently unsupported OPC_6502_28, OPC_6502_29, OPC_6502_2A, - OPC_Illegal, + OPC_65C02_NOP11, // $2B OPC_6502_2C, OPC_6502_2D, OPC_6502_2E, - OPC_Illegal, + OPC_Illegal, // $2F: BBR2 currently unsupported OPC_6502_30, OPC_6502_31, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_32, + OPC_65C02_NOP11, // $33 + OPC_65SC02_34, OPC_6502_35, OPC_6502_36, - OPC_Illegal, + OPC_Illegal, // $37: RMB3 currently unsupported OPC_6502_38, OPC_6502_39, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_3A, + OPC_65C02_NOP11, // $3B + OPC_65SC02_3C, OPC_6502_3D, OPC_6502_3E, - OPC_Illegal, + OPC_Illegal, // $3F: BBR3 currently unsupported OPC_6502_40, OPC_6502_41, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65C02_NOP22, // $42 + OPC_65C02_NOP11, // $43 + OPC_65C02_44, // $44 OPC_6502_45, OPC_6502_46, - OPC_Illegal, + OPC_Illegal, // $47: RMB4 currently unsupported OPC_6502_48, OPC_6502_49, OPC_6502_4A, - OPC_Illegal, + OPC_65C02_NOP11, // $4B OPC_6502_4C, OPC_6502_4D, OPC_6502_4E, - OPC_Illegal, + OPC_Illegal, // $4F: BBR4 currently unsupported OPC_6502_50, OPC_6502_51, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_52, + OPC_65C02_NOP11, // $53 + OPC_65C02_NOP24, // $54 OPC_6502_55, OPC_6502_56, - OPC_Illegal, + OPC_Illegal, // $57: RMB5 currently unsupported OPC_6502_58, OPC_6502_59, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_5A, + OPC_65C02_NOP11, // $5B + OPC_65C02_5C, OPC_6502_5D, OPC_6502_5E, - OPC_Illegal, + OPC_Illegal, // $5F: BBR5 currently unsupported OPC_6502_60, OPC_6502_61, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65C02_NOP22, // $62 + OPC_65C02_NOP11, // $63 + OPC_65SC02_64, OPC_6502_65, OPC_6502_66, - OPC_Illegal, + OPC_Illegal, // $67: RMB6 currently unsupported OPC_6502_68, OPC_6502_69, OPC_6502_6A, - OPC_Illegal, + OPC_65C02_NOP11, // $6B OPC_65C02_6C, OPC_6502_6D, OPC_6502_6E, - OPC_Illegal, + OPC_Illegal, // $6F: BBR6 currently unsupported OPC_6502_70, OPC_6502_71, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_72, + OPC_65C02_NOP11, // $73 + OPC_65SC02_74, OPC_6502_75, OPC_6502_76, - OPC_Illegal, + OPC_Illegal, // $77: RMB7 currently unsupported OPC_6502_78, OPC_6502_79, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_7A, + OPC_65C02_NOP11, // $7B + OPC_65SC02_7C, OPC_6502_7D, OPC_6502_7E, - OPC_Illegal, - OPC_Illegal, + OPC_Illegal, // $7F: BBR7 currently unsupported + OPC_65SC02_80, OPC_6502_81, - OPC_Illegal, - OPC_Illegal, + OPC_65C02_NOP22, // $82 + OPC_65C02_NOP11, // $83 OPC_6502_84, OPC_6502_85, OPC_6502_86, - OPC_Illegal, + OPC_Illegal, // $87: SMB0 currently unsupported OPC_6502_88, - OPC_Illegal, + OPC_65SC02_89, OPC_6502_8A, - OPC_Illegal, + OPC_65C02_NOP11, // $8B OPC_6502_8C, OPC_6502_8D, OPC_6502_8E, - OPC_Illegal, + OPC_Illegal, // $8F: BBS0 currently unsupported OPC_6502_90, OPC_6502_91, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_92, + OPC_65C02_NOP11, // $93 OPC_6502_94, OPC_6502_95, OPC_6502_96, - OPC_Illegal, + OPC_Illegal, // $97: SMB1 currently unsupported OPC_6502_98, OPC_6502_99, OPC_6502_9A, - OPC_Illegal, - OPC_Illegal, + OPC_65C02_NOP11, // $9B + OPC_65SC02_9C, OPC_6502_9D, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_9E, + OPC_Illegal, // $9F: BBS1 currently unsupported OPC_6502_A0, OPC_6502_A1, OPC_6502_A2, - OPC_Illegal, + OPC_65C02_NOP11, // $A3 OPC_6502_A4, OPC_6502_A5, OPC_6502_A6, - OPC_Illegal, + OPC_Illegal, // $A7: SMB2 currently unsupported OPC_6502_A8, OPC_6502_A9, OPC_6502_AA, - OPC_Illegal, + OPC_65C02_NOP11, // $AB OPC_6502_AC, OPC_6502_AD, OPC_6502_AE, - OPC_Illegal, + OPC_Illegal, // $AF: BBS2 currently unsupported OPC_6502_B0, OPC_6502_B1, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_B2, + OPC_65C02_NOP11, // $B3 OPC_6502_B4, OPC_6502_B5, OPC_6502_B6, - OPC_Illegal, + OPC_Illegal, // $B7: SMB3 currently unsupported OPC_6502_B8, OPC_6502_B9, OPC_6502_BA, - OPC_Illegal, + OPC_65C02_NOP11, // $BB OPC_6502_BC, OPC_6502_BD, OPC_6502_BE, - OPC_Illegal, + OPC_Illegal, // $BF: BBS3 currently unsupported OPC_6502_C0, OPC_6502_C1, - OPC_Illegal, - OPC_Illegal, + OPC_65C02_NOP22, // $C2 + OPC_65C02_NOP11, // $C3 OPC_6502_C4, OPC_6502_C5, OPC_6502_C6, - OPC_Illegal, + OPC_Illegal, // $C7: SMB4 currently unsupported OPC_6502_C8, OPC_6502_C9, OPC_6502_CA, - OPC_Illegal, + OPC_Illegal, // $CB: WAI currently unsupported OPC_6502_CC, OPC_6502_CD, OPC_6502_CE, - OPC_Illegal, + OPC_Illegal, // $CF: BBS4 currently unsupported OPC_6502_D0, OPC_6502_D1, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_D2, + OPC_65C02_NOP11, // $D3 + OPC_65C02_NOP24, // $D4 OPC_6502_D5, OPC_6502_D6, - OPC_Illegal, + OPC_Illegal, // $D7: SMB5 currently unsupported OPC_6502_D8, OPC_6502_D9, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_DA, + OPC_Illegal, // $DB: STP currently unsupported + OPC_65C02_NOP34, // $DC OPC_6502_DD, OPC_6502_DE, - OPC_Illegal, + OPC_Illegal, // $DF: BBS5 currently unsupported OPC_6502_E0, OPC_6502_E1, - OPC_Illegal, - OPC_Illegal, + OPC_65C02_NOP22, // $E2 + OPC_65C02_NOP11, // $E3 OPC_6502_E4, OPC_6502_E5, OPC_6502_E6, - OPC_Illegal, + OPC_Illegal, // $E7: SMB6 currently unsupported OPC_6502_E8, OPC_6502_E9, OPC_6502_EA, - OPC_Illegal, + OPC_65C02_NOP11, // $EB OPC_6502_EC, OPC_6502_ED, OPC_6502_EE, - OPC_Illegal, + OPC_Illegal, // $EF: BBS6 currently unsupported OPC_6502_F0, OPC_6502_F1, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_F2, + OPC_65C02_NOP11, // $F3 + OPC_65C02_NOP24, // $F4 OPC_6502_F5, OPC_6502_F6, - OPC_Illegal, + OPC_Illegal, // $F7: SMB7 currently unsupported OPC_6502_F8, OPC_6502_F9, - OPC_Illegal, - OPC_Illegal, - OPC_Illegal, + OPC_65SC02_FA, + OPC_65C02_NOP11, // $FB + OPC_65C02_NOP34, // $FC OPC_6502_FD, OPC_6502_FE, - OPC_Illegal, + OPC_Illegal, // $FF: BBS7 currently unsupported }; @@ -2774,7 +3228,9 @@ void Reset (void) /* Reset the CPU */ HaveIRQRequest = 0; HaveNMIRequest = 0; - Regs.SR = 0; + + /* Bits 5 and 4 aren't used, and always are 1! */ + Regs.SR = 0x30; Regs.PC = MemReadWord (0xFFFC); } @@ -2789,8 +3245,12 @@ unsigned ExecuteInsn (void) HaveNMIRequest = 0; PUSH (PCH); PUSH (PCL); - PUSH (Regs.SR); + PUSH (Regs.SR & ~BF); SET_IF (1); + if (CPU != CPU_6502) + { + SET_DF (0); + } Regs.PC = MemReadWord (0xFFFA); Cycles = 7; @@ -2799,8 +3259,12 @@ unsigned ExecuteInsn (void) HaveIRQRequest = 0; PUSH (PCH); PUSH (PCL); - PUSH (Regs.SR); + PUSH (Regs.SR & ~BF); SET_IF (1); + if (CPU != CPU_6502) + { + SET_DF (0); + } Regs.PC = MemReadWord (0xFFFE); Cycles = 7; diff --git a/src/sim65/6502.h b/src/sim65/6502.h index 2cf2d4f1e..f8e894567 100644 --- a/src/sim65/6502.h +++ b/src/sim65/6502.h @@ -99,6 +99,8 @@ unsigned ExecuteInsn (void); unsigned long GetCycles (void); /* Return the total number of clock cycles executed */ +extern int PrintCycles; +/* flag to print cycles at program termination */ /* End of 6502.h */ diff --git a/src/sim65/error.c b/src/sim65/error.c index 3114951af..441b07d2a 100644 --- a/src/sim65/error.c +++ b/src/sim65/error.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2002-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -69,7 +69,21 @@ void Error (const char* Format, ...) vfprintf (stderr, Format, ap); putc ('\n', stderr); va_end (ap); - exit (EXIT_FAILURE); + exit (SIM65_ERROR); +} + + + +void ErrorCode (int Code, const char* Format, ...) +/* Print an error message and die with the given exit code */ +{ + va_list ap; + va_start (ap, Format); + fprintf (stderr, "Error: "); + vfprintf (stderr, Format, ap); + putc ('\n', stderr); + va_end (ap); + exit (Code); } @@ -83,5 +97,5 @@ void Internal (const char* Format, ...) vfprintf (stderr, Format, ap); putc ('\n', stderr); va_end (ap); - exit (EXIT_FAILURE); + exit (SIM65_ERROR); } diff --git a/src/sim65/error.h b/src/sim65/error.h index 7bee4954c..ea54fa048 100644 --- a/src/sim65/error.h +++ b/src/sim65/error.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2002-2003 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -43,6 +43,20 @@ +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +#define SIM65_ERROR 0x7F +/* Does not use EXIT_FAILURE because it may overlap with test results. */ + +#define SIM65_ERROR_TIMEOUT 0x7E +/* An error result for max CPU instructions exceeded. */ + + + /*****************************************************************************/ /* Code */ /*****************************************************************************/ @@ -55,6 +69,9 @@ void Warning (const char* Format, ...) attribute((format(printf,1,2))); void Error (const char* Format, ...) attribute((noreturn, format(printf,1,2))); /* Print an error message and die */ +void ErrorCode (int Code, const char* Format, ...) attribute((noreturn, format(printf,2,3))); +/* Print an error message and die with the given exit code */ + void Internal (const char* Format, ...) attribute((noreturn, format(printf,1,2))); /* Print an internal error message and die */ diff --git a/src/sim65/main.c b/src/sim65/main.c index dab9b0be8..f2daf9295 100644 --- a/src/sim65/main.c +++ b/src/sim65/main.c @@ -61,7 +61,17 @@ const char* ProgramFile; /* exit simulator after MaxCycles Cycles */ -unsigned long MaxCycles = 0; +unsigned long MaxCycles; + +/* Header signature 'sim65' */ +static const unsigned char HeaderSignature[] = { + 0x73, 0x69, 0x6D, 0x36, 0x35 +}; +#define HEADER_SIGNATURE_LENGTH (sizeof(HeaderSignature)/sizeof(HeaderSignature[0])) + +static const unsigned char HeaderVersion = 2; + + /*****************************************************************************/ /* Code */ @@ -74,12 +84,14 @@ static void Usage (void) printf ("Usage: %s [options] file [arguments]\n" "Short options:\n" " -h\t\t\tHelp (this text)\n" + " -c\t\t\tPrint amount of executed CPU cycles\n" " -v\t\t\tIncrease verbosity\n" " -V\t\t\tPrint the simulator version number\n" " -x <num>\t\tExit simulator after <num> cycles\n" "\n" "Long options:\n" " --help\t\tHelp (this text)\n" + " --cycles\t\tPrint amount of executed CPU cycles\n" " --verbose\t\tIncrease verbosity\n" " --version\t\tPrint the simulator version number\n", ProgName); @@ -106,11 +118,21 @@ static void OptVerbose (const char* Opt attribute ((unused)), +static void OptCycles (const char* Opt attribute ((unused)), + const char* Arg attribute ((unused))) +/* Set flag to print amount of cycles at the end */ +{ + PrintCycles = 1; +} + + + static void OptVersion (const char* Opt attribute ((unused)), const char* Arg attribute ((unused))) /* Print the simulator version */ { - fprintf (stderr, "sim65 V%s\n", GetVersionAsString ()); + fprintf (stderr, "%s V%s\n", ProgName, GetVersionAsString ()); + exit(EXIT_SUCCESS); } static void OptQuitXIns (const char* Opt attribute ((unused)), @@ -120,43 +142,84 @@ static void OptQuitXIns (const char* Opt attribute ((unused)), MaxCycles = strtoul(Arg, NULL, 0); } -static void ReadProgramFile (void) +static unsigned char ReadProgramFile (void) /* Load program into memory */ { - int Val; - unsigned Addr = 0x0200; + unsigned I; + int Val, Val2; + int Version; + unsigned Addr; + unsigned Load, Reset; + unsigned char SPAddr = 0x00; /* Open the file */ FILE* F = fopen (ProgramFile, "rb"); if (F == 0) { - Error ("Cannot open `%s': %s", ProgramFile, strerror (errno)); + Error ("Cannot open '%s': %s", ProgramFile, strerror (errno)); + } + + /* Verify the header signature */ + for (I = 0; I < HEADER_SIGNATURE_LENGTH; ++I) { + if ((Val = fgetc(F)) != HeaderSignature[I]) { + Error ("'%s': Invalid header signature.", ProgramFile); + } + } + + /* Get header version */ + if ((Version = fgetc(F)) != HeaderVersion) { + Error ("'%s': Invalid header version.", ProgramFile); } /* Get the CPU type from the file header */ if ((Val = fgetc(F)) != EOF) { if (Val != CPU_6502 && Val != CPU_65C02) { - Error ("`%s': Invalid CPU type", ProgramFile); + Error ("'%s': Invalid CPU type", ProgramFile); } CPU = Val; } + /* Get the address of sp from the file header */ + if ((Val = fgetc(F)) != EOF) { + SPAddr = Val; + } + + /* Get load address */ + if (((Val = fgetc(F)) == EOF) || + ((Val2 = fgetc(F)) == EOF)) { + Error ("'%s': Header missing load address", ProgramFile); + } + Load = Val | (Val2 << 8); + + /* Get reset address */ + if (((Val = fgetc(F)) == EOF) || + ((Val2 = fgetc(F)) == EOF)) { + Error ("'%s': Header missing reset address", ProgramFile); + } + Reset = Val | (Val2 << 8); + /* Read the file body into memory */ + Addr = Load; while ((Val = fgetc(F)) != EOF) { - if (Addr == 0xFF00) { - Error ("`%s': To large to fit into $0200-$FFF0", ProgramFile); + if (Addr >= PARAVIRT_BASE) { + Error ("'%s': To large to fit into $%04X-$%04X", ProgramFile, Addr, PARAVIRT_BASE); } MemWriteByte (Addr++, (unsigned char) Val); } /* Check for errors */ if (ferror (F)) { - Error ("Error reading from `%s': %s", ProgramFile, strerror (errno)); + Error ("Error reading from '%s': %s", ProgramFile, strerror (errno)); } /* Close the file */ fclose (F); - Print (stderr, 1, "Loaded `%s' at $0200-$%04X\n", ProgramFile, Addr - 1); + Print (stderr, 1, "Loaded '%s' at $%04X-$%04X\n", ProgramFile, Load, Addr - 1); + Print (stderr, 1, "File version: %d\n", Version); + Print (stderr, 1, "Reset: $%04X\n", Reset); + + MemWriteWord(0xFFFC, Reset); + return SPAddr; } @@ -166,11 +229,13 @@ int main (int argc, char* argv[]) /* Program long options */ static const LongOpt OptTab[] = { { "--help", 0, OptHelp }, + { "--cycles", 0, OptCycles }, { "--verbose", 0, OptVerbose }, { "--version", 0, OptVersion }, }; unsigned I; + unsigned char SPAddr; /* Initialize the cmdline module */ InitCmdLine (&argc, &argv, "sim65"); @@ -196,6 +261,10 @@ int main (int argc, char* argv[]) OptHelp (Arg, 0); break; + case 'c': + OptCycles (Arg, 0); + break; + case 'v': OptVerbose (Arg, 0); break; @@ -226,20 +295,18 @@ int main (int argc, char* argv[]) AbEnd ("No program file"); } - ParaVirtInit (I); - MemInit (); - ReadProgramFile (); + SPAddr = ReadProgramFile (); + + ParaVirtInit (I, SPAddr); Reset (); while (1) { ExecuteInsn (); if (MaxCycles && (GetCycles () >= MaxCycles)) { - Error ("Maximum number of cycles reached."); - exit (-99); /* do not use EXIT_FAILURE to avoid conflicts with the - same value being used in a test program */ + ErrorCode (SIM65_ERROR_TIMEOUT, "Maximum number of cycles reached."); } } diff --git a/src/sim65/memory.c b/src/sim65/memory.c index 305b26a73..11f0be55a 100644 --- a/src/sim65/memory.c +++ b/src/sim65/memory.c @@ -64,6 +64,15 @@ void MemWriteByte (unsigned Addr, unsigned char Val) +void MemWriteWord (unsigned Addr, unsigned Val) +/* Write a word to a memory location */ +{ + MemWriteByte (Addr, Val & 0xFF); + MemWriteByte (Addr + 1, Val >> 8); +} + + + unsigned char MemReadByte (unsigned Addr) /* Read a byte from a memory location */ { @@ -82,7 +91,7 @@ unsigned MemReadWord (unsigned Addr) unsigned MemReadZPWord (unsigned char Addr) -/* Read a word from the zero page. This function differs from ReadMemW in that +/* Read a word from the zero page. This function differs from MemReadWord in that ** the read will always be in the zero page, even in case of an address ** overflow. */ @@ -96,10 +105,6 @@ unsigned MemReadZPWord (unsigned char Addr) void MemInit (void) /* Initialize the memory subsystem */ { - /* Fill momory with illegal opcode */ + /* Fill memory with illegal opcode */ memset (Mem, 0xFF, sizeof (Mem)); - - /* Set RESET vector to 0x0200 */ - Mem[0xFFFC] = 0x00; - Mem[0xFFFD] = 0x02; } diff --git a/src/sim65/memory.h b/src/sim65/memory.h index 5de3a2bb8..41cc800d3 100644 --- a/src/sim65/memory.h +++ b/src/sim65/memory.h @@ -47,6 +47,9 @@ void MemWriteByte (unsigned Addr, unsigned char Val); /* Write a byte to a memory location */ +void MemWriteWord (unsigned Addr, unsigned Val); +/* Write a word to a memory location */ + unsigned char MemReadByte (unsigned Addr); /* Read a byte from a memory location */ @@ -54,7 +57,7 @@ unsigned MemReadWord (unsigned Addr); /* Read a word from a memory location */ unsigned MemReadZPWord (unsigned char Addr); -/* Read a word from the zero page. This function differs from ReadMemW in that +/* Read a word from the zero page. This function differs from MemReadWord in that ** the read will always be in the zero page, even in case of an address ** overflow. */ diff --git a/src/sim65/paravirt.c b/src/sim65/paravirt.c index 56211b5c1..db4120326 100644 --- a/src/sim65/paravirt.c +++ b/src/sim65/paravirt.c @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2013-2013 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -36,6 +36,7 @@ #include <string.h> #include <stdlib.h> #include <fcntl.h> +#include <sys/stat.h> #if defined(_WIN32) # define O_INITIAL O_BINARY #else @@ -48,6 +49,12 @@ /* Anyone else */ # include <unistd.h> #endif +#ifndef S_IREAD +# define S_IREAD S_IRUSR +#endif +#ifndef S_IWRITE +# define S_IWRITE S_IWUSR +#endif /* common */ #include "cmdline.h" @@ -70,6 +77,7 @@ typedef void (*PVFunc) (CPURegs* Regs); static unsigned ArgStart; +static unsigned char SPAddr; @@ -95,37 +103,40 @@ static void SetAX (CPURegs* Regs, unsigned Val) -static void MemWriteWord (unsigned Addr, unsigned Val) -{ - MemWriteByte (Addr, Val); - Val >>= 8; - MemWriteByte (Addr + 1, Val); -} - - - static unsigned char Pop (CPURegs* Regs) { - return MemReadByte (0x0100 + ++Regs->SP); + return MemReadByte (0x0100 + (++Regs->SP & 0xFF)); } static unsigned PopParam (unsigned char Incr) { - unsigned SP = MemReadZPWord (0x00); + unsigned SP = MemReadZPWord (SPAddr); unsigned Val = MemReadWord (SP); - MemWriteWord (0x0000, SP + Incr); + MemWriteWord (SPAddr, SP + Incr); return Val; } +static void PVExit (CPURegs* Regs) +{ + Print (stderr, 1, "PVExit ($%02X)\n", Regs->AC); + if (PrintCycles) { + Print (stdout, 0, "%lu cycles\n", GetCycles ()); + } + + exit (Regs->AC); +} + + + static void PVArgs (CPURegs* Regs) { unsigned ArgC = ArgCount - ArgStart; unsigned ArgV = GetAX (Regs); - unsigned SP = MemReadZPWord (0x00); + unsigned SP = MemReadZPWord (SPAddr); unsigned Args = SP - (ArgC + 1) * 2; Print (stderr, 2, "PVArgs ($%04X)\n", ArgV); @@ -145,33 +156,32 @@ static void PVArgs (CPURegs* Regs) MemWriteWord (Args, SP); Args += 2; } - MemWriteWord (Args, 0x0000); + MemWriteWord (Args, SPAddr); - MemWriteWord (0x0000, SP); + MemWriteWord (SPAddr, SP); SetAX (Regs, ArgC); } -static void PVExit (CPURegs* Regs) -{ - Print (stderr, 1, "PVExit ($%02X)\n", Regs->AC); - - exit (Regs->AC); -} - - - static void PVOpen (CPURegs* Regs) { char Path[1024]; int OFlag = O_INITIAL; + int OMode = 0; unsigned RetVal, I = 0; unsigned Mode = PopParam (Regs->YR - 4); unsigned Flags = PopParam (2); unsigned Name = PopParam (2); + if (Regs->YR - 4 < 2) { + /* If the caller didn't supply the mode + ** argument, use a reasonable default. + */ + Mode = 0x01 | 0x02; + } + do { Path[I] = MemReadByte (Name++); } @@ -203,10 +213,14 @@ static void PVOpen (CPURegs* Regs) OFlag |= O_EXCL; } - /* Avoid gcc warning */ - (void) Mode; + if (Mode & 0x01) { + OMode |= S_IREAD; + } + if (Mode & 0x02) { + OMode |= S_IWRITE; + } - RetVal = open (Path, OFlag); + RetVal = open (Path, OFlag, OMode); SetAX (Regs, RetVal); } @@ -281,20 +295,21 @@ static void PVWrite (CPURegs* Regs) static const PVFunc Hooks[] = { - PVArgs, - PVExit, PVOpen, PVClose, PVRead, PVWrite, + PVArgs, + PVExit, }; -void ParaVirtInit (unsigned aArgStart) +void ParaVirtInit (unsigned aArgStart, unsigned char aSPAddr) /* Initialize the paravirtualization subsystem */ { ArgStart = aArgStart; + SPAddr = aSPAddr; }; @@ -302,15 +317,18 @@ void ParaVirtInit (unsigned aArgStart) void ParaVirtHooks (CPURegs* Regs) /* Potentially execute paravirtualization hooks */ { + unsigned lo; + /* Check for paravirtualization address range */ - if (Regs->PC < 0xFFF0 || - Regs->PC >= 0xFFF0 + sizeof (Hooks) / sizeof (Hooks[0])) { + if (Regs->PC < PARAVIRT_BASE || + Regs->PC >= PARAVIRT_BASE + sizeof (Hooks) / sizeof (Hooks[0])) { return; } /* Call paravirtualization hook */ - Hooks[Regs->PC - 0xFFF0] (Regs); + Hooks[Regs->PC - PARAVIRT_BASE] (Regs); /* Simulate RTS */ - Regs->PC = Pop(Regs) + (Pop(Regs) << 8) + 1; + lo = Pop (Regs); + Regs->PC = lo + (Pop (Regs) << 8) + 1; } diff --git a/src/sim65/paravirt.h b/src/sim65/paravirt.h index 34317b49f..bfa38e047 100644 --- a/src/sim65/paravirt.h +++ b/src/sim65/paravirt.h @@ -7,7 +7,7 @@ /* */ /* */ /* (C) 2013-2013 Ullrich von Bassewitz */ -/* Rmerstrasse 52 */ +/* Roemerstrasse 52 */ /* D-70794 Filderstadt */ /* EMail: uz@cc65.org */ /* */ @@ -38,13 +38,24 @@ +/*****************************************************************************/ +/* Data */ +/*****************************************************************************/ + + + +#define PARAVIRT_BASE 0xFFF4 +/* Lowest address used by a paravirtualization hook */ + + + /*****************************************************************************/ /* Code */ /*****************************************************************************/ -void ParaVirtInit (unsigned aArgStart); +void ParaVirtInit (unsigned aArgStart, unsigned char aSPAddr); /* Initialize the paravirtualization subsystem */ void ParaVirtHooks (CPURegs* Regs); diff --git a/src/sp65.vcxproj b/src/sp65.vcxproj index 8db98346c..1b7a18427 100644 --- a/src/sp65.vcxproj +++ b/src/sp65.vcxproj @@ -1,5 +1,5 @@ <?xml version="1.0" encoding="utf-8"?> -<Project DefaultTargets="Build" ToolsVersion="12.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> +<Project DefaultTargets="Build" ToolsVersion="15.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003"> <ItemGroup Label="ProjectConfigurations"> <ProjectConfiguration Include="Debug|Win32"> <Configuration>Debug</Configuration> @@ -13,65 +13,39 @@ <PropertyGroup Label="Globals"> <ProjectGuid>{4388D1AF-C7EA-4AD4-8E80-CA1FB7BF76BF}</ProjectGuid> <Keyword>Win32Proj</Keyword> - <RootNamespace>sp65</RootNamespace> </PropertyGroup> + <ImportGroup Label="PropertySheets"> + <Import Project="cc65.props" /> + </ImportGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration"> <UseDebugLibraries>true</UseDebugLibraries> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration"> <UseDebugLibraries>false</UseDebugLibraries> - <WholeProgramOptimization>true</WholeProgramOptimization> - <PlatformToolset>v120</PlatformToolset> </PropertyGroup> <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" /> <ImportGroup Label="ExtensionSettings"> </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> - <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" /> - </ImportGroup> <PropertyGroup Label="UserMacros" /> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> - <LinkIncremental>true</LinkIncremental> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> - <OutDir>$(SolutionDir)..\bin\</OutDir> - <IntDir>$(SolutionDir)..\wrk\$(ProjectName)\$(Configuration)\</IntDir> </PropertyGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'"> <ClCompile> - <PrecompiledHeader> - </PrecompiledHeader> - <WarningLevel>Level3</WarningLevel> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;_DEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;_DEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>true</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'"> <ClCompile> - <WarningLevel>Level3</WarningLevel> - <PrecompiledHeader> - </PrecompiledHeader> - <PreprocessorDefinitions>_CRT_NONSTDC_NO_WARNINGS;_CRT_SECURE_NO_WARNINGS;_CONSOLE;NDEBUG</PreprocessorDefinitions> - <AdditionalIncludeDirectories>common</AdditionalIncludeDirectories> - <TreatWarningAsError>true</TreatWarningAsError> + <PreprocessorDefinitions>_CONSOLE;NDEBUG;%(PreprocessorDefinitions)</PreprocessorDefinitions> </ClCompile> <Link> <SubSystem>Console</SubSystem> - <GenerateDebugInformation>false</GenerateDebugInformation> - <AdditionalDependencies>$(IntDir)..\..\common\$(Configuration)\common.lib</AdditionalDependencies> </Link> </ItemDefinitionGroup> <ItemGroup> diff --git a/src/sp65/asm.c b/src/sp65/asm.c index 8f520cb9e..74c9bc023 100644 --- a/src/sp65/asm.c +++ b/src/sp65/asm.c @@ -89,7 +89,7 @@ static unsigned GetBytesPerLine (const Collection* A) const char* V = GetAttrVal (A, "bytesperline"); if ((V && sscanf (V, "%u%c", &BytesPerLine, &C) != 1) || (BytesPerLine < 1 || BytesPerLine > 64)) { - Error ("Invalid value for attribute `bytesperline'"); + Error ("Invalid value for attribute 'bytesperline'"); } return BytesPerLine; } @@ -106,7 +106,7 @@ static unsigned GetBase (const Collection* A) const char* V = GetAttrVal (A, "base"); if ((V && sscanf (V, "%u%c", &Base, &C) != 1) || (Base != 2 && Base != 10 && Base != 16)) { - Error ("Invalid value for attribute `base'"); + Error ("Invalid value for attribute 'base'"); } return Base; } @@ -119,7 +119,7 @@ static const char* GetIdentifier (const Collection* A) /* Check for a ident attribute */ const char* Ident = GetAttrVal (A, "ident"); if (Ident && !ValidIdentifier (Ident)) { - Error ("Invalid value for attribute `ident'"); + Error ("Invalid value for attribute 'ident'"); } return Ident; } @@ -152,7 +152,7 @@ void WriteAsmFile (const StrBuf* Data, const Collection* A, const Bitmap* B) /* Open the output file */ F = fopen (Name, "w"); if (F == 0) { - Error ("Cannot open output file `%s': %s", Name, strerror (errno)); + Error ("Cannot open output file '%s': %s", Name, strerror (errno)); } /* Write a readable header */ @@ -235,6 +235,6 @@ void WriteAsmFile (const StrBuf* Data, const Collection* A, const Bitmap* B) /* Close the file */ if (fclose (F) != 0) { - Error ("Error closing output file `%s': %s", Name, strerror (errno)); + Error ("Error closing output file '%s': %s", Name, strerror (errno)); } } diff --git a/src/sp65/attr.c b/src/sp65/attr.c index db026af48..1b7883c47 100644 --- a/src/sp65/attr.c +++ b/src/sp65/attr.c @@ -160,7 +160,7 @@ const Attr* NeedAttr (const Collection* C, const char* Name, const char* Op) /* Search for the attribute and return it */ unsigned Index; if (!FindAttr (C, Name, &Index)) { - Error ("Found no attribute named `%s' for operation %s", Name, Op); + Error ("Found no attribute named '%s' for operation %s", Name, Op); } return CollConstAt (C, Index); } @@ -201,7 +201,7 @@ void AddAttr (Collection* C, const char* Name, const char* Value) */ unsigned Index; if (FindAttr (C, Name, &Index)) { - Error ("Duplicate command line attribute `%s'", Name); + Error ("Duplicate command line attribute '%s'", Name); } /* Insert the attribute */ @@ -221,7 +221,7 @@ void SplitAddAttr (Collection* C, const char* Combined, const char* Name) if (Pos == 0) { /* Combined is actually a value */ if (Name == 0) { - Error ("Command line attribute `%s' doesn't contain a name", Combined); + Error ("Command line attribute '%s' doesn't contain a name", Combined); } AddAttr (C, Name, Combined); } else { @@ -240,7 +240,7 @@ void SplitAddAttr (Collection* C, const char* Combined, const char* Name) -Collection* ParseAttrList (const char* List, const char** NameList, unsigned NameCount) +Collection* ParseAttrList (const char* List, const char* const* NameList, unsigned NameCount) /* Parse a list containing name/value pairs into a sorted collection. Some ** attributes may not need a name, so NameList contains these names. If there ** were no errors, the function returns a alphabetically sorted collection diff --git a/src/sp65/attr.h b/src/sp65/attr.h index 2b7ce68b9..e93bcd937 100644 --- a/src/sp65/attr.h +++ b/src/sp65/attr.h @@ -111,7 +111,7 @@ void SplitAddAttr (Collection* C, const char* Combined, const char* Name); ** Name is NULL, terminate with an error. */ -Collection* ParseAttrList (const char* List, const char** NameList, unsigned NameCount); +Collection* ParseAttrList (const char* List, const char* const* NameList, unsigned NameCount); /* Parse a list containing name/value pairs into a sorted collection. Some ** attributes may not need a name, so NameList contains these names. If there ** were no errors, the function returns a alphabetically sorted collection diff --git a/src/sp65/bin.c b/src/sp65/bin.c index fdf7ddee0..93e6a456a 100644 --- a/src/sp65/bin.c +++ b/src/sp65/bin.c @@ -53,7 +53,7 @@ -void WriteBinFile (const StrBuf* Data, const Collection* A, +void WriteBinFile (const StrBuf* Data, const Collection* A, const Bitmap* B attribute ((unused))) /* Write the contents of Data to the given file in binary format */ { @@ -65,7 +65,7 @@ void WriteBinFile (const StrBuf* Data, const Collection* A, /* Open the output file */ FILE* F = fopen (Name, "wb"); if (F == 0) { - Error ("Cannot open output file `%s': %s", Name, strerror (errno)); + Error ("Cannot open output file '%s': %s", Name, strerror (errno)); } /* Write to the file. We will use fwrite here instead of the fileio @@ -75,11 +75,11 @@ void WriteBinFile (const StrBuf* Data, const Collection* A, */ Size = SB_GetLen (Data); if (fwrite (SB_GetConstBuf (Data), 1, Size, F) != Size) { - Error ("Error writing to output file `%s': %s", Name, strerror (errno)); + Error ("Error writing to output file '%s': %s", Name, strerror (errno)); } /* Close the file */ if (fclose (F) != 0) { - Error ("Error closing output file `%s': %s", Name, strerror (errno)); + Error ("Error closing output file '%s': %s", Name, strerror (errno)); } } diff --git a/src/sp65/c.c b/src/sp65/c.c index d4d6ee00b..57950ca6d 100644 --- a/src/sp65/c.c +++ b/src/sp65/c.c @@ -89,7 +89,7 @@ static unsigned GetBytesPerLine (const Collection* A) const char* V = GetAttrVal (A, "bytesperline"); if ((V && sscanf (V, "%u%c", &BytesPerLine, &C) != 1) || (BytesPerLine < 1 || BytesPerLine > 64)) { - Error ("Invalid value for attribute `bytesperline'"); + Error ("Invalid value for attribute 'bytesperline'"); } return BytesPerLine; } @@ -105,7 +105,7 @@ static unsigned GetBase (const Collection* A) /* Check for a base attribute */ const char* V = GetAttrVal (A, "base"); if ((V && sscanf (V, "%u%c", &Base, &C) != 1) || (Base != 10 && Base != 16)) { - Error ("Invalid value for attribute `base'"); + Error ("Invalid value for attribute 'base'"); } return Base; } @@ -118,7 +118,7 @@ static const char* GetIdentifier (const Collection* A) /* Check for a ident attribute */ const char* Ident = GetAttrVal (A, "ident"); if (Ident && !ValidIdentifier (Ident)) { - Error ("Invalid value for attribute `ident'"); + Error ("Invalid value for attribute 'ident'"); } return Ident; } @@ -151,7 +151,7 @@ void WriteCFile (const StrBuf* Data, const Collection* A, const Bitmap* B) /* Open the output file */ F = fopen (Name, "w"); if (F == 0) { - Error ("Cannot open output file `%s': %s", Name, strerror (errno)); + Error ("Cannot open output file '%s': %s", Name, strerror (errno)); } /* Write a readable header */ @@ -220,6 +220,6 @@ void WriteCFile (const StrBuf* Data, const Collection* A, const Bitmap* B) /* Close the file */ if (fclose (F) != 0) { - Error ("Error closing output file `%s': %s", Name, strerror (errno)); + Error ("Error closing output file '%s': %s", Name, strerror (errno)); } } diff --git a/src/sp65/color.h b/src/sp65/color.h index 31688bff4..6d898ab2e 100644 --- a/src/sp65/color.h +++ b/src/sp65/color.h @@ -60,7 +60,7 @@ struct Color { /*****************************************************************************/ - + #if defined(HAVE_INLINE) INLINE Color RGB (unsigned char R, unsigned char G, unsigned char B) diff --git a/src/sp65/convert.c b/src/sp65/convert.c index 45b40f1ef..a9047ffb0 100644 --- a/src/sp65/convert.c +++ b/src/sp65/convert.c @@ -106,7 +106,7 @@ StrBuf* ConvertTo (const Bitmap* B, const Collection* A) sizeof (ConverterMap[0]), Compare); if (E == 0) { - Error ("No such target format: `%s'", Format); + Error ("No such target format: '%s'", Format); } /* Do the conversion */ diff --git a/src/sp65/geosbitmap.h b/src/sp65/geosbitmap.h index 759030224..8f9f09a29 100644 --- a/src/sp65/geosbitmap.h +++ b/src/sp65/geosbitmap.h @@ -54,8 +54,8 @@ StrBuf* GenGeosBitmap (const Bitmap* B, const Collection* A); -/* Generate binary output in GEOS compacted bitmap format for the bitmap B. -** The output is stored in a string buffer (which is actually a dynamic char +/* Generate binary output in GEOS compacted bitmap format for the bitmap B. +** The output is stored in a string buffer (which is actually a dynamic char ** array) and returned. */ @@ -67,4 +67,4 @@ StrBuf* GenGeosBitmap (const Bitmap* B, const Collection* A); - + diff --git a/src/sp65/input.c b/src/sp65/input.c index 381adf6b9..f1df247ae 100644 --- a/src/sp65/input.c +++ b/src/sp65/input.c @@ -103,7 +103,7 @@ Bitmap* ReadInputFile (const Collection* A) sizeof (FormatTable[0]), CompareFileId); if (F == 0) { - Error ("Unknown input format `%s'", Format); + Error ("Unknown input format '%s'", Format); } } else { /* No format given, use file name extension */ @@ -112,7 +112,7 @@ Bitmap* ReadInputFile (const Collection* A) sizeof (FormatTable) / sizeof (FormatTable[0])); /* Found? */ if (F == 0) { - Error ("Cannot determine file format of input file `%s'", Name); + Error ("Cannot determine file format of input file '%s'", Name); } } diff --git a/src/sp65/koala.c b/src/sp65/koala.c index e2122c781..688e37f61 100644 --- a/src/sp65/koala.c +++ b/src/sp65/koala.c @@ -94,7 +94,7 @@ StrBuf* GenKoala (const Bitmap* B, const Collection* A attribute ((unused))) /* Add $4400 as load address */ SB_AppendChar (D, 0x00); SB_AppendChar (D, 0x44); - + /* TODO: The actual work ;-) */ (void) Screen; diff --git a/src/sp65/lynxsprite.c b/src/sp65/lynxsprite.c index e4afc7773..4d7669faf 100644 --- a/src/sp65/lynxsprite.c +++ b/src/sp65/lynxsprite.c @@ -80,7 +80,7 @@ static enum Mode GetMode (const Collection* A) } else if (strcmp (Mode, "shaped") == 0) { return smShaped; } else { - Error ("Invalid value for attribute `mode'"); + Error ("Invalid value for attribute 'mode'"); } } diff --git a/src/sp65/lynxsprite.h b/src/sp65/lynxsprite.h index 4f9a9f07d..fe686ec8e 100644 --- a/src/sp65/lynxsprite.h +++ b/src/sp65/lynxsprite.h @@ -54,7 +54,7 @@ StrBuf* GenLynxSprite (const Bitmap* B, const Collection* A); -/* Generate binary output in packed Lynx sprite format for the bitmap B. The output +/* Generate binary output in packed Lynx sprite format for the bitmap B. The output ** is stored in a string buffer (which is actually a dynamic char array) and ** returned. */ diff --git a/src/sp65/main.c b/src/sp65/main.c index ef2188c82..1dda696d6 100644 --- a/src/sp65/main.c +++ b/src/sp65/main.c @@ -92,6 +92,7 @@ static void Usage (void) "\n" "Long options:\n" " --convert-to fmt[,attrlist]\tConvert into target format\n" + " --dump-palette\t\tDump palette as table\n" " --help\t\t\tHelp (this text)\n" " --list-conversions\t\tList all possible conversions\n" " --pop\t\t\t\tRestore the original loaded image\n" @@ -140,7 +141,7 @@ static void SetOutputData (StrBuf* N) static void OptConvertTo (const char* Opt attribute ((unused)), const char* Arg) /* Convert the bitmap into a target format */ { - static const char* NameList[] = { + static const char* const NameList[] = { "format" }; @@ -219,7 +220,7 @@ static void OptPop (const char* Opt attribute ((unused)), static void OptRead (const char* Opt attribute ((unused)), const char* Arg) /* Read an input file */ { - static const char* NameList[] = { + static const char* const NameList[] = { "name", "format" }; @@ -273,7 +274,7 @@ static void OptSlice (const char* Opt attribute ((unused)), const char* Arg) static void OptVerbose (const char* Opt attribute ((unused)), const char* Arg attribute ((unused))) -/* Increase versbosity */ +/* Increase verbosity */ { ++Verbosity; } @@ -285,6 +286,7 @@ static void OptVersion (const char* Opt attribute ((unused)), /* Print the assembler version */ { fprintf (stderr, "%s V%s\n", ProgName, GetVersionAsString ()); + exit(EXIT_SUCCESS); } @@ -292,7 +294,7 @@ static void OptVersion (const char* Opt attribute ((unused)), static void OptWrite (const char* Opt attribute ((unused)), const char* Arg) /* Write an output file */ { - static const char* NameList[] = { + static const char* const NameList[] = { "name", "format" }; @@ -390,13 +392,18 @@ int main (int argc, char* argv []) } } else { /* We don't accept anything else */ - AbEnd ("Don't know what to do with `%s'", Arg); + AbEnd ("Don't know what to do with '%s'", Arg); } /* Next argument */ ++I; } + /* Do we have an input file? */ + if (I == 1) { + Error ("No input file"); + } + /* Cleanup data */ SetWorkBitmap (C); FreeBitmap (B); diff --git a/src/sp65/output.c b/src/sp65/output.c index 3ffa38dcc..c12d1f612 100644 --- a/src/sp65/output.c +++ b/src/sp65/output.c @@ -124,7 +124,7 @@ void WriteOutputFile (const StrBuf* Data, const Collection* A, const Bitmap* B) sizeof (FormatTable[0]), CompareFileId); if (F == 0) { - Error ("Unknown output format `%s'", Format); + Error ("Unknown output format '%s'", Format); } } else { /* No format given, use file name extension */ @@ -133,7 +133,7 @@ void WriteOutputFile (const StrBuf* Data, const Collection* A, const Bitmap* B) sizeof (FormatTable) / sizeof (FormatTable[0])); /* Found? */ if (F == 0) { - Error ("Cannot determine file format of output file `%s'", Name); + Error ("Cannot determine file format of output file '%s'", Name); } } diff --git a/src/sp65/pcx.c b/src/sp65/pcx.c index 273ad8cf0..d721671b3 100644 --- a/src/sp65/pcx.c +++ b/src/sp65/pcx.c @@ -146,10 +146,10 @@ static PCXHeader* ReadPCXHeader (FILE* F, const char* Name) /* Check the header data */ if (P->Id != PCX_MAGIC_ID || P->FileVersion == 1 || P->FileVersion > 5) { - Error ("`%s' is not a PCX file", Name); + Error ("'%s' is not a PCX file", Name); } if (P->Compressed > 1) { - Error ("Unsupported compression (%d) in PCX file `%s'", + Error ("Unsupported compression (%d) in PCX file '%s'", P->Compressed, Name); } /* We support: @@ -160,15 +160,15 @@ static PCXHeader* ReadPCXHeader (FILE* F, const char* Name) if (!((P->BPP == 1 && P->Planes == 1) || (P->BPP == 8 && (P->Planes == 1 || P->Planes == 3 || P->Planes == 4)))) { /* We could support others, but currently we don't */ - Error ("Unsupported PCX format: %u planes, %u bpp in PCX file `%s'", + Error ("Unsupported PCX format: %u planes, %u bpp in PCX file '%s'", P->Planes, P->BPP, Name); } if (P->PalInfo != 1 && P->PalInfo != 2) { - Error ("Unsupported palette info (%u) in PCX file `%s'", + Error ("Unsupported palette info (%u) in PCX file '%s'", P->PalInfo, Name); } if (!ValidBitmapSize (P->Width, P->Height)) { - Error ("PCX file `%s' has an unsupported size (w=%u, h=%d)", + Error ("PCX file '%s' has an unsupported size (w=%u, h=%d)", Name, P->Width, P->Height); } @@ -261,7 +261,7 @@ Bitmap* ReadPCXFile (const Collection* A) /* Open the file */ FILE* F = fopen (Name, "rb"); if (F == 0) { - Error ("Cannot open PCX file `%s': %s", Name, strerror (errno)); + Error ("Cannot open PCX file '%s': %s", Name, strerror (errno)); } /* Read the PCX header */ @@ -357,7 +357,7 @@ Bitmap* ReadPCXFile (const Collection* A) /* Check for palette marker */ if (Read8 (F) != 0x0C) { - Error ("Invalid palette marker in PCX file `%s'", Name); + Error ("Invalid palette marker in PCX file '%s'", Name); } } else if (EndPos == CurPos) { @@ -367,12 +367,12 @@ Bitmap* ReadPCXFile (const Collection* A) /* Check the maximum index for safety */ if (MaxIdx > 15) { - Error ("PCX file `%s' contains more than 16 indexed colors " + Error ("PCX file '%s' contains more than 16 indexed colors " "but no extra palette", Name); } } else { - Error ("Error in PCX file `%s': %lu bytes at end of pixel data", + Error ("Error in PCX file '%s': %lu bytes at end of pixel data", Name, EndPos - CurPos); } diff --git a/src/sp65/vic2sprite.c b/src/sp65/vic2sprite.c index 3e99ec7b2..4ea71b562 100644 --- a/src/sp65/vic2sprite.c +++ b/src/sp65/vic2sprite.c @@ -81,9 +81,9 @@ static enum Mode GetMode (const Collection* A) } else if (strcmp (Mode, "multicolor") == 0) { return smMultiColor; } else { - Error ("Invalid value for attribute `mode'"); + Error ("Invalid value for attribute 'mode'"); } - } + } return smAuto; } diff --git a/src/sp65/vic2sprite.h b/src/sp65/vic2sprite.h index b6c839c7c..ce2f078e4 100644 --- a/src/sp65/vic2sprite.h +++ b/src/sp65/vic2sprite.h @@ -54,7 +54,7 @@ StrBuf* GenVic2Sprite (const Bitmap* B, const Collection* A); -/* Generate binary output in VICII sprite format for the bitmap B. The output +/* Generate binary output in VICII sprite format for the bitmap B. The output ** is stored in a string buffer (which is actually a dynamic char array) and ** returned. */ diff --git a/targettest/Makefile b/targettest/Makefile new file mode 100644 index 000000000..0450bfd4e --- /dev/null +++ b/targettest/Makefile @@ -0,0 +1,865 @@ +# +# Makefile for cc65 testcode +# +# This Makefile requires GNU make +# + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= c64 + +# Just the usual way to define a variable +# containing a single space character. +SPACE := +SPACE += + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 +else + AS := $(if $(wildcard ../bin/ca65*),../bin/ca65,ca65) + CC := $(if $(wildcard ../bin/cc65*),../bin/cc65,cc65) + CL := $(if $(wildcard ../bin/cl65*),../bin/cl65,cl65) + LD := $(if $(wildcard ../bin/ld65*),../bin/ld65,ld65) +endif + +ifneq ($(filter disk testcode.%,$(MAKECMDGOALS)),) + ifdef CC65_HOME + TARGET_PATH = $(CC65_HOME)/target + else + TARGET_PATH := $(if $(wildcard ../target),../target,$(shell $(CL) --print-target-path)) + endif + + # If TARGET_PATH contains spaces then it is presumed to contain escaped spaces. GNU make + # has very limited support for paths containing spaces. $(wildcard) is the only function + # that is aware of escaped spaces. However, $(wildcard) never returns paths with escaped + # spaces !!! So if it e.g. finds 4 files in a path with 2 spaces then one ends up with a + # return value consisting of 12 plain words :-(( + # + # Fortunately we can work around that behaviour here because we know that the files we + # are looking for have known extensions. So we can $(filter) the in our example above 12 + # words for file extensions so we come up with 4 path fragments. Then we remove those + # path fragments with $(notdir) from the file names. + # + # So far so good. But here we want to process files from different paths in a single + # recipe further down below and therefore want to prepend the paths to the files with + # $(addprefix). However, $(foreach) isn't aware of escaped spaces (only $(wildcard) is). + # Therefore, we need to replace the spaces with some other character temporarily in order + # to have $(foreach) generate one invocation per file. We use the character '?' for that + # purpose here, just because it is known to not be part of file names. + # + # Inside the recipe generated per file we then replace the '?' again with a space. As we + # want to be compatible with cmd.exe for execution we're not using an escaped space but + # rather double-quote the whole path. + # + # Note: The "strange" $(wildcard) further down below just serves the purpose to unescape + # spaces for cmd.exe. This could have as well been done with another $(subst). + + SUBST_TARGET_PATH := $(subst \$(SPACE),?,$(TARGET_PATH)) + + EMD := $(wildcard $(TARGET_PATH)/$(SYS)/drv/emd/*) + MOU := $(wildcard $(TARGET_PATH)/$(SYS)/drv/mou/*) + TGI := $(wildcard $(TARGET_PATH)/$(SYS)/drv/tgi/*) + + EMD := $(addprefix $(SUBST_TARGET_PATH)/$(SYS)/drv/emd/,$(notdir $(filter %.emd,$(EMD)))) + MOU := $(addprefix $(SUBST_TARGET_PATH)/$(SYS)/drv/mou/,$(notdir $(filter %.mou,$(MOU)))) + TGI := $(addprefix $(SUBST_TARGET_PATH)/$(SYS)/drv/tgi/,$(notdir $(filter %.tgi,$(TGI)))) + + # This one comes with the VICE emulator. + # See http://vice-emu.sourceforge.net/ + C1541 ?= c1541 + + # For this one, see https://applecommander.github.io/ + AC ?= ac.jar + + # For this one, see https://www.horus.com/~hias/atari/ + DIR2ATR ?= dir2atr +endif + +DISK_c64 = testcode.d64 +DISK_apple2 = testcode.dsk +DISK_apple2enh = testcode.dsk +DISK_atari = testcode.atr +DISK_atarixl = testcode.atr + +# -------------------------------------------------------------------------- +# System-dependent settings +# For convenience, these groups and lines are sorted alphabetically, first +# by target-machine group, then by mission, then by program and sub-target. + +# -------------------------------------------------------------------------- +# Generic rules + +.PHONY: testcode all mostlyclean clean zip disk platforms + +%: %.c +%: %.s + +.c.o: + $(CC) $(CFLAGS) -Ors --codesize 500 -T -g -t $(SYS) $< + $(AS) $(<:.c=.s) + +.s.o: + $(AS) $(ASFLAGS) -t $(SYS) $< + +.PRECIOUS: %.o + +LDFLAGS= +ifeq ($(SYS),c64) + LDFLAGS+=-Ln $@.lbl +endif +ifeq ($(SYS),c128) + LDFLAGS+=-Ln $@.lbl +endif +ifeq ($(SYS),c16) + LDFLAGS+=-Ln $@.lbl +endif +ifeq ($(SYS),cbm510) + LDFLAGS+=-Ln $@.lbl +endif +ifeq ($(SYS),cbm610) + LDFLAGS+=-Ln $@.lbl +endif +ifeq ($(SYS),cx16) + LDFLAGS+=-Ln $@.lbl +endif +ifeq ($(SYS),geos-cbm) + LDFLAGS+=-Ln $@.lbl +endif +ifeq ($(SYS),lunix) + LDFLAGS+=-Ln $@.lbl +endif +ifeq ($(SYS),pet) + LDFLAGS+=-Ln $@.lbl +endif +ifeq ($(SYS),pet-overlay) + LDFLAGS+=-Ln $@.lbl +endif +ifeq ($(SYS),plus4) + LDFLAGS+=-Ln $@.lbl +endif +ifeq ($(SYS),vic20) + LDFLAGS+=-Ln $@.lbl +endif + +ifeq ($(SYS),pce) + LDFLAGS+=-D__CARTSIZE__=0x8000 +endif + +.o: +ifeq ($(SYS),vic20) + $(LD) $(LDFLAGS_$(@F)_$(SYS)) $(LDFLAGS) -o $@ -C vic20-32k.cfg -m $@.map $^ $(SYS).lib +else + $(LD) $(LDFLAGS_$(@F)_$(SYS)) $(LDFLAGS) -o $@ -t $(SYS) -m $@.map $^ $(SYS).lib +endif + +# -------------------------------------------------------------------------- +# Lists of subdirectories + +DIRLIST = accelerator atari cbm gamate pce + +# -------------------------------------------------------------------------- +# Lists of executables + +# omitted: seek +EXELIST_c64 = \ + minimal \ + arg-test \ + clock \ + clock-test \ + conio \ + cpeek-test \ + cprintf \ + cursor \ + deb \ + dir-test \ + div-test \ + em-test \ + exec-test1 \ + exec-test2 \ + fileio-test \ + ft \ + getopt-test \ + heaptest \ + joy-test \ + moddiv-test \ + mouse-test \ + mul-test \ + posixio-test \ + rename-test \ + scanf-test \ + ser-test \ + strdup-test \ + strnlen \ + stroserror-test \ + strqtok-test \ + uname-test + +# omitted: seek +EXELIST_c128 = \ + minimal \ + arg-test \ + clock \ + clock-test \ + conio \ + cpeek-test \ + cprintf \ + cursor \ + deb \ + dir-test \ + div-test \ + em-test \ + exec-test1 \ + exec-test2 \ + fileio-test \ + ft \ + getopt-test \ + heaptest \ + joy-test \ + moddiv-test \ + mouse-test \ + mul-test \ + posixio-test \ + rename-test \ + scanf-test \ + ser-test \ + strdup-test \ + strnlen \ + stroserror-test \ + strqtok-test \ + uname-test + + +# omitted: seek clock clock-test mouse-test ser-test +EXELIST_c16 = \ + minimal \ + arg-test \ + conio \ + cpeek-test \ + cprintf \ + cursor \ + deb \ + dir-test \ + div-test \ + em-test \ + exec-test1 \ + exec-test2 \ + fileio-test \ + ft \ + getopt-test \ + heaptest \ + joy-test \ + moddiv-test \ + mul-test \ + posixio-test \ + rename-test \ + scanf-test \ + strdup-test \ + strnlen \ + stroserror-test \ + strqtok-test \ + uname-test + +# omitted: seek ser-test +EXELIST_cbm510 = \ + minimal \ + arg-test \ + clock \ + clock-test \ + conio \ + cpeek-test \ + cprintf \ + cursor \ + deb \ + dir-test \ + div-test \ + em-test \ + exec-test1 \ + exec-test2 \ + fileio-test \ + ft \ + getopt-test \ + heaptest \ + joy-test \ + moddiv-test \ + mouse-test \ + mul-test \ + posixio-test \ + rename-test \ + scanf-test \ + strdup-test \ + strnlen \ + stroserror-test \ + strqtok-test \ + uname-test + +# omitted: joy-test mouse-test seek +EXELIST_cbm610 = \ + minimal \ + arg-test \ + clock \ + clock-test \ + conio \ + cpeek-test \ + cprintf \ + cursor \ + deb \ + dir-test \ + div-test \ + em-test \ + exec-test1 \ + exec-test2 \ + fileio-test \ + ft \ + getopt-test \ + heaptest \ + moddiv-test \ + mul-test \ + posixio-test \ + rename-test \ + scanf-test \ + ser-test \ + strdup-test \ + strnlen \ + stroserror-test \ + strqtok-test \ + uname-test + +# omitted: clock-test em-test mouse-test seek ser-test +EXELIST_pet = \ + minimal \ + arg-test \ + clock \ + conio \ + cpeek-test \ + cprintf \ + cursor \ + deb \ + dir-test \ + div-test \ + exec-test1 \ + exec-test2 \ + fileio-test \ + ft \ + getopt-test \ + heaptest \ + joy-test \ + moddiv-test \ + mul-test \ + posixio-test \ + rename-test \ + scanf-test \ + strdup-test \ + strnlen \ + stroserror-test \ + strqtok-test \ + uname-test + +# omitted: clock-test em-test mouse-test seek +EXELIST_plus4 = \ + minimal \ + arg-test \ + clock \ + conio \ + cpeek-test \ + cprintf \ + cursor \ + deb \ + dir-test \ + div-test \ + exec-test1 \ + exec-test2 \ + fileio-test \ + ft \ + getopt-test \ + heaptest \ + joy-test \ + moddiv-test \ + mul-test \ + posixio-test \ + rename-test \ + scanf-test \ + ser-test \ + strdup-test \ + strnlen \ + stroserror-test \ + strqtok-test \ + uname-test + +# omitted: seek clock-test mouse-test ser-test +EXELIST_vic20 = \ + minimal \ + arg-test \ + clock \ + conio \ + cpeek-test \ + cprintf \ + cursor \ + deb \ + dir-test \ + div-test \ + em-test \ + exec-test1 \ + exec-test2 \ + fileio-test \ + ft \ + getopt-test \ + heaptest \ + joy-test \ + moddiv-test \ + mul-test \ + posixio-test \ + rename-test \ + scanf-test \ + strdup-test \ + strnlen \ + stroserror-test \ + strqtok-test \ + uname-test + +# omitted: cpeek-test, clock +EXELIST_apple2 = \ + minimal \ + arg-test \ + clock-test \ + conio \ + cprintf \ + cursor \ + deb \ + dir-test \ + div-test \ + em-test \ + exec-test1 \ + exec-test2 \ + fileio-test \ + ft \ + getopt-test \ + heaptest \ + joy-test \ + moddiv-test \ + mouse-test \ + mul-test \ + posixio-test \ + rename-test \ + scanf-test \ + seek \ + ser-test \ + strdup-test \ + strnlen \ + stroserror-test \ + strqtok-test \ + uname-test + +EXELIST_apple2enh = $(EXELIST_apple2) + +# omitted: cpeek-test +EXELIST_atari = \ + minimal \ + arg-test \ + clock-test \ + clock \ + conio \ + cprintf \ + cursor \ + deb \ + dir-test \ + div-test \ + em-test \ + exec-test1 \ + exec-test2 \ + fileio-test \ + ft \ + getopt-test \ + heaptest \ + joy-test \ + moddiv-test \ + mouse-test \ + mul-test \ + posixio-test \ + rename-test \ + scanf-test \ + seek \ + ser-test \ + strdup-test \ + strnlen \ + stroserror-test \ + strqtok-test \ + uname-test + +EXELIST_atarixl = $(EXELIST_atari) + +# omitted: clock-test cpeek-test deb dir-test em-test exec-test1 exec-test2 +# joy-test mouse-test rename-test seek ser-test stroserror-test +EXELIST_telestrat = \ + minimal \ + arg-test \ + clock \ + conio \ + cprintf \ + cursor \ + div-test \ + fileio-test \ + ft \ + getopt-test \ + heaptest \ + moddiv-test \ + mul-test \ + posixio-test \ + scanf-test \ + strdup-test \ + strnlen \ + strqtok-test \ + uname-test + +# omitted: arg-test clock-test clock cpeek-test conio cprintf cursor deb dir-test +# em-test exec-test1 exec-test2 fileio-test ft getopt-test heaptest joy-test +# mouse-test mul-test posixio-test rename-test scanf-test seek ser-test strdup-test +# stroserror-test uname-test +EXELIST_sym1 = \ + minimal \ + div-test \ + moddiv-test \ + strnlen \ + strqtok-test + +# omitted: clock-test cpeek-test conio deb dir-test em-test exec-test1 exec-test2 +# fileio-test ft mouse-test posixio-test rename-test seek ser-test +EXELIST_atmos = \ + minimal \ + arg-test \ + clock \ + cprintf \ + cursor \ + div-test \ + getopt-test \ + heaptest \ + joy-test \ + moddiv-test \ + mul-test \ + scanf-test \ + strdup-test \ + strnlen \ + stroserror-test \ + strqtok-test \ + uname-test + +# omitted: arg-test clock-test clock cpeek-test conio cprintf deb dir-test div-test +# em-test exec-test1 exec-test2 fileio-test ft getopt-test heaptest joy-test moddiv-test +# mouse-test mul-test posixio-test rename-test scanf-test seek ser-test strdup-test +# strnlen stroserror-test strqtok-test uname-test +EXELIST_creativision = \ + minimal \ + cursor + +# omitted: cpeek-test seek ser-test +EXELIST_cx16 = \ + minimal \ + arg-test \ + clock-test \ + clock \ + conio \ + cprintf \ + cursor \ + deb \ + dir-test \ + div-test \ + em-test \ + exec-test1 \ + exec-test2 \ + fileio-test \ + ft \ + getopt-test \ + heaptest \ + joy-test \ + moddiv-test \ + mouse-test \ + mul-test \ + posixio-test \ + rename-test \ + scanf-test \ + strdup-test \ + strnlen \ + stroserror-test \ + strqtok-test \ + uname-test + +# omitted: arg-test clock-test clock cpeek-test cprintf cursor deb dir-test div-test +# em-test exec-test1 exec-test2 fileio-test ft getopt-test heaptest joy-test moddiv-test +# mouse-test mul-test posixio-test rename-test scanf-test seek ser-test strdup-test +# strnlen stroserror-test strqtok-test uname-test +EXELIST_nes = \ + minimal \ + conio + +# omitted: arg-test clock-test clock cpeek-test cprintf cursor deb dir-test div-test +# em-test exec-test1 exec-test2 fileio-test ft getopt-test heaptest joy-test moddiv-test +# mouse-test mul-test posixio-test rename-test scanf-test seek ser-test strdup-test +# strnlen stroserror-test strqtok-test uname-test +EXELIST_pce = \ + minimal \ + conio + +# omitted: arg-test clock-test clock cpeek-test conio cprintf deb dir-test div-test +# em-test exec-test1 exec-test2 fileio-test ft getopt-test heaptest joy-test moddiv-test +# mouse-test posixio-test rename-test scanf-test seek ser-test strdup-test strnlen +# stroserror-test strqtok-test uname-test +EXELIST_osic1p = \ + minimal \ + cursor \ + mul-test + +# omitted: arg-test clock-test clock cpeek-test conio cprintf deb dir-test div-test +# em-test exec-test1 exec-test2 fileio-test ft getopt-test heaptest joy-test moddiv-test +# mouse-test posixio-test rename-test scanf-test seek ser-test strdup-test strnlen +# stroserror-test strqtok-test uname-test +EXELIST_geos-apple = \ + minimal \ + cursor \ + mul-test + +# omitted: arg-test clock-test clock cpeek-test conio cprintf deb dir-test div-test +# em-test exec-test1 exec-test2 fileio-test ft getopt-test heaptest joy-test moddiv-test +# mouse-test posixio-test rename-test scanf-test seek ser-test strdup-test strnlen +# stroserror-test strqtok-test uname-test + +EXELIST_geos-cbm = \ + minimal \ + cursor \ + mul-test + +# omitted: clock clock-test conio cpeek-test cprintf cursor deb dir-test em-test +# exec-test1 exec-test2 ft heaptest joy-test mouse-test mul-test rename-test seek +# ser-test strdup-test stroserror-test uname-test +EXELIST_sim6502 = \ + minimal \ + arg-test \ + div-test \ + fileio-test \ + getopt-test \ + moddiv-test \ + posixio-test \ + scanf-test \ + strnlen \ + strqtok-test + +EXELIST_sim65c02 = $(EXELIST_sim6502) + + +# omitted: arg-test clock clock-test conio cpeek-test cprintf cursor deb dir-test +# div-test em-test exec-test1 exec-test2 fileio-test ft getopt-test heaptest +# joy-test moddiv-test mouse-test mul-test posixio-test rename-test scanf-test +# ser-test seek strdup-test strnlen stroserror-test strqtok-test tinyshell uname-test +EXELIST_atari2600 = \ + minimal + +EXELIST_atari5200 = \ + minimal + +EXELIST_atari7800 = \ + minimal + +EXELIST_gamate = \ + minimal + +EXELIST_lynx = \ + minimal + +EXELIST_supervision = \ + minimal + +# none of the testcode can work on the bbc (no library support) +EXELIST_bbc = \ + notavailable + +# none of the testcode can work on lunix (no library support) +EXELIST_lunix = \ + notavailable + +# Unlisted targets will try to build everything. +# That lets us learn what they cannot build, and what settings +# we need to use for programs that can be built and run. +ifndef EXELIST_$(SYS) +EXELIST_$(SYS) := ${patsubst %.c,%,$(wildcard *.c)} +endif + +define SUBDIR_recipe + +@+$(MAKE) -C $(dir) --no-print-directory $@ + +endef # SUBDIR_recipe + +# -------------------------------------------------------------------------- +# Rules to make the binaries and the disk + +testcode: $(EXELIST_$(SYS)) + $(foreach dir,$(DIRLIST),$(SUBDIR_recipe)) + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: generic targettest programs not available for" $(SYS) +endif + +disk: $(DISK_$(SYS)) + +all: + +# -------------------------------------------------------------------------- +# List of every supported platform +TARGETS := \ + apple2 \ + apple2enh \ + atari \ + atarixl \ + atari2600 \ + atari5200 \ + atari7800 \ + atmos \ + bbc \ + c128 \ + c16 \ + c64 \ + cbm510 \ + cbm610 \ + creativision \ + cx16 \ + gamate \ + lunix \ + lynx \ + nes \ + osic1p \ + pce \ + pet \ + plus4 \ + sim6502 \ + sim65c02 \ + supervision \ + sym1 \ + telestrat \ + vic20 + +# -------------------------------------------------------------------------- +# Rule to make the binaries for every platform + +define TARGET_recipe + +@$(MAKE) -j2 SYS:=$(T) +@$(MAKE) --no-print-directory clean SYS:=$(T) + +endef # TARGET_recipe + +platforms: + $(foreach T,$(TARGETS),$(TARGET_recipe)) + +# -------------------------------------------------------------------------- +# some programs link against getsp.o + +mouse-test: mouse-test.o getsp.o + $(LD) $(LDFLAGS) -t $(SYS) -o $@ $^ $(SYS).lib + +ifneq ($(SYS),vic20) +ft: ft.o getsp.o + $(LD) $(LDFLAGS) -t $(SYS) -o $@ $^ $(SYS).lib +endif + +# some programs need more memory on the vic20 + +ifeq ($(SYS),vic20) +ft: ft.o getsp.o + $(LD) $(LDFLAGS) -o $@ -C vic20-32k.cfg -m $@.map $^ $(SYS).lib +endif + +# -------------------------------------------------------------------------- +# Rule to make a CBM disk with all testcode. Needs the c1541 program that comes +# with the VICE emulator. + +define D64_WRITE_PRG_recipe + +$(C1541) -attach $@ -write "$(subst ?,$(SPACE),$(file))" $(notdir $(file)),p >$(NULLDEV) + +endef # D64_WRITE_PRG_recipe + +define D64_WRITE_SEQ_recipe + +$(C1541) -attach $@ -write "$(subst ?,$(SPACE),$(file))" $(notdir $(file)),s >$(NULLDEV) + +endef # D64_WRITE_SEQ_recipe + +testcode.d64: testcode + @$(C1541) -format testcode,AA d64 $@ >$(NULLDEV) + $(foreach file,$(EXELIST_$(SYS)),$(D64_WRITE_PRG_recipe)) +# $(foreach file,$(EMD) $(MOU) $(TGI),$(D64_WRITE_SEQ_recipe)) + +# -------------------------------------------------------------------------- +# Rule to make an Apple II disk with all testcode. Needs the AppleCommander +# program, available at https://applecommander.github.io/, and a template disk +# named 'prodos.dsk'. + +define DSK_WRITE_BIN_recipe + +$(if $(findstring BF00,$(LDFLAGS_$(notdir $(file))_$(SYS))), \ + java -jar $(AC) -p $@ $(notdir $(file)).system sys <"$(wildcard $(TARGET_PATH)/$(SYS)/util/loader.system)") +java -jar $(AC) -as $@ $(notdir $(file)) <"$(file)" + +endef # DSK_WRITE_BIN_recipe + +define DSK_WRITE_REL_recipe + +java -jar $(AC) -p $@ $(notdir $(file)) rel 0 <"$(subst ?,$(SPACE),$(file))" + +endef # DSK_WRITE_REL_recipe + +testcode.dsk: testcode + cp prodos.dsk $@ + $(foreach file,$(EXELIST_$(SYS)),$(DSK_WRITE_BIN_recipe)) +# $(foreach file,$(EMD) $(MOU) $(TGI),$(DSK_WRITE_REL_recipe)) + +# -------------------------------------------------------------------------- +# Rule to make an Atari disk with all testcode. Needs the dir2atr program +# available at http://www.horus.com/~hias/atari/ and the MyDos4534 variant +# of dos.sys and dup.sys. + +define ATR_WRITE_recipe + +cp "$(subst ?,$(SPACE),$(file))" atr/$(notdir $(file)) + +endef # ATR_WRITE_recipe + +testcode.atr: testcode + @mkdir atr + cp "dos.sys" atr/dos.sys + cp "dup.sys" atr/dup.sys + @$(foreach file,$(EXELIST_$(SYS)),$(ATR_WRITE_recipe)) +# @$(foreach file,$(EMD) $(MOU) $(TGI),$(ATR_WRITE_recipe)) + $(DIR2ATR) -d -b MyDos4534 3200 $@ atr + @$(RMDIR) atr + +# -------------------------------------------------------------------------- +# Clean-up rules + +mostlyclean: + @$(DEL) *.lbl *.map *.o 2>$(NULLDEV) +# we cant use .s since we have asm files in the directory that we want to keep + @$(DEL) ${patsubst %.c,%.s,$(wildcard *.c)} 2>$(NULLDEV) + +clean: mostlyclean + @$(DEL) $(EXELIST_$(SYS)) $(DISK_$(SYS)) 2>$(NULLDEV) + $(foreach dir,$(DIRLIST),$(SUBDIR_recipe)) diff --git a/targettest/accelerator/Makefile b/targettest/accelerator/Makefile new file mode 100644 index 000000000..dd5011459 --- /dev/null +++ b/targettest/accelerator/Makefile @@ -0,0 +1,85 @@ +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= c64 + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) +endif + +EXELIST_c64 = \ + c64-scpu-test.prg \ + c64dtv-test.prg \ + c64-test.prg \ + chameleon-test.prg \ + c65-test.prg \ + turbomaster-test.prg + +EXELIST_c128 = \ + c128-scpu-test.prg \ + c128-test.prg + +ifneq ($(EXELIST_$(SYS)),) +testcode: $(EXELIST_$(SYS)) +else +testcode: notavailable +endif + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: accelerator tests not available for" $(SYS) +else +# suppress the "nothing to be done for 'testcode' message + @echo > $(NULLDEV) +endif + +c64-scpu-test.prg: c64-c128-scpu-test.c + $(CL) -t c64 c64-c128-scpu-test.c -o c64-scpu-test.prg + +c128-scpu-test.prg: c64-c128-scpu-test.c + $(CL) -t c128 c64-c128-scpu-test.c -o c128-scpu-test.prg + +c64dtv-test.prg: c64dtv-test.c + $(CL) -t c64 c64dtv-test.c -o c64dtv-test.prg + +c64-test.prg: c64-c128-test.c + $(CL) -t c64 c64-c128-test.c -o c64-test.prg + +c128-test.prg: c64-c128-test.c + $(CL) -t c128 c64-c128-test.c -o c128-test.prg + +chameleon-test.prg: chameleon-test.c + $(CL) -t c64 chameleon-test.c -o chameleon-test.prg + +c65-test.prg: c65-test.c + $(CL) -t c64 c65-test.c -o c65-test.prg + +turbomaster-test.prg: turbomaster-test.c + $(CL) -t c64 turbomaster-test.c -o turbomaster-test.prg + +clean: + @$(DEL) *.prg 2>$(NULLDEV) diff --git a/targettest/accelerator/c64-c128-scpu-test.c b/targettest/accelerator/c64-c128-scpu-test.c new file mode 100644 index 000000000..975244df5 --- /dev/null +++ b/targettest/accelerator/c64-c128-scpu-test.c @@ -0,0 +1,8 @@ +/* C64/C128 SuperCPU accelerator test code. */ + +#define ACC_DETECT detect_scpu +#define ACC_GET_SPEED get_scpu_speed +#define ACC_SET_SPEED set_scpu_speed +#define ACC_NAME "SuperCPU" + +#include "turbo-test.c" diff --git a/targettest/accelerator/c64-c128-test.c b/targettest/accelerator/c64-c128-test.c new file mode 100644 index 000000000..ba212e03d --- /dev/null +++ b/targettest/accelerator/c64-c128-test.c @@ -0,0 +1,8 @@ +/* C128 in C64 mode accelerator test code. */ + +#define ACC_DETECT detect_c128 +#define ACC_GET_SPEED get_c128_speed +#define ACC_SET_SPEED set_c128_speed +#define ACC_NAME "C128 CPU" + +#include "turbo-test.c" diff --git a/targettest/accelerator/c64dtv-test.c b/targettest/accelerator/c64dtv-test.c new file mode 100644 index 000000000..34f0410d9 --- /dev/null +++ b/targettest/accelerator/c64dtv-test.c @@ -0,0 +1,8 @@ +/* C64DTV accelerator test code. */ + +#define ACC_DETECT detect_c64dtv +#define ACC_GET_SPEED get_c64dtv_speed +#define ACC_SET_SPEED set_c64dtv_speed +#define ACC_NAME "C64DTV" + +#include "turbo-test.c" diff --git a/targettest/accelerator/c65-test.c b/targettest/accelerator/c65-test.c new file mode 100644 index 000000000..02e322625 --- /dev/null +++ b/targettest/accelerator/c65-test.c @@ -0,0 +1,8 @@ +/* C65/C64DX in C64 mode accelerator test code. */ + +#define ACC_DETECT detect_c65 +#define ACC_GET_SPEED get_c65_speed +#define ACC_SET_SPEED set_c65_speed +#define ACC_NAME "C65" + +#include "turbo-test.c" diff --git a/targettest/accelerator/chameleon-test.c b/targettest/accelerator/chameleon-test.c new file mode 100644 index 000000000..ffc1539b5 --- /dev/null +++ b/targettest/accelerator/chameleon-test.c @@ -0,0 +1,8 @@ +/* C64 Chameleon accelerator test code. */ + +#define ACC_DETECT detect_chameleon +#define ACC_GET_SPEED get_chameleon_speed +#define ACC_SET_SPEED set_chameleon_speed +#define ACC_NAME "Chameleon cartridge" + +#include "turbo-test.c" diff --git a/targettest/accelerator/turbo-test.c b/targettest/accelerator/turbo-test.c new file mode 100644 index 000000000..8c854c00c --- /dev/null +++ b/targettest/accelerator/turbo-test.c @@ -0,0 +1,57 @@ +/* Accelerator test code. */ + +#ifndef ACC_DETECT +#error This file cannot be used directly (yet) +#endif + +#include <time.h> +#include <accelerator.h> +#include <stdio.h> +#include <conio.h> +#include <stdlib.h> + +static void print_time_taken(void) +{ + clock_t curtime = clock(); + clock_t newtime; + unsigned long i; + char buffer[10]; + + printf("Doing a speed test, please wait\n"); + for (i = 0; i < 0x1000; i++) { } + newtime = clock() - curtime; + ultoa(newtime, buffer, 10); + printf("Time taken : %s\n", buffer); +} + +static void print_current_speed(void) +{ + unsigned char status; + + status = ACC_GET_SPEED(); + printf("Current "ACC_NAME" speed : %d\n", status + 1); +} + +void main(void) +{ + unsigned char status; + unsigned char speed = 0; + + status = ACC_DETECT(); + clrscr(); + if (status == 0) { + printf("No "ACC_NAME" detected\n"); + } else { + status = ACC_GET_SPEED(); + print_current_speed(); + + /* cycle through all the speeds */ + for (speed = SPEED_1X; speed <= SPEED_20X; ++speed) { + printf("Setting "ACC_NAME" speed to %d\n", speed + 1); + ACC_SET_SPEED(speed); + print_current_speed(); + print_time_taken(); + } + ACC_SET_SPEED(status); + } +} diff --git a/targettest/accelerator/turbomaster-test.c b/targettest/accelerator/turbomaster-test.c new file mode 100644 index 000000000..207465efa --- /dev/null +++ b/targettest/accelerator/turbomaster-test.c @@ -0,0 +1,8 @@ +/* C64 Turbo Master accelerator test code. */ + +#define ACC_DETECT detect_turbomaster +#define ACC_GET_SPEED get_turbomaster_speed +#define ACC_SET_SPEED set_turbomaster_speed +#define ACC_NAME "Turbo Master cartridge" + +#include "turbo-test.c" diff --git a/testcode/lib/arg-test.c b/targettest/arg-test.c similarity index 100% rename from testcode/lib/arg-test.c rename to targettest/arg-test.c diff --git a/targettest/atari/Makefile b/targettest/atari/Makefile new file mode 100644 index 000000000..dd4f6078f --- /dev/null +++ b/targettest/atari/Makefile @@ -0,0 +1,87 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= atari + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) +endif + +EXELIST_atari = \ + charmapping.xex \ + defdev.xex \ + displaylist.xex \ + mem.xex \ + multi.xex \ + ostype.xex \ + scrcode.com \ + sys.xex + +ifneq ($(EXELIST_$(SYS)),) +testcode: $(EXELIST_$(SYS)) +else +testcode: notavailable +endif + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: atari tests not available for" $(SYS) +else +# suppress the "nothing to be done for 'testcode' message + @echo > $(NULLDEV) +endif + +charmapping.xex: charmapping.c + $(CL) -t atari -o charmapping.xex charmapping.c +defdev.xex: defdev.c + $(CL) -t atari -o defdev.xex defdev.c +displaylist.xex: displaylist.c + $(CL) -t atari -o displaylist.xex displaylist.c +mem.xex: mem.c ../getsp.s + $(CL) -t atari -o mem.xex mem.c ../getsp.s +multi.xex: multi-xex.s multi-xex.cfg + $(CL) -t atari -C multi-xex.cfg multi-xex.s -o multi.xex +ostype.xex: ostype.c + $(CL) -t atari -o ostype.xex ostype.c +scrcode.com: scrcode.s +# ca65 -t atari -o scrcode.o scrcode.s +# ld65 -C atari-asm.cfg -o scrcode.com scrcode.o + $(CL) -t atari -C atari-asm.cfg -o scrcode.com scrcode.s +sys.xex: sys.c + $(CL) -t atari -o sys.xex sys.c + +clean: + @$(DEL) charmapping.xex 2>$(NULLDEV) + @$(DEL) defdev.xex 2>$(NULLDEV) + @$(DEL) displaylist.xex 2>$(NULLDEV) + @$(DEL) mem.xex 2>$(NULLDEV) + @$(DEL) multi.xex 2>$(NULLDEV) + @$(DEL) ostype.xex 2>$(NULLDEV) + @$(DEL) scrcode.o 2>$(NULLDEV) + @$(DEL) scrcode.com 2>$(NULLDEV) + @$(DEL) sys.xex 2>$(NULLDEV) diff --git a/targettest/atari/asm-xex.s b/targettest/atari/asm-xex.s new file mode 100644 index 000000000..d2a8d0335 --- /dev/null +++ b/targettest/atari/asm-xex.s @@ -0,0 +1,51 @@ +; Sample using ATARI file format, by "atari-xex.cfg" linker configuration. +; +; This is a very simple example, shows a message to the screen, waits and +; returns to DOS. +; +; Compile with: +; cl65 -tatari -Catari-xex.cfg asm-xex.s -o prog.xex + + .include "atari.inc" + +; Default RUNAD is "start", export that: + .export start + + +; Write string to screen +.proc puts + sta ICBAL + stx ICBAH + lda #PUTREC + sta ICCOM + ldx #$FF + stx ICBLL + inx + stx ICBLH + jsr CIOV + rts +.endproc + + +; Write a message and exit + +.proc start + lda #<msg + ldx #>msg + jsr puts + + + ; Delay before returning to DOS + lda #0 + tax +loop: + inx + cpx #$FF + adc #0 + bcc loop + + rts +.endproc + +msg: .byte "Hello world", ATEOL + diff --git a/targettest/atari/charmapping.c b/targettest/atari/charmapping.c new file mode 100644 index 000000000..5fce663ee --- /dev/null +++ b/targettest/atari/charmapping.c @@ -0,0 +1,63 @@ +/* +** testprogram for includes "atari_screen_charmap.h" and "atari_atascii_charmap.h" +** +** 19-Aug-2016, Christian Krueger +*/ + +#include <conio.h> +#include <atari.h> +#include <peekpoke.h> +#include <string.h> + + +char pcDefaultMappingString[] = "Hello Atari!"; + +#include <atari_screen_charmap.h> +char pcScreenMappingString[] = "Hello Atari!"; + +#include <atari_atascii_charmap.h> +char pcAtasciiMappingString[] = "Hello Atari!"; + +/* THIS WON'T work due to string merging/collection problems! +char* pcDefaultMappingString = "Hello Atari!"; + +#include <atari_screen_charmap.h> +char* pcScreenMappingString = "Hello Atari!"; + +#include <atari_atascii_charmap.h> +char* pcAtasciiMappingString = "Hello Atari!"; +*/ + +int +main(void) +{ + static unsigned char expectedAtasciiValues[] = { 40,101,108,108,111,0,33,116,97,114,105,1}; + + int returnValue = 0; + unsigned char* screen = (unsigned char*) PEEKW(88); + + // check default (=atascii) + clrscr(); + cputs(pcDefaultMappingString); + returnValue |= memcmp(screen, expectedAtasciiValues, sizeof(expectedAtasciiValues)); + + clrscr(); + memcpy(screen, pcScreenMappingString, sizeof(expectedAtasciiValues)); + returnValue |= memcmp(screen, expectedAtasciiValues, sizeof(expectedAtasciiValues)); + + clrscr(); + cputs(pcAtasciiMappingString); + returnValue |= memcmp(screen, expectedAtasciiValues, sizeof(expectedAtasciiValues)); + + clrscr(); + if (returnValue) + cputs("Test FAILED!"); + else + cputs("Test passed."); + + cputs("\n\rHit any key to exit..."); + cgetc(); + + return returnValue; +} + diff --git a/testcode/lib/atari/defdev.c b/targettest/atari/defdev.c similarity index 79% rename from testcode/lib/atari/defdev.c rename to targettest/atari/defdev.c index f679985ec..9b14e97fc 100644 --- a/testcode/lib/atari/defdev.c +++ b/targettest/atari/defdev.c @@ -7,12 +7,13 @@ #include <stdio.h> #include <conio.h> #include <atari.h> +#include <cc65.h> extern char _defdev[]; int main(void) { printf("default device: %s\n", _defdev); - if (_dos_type != SPARTADOS && _dos_type != OSADOS) cgetc(); + if (doesclrscrafterexit()) cgetc(); return 0; } diff --git a/targettest/atari/displaylist.c b/targettest/atari/displaylist.c new file mode 100644 index 000000000..ae1931e64 --- /dev/null +++ b/targettest/atari/displaylist.c @@ -0,0 +1,64 @@ +/* +** test program for ANTIC instructions as defined in "_antic.h" +** +** 23-Feb-2017, Christian Krueger +*/ + +#include <conio.h> +#include <atari.h> + +// code is only for testing purposes, as screen and display list are not aligned, +// and jumps not set! + +unsigned char DummyScreen[400]; + +void DisplayList = { + DL_BLK1, + DL_BLK2, + DL_BLK3, + DL_BLK4, + DL_BLK5, + DL_BLK6, + DL_BLK7, + DL_DLI(DL_BLK8), + DL_LMS(DL_CHR40x8x1), + DummyScreen, + DL_HSCROL(DL_CHR40x10x1), + DL_VSCROL(DL_CHR40x8x4), + DL_CHR40x16x4, + DL_LMS(DL_HSCROL(DL_VSCROL(DL_DLI(DL_CHR20x8x2)))), + DummyScreen+120, + DL_CHR20x16x2, + DL_MAP40x8x4, + DL_MAP80x4x2, + DL_MAP80x4x4, + DL_MAP160x2x2, + DL_MAP160x1x2, + DL_MAP160x2x4, + DL_MAP160x1x4, + DL_MAP320x1x1, + DL_JVB, + DL_JMP +}; + + +/* We know that the sizeof expression is constant; don't tell us. */ + +#pragma warn (const-comparison, off) + +int +main(void) +{ + int returnValue = (sizeof DisplayList != 28); // assure only one byte per instruction! + + clrscr(); + if (returnValue) + cputs("Test FAILED!"); + else + cputs("Test passed."); + + cputs("\n\rHit any key to exit..."); + cgetc(); + + return returnValue; +} diff --git a/testcode/lib/atari/mem.c b/targettest/atari/mem.c similarity index 93% rename from testcode/lib/atari/mem.c rename to targettest/atari/mem.c index 36222e08b..bc70aded6 100644 --- a/testcode/lib/atari/mem.c +++ b/targettest/atari/mem.c @@ -8,10 +8,10 @@ #include <stdlib.h> #include <conio.h> #include <atari.h> +#include <cc65.h> extern int getsp(void); /* comes from ../getsp.s */ -extern char _dos_type; /* bss variable */ unsigned char data = 0x12; /* data variable */ unsigned int *APPMHI = (unsigned int *)14; /* 14,15 */ @@ -42,6 +42,6 @@ int main(void) printf(" sp: $%04X (stack ptr)\n", getsp()); if (allocmem) free(allocmem); - if (_dos_type != 1) cgetc(); + if (doesclrscrafterexit()) cgetc(); return(0); } diff --git a/targettest/atari/multi-xex.cfg b/targettest/atari/multi-xex.cfg new file mode 100644 index 000000000..f13a9eabe --- /dev/null +++ b/targettest/atari/multi-xex.cfg @@ -0,0 +1,35 @@ +FEATURES { + STARTADDRESS: default = $2E00; +} +MEMORY { + ZP: file = "", define = yes, start = $0082, size = $007E; + # First memory segment in file, show message + LOADER: file = %O, start = $680, size = 128; + # Second memory segment in file, load over COLOR registers: + COLOR: file = %O, start = $2C4, size = 5; + # Third memory segment, load at page 6: + PAGE6: file = %O, start = $600, size = 128; + # Fourth memory segment in file, load over SDLST register: + SDLST: file = %O, start = $230, size = 2; + # Fifth/Main segment, load at "STARTADDRESS" + MAIN: file = %O, start = %S, size = $BC20 - %S; +} +FILES { + %O: format = atari; +} +FORMATS { + atari: runad = start, + initad = LOADER: show_load; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp, optional = yes; + # Place segments in memory areas: + LOADER: load = LOADER, type = rw; + COLOR: load = COLOR, type = rw; + PAGE6: load = PAGE6, type = rw; + SDLST: load = SDLST, type = rw; + CODE: load = MAIN, type = rw; + RODATA: load = MAIN, type = ro optional = yes; + DATA: load = MAIN, type = rw optional = yes; + BSS: load = MAIN, type = bss, optional = yes, define = yes; +} diff --git a/targettest/atari/multi-xex.s b/targettest/atari/multi-xex.s new file mode 100644 index 000000000..cdf43469d --- /dev/null +++ b/targettest/atari/multi-xex.s @@ -0,0 +1,80 @@ +; Multiple segment ATARI file format sample, using custom linker script. +; +; This sample defines a custom display-list screen with no code, writing all +; memory areas directly. +; +; See the linker script (multi-xex.cfg) for the definition of memory areas and +; segments. +; +; Compile with: +; cl65 -tatari -Cmulti-xex.cfg multi-xex.s -o prog.xex + + .include "atari.inc" + + .macpack atari + +; Default RUNAD is "start", export that: + .export start, show_load + +; Loader + .segment "LOADER" +show_load: + ldx #0 ; channel 0 + lda #<msg_load + sta ICBAL,x ; address + lda #>msg_load + sta ICBAH,x + lda #$FF + sta ICBLL,x ; length + sta ICBLH,x + lda #PUTREC + sta ICCOM,x + jmp CIOV + +msg_load: + .byte "Loading....", ATEOL + +; We load color values directly into registers + .segment "COLOR" + + .byte $16 ; COLOR0 + .byte $46 ; COLOR1 + .byte $00 ; COLOR2 + .byte $6A ; COLOR3 + .byte $82 ; COLOR4 + +; We load our display list over page 6 + .segment "PAGE6" + +display_list: + .byte DL_BLK8 + .byte DL_BLK8 + .byte DL_BLK8 + .byte DL_BLK8 + .byte DL_BLK8 + .byte DL_BLK8 + .byte DL_CHR20x8x2 | DL_LMS + .word screen_memory + .byte DL_CHR40x8x1 + .byte DL_JVB + .word display_list + +screen_memory: + ; first text line: 20 bytes + scrcode " HeLlO wOrLd! " + ; second text line, 40 bytes + .byte 0, 0, 0, 0, 0, 0, 0, 0,70,71,70,71,70,71,70,71,70,71,70,71 + .byte 70,71,70,71,70,71,70,71,70,71,70,71, 0, 0, 0, 0, 0, 0, 0, 0 + +; We write directly to the display list pointer + .segment "SDLST" + .word display_list + +; And we load our main program + .code + +.proc start + ; Jump forever + jmp start +.endproc + diff --git a/testcode/lib/atari/ostype.c b/targettest/atari/ostype.c similarity index 97% rename from testcode/lib/atari/ostype.c rename to targettest/atari/ostype.c index 552735ac8..5561f64fd 100644 --- a/testcode/lib/atari/ostype.c +++ b/targettest/atari/ostype.c @@ -9,9 +9,9 @@ int main(void) { + char *rev; unsigned int t, v; unsigned char palntsc; - unsigned char *rev; unsigned char minor; unsigned char c; diff --git a/testcode/lib/atari/scrcode.s b/targettest/atari/scrcode.s similarity index 90% rename from testcode/lib/atari/scrcode.s rename to targettest/atari/scrcode.s index cd4290781..ba778579b 100644 --- a/testcode/lib/atari/scrcode.s +++ b/targettest/atari/scrcode.s @@ -43,15 +43,20 @@ key: lda CH dispdata: scrcode "fooBa", 'r', $66, 3+4 disp_len = * - dispdata +.export __AUTOSTART__: absolute = 1 .segment "AUTOSTRT" .word $02E0 .word $02E1 .word __CODE_LOAD__+1 +.export __EXEHDR__: absolute = 1 .segment "EXEHDR" .word $FFFF + +.segment "MAINHDR" + .word __CODE_LOAD__ .word __BSS_LOAD__ - 1 diff --git a/testcode/lib/atari/sys.c b/targettest/atari/sys.c similarity index 96% rename from testcode/lib/atari/sys.c rename to targettest/atari/sys.c index 9ec7aa631..59debd758 100644 --- a/testcode/lib/atari/sys.c +++ b/targettest/atari/sys.c @@ -10,6 +10,8 @@ #include <6502.h> #include <conio.h> +#define IOCB (OS.iocb[0]) + static struct regs regs; static struct __iocb *iocb = &IOCB; /* use IOCB #0 */ diff --git a/targettest/cbm/Makefile b/targettest/cbm/Makefile new file mode 100644 index 000000000..47ae5171d --- /dev/null +++ b/targettest/cbm/Makefile @@ -0,0 +1,70 @@ +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= c64 + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) +endif + +EXELIST_c64 = \ + petscii.prg \ + cbmdir-test.prg + +EXELIST_vic20 = \ + cbmdir-test.prg + +ifneq ($(EXELIST_$(SYS)),) +testcode: $(EXELIST_$(SYS)) +else +testcode: notavailable +endif + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: cbm tests not available for" $(SYS) +else +# suppress the "nothing to be done for 'testcode' message + @echo > $(NULLDEV) +endif + +ifeq ($(SYS),c64) +petscii.prg: petscii.c + $(CL) -t $(SYS) -O -o petscii.prg petscii.c +else +petscii.prg: +endif + +cbmdir-test.prg: cbmdir-test.c +ifeq ($(SYS),vic20) + $(CL) -t $(SYS) -C vic20-32k.cfg -Oris -o $@ $< +else + $(CL) -t $(SYS) -Oris -o $@ $< +endif + +clean: + @$(DEL) *.lbl petscii.prg cbmdir-test.prg 2>$(NULLDEV) diff --git a/targettest/cbm/cbmdir-test.c b/targettest/cbm/cbmdir-test.c new file mode 100644 index 000000000..0db9856b7 --- /dev/null +++ b/targettest/cbm/cbmdir-test.c @@ -0,0 +1,119 @@ +/* +** Tests the CBM-specific directory functions. +** +** 2021-08-12, Greg King +*/ + +#include <stdio.h> +#include <string.h> +#include <errno.h> +#include <conio.h> +#include <cbm.h> + + +/* device number */ +#define UNIT 8 + +/* directory patterm */ +static const char name[] = "$"; + + +static const char* const type[] = { + "DEL", + "CBM", + "DIR", + "LNK", + "???", + "Directory header", + "", + "", + "", + "", + "", + "", + "", + "", + "", + "", + "SEQ", + "PRG", + "USR", + "REL", + "VRP" +}; + +static const char* const access[] = { + "unknown", + "read-only", + "write-only", + "read/write" +}; + +static const char* const error[] = { + "", + "couldn't read it", + "", + "couldn't find start of file-name", + "couldn't find end of file-name", + "couldn't read file-type", + "premature end of file" +}; + + +int main(void) +{ + unsigned char go = 0; + unsigned char rc; + struct cbm_dirent E; + + /* Explain use, and wait for a key. */ + printf ("use the following keys:\n" + " g -> go ahead without stopping\n" + " q -> quit directory lister\n" + "tap any key to start ...\n\n"); + cgetc (); + + /* Open the directory. */ + if (cbm_opendir (1, UNIT, name) != 0) { + printf("error opening %s:\n %s\n", name, _stroserror (_oserror)); + return 1; + } + + /* Output the directory. */ + printf("contents of \"%s\":\n", name); + while ((rc = cbm_readdir (1, &E)) != 2) { + if (rc != 0) { + goto oops; + } + + printf (" name[]: \"%s\"\n", E.name); + printf (" size :%6u\n", E.size); + printf (" type : %s\n", type[E.type]); + printf (" access: %s\n", access[E.access > 3 ? 0 : E.access]); + printf ("----\n"); + + if (!go) { + switch (cgetc ()) { + case 'q': + goto done; + + case 'g': + go = 1; + } + } + } + + printf (" size :%6u free.\n", E.size); + +done: + /* Close the directory. */ + cbm_closedir (1); + return 0; + +oops: + if (rc <= 6) { + printf ("\ndirectory error:\n %s.\n", error[rc]); + } + cbm_closedir (1); + return 1; +} diff --git a/targettest/cbm/petscii.c b/targettest/cbm/petscii.c new file mode 100644 index 000000000..7d5ba9528 --- /dev/null +++ b/targettest/cbm/petscii.c @@ -0,0 +1,162 @@ + +/* this program prints all available "petscii" characters to screen, once + using putchar (which wraps to kernal i/o) and once using conio (which + will do direct videoram access). after that the produced screencodes + are compared (they should match) (related to issue #988 */ + +#include <conio.h> +#include <stdlib.h> +#include <stdio.h> +#include <string.h> + +#if defined(__C64__) +#define VRAMPEEK(x) (*(char*)(0x0400 + (x))) +#define VRAMPOKE(x, y) *(char*)(0x0400 + (x)) = (y) +#define CRAMPEEK(x) ((*(char*)(0xd800 + (x))) & 15) +#define CRAMPOKE(x, y) *(char*)(0xd800 + (x)) = (y) +#else +#error "this target is not supported yet" +#endif + +unsigned char x, y, c; +unsigned char c1, c2; +unsigned char *p1, *p2; + +int err = 0; + +int main(void) +{ + clrscr(); + bgcolor(COLOR_BLACK); + bordercolor(COLOR_BLACK); + + /* output all characters using putchar() */ + c = 0; + for (y = 0; y < 16; y++) { + for (x = 0; x < 16; x++) { + /* skip the codes that are unprintable control codes */ + if (!((c < 32) || ((c > 127) && (c < 160)))) { + gotoxy(x, y); putchar(c); + } + c++; + } + } + + /* output all characters using conio */ + c = 0; + for (y = 0; y < 16; y++) { + for (x = 0; x < 16; x++) { + /* skip the codes that are unprintable control codes */ + if (!((c < 32) || ((c > 127) && (c < 160)))) { + gotoxy(x + 20, y); cputc(c); + } + c++; + } + } + + /* compare the two outputs */ + for (y = 0; y < 16; y++) { + for (x = 0; x < 16; x++) { + c1 = VRAMPEEK((y * 40) + x); + c2 = VRAMPEEK((y * 40) + x + 0x14); + if (c1 == c2) { + c = COLOR_GREEN; + } else { + c = COLOR_RED; + err = 1; + } + CRAMPOKE((y * 40) + x, c); + CRAMPOKE((y * 40) + x + 0x14, c); + } + } + + /* show the result */ + textcolor(COLOR_WHITE); + gotoxy(0, 17); + if (err) { + bordercolor(COLOR_RED); + cputs("errors detected"); + } else { + bordercolor(COLOR_GREEN); + cputs("all fine"); + } + cputs(" - press a key "); + cursor(1); + cgetc(); + cursor(0); + + clrscr(); + bordercolor(COLOR_BLACK); + + /* output all characters directly to the scree */ + c = 0; + for (y = 0; y < 16; y++) { + for (x = 0; x < 16; x++) { + VRAMPOKE((y * 40) + x, c); + CRAMPOKE((y * 40) + x, c & 15); + c++; + } + } + + /* read the characters with conio peek functions and output with conio */ + for (y = 0; y < 16; y++) { + for (x = 0; x < 16; x++) { + gotoxy(x, y); + c1 = cpeekc(); + c2 = cpeekrevers(); + c = cpeekcolor(); + + gotoxy(x + 0x14, y); + revers(c2); + textcolor(c); + cputc(c1); + } + } + + revers(0); + textcolor(COLOR_WHITE); + gotoxy(0, 17); + cputs("press a key to compare "); + cursor(1); + cgetc(); + cursor(0); + + /* compare the two outputs */ + for (y = 0; y < 16; y++) { + for (x = 0; x < 16; x++) { + c = COLOR_GREEN; + c1 = VRAMPEEK((y * 40) + x); + c2 = VRAMPEEK((y * 40) + x + 0x14); + if (c1 != c2) { + c = COLOR_RED; + err = 1; + } + c1 = CRAMPEEK((y * 40) + x); + c2 = CRAMPEEK((y * 40) + x + 0x14); + if (c1 != c2) { + c = COLOR_RED; + err = 1; + } + CRAMPOKE((y * 40) + x, c); + CRAMPOKE((y * 40) + x + 0x14, c); + } + } + + /* show the result */ + revers(0); + textcolor(COLOR_WHITE); + gotoxy(0, 17); + if (err) { + bordercolor(COLOR_RED); + cputs("errors detected"); + } else { + bordercolor(COLOR_GREEN); + cputs("all fine"); + } + cputs(" - press a key "); + cursor(1); + cgetc(); + cursor(0); + + return 0; +} diff --git a/targettest/clock-test.c b/targettest/clock-test.c new file mode 100644 index 000000000..355e69d95 --- /dev/null +++ b/targettest/clock-test.c @@ -0,0 +1,110 @@ +/* Calendar-clock test program +** +** 2018-Sep-25, chris@groessler.org +** 2019-Dec-30, Greg King +*/ + +#include <stdio.h> +#include <stdlib.h> +#include <string.h> +#include <time.h> +#include <errno.h> + +#ifdef __CC65__ + #include <conio.h> + #include <cc65.h> +#endif + +static int print_time(void) +{ + struct tm *cur_tm; + time_t cur_time = time(NULL); + + if (cur_time == -1) { + printf("time() failed: %s\n", strerror(errno)); + return 1; + } + cur_tm = localtime(&cur_time); + + printf("time: %s\n", asctime(cur_tm)); + // DEBUG: + printf("year=%d, mon=%d, mday=%d\nhour=%d, min=%d, sec=%d\n", + cur_tm->tm_year, cur_tm->tm_mon, cur_tm->tm_mday, + cur_tm->tm_hour, cur_tm->tm_min, cur_tm->tm_sec); + return 0; +} + +int main(int argc, char **argv) +{ + char c; + int s; + struct tm cur_time; + struct timespec new_time; + +#ifdef __CC65__ + /* If DOS automatically will clear the screen after the program exits, + ** then wait for a key-press. + */ + if (doesclrscrafterexit()) + atexit((void (*)(void))cgetc); +#endif + + if (argc == 1) { + return print_time(); + } + + if (argc != 2) { +#if defined(__APPLE2__) + printf("USAGE: CALL2051 [:REM YY-MM-DD-HH-MM-SS]\n"); +#elif defined(__ATMOS__) || defined(__CBM__) + printf("Usage: run [:rem YY-MM-DD-HH-MM-SS]\n"); +#else + printf("Usage: %s [YY-MM-DD-HH-MM-SS]\n", argv[0]); +#endif + return 1; + } + + memset(&cur_time, 0, sizeof cur_time); + s = sscanf(argv[1], "%d-%d-%d-%d-%d-%d", + &cur_time.tm_year, &cur_time.tm_mon, &cur_time.tm_mday, + &cur_time.tm_hour, &cur_time.tm_min, &cur_time.tm_sec); + if (s != 6 || cur_time.tm_year > 99 /* other input values aren't being verified */) { + printf("Invalid date-time format\n"); + return 1; + } + cur_time.tm_year += 100; /* assume 21st century */ + --cur_time.tm_mon; + + memset(&new_time, 0, sizeof new_time); + new_time.tv_sec = mktime(&cur_time); + + printf("\nYou are about to set the time to\n--> %s\nContinue (y/n)? ", ctime(&new_time.tv_sec)); + do { +#ifdef __CC65__ + c = cgetc(); +#else + c = getchar(); +#endif + } while (c != 'y' && c != 'Y' && c != 'n' && c != 'N'); + printf("%c\n", c); + + if (c == 'n' || c == 'N') { + printf("User abort\n"); + return 0; + } + + s = clock_settime(CLOCK_REALTIME, &new_time); + if (s) { + printf("clock_settime() failed: %s\n", strerror(errno)); + return 1; + } + printf("Time set!\n\n"); + + //DEBUG test begin + return print_time(); + //DEBUG test end +} +/* Local Variables: */ +/* c-file-style: "cpg" */ +/* c-basic-offset: 4 */ +/* End: */ diff --git a/testcode/lib/clock.c b/targettest/clock.c similarity index 100% rename from testcode/lib/clock.c rename to targettest/clock.c diff --git a/targettest/conio.c b/targettest/conio.c new file mode 100644 index 000000000..49434595b --- /dev/null +++ b/targettest/conio.c @@ -0,0 +1,172 @@ +/* + * conio API test program + * + * keys: + * + * 1...0 change text color + * F5/F6 change border color + * F7/F8 change background color + * + */ + + +#include <conio.h> +#include <string.h> +#include <stdlib.h> +#include <joystick.h> + +#if defined(__GAMATE__) +/* there is not enough screen space to show all 256 characters at the bottom */ +#define NUMCHARS 128 +#define NUMCOLS 4 +#else +#define NUMCHARS 256 +#define NUMCOLS 16 +#endif + +static char grid[5][5] = { + {CH_ULCORNER, CH_HLINE, CH_TTEE, CH_HLINE, CH_URCORNER}, + {CH_VLINE, ' ', CH_VLINE, ' ', CH_VLINE }, + {CH_LTEE, CH_HLINE, CH_CROSS, CH_HLINE, CH_RTEE }, + {CH_VLINE, ' ', CH_VLINE, ' ', CH_VLINE }, + {CH_LLCORNER, CH_HLINE, CH_BTEE, CH_HLINE, CH_LRCORNER} +}; + +void main(void) +{ + unsigned int i, j, n; + unsigned char xsize, ysize, tcol, bgcol, bcol, inpos = 0; +#if defined(__NES__) || defined(__PCE__) || defined(__GAMATE__) + unsigned char joy; + + joy_install(joy_static_stddrv); +#endif + clrscr(); + screensize(&xsize, &ysize); + cputs("cc65 conio test\n\r"); + cputs("Input:[ ]"); /* 8 spaces */ + + tcol = textcolor(0); /* memorize original textcolor */ + bgcol = bgcolor(0); /* memorize original background color */ + bcol = bordercolor(0); /* memorize original border color */ + (void)bordercolor(bcol); + (void)bgcolor(bgcol); + + cputsxy(0, 2, "Colors:" ); + for (i = 0; i < 3; ++i) { + gotoxy(i, 3 + i); + for (j = 0; j < NUMCOLS; ++j) { + (void)textcolor(j); + cputc('X'); + } + } + (void)textcolor(tcol); + + cprintf("\n\n\r Screensize: %ux%u", xsize, ysize); + + chlinexy(0, 6, xsize); + cvlinexy(0, 6, 3); + chlinexy(0, 8, xsize); + cvlinexy(xsize - 1, 6, 3); + cputcxy(0, 6, CH_ULCORNER); + cputcxy(xsize - 1, 6, CH_URCORNER); + cputcxy(0, 8, CH_LLCORNER); + cputcxy(xsize - 1, 8, CH_LRCORNER); + + for (i = 0; i < 5; ++i) { + gotoxy(xsize - 5, i); + for (j = 0; j < 5; ++j) { + cputc(grid[i][j]); + } + } + + gotoxy(0, ysize - 2 - ((NUMCHARS + xsize) / xsize)); + revers(1); + for (i = 0; i < xsize; ++i) { + cputc('0' + i % 10); + } + revers(0); + for (i = 0; i < NUMCHARS; ++i) { + if ((i != '\n') && (i != '\r')) { + cputc(i); + } else { + cputc(' '); + } + } + while(wherex() > 0) { + cputc('#'); + } + revers(1); + for (i = 0; i < xsize; ++i) { + cputc('0' + i % 10); + } + revers(0); + + cursor(1); + for (;;) { + /* do the "rvs" blinking */ + i = textcolor(COLOR_BLACK); + gotoxy(8, 2); + j = (++n / 16) & 1; + revers(j); + cputc(j ? 'R' : ' '); + revers(j ^ 1); + cputs(" rvs"); + revers(0); + (void)textcolor(i); + + gotoxy(7 + inpos, 1); + +#if defined(__NES__) || defined(__PCE__) || defined(__GAMATE__) + /* not all targets have waitvsync */ + waitvsync(); + /* for targets that do not have a keyboard, read the first + joystick */ + joy = joy_read(JOY_1); + cprintf("%02x", joy); +#else + i = cgetc(); + switch (i) { + case CH_ENTER: + clrscr(); + return; + case CH_CURS_LEFT: + inpos = (inpos - 1) % 8; + break; + case '0': case '1': case '2': case '3': case '4': + case '5': case '6': case '7': case '8': case '9': + (void)textcolor(i - '0'); + break; +#ifdef CH_F5 + case CH_F5: + bcol = (bcol + 1) & 0x0f; + (void)bordercolor(bcol); + break; +#endif +#ifdef CH_F6 + case CH_F6: + bcol = (bcol - 1) & 0x0f; + (void)bordercolor(bcol); + break; +#endif +#ifdef CH_F7 + case CH_F7: + bgcol = (bgcol + 1) & 0x0f; + (void)bgcolor(bgcol); + break; +#endif +#ifdef CH_F8 + case CH_F8: + bgcol = (bgcol - 1) & 0x0f; + (void)bgcolor(bgcol); + break; +#endif + default: + cputc(i); + /* fallthrough */ + case CH_CURS_RIGHT: + inpos = (inpos + 1) % 8; + } +#endif + } +} diff --git a/targettest/cpeek-test.c b/targettest/cpeek-test.c new file mode 100644 index 000000000..4c1aadcb2 --- /dev/null +++ b/targettest/cpeek-test.c @@ -0,0 +1,310 @@ +/* Test that the cpeek...() functions are the inverses of cputc(), +** revers(), and textcolor() for the full range of character codes. +** +** 2017-07-15, Greg King +** 2017-12-12, Groepaz +*/ + +#include <conio.h> +#include <cc65.h> + +/* Standard location of the screen */ + +#if defined(__C128__) || defined(__C64__) +/* only 40-column screen */ +# define SCREEN_RAM ((unsigned char*)0x0400) +#elif defined(__C16__) /* Plus4 also */ +# define SCREEN_RAM ((unsigned char*)0x0C00) +#elif defined(__CBM510__) +# define SCREEN_RAM ((unsigned char*)0xF000) +# define COLOR_RAM ((unsigned char*)0xd400) +#elif defined(__CBM610__) +# define SCREEN_RAM ((unsigned char*)0xD000) +#elif defined(__PET__) +# define SCREEN_RAM ((unsigned char*)0x8000) +#elif defined(__VIC20__) +# define SCREEN_RAM ((unsigned char*)0x1000) +#else +# error This program cannot test that target. +# define SCREEN_RAM ((unsigned char*)0) +#endif + +static unsigned char width; + + +/* Move the cursor backward one char with +** the recognition of a row change. +*/ +static void chBack (void) +{ + unsigned char y = wherey (); + unsigned char x = wherex (); + + if (x == 0) { + x = width; + --y; + } + --x; + + gotoxy (x, y); +} + + +/* Move the cursor forward one char with +** the recognition of a row change. +*/ +static void chForth (void) +{ + unsigned char y = wherey (); + unsigned char x = wherex (); + + if (++x >= width) { + x = 0; + ++y; + } + + gotoxy (x, y); +} + + +/* A hack to get an unmodified byte from the +** screen memory at the current cursor position. +*/ +static unsigned char peekChWithoutTranslation (void) +{ +#if defined(__CBM610__) + return peekbsys ((unsigned)&SCREEN_RAM[wherey () * width + wherex ()]); +#else + return SCREEN_RAM[wherey () * width + wherex ()]; +#endif +} + +/* as above, but for color ram */ +static unsigned char peekColWithoutTranslation (void) +{ +#if defined(__CBM610__) || defined (__PET__) + return COLOR_WHITE; +#elif defined(__C128__) || defined(__C64__) || defined(__VIC20__) || defined(__CBM510__) + return COLOR_RAM[wherey () * width + wherex ()] & 0x0f; +#else + return COLOR_RAM[wherey () * width + wherex ()]; +#endif +} + + +/* A test which outputs the given char, reads it back from +** screen memory, outputs the returned char at the next position, +** then compares the two screen memory bytes for identity. +** +** Note: cpeekc() must be tested indirectly because some platforms "fold" their +** character code-set into a smaller screen code-set. Therefore, cpeekc() might +** return an equivalent, but not equal, character to the one that was cputc(). +*/ +static unsigned char testCPeekC (char ch) +{ + unsigned char ch2_a, ch2_b, ch2_c; + + /* Test the given char-code, but not the + ** special characters NEWLINE and RETURN + ** (they don't put anything on the screen). + */ + if (('\n' == ch) || ('\r' == ch) + ) { + return 1; + } + + /* toggle revers mode every few chars so cpeekc gets tested for both */ + revers ((ch >> 3) & 1); + + /* output additional space every now and then, that way not only even or only + odd half of the character cell will be tested */ +#if defined(__C64__) + if ((width == 80) && ((ch % 17) == 0)) { + cputc(' '); + } +#endif + + /* Output the char to the screen. */ + cputc (ch); + + /* Move the cursor pos. to the previous output. */ + chBack (); + + /* Get back the written char without any translation. */ + ch2_b = peekChWithoutTranslation (); + + /* Get back the written char, + ** including the translation, screen-code -> text. + */ + ch2_a = cpeekc (); + + /* Move the cursor to the following writing position. */ + chForth (); + + /* Output again the char which was read back by cpeekc(). */ + cputc (ch2_a); + + /* Move the cursor pos. to the second output. */ + chBack (); + + /* Get back the second written char without any translation; + ** and, compare it to the first untranslated char. + */ + ch2_c = peekChWithoutTranslation (); + if ((ch2_c != ch2_b) +#if defined(__C128__) || defined(__C64__) + /* VDC memory is not accessible, soft80 has no "videoram" */ + && (width == 40) +#endif + ){ + /* The test was NOT succesful. + ** Output a diagnostic; and, return FAILURE. + */ + revers(0); + cprintf ("\r\nError on char: %#x was %#x instead.", ch, ch2_a); + cprintf ("\r\nRaw screen codes: %#x, %#x.", ch2_b, ch2_c); + cprintf ("\r\nscreen width: %#d", width); + return 0; + } + + /* The test was succesful. + ** Move the cursor to the following writing position. + */ + chForth (); + return 1; +} + +static unsigned char testCPeekCol (char ch) +{ + unsigned char ch2_a, ch2_b, ch2_c; + + /* Output the char to the screen. */ + textcolor (ch); + cputc ('*'); + + /* Move the cursor pos. to the previous output. */ + chBack (); + + /* Get back the written char without any translation. */ + ch2_b = peekColWithoutTranslation (); + + /* Get back the written char, + ** including the translation, screen-code -> text. + */ + ch2_a = cpeekcolor (); + + /* Move the cursor to the following writing position. */ + chForth (); + + /* Output again the char which was read back by cpeekc(). */ + textcolor (ch2_a); + cputc ('x'); + + /* Move the cursor pos. to the second output. */ + chBack (); + + /* Get back the second written char without any translation; + ** and, compare it to the first untranslated char. + */ + ch2_c = peekColWithoutTranslation (); + if ((ch2_c != ch2_b) +#if defined(__C128__) + /* VDC memory is not accessible */ + && (width == 40) +#endif + ){ + /* The test was NOT succesful. + ** Output a diagnostic; and, return FAILURE. + */ + revers(0); + cprintf ("\r\nError on color: %#x was %#x instead.", ch, ch2_a); + cprintf ("\r\nRaw color codes: %#x, %#x.", ch2_b, ch2_c); + return 0; + } + + /* The test was succesful. + ** Move the cursor to the following writing position. + */ + chForth (); + return 1; +} + +/* The main code initiates the screen for the tests, and sets the reverse flag. +** Then, it calls testCPeekC() for every char within 0..255. +** Then, it calls testCPeekCol() for each color +** Returns zero for success, one for failure. +*/ +int main (void) +{ + unsigned char i, c1, c2; + char s[10]; + int ret = 0; + + clrscr (); + revers (0); + textcolor(1); + bgcolor(0); + screensize (&width, &i); + +#if defined(__VIC20__) + /* The VIC-20's screen is too small to hold the full test. */ + i = 2; +#else + i = 0; +#endif + do { + if (!testCPeekC (i)) { + ret = 1; + goto exiterror; + } + } while (++i != 0); /* will wrap around when finished */ + +#if defined(__VIC20__) + cgetc(); +#endif + + /* test colors */ +#if defined(__VIC20__) + clrscr (); +#endif + revers (0); + textcolor(1); + +#if defined (__CBM610__) || defined (__PET__) + cprintf("\n\rno COLOR_RAM\n\r"); +#elif defined (__C128__) || defined (__C64__) + if (width == 40) { + cprintf("\n\rCOLOR_RAM at $%04x\n\r", COLOR_RAM); + } else { + cprintf("\n\rno COLOR_RAM\n\r"); + } +#else + cprintf("\n\rCOLOR_RAM at $%04x\n\r", COLOR_RAM); +#endif + + do { + if (!testCPeekCol (i)) { + ret = 1; + goto exiterror; + } + } while (++i != 16); /* max 16 colors */ + + /* test revers */ + textcolor(1); cputc('\n'); cputc('\r'); + revers(0); cputc('x'); chBack (); c1 = cpeekrevers(); chForth(); + revers(1); cputc('X'); chBack (); c2 = cpeekrevers(); chForth(); + cputc('\n'); cputc('\r'); + revers(c1); cputc('o'); + revers(c2); cputc('O'); + + /* test cpeeks() */ + revers(0); + cprintf("\n\rtest1234"); gotox(0); cpeeks(s, 8); cputs("\n"); + cputs(s); + +exiterror: + if (doesclrscrafterexit()) { + cgetc(); + } + return ret; +} diff --git a/testcode/lib/cprintf.c b/targettest/cprintf.c similarity index 100% rename from testcode/lib/cprintf.c rename to targettest/cprintf.c diff --git a/testcode/lib/cursor.c b/targettest/cursor.c similarity index 100% rename from testcode/lib/cursor.c rename to targettest/cursor.c diff --git a/testcode/lib/deb.c b/targettest/deb.c similarity index 100% rename from testcode/lib/deb.c rename to targettest/deb.c diff --git a/testcode/lib/dir-test.c b/targettest/dir-test.c similarity index 90% rename from testcode/lib/dir-test.c rename to targettest/dir-test.c index 9102fc74d..61e42247e 100644 --- a/testcode/lib/dir-test.c +++ b/targettest/dir-test.c @@ -19,9 +19,13 @@ #include <string.h> #include <errno.h> #include <dirent.h> -#include <cbm.h> #include <conio.h> +#if defined(__CBM__) +#include <cbm.h> +#elif defined(__APPLE2__) +#include <apple2.h> +#endif int main(void) { @@ -51,9 +55,13 @@ int main(void) printf("contents of \"%s\":\n", name); while ((E = readdir (D)) != 0) { printf ("dirent.d_name[] : \"%s\"\n", E->d_name); +#if !defined(__ATARI__) printf ("dirent.d_blocks : %10u\n", E->d_blocks); +#endif printf ("dirent.d_type : %10d\n", E->d_type); +#if !defined(__APPLE2__) && !defined(__ATARI__) printf ("telldir() : %10lu\n", telldir (D)); +#endif printf ("---\n"); if (!go) { switch (cgetc ()) { @@ -63,14 +71,16 @@ int main(void) case 'q': goto done; - +#if !defined(__APPLE2__) && !defined(__ATARI__) case 'r': seekdir (D, E->d_off); break; - +#endif +#if !defined(__ATARI__) case 's': rewinddir (D); break; +#endif } } diff --git a/targettest/div-test.c b/targettest/div-test.c new file mode 100644 index 000000000..401f13ff8 --- /dev/null +++ b/targettest/div-test.c @@ -0,0 +1,45 @@ +/* div-test.c +** +** This program tests the division and modulo operators +** and the div() library function. +*/ + +#include <cc65.h> +#include <stdbool.h> +#include <stdio.h> +#include <stdlib.h> + +static bool test (int dividend, int divisor) +{ + div_t result; + + result = div (dividend, divisor); + printf ("%+d/%+d= %+d, %+d%%%+d= %+d, div()= %+d, %+d\n", + dividend, divisor, dividend / divisor, + dividend, divisor, dividend % divisor, + result.quot, result.rem); + + return result.quot * divisor + result.rem != dividend; +} + +int main (void) +{ + bool t; + + printf ("\nTest of division and modulus operations:\n\n"); + + t = test (+40, +3) || + test (+40, -3) || + test (-40, +3) || + test (-40, -3); + if (t) { + printf ("\nThe div() function made a wrong result!\n"); + } + + if (doesclrscrafterexit ()) { + printf ("\nTap the Return key to quit. "); + getchar (); + } + + return (int)t; +} diff --git a/testcode/lib/em-test.c b/targettest/em-test.c similarity index 92% rename from testcode/lib/em-test.c rename to targettest/em-test.c index ecee6608c..2da9138e1 100644 --- a/testcode/lib/em-test.c +++ b/targettest/em-test.c @@ -12,16 +12,12 @@ #define BUF_SIZE (PAGE_SIZE + PAGE_SIZE/2) static unsigned buf[BUF_SIZE]; - - static void cleanup (void) /* Remove the driver on exit */ { em_unload (); } - - static void fill (register unsigned* page, register unsigned char count, register unsigned num) { register unsigned char i; @@ -30,8 +26,6 @@ static void fill (register unsigned* page, register unsigned char count, registe } } - - static void cmp (unsigned page, register const unsigned* buf, register unsigned char count, register unsigned num) { @@ -49,6 +43,19 @@ static void cmp (unsigned page, register const unsigned* buf, } } +static const char* em_error (int e) +{ + switch (e) { + case EM_ERR_OK: return "ok"; + case EM_ERR_NO_DRIVER: return "no driver"; + case EM_ERR_CANNOT_LOAD: return "cannot load"; + case EM_ERR_INV_DRIVER: return "invalid driver"; + case EM_ERR_NO_DEVICE: return "no device"; + case EM_ERR_INSTALLED: return "already installed"; + } + return "unknown"; +} + typedef struct emd_test_s { char key; char *displayname; @@ -88,6 +95,7 @@ static emd_test_t drivers[] = { { '7', "C128 VDC (in C64 mode)", "c64-vdc.emd" }, { '8', "C64DTV himem", "dtv-himem.emd" }, { '9', "65816 extra banks", "c64-65816.emd" }, + { 'k', "Kerberos", "c64-kerberos.emd" }, #endif #if defined(__C128__) @@ -142,7 +150,7 @@ int main (void) clrscr (); Res = em_load_driver (drivers[valid_key].drivername); if (Res != EM_ERR_OK) { - cprintf ("Error in em_load_driver: %u\r\n", Res); + cprintf ("Error in em_load_driver: %u\r\n%s\r\n", Res, em_error(Res)); cprintf ("os: %u, %s\r\n", _oserror, _stroserror (_oserror)); #ifdef __ATARI__ cgetc (); @@ -263,5 +271,4 @@ int main (void) #endif return 0; - } diff --git a/testcode/lib/exec-test1.c b/targettest/exec-test1.c similarity index 100% rename from testcode/lib/exec-test1.c rename to targettest/exec-test1.c diff --git a/testcode/lib/exec-test2.c b/targettest/exec-test2.c similarity index 100% rename from testcode/lib/exec-test2.c rename to targettest/exec-test2.c diff --git a/testcode/lib/fileio-test.c b/targettest/fileio-test.c similarity index 100% rename from testcode/lib/fileio-test.c rename to targettest/fileio-test.c diff --git a/testcode/lib/ft.c b/targettest/ft.c similarity index 98% rename from testcode/lib/ft.c rename to targettest/ft.c index 880df6369..3dfa0e37b 100644 --- a/testcode/lib/ft.c +++ b/targettest/ft.c @@ -8,7 +8,7 @@ ** ** The program asks for a filename (if it hasn't ** got one from argv). I then opens the file, -** reads the the first 16 bytes and displays them +** reads the first 16 bytes and displays them ** (as hex values). ** The values of sp (cc65 runtime stack pointer) ** are displayed at some places. The displayed diff --git a/targettest/gamate/Makefile b/targettest/gamate/Makefile new file mode 100644 index 000000000..e2b060406 --- /dev/null +++ b/targettest/gamate/Makefile @@ -0,0 +1,62 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= gamate + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) +endif + +EXELIST_gamate = \ + audiotest.bin lcdtest.bin ctest.bin + +ifneq ($(EXELIST_$(SYS)),) +testcode: $(EXELIST_$(SYS)) +else +testcode: notavailable +endif + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: gamate tests not available for" $(SYS) +else +# suppress the "nothing to be done for 'testcode' message + @echo > $(NULLDEV) +endif + +audiotest.bin: audiotest.s + $(CL) -l audiotest.lst -t gamate -o audiotest.bin audiotest.s +lcdtest.bin: lcdtest.s + $(CL) -l lcdtest.lst -t gamate -o lcdtest.bin lcdtest.s +ctest.bin: ctest.c + $(CL) -l ctest.lst -t gamate -o ctest.bin ctest.c + +clean: + @$(DEL) lcdtest.o audiotest.o ctest.o 2>$(NULLDEV) + @$(DEL) lcdtest.bin audiotest.bin ctest.bin nachtm.bin 2>$(NULLDEV) + @$(DEL) audiotest.lst lcdtest.lst ctest.lst 2>$(NULLDEV) diff --git a/testcode/lib/gamate/audiotest.s b/targettest/gamate/audiotest.s similarity index 99% rename from testcode/lib/gamate/audiotest.s rename to targettest/gamate/audiotest.s index f40199994..4f1496789 100644 --- a/testcode/lib/gamate/audiotest.s +++ b/targettest/gamate/audiotest.s @@ -155,7 +155,7 @@ nocursor: .proc printy ldy #0 -loop1: +loop1: tya pha asl diff --git a/testcode/lib/gamate/cga2.chr b/targettest/gamate/cga2.chr similarity index 100% rename from testcode/lib/gamate/cga2.chr rename to targettest/gamate/cga2.chr diff --git a/testcode/lib/gamate/ctest.c b/targettest/gamate/ctest.c similarity index 78% rename from testcode/lib/gamate/ctest.c rename to targettest/gamate/ctest.c index dfebd9bef..9acbe94cd 100644 --- a/testcode/lib/gamate/ctest.c +++ b/targettest/gamate/ctest.c @@ -7,7 +7,7 @@ unsigned char y = 0; unsigned char x = 0; unsigned short n; -int main(int argc, char *argv[]) +void main(void) { clrscr(); gotoxy(0,0);cputs("Gamate C-Test"); @@ -25,28 +25,26 @@ int main(int argc, char *argv[]) gotoxy(0,2);cprintf("%04x %02x %02x %02x", n, x, y, *((unsigned char*)JOY_DATA)); switch((*((unsigned char*)JOY_DATA))) { - case 0xff ^ JOY_DATA_UP: + case 0xff ^ JOY_UP_MASK: ++y; if (y == 0xc8) y = 0; break; - case 0xff ^ JOY_DATA_DOWN: + case 0xff ^ JOY_DOWN_MASK: --y; if (y == 0xff) y = 0xc7; break; - case 0xff ^ JOY_DATA_LEFT: + case 0xff ^ JOY_LEFT_MASK: ++x; break; - case 0xff ^ JOY_DATA_RIGHT: + case 0xff ^ JOY_RIGHT_MASK: --x; break; - case 0xff ^ JOY_DATA_FIRE_A: + case 0xff ^ JOY_BTN_A_MASK: break; } - waitvblank(); + waitvsync(); (*((unsigned char*)LCD_XPOS)) = x; (*((unsigned char*)LCD_YPOS)) = y; } - - return 0; } diff --git a/testcode/lib/gamate/lcdtest.s b/targettest/gamate/lcdtest.s similarity index 99% rename from testcode/lib/gamate/lcdtest.s rename to targettest/gamate/lcdtest.s index 3a8d72226..56ed82a79 100644 --- a/testcode/lib/gamate/lcdtest.s +++ b/targettest/gamate/lcdtest.s @@ -13,7 +13,7 @@ psa: .word 0 .bss temp_x: .byte 0 temp_y: .byte 0 -temp_a: .byte 0 +temp_a: .byte 0 irq_count: .byte 0 nmi_count: .byte 0 psx: .byte 0 @@ -419,4 +419,3 @@ printsign1: ldy temp_y rts .endproc - diff --git a/testcode/lib/getopt-test.c b/targettest/getopt-test.c similarity index 95% rename from testcode/lib/getopt-test.c rename to targettest/getopt-test.c index 2f1155419..b5639b7c9 100644 --- a/testcode/lib/getopt-test.c +++ b/targettest/getopt-test.c @@ -22,6 +22,8 @@ #define BADCH '?' #define ENDARGS "--" +#define NUMARGS 2 + int main (int argc, char **argv) { char *optstring = argv[1]; @@ -34,9 +36,9 @@ int main (int argc, char **argv) char *opi; - if (argc == 1) { + if (argc != NUMARGS) { fprintf (stderr, "Usage: %s optstring args\n", argv0); - exit (1); + exit (EXIT_FAILURE); } argv++; argc--; diff --git a/targettest/getsp.s b/targettest/getsp.s new file mode 100644 index 000000000..9f169dc0b --- /dev/null +++ b/targettest/getsp.s @@ -0,0 +1,12 @@ + + .export _getsp + .importzp sp + +.proc _getsp + + ldx sp+1 + lda sp + rts + +.endproc + diff --git a/testcode/lib/heaptest.c b/targettest/heaptest.c similarity index 97% rename from testcode/lib/heaptest.c rename to targettest/heaptest.c index d776e2f0c..f33808261 100644 --- a/testcode/lib/heaptest.c +++ b/targettest/heaptest.c @@ -10,7 +10,7 @@ static unsigned char* V[256]; -static char* Alloc (void) +static unsigned char* Alloc (void) /* Allocate a random sized chunk of memory */ { /* Determine the size */ @@ -214,10 +214,10 @@ int main (void) /* Show info at start */ ShowInfo (); - +#if !defined(__APPLE2__) /* Remember the time */ T = clock (); - +#endif /* Do the tests */ Test1 (); Test2 (); @@ -226,13 +226,11 @@ int main (void) Test5 (); Test6 (); +#if !defined(__APPLE2__) /* Calculate the time and print it */ T = clock () - T; printf ("Time needed: %lu ticks\n", T); - +#endif /* Done */ return EXIT_SUCCESS; } - - - diff --git a/targettest/joy-test.c b/targettest/joy-test.c new file mode 100644 index 000000000..53d63c5ce --- /dev/null +++ b/targettest/joy-test.c @@ -0,0 +1,122 @@ +#include <stdlib.h> +#include <string.h> +#include <errno.h> +#include <conio.h> +#include <joystick.h> + +#ifdef JOYSTICK_DRIVER + +/* A statically linked driver was named on the compiler's command line. +** Make sure that it is used instead of a dynamic one. +*/ +# undef DYN_DRV +# define DYN_DRV 0 + +/* +** Link existing drivers this way: +** +** cl65 -DJOYSTICK_DRIVER=c64_hitjoy_joy -o joy-test.prg joy-test.c +** +** For testing a new driver, you need to uncomment the declaration below, +** and link your driver this way: +** +** co65 ../../target/c64/drv/joy/c64-hitjoy.joy -o hitjoy.s --code-label _hitjoy +** cl65 -DJOYSTICK_DRIVER=hitjoy -o joy-test.prg joy-test.c hitjoy.s +*/ + +/* extern char JOYSTICK_DRIVER; */ + +#else + +/* Use a dynamically loaded driver, by default. */ +# ifndef DYN_DRV +# define DYN_DRV 1 +# endif +#endif + + +int main (void) +{ + unsigned char j; + unsigned char i, count; + unsigned char Res; + + clrscr (); + +#if DYN_DRV + Res = joy_load_driver (joy_stddrv); +#elif defined(JOYSTICK_DRIVER) + Res = joy_install (&JOYSTICK_DRIVER); +#else + Res = joy_install (&joy_static_stddrv); +#endif + + if (Res != JOY_ERR_OK) { + cprintf ("Error in joy_load_driver: %u\r\n", Res); +#if DYN_DRV + cprintf ("OS: %u, %s\r\n", _oserror, _stroserror (_oserror)); +#endif + return EXIT_FAILURE; + } + + count = joy_count (); +#if defined(__ATARI5200__) || defined(__CREATIVISION__) + cprintf ("JOYSTICKS: %u.", count); +#else + cprintf ("Driver supports %u joystick%s", count, count == 1 ? "." : "s."); +#endif + while (1) { + for (i = 0; i < count; ++i) { + j = joy_read (i); +#if defined(__NES__) || defined(__CX16__) + /* two lines for each device */ + gotoxy (0, i * 2 +1); + cprintf ("%2u:%-6s%-6s%-6s%-6s\r\n" + " %-6s%-6s%-6s%-6s $%02X", + i, + JOY_UP(j) ? " up " : " ---- ", + JOY_DOWN(j) ? " down " : " ---- ", + JOY_LEFT(j) ? " left " : " ---- ", + JOY_RIGHT(j) ? " right" : " ---- ", + JOY_BTN_1(j) ? "btn A " : " ---- ", + JOY_BTN_2(j) ? "btn B " : " ---- ", + JOY_BTN_3(j) ? "select" : " ---- ", + JOY_BTN_4(j) ? " start" : " ---- ", + j); +#else + /* one line for each device */ + gotoxy (0, i + 1); +# if defined(__ATARI5200__) || defined(__CREATIVISION__) + cprintf ("%1u:%-3s%-3s%-3s%-3s%-3s %02X", + i, + JOY_UP(j) ? " U " : " - ", + JOY_DOWN(j) ? " D " : " - ", + JOY_LEFT(j) ? " L " : " - ", + JOY_RIGHT(j) ? " R " : " - ", + JOY_BTN_1(j) ? " 1 " : " - ", + j); +# else + cprintf ("%2u: %-6s%-6s%-6s%-6s%-6s $%02X", + i, + JOY_UP(j) ? " up " : " ---- ", + JOY_DOWN(j) ? " down " : " ---- ", + JOY_LEFT(j) ? " left " : " ---- ", + JOY_RIGHT(j) ? "right " : " ---- ", + JOY_BTN_1(j) ? "button" : " ---- ", + j); +# endif +#endif + } + + /* Show any pressed keys; so that we can verify that the keyboard is working. */ + if (kbhit ()) { +#if defined(__NES__) || defined(__CX16__) + gotoxy (1, i * 2 + 2); +#else + gotoxy (1, i + 2); +#endif + cprintf ("keyboard: $%02X", cgetc ()); + } + } + return EXIT_SUCCESS; +} diff --git a/targettest/minimal.c b/targettest/minimal.c new file mode 100644 index 000000000..f950a5d13 --- /dev/null +++ b/targettest/minimal.c @@ -0,0 +1,13 @@ + +/* this is a minimal / empty c program, any supported target that has some + * sort of C support should be able to link this. Failure indicates a problem + * with the crt0 or the linker config of the respective target */ + +char bss_variable; +char data_variable = 42; +const char rodata_variable = 23; + +void main(void) +{ + /* nothing here */ +} diff --git a/testcode/lib/moddiv-test.c b/targettest/moddiv-test.c similarity index 100% rename from testcode/lib/moddiv-test.c rename to targettest/moddiv-test.c diff --git a/targettest/mouse-test.c b/targettest/mouse-test.c new file mode 100644 index 000000000..64482b937 --- /dev/null +++ b/targettest/mouse-test.c @@ -0,0 +1,431 @@ +/* +** Test program for mouse drivers. +** Supportsthe C64/C128/CBM510/Atari/Apple2. +** +** 2001-09-13, Ullrich von Bassewitz +** 2013-09-05, Greg King +** +** Compile with "-DSTATIC_MOUSE" to statically link all available drivers. +** Compile with "-DMOUSE_DRIVER=<driver_sym>" to statically link the given driver. +** E.g., -DMOUSE_DRIVER=atrst_mou to just link with the Atari ST mouse driver. +*/ + + + +#include <stdbool.h> +#include <stdlib.h> +#include <string.h> +#include <mouse.h> +#include <pen.h> +#include <conio.h> +#include <ctype.h> +#include <dbg.h> +#include <cc65.h> + +#define max(a,b) (((a) > (b)) ? (a) : (b)) +#define min(a,b) (((a) < (b)) ? (a) : (b)) + +extern int getsp(void); + +#define NO_DEBUG +#define NO_JAIL + +#ifdef __ATARI__ +extern const struct mouse_callbacks mouse_pm_callbacks; +extern const struct mouse_callbacks mouse_txt_callbacks; +//#define MOUSE_CALLBACK mouse_def_callbacks +#define MOUSE_CALLBACK mouse_pm_callbacks +//#define MOUSE_CALLBACK mouse_txt_callbacks +#else +#define MOUSE_CALLBACK mouse_def_callbacks +#endif + +#if defined(MOUSE_DRIVER) || defined(STATIC_MOUSE) + +/* A statically linked driver was named on the compiler's command line. +** Make sure that it is used instead of a dynamic one. +*/ +# undef DYN_DRV +# define DYN_DRV 0 +#else + +/* Use a dynamically loaded driver, by default. */ +# ifndef DYN_DRV +# define DYN_DRV 1 +# endif +#endif + + + +#ifdef __CBM__ + +/* Set dark-on-light colors. */ +const unsigned char mouse_def_pointercolor = COLOR_BLACK; + +#endif + + + +static void __fastcall__ CheckError (const char* S, unsigned char Error) +{ + if (Error != MOUSE_ERR_OK) { + cprintf ("\n%s: %s(%u)\r\n", S, mouse_geterrormsg (Error), Error); + + /* Wait for a key-press, so that some platforms can show the error + ** message before they remove the current screen. + */ + if (doesclrscrafterexit ()) { + cgetc (); + } + exit (EXIT_FAILURE); + } +} + + + +#if DYN_DRV + +/* Points to the dynamic driver's name. */ +static const char *mouse_name; + + +static void DoWarning (void) +/* Warn the user that a driver is needed for this program. */ +{ + cprintf ("Warning: This program needs\r\n" + "the driver with the name\r\n" + " %s\r\n" + "on a disk! Press 'y' if you have it;\r\n" + "or, any other key to exit.\r\n", mouse_stddrv); + if (tolower (cgetc ()) != 'y') { + exit (EXIT_SUCCESS); + } + cprintf ("OK. Please wait patiently...\r\n"); +} + +#else + +unsigned char *mouse_drv_use; +#endif + + +#ifdef __ATARI__ +#ifdef __ATARIXL__ +#define MSENAME_EXT "X" +#define MSESTAT_0 atrxjoy_mou +#define MSESTAT_1 atrxst_mou +#define MSESTAT_2 atrxami_mou +#define MSESTAT_3 atrxtrk_mou +#define MSESTAT_4 atrxtt_mou +#else +#define MSENAME_EXT "" +#define MSESTAT_0 atrjoy_mou +#define MSESTAT_1 atrst_mou +#define MSESTAT_2 atrami_mou +#define MSESTAT_3 atrtrk_mou +#define MSESTAT_4 atrtt_mou +#endif +#define MSENAME_0 "ATR" MSENAME_EXT "JOY.MOU" +#define MSENAME_1 "ATR" MSENAME_EXT "ST.MOU" +#define MSENAME_2 "ATR" MSENAME_EXT "AMI.MOU" +#define MSENAME_3 "ATR" MSENAME_EXT "TRK.MOU" +#define MSENAME_4 "ATR" MSENAME_EXT "TT.MOU" +#elif defined(__C64__) || defined(__C128__) +#ifdef __C64__ +#define MSENAME_EXT "c64-" +#define MSESTAT_0 c64_joy_mou +#define MSESTAT_1 c64_1351_mou +#define MSESTAT_2 c64_inkwell_mou +#define MSESTAT_3 c64_pot_mou +#else +#define MSENAME_EXT "c128-" +#define MSESTAT_0 c128_joy_mou +#define MSESTAT_1 c128_1351_mou +#define MSESTAT_2 c128_inkwell_mou +#define MSESTAT_3 c128_pot_mou +#endif +#define MSENAME_0 MSENAME_EXT "joy.mou" +#define MSENAME_1 MSENAME_EXT "1351.mou" +#define MSENAME_2 MSENAME_EXT "inkwell.mou" +#define MSENAME_3 MSENAME_EXT "pot.mou" +#endif + + +static void __fastcall__ ShowState (unsigned char Jailed, unsigned char Invisible) +/* Display jail and cursor states. */ +{ + cclearxy (0, 7, 32); + gotoxy (0, 7); + cprintf ("Pointer is %svisible%s.", Invisible? "in" : "", Jailed? " and jailed" : ""); +} + +#ifdef __ATARIXL__ +extern char _HIDDEN_RAM_SIZE__, _HIDDEN_RAM_LAST__, _HIDDEN_RAM_START__; +#endif + +#if DYN_DRV +int main (int argc, char *argv[]) +#else +int main (void) +#endif +{ + struct mouse_info info; + struct mouse_box full_box, small_box; + unsigned char width, height; + char C; + bool Invisible = true, Done = false, Jailed = false; + +#ifdef __ATARIXL__ + cprintf ("adding heap: $%04X bytes at $%04X\r\n", + &_HIDDEN_RAM_SIZE__ - (&_HIDDEN_RAM_LAST__ - &_HIDDEN_RAM_START__), + &_HIDDEN_RAM_LAST__); + + _heapadd (&_HIDDEN_RAM_LAST__, (size_t)(&_HIDDEN_RAM_SIZE__ - (&_HIDDEN_RAM_LAST__ - &_HIDDEN_RAM_START__))); + cgetc (); +#endif + +#ifndef NO_DEBUG + /* Initialize the debugger */ + DbgInit (0); +#endif + + /* Set dark-on-light colors. Clear the screen. */ +#if defined(__CBM__) && !defined(__VIC20__) + (void) bordercolor (COLOR_GRAY2); + (void) bgcolor (COLOR_WHITE); + (void) textcolor (COLOR_GRAY1); +#else + (void) bordercolor (COLOR_BLUE); + (void) bgcolor (COLOR_WHITE); + (void) textcolor (COLOR_BLACK); +#endif + cursor (0); + clrscr (); + + /* If a lightpen driver is installed, then it can get a calibration value + ** from this file (if it exists). Or, the user can adjust the pen; and, + ** the value will be put into this file, for the next time. + ** (Other drivers will ignore this.) + */ +#if defined(__C64__) || defined(__C128__) || defined(__CBM510__) + pen_adjust ("pen.dat"); +#endif + +#if DYN_DRV + /* If a dynamically loadable driver is named on the command line, + ** then use that driver instead of the standard one. + */ + if (argc > 1) { + mouse_name = argv[1]; + } else { +#if defined(__ATARI__) || defined(__C64__) || defined(__C128__) + char selection, flag = 0; + cprintf ("Select mouse driver:\r\n" + " 0 - Joystick\r\n" +#ifdef __ATARI__ + " 1 - ST Mouse\r\n" + " 2 - Amiga Mouse\r\n" + " 3 - Atari Trakball\r\n" + " 4 - Atari TouchPad\r\n" +#else + " 1 - 1351 Mouse\r\n" + " 2 - Inkwell Mouse\r\n" + " 3 - Paddle\r\n" +#endif + "Enter selection: "); + while (1) { + switch (selection = cgetc ()) { + case '0': mouse_name = MSENAME_0; flag = 1; break; + case '1': mouse_name = MSENAME_1; flag = 1; break; + case '2': mouse_name = MSENAME_2; flag = 1; break; + case '3': mouse_name = MSENAME_3; flag = 1; break; +#ifdef __ATARI__ + case '4': mouse_name = MSENAME_4; flag = 1; break; +#endif + } + if (flag) break; + } + cprintf ("%c\r\nOK, loading \"%s\",\r\nplease wait patiently...\r\n", selection, mouse_name); +#else + /* Output a warning about the standard driver that is needed. */ + DoWarning (); + mouse_name = mouse_stddrv; +#endif + } + + /* Load and install the driver. */ + CheckError ("mouse_load_driver", + mouse_load_driver (&MOUSE_CALLBACK, mouse_name)); +#else /* not DYN_DRV */ +#if !defined(MOUSE_DRIVER) && (defined(__ATARI__) || defined(__C64__) || defined(__C128__)) + { + char selection, flag = 0; + cprintf ("Select mouse driver:\r\n" + " 0 - Joystick\r\n" +#ifdef __ATARI__ + " 1 - ST Mouse\r\n" + " 2 - Amiga Mouse\r\n" + " 3 - Atari Trakball\r\n" + " 4 - Atari TouchPad\r\n" +#else + " 1 - 1351 Mouse\r\n" + " 2 - Inkwell Mouse\r\n" + " 3 - Paddle\r\n" +#endif + "Enter selection: "); + while (1) { + switch (selection = cgetc ()) { + case '0': mouse_drv_use = MSESTAT_0; flag = 1; break; + case '1': mouse_drv_use = MSESTAT_1; flag = 1; break; + case '2': mouse_drv_use = MSESTAT_2; flag = 1; break; + case '3': mouse_drv_use = MSESTAT_3; flag = 1; break; +#ifdef __ATARI__ + case '4': mouse_drv_use = MSESTAT_4; flag = 1; break; +#endif + } + if (flag) break; + } + } +#else + mouse_drv_use = mouse_static_stddrv; +#endif + + /* Install the driver. */ + CheckError ("mouse_install", + mouse_install (&MOUSE_CALLBACK, +# ifdef MOUSE_DRIVER + MOUSE_DRIVER +# else +#if defined(__ATARI__) || defined(__C64__) || defined(__C128__) + mouse_drv_use +#else + mouse_static_stddrv +#endif +# endif + )); +#endif + +#ifndef NO_JAIL + /* Get the initial bounding box. */ + mouse_getbox (&full_box); +#endif + + screensize (&width, &height); + +top: + clrscr (); + + /* Print a help line */ + cputs (" d)ebug h)ide q)uit s)how j)ail"); + + gotoxy (1, 20); + cprintf ("SP: $%04X", getsp()); + + /* Put a cross at the center of the screen. */ + gotoxy (width / 2 - 3, height / 2 - 1); +#if defined(__CBM__) + cprintf ("%3u,%3u\r\n%*s\xDB", width / 2 * 8 + 4, height / 2 * 8 + 4, + width / 2, ""); +#else + cprintf ("%3u,%3u\r\n%*s+", width / 2 * 8 + 4, height / 2 * 8 + 4, + width / 2, ""); +#endif + + /* Test loop */ + ShowState (Jailed, Invisible); + do { + /* Get the current co-ordinates and button states; and, print them. */ + mouse_info (&info); + gotoxy (0, 2); + cprintf (" X = %3d\r\n", info.pos.x); + cprintf (" Y = %3d\r\n", info.pos.y); + cprintf (" B1 = %c\r\n", (info.buttons & MOUSE_BTN_LEFT) ? +#ifdef __CBM__ + 0x5F +#else + 'v' +#endif + : '^'); + cprintf (" B2 = %c", (info.buttons & MOUSE_BTN_RIGHT) ? +#ifdef __CBM__ + 0x5F +#else + 'v' +#endif + : '^'); + + /* Handle user input */ + if (kbhit ()) { + cclearxy (1, 9, 23); + switch (tolower (C = cgetc ())) { +#ifndef NO_DEBUG + case 'd': + BREAK(); + + /* The debugger might have changed the colors. + ** Restore them. + */ +#ifdef __CBM__ + (void) bordercolor (COLOR_GRAY2); + (void) bgcolor (COLOR_WHITE); + (void) textcolor (COLOR_GRAY1); +#else + (void) bordercolor (COLOR_BLUE); + (void) bgcolor (COLOR_WHITE); + (void) textcolor (COLOR_BLACK); +#endif + + /* The debugger changed the screen; restore it. */ + goto top; +#endif + case 'h': + mouse_hide (); + ShowState (Jailed, ++Invisible); + break; + +#ifndef NO_JAIL + case 'j': + if (Jailed) { + mouse_setbox (&full_box); + Jailed = false; + } else { + small_box.minx = max (info.pos.x - 10, full_box.minx); + small_box.miny = max (info.pos.y - 10, full_box.miny); + small_box.maxx = min (info.pos.x + 10, full_box.maxx); + small_box.maxy = min (info.pos.y + 10, full_box.maxy); + mouse_setbox (&small_box); + Jailed = true; + } + ShowState (Jailed, Invisible); + break; +#endif + case 's': + mouse_show (); + if (Invisible) { + ShowState (Jailed, --Invisible); + } + break; + + case 'q': + Done = true; + break; + + default: + gotoxy (1, 9); + cprintf ("Spurious character: $%02X", C); + } + } + } while (!Done); + +#if DYN_DRV + /* Uninstall and unload the driver. */ + CheckError ("mouse_unload", mouse_unload ()); +#else + /* Uninstall the static driver. */ + CheckError ("mouse_uninstall", mouse_uninstall ()); +#endif + + /* Say goodbye */ + cputsxy (0, height / 2 + 3, "Goodbye!"); + return EXIT_SUCCESS; +} diff --git a/testcode/lib/mul-test.c b/targettest/mul-test.c similarity index 95% rename from testcode/lib/mul-test.c rename to targettest/mul-test.c index 2daf5aa06..f9db3f641 100644 --- a/testcode/lib/mul-test.c +++ b/targettest/mul-test.c @@ -1,170 +1,170 @@ -/* mul-test.c -- Test the multiplication operator. */ - -#include <time.h> -#include <conio.h> -#include <ctype.h> - - -/* Number of elements in the progress bar. Use a power of 2, to avoid the -** multiplication (which is about to be tested). -*/ -#define BAR_ELEMENTS 32U - -#if defined(__CBM__) -static const unsigned char revers_bar[8] = { - 0, 0, 0, 0, 0, 1, 1, 1 -}; -static const unsigned char small_bar[8] = { - ' ', 0xa5, 0xb4, 0xb5, 0xa1, 0xb6, 0xaa, 0xa7 -}; - -#elif defined(__ATARI__) -#endif - -/* Screen co-ordinates for the progress meter */ -static unsigned char Width, Height; -static unsigned char X, Y; - -static void ProgressMeter (unsigned Val) -/* Print the progress bar. */ -{ - gotoxy (X, Y); - cprintf (" %5lu/65536\r\n", (unsigned long) Val); - revers (1); - cclear (Val / (unsigned)(65536U / BAR_ELEMENTS)); - -/* Commodore and Atari computers can show eight times greater precision. */ -#if defined(__CBM__) - Val = (Val / (unsigned)(65536U / BAR_ELEMENTS / 8)) % 8; - revers (revers_bar[Val]); - cputc (small_bar[Val]); - -#elif defined(__ATARI__) -#endif - - revers (0); -} - - - -int main(void) -{ - char C; - - /* Clock variables */ - clock_t Ticks; - clock_t Wait; - unsigned Days; - unsigned Hours; - unsigned Minu; - unsigned Sec; - unsigned Milli; - - /* Actual test variables */ - register unsigned lhs = 0; - register unsigned rhs = 0; - register unsigned res; - - /* Clear the screen, and output an informational message. */ - clrscr (); - screensize (&Width, &Height); - cprintf ("This program does an exhaustive test of\r\n" - "the multiplication routine. It runs for\r\n" - "several days; so, please wait very\r\n" - "patiently (or, speed up your emulator).\r\n" - "\n" - "Progress: "); - - /* Remember the current position for the progress bar */ - X = wherex (); - Y = wherey (); - - /* Mark the maximum limit of the bar. */ - revers (1); - cputcxy (BAR_ELEMENTS, Y, ' '); - cputcxy (BAR_ELEMENTS, Y + 1, ' '); - revers (0); - -/* [Targets that have clock() will define CLOCKS_PER_SEC.] */ -#ifdef CLOCKS_PER_SEC - - /* Start timing the test. */ - Ticks = clock(); -#endif - - do { - - /* Update the progress bar */ - ProgressMeter (lhs); - -/* Enable this to test the progress-meter code. -** (And, run emulators at their maximun speed.) -*/ -#if 0 - continue; -#endif - - /* Do one row of tests */ - res = 0; - do { - if (lhs * rhs != res) { -#ifdef CLOCKS_PER_SEC - Wait = clock (); -#endif - gotoxy (0, Y+3); - cprintf ("Error on %u * %u: %u != %u\r\n", lhs, rhs, lhs * rhs, res); - cprintf ("Press a key -- 'Q' to quit. "); - cursor (1); - C = toupper (cgetc ()); - cclearxy (0, Y+3, Width); - cclearxy (0, Y+4, Width); - -#ifdef CLOCKS_PER_SEC - - /* Don't time the user's interaction. */ - Ticks += clock () - Wait; -#endif - - if (C == 'Q') { - goto Done; - } - } - - if (kbhit () && toupper (cgetc ()) == 'Q') { - goto Done; - } - - res += lhs; - } while (++rhs != 0); - - } while (++lhs != 0); - -Done: -#ifdef CLOCKS_PER_SEC - - /* Calculate the time used */ - Ticks = clock() - Ticks; - Milli = ((Ticks % CLOCKS_PER_SEC) * 1000) / CLOCKS_PER_SEC; - Sec = (unsigned) (Ticks / CLOCKS_PER_SEC); - Minu = Sec / 60; - Hours = Minu / 60; - Days = Hours / 24; - Hours %= 24; - Minu %= 60; - Sec %= 60; - - /* Print the time used */ - gotoxy (0, Y+3); - cprintf ("Time used:\r\n" - " %u days,\r\n" - " %u hours,\r\n" - " %u minutes,\r\n" - " %u.%03u seconds.\n", Days, Hours, Minu, Sec, Milli); -#endif - - cprintf ("\rTap a key, to exit. "); - cgetc(); - return 0; -} - - +/* mul-test.c -- Test the multiplication operator. */ + +#include <time.h> +#include <conio.h> +#include <ctype.h> + + +/* Number of elements in the progress bar. Use a power of 2, to avoid the +** multiplication (which is about to be tested). +*/ +#define BAR_ELEMENTS 32U + +#if defined(__CBM__) +static const unsigned char revers_bar[8] = { + 0, 0, 0, 0, 0, 1, 1, 1 +}; +static const unsigned char small_bar[8] = { + ' ', 0xa5, 0xb4, 0xb5, 0xa1, 0xb6, 0xaa, 0xa7 +}; + +#elif defined(__ATARI__) +#endif + +/* Screen co-ordinates for the progress meter */ +static unsigned char Width, Height; +static unsigned char X, Y; + +static void ProgressMeter (unsigned Val) +/* Print the progress bar. */ +{ + gotoxy (X, Y); + cprintf (" %5lu/65536\r\n", (unsigned long) Val); + revers (1); + cclear (Val / (unsigned)(65536U / BAR_ELEMENTS)); + +/* Commodore and Atari computers can show eight times greater precision. */ +#if defined(__CBM__) + Val = (Val / (unsigned)(65536U / BAR_ELEMENTS / 8)) % 8; + revers (revers_bar[Val]); + cputc (small_bar[Val]); + +#elif defined(__ATARI__) +#endif + + revers (0); +} + + + +int main(void) +{ + char C; + + /* Clock variables */ + clock_t Ticks; + clock_t Wait; + unsigned Days; + unsigned Hours; + unsigned Minu; + unsigned Sec; + unsigned Milli; + + /* Actual test variables */ + register unsigned lhs = 0; + register unsigned rhs = 0; + register unsigned res; + + /* Clear the screen, and output an informational message. */ + clrscr (); + screensize (&Width, &Height); + cprintf ("This program does an exhaustive test of\r\n" + "the multiplication routine. It runs for\r\n" + "several days; so, please wait very\r\n" + "patiently (or, speed up your emulator).\r\n" + "\n" + "Progress: "); + + /* Remember the current position for the progress bar */ + X = wherex (); + Y = wherey (); + + /* Mark the maximum limit of the bar. */ + revers (1); + cputcxy (BAR_ELEMENTS, Y, ' '); + cputcxy (BAR_ELEMENTS, Y + 1, ' '); + revers (0); + +/* [Targets that have clock() will define CLOCKS_PER_SEC.] */ +#ifdef CLOCKS_PER_SEC + + /* Start timing the test. */ + Ticks = clock(); +#endif + + do { + + /* Update the progress bar */ + ProgressMeter (lhs); + +/* Enable this to test the progress-meter code. +** (And, run emulators at their maximun speed.) +*/ +#if 0 + continue; +#endif + + /* Do one row of tests */ + res = 0; + do { + if (lhs * rhs != res) { +#ifdef CLOCKS_PER_SEC + Wait = clock (); +#endif + gotoxy (0, Y+3); + cprintf ("Error on %u * %u: %u != %u\r\n", lhs, rhs, lhs * rhs, res); + cprintf ("Press a key -- 'Q' to quit. "); + cursor (1); + C = toupper (cgetc ()); + cclearxy (0, Y+3, Width); + cclearxy (0, Y+4, Width); + +#ifdef CLOCKS_PER_SEC + + /* Don't time the user's interaction. */ + Ticks += clock () - Wait; +#endif + + if (C == 'Q') { + goto Done; + } + } + + if (kbhit () && toupper (cgetc ()) == 'Q') { + goto Done; + } + + res += lhs; + } while (++rhs != 0); + + } while (++lhs != 0); + +Done: +#ifdef CLOCKS_PER_SEC + + /* Calculate the time used */ + Ticks = clock() - Ticks; + Milli = ((Ticks % CLOCKS_PER_SEC) * 1000) / CLOCKS_PER_SEC; + Sec = (unsigned) (Ticks / CLOCKS_PER_SEC); + Minu = Sec / 60; + Hours = Minu / 60; + Days = Hours / 24; + Hours %= 24; + Minu %= 60; + Sec %= 60; + + /* Print the time used */ + gotoxy (0, Y+3); + cprintf ("Time used:\r\n" + " %u days,\r\n" + " %u hours,\r\n" + " %u minutes,\r\n" + " %u.%03u seconds.\n", Days, Hours, Minu, Sec, Milli); +#endif + + cprintf ("\rTap a key, to exit. "); + cgetc(); + return 0; +} + + diff --git a/targettest/pce/Makefile b/targettest/pce/Makefile new file mode 100644 index 000000000..f757c3062 --- /dev/null +++ b/targettest/pce/Makefile @@ -0,0 +1,76 @@ + +# Run 'make SYS=<target>'; or, set a SYS env. +# var. to build for another target system. +SYS ?= pce + +# Just the usual way to find out if we're +# using cmd.exe to execute make rules. +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + NULLDEV = nul: + DEL = -del /f + RMDIR = rmdir /s /q +else + NULLDEV = /dev/null + DEL = $(RM) + RMDIR = $(RM) -r +endif + +ifdef CC65_HOME + AS = $(CC65_HOME)/bin/ca65 + CC = $(CC65_HOME)/bin/cc65 + CL = $(CC65_HOME)/bin/cl65 + LD = $(CC65_HOME)/bin/ld65 +else + AS := $(if $(wildcard ../../bin/ca65*),../../bin/ca65,ca65) + CC := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) + CL := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) + LD := $(if $(wildcard ../../bin/ld65*),../../bin/ld65,ld65) +endif + +.PHONY: all clean test + +# Size of cartridge to generate. +# Possible values: +# 8K = 0x2000 +# 16K = 0x4000 +# 32K = 0x8000 +CARTSIZE := 0x2000 + +ifeq (${CARTSIZE},0x8000) +COUNT := 3 +else +COUNT := 1 +endif + +EXELIST_pce = \ + conio.bin + +ifneq ($(EXELIST_$(SYS)),) +testcode: $(EXELIST_$(SYS)) +else +testcode: notavailable +endif + +# empty target used to skip systems that will not work with any program in this dir +notavailable: +ifeq ($(MAKELEVEL),0) + @echo "info: pce tests not available for" $(SYS) +else +# suppress the "nothing to be done for 'testcode' message + @echo > $(NULLDEV) +endif + +%.bin: %.c + $(CL) -t pce $< -Wl -D__CARTSIZE__=${CARTSIZE} -m $*.map -o $@ + @echo "use 'make conio.pce' to produce a .pce file using dd" + +%.pce: %.bin + dd if=$< bs=8K skip=${COUNT} > $@ + dd if=$< bs=8K count=${COUNT} >> $@ + +clean: + @$(DEL) conio.o conio.??? 2>$(NULLDEV) diff --git a/testcode/lib/pce/conio.c b/targettest/pce/conio.c similarity index 68% rename from testcode/lib/pce/conio.c rename to targettest/pce/conio.c index a4bd63b15..55f828f26 100644 --- a/testcode/lib/pce/conio.c +++ b/targettest/pce/conio.c @@ -1,3 +1,4 @@ +#include <pce.h> #include <conio.h> #include <time.h> #include <joystick.h> @@ -6,6 +7,10 @@ static int datavar = 10; +static char hex[16] = { "0123456789abcdef" }; +static char charbuf[0x20]; +static char colbuf[0x20]; + void main(void) { int stackvar = 42; @@ -20,11 +25,27 @@ void main(void) screensize(&xsize, &ysize); cputs("hello world"); + gotoxy(0,0); + cpeeks(charbuf, 11); + gotoxy(12,0); + cputs(charbuf); + cputsxy(0, 2, "colors:" ); for (i = 0; i < 16; ++i) { textcolor(i); - cputc('X'); + cputc(hex[i]); } + for (i = 0; i < 16; ++i) { + gotoxy(7 + i, 2); + charbuf[i] = cpeekc(); + colbuf[i] = cpeekcolor(); + } + gotoxy(25, 2); + for (i = 0; i < 16; ++i) { + textcolor(colbuf[i]); + cputc(charbuf[i]); + } + textcolor(1); gotoxy(0,4); @@ -44,7 +65,7 @@ void main(void) p[8],p[9],p[10],p[11],p[12],p[13],p[14],p[15] ); } - memcpy(p, main, 0); /* test that a zero length doesn't copy 64K */ + memcpy(p, main, i = 0); /* test that a zero length doesn't copy 64K */ gotoxy(0,ysize - 1); for (i = 0; i < xsize; ++i) { @@ -97,14 +118,14 @@ void main(void) j = joy_read (i); cprintf ("pad %d: %02x %-6s%-6s%-6s%-6s%-6s%-6s%-6s%-6s", i, j, - (j & joy_masks[JOY_UP])? " up " : " ---- ", - (j & joy_masks[JOY_DOWN])? " down " : " ---- ", - (j & joy_masks[JOY_LEFT])? " left " : " ---- ", - (j & joy_masks[JOY_RIGHT])? "right " : " ---- ", - (j & joy_masks[JOY_FIRE])? " fire " : " ---- ", - (j & joy_masks[JOY_FIRE2])? "fire2 " : " ---- ", - (j & joy_masks[JOY_SELECT])? "select" : " ---- ", - (j & joy_masks[JOY_RUN])? " run " : " ---- "); + JOY_UP(j)? " up " : " ---- ", + JOY_DOWN(j)? " down " : " ---- ", + JOY_LEFT(j)? " left " : " ---- ", + JOY_RIGHT(j)? "right " : " ---- ", + JOY_BTN_I(j)? "btn I " : " ---- ", + JOY_BTN_II(j)? "btn II" : " ---- ", + JOY_SELECT(j)? "select" : " ---- ", + JOY_RUN(j)? " run " : " ---- "); } gotoxy(xsize - 10, 3); @@ -114,6 +135,17 @@ void main(void) cputs(" revers"); revers(0); + for (i = 0; i < 9; ++i) { + gotoxy(xsize - 10 + i, 3); + charbuf[i] = cpeekc(); + colbuf[i] = cpeekrevers(); + } + gotoxy(xsize - 10, 4); + for (i = 0; i < 9; ++i) { + revers(colbuf[i]); + cputc(charbuf[i]); + } + if ((n & 0x1f) == 0x00) { nn = p[15]; ((char*)memmove(p + 1, p, 15))[-1] = nn; @@ -123,7 +155,7 @@ void main(void) p[8],p[9],p[10],p[11],p[12],p[13],p[14],p[15]); } - waitvblank(); + waitvsync(); ++n; } } diff --git a/testcode/lib/posixio-test.c b/targettest/posixio-test.c similarity index 100% rename from testcode/lib/posixio-test.c rename to targettest/posixio-test.c diff --git a/targettest/readme.txt b/targettest/readme.txt new file mode 100644 index 000000000..355812776 --- /dev/null +++ b/targettest/readme.txt @@ -0,0 +1,9 @@ + +This directory contains test programs for the cc65 compiler. + +The programs contained here are +- NOT to be referenced in the documentation +- compiled (but NOT run) by the CI test (this is their main purpose) +- some programs can be used interactively to check certain library features + +Sample programs ment for endusers should be placed in the samples directory. diff --git a/testcode/lib/rename-test.c b/targettest/rename-test.c similarity index 100% rename from testcode/lib/rename-test.c rename to targettest/rename-test.c diff --git a/testcode/lib/scanf-test.c b/targettest/scanf-test.c similarity index 97% rename from testcode/lib/scanf-test.c rename to targettest/scanf-test.c index 9fce01b77..f17b62294 100644 --- a/testcode/lib/scanf-test.c +++ b/targettest/scanf-test.c @@ -14,9 +14,7 @@ /* Define USE_STDIO, when you want to use the stdio functions. ** Do not define it, when you want to use the conio functions. */ -/* #define USE_STDIO -*/ #include <stdio.h> #include <string.h> @@ -35,22 +33,23 @@ #define ARRAYSIZE(a) (sizeof (a) / sizeof (a)[0]) +typedef enum { + INT, + CHAR +} TYPE; + +typedef union { + int nvalue; + const char *svalue; +} VALUE; + static const struct { const char *input, *format; int rvalue; - enum TYPE { - INT, - CHAR - } type1; - union { - int nvalue; - const char *svalue; - } v1; - enum TYPE type2; - union { - int nvalue; - const char *svalue; - } v2; + TYPE type1; + VALUE v1; + TYPE type2; + VALUE v2; } test_data[] = { /* Input sequences for character specifiers must be less than 80 characters ** long. These format strings are allowwed a maximum of two assignment diff --git a/testcode/lib/seek.c b/targettest/seek.c similarity index 82% rename from testcode/lib/seek.c rename to targettest/seek.c index 0cb1c6ad6..200f344c2 100644 --- a/testcode/lib/seek.c +++ b/targettest/seek.c @@ -23,6 +23,7 @@ int main(int argc, char **argv) if (!x) { return(0); } + x[strcspn(x, "\r\n")] = 0; filename = x; } else { @@ -172,6 +173,35 @@ int main(int argc, char **argv) } else { printf("NOT OK, no error\n"); + fclose(file); + return(1); + } + + /* ProDOS on the Apple II only supports 24-bit file offsets, + ** so anything beyond that should be an error. I don't know + ** about other platforms, but I'm guessing no 6502-based + ** operating systems support 32-bit offsets? + */ + printf("seeking to position 2^24:\n\t"); + pos = lseek(fd, 0x1000000L, SEEK_SET); + if (pos == -1) { + printf("Ok, error %s\n", strerror(errno)); + } + else { + printf("NOT OK, returned %ld but expected -1\n", pos); + fclose(file); + return(1); + } + + printf("trying invalid value for whence:\n\t"); + pos = lseek(fd, 0L, 3); + if (pos == -1) { + printf("Ok, error %s\n", strerror(errno)); + } + else { + printf("NOT OK, returned %ld but expected -1\n", pos); + fclose(file); + return(1); } fclose(file); diff --git a/testcode/lib/ser-test.c b/targettest/ser-test.c similarity index 100% rename from testcode/lib/ser-test.c rename to targettest/ser-test.c diff --git a/testcode/lib/strdup-test.c b/targettest/strdup-test.c similarity index 76% rename from testcode/lib/strdup-test.c rename to targettest/strdup-test.c index 5514471f9..8e7ae87d8 100644 --- a/testcode/lib/strdup-test.c +++ b/targettest/strdup-test.c @@ -3,34 +3,25 @@ #include <string.h> #include <time.h> +#include <_heap.h> -/* From _heap.h */ -extern unsigned _horg; /* Bottom of heap */ -extern unsigned _hptr; /* Current top */ -extern unsigned _hend; /* Upper limit */ -extern unsigned _hfirst; /* First free block in list */ -extern unsigned _hlast; /* Last free block in list */ - - -static unsigned char* V[256]; - - +static char* V[256]; static void ShowInfo (void) /* Show heap info */ { /* Count free blocks */ unsigned Count = 0; - unsigned** P = (unsigned**) _hfirst; + unsigned** P = (unsigned**) _heapfirst; while (P) { ++Count; P = P[1]; } printf ("%04X %04X %04X %04X %04X %u\n", - _horg, _hptr, _hend, _hfirst, _hlast, Count); + _heaporg, _heapptr, _heapend, _heapfirst, _heaplast, Count); if (Count) { - P = (unsigned**) _hfirst; + P = (unsigned**) _heapfirst; while (P) { printf ("%04X %04X %04X %04X(%u)\n", (unsigned) P, P[2], P[1], P[0], P[0]); @@ -93,19 +84,21 @@ int main (void) /* Show info at start */ ShowInfo (); - +#if !defined(__APPLE2__) /* Remember the time */ T = clock (); - +#endif /* Do the tests */ FillArray (); ShowInfo (); FreeArray (); ShowInfo (); +#if !defined(__APPLE2__) /* Calculate the time and print it */ T = clock () - T; printf ("Time needed: %lu ticks\n", T); +#endif /* Done */ return EXIT_SUCCESS; diff --git a/targettest/strnlen.c b/targettest/strnlen.c new file mode 100644 index 000000000..ac39f2396 --- /dev/null +++ b/targettest/strnlen.c @@ -0,0 +1,32 @@ +#include <stdio.h> +#include <stdlib.h> +#include <string.h> + +const char * str = "0123456789"; + +void +check (size_t result, size_t expected) +{ + if (result != expected) { + printf ("Expected strnlen() to return %u, got %u.\n", + expected, result); + exit (EXIT_FAILURE); + } +} + +int +main (void) +{ + size_t maxlen = strlen (str); + size_t result; + size_t expected; + + for (expected = 0; expected < maxlen; expected++) + check (strnlen (str, expected), expected); + + check (strnlen (str, maxlen << 1), maxlen); + + printf ("strnlen() OK.\n"); + + return EXIT_SUCCESS; +} diff --git a/testcode/lib/stroserror-test.c b/targettest/stroserror-test.c similarity index 100% rename from testcode/lib/stroserror-test.c rename to targettest/stroserror-test.c diff --git a/testcode/lib/strqtok-test.c b/targettest/strqtok-test.c similarity index 100% rename from testcode/lib/strqtok-test.c rename to targettest/strqtok-test.c diff --git a/testcode/lib/uname-test.c b/targettest/uname-test.c similarity index 91% rename from testcode/lib/uname-test.c rename to targettest/uname-test.c index b0733d0bd..2851da19c 100644 --- a/testcode/lib/uname-test.c +++ b/targettest/uname-test.c @@ -4,7 +4,7 @@ int main (void) -{ +{ /* Get the uname data */ struct utsname buf; if (uname (&buf) != 0) { @@ -12,7 +12,7 @@ int main (void) return EXIT_FAILURE; } - /* Print it */ + /* Print it */ printf ("sysname: \"%s\"\n", buf.sysname); printf ("nodename: \"%s\"\n", buf.nodename); printf ("release: \"%s\"\n", buf.release); diff --git a/test/.gitignore b/test/.gitignore deleted file mode 100644 index 5761abcfd..000000000 --- a/test/.gitignore +++ /dev/null @@ -1 +0,0 @@ -*.o diff --git a/test/CPYRIGHT.LCC b/test/CPYRIGHT.LCC new file mode 100644 index 000000000..a7527a9d3 --- /dev/null +++ b/test/CPYRIGHT.LCC @@ -0,0 +1,60 @@ +The authors of this software are Christopher W. Fraser and +David R. Hanson. + +Copyright (c) 1991,1992,1993,1994,1995,1996,1997,1998,1999,2000,2001,2002 +by AT&T, Christopher W. Fraser, and David R. Hanson. All Rights Reserved. + +Permission to use, copy, modify, and distribute this software for any +purpose, subject to the provisions described below, without fee is +hereby granted, provided that this entire notice is included in all +copies of any software that is or includes a copy or modification of +this software and in all copies of the supporting documentation for +such software. + +THIS SOFTWARE IS BEING PROVIDED "AS IS", WITHOUT ANY EXPRESS OR IMPLIED +WARRANTY. IN PARTICULAR, NEITHER THE AUTHORS NOR AT&T MAKE ANY +REPRESENTATION OR WARRANTY OF ANY KIND CONCERNING THE MERCHANTABILITY +OF THIS SOFTWARE OR ITS FITNESS FOR ANY PARTICULAR PURPOSE. + +lcc is not public-domain software, shareware, and it is not protected +by a `copyleft' agreement, like the code from the Free Software +Foundation. + +lcc is available free for your personal research and instructional use +under the `fair use' provisions of the copyright law. You may, however, +redistribute lcc in whole or in part provided you acknowledge its +source and include this CPYRIGHT file. You may, for example, include +the distribution in a CDROM of free software, provided you charge only +for the media, or mirror the distribution files at your site. + +You may not sell lcc or any product derived from it in which it is a +significant part of the value of the product. Using the lcc front end +to build a C syntax checker is an example of this kind of product. + +You may use parts of lcc in products as long as you charge for only +those components that are entirely your own and you acknowledge the use +of lcc clearly in all product documentation and distribution media. You +must state clearly that your product uses or is based on parts of lcc +and that lcc is available free of charge. You must also request that +bug reports on your product be reported to you. Using the lcc front +end to build a C compiler for the Motorola 88000 chip and charging for +and distributing only the 88000 code generator is an example of this +kind of product. + +Using parts of lcc in other products is more problematic. For example, +using parts of lcc in a C++ compiler could save substantial time and +effort and therefore contribute significantly to the profitability of +the product. This kind of use, or any use where others stand to make a +profit from what is primarily our work, requires a license agreement +with Addison-Wesley. Per-copy and unlimited use licenses are +available; for more information, contact + + Kim Boedigheimer + Addison Wesley + 75 Arlington St., Suite 300 + Boston, MA 02116 + 617/848-6559 kim.boedigheimer@pearsoned.com +----- +Chris Fraser / cwf@aya.yale.edu +David Hanson / drh@drhanson.net +$Revision$ $Date$ diff --git a/test/Makefile b/test/Makefile index 1ad86ca98..abc70d58f 100644 --- a/test/Makefile +++ b/test/Makefile @@ -1,56 +1,38 @@ - -# top-level makefile for the regression tests - -# You can comment this special target when you debug the regression tests. -# Then, make will give you more progress reports. -.SILENT: +# top-level Makefile for the regression tests ifneq ($(shell echo),) - CMD_EXE := 1 + CMD_EXE = 1 endif ifdef CMD_EXE - EXE := .exe - DEL = -del /f $(subst /,\,$1) - MKDIR = mkdir $(subst /,\,$1) RMDIR = -rmdir /s /q $(subst /,\,$1) else - EXE := - DEL = $(RM) $1 - MKDIR = mkdir $1 RMDIR = $(RM) -r $1 endif -WORKDIR := ../testwrk +WORKDIR = ../testwrk -CC := gcc +.PHONY: test continue mostlyclean clean -.PHONY: all dotests continue mostly-clean clean +test: mostlyclean continue -all: dotests - -$(WORKDIR): - $(call MKDIR,$(WORKDIR)) - -$(WORKDIR)/bdiff$(EXE): bdiff.c | $(WORKDIR) - $(CC) -O2 -o $@ $< - -.NOTPARALLEL: - -dotests: mostly-clean continue - -continue: $(WORKDIR)/bdiff$(EXE) +continue: + @$(MAKE) -C asm all + @$(MAKE) -C dasm all @$(MAKE) -C val all @$(MAKE) -C ref all @$(MAKE) -C err all @$(MAKE) -C misc all + @$(MAKE) -C todo all -mostly-clean: +mostlyclean: + @$(MAKE) -C asm clean + @$(MAKE) -C dasm clean @$(MAKE) -C val clean @$(MAKE) -C ref clean @$(MAKE) -C err clean @$(MAKE) -C misc clean + @$(MAKE) -C todo clean -clean: mostly-clean - @$(call DEL,$(WORKDIR)/bdiff$(EXE)) +clean: mostlyclean @$(call RMDIR,$(WORKDIR)) diff --git a/test/asm/Makefile b/test/asm/Makefile new file mode 100644 index 000000000..3481dae78 --- /dev/null +++ b/test/asm/Makefile @@ -0,0 +1,34 @@ +# top-level Makefile for the regression tests + +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + RMDIR = -rmdir /s /q $(subst /,\,$1) +else + RMDIR = $(RM) -r $1 +endif + +WORKDIR = ../testwrk/asm + +SUBDIRS = cpudetect opcodes listing val err + +.PHONY: all continue mostlyclean clean + +all: mostlyclean continue + +define CALL_template + +continue:: + @$(MAKE) -C $1 all + +mostlyclean:: + @$(MAKE) -C $1 clean + +endef + +$(foreach subdir,$(SUBDIRS),$(eval $(call CALL_template,$(subdir)))) + +clean: mostlyclean + @$(call RMDIR,$(WORKDIR)) diff --git a/test/asm/cpudetect/4510-cpudetect.ref b/test/asm/cpudetect/4510-cpudetect.ref new file mode 100644 index 000000000..515557c85 Binary files /dev/null and b/test/asm/cpudetect/4510-cpudetect.ref differ diff --git a/test/asm/cpudetect/6502-cpudetect.ref b/test/asm/cpudetect/6502-cpudetect.ref new file mode 100644 index 000000000..9b0aeb1f0 Binary files /dev/null and b/test/asm/cpudetect/6502-cpudetect.ref differ diff --git a/test/asm/cpudetect/6502dtv-cpudetect.ref b/test/asm/cpudetect/6502dtv-cpudetect.ref new file mode 100644 index 000000000..77a865eb4 Binary files /dev/null and b/test/asm/cpudetect/6502dtv-cpudetect.ref differ diff --git a/test/asm/cpudetect/6502x-cpudetect.ref b/test/asm/cpudetect/6502x-cpudetect.ref new file mode 100644 index 000000000..3434ecbea Binary files /dev/null and b/test/asm/cpudetect/6502x-cpudetect.ref differ diff --git a/test/asm/cpudetect/65816-cpudetect.ref b/test/asm/cpudetect/65816-cpudetect.ref new file mode 100644 index 000000000..4f6e767b0 Binary files /dev/null and b/test/asm/cpudetect/65816-cpudetect.ref differ diff --git a/test/asm/cpudetect/65c02-cpudetect.ref b/test/asm/cpudetect/65c02-cpudetect.ref new file mode 100644 index 000000000..9f790d5ff Binary files /dev/null and b/test/asm/cpudetect/65c02-cpudetect.ref differ diff --git a/test/asm/cpudetect/65sc02-cpudetect.ref b/test/asm/cpudetect/65sc02-cpudetect.ref new file mode 100644 index 000000000..4e11bd708 Binary files /dev/null and b/test/asm/cpudetect/65sc02-cpudetect.ref differ diff --git a/test/asm/cpudetect/Makefile b/test/asm/cpudetect/Makefile new file mode 100644 index 000000000..ffddb1ad8 --- /dev/null +++ b/test/asm/cpudetect/Makefile @@ -0,0 +1,61 @@ +# Makefile for the assembler regression tests + +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + EXE = .exe + MKDIR = mkdir $(subst /,\,$1) + RMDIR = -rmdir /q /s $(subst /,\,$1) +else + EXE = + MKDIR = mkdir -p $1 + RMDIR = $(RM) -r $1 +endif + +ifdef QUIET + .SILENT: +endif + +CA65 := $(if $(wildcard ../../../bin/ca65*),../../../bin/ca65,ca65) +LD65 := $(if $(wildcard ../../../bin/ld65*),../../../bin/ld65,ld65) + +WORKDIR = ../../../testwrk/asm/cpudetect + +ISEQUAL = ../../../testwrk/isequal$(EXE) + +CC = gcc +CFLAGS = -O2 + +.PHONY: all clean + +CPUDETECT_REFS := $(wildcard *-cpudetect.ref) +CPUDETECT_BINS = $(CPUDETECT_REFS:%.ref=$(WORKDIR)/%.bin) +CPUDETECT_CPUS = $(CPUDETECT_REFS:%-cpudetect.ref=%) + +all: $(CPUDETECT_BINS) + +$(WORKDIR): + $(call MKDIR,$(WORKDIR)) + +$(ISEQUAL): ../../isequal.c | $(WORKDIR) + $(CC) $(CFLAGS) -o $@ $< + +define CPUDETECT_template + +$(WORKDIR)/$1-cpudetect.bin: cpudetect.s $1-cpudetect.ref $(ISEQUAL) + $(if $(QUIET),echo asm/$1-cpudetect.bin) + $(CA65) -t none --cpu $1 -l $$(@:.bin=.lst) -o $$(@:.bin=.o) $$< + $(LD65) -t none -o $$@ $$(@:.bin=.o) none.lib + $(ISEQUAL) $1-cpudetect.ref $$@ + +endef # CPUDETECT_template + +$(foreach cpu,$(CPUDETECT_CPUS),$(eval $(call CPUDETECT_template,$(cpu)))) + +$(WORKDIR)/%.o: %.s | $(WORKDIR) + $(CA65) -l $(@:.o=.lst) -o $@ $< + +clean: + @$(call RMDIR,$(WORKDIR)) diff --git a/test/asm/cpudetect/cpudetect.s b/test/asm/cpudetect/cpudetect.s new file mode 100644 index 000000000..7b2363b7f --- /dev/null +++ b/test/asm/cpudetect/cpudetect.s @@ -0,0 +1,74 @@ + +.macpack cpu + +; step 1: try to assemble an instruction that's exclusive to this set +; (when possible) + +.ifp02 + lda #$ea +.endif + +.ifpsc02 + jmp ($1234,x) +.endif + +.ifpc02 + rmb0 $12 +.endif + +.ifp816 + xba +.endif + +.ifp4510 + taz +.endif + +.ifpdtv + sac #$00 +.endif + + +; step 2: check for bitwise compatibility of instructions sets +; (made verbose for better reading with hexdump/hd(1)) + +.if (.cpu .bitand CPU_ISET_NONE) + .byte 0,"CPU_ISET_NONE" +.endif + +.if (.cpu .bitand CPU_ISET_6502) + .byte 0,"CPU_ISET_6502" +.endif + +.if (.cpu .bitand CPU_ISET_6502X) + .byte 0,"CPU_ISET_6502X" +.endif + +.if (.cpu .bitand CPU_ISET_65SC02) + .byte 0,"CPU_ISET_65SC02" +.endif + +.if (.cpu .bitand CPU_ISET_65C02) + .byte 0,"CPU_ISET_65C02" +.endif + +.if (.cpu .bitand CPU_ISET_65816) + .byte 0,"CPU_ISET_65816" +.endif + +.if (.cpu .bitand CPU_ISET_SWEET16) + .byte 0,"CPU_ISET_SWEET16" +.endif + +.if (.cpu .bitand CPU_ISET_HUC6280) + .byte 0,"CPU_ISET_HUC6280" +.endif + +.if (.cpu .bitand CPU_ISET_4510) + .byte 0,"CPU_ISET_4510" +.endif + +.if (.cpu .bitand CPU_ISET_6502DTV) + .byte 0,"CPU_ISET_6502DTV" +.endif + diff --git a/test/asm/cpudetect/huc6280-cpudetect.ref b/test/asm/cpudetect/huc6280-cpudetect.ref new file mode 100644 index 000000000..646e0f48c Binary files /dev/null and b/test/asm/cpudetect/huc6280-cpudetect.ref differ diff --git a/test/asm/cpudetect/readme.txt b/test/asm/cpudetect/readme.txt new file mode 100644 index 000000000..6a1adf480 --- /dev/null +++ b/test/asm/cpudetect/readme.txt @@ -0,0 +1,15 @@ +CPU Detect Tests +---------------- + +These tests all assemble the same file "cpudetect.s" which contains several +conditionals for several CPUs, only using every option known to the "--cpu" +command-line switch of ca65/cl65. + +Reference (".ref") Files +------------------------ + +Some hints about creating new files: +Make an empty file with the CPU's name prepended to "-cpudetect.ref". Run the +tests; one of them will fail due to a mismatch. Review the output of the +".lst" file pedantically, then copy the ".bin" over the empty ".ref" file. + diff --git a/test/asm/err/Makefile b/test/asm/err/Makefile new file mode 100644 index 000000000..6d2430d34 --- /dev/null +++ b/test/asm/err/Makefile @@ -0,0 +1,45 @@ +# Makefile for the tests that MUST NOT compile + +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + S = $(subst /,\,/) + NOT = - # Hack + NULLDEV = nul: + MKDIR = mkdir $(subst /,\,$1) + RMDIR = -rmdir /s /q $(subst /,\,$1) +else + S = / + NOT = ! + NULLDEV = /dev/null + MKDIR = mkdir -p $1 + RMDIR = $(RM) -r $1 +endif + +ifdef QUIET + .SILENT: + NULLERR = 2>$(NULLDEV) +endif + +CA65 := $(if $(wildcard ../../../bin/ca65*),..$S..$S..$Sbin$Sca65,ca65) + +WORKDIR = ../../../testwrk/asm/err + +.PHONY: all clean + +SOURCES := $(wildcard *.s) +TESTS = $(patsubst %.s,$(WORKDIR)/%.prg,$(SOURCES)) + +all: $(TESTS) + +$(WORKDIR): + $(call MKDIR,$(WORKDIR)) + +$(WORKDIR)/%.prg: %.s | $(WORKDIR) + $(if $(QUIET),echo asm/err/$*.s) + $(NOT) $(CA65) -o $@ $< $(NULLERR) + +clean: + @$(call RMDIR,$(WORKDIR)) diff --git a/test/asm/err/bug1538-1.s b/test/asm/err/bug1538-1.s new file mode 100644 index 000000000..334d19c4c --- /dev/null +++ b/test/asm/err/bug1538-1.s @@ -0,0 +1,3 @@ + + ; this should produce a range error + .byte $1234 & $ffff diff --git a/test/asm/err/bug1678.s b/test/asm/err/bug1678.s new file mode 100644 index 000000000..d91e52214 --- /dev/null +++ b/test/asm/err/bug1678.s @@ -0,0 +1,22 @@ + +; #1678 Endless loop printing error messages + + .macpack longbranch + + .import _exit + .export _main + +.macro foo + foo +.endmacro + +.struct bar + foo +.endstruct + +_main: + ; exit OK + lda #0 + ldx #0 + jmp _exit + diff --git a/test/asm/listing/001-macro-simple-listing.s b/test/asm/listing/001-macro-simple-listing.s new file mode 100644 index 000000000..272863de7 --- /dev/null +++ b/test/asm/listing/001-macro-simple-listing.s @@ -0,0 +1,16 @@ +; 2022-01-17 Spiro Trikaliotis + +.macro TESTER + lda #2 +.endmacro + +test: + ldx #0 + TESTER + ldx #15 + TESTER + inx + TESTER + TESTER + dex + rts diff --git a/test/asm/listing/002-macro-param-listing.s b/test/asm/listing/002-macro-param-listing.s new file mode 100644 index 000000000..3d4b1b921 --- /dev/null +++ b/test/asm/listing/002-macro-param-listing.s @@ -0,0 +1,16 @@ +; 2022-01-17 Spiro Trikaliotis + +.macro TESTER val + lda #val +.endmacro + +test: + ldx #0 + TESTER 1 + ldx #15 + TESTER 2 + inx + TESTER 3 + TESTER 4 + dex + rts diff --git a/testcode/assembler/paramcount.s b/test/asm/listing/010-paramcount.s similarity index 100% rename from testcode/assembler/paramcount.s rename to test/asm/listing/010-paramcount.s diff --git a/test/asm/listing/020-asciiz.s b/test/asm/listing/020-asciiz.s new file mode 100644 index 000000000..3b554e52f --- /dev/null +++ b/test/asm/listing/020-asciiz.s @@ -0,0 +1,14 @@ +; 2022-06-15 Spiro Trikaliotis + + + ; upper case pseudo-op + .ASCIIZ "" + .ASCIIZ "Hello World" + .ASCIIZ "Hello ","World" + .ASCIIZ "Hello ","World"," ","I"," ","am"," ","testing" + + ; lower case pseudo-op + .asciiz "" + .asciiz "Hello World" + .asciiz "Hello ","World" + .asciiz "Hello ","World"," ","I"," ","am"," ","testing" diff --git a/test/asm/listing/030-assert-success.s b/test/asm/listing/030-assert-success.s new file mode 100644 index 000000000..17abcb22f --- /dev/null +++ b/test/asm/listing/030-assert-success.s @@ -0,0 +1,81 @@ +; 2022-06-15 Spiro Trikaliotis + + .ASSERT * = $0000, warning, "Code not at $0000" + .assert * = $0000, warning, "Code not at $0000" + + .ASSERT * = $0001, warning, "Code not at $0001" + .assert * = $0001, warning, "Code not at $0001" + + .ASSERT * = $1000, warning, "Code not at $1000" + .assert * = $1000, warning, "Code not at $1000" + + .ASSERT * = $1001, warning, "Code not at $1001" + .assert * = $1001, warning, "Code not at $1001" + + .ASSERT * = $8000, warning, "Code not at $8000" + .assert * = $8000, warning, "Code not at $8000" + + .ASSERT * = $8001, warning, "Code not at $8001" + .assert * = $8001, warning, "Code not at $8001" + + nop + + .ASSERT * = $0000, warning, "Code not at $0000" + .assert * = $0000, warning, "Code not at $0000" + + .ASSERT * = $0001, warning, "Code not at $0001" + .assert * = $0001, warning, "Code not at $0001" + + .ASSERT * = $1000, warning, "Code not at $1000" + .assert * = $1000, warning, "Code not at $1000" + + .ASSERT * = $1001, warning, "Code not at $1001" + .assert * = $1001, warning, "Code not at $1001" + + .ASSERT * = $8000, warning, "Code not at $8000" + .assert * = $8000, warning, "Code not at $8000" + + .ASSERT * = $8001, warning, "Code not at $8001" + .assert * = $8001, warning, "Code not at $8001" + + + + .org $8000 + + .ASSERT * = $0000, warning, "Code not at $0000" + .assert * = $0000, warning, "Code not at $0000" + + .ASSERT * = $0001, warning, "Code not at $0001" + .assert * = $0001, warning, "Code not at $0001" + + .ASSERT * = $1000, warning, "Code not at $1000" + .assert * = $1000, warning, "Code not at $1000" + + .ASSERT * = $1001, warning, "Code not at $1001" + .assert * = $1001, warning, "Code not at $1001" + + .ASSERT * = $8000, warning, "Code not at $8000" + .assert * = $8000, warning, "Code not at $8000" + + .ASSERT * = $8001, warning, "Code not at $8001" + .assert * = $8001, warning, "Code not at $8001" + + nop + + .ASSERT * = $0000, warning, "Code not at $0000" + .assert * = $0000, warning, "Code not at $0000" + + .ASSERT * = $0001, warning, "Code not at $0001" + .assert * = $0001, warning, "Code not at $0001" + + .ASSERT * = $1000, warning, "Code not at $1000" + .assert * = $1000, warning, "Code not at $1000" + + .ASSERT * = $1001, warning, "Code not at $1001" + .assert * = $1001, warning, "Code not at $1001" + + .ASSERT * = $8000, warning, "Code not at $8000" + .assert * = $8000, warning, "Code not at $8000" + + .ASSERT * = $8001, warning, "Code not at $8001" + .assert * = $8001, warning, "Code not at $8001" diff --git a/test/asm/listing/031-assert-error.s b/test/asm/listing/031-assert-error.s new file mode 100644 index 000000000..4aafb560b --- /dev/null +++ b/test/asm/listing/031-assert-error.s @@ -0,0 +1,28 @@ +; 2022-06-15 Spiro Trikaliotis + + .ASSERT * = $0000, error, "Code not at $0000" + .assert * = $0000, error, "Code not at $0000" + + .ASSERT * = $0001, error, "Code not at $0001" + .assert * = $0001, error, "Code not at $0001" + + .ASSERT * = $1000, error, "Code not at $1000" + .assert * = $1000, error, "Code not at $1000" + + .ASSERT * = $1001, error, "Code not at $1001" + .assert * = $1001, error, "Code not at $1001" + + .ASSERT * = $8000, error, "Code not at $8000" + .assert * = $8000, error, "Code not at $8000" + + .ASSERT * = $8001, error, "Code not at $8001" + .assert * = $8001, error, "Code not at $8001" + + + .org $8000 + + .ASSERT * = $8000, error, "Code not at $8000" + .assert * = $8000, error, "Code not at $8000" + + .ASSERT * = $8001, error, "Code not at $8001" + .assert * = $8001, error, "Code not at $8001" diff --git a/test/asm/listing/032-assert-error2.s b/test/asm/listing/032-assert-error2.s new file mode 100644 index 000000000..236c2c6c4 --- /dev/null +++ b/test/asm/listing/032-assert-error2.s @@ -0,0 +1,8 @@ +; 2022-06-18 Spiro Trikaliotis + + .ASSERT * = $0000, error, "Code not at $0000" + .ASSERT * = $0001, error, "Code not at $0001" + .ASSERT * = $1000, error, "Code not at $1000" + .ASSERT * = $1001, error, "Code not at $1001" + .ASSERT * = $8000, error, "Code not at $8000" + .ASSERT * = $8001, error, "Code not at $8001" diff --git a/test/asm/listing/032-assert-error3.s b/test/asm/listing/032-assert-error3.s new file mode 100644 index 000000000..37a4f29c2 --- /dev/null +++ b/test/asm/listing/032-assert-error3.s @@ -0,0 +1,3 @@ +; 2022-06-20 Spiro Trikaliotis + + .assert * = $0000, error, "Code not at $0000" diff --git a/test/asm/listing/032-assert-error4.s b/test/asm/listing/032-assert-error4.s new file mode 100644 index 000000000..c28f83757 --- /dev/null +++ b/test/asm/listing/032-assert-error4.s @@ -0,0 +1,3 @@ +; 2022-06-20 Spiro Trikaliotis + + .assert * = $0001, error, "Code not at $0001" diff --git a/test/asm/listing/032-assert-error5.s b/test/asm/listing/032-assert-error5.s new file mode 100644 index 000000000..2f9678978 --- /dev/null +++ b/test/asm/listing/032-assert-error5.s @@ -0,0 +1,3 @@ +; 2022-06-20 Spiro Trikaliotis + + .assert * = $1000, error, "Code not at $1000" diff --git a/test/asm/listing/032-assert-error6.s b/test/asm/listing/032-assert-error6.s new file mode 100644 index 000000000..27fafe068 --- /dev/null +++ b/test/asm/listing/032-assert-error6.s @@ -0,0 +1,3 @@ +; 2022-06-20 Spiro Trikaliotis + + .assert * = $1001, error, "Code not at $1001" diff --git a/test/asm/listing/032-assert-error7.s b/test/asm/listing/032-assert-error7.s new file mode 100644 index 000000000..bcb627d7f --- /dev/null +++ b/test/asm/listing/032-assert-error7.s @@ -0,0 +1,3 @@ +; 2022-06-20 Spiro Trikaliotis + + .assert * = $8000, error, "Code not at $8000" diff --git a/test/asm/listing/032-assert-error8.s b/test/asm/listing/032-assert-error8.s new file mode 100644 index 000000000..a542629e5 --- /dev/null +++ b/test/asm/listing/032-assert-error8.s @@ -0,0 +1,3 @@ +; 2022-06-20 Spiro Trikaliotis + + .assert * = $8001, error, "Code not at $8001" diff --git a/test/asm/listing/033-assert-ldwarning-success.s b/test/asm/listing/033-assert-ldwarning-success.s new file mode 100644 index 000000000..68ebe375a --- /dev/null +++ b/test/asm/listing/033-assert-ldwarning-success.s @@ -0,0 +1,81 @@ +; 2022-06-15 Spiro Trikaliotis + + .ASSERT * = $0000, ldwarning, "Code not at $0000" + .assert * = $0000, ldwarning, "Code not at $0000" + + .ASSERT * = $0001, ldwarning, "Code not at $0001" + .assert * = $0001, ldwarning, "Code not at $0001" + + .ASSERT * = $1000, ldwarning, "Code not at $1000" + .assert * = $1000, ldwarning, "Code not at $1000" + + .ASSERT * = $1001, ldwarning, "Code not at $1001" + .assert * = $1001, ldwarning, "Code not at $1001" + + .ASSERT * = $8000, ldwarning, "Code not at $8000" + .assert * = $8000, ldwarning, "Code not at $8000" + + .ASSERT * = $8001, ldwarning, "Code not at $8001" + .assert * = $8001, ldwarning, "Code not at $8001" + + nop + + .ASSERT * = $0000, ldwarning, "Code not at $0000" + .assert * = $0000, ldwarning, "Code not at $0000" + + .ASSERT * = $0001, ldwarning, "Code not at $0001" + .assert * = $0001, ldwarning, "Code not at $0001" + + .ASSERT * = $1000, ldwarning, "Code not at $1000" + .assert * = $1000, ldwarning, "Code not at $1000" + + .ASSERT * = $1001, ldwarning, "Code not at $1001" + .assert * = $1001, ldwarning, "Code not at $1001" + + .ASSERT * = $8000, ldwarning, "Code not at $8000" + .assert * = $8000, ldwarning, "Code not at $8000" + + .ASSERT * = $8001, ldwarning, "Code not at $8001" + .assert * = $8001, ldwarning, "Code not at $8001" + + + + .org $8000 + + .ASSERT * = $0000, ldwarning, "Code not at $0000" + .assert * = $0000, ldwarning, "Code not at $0000" + + .ASSERT * = $0001, ldwarning, "Code not at $0001" + .assert * = $0001, ldwarning, "Code not at $0001" + + .ASSERT * = $1000, ldwarning, "Code not at $1000" + .assert * = $1000, ldwarning, "Code not at $1000" + + .ASSERT * = $1001, ldwarning, "Code not at $1001" + .assert * = $1001, ldwarning, "Code not at $1001" + + .ASSERT * = $8000, ldwarning, "Code not at $8000" + .assert * = $8000, ldwarning, "Code not at $8000" + + .ASSERT * = $8001, ldwarning, "Code not at $8001" + .assert * = $8001, ldwarning, "Code not at $8001" + + nop + + .ASSERT * = $0000, ldwarning, "Code not at $0000" + .assert * = $0000, ldwarning, "Code not at $0000" + + .ASSERT * = $0001, ldwarning, "Code not at $0001" + .assert * = $0001, ldwarning, "Code not at $0001" + + .ASSERT * = $1000, ldwarning, "Code not at $1000" + .assert * = $1000, ldwarning, "Code not at $1000" + + .ASSERT * = $1001, ldwarning, "Code not at $1001" + .assert * = $1001, ldwarning, "Code not at $1001" + + .ASSERT * = $8000, ldwarning, "Code not at $8000" + .assert * = $8000, ldwarning, "Code not at $8000" + + .ASSERT * = $8001, ldwarning, "Code not at $8001" + .assert * = $8001, ldwarning, "Code not at $8001" diff --git a/test/asm/listing/034-assert-lderror1.s b/test/asm/listing/034-assert-lderror1.s new file mode 100644 index 000000000..4aafb560b --- /dev/null +++ b/test/asm/listing/034-assert-lderror1.s @@ -0,0 +1,28 @@ +; 2022-06-15 Spiro Trikaliotis + + .ASSERT * = $0000, error, "Code not at $0000" + .assert * = $0000, error, "Code not at $0000" + + .ASSERT * = $0001, error, "Code not at $0001" + .assert * = $0001, error, "Code not at $0001" + + .ASSERT * = $1000, error, "Code not at $1000" + .assert * = $1000, error, "Code not at $1000" + + .ASSERT * = $1001, error, "Code not at $1001" + .assert * = $1001, error, "Code not at $1001" + + .ASSERT * = $8000, error, "Code not at $8000" + .assert * = $8000, error, "Code not at $8000" + + .ASSERT * = $8001, error, "Code not at $8001" + .assert * = $8001, error, "Code not at $8001" + + + .org $8000 + + .ASSERT * = $8000, error, "Code not at $8000" + .assert * = $8000, error, "Code not at $8000" + + .ASSERT * = $8001, error, "Code not at $8001" + .assert * = $8001, error, "Code not at $8001" diff --git a/test/asm/listing/034-assert-lderror2.s b/test/asm/listing/034-assert-lderror2.s new file mode 100644 index 000000000..aba08ab6f --- /dev/null +++ b/test/asm/listing/034-assert-lderror2.s @@ -0,0 +1,8 @@ +; 2022-06-18 Spiro Trikaliotis + + .ASSERT * = $0000, lderror, "Code not at $0000" + .ASSERT * = $0001, lderror, "Code not at $0001" + .ASSERT * = $1000, lderror, "Code not at $1000" + .ASSERT * = $1001, lderror, "Code not at $1001" + .ASSERT * = $8000, lderror, "Code not at $8000" + .ASSERT * = $8001, lderror, "Code not at $8001" diff --git a/test/asm/listing/034-assert-lderror3.s b/test/asm/listing/034-assert-lderror3.s new file mode 100644 index 000000000..43bb9a96d --- /dev/null +++ b/test/asm/listing/034-assert-lderror3.s @@ -0,0 +1,3 @@ +; 2022-06-20 Spiro Trikaliotis + + .assert * = $0000, lderror, "Code not at $0000" diff --git a/test/asm/listing/034-assert-lderror4.s b/test/asm/listing/034-assert-lderror4.s new file mode 100644 index 000000000..0bb1d32f8 --- /dev/null +++ b/test/asm/listing/034-assert-lderror4.s @@ -0,0 +1,3 @@ +; 2022-06-20 Spiro Trikaliotis + + .assert * = $0001, lderror, "Code not at $0001" diff --git a/test/asm/listing/034-assert-lderror5.s b/test/asm/listing/034-assert-lderror5.s new file mode 100644 index 000000000..ee6a03493 --- /dev/null +++ b/test/asm/listing/034-assert-lderror5.s @@ -0,0 +1,3 @@ +; 2022-06-20 Spiro Trikaliotis + + .assert * = $1000, lderror, "Code not at $1000" diff --git a/test/asm/listing/034-assert-lderror6.s b/test/asm/listing/034-assert-lderror6.s new file mode 100644 index 000000000..e142441fc --- /dev/null +++ b/test/asm/listing/034-assert-lderror6.s @@ -0,0 +1,3 @@ +; 2022-06-20 Spiro Trikaliotis + + .assert * = $1001, lderror, "Code not at $1001" diff --git a/test/asm/listing/034-assert-lderror7.s b/test/asm/listing/034-assert-lderror7.s new file mode 100644 index 000000000..7082783fc --- /dev/null +++ b/test/asm/listing/034-assert-lderror7.s @@ -0,0 +1,3 @@ +; 2022-06-20 Spiro Trikaliotis + + .assert * = $8000, lderror, "Code not at $8000" diff --git a/test/asm/listing/034-assert-lderror8.s b/test/asm/listing/034-assert-lderror8.s new file mode 100644 index 000000000..858727fcf --- /dev/null +++ b/test/asm/listing/034-assert-lderror8.s @@ -0,0 +1,3 @@ +; 2022-06-20 Spiro Trikaliotis + + .assert * = $8001, lderror, "Code not at $8001" diff --git a/test/asm/listing/040-align.s b/test/asm/listing/040-align.s new file mode 100644 index 000000000..bfd7bc2e8 --- /dev/null +++ b/test/asm/listing/040-align.s @@ -0,0 +1,20 @@ +; 2022-06-20 Spiro Trikaliotis + + .byte 0 + + .align 4 + .byte 4 + .word 12 + .word 18 + + .align 1 + .byte 1 + + .align 8 + .byte 8 + + .align 8 + .byte 8 + + .align 128 + .byte 128 diff --git a/test/asm/listing/050-case-off-2.s b/test/asm/listing/050-case-off-2.s new file mode 100644 index 000000000..15b34415a --- /dev/null +++ b/test/asm/listing/050-case-off-2.s @@ -0,0 +1,10 @@ +; 2022-06-20 Spiro Trikaliotis + + .case - + +CamelCase: + lda #0 + +Test: + beq CamelCase + bne camelcase diff --git a/test/asm/listing/050-case-off-3.s b/test/asm/listing/050-case-off-3.s new file mode 100644 index 000000000..1b06fbc30 --- /dev/null +++ b/test/asm/listing/050-case-off-3.s @@ -0,0 +1,10 @@ +; 2022-06-20 Spiro Trikaliotis + + .case off + +CamelCase: + lda #0 + +Test: + beq CamelCase + bne camelcase diff --git a/test/asm/listing/050-case-off-4.s b/test/asm/listing/050-case-off-4.s new file mode 100644 index 000000000..e751f35fd --- /dev/null +++ b/test/asm/listing/050-case-off-4.s @@ -0,0 +1,10 @@ +; 2022-06-20 Spiro Trikaliotis + + .CASE OFF + +CamelCase: + lda #0 + +Test: + beq CamelCase + bne camelcase diff --git a/test/asm/listing/050-case-on-1.s b/test/asm/listing/050-case-on-1.s new file mode 100644 index 000000000..16b5f32a9 --- /dev/null +++ b/test/asm/listing/050-case-on-1.s @@ -0,0 +1,10 @@ +; 2022-06-20 Spiro Trikaliotis + + + +CamelCase: + lda #0 + +Test: + beq CamelCase + bne camelcase diff --git a/test/asm/listing/050-case-on-2.s b/test/asm/listing/050-case-on-2.s new file mode 100644 index 000000000..0b681f8fe --- /dev/null +++ b/test/asm/listing/050-case-on-2.s @@ -0,0 +1,10 @@ +; 2022-06-20 Spiro Trikaliotis + + .case + + +CamelCase: + lda #0 + +Test: + beq CamelCase + bne camelcase diff --git a/test/asm/listing/050-case-on-3.s b/test/asm/listing/050-case-on-3.s new file mode 100644 index 000000000..bd0b77a6b --- /dev/null +++ b/test/asm/listing/050-case-on-3.s @@ -0,0 +1,10 @@ +; 2022-06-20 Spiro Trikaliotis + + .case on + +CamelCase: + lda #0 + +Test: + beq CamelCase + bne camelcase diff --git a/test/asm/listing/050-case-on-4.s b/test/asm/listing/050-case-on-4.s new file mode 100644 index 000000000..f6d6babbb --- /dev/null +++ b/test/asm/listing/050-case-on-4.s @@ -0,0 +1,10 @@ +; 2022-06-20 Spiro Trikaliotis + + .CASE ON + +CamelCase: + lda #0 + +Test: + beq CamelCase + bne camelcase diff --git a/test/asm/listing/050-case-on-5.s b/test/asm/listing/050-case-on-5.s new file mode 100644 index 000000000..393f853d1 --- /dev/null +++ b/test/asm/listing/050-case-on-5.s @@ -0,0 +1,10 @@ +; 2022-06-20 Spiro Trikaliotis + + .case + +CamelCase: + lda #0 + +Test: + beq CamelCase + bne camelcase diff --git a/test/asm/listing/100-byte.s b/test/asm/listing/100-byte.s new file mode 100644 index 000000000..aa27c1dab --- /dev/null +++ b/test/asm/listing/100-byte.s @@ -0,0 +1,3526 @@ +; 2022-06-15 Spiro Trikaliotis + + + ; upper case pseudo-op + .BYTE 0 + .BYTE 1 + .BYTE 2 + .BYTE 3 + .BYTE 4 + .BYTE 5 + .BYTE 6 + .BYTE 7 + .BYTE 8 + .BYTE 9 + .BYTE 10 + .BYTE 11 + .BYTE 12 + .BYTE 13 + .BYTE 14 + .BYTE 15 + .BYTE 16 + .BYTE 17 + .BYTE 18 + .BYTE 19 + .BYTE 20 + .BYTE 21 + .BYTE 22 + .BYTE 23 + .BYTE 24 + .BYTE 25 + .BYTE 26 + .BYTE 27 + .BYTE 28 + .BYTE 29 + .BYTE 30 + .BYTE 31 + .BYTE 32 + .BYTE 33 + .BYTE 34 + .BYTE 35 + .BYTE 36 + .BYTE 37 + .BYTE 38 + .BYTE 39 + .BYTE 40 + .BYTE 41 + .BYTE 42 + .BYTE 43 + .BYTE 44 + .BYTE 45 + .BYTE 46 + .BYTE 47 + .BYTE 48 + .BYTE 49 + .BYTE 50 + .BYTE 51 + .BYTE 52 + .BYTE 53 + .BYTE 54 + .BYTE 55 + .BYTE 56 + .BYTE 57 + .BYTE 58 + .BYTE 59 + .BYTE 60 + .BYTE 61 + .BYTE 62 + .BYTE 63 + .BYTE 64 + .BYTE 65 + .BYTE 66 + .BYTE 67 + .BYTE 68 + .BYTE 69 + .BYTE 70 + .BYTE 71 + .BYTE 72 + .BYTE 73 + .BYTE 74 + .BYTE 75 + .BYTE 76 + .BYTE 77 + .BYTE 78 + .BYTE 79 + .BYTE 80 + .BYTE 81 + .BYTE 82 + .BYTE 83 + .BYTE 84 + .BYTE 85 + .BYTE 86 + .BYTE 87 + .BYTE 88 + .BYTE 89 + .BYTE 90 + .BYTE 91 + .BYTE 92 + .BYTE 93 + .BYTE 94 + .BYTE 95 + .BYTE 96 + .BYTE 97 + .BYTE 98 + .BYTE 99 + .BYTE 100 + .BYTE 101 + .BYTE 102 + .BYTE 103 + .BYTE 104 + .BYTE 105 + .BYTE 106 + .BYTE 107 + .BYTE 108 + .BYTE 109 + .BYTE 110 + .BYTE 111 + .BYTE 112 + .BYTE 113 + .BYTE 114 + .BYTE 115 + .BYTE 116 + .BYTE 117 + .BYTE 118 + .BYTE 119 + .BYTE 120 + .BYTE 121 + .BYTE 122 + .BYTE 123 + .BYTE 124 + .BYTE 125 + .BYTE 126 + .BYTE 127 + .BYTE 128 + .BYTE 129 + .BYTE 130 + .BYTE 131 + .BYTE 132 + .BYTE 133 + .BYTE 134 + .BYTE 135 + .BYTE 136 + .BYTE 137 + .BYTE 138 + .BYTE 139 + .BYTE 140 + .BYTE 141 + .BYTE 142 + .BYTE 143 + .BYTE 144 + .BYTE 145 + .BYTE 146 + .BYTE 147 + .BYTE 148 + .BYTE 149 + .BYTE 150 + .BYTE 151 + .BYTE 152 + .BYTE 153 + .BYTE 154 + .BYTE 155 + .BYTE 156 + .BYTE 157 + .BYTE 158 + .BYTE 159 + .BYTE 160 + .BYTE 161 + .BYTE 162 + .BYTE 163 + .BYTE 164 + .BYTE 165 + .BYTE 166 + .BYTE 167 + .BYTE 168 + .BYTE 169 + .BYTE 170 + .BYTE 171 + .BYTE 172 + .BYTE 173 + .BYTE 174 + .BYTE 175 + .BYTE 176 + .BYTE 177 + .BYTE 178 + .BYTE 179 + .BYTE 180 + .BYTE 181 + .BYTE 182 + .BYTE 183 + .BYTE 184 + .BYTE 185 + .BYTE 186 + .BYTE 187 + .BYTE 188 + .BYTE 189 + .BYTE 190 + .BYTE 191 + .BYTE 192 + .BYTE 193 + .BYTE 194 + .BYTE 195 + .BYTE 196 + .BYTE 197 + .BYTE 198 + .BYTE 199 + .BYTE 200 + .BYTE 201 + .BYTE 202 + .BYTE 203 + .BYTE 204 + .BYTE 205 + .BYTE 206 + .BYTE 207 + .BYTE 208 + .BYTE 209 + .BYTE 210 + .BYTE 211 + .BYTE 212 + .BYTE 213 + .BYTE 214 + .BYTE 215 + .BYTE 216 + .BYTE 217 + .BYTE 218 + .BYTE 219 + .BYTE 220 + .BYTE 221 + .BYTE 222 + .BYTE 223 + .BYTE 224 + .BYTE 225 + .BYTE 226 + .BYTE 227 + .BYTE 228 + .BYTE 229 + .BYTE 230 + .BYTE 231 + .BYTE 232 + .BYTE 233 + .BYTE 234 + .BYTE 235 + .BYTE 236 + .BYTE 237 + .BYTE 238 + .BYTE 239 + .BYTE 240 + .BYTE 241 + .BYTE 242 + .BYTE 243 + .BYTE 244 + .BYTE 245 + .BYTE 246 + .BYTE 247 + .BYTE 248 + .BYTE 249 + .BYTE 250 + .BYTE 251 + .BYTE 252 + .BYTE 253 + .BYTE 254 + .BYTE 255 + + ; lower case pseudo-op + .byte 0 + .byte 1 + .byte 2 + .byte 3 + .byte 4 + .byte 5 + .byte 6 + .byte 7 + .byte 8 + .byte 9 + .byte 10 + .byte 11 + .byte 12 + .byte 13 + .byte 14 + .byte 15 + .byte 16 + .byte 17 + .byte 18 + .byte 19 + .byte 20 + .byte 21 + .byte 22 + .byte 23 + .byte 24 + .byte 25 + .byte 26 + .byte 27 + .byte 28 + .byte 29 + .byte 30 + .byte 31 + .byte 32 + .byte 33 + .byte 34 + .byte 35 + .byte 36 + .byte 37 + .byte 38 + .byte 39 + .byte 40 + .byte 41 + .byte 42 + .byte 43 + .byte 44 + .byte 45 + .byte 46 + .byte 47 + .byte 48 + .byte 49 + .byte 50 + .byte 51 + .byte 52 + .byte 53 + .byte 54 + .byte 55 + .byte 56 + .byte 57 + .byte 58 + .byte 59 + .byte 60 + .byte 61 + .byte 62 + .byte 63 + .byte 64 + .byte 65 + .byte 66 + .byte 67 + .byte 68 + .byte 69 + .byte 70 + .byte 71 + .byte 72 + .byte 73 + .byte 74 + .byte 75 + .byte 76 + .byte 77 + .byte 78 + .byte 79 + .byte 80 + .byte 81 + .byte 82 + .byte 83 + .byte 84 + .byte 85 + .byte 86 + .byte 87 + .byte 88 + .byte 89 + .byte 90 + .byte 91 + .byte 92 + .byte 93 + .byte 94 + .byte 95 + .byte 96 + .byte 97 + .byte 98 + .byte 99 + .byte 100 + .byte 101 + .byte 102 + .byte 103 + .byte 104 + .byte 105 + .byte 106 + .byte 107 + .byte 108 + .byte 109 + .byte 110 + .byte 111 + .byte 112 + .byte 113 + .byte 114 + .byte 115 + .byte 116 + .byte 117 + .byte 118 + .byte 119 + .byte 120 + .byte 121 + .byte 122 + .byte 123 + .byte 124 + .byte 125 + .byte 126 + .byte 127 + .byte 128 + .byte 129 + .byte 130 + .byte 131 + .byte 132 + .byte 133 + .byte 134 + .byte 135 + .byte 136 + .byte 137 + .byte 138 + .byte 139 + .byte 140 + .byte 141 + .byte 142 + .byte 143 + .byte 144 + .byte 145 + .byte 146 + .byte 147 + .byte 148 + .byte 149 + .byte 150 + .byte 151 + .byte 152 + .byte 153 + .byte 154 + .byte 155 + .byte 156 + .byte 157 + .byte 158 + .byte 159 + .byte 160 + .byte 161 + .byte 162 + .byte 163 + .byte 164 + .byte 165 + .byte 166 + .byte 167 + .byte 168 + .byte 169 + .byte 170 + .byte 171 + .byte 172 + .byte 173 + .byte 174 + .byte 175 + .byte 176 + .byte 177 + .byte 178 + .byte 179 + .byte 180 + .byte 181 + .byte 182 + .byte 183 + .byte 184 + .byte 185 + .byte 186 + .byte 187 + .byte 188 + .byte 189 + .byte 190 + .byte 191 + .byte 192 + .byte 193 + .byte 194 + .byte 195 + .byte 196 + .byte 197 + .byte 198 + .byte 199 + .byte 200 + .byte 201 + .byte 202 + .byte 203 + .byte 204 + .byte 205 + .byte 206 + .byte 207 + .byte 208 + .byte 209 + .byte 210 + .byte 211 + .byte 212 + .byte 213 + .byte 214 + .byte 215 + .byte 216 + .byte 217 + .byte 218 + .byte 219 + .byte 220 + .byte 221 + .byte 222 + .byte 223 + .byte 224 + .byte 225 + .byte 226 + .byte 227 + .byte 228 + .byte 229 + .byte 230 + .byte 231 + .byte 232 + .byte 233 + .byte 234 + .byte 235 + .byte 236 + .byte 237 + .byte 238 + .byte 239 + .byte 240 + .byte 241 + .byte 242 + .byte 243 + .byte 244 + .byte 245 + .byte 246 + .byte 247 + .byte 248 + .byte 249 + .byte 250 + .byte 251 + .byte 252 + .byte 253 + .byte 254 + .byte 255 + + ; hex values + .byte $0 + .byte $1 + .byte $2 + .byte $3 + .byte $4 + .byte $5 + .byte $6 + .byte $7 + .byte $8 + .byte $9 + .byte $a + .byte $b + .byte $c + .byte $d + .byte $e + .byte $f + .byte $10 + .byte $11 + .byte $12 + .byte $13 + .byte $14 + .byte $15 + .byte $16 + .byte $17 + .byte $18 + .byte $19 + .byte $1a + .byte $1b + .byte $1c + .byte $1d + .byte $1e + .byte $1f + .byte $20 + .byte $21 + .byte $22 + .byte $23 + .byte $24 + .byte $25 + .byte $26 + .byte $27 + .byte $28 + .byte $29 + .byte $2a + .byte $2b + .byte $2c + .byte $2d + .byte $2e + .byte $2f + .byte $30 + .byte $31 + .byte $32 + .byte $33 + .byte $34 + .byte $35 + .byte $36 + .byte $37 + .byte $38 + .byte $39 + .byte $3a + .byte $3b + .byte $3c + .byte $3d + .byte $3e + .byte $3f + .byte $40 + .byte $41 + .byte $42 + .byte $43 + .byte $44 + .byte $45 + .byte $46 + .byte $47 + .byte $48 + .byte $49 + .byte $4a + .byte $4b + .byte $4c + .byte $4d + .byte $4e + .byte $4f + .byte $50 + .byte $51 + .byte $52 + .byte $53 + .byte $54 + .byte $55 + .byte $56 + .byte $57 + .byte $58 + .byte $59 + .byte $5a + .byte $5b + .byte $5c + .byte $5d + .byte $5e + .byte $5f + .byte $60 + .byte $61 + .byte $62 + .byte $63 + .byte $64 + .byte $65 + .byte $66 + .byte $67 + .byte $68 + .byte $69 + .byte $6a + .byte $6b + .byte $6c + .byte $6d + .byte $6e + .byte $6f + .byte $70 + .byte $71 + .byte $72 + .byte $73 + .byte $74 + .byte $75 + .byte $76 + .byte $77 + .byte $78 + .byte $79 + .byte $7a + .byte $7b + .byte $7c + .byte $7d + .byte $7e + .byte $7f + .byte $80 + .byte $81 + .byte $82 + .byte $83 + .byte $84 + .byte $85 + .byte $86 + .byte $87 + .byte $88 + .byte $89 + .byte $8a + .byte $8b + .byte $8c + .byte $8d + .byte $8e + .byte $8f + .byte $90 + .byte $91 + .byte $92 + .byte $93 + .byte $94 + .byte $95 + .byte $96 + .byte $97 + .byte $98 + .byte $99 + .byte $9a + .byte $9b + .byte $9c + .byte $9d + .byte $9e + .byte $9f + .byte $a0 + .byte $a1 + .byte $a2 + .byte $a3 + .byte $a4 + .byte $a5 + .byte $a6 + .byte $a7 + .byte $a8 + .byte $a9 + .byte $aa + .byte $ab + .byte $ac + .byte $ad + .byte $ae + .byte $af + .byte $b0 + .byte $b1 + .byte $b2 + .byte $b3 + .byte $b4 + .byte $b5 + .byte $b6 + .byte $b7 + .byte $b8 + .byte $b9 + .byte $ba + .byte $bb + .byte $bc + .byte $bd + .byte $be + .byte $bf + .byte $c0 + .byte $c1 + .byte $c2 + .byte $c3 + .byte $c4 + .byte $c5 + .byte $c6 + .byte $c7 + .byte $c8 + .byte $c9 + .byte $ca + .byte $cb + .byte $cc + .byte $cd + .byte $ce + .byte $cf + .byte $d0 + .byte $d1 + .byte $d2 + .byte $d3 + .byte $d4 + .byte $d5 + .byte $d6 + .byte $d7 + .byte $d8 + .byte $d9 + .byte $da + .byte $db + .byte $dc + .byte $dd + .byte $de + .byte $df + .byte $e0 + .byte $e1 + .byte $e2 + .byte $e3 + .byte $e4 + .byte $e5 + .byte $e6 + .byte $e7 + .byte $e8 + .byte $e9 + .byte $ea + .byte $eb + .byte $ec + .byte $ed + .byte $ee + .byte $ef + .byte $f0 + .byte $f1 + .byte $f2 + .byte $f3 + .byte $f4 + .byte $f5 + .byte $f6 + .byte $f7 + .byte $f8 + .byte $f9 + .byte $fa + .byte $fb + .byte $fc + .byte $fd + .byte $fe + .byte $ff + + ; hex values, uppercase + .byte $0 + .byte $1 + .byte $2 + .byte $3 + .byte $4 + .byte $5 + .byte $6 + .byte $7 + .byte $8 + .byte $9 + .byte $A + .byte $B + .byte $C + .byte $D + .byte $E + .byte $F + .byte $10 + .byte $11 + .byte $12 + .byte $13 + .byte $14 + .byte $15 + .byte $16 + .byte $17 + .byte $18 + .byte $19 + .byte $1A + .byte $1B + .byte $1C + .byte $1D + .byte $1E + .byte $1F + .byte $20 + .byte $21 + .byte $22 + .byte $23 + .byte $24 + .byte $25 + .byte $26 + .byte $27 + .byte $28 + .byte $29 + .byte $2A + .byte $2B + .byte $2C + .byte $2D + .byte $2E + .byte $2F + .byte $30 + .byte $31 + .byte $32 + .byte $33 + .byte $34 + .byte $35 + .byte $36 + .byte $37 + .byte $38 + .byte $39 + .byte $3A + .byte $3B + .byte $3C + .byte $3D + .byte $3E + .byte $3F + .byte $40 + .byte $41 + .byte $42 + .byte $43 + .byte $44 + .byte $45 + .byte $46 + .byte $47 + .byte $48 + .byte $49 + .byte $4A + .byte $4B + .byte $4C + .byte $4D + .byte $4E + .byte $4F + .byte $50 + .byte $51 + .byte $52 + .byte $53 + .byte $54 + .byte $55 + .byte $56 + .byte $57 + .byte $58 + .byte $59 + .byte $5A + .byte $5B + .byte $5C + .byte $5D + .byte $5E + .byte $5F + .byte $60 + .byte $61 + .byte $62 + .byte $63 + .byte $64 + .byte $65 + .byte $66 + .byte $67 + .byte $68 + .byte $69 + .byte $6A + .byte $6B + .byte $6C + .byte $6D + .byte $6E + .byte $6F + .byte $70 + .byte $71 + .byte $72 + .byte $73 + .byte $74 + .byte $75 + .byte $76 + .byte $77 + .byte $78 + .byte $79 + .byte $7A + .byte $7B + .byte $7C + .byte $7D + .byte $7E + .byte $7F + .byte $80 + .byte $81 + .byte $82 + .byte $83 + .byte $84 + .byte $85 + .byte $86 + .byte $87 + .byte $88 + .byte $89 + .byte $8A + .byte $8B + .byte $8C + .byte $8D + .byte $8E + .byte $8F + .byte $90 + .byte $91 + .byte $92 + .byte $93 + .byte $94 + .byte $95 + .byte $96 + .byte $97 + .byte $98 + .byte $99 + .byte $9A + .byte $9B + .byte $9C + .byte $9D + .byte $9E + .byte $9F + .byte $A0 + .byte $A1 + .byte $A2 + .byte $A3 + .byte $A4 + .byte $A5 + .byte $A6 + .byte $A7 + .byte $A8 + .byte $A9 + .byte $AA + .byte $AB + .byte $AC + .byte $AD + .byte $AE + .byte $AF + .byte $B0 + .byte $B1 + .byte $B2 + .byte $B3 + .byte $B4 + .byte $B5 + .byte $B6 + .byte $B7 + .byte $B8 + .byte $B9 + .byte $BA + .byte $BB + .byte $BC + .byte $BD + .byte $BE + .byte $BF + .byte $C0 + .byte $C1 + .byte $C2 + .byte $C3 + .byte $C4 + .byte $C5 + .byte $C6 + .byte $C7 + .byte $C8 + .byte $C9 + .byte $CA + .byte $CB + .byte $CC + .byte $CD + .byte $CE + .byte $CF + .byte $D0 + .byte $D1 + .byte $D2 + .byte $D3 + .byte $D4 + .byte $D5 + .byte $D6 + .byte $D7 + .byte $D8 + .byte $D9 + .byte $DA + .byte $DB + .byte $DC + .byte $DD + .byte $DE + .byte $DF + .byte $E0 + .byte $E1 + .byte $E2 + .byte $E3 + .byte $E4 + .byte $E5 + .byte $E6 + .byte $E7 + .byte $E8 + .byte $E9 + .byte $EA + .byte $EB + .byte $EC + .byte $ED + .byte $EE + .byte $EF + .byte $F0 + .byte $F1 + .byte $F2 + .byte $F3 + .byte $F4 + .byte $F5 + .byte $F6 + .byte $F7 + .byte $F8 + .byte $F9 + .byte $FA + .byte $FB + .byte $FC + .byte $FD + .byte $FE + .byte $FF + + ; 2-digit hex values + .byte $00 + .byte $01 + .byte $02 + .byte $03 + .byte $04 + .byte $05 + .byte $06 + .byte $07 + .byte $08 + .byte $09 + .byte $0a + .byte $0b + .byte $0c + .byte $0d + .byte $0e + .byte $0f + .byte $10 + .byte $11 + .byte $12 + .byte $13 + .byte $14 + .byte $15 + .byte $16 + .byte $17 + .byte $18 + .byte $19 + .byte $1a + .byte $1b + .byte $1c + .byte $1d + .byte $1e + .byte $1f + .byte $20 + .byte $21 + .byte $22 + .byte $23 + .byte $24 + .byte $25 + .byte $26 + .byte $27 + .byte $28 + .byte $29 + .byte $2a + .byte $2b + .byte $2c + .byte $2d + .byte $2e + .byte $2f + .byte $30 + .byte $31 + .byte $32 + .byte $33 + .byte $34 + .byte $35 + .byte $36 + .byte $37 + .byte $38 + .byte $39 + .byte $3a + .byte $3b + .byte $3c + .byte $3d + .byte $3e + .byte $3f + .byte $40 + .byte $41 + .byte $42 + .byte $43 + .byte $44 + .byte $45 + .byte $46 + .byte $47 + .byte $48 + .byte $49 + .byte $4a + .byte $4b + .byte $4c + .byte $4d + .byte $4e + .byte $4f + .byte $50 + .byte $51 + .byte $52 + .byte $53 + .byte $54 + .byte $55 + .byte $56 + .byte $57 + .byte $58 + .byte $59 + .byte $5a + .byte $5b + .byte $5c + .byte $5d + .byte $5e + .byte $5f + .byte $60 + .byte $61 + .byte $62 + .byte $63 + .byte $64 + .byte $65 + .byte $66 + .byte $67 + .byte $68 + .byte $69 + .byte $6a + .byte $6b + .byte $6c + .byte $6d + .byte $6e + .byte $6f + .byte $70 + .byte $71 + .byte $72 + .byte $73 + .byte $74 + .byte $75 + .byte $76 + .byte $77 + .byte $78 + .byte $79 + .byte $7a + .byte $7b + .byte $7c + .byte $7d + .byte $7e + .byte $7f + .byte $80 + .byte $81 + .byte $82 + .byte $83 + .byte $84 + .byte $85 + .byte $86 + .byte $87 + .byte $88 + .byte $89 + .byte $8a + .byte $8b + .byte $8c + .byte $8d + .byte $8e + .byte $8f + .byte $90 + .byte $91 + .byte $92 + .byte $93 + .byte $94 + .byte $95 + .byte $96 + .byte $97 + .byte $98 + .byte $99 + .byte $9a + .byte $9b + .byte $9c + .byte $9d + .byte $9e + .byte $9f + .byte $a0 + .byte $a1 + .byte $a2 + .byte $a3 + .byte $a4 + .byte $a5 + .byte $a6 + .byte $a7 + .byte $a8 + .byte $a9 + .byte $aa + .byte $ab + .byte $ac + .byte $ad + .byte $ae + .byte $af + .byte $b0 + .byte $b1 + .byte $b2 + .byte $b3 + .byte $b4 + .byte $b5 + .byte $b6 + .byte $b7 + .byte $b8 + .byte $b9 + .byte $ba + .byte $bb + .byte $bc + .byte $bd + .byte $be + .byte $bf + .byte $c0 + .byte $c1 + .byte $c2 + .byte $c3 + .byte $c4 + .byte $c5 + .byte $c6 + .byte $c7 + .byte $c8 + .byte $c9 + .byte $ca + .byte $cb + .byte $cc + .byte $cd + .byte $ce + .byte $cf + .byte $d0 + .byte $d1 + .byte $d2 + .byte $d3 + .byte $d4 + .byte $d5 + .byte $d6 + .byte $d7 + .byte $d8 + .byte $d9 + .byte $da + .byte $db + .byte $dc + .byte $dd + .byte $de + .byte $df + .byte $e0 + .byte $e1 + .byte $e2 + .byte $e3 + .byte $e4 + .byte $e5 + .byte $e6 + .byte $e7 + .byte $e8 + .byte $e9 + .byte $ea + .byte $eb + .byte $ec + .byte $ed + .byte $ee + .byte $ef + .byte $f0 + .byte $f1 + .byte $f2 + .byte $f3 + .byte $f4 + .byte $f5 + .byte $f6 + .byte $f7 + .byte $f8 + .byte $f9 + .byte $fa + .byte $fb + .byte $fc + .byte $fd + .byte $fe + .byte $ff + + ; 2-digit hex values, uppercase + .byte $00 + .byte $01 + .byte $02 + .byte $03 + .byte $04 + .byte $05 + .byte $06 + .byte $07 + .byte $08 + .byte $09 + .byte $0A + .byte $0B + .byte $0C + .byte $0D + .byte $0E + .byte $0F + .byte $10 + .byte $11 + .byte $12 + .byte $13 + .byte $14 + .byte $15 + .byte $16 + .byte $17 + .byte $18 + .byte $19 + .byte $1A + .byte $1B + .byte $1C + .byte $1D + .byte $1E + .byte $1F + .byte $20 + .byte $21 + .byte $22 + .byte $23 + .byte $24 + .byte $25 + .byte $26 + .byte $27 + .byte $28 + .byte $29 + .byte $2A + .byte $2B + .byte $2C + .byte $2D + .byte $2E + .byte $2F + .byte $30 + .byte $31 + .byte $32 + .byte $33 + .byte $34 + .byte $35 + .byte $36 + .byte $37 + .byte $38 + .byte $39 + .byte $3A + .byte $3B + .byte $3C + .byte $3D + .byte $3E + .byte $3F + .byte $40 + .byte $41 + .byte $42 + .byte $43 + .byte $44 + .byte $45 + .byte $46 + .byte $47 + .byte $48 + .byte $49 + .byte $4A + .byte $4B + .byte $4C + .byte $4D + .byte $4E + .byte $4F + .byte $50 + .byte $51 + .byte $52 + .byte $53 + .byte $54 + .byte $55 + .byte $56 + .byte $57 + .byte $58 + .byte $59 + .byte $5A + .byte $5B + .byte $5C + .byte $5D + .byte $5E + .byte $5F + .byte $60 + .byte $61 + .byte $62 + .byte $63 + .byte $64 + .byte $65 + .byte $66 + .byte $67 + .byte $68 + .byte $69 + .byte $6A + .byte $6B + .byte $6C + .byte $6D + .byte $6E + .byte $6F + .byte $70 + .byte $71 + .byte $72 + .byte $73 + .byte $74 + .byte $75 + .byte $76 + .byte $77 + .byte $78 + .byte $79 + .byte $7A + .byte $7B + .byte $7C + .byte $7D + .byte $7E + .byte $7F + .byte $80 + .byte $81 + .byte $82 + .byte $83 + .byte $84 + .byte $85 + .byte $86 + .byte $87 + .byte $88 + .byte $89 + .byte $8A + .byte $8B + .byte $8C + .byte $8D + .byte $8E + .byte $8F + .byte $90 + .byte $91 + .byte $92 + .byte $93 + .byte $94 + .byte $95 + .byte $96 + .byte $97 + .byte $98 + .byte $99 + .byte $9A + .byte $9B + .byte $9C + .byte $9D + .byte $9E + .byte $9F + .byte $A0 + .byte $A1 + .byte $A2 + .byte $A3 + .byte $A4 + .byte $A5 + .byte $A6 + .byte $A7 + .byte $A8 + .byte $A9 + .byte $AA + .byte $AB + .byte $AC + .byte $AD + .byte $AE + .byte $AF + .byte $B0 + .byte $B1 + .byte $B2 + .byte $B3 + .byte $B4 + .byte $B5 + .byte $B6 + .byte $B7 + .byte $B8 + .byte $B9 + .byte $BA + .byte $BB + .byte $BC + .byte $BD + .byte $BE + .byte $BF + .byte $C0 + .byte $C1 + .byte $C2 + .byte $C3 + .byte $C4 + .byte $C5 + .byte $C6 + .byte $C7 + .byte $C8 + .byte $C9 + .byte $CA + .byte $CB + .byte $CC + .byte $CD + .byte $CE + .byte $CF + .byte $D0 + .byte $D1 + .byte $D2 + .byte $D3 + .byte $D4 + .byte $D5 + .byte $D6 + .byte $D7 + .byte $D8 + .byte $D9 + .byte $DA + .byte $DB + .byte $DC + .byte $DD + .byte $DE + .byte $DF + .byte $E0 + .byte $E1 + .byte $E2 + .byte $E3 + .byte $E4 + .byte $E5 + .byte $E6 + .byte $E7 + .byte $E8 + .byte $E9 + .byte $EA + .byte $EB + .byte $EC + .byte $ED + .byte $EE + .byte $EF + .byte $F0 + .byte $F1 + .byte $F2 + .byte $F3 + .byte $F4 + .byte $F5 + .byte $F6 + .byte $F7 + .byte $F8 + .byte $F9 + .byte $FA + .byte $FB + .byte $FC + .byte $FD + .byte $FE + .byte $FF + + ; alternative hex values + .byte 0h + .byte 1h + .byte 2h + .byte 3h + .byte 4h + .byte 5h + .byte 6h + .byte 7h + .byte 8h + .byte 9h + .byte 0ah + .byte 0bh + .byte 0ch + .byte 0dh + .byte 0eh + .byte 0fh + .byte 10h + .byte 11h + .byte 12h + .byte 13h + .byte 14h + .byte 15h + .byte 16h + .byte 17h + .byte 18h + .byte 19h + .byte 1ah + .byte 1bh + .byte 1ch + .byte 1dh + .byte 1eh + .byte 1fh + .byte 20h + .byte 21h + .byte 22h + .byte 23h + .byte 24h + .byte 25h + .byte 26h + .byte 27h + .byte 28h + .byte 29h + .byte 2ah + .byte 2bh + .byte 2ch + .byte 2dh + .byte 2eh + .byte 2fh + .byte 30h + .byte 31h + .byte 32h + .byte 33h + .byte 34h + .byte 35h + .byte 36h + .byte 37h + .byte 38h + .byte 39h + .byte 3ah + .byte 3bh + .byte 3ch + .byte 3dh + .byte 3eh + .byte 3fh + .byte 40h + .byte 41h + .byte 42h + .byte 43h + .byte 44h + .byte 45h + .byte 46h + .byte 47h + .byte 48h + .byte 49h + .byte 4ah + .byte 4bh + .byte 4ch + .byte 4dh + .byte 4eh + .byte 4fh + .byte 50h + .byte 51h + .byte 52h + .byte 53h + .byte 54h + .byte 55h + .byte 56h + .byte 57h + .byte 58h + .byte 59h + .byte 5ah + .byte 5bh + .byte 5ch + .byte 5dh + .byte 5eh + .byte 5fh + .byte 60h + .byte 61h + .byte 62h + .byte 63h + .byte 64h + .byte 65h + .byte 66h + .byte 67h + .byte 68h + .byte 69h + .byte 6ah + .byte 6bh + .byte 6ch + .byte 6dh + .byte 6eh + .byte 6fh + .byte 70h + .byte 71h + .byte 72h + .byte 73h + .byte 74h + .byte 75h + .byte 76h + .byte 77h + .byte 78h + .byte 79h + .byte 7ah + .byte 7bh + .byte 7ch + .byte 7dh + .byte 7eh + .byte 7fh + .byte 80h + .byte 81h + .byte 82h + .byte 83h + .byte 84h + .byte 85h + .byte 86h + .byte 87h + .byte 88h + .byte 89h + .byte 8ah + .byte 8bh + .byte 8ch + .byte 8dh + .byte 8eh + .byte 8fh + .byte 90h + .byte 91h + .byte 92h + .byte 93h + .byte 94h + .byte 95h + .byte 96h + .byte 97h + .byte 98h + .byte 99h + .byte 9ah + .byte 9bh + .byte 9ch + .byte 9dh + .byte 9eh + .byte 9fh + .byte 0a0h + .byte 0a1h + .byte 0a2h + .byte 0a3h + .byte 0a4h + .byte 0a5h + .byte 0a6h + .byte 0a7h + .byte 0a8h + .byte 0a9h + .byte 0aah + .byte 0abh + .byte 0ach + .byte 0adh + .byte 0aeh + .byte 0afh + .byte 0b0h + .byte 0b1h + .byte 0b2h + .byte 0b3h + .byte 0b4h + .byte 0b5h + .byte 0b6h + .byte 0b7h + .byte 0b8h + .byte 0b9h + .byte 0bah + .byte 0bbh + .byte 0bch + .byte 0bdh + .byte 0beh + .byte 0bfh + .byte 0c0h + .byte 0c1h + .byte 0c2h + .byte 0c3h + .byte 0c4h + .byte 0c5h + .byte 0c6h + .byte 0c7h + .byte 0c8h + .byte 0c9h + .byte 0cah + .byte 0cbh + .byte 0cch + .byte 0cdh + .byte 0ceh + .byte 0cfh + .byte 0d0h + .byte 0d1h + .byte 0d2h + .byte 0d3h + .byte 0d4h + .byte 0d5h + .byte 0d6h + .byte 0d7h + .byte 0d8h + .byte 0d9h + .byte 0dah + .byte 0dbh + .byte 0dch + .byte 0ddh + .byte 0deh + .byte 0dfh + .byte 0e0h + .byte 0e1h + .byte 0e2h + .byte 0e3h + .byte 0e4h + .byte 0e5h + .byte 0e6h + .byte 0e7h + .byte 0e8h + .byte 0e9h + .byte 0eah + .byte 0ebh + .byte 0ech + .byte 0edh + .byte 0eeh + .byte 0efh + .byte 0f0h + .byte 0f1h + .byte 0f2h + .byte 0f3h + .byte 0f4h + .byte 0f5h + .byte 0f6h + .byte 0f7h + .byte 0f8h + .byte 0f9h + .byte 0fah + .byte 0fbh + .byte 0fch + .byte 0fdh + .byte 0feh + .byte 0ffh + + ; alternative hex values, uppercase + .byte 0h + .byte 1h + .byte 2h + .byte 3h + .byte 4h + .byte 5h + .byte 6h + .byte 7h + .byte 8h + .byte 9h + .byte 0Ah + .byte 0Bh + .byte 0Ch + .byte 0Dh + .byte 0Eh + .byte 0Fh + .byte 10h + .byte 11h + .byte 12h + .byte 13h + .byte 14h + .byte 15h + .byte 16h + .byte 17h + .byte 18h + .byte 19h + .byte 1Ah + .byte 1Bh + .byte 1Ch + .byte 1Dh + .byte 1Eh + .byte 1Fh + .byte 20h + .byte 21h + .byte 22h + .byte 23h + .byte 24h + .byte 25h + .byte 26h + .byte 27h + .byte 28h + .byte 29h + .byte 2Ah + .byte 2Bh + .byte 2Ch + .byte 2Dh + .byte 2Eh + .byte 2Fh + .byte 30h + .byte 31h + .byte 32h + .byte 33h + .byte 34h + .byte 35h + .byte 36h + .byte 37h + .byte 38h + .byte 39h + .byte 3Ah + .byte 3Bh + .byte 3Ch + .byte 3Dh + .byte 3Eh + .byte 3Fh + .byte 40h + .byte 41h + .byte 42h + .byte 43h + .byte 44h + .byte 45h + .byte 46h + .byte 47h + .byte 48h + .byte 49h + .byte 4Ah + .byte 4Bh + .byte 4Ch + .byte 4Dh + .byte 4Eh + .byte 4Fh + .byte 50h + .byte 51h + .byte 52h + .byte 53h + .byte 54h + .byte 55h + .byte 56h + .byte 57h + .byte 58h + .byte 59h + .byte 5Ah + .byte 5Bh + .byte 5Ch + .byte 5Dh + .byte 5Eh + .byte 5Fh + .byte 60h + .byte 61h + .byte 62h + .byte 63h + .byte 64h + .byte 65h + .byte 66h + .byte 67h + .byte 68h + .byte 69h + .byte 6Ah + .byte 6Bh + .byte 6Ch + .byte 6Dh + .byte 6Eh + .byte 6Fh + .byte 70h + .byte 71h + .byte 72h + .byte 73h + .byte 74h + .byte 75h + .byte 76h + .byte 77h + .byte 78h + .byte 79h + .byte 7Ah + .byte 7Bh + .byte 7Ch + .byte 7Dh + .byte 7Eh + .byte 7Fh + .byte 80h + .byte 81h + .byte 82h + .byte 83h + .byte 84h + .byte 85h + .byte 86h + .byte 87h + .byte 88h + .byte 89h + .byte 8Ah + .byte 8Bh + .byte 8Ch + .byte 8Dh + .byte 8Eh + .byte 8Fh + .byte 90h + .byte 91h + .byte 92h + .byte 93h + .byte 94h + .byte 95h + .byte 96h + .byte 97h + .byte 98h + .byte 99h + .byte 9Ah + .byte 9Bh + .byte 9Ch + .byte 9Dh + .byte 9Eh + .byte 9Fh + .byte 0A0h + .byte 0A1h + .byte 0A2h + .byte 0A3h + .byte 0A4h + .byte 0A5h + .byte 0A6h + .byte 0A7h + .byte 0A8h + .byte 0A9h + .byte 0AAh + .byte 0ABh + .byte 0ACh + .byte 0ADh + .byte 0AEh + .byte 0AFh + .byte 0B0h + .byte 0B1h + .byte 0B2h + .byte 0B3h + .byte 0B4h + .byte 0B5h + .byte 0B6h + .byte 0B7h + .byte 0B8h + .byte 0B9h + .byte 0BAh + .byte 0BBh + .byte 0BCh + .byte 0BDh + .byte 0BEh + .byte 0BFh + .byte 0C0h + .byte 0C1h + .byte 0C2h + .byte 0C3h + .byte 0C4h + .byte 0C5h + .byte 0C6h + .byte 0C7h + .byte 0C8h + .byte 0C9h + .byte 0CAh + .byte 0CBh + .byte 0CCh + .byte 0CDh + .byte 0CEh + .byte 0CFh + .byte 0D0h + .byte 0D1h + .byte 0D2h + .byte 0D3h + .byte 0D4h + .byte 0D5h + .byte 0D6h + .byte 0D7h + .byte 0D8h + .byte 0D9h + .byte 0DAh + .byte 0DBh + .byte 0DCh + .byte 0DDh + .byte 0DEh + .byte 0DFh + .byte 0E0h + .byte 0E1h + .byte 0E2h + .byte 0E3h + .byte 0E4h + .byte 0E5h + .byte 0E6h + .byte 0E7h + .byte 0E8h + .byte 0E9h + .byte 0EAh + .byte 0EBh + .byte 0ECh + .byte 0EDh + .byte 0EEh + .byte 0EFh + .byte 0F0h + .byte 0F1h + .byte 0F2h + .byte 0F3h + .byte 0F4h + .byte 0F5h + .byte 0F6h + .byte 0F7h + .byte 0F8h + .byte 0F9h + .byte 0FAh + .byte 0FBh + .byte 0FCh + .byte 0FDh + .byte 0FEh + .byte 0FFh + + ; alternative 2-digit hex values + .byte 00h + .byte 01h + .byte 02h + .byte 03h + .byte 04h + .byte 05h + .byte 06h + .byte 07h + .byte 08h + .byte 09h + .byte 0ah + .byte 0bh + .byte 0ch + .byte 0dh + .byte 0eh + .byte 0fh + .byte 10h + .byte 11h + .byte 12h + .byte 13h + .byte 14h + .byte 15h + .byte 16h + .byte 17h + .byte 18h + .byte 19h + .byte 1ah + .byte 1bh + .byte 1ch + .byte 1dh + .byte 1eh + .byte 1fh + .byte 20h + .byte 21h + .byte 22h + .byte 23h + .byte 24h + .byte 25h + .byte 26h + .byte 27h + .byte 28h + .byte 29h + .byte 2ah + .byte 2bh + .byte 2ch + .byte 2dh + .byte 2eh + .byte 2fh + .byte 30h + .byte 31h + .byte 32h + .byte 33h + .byte 34h + .byte 35h + .byte 36h + .byte 37h + .byte 38h + .byte 39h + .byte 3ah + .byte 3bh + .byte 3ch + .byte 3dh + .byte 3eh + .byte 3fh + .byte 40h + .byte 41h + .byte 42h + .byte 43h + .byte 44h + .byte 45h + .byte 46h + .byte 47h + .byte 48h + .byte 49h + .byte 4ah + .byte 4bh + .byte 4ch + .byte 4dh + .byte 4eh + .byte 4fh + .byte 50h + .byte 51h + .byte 52h + .byte 53h + .byte 54h + .byte 55h + .byte 56h + .byte 57h + .byte 58h + .byte 59h + .byte 5ah + .byte 5bh + .byte 5ch + .byte 5dh + .byte 5eh + .byte 5fh + .byte 60h + .byte 61h + .byte 62h + .byte 63h + .byte 64h + .byte 65h + .byte 66h + .byte 67h + .byte 68h + .byte 69h + .byte 6ah + .byte 6bh + .byte 6ch + .byte 6dh + .byte 6eh + .byte 6fh + .byte 70h + .byte 71h + .byte 72h + .byte 73h + .byte 74h + .byte 75h + .byte 76h + .byte 77h + .byte 78h + .byte 79h + .byte 7ah + .byte 7bh + .byte 7ch + .byte 7dh + .byte 7eh + .byte 7fh + .byte 80h + .byte 81h + .byte 82h + .byte 83h + .byte 84h + .byte 85h + .byte 86h + .byte 87h + .byte 88h + .byte 89h + .byte 8ah + .byte 8bh + .byte 8ch + .byte 8dh + .byte 8eh + .byte 8fh + .byte 90h + .byte 91h + .byte 92h + .byte 93h + .byte 94h + .byte 95h + .byte 96h + .byte 97h + .byte 98h + .byte 99h + .byte 9ah + .byte 9bh + .byte 9ch + .byte 9dh + .byte 9eh + .byte 9fh + .byte 0a0h + .byte 0a1h + .byte 0a2h + .byte 0a3h + .byte 0a4h + .byte 0a5h + .byte 0a6h + .byte 0a7h + .byte 0a8h + .byte 0a9h + .byte 0aah + .byte 0abh + .byte 0ach + .byte 0adh + .byte 0aeh + .byte 0afh + .byte 0b0h + .byte 0b1h + .byte 0b2h + .byte 0b3h + .byte 0b4h + .byte 0b5h + .byte 0b6h + .byte 0b7h + .byte 0b8h + .byte 0b9h + .byte 0bah + .byte 0bbh + .byte 0bch + .byte 0bdh + .byte 0beh + .byte 0bfh + .byte 0c0h + .byte 0c1h + .byte 0c2h + .byte 0c3h + .byte 0c4h + .byte 0c5h + .byte 0c6h + .byte 0c7h + .byte 0c8h + .byte 0c9h + .byte 0cah + .byte 0cbh + .byte 0cch + .byte 0cdh + .byte 0ceh + .byte 0cfh + .byte 0d0h + .byte 0d1h + .byte 0d2h + .byte 0d3h + .byte 0d4h + .byte 0d5h + .byte 0d6h + .byte 0d7h + .byte 0d8h + .byte 0d9h + .byte 0dah + .byte 0dbh + .byte 0dch + .byte 0ddh + .byte 0deh + .byte 0dfh + .byte 0e0h + .byte 0e1h + .byte 0e2h + .byte 0e3h + .byte 0e4h + .byte 0e5h + .byte 0e6h + .byte 0e7h + .byte 0e8h + .byte 0e9h + .byte 0eah + .byte 0ebh + .byte 0ech + .byte 0edh + .byte 0eeh + .byte 0efh + .byte 0f0h + .byte 0f1h + .byte 0f2h + .byte 0f3h + .byte 0f4h + .byte 0f5h + .byte 0f6h + .byte 0f7h + .byte 0f8h + .byte 0f9h + .byte 0fah + .byte 0fbh + .byte 0fch + .byte 0fdh + .byte 0feh + .byte 0ffh + + ; alternative 2-digit hex values, uppercase + .byte 00h + .byte 01h + .byte 02h + .byte 03h + .byte 04h + .byte 05h + .byte 06h + .byte 07h + .byte 08h + .byte 09h + .byte 0Ah + .byte 0Bh + .byte 0Ch + .byte 0Dh + .byte 0Eh + .byte 0Fh + .byte 10h + .byte 11h + .byte 12h + .byte 13h + .byte 14h + .byte 15h + .byte 16h + .byte 17h + .byte 18h + .byte 19h + .byte 1Ah + .byte 1Bh + .byte 1Ch + .byte 1Dh + .byte 1Eh + .byte 1Fh + .byte 20h + .byte 21h + .byte 22h + .byte 23h + .byte 24h + .byte 25h + .byte 26h + .byte 27h + .byte 28h + .byte 29h + .byte 2Ah + .byte 2Bh + .byte 2Ch + .byte 2Dh + .byte 2Eh + .byte 2Fh + .byte 30h + .byte 31h + .byte 32h + .byte 33h + .byte 34h + .byte 35h + .byte 36h + .byte 37h + .byte 38h + .byte 39h + .byte 3Ah + .byte 3Bh + .byte 3Ch + .byte 3Dh + .byte 3Eh + .byte 3Fh + .byte 40h + .byte 41h + .byte 42h + .byte 43h + .byte 44h + .byte 45h + .byte 46h + .byte 47h + .byte 48h + .byte 49h + .byte 4Ah + .byte 4Bh + .byte 4Ch + .byte 4Dh + .byte 4Eh + .byte 4Fh + .byte 50h + .byte 51h + .byte 52h + .byte 53h + .byte 54h + .byte 55h + .byte 56h + .byte 57h + .byte 58h + .byte 59h + .byte 5Ah + .byte 5Bh + .byte 5Ch + .byte 5Dh + .byte 5Eh + .byte 5Fh + .byte 60h + .byte 61h + .byte 62h + .byte 63h + .byte 64h + .byte 65h + .byte 66h + .byte 67h + .byte 68h + .byte 69h + .byte 6Ah + .byte 6Bh + .byte 6Ch + .byte 6Dh + .byte 6Eh + .byte 6Fh + .byte 70h + .byte 71h + .byte 72h + .byte 73h + .byte 74h + .byte 75h + .byte 76h + .byte 77h + .byte 78h + .byte 79h + .byte 7Ah + .byte 7Bh + .byte 7Ch + .byte 7Dh + .byte 7Eh + .byte 7Fh + .byte 80h + .byte 81h + .byte 82h + .byte 83h + .byte 84h + .byte 85h + .byte 86h + .byte 87h + .byte 88h + .byte 89h + .byte 8Ah + .byte 8Bh + .byte 8Ch + .byte 8Dh + .byte 8Eh + .byte 8Fh + .byte 90h + .byte 91h + .byte 92h + .byte 93h + .byte 94h + .byte 95h + .byte 96h + .byte 97h + .byte 98h + .byte 99h + .byte 9Ah + .byte 9Bh + .byte 9Ch + .byte 9Dh + .byte 9Eh + .byte 9Fh + .byte 0A0h + .byte 0A1h + .byte 0A2h + .byte 0A3h + .byte 0A4h + .byte 0A5h + .byte 0A6h + .byte 0A7h + .byte 0A8h + .byte 0A9h + .byte 0AAh + .byte 0ABh + .byte 0ACh + .byte 0ADh + .byte 0AEh + .byte 0AFh + .byte 0B0h + .byte 0B1h + .byte 0B2h + .byte 0B3h + .byte 0B4h + .byte 0B5h + .byte 0B6h + .byte 0B7h + .byte 0B8h + .byte 0B9h + .byte 0BAh + .byte 0BBh + .byte 0BCh + .byte 0BDh + .byte 0BEh + .byte 0BFh + .byte 0C0h + .byte 0C1h + .byte 0C2h + .byte 0C3h + .byte 0C4h + .byte 0C5h + .byte 0C6h + .byte 0C7h + .byte 0C8h + .byte 0C9h + .byte 0CAh + .byte 0CBh + .byte 0CCh + .byte 0CDh + .byte 0CEh + .byte 0CFh + .byte 0D0h + .byte 0D1h + .byte 0D2h + .byte 0D3h + .byte 0D4h + .byte 0D5h + .byte 0D6h + .byte 0D7h + .byte 0D8h + .byte 0D9h + .byte 0DAh + .byte 0DBh + .byte 0DCh + .byte 0DDh + .byte 0DEh + .byte 0DFh + .byte 0E0h + .byte 0E1h + .byte 0E2h + .byte 0E3h + .byte 0E4h + .byte 0E5h + .byte 0E6h + .byte 0E7h + .byte 0E8h + .byte 0E9h + .byte 0EAh + .byte 0EBh + .byte 0ECh + .byte 0EDh + .byte 0EEh + .byte 0EFh + .byte 0F0h + .byte 0F1h + .byte 0F2h + .byte 0F3h + .byte 0F4h + .byte 0F5h + .byte 0F6h + .byte 0F7h + .byte 0F8h + .byte 0F9h + .byte 0FAh + .byte 0FBh + .byte 0FCh + .byte 0FDh + .byte 0FEh + .byte 0FFh + + ; alternative hex values, always leading zero + .byte 00h + .byte 01h + .byte 02h + .byte 03h + .byte 04h + .byte 05h + .byte 06h + .byte 07h + .byte 08h + .byte 09h + .byte 0ah + .byte 0bh + .byte 0ch + .byte 0dh + .byte 0eh + .byte 0fh + .byte 010h + .byte 011h + .byte 012h + .byte 013h + .byte 014h + .byte 015h + .byte 016h + .byte 017h + .byte 018h + .byte 019h + .byte 01ah + .byte 01bh + .byte 01ch + .byte 01dh + .byte 01eh + .byte 01fh + .byte 020h + .byte 021h + .byte 022h + .byte 023h + .byte 024h + .byte 025h + .byte 026h + .byte 027h + .byte 028h + .byte 029h + .byte 02ah + .byte 02bh + .byte 02ch + .byte 02dh + .byte 02eh + .byte 02fh + .byte 030h + .byte 031h + .byte 032h + .byte 033h + .byte 034h + .byte 035h + .byte 036h + .byte 037h + .byte 038h + .byte 039h + .byte 03ah + .byte 03bh + .byte 03ch + .byte 03dh + .byte 03eh + .byte 03fh + .byte 040h + .byte 041h + .byte 042h + .byte 043h + .byte 044h + .byte 045h + .byte 046h + .byte 047h + .byte 048h + .byte 049h + .byte 04ah + .byte 04bh + .byte 04ch + .byte 04dh + .byte 04eh + .byte 04fh + .byte 050h + .byte 051h + .byte 052h + .byte 053h + .byte 054h + .byte 055h + .byte 056h + .byte 057h + .byte 058h + .byte 059h + .byte 05ah + .byte 05bh + .byte 05ch + .byte 05dh + .byte 05eh + .byte 05fh + .byte 060h + .byte 061h + .byte 062h + .byte 063h + .byte 064h + .byte 065h + .byte 066h + .byte 067h + .byte 068h + .byte 069h + .byte 06ah + .byte 06bh + .byte 06ch + .byte 06dh + .byte 06eh + .byte 06fh + .byte 070h + .byte 071h + .byte 072h + .byte 073h + .byte 074h + .byte 075h + .byte 076h + .byte 077h + .byte 078h + .byte 079h + .byte 07ah + .byte 07bh + .byte 07ch + .byte 07dh + .byte 07eh + .byte 07fh + .byte 080h + .byte 081h + .byte 082h + .byte 083h + .byte 084h + .byte 085h + .byte 086h + .byte 087h + .byte 088h + .byte 089h + .byte 08ah + .byte 08bh + .byte 08ch + .byte 08dh + .byte 08eh + .byte 08fh + .byte 090h + .byte 091h + .byte 092h + .byte 093h + .byte 094h + .byte 095h + .byte 096h + .byte 097h + .byte 098h + .byte 099h + .byte 09ah + .byte 09bh + .byte 09ch + .byte 09dh + .byte 09eh + .byte 09fh + .byte 0a0h + .byte 0a1h + .byte 0a2h + .byte 0a3h + .byte 0a4h + .byte 0a5h + .byte 0a6h + .byte 0a7h + .byte 0a8h + .byte 0a9h + .byte 0aah + .byte 0abh + .byte 0ach + .byte 0adh + .byte 0aeh + .byte 0afh + .byte 0b0h + .byte 0b1h + .byte 0b2h + .byte 0b3h + .byte 0b4h + .byte 0b5h + .byte 0b6h + .byte 0b7h + .byte 0b8h + .byte 0b9h + .byte 0bah + .byte 0bbh + .byte 0bch + .byte 0bdh + .byte 0beh + .byte 0bfh + .byte 0c0h + .byte 0c1h + .byte 0c2h + .byte 0c3h + .byte 0c4h + .byte 0c5h + .byte 0c6h + .byte 0c7h + .byte 0c8h + .byte 0c9h + .byte 0cah + .byte 0cbh + .byte 0cch + .byte 0cdh + .byte 0ceh + .byte 0cfh + .byte 0d0h + .byte 0d1h + .byte 0d2h + .byte 0d3h + .byte 0d4h + .byte 0d5h + .byte 0d6h + .byte 0d7h + .byte 0d8h + .byte 0d9h + .byte 0dah + .byte 0dbh + .byte 0dch + .byte 0ddh + .byte 0deh + .byte 0dfh + .byte 0e0h + .byte 0e1h + .byte 0e2h + .byte 0e3h + .byte 0e4h + .byte 0e5h + .byte 0e6h + .byte 0e7h + .byte 0e8h + .byte 0e9h + .byte 0eah + .byte 0ebh + .byte 0ech + .byte 0edh + .byte 0eeh + .byte 0efh + .byte 0f0h + .byte 0f1h + .byte 0f2h + .byte 0f3h + .byte 0f4h + .byte 0f5h + .byte 0f6h + .byte 0f7h + .byte 0f8h + .byte 0f9h + .byte 0fah + .byte 0fbh + .byte 0fch + .byte 0fdh + .byte 0feh + .byte 0ffh + + ; binary values, variable length + .byte %0 + .byte %1 + .byte %10 + .byte %11 + .byte %100 + .byte %101 + .byte %110 + .byte %111 + .byte %1000 + .byte %1001 + .byte %1010 + .byte %1011 + .byte %1100 + .byte %1101 + .byte %1110 + .byte %1111 + .byte %10000 + .byte %10001 + .byte %10010 + .byte %10011 + .byte %10100 + .byte %10101 + .byte %10110 + .byte %10111 + .byte %11000 + .byte %11001 + .byte %11010 + .byte %11011 + .byte %11100 + .byte %11101 + .byte %11110 + .byte %11111 + .byte %100000 + .byte %100001 + .byte %100010 + .byte %100011 + .byte %100100 + .byte %100101 + .byte %100110 + .byte %100111 + .byte %101000 + .byte %101001 + .byte %101010 + .byte %101011 + .byte %101100 + .byte %101101 + .byte %101110 + .byte %101111 + .byte %110000 + .byte %110001 + .byte %110010 + .byte %110011 + .byte %110100 + .byte %110101 + .byte %110110 + .byte %110111 + .byte %111000 + .byte %111001 + .byte %111010 + .byte %111011 + .byte %111100 + .byte %111101 + .byte %111110 + .byte %111111 + .byte %1000000 + .byte %1000001 + .byte %1000010 + .byte %1000011 + .byte %1000100 + .byte %1000101 + .byte %1000110 + .byte %1000111 + .byte %1001000 + .byte %1001001 + .byte %1001010 + .byte %1001011 + .byte %1001100 + .byte %1001101 + .byte %1001110 + .byte %1001111 + .byte %1010000 + .byte %1010001 + .byte %1010010 + .byte %1010011 + .byte %1010100 + .byte %1010101 + .byte %1010110 + .byte %1010111 + .byte %1011000 + .byte %1011001 + .byte %1011010 + .byte %1011011 + .byte %1011100 + .byte %1011101 + .byte %1011110 + .byte %1011111 + .byte %1100000 + .byte %1100001 + .byte %1100010 + .byte %1100011 + .byte %1100100 + .byte %1100101 + .byte %1100110 + .byte %1100111 + .byte %1101000 + .byte %1101001 + .byte %1101010 + .byte %1101011 + .byte %1101100 + .byte %1101101 + .byte %1101110 + .byte %1101111 + .byte %1110000 + .byte %1110001 + .byte %1110010 + .byte %1110011 + .byte %1110100 + .byte %1110101 + .byte %1110110 + .byte %1110111 + .byte %1111000 + .byte %1111001 + .byte %1111010 + .byte %1111011 + .byte %1111100 + .byte %1111101 + .byte %1111110 + .byte %1111111 + .byte %10000000 + .byte %10000001 + .byte %10000010 + .byte %10000011 + .byte %10000100 + .byte %10000101 + .byte %10000110 + .byte %10000111 + .byte %10001000 + .byte %10001001 + .byte %10001010 + .byte %10001011 + .byte %10001100 + .byte %10001101 + .byte %10001110 + .byte %10001111 + .byte %10010000 + .byte %10010001 + .byte %10010010 + .byte %10010011 + .byte %10010100 + .byte %10010101 + .byte %10010110 + .byte %10010111 + .byte %10011000 + .byte %10011001 + .byte %10011010 + .byte %10011011 + .byte %10011100 + .byte %10011101 + .byte %10011110 + .byte %10011111 + .byte %10100000 + .byte %10100001 + .byte %10100010 + .byte %10100011 + .byte %10100100 + .byte %10100101 + .byte %10100110 + .byte %10100111 + .byte %10101000 + .byte %10101001 + .byte %10101010 + .byte %10101011 + .byte %10101100 + .byte %10101101 + .byte %10101110 + .byte %10101111 + .byte %10110000 + .byte %10110001 + .byte %10110010 + .byte %10110011 + .byte %10110100 + .byte %10110101 + .byte %10110110 + .byte %10110111 + .byte %10111000 + .byte %10111001 + .byte %10111010 + .byte %10111011 + .byte %10111100 + .byte %10111101 + .byte %10111110 + .byte %10111111 + .byte %11000000 + .byte %11000001 + .byte %11000010 + .byte %11000011 + .byte %11000100 + .byte %11000101 + .byte %11000110 + .byte %11000111 + .byte %11001000 + .byte %11001001 + .byte %11001010 + .byte %11001011 + .byte %11001100 + .byte %11001101 + .byte %11001110 + .byte %11001111 + .byte %11010000 + .byte %11010001 + .byte %11010010 + .byte %11010011 + .byte %11010100 + .byte %11010101 + .byte %11010110 + .byte %11010111 + .byte %11011000 + .byte %11011001 + .byte %11011010 + .byte %11011011 + .byte %11011100 + .byte %11011101 + .byte %11011110 + .byte %11011111 + .byte %11100000 + .byte %11100001 + .byte %11100010 + .byte %11100011 + .byte %11100100 + .byte %11100101 + .byte %11100110 + .byte %11100111 + .byte %11101000 + .byte %11101001 + .byte %11101010 + .byte %11101011 + .byte %11101100 + .byte %11101101 + .byte %11101110 + .byte %11101111 + .byte %11110000 + .byte %11110001 + .byte %11110010 + .byte %11110011 + .byte %11110100 + .byte %11110101 + .byte %11110110 + .byte %11110111 + .byte %11111000 + .byte %11111001 + .byte %11111010 + .byte %11111011 + .byte %11111100 + .byte %11111101 + .byte %11111110 + .byte %11111111 + + ; binary values, full length + .byte %00000000 + .byte %00000001 + .byte %00000010 + .byte %00000011 + .byte %00000100 + .byte %00000101 + .byte %00000110 + .byte %00000111 + .byte %00001000 + .byte %00001001 + .byte %00001010 + .byte %00001011 + .byte %00001100 + .byte %00001101 + .byte %00001110 + .byte %00001111 + .byte %00010000 + .byte %00010001 + .byte %00010010 + .byte %00010011 + .byte %00010100 + .byte %00010101 + .byte %00010110 + .byte %00010111 + .byte %00011000 + .byte %00011001 + .byte %00011010 + .byte %00011011 + .byte %00011100 + .byte %00011101 + .byte %00011110 + .byte %00011111 + .byte %00100000 + .byte %00100001 + .byte %00100010 + .byte %00100011 + .byte %00100100 + .byte %00100101 + .byte %00100110 + .byte %00100111 + .byte %00101000 + .byte %00101001 + .byte %00101010 + .byte %00101011 + .byte %00101100 + .byte %00101101 + .byte %00101110 + .byte %00101111 + .byte %00110000 + .byte %00110001 + .byte %00110010 + .byte %00110011 + .byte %00110100 + .byte %00110101 + .byte %00110110 + .byte %00110111 + .byte %00111000 + .byte %00111001 + .byte %00111010 + .byte %00111011 + .byte %00111100 + .byte %00111101 + .byte %00111110 + .byte %00111111 + .byte %01000000 + .byte %01000001 + .byte %01000010 + .byte %01000011 + .byte %01000100 + .byte %01000101 + .byte %01000110 + .byte %01000111 + .byte %01001000 + .byte %01001001 + .byte %01001010 + .byte %01001011 + .byte %01001100 + .byte %01001101 + .byte %01001110 + .byte %01001111 + .byte %01010000 + .byte %01010001 + .byte %01010010 + .byte %01010011 + .byte %01010100 + .byte %01010101 + .byte %01010110 + .byte %01010111 + .byte %01011000 + .byte %01011001 + .byte %01011010 + .byte %01011011 + .byte %01011100 + .byte %01011101 + .byte %01011110 + .byte %01011111 + .byte %01100000 + .byte %01100001 + .byte %01100010 + .byte %01100011 + .byte %01100100 + .byte %01100101 + .byte %01100110 + .byte %01100111 + .byte %01101000 + .byte %01101001 + .byte %01101010 + .byte %01101011 + .byte %01101100 + .byte %01101101 + .byte %01101110 + .byte %01101111 + .byte %01110000 + .byte %01110001 + .byte %01110010 + .byte %01110011 + .byte %01110100 + .byte %01110101 + .byte %01110110 + .byte %01110111 + .byte %01111000 + .byte %01111001 + .byte %01111010 + .byte %01111011 + .byte %01111100 + .byte %01111101 + .byte %01111110 + .byte %01111111 + .byte %10000000 + .byte %10000001 + .byte %10000010 + .byte %10000011 + .byte %10000100 + .byte %10000101 + .byte %10000110 + .byte %10000111 + .byte %10001000 + .byte %10001001 + .byte %10001010 + .byte %10001011 + .byte %10001100 + .byte %10001101 + .byte %10001110 + .byte %10001111 + .byte %10010000 + .byte %10010001 + .byte %10010010 + .byte %10010011 + .byte %10010100 + .byte %10010101 + .byte %10010110 + .byte %10010111 + .byte %10011000 + .byte %10011001 + .byte %10011010 + .byte %10011011 + .byte %10011100 + .byte %10011101 + .byte %10011110 + .byte %10011111 + .byte %10100000 + .byte %10100001 + .byte %10100010 + .byte %10100011 + .byte %10100100 + .byte %10100101 + .byte %10100110 + .byte %10100111 + .byte %10101000 + .byte %10101001 + .byte %10101010 + .byte %10101011 + .byte %10101100 + .byte %10101101 + .byte %10101110 + .byte %10101111 + .byte %10110000 + .byte %10110001 + .byte %10110010 + .byte %10110011 + .byte %10110100 + .byte %10110101 + .byte %10110110 + .byte %10110111 + .byte %10111000 + .byte %10111001 + .byte %10111010 + .byte %10111011 + .byte %10111100 + .byte %10111101 + .byte %10111110 + .byte %10111111 + .byte %11000000 + .byte %11000001 + .byte %11000010 + .byte %11000011 + .byte %11000100 + .byte %11000101 + .byte %11000110 + .byte %11000111 + .byte %11001000 + .byte %11001001 + .byte %11001010 + .byte %11001011 + .byte %11001100 + .byte %11001101 + .byte %11001110 + .byte %11001111 + .byte %11010000 + .byte %11010001 + .byte %11010010 + .byte %11010011 + .byte %11010100 + .byte %11010101 + .byte %11010110 + .byte %11010111 + .byte %11011000 + .byte %11011001 + .byte %11011010 + .byte %11011011 + .byte %11011100 + .byte %11011101 + .byte %11011110 + .byte %11011111 + .byte %11100000 + .byte %11100001 + .byte %11100010 + .byte %11100011 + .byte %11100100 + .byte %11100101 + .byte %11100110 + .byte %11100111 + .byte %11101000 + .byte %11101001 + .byte %11101010 + .byte %11101011 + .byte %11101100 + .byte %11101101 + .byte %11101110 + .byte %11101111 + .byte %11110000 + .byte %11110001 + .byte %11110010 + .byte %11110011 + .byte %11110100 + .byte %11110101 + .byte %11110110 + .byte %11110111 + .byte %11111000 + .byte %11111001 + .byte %11111010 + .byte %11111011 + .byte %11111100 + .byte %11111101 + .byte %11111110 + .byte %11111111 + + ; some character values + .byte ' ' + .byte '!' + .byte '"' + .byte '#' + .byte '$' + .byte '%' + .byte '&' + .byte ''' + .byte '(' + .byte ')' + .byte '*' + .byte '+' + .byte ',' + .byte '-' + .byte '.' + .byte '/' + .byte '0' + .byte '1' + .byte '2' + .byte '3' + .byte '4' + .byte '5' + .byte '6' + .byte '7' + .byte '8' + .byte '9' + .byte ':' + .byte ';' + .byte '<' + .byte '=' + .byte '>' + .byte '?' + .byte '@' + .byte 'A' + .byte 'B' + .byte 'C' + .byte 'D' + .byte 'E' + .byte 'F' + .byte 'G' + .byte 'H' + .byte 'I' + .byte 'J' + .byte 'K' + .byte 'L' + .byte 'M' + .byte 'N' + .byte 'O' + .byte 'P' + .byte 'Q' + .byte 'R' + .byte 'S' + .byte 'T' + .byte 'U' + .byte 'V' + .byte 'W' + .byte 'X' + .byte 'Y' + .byte 'Z' + .byte '[' + .byte '\' + .byte ']' + .byte '^' + .byte '_' + .byte '`' + .byte 'a' + .byte 'b' + .byte 'c' + .byte 'd' + .byte 'e' + .byte 'f' + .byte 'g' + .byte 'h' + .byte 'i' + .byte 'j' + .byte 'k' + .byte 'l' + .byte 'm' + .byte 'n' + .byte 'o' + .byte 'p' + .byte 'q' + .byte 'r' + .byte 's' + .byte 't' + .byte 'u' + .byte 'v' + .byte 'w' + .byte 'x' + .byte 'y' + .byte 'z' + .byte '{' + .byte '|' + .byte '}' + .byte '~' + + ; multiple values on one line, decimal + .byte 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 + .byte 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 + .byte 32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47 + .byte 48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63 + .byte 64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79 + .byte 80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95 + .byte 96,97,98,99,100,101,102,103,104,105,106,107,108,109,110,111 + .byte 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 + .byte 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 + .byte 144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159 + .byte 160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175 + .byte 176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191 + .byte 192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207 + .byte 208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223 + .byte 224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239 + .byte 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 + + ; multiple values on one line, hex + .byte $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f + .byte $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f + .byte $20,$21,$22,$23,$24,$25,$26,$27,$28,$29,$2a,$2b,$2c,$2d,$2e,$2f + .byte $30,$31,$32,$33,$34,$35,$36,$37,$38,$39,$3a,$3b,$3c,$3d,$3e,$3f + .byte $40,$41,$42,$43,$44,$45,$46,$47,$48,$49,$4a,$4b,$4c,$4d,$4e,$4f + .byte $50,$51,$52,$53,$54,$55,$56,$57,$58,$59,$5a,$5b,$5c,$5d,$5e,$5f + .byte $60,$61,$62,$63,$64,$65,$66,$67,$68,$69,$6a,$6b,$6c,$6d,$6e,$6f + .byte $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f + .byte $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f + .byte $90,$91,$92,$93,$94,$95,$96,$97,$98,$99,$9a,$9b,$9c,$9d,$9e,$9f + .byte $a0,$a1,$a2,$a3,$a4,$a5,$a6,$a7,$a8,$a9,$aa,$ab,$ac,$ad,$ae,$af + .byte $b0,$b1,$b2,$b3,$b4,$b5,$b6,$b7,$b8,$b9,$ba,$bb,$bc,$bd,$be,$bf + .byte $c0,$c1,$c2,$c3,$c4,$c5,$c6,$c7,$c8,$c9,$ca,$cb,$cc,$cd,$ce,$cf + .byte $d0,$d1,$d2,$d3,$d4,$d5,$d6,$d7,$d8,$d9,$da,$db,$dc,$dd,$de,$df + .byte $e0,$e1,$e2,$e3,$e4,$e5,$e6,$e7,$e8,$e9,$ea,$eb,$ec,$ed,$ee,$ef + .byte $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff + + ; multiple values on one line, alternative hex + .byte 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh + .byte 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh + .byte 20h,21h,22h,23h,24h,25h,26h,27h,28h,29h,2ah,2bh,2ch,2dh,2eh,2fh + .byte 30h,31h,32h,33h,34h,35h,36h,37h,38h,39h,3ah,3bh,3ch,3dh,3eh,3fh + .byte 40h,41h,42h,43h,44h,45h,46h,47h,48h,49h,4ah,4bh,4ch,4dh,4eh,4fh + .byte 50h,51h,52h,53h,54h,55h,56h,57h,58h,59h,5ah,5bh,5ch,5dh,5eh,5fh + .byte 60h,61h,62h,63h,64h,65h,66h,67h,68h,69h,6ah,6bh,6ch,6dh,6eh,6fh + .byte 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh + .byte 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh + .byte 90h,91h,92h,93h,94h,95h,96h,97h,98h,99h,9ah,9bh,9ch,9dh,9eh,9fh + .byte 0a0h,0a1h,0a2h,0a3h,0a4h,0a5h,0a6h,0a7h,0a8h,0a9h,0aah,0abh,0ach,0adh,0aeh,0afh + .byte 0b0h,0b1h,0b2h,0b3h,0b4h,0b5h,0b6h,0b7h,0b8h,0b9h,0bah,0bbh,0bch,0bdh,0beh,0bfh + .byte 0c0h,0c1h,0c2h,0c3h,0c4h,0c5h,0c6h,0c7h,0c8h,0c9h,0cah,0cbh,0cch,0cdh,0ceh,0cfh + .byte 0d0h,0d1h,0d2h,0d3h,0d4h,0d5h,0d6h,0d7h,0d8h,0d9h,0dah,0dbh,0dch,0ddh,0deh,0dfh + .byte 0e0h,0e1h,0e2h,0e3h,0e4h,0e5h,0e6h,0e7h,0e8h,0e9h,0eah,0ebh,0ech,0edh,0eeh,0efh + .byte 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh + + ; multiple values on one line, characters + .byte ' ','!','"','#','$','%','&',''','(',')','*','+',',','-','.','/' + .byte '0','1','2','3','4','5','6','7','8','9',':',';','<','=','>','?' + .byte '@','A','B','C','D','E','F','G','H','I','J','K','L','M','N','O' + .byte 'P','Q','R','S','T','U','V','W','X','Y','Z','[','\',']','^','_' + .byte '`','a','b','c','d','e','f','g','h','i','j','k','l','m','n','o' + .byte 'p','q','r','s','t','u','v','w','x','y','z','{','|','}','~' + + ; some character strings + .byte " !#$%&'()*+,-." + .byte "0123456789:;<=>" + .byte "@ABCDEFGHIJKLMN" + .byte "PQRSTUVWXYZ[\]^" + .byte "`abcdefghijklmn" + .byte "pqrstuvwxyz{|}" + + ; mix some variants + .byte 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh diff --git a/test/asm/listing/101-byt.s b/test/asm/listing/101-byt.s new file mode 100644 index 000000000..45fac7442 --- /dev/null +++ b/test/asm/listing/101-byt.s @@ -0,0 +1,3526 @@ +; 2022-06-15 Spiro Trikaliotis + + + ; upper case pseudo-op + .BYT 0 + .BYT 1 + .BYT 2 + .BYT 3 + .BYT 4 + .BYT 5 + .BYT 6 + .BYT 7 + .BYT 8 + .BYT 9 + .BYT 10 + .BYT 11 + .BYT 12 + .BYT 13 + .BYT 14 + .BYT 15 + .BYT 16 + .BYT 17 + .BYT 18 + .BYT 19 + .BYT 20 + .BYT 21 + .BYT 22 + .BYT 23 + .BYT 24 + .BYT 25 + .BYT 26 + .BYT 27 + .BYT 28 + .BYT 29 + .BYT 30 + .BYT 31 + .BYT 32 + .BYT 33 + .BYT 34 + .BYT 35 + .BYT 36 + .BYT 37 + .BYT 38 + .BYT 39 + .BYT 40 + .BYT 41 + .BYT 42 + .BYT 43 + .BYT 44 + .BYT 45 + .BYT 46 + .BYT 47 + .BYT 48 + .BYT 49 + .BYT 50 + .BYT 51 + .BYT 52 + .BYT 53 + .BYT 54 + .BYT 55 + .BYT 56 + .BYT 57 + .BYT 58 + .BYT 59 + .BYT 60 + .BYT 61 + .BYT 62 + .BYT 63 + .BYT 64 + .BYT 65 + .BYT 66 + .BYT 67 + .BYT 68 + .BYT 69 + .BYT 70 + .BYT 71 + .BYT 72 + .BYT 73 + .BYT 74 + .BYT 75 + .BYT 76 + .BYT 77 + .BYT 78 + .BYT 79 + .BYT 80 + .BYT 81 + .BYT 82 + .BYT 83 + .BYT 84 + .BYT 85 + .BYT 86 + .BYT 87 + .BYT 88 + .BYT 89 + .BYT 90 + .BYT 91 + .BYT 92 + .BYT 93 + .BYT 94 + .BYT 95 + .BYT 96 + .BYT 97 + .BYT 98 + .BYT 99 + .BYT 100 + .BYT 101 + .BYT 102 + .BYT 103 + .BYT 104 + .BYT 105 + .BYT 106 + .BYT 107 + .BYT 108 + .BYT 109 + .BYT 110 + .BYT 111 + .BYT 112 + .BYT 113 + .BYT 114 + .BYT 115 + .BYT 116 + .BYT 117 + .BYT 118 + .BYT 119 + .BYT 120 + .BYT 121 + .BYT 122 + .BYT 123 + .BYT 124 + .BYT 125 + .BYT 126 + .BYT 127 + .BYT 128 + .BYT 129 + .BYT 130 + .BYT 131 + .BYT 132 + .BYT 133 + .BYT 134 + .BYT 135 + .BYT 136 + .BYT 137 + .BYT 138 + .BYT 139 + .BYT 140 + .BYT 141 + .BYT 142 + .BYT 143 + .BYT 144 + .BYT 145 + .BYT 146 + .BYT 147 + .BYT 148 + .BYT 149 + .BYT 150 + .BYT 151 + .BYT 152 + .BYT 153 + .BYT 154 + .BYT 155 + .BYT 156 + .BYT 157 + .BYT 158 + .BYT 159 + .BYT 160 + .BYT 161 + .BYT 162 + .BYT 163 + .BYT 164 + .BYT 165 + .BYT 166 + .BYT 167 + .BYT 168 + .BYT 169 + .BYT 170 + .BYT 171 + .BYT 172 + .BYT 173 + .BYT 174 + .BYT 175 + .BYT 176 + .BYT 177 + .BYT 178 + .BYT 179 + .BYT 180 + .BYT 181 + .BYT 182 + .BYT 183 + .BYT 184 + .BYT 185 + .BYT 186 + .BYT 187 + .BYT 188 + .BYT 189 + .BYT 190 + .BYT 191 + .BYT 192 + .BYT 193 + .BYT 194 + .BYT 195 + .BYT 196 + .BYT 197 + .BYT 198 + .BYT 199 + .BYT 200 + .BYT 201 + .BYT 202 + .BYT 203 + .BYT 204 + .BYT 205 + .BYT 206 + .BYT 207 + .BYT 208 + .BYT 209 + .BYT 210 + .BYT 211 + .BYT 212 + .BYT 213 + .BYT 214 + .BYT 215 + .BYT 216 + .BYT 217 + .BYT 218 + .BYT 219 + .BYT 220 + .BYT 221 + .BYT 222 + .BYT 223 + .BYT 224 + .BYT 225 + .BYT 226 + .BYT 227 + .BYT 228 + .BYT 229 + .BYT 230 + .BYT 231 + .BYT 232 + .BYT 233 + .BYT 234 + .BYT 235 + .BYT 236 + .BYT 237 + .BYT 238 + .BYT 239 + .BYT 240 + .BYT 241 + .BYT 242 + .BYT 243 + .BYT 244 + .BYT 245 + .BYT 246 + .BYT 247 + .BYT 248 + .BYT 249 + .BYT 250 + .BYT 251 + .BYT 252 + .BYT 253 + .BYT 254 + .BYT 255 + + ; lower case pseudo-op + .byt 0 + .byt 1 + .byt 2 + .byt 3 + .byt 4 + .byt 5 + .byt 6 + .byt 7 + .byt 8 + .byt 9 + .byt 10 + .byt 11 + .byt 12 + .byt 13 + .byt 14 + .byt 15 + .byt 16 + .byt 17 + .byt 18 + .byt 19 + .byt 20 + .byt 21 + .byt 22 + .byt 23 + .byt 24 + .byt 25 + .byt 26 + .byt 27 + .byt 28 + .byt 29 + .byt 30 + .byt 31 + .byt 32 + .byt 33 + .byt 34 + .byt 35 + .byt 36 + .byt 37 + .byt 38 + .byt 39 + .byt 40 + .byt 41 + .byt 42 + .byt 43 + .byt 44 + .byt 45 + .byt 46 + .byt 47 + .byt 48 + .byt 49 + .byt 50 + .byt 51 + .byt 52 + .byt 53 + .byt 54 + .byt 55 + .byt 56 + .byt 57 + .byt 58 + .byt 59 + .byt 60 + .byt 61 + .byt 62 + .byt 63 + .byt 64 + .byt 65 + .byt 66 + .byt 67 + .byt 68 + .byt 69 + .byt 70 + .byt 71 + .byt 72 + .byt 73 + .byt 74 + .byt 75 + .byt 76 + .byt 77 + .byt 78 + .byt 79 + .byt 80 + .byt 81 + .byt 82 + .byt 83 + .byt 84 + .byt 85 + .byt 86 + .byt 87 + .byt 88 + .byt 89 + .byt 90 + .byt 91 + .byt 92 + .byt 93 + .byt 94 + .byt 95 + .byt 96 + .byt 97 + .byt 98 + .byt 99 + .byt 100 + .byt 101 + .byt 102 + .byt 103 + .byt 104 + .byt 105 + .byt 106 + .byt 107 + .byt 108 + .byt 109 + .byt 110 + .byt 111 + .byt 112 + .byt 113 + .byt 114 + .byt 115 + .byt 116 + .byt 117 + .byt 118 + .byt 119 + .byt 120 + .byt 121 + .byt 122 + .byt 123 + .byt 124 + .byt 125 + .byt 126 + .byt 127 + .byt 128 + .byt 129 + .byt 130 + .byt 131 + .byt 132 + .byt 133 + .byt 134 + .byt 135 + .byt 136 + .byt 137 + .byt 138 + .byt 139 + .byt 140 + .byt 141 + .byt 142 + .byt 143 + .byt 144 + .byt 145 + .byt 146 + .byt 147 + .byt 148 + .byt 149 + .byt 150 + .byt 151 + .byt 152 + .byt 153 + .byt 154 + .byt 155 + .byt 156 + .byt 157 + .byt 158 + .byt 159 + .byt 160 + .byt 161 + .byt 162 + .byt 163 + .byt 164 + .byt 165 + .byt 166 + .byt 167 + .byt 168 + .byt 169 + .byt 170 + .byt 171 + .byt 172 + .byt 173 + .byt 174 + .byt 175 + .byt 176 + .byt 177 + .byt 178 + .byt 179 + .byt 180 + .byt 181 + .byt 182 + .byt 183 + .byt 184 + .byt 185 + .byt 186 + .byt 187 + .byt 188 + .byt 189 + .byt 190 + .byt 191 + .byt 192 + .byt 193 + .byt 194 + .byt 195 + .byt 196 + .byt 197 + .byt 198 + .byt 199 + .byt 200 + .byt 201 + .byt 202 + .byt 203 + .byt 204 + .byt 205 + .byt 206 + .byt 207 + .byt 208 + .byt 209 + .byt 210 + .byt 211 + .byt 212 + .byt 213 + .byt 214 + .byt 215 + .byt 216 + .byt 217 + .byt 218 + .byt 219 + .byt 220 + .byt 221 + .byt 222 + .byt 223 + .byt 224 + .byt 225 + .byt 226 + .byt 227 + .byt 228 + .byt 229 + .byt 230 + .byt 231 + .byt 232 + .byt 233 + .byt 234 + .byt 235 + .byt 236 + .byt 237 + .byt 238 + .byt 239 + .byt 240 + .byt 241 + .byt 242 + .byt 243 + .byt 244 + .byt 245 + .byt 246 + .byt 247 + .byt 248 + .byt 249 + .byt 250 + .byt 251 + .byt 252 + .byt 253 + .byt 254 + .byt 255 + + ; hex values + .byt $0 + .byt $1 + .byt $2 + .byt $3 + .byt $4 + .byt $5 + .byt $6 + .byt $7 + .byt $8 + .byt $9 + .byt $a + .byt $b + .byt $c + .byt $d + .byt $e + .byt $f + .byt $10 + .byt $11 + .byt $12 + .byt $13 + .byt $14 + .byt $15 + .byt $16 + .byt $17 + .byt $18 + .byt $19 + .byt $1a + .byt $1b + .byt $1c + .byt $1d + .byt $1e + .byt $1f + .byt $20 + .byt $21 + .byt $22 + .byt $23 + .byt $24 + .byt $25 + .byt $26 + .byt $27 + .byt $28 + .byt $29 + .byt $2a + .byt $2b + .byt $2c + .byt $2d + .byt $2e + .byt $2f + .byt $30 + .byt $31 + .byt $32 + .byt $33 + .byt $34 + .byt $35 + .byt $36 + .byt $37 + .byt $38 + .byt $39 + .byt $3a + .byt $3b + .byt $3c + .byt $3d + .byt $3e + .byt $3f + .byt $40 + .byt $41 + .byt $42 + .byt $43 + .byt $44 + .byt $45 + .byt $46 + .byt $47 + .byt $48 + .byt $49 + .byt $4a + .byt $4b + .byt $4c + .byt $4d + .byt $4e + .byt $4f + .byt $50 + .byt $51 + .byt $52 + .byt $53 + .byt $54 + .byt $55 + .byt $56 + .byt $57 + .byt $58 + .byt $59 + .byt $5a + .byt $5b + .byt $5c + .byt $5d + .byt $5e + .byt $5f + .byt $60 + .byt $61 + .byt $62 + .byt $63 + .byt $64 + .byt $65 + .byt $66 + .byt $67 + .byt $68 + .byt $69 + .byt $6a + .byt $6b + .byt $6c + .byt $6d + .byt $6e + .byt $6f + .byt $70 + .byt $71 + .byt $72 + .byt $73 + .byt $74 + .byt $75 + .byt $76 + .byt $77 + .byt $78 + .byt $79 + .byt $7a + .byt $7b + .byt $7c + .byt $7d + .byt $7e + .byt $7f + .byt $80 + .byt $81 + .byt $82 + .byt $83 + .byt $84 + .byt $85 + .byt $86 + .byt $87 + .byt $88 + .byt $89 + .byt $8a + .byt $8b + .byt $8c + .byt $8d + .byt $8e + .byt $8f + .byt $90 + .byt $91 + .byt $92 + .byt $93 + .byt $94 + .byt $95 + .byt $96 + .byt $97 + .byt $98 + .byt $99 + .byt $9a + .byt $9b + .byt $9c + .byt $9d + .byt $9e + .byt $9f + .byt $a0 + .byt $a1 + .byt $a2 + .byt $a3 + .byt $a4 + .byt $a5 + .byt $a6 + .byt $a7 + .byt $a8 + .byt $a9 + .byt $aa + .byt $ab + .byt $ac + .byt $ad + .byt $ae + .byt $af + .byt $b0 + .byt $b1 + .byt $b2 + .byt $b3 + .byt $b4 + .byt $b5 + .byt $b6 + .byt $b7 + .byt $b8 + .byt $b9 + .byt $ba + .byt $bb + .byt $bc + .byt $bd + .byt $be + .byt $bf + .byt $c0 + .byt $c1 + .byt $c2 + .byt $c3 + .byt $c4 + .byt $c5 + .byt $c6 + .byt $c7 + .byt $c8 + .byt $c9 + .byt $ca + .byt $cb + .byt $cc + .byt $cd + .byt $ce + .byt $cf + .byt $d0 + .byt $d1 + .byt $d2 + .byt $d3 + .byt $d4 + .byt $d5 + .byt $d6 + .byt $d7 + .byt $d8 + .byt $d9 + .byt $da + .byt $db + .byt $dc + .byt $dd + .byt $de + .byt $df + .byt $e0 + .byt $e1 + .byt $e2 + .byt $e3 + .byt $e4 + .byt $e5 + .byt $e6 + .byt $e7 + .byt $e8 + .byt $e9 + .byt $ea + .byt $eb + .byt $ec + .byt $ed + .byt $ee + .byt $ef + .byt $f0 + .byt $f1 + .byt $f2 + .byt $f3 + .byt $f4 + .byt $f5 + .byt $f6 + .byt $f7 + .byt $f8 + .byt $f9 + .byt $fa + .byt $fb + .byt $fc + .byt $fd + .byt $fe + .byt $ff + + ; hex values, uppercase + .byt $0 + .byt $1 + .byt $2 + .byt $3 + .byt $4 + .byt $5 + .byt $6 + .byt $7 + .byt $8 + .byt $9 + .byt $A + .byt $B + .byt $C + .byt $D + .byt $E + .byt $F + .byt $10 + .byt $11 + .byt $12 + .byt $13 + .byt $14 + .byt $15 + .byt $16 + .byt $17 + .byt $18 + .byt $19 + .byt $1A + .byt $1B + .byt $1C + .byt $1D + .byt $1E + .byt $1F + .byt $20 + .byt $21 + .byt $22 + .byt $23 + .byt $24 + .byt $25 + .byt $26 + .byt $27 + .byt $28 + .byt $29 + .byt $2A + .byt $2B + .byt $2C + .byt $2D + .byt $2E + .byt $2F + .byt $30 + .byt $31 + .byt $32 + .byt $33 + .byt $34 + .byt $35 + .byt $36 + .byt $37 + .byt $38 + .byt $39 + .byt $3A + .byt $3B + .byt $3C + .byt $3D + .byt $3E + .byt $3F + .byt $40 + .byt $41 + .byt $42 + .byt $43 + .byt $44 + .byt $45 + .byt $46 + .byt $47 + .byt $48 + .byt $49 + .byt $4A + .byt $4B + .byt $4C + .byt $4D + .byt $4E + .byt $4F + .byt $50 + .byt $51 + .byt $52 + .byt $53 + .byt $54 + .byt $55 + .byt $56 + .byt $57 + .byt $58 + .byt $59 + .byt $5A + .byt $5B + .byt $5C + .byt $5D + .byt $5E + .byt $5F + .byt $60 + .byt $61 + .byt $62 + .byt $63 + .byt $64 + .byt $65 + .byt $66 + .byt $67 + .byt $68 + .byt $69 + .byt $6A + .byt $6B + .byt $6C + .byt $6D + .byt $6E + .byt $6F + .byt $70 + .byt $71 + .byt $72 + .byt $73 + .byt $74 + .byt $75 + .byt $76 + .byt $77 + .byt $78 + .byt $79 + .byt $7A + .byt $7B + .byt $7C + .byt $7D + .byt $7E + .byt $7F + .byt $80 + .byt $81 + .byt $82 + .byt $83 + .byt $84 + .byt $85 + .byt $86 + .byt $87 + .byt $88 + .byt $89 + .byt $8A + .byt $8B + .byt $8C + .byt $8D + .byt $8E + .byt $8F + .byt $90 + .byt $91 + .byt $92 + .byt $93 + .byt $94 + .byt $95 + .byt $96 + .byt $97 + .byt $98 + .byt $99 + .byt $9A + .byt $9B + .byt $9C + .byt $9D + .byt $9E + .byt $9F + .byt $A0 + .byt $A1 + .byt $A2 + .byt $A3 + .byt $A4 + .byt $A5 + .byt $A6 + .byt $A7 + .byt $A8 + .byt $A9 + .byt $AA + .byt $AB + .byt $AC + .byt $AD + .byt $AE + .byt $AF + .byt $B0 + .byt $B1 + .byt $B2 + .byt $B3 + .byt $B4 + .byt $B5 + .byt $B6 + .byt $B7 + .byt $B8 + .byt $B9 + .byt $BA + .byt $BB + .byt $BC + .byt $BD + .byt $BE + .byt $BF + .byt $C0 + .byt $C1 + .byt $C2 + .byt $C3 + .byt $C4 + .byt $C5 + .byt $C6 + .byt $C7 + .byt $C8 + .byt $C9 + .byt $CA + .byt $CB + .byt $CC + .byt $CD + .byt $CE + .byt $CF + .byt $D0 + .byt $D1 + .byt $D2 + .byt $D3 + .byt $D4 + .byt $D5 + .byt $D6 + .byt $D7 + .byt $D8 + .byt $D9 + .byt $DA + .byt $DB + .byt $DC + .byt $DD + .byt $DE + .byt $DF + .byt $E0 + .byt $E1 + .byt $E2 + .byt $E3 + .byt $E4 + .byt $E5 + .byt $E6 + .byt $E7 + .byt $E8 + .byt $E9 + .byt $EA + .byt $EB + .byt $EC + .byt $ED + .byt $EE + .byt $EF + .byt $F0 + .byt $F1 + .byt $F2 + .byt $F3 + .byt $F4 + .byt $F5 + .byt $F6 + .byt $F7 + .byt $F8 + .byt $F9 + .byt $FA + .byt $FB + .byt $FC + .byt $FD + .byt $FE + .byt $FF + + ; 2-digit hex values + .byt $00 + .byt $01 + .byt $02 + .byt $03 + .byt $04 + .byt $05 + .byt $06 + .byt $07 + .byt $08 + .byt $09 + .byt $0a + .byt $0b + .byt $0c + .byt $0d + .byt $0e + .byt $0f + .byt $10 + .byt $11 + .byt $12 + .byt $13 + .byt $14 + .byt $15 + .byt $16 + .byt $17 + .byt $18 + .byt $19 + .byt $1a + .byt $1b + .byt $1c + .byt $1d + .byt $1e + .byt $1f + .byt $20 + .byt $21 + .byt $22 + .byt $23 + .byt $24 + .byt $25 + .byt $26 + .byt $27 + .byt $28 + .byt $29 + .byt $2a + .byt $2b + .byt $2c + .byt $2d + .byt $2e + .byt $2f + .byt $30 + .byt $31 + .byt $32 + .byt $33 + .byt $34 + .byt $35 + .byt $36 + .byt $37 + .byt $38 + .byt $39 + .byt $3a + .byt $3b + .byt $3c + .byt $3d + .byt $3e + .byt $3f + .byt $40 + .byt $41 + .byt $42 + .byt $43 + .byt $44 + .byt $45 + .byt $46 + .byt $47 + .byt $48 + .byt $49 + .byt $4a + .byt $4b + .byt $4c + .byt $4d + .byt $4e + .byt $4f + .byt $50 + .byt $51 + .byt $52 + .byt $53 + .byt $54 + .byt $55 + .byt $56 + .byt $57 + .byt $58 + .byt $59 + .byt $5a + .byt $5b + .byt $5c + .byt $5d + .byt $5e + .byt $5f + .byt $60 + .byt $61 + .byt $62 + .byt $63 + .byt $64 + .byt $65 + .byt $66 + .byt $67 + .byt $68 + .byt $69 + .byt $6a + .byt $6b + .byt $6c + .byt $6d + .byt $6e + .byt $6f + .byt $70 + .byt $71 + .byt $72 + .byt $73 + .byt $74 + .byt $75 + .byt $76 + .byt $77 + .byt $78 + .byt $79 + .byt $7a + .byt $7b + .byt $7c + .byt $7d + .byt $7e + .byt $7f + .byt $80 + .byt $81 + .byt $82 + .byt $83 + .byt $84 + .byt $85 + .byt $86 + .byt $87 + .byt $88 + .byt $89 + .byt $8a + .byt $8b + .byt $8c + .byt $8d + .byt $8e + .byt $8f + .byt $90 + .byt $91 + .byt $92 + .byt $93 + .byt $94 + .byt $95 + .byt $96 + .byt $97 + .byt $98 + .byt $99 + .byt $9a + .byt $9b + .byt $9c + .byt $9d + .byt $9e + .byt $9f + .byt $a0 + .byt $a1 + .byt $a2 + .byt $a3 + .byt $a4 + .byt $a5 + .byt $a6 + .byt $a7 + .byt $a8 + .byt $a9 + .byt $aa + .byt $ab + .byt $ac + .byt $ad + .byt $ae + .byt $af + .byt $b0 + .byt $b1 + .byt $b2 + .byt $b3 + .byt $b4 + .byt $b5 + .byt $b6 + .byt $b7 + .byt $b8 + .byt $b9 + .byt $ba + .byt $bb + .byt $bc + .byt $bd + .byt $be + .byt $bf + .byt $c0 + .byt $c1 + .byt $c2 + .byt $c3 + .byt $c4 + .byt $c5 + .byt $c6 + .byt $c7 + .byt $c8 + .byt $c9 + .byt $ca + .byt $cb + .byt $cc + .byt $cd + .byt $ce + .byt $cf + .byt $d0 + .byt $d1 + .byt $d2 + .byt $d3 + .byt $d4 + .byt $d5 + .byt $d6 + .byt $d7 + .byt $d8 + .byt $d9 + .byt $da + .byt $db + .byt $dc + .byt $dd + .byt $de + .byt $df + .byt $e0 + .byt $e1 + .byt $e2 + .byt $e3 + .byt $e4 + .byt $e5 + .byt $e6 + .byt $e7 + .byt $e8 + .byt $e9 + .byt $ea + .byt $eb + .byt $ec + .byt $ed + .byt $ee + .byt $ef + .byt $f0 + .byt $f1 + .byt $f2 + .byt $f3 + .byt $f4 + .byt $f5 + .byt $f6 + .byt $f7 + .byt $f8 + .byt $f9 + .byt $fa + .byt $fb + .byt $fc + .byt $fd + .byt $fe + .byt $ff + + ; 2-digit hex values, uppercase + .byt $00 + .byt $01 + .byt $02 + .byt $03 + .byt $04 + .byt $05 + .byt $06 + .byt $07 + .byt $08 + .byt $09 + .byt $0A + .byt $0B + .byt $0C + .byt $0D + .byt $0E + .byt $0F + .byt $10 + .byt $11 + .byt $12 + .byt $13 + .byt $14 + .byt $15 + .byt $16 + .byt $17 + .byt $18 + .byt $19 + .byt $1A + .byt $1B + .byt $1C + .byt $1D + .byt $1E + .byt $1F + .byt $20 + .byt $21 + .byt $22 + .byt $23 + .byt $24 + .byt $25 + .byt $26 + .byt $27 + .byt $28 + .byt $29 + .byt $2A + .byt $2B + .byt $2C + .byt $2D + .byt $2E + .byt $2F + .byt $30 + .byt $31 + .byt $32 + .byt $33 + .byt $34 + .byt $35 + .byt $36 + .byt $37 + .byt $38 + .byt $39 + .byt $3A + .byt $3B + .byt $3C + .byt $3D + .byt $3E + .byt $3F + .byt $40 + .byt $41 + .byt $42 + .byt $43 + .byt $44 + .byt $45 + .byt $46 + .byt $47 + .byt $48 + .byt $49 + .byt $4A + .byt $4B + .byt $4C + .byt $4D + .byt $4E + .byt $4F + .byt $50 + .byt $51 + .byt $52 + .byt $53 + .byt $54 + .byt $55 + .byt $56 + .byt $57 + .byt $58 + .byt $59 + .byt $5A + .byt $5B + .byt $5C + .byt $5D + .byt $5E + .byt $5F + .byt $60 + .byt $61 + .byt $62 + .byt $63 + .byt $64 + .byt $65 + .byt $66 + .byt $67 + .byt $68 + .byt $69 + .byt $6A + .byt $6B + .byt $6C + .byt $6D + .byt $6E + .byt $6F + .byt $70 + .byt $71 + .byt $72 + .byt $73 + .byt $74 + .byt $75 + .byt $76 + .byt $77 + .byt $78 + .byt $79 + .byt $7A + .byt $7B + .byt $7C + .byt $7D + .byt $7E + .byt $7F + .byt $80 + .byt $81 + .byt $82 + .byt $83 + .byt $84 + .byt $85 + .byt $86 + .byt $87 + .byt $88 + .byt $89 + .byt $8A + .byt $8B + .byt $8C + .byt $8D + .byt $8E + .byt $8F + .byt $90 + .byt $91 + .byt $92 + .byt $93 + .byt $94 + .byt $95 + .byt $96 + .byt $97 + .byt $98 + .byt $99 + .byt $9A + .byt $9B + .byt $9C + .byt $9D + .byt $9E + .byt $9F + .byt $A0 + .byt $A1 + .byt $A2 + .byt $A3 + .byt $A4 + .byt $A5 + .byt $A6 + .byt $A7 + .byt $A8 + .byt $A9 + .byt $AA + .byt $AB + .byt $AC + .byt $AD + .byt $AE + .byt $AF + .byt $B0 + .byt $B1 + .byt $B2 + .byt $B3 + .byt $B4 + .byt $B5 + .byt $B6 + .byt $B7 + .byt $B8 + .byt $B9 + .byt $BA + .byt $BB + .byt $BC + .byt $BD + .byt $BE + .byt $BF + .byt $C0 + .byt $C1 + .byt $C2 + .byt $C3 + .byt $C4 + .byt $C5 + .byt $C6 + .byt $C7 + .byt $C8 + .byt $C9 + .byt $CA + .byt $CB + .byt $CC + .byt $CD + .byt $CE + .byt $CF + .byt $D0 + .byt $D1 + .byt $D2 + .byt $D3 + .byt $D4 + .byt $D5 + .byt $D6 + .byt $D7 + .byt $D8 + .byt $D9 + .byt $DA + .byt $DB + .byt $DC + .byt $DD + .byt $DE + .byt $DF + .byt $E0 + .byt $E1 + .byt $E2 + .byt $E3 + .byt $E4 + .byt $E5 + .byt $E6 + .byt $E7 + .byt $E8 + .byt $E9 + .byt $EA + .byt $EB + .byt $EC + .byt $ED + .byt $EE + .byt $EF + .byt $F0 + .byt $F1 + .byt $F2 + .byt $F3 + .byt $F4 + .byt $F5 + .byt $F6 + .byt $F7 + .byt $F8 + .byt $F9 + .byt $FA + .byt $FB + .byt $FC + .byt $FD + .byt $FE + .byt $FF + + ; alternative hex values + .byt 0h + .byt 1h + .byt 2h + .byt 3h + .byt 4h + .byt 5h + .byt 6h + .byt 7h + .byt 8h + .byt 9h + .byt 0ah + .byt 0bh + .byt 0ch + .byt 0dh + .byt 0eh + .byt 0fh + .byt 10h + .byt 11h + .byt 12h + .byt 13h + .byt 14h + .byt 15h + .byt 16h + .byt 17h + .byt 18h + .byt 19h + .byt 1ah + .byt 1bh + .byt 1ch + .byt 1dh + .byt 1eh + .byt 1fh + .byt 20h + .byt 21h + .byt 22h + .byt 23h + .byt 24h + .byt 25h + .byt 26h + .byt 27h + .byt 28h + .byt 29h + .byt 2ah + .byt 2bh + .byt 2ch + .byt 2dh + .byt 2eh + .byt 2fh + .byt 30h + .byt 31h + .byt 32h + .byt 33h + .byt 34h + .byt 35h + .byt 36h + .byt 37h + .byt 38h + .byt 39h + .byt 3ah + .byt 3bh + .byt 3ch + .byt 3dh + .byt 3eh + .byt 3fh + .byt 40h + .byt 41h + .byt 42h + .byt 43h + .byt 44h + .byt 45h + .byt 46h + .byt 47h + .byt 48h + .byt 49h + .byt 4ah + .byt 4bh + .byt 4ch + .byt 4dh + .byt 4eh + .byt 4fh + .byt 50h + .byt 51h + .byt 52h + .byt 53h + .byt 54h + .byt 55h + .byt 56h + .byt 57h + .byt 58h + .byt 59h + .byt 5ah + .byt 5bh + .byt 5ch + .byt 5dh + .byt 5eh + .byt 5fh + .byt 60h + .byt 61h + .byt 62h + .byt 63h + .byt 64h + .byt 65h + .byt 66h + .byt 67h + .byt 68h + .byt 69h + .byt 6ah + .byt 6bh + .byt 6ch + .byt 6dh + .byt 6eh + .byt 6fh + .byt 70h + .byt 71h + .byt 72h + .byt 73h + .byt 74h + .byt 75h + .byt 76h + .byt 77h + .byt 78h + .byt 79h + .byt 7ah + .byt 7bh + .byt 7ch + .byt 7dh + .byt 7eh + .byt 7fh + .byt 80h + .byt 81h + .byt 82h + .byt 83h + .byt 84h + .byt 85h + .byt 86h + .byt 87h + .byt 88h + .byt 89h + .byt 8ah + .byt 8bh + .byt 8ch + .byt 8dh + .byt 8eh + .byt 8fh + .byt 90h + .byt 91h + .byt 92h + .byt 93h + .byt 94h + .byt 95h + .byt 96h + .byt 97h + .byt 98h + .byt 99h + .byt 9ah + .byt 9bh + .byt 9ch + .byt 9dh + .byt 9eh + .byt 9fh + .byt 0a0h + .byt 0a1h + .byt 0a2h + .byt 0a3h + .byt 0a4h + .byt 0a5h + .byt 0a6h + .byt 0a7h + .byt 0a8h + .byt 0a9h + .byt 0aah + .byt 0abh + .byt 0ach + .byt 0adh + .byt 0aeh + .byt 0afh + .byt 0b0h + .byt 0b1h + .byt 0b2h + .byt 0b3h + .byt 0b4h + .byt 0b5h + .byt 0b6h + .byt 0b7h + .byt 0b8h + .byt 0b9h + .byt 0bah + .byt 0bbh + .byt 0bch + .byt 0bdh + .byt 0beh + .byt 0bfh + .byt 0c0h + .byt 0c1h + .byt 0c2h + .byt 0c3h + .byt 0c4h + .byt 0c5h + .byt 0c6h + .byt 0c7h + .byt 0c8h + .byt 0c9h + .byt 0cah + .byt 0cbh + .byt 0cch + .byt 0cdh + .byt 0ceh + .byt 0cfh + .byt 0d0h + .byt 0d1h + .byt 0d2h + .byt 0d3h + .byt 0d4h + .byt 0d5h + .byt 0d6h + .byt 0d7h + .byt 0d8h + .byt 0d9h + .byt 0dah + .byt 0dbh + .byt 0dch + .byt 0ddh + .byt 0deh + .byt 0dfh + .byt 0e0h + .byt 0e1h + .byt 0e2h + .byt 0e3h + .byt 0e4h + .byt 0e5h + .byt 0e6h + .byt 0e7h + .byt 0e8h + .byt 0e9h + .byt 0eah + .byt 0ebh + .byt 0ech + .byt 0edh + .byt 0eeh + .byt 0efh + .byt 0f0h + .byt 0f1h + .byt 0f2h + .byt 0f3h + .byt 0f4h + .byt 0f5h + .byt 0f6h + .byt 0f7h + .byt 0f8h + .byt 0f9h + .byt 0fah + .byt 0fbh + .byt 0fch + .byt 0fdh + .byt 0feh + .byt 0ffh + + ; alternative hex values, uppercase + .byt 0h + .byt 1h + .byt 2h + .byt 3h + .byt 4h + .byt 5h + .byt 6h + .byt 7h + .byt 8h + .byt 9h + .byt 0Ah + .byt 0Bh + .byt 0Ch + .byt 0Dh + .byt 0Eh + .byt 0Fh + .byt 10h + .byt 11h + .byt 12h + .byt 13h + .byt 14h + .byt 15h + .byt 16h + .byt 17h + .byt 18h + .byt 19h + .byt 1Ah + .byt 1Bh + .byt 1Ch + .byt 1Dh + .byt 1Eh + .byt 1Fh + .byt 20h + .byt 21h + .byt 22h + .byt 23h + .byt 24h + .byt 25h + .byt 26h + .byt 27h + .byt 28h + .byt 29h + .byt 2Ah + .byt 2Bh + .byt 2Ch + .byt 2Dh + .byt 2Eh + .byt 2Fh + .byt 30h + .byt 31h + .byt 32h + .byt 33h + .byt 34h + .byt 35h + .byt 36h + .byt 37h + .byt 38h + .byt 39h + .byt 3Ah + .byt 3Bh + .byt 3Ch + .byt 3Dh + .byt 3Eh + .byt 3Fh + .byt 40h + .byt 41h + .byt 42h + .byt 43h + .byt 44h + .byt 45h + .byt 46h + .byt 47h + .byt 48h + .byt 49h + .byt 4Ah + .byt 4Bh + .byt 4Ch + .byt 4Dh + .byt 4Eh + .byt 4Fh + .byt 50h + .byt 51h + .byt 52h + .byt 53h + .byt 54h + .byt 55h + .byt 56h + .byt 57h + .byt 58h + .byt 59h + .byt 5Ah + .byt 5Bh + .byt 5Ch + .byt 5Dh + .byt 5Eh + .byt 5Fh + .byt 60h + .byt 61h + .byt 62h + .byt 63h + .byt 64h + .byt 65h + .byt 66h + .byt 67h + .byt 68h + .byt 69h + .byt 6Ah + .byt 6Bh + .byt 6Ch + .byt 6Dh + .byt 6Eh + .byt 6Fh + .byt 70h + .byt 71h + .byt 72h + .byt 73h + .byt 74h + .byt 75h + .byt 76h + .byt 77h + .byt 78h + .byt 79h + .byt 7Ah + .byt 7Bh + .byt 7Ch + .byt 7Dh + .byt 7Eh + .byt 7Fh + .byt 80h + .byt 81h + .byt 82h + .byt 83h + .byt 84h + .byt 85h + .byt 86h + .byt 87h + .byt 88h + .byt 89h + .byt 8Ah + .byt 8Bh + .byt 8Ch + .byt 8Dh + .byt 8Eh + .byt 8Fh + .byt 90h + .byt 91h + .byt 92h + .byt 93h + .byt 94h + .byt 95h + .byt 96h + .byt 97h + .byt 98h + .byt 99h + .byt 9Ah + .byt 9Bh + .byt 9Ch + .byt 9Dh + .byt 9Eh + .byt 9Fh + .byt 0A0h + .byt 0A1h + .byt 0A2h + .byt 0A3h + .byt 0A4h + .byt 0A5h + .byt 0A6h + .byt 0A7h + .byt 0A8h + .byt 0A9h + .byt 0AAh + .byt 0ABh + .byt 0ACh + .byt 0ADh + .byt 0AEh + .byt 0AFh + .byt 0B0h + .byt 0B1h + .byt 0B2h + .byt 0B3h + .byt 0B4h + .byt 0B5h + .byt 0B6h + .byt 0B7h + .byt 0B8h + .byt 0B9h + .byt 0BAh + .byt 0BBh + .byt 0BCh + .byt 0BDh + .byt 0BEh + .byt 0BFh + .byt 0C0h + .byt 0C1h + .byt 0C2h + .byt 0C3h + .byt 0C4h + .byt 0C5h + .byt 0C6h + .byt 0C7h + .byt 0C8h + .byt 0C9h + .byt 0CAh + .byt 0CBh + .byt 0CCh + .byt 0CDh + .byt 0CEh + .byt 0CFh + .byt 0D0h + .byt 0D1h + .byt 0D2h + .byt 0D3h + .byt 0D4h + .byt 0D5h + .byt 0D6h + .byt 0D7h + .byt 0D8h + .byt 0D9h + .byt 0DAh + .byt 0DBh + .byt 0DCh + .byt 0DDh + .byt 0DEh + .byt 0DFh + .byt 0E0h + .byt 0E1h + .byt 0E2h + .byt 0E3h + .byt 0E4h + .byt 0E5h + .byt 0E6h + .byt 0E7h + .byt 0E8h + .byt 0E9h + .byt 0EAh + .byt 0EBh + .byt 0ECh + .byt 0EDh + .byt 0EEh + .byt 0EFh + .byt 0F0h + .byt 0F1h + .byt 0F2h + .byt 0F3h + .byt 0F4h + .byt 0F5h + .byt 0F6h + .byt 0F7h + .byt 0F8h + .byt 0F9h + .byt 0FAh + .byt 0FBh + .byt 0FCh + .byt 0FDh + .byt 0FEh + .byt 0FFh + + ; alternative 2-digit hex values + .byt 00h + .byt 01h + .byt 02h + .byt 03h + .byt 04h + .byt 05h + .byt 06h + .byt 07h + .byt 08h + .byt 09h + .byt 0ah + .byt 0bh + .byt 0ch + .byt 0dh + .byt 0eh + .byt 0fh + .byt 10h + .byt 11h + .byt 12h + .byt 13h + .byt 14h + .byt 15h + .byt 16h + .byt 17h + .byt 18h + .byt 19h + .byt 1ah + .byt 1bh + .byt 1ch + .byt 1dh + .byt 1eh + .byt 1fh + .byt 20h + .byt 21h + .byt 22h + .byt 23h + .byt 24h + .byt 25h + .byt 26h + .byt 27h + .byt 28h + .byt 29h + .byt 2ah + .byt 2bh + .byt 2ch + .byt 2dh + .byt 2eh + .byt 2fh + .byt 30h + .byt 31h + .byt 32h + .byt 33h + .byt 34h + .byt 35h + .byt 36h + .byt 37h + .byt 38h + .byt 39h + .byt 3ah + .byt 3bh + .byt 3ch + .byt 3dh + .byt 3eh + .byt 3fh + .byt 40h + .byt 41h + .byt 42h + .byt 43h + .byt 44h + .byt 45h + .byt 46h + .byt 47h + .byt 48h + .byt 49h + .byt 4ah + .byt 4bh + .byt 4ch + .byt 4dh + .byt 4eh + .byt 4fh + .byt 50h + .byt 51h + .byt 52h + .byt 53h + .byt 54h + .byt 55h + .byt 56h + .byt 57h + .byt 58h + .byt 59h + .byt 5ah + .byt 5bh + .byt 5ch + .byt 5dh + .byt 5eh + .byt 5fh + .byt 60h + .byt 61h + .byt 62h + .byt 63h + .byt 64h + .byt 65h + .byt 66h + .byt 67h + .byt 68h + .byt 69h + .byt 6ah + .byt 6bh + .byt 6ch + .byt 6dh + .byt 6eh + .byt 6fh + .byt 70h + .byt 71h + .byt 72h + .byt 73h + .byt 74h + .byt 75h + .byt 76h + .byt 77h + .byt 78h + .byt 79h + .byt 7ah + .byt 7bh + .byt 7ch + .byt 7dh + .byt 7eh + .byt 7fh + .byt 80h + .byt 81h + .byt 82h + .byt 83h + .byt 84h + .byt 85h + .byt 86h + .byt 87h + .byt 88h + .byt 89h + .byt 8ah + .byt 8bh + .byt 8ch + .byt 8dh + .byt 8eh + .byt 8fh + .byt 90h + .byt 91h + .byt 92h + .byt 93h + .byt 94h + .byt 95h + .byt 96h + .byt 97h + .byt 98h + .byt 99h + .byt 9ah + .byt 9bh + .byt 9ch + .byt 9dh + .byt 9eh + .byt 9fh + .byt 0a0h + .byt 0a1h + .byt 0a2h + .byt 0a3h + .byt 0a4h + .byt 0a5h + .byt 0a6h + .byt 0a7h + .byt 0a8h + .byt 0a9h + .byt 0aah + .byt 0abh + .byt 0ach + .byt 0adh + .byt 0aeh + .byt 0afh + .byt 0b0h + .byt 0b1h + .byt 0b2h + .byt 0b3h + .byt 0b4h + .byt 0b5h + .byt 0b6h + .byt 0b7h + .byt 0b8h + .byt 0b9h + .byt 0bah + .byt 0bbh + .byt 0bch + .byt 0bdh + .byt 0beh + .byt 0bfh + .byt 0c0h + .byt 0c1h + .byt 0c2h + .byt 0c3h + .byt 0c4h + .byt 0c5h + .byt 0c6h + .byt 0c7h + .byt 0c8h + .byt 0c9h + .byt 0cah + .byt 0cbh + .byt 0cch + .byt 0cdh + .byt 0ceh + .byt 0cfh + .byt 0d0h + .byt 0d1h + .byt 0d2h + .byt 0d3h + .byt 0d4h + .byt 0d5h + .byt 0d6h + .byt 0d7h + .byt 0d8h + .byt 0d9h + .byt 0dah + .byt 0dbh + .byt 0dch + .byt 0ddh + .byt 0deh + .byt 0dfh + .byt 0e0h + .byt 0e1h + .byt 0e2h + .byt 0e3h + .byt 0e4h + .byt 0e5h + .byt 0e6h + .byt 0e7h + .byt 0e8h + .byt 0e9h + .byt 0eah + .byt 0ebh + .byt 0ech + .byt 0edh + .byt 0eeh + .byt 0efh + .byt 0f0h + .byt 0f1h + .byt 0f2h + .byt 0f3h + .byt 0f4h + .byt 0f5h + .byt 0f6h + .byt 0f7h + .byt 0f8h + .byt 0f9h + .byt 0fah + .byt 0fbh + .byt 0fch + .byt 0fdh + .byt 0feh + .byt 0ffh + + ; alternative 2-digit hex values, uppercase + .byt 00h + .byt 01h + .byt 02h + .byt 03h + .byt 04h + .byt 05h + .byt 06h + .byt 07h + .byt 08h + .byt 09h + .byt 0Ah + .byt 0Bh + .byt 0Ch + .byt 0Dh + .byt 0Eh + .byt 0Fh + .byt 10h + .byt 11h + .byt 12h + .byt 13h + .byt 14h + .byt 15h + .byt 16h + .byt 17h + .byt 18h + .byt 19h + .byt 1Ah + .byt 1Bh + .byt 1Ch + .byt 1Dh + .byt 1Eh + .byt 1Fh + .byt 20h + .byt 21h + .byt 22h + .byt 23h + .byt 24h + .byt 25h + .byt 26h + .byt 27h + .byt 28h + .byt 29h + .byt 2Ah + .byt 2Bh + .byt 2Ch + .byt 2Dh + .byt 2Eh + .byt 2Fh + .byt 30h + .byt 31h + .byt 32h + .byt 33h + .byt 34h + .byt 35h + .byt 36h + .byt 37h + .byt 38h + .byt 39h + .byt 3Ah + .byt 3Bh + .byt 3Ch + .byt 3Dh + .byt 3Eh + .byt 3Fh + .byt 40h + .byt 41h + .byt 42h + .byt 43h + .byt 44h + .byt 45h + .byt 46h + .byt 47h + .byt 48h + .byt 49h + .byt 4Ah + .byt 4Bh + .byt 4Ch + .byt 4Dh + .byt 4Eh + .byt 4Fh + .byt 50h + .byt 51h + .byt 52h + .byt 53h + .byt 54h + .byt 55h + .byt 56h + .byt 57h + .byt 58h + .byt 59h + .byt 5Ah + .byt 5Bh + .byt 5Ch + .byt 5Dh + .byt 5Eh + .byt 5Fh + .byt 60h + .byt 61h + .byt 62h + .byt 63h + .byt 64h + .byt 65h + .byt 66h + .byt 67h + .byt 68h + .byt 69h + .byt 6Ah + .byt 6Bh + .byt 6Ch + .byt 6Dh + .byt 6Eh + .byt 6Fh + .byt 70h + .byt 71h + .byt 72h + .byt 73h + .byt 74h + .byt 75h + .byt 76h + .byt 77h + .byt 78h + .byt 79h + .byt 7Ah + .byt 7Bh + .byt 7Ch + .byt 7Dh + .byt 7Eh + .byt 7Fh + .byt 80h + .byt 81h + .byt 82h + .byt 83h + .byt 84h + .byt 85h + .byt 86h + .byt 87h + .byt 88h + .byt 89h + .byt 8Ah + .byt 8Bh + .byt 8Ch + .byt 8Dh + .byt 8Eh + .byt 8Fh + .byt 90h + .byt 91h + .byt 92h + .byt 93h + .byt 94h + .byt 95h + .byt 96h + .byt 97h + .byt 98h + .byt 99h + .byt 9Ah + .byt 9Bh + .byt 9Ch + .byt 9Dh + .byt 9Eh + .byt 9Fh + .byt 0A0h + .byt 0A1h + .byt 0A2h + .byt 0A3h + .byt 0A4h + .byt 0A5h + .byt 0A6h + .byt 0A7h + .byt 0A8h + .byt 0A9h + .byt 0AAh + .byt 0ABh + .byt 0ACh + .byt 0ADh + .byt 0AEh + .byt 0AFh + .byt 0B0h + .byt 0B1h + .byt 0B2h + .byt 0B3h + .byt 0B4h + .byt 0B5h + .byt 0B6h + .byt 0B7h + .byt 0B8h + .byt 0B9h + .byt 0BAh + .byt 0BBh + .byt 0BCh + .byt 0BDh + .byt 0BEh + .byt 0BFh + .byt 0C0h + .byt 0C1h + .byt 0C2h + .byt 0C3h + .byt 0C4h + .byt 0C5h + .byt 0C6h + .byt 0C7h + .byt 0C8h + .byt 0C9h + .byt 0CAh + .byt 0CBh + .byt 0CCh + .byt 0CDh + .byt 0CEh + .byt 0CFh + .byt 0D0h + .byt 0D1h + .byt 0D2h + .byt 0D3h + .byt 0D4h + .byt 0D5h + .byt 0D6h + .byt 0D7h + .byt 0D8h + .byt 0D9h + .byt 0DAh + .byt 0DBh + .byt 0DCh + .byt 0DDh + .byt 0DEh + .byt 0DFh + .byt 0E0h + .byt 0E1h + .byt 0E2h + .byt 0E3h + .byt 0E4h + .byt 0E5h + .byt 0E6h + .byt 0E7h + .byt 0E8h + .byt 0E9h + .byt 0EAh + .byt 0EBh + .byt 0ECh + .byt 0EDh + .byt 0EEh + .byt 0EFh + .byt 0F0h + .byt 0F1h + .byt 0F2h + .byt 0F3h + .byt 0F4h + .byt 0F5h + .byt 0F6h + .byt 0F7h + .byt 0F8h + .byt 0F9h + .byt 0FAh + .byt 0FBh + .byt 0FCh + .byt 0FDh + .byt 0FEh + .byt 0FFh + + ; alternative hex values, always leading zero + .byt 00h + .byt 01h + .byt 02h + .byt 03h + .byt 04h + .byt 05h + .byt 06h + .byt 07h + .byt 08h + .byt 09h + .byt 0ah + .byt 0bh + .byt 0ch + .byt 0dh + .byt 0eh + .byt 0fh + .byt 010h + .byt 011h + .byt 012h + .byt 013h + .byt 014h + .byt 015h + .byt 016h + .byt 017h + .byt 018h + .byt 019h + .byt 01ah + .byt 01bh + .byt 01ch + .byt 01dh + .byt 01eh + .byt 01fh + .byt 020h + .byt 021h + .byt 022h + .byt 023h + .byt 024h + .byt 025h + .byt 026h + .byt 027h + .byt 028h + .byt 029h + .byt 02ah + .byt 02bh + .byt 02ch + .byt 02dh + .byt 02eh + .byt 02fh + .byt 030h + .byt 031h + .byt 032h + .byt 033h + .byt 034h + .byt 035h + .byt 036h + .byt 037h + .byt 038h + .byt 039h + .byt 03ah + .byt 03bh + .byt 03ch + .byt 03dh + .byt 03eh + .byt 03fh + .byt 040h + .byt 041h + .byt 042h + .byt 043h + .byt 044h + .byt 045h + .byt 046h + .byt 047h + .byt 048h + .byt 049h + .byt 04ah + .byt 04bh + .byt 04ch + .byt 04dh + .byt 04eh + .byt 04fh + .byt 050h + .byt 051h + .byt 052h + .byt 053h + .byt 054h + .byt 055h + .byt 056h + .byt 057h + .byt 058h + .byt 059h + .byt 05ah + .byt 05bh + .byt 05ch + .byt 05dh + .byt 05eh + .byt 05fh + .byt 060h + .byt 061h + .byt 062h + .byt 063h + .byt 064h + .byt 065h + .byt 066h + .byt 067h + .byt 068h + .byt 069h + .byt 06ah + .byt 06bh + .byt 06ch + .byt 06dh + .byt 06eh + .byt 06fh + .byt 070h + .byt 071h + .byt 072h + .byt 073h + .byt 074h + .byt 075h + .byt 076h + .byt 077h + .byt 078h + .byt 079h + .byt 07ah + .byt 07bh + .byt 07ch + .byt 07dh + .byt 07eh + .byt 07fh + .byt 080h + .byt 081h + .byt 082h + .byt 083h + .byt 084h + .byt 085h + .byt 086h + .byt 087h + .byt 088h + .byt 089h + .byt 08ah + .byt 08bh + .byt 08ch + .byt 08dh + .byt 08eh + .byt 08fh + .byt 090h + .byt 091h + .byt 092h + .byt 093h + .byt 094h + .byt 095h + .byt 096h + .byt 097h + .byt 098h + .byt 099h + .byt 09ah + .byt 09bh + .byt 09ch + .byt 09dh + .byt 09eh + .byt 09fh + .byt 0a0h + .byt 0a1h + .byt 0a2h + .byt 0a3h + .byt 0a4h + .byt 0a5h + .byt 0a6h + .byt 0a7h + .byt 0a8h + .byt 0a9h + .byt 0aah + .byt 0abh + .byt 0ach + .byt 0adh + .byt 0aeh + .byt 0afh + .byt 0b0h + .byt 0b1h + .byt 0b2h + .byt 0b3h + .byt 0b4h + .byt 0b5h + .byt 0b6h + .byt 0b7h + .byt 0b8h + .byt 0b9h + .byt 0bah + .byt 0bbh + .byt 0bch + .byt 0bdh + .byt 0beh + .byt 0bfh + .byt 0c0h + .byt 0c1h + .byt 0c2h + .byt 0c3h + .byt 0c4h + .byt 0c5h + .byt 0c6h + .byt 0c7h + .byt 0c8h + .byt 0c9h + .byt 0cah + .byt 0cbh + .byt 0cch + .byt 0cdh + .byt 0ceh + .byt 0cfh + .byt 0d0h + .byt 0d1h + .byt 0d2h + .byt 0d3h + .byt 0d4h + .byt 0d5h + .byt 0d6h + .byt 0d7h + .byt 0d8h + .byt 0d9h + .byt 0dah + .byt 0dbh + .byt 0dch + .byt 0ddh + .byt 0deh + .byt 0dfh + .byt 0e0h + .byt 0e1h + .byt 0e2h + .byt 0e3h + .byt 0e4h + .byt 0e5h + .byt 0e6h + .byt 0e7h + .byt 0e8h + .byt 0e9h + .byt 0eah + .byt 0ebh + .byt 0ech + .byt 0edh + .byt 0eeh + .byt 0efh + .byt 0f0h + .byt 0f1h + .byt 0f2h + .byt 0f3h + .byt 0f4h + .byt 0f5h + .byt 0f6h + .byt 0f7h + .byt 0f8h + .byt 0f9h + .byt 0fah + .byt 0fbh + .byt 0fch + .byt 0fdh + .byt 0feh + .byt 0ffh + + ; binary values, variable length + .byt %0 + .byt %1 + .byt %10 + .byt %11 + .byt %100 + .byt %101 + .byt %110 + .byt %111 + .byt %1000 + .byt %1001 + .byt %1010 + .byt %1011 + .byt %1100 + .byt %1101 + .byt %1110 + .byt %1111 + .byt %10000 + .byt %10001 + .byt %10010 + .byt %10011 + .byt %10100 + .byt %10101 + .byt %10110 + .byt %10111 + .byt %11000 + .byt %11001 + .byt %11010 + .byt %11011 + .byt %11100 + .byt %11101 + .byt %11110 + .byt %11111 + .byt %100000 + .byt %100001 + .byt %100010 + .byt %100011 + .byt %100100 + .byt %100101 + .byt %100110 + .byt %100111 + .byt %101000 + .byt %101001 + .byt %101010 + .byt %101011 + .byt %101100 + .byt %101101 + .byt %101110 + .byt %101111 + .byt %110000 + .byt %110001 + .byt %110010 + .byt %110011 + .byt %110100 + .byt %110101 + .byt %110110 + .byt %110111 + .byt %111000 + .byt %111001 + .byt %111010 + .byt %111011 + .byt %111100 + .byt %111101 + .byt %111110 + .byt %111111 + .byt %1000000 + .byt %1000001 + .byt %1000010 + .byt %1000011 + .byt %1000100 + .byt %1000101 + .byt %1000110 + .byt %1000111 + .byt %1001000 + .byt %1001001 + .byt %1001010 + .byt %1001011 + .byt %1001100 + .byt %1001101 + .byt %1001110 + .byt %1001111 + .byt %1010000 + .byt %1010001 + .byt %1010010 + .byt %1010011 + .byt %1010100 + .byt %1010101 + .byt %1010110 + .byt %1010111 + .byt %1011000 + .byt %1011001 + .byt %1011010 + .byt %1011011 + .byt %1011100 + .byt %1011101 + .byt %1011110 + .byt %1011111 + .byt %1100000 + .byt %1100001 + .byt %1100010 + .byt %1100011 + .byt %1100100 + .byt %1100101 + .byt %1100110 + .byt %1100111 + .byt %1101000 + .byt %1101001 + .byt %1101010 + .byt %1101011 + .byt %1101100 + .byt %1101101 + .byt %1101110 + .byt %1101111 + .byt %1110000 + .byt %1110001 + .byt %1110010 + .byt %1110011 + .byt %1110100 + .byt %1110101 + .byt %1110110 + .byt %1110111 + .byt %1111000 + .byt %1111001 + .byt %1111010 + .byt %1111011 + .byt %1111100 + .byt %1111101 + .byt %1111110 + .byt %1111111 + .byt %10000000 + .byt %10000001 + .byt %10000010 + .byt %10000011 + .byt %10000100 + .byt %10000101 + .byt %10000110 + .byt %10000111 + .byt %10001000 + .byt %10001001 + .byt %10001010 + .byt %10001011 + .byt %10001100 + .byt %10001101 + .byt %10001110 + .byt %10001111 + .byt %10010000 + .byt %10010001 + .byt %10010010 + .byt %10010011 + .byt %10010100 + .byt %10010101 + .byt %10010110 + .byt %10010111 + .byt %10011000 + .byt %10011001 + .byt %10011010 + .byt %10011011 + .byt %10011100 + .byt %10011101 + .byt %10011110 + .byt %10011111 + .byt %10100000 + .byt %10100001 + .byt %10100010 + .byt %10100011 + .byt %10100100 + .byt %10100101 + .byt %10100110 + .byt %10100111 + .byt %10101000 + .byt %10101001 + .byt %10101010 + .byt %10101011 + .byt %10101100 + .byt %10101101 + .byt %10101110 + .byt %10101111 + .byt %10110000 + .byt %10110001 + .byt %10110010 + .byt %10110011 + .byt %10110100 + .byt %10110101 + .byt %10110110 + .byt %10110111 + .byt %10111000 + .byt %10111001 + .byt %10111010 + .byt %10111011 + .byt %10111100 + .byt %10111101 + .byt %10111110 + .byt %10111111 + .byt %11000000 + .byt %11000001 + .byt %11000010 + .byt %11000011 + .byt %11000100 + .byt %11000101 + .byt %11000110 + .byt %11000111 + .byt %11001000 + .byt %11001001 + .byt %11001010 + .byt %11001011 + .byt %11001100 + .byt %11001101 + .byt %11001110 + .byt %11001111 + .byt %11010000 + .byt %11010001 + .byt %11010010 + .byt %11010011 + .byt %11010100 + .byt %11010101 + .byt %11010110 + .byt %11010111 + .byt %11011000 + .byt %11011001 + .byt %11011010 + .byt %11011011 + .byt %11011100 + .byt %11011101 + .byt %11011110 + .byt %11011111 + .byt %11100000 + .byt %11100001 + .byt %11100010 + .byt %11100011 + .byt %11100100 + .byt %11100101 + .byt %11100110 + .byt %11100111 + .byt %11101000 + .byt %11101001 + .byt %11101010 + .byt %11101011 + .byt %11101100 + .byt %11101101 + .byt %11101110 + .byt %11101111 + .byt %11110000 + .byt %11110001 + .byt %11110010 + .byt %11110011 + .byt %11110100 + .byt %11110101 + .byt %11110110 + .byt %11110111 + .byt %11111000 + .byt %11111001 + .byt %11111010 + .byt %11111011 + .byt %11111100 + .byt %11111101 + .byt %11111110 + .byt %11111111 + + ; binary values, full length + .byt %00000000 + .byt %00000001 + .byt %00000010 + .byt %00000011 + .byt %00000100 + .byt %00000101 + .byt %00000110 + .byt %00000111 + .byt %00001000 + .byt %00001001 + .byt %00001010 + .byt %00001011 + .byt %00001100 + .byt %00001101 + .byt %00001110 + .byt %00001111 + .byt %00010000 + .byt %00010001 + .byt %00010010 + .byt %00010011 + .byt %00010100 + .byt %00010101 + .byt %00010110 + .byt %00010111 + .byt %00011000 + .byt %00011001 + .byt %00011010 + .byt %00011011 + .byt %00011100 + .byt %00011101 + .byt %00011110 + .byt %00011111 + .byt %00100000 + .byt %00100001 + .byt %00100010 + .byt %00100011 + .byt %00100100 + .byt %00100101 + .byt %00100110 + .byt %00100111 + .byt %00101000 + .byt %00101001 + .byt %00101010 + .byt %00101011 + .byt %00101100 + .byt %00101101 + .byt %00101110 + .byt %00101111 + .byt %00110000 + .byt %00110001 + .byt %00110010 + .byt %00110011 + .byt %00110100 + .byt %00110101 + .byt %00110110 + .byt %00110111 + .byt %00111000 + .byt %00111001 + .byt %00111010 + .byt %00111011 + .byt %00111100 + .byt %00111101 + .byt %00111110 + .byt %00111111 + .byt %01000000 + .byt %01000001 + .byt %01000010 + .byt %01000011 + .byt %01000100 + .byt %01000101 + .byt %01000110 + .byt %01000111 + .byt %01001000 + .byt %01001001 + .byt %01001010 + .byt %01001011 + .byt %01001100 + .byt %01001101 + .byt %01001110 + .byt %01001111 + .byt %01010000 + .byt %01010001 + .byt %01010010 + .byt %01010011 + .byt %01010100 + .byt %01010101 + .byt %01010110 + .byt %01010111 + .byt %01011000 + .byt %01011001 + .byt %01011010 + .byt %01011011 + .byt %01011100 + .byt %01011101 + .byt %01011110 + .byt %01011111 + .byt %01100000 + .byt %01100001 + .byt %01100010 + .byt %01100011 + .byt %01100100 + .byt %01100101 + .byt %01100110 + .byt %01100111 + .byt %01101000 + .byt %01101001 + .byt %01101010 + .byt %01101011 + .byt %01101100 + .byt %01101101 + .byt %01101110 + .byt %01101111 + .byt %01110000 + .byt %01110001 + .byt %01110010 + .byt %01110011 + .byt %01110100 + .byt %01110101 + .byt %01110110 + .byt %01110111 + .byt %01111000 + .byt %01111001 + .byt %01111010 + .byt %01111011 + .byt %01111100 + .byt %01111101 + .byt %01111110 + .byt %01111111 + .byt %10000000 + .byt %10000001 + .byt %10000010 + .byt %10000011 + .byt %10000100 + .byt %10000101 + .byt %10000110 + .byt %10000111 + .byt %10001000 + .byt %10001001 + .byt %10001010 + .byt %10001011 + .byt %10001100 + .byt %10001101 + .byt %10001110 + .byt %10001111 + .byt %10010000 + .byt %10010001 + .byt %10010010 + .byt %10010011 + .byt %10010100 + .byt %10010101 + .byt %10010110 + .byt %10010111 + .byt %10011000 + .byt %10011001 + .byt %10011010 + .byt %10011011 + .byt %10011100 + .byt %10011101 + .byt %10011110 + .byt %10011111 + .byt %10100000 + .byt %10100001 + .byt %10100010 + .byt %10100011 + .byt %10100100 + .byt %10100101 + .byt %10100110 + .byt %10100111 + .byt %10101000 + .byt %10101001 + .byt %10101010 + .byt %10101011 + .byt %10101100 + .byt %10101101 + .byt %10101110 + .byt %10101111 + .byt %10110000 + .byt %10110001 + .byt %10110010 + .byt %10110011 + .byt %10110100 + .byt %10110101 + .byt %10110110 + .byt %10110111 + .byt %10111000 + .byt %10111001 + .byt %10111010 + .byt %10111011 + .byt %10111100 + .byt %10111101 + .byt %10111110 + .byt %10111111 + .byt %11000000 + .byt %11000001 + .byt %11000010 + .byt %11000011 + .byt %11000100 + .byt %11000101 + .byt %11000110 + .byt %11000111 + .byt %11001000 + .byt %11001001 + .byt %11001010 + .byt %11001011 + .byt %11001100 + .byt %11001101 + .byt %11001110 + .byt %11001111 + .byt %11010000 + .byt %11010001 + .byt %11010010 + .byt %11010011 + .byt %11010100 + .byt %11010101 + .byt %11010110 + .byt %11010111 + .byt %11011000 + .byt %11011001 + .byt %11011010 + .byt %11011011 + .byt %11011100 + .byt %11011101 + .byt %11011110 + .byt %11011111 + .byt %11100000 + .byt %11100001 + .byt %11100010 + .byt %11100011 + .byt %11100100 + .byt %11100101 + .byt %11100110 + .byt %11100111 + .byt %11101000 + .byt %11101001 + .byt %11101010 + .byt %11101011 + .byt %11101100 + .byt %11101101 + .byt %11101110 + .byt %11101111 + .byt %11110000 + .byt %11110001 + .byt %11110010 + .byt %11110011 + .byt %11110100 + .byt %11110101 + .byt %11110110 + .byt %11110111 + .byt %11111000 + .byt %11111001 + .byt %11111010 + .byt %11111011 + .byt %11111100 + .byt %11111101 + .byt %11111110 + .byt %11111111 + + ; some character values + .byt ' ' + .byt '!' + .byt '"' + .byt '#' + .byt '$' + .byt '%' + .byt '&' + .byt ''' + .byt '(' + .byt ')' + .byt '*' + .byt '+' + .byt ',' + .byt '-' + .byt '.' + .byt '/' + .byt '0' + .byt '1' + .byt '2' + .byt '3' + .byt '4' + .byt '5' + .byt '6' + .byt '7' + .byt '8' + .byt '9' + .byt ':' + .byt ';' + .byt '<' + .byt '=' + .byt '>' + .byt '?' + .byt '@' + .byt 'A' + .byt 'B' + .byt 'C' + .byt 'D' + .byt 'E' + .byt 'F' + .byt 'G' + .byt 'H' + .byt 'I' + .byt 'J' + .byt 'K' + .byt 'L' + .byt 'M' + .byt 'N' + .byt 'O' + .byt 'P' + .byt 'Q' + .byt 'R' + .byt 'S' + .byt 'T' + .byt 'U' + .byt 'V' + .byt 'W' + .byt 'X' + .byt 'Y' + .byt 'Z' + .byt '[' + .byt '\' + .byt ']' + .byt '^' + .byt '_' + .byt '`' + .byt 'a' + .byt 'b' + .byt 'c' + .byt 'd' + .byt 'e' + .byt 'f' + .byt 'g' + .byt 'h' + .byt 'i' + .byt 'j' + .byt 'k' + .byt 'l' + .byt 'm' + .byt 'n' + .byt 'o' + .byt 'p' + .byt 'q' + .byt 'r' + .byt 's' + .byt 't' + .byt 'u' + .byt 'v' + .byt 'w' + .byt 'x' + .byt 'y' + .byt 'z' + .byt '{' + .byt '|' + .byt '}' + .byt '~' + + ; multiple values on one line, decimal + .byt 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 + .byt 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 + .byt 32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47 + .byt 48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63 + .byt 64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79 + .byt 80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95 + .byt 96,97,98,99,100,101,102,103,104,105,106,107,108,109,110,111 + .byt 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 + .byt 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 + .byt 144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159 + .byt 160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175 + .byt 176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191 + .byt 192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207 + .byt 208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223 + .byt 224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239 + .byt 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 + + ; multiple values on one line, hex + .byt $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f + .byt $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f + .byt $20,$21,$22,$23,$24,$25,$26,$27,$28,$29,$2a,$2b,$2c,$2d,$2e,$2f + .byt $30,$31,$32,$33,$34,$35,$36,$37,$38,$39,$3a,$3b,$3c,$3d,$3e,$3f + .byt $40,$41,$42,$43,$44,$45,$46,$47,$48,$49,$4a,$4b,$4c,$4d,$4e,$4f + .byt $50,$51,$52,$53,$54,$55,$56,$57,$58,$59,$5a,$5b,$5c,$5d,$5e,$5f + .byt $60,$61,$62,$63,$64,$65,$66,$67,$68,$69,$6a,$6b,$6c,$6d,$6e,$6f + .byt $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f + .byt $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f + .byt $90,$91,$92,$93,$94,$95,$96,$97,$98,$99,$9a,$9b,$9c,$9d,$9e,$9f + .byt $a0,$a1,$a2,$a3,$a4,$a5,$a6,$a7,$a8,$a9,$aa,$ab,$ac,$ad,$ae,$af + .byt $b0,$b1,$b2,$b3,$b4,$b5,$b6,$b7,$b8,$b9,$ba,$bb,$bc,$bd,$be,$bf + .byt $c0,$c1,$c2,$c3,$c4,$c5,$c6,$c7,$c8,$c9,$ca,$cb,$cc,$cd,$ce,$cf + .byt $d0,$d1,$d2,$d3,$d4,$d5,$d6,$d7,$d8,$d9,$da,$db,$dc,$dd,$de,$df + .byt $e0,$e1,$e2,$e3,$e4,$e5,$e6,$e7,$e8,$e9,$ea,$eb,$ec,$ed,$ee,$ef + .byt $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff + + ; multiple values on one line, alternative hex + .byt 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh + .byt 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh + .byt 20h,21h,22h,23h,24h,25h,26h,27h,28h,29h,2ah,2bh,2ch,2dh,2eh,2fh + .byt 30h,31h,32h,33h,34h,35h,36h,37h,38h,39h,3ah,3bh,3ch,3dh,3eh,3fh + .byt 40h,41h,42h,43h,44h,45h,46h,47h,48h,49h,4ah,4bh,4ch,4dh,4eh,4fh + .byt 50h,51h,52h,53h,54h,55h,56h,57h,58h,59h,5ah,5bh,5ch,5dh,5eh,5fh + .byt 60h,61h,62h,63h,64h,65h,66h,67h,68h,69h,6ah,6bh,6ch,6dh,6eh,6fh + .byt 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh + .byt 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh + .byt 90h,91h,92h,93h,94h,95h,96h,97h,98h,99h,9ah,9bh,9ch,9dh,9eh,9fh + .byt 0a0h,0a1h,0a2h,0a3h,0a4h,0a5h,0a6h,0a7h,0a8h,0a9h,0aah,0abh,0ach,0adh,0aeh,0afh + .byt 0b0h,0b1h,0b2h,0b3h,0b4h,0b5h,0b6h,0b7h,0b8h,0b9h,0bah,0bbh,0bch,0bdh,0beh,0bfh + .byt 0c0h,0c1h,0c2h,0c3h,0c4h,0c5h,0c6h,0c7h,0c8h,0c9h,0cah,0cbh,0cch,0cdh,0ceh,0cfh + .byt 0d0h,0d1h,0d2h,0d3h,0d4h,0d5h,0d6h,0d7h,0d8h,0d9h,0dah,0dbh,0dch,0ddh,0deh,0dfh + .byt 0e0h,0e1h,0e2h,0e3h,0e4h,0e5h,0e6h,0e7h,0e8h,0e9h,0eah,0ebh,0ech,0edh,0eeh,0efh + .byt 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh + + ; multiple values on one line, characters + .byt ' ','!','"','#','$','%','&',''','(',')','*','+',',','-','.','/' + .byt '0','1','2','3','4','5','6','7','8','9',':',';','<','=','>','?' + .byt '@','A','B','C','D','E','F','G','H','I','J','K','L','M','N','O' + .byt 'P','Q','R','S','T','U','V','W','X','Y','Z','[','\',']','^','_' + .byt '`','a','b','c','d','e','f','g','h','i','j','k','l','m','n','o' + .byt 'p','q','r','s','t','u','v','w','x','y','z','{','|','}','~' + + ; some character strings + .byt " !#$%&'()*+,-." + .byt "0123456789:;<=>" + .byt "@ABCDEFGHIJKLMN" + .byt "PQRSTUVWXYZ[\]^" + .byt "`abcdefghijklmn" + .byt "pqrstuvwxyz{|}" + + ; mix some variants + .byt 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh diff --git a/test/asm/listing/102-word.s b/test/asm/listing/102-word.s new file mode 100644 index 000000000..cbbc7eff6 --- /dev/null +++ b/test/asm/listing/102-word.s @@ -0,0 +1,6076 @@ +; 2022-06-15 Spiro Trikaliotis + + + ; upper case pseudo-op + .WORD 0 + .WORD 1 + .WORD 2 + .WORD 3 + .WORD 4 + .WORD 5 + .WORD 6 + .WORD 7 + .WORD 8 + .WORD 9 + .WORD 10 + .WORD 11 + .WORD 12 + .WORD 13 + .WORD 14 + .WORD 15 + .WORD 16 + .WORD 17 + .WORD 18 + .WORD 19 + .WORD 112 + .WORD 113 + .WORD 114 + .WORD 115 + .WORD 116 + .WORD 117 + .WORD 118 + .WORD 119 + .WORD 120 + .WORD 121 + .WORD 122 + .WORD 123 + .WORD 124 + .WORD 125 + .WORD 126 + .WORD 127 + .WORD 128 + .WORD 129 + .WORD 130 + .WORD 131 + .WORD 132 + .WORD 133 + .WORD 134 + .WORD 240 + .WORD 241 + .WORD 242 + .WORD 243 + .WORD 244 + .WORD 245 + .WORD 246 + .WORD 247 + .WORD 248 + .WORD 249 + .WORD 250 + .WORD 251 + .WORD 252 + .WORD 253 + .WORD 254 + .WORD 255 + .WORD 256 + .WORD 257 + .WORD 258 + .WORD 259 + .WORD 4050 + .WORD 4051 + .WORD 4052 + .WORD 4053 + .WORD 4054 + .WORD 4055 + .WORD 4056 + .WORD 4057 + .WORD 4058 + .WORD 4059 + .WORD 4060 + .WORD 4061 + .WORD 4062 + .WORD 4063 + .WORD 4064 + .WORD 4065 + .WORD 4066 + .WORD 4067 + .WORD 4068 + .WORD 4069 + .WORD 4070 + .WORD 4071 + .WORD 4072 + .WORD 4073 + .WORD 4074 + .WORD 4075 + .WORD 4076 + .WORD 4077 + .WORD 4078 + .WORD 4079 + .WORD 4080 + .WORD 4081 + .WORD 4082 + .WORD 4083 + .WORD 4084 + .WORD 4085 + .WORD 4086 + .WORD 4087 + .WORD 4088 + .WORD 4089 + .WORD 4090 + .WORD 4091 + .WORD 4092 + .WORD 4093 + .WORD 4094 + .WORD 4095 + .WORD 4096 + .WORD 4097 + .WORD 4098 + .WORD 4099 + .WORD 4100 + .WORD 4101 + .WORD 4102 + .WORD 4103 + .WORD 4104 + .WORD 32752 + .WORD 32753 + .WORD 32754 + .WORD 32755 + .WORD 32756 + .WORD 32757 + .WORD 32758 + .WORD 32759 + .WORD 32760 + .WORD 32761 + .WORD 32762 + .WORD 32763 + .WORD 32764 + .WORD 32765 + .WORD 32766 + .WORD 32767 + .WORD 32768 + .WORD 32769 + .WORD 32770 + .WORD 32771 + .WORD 32772 + .WORD 32773 + .WORD 32774 + .WORD 32775 + .WORD 32776 + .WORD 32777 + .WORD 32778 + .WORD 32779 + .WORD 40929 + .WORD 40930 + .WORD 40931 + .WORD 40932 + .WORD 40933 + .WORD 40934 + .WORD 40935 + .WORD 40936 + .WORD 40937 + .WORD 40938 + .WORD 40939 + .WORD 40940 + .WORD 40941 + .WORD 40942 + .WORD 40943 + .WORD 40944 + .WORD 40945 + .WORD 40946 + .WORD 40947 + .WORD 40948 + .WORD 40949 + .WORD 40950 + .WORD 40951 + .WORD 40952 + .WORD 40953 + .WORD 40954 + .WORD 40955 + .WORD 40956 + .WORD 40957 + .WORD 40958 + .WORD 40959 + .WORD 40960 + .WORD 40961 + .WORD 40962 + .WORD 40963 + .WORD 40964 + .WORD 40965 + .WORD 40966 + .WORD 40967 + .WORD 40968 + .WORD 40969 + .WORD 40970 + .WORD 40971 + .WORD 40972 + .WORD 40973 + .WORD 40974 + .WORD 40975 + .WORD 45025 + .WORD 45026 + .WORD 45027 + .WORD 45028 + .WORD 45029 + .WORD 45030 + .WORD 45031 + .WORD 45032 + .WORD 45033 + .WORD 45034 + .WORD 45035 + .WORD 45036 + .WORD 45037 + .WORD 45038 + .WORD 45039 + .WORD 45040 + .WORD 45041 + .WORD 45042 + .WORD 45043 + .WORD 45044 + .WORD 45045 + .WORD 45046 + .WORD 45047 + .WORD 45048 + .WORD 45049 + .WORD 45050 + .WORD 45051 + .WORD 45052 + .WORD 45053 + .WORD 45054 + .WORD 45055 + .WORD 45056 + .WORD 45057 + .WORD 45058 + .WORD 45059 + .WORD 45060 + .WORD 45061 + .WORD 45062 + .WORD 45063 + .WORD 45064 + .WORD 45065 + .WORD 45066 + .WORD 45067 + .WORD 45068 + .WORD 45069 + .WORD 45070 + .WORD 45071 + .WORD 49121 + .WORD 49122 + .WORD 49123 + .WORD 49124 + .WORD 49125 + .WORD 49126 + .WORD 49127 + .WORD 49128 + .WORD 49129 + .WORD 49130 + .WORD 49131 + .WORD 49132 + .WORD 49133 + .WORD 49134 + .WORD 49135 + .WORD 49136 + .WORD 49137 + .WORD 49138 + .WORD 49139 + .WORD 49140 + .WORD 49141 + .WORD 49142 + .WORD 49143 + .WORD 49144 + .WORD 49145 + .WORD 49146 + .WORD 49147 + .WORD 49148 + .WORD 49149 + .WORD 49150 + .WORD 49151 + .WORD 49152 + .WORD 49153 + .WORD 49154 + .WORD 49155 + .WORD 49156 + .WORD 49157 + .WORD 49158 + .WORD 49159 + .WORD 49160 + .WORD 49161 + .WORD 49162 + .WORD 49163 + .WORD 49164 + .WORD 49165 + .WORD 49166 + .WORD 49167 + .WORD 53217 + .WORD 53218 + .WORD 53219 + .WORD 53220 + .WORD 53221 + .WORD 53222 + .WORD 53223 + .WORD 53224 + .WORD 53225 + .WORD 53226 + .WORD 53227 + .WORD 53228 + .WORD 53229 + .WORD 53230 + .WORD 53231 + .WORD 53232 + .WORD 53233 + .WORD 53234 + .WORD 53235 + .WORD 53236 + .WORD 53237 + .WORD 53238 + .WORD 53239 + .WORD 53240 + .WORD 53241 + .WORD 53242 + .WORD 53243 + .WORD 53244 + .WORD 53245 + .WORD 53246 + .WORD 53247 + .WORD 53248 + .WORD 53249 + .WORD 53250 + .WORD 53251 + .WORD 53252 + .WORD 53253 + .WORD 53254 + .WORD 53255 + .WORD 53256 + .WORD 53257 + .WORD 53258 + .WORD 53259 + .WORD 53260 + .WORD 53261 + .WORD 53262 + .WORD 53263 + .WORD 57313 + .WORD 57314 + .WORD 57315 + .WORD 57316 + .WORD 57317 + .WORD 57318 + .WORD 57319 + .WORD 57320 + .WORD 57321 + .WORD 57322 + .WORD 57323 + .WORD 57324 + .WORD 57325 + .WORD 57326 + .WORD 57327 + .WORD 57328 + .WORD 57329 + .WORD 57330 + .WORD 57331 + .WORD 57332 + .WORD 57333 + .WORD 57334 + .WORD 57335 + .WORD 57336 + .WORD 57337 + .WORD 57338 + .WORD 57339 + .WORD 57340 + .WORD 57341 + .WORD 57342 + .WORD 57343 + .WORD 57344 + .WORD 57345 + .WORD 57346 + .WORD 57347 + .WORD 57348 + .WORD 57349 + .WORD 57350 + .WORD 57351 + .WORD 57352 + .WORD 57353 + .WORD 57354 + .WORD 57355 + .WORD 57356 + .WORD 57357 + .WORD 57358 + .WORD 57359 + .WORD 61409 + .WORD 61410 + .WORD 61411 + .WORD 61412 + .WORD 61413 + .WORD 61414 + .WORD 61415 + .WORD 61416 + .WORD 61417 + .WORD 61418 + .WORD 61419 + .WORD 61420 + .WORD 61421 + .WORD 61422 + .WORD 61423 + .WORD 61424 + .WORD 61425 + .WORD 61426 + .WORD 61427 + .WORD 61428 + .WORD 61429 + .WORD 61430 + .WORD 61431 + .WORD 61432 + .WORD 61433 + .WORD 61434 + .WORD 61435 + .WORD 61436 + .WORD 61437 + .WORD 61438 + .WORD 61439 + .WORD 61440 + .WORD 61441 + .WORD 61442 + .WORD 61443 + .WORD 61444 + .WORD 61445 + .WORD 61446 + .WORD 61447 + .WORD 61448 + .WORD 61449 + .WORD 61450 + .WORD 61451 + .WORD 61452 + .WORD 61453 + .WORD 61454 + .WORD 61455 + .WORD 65505 + .WORD 65506 + .WORD 65507 + .WORD 65508 + .WORD 65509 + .WORD 65510 + .WORD 65511 + .WORD 65512 + .WORD 65513 + .WORD 65514 + .WORD 65515 + .WORD 65516 + .WORD 65517 + .WORD 65518 + .WORD 65519 + .WORD 65520 + .WORD 65521 + .WORD 65522 + .WORD 65523 + .WORD 65524 + .WORD 65525 + .WORD 65526 + .WORD 65527 + .WORD 65528 + .WORD 65529 + .WORD 65530 + .WORD 65531 + .WORD 65532 + .WORD 65533 + .WORD 65534 + .WORD 65535 + + ; lower case pseudo-op + .word 0 + .word 1 + .word 2 + .word 3 + .word 4 + .word 5 + .word 6 + .word 7 + .word 8 + .word 9 + .word 10 + .word 11 + .word 12 + .word 13 + .word 14 + .word 15 + .word 16 + .word 17 + .word 18 + .word 19 + .word 112 + .word 113 + .word 114 + .word 115 + .word 116 + .word 117 + .word 118 + .word 119 + .word 120 + .word 121 + .word 122 + .word 123 + .word 124 + .word 125 + .word 126 + .word 127 + .word 128 + .word 129 + .word 130 + .word 131 + .word 132 + .word 133 + .word 134 + .word 240 + .word 241 + .word 242 + .word 243 + .word 244 + .word 245 + .word 246 + .word 247 + .word 248 + .word 249 + .word 250 + .word 251 + .word 252 + .word 253 + .word 254 + .word 255 + .word 256 + .word 257 + .word 258 + .word 259 + .word 4050 + .word 4051 + .word 4052 + .word 4053 + .word 4054 + .word 4055 + .word 4056 + .word 4057 + .word 4058 + .word 4059 + .word 4060 + .word 4061 + .word 4062 + .word 4063 + .word 4064 + .word 4065 + .word 4066 + .word 4067 + .word 4068 + .word 4069 + .word 4070 + .word 4071 + .word 4072 + .word 4073 + .word 4074 + .word 4075 + .word 4076 + .word 4077 + .word 4078 + .word 4079 + .word 4080 + .word 4081 + .word 4082 + .word 4083 + .word 4084 + .word 4085 + .word 4086 + .word 4087 + .word 4088 + .word 4089 + .word 4090 + .word 4091 + .word 4092 + .word 4093 + .word 4094 + .word 4095 + .word 4096 + .word 4097 + .word 4098 + .word 4099 + .word 4100 + .word 4101 + .word 4102 + .word 4103 + .word 4104 + .word 32752 + .word 32753 + .word 32754 + .word 32755 + .word 32756 + .word 32757 + .word 32758 + .word 32759 + .word 32760 + .word 32761 + .word 32762 + .word 32763 + .word 32764 + .word 32765 + .word 32766 + .word 32767 + .word 32768 + .word 32769 + .word 32770 + .word 32771 + .word 32772 + .word 32773 + .word 32774 + .word 32775 + .word 32776 + .word 32777 + .word 32778 + .word 32779 + .word 40929 + .word 40930 + .word 40931 + .word 40932 + .word 40933 + .word 40934 + .word 40935 + .word 40936 + .word 40937 + .word 40938 + .word 40939 + .word 40940 + .word 40941 + .word 40942 + .word 40943 + .word 40944 + .word 40945 + .word 40946 + .word 40947 + .word 40948 + .word 40949 + .word 40950 + .word 40951 + .word 40952 + .word 40953 + .word 40954 + .word 40955 + .word 40956 + .word 40957 + .word 40958 + .word 40959 + .word 40960 + .word 40961 + .word 40962 + .word 40963 + .word 40964 + .word 40965 + .word 40966 + .word 40967 + .word 40968 + .word 40969 + .word 40970 + .word 40971 + .word 40972 + .word 40973 + .word 40974 + .word 40975 + .word 45025 + .word 45026 + .word 45027 + .word 45028 + .word 45029 + .word 45030 + .word 45031 + .word 45032 + .word 45033 + .word 45034 + .word 45035 + .word 45036 + .word 45037 + .word 45038 + .word 45039 + .word 45040 + .word 45041 + .word 45042 + .word 45043 + .word 45044 + .word 45045 + .word 45046 + .word 45047 + .word 45048 + .word 45049 + .word 45050 + .word 45051 + .word 45052 + .word 45053 + .word 45054 + .word 45055 + .word 45056 + .word 45057 + .word 45058 + .word 45059 + .word 45060 + .word 45061 + .word 45062 + .word 45063 + .word 45064 + .word 45065 + .word 45066 + .word 45067 + .word 45068 + .word 45069 + .word 45070 + .word 45071 + .word 49121 + .word 49122 + .word 49123 + .word 49124 + .word 49125 + .word 49126 + .word 49127 + .word 49128 + .word 49129 + .word 49130 + .word 49131 + .word 49132 + .word 49133 + .word 49134 + .word 49135 + .word 49136 + .word 49137 + .word 49138 + .word 49139 + .word 49140 + .word 49141 + .word 49142 + .word 49143 + .word 49144 + .word 49145 + .word 49146 + .word 49147 + .word 49148 + .word 49149 + .word 49150 + .word 49151 + .word 49152 + .word 49153 + .word 49154 + .word 49155 + .word 49156 + .word 49157 + .word 49158 + .word 49159 + .word 49160 + .word 49161 + .word 49162 + .word 49163 + .word 49164 + .word 49165 + .word 49166 + .word 49167 + .word 53217 + .word 53218 + .word 53219 + .word 53220 + .word 53221 + .word 53222 + .word 53223 + .word 53224 + .word 53225 + .word 53226 + .word 53227 + .word 53228 + .word 53229 + .word 53230 + .word 53231 + .word 53232 + .word 53233 + .word 53234 + .word 53235 + .word 53236 + .word 53237 + .word 53238 + .word 53239 + .word 53240 + .word 53241 + .word 53242 + .word 53243 + .word 53244 + .word 53245 + .word 53246 + .word 53247 + .word 53248 + .word 53249 + .word 53250 + .word 53251 + .word 53252 + .word 53253 + .word 53254 + .word 53255 + .word 53256 + .word 53257 + .word 53258 + .word 53259 + .word 53260 + .word 53261 + .word 53262 + .word 53263 + .word 57313 + .word 57314 + .word 57315 + .word 57316 + .word 57317 + .word 57318 + .word 57319 + .word 57320 + .word 57321 + .word 57322 + .word 57323 + .word 57324 + .word 57325 + .word 57326 + .word 57327 + .word 57328 + .word 57329 + .word 57330 + .word 57331 + .word 57332 + .word 57333 + .word 57334 + .word 57335 + .word 57336 + .word 57337 + .word 57338 + .word 57339 + .word 57340 + .word 57341 + .word 57342 + .word 57343 + .word 57344 + .word 57345 + .word 57346 + .word 57347 + .word 57348 + .word 57349 + .word 57350 + .word 57351 + .word 57352 + .word 57353 + .word 57354 + .word 57355 + .word 57356 + .word 57357 + .word 57358 + .word 57359 + .word 61409 + .word 61410 + .word 61411 + .word 61412 + .word 61413 + .word 61414 + .word 61415 + .word 61416 + .word 61417 + .word 61418 + .word 61419 + .word 61420 + .word 61421 + .word 61422 + .word 61423 + .word 61424 + .word 61425 + .word 61426 + .word 61427 + .word 61428 + .word 61429 + .word 61430 + .word 61431 + .word 61432 + .word 61433 + .word 61434 + .word 61435 + .word 61436 + .word 61437 + .word 61438 + .word 61439 + .word 61440 + .word 61441 + .word 61442 + .word 61443 + .word 61444 + .word 61445 + .word 61446 + .word 61447 + .word 61448 + .word 61449 + .word 61450 + .word 61451 + .word 61452 + .word 61453 + .word 61454 + .word 61455 + .word 65505 + .word 65506 + .word 65507 + .word 65508 + .word 65509 + .word 65510 + .word 65511 + .word 65512 + .word 65513 + .word 65514 + .word 65515 + .word 65516 + .word 65517 + .word 65518 + .word 65519 + .word 65520 + .word 65521 + .word 65522 + .word 65523 + .word 65524 + .word 65525 + .word 65526 + .word 65527 + .word 65528 + .word 65529 + .word 65530 + .word 65531 + .word 65532 + .word 65533 + .word 65534 + .word 65535 + + ; hex values + .word $0 + .word $1 + .word $2 + .word $3 + .word $4 + .word $5 + .word $6 + .word $7 + .word $8 + .word $9 + .word $a + .word $b + .word $c + .word $d + .word $e + .word $f + .word $10 + .word $11 + .word $12 + .word $13 + .word $70 + .word $71 + .word $72 + .word $73 + .word $74 + .word $75 + .word $76 + .word $77 + .word $78 + .word $79 + .word $7a + .word $7b + .word $7c + .word $7d + .word $7e + .word $7f + .word $80 + .word $81 + .word $82 + .word $83 + .word $84 + .word $85 + .word $86 + .word $f0 + .word $f1 + .word $f2 + .word $f3 + .word $f4 + .word $f5 + .word $f6 + .word $f7 + .word $f8 + .word $f9 + .word $fa + .word $fb + .word $fc + .word $fd + .word $fe + .word $ff + .word $100 + .word $101 + .word $102 + .word $103 + .word $fd2 + .word $fd3 + .word $fd4 + .word $fd5 + .word $fd6 + .word $fd7 + .word $fd8 + .word $fd9 + .word $fda + .word $fdb + .word $fdc + .word $fdd + .word $fde + .word $fdf + .word $fe0 + .word $fe1 + .word $fe2 + .word $fe3 + .word $fe4 + .word $fe5 + .word $fe6 + .word $fe7 + .word $fe8 + .word $fe9 + .word $fea + .word $feb + .word $fec + .word $fed + .word $fee + .word $fef + .word $ff0 + .word $ff1 + .word $ff2 + .word $ff3 + .word $ff4 + .word $ff5 + .word $ff6 + .word $ff7 + .word $ff8 + .word $ff9 + .word $ffa + .word $ffb + .word $ffc + .word $ffd + .word $ffe + .word $fff + .word $1000 + .word $1001 + .word $1002 + .word $1003 + .word $1004 + .word $1005 + .word $1006 + .word $1007 + .word $1008 + .word $7ff0 + .word $7ff1 + .word $7ff2 + .word $7ff3 + .word $7ff4 + .word $7ff5 + .word $7ff6 + .word $7ff7 + .word $7ff8 + .word $7ff9 + .word $7ffa + .word $7ffb + .word $7ffc + .word $7ffd + .word $7ffe + .word $7fff + .word $8000 + .word $8001 + .word $8002 + .word $8003 + .word $8004 + .word $8005 + .word $8006 + .word $8007 + .word $8008 + .word $8009 + .word $800a + .word $800b + .word $9fe1 + .word $9fe2 + .word $9fe3 + .word $9fe4 + .word $9fe5 + .word $9fe6 + .word $9fe7 + .word $9fe8 + .word $9fe9 + .word $9fea + .word $9feb + .word $9fec + .word $9fed + .word $9fee + .word $9fef + .word $9ff0 + .word $9ff1 + .word $9ff2 + .word $9ff3 + .word $9ff4 + .word $9ff5 + .word $9ff6 + .word $9ff7 + .word $9ff8 + .word $9ff9 + .word $9ffa + .word $9ffb + .word $9ffc + .word $9ffd + .word $9ffe + .word $9fff + .word $a000 + .word $a001 + .word $a002 + .word $a003 + .word $a004 + .word $a005 + .word $a006 + .word $a007 + .word $a008 + .word $a009 + .word $a00a + .word $a00b + .word $a00c + .word $a00d + .word $a00e + .word $a00f + .word $afe1 + .word $afe2 + .word $afe3 + .word $afe4 + .word $afe5 + .word $afe6 + .word $afe7 + .word $afe8 + .word $afe9 + .word $afea + .word $afeb + .word $afec + .word $afed + .word $afee + .word $afef + .word $aff0 + .word $aff1 + .word $aff2 + .word $aff3 + .word $aff4 + .word $aff5 + .word $aff6 + .word $aff7 + .word $aff8 + .word $aff9 + .word $affa + .word $affb + .word $affc + .word $affd + .word $affe + .word $afff + .word $b000 + .word $b001 + .word $b002 + .word $b003 + .word $b004 + .word $b005 + .word $b006 + .word $b007 + .word $b008 + .word $b009 + .word $b00a + .word $b00b + .word $b00c + .word $b00d + .word $b00e + .word $b00f + .word $bfe1 + .word $bfe2 + .word $bfe3 + .word $bfe4 + .word $bfe5 + .word $bfe6 + .word $bfe7 + .word $bfe8 + .word $bfe9 + .word $bfea + .word $bfeb + .word $bfec + .word $bfed + .word $bfee + .word $bfef + .word $bff0 + .word $bff1 + .word $bff2 + .word $bff3 + .word $bff4 + .word $bff5 + .word $bff6 + .word $bff7 + .word $bff8 + .word $bff9 + .word $bffa + .word $bffb + .word $bffc + .word $bffd + .word $bffe + .word $bfff + .word $c000 + .word $c001 + .word $c002 + .word $c003 + .word $c004 + .word $c005 + .word $c006 + .word $c007 + .word $c008 + .word $c009 + .word $c00a + .word $c00b + .word $c00c + .word $c00d + .word $c00e + .word $c00f + .word $cfe1 + .word $cfe2 + .word $cfe3 + .word $cfe4 + .word $cfe5 + .word $cfe6 + .word $cfe7 + .word $cfe8 + .word $cfe9 + .word $cfea + .word $cfeb + .word $cfec + .word $cfed + .word $cfee + .word $cfef + .word $cff0 + .word $cff1 + .word $cff2 + .word $cff3 + .word $cff4 + .word $cff5 + .word $cff6 + .word $cff7 + .word $cff8 + .word $cff9 + .word $cffa + .word $cffb + .word $cffc + .word $cffd + .word $cffe + .word $cfff + .word $d000 + .word $d001 + .word $d002 + .word $d003 + .word $d004 + .word $d005 + .word $d006 + .word $d007 + .word $d008 + .word $d009 + .word $d00a + .word $d00b + .word $d00c + .word $d00d + .word $d00e + .word $d00f + .word $dfe1 + .word $dfe2 + .word $dfe3 + .word $dfe4 + .word $dfe5 + .word $dfe6 + .word $dfe7 + .word $dfe8 + .word $dfe9 + .word $dfea + .word $dfeb + .word $dfec + .word $dfed + .word $dfee + .word $dfef + .word $dff0 + .word $dff1 + .word $dff2 + .word $dff3 + .word $dff4 + .word $dff5 + .word $dff6 + .word $dff7 + .word $dff8 + .word $dff9 + .word $dffa + .word $dffb + .word $dffc + .word $dffd + .word $dffe + .word $dfff + .word $e000 + .word $e001 + .word $e002 + .word $e003 + .word $e004 + .word $e005 + .word $e006 + .word $e007 + .word $e008 + .word $e009 + .word $e00a + .word $e00b + .word $e00c + .word $e00d + .word $e00e + .word $e00f + .word $efe1 + .word $efe2 + .word $efe3 + .word $efe4 + .word $efe5 + .word $efe6 + .word $efe7 + .word $efe8 + .word $efe9 + .word $efea + .word $efeb + .word $efec + .word $efed + .word $efee + .word $efef + .word $eff0 + .word $eff1 + .word $eff2 + .word $eff3 + .word $eff4 + .word $eff5 + .word $eff6 + .word $eff7 + .word $eff8 + .word $eff9 + .word $effa + .word $effb + .word $effc + .word $effd + .word $effe + .word $efff + .word $f000 + .word $f001 + .word $f002 + .word $f003 + .word $f004 + .word $f005 + .word $f006 + .word $f007 + .word $f008 + .word $f009 + .word $f00a + .word $f00b + .word $f00c + .word $f00d + .word $f00e + .word $f00f + .word $ffe1 + .word $ffe2 + .word $ffe3 + .word $ffe4 + .word $ffe5 + .word $ffe6 + .word $ffe7 + .word $ffe8 + .word $ffe9 + .word $ffea + .word $ffeb + .word $ffec + .word $ffed + .word $ffee + .word $ffef + .word $fff0 + .word $fff1 + .word $fff2 + .word $fff3 + .word $fff4 + .word $fff5 + .word $fff6 + .word $fff7 + .word $fff8 + .word $fff9 + .word $fffa + .word $fffb + .word $fffc + .word $fffd + .word $fffe + .word $ffff + + ; hex values, uppercase + .word $0 + .word $1 + .word $2 + .word $3 + .word $4 + .word $5 + .word $6 + .word $7 + .word $8 + .word $9 + .word $A + .word $B + .word $C + .word $D + .word $E + .word $F + .word $10 + .word $11 + .word $12 + .word $13 + .word $70 + .word $71 + .word $72 + .word $73 + .word $74 + .word $75 + .word $76 + .word $77 + .word $78 + .word $79 + .word $7A + .word $7B + .word $7C + .word $7D + .word $7E + .word $7F + .word $80 + .word $81 + .word $82 + .word $83 + .word $84 + .word $85 + .word $86 + .word $F0 + .word $F1 + .word $F2 + .word $F3 + .word $F4 + .word $F5 + .word $F6 + .word $F7 + .word $F8 + .word $F9 + .word $FA + .word $FB + .word $FC + .word $FD + .word $FE + .word $FF + .word $100 + .word $101 + .word $102 + .word $103 + .word $FD2 + .word $FD3 + .word $FD4 + .word $FD5 + .word $FD6 + .word $FD7 + .word $FD8 + .word $FD9 + .word $FDA + .word $FDB + .word $FDC + .word $FDD + .word $FDE + .word $FDF + .word $FE0 + .word $FE1 + .word $FE2 + .word $FE3 + .word $FE4 + .word $FE5 + .word $FE6 + .word $FE7 + .word $FE8 + .word $FE9 + .word $FEA + .word $FEB + .word $FEC + .word $FED + .word $FEE + .word $FEF + .word $FF0 + .word $FF1 + .word $FF2 + .word $FF3 + .word $FF4 + .word $FF5 + .word $FF6 + .word $FF7 + .word $FF8 + .word $FF9 + .word $FFA + .word $FFB + .word $FFC + .word $FFD + .word $FFE + .word $FFF + .word $1000 + .word $1001 + .word $1002 + .word $1003 + .word $1004 + .word $1005 + .word $1006 + .word $1007 + .word $1008 + .word $7FF0 + .word $7FF1 + .word $7FF2 + .word $7FF3 + .word $7FF4 + .word $7FF5 + .word $7FF6 + .word $7FF7 + .word $7FF8 + .word $7FF9 + .word $7FFA + .word $7FFB + .word $7FFC + .word $7FFD + .word $7FFE + .word $7FFF + .word $8000 + .word $8001 + .word $8002 + .word $8003 + .word $8004 + .word $8005 + .word $8006 + .word $8007 + .word $8008 + .word $8009 + .word $800A + .word $800B + .word $9FE1 + .word $9FE2 + .word $9FE3 + .word $9FE4 + .word $9FE5 + .word $9FE6 + .word $9FE7 + .word $9FE8 + .word $9FE9 + .word $9FEA + .word $9FEB + .word $9FEC + .word $9FED + .word $9FEE + .word $9FEF + .word $9FF0 + .word $9FF1 + .word $9FF2 + .word $9FF3 + .word $9FF4 + .word $9FF5 + .word $9FF6 + .word $9FF7 + .word $9FF8 + .word $9FF9 + .word $9FFA + .word $9FFB + .word $9FFC + .word $9FFD + .word $9FFE + .word $9FFF + .word $A000 + .word $A001 + .word $A002 + .word $A003 + .word $A004 + .word $A005 + .word $A006 + .word $A007 + .word $A008 + .word $A009 + .word $A00A + .word $A00B + .word $A00C + .word $A00D + .word $A00E + .word $A00F + .word $AFE1 + .word $AFE2 + .word $AFE3 + .word $AFE4 + .word $AFE5 + .word $AFE6 + .word $AFE7 + .word $AFE8 + .word $AFE9 + .word $AFEA + .word $AFEB + .word $AFEC + .word $AFED + .word $AFEE + .word $AFEF + .word $AFF0 + .word $AFF1 + .word $AFF2 + .word $AFF3 + .word $AFF4 + .word $AFF5 + .word $AFF6 + .word $AFF7 + .word $AFF8 + .word $AFF9 + .word $AFFA + .word $AFFB + .word $AFFC + .word $AFFD + .word $AFFE + .word $AFFF + .word $B000 + .word $B001 + .word $B002 + .word $B003 + .word $B004 + .word $B005 + .word $B006 + .word $B007 + .word $B008 + .word $B009 + .word $B00A + .word $B00B + .word $B00C + .word $B00D + .word $B00E + .word $B00F + .word $BFE1 + .word $BFE2 + .word $BFE3 + .word $BFE4 + .word $BFE5 + .word $BFE6 + .word $BFE7 + .word $BFE8 + .word $BFE9 + .word $BFEA + .word $BFEB + .word $BFEC + .word $BFED + .word $BFEE + .word $BFEF + .word $BFF0 + .word $BFF1 + .word $BFF2 + .word $BFF3 + .word $BFF4 + .word $BFF5 + .word $BFF6 + .word $BFF7 + .word $BFF8 + .word $BFF9 + .word $BFFA + .word $BFFB + .word $BFFC + .word $BFFD + .word $BFFE + .word $BFFF + .word $C000 + .word $C001 + .word $C002 + .word $C003 + .word $C004 + .word $C005 + .word $C006 + .word $C007 + .word $C008 + .word $C009 + .word $C00A + .word $C00B + .word $C00C + .word $C00D + .word $C00E + .word $C00F + .word $CFE1 + .word $CFE2 + .word $CFE3 + .word $CFE4 + .word $CFE5 + .word $CFE6 + .word $CFE7 + .word $CFE8 + .word $CFE9 + .word $CFEA + .word $CFEB + .word $CFEC + .word $CFED + .word $CFEE + .word $CFEF + .word $CFF0 + .word $CFF1 + .word $CFF2 + .word $CFF3 + .word $CFF4 + .word $CFF5 + .word $CFF6 + .word $CFF7 + .word $CFF8 + .word $CFF9 + .word $CFFA + .word $CFFB + .word $CFFC + .word $CFFD + .word $CFFE + .word $CFFF + .word $D000 + .word $D001 + .word $D002 + .word $D003 + .word $D004 + .word $D005 + .word $D006 + .word $D007 + .word $D008 + .word $D009 + .word $D00A + .word $D00B + .word $D00C + .word $D00D + .word $D00E + .word $D00F + .word $DFE1 + .word $DFE2 + .word $DFE3 + .word $DFE4 + .word $DFE5 + .word $DFE6 + .word $DFE7 + .word $DFE8 + .word $DFE9 + .word $DFEA + .word $DFEB + .word $DFEC + .word $DFED + .word $DFEE + .word $DFEF + .word $DFF0 + .word $DFF1 + .word $DFF2 + .word $DFF3 + .word $DFF4 + .word $DFF5 + .word $DFF6 + .word $DFF7 + .word $DFF8 + .word $DFF9 + .word $DFFA + .word $DFFB + .word $DFFC + .word $DFFD + .word $DFFE + .word $DFFF + .word $E000 + .word $E001 + .word $E002 + .word $E003 + .word $E004 + .word $E005 + .word $E006 + .word $E007 + .word $E008 + .word $E009 + .word $E00A + .word $E00B + .word $E00C + .word $E00D + .word $E00E + .word $E00F + .word $EFE1 + .word $EFE2 + .word $EFE3 + .word $EFE4 + .word $EFE5 + .word $EFE6 + .word $EFE7 + .word $EFE8 + .word $EFE9 + .word $EFEA + .word $EFEB + .word $EFEC + .word $EFED + .word $EFEE + .word $EFEF + .word $EFF0 + .word $EFF1 + .word $EFF2 + .word $EFF3 + .word $EFF4 + .word $EFF5 + .word $EFF6 + .word $EFF7 + .word $EFF8 + .word $EFF9 + .word $EFFA + .word $EFFB + .word $EFFC + .word $EFFD + .word $EFFE + .word $EFFF + .word $F000 + .word $F001 + .word $F002 + .word $F003 + .word $F004 + .word $F005 + .word $F006 + .word $F007 + .word $F008 + .word $F009 + .word $F00A + .word $F00B + .word $F00C + .word $F00D + .word $F00E + .word $F00F + .word $FFE1 + .word $FFE2 + .word $FFE3 + .word $FFE4 + .word $FFE5 + .word $FFE6 + .word $FFE7 + .word $FFE8 + .word $FFE9 + .word $FFEA + .word $FFEB + .word $FFEC + .word $FFED + .word $FFEE + .word $FFEF + .word $FFF0 + .word $FFF1 + .word $FFF2 + .word $FFF3 + .word $FFF4 + .word $FFF5 + .word $FFF6 + .word $FFF7 + .word $FFF8 + .word $FFF9 + .word $FFFA + .word $FFFB + .word $FFFC + .word $FFFD + .word $FFFE + .word $FFFF + + ; 4-digit hex values + .word $0000 + .word $0001 + .word $0002 + .word $0003 + .word $0004 + .word $0005 + .word $0006 + .word $0007 + .word $0008 + .word $0009 + .word $000a + .word $000b + .word $000c + .word $000d + .word $000e + .word $000f + .word $0010 + .word $0011 + .word $0012 + .word $0013 + .word $0070 + .word $0071 + .word $0072 + .word $0073 + .word $0074 + .word $0075 + .word $0076 + .word $0077 + .word $0078 + .word $0079 + .word $007a + .word $007b + .word $007c + .word $007d + .word $007e + .word $007f + .word $0080 + .word $0081 + .word $0082 + .word $0083 + .word $0084 + .word $0085 + .word $0086 + .word $00f0 + .word $00f1 + .word $00f2 + .word $00f3 + .word $00f4 + .word $00f5 + .word $00f6 + .word $00f7 + .word $00f8 + .word $00f9 + .word $00fa + .word $00fb + .word $00fc + .word $00fd + .word $00fe + .word $00ff + .word $0100 + .word $0101 + .word $0102 + .word $0103 + .word $0fd2 + .word $0fd3 + .word $0fd4 + .word $0fd5 + .word $0fd6 + .word $0fd7 + .word $0fd8 + .word $0fd9 + .word $0fda + .word $0fdb + .word $0fdc + .word $0fdd + .word $0fde + .word $0fdf + .word $0fe0 + .word $0fe1 + .word $0fe2 + .word $0fe3 + .word $0fe4 + .word $0fe5 + .word $0fe6 + .word $0fe7 + .word $0fe8 + .word $0fe9 + .word $0fea + .word $0feb + .word $0fec + .word $0fed + .word $0fee + .word $0fef + .word $0ff0 + .word $0ff1 + .word $0ff2 + .word $0ff3 + .word $0ff4 + .word $0ff5 + .word $0ff6 + .word $0ff7 + .word $0ff8 + .word $0ff9 + .word $0ffa + .word $0ffb + .word $0ffc + .word $0ffd + .word $0ffe + .word $0fff + .word $1000 + .word $1001 + .word $1002 + .word $1003 + .word $1004 + .word $1005 + .word $1006 + .word $1007 + .word $1008 + .word $7ff0 + .word $7ff1 + .word $7ff2 + .word $7ff3 + .word $7ff4 + .word $7ff5 + .word $7ff6 + .word $7ff7 + .word $7ff8 + .word $7ff9 + .word $7ffa + .word $7ffb + .word $7ffc + .word $7ffd + .word $7ffe + .word $7fff + .word $8000 + .word $8001 + .word $8002 + .word $8003 + .word $8004 + .word $8005 + .word $8006 + .word $8007 + .word $8008 + .word $8009 + .word $800a + .word $800b + .word $9fe1 + .word $9fe2 + .word $9fe3 + .word $9fe4 + .word $9fe5 + .word $9fe6 + .word $9fe7 + .word $9fe8 + .word $9fe9 + .word $9fea + .word $9feb + .word $9fec + .word $9fed + .word $9fee + .word $9fef + .word $9ff0 + .word $9ff1 + .word $9ff2 + .word $9ff3 + .word $9ff4 + .word $9ff5 + .word $9ff6 + .word $9ff7 + .word $9ff8 + .word $9ff9 + .word $9ffa + .word $9ffb + .word $9ffc + .word $9ffd + .word $9ffe + .word $9fff + .word $a000 + .word $a001 + .word $a002 + .word $a003 + .word $a004 + .word $a005 + .word $a006 + .word $a007 + .word $a008 + .word $a009 + .word $a00a + .word $a00b + .word $a00c + .word $a00d + .word $a00e + .word $a00f + .word $afe1 + .word $afe2 + .word $afe3 + .word $afe4 + .word $afe5 + .word $afe6 + .word $afe7 + .word $afe8 + .word $afe9 + .word $afea + .word $afeb + .word $afec + .word $afed + .word $afee + .word $afef + .word $aff0 + .word $aff1 + .word $aff2 + .word $aff3 + .word $aff4 + .word $aff5 + .word $aff6 + .word $aff7 + .word $aff8 + .word $aff9 + .word $affa + .word $affb + .word $affc + .word $affd + .word $affe + .word $afff + .word $b000 + .word $b001 + .word $b002 + .word $b003 + .word $b004 + .word $b005 + .word $b006 + .word $b007 + .word $b008 + .word $b009 + .word $b00a + .word $b00b + .word $b00c + .word $b00d + .word $b00e + .word $b00f + .word $bfe1 + .word $bfe2 + .word $bfe3 + .word $bfe4 + .word $bfe5 + .word $bfe6 + .word $bfe7 + .word $bfe8 + .word $bfe9 + .word $bfea + .word $bfeb + .word $bfec + .word $bfed + .word $bfee + .word $bfef + .word $bff0 + .word $bff1 + .word $bff2 + .word $bff3 + .word $bff4 + .word $bff5 + .word $bff6 + .word $bff7 + .word $bff8 + .word $bff9 + .word $bffa + .word $bffb + .word $bffc + .word $bffd + .word $bffe + .word $bfff + .word $c000 + .word $c001 + .word $c002 + .word $c003 + .word $c004 + .word $c005 + .word $c006 + .word $c007 + .word $c008 + .word $c009 + .word $c00a + .word $c00b + .word $c00c + .word $c00d + .word $c00e + .word $c00f + .word $cfe1 + .word $cfe2 + .word $cfe3 + .word $cfe4 + .word $cfe5 + .word $cfe6 + .word $cfe7 + .word $cfe8 + .word $cfe9 + .word $cfea + .word $cfeb + .word $cfec + .word $cfed + .word $cfee + .word $cfef + .word $cff0 + .word $cff1 + .word $cff2 + .word $cff3 + .word $cff4 + .word $cff5 + .word $cff6 + .word $cff7 + .word $cff8 + .word $cff9 + .word $cffa + .word $cffb + .word $cffc + .word $cffd + .word $cffe + .word $cfff + .word $d000 + .word $d001 + .word $d002 + .word $d003 + .word $d004 + .word $d005 + .word $d006 + .word $d007 + .word $d008 + .word $d009 + .word $d00a + .word $d00b + .word $d00c + .word $d00d + .word $d00e + .word $d00f + .word $dfe1 + .word $dfe2 + .word $dfe3 + .word $dfe4 + .word $dfe5 + .word $dfe6 + .word $dfe7 + .word $dfe8 + .word $dfe9 + .word $dfea + .word $dfeb + .word $dfec + .word $dfed + .word $dfee + .word $dfef + .word $dff0 + .word $dff1 + .word $dff2 + .word $dff3 + .word $dff4 + .word $dff5 + .word $dff6 + .word $dff7 + .word $dff8 + .word $dff9 + .word $dffa + .word $dffb + .word $dffc + .word $dffd + .word $dffe + .word $dfff + .word $e000 + .word $e001 + .word $e002 + .word $e003 + .word $e004 + .word $e005 + .word $e006 + .word $e007 + .word $e008 + .word $e009 + .word $e00a + .word $e00b + .word $e00c + .word $e00d + .word $e00e + .word $e00f + .word $efe1 + .word $efe2 + .word $efe3 + .word $efe4 + .word $efe5 + .word $efe6 + .word $efe7 + .word $efe8 + .word $efe9 + .word $efea + .word $efeb + .word $efec + .word $efed + .word $efee + .word $efef + .word $eff0 + .word $eff1 + .word $eff2 + .word $eff3 + .word $eff4 + .word $eff5 + .word $eff6 + .word $eff7 + .word $eff8 + .word $eff9 + .word $effa + .word $effb + .word $effc + .word $effd + .word $effe + .word $efff + .word $f000 + .word $f001 + .word $f002 + .word $f003 + .word $f004 + .word $f005 + .word $f006 + .word $f007 + .word $f008 + .word $f009 + .word $f00a + .word $f00b + .word $f00c + .word $f00d + .word $f00e + .word $f00f + .word $ffe1 + .word $ffe2 + .word $ffe3 + .word $ffe4 + .word $ffe5 + .word $ffe6 + .word $ffe7 + .word $ffe8 + .word $ffe9 + .word $ffea + .word $ffeb + .word $ffec + .word $ffed + .word $ffee + .word $ffef + .word $fff0 + .word $fff1 + .word $fff2 + .word $fff3 + .word $fff4 + .word $fff5 + .word $fff6 + .word $fff7 + .word $fff8 + .word $fff9 + .word $fffa + .word $fffb + .word $fffc + .word $fffd + .word $fffe + .word $ffff + + ; 4-digit hex values, uppercase + .word $0000 + .word $0001 + .word $0002 + .word $0003 + .word $0004 + .word $0005 + .word $0006 + .word $0007 + .word $0008 + .word $0009 + .word $000A + .word $000B + .word $000C + .word $000D + .word $000E + .word $000F + .word $0010 + .word $0011 + .word $0012 + .word $0013 + .word $0070 + .word $0071 + .word $0072 + .word $0073 + .word $0074 + .word $0075 + .word $0076 + .word $0077 + .word $0078 + .word $0079 + .word $007A + .word $007B + .word $007C + .word $007D + .word $007E + .word $007F + .word $0080 + .word $0081 + .word $0082 + .word $0083 + .word $0084 + .word $0085 + .word $0086 + .word $00F0 + .word $00F1 + .word $00F2 + .word $00F3 + .word $00F4 + .word $00F5 + .word $00F6 + .word $00F7 + .word $00F8 + .word $00F9 + .word $00FA + .word $00FB + .word $00FC + .word $00FD + .word $00FE + .word $00FF + .word $0100 + .word $0101 + .word $0102 + .word $0103 + .word $0FD2 + .word $0FD3 + .word $0FD4 + .word $0FD5 + .word $0FD6 + .word $0FD7 + .word $0FD8 + .word $0FD9 + .word $0FDA + .word $0FDB + .word $0FDC + .word $0FDD + .word $0FDE + .word $0FDF + .word $0FE0 + .word $0FE1 + .word $0FE2 + .word $0FE3 + .word $0FE4 + .word $0FE5 + .word $0FE6 + .word $0FE7 + .word $0FE8 + .word $0FE9 + .word $0FEA + .word $0FEB + .word $0FEC + .word $0FED + .word $0FEE + .word $0FEF + .word $0FF0 + .word $0FF1 + .word $0FF2 + .word $0FF3 + .word $0FF4 + .word $0FF5 + .word $0FF6 + .word $0FF7 + .word $0FF8 + .word $0FF9 + .word $0FFA + .word $0FFB + .word $0FFC + .word $0FFD + .word $0FFE + .word $0FFF + .word $1000 + .word $1001 + .word $1002 + .word $1003 + .word $1004 + .word $1005 + .word $1006 + .word $1007 + .word $1008 + .word $7FF0 + .word $7FF1 + .word $7FF2 + .word $7FF3 + .word $7FF4 + .word $7FF5 + .word $7FF6 + .word $7FF7 + .word $7FF8 + .word $7FF9 + .word $7FFA + .word $7FFB + .word $7FFC + .word $7FFD + .word $7FFE + .word $7FFF + .word $8000 + .word $8001 + .word $8002 + .word $8003 + .word $8004 + .word $8005 + .word $8006 + .word $8007 + .word $8008 + .word $8009 + .word $800A + .word $800B + .word $9FE1 + .word $9FE2 + .word $9FE3 + .word $9FE4 + .word $9FE5 + .word $9FE6 + .word $9FE7 + .word $9FE8 + .word $9FE9 + .word $9FEA + .word $9FEB + .word $9FEC + .word $9FED + .word $9FEE + .word $9FEF + .word $9FF0 + .word $9FF1 + .word $9FF2 + .word $9FF3 + .word $9FF4 + .word $9FF5 + .word $9FF6 + .word $9FF7 + .word $9FF8 + .word $9FF9 + .word $9FFA + .word $9FFB + .word $9FFC + .word $9FFD + .word $9FFE + .word $9FFF + .word $A000 + .word $A001 + .word $A002 + .word $A003 + .word $A004 + .word $A005 + .word $A006 + .word $A007 + .word $A008 + .word $A009 + .word $A00A + .word $A00B + .word $A00C + .word $A00D + .word $A00E + .word $A00F + .word $AFE1 + .word $AFE2 + .word $AFE3 + .word $AFE4 + .word $AFE5 + .word $AFE6 + .word $AFE7 + .word $AFE8 + .word $AFE9 + .word $AFEA + .word $AFEB + .word $AFEC + .word $AFED + .word $AFEE + .word $AFEF + .word $AFF0 + .word $AFF1 + .word $AFF2 + .word $AFF3 + .word $AFF4 + .word $AFF5 + .word $AFF6 + .word $AFF7 + .word $AFF8 + .word $AFF9 + .word $AFFA + .word $AFFB + .word $AFFC + .word $AFFD + .word $AFFE + .word $AFFF + .word $B000 + .word $B001 + .word $B002 + .word $B003 + .word $B004 + .word $B005 + .word $B006 + .word $B007 + .word $B008 + .word $B009 + .word $B00A + .word $B00B + .word $B00C + .word $B00D + .word $B00E + .word $B00F + .word $BFE1 + .word $BFE2 + .word $BFE3 + .word $BFE4 + .word $BFE5 + .word $BFE6 + .word $BFE7 + .word $BFE8 + .word $BFE9 + .word $BFEA + .word $BFEB + .word $BFEC + .word $BFED + .word $BFEE + .word $BFEF + .word $BFF0 + .word $BFF1 + .word $BFF2 + .word $BFF3 + .word $BFF4 + .word $BFF5 + .word $BFF6 + .word $BFF7 + .word $BFF8 + .word $BFF9 + .word $BFFA + .word $BFFB + .word $BFFC + .word $BFFD + .word $BFFE + .word $BFFF + .word $C000 + .word $C001 + .word $C002 + .word $C003 + .word $C004 + .word $C005 + .word $C006 + .word $C007 + .word $C008 + .word $C009 + .word $C00A + .word $C00B + .word $C00C + .word $C00D + .word $C00E + .word $C00F + .word $CFE1 + .word $CFE2 + .word $CFE3 + .word $CFE4 + .word $CFE5 + .word $CFE6 + .word $CFE7 + .word $CFE8 + .word $CFE9 + .word $CFEA + .word $CFEB + .word $CFEC + .word $CFED + .word $CFEE + .word $CFEF + .word $CFF0 + .word $CFF1 + .word $CFF2 + .word $CFF3 + .word $CFF4 + .word $CFF5 + .word $CFF6 + .word $CFF7 + .word $CFF8 + .word $CFF9 + .word $CFFA + .word $CFFB + .word $CFFC + .word $CFFD + .word $CFFE + .word $CFFF + .word $D000 + .word $D001 + .word $D002 + .word $D003 + .word $D004 + .word $D005 + .word $D006 + .word $D007 + .word $D008 + .word $D009 + .word $D00A + .word $D00B + .word $D00C + .word $D00D + .word $D00E + .word $D00F + .word $DFE1 + .word $DFE2 + .word $DFE3 + .word $DFE4 + .word $DFE5 + .word $DFE6 + .word $DFE7 + .word $DFE8 + .word $DFE9 + .word $DFEA + .word $DFEB + .word $DFEC + .word $DFED + .word $DFEE + .word $DFEF + .word $DFF0 + .word $DFF1 + .word $DFF2 + .word $DFF3 + .word $DFF4 + .word $DFF5 + .word $DFF6 + .word $DFF7 + .word $DFF8 + .word $DFF9 + .word $DFFA + .word $DFFB + .word $DFFC + .word $DFFD + .word $DFFE + .word $DFFF + .word $E000 + .word $E001 + .word $E002 + .word $E003 + .word $E004 + .word $E005 + .word $E006 + .word $E007 + .word $E008 + .word $E009 + .word $E00A + .word $E00B + .word $E00C + .word $E00D + .word $E00E + .word $E00F + .word $EFE1 + .word $EFE2 + .word $EFE3 + .word $EFE4 + .word $EFE5 + .word $EFE6 + .word $EFE7 + .word $EFE8 + .word $EFE9 + .word $EFEA + .word $EFEB + .word $EFEC + .word $EFED + .word $EFEE + .word $EFEF + .word $EFF0 + .word $EFF1 + .word $EFF2 + .word $EFF3 + .word $EFF4 + .word $EFF5 + .word $EFF6 + .word $EFF7 + .word $EFF8 + .word $EFF9 + .word $EFFA + .word $EFFB + .word $EFFC + .word $EFFD + .word $EFFE + .word $EFFF + .word $F000 + .word $F001 + .word $F002 + .word $F003 + .word $F004 + .word $F005 + .word $F006 + .word $F007 + .word $F008 + .word $F009 + .word $F00A + .word $F00B + .word $F00C + .word $F00D + .word $F00E + .word $F00F + .word $FFE1 + .word $FFE2 + .word $FFE3 + .word $FFE4 + .word $FFE5 + .word $FFE6 + .word $FFE7 + .word $FFE8 + .word $FFE9 + .word $FFEA + .word $FFEB + .word $FFEC + .word $FFED + .word $FFEE + .word $FFEF + .word $FFF0 + .word $FFF1 + .word $FFF2 + .word $FFF3 + .word $FFF4 + .word $FFF5 + .word $FFF6 + .word $FFF7 + .word $FFF8 + .word $FFF9 + .word $FFFA + .word $FFFB + .word $FFFC + .word $FFFD + .word $FFFE + .word $FFFF + + ; alternative hex values + .word 0h + .word 1h + .word 2h + .word 3h + .word 4h + .word 5h + .word 6h + .word 7h + .word 8h + .word 9h + .word 0ah + .word 0bh + .word 0ch + .word 0dh + .word 0eh + .word 0fh + .word 10h + .word 11h + .word 12h + .word 13h + .word 70h + .word 71h + .word 72h + .word 73h + .word 74h + .word 75h + .word 76h + .word 77h + .word 78h + .word 79h + .word 7ah + .word 7bh + .word 7ch + .word 7dh + .word 7eh + .word 7fh + .word 80h + .word 81h + .word 82h + .word 83h + .word 84h + .word 85h + .word 86h + .word 0f0h + .word 0f1h + .word 0f2h + .word 0f3h + .word 0f4h + .word 0f5h + .word 0f6h + .word 0f7h + .word 0f8h + .word 0f9h + .word 0fah + .word 0fbh + .word 0fch + .word 0fdh + .word 0feh + .word 0ffh + .word 100h + .word 101h + .word 102h + .word 103h + .word 0fd2h + .word 0fd3h + .word 0fd4h + .word 0fd5h + .word 0fd6h + .word 0fd7h + .word 0fd8h + .word 0fd9h + .word 0fdah + .word 0fdbh + .word 0fdch + .word 0fddh + .word 0fdeh + .word 0fdfh + .word 0fe0h + .word 0fe1h + .word 0fe2h + .word 0fe3h + .word 0fe4h + .word 0fe5h + .word 0fe6h + .word 0fe7h + .word 0fe8h + .word 0fe9h + .word 0feah + .word 0febh + .word 0fech + .word 0fedh + .word 0feeh + .word 0fefh + .word 0ff0h + .word 0ff1h + .word 0ff2h + .word 0ff3h + .word 0ff4h + .word 0ff5h + .word 0ff6h + .word 0ff7h + .word 0ff8h + .word 0ff9h + .word 0ffah + .word 0ffbh + .word 0ffch + .word 0ffdh + .word 0ffeh + .word 0fffh + .word 1000h + .word 1001h + .word 1002h + .word 1003h + .word 1004h + .word 1005h + .word 1006h + .word 1007h + .word 1008h + .word 7ff0h + .word 7ff1h + .word 7ff2h + .word 7ff3h + .word 7ff4h + .word 7ff5h + .word 7ff6h + .word 7ff7h + .word 7ff8h + .word 7ff9h + .word 7ffah + .word 7ffbh + .word 7ffch + .word 7ffdh + .word 7ffeh + .word 7fffh + .word 8000h + .word 8001h + .word 8002h + .word 8003h + .word 8004h + .word 8005h + .word 8006h + .word 8007h + .word 8008h + .word 8009h + .word 800ah + .word 800bh + .word 9fe1h + .word 9fe2h + .word 9fe3h + .word 9fe4h + .word 9fe5h + .word 9fe6h + .word 9fe7h + .word 9fe8h + .word 9fe9h + .word 9feah + .word 9febh + .word 9fech + .word 9fedh + .word 9feeh + .word 9fefh + .word 9ff0h + .word 9ff1h + .word 9ff2h + .word 9ff3h + .word 9ff4h + .word 9ff5h + .word 9ff6h + .word 9ff7h + .word 9ff8h + .word 9ff9h + .word 9ffah + .word 9ffbh + .word 9ffch + .word 9ffdh + .word 9ffeh + .word 9fffh + .word 0a000h + .word 0a001h + .word 0a002h + .word 0a003h + .word 0a004h + .word 0a005h + .word 0a006h + .word 0a007h + .word 0a008h + .word 0a009h + .word 0a00ah + .word 0a00bh + .word 0a00ch + .word 0a00dh + .word 0a00eh + .word 0a00fh + .word 0afe1h + .word 0afe2h + .word 0afe3h + .word 0afe4h + .word 0afe5h + .word 0afe6h + .word 0afe7h + .word 0afe8h + .word 0afe9h + .word 0afeah + .word 0afebh + .word 0afech + .word 0afedh + .word 0afeeh + .word 0afefh + .word 0aff0h + .word 0aff1h + .word 0aff2h + .word 0aff3h + .word 0aff4h + .word 0aff5h + .word 0aff6h + .word 0aff7h + .word 0aff8h + .word 0aff9h + .word 0affah + .word 0affbh + .word 0affch + .word 0affdh + .word 0affeh + .word 0afffh + .word 0b000h + .word 0b001h + .word 0b002h + .word 0b003h + .word 0b004h + .word 0b005h + .word 0b006h + .word 0b007h + .word 0b008h + .word 0b009h + .word 0b00ah + .word 0b00bh + .word 0b00ch + .word 0b00dh + .word 0b00eh + .word 0b00fh + .word 0bfe1h + .word 0bfe2h + .word 0bfe3h + .word 0bfe4h + .word 0bfe5h + .word 0bfe6h + .word 0bfe7h + .word 0bfe8h + .word 0bfe9h + .word 0bfeah + .word 0bfebh + .word 0bfech + .word 0bfedh + .word 0bfeeh + .word 0bfefh + .word 0bff0h + .word 0bff1h + .word 0bff2h + .word 0bff3h + .word 0bff4h + .word 0bff5h + .word 0bff6h + .word 0bff7h + .word 0bff8h + .word 0bff9h + .word 0bffah + .word 0bffbh + .word 0bffch + .word 0bffdh + .word 0bffeh + .word 0bfffh + .word 0c000h + .word 0c001h + .word 0c002h + .word 0c003h + .word 0c004h + .word 0c005h + .word 0c006h + .word 0c007h + .word 0c008h + .word 0c009h + .word 0c00ah + .word 0c00bh + .word 0c00ch + .word 0c00dh + .word 0c00eh + .word 0c00fh + .word 0cfe1h + .word 0cfe2h + .word 0cfe3h + .word 0cfe4h + .word 0cfe5h + .word 0cfe6h + .word 0cfe7h + .word 0cfe8h + .word 0cfe9h + .word 0cfeah + .word 0cfebh + .word 0cfech + .word 0cfedh + .word 0cfeeh + .word 0cfefh + .word 0cff0h + .word 0cff1h + .word 0cff2h + .word 0cff3h + .word 0cff4h + .word 0cff5h + .word 0cff6h + .word 0cff7h + .word 0cff8h + .word 0cff9h + .word 0cffah + .word 0cffbh + .word 0cffch + .word 0cffdh + .word 0cffeh + .word 0cfffh + .word 0d000h + .word 0d001h + .word 0d002h + .word 0d003h + .word 0d004h + .word 0d005h + .word 0d006h + .word 0d007h + .word 0d008h + .word 0d009h + .word 0d00ah + .word 0d00bh + .word 0d00ch + .word 0d00dh + .word 0d00eh + .word 0d00fh + .word 0dfe1h + .word 0dfe2h + .word 0dfe3h + .word 0dfe4h + .word 0dfe5h + .word 0dfe6h + .word 0dfe7h + .word 0dfe8h + .word 0dfe9h + .word 0dfeah + .word 0dfebh + .word 0dfech + .word 0dfedh + .word 0dfeeh + .word 0dfefh + .word 0dff0h + .word 0dff1h + .word 0dff2h + .word 0dff3h + .word 0dff4h + .word 0dff5h + .word 0dff6h + .word 0dff7h + .word 0dff8h + .word 0dff9h + .word 0dffah + .word 0dffbh + .word 0dffch + .word 0dffdh + .word 0dffeh + .word 0dfffh + .word 0e000h + .word 0e001h + .word 0e002h + .word 0e003h + .word 0e004h + .word 0e005h + .word 0e006h + .word 0e007h + .word 0e008h + .word 0e009h + .word 0e00ah + .word 0e00bh + .word 0e00ch + .word 0e00dh + .word 0e00eh + .word 0e00fh + .word 0efe1h + .word 0efe2h + .word 0efe3h + .word 0efe4h + .word 0efe5h + .word 0efe6h + .word 0efe7h + .word 0efe8h + .word 0efe9h + .word 0efeah + .word 0efebh + .word 0efech + .word 0efedh + .word 0efeeh + .word 0efefh + .word 0eff0h + .word 0eff1h + .word 0eff2h + .word 0eff3h + .word 0eff4h + .word 0eff5h + .word 0eff6h + .word 0eff7h + .word 0eff8h + .word 0eff9h + .word 0effah + .word 0effbh + .word 0effch + .word 0effdh + .word 0effeh + .word 0efffh + .word 0f000h + .word 0f001h + .word 0f002h + .word 0f003h + .word 0f004h + .word 0f005h + .word 0f006h + .word 0f007h + .word 0f008h + .word 0f009h + .word 0f00ah + .word 0f00bh + .word 0f00ch + .word 0f00dh + .word 0f00eh + .word 0f00fh + .word 0ffe1h + .word 0ffe2h + .word 0ffe3h + .word 0ffe4h + .word 0ffe5h + .word 0ffe6h + .word 0ffe7h + .word 0ffe8h + .word 0ffe9h + .word 0ffeah + .word 0ffebh + .word 0ffech + .word 0ffedh + .word 0ffeeh + .word 0ffefh + .word 0fff0h + .word 0fff1h + .word 0fff2h + .word 0fff3h + .word 0fff4h + .word 0fff5h + .word 0fff6h + .word 0fff7h + .word 0fff8h + .word 0fff9h + .word 0fffah + .word 0fffbh + .word 0fffch + .word 0fffdh + .word 0fffeh + .word 0ffffh + + ; alternative hex values, uppercase + .word 0h + .word 1h + .word 2h + .word 3h + .word 4h + .word 5h + .word 6h + .word 7h + .word 8h + .word 9h + .word 0Ah + .word 0Bh + .word 0Ch + .word 0Dh + .word 0Eh + .word 0Fh + .word 10h + .word 11h + .word 12h + .word 13h + .word 70h + .word 71h + .word 72h + .word 73h + .word 74h + .word 75h + .word 76h + .word 77h + .word 78h + .word 79h + .word 7Ah + .word 7Bh + .word 7Ch + .word 7Dh + .word 7Eh + .word 7Fh + .word 80h + .word 81h + .word 82h + .word 83h + .word 84h + .word 85h + .word 86h + .word 0F0h + .word 0F1h + .word 0F2h + .word 0F3h + .word 0F4h + .word 0F5h + .word 0F6h + .word 0F7h + .word 0F8h + .word 0F9h + .word 0FAh + .word 0FBh + .word 0FCh + .word 0FDh + .word 0FEh + .word 0FFh + .word 100h + .word 101h + .word 102h + .word 103h + .word 0FD2h + .word 0FD3h + .word 0FD4h + .word 0FD5h + .word 0FD6h + .word 0FD7h + .word 0FD8h + .word 0FD9h + .word 0FDAh + .word 0FDBh + .word 0FDCh + .word 0FDDh + .word 0FDEh + .word 0FDFh + .word 0FE0h + .word 0FE1h + .word 0FE2h + .word 0FE3h + .word 0FE4h + .word 0FE5h + .word 0FE6h + .word 0FE7h + .word 0FE8h + .word 0FE9h + .word 0FEAh + .word 0FEBh + .word 0FECh + .word 0FEDh + .word 0FEEh + .word 0FEFh + .word 0FF0h + .word 0FF1h + .word 0FF2h + .word 0FF3h + .word 0FF4h + .word 0FF5h + .word 0FF6h + .word 0FF7h + .word 0FF8h + .word 0FF9h + .word 0FFAh + .word 0FFBh + .word 0FFCh + .word 0FFDh + .word 0FFEh + .word 0FFFh + .word 1000h + .word 1001h + .word 1002h + .word 1003h + .word 1004h + .word 1005h + .word 1006h + .word 1007h + .word 1008h + .word 7FF0h + .word 7FF1h + .word 7FF2h + .word 7FF3h + .word 7FF4h + .word 7FF5h + .word 7FF6h + .word 7FF7h + .word 7FF8h + .word 7FF9h + .word 7FFAh + .word 7FFBh + .word 7FFCh + .word 7FFDh + .word 7FFEh + .word 7FFFh + .word 8000h + .word 8001h + .word 8002h + .word 8003h + .word 8004h + .word 8005h + .word 8006h + .word 8007h + .word 8008h + .word 8009h + .word 800Ah + .word 800Bh + .word 9FE1h + .word 9FE2h + .word 9FE3h + .word 9FE4h + .word 9FE5h + .word 9FE6h + .word 9FE7h + .word 9FE8h + .word 9FE9h + .word 9FEAh + .word 9FEBh + .word 9FECh + .word 9FEDh + .word 9FEEh + .word 9FEFh + .word 9FF0h + .word 9FF1h + .word 9FF2h + .word 9FF3h + .word 9FF4h + .word 9FF5h + .word 9FF6h + .word 9FF7h + .word 9FF8h + .word 9FF9h + .word 9FFAh + .word 9FFBh + .word 9FFCh + .word 9FFDh + .word 9FFEh + .word 9FFFh + .word 0A000h + .word 0A001h + .word 0A002h + .word 0A003h + .word 0A004h + .word 0A005h + .word 0A006h + .word 0A007h + .word 0A008h + .word 0A009h + .word 0A00Ah + .word 0A00Bh + .word 0A00Ch + .word 0A00Dh + .word 0A00Eh + .word 0A00Fh + .word 0AFE1h + .word 0AFE2h + .word 0AFE3h + .word 0AFE4h + .word 0AFE5h + .word 0AFE6h + .word 0AFE7h + .word 0AFE8h + .word 0AFE9h + .word 0AFEAh + .word 0AFEBh + .word 0AFECh + .word 0AFEDh + .word 0AFEEh + .word 0AFEFh + .word 0AFF0h + .word 0AFF1h + .word 0AFF2h + .word 0AFF3h + .word 0AFF4h + .word 0AFF5h + .word 0AFF6h + .word 0AFF7h + .word 0AFF8h + .word 0AFF9h + .word 0AFFAh + .word 0AFFBh + .word 0AFFCh + .word 0AFFDh + .word 0AFFEh + .word 0AFFFh + .word 0B000h + .word 0B001h + .word 0B002h + .word 0B003h + .word 0B004h + .word 0B005h + .word 0B006h + .word 0B007h + .word 0B008h + .word 0B009h + .word 0B00Ah + .word 0B00Bh + .word 0B00Ch + .word 0B00Dh + .word 0B00Eh + .word 0B00Fh + .word 0BFE1h + .word 0BFE2h + .word 0BFE3h + .word 0BFE4h + .word 0BFE5h + .word 0BFE6h + .word 0BFE7h + .word 0BFE8h + .word 0BFE9h + .word 0BFEAh + .word 0BFEBh + .word 0BFECh + .word 0BFEDh + .word 0BFEEh + .word 0BFEFh + .word 0BFF0h + .word 0BFF1h + .word 0BFF2h + .word 0BFF3h + .word 0BFF4h + .word 0BFF5h + .word 0BFF6h + .word 0BFF7h + .word 0BFF8h + .word 0BFF9h + .word 0BFFAh + .word 0BFFBh + .word 0BFFCh + .word 0BFFDh + .word 0BFFEh + .word 0BFFFh + .word 0C000h + .word 0C001h + .word 0C002h + .word 0C003h + .word 0C004h + .word 0C005h + .word 0C006h + .word 0C007h + .word 0C008h + .word 0C009h + .word 0C00Ah + .word 0C00Bh + .word 0C00Ch + .word 0C00Dh + .word 0C00Eh + .word 0C00Fh + .word 0CFE1h + .word 0CFE2h + .word 0CFE3h + .word 0CFE4h + .word 0CFE5h + .word 0CFE6h + .word 0CFE7h + .word 0CFE8h + .word 0CFE9h + .word 0CFEAh + .word 0CFEBh + .word 0CFECh + .word 0CFEDh + .word 0CFEEh + .word 0CFEFh + .word 0CFF0h + .word 0CFF1h + .word 0CFF2h + .word 0CFF3h + .word 0CFF4h + .word 0CFF5h + .word 0CFF6h + .word 0CFF7h + .word 0CFF8h + .word 0CFF9h + .word 0CFFAh + .word 0CFFBh + .word 0CFFCh + .word 0CFFDh + .word 0CFFEh + .word 0CFFFh + .word 0D000h + .word 0D001h + .word 0D002h + .word 0D003h + .word 0D004h + .word 0D005h + .word 0D006h + .word 0D007h + .word 0D008h + .word 0D009h + .word 0D00Ah + .word 0D00Bh + .word 0D00Ch + .word 0D00Dh + .word 0D00Eh + .word 0D00Fh + .word 0DFE1h + .word 0DFE2h + .word 0DFE3h + .word 0DFE4h + .word 0DFE5h + .word 0DFE6h + .word 0DFE7h + .word 0DFE8h + .word 0DFE9h + .word 0DFEAh + .word 0DFEBh + .word 0DFECh + .word 0DFEDh + .word 0DFEEh + .word 0DFEFh + .word 0DFF0h + .word 0DFF1h + .word 0DFF2h + .word 0DFF3h + .word 0DFF4h + .word 0DFF5h + .word 0DFF6h + .word 0DFF7h + .word 0DFF8h + .word 0DFF9h + .word 0DFFAh + .word 0DFFBh + .word 0DFFCh + .word 0DFFDh + .word 0DFFEh + .word 0DFFFh + .word 0E000h + .word 0E001h + .word 0E002h + .word 0E003h + .word 0E004h + .word 0E005h + .word 0E006h + .word 0E007h + .word 0E008h + .word 0E009h + .word 0E00Ah + .word 0E00Bh + .word 0E00Ch + .word 0E00Dh + .word 0E00Eh + .word 0E00Fh + .word 0EFE1h + .word 0EFE2h + .word 0EFE3h + .word 0EFE4h + .word 0EFE5h + .word 0EFE6h + .word 0EFE7h + .word 0EFE8h + .word 0EFE9h + .word 0EFEAh + .word 0EFEBh + .word 0EFECh + .word 0EFEDh + .word 0EFEEh + .word 0EFEFh + .word 0EFF0h + .word 0EFF1h + .word 0EFF2h + .word 0EFF3h + .word 0EFF4h + .word 0EFF5h + .word 0EFF6h + .word 0EFF7h + .word 0EFF8h + .word 0EFF9h + .word 0EFFAh + .word 0EFFBh + .word 0EFFCh + .word 0EFFDh + .word 0EFFEh + .word 0EFFFh + .word 0F000h + .word 0F001h + .word 0F002h + .word 0F003h + .word 0F004h + .word 0F005h + .word 0F006h + .word 0F007h + .word 0F008h + .word 0F009h + .word 0F00Ah + .word 0F00Bh + .word 0F00Ch + .word 0F00Dh + .word 0F00Eh + .word 0F00Fh + .word 0FFE1h + .word 0FFE2h + .word 0FFE3h + .word 0FFE4h + .word 0FFE5h + .word 0FFE6h + .word 0FFE7h + .word 0FFE8h + .word 0FFE9h + .word 0FFEAh + .word 0FFEBh + .word 0FFECh + .word 0FFEDh + .word 0FFEEh + .word 0FFEFh + .word 0FFF0h + .word 0FFF1h + .word 0FFF2h + .word 0FFF3h + .word 0FFF4h + .word 0FFF5h + .word 0FFF6h + .word 0FFF7h + .word 0FFF8h + .word 0FFF9h + .word 0FFFAh + .word 0FFFBh + .word 0FFFCh + .word 0FFFDh + .word 0FFFEh + .word 0FFFFh + + ; alternative 4-digit hex values + .word 0000h + .word 0001h + .word 0002h + .word 0003h + .word 0004h + .word 0005h + .word 0006h + .word 0007h + .word 0008h + .word 0009h + .word 000ah + .word 000bh + .word 000ch + .word 000dh + .word 000eh + .word 000fh + .word 0010h + .word 0011h + .word 0012h + .word 0013h + .word 0070h + .word 0071h + .word 0072h + .word 0073h + .word 0074h + .word 0075h + .word 0076h + .word 0077h + .word 0078h + .word 0079h + .word 007ah + .word 007bh + .word 007ch + .word 007dh + .word 007eh + .word 007fh + .word 0080h + .word 0081h + .word 0082h + .word 0083h + .word 0084h + .word 0085h + .word 0086h + .word 00f0h + .word 00f1h + .word 00f2h + .word 00f3h + .word 00f4h + .word 00f5h + .word 00f6h + .word 00f7h + .word 00f8h + .word 00f9h + .word 00fah + .word 00fbh + .word 00fch + .word 00fdh + .word 00feh + .word 00ffh + .word 0100h + .word 0101h + .word 0102h + .word 0103h + .word 0fd2h + .word 0fd3h + .word 0fd4h + .word 0fd5h + .word 0fd6h + .word 0fd7h + .word 0fd8h + .word 0fd9h + .word 0fdah + .word 0fdbh + .word 0fdch + .word 0fddh + .word 0fdeh + .word 0fdfh + .word 0fe0h + .word 0fe1h + .word 0fe2h + .word 0fe3h + .word 0fe4h + .word 0fe5h + .word 0fe6h + .word 0fe7h + .word 0fe8h + .word 0fe9h + .word 0feah + .word 0febh + .word 0fech + .word 0fedh + .word 0feeh + .word 0fefh + .word 0ff0h + .word 0ff1h + .word 0ff2h + .word 0ff3h + .word 0ff4h + .word 0ff5h + .word 0ff6h + .word 0ff7h + .word 0ff8h + .word 0ff9h + .word 0ffah + .word 0ffbh + .word 0ffch + .word 0ffdh + .word 0ffeh + .word 0fffh + .word 1000h + .word 1001h + .word 1002h + .word 1003h + .word 1004h + .word 1005h + .word 1006h + .word 1007h + .word 1008h + .word 7ff0h + .word 7ff1h + .word 7ff2h + .word 7ff3h + .word 7ff4h + .word 7ff5h + .word 7ff6h + .word 7ff7h + .word 7ff8h + .word 7ff9h + .word 7ffah + .word 7ffbh + .word 7ffch + .word 7ffdh + .word 7ffeh + .word 7fffh + .word 8000h + .word 8001h + .word 8002h + .word 8003h + .word 8004h + .word 8005h + .word 8006h + .word 8007h + .word 8008h + .word 8009h + .word 800ah + .word 800bh + .word 9fe1h + .word 9fe2h + .word 9fe3h + .word 9fe4h + .word 9fe5h + .word 9fe6h + .word 9fe7h + .word 9fe8h + .word 9fe9h + .word 9feah + .word 9febh + .word 9fech + .word 9fedh + .word 9feeh + .word 9fefh + .word 9ff0h + .word 9ff1h + .word 9ff2h + .word 9ff3h + .word 9ff4h + .word 9ff5h + .word 9ff6h + .word 9ff7h + .word 9ff8h + .word 9ff9h + .word 9ffah + .word 9ffbh + .word 9ffch + .word 9ffdh + .word 9ffeh + .word 9fffh + .word 0a000h + .word 0a001h + .word 0a002h + .word 0a003h + .word 0a004h + .word 0a005h + .word 0a006h + .word 0a007h + .word 0a008h + .word 0a009h + .word 0a00ah + .word 0a00bh + .word 0a00ch + .word 0a00dh + .word 0a00eh + .word 0a00fh + .word 0afe1h + .word 0afe2h + .word 0afe3h + .word 0afe4h + .word 0afe5h + .word 0afe6h + .word 0afe7h + .word 0afe8h + .word 0afe9h + .word 0afeah + .word 0afebh + .word 0afech + .word 0afedh + .word 0afeeh + .word 0afefh + .word 0aff0h + .word 0aff1h + .word 0aff2h + .word 0aff3h + .word 0aff4h + .word 0aff5h + .word 0aff6h + .word 0aff7h + .word 0aff8h + .word 0aff9h + .word 0affah + .word 0affbh + .word 0affch + .word 0affdh + .word 0affeh + .word 0afffh + .word 0b000h + .word 0b001h + .word 0b002h + .word 0b003h + .word 0b004h + .word 0b005h + .word 0b006h + .word 0b007h + .word 0b008h + .word 0b009h + .word 0b00ah + .word 0b00bh + .word 0b00ch + .word 0b00dh + .word 0b00eh + .word 0b00fh + .word 0bfe1h + .word 0bfe2h + .word 0bfe3h + .word 0bfe4h + .word 0bfe5h + .word 0bfe6h + .word 0bfe7h + .word 0bfe8h + .word 0bfe9h + .word 0bfeah + .word 0bfebh + .word 0bfech + .word 0bfedh + .word 0bfeeh + .word 0bfefh + .word 0bff0h + .word 0bff1h + .word 0bff2h + .word 0bff3h + .word 0bff4h + .word 0bff5h + .word 0bff6h + .word 0bff7h + .word 0bff8h + .word 0bff9h + .word 0bffah + .word 0bffbh + .word 0bffch + .word 0bffdh + .word 0bffeh + .word 0bfffh + .word 0c000h + .word 0c001h + .word 0c002h + .word 0c003h + .word 0c004h + .word 0c005h + .word 0c006h + .word 0c007h + .word 0c008h + .word 0c009h + .word 0c00ah + .word 0c00bh + .word 0c00ch + .word 0c00dh + .word 0c00eh + .word 0c00fh + .word 0cfe1h + .word 0cfe2h + .word 0cfe3h + .word 0cfe4h + .word 0cfe5h + .word 0cfe6h + .word 0cfe7h + .word 0cfe8h + .word 0cfe9h + .word 0cfeah + .word 0cfebh + .word 0cfech + .word 0cfedh + .word 0cfeeh + .word 0cfefh + .word 0cff0h + .word 0cff1h + .word 0cff2h + .word 0cff3h + .word 0cff4h + .word 0cff5h + .word 0cff6h + .word 0cff7h + .word 0cff8h + .word 0cff9h + .word 0cffah + .word 0cffbh + .word 0cffch + .word 0cffdh + .word 0cffeh + .word 0cfffh + .word 0d000h + .word 0d001h + .word 0d002h + .word 0d003h + .word 0d004h + .word 0d005h + .word 0d006h + .word 0d007h + .word 0d008h + .word 0d009h + .word 0d00ah + .word 0d00bh + .word 0d00ch + .word 0d00dh + .word 0d00eh + .word 0d00fh + .word 0dfe1h + .word 0dfe2h + .word 0dfe3h + .word 0dfe4h + .word 0dfe5h + .word 0dfe6h + .word 0dfe7h + .word 0dfe8h + .word 0dfe9h + .word 0dfeah + .word 0dfebh + .word 0dfech + .word 0dfedh + .word 0dfeeh + .word 0dfefh + .word 0dff0h + .word 0dff1h + .word 0dff2h + .word 0dff3h + .word 0dff4h + .word 0dff5h + .word 0dff6h + .word 0dff7h + .word 0dff8h + .word 0dff9h + .word 0dffah + .word 0dffbh + .word 0dffch + .word 0dffdh + .word 0dffeh + .word 0dfffh + .word 0e000h + .word 0e001h + .word 0e002h + .word 0e003h + .word 0e004h + .word 0e005h + .word 0e006h + .word 0e007h + .word 0e008h + .word 0e009h + .word 0e00ah + .word 0e00bh + .word 0e00ch + .word 0e00dh + .word 0e00eh + .word 0e00fh + .word 0efe1h + .word 0efe2h + .word 0efe3h + .word 0efe4h + .word 0efe5h + .word 0efe6h + .word 0efe7h + .word 0efe8h + .word 0efe9h + .word 0efeah + .word 0efebh + .word 0efech + .word 0efedh + .word 0efeeh + .word 0efefh + .word 0eff0h + .word 0eff1h + .word 0eff2h + .word 0eff3h + .word 0eff4h + .word 0eff5h + .word 0eff6h + .word 0eff7h + .word 0eff8h + .word 0eff9h + .word 0effah + .word 0effbh + .word 0effch + .word 0effdh + .word 0effeh + .word 0efffh + .word 0f000h + .word 0f001h + .word 0f002h + .word 0f003h + .word 0f004h + .word 0f005h + .word 0f006h + .word 0f007h + .word 0f008h + .word 0f009h + .word 0f00ah + .word 0f00bh + .word 0f00ch + .word 0f00dh + .word 0f00eh + .word 0f00fh + .word 0ffe1h + .word 0ffe2h + .word 0ffe3h + .word 0ffe4h + .word 0ffe5h + .word 0ffe6h + .word 0ffe7h + .word 0ffe8h + .word 0ffe9h + .word 0ffeah + .word 0ffebh + .word 0ffech + .word 0ffedh + .word 0ffeeh + .word 0ffefh + .word 0fff0h + .word 0fff1h + .word 0fff2h + .word 0fff3h + .word 0fff4h + .word 0fff5h + .word 0fff6h + .word 0fff7h + .word 0fff8h + .word 0fff9h + .word 0fffah + .word 0fffbh + .word 0fffch + .word 0fffdh + .word 0fffeh + .word 0ffffh + + ; alternative 4-digit hex values, uppercase + .word 0000h + .word 0001h + .word 0002h + .word 0003h + .word 0004h + .word 0005h + .word 0006h + .word 0007h + .word 0008h + .word 0009h + .word 000Ah + .word 000Bh + .word 000Ch + .word 000Dh + .word 000Eh + .word 000Fh + .word 0010h + .word 0011h + .word 0012h + .word 0013h + .word 0070h + .word 0071h + .word 0072h + .word 0073h + .word 0074h + .word 0075h + .word 0076h + .word 0077h + .word 0078h + .word 0079h + .word 007Ah + .word 007Bh + .word 007Ch + .word 007Dh + .word 007Eh + .word 007Fh + .word 0080h + .word 0081h + .word 0082h + .word 0083h + .word 0084h + .word 0085h + .word 0086h + .word 00F0h + .word 00F1h + .word 00F2h + .word 00F3h + .word 00F4h + .word 00F5h + .word 00F6h + .word 00F7h + .word 00F8h + .word 00F9h + .word 00FAh + .word 00FBh + .word 00FCh + .word 00FDh + .word 00FEh + .word 00FFh + .word 0100h + .word 0101h + .word 0102h + .word 0103h + .word 0FD2h + .word 0FD3h + .word 0FD4h + .word 0FD5h + .word 0FD6h + .word 0FD7h + .word 0FD8h + .word 0FD9h + .word 0FDAh + .word 0FDBh + .word 0FDCh + .word 0FDDh + .word 0FDEh + .word 0FDFh + .word 0FE0h + .word 0FE1h + .word 0FE2h + .word 0FE3h + .word 0FE4h + .word 0FE5h + .word 0FE6h + .word 0FE7h + .word 0FE8h + .word 0FE9h + .word 0FEAh + .word 0FEBh + .word 0FECh + .word 0FEDh + .word 0FEEh + .word 0FEFh + .word 0FF0h + .word 0FF1h + .word 0FF2h + .word 0FF3h + .word 0FF4h + .word 0FF5h + .word 0FF6h + .word 0FF7h + .word 0FF8h + .word 0FF9h + .word 0FFAh + .word 0FFBh + .word 0FFCh + .word 0FFDh + .word 0FFEh + .word 0FFFh + .word 1000h + .word 1001h + .word 1002h + .word 1003h + .word 1004h + .word 1005h + .word 1006h + .word 1007h + .word 1008h + .word 7FF0h + .word 7FF1h + .word 7FF2h + .word 7FF3h + .word 7FF4h + .word 7FF5h + .word 7FF6h + .word 7FF7h + .word 7FF8h + .word 7FF9h + .word 7FFAh + .word 7FFBh + .word 7FFCh + .word 7FFDh + .word 7FFEh + .word 7FFFh + .word 8000h + .word 8001h + .word 8002h + .word 8003h + .word 8004h + .word 8005h + .word 8006h + .word 8007h + .word 8008h + .word 8009h + .word 800Ah + .word 800Bh + .word 9FE1h + .word 9FE2h + .word 9FE3h + .word 9FE4h + .word 9FE5h + .word 9FE6h + .word 9FE7h + .word 9FE8h + .word 9FE9h + .word 9FEAh + .word 9FEBh + .word 9FECh + .word 9FEDh + .word 9FEEh + .word 9FEFh + .word 9FF0h + .word 9FF1h + .word 9FF2h + .word 9FF3h + .word 9FF4h + .word 9FF5h + .word 9FF6h + .word 9FF7h + .word 9FF8h + .word 9FF9h + .word 9FFAh + .word 9FFBh + .word 9FFCh + .word 9FFDh + .word 9FFEh + .word 9FFFh + .word 0A000h + .word 0A001h + .word 0A002h + .word 0A003h + .word 0A004h + .word 0A005h + .word 0A006h + .word 0A007h + .word 0A008h + .word 0A009h + .word 0A00Ah + .word 0A00Bh + .word 0A00Ch + .word 0A00Dh + .word 0A00Eh + .word 0A00Fh + .word 0AFE1h + .word 0AFE2h + .word 0AFE3h + .word 0AFE4h + .word 0AFE5h + .word 0AFE6h + .word 0AFE7h + .word 0AFE8h + .word 0AFE9h + .word 0AFEAh + .word 0AFEBh + .word 0AFECh + .word 0AFEDh + .word 0AFEEh + .word 0AFEFh + .word 0AFF0h + .word 0AFF1h + .word 0AFF2h + .word 0AFF3h + .word 0AFF4h + .word 0AFF5h + .word 0AFF6h + .word 0AFF7h + .word 0AFF8h + .word 0AFF9h + .word 0AFFAh + .word 0AFFBh + .word 0AFFCh + .word 0AFFDh + .word 0AFFEh + .word 0AFFFh + .word 0B000h + .word 0B001h + .word 0B002h + .word 0B003h + .word 0B004h + .word 0B005h + .word 0B006h + .word 0B007h + .word 0B008h + .word 0B009h + .word 0B00Ah + .word 0B00Bh + .word 0B00Ch + .word 0B00Dh + .word 0B00Eh + .word 0B00Fh + .word 0BFE1h + .word 0BFE2h + .word 0BFE3h + .word 0BFE4h + .word 0BFE5h + .word 0BFE6h + .word 0BFE7h + .word 0BFE8h + .word 0BFE9h + .word 0BFEAh + .word 0BFEBh + .word 0BFECh + .word 0BFEDh + .word 0BFEEh + .word 0BFEFh + .word 0BFF0h + .word 0BFF1h + .word 0BFF2h + .word 0BFF3h + .word 0BFF4h + .word 0BFF5h + .word 0BFF6h + .word 0BFF7h + .word 0BFF8h + .word 0BFF9h + .word 0BFFAh + .word 0BFFBh + .word 0BFFCh + .word 0BFFDh + .word 0BFFEh + .word 0BFFFh + .word 0C000h + .word 0C001h + .word 0C002h + .word 0C003h + .word 0C004h + .word 0C005h + .word 0C006h + .word 0C007h + .word 0C008h + .word 0C009h + .word 0C00Ah + .word 0C00Bh + .word 0C00Ch + .word 0C00Dh + .word 0C00Eh + .word 0C00Fh + .word 0CFE1h + .word 0CFE2h + .word 0CFE3h + .word 0CFE4h + .word 0CFE5h + .word 0CFE6h + .word 0CFE7h + .word 0CFE8h + .word 0CFE9h + .word 0CFEAh + .word 0CFEBh + .word 0CFECh + .word 0CFEDh + .word 0CFEEh + .word 0CFEFh + .word 0CFF0h + .word 0CFF1h + .word 0CFF2h + .word 0CFF3h + .word 0CFF4h + .word 0CFF5h + .word 0CFF6h + .word 0CFF7h + .word 0CFF8h + .word 0CFF9h + .word 0CFFAh + .word 0CFFBh + .word 0CFFCh + .word 0CFFDh + .word 0CFFEh + .word 0CFFFh + .word 0D000h + .word 0D001h + .word 0D002h + .word 0D003h + .word 0D004h + .word 0D005h + .word 0D006h + .word 0D007h + .word 0D008h + .word 0D009h + .word 0D00Ah + .word 0D00Bh + .word 0D00Ch + .word 0D00Dh + .word 0D00Eh + .word 0D00Fh + .word 0DFE1h + .word 0DFE2h + .word 0DFE3h + .word 0DFE4h + .word 0DFE5h + .word 0DFE6h + .word 0DFE7h + .word 0DFE8h + .word 0DFE9h + .word 0DFEAh + .word 0DFEBh + .word 0DFECh + .word 0DFEDh + .word 0DFEEh + .word 0DFEFh + .word 0DFF0h + .word 0DFF1h + .word 0DFF2h + .word 0DFF3h + .word 0DFF4h + .word 0DFF5h + .word 0DFF6h + .word 0DFF7h + .word 0DFF8h + .word 0DFF9h + .word 0DFFAh + .word 0DFFBh + .word 0DFFCh + .word 0DFFDh + .word 0DFFEh + .word 0DFFFh + .word 0E000h + .word 0E001h + .word 0E002h + .word 0E003h + .word 0E004h + .word 0E005h + .word 0E006h + .word 0E007h + .word 0E008h + .word 0E009h + .word 0E00Ah + .word 0E00Bh + .word 0E00Ch + .word 0E00Dh + .word 0E00Eh + .word 0E00Fh + .word 0EFE1h + .word 0EFE2h + .word 0EFE3h + .word 0EFE4h + .word 0EFE5h + .word 0EFE6h + .word 0EFE7h + .word 0EFE8h + .word 0EFE9h + .word 0EFEAh + .word 0EFEBh + .word 0EFECh + .word 0EFEDh + .word 0EFEEh + .word 0EFEFh + .word 0EFF0h + .word 0EFF1h + .word 0EFF2h + .word 0EFF3h + .word 0EFF4h + .word 0EFF5h + .word 0EFF6h + .word 0EFF7h + .word 0EFF8h + .word 0EFF9h + .word 0EFFAh + .word 0EFFBh + .word 0EFFCh + .word 0EFFDh + .word 0EFFEh + .word 0EFFFh + .word 0F000h + .word 0F001h + .word 0F002h + .word 0F003h + .word 0F004h + .word 0F005h + .word 0F006h + .word 0F007h + .word 0F008h + .word 0F009h + .word 0F00Ah + .word 0F00Bh + .word 0F00Ch + .word 0F00Dh + .word 0F00Eh + .word 0F00Fh + .word 0FFE1h + .word 0FFE2h + .word 0FFE3h + .word 0FFE4h + .word 0FFE5h + .word 0FFE6h + .word 0FFE7h + .word 0FFE8h + .word 0FFE9h + .word 0FFEAh + .word 0FFEBh + .word 0FFECh + .word 0FFEDh + .word 0FFEEh + .word 0FFEFh + .word 0FFF0h + .word 0FFF1h + .word 0FFF2h + .word 0FFF3h + .word 0FFF4h + .word 0FFF5h + .word 0FFF6h + .word 0FFF7h + .word 0FFF8h + .word 0FFF9h + .word 0FFFAh + .word 0FFFBh + .word 0FFFCh + .word 0FFFDh + .word 0FFFEh + .word 0FFFFh + + ; alternative hex values, always leading zero + .word 00h + .word 01h + .word 02h + .word 03h + .word 04h + .word 05h + .word 06h + .word 07h + .word 08h + .word 09h + .word 0ah + .word 0bh + .word 0ch + .word 0dh + .word 0eh + .word 0fh + .word 010h + .word 011h + .word 012h + .word 013h + .word 070h + .word 071h + .word 072h + .word 073h + .word 074h + .word 075h + .word 076h + .word 077h + .word 078h + .word 079h + .word 07ah + .word 07bh + .word 07ch + .word 07dh + .word 07eh + .word 07fh + .word 080h + .word 081h + .word 082h + .word 083h + .word 084h + .word 085h + .word 086h + .word 0f0h + .word 0f1h + .word 0f2h + .word 0f3h + .word 0f4h + .word 0f5h + .word 0f6h + .word 0f7h + .word 0f8h + .word 0f9h + .word 0fah + .word 0fbh + .word 0fch + .word 0fdh + .word 0feh + .word 0ffh + .word 0100h + .word 0101h + .word 0102h + .word 0103h + .word 0fd2h + .word 0fd3h + .word 0fd4h + .word 0fd5h + .word 0fd6h + .word 0fd7h + .word 0fd8h + .word 0fd9h + .word 0fdah + .word 0fdbh + .word 0fdch + .word 0fddh + .word 0fdeh + .word 0fdfh + .word 0fe0h + .word 0fe1h + .word 0fe2h + .word 0fe3h + .word 0fe4h + .word 0fe5h + .word 0fe6h + .word 0fe7h + .word 0fe8h + .word 0fe9h + .word 0feah + .word 0febh + .word 0fech + .word 0fedh + .word 0feeh + .word 0fefh + .word 0ff0h + .word 0ff1h + .word 0ff2h + .word 0ff3h + .word 0ff4h + .word 0ff5h + .word 0ff6h + .word 0ff7h + .word 0ff8h + .word 0ff9h + .word 0ffah + .word 0ffbh + .word 0ffch + .word 0ffdh + .word 0ffeh + .word 0fffh + .word 01000h + .word 01001h + .word 01002h + .word 01003h + .word 01004h + .word 01005h + .word 01006h + .word 01007h + .word 01008h + .word 07ff0h + .word 07ff1h + .word 07ff2h + .word 07ff3h + .word 07ff4h + .word 07ff5h + .word 07ff6h + .word 07ff7h + .word 07ff8h + .word 07ff9h + .word 07ffah + .word 07ffbh + .word 07ffch + .word 07ffdh + .word 07ffeh + .word 07fffh + .word 08000h + .word 08001h + .word 08002h + .word 08003h + .word 08004h + .word 08005h + .word 08006h + .word 08007h + .word 08008h + .word 08009h + .word 0800ah + .word 0800bh + .word 09fe1h + .word 09fe2h + .word 09fe3h + .word 09fe4h + .word 09fe5h + .word 09fe6h + .word 09fe7h + .word 09fe8h + .word 09fe9h + .word 09feah + .word 09febh + .word 09fech + .word 09fedh + .word 09feeh + .word 09fefh + .word 09ff0h + .word 09ff1h + .word 09ff2h + .word 09ff3h + .word 09ff4h + .word 09ff5h + .word 09ff6h + .word 09ff7h + .word 09ff8h + .word 09ff9h + .word 09ffah + .word 09ffbh + .word 09ffch + .word 09ffdh + .word 09ffeh + .word 09fffh + .word 0a000h + .word 0a001h + .word 0a002h + .word 0a003h + .word 0a004h + .word 0a005h + .word 0a006h + .word 0a007h + .word 0a008h + .word 0a009h + .word 0a00ah + .word 0a00bh + .word 0a00ch + .word 0a00dh + .word 0a00eh + .word 0a00fh + .word 0afe1h + .word 0afe2h + .word 0afe3h + .word 0afe4h + .word 0afe5h + .word 0afe6h + .word 0afe7h + .word 0afe8h + .word 0afe9h + .word 0afeah + .word 0afebh + .word 0afech + .word 0afedh + .word 0afeeh + .word 0afefh + .word 0aff0h + .word 0aff1h + .word 0aff2h + .word 0aff3h + .word 0aff4h + .word 0aff5h + .word 0aff6h + .word 0aff7h + .word 0aff8h + .word 0aff9h + .word 0affah + .word 0affbh + .word 0affch + .word 0affdh + .word 0affeh + .word 0afffh + .word 0b000h + .word 0b001h + .word 0b002h + .word 0b003h + .word 0b004h + .word 0b005h + .word 0b006h + .word 0b007h + .word 0b008h + .word 0b009h + .word 0b00ah + .word 0b00bh + .word 0b00ch + .word 0b00dh + .word 0b00eh + .word 0b00fh + .word 0bfe1h + .word 0bfe2h + .word 0bfe3h + .word 0bfe4h + .word 0bfe5h + .word 0bfe6h + .word 0bfe7h + .word 0bfe8h + .word 0bfe9h + .word 0bfeah + .word 0bfebh + .word 0bfech + .word 0bfedh + .word 0bfeeh + .word 0bfefh + .word 0bff0h + .word 0bff1h + .word 0bff2h + .word 0bff3h + .word 0bff4h + .word 0bff5h + .word 0bff6h + .word 0bff7h + .word 0bff8h + .word 0bff9h + .word 0bffah + .word 0bffbh + .word 0bffch + .word 0bffdh + .word 0bffeh + .word 0bfffh + .word 0c000h + .word 0c001h + .word 0c002h + .word 0c003h + .word 0c004h + .word 0c005h + .word 0c006h + .word 0c007h + .word 0c008h + .word 0c009h + .word 0c00ah + .word 0c00bh + .word 0c00ch + .word 0c00dh + .word 0c00eh + .word 0c00fh + .word 0cfe1h + .word 0cfe2h + .word 0cfe3h + .word 0cfe4h + .word 0cfe5h + .word 0cfe6h + .word 0cfe7h + .word 0cfe8h + .word 0cfe9h + .word 0cfeah + .word 0cfebh + .word 0cfech + .word 0cfedh + .word 0cfeeh + .word 0cfefh + .word 0cff0h + .word 0cff1h + .word 0cff2h + .word 0cff3h + .word 0cff4h + .word 0cff5h + .word 0cff6h + .word 0cff7h + .word 0cff8h + .word 0cff9h + .word 0cffah + .word 0cffbh + .word 0cffch + .word 0cffdh + .word 0cffeh + .word 0cfffh + .word 0d000h + .word 0d001h + .word 0d002h + .word 0d003h + .word 0d004h + .word 0d005h + .word 0d006h + .word 0d007h + .word 0d008h + .word 0d009h + .word 0d00ah + .word 0d00bh + .word 0d00ch + .word 0d00dh + .word 0d00eh + .word 0d00fh + .word 0dfe1h + .word 0dfe2h + .word 0dfe3h + .word 0dfe4h + .word 0dfe5h + .word 0dfe6h + .word 0dfe7h + .word 0dfe8h + .word 0dfe9h + .word 0dfeah + .word 0dfebh + .word 0dfech + .word 0dfedh + .word 0dfeeh + .word 0dfefh + .word 0dff0h + .word 0dff1h + .word 0dff2h + .word 0dff3h + .word 0dff4h + .word 0dff5h + .word 0dff6h + .word 0dff7h + .word 0dff8h + .word 0dff9h + .word 0dffah + .word 0dffbh + .word 0dffch + .word 0dffdh + .word 0dffeh + .word 0dfffh + .word 0e000h + .word 0e001h + .word 0e002h + .word 0e003h + .word 0e004h + .word 0e005h + .word 0e006h + .word 0e007h + .word 0e008h + .word 0e009h + .word 0e00ah + .word 0e00bh + .word 0e00ch + .word 0e00dh + .word 0e00eh + .word 0e00fh + .word 0efe1h + .word 0efe2h + .word 0efe3h + .word 0efe4h + .word 0efe5h + .word 0efe6h + .word 0efe7h + .word 0efe8h + .word 0efe9h + .word 0efeah + .word 0efebh + .word 0efech + .word 0efedh + .word 0efeeh + .word 0efefh + .word 0eff0h + .word 0eff1h + .word 0eff2h + .word 0eff3h + .word 0eff4h + .word 0eff5h + .word 0eff6h + .word 0eff7h + .word 0eff8h + .word 0eff9h + .word 0effah + .word 0effbh + .word 0effch + .word 0effdh + .word 0effeh + .word 0efffh + .word 0f000h + .word 0f001h + .word 0f002h + .word 0f003h + .word 0f004h + .word 0f005h + .word 0f006h + .word 0f007h + .word 0f008h + .word 0f009h + .word 0f00ah + .word 0f00bh + .word 0f00ch + .word 0f00dh + .word 0f00eh + .word 0f00fh + .word 0ffe1h + .word 0ffe2h + .word 0ffe3h + .word 0ffe4h + .word 0ffe5h + .word 0ffe6h + .word 0ffe7h + .word 0ffe8h + .word 0ffe9h + .word 0ffeah + .word 0ffebh + .word 0ffech + .word 0ffedh + .word 0ffeeh + .word 0ffefh + .word 0fff0h + .word 0fff1h + .word 0fff2h + .word 0fff3h + .word 0fff4h + .word 0fff5h + .word 0fff6h + .word 0fff7h + .word 0fff8h + .word 0fff9h + .word 0fffah + .word 0fffbh + .word 0fffch + .word 0fffdh + .word 0fffeh + .word 0ffffh + + ; binary values, variable length + .word %0 + .word %01 + .word %010 + .word %011 + .word %0100 + .word %0101 + .word %0110 + .word %0111 + .word %01000 + .word %01001 + .word %01010 + .word %01011 + .word %01100 + .word %01101 + .word %01110 + .word %01111 + .word %010000 + .word %010001 + .word %010010 + .word %010011 + .word %01110000 + .word %01110001 + .word %01110010 + .word %01110011 + .word %01110100 + .word %01110101 + .word %01110110 + .word %01110111 + .word %01111000 + .word %01111001 + .word %01111010 + .word %01111011 + .word %01111100 + .word %01111101 + .word %01111110 + .word %01111111 + .word %010000000 + .word %010000001 + .word %010000010 + .word %010000011 + .word %010000100 + .word %010000101 + .word %010000110 + .word %011110000 + .word %011110001 + .word %011110010 + .word %011110011 + .word %011110100 + .word %011110101 + .word %011110110 + .word %011110111 + .word %011111000 + .word %011111001 + .word %011111010 + .word %011111011 + .word %011111100 + .word %011111101 + .word %011111110 + .word %011111111 + .word %100000000 + .word %100000001 + .word %100000010 + .word %100000011 + .word %111111010010 + .word %111111010011 + .word %111111010100 + .word %111111010101 + .word %111111010110 + .word %111111010111 + .word %111111011000 + .word %111111011001 + .word %111111011010 + .word %111111011011 + .word %111111011100 + .word %111111011101 + .word %111111011110 + .word %111111011111 + .word %111111100000 + .word %111111100001 + .word %111111100010 + .word %111111100011 + .word %111111100100 + .word %111111100101 + .word %111111100110 + .word %111111100111 + .word %111111101000 + .word %111111101001 + .word %111111101010 + .word %111111101011 + .word %111111101100 + .word %111111101101 + .word %111111101110 + .word %111111101111 + .word %111111110000 + .word %111111110001 + .word %111111110010 + .word %111111110011 + .word %111111110100 + .word %111111110101 + .word %111111110110 + .word %111111110111 + .word %111111111000 + .word %111111111001 + .word %111111111010 + .word %111111111011 + .word %111111111100 + .word %111111111101 + .word %111111111110 + .word %111111111111 + .word %1000000000000 + .word %1000000000001 + .word %1000000000010 + .word %1000000000011 + .word %1000000000100 + .word %1000000000101 + .word %1000000000110 + .word %1000000000111 + .word %1000000001000 + .word %111111111110000 + .word %111111111110001 + .word %111111111110010 + .word %111111111110011 + .word %111111111110100 + .word %111111111110101 + .word %111111111110110 + .word %111111111110111 + .word %111111111111000 + .word %111111111111001 + .word %111111111111010 + .word %111111111111011 + .word %111111111111100 + .word %111111111111101 + .word %111111111111110 + .word %111111111111111 + .word %1000000000000000 + .word %1000000000000001 + .word %1000000000000010 + .word %1000000000000011 + .word %1000000000000100 + .word %1000000000000101 + .word %1000000000000110 + .word %1000000000000111 + .word %1000000000001000 + .word %1000000000001001 + .word %1000000000001010 + .word %1000000000001011 + .word %1001111111100001 + .word %1001111111100010 + .word %1001111111100011 + .word %1001111111100100 + .word %1001111111100101 + .word %1001111111100110 + .word %1001111111100111 + .word %1001111111101000 + .word %1001111111101001 + .word %1001111111101010 + .word %1001111111101011 + .word %1001111111101100 + .word %1001111111101101 + .word %1001111111101110 + .word %1001111111101111 + .word %1001111111110000 + .word %1001111111110001 + .word %1001111111110010 + .word %1001111111110011 + .word %1001111111110100 + .word %1001111111110101 + .word %1001111111110110 + .word %1001111111110111 + .word %1001111111111000 + .word %1001111111111001 + .word %1001111111111010 + .word %1001111111111011 + .word %1001111111111100 + .word %1001111111111101 + .word %1001111111111110 + .word %1001111111111111 + .word %1010000000000000 + .word %1010000000000001 + .word %1010000000000010 + .word %1010000000000011 + .word %1010000000000100 + .word %1010000000000101 + .word %1010000000000110 + .word %1010000000000111 + .word %1010000000001000 + .word %1010000000001001 + .word %1010000000001010 + .word %1010000000001011 + .word %1010000000001100 + .word %1010000000001101 + .word %1010000000001110 + .word %1010000000001111 + .word %1010111111100001 + .word %1010111111100010 + .word %1010111111100011 + .word %1010111111100100 + .word %1010111111100101 + .word %1010111111100110 + .word %1010111111100111 + .word %1010111111101000 + .word %1010111111101001 + .word %1010111111101010 + .word %1010111111101011 + .word %1010111111101100 + .word %1010111111101101 + .word %1010111111101110 + .word %1010111111101111 + .word %1010111111110000 + .word %1010111111110001 + .word %1010111111110010 + .word %1010111111110011 + .word %1010111111110100 + .word %1010111111110101 + .word %1010111111110110 + .word %1010111111110111 + .word %1010111111111000 + .word %1010111111111001 + .word %1010111111111010 + .word %1010111111111011 + .word %1010111111111100 + .word %1010111111111101 + .word %1010111111111110 + .word %1010111111111111 + .word %1011000000000000 + .word %1011000000000001 + .word %1011000000000010 + .word %1011000000000011 + .word %1011000000000100 + .word %1011000000000101 + .word %1011000000000110 + .word %1011000000000111 + .word %1011000000001000 + .word %1011000000001001 + .word %1011000000001010 + .word %1011000000001011 + .word %1011000000001100 + .word %1011000000001101 + .word %1011000000001110 + .word %1011000000001111 + .word %1011111111100001 + .word %1011111111100010 + .word %1011111111100011 + .word %1011111111100100 + .word %1011111111100101 + .word %1011111111100110 + .word %1011111111100111 + .word %1011111111101000 + .word %1011111111101001 + .word %1011111111101010 + .word %1011111111101011 + .word %1011111111101100 + .word %1011111111101101 + .word %1011111111101110 + .word %1011111111101111 + .word %1011111111110000 + .word %1011111111110001 + .word %1011111111110010 + .word %1011111111110011 + .word %1011111111110100 + .word %1011111111110101 + .word %1011111111110110 + .word %1011111111110111 + .word %1011111111111000 + .word %1011111111111001 + .word %1011111111111010 + .word %1011111111111011 + .word %1011111111111100 + .word %1011111111111101 + .word %1011111111111110 + .word %1011111111111111 + .word %1100000000000000 + .word %1100000000000001 + .word %1100000000000010 + .word %1100000000000011 + .word %1100000000000100 + .word %1100000000000101 + .word %1100000000000110 + .word %1100000000000111 + .word %1100000000001000 + .word %1100000000001001 + .word %1100000000001010 + .word %1100000000001011 + .word %1100000000001100 + .word %1100000000001101 + .word %1100000000001110 + .word %1100000000001111 + .word %1100111111100001 + .word %1100111111100010 + .word %1100111111100011 + .word %1100111111100100 + .word %1100111111100101 + .word %1100111111100110 + .word %1100111111100111 + .word %1100111111101000 + .word %1100111111101001 + .word %1100111111101010 + .word %1100111111101011 + .word %1100111111101100 + .word %1100111111101101 + .word %1100111111101110 + .word %1100111111101111 + .word %1100111111110000 + .word %1100111111110001 + .word %1100111111110010 + .word %1100111111110011 + .word %1100111111110100 + .word %1100111111110101 + .word %1100111111110110 + .word %1100111111110111 + .word %1100111111111000 + .word %1100111111111001 + .word %1100111111111010 + .word %1100111111111011 + .word %1100111111111100 + .word %1100111111111101 + .word %1100111111111110 + .word %1100111111111111 + .word %1101000000000000 + .word %1101000000000001 + .word %1101000000000010 + .word %1101000000000011 + .word %1101000000000100 + .word %1101000000000101 + .word %1101000000000110 + .word %1101000000000111 + .word %1101000000001000 + .word %1101000000001001 + .word %1101000000001010 + .word %1101000000001011 + .word %1101000000001100 + .word %1101000000001101 + .word %1101000000001110 + .word %1101000000001111 + .word %1101111111100001 + .word %1101111111100010 + .word %1101111111100011 + .word %1101111111100100 + .word %1101111111100101 + .word %1101111111100110 + .word %1101111111100111 + .word %1101111111101000 + .word %1101111111101001 + .word %1101111111101010 + .word %1101111111101011 + .word %1101111111101100 + .word %1101111111101101 + .word %1101111111101110 + .word %1101111111101111 + .word %1101111111110000 + .word %1101111111110001 + .word %1101111111110010 + .word %1101111111110011 + .word %1101111111110100 + .word %1101111111110101 + .word %1101111111110110 + .word %1101111111110111 + .word %1101111111111000 + .word %1101111111111001 + .word %1101111111111010 + .word %1101111111111011 + .word %1101111111111100 + .word %1101111111111101 + .word %1101111111111110 + .word %1101111111111111 + .word %1110000000000000 + .word %1110000000000001 + .word %1110000000000010 + .word %1110000000000011 + .word %1110000000000100 + .word %1110000000000101 + .word %1110000000000110 + .word %1110000000000111 + .word %1110000000001000 + .word %1110000000001001 + .word %1110000000001010 + .word %1110000000001011 + .word %1110000000001100 + .word %1110000000001101 + .word %1110000000001110 + .word %1110000000001111 + .word %1110111111100001 + .word %1110111111100010 + .word %1110111111100011 + .word %1110111111100100 + .word %1110111111100101 + .word %1110111111100110 + .word %1110111111100111 + .word %1110111111101000 + .word %1110111111101001 + .word %1110111111101010 + .word %1110111111101011 + .word %1110111111101100 + .word %1110111111101101 + .word %1110111111101110 + .word %1110111111101111 + .word %1110111111110000 + .word %1110111111110001 + .word %1110111111110010 + .word %1110111111110011 + .word %1110111111110100 + .word %1110111111110101 + .word %1110111111110110 + .word %1110111111110111 + .word %1110111111111000 + .word %1110111111111001 + .word %1110111111111010 + .word %1110111111111011 + .word %1110111111111100 + .word %1110111111111101 + .word %1110111111111110 + .word %1110111111111111 + .word %1111000000000000 + .word %1111000000000001 + .word %1111000000000010 + .word %1111000000000011 + .word %1111000000000100 + .word %1111000000000101 + .word %1111000000000110 + .word %1111000000000111 + .word %1111000000001000 + .word %1111000000001001 + .word %1111000000001010 + .word %1111000000001011 + .word %1111000000001100 + .word %1111000000001101 + .word %1111000000001110 + .word %1111000000001111 + .word %1111111111100001 + .word %1111111111100010 + .word %1111111111100011 + .word %1111111111100100 + .word %1111111111100101 + .word %1111111111100110 + .word %1111111111100111 + .word %1111111111101000 + .word %1111111111101001 + .word %1111111111101010 + .word %1111111111101011 + .word %1111111111101100 + .word %1111111111101101 + .word %1111111111101110 + .word %1111111111101111 + .word %1111111111110000 + .word %1111111111110001 + .word %1111111111110010 + .word %1111111111110011 + .word %1111111111110100 + .word %1111111111110101 + .word %1111111111110110 + .word %1111111111110111 + .word %1111111111111000 + .word %1111111111111001 + .word %1111111111111010 + .word %1111111111111011 + .word %1111111111111100 + .word %1111111111111101 + .word %1111111111111110 + .word %1111111111111111 + + ; binary values, full length + .word %0000000000000000 + .word %0000000000000001 + .word %0000000000000010 + .word %0000000000000011 + .word %0000000000000100 + .word %0000000000000101 + .word %0000000000000110 + .word %0000000000000111 + .word %0000000000001000 + .word %0000000000001001 + .word %0000000000001010 + .word %0000000000001011 + .word %0000000000001100 + .word %0000000000001101 + .word %0000000000001110 + .word %0000000000001111 + .word %0000000000010000 + .word %0000000000010001 + .word %0000000000010010 + .word %0000000000010011 + .word %0000000001110000 + .word %0000000001110001 + .word %0000000001110010 + .word %0000000001110011 + .word %0000000001110100 + .word %0000000001110101 + .word %0000000001110110 + .word %0000000001110111 + .word %0000000001111000 + .word %0000000001111001 + .word %0000000001111010 + .word %0000000001111011 + .word %0000000001111100 + .word %0000000001111101 + .word %0000000001111110 + .word %0000000001111111 + .word %0000000010000000 + .word %0000000010000001 + .word %0000000010000010 + .word %0000000010000011 + .word %0000000010000100 + .word %0000000010000101 + .word %0000000010000110 + .word %0000000011110000 + .word %0000000011110001 + .word %0000000011110010 + .word %0000000011110011 + .word %0000000011110100 + .word %0000000011110101 + .word %0000000011110110 + .word %0000000011110111 + .word %0000000011111000 + .word %0000000011111001 + .word %0000000011111010 + .word %0000000011111011 + .word %0000000011111100 + .word %0000000011111101 + .word %0000000011111110 + .word %0000000011111111 + .word %0000000100000000 + .word %0000000100000001 + .word %0000000100000010 + .word %0000000100000011 + .word %0000111111010010 + .word %0000111111010011 + .word %0000111111010100 + .word %0000111111010101 + .word %0000111111010110 + .word %0000111111010111 + .word %0000111111011000 + .word %0000111111011001 + .word %0000111111011010 + .word %0000111111011011 + .word %0000111111011100 + .word %0000111111011101 + .word %0000111111011110 + .word %0000111111011111 + .word %0000111111100000 + .word %0000111111100001 + .word %0000111111100010 + .word %0000111111100011 + .word %0000111111100100 + .word %0000111111100101 + .word %0000111111100110 + .word %0000111111100111 + .word %0000111111101000 + .word %0000111111101001 + .word %0000111111101010 + .word %0000111111101011 + .word %0000111111101100 + .word %0000111111101101 + .word %0000111111101110 + .word %0000111111101111 + .word %0000111111110000 + .word %0000111111110001 + .word %0000111111110010 + .word %0000111111110011 + .word %0000111111110100 + .word %0000111111110101 + .word %0000111111110110 + .word %0000111111110111 + .word %0000111111111000 + .word %0000111111111001 + .word %0000111111111010 + .word %0000111111111011 + .word %0000111111111100 + .word %0000111111111101 + .word %0000111111111110 + .word %0000111111111111 + .word %0001000000000000 + .word %0001000000000001 + .word %0001000000000010 + .word %0001000000000011 + .word %0001000000000100 + .word %0001000000000101 + .word %0001000000000110 + .word %0001000000000111 + .word %0001000000001000 + .word %0111111111110000 + .word %0111111111110001 + .word %0111111111110010 + .word %0111111111110011 + .word %0111111111110100 + .word %0111111111110101 + .word %0111111111110110 + .word %0111111111110111 + .word %0111111111111000 + .word %0111111111111001 + .word %0111111111111010 + .word %0111111111111011 + .word %0111111111111100 + .word %0111111111111101 + .word %0111111111111110 + .word %0111111111111111 + .word %1000000000000000 + .word %1000000000000001 + .word %1000000000000010 + .word %1000000000000011 + .word %1000000000000100 + .word %1000000000000101 + .word %1000000000000110 + .word %1000000000000111 + .word %1000000000001000 + .word %1000000000001001 + .word %1000000000001010 + .word %1000000000001011 + .word %1001111111100001 + .word %1001111111100010 + .word %1001111111100011 + .word %1001111111100100 + .word %1001111111100101 + .word %1001111111100110 + .word %1001111111100111 + .word %1001111111101000 + .word %1001111111101001 + .word %1001111111101010 + .word %1001111111101011 + .word %1001111111101100 + .word %1001111111101101 + .word %1001111111101110 + .word %1001111111101111 + .word %1001111111110000 + .word %1001111111110001 + .word %1001111111110010 + .word %1001111111110011 + .word %1001111111110100 + .word %1001111111110101 + .word %1001111111110110 + .word %1001111111110111 + .word %1001111111111000 + .word %1001111111111001 + .word %1001111111111010 + .word %1001111111111011 + .word %1001111111111100 + .word %1001111111111101 + .word %1001111111111110 + .word %1001111111111111 + .word %1010000000000000 + .word %1010000000000001 + .word %1010000000000010 + .word %1010000000000011 + .word %1010000000000100 + .word %1010000000000101 + .word %1010000000000110 + .word %1010000000000111 + .word %1010000000001000 + .word %1010000000001001 + .word %1010000000001010 + .word %1010000000001011 + .word %1010000000001100 + .word %1010000000001101 + .word %1010000000001110 + .word %1010000000001111 + .word %1010111111100001 + .word %1010111111100010 + .word %1010111111100011 + .word %1010111111100100 + .word %1010111111100101 + .word %1010111111100110 + .word %1010111111100111 + .word %1010111111101000 + .word %1010111111101001 + .word %1010111111101010 + .word %1010111111101011 + .word %1010111111101100 + .word %1010111111101101 + .word %1010111111101110 + .word %1010111111101111 + .word %1010111111110000 + .word %1010111111110001 + .word %1010111111110010 + .word %1010111111110011 + .word %1010111111110100 + .word %1010111111110101 + .word %1010111111110110 + .word %1010111111110111 + .word %1010111111111000 + .word %1010111111111001 + .word %1010111111111010 + .word %1010111111111011 + .word %1010111111111100 + .word %1010111111111101 + .word %1010111111111110 + .word %1010111111111111 + .word %1011000000000000 + .word %1011000000000001 + .word %1011000000000010 + .word %1011000000000011 + .word %1011000000000100 + .word %1011000000000101 + .word %1011000000000110 + .word %1011000000000111 + .word %1011000000001000 + .word %1011000000001001 + .word %1011000000001010 + .word %1011000000001011 + .word %1011000000001100 + .word %1011000000001101 + .word %1011000000001110 + .word %1011000000001111 + .word %1011111111100001 + .word %1011111111100010 + .word %1011111111100011 + .word %1011111111100100 + .word %1011111111100101 + .word %1011111111100110 + .word %1011111111100111 + .word %1011111111101000 + .word %1011111111101001 + .word %1011111111101010 + .word %1011111111101011 + .word %1011111111101100 + .word %1011111111101101 + .word %1011111111101110 + .word %1011111111101111 + .word %1011111111110000 + .word %1011111111110001 + .word %1011111111110010 + .word %1011111111110011 + .word %1011111111110100 + .word %1011111111110101 + .word %1011111111110110 + .word %1011111111110111 + .word %1011111111111000 + .word %1011111111111001 + .word %1011111111111010 + .word %1011111111111011 + .word %1011111111111100 + .word %1011111111111101 + .word %1011111111111110 + .word %1011111111111111 + .word %1100000000000000 + .word %1100000000000001 + .word %1100000000000010 + .word %1100000000000011 + .word %1100000000000100 + .word %1100000000000101 + .word %1100000000000110 + .word %1100000000000111 + .word %1100000000001000 + .word %1100000000001001 + .word %1100000000001010 + .word %1100000000001011 + .word %1100000000001100 + .word %1100000000001101 + .word %1100000000001110 + .word %1100000000001111 + .word %1100111111100001 + .word %1100111111100010 + .word %1100111111100011 + .word %1100111111100100 + .word %1100111111100101 + .word %1100111111100110 + .word %1100111111100111 + .word %1100111111101000 + .word %1100111111101001 + .word %1100111111101010 + .word %1100111111101011 + .word %1100111111101100 + .word %1100111111101101 + .word %1100111111101110 + .word %1100111111101111 + .word %1100111111110000 + .word %1100111111110001 + .word %1100111111110010 + .word %1100111111110011 + .word %1100111111110100 + .word %1100111111110101 + .word %1100111111110110 + .word %1100111111110111 + .word %1100111111111000 + .word %1100111111111001 + .word %1100111111111010 + .word %1100111111111011 + .word %1100111111111100 + .word %1100111111111101 + .word %1100111111111110 + .word %1100111111111111 + .word %1101000000000000 + .word %1101000000000001 + .word %1101000000000010 + .word %1101000000000011 + .word %1101000000000100 + .word %1101000000000101 + .word %1101000000000110 + .word %1101000000000111 + .word %1101000000001000 + .word %1101000000001001 + .word %1101000000001010 + .word %1101000000001011 + .word %1101000000001100 + .word %1101000000001101 + .word %1101000000001110 + .word %1101000000001111 + .word %1101111111100001 + .word %1101111111100010 + .word %1101111111100011 + .word %1101111111100100 + .word %1101111111100101 + .word %1101111111100110 + .word %1101111111100111 + .word %1101111111101000 + .word %1101111111101001 + .word %1101111111101010 + .word %1101111111101011 + .word %1101111111101100 + .word %1101111111101101 + .word %1101111111101110 + .word %1101111111101111 + .word %1101111111110000 + .word %1101111111110001 + .word %1101111111110010 + .word %1101111111110011 + .word %1101111111110100 + .word %1101111111110101 + .word %1101111111110110 + .word %1101111111110111 + .word %1101111111111000 + .word %1101111111111001 + .word %1101111111111010 + .word %1101111111111011 + .word %1101111111111100 + .word %1101111111111101 + .word %1101111111111110 + .word %1101111111111111 + .word %1110000000000000 + .word %1110000000000001 + .word %1110000000000010 + .word %1110000000000011 + .word %1110000000000100 + .word %1110000000000101 + .word %1110000000000110 + .word %1110000000000111 + .word %1110000000001000 + .word %1110000000001001 + .word %1110000000001010 + .word %1110000000001011 + .word %1110000000001100 + .word %1110000000001101 + .word %1110000000001110 + .word %1110000000001111 + .word %1110111111100001 + .word %1110111111100010 + .word %1110111111100011 + .word %1110111111100100 + .word %1110111111100101 + .word %1110111111100110 + .word %1110111111100111 + .word %1110111111101000 + .word %1110111111101001 + .word %1110111111101010 + .word %1110111111101011 + .word %1110111111101100 + .word %1110111111101101 + .word %1110111111101110 + .word %1110111111101111 + .word %1110111111110000 + .word %1110111111110001 + .word %1110111111110010 + .word %1110111111110011 + .word %1110111111110100 + .word %1110111111110101 + .word %1110111111110110 + .word %1110111111110111 + .word %1110111111111000 + .word %1110111111111001 + .word %1110111111111010 + .word %1110111111111011 + .word %1110111111111100 + .word %1110111111111101 + .word %1110111111111110 + .word %1110111111111111 + .word %1111000000000000 + .word %1111000000000001 + .word %1111000000000010 + .word %1111000000000011 + .word %1111000000000100 + .word %1111000000000101 + .word %1111000000000110 + .word %1111000000000111 + .word %1111000000001000 + .word %1111000000001001 + .word %1111000000001010 + .word %1111000000001011 + .word %1111000000001100 + .word %1111000000001101 + .word %1111000000001110 + .word %1111000000001111 + .word %1111111111100001 + .word %1111111111100010 + .word %1111111111100011 + .word %1111111111100100 + .word %1111111111100101 + .word %1111111111100110 + .word %1111111111100111 + .word %1111111111101000 + .word %1111111111101001 + .word %1111111111101010 + .word %1111111111101011 + .word %1111111111101100 + .word %1111111111101101 + .word %1111111111101110 + .word %1111111111101111 + .word %1111111111110000 + .word %1111111111110001 + .word %1111111111110010 + .word %1111111111110011 + .word %1111111111110100 + .word %1111111111110101 + .word %1111111111110110 + .word %1111111111110111 + .word %1111111111111000 + .word %1111111111111001 + .word %1111111111111010 + .word %1111111111111011 + .word %1111111111111100 + .word %1111111111111101 + .word %1111111111111110 + .word %1111111111111111 + + ; multiple values on one line, decimal + .word 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 + .word 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 + .word 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 + .word 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 + .word 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 + .word 256,257,258,259,260,261,262,263,264,265,266,267,268,269,270,271 + .word 4064,4065,4066,4067,4068,4069,4070,4071,4072,4073,4074,4075,4076,4077,4078,4079 + .word 4080,4081,4082,4083,4084,4085,4086,4087,4088,4089,4090,4091,4092,4093,4094,4095 + .word 4096,4097,4098,4099,4100,4101,4102,4103,4104,4105,4106,4107,4108,4109,4110,4111 + .word 32752,32753,32754,32755,32756,32757,32758,32759,32760,32761,32762,32763,32764,32765,32766,32767 + .word 32768,32769,32770,32771,32772,32773,32774,32775,32776,32777,32778,32779,32780,32781,32782,32783 + .word 40944,40945,40946,40947,40948,40949,40950,40951,40952,40953,40954,40955,40956,40957,40958,40959 + .word 40960,40961,40962,40963,40964,40965,40966,40967,40968,40969,40970,40971,40972,40973,40974,40975 + .word 45040,45041,45042,45043,45044,45045,45046,45047,45048,45049,45050,45051,45052,45053,45054,45055 + .word 45056,45057,45058,45059,45060,45061,45062,45063,45064,45065,45066,45067,45068,45069,45070,45071 + .word 49136,49137,49138,49139,49140,49141,49142,49143,49144,49145,49146,49147,49148,49149,49150,49151 + .word 49152,49153,49154,49155,49156,49157,49158,49159,49160,49161,49162,49163,49164,49165,49166,49167 + .word 53232,53233,53234,53235,53236,53237,53238,53239,53240,53241,53242,53243,53244,53245,53246,53247 + .word 53248,53249,53250,53251,53252,53253,53254,53255,53256,53257,53258,53259,53260,53261,53262,53263 + .word 57328,57329,57330,57331,57332,57333,57334,57335,57336,57337,57338,57339,57340,57341,57342,57343 + .word 57344,57345,57346,57347,57348,57349,57350,57351,57352,57353,57354,57355,57356,57357,57358,57359 + .word 61424,61425,61426,61427,61428,61429,61430,61431,61432,61433,61434,61435,61436,61437,61438,61439 + .word 61440,61441,61442,61443,61444,61445,61446,61447,61448,61449,61450,61451,61452,61453,61454,61455 + .word 65520,65521,65522,65523,65524,65525,65526,65527,65528,65529,65530,65531,65532,65533,65534,65535 + + ; multiple values on one line, hex + .word $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f + .word $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f + .word $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f + .word $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f + .word $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff + .word $100,$101,$102,$103,$104,$105,$106,$107,$108,$109,$10a,$10b,$10c,$10d,$10e,$10f + .word $fe0,$fe1,$fe2,$fe3,$fe4,$fe5,$fe6,$fe7,$fe8,$fe9,$fea,$feb,$fec,$fed,$fee,$fef + .word $ff0,$ff1,$ff2,$ff3,$ff4,$ff5,$ff6,$ff7,$ff8,$ff9,$ffa,$ffb,$ffc,$ffd,$ffe,$fff + .word $1000,$1001,$1002,$1003,$1004,$1005,$1006,$1007,$1008,$1009,$100a,$100b,$100c,$100d,$100e,$100f + .word $7ff0,$7ff1,$7ff2,$7ff3,$7ff4,$7ff5,$7ff6,$7ff7,$7ff8,$7ff9,$7ffa,$7ffb,$7ffc,$7ffd,$7ffe,$7fff + .word $8000,$8001,$8002,$8003,$8004,$8005,$8006,$8007,$8008,$8009,$800a,$800b,$800c,$800d,$800e,$800f + .word $9ff0,$9ff1,$9ff2,$9ff3,$9ff4,$9ff5,$9ff6,$9ff7,$9ff8,$9ff9,$9ffa,$9ffb,$9ffc,$9ffd,$9ffe,$9fff + .word $a000,$a001,$a002,$a003,$a004,$a005,$a006,$a007,$a008,$a009,$a00a,$a00b,$a00c,$a00d,$a00e,$a00f + .word $aff0,$aff1,$aff2,$aff3,$aff4,$aff5,$aff6,$aff7,$aff8,$aff9,$affa,$affb,$affc,$affd,$affe,$afff + .word $b000,$b001,$b002,$b003,$b004,$b005,$b006,$b007,$b008,$b009,$b00a,$b00b,$b00c,$b00d,$b00e,$b00f + .word $bff0,$bff1,$bff2,$bff3,$bff4,$bff5,$bff6,$bff7,$bff8,$bff9,$bffa,$bffb,$bffc,$bffd,$bffe,$bfff + .word $c000,$c001,$c002,$c003,$c004,$c005,$c006,$c007,$c008,$c009,$c00a,$c00b,$c00c,$c00d,$c00e,$c00f + .word $cff0,$cff1,$cff2,$cff3,$cff4,$cff5,$cff6,$cff7,$cff8,$cff9,$cffa,$cffb,$cffc,$cffd,$cffe,$cfff + .word $d000,$d001,$d002,$d003,$d004,$d005,$d006,$d007,$d008,$d009,$d00a,$d00b,$d00c,$d00d,$d00e,$d00f + .word $dff0,$dff1,$dff2,$dff3,$dff4,$dff5,$dff6,$dff7,$dff8,$dff9,$dffa,$dffb,$dffc,$dffd,$dffe,$dfff + .word $e000,$e001,$e002,$e003,$e004,$e005,$e006,$e007,$e008,$e009,$e00a,$e00b,$e00c,$e00d,$e00e,$e00f + .word $eff0,$eff1,$eff2,$eff3,$eff4,$eff5,$eff6,$eff7,$eff8,$eff9,$effa,$effb,$effc,$effd,$effe,$efff + .word $f000,$f001,$f002,$f003,$f004,$f005,$f006,$f007,$f008,$f009,$f00a,$f00b,$f00c,$f00d,$f00e,$f00f + .word $fff0,$fff1,$fff2,$fff3,$fff4,$fff5,$fff6,$fff7,$fff8,$fff9,$fffa,$fffb,$fffc,$fffd,$fffe,$ffff + + ; multiple values on one line, alternative hex + .word 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh + .word 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh + .word 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh + .word 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh + .word 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh + .word 100h,101h,102h,103h,104h,105h,106h,107h,108h,109h,10ah,10bh,10ch,10dh,10eh,10fh + .word 0fe0h,0fe1h,0fe2h,0fe3h,0fe4h,0fe5h,0fe6h,0fe7h,0fe8h,0fe9h,0feah,0febh,0fech,0fedh,0feeh,0fefh + .word 0ff0h,0ff1h,0ff2h,0ff3h,0ff4h,0ff5h,0ff6h,0ff7h,0ff8h,0ff9h,0ffah,0ffbh,0ffch,0ffdh,0ffeh,0fffh + .word 1000h,1001h,1002h,1003h,1004h,1005h,1006h,1007h,1008h,1009h,100ah,100bh,100ch,100dh,100eh,100fh + .word 7ff0h,7ff1h,7ff2h,7ff3h,7ff4h,7ff5h,7ff6h,7ff7h,7ff8h,7ff9h,7ffah,7ffbh,7ffch,7ffdh,7ffeh,7fffh + .word 8000h,8001h,8002h,8003h,8004h,8005h,8006h,8007h,8008h,8009h,800ah,800bh,800ch,800dh,800eh,800fh + .word 9ff0h,9ff1h,9ff2h,9ff3h,9ff4h,9ff5h,9ff6h,9ff7h,9ff8h,9ff9h,9ffah,9ffbh,9ffch,9ffdh,9ffeh,9fffh + .word 0a000h,0a001h,0a002h,0a003h,0a004h,0a005h,0a006h,0a007h,0a008h,0a009h,0a00ah,0a00bh,0a00ch,0a00dh,0a00eh,0a00fh + .word 0aff0h,0aff1h,0aff2h,0aff3h,0aff4h,0aff5h,0aff6h,0aff7h,0aff8h,0aff9h,0affah,0affbh,0affch,0affdh,0affeh,0afffh + .word 0b000h,0b001h,0b002h,0b003h,0b004h,0b005h,0b006h,0b007h,0b008h,0b009h,0b00ah,0b00bh,0b00ch,0b00dh,0b00eh,0b00fh + .word 0bff0h,0bff1h,0bff2h,0bff3h,0bff4h,0bff5h,0bff6h,0bff7h,0bff8h,0bff9h,0bffah,0bffbh,0bffch,0bffdh,0bffeh,0bfffh + .word 0c000h,0c001h,0c002h,0c003h,0c004h,0c005h,0c006h,0c007h,0c008h,0c009h,0c00ah,0c00bh,0c00ch,0c00dh,0c00eh,0c00fh + .word 0cff0h,0cff1h,0cff2h,0cff3h,0cff4h,0cff5h,0cff6h,0cff7h,0cff8h,0cff9h,0cffah,0cffbh,0cffch,0cffdh,0cffeh,0cfffh + .word 0d000h,0d001h,0d002h,0d003h,0d004h,0d005h,0d006h,0d007h,0d008h,0d009h,0d00ah,0d00bh,0d00ch,0d00dh,0d00eh,0d00fh + .word 0dff0h,0dff1h,0dff2h,0dff3h,0dff4h,0dff5h,0dff6h,0dff7h,0dff8h,0dff9h,0dffah,0dffbh,0dffch,0dffdh,0dffeh,0dfffh + .word 0e000h,0e001h,0e002h,0e003h,0e004h,0e005h,0e006h,0e007h,0e008h,0e009h,0e00ah,0e00bh,0e00ch,0e00dh,0e00eh,0e00fh + .word 0eff0h,0eff1h,0eff2h,0eff3h,0eff4h,0eff5h,0eff6h,0eff7h,0eff8h,0eff9h,0effah,0effbh,0effch,0effdh,0effeh,0efffh + .word 0f000h,0f001h,0f002h,0f003h,0f004h,0f005h,0f006h,0f007h,0f008h,0f009h,0f00ah,0f00bh,0f00ch,0f00dh,0f00eh,0f00fh + .word 0fff0h,0fff1h,0fff2h,0fff3h,0fff4h,0fff5h,0fff6h,0fff7h,0fff8h,0fff9h,0fffah,0fffbh,0fffch,0fffdh,0fffeh,0ffffh + + ; mix some variants + .word 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh diff --git a/test/asm/listing/103-dbyt.s b/test/asm/listing/103-dbyt.s new file mode 100644 index 000000000..1e0427dc3 --- /dev/null +++ b/test/asm/listing/103-dbyt.s @@ -0,0 +1,6076 @@ +; 2022-06-15 Spiro Trikaliotis + + + ; upper case pseudo-op + .DBYT 0 + .DBYT 1 + .DBYT 2 + .DBYT 3 + .DBYT 4 + .DBYT 5 + .DBYT 6 + .DBYT 7 + .DBYT 8 + .DBYT 9 + .DBYT 10 + .DBYT 11 + .DBYT 12 + .DBYT 13 + .DBYT 14 + .DBYT 15 + .DBYT 16 + .DBYT 17 + .DBYT 18 + .DBYT 19 + .DBYT 112 + .DBYT 113 + .DBYT 114 + .DBYT 115 + .DBYT 116 + .DBYT 117 + .DBYT 118 + .DBYT 119 + .DBYT 120 + .DBYT 121 + .DBYT 122 + .DBYT 123 + .DBYT 124 + .DBYT 125 + .DBYT 126 + .DBYT 127 + .DBYT 128 + .DBYT 129 + .DBYT 130 + .DBYT 131 + .DBYT 132 + .DBYT 133 + .DBYT 134 + .DBYT 240 + .DBYT 241 + .DBYT 242 + .DBYT 243 + .DBYT 244 + .DBYT 245 + .DBYT 246 + .DBYT 247 + .DBYT 248 + .DBYT 249 + .DBYT 250 + .DBYT 251 + .DBYT 252 + .DBYT 253 + .DBYT 254 + .DBYT 255 + .DBYT 256 + .DBYT 257 + .DBYT 258 + .DBYT 259 + .DBYT 4050 + .DBYT 4051 + .DBYT 4052 + .DBYT 4053 + .DBYT 4054 + .DBYT 4055 + .DBYT 4056 + .DBYT 4057 + .DBYT 4058 + .DBYT 4059 + .DBYT 4060 + .DBYT 4061 + .DBYT 4062 + .DBYT 4063 + .DBYT 4064 + .DBYT 4065 + .DBYT 4066 + .DBYT 4067 + .DBYT 4068 + .DBYT 4069 + .DBYT 4070 + .DBYT 4071 + .DBYT 4072 + .DBYT 4073 + .DBYT 4074 + .DBYT 4075 + .DBYT 4076 + .DBYT 4077 + .DBYT 4078 + .DBYT 4079 + .DBYT 4080 + .DBYT 4081 + .DBYT 4082 + .DBYT 4083 + .DBYT 4084 + .DBYT 4085 + .DBYT 4086 + .DBYT 4087 + .DBYT 4088 + .DBYT 4089 + .DBYT 4090 + .DBYT 4091 + .DBYT 4092 + .DBYT 4093 + .DBYT 4094 + .DBYT 4095 + .DBYT 4096 + .DBYT 4097 + .DBYT 4098 + .DBYT 4099 + .DBYT 4100 + .DBYT 4101 + .DBYT 4102 + .DBYT 4103 + .DBYT 4104 + .DBYT 32752 + .DBYT 32753 + .DBYT 32754 + .DBYT 32755 + .DBYT 32756 + .DBYT 32757 + .DBYT 32758 + .DBYT 32759 + .DBYT 32760 + .DBYT 32761 + .DBYT 32762 + .DBYT 32763 + .DBYT 32764 + .DBYT 32765 + .DBYT 32766 + .DBYT 32767 + .DBYT 32768 + .DBYT 32769 + .DBYT 32770 + .DBYT 32771 + .DBYT 32772 + .DBYT 32773 + .DBYT 32774 + .DBYT 32775 + .DBYT 32776 + .DBYT 32777 + .DBYT 32778 + .DBYT 32779 + .DBYT 40929 + .DBYT 40930 + .DBYT 40931 + .DBYT 40932 + .DBYT 40933 + .DBYT 40934 + .DBYT 40935 + .DBYT 40936 + .DBYT 40937 + .DBYT 40938 + .DBYT 40939 + .DBYT 40940 + .DBYT 40941 + .DBYT 40942 + .DBYT 40943 + .DBYT 40944 + .DBYT 40945 + .DBYT 40946 + .DBYT 40947 + .DBYT 40948 + .DBYT 40949 + .DBYT 40950 + .DBYT 40951 + .DBYT 40952 + .DBYT 40953 + .DBYT 40954 + .DBYT 40955 + .DBYT 40956 + .DBYT 40957 + .DBYT 40958 + .DBYT 40959 + .DBYT 40960 + .DBYT 40961 + .DBYT 40962 + .DBYT 40963 + .DBYT 40964 + .DBYT 40965 + .DBYT 40966 + .DBYT 40967 + .DBYT 40968 + .DBYT 40969 + .DBYT 40970 + .DBYT 40971 + .DBYT 40972 + .DBYT 40973 + .DBYT 40974 + .DBYT 40975 + .DBYT 45025 + .DBYT 45026 + .DBYT 45027 + .DBYT 45028 + .DBYT 45029 + .DBYT 45030 + .DBYT 45031 + .DBYT 45032 + .DBYT 45033 + .DBYT 45034 + .DBYT 45035 + .DBYT 45036 + .DBYT 45037 + .DBYT 45038 + .DBYT 45039 + .DBYT 45040 + .DBYT 45041 + .DBYT 45042 + .DBYT 45043 + .DBYT 45044 + .DBYT 45045 + .DBYT 45046 + .DBYT 45047 + .DBYT 45048 + .DBYT 45049 + .DBYT 45050 + .DBYT 45051 + .DBYT 45052 + .DBYT 45053 + .DBYT 45054 + .DBYT 45055 + .DBYT 45056 + .DBYT 45057 + .DBYT 45058 + .DBYT 45059 + .DBYT 45060 + .DBYT 45061 + .DBYT 45062 + .DBYT 45063 + .DBYT 45064 + .DBYT 45065 + .DBYT 45066 + .DBYT 45067 + .DBYT 45068 + .DBYT 45069 + .DBYT 45070 + .DBYT 45071 + .DBYT 49121 + .DBYT 49122 + .DBYT 49123 + .DBYT 49124 + .DBYT 49125 + .DBYT 49126 + .DBYT 49127 + .DBYT 49128 + .DBYT 49129 + .DBYT 49130 + .DBYT 49131 + .DBYT 49132 + .DBYT 49133 + .DBYT 49134 + .DBYT 49135 + .DBYT 49136 + .DBYT 49137 + .DBYT 49138 + .DBYT 49139 + .DBYT 49140 + .DBYT 49141 + .DBYT 49142 + .DBYT 49143 + .DBYT 49144 + .DBYT 49145 + .DBYT 49146 + .DBYT 49147 + .DBYT 49148 + .DBYT 49149 + .DBYT 49150 + .DBYT 49151 + .DBYT 49152 + .DBYT 49153 + .DBYT 49154 + .DBYT 49155 + .DBYT 49156 + .DBYT 49157 + .DBYT 49158 + .DBYT 49159 + .DBYT 49160 + .DBYT 49161 + .DBYT 49162 + .DBYT 49163 + .DBYT 49164 + .DBYT 49165 + .DBYT 49166 + .DBYT 49167 + .DBYT 53217 + .DBYT 53218 + .DBYT 53219 + .DBYT 53220 + .DBYT 53221 + .DBYT 53222 + .DBYT 53223 + .DBYT 53224 + .DBYT 53225 + .DBYT 53226 + .DBYT 53227 + .DBYT 53228 + .DBYT 53229 + .DBYT 53230 + .DBYT 53231 + .DBYT 53232 + .DBYT 53233 + .DBYT 53234 + .DBYT 53235 + .DBYT 53236 + .DBYT 53237 + .DBYT 53238 + .DBYT 53239 + .DBYT 53240 + .DBYT 53241 + .DBYT 53242 + .DBYT 53243 + .DBYT 53244 + .DBYT 53245 + .DBYT 53246 + .DBYT 53247 + .DBYT 53248 + .DBYT 53249 + .DBYT 53250 + .DBYT 53251 + .DBYT 53252 + .DBYT 53253 + .DBYT 53254 + .DBYT 53255 + .DBYT 53256 + .DBYT 53257 + .DBYT 53258 + .DBYT 53259 + .DBYT 53260 + .DBYT 53261 + .DBYT 53262 + .DBYT 53263 + .DBYT 57313 + .DBYT 57314 + .DBYT 57315 + .DBYT 57316 + .DBYT 57317 + .DBYT 57318 + .DBYT 57319 + .DBYT 57320 + .DBYT 57321 + .DBYT 57322 + .DBYT 57323 + .DBYT 57324 + .DBYT 57325 + .DBYT 57326 + .DBYT 57327 + .DBYT 57328 + .DBYT 57329 + .DBYT 57330 + .DBYT 57331 + .DBYT 57332 + .DBYT 57333 + .DBYT 57334 + .DBYT 57335 + .DBYT 57336 + .DBYT 57337 + .DBYT 57338 + .DBYT 57339 + .DBYT 57340 + .DBYT 57341 + .DBYT 57342 + .DBYT 57343 + .DBYT 57344 + .DBYT 57345 + .DBYT 57346 + .DBYT 57347 + .DBYT 57348 + .DBYT 57349 + .DBYT 57350 + .DBYT 57351 + .DBYT 57352 + .DBYT 57353 + .DBYT 57354 + .DBYT 57355 + .DBYT 57356 + .DBYT 57357 + .DBYT 57358 + .DBYT 57359 + .DBYT 61409 + .DBYT 61410 + .DBYT 61411 + .DBYT 61412 + .DBYT 61413 + .DBYT 61414 + .DBYT 61415 + .DBYT 61416 + .DBYT 61417 + .DBYT 61418 + .DBYT 61419 + .DBYT 61420 + .DBYT 61421 + .DBYT 61422 + .DBYT 61423 + .DBYT 61424 + .DBYT 61425 + .DBYT 61426 + .DBYT 61427 + .DBYT 61428 + .DBYT 61429 + .DBYT 61430 + .DBYT 61431 + .DBYT 61432 + .DBYT 61433 + .DBYT 61434 + .DBYT 61435 + .DBYT 61436 + .DBYT 61437 + .DBYT 61438 + .DBYT 61439 + .DBYT 61440 + .DBYT 61441 + .DBYT 61442 + .DBYT 61443 + .DBYT 61444 + .DBYT 61445 + .DBYT 61446 + .DBYT 61447 + .DBYT 61448 + .DBYT 61449 + .DBYT 61450 + .DBYT 61451 + .DBYT 61452 + .DBYT 61453 + .DBYT 61454 + .DBYT 61455 + .DBYT 65505 + .DBYT 65506 + .DBYT 65507 + .DBYT 65508 + .DBYT 65509 + .DBYT 65510 + .DBYT 65511 + .DBYT 65512 + .DBYT 65513 + .DBYT 65514 + .DBYT 65515 + .DBYT 65516 + .DBYT 65517 + .DBYT 65518 + .DBYT 65519 + .DBYT 65520 + .DBYT 65521 + .DBYT 65522 + .DBYT 65523 + .DBYT 65524 + .DBYT 65525 + .DBYT 65526 + .DBYT 65527 + .DBYT 65528 + .DBYT 65529 + .DBYT 65530 + .DBYT 65531 + .DBYT 65532 + .DBYT 65533 + .DBYT 65534 + .DBYT 65535 + + ; lower case pseudo-op + .dbyt 0 + .dbyt 1 + .dbyt 2 + .dbyt 3 + .dbyt 4 + .dbyt 5 + .dbyt 6 + .dbyt 7 + .dbyt 8 + .dbyt 9 + .dbyt 10 + .dbyt 11 + .dbyt 12 + .dbyt 13 + .dbyt 14 + .dbyt 15 + .dbyt 16 + .dbyt 17 + .dbyt 18 + .dbyt 19 + .dbyt 112 + .dbyt 113 + .dbyt 114 + .dbyt 115 + .dbyt 116 + .dbyt 117 + .dbyt 118 + .dbyt 119 + .dbyt 120 + .dbyt 121 + .dbyt 122 + .dbyt 123 + .dbyt 124 + .dbyt 125 + .dbyt 126 + .dbyt 127 + .dbyt 128 + .dbyt 129 + .dbyt 130 + .dbyt 131 + .dbyt 132 + .dbyt 133 + .dbyt 134 + .dbyt 240 + .dbyt 241 + .dbyt 242 + .dbyt 243 + .dbyt 244 + .dbyt 245 + .dbyt 246 + .dbyt 247 + .dbyt 248 + .dbyt 249 + .dbyt 250 + .dbyt 251 + .dbyt 252 + .dbyt 253 + .dbyt 254 + .dbyt 255 + .dbyt 256 + .dbyt 257 + .dbyt 258 + .dbyt 259 + .dbyt 4050 + .dbyt 4051 + .dbyt 4052 + .dbyt 4053 + .dbyt 4054 + .dbyt 4055 + .dbyt 4056 + .dbyt 4057 + .dbyt 4058 + .dbyt 4059 + .dbyt 4060 + .dbyt 4061 + .dbyt 4062 + .dbyt 4063 + .dbyt 4064 + .dbyt 4065 + .dbyt 4066 + .dbyt 4067 + .dbyt 4068 + .dbyt 4069 + .dbyt 4070 + .dbyt 4071 + .dbyt 4072 + .dbyt 4073 + .dbyt 4074 + .dbyt 4075 + .dbyt 4076 + .dbyt 4077 + .dbyt 4078 + .dbyt 4079 + .dbyt 4080 + .dbyt 4081 + .dbyt 4082 + .dbyt 4083 + .dbyt 4084 + .dbyt 4085 + .dbyt 4086 + .dbyt 4087 + .dbyt 4088 + .dbyt 4089 + .dbyt 4090 + .dbyt 4091 + .dbyt 4092 + .dbyt 4093 + .dbyt 4094 + .dbyt 4095 + .dbyt 4096 + .dbyt 4097 + .dbyt 4098 + .dbyt 4099 + .dbyt 4100 + .dbyt 4101 + .dbyt 4102 + .dbyt 4103 + .dbyt 4104 + .dbyt 32752 + .dbyt 32753 + .dbyt 32754 + .dbyt 32755 + .dbyt 32756 + .dbyt 32757 + .dbyt 32758 + .dbyt 32759 + .dbyt 32760 + .dbyt 32761 + .dbyt 32762 + .dbyt 32763 + .dbyt 32764 + .dbyt 32765 + .dbyt 32766 + .dbyt 32767 + .dbyt 32768 + .dbyt 32769 + .dbyt 32770 + .dbyt 32771 + .dbyt 32772 + .dbyt 32773 + .dbyt 32774 + .dbyt 32775 + .dbyt 32776 + .dbyt 32777 + .dbyt 32778 + .dbyt 32779 + .dbyt 40929 + .dbyt 40930 + .dbyt 40931 + .dbyt 40932 + .dbyt 40933 + .dbyt 40934 + .dbyt 40935 + .dbyt 40936 + .dbyt 40937 + .dbyt 40938 + .dbyt 40939 + .dbyt 40940 + .dbyt 40941 + .dbyt 40942 + .dbyt 40943 + .dbyt 40944 + .dbyt 40945 + .dbyt 40946 + .dbyt 40947 + .dbyt 40948 + .dbyt 40949 + .dbyt 40950 + .dbyt 40951 + .dbyt 40952 + .dbyt 40953 + .dbyt 40954 + .dbyt 40955 + .dbyt 40956 + .dbyt 40957 + .dbyt 40958 + .dbyt 40959 + .dbyt 40960 + .dbyt 40961 + .dbyt 40962 + .dbyt 40963 + .dbyt 40964 + .dbyt 40965 + .dbyt 40966 + .dbyt 40967 + .dbyt 40968 + .dbyt 40969 + .dbyt 40970 + .dbyt 40971 + .dbyt 40972 + .dbyt 40973 + .dbyt 40974 + .dbyt 40975 + .dbyt 45025 + .dbyt 45026 + .dbyt 45027 + .dbyt 45028 + .dbyt 45029 + .dbyt 45030 + .dbyt 45031 + .dbyt 45032 + .dbyt 45033 + .dbyt 45034 + .dbyt 45035 + .dbyt 45036 + .dbyt 45037 + .dbyt 45038 + .dbyt 45039 + .dbyt 45040 + .dbyt 45041 + .dbyt 45042 + .dbyt 45043 + .dbyt 45044 + .dbyt 45045 + .dbyt 45046 + .dbyt 45047 + .dbyt 45048 + .dbyt 45049 + .dbyt 45050 + .dbyt 45051 + .dbyt 45052 + .dbyt 45053 + .dbyt 45054 + .dbyt 45055 + .dbyt 45056 + .dbyt 45057 + .dbyt 45058 + .dbyt 45059 + .dbyt 45060 + .dbyt 45061 + .dbyt 45062 + .dbyt 45063 + .dbyt 45064 + .dbyt 45065 + .dbyt 45066 + .dbyt 45067 + .dbyt 45068 + .dbyt 45069 + .dbyt 45070 + .dbyt 45071 + .dbyt 49121 + .dbyt 49122 + .dbyt 49123 + .dbyt 49124 + .dbyt 49125 + .dbyt 49126 + .dbyt 49127 + .dbyt 49128 + .dbyt 49129 + .dbyt 49130 + .dbyt 49131 + .dbyt 49132 + .dbyt 49133 + .dbyt 49134 + .dbyt 49135 + .dbyt 49136 + .dbyt 49137 + .dbyt 49138 + .dbyt 49139 + .dbyt 49140 + .dbyt 49141 + .dbyt 49142 + .dbyt 49143 + .dbyt 49144 + .dbyt 49145 + .dbyt 49146 + .dbyt 49147 + .dbyt 49148 + .dbyt 49149 + .dbyt 49150 + .dbyt 49151 + .dbyt 49152 + .dbyt 49153 + .dbyt 49154 + .dbyt 49155 + .dbyt 49156 + .dbyt 49157 + .dbyt 49158 + .dbyt 49159 + .dbyt 49160 + .dbyt 49161 + .dbyt 49162 + .dbyt 49163 + .dbyt 49164 + .dbyt 49165 + .dbyt 49166 + .dbyt 49167 + .dbyt 53217 + .dbyt 53218 + .dbyt 53219 + .dbyt 53220 + .dbyt 53221 + .dbyt 53222 + .dbyt 53223 + .dbyt 53224 + .dbyt 53225 + .dbyt 53226 + .dbyt 53227 + .dbyt 53228 + .dbyt 53229 + .dbyt 53230 + .dbyt 53231 + .dbyt 53232 + .dbyt 53233 + .dbyt 53234 + .dbyt 53235 + .dbyt 53236 + .dbyt 53237 + .dbyt 53238 + .dbyt 53239 + .dbyt 53240 + .dbyt 53241 + .dbyt 53242 + .dbyt 53243 + .dbyt 53244 + .dbyt 53245 + .dbyt 53246 + .dbyt 53247 + .dbyt 53248 + .dbyt 53249 + .dbyt 53250 + .dbyt 53251 + .dbyt 53252 + .dbyt 53253 + .dbyt 53254 + .dbyt 53255 + .dbyt 53256 + .dbyt 53257 + .dbyt 53258 + .dbyt 53259 + .dbyt 53260 + .dbyt 53261 + .dbyt 53262 + .dbyt 53263 + .dbyt 57313 + .dbyt 57314 + .dbyt 57315 + .dbyt 57316 + .dbyt 57317 + .dbyt 57318 + .dbyt 57319 + .dbyt 57320 + .dbyt 57321 + .dbyt 57322 + .dbyt 57323 + .dbyt 57324 + .dbyt 57325 + .dbyt 57326 + .dbyt 57327 + .dbyt 57328 + .dbyt 57329 + .dbyt 57330 + .dbyt 57331 + .dbyt 57332 + .dbyt 57333 + .dbyt 57334 + .dbyt 57335 + .dbyt 57336 + .dbyt 57337 + .dbyt 57338 + .dbyt 57339 + .dbyt 57340 + .dbyt 57341 + .dbyt 57342 + .dbyt 57343 + .dbyt 57344 + .dbyt 57345 + .dbyt 57346 + .dbyt 57347 + .dbyt 57348 + .dbyt 57349 + .dbyt 57350 + .dbyt 57351 + .dbyt 57352 + .dbyt 57353 + .dbyt 57354 + .dbyt 57355 + .dbyt 57356 + .dbyt 57357 + .dbyt 57358 + .dbyt 57359 + .dbyt 61409 + .dbyt 61410 + .dbyt 61411 + .dbyt 61412 + .dbyt 61413 + .dbyt 61414 + .dbyt 61415 + .dbyt 61416 + .dbyt 61417 + .dbyt 61418 + .dbyt 61419 + .dbyt 61420 + .dbyt 61421 + .dbyt 61422 + .dbyt 61423 + .dbyt 61424 + .dbyt 61425 + .dbyt 61426 + .dbyt 61427 + .dbyt 61428 + .dbyt 61429 + .dbyt 61430 + .dbyt 61431 + .dbyt 61432 + .dbyt 61433 + .dbyt 61434 + .dbyt 61435 + .dbyt 61436 + .dbyt 61437 + .dbyt 61438 + .dbyt 61439 + .dbyt 61440 + .dbyt 61441 + .dbyt 61442 + .dbyt 61443 + .dbyt 61444 + .dbyt 61445 + .dbyt 61446 + .dbyt 61447 + .dbyt 61448 + .dbyt 61449 + .dbyt 61450 + .dbyt 61451 + .dbyt 61452 + .dbyt 61453 + .dbyt 61454 + .dbyt 61455 + .dbyt 65505 + .dbyt 65506 + .dbyt 65507 + .dbyt 65508 + .dbyt 65509 + .dbyt 65510 + .dbyt 65511 + .dbyt 65512 + .dbyt 65513 + .dbyt 65514 + .dbyt 65515 + .dbyt 65516 + .dbyt 65517 + .dbyt 65518 + .dbyt 65519 + .dbyt 65520 + .dbyt 65521 + .dbyt 65522 + .dbyt 65523 + .dbyt 65524 + .dbyt 65525 + .dbyt 65526 + .dbyt 65527 + .dbyt 65528 + .dbyt 65529 + .dbyt 65530 + .dbyt 65531 + .dbyt 65532 + .dbyt 65533 + .dbyt 65534 + .dbyt 65535 + + ; hex values + .dbyt $0 + .dbyt $1 + .dbyt $2 + .dbyt $3 + .dbyt $4 + .dbyt $5 + .dbyt $6 + .dbyt $7 + .dbyt $8 + .dbyt $9 + .dbyt $a + .dbyt $b + .dbyt $c + .dbyt $d + .dbyt $e + .dbyt $f + .dbyt $10 + .dbyt $11 + .dbyt $12 + .dbyt $13 + .dbyt $70 + .dbyt $71 + .dbyt $72 + .dbyt $73 + .dbyt $74 + .dbyt $75 + .dbyt $76 + .dbyt $77 + .dbyt $78 + .dbyt $79 + .dbyt $7a + .dbyt $7b + .dbyt $7c + .dbyt $7d + .dbyt $7e + .dbyt $7f + .dbyt $80 + .dbyt $81 + .dbyt $82 + .dbyt $83 + .dbyt $84 + .dbyt $85 + .dbyt $86 + .dbyt $f0 + .dbyt $f1 + .dbyt $f2 + .dbyt $f3 + .dbyt $f4 + .dbyt $f5 + .dbyt $f6 + .dbyt $f7 + .dbyt $f8 + .dbyt $f9 + .dbyt $fa + .dbyt $fb + .dbyt $fc + .dbyt $fd + .dbyt $fe + .dbyt $ff + .dbyt $100 + .dbyt $101 + .dbyt $102 + .dbyt $103 + .dbyt $fd2 + .dbyt $fd3 + .dbyt $fd4 + .dbyt $fd5 + .dbyt $fd6 + .dbyt $fd7 + .dbyt $fd8 + .dbyt $fd9 + .dbyt $fda + .dbyt $fdb + .dbyt $fdc + .dbyt $fdd + .dbyt $fde + .dbyt $fdf + .dbyt $fe0 + .dbyt $fe1 + .dbyt $fe2 + .dbyt $fe3 + .dbyt $fe4 + .dbyt $fe5 + .dbyt $fe6 + .dbyt $fe7 + .dbyt $fe8 + .dbyt $fe9 + .dbyt $fea + .dbyt $feb + .dbyt $fec + .dbyt $fed + .dbyt $fee + .dbyt $fef + .dbyt $ff0 + .dbyt $ff1 + .dbyt $ff2 + .dbyt $ff3 + .dbyt $ff4 + .dbyt $ff5 + .dbyt $ff6 + .dbyt $ff7 + .dbyt $ff8 + .dbyt $ff9 + .dbyt $ffa + .dbyt $ffb + .dbyt $ffc + .dbyt $ffd + .dbyt $ffe + .dbyt $fff + .dbyt $1000 + .dbyt $1001 + .dbyt $1002 + .dbyt $1003 + .dbyt $1004 + .dbyt $1005 + .dbyt $1006 + .dbyt $1007 + .dbyt $1008 + .dbyt $7ff0 + .dbyt $7ff1 + .dbyt $7ff2 + .dbyt $7ff3 + .dbyt $7ff4 + .dbyt $7ff5 + .dbyt $7ff6 + .dbyt $7ff7 + .dbyt $7ff8 + .dbyt $7ff9 + .dbyt $7ffa + .dbyt $7ffb + .dbyt $7ffc + .dbyt $7ffd + .dbyt $7ffe + .dbyt $7fff + .dbyt $8000 + .dbyt $8001 + .dbyt $8002 + .dbyt $8003 + .dbyt $8004 + .dbyt $8005 + .dbyt $8006 + .dbyt $8007 + .dbyt $8008 + .dbyt $8009 + .dbyt $800a + .dbyt $800b + .dbyt $9fe1 + .dbyt $9fe2 + .dbyt $9fe3 + .dbyt $9fe4 + .dbyt $9fe5 + .dbyt $9fe6 + .dbyt $9fe7 + .dbyt $9fe8 + .dbyt $9fe9 + .dbyt $9fea + .dbyt $9feb + .dbyt $9fec + .dbyt $9fed + .dbyt $9fee + .dbyt $9fef + .dbyt $9ff0 + .dbyt $9ff1 + .dbyt $9ff2 + .dbyt $9ff3 + .dbyt $9ff4 + .dbyt $9ff5 + .dbyt $9ff6 + .dbyt $9ff7 + .dbyt $9ff8 + .dbyt $9ff9 + .dbyt $9ffa + .dbyt $9ffb + .dbyt $9ffc + .dbyt $9ffd + .dbyt $9ffe + .dbyt $9fff + .dbyt $a000 + .dbyt $a001 + .dbyt $a002 + .dbyt $a003 + .dbyt $a004 + .dbyt $a005 + .dbyt $a006 + .dbyt $a007 + .dbyt $a008 + .dbyt $a009 + .dbyt $a00a + .dbyt $a00b + .dbyt $a00c + .dbyt $a00d + .dbyt $a00e + .dbyt $a00f + .dbyt $afe1 + .dbyt $afe2 + .dbyt $afe3 + .dbyt $afe4 + .dbyt $afe5 + .dbyt $afe6 + .dbyt $afe7 + .dbyt $afe8 + .dbyt $afe9 + .dbyt $afea + .dbyt $afeb + .dbyt $afec + .dbyt $afed + .dbyt $afee + .dbyt $afef + .dbyt $aff0 + .dbyt $aff1 + .dbyt $aff2 + .dbyt $aff3 + .dbyt $aff4 + .dbyt $aff5 + .dbyt $aff6 + .dbyt $aff7 + .dbyt $aff8 + .dbyt $aff9 + .dbyt $affa + .dbyt $affb + .dbyt $affc + .dbyt $affd + .dbyt $affe + .dbyt $afff + .dbyt $b000 + .dbyt $b001 + .dbyt $b002 + .dbyt $b003 + .dbyt $b004 + .dbyt $b005 + .dbyt $b006 + .dbyt $b007 + .dbyt $b008 + .dbyt $b009 + .dbyt $b00a + .dbyt $b00b + .dbyt $b00c + .dbyt $b00d + .dbyt $b00e + .dbyt $b00f + .dbyt $bfe1 + .dbyt $bfe2 + .dbyt $bfe3 + .dbyt $bfe4 + .dbyt $bfe5 + .dbyt $bfe6 + .dbyt $bfe7 + .dbyt $bfe8 + .dbyt $bfe9 + .dbyt $bfea + .dbyt $bfeb + .dbyt $bfec + .dbyt $bfed + .dbyt $bfee + .dbyt $bfef + .dbyt $bff0 + .dbyt $bff1 + .dbyt $bff2 + .dbyt $bff3 + .dbyt $bff4 + .dbyt $bff5 + .dbyt $bff6 + .dbyt $bff7 + .dbyt $bff8 + .dbyt $bff9 + .dbyt $bffa + .dbyt $bffb + .dbyt $bffc + .dbyt $bffd + .dbyt $bffe + .dbyt $bfff + .dbyt $c000 + .dbyt $c001 + .dbyt $c002 + .dbyt $c003 + .dbyt $c004 + .dbyt $c005 + .dbyt $c006 + .dbyt $c007 + .dbyt $c008 + .dbyt $c009 + .dbyt $c00a + .dbyt $c00b + .dbyt $c00c + .dbyt $c00d + .dbyt $c00e + .dbyt $c00f + .dbyt $cfe1 + .dbyt $cfe2 + .dbyt $cfe3 + .dbyt $cfe4 + .dbyt $cfe5 + .dbyt $cfe6 + .dbyt $cfe7 + .dbyt $cfe8 + .dbyt $cfe9 + .dbyt $cfea + .dbyt $cfeb + .dbyt $cfec + .dbyt $cfed + .dbyt $cfee + .dbyt $cfef + .dbyt $cff0 + .dbyt $cff1 + .dbyt $cff2 + .dbyt $cff3 + .dbyt $cff4 + .dbyt $cff5 + .dbyt $cff6 + .dbyt $cff7 + .dbyt $cff8 + .dbyt $cff9 + .dbyt $cffa + .dbyt $cffb + .dbyt $cffc + .dbyt $cffd + .dbyt $cffe + .dbyt $cfff + .dbyt $d000 + .dbyt $d001 + .dbyt $d002 + .dbyt $d003 + .dbyt $d004 + .dbyt $d005 + .dbyt $d006 + .dbyt $d007 + .dbyt $d008 + .dbyt $d009 + .dbyt $d00a + .dbyt $d00b + .dbyt $d00c + .dbyt $d00d + .dbyt $d00e + .dbyt $d00f + .dbyt $dfe1 + .dbyt $dfe2 + .dbyt $dfe3 + .dbyt $dfe4 + .dbyt $dfe5 + .dbyt $dfe6 + .dbyt $dfe7 + .dbyt $dfe8 + .dbyt $dfe9 + .dbyt $dfea + .dbyt $dfeb + .dbyt $dfec + .dbyt $dfed + .dbyt $dfee + .dbyt $dfef + .dbyt $dff0 + .dbyt $dff1 + .dbyt $dff2 + .dbyt $dff3 + .dbyt $dff4 + .dbyt $dff5 + .dbyt $dff6 + .dbyt $dff7 + .dbyt $dff8 + .dbyt $dff9 + .dbyt $dffa + .dbyt $dffb + .dbyt $dffc + .dbyt $dffd + .dbyt $dffe + .dbyt $dfff + .dbyt $e000 + .dbyt $e001 + .dbyt $e002 + .dbyt $e003 + .dbyt $e004 + .dbyt $e005 + .dbyt $e006 + .dbyt $e007 + .dbyt $e008 + .dbyt $e009 + .dbyt $e00a + .dbyt $e00b + .dbyt $e00c + .dbyt $e00d + .dbyt $e00e + .dbyt $e00f + .dbyt $efe1 + .dbyt $efe2 + .dbyt $efe3 + .dbyt $efe4 + .dbyt $efe5 + .dbyt $efe6 + .dbyt $efe7 + .dbyt $efe8 + .dbyt $efe9 + .dbyt $efea + .dbyt $efeb + .dbyt $efec + .dbyt $efed + .dbyt $efee + .dbyt $efef + .dbyt $eff0 + .dbyt $eff1 + .dbyt $eff2 + .dbyt $eff3 + .dbyt $eff4 + .dbyt $eff5 + .dbyt $eff6 + .dbyt $eff7 + .dbyt $eff8 + .dbyt $eff9 + .dbyt $effa + .dbyt $effb + .dbyt $effc + .dbyt $effd + .dbyt $effe + .dbyt $efff + .dbyt $f000 + .dbyt $f001 + .dbyt $f002 + .dbyt $f003 + .dbyt $f004 + .dbyt $f005 + .dbyt $f006 + .dbyt $f007 + .dbyt $f008 + .dbyt $f009 + .dbyt $f00a + .dbyt $f00b + .dbyt $f00c + .dbyt $f00d + .dbyt $f00e + .dbyt $f00f + .dbyt $ffe1 + .dbyt $ffe2 + .dbyt $ffe3 + .dbyt $ffe4 + .dbyt $ffe5 + .dbyt $ffe6 + .dbyt $ffe7 + .dbyt $ffe8 + .dbyt $ffe9 + .dbyt $ffea + .dbyt $ffeb + .dbyt $ffec + .dbyt $ffed + .dbyt $ffee + .dbyt $ffef + .dbyt $fff0 + .dbyt $fff1 + .dbyt $fff2 + .dbyt $fff3 + .dbyt $fff4 + .dbyt $fff5 + .dbyt $fff6 + .dbyt $fff7 + .dbyt $fff8 + .dbyt $fff9 + .dbyt $fffa + .dbyt $fffb + .dbyt $fffc + .dbyt $fffd + .dbyt $fffe + .dbyt $ffff + + ; hex values, uppercase + .dbyt $0 + .dbyt $1 + .dbyt $2 + .dbyt $3 + .dbyt $4 + .dbyt $5 + .dbyt $6 + .dbyt $7 + .dbyt $8 + .dbyt $9 + .dbyt $A + .dbyt $B + .dbyt $C + .dbyt $D + .dbyt $E + .dbyt $F + .dbyt $10 + .dbyt $11 + .dbyt $12 + .dbyt $13 + .dbyt $70 + .dbyt $71 + .dbyt $72 + .dbyt $73 + .dbyt $74 + .dbyt $75 + .dbyt $76 + .dbyt $77 + .dbyt $78 + .dbyt $79 + .dbyt $7A + .dbyt $7B + .dbyt $7C + .dbyt $7D + .dbyt $7E + .dbyt $7F + .dbyt $80 + .dbyt $81 + .dbyt $82 + .dbyt $83 + .dbyt $84 + .dbyt $85 + .dbyt $86 + .dbyt $F0 + .dbyt $F1 + .dbyt $F2 + .dbyt $F3 + .dbyt $F4 + .dbyt $F5 + .dbyt $F6 + .dbyt $F7 + .dbyt $F8 + .dbyt $F9 + .dbyt $FA + .dbyt $FB + .dbyt $FC + .dbyt $FD + .dbyt $FE + .dbyt $FF + .dbyt $100 + .dbyt $101 + .dbyt $102 + .dbyt $103 + .dbyt $FD2 + .dbyt $FD3 + .dbyt $FD4 + .dbyt $FD5 + .dbyt $FD6 + .dbyt $FD7 + .dbyt $FD8 + .dbyt $FD9 + .dbyt $FDA + .dbyt $FDB + .dbyt $FDC + .dbyt $FDD + .dbyt $FDE + .dbyt $FDF + .dbyt $FE0 + .dbyt $FE1 + .dbyt $FE2 + .dbyt $FE3 + .dbyt $FE4 + .dbyt $FE5 + .dbyt $FE6 + .dbyt $FE7 + .dbyt $FE8 + .dbyt $FE9 + .dbyt $FEA + .dbyt $FEB + .dbyt $FEC + .dbyt $FED + .dbyt $FEE + .dbyt $FEF + .dbyt $FF0 + .dbyt $FF1 + .dbyt $FF2 + .dbyt $FF3 + .dbyt $FF4 + .dbyt $FF5 + .dbyt $FF6 + .dbyt $FF7 + .dbyt $FF8 + .dbyt $FF9 + .dbyt $FFA + .dbyt $FFB + .dbyt $FFC + .dbyt $FFD + .dbyt $FFE + .dbyt $FFF + .dbyt $1000 + .dbyt $1001 + .dbyt $1002 + .dbyt $1003 + .dbyt $1004 + .dbyt $1005 + .dbyt $1006 + .dbyt $1007 + .dbyt $1008 + .dbyt $7FF0 + .dbyt $7FF1 + .dbyt $7FF2 + .dbyt $7FF3 + .dbyt $7FF4 + .dbyt $7FF5 + .dbyt $7FF6 + .dbyt $7FF7 + .dbyt $7FF8 + .dbyt $7FF9 + .dbyt $7FFA + .dbyt $7FFB + .dbyt $7FFC + .dbyt $7FFD + .dbyt $7FFE + .dbyt $7FFF + .dbyt $8000 + .dbyt $8001 + .dbyt $8002 + .dbyt $8003 + .dbyt $8004 + .dbyt $8005 + .dbyt $8006 + .dbyt $8007 + .dbyt $8008 + .dbyt $8009 + .dbyt $800A + .dbyt $800B + .dbyt $9FE1 + .dbyt $9FE2 + .dbyt $9FE3 + .dbyt $9FE4 + .dbyt $9FE5 + .dbyt $9FE6 + .dbyt $9FE7 + .dbyt $9FE8 + .dbyt $9FE9 + .dbyt $9FEA + .dbyt $9FEB + .dbyt $9FEC + .dbyt $9FED + .dbyt $9FEE + .dbyt $9FEF + .dbyt $9FF0 + .dbyt $9FF1 + .dbyt $9FF2 + .dbyt $9FF3 + .dbyt $9FF4 + .dbyt $9FF5 + .dbyt $9FF6 + .dbyt $9FF7 + .dbyt $9FF8 + .dbyt $9FF9 + .dbyt $9FFA + .dbyt $9FFB + .dbyt $9FFC + .dbyt $9FFD + .dbyt $9FFE + .dbyt $9FFF + .dbyt $A000 + .dbyt $A001 + .dbyt $A002 + .dbyt $A003 + .dbyt $A004 + .dbyt $A005 + .dbyt $A006 + .dbyt $A007 + .dbyt $A008 + .dbyt $A009 + .dbyt $A00A + .dbyt $A00B + .dbyt $A00C + .dbyt $A00D + .dbyt $A00E + .dbyt $A00F + .dbyt $AFE1 + .dbyt $AFE2 + .dbyt $AFE3 + .dbyt $AFE4 + .dbyt $AFE5 + .dbyt $AFE6 + .dbyt $AFE7 + .dbyt $AFE8 + .dbyt $AFE9 + .dbyt $AFEA + .dbyt $AFEB + .dbyt $AFEC + .dbyt $AFED + .dbyt $AFEE + .dbyt $AFEF + .dbyt $AFF0 + .dbyt $AFF1 + .dbyt $AFF2 + .dbyt $AFF3 + .dbyt $AFF4 + .dbyt $AFF5 + .dbyt $AFF6 + .dbyt $AFF7 + .dbyt $AFF8 + .dbyt $AFF9 + .dbyt $AFFA + .dbyt $AFFB + .dbyt $AFFC + .dbyt $AFFD + .dbyt $AFFE + .dbyt $AFFF + .dbyt $B000 + .dbyt $B001 + .dbyt $B002 + .dbyt $B003 + .dbyt $B004 + .dbyt $B005 + .dbyt $B006 + .dbyt $B007 + .dbyt $B008 + .dbyt $B009 + .dbyt $B00A + .dbyt $B00B + .dbyt $B00C + .dbyt $B00D + .dbyt $B00E + .dbyt $B00F + .dbyt $BFE1 + .dbyt $BFE2 + .dbyt $BFE3 + .dbyt $BFE4 + .dbyt $BFE5 + .dbyt $BFE6 + .dbyt $BFE7 + .dbyt $BFE8 + .dbyt $BFE9 + .dbyt $BFEA + .dbyt $BFEB + .dbyt $BFEC + .dbyt $BFED + .dbyt $BFEE + .dbyt $BFEF + .dbyt $BFF0 + .dbyt $BFF1 + .dbyt $BFF2 + .dbyt $BFF3 + .dbyt $BFF4 + .dbyt $BFF5 + .dbyt $BFF6 + .dbyt $BFF7 + .dbyt $BFF8 + .dbyt $BFF9 + .dbyt $BFFA + .dbyt $BFFB + .dbyt $BFFC + .dbyt $BFFD + .dbyt $BFFE + .dbyt $BFFF + .dbyt $C000 + .dbyt $C001 + .dbyt $C002 + .dbyt $C003 + .dbyt $C004 + .dbyt $C005 + .dbyt $C006 + .dbyt $C007 + .dbyt $C008 + .dbyt $C009 + .dbyt $C00A + .dbyt $C00B + .dbyt $C00C + .dbyt $C00D + .dbyt $C00E + .dbyt $C00F + .dbyt $CFE1 + .dbyt $CFE2 + .dbyt $CFE3 + .dbyt $CFE4 + .dbyt $CFE5 + .dbyt $CFE6 + .dbyt $CFE7 + .dbyt $CFE8 + .dbyt $CFE9 + .dbyt $CFEA + .dbyt $CFEB + .dbyt $CFEC + .dbyt $CFED + .dbyt $CFEE + .dbyt $CFEF + .dbyt $CFF0 + .dbyt $CFF1 + .dbyt $CFF2 + .dbyt $CFF3 + .dbyt $CFF4 + .dbyt $CFF5 + .dbyt $CFF6 + .dbyt $CFF7 + .dbyt $CFF8 + .dbyt $CFF9 + .dbyt $CFFA + .dbyt $CFFB + .dbyt $CFFC + .dbyt $CFFD + .dbyt $CFFE + .dbyt $CFFF + .dbyt $D000 + .dbyt $D001 + .dbyt $D002 + .dbyt $D003 + .dbyt $D004 + .dbyt $D005 + .dbyt $D006 + .dbyt $D007 + .dbyt $D008 + .dbyt $D009 + .dbyt $D00A + .dbyt $D00B + .dbyt $D00C + .dbyt $D00D + .dbyt $D00E + .dbyt $D00F + .dbyt $DFE1 + .dbyt $DFE2 + .dbyt $DFE3 + .dbyt $DFE4 + .dbyt $DFE5 + .dbyt $DFE6 + .dbyt $DFE7 + .dbyt $DFE8 + .dbyt $DFE9 + .dbyt $DFEA + .dbyt $DFEB + .dbyt $DFEC + .dbyt $DFED + .dbyt $DFEE + .dbyt $DFEF + .dbyt $DFF0 + .dbyt $DFF1 + .dbyt $DFF2 + .dbyt $DFF3 + .dbyt $DFF4 + .dbyt $DFF5 + .dbyt $DFF6 + .dbyt $DFF7 + .dbyt $DFF8 + .dbyt $DFF9 + .dbyt $DFFA + .dbyt $DFFB + .dbyt $DFFC + .dbyt $DFFD + .dbyt $DFFE + .dbyt $DFFF + .dbyt $E000 + .dbyt $E001 + .dbyt $E002 + .dbyt $E003 + .dbyt $E004 + .dbyt $E005 + .dbyt $E006 + .dbyt $E007 + .dbyt $E008 + .dbyt $E009 + .dbyt $E00A + .dbyt $E00B + .dbyt $E00C + .dbyt $E00D + .dbyt $E00E + .dbyt $E00F + .dbyt $EFE1 + .dbyt $EFE2 + .dbyt $EFE3 + .dbyt $EFE4 + .dbyt $EFE5 + .dbyt $EFE6 + .dbyt $EFE7 + .dbyt $EFE8 + .dbyt $EFE9 + .dbyt $EFEA + .dbyt $EFEB + .dbyt $EFEC + .dbyt $EFED + .dbyt $EFEE + .dbyt $EFEF + .dbyt $EFF0 + .dbyt $EFF1 + .dbyt $EFF2 + .dbyt $EFF3 + .dbyt $EFF4 + .dbyt $EFF5 + .dbyt $EFF6 + .dbyt $EFF7 + .dbyt $EFF8 + .dbyt $EFF9 + .dbyt $EFFA + .dbyt $EFFB + .dbyt $EFFC + .dbyt $EFFD + .dbyt $EFFE + .dbyt $EFFF + .dbyt $F000 + .dbyt $F001 + .dbyt $F002 + .dbyt $F003 + .dbyt $F004 + .dbyt $F005 + .dbyt $F006 + .dbyt $F007 + .dbyt $F008 + .dbyt $F009 + .dbyt $F00A + .dbyt $F00B + .dbyt $F00C + .dbyt $F00D + .dbyt $F00E + .dbyt $F00F + .dbyt $FFE1 + .dbyt $FFE2 + .dbyt $FFE3 + .dbyt $FFE4 + .dbyt $FFE5 + .dbyt $FFE6 + .dbyt $FFE7 + .dbyt $FFE8 + .dbyt $FFE9 + .dbyt $FFEA + .dbyt $FFEB + .dbyt $FFEC + .dbyt $FFED + .dbyt $FFEE + .dbyt $FFEF + .dbyt $FFF0 + .dbyt $FFF1 + .dbyt $FFF2 + .dbyt $FFF3 + .dbyt $FFF4 + .dbyt $FFF5 + .dbyt $FFF6 + .dbyt $FFF7 + .dbyt $FFF8 + .dbyt $FFF9 + .dbyt $FFFA + .dbyt $FFFB + .dbyt $FFFC + .dbyt $FFFD + .dbyt $FFFE + .dbyt $FFFF + + ; 4-digit hex values + .dbyt $0000 + .dbyt $0001 + .dbyt $0002 + .dbyt $0003 + .dbyt $0004 + .dbyt $0005 + .dbyt $0006 + .dbyt $0007 + .dbyt $0008 + .dbyt $0009 + .dbyt $000a + .dbyt $000b + .dbyt $000c + .dbyt $000d + .dbyt $000e + .dbyt $000f + .dbyt $0010 + .dbyt $0011 + .dbyt $0012 + .dbyt $0013 + .dbyt $0070 + .dbyt $0071 + .dbyt $0072 + .dbyt $0073 + .dbyt $0074 + .dbyt $0075 + .dbyt $0076 + .dbyt $0077 + .dbyt $0078 + .dbyt $0079 + .dbyt $007a + .dbyt $007b + .dbyt $007c + .dbyt $007d + .dbyt $007e + .dbyt $007f + .dbyt $0080 + .dbyt $0081 + .dbyt $0082 + .dbyt $0083 + .dbyt $0084 + .dbyt $0085 + .dbyt $0086 + .dbyt $00f0 + .dbyt $00f1 + .dbyt $00f2 + .dbyt $00f3 + .dbyt $00f4 + .dbyt $00f5 + .dbyt $00f6 + .dbyt $00f7 + .dbyt $00f8 + .dbyt $00f9 + .dbyt $00fa + .dbyt $00fb + .dbyt $00fc + .dbyt $00fd + .dbyt $00fe + .dbyt $00ff + .dbyt $0100 + .dbyt $0101 + .dbyt $0102 + .dbyt $0103 + .dbyt $0fd2 + .dbyt $0fd3 + .dbyt $0fd4 + .dbyt $0fd5 + .dbyt $0fd6 + .dbyt $0fd7 + .dbyt $0fd8 + .dbyt $0fd9 + .dbyt $0fda + .dbyt $0fdb + .dbyt $0fdc + .dbyt $0fdd + .dbyt $0fde + .dbyt $0fdf + .dbyt $0fe0 + .dbyt $0fe1 + .dbyt $0fe2 + .dbyt $0fe3 + .dbyt $0fe4 + .dbyt $0fe5 + .dbyt $0fe6 + .dbyt $0fe7 + .dbyt $0fe8 + .dbyt $0fe9 + .dbyt $0fea + .dbyt $0feb + .dbyt $0fec + .dbyt $0fed + .dbyt $0fee + .dbyt $0fef + .dbyt $0ff0 + .dbyt $0ff1 + .dbyt $0ff2 + .dbyt $0ff3 + .dbyt $0ff4 + .dbyt $0ff5 + .dbyt $0ff6 + .dbyt $0ff7 + .dbyt $0ff8 + .dbyt $0ff9 + .dbyt $0ffa + .dbyt $0ffb + .dbyt $0ffc + .dbyt $0ffd + .dbyt $0ffe + .dbyt $0fff + .dbyt $1000 + .dbyt $1001 + .dbyt $1002 + .dbyt $1003 + .dbyt $1004 + .dbyt $1005 + .dbyt $1006 + .dbyt $1007 + .dbyt $1008 + .dbyt $7ff0 + .dbyt $7ff1 + .dbyt $7ff2 + .dbyt $7ff3 + .dbyt $7ff4 + .dbyt $7ff5 + .dbyt $7ff6 + .dbyt $7ff7 + .dbyt $7ff8 + .dbyt $7ff9 + .dbyt $7ffa + .dbyt $7ffb + .dbyt $7ffc + .dbyt $7ffd + .dbyt $7ffe + .dbyt $7fff + .dbyt $8000 + .dbyt $8001 + .dbyt $8002 + .dbyt $8003 + .dbyt $8004 + .dbyt $8005 + .dbyt $8006 + .dbyt $8007 + .dbyt $8008 + .dbyt $8009 + .dbyt $800a + .dbyt $800b + .dbyt $9fe1 + .dbyt $9fe2 + .dbyt $9fe3 + .dbyt $9fe4 + .dbyt $9fe5 + .dbyt $9fe6 + .dbyt $9fe7 + .dbyt $9fe8 + .dbyt $9fe9 + .dbyt $9fea + .dbyt $9feb + .dbyt $9fec + .dbyt $9fed + .dbyt $9fee + .dbyt $9fef + .dbyt $9ff0 + .dbyt $9ff1 + .dbyt $9ff2 + .dbyt $9ff3 + .dbyt $9ff4 + .dbyt $9ff5 + .dbyt $9ff6 + .dbyt $9ff7 + .dbyt $9ff8 + .dbyt $9ff9 + .dbyt $9ffa + .dbyt $9ffb + .dbyt $9ffc + .dbyt $9ffd + .dbyt $9ffe + .dbyt $9fff + .dbyt $a000 + .dbyt $a001 + .dbyt $a002 + .dbyt $a003 + .dbyt $a004 + .dbyt $a005 + .dbyt $a006 + .dbyt $a007 + .dbyt $a008 + .dbyt $a009 + .dbyt $a00a + .dbyt $a00b + .dbyt $a00c + .dbyt $a00d + .dbyt $a00e + .dbyt $a00f + .dbyt $afe1 + .dbyt $afe2 + .dbyt $afe3 + .dbyt $afe4 + .dbyt $afe5 + .dbyt $afe6 + .dbyt $afe7 + .dbyt $afe8 + .dbyt $afe9 + .dbyt $afea + .dbyt $afeb + .dbyt $afec + .dbyt $afed + .dbyt $afee + .dbyt $afef + .dbyt $aff0 + .dbyt $aff1 + .dbyt $aff2 + .dbyt $aff3 + .dbyt $aff4 + .dbyt $aff5 + .dbyt $aff6 + .dbyt $aff7 + .dbyt $aff8 + .dbyt $aff9 + .dbyt $affa + .dbyt $affb + .dbyt $affc + .dbyt $affd + .dbyt $affe + .dbyt $afff + .dbyt $b000 + .dbyt $b001 + .dbyt $b002 + .dbyt $b003 + .dbyt $b004 + .dbyt $b005 + .dbyt $b006 + .dbyt $b007 + .dbyt $b008 + .dbyt $b009 + .dbyt $b00a + .dbyt $b00b + .dbyt $b00c + .dbyt $b00d + .dbyt $b00e + .dbyt $b00f + .dbyt $bfe1 + .dbyt $bfe2 + .dbyt $bfe3 + .dbyt $bfe4 + .dbyt $bfe5 + .dbyt $bfe6 + .dbyt $bfe7 + .dbyt $bfe8 + .dbyt $bfe9 + .dbyt $bfea + .dbyt $bfeb + .dbyt $bfec + .dbyt $bfed + .dbyt $bfee + .dbyt $bfef + .dbyt $bff0 + .dbyt $bff1 + .dbyt $bff2 + .dbyt $bff3 + .dbyt $bff4 + .dbyt $bff5 + .dbyt $bff6 + .dbyt $bff7 + .dbyt $bff8 + .dbyt $bff9 + .dbyt $bffa + .dbyt $bffb + .dbyt $bffc + .dbyt $bffd + .dbyt $bffe + .dbyt $bfff + .dbyt $c000 + .dbyt $c001 + .dbyt $c002 + .dbyt $c003 + .dbyt $c004 + .dbyt $c005 + .dbyt $c006 + .dbyt $c007 + .dbyt $c008 + .dbyt $c009 + .dbyt $c00a + .dbyt $c00b + .dbyt $c00c + .dbyt $c00d + .dbyt $c00e + .dbyt $c00f + .dbyt $cfe1 + .dbyt $cfe2 + .dbyt $cfe3 + .dbyt $cfe4 + .dbyt $cfe5 + .dbyt $cfe6 + .dbyt $cfe7 + .dbyt $cfe8 + .dbyt $cfe9 + .dbyt $cfea + .dbyt $cfeb + .dbyt $cfec + .dbyt $cfed + .dbyt $cfee + .dbyt $cfef + .dbyt $cff0 + .dbyt $cff1 + .dbyt $cff2 + .dbyt $cff3 + .dbyt $cff4 + .dbyt $cff5 + .dbyt $cff6 + .dbyt $cff7 + .dbyt $cff8 + .dbyt $cff9 + .dbyt $cffa + .dbyt $cffb + .dbyt $cffc + .dbyt $cffd + .dbyt $cffe + .dbyt $cfff + .dbyt $d000 + .dbyt $d001 + .dbyt $d002 + .dbyt $d003 + .dbyt $d004 + .dbyt $d005 + .dbyt $d006 + .dbyt $d007 + .dbyt $d008 + .dbyt $d009 + .dbyt $d00a + .dbyt $d00b + .dbyt $d00c + .dbyt $d00d + .dbyt $d00e + .dbyt $d00f + .dbyt $dfe1 + .dbyt $dfe2 + .dbyt $dfe3 + .dbyt $dfe4 + .dbyt $dfe5 + .dbyt $dfe6 + .dbyt $dfe7 + .dbyt $dfe8 + .dbyt $dfe9 + .dbyt $dfea + .dbyt $dfeb + .dbyt $dfec + .dbyt $dfed + .dbyt $dfee + .dbyt $dfef + .dbyt $dff0 + .dbyt $dff1 + .dbyt $dff2 + .dbyt $dff3 + .dbyt $dff4 + .dbyt $dff5 + .dbyt $dff6 + .dbyt $dff7 + .dbyt $dff8 + .dbyt $dff9 + .dbyt $dffa + .dbyt $dffb + .dbyt $dffc + .dbyt $dffd + .dbyt $dffe + .dbyt $dfff + .dbyt $e000 + .dbyt $e001 + .dbyt $e002 + .dbyt $e003 + .dbyt $e004 + .dbyt $e005 + .dbyt $e006 + .dbyt $e007 + .dbyt $e008 + .dbyt $e009 + .dbyt $e00a + .dbyt $e00b + .dbyt $e00c + .dbyt $e00d + .dbyt $e00e + .dbyt $e00f + .dbyt $efe1 + .dbyt $efe2 + .dbyt $efe3 + .dbyt $efe4 + .dbyt $efe5 + .dbyt $efe6 + .dbyt $efe7 + .dbyt $efe8 + .dbyt $efe9 + .dbyt $efea + .dbyt $efeb + .dbyt $efec + .dbyt $efed + .dbyt $efee + .dbyt $efef + .dbyt $eff0 + .dbyt $eff1 + .dbyt $eff2 + .dbyt $eff3 + .dbyt $eff4 + .dbyt $eff5 + .dbyt $eff6 + .dbyt $eff7 + .dbyt $eff8 + .dbyt $eff9 + .dbyt $effa + .dbyt $effb + .dbyt $effc + .dbyt $effd + .dbyt $effe + .dbyt $efff + .dbyt $f000 + .dbyt $f001 + .dbyt $f002 + .dbyt $f003 + .dbyt $f004 + .dbyt $f005 + .dbyt $f006 + .dbyt $f007 + .dbyt $f008 + .dbyt $f009 + .dbyt $f00a + .dbyt $f00b + .dbyt $f00c + .dbyt $f00d + .dbyt $f00e + .dbyt $f00f + .dbyt $ffe1 + .dbyt $ffe2 + .dbyt $ffe3 + .dbyt $ffe4 + .dbyt $ffe5 + .dbyt $ffe6 + .dbyt $ffe7 + .dbyt $ffe8 + .dbyt $ffe9 + .dbyt $ffea + .dbyt $ffeb + .dbyt $ffec + .dbyt $ffed + .dbyt $ffee + .dbyt $ffef + .dbyt $fff0 + .dbyt $fff1 + .dbyt $fff2 + .dbyt $fff3 + .dbyt $fff4 + .dbyt $fff5 + .dbyt $fff6 + .dbyt $fff7 + .dbyt $fff8 + .dbyt $fff9 + .dbyt $fffa + .dbyt $fffb + .dbyt $fffc + .dbyt $fffd + .dbyt $fffe + .dbyt $ffff + + ; 4-digit hex values, uppercase + .dbyt $0000 + .dbyt $0001 + .dbyt $0002 + .dbyt $0003 + .dbyt $0004 + .dbyt $0005 + .dbyt $0006 + .dbyt $0007 + .dbyt $0008 + .dbyt $0009 + .dbyt $000A + .dbyt $000B + .dbyt $000C + .dbyt $000D + .dbyt $000E + .dbyt $000F + .dbyt $0010 + .dbyt $0011 + .dbyt $0012 + .dbyt $0013 + .dbyt $0070 + .dbyt $0071 + .dbyt $0072 + .dbyt $0073 + .dbyt $0074 + .dbyt $0075 + .dbyt $0076 + .dbyt $0077 + .dbyt $0078 + .dbyt $0079 + .dbyt $007A + .dbyt $007B + .dbyt $007C + .dbyt $007D + .dbyt $007E + .dbyt $007F + .dbyt $0080 + .dbyt $0081 + .dbyt $0082 + .dbyt $0083 + .dbyt $0084 + .dbyt $0085 + .dbyt $0086 + .dbyt $00F0 + .dbyt $00F1 + .dbyt $00F2 + .dbyt $00F3 + .dbyt $00F4 + .dbyt $00F5 + .dbyt $00F6 + .dbyt $00F7 + .dbyt $00F8 + .dbyt $00F9 + .dbyt $00FA + .dbyt $00FB + .dbyt $00FC + .dbyt $00FD + .dbyt $00FE + .dbyt $00FF + .dbyt $0100 + .dbyt $0101 + .dbyt $0102 + .dbyt $0103 + .dbyt $0FD2 + .dbyt $0FD3 + .dbyt $0FD4 + .dbyt $0FD5 + .dbyt $0FD6 + .dbyt $0FD7 + .dbyt $0FD8 + .dbyt $0FD9 + .dbyt $0FDA + .dbyt $0FDB + .dbyt $0FDC + .dbyt $0FDD + .dbyt $0FDE + .dbyt $0FDF + .dbyt $0FE0 + .dbyt $0FE1 + .dbyt $0FE2 + .dbyt $0FE3 + .dbyt $0FE4 + .dbyt $0FE5 + .dbyt $0FE6 + .dbyt $0FE7 + .dbyt $0FE8 + .dbyt $0FE9 + .dbyt $0FEA + .dbyt $0FEB + .dbyt $0FEC + .dbyt $0FED + .dbyt $0FEE + .dbyt $0FEF + .dbyt $0FF0 + .dbyt $0FF1 + .dbyt $0FF2 + .dbyt $0FF3 + .dbyt $0FF4 + .dbyt $0FF5 + .dbyt $0FF6 + .dbyt $0FF7 + .dbyt $0FF8 + .dbyt $0FF9 + .dbyt $0FFA + .dbyt $0FFB + .dbyt $0FFC + .dbyt $0FFD + .dbyt $0FFE + .dbyt $0FFF + .dbyt $1000 + .dbyt $1001 + .dbyt $1002 + .dbyt $1003 + .dbyt $1004 + .dbyt $1005 + .dbyt $1006 + .dbyt $1007 + .dbyt $1008 + .dbyt $7FF0 + .dbyt $7FF1 + .dbyt $7FF2 + .dbyt $7FF3 + .dbyt $7FF4 + .dbyt $7FF5 + .dbyt $7FF6 + .dbyt $7FF7 + .dbyt $7FF8 + .dbyt $7FF9 + .dbyt $7FFA + .dbyt $7FFB + .dbyt $7FFC + .dbyt $7FFD + .dbyt $7FFE + .dbyt $7FFF + .dbyt $8000 + .dbyt $8001 + .dbyt $8002 + .dbyt $8003 + .dbyt $8004 + .dbyt $8005 + .dbyt $8006 + .dbyt $8007 + .dbyt $8008 + .dbyt $8009 + .dbyt $800A + .dbyt $800B + .dbyt $9FE1 + .dbyt $9FE2 + .dbyt $9FE3 + .dbyt $9FE4 + .dbyt $9FE5 + .dbyt $9FE6 + .dbyt $9FE7 + .dbyt $9FE8 + .dbyt $9FE9 + .dbyt $9FEA + .dbyt $9FEB + .dbyt $9FEC + .dbyt $9FED + .dbyt $9FEE + .dbyt $9FEF + .dbyt $9FF0 + .dbyt $9FF1 + .dbyt $9FF2 + .dbyt $9FF3 + .dbyt $9FF4 + .dbyt $9FF5 + .dbyt $9FF6 + .dbyt $9FF7 + .dbyt $9FF8 + .dbyt $9FF9 + .dbyt $9FFA + .dbyt $9FFB + .dbyt $9FFC + .dbyt $9FFD + .dbyt $9FFE + .dbyt $9FFF + .dbyt $A000 + .dbyt $A001 + .dbyt $A002 + .dbyt $A003 + .dbyt $A004 + .dbyt $A005 + .dbyt $A006 + .dbyt $A007 + .dbyt $A008 + .dbyt $A009 + .dbyt $A00A + .dbyt $A00B + .dbyt $A00C + .dbyt $A00D + .dbyt $A00E + .dbyt $A00F + .dbyt $AFE1 + .dbyt $AFE2 + .dbyt $AFE3 + .dbyt $AFE4 + .dbyt $AFE5 + .dbyt $AFE6 + .dbyt $AFE7 + .dbyt $AFE8 + .dbyt $AFE9 + .dbyt $AFEA + .dbyt $AFEB + .dbyt $AFEC + .dbyt $AFED + .dbyt $AFEE + .dbyt $AFEF + .dbyt $AFF0 + .dbyt $AFF1 + .dbyt $AFF2 + .dbyt $AFF3 + .dbyt $AFF4 + .dbyt $AFF5 + .dbyt $AFF6 + .dbyt $AFF7 + .dbyt $AFF8 + .dbyt $AFF9 + .dbyt $AFFA + .dbyt $AFFB + .dbyt $AFFC + .dbyt $AFFD + .dbyt $AFFE + .dbyt $AFFF + .dbyt $B000 + .dbyt $B001 + .dbyt $B002 + .dbyt $B003 + .dbyt $B004 + .dbyt $B005 + .dbyt $B006 + .dbyt $B007 + .dbyt $B008 + .dbyt $B009 + .dbyt $B00A + .dbyt $B00B + .dbyt $B00C + .dbyt $B00D + .dbyt $B00E + .dbyt $B00F + .dbyt $BFE1 + .dbyt $BFE2 + .dbyt $BFE3 + .dbyt $BFE4 + .dbyt $BFE5 + .dbyt $BFE6 + .dbyt $BFE7 + .dbyt $BFE8 + .dbyt $BFE9 + .dbyt $BFEA + .dbyt $BFEB + .dbyt $BFEC + .dbyt $BFED + .dbyt $BFEE + .dbyt $BFEF + .dbyt $BFF0 + .dbyt $BFF1 + .dbyt $BFF2 + .dbyt $BFF3 + .dbyt $BFF4 + .dbyt $BFF5 + .dbyt $BFF6 + .dbyt $BFF7 + .dbyt $BFF8 + .dbyt $BFF9 + .dbyt $BFFA + .dbyt $BFFB + .dbyt $BFFC + .dbyt $BFFD + .dbyt $BFFE + .dbyt $BFFF + .dbyt $C000 + .dbyt $C001 + .dbyt $C002 + .dbyt $C003 + .dbyt $C004 + .dbyt $C005 + .dbyt $C006 + .dbyt $C007 + .dbyt $C008 + .dbyt $C009 + .dbyt $C00A + .dbyt $C00B + .dbyt $C00C + .dbyt $C00D + .dbyt $C00E + .dbyt $C00F + .dbyt $CFE1 + .dbyt $CFE2 + .dbyt $CFE3 + .dbyt $CFE4 + .dbyt $CFE5 + .dbyt $CFE6 + .dbyt $CFE7 + .dbyt $CFE8 + .dbyt $CFE9 + .dbyt $CFEA + .dbyt $CFEB + .dbyt $CFEC + .dbyt $CFED + .dbyt $CFEE + .dbyt $CFEF + .dbyt $CFF0 + .dbyt $CFF1 + .dbyt $CFF2 + .dbyt $CFF3 + .dbyt $CFF4 + .dbyt $CFF5 + .dbyt $CFF6 + .dbyt $CFF7 + .dbyt $CFF8 + .dbyt $CFF9 + .dbyt $CFFA + .dbyt $CFFB + .dbyt $CFFC + .dbyt $CFFD + .dbyt $CFFE + .dbyt $CFFF + .dbyt $D000 + .dbyt $D001 + .dbyt $D002 + .dbyt $D003 + .dbyt $D004 + .dbyt $D005 + .dbyt $D006 + .dbyt $D007 + .dbyt $D008 + .dbyt $D009 + .dbyt $D00A + .dbyt $D00B + .dbyt $D00C + .dbyt $D00D + .dbyt $D00E + .dbyt $D00F + .dbyt $DFE1 + .dbyt $DFE2 + .dbyt $DFE3 + .dbyt $DFE4 + .dbyt $DFE5 + .dbyt $DFE6 + .dbyt $DFE7 + .dbyt $DFE8 + .dbyt $DFE9 + .dbyt $DFEA + .dbyt $DFEB + .dbyt $DFEC + .dbyt $DFED + .dbyt $DFEE + .dbyt $DFEF + .dbyt $DFF0 + .dbyt $DFF1 + .dbyt $DFF2 + .dbyt $DFF3 + .dbyt $DFF4 + .dbyt $DFF5 + .dbyt $DFF6 + .dbyt $DFF7 + .dbyt $DFF8 + .dbyt $DFF9 + .dbyt $DFFA + .dbyt $DFFB + .dbyt $DFFC + .dbyt $DFFD + .dbyt $DFFE + .dbyt $DFFF + .dbyt $E000 + .dbyt $E001 + .dbyt $E002 + .dbyt $E003 + .dbyt $E004 + .dbyt $E005 + .dbyt $E006 + .dbyt $E007 + .dbyt $E008 + .dbyt $E009 + .dbyt $E00A + .dbyt $E00B + .dbyt $E00C + .dbyt $E00D + .dbyt $E00E + .dbyt $E00F + .dbyt $EFE1 + .dbyt $EFE2 + .dbyt $EFE3 + .dbyt $EFE4 + .dbyt $EFE5 + .dbyt $EFE6 + .dbyt $EFE7 + .dbyt $EFE8 + .dbyt $EFE9 + .dbyt $EFEA + .dbyt $EFEB + .dbyt $EFEC + .dbyt $EFED + .dbyt $EFEE + .dbyt $EFEF + .dbyt $EFF0 + .dbyt $EFF1 + .dbyt $EFF2 + .dbyt $EFF3 + .dbyt $EFF4 + .dbyt $EFF5 + .dbyt $EFF6 + .dbyt $EFF7 + .dbyt $EFF8 + .dbyt $EFF9 + .dbyt $EFFA + .dbyt $EFFB + .dbyt $EFFC + .dbyt $EFFD + .dbyt $EFFE + .dbyt $EFFF + .dbyt $F000 + .dbyt $F001 + .dbyt $F002 + .dbyt $F003 + .dbyt $F004 + .dbyt $F005 + .dbyt $F006 + .dbyt $F007 + .dbyt $F008 + .dbyt $F009 + .dbyt $F00A + .dbyt $F00B + .dbyt $F00C + .dbyt $F00D + .dbyt $F00E + .dbyt $F00F + .dbyt $FFE1 + .dbyt $FFE2 + .dbyt $FFE3 + .dbyt $FFE4 + .dbyt $FFE5 + .dbyt $FFE6 + .dbyt $FFE7 + .dbyt $FFE8 + .dbyt $FFE9 + .dbyt $FFEA + .dbyt $FFEB + .dbyt $FFEC + .dbyt $FFED + .dbyt $FFEE + .dbyt $FFEF + .dbyt $FFF0 + .dbyt $FFF1 + .dbyt $FFF2 + .dbyt $FFF3 + .dbyt $FFF4 + .dbyt $FFF5 + .dbyt $FFF6 + .dbyt $FFF7 + .dbyt $FFF8 + .dbyt $FFF9 + .dbyt $FFFA + .dbyt $FFFB + .dbyt $FFFC + .dbyt $FFFD + .dbyt $FFFE + .dbyt $FFFF + + ; alternative hex values + .dbyt 0h + .dbyt 1h + .dbyt 2h + .dbyt 3h + .dbyt 4h + .dbyt 5h + .dbyt 6h + .dbyt 7h + .dbyt 8h + .dbyt 9h + .dbyt 0ah + .dbyt 0bh + .dbyt 0ch + .dbyt 0dh + .dbyt 0eh + .dbyt 0fh + .dbyt 10h + .dbyt 11h + .dbyt 12h + .dbyt 13h + .dbyt 70h + .dbyt 71h + .dbyt 72h + .dbyt 73h + .dbyt 74h + .dbyt 75h + .dbyt 76h + .dbyt 77h + .dbyt 78h + .dbyt 79h + .dbyt 7ah + .dbyt 7bh + .dbyt 7ch + .dbyt 7dh + .dbyt 7eh + .dbyt 7fh + .dbyt 80h + .dbyt 81h + .dbyt 82h + .dbyt 83h + .dbyt 84h + .dbyt 85h + .dbyt 86h + .dbyt 0f0h + .dbyt 0f1h + .dbyt 0f2h + .dbyt 0f3h + .dbyt 0f4h + .dbyt 0f5h + .dbyt 0f6h + .dbyt 0f7h + .dbyt 0f8h + .dbyt 0f9h + .dbyt 0fah + .dbyt 0fbh + .dbyt 0fch + .dbyt 0fdh + .dbyt 0feh + .dbyt 0ffh + .dbyt 100h + .dbyt 101h + .dbyt 102h + .dbyt 103h + .dbyt 0fd2h + .dbyt 0fd3h + .dbyt 0fd4h + .dbyt 0fd5h + .dbyt 0fd6h + .dbyt 0fd7h + .dbyt 0fd8h + .dbyt 0fd9h + .dbyt 0fdah + .dbyt 0fdbh + .dbyt 0fdch + .dbyt 0fddh + .dbyt 0fdeh + .dbyt 0fdfh + .dbyt 0fe0h + .dbyt 0fe1h + .dbyt 0fe2h + .dbyt 0fe3h + .dbyt 0fe4h + .dbyt 0fe5h + .dbyt 0fe6h + .dbyt 0fe7h + .dbyt 0fe8h + .dbyt 0fe9h + .dbyt 0feah + .dbyt 0febh + .dbyt 0fech + .dbyt 0fedh + .dbyt 0feeh + .dbyt 0fefh + .dbyt 0ff0h + .dbyt 0ff1h + .dbyt 0ff2h + .dbyt 0ff3h + .dbyt 0ff4h + .dbyt 0ff5h + .dbyt 0ff6h + .dbyt 0ff7h + .dbyt 0ff8h + .dbyt 0ff9h + .dbyt 0ffah + .dbyt 0ffbh + .dbyt 0ffch + .dbyt 0ffdh + .dbyt 0ffeh + .dbyt 0fffh + .dbyt 1000h + .dbyt 1001h + .dbyt 1002h + .dbyt 1003h + .dbyt 1004h + .dbyt 1005h + .dbyt 1006h + .dbyt 1007h + .dbyt 1008h + .dbyt 7ff0h + .dbyt 7ff1h + .dbyt 7ff2h + .dbyt 7ff3h + .dbyt 7ff4h + .dbyt 7ff5h + .dbyt 7ff6h + .dbyt 7ff7h + .dbyt 7ff8h + .dbyt 7ff9h + .dbyt 7ffah + .dbyt 7ffbh + .dbyt 7ffch + .dbyt 7ffdh + .dbyt 7ffeh + .dbyt 7fffh + .dbyt 8000h + .dbyt 8001h + .dbyt 8002h + .dbyt 8003h + .dbyt 8004h + .dbyt 8005h + .dbyt 8006h + .dbyt 8007h + .dbyt 8008h + .dbyt 8009h + .dbyt 800ah + .dbyt 800bh + .dbyt 9fe1h + .dbyt 9fe2h + .dbyt 9fe3h + .dbyt 9fe4h + .dbyt 9fe5h + .dbyt 9fe6h + .dbyt 9fe7h + .dbyt 9fe8h + .dbyt 9fe9h + .dbyt 9feah + .dbyt 9febh + .dbyt 9fech + .dbyt 9fedh + .dbyt 9feeh + .dbyt 9fefh + .dbyt 9ff0h + .dbyt 9ff1h + .dbyt 9ff2h + .dbyt 9ff3h + .dbyt 9ff4h + .dbyt 9ff5h + .dbyt 9ff6h + .dbyt 9ff7h + .dbyt 9ff8h + .dbyt 9ff9h + .dbyt 9ffah + .dbyt 9ffbh + .dbyt 9ffch + .dbyt 9ffdh + .dbyt 9ffeh + .dbyt 9fffh + .dbyt 0a000h + .dbyt 0a001h + .dbyt 0a002h + .dbyt 0a003h + .dbyt 0a004h + .dbyt 0a005h + .dbyt 0a006h + .dbyt 0a007h + .dbyt 0a008h + .dbyt 0a009h + .dbyt 0a00ah + .dbyt 0a00bh + .dbyt 0a00ch + .dbyt 0a00dh + .dbyt 0a00eh + .dbyt 0a00fh + .dbyt 0afe1h + .dbyt 0afe2h + .dbyt 0afe3h + .dbyt 0afe4h + .dbyt 0afe5h + .dbyt 0afe6h + .dbyt 0afe7h + .dbyt 0afe8h + .dbyt 0afe9h + .dbyt 0afeah + .dbyt 0afebh + .dbyt 0afech + .dbyt 0afedh + .dbyt 0afeeh + .dbyt 0afefh + .dbyt 0aff0h + .dbyt 0aff1h + .dbyt 0aff2h + .dbyt 0aff3h + .dbyt 0aff4h + .dbyt 0aff5h + .dbyt 0aff6h + .dbyt 0aff7h + .dbyt 0aff8h + .dbyt 0aff9h + .dbyt 0affah + .dbyt 0affbh + .dbyt 0affch + .dbyt 0affdh + .dbyt 0affeh + .dbyt 0afffh + .dbyt 0b000h + .dbyt 0b001h + .dbyt 0b002h + .dbyt 0b003h + .dbyt 0b004h + .dbyt 0b005h + .dbyt 0b006h + .dbyt 0b007h + .dbyt 0b008h + .dbyt 0b009h + .dbyt 0b00ah + .dbyt 0b00bh + .dbyt 0b00ch + .dbyt 0b00dh + .dbyt 0b00eh + .dbyt 0b00fh + .dbyt 0bfe1h + .dbyt 0bfe2h + .dbyt 0bfe3h + .dbyt 0bfe4h + .dbyt 0bfe5h + .dbyt 0bfe6h + .dbyt 0bfe7h + .dbyt 0bfe8h + .dbyt 0bfe9h + .dbyt 0bfeah + .dbyt 0bfebh + .dbyt 0bfech + .dbyt 0bfedh + .dbyt 0bfeeh + .dbyt 0bfefh + .dbyt 0bff0h + .dbyt 0bff1h + .dbyt 0bff2h + .dbyt 0bff3h + .dbyt 0bff4h + .dbyt 0bff5h + .dbyt 0bff6h + .dbyt 0bff7h + .dbyt 0bff8h + .dbyt 0bff9h + .dbyt 0bffah + .dbyt 0bffbh + .dbyt 0bffch + .dbyt 0bffdh + .dbyt 0bffeh + .dbyt 0bfffh + .dbyt 0c000h + .dbyt 0c001h + .dbyt 0c002h + .dbyt 0c003h + .dbyt 0c004h + .dbyt 0c005h + .dbyt 0c006h + .dbyt 0c007h + .dbyt 0c008h + .dbyt 0c009h + .dbyt 0c00ah + .dbyt 0c00bh + .dbyt 0c00ch + .dbyt 0c00dh + .dbyt 0c00eh + .dbyt 0c00fh + .dbyt 0cfe1h + .dbyt 0cfe2h + .dbyt 0cfe3h + .dbyt 0cfe4h + .dbyt 0cfe5h + .dbyt 0cfe6h + .dbyt 0cfe7h + .dbyt 0cfe8h + .dbyt 0cfe9h + .dbyt 0cfeah + .dbyt 0cfebh + .dbyt 0cfech + .dbyt 0cfedh + .dbyt 0cfeeh + .dbyt 0cfefh + .dbyt 0cff0h + .dbyt 0cff1h + .dbyt 0cff2h + .dbyt 0cff3h + .dbyt 0cff4h + .dbyt 0cff5h + .dbyt 0cff6h + .dbyt 0cff7h + .dbyt 0cff8h + .dbyt 0cff9h + .dbyt 0cffah + .dbyt 0cffbh + .dbyt 0cffch + .dbyt 0cffdh + .dbyt 0cffeh + .dbyt 0cfffh + .dbyt 0d000h + .dbyt 0d001h + .dbyt 0d002h + .dbyt 0d003h + .dbyt 0d004h + .dbyt 0d005h + .dbyt 0d006h + .dbyt 0d007h + .dbyt 0d008h + .dbyt 0d009h + .dbyt 0d00ah + .dbyt 0d00bh + .dbyt 0d00ch + .dbyt 0d00dh + .dbyt 0d00eh + .dbyt 0d00fh + .dbyt 0dfe1h + .dbyt 0dfe2h + .dbyt 0dfe3h + .dbyt 0dfe4h + .dbyt 0dfe5h + .dbyt 0dfe6h + .dbyt 0dfe7h + .dbyt 0dfe8h + .dbyt 0dfe9h + .dbyt 0dfeah + .dbyt 0dfebh + .dbyt 0dfech + .dbyt 0dfedh + .dbyt 0dfeeh + .dbyt 0dfefh + .dbyt 0dff0h + .dbyt 0dff1h + .dbyt 0dff2h + .dbyt 0dff3h + .dbyt 0dff4h + .dbyt 0dff5h + .dbyt 0dff6h + .dbyt 0dff7h + .dbyt 0dff8h + .dbyt 0dff9h + .dbyt 0dffah + .dbyt 0dffbh + .dbyt 0dffch + .dbyt 0dffdh + .dbyt 0dffeh + .dbyt 0dfffh + .dbyt 0e000h + .dbyt 0e001h + .dbyt 0e002h + .dbyt 0e003h + .dbyt 0e004h + .dbyt 0e005h + .dbyt 0e006h + .dbyt 0e007h + .dbyt 0e008h + .dbyt 0e009h + .dbyt 0e00ah + .dbyt 0e00bh + .dbyt 0e00ch + .dbyt 0e00dh + .dbyt 0e00eh + .dbyt 0e00fh + .dbyt 0efe1h + .dbyt 0efe2h + .dbyt 0efe3h + .dbyt 0efe4h + .dbyt 0efe5h + .dbyt 0efe6h + .dbyt 0efe7h + .dbyt 0efe8h + .dbyt 0efe9h + .dbyt 0efeah + .dbyt 0efebh + .dbyt 0efech + .dbyt 0efedh + .dbyt 0efeeh + .dbyt 0efefh + .dbyt 0eff0h + .dbyt 0eff1h + .dbyt 0eff2h + .dbyt 0eff3h + .dbyt 0eff4h + .dbyt 0eff5h + .dbyt 0eff6h + .dbyt 0eff7h + .dbyt 0eff8h + .dbyt 0eff9h + .dbyt 0effah + .dbyt 0effbh + .dbyt 0effch + .dbyt 0effdh + .dbyt 0effeh + .dbyt 0efffh + .dbyt 0f000h + .dbyt 0f001h + .dbyt 0f002h + .dbyt 0f003h + .dbyt 0f004h + .dbyt 0f005h + .dbyt 0f006h + .dbyt 0f007h + .dbyt 0f008h + .dbyt 0f009h + .dbyt 0f00ah + .dbyt 0f00bh + .dbyt 0f00ch + .dbyt 0f00dh + .dbyt 0f00eh + .dbyt 0f00fh + .dbyt 0ffe1h + .dbyt 0ffe2h + .dbyt 0ffe3h + .dbyt 0ffe4h + .dbyt 0ffe5h + .dbyt 0ffe6h + .dbyt 0ffe7h + .dbyt 0ffe8h + .dbyt 0ffe9h + .dbyt 0ffeah + .dbyt 0ffebh + .dbyt 0ffech + .dbyt 0ffedh + .dbyt 0ffeeh + .dbyt 0ffefh + .dbyt 0fff0h + .dbyt 0fff1h + .dbyt 0fff2h + .dbyt 0fff3h + .dbyt 0fff4h + .dbyt 0fff5h + .dbyt 0fff6h + .dbyt 0fff7h + .dbyt 0fff8h + .dbyt 0fff9h + .dbyt 0fffah + .dbyt 0fffbh + .dbyt 0fffch + .dbyt 0fffdh + .dbyt 0fffeh + .dbyt 0ffffh + + ; alternative hex values, uppercase + .dbyt 0h + .dbyt 1h + .dbyt 2h + .dbyt 3h + .dbyt 4h + .dbyt 5h + .dbyt 6h + .dbyt 7h + .dbyt 8h + .dbyt 9h + .dbyt 0Ah + .dbyt 0Bh + .dbyt 0Ch + .dbyt 0Dh + .dbyt 0Eh + .dbyt 0Fh + .dbyt 10h + .dbyt 11h + .dbyt 12h + .dbyt 13h + .dbyt 70h + .dbyt 71h + .dbyt 72h + .dbyt 73h + .dbyt 74h + .dbyt 75h + .dbyt 76h + .dbyt 77h + .dbyt 78h + .dbyt 79h + .dbyt 7Ah + .dbyt 7Bh + .dbyt 7Ch + .dbyt 7Dh + .dbyt 7Eh + .dbyt 7Fh + .dbyt 80h + .dbyt 81h + .dbyt 82h + .dbyt 83h + .dbyt 84h + .dbyt 85h + .dbyt 86h + .dbyt 0F0h + .dbyt 0F1h + .dbyt 0F2h + .dbyt 0F3h + .dbyt 0F4h + .dbyt 0F5h + .dbyt 0F6h + .dbyt 0F7h + .dbyt 0F8h + .dbyt 0F9h + .dbyt 0FAh + .dbyt 0FBh + .dbyt 0FCh + .dbyt 0FDh + .dbyt 0FEh + .dbyt 0FFh + .dbyt 100h + .dbyt 101h + .dbyt 102h + .dbyt 103h + .dbyt 0FD2h + .dbyt 0FD3h + .dbyt 0FD4h + .dbyt 0FD5h + .dbyt 0FD6h + .dbyt 0FD7h + .dbyt 0FD8h + .dbyt 0FD9h + .dbyt 0FDAh + .dbyt 0FDBh + .dbyt 0FDCh + .dbyt 0FDDh + .dbyt 0FDEh + .dbyt 0FDFh + .dbyt 0FE0h + .dbyt 0FE1h + .dbyt 0FE2h + .dbyt 0FE3h + .dbyt 0FE4h + .dbyt 0FE5h + .dbyt 0FE6h + .dbyt 0FE7h + .dbyt 0FE8h + .dbyt 0FE9h + .dbyt 0FEAh + .dbyt 0FEBh + .dbyt 0FECh + .dbyt 0FEDh + .dbyt 0FEEh + .dbyt 0FEFh + .dbyt 0FF0h + .dbyt 0FF1h + .dbyt 0FF2h + .dbyt 0FF3h + .dbyt 0FF4h + .dbyt 0FF5h + .dbyt 0FF6h + .dbyt 0FF7h + .dbyt 0FF8h + .dbyt 0FF9h + .dbyt 0FFAh + .dbyt 0FFBh + .dbyt 0FFCh + .dbyt 0FFDh + .dbyt 0FFEh + .dbyt 0FFFh + .dbyt 1000h + .dbyt 1001h + .dbyt 1002h + .dbyt 1003h + .dbyt 1004h + .dbyt 1005h + .dbyt 1006h + .dbyt 1007h + .dbyt 1008h + .dbyt 7FF0h + .dbyt 7FF1h + .dbyt 7FF2h + .dbyt 7FF3h + .dbyt 7FF4h + .dbyt 7FF5h + .dbyt 7FF6h + .dbyt 7FF7h + .dbyt 7FF8h + .dbyt 7FF9h + .dbyt 7FFAh + .dbyt 7FFBh + .dbyt 7FFCh + .dbyt 7FFDh + .dbyt 7FFEh + .dbyt 7FFFh + .dbyt 8000h + .dbyt 8001h + .dbyt 8002h + .dbyt 8003h + .dbyt 8004h + .dbyt 8005h + .dbyt 8006h + .dbyt 8007h + .dbyt 8008h + .dbyt 8009h + .dbyt 800Ah + .dbyt 800Bh + .dbyt 9FE1h + .dbyt 9FE2h + .dbyt 9FE3h + .dbyt 9FE4h + .dbyt 9FE5h + .dbyt 9FE6h + .dbyt 9FE7h + .dbyt 9FE8h + .dbyt 9FE9h + .dbyt 9FEAh + .dbyt 9FEBh + .dbyt 9FECh + .dbyt 9FEDh + .dbyt 9FEEh + .dbyt 9FEFh + .dbyt 9FF0h + .dbyt 9FF1h + .dbyt 9FF2h + .dbyt 9FF3h + .dbyt 9FF4h + .dbyt 9FF5h + .dbyt 9FF6h + .dbyt 9FF7h + .dbyt 9FF8h + .dbyt 9FF9h + .dbyt 9FFAh + .dbyt 9FFBh + .dbyt 9FFCh + .dbyt 9FFDh + .dbyt 9FFEh + .dbyt 9FFFh + .dbyt 0A000h + .dbyt 0A001h + .dbyt 0A002h + .dbyt 0A003h + .dbyt 0A004h + .dbyt 0A005h + .dbyt 0A006h + .dbyt 0A007h + .dbyt 0A008h + .dbyt 0A009h + .dbyt 0A00Ah + .dbyt 0A00Bh + .dbyt 0A00Ch + .dbyt 0A00Dh + .dbyt 0A00Eh + .dbyt 0A00Fh + .dbyt 0AFE1h + .dbyt 0AFE2h + .dbyt 0AFE3h + .dbyt 0AFE4h + .dbyt 0AFE5h + .dbyt 0AFE6h + .dbyt 0AFE7h + .dbyt 0AFE8h + .dbyt 0AFE9h + .dbyt 0AFEAh + .dbyt 0AFEBh + .dbyt 0AFECh + .dbyt 0AFEDh + .dbyt 0AFEEh + .dbyt 0AFEFh + .dbyt 0AFF0h + .dbyt 0AFF1h + .dbyt 0AFF2h + .dbyt 0AFF3h + .dbyt 0AFF4h + .dbyt 0AFF5h + .dbyt 0AFF6h + .dbyt 0AFF7h + .dbyt 0AFF8h + .dbyt 0AFF9h + .dbyt 0AFFAh + .dbyt 0AFFBh + .dbyt 0AFFCh + .dbyt 0AFFDh + .dbyt 0AFFEh + .dbyt 0AFFFh + .dbyt 0B000h + .dbyt 0B001h + .dbyt 0B002h + .dbyt 0B003h + .dbyt 0B004h + .dbyt 0B005h + .dbyt 0B006h + .dbyt 0B007h + .dbyt 0B008h + .dbyt 0B009h + .dbyt 0B00Ah + .dbyt 0B00Bh + .dbyt 0B00Ch + .dbyt 0B00Dh + .dbyt 0B00Eh + .dbyt 0B00Fh + .dbyt 0BFE1h + .dbyt 0BFE2h + .dbyt 0BFE3h + .dbyt 0BFE4h + .dbyt 0BFE5h + .dbyt 0BFE6h + .dbyt 0BFE7h + .dbyt 0BFE8h + .dbyt 0BFE9h + .dbyt 0BFEAh + .dbyt 0BFEBh + .dbyt 0BFECh + .dbyt 0BFEDh + .dbyt 0BFEEh + .dbyt 0BFEFh + .dbyt 0BFF0h + .dbyt 0BFF1h + .dbyt 0BFF2h + .dbyt 0BFF3h + .dbyt 0BFF4h + .dbyt 0BFF5h + .dbyt 0BFF6h + .dbyt 0BFF7h + .dbyt 0BFF8h + .dbyt 0BFF9h + .dbyt 0BFFAh + .dbyt 0BFFBh + .dbyt 0BFFCh + .dbyt 0BFFDh + .dbyt 0BFFEh + .dbyt 0BFFFh + .dbyt 0C000h + .dbyt 0C001h + .dbyt 0C002h + .dbyt 0C003h + .dbyt 0C004h + .dbyt 0C005h + .dbyt 0C006h + .dbyt 0C007h + .dbyt 0C008h + .dbyt 0C009h + .dbyt 0C00Ah + .dbyt 0C00Bh + .dbyt 0C00Ch + .dbyt 0C00Dh + .dbyt 0C00Eh + .dbyt 0C00Fh + .dbyt 0CFE1h + .dbyt 0CFE2h + .dbyt 0CFE3h + .dbyt 0CFE4h + .dbyt 0CFE5h + .dbyt 0CFE6h + .dbyt 0CFE7h + .dbyt 0CFE8h + .dbyt 0CFE9h + .dbyt 0CFEAh + .dbyt 0CFEBh + .dbyt 0CFECh + .dbyt 0CFEDh + .dbyt 0CFEEh + .dbyt 0CFEFh + .dbyt 0CFF0h + .dbyt 0CFF1h + .dbyt 0CFF2h + .dbyt 0CFF3h + .dbyt 0CFF4h + .dbyt 0CFF5h + .dbyt 0CFF6h + .dbyt 0CFF7h + .dbyt 0CFF8h + .dbyt 0CFF9h + .dbyt 0CFFAh + .dbyt 0CFFBh + .dbyt 0CFFCh + .dbyt 0CFFDh + .dbyt 0CFFEh + .dbyt 0CFFFh + .dbyt 0D000h + .dbyt 0D001h + .dbyt 0D002h + .dbyt 0D003h + .dbyt 0D004h + .dbyt 0D005h + .dbyt 0D006h + .dbyt 0D007h + .dbyt 0D008h + .dbyt 0D009h + .dbyt 0D00Ah + .dbyt 0D00Bh + .dbyt 0D00Ch + .dbyt 0D00Dh + .dbyt 0D00Eh + .dbyt 0D00Fh + .dbyt 0DFE1h + .dbyt 0DFE2h + .dbyt 0DFE3h + .dbyt 0DFE4h + .dbyt 0DFE5h + .dbyt 0DFE6h + .dbyt 0DFE7h + .dbyt 0DFE8h + .dbyt 0DFE9h + .dbyt 0DFEAh + .dbyt 0DFEBh + .dbyt 0DFECh + .dbyt 0DFEDh + .dbyt 0DFEEh + .dbyt 0DFEFh + .dbyt 0DFF0h + .dbyt 0DFF1h + .dbyt 0DFF2h + .dbyt 0DFF3h + .dbyt 0DFF4h + .dbyt 0DFF5h + .dbyt 0DFF6h + .dbyt 0DFF7h + .dbyt 0DFF8h + .dbyt 0DFF9h + .dbyt 0DFFAh + .dbyt 0DFFBh + .dbyt 0DFFCh + .dbyt 0DFFDh + .dbyt 0DFFEh + .dbyt 0DFFFh + .dbyt 0E000h + .dbyt 0E001h + .dbyt 0E002h + .dbyt 0E003h + .dbyt 0E004h + .dbyt 0E005h + .dbyt 0E006h + .dbyt 0E007h + .dbyt 0E008h + .dbyt 0E009h + .dbyt 0E00Ah + .dbyt 0E00Bh + .dbyt 0E00Ch + .dbyt 0E00Dh + .dbyt 0E00Eh + .dbyt 0E00Fh + .dbyt 0EFE1h + .dbyt 0EFE2h + .dbyt 0EFE3h + .dbyt 0EFE4h + .dbyt 0EFE5h + .dbyt 0EFE6h + .dbyt 0EFE7h + .dbyt 0EFE8h + .dbyt 0EFE9h + .dbyt 0EFEAh + .dbyt 0EFEBh + .dbyt 0EFECh + .dbyt 0EFEDh + .dbyt 0EFEEh + .dbyt 0EFEFh + .dbyt 0EFF0h + .dbyt 0EFF1h + .dbyt 0EFF2h + .dbyt 0EFF3h + .dbyt 0EFF4h + .dbyt 0EFF5h + .dbyt 0EFF6h + .dbyt 0EFF7h + .dbyt 0EFF8h + .dbyt 0EFF9h + .dbyt 0EFFAh + .dbyt 0EFFBh + .dbyt 0EFFCh + .dbyt 0EFFDh + .dbyt 0EFFEh + .dbyt 0EFFFh + .dbyt 0F000h + .dbyt 0F001h + .dbyt 0F002h + .dbyt 0F003h + .dbyt 0F004h + .dbyt 0F005h + .dbyt 0F006h + .dbyt 0F007h + .dbyt 0F008h + .dbyt 0F009h + .dbyt 0F00Ah + .dbyt 0F00Bh + .dbyt 0F00Ch + .dbyt 0F00Dh + .dbyt 0F00Eh + .dbyt 0F00Fh + .dbyt 0FFE1h + .dbyt 0FFE2h + .dbyt 0FFE3h + .dbyt 0FFE4h + .dbyt 0FFE5h + .dbyt 0FFE6h + .dbyt 0FFE7h + .dbyt 0FFE8h + .dbyt 0FFE9h + .dbyt 0FFEAh + .dbyt 0FFEBh + .dbyt 0FFECh + .dbyt 0FFEDh + .dbyt 0FFEEh + .dbyt 0FFEFh + .dbyt 0FFF0h + .dbyt 0FFF1h + .dbyt 0FFF2h + .dbyt 0FFF3h + .dbyt 0FFF4h + .dbyt 0FFF5h + .dbyt 0FFF6h + .dbyt 0FFF7h + .dbyt 0FFF8h + .dbyt 0FFF9h + .dbyt 0FFFAh + .dbyt 0FFFBh + .dbyt 0FFFCh + .dbyt 0FFFDh + .dbyt 0FFFEh + .dbyt 0FFFFh + + ; alternative 4-digit hex values + .dbyt 0000h + .dbyt 0001h + .dbyt 0002h + .dbyt 0003h + .dbyt 0004h + .dbyt 0005h + .dbyt 0006h + .dbyt 0007h + .dbyt 0008h + .dbyt 0009h + .dbyt 000ah + .dbyt 000bh + .dbyt 000ch + .dbyt 000dh + .dbyt 000eh + .dbyt 000fh + .dbyt 0010h + .dbyt 0011h + .dbyt 0012h + .dbyt 0013h + .dbyt 0070h + .dbyt 0071h + .dbyt 0072h + .dbyt 0073h + .dbyt 0074h + .dbyt 0075h + .dbyt 0076h + .dbyt 0077h + .dbyt 0078h + .dbyt 0079h + .dbyt 007ah + .dbyt 007bh + .dbyt 007ch + .dbyt 007dh + .dbyt 007eh + .dbyt 007fh + .dbyt 0080h + .dbyt 0081h + .dbyt 0082h + .dbyt 0083h + .dbyt 0084h + .dbyt 0085h + .dbyt 0086h + .dbyt 00f0h + .dbyt 00f1h + .dbyt 00f2h + .dbyt 00f3h + .dbyt 00f4h + .dbyt 00f5h + .dbyt 00f6h + .dbyt 00f7h + .dbyt 00f8h + .dbyt 00f9h + .dbyt 00fah + .dbyt 00fbh + .dbyt 00fch + .dbyt 00fdh + .dbyt 00feh + .dbyt 00ffh + .dbyt 0100h + .dbyt 0101h + .dbyt 0102h + .dbyt 0103h + .dbyt 0fd2h + .dbyt 0fd3h + .dbyt 0fd4h + .dbyt 0fd5h + .dbyt 0fd6h + .dbyt 0fd7h + .dbyt 0fd8h + .dbyt 0fd9h + .dbyt 0fdah + .dbyt 0fdbh + .dbyt 0fdch + .dbyt 0fddh + .dbyt 0fdeh + .dbyt 0fdfh + .dbyt 0fe0h + .dbyt 0fe1h + .dbyt 0fe2h + .dbyt 0fe3h + .dbyt 0fe4h + .dbyt 0fe5h + .dbyt 0fe6h + .dbyt 0fe7h + .dbyt 0fe8h + .dbyt 0fe9h + .dbyt 0feah + .dbyt 0febh + .dbyt 0fech + .dbyt 0fedh + .dbyt 0feeh + .dbyt 0fefh + .dbyt 0ff0h + .dbyt 0ff1h + .dbyt 0ff2h + .dbyt 0ff3h + .dbyt 0ff4h + .dbyt 0ff5h + .dbyt 0ff6h + .dbyt 0ff7h + .dbyt 0ff8h + .dbyt 0ff9h + .dbyt 0ffah + .dbyt 0ffbh + .dbyt 0ffch + .dbyt 0ffdh + .dbyt 0ffeh + .dbyt 0fffh + .dbyt 1000h + .dbyt 1001h + .dbyt 1002h + .dbyt 1003h + .dbyt 1004h + .dbyt 1005h + .dbyt 1006h + .dbyt 1007h + .dbyt 1008h + .dbyt 7ff0h + .dbyt 7ff1h + .dbyt 7ff2h + .dbyt 7ff3h + .dbyt 7ff4h + .dbyt 7ff5h + .dbyt 7ff6h + .dbyt 7ff7h + .dbyt 7ff8h + .dbyt 7ff9h + .dbyt 7ffah + .dbyt 7ffbh + .dbyt 7ffch + .dbyt 7ffdh + .dbyt 7ffeh + .dbyt 7fffh + .dbyt 8000h + .dbyt 8001h + .dbyt 8002h + .dbyt 8003h + .dbyt 8004h + .dbyt 8005h + .dbyt 8006h + .dbyt 8007h + .dbyt 8008h + .dbyt 8009h + .dbyt 800ah + .dbyt 800bh + .dbyt 9fe1h + .dbyt 9fe2h + .dbyt 9fe3h + .dbyt 9fe4h + .dbyt 9fe5h + .dbyt 9fe6h + .dbyt 9fe7h + .dbyt 9fe8h + .dbyt 9fe9h + .dbyt 9feah + .dbyt 9febh + .dbyt 9fech + .dbyt 9fedh + .dbyt 9feeh + .dbyt 9fefh + .dbyt 9ff0h + .dbyt 9ff1h + .dbyt 9ff2h + .dbyt 9ff3h + .dbyt 9ff4h + .dbyt 9ff5h + .dbyt 9ff6h + .dbyt 9ff7h + .dbyt 9ff8h + .dbyt 9ff9h + .dbyt 9ffah + .dbyt 9ffbh + .dbyt 9ffch + .dbyt 9ffdh + .dbyt 9ffeh + .dbyt 9fffh + .dbyt 0a000h + .dbyt 0a001h + .dbyt 0a002h + .dbyt 0a003h + .dbyt 0a004h + .dbyt 0a005h + .dbyt 0a006h + .dbyt 0a007h + .dbyt 0a008h + .dbyt 0a009h + .dbyt 0a00ah + .dbyt 0a00bh + .dbyt 0a00ch + .dbyt 0a00dh + .dbyt 0a00eh + .dbyt 0a00fh + .dbyt 0afe1h + .dbyt 0afe2h + .dbyt 0afe3h + .dbyt 0afe4h + .dbyt 0afe5h + .dbyt 0afe6h + .dbyt 0afe7h + .dbyt 0afe8h + .dbyt 0afe9h + .dbyt 0afeah + .dbyt 0afebh + .dbyt 0afech + .dbyt 0afedh + .dbyt 0afeeh + .dbyt 0afefh + .dbyt 0aff0h + .dbyt 0aff1h + .dbyt 0aff2h + .dbyt 0aff3h + .dbyt 0aff4h + .dbyt 0aff5h + .dbyt 0aff6h + .dbyt 0aff7h + .dbyt 0aff8h + .dbyt 0aff9h + .dbyt 0affah + .dbyt 0affbh + .dbyt 0affch + .dbyt 0affdh + .dbyt 0affeh + .dbyt 0afffh + .dbyt 0b000h + .dbyt 0b001h + .dbyt 0b002h + .dbyt 0b003h + .dbyt 0b004h + .dbyt 0b005h + .dbyt 0b006h + .dbyt 0b007h + .dbyt 0b008h + .dbyt 0b009h + .dbyt 0b00ah + .dbyt 0b00bh + .dbyt 0b00ch + .dbyt 0b00dh + .dbyt 0b00eh + .dbyt 0b00fh + .dbyt 0bfe1h + .dbyt 0bfe2h + .dbyt 0bfe3h + .dbyt 0bfe4h + .dbyt 0bfe5h + .dbyt 0bfe6h + .dbyt 0bfe7h + .dbyt 0bfe8h + .dbyt 0bfe9h + .dbyt 0bfeah + .dbyt 0bfebh + .dbyt 0bfech + .dbyt 0bfedh + .dbyt 0bfeeh + .dbyt 0bfefh + .dbyt 0bff0h + .dbyt 0bff1h + .dbyt 0bff2h + .dbyt 0bff3h + .dbyt 0bff4h + .dbyt 0bff5h + .dbyt 0bff6h + .dbyt 0bff7h + .dbyt 0bff8h + .dbyt 0bff9h + .dbyt 0bffah + .dbyt 0bffbh + .dbyt 0bffch + .dbyt 0bffdh + .dbyt 0bffeh + .dbyt 0bfffh + .dbyt 0c000h + .dbyt 0c001h + .dbyt 0c002h + .dbyt 0c003h + .dbyt 0c004h + .dbyt 0c005h + .dbyt 0c006h + .dbyt 0c007h + .dbyt 0c008h + .dbyt 0c009h + .dbyt 0c00ah + .dbyt 0c00bh + .dbyt 0c00ch + .dbyt 0c00dh + .dbyt 0c00eh + .dbyt 0c00fh + .dbyt 0cfe1h + .dbyt 0cfe2h + .dbyt 0cfe3h + .dbyt 0cfe4h + .dbyt 0cfe5h + .dbyt 0cfe6h + .dbyt 0cfe7h + .dbyt 0cfe8h + .dbyt 0cfe9h + .dbyt 0cfeah + .dbyt 0cfebh + .dbyt 0cfech + .dbyt 0cfedh + .dbyt 0cfeeh + .dbyt 0cfefh + .dbyt 0cff0h + .dbyt 0cff1h + .dbyt 0cff2h + .dbyt 0cff3h + .dbyt 0cff4h + .dbyt 0cff5h + .dbyt 0cff6h + .dbyt 0cff7h + .dbyt 0cff8h + .dbyt 0cff9h + .dbyt 0cffah + .dbyt 0cffbh + .dbyt 0cffch + .dbyt 0cffdh + .dbyt 0cffeh + .dbyt 0cfffh + .dbyt 0d000h + .dbyt 0d001h + .dbyt 0d002h + .dbyt 0d003h + .dbyt 0d004h + .dbyt 0d005h + .dbyt 0d006h + .dbyt 0d007h + .dbyt 0d008h + .dbyt 0d009h + .dbyt 0d00ah + .dbyt 0d00bh + .dbyt 0d00ch + .dbyt 0d00dh + .dbyt 0d00eh + .dbyt 0d00fh + .dbyt 0dfe1h + .dbyt 0dfe2h + .dbyt 0dfe3h + .dbyt 0dfe4h + .dbyt 0dfe5h + .dbyt 0dfe6h + .dbyt 0dfe7h + .dbyt 0dfe8h + .dbyt 0dfe9h + .dbyt 0dfeah + .dbyt 0dfebh + .dbyt 0dfech + .dbyt 0dfedh + .dbyt 0dfeeh + .dbyt 0dfefh + .dbyt 0dff0h + .dbyt 0dff1h + .dbyt 0dff2h + .dbyt 0dff3h + .dbyt 0dff4h + .dbyt 0dff5h + .dbyt 0dff6h + .dbyt 0dff7h + .dbyt 0dff8h + .dbyt 0dff9h + .dbyt 0dffah + .dbyt 0dffbh + .dbyt 0dffch + .dbyt 0dffdh + .dbyt 0dffeh + .dbyt 0dfffh + .dbyt 0e000h + .dbyt 0e001h + .dbyt 0e002h + .dbyt 0e003h + .dbyt 0e004h + .dbyt 0e005h + .dbyt 0e006h + .dbyt 0e007h + .dbyt 0e008h + .dbyt 0e009h + .dbyt 0e00ah + .dbyt 0e00bh + .dbyt 0e00ch + .dbyt 0e00dh + .dbyt 0e00eh + .dbyt 0e00fh + .dbyt 0efe1h + .dbyt 0efe2h + .dbyt 0efe3h + .dbyt 0efe4h + .dbyt 0efe5h + .dbyt 0efe6h + .dbyt 0efe7h + .dbyt 0efe8h + .dbyt 0efe9h + .dbyt 0efeah + .dbyt 0efebh + .dbyt 0efech + .dbyt 0efedh + .dbyt 0efeeh + .dbyt 0efefh + .dbyt 0eff0h + .dbyt 0eff1h + .dbyt 0eff2h + .dbyt 0eff3h + .dbyt 0eff4h + .dbyt 0eff5h + .dbyt 0eff6h + .dbyt 0eff7h + .dbyt 0eff8h + .dbyt 0eff9h + .dbyt 0effah + .dbyt 0effbh + .dbyt 0effch + .dbyt 0effdh + .dbyt 0effeh + .dbyt 0efffh + .dbyt 0f000h + .dbyt 0f001h + .dbyt 0f002h + .dbyt 0f003h + .dbyt 0f004h + .dbyt 0f005h + .dbyt 0f006h + .dbyt 0f007h + .dbyt 0f008h + .dbyt 0f009h + .dbyt 0f00ah + .dbyt 0f00bh + .dbyt 0f00ch + .dbyt 0f00dh + .dbyt 0f00eh + .dbyt 0f00fh + .dbyt 0ffe1h + .dbyt 0ffe2h + .dbyt 0ffe3h + .dbyt 0ffe4h + .dbyt 0ffe5h + .dbyt 0ffe6h + .dbyt 0ffe7h + .dbyt 0ffe8h + .dbyt 0ffe9h + .dbyt 0ffeah + .dbyt 0ffebh + .dbyt 0ffech + .dbyt 0ffedh + .dbyt 0ffeeh + .dbyt 0ffefh + .dbyt 0fff0h + .dbyt 0fff1h + .dbyt 0fff2h + .dbyt 0fff3h + .dbyt 0fff4h + .dbyt 0fff5h + .dbyt 0fff6h + .dbyt 0fff7h + .dbyt 0fff8h + .dbyt 0fff9h + .dbyt 0fffah + .dbyt 0fffbh + .dbyt 0fffch + .dbyt 0fffdh + .dbyt 0fffeh + .dbyt 0ffffh + + ; alternative 4-digit hex values, uppercase + .dbyt 0000h + .dbyt 0001h + .dbyt 0002h + .dbyt 0003h + .dbyt 0004h + .dbyt 0005h + .dbyt 0006h + .dbyt 0007h + .dbyt 0008h + .dbyt 0009h + .dbyt 000Ah + .dbyt 000Bh + .dbyt 000Ch + .dbyt 000Dh + .dbyt 000Eh + .dbyt 000Fh + .dbyt 0010h + .dbyt 0011h + .dbyt 0012h + .dbyt 0013h + .dbyt 0070h + .dbyt 0071h + .dbyt 0072h + .dbyt 0073h + .dbyt 0074h + .dbyt 0075h + .dbyt 0076h + .dbyt 0077h + .dbyt 0078h + .dbyt 0079h + .dbyt 007Ah + .dbyt 007Bh + .dbyt 007Ch + .dbyt 007Dh + .dbyt 007Eh + .dbyt 007Fh + .dbyt 0080h + .dbyt 0081h + .dbyt 0082h + .dbyt 0083h + .dbyt 0084h + .dbyt 0085h + .dbyt 0086h + .dbyt 00F0h + .dbyt 00F1h + .dbyt 00F2h + .dbyt 00F3h + .dbyt 00F4h + .dbyt 00F5h + .dbyt 00F6h + .dbyt 00F7h + .dbyt 00F8h + .dbyt 00F9h + .dbyt 00FAh + .dbyt 00FBh + .dbyt 00FCh + .dbyt 00FDh + .dbyt 00FEh + .dbyt 00FFh + .dbyt 0100h + .dbyt 0101h + .dbyt 0102h + .dbyt 0103h + .dbyt 0FD2h + .dbyt 0FD3h + .dbyt 0FD4h + .dbyt 0FD5h + .dbyt 0FD6h + .dbyt 0FD7h + .dbyt 0FD8h + .dbyt 0FD9h + .dbyt 0FDAh + .dbyt 0FDBh + .dbyt 0FDCh + .dbyt 0FDDh + .dbyt 0FDEh + .dbyt 0FDFh + .dbyt 0FE0h + .dbyt 0FE1h + .dbyt 0FE2h + .dbyt 0FE3h + .dbyt 0FE4h + .dbyt 0FE5h + .dbyt 0FE6h + .dbyt 0FE7h + .dbyt 0FE8h + .dbyt 0FE9h + .dbyt 0FEAh + .dbyt 0FEBh + .dbyt 0FECh + .dbyt 0FEDh + .dbyt 0FEEh + .dbyt 0FEFh + .dbyt 0FF0h + .dbyt 0FF1h + .dbyt 0FF2h + .dbyt 0FF3h + .dbyt 0FF4h + .dbyt 0FF5h + .dbyt 0FF6h + .dbyt 0FF7h + .dbyt 0FF8h + .dbyt 0FF9h + .dbyt 0FFAh + .dbyt 0FFBh + .dbyt 0FFCh + .dbyt 0FFDh + .dbyt 0FFEh + .dbyt 0FFFh + .dbyt 1000h + .dbyt 1001h + .dbyt 1002h + .dbyt 1003h + .dbyt 1004h + .dbyt 1005h + .dbyt 1006h + .dbyt 1007h + .dbyt 1008h + .dbyt 7FF0h + .dbyt 7FF1h + .dbyt 7FF2h + .dbyt 7FF3h + .dbyt 7FF4h + .dbyt 7FF5h + .dbyt 7FF6h + .dbyt 7FF7h + .dbyt 7FF8h + .dbyt 7FF9h + .dbyt 7FFAh + .dbyt 7FFBh + .dbyt 7FFCh + .dbyt 7FFDh + .dbyt 7FFEh + .dbyt 7FFFh + .dbyt 8000h + .dbyt 8001h + .dbyt 8002h + .dbyt 8003h + .dbyt 8004h + .dbyt 8005h + .dbyt 8006h + .dbyt 8007h + .dbyt 8008h + .dbyt 8009h + .dbyt 800Ah + .dbyt 800Bh + .dbyt 9FE1h + .dbyt 9FE2h + .dbyt 9FE3h + .dbyt 9FE4h + .dbyt 9FE5h + .dbyt 9FE6h + .dbyt 9FE7h + .dbyt 9FE8h + .dbyt 9FE9h + .dbyt 9FEAh + .dbyt 9FEBh + .dbyt 9FECh + .dbyt 9FEDh + .dbyt 9FEEh + .dbyt 9FEFh + .dbyt 9FF0h + .dbyt 9FF1h + .dbyt 9FF2h + .dbyt 9FF3h + .dbyt 9FF4h + .dbyt 9FF5h + .dbyt 9FF6h + .dbyt 9FF7h + .dbyt 9FF8h + .dbyt 9FF9h + .dbyt 9FFAh + .dbyt 9FFBh + .dbyt 9FFCh + .dbyt 9FFDh + .dbyt 9FFEh + .dbyt 9FFFh + .dbyt 0A000h + .dbyt 0A001h + .dbyt 0A002h + .dbyt 0A003h + .dbyt 0A004h + .dbyt 0A005h + .dbyt 0A006h + .dbyt 0A007h + .dbyt 0A008h + .dbyt 0A009h + .dbyt 0A00Ah + .dbyt 0A00Bh + .dbyt 0A00Ch + .dbyt 0A00Dh + .dbyt 0A00Eh + .dbyt 0A00Fh + .dbyt 0AFE1h + .dbyt 0AFE2h + .dbyt 0AFE3h + .dbyt 0AFE4h + .dbyt 0AFE5h + .dbyt 0AFE6h + .dbyt 0AFE7h + .dbyt 0AFE8h + .dbyt 0AFE9h + .dbyt 0AFEAh + .dbyt 0AFEBh + .dbyt 0AFECh + .dbyt 0AFEDh + .dbyt 0AFEEh + .dbyt 0AFEFh + .dbyt 0AFF0h + .dbyt 0AFF1h + .dbyt 0AFF2h + .dbyt 0AFF3h + .dbyt 0AFF4h + .dbyt 0AFF5h + .dbyt 0AFF6h + .dbyt 0AFF7h + .dbyt 0AFF8h + .dbyt 0AFF9h + .dbyt 0AFFAh + .dbyt 0AFFBh + .dbyt 0AFFCh + .dbyt 0AFFDh + .dbyt 0AFFEh + .dbyt 0AFFFh + .dbyt 0B000h + .dbyt 0B001h + .dbyt 0B002h + .dbyt 0B003h + .dbyt 0B004h + .dbyt 0B005h + .dbyt 0B006h + .dbyt 0B007h + .dbyt 0B008h + .dbyt 0B009h + .dbyt 0B00Ah + .dbyt 0B00Bh + .dbyt 0B00Ch + .dbyt 0B00Dh + .dbyt 0B00Eh + .dbyt 0B00Fh + .dbyt 0BFE1h + .dbyt 0BFE2h + .dbyt 0BFE3h + .dbyt 0BFE4h + .dbyt 0BFE5h + .dbyt 0BFE6h + .dbyt 0BFE7h + .dbyt 0BFE8h + .dbyt 0BFE9h + .dbyt 0BFEAh + .dbyt 0BFEBh + .dbyt 0BFECh + .dbyt 0BFEDh + .dbyt 0BFEEh + .dbyt 0BFEFh + .dbyt 0BFF0h + .dbyt 0BFF1h + .dbyt 0BFF2h + .dbyt 0BFF3h + .dbyt 0BFF4h + .dbyt 0BFF5h + .dbyt 0BFF6h + .dbyt 0BFF7h + .dbyt 0BFF8h + .dbyt 0BFF9h + .dbyt 0BFFAh + .dbyt 0BFFBh + .dbyt 0BFFCh + .dbyt 0BFFDh + .dbyt 0BFFEh + .dbyt 0BFFFh + .dbyt 0C000h + .dbyt 0C001h + .dbyt 0C002h + .dbyt 0C003h + .dbyt 0C004h + .dbyt 0C005h + .dbyt 0C006h + .dbyt 0C007h + .dbyt 0C008h + .dbyt 0C009h + .dbyt 0C00Ah + .dbyt 0C00Bh + .dbyt 0C00Ch + .dbyt 0C00Dh + .dbyt 0C00Eh + .dbyt 0C00Fh + .dbyt 0CFE1h + .dbyt 0CFE2h + .dbyt 0CFE3h + .dbyt 0CFE4h + .dbyt 0CFE5h + .dbyt 0CFE6h + .dbyt 0CFE7h + .dbyt 0CFE8h + .dbyt 0CFE9h + .dbyt 0CFEAh + .dbyt 0CFEBh + .dbyt 0CFECh + .dbyt 0CFEDh + .dbyt 0CFEEh + .dbyt 0CFEFh + .dbyt 0CFF0h + .dbyt 0CFF1h + .dbyt 0CFF2h + .dbyt 0CFF3h + .dbyt 0CFF4h + .dbyt 0CFF5h + .dbyt 0CFF6h + .dbyt 0CFF7h + .dbyt 0CFF8h + .dbyt 0CFF9h + .dbyt 0CFFAh + .dbyt 0CFFBh + .dbyt 0CFFCh + .dbyt 0CFFDh + .dbyt 0CFFEh + .dbyt 0CFFFh + .dbyt 0D000h + .dbyt 0D001h + .dbyt 0D002h + .dbyt 0D003h + .dbyt 0D004h + .dbyt 0D005h + .dbyt 0D006h + .dbyt 0D007h + .dbyt 0D008h + .dbyt 0D009h + .dbyt 0D00Ah + .dbyt 0D00Bh + .dbyt 0D00Ch + .dbyt 0D00Dh + .dbyt 0D00Eh + .dbyt 0D00Fh + .dbyt 0DFE1h + .dbyt 0DFE2h + .dbyt 0DFE3h + .dbyt 0DFE4h + .dbyt 0DFE5h + .dbyt 0DFE6h + .dbyt 0DFE7h + .dbyt 0DFE8h + .dbyt 0DFE9h + .dbyt 0DFEAh + .dbyt 0DFEBh + .dbyt 0DFECh + .dbyt 0DFEDh + .dbyt 0DFEEh + .dbyt 0DFEFh + .dbyt 0DFF0h + .dbyt 0DFF1h + .dbyt 0DFF2h + .dbyt 0DFF3h + .dbyt 0DFF4h + .dbyt 0DFF5h + .dbyt 0DFF6h + .dbyt 0DFF7h + .dbyt 0DFF8h + .dbyt 0DFF9h + .dbyt 0DFFAh + .dbyt 0DFFBh + .dbyt 0DFFCh + .dbyt 0DFFDh + .dbyt 0DFFEh + .dbyt 0DFFFh + .dbyt 0E000h + .dbyt 0E001h + .dbyt 0E002h + .dbyt 0E003h + .dbyt 0E004h + .dbyt 0E005h + .dbyt 0E006h + .dbyt 0E007h + .dbyt 0E008h + .dbyt 0E009h + .dbyt 0E00Ah + .dbyt 0E00Bh + .dbyt 0E00Ch + .dbyt 0E00Dh + .dbyt 0E00Eh + .dbyt 0E00Fh + .dbyt 0EFE1h + .dbyt 0EFE2h + .dbyt 0EFE3h + .dbyt 0EFE4h + .dbyt 0EFE5h + .dbyt 0EFE6h + .dbyt 0EFE7h + .dbyt 0EFE8h + .dbyt 0EFE9h + .dbyt 0EFEAh + .dbyt 0EFEBh + .dbyt 0EFECh + .dbyt 0EFEDh + .dbyt 0EFEEh + .dbyt 0EFEFh + .dbyt 0EFF0h + .dbyt 0EFF1h + .dbyt 0EFF2h + .dbyt 0EFF3h + .dbyt 0EFF4h + .dbyt 0EFF5h + .dbyt 0EFF6h + .dbyt 0EFF7h + .dbyt 0EFF8h + .dbyt 0EFF9h + .dbyt 0EFFAh + .dbyt 0EFFBh + .dbyt 0EFFCh + .dbyt 0EFFDh + .dbyt 0EFFEh + .dbyt 0EFFFh + .dbyt 0F000h + .dbyt 0F001h + .dbyt 0F002h + .dbyt 0F003h + .dbyt 0F004h + .dbyt 0F005h + .dbyt 0F006h + .dbyt 0F007h + .dbyt 0F008h + .dbyt 0F009h + .dbyt 0F00Ah + .dbyt 0F00Bh + .dbyt 0F00Ch + .dbyt 0F00Dh + .dbyt 0F00Eh + .dbyt 0F00Fh + .dbyt 0FFE1h + .dbyt 0FFE2h + .dbyt 0FFE3h + .dbyt 0FFE4h + .dbyt 0FFE5h + .dbyt 0FFE6h + .dbyt 0FFE7h + .dbyt 0FFE8h + .dbyt 0FFE9h + .dbyt 0FFEAh + .dbyt 0FFEBh + .dbyt 0FFECh + .dbyt 0FFEDh + .dbyt 0FFEEh + .dbyt 0FFEFh + .dbyt 0FFF0h + .dbyt 0FFF1h + .dbyt 0FFF2h + .dbyt 0FFF3h + .dbyt 0FFF4h + .dbyt 0FFF5h + .dbyt 0FFF6h + .dbyt 0FFF7h + .dbyt 0FFF8h + .dbyt 0FFF9h + .dbyt 0FFFAh + .dbyt 0FFFBh + .dbyt 0FFFCh + .dbyt 0FFFDh + .dbyt 0FFFEh + .dbyt 0FFFFh + + ; alternative hex values, always leading zero + .dbyt 00h + .dbyt 01h + .dbyt 02h + .dbyt 03h + .dbyt 04h + .dbyt 05h + .dbyt 06h + .dbyt 07h + .dbyt 08h + .dbyt 09h + .dbyt 0ah + .dbyt 0bh + .dbyt 0ch + .dbyt 0dh + .dbyt 0eh + .dbyt 0fh + .dbyt 010h + .dbyt 011h + .dbyt 012h + .dbyt 013h + .dbyt 070h + .dbyt 071h + .dbyt 072h + .dbyt 073h + .dbyt 074h + .dbyt 075h + .dbyt 076h + .dbyt 077h + .dbyt 078h + .dbyt 079h + .dbyt 07ah + .dbyt 07bh + .dbyt 07ch + .dbyt 07dh + .dbyt 07eh + .dbyt 07fh + .dbyt 080h + .dbyt 081h + .dbyt 082h + .dbyt 083h + .dbyt 084h + .dbyt 085h + .dbyt 086h + .dbyt 0f0h + .dbyt 0f1h + .dbyt 0f2h + .dbyt 0f3h + .dbyt 0f4h + .dbyt 0f5h + .dbyt 0f6h + .dbyt 0f7h + .dbyt 0f8h + .dbyt 0f9h + .dbyt 0fah + .dbyt 0fbh + .dbyt 0fch + .dbyt 0fdh + .dbyt 0feh + .dbyt 0ffh + .dbyt 0100h + .dbyt 0101h + .dbyt 0102h + .dbyt 0103h + .dbyt 0fd2h + .dbyt 0fd3h + .dbyt 0fd4h + .dbyt 0fd5h + .dbyt 0fd6h + .dbyt 0fd7h + .dbyt 0fd8h + .dbyt 0fd9h + .dbyt 0fdah + .dbyt 0fdbh + .dbyt 0fdch + .dbyt 0fddh + .dbyt 0fdeh + .dbyt 0fdfh + .dbyt 0fe0h + .dbyt 0fe1h + .dbyt 0fe2h + .dbyt 0fe3h + .dbyt 0fe4h + .dbyt 0fe5h + .dbyt 0fe6h + .dbyt 0fe7h + .dbyt 0fe8h + .dbyt 0fe9h + .dbyt 0feah + .dbyt 0febh + .dbyt 0fech + .dbyt 0fedh + .dbyt 0feeh + .dbyt 0fefh + .dbyt 0ff0h + .dbyt 0ff1h + .dbyt 0ff2h + .dbyt 0ff3h + .dbyt 0ff4h + .dbyt 0ff5h + .dbyt 0ff6h + .dbyt 0ff7h + .dbyt 0ff8h + .dbyt 0ff9h + .dbyt 0ffah + .dbyt 0ffbh + .dbyt 0ffch + .dbyt 0ffdh + .dbyt 0ffeh + .dbyt 0fffh + .dbyt 01000h + .dbyt 01001h + .dbyt 01002h + .dbyt 01003h + .dbyt 01004h + .dbyt 01005h + .dbyt 01006h + .dbyt 01007h + .dbyt 01008h + .dbyt 07ff0h + .dbyt 07ff1h + .dbyt 07ff2h + .dbyt 07ff3h + .dbyt 07ff4h + .dbyt 07ff5h + .dbyt 07ff6h + .dbyt 07ff7h + .dbyt 07ff8h + .dbyt 07ff9h + .dbyt 07ffah + .dbyt 07ffbh + .dbyt 07ffch + .dbyt 07ffdh + .dbyt 07ffeh + .dbyt 07fffh + .dbyt 08000h + .dbyt 08001h + .dbyt 08002h + .dbyt 08003h + .dbyt 08004h + .dbyt 08005h + .dbyt 08006h + .dbyt 08007h + .dbyt 08008h + .dbyt 08009h + .dbyt 0800ah + .dbyt 0800bh + .dbyt 09fe1h + .dbyt 09fe2h + .dbyt 09fe3h + .dbyt 09fe4h + .dbyt 09fe5h + .dbyt 09fe6h + .dbyt 09fe7h + .dbyt 09fe8h + .dbyt 09fe9h + .dbyt 09feah + .dbyt 09febh + .dbyt 09fech + .dbyt 09fedh + .dbyt 09feeh + .dbyt 09fefh + .dbyt 09ff0h + .dbyt 09ff1h + .dbyt 09ff2h + .dbyt 09ff3h + .dbyt 09ff4h + .dbyt 09ff5h + .dbyt 09ff6h + .dbyt 09ff7h + .dbyt 09ff8h + .dbyt 09ff9h + .dbyt 09ffah + .dbyt 09ffbh + .dbyt 09ffch + .dbyt 09ffdh + .dbyt 09ffeh + .dbyt 09fffh + .dbyt 0a000h + .dbyt 0a001h + .dbyt 0a002h + .dbyt 0a003h + .dbyt 0a004h + .dbyt 0a005h + .dbyt 0a006h + .dbyt 0a007h + .dbyt 0a008h + .dbyt 0a009h + .dbyt 0a00ah + .dbyt 0a00bh + .dbyt 0a00ch + .dbyt 0a00dh + .dbyt 0a00eh + .dbyt 0a00fh + .dbyt 0afe1h + .dbyt 0afe2h + .dbyt 0afe3h + .dbyt 0afe4h + .dbyt 0afe5h + .dbyt 0afe6h + .dbyt 0afe7h + .dbyt 0afe8h + .dbyt 0afe9h + .dbyt 0afeah + .dbyt 0afebh + .dbyt 0afech + .dbyt 0afedh + .dbyt 0afeeh + .dbyt 0afefh + .dbyt 0aff0h + .dbyt 0aff1h + .dbyt 0aff2h + .dbyt 0aff3h + .dbyt 0aff4h + .dbyt 0aff5h + .dbyt 0aff6h + .dbyt 0aff7h + .dbyt 0aff8h + .dbyt 0aff9h + .dbyt 0affah + .dbyt 0affbh + .dbyt 0affch + .dbyt 0affdh + .dbyt 0affeh + .dbyt 0afffh + .dbyt 0b000h + .dbyt 0b001h + .dbyt 0b002h + .dbyt 0b003h + .dbyt 0b004h + .dbyt 0b005h + .dbyt 0b006h + .dbyt 0b007h + .dbyt 0b008h + .dbyt 0b009h + .dbyt 0b00ah + .dbyt 0b00bh + .dbyt 0b00ch + .dbyt 0b00dh + .dbyt 0b00eh + .dbyt 0b00fh + .dbyt 0bfe1h + .dbyt 0bfe2h + .dbyt 0bfe3h + .dbyt 0bfe4h + .dbyt 0bfe5h + .dbyt 0bfe6h + .dbyt 0bfe7h + .dbyt 0bfe8h + .dbyt 0bfe9h + .dbyt 0bfeah + .dbyt 0bfebh + .dbyt 0bfech + .dbyt 0bfedh + .dbyt 0bfeeh + .dbyt 0bfefh + .dbyt 0bff0h + .dbyt 0bff1h + .dbyt 0bff2h + .dbyt 0bff3h + .dbyt 0bff4h + .dbyt 0bff5h + .dbyt 0bff6h + .dbyt 0bff7h + .dbyt 0bff8h + .dbyt 0bff9h + .dbyt 0bffah + .dbyt 0bffbh + .dbyt 0bffch + .dbyt 0bffdh + .dbyt 0bffeh + .dbyt 0bfffh + .dbyt 0c000h + .dbyt 0c001h + .dbyt 0c002h + .dbyt 0c003h + .dbyt 0c004h + .dbyt 0c005h + .dbyt 0c006h + .dbyt 0c007h + .dbyt 0c008h + .dbyt 0c009h + .dbyt 0c00ah + .dbyt 0c00bh + .dbyt 0c00ch + .dbyt 0c00dh + .dbyt 0c00eh + .dbyt 0c00fh + .dbyt 0cfe1h + .dbyt 0cfe2h + .dbyt 0cfe3h + .dbyt 0cfe4h + .dbyt 0cfe5h + .dbyt 0cfe6h + .dbyt 0cfe7h + .dbyt 0cfe8h + .dbyt 0cfe9h + .dbyt 0cfeah + .dbyt 0cfebh + .dbyt 0cfech + .dbyt 0cfedh + .dbyt 0cfeeh + .dbyt 0cfefh + .dbyt 0cff0h + .dbyt 0cff1h + .dbyt 0cff2h + .dbyt 0cff3h + .dbyt 0cff4h + .dbyt 0cff5h + .dbyt 0cff6h + .dbyt 0cff7h + .dbyt 0cff8h + .dbyt 0cff9h + .dbyt 0cffah + .dbyt 0cffbh + .dbyt 0cffch + .dbyt 0cffdh + .dbyt 0cffeh + .dbyt 0cfffh + .dbyt 0d000h + .dbyt 0d001h + .dbyt 0d002h + .dbyt 0d003h + .dbyt 0d004h + .dbyt 0d005h + .dbyt 0d006h + .dbyt 0d007h + .dbyt 0d008h + .dbyt 0d009h + .dbyt 0d00ah + .dbyt 0d00bh + .dbyt 0d00ch + .dbyt 0d00dh + .dbyt 0d00eh + .dbyt 0d00fh + .dbyt 0dfe1h + .dbyt 0dfe2h + .dbyt 0dfe3h + .dbyt 0dfe4h + .dbyt 0dfe5h + .dbyt 0dfe6h + .dbyt 0dfe7h + .dbyt 0dfe8h + .dbyt 0dfe9h + .dbyt 0dfeah + .dbyt 0dfebh + .dbyt 0dfech + .dbyt 0dfedh + .dbyt 0dfeeh + .dbyt 0dfefh + .dbyt 0dff0h + .dbyt 0dff1h + .dbyt 0dff2h + .dbyt 0dff3h + .dbyt 0dff4h + .dbyt 0dff5h + .dbyt 0dff6h + .dbyt 0dff7h + .dbyt 0dff8h + .dbyt 0dff9h + .dbyt 0dffah + .dbyt 0dffbh + .dbyt 0dffch + .dbyt 0dffdh + .dbyt 0dffeh + .dbyt 0dfffh + .dbyt 0e000h + .dbyt 0e001h + .dbyt 0e002h + .dbyt 0e003h + .dbyt 0e004h + .dbyt 0e005h + .dbyt 0e006h + .dbyt 0e007h + .dbyt 0e008h + .dbyt 0e009h + .dbyt 0e00ah + .dbyt 0e00bh + .dbyt 0e00ch + .dbyt 0e00dh + .dbyt 0e00eh + .dbyt 0e00fh + .dbyt 0efe1h + .dbyt 0efe2h + .dbyt 0efe3h + .dbyt 0efe4h + .dbyt 0efe5h + .dbyt 0efe6h + .dbyt 0efe7h + .dbyt 0efe8h + .dbyt 0efe9h + .dbyt 0efeah + .dbyt 0efebh + .dbyt 0efech + .dbyt 0efedh + .dbyt 0efeeh + .dbyt 0efefh + .dbyt 0eff0h + .dbyt 0eff1h + .dbyt 0eff2h + .dbyt 0eff3h + .dbyt 0eff4h + .dbyt 0eff5h + .dbyt 0eff6h + .dbyt 0eff7h + .dbyt 0eff8h + .dbyt 0eff9h + .dbyt 0effah + .dbyt 0effbh + .dbyt 0effch + .dbyt 0effdh + .dbyt 0effeh + .dbyt 0efffh + .dbyt 0f000h + .dbyt 0f001h + .dbyt 0f002h + .dbyt 0f003h + .dbyt 0f004h + .dbyt 0f005h + .dbyt 0f006h + .dbyt 0f007h + .dbyt 0f008h + .dbyt 0f009h + .dbyt 0f00ah + .dbyt 0f00bh + .dbyt 0f00ch + .dbyt 0f00dh + .dbyt 0f00eh + .dbyt 0f00fh + .dbyt 0ffe1h + .dbyt 0ffe2h + .dbyt 0ffe3h + .dbyt 0ffe4h + .dbyt 0ffe5h + .dbyt 0ffe6h + .dbyt 0ffe7h + .dbyt 0ffe8h + .dbyt 0ffe9h + .dbyt 0ffeah + .dbyt 0ffebh + .dbyt 0ffech + .dbyt 0ffedh + .dbyt 0ffeeh + .dbyt 0ffefh + .dbyt 0fff0h + .dbyt 0fff1h + .dbyt 0fff2h + .dbyt 0fff3h + .dbyt 0fff4h + .dbyt 0fff5h + .dbyt 0fff6h + .dbyt 0fff7h + .dbyt 0fff8h + .dbyt 0fff9h + .dbyt 0fffah + .dbyt 0fffbh + .dbyt 0fffch + .dbyt 0fffdh + .dbyt 0fffeh + .dbyt 0ffffh + + ; binary values, variable length + .dbyt %0 + .dbyt %01 + .dbyt %010 + .dbyt %011 + .dbyt %0100 + .dbyt %0101 + .dbyt %0110 + .dbyt %0111 + .dbyt %01000 + .dbyt %01001 + .dbyt %01010 + .dbyt %01011 + .dbyt %01100 + .dbyt %01101 + .dbyt %01110 + .dbyt %01111 + .dbyt %010000 + .dbyt %010001 + .dbyt %010010 + .dbyt %010011 + .dbyt %01110000 + .dbyt %01110001 + .dbyt %01110010 + .dbyt %01110011 + .dbyt %01110100 + .dbyt %01110101 + .dbyt %01110110 + .dbyt %01110111 + .dbyt %01111000 + .dbyt %01111001 + .dbyt %01111010 + .dbyt %01111011 + .dbyt %01111100 + .dbyt %01111101 + .dbyt %01111110 + .dbyt %01111111 + .dbyt %010000000 + .dbyt %010000001 + .dbyt %010000010 + .dbyt %010000011 + .dbyt %010000100 + .dbyt %010000101 + .dbyt %010000110 + .dbyt %011110000 + .dbyt %011110001 + .dbyt %011110010 + .dbyt %011110011 + .dbyt %011110100 + .dbyt %011110101 + .dbyt %011110110 + .dbyt %011110111 + .dbyt %011111000 + .dbyt %011111001 + .dbyt %011111010 + .dbyt %011111011 + .dbyt %011111100 + .dbyt %011111101 + .dbyt %011111110 + .dbyt %011111111 + .dbyt %100000000 + .dbyt %100000001 + .dbyt %100000010 + .dbyt %100000011 + .dbyt %111111010010 + .dbyt %111111010011 + .dbyt %111111010100 + .dbyt %111111010101 + .dbyt %111111010110 + .dbyt %111111010111 + .dbyt %111111011000 + .dbyt %111111011001 + .dbyt %111111011010 + .dbyt %111111011011 + .dbyt %111111011100 + .dbyt %111111011101 + .dbyt %111111011110 + .dbyt %111111011111 + .dbyt %111111100000 + .dbyt %111111100001 + .dbyt %111111100010 + .dbyt %111111100011 + .dbyt %111111100100 + .dbyt %111111100101 + .dbyt %111111100110 + .dbyt %111111100111 + .dbyt %111111101000 + .dbyt %111111101001 + .dbyt %111111101010 + .dbyt %111111101011 + .dbyt %111111101100 + .dbyt %111111101101 + .dbyt %111111101110 + .dbyt %111111101111 + .dbyt %111111110000 + .dbyt %111111110001 + .dbyt %111111110010 + .dbyt %111111110011 + .dbyt %111111110100 + .dbyt %111111110101 + .dbyt %111111110110 + .dbyt %111111110111 + .dbyt %111111111000 + .dbyt %111111111001 + .dbyt %111111111010 + .dbyt %111111111011 + .dbyt %111111111100 + .dbyt %111111111101 + .dbyt %111111111110 + .dbyt %111111111111 + .dbyt %1000000000000 + .dbyt %1000000000001 + .dbyt %1000000000010 + .dbyt %1000000000011 + .dbyt %1000000000100 + .dbyt %1000000000101 + .dbyt %1000000000110 + .dbyt %1000000000111 + .dbyt %1000000001000 + .dbyt %111111111110000 + .dbyt %111111111110001 + .dbyt %111111111110010 + .dbyt %111111111110011 + .dbyt %111111111110100 + .dbyt %111111111110101 + .dbyt %111111111110110 + .dbyt %111111111110111 + .dbyt %111111111111000 + .dbyt %111111111111001 + .dbyt %111111111111010 + .dbyt %111111111111011 + .dbyt %111111111111100 + .dbyt %111111111111101 + .dbyt %111111111111110 + .dbyt %111111111111111 + .dbyt %1000000000000000 + .dbyt %1000000000000001 + .dbyt %1000000000000010 + .dbyt %1000000000000011 + .dbyt %1000000000000100 + .dbyt %1000000000000101 + .dbyt %1000000000000110 + .dbyt %1000000000000111 + .dbyt %1000000000001000 + .dbyt %1000000000001001 + .dbyt %1000000000001010 + .dbyt %1000000000001011 + .dbyt %1001111111100001 + .dbyt %1001111111100010 + .dbyt %1001111111100011 + .dbyt %1001111111100100 + .dbyt %1001111111100101 + .dbyt %1001111111100110 + .dbyt %1001111111100111 + .dbyt %1001111111101000 + .dbyt %1001111111101001 + .dbyt %1001111111101010 + .dbyt %1001111111101011 + .dbyt %1001111111101100 + .dbyt %1001111111101101 + .dbyt %1001111111101110 + .dbyt %1001111111101111 + .dbyt %1001111111110000 + .dbyt %1001111111110001 + .dbyt %1001111111110010 + .dbyt %1001111111110011 + .dbyt %1001111111110100 + .dbyt %1001111111110101 + .dbyt %1001111111110110 + .dbyt %1001111111110111 + .dbyt %1001111111111000 + .dbyt %1001111111111001 + .dbyt %1001111111111010 + .dbyt %1001111111111011 + .dbyt %1001111111111100 + .dbyt %1001111111111101 + .dbyt %1001111111111110 + .dbyt %1001111111111111 + .dbyt %1010000000000000 + .dbyt %1010000000000001 + .dbyt %1010000000000010 + .dbyt %1010000000000011 + .dbyt %1010000000000100 + .dbyt %1010000000000101 + .dbyt %1010000000000110 + .dbyt %1010000000000111 + .dbyt %1010000000001000 + .dbyt %1010000000001001 + .dbyt %1010000000001010 + .dbyt %1010000000001011 + .dbyt %1010000000001100 + .dbyt %1010000000001101 + .dbyt %1010000000001110 + .dbyt %1010000000001111 + .dbyt %1010111111100001 + .dbyt %1010111111100010 + .dbyt %1010111111100011 + .dbyt %1010111111100100 + .dbyt %1010111111100101 + .dbyt %1010111111100110 + .dbyt %1010111111100111 + .dbyt %1010111111101000 + .dbyt %1010111111101001 + .dbyt %1010111111101010 + .dbyt %1010111111101011 + .dbyt %1010111111101100 + .dbyt %1010111111101101 + .dbyt %1010111111101110 + .dbyt %1010111111101111 + .dbyt %1010111111110000 + .dbyt %1010111111110001 + .dbyt %1010111111110010 + .dbyt %1010111111110011 + .dbyt %1010111111110100 + .dbyt %1010111111110101 + .dbyt %1010111111110110 + .dbyt %1010111111110111 + .dbyt %1010111111111000 + .dbyt %1010111111111001 + .dbyt %1010111111111010 + .dbyt %1010111111111011 + .dbyt %1010111111111100 + .dbyt %1010111111111101 + .dbyt %1010111111111110 + .dbyt %1010111111111111 + .dbyt %1011000000000000 + .dbyt %1011000000000001 + .dbyt %1011000000000010 + .dbyt %1011000000000011 + .dbyt %1011000000000100 + .dbyt %1011000000000101 + .dbyt %1011000000000110 + .dbyt %1011000000000111 + .dbyt %1011000000001000 + .dbyt %1011000000001001 + .dbyt %1011000000001010 + .dbyt %1011000000001011 + .dbyt %1011000000001100 + .dbyt %1011000000001101 + .dbyt %1011000000001110 + .dbyt %1011000000001111 + .dbyt %1011111111100001 + .dbyt %1011111111100010 + .dbyt %1011111111100011 + .dbyt %1011111111100100 + .dbyt %1011111111100101 + .dbyt %1011111111100110 + .dbyt %1011111111100111 + .dbyt %1011111111101000 + .dbyt %1011111111101001 + .dbyt %1011111111101010 + .dbyt %1011111111101011 + .dbyt %1011111111101100 + .dbyt %1011111111101101 + .dbyt %1011111111101110 + .dbyt %1011111111101111 + .dbyt %1011111111110000 + .dbyt %1011111111110001 + .dbyt %1011111111110010 + .dbyt %1011111111110011 + .dbyt %1011111111110100 + .dbyt %1011111111110101 + .dbyt %1011111111110110 + .dbyt %1011111111110111 + .dbyt %1011111111111000 + .dbyt %1011111111111001 + .dbyt %1011111111111010 + .dbyt %1011111111111011 + .dbyt %1011111111111100 + .dbyt %1011111111111101 + .dbyt %1011111111111110 + .dbyt %1011111111111111 + .dbyt %1100000000000000 + .dbyt %1100000000000001 + .dbyt %1100000000000010 + .dbyt %1100000000000011 + .dbyt %1100000000000100 + .dbyt %1100000000000101 + .dbyt %1100000000000110 + .dbyt %1100000000000111 + .dbyt %1100000000001000 + .dbyt %1100000000001001 + .dbyt %1100000000001010 + .dbyt %1100000000001011 + .dbyt %1100000000001100 + .dbyt %1100000000001101 + .dbyt %1100000000001110 + .dbyt %1100000000001111 + .dbyt %1100111111100001 + .dbyt %1100111111100010 + .dbyt %1100111111100011 + .dbyt %1100111111100100 + .dbyt %1100111111100101 + .dbyt %1100111111100110 + .dbyt %1100111111100111 + .dbyt %1100111111101000 + .dbyt %1100111111101001 + .dbyt %1100111111101010 + .dbyt %1100111111101011 + .dbyt %1100111111101100 + .dbyt %1100111111101101 + .dbyt %1100111111101110 + .dbyt %1100111111101111 + .dbyt %1100111111110000 + .dbyt %1100111111110001 + .dbyt %1100111111110010 + .dbyt %1100111111110011 + .dbyt %1100111111110100 + .dbyt %1100111111110101 + .dbyt %1100111111110110 + .dbyt %1100111111110111 + .dbyt %1100111111111000 + .dbyt %1100111111111001 + .dbyt %1100111111111010 + .dbyt %1100111111111011 + .dbyt %1100111111111100 + .dbyt %1100111111111101 + .dbyt %1100111111111110 + .dbyt %1100111111111111 + .dbyt %1101000000000000 + .dbyt %1101000000000001 + .dbyt %1101000000000010 + .dbyt %1101000000000011 + .dbyt %1101000000000100 + .dbyt %1101000000000101 + .dbyt %1101000000000110 + .dbyt %1101000000000111 + .dbyt %1101000000001000 + .dbyt %1101000000001001 + .dbyt %1101000000001010 + .dbyt %1101000000001011 + .dbyt %1101000000001100 + .dbyt %1101000000001101 + .dbyt %1101000000001110 + .dbyt %1101000000001111 + .dbyt %1101111111100001 + .dbyt %1101111111100010 + .dbyt %1101111111100011 + .dbyt %1101111111100100 + .dbyt %1101111111100101 + .dbyt %1101111111100110 + .dbyt %1101111111100111 + .dbyt %1101111111101000 + .dbyt %1101111111101001 + .dbyt %1101111111101010 + .dbyt %1101111111101011 + .dbyt %1101111111101100 + .dbyt %1101111111101101 + .dbyt %1101111111101110 + .dbyt %1101111111101111 + .dbyt %1101111111110000 + .dbyt %1101111111110001 + .dbyt %1101111111110010 + .dbyt %1101111111110011 + .dbyt %1101111111110100 + .dbyt %1101111111110101 + .dbyt %1101111111110110 + .dbyt %1101111111110111 + .dbyt %1101111111111000 + .dbyt %1101111111111001 + .dbyt %1101111111111010 + .dbyt %1101111111111011 + .dbyt %1101111111111100 + .dbyt %1101111111111101 + .dbyt %1101111111111110 + .dbyt %1101111111111111 + .dbyt %1110000000000000 + .dbyt %1110000000000001 + .dbyt %1110000000000010 + .dbyt %1110000000000011 + .dbyt %1110000000000100 + .dbyt %1110000000000101 + .dbyt %1110000000000110 + .dbyt %1110000000000111 + .dbyt %1110000000001000 + .dbyt %1110000000001001 + .dbyt %1110000000001010 + .dbyt %1110000000001011 + .dbyt %1110000000001100 + .dbyt %1110000000001101 + .dbyt %1110000000001110 + .dbyt %1110000000001111 + .dbyt %1110111111100001 + .dbyt %1110111111100010 + .dbyt %1110111111100011 + .dbyt %1110111111100100 + .dbyt %1110111111100101 + .dbyt %1110111111100110 + .dbyt %1110111111100111 + .dbyt %1110111111101000 + .dbyt %1110111111101001 + .dbyt %1110111111101010 + .dbyt %1110111111101011 + .dbyt %1110111111101100 + .dbyt %1110111111101101 + .dbyt %1110111111101110 + .dbyt %1110111111101111 + .dbyt %1110111111110000 + .dbyt %1110111111110001 + .dbyt %1110111111110010 + .dbyt %1110111111110011 + .dbyt %1110111111110100 + .dbyt %1110111111110101 + .dbyt %1110111111110110 + .dbyt %1110111111110111 + .dbyt %1110111111111000 + .dbyt %1110111111111001 + .dbyt %1110111111111010 + .dbyt %1110111111111011 + .dbyt %1110111111111100 + .dbyt %1110111111111101 + .dbyt %1110111111111110 + .dbyt %1110111111111111 + .dbyt %1111000000000000 + .dbyt %1111000000000001 + .dbyt %1111000000000010 + .dbyt %1111000000000011 + .dbyt %1111000000000100 + .dbyt %1111000000000101 + .dbyt %1111000000000110 + .dbyt %1111000000000111 + .dbyt %1111000000001000 + .dbyt %1111000000001001 + .dbyt %1111000000001010 + .dbyt %1111000000001011 + .dbyt %1111000000001100 + .dbyt %1111000000001101 + .dbyt %1111000000001110 + .dbyt %1111000000001111 + .dbyt %1111111111100001 + .dbyt %1111111111100010 + .dbyt %1111111111100011 + .dbyt %1111111111100100 + .dbyt %1111111111100101 + .dbyt %1111111111100110 + .dbyt %1111111111100111 + .dbyt %1111111111101000 + .dbyt %1111111111101001 + .dbyt %1111111111101010 + .dbyt %1111111111101011 + .dbyt %1111111111101100 + .dbyt %1111111111101101 + .dbyt %1111111111101110 + .dbyt %1111111111101111 + .dbyt %1111111111110000 + .dbyt %1111111111110001 + .dbyt %1111111111110010 + .dbyt %1111111111110011 + .dbyt %1111111111110100 + .dbyt %1111111111110101 + .dbyt %1111111111110110 + .dbyt %1111111111110111 + .dbyt %1111111111111000 + .dbyt %1111111111111001 + .dbyt %1111111111111010 + .dbyt %1111111111111011 + .dbyt %1111111111111100 + .dbyt %1111111111111101 + .dbyt %1111111111111110 + .dbyt %1111111111111111 + + ; binary values, full length + .dbyt %0000000000000000 + .dbyt %0000000000000001 + .dbyt %0000000000000010 + .dbyt %0000000000000011 + .dbyt %0000000000000100 + .dbyt %0000000000000101 + .dbyt %0000000000000110 + .dbyt %0000000000000111 + .dbyt %0000000000001000 + .dbyt %0000000000001001 + .dbyt %0000000000001010 + .dbyt %0000000000001011 + .dbyt %0000000000001100 + .dbyt %0000000000001101 + .dbyt %0000000000001110 + .dbyt %0000000000001111 + .dbyt %0000000000010000 + .dbyt %0000000000010001 + .dbyt %0000000000010010 + .dbyt %0000000000010011 + .dbyt %0000000001110000 + .dbyt %0000000001110001 + .dbyt %0000000001110010 + .dbyt %0000000001110011 + .dbyt %0000000001110100 + .dbyt %0000000001110101 + .dbyt %0000000001110110 + .dbyt %0000000001110111 + .dbyt %0000000001111000 + .dbyt %0000000001111001 + .dbyt %0000000001111010 + .dbyt %0000000001111011 + .dbyt %0000000001111100 + .dbyt %0000000001111101 + .dbyt %0000000001111110 + .dbyt %0000000001111111 + .dbyt %0000000010000000 + .dbyt %0000000010000001 + .dbyt %0000000010000010 + .dbyt %0000000010000011 + .dbyt %0000000010000100 + .dbyt %0000000010000101 + .dbyt %0000000010000110 + .dbyt %0000000011110000 + .dbyt %0000000011110001 + .dbyt %0000000011110010 + .dbyt %0000000011110011 + .dbyt %0000000011110100 + .dbyt %0000000011110101 + .dbyt %0000000011110110 + .dbyt %0000000011110111 + .dbyt %0000000011111000 + .dbyt %0000000011111001 + .dbyt %0000000011111010 + .dbyt %0000000011111011 + .dbyt %0000000011111100 + .dbyt %0000000011111101 + .dbyt %0000000011111110 + .dbyt %0000000011111111 + .dbyt %0000000100000000 + .dbyt %0000000100000001 + .dbyt %0000000100000010 + .dbyt %0000000100000011 + .dbyt %0000111111010010 + .dbyt %0000111111010011 + .dbyt %0000111111010100 + .dbyt %0000111111010101 + .dbyt %0000111111010110 + .dbyt %0000111111010111 + .dbyt %0000111111011000 + .dbyt %0000111111011001 + .dbyt %0000111111011010 + .dbyt %0000111111011011 + .dbyt %0000111111011100 + .dbyt %0000111111011101 + .dbyt %0000111111011110 + .dbyt %0000111111011111 + .dbyt %0000111111100000 + .dbyt %0000111111100001 + .dbyt %0000111111100010 + .dbyt %0000111111100011 + .dbyt %0000111111100100 + .dbyt %0000111111100101 + .dbyt %0000111111100110 + .dbyt %0000111111100111 + .dbyt %0000111111101000 + .dbyt %0000111111101001 + .dbyt %0000111111101010 + .dbyt %0000111111101011 + .dbyt %0000111111101100 + .dbyt %0000111111101101 + .dbyt %0000111111101110 + .dbyt %0000111111101111 + .dbyt %0000111111110000 + .dbyt %0000111111110001 + .dbyt %0000111111110010 + .dbyt %0000111111110011 + .dbyt %0000111111110100 + .dbyt %0000111111110101 + .dbyt %0000111111110110 + .dbyt %0000111111110111 + .dbyt %0000111111111000 + .dbyt %0000111111111001 + .dbyt %0000111111111010 + .dbyt %0000111111111011 + .dbyt %0000111111111100 + .dbyt %0000111111111101 + .dbyt %0000111111111110 + .dbyt %0000111111111111 + .dbyt %0001000000000000 + .dbyt %0001000000000001 + .dbyt %0001000000000010 + .dbyt %0001000000000011 + .dbyt %0001000000000100 + .dbyt %0001000000000101 + .dbyt %0001000000000110 + .dbyt %0001000000000111 + .dbyt %0001000000001000 + .dbyt %0111111111110000 + .dbyt %0111111111110001 + .dbyt %0111111111110010 + .dbyt %0111111111110011 + .dbyt %0111111111110100 + .dbyt %0111111111110101 + .dbyt %0111111111110110 + .dbyt %0111111111110111 + .dbyt %0111111111111000 + .dbyt %0111111111111001 + .dbyt %0111111111111010 + .dbyt %0111111111111011 + .dbyt %0111111111111100 + .dbyt %0111111111111101 + .dbyt %0111111111111110 + .dbyt %0111111111111111 + .dbyt %1000000000000000 + .dbyt %1000000000000001 + .dbyt %1000000000000010 + .dbyt %1000000000000011 + .dbyt %1000000000000100 + .dbyt %1000000000000101 + .dbyt %1000000000000110 + .dbyt %1000000000000111 + .dbyt %1000000000001000 + .dbyt %1000000000001001 + .dbyt %1000000000001010 + .dbyt %1000000000001011 + .dbyt %1001111111100001 + .dbyt %1001111111100010 + .dbyt %1001111111100011 + .dbyt %1001111111100100 + .dbyt %1001111111100101 + .dbyt %1001111111100110 + .dbyt %1001111111100111 + .dbyt %1001111111101000 + .dbyt %1001111111101001 + .dbyt %1001111111101010 + .dbyt %1001111111101011 + .dbyt %1001111111101100 + .dbyt %1001111111101101 + .dbyt %1001111111101110 + .dbyt %1001111111101111 + .dbyt %1001111111110000 + .dbyt %1001111111110001 + .dbyt %1001111111110010 + .dbyt %1001111111110011 + .dbyt %1001111111110100 + .dbyt %1001111111110101 + .dbyt %1001111111110110 + .dbyt %1001111111110111 + .dbyt %1001111111111000 + .dbyt %1001111111111001 + .dbyt %1001111111111010 + .dbyt %1001111111111011 + .dbyt %1001111111111100 + .dbyt %1001111111111101 + .dbyt %1001111111111110 + .dbyt %1001111111111111 + .dbyt %1010000000000000 + .dbyt %1010000000000001 + .dbyt %1010000000000010 + .dbyt %1010000000000011 + .dbyt %1010000000000100 + .dbyt %1010000000000101 + .dbyt %1010000000000110 + .dbyt %1010000000000111 + .dbyt %1010000000001000 + .dbyt %1010000000001001 + .dbyt %1010000000001010 + .dbyt %1010000000001011 + .dbyt %1010000000001100 + .dbyt %1010000000001101 + .dbyt %1010000000001110 + .dbyt %1010000000001111 + .dbyt %1010111111100001 + .dbyt %1010111111100010 + .dbyt %1010111111100011 + .dbyt %1010111111100100 + .dbyt %1010111111100101 + .dbyt %1010111111100110 + .dbyt %1010111111100111 + .dbyt %1010111111101000 + .dbyt %1010111111101001 + .dbyt %1010111111101010 + .dbyt %1010111111101011 + .dbyt %1010111111101100 + .dbyt %1010111111101101 + .dbyt %1010111111101110 + .dbyt %1010111111101111 + .dbyt %1010111111110000 + .dbyt %1010111111110001 + .dbyt %1010111111110010 + .dbyt %1010111111110011 + .dbyt %1010111111110100 + .dbyt %1010111111110101 + .dbyt %1010111111110110 + .dbyt %1010111111110111 + .dbyt %1010111111111000 + .dbyt %1010111111111001 + .dbyt %1010111111111010 + .dbyt %1010111111111011 + .dbyt %1010111111111100 + .dbyt %1010111111111101 + .dbyt %1010111111111110 + .dbyt %1010111111111111 + .dbyt %1011000000000000 + .dbyt %1011000000000001 + .dbyt %1011000000000010 + .dbyt %1011000000000011 + .dbyt %1011000000000100 + .dbyt %1011000000000101 + .dbyt %1011000000000110 + .dbyt %1011000000000111 + .dbyt %1011000000001000 + .dbyt %1011000000001001 + .dbyt %1011000000001010 + .dbyt %1011000000001011 + .dbyt %1011000000001100 + .dbyt %1011000000001101 + .dbyt %1011000000001110 + .dbyt %1011000000001111 + .dbyt %1011111111100001 + .dbyt %1011111111100010 + .dbyt %1011111111100011 + .dbyt %1011111111100100 + .dbyt %1011111111100101 + .dbyt %1011111111100110 + .dbyt %1011111111100111 + .dbyt %1011111111101000 + .dbyt %1011111111101001 + .dbyt %1011111111101010 + .dbyt %1011111111101011 + .dbyt %1011111111101100 + .dbyt %1011111111101101 + .dbyt %1011111111101110 + .dbyt %1011111111101111 + .dbyt %1011111111110000 + .dbyt %1011111111110001 + .dbyt %1011111111110010 + .dbyt %1011111111110011 + .dbyt %1011111111110100 + .dbyt %1011111111110101 + .dbyt %1011111111110110 + .dbyt %1011111111110111 + .dbyt %1011111111111000 + .dbyt %1011111111111001 + .dbyt %1011111111111010 + .dbyt %1011111111111011 + .dbyt %1011111111111100 + .dbyt %1011111111111101 + .dbyt %1011111111111110 + .dbyt %1011111111111111 + .dbyt %1100000000000000 + .dbyt %1100000000000001 + .dbyt %1100000000000010 + .dbyt %1100000000000011 + .dbyt %1100000000000100 + .dbyt %1100000000000101 + .dbyt %1100000000000110 + .dbyt %1100000000000111 + .dbyt %1100000000001000 + .dbyt %1100000000001001 + .dbyt %1100000000001010 + .dbyt %1100000000001011 + .dbyt %1100000000001100 + .dbyt %1100000000001101 + .dbyt %1100000000001110 + .dbyt %1100000000001111 + .dbyt %1100111111100001 + .dbyt %1100111111100010 + .dbyt %1100111111100011 + .dbyt %1100111111100100 + .dbyt %1100111111100101 + .dbyt %1100111111100110 + .dbyt %1100111111100111 + .dbyt %1100111111101000 + .dbyt %1100111111101001 + .dbyt %1100111111101010 + .dbyt %1100111111101011 + .dbyt %1100111111101100 + .dbyt %1100111111101101 + .dbyt %1100111111101110 + .dbyt %1100111111101111 + .dbyt %1100111111110000 + .dbyt %1100111111110001 + .dbyt %1100111111110010 + .dbyt %1100111111110011 + .dbyt %1100111111110100 + .dbyt %1100111111110101 + .dbyt %1100111111110110 + .dbyt %1100111111110111 + .dbyt %1100111111111000 + .dbyt %1100111111111001 + .dbyt %1100111111111010 + .dbyt %1100111111111011 + .dbyt %1100111111111100 + .dbyt %1100111111111101 + .dbyt %1100111111111110 + .dbyt %1100111111111111 + .dbyt %1101000000000000 + .dbyt %1101000000000001 + .dbyt %1101000000000010 + .dbyt %1101000000000011 + .dbyt %1101000000000100 + .dbyt %1101000000000101 + .dbyt %1101000000000110 + .dbyt %1101000000000111 + .dbyt %1101000000001000 + .dbyt %1101000000001001 + .dbyt %1101000000001010 + .dbyt %1101000000001011 + .dbyt %1101000000001100 + .dbyt %1101000000001101 + .dbyt %1101000000001110 + .dbyt %1101000000001111 + .dbyt %1101111111100001 + .dbyt %1101111111100010 + .dbyt %1101111111100011 + .dbyt %1101111111100100 + .dbyt %1101111111100101 + .dbyt %1101111111100110 + .dbyt %1101111111100111 + .dbyt %1101111111101000 + .dbyt %1101111111101001 + .dbyt %1101111111101010 + .dbyt %1101111111101011 + .dbyt %1101111111101100 + .dbyt %1101111111101101 + .dbyt %1101111111101110 + .dbyt %1101111111101111 + .dbyt %1101111111110000 + .dbyt %1101111111110001 + .dbyt %1101111111110010 + .dbyt %1101111111110011 + .dbyt %1101111111110100 + .dbyt %1101111111110101 + .dbyt %1101111111110110 + .dbyt %1101111111110111 + .dbyt %1101111111111000 + .dbyt %1101111111111001 + .dbyt %1101111111111010 + .dbyt %1101111111111011 + .dbyt %1101111111111100 + .dbyt %1101111111111101 + .dbyt %1101111111111110 + .dbyt %1101111111111111 + .dbyt %1110000000000000 + .dbyt %1110000000000001 + .dbyt %1110000000000010 + .dbyt %1110000000000011 + .dbyt %1110000000000100 + .dbyt %1110000000000101 + .dbyt %1110000000000110 + .dbyt %1110000000000111 + .dbyt %1110000000001000 + .dbyt %1110000000001001 + .dbyt %1110000000001010 + .dbyt %1110000000001011 + .dbyt %1110000000001100 + .dbyt %1110000000001101 + .dbyt %1110000000001110 + .dbyt %1110000000001111 + .dbyt %1110111111100001 + .dbyt %1110111111100010 + .dbyt %1110111111100011 + .dbyt %1110111111100100 + .dbyt %1110111111100101 + .dbyt %1110111111100110 + .dbyt %1110111111100111 + .dbyt %1110111111101000 + .dbyt %1110111111101001 + .dbyt %1110111111101010 + .dbyt %1110111111101011 + .dbyt %1110111111101100 + .dbyt %1110111111101101 + .dbyt %1110111111101110 + .dbyt %1110111111101111 + .dbyt %1110111111110000 + .dbyt %1110111111110001 + .dbyt %1110111111110010 + .dbyt %1110111111110011 + .dbyt %1110111111110100 + .dbyt %1110111111110101 + .dbyt %1110111111110110 + .dbyt %1110111111110111 + .dbyt %1110111111111000 + .dbyt %1110111111111001 + .dbyt %1110111111111010 + .dbyt %1110111111111011 + .dbyt %1110111111111100 + .dbyt %1110111111111101 + .dbyt %1110111111111110 + .dbyt %1110111111111111 + .dbyt %1111000000000000 + .dbyt %1111000000000001 + .dbyt %1111000000000010 + .dbyt %1111000000000011 + .dbyt %1111000000000100 + .dbyt %1111000000000101 + .dbyt %1111000000000110 + .dbyt %1111000000000111 + .dbyt %1111000000001000 + .dbyt %1111000000001001 + .dbyt %1111000000001010 + .dbyt %1111000000001011 + .dbyt %1111000000001100 + .dbyt %1111000000001101 + .dbyt %1111000000001110 + .dbyt %1111000000001111 + .dbyt %1111111111100001 + .dbyt %1111111111100010 + .dbyt %1111111111100011 + .dbyt %1111111111100100 + .dbyt %1111111111100101 + .dbyt %1111111111100110 + .dbyt %1111111111100111 + .dbyt %1111111111101000 + .dbyt %1111111111101001 + .dbyt %1111111111101010 + .dbyt %1111111111101011 + .dbyt %1111111111101100 + .dbyt %1111111111101101 + .dbyt %1111111111101110 + .dbyt %1111111111101111 + .dbyt %1111111111110000 + .dbyt %1111111111110001 + .dbyt %1111111111110010 + .dbyt %1111111111110011 + .dbyt %1111111111110100 + .dbyt %1111111111110101 + .dbyt %1111111111110110 + .dbyt %1111111111110111 + .dbyt %1111111111111000 + .dbyt %1111111111111001 + .dbyt %1111111111111010 + .dbyt %1111111111111011 + .dbyt %1111111111111100 + .dbyt %1111111111111101 + .dbyt %1111111111111110 + .dbyt %1111111111111111 + + ; multiple values on one line, decimal + .dbyt 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 + .dbyt 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 + .dbyt 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 + .dbyt 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 + .dbyt 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 + .dbyt 256,257,258,259,260,261,262,263,264,265,266,267,268,269,270,271 + .dbyt 4064,4065,4066,4067,4068,4069,4070,4071,4072,4073,4074,4075,4076,4077,4078,4079 + .dbyt 4080,4081,4082,4083,4084,4085,4086,4087,4088,4089,4090,4091,4092,4093,4094,4095 + .dbyt 4096,4097,4098,4099,4100,4101,4102,4103,4104,4105,4106,4107,4108,4109,4110,4111 + .dbyt 32752,32753,32754,32755,32756,32757,32758,32759,32760,32761,32762,32763,32764,32765,32766,32767 + .dbyt 32768,32769,32770,32771,32772,32773,32774,32775,32776,32777,32778,32779,32780,32781,32782,32783 + .dbyt 40944,40945,40946,40947,40948,40949,40950,40951,40952,40953,40954,40955,40956,40957,40958,40959 + .dbyt 40960,40961,40962,40963,40964,40965,40966,40967,40968,40969,40970,40971,40972,40973,40974,40975 + .dbyt 45040,45041,45042,45043,45044,45045,45046,45047,45048,45049,45050,45051,45052,45053,45054,45055 + .dbyt 45056,45057,45058,45059,45060,45061,45062,45063,45064,45065,45066,45067,45068,45069,45070,45071 + .dbyt 49136,49137,49138,49139,49140,49141,49142,49143,49144,49145,49146,49147,49148,49149,49150,49151 + .dbyt 49152,49153,49154,49155,49156,49157,49158,49159,49160,49161,49162,49163,49164,49165,49166,49167 + .dbyt 53232,53233,53234,53235,53236,53237,53238,53239,53240,53241,53242,53243,53244,53245,53246,53247 + .dbyt 53248,53249,53250,53251,53252,53253,53254,53255,53256,53257,53258,53259,53260,53261,53262,53263 + .dbyt 57328,57329,57330,57331,57332,57333,57334,57335,57336,57337,57338,57339,57340,57341,57342,57343 + .dbyt 57344,57345,57346,57347,57348,57349,57350,57351,57352,57353,57354,57355,57356,57357,57358,57359 + .dbyt 61424,61425,61426,61427,61428,61429,61430,61431,61432,61433,61434,61435,61436,61437,61438,61439 + .dbyt 61440,61441,61442,61443,61444,61445,61446,61447,61448,61449,61450,61451,61452,61453,61454,61455 + .dbyt 65520,65521,65522,65523,65524,65525,65526,65527,65528,65529,65530,65531,65532,65533,65534,65535 + + ; multiple values on one line, hex + .dbyt $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f + .dbyt $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f + .dbyt $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f + .dbyt $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f + .dbyt $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff + .dbyt $100,$101,$102,$103,$104,$105,$106,$107,$108,$109,$10a,$10b,$10c,$10d,$10e,$10f + .dbyt $fe0,$fe1,$fe2,$fe3,$fe4,$fe5,$fe6,$fe7,$fe8,$fe9,$fea,$feb,$fec,$fed,$fee,$fef + .dbyt $ff0,$ff1,$ff2,$ff3,$ff4,$ff5,$ff6,$ff7,$ff8,$ff9,$ffa,$ffb,$ffc,$ffd,$ffe,$fff + .dbyt $1000,$1001,$1002,$1003,$1004,$1005,$1006,$1007,$1008,$1009,$100a,$100b,$100c,$100d,$100e,$100f + .dbyt $7ff0,$7ff1,$7ff2,$7ff3,$7ff4,$7ff5,$7ff6,$7ff7,$7ff8,$7ff9,$7ffa,$7ffb,$7ffc,$7ffd,$7ffe,$7fff + .dbyt $8000,$8001,$8002,$8003,$8004,$8005,$8006,$8007,$8008,$8009,$800a,$800b,$800c,$800d,$800e,$800f + .dbyt $9ff0,$9ff1,$9ff2,$9ff3,$9ff4,$9ff5,$9ff6,$9ff7,$9ff8,$9ff9,$9ffa,$9ffb,$9ffc,$9ffd,$9ffe,$9fff + .dbyt $a000,$a001,$a002,$a003,$a004,$a005,$a006,$a007,$a008,$a009,$a00a,$a00b,$a00c,$a00d,$a00e,$a00f + .dbyt $aff0,$aff1,$aff2,$aff3,$aff4,$aff5,$aff6,$aff7,$aff8,$aff9,$affa,$affb,$affc,$affd,$affe,$afff + .dbyt $b000,$b001,$b002,$b003,$b004,$b005,$b006,$b007,$b008,$b009,$b00a,$b00b,$b00c,$b00d,$b00e,$b00f + .dbyt $bff0,$bff1,$bff2,$bff3,$bff4,$bff5,$bff6,$bff7,$bff8,$bff9,$bffa,$bffb,$bffc,$bffd,$bffe,$bfff + .dbyt $c000,$c001,$c002,$c003,$c004,$c005,$c006,$c007,$c008,$c009,$c00a,$c00b,$c00c,$c00d,$c00e,$c00f + .dbyt $cff0,$cff1,$cff2,$cff3,$cff4,$cff5,$cff6,$cff7,$cff8,$cff9,$cffa,$cffb,$cffc,$cffd,$cffe,$cfff + .dbyt $d000,$d001,$d002,$d003,$d004,$d005,$d006,$d007,$d008,$d009,$d00a,$d00b,$d00c,$d00d,$d00e,$d00f + .dbyt $dff0,$dff1,$dff2,$dff3,$dff4,$dff5,$dff6,$dff7,$dff8,$dff9,$dffa,$dffb,$dffc,$dffd,$dffe,$dfff + .dbyt $e000,$e001,$e002,$e003,$e004,$e005,$e006,$e007,$e008,$e009,$e00a,$e00b,$e00c,$e00d,$e00e,$e00f + .dbyt $eff0,$eff1,$eff2,$eff3,$eff4,$eff5,$eff6,$eff7,$eff8,$eff9,$effa,$effb,$effc,$effd,$effe,$efff + .dbyt $f000,$f001,$f002,$f003,$f004,$f005,$f006,$f007,$f008,$f009,$f00a,$f00b,$f00c,$f00d,$f00e,$f00f + .dbyt $fff0,$fff1,$fff2,$fff3,$fff4,$fff5,$fff6,$fff7,$fff8,$fff9,$fffa,$fffb,$fffc,$fffd,$fffe,$ffff + + ; multiple values on one line, alternative hex + .dbyt 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh + .dbyt 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh + .dbyt 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh + .dbyt 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh + .dbyt 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh + .dbyt 100h,101h,102h,103h,104h,105h,106h,107h,108h,109h,10ah,10bh,10ch,10dh,10eh,10fh + .dbyt 0fe0h,0fe1h,0fe2h,0fe3h,0fe4h,0fe5h,0fe6h,0fe7h,0fe8h,0fe9h,0feah,0febh,0fech,0fedh,0feeh,0fefh + .dbyt 0ff0h,0ff1h,0ff2h,0ff3h,0ff4h,0ff5h,0ff6h,0ff7h,0ff8h,0ff9h,0ffah,0ffbh,0ffch,0ffdh,0ffeh,0fffh + .dbyt 1000h,1001h,1002h,1003h,1004h,1005h,1006h,1007h,1008h,1009h,100ah,100bh,100ch,100dh,100eh,100fh + .dbyt 7ff0h,7ff1h,7ff2h,7ff3h,7ff4h,7ff5h,7ff6h,7ff7h,7ff8h,7ff9h,7ffah,7ffbh,7ffch,7ffdh,7ffeh,7fffh + .dbyt 8000h,8001h,8002h,8003h,8004h,8005h,8006h,8007h,8008h,8009h,800ah,800bh,800ch,800dh,800eh,800fh + .dbyt 9ff0h,9ff1h,9ff2h,9ff3h,9ff4h,9ff5h,9ff6h,9ff7h,9ff8h,9ff9h,9ffah,9ffbh,9ffch,9ffdh,9ffeh,9fffh + .dbyt 0a000h,0a001h,0a002h,0a003h,0a004h,0a005h,0a006h,0a007h,0a008h,0a009h,0a00ah,0a00bh,0a00ch,0a00dh,0a00eh,0a00fh + .dbyt 0aff0h,0aff1h,0aff2h,0aff3h,0aff4h,0aff5h,0aff6h,0aff7h,0aff8h,0aff9h,0affah,0affbh,0affch,0affdh,0affeh,0afffh + .dbyt 0b000h,0b001h,0b002h,0b003h,0b004h,0b005h,0b006h,0b007h,0b008h,0b009h,0b00ah,0b00bh,0b00ch,0b00dh,0b00eh,0b00fh + .dbyt 0bff0h,0bff1h,0bff2h,0bff3h,0bff4h,0bff5h,0bff6h,0bff7h,0bff8h,0bff9h,0bffah,0bffbh,0bffch,0bffdh,0bffeh,0bfffh + .dbyt 0c000h,0c001h,0c002h,0c003h,0c004h,0c005h,0c006h,0c007h,0c008h,0c009h,0c00ah,0c00bh,0c00ch,0c00dh,0c00eh,0c00fh + .dbyt 0cff0h,0cff1h,0cff2h,0cff3h,0cff4h,0cff5h,0cff6h,0cff7h,0cff8h,0cff9h,0cffah,0cffbh,0cffch,0cffdh,0cffeh,0cfffh + .dbyt 0d000h,0d001h,0d002h,0d003h,0d004h,0d005h,0d006h,0d007h,0d008h,0d009h,0d00ah,0d00bh,0d00ch,0d00dh,0d00eh,0d00fh + .dbyt 0dff0h,0dff1h,0dff2h,0dff3h,0dff4h,0dff5h,0dff6h,0dff7h,0dff8h,0dff9h,0dffah,0dffbh,0dffch,0dffdh,0dffeh,0dfffh + .dbyt 0e000h,0e001h,0e002h,0e003h,0e004h,0e005h,0e006h,0e007h,0e008h,0e009h,0e00ah,0e00bh,0e00ch,0e00dh,0e00eh,0e00fh + .dbyt 0eff0h,0eff1h,0eff2h,0eff3h,0eff4h,0eff5h,0eff6h,0eff7h,0eff8h,0eff9h,0effah,0effbh,0effch,0effdh,0effeh,0efffh + .dbyt 0f000h,0f001h,0f002h,0f003h,0f004h,0f005h,0f006h,0f007h,0f008h,0f009h,0f00ah,0f00bh,0f00ch,0f00dh,0f00eh,0f00fh + .dbyt 0fff0h,0fff1h,0fff2h,0fff3h,0fff4h,0fff5h,0fff6h,0fff7h,0fff8h,0fff9h,0fffah,0fffbh,0fffch,0fffdh,0fffeh,0ffffh + + ; mix some variants + .dbyt 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh diff --git a/test/asm/listing/104-dword.s b/test/asm/listing/104-dword.s new file mode 100644 index 000000000..b7da26ff0 --- /dev/null +++ b/test/asm/listing/104-dword.s @@ -0,0 +1,4874 @@ +; 2022-06-15 Spiro Trikaliotis + + + ; upper case pseudo-op + .DWORD 0 + .DWORD 1 + .DWORD 2 + .DWORD 3 + .DWORD 4 + .DWORD 5 + .DWORD 6 + .DWORD 7 + .DWORD 8 + .DWORD 9 + .DWORD 10 + .DWORD 11 + .DWORD 12 + .DWORD 13 + .DWORD 14 + .DWORD 15 + .DWORD 16 + .DWORD 17 + .DWORD 18 + .DWORD 19 + .DWORD 112 + .DWORD 113 + .DWORD 114 + .DWORD 115 + .DWORD 116 + .DWORD 117 + .DWORD 118 + .DWORD 119 + .DWORD 120 + .DWORD 121 + .DWORD 122 + .DWORD 123 + .DWORD 124 + .DWORD 125 + .DWORD 126 + .DWORD 127 + .DWORD 128 + .DWORD 129 + .DWORD 130 + .DWORD 131 + .DWORD 132 + .DWORD 133 + .DWORD 134 + .DWORD 240 + .DWORD 241 + .DWORD 242 + .DWORD 243 + .DWORD 244 + .DWORD 245 + .DWORD 246 + .DWORD 247 + .DWORD 248 + .DWORD 249 + .DWORD 250 + .DWORD 251 + .DWORD 252 + .DWORD 253 + .DWORD 254 + .DWORD 255 + .DWORD 256 + .DWORD 257 + .DWORD 258 + .DWORD 259 + .DWORD 4050 + .DWORD 4051 + .DWORD 4052 + .DWORD 4053 + .DWORD 4054 + .DWORD 4055 + .DWORD 4056 + .DWORD 4057 + .DWORD 4058 + .DWORD 4059 + .DWORD 4060 + .DWORD 4061 + .DWORD 4062 + .DWORD 4063 + .DWORD 4064 + .DWORD 4065 + .DWORD 4066 + .DWORD 4067 + .DWORD 4068 + .DWORD 4069 + .DWORD 4070 + .DWORD 4071 + .DWORD 4072 + .DWORD 4073 + .DWORD 4074 + .DWORD 4075 + .DWORD 4076 + .DWORD 4077 + .DWORD 4078 + .DWORD 4079 + .DWORD 4080 + .DWORD 4081 + .DWORD 4082 + .DWORD 4083 + .DWORD 4084 + .DWORD 4085 + .DWORD 4086 + .DWORD 4087 + .DWORD 4088 + .DWORD 4089 + .DWORD 4090 + .DWORD 4091 + .DWORD 4092 + .DWORD 4093 + .DWORD 4094 + .DWORD 4095 + .DWORD 4096 + .DWORD 4097 + .DWORD 4098 + .DWORD 4099 + .DWORD 4100 + .DWORD 4101 + .DWORD 4102 + .DWORD 4103 + .DWORD 4104 + .DWORD 32752 + .DWORD 32753 + .DWORD 32754 + .DWORD 32755 + .DWORD 32756 + .DWORD 32757 + .DWORD 32758 + .DWORD 32759 + .DWORD 32760 + .DWORD 32761 + .DWORD 32762 + .DWORD 32763 + .DWORD 32764 + .DWORD 32765 + .DWORD 32766 + .DWORD 32767 + .DWORD 32768 + .DWORD 32769 + .DWORD 32770 + .DWORD 32771 + .DWORD 32772 + .DWORD 32773 + .DWORD 32774 + .DWORD 32775 + .DWORD 32776 + .DWORD 32777 + .DWORD 32778 + .DWORD 32779 + .DWORD 40929 + .DWORD 40930 + .DWORD 40931 + .DWORD 40932 + .DWORD 40933 + .DWORD 40934 + .DWORD 40935 + .DWORD 40936 + .DWORD 40937 + .DWORD 40938 + .DWORD 40939 + .DWORD 40940 + .DWORD 40941 + .DWORD 40942 + .DWORD 40943 + .DWORD 40944 + .DWORD 40945 + .DWORD 40946 + .DWORD 40947 + .DWORD 40948 + .DWORD 40949 + .DWORD 40950 + .DWORD 40951 + .DWORD 40952 + .DWORD 40953 + .DWORD 40954 + .DWORD 40955 + .DWORD 40956 + .DWORD 40957 + .DWORD 40958 + .DWORD 40959 + .DWORD 40960 + .DWORD 40961 + .DWORD 40962 + .DWORD 40963 + .DWORD 40964 + .DWORD 40965 + .DWORD 40966 + .DWORD 40967 + .DWORD 40968 + .DWORD 40969 + .DWORD 40970 + .DWORD 40971 + .DWORD 40972 + .DWORD 40973 + .DWORD 40974 + .DWORD 40975 + .DWORD 45025 + .DWORD 45026 + .DWORD 45027 + .DWORD 45028 + .DWORD 45029 + .DWORD 45030 + .DWORD 45031 + .DWORD 45032 + .DWORD 45033 + .DWORD 45034 + .DWORD 45035 + .DWORD 45036 + .DWORD 45037 + .DWORD 45038 + .DWORD 45039 + .DWORD 45040 + .DWORD 45041 + .DWORD 45042 + .DWORD 45043 + .DWORD 45044 + .DWORD 45045 + .DWORD 45046 + .DWORD 45047 + .DWORD 45048 + .DWORD 45049 + .DWORD 45050 + .DWORD 45051 + .DWORD 45052 + .DWORD 45053 + .DWORD 45054 + .DWORD 45055 + .DWORD 45056 + .DWORD 45057 + .DWORD 45058 + .DWORD 45059 + .DWORD 45060 + .DWORD 45061 + .DWORD 45062 + .DWORD 45063 + .DWORD 45064 + .DWORD 45065 + .DWORD 45066 + .DWORD 45067 + .DWORD 45068 + .DWORD 45069 + .DWORD 45070 + .DWORD 45071 + .DWORD 65505 + .DWORD 65506 + .DWORD 65507 + .DWORD 65508 + .DWORD 65509 + .DWORD 65510 + .DWORD 65511 + .DWORD 65512 + .DWORD 65513 + .DWORD 65514 + .DWORD 65515 + .DWORD 65516 + .DWORD 65517 + .DWORD 65518 + .DWORD 65519 + .DWORD 65520 + .DWORD 65521 + .DWORD 65522 + .DWORD 65523 + .DWORD 65524 + .DWORD 65525 + .DWORD 65526 + .DWORD 65527 + .DWORD 65528 + .DWORD 65529 + .DWORD 65530 + .DWORD 65531 + .DWORD 65532 + .DWORD 65533 + .DWORD 65534 + .DWORD 65535 + .DWORD 65536 + .DWORD 65537 + .DWORD 65538 + .DWORD 65539 + .DWORD 65540 + .DWORD 65541 + .DWORD 65542 + .DWORD 65543 + .DWORD 65544 + .DWORD 65545 + .DWORD 65546 + .DWORD 65547 + .DWORD 65548 + .DWORD 65549 + .DWORD 65550 + .DWORD 65551 + .DWORD 2147483632 + .DWORD 2147483633 + .DWORD 2147483634 + .DWORD 2147483635 + .DWORD 2147483636 + .DWORD 2147483637 + .DWORD 2147483638 + .DWORD 2147483639 + .DWORD 2147483640 + .DWORD 2147483641 + .DWORD 2147483642 + .DWORD 2147483643 + .DWORD 2147483644 + .DWORD 2147483645 + .DWORD 2147483646 + .DWORD 2147483647 + .DWORD 2147483648 + .DWORD 2147483649 + .DWORD 2147483650 + .DWORD 2147483651 + .DWORD 2147483652 + .DWORD 2147483653 + .DWORD 2147483654 + .DWORD 2147483655 + .DWORD 2147483656 + .DWORD 2147483657 + .DWORD 2147483658 + .DWORD 2147483659 + .DWORD 2147483660 + .DWORD 2147483661 + .DWORD 2147483662 + .DWORD 2147483663 + .DWORD 2684354544 + .DWORD 2684354545 + .DWORD 2684354546 + .DWORD 2684354547 + .DWORD 2684354548 + .DWORD 2684354549 + .DWORD 2684354550 + .DWORD 2684354551 + .DWORD 2684354552 + .DWORD 2684354553 + .DWORD 2684354554 + .DWORD 2684354555 + .DWORD 2684354556 + .DWORD 2684354557 + .DWORD 2684354558 + .DWORD 2684354559 + .DWORD 2684354560 + .DWORD 2684354561 + .DWORD 2684354562 + .DWORD 2684354563 + .DWORD 2684354564 + .DWORD 2684354565 + .DWORD 2684354566 + .DWORD 2684354567 + .DWORD 2684354568 + .DWORD 2684354569 + .DWORD 2684354570 + .DWORD 2684354571 + .DWORD 2684354572 + .DWORD 2684354573 + .DWORD 2684354574 + .DWORD 2684354575 + .DWORD 4294967280 + .DWORD 4294967281 + .DWORD 4294967282 + .DWORD 4294967283 + .DWORD 4294967284 + .DWORD 4294967285 + .DWORD 4294967286 + .DWORD 4294967287 + .DWORD 4294967288 + .DWORD 4294967289 + .DWORD 4294967290 + .DWORD 4294967291 + .DWORD 4294967292 + .DWORD 4294967293 + .DWORD 4294967294 + .DWORD 4294967295 + + ; lower case pseudo-op + .dword 0 + .dword 1 + .dword 2 + .dword 3 + .dword 4 + .dword 5 + .dword 6 + .dword 7 + .dword 8 + .dword 9 + .dword 10 + .dword 11 + .dword 12 + .dword 13 + .dword 14 + .dword 15 + .dword 16 + .dword 17 + .dword 18 + .dword 19 + .dword 112 + .dword 113 + .dword 114 + .dword 115 + .dword 116 + .dword 117 + .dword 118 + .dword 119 + .dword 120 + .dword 121 + .dword 122 + .dword 123 + .dword 124 + .dword 125 + .dword 126 + .dword 127 + .dword 128 + .dword 129 + .dword 130 + .dword 131 + .dword 132 + .dword 133 + .dword 134 + .dword 240 + .dword 241 + .dword 242 + .dword 243 + .dword 244 + .dword 245 + .dword 246 + .dword 247 + .dword 248 + .dword 249 + .dword 250 + .dword 251 + .dword 252 + .dword 253 + .dword 254 + .dword 255 + .dword 256 + .dword 257 + .dword 258 + .dword 259 + .dword 4050 + .dword 4051 + .dword 4052 + .dword 4053 + .dword 4054 + .dword 4055 + .dword 4056 + .dword 4057 + .dword 4058 + .dword 4059 + .dword 4060 + .dword 4061 + .dword 4062 + .dword 4063 + .dword 4064 + .dword 4065 + .dword 4066 + .dword 4067 + .dword 4068 + .dword 4069 + .dword 4070 + .dword 4071 + .dword 4072 + .dword 4073 + .dword 4074 + .dword 4075 + .dword 4076 + .dword 4077 + .dword 4078 + .dword 4079 + .dword 4080 + .dword 4081 + .dword 4082 + .dword 4083 + .dword 4084 + .dword 4085 + .dword 4086 + .dword 4087 + .dword 4088 + .dword 4089 + .dword 4090 + .dword 4091 + .dword 4092 + .dword 4093 + .dword 4094 + .dword 4095 + .dword 4096 + .dword 4097 + .dword 4098 + .dword 4099 + .dword 4100 + .dword 4101 + .dword 4102 + .dword 4103 + .dword 4104 + .dword 32752 + .dword 32753 + .dword 32754 + .dword 32755 + .dword 32756 + .dword 32757 + .dword 32758 + .dword 32759 + .dword 32760 + .dword 32761 + .dword 32762 + .dword 32763 + .dword 32764 + .dword 32765 + .dword 32766 + .dword 32767 + .dword 32768 + .dword 32769 + .dword 32770 + .dword 32771 + .dword 32772 + .dword 32773 + .dword 32774 + .dword 32775 + .dword 32776 + .dword 32777 + .dword 32778 + .dword 32779 + .dword 40929 + .dword 40930 + .dword 40931 + .dword 40932 + .dword 40933 + .dword 40934 + .dword 40935 + .dword 40936 + .dword 40937 + .dword 40938 + .dword 40939 + .dword 40940 + .dword 40941 + .dword 40942 + .dword 40943 + .dword 40944 + .dword 40945 + .dword 40946 + .dword 40947 + .dword 40948 + .dword 40949 + .dword 40950 + .dword 40951 + .dword 40952 + .dword 40953 + .dword 40954 + .dword 40955 + .dword 40956 + .dword 40957 + .dword 40958 + .dword 40959 + .dword 40960 + .dword 40961 + .dword 40962 + .dword 40963 + .dword 40964 + .dword 40965 + .dword 40966 + .dword 40967 + .dword 40968 + .dword 40969 + .dword 40970 + .dword 40971 + .dword 40972 + .dword 40973 + .dword 40974 + .dword 40975 + .dword 45025 + .dword 45026 + .dword 45027 + .dword 45028 + .dword 45029 + .dword 45030 + .dword 45031 + .dword 45032 + .dword 45033 + .dword 45034 + .dword 45035 + .dword 45036 + .dword 45037 + .dword 45038 + .dword 45039 + .dword 45040 + .dword 45041 + .dword 45042 + .dword 45043 + .dword 45044 + .dword 45045 + .dword 45046 + .dword 45047 + .dword 45048 + .dword 45049 + .dword 45050 + .dword 45051 + .dword 45052 + .dword 45053 + .dword 45054 + .dword 45055 + .dword 45056 + .dword 45057 + .dword 45058 + .dword 45059 + .dword 45060 + .dword 45061 + .dword 45062 + .dword 45063 + .dword 45064 + .dword 45065 + .dword 45066 + .dword 45067 + .dword 45068 + .dword 45069 + .dword 45070 + .dword 45071 + .dword 65505 + .dword 65506 + .dword 65507 + .dword 65508 + .dword 65509 + .dword 65510 + .dword 65511 + .dword 65512 + .dword 65513 + .dword 65514 + .dword 65515 + .dword 65516 + .dword 65517 + .dword 65518 + .dword 65519 + .dword 65520 + .dword 65521 + .dword 65522 + .dword 65523 + .dword 65524 + .dword 65525 + .dword 65526 + .dword 65527 + .dword 65528 + .dword 65529 + .dword 65530 + .dword 65531 + .dword 65532 + .dword 65533 + .dword 65534 + .dword 65535 + .dword 65536 + .dword 65537 + .dword 65538 + .dword 65539 + .dword 65540 + .dword 65541 + .dword 65542 + .dword 65543 + .dword 65544 + .dword 65545 + .dword 65546 + .dword 65547 + .dword 65548 + .dword 65549 + .dword 65550 + .dword 65551 + .dword 2147483632 + .dword 2147483633 + .dword 2147483634 + .dword 2147483635 + .dword 2147483636 + .dword 2147483637 + .dword 2147483638 + .dword 2147483639 + .dword 2147483640 + .dword 2147483641 + .dword 2147483642 + .dword 2147483643 + .dword 2147483644 + .dword 2147483645 + .dword 2147483646 + .dword 2147483647 + .dword 2147483648 + .dword 2147483649 + .dword 2147483650 + .dword 2147483651 + .dword 2147483652 + .dword 2147483653 + .dword 2147483654 + .dword 2147483655 + .dword 2147483656 + .dword 2147483657 + .dword 2147483658 + .dword 2147483659 + .dword 2147483660 + .dword 2147483661 + .dword 2147483662 + .dword 2147483663 + .dword 2684354544 + .dword 2684354545 + .dword 2684354546 + .dword 2684354547 + .dword 2684354548 + .dword 2684354549 + .dword 2684354550 + .dword 2684354551 + .dword 2684354552 + .dword 2684354553 + .dword 2684354554 + .dword 2684354555 + .dword 2684354556 + .dword 2684354557 + .dword 2684354558 + .dword 2684354559 + .dword 2684354560 + .dword 2684354561 + .dword 2684354562 + .dword 2684354563 + .dword 2684354564 + .dword 2684354565 + .dword 2684354566 + .dword 2684354567 + .dword 2684354568 + .dword 2684354569 + .dword 2684354570 + .dword 2684354571 + .dword 2684354572 + .dword 2684354573 + .dword 2684354574 + .dword 2684354575 + .dword 4294967280 + .dword 4294967281 + .dword 4294967282 + .dword 4294967283 + .dword 4294967284 + .dword 4294967285 + .dword 4294967286 + .dword 4294967287 + .dword 4294967288 + .dword 4294967289 + .dword 4294967290 + .dword 4294967291 + .dword 4294967292 + .dword 4294967293 + .dword 4294967294 + .dword 4294967295 + + ; hex values + .dword $0 + .dword $1 + .dword $2 + .dword $3 + .dword $4 + .dword $5 + .dword $6 + .dword $7 + .dword $8 + .dword $9 + .dword $a + .dword $b + .dword $c + .dword $d + .dword $e + .dword $f + .dword $10 + .dword $11 + .dword $12 + .dword $13 + .dword $70 + .dword $71 + .dword $72 + .dword $73 + .dword $74 + .dword $75 + .dword $76 + .dword $77 + .dword $78 + .dword $79 + .dword $7a + .dword $7b + .dword $7c + .dword $7d + .dword $7e + .dword $7f + .dword $80 + .dword $81 + .dword $82 + .dword $83 + .dword $84 + .dword $85 + .dword $86 + .dword $f0 + .dword $f1 + .dword $f2 + .dword $f3 + .dword $f4 + .dword $f5 + .dword $f6 + .dword $f7 + .dword $f8 + .dword $f9 + .dword $fa + .dword $fb + .dword $fc + .dword $fd + .dword $fe + .dword $ff + .dword $100 + .dword $101 + .dword $102 + .dword $103 + .dword $fd2 + .dword $fd3 + .dword $fd4 + .dword $fd5 + .dword $fd6 + .dword $fd7 + .dword $fd8 + .dword $fd9 + .dword $fda + .dword $fdb + .dword $fdc + .dword $fdd + .dword $fde + .dword $fdf + .dword $fe0 + .dword $fe1 + .dword $fe2 + .dword $fe3 + .dword $fe4 + .dword $fe5 + .dword $fe6 + .dword $fe7 + .dword $fe8 + .dword $fe9 + .dword $fea + .dword $feb + .dword $fec + .dword $fed + .dword $fee + .dword $fef + .dword $ff0 + .dword $ff1 + .dword $ff2 + .dword $ff3 + .dword $ff4 + .dword $ff5 + .dword $ff6 + .dword $ff7 + .dword $ff8 + .dword $ff9 + .dword $ffa + .dword $ffb + .dword $ffc + .dword $ffd + .dword $ffe + .dword $fff + .dword $1000 + .dword $1001 + .dword $1002 + .dword $1003 + .dword $1004 + .dword $1005 + .dword $1006 + .dword $1007 + .dword $1008 + .dword $7ff0 + .dword $7ff1 + .dword $7ff2 + .dword $7ff3 + .dword $7ff4 + .dword $7ff5 + .dword $7ff6 + .dword $7ff7 + .dword $7ff8 + .dword $7ff9 + .dword $7ffa + .dword $7ffb + .dword $7ffc + .dword $7ffd + .dword $7ffe + .dword $7fff + .dword $8000 + .dword $8001 + .dword $8002 + .dword $8003 + .dword $8004 + .dword $8005 + .dword $8006 + .dword $8007 + .dword $8008 + .dword $8009 + .dword $800a + .dword $800b + .dword $9fe1 + .dword $9fe2 + .dword $9fe3 + .dword $9fe4 + .dword $9fe5 + .dword $9fe6 + .dword $9fe7 + .dword $9fe8 + .dword $9fe9 + .dword $9fea + .dword $9feb + .dword $9fec + .dword $9fed + .dword $9fee + .dword $9fef + .dword $9ff0 + .dword $9ff1 + .dword $9ff2 + .dword $9ff3 + .dword $9ff4 + .dword $9ff5 + .dword $9ff6 + .dword $9ff7 + .dword $9ff8 + .dword $9ff9 + .dword $9ffa + .dword $9ffb + .dword $9ffc + .dword $9ffd + .dword $9ffe + .dword $9fff + .dword $a000 + .dword $a001 + .dword $a002 + .dword $a003 + .dword $a004 + .dword $a005 + .dword $a006 + .dword $a007 + .dword $a008 + .dword $a009 + .dword $a00a + .dword $a00b + .dword $a00c + .dword $a00d + .dword $a00e + .dword $a00f + .dword $afe1 + .dword $afe2 + .dword $afe3 + .dword $afe4 + .dword $afe5 + .dword $afe6 + .dword $afe7 + .dword $afe8 + .dword $afe9 + .dword $afea + .dword $afeb + .dword $afec + .dword $afed + .dword $afee + .dword $afef + .dword $aff0 + .dword $aff1 + .dword $aff2 + .dword $aff3 + .dword $aff4 + .dword $aff5 + .dword $aff6 + .dword $aff7 + .dword $aff8 + .dword $aff9 + .dword $affa + .dword $affb + .dword $affc + .dword $affd + .dword $affe + .dword $afff + .dword $b000 + .dword $b001 + .dword $b002 + .dword $b003 + .dword $b004 + .dword $b005 + .dword $b006 + .dword $b007 + .dword $b008 + .dword $b009 + .dword $b00a + .dword $b00b + .dword $b00c + .dword $b00d + .dword $b00e + .dword $b00f + .dword $ffe1 + .dword $ffe2 + .dword $ffe3 + .dword $ffe4 + .dword $ffe5 + .dword $ffe6 + .dword $ffe7 + .dword $ffe8 + .dword $ffe9 + .dword $ffea + .dword $ffeb + .dword $ffec + .dword $ffed + .dword $ffee + .dword $ffef + .dword $fff0 + .dword $fff1 + .dword $fff2 + .dword $fff3 + .dword $fff4 + .dword $fff5 + .dword $fff6 + .dword $fff7 + .dword $fff8 + .dword $fff9 + .dword $fffa + .dword $fffb + .dword $fffc + .dword $fffd + .dword $fffe + .dword $ffff + .dword $10000 + .dword $10001 + .dword $10002 + .dword $10003 + .dword $10004 + .dword $10005 + .dword $10006 + .dword $10007 + .dword $10008 + .dword $10009 + .dword $1000a + .dword $1000b + .dword $1000c + .dword $1000d + .dword $1000e + .dword $1000f + .dword $7ffffff0 + .dword $7ffffff1 + .dword $7ffffff2 + .dword $7ffffff3 + .dword $7ffffff4 + .dword $7ffffff5 + .dword $7ffffff6 + .dword $7ffffff7 + .dword $7ffffff8 + .dword $7ffffff9 + .dword $7ffffffa + .dword $7ffffffb + .dword $7ffffffc + .dword $7ffffffd + .dword $7ffffffe + .dword $7fffffff + .dword $80000000 + .dword $80000001 + .dword $80000002 + .dword $80000003 + .dword $80000004 + .dword $80000005 + .dword $80000006 + .dword $80000007 + .dword $80000008 + .dword $80000009 + .dword $8000000a + .dword $8000000b + .dword $8000000c + .dword $8000000d + .dword $8000000e + .dword $8000000f + .dword $9ffffff0 + .dword $9ffffff1 + .dword $9ffffff2 + .dword $9ffffff3 + .dword $9ffffff4 + .dword $9ffffff5 + .dword $9ffffff6 + .dword $9ffffff7 + .dword $9ffffff8 + .dword $9ffffff9 + .dword $9ffffffa + .dword $9ffffffb + .dword $9ffffffc + .dword $9ffffffd + .dword $9ffffffe + .dword $9fffffff + .dword $a0000000 + .dword $a0000001 + .dword $a0000002 + .dword $a0000003 + .dword $a0000004 + .dword $a0000005 + .dword $a0000006 + .dword $a0000007 + .dword $a0000008 + .dword $a0000009 + .dword $a000000a + .dword $a000000b + .dword $a000000c + .dword $a000000d + .dword $a000000e + .dword $a000000f + .dword $fffffff0 + .dword $fffffff1 + .dword $fffffff2 + .dword $fffffff3 + .dword $fffffff4 + .dword $fffffff5 + .dword $fffffff6 + .dword $fffffff7 + .dword $fffffff8 + .dword $fffffff9 + .dword $fffffffa + .dword $fffffffb + .dword $fffffffc + .dword $fffffffd + .dword $fffffffe + .dword $ffffffff + + ; hex values, uppercase + .dword $0 + .dword $1 + .dword $2 + .dword $3 + .dword $4 + .dword $5 + .dword $6 + .dword $7 + .dword $8 + .dword $9 + .dword $A + .dword $B + .dword $C + .dword $D + .dword $E + .dword $F + .dword $10 + .dword $11 + .dword $12 + .dword $13 + .dword $70 + .dword $71 + .dword $72 + .dword $73 + .dword $74 + .dword $75 + .dword $76 + .dword $77 + .dword $78 + .dword $79 + .dword $7A + .dword $7B + .dword $7C + .dword $7D + .dword $7E + .dword $7F + .dword $80 + .dword $81 + .dword $82 + .dword $83 + .dword $84 + .dword $85 + .dword $86 + .dword $F0 + .dword $F1 + .dword $F2 + .dword $F3 + .dword $F4 + .dword $F5 + .dword $F6 + .dword $F7 + .dword $F8 + .dword $F9 + .dword $FA + .dword $FB + .dword $FC + .dword $FD + .dword $FE + .dword $FF + .dword $100 + .dword $101 + .dword $102 + .dword $103 + .dword $FD2 + .dword $FD3 + .dword $FD4 + .dword $FD5 + .dword $FD6 + .dword $FD7 + .dword $FD8 + .dword $FD9 + .dword $FDA + .dword $FDB + .dword $FDC + .dword $FDD + .dword $FDE + .dword $FDF + .dword $FE0 + .dword $FE1 + .dword $FE2 + .dword $FE3 + .dword $FE4 + .dword $FE5 + .dword $FE6 + .dword $FE7 + .dword $FE8 + .dword $FE9 + .dword $FEA + .dword $FEB + .dword $FEC + .dword $FED + .dword $FEE + .dword $FEF + .dword $FF0 + .dword $FF1 + .dword $FF2 + .dword $FF3 + .dword $FF4 + .dword $FF5 + .dword $FF6 + .dword $FF7 + .dword $FF8 + .dword $FF9 + .dword $FFA + .dword $FFB + .dword $FFC + .dword $FFD + .dword $FFE + .dword $FFF + .dword $1000 + .dword $1001 + .dword $1002 + .dword $1003 + .dword $1004 + .dword $1005 + .dword $1006 + .dword $1007 + .dword $1008 + .dword $7FF0 + .dword $7FF1 + .dword $7FF2 + .dword $7FF3 + .dword $7FF4 + .dword $7FF5 + .dword $7FF6 + .dword $7FF7 + .dword $7FF8 + .dword $7FF9 + .dword $7FFA + .dword $7FFB + .dword $7FFC + .dword $7FFD + .dword $7FFE + .dword $7FFF + .dword $8000 + .dword $8001 + .dword $8002 + .dword $8003 + .dword $8004 + .dword $8005 + .dword $8006 + .dword $8007 + .dword $8008 + .dword $8009 + .dword $800A + .dword $800B + .dword $9FE1 + .dword $9FE2 + .dword $9FE3 + .dword $9FE4 + .dword $9FE5 + .dword $9FE6 + .dword $9FE7 + .dword $9FE8 + .dword $9FE9 + .dword $9FEA + .dword $9FEB + .dword $9FEC + .dword $9FED + .dword $9FEE + .dword $9FEF + .dword $9FF0 + .dword $9FF1 + .dword $9FF2 + .dword $9FF3 + .dword $9FF4 + .dword $9FF5 + .dword $9FF6 + .dword $9FF7 + .dword $9FF8 + .dword $9FF9 + .dword $9FFA + .dword $9FFB + .dword $9FFC + .dword $9FFD + .dword $9FFE + .dword $9FFF + .dword $A000 + .dword $A001 + .dword $A002 + .dword $A003 + .dword $A004 + .dword $A005 + .dword $A006 + .dword $A007 + .dword $A008 + .dword $A009 + .dword $A00A + .dword $A00B + .dword $A00C + .dword $A00D + .dword $A00E + .dword $A00F + .dword $AFE1 + .dword $AFE2 + .dword $AFE3 + .dword $AFE4 + .dword $AFE5 + .dword $AFE6 + .dword $AFE7 + .dword $AFE8 + .dword $AFE9 + .dword $AFEA + .dword $AFEB + .dword $AFEC + .dword $AFED + .dword $AFEE + .dword $AFEF + .dword $AFF0 + .dword $AFF1 + .dword $AFF2 + .dword $AFF3 + .dword $AFF4 + .dword $AFF5 + .dword $AFF6 + .dword $AFF7 + .dword $AFF8 + .dword $AFF9 + .dword $AFFA + .dword $AFFB + .dword $AFFC + .dword $AFFD + .dword $AFFE + .dword $AFFF + .dword $B000 + .dword $B001 + .dword $B002 + .dword $B003 + .dword $B004 + .dword $B005 + .dword $B006 + .dword $B007 + .dword $B008 + .dword $B009 + .dword $B00A + .dword $B00B + .dword $B00C + .dword $B00D + .dword $B00E + .dword $B00F + .dword $FFE1 + .dword $FFE2 + .dword $FFE3 + .dword $FFE4 + .dword $FFE5 + .dword $FFE6 + .dword $FFE7 + .dword $FFE8 + .dword $FFE9 + .dword $FFEA + .dword $FFEB + .dword $FFEC + .dword $FFED + .dword $FFEE + .dword $FFEF + .dword $FFF0 + .dword $FFF1 + .dword $FFF2 + .dword $FFF3 + .dword $FFF4 + .dword $FFF5 + .dword $FFF6 + .dword $FFF7 + .dword $FFF8 + .dword $FFF9 + .dword $FFFA + .dword $FFFB + .dword $FFFC + .dword $FFFD + .dword $FFFE + .dword $FFFF + .dword $10000 + .dword $10001 + .dword $10002 + .dword $10003 + .dword $10004 + .dword $10005 + .dword $10006 + .dword $10007 + .dword $10008 + .dword $10009 + .dword $1000A + .dword $1000B + .dword $1000C + .dword $1000D + .dword $1000E + .dword $1000F + .dword $7FFFFFF0 + .dword $7FFFFFF1 + .dword $7FFFFFF2 + .dword $7FFFFFF3 + .dword $7FFFFFF4 + .dword $7FFFFFF5 + .dword $7FFFFFF6 + .dword $7FFFFFF7 + .dword $7FFFFFF8 + .dword $7FFFFFF9 + .dword $7FFFFFFA + .dword $7FFFFFFB + .dword $7FFFFFFC + .dword $7FFFFFFD + .dword $7FFFFFFE + .dword $7FFFFFFF + .dword $80000000 + .dword $80000001 + .dword $80000002 + .dword $80000003 + .dword $80000004 + .dword $80000005 + .dword $80000006 + .dword $80000007 + .dword $80000008 + .dword $80000009 + .dword $8000000A + .dword $8000000B + .dword $8000000C + .dword $8000000D + .dword $8000000E + .dword $8000000F + .dword $9FFFFFF0 + .dword $9FFFFFF1 + .dword $9FFFFFF2 + .dword $9FFFFFF3 + .dword $9FFFFFF4 + .dword $9FFFFFF5 + .dword $9FFFFFF6 + .dword $9FFFFFF7 + .dword $9FFFFFF8 + .dword $9FFFFFF9 + .dword $9FFFFFFA + .dword $9FFFFFFB + .dword $9FFFFFFC + .dword $9FFFFFFD + .dword $9FFFFFFE + .dword $9FFFFFFF + .dword $A0000000 + .dword $A0000001 + .dword $A0000002 + .dword $A0000003 + .dword $A0000004 + .dword $A0000005 + .dword $A0000006 + .dword $A0000007 + .dword $A0000008 + .dword $A0000009 + .dword $A000000A + .dword $A000000B + .dword $A000000C + .dword $A000000D + .dword $A000000E + .dword $A000000F + .dword $FFFFFFF0 + .dword $FFFFFFF1 + .dword $FFFFFFF2 + .dword $FFFFFFF3 + .dword $FFFFFFF4 + .dword $FFFFFFF5 + .dword $FFFFFFF6 + .dword $FFFFFFF7 + .dword $FFFFFFF8 + .dword $FFFFFFF9 + .dword $FFFFFFFA + .dword $FFFFFFFB + .dword $FFFFFFFC + .dword $FFFFFFFD + .dword $FFFFFFFE + .dword $FFFFFFFF + + ; 8-digit hex values + .dword $00000000 + .dword $00000001 + .dword $00000002 + .dword $00000003 + .dword $00000004 + .dword $00000005 + .dword $00000006 + .dword $00000007 + .dword $00000008 + .dword $00000009 + .dword $0000000a + .dword $0000000b + .dword $0000000c + .dword $0000000d + .dword $0000000e + .dword $0000000f + .dword $00000010 + .dword $00000011 + .dword $00000012 + .dword $00000013 + .dword $00000070 + .dword $00000071 + .dword $00000072 + .dword $00000073 + .dword $00000074 + .dword $00000075 + .dword $00000076 + .dword $00000077 + .dword $00000078 + .dword $00000079 + .dword $0000007a + .dword $0000007b + .dword $0000007c + .dword $0000007d + .dword $0000007e + .dword $0000007f + .dword $00000080 + .dword $00000081 + .dword $00000082 + .dword $00000083 + .dword $00000084 + .dword $00000085 + .dword $00000086 + .dword $000000f0 + .dword $000000f1 + .dword $000000f2 + .dword $000000f3 + .dword $000000f4 + .dword $000000f5 + .dword $000000f6 + .dword $000000f7 + .dword $000000f8 + .dword $000000f9 + .dword $000000fa + .dword $000000fb + .dword $000000fc + .dword $000000fd + .dword $000000fe + .dword $000000ff + .dword $00000100 + .dword $00000101 + .dword $00000102 + .dword $00000103 + .dword $00000fd2 + .dword $00000fd3 + .dword $00000fd4 + .dword $00000fd5 + .dword $00000fd6 + .dword $00000fd7 + .dword $00000fd8 + .dword $00000fd9 + .dword $00000fda + .dword $00000fdb + .dword $00000fdc + .dword $00000fdd + .dword $00000fde + .dword $00000fdf + .dword $00000fe0 + .dword $00000fe1 + .dword $00000fe2 + .dword $00000fe3 + .dword $00000fe4 + .dword $00000fe5 + .dword $00000fe6 + .dword $00000fe7 + .dword $00000fe8 + .dword $00000fe9 + .dword $00000fea + .dword $00000feb + .dword $00000fec + .dword $00000fed + .dword $00000fee + .dword $00000fef + .dword $00000ff0 + .dword $00000ff1 + .dword $00000ff2 + .dword $00000ff3 + .dword $00000ff4 + .dword $00000ff5 + .dword $00000ff6 + .dword $00000ff7 + .dword $00000ff8 + .dword $00000ff9 + .dword $00000ffa + .dword $00000ffb + .dword $00000ffc + .dword $00000ffd + .dword $00000ffe + .dword $00000fff + .dword $00001000 + .dword $00001001 + .dword $00001002 + .dword $00001003 + .dword $00001004 + .dword $00001005 + .dword $00001006 + .dword $00001007 + .dword $00001008 + .dword $00007ff0 + .dword $00007ff1 + .dword $00007ff2 + .dword $00007ff3 + .dword $00007ff4 + .dword $00007ff5 + .dword $00007ff6 + .dword $00007ff7 + .dword $00007ff8 + .dword $00007ff9 + .dword $00007ffa + .dword $00007ffb + .dword $00007ffc + .dword $00007ffd + .dword $00007ffe + .dword $00007fff + .dword $00008000 + .dword $00008001 + .dword $00008002 + .dword $00008003 + .dword $00008004 + .dword $00008005 + .dword $00008006 + .dword $00008007 + .dword $00008008 + .dword $00008009 + .dword $0000800a + .dword $0000800b + .dword $00009fe1 + .dword $00009fe2 + .dword $00009fe3 + .dword $00009fe4 + .dword $00009fe5 + .dword $00009fe6 + .dword $00009fe7 + .dword $00009fe8 + .dword $00009fe9 + .dword $00009fea + .dword $00009feb + .dword $00009fec + .dword $00009fed + .dword $00009fee + .dword $00009fef + .dword $00009ff0 + .dword $00009ff1 + .dword $00009ff2 + .dword $00009ff3 + .dword $00009ff4 + .dword $00009ff5 + .dword $00009ff6 + .dword $00009ff7 + .dword $00009ff8 + .dword $00009ff9 + .dword $00009ffa + .dword $00009ffb + .dword $00009ffc + .dword $00009ffd + .dword $00009ffe + .dword $00009fff + .dword $0000a000 + .dword $0000a001 + .dword $0000a002 + .dword $0000a003 + .dword $0000a004 + .dword $0000a005 + .dword $0000a006 + .dword $0000a007 + .dword $0000a008 + .dword $0000a009 + .dword $0000a00a + .dword $0000a00b + .dword $0000a00c + .dword $0000a00d + .dword $0000a00e + .dword $0000a00f + .dword $0000afe1 + .dword $0000afe2 + .dword $0000afe3 + .dword $0000afe4 + .dword $0000afe5 + .dword $0000afe6 + .dword $0000afe7 + .dword $0000afe8 + .dword $0000afe9 + .dword $0000afea + .dword $0000afeb + .dword $0000afec + .dword $0000afed + .dword $0000afee + .dword $0000afef + .dword $0000aff0 + .dword $0000aff1 + .dword $0000aff2 + .dword $0000aff3 + .dword $0000aff4 + .dword $0000aff5 + .dword $0000aff6 + .dword $0000aff7 + .dword $0000aff8 + .dword $0000aff9 + .dword $0000affa + .dword $0000affb + .dword $0000affc + .dword $0000affd + .dword $0000affe + .dword $0000afff + .dword $0000b000 + .dword $0000b001 + .dword $0000b002 + .dword $0000b003 + .dword $0000b004 + .dword $0000b005 + .dword $0000b006 + .dword $0000b007 + .dword $0000b008 + .dword $0000b009 + .dword $0000b00a + .dword $0000b00b + .dword $0000b00c + .dword $0000b00d + .dword $0000b00e + .dword $0000b00f + .dword $0000ffe1 + .dword $0000ffe2 + .dword $0000ffe3 + .dword $0000ffe4 + .dword $0000ffe5 + .dword $0000ffe6 + .dword $0000ffe7 + .dword $0000ffe8 + .dword $0000ffe9 + .dword $0000ffea + .dword $0000ffeb + .dword $0000ffec + .dword $0000ffed + .dword $0000ffee + .dword $0000ffef + .dword $0000fff0 + .dword $0000fff1 + .dword $0000fff2 + .dword $0000fff3 + .dword $0000fff4 + .dword $0000fff5 + .dword $0000fff6 + .dword $0000fff7 + .dword $0000fff8 + .dword $0000fff9 + .dword $0000fffa + .dword $0000fffb + .dword $0000fffc + .dword $0000fffd + .dword $0000fffe + .dword $0000ffff + .dword $00010000 + .dword $00010001 + .dword $00010002 + .dword $00010003 + .dword $00010004 + .dword $00010005 + .dword $00010006 + .dword $00010007 + .dword $00010008 + .dword $00010009 + .dword $0001000a + .dword $0001000b + .dword $0001000c + .dword $0001000d + .dword $0001000e + .dword $0001000f + .dword $7ffffff0 + .dword $7ffffff1 + .dword $7ffffff2 + .dword $7ffffff3 + .dword $7ffffff4 + .dword $7ffffff5 + .dword $7ffffff6 + .dword $7ffffff7 + .dword $7ffffff8 + .dword $7ffffff9 + .dword $7ffffffa + .dword $7ffffffb + .dword $7ffffffc + .dword $7ffffffd + .dword $7ffffffe + .dword $7fffffff + .dword $80000000 + .dword $80000001 + .dword $80000002 + .dword $80000003 + .dword $80000004 + .dword $80000005 + .dword $80000006 + .dword $80000007 + .dword $80000008 + .dword $80000009 + .dword $8000000a + .dword $8000000b + .dword $8000000c + .dword $8000000d + .dword $8000000e + .dword $8000000f + .dword $9ffffff0 + .dword $9ffffff1 + .dword $9ffffff2 + .dword $9ffffff3 + .dword $9ffffff4 + .dword $9ffffff5 + .dword $9ffffff6 + .dword $9ffffff7 + .dword $9ffffff8 + .dword $9ffffff9 + .dword $9ffffffa + .dword $9ffffffb + .dword $9ffffffc + .dword $9ffffffd + .dword $9ffffffe + .dword $9fffffff + .dword $a0000000 + .dword $a0000001 + .dword $a0000002 + .dword $a0000003 + .dword $a0000004 + .dword $a0000005 + .dword $a0000006 + .dword $a0000007 + .dword $a0000008 + .dword $a0000009 + .dword $a000000a + .dword $a000000b + .dword $a000000c + .dword $a000000d + .dword $a000000e + .dword $a000000f + .dword $fffffff0 + .dword $fffffff1 + .dword $fffffff2 + .dword $fffffff3 + .dword $fffffff4 + .dword $fffffff5 + .dword $fffffff6 + .dword $fffffff7 + .dword $fffffff8 + .dword $fffffff9 + .dword $fffffffa + .dword $fffffffb + .dword $fffffffc + .dword $fffffffd + .dword $fffffffe + .dword $ffffffff + + ; 8-digit hex values, uppercase + .dword $00000000 + .dword $00000001 + .dword $00000002 + .dword $00000003 + .dword $00000004 + .dword $00000005 + .dword $00000006 + .dword $00000007 + .dword $00000008 + .dword $00000009 + .dword $0000000A + .dword $0000000B + .dword $0000000C + .dword $0000000D + .dword $0000000E + .dword $0000000F + .dword $00000010 + .dword $00000011 + .dword $00000012 + .dword $00000013 + .dword $00000070 + .dword $00000071 + .dword $00000072 + .dword $00000073 + .dword $00000074 + .dword $00000075 + .dword $00000076 + .dword $00000077 + .dword $00000078 + .dword $00000079 + .dword $0000007A + .dword $0000007B + .dword $0000007C + .dword $0000007D + .dword $0000007E + .dword $0000007F + .dword $00000080 + .dword $00000081 + .dword $00000082 + .dword $00000083 + .dword $00000084 + .dword $00000085 + .dword $00000086 + .dword $000000F0 + .dword $000000F1 + .dword $000000F2 + .dword $000000F3 + .dword $000000F4 + .dword $000000F5 + .dword $000000F6 + .dword $000000F7 + .dword $000000F8 + .dword $000000F9 + .dword $000000FA + .dword $000000FB + .dword $000000FC + .dword $000000FD + .dword $000000FE + .dword $000000FF + .dword $00000100 + .dword $00000101 + .dword $00000102 + .dword $00000103 + .dword $00000FD2 + .dword $00000FD3 + .dword $00000FD4 + .dword $00000FD5 + .dword $00000FD6 + .dword $00000FD7 + .dword $00000FD8 + .dword $00000FD9 + .dword $00000FDA + .dword $00000FDB + .dword $00000FDC + .dword $00000FDD + .dword $00000FDE + .dword $00000FDF + .dword $00000FE0 + .dword $00000FE1 + .dword $00000FE2 + .dword $00000FE3 + .dword $00000FE4 + .dword $00000FE5 + .dword $00000FE6 + .dword $00000FE7 + .dword $00000FE8 + .dword $00000FE9 + .dword $00000FEA + .dword $00000FEB + .dword $00000FEC + .dword $00000FED + .dword $00000FEE + .dword $00000FEF + .dword $00000FF0 + .dword $00000FF1 + .dword $00000FF2 + .dword $00000FF3 + .dword $00000FF4 + .dword $00000FF5 + .dword $00000FF6 + .dword $00000FF7 + .dword $00000FF8 + .dword $00000FF9 + .dword $00000FFA + .dword $00000FFB + .dword $00000FFC + .dword $00000FFD + .dword $00000FFE + .dword $00000FFF + .dword $00001000 + .dword $00001001 + .dword $00001002 + .dword $00001003 + .dword $00001004 + .dword $00001005 + .dword $00001006 + .dword $00001007 + .dword $00001008 + .dword $00007FF0 + .dword $00007FF1 + .dword $00007FF2 + .dword $00007FF3 + .dword $00007FF4 + .dword $00007FF5 + .dword $00007FF6 + .dword $00007FF7 + .dword $00007FF8 + .dword $00007FF9 + .dword $00007FFA + .dword $00007FFB + .dword $00007FFC + .dword $00007FFD + .dword $00007FFE + .dword $00007FFF + .dword $00008000 + .dword $00008001 + .dword $00008002 + .dword $00008003 + .dword $00008004 + .dword $00008005 + .dword $00008006 + .dword $00008007 + .dword $00008008 + .dword $00008009 + .dword $0000800A + .dword $0000800B + .dword $00009FE1 + .dword $00009FE2 + .dword $00009FE3 + .dword $00009FE4 + .dword $00009FE5 + .dword $00009FE6 + .dword $00009FE7 + .dword $00009FE8 + .dword $00009FE9 + .dword $00009FEA + .dword $00009FEB + .dword $00009FEC + .dword $00009FED + .dword $00009FEE + .dword $00009FEF + .dword $00009FF0 + .dword $00009FF1 + .dword $00009FF2 + .dword $00009FF3 + .dword $00009FF4 + .dword $00009FF5 + .dword $00009FF6 + .dword $00009FF7 + .dword $00009FF8 + .dword $00009FF9 + .dword $00009FFA + .dword $00009FFB + .dword $00009FFC + .dword $00009FFD + .dword $00009FFE + .dword $00009FFF + .dword $0000A000 + .dword $0000A001 + .dword $0000A002 + .dword $0000A003 + .dword $0000A004 + .dword $0000A005 + .dword $0000A006 + .dword $0000A007 + .dword $0000A008 + .dword $0000A009 + .dword $0000A00A + .dword $0000A00B + .dword $0000A00C + .dword $0000A00D + .dword $0000A00E + .dword $0000A00F + .dword $0000AFE1 + .dword $0000AFE2 + .dword $0000AFE3 + .dword $0000AFE4 + .dword $0000AFE5 + .dword $0000AFE6 + .dword $0000AFE7 + .dword $0000AFE8 + .dword $0000AFE9 + .dword $0000AFEA + .dword $0000AFEB + .dword $0000AFEC + .dword $0000AFED + .dword $0000AFEE + .dword $0000AFEF + .dword $0000AFF0 + .dword $0000AFF1 + .dword $0000AFF2 + .dword $0000AFF3 + .dword $0000AFF4 + .dword $0000AFF5 + .dword $0000AFF6 + .dword $0000AFF7 + .dword $0000AFF8 + .dword $0000AFF9 + .dword $0000AFFA + .dword $0000AFFB + .dword $0000AFFC + .dword $0000AFFD + .dword $0000AFFE + .dword $0000AFFF + .dword $0000B000 + .dword $0000B001 + .dword $0000B002 + .dword $0000B003 + .dword $0000B004 + .dword $0000B005 + .dword $0000B006 + .dword $0000B007 + .dword $0000B008 + .dword $0000B009 + .dword $0000B00A + .dword $0000B00B + .dword $0000B00C + .dword $0000B00D + .dword $0000B00E + .dword $0000B00F + .dword $0000FFE1 + .dword $0000FFE2 + .dword $0000FFE3 + .dword $0000FFE4 + .dword $0000FFE5 + .dword $0000FFE6 + .dword $0000FFE7 + .dword $0000FFE8 + .dword $0000FFE9 + .dword $0000FFEA + .dword $0000FFEB + .dword $0000FFEC + .dword $0000FFED + .dword $0000FFEE + .dword $0000FFEF + .dword $0000FFF0 + .dword $0000FFF1 + .dword $0000FFF2 + .dword $0000FFF3 + .dword $0000FFF4 + .dword $0000FFF5 + .dword $0000FFF6 + .dword $0000FFF7 + .dword $0000FFF8 + .dword $0000FFF9 + .dword $0000FFFA + .dword $0000FFFB + .dword $0000FFFC + .dword $0000FFFD + .dword $0000FFFE + .dword $0000FFFF + .dword $00010000 + .dword $00010001 + .dword $00010002 + .dword $00010003 + .dword $00010004 + .dword $00010005 + .dword $00010006 + .dword $00010007 + .dword $00010008 + .dword $00010009 + .dword $0001000A + .dword $0001000B + .dword $0001000C + .dword $0001000D + .dword $0001000E + .dword $0001000F + .dword $7FFFFFF0 + .dword $7FFFFFF1 + .dword $7FFFFFF2 + .dword $7FFFFFF3 + .dword $7FFFFFF4 + .dword $7FFFFFF5 + .dword $7FFFFFF6 + .dword $7FFFFFF7 + .dword $7FFFFFF8 + .dword $7FFFFFF9 + .dword $7FFFFFFA + .dword $7FFFFFFB + .dword $7FFFFFFC + .dword $7FFFFFFD + .dword $7FFFFFFE + .dword $7FFFFFFF + .dword $80000000 + .dword $80000001 + .dword $80000002 + .dword $80000003 + .dword $80000004 + .dword $80000005 + .dword $80000006 + .dword $80000007 + .dword $80000008 + .dword $80000009 + .dword $8000000A + .dword $8000000B + .dword $8000000C + .dword $8000000D + .dword $8000000E + .dword $8000000F + .dword $9FFFFFF0 + .dword $9FFFFFF1 + .dword $9FFFFFF2 + .dword $9FFFFFF3 + .dword $9FFFFFF4 + .dword $9FFFFFF5 + .dword $9FFFFFF6 + .dword $9FFFFFF7 + .dword $9FFFFFF8 + .dword $9FFFFFF9 + .dword $9FFFFFFA + .dword $9FFFFFFB + .dword $9FFFFFFC + .dword $9FFFFFFD + .dword $9FFFFFFE + .dword $9FFFFFFF + .dword $A0000000 + .dword $A0000001 + .dword $A0000002 + .dword $A0000003 + .dword $A0000004 + .dword $A0000005 + .dword $A0000006 + .dword $A0000007 + .dword $A0000008 + .dword $A0000009 + .dword $A000000A + .dword $A000000B + .dword $A000000C + .dword $A000000D + .dword $A000000E + .dword $A000000F + .dword $FFFFFFF0 + .dword $FFFFFFF1 + .dword $FFFFFFF2 + .dword $FFFFFFF3 + .dword $FFFFFFF4 + .dword $FFFFFFF5 + .dword $FFFFFFF6 + .dword $FFFFFFF7 + .dword $FFFFFFF8 + .dword $FFFFFFF9 + .dword $FFFFFFFA + .dword $FFFFFFFB + .dword $FFFFFFFC + .dword $FFFFFFFD + .dword $FFFFFFFE + .dword $FFFFFFFF + + ; alternative hex values + .dword 0h + .dword 1h + .dword 2h + .dword 3h + .dword 4h + .dword 5h + .dword 6h + .dword 7h + .dword 8h + .dword 9h + .dword 0ah + .dword 0bh + .dword 0ch + .dword 0dh + .dword 0eh + .dword 0fh + .dword 10h + .dword 11h + .dword 12h + .dword 13h + .dword 70h + .dword 71h + .dword 72h + .dword 73h + .dword 74h + .dword 75h + .dword 76h + .dword 77h + .dword 78h + .dword 79h + .dword 7ah + .dword 7bh + .dword 7ch + .dword 7dh + .dword 7eh + .dword 7fh + .dword 80h + .dword 81h + .dword 82h + .dword 83h + .dword 84h + .dword 85h + .dword 86h + .dword 0f0h + .dword 0f1h + .dword 0f2h + .dword 0f3h + .dword 0f4h + .dword 0f5h + .dword 0f6h + .dword 0f7h + .dword 0f8h + .dword 0f9h + .dword 0fah + .dword 0fbh + .dword 0fch + .dword 0fdh + .dword 0feh + .dword 0ffh + .dword 100h + .dword 101h + .dword 102h + .dword 103h + .dword 0fd2h + .dword 0fd3h + .dword 0fd4h + .dword 0fd5h + .dword 0fd6h + .dword 0fd7h + .dword 0fd8h + .dword 0fd9h + .dword 0fdah + .dword 0fdbh + .dword 0fdch + .dword 0fddh + .dword 0fdeh + .dword 0fdfh + .dword 0fe0h + .dword 0fe1h + .dword 0fe2h + .dword 0fe3h + .dword 0fe4h + .dword 0fe5h + .dword 0fe6h + .dword 0fe7h + .dword 0fe8h + .dword 0fe9h + .dword 0feah + .dword 0febh + .dword 0fech + .dword 0fedh + .dword 0feeh + .dword 0fefh + .dword 0ff0h + .dword 0ff1h + .dword 0ff2h + .dword 0ff3h + .dword 0ff4h + .dword 0ff5h + .dword 0ff6h + .dword 0ff7h + .dword 0ff8h + .dword 0ff9h + .dword 0ffah + .dword 0ffbh + .dword 0ffch + .dword 0ffdh + .dword 0ffeh + .dword 0fffh + .dword 1000h + .dword 1001h + .dword 1002h + .dword 1003h + .dword 1004h + .dword 1005h + .dword 1006h + .dword 1007h + .dword 1008h + .dword 7ff0h + .dword 7ff1h + .dword 7ff2h + .dword 7ff3h + .dword 7ff4h + .dword 7ff5h + .dword 7ff6h + .dword 7ff7h + .dword 7ff8h + .dword 7ff9h + .dword 7ffah + .dword 7ffbh + .dword 7ffch + .dword 7ffdh + .dword 7ffeh + .dword 7fffh + .dword 8000h + .dword 8001h + .dword 8002h + .dword 8003h + .dword 8004h + .dword 8005h + .dword 8006h + .dword 8007h + .dword 8008h + .dword 8009h + .dword 800ah + .dword 800bh + .dword 9fe1h + .dword 9fe2h + .dword 9fe3h + .dword 9fe4h + .dword 9fe5h + .dword 9fe6h + .dword 9fe7h + .dword 9fe8h + .dword 9fe9h + .dword 9feah + .dword 9febh + .dword 9fech + .dword 9fedh + .dword 9feeh + .dword 9fefh + .dword 9ff0h + .dword 9ff1h + .dword 9ff2h + .dword 9ff3h + .dword 9ff4h + .dword 9ff5h + .dword 9ff6h + .dword 9ff7h + .dword 9ff8h + .dword 9ff9h + .dword 9ffah + .dword 9ffbh + .dword 9ffch + .dword 9ffdh + .dword 9ffeh + .dword 9fffh + .dword 0a000h + .dword 0a001h + .dword 0a002h + .dword 0a003h + .dword 0a004h + .dword 0a005h + .dword 0a006h + .dword 0a007h + .dword 0a008h + .dword 0a009h + .dword 0a00ah + .dword 0a00bh + .dword 0a00ch + .dword 0a00dh + .dword 0a00eh + .dword 0a00fh + .dword 0afe1h + .dword 0afe2h + .dword 0afe3h + .dword 0afe4h + .dword 0afe5h + .dword 0afe6h + .dword 0afe7h + .dword 0afe8h + .dword 0afe9h + .dword 0afeah + .dword 0afebh + .dword 0afech + .dword 0afedh + .dword 0afeeh + .dword 0afefh + .dword 0aff0h + .dword 0aff1h + .dword 0aff2h + .dword 0aff3h + .dword 0aff4h + .dword 0aff5h + .dword 0aff6h + .dword 0aff7h + .dword 0aff8h + .dword 0aff9h + .dword 0affah + .dword 0affbh + .dword 0affch + .dword 0affdh + .dword 0affeh + .dword 0afffh + .dword 0b000h + .dword 0b001h + .dword 0b002h + .dword 0b003h + .dword 0b004h + .dword 0b005h + .dword 0b006h + .dword 0b007h + .dword 0b008h + .dword 0b009h + .dword 0b00ah + .dword 0b00bh + .dword 0b00ch + .dword 0b00dh + .dword 0b00eh + .dword 0b00fh + .dword 0ffe1h + .dword 0ffe2h + .dword 0ffe3h + .dword 0ffe4h + .dword 0ffe5h + .dword 0ffe6h + .dword 0ffe7h + .dword 0ffe8h + .dword 0ffe9h + .dword 0ffeah + .dword 0ffebh + .dword 0ffech + .dword 0ffedh + .dword 0ffeeh + .dword 0ffefh + .dword 0fff0h + .dword 0fff1h + .dword 0fff2h + .dword 0fff3h + .dword 0fff4h + .dword 0fff5h + .dword 0fff6h + .dword 0fff7h + .dword 0fff8h + .dword 0fff9h + .dword 0fffah + .dword 0fffbh + .dword 0fffch + .dword 0fffdh + .dword 0fffeh + .dword 0ffffh + .dword 10000h + .dword 10001h + .dword 10002h + .dword 10003h + .dword 10004h + .dword 10005h + .dword 10006h + .dword 10007h + .dword 10008h + .dword 10009h + .dword 1000ah + .dword 1000bh + .dword 1000ch + .dword 1000dh + .dword 1000eh + .dword 1000fh + .dword 7ffffff0h + .dword 7ffffff1h + .dword 7ffffff2h + .dword 7ffffff3h + .dword 7ffffff4h + .dword 7ffffff5h + .dword 7ffffff6h + .dword 7ffffff7h + .dword 7ffffff8h + .dword 7ffffff9h + .dword 7ffffffah + .dword 7ffffffbh + .dword 7ffffffch + .dword 7ffffffdh + .dword 7ffffffeh + .dword 7fffffffh + .dword 80000000h + .dword 80000001h + .dword 80000002h + .dword 80000003h + .dword 80000004h + .dword 80000005h + .dword 80000006h + .dword 80000007h + .dword 80000008h + .dword 80000009h + .dword 8000000ah + .dword 8000000bh + .dword 8000000ch + .dword 8000000dh + .dword 8000000eh + .dword 8000000fh + .dword 9ffffff0h + .dword 9ffffff1h + .dword 9ffffff2h + .dword 9ffffff3h + .dword 9ffffff4h + .dword 9ffffff5h + .dword 9ffffff6h + .dword 9ffffff7h + .dword 9ffffff8h + .dword 9ffffff9h + .dword 9ffffffah + .dword 9ffffffbh + .dword 9ffffffch + .dword 9ffffffdh + .dword 9ffffffeh + .dword 9fffffffh + .dword 0a0000000h + .dword 0a0000001h + .dword 0a0000002h + .dword 0a0000003h + .dword 0a0000004h + .dword 0a0000005h + .dword 0a0000006h + .dword 0a0000007h + .dword 0a0000008h + .dword 0a0000009h + .dword 0a000000ah + .dword 0a000000bh + .dword 0a000000ch + .dword 0a000000dh + .dword 0a000000eh + .dword 0a000000fh + .dword 0fffffff0h + .dword 0fffffff1h + .dword 0fffffff2h + .dword 0fffffff3h + .dword 0fffffff4h + .dword 0fffffff5h + .dword 0fffffff6h + .dword 0fffffff7h + .dword 0fffffff8h + .dword 0fffffff9h + .dword 0fffffffah + .dword 0fffffffbh + .dword 0fffffffch + .dword 0fffffffdh + .dword 0fffffffeh + .dword 0ffffffffh + + ; alternative hex values, uppercase + .dword 0h + .dword 1h + .dword 2h + .dword 3h + .dword 4h + .dword 5h + .dword 6h + .dword 7h + .dword 8h + .dword 9h + .dword 0Ah + .dword 0Bh + .dword 0Ch + .dword 0Dh + .dword 0Eh + .dword 0Fh + .dword 10h + .dword 11h + .dword 12h + .dword 13h + .dword 70h + .dword 71h + .dword 72h + .dword 73h + .dword 74h + .dword 75h + .dword 76h + .dword 77h + .dword 78h + .dword 79h + .dword 7Ah + .dword 7Bh + .dword 7Ch + .dword 7Dh + .dword 7Eh + .dword 7Fh + .dword 80h + .dword 81h + .dword 82h + .dword 83h + .dword 84h + .dword 85h + .dword 86h + .dword 0F0h + .dword 0F1h + .dword 0F2h + .dword 0F3h + .dword 0F4h + .dword 0F5h + .dword 0F6h + .dword 0F7h + .dword 0F8h + .dword 0F9h + .dword 0FAh + .dword 0FBh + .dword 0FCh + .dword 0FDh + .dword 0FEh + .dword 0FFh + .dword 100h + .dword 101h + .dword 102h + .dword 103h + .dword 0FD2h + .dword 0FD3h + .dword 0FD4h + .dword 0FD5h + .dword 0FD6h + .dword 0FD7h + .dword 0FD8h + .dword 0FD9h + .dword 0FDAh + .dword 0FDBh + .dword 0FDCh + .dword 0FDDh + .dword 0FDEh + .dword 0FDFh + .dword 0FE0h + .dword 0FE1h + .dword 0FE2h + .dword 0FE3h + .dword 0FE4h + .dword 0FE5h + .dword 0FE6h + .dword 0FE7h + .dword 0FE8h + .dword 0FE9h + .dword 0FEAh + .dword 0FEBh + .dword 0FECh + .dword 0FEDh + .dword 0FEEh + .dword 0FEFh + .dword 0FF0h + .dword 0FF1h + .dword 0FF2h + .dword 0FF3h + .dword 0FF4h + .dword 0FF5h + .dword 0FF6h + .dword 0FF7h + .dword 0FF8h + .dword 0FF9h + .dword 0FFAh + .dword 0FFBh + .dword 0FFCh + .dword 0FFDh + .dword 0FFEh + .dword 0FFFh + .dword 1000h + .dword 1001h + .dword 1002h + .dword 1003h + .dword 1004h + .dword 1005h + .dword 1006h + .dword 1007h + .dword 1008h + .dword 7FF0h + .dword 7FF1h + .dword 7FF2h + .dword 7FF3h + .dword 7FF4h + .dword 7FF5h + .dword 7FF6h + .dword 7FF7h + .dword 7FF8h + .dword 7FF9h + .dword 7FFAh + .dword 7FFBh + .dword 7FFCh + .dword 7FFDh + .dword 7FFEh + .dword 7FFFh + .dword 8000h + .dword 8001h + .dword 8002h + .dword 8003h + .dword 8004h + .dword 8005h + .dword 8006h + .dword 8007h + .dword 8008h + .dword 8009h + .dword 800Ah + .dword 800Bh + .dword 9FE1h + .dword 9FE2h + .dword 9FE3h + .dword 9FE4h + .dword 9FE5h + .dword 9FE6h + .dword 9FE7h + .dword 9FE8h + .dword 9FE9h + .dword 9FEAh + .dword 9FEBh + .dword 9FECh + .dword 9FEDh + .dword 9FEEh + .dword 9FEFh + .dword 9FF0h + .dword 9FF1h + .dword 9FF2h + .dword 9FF3h + .dword 9FF4h + .dword 9FF5h + .dword 9FF6h + .dword 9FF7h + .dword 9FF8h + .dword 9FF9h + .dword 9FFAh + .dword 9FFBh + .dword 9FFCh + .dword 9FFDh + .dword 9FFEh + .dword 9FFFh + .dword 0A000h + .dword 0A001h + .dword 0A002h + .dword 0A003h + .dword 0A004h + .dword 0A005h + .dword 0A006h + .dword 0A007h + .dword 0A008h + .dword 0A009h + .dword 0A00Ah + .dword 0A00Bh + .dword 0A00Ch + .dword 0A00Dh + .dword 0A00Eh + .dword 0A00Fh + .dword 0AFE1h + .dword 0AFE2h + .dword 0AFE3h + .dword 0AFE4h + .dword 0AFE5h + .dword 0AFE6h + .dword 0AFE7h + .dword 0AFE8h + .dword 0AFE9h + .dword 0AFEAh + .dword 0AFEBh + .dword 0AFECh + .dword 0AFEDh + .dword 0AFEEh + .dword 0AFEFh + .dword 0AFF0h + .dword 0AFF1h + .dword 0AFF2h + .dword 0AFF3h + .dword 0AFF4h + .dword 0AFF5h + .dword 0AFF6h + .dword 0AFF7h + .dword 0AFF8h + .dword 0AFF9h + .dword 0AFFAh + .dword 0AFFBh + .dword 0AFFCh + .dword 0AFFDh + .dword 0AFFEh + .dword 0AFFFh + .dword 0B000h + .dword 0B001h + .dword 0B002h + .dword 0B003h + .dword 0B004h + .dword 0B005h + .dword 0B006h + .dword 0B007h + .dword 0B008h + .dword 0B009h + .dword 0B00Ah + .dword 0B00Bh + .dword 0B00Ch + .dword 0B00Dh + .dword 0B00Eh + .dword 0B00Fh + .dword 0FFE1h + .dword 0FFE2h + .dword 0FFE3h + .dword 0FFE4h + .dword 0FFE5h + .dword 0FFE6h + .dword 0FFE7h + .dword 0FFE8h + .dword 0FFE9h + .dword 0FFEAh + .dword 0FFEBh + .dword 0FFECh + .dword 0FFEDh + .dword 0FFEEh + .dword 0FFEFh + .dword 0FFF0h + .dword 0FFF1h + .dword 0FFF2h + .dword 0FFF3h + .dword 0FFF4h + .dword 0FFF5h + .dword 0FFF6h + .dword 0FFF7h + .dword 0FFF8h + .dword 0FFF9h + .dword 0FFFAh + .dword 0FFFBh + .dword 0FFFCh + .dword 0FFFDh + .dword 0FFFEh + .dword 0FFFFh + .dword 10000h + .dword 10001h + .dword 10002h + .dword 10003h + .dword 10004h + .dword 10005h + .dword 10006h + .dword 10007h + .dword 10008h + .dword 10009h + .dword 1000Ah + .dword 1000Bh + .dword 1000Ch + .dword 1000Dh + .dword 1000Eh + .dword 1000Fh + .dword 7FFFFFF0h + .dword 7FFFFFF1h + .dword 7FFFFFF2h + .dword 7FFFFFF3h + .dword 7FFFFFF4h + .dword 7FFFFFF5h + .dword 7FFFFFF6h + .dword 7FFFFFF7h + .dword 7FFFFFF8h + .dword 7FFFFFF9h + .dword 7FFFFFFAh + .dword 7FFFFFFBh + .dword 7FFFFFFCh + .dword 7FFFFFFDh + .dword 7FFFFFFEh + .dword 7FFFFFFFh + .dword 80000000h + .dword 80000001h + .dword 80000002h + .dword 80000003h + .dword 80000004h + .dword 80000005h + .dword 80000006h + .dword 80000007h + .dword 80000008h + .dword 80000009h + .dword 8000000Ah + .dword 8000000Bh + .dword 8000000Ch + .dword 8000000Dh + .dword 8000000Eh + .dword 8000000Fh + .dword 9FFFFFF0h + .dword 9FFFFFF1h + .dword 9FFFFFF2h + .dword 9FFFFFF3h + .dword 9FFFFFF4h + .dword 9FFFFFF5h + .dword 9FFFFFF6h + .dword 9FFFFFF7h + .dword 9FFFFFF8h + .dword 9FFFFFF9h + .dword 9FFFFFFAh + .dword 9FFFFFFBh + .dword 9FFFFFFCh + .dword 9FFFFFFDh + .dword 9FFFFFFEh + .dword 9FFFFFFFh + .dword 0A0000000h + .dword 0A0000001h + .dword 0A0000002h + .dword 0A0000003h + .dword 0A0000004h + .dword 0A0000005h + .dword 0A0000006h + .dword 0A0000007h + .dword 0A0000008h + .dword 0A0000009h + .dword 0A000000Ah + .dword 0A000000Bh + .dword 0A000000Ch + .dword 0A000000Dh + .dword 0A000000Eh + .dword 0A000000Fh + .dword 0FFFFFFF0h + .dword 0FFFFFFF1h + .dword 0FFFFFFF2h + .dword 0FFFFFFF3h + .dword 0FFFFFFF4h + .dword 0FFFFFFF5h + .dword 0FFFFFFF6h + .dword 0FFFFFFF7h + .dword 0FFFFFFF8h + .dword 0FFFFFFF9h + .dword 0FFFFFFFAh + .dword 0FFFFFFFBh + .dword 0FFFFFFFCh + .dword 0FFFFFFFDh + .dword 0FFFFFFFEh + .dword 0FFFFFFFFh + + ; alternative 8-digit hex values + .dword 00000000h + .dword 00000001h + .dword 00000002h + .dword 00000003h + .dword 00000004h + .dword 00000005h + .dword 00000006h + .dword 00000007h + .dword 00000008h + .dword 00000009h + .dword 0000000ah + .dword 0000000bh + .dword 0000000ch + .dword 0000000dh + .dword 0000000eh + .dword 0000000fh + .dword 00000010h + .dword 00000011h + .dword 00000012h + .dword 00000013h + .dword 00000070h + .dword 00000071h + .dword 00000072h + .dword 00000073h + .dword 00000074h + .dword 00000075h + .dword 00000076h + .dword 00000077h + .dword 00000078h + .dword 00000079h + .dword 0000007ah + .dword 0000007bh + .dword 0000007ch + .dword 0000007dh + .dword 0000007eh + .dword 0000007fh + .dword 00000080h + .dword 00000081h + .dword 00000082h + .dword 00000083h + .dword 00000084h + .dword 00000085h + .dword 00000086h + .dword 000000f0h + .dword 000000f1h + .dword 000000f2h + .dword 000000f3h + .dword 000000f4h + .dword 000000f5h + .dword 000000f6h + .dword 000000f7h + .dword 000000f8h + .dword 000000f9h + .dword 000000fah + .dword 000000fbh + .dword 000000fch + .dword 000000fdh + .dword 000000feh + .dword 000000ffh + .dword 00000100h + .dword 00000101h + .dword 00000102h + .dword 00000103h + .dword 00000fd2h + .dword 00000fd3h + .dword 00000fd4h + .dword 00000fd5h + .dword 00000fd6h + .dword 00000fd7h + .dword 00000fd8h + .dword 00000fd9h + .dword 00000fdah + .dword 00000fdbh + .dword 00000fdch + .dword 00000fddh + .dword 00000fdeh + .dword 00000fdfh + .dword 00000fe0h + .dword 00000fe1h + .dword 00000fe2h + .dword 00000fe3h + .dword 00000fe4h + .dword 00000fe5h + .dword 00000fe6h + .dword 00000fe7h + .dword 00000fe8h + .dword 00000fe9h + .dword 00000feah + .dword 00000febh + .dword 00000fech + .dword 00000fedh + .dword 00000feeh + .dword 00000fefh + .dword 00000ff0h + .dword 00000ff1h + .dword 00000ff2h + .dword 00000ff3h + .dword 00000ff4h + .dword 00000ff5h + .dword 00000ff6h + .dword 00000ff7h + .dword 00000ff8h + .dword 00000ff9h + .dword 00000ffah + .dword 00000ffbh + .dword 00000ffch + .dword 00000ffdh + .dword 00000ffeh + .dword 00000fffh + .dword 00001000h + .dword 00001001h + .dword 00001002h + .dword 00001003h + .dword 00001004h + .dword 00001005h + .dword 00001006h + .dword 00001007h + .dword 00001008h + .dword 00007ff0h + .dword 00007ff1h + .dword 00007ff2h + .dword 00007ff3h + .dword 00007ff4h + .dword 00007ff5h + .dword 00007ff6h + .dword 00007ff7h + .dword 00007ff8h + .dword 00007ff9h + .dword 00007ffah + .dword 00007ffbh + .dword 00007ffch + .dword 00007ffdh + .dword 00007ffeh + .dword 00007fffh + .dword 00008000h + .dword 00008001h + .dword 00008002h + .dword 00008003h + .dword 00008004h + .dword 00008005h + .dword 00008006h + .dword 00008007h + .dword 00008008h + .dword 00008009h + .dword 0000800ah + .dword 0000800bh + .dword 00009fe1h + .dword 00009fe2h + .dword 00009fe3h + .dword 00009fe4h + .dword 00009fe5h + .dword 00009fe6h + .dword 00009fe7h + .dword 00009fe8h + .dword 00009fe9h + .dword 00009feah + .dword 00009febh + .dword 00009fech + .dword 00009fedh + .dword 00009feeh + .dword 00009fefh + .dword 00009ff0h + .dword 00009ff1h + .dword 00009ff2h + .dword 00009ff3h + .dword 00009ff4h + .dword 00009ff5h + .dword 00009ff6h + .dword 00009ff7h + .dword 00009ff8h + .dword 00009ff9h + .dword 00009ffah + .dword 00009ffbh + .dword 00009ffch + .dword 00009ffdh + .dword 00009ffeh + .dword 00009fffh + .dword 0000a000h + .dword 0000a001h + .dword 0000a002h + .dword 0000a003h + .dword 0000a004h + .dword 0000a005h + .dword 0000a006h + .dword 0000a007h + .dword 0000a008h + .dword 0000a009h + .dword 0000a00ah + .dword 0000a00bh + .dword 0000a00ch + .dword 0000a00dh + .dword 0000a00eh + .dword 0000a00fh + .dword 0000afe1h + .dword 0000afe2h + .dword 0000afe3h + .dword 0000afe4h + .dword 0000afe5h + .dword 0000afe6h + .dword 0000afe7h + .dword 0000afe8h + .dword 0000afe9h + .dword 0000afeah + .dword 0000afebh + .dword 0000afech + .dword 0000afedh + .dword 0000afeeh + .dword 0000afefh + .dword 0000aff0h + .dword 0000aff1h + .dword 0000aff2h + .dword 0000aff3h + .dword 0000aff4h + .dword 0000aff5h + .dword 0000aff6h + .dword 0000aff7h + .dword 0000aff8h + .dword 0000aff9h + .dword 0000affah + .dword 0000affbh + .dword 0000affch + .dword 0000affdh + .dword 0000affeh + .dword 0000afffh + .dword 0000b000h + .dword 0000b001h + .dword 0000b002h + .dword 0000b003h + .dword 0000b004h + .dword 0000b005h + .dword 0000b006h + .dword 0000b007h + .dword 0000b008h + .dword 0000b009h + .dword 0000b00ah + .dword 0000b00bh + .dword 0000b00ch + .dword 0000b00dh + .dword 0000b00eh + .dword 0000b00fh + .dword 0000ffe1h + .dword 0000ffe2h + .dword 0000ffe3h + .dword 0000ffe4h + .dword 0000ffe5h + .dword 0000ffe6h + .dword 0000ffe7h + .dword 0000ffe8h + .dword 0000ffe9h + .dword 0000ffeah + .dword 0000ffebh + .dword 0000ffech + .dword 0000ffedh + .dword 0000ffeeh + .dword 0000ffefh + .dword 0000fff0h + .dword 0000fff1h + .dword 0000fff2h + .dword 0000fff3h + .dword 0000fff4h + .dword 0000fff5h + .dword 0000fff6h + .dword 0000fff7h + .dword 0000fff8h + .dword 0000fff9h + .dword 0000fffah + .dword 0000fffbh + .dword 0000fffch + .dword 0000fffdh + .dword 0000fffeh + .dword 0000ffffh + .dword 00010000h + .dword 00010001h + .dword 00010002h + .dword 00010003h + .dword 00010004h + .dword 00010005h + .dword 00010006h + .dword 00010007h + .dword 00010008h + .dword 00010009h + .dword 0001000ah + .dword 0001000bh + .dword 0001000ch + .dword 0001000dh + .dword 0001000eh + .dword 0001000fh + .dword 7ffffff0h + .dword 7ffffff1h + .dword 7ffffff2h + .dword 7ffffff3h + .dword 7ffffff4h + .dword 7ffffff5h + .dword 7ffffff6h + .dword 7ffffff7h + .dword 7ffffff8h + .dword 7ffffff9h + .dword 7ffffffah + .dword 7ffffffbh + .dword 7ffffffch + .dword 7ffffffdh + .dword 7ffffffeh + .dword 7fffffffh + .dword 80000000h + .dword 80000001h + .dword 80000002h + .dword 80000003h + .dword 80000004h + .dword 80000005h + .dword 80000006h + .dword 80000007h + .dword 80000008h + .dword 80000009h + .dword 8000000ah + .dword 8000000bh + .dword 8000000ch + .dword 8000000dh + .dword 8000000eh + .dword 8000000fh + .dword 9ffffff0h + .dword 9ffffff1h + .dword 9ffffff2h + .dword 9ffffff3h + .dword 9ffffff4h + .dword 9ffffff5h + .dword 9ffffff6h + .dword 9ffffff7h + .dword 9ffffff8h + .dword 9ffffff9h + .dword 9ffffffah + .dword 9ffffffbh + .dword 9ffffffch + .dword 9ffffffdh + .dword 9ffffffeh + .dword 9fffffffh + .dword 0a0000000h + .dword 0a0000001h + .dword 0a0000002h + .dword 0a0000003h + .dword 0a0000004h + .dword 0a0000005h + .dword 0a0000006h + .dword 0a0000007h + .dword 0a0000008h + .dword 0a0000009h + .dword 0a000000ah + .dword 0a000000bh + .dword 0a000000ch + .dword 0a000000dh + .dword 0a000000eh + .dword 0a000000fh + .dword 0fffffff0h + .dword 0fffffff1h + .dword 0fffffff2h + .dword 0fffffff3h + .dword 0fffffff4h + .dword 0fffffff5h + .dword 0fffffff6h + .dword 0fffffff7h + .dword 0fffffff8h + .dword 0fffffff9h + .dword 0fffffffah + .dword 0fffffffbh + .dword 0fffffffch + .dword 0fffffffdh + .dword 0fffffffeh + .dword 0ffffffffh + + ; alternative 8-digit hex values, uppercase + .dword 00000000h + .dword 00000001h + .dword 00000002h + .dword 00000003h + .dword 00000004h + .dword 00000005h + .dword 00000006h + .dword 00000007h + .dword 00000008h + .dword 00000009h + .dword 0000000Ah + .dword 0000000Bh + .dword 0000000Ch + .dword 0000000Dh + .dword 0000000Eh + .dword 0000000Fh + .dword 00000010h + .dword 00000011h + .dword 00000012h + .dword 00000013h + .dword 00000070h + .dword 00000071h + .dword 00000072h + .dword 00000073h + .dword 00000074h + .dword 00000075h + .dword 00000076h + .dword 00000077h + .dword 00000078h + .dword 00000079h + .dword 0000007Ah + .dword 0000007Bh + .dword 0000007Ch + .dword 0000007Dh + .dword 0000007Eh + .dword 0000007Fh + .dword 00000080h + .dword 00000081h + .dword 00000082h + .dword 00000083h + .dword 00000084h + .dword 00000085h + .dword 00000086h + .dword 000000F0h + .dword 000000F1h + .dword 000000F2h + .dword 000000F3h + .dword 000000F4h + .dword 000000F5h + .dword 000000F6h + .dword 000000F7h + .dword 000000F8h + .dword 000000F9h + .dword 000000FAh + .dword 000000FBh + .dword 000000FCh + .dword 000000FDh + .dword 000000FEh + .dword 000000FFh + .dword 00000100h + .dword 00000101h + .dword 00000102h + .dword 00000103h + .dword 00000FD2h + .dword 00000FD3h + .dword 00000FD4h + .dword 00000FD5h + .dword 00000FD6h + .dword 00000FD7h + .dword 00000FD8h + .dword 00000FD9h + .dword 00000FDAh + .dword 00000FDBh + .dword 00000FDCh + .dword 00000FDDh + .dword 00000FDEh + .dword 00000FDFh + .dword 00000FE0h + .dword 00000FE1h + .dword 00000FE2h + .dword 00000FE3h + .dword 00000FE4h + .dword 00000FE5h + .dword 00000FE6h + .dword 00000FE7h + .dword 00000FE8h + .dword 00000FE9h + .dword 00000FEAh + .dword 00000FEBh + .dword 00000FECh + .dword 00000FEDh + .dword 00000FEEh + .dword 00000FEFh + .dword 00000FF0h + .dword 00000FF1h + .dword 00000FF2h + .dword 00000FF3h + .dword 00000FF4h + .dword 00000FF5h + .dword 00000FF6h + .dword 00000FF7h + .dword 00000FF8h + .dword 00000FF9h + .dword 00000FFAh + .dword 00000FFBh + .dword 00000FFCh + .dword 00000FFDh + .dword 00000FFEh + .dword 00000FFFh + .dword 00001000h + .dword 00001001h + .dword 00001002h + .dword 00001003h + .dword 00001004h + .dword 00001005h + .dword 00001006h + .dword 00001007h + .dword 00001008h + .dword 00007FF0h + .dword 00007FF1h + .dword 00007FF2h + .dword 00007FF3h + .dword 00007FF4h + .dword 00007FF5h + .dword 00007FF6h + .dword 00007FF7h + .dword 00007FF8h + .dword 00007FF9h + .dword 00007FFAh + .dword 00007FFBh + .dword 00007FFCh + .dword 00007FFDh + .dword 00007FFEh + .dword 00007FFFh + .dword 00008000h + .dword 00008001h + .dword 00008002h + .dword 00008003h + .dword 00008004h + .dword 00008005h + .dword 00008006h + .dword 00008007h + .dword 00008008h + .dword 00008009h + .dword 0000800Ah + .dword 0000800Bh + .dword 00009FE1h + .dword 00009FE2h + .dword 00009FE3h + .dword 00009FE4h + .dword 00009FE5h + .dword 00009FE6h + .dword 00009FE7h + .dword 00009FE8h + .dword 00009FE9h + .dword 00009FEAh + .dword 00009FEBh + .dword 00009FECh + .dword 00009FEDh + .dword 00009FEEh + .dword 00009FEFh + .dword 00009FF0h + .dword 00009FF1h + .dword 00009FF2h + .dword 00009FF3h + .dword 00009FF4h + .dword 00009FF5h + .dword 00009FF6h + .dword 00009FF7h + .dword 00009FF8h + .dword 00009FF9h + .dword 00009FFAh + .dword 00009FFBh + .dword 00009FFCh + .dword 00009FFDh + .dword 00009FFEh + .dword 00009FFFh + .dword 0000A000h + .dword 0000A001h + .dword 0000A002h + .dword 0000A003h + .dword 0000A004h + .dword 0000A005h + .dword 0000A006h + .dword 0000A007h + .dword 0000A008h + .dword 0000A009h + .dword 0000A00Ah + .dword 0000A00Bh + .dword 0000A00Ch + .dword 0000A00Dh + .dword 0000A00Eh + .dword 0000A00Fh + .dword 0000AFE1h + .dword 0000AFE2h + .dword 0000AFE3h + .dword 0000AFE4h + .dword 0000AFE5h + .dword 0000AFE6h + .dword 0000AFE7h + .dword 0000AFE8h + .dword 0000AFE9h + .dword 0000AFEAh + .dword 0000AFEBh + .dword 0000AFECh + .dword 0000AFEDh + .dword 0000AFEEh + .dword 0000AFEFh + .dword 0000AFF0h + .dword 0000AFF1h + .dword 0000AFF2h + .dword 0000AFF3h + .dword 0000AFF4h + .dword 0000AFF5h + .dword 0000AFF6h + .dword 0000AFF7h + .dword 0000AFF8h + .dword 0000AFF9h + .dword 0000AFFAh + .dword 0000AFFBh + .dword 0000AFFCh + .dword 0000AFFDh + .dword 0000AFFEh + .dword 0000AFFFh + .dword 0000B000h + .dword 0000B001h + .dword 0000B002h + .dword 0000B003h + .dword 0000B004h + .dword 0000B005h + .dword 0000B006h + .dword 0000B007h + .dword 0000B008h + .dword 0000B009h + .dword 0000B00Ah + .dword 0000B00Bh + .dword 0000B00Ch + .dword 0000B00Dh + .dword 0000B00Eh + .dword 0000B00Fh + .dword 0000FFE1h + .dword 0000FFE2h + .dword 0000FFE3h + .dword 0000FFE4h + .dword 0000FFE5h + .dword 0000FFE6h + .dword 0000FFE7h + .dword 0000FFE8h + .dword 0000FFE9h + .dword 0000FFEAh + .dword 0000FFEBh + .dword 0000FFECh + .dword 0000FFEDh + .dword 0000FFEEh + .dword 0000FFEFh + .dword 0000FFF0h + .dword 0000FFF1h + .dword 0000FFF2h + .dword 0000FFF3h + .dword 0000FFF4h + .dword 0000FFF5h + .dword 0000FFF6h + .dword 0000FFF7h + .dword 0000FFF8h + .dword 0000FFF9h + .dword 0000FFFAh + .dword 0000FFFBh + .dword 0000FFFCh + .dword 0000FFFDh + .dword 0000FFFEh + .dword 0000FFFFh + .dword 00010000h + .dword 00010001h + .dword 00010002h + .dword 00010003h + .dword 00010004h + .dword 00010005h + .dword 00010006h + .dword 00010007h + .dword 00010008h + .dword 00010009h + .dword 0001000Ah + .dword 0001000Bh + .dword 0001000Ch + .dword 0001000Dh + .dword 0001000Eh + .dword 0001000Fh + .dword 7FFFFFF0h + .dword 7FFFFFF1h + .dword 7FFFFFF2h + .dword 7FFFFFF3h + .dword 7FFFFFF4h + .dword 7FFFFFF5h + .dword 7FFFFFF6h + .dword 7FFFFFF7h + .dword 7FFFFFF8h + .dword 7FFFFFF9h + .dword 7FFFFFFAh + .dword 7FFFFFFBh + .dword 7FFFFFFCh + .dword 7FFFFFFDh + .dword 7FFFFFFEh + .dword 7FFFFFFFh + .dword 80000000h + .dword 80000001h + .dword 80000002h + .dword 80000003h + .dword 80000004h + .dword 80000005h + .dword 80000006h + .dword 80000007h + .dword 80000008h + .dword 80000009h + .dword 8000000Ah + .dword 8000000Bh + .dword 8000000Ch + .dword 8000000Dh + .dword 8000000Eh + .dword 8000000Fh + .dword 9FFFFFF0h + .dword 9FFFFFF1h + .dword 9FFFFFF2h + .dword 9FFFFFF3h + .dword 9FFFFFF4h + .dword 9FFFFFF5h + .dword 9FFFFFF6h + .dword 9FFFFFF7h + .dword 9FFFFFF8h + .dword 9FFFFFF9h + .dword 9FFFFFFAh + .dword 9FFFFFFBh + .dword 9FFFFFFCh + .dword 9FFFFFFDh + .dword 9FFFFFFEh + .dword 9FFFFFFFh + .dword 0A0000000h + .dword 0A0000001h + .dword 0A0000002h + .dword 0A0000003h + .dword 0A0000004h + .dword 0A0000005h + .dword 0A0000006h + .dword 0A0000007h + .dword 0A0000008h + .dword 0A0000009h + .dword 0A000000Ah + .dword 0A000000Bh + .dword 0A000000Ch + .dword 0A000000Dh + .dword 0A000000Eh + .dword 0A000000Fh + .dword 0FFFFFFF0h + .dword 0FFFFFFF1h + .dword 0FFFFFFF2h + .dword 0FFFFFFF3h + .dword 0FFFFFFF4h + .dword 0FFFFFFF5h + .dword 0FFFFFFF6h + .dword 0FFFFFFF7h + .dword 0FFFFFFF8h + .dword 0FFFFFFF9h + .dword 0FFFFFFFAh + .dword 0FFFFFFFBh + .dword 0FFFFFFFCh + .dword 0FFFFFFFDh + .dword 0FFFFFFFEh + .dword 0FFFFFFFFh + + ; alternative hex values, always leading zero + .dword 00h + .dword 01h + .dword 02h + .dword 03h + .dword 04h + .dword 05h + .dword 06h + .dword 07h + .dword 08h + .dword 09h + .dword 0ah + .dword 0bh + .dword 0ch + .dword 0dh + .dword 0eh + .dword 0fh + .dword 010h + .dword 011h + .dword 012h + .dword 013h + .dword 070h + .dword 071h + .dword 072h + .dword 073h + .dword 074h + .dword 075h + .dword 076h + .dword 077h + .dword 078h + .dword 079h + .dword 07ah + .dword 07bh + .dword 07ch + .dword 07dh + .dword 07eh + .dword 07fh + .dword 080h + .dword 081h + .dword 082h + .dword 083h + .dword 084h + .dword 085h + .dword 086h + .dword 0f0h + .dword 0f1h + .dword 0f2h + .dword 0f3h + .dword 0f4h + .dword 0f5h + .dword 0f6h + .dword 0f7h + .dword 0f8h + .dword 0f9h + .dword 0fah + .dword 0fbh + .dword 0fch + .dword 0fdh + .dword 0feh + .dword 0ffh + .dword 0100h + .dword 0101h + .dword 0102h + .dword 0103h + .dword 0fd2h + .dword 0fd3h + .dword 0fd4h + .dword 0fd5h + .dword 0fd6h + .dword 0fd7h + .dword 0fd8h + .dword 0fd9h + .dword 0fdah + .dword 0fdbh + .dword 0fdch + .dword 0fddh + .dword 0fdeh + .dword 0fdfh + .dword 0fe0h + .dword 0fe1h + .dword 0fe2h + .dword 0fe3h + .dword 0fe4h + .dword 0fe5h + .dword 0fe6h + .dword 0fe7h + .dword 0fe8h + .dword 0fe9h + .dword 0feah + .dword 0febh + .dword 0fech + .dword 0fedh + .dword 0feeh + .dword 0fefh + .dword 0ff0h + .dword 0ff1h + .dword 0ff2h + .dword 0ff3h + .dword 0ff4h + .dword 0ff5h + .dword 0ff6h + .dword 0ff7h + .dword 0ff8h + .dword 0ff9h + .dword 0ffah + .dword 0ffbh + .dword 0ffch + .dword 0ffdh + .dword 0ffeh + .dword 0fffh + .dword 01000h + .dword 01001h + .dword 01002h + .dword 01003h + .dword 01004h + .dword 01005h + .dword 01006h + .dword 01007h + .dword 01008h + .dword 07ff0h + .dword 07ff1h + .dword 07ff2h + .dword 07ff3h + .dword 07ff4h + .dword 07ff5h + .dword 07ff6h + .dword 07ff7h + .dword 07ff8h + .dword 07ff9h + .dword 07ffah + .dword 07ffbh + .dword 07ffch + .dword 07ffdh + .dword 07ffeh + .dword 07fffh + .dword 08000h + .dword 08001h + .dword 08002h + .dword 08003h + .dword 08004h + .dword 08005h + .dword 08006h + .dword 08007h + .dword 08008h + .dword 08009h + .dword 0800ah + .dword 0800bh + .dword 09fe1h + .dword 09fe2h + .dword 09fe3h + .dword 09fe4h + .dword 09fe5h + .dword 09fe6h + .dword 09fe7h + .dword 09fe8h + .dword 09fe9h + .dword 09feah + .dword 09febh + .dword 09fech + .dword 09fedh + .dword 09feeh + .dword 09fefh + .dword 09ff0h + .dword 09ff1h + .dword 09ff2h + .dword 09ff3h + .dword 09ff4h + .dword 09ff5h + .dword 09ff6h + .dword 09ff7h + .dword 09ff8h + .dword 09ff9h + .dword 09ffah + .dword 09ffbh + .dword 09ffch + .dword 09ffdh + .dword 09ffeh + .dword 09fffh + .dword 0a000h + .dword 0a001h + .dword 0a002h + .dword 0a003h + .dword 0a004h + .dword 0a005h + .dword 0a006h + .dword 0a007h + .dword 0a008h + .dword 0a009h + .dword 0a00ah + .dword 0a00bh + .dword 0a00ch + .dword 0a00dh + .dword 0a00eh + .dword 0a00fh + .dword 0afe1h + .dword 0afe2h + .dword 0afe3h + .dword 0afe4h + .dword 0afe5h + .dword 0afe6h + .dword 0afe7h + .dword 0afe8h + .dword 0afe9h + .dword 0afeah + .dword 0afebh + .dword 0afech + .dword 0afedh + .dword 0afeeh + .dword 0afefh + .dword 0aff0h + .dword 0aff1h + .dword 0aff2h + .dword 0aff3h + .dword 0aff4h + .dword 0aff5h + .dword 0aff6h + .dword 0aff7h + .dword 0aff8h + .dword 0aff9h + .dword 0affah + .dword 0affbh + .dword 0affch + .dword 0affdh + .dword 0affeh + .dword 0afffh + .dword 0b000h + .dword 0b001h + .dword 0b002h + .dword 0b003h + .dword 0b004h + .dword 0b005h + .dword 0b006h + .dword 0b007h + .dword 0b008h + .dword 0b009h + .dword 0b00ah + .dword 0b00bh + .dword 0b00ch + .dword 0b00dh + .dword 0b00eh + .dword 0b00fh + .dword 0ffe1h + .dword 0ffe2h + .dword 0ffe3h + .dword 0ffe4h + .dword 0ffe5h + .dword 0ffe6h + .dword 0ffe7h + .dword 0ffe8h + .dword 0ffe9h + .dword 0ffeah + .dword 0ffebh + .dword 0ffech + .dword 0ffedh + .dword 0ffeeh + .dword 0ffefh + .dword 0fff0h + .dword 0fff1h + .dword 0fff2h + .dword 0fff3h + .dword 0fff4h + .dword 0fff5h + .dword 0fff6h + .dword 0fff7h + .dword 0fff8h + .dword 0fff9h + .dword 0fffah + .dword 0fffbh + .dword 0fffch + .dword 0fffdh + .dword 0fffeh + .dword 0ffffh + .dword 010000h + .dword 010001h + .dword 010002h + .dword 010003h + .dword 010004h + .dword 010005h + .dword 010006h + .dword 010007h + .dword 010008h + .dword 010009h + .dword 01000ah + .dword 01000bh + .dword 01000ch + .dword 01000dh + .dword 01000eh + .dword 01000fh + .dword 07ffffff0h + .dword 07ffffff1h + .dword 07ffffff2h + .dword 07ffffff3h + .dword 07ffffff4h + .dword 07ffffff5h + .dword 07ffffff6h + .dword 07ffffff7h + .dword 07ffffff8h + .dword 07ffffff9h + .dword 07ffffffah + .dword 07ffffffbh + .dword 07ffffffch + .dword 07ffffffdh + .dword 07ffffffeh + .dword 07fffffffh + .dword 080000000h + .dword 080000001h + .dword 080000002h + .dword 080000003h + .dword 080000004h + .dword 080000005h + .dword 080000006h + .dword 080000007h + .dword 080000008h + .dword 080000009h + .dword 08000000ah + .dword 08000000bh + .dword 08000000ch + .dword 08000000dh + .dword 08000000eh + .dword 08000000fh + .dword 09ffffff0h + .dword 09ffffff1h + .dword 09ffffff2h + .dword 09ffffff3h + .dword 09ffffff4h + .dword 09ffffff5h + .dword 09ffffff6h + .dword 09ffffff7h + .dword 09ffffff8h + .dword 09ffffff9h + .dword 09ffffffah + .dword 09ffffffbh + .dword 09ffffffch + .dword 09ffffffdh + .dword 09ffffffeh + .dword 09fffffffh + .dword 0a0000000h + .dword 0a0000001h + .dword 0a0000002h + .dword 0a0000003h + .dword 0a0000004h + .dword 0a0000005h + .dword 0a0000006h + .dword 0a0000007h + .dword 0a0000008h + .dword 0a0000009h + .dword 0a000000ah + .dword 0a000000bh + .dword 0a000000ch + .dword 0a000000dh + .dword 0a000000eh + .dword 0a000000fh + .dword 0fffffff0h + .dword 0fffffff1h + .dword 0fffffff2h + .dword 0fffffff3h + .dword 0fffffff4h + .dword 0fffffff5h + .dword 0fffffff6h + .dword 0fffffff7h + .dword 0fffffff8h + .dword 0fffffff9h + .dword 0fffffffah + .dword 0fffffffbh + .dword 0fffffffch + .dword 0fffffffdh + .dword 0fffffffeh + .dword 0ffffffffh + + ; binary values, variable length + .dword %0 + .dword %01 + .dword %010 + .dword %011 + .dword %0100 + .dword %0101 + .dword %0110 + .dword %0111 + .dword %01000 + .dword %01001 + .dword %01010 + .dword %01011 + .dword %01100 + .dword %01101 + .dword %01110 + .dword %01111 + .dword %010000 + .dword %010001 + .dword %010010 + .dword %010011 + .dword %01110000 + .dword %01110001 + .dword %01110010 + .dword %01110011 + .dword %01110100 + .dword %01110101 + .dword %01110110 + .dword %01110111 + .dword %01111000 + .dword %01111001 + .dword %01111010 + .dword %01111011 + .dword %01111100 + .dword %01111101 + .dword %01111110 + .dword %01111111 + .dword %010000000 + .dword %010000001 + .dword %010000010 + .dword %010000011 + .dword %010000100 + .dword %010000101 + .dword %010000110 + .dword %011110000 + .dword %011110001 + .dword %011110010 + .dword %011110011 + .dword %011110100 + .dword %011110101 + .dword %011110110 + .dword %011110111 + .dword %011111000 + .dword %011111001 + .dword %011111010 + .dword %011111011 + .dword %011111100 + .dword %011111101 + .dword %011111110 + .dword %011111111 + .dword %0100000000 + .dword %0100000001 + .dword %0100000010 + .dword %0100000011 + .dword %0111111010010 + .dword %0111111010011 + .dword %0111111010100 + .dword %0111111010101 + .dword %0111111010110 + .dword %0111111010111 + .dword %0111111011000 + .dword %0111111011001 + .dword %0111111011010 + .dword %0111111011011 + .dword %0111111011100 + .dword %0111111011101 + .dword %0111111011110 + .dword %0111111011111 + .dword %0111111100000 + .dword %0111111100001 + .dword %0111111100010 + .dword %0111111100011 + .dword %0111111100100 + .dword %0111111100101 + .dword %0111111100110 + .dword %0111111100111 + .dword %0111111101000 + .dword %0111111101001 + .dword %0111111101010 + .dword %0111111101011 + .dword %0111111101100 + .dword %0111111101101 + .dword %0111111101110 + .dword %0111111101111 + .dword %0111111110000 + .dword %0111111110001 + .dword %0111111110010 + .dword %0111111110011 + .dword %0111111110100 + .dword %0111111110101 + .dword %0111111110110 + .dword %0111111110111 + .dword %0111111111000 + .dword %0111111111001 + .dword %0111111111010 + .dword %0111111111011 + .dword %0111111111100 + .dword %0111111111101 + .dword %0111111111110 + .dword %0111111111111 + .dword %01000000000000 + .dword %01000000000001 + .dword %01000000000010 + .dword %01000000000011 + .dword %01000000000100 + .dword %01000000000101 + .dword %01000000000110 + .dword %01000000000111 + .dword %01000000001000 + .dword %0111111111110000 + .dword %0111111111110001 + .dword %0111111111110010 + .dword %0111111111110011 + .dword %0111111111110100 + .dword %0111111111110101 + .dword %0111111111110110 + .dword %0111111111110111 + .dword %0111111111111000 + .dword %0111111111111001 + .dword %0111111111111010 + .dword %0111111111111011 + .dword %0111111111111100 + .dword %0111111111111101 + .dword %0111111111111110 + .dword %0111111111111111 + .dword %01000000000000000 + .dword %01000000000000001 + .dword %01000000000000010 + .dword %01000000000000011 + .dword %01000000000000100 + .dword %01000000000000101 + .dword %01000000000000110 + .dword %01000000000000111 + .dword %01000000000001000 + .dword %01000000000001001 + .dword %01000000000001010 + .dword %01000000000001011 + .dword %01001111111100001 + .dword %01001111111100010 + .dword %01001111111100011 + .dword %01001111111100100 + .dword %01001111111100101 + .dword %01001111111100110 + .dword %01001111111100111 + .dword %01001111111101000 + .dword %01001111111101001 + .dword %01001111111101010 + .dword %01001111111101011 + .dword %01001111111101100 + .dword %01001111111101101 + .dword %01001111111101110 + .dword %01001111111101111 + .dword %01001111111110000 + .dword %01001111111110001 + .dword %01001111111110010 + .dword %01001111111110011 + .dword %01001111111110100 + .dword %01001111111110101 + .dword %01001111111110110 + .dword %01001111111110111 + .dword %01001111111111000 + .dword %01001111111111001 + .dword %01001111111111010 + .dword %01001111111111011 + .dword %01001111111111100 + .dword %01001111111111101 + .dword %01001111111111110 + .dword %01001111111111111 + .dword %01010000000000000 + .dword %01010000000000001 + .dword %01010000000000010 + .dword %01010000000000011 + .dword %01010000000000100 + .dword %01010000000000101 + .dword %01010000000000110 + .dword %01010000000000111 + .dword %01010000000001000 + .dword %01010000000001001 + .dword %01010000000001010 + .dword %01010000000001011 + .dword %01010000000001100 + .dword %01010000000001101 + .dword %01010000000001110 + .dword %01010000000001111 + .dword %01010111111100001 + .dword %01010111111100010 + .dword %01010111111100011 + .dword %01010111111100100 + .dword %01010111111100101 + .dword %01010111111100110 + .dword %01010111111100111 + .dword %01010111111101000 + .dword %01010111111101001 + .dword %01010111111101010 + .dword %01010111111101011 + .dword %01010111111101100 + .dword %01010111111101101 + .dword %01010111111101110 + .dword %01010111111101111 + .dword %01010111111110000 + .dword %01010111111110001 + .dword %01010111111110010 + .dword %01010111111110011 + .dword %01010111111110100 + .dword %01010111111110101 + .dword %01010111111110110 + .dword %01010111111110111 + .dword %01010111111111000 + .dword %01010111111111001 + .dword %01010111111111010 + .dword %01010111111111011 + .dword %01010111111111100 + .dword %01010111111111101 + .dword %01010111111111110 + .dword %01010111111111111 + .dword %01011000000000000 + .dword %01011000000000001 + .dword %01011000000000010 + .dword %01011000000000011 + .dword %01011000000000100 + .dword %01011000000000101 + .dword %01011000000000110 + .dword %01011000000000111 + .dword %01011000000001000 + .dword %01011000000001001 + .dword %01011000000001010 + .dword %01011000000001011 + .dword %01011000000001100 + .dword %01011000000001101 + .dword %01011000000001110 + .dword %01011000000001111 + .dword %01111111111100001 + .dword %01111111111100010 + .dword %01111111111100011 + .dword %01111111111100100 + .dword %01111111111100101 + .dword %01111111111100110 + .dword %01111111111100111 + .dword %01111111111101000 + .dword %01111111111101001 + .dword %01111111111101010 + .dword %01111111111101011 + .dword %01111111111101100 + .dword %01111111111101101 + .dword %01111111111101110 + .dword %01111111111101111 + .dword %01111111111110000 + .dword %01111111111110001 + .dword %01111111111110010 + .dword %01111111111110011 + .dword %01111111111110100 + .dword %01111111111110101 + .dword %01111111111110110 + .dword %01111111111110111 + .dword %01111111111111000 + .dword %01111111111111001 + .dword %01111111111111010 + .dword %01111111111111011 + .dword %01111111111111100 + .dword %01111111111111101 + .dword %01111111111111110 + .dword %01111111111111111 + .dword %010000000000000000 + .dword %010000000000000001 + .dword %010000000000000010 + .dword %010000000000000011 + .dword %010000000000000100 + .dword %010000000000000101 + .dword %010000000000000110 + .dword %010000000000000111 + .dword %010000000000001000 + .dword %010000000000001001 + .dword %010000000000001010 + .dword %010000000000001011 + .dword %010000000000001100 + .dword %010000000000001101 + .dword %010000000000001110 + .dword %010000000000001111 + .dword %1111111111111111111111111110000 + .dword %1111111111111111111111111110001 + .dword %1111111111111111111111111110010 + .dword %1111111111111111111111111110011 + .dword %1111111111111111111111111110100 + .dword %1111111111111111111111111110101 + .dword %1111111111111111111111111110110 + .dword %1111111111111111111111111110111 + .dword %1111111111111111111111111111000 + .dword %1111111111111111111111111111001 + .dword %1111111111111111111111111111010 + .dword %1111111111111111111111111111011 + .dword %1111111111111111111111111111100 + .dword %1111111111111111111111111111101 + .dword %1111111111111111111111111111110 + .dword %1111111111111111111111111111111 + .dword %10000000000000000000000000000000 + .dword %10000000000000000000000000000001 + .dword %10000000000000000000000000000010 + .dword %10000000000000000000000000000011 + .dword %10000000000000000000000000000100 + .dword %10000000000000000000000000000101 + .dword %10000000000000000000000000000110 + .dword %10000000000000000000000000000111 + .dword %10000000000000000000000000001000 + .dword %10000000000000000000000000001001 + .dword %10000000000000000000000000001010 + .dword %10000000000000000000000000001011 + .dword %10000000000000000000000000001100 + .dword %10000000000000000000000000001101 + .dword %10000000000000000000000000001110 + .dword %10000000000000000000000000001111 + .dword %10011111111111111111111111110000 + .dword %10011111111111111111111111110001 + .dword %10011111111111111111111111110010 + .dword %10011111111111111111111111110011 + .dword %10011111111111111111111111110100 + .dword %10011111111111111111111111110101 + .dword %10011111111111111111111111110110 + .dword %10011111111111111111111111110111 + .dword %10011111111111111111111111111000 + .dword %10011111111111111111111111111001 + .dword %10011111111111111111111111111010 + .dword %10011111111111111111111111111011 + .dword %10011111111111111111111111111100 + .dword %10011111111111111111111111111101 + .dword %10011111111111111111111111111110 + .dword %10011111111111111111111111111111 + .dword %10100000000000000000000000000000 + .dword %10100000000000000000000000000001 + .dword %10100000000000000000000000000010 + .dword %10100000000000000000000000000011 + .dword %10100000000000000000000000000100 + .dword %10100000000000000000000000000101 + .dword %10100000000000000000000000000110 + .dword %10100000000000000000000000000111 + .dword %10100000000000000000000000001000 + .dword %10100000000000000000000000001001 + .dword %10100000000000000000000000001010 + .dword %10100000000000000000000000001011 + .dword %10100000000000000000000000001100 + .dword %10100000000000000000000000001101 + .dword %10100000000000000000000000001110 + .dword %10100000000000000000000000001111 + .dword %11111111111111111111111111110000 + .dword %11111111111111111111111111110001 + .dword %11111111111111111111111111110010 + .dword %11111111111111111111111111110011 + .dword %11111111111111111111111111110100 + .dword %11111111111111111111111111110101 + .dword %11111111111111111111111111110110 + .dword %11111111111111111111111111110111 + .dword %11111111111111111111111111111000 + .dword %11111111111111111111111111111001 + .dword %11111111111111111111111111111010 + .dword %11111111111111111111111111111011 + .dword %11111111111111111111111111111100 + .dword %11111111111111111111111111111101 + .dword %11111111111111111111111111111110 + .dword %11111111111111111111111111111111 + + ; binary values, full length + .dword %00000000000000000000000000000000 + .dword %00000000000000000000000000000001 + .dword %00000000000000000000000000000010 + .dword %00000000000000000000000000000011 + .dword %00000000000000000000000000000100 + .dword %00000000000000000000000000000101 + .dword %00000000000000000000000000000110 + .dword %00000000000000000000000000000111 + .dword %00000000000000000000000000001000 + .dword %00000000000000000000000000001001 + .dword %00000000000000000000000000001010 + .dword %00000000000000000000000000001011 + .dword %00000000000000000000000000001100 + .dword %00000000000000000000000000001101 + .dword %00000000000000000000000000001110 + .dword %00000000000000000000000000001111 + .dword %00000000000000000000000000010000 + .dword %00000000000000000000000000010001 + .dword %00000000000000000000000000010010 + .dword %00000000000000000000000000010011 + .dword %00000000000000000000000001110000 + .dword %00000000000000000000000001110001 + .dword %00000000000000000000000001110010 + .dword %00000000000000000000000001110011 + .dword %00000000000000000000000001110100 + .dword %00000000000000000000000001110101 + .dword %00000000000000000000000001110110 + .dword %00000000000000000000000001110111 + .dword %00000000000000000000000001111000 + .dword %00000000000000000000000001111001 + .dword %00000000000000000000000001111010 + .dword %00000000000000000000000001111011 + .dword %00000000000000000000000001111100 + .dword %00000000000000000000000001111101 + .dword %00000000000000000000000001111110 + .dword %00000000000000000000000001111111 + .dword %00000000000000000000000010000000 + .dword %00000000000000000000000010000001 + .dword %00000000000000000000000010000010 + .dword %00000000000000000000000010000011 + .dword %00000000000000000000000010000100 + .dword %00000000000000000000000010000101 + .dword %00000000000000000000000010000110 + .dword %00000000000000000000000011110000 + .dword %00000000000000000000000011110001 + .dword %00000000000000000000000011110010 + .dword %00000000000000000000000011110011 + .dword %00000000000000000000000011110100 + .dword %00000000000000000000000011110101 + .dword %00000000000000000000000011110110 + .dword %00000000000000000000000011110111 + .dword %00000000000000000000000011111000 + .dword %00000000000000000000000011111001 + .dword %00000000000000000000000011111010 + .dword %00000000000000000000000011111011 + .dword %00000000000000000000000011111100 + .dword %00000000000000000000000011111101 + .dword %00000000000000000000000011111110 + .dword %00000000000000000000000011111111 + .dword %00000000000000000000000100000000 + .dword %00000000000000000000000100000001 + .dword %00000000000000000000000100000010 + .dword %00000000000000000000000100000011 + .dword %00000000000000000000111111010010 + .dword %00000000000000000000111111010011 + .dword %00000000000000000000111111010100 + .dword %00000000000000000000111111010101 + .dword %00000000000000000000111111010110 + .dword %00000000000000000000111111010111 + .dword %00000000000000000000111111011000 + .dword %00000000000000000000111111011001 + .dword %00000000000000000000111111011010 + .dword %00000000000000000000111111011011 + .dword %00000000000000000000111111011100 + .dword %00000000000000000000111111011101 + .dword %00000000000000000000111111011110 + .dword %00000000000000000000111111011111 + .dword %00000000000000000000111111100000 + .dword %00000000000000000000111111100001 + .dword %00000000000000000000111111100010 + .dword %00000000000000000000111111100011 + .dword %00000000000000000000111111100100 + .dword %00000000000000000000111111100101 + .dword %00000000000000000000111111100110 + .dword %00000000000000000000111111100111 + .dword %00000000000000000000111111101000 + .dword %00000000000000000000111111101001 + .dword %00000000000000000000111111101010 + .dword %00000000000000000000111111101011 + .dword %00000000000000000000111111101100 + .dword %00000000000000000000111111101101 + .dword %00000000000000000000111111101110 + .dword %00000000000000000000111111101111 + .dword %00000000000000000000111111110000 + .dword %00000000000000000000111111110001 + .dword %00000000000000000000111111110010 + .dword %00000000000000000000111111110011 + .dword %00000000000000000000111111110100 + .dword %00000000000000000000111111110101 + .dword %00000000000000000000111111110110 + .dword %00000000000000000000111111110111 + .dword %00000000000000000000111111111000 + .dword %00000000000000000000111111111001 + .dword %00000000000000000000111111111010 + .dword %00000000000000000000111111111011 + .dword %00000000000000000000111111111100 + .dword %00000000000000000000111111111101 + .dword %00000000000000000000111111111110 + .dword %00000000000000000000111111111111 + .dword %00000000000000000001000000000000 + .dword %00000000000000000001000000000001 + .dword %00000000000000000001000000000010 + .dword %00000000000000000001000000000011 + .dword %00000000000000000001000000000100 + .dword %00000000000000000001000000000101 + .dword %00000000000000000001000000000110 + .dword %00000000000000000001000000000111 + .dword %00000000000000000001000000001000 + .dword %00000000000000000111111111110000 + .dword %00000000000000000111111111110001 + .dword %00000000000000000111111111110010 + .dword %00000000000000000111111111110011 + .dword %00000000000000000111111111110100 + .dword %00000000000000000111111111110101 + .dword %00000000000000000111111111110110 + .dword %00000000000000000111111111110111 + .dword %00000000000000000111111111111000 + .dword %00000000000000000111111111111001 + .dword %00000000000000000111111111111010 + .dword %00000000000000000111111111111011 + .dword %00000000000000000111111111111100 + .dword %00000000000000000111111111111101 + .dword %00000000000000000111111111111110 + .dword %00000000000000000111111111111111 + .dword %00000000000000001000000000000000 + .dword %00000000000000001000000000000001 + .dword %00000000000000001000000000000010 + .dword %00000000000000001000000000000011 + .dword %00000000000000001000000000000100 + .dword %00000000000000001000000000000101 + .dword %00000000000000001000000000000110 + .dword %00000000000000001000000000000111 + .dword %00000000000000001000000000001000 + .dword %00000000000000001000000000001001 + .dword %00000000000000001000000000001010 + .dword %00000000000000001000000000001011 + .dword %00000000000000001001111111100001 + .dword %00000000000000001001111111100010 + .dword %00000000000000001001111111100011 + .dword %00000000000000001001111111100100 + .dword %00000000000000001001111111100101 + .dword %00000000000000001001111111100110 + .dword %00000000000000001001111111100111 + .dword %00000000000000001001111111101000 + .dword %00000000000000001001111111101001 + .dword %00000000000000001001111111101010 + .dword %00000000000000001001111111101011 + .dword %00000000000000001001111111101100 + .dword %00000000000000001001111111101101 + .dword %00000000000000001001111111101110 + .dword %00000000000000001001111111101111 + .dword %00000000000000001001111111110000 + .dword %00000000000000001001111111110001 + .dword %00000000000000001001111111110010 + .dword %00000000000000001001111111110011 + .dword %00000000000000001001111111110100 + .dword %00000000000000001001111111110101 + .dword %00000000000000001001111111110110 + .dword %00000000000000001001111111110111 + .dword %00000000000000001001111111111000 + .dword %00000000000000001001111111111001 + .dword %00000000000000001001111111111010 + .dword %00000000000000001001111111111011 + .dword %00000000000000001001111111111100 + .dword %00000000000000001001111111111101 + .dword %00000000000000001001111111111110 + .dword %00000000000000001001111111111111 + .dword %00000000000000001010000000000000 + .dword %00000000000000001010000000000001 + .dword %00000000000000001010000000000010 + .dword %00000000000000001010000000000011 + .dword %00000000000000001010000000000100 + .dword %00000000000000001010000000000101 + .dword %00000000000000001010000000000110 + .dword %00000000000000001010000000000111 + .dword %00000000000000001010000000001000 + .dword %00000000000000001010000000001001 + .dword %00000000000000001010000000001010 + .dword %00000000000000001010000000001011 + .dword %00000000000000001010000000001100 + .dword %00000000000000001010000000001101 + .dword %00000000000000001010000000001110 + .dword %00000000000000001010000000001111 + .dword %00000000000000001010111111100001 + .dword %00000000000000001010111111100010 + .dword %00000000000000001010111111100011 + .dword %00000000000000001010111111100100 + .dword %00000000000000001010111111100101 + .dword %00000000000000001010111111100110 + .dword %00000000000000001010111111100111 + .dword %00000000000000001010111111101000 + .dword %00000000000000001010111111101001 + .dword %00000000000000001010111111101010 + .dword %00000000000000001010111111101011 + .dword %00000000000000001010111111101100 + .dword %00000000000000001010111111101101 + .dword %00000000000000001010111111101110 + .dword %00000000000000001010111111101111 + .dword %00000000000000001010111111110000 + .dword %00000000000000001010111111110001 + .dword %00000000000000001010111111110010 + .dword %00000000000000001010111111110011 + .dword %00000000000000001010111111110100 + .dword %00000000000000001010111111110101 + .dword %00000000000000001010111111110110 + .dword %00000000000000001010111111110111 + .dword %00000000000000001010111111111000 + .dword %00000000000000001010111111111001 + .dword %00000000000000001010111111111010 + .dword %00000000000000001010111111111011 + .dword %00000000000000001010111111111100 + .dword %00000000000000001010111111111101 + .dword %00000000000000001010111111111110 + .dword %00000000000000001010111111111111 + .dword %00000000000000001011000000000000 + .dword %00000000000000001011000000000001 + .dword %00000000000000001011000000000010 + .dword %00000000000000001011000000000011 + .dword %00000000000000001011000000000100 + .dword %00000000000000001011000000000101 + .dword %00000000000000001011000000000110 + .dword %00000000000000001011000000000111 + .dword %00000000000000001011000000001000 + .dword %00000000000000001011000000001001 + .dword %00000000000000001011000000001010 + .dword %00000000000000001011000000001011 + .dword %00000000000000001011000000001100 + .dword %00000000000000001011000000001101 + .dword %00000000000000001011000000001110 + .dword %00000000000000001011000000001111 + .dword %00000000000000001111111111100001 + .dword %00000000000000001111111111100010 + .dword %00000000000000001111111111100011 + .dword %00000000000000001111111111100100 + .dword %00000000000000001111111111100101 + .dword %00000000000000001111111111100110 + .dword %00000000000000001111111111100111 + .dword %00000000000000001111111111101000 + .dword %00000000000000001111111111101001 + .dword %00000000000000001111111111101010 + .dword %00000000000000001111111111101011 + .dword %00000000000000001111111111101100 + .dword %00000000000000001111111111101101 + .dword %00000000000000001111111111101110 + .dword %00000000000000001111111111101111 + .dword %00000000000000001111111111110000 + .dword %00000000000000001111111111110001 + .dword %00000000000000001111111111110010 + .dword %00000000000000001111111111110011 + .dword %00000000000000001111111111110100 + .dword %00000000000000001111111111110101 + .dword %00000000000000001111111111110110 + .dword %00000000000000001111111111110111 + .dword %00000000000000001111111111111000 + .dword %00000000000000001111111111111001 + .dword %00000000000000001111111111111010 + .dword %00000000000000001111111111111011 + .dword %00000000000000001111111111111100 + .dword %00000000000000001111111111111101 + .dword %00000000000000001111111111111110 + .dword %00000000000000001111111111111111 + .dword %00000000000000010000000000000000 + .dword %00000000000000010000000000000001 + .dword %00000000000000010000000000000010 + .dword %00000000000000010000000000000011 + .dword %00000000000000010000000000000100 + .dword %00000000000000010000000000000101 + .dword %00000000000000010000000000000110 + .dword %00000000000000010000000000000111 + .dword %00000000000000010000000000001000 + .dword %00000000000000010000000000001001 + .dword %00000000000000010000000000001010 + .dword %00000000000000010000000000001011 + .dword %00000000000000010000000000001100 + .dword %00000000000000010000000000001101 + .dword %00000000000000010000000000001110 + .dword %00000000000000010000000000001111 + .dword %01111111111111111111111111110000 + .dword %01111111111111111111111111110001 + .dword %01111111111111111111111111110010 + .dword %01111111111111111111111111110011 + .dword %01111111111111111111111111110100 + .dword %01111111111111111111111111110101 + .dword %01111111111111111111111111110110 + .dword %01111111111111111111111111110111 + .dword %01111111111111111111111111111000 + .dword %01111111111111111111111111111001 + .dword %01111111111111111111111111111010 + .dword %01111111111111111111111111111011 + .dword %01111111111111111111111111111100 + .dword %01111111111111111111111111111101 + .dword %01111111111111111111111111111110 + .dword %01111111111111111111111111111111 + .dword %10000000000000000000000000000000 + .dword %10000000000000000000000000000001 + .dword %10000000000000000000000000000010 + .dword %10000000000000000000000000000011 + .dword %10000000000000000000000000000100 + .dword %10000000000000000000000000000101 + .dword %10000000000000000000000000000110 + .dword %10000000000000000000000000000111 + .dword %10000000000000000000000000001000 + .dword %10000000000000000000000000001001 + .dword %10000000000000000000000000001010 + .dword %10000000000000000000000000001011 + .dword %10000000000000000000000000001100 + .dword %10000000000000000000000000001101 + .dword %10000000000000000000000000001110 + .dword %10000000000000000000000000001111 + .dword %10011111111111111111111111110000 + .dword %10011111111111111111111111110001 + .dword %10011111111111111111111111110010 + .dword %10011111111111111111111111110011 + .dword %10011111111111111111111111110100 + .dword %10011111111111111111111111110101 + .dword %10011111111111111111111111110110 + .dword %10011111111111111111111111110111 + .dword %10011111111111111111111111111000 + .dword %10011111111111111111111111111001 + .dword %10011111111111111111111111111010 + .dword %10011111111111111111111111111011 + .dword %10011111111111111111111111111100 + .dword %10011111111111111111111111111101 + .dword %10011111111111111111111111111110 + .dword %10011111111111111111111111111111 + .dword %10100000000000000000000000000000 + .dword %10100000000000000000000000000001 + .dword %10100000000000000000000000000010 + .dword %10100000000000000000000000000011 + .dword %10100000000000000000000000000100 + .dword %10100000000000000000000000000101 + .dword %10100000000000000000000000000110 + .dword %10100000000000000000000000000111 + .dword %10100000000000000000000000001000 + .dword %10100000000000000000000000001001 + .dword %10100000000000000000000000001010 + .dword %10100000000000000000000000001011 + .dword %10100000000000000000000000001100 + .dword %10100000000000000000000000001101 + .dword %10100000000000000000000000001110 + .dword %10100000000000000000000000001111 + .dword %11111111111111111111111111110000 + .dword %11111111111111111111111111110001 + .dword %11111111111111111111111111110010 + .dword %11111111111111111111111111110011 + .dword %11111111111111111111111111110100 + .dword %11111111111111111111111111110101 + .dword %11111111111111111111111111110110 + .dword %11111111111111111111111111110111 + .dword %11111111111111111111111111111000 + .dword %11111111111111111111111111111001 + .dword %11111111111111111111111111111010 + .dword %11111111111111111111111111111011 + .dword %11111111111111111111111111111100 + .dword %11111111111111111111111111111101 + .dword %11111111111111111111111111111110 + .dword %11111111111111111111111111111111 + + ; multiple values on one line, decimal + .dword 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 + .dword 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 + .dword 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 + .dword 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 + .dword 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 + .dword 256,257,258,259,260,261,262,263,264,265,266,267,268,269,270,271 + .dword 4064,4065,4066,4067,4068,4069,4070,4071,4072,4073,4074,4075,4076,4077,4078,4079 + .dword 4080,4081,4082,4083,4084,4085,4086,4087,4088,4089,4090,4091,4092,4093,4094,4095 + .dword 4096,4097,4098,4099,4100,4101,4102,4103,4104,4105,4106,4107,4108,4109,4110,4111 + .dword 32752,32753,32754,32755,32756,32757,32758,32759,32760,32761,32762,32763,32764,32765,32766,32767 + .dword 32768,32769,32770,32771,32772,32773,32774,32775,32776,32777,32778,32779,32780,32781,32782,32783 + .dword 40944,40945,40946,40947,40948,40949,40950,40951,40952,40953,40954,40955,40956,40957,40958,40959 + .dword 40960,40961,40962,40963,40964,40965,40966,40967,40968,40969,40970,40971,40972,40973,40974,40975 + .dword 45040,45041,45042,45043,45044,45045,45046,45047,45048,45049,45050,45051,45052,45053,45054,45055 + .dword 45056,45057,45058,45059,45060,45061,45062,45063,45064,45065,45066,45067,45068,45069,45070,45071 + .dword 65520,65521,65522,65523,65524,65525,65526,65527,65528,65529,65530,65531,65532,65533,65534,65535 + .dword 65536,65537,65538,65539,65540,65541,65542,65543,65544,65545,65546,65547,65548,65549,65550,65551 + .dword 2147483647,2147483648,2147483649,2147483650,2147483651,2147483652,2147483653,2147483654,2147483655,2147483656,2147483657,2147483658,2147483659,2147483660,2147483661,2147483662 + .dword 2147483663,2147483664,2147483665,2147483666,2147483667,2147483668,2147483669,2147483670,2147483671,2147483672,2147483673,2147483674,2147483675,2147483676,2147483677,2147483678 + .dword 2684354559,2684354560,2684354561,2684354562,2684354563,2684354564,2684354565,2684354566,2684354567,2684354568,2684354569,2684354570,2684354571,2684354572,2684354573,2684354574 + .dword 2684354575,2684354576,2684354577,2684354578,2684354579,2684354580,2684354581,2684354582,2684354583,2684354584,2684354585,2684354586,2684354587,2684354588,2684354589,2684354590 + .dword 4294967295 + + ; multiple values on one line, hex + .dword $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f + .dword $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f + .dword $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f + .dword $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f + .dword $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff + .dword $100,$101,$102,$103,$104,$105,$106,$107,$108,$109,$10a,$10b,$10c,$10d,$10e,$10f + .dword $fe0,$fe1,$fe2,$fe3,$fe4,$fe5,$fe6,$fe7,$fe8,$fe9,$fea,$feb,$fec,$fed,$fee,$fef + .dword $ff0,$ff1,$ff2,$ff3,$ff4,$ff5,$ff6,$ff7,$ff8,$ff9,$ffa,$ffb,$ffc,$ffd,$ffe,$fff + .dword $1000,$1001,$1002,$1003,$1004,$1005,$1006,$1007,$1008,$1009,$100a,$100b,$100c,$100d,$100e,$100f + .dword $7ff0,$7ff1,$7ff2,$7ff3,$7ff4,$7ff5,$7ff6,$7ff7,$7ff8,$7ff9,$7ffa,$7ffb,$7ffc,$7ffd,$7ffe,$7fff + .dword $8000,$8001,$8002,$8003,$8004,$8005,$8006,$8007,$8008,$8009,$800a,$800b,$800c,$800d,$800e,$800f + .dword $9ff0,$9ff1,$9ff2,$9ff3,$9ff4,$9ff5,$9ff6,$9ff7,$9ff8,$9ff9,$9ffa,$9ffb,$9ffc,$9ffd,$9ffe,$9fff + .dword $a000,$a001,$a002,$a003,$a004,$a005,$a006,$a007,$a008,$a009,$a00a,$a00b,$a00c,$a00d,$a00e,$a00f + .dword $aff0,$aff1,$aff2,$aff3,$aff4,$aff5,$aff6,$aff7,$aff8,$aff9,$affa,$affb,$affc,$affd,$affe,$afff + .dword $b000,$b001,$b002,$b003,$b004,$b005,$b006,$b007,$b008,$b009,$b00a,$b00b,$b00c,$b00d,$b00e,$b00f + .dword $fff0,$fff1,$fff2,$fff3,$fff4,$fff5,$fff6,$fff7,$fff8,$fff9,$fffa,$fffb,$fffc,$fffd,$fffe,$ffff + .dword $10000,$10001,$10002,$10003,$10004,$10005,$10006,$10007,$10008,$10009,$1000a,$1000b,$1000c,$1000d,$1000e,$1000f + .dword $7fffffff,$80000000,$80000001,$80000002,$80000003,$80000004,$80000005,$80000006,$80000007,$80000008,$80000009,$8000000a,$8000000b,$8000000c,$8000000d,$8000000e + .dword $8000000f,$80000010,$80000011,$80000012,$80000013,$80000014,$80000015,$80000016,$80000017,$80000018,$80000019,$8000001a,$8000001b,$8000001c,$8000001d,$8000001e + .dword $9fffffff,$a0000000,$a0000001,$a0000002,$a0000003,$a0000004,$a0000005,$a0000006,$a0000007,$a0000008,$a0000009,$a000000a,$a000000b,$a000000c,$a000000d,$a000000e + .dword $a000000f,$a0000010,$a0000011,$a0000012,$a0000013,$a0000014,$a0000015,$a0000016,$a0000017,$a0000018,$a0000019,$a000001a,$a000001b,$a000001c,$a000001d,$a000001e + .dword $ffffffff + + ; multiple values on one line, alternative hex + .dword 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh + .dword 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh + .dword 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh + .dword 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh + .dword 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh + .dword 100h,101h,102h,103h,104h,105h,106h,107h,108h,109h,10ah,10bh,10ch,10dh,10eh,10fh + .dword 0fe0h,0fe1h,0fe2h,0fe3h,0fe4h,0fe5h,0fe6h,0fe7h,0fe8h,0fe9h,0feah,0febh,0fech,0fedh,0feeh,0fefh + .dword 0ff0h,0ff1h,0ff2h,0ff3h,0ff4h,0ff5h,0ff6h,0ff7h,0ff8h,0ff9h,0ffah,0ffbh,0ffch,0ffdh,0ffeh,0fffh + .dword 1000h,1001h,1002h,1003h,1004h,1005h,1006h,1007h,1008h,1009h,100ah,100bh,100ch,100dh,100eh,100fh + .dword 7ff0h,7ff1h,7ff2h,7ff3h,7ff4h,7ff5h,7ff6h,7ff7h,7ff8h,7ff9h,7ffah,7ffbh,7ffch,7ffdh,7ffeh,7fffh + .dword 8000h,8001h,8002h,8003h,8004h,8005h,8006h,8007h,8008h,8009h,800ah,800bh,800ch,800dh,800eh,800fh + .dword 9ff0h,9ff1h,9ff2h,9ff3h,9ff4h,9ff5h,9ff6h,9ff7h,9ff8h,9ff9h,9ffah,9ffbh,9ffch,9ffdh,9ffeh,9fffh + .dword 0a000h,0a001h,0a002h,0a003h,0a004h,0a005h,0a006h,0a007h,0a008h,0a009h,0a00ah,0a00bh,0a00ch,0a00dh,0a00eh,0a00fh + .dword 0aff0h,0aff1h,0aff2h,0aff3h,0aff4h,0aff5h,0aff6h,0aff7h,0aff8h,0aff9h,0affah,0affbh,0affch,0affdh,0affeh,0afffh + .dword 0b000h,0b001h,0b002h,0b003h,0b004h,0b005h,0b006h,0b007h,0b008h,0b009h,0b00ah,0b00bh,0b00ch,0b00dh,0b00eh,0b00fh + .dword 0fff0h,0fff1h,0fff2h,0fff3h,0fff4h,0fff5h,0fff6h,0fff7h,0fff8h,0fff9h,0fffah,0fffbh,0fffch,0fffdh,0fffeh,0ffffh + .dword 10000h,10001h,10002h,10003h,10004h,10005h,10006h,10007h,10008h,10009h,1000ah,1000bh,1000ch,1000dh,1000eh,1000fh + .dword 7fffffffh,80000000h,80000001h,80000002h,80000003h,80000004h,80000005h,80000006h,80000007h,80000008h,80000009h,8000000ah,8000000bh,8000000ch,8000000dh,8000000eh + .dword 8000000fh,80000010h,80000011h,80000012h,80000013h,80000014h,80000015h,80000016h,80000017h,80000018h,80000019h,8000001ah,8000001bh,8000001ch,8000001dh,8000001eh + .dword 9fffffffh,0a0000000h,0a0000001h,0a0000002h,0a0000003h,0a0000004h,0a0000005h,0a0000006h,0a0000007h,0a0000008h,0a0000009h,0a000000ah,0a000000bh,0a000000ch,0a000000dh,0a000000eh + .dword 0a000000fh,0a0000010h,0a0000011h,0a0000012h,0a0000013h,0a0000014h,0a0000015h,0a0000016h,0a0000017h,0a0000018h,0a0000019h,0a000001ah,0a000001bh,0a000001ch,0a000001dh,0a000001eh + .dword 0ffffffffh + + ; mix some variants + .dword 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh diff --git a/test/asm/listing/105-faraddr.s b/test/asm/listing/105-faraddr.s new file mode 100644 index 000000000..6f314cd24 --- /dev/null +++ b/test/asm/listing/105-faraddr.s @@ -0,0 +1,6717 @@ +; 2022-06-15 Spiro Trikaliotis + + + ; upper case pseudo-op + .FARADDR 0 + .FARADDR 1 + .FARADDR 2 + .FARADDR 3 + .FARADDR 4 + .FARADDR 5 + .FARADDR 6 + .FARADDR 7 + .FARADDR 8 + .FARADDR 9 + .FARADDR 10 + .FARADDR 11 + .FARADDR 12 + .FARADDR 13 + .FARADDR 14 + .FARADDR 15 + .FARADDR 16 + .FARADDR 17 + .FARADDR 18 + .FARADDR 19 + .FARADDR 112 + .FARADDR 113 + .FARADDR 114 + .FARADDR 115 + .FARADDR 116 + .FARADDR 117 + .FARADDR 118 + .FARADDR 119 + .FARADDR 120 + .FARADDR 121 + .FARADDR 122 + .FARADDR 123 + .FARADDR 124 + .FARADDR 125 + .FARADDR 126 + .FARADDR 127 + .FARADDR 128 + .FARADDR 129 + .FARADDR 130 + .FARADDR 131 + .FARADDR 132 + .FARADDR 133 + .FARADDR 134 + .FARADDR 240 + .FARADDR 241 + .FARADDR 242 + .FARADDR 243 + .FARADDR 244 + .FARADDR 245 + .FARADDR 246 + .FARADDR 247 + .FARADDR 248 + .FARADDR 249 + .FARADDR 250 + .FARADDR 251 + .FARADDR 252 + .FARADDR 253 + .FARADDR 254 + .FARADDR 255 + .FARADDR 256 + .FARADDR 257 + .FARADDR 258 + .FARADDR 259 + .FARADDR 4050 + .FARADDR 4051 + .FARADDR 4052 + .FARADDR 4053 + .FARADDR 4054 + .FARADDR 4055 + .FARADDR 4056 + .FARADDR 4057 + .FARADDR 4058 + .FARADDR 4059 + .FARADDR 4060 + .FARADDR 4061 + .FARADDR 4062 + .FARADDR 4063 + .FARADDR 4064 + .FARADDR 4065 + .FARADDR 4066 + .FARADDR 4067 + .FARADDR 4068 + .FARADDR 4069 + .FARADDR 4070 + .FARADDR 4071 + .FARADDR 4072 + .FARADDR 4073 + .FARADDR 4074 + .FARADDR 4075 + .FARADDR 4076 + .FARADDR 4077 + .FARADDR 4078 + .FARADDR 4079 + .FARADDR 4080 + .FARADDR 4081 + .FARADDR 4082 + .FARADDR 4083 + .FARADDR 4084 + .FARADDR 4085 + .FARADDR 4086 + .FARADDR 4087 + .FARADDR 4088 + .FARADDR 4089 + .FARADDR 4090 + .FARADDR 4091 + .FARADDR 4092 + .FARADDR 4093 + .FARADDR 4094 + .FARADDR 4095 + .FARADDR 4096 + .FARADDR 4097 + .FARADDR 4098 + .FARADDR 4099 + .FARADDR 4100 + .FARADDR 4101 + .FARADDR 4102 + .FARADDR 4103 + .FARADDR 4104 + .FARADDR 32752 + .FARADDR 32753 + .FARADDR 32754 + .FARADDR 32755 + .FARADDR 32756 + .FARADDR 32757 + .FARADDR 32758 + .FARADDR 32759 + .FARADDR 32760 + .FARADDR 32761 + .FARADDR 32762 + .FARADDR 32763 + .FARADDR 32764 + .FARADDR 32765 + .FARADDR 32766 + .FARADDR 32767 + .FARADDR 32768 + .FARADDR 32769 + .FARADDR 32770 + .FARADDR 32771 + .FARADDR 32772 + .FARADDR 32773 + .FARADDR 32774 + .FARADDR 32775 + .FARADDR 32776 + .FARADDR 32777 + .FARADDR 32778 + .FARADDR 32779 + .FARADDR 40929 + .FARADDR 40930 + .FARADDR 40931 + .FARADDR 40932 + .FARADDR 40933 + .FARADDR 40934 + .FARADDR 40935 + .FARADDR 40936 + .FARADDR 40937 + .FARADDR 40938 + .FARADDR 40939 + .FARADDR 40940 + .FARADDR 40941 + .FARADDR 40942 + .FARADDR 40943 + .FARADDR 40944 + .FARADDR 40945 + .FARADDR 40946 + .FARADDR 40947 + .FARADDR 40948 + .FARADDR 40949 + .FARADDR 40950 + .FARADDR 40951 + .FARADDR 40952 + .FARADDR 40953 + .FARADDR 40954 + .FARADDR 40955 + .FARADDR 40956 + .FARADDR 40957 + .FARADDR 40958 + .FARADDR 40959 + .FARADDR 40960 + .FARADDR 40961 + .FARADDR 40962 + .FARADDR 40963 + .FARADDR 40964 + .FARADDR 40965 + .FARADDR 40966 + .FARADDR 40967 + .FARADDR 40968 + .FARADDR 40969 + .FARADDR 40970 + .FARADDR 40971 + .FARADDR 40972 + .FARADDR 40973 + .FARADDR 40974 + .FARADDR 40975 + .FARADDR 45025 + .FARADDR 45026 + .FARADDR 45027 + .FARADDR 45028 + .FARADDR 45029 + .FARADDR 45030 + .FARADDR 45031 + .FARADDR 45032 + .FARADDR 45033 + .FARADDR 45034 + .FARADDR 45035 + .FARADDR 45036 + .FARADDR 45037 + .FARADDR 45038 + .FARADDR 45039 + .FARADDR 45040 + .FARADDR 45041 + .FARADDR 45042 + .FARADDR 45043 + .FARADDR 45044 + .FARADDR 45045 + .FARADDR 45046 + .FARADDR 45047 + .FARADDR 45048 + .FARADDR 45049 + .FARADDR 45050 + .FARADDR 45051 + .FARADDR 45052 + .FARADDR 45053 + .FARADDR 45054 + .FARADDR 45055 + .FARADDR 45056 + .FARADDR 45057 + .FARADDR 45058 + .FARADDR 45059 + .FARADDR 45060 + .FARADDR 45061 + .FARADDR 45062 + .FARADDR 45063 + .FARADDR 45064 + .FARADDR 45065 + .FARADDR 45066 + .FARADDR 45067 + .FARADDR 45068 + .FARADDR 45069 + .FARADDR 45070 + .FARADDR 45071 + .FARADDR 65505 + .FARADDR 65506 + .FARADDR 65507 + .FARADDR 65508 + .FARADDR 65509 + .FARADDR 65510 + .FARADDR 65511 + .FARADDR 65512 + .FARADDR 65513 + .FARADDR 65514 + .FARADDR 65515 + .FARADDR 65516 + .FARADDR 65517 + .FARADDR 65518 + .FARADDR 65519 + .FARADDR 65520 + .FARADDR 65521 + .FARADDR 65522 + .FARADDR 65523 + .FARADDR 65524 + .FARADDR 65525 + .FARADDR 65526 + .FARADDR 65527 + .FARADDR 65528 + .FARADDR 65529 + .FARADDR 65530 + .FARADDR 65531 + .FARADDR 65532 + .FARADDR 65533 + .FARADDR 65534 + .FARADDR 65535 + .FARADDR 65536 + .FARADDR 65537 + .FARADDR 65538 + .FARADDR 65539 + .FARADDR 65540 + .FARADDR 65541 + .FARADDR 65542 + .FARADDR 65543 + .FARADDR 65544 + .FARADDR 65545 + .FARADDR 65546 + .FARADDR 65547 + .FARADDR 65548 + .FARADDR 65549 + .FARADDR 65550 + .FARADDR 65551 + .FARADDR 1114081 + .FARADDR 1114082 + .FARADDR 1114083 + .FARADDR 1114084 + .FARADDR 1114085 + .FARADDR 1114086 + .FARADDR 1114087 + .FARADDR 1114088 + .FARADDR 1114089 + .FARADDR 1114090 + .FARADDR 1114091 + .FARADDR 1114092 + .FARADDR 1114093 + .FARADDR 1114094 + .FARADDR 1114095 + .FARADDR 1114096 + .FARADDR 1114097 + .FARADDR 1114098 + .FARADDR 1114099 + .FARADDR 1114100 + .FARADDR 1114101 + .FARADDR 1114102 + .FARADDR 1114103 + .FARADDR 1114104 + .FARADDR 1114105 + .FARADDR 1114106 + .FARADDR 1114107 + .FARADDR 1114108 + .FARADDR 1114109 + .FARADDR 1114110 + .FARADDR 1114111 + .FARADDR 1114112 + .FARADDR 1114113 + .FARADDR 1114114 + .FARADDR 1114115 + .FARADDR 1114116 + .FARADDR 1114117 + .FARADDR 1114118 + .FARADDR 1114119 + .FARADDR 1114120 + .FARADDR 1114121 + .FARADDR 1114122 + .FARADDR 1114123 + .FARADDR 1114124 + .FARADDR 1114125 + .FARADDR 1114126 + .FARADDR 1114127 + .FARADDR 2162657 + .FARADDR 2162658 + .FARADDR 2162659 + .FARADDR 2162660 + .FARADDR 2162661 + .FARADDR 2162662 + .FARADDR 2162663 + .FARADDR 2162664 + .FARADDR 2162665 + .FARADDR 2162666 + .FARADDR 2162667 + .FARADDR 2162668 + .FARADDR 2162669 + .FARADDR 2162670 + .FARADDR 2162671 + .FARADDR 2162672 + .FARADDR 2162673 + .FARADDR 2162674 + .FARADDR 2162675 + .FARADDR 2162676 + .FARADDR 2162677 + .FARADDR 2162678 + .FARADDR 2162679 + .FARADDR 2162680 + .FARADDR 2162681 + .FARADDR 2162682 + .FARADDR 2162683 + .FARADDR 2162684 + .FARADDR 2162685 + .FARADDR 2162686 + .FARADDR 2162687 + .FARADDR 2162688 + .FARADDR 2162689 + .FARADDR 2162690 + .FARADDR 2162691 + .FARADDR 2162692 + .FARADDR 2162693 + .FARADDR 2162694 + .FARADDR 2162695 + .FARADDR 2162696 + .FARADDR 2162697 + .FARADDR 2162698 + .FARADDR 2162699 + .FARADDR 2162700 + .FARADDR 2162701 + .FARADDR 2162702 + .FARADDR 2162703 + .FARADDR 8388577 + .FARADDR 8388578 + .FARADDR 8388579 + .FARADDR 8388580 + .FARADDR 8388581 + .FARADDR 8388582 + .FARADDR 8388583 + .FARADDR 8388584 + .FARADDR 8388585 + .FARADDR 8388586 + .FARADDR 8388587 + .FARADDR 8388588 + .FARADDR 8388589 + .FARADDR 8388590 + .FARADDR 8388591 + .FARADDR 8388592 + .FARADDR 8388593 + .FARADDR 8388594 + .FARADDR 8388595 + .FARADDR 8388596 + .FARADDR 8388597 + .FARADDR 8388598 + .FARADDR 8388599 + .FARADDR 8388600 + .FARADDR 8388601 + .FARADDR 8388602 + .FARADDR 8388603 + .FARADDR 8388604 + .FARADDR 8388605 + .FARADDR 8388606 + .FARADDR 8388607 + .FARADDR 8388608 + .FARADDR 8388609 + .FARADDR 8388610 + .FARADDR 8388611 + .FARADDR 8388612 + .FARADDR 8388613 + .FARADDR 8388614 + .FARADDR 8388615 + .FARADDR 8388616 + .FARADDR 8388617 + .FARADDR 8388618 + .FARADDR 8388619 + .FARADDR 8388620 + .FARADDR 8388621 + .FARADDR 8388622 + .FARADDR 8388623 + .FARADDR 10485729 + .FARADDR 10485730 + .FARADDR 10485731 + .FARADDR 10485732 + .FARADDR 10485733 + .FARADDR 10485734 + .FARADDR 10485735 + .FARADDR 10485736 + .FARADDR 10485737 + .FARADDR 10485738 + .FARADDR 10485739 + .FARADDR 10485740 + .FARADDR 10485741 + .FARADDR 10485742 + .FARADDR 10485743 + .FARADDR 10485744 + .FARADDR 10485745 + .FARADDR 10485746 + .FARADDR 10485747 + .FARADDR 10485748 + .FARADDR 10485749 + .FARADDR 10485750 + .FARADDR 10485751 + .FARADDR 10485752 + .FARADDR 10485753 + .FARADDR 10485754 + .FARADDR 10485755 + .FARADDR 10485756 + .FARADDR 10485757 + .FARADDR 10485758 + .FARADDR 10485759 + .FARADDR 10485760 + .FARADDR 10485761 + .FARADDR 10485762 + .FARADDR 10485763 + .FARADDR 10485764 + .FARADDR 10485765 + .FARADDR 10485766 + .FARADDR 10485767 + .FARADDR 10485768 + .FARADDR 10485769 + .FARADDR 10485770 + .FARADDR 10485771 + .FARADDR 10485772 + .FARADDR 10485773 + .FARADDR 10485774 + .FARADDR 10485775 + .FARADDR 16777185 + .FARADDR 16777186 + .FARADDR 16777187 + .FARADDR 16777188 + .FARADDR 16777189 + .FARADDR 16777190 + .FARADDR 16777191 + .FARADDR 16777192 + .FARADDR 16777193 + .FARADDR 16777194 + .FARADDR 16777195 + .FARADDR 16777196 + .FARADDR 16777197 + .FARADDR 16777198 + .FARADDR 16777199 + .FARADDR 16777200 + .FARADDR 16777201 + .FARADDR 16777202 + .FARADDR 16777203 + .FARADDR 16777204 + .FARADDR 16777205 + .FARADDR 16777206 + .FARADDR 16777207 + .FARADDR 16777208 + .FARADDR 16777209 + .FARADDR 16777210 + .FARADDR 16777211 + .FARADDR 16777212 + .FARADDR 16777213 + .FARADDR 16777214 + .FARADDR 16777215 + + ; lower case pseudo-op + .faraddr 0 + .faraddr 1 + .faraddr 2 + .faraddr 3 + .faraddr 4 + .faraddr 5 + .faraddr 6 + .faraddr 7 + .faraddr 8 + .faraddr 9 + .faraddr 10 + .faraddr 11 + .faraddr 12 + .faraddr 13 + .faraddr 14 + .faraddr 15 + .faraddr 16 + .faraddr 17 + .faraddr 18 + .faraddr 19 + .faraddr 112 + .faraddr 113 + .faraddr 114 + .faraddr 115 + .faraddr 116 + .faraddr 117 + .faraddr 118 + .faraddr 119 + .faraddr 120 + .faraddr 121 + .faraddr 122 + .faraddr 123 + .faraddr 124 + .faraddr 125 + .faraddr 126 + .faraddr 127 + .faraddr 128 + .faraddr 129 + .faraddr 130 + .faraddr 131 + .faraddr 132 + .faraddr 133 + .faraddr 134 + .faraddr 240 + .faraddr 241 + .faraddr 242 + .faraddr 243 + .faraddr 244 + .faraddr 245 + .faraddr 246 + .faraddr 247 + .faraddr 248 + .faraddr 249 + .faraddr 250 + .faraddr 251 + .faraddr 252 + .faraddr 253 + .faraddr 254 + .faraddr 255 + .faraddr 256 + .faraddr 257 + .faraddr 258 + .faraddr 259 + .faraddr 4050 + .faraddr 4051 + .faraddr 4052 + .faraddr 4053 + .faraddr 4054 + .faraddr 4055 + .faraddr 4056 + .faraddr 4057 + .faraddr 4058 + .faraddr 4059 + .faraddr 4060 + .faraddr 4061 + .faraddr 4062 + .faraddr 4063 + .faraddr 4064 + .faraddr 4065 + .faraddr 4066 + .faraddr 4067 + .faraddr 4068 + .faraddr 4069 + .faraddr 4070 + .faraddr 4071 + .faraddr 4072 + .faraddr 4073 + .faraddr 4074 + .faraddr 4075 + .faraddr 4076 + .faraddr 4077 + .faraddr 4078 + .faraddr 4079 + .faraddr 4080 + .faraddr 4081 + .faraddr 4082 + .faraddr 4083 + .faraddr 4084 + .faraddr 4085 + .faraddr 4086 + .faraddr 4087 + .faraddr 4088 + .faraddr 4089 + .faraddr 4090 + .faraddr 4091 + .faraddr 4092 + .faraddr 4093 + .faraddr 4094 + .faraddr 4095 + .faraddr 4096 + .faraddr 4097 + .faraddr 4098 + .faraddr 4099 + .faraddr 4100 + .faraddr 4101 + .faraddr 4102 + .faraddr 4103 + .faraddr 4104 + .faraddr 32752 + .faraddr 32753 + .faraddr 32754 + .faraddr 32755 + .faraddr 32756 + .faraddr 32757 + .faraddr 32758 + .faraddr 32759 + .faraddr 32760 + .faraddr 32761 + .faraddr 32762 + .faraddr 32763 + .faraddr 32764 + .faraddr 32765 + .faraddr 32766 + .faraddr 32767 + .faraddr 32768 + .faraddr 32769 + .faraddr 32770 + .faraddr 32771 + .faraddr 32772 + .faraddr 32773 + .faraddr 32774 + .faraddr 32775 + .faraddr 32776 + .faraddr 32777 + .faraddr 32778 + .faraddr 32779 + .faraddr 40929 + .faraddr 40930 + .faraddr 40931 + .faraddr 40932 + .faraddr 40933 + .faraddr 40934 + .faraddr 40935 + .faraddr 40936 + .faraddr 40937 + .faraddr 40938 + .faraddr 40939 + .faraddr 40940 + .faraddr 40941 + .faraddr 40942 + .faraddr 40943 + .faraddr 40944 + .faraddr 40945 + .faraddr 40946 + .faraddr 40947 + .faraddr 40948 + .faraddr 40949 + .faraddr 40950 + .faraddr 40951 + .faraddr 40952 + .faraddr 40953 + .faraddr 40954 + .faraddr 40955 + .faraddr 40956 + .faraddr 40957 + .faraddr 40958 + .faraddr 40959 + .faraddr 40960 + .faraddr 40961 + .faraddr 40962 + .faraddr 40963 + .faraddr 40964 + .faraddr 40965 + .faraddr 40966 + .faraddr 40967 + .faraddr 40968 + .faraddr 40969 + .faraddr 40970 + .faraddr 40971 + .faraddr 40972 + .faraddr 40973 + .faraddr 40974 + .faraddr 40975 + .faraddr 45025 + .faraddr 45026 + .faraddr 45027 + .faraddr 45028 + .faraddr 45029 + .faraddr 45030 + .faraddr 45031 + .faraddr 45032 + .faraddr 45033 + .faraddr 45034 + .faraddr 45035 + .faraddr 45036 + .faraddr 45037 + .faraddr 45038 + .faraddr 45039 + .faraddr 45040 + .faraddr 45041 + .faraddr 45042 + .faraddr 45043 + .faraddr 45044 + .faraddr 45045 + .faraddr 45046 + .faraddr 45047 + .faraddr 45048 + .faraddr 45049 + .faraddr 45050 + .faraddr 45051 + .faraddr 45052 + .faraddr 45053 + .faraddr 45054 + .faraddr 45055 + .faraddr 45056 + .faraddr 45057 + .faraddr 45058 + .faraddr 45059 + .faraddr 45060 + .faraddr 45061 + .faraddr 45062 + .faraddr 45063 + .faraddr 45064 + .faraddr 45065 + .faraddr 45066 + .faraddr 45067 + .faraddr 45068 + .faraddr 45069 + .faraddr 45070 + .faraddr 45071 + .faraddr 65505 + .faraddr 65506 + .faraddr 65507 + .faraddr 65508 + .faraddr 65509 + .faraddr 65510 + .faraddr 65511 + .faraddr 65512 + .faraddr 65513 + .faraddr 65514 + .faraddr 65515 + .faraddr 65516 + .faraddr 65517 + .faraddr 65518 + .faraddr 65519 + .faraddr 65520 + .faraddr 65521 + .faraddr 65522 + .faraddr 65523 + .faraddr 65524 + .faraddr 65525 + .faraddr 65526 + .faraddr 65527 + .faraddr 65528 + .faraddr 65529 + .faraddr 65530 + .faraddr 65531 + .faraddr 65532 + .faraddr 65533 + .faraddr 65534 + .faraddr 65535 + .faraddr 65536 + .faraddr 65537 + .faraddr 65538 + .faraddr 65539 + .faraddr 65540 + .faraddr 65541 + .faraddr 65542 + .faraddr 65543 + .faraddr 65544 + .faraddr 65545 + .faraddr 65546 + .faraddr 65547 + .faraddr 65548 + .faraddr 65549 + .faraddr 65550 + .faraddr 65551 + .faraddr 1114081 + .faraddr 1114082 + .faraddr 1114083 + .faraddr 1114084 + .faraddr 1114085 + .faraddr 1114086 + .faraddr 1114087 + .faraddr 1114088 + .faraddr 1114089 + .faraddr 1114090 + .faraddr 1114091 + .faraddr 1114092 + .faraddr 1114093 + .faraddr 1114094 + .faraddr 1114095 + .faraddr 1114096 + .faraddr 1114097 + .faraddr 1114098 + .faraddr 1114099 + .faraddr 1114100 + .faraddr 1114101 + .faraddr 1114102 + .faraddr 1114103 + .faraddr 1114104 + .faraddr 1114105 + .faraddr 1114106 + .faraddr 1114107 + .faraddr 1114108 + .faraddr 1114109 + .faraddr 1114110 + .faraddr 1114111 + .faraddr 1114112 + .faraddr 1114113 + .faraddr 1114114 + .faraddr 1114115 + .faraddr 1114116 + .faraddr 1114117 + .faraddr 1114118 + .faraddr 1114119 + .faraddr 1114120 + .faraddr 1114121 + .faraddr 1114122 + .faraddr 1114123 + .faraddr 1114124 + .faraddr 1114125 + .faraddr 1114126 + .faraddr 1114127 + .faraddr 2162657 + .faraddr 2162658 + .faraddr 2162659 + .faraddr 2162660 + .faraddr 2162661 + .faraddr 2162662 + .faraddr 2162663 + .faraddr 2162664 + .faraddr 2162665 + .faraddr 2162666 + .faraddr 2162667 + .faraddr 2162668 + .faraddr 2162669 + .faraddr 2162670 + .faraddr 2162671 + .faraddr 2162672 + .faraddr 2162673 + .faraddr 2162674 + .faraddr 2162675 + .faraddr 2162676 + .faraddr 2162677 + .faraddr 2162678 + .faraddr 2162679 + .faraddr 2162680 + .faraddr 2162681 + .faraddr 2162682 + .faraddr 2162683 + .faraddr 2162684 + .faraddr 2162685 + .faraddr 2162686 + .faraddr 2162687 + .faraddr 2162688 + .faraddr 2162689 + .faraddr 2162690 + .faraddr 2162691 + .faraddr 2162692 + .faraddr 2162693 + .faraddr 2162694 + .faraddr 2162695 + .faraddr 2162696 + .faraddr 2162697 + .faraddr 2162698 + .faraddr 2162699 + .faraddr 2162700 + .faraddr 2162701 + .faraddr 2162702 + .faraddr 2162703 + .faraddr 8388577 + .faraddr 8388578 + .faraddr 8388579 + .faraddr 8388580 + .faraddr 8388581 + .faraddr 8388582 + .faraddr 8388583 + .faraddr 8388584 + .faraddr 8388585 + .faraddr 8388586 + .faraddr 8388587 + .faraddr 8388588 + .faraddr 8388589 + .faraddr 8388590 + .faraddr 8388591 + .faraddr 8388592 + .faraddr 8388593 + .faraddr 8388594 + .faraddr 8388595 + .faraddr 8388596 + .faraddr 8388597 + .faraddr 8388598 + .faraddr 8388599 + .faraddr 8388600 + .faraddr 8388601 + .faraddr 8388602 + .faraddr 8388603 + .faraddr 8388604 + .faraddr 8388605 + .faraddr 8388606 + .faraddr 8388607 + .faraddr 8388608 + .faraddr 8388609 + .faraddr 8388610 + .faraddr 8388611 + .faraddr 8388612 + .faraddr 8388613 + .faraddr 8388614 + .faraddr 8388615 + .faraddr 8388616 + .faraddr 8388617 + .faraddr 8388618 + .faraddr 8388619 + .faraddr 8388620 + .faraddr 8388621 + .faraddr 8388622 + .faraddr 8388623 + .faraddr 10485729 + .faraddr 10485730 + .faraddr 10485731 + .faraddr 10485732 + .faraddr 10485733 + .faraddr 10485734 + .faraddr 10485735 + .faraddr 10485736 + .faraddr 10485737 + .faraddr 10485738 + .faraddr 10485739 + .faraddr 10485740 + .faraddr 10485741 + .faraddr 10485742 + .faraddr 10485743 + .faraddr 10485744 + .faraddr 10485745 + .faraddr 10485746 + .faraddr 10485747 + .faraddr 10485748 + .faraddr 10485749 + .faraddr 10485750 + .faraddr 10485751 + .faraddr 10485752 + .faraddr 10485753 + .faraddr 10485754 + .faraddr 10485755 + .faraddr 10485756 + .faraddr 10485757 + .faraddr 10485758 + .faraddr 10485759 + .faraddr 10485760 + .faraddr 10485761 + .faraddr 10485762 + .faraddr 10485763 + .faraddr 10485764 + .faraddr 10485765 + .faraddr 10485766 + .faraddr 10485767 + .faraddr 10485768 + .faraddr 10485769 + .faraddr 10485770 + .faraddr 10485771 + .faraddr 10485772 + .faraddr 10485773 + .faraddr 10485774 + .faraddr 10485775 + .faraddr 16777185 + .faraddr 16777186 + .faraddr 16777187 + .faraddr 16777188 + .faraddr 16777189 + .faraddr 16777190 + .faraddr 16777191 + .faraddr 16777192 + .faraddr 16777193 + .faraddr 16777194 + .faraddr 16777195 + .faraddr 16777196 + .faraddr 16777197 + .faraddr 16777198 + .faraddr 16777199 + .faraddr 16777200 + .faraddr 16777201 + .faraddr 16777202 + .faraddr 16777203 + .faraddr 16777204 + .faraddr 16777205 + .faraddr 16777206 + .faraddr 16777207 + .faraddr 16777208 + .faraddr 16777209 + .faraddr 16777210 + .faraddr 16777211 + .faraddr 16777212 + .faraddr 16777213 + .faraddr 16777214 + .faraddr 16777215 + + ; hex values + .faraddr $0 + .faraddr $1 + .faraddr $2 + .faraddr $3 + .faraddr $4 + .faraddr $5 + .faraddr $6 + .faraddr $7 + .faraddr $8 + .faraddr $9 + .faraddr $a + .faraddr $b + .faraddr $c + .faraddr $d + .faraddr $e + .faraddr $f + .faraddr $10 + .faraddr $11 + .faraddr $12 + .faraddr $13 + .faraddr $70 + .faraddr $71 + .faraddr $72 + .faraddr $73 + .faraddr $74 + .faraddr $75 + .faraddr $76 + .faraddr $77 + .faraddr $78 + .faraddr $79 + .faraddr $7a + .faraddr $7b + .faraddr $7c + .faraddr $7d + .faraddr $7e + .faraddr $7f + .faraddr $80 + .faraddr $81 + .faraddr $82 + .faraddr $83 + .faraddr $84 + .faraddr $85 + .faraddr $86 + .faraddr $f0 + .faraddr $f1 + .faraddr $f2 + .faraddr $f3 + .faraddr $f4 + .faraddr $f5 + .faraddr $f6 + .faraddr $f7 + .faraddr $f8 + .faraddr $f9 + .faraddr $fa + .faraddr $fb + .faraddr $fc + .faraddr $fd + .faraddr $fe + .faraddr $ff + .faraddr $100 + .faraddr $101 + .faraddr $102 + .faraddr $103 + .faraddr $fd2 + .faraddr $fd3 + .faraddr $fd4 + .faraddr $fd5 + .faraddr $fd6 + .faraddr $fd7 + .faraddr $fd8 + .faraddr $fd9 + .faraddr $fda + .faraddr $fdb + .faraddr $fdc + .faraddr $fdd + .faraddr $fde + .faraddr $fdf + .faraddr $fe0 + .faraddr $fe1 + .faraddr $fe2 + .faraddr $fe3 + .faraddr $fe4 + .faraddr $fe5 + .faraddr $fe6 + .faraddr $fe7 + .faraddr $fe8 + .faraddr $fe9 + .faraddr $fea + .faraddr $feb + .faraddr $fec + .faraddr $fed + .faraddr $fee + .faraddr $fef + .faraddr $ff0 + .faraddr $ff1 + .faraddr $ff2 + .faraddr $ff3 + .faraddr $ff4 + .faraddr $ff5 + .faraddr $ff6 + .faraddr $ff7 + .faraddr $ff8 + .faraddr $ff9 + .faraddr $ffa + .faraddr $ffb + .faraddr $ffc + .faraddr $ffd + .faraddr $ffe + .faraddr $fff + .faraddr $1000 + .faraddr $1001 + .faraddr $1002 + .faraddr $1003 + .faraddr $1004 + .faraddr $1005 + .faraddr $1006 + .faraddr $1007 + .faraddr $1008 + .faraddr $7ff0 + .faraddr $7ff1 + .faraddr $7ff2 + .faraddr $7ff3 + .faraddr $7ff4 + .faraddr $7ff5 + .faraddr $7ff6 + .faraddr $7ff7 + .faraddr $7ff8 + .faraddr $7ff9 + .faraddr $7ffa + .faraddr $7ffb + .faraddr $7ffc + .faraddr $7ffd + .faraddr $7ffe + .faraddr $7fff + .faraddr $8000 + .faraddr $8001 + .faraddr $8002 + .faraddr $8003 + .faraddr $8004 + .faraddr $8005 + .faraddr $8006 + .faraddr $8007 + .faraddr $8008 + .faraddr $8009 + .faraddr $800a + .faraddr $800b + .faraddr $9fe1 + .faraddr $9fe2 + .faraddr $9fe3 + .faraddr $9fe4 + .faraddr $9fe5 + .faraddr $9fe6 + .faraddr $9fe7 + .faraddr $9fe8 + .faraddr $9fe9 + .faraddr $9fea + .faraddr $9feb + .faraddr $9fec + .faraddr $9fed + .faraddr $9fee + .faraddr $9fef + .faraddr $9ff0 + .faraddr $9ff1 + .faraddr $9ff2 + .faraddr $9ff3 + .faraddr $9ff4 + .faraddr $9ff5 + .faraddr $9ff6 + .faraddr $9ff7 + .faraddr $9ff8 + .faraddr $9ff9 + .faraddr $9ffa + .faraddr $9ffb + .faraddr $9ffc + .faraddr $9ffd + .faraddr $9ffe + .faraddr $9fff + .faraddr $a000 + .faraddr $a001 + .faraddr $a002 + .faraddr $a003 + .faraddr $a004 + .faraddr $a005 + .faraddr $a006 + .faraddr $a007 + .faraddr $a008 + .faraddr $a009 + .faraddr $a00a + .faraddr $a00b + .faraddr $a00c + .faraddr $a00d + .faraddr $a00e + .faraddr $a00f + .faraddr $afe1 + .faraddr $afe2 + .faraddr $afe3 + .faraddr $afe4 + .faraddr $afe5 + .faraddr $afe6 + .faraddr $afe7 + .faraddr $afe8 + .faraddr $afe9 + .faraddr $afea + .faraddr $afeb + .faraddr $afec + .faraddr $afed + .faraddr $afee + .faraddr $afef + .faraddr $aff0 + .faraddr $aff1 + .faraddr $aff2 + .faraddr $aff3 + .faraddr $aff4 + .faraddr $aff5 + .faraddr $aff6 + .faraddr $aff7 + .faraddr $aff8 + .faraddr $aff9 + .faraddr $affa + .faraddr $affb + .faraddr $affc + .faraddr $affd + .faraddr $affe + .faraddr $afff + .faraddr $b000 + .faraddr $b001 + .faraddr $b002 + .faraddr $b003 + .faraddr $b004 + .faraddr $b005 + .faraddr $b006 + .faraddr $b007 + .faraddr $b008 + .faraddr $b009 + .faraddr $b00a + .faraddr $b00b + .faraddr $b00c + .faraddr $b00d + .faraddr $b00e + .faraddr $b00f + .faraddr $ffe1 + .faraddr $ffe2 + .faraddr $ffe3 + .faraddr $ffe4 + .faraddr $ffe5 + .faraddr $ffe6 + .faraddr $ffe7 + .faraddr $ffe8 + .faraddr $ffe9 + .faraddr $ffea + .faraddr $ffeb + .faraddr $ffec + .faraddr $ffed + .faraddr $ffee + .faraddr $ffef + .faraddr $fff0 + .faraddr $fff1 + .faraddr $fff2 + .faraddr $fff3 + .faraddr $fff4 + .faraddr $fff5 + .faraddr $fff6 + .faraddr $fff7 + .faraddr $fff8 + .faraddr $fff9 + .faraddr $fffa + .faraddr $fffb + .faraddr $fffc + .faraddr $fffd + .faraddr $fffe + .faraddr $ffff + .faraddr $10000 + .faraddr $10001 + .faraddr $10002 + .faraddr $10003 + .faraddr $10004 + .faraddr $10005 + .faraddr $10006 + .faraddr $10007 + .faraddr $10008 + .faraddr $10009 + .faraddr $1000a + .faraddr $1000b + .faraddr $1000c + .faraddr $1000d + .faraddr $1000e + .faraddr $1000f + .faraddr $10ffe1 + .faraddr $10ffe2 + .faraddr $10ffe3 + .faraddr $10ffe4 + .faraddr $10ffe5 + .faraddr $10ffe6 + .faraddr $10ffe7 + .faraddr $10ffe8 + .faraddr $10ffe9 + .faraddr $10ffea + .faraddr $10ffeb + .faraddr $10ffec + .faraddr $10ffed + .faraddr $10ffee + .faraddr $10ffef + .faraddr $10fff0 + .faraddr $10fff1 + .faraddr $10fff2 + .faraddr $10fff3 + .faraddr $10fff4 + .faraddr $10fff5 + .faraddr $10fff6 + .faraddr $10fff7 + .faraddr $10fff8 + .faraddr $10fff9 + .faraddr $10fffa + .faraddr $10fffb + .faraddr $10fffc + .faraddr $10fffd + .faraddr $10fffe + .faraddr $10ffff + .faraddr $110000 + .faraddr $110001 + .faraddr $110002 + .faraddr $110003 + .faraddr $110004 + .faraddr $110005 + .faraddr $110006 + .faraddr $110007 + .faraddr $110008 + .faraddr $110009 + .faraddr $11000a + .faraddr $11000b + .faraddr $11000c + .faraddr $11000d + .faraddr $11000e + .faraddr $11000f + .faraddr $20ffe1 + .faraddr $20ffe2 + .faraddr $20ffe3 + .faraddr $20ffe4 + .faraddr $20ffe5 + .faraddr $20ffe6 + .faraddr $20ffe7 + .faraddr $20ffe8 + .faraddr $20ffe9 + .faraddr $20ffea + .faraddr $20ffeb + .faraddr $20ffec + .faraddr $20ffed + .faraddr $20ffee + .faraddr $20ffef + .faraddr $20fff0 + .faraddr $20fff1 + .faraddr $20fff2 + .faraddr $20fff3 + .faraddr $20fff4 + .faraddr $20fff5 + .faraddr $20fff6 + .faraddr $20fff7 + .faraddr $20fff8 + .faraddr $20fff9 + .faraddr $20fffa + .faraddr $20fffb + .faraddr $20fffc + .faraddr $20fffd + .faraddr $20fffe + .faraddr $20ffff + .faraddr $210000 + .faraddr $210001 + .faraddr $210002 + .faraddr $210003 + .faraddr $210004 + .faraddr $210005 + .faraddr $210006 + .faraddr $210007 + .faraddr $210008 + .faraddr $210009 + .faraddr $21000a + .faraddr $21000b + .faraddr $21000c + .faraddr $21000d + .faraddr $21000e + .faraddr $21000f + .faraddr $7fffe1 + .faraddr $7fffe2 + .faraddr $7fffe3 + .faraddr $7fffe4 + .faraddr $7fffe5 + .faraddr $7fffe6 + .faraddr $7fffe7 + .faraddr $7fffe8 + .faraddr $7fffe9 + .faraddr $7fffea + .faraddr $7fffeb + .faraddr $7fffec + .faraddr $7fffed + .faraddr $7fffee + .faraddr $7fffef + .faraddr $7ffff0 + .faraddr $7ffff1 + .faraddr $7ffff2 + .faraddr $7ffff3 + .faraddr $7ffff4 + .faraddr $7ffff5 + .faraddr $7ffff6 + .faraddr $7ffff7 + .faraddr $7ffff8 + .faraddr $7ffff9 + .faraddr $7ffffa + .faraddr $7ffffb + .faraddr $7ffffc + .faraddr $7ffffd + .faraddr $7ffffe + .faraddr $7fffff + .faraddr $800000 + .faraddr $800001 + .faraddr $800002 + .faraddr $800003 + .faraddr $800004 + .faraddr $800005 + .faraddr $800006 + .faraddr $800007 + .faraddr $800008 + .faraddr $800009 + .faraddr $80000a + .faraddr $80000b + .faraddr $80000c + .faraddr $80000d + .faraddr $80000e + .faraddr $80000f + .faraddr $9fffe1 + .faraddr $9fffe2 + .faraddr $9fffe3 + .faraddr $9fffe4 + .faraddr $9fffe5 + .faraddr $9fffe6 + .faraddr $9fffe7 + .faraddr $9fffe8 + .faraddr $9fffe9 + .faraddr $9fffea + .faraddr $9fffeb + .faraddr $9fffec + .faraddr $9fffed + .faraddr $9fffee + .faraddr $9fffef + .faraddr $9ffff0 + .faraddr $9ffff1 + .faraddr $9ffff2 + .faraddr $9ffff3 + .faraddr $9ffff4 + .faraddr $9ffff5 + .faraddr $9ffff6 + .faraddr $9ffff7 + .faraddr $9ffff8 + .faraddr $9ffff9 + .faraddr $9ffffa + .faraddr $9ffffb + .faraddr $9ffffc + .faraddr $9ffffd + .faraddr $9ffffe + .faraddr $9fffff + .faraddr $a00000 + .faraddr $a00001 + .faraddr $a00002 + .faraddr $a00003 + .faraddr $a00004 + .faraddr $a00005 + .faraddr $a00006 + .faraddr $a00007 + .faraddr $a00008 + .faraddr $a00009 + .faraddr $a0000a + .faraddr $a0000b + .faraddr $a0000c + .faraddr $a0000d + .faraddr $a0000e + .faraddr $a0000f + .faraddr $ffffe1 + .faraddr $ffffe2 + .faraddr $ffffe3 + .faraddr $ffffe4 + .faraddr $ffffe5 + .faraddr $ffffe6 + .faraddr $ffffe7 + .faraddr $ffffe8 + .faraddr $ffffe9 + .faraddr $ffffea + .faraddr $ffffeb + .faraddr $ffffec + .faraddr $ffffed + .faraddr $ffffee + .faraddr $ffffef + .faraddr $fffff0 + .faraddr $fffff1 + .faraddr $fffff2 + .faraddr $fffff3 + .faraddr $fffff4 + .faraddr $fffff5 + .faraddr $fffff6 + .faraddr $fffff7 + .faraddr $fffff8 + .faraddr $fffff9 + .faraddr $fffffa + .faraddr $fffffb + .faraddr $fffffc + .faraddr $fffffd + .faraddr $fffffe + .faraddr $ffffff + + ; hex values, uppercase + .faraddr $0 + .faraddr $1 + .faraddr $2 + .faraddr $3 + .faraddr $4 + .faraddr $5 + .faraddr $6 + .faraddr $7 + .faraddr $8 + .faraddr $9 + .faraddr $A + .faraddr $B + .faraddr $C + .faraddr $D + .faraddr $E + .faraddr $F + .faraddr $10 + .faraddr $11 + .faraddr $12 + .faraddr $13 + .faraddr $70 + .faraddr $71 + .faraddr $72 + .faraddr $73 + .faraddr $74 + .faraddr $75 + .faraddr $76 + .faraddr $77 + .faraddr $78 + .faraddr $79 + .faraddr $7A + .faraddr $7B + .faraddr $7C + .faraddr $7D + .faraddr $7E + .faraddr $7F + .faraddr $80 + .faraddr $81 + .faraddr $82 + .faraddr $83 + .faraddr $84 + .faraddr $85 + .faraddr $86 + .faraddr $F0 + .faraddr $F1 + .faraddr $F2 + .faraddr $F3 + .faraddr $F4 + .faraddr $F5 + .faraddr $F6 + .faraddr $F7 + .faraddr $F8 + .faraddr $F9 + .faraddr $FA + .faraddr $FB + .faraddr $FC + .faraddr $FD + .faraddr $FE + .faraddr $FF + .faraddr $100 + .faraddr $101 + .faraddr $102 + .faraddr $103 + .faraddr $FD2 + .faraddr $FD3 + .faraddr $FD4 + .faraddr $FD5 + .faraddr $FD6 + .faraddr $FD7 + .faraddr $FD8 + .faraddr $FD9 + .faraddr $FDA + .faraddr $FDB + .faraddr $FDC + .faraddr $FDD + .faraddr $FDE + .faraddr $FDF + .faraddr $FE0 + .faraddr $FE1 + .faraddr $FE2 + .faraddr $FE3 + .faraddr $FE4 + .faraddr $FE5 + .faraddr $FE6 + .faraddr $FE7 + .faraddr $FE8 + .faraddr $FE9 + .faraddr $FEA + .faraddr $FEB + .faraddr $FEC + .faraddr $FED + .faraddr $FEE + .faraddr $FEF + .faraddr $FF0 + .faraddr $FF1 + .faraddr $FF2 + .faraddr $FF3 + .faraddr $FF4 + .faraddr $FF5 + .faraddr $FF6 + .faraddr $FF7 + .faraddr $FF8 + .faraddr $FF9 + .faraddr $FFA + .faraddr $FFB + .faraddr $FFC + .faraddr $FFD + .faraddr $FFE + .faraddr $FFF + .faraddr $1000 + .faraddr $1001 + .faraddr $1002 + .faraddr $1003 + .faraddr $1004 + .faraddr $1005 + .faraddr $1006 + .faraddr $1007 + .faraddr $1008 + .faraddr $7FF0 + .faraddr $7FF1 + .faraddr $7FF2 + .faraddr $7FF3 + .faraddr $7FF4 + .faraddr $7FF5 + .faraddr $7FF6 + .faraddr $7FF7 + .faraddr $7FF8 + .faraddr $7FF9 + .faraddr $7FFA + .faraddr $7FFB + .faraddr $7FFC + .faraddr $7FFD + .faraddr $7FFE + .faraddr $7FFF + .faraddr $8000 + .faraddr $8001 + .faraddr $8002 + .faraddr $8003 + .faraddr $8004 + .faraddr $8005 + .faraddr $8006 + .faraddr $8007 + .faraddr $8008 + .faraddr $8009 + .faraddr $800A + .faraddr $800B + .faraddr $9FE1 + .faraddr $9FE2 + .faraddr $9FE3 + .faraddr $9FE4 + .faraddr $9FE5 + .faraddr $9FE6 + .faraddr $9FE7 + .faraddr $9FE8 + .faraddr $9FE9 + .faraddr $9FEA + .faraddr $9FEB + .faraddr $9FEC + .faraddr $9FED + .faraddr $9FEE + .faraddr $9FEF + .faraddr $9FF0 + .faraddr $9FF1 + .faraddr $9FF2 + .faraddr $9FF3 + .faraddr $9FF4 + .faraddr $9FF5 + .faraddr $9FF6 + .faraddr $9FF7 + .faraddr $9FF8 + .faraddr $9FF9 + .faraddr $9FFA + .faraddr $9FFB + .faraddr $9FFC + .faraddr $9FFD + .faraddr $9FFE + .faraddr $9FFF + .faraddr $A000 + .faraddr $A001 + .faraddr $A002 + .faraddr $A003 + .faraddr $A004 + .faraddr $A005 + .faraddr $A006 + .faraddr $A007 + .faraddr $A008 + .faraddr $A009 + .faraddr $A00A + .faraddr $A00B + .faraddr $A00C + .faraddr $A00D + .faraddr $A00E + .faraddr $A00F + .faraddr $AFE1 + .faraddr $AFE2 + .faraddr $AFE3 + .faraddr $AFE4 + .faraddr $AFE5 + .faraddr $AFE6 + .faraddr $AFE7 + .faraddr $AFE8 + .faraddr $AFE9 + .faraddr $AFEA + .faraddr $AFEB + .faraddr $AFEC + .faraddr $AFED + .faraddr $AFEE + .faraddr $AFEF + .faraddr $AFF0 + .faraddr $AFF1 + .faraddr $AFF2 + .faraddr $AFF3 + .faraddr $AFF4 + .faraddr $AFF5 + .faraddr $AFF6 + .faraddr $AFF7 + .faraddr $AFF8 + .faraddr $AFF9 + .faraddr $AFFA + .faraddr $AFFB + .faraddr $AFFC + .faraddr $AFFD + .faraddr $AFFE + .faraddr $AFFF + .faraddr $B000 + .faraddr $B001 + .faraddr $B002 + .faraddr $B003 + .faraddr $B004 + .faraddr $B005 + .faraddr $B006 + .faraddr $B007 + .faraddr $B008 + .faraddr $B009 + .faraddr $B00A + .faraddr $B00B + .faraddr $B00C + .faraddr $B00D + .faraddr $B00E + .faraddr $B00F + .faraddr $FFE1 + .faraddr $FFE2 + .faraddr $FFE3 + .faraddr $FFE4 + .faraddr $FFE5 + .faraddr $FFE6 + .faraddr $FFE7 + .faraddr $FFE8 + .faraddr $FFE9 + .faraddr $FFEA + .faraddr $FFEB + .faraddr $FFEC + .faraddr $FFED + .faraddr $FFEE + .faraddr $FFEF + .faraddr $FFF0 + .faraddr $FFF1 + .faraddr $FFF2 + .faraddr $FFF3 + .faraddr $FFF4 + .faraddr $FFF5 + .faraddr $FFF6 + .faraddr $FFF7 + .faraddr $FFF8 + .faraddr $FFF9 + .faraddr $FFFA + .faraddr $FFFB + .faraddr $FFFC + .faraddr $FFFD + .faraddr $FFFE + .faraddr $FFFF + .faraddr $10000 + .faraddr $10001 + .faraddr $10002 + .faraddr $10003 + .faraddr $10004 + .faraddr $10005 + .faraddr $10006 + .faraddr $10007 + .faraddr $10008 + .faraddr $10009 + .faraddr $1000A + .faraddr $1000B + .faraddr $1000C + .faraddr $1000D + .faraddr $1000E + .faraddr $1000F + .faraddr $10FFE1 + .faraddr $10FFE2 + .faraddr $10FFE3 + .faraddr $10FFE4 + .faraddr $10FFE5 + .faraddr $10FFE6 + .faraddr $10FFE7 + .faraddr $10FFE8 + .faraddr $10FFE9 + .faraddr $10FFEA + .faraddr $10FFEB + .faraddr $10FFEC + .faraddr $10FFED + .faraddr $10FFEE + .faraddr $10FFEF + .faraddr $10FFF0 + .faraddr $10FFF1 + .faraddr $10FFF2 + .faraddr $10FFF3 + .faraddr $10FFF4 + .faraddr $10FFF5 + .faraddr $10FFF6 + .faraddr $10FFF7 + .faraddr $10FFF8 + .faraddr $10FFF9 + .faraddr $10FFFA + .faraddr $10FFFB + .faraddr $10FFFC + .faraddr $10FFFD + .faraddr $10FFFE + .faraddr $10FFFF + .faraddr $110000 + .faraddr $110001 + .faraddr $110002 + .faraddr $110003 + .faraddr $110004 + .faraddr $110005 + .faraddr $110006 + .faraddr $110007 + .faraddr $110008 + .faraddr $110009 + .faraddr $11000A + .faraddr $11000B + .faraddr $11000C + .faraddr $11000D + .faraddr $11000E + .faraddr $11000F + .faraddr $20FFE1 + .faraddr $20FFE2 + .faraddr $20FFE3 + .faraddr $20FFE4 + .faraddr $20FFE5 + .faraddr $20FFE6 + .faraddr $20FFE7 + .faraddr $20FFE8 + .faraddr $20FFE9 + .faraddr $20FFEA + .faraddr $20FFEB + .faraddr $20FFEC + .faraddr $20FFED + .faraddr $20FFEE + .faraddr $20FFEF + .faraddr $20FFF0 + .faraddr $20FFF1 + .faraddr $20FFF2 + .faraddr $20FFF3 + .faraddr $20FFF4 + .faraddr $20FFF5 + .faraddr $20FFF6 + .faraddr $20FFF7 + .faraddr $20FFF8 + .faraddr $20FFF9 + .faraddr $20FFFA + .faraddr $20FFFB + .faraddr $20FFFC + .faraddr $20FFFD + .faraddr $20FFFE + .faraddr $20FFFF + .faraddr $210000 + .faraddr $210001 + .faraddr $210002 + .faraddr $210003 + .faraddr $210004 + .faraddr $210005 + .faraddr $210006 + .faraddr $210007 + .faraddr $210008 + .faraddr $210009 + .faraddr $21000A + .faraddr $21000B + .faraddr $21000C + .faraddr $21000D + .faraddr $21000E + .faraddr $21000F + .faraddr $7FFFE1 + .faraddr $7FFFE2 + .faraddr $7FFFE3 + .faraddr $7FFFE4 + .faraddr $7FFFE5 + .faraddr $7FFFE6 + .faraddr $7FFFE7 + .faraddr $7FFFE8 + .faraddr $7FFFE9 + .faraddr $7FFFEA + .faraddr $7FFFEB + .faraddr $7FFFEC + .faraddr $7FFFED + .faraddr $7FFFEE + .faraddr $7FFFEF + .faraddr $7FFFF0 + .faraddr $7FFFF1 + .faraddr $7FFFF2 + .faraddr $7FFFF3 + .faraddr $7FFFF4 + .faraddr $7FFFF5 + .faraddr $7FFFF6 + .faraddr $7FFFF7 + .faraddr $7FFFF8 + .faraddr $7FFFF9 + .faraddr $7FFFFA + .faraddr $7FFFFB + .faraddr $7FFFFC + .faraddr $7FFFFD + .faraddr $7FFFFE + .faraddr $7FFFFF + .faraddr $800000 + .faraddr $800001 + .faraddr $800002 + .faraddr $800003 + .faraddr $800004 + .faraddr $800005 + .faraddr $800006 + .faraddr $800007 + .faraddr $800008 + .faraddr $800009 + .faraddr $80000A + .faraddr $80000B + .faraddr $80000C + .faraddr $80000D + .faraddr $80000E + .faraddr $80000F + .faraddr $9FFFE1 + .faraddr $9FFFE2 + .faraddr $9FFFE3 + .faraddr $9FFFE4 + .faraddr $9FFFE5 + .faraddr $9FFFE6 + .faraddr $9FFFE7 + .faraddr $9FFFE8 + .faraddr $9FFFE9 + .faraddr $9FFFEA + .faraddr $9FFFEB + .faraddr $9FFFEC + .faraddr $9FFFED + .faraddr $9FFFEE + .faraddr $9FFFEF + .faraddr $9FFFF0 + .faraddr $9FFFF1 + .faraddr $9FFFF2 + .faraddr $9FFFF3 + .faraddr $9FFFF4 + .faraddr $9FFFF5 + .faraddr $9FFFF6 + .faraddr $9FFFF7 + .faraddr $9FFFF8 + .faraddr $9FFFF9 + .faraddr $9FFFFA + .faraddr $9FFFFB + .faraddr $9FFFFC + .faraddr $9FFFFD + .faraddr $9FFFFE + .faraddr $9FFFFF + .faraddr $A00000 + .faraddr $A00001 + .faraddr $A00002 + .faraddr $A00003 + .faraddr $A00004 + .faraddr $A00005 + .faraddr $A00006 + .faraddr $A00007 + .faraddr $A00008 + .faraddr $A00009 + .faraddr $A0000A + .faraddr $A0000B + .faraddr $A0000C + .faraddr $A0000D + .faraddr $A0000E + .faraddr $A0000F + .faraddr $FFFFE1 + .faraddr $FFFFE2 + .faraddr $FFFFE3 + .faraddr $FFFFE4 + .faraddr $FFFFE5 + .faraddr $FFFFE6 + .faraddr $FFFFE7 + .faraddr $FFFFE8 + .faraddr $FFFFE9 + .faraddr $FFFFEA + .faraddr $FFFFEB + .faraddr $FFFFEC + .faraddr $FFFFED + .faraddr $FFFFEE + .faraddr $FFFFEF + .faraddr $FFFFF0 + .faraddr $FFFFF1 + .faraddr $FFFFF2 + .faraddr $FFFFF3 + .faraddr $FFFFF4 + .faraddr $FFFFF5 + .faraddr $FFFFF6 + .faraddr $FFFFF7 + .faraddr $FFFFF8 + .faraddr $FFFFF9 + .faraddr $FFFFFA + .faraddr $FFFFFB + .faraddr $FFFFFC + .faraddr $FFFFFD + .faraddr $FFFFFE + .faraddr $FFFFFF + + ; 8-digit hex values + .faraddr $00000000 + .faraddr $00000001 + .faraddr $00000002 + .faraddr $00000003 + .faraddr $00000004 + .faraddr $00000005 + .faraddr $00000006 + .faraddr $00000007 + .faraddr $00000008 + .faraddr $00000009 + .faraddr $0000000a + .faraddr $0000000b + .faraddr $0000000c + .faraddr $0000000d + .faraddr $0000000e + .faraddr $0000000f + .faraddr $00000010 + .faraddr $00000011 + .faraddr $00000012 + .faraddr $00000013 + .faraddr $00000070 + .faraddr $00000071 + .faraddr $00000072 + .faraddr $00000073 + .faraddr $00000074 + .faraddr $00000075 + .faraddr $00000076 + .faraddr $00000077 + .faraddr $00000078 + .faraddr $00000079 + .faraddr $0000007a + .faraddr $0000007b + .faraddr $0000007c + .faraddr $0000007d + .faraddr $0000007e + .faraddr $0000007f + .faraddr $00000080 + .faraddr $00000081 + .faraddr $00000082 + .faraddr $00000083 + .faraddr $00000084 + .faraddr $00000085 + .faraddr $00000086 + .faraddr $000000f0 + .faraddr $000000f1 + .faraddr $000000f2 + .faraddr $000000f3 + .faraddr $000000f4 + .faraddr $000000f5 + .faraddr $000000f6 + .faraddr $000000f7 + .faraddr $000000f8 + .faraddr $000000f9 + .faraddr $000000fa + .faraddr $000000fb + .faraddr $000000fc + .faraddr $000000fd + .faraddr $000000fe + .faraddr $000000ff + .faraddr $00000100 + .faraddr $00000101 + .faraddr $00000102 + .faraddr $00000103 + .faraddr $00000fd2 + .faraddr $00000fd3 + .faraddr $00000fd4 + .faraddr $00000fd5 + .faraddr $00000fd6 + .faraddr $00000fd7 + .faraddr $00000fd8 + .faraddr $00000fd9 + .faraddr $00000fda + .faraddr $00000fdb + .faraddr $00000fdc + .faraddr $00000fdd + .faraddr $00000fde + .faraddr $00000fdf + .faraddr $00000fe0 + .faraddr $00000fe1 + .faraddr $00000fe2 + .faraddr $00000fe3 + .faraddr $00000fe4 + .faraddr $00000fe5 + .faraddr $00000fe6 + .faraddr $00000fe7 + .faraddr $00000fe8 + .faraddr $00000fe9 + .faraddr $00000fea + .faraddr $00000feb + .faraddr $00000fec + .faraddr $00000fed + .faraddr $00000fee + .faraddr $00000fef + .faraddr $00000ff0 + .faraddr $00000ff1 + .faraddr $00000ff2 + .faraddr $00000ff3 + .faraddr $00000ff4 + .faraddr $00000ff5 + .faraddr $00000ff6 + .faraddr $00000ff7 + .faraddr $00000ff8 + .faraddr $00000ff9 + .faraddr $00000ffa + .faraddr $00000ffb + .faraddr $00000ffc + .faraddr $00000ffd + .faraddr $00000ffe + .faraddr $00000fff + .faraddr $00001000 + .faraddr $00001001 + .faraddr $00001002 + .faraddr $00001003 + .faraddr $00001004 + .faraddr $00001005 + .faraddr $00001006 + .faraddr $00001007 + .faraddr $00001008 + .faraddr $00007ff0 + .faraddr $00007ff1 + .faraddr $00007ff2 + .faraddr $00007ff3 + .faraddr $00007ff4 + .faraddr $00007ff5 + .faraddr $00007ff6 + .faraddr $00007ff7 + .faraddr $00007ff8 + .faraddr $00007ff9 + .faraddr $00007ffa + .faraddr $00007ffb + .faraddr $00007ffc + .faraddr $00007ffd + .faraddr $00007ffe + .faraddr $00007fff + .faraddr $00008000 + .faraddr $00008001 + .faraddr $00008002 + .faraddr $00008003 + .faraddr $00008004 + .faraddr $00008005 + .faraddr $00008006 + .faraddr $00008007 + .faraddr $00008008 + .faraddr $00008009 + .faraddr $0000800a + .faraddr $0000800b + .faraddr $00009fe1 + .faraddr $00009fe2 + .faraddr $00009fe3 + .faraddr $00009fe4 + .faraddr $00009fe5 + .faraddr $00009fe6 + .faraddr $00009fe7 + .faraddr $00009fe8 + .faraddr $00009fe9 + .faraddr $00009fea + .faraddr $00009feb + .faraddr $00009fec + .faraddr $00009fed + .faraddr $00009fee + .faraddr $00009fef + .faraddr $00009ff0 + .faraddr $00009ff1 + .faraddr $00009ff2 + .faraddr $00009ff3 + .faraddr $00009ff4 + .faraddr $00009ff5 + .faraddr $00009ff6 + .faraddr $00009ff7 + .faraddr $00009ff8 + .faraddr $00009ff9 + .faraddr $00009ffa + .faraddr $00009ffb + .faraddr $00009ffc + .faraddr $00009ffd + .faraddr $00009ffe + .faraddr $00009fff + .faraddr $0000a000 + .faraddr $0000a001 + .faraddr $0000a002 + .faraddr $0000a003 + .faraddr $0000a004 + .faraddr $0000a005 + .faraddr $0000a006 + .faraddr $0000a007 + .faraddr $0000a008 + .faraddr $0000a009 + .faraddr $0000a00a + .faraddr $0000a00b + .faraddr $0000a00c + .faraddr $0000a00d + .faraddr $0000a00e + .faraddr $0000a00f + .faraddr $0000afe1 + .faraddr $0000afe2 + .faraddr $0000afe3 + .faraddr $0000afe4 + .faraddr $0000afe5 + .faraddr $0000afe6 + .faraddr $0000afe7 + .faraddr $0000afe8 + .faraddr $0000afe9 + .faraddr $0000afea + .faraddr $0000afeb + .faraddr $0000afec + .faraddr $0000afed + .faraddr $0000afee + .faraddr $0000afef + .faraddr $0000aff0 + .faraddr $0000aff1 + .faraddr $0000aff2 + .faraddr $0000aff3 + .faraddr $0000aff4 + .faraddr $0000aff5 + .faraddr $0000aff6 + .faraddr $0000aff7 + .faraddr $0000aff8 + .faraddr $0000aff9 + .faraddr $0000affa + .faraddr $0000affb + .faraddr $0000affc + .faraddr $0000affd + .faraddr $0000affe + .faraddr $0000afff + .faraddr $0000b000 + .faraddr $0000b001 + .faraddr $0000b002 + .faraddr $0000b003 + .faraddr $0000b004 + .faraddr $0000b005 + .faraddr $0000b006 + .faraddr $0000b007 + .faraddr $0000b008 + .faraddr $0000b009 + .faraddr $0000b00a + .faraddr $0000b00b + .faraddr $0000b00c + .faraddr $0000b00d + .faraddr $0000b00e + .faraddr $0000b00f + .faraddr $0000ffe1 + .faraddr $0000ffe2 + .faraddr $0000ffe3 + .faraddr $0000ffe4 + .faraddr $0000ffe5 + .faraddr $0000ffe6 + .faraddr $0000ffe7 + .faraddr $0000ffe8 + .faraddr $0000ffe9 + .faraddr $0000ffea + .faraddr $0000ffeb + .faraddr $0000ffec + .faraddr $0000ffed + .faraddr $0000ffee + .faraddr $0000ffef + .faraddr $0000fff0 + .faraddr $0000fff1 + .faraddr $0000fff2 + .faraddr $0000fff3 + .faraddr $0000fff4 + .faraddr $0000fff5 + .faraddr $0000fff6 + .faraddr $0000fff7 + .faraddr $0000fff8 + .faraddr $0000fff9 + .faraddr $0000fffa + .faraddr $0000fffb + .faraddr $0000fffc + .faraddr $0000fffd + .faraddr $0000fffe + .faraddr $0000ffff + .faraddr $00010000 + .faraddr $00010001 + .faraddr $00010002 + .faraddr $00010003 + .faraddr $00010004 + .faraddr $00010005 + .faraddr $00010006 + .faraddr $00010007 + .faraddr $00010008 + .faraddr $00010009 + .faraddr $0001000a + .faraddr $0001000b + .faraddr $0001000c + .faraddr $0001000d + .faraddr $0001000e + .faraddr $0001000f + .faraddr $0010ffe1 + .faraddr $0010ffe2 + .faraddr $0010ffe3 + .faraddr $0010ffe4 + .faraddr $0010ffe5 + .faraddr $0010ffe6 + .faraddr $0010ffe7 + .faraddr $0010ffe8 + .faraddr $0010ffe9 + .faraddr $0010ffea + .faraddr $0010ffeb + .faraddr $0010ffec + .faraddr $0010ffed + .faraddr $0010ffee + .faraddr $0010ffef + .faraddr $0010fff0 + .faraddr $0010fff1 + .faraddr $0010fff2 + .faraddr $0010fff3 + .faraddr $0010fff4 + .faraddr $0010fff5 + .faraddr $0010fff6 + .faraddr $0010fff7 + .faraddr $0010fff8 + .faraddr $0010fff9 + .faraddr $0010fffa + .faraddr $0010fffb + .faraddr $0010fffc + .faraddr $0010fffd + .faraddr $0010fffe + .faraddr $0010ffff + .faraddr $00110000 + .faraddr $00110001 + .faraddr $00110002 + .faraddr $00110003 + .faraddr $00110004 + .faraddr $00110005 + .faraddr $00110006 + .faraddr $00110007 + .faraddr $00110008 + .faraddr $00110009 + .faraddr $0011000a + .faraddr $0011000b + .faraddr $0011000c + .faraddr $0011000d + .faraddr $0011000e + .faraddr $0011000f + .faraddr $0020ffe1 + .faraddr $0020ffe2 + .faraddr $0020ffe3 + .faraddr $0020ffe4 + .faraddr $0020ffe5 + .faraddr $0020ffe6 + .faraddr $0020ffe7 + .faraddr $0020ffe8 + .faraddr $0020ffe9 + .faraddr $0020ffea + .faraddr $0020ffeb + .faraddr $0020ffec + .faraddr $0020ffed + .faraddr $0020ffee + .faraddr $0020ffef + .faraddr $0020fff0 + .faraddr $0020fff1 + .faraddr $0020fff2 + .faraddr $0020fff3 + .faraddr $0020fff4 + .faraddr $0020fff5 + .faraddr $0020fff6 + .faraddr $0020fff7 + .faraddr $0020fff8 + .faraddr $0020fff9 + .faraddr $0020fffa + .faraddr $0020fffb + .faraddr $0020fffc + .faraddr $0020fffd + .faraddr $0020fffe + .faraddr $0020ffff + .faraddr $00210000 + .faraddr $00210001 + .faraddr $00210002 + .faraddr $00210003 + .faraddr $00210004 + .faraddr $00210005 + .faraddr $00210006 + .faraddr $00210007 + .faraddr $00210008 + .faraddr $00210009 + .faraddr $0021000a + .faraddr $0021000b + .faraddr $0021000c + .faraddr $0021000d + .faraddr $0021000e + .faraddr $0021000f + .faraddr $007fffe1 + .faraddr $007fffe2 + .faraddr $007fffe3 + .faraddr $007fffe4 + .faraddr $007fffe5 + .faraddr $007fffe6 + .faraddr $007fffe7 + .faraddr $007fffe8 + .faraddr $007fffe9 + .faraddr $007fffea + .faraddr $007fffeb + .faraddr $007fffec + .faraddr $007fffed + .faraddr $007fffee + .faraddr $007fffef + .faraddr $007ffff0 + .faraddr $007ffff1 + .faraddr $007ffff2 + .faraddr $007ffff3 + .faraddr $007ffff4 + .faraddr $007ffff5 + .faraddr $007ffff6 + .faraddr $007ffff7 + .faraddr $007ffff8 + .faraddr $007ffff9 + .faraddr $007ffffa + .faraddr $007ffffb + .faraddr $007ffffc + .faraddr $007ffffd + .faraddr $007ffffe + .faraddr $007fffff + .faraddr $00800000 + .faraddr $00800001 + .faraddr $00800002 + .faraddr $00800003 + .faraddr $00800004 + .faraddr $00800005 + .faraddr $00800006 + .faraddr $00800007 + .faraddr $00800008 + .faraddr $00800009 + .faraddr $0080000a + .faraddr $0080000b + .faraddr $0080000c + .faraddr $0080000d + .faraddr $0080000e + .faraddr $0080000f + .faraddr $009fffe1 + .faraddr $009fffe2 + .faraddr $009fffe3 + .faraddr $009fffe4 + .faraddr $009fffe5 + .faraddr $009fffe6 + .faraddr $009fffe7 + .faraddr $009fffe8 + .faraddr $009fffe9 + .faraddr $009fffea + .faraddr $009fffeb + .faraddr $009fffec + .faraddr $009fffed + .faraddr $009fffee + .faraddr $009fffef + .faraddr $009ffff0 + .faraddr $009ffff1 + .faraddr $009ffff2 + .faraddr $009ffff3 + .faraddr $009ffff4 + .faraddr $009ffff5 + .faraddr $009ffff6 + .faraddr $009ffff7 + .faraddr $009ffff8 + .faraddr $009ffff9 + .faraddr $009ffffa + .faraddr $009ffffb + .faraddr $009ffffc + .faraddr $009ffffd + .faraddr $009ffffe + .faraddr $009fffff + .faraddr $00a00000 + .faraddr $00a00001 + .faraddr $00a00002 + .faraddr $00a00003 + .faraddr $00a00004 + .faraddr $00a00005 + .faraddr $00a00006 + .faraddr $00a00007 + .faraddr $00a00008 + .faraddr $00a00009 + .faraddr $00a0000a + .faraddr $00a0000b + .faraddr $00a0000c + .faraddr $00a0000d + .faraddr $00a0000e + .faraddr $00a0000f + .faraddr $00ffffe1 + .faraddr $00ffffe2 + .faraddr $00ffffe3 + .faraddr $00ffffe4 + .faraddr $00ffffe5 + .faraddr $00ffffe6 + .faraddr $00ffffe7 + .faraddr $00ffffe8 + .faraddr $00ffffe9 + .faraddr $00ffffea + .faraddr $00ffffeb + .faraddr $00ffffec + .faraddr $00ffffed + .faraddr $00ffffee + .faraddr $00ffffef + .faraddr $00fffff0 + .faraddr $00fffff1 + .faraddr $00fffff2 + .faraddr $00fffff3 + .faraddr $00fffff4 + .faraddr $00fffff5 + .faraddr $00fffff6 + .faraddr $00fffff7 + .faraddr $00fffff8 + .faraddr $00fffff9 + .faraddr $00fffffa + .faraddr $00fffffb + .faraddr $00fffffc + .faraddr $00fffffd + .faraddr $00fffffe + .faraddr $00ffffff + + ; 8-digit hex values, uppercase + .faraddr $00000000 + .faraddr $00000001 + .faraddr $00000002 + .faraddr $00000003 + .faraddr $00000004 + .faraddr $00000005 + .faraddr $00000006 + .faraddr $00000007 + .faraddr $00000008 + .faraddr $00000009 + .faraddr $0000000A + .faraddr $0000000B + .faraddr $0000000C + .faraddr $0000000D + .faraddr $0000000E + .faraddr $0000000F + .faraddr $00000010 + .faraddr $00000011 + .faraddr $00000012 + .faraddr $00000013 + .faraddr $00000070 + .faraddr $00000071 + .faraddr $00000072 + .faraddr $00000073 + .faraddr $00000074 + .faraddr $00000075 + .faraddr $00000076 + .faraddr $00000077 + .faraddr $00000078 + .faraddr $00000079 + .faraddr $0000007A + .faraddr $0000007B + .faraddr $0000007C + .faraddr $0000007D + .faraddr $0000007E + .faraddr $0000007F + .faraddr $00000080 + .faraddr $00000081 + .faraddr $00000082 + .faraddr $00000083 + .faraddr $00000084 + .faraddr $00000085 + .faraddr $00000086 + .faraddr $000000F0 + .faraddr $000000F1 + .faraddr $000000F2 + .faraddr $000000F3 + .faraddr $000000F4 + .faraddr $000000F5 + .faraddr $000000F6 + .faraddr $000000F7 + .faraddr $000000F8 + .faraddr $000000F9 + .faraddr $000000FA + .faraddr $000000FB + .faraddr $000000FC + .faraddr $000000FD + .faraddr $000000FE + .faraddr $000000FF + .faraddr $00000100 + .faraddr $00000101 + .faraddr $00000102 + .faraddr $00000103 + .faraddr $00000FD2 + .faraddr $00000FD3 + .faraddr $00000FD4 + .faraddr $00000FD5 + .faraddr $00000FD6 + .faraddr $00000FD7 + .faraddr $00000FD8 + .faraddr $00000FD9 + .faraddr $00000FDA + .faraddr $00000FDB + .faraddr $00000FDC + .faraddr $00000FDD + .faraddr $00000FDE + .faraddr $00000FDF + .faraddr $00000FE0 + .faraddr $00000FE1 + .faraddr $00000FE2 + .faraddr $00000FE3 + .faraddr $00000FE4 + .faraddr $00000FE5 + .faraddr $00000FE6 + .faraddr $00000FE7 + .faraddr $00000FE8 + .faraddr $00000FE9 + .faraddr $00000FEA + .faraddr $00000FEB + .faraddr $00000FEC + .faraddr $00000FED + .faraddr $00000FEE + .faraddr $00000FEF + .faraddr $00000FF0 + .faraddr $00000FF1 + .faraddr $00000FF2 + .faraddr $00000FF3 + .faraddr $00000FF4 + .faraddr $00000FF5 + .faraddr $00000FF6 + .faraddr $00000FF7 + .faraddr $00000FF8 + .faraddr $00000FF9 + .faraddr $00000FFA + .faraddr $00000FFB + .faraddr $00000FFC + .faraddr $00000FFD + .faraddr $00000FFE + .faraddr $00000FFF + .faraddr $00001000 + .faraddr $00001001 + .faraddr $00001002 + .faraddr $00001003 + .faraddr $00001004 + .faraddr $00001005 + .faraddr $00001006 + .faraddr $00001007 + .faraddr $00001008 + .faraddr $00007FF0 + .faraddr $00007FF1 + .faraddr $00007FF2 + .faraddr $00007FF3 + .faraddr $00007FF4 + .faraddr $00007FF5 + .faraddr $00007FF6 + .faraddr $00007FF7 + .faraddr $00007FF8 + .faraddr $00007FF9 + .faraddr $00007FFA + .faraddr $00007FFB + .faraddr $00007FFC + .faraddr $00007FFD + .faraddr $00007FFE + .faraddr $00007FFF + .faraddr $00008000 + .faraddr $00008001 + .faraddr $00008002 + .faraddr $00008003 + .faraddr $00008004 + .faraddr $00008005 + .faraddr $00008006 + .faraddr $00008007 + .faraddr $00008008 + .faraddr $00008009 + .faraddr $0000800A + .faraddr $0000800B + .faraddr $00009FE1 + .faraddr $00009FE2 + .faraddr $00009FE3 + .faraddr $00009FE4 + .faraddr $00009FE5 + .faraddr $00009FE6 + .faraddr $00009FE7 + .faraddr $00009FE8 + .faraddr $00009FE9 + .faraddr $00009FEA + .faraddr $00009FEB + .faraddr $00009FEC + .faraddr $00009FED + .faraddr $00009FEE + .faraddr $00009FEF + .faraddr $00009FF0 + .faraddr $00009FF1 + .faraddr $00009FF2 + .faraddr $00009FF3 + .faraddr $00009FF4 + .faraddr $00009FF5 + .faraddr $00009FF6 + .faraddr $00009FF7 + .faraddr $00009FF8 + .faraddr $00009FF9 + .faraddr $00009FFA + .faraddr $00009FFB + .faraddr $00009FFC + .faraddr $00009FFD + .faraddr $00009FFE + .faraddr $00009FFF + .faraddr $0000A000 + .faraddr $0000A001 + .faraddr $0000A002 + .faraddr $0000A003 + .faraddr $0000A004 + .faraddr $0000A005 + .faraddr $0000A006 + .faraddr $0000A007 + .faraddr $0000A008 + .faraddr $0000A009 + .faraddr $0000A00A + .faraddr $0000A00B + .faraddr $0000A00C + .faraddr $0000A00D + .faraddr $0000A00E + .faraddr $0000A00F + .faraddr $0000AFE1 + .faraddr $0000AFE2 + .faraddr $0000AFE3 + .faraddr $0000AFE4 + .faraddr $0000AFE5 + .faraddr $0000AFE6 + .faraddr $0000AFE7 + .faraddr $0000AFE8 + .faraddr $0000AFE9 + .faraddr $0000AFEA + .faraddr $0000AFEB + .faraddr $0000AFEC + .faraddr $0000AFED + .faraddr $0000AFEE + .faraddr $0000AFEF + .faraddr $0000AFF0 + .faraddr $0000AFF1 + .faraddr $0000AFF2 + .faraddr $0000AFF3 + .faraddr $0000AFF4 + .faraddr $0000AFF5 + .faraddr $0000AFF6 + .faraddr $0000AFF7 + .faraddr $0000AFF8 + .faraddr $0000AFF9 + .faraddr $0000AFFA + .faraddr $0000AFFB + .faraddr $0000AFFC + .faraddr $0000AFFD + .faraddr $0000AFFE + .faraddr $0000AFFF + .faraddr $0000B000 + .faraddr $0000B001 + .faraddr $0000B002 + .faraddr $0000B003 + .faraddr $0000B004 + .faraddr $0000B005 + .faraddr $0000B006 + .faraddr $0000B007 + .faraddr $0000B008 + .faraddr $0000B009 + .faraddr $0000B00A + .faraddr $0000B00B + .faraddr $0000B00C + .faraddr $0000B00D + .faraddr $0000B00E + .faraddr $0000B00F + .faraddr $0000FFE1 + .faraddr $0000FFE2 + .faraddr $0000FFE3 + .faraddr $0000FFE4 + .faraddr $0000FFE5 + .faraddr $0000FFE6 + .faraddr $0000FFE7 + .faraddr $0000FFE8 + .faraddr $0000FFE9 + .faraddr $0000FFEA + .faraddr $0000FFEB + .faraddr $0000FFEC + .faraddr $0000FFED + .faraddr $0000FFEE + .faraddr $0000FFEF + .faraddr $0000FFF0 + .faraddr $0000FFF1 + .faraddr $0000FFF2 + .faraddr $0000FFF3 + .faraddr $0000FFF4 + .faraddr $0000FFF5 + .faraddr $0000FFF6 + .faraddr $0000FFF7 + .faraddr $0000FFF8 + .faraddr $0000FFF9 + .faraddr $0000FFFA + .faraddr $0000FFFB + .faraddr $0000FFFC + .faraddr $0000FFFD + .faraddr $0000FFFE + .faraddr $0000FFFF + .faraddr $00010000 + .faraddr $00010001 + .faraddr $00010002 + .faraddr $00010003 + .faraddr $00010004 + .faraddr $00010005 + .faraddr $00010006 + .faraddr $00010007 + .faraddr $00010008 + .faraddr $00010009 + .faraddr $0001000A + .faraddr $0001000B + .faraddr $0001000C + .faraddr $0001000D + .faraddr $0001000E + .faraddr $0001000F + .faraddr $0010FFE1 + .faraddr $0010FFE2 + .faraddr $0010FFE3 + .faraddr $0010FFE4 + .faraddr $0010FFE5 + .faraddr $0010FFE6 + .faraddr $0010FFE7 + .faraddr $0010FFE8 + .faraddr $0010FFE9 + .faraddr $0010FFEA + .faraddr $0010FFEB + .faraddr $0010FFEC + .faraddr $0010FFED + .faraddr $0010FFEE + .faraddr $0010FFEF + .faraddr $0010FFF0 + .faraddr $0010FFF1 + .faraddr $0010FFF2 + .faraddr $0010FFF3 + .faraddr $0010FFF4 + .faraddr $0010FFF5 + .faraddr $0010FFF6 + .faraddr $0010FFF7 + .faraddr $0010FFF8 + .faraddr $0010FFF9 + .faraddr $0010FFFA + .faraddr $0010FFFB + .faraddr $0010FFFC + .faraddr $0010FFFD + .faraddr $0010FFFE + .faraddr $0010FFFF + .faraddr $00110000 + .faraddr $00110001 + .faraddr $00110002 + .faraddr $00110003 + .faraddr $00110004 + .faraddr $00110005 + .faraddr $00110006 + .faraddr $00110007 + .faraddr $00110008 + .faraddr $00110009 + .faraddr $0011000A + .faraddr $0011000B + .faraddr $0011000C + .faraddr $0011000D + .faraddr $0011000E + .faraddr $0011000F + .faraddr $0020FFE1 + .faraddr $0020FFE2 + .faraddr $0020FFE3 + .faraddr $0020FFE4 + .faraddr $0020FFE5 + .faraddr $0020FFE6 + .faraddr $0020FFE7 + .faraddr $0020FFE8 + .faraddr $0020FFE9 + .faraddr $0020FFEA + .faraddr $0020FFEB + .faraddr $0020FFEC + .faraddr $0020FFED + .faraddr $0020FFEE + .faraddr $0020FFEF + .faraddr $0020FFF0 + .faraddr $0020FFF1 + .faraddr $0020FFF2 + .faraddr $0020FFF3 + .faraddr $0020FFF4 + .faraddr $0020FFF5 + .faraddr $0020FFF6 + .faraddr $0020FFF7 + .faraddr $0020FFF8 + .faraddr $0020FFF9 + .faraddr $0020FFFA + .faraddr $0020FFFB + .faraddr $0020FFFC + .faraddr $0020FFFD + .faraddr $0020FFFE + .faraddr $0020FFFF + .faraddr $00210000 + .faraddr $00210001 + .faraddr $00210002 + .faraddr $00210003 + .faraddr $00210004 + .faraddr $00210005 + .faraddr $00210006 + .faraddr $00210007 + .faraddr $00210008 + .faraddr $00210009 + .faraddr $0021000A + .faraddr $0021000B + .faraddr $0021000C + .faraddr $0021000D + .faraddr $0021000E + .faraddr $0021000F + .faraddr $007FFFE1 + .faraddr $007FFFE2 + .faraddr $007FFFE3 + .faraddr $007FFFE4 + .faraddr $007FFFE5 + .faraddr $007FFFE6 + .faraddr $007FFFE7 + .faraddr $007FFFE8 + .faraddr $007FFFE9 + .faraddr $007FFFEA + .faraddr $007FFFEB + .faraddr $007FFFEC + .faraddr $007FFFED + .faraddr $007FFFEE + .faraddr $007FFFEF + .faraddr $007FFFF0 + .faraddr $007FFFF1 + .faraddr $007FFFF2 + .faraddr $007FFFF3 + .faraddr $007FFFF4 + .faraddr $007FFFF5 + .faraddr $007FFFF6 + .faraddr $007FFFF7 + .faraddr $007FFFF8 + .faraddr $007FFFF9 + .faraddr $007FFFFA + .faraddr $007FFFFB + .faraddr $007FFFFC + .faraddr $007FFFFD + .faraddr $007FFFFE + .faraddr $007FFFFF + .faraddr $00800000 + .faraddr $00800001 + .faraddr $00800002 + .faraddr $00800003 + .faraddr $00800004 + .faraddr $00800005 + .faraddr $00800006 + .faraddr $00800007 + .faraddr $00800008 + .faraddr $00800009 + .faraddr $0080000A + .faraddr $0080000B + .faraddr $0080000C + .faraddr $0080000D + .faraddr $0080000E + .faraddr $0080000F + .faraddr $009FFFE1 + .faraddr $009FFFE2 + .faraddr $009FFFE3 + .faraddr $009FFFE4 + .faraddr $009FFFE5 + .faraddr $009FFFE6 + .faraddr $009FFFE7 + .faraddr $009FFFE8 + .faraddr $009FFFE9 + .faraddr $009FFFEA + .faraddr $009FFFEB + .faraddr $009FFFEC + .faraddr $009FFFED + .faraddr $009FFFEE + .faraddr $009FFFEF + .faraddr $009FFFF0 + .faraddr $009FFFF1 + .faraddr $009FFFF2 + .faraddr $009FFFF3 + .faraddr $009FFFF4 + .faraddr $009FFFF5 + .faraddr $009FFFF6 + .faraddr $009FFFF7 + .faraddr $009FFFF8 + .faraddr $009FFFF9 + .faraddr $009FFFFA + .faraddr $009FFFFB + .faraddr $009FFFFC + .faraddr $009FFFFD + .faraddr $009FFFFE + .faraddr $009FFFFF + .faraddr $00A00000 + .faraddr $00A00001 + .faraddr $00A00002 + .faraddr $00A00003 + .faraddr $00A00004 + .faraddr $00A00005 + .faraddr $00A00006 + .faraddr $00A00007 + .faraddr $00A00008 + .faraddr $00A00009 + .faraddr $00A0000A + .faraddr $00A0000B + .faraddr $00A0000C + .faraddr $00A0000D + .faraddr $00A0000E + .faraddr $00A0000F + .faraddr $00FFFFE1 + .faraddr $00FFFFE2 + .faraddr $00FFFFE3 + .faraddr $00FFFFE4 + .faraddr $00FFFFE5 + .faraddr $00FFFFE6 + .faraddr $00FFFFE7 + .faraddr $00FFFFE8 + .faraddr $00FFFFE9 + .faraddr $00FFFFEA + .faraddr $00FFFFEB + .faraddr $00FFFFEC + .faraddr $00FFFFED + .faraddr $00FFFFEE + .faraddr $00FFFFEF + .faraddr $00FFFFF0 + .faraddr $00FFFFF1 + .faraddr $00FFFFF2 + .faraddr $00FFFFF3 + .faraddr $00FFFFF4 + .faraddr $00FFFFF5 + .faraddr $00FFFFF6 + .faraddr $00FFFFF7 + .faraddr $00FFFFF8 + .faraddr $00FFFFF9 + .faraddr $00FFFFFA + .faraddr $00FFFFFB + .faraddr $00FFFFFC + .faraddr $00FFFFFD + .faraddr $00FFFFFE + .faraddr $00FFFFFF + + ; alternative hex values + .faraddr 0h + .faraddr 1h + .faraddr 2h + .faraddr 3h + .faraddr 4h + .faraddr 5h + .faraddr 6h + .faraddr 7h + .faraddr 8h + .faraddr 9h + .faraddr 0ah + .faraddr 0bh + .faraddr 0ch + .faraddr 0dh + .faraddr 0eh + .faraddr 0fh + .faraddr 10h + .faraddr 11h + .faraddr 12h + .faraddr 13h + .faraddr 70h + .faraddr 71h + .faraddr 72h + .faraddr 73h + .faraddr 74h + .faraddr 75h + .faraddr 76h + .faraddr 77h + .faraddr 78h + .faraddr 79h + .faraddr 7ah + .faraddr 7bh + .faraddr 7ch + .faraddr 7dh + .faraddr 7eh + .faraddr 7fh + .faraddr 80h + .faraddr 81h + .faraddr 82h + .faraddr 83h + .faraddr 84h + .faraddr 85h + .faraddr 86h + .faraddr 0f0h + .faraddr 0f1h + .faraddr 0f2h + .faraddr 0f3h + .faraddr 0f4h + .faraddr 0f5h + .faraddr 0f6h + .faraddr 0f7h + .faraddr 0f8h + .faraddr 0f9h + .faraddr 0fah + .faraddr 0fbh + .faraddr 0fch + .faraddr 0fdh + .faraddr 0feh + .faraddr 0ffh + .faraddr 100h + .faraddr 101h + .faraddr 102h + .faraddr 103h + .faraddr 0fd2h + .faraddr 0fd3h + .faraddr 0fd4h + .faraddr 0fd5h + .faraddr 0fd6h + .faraddr 0fd7h + .faraddr 0fd8h + .faraddr 0fd9h + .faraddr 0fdah + .faraddr 0fdbh + .faraddr 0fdch + .faraddr 0fddh + .faraddr 0fdeh + .faraddr 0fdfh + .faraddr 0fe0h + .faraddr 0fe1h + .faraddr 0fe2h + .faraddr 0fe3h + .faraddr 0fe4h + .faraddr 0fe5h + .faraddr 0fe6h + .faraddr 0fe7h + .faraddr 0fe8h + .faraddr 0fe9h + .faraddr 0feah + .faraddr 0febh + .faraddr 0fech + .faraddr 0fedh + .faraddr 0feeh + .faraddr 0fefh + .faraddr 0ff0h + .faraddr 0ff1h + .faraddr 0ff2h + .faraddr 0ff3h + .faraddr 0ff4h + .faraddr 0ff5h + .faraddr 0ff6h + .faraddr 0ff7h + .faraddr 0ff8h + .faraddr 0ff9h + .faraddr 0ffah + .faraddr 0ffbh + .faraddr 0ffch + .faraddr 0ffdh + .faraddr 0ffeh + .faraddr 0fffh + .faraddr 1000h + .faraddr 1001h + .faraddr 1002h + .faraddr 1003h + .faraddr 1004h + .faraddr 1005h + .faraddr 1006h + .faraddr 1007h + .faraddr 1008h + .faraddr 7ff0h + .faraddr 7ff1h + .faraddr 7ff2h + .faraddr 7ff3h + .faraddr 7ff4h + .faraddr 7ff5h + .faraddr 7ff6h + .faraddr 7ff7h + .faraddr 7ff8h + .faraddr 7ff9h + .faraddr 7ffah + .faraddr 7ffbh + .faraddr 7ffch + .faraddr 7ffdh + .faraddr 7ffeh + .faraddr 7fffh + .faraddr 8000h + .faraddr 8001h + .faraddr 8002h + .faraddr 8003h + .faraddr 8004h + .faraddr 8005h + .faraddr 8006h + .faraddr 8007h + .faraddr 8008h + .faraddr 8009h + .faraddr 800ah + .faraddr 800bh + .faraddr 9fe1h + .faraddr 9fe2h + .faraddr 9fe3h + .faraddr 9fe4h + .faraddr 9fe5h + .faraddr 9fe6h + .faraddr 9fe7h + .faraddr 9fe8h + .faraddr 9fe9h + .faraddr 9feah + .faraddr 9febh + .faraddr 9fech + .faraddr 9fedh + .faraddr 9feeh + .faraddr 9fefh + .faraddr 9ff0h + .faraddr 9ff1h + .faraddr 9ff2h + .faraddr 9ff3h + .faraddr 9ff4h + .faraddr 9ff5h + .faraddr 9ff6h + .faraddr 9ff7h + .faraddr 9ff8h + .faraddr 9ff9h + .faraddr 9ffah + .faraddr 9ffbh + .faraddr 9ffch + .faraddr 9ffdh + .faraddr 9ffeh + .faraddr 9fffh + .faraddr 0a000h + .faraddr 0a001h + .faraddr 0a002h + .faraddr 0a003h + .faraddr 0a004h + .faraddr 0a005h + .faraddr 0a006h + .faraddr 0a007h + .faraddr 0a008h + .faraddr 0a009h + .faraddr 0a00ah + .faraddr 0a00bh + .faraddr 0a00ch + .faraddr 0a00dh + .faraddr 0a00eh + .faraddr 0a00fh + .faraddr 0afe1h + .faraddr 0afe2h + .faraddr 0afe3h + .faraddr 0afe4h + .faraddr 0afe5h + .faraddr 0afe6h + .faraddr 0afe7h + .faraddr 0afe8h + .faraddr 0afe9h + .faraddr 0afeah + .faraddr 0afebh + .faraddr 0afech + .faraddr 0afedh + .faraddr 0afeeh + .faraddr 0afefh + .faraddr 0aff0h + .faraddr 0aff1h + .faraddr 0aff2h + .faraddr 0aff3h + .faraddr 0aff4h + .faraddr 0aff5h + .faraddr 0aff6h + .faraddr 0aff7h + .faraddr 0aff8h + .faraddr 0aff9h + .faraddr 0affah + .faraddr 0affbh + .faraddr 0affch + .faraddr 0affdh + .faraddr 0affeh + .faraddr 0afffh + .faraddr 0b000h + .faraddr 0b001h + .faraddr 0b002h + .faraddr 0b003h + .faraddr 0b004h + .faraddr 0b005h + .faraddr 0b006h + .faraddr 0b007h + .faraddr 0b008h + .faraddr 0b009h + .faraddr 0b00ah + .faraddr 0b00bh + .faraddr 0b00ch + .faraddr 0b00dh + .faraddr 0b00eh + .faraddr 0b00fh + .faraddr 0ffe1h + .faraddr 0ffe2h + .faraddr 0ffe3h + .faraddr 0ffe4h + .faraddr 0ffe5h + .faraddr 0ffe6h + .faraddr 0ffe7h + .faraddr 0ffe8h + .faraddr 0ffe9h + .faraddr 0ffeah + .faraddr 0ffebh + .faraddr 0ffech + .faraddr 0ffedh + .faraddr 0ffeeh + .faraddr 0ffefh + .faraddr 0fff0h + .faraddr 0fff1h + .faraddr 0fff2h + .faraddr 0fff3h + .faraddr 0fff4h + .faraddr 0fff5h + .faraddr 0fff6h + .faraddr 0fff7h + .faraddr 0fff8h + .faraddr 0fff9h + .faraddr 0fffah + .faraddr 0fffbh + .faraddr 0fffch + .faraddr 0fffdh + .faraddr 0fffeh + .faraddr 0ffffh + .faraddr 10000h + .faraddr 10001h + .faraddr 10002h + .faraddr 10003h + .faraddr 10004h + .faraddr 10005h + .faraddr 10006h + .faraddr 10007h + .faraddr 10008h + .faraddr 10009h + .faraddr 1000ah + .faraddr 1000bh + .faraddr 1000ch + .faraddr 1000dh + .faraddr 1000eh + .faraddr 1000fh + .faraddr 10ffe1h + .faraddr 10ffe2h + .faraddr 10ffe3h + .faraddr 10ffe4h + .faraddr 10ffe5h + .faraddr 10ffe6h + .faraddr 10ffe7h + .faraddr 10ffe8h + .faraddr 10ffe9h + .faraddr 10ffeah + .faraddr 10ffebh + .faraddr 10ffech + .faraddr 10ffedh + .faraddr 10ffeeh + .faraddr 10ffefh + .faraddr 10fff0h + .faraddr 10fff1h + .faraddr 10fff2h + .faraddr 10fff3h + .faraddr 10fff4h + .faraddr 10fff5h + .faraddr 10fff6h + .faraddr 10fff7h + .faraddr 10fff8h + .faraddr 10fff9h + .faraddr 10fffah + .faraddr 10fffbh + .faraddr 10fffch + .faraddr 10fffdh + .faraddr 10fffeh + .faraddr 10ffffh + .faraddr 110000h + .faraddr 110001h + .faraddr 110002h + .faraddr 110003h + .faraddr 110004h + .faraddr 110005h + .faraddr 110006h + .faraddr 110007h + .faraddr 110008h + .faraddr 110009h + .faraddr 11000ah + .faraddr 11000bh + .faraddr 11000ch + .faraddr 11000dh + .faraddr 11000eh + .faraddr 11000fh + .faraddr 20ffe1h + .faraddr 20ffe2h + .faraddr 20ffe3h + .faraddr 20ffe4h + .faraddr 20ffe5h + .faraddr 20ffe6h + .faraddr 20ffe7h + .faraddr 20ffe8h + .faraddr 20ffe9h + .faraddr 20ffeah + .faraddr 20ffebh + .faraddr 20ffech + .faraddr 20ffedh + .faraddr 20ffeeh + .faraddr 20ffefh + .faraddr 20fff0h + .faraddr 20fff1h + .faraddr 20fff2h + .faraddr 20fff3h + .faraddr 20fff4h + .faraddr 20fff5h + .faraddr 20fff6h + .faraddr 20fff7h + .faraddr 20fff8h + .faraddr 20fff9h + .faraddr 20fffah + .faraddr 20fffbh + .faraddr 20fffch + .faraddr 20fffdh + .faraddr 20fffeh + .faraddr 20ffffh + .faraddr 210000h + .faraddr 210001h + .faraddr 210002h + .faraddr 210003h + .faraddr 210004h + .faraddr 210005h + .faraddr 210006h + .faraddr 210007h + .faraddr 210008h + .faraddr 210009h + .faraddr 21000ah + .faraddr 21000bh + .faraddr 21000ch + .faraddr 21000dh + .faraddr 21000eh + .faraddr 21000fh + .faraddr 7fffe1h + .faraddr 7fffe2h + .faraddr 7fffe3h + .faraddr 7fffe4h + .faraddr 7fffe5h + .faraddr 7fffe6h + .faraddr 7fffe7h + .faraddr 7fffe8h + .faraddr 7fffe9h + .faraddr 7fffeah + .faraddr 7fffebh + .faraddr 7fffech + .faraddr 7fffedh + .faraddr 7fffeeh + .faraddr 7fffefh + .faraddr 7ffff0h + .faraddr 7ffff1h + .faraddr 7ffff2h + .faraddr 7ffff3h + .faraddr 7ffff4h + .faraddr 7ffff5h + .faraddr 7ffff6h + .faraddr 7ffff7h + .faraddr 7ffff8h + .faraddr 7ffff9h + .faraddr 7ffffah + .faraddr 7ffffbh + .faraddr 7ffffch + .faraddr 7ffffdh + .faraddr 7ffffeh + .faraddr 7fffffh + .faraddr 800000h + .faraddr 800001h + .faraddr 800002h + .faraddr 800003h + .faraddr 800004h + .faraddr 800005h + .faraddr 800006h + .faraddr 800007h + .faraddr 800008h + .faraddr 800009h + .faraddr 80000ah + .faraddr 80000bh + .faraddr 80000ch + .faraddr 80000dh + .faraddr 80000eh + .faraddr 80000fh + .faraddr 9fffe1h + .faraddr 9fffe2h + .faraddr 9fffe3h + .faraddr 9fffe4h + .faraddr 9fffe5h + .faraddr 9fffe6h + .faraddr 9fffe7h + .faraddr 9fffe8h + .faraddr 9fffe9h + .faraddr 9fffeah + .faraddr 9fffebh + .faraddr 9fffech + .faraddr 9fffedh + .faraddr 9fffeeh + .faraddr 9fffefh + .faraddr 9ffff0h + .faraddr 9ffff1h + .faraddr 9ffff2h + .faraddr 9ffff3h + .faraddr 9ffff4h + .faraddr 9ffff5h + .faraddr 9ffff6h + .faraddr 9ffff7h + .faraddr 9ffff8h + .faraddr 9ffff9h + .faraddr 9ffffah + .faraddr 9ffffbh + .faraddr 9ffffch + .faraddr 9ffffdh + .faraddr 9ffffeh + .faraddr 9fffffh + .faraddr 0a00000h + .faraddr 0a00001h + .faraddr 0a00002h + .faraddr 0a00003h + .faraddr 0a00004h + .faraddr 0a00005h + .faraddr 0a00006h + .faraddr 0a00007h + .faraddr 0a00008h + .faraddr 0a00009h + .faraddr 0a0000ah + .faraddr 0a0000bh + .faraddr 0a0000ch + .faraddr 0a0000dh + .faraddr 0a0000eh + .faraddr 0a0000fh + .faraddr 0ffffe1h + .faraddr 0ffffe2h + .faraddr 0ffffe3h + .faraddr 0ffffe4h + .faraddr 0ffffe5h + .faraddr 0ffffe6h + .faraddr 0ffffe7h + .faraddr 0ffffe8h + .faraddr 0ffffe9h + .faraddr 0ffffeah + .faraddr 0ffffebh + .faraddr 0ffffech + .faraddr 0ffffedh + .faraddr 0ffffeeh + .faraddr 0ffffefh + .faraddr 0fffff0h + .faraddr 0fffff1h + .faraddr 0fffff2h + .faraddr 0fffff3h + .faraddr 0fffff4h + .faraddr 0fffff5h + .faraddr 0fffff6h + .faraddr 0fffff7h + .faraddr 0fffff8h + .faraddr 0fffff9h + .faraddr 0fffffah + .faraddr 0fffffbh + .faraddr 0fffffch + .faraddr 0fffffdh + .faraddr 0fffffeh + .faraddr 0ffffffh + + ; alternative hex values, uppercase + .faraddr 0h + .faraddr 1h + .faraddr 2h + .faraddr 3h + .faraddr 4h + .faraddr 5h + .faraddr 6h + .faraddr 7h + .faraddr 8h + .faraddr 9h + .faraddr 0Ah + .faraddr 0Bh + .faraddr 0Ch + .faraddr 0Dh + .faraddr 0Eh + .faraddr 0Fh + .faraddr 10h + .faraddr 11h + .faraddr 12h + .faraddr 13h + .faraddr 70h + .faraddr 71h + .faraddr 72h + .faraddr 73h + .faraddr 74h + .faraddr 75h + .faraddr 76h + .faraddr 77h + .faraddr 78h + .faraddr 79h + .faraddr 7Ah + .faraddr 7Bh + .faraddr 7Ch + .faraddr 7Dh + .faraddr 7Eh + .faraddr 7Fh + .faraddr 80h + .faraddr 81h + .faraddr 82h + .faraddr 83h + .faraddr 84h + .faraddr 85h + .faraddr 86h + .faraddr 0F0h + .faraddr 0F1h + .faraddr 0F2h + .faraddr 0F3h + .faraddr 0F4h + .faraddr 0F5h + .faraddr 0F6h + .faraddr 0F7h + .faraddr 0F8h + .faraddr 0F9h + .faraddr 0FAh + .faraddr 0FBh + .faraddr 0FCh + .faraddr 0FDh + .faraddr 0FEh + .faraddr 0FFh + .faraddr 100h + .faraddr 101h + .faraddr 102h + .faraddr 103h + .faraddr 0FD2h + .faraddr 0FD3h + .faraddr 0FD4h + .faraddr 0FD5h + .faraddr 0FD6h + .faraddr 0FD7h + .faraddr 0FD8h + .faraddr 0FD9h + .faraddr 0FDAh + .faraddr 0FDBh + .faraddr 0FDCh + .faraddr 0FDDh + .faraddr 0FDEh + .faraddr 0FDFh + .faraddr 0FE0h + .faraddr 0FE1h + .faraddr 0FE2h + .faraddr 0FE3h + .faraddr 0FE4h + .faraddr 0FE5h + .faraddr 0FE6h + .faraddr 0FE7h + .faraddr 0FE8h + .faraddr 0FE9h + .faraddr 0FEAh + .faraddr 0FEBh + .faraddr 0FECh + .faraddr 0FEDh + .faraddr 0FEEh + .faraddr 0FEFh + .faraddr 0FF0h + .faraddr 0FF1h + .faraddr 0FF2h + .faraddr 0FF3h + .faraddr 0FF4h + .faraddr 0FF5h + .faraddr 0FF6h + .faraddr 0FF7h + .faraddr 0FF8h + .faraddr 0FF9h + .faraddr 0FFAh + .faraddr 0FFBh + .faraddr 0FFCh + .faraddr 0FFDh + .faraddr 0FFEh + .faraddr 0FFFh + .faraddr 1000h + .faraddr 1001h + .faraddr 1002h + .faraddr 1003h + .faraddr 1004h + .faraddr 1005h + .faraddr 1006h + .faraddr 1007h + .faraddr 1008h + .faraddr 7FF0h + .faraddr 7FF1h + .faraddr 7FF2h + .faraddr 7FF3h + .faraddr 7FF4h + .faraddr 7FF5h + .faraddr 7FF6h + .faraddr 7FF7h + .faraddr 7FF8h + .faraddr 7FF9h + .faraddr 7FFAh + .faraddr 7FFBh + .faraddr 7FFCh + .faraddr 7FFDh + .faraddr 7FFEh + .faraddr 7FFFh + .faraddr 8000h + .faraddr 8001h + .faraddr 8002h + .faraddr 8003h + .faraddr 8004h + .faraddr 8005h + .faraddr 8006h + .faraddr 8007h + .faraddr 8008h + .faraddr 8009h + .faraddr 800Ah + .faraddr 800Bh + .faraddr 9FE1h + .faraddr 9FE2h + .faraddr 9FE3h + .faraddr 9FE4h + .faraddr 9FE5h + .faraddr 9FE6h + .faraddr 9FE7h + .faraddr 9FE8h + .faraddr 9FE9h + .faraddr 9FEAh + .faraddr 9FEBh + .faraddr 9FECh + .faraddr 9FEDh + .faraddr 9FEEh + .faraddr 9FEFh + .faraddr 9FF0h + .faraddr 9FF1h + .faraddr 9FF2h + .faraddr 9FF3h + .faraddr 9FF4h + .faraddr 9FF5h + .faraddr 9FF6h + .faraddr 9FF7h + .faraddr 9FF8h + .faraddr 9FF9h + .faraddr 9FFAh + .faraddr 9FFBh + .faraddr 9FFCh + .faraddr 9FFDh + .faraddr 9FFEh + .faraddr 9FFFh + .faraddr 0A000h + .faraddr 0A001h + .faraddr 0A002h + .faraddr 0A003h + .faraddr 0A004h + .faraddr 0A005h + .faraddr 0A006h + .faraddr 0A007h + .faraddr 0A008h + .faraddr 0A009h + .faraddr 0A00Ah + .faraddr 0A00Bh + .faraddr 0A00Ch + .faraddr 0A00Dh + .faraddr 0A00Eh + .faraddr 0A00Fh + .faraddr 0AFE1h + .faraddr 0AFE2h + .faraddr 0AFE3h + .faraddr 0AFE4h + .faraddr 0AFE5h + .faraddr 0AFE6h + .faraddr 0AFE7h + .faraddr 0AFE8h + .faraddr 0AFE9h + .faraddr 0AFEAh + .faraddr 0AFEBh + .faraddr 0AFECh + .faraddr 0AFEDh + .faraddr 0AFEEh + .faraddr 0AFEFh + .faraddr 0AFF0h + .faraddr 0AFF1h + .faraddr 0AFF2h + .faraddr 0AFF3h + .faraddr 0AFF4h + .faraddr 0AFF5h + .faraddr 0AFF6h + .faraddr 0AFF7h + .faraddr 0AFF8h + .faraddr 0AFF9h + .faraddr 0AFFAh + .faraddr 0AFFBh + .faraddr 0AFFCh + .faraddr 0AFFDh + .faraddr 0AFFEh + .faraddr 0AFFFh + .faraddr 0B000h + .faraddr 0B001h + .faraddr 0B002h + .faraddr 0B003h + .faraddr 0B004h + .faraddr 0B005h + .faraddr 0B006h + .faraddr 0B007h + .faraddr 0B008h + .faraddr 0B009h + .faraddr 0B00Ah + .faraddr 0B00Bh + .faraddr 0B00Ch + .faraddr 0B00Dh + .faraddr 0B00Eh + .faraddr 0B00Fh + .faraddr 0FFE1h + .faraddr 0FFE2h + .faraddr 0FFE3h + .faraddr 0FFE4h + .faraddr 0FFE5h + .faraddr 0FFE6h + .faraddr 0FFE7h + .faraddr 0FFE8h + .faraddr 0FFE9h + .faraddr 0FFEAh + .faraddr 0FFEBh + .faraddr 0FFECh + .faraddr 0FFEDh + .faraddr 0FFEEh + .faraddr 0FFEFh + .faraddr 0FFF0h + .faraddr 0FFF1h + .faraddr 0FFF2h + .faraddr 0FFF3h + .faraddr 0FFF4h + .faraddr 0FFF5h + .faraddr 0FFF6h + .faraddr 0FFF7h + .faraddr 0FFF8h + .faraddr 0FFF9h + .faraddr 0FFFAh + .faraddr 0FFFBh + .faraddr 0FFFCh + .faraddr 0FFFDh + .faraddr 0FFFEh + .faraddr 0FFFFh + .faraddr 10000h + .faraddr 10001h + .faraddr 10002h + .faraddr 10003h + .faraddr 10004h + .faraddr 10005h + .faraddr 10006h + .faraddr 10007h + .faraddr 10008h + .faraddr 10009h + .faraddr 1000Ah + .faraddr 1000Bh + .faraddr 1000Ch + .faraddr 1000Dh + .faraddr 1000Eh + .faraddr 1000Fh + .faraddr 10FFE1h + .faraddr 10FFE2h + .faraddr 10FFE3h + .faraddr 10FFE4h + .faraddr 10FFE5h + .faraddr 10FFE6h + .faraddr 10FFE7h + .faraddr 10FFE8h + .faraddr 10FFE9h + .faraddr 10FFEAh + .faraddr 10FFEBh + .faraddr 10FFECh + .faraddr 10FFEDh + .faraddr 10FFEEh + .faraddr 10FFEFh + .faraddr 10FFF0h + .faraddr 10FFF1h + .faraddr 10FFF2h + .faraddr 10FFF3h + .faraddr 10FFF4h + .faraddr 10FFF5h + .faraddr 10FFF6h + .faraddr 10FFF7h + .faraddr 10FFF8h + .faraddr 10FFF9h + .faraddr 10FFFAh + .faraddr 10FFFBh + .faraddr 10FFFCh + .faraddr 10FFFDh + .faraddr 10FFFEh + .faraddr 10FFFFh + .faraddr 110000h + .faraddr 110001h + .faraddr 110002h + .faraddr 110003h + .faraddr 110004h + .faraddr 110005h + .faraddr 110006h + .faraddr 110007h + .faraddr 110008h + .faraddr 110009h + .faraddr 11000Ah + .faraddr 11000Bh + .faraddr 11000Ch + .faraddr 11000Dh + .faraddr 11000Eh + .faraddr 11000Fh + .faraddr 20FFE1h + .faraddr 20FFE2h + .faraddr 20FFE3h + .faraddr 20FFE4h + .faraddr 20FFE5h + .faraddr 20FFE6h + .faraddr 20FFE7h + .faraddr 20FFE8h + .faraddr 20FFE9h + .faraddr 20FFEAh + .faraddr 20FFEBh + .faraddr 20FFECh + .faraddr 20FFEDh + .faraddr 20FFEEh + .faraddr 20FFEFh + .faraddr 20FFF0h + .faraddr 20FFF1h + .faraddr 20FFF2h + .faraddr 20FFF3h + .faraddr 20FFF4h + .faraddr 20FFF5h + .faraddr 20FFF6h + .faraddr 20FFF7h + .faraddr 20FFF8h + .faraddr 20FFF9h + .faraddr 20FFFAh + .faraddr 20FFFBh + .faraddr 20FFFCh + .faraddr 20FFFDh + .faraddr 20FFFEh + .faraddr 20FFFFh + .faraddr 210000h + .faraddr 210001h + .faraddr 210002h + .faraddr 210003h + .faraddr 210004h + .faraddr 210005h + .faraddr 210006h + .faraddr 210007h + .faraddr 210008h + .faraddr 210009h + .faraddr 21000Ah + .faraddr 21000Bh + .faraddr 21000Ch + .faraddr 21000Dh + .faraddr 21000Eh + .faraddr 21000Fh + .faraddr 7FFFE1h + .faraddr 7FFFE2h + .faraddr 7FFFE3h + .faraddr 7FFFE4h + .faraddr 7FFFE5h + .faraddr 7FFFE6h + .faraddr 7FFFE7h + .faraddr 7FFFE8h + .faraddr 7FFFE9h + .faraddr 7FFFEAh + .faraddr 7FFFEBh + .faraddr 7FFFECh + .faraddr 7FFFEDh + .faraddr 7FFFEEh + .faraddr 7FFFEFh + .faraddr 7FFFF0h + .faraddr 7FFFF1h + .faraddr 7FFFF2h + .faraddr 7FFFF3h + .faraddr 7FFFF4h + .faraddr 7FFFF5h + .faraddr 7FFFF6h + .faraddr 7FFFF7h + .faraddr 7FFFF8h + .faraddr 7FFFF9h + .faraddr 7FFFFAh + .faraddr 7FFFFBh + .faraddr 7FFFFCh + .faraddr 7FFFFDh + .faraddr 7FFFFEh + .faraddr 7FFFFFh + .faraddr 800000h + .faraddr 800001h + .faraddr 800002h + .faraddr 800003h + .faraddr 800004h + .faraddr 800005h + .faraddr 800006h + .faraddr 800007h + .faraddr 800008h + .faraddr 800009h + .faraddr 80000Ah + .faraddr 80000Bh + .faraddr 80000Ch + .faraddr 80000Dh + .faraddr 80000Eh + .faraddr 80000Fh + .faraddr 9FFFE1h + .faraddr 9FFFE2h + .faraddr 9FFFE3h + .faraddr 9FFFE4h + .faraddr 9FFFE5h + .faraddr 9FFFE6h + .faraddr 9FFFE7h + .faraddr 9FFFE8h + .faraddr 9FFFE9h + .faraddr 9FFFEAh + .faraddr 9FFFEBh + .faraddr 9FFFECh + .faraddr 9FFFEDh + .faraddr 9FFFEEh + .faraddr 9FFFEFh + .faraddr 9FFFF0h + .faraddr 9FFFF1h + .faraddr 9FFFF2h + .faraddr 9FFFF3h + .faraddr 9FFFF4h + .faraddr 9FFFF5h + .faraddr 9FFFF6h + .faraddr 9FFFF7h + .faraddr 9FFFF8h + .faraddr 9FFFF9h + .faraddr 9FFFFAh + .faraddr 9FFFFBh + .faraddr 9FFFFCh + .faraddr 9FFFFDh + .faraddr 9FFFFEh + .faraddr 9FFFFFh + .faraddr 0A00000h + .faraddr 0A00001h + .faraddr 0A00002h + .faraddr 0A00003h + .faraddr 0A00004h + .faraddr 0A00005h + .faraddr 0A00006h + .faraddr 0A00007h + .faraddr 0A00008h + .faraddr 0A00009h + .faraddr 0A0000Ah + .faraddr 0A0000Bh + .faraddr 0A0000Ch + .faraddr 0A0000Dh + .faraddr 0A0000Eh + .faraddr 0A0000Fh + .faraddr 0FFFFE1h + .faraddr 0FFFFE2h + .faraddr 0FFFFE3h + .faraddr 0FFFFE4h + .faraddr 0FFFFE5h + .faraddr 0FFFFE6h + .faraddr 0FFFFE7h + .faraddr 0FFFFE8h + .faraddr 0FFFFE9h + .faraddr 0FFFFEAh + .faraddr 0FFFFEBh + .faraddr 0FFFFECh + .faraddr 0FFFFEDh + .faraddr 0FFFFEEh + .faraddr 0FFFFEFh + .faraddr 0FFFFF0h + .faraddr 0FFFFF1h + .faraddr 0FFFFF2h + .faraddr 0FFFFF3h + .faraddr 0FFFFF4h + .faraddr 0FFFFF5h + .faraddr 0FFFFF6h + .faraddr 0FFFFF7h + .faraddr 0FFFFF8h + .faraddr 0FFFFF9h + .faraddr 0FFFFFAh + .faraddr 0FFFFFBh + .faraddr 0FFFFFCh + .faraddr 0FFFFFDh + .faraddr 0FFFFFEh + .faraddr 0FFFFFFh + + ; alternative 8-digit hex values + .faraddr 00000000h + .faraddr 00000001h + .faraddr 00000002h + .faraddr 00000003h + .faraddr 00000004h + .faraddr 00000005h + .faraddr 00000006h + .faraddr 00000007h + .faraddr 00000008h + .faraddr 00000009h + .faraddr 0000000ah + .faraddr 0000000bh + .faraddr 0000000ch + .faraddr 0000000dh + .faraddr 0000000eh + .faraddr 0000000fh + .faraddr 00000010h + .faraddr 00000011h + .faraddr 00000012h + .faraddr 00000013h + .faraddr 00000070h + .faraddr 00000071h + .faraddr 00000072h + .faraddr 00000073h + .faraddr 00000074h + .faraddr 00000075h + .faraddr 00000076h + .faraddr 00000077h + .faraddr 00000078h + .faraddr 00000079h + .faraddr 0000007ah + .faraddr 0000007bh + .faraddr 0000007ch + .faraddr 0000007dh + .faraddr 0000007eh + .faraddr 0000007fh + .faraddr 00000080h + .faraddr 00000081h + .faraddr 00000082h + .faraddr 00000083h + .faraddr 00000084h + .faraddr 00000085h + .faraddr 00000086h + .faraddr 000000f0h + .faraddr 000000f1h + .faraddr 000000f2h + .faraddr 000000f3h + .faraddr 000000f4h + .faraddr 000000f5h + .faraddr 000000f6h + .faraddr 000000f7h + .faraddr 000000f8h + .faraddr 000000f9h + .faraddr 000000fah + .faraddr 000000fbh + .faraddr 000000fch + .faraddr 000000fdh + .faraddr 000000feh + .faraddr 000000ffh + .faraddr 00000100h + .faraddr 00000101h + .faraddr 00000102h + .faraddr 00000103h + .faraddr 00000fd2h + .faraddr 00000fd3h + .faraddr 00000fd4h + .faraddr 00000fd5h + .faraddr 00000fd6h + .faraddr 00000fd7h + .faraddr 00000fd8h + .faraddr 00000fd9h + .faraddr 00000fdah + .faraddr 00000fdbh + .faraddr 00000fdch + .faraddr 00000fddh + .faraddr 00000fdeh + .faraddr 00000fdfh + .faraddr 00000fe0h + .faraddr 00000fe1h + .faraddr 00000fe2h + .faraddr 00000fe3h + .faraddr 00000fe4h + .faraddr 00000fe5h + .faraddr 00000fe6h + .faraddr 00000fe7h + .faraddr 00000fe8h + .faraddr 00000fe9h + .faraddr 00000feah + .faraddr 00000febh + .faraddr 00000fech + .faraddr 00000fedh + .faraddr 00000feeh + .faraddr 00000fefh + .faraddr 00000ff0h + .faraddr 00000ff1h + .faraddr 00000ff2h + .faraddr 00000ff3h + .faraddr 00000ff4h + .faraddr 00000ff5h + .faraddr 00000ff6h + .faraddr 00000ff7h + .faraddr 00000ff8h + .faraddr 00000ff9h + .faraddr 00000ffah + .faraddr 00000ffbh + .faraddr 00000ffch + .faraddr 00000ffdh + .faraddr 00000ffeh + .faraddr 00000fffh + .faraddr 00001000h + .faraddr 00001001h + .faraddr 00001002h + .faraddr 00001003h + .faraddr 00001004h + .faraddr 00001005h + .faraddr 00001006h + .faraddr 00001007h + .faraddr 00001008h + .faraddr 00007ff0h + .faraddr 00007ff1h + .faraddr 00007ff2h + .faraddr 00007ff3h + .faraddr 00007ff4h + .faraddr 00007ff5h + .faraddr 00007ff6h + .faraddr 00007ff7h + .faraddr 00007ff8h + .faraddr 00007ff9h + .faraddr 00007ffah + .faraddr 00007ffbh + .faraddr 00007ffch + .faraddr 00007ffdh + .faraddr 00007ffeh + .faraddr 00007fffh + .faraddr 00008000h + .faraddr 00008001h + .faraddr 00008002h + .faraddr 00008003h + .faraddr 00008004h + .faraddr 00008005h + .faraddr 00008006h + .faraddr 00008007h + .faraddr 00008008h + .faraddr 00008009h + .faraddr 0000800ah + .faraddr 0000800bh + .faraddr 00009fe1h + .faraddr 00009fe2h + .faraddr 00009fe3h + .faraddr 00009fe4h + .faraddr 00009fe5h + .faraddr 00009fe6h + .faraddr 00009fe7h + .faraddr 00009fe8h + .faraddr 00009fe9h + .faraddr 00009feah + .faraddr 00009febh + .faraddr 00009fech + .faraddr 00009fedh + .faraddr 00009feeh + .faraddr 00009fefh + .faraddr 00009ff0h + .faraddr 00009ff1h + .faraddr 00009ff2h + .faraddr 00009ff3h + .faraddr 00009ff4h + .faraddr 00009ff5h + .faraddr 00009ff6h + .faraddr 00009ff7h + .faraddr 00009ff8h + .faraddr 00009ff9h + .faraddr 00009ffah + .faraddr 00009ffbh + .faraddr 00009ffch + .faraddr 00009ffdh + .faraddr 00009ffeh + .faraddr 00009fffh + .faraddr 0000a000h + .faraddr 0000a001h + .faraddr 0000a002h + .faraddr 0000a003h + .faraddr 0000a004h + .faraddr 0000a005h + .faraddr 0000a006h + .faraddr 0000a007h + .faraddr 0000a008h + .faraddr 0000a009h + .faraddr 0000a00ah + .faraddr 0000a00bh + .faraddr 0000a00ch + .faraddr 0000a00dh + .faraddr 0000a00eh + .faraddr 0000a00fh + .faraddr 0000afe1h + .faraddr 0000afe2h + .faraddr 0000afe3h + .faraddr 0000afe4h + .faraddr 0000afe5h + .faraddr 0000afe6h + .faraddr 0000afe7h + .faraddr 0000afe8h + .faraddr 0000afe9h + .faraddr 0000afeah + .faraddr 0000afebh + .faraddr 0000afech + .faraddr 0000afedh + .faraddr 0000afeeh + .faraddr 0000afefh + .faraddr 0000aff0h + .faraddr 0000aff1h + .faraddr 0000aff2h + .faraddr 0000aff3h + .faraddr 0000aff4h + .faraddr 0000aff5h + .faraddr 0000aff6h + .faraddr 0000aff7h + .faraddr 0000aff8h + .faraddr 0000aff9h + .faraddr 0000affah + .faraddr 0000affbh + .faraddr 0000affch + .faraddr 0000affdh + .faraddr 0000affeh + .faraddr 0000afffh + .faraddr 0000b000h + .faraddr 0000b001h + .faraddr 0000b002h + .faraddr 0000b003h + .faraddr 0000b004h + .faraddr 0000b005h + .faraddr 0000b006h + .faraddr 0000b007h + .faraddr 0000b008h + .faraddr 0000b009h + .faraddr 0000b00ah + .faraddr 0000b00bh + .faraddr 0000b00ch + .faraddr 0000b00dh + .faraddr 0000b00eh + .faraddr 0000b00fh + .faraddr 0000ffe1h + .faraddr 0000ffe2h + .faraddr 0000ffe3h + .faraddr 0000ffe4h + .faraddr 0000ffe5h + .faraddr 0000ffe6h + .faraddr 0000ffe7h + .faraddr 0000ffe8h + .faraddr 0000ffe9h + .faraddr 0000ffeah + .faraddr 0000ffebh + .faraddr 0000ffech + .faraddr 0000ffedh + .faraddr 0000ffeeh + .faraddr 0000ffefh + .faraddr 0000fff0h + .faraddr 0000fff1h + .faraddr 0000fff2h + .faraddr 0000fff3h + .faraddr 0000fff4h + .faraddr 0000fff5h + .faraddr 0000fff6h + .faraddr 0000fff7h + .faraddr 0000fff8h + .faraddr 0000fff9h + .faraddr 0000fffah + .faraddr 0000fffbh + .faraddr 0000fffch + .faraddr 0000fffdh + .faraddr 0000fffeh + .faraddr 0000ffffh + .faraddr 00010000h + .faraddr 00010001h + .faraddr 00010002h + .faraddr 00010003h + .faraddr 00010004h + .faraddr 00010005h + .faraddr 00010006h + .faraddr 00010007h + .faraddr 00010008h + .faraddr 00010009h + .faraddr 0001000ah + .faraddr 0001000bh + .faraddr 0001000ch + .faraddr 0001000dh + .faraddr 0001000eh + .faraddr 0001000fh + .faraddr 0010ffe1h + .faraddr 0010ffe2h + .faraddr 0010ffe3h + .faraddr 0010ffe4h + .faraddr 0010ffe5h + .faraddr 0010ffe6h + .faraddr 0010ffe7h + .faraddr 0010ffe8h + .faraddr 0010ffe9h + .faraddr 0010ffeah + .faraddr 0010ffebh + .faraddr 0010ffech + .faraddr 0010ffedh + .faraddr 0010ffeeh + .faraddr 0010ffefh + .faraddr 0010fff0h + .faraddr 0010fff1h + .faraddr 0010fff2h + .faraddr 0010fff3h + .faraddr 0010fff4h + .faraddr 0010fff5h + .faraddr 0010fff6h + .faraddr 0010fff7h + .faraddr 0010fff8h + .faraddr 0010fff9h + .faraddr 0010fffah + .faraddr 0010fffbh + .faraddr 0010fffch + .faraddr 0010fffdh + .faraddr 0010fffeh + .faraddr 0010ffffh + .faraddr 00110000h + .faraddr 00110001h + .faraddr 00110002h + .faraddr 00110003h + .faraddr 00110004h + .faraddr 00110005h + .faraddr 00110006h + .faraddr 00110007h + .faraddr 00110008h + .faraddr 00110009h + .faraddr 0011000ah + .faraddr 0011000bh + .faraddr 0011000ch + .faraddr 0011000dh + .faraddr 0011000eh + .faraddr 0011000fh + .faraddr 0020ffe1h + .faraddr 0020ffe2h + .faraddr 0020ffe3h + .faraddr 0020ffe4h + .faraddr 0020ffe5h + .faraddr 0020ffe6h + .faraddr 0020ffe7h + .faraddr 0020ffe8h + .faraddr 0020ffe9h + .faraddr 0020ffeah + .faraddr 0020ffebh + .faraddr 0020ffech + .faraddr 0020ffedh + .faraddr 0020ffeeh + .faraddr 0020ffefh + .faraddr 0020fff0h + .faraddr 0020fff1h + .faraddr 0020fff2h + .faraddr 0020fff3h + .faraddr 0020fff4h + .faraddr 0020fff5h + .faraddr 0020fff6h + .faraddr 0020fff7h + .faraddr 0020fff8h + .faraddr 0020fff9h + .faraddr 0020fffah + .faraddr 0020fffbh + .faraddr 0020fffch + .faraddr 0020fffdh + .faraddr 0020fffeh + .faraddr 0020ffffh + .faraddr 00210000h + .faraddr 00210001h + .faraddr 00210002h + .faraddr 00210003h + .faraddr 00210004h + .faraddr 00210005h + .faraddr 00210006h + .faraddr 00210007h + .faraddr 00210008h + .faraddr 00210009h + .faraddr 0021000ah + .faraddr 0021000bh + .faraddr 0021000ch + .faraddr 0021000dh + .faraddr 0021000eh + .faraddr 0021000fh + .faraddr 007fffe1h + .faraddr 007fffe2h + .faraddr 007fffe3h + .faraddr 007fffe4h + .faraddr 007fffe5h + .faraddr 007fffe6h + .faraddr 007fffe7h + .faraddr 007fffe8h + .faraddr 007fffe9h + .faraddr 007fffeah + .faraddr 007fffebh + .faraddr 007fffech + .faraddr 007fffedh + .faraddr 007fffeeh + .faraddr 007fffefh + .faraddr 007ffff0h + .faraddr 007ffff1h + .faraddr 007ffff2h + .faraddr 007ffff3h + .faraddr 007ffff4h + .faraddr 007ffff5h + .faraddr 007ffff6h + .faraddr 007ffff7h + .faraddr 007ffff8h + .faraddr 007ffff9h + .faraddr 007ffffah + .faraddr 007ffffbh + .faraddr 007ffffch + .faraddr 007ffffdh + .faraddr 007ffffeh + .faraddr 007fffffh + .faraddr 00800000h + .faraddr 00800001h + .faraddr 00800002h + .faraddr 00800003h + .faraddr 00800004h + .faraddr 00800005h + .faraddr 00800006h + .faraddr 00800007h + .faraddr 00800008h + .faraddr 00800009h + .faraddr 0080000ah + .faraddr 0080000bh + .faraddr 0080000ch + .faraddr 0080000dh + .faraddr 0080000eh + .faraddr 0080000fh + .faraddr 009fffe1h + .faraddr 009fffe2h + .faraddr 009fffe3h + .faraddr 009fffe4h + .faraddr 009fffe5h + .faraddr 009fffe6h + .faraddr 009fffe7h + .faraddr 009fffe8h + .faraddr 009fffe9h + .faraddr 009fffeah + .faraddr 009fffebh + .faraddr 009fffech + .faraddr 009fffedh + .faraddr 009fffeeh + .faraddr 009fffefh + .faraddr 009ffff0h + .faraddr 009ffff1h + .faraddr 009ffff2h + .faraddr 009ffff3h + .faraddr 009ffff4h + .faraddr 009ffff5h + .faraddr 009ffff6h + .faraddr 009ffff7h + .faraddr 009ffff8h + .faraddr 009ffff9h + .faraddr 009ffffah + .faraddr 009ffffbh + .faraddr 009ffffch + .faraddr 009ffffdh + .faraddr 009ffffeh + .faraddr 009fffffh + .faraddr 00a00000h + .faraddr 00a00001h + .faraddr 00a00002h + .faraddr 00a00003h + .faraddr 00a00004h + .faraddr 00a00005h + .faraddr 00a00006h + .faraddr 00a00007h + .faraddr 00a00008h + .faraddr 00a00009h + .faraddr 00a0000ah + .faraddr 00a0000bh + .faraddr 00a0000ch + .faraddr 00a0000dh + .faraddr 00a0000eh + .faraddr 00a0000fh + .faraddr 00ffffe1h + .faraddr 00ffffe2h + .faraddr 00ffffe3h + .faraddr 00ffffe4h + .faraddr 00ffffe5h + .faraddr 00ffffe6h + .faraddr 00ffffe7h + .faraddr 00ffffe8h + .faraddr 00ffffe9h + .faraddr 00ffffeah + .faraddr 00ffffebh + .faraddr 00ffffech + .faraddr 00ffffedh + .faraddr 00ffffeeh + .faraddr 00ffffefh + .faraddr 00fffff0h + .faraddr 00fffff1h + .faraddr 00fffff2h + .faraddr 00fffff3h + .faraddr 00fffff4h + .faraddr 00fffff5h + .faraddr 00fffff6h + .faraddr 00fffff7h + .faraddr 00fffff8h + .faraddr 00fffff9h + .faraddr 00fffffah + .faraddr 00fffffbh + .faraddr 00fffffch + .faraddr 00fffffdh + .faraddr 00fffffeh + .faraddr 00ffffffh + + ; alternative 8-digit hex values, uppercase + .faraddr 00000000h + .faraddr 00000001h + .faraddr 00000002h + .faraddr 00000003h + .faraddr 00000004h + .faraddr 00000005h + .faraddr 00000006h + .faraddr 00000007h + .faraddr 00000008h + .faraddr 00000009h + .faraddr 0000000Ah + .faraddr 0000000Bh + .faraddr 0000000Ch + .faraddr 0000000Dh + .faraddr 0000000Eh + .faraddr 0000000Fh + .faraddr 00000010h + .faraddr 00000011h + .faraddr 00000012h + .faraddr 00000013h + .faraddr 00000070h + .faraddr 00000071h + .faraddr 00000072h + .faraddr 00000073h + .faraddr 00000074h + .faraddr 00000075h + .faraddr 00000076h + .faraddr 00000077h + .faraddr 00000078h + .faraddr 00000079h + .faraddr 0000007Ah + .faraddr 0000007Bh + .faraddr 0000007Ch + .faraddr 0000007Dh + .faraddr 0000007Eh + .faraddr 0000007Fh + .faraddr 00000080h + .faraddr 00000081h + .faraddr 00000082h + .faraddr 00000083h + .faraddr 00000084h + .faraddr 00000085h + .faraddr 00000086h + .faraddr 000000F0h + .faraddr 000000F1h + .faraddr 000000F2h + .faraddr 000000F3h + .faraddr 000000F4h + .faraddr 000000F5h + .faraddr 000000F6h + .faraddr 000000F7h + .faraddr 000000F8h + .faraddr 000000F9h + .faraddr 000000FAh + .faraddr 000000FBh + .faraddr 000000FCh + .faraddr 000000FDh + .faraddr 000000FEh + .faraddr 000000FFh + .faraddr 00000100h + .faraddr 00000101h + .faraddr 00000102h + .faraddr 00000103h + .faraddr 00000FD2h + .faraddr 00000FD3h + .faraddr 00000FD4h + .faraddr 00000FD5h + .faraddr 00000FD6h + .faraddr 00000FD7h + .faraddr 00000FD8h + .faraddr 00000FD9h + .faraddr 00000FDAh + .faraddr 00000FDBh + .faraddr 00000FDCh + .faraddr 00000FDDh + .faraddr 00000FDEh + .faraddr 00000FDFh + .faraddr 00000FE0h + .faraddr 00000FE1h + .faraddr 00000FE2h + .faraddr 00000FE3h + .faraddr 00000FE4h + .faraddr 00000FE5h + .faraddr 00000FE6h + .faraddr 00000FE7h + .faraddr 00000FE8h + .faraddr 00000FE9h + .faraddr 00000FEAh + .faraddr 00000FEBh + .faraddr 00000FECh + .faraddr 00000FEDh + .faraddr 00000FEEh + .faraddr 00000FEFh + .faraddr 00000FF0h + .faraddr 00000FF1h + .faraddr 00000FF2h + .faraddr 00000FF3h + .faraddr 00000FF4h + .faraddr 00000FF5h + .faraddr 00000FF6h + .faraddr 00000FF7h + .faraddr 00000FF8h + .faraddr 00000FF9h + .faraddr 00000FFAh + .faraddr 00000FFBh + .faraddr 00000FFCh + .faraddr 00000FFDh + .faraddr 00000FFEh + .faraddr 00000FFFh + .faraddr 00001000h + .faraddr 00001001h + .faraddr 00001002h + .faraddr 00001003h + .faraddr 00001004h + .faraddr 00001005h + .faraddr 00001006h + .faraddr 00001007h + .faraddr 00001008h + .faraddr 00007FF0h + .faraddr 00007FF1h + .faraddr 00007FF2h + .faraddr 00007FF3h + .faraddr 00007FF4h + .faraddr 00007FF5h + .faraddr 00007FF6h + .faraddr 00007FF7h + .faraddr 00007FF8h + .faraddr 00007FF9h + .faraddr 00007FFAh + .faraddr 00007FFBh + .faraddr 00007FFCh + .faraddr 00007FFDh + .faraddr 00007FFEh + .faraddr 00007FFFh + .faraddr 00008000h + .faraddr 00008001h + .faraddr 00008002h + .faraddr 00008003h + .faraddr 00008004h + .faraddr 00008005h + .faraddr 00008006h + .faraddr 00008007h + .faraddr 00008008h + .faraddr 00008009h + .faraddr 0000800Ah + .faraddr 0000800Bh + .faraddr 00009FE1h + .faraddr 00009FE2h + .faraddr 00009FE3h + .faraddr 00009FE4h + .faraddr 00009FE5h + .faraddr 00009FE6h + .faraddr 00009FE7h + .faraddr 00009FE8h + .faraddr 00009FE9h + .faraddr 00009FEAh + .faraddr 00009FEBh + .faraddr 00009FECh + .faraddr 00009FEDh + .faraddr 00009FEEh + .faraddr 00009FEFh + .faraddr 00009FF0h + .faraddr 00009FF1h + .faraddr 00009FF2h + .faraddr 00009FF3h + .faraddr 00009FF4h + .faraddr 00009FF5h + .faraddr 00009FF6h + .faraddr 00009FF7h + .faraddr 00009FF8h + .faraddr 00009FF9h + .faraddr 00009FFAh + .faraddr 00009FFBh + .faraddr 00009FFCh + .faraddr 00009FFDh + .faraddr 00009FFEh + .faraddr 00009FFFh + .faraddr 0000A000h + .faraddr 0000A001h + .faraddr 0000A002h + .faraddr 0000A003h + .faraddr 0000A004h + .faraddr 0000A005h + .faraddr 0000A006h + .faraddr 0000A007h + .faraddr 0000A008h + .faraddr 0000A009h + .faraddr 0000A00Ah + .faraddr 0000A00Bh + .faraddr 0000A00Ch + .faraddr 0000A00Dh + .faraddr 0000A00Eh + .faraddr 0000A00Fh + .faraddr 0000AFE1h + .faraddr 0000AFE2h + .faraddr 0000AFE3h + .faraddr 0000AFE4h + .faraddr 0000AFE5h + .faraddr 0000AFE6h + .faraddr 0000AFE7h + .faraddr 0000AFE8h + .faraddr 0000AFE9h + .faraddr 0000AFEAh + .faraddr 0000AFEBh + .faraddr 0000AFECh + .faraddr 0000AFEDh + .faraddr 0000AFEEh + .faraddr 0000AFEFh + .faraddr 0000AFF0h + .faraddr 0000AFF1h + .faraddr 0000AFF2h + .faraddr 0000AFF3h + .faraddr 0000AFF4h + .faraddr 0000AFF5h + .faraddr 0000AFF6h + .faraddr 0000AFF7h + .faraddr 0000AFF8h + .faraddr 0000AFF9h + .faraddr 0000AFFAh + .faraddr 0000AFFBh + .faraddr 0000AFFCh + .faraddr 0000AFFDh + .faraddr 0000AFFEh + .faraddr 0000AFFFh + .faraddr 0000B000h + .faraddr 0000B001h + .faraddr 0000B002h + .faraddr 0000B003h + .faraddr 0000B004h + .faraddr 0000B005h + .faraddr 0000B006h + .faraddr 0000B007h + .faraddr 0000B008h + .faraddr 0000B009h + .faraddr 0000B00Ah + .faraddr 0000B00Bh + .faraddr 0000B00Ch + .faraddr 0000B00Dh + .faraddr 0000B00Eh + .faraddr 0000B00Fh + .faraddr 0000FFE1h + .faraddr 0000FFE2h + .faraddr 0000FFE3h + .faraddr 0000FFE4h + .faraddr 0000FFE5h + .faraddr 0000FFE6h + .faraddr 0000FFE7h + .faraddr 0000FFE8h + .faraddr 0000FFE9h + .faraddr 0000FFEAh + .faraddr 0000FFEBh + .faraddr 0000FFECh + .faraddr 0000FFEDh + .faraddr 0000FFEEh + .faraddr 0000FFEFh + .faraddr 0000FFF0h + .faraddr 0000FFF1h + .faraddr 0000FFF2h + .faraddr 0000FFF3h + .faraddr 0000FFF4h + .faraddr 0000FFF5h + .faraddr 0000FFF6h + .faraddr 0000FFF7h + .faraddr 0000FFF8h + .faraddr 0000FFF9h + .faraddr 0000FFFAh + .faraddr 0000FFFBh + .faraddr 0000FFFCh + .faraddr 0000FFFDh + .faraddr 0000FFFEh + .faraddr 0000FFFFh + .faraddr 00010000h + .faraddr 00010001h + .faraddr 00010002h + .faraddr 00010003h + .faraddr 00010004h + .faraddr 00010005h + .faraddr 00010006h + .faraddr 00010007h + .faraddr 00010008h + .faraddr 00010009h + .faraddr 0001000Ah + .faraddr 0001000Bh + .faraddr 0001000Ch + .faraddr 0001000Dh + .faraddr 0001000Eh + .faraddr 0001000Fh + .faraddr 0010FFE1h + .faraddr 0010FFE2h + .faraddr 0010FFE3h + .faraddr 0010FFE4h + .faraddr 0010FFE5h + .faraddr 0010FFE6h + .faraddr 0010FFE7h + .faraddr 0010FFE8h + .faraddr 0010FFE9h + .faraddr 0010FFEAh + .faraddr 0010FFEBh + .faraddr 0010FFECh + .faraddr 0010FFEDh + .faraddr 0010FFEEh + .faraddr 0010FFEFh + .faraddr 0010FFF0h + .faraddr 0010FFF1h + .faraddr 0010FFF2h + .faraddr 0010FFF3h + .faraddr 0010FFF4h + .faraddr 0010FFF5h + .faraddr 0010FFF6h + .faraddr 0010FFF7h + .faraddr 0010FFF8h + .faraddr 0010FFF9h + .faraddr 0010FFFAh + .faraddr 0010FFFBh + .faraddr 0010FFFCh + .faraddr 0010FFFDh + .faraddr 0010FFFEh + .faraddr 0010FFFFh + .faraddr 00110000h + .faraddr 00110001h + .faraddr 00110002h + .faraddr 00110003h + .faraddr 00110004h + .faraddr 00110005h + .faraddr 00110006h + .faraddr 00110007h + .faraddr 00110008h + .faraddr 00110009h + .faraddr 0011000Ah + .faraddr 0011000Bh + .faraddr 0011000Ch + .faraddr 0011000Dh + .faraddr 0011000Eh + .faraddr 0011000Fh + .faraddr 0020FFE1h + .faraddr 0020FFE2h + .faraddr 0020FFE3h + .faraddr 0020FFE4h + .faraddr 0020FFE5h + .faraddr 0020FFE6h + .faraddr 0020FFE7h + .faraddr 0020FFE8h + .faraddr 0020FFE9h + .faraddr 0020FFEAh + .faraddr 0020FFEBh + .faraddr 0020FFECh + .faraddr 0020FFEDh + .faraddr 0020FFEEh + .faraddr 0020FFEFh + .faraddr 0020FFF0h + .faraddr 0020FFF1h + .faraddr 0020FFF2h + .faraddr 0020FFF3h + .faraddr 0020FFF4h + .faraddr 0020FFF5h + .faraddr 0020FFF6h + .faraddr 0020FFF7h + .faraddr 0020FFF8h + .faraddr 0020FFF9h + .faraddr 0020FFFAh + .faraddr 0020FFFBh + .faraddr 0020FFFCh + .faraddr 0020FFFDh + .faraddr 0020FFFEh + .faraddr 0020FFFFh + .faraddr 00210000h + .faraddr 00210001h + .faraddr 00210002h + .faraddr 00210003h + .faraddr 00210004h + .faraddr 00210005h + .faraddr 00210006h + .faraddr 00210007h + .faraddr 00210008h + .faraddr 00210009h + .faraddr 0021000Ah + .faraddr 0021000Bh + .faraddr 0021000Ch + .faraddr 0021000Dh + .faraddr 0021000Eh + .faraddr 0021000Fh + .faraddr 007FFFE1h + .faraddr 007FFFE2h + .faraddr 007FFFE3h + .faraddr 007FFFE4h + .faraddr 007FFFE5h + .faraddr 007FFFE6h + .faraddr 007FFFE7h + .faraddr 007FFFE8h + .faraddr 007FFFE9h + .faraddr 007FFFEAh + .faraddr 007FFFEBh + .faraddr 007FFFECh + .faraddr 007FFFEDh + .faraddr 007FFFEEh + .faraddr 007FFFEFh + .faraddr 007FFFF0h + .faraddr 007FFFF1h + .faraddr 007FFFF2h + .faraddr 007FFFF3h + .faraddr 007FFFF4h + .faraddr 007FFFF5h + .faraddr 007FFFF6h + .faraddr 007FFFF7h + .faraddr 007FFFF8h + .faraddr 007FFFF9h + .faraddr 007FFFFAh + .faraddr 007FFFFBh + .faraddr 007FFFFCh + .faraddr 007FFFFDh + .faraddr 007FFFFEh + .faraddr 007FFFFFh + .faraddr 00800000h + .faraddr 00800001h + .faraddr 00800002h + .faraddr 00800003h + .faraddr 00800004h + .faraddr 00800005h + .faraddr 00800006h + .faraddr 00800007h + .faraddr 00800008h + .faraddr 00800009h + .faraddr 0080000Ah + .faraddr 0080000Bh + .faraddr 0080000Ch + .faraddr 0080000Dh + .faraddr 0080000Eh + .faraddr 0080000Fh + .faraddr 009FFFE1h + .faraddr 009FFFE2h + .faraddr 009FFFE3h + .faraddr 009FFFE4h + .faraddr 009FFFE5h + .faraddr 009FFFE6h + .faraddr 009FFFE7h + .faraddr 009FFFE8h + .faraddr 009FFFE9h + .faraddr 009FFFEAh + .faraddr 009FFFEBh + .faraddr 009FFFECh + .faraddr 009FFFEDh + .faraddr 009FFFEEh + .faraddr 009FFFEFh + .faraddr 009FFFF0h + .faraddr 009FFFF1h + .faraddr 009FFFF2h + .faraddr 009FFFF3h + .faraddr 009FFFF4h + .faraddr 009FFFF5h + .faraddr 009FFFF6h + .faraddr 009FFFF7h + .faraddr 009FFFF8h + .faraddr 009FFFF9h + .faraddr 009FFFFAh + .faraddr 009FFFFBh + .faraddr 009FFFFCh + .faraddr 009FFFFDh + .faraddr 009FFFFEh + .faraddr 009FFFFFh + .faraddr 00A00000h + .faraddr 00A00001h + .faraddr 00A00002h + .faraddr 00A00003h + .faraddr 00A00004h + .faraddr 00A00005h + .faraddr 00A00006h + .faraddr 00A00007h + .faraddr 00A00008h + .faraddr 00A00009h + .faraddr 00A0000Ah + .faraddr 00A0000Bh + .faraddr 00A0000Ch + .faraddr 00A0000Dh + .faraddr 00A0000Eh + .faraddr 00A0000Fh + .faraddr 00FFFFE1h + .faraddr 00FFFFE2h + .faraddr 00FFFFE3h + .faraddr 00FFFFE4h + .faraddr 00FFFFE5h + .faraddr 00FFFFE6h + .faraddr 00FFFFE7h + .faraddr 00FFFFE8h + .faraddr 00FFFFE9h + .faraddr 00FFFFEAh + .faraddr 00FFFFEBh + .faraddr 00FFFFECh + .faraddr 00FFFFEDh + .faraddr 00FFFFEEh + .faraddr 00FFFFEFh + .faraddr 00FFFFF0h + .faraddr 00FFFFF1h + .faraddr 00FFFFF2h + .faraddr 00FFFFF3h + .faraddr 00FFFFF4h + .faraddr 00FFFFF5h + .faraddr 00FFFFF6h + .faraddr 00FFFFF7h + .faraddr 00FFFFF8h + .faraddr 00FFFFF9h + .faraddr 00FFFFFAh + .faraddr 00FFFFFBh + .faraddr 00FFFFFCh + .faraddr 00FFFFFDh + .faraddr 00FFFFFEh + .faraddr 00FFFFFFh + + ; alternative hex values, always leading zero + .faraddr 00h + .faraddr 01h + .faraddr 02h + .faraddr 03h + .faraddr 04h + .faraddr 05h + .faraddr 06h + .faraddr 07h + .faraddr 08h + .faraddr 09h + .faraddr 0ah + .faraddr 0bh + .faraddr 0ch + .faraddr 0dh + .faraddr 0eh + .faraddr 0fh + .faraddr 010h + .faraddr 011h + .faraddr 012h + .faraddr 013h + .faraddr 070h + .faraddr 071h + .faraddr 072h + .faraddr 073h + .faraddr 074h + .faraddr 075h + .faraddr 076h + .faraddr 077h + .faraddr 078h + .faraddr 079h + .faraddr 07ah + .faraddr 07bh + .faraddr 07ch + .faraddr 07dh + .faraddr 07eh + .faraddr 07fh + .faraddr 080h + .faraddr 081h + .faraddr 082h + .faraddr 083h + .faraddr 084h + .faraddr 085h + .faraddr 086h + .faraddr 0f0h + .faraddr 0f1h + .faraddr 0f2h + .faraddr 0f3h + .faraddr 0f4h + .faraddr 0f5h + .faraddr 0f6h + .faraddr 0f7h + .faraddr 0f8h + .faraddr 0f9h + .faraddr 0fah + .faraddr 0fbh + .faraddr 0fch + .faraddr 0fdh + .faraddr 0feh + .faraddr 0ffh + .faraddr 0100h + .faraddr 0101h + .faraddr 0102h + .faraddr 0103h + .faraddr 0fd2h + .faraddr 0fd3h + .faraddr 0fd4h + .faraddr 0fd5h + .faraddr 0fd6h + .faraddr 0fd7h + .faraddr 0fd8h + .faraddr 0fd9h + .faraddr 0fdah + .faraddr 0fdbh + .faraddr 0fdch + .faraddr 0fddh + .faraddr 0fdeh + .faraddr 0fdfh + .faraddr 0fe0h + .faraddr 0fe1h + .faraddr 0fe2h + .faraddr 0fe3h + .faraddr 0fe4h + .faraddr 0fe5h + .faraddr 0fe6h + .faraddr 0fe7h + .faraddr 0fe8h + .faraddr 0fe9h + .faraddr 0feah + .faraddr 0febh + .faraddr 0fech + .faraddr 0fedh + .faraddr 0feeh + .faraddr 0fefh + .faraddr 0ff0h + .faraddr 0ff1h + .faraddr 0ff2h + .faraddr 0ff3h + .faraddr 0ff4h + .faraddr 0ff5h + .faraddr 0ff6h + .faraddr 0ff7h + .faraddr 0ff8h + .faraddr 0ff9h + .faraddr 0ffah + .faraddr 0ffbh + .faraddr 0ffch + .faraddr 0ffdh + .faraddr 0ffeh + .faraddr 0fffh + .faraddr 01000h + .faraddr 01001h + .faraddr 01002h + .faraddr 01003h + .faraddr 01004h + .faraddr 01005h + .faraddr 01006h + .faraddr 01007h + .faraddr 01008h + .faraddr 07ff0h + .faraddr 07ff1h + .faraddr 07ff2h + .faraddr 07ff3h + .faraddr 07ff4h + .faraddr 07ff5h + .faraddr 07ff6h + .faraddr 07ff7h + .faraddr 07ff8h + .faraddr 07ff9h + .faraddr 07ffah + .faraddr 07ffbh + .faraddr 07ffch + .faraddr 07ffdh + .faraddr 07ffeh + .faraddr 07fffh + .faraddr 08000h + .faraddr 08001h + .faraddr 08002h + .faraddr 08003h + .faraddr 08004h + .faraddr 08005h + .faraddr 08006h + .faraddr 08007h + .faraddr 08008h + .faraddr 08009h + .faraddr 0800ah + .faraddr 0800bh + .faraddr 09fe1h + .faraddr 09fe2h + .faraddr 09fe3h + .faraddr 09fe4h + .faraddr 09fe5h + .faraddr 09fe6h + .faraddr 09fe7h + .faraddr 09fe8h + .faraddr 09fe9h + .faraddr 09feah + .faraddr 09febh + .faraddr 09fech + .faraddr 09fedh + .faraddr 09feeh + .faraddr 09fefh + .faraddr 09ff0h + .faraddr 09ff1h + .faraddr 09ff2h + .faraddr 09ff3h + .faraddr 09ff4h + .faraddr 09ff5h + .faraddr 09ff6h + .faraddr 09ff7h + .faraddr 09ff8h + .faraddr 09ff9h + .faraddr 09ffah + .faraddr 09ffbh + .faraddr 09ffch + .faraddr 09ffdh + .faraddr 09ffeh + .faraddr 09fffh + .faraddr 0a000h + .faraddr 0a001h + .faraddr 0a002h + .faraddr 0a003h + .faraddr 0a004h + .faraddr 0a005h + .faraddr 0a006h + .faraddr 0a007h + .faraddr 0a008h + .faraddr 0a009h + .faraddr 0a00ah + .faraddr 0a00bh + .faraddr 0a00ch + .faraddr 0a00dh + .faraddr 0a00eh + .faraddr 0a00fh + .faraddr 0afe1h + .faraddr 0afe2h + .faraddr 0afe3h + .faraddr 0afe4h + .faraddr 0afe5h + .faraddr 0afe6h + .faraddr 0afe7h + .faraddr 0afe8h + .faraddr 0afe9h + .faraddr 0afeah + .faraddr 0afebh + .faraddr 0afech + .faraddr 0afedh + .faraddr 0afeeh + .faraddr 0afefh + .faraddr 0aff0h + .faraddr 0aff1h + .faraddr 0aff2h + .faraddr 0aff3h + .faraddr 0aff4h + .faraddr 0aff5h + .faraddr 0aff6h + .faraddr 0aff7h + .faraddr 0aff8h + .faraddr 0aff9h + .faraddr 0affah + .faraddr 0affbh + .faraddr 0affch + .faraddr 0affdh + .faraddr 0affeh + .faraddr 0afffh + .faraddr 0b000h + .faraddr 0b001h + .faraddr 0b002h + .faraddr 0b003h + .faraddr 0b004h + .faraddr 0b005h + .faraddr 0b006h + .faraddr 0b007h + .faraddr 0b008h + .faraddr 0b009h + .faraddr 0b00ah + .faraddr 0b00bh + .faraddr 0b00ch + .faraddr 0b00dh + .faraddr 0b00eh + .faraddr 0b00fh + .faraddr 0ffe1h + .faraddr 0ffe2h + .faraddr 0ffe3h + .faraddr 0ffe4h + .faraddr 0ffe5h + .faraddr 0ffe6h + .faraddr 0ffe7h + .faraddr 0ffe8h + .faraddr 0ffe9h + .faraddr 0ffeah + .faraddr 0ffebh + .faraddr 0ffech + .faraddr 0ffedh + .faraddr 0ffeeh + .faraddr 0ffefh + .faraddr 0fff0h + .faraddr 0fff1h + .faraddr 0fff2h + .faraddr 0fff3h + .faraddr 0fff4h + .faraddr 0fff5h + .faraddr 0fff6h + .faraddr 0fff7h + .faraddr 0fff8h + .faraddr 0fff9h + .faraddr 0fffah + .faraddr 0fffbh + .faraddr 0fffch + .faraddr 0fffdh + .faraddr 0fffeh + .faraddr 0ffffh + .faraddr 010000h + .faraddr 010001h + .faraddr 010002h + .faraddr 010003h + .faraddr 010004h + .faraddr 010005h + .faraddr 010006h + .faraddr 010007h + .faraddr 010008h + .faraddr 010009h + .faraddr 01000ah + .faraddr 01000bh + .faraddr 01000ch + .faraddr 01000dh + .faraddr 01000eh + .faraddr 01000fh + .faraddr 010ffe1h + .faraddr 010ffe2h + .faraddr 010ffe3h + .faraddr 010ffe4h + .faraddr 010ffe5h + .faraddr 010ffe6h + .faraddr 010ffe7h + .faraddr 010ffe8h + .faraddr 010ffe9h + .faraddr 010ffeah + .faraddr 010ffebh + .faraddr 010ffech + .faraddr 010ffedh + .faraddr 010ffeeh + .faraddr 010ffefh + .faraddr 010fff0h + .faraddr 010fff1h + .faraddr 010fff2h + .faraddr 010fff3h + .faraddr 010fff4h + .faraddr 010fff5h + .faraddr 010fff6h + .faraddr 010fff7h + .faraddr 010fff8h + .faraddr 010fff9h + .faraddr 010fffah + .faraddr 010fffbh + .faraddr 010fffch + .faraddr 010fffdh + .faraddr 010fffeh + .faraddr 010ffffh + .faraddr 0110000h + .faraddr 0110001h + .faraddr 0110002h + .faraddr 0110003h + .faraddr 0110004h + .faraddr 0110005h + .faraddr 0110006h + .faraddr 0110007h + .faraddr 0110008h + .faraddr 0110009h + .faraddr 011000ah + .faraddr 011000bh + .faraddr 011000ch + .faraddr 011000dh + .faraddr 011000eh + .faraddr 011000fh + .faraddr 020ffe1h + .faraddr 020ffe2h + .faraddr 020ffe3h + .faraddr 020ffe4h + .faraddr 020ffe5h + .faraddr 020ffe6h + .faraddr 020ffe7h + .faraddr 020ffe8h + .faraddr 020ffe9h + .faraddr 020ffeah + .faraddr 020ffebh + .faraddr 020ffech + .faraddr 020ffedh + .faraddr 020ffeeh + .faraddr 020ffefh + .faraddr 020fff0h + .faraddr 020fff1h + .faraddr 020fff2h + .faraddr 020fff3h + .faraddr 020fff4h + .faraddr 020fff5h + .faraddr 020fff6h + .faraddr 020fff7h + .faraddr 020fff8h + .faraddr 020fff9h + .faraddr 020fffah + .faraddr 020fffbh + .faraddr 020fffch + .faraddr 020fffdh + .faraddr 020fffeh + .faraddr 020ffffh + .faraddr 0210000h + .faraddr 0210001h + .faraddr 0210002h + .faraddr 0210003h + .faraddr 0210004h + .faraddr 0210005h + .faraddr 0210006h + .faraddr 0210007h + .faraddr 0210008h + .faraddr 0210009h + .faraddr 021000ah + .faraddr 021000bh + .faraddr 021000ch + .faraddr 021000dh + .faraddr 021000eh + .faraddr 021000fh + .faraddr 07fffe1h + .faraddr 07fffe2h + .faraddr 07fffe3h + .faraddr 07fffe4h + .faraddr 07fffe5h + .faraddr 07fffe6h + .faraddr 07fffe7h + .faraddr 07fffe8h + .faraddr 07fffe9h + .faraddr 07fffeah + .faraddr 07fffebh + .faraddr 07fffech + .faraddr 07fffedh + .faraddr 07fffeeh + .faraddr 07fffefh + .faraddr 07ffff0h + .faraddr 07ffff1h + .faraddr 07ffff2h + .faraddr 07ffff3h + .faraddr 07ffff4h + .faraddr 07ffff5h + .faraddr 07ffff6h + .faraddr 07ffff7h + .faraddr 07ffff8h + .faraddr 07ffff9h + .faraddr 07ffffah + .faraddr 07ffffbh + .faraddr 07ffffch + .faraddr 07ffffdh + .faraddr 07ffffeh + .faraddr 07fffffh + .faraddr 0800000h + .faraddr 0800001h + .faraddr 0800002h + .faraddr 0800003h + .faraddr 0800004h + .faraddr 0800005h + .faraddr 0800006h + .faraddr 0800007h + .faraddr 0800008h + .faraddr 0800009h + .faraddr 080000ah + .faraddr 080000bh + .faraddr 080000ch + .faraddr 080000dh + .faraddr 080000eh + .faraddr 080000fh + .faraddr 09fffe1h + .faraddr 09fffe2h + .faraddr 09fffe3h + .faraddr 09fffe4h + .faraddr 09fffe5h + .faraddr 09fffe6h + .faraddr 09fffe7h + .faraddr 09fffe8h + .faraddr 09fffe9h + .faraddr 09fffeah + .faraddr 09fffebh + .faraddr 09fffech + .faraddr 09fffedh + .faraddr 09fffeeh + .faraddr 09fffefh + .faraddr 09ffff0h + .faraddr 09ffff1h + .faraddr 09ffff2h + .faraddr 09ffff3h + .faraddr 09ffff4h + .faraddr 09ffff5h + .faraddr 09ffff6h + .faraddr 09ffff7h + .faraddr 09ffff8h + .faraddr 09ffff9h + .faraddr 09ffffah + .faraddr 09ffffbh + .faraddr 09ffffch + .faraddr 09ffffdh + .faraddr 09ffffeh + .faraddr 09fffffh + .faraddr 0a00000h + .faraddr 0a00001h + .faraddr 0a00002h + .faraddr 0a00003h + .faraddr 0a00004h + .faraddr 0a00005h + .faraddr 0a00006h + .faraddr 0a00007h + .faraddr 0a00008h + .faraddr 0a00009h + .faraddr 0a0000ah + .faraddr 0a0000bh + .faraddr 0a0000ch + .faraddr 0a0000dh + .faraddr 0a0000eh + .faraddr 0a0000fh + .faraddr 0ffffe1h + .faraddr 0ffffe2h + .faraddr 0ffffe3h + .faraddr 0ffffe4h + .faraddr 0ffffe5h + .faraddr 0ffffe6h + .faraddr 0ffffe7h + .faraddr 0ffffe8h + .faraddr 0ffffe9h + .faraddr 0ffffeah + .faraddr 0ffffebh + .faraddr 0ffffech + .faraddr 0ffffedh + .faraddr 0ffffeeh + .faraddr 0ffffefh + .faraddr 0fffff0h + .faraddr 0fffff1h + .faraddr 0fffff2h + .faraddr 0fffff3h + .faraddr 0fffff4h + .faraddr 0fffff5h + .faraddr 0fffff6h + .faraddr 0fffff7h + .faraddr 0fffff8h + .faraddr 0fffff9h + .faraddr 0fffffah + .faraddr 0fffffbh + .faraddr 0fffffch + .faraddr 0fffffdh + .faraddr 0fffffeh + .faraddr 0ffffffh + + ; binary values, variable length + .faraddr %0 + .faraddr %01 + .faraddr %010 + .faraddr %011 + .faraddr %0100 + .faraddr %0101 + .faraddr %0110 + .faraddr %0111 + .faraddr %01000 + .faraddr %01001 + .faraddr %01010 + .faraddr %01011 + .faraddr %01100 + .faraddr %01101 + .faraddr %01110 + .faraddr %01111 + .faraddr %010000 + .faraddr %010001 + .faraddr %010010 + .faraddr %010011 + .faraddr %01110000 + .faraddr %01110001 + .faraddr %01110010 + .faraddr %01110011 + .faraddr %01110100 + .faraddr %01110101 + .faraddr %01110110 + .faraddr %01110111 + .faraddr %01111000 + .faraddr %01111001 + .faraddr %01111010 + .faraddr %01111011 + .faraddr %01111100 + .faraddr %01111101 + .faraddr %01111110 + .faraddr %01111111 + .faraddr %010000000 + .faraddr %010000001 + .faraddr %010000010 + .faraddr %010000011 + .faraddr %010000100 + .faraddr %010000101 + .faraddr %010000110 + .faraddr %011110000 + .faraddr %011110001 + .faraddr %011110010 + .faraddr %011110011 + .faraddr %011110100 + .faraddr %011110101 + .faraddr %011110110 + .faraddr %011110111 + .faraddr %011111000 + .faraddr %011111001 + .faraddr %011111010 + .faraddr %011111011 + .faraddr %011111100 + .faraddr %011111101 + .faraddr %011111110 + .faraddr %011111111 + .faraddr %0100000000 + .faraddr %0100000001 + .faraddr %0100000010 + .faraddr %0100000011 + .faraddr %0111111010010 + .faraddr %0111111010011 + .faraddr %0111111010100 + .faraddr %0111111010101 + .faraddr %0111111010110 + .faraddr %0111111010111 + .faraddr %0111111011000 + .faraddr %0111111011001 + .faraddr %0111111011010 + .faraddr %0111111011011 + .faraddr %0111111011100 + .faraddr %0111111011101 + .faraddr %0111111011110 + .faraddr %0111111011111 + .faraddr %0111111100000 + .faraddr %0111111100001 + .faraddr %0111111100010 + .faraddr %0111111100011 + .faraddr %0111111100100 + .faraddr %0111111100101 + .faraddr %0111111100110 + .faraddr %0111111100111 + .faraddr %0111111101000 + .faraddr %0111111101001 + .faraddr %0111111101010 + .faraddr %0111111101011 + .faraddr %0111111101100 + .faraddr %0111111101101 + .faraddr %0111111101110 + .faraddr %0111111101111 + .faraddr %0111111110000 + .faraddr %0111111110001 + .faraddr %0111111110010 + .faraddr %0111111110011 + .faraddr %0111111110100 + .faraddr %0111111110101 + .faraddr %0111111110110 + .faraddr %0111111110111 + .faraddr %0111111111000 + .faraddr %0111111111001 + .faraddr %0111111111010 + .faraddr %0111111111011 + .faraddr %0111111111100 + .faraddr %0111111111101 + .faraddr %0111111111110 + .faraddr %0111111111111 + .faraddr %01000000000000 + .faraddr %01000000000001 + .faraddr %01000000000010 + .faraddr %01000000000011 + .faraddr %01000000000100 + .faraddr %01000000000101 + .faraddr %01000000000110 + .faraddr %01000000000111 + .faraddr %01000000001000 + .faraddr %0111111111110000 + .faraddr %0111111111110001 + .faraddr %0111111111110010 + .faraddr %0111111111110011 + .faraddr %0111111111110100 + .faraddr %0111111111110101 + .faraddr %0111111111110110 + .faraddr %0111111111110111 + .faraddr %0111111111111000 + .faraddr %0111111111111001 + .faraddr %0111111111111010 + .faraddr %0111111111111011 + .faraddr %0111111111111100 + .faraddr %0111111111111101 + .faraddr %0111111111111110 + .faraddr %0111111111111111 + .faraddr %01000000000000000 + .faraddr %01000000000000001 + .faraddr %01000000000000010 + .faraddr %01000000000000011 + .faraddr %01000000000000100 + .faraddr %01000000000000101 + .faraddr %01000000000000110 + .faraddr %01000000000000111 + .faraddr %01000000000001000 + .faraddr %01000000000001001 + .faraddr %01000000000001010 + .faraddr %01000000000001011 + .faraddr %01001111111100001 + .faraddr %01001111111100010 + .faraddr %01001111111100011 + .faraddr %01001111111100100 + .faraddr %01001111111100101 + .faraddr %01001111111100110 + .faraddr %01001111111100111 + .faraddr %01001111111101000 + .faraddr %01001111111101001 + .faraddr %01001111111101010 + .faraddr %01001111111101011 + .faraddr %01001111111101100 + .faraddr %01001111111101101 + .faraddr %01001111111101110 + .faraddr %01001111111101111 + .faraddr %01001111111110000 + .faraddr %01001111111110001 + .faraddr %01001111111110010 + .faraddr %01001111111110011 + .faraddr %01001111111110100 + .faraddr %01001111111110101 + .faraddr %01001111111110110 + .faraddr %01001111111110111 + .faraddr %01001111111111000 + .faraddr %01001111111111001 + .faraddr %01001111111111010 + .faraddr %01001111111111011 + .faraddr %01001111111111100 + .faraddr %01001111111111101 + .faraddr %01001111111111110 + .faraddr %01001111111111111 + .faraddr %01010000000000000 + .faraddr %01010000000000001 + .faraddr %01010000000000010 + .faraddr %01010000000000011 + .faraddr %01010000000000100 + .faraddr %01010000000000101 + .faraddr %01010000000000110 + .faraddr %01010000000000111 + .faraddr %01010000000001000 + .faraddr %01010000000001001 + .faraddr %01010000000001010 + .faraddr %01010000000001011 + .faraddr %01010000000001100 + .faraddr %01010000000001101 + .faraddr %01010000000001110 + .faraddr %01010000000001111 + .faraddr %01010111111100001 + .faraddr %01010111111100010 + .faraddr %01010111111100011 + .faraddr %01010111111100100 + .faraddr %01010111111100101 + .faraddr %01010111111100110 + .faraddr %01010111111100111 + .faraddr %01010111111101000 + .faraddr %01010111111101001 + .faraddr %01010111111101010 + .faraddr %01010111111101011 + .faraddr %01010111111101100 + .faraddr %01010111111101101 + .faraddr %01010111111101110 + .faraddr %01010111111101111 + .faraddr %01010111111110000 + .faraddr %01010111111110001 + .faraddr %01010111111110010 + .faraddr %01010111111110011 + .faraddr %01010111111110100 + .faraddr %01010111111110101 + .faraddr %01010111111110110 + .faraddr %01010111111110111 + .faraddr %01010111111111000 + .faraddr %01010111111111001 + .faraddr %01010111111111010 + .faraddr %01010111111111011 + .faraddr %01010111111111100 + .faraddr %01010111111111101 + .faraddr %01010111111111110 + .faraddr %01010111111111111 + .faraddr %01011000000000000 + .faraddr %01011000000000001 + .faraddr %01011000000000010 + .faraddr %01011000000000011 + .faraddr %01011000000000100 + .faraddr %01011000000000101 + .faraddr %01011000000000110 + .faraddr %01011000000000111 + .faraddr %01011000000001000 + .faraddr %01011000000001001 + .faraddr %01011000000001010 + .faraddr %01011000000001011 + .faraddr %01011000000001100 + .faraddr %01011000000001101 + .faraddr %01011000000001110 + .faraddr %01011000000001111 + .faraddr %01111111111100001 + .faraddr %01111111111100010 + .faraddr %01111111111100011 + .faraddr %01111111111100100 + .faraddr %01111111111100101 + .faraddr %01111111111100110 + .faraddr %01111111111100111 + .faraddr %01111111111101000 + .faraddr %01111111111101001 + .faraddr %01111111111101010 + .faraddr %01111111111101011 + .faraddr %01111111111101100 + .faraddr %01111111111101101 + .faraddr %01111111111101110 + .faraddr %01111111111101111 + .faraddr %01111111111110000 + .faraddr %01111111111110001 + .faraddr %01111111111110010 + .faraddr %01111111111110011 + .faraddr %01111111111110100 + .faraddr %01111111111110101 + .faraddr %01111111111110110 + .faraddr %01111111111110111 + .faraddr %01111111111111000 + .faraddr %01111111111111001 + .faraddr %01111111111111010 + .faraddr %01111111111111011 + .faraddr %01111111111111100 + .faraddr %01111111111111101 + .faraddr %01111111111111110 + .faraddr %01111111111111111 + .faraddr %10000000000000000 + .faraddr %10000000000000001 + .faraddr %10000000000000010 + .faraddr %10000000000000011 + .faraddr %10000000000000100 + .faraddr %10000000000000101 + .faraddr %10000000000000110 + .faraddr %10000000000000111 + .faraddr %10000000000001000 + .faraddr %10000000000001001 + .faraddr %10000000000001010 + .faraddr %10000000000001011 + .faraddr %10000000000001100 + .faraddr %10000000000001101 + .faraddr %10000000000001110 + .faraddr %10000000000001111 + .faraddr %100001111111111100001 + .faraddr %100001111111111100010 + .faraddr %100001111111111100011 + .faraddr %100001111111111100100 + .faraddr %100001111111111100101 + .faraddr %100001111111111100110 + .faraddr %100001111111111100111 + .faraddr %100001111111111101000 + .faraddr %100001111111111101001 + .faraddr %100001111111111101010 + .faraddr %100001111111111101011 + .faraddr %100001111111111101100 + .faraddr %100001111111111101101 + .faraddr %100001111111111101110 + .faraddr %100001111111111101111 + .faraddr %100001111111111110000 + .faraddr %100001111111111110001 + .faraddr %100001111111111110010 + .faraddr %100001111111111110011 + .faraddr %100001111111111110100 + .faraddr %100001111111111110101 + .faraddr %100001111111111110110 + .faraddr %100001111111111110111 + .faraddr %100001111111111111000 + .faraddr %100001111111111111001 + .faraddr %100001111111111111010 + .faraddr %100001111111111111011 + .faraddr %100001111111111111100 + .faraddr %100001111111111111101 + .faraddr %100001111111111111110 + .faraddr %100001111111111111111 + .faraddr %100010000000000000000 + .faraddr %100010000000000000001 + .faraddr %100010000000000000010 + .faraddr %100010000000000000011 + .faraddr %100010000000000000100 + .faraddr %100010000000000000101 + .faraddr %100010000000000000110 + .faraddr %100010000000000000111 + .faraddr %100010000000000001000 + .faraddr %100010000000000001001 + .faraddr %100010000000000001010 + .faraddr %100010000000000001011 + .faraddr %100010000000000001100 + .faraddr %100010000000000001101 + .faraddr %100010000000000001110 + .faraddr %100010000000000001111 + .faraddr %1000001111111111100001 + .faraddr %1000001111111111100010 + .faraddr %1000001111111111100011 + .faraddr %1000001111111111100100 + .faraddr %1000001111111111100101 + .faraddr %1000001111111111100110 + .faraddr %1000001111111111100111 + .faraddr %1000001111111111101000 + .faraddr %1000001111111111101001 + .faraddr %1000001111111111101010 + .faraddr %1000001111111111101011 + .faraddr %1000001111111111101100 + .faraddr %1000001111111111101101 + .faraddr %1000001111111111101110 + .faraddr %1000001111111111101111 + .faraddr %1000001111111111110000 + .faraddr %1000001111111111110001 + .faraddr %1000001111111111110010 + .faraddr %1000001111111111110011 + .faraddr %1000001111111111110100 + .faraddr %1000001111111111110101 + .faraddr %1000001111111111110110 + .faraddr %1000001111111111110111 + .faraddr %1000001111111111111000 + .faraddr %1000001111111111111001 + .faraddr %1000001111111111111010 + .faraddr %1000001111111111111011 + .faraddr %1000001111111111111100 + .faraddr %1000001111111111111101 + .faraddr %1000001111111111111110 + .faraddr %1000001111111111111111 + .faraddr %1000010000000000000000 + .faraddr %1000010000000000000001 + .faraddr %1000010000000000000010 + .faraddr %1000010000000000000011 + .faraddr %1000010000000000000100 + .faraddr %1000010000000000000101 + .faraddr %1000010000000000000110 + .faraddr %1000010000000000000111 + .faraddr %1000010000000000001000 + .faraddr %1000010000000000001001 + .faraddr %1000010000000000001010 + .faraddr %1000010000000000001011 + .faraddr %1000010000000000001100 + .faraddr %1000010000000000001101 + .faraddr %1000010000000000001110 + .faraddr %1000010000000000001111 + .faraddr %11111111111111111100001 + .faraddr %11111111111111111100010 + .faraddr %11111111111111111100011 + .faraddr %11111111111111111100100 + .faraddr %11111111111111111100101 + .faraddr %11111111111111111100110 + .faraddr %11111111111111111100111 + .faraddr %11111111111111111101000 + .faraddr %11111111111111111101001 + .faraddr %11111111111111111101010 + .faraddr %11111111111111111101011 + .faraddr %11111111111111111101100 + .faraddr %11111111111111111101101 + .faraddr %11111111111111111101110 + .faraddr %11111111111111111101111 + .faraddr %11111111111111111110000 + .faraddr %11111111111111111110001 + .faraddr %11111111111111111110010 + .faraddr %11111111111111111110011 + .faraddr %11111111111111111110100 + .faraddr %11111111111111111110101 + .faraddr %11111111111111111110110 + .faraddr %11111111111111111110111 + .faraddr %11111111111111111111000 + .faraddr %11111111111111111111001 + .faraddr %11111111111111111111010 + .faraddr %11111111111111111111011 + .faraddr %11111111111111111111100 + .faraddr %11111111111111111111101 + .faraddr %11111111111111111111110 + .faraddr %11111111111111111111111 + .faraddr %100000000000000000000000 + .faraddr %100000000000000000000001 + .faraddr %100000000000000000000010 + .faraddr %100000000000000000000011 + .faraddr %100000000000000000000100 + .faraddr %100000000000000000000101 + .faraddr %100000000000000000000110 + .faraddr %100000000000000000000111 + .faraddr %100000000000000000001000 + .faraddr %100000000000000000001001 + .faraddr %100000000000000000001010 + .faraddr %100000000000000000001011 + .faraddr %100000000000000000001100 + .faraddr %100000000000000000001101 + .faraddr %100000000000000000001110 + .faraddr %100000000000000000001111 + .faraddr %100111111111111111100001 + .faraddr %100111111111111111100010 + .faraddr %100111111111111111100011 + .faraddr %100111111111111111100100 + .faraddr %100111111111111111100101 + .faraddr %100111111111111111100110 + .faraddr %100111111111111111100111 + .faraddr %100111111111111111101000 + .faraddr %100111111111111111101001 + .faraddr %100111111111111111101010 + .faraddr %100111111111111111101011 + .faraddr %100111111111111111101100 + .faraddr %100111111111111111101101 + .faraddr %100111111111111111101110 + .faraddr %100111111111111111101111 + .faraddr %100111111111111111110000 + .faraddr %100111111111111111110001 + .faraddr %100111111111111111110010 + .faraddr %100111111111111111110011 + .faraddr %100111111111111111110100 + .faraddr %100111111111111111110101 + .faraddr %100111111111111111110110 + .faraddr %100111111111111111110111 + .faraddr %100111111111111111111000 + .faraddr %100111111111111111111001 + .faraddr %100111111111111111111010 + .faraddr %100111111111111111111011 + .faraddr %100111111111111111111100 + .faraddr %100111111111111111111101 + .faraddr %100111111111111111111110 + .faraddr %100111111111111111111111 + .faraddr %101000000000000000000000 + .faraddr %101000000000000000000001 + .faraddr %101000000000000000000010 + .faraddr %101000000000000000000011 + .faraddr %101000000000000000000100 + .faraddr %101000000000000000000101 + .faraddr %101000000000000000000110 + .faraddr %101000000000000000000111 + .faraddr %101000000000000000001000 + .faraddr %101000000000000000001001 + .faraddr %101000000000000000001010 + .faraddr %101000000000000000001011 + .faraddr %101000000000000000001100 + .faraddr %101000000000000000001101 + .faraddr %101000000000000000001110 + .faraddr %101000000000000000001111 + .faraddr %111111111111111111100001 + .faraddr %111111111111111111100010 + .faraddr %111111111111111111100011 + .faraddr %111111111111111111100100 + .faraddr %111111111111111111100101 + .faraddr %111111111111111111100110 + .faraddr %111111111111111111100111 + .faraddr %111111111111111111101000 + .faraddr %111111111111111111101001 + .faraddr %111111111111111111101010 + .faraddr %111111111111111111101011 + .faraddr %111111111111111111101100 + .faraddr %111111111111111111101101 + .faraddr %111111111111111111101110 + .faraddr %111111111111111111101111 + .faraddr %111111111111111111110000 + .faraddr %111111111111111111110001 + .faraddr %111111111111111111110010 + .faraddr %111111111111111111110011 + .faraddr %111111111111111111110100 + .faraddr %111111111111111111110101 + .faraddr %111111111111111111110110 + .faraddr %111111111111111111110111 + .faraddr %111111111111111111111000 + .faraddr %111111111111111111111001 + .faraddr %111111111111111111111010 + .faraddr %111111111111111111111011 + .faraddr %111111111111111111111100 + .faraddr %111111111111111111111101 + .faraddr %111111111111111111111110 + .faraddr %111111111111111111111111 + + ; binary values, full length + .faraddr %000000000000000000000000 + .faraddr %000000000000000000000001 + .faraddr %000000000000000000000010 + .faraddr %000000000000000000000011 + .faraddr %000000000000000000000100 + .faraddr %000000000000000000000101 + .faraddr %000000000000000000000110 + .faraddr %000000000000000000000111 + .faraddr %000000000000000000001000 + .faraddr %000000000000000000001001 + .faraddr %000000000000000000001010 + .faraddr %000000000000000000001011 + .faraddr %000000000000000000001100 + .faraddr %000000000000000000001101 + .faraddr %000000000000000000001110 + .faraddr %000000000000000000001111 + .faraddr %000000000000000000010000 + .faraddr %000000000000000000010001 + .faraddr %000000000000000000010010 + .faraddr %000000000000000000010011 + .faraddr %000000000000000001110000 + .faraddr %000000000000000001110001 + .faraddr %000000000000000001110010 + .faraddr %000000000000000001110011 + .faraddr %000000000000000001110100 + .faraddr %000000000000000001110101 + .faraddr %000000000000000001110110 + .faraddr %000000000000000001110111 + .faraddr %000000000000000001111000 + .faraddr %000000000000000001111001 + .faraddr %000000000000000001111010 + .faraddr %000000000000000001111011 + .faraddr %000000000000000001111100 + .faraddr %000000000000000001111101 + .faraddr %000000000000000001111110 + .faraddr %000000000000000001111111 + .faraddr %000000000000000010000000 + .faraddr %000000000000000010000001 + .faraddr %000000000000000010000010 + .faraddr %000000000000000010000011 + .faraddr %000000000000000010000100 + .faraddr %000000000000000010000101 + .faraddr %000000000000000010000110 + .faraddr %000000000000000011110000 + .faraddr %000000000000000011110001 + .faraddr %000000000000000011110010 + .faraddr %000000000000000011110011 + .faraddr %000000000000000011110100 + .faraddr %000000000000000011110101 + .faraddr %000000000000000011110110 + .faraddr %000000000000000011110111 + .faraddr %000000000000000011111000 + .faraddr %000000000000000011111001 + .faraddr %000000000000000011111010 + .faraddr %000000000000000011111011 + .faraddr %000000000000000011111100 + .faraddr %000000000000000011111101 + .faraddr %000000000000000011111110 + .faraddr %000000000000000011111111 + .faraddr %000000000000000100000000 + .faraddr %000000000000000100000001 + .faraddr %000000000000000100000010 + .faraddr %000000000000000100000011 + .faraddr %000000000000111111010010 + .faraddr %000000000000111111010011 + .faraddr %000000000000111111010100 + .faraddr %000000000000111111010101 + .faraddr %000000000000111111010110 + .faraddr %000000000000111111010111 + .faraddr %000000000000111111011000 + .faraddr %000000000000111111011001 + .faraddr %000000000000111111011010 + .faraddr %000000000000111111011011 + .faraddr %000000000000111111011100 + .faraddr %000000000000111111011101 + .faraddr %000000000000111111011110 + .faraddr %000000000000111111011111 + .faraddr %000000000000111111100000 + .faraddr %000000000000111111100001 + .faraddr %000000000000111111100010 + .faraddr %000000000000111111100011 + .faraddr %000000000000111111100100 + .faraddr %000000000000111111100101 + .faraddr %000000000000111111100110 + .faraddr %000000000000111111100111 + .faraddr %000000000000111111101000 + .faraddr %000000000000111111101001 + .faraddr %000000000000111111101010 + .faraddr %000000000000111111101011 + .faraddr %000000000000111111101100 + .faraddr %000000000000111111101101 + .faraddr %000000000000111111101110 + .faraddr %000000000000111111101111 + .faraddr %000000000000111111110000 + .faraddr %000000000000111111110001 + .faraddr %000000000000111111110010 + .faraddr %000000000000111111110011 + .faraddr %000000000000111111110100 + .faraddr %000000000000111111110101 + .faraddr %000000000000111111110110 + .faraddr %000000000000111111110111 + .faraddr %000000000000111111111000 + .faraddr %000000000000111111111001 + .faraddr %000000000000111111111010 + .faraddr %000000000000111111111011 + .faraddr %000000000000111111111100 + .faraddr %000000000000111111111101 + .faraddr %000000000000111111111110 + .faraddr %000000000000111111111111 + .faraddr %000000000001000000000000 + .faraddr %000000000001000000000001 + .faraddr %000000000001000000000010 + .faraddr %000000000001000000000011 + .faraddr %000000000001000000000100 + .faraddr %000000000001000000000101 + .faraddr %000000000001000000000110 + .faraddr %000000000001000000000111 + .faraddr %000000000001000000001000 + .faraddr %000000000111111111110000 + .faraddr %000000000111111111110001 + .faraddr %000000000111111111110010 + .faraddr %000000000111111111110011 + .faraddr %000000000111111111110100 + .faraddr %000000000111111111110101 + .faraddr %000000000111111111110110 + .faraddr %000000000111111111110111 + .faraddr %000000000111111111111000 + .faraddr %000000000111111111111001 + .faraddr %000000000111111111111010 + .faraddr %000000000111111111111011 + .faraddr %000000000111111111111100 + .faraddr %000000000111111111111101 + .faraddr %000000000111111111111110 + .faraddr %000000000111111111111111 + .faraddr %000000001000000000000000 + .faraddr %000000001000000000000001 + .faraddr %000000001000000000000010 + .faraddr %000000001000000000000011 + .faraddr %000000001000000000000100 + .faraddr %000000001000000000000101 + .faraddr %000000001000000000000110 + .faraddr %000000001000000000000111 + .faraddr %000000001000000000001000 + .faraddr %000000001000000000001001 + .faraddr %000000001000000000001010 + .faraddr %000000001000000000001011 + .faraddr %000000001001111111100001 + .faraddr %000000001001111111100010 + .faraddr %000000001001111111100011 + .faraddr %000000001001111111100100 + .faraddr %000000001001111111100101 + .faraddr %000000001001111111100110 + .faraddr %000000001001111111100111 + .faraddr %000000001001111111101000 + .faraddr %000000001001111111101001 + .faraddr %000000001001111111101010 + .faraddr %000000001001111111101011 + .faraddr %000000001001111111101100 + .faraddr %000000001001111111101101 + .faraddr %000000001001111111101110 + .faraddr %000000001001111111101111 + .faraddr %000000001001111111110000 + .faraddr %000000001001111111110001 + .faraddr %000000001001111111110010 + .faraddr %000000001001111111110011 + .faraddr %000000001001111111110100 + .faraddr %000000001001111111110101 + .faraddr %000000001001111111110110 + .faraddr %000000001001111111110111 + .faraddr %000000001001111111111000 + .faraddr %000000001001111111111001 + .faraddr %000000001001111111111010 + .faraddr %000000001001111111111011 + .faraddr %000000001001111111111100 + .faraddr %000000001001111111111101 + .faraddr %000000001001111111111110 + .faraddr %000000001001111111111111 + .faraddr %000000001010000000000000 + .faraddr %000000001010000000000001 + .faraddr %000000001010000000000010 + .faraddr %000000001010000000000011 + .faraddr %000000001010000000000100 + .faraddr %000000001010000000000101 + .faraddr %000000001010000000000110 + .faraddr %000000001010000000000111 + .faraddr %000000001010000000001000 + .faraddr %000000001010000000001001 + .faraddr %000000001010000000001010 + .faraddr %000000001010000000001011 + .faraddr %000000001010000000001100 + .faraddr %000000001010000000001101 + .faraddr %000000001010000000001110 + .faraddr %000000001010000000001111 + .faraddr %000000001010111111100001 + .faraddr %000000001010111111100010 + .faraddr %000000001010111111100011 + .faraddr %000000001010111111100100 + .faraddr %000000001010111111100101 + .faraddr %000000001010111111100110 + .faraddr %000000001010111111100111 + .faraddr %000000001010111111101000 + .faraddr %000000001010111111101001 + .faraddr %000000001010111111101010 + .faraddr %000000001010111111101011 + .faraddr %000000001010111111101100 + .faraddr %000000001010111111101101 + .faraddr %000000001010111111101110 + .faraddr %000000001010111111101111 + .faraddr %000000001010111111110000 + .faraddr %000000001010111111110001 + .faraddr %000000001010111111110010 + .faraddr %000000001010111111110011 + .faraddr %000000001010111111110100 + .faraddr %000000001010111111110101 + .faraddr %000000001010111111110110 + .faraddr %000000001010111111110111 + .faraddr %000000001010111111111000 + .faraddr %000000001010111111111001 + .faraddr %000000001010111111111010 + .faraddr %000000001010111111111011 + .faraddr %000000001010111111111100 + .faraddr %000000001010111111111101 + .faraddr %000000001010111111111110 + .faraddr %000000001010111111111111 + .faraddr %000000001011000000000000 + .faraddr %000000001011000000000001 + .faraddr %000000001011000000000010 + .faraddr %000000001011000000000011 + .faraddr %000000001011000000000100 + .faraddr %000000001011000000000101 + .faraddr %000000001011000000000110 + .faraddr %000000001011000000000111 + .faraddr %000000001011000000001000 + .faraddr %000000001011000000001001 + .faraddr %000000001011000000001010 + .faraddr %000000001011000000001011 + .faraddr %000000001011000000001100 + .faraddr %000000001011000000001101 + .faraddr %000000001011000000001110 + .faraddr %000000001011000000001111 + .faraddr %000000001111111111100001 + .faraddr %000000001111111111100010 + .faraddr %000000001111111111100011 + .faraddr %000000001111111111100100 + .faraddr %000000001111111111100101 + .faraddr %000000001111111111100110 + .faraddr %000000001111111111100111 + .faraddr %000000001111111111101000 + .faraddr %000000001111111111101001 + .faraddr %000000001111111111101010 + .faraddr %000000001111111111101011 + .faraddr %000000001111111111101100 + .faraddr %000000001111111111101101 + .faraddr %000000001111111111101110 + .faraddr %000000001111111111101111 + .faraddr %000000001111111111110000 + .faraddr %000000001111111111110001 + .faraddr %000000001111111111110010 + .faraddr %000000001111111111110011 + .faraddr %000000001111111111110100 + .faraddr %000000001111111111110101 + .faraddr %000000001111111111110110 + .faraddr %000000001111111111110111 + .faraddr %000000001111111111111000 + .faraddr %000000001111111111111001 + .faraddr %000000001111111111111010 + .faraddr %000000001111111111111011 + .faraddr %000000001111111111111100 + .faraddr %000000001111111111111101 + .faraddr %000000001111111111111110 + .faraddr %000000001111111111111111 + .faraddr %000000010000000000000000 + .faraddr %000000010000000000000001 + .faraddr %000000010000000000000010 + .faraddr %000000010000000000000011 + .faraddr %000000010000000000000100 + .faraddr %000000010000000000000101 + .faraddr %000000010000000000000110 + .faraddr %000000010000000000000111 + .faraddr %000000010000000000001000 + .faraddr %000000010000000000001001 + .faraddr %000000010000000000001010 + .faraddr %000000010000000000001011 + .faraddr %000000010000000000001100 + .faraddr %000000010000000000001101 + .faraddr %000000010000000000001110 + .faraddr %000000010000000000001111 + .faraddr %000100001111111111100001 + .faraddr %000100001111111111100010 + .faraddr %000100001111111111100011 + .faraddr %000100001111111111100100 + .faraddr %000100001111111111100101 + .faraddr %000100001111111111100110 + .faraddr %000100001111111111100111 + .faraddr %000100001111111111101000 + .faraddr %000100001111111111101001 + .faraddr %000100001111111111101010 + .faraddr %000100001111111111101011 + .faraddr %000100001111111111101100 + .faraddr %000100001111111111101101 + .faraddr %000100001111111111101110 + .faraddr %000100001111111111101111 + .faraddr %000100001111111111110000 + .faraddr %000100001111111111110001 + .faraddr %000100001111111111110010 + .faraddr %000100001111111111110011 + .faraddr %000100001111111111110100 + .faraddr %000100001111111111110101 + .faraddr %000100001111111111110110 + .faraddr %000100001111111111110111 + .faraddr %000100001111111111111000 + .faraddr %000100001111111111111001 + .faraddr %000100001111111111111010 + .faraddr %000100001111111111111011 + .faraddr %000100001111111111111100 + .faraddr %000100001111111111111101 + .faraddr %000100001111111111111110 + .faraddr %000100001111111111111111 + .faraddr %000100010000000000000000 + .faraddr %000100010000000000000001 + .faraddr %000100010000000000000010 + .faraddr %000100010000000000000011 + .faraddr %000100010000000000000100 + .faraddr %000100010000000000000101 + .faraddr %000100010000000000000110 + .faraddr %000100010000000000000111 + .faraddr %000100010000000000001000 + .faraddr %000100010000000000001001 + .faraddr %000100010000000000001010 + .faraddr %000100010000000000001011 + .faraddr %000100010000000000001100 + .faraddr %000100010000000000001101 + .faraddr %000100010000000000001110 + .faraddr %000100010000000000001111 + .faraddr %001000001111111111100001 + .faraddr %001000001111111111100010 + .faraddr %001000001111111111100011 + .faraddr %001000001111111111100100 + .faraddr %001000001111111111100101 + .faraddr %001000001111111111100110 + .faraddr %001000001111111111100111 + .faraddr %001000001111111111101000 + .faraddr %001000001111111111101001 + .faraddr %001000001111111111101010 + .faraddr %001000001111111111101011 + .faraddr %001000001111111111101100 + .faraddr %001000001111111111101101 + .faraddr %001000001111111111101110 + .faraddr %001000001111111111101111 + .faraddr %001000001111111111110000 + .faraddr %001000001111111111110001 + .faraddr %001000001111111111110010 + .faraddr %001000001111111111110011 + .faraddr %001000001111111111110100 + .faraddr %001000001111111111110101 + .faraddr %001000001111111111110110 + .faraddr %001000001111111111110111 + .faraddr %001000001111111111111000 + .faraddr %001000001111111111111001 + .faraddr %001000001111111111111010 + .faraddr %001000001111111111111011 + .faraddr %001000001111111111111100 + .faraddr %001000001111111111111101 + .faraddr %001000001111111111111110 + .faraddr %001000001111111111111111 + .faraddr %001000010000000000000000 + .faraddr %001000010000000000000001 + .faraddr %001000010000000000000010 + .faraddr %001000010000000000000011 + .faraddr %001000010000000000000100 + .faraddr %001000010000000000000101 + .faraddr %001000010000000000000110 + .faraddr %001000010000000000000111 + .faraddr %001000010000000000001000 + .faraddr %001000010000000000001001 + .faraddr %001000010000000000001010 + .faraddr %001000010000000000001011 + .faraddr %001000010000000000001100 + .faraddr %001000010000000000001101 + .faraddr %001000010000000000001110 + .faraddr %001000010000000000001111 + .faraddr %011111111111111111100001 + .faraddr %011111111111111111100010 + .faraddr %011111111111111111100011 + .faraddr %011111111111111111100100 + .faraddr %011111111111111111100101 + .faraddr %011111111111111111100110 + .faraddr %011111111111111111100111 + .faraddr %011111111111111111101000 + .faraddr %011111111111111111101001 + .faraddr %011111111111111111101010 + .faraddr %011111111111111111101011 + .faraddr %011111111111111111101100 + .faraddr %011111111111111111101101 + .faraddr %011111111111111111101110 + .faraddr %011111111111111111101111 + .faraddr %011111111111111111110000 + .faraddr %011111111111111111110001 + .faraddr %011111111111111111110010 + .faraddr %011111111111111111110011 + .faraddr %011111111111111111110100 + .faraddr %011111111111111111110101 + .faraddr %011111111111111111110110 + .faraddr %011111111111111111110111 + .faraddr %011111111111111111111000 + .faraddr %011111111111111111111001 + .faraddr %011111111111111111111010 + .faraddr %011111111111111111111011 + .faraddr %011111111111111111111100 + .faraddr %011111111111111111111101 + .faraddr %011111111111111111111110 + .faraddr %011111111111111111111111 + .faraddr %100000000000000000000000 + .faraddr %100000000000000000000001 + .faraddr %100000000000000000000010 + .faraddr %100000000000000000000011 + .faraddr %100000000000000000000100 + .faraddr %100000000000000000000101 + .faraddr %100000000000000000000110 + .faraddr %100000000000000000000111 + .faraddr %100000000000000000001000 + .faraddr %100000000000000000001001 + .faraddr %100000000000000000001010 + .faraddr %100000000000000000001011 + .faraddr %100000000000000000001100 + .faraddr %100000000000000000001101 + .faraddr %100000000000000000001110 + .faraddr %100000000000000000001111 + .faraddr %100111111111111111100001 + .faraddr %100111111111111111100010 + .faraddr %100111111111111111100011 + .faraddr %100111111111111111100100 + .faraddr %100111111111111111100101 + .faraddr %100111111111111111100110 + .faraddr %100111111111111111100111 + .faraddr %100111111111111111101000 + .faraddr %100111111111111111101001 + .faraddr %100111111111111111101010 + .faraddr %100111111111111111101011 + .faraddr %100111111111111111101100 + .faraddr %100111111111111111101101 + .faraddr %100111111111111111101110 + .faraddr %100111111111111111101111 + .faraddr %100111111111111111110000 + .faraddr %100111111111111111110001 + .faraddr %100111111111111111110010 + .faraddr %100111111111111111110011 + .faraddr %100111111111111111110100 + .faraddr %100111111111111111110101 + .faraddr %100111111111111111110110 + .faraddr %100111111111111111110111 + .faraddr %100111111111111111111000 + .faraddr %100111111111111111111001 + .faraddr %100111111111111111111010 + .faraddr %100111111111111111111011 + .faraddr %100111111111111111111100 + .faraddr %100111111111111111111101 + .faraddr %100111111111111111111110 + .faraddr %100111111111111111111111 + .faraddr %101000000000000000000000 + .faraddr %101000000000000000000001 + .faraddr %101000000000000000000010 + .faraddr %101000000000000000000011 + .faraddr %101000000000000000000100 + .faraddr %101000000000000000000101 + .faraddr %101000000000000000000110 + .faraddr %101000000000000000000111 + .faraddr %101000000000000000001000 + .faraddr %101000000000000000001001 + .faraddr %101000000000000000001010 + .faraddr %101000000000000000001011 + .faraddr %101000000000000000001100 + .faraddr %101000000000000000001101 + .faraddr %101000000000000000001110 + .faraddr %101000000000000000001111 + .faraddr %111111111111111111100001 + .faraddr %111111111111111111100010 + .faraddr %111111111111111111100011 + .faraddr %111111111111111111100100 + .faraddr %111111111111111111100101 + .faraddr %111111111111111111100110 + .faraddr %111111111111111111100111 + .faraddr %111111111111111111101000 + .faraddr %111111111111111111101001 + .faraddr %111111111111111111101010 + .faraddr %111111111111111111101011 + .faraddr %111111111111111111101100 + .faraddr %111111111111111111101101 + .faraddr %111111111111111111101110 + .faraddr %111111111111111111101111 + .faraddr %111111111111111111110000 + .faraddr %111111111111111111110001 + .faraddr %111111111111111111110010 + .faraddr %111111111111111111110011 + .faraddr %111111111111111111110100 + .faraddr %111111111111111111110101 + .faraddr %111111111111111111110110 + .faraddr %111111111111111111110111 + .faraddr %111111111111111111111000 + .faraddr %111111111111111111111001 + .faraddr %111111111111111111111010 + .faraddr %111111111111111111111011 + .faraddr %111111111111111111111100 + .faraddr %111111111111111111111101 + .faraddr %111111111111111111111110 + .faraddr %111111111111111111111111 + + ; multiple values on one line, decimal + .faraddr 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 + .faraddr 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 + .faraddr 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 + .faraddr 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 + .faraddr 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 + .faraddr 256,257,258,259,260,261,262,263,264,265,266,267,268,269,270,271 + .faraddr 4064,4065,4066,4067,4068,4069,4070,4071,4072,4073,4074,4075,4076,4077,4078,4079 + .faraddr 4080,4081,4082,4083,4084,4085,4086,4087,4088,4089,4090,4091,4092,4093,4094,4095 + .faraddr 4096,4097,4098,4099,4100,4101,4102,4103,4104,4105,4106,4107,4108,4109,4110,4111 + .faraddr 32752,32753,32754,32755,32756,32757,32758,32759,32760,32761,32762,32763,32764,32765,32766,32767 + .faraddr 32768,32769,32770,32771,32772,32773,32774,32775,32776,32777,32778,32779,32780,32781,32782,32783 + .faraddr 40943,40944,40945,40946,40947,40948,40949,40950,40951,40952,40953,40954,40955,40956,40957,40958 + .faraddr 40959,40960,40961,40962,40963,40964,40965,40966,40967,40968,40969,40970,40971,40972,40973,40974 + .faraddr 40975,40976,40977,40978,40979,40980,40981,40982,40983,40984,40985,40986,40987,40988,40989,40990 + .faraddr 45039,45040,45041,45042,45043,45044,45045,45046,45047,45048,45049,45050,45051,45052,45053,45054 + .faraddr 45055,45056,45057,45058,45059,45060,45061,45062,45063,45064,45065,45066,45067,45068,45069,45070 + .faraddr 45071,45072,45073,45074,45075,45076,45077,45078,45079,45080,45081,45082,45083,45084,45085,45086 + .faraddr 65519,65520,65521,65522,65523,65524,65525,65526,65527,65528,65529,65530,65531,65532,65533,65534 + .faraddr 65535,65536,65537,65538,65539,65540,65541,65542,65543,65544,65545,65546,65547,65548,65549,65550 + .faraddr 65551,65552,65553,65554,65555,65556,65557,65558,65559,65560,65561,65562,65563,65564,65565,65566 + .faraddr 1114095,1114096,1114097,1114098,1114099,1114100,1114101,1114102,1114103,1114104,1114105,1114106,1114107,1114108,1114109,1114110 + .faraddr 1114111,1114112,1114113,1114114,1114115,1114116,1114117,1114118,1114119,1114120,1114121,1114122,1114123,1114124,1114125,1114126 + .faraddr 1114127,1114128,1114129,1114130,1114131,1114132,1114133,1114134,1114135,1114136,1114137,1114138,1114139,1114140,1114141,1114142 + .faraddr 2162671,2162672,2162673,2162674,2162675,2162676,2162677,2162678,2162679,2162680,2162681,2162682,2162683,2162684,2162685,2162686 + .faraddr 2162687,2162688,2162689,2162690,2162691,2162692,2162693,2162694,2162695,2162696,2162697,2162698,2162699,2162700,2162701,2162702 + .faraddr 2162703,2162704,2162705,2162706,2162707,2162708,2162709,2162710,2162711,2162712,2162713,2162714,2162715,2162716,2162717,2162718 + .faraddr 8388591,8388592,8388593,8388594,8388595,8388596,8388597,8388598,8388599,8388600,8388601,8388602,8388603,8388604,8388605,8388606 + .faraddr 8388607,8388608,8388609,8388610,8388611,8388612,8388613,8388614,8388615,8388616,8388617,8388618,8388619,8388620,8388621,8388622 + .faraddr 8388623,8388624,8388625,8388626,8388627,8388628,8388629,8388630,8388631,8388632,8388633,8388634,8388635,8388636,8388637,8388638 + .faraddr 10485743,10485744,10485745,10485746,10485747,10485748,10485749,10485750,10485751,10485752,10485753,10485754,10485755,10485756,10485757,10485758 + .faraddr 10485759,10485760,10485761,10485762,10485763,10485764,10485765,10485766,10485767,10485768,10485769,10485770,10485771,10485772,10485773,10485774 + .faraddr 10485775,10485776,10485777,10485778,10485779,10485780,10485781,10485782,10485783,10485784,10485785,10485786,10485787,10485788,10485789,10485790 + .faraddr 16777199,16777200,16777201,16777202,16777203,16777204,16777205,16777206,16777207,16777208,16777209,16777210,16777211,16777212,16777213,16777214 + .faraddr 16777215 + + ; multiple values on one line, hex + .faraddr $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f + .faraddr $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f + .faraddr $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f + .faraddr $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f + .faraddr $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff + .faraddr $100,$101,$102,$103,$104,$105,$106,$107,$108,$109,$10a,$10b,$10c,$10d,$10e,$10f + .faraddr $fe0,$fe1,$fe2,$fe3,$fe4,$fe5,$fe6,$fe7,$fe8,$fe9,$fea,$feb,$fec,$fed,$fee,$fef + .faraddr $ff0,$ff1,$ff2,$ff3,$ff4,$ff5,$ff6,$ff7,$ff8,$ff9,$ffa,$ffb,$ffc,$ffd,$ffe,$fff + .faraddr $1000,$1001,$1002,$1003,$1004,$1005,$1006,$1007,$1008,$1009,$100a,$100b,$100c,$100d,$100e,$100f + .faraddr $7ff0,$7ff1,$7ff2,$7ff3,$7ff4,$7ff5,$7ff6,$7ff7,$7ff8,$7ff9,$7ffa,$7ffb,$7ffc,$7ffd,$7ffe,$7fff + .faraddr $8000,$8001,$8002,$8003,$8004,$8005,$8006,$8007,$8008,$8009,$800a,$800b,$800c,$800d,$800e,$800f + .faraddr $9fef,$9ff0,$9ff1,$9ff2,$9ff3,$9ff4,$9ff5,$9ff6,$9ff7,$9ff8,$9ff9,$9ffa,$9ffb,$9ffc,$9ffd,$9ffe + .faraddr $9fff,$a000,$a001,$a002,$a003,$a004,$a005,$a006,$a007,$a008,$a009,$a00a,$a00b,$a00c,$a00d,$a00e + .faraddr $a00f,$a010,$a011,$a012,$a013,$a014,$a015,$a016,$a017,$a018,$a019,$a01a,$a01b,$a01c,$a01d,$a01e + .faraddr $afef,$aff0,$aff1,$aff2,$aff3,$aff4,$aff5,$aff6,$aff7,$aff8,$aff9,$affa,$affb,$affc,$affd,$affe + .faraddr $afff,$b000,$b001,$b002,$b003,$b004,$b005,$b006,$b007,$b008,$b009,$b00a,$b00b,$b00c,$b00d,$b00e + .faraddr $b00f,$b010,$b011,$b012,$b013,$b014,$b015,$b016,$b017,$b018,$b019,$b01a,$b01b,$b01c,$b01d,$b01e + .faraddr $ffef,$fff0,$fff1,$fff2,$fff3,$fff4,$fff5,$fff6,$fff7,$fff8,$fff9,$fffa,$fffb,$fffc,$fffd,$fffe + .faraddr $ffff,$10000,$10001,$10002,$10003,$10004,$10005,$10006,$10007,$10008,$10009,$1000a,$1000b,$1000c,$1000d,$1000e + .faraddr $1000f,$10010,$10011,$10012,$10013,$10014,$10015,$10016,$10017,$10018,$10019,$1001a,$1001b,$1001c,$1001d,$1001e + .faraddr $10ffef,$10fff0,$10fff1,$10fff2,$10fff3,$10fff4,$10fff5,$10fff6,$10fff7,$10fff8,$10fff9,$10fffa,$10fffb,$10fffc,$10fffd,$10fffe + .faraddr $10ffff,$110000,$110001,$110002,$110003,$110004,$110005,$110006,$110007,$110008,$110009,$11000a,$11000b,$11000c,$11000d,$11000e + .faraddr $11000f,$110010,$110011,$110012,$110013,$110014,$110015,$110016,$110017,$110018,$110019,$11001a,$11001b,$11001c,$11001d,$11001e + .faraddr $20ffef,$20fff0,$20fff1,$20fff2,$20fff3,$20fff4,$20fff5,$20fff6,$20fff7,$20fff8,$20fff9,$20fffa,$20fffb,$20fffc,$20fffd,$20fffe + .faraddr $20ffff,$210000,$210001,$210002,$210003,$210004,$210005,$210006,$210007,$210008,$210009,$21000a,$21000b,$21000c,$21000d,$21000e + .faraddr $21000f,$210010,$210011,$210012,$210013,$210014,$210015,$210016,$210017,$210018,$210019,$21001a,$21001b,$21001c,$21001d,$21001e + .faraddr $7fffef,$7ffff0,$7ffff1,$7ffff2,$7ffff3,$7ffff4,$7ffff5,$7ffff6,$7ffff7,$7ffff8,$7ffff9,$7ffffa,$7ffffb,$7ffffc,$7ffffd,$7ffffe + .faraddr $7fffff,$800000,$800001,$800002,$800003,$800004,$800005,$800006,$800007,$800008,$800009,$80000a,$80000b,$80000c,$80000d,$80000e + .faraddr $80000f,$800010,$800011,$800012,$800013,$800014,$800015,$800016,$800017,$800018,$800019,$80001a,$80001b,$80001c,$80001d,$80001e + .faraddr $9fffef,$9ffff0,$9ffff1,$9ffff2,$9ffff3,$9ffff4,$9ffff5,$9ffff6,$9ffff7,$9ffff8,$9ffff9,$9ffffa,$9ffffb,$9ffffc,$9ffffd,$9ffffe + .faraddr $9fffff,$a00000,$a00001,$a00002,$a00003,$a00004,$a00005,$a00006,$a00007,$a00008,$a00009,$a0000a,$a0000b,$a0000c,$a0000d,$a0000e + .faraddr $a0000f,$a00010,$a00011,$a00012,$a00013,$a00014,$a00015,$a00016,$a00017,$a00018,$a00019,$a0001a,$a0001b,$a0001c,$a0001d,$a0001e + .faraddr $ffffef,$fffff0,$fffff1,$fffff2,$fffff3,$fffff4,$fffff5,$fffff6,$fffff7,$fffff8,$fffff9,$fffffa,$fffffb,$fffffc,$fffffd,$fffffe + .faraddr $ffffff + + ; multiple values on one line, alternative hex + .faraddr 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh + .faraddr 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh + .faraddr 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh + .faraddr 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh + .faraddr 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh + .faraddr 100h,101h,102h,103h,104h,105h,106h,107h,108h,109h,10ah,10bh,10ch,10dh,10eh,10fh + .faraddr 0fe0h,0fe1h,0fe2h,0fe3h,0fe4h,0fe5h,0fe6h,0fe7h,0fe8h,0fe9h,0feah,0febh,0fech,0fedh,0feeh,0fefh + .faraddr 0ff0h,0ff1h,0ff2h,0ff3h,0ff4h,0ff5h,0ff6h,0ff7h,0ff8h,0ff9h,0ffah,0ffbh,0ffch,0ffdh,0ffeh,0fffh + .faraddr 1000h,1001h,1002h,1003h,1004h,1005h,1006h,1007h,1008h,1009h,100ah,100bh,100ch,100dh,100eh,100fh + .faraddr 7ff0h,7ff1h,7ff2h,7ff3h,7ff4h,7ff5h,7ff6h,7ff7h,7ff8h,7ff9h,7ffah,7ffbh,7ffch,7ffdh,7ffeh,7fffh + .faraddr 8000h,8001h,8002h,8003h,8004h,8005h,8006h,8007h,8008h,8009h,800ah,800bh,800ch,800dh,800eh,800fh + .faraddr 9fefh,9ff0h,9ff1h,9ff2h,9ff3h,9ff4h,9ff5h,9ff6h,9ff7h,9ff8h,9ff9h,9ffah,9ffbh,9ffch,9ffdh,9ffeh + .faraddr 9fffh,0a000h,0a001h,0a002h,0a003h,0a004h,0a005h,0a006h,0a007h,0a008h,0a009h,0a00ah,0a00bh,0a00ch,0a00dh,0a00eh + .faraddr 0a00fh,0a010h,0a011h,0a012h,0a013h,0a014h,0a015h,0a016h,0a017h,0a018h,0a019h,0a01ah,0a01bh,0a01ch,0a01dh,0a01eh + .faraddr 0afefh,0aff0h,0aff1h,0aff2h,0aff3h,0aff4h,0aff5h,0aff6h,0aff7h,0aff8h,0aff9h,0affah,0affbh,0affch,0affdh,0affeh + .faraddr 0afffh,0b000h,0b001h,0b002h,0b003h,0b004h,0b005h,0b006h,0b007h,0b008h,0b009h,0b00ah,0b00bh,0b00ch,0b00dh,0b00eh + .faraddr 0b00fh,0b010h,0b011h,0b012h,0b013h,0b014h,0b015h,0b016h,0b017h,0b018h,0b019h,0b01ah,0b01bh,0b01ch,0b01dh,0b01eh + .faraddr 0ffefh,0fff0h,0fff1h,0fff2h,0fff3h,0fff4h,0fff5h,0fff6h,0fff7h,0fff8h,0fff9h,0fffah,0fffbh,0fffch,0fffdh,0fffeh + .faraddr 0ffffh,10000h,10001h,10002h,10003h,10004h,10005h,10006h,10007h,10008h,10009h,1000ah,1000bh,1000ch,1000dh,1000eh + .faraddr 1000fh,10010h,10011h,10012h,10013h,10014h,10015h,10016h,10017h,10018h,10019h,1001ah,1001bh,1001ch,1001dh,1001eh + .faraddr 10ffefh,10fff0h,10fff1h,10fff2h,10fff3h,10fff4h,10fff5h,10fff6h,10fff7h,10fff8h,10fff9h,10fffah,10fffbh,10fffch,10fffdh,10fffeh + .faraddr 10ffffh,110000h,110001h,110002h,110003h,110004h,110005h,110006h,110007h,110008h,110009h,11000ah,11000bh,11000ch,11000dh,11000eh + .faraddr 11000fh,110010h,110011h,110012h,110013h,110014h,110015h,110016h,110017h,110018h,110019h,11001ah,11001bh,11001ch,11001dh,11001eh + .faraddr 20ffefh,20fff0h,20fff1h,20fff2h,20fff3h,20fff4h,20fff5h,20fff6h,20fff7h,20fff8h,20fff9h,20fffah,20fffbh,20fffch,20fffdh,20fffeh + .faraddr 20ffffh,210000h,210001h,210002h,210003h,210004h,210005h,210006h,210007h,210008h,210009h,21000ah,21000bh,21000ch,21000dh,21000eh + .faraddr 21000fh,210010h,210011h,210012h,210013h,210014h,210015h,210016h,210017h,210018h,210019h,21001ah,21001bh,21001ch,21001dh,21001eh + .faraddr 7fffefh,7ffff0h,7ffff1h,7ffff2h,7ffff3h,7ffff4h,7ffff5h,7ffff6h,7ffff7h,7ffff8h,7ffff9h,7ffffah,7ffffbh,7ffffch,7ffffdh,7ffffeh + .faraddr 7fffffh,800000h,800001h,800002h,800003h,800004h,800005h,800006h,800007h,800008h,800009h,80000ah,80000bh,80000ch,80000dh,80000eh + .faraddr 80000fh,800010h,800011h,800012h,800013h,800014h,800015h,800016h,800017h,800018h,800019h,80001ah,80001bh,80001ch,80001dh,80001eh + .faraddr 9fffefh,9ffff0h,9ffff1h,9ffff2h,9ffff3h,9ffff4h,9ffff5h,9ffff6h,9ffff7h,9ffff8h,9ffff9h,9ffffah,9ffffbh,9ffffch,9ffffdh,9ffffeh + .faraddr 9fffffh,0a00000h,0a00001h,0a00002h,0a00003h,0a00004h,0a00005h,0a00006h,0a00007h,0a00008h,0a00009h,0a0000ah,0a0000bh,0a0000ch,0a0000dh,0a0000eh + .faraddr 0a0000fh,0a00010h,0a00011h,0a00012h,0a00013h,0a00014h,0a00015h,0a00016h,0a00017h,0a00018h,0a00019h,0a0001ah,0a0001bh,0a0001ch,0a0001dh,0a0001eh + .faraddr 0ffffefh,0fffff0h,0fffff1h,0fffff2h,0fffff3h,0fffff4h,0fffff5h,0fffff6h,0fffff7h,0fffff8h,0fffff9h,0fffffah,0fffffbh,0fffffch,0fffffdh,0fffffeh + .faraddr 0ffffffh + + ; mix some variants + .faraddr 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh diff --git a/test/asm/listing/106-hibytes.s b/test/asm/listing/106-hibytes.s new file mode 100644 index 000000000..6a4e575c7 --- /dev/null +++ b/test/asm/listing/106-hibytes.s @@ -0,0 +1,6076 @@ +; 2022-06-15 Spiro Trikaliotis + + + ; upper case pseudo-op + .HIBYTES 0 + .HIBYTES 1 + .HIBYTES 2 + .HIBYTES 3 + .HIBYTES 4 + .HIBYTES 5 + .HIBYTES 6 + .HIBYTES 7 + .HIBYTES 8 + .HIBYTES 9 + .HIBYTES 10 + .HIBYTES 11 + .HIBYTES 12 + .HIBYTES 13 + .HIBYTES 14 + .HIBYTES 15 + .HIBYTES 16 + .HIBYTES 17 + .HIBYTES 18 + .HIBYTES 19 + .HIBYTES 112 + .HIBYTES 113 + .HIBYTES 114 + .HIBYTES 115 + .HIBYTES 116 + .HIBYTES 117 + .HIBYTES 118 + .HIBYTES 119 + .HIBYTES 120 + .HIBYTES 121 + .HIBYTES 122 + .HIBYTES 123 + .HIBYTES 124 + .HIBYTES 125 + .HIBYTES 126 + .HIBYTES 127 + .HIBYTES 128 + .HIBYTES 129 + .HIBYTES 130 + .HIBYTES 131 + .HIBYTES 132 + .HIBYTES 133 + .HIBYTES 134 + .HIBYTES 240 + .HIBYTES 241 + .HIBYTES 242 + .HIBYTES 243 + .HIBYTES 244 + .HIBYTES 245 + .HIBYTES 246 + .HIBYTES 247 + .HIBYTES 248 + .HIBYTES 249 + .HIBYTES 250 + .HIBYTES 251 + .HIBYTES 252 + .HIBYTES 253 + .HIBYTES 254 + .HIBYTES 255 + .HIBYTES 256 + .HIBYTES 257 + .HIBYTES 258 + .HIBYTES 259 + .HIBYTES 4050 + .HIBYTES 4051 + .HIBYTES 4052 + .HIBYTES 4053 + .HIBYTES 4054 + .HIBYTES 4055 + .HIBYTES 4056 + .HIBYTES 4057 + .HIBYTES 4058 + .HIBYTES 4059 + .HIBYTES 4060 + .HIBYTES 4061 + .HIBYTES 4062 + .HIBYTES 4063 + .HIBYTES 4064 + .HIBYTES 4065 + .HIBYTES 4066 + .HIBYTES 4067 + .HIBYTES 4068 + .HIBYTES 4069 + .HIBYTES 4070 + .HIBYTES 4071 + .HIBYTES 4072 + .HIBYTES 4073 + .HIBYTES 4074 + .HIBYTES 4075 + .HIBYTES 4076 + .HIBYTES 4077 + .HIBYTES 4078 + .HIBYTES 4079 + .HIBYTES 4080 + .HIBYTES 4081 + .HIBYTES 4082 + .HIBYTES 4083 + .HIBYTES 4084 + .HIBYTES 4085 + .HIBYTES 4086 + .HIBYTES 4087 + .HIBYTES 4088 + .HIBYTES 4089 + .HIBYTES 4090 + .HIBYTES 4091 + .HIBYTES 4092 + .HIBYTES 4093 + .HIBYTES 4094 + .HIBYTES 4095 + .HIBYTES 4096 + .HIBYTES 4097 + .HIBYTES 4098 + .HIBYTES 4099 + .HIBYTES 4100 + .HIBYTES 4101 + .HIBYTES 4102 + .HIBYTES 4103 + .HIBYTES 4104 + .HIBYTES 32752 + .HIBYTES 32753 + .HIBYTES 32754 + .HIBYTES 32755 + .HIBYTES 32756 + .HIBYTES 32757 + .HIBYTES 32758 + .HIBYTES 32759 + .HIBYTES 32760 + .HIBYTES 32761 + .HIBYTES 32762 + .HIBYTES 32763 + .HIBYTES 32764 + .HIBYTES 32765 + .HIBYTES 32766 + .HIBYTES 32767 + .HIBYTES 32768 + .HIBYTES 32769 + .HIBYTES 32770 + .HIBYTES 32771 + .HIBYTES 32772 + .HIBYTES 32773 + .HIBYTES 32774 + .HIBYTES 32775 + .HIBYTES 32776 + .HIBYTES 32777 + .HIBYTES 32778 + .HIBYTES 32779 + .HIBYTES 40929 + .HIBYTES 40930 + .HIBYTES 40931 + .HIBYTES 40932 + .HIBYTES 40933 + .HIBYTES 40934 + .HIBYTES 40935 + .HIBYTES 40936 + .HIBYTES 40937 + .HIBYTES 40938 + .HIBYTES 40939 + .HIBYTES 40940 + .HIBYTES 40941 + .HIBYTES 40942 + .HIBYTES 40943 + .HIBYTES 40944 + .HIBYTES 40945 + .HIBYTES 40946 + .HIBYTES 40947 + .HIBYTES 40948 + .HIBYTES 40949 + .HIBYTES 40950 + .HIBYTES 40951 + .HIBYTES 40952 + .HIBYTES 40953 + .HIBYTES 40954 + .HIBYTES 40955 + .HIBYTES 40956 + .HIBYTES 40957 + .HIBYTES 40958 + .HIBYTES 40959 + .HIBYTES 40960 + .HIBYTES 40961 + .HIBYTES 40962 + .HIBYTES 40963 + .HIBYTES 40964 + .HIBYTES 40965 + .HIBYTES 40966 + .HIBYTES 40967 + .HIBYTES 40968 + .HIBYTES 40969 + .HIBYTES 40970 + .HIBYTES 40971 + .HIBYTES 40972 + .HIBYTES 40973 + .HIBYTES 40974 + .HIBYTES 40975 + .HIBYTES 45025 + .HIBYTES 45026 + .HIBYTES 45027 + .HIBYTES 45028 + .HIBYTES 45029 + .HIBYTES 45030 + .HIBYTES 45031 + .HIBYTES 45032 + .HIBYTES 45033 + .HIBYTES 45034 + .HIBYTES 45035 + .HIBYTES 45036 + .HIBYTES 45037 + .HIBYTES 45038 + .HIBYTES 45039 + .HIBYTES 45040 + .HIBYTES 45041 + .HIBYTES 45042 + .HIBYTES 45043 + .HIBYTES 45044 + .HIBYTES 45045 + .HIBYTES 45046 + .HIBYTES 45047 + .HIBYTES 45048 + .HIBYTES 45049 + .HIBYTES 45050 + .HIBYTES 45051 + .HIBYTES 45052 + .HIBYTES 45053 + .HIBYTES 45054 + .HIBYTES 45055 + .HIBYTES 45056 + .HIBYTES 45057 + .HIBYTES 45058 + .HIBYTES 45059 + .HIBYTES 45060 + .HIBYTES 45061 + .HIBYTES 45062 + .HIBYTES 45063 + .HIBYTES 45064 + .HIBYTES 45065 + .HIBYTES 45066 + .HIBYTES 45067 + .HIBYTES 45068 + .HIBYTES 45069 + .HIBYTES 45070 + .HIBYTES 45071 + .HIBYTES 49121 + .HIBYTES 49122 + .HIBYTES 49123 + .HIBYTES 49124 + .HIBYTES 49125 + .HIBYTES 49126 + .HIBYTES 49127 + .HIBYTES 49128 + .HIBYTES 49129 + .HIBYTES 49130 + .HIBYTES 49131 + .HIBYTES 49132 + .HIBYTES 49133 + .HIBYTES 49134 + .HIBYTES 49135 + .HIBYTES 49136 + .HIBYTES 49137 + .HIBYTES 49138 + .HIBYTES 49139 + .HIBYTES 49140 + .HIBYTES 49141 + .HIBYTES 49142 + .HIBYTES 49143 + .HIBYTES 49144 + .HIBYTES 49145 + .HIBYTES 49146 + .HIBYTES 49147 + .HIBYTES 49148 + .HIBYTES 49149 + .HIBYTES 49150 + .HIBYTES 49151 + .HIBYTES 49152 + .HIBYTES 49153 + .HIBYTES 49154 + .HIBYTES 49155 + .HIBYTES 49156 + .HIBYTES 49157 + .HIBYTES 49158 + .HIBYTES 49159 + .HIBYTES 49160 + .HIBYTES 49161 + .HIBYTES 49162 + .HIBYTES 49163 + .HIBYTES 49164 + .HIBYTES 49165 + .HIBYTES 49166 + .HIBYTES 49167 + .HIBYTES 53217 + .HIBYTES 53218 + .HIBYTES 53219 + .HIBYTES 53220 + .HIBYTES 53221 + .HIBYTES 53222 + .HIBYTES 53223 + .HIBYTES 53224 + .HIBYTES 53225 + .HIBYTES 53226 + .HIBYTES 53227 + .HIBYTES 53228 + .HIBYTES 53229 + .HIBYTES 53230 + .HIBYTES 53231 + .HIBYTES 53232 + .HIBYTES 53233 + .HIBYTES 53234 + .HIBYTES 53235 + .HIBYTES 53236 + .HIBYTES 53237 + .HIBYTES 53238 + .HIBYTES 53239 + .HIBYTES 53240 + .HIBYTES 53241 + .HIBYTES 53242 + .HIBYTES 53243 + .HIBYTES 53244 + .HIBYTES 53245 + .HIBYTES 53246 + .HIBYTES 53247 + .HIBYTES 53248 + .HIBYTES 53249 + .HIBYTES 53250 + .HIBYTES 53251 + .HIBYTES 53252 + .HIBYTES 53253 + .HIBYTES 53254 + .HIBYTES 53255 + .HIBYTES 53256 + .HIBYTES 53257 + .HIBYTES 53258 + .HIBYTES 53259 + .HIBYTES 53260 + .HIBYTES 53261 + .HIBYTES 53262 + .HIBYTES 53263 + .HIBYTES 57313 + .HIBYTES 57314 + .HIBYTES 57315 + .HIBYTES 57316 + .HIBYTES 57317 + .HIBYTES 57318 + .HIBYTES 57319 + .HIBYTES 57320 + .HIBYTES 57321 + .HIBYTES 57322 + .HIBYTES 57323 + .HIBYTES 57324 + .HIBYTES 57325 + .HIBYTES 57326 + .HIBYTES 57327 + .HIBYTES 57328 + .HIBYTES 57329 + .HIBYTES 57330 + .HIBYTES 57331 + .HIBYTES 57332 + .HIBYTES 57333 + .HIBYTES 57334 + .HIBYTES 57335 + .HIBYTES 57336 + .HIBYTES 57337 + .HIBYTES 57338 + .HIBYTES 57339 + .HIBYTES 57340 + .HIBYTES 57341 + .HIBYTES 57342 + .HIBYTES 57343 + .HIBYTES 57344 + .HIBYTES 57345 + .HIBYTES 57346 + .HIBYTES 57347 + .HIBYTES 57348 + .HIBYTES 57349 + .HIBYTES 57350 + .HIBYTES 57351 + .HIBYTES 57352 + .HIBYTES 57353 + .HIBYTES 57354 + .HIBYTES 57355 + .HIBYTES 57356 + .HIBYTES 57357 + .HIBYTES 57358 + .HIBYTES 57359 + .HIBYTES 61409 + .HIBYTES 61410 + .HIBYTES 61411 + .HIBYTES 61412 + .HIBYTES 61413 + .HIBYTES 61414 + .HIBYTES 61415 + .HIBYTES 61416 + .HIBYTES 61417 + .HIBYTES 61418 + .HIBYTES 61419 + .HIBYTES 61420 + .HIBYTES 61421 + .HIBYTES 61422 + .HIBYTES 61423 + .HIBYTES 61424 + .HIBYTES 61425 + .HIBYTES 61426 + .HIBYTES 61427 + .HIBYTES 61428 + .HIBYTES 61429 + .HIBYTES 61430 + .HIBYTES 61431 + .HIBYTES 61432 + .HIBYTES 61433 + .HIBYTES 61434 + .HIBYTES 61435 + .HIBYTES 61436 + .HIBYTES 61437 + .HIBYTES 61438 + .HIBYTES 61439 + .HIBYTES 61440 + .HIBYTES 61441 + .HIBYTES 61442 + .HIBYTES 61443 + .HIBYTES 61444 + .HIBYTES 61445 + .HIBYTES 61446 + .HIBYTES 61447 + .HIBYTES 61448 + .HIBYTES 61449 + .HIBYTES 61450 + .HIBYTES 61451 + .HIBYTES 61452 + .HIBYTES 61453 + .HIBYTES 61454 + .HIBYTES 61455 + .HIBYTES 65505 + .HIBYTES 65506 + .HIBYTES 65507 + .HIBYTES 65508 + .HIBYTES 65509 + .HIBYTES 65510 + .HIBYTES 65511 + .HIBYTES 65512 + .HIBYTES 65513 + .HIBYTES 65514 + .HIBYTES 65515 + .HIBYTES 65516 + .HIBYTES 65517 + .HIBYTES 65518 + .HIBYTES 65519 + .HIBYTES 65520 + .HIBYTES 65521 + .HIBYTES 65522 + .HIBYTES 65523 + .HIBYTES 65524 + .HIBYTES 65525 + .HIBYTES 65526 + .HIBYTES 65527 + .HIBYTES 65528 + .HIBYTES 65529 + .HIBYTES 65530 + .HIBYTES 65531 + .HIBYTES 65532 + .HIBYTES 65533 + .HIBYTES 65534 + .HIBYTES 65535 + + ; lower case pseudo-op + .hibytes 0 + .hibytes 1 + .hibytes 2 + .hibytes 3 + .hibytes 4 + .hibytes 5 + .hibytes 6 + .hibytes 7 + .hibytes 8 + .hibytes 9 + .hibytes 10 + .hibytes 11 + .hibytes 12 + .hibytes 13 + .hibytes 14 + .hibytes 15 + .hibytes 16 + .hibytes 17 + .hibytes 18 + .hibytes 19 + .hibytes 112 + .hibytes 113 + .hibytes 114 + .hibytes 115 + .hibytes 116 + .hibytes 117 + .hibytes 118 + .hibytes 119 + .hibytes 120 + .hibytes 121 + .hibytes 122 + .hibytes 123 + .hibytes 124 + .hibytes 125 + .hibytes 126 + .hibytes 127 + .hibytes 128 + .hibytes 129 + .hibytes 130 + .hibytes 131 + .hibytes 132 + .hibytes 133 + .hibytes 134 + .hibytes 240 + .hibytes 241 + .hibytes 242 + .hibytes 243 + .hibytes 244 + .hibytes 245 + .hibytes 246 + .hibytes 247 + .hibytes 248 + .hibytes 249 + .hibytes 250 + .hibytes 251 + .hibytes 252 + .hibytes 253 + .hibytes 254 + .hibytes 255 + .hibytes 256 + .hibytes 257 + .hibytes 258 + .hibytes 259 + .hibytes 4050 + .hibytes 4051 + .hibytes 4052 + .hibytes 4053 + .hibytes 4054 + .hibytes 4055 + .hibytes 4056 + .hibytes 4057 + .hibytes 4058 + .hibytes 4059 + .hibytes 4060 + .hibytes 4061 + .hibytes 4062 + .hibytes 4063 + .hibytes 4064 + .hibytes 4065 + .hibytes 4066 + .hibytes 4067 + .hibytes 4068 + .hibytes 4069 + .hibytes 4070 + .hibytes 4071 + .hibytes 4072 + .hibytes 4073 + .hibytes 4074 + .hibytes 4075 + .hibytes 4076 + .hibytes 4077 + .hibytes 4078 + .hibytes 4079 + .hibytes 4080 + .hibytes 4081 + .hibytes 4082 + .hibytes 4083 + .hibytes 4084 + .hibytes 4085 + .hibytes 4086 + .hibytes 4087 + .hibytes 4088 + .hibytes 4089 + .hibytes 4090 + .hibytes 4091 + .hibytes 4092 + .hibytes 4093 + .hibytes 4094 + .hibytes 4095 + .hibytes 4096 + .hibytes 4097 + .hibytes 4098 + .hibytes 4099 + .hibytes 4100 + .hibytes 4101 + .hibytes 4102 + .hibytes 4103 + .hibytes 4104 + .hibytes 32752 + .hibytes 32753 + .hibytes 32754 + .hibytes 32755 + .hibytes 32756 + .hibytes 32757 + .hibytes 32758 + .hibytes 32759 + .hibytes 32760 + .hibytes 32761 + .hibytes 32762 + .hibytes 32763 + .hibytes 32764 + .hibytes 32765 + .hibytes 32766 + .hibytes 32767 + .hibytes 32768 + .hibytes 32769 + .hibytes 32770 + .hibytes 32771 + .hibytes 32772 + .hibytes 32773 + .hibytes 32774 + .hibytes 32775 + .hibytes 32776 + .hibytes 32777 + .hibytes 32778 + .hibytes 32779 + .hibytes 40929 + .hibytes 40930 + .hibytes 40931 + .hibytes 40932 + .hibytes 40933 + .hibytes 40934 + .hibytes 40935 + .hibytes 40936 + .hibytes 40937 + .hibytes 40938 + .hibytes 40939 + .hibytes 40940 + .hibytes 40941 + .hibytes 40942 + .hibytes 40943 + .hibytes 40944 + .hibytes 40945 + .hibytes 40946 + .hibytes 40947 + .hibytes 40948 + .hibytes 40949 + .hibytes 40950 + .hibytes 40951 + .hibytes 40952 + .hibytes 40953 + .hibytes 40954 + .hibytes 40955 + .hibytes 40956 + .hibytes 40957 + .hibytes 40958 + .hibytes 40959 + .hibytes 40960 + .hibytes 40961 + .hibytes 40962 + .hibytes 40963 + .hibytes 40964 + .hibytes 40965 + .hibytes 40966 + .hibytes 40967 + .hibytes 40968 + .hibytes 40969 + .hibytes 40970 + .hibytes 40971 + .hibytes 40972 + .hibytes 40973 + .hibytes 40974 + .hibytes 40975 + .hibytes 45025 + .hibytes 45026 + .hibytes 45027 + .hibytes 45028 + .hibytes 45029 + .hibytes 45030 + .hibytes 45031 + .hibytes 45032 + .hibytes 45033 + .hibytes 45034 + .hibytes 45035 + .hibytes 45036 + .hibytes 45037 + .hibytes 45038 + .hibytes 45039 + .hibytes 45040 + .hibytes 45041 + .hibytes 45042 + .hibytes 45043 + .hibytes 45044 + .hibytes 45045 + .hibytes 45046 + .hibytes 45047 + .hibytes 45048 + .hibytes 45049 + .hibytes 45050 + .hibytes 45051 + .hibytes 45052 + .hibytes 45053 + .hibytes 45054 + .hibytes 45055 + .hibytes 45056 + .hibytes 45057 + .hibytes 45058 + .hibytes 45059 + .hibytes 45060 + .hibytes 45061 + .hibytes 45062 + .hibytes 45063 + .hibytes 45064 + .hibytes 45065 + .hibytes 45066 + .hibytes 45067 + .hibytes 45068 + .hibytes 45069 + .hibytes 45070 + .hibytes 45071 + .hibytes 49121 + .hibytes 49122 + .hibytes 49123 + .hibytes 49124 + .hibytes 49125 + .hibytes 49126 + .hibytes 49127 + .hibytes 49128 + .hibytes 49129 + .hibytes 49130 + .hibytes 49131 + .hibytes 49132 + .hibytes 49133 + .hibytes 49134 + .hibytes 49135 + .hibytes 49136 + .hibytes 49137 + .hibytes 49138 + .hibytes 49139 + .hibytes 49140 + .hibytes 49141 + .hibytes 49142 + .hibytes 49143 + .hibytes 49144 + .hibytes 49145 + .hibytes 49146 + .hibytes 49147 + .hibytes 49148 + .hibytes 49149 + .hibytes 49150 + .hibytes 49151 + .hibytes 49152 + .hibytes 49153 + .hibytes 49154 + .hibytes 49155 + .hibytes 49156 + .hibytes 49157 + .hibytes 49158 + .hibytes 49159 + .hibytes 49160 + .hibytes 49161 + .hibytes 49162 + .hibytes 49163 + .hibytes 49164 + .hibytes 49165 + .hibytes 49166 + .hibytes 49167 + .hibytes 53217 + .hibytes 53218 + .hibytes 53219 + .hibytes 53220 + .hibytes 53221 + .hibytes 53222 + .hibytes 53223 + .hibytes 53224 + .hibytes 53225 + .hibytes 53226 + .hibytes 53227 + .hibytes 53228 + .hibytes 53229 + .hibytes 53230 + .hibytes 53231 + .hibytes 53232 + .hibytes 53233 + .hibytes 53234 + .hibytes 53235 + .hibytes 53236 + .hibytes 53237 + .hibytes 53238 + .hibytes 53239 + .hibytes 53240 + .hibytes 53241 + .hibytes 53242 + .hibytes 53243 + .hibytes 53244 + .hibytes 53245 + .hibytes 53246 + .hibytes 53247 + .hibytes 53248 + .hibytes 53249 + .hibytes 53250 + .hibytes 53251 + .hibytes 53252 + .hibytes 53253 + .hibytes 53254 + .hibytes 53255 + .hibytes 53256 + .hibytes 53257 + .hibytes 53258 + .hibytes 53259 + .hibytes 53260 + .hibytes 53261 + .hibytes 53262 + .hibytes 53263 + .hibytes 57313 + .hibytes 57314 + .hibytes 57315 + .hibytes 57316 + .hibytes 57317 + .hibytes 57318 + .hibytes 57319 + .hibytes 57320 + .hibytes 57321 + .hibytes 57322 + .hibytes 57323 + .hibytes 57324 + .hibytes 57325 + .hibytes 57326 + .hibytes 57327 + .hibytes 57328 + .hibytes 57329 + .hibytes 57330 + .hibytes 57331 + .hibytes 57332 + .hibytes 57333 + .hibytes 57334 + .hibytes 57335 + .hibytes 57336 + .hibytes 57337 + .hibytes 57338 + .hibytes 57339 + .hibytes 57340 + .hibytes 57341 + .hibytes 57342 + .hibytes 57343 + .hibytes 57344 + .hibytes 57345 + .hibytes 57346 + .hibytes 57347 + .hibytes 57348 + .hibytes 57349 + .hibytes 57350 + .hibytes 57351 + .hibytes 57352 + .hibytes 57353 + .hibytes 57354 + .hibytes 57355 + .hibytes 57356 + .hibytes 57357 + .hibytes 57358 + .hibytes 57359 + .hibytes 61409 + .hibytes 61410 + .hibytes 61411 + .hibytes 61412 + .hibytes 61413 + .hibytes 61414 + .hibytes 61415 + .hibytes 61416 + .hibytes 61417 + .hibytes 61418 + .hibytes 61419 + .hibytes 61420 + .hibytes 61421 + .hibytes 61422 + .hibytes 61423 + .hibytes 61424 + .hibytes 61425 + .hibytes 61426 + .hibytes 61427 + .hibytes 61428 + .hibytes 61429 + .hibytes 61430 + .hibytes 61431 + .hibytes 61432 + .hibytes 61433 + .hibytes 61434 + .hibytes 61435 + .hibytes 61436 + .hibytes 61437 + .hibytes 61438 + .hibytes 61439 + .hibytes 61440 + .hibytes 61441 + .hibytes 61442 + .hibytes 61443 + .hibytes 61444 + .hibytes 61445 + .hibytes 61446 + .hibytes 61447 + .hibytes 61448 + .hibytes 61449 + .hibytes 61450 + .hibytes 61451 + .hibytes 61452 + .hibytes 61453 + .hibytes 61454 + .hibytes 61455 + .hibytes 65505 + .hibytes 65506 + .hibytes 65507 + .hibytes 65508 + .hibytes 65509 + .hibytes 65510 + .hibytes 65511 + .hibytes 65512 + .hibytes 65513 + .hibytes 65514 + .hibytes 65515 + .hibytes 65516 + .hibytes 65517 + .hibytes 65518 + .hibytes 65519 + .hibytes 65520 + .hibytes 65521 + .hibytes 65522 + .hibytes 65523 + .hibytes 65524 + .hibytes 65525 + .hibytes 65526 + .hibytes 65527 + .hibytes 65528 + .hibytes 65529 + .hibytes 65530 + .hibytes 65531 + .hibytes 65532 + .hibytes 65533 + .hibytes 65534 + .hibytes 65535 + + ; hex values + .hibytes $0 + .hibytes $1 + .hibytes $2 + .hibytes $3 + .hibytes $4 + .hibytes $5 + .hibytes $6 + .hibytes $7 + .hibytes $8 + .hibytes $9 + .hibytes $a + .hibytes $b + .hibytes $c + .hibytes $d + .hibytes $e + .hibytes $f + .hibytes $10 + .hibytes $11 + .hibytes $12 + .hibytes $13 + .hibytes $70 + .hibytes $71 + .hibytes $72 + .hibytes $73 + .hibytes $74 + .hibytes $75 + .hibytes $76 + .hibytes $77 + .hibytes $78 + .hibytes $79 + .hibytes $7a + .hibytes $7b + .hibytes $7c + .hibytes $7d + .hibytes $7e + .hibytes $7f + .hibytes $80 + .hibytes $81 + .hibytes $82 + .hibytes $83 + .hibytes $84 + .hibytes $85 + .hibytes $86 + .hibytes $f0 + .hibytes $f1 + .hibytes $f2 + .hibytes $f3 + .hibytes $f4 + .hibytes $f5 + .hibytes $f6 + .hibytes $f7 + .hibytes $f8 + .hibytes $f9 + .hibytes $fa + .hibytes $fb + .hibytes $fc + .hibytes $fd + .hibytes $fe + .hibytes $ff + .hibytes $100 + .hibytes $101 + .hibytes $102 + .hibytes $103 + .hibytes $fd2 + .hibytes $fd3 + .hibytes $fd4 + .hibytes $fd5 + .hibytes $fd6 + .hibytes $fd7 + .hibytes $fd8 + .hibytes $fd9 + .hibytes $fda + .hibytes $fdb + .hibytes $fdc + .hibytes $fdd + .hibytes $fde + .hibytes $fdf + .hibytes $fe0 + .hibytes $fe1 + .hibytes $fe2 + .hibytes $fe3 + .hibytes $fe4 + .hibytes $fe5 + .hibytes $fe6 + .hibytes $fe7 + .hibytes $fe8 + .hibytes $fe9 + .hibytes $fea + .hibytes $feb + .hibytes $fec + .hibytes $fed + .hibytes $fee + .hibytes $fef + .hibytes $ff0 + .hibytes $ff1 + .hibytes $ff2 + .hibytes $ff3 + .hibytes $ff4 + .hibytes $ff5 + .hibytes $ff6 + .hibytes $ff7 + .hibytes $ff8 + .hibytes $ff9 + .hibytes $ffa + .hibytes $ffb + .hibytes $ffc + .hibytes $ffd + .hibytes $ffe + .hibytes $fff + .hibytes $1000 + .hibytes $1001 + .hibytes $1002 + .hibytes $1003 + .hibytes $1004 + .hibytes $1005 + .hibytes $1006 + .hibytes $1007 + .hibytes $1008 + .hibytes $7ff0 + .hibytes $7ff1 + .hibytes $7ff2 + .hibytes $7ff3 + .hibytes $7ff4 + .hibytes $7ff5 + .hibytes $7ff6 + .hibytes $7ff7 + .hibytes $7ff8 + .hibytes $7ff9 + .hibytes $7ffa + .hibytes $7ffb + .hibytes $7ffc + .hibytes $7ffd + .hibytes $7ffe + .hibytes $7fff + .hibytes $8000 + .hibytes $8001 + .hibytes $8002 + .hibytes $8003 + .hibytes $8004 + .hibytes $8005 + .hibytes $8006 + .hibytes $8007 + .hibytes $8008 + .hibytes $8009 + .hibytes $800a + .hibytes $800b + .hibytes $9fe1 + .hibytes $9fe2 + .hibytes $9fe3 + .hibytes $9fe4 + .hibytes $9fe5 + .hibytes $9fe6 + .hibytes $9fe7 + .hibytes $9fe8 + .hibytes $9fe9 + .hibytes $9fea + .hibytes $9feb + .hibytes $9fec + .hibytes $9fed + .hibytes $9fee + .hibytes $9fef + .hibytes $9ff0 + .hibytes $9ff1 + .hibytes $9ff2 + .hibytes $9ff3 + .hibytes $9ff4 + .hibytes $9ff5 + .hibytes $9ff6 + .hibytes $9ff7 + .hibytes $9ff8 + .hibytes $9ff9 + .hibytes $9ffa + .hibytes $9ffb + .hibytes $9ffc + .hibytes $9ffd + .hibytes $9ffe + .hibytes $9fff + .hibytes $a000 + .hibytes $a001 + .hibytes $a002 + .hibytes $a003 + .hibytes $a004 + .hibytes $a005 + .hibytes $a006 + .hibytes $a007 + .hibytes $a008 + .hibytes $a009 + .hibytes $a00a + .hibytes $a00b + .hibytes $a00c + .hibytes $a00d + .hibytes $a00e + .hibytes $a00f + .hibytes $afe1 + .hibytes $afe2 + .hibytes $afe3 + .hibytes $afe4 + .hibytes $afe5 + .hibytes $afe6 + .hibytes $afe7 + .hibytes $afe8 + .hibytes $afe9 + .hibytes $afea + .hibytes $afeb + .hibytes $afec + .hibytes $afed + .hibytes $afee + .hibytes $afef + .hibytes $aff0 + .hibytes $aff1 + .hibytes $aff2 + .hibytes $aff3 + .hibytes $aff4 + .hibytes $aff5 + .hibytes $aff6 + .hibytes $aff7 + .hibytes $aff8 + .hibytes $aff9 + .hibytes $affa + .hibytes $affb + .hibytes $affc + .hibytes $affd + .hibytes $affe + .hibytes $afff + .hibytes $b000 + .hibytes $b001 + .hibytes $b002 + .hibytes $b003 + .hibytes $b004 + .hibytes $b005 + .hibytes $b006 + .hibytes $b007 + .hibytes $b008 + .hibytes $b009 + .hibytes $b00a + .hibytes $b00b + .hibytes $b00c + .hibytes $b00d + .hibytes $b00e + .hibytes $b00f + .hibytes $bfe1 + .hibytes $bfe2 + .hibytes $bfe3 + .hibytes $bfe4 + .hibytes $bfe5 + .hibytes $bfe6 + .hibytes $bfe7 + .hibytes $bfe8 + .hibytes $bfe9 + .hibytes $bfea + .hibytes $bfeb + .hibytes $bfec + .hibytes $bfed + .hibytes $bfee + .hibytes $bfef + .hibytes $bff0 + .hibytes $bff1 + .hibytes $bff2 + .hibytes $bff3 + .hibytes $bff4 + .hibytes $bff5 + .hibytes $bff6 + .hibytes $bff7 + .hibytes $bff8 + .hibytes $bff9 + .hibytes $bffa + .hibytes $bffb + .hibytes $bffc + .hibytes $bffd + .hibytes $bffe + .hibytes $bfff + .hibytes $c000 + .hibytes $c001 + .hibytes $c002 + .hibytes $c003 + .hibytes $c004 + .hibytes $c005 + .hibytes $c006 + .hibytes $c007 + .hibytes $c008 + .hibytes $c009 + .hibytes $c00a + .hibytes $c00b + .hibytes $c00c + .hibytes $c00d + .hibytes $c00e + .hibytes $c00f + .hibytes $cfe1 + .hibytes $cfe2 + .hibytes $cfe3 + .hibytes $cfe4 + .hibytes $cfe5 + .hibytes $cfe6 + .hibytes $cfe7 + .hibytes $cfe8 + .hibytes $cfe9 + .hibytes $cfea + .hibytes $cfeb + .hibytes $cfec + .hibytes $cfed + .hibytes $cfee + .hibytes $cfef + .hibytes $cff0 + .hibytes $cff1 + .hibytes $cff2 + .hibytes $cff3 + .hibytes $cff4 + .hibytes $cff5 + .hibytes $cff6 + .hibytes $cff7 + .hibytes $cff8 + .hibytes $cff9 + .hibytes $cffa + .hibytes $cffb + .hibytes $cffc + .hibytes $cffd + .hibytes $cffe + .hibytes $cfff + .hibytes $d000 + .hibytes $d001 + .hibytes $d002 + .hibytes $d003 + .hibytes $d004 + .hibytes $d005 + .hibytes $d006 + .hibytes $d007 + .hibytes $d008 + .hibytes $d009 + .hibytes $d00a + .hibytes $d00b + .hibytes $d00c + .hibytes $d00d + .hibytes $d00e + .hibytes $d00f + .hibytes $dfe1 + .hibytes $dfe2 + .hibytes $dfe3 + .hibytes $dfe4 + .hibytes $dfe5 + .hibytes $dfe6 + .hibytes $dfe7 + .hibytes $dfe8 + .hibytes $dfe9 + .hibytes $dfea + .hibytes $dfeb + .hibytes $dfec + .hibytes $dfed + .hibytes $dfee + .hibytes $dfef + .hibytes $dff0 + .hibytes $dff1 + .hibytes $dff2 + .hibytes $dff3 + .hibytes $dff4 + .hibytes $dff5 + .hibytes $dff6 + .hibytes $dff7 + .hibytes $dff8 + .hibytes $dff9 + .hibytes $dffa + .hibytes $dffb + .hibytes $dffc + .hibytes $dffd + .hibytes $dffe + .hibytes $dfff + .hibytes $e000 + .hibytes $e001 + .hibytes $e002 + .hibytes $e003 + .hibytes $e004 + .hibytes $e005 + .hibytes $e006 + .hibytes $e007 + .hibytes $e008 + .hibytes $e009 + .hibytes $e00a + .hibytes $e00b + .hibytes $e00c + .hibytes $e00d + .hibytes $e00e + .hibytes $e00f + .hibytes $efe1 + .hibytes $efe2 + .hibytes $efe3 + .hibytes $efe4 + .hibytes $efe5 + .hibytes $efe6 + .hibytes $efe7 + .hibytes $efe8 + .hibytes $efe9 + .hibytes $efea + .hibytes $efeb + .hibytes $efec + .hibytes $efed + .hibytes $efee + .hibytes $efef + .hibytes $eff0 + .hibytes $eff1 + .hibytes $eff2 + .hibytes $eff3 + .hibytes $eff4 + .hibytes $eff5 + .hibytes $eff6 + .hibytes $eff7 + .hibytes $eff8 + .hibytes $eff9 + .hibytes $effa + .hibytes $effb + .hibytes $effc + .hibytes $effd + .hibytes $effe + .hibytes $efff + .hibytes $f000 + .hibytes $f001 + .hibytes $f002 + .hibytes $f003 + .hibytes $f004 + .hibytes $f005 + .hibytes $f006 + .hibytes $f007 + .hibytes $f008 + .hibytes $f009 + .hibytes $f00a + .hibytes $f00b + .hibytes $f00c + .hibytes $f00d + .hibytes $f00e + .hibytes $f00f + .hibytes $ffe1 + .hibytes $ffe2 + .hibytes $ffe3 + .hibytes $ffe4 + .hibytes $ffe5 + .hibytes $ffe6 + .hibytes $ffe7 + .hibytes $ffe8 + .hibytes $ffe9 + .hibytes $ffea + .hibytes $ffeb + .hibytes $ffec + .hibytes $ffed + .hibytes $ffee + .hibytes $ffef + .hibytes $fff0 + .hibytes $fff1 + .hibytes $fff2 + .hibytes $fff3 + .hibytes $fff4 + .hibytes $fff5 + .hibytes $fff6 + .hibytes $fff7 + .hibytes $fff8 + .hibytes $fff9 + .hibytes $fffa + .hibytes $fffb + .hibytes $fffc + .hibytes $fffd + .hibytes $fffe + .hibytes $ffff + + ; hex values, uppercase + .hibytes $0 + .hibytes $1 + .hibytes $2 + .hibytes $3 + .hibytes $4 + .hibytes $5 + .hibytes $6 + .hibytes $7 + .hibytes $8 + .hibytes $9 + .hibytes $A + .hibytes $B + .hibytes $C + .hibytes $D + .hibytes $E + .hibytes $F + .hibytes $10 + .hibytes $11 + .hibytes $12 + .hibytes $13 + .hibytes $70 + .hibytes $71 + .hibytes $72 + .hibytes $73 + .hibytes $74 + .hibytes $75 + .hibytes $76 + .hibytes $77 + .hibytes $78 + .hibytes $79 + .hibytes $7A + .hibytes $7B + .hibytes $7C + .hibytes $7D + .hibytes $7E + .hibytes $7F + .hibytes $80 + .hibytes $81 + .hibytes $82 + .hibytes $83 + .hibytes $84 + .hibytes $85 + .hibytes $86 + .hibytes $F0 + .hibytes $F1 + .hibytes $F2 + .hibytes $F3 + .hibytes $F4 + .hibytes $F5 + .hibytes $F6 + .hibytes $F7 + .hibytes $F8 + .hibytes $F9 + .hibytes $FA + .hibytes $FB + .hibytes $FC + .hibytes $FD + .hibytes $FE + .hibytes $FF + .hibytes $100 + .hibytes $101 + .hibytes $102 + .hibytes $103 + .hibytes $FD2 + .hibytes $FD3 + .hibytes $FD4 + .hibytes $FD5 + .hibytes $FD6 + .hibytes $FD7 + .hibytes $FD8 + .hibytes $FD9 + .hibytes $FDA + .hibytes $FDB + .hibytes $FDC + .hibytes $FDD + .hibytes $FDE + .hibytes $FDF + .hibytes $FE0 + .hibytes $FE1 + .hibytes $FE2 + .hibytes $FE3 + .hibytes $FE4 + .hibytes $FE5 + .hibytes $FE6 + .hibytes $FE7 + .hibytes $FE8 + .hibytes $FE9 + .hibytes $FEA + .hibytes $FEB + .hibytes $FEC + .hibytes $FED + .hibytes $FEE + .hibytes $FEF + .hibytes $FF0 + .hibytes $FF1 + .hibytes $FF2 + .hibytes $FF3 + .hibytes $FF4 + .hibytes $FF5 + .hibytes $FF6 + .hibytes $FF7 + .hibytes $FF8 + .hibytes $FF9 + .hibytes $FFA + .hibytes $FFB + .hibytes $FFC + .hibytes $FFD + .hibytes $FFE + .hibytes $FFF + .hibytes $1000 + .hibytes $1001 + .hibytes $1002 + .hibytes $1003 + .hibytes $1004 + .hibytes $1005 + .hibytes $1006 + .hibytes $1007 + .hibytes $1008 + .hibytes $7FF0 + .hibytes $7FF1 + .hibytes $7FF2 + .hibytes $7FF3 + .hibytes $7FF4 + .hibytes $7FF5 + .hibytes $7FF6 + .hibytes $7FF7 + .hibytes $7FF8 + .hibytes $7FF9 + .hibytes $7FFA + .hibytes $7FFB + .hibytes $7FFC + .hibytes $7FFD + .hibytes $7FFE + .hibytes $7FFF + .hibytes $8000 + .hibytes $8001 + .hibytes $8002 + .hibytes $8003 + .hibytes $8004 + .hibytes $8005 + .hibytes $8006 + .hibytes $8007 + .hibytes $8008 + .hibytes $8009 + .hibytes $800A + .hibytes $800B + .hibytes $9FE1 + .hibytes $9FE2 + .hibytes $9FE3 + .hibytes $9FE4 + .hibytes $9FE5 + .hibytes $9FE6 + .hibytes $9FE7 + .hibytes $9FE8 + .hibytes $9FE9 + .hibytes $9FEA + .hibytes $9FEB + .hibytes $9FEC + .hibytes $9FED + .hibytes $9FEE + .hibytes $9FEF + .hibytes $9FF0 + .hibytes $9FF1 + .hibytes $9FF2 + .hibytes $9FF3 + .hibytes $9FF4 + .hibytes $9FF5 + .hibytes $9FF6 + .hibytes $9FF7 + .hibytes $9FF8 + .hibytes $9FF9 + .hibytes $9FFA + .hibytes $9FFB + .hibytes $9FFC + .hibytes $9FFD + .hibytes $9FFE + .hibytes $9FFF + .hibytes $A000 + .hibytes $A001 + .hibytes $A002 + .hibytes $A003 + .hibytes $A004 + .hibytes $A005 + .hibytes $A006 + .hibytes $A007 + .hibytes $A008 + .hibytes $A009 + .hibytes $A00A + .hibytes $A00B + .hibytes $A00C + .hibytes $A00D + .hibytes $A00E + .hibytes $A00F + .hibytes $AFE1 + .hibytes $AFE2 + .hibytes $AFE3 + .hibytes $AFE4 + .hibytes $AFE5 + .hibytes $AFE6 + .hibytes $AFE7 + .hibytes $AFE8 + .hibytes $AFE9 + .hibytes $AFEA + .hibytes $AFEB + .hibytes $AFEC + .hibytes $AFED + .hibytes $AFEE + .hibytes $AFEF + .hibytes $AFF0 + .hibytes $AFF1 + .hibytes $AFF2 + .hibytes $AFF3 + .hibytes $AFF4 + .hibytes $AFF5 + .hibytes $AFF6 + .hibytes $AFF7 + .hibytes $AFF8 + .hibytes $AFF9 + .hibytes $AFFA + .hibytes $AFFB + .hibytes $AFFC + .hibytes $AFFD + .hibytes $AFFE + .hibytes $AFFF + .hibytes $B000 + .hibytes $B001 + .hibytes $B002 + .hibytes $B003 + .hibytes $B004 + .hibytes $B005 + .hibytes $B006 + .hibytes $B007 + .hibytes $B008 + .hibytes $B009 + .hibytes $B00A + .hibytes $B00B + .hibytes $B00C + .hibytes $B00D + .hibytes $B00E + .hibytes $B00F + .hibytes $BFE1 + .hibytes $BFE2 + .hibytes $BFE3 + .hibytes $BFE4 + .hibytes $BFE5 + .hibytes $BFE6 + .hibytes $BFE7 + .hibytes $BFE8 + .hibytes $BFE9 + .hibytes $BFEA + .hibytes $BFEB + .hibytes $BFEC + .hibytes $BFED + .hibytes $BFEE + .hibytes $BFEF + .hibytes $BFF0 + .hibytes $BFF1 + .hibytes $BFF2 + .hibytes $BFF3 + .hibytes $BFF4 + .hibytes $BFF5 + .hibytes $BFF6 + .hibytes $BFF7 + .hibytes $BFF8 + .hibytes $BFF9 + .hibytes $BFFA + .hibytes $BFFB + .hibytes $BFFC + .hibytes $BFFD + .hibytes $BFFE + .hibytes $BFFF + .hibytes $C000 + .hibytes $C001 + .hibytes $C002 + .hibytes $C003 + .hibytes $C004 + .hibytes $C005 + .hibytes $C006 + .hibytes $C007 + .hibytes $C008 + .hibytes $C009 + .hibytes $C00A + .hibytes $C00B + .hibytes $C00C + .hibytes $C00D + .hibytes $C00E + .hibytes $C00F + .hibytes $CFE1 + .hibytes $CFE2 + .hibytes $CFE3 + .hibytes $CFE4 + .hibytes $CFE5 + .hibytes $CFE6 + .hibytes $CFE7 + .hibytes $CFE8 + .hibytes $CFE9 + .hibytes $CFEA + .hibytes $CFEB + .hibytes $CFEC + .hibytes $CFED + .hibytes $CFEE + .hibytes $CFEF + .hibytes $CFF0 + .hibytes $CFF1 + .hibytes $CFF2 + .hibytes $CFF3 + .hibytes $CFF4 + .hibytes $CFF5 + .hibytes $CFF6 + .hibytes $CFF7 + .hibytes $CFF8 + .hibytes $CFF9 + .hibytes $CFFA + .hibytes $CFFB + .hibytes $CFFC + .hibytes $CFFD + .hibytes $CFFE + .hibytes $CFFF + .hibytes $D000 + .hibytes $D001 + .hibytes $D002 + .hibytes $D003 + .hibytes $D004 + .hibytes $D005 + .hibytes $D006 + .hibytes $D007 + .hibytes $D008 + .hibytes $D009 + .hibytes $D00A + .hibytes $D00B + .hibytes $D00C + .hibytes $D00D + .hibytes $D00E + .hibytes $D00F + .hibytes $DFE1 + .hibytes $DFE2 + .hibytes $DFE3 + .hibytes $DFE4 + .hibytes $DFE5 + .hibytes $DFE6 + .hibytes $DFE7 + .hibytes $DFE8 + .hibytes $DFE9 + .hibytes $DFEA + .hibytes $DFEB + .hibytes $DFEC + .hibytes $DFED + .hibytes $DFEE + .hibytes $DFEF + .hibytes $DFF0 + .hibytes $DFF1 + .hibytes $DFF2 + .hibytes $DFF3 + .hibytes $DFF4 + .hibytes $DFF5 + .hibytes $DFF6 + .hibytes $DFF7 + .hibytes $DFF8 + .hibytes $DFF9 + .hibytes $DFFA + .hibytes $DFFB + .hibytes $DFFC + .hibytes $DFFD + .hibytes $DFFE + .hibytes $DFFF + .hibytes $E000 + .hibytes $E001 + .hibytes $E002 + .hibytes $E003 + .hibytes $E004 + .hibytes $E005 + .hibytes $E006 + .hibytes $E007 + .hibytes $E008 + .hibytes $E009 + .hibytes $E00A + .hibytes $E00B + .hibytes $E00C + .hibytes $E00D + .hibytes $E00E + .hibytes $E00F + .hibytes $EFE1 + .hibytes $EFE2 + .hibytes $EFE3 + .hibytes $EFE4 + .hibytes $EFE5 + .hibytes $EFE6 + .hibytes $EFE7 + .hibytes $EFE8 + .hibytes $EFE9 + .hibytes $EFEA + .hibytes $EFEB + .hibytes $EFEC + .hibytes $EFED + .hibytes $EFEE + .hibytes $EFEF + .hibytes $EFF0 + .hibytes $EFF1 + .hibytes $EFF2 + .hibytes $EFF3 + .hibytes $EFF4 + .hibytes $EFF5 + .hibytes $EFF6 + .hibytes $EFF7 + .hibytes $EFF8 + .hibytes $EFF9 + .hibytes $EFFA + .hibytes $EFFB + .hibytes $EFFC + .hibytes $EFFD + .hibytes $EFFE + .hibytes $EFFF + .hibytes $F000 + .hibytes $F001 + .hibytes $F002 + .hibytes $F003 + .hibytes $F004 + .hibytes $F005 + .hibytes $F006 + .hibytes $F007 + .hibytes $F008 + .hibytes $F009 + .hibytes $F00A + .hibytes $F00B + .hibytes $F00C + .hibytes $F00D + .hibytes $F00E + .hibytes $F00F + .hibytes $FFE1 + .hibytes $FFE2 + .hibytes $FFE3 + .hibytes $FFE4 + .hibytes $FFE5 + .hibytes $FFE6 + .hibytes $FFE7 + .hibytes $FFE8 + .hibytes $FFE9 + .hibytes $FFEA + .hibytes $FFEB + .hibytes $FFEC + .hibytes $FFED + .hibytes $FFEE + .hibytes $FFEF + .hibytes $FFF0 + .hibytes $FFF1 + .hibytes $FFF2 + .hibytes $FFF3 + .hibytes $FFF4 + .hibytes $FFF5 + .hibytes $FFF6 + .hibytes $FFF7 + .hibytes $FFF8 + .hibytes $FFF9 + .hibytes $FFFA + .hibytes $FFFB + .hibytes $FFFC + .hibytes $FFFD + .hibytes $FFFE + .hibytes $FFFF + + ; 4-digit hex values + .hibytes $0000 + .hibytes $0001 + .hibytes $0002 + .hibytes $0003 + .hibytes $0004 + .hibytes $0005 + .hibytes $0006 + .hibytes $0007 + .hibytes $0008 + .hibytes $0009 + .hibytes $000a + .hibytes $000b + .hibytes $000c + .hibytes $000d + .hibytes $000e + .hibytes $000f + .hibytes $0010 + .hibytes $0011 + .hibytes $0012 + .hibytes $0013 + .hibytes $0070 + .hibytes $0071 + .hibytes $0072 + .hibytes $0073 + .hibytes $0074 + .hibytes $0075 + .hibytes $0076 + .hibytes $0077 + .hibytes $0078 + .hibytes $0079 + .hibytes $007a + .hibytes $007b + .hibytes $007c + .hibytes $007d + .hibytes $007e + .hibytes $007f + .hibytes $0080 + .hibytes $0081 + .hibytes $0082 + .hibytes $0083 + .hibytes $0084 + .hibytes $0085 + .hibytes $0086 + .hibytes $00f0 + .hibytes $00f1 + .hibytes $00f2 + .hibytes $00f3 + .hibytes $00f4 + .hibytes $00f5 + .hibytes $00f6 + .hibytes $00f7 + .hibytes $00f8 + .hibytes $00f9 + .hibytes $00fa + .hibytes $00fb + .hibytes $00fc + .hibytes $00fd + .hibytes $00fe + .hibytes $00ff + .hibytes $0100 + .hibytes $0101 + .hibytes $0102 + .hibytes $0103 + .hibytes $0fd2 + .hibytes $0fd3 + .hibytes $0fd4 + .hibytes $0fd5 + .hibytes $0fd6 + .hibytes $0fd7 + .hibytes $0fd8 + .hibytes $0fd9 + .hibytes $0fda + .hibytes $0fdb + .hibytes $0fdc + .hibytes $0fdd + .hibytes $0fde + .hibytes $0fdf + .hibytes $0fe0 + .hibytes $0fe1 + .hibytes $0fe2 + .hibytes $0fe3 + .hibytes $0fe4 + .hibytes $0fe5 + .hibytes $0fe6 + .hibytes $0fe7 + .hibytes $0fe8 + .hibytes $0fe9 + .hibytes $0fea + .hibytes $0feb + .hibytes $0fec + .hibytes $0fed + .hibytes $0fee + .hibytes $0fef + .hibytes $0ff0 + .hibytes $0ff1 + .hibytes $0ff2 + .hibytes $0ff3 + .hibytes $0ff4 + .hibytes $0ff5 + .hibytes $0ff6 + .hibytes $0ff7 + .hibytes $0ff8 + .hibytes $0ff9 + .hibytes $0ffa + .hibytes $0ffb + .hibytes $0ffc + .hibytes $0ffd + .hibytes $0ffe + .hibytes $0fff + .hibytes $1000 + .hibytes $1001 + .hibytes $1002 + .hibytes $1003 + .hibytes $1004 + .hibytes $1005 + .hibytes $1006 + .hibytes $1007 + .hibytes $1008 + .hibytes $7ff0 + .hibytes $7ff1 + .hibytes $7ff2 + .hibytes $7ff3 + .hibytes $7ff4 + .hibytes $7ff5 + .hibytes $7ff6 + .hibytes $7ff7 + .hibytes $7ff8 + .hibytes $7ff9 + .hibytes $7ffa + .hibytes $7ffb + .hibytes $7ffc + .hibytes $7ffd + .hibytes $7ffe + .hibytes $7fff + .hibytes $8000 + .hibytes $8001 + .hibytes $8002 + .hibytes $8003 + .hibytes $8004 + .hibytes $8005 + .hibytes $8006 + .hibytes $8007 + .hibytes $8008 + .hibytes $8009 + .hibytes $800a + .hibytes $800b + .hibytes $9fe1 + .hibytes $9fe2 + .hibytes $9fe3 + .hibytes $9fe4 + .hibytes $9fe5 + .hibytes $9fe6 + .hibytes $9fe7 + .hibytes $9fe8 + .hibytes $9fe9 + .hibytes $9fea + .hibytes $9feb + .hibytes $9fec + .hibytes $9fed + .hibytes $9fee + .hibytes $9fef + .hibytes $9ff0 + .hibytes $9ff1 + .hibytes $9ff2 + .hibytes $9ff3 + .hibytes $9ff4 + .hibytes $9ff5 + .hibytes $9ff6 + .hibytes $9ff7 + .hibytes $9ff8 + .hibytes $9ff9 + .hibytes $9ffa + .hibytes $9ffb + .hibytes $9ffc + .hibytes $9ffd + .hibytes $9ffe + .hibytes $9fff + .hibytes $a000 + .hibytes $a001 + .hibytes $a002 + .hibytes $a003 + .hibytes $a004 + .hibytes $a005 + .hibytes $a006 + .hibytes $a007 + .hibytes $a008 + .hibytes $a009 + .hibytes $a00a + .hibytes $a00b + .hibytes $a00c + .hibytes $a00d + .hibytes $a00e + .hibytes $a00f + .hibytes $afe1 + .hibytes $afe2 + .hibytes $afe3 + .hibytes $afe4 + .hibytes $afe5 + .hibytes $afe6 + .hibytes $afe7 + .hibytes $afe8 + .hibytes $afe9 + .hibytes $afea + .hibytes $afeb + .hibytes $afec + .hibytes $afed + .hibytes $afee + .hibytes $afef + .hibytes $aff0 + .hibytes $aff1 + .hibytes $aff2 + .hibytes $aff3 + .hibytes $aff4 + .hibytes $aff5 + .hibytes $aff6 + .hibytes $aff7 + .hibytes $aff8 + .hibytes $aff9 + .hibytes $affa + .hibytes $affb + .hibytes $affc + .hibytes $affd + .hibytes $affe + .hibytes $afff + .hibytes $b000 + .hibytes $b001 + .hibytes $b002 + .hibytes $b003 + .hibytes $b004 + .hibytes $b005 + .hibytes $b006 + .hibytes $b007 + .hibytes $b008 + .hibytes $b009 + .hibytes $b00a + .hibytes $b00b + .hibytes $b00c + .hibytes $b00d + .hibytes $b00e + .hibytes $b00f + .hibytes $bfe1 + .hibytes $bfe2 + .hibytes $bfe3 + .hibytes $bfe4 + .hibytes $bfe5 + .hibytes $bfe6 + .hibytes $bfe7 + .hibytes $bfe8 + .hibytes $bfe9 + .hibytes $bfea + .hibytes $bfeb + .hibytes $bfec + .hibytes $bfed + .hibytes $bfee + .hibytes $bfef + .hibytes $bff0 + .hibytes $bff1 + .hibytes $bff2 + .hibytes $bff3 + .hibytes $bff4 + .hibytes $bff5 + .hibytes $bff6 + .hibytes $bff7 + .hibytes $bff8 + .hibytes $bff9 + .hibytes $bffa + .hibytes $bffb + .hibytes $bffc + .hibytes $bffd + .hibytes $bffe + .hibytes $bfff + .hibytes $c000 + .hibytes $c001 + .hibytes $c002 + .hibytes $c003 + .hibytes $c004 + .hibytes $c005 + .hibytes $c006 + .hibytes $c007 + .hibytes $c008 + .hibytes $c009 + .hibytes $c00a + .hibytes $c00b + .hibytes $c00c + .hibytes $c00d + .hibytes $c00e + .hibytes $c00f + .hibytes $cfe1 + .hibytes $cfe2 + .hibytes $cfe3 + .hibytes $cfe4 + .hibytes $cfe5 + .hibytes $cfe6 + .hibytes $cfe7 + .hibytes $cfe8 + .hibytes $cfe9 + .hibytes $cfea + .hibytes $cfeb + .hibytes $cfec + .hibytes $cfed + .hibytes $cfee + .hibytes $cfef + .hibytes $cff0 + .hibytes $cff1 + .hibytes $cff2 + .hibytes $cff3 + .hibytes $cff4 + .hibytes $cff5 + .hibytes $cff6 + .hibytes $cff7 + .hibytes $cff8 + .hibytes $cff9 + .hibytes $cffa + .hibytes $cffb + .hibytes $cffc + .hibytes $cffd + .hibytes $cffe + .hibytes $cfff + .hibytes $d000 + .hibytes $d001 + .hibytes $d002 + .hibytes $d003 + .hibytes $d004 + .hibytes $d005 + .hibytes $d006 + .hibytes $d007 + .hibytes $d008 + .hibytes $d009 + .hibytes $d00a + .hibytes $d00b + .hibytes $d00c + .hibytes $d00d + .hibytes $d00e + .hibytes $d00f + .hibytes $dfe1 + .hibytes $dfe2 + .hibytes $dfe3 + .hibytes $dfe4 + .hibytes $dfe5 + .hibytes $dfe6 + .hibytes $dfe7 + .hibytes $dfe8 + .hibytes $dfe9 + .hibytes $dfea + .hibytes $dfeb + .hibytes $dfec + .hibytes $dfed + .hibytes $dfee + .hibytes $dfef + .hibytes $dff0 + .hibytes $dff1 + .hibytes $dff2 + .hibytes $dff3 + .hibytes $dff4 + .hibytes $dff5 + .hibytes $dff6 + .hibytes $dff7 + .hibytes $dff8 + .hibytes $dff9 + .hibytes $dffa + .hibytes $dffb + .hibytes $dffc + .hibytes $dffd + .hibytes $dffe + .hibytes $dfff + .hibytes $e000 + .hibytes $e001 + .hibytes $e002 + .hibytes $e003 + .hibytes $e004 + .hibytes $e005 + .hibytes $e006 + .hibytes $e007 + .hibytes $e008 + .hibytes $e009 + .hibytes $e00a + .hibytes $e00b + .hibytes $e00c + .hibytes $e00d + .hibytes $e00e + .hibytes $e00f + .hibytes $efe1 + .hibytes $efe2 + .hibytes $efe3 + .hibytes $efe4 + .hibytes $efe5 + .hibytes $efe6 + .hibytes $efe7 + .hibytes $efe8 + .hibytes $efe9 + .hibytes $efea + .hibytes $efeb + .hibytes $efec + .hibytes $efed + .hibytes $efee + .hibytes $efef + .hibytes $eff0 + .hibytes $eff1 + .hibytes $eff2 + .hibytes $eff3 + .hibytes $eff4 + .hibytes $eff5 + .hibytes $eff6 + .hibytes $eff7 + .hibytes $eff8 + .hibytes $eff9 + .hibytes $effa + .hibytes $effb + .hibytes $effc + .hibytes $effd + .hibytes $effe + .hibytes $efff + .hibytes $f000 + .hibytes $f001 + .hibytes $f002 + .hibytes $f003 + .hibytes $f004 + .hibytes $f005 + .hibytes $f006 + .hibytes $f007 + .hibytes $f008 + .hibytes $f009 + .hibytes $f00a + .hibytes $f00b + .hibytes $f00c + .hibytes $f00d + .hibytes $f00e + .hibytes $f00f + .hibytes $ffe1 + .hibytes $ffe2 + .hibytes $ffe3 + .hibytes $ffe4 + .hibytes $ffe5 + .hibytes $ffe6 + .hibytes $ffe7 + .hibytes $ffe8 + .hibytes $ffe9 + .hibytes $ffea + .hibytes $ffeb + .hibytes $ffec + .hibytes $ffed + .hibytes $ffee + .hibytes $ffef + .hibytes $fff0 + .hibytes $fff1 + .hibytes $fff2 + .hibytes $fff3 + .hibytes $fff4 + .hibytes $fff5 + .hibytes $fff6 + .hibytes $fff7 + .hibytes $fff8 + .hibytes $fff9 + .hibytes $fffa + .hibytes $fffb + .hibytes $fffc + .hibytes $fffd + .hibytes $fffe + .hibytes $ffff + + ; 4-digit hex values, uppercase + .hibytes $0000 + .hibytes $0001 + .hibytes $0002 + .hibytes $0003 + .hibytes $0004 + .hibytes $0005 + .hibytes $0006 + .hibytes $0007 + .hibytes $0008 + .hibytes $0009 + .hibytes $000A + .hibytes $000B + .hibytes $000C + .hibytes $000D + .hibytes $000E + .hibytes $000F + .hibytes $0010 + .hibytes $0011 + .hibytes $0012 + .hibytes $0013 + .hibytes $0070 + .hibytes $0071 + .hibytes $0072 + .hibytes $0073 + .hibytes $0074 + .hibytes $0075 + .hibytes $0076 + .hibytes $0077 + .hibytes $0078 + .hibytes $0079 + .hibytes $007A + .hibytes $007B + .hibytes $007C + .hibytes $007D + .hibytes $007E + .hibytes $007F + .hibytes $0080 + .hibytes $0081 + .hibytes $0082 + .hibytes $0083 + .hibytes $0084 + .hibytes $0085 + .hibytes $0086 + .hibytes $00F0 + .hibytes $00F1 + .hibytes $00F2 + .hibytes $00F3 + .hibytes $00F4 + .hibytes $00F5 + .hibytes $00F6 + .hibytes $00F7 + .hibytes $00F8 + .hibytes $00F9 + .hibytes $00FA + .hibytes $00FB + .hibytes $00FC + .hibytes $00FD + .hibytes $00FE + .hibytes $00FF + .hibytes $0100 + .hibytes $0101 + .hibytes $0102 + .hibytes $0103 + .hibytes $0FD2 + .hibytes $0FD3 + .hibytes $0FD4 + .hibytes $0FD5 + .hibytes $0FD6 + .hibytes $0FD7 + .hibytes $0FD8 + .hibytes $0FD9 + .hibytes $0FDA + .hibytes $0FDB + .hibytes $0FDC + .hibytes $0FDD + .hibytes $0FDE + .hibytes $0FDF + .hibytes $0FE0 + .hibytes $0FE1 + .hibytes $0FE2 + .hibytes $0FE3 + .hibytes $0FE4 + .hibytes $0FE5 + .hibytes $0FE6 + .hibytes $0FE7 + .hibytes $0FE8 + .hibytes $0FE9 + .hibytes $0FEA + .hibytes $0FEB + .hibytes $0FEC + .hibytes $0FED + .hibytes $0FEE + .hibytes $0FEF + .hibytes $0FF0 + .hibytes $0FF1 + .hibytes $0FF2 + .hibytes $0FF3 + .hibytes $0FF4 + .hibytes $0FF5 + .hibytes $0FF6 + .hibytes $0FF7 + .hibytes $0FF8 + .hibytes $0FF9 + .hibytes $0FFA + .hibytes $0FFB + .hibytes $0FFC + .hibytes $0FFD + .hibytes $0FFE + .hibytes $0FFF + .hibytes $1000 + .hibytes $1001 + .hibytes $1002 + .hibytes $1003 + .hibytes $1004 + .hibytes $1005 + .hibytes $1006 + .hibytes $1007 + .hibytes $1008 + .hibytes $7FF0 + .hibytes $7FF1 + .hibytes $7FF2 + .hibytes $7FF3 + .hibytes $7FF4 + .hibytes $7FF5 + .hibytes $7FF6 + .hibytes $7FF7 + .hibytes $7FF8 + .hibytes $7FF9 + .hibytes $7FFA + .hibytes $7FFB + .hibytes $7FFC + .hibytes $7FFD + .hibytes $7FFE + .hibytes $7FFF + .hibytes $8000 + .hibytes $8001 + .hibytes $8002 + .hibytes $8003 + .hibytes $8004 + .hibytes $8005 + .hibytes $8006 + .hibytes $8007 + .hibytes $8008 + .hibytes $8009 + .hibytes $800A + .hibytes $800B + .hibytes $9FE1 + .hibytes $9FE2 + .hibytes $9FE3 + .hibytes $9FE4 + .hibytes $9FE5 + .hibytes $9FE6 + .hibytes $9FE7 + .hibytes $9FE8 + .hibytes $9FE9 + .hibytes $9FEA + .hibytes $9FEB + .hibytes $9FEC + .hibytes $9FED + .hibytes $9FEE + .hibytes $9FEF + .hibytes $9FF0 + .hibytes $9FF1 + .hibytes $9FF2 + .hibytes $9FF3 + .hibytes $9FF4 + .hibytes $9FF5 + .hibytes $9FF6 + .hibytes $9FF7 + .hibytes $9FF8 + .hibytes $9FF9 + .hibytes $9FFA + .hibytes $9FFB + .hibytes $9FFC + .hibytes $9FFD + .hibytes $9FFE + .hibytes $9FFF + .hibytes $A000 + .hibytes $A001 + .hibytes $A002 + .hibytes $A003 + .hibytes $A004 + .hibytes $A005 + .hibytes $A006 + .hibytes $A007 + .hibytes $A008 + .hibytes $A009 + .hibytes $A00A + .hibytes $A00B + .hibytes $A00C + .hibytes $A00D + .hibytes $A00E + .hibytes $A00F + .hibytes $AFE1 + .hibytes $AFE2 + .hibytes $AFE3 + .hibytes $AFE4 + .hibytes $AFE5 + .hibytes $AFE6 + .hibytes $AFE7 + .hibytes $AFE8 + .hibytes $AFE9 + .hibytes $AFEA + .hibytes $AFEB + .hibytes $AFEC + .hibytes $AFED + .hibytes $AFEE + .hibytes $AFEF + .hibytes $AFF0 + .hibytes $AFF1 + .hibytes $AFF2 + .hibytes $AFF3 + .hibytes $AFF4 + .hibytes $AFF5 + .hibytes $AFF6 + .hibytes $AFF7 + .hibytes $AFF8 + .hibytes $AFF9 + .hibytes $AFFA + .hibytes $AFFB + .hibytes $AFFC + .hibytes $AFFD + .hibytes $AFFE + .hibytes $AFFF + .hibytes $B000 + .hibytes $B001 + .hibytes $B002 + .hibytes $B003 + .hibytes $B004 + .hibytes $B005 + .hibytes $B006 + .hibytes $B007 + .hibytes $B008 + .hibytes $B009 + .hibytes $B00A + .hibytes $B00B + .hibytes $B00C + .hibytes $B00D + .hibytes $B00E + .hibytes $B00F + .hibytes $BFE1 + .hibytes $BFE2 + .hibytes $BFE3 + .hibytes $BFE4 + .hibytes $BFE5 + .hibytes $BFE6 + .hibytes $BFE7 + .hibytes $BFE8 + .hibytes $BFE9 + .hibytes $BFEA + .hibytes $BFEB + .hibytes $BFEC + .hibytes $BFED + .hibytes $BFEE + .hibytes $BFEF + .hibytes $BFF0 + .hibytes $BFF1 + .hibytes $BFF2 + .hibytes $BFF3 + .hibytes $BFF4 + .hibytes $BFF5 + .hibytes $BFF6 + .hibytes $BFF7 + .hibytes $BFF8 + .hibytes $BFF9 + .hibytes $BFFA + .hibytes $BFFB + .hibytes $BFFC + .hibytes $BFFD + .hibytes $BFFE + .hibytes $BFFF + .hibytes $C000 + .hibytes $C001 + .hibytes $C002 + .hibytes $C003 + .hibytes $C004 + .hibytes $C005 + .hibytes $C006 + .hibytes $C007 + .hibytes $C008 + .hibytes $C009 + .hibytes $C00A + .hibytes $C00B + .hibytes $C00C + .hibytes $C00D + .hibytes $C00E + .hibytes $C00F + .hibytes $CFE1 + .hibytes $CFE2 + .hibytes $CFE3 + .hibytes $CFE4 + .hibytes $CFE5 + .hibytes $CFE6 + .hibytes $CFE7 + .hibytes $CFE8 + .hibytes $CFE9 + .hibytes $CFEA + .hibytes $CFEB + .hibytes $CFEC + .hibytes $CFED + .hibytes $CFEE + .hibytes $CFEF + .hibytes $CFF0 + .hibytes $CFF1 + .hibytes $CFF2 + .hibytes $CFF3 + .hibytes $CFF4 + .hibytes $CFF5 + .hibytes $CFF6 + .hibytes $CFF7 + .hibytes $CFF8 + .hibytes $CFF9 + .hibytes $CFFA + .hibytes $CFFB + .hibytes $CFFC + .hibytes $CFFD + .hibytes $CFFE + .hibytes $CFFF + .hibytes $D000 + .hibytes $D001 + .hibytes $D002 + .hibytes $D003 + .hibytes $D004 + .hibytes $D005 + .hibytes $D006 + .hibytes $D007 + .hibytes $D008 + .hibytes $D009 + .hibytes $D00A + .hibytes $D00B + .hibytes $D00C + .hibytes $D00D + .hibytes $D00E + .hibytes $D00F + .hibytes $DFE1 + .hibytes $DFE2 + .hibytes $DFE3 + .hibytes $DFE4 + .hibytes $DFE5 + .hibytes $DFE6 + .hibytes $DFE7 + .hibytes $DFE8 + .hibytes $DFE9 + .hibytes $DFEA + .hibytes $DFEB + .hibytes $DFEC + .hibytes $DFED + .hibytes $DFEE + .hibytes $DFEF + .hibytes $DFF0 + .hibytes $DFF1 + .hibytes $DFF2 + .hibytes $DFF3 + .hibytes $DFF4 + .hibytes $DFF5 + .hibytes $DFF6 + .hibytes $DFF7 + .hibytes $DFF8 + .hibytes $DFF9 + .hibytes $DFFA + .hibytes $DFFB + .hibytes $DFFC + .hibytes $DFFD + .hibytes $DFFE + .hibytes $DFFF + .hibytes $E000 + .hibytes $E001 + .hibytes $E002 + .hibytes $E003 + .hibytes $E004 + .hibytes $E005 + .hibytes $E006 + .hibytes $E007 + .hibytes $E008 + .hibytes $E009 + .hibytes $E00A + .hibytes $E00B + .hibytes $E00C + .hibytes $E00D + .hibytes $E00E + .hibytes $E00F + .hibytes $EFE1 + .hibytes $EFE2 + .hibytes $EFE3 + .hibytes $EFE4 + .hibytes $EFE5 + .hibytes $EFE6 + .hibytes $EFE7 + .hibytes $EFE8 + .hibytes $EFE9 + .hibytes $EFEA + .hibytes $EFEB + .hibytes $EFEC + .hibytes $EFED + .hibytes $EFEE + .hibytes $EFEF + .hibytes $EFF0 + .hibytes $EFF1 + .hibytes $EFF2 + .hibytes $EFF3 + .hibytes $EFF4 + .hibytes $EFF5 + .hibytes $EFF6 + .hibytes $EFF7 + .hibytes $EFF8 + .hibytes $EFF9 + .hibytes $EFFA + .hibytes $EFFB + .hibytes $EFFC + .hibytes $EFFD + .hibytes $EFFE + .hibytes $EFFF + .hibytes $F000 + .hibytes $F001 + .hibytes $F002 + .hibytes $F003 + .hibytes $F004 + .hibytes $F005 + .hibytes $F006 + .hibytes $F007 + .hibytes $F008 + .hibytes $F009 + .hibytes $F00A + .hibytes $F00B + .hibytes $F00C + .hibytes $F00D + .hibytes $F00E + .hibytes $F00F + .hibytes $FFE1 + .hibytes $FFE2 + .hibytes $FFE3 + .hibytes $FFE4 + .hibytes $FFE5 + .hibytes $FFE6 + .hibytes $FFE7 + .hibytes $FFE8 + .hibytes $FFE9 + .hibytes $FFEA + .hibytes $FFEB + .hibytes $FFEC + .hibytes $FFED + .hibytes $FFEE + .hibytes $FFEF + .hibytes $FFF0 + .hibytes $FFF1 + .hibytes $FFF2 + .hibytes $FFF3 + .hibytes $FFF4 + .hibytes $FFF5 + .hibytes $FFF6 + .hibytes $FFF7 + .hibytes $FFF8 + .hibytes $FFF9 + .hibytes $FFFA + .hibytes $FFFB + .hibytes $FFFC + .hibytes $FFFD + .hibytes $FFFE + .hibytes $FFFF + + ; alternative hex values + .hibytes 0h + .hibytes 1h + .hibytes 2h + .hibytes 3h + .hibytes 4h + .hibytes 5h + .hibytes 6h + .hibytes 7h + .hibytes 8h + .hibytes 9h + .hibytes 0ah + .hibytes 0bh + .hibytes 0ch + .hibytes 0dh + .hibytes 0eh + .hibytes 0fh + .hibytes 10h + .hibytes 11h + .hibytes 12h + .hibytes 13h + .hibytes 70h + .hibytes 71h + .hibytes 72h + .hibytes 73h + .hibytes 74h + .hibytes 75h + .hibytes 76h + .hibytes 77h + .hibytes 78h + .hibytes 79h + .hibytes 7ah + .hibytes 7bh + .hibytes 7ch + .hibytes 7dh + .hibytes 7eh + .hibytes 7fh + .hibytes 80h + .hibytes 81h + .hibytes 82h + .hibytes 83h + .hibytes 84h + .hibytes 85h + .hibytes 86h + .hibytes 0f0h + .hibytes 0f1h + .hibytes 0f2h + .hibytes 0f3h + .hibytes 0f4h + .hibytes 0f5h + .hibytes 0f6h + .hibytes 0f7h + .hibytes 0f8h + .hibytes 0f9h + .hibytes 0fah + .hibytes 0fbh + .hibytes 0fch + .hibytes 0fdh + .hibytes 0feh + .hibytes 0ffh + .hibytes 100h + .hibytes 101h + .hibytes 102h + .hibytes 103h + .hibytes 0fd2h + .hibytes 0fd3h + .hibytes 0fd4h + .hibytes 0fd5h + .hibytes 0fd6h + .hibytes 0fd7h + .hibytes 0fd8h + .hibytes 0fd9h + .hibytes 0fdah + .hibytes 0fdbh + .hibytes 0fdch + .hibytes 0fddh + .hibytes 0fdeh + .hibytes 0fdfh + .hibytes 0fe0h + .hibytes 0fe1h + .hibytes 0fe2h + .hibytes 0fe3h + .hibytes 0fe4h + .hibytes 0fe5h + .hibytes 0fe6h + .hibytes 0fe7h + .hibytes 0fe8h + .hibytes 0fe9h + .hibytes 0feah + .hibytes 0febh + .hibytes 0fech + .hibytes 0fedh + .hibytes 0feeh + .hibytes 0fefh + .hibytes 0ff0h + .hibytes 0ff1h + .hibytes 0ff2h + .hibytes 0ff3h + .hibytes 0ff4h + .hibytes 0ff5h + .hibytes 0ff6h + .hibytes 0ff7h + .hibytes 0ff8h + .hibytes 0ff9h + .hibytes 0ffah + .hibytes 0ffbh + .hibytes 0ffch + .hibytes 0ffdh + .hibytes 0ffeh + .hibytes 0fffh + .hibytes 1000h + .hibytes 1001h + .hibytes 1002h + .hibytes 1003h + .hibytes 1004h + .hibytes 1005h + .hibytes 1006h + .hibytes 1007h + .hibytes 1008h + .hibytes 7ff0h + .hibytes 7ff1h + .hibytes 7ff2h + .hibytes 7ff3h + .hibytes 7ff4h + .hibytes 7ff5h + .hibytes 7ff6h + .hibytes 7ff7h + .hibytes 7ff8h + .hibytes 7ff9h + .hibytes 7ffah + .hibytes 7ffbh + .hibytes 7ffch + .hibytes 7ffdh + .hibytes 7ffeh + .hibytes 7fffh + .hibytes 8000h + .hibytes 8001h + .hibytes 8002h + .hibytes 8003h + .hibytes 8004h + .hibytes 8005h + .hibytes 8006h + .hibytes 8007h + .hibytes 8008h + .hibytes 8009h + .hibytes 800ah + .hibytes 800bh + .hibytes 9fe1h + .hibytes 9fe2h + .hibytes 9fe3h + .hibytes 9fe4h + .hibytes 9fe5h + .hibytes 9fe6h + .hibytes 9fe7h + .hibytes 9fe8h + .hibytes 9fe9h + .hibytes 9feah + .hibytes 9febh + .hibytes 9fech + .hibytes 9fedh + .hibytes 9feeh + .hibytes 9fefh + .hibytes 9ff0h + .hibytes 9ff1h + .hibytes 9ff2h + .hibytes 9ff3h + .hibytes 9ff4h + .hibytes 9ff5h + .hibytes 9ff6h + .hibytes 9ff7h + .hibytes 9ff8h + .hibytes 9ff9h + .hibytes 9ffah + .hibytes 9ffbh + .hibytes 9ffch + .hibytes 9ffdh + .hibytes 9ffeh + .hibytes 9fffh + .hibytes 0a000h + .hibytes 0a001h + .hibytes 0a002h + .hibytes 0a003h + .hibytes 0a004h + .hibytes 0a005h + .hibytes 0a006h + .hibytes 0a007h + .hibytes 0a008h + .hibytes 0a009h + .hibytes 0a00ah + .hibytes 0a00bh + .hibytes 0a00ch + .hibytes 0a00dh + .hibytes 0a00eh + .hibytes 0a00fh + .hibytes 0afe1h + .hibytes 0afe2h + .hibytes 0afe3h + .hibytes 0afe4h + .hibytes 0afe5h + .hibytes 0afe6h + .hibytes 0afe7h + .hibytes 0afe8h + .hibytes 0afe9h + .hibytes 0afeah + .hibytes 0afebh + .hibytes 0afech + .hibytes 0afedh + .hibytes 0afeeh + .hibytes 0afefh + .hibytes 0aff0h + .hibytes 0aff1h + .hibytes 0aff2h + .hibytes 0aff3h + .hibytes 0aff4h + .hibytes 0aff5h + .hibytes 0aff6h + .hibytes 0aff7h + .hibytes 0aff8h + .hibytes 0aff9h + .hibytes 0affah + .hibytes 0affbh + .hibytes 0affch + .hibytes 0affdh + .hibytes 0affeh + .hibytes 0afffh + .hibytes 0b000h + .hibytes 0b001h + .hibytes 0b002h + .hibytes 0b003h + .hibytes 0b004h + .hibytes 0b005h + .hibytes 0b006h + .hibytes 0b007h + .hibytes 0b008h + .hibytes 0b009h + .hibytes 0b00ah + .hibytes 0b00bh + .hibytes 0b00ch + .hibytes 0b00dh + .hibytes 0b00eh + .hibytes 0b00fh + .hibytes 0bfe1h + .hibytes 0bfe2h + .hibytes 0bfe3h + .hibytes 0bfe4h + .hibytes 0bfe5h + .hibytes 0bfe6h + .hibytes 0bfe7h + .hibytes 0bfe8h + .hibytes 0bfe9h + .hibytes 0bfeah + .hibytes 0bfebh + .hibytes 0bfech + .hibytes 0bfedh + .hibytes 0bfeeh + .hibytes 0bfefh + .hibytes 0bff0h + .hibytes 0bff1h + .hibytes 0bff2h + .hibytes 0bff3h + .hibytes 0bff4h + .hibytes 0bff5h + .hibytes 0bff6h + .hibytes 0bff7h + .hibytes 0bff8h + .hibytes 0bff9h + .hibytes 0bffah + .hibytes 0bffbh + .hibytes 0bffch + .hibytes 0bffdh + .hibytes 0bffeh + .hibytes 0bfffh + .hibytes 0c000h + .hibytes 0c001h + .hibytes 0c002h + .hibytes 0c003h + .hibytes 0c004h + .hibytes 0c005h + .hibytes 0c006h + .hibytes 0c007h + .hibytes 0c008h + .hibytes 0c009h + .hibytes 0c00ah + .hibytes 0c00bh + .hibytes 0c00ch + .hibytes 0c00dh + .hibytes 0c00eh + .hibytes 0c00fh + .hibytes 0cfe1h + .hibytes 0cfe2h + .hibytes 0cfe3h + .hibytes 0cfe4h + .hibytes 0cfe5h + .hibytes 0cfe6h + .hibytes 0cfe7h + .hibytes 0cfe8h + .hibytes 0cfe9h + .hibytes 0cfeah + .hibytes 0cfebh + .hibytes 0cfech + .hibytes 0cfedh + .hibytes 0cfeeh + .hibytes 0cfefh + .hibytes 0cff0h + .hibytes 0cff1h + .hibytes 0cff2h + .hibytes 0cff3h + .hibytes 0cff4h + .hibytes 0cff5h + .hibytes 0cff6h + .hibytes 0cff7h + .hibytes 0cff8h + .hibytes 0cff9h + .hibytes 0cffah + .hibytes 0cffbh + .hibytes 0cffch + .hibytes 0cffdh + .hibytes 0cffeh + .hibytes 0cfffh + .hibytes 0d000h + .hibytes 0d001h + .hibytes 0d002h + .hibytes 0d003h + .hibytes 0d004h + .hibytes 0d005h + .hibytes 0d006h + .hibytes 0d007h + .hibytes 0d008h + .hibytes 0d009h + .hibytes 0d00ah + .hibytes 0d00bh + .hibytes 0d00ch + .hibytes 0d00dh + .hibytes 0d00eh + .hibytes 0d00fh + .hibytes 0dfe1h + .hibytes 0dfe2h + .hibytes 0dfe3h + .hibytes 0dfe4h + .hibytes 0dfe5h + .hibytes 0dfe6h + .hibytes 0dfe7h + .hibytes 0dfe8h + .hibytes 0dfe9h + .hibytes 0dfeah + .hibytes 0dfebh + .hibytes 0dfech + .hibytes 0dfedh + .hibytes 0dfeeh + .hibytes 0dfefh + .hibytes 0dff0h + .hibytes 0dff1h + .hibytes 0dff2h + .hibytes 0dff3h + .hibytes 0dff4h + .hibytes 0dff5h + .hibytes 0dff6h + .hibytes 0dff7h + .hibytes 0dff8h + .hibytes 0dff9h + .hibytes 0dffah + .hibytes 0dffbh + .hibytes 0dffch + .hibytes 0dffdh + .hibytes 0dffeh + .hibytes 0dfffh + .hibytes 0e000h + .hibytes 0e001h + .hibytes 0e002h + .hibytes 0e003h + .hibytes 0e004h + .hibytes 0e005h + .hibytes 0e006h + .hibytes 0e007h + .hibytes 0e008h + .hibytes 0e009h + .hibytes 0e00ah + .hibytes 0e00bh + .hibytes 0e00ch + .hibytes 0e00dh + .hibytes 0e00eh + .hibytes 0e00fh + .hibytes 0efe1h + .hibytes 0efe2h + .hibytes 0efe3h + .hibytes 0efe4h + .hibytes 0efe5h + .hibytes 0efe6h + .hibytes 0efe7h + .hibytes 0efe8h + .hibytes 0efe9h + .hibytes 0efeah + .hibytes 0efebh + .hibytes 0efech + .hibytes 0efedh + .hibytes 0efeeh + .hibytes 0efefh + .hibytes 0eff0h + .hibytes 0eff1h + .hibytes 0eff2h + .hibytes 0eff3h + .hibytes 0eff4h + .hibytes 0eff5h + .hibytes 0eff6h + .hibytes 0eff7h + .hibytes 0eff8h + .hibytes 0eff9h + .hibytes 0effah + .hibytes 0effbh + .hibytes 0effch + .hibytes 0effdh + .hibytes 0effeh + .hibytes 0efffh + .hibytes 0f000h + .hibytes 0f001h + .hibytes 0f002h + .hibytes 0f003h + .hibytes 0f004h + .hibytes 0f005h + .hibytes 0f006h + .hibytes 0f007h + .hibytes 0f008h + .hibytes 0f009h + .hibytes 0f00ah + .hibytes 0f00bh + .hibytes 0f00ch + .hibytes 0f00dh + .hibytes 0f00eh + .hibytes 0f00fh + .hibytes 0ffe1h + .hibytes 0ffe2h + .hibytes 0ffe3h + .hibytes 0ffe4h + .hibytes 0ffe5h + .hibytes 0ffe6h + .hibytes 0ffe7h + .hibytes 0ffe8h + .hibytes 0ffe9h + .hibytes 0ffeah + .hibytes 0ffebh + .hibytes 0ffech + .hibytes 0ffedh + .hibytes 0ffeeh + .hibytes 0ffefh + .hibytes 0fff0h + .hibytes 0fff1h + .hibytes 0fff2h + .hibytes 0fff3h + .hibytes 0fff4h + .hibytes 0fff5h + .hibytes 0fff6h + .hibytes 0fff7h + .hibytes 0fff8h + .hibytes 0fff9h + .hibytes 0fffah + .hibytes 0fffbh + .hibytes 0fffch + .hibytes 0fffdh + .hibytes 0fffeh + .hibytes 0ffffh + + ; alternative hex values, uppercase + .hibytes 0h + .hibytes 1h + .hibytes 2h + .hibytes 3h + .hibytes 4h + .hibytes 5h + .hibytes 6h + .hibytes 7h + .hibytes 8h + .hibytes 9h + .hibytes 0Ah + .hibytes 0Bh + .hibytes 0Ch + .hibytes 0Dh + .hibytes 0Eh + .hibytes 0Fh + .hibytes 10h + .hibytes 11h + .hibytes 12h + .hibytes 13h + .hibytes 70h + .hibytes 71h + .hibytes 72h + .hibytes 73h + .hibytes 74h + .hibytes 75h + .hibytes 76h + .hibytes 77h + .hibytes 78h + .hibytes 79h + .hibytes 7Ah + .hibytes 7Bh + .hibytes 7Ch + .hibytes 7Dh + .hibytes 7Eh + .hibytes 7Fh + .hibytes 80h + .hibytes 81h + .hibytes 82h + .hibytes 83h + .hibytes 84h + .hibytes 85h + .hibytes 86h + .hibytes 0F0h + .hibytes 0F1h + .hibytes 0F2h + .hibytes 0F3h + .hibytes 0F4h + .hibytes 0F5h + .hibytes 0F6h + .hibytes 0F7h + .hibytes 0F8h + .hibytes 0F9h + .hibytes 0FAh + .hibytes 0FBh + .hibytes 0FCh + .hibytes 0FDh + .hibytes 0FEh + .hibytes 0FFh + .hibytes 100h + .hibytes 101h + .hibytes 102h + .hibytes 103h + .hibytes 0FD2h + .hibytes 0FD3h + .hibytes 0FD4h + .hibytes 0FD5h + .hibytes 0FD6h + .hibytes 0FD7h + .hibytes 0FD8h + .hibytes 0FD9h + .hibytes 0FDAh + .hibytes 0FDBh + .hibytes 0FDCh + .hibytes 0FDDh + .hibytes 0FDEh + .hibytes 0FDFh + .hibytes 0FE0h + .hibytes 0FE1h + .hibytes 0FE2h + .hibytes 0FE3h + .hibytes 0FE4h + .hibytes 0FE5h + .hibytes 0FE6h + .hibytes 0FE7h + .hibytes 0FE8h + .hibytes 0FE9h + .hibytes 0FEAh + .hibytes 0FEBh + .hibytes 0FECh + .hibytes 0FEDh + .hibytes 0FEEh + .hibytes 0FEFh + .hibytes 0FF0h + .hibytes 0FF1h + .hibytes 0FF2h + .hibytes 0FF3h + .hibytes 0FF4h + .hibytes 0FF5h + .hibytes 0FF6h + .hibytes 0FF7h + .hibytes 0FF8h + .hibytes 0FF9h + .hibytes 0FFAh + .hibytes 0FFBh + .hibytes 0FFCh + .hibytes 0FFDh + .hibytes 0FFEh + .hibytes 0FFFh + .hibytes 1000h + .hibytes 1001h + .hibytes 1002h + .hibytes 1003h + .hibytes 1004h + .hibytes 1005h + .hibytes 1006h + .hibytes 1007h + .hibytes 1008h + .hibytes 7FF0h + .hibytes 7FF1h + .hibytes 7FF2h + .hibytes 7FF3h + .hibytes 7FF4h + .hibytes 7FF5h + .hibytes 7FF6h + .hibytes 7FF7h + .hibytes 7FF8h + .hibytes 7FF9h + .hibytes 7FFAh + .hibytes 7FFBh + .hibytes 7FFCh + .hibytes 7FFDh + .hibytes 7FFEh + .hibytes 7FFFh + .hibytes 8000h + .hibytes 8001h + .hibytes 8002h + .hibytes 8003h + .hibytes 8004h + .hibytes 8005h + .hibytes 8006h + .hibytes 8007h + .hibytes 8008h + .hibytes 8009h + .hibytes 800Ah + .hibytes 800Bh + .hibytes 9FE1h + .hibytes 9FE2h + .hibytes 9FE3h + .hibytes 9FE4h + .hibytes 9FE5h + .hibytes 9FE6h + .hibytes 9FE7h + .hibytes 9FE8h + .hibytes 9FE9h + .hibytes 9FEAh + .hibytes 9FEBh + .hibytes 9FECh + .hibytes 9FEDh + .hibytes 9FEEh + .hibytes 9FEFh + .hibytes 9FF0h + .hibytes 9FF1h + .hibytes 9FF2h + .hibytes 9FF3h + .hibytes 9FF4h + .hibytes 9FF5h + .hibytes 9FF6h + .hibytes 9FF7h + .hibytes 9FF8h + .hibytes 9FF9h + .hibytes 9FFAh + .hibytes 9FFBh + .hibytes 9FFCh + .hibytes 9FFDh + .hibytes 9FFEh + .hibytes 9FFFh + .hibytes 0A000h + .hibytes 0A001h + .hibytes 0A002h + .hibytes 0A003h + .hibytes 0A004h + .hibytes 0A005h + .hibytes 0A006h + .hibytes 0A007h + .hibytes 0A008h + .hibytes 0A009h + .hibytes 0A00Ah + .hibytes 0A00Bh + .hibytes 0A00Ch + .hibytes 0A00Dh + .hibytes 0A00Eh + .hibytes 0A00Fh + .hibytes 0AFE1h + .hibytes 0AFE2h + .hibytes 0AFE3h + .hibytes 0AFE4h + .hibytes 0AFE5h + .hibytes 0AFE6h + .hibytes 0AFE7h + .hibytes 0AFE8h + .hibytes 0AFE9h + .hibytes 0AFEAh + .hibytes 0AFEBh + .hibytes 0AFECh + .hibytes 0AFEDh + .hibytes 0AFEEh + .hibytes 0AFEFh + .hibytes 0AFF0h + .hibytes 0AFF1h + .hibytes 0AFF2h + .hibytes 0AFF3h + .hibytes 0AFF4h + .hibytes 0AFF5h + .hibytes 0AFF6h + .hibytes 0AFF7h + .hibytes 0AFF8h + .hibytes 0AFF9h + .hibytes 0AFFAh + .hibytes 0AFFBh + .hibytes 0AFFCh + .hibytes 0AFFDh + .hibytes 0AFFEh + .hibytes 0AFFFh + .hibytes 0B000h + .hibytes 0B001h + .hibytes 0B002h + .hibytes 0B003h + .hibytes 0B004h + .hibytes 0B005h + .hibytes 0B006h + .hibytes 0B007h + .hibytes 0B008h + .hibytes 0B009h + .hibytes 0B00Ah + .hibytes 0B00Bh + .hibytes 0B00Ch + .hibytes 0B00Dh + .hibytes 0B00Eh + .hibytes 0B00Fh + .hibytes 0BFE1h + .hibytes 0BFE2h + .hibytes 0BFE3h + .hibytes 0BFE4h + .hibytes 0BFE5h + .hibytes 0BFE6h + .hibytes 0BFE7h + .hibytes 0BFE8h + .hibytes 0BFE9h + .hibytes 0BFEAh + .hibytes 0BFEBh + .hibytes 0BFECh + .hibytes 0BFEDh + .hibytes 0BFEEh + .hibytes 0BFEFh + .hibytes 0BFF0h + .hibytes 0BFF1h + .hibytes 0BFF2h + .hibytes 0BFF3h + .hibytes 0BFF4h + .hibytes 0BFF5h + .hibytes 0BFF6h + .hibytes 0BFF7h + .hibytes 0BFF8h + .hibytes 0BFF9h + .hibytes 0BFFAh + .hibytes 0BFFBh + .hibytes 0BFFCh + .hibytes 0BFFDh + .hibytes 0BFFEh + .hibytes 0BFFFh + .hibytes 0C000h + .hibytes 0C001h + .hibytes 0C002h + .hibytes 0C003h + .hibytes 0C004h + .hibytes 0C005h + .hibytes 0C006h + .hibytes 0C007h + .hibytes 0C008h + .hibytes 0C009h + .hibytes 0C00Ah + .hibytes 0C00Bh + .hibytes 0C00Ch + .hibytes 0C00Dh + .hibytes 0C00Eh + .hibytes 0C00Fh + .hibytes 0CFE1h + .hibytes 0CFE2h + .hibytes 0CFE3h + .hibytes 0CFE4h + .hibytes 0CFE5h + .hibytes 0CFE6h + .hibytes 0CFE7h + .hibytes 0CFE8h + .hibytes 0CFE9h + .hibytes 0CFEAh + .hibytes 0CFEBh + .hibytes 0CFECh + .hibytes 0CFEDh + .hibytes 0CFEEh + .hibytes 0CFEFh + .hibytes 0CFF0h + .hibytes 0CFF1h + .hibytes 0CFF2h + .hibytes 0CFF3h + .hibytes 0CFF4h + .hibytes 0CFF5h + .hibytes 0CFF6h + .hibytes 0CFF7h + .hibytes 0CFF8h + .hibytes 0CFF9h + .hibytes 0CFFAh + .hibytes 0CFFBh + .hibytes 0CFFCh + .hibytes 0CFFDh + .hibytes 0CFFEh + .hibytes 0CFFFh + .hibytes 0D000h + .hibytes 0D001h + .hibytes 0D002h + .hibytes 0D003h + .hibytes 0D004h + .hibytes 0D005h + .hibytes 0D006h + .hibytes 0D007h + .hibytes 0D008h + .hibytes 0D009h + .hibytes 0D00Ah + .hibytes 0D00Bh + .hibytes 0D00Ch + .hibytes 0D00Dh + .hibytes 0D00Eh + .hibytes 0D00Fh + .hibytes 0DFE1h + .hibytes 0DFE2h + .hibytes 0DFE3h + .hibytes 0DFE4h + .hibytes 0DFE5h + .hibytes 0DFE6h + .hibytes 0DFE7h + .hibytes 0DFE8h + .hibytes 0DFE9h + .hibytes 0DFEAh + .hibytes 0DFEBh + .hibytes 0DFECh + .hibytes 0DFEDh + .hibytes 0DFEEh + .hibytes 0DFEFh + .hibytes 0DFF0h + .hibytes 0DFF1h + .hibytes 0DFF2h + .hibytes 0DFF3h + .hibytes 0DFF4h + .hibytes 0DFF5h + .hibytes 0DFF6h + .hibytes 0DFF7h + .hibytes 0DFF8h + .hibytes 0DFF9h + .hibytes 0DFFAh + .hibytes 0DFFBh + .hibytes 0DFFCh + .hibytes 0DFFDh + .hibytes 0DFFEh + .hibytes 0DFFFh + .hibytes 0E000h + .hibytes 0E001h + .hibytes 0E002h + .hibytes 0E003h + .hibytes 0E004h + .hibytes 0E005h + .hibytes 0E006h + .hibytes 0E007h + .hibytes 0E008h + .hibytes 0E009h + .hibytes 0E00Ah + .hibytes 0E00Bh + .hibytes 0E00Ch + .hibytes 0E00Dh + .hibytes 0E00Eh + .hibytes 0E00Fh + .hibytes 0EFE1h + .hibytes 0EFE2h + .hibytes 0EFE3h + .hibytes 0EFE4h + .hibytes 0EFE5h + .hibytes 0EFE6h + .hibytes 0EFE7h + .hibytes 0EFE8h + .hibytes 0EFE9h + .hibytes 0EFEAh + .hibytes 0EFEBh + .hibytes 0EFECh + .hibytes 0EFEDh + .hibytes 0EFEEh + .hibytes 0EFEFh + .hibytes 0EFF0h + .hibytes 0EFF1h + .hibytes 0EFF2h + .hibytes 0EFF3h + .hibytes 0EFF4h + .hibytes 0EFF5h + .hibytes 0EFF6h + .hibytes 0EFF7h + .hibytes 0EFF8h + .hibytes 0EFF9h + .hibytes 0EFFAh + .hibytes 0EFFBh + .hibytes 0EFFCh + .hibytes 0EFFDh + .hibytes 0EFFEh + .hibytes 0EFFFh + .hibytes 0F000h + .hibytes 0F001h + .hibytes 0F002h + .hibytes 0F003h + .hibytes 0F004h + .hibytes 0F005h + .hibytes 0F006h + .hibytes 0F007h + .hibytes 0F008h + .hibytes 0F009h + .hibytes 0F00Ah + .hibytes 0F00Bh + .hibytes 0F00Ch + .hibytes 0F00Dh + .hibytes 0F00Eh + .hibytes 0F00Fh + .hibytes 0FFE1h + .hibytes 0FFE2h + .hibytes 0FFE3h + .hibytes 0FFE4h + .hibytes 0FFE5h + .hibytes 0FFE6h + .hibytes 0FFE7h + .hibytes 0FFE8h + .hibytes 0FFE9h + .hibytes 0FFEAh + .hibytes 0FFEBh + .hibytes 0FFECh + .hibytes 0FFEDh + .hibytes 0FFEEh + .hibytes 0FFEFh + .hibytes 0FFF0h + .hibytes 0FFF1h + .hibytes 0FFF2h + .hibytes 0FFF3h + .hibytes 0FFF4h + .hibytes 0FFF5h + .hibytes 0FFF6h + .hibytes 0FFF7h + .hibytes 0FFF8h + .hibytes 0FFF9h + .hibytes 0FFFAh + .hibytes 0FFFBh + .hibytes 0FFFCh + .hibytes 0FFFDh + .hibytes 0FFFEh + .hibytes 0FFFFh + + ; alternative 4-digit hex values + .hibytes 0000h + .hibytes 0001h + .hibytes 0002h + .hibytes 0003h + .hibytes 0004h + .hibytes 0005h + .hibytes 0006h + .hibytes 0007h + .hibytes 0008h + .hibytes 0009h + .hibytes 000ah + .hibytes 000bh + .hibytes 000ch + .hibytes 000dh + .hibytes 000eh + .hibytes 000fh + .hibytes 0010h + .hibytes 0011h + .hibytes 0012h + .hibytes 0013h + .hibytes 0070h + .hibytes 0071h + .hibytes 0072h + .hibytes 0073h + .hibytes 0074h + .hibytes 0075h + .hibytes 0076h + .hibytes 0077h + .hibytes 0078h + .hibytes 0079h + .hibytes 007ah + .hibytes 007bh + .hibytes 007ch + .hibytes 007dh + .hibytes 007eh + .hibytes 007fh + .hibytes 0080h + .hibytes 0081h + .hibytes 0082h + .hibytes 0083h + .hibytes 0084h + .hibytes 0085h + .hibytes 0086h + .hibytes 00f0h + .hibytes 00f1h + .hibytes 00f2h + .hibytes 00f3h + .hibytes 00f4h + .hibytes 00f5h + .hibytes 00f6h + .hibytes 00f7h + .hibytes 00f8h + .hibytes 00f9h + .hibytes 00fah + .hibytes 00fbh + .hibytes 00fch + .hibytes 00fdh + .hibytes 00feh + .hibytes 00ffh + .hibytes 0100h + .hibytes 0101h + .hibytes 0102h + .hibytes 0103h + .hibytes 0fd2h + .hibytes 0fd3h + .hibytes 0fd4h + .hibytes 0fd5h + .hibytes 0fd6h + .hibytes 0fd7h + .hibytes 0fd8h + .hibytes 0fd9h + .hibytes 0fdah + .hibytes 0fdbh + .hibytes 0fdch + .hibytes 0fddh + .hibytes 0fdeh + .hibytes 0fdfh + .hibytes 0fe0h + .hibytes 0fe1h + .hibytes 0fe2h + .hibytes 0fe3h + .hibytes 0fe4h + .hibytes 0fe5h + .hibytes 0fe6h + .hibytes 0fe7h + .hibytes 0fe8h + .hibytes 0fe9h + .hibytes 0feah + .hibytes 0febh + .hibytes 0fech + .hibytes 0fedh + .hibytes 0feeh + .hibytes 0fefh + .hibytes 0ff0h + .hibytes 0ff1h + .hibytes 0ff2h + .hibytes 0ff3h + .hibytes 0ff4h + .hibytes 0ff5h + .hibytes 0ff6h + .hibytes 0ff7h + .hibytes 0ff8h + .hibytes 0ff9h + .hibytes 0ffah + .hibytes 0ffbh + .hibytes 0ffch + .hibytes 0ffdh + .hibytes 0ffeh + .hibytes 0fffh + .hibytes 1000h + .hibytes 1001h + .hibytes 1002h + .hibytes 1003h + .hibytes 1004h + .hibytes 1005h + .hibytes 1006h + .hibytes 1007h + .hibytes 1008h + .hibytes 7ff0h + .hibytes 7ff1h + .hibytes 7ff2h + .hibytes 7ff3h + .hibytes 7ff4h + .hibytes 7ff5h + .hibytes 7ff6h + .hibytes 7ff7h + .hibytes 7ff8h + .hibytes 7ff9h + .hibytes 7ffah + .hibytes 7ffbh + .hibytes 7ffch + .hibytes 7ffdh + .hibytes 7ffeh + .hibytes 7fffh + .hibytes 8000h + .hibytes 8001h + .hibytes 8002h + .hibytes 8003h + .hibytes 8004h + .hibytes 8005h + .hibytes 8006h + .hibytes 8007h + .hibytes 8008h + .hibytes 8009h + .hibytes 800ah + .hibytes 800bh + .hibytes 9fe1h + .hibytes 9fe2h + .hibytes 9fe3h + .hibytes 9fe4h + .hibytes 9fe5h + .hibytes 9fe6h + .hibytes 9fe7h + .hibytes 9fe8h + .hibytes 9fe9h + .hibytes 9feah + .hibytes 9febh + .hibytes 9fech + .hibytes 9fedh + .hibytes 9feeh + .hibytes 9fefh + .hibytes 9ff0h + .hibytes 9ff1h + .hibytes 9ff2h + .hibytes 9ff3h + .hibytes 9ff4h + .hibytes 9ff5h + .hibytes 9ff6h + .hibytes 9ff7h + .hibytes 9ff8h + .hibytes 9ff9h + .hibytes 9ffah + .hibytes 9ffbh + .hibytes 9ffch + .hibytes 9ffdh + .hibytes 9ffeh + .hibytes 9fffh + .hibytes 0a000h + .hibytes 0a001h + .hibytes 0a002h + .hibytes 0a003h + .hibytes 0a004h + .hibytes 0a005h + .hibytes 0a006h + .hibytes 0a007h + .hibytes 0a008h + .hibytes 0a009h + .hibytes 0a00ah + .hibytes 0a00bh + .hibytes 0a00ch + .hibytes 0a00dh + .hibytes 0a00eh + .hibytes 0a00fh + .hibytes 0afe1h + .hibytes 0afe2h + .hibytes 0afe3h + .hibytes 0afe4h + .hibytes 0afe5h + .hibytes 0afe6h + .hibytes 0afe7h + .hibytes 0afe8h + .hibytes 0afe9h + .hibytes 0afeah + .hibytes 0afebh + .hibytes 0afech + .hibytes 0afedh + .hibytes 0afeeh + .hibytes 0afefh + .hibytes 0aff0h + .hibytes 0aff1h + .hibytes 0aff2h + .hibytes 0aff3h + .hibytes 0aff4h + .hibytes 0aff5h + .hibytes 0aff6h + .hibytes 0aff7h + .hibytes 0aff8h + .hibytes 0aff9h + .hibytes 0affah + .hibytes 0affbh + .hibytes 0affch + .hibytes 0affdh + .hibytes 0affeh + .hibytes 0afffh + .hibytes 0b000h + .hibytes 0b001h + .hibytes 0b002h + .hibytes 0b003h + .hibytes 0b004h + .hibytes 0b005h + .hibytes 0b006h + .hibytes 0b007h + .hibytes 0b008h + .hibytes 0b009h + .hibytes 0b00ah + .hibytes 0b00bh + .hibytes 0b00ch + .hibytes 0b00dh + .hibytes 0b00eh + .hibytes 0b00fh + .hibytes 0bfe1h + .hibytes 0bfe2h + .hibytes 0bfe3h + .hibytes 0bfe4h + .hibytes 0bfe5h + .hibytes 0bfe6h + .hibytes 0bfe7h + .hibytes 0bfe8h + .hibytes 0bfe9h + .hibytes 0bfeah + .hibytes 0bfebh + .hibytes 0bfech + .hibytes 0bfedh + .hibytes 0bfeeh + .hibytes 0bfefh + .hibytes 0bff0h + .hibytes 0bff1h + .hibytes 0bff2h + .hibytes 0bff3h + .hibytes 0bff4h + .hibytes 0bff5h + .hibytes 0bff6h + .hibytes 0bff7h + .hibytes 0bff8h + .hibytes 0bff9h + .hibytes 0bffah + .hibytes 0bffbh + .hibytes 0bffch + .hibytes 0bffdh + .hibytes 0bffeh + .hibytes 0bfffh + .hibytes 0c000h + .hibytes 0c001h + .hibytes 0c002h + .hibytes 0c003h + .hibytes 0c004h + .hibytes 0c005h + .hibytes 0c006h + .hibytes 0c007h + .hibytes 0c008h + .hibytes 0c009h + .hibytes 0c00ah + .hibytes 0c00bh + .hibytes 0c00ch + .hibytes 0c00dh + .hibytes 0c00eh + .hibytes 0c00fh + .hibytes 0cfe1h + .hibytes 0cfe2h + .hibytes 0cfe3h + .hibytes 0cfe4h + .hibytes 0cfe5h + .hibytes 0cfe6h + .hibytes 0cfe7h + .hibytes 0cfe8h + .hibytes 0cfe9h + .hibytes 0cfeah + .hibytes 0cfebh + .hibytes 0cfech + .hibytes 0cfedh + .hibytes 0cfeeh + .hibytes 0cfefh + .hibytes 0cff0h + .hibytes 0cff1h + .hibytes 0cff2h + .hibytes 0cff3h + .hibytes 0cff4h + .hibytes 0cff5h + .hibytes 0cff6h + .hibytes 0cff7h + .hibytes 0cff8h + .hibytes 0cff9h + .hibytes 0cffah + .hibytes 0cffbh + .hibytes 0cffch + .hibytes 0cffdh + .hibytes 0cffeh + .hibytes 0cfffh + .hibytes 0d000h + .hibytes 0d001h + .hibytes 0d002h + .hibytes 0d003h + .hibytes 0d004h + .hibytes 0d005h + .hibytes 0d006h + .hibytes 0d007h + .hibytes 0d008h + .hibytes 0d009h + .hibytes 0d00ah + .hibytes 0d00bh + .hibytes 0d00ch + .hibytes 0d00dh + .hibytes 0d00eh + .hibytes 0d00fh + .hibytes 0dfe1h + .hibytes 0dfe2h + .hibytes 0dfe3h + .hibytes 0dfe4h + .hibytes 0dfe5h + .hibytes 0dfe6h + .hibytes 0dfe7h + .hibytes 0dfe8h + .hibytes 0dfe9h + .hibytes 0dfeah + .hibytes 0dfebh + .hibytes 0dfech + .hibytes 0dfedh + .hibytes 0dfeeh + .hibytes 0dfefh + .hibytes 0dff0h + .hibytes 0dff1h + .hibytes 0dff2h + .hibytes 0dff3h + .hibytes 0dff4h + .hibytes 0dff5h + .hibytes 0dff6h + .hibytes 0dff7h + .hibytes 0dff8h + .hibytes 0dff9h + .hibytes 0dffah + .hibytes 0dffbh + .hibytes 0dffch + .hibytes 0dffdh + .hibytes 0dffeh + .hibytes 0dfffh + .hibytes 0e000h + .hibytes 0e001h + .hibytes 0e002h + .hibytes 0e003h + .hibytes 0e004h + .hibytes 0e005h + .hibytes 0e006h + .hibytes 0e007h + .hibytes 0e008h + .hibytes 0e009h + .hibytes 0e00ah + .hibytes 0e00bh + .hibytes 0e00ch + .hibytes 0e00dh + .hibytes 0e00eh + .hibytes 0e00fh + .hibytes 0efe1h + .hibytes 0efe2h + .hibytes 0efe3h + .hibytes 0efe4h + .hibytes 0efe5h + .hibytes 0efe6h + .hibytes 0efe7h + .hibytes 0efe8h + .hibytes 0efe9h + .hibytes 0efeah + .hibytes 0efebh + .hibytes 0efech + .hibytes 0efedh + .hibytes 0efeeh + .hibytes 0efefh + .hibytes 0eff0h + .hibytes 0eff1h + .hibytes 0eff2h + .hibytes 0eff3h + .hibytes 0eff4h + .hibytes 0eff5h + .hibytes 0eff6h + .hibytes 0eff7h + .hibytes 0eff8h + .hibytes 0eff9h + .hibytes 0effah + .hibytes 0effbh + .hibytes 0effch + .hibytes 0effdh + .hibytes 0effeh + .hibytes 0efffh + .hibytes 0f000h + .hibytes 0f001h + .hibytes 0f002h + .hibytes 0f003h + .hibytes 0f004h + .hibytes 0f005h + .hibytes 0f006h + .hibytes 0f007h + .hibytes 0f008h + .hibytes 0f009h + .hibytes 0f00ah + .hibytes 0f00bh + .hibytes 0f00ch + .hibytes 0f00dh + .hibytes 0f00eh + .hibytes 0f00fh + .hibytes 0ffe1h + .hibytes 0ffe2h + .hibytes 0ffe3h + .hibytes 0ffe4h + .hibytes 0ffe5h + .hibytes 0ffe6h + .hibytes 0ffe7h + .hibytes 0ffe8h + .hibytes 0ffe9h + .hibytes 0ffeah + .hibytes 0ffebh + .hibytes 0ffech + .hibytes 0ffedh + .hibytes 0ffeeh + .hibytes 0ffefh + .hibytes 0fff0h + .hibytes 0fff1h + .hibytes 0fff2h + .hibytes 0fff3h + .hibytes 0fff4h + .hibytes 0fff5h + .hibytes 0fff6h + .hibytes 0fff7h + .hibytes 0fff8h + .hibytes 0fff9h + .hibytes 0fffah + .hibytes 0fffbh + .hibytes 0fffch + .hibytes 0fffdh + .hibytes 0fffeh + .hibytes 0ffffh + + ; alternative 4-digit hex values, uppercase + .hibytes 0000h + .hibytes 0001h + .hibytes 0002h + .hibytes 0003h + .hibytes 0004h + .hibytes 0005h + .hibytes 0006h + .hibytes 0007h + .hibytes 0008h + .hibytes 0009h + .hibytes 000Ah + .hibytes 000Bh + .hibytes 000Ch + .hibytes 000Dh + .hibytes 000Eh + .hibytes 000Fh + .hibytes 0010h + .hibytes 0011h + .hibytes 0012h + .hibytes 0013h + .hibytes 0070h + .hibytes 0071h + .hibytes 0072h + .hibytes 0073h + .hibytes 0074h + .hibytes 0075h + .hibytes 0076h + .hibytes 0077h + .hibytes 0078h + .hibytes 0079h + .hibytes 007Ah + .hibytes 007Bh + .hibytes 007Ch + .hibytes 007Dh + .hibytes 007Eh + .hibytes 007Fh + .hibytes 0080h + .hibytes 0081h + .hibytes 0082h + .hibytes 0083h + .hibytes 0084h + .hibytes 0085h + .hibytes 0086h + .hibytes 00F0h + .hibytes 00F1h + .hibytes 00F2h + .hibytes 00F3h + .hibytes 00F4h + .hibytes 00F5h + .hibytes 00F6h + .hibytes 00F7h + .hibytes 00F8h + .hibytes 00F9h + .hibytes 00FAh + .hibytes 00FBh + .hibytes 00FCh + .hibytes 00FDh + .hibytes 00FEh + .hibytes 00FFh + .hibytes 0100h + .hibytes 0101h + .hibytes 0102h + .hibytes 0103h + .hibytes 0FD2h + .hibytes 0FD3h + .hibytes 0FD4h + .hibytes 0FD5h + .hibytes 0FD6h + .hibytes 0FD7h + .hibytes 0FD8h + .hibytes 0FD9h + .hibytes 0FDAh + .hibytes 0FDBh + .hibytes 0FDCh + .hibytes 0FDDh + .hibytes 0FDEh + .hibytes 0FDFh + .hibytes 0FE0h + .hibytes 0FE1h + .hibytes 0FE2h + .hibytes 0FE3h + .hibytes 0FE4h + .hibytes 0FE5h + .hibytes 0FE6h + .hibytes 0FE7h + .hibytes 0FE8h + .hibytes 0FE9h + .hibytes 0FEAh + .hibytes 0FEBh + .hibytes 0FECh + .hibytes 0FEDh + .hibytes 0FEEh + .hibytes 0FEFh + .hibytes 0FF0h + .hibytes 0FF1h + .hibytes 0FF2h + .hibytes 0FF3h + .hibytes 0FF4h + .hibytes 0FF5h + .hibytes 0FF6h + .hibytes 0FF7h + .hibytes 0FF8h + .hibytes 0FF9h + .hibytes 0FFAh + .hibytes 0FFBh + .hibytes 0FFCh + .hibytes 0FFDh + .hibytes 0FFEh + .hibytes 0FFFh + .hibytes 1000h + .hibytes 1001h + .hibytes 1002h + .hibytes 1003h + .hibytes 1004h + .hibytes 1005h + .hibytes 1006h + .hibytes 1007h + .hibytes 1008h + .hibytes 7FF0h + .hibytes 7FF1h + .hibytes 7FF2h + .hibytes 7FF3h + .hibytes 7FF4h + .hibytes 7FF5h + .hibytes 7FF6h + .hibytes 7FF7h + .hibytes 7FF8h + .hibytes 7FF9h + .hibytes 7FFAh + .hibytes 7FFBh + .hibytes 7FFCh + .hibytes 7FFDh + .hibytes 7FFEh + .hibytes 7FFFh + .hibytes 8000h + .hibytes 8001h + .hibytes 8002h + .hibytes 8003h + .hibytes 8004h + .hibytes 8005h + .hibytes 8006h + .hibytes 8007h + .hibytes 8008h + .hibytes 8009h + .hibytes 800Ah + .hibytes 800Bh + .hibytes 9FE1h + .hibytes 9FE2h + .hibytes 9FE3h + .hibytes 9FE4h + .hibytes 9FE5h + .hibytes 9FE6h + .hibytes 9FE7h + .hibytes 9FE8h + .hibytes 9FE9h + .hibytes 9FEAh + .hibytes 9FEBh + .hibytes 9FECh + .hibytes 9FEDh + .hibytes 9FEEh + .hibytes 9FEFh + .hibytes 9FF0h + .hibytes 9FF1h + .hibytes 9FF2h + .hibytes 9FF3h + .hibytes 9FF4h + .hibytes 9FF5h + .hibytes 9FF6h + .hibytes 9FF7h + .hibytes 9FF8h + .hibytes 9FF9h + .hibytes 9FFAh + .hibytes 9FFBh + .hibytes 9FFCh + .hibytes 9FFDh + .hibytes 9FFEh + .hibytes 9FFFh + .hibytes 0A000h + .hibytes 0A001h + .hibytes 0A002h + .hibytes 0A003h + .hibytes 0A004h + .hibytes 0A005h + .hibytes 0A006h + .hibytes 0A007h + .hibytes 0A008h + .hibytes 0A009h + .hibytes 0A00Ah + .hibytes 0A00Bh + .hibytes 0A00Ch + .hibytes 0A00Dh + .hibytes 0A00Eh + .hibytes 0A00Fh + .hibytes 0AFE1h + .hibytes 0AFE2h + .hibytes 0AFE3h + .hibytes 0AFE4h + .hibytes 0AFE5h + .hibytes 0AFE6h + .hibytes 0AFE7h + .hibytes 0AFE8h + .hibytes 0AFE9h + .hibytes 0AFEAh + .hibytes 0AFEBh + .hibytes 0AFECh + .hibytes 0AFEDh + .hibytes 0AFEEh + .hibytes 0AFEFh + .hibytes 0AFF0h + .hibytes 0AFF1h + .hibytes 0AFF2h + .hibytes 0AFF3h + .hibytes 0AFF4h + .hibytes 0AFF5h + .hibytes 0AFF6h + .hibytes 0AFF7h + .hibytes 0AFF8h + .hibytes 0AFF9h + .hibytes 0AFFAh + .hibytes 0AFFBh + .hibytes 0AFFCh + .hibytes 0AFFDh + .hibytes 0AFFEh + .hibytes 0AFFFh + .hibytes 0B000h + .hibytes 0B001h + .hibytes 0B002h + .hibytes 0B003h + .hibytes 0B004h + .hibytes 0B005h + .hibytes 0B006h + .hibytes 0B007h + .hibytes 0B008h + .hibytes 0B009h + .hibytes 0B00Ah + .hibytes 0B00Bh + .hibytes 0B00Ch + .hibytes 0B00Dh + .hibytes 0B00Eh + .hibytes 0B00Fh + .hibytes 0BFE1h + .hibytes 0BFE2h + .hibytes 0BFE3h + .hibytes 0BFE4h + .hibytes 0BFE5h + .hibytes 0BFE6h + .hibytes 0BFE7h + .hibytes 0BFE8h + .hibytes 0BFE9h + .hibytes 0BFEAh + .hibytes 0BFEBh + .hibytes 0BFECh + .hibytes 0BFEDh + .hibytes 0BFEEh + .hibytes 0BFEFh + .hibytes 0BFF0h + .hibytes 0BFF1h + .hibytes 0BFF2h + .hibytes 0BFF3h + .hibytes 0BFF4h + .hibytes 0BFF5h + .hibytes 0BFF6h + .hibytes 0BFF7h + .hibytes 0BFF8h + .hibytes 0BFF9h + .hibytes 0BFFAh + .hibytes 0BFFBh + .hibytes 0BFFCh + .hibytes 0BFFDh + .hibytes 0BFFEh + .hibytes 0BFFFh + .hibytes 0C000h + .hibytes 0C001h + .hibytes 0C002h + .hibytes 0C003h + .hibytes 0C004h + .hibytes 0C005h + .hibytes 0C006h + .hibytes 0C007h + .hibytes 0C008h + .hibytes 0C009h + .hibytes 0C00Ah + .hibytes 0C00Bh + .hibytes 0C00Ch + .hibytes 0C00Dh + .hibytes 0C00Eh + .hibytes 0C00Fh + .hibytes 0CFE1h + .hibytes 0CFE2h + .hibytes 0CFE3h + .hibytes 0CFE4h + .hibytes 0CFE5h + .hibytes 0CFE6h + .hibytes 0CFE7h + .hibytes 0CFE8h + .hibytes 0CFE9h + .hibytes 0CFEAh + .hibytes 0CFEBh + .hibytes 0CFECh + .hibytes 0CFEDh + .hibytes 0CFEEh + .hibytes 0CFEFh + .hibytes 0CFF0h + .hibytes 0CFF1h + .hibytes 0CFF2h + .hibytes 0CFF3h + .hibytes 0CFF4h + .hibytes 0CFF5h + .hibytes 0CFF6h + .hibytes 0CFF7h + .hibytes 0CFF8h + .hibytes 0CFF9h + .hibytes 0CFFAh + .hibytes 0CFFBh + .hibytes 0CFFCh + .hibytes 0CFFDh + .hibytes 0CFFEh + .hibytes 0CFFFh + .hibytes 0D000h + .hibytes 0D001h + .hibytes 0D002h + .hibytes 0D003h + .hibytes 0D004h + .hibytes 0D005h + .hibytes 0D006h + .hibytes 0D007h + .hibytes 0D008h + .hibytes 0D009h + .hibytes 0D00Ah + .hibytes 0D00Bh + .hibytes 0D00Ch + .hibytes 0D00Dh + .hibytes 0D00Eh + .hibytes 0D00Fh + .hibytes 0DFE1h + .hibytes 0DFE2h + .hibytes 0DFE3h + .hibytes 0DFE4h + .hibytes 0DFE5h + .hibytes 0DFE6h + .hibytes 0DFE7h + .hibytes 0DFE8h + .hibytes 0DFE9h + .hibytes 0DFEAh + .hibytes 0DFEBh + .hibytes 0DFECh + .hibytes 0DFEDh + .hibytes 0DFEEh + .hibytes 0DFEFh + .hibytes 0DFF0h + .hibytes 0DFF1h + .hibytes 0DFF2h + .hibytes 0DFF3h + .hibytes 0DFF4h + .hibytes 0DFF5h + .hibytes 0DFF6h + .hibytes 0DFF7h + .hibytes 0DFF8h + .hibytes 0DFF9h + .hibytes 0DFFAh + .hibytes 0DFFBh + .hibytes 0DFFCh + .hibytes 0DFFDh + .hibytes 0DFFEh + .hibytes 0DFFFh + .hibytes 0E000h + .hibytes 0E001h + .hibytes 0E002h + .hibytes 0E003h + .hibytes 0E004h + .hibytes 0E005h + .hibytes 0E006h + .hibytes 0E007h + .hibytes 0E008h + .hibytes 0E009h + .hibytes 0E00Ah + .hibytes 0E00Bh + .hibytes 0E00Ch + .hibytes 0E00Dh + .hibytes 0E00Eh + .hibytes 0E00Fh + .hibytes 0EFE1h + .hibytes 0EFE2h + .hibytes 0EFE3h + .hibytes 0EFE4h + .hibytes 0EFE5h + .hibytes 0EFE6h + .hibytes 0EFE7h + .hibytes 0EFE8h + .hibytes 0EFE9h + .hibytes 0EFEAh + .hibytes 0EFEBh + .hibytes 0EFECh + .hibytes 0EFEDh + .hibytes 0EFEEh + .hibytes 0EFEFh + .hibytes 0EFF0h + .hibytes 0EFF1h + .hibytes 0EFF2h + .hibytes 0EFF3h + .hibytes 0EFF4h + .hibytes 0EFF5h + .hibytes 0EFF6h + .hibytes 0EFF7h + .hibytes 0EFF8h + .hibytes 0EFF9h + .hibytes 0EFFAh + .hibytes 0EFFBh + .hibytes 0EFFCh + .hibytes 0EFFDh + .hibytes 0EFFEh + .hibytes 0EFFFh + .hibytes 0F000h + .hibytes 0F001h + .hibytes 0F002h + .hibytes 0F003h + .hibytes 0F004h + .hibytes 0F005h + .hibytes 0F006h + .hibytes 0F007h + .hibytes 0F008h + .hibytes 0F009h + .hibytes 0F00Ah + .hibytes 0F00Bh + .hibytes 0F00Ch + .hibytes 0F00Dh + .hibytes 0F00Eh + .hibytes 0F00Fh + .hibytes 0FFE1h + .hibytes 0FFE2h + .hibytes 0FFE3h + .hibytes 0FFE4h + .hibytes 0FFE5h + .hibytes 0FFE6h + .hibytes 0FFE7h + .hibytes 0FFE8h + .hibytes 0FFE9h + .hibytes 0FFEAh + .hibytes 0FFEBh + .hibytes 0FFECh + .hibytes 0FFEDh + .hibytes 0FFEEh + .hibytes 0FFEFh + .hibytes 0FFF0h + .hibytes 0FFF1h + .hibytes 0FFF2h + .hibytes 0FFF3h + .hibytes 0FFF4h + .hibytes 0FFF5h + .hibytes 0FFF6h + .hibytes 0FFF7h + .hibytes 0FFF8h + .hibytes 0FFF9h + .hibytes 0FFFAh + .hibytes 0FFFBh + .hibytes 0FFFCh + .hibytes 0FFFDh + .hibytes 0FFFEh + .hibytes 0FFFFh + + ; alternative hex values, always leading zero + .hibytes 00h + .hibytes 01h + .hibytes 02h + .hibytes 03h + .hibytes 04h + .hibytes 05h + .hibytes 06h + .hibytes 07h + .hibytes 08h + .hibytes 09h + .hibytes 0ah + .hibytes 0bh + .hibytes 0ch + .hibytes 0dh + .hibytes 0eh + .hibytes 0fh + .hibytes 010h + .hibytes 011h + .hibytes 012h + .hibytes 013h + .hibytes 070h + .hibytes 071h + .hibytes 072h + .hibytes 073h + .hibytes 074h + .hibytes 075h + .hibytes 076h + .hibytes 077h + .hibytes 078h + .hibytes 079h + .hibytes 07ah + .hibytes 07bh + .hibytes 07ch + .hibytes 07dh + .hibytes 07eh + .hibytes 07fh + .hibytes 080h + .hibytes 081h + .hibytes 082h + .hibytes 083h + .hibytes 084h + .hibytes 085h + .hibytes 086h + .hibytes 0f0h + .hibytes 0f1h + .hibytes 0f2h + .hibytes 0f3h + .hibytes 0f4h + .hibytes 0f5h + .hibytes 0f6h + .hibytes 0f7h + .hibytes 0f8h + .hibytes 0f9h + .hibytes 0fah + .hibytes 0fbh + .hibytes 0fch + .hibytes 0fdh + .hibytes 0feh + .hibytes 0ffh + .hibytes 0100h + .hibytes 0101h + .hibytes 0102h + .hibytes 0103h + .hibytes 0fd2h + .hibytes 0fd3h + .hibytes 0fd4h + .hibytes 0fd5h + .hibytes 0fd6h + .hibytes 0fd7h + .hibytes 0fd8h + .hibytes 0fd9h + .hibytes 0fdah + .hibytes 0fdbh + .hibytes 0fdch + .hibytes 0fddh + .hibytes 0fdeh + .hibytes 0fdfh + .hibytes 0fe0h + .hibytes 0fe1h + .hibytes 0fe2h + .hibytes 0fe3h + .hibytes 0fe4h + .hibytes 0fe5h + .hibytes 0fe6h + .hibytes 0fe7h + .hibytes 0fe8h + .hibytes 0fe9h + .hibytes 0feah + .hibytes 0febh + .hibytes 0fech + .hibytes 0fedh + .hibytes 0feeh + .hibytes 0fefh + .hibytes 0ff0h + .hibytes 0ff1h + .hibytes 0ff2h + .hibytes 0ff3h + .hibytes 0ff4h + .hibytes 0ff5h + .hibytes 0ff6h + .hibytes 0ff7h + .hibytes 0ff8h + .hibytes 0ff9h + .hibytes 0ffah + .hibytes 0ffbh + .hibytes 0ffch + .hibytes 0ffdh + .hibytes 0ffeh + .hibytes 0fffh + .hibytes 01000h + .hibytes 01001h + .hibytes 01002h + .hibytes 01003h + .hibytes 01004h + .hibytes 01005h + .hibytes 01006h + .hibytes 01007h + .hibytes 01008h + .hibytes 07ff0h + .hibytes 07ff1h + .hibytes 07ff2h + .hibytes 07ff3h + .hibytes 07ff4h + .hibytes 07ff5h + .hibytes 07ff6h + .hibytes 07ff7h + .hibytes 07ff8h + .hibytes 07ff9h + .hibytes 07ffah + .hibytes 07ffbh + .hibytes 07ffch + .hibytes 07ffdh + .hibytes 07ffeh + .hibytes 07fffh + .hibytes 08000h + .hibytes 08001h + .hibytes 08002h + .hibytes 08003h + .hibytes 08004h + .hibytes 08005h + .hibytes 08006h + .hibytes 08007h + .hibytes 08008h + .hibytes 08009h + .hibytes 0800ah + .hibytes 0800bh + .hibytes 09fe1h + .hibytes 09fe2h + .hibytes 09fe3h + .hibytes 09fe4h + .hibytes 09fe5h + .hibytes 09fe6h + .hibytes 09fe7h + .hibytes 09fe8h + .hibytes 09fe9h + .hibytes 09feah + .hibytes 09febh + .hibytes 09fech + .hibytes 09fedh + .hibytes 09feeh + .hibytes 09fefh + .hibytes 09ff0h + .hibytes 09ff1h + .hibytes 09ff2h + .hibytes 09ff3h + .hibytes 09ff4h + .hibytes 09ff5h + .hibytes 09ff6h + .hibytes 09ff7h + .hibytes 09ff8h + .hibytes 09ff9h + .hibytes 09ffah + .hibytes 09ffbh + .hibytes 09ffch + .hibytes 09ffdh + .hibytes 09ffeh + .hibytes 09fffh + .hibytes 0a000h + .hibytes 0a001h + .hibytes 0a002h + .hibytes 0a003h + .hibytes 0a004h + .hibytes 0a005h + .hibytes 0a006h + .hibytes 0a007h + .hibytes 0a008h + .hibytes 0a009h + .hibytes 0a00ah + .hibytes 0a00bh + .hibytes 0a00ch + .hibytes 0a00dh + .hibytes 0a00eh + .hibytes 0a00fh + .hibytes 0afe1h + .hibytes 0afe2h + .hibytes 0afe3h + .hibytes 0afe4h + .hibytes 0afe5h + .hibytes 0afe6h + .hibytes 0afe7h + .hibytes 0afe8h + .hibytes 0afe9h + .hibytes 0afeah + .hibytes 0afebh + .hibytes 0afech + .hibytes 0afedh + .hibytes 0afeeh + .hibytes 0afefh + .hibytes 0aff0h + .hibytes 0aff1h + .hibytes 0aff2h + .hibytes 0aff3h + .hibytes 0aff4h + .hibytes 0aff5h + .hibytes 0aff6h + .hibytes 0aff7h + .hibytes 0aff8h + .hibytes 0aff9h + .hibytes 0affah + .hibytes 0affbh + .hibytes 0affch + .hibytes 0affdh + .hibytes 0affeh + .hibytes 0afffh + .hibytes 0b000h + .hibytes 0b001h + .hibytes 0b002h + .hibytes 0b003h + .hibytes 0b004h + .hibytes 0b005h + .hibytes 0b006h + .hibytes 0b007h + .hibytes 0b008h + .hibytes 0b009h + .hibytes 0b00ah + .hibytes 0b00bh + .hibytes 0b00ch + .hibytes 0b00dh + .hibytes 0b00eh + .hibytes 0b00fh + .hibytes 0bfe1h + .hibytes 0bfe2h + .hibytes 0bfe3h + .hibytes 0bfe4h + .hibytes 0bfe5h + .hibytes 0bfe6h + .hibytes 0bfe7h + .hibytes 0bfe8h + .hibytes 0bfe9h + .hibytes 0bfeah + .hibytes 0bfebh + .hibytes 0bfech + .hibytes 0bfedh + .hibytes 0bfeeh + .hibytes 0bfefh + .hibytes 0bff0h + .hibytes 0bff1h + .hibytes 0bff2h + .hibytes 0bff3h + .hibytes 0bff4h + .hibytes 0bff5h + .hibytes 0bff6h + .hibytes 0bff7h + .hibytes 0bff8h + .hibytes 0bff9h + .hibytes 0bffah + .hibytes 0bffbh + .hibytes 0bffch + .hibytes 0bffdh + .hibytes 0bffeh + .hibytes 0bfffh + .hibytes 0c000h + .hibytes 0c001h + .hibytes 0c002h + .hibytes 0c003h + .hibytes 0c004h + .hibytes 0c005h + .hibytes 0c006h + .hibytes 0c007h + .hibytes 0c008h + .hibytes 0c009h + .hibytes 0c00ah + .hibytes 0c00bh + .hibytes 0c00ch + .hibytes 0c00dh + .hibytes 0c00eh + .hibytes 0c00fh + .hibytes 0cfe1h + .hibytes 0cfe2h + .hibytes 0cfe3h + .hibytes 0cfe4h + .hibytes 0cfe5h + .hibytes 0cfe6h + .hibytes 0cfe7h + .hibytes 0cfe8h + .hibytes 0cfe9h + .hibytes 0cfeah + .hibytes 0cfebh + .hibytes 0cfech + .hibytes 0cfedh + .hibytes 0cfeeh + .hibytes 0cfefh + .hibytes 0cff0h + .hibytes 0cff1h + .hibytes 0cff2h + .hibytes 0cff3h + .hibytes 0cff4h + .hibytes 0cff5h + .hibytes 0cff6h + .hibytes 0cff7h + .hibytes 0cff8h + .hibytes 0cff9h + .hibytes 0cffah + .hibytes 0cffbh + .hibytes 0cffch + .hibytes 0cffdh + .hibytes 0cffeh + .hibytes 0cfffh + .hibytes 0d000h + .hibytes 0d001h + .hibytes 0d002h + .hibytes 0d003h + .hibytes 0d004h + .hibytes 0d005h + .hibytes 0d006h + .hibytes 0d007h + .hibytes 0d008h + .hibytes 0d009h + .hibytes 0d00ah + .hibytes 0d00bh + .hibytes 0d00ch + .hibytes 0d00dh + .hibytes 0d00eh + .hibytes 0d00fh + .hibytes 0dfe1h + .hibytes 0dfe2h + .hibytes 0dfe3h + .hibytes 0dfe4h + .hibytes 0dfe5h + .hibytes 0dfe6h + .hibytes 0dfe7h + .hibytes 0dfe8h + .hibytes 0dfe9h + .hibytes 0dfeah + .hibytes 0dfebh + .hibytes 0dfech + .hibytes 0dfedh + .hibytes 0dfeeh + .hibytes 0dfefh + .hibytes 0dff0h + .hibytes 0dff1h + .hibytes 0dff2h + .hibytes 0dff3h + .hibytes 0dff4h + .hibytes 0dff5h + .hibytes 0dff6h + .hibytes 0dff7h + .hibytes 0dff8h + .hibytes 0dff9h + .hibytes 0dffah + .hibytes 0dffbh + .hibytes 0dffch + .hibytes 0dffdh + .hibytes 0dffeh + .hibytes 0dfffh + .hibytes 0e000h + .hibytes 0e001h + .hibytes 0e002h + .hibytes 0e003h + .hibytes 0e004h + .hibytes 0e005h + .hibytes 0e006h + .hibytes 0e007h + .hibytes 0e008h + .hibytes 0e009h + .hibytes 0e00ah + .hibytes 0e00bh + .hibytes 0e00ch + .hibytes 0e00dh + .hibytes 0e00eh + .hibytes 0e00fh + .hibytes 0efe1h + .hibytes 0efe2h + .hibytes 0efe3h + .hibytes 0efe4h + .hibytes 0efe5h + .hibytes 0efe6h + .hibytes 0efe7h + .hibytes 0efe8h + .hibytes 0efe9h + .hibytes 0efeah + .hibytes 0efebh + .hibytes 0efech + .hibytes 0efedh + .hibytes 0efeeh + .hibytes 0efefh + .hibytes 0eff0h + .hibytes 0eff1h + .hibytes 0eff2h + .hibytes 0eff3h + .hibytes 0eff4h + .hibytes 0eff5h + .hibytes 0eff6h + .hibytes 0eff7h + .hibytes 0eff8h + .hibytes 0eff9h + .hibytes 0effah + .hibytes 0effbh + .hibytes 0effch + .hibytes 0effdh + .hibytes 0effeh + .hibytes 0efffh + .hibytes 0f000h + .hibytes 0f001h + .hibytes 0f002h + .hibytes 0f003h + .hibytes 0f004h + .hibytes 0f005h + .hibytes 0f006h + .hibytes 0f007h + .hibytes 0f008h + .hibytes 0f009h + .hibytes 0f00ah + .hibytes 0f00bh + .hibytes 0f00ch + .hibytes 0f00dh + .hibytes 0f00eh + .hibytes 0f00fh + .hibytes 0ffe1h + .hibytes 0ffe2h + .hibytes 0ffe3h + .hibytes 0ffe4h + .hibytes 0ffe5h + .hibytes 0ffe6h + .hibytes 0ffe7h + .hibytes 0ffe8h + .hibytes 0ffe9h + .hibytes 0ffeah + .hibytes 0ffebh + .hibytes 0ffech + .hibytes 0ffedh + .hibytes 0ffeeh + .hibytes 0ffefh + .hibytes 0fff0h + .hibytes 0fff1h + .hibytes 0fff2h + .hibytes 0fff3h + .hibytes 0fff4h + .hibytes 0fff5h + .hibytes 0fff6h + .hibytes 0fff7h + .hibytes 0fff8h + .hibytes 0fff9h + .hibytes 0fffah + .hibytes 0fffbh + .hibytes 0fffch + .hibytes 0fffdh + .hibytes 0fffeh + .hibytes 0ffffh + + ; binary values, variable length + .hibytes %0 + .hibytes %01 + .hibytes %010 + .hibytes %011 + .hibytes %0100 + .hibytes %0101 + .hibytes %0110 + .hibytes %0111 + .hibytes %01000 + .hibytes %01001 + .hibytes %01010 + .hibytes %01011 + .hibytes %01100 + .hibytes %01101 + .hibytes %01110 + .hibytes %01111 + .hibytes %010000 + .hibytes %010001 + .hibytes %010010 + .hibytes %010011 + .hibytes %01110000 + .hibytes %01110001 + .hibytes %01110010 + .hibytes %01110011 + .hibytes %01110100 + .hibytes %01110101 + .hibytes %01110110 + .hibytes %01110111 + .hibytes %01111000 + .hibytes %01111001 + .hibytes %01111010 + .hibytes %01111011 + .hibytes %01111100 + .hibytes %01111101 + .hibytes %01111110 + .hibytes %01111111 + .hibytes %010000000 + .hibytes %010000001 + .hibytes %010000010 + .hibytes %010000011 + .hibytes %010000100 + .hibytes %010000101 + .hibytes %010000110 + .hibytes %011110000 + .hibytes %011110001 + .hibytes %011110010 + .hibytes %011110011 + .hibytes %011110100 + .hibytes %011110101 + .hibytes %011110110 + .hibytes %011110111 + .hibytes %011111000 + .hibytes %011111001 + .hibytes %011111010 + .hibytes %011111011 + .hibytes %011111100 + .hibytes %011111101 + .hibytes %011111110 + .hibytes %011111111 + .hibytes %100000000 + .hibytes %100000001 + .hibytes %100000010 + .hibytes %100000011 + .hibytes %111111010010 + .hibytes %111111010011 + .hibytes %111111010100 + .hibytes %111111010101 + .hibytes %111111010110 + .hibytes %111111010111 + .hibytes %111111011000 + .hibytes %111111011001 + .hibytes %111111011010 + .hibytes %111111011011 + .hibytes %111111011100 + .hibytes %111111011101 + .hibytes %111111011110 + .hibytes %111111011111 + .hibytes %111111100000 + .hibytes %111111100001 + .hibytes %111111100010 + .hibytes %111111100011 + .hibytes %111111100100 + .hibytes %111111100101 + .hibytes %111111100110 + .hibytes %111111100111 + .hibytes %111111101000 + .hibytes %111111101001 + .hibytes %111111101010 + .hibytes %111111101011 + .hibytes %111111101100 + .hibytes %111111101101 + .hibytes %111111101110 + .hibytes %111111101111 + .hibytes %111111110000 + .hibytes %111111110001 + .hibytes %111111110010 + .hibytes %111111110011 + .hibytes %111111110100 + .hibytes %111111110101 + .hibytes %111111110110 + .hibytes %111111110111 + .hibytes %111111111000 + .hibytes %111111111001 + .hibytes %111111111010 + .hibytes %111111111011 + .hibytes %111111111100 + .hibytes %111111111101 + .hibytes %111111111110 + .hibytes %111111111111 + .hibytes %1000000000000 + .hibytes %1000000000001 + .hibytes %1000000000010 + .hibytes %1000000000011 + .hibytes %1000000000100 + .hibytes %1000000000101 + .hibytes %1000000000110 + .hibytes %1000000000111 + .hibytes %1000000001000 + .hibytes %111111111110000 + .hibytes %111111111110001 + .hibytes %111111111110010 + .hibytes %111111111110011 + .hibytes %111111111110100 + .hibytes %111111111110101 + .hibytes %111111111110110 + .hibytes %111111111110111 + .hibytes %111111111111000 + .hibytes %111111111111001 + .hibytes %111111111111010 + .hibytes %111111111111011 + .hibytes %111111111111100 + .hibytes %111111111111101 + .hibytes %111111111111110 + .hibytes %111111111111111 + .hibytes %1000000000000000 + .hibytes %1000000000000001 + .hibytes %1000000000000010 + .hibytes %1000000000000011 + .hibytes %1000000000000100 + .hibytes %1000000000000101 + .hibytes %1000000000000110 + .hibytes %1000000000000111 + .hibytes %1000000000001000 + .hibytes %1000000000001001 + .hibytes %1000000000001010 + .hibytes %1000000000001011 + .hibytes %1001111111100001 + .hibytes %1001111111100010 + .hibytes %1001111111100011 + .hibytes %1001111111100100 + .hibytes %1001111111100101 + .hibytes %1001111111100110 + .hibytes %1001111111100111 + .hibytes %1001111111101000 + .hibytes %1001111111101001 + .hibytes %1001111111101010 + .hibytes %1001111111101011 + .hibytes %1001111111101100 + .hibytes %1001111111101101 + .hibytes %1001111111101110 + .hibytes %1001111111101111 + .hibytes %1001111111110000 + .hibytes %1001111111110001 + .hibytes %1001111111110010 + .hibytes %1001111111110011 + .hibytes %1001111111110100 + .hibytes %1001111111110101 + .hibytes %1001111111110110 + .hibytes %1001111111110111 + .hibytes %1001111111111000 + .hibytes %1001111111111001 + .hibytes %1001111111111010 + .hibytes %1001111111111011 + .hibytes %1001111111111100 + .hibytes %1001111111111101 + .hibytes %1001111111111110 + .hibytes %1001111111111111 + .hibytes %1010000000000000 + .hibytes %1010000000000001 + .hibytes %1010000000000010 + .hibytes %1010000000000011 + .hibytes %1010000000000100 + .hibytes %1010000000000101 + .hibytes %1010000000000110 + .hibytes %1010000000000111 + .hibytes %1010000000001000 + .hibytes %1010000000001001 + .hibytes %1010000000001010 + .hibytes %1010000000001011 + .hibytes %1010000000001100 + .hibytes %1010000000001101 + .hibytes %1010000000001110 + .hibytes %1010000000001111 + .hibytes %1010111111100001 + .hibytes %1010111111100010 + .hibytes %1010111111100011 + .hibytes %1010111111100100 + .hibytes %1010111111100101 + .hibytes %1010111111100110 + .hibytes %1010111111100111 + .hibytes %1010111111101000 + .hibytes %1010111111101001 + .hibytes %1010111111101010 + .hibytes %1010111111101011 + .hibytes %1010111111101100 + .hibytes %1010111111101101 + .hibytes %1010111111101110 + .hibytes %1010111111101111 + .hibytes %1010111111110000 + .hibytes %1010111111110001 + .hibytes %1010111111110010 + .hibytes %1010111111110011 + .hibytes %1010111111110100 + .hibytes %1010111111110101 + .hibytes %1010111111110110 + .hibytes %1010111111110111 + .hibytes %1010111111111000 + .hibytes %1010111111111001 + .hibytes %1010111111111010 + .hibytes %1010111111111011 + .hibytes %1010111111111100 + .hibytes %1010111111111101 + .hibytes %1010111111111110 + .hibytes %1010111111111111 + .hibytes %1011000000000000 + .hibytes %1011000000000001 + .hibytes %1011000000000010 + .hibytes %1011000000000011 + .hibytes %1011000000000100 + .hibytes %1011000000000101 + .hibytes %1011000000000110 + .hibytes %1011000000000111 + .hibytes %1011000000001000 + .hibytes %1011000000001001 + .hibytes %1011000000001010 + .hibytes %1011000000001011 + .hibytes %1011000000001100 + .hibytes %1011000000001101 + .hibytes %1011000000001110 + .hibytes %1011000000001111 + .hibytes %1011111111100001 + .hibytes %1011111111100010 + .hibytes %1011111111100011 + .hibytes %1011111111100100 + .hibytes %1011111111100101 + .hibytes %1011111111100110 + .hibytes %1011111111100111 + .hibytes %1011111111101000 + .hibytes %1011111111101001 + .hibytes %1011111111101010 + .hibytes %1011111111101011 + .hibytes %1011111111101100 + .hibytes %1011111111101101 + .hibytes %1011111111101110 + .hibytes %1011111111101111 + .hibytes %1011111111110000 + .hibytes %1011111111110001 + .hibytes %1011111111110010 + .hibytes %1011111111110011 + .hibytes %1011111111110100 + .hibytes %1011111111110101 + .hibytes %1011111111110110 + .hibytes %1011111111110111 + .hibytes %1011111111111000 + .hibytes %1011111111111001 + .hibytes %1011111111111010 + .hibytes %1011111111111011 + .hibytes %1011111111111100 + .hibytes %1011111111111101 + .hibytes %1011111111111110 + .hibytes %1011111111111111 + .hibytes %1100000000000000 + .hibytes %1100000000000001 + .hibytes %1100000000000010 + .hibytes %1100000000000011 + .hibytes %1100000000000100 + .hibytes %1100000000000101 + .hibytes %1100000000000110 + .hibytes %1100000000000111 + .hibytes %1100000000001000 + .hibytes %1100000000001001 + .hibytes %1100000000001010 + .hibytes %1100000000001011 + .hibytes %1100000000001100 + .hibytes %1100000000001101 + .hibytes %1100000000001110 + .hibytes %1100000000001111 + .hibytes %1100111111100001 + .hibytes %1100111111100010 + .hibytes %1100111111100011 + .hibytes %1100111111100100 + .hibytes %1100111111100101 + .hibytes %1100111111100110 + .hibytes %1100111111100111 + .hibytes %1100111111101000 + .hibytes %1100111111101001 + .hibytes %1100111111101010 + .hibytes %1100111111101011 + .hibytes %1100111111101100 + .hibytes %1100111111101101 + .hibytes %1100111111101110 + .hibytes %1100111111101111 + .hibytes %1100111111110000 + .hibytes %1100111111110001 + .hibytes %1100111111110010 + .hibytes %1100111111110011 + .hibytes %1100111111110100 + .hibytes %1100111111110101 + .hibytes %1100111111110110 + .hibytes %1100111111110111 + .hibytes %1100111111111000 + .hibytes %1100111111111001 + .hibytes %1100111111111010 + .hibytes %1100111111111011 + .hibytes %1100111111111100 + .hibytes %1100111111111101 + .hibytes %1100111111111110 + .hibytes %1100111111111111 + .hibytes %1101000000000000 + .hibytes %1101000000000001 + .hibytes %1101000000000010 + .hibytes %1101000000000011 + .hibytes %1101000000000100 + .hibytes %1101000000000101 + .hibytes %1101000000000110 + .hibytes %1101000000000111 + .hibytes %1101000000001000 + .hibytes %1101000000001001 + .hibytes %1101000000001010 + .hibytes %1101000000001011 + .hibytes %1101000000001100 + .hibytes %1101000000001101 + .hibytes %1101000000001110 + .hibytes %1101000000001111 + .hibytes %1101111111100001 + .hibytes %1101111111100010 + .hibytes %1101111111100011 + .hibytes %1101111111100100 + .hibytes %1101111111100101 + .hibytes %1101111111100110 + .hibytes %1101111111100111 + .hibytes %1101111111101000 + .hibytes %1101111111101001 + .hibytes %1101111111101010 + .hibytes %1101111111101011 + .hibytes %1101111111101100 + .hibytes %1101111111101101 + .hibytes %1101111111101110 + .hibytes %1101111111101111 + .hibytes %1101111111110000 + .hibytes %1101111111110001 + .hibytes %1101111111110010 + .hibytes %1101111111110011 + .hibytes %1101111111110100 + .hibytes %1101111111110101 + .hibytes %1101111111110110 + .hibytes %1101111111110111 + .hibytes %1101111111111000 + .hibytes %1101111111111001 + .hibytes %1101111111111010 + .hibytes %1101111111111011 + .hibytes %1101111111111100 + .hibytes %1101111111111101 + .hibytes %1101111111111110 + .hibytes %1101111111111111 + .hibytes %1110000000000000 + .hibytes %1110000000000001 + .hibytes %1110000000000010 + .hibytes %1110000000000011 + .hibytes %1110000000000100 + .hibytes %1110000000000101 + .hibytes %1110000000000110 + .hibytes %1110000000000111 + .hibytes %1110000000001000 + .hibytes %1110000000001001 + .hibytes %1110000000001010 + .hibytes %1110000000001011 + .hibytes %1110000000001100 + .hibytes %1110000000001101 + .hibytes %1110000000001110 + .hibytes %1110000000001111 + .hibytes %1110111111100001 + .hibytes %1110111111100010 + .hibytes %1110111111100011 + .hibytes %1110111111100100 + .hibytes %1110111111100101 + .hibytes %1110111111100110 + .hibytes %1110111111100111 + .hibytes %1110111111101000 + .hibytes %1110111111101001 + .hibytes %1110111111101010 + .hibytes %1110111111101011 + .hibytes %1110111111101100 + .hibytes %1110111111101101 + .hibytes %1110111111101110 + .hibytes %1110111111101111 + .hibytes %1110111111110000 + .hibytes %1110111111110001 + .hibytes %1110111111110010 + .hibytes %1110111111110011 + .hibytes %1110111111110100 + .hibytes %1110111111110101 + .hibytes %1110111111110110 + .hibytes %1110111111110111 + .hibytes %1110111111111000 + .hibytes %1110111111111001 + .hibytes %1110111111111010 + .hibytes %1110111111111011 + .hibytes %1110111111111100 + .hibytes %1110111111111101 + .hibytes %1110111111111110 + .hibytes %1110111111111111 + .hibytes %1111000000000000 + .hibytes %1111000000000001 + .hibytes %1111000000000010 + .hibytes %1111000000000011 + .hibytes %1111000000000100 + .hibytes %1111000000000101 + .hibytes %1111000000000110 + .hibytes %1111000000000111 + .hibytes %1111000000001000 + .hibytes %1111000000001001 + .hibytes %1111000000001010 + .hibytes %1111000000001011 + .hibytes %1111000000001100 + .hibytes %1111000000001101 + .hibytes %1111000000001110 + .hibytes %1111000000001111 + .hibytes %1111111111100001 + .hibytes %1111111111100010 + .hibytes %1111111111100011 + .hibytes %1111111111100100 + .hibytes %1111111111100101 + .hibytes %1111111111100110 + .hibytes %1111111111100111 + .hibytes %1111111111101000 + .hibytes %1111111111101001 + .hibytes %1111111111101010 + .hibytes %1111111111101011 + .hibytes %1111111111101100 + .hibytes %1111111111101101 + .hibytes %1111111111101110 + .hibytes %1111111111101111 + .hibytes %1111111111110000 + .hibytes %1111111111110001 + .hibytes %1111111111110010 + .hibytes %1111111111110011 + .hibytes %1111111111110100 + .hibytes %1111111111110101 + .hibytes %1111111111110110 + .hibytes %1111111111110111 + .hibytes %1111111111111000 + .hibytes %1111111111111001 + .hibytes %1111111111111010 + .hibytes %1111111111111011 + .hibytes %1111111111111100 + .hibytes %1111111111111101 + .hibytes %1111111111111110 + .hibytes %1111111111111111 + + ; binary values, full length + .hibytes %0000000000000000 + .hibytes %0000000000000001 + .hibytes %0000000000000010 + .hibytes %0000000000000011 + .hibytes %0000000000000100 + .hibytes %0000000000000101 + .hibytes %0000000000000110 + .hibytes %0000000000000111 + .hibytes %0000000000001000 + .hibytes %0000000000001001 + .hibytes %0000000000001010 + .hibytes %0000000000001011 + .hibytes %0000000000001100 + .hibytes %0000000000001101 + .hibytes %0000000000001110 + .hibytes %0000000000001111 + .hibytes %0000000000010000 + .hibytes %0000000000010001 + .hibytes %0000000000010010 + .hibytes %0000000000010011 + .hibytes %0000000001110000 + .hibytes %0000000001110001 + .hibytes %0000000001110010 + .hibytes %0000000001110011 + .hibytes %0000000001110100 + .hibytes %0000000001110101 + .hibytes %0000000001110110 + .hibytes %0000000001110111 + .hibytes %0000000001111000 + .hibytes %0000000001111001 + .hibytes %0000000001111010 + .hibytes %0000000001111011 + .hibytes %0000000001111100 + .hibytes %0000000001111101 + .hibytes %0000000001111110 + .hibytes %0000000001111111 + .hibytes %0000000010000000 + .hibytes %0000000010000001 + .hibytes %0000000010000010 + .hibytes %0000000010000011 + .hibytes %0000000010000100 + .hibytes %0000000010000101 + .hibytes %0000000010000110 + .hibytes %0000000011110000 + .hibytes %0000000011110001 + .hibytes %0000000011110010 + .hibytes %0000000011110011 + .hibytes %0000000011110100 + .hibytes %0000000011110101 + .hibytes %0000000011110110 + .hibytes %0000000011110111 + .hibytes %0000000011111000 + .hibytes %0000000011111001 + .hibytes %0000000011111010 + .hibytes %0000000011111011 + .hibytes %0000000011111100 + .hibytes %0000000011111101 + .hibytes %0000000011111110 + .hibytes %0000000011111111 + .hibytes %0000000100000000 + .hibytes %0000000100000001 + .hibytes %0000000100000010 + .hibytes %0000000100000011 + .hibytes %0000111111010010 + .hibytes %0000111111010011 + .hibytes %0000111111010100 + .hibytes %0000111111010101 + .hibytes %0000111111010110 + .hibytes %0000111111010111 + .hibytes %0000111111011000 + .hibytes %0000111111011001 + .hibytes %0000111111011010 + .hibytes %0000111111011011 + .hibytes %0000111111011100 + .hibytes %0000111111011101 + .hibytes %0000111111011110 + .hibytes %0000111111011111 + .hibytes %0000111111100000 + .hibytes %0000111111100001 + .hibytes %0000111111100010 + .hibytes %0000111111100011 + .hibytes %0000111111100100 + .hibytes %0000111111100101 + .hibytes %0000111111100110 + .hibytes %0000111111100111 + .hibytes %0000111111101000 + .hibytes %0000111111101001 + .hibytes %0000111111101010 + .hibytes %0000111111101011 + .hibytes %0000111111101100 + .hibytes %0000111111101101 + .hibytes %0000111111101110 + .hibytes %0000111111101111 + .hibytes %0000111111110000 + .hibytes %0000111111110001 + .hibytes %0000111111110010 + .hibytes %0000111111110011 + .hibytes %0000111111110100 + .hibytes %0000111111110101 + .hibytes %0000111111110110 + .hibytes %0000111111110111 + .hibytes %0000111111111000 + .hibytes %0000111111111001 + .hibytes %0000111111111010 + .hibytes %0000111111111011 + .hibytes %0000111111111100 + .hibytes %0000111111111101 + .hibytes %0000111111111110 + .hibytes %0000111111111111 + .hibytes %0001000000000000 + .hibytes %0001000000000001 + .hibytes %0001000000000010 + .hibytes %0001000000000011 + .hibytes %0001000000000100 + .hibytes %0001000000000101 + .hibytes %0001000000000110 + .hibytes %0001000000000111 + .hibytes %0001000000001000 + .hibytes %0111111111110000 + .hibytes %0111111111110001 + .hibytes %0111111111110010 + .hibytes %0111111111110011 + .hibytes %0111111111110100 + .hibytes %0111111111110101 + .hibytes %0111111111110110 + .hibytes %0111111111110111 + .hibytes %0111111111111000 + .hibytes %0111111111111001 + .hibytes %0111111111111010 + .hibytes %0111111111111011 + .hibytes %0111111111111100 + .hibytes %0111111111111101 + .hibytes %0111111111111110 + .hibytes %0111111111111111 + .hibytes %1000000000000000 + .hibytes %1000000000000001 + .hibytes %1000000000000010 + .hibytes %1000000000000011 + .hibytes %1000000000000100 + .hibytes %1000000000000101 + .hibytes %1000000000000110 + .hibytes %1000000000000111 + .hibytes %1000000000001000 + .hibytes %1000000000001001 + .hibytes %1000000000001010 + .hibytes %1000000000001011 + .hibytes %1001111111100001 + .hibytes %1001111111100010 + .hibytes %1001111111100011 + .hibytes %1001111111100100 + .hibytes %1001111111100101 + .hibytes %1001111111100110 + .hibytes %1001111111100111 + .hibytes %1001111111101000 + .hibytes %1001111111101001 + .hibytes %1001111111101010 + .hibytes %1001111111101011 + .hibytes %1001111111101100 + .hibytes %1001111111101101 + .hibytes %1001111111101110 + .hibytes %1001111111101111 + .hibytes %1001111111110000 + .hibytes %1001111111110001 + .hibytes %1001111111110010 + .hibytes %1001111111110011 + .hibytes %1001111111110100 + .hibytes %1001111111110101 + .hibytes %1001111111110110 + .hibytes %1001111111110111 + .hibytes %1001111111111000 + .hibytes %1001111111111001 + .hibytes %1001111111111010 + .hibytes %1001111111111011 + .hibytes %1001111111111100 + .hibytes %1001111111111101 + .hibytes %1001111111111110 + .hibytes %1001111111111111 + .hibytes %1010000000000000 + .hibytes %1010000000000001 + .hibytes %1010000000000010 + .hibytes %1010000000000011 + .hibytes %1010000000000100 + .hibytes %1010000000000101 + .hibytes %1010000000000110 + .hibytes %1010000000000111 + .hibytes %1010000000001000 + .hibytes %1010000000001001 + .hibytes %1010000000001010 + .hibytes %1010000000001011 + .hibytes %1010000000001100 + .hibytes %1010000000001101 + .hibytes %1010000000001110 + .hibytes %1010000000001111 + .hibytes %1010111111100001 + .hibytes %1010111111100010 + .hibytes %1010111111100011 + .hibytes %1010111111100100 + .hibytes %1010111111100101 + .hibytes %1010111111100110 + .hibytes %1010111111100111 + .hibytes %1010111111101000 + .hibytes %1010111111101001 + .hibytes %1010111111101010 + .hibytes %1010111111101011 + .hibytes %1010111111101100 + .hibytes %1010111111101101 + .hibytes %1010111111101110 + .hibytes %1010111111101111 + .hibytes %1010111111110000 + .hibytes %1010111111110001 + .hibytes %1010111111110010 + .hibytes %1010111111110011 + .hibytes %1010111111110100 + .hibytes %1010111111110101 + .hibytes %1010111111110110 + .hibytes %1010111111110111 + .hibytes %1010111111111000 + .hibytes %1010111111111001 + .hibytes %1010111111111010 + .hibytes %1010111111111011 + .hibytes %1010111111111100 + .hibytes %1010111111111101 + .hibytes %1010111111111110 + .hibytes %1010111111111111 + .hibytes %1011000000000000 + .hibytes %1011000000000001 + .hibytes %1011000000000010 + .hibytes %1011000000000011 + .hibytes %1011000000000100 + .hibytes %1011000000000101 + .hibytes %1011000000000110 + .hibytes %1011000000000111 + .hibytes %1011000000001000 + .hibytes %1011000000001001 + .hibytes %1011000000001010 + .hibytes %1011000000001011 + .hibytes %1011000000001100 + .hibytes %1011000000001101 + .hibytes %1011000000001110 + .hibytes %1011000000001111 + .hibytes %1011111111100001 + .hibytes %1011111111100010 + .hibytes %1011111111100011 + .hibytes %1011111111100100 + .hibytes %1011111111100101 + .hibytes %1011111111100110 + .hibytes %1011111111100111 + .hibytes %1011111111101000 + .hibytes %1011111111101001 + .hibytes %1011111111101010 + .hibytes %1011111111101011 + .hibytes %1011111111101100 + .hibytes %1011111111101101 + .hibytes %1011111111101110 + .hibytes %1011111111101111 + .hibytes %1011111111110000 + .hibytes %1011111111110001 + .hibytes %1011111111110010 + .hibytes %1011111111110011 + .hibytes %1011111111110100 + .hibytes %1011111111110101 + .hibytes %1011111111110110 + .hibytes %1011111111110111 + .hibytes %1011111111111000 + .hibytes %1011111111111001 + .hibytes %1011111111111010 + .hibytes %1011111111111011 + .hibytes %1011111111111100 + .hibytes %1011111111111101 + .hibytes %1011111111111110 + .hibytes %1011111111111111 + .hibytes %1100000000000000 + .hibytes %1100000000000001 + .hibytes %1100000000000010 + .hibytes %1100000000000011 + .hibytes %1100000000000100 + .hibytes %1100000000000101 + .hibytes %1100000000000110 + .hibytes %1100000000000111 + .hibytes %1100000000001000 + .hibytes %1100000000001001 + .hibytes %1100000000001010 + .hibytes %1100000000001011 + .hibytes %1100000000001100 + .hibytes %1100000000001101 + .hibytes %1100000000001110 + .hibytes %1100000000001111 + .hibytes %1100111111100001 + .hibytes %1100111111100010 + .hibytes %1100111111100011 + .hibytes %1100111111100100 + .hibytes %1100111111100101 + .hibytes %1100111111100110 + .hibytes %1100111111100111 + .hibytes %1100111111101000 + .hibytes %1100111111101001 + .hibytes %1100111111101010 + .hibytes %1100111111101011 + .hibytes %1100111111101100 + .hibytes %1100111111101101 + .hibytes %1100111111101110 + .hibytes %1100111111101111 + .hibytes %1100111111110000 + .hibytes %1100111111110001 + .hibytes %1100111111110010 + .hibytes %1100111111110011 + .hibytes %1100111111110100 + .hibytes %1100111111110101 + .hibytes %1100111111110110 + .hibytes %1100111111110111 + .hibytes %1100111111111000 + .hibytes %1100111111111001 + .hibytes %1100111111111010 + .hibytes %1100111111111011 + .hibytes %1100111111111100 + .hibytes %1100111111111101 + .hibytes %1100111111111110 + .hibytes %1100111111111111 + .hibytes %1101000000000000 + .hibytes %1101000000000001 + .hibytes %1101000000000010 + .hibytes %1101000000000011 + .hibytes %1101000000000100 + .hibytes %1101000000000101 + .hibytes %1101000000000110 + .hibytes %1101000000000111 + .hibytes %1101000000001000 + .hibytes %1101000000001001 + .hibytes %1101000000001010 + .hibytes %1101000000001011 + .hibytes %1101000000001100 + .hibytes %1101000000001101 + .hibytes %1101000000001110 + .hibytes %1101000000001111 + .hibytes %1101111111100001 + .hibytes %1101111111100010 + .hibytes %1101111111100011 + .hibytes %1101111111100100 + .hibytes %1101111111100101 + .hibytes %1101111111100110 + .hibytes %1101111111100111 + .hibytes %1101111111101000 + .hibytes %1101111111101001 + .hibytes %1101111111101010 + .hibytes %1101111111101011 + .hibytes %1101111111101100 + .hibytes %1101111111101101 + .hibytes %1101111111101110 + .hibytes %1101111111101111 + .hibytes %1101111111110000 + .hibytes %1101111111110001 + .hibytes %1101111111110010 + .hibytes %1101111111110011 + .hibytes %1101111111110100 + .hibytes %1101111111110101 + .hibytes %1101111111110110 + .hibytes %1101111111110111 + .hibytes %1101111111111000 + .hibytes %1101111111111001 + .hibytes %1101111111111010 + .hibytes %1101111111111011 + .hibytes %1101111111111100 + .hibytes %1101111111111101 + .hibytes %1101111111111110 + .hibytes %1101111111111111 + .hibytes %1110000000000000 + .hibytes %1110000000000001 + .hibytes %1110000000000010 + .hibytes %1110000000000011 + .hibytes %1110000000000100 + .hibytes %1110000000000101 + .hibytes %1110000000000110 + .hibytes %1110000000000111 + .hibytes %1110000000001000 + .hibytes %1110000000001001 + .hibytes %1110000000001010 + .hibytes %1110000000001011 + .hibytes %1110000000001100 + .hibytes %1110000000001101 + .hibytes %1110000000001110 + .hibytes %1110000000001111 + .hibytes %1110111111100001 + .hibytes %1110111111100010 + .hibytes %1110111111100011 + .hibytes %1110111111100100 + .hibytes %1110111111100101 + .hibytes %1110111111100110 + .hibytes %1110111111100111 + .hibytes %1110111111101000 + .hibytes %1110111111101001 + .hibytes %1110111111101010 + .hibytes %1110111111101011 + .hibytes %1110111111101100 + .hibytes %1110111111101101 + .hibytes %1110111111101110 + .hibytes %1110111111101111 + .hibytes %1110111111110000 + .hibytes %1110111111110001 + .hibytes %1110111111110010 + .hibytes %1110111111110011 + .hibytes %1110111111110100 + .hibytes %1110111111110101 + .hibytes %1110111111110110 + .hibytes %1110111111110111 + .hibytes %1110111111111000 + .hibytes %1110111111111001 + .hibytes %1110111111111010 + .hibytes %1110111111111011 + .hibytes %1110111111111100 + .hibytes %1110111111111101 + .hibytes %1110111111111110 + .hibytes %1110111111111111 + .hibytes %1111000000000000 + .hibytes %1111000000000001 + .hibytes %1111000000000010 + .hibytes %1111000000000011 + .hibytes %1111000000000100 + .hibytes %1111000000000101 + .hibytes %1111000000000110 + .hibytes %1111000000000111 + .hibytes %1111000000001000 + .hibytes %1111000000001001 + .hibytes %1111000000001010 + .hibytes %1111000000001011 + .hibytes %1111000000001100 + .hibytes %1111000000001101 + .hibytes %1111000000001110 + .hibytes %1111000000001111 + .hibytes %1111111111100001 + .hibytes %1111111111100010 + .hibytes %1111111111100011 + .hibytes %1111111111100100 + .hibytes %1111111111100101 + .hibytes %1111111111100110 + .hibytes %1111111111100111 + .hibytes %1111111111101000 + .hibytes %1111111111101001 + .hibytes %1111111111101010 + .hibytes %1111111111101011 + .hibytes %1111111111101100 + .hibytes %1111111111101101 + .hibytes %1111111111101110 + .hibytes %1111111111101111 + .hibytes %1111111111110000 + .hibytes %1111111111110001 + .hibytes %1111111111110010 + .hibytes %1111111111110011 + .hibytes %1111111111110100 + .hibytes %1111111111110101 + .hibytes %1111111111110110 + .hibytes %1111111111110111 + .hibytes %1111111111111000 + .hibytes %1111111111111001 + .hibytes %1111111111111010 + .hibytes %1111111111111011 + .hibytes %1111111111111100 + .hibytes %1111111111111101 + .hibytes %1111111111111110 + .hibytes %1111111111111111 + + ; multiple values on one line, decimal + .hibytes 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 + .hibytes 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 + .hibytes 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 + .hibytes 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 + .hibytes 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 + .hibytes 256,257,258,259,260,261,262,263,264,265,266,267,268,269,270,271 + .hibytes 4064,4065,4066,4067,4068,4069,4070,4071,4072,4073,4074,4075,4076,4077,4078,4079 + .hibytes 4080,4081,4082,4083,4084,4085,4086,4087,4088,4089,4090,4091,4092,4093,4094,4095 + .hibytes 4096,4097,4098,4099,4100,4101,4102,4103,4104,4105,4106,4107,4108,4109,4110,4111 + .hibytes 32752,32753,32754,32755,32756,32757,32758,32759,32760,32761,32762,32763,32764,32765,32766,32767 + .hibytes 32768,32769,32770,32771,32772,32773,32774,32775,32776,32777,32778,32779,32780,32781,32782,32783 + .hibytes 40944,40945,40946,40947,40948,40949,40950,40951,40952,40953,40954,40955,40956,40957,40958,40959 + .hibytes 40960,40961,40962,40963,40964,40965,40966,40967,40968,40969,40970,40971,40972,40973,40974,40975 + .hibytes 45040,45041,45042,45043,45044,45045,45046,45047,45048,45049,45050,45051,45052,45053,45054,45055 + .hibytes 45056,45057,45058,45059,45060,45061,45062,45063,45064,45065,45066,45067,45068,45069,45070,45071 + .hibytes 49136,49137,49138,49139,49140,49141,49142,49143,49144,49145,49146,49147,49148,49149,49150,49151 + .hibytes 49152,49153,49154,49155,49156,49157,49158,49159,49160,49161,49162,49163,49164,49165,49166,49167 + .hibytes 53232,53233,53234,53235,53236,53237,53238,53239,53240,53241,53242,53243,53244,53245,53246,53247 + .hibytes 53248,53249,53250,53251,53252,53253,53254,53255,53256,53257,53258,53259,53260,53261,53262,53263 + .hibytes 57328,57329,57330,57331,57332,57333,57334,57335,57336,57337,57338,57339,57340,57341,57342,57343 + .hibytes 57344,57345,57346,57347,57348,57349,57350,57351,57352,57353,57354,57355,57356,57357,57358,57359 + .hibytes 61424,61425,61426,61427,61428,61429,61430,61431,61432,61433,61434,61435,61436,61437,61438,61439 + .hibytes 61440,61441,61442,61443,61444,61445,61446,61447,61448,61449,61450,61451,61452,61453,61454,61455 + .hibytes 65520,65521,65522,65523,65524,65525,65526,65527,65528,65529,65530,65531,65532,65533,65534,65535 + + ; multiple values on one line, hex + .hibytes $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f + .hibytes $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f + .hibytes $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f + .hibytes $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f + .hibytes $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff + .hibytes $100,$101,$102,$103,$104,$105,$106,$107,$108,$109,$10a,$10b,$10c,$10d,$10e,$10f + .hibytes $fe0,$fe1,$fe2,$fe3,$fe4,$fe5,$fe6,$fe7,$fe8,$fe9,$fea,$feb,$fec,$fed,$fee,$fef + .hibytes $ff0,$ff1,$ff2,$ff3,$ff4,$ff5,$ff6,$ff7,$ff8,$ff9,$ffa,$ffb,$ffc,$ffd,$ffe,$fff + .hibytes $1000,$1001,$1002,$1003,$1004,$1005,$1006,$1007,$1008,$1009,$100a,$100b,$100c,$100d,$100e,$100f + .hibytes $7ff0,$7ff1,$7ff2,$7ff3,$7ff4,$7ff5,$7ff6,$7ff7,$7ff8,$7ff9,$7ffa,$7ffb,$7ffc,$7ffd,$7ffe,$7fff + .hibytes $8000,$8001,$8002,$8003,$8004,$8005,$8006,$8007,$8008,$8009,$800a,$800b,$800c,$800d,$800e,$800f + .hibytes $9ff0,$9ff1,$9ff2,$9ff3,$9ff4,$9ff5,$9ff6,$9ff7,$9ff8,$9ff9,$9ffa,$9ffb,$9ffc,$9ffd,$9ffe,$9fff + .hibytes $a000,$a001,$a002,$a003,$a004,$a005,$a006,$a007,$a008,$a009,$a00a,$a00b,$a00c,$a00d,$a00e,$a00f + .hibytes $aff0,$aff1,$aff2,$aff3,$aff4,$aff5,$aff6,$aff7,$aff8,$aff9,$affa,$affb,$affc,$affd,$affe,$afff + .hibytes $b000,$b001,$b002,$b003,$b004,$b005,$b006,$b007,$b008,$b009,$b00a,$b00b,$b00c,$b00d,$b00e,$b00f + .hibytes $bff0,$bff1,$bff2,$bff3,$bff4,$bff5,$bff6,$bff7,$bff8,$bff9,$bffa,$bffb,$bffc,$bffd,$bffe,$bfff + .hibytes $c000,$c001,$c002,$c003,$c004,$c005,$c006,$c007,$c008,$c009,$c00a,$c00b,$c00c,$c00d,$c00e,$c00f + .hibytes $cff0,$cff1,$cff2,$cff3,$cff4,$cff5,$cff6,$cff7,$cff8,$cff9,$cffa,$cffb,$cffc,$cffd,$cffe,$cfff + .hibytes $d000,$d001,$d002,$d003,$d004,$d005,$d006,$d007,$d008,$d009,$d00a,$d00b,$d00c,$d00d,$d00e,$d00f + .hibytes $dff0,$dff1,$dff2,$dff3,$dff4,$dff5,$dff6,$dff7,$dff8,$dff9,$dffa,$dffb,$dffc,$dffd,$dffe,$dfff + .hibytes $e000,$e001,$e002,$e003,$e004,$e005,$e006,$e007,$e008,$e009,$e00a,$e00b,$e00c,$e00d,$e00e,$e00f + .hibytes $eff0,$eff1,$eff2,$eff3,$eff4,$eff5,$eff6,$eff7,$eff8,$eff9,$effa,$effb,$effc,$effd,$effe,$efff + .hibytes $f000,$f001,$f002,$f003,$f004,$f005,$f006,$f007,$f008,$f009,$f00a,$f00b,$f00c,$f00d,$f00e,$f00f + .hibytes $fff0,$fff1,$fff2,$fff3,$fff4,$fff5,$fff6,$fff7,$fff8,$fff9,$fffa,$fffb,$fffc,$fffd,$fffe,$ffff + + ; multiple values on one line, alternative hex + .hibytes 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh + .hibytes 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh + .hibytes 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh + .hibytes 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh + .hibytes 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh + .hibytes 100h,101h,102h,103h,104h,105h,106h,107h,108h,109h,10ah,10bh,10ch,10dh,10eh,10fh + .hibytes 0fe0h,0fe1h,0fe2h,0fe3h,0fe4h,0fe5h,0fe6h,0fe7h,0fe8h,0fe9h,0feah,0febh,0fech,0fedh,0feeh,0fefh + .hibytes 0ff0h,0ff1h,0ff2h,0ff3h,0ff4h,0ff5h,0ff6h,0ff7h,0ff8h,0ff9h,0ffah,0ffbh,0ffch,0ffdh,0ffeh,0fffh + .hibytes 1000h,1001h,1002h,1003h,1004h,1005h,1006h,1007h,1008h,1009h,100ah,100bh,100ch,100dh,100eh,100fh + .hibytes 7ff0h,7ff1h,7ff2h,7ff3h,7ff4h,7ff5h,7ff6h,7ff7h,7ff8h,7ff9h,7ffah,7ffbh,7ffch,7ffdh,7ffeh,7fffh + .hibytes 8000h,8001h,8002h,8003h,8004h,8005h,8006h,8007h,8008h,8009h,800ah,800bh,800ch,800dh,800eh,800fh + .hibytes 9ff0h,9ff1h,9ff2h,9ff3h,9ff4h,9ff5h,9ff6h,9ff7h,9ff8h,9ff9h,9ffah,9ffbh,9ffch,9ffdh,9ffeh,9fffh + .hibytes 0a000h,0a001h,0a002h,0a003h,0a004h,0a005h,0a006h,0a007h,0a008h,0a009h,0a00ah,0a00bh,0a00ch,0a00dh,0a00eh,0a00fh + .hibytes 0aff0h,0aff1h,0aff2h,0aff3h,0aff4h,0aff5h,0aff6h,0aff7h,0aff8h,0aff9h,0affah,0affbh,0affch,0affdh,0affeh,0afffh + .hibytes 0b000h,0b001h,0b002h,0b003h,0b004h,0b005h,0b006h,0b007h,0b008h,0b009h,0b00ah,0b00bh,0b00ch,0b00dh,0b00eh,0b00fh + .hibytes 0bff0h,0bff1h,0bff2h,0bff3h,0bff4h,0bff5h,0bff6h,0bff7h,0bff8h,0bff9h,0bffah,0bffbh,0bffch,0bffdh,0bffeh,0bfffh + .hibytes 0c000h,0c001h,0c002h,0c003h,0c004h,0c005h,0c006h,0c007h,0c008h,0c009h,0c00ah,0c00bh,0c00ch,0c00dh,0c00eh,0c00fh + .hibytes 0cff0h,0cff1h,0cff2h,0cff3h,0cff4h,0cff5h,0cff6h,0cff7h,0cff8h,0cff9h,0cffah,0cffbh,0cffch,0cffdh,0cffeh,0cfffh + .hibytes 0d000h,0d001h,0d002h,0d003h,0d004h,0d005h,0d006h,0d007h,0d008h,0d009h,0d00ah,0d00bh,0d00ch,0d00dh,0d00eh,0d00fh + .hibytes 0dff0h,0dff1h,0dff2h,0dff3h,0dff4h,0dff5h,0dff6h,0dff7h,0dff8h,0dff9h,0dffah,0dffbh,0dffch,0dffdh,0dffeh,0dfffh + .hibytes 0e000h,0e001h,0e002h,0e003h,0e004h,0e005h,0e006h,0e007h,0e008h,0e009h,0e00ah,0e00bh,0e00ch,0e00dh,0e00eh,0e00fh + .hibytes 0eff0h,0eff1h,0eff2h,0eff3h,0eff4h,0eff5h,0eff6h,0eff7h,0eff8h,0eff9h,0effah,0effbh,0effch,0effdh,0effeh,0efffh + .hibytes 0f000h,0f001h,0f002h,0f003h,0f004h,0f005h,0f006h,0f007h,0f008h,0f009h,0f00ah,0f00bh,0f00ch,0f00dh,0f00eh,0f00fh + .hibytes 0fff0h,0fff1h,0fff2h,0fff3h,0fff4h,0fff5h,0fff6h,0fff7h,0fff8h,0fff9h,0fffah,0fffbh,0fffch,0fffdh,0fffeh,0ffffh + + ; mix some variants + .hibytes 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh diff --git a/test/asm/listing/107-lobytes.s b/test/asm/listing/107-lobytes.s new file mode 100644 index 000000000..53a368f38 --- /dev/null +++ b/test/asm/listing/107-lobytes.s @@ -0,0 +1,6076 @@ +; 2022-06-15 Spiro Trikaliotis + + + ; upper case pseudo-op + .LOBYTES 0 + .LOBYTES 1 + .LOBYTES 2 + .LOBYTES 3 + .LOBYTES 4 + .LOBYTES 5 + .LOBYTES 6 + .LOBYTES 7 + .LOBYTES 8 + .LOBYTES 9 + .LOBYTES 10 + .LOBYTES 11 + .LOBYTES 12 + .LOBYTES 13 + .LOBYTES 14 + .LOBYTES 15 + .LOBYTES 16 + .LOBYTES 17 + .LOBYTES 18 + .LOBYTES 19 + .LOBYTES 112 + .LOBYTES 113 + .LOBYTES 114 + .LOBYTES 115 + .LOBYTES 116 + .LOBYTES 117 + .LOBYTES 118 + .LOBYTES 119 + .LOBYTES 120 + .LOBYTES 121 + .LOBYTES 122 + .LOBYTES 123 + .LOBYTES 124 + .LOBYTES 125 + .LOBYTES 126 + .LOBYTES 127 + .LOBYTES 128 + .LOBYTES 129 + .LOBYTES 130 + .LOBYTES 131 + .LOBYTES 132 + .LOBYTES 133 + .LOBYTES 134 + .LOBYTES 240 + .LOBYTES 241 + .LOBYTES 242 + .LOBYTES 243 + .LOBYTES 244 + .LOBYTES 245 + .LOBYTES 246 + .LOBYTES 247 + .LOBYTES 248 + .LOBYTES 249 + .LOBYTES 250 + .LOBYTES 251 + .LOBYTES 252 + .LOBYTES 253 + .LOBYTES 254 + .LOBYTES 255 + .LOBYTES 256 + .LOBYTES 257 + .LOBYTES 258 + .LOBYTES 259 + .LOBYTES 4050 + .LOBYTES 4051 + .LOBYTES 4052 + .LOBYTES 4053 + .LOBYTES 4054 + .LOBYTES 4055 + .LOBYTES 4056 + .LOBYTES 4057 + .LOBYTES 4058 + .LOBYTES 4059 + .LOBYTES 4060 + .LOBYTES 4061 + .LOBYTES 4062 + .LOBYTES 4063 + .LOBYTES 4064 + .LOBYTES 4065 + .LOBYTES 4066 + .LOBYTES 4067 + .LOBYTES 4068 + .LOBYTES 4069 + .LOBYTES 4070 + .LOBYTES 4071 + .LOBYTES 4072 + .LOBYTES 4073 + .LOBYTES 4074 + .LOBYTES 4075 + .LOBYTES 4076 + .LOBYTES 4077 + .LOBYTES 4078 + .LOBYTES 4079 + .LOBYTES 4080 + .LOBYTES 4081 + .LOBYTES 4082 + .LOBYTES 4083 + .LOBYTES 4084 + .LOBYTES 4085 + .LOBYTES 4086 + .LOBYTES 4087 + .LOBYTES 4088 + .LOBYTES 4089 + .LOBYTES 4090 + .LOBYTES 4091 + .LOBYTES 4092 + .LOBYTES 4093 + .LOBYTES 4094 + .LOBYTES 4095 + .LOBYTES 4096 + .LOBYTES 4097 + .LOBYTES 4098 + .LOBYTES 4099 + .LOBYTES 4100 + .LOBYTES 4101 + .LOBYTES 4102 + .LOBYTES 4103 + .LOBYTES 4104 + .LOBYTES 32752 + .LOBYTES 32753 + .LOBYTES 32754 + .LOBYTES 32755 + .LOBYTES 32756 + .LOBYTES 32757 + .LOBYTES 32758 + .LOBYTES 32759 + .LOBYTES 32760 + .LOBYTES 32761 + .LOBYTES 32762 + .LOBYTES 32763 + .LOBYTES 32764 + .LOBYTES 32765 + .LOBYTES 32766 + .LOBYTES 32767 + .LOBYTES 32768 + .LOBYTES 32769 + .LOBYTES 32770 + .LOBYTES 32771 + .LOBYTES 32772 + .LOBYTES 32773 + .LOBYTES 32774 + .LOBYTES 32775 + .LOBYTES 32776 + .LOBYTES 32777 + .LOBYTES 32778 + .LOBYTES 32779 + .LOBYTES 40929 + .LOBYTES 40930 + .LOBYTES 40931 + .LOBYTES 40932 + .LOBYTES 40933 + .LOBYTES 40934 + .LOBYTES 40935 + .LOBYTES 40936 + .LOBYTES 40937 + .LOBYTES 40938 + .LOBYTES 40939 + .LOBYTES 40940 + .LOBYTES 40941 + .LOBYTES 40942 + .LOBYTES 40943 + .LOBYTES 40944 + .LOBYTES 40945 + .LOBYTES 40946 + .LOBYTES 40947 + .LOBYTES 40948 + .LOBYTES 40949 + .LOBYTES 40950 + .LOBYTES 40951 + .LOBYTES 40952 + .LOBYTES 40953 + .LOBYTES 40954 + .LOBYTES 40955 + .LOBYTES 40956 + .LOBYTES 40957 + .LOBYTES 40958 + .LOBYTES 40959 + .LOBYTES 40960 + .LOBYTES 40961 + .LOBYTES 40962 + .LOBYTES 40963 + .LOBYTES 40964 + .LOBYTES 40965 + .LOBYTES 40966 + .LOBYTES 40967 + .LOBYTES 40968 + .LOBYTES 40969 + .LOBYTES 40970 + .LOBYTES 40971 + .LOBYTES 40972 + .LOBYTES 40973 + .LOBYTES 40974 + .LOBYTES 40975 + .LOBYTES 45025 + .LOBYTES 45026 + .LOBYTES 45027 + .LOBYTES 45028 + .LOBYTES 45029 + .LOBYTES 45030 + .LOBYTES 45031 + .LOBYTES 45032 + .LOBYTES 45033 + .LOBYTES 45034 + .LOBYTES 45035 + .LOBYTES 45036 + .LOBYTES 45037 + .LOBYTES 45038 + .LOBYTES 45039 + .LOBYTES 45040 + .LOBYTES 45041 + .LOBYTES 45042 + .LOBYTES 45043 + .LOBYTES 45044 + .LOBYTES 45045 + .LOBYTES 45046 + .LOBYTES 45047 + .LOBYTES 45048 + .LOBYTES 45049 + .LOBYTES 45050 + .LOBYTES 45051 + .LOBYTES 45052 + .LOBYTES 45053 + .LOBYTES 45054 + .LOBYTES 45055 + .LOBYTES 45056 + .LOBYTES 45057 + .LOBYTES 45058 + .LOBYTES 45059 + .LOBYTES 45060 + .LOBYTES 45061 + .LOBYTES 45062 + .LOBYTES 45063 + .LOBYTES 45064 + .LOBYTES 45065 + .LOBYTES 45066 + .LOBYTES 45067 + .LOBYTES 45068 + .LOBYTES 45069 + .LOBYTES 45070 + .LOBYTES 45071 + .LOBYTES 49121 + .LOBYTES 49122 + .LOBYTES 49123 + .LOBYTES 49124 + .LOBYTES 49125 + .LOBYTES 49126 + .LOBYTES 49127 + .LOBYTES 49128 + .LOBYTES 49129 + .LOBYTES 49130 + .LOBYTES 49131 + .LOBYTES 49132 + .LOBYTES 49133 + .LOBYTES 49134 + .LOBYTES 49135 + .LOBYTES 49136 + .LOBYTES 49137 + .LOBYTES 49138 + .LOBYTES 49139 + .LOBYTES 49140 + .LOBYTES 49141 + .LOBYTES 49142 + .LOBYTES 49143 + .LOBYTES 49144 + .LOBYTES 49145 + .LOBYTES 49146 + .LOBYTES 49147 + .LOBYTES 49148 + .LOBYTES 49149 + .LOBYTES 49150 + .LOBYTES 49151 + .LOBYTES 49152 + .LOBYTES 49153 + .LOBYTES 49154 + .LOBYTES 49155 + .LOBYTES 49156 + .LOBYTES 49157 + .LOBYTES 49158 + .LOBYTES 49159 + .LOBYTES 49160 + .LOBYTES 49161 + .LOBYTES 49162 + .LOBYTES 49163 + .LOBYTES 49164 + .LOBYTES 49165 + .LOBYTES 49166 + .LOBYTES 49167 + .LOBYTES 53217 + .LOBYTES 53218 + .LOBYTES 53219 + .LOBYTES 53220 + .LOBYTES 53221 + .LOBYTES 53222 + .LOBYTES 53223 + .LOBYTES 53224 + .LOBYTES 53225 + .LOBYTES 53226 + .LOBYTES 53227 + .LOBYTES 53228 + .LOBYTES 53229 + .LOBYTES 53230 + .LOBYTES 53231 + .LOBYTES 53232 + .LOBYTES 53233 + .LOBYTES 53234 + .LOBYTES 53235 + .LOBYTES 53236 + .LOBYTES 53237 + .LOBYTES 53238 + .LOBYTES 53239 + .LOBYTES 53240 + .LOBYTES 53241 + .LOBYTES 53242 + .LOBYTES 53243 + .LOBYTES 53244 + .LOBYTES 53245 + .LOBYTES 53246 + .LOBYTES 53247 + .LOBYTES 53248 + .LOBYTES 53249 + .LOBYTES 53250 + .LOBYTES 53251 + .LOBYTES 53252 + .LOBYTES 53253 + .LOBYTES 53254 + .LOBYTES 53255 + .LOBYTES 53256 + .LOBYTES 53257 + .LOBYTES 53258 + .LOBYTES 53259 + .LOBYTES 53260 + .LOBYTES 53261 + .LOBYTES 53262 + .LOBYTES 53263 + .LOBYTES 57313 + .LOBYTES 57314 + .LOBYTES 57315 + .LOBYTES 57316 + .LOBYTES 57317 + .LOBYTES 57318 + .LOBYTES 57319 + .LOBYTES 57320 + .LOBYTES 57321 + .LOBYTES 57322 + .LOBYTES 57323 + .LOBYTES 57324 + .LOBYTES 57325 + .LOBYTES 57326 + .LOBYTES 57327 + .LOBYTES 57328 + .LOBYTES 57329 + .LOBYTES 57330 + .LOBYTES 57331 + .LOBYTES 57332 + .LOBYTES 57333 + .LOBYTES 57334 + .LOBYTES 57335 + .LOBYTES 57336 + .LOBYTES 57337 + .LOBYTES 57338 + .LOBYTES 57339 + .LOBYTES 57340 + .LOBYTES 57341 + .LOBYTES 57342 + .LOBYTES 57343 + .LOBYTES 57344 + .LOBYTES 57345 + .LOBYTES 57346 + .LOBYTES 57347 + .LOBYTES 57348 + .LOBYTES 57349 + .LOBYTES 57350 + .LOBYTES 57351 + .LOBYTES 57352 + .LOBYTES 57353 + .LOBYTES 57354 + .LOBYTES 57355 + .LOBYTES 57356 + .LOBYTES 57357 + .LOBYTES 57358 + .LOBYTES 57359 + .LOBYTES 61409 + .LOBYTES 61410 + .LOBYTES 61411 + .LOBYTES 61412 + .LOBYTES 61413 + .LOBYTES 61414 + .LOBYTES 61415 + .LOBYTES 61416 + .LOBYTES 61417 + .LOBYTES 61418 + .LOBYTES 61419 + .LOBYTES 61420 + .LOBYTES 61421 + .LOBYTES 61422 + .LOBYTES 61423 + .LOBYTES 61424 + .LOBYTES 61425 + .LOBYTES 61426 + .LOBYTES 61427 + .LOBYTES 61428 + .LOBYTES 61429 + .LOBYTES 61430 + .LOBYTES 61431 + .LOBYTES 61432 + .LOBYTES 61433 + .LOBYTES 61434 + .LOBYTES 61435 + .LOBYTES 61436 + .LOBYTES 61437 + .LOBYTES 61438 + .LOBYTES 61439 + .LOBYTES 61440 + .LOBYTES 61441 + .LOBYTES 61442 + .LOBYTES 61443 + .LOBYTES 61444 + .LOBYTES 61445 + .LOBYTES 61446 + .LOBYTES 61447 + .LOBYTES 61448 + .LOBYTES 61449 + .LOBYTES 61450 + .LOBYTES 61451 + .LOBYTES 61452 + .LOBYTES 61453 + .LOBYTES 61454 + .LOBYTES 61455 + .LOBYTES 65505 + .LOBYTES 65506 + .LOBYTES 65507 + .LOBYTES 65508 + .LOBYTES 65509 + .LOBYTES 65510 + .LOBYTES 65511 + .LOBYTES 65512 + .LOBYTES 65513 + .LOBYTES 65514 + .LOBYTES 65515 + .LOBYTES 65516 + .LOBYTES 65517 + .LOBYTES 65518 + .LOBYTES 65519 + .LOBYTES 65520 + .LOBYTES 65521 + .LOBYTES 65522 + .LOBYTES 65523 + .LOBYTES 65524 + .LOBYTES 65525 + .LOBYTES 65526 + .LOBYTES 65527 + .LOBYTES 65528 + .LOBYTES 65529 + .LOBYTES 65530 + .LOBYTES 65531 + .LOBYTES 65532 + .LOBYTES 65533 + .LOBYTES 65534 + .LOBYTES 65535 + + ; lower case pseudo-op + .lobytes 0 + .lobytes 1 + .lobytes 2 + .lobytes 3 + .lobytes 4 + .lobytes 5 + .lobytes 6 + .lobytes 7 + .lobytes 8 + .lobytes 9 + .lobytes 10 + .lobytes 11 + .lobytes 12 + .lobytes 13 + .lobytes 14 + .lobytes 15 + .lobytes 16 + .lobytes 17 + .lobytes 18 + .lobytes 19 + .lobytes 112 + .lobytes 113 + .lobytes 114 + .lobytes 115 + .lobytes 116 + .lobytes 117 + .lobytes 118 + .lobytes 119 + .lobytes 120 + .lobytes 121 + .lobytes 122 + .lobytes 123 + .lobytes 124 + .lobytes 125 + .lobytes 126 + .lobytes 127 + .lobytes 128 + .lobytes 129 + .lobytes 130 + .lobytes 131 + .lobytes 132 + .lobytes 133 + .lobytes 134 + .lobytes 240 + .lobytes 241 + .lobytes 242 + .lobytes 243 + .lobytes 244 + .lobytes 245 + .lobytes 246 + .lobytes 247 + .lobytes 248 + .lobytes 249 + .lobytes 250 + .lobytes 251 + .lobytes 252 + .lobytes 253 + .lobytes 254 + .lobytes 255 + .lobytes 256 + .lobytes 257 + .lobytes 258 + .lobytes 259 + .lobytes 4050 + .lobytes 4051 + .lobytes 4052 + .lobytes 4053 + .lobytes 4054 + .lobytes 4055 + .lobytes 4056 + .lobytes 4057 + .lobytes 4058 + .lobytes 4059 + .lobytes 4060 + .lobytes 4061 + .lobytes 4062 + .lobytes 4063 + .lobytes 4064 + .lobytes 4065 + .lobytes 4066 + .lobytes 4067 + .lobytes 4068 + .lobytes 4069 + .lobytes 4070 + .lobytes 4071 + .lobytes 4072 + .lobytes 4073 + .lobytes 4074 + .lobytes 4075 + .lobytes 4076 + .lobytes 4077 + .lobytes 4078 + .lobytes 4079 + .lobytes 4080 + .lobytes 4081 + .lobytes 4082 + .lobytes 4083 + .lobytes 4084 + .lobytes 4085 + .lobytes 4086 + .lobytes 4087 + .lobytes 4088 + .lobytes 4089 + .lobytes 4090 + .lobytes 4091 + .lobytes 4092 + .lobytes 4093 + .lobytes 4094 + .lobytes 4095 + .lobytes 4096 + .lobytes 4097 + .lobytes 4098 + .lobytes 4099 + .lobytes 4100 + .lobytes 4101 + .lobytes 4102 + .lobytes 4103 + .lobytes 4104 + .lobytes 32752 + .lobytes 32753 + .lobytes 32754 + .lobytes 32755 + .lobytes 32756 + .lobytes 32757 + .lobytes 32758 + .lobytes 32759 + .lobytes 32760 + .lobytes 32761 + .lobytes 32762 + .lobytes 32763 + .lobytes 32764 + .lobytes 32765 + .lobytes 32766 + .lobytes 32767 + .lobytes 32768 + .lobytes 32769 + .lobytes 32770 + .lobytes 32771 + .lobytes 32772 + .lobytes 32773 + .lobytes 32774 + .lobytes 32775 + .lobytes 32776 + .lobytes 32777 + .lobytes 32778 + .lobytes 32779 + .lobytes 40929 + .lobytes 40930 + .lobytes 40931 + .lobytes 40932 + .lobytes 40933 + .lobytes 40934 + .lobytes 40935 + .lobytes 40936 + .lobytes 40937 + .lobytes 40938 + .lobytes 40939 + .lobytes 40940 + .lobytes 40941 + .lobytes 40942 + .lobytes 40943 + .lobytes 40944 + .lobytes 40945 + .lobytes 40946 + .lobytes 40947 + .lobytes 40948 + .lobytes 40949 + .lobytes 40950 + .lobytes 40951 + .lobytes 40952 + .lobytes 40953 + .lobytes 40954 + .lobytes 40955 + .lobytes 40956 + .lobytes 40957 + .lobytes 40958 + .lobytes 40959 + .lobytes 40960 + .lobytes 40961 + .lobytes 40962 + .lobytes 40963 + .lobytes 40964 + .lobytes 40965 + .lobytes 40966 + .lobytes 40967 + .lobytes 40968 + .lobytes 40969 + .lobytes 40970 + .lobytes 40971 + .lobytes 40972 + .lobytes 40973 + .lobytes 40974 + .lobytes 40975 + .lobytes 45025 + .lobytes 45026 + .lobytes 45027 + .lobytes 45028 + .lobytes 45029 + .lobytes 45030 + .lobytes 45031 + .lobytes 45032 + .lobytes 45033 + .lobytes 45034 + .lobytes 45035 + .lobytes 45036 + .lobytes 45037 + .lobytes 45038 + .lobytes 45039 + .lobytes 45040 + .lobytes 45041 + .lobytes 45042 + .lobytes 45043 + .lobytes 45044 + .lobytes 45045 + .lobytes 45046 + .lobytes 45047 + .lobytes 45048 + .lobytes 45049 + .lobytes 45050 + .lobytes 45051 + .lobytes 45052 + .lobytes 45053 + .lobytes 45054 + .lobytes 45055 + .lobytes 45056 + .lobytes 45057 + .lobytes 45058 + .lobytes 45059 + .lobytes 45060 + .lobytes 45061 + .lobytes 45062 + .lobytes 45063 + .lobytes 45064 + .lobytes 45065 + .lobytes 45066 + .lobytes 45067 + .lobytes 45068 + .lobytes 45069 + .lobytes 45070 + .lobytes 45071 + .lobytes 49121 + .lobytes 49122 + .lobytes 49123 + .lobytes 49124 + .lobytes 49125 + .lobytes 49126 + .lobytes 49127 + .lobytes 49128 + .lobytes 49129 + .lobytes 49130 + .lobytes 49131 + .lobytes 49132 + .lobytes 49133 + .lobytes 49134 + .lobytes 49135 + .lobytes 49136 + .lobytes 49137 + .lobytes 49138 + .lobytes 49139 + .lobytes 49140 + .lobytes 49141 + .lobytes 49142 + .lobytes 49143 + .lobytes 49144 + .lobytes 49145 + .lobytes 49146 + .lobytes 49147 + .lobytes 49148 + .lobytes 49149 + .lobytes 49150 + .lobytes 49151 + .lobytes 49152 + .lobytes 49153 + .lobytes 49154 + .lobytes 49155 + .lobytes 49156 + .lobytes 49157 + .lobytes 49158 + .lobytes 49159 + .lobytes 49160 + .lobytes 49161 + .lobytes 49162 + .lobytes 49163 + .lobytes 49164 + .lobytes 49165 + .lobytes 49166 + .lobytes 49167 + .lobytes 53217 + .lobytes 53218 + .lobytes 53219 + .lobytes 53220 + .lobytes 53221 + .lobytes 53222 + .lobytes 53223 + .lobytes 53224 + .lobytes 53225 + .lobytes 53226 + .lobytes 53227 + .lobytes 53228 + .lobytes 53229 + .lobytes 53230 + .lobytes 53231 + .lobytes 53232 + .lobytes 53233 + .lobytes 53234 + .lobytes 53235 + .lobytes 53236 + .lobytes 53237 + .lobytes 53238 + .lobytes 53239 + .lobytes 53240 + .lobytes 53241 + .lobytes 53242 + .lobytes 53243 + .lobytes 53244 + .lobytes 53245 + .lobytes 53246 + .lobytes 53247 + .lobytes 53248 + .lobytes 53249 + .lobytes 53250 + .lobytes 53251 + .lobytes 53252 + .lobytes 53253 + .lobytes 53254 + .lobytes 53255 + .lobytes 53256 + .lobytes 53257 + .lobytes 53258 + .lobytes 53259 + .lobytes 53260 + .lobytes 53261 + .lobytes 53262 + .lobytes 53263 + .lobytes 57313 + .lobytes 57314 + .lobytes 57315 + .lobytes 57316 + .lobytes 57317 + .lobytes 57318 + .lobytes 57319 + .lobytes 57320 + .lobytes 57321 + .lobytes 57322 + .lobytes 57323 + .lobytes 57324 + .lobytes 57325 + .lobytes 57326 + .lobytes 57327 + .lobytes 57328 + .lobytes 57329 + .lobytes 57330 + .lobytes 57331 + .lobytes 57332 + .lobytes 57333 + .lobytes 57334 + .lobytes 57335 + .lobytes 57336 + .lobytes 57337 + .lobytes 57338 + .lobytes 57339 + .lobytes 57340 + .lobytes 57341 + .lobytes 57342 + .lobytes 57343 + .lobytes 57344 + .lobytes 57345 + .lobytes 57346 + .lobytes 57347 + .lobytes 57348 + .lobytes 57349 + .lobytes 57350 + .lobytes 57351 + .lobytes 57352 + .lobytes 57353 + .lobytes 57354 + .lobytes 57355 + .lobytes 57356 + .lobytes 57357 + .lobytes 57358 + .lobytes 57359 + .lobytes 61409 + .lobytes 61410 + .lobytes 61411 + .lobytes 61412 + .lobytes 61413 + .lobytes 61414 + .lobytes 61415 + .lobytes 61416 + .lobytes 61417 + .lobytes 61418 + .lobytes 61419 + .lobytes 61420 + .lobytes 61421 + .lobytes 61422 + .lobytes 61423 + .lobytes 61424 + .lobytes 61425 + .lobytes 61426 + .lobytes 61427 + .lobytes 61428 + .lobytes 61429 + .lobytes 61430 + .lobytes 61431 + .lobytes 61432 + .lobytes 61433 + .lobytes 61434 + .lobytes 61435 + .lobytes 61436 + .lobytes 61437 + .lobytes 61438 + .lobytes 61439 + .lobytes 61440 + .lobytes 61441 + .lobytes 61442 + .lobytes 61443 + .lobytes 61444 + .lobytes 61445 + .lobytes 61446 + .lobytes 61447 + .lobytes 61448 + .lobytes 61449 + .lobytes 61450 + .lobytes 61451 + .lobytes 61452 + .lobytes 61453 + .lobytes 61454 + .lobytes 61455 + .lobytes 65505 + .lobytes 65506 + .lobytes 65507 + .lobytes 65508 + .lobytes 65509 + .lobytes 65510 + .lobytes 65511 + .lobytes 65512 + .lobytes 65513 + .lobytes 65514 + .lobytes 65515 + .lobytes 65516 + .lobytes 65517 + .lobytes 65518 + .lobytes 65519 + .lobytes 65520 + .lobytes 65521 + .lobytes 65522 + .lobytes 65523 + .lobytes 65524 + .lobytes 65525 + .lobytes 65526 + .lobytes 65527 + .lobytes 65528 + .lobytes 65529 + .lobytes 65530 + .lobytes 65531 + .lobytes 65532 + .lobytes 65533 + .lobytes 65534 + .lobytes 65535 + + ; hex values + .lobytes $0 + .lobytes $1 + .lobytes $2 + .lobytes $3 + .lobytes $4 + .lobytes $5 + .lobytes $6 + .lobytes $7 + .lobytes $8 + .lobytes $9 + .lobytes $a + .lobytes $b + .lobytes $c + .lobytes $d + .lobytes $e + .lobytes $f + .lobytes $10 + .lobytes $11 + .lobytes $12 + .lobytes $13 + .lobytes $70 + .lobytes $71 + .lobytes $72 + .lobytes $73 + .lobytes $74 + .lobytes $75 + .lobytes $76 + .lobytes $77 + .lobytes $78 + .lobytes $79 + .lobytes $7a + .lobytes $7b + .lobytes $7c + .lobytes $7d + .lobytes $7e + .lobytes $7f + .lobytes $80 + .lobytes $81 + .lobytes $82 + .lobytes $83 + .lobytes $84 + .lobytes $85 + .lobytes $86 + .lobytes $f0 + .lobytes $f1 + .lobytes $f2 + .lobytes $f3 + .lobytes $f4 + .lobytes $f5 + .lobytes $f6 + .lobytes $f7 + .lobytes $f8 + .lobytes $f9 + .lobytes $fa + .lobytes $fb + .lobytes $fc + .lobytes $fd + .lobytes $fe + .lobytes $ff + .lobytes $100 + .lobytes $101 + .lobytes $102 + .lobytes $103 + .lobytes $fd2 + .lobytes $fd3 + .lobytes $fd4 + .lobytes $fd5 + .lobytes $fd6 + .lobytes $fd7 + .lobytes $fd8 + .lobytes $fd9 + .lobytes $fda + .lobytes $fdb + .lobytes $fdc + .lobytes $fdd + .lobytes $fde + .lobytes $fdf + .lobytes $fe0 + .lobytes $fe1 + .lobytes $fe2 + .lobytes $fe3 + .lobytes $fe4 + .lobytes $fe5 + .lobytes $fe6 + .lobytes $fe7 + .lobytes $fe8 + .lobytes $fe9 + .lobytes $fea + .lobytes $feb + .lobytes $fec + .lobytes $fed + .lobytes $fee + .lobytes $fef + .lobytes $ff0 + .lobytes $ff1 + .lobytes $ff2 + .lobytes $ff3 + .lobytes $ff4 + .lobytes $ff5 + .lobytes $ff6 + .lobytes $ff7 + .lobytes $ff8 + .lobytes $ff9 + .lobytes $ffa + .lobytes $ffb + .lobytes $ffc + .lobytes $ffd + .lobytes $ffe + .lobytes $fff + .lobytes $1000 + .lobytes $1001 + .lobytes $1002 + .lobytes $1003 + .lobytes $1004 + .lobytes $1005 + .lobytes $1006 + .lobytes $1007 + .lobytes $1008 + .lobytes $7ff0 + .lobytes $7ff1 + .lobytes $7ff2 + .lobytes $7ff3 + .lobytes $7ff4 + .lobytes $7ff5 + .lobytes $7ff6 + .lobytes $7ff7 + .lobytes $7ff8 + .lobytes $7ff9 + .lobytes $7ffa + .lobytes $7ffb + .lobytes $7ffc + .lobytes $7ffd + .lobytes $7ffe + .lobytes $7fff + .lobytes $8000 + .lobytes $8001 + .lobytes $8002 + .lobytes $8003 + .lobytes $8004 + .lobytes $8005 + .lobytes $8006 + .lobytes $8007 + .lobytes $8008 + .lobytes $8009 + .lobytes $800a + .lobytes $800b + .lobytes $9fe1 + .lobytes $9fe2 + .lobytes $9fe3 + .lobytes $9fe4 + .lobytes $9fe5 + .lobytes $9fe6 + .lobytes $9fe7 + .lobytes $9fe8 + .lobytes $9fe9 + .lobytes $9fea + .lobytes $9feb + .lobytes $9fec + .lobytes $9fed + .lobytes $9fee + .lobytes $9fef + .lobytes $9ff0 + .lobytes $9ff1 + .lobytes $9ff2 + .lobytes $9ff3 + .lobytes $9ff4 + .lobytes $9ff5 + .lobytes $9ff6 + .lobytes $9ff7 + .lobytes $9ff8 + .lobytes $9ff9 + .lobytes $9ffa + .lobytes $9ffb + .lobytes $9ffc + .lobytes $9ffd + .lobytes $9ffe + .lobytes $9fff + .lobytes $a000 + .lobytes $a001 + .lobytes $a002 + .lobytes $a003 + .lobytes $a004 + .lobytes $a005 + .lobytes $a006 + .lobytes $a007 + .lobytes $a008 + .lobytes $a009 + .lobytes $a00a + .lobytes $a00b + .lobytes $a00c + .lobytes $a00d + .lobytes $a00e + .lobytes $a00f + .lobytes $afe1 + .lobytes $afe2 + .lobytes $afe3 + .lobytes $afe4 + .lobytes $afe5 + .lobytes $afe6 + .lobytes $afe7 + .lobytes $afe8 + .lobytes $afe9 + .lobytes $afea + .lobytes $afeb + .lobytes $afec + .lobytes $afed + .lobytes $afee + .lobytes $afef + .lobytes $aff0 + .lobytes $aff1 + .lobytes $aff2 + .lobytes $aff3 + .lobytes $aff4 + .lobytes $aff5 + .lobytes $aff6 + .lobytes $aff7 + .lobytes $aff8 + .lobytes $aff9 + .lobytes $affa + .lobytes $affb + .lobytes $affc + .lobytes $affd + .lobytes $affe + .lobytes $afff + .lobytes $b000 + .lobytes $b001 + .lobytes $b002 + .lobytes $b003 + .lobytes $b004 + .lobytes $b005 + .lobytes $b006 + .lobytes $b007 + .lobytes $b008 + .lobytes $b009 + .lobytes $b00a + .lobytes $b00b + .lobytes $b00c + .lobytes $b00d + .lobytes $b00e + .lobytes $b00f + .lobytes $bfe1 + .lobytes $bfe2 + .lobytes $bfe3 + .lobytes $bfe4 + .lobytes $bfe5 + .lobytes $bfe6 + .lobytes $bfe7 + .lobytes $bfe8 + .lobytes $bfe9 + .lobytes $bfea + .lobytes $bfeb + .lobytes $bfec + .lobytes $bfed + .lobytes $bfee + .lobytes $bfef + .lobytes $bff0 + .lobytes $bff1 + .lobytes $bff2 + .lobytes $bff3 + .lobytes $bff4 + .lobytes $bff5 + .lobytes $bff6 + .lobytes $bff7 + .lobytes $bff8 + .lobytes $bff9 + .lobytes $bffa + .lobytes $bffb + .lobytes $bffc + .lobytes $bffd + .lobytes $bffe + .lobytes $bfff + .lobytes $c000 + .lobytes $c001 + .lobytes $c002 + .lobytes $c003 + .lobytes $c004 + .lobytes $c005 + .lobytes $c006 + .lobytes $c007 + .lobytes $c008 + .lobytes $c009 + .lobytes $c00a + .lobytes $c00b + .lobytes $c00c + .lobytes $c00d + .lobytes $c00e + .lobytes $c00f + .lobytes $cfe1 + .lobytes $cfe2 + .lobytes $cfe3 + .lobytes $cfe4 + .lobytes $cfe5 + .lobytes $cfe6 + .lobytes $cfe7 + .lobytes $cfe8 + .lobytes $cfe9 + .lobytes $cfea + .lobytes $cfeb + .lobytes $cfec + .lobytes $cfed + .lobytes $cfee + .lobytes $cfef + .lobytes $cff0 + .lobytes $cff1 + .lobytes $cff2 + .lobytes $cff3 + .lobytes $cff4 + .lobytes $cff5 + .lobytes $cff6 + .lobytes $cff7 + .lobytes $cff8 + .lobytes $cff9 + .lobytes $cffa + .lobytes $cffb + .lobytes $cffc + .lobytes $cffd + .lobytes $cffe + .lobytes $cfff + .lobytes $d000 + .lobytes $d001 + .lobytes $d002 + .lobytes $d003 + .lobytes $d004 + .lobytes $d005 + .lobytes $d006 + .lobytes $d007 + .lobytes $d008 + .lobytes $d009 + .lobytes $d00a + .lobytes $d00b + .lobytes $d00c + .lobytes $d00d + .lobytes $d00e + .lobytes $d00f + .lobytes $dfe1 + .lobytes $dfe2 + .lobytes $dfe3 + .lobytes $dfe4 + .lobytes $dfe5 + .lobytes $dfe6 + .lobytes $dfe7 + .lobytes $dfe8 + .lobytes $dfe9 + .lobytes $dfea + .lobytes $dfeb + .lobytes $dfec + .lobytes $dfed + .lobytes $dfee + .lobytes $dfef + .lobytes $dff0 + .lobytes $dff1 + .lobytes $dff2 + .lobytes $dff3 + .lobytes $dff4 + .lobytes $dff5 + .lobytes $dff6 + .lobytes $dff7 + .lobytes $dff8 + .lobytes $dff9 + .lobytes $dffa + .lobytes $dffb + .lobytes $dffc + .lobytes $dffd + .lobytes $dffe + .lobytes $dfff + .lobytes $e000 + .lobytes $e001 + .lobytes $e002 + .lobytes $e003 + .lobytes $e004 + .lobytes $e005 + .lobytes $e006 + .lobytes $e007 + .lobytes $e008 + .lobytes $e009 + .lobytes $e00a + .lobytes $e00b + .lobytes $e00c + .lobytes $e00d + .lobytes $e00e + .lobytes $e00f + .lobytes $efe1 + .lobytes $efe2 + .lobytes $efe3 + .lobytes $efe4 + .lobytes $efe5 + .lobytes $efe6 + .lobytes $efe7 + .lobytes $efe8 + .lobytes $efe9 + .lobytes $efea + .lobytes $efeb + .lobytes $efec + .lobytes $efed + .lobytes $efee + .lobytes $efef + .lobytes $eff0 + .lobytes $eff1 + .lobytes $eff2 + .lobytes $eff3 + .lobytes $eff4 + .lobytes $eff5 + .lobytes $eff6 + .lobytes $eff7 + .lobytes $eff8 + .lobytes $eff9 + .lobytes $effa + .lobytes $effb + .lobytes $effc + .lobytes $effd + .lobytes $effe + .lobytes $efff + .lobytes $f000 + .lobytes $f001 + .lobytes $f002 + .lobytes $f003 + .lobytes $f004 + .lobytes $f005 + .lobytes $f006 + .lobytes $f007 + .lobytes $f008 + .lobytes $f009 + .lobytes $f00a + .lobytes $f00b + .lobytes $f00c + .lobytes $f00d + .lobytes $f00e + .lobytes $f00f + .lobytes $ffe1 + .lobytes $ffe2 + .lobytes $ffe3 + .lobytes $ffe4 + .lobytes $ffe5 + .lobytes $ffe6 + .lobytes $ffe7 + .lobytes $ffe8 + .lobytes $ffe9 + .lobytes $ffea + .lobytes $ffeb + .lobytes $ffec + .lobytes $ffed + .lobytes $ffee + .lobytes $ffef + .lobytes $fff0 + .lobytes $fff1 + .lobytes $fff2 + .lobytes $fff3 + .lobytes $fff4 + .lobytes $fff5 + .lobytes $fff6 + .lobytes $fff7 + .lobytes $fff8 + .lobytes $fff9 + .lobytes $fffa + .lobytes $fffb + .lobytes $fffc + .lobytes $fffd + .lobytes $fffe + .lobytes $ffff + + ; hex values, uppercase + .lobytes $0 + .lobytes $1 + .lobytes $2 + .lobytes $3 + .lobytes $4 + .lobytes $5 + .lobytes $6 + .lobytes $7 + .lobytes $8 + .lobytes $9 + .lobytes $A + .lobytes $B + .lobytes $C + .lobytes $D + .lobytes $E + .lobytes $F + .lobytes $10 + .lobytes $11 + .lobytes $12 + .lobytes $13 + .lobytes $70 + .lobytes $71 + .lobytes $72 + .lobytes $73 + .lobytes $74 + .lobytes $75 + .lobytes $76 + .lobytes $77 + .lobytes $78 + .lobytes $79 + .lobytes $7A + .lobytes $7B + .lobytes $7C + .lobytes $7D + .lobytes $7E + .lobytes $7F + .lobytes $80 + .lobytes $81 + .lobytes $82 + .lobytes $83 + .lobytes $84 + .lobytes $85 + .lobytes $86 + .lobytes $F0 + .lobytes $F1 + .lobytes $F2 + .lobytes $F3 + .lobytes $F4 + .lobytes $F5 + .lobytes $F6 + .lobytes $F7 + .lobytes $F8 + .lobytes $F9 + .lobytes $FA + .lobytes $FB + .lobytes $FC + .lobytes $FD + .lobytes $FE + .lobytes $FF + .lobytes $100 + .lobytes $101 + .lobytes $102 + .lobytes $103 + .lobytes $FD2 + .lobytes $FD3 + .lobytes $FD4 + .lobytes $FD5 + .lobytes $FD6 + .lobytes $FD7 + .lobytes $FD8 + .lobytes $FD9 + .lobytes $FDA + .lobytes $FDB + .lobytes $FDC + .lobytes $FDD + .lobytes $FDE + .lobytes $FDF + .lobytes $FE0 + .lobytes $FE1 + .lobytes $FE2 + .lobytes $FE3 + .lobytes $FE4 + .lobytes $FE5 + .lobytes $FE6 + .lobytes $FE7 + .lobytes $FE8 + .lobytes $FE9 + .lobytes $FEA + .lobytes $FEB + .lobytes $FEC + .lobytes $FED + .lobytes $FEE + .lobytes $FEF + .lobytes $FF0 + .lobytes $FF1 + .lobytes $FF2 + .lobytes $FF3 + .lobytes $FF4 + .lobytes $FF5 + .lobytes $FF6 + .lobytes $FF7 + .lobytes $FF8 + .lobytes $FF9 + .lobytes $FFA + .lobytes $FFB + .lobytes $FFC + .lobytes $FFD + .lobytes $FFE + .lobytes $FFF + .lobytes $1000 + .lobytes $1001 + .lobytes $1002 + .lobytes $1003 + .lobytes $1004 + .lobytes $1005 + .lobytes $1006 + .lobytes $1007 + .lobytes $1008 + .lobytes $7FF0 + .lobytes $7FF1 + .lobytes $7FF2 + .lobytes $7FF3 + .lobytes $7FF4 + .lobytes $7FF5 + .lobytes $7FF6 + .lobytes $7FF7 + .lobytes $7FF8 + .lobytes $7FF9 + .lobytes $7FFA + .lobytes $7FFB + .lobytes $7FFC + .lobytes $7FFD + .lobytes $7FFE + .lobytes $7FFF + .lobytes $8000 + .lobytes $8001 + .lobytes $8002 + .lobytes $8003 + .lobytes $8004 + .lobytes $8005 + .lobytes $8006 + .lobytes $8007 + .lobytes $8008 + .lobytes $8009 + .lobytes $800A + .lobytes $800B + .lobytes $9FE1 + .lobytes $9FE2 + .lobytes $9FE3 + .lobytes $9FE4 + .lobytes $9FE5 + .lobytes $9FE6 + .lobytes $9FE7 + .lobytes $9FE8 + .lobytes $9FE9 + .lobytes $9FEA + .lobytes $9FEB + .lobytes $9FEC + .lobytes $9FED + .lobytes $9FEE + .lobytes $9FEF + .lobytes $9FF0 + .lobytes $9FF1 + .lobytes $9FF2 + .lobytes $9FF3 + .lobytes $9FF4 + .lobytes $9FF5 + .lobytes $9FF6 + .lobytes $9FF7 + .lobytes $9FF8 + .lobytes $9FF9 + .lobytes $9FFA + .lobytes $9FFB + .lobytes $9FFC + .lobytes $9FFD + .lobytes $9FFE + .lobytes $9FFF + .lobytes $A000 + .lobytes $A001 + .lobytes $A002 + .lobytes $A003 + .lobytes $A004 + .lobytes $A005 + .lobytes $A006 + .lobytes $A007 + .lobytes $A008 + .lobytes $A009 + .lobytes $A00A + .lobytes $A00B + .lobytes $A00C + .lobytes $A00D + .lobytes $A00E + .lobytes $A00F + .lobytes $AFE1 + .lobytes $AFE2 + .lobytes $AFE3 + .lobytes $AFE4 + .lobytes $AFE5 + .lobytes $AFE6 + .lobytes $AFE7 + .lobytes $AFE8 + .lobytes $AFE9 + .lobytes $AFEA + .lobytes $AFEB + .lobytes $AFEC + .lobytes $AFED + .lobytes $AFEE + .lobytes $AFEF + .lobytes $AFF0 + .lobytes $AFF1 + .lobytes $AFF2 + .lobytes $AFF3 + .lobytes $AFF4 + .lobytes $AFF5 + .lobytes $AFF6 + .lobytes $AFF7 + .lobytes $AFF8 + .lobytes $AFF9 + .lobytes $AFFA + .lobytes $AFFB + .lobytes $AFFC + .lobytes $AFFD + .lobytes $AFFE + .lobytes $AFFF + .lobytes $B000 + .lobytes $B001 + .lobytes $B002 + .lobytes $B003 + .lobytes $B004 + .lobytes $B005 + .lobytes $B006 + .lobytes $B007 + .lobytes $B008 + .lobytes $B009 + .lobytes $B00A + .lobytes $B00B + .lobytes $B00C + .lobytes $B00D + .lobytes $B00E + .lobytes $B00F + .lobytes $BFE1 + .lobytes $BFE2 + .lobytes $BFE3 + .lobytes $BFE4 + .lobytes $BFE5 + .lobytes $BFE6 + .lobytes $BFE7 + .lobytes $BFE8 + .lobytes $BFE9 + .lobytes $BFEA + .lobytes $BFEB + .lobytes $BFEC + .lobytes $BFED + .lobytes $BFEE + .lobytes $BFEF + .lobytes $BFF0 + .lobytes $BFF1 + .lobytes $BFF2 + .lobytes $BFF3 + .lobytes $BFF4 + .lobytes $BFF5 + .lobytes $BFF6 + .lobytes $BFF7 + .lobytes $BFF8 + .lobytes $BFF9 + .lobytes $BFFA + .lobytes $BFFB + .lobytes $BFFC + .lobytes $BFFD + .lobytes $BFFE + .lobytes $BFFF + .lobytes $C000 + .lobytes $C001 + .lobytes $C002 + .lobytes $C003 + .lobytes $C004 + .lobytes $C005 + .lobytes $C006 + .lobytes $C007 + .lobytes $C008 + .lobytes $C009 + .lobytes $C00A + .lobytes $C00B + .lobytes $C00C + .lobytes $C00D + .lobytes $C00E + .lobytes $C00F + .lobytes $CFE1 + .lobytes $CFE2 + .lobytes $CFE3 + .lobytes $CFE4 + .lobytes $CFE5 + .lobytes $CFE6 + .lobytes $CFE7 + .lobytes $CFE8 + .lobytes $CFE9 + .lobytes $CFEA + .lobytes $CFEB + .lobytes $CFEC + .lobytes $CFED + .lobytes $CFEE + .lobytes $CFEF + .lobytes $CFF0 + .lobytes $CFF1 + .lobytes $CFF2 + .lobytes $CFF3 + .lobytes $CFF4 + .lobytes $CFF5 + .lobytes $CFF6 + .lobytes $CFF7 + .lobytes $CFF8 + .lobytes $CFF9 + .lobytes $CFFA + .lobytes $CFFB + .lobytes $CFFC + .lobytes $CFFD + .lobytes $CFFE + .lobytes $CFFF + .lobytes $D000 + .lobytes $D001 + .lobytes $D002 + .lobytes $D003 + .lobytes $D004 + .lobytes $D005 + .lobytes $D006 + .lobytes $D007 + .lobytes $D008 + .lobytes $D009 + .lobytes $D00A + .lobytes $D00B + .lobytes $D00C + .lobytes $D00D + .lobytes $D00E + .lobytes $D00F + .lobytes $DFE1 + .lobytes $DFE2 + .lobytes $DFE3 + .lobytes $DFE4 + .lobytes $DFE5 + .lobytes $DFE6 + .lobytes $DFE7 + .lobytes $DFE8 + .lobytes $DFE9 + .lobytes $DFEA + .lobytes $DFEB + .lobytes $DFEC + .lobytes $DFED + .lobytes $DFEE + .lobytes $DFEF + .lobytes $DFF0 + .lobytes $DFF1 + .lobytes $DFF2 + .lobytes $DFF3 + .lobytes $DFF4 + .lobytes $DFF5 + .lobytes $DFF6 + .lobytes $DFF7 + .lobytes $DFF8 + .lobytes $DFF9 + .lobytes $DFFA + .lobytes $DFFB + .lobytes $DFFC + .lobytes $DFFD + .lobytes $DFFE + .lobytes $DFFF + .lobytes $E000 + .lobytes $E001 + .lobytes $E002 + .lobytes $E003 + .lobytes $E004 + .lobytes $E005 + .lobytes $E006 + .lobytes $E007 + .lobytes $E008 + .lobytes $E009 + .lobytes $E00A + .lobytes $E00B + .lobytes $E00C + .lobytes $E00D + .lobytes $E00E + .lobytes $E00F + .lobytes $EFE1 + .lobytes $EFE2 + .lobytes $EFE3 + .lobytes $EFE4 + .lobytes $EFE5 + .lobytes $EFE6 + .lobytes $EFE7 + .lobytes $EFE8 + .lobytes $EFE9 + .lobytes $EFEA + .lobytes $EFEB + .lobytes $EFEC + .lobytes $EFED + .lobytes $EFEE + .lobytes $EFEF + .lobytes $EFF0 + .lobytes $EFF1 + .lobytes $EFF2 + .lobytes $EFF3 + .lobytes $EFF4 + .lobytes $EFF5 + .lobytes $EFF6 + .lobytes $EFF7 + .lobytes $EFF8 + .lobytes $EFF9 + .lobytes $EFFA + .lobytes $EFFB + .lobytes $EFFC + .lobytes $EFFD + .lobytes $EFFE + .lobytes $EFFF + .lobytes $F000 + .lobytes $F001 + .lobytes $F002 + .lobytes $F003 + .lobytes $F004 + .lobytes $F005 + .lobytes $F006 + .lobytes $F007 + .lobytes $F008 + .lobytes $F009 + .lobytes $F00A + .lobytes $F00B + .lobytes $F00C + .lobytes $F00D + .lobytes $F00E + .lobytes $F00F + .lobytes $FFE1 + .lobytes $FFE2 + .lobytes $FFE3 + .lobytes $FFE4 + .lobytes $FFE5 + .lobytes $FFE6 + .lobytes $FFE7 + .lobytes $FFE8 + .lobytes $FFE9 + .lobytes $FFEA + .lobytes $FFEB + .lobytes $FFEC + .lobytes $FFED + .lobytes $FFEE + .lobytes $FFEF + .lobytes $FFF0 + .lobytes $FFF1 + .lobytes $FFF2 + .lobytes $FFF3 + .lobytes $FFF4 + .lobytes $FFF5 + .lobytes $FFF6 + .lobytes $FFF7 + .lobytes $FFF8 + .lobytes $FFF9 + .lobytes $FFFA + .lobytes $FFFB + .lobytes $FFFC + .lobytes $FFFD + .lobytes $FFFE + .lobytes $FFFF + + ; 4-digit hex values + .lobytes $0000 + .lobytes $0001 + .lobytes $0002 + .lobytes $0003 + .lobytes $0004 + .lobytes $0005 + .lobytes $0006 + .lobytes $0007 + .lobytes $0008 + .lobytes $0009 + .lobytes $000a + .lobytes $000b + .lobytes $000c + .lobytes $000d + .lobytes $000e + .lobytes $000f + .lobytes $0010 + .lobytes $0011 + .lobytes $0012 + .lobytes $0013 + .lobytes $0070 + .lobytes $0071 + .lobytes $0072 + .lobytes $0073 + .lobytes $0074 + .lobytes $0075 + .lobytes $0076 + .lobytes $0077 + .lobytes $0078 + .lobytes $0079 + .lobytes $007a + .lobytes $007b + .lobytes $007c + .lobytes $007d + .lobytes $007e + .lobytes $007f + .lobytes $0080 + .lobytes $0081 + .lobytes $0082 + .lobytes $0083 + .lobytes $0084 + .lobytes $0085 + .lobytes $0086 + .lobytes $00f0 + .lobytes $00f1 + .lobytes $00f2 + .lobytes $00f3 + .lobytes $00f4 + .lobytes $00f5 + .lobytes $00f6 + .lobytes $00f7 + .lobytes $00f8 + .lobytes $00f9 + .lobytes $00fa + .lobytes $00fb + .lobytes $00fc + .lobytes $00fd + .lobytes $00fe + .lobytes $00ff + .lobytes $0100 + .lobytes $0101 + .lobytes $0102 + .lobytes $0103 + .lobytes $0fd2 + .lobytes $0fd3 + .lobytes $0fd4 + .lobytes $0fd5 + .lobytes $0fd6 + .lobytes $0fd7 + .lobytes $0fd8 + .lobytes $0fd9 + .lobytes $0fda + .lobytes $0fdb + .lobytes $0fdc + .lobytes $0fdd + .lobytes $0fde + .lobytes $0fdf + .lobytes $0fe0 + .lobytes $0fe1 + .lobytes $0fe2 + .lobytes $0fe3 + .lobytes $0fe4 + .lobytes $0fe5 + .lobytes $0fe6 + .lobytes $0fe7 + .lobytes $0fe8 + .lobytes $0fe9 + .lobytes $0fea + .lobytes $0feb + .lobytes $0fec + .lobytes $0fed + .lobytes $0fee + .lobytes $0fef + .lobytes $0ff0 + .lobytes $0ff1 + .lobytes $0ff2 + .lobytes $0ff3 + .lobytes $0ff4 + .lobytes $0ff5 + .lobytes $0ff6 + .lobytes $0ff7 + .lobytes $0ff8 + .lobytes $0ff9 + .lobytes $0ffa + .lobytes $0ffb + .lobytes $0ffc + .lobytes $0ffd + .lobytes $0ffe + .lobytes $0fff + .lobytes $1000 + .lobytes $1001 + .lobytes $1002 + .lobytes $1003 + .lobytes $1004 + .lobytes $1005 + .lobytes $1006 + .lobytes $1007 + .lobytes $1008 + .lobytes $7ff0 + .lobytes $7ff1 + .lobytes $7ff2 + .lobytes $7ff3 + .lobytes $7ff4 + .lobytes $7ff5 + .lobytes $7ff6 + .lobytes $7ff7 + .lobytes $7ff8 + .lobytes $7ff9 + .lobytes $7ffa + .lobytes $7ffb + .lobytes $7ffc + .lobytes $7ffd + .lobytes $7ffe + .lobytes $7fff + .lobytes $8000 + .lobytes $8001 + .lobytes $8002 + .lobytes $8003 + .lobytes $8004 + .lobytes $8005 + .lobytes $8006 + .lobytes $8007 + .lobytes $8008 + .lobytes $8009 + .lobytes $800a + .lobytes $800b + .lobytes $9fe1 + .lobytes $9fe2 + .lobytes $9fe3 + .lobytes $9fe4 + .lobytes $9fe5 + .lobytes $9fe6 + .lobytes $9fe7 + .lobytes $9fe8 + .lobytes $9fe9 + .lobytes $9fea + .lobytes $9feb + .lobytes $9fec + .lobytes $9fed + .lobytes $9fee + .lobytes $9fef + .lobytes $9ff0 + .lobytes $9ff1 + .lobytes $9ff2 + .lobytes $9ff3 + .lobytes $9ff4 + .lobytes $9ff5 + .lobytes $9ff6 + .lobytes $9ff7 + .lobytes $9ff8 + .lobytes $9ff9 + .lobytes $9ffa + .lobytes $9ffb + .lobytes $9ffc + .lobytes $9ffd + .lobytes $9ffe + .lobytes $9fff + .lobytes $a000 + .lobytes $a001 + .lobytes $a002 + .lobytes $a003 + .lobytes $a004 + .lobytes $a005 + .lobytes $a006 + .lobytes $a007 + .lobytes $a008 + .lobytes $a009 + .lobytes $a00a + .lobytes $a00b + .lobytes $a00c + .lobytes $a00d + .lobytes $a00e + .lobytes $a00f + .lobytes $afe1 + .lobytes $afe2 + .lobytes $afe3 + .lobytes $afe4 + .lobytes $afe5 + .lobytes $afe6 + .lobytes $afe7 + .lobytes $afe8 + .lobytes $afe9 + .lobytes $afea + .lobytes $afeb + .lobytes $afec + .lobytes $afed + .lobytes $afee + .lobytes $afef + .lobytes $aff0 + .lobytes $aff1 + .lobytes $aff2 + .lobytes $aff3 + .lobytes $aff4 + .lobytes $aff5 + .lobytes $aff6 + .lobytes $aff7 + .lobytes $aff8 + .lobytes $aff9 + .lobytes $affa + .lobytes $affb + .lobytes $affc + .lobytes $affd + .lobytes $affe + .lobytes $afff + .lobytes $b000 + .lobytes $b001 + .lobytes $b002 + .lobytes $b003 + .lobytes $b004 + .lobytes $b005 + .lobytes $b006 + .lobytes $b007 + .lobytes $b008 + .lobytes $b009 + .lobytes $b00a + .lobytes $b00b + .lobytes $b00c + .lobytes $b00d + .lobytes $b00e + .lobytes $b00f + .lobytes $bfe1 + .lobytes $bfe2 + .lobytes $bfe3 + .lobytes $bfe4 + .lobytes $bfe5 + .lobytes $bfe6 + .lobytes $bfe7 + .lobytes $bfe8 + .lobytes $bfe9 + .lobytes $bfea + .lobytes $bfeb + .lobytes $bfec + .lobytes $bfed + .lobytes $bfee + .lobytes $bfef + .lobytes $bff0 + .lobytes $bff1 + .lobytes $bff2 + .lobytes $bff3 + .lobytes $bff4 + .lobytes $bff5 + .lobytes $bff6 + .lobytes $bff7 + .lobytes $bff8 + .lobytes $bff9 + .lobytes $bffa + .lobytes $bffb + .lobytes $bffc + .lobytes $bffd + .lobytes $bffe + .lobytes $bfff + .lobytes $c000 + .lobytes $c001 + .lobytes $c002 + .lobytes $c003 + .lobytes $c004 + .lobytes $c005 + .lobytes $c006 + .lobytes $c007 + .lobytes $c008 + .lobytes $c009 + .lobytes $c00a + .lobytes $c00b + .lobytes $c00c + .lobytes $c00d + .lobytes $c00e + .lobytes $c00f + .lobytes $cfe1 + .lobytes $cfe2 + .lobytes $cfe3 + .lobytes $cfe4 + .lobytes $cfe5 + .lobytes $cfe6 + .lobytes $cfe7 + .lobytes $cfe8 + .lobytes $cfe9 + .lobytes $cfea + .lobytes $cfeb + .lobytes $cfec + .lobytes $cfed + .lobytes $cfee + .lobytes $cfef + .lobytes $cff0 + .lobytes $cff1 + .lobytes $cff2 + .lobytes $cff3 + .lobytes $cff4 + .lobytes $cff5 + .lobytes $cff6 + .lobytes $cff7 + .lobytes $cff8 + .lobytes $cff9 + .lobytes $cffa + .lobytes $cffb + .lobytes $cffc + .lobytes $cffd + .lobytes $cffe + .lobytes $cfff + .lobytes $d000 + .lobytes $d001 + .lobytes $d002 + .lobytes $d003 + .lobytes $d004 + .lobytes $d005 + .lobytes $d006 + .lobytes $d007 + .lobytes $d008 + .lobytes $d009 + .lobytes $d00a + .lobytes $d00b + .lobytes $d00c + .lobytes $d00d + .lobytes $d00e + .lobytes $d00f + .lobytes $dfe1 + .lobytes $dfe2 + .lobytes $dfe3 + .lobytes $dfe4 + .lobytes $dfe5 + .lobytes $dfe6 + .lobytes $dfe7 + .lobytes $dfe8 + .lobytes $dfe9 + .lobytes $dfea + .lobytes $dfeb + .lobytes $dfec + .lobytes $dfed + .lobytes $dfee + .lobytes $dfef + .lobytes $dff0 + .lobytes $dff1 + .lobytes $dff2 + .lobytes $dff3 + .lobytes $dff4 + .lobytes $dff5 + .lobytes $dff6 + .lobytes $dff7 + .lobytes $dff8 + .lobytes $dff9 + .lobytes $dffa + .lobytes $dffb + .lobytes $dffc + .lobytes $dffd + .lobytes $dffe + .lobytes $dfff + .lobytes $e000 + .lobytes $e001 + .lobytes $e002 + .lobytes $e003 + .lobytes $e004 + .lobytes $e005 + .lobytes $e006 + .lobytes $e007 + .lobytes $e008 + .lobytes $e009 + .lobytes $e00a + .lobytes $e00b + .lobytes $e00c + .lobytes $e00d + .lobytes $e00e + .lobytes $e00f + .lobytes $efe1 + .lobytes $efe2 + .lobytes $efe3 + .lobytes $efe4 + .lobytes $efe5 + .lobytes $efe6 + .lobytes $efe7 + .lobytes $efe8 + .lobytes $efe9 + .lobytes $efea + .lobytes $efeb + .lobytes $efec + .lobytes $efed + .lobytes $efee + .lobytes $efef + .lobytes $eff0 + .lobytes $eff1 + .lobytes $eff2 + .lobytes $eff3 + .lobytes $eff4 + .lobytes $eff5 + .lobytes $eff6 + .lobytes $eff7 + .lobytes $eff8 + .lobytes $eff9 + .lobytes $effa + .lobytes $effb + .lobytes $effc + .lobytes $effd + .lobytes $effe + .lobytes $efff + .lobytes $f000 + .lobytes $f001 + .lobytes $f002 + .lobytes $f003 + .lobytes $f004 + .lobytes $f005 + .lobytes $f006 + .lobytes $f007 + .lobytes $f008 + .lobytes $f009 + .lobytes $f00a + .lobytes $f00b + .lobytes $f00c + .lobytes $f00d + .lobytes $f00e + .lobytes $f00f + .lobytes $ffe1 + .lobytes $ffe2 + .lobytes $ffe3 + .lobytes $ffe4 + .lobytes $ffe5 + .lobytes $ffe6 + .lobytes $ffe7 + .lobytes $ffe8 + .lobytes $ffe9 + .lobytes $ffea + .lobytes $ffeb + .lobytes $ffec + .lobytes $ffed + .lobytes $ffee + .lobytes $ffef + .lobytes $fff0 + .lobytes $fff1 + .lobytes $fff2 + .lobytes $fff3 + .lobytes $fff4 + .lobytes $fff5 + .lobytes $fff6 + .lobytes $fff7 + .lobytes $fff8 + .lobytes $fff9 + .lobytes $fffa + .lobytes $fffb + .lobytes $fffc + .lobytes $fffd + .lobytes $fffe + .lobytes $ffff + + ; 4-digit hex values, uppercase + .lobytes $0000 + .lobytes $0001 + .lobytes $0002 + .lobytes $0003 + .lobytes $0004 + .lobytes $0005 + .lobytes $0006 + .lobytes $0007 + .lobytes $0008 + .lobytes $0009 + .lobytes $000A + .lobytes $000B + .lobytes $000C + .lobytes $000D + .lobytes $000E + .lobytes $000F + .lobytes $0010 + .lobytes $0011 + .lobytes $0012 + .lobytes $0013 + .lobytes $0070 + .lobytes $0071 + .lobytes $0072 + .lobytes $0073 + .lobytes $0074 + .lobytes $0075 + .lobytes $0076 + .lobytes $0077 + .lobytes $0078 + .lobytes $0079 + .lobytes $007A + .lobytes $007B + .lobytes $007C + .lobytes $007D + .lobytes $007E + .lobytes $007F + .lobytes $0080 + .lobytes $0081 + .lobytes $0082 + .lobytes $0083 + .lobytes $0084 + .lobytes $0085 + .lobytes $0086 + .lobytes $00F0 + .lobytes $00F1 + .lobytes $00F2 + .lobytes $00F3 + .lobytes $00F4 + .lobytes $00F5 + .lobytes $00F6 + .lobytes $00F7 + .lobytes $00F8 + .lobytes $00F9 + .lobytes $00FA + .lobytes $00FB + .lobytes $00FC + .lobytes $00FD + .lobytes $00FE + .lobytes $00FF + .lobytes $0100 + .lobytes $0101 + .lobytes $0102 + .lobytes $0103 + .lobytes $0FD2 + .lobytes $0FD3 + .lobytes $0FD4 + .lobytes $0FD5 + .lobytes $0FD6 + .lobytes $0FD7 + .lobytes $0FD8 + .lobytes $0FD9 + .lobytes $0FDA + .lobytes $0FDB + .lobytes $0FDC + .lobytes $0FDD + .lobytes $0FDE + .lobytes $0FDF + .lobytes $0FE0 + .lobytes $0FE1 + .lobytes $0FE2 + .lobytes $0FE3 + .lobytes $0FE4 + .lobytes $0FE5 + .lobytes $0FE6 + .lobytes $0FE7 + .lobytes $0FE8 + .lobytes $0FE9 + .lobytes $0FEA + .lobytes $0FEB + .lobytes $0FEC + .lobytes $0FED + .lobytes $0FEE + .lobytes $0FEF + .lobytes $0FF0 + .lobytes $0FF1 + .lobytes $0FF2 + .lobytes $0FF3 + .lobytes $0FF4 + .lobytes $0FF5 + .lobytes $0FF6 + .lobytes $0FF7 + .lobytes $0FF8 + .lobytes $0FF9 + .lobytes $0FFA + .lobytes $0FFB + .lobytes $0FFC + .lobytes $0FFD + .lobytes $0FFE + .lobytes $0FFF + .lobytes $1000 + .lobytes $1001 + .lobytes $1002 + .lobytes $1003 + .lobytes $1004 + .lobytes $1005 + .lobytes $1006 + .lobytes $1007 + .lobytes $1008 + .lobytes $7FF0 + .lobytes $7FF1 + .lobytes $7FF2 + .lobytes $7FF3 + .lobytes $7FF4 + .lobytes $7FF5 + .lobytes $7FF6 + .lobytes $7FF7 + .lobytes $7FF8 + .lobytes $7FF9 + .lobytes $7FFA + .lobytes $7FFB + .lobytes $7FFC + .lobytes $7FFD + .lobytes $7FFE + .lobytes $7FFF + .lobytes $8000 + .lobytes $8001 + .lobytes $8002 + .lobytes $8003 + .lobytes $8004 + .lobytes $8005 + .lobytes $8006 + .lobytes $8007 + .lobytes $8008 + .lobytes $8009 + .lobytes $800A + .lobytes $800B + .lobytes $9FE1 + .lobytes $9FE2 + .lobytes $9FE3 + .lobytes $9FE4 + .lobytes $9FE5 + .lobytes $9FE6 + .lobytes $9FE7 + .lobytes $9FE8 + .lobytes $9FE9 + .lobytes $9FEA + .lobytes $9FEB + .lobytes $9FEC + .lobytes $9FED + .lobytes $9FEE + .lobytes $9FEF + .lobytes $9FF0 + .lobytes $9FF1 + .lobytes $9FF2 + .lobytes $9FF3 + .lobytes $9FF4 + .lobytes $9FF5 + .lobytes $9FF6 + .lobytes $9FF7 + .lobytes $9FF8 + .lobytes $9FF9 + .lobytes $9FFA + .lobytes $9FFB + .lobytes $9FFC + .lobytes $9FFD + .lobytes $9FFE + .lobytes $9FFF + .lobytes $A000 + .lobytes $A001 + .lobytes $A002 + .lobytes $A003 + .lobytes $A004 + .lobytes $A005 + .lobytes $A006 + .lobytes $A007 + .lobytes $A008 + .lobytes $A009 + .lobytes $A00A + .lobytes $A00B + .lobytes $A00C + .lobytes $A00D + .lobytes $A00E + .lobytes $A00F + .lobytes $AFE1 + .lobytes $AFE2 + .lobytes $AFE3 + .lobytes $AFE4 + .lobytes $AFE5 + .lobytes $AFE6 + .lobytes $AFE7 + .lobytes $AFE8 + .lobytes $AFE9 + .lobytes $AFEA + .lobytes $AFEB + .lobytes $AFEC + .lobytes $AFED + .lobytes $AFEE + .lobytes $AFEF + .lobytes $AFF0 + .lobytes $AFF1 + .lobytes $AFF2 + .lobytes $AFF3 + .lobytes $AFF4 + .lobytes $AFF5 + .lobytes $AFF6 + .lobytes $AFF7 + .lobytes $AFF8 + .lobytes $AFF9 + .lobytes $AFFA + .lobytes $AFFB + .lobytes $AFFC + .lobytes $AFFD + .lobytes $AFFE + .lobytes $AFFF + .lobytes $B000 + .lobytes $B001 + .lobytes $B002 + .lobytes $B003 + .lobytes $B004 + .lobytes $B005 + .lobytes $B006 + .lobytes $B007 + .lobytes $B008 + .lobytes $B009 + .lobytes $B00A + .lobytes $B00B + .lobytes $B00C + .lobytes $B00D + .lobytes $B00E + .lobytes $B00F + .lobytes $BFE1 + .lobytes $BFE2 + .lobytes $BFE3 + .lobytes $BFE4 + .lobytes $BFE5 + .lobytes $BFE6 + .lobytes $BFE7 + .lobytes $BFE8 + .lobytes $BFE9 + .lobytes $BFEA + .lobytes $BFEB + .lobytes $BFEC + .lobytes $BFED + .lobytes $BFEE + .lobytes $BFEF + .lobytes $BFF0 + .lobytes $BFF1 + .lobytes $BFF2 + .lobytes $BFF3 + .lobytes $BFF4 + .lobytes $BFF5 + .lobytes $BFF6 + .lobytes $BFF7 + .lobytes $BFF8 + .lobytes $BFF9 + .lobytes $BFFA + .lobytes $BFFB + .lobytes $BFFC + .lobytes $BFFD + .lobytes $BFFE + .lobytes $BFFF + .lobytes $C000 + .lobytes $C001 + .lobytes $C002 + .lobytes $C003 + .lobytes $C004 + .lobytes $C005 + .lobytes $C006 + .lobytes $C007 + .lobytes $C008 + .lobytes $C009 + .lobytes $C00A + .lobytes $C00B + .lobytes $C00C + .lobytes $C00D + .lobytes $C00E + .lobytes $C00F + .lobytes $CFE1 + .lobytes $CFE2 + .lobytes $CFE3 + .lobytes $CFE4 + .lobytes $CFE5 + .lobytes $CFE6 + .lobytes $CFE7 + .lobytes $CFE8 + .lobytes $CFE9 + .lobytes $CFEA + .lobytes $CFEB + .lobytes $CFEC + .lobytes $CFED + .lobytes $CFEE + .lobytes $CFEF + .lobytes $CFF0 + .lobytes $CFF1 + .lobytes $CFF2 + .lobytes $CFF3 + .lobytes $CFF4 + .lobytes $CFF5 + .lobytes $CFF6 + .lobytes $CFF7 + .lobytes $CFF8 + .lobytes $CFF9 + .lobytes $CFFA + .lobytes $CFFB + .lobytes $CFFC + .lobytes $CFFD + .lobytes $CFFE + .lobytes $CFFF + .lobytes $D000 + .lobytes $D001 + .lobytes $D002 + .lobytes $D003 + .lobytes $D004 + .lobytes $D005 + .lobytes $D006 + .lobytes $D007 + .lobytes $D008 + .lobytes $D009 + .lobytes $D00A + .lobytes $D00B + .lobytes $D00C + .lobytes $D00D + .lobytes $D00E + .lobytes $D00F + .lobytes $DFE1 + .lobytes $DFE2 + .lobytes $DFE3 + .lobytes $DFE4 + .lobytes $DFE5 + .lobytes $DFE6 + .lobytes $DFE7 + .lobytes $DFE8 + .lobytes $DFE9 + .lobytes $DFEA + .lobytes $DFEB + .lobytes $DFEC + .lobytes $DFED + .lobytes $DFEE + .lobytes $DFEF + .lobytes $DFF0 + .lobytes $DFF1 + .lobytes $DFF2 + .lobytes $DFF3 + .lobytes $DFF4 + .lobytes $DFF5 + .lobytes $DFF6 + .lobytes $DFF7 + .lobytes $DFF8 + .lobytes $DFF9 + .lobytes $DFFA + .lobytes $DFFB + .lobytes $DFFC + .lobytes $DFFD + .lobytes $DFFE + .lobytes $DFFF + .lobytes $E000 + .lobytes $E001 + .lobytes $E002 + .lobytes $E003 + .lobytes $E004 + .lobytes $E005 + .lobytes $E006 + .lobytes $E007 + .lobytes $E008 + .lobytes $E009 + .lobytes $E00A + .lobytes $E00B + .lobytes $E00C + .lobytes $E00D + .lobytes $E00E + .lobytes $E00F + .lobytes $EFE1 + .lobytes $EFE2 + .lobytes $EFE3 + .lobytes $EFE4 + .lobytes $EFE5 + .lobytes $EFE6 + .lobytes $EFE7 + .lobytes $EFE8 + .lobytes $EFE9 + .lobytes $EFEA + .lobytes $EFEB + .lobytes $EFEC + .lobytes $EFED + .lobytes $EFEE + .lobytes $EFEF + .lobytes $EFF0 + .lobytes $EFF1 + .lobytes $EFF2 + .lobytes $EFF3 + .lobytes $EFF4 + .lobytes $EFF5 + .lobytes $EFF6 + .lobytes $EFF7 + .lobytes $EFF8 + .lobytes $EFF9 + .lobytes $EFFA + .lobytes $EFFB + .lobytes $EFFC + .lobytes $EFFD + .lobytes $EFFE + .lobytes $EFFF + .lobytes $F000 + .lobytes $F001 + .lobytes $F002 + .lobytes $F003 + .lobytes $F004 + .lobytes $F005 + .lobytes $F006 + .lobytes $F007 + .lobytes $F008 + .lobytes $F009 + .lobytes $F00A + .lobytes $F00B + .lobytes $F00C + .lobytes $F00D + .lobytes $F00E + .lobytes $F00F + .lobytes $FFE1 + .lobytes $FFE2 + .lobytes $FFE3 + .lobytes $FFE4 + .lobytes $FFE5 + .lobytes $FFE6 + .lobytes $FFE7 + .lobytes $FFE8 + .lobytes $FFE9 + .lobytes $FFEA + .lobytes $FFEB + .lobytes $FFEC + .lobytes $FFED + .lobytes $FFEE + .lobytes $FFEF + .lobytes $FFF0 + .lobytes $FFF1 + .lobytes $FFF2 + .lobytes $FFF3 + .lobytes $FFF4 + .lobytes $FFF5 + .lobytes $FFF6 + .lobytes $FFF7 + .lobytes $FFF8 + .lobytes $FFF9 + .lobytes $FFFA + .lobytes $FFFB + .lobytes $FFFC + .lobytes $FFFD + .lobytes $FFFE + .lobytes $FFFF + + ; alternative hex values + .lobytes 0h + .lobytes 1h + .lobytes 2h + .lobytes 3h + .lobytes 4h + .lobytes 5h + .lobytes 6h + .lobytes 7h + .lobytes 8h + .lobytes 9h + .lobytes 0ah + .lobytes 0bh + .lobytes 0ch + .lobytes 0dh + .lobytes 0eh + .lobytes 0fh + .lobytes 10h + .lobytes 11h + .lobytes 12h + .lobytes 13h + .lobytes 70h + .lobytes 71h + .lobytes 72h + .lobytes 73h + .lobytes 74h + .lobytes 75h + .lobytes 76h + .lobytes 77h + .lobytes 78h + .lobytes 79h + .lobytes 7ah + .lobytes 7bh + .lobytes 7ch + .lobytes 7dh + .lobytes 7eh + .lobytes 7fh + .lobytes 80h + .lobytes 81h + .lobytes 82h + .lobytes 83h + .lobytes 84h + .lobytes 85h + .lobytes 86h + .lobytes 0f0h + .lobytes 0f1h + .lobytes 0f2h + .lobytes 0f3h + .lobytes 0f4h + .lobytes 0f5h + .lobytes 0f6h + .lobytes 0f7h + .lobytes 0f8h + .lobytes 0f9h + .lobytes 0fah + .lobytes 0fbh + .lobytes 0fch + .lobytes 0fdh + .lobytes 0feh + .lobytes 0ffh + .lobytes 100h + .lobytes 101h + .lobytes 102h + .lobytes 103h + .lobytes 0fd2h + .lobytes 0fd3h + .lobytes 0fd4h + .lobytes 0fd5h + .lobytes 0fd6h + .lobytes 0fd7h + .lobytes 0fd8h + .lobytes 0fd9h + .lobytes 0fdah + .lobytes 0fdbh + .lobytes 0fdch + .lobytes 0fddh + .lobytes 0fdeh + .lobytes 0fdfh + .lobytes 0fe0h + .lobytes 0fe1h + .lobytes 0fe2h + .lobytes 0fe3h + .lobytes 0fe4h + .lobytes 0fe5h + .lobytes 0fe6h + .lobytes 0fe7h + .lobytes 0fe8h + .lobytes 0fe9h + .lobytes 0feah + .lobytes 0febh + .lobytes 0fech + .lobytes 0fedh + .lobytes 0feeh + .lobytes 0fefh + .lobytes 0ff0h + .lobytes 0ff1h + .lobytes 0ff2h + .lobytes 0ff3h + .lobytes 0ff4h + .lobytes 0ff5h + .lobytes 0ff6h + .lobytes 0ff7h + .lobytes 0ff8h + .lobytes 0ff9h + .lobytes 0ffah + .lobytes 0ffbh + .lobytes 0ffch + .lobytes 0ffdh + .lobytes 0ffeh + .lobytes 0fffh + .lobytes 1000h + .lobytes 1001h + .lobytes 1002h + .lobytes 1003h + .lobytes 1004h + .lobytes 1005h + .lobytes 1006h + .lobytes 1007h + .lobytes 1008h + .lobytes 7ff0h + .lobytes 7ff1h + .lobytes 7ff2h + .lobytes 7ff3h + .lobytes 7ff4h + .lobytes 7ff5h + .lobytes 7ff6h + .lobytes 7ff7h + .lobytes 7ff8h + .lobytes 7ff9h + .lobytes 7ffah + .lobytes 7ffbh + .lobytes 7ffch + .lobytes 7ffdh + .lobytes 7ffeh + .lobytes 7fffh + .lobytes 8000h + .lobytes 8001h + .lobytes 8002h + .lobytes 8003h + .lobytes 8004h + .lobytes 8005h + .lobytes 8006h + .lobytes 8007h + .lobytes 8008h + .lobytes 8009h + .lobytes 800ah + .lobytes 800bh + .lobytes 9fe1h + .lobytes 9fe2h + .lobytes 9fe3h + .lobytes 9fe4h + .lobytes 9fe5h + .lobytes 9fe6h + .lobytes 9fe7h + .lobytes 9fe8h + .lobytes 9fe9h + .lobytes 9feah + .lobytes 9febh + .lobytes 9fech + .lobytes 9fedh + .lobytes 9feeh + .lobytes 9fefh + .lobytes 9ff0h + .lobytes 9ff1h + .lobytes 9ff2h + .lobytes 9ff3h + .lobytes 9ff4h + .lobytes 9ff5h + .lobytes 9ff6h + .lobytes 9ff7h + .lobytes 9ff8h + .lobytes 9ff9h + .lobytes 9ffah + .lobytes 9ffbh + .lobytes 9ffch + .lobytes 9ffdh + .lobytes 9ffeh + .lobytes 9fffh + .lobytes 0a000h + .lobytes 0a001h + .lobytes 0a002h + .lobytes 0a003h + .lobytes 0a004h + .lobytes 0a005h + .lobytes 0a006h + .lobytes 0a007h + .lobytes 0a008h + .lobytes 0a009h + .lobytes 0a00ah + .lobytes 0a00bh + .lobytes 0a00ch + .lobytes 0a00dh + .lobytes 0a00eh + .lobytes 0a00fh + .lobytes 0afe1h + .lobytes 0afe2h + .lobytes 0afe3h + .lobytes 0afe4h + .lobytes 0afe5h + .lobytes 0afe6h + .lobytes 0afe7h + .lobytes 0afe8h + .lobytes 0afe9h + .lobytes 0afeah + .lobytes 0afebh + .lobytes 0afech + .lobytes 0afedh + .lobytes 0afeeh + .lobytes 0afefh + .lobytes 0aff0h + .lobytes 0aff1h + .lobytes 0aff2h + .lobytes 0aff3h + .lobytes 0aff4h + .lobytes 0aff5h + .lobytes 0aff6h + .lobytes 0aff7h + .lobytes 0aff8h + .lobytes 0aff9h + .lobytes 0affah + .lobytes 0affbh + .lobytes 0affch + .lobytes 0affdh + .lobytes 0affeh + .lobytes 0afffh + .lobytes 0b000h + .lobytes 0b001h + .lobytes 0b002h + .lobytes 0b003h + .lobytes 0b004h + .lobytes 0b005h + .lobytes 0b006h + .lobytes 0b007h + .lobytes 0b008h + .lobytes 0b009h + .lobytes 0b00ah + .lobytes 0b00bh + .lobytes 0b00ch + .lobytes 0b00dh + .lobytes 0b00eh + .lobytes 0b00fh + .lobytes 0bfe1h + .lobytes 0bfe2h + .lobytes 0bfe3h + .lobytes 0bfe4h + .lobytes 0bfe5h + .lobytes 0bfe6h + .lobytes 0bfe7h + .lobytes 0bfe8h + .lobytes 0bfe9h + .lobytes 0bfeah + .lobytes 0bfebh + .lobytes 0bfech + .lobytes 0bfedh + .lobytes 0bfeeh + .lobytes 0bfefh + .lobytes 0bff0h + .lobytes 0bff1h + .lobytes 0bff2h + .lobytes 0bff3h + .lobytes 0bff4h + .lobytes 0bff5h + .lobytes 0bff6h + .lobytes 0bff7h + .lobytes 0bff8h + .lobytes 0bff9h + .lobytes 0bffah + .lobytes 0bffbh + .lobytes 0bffch + .lobytes 0bffdh + .lobytes 0bffeh + .lobytes 0bfffh + .lobytes 0c000h + .lobytes 0c001h + .lobytes 0c002h + .lobytes 0c003h + .lobytes 0c004h + .lobytes 0c005h + .lobytes 0c006h + .lobytes 0c007h + .lobytes 0c008h + .lobytes 0c009h + .lobytes 0c00ah + .lobytes 0c00bh + .lobytes 0c00ch + .lobytes 0c00dh + .lobytes 0c00eh + .lobytes 0c00fh + .lobytes 0cfe1h + .lobytes 0cfe2h + .lobytes 0cfe3h + .lobytes 0cfe4h + .lobytes 0cfe5h + .lobytes 0cfe6h + .lobytes 0cfe7h + .lobytes 0cfe8h + .lobytes 0cfe9h + .lobytes 0cfeah + .lobytes 0cfebh + .lobytes 0cfech + .lobytes 0cfedh + .lobytes 0cfeeh + .lobytes 0cfefh + .lobytes 0cff0h + .lobytes 0cff1h + .lobytes 0cff2h + .lobytes 0cff3h + .lobytes 0cff4h + .lobytes 0cff5h + .lobytes 0cff6h + .lobytes 0cff7h + .lobytes 0cff8h + .lobytes 0cff9h + .lobytes 0cffah + .lobytes 0cffbh + .lobytes 0cffch + .lobytes 0cffdh + .lobytes 0cffeh + .lobytes 0cfffh + .lobytes 0d000h + .lobytes 0d001h + .lobytes 0d002h + .lobytes 0d003h + .lobytes 0d004h + .lobytes 0d005h + .lobytes 0d006h + .lobytes 0d007h + .lobytes 0d008h + .lobytes 0d009h + .lobytes 0d00ah + .lobytes 0d00bh + .lobytes 0d00ch + .lobytes 0d00dh + .lobytes 0d00eh + .lobytes 0d00fh + .lobytes 0dfe1h + .lobytes 0dfe2h + .lobytes 0dfe3h + .lobytes 0dfe4h + .lobytes 0dfe5h + .lobytes 0dfe6h + .lobytes 0dfe7h + .lobytes 0dfe8h + .lobytes 0dfe9h + .lobytes 0dfeah + .lobytes 0dfebh + .lobytes 0dfech + .lobytes 0dfedh + .lobytes 0dfeeh + .lobytes 0dfefh + .lobytes 0dff0h + .lobytes 0dff1h + .lobytes 0dff2h + .lobytes 0dff3h + .lobytes 0dff4h + .lobytes 0dff5h + .lobytes 0dff6h + .lobytes 0dff7h + .lobytes 0dff8h + .lobytes 0dff9h + .lobytes 0dffah + .lobytes 0dffbh + .lobytes 0dffch + .lobytes 0dffdh + .lobytes 0dffeh + .lobytes 0dfffh + .lobytes 0e000h + .lobytes 0e001h + .lobytes 0e002h + .lobytes 0e003h + .lobytes 0e004h + .lobytes 0e005h + .lobytes 0e006h + .lobytes 0e007h + .lobytes 0e008h + .lobytes 0e009h + .lobytes 0e00ah + .lobytes 0e00bh + .lobytes 0e00ch + .lobytes 0e00dh + .lobytes 0e00eh + .lobytes 0e00fh + .lobytes 0efe1h + .lobytes 0efe2h + .lobytes 0efe3h + .lobytes 0efe4h + .lobytes 0efe5h + .lobytes 0efe6h + .lobytes 0efe7h + .lobytes 0efe8h + .lobytes 0efe9h + .lobytes 0efeah + .lobytes 0efebh + .lobytes 0efech + .lobytes 0efedh + .lobytes 0efeeh + .lobytes 0efefh + .lobytes 0eff0h + .lobytes 0eff1h + .lobytes 0eff2h + .lobytes 0eff3h + .lobytes 0eff4h + .lobytes 0eff5h + .lobytes 0eff6h + .lobytes 0eff7h + .lobytes 0eff8h + .lobytes 0eff9h + .lobytes 0effah + .lobytes 0effbh + .lobytes 0effch + .lobytes 0effdh + .lobytes 0effeh + .lobytes 0efffh + .lobytes 0f000h + .lobytes 0f001h + .lobytes 0f002h + .lobytes 0f003h + .lobytes 0f004h + .lobytes 0f005h + .lobytes 0f006h + .lobytes 0f007h + .lobytes 0f008h + .lobytes 0f009h + .lobytes 0f00ah + .lobytes 0f00bh + .lobytes 0f00ch + .lobytes 0f00dh + .lobytes 0f00eh + .lobytes 0f00fh + .lobytes 0ffe1h + .lobytes 0ffe2h + .lobytes 0ffe3h + .lobytes 0ffe4h + .lobytes 0ffe5h + .lobytes 0ffe6h + .lobytes 0ffe7h + .lobytes 0ffe8h + .lobytes 0ffe9h + .lobytes 0ffeah + .lobytes 0ffebh + .lobytes 0ffech + .lobytes 0ffedh + .lobytes 0ffeeh + .lobytes 0ffefh + .lobytes 0fff0h + .lobytes 0fff1h + .lobytes 0fff2h + .lobytes 0fff3h + .lobytes 0fff4h + .lobytes 0fff5h + .lobytes 0fff6h + .lobytes 0fff7h + .lobytes 0fff8h + .lobytes 0fff9h + .lobytes 0fffah + .lobytes 0fffbh + .lobytes 0fffch + .lobytes 0fffdh + .lobytes 0fffeh + .lobytes 0ffffh + + ; alternative hex values, uppercase + .lobytes 0h + .lobytes 1h + .lobytes 2h + .lobytes 3h + .lobytes 4h + .lobytes 5h + .lobytes 6h + .lobytes 7h + .lobytes 8h + .lobytes 9h + .lobytes 0Ah + .lobytes 0Bh + .lobytes 0Ch + .lobytes 0Dh + .lobytes 0Eh + .lobytes 0Fh + .lobytes 10h + .lobytes 11h + .lobytes 12h + .lobytes 13h + .lobytes 70h + .lobytes 71h + .lobytes 72h + .lobytes 73h + .lobytes 74h + .lobytes 75h + .lobytes 76h + .lobytes 77h + .lobytes 78h + .lobytes 79h + .lobytes 7Ah + .lobytes 7Bh + .lobytes 7Ch + .lobytes 7Dh + .lobytes 7Eh + .lobytes 7Fh + .lobytes 80h + .lobytes 81h + .lobytes 82h + .lobytes 83h + .lobytes 84h + .lobytes 85h + .lobytes 86h + .lobytes 0F0h + .lobytes 0F1h + .lobytes 0F2h + .lobytes 0F3h + .lobytes 0F4h + .lobytes 0F5h + .lobytes 0F6h + .lobytes 0F7h + .lobytes 0F8h + .lobytes 0F9h + .lobytes 0FAh + .lobytes 0FBh + .lobytes 0FCh + .lobytes 0FDh + .lobytes 0FEh + .lobytes 0FFh + .lobytes 100h + .lobytes 101h + .lobytes 102h + .lobytes 103h + .lobytes 0FD2h + .lobytes 0FD3h + .lobytes 0FD4h + .lobytes 0FD5h + .lobytes 0FD6h + .lobytes 0FD7h + .lobytes 0FD8h + .lobytes 0FD9h + .lobytes 0FDAh + .lobytes 0FDBh + .lobytes 0FDCh + .lobytes 0FDDh + .lobytes 0FDEh + .lobytes 0FDFh + .lobytes 0FE0h + .lobytes 0FE1h + .lobytes 0FE2h + .lobytes 0FE3h + .lobytes 0FE4h + .lobytes 0FE5h + .lobytes 0FE6h + .lobytes 0FE7h + .lobytes 0FE8h + .lobytes 0FE9h + .lobytes 0FEAh + .lobytes 0FEBh + .lobytes 0FECh + .lobytes 0FEDh + .lobytes 0FEEh + .lobytes 0FEFh + .lobytes 0FF0h + .lobytes 0FF1h + .lobytes 0FF2h + .lobytes 0FF3h + .lobytes 0FF4h + .lobytes 0FF5h + .lobytes 0FF6h + .lobytes 0FF7h + .lobytes 0FF8h + .lobytes 0FF9h + .lobytes 0FFAh + .lobytes 0FFBh + .lobytes 0FFCh + .lobytes 0FFDh + .lobytes 0FFEh + .lobytes 0FFFh + .lobytes 1000h + .lobytes 1001h + .lobytes 1002h + .lobytes 1003h + .lobytes 1004h + .lobytes 1005h + .lobytes 1006h + .lobytes 1007h + .lobytes 1008h + .lobytes 7FF0h + .lobytes 7FF1h + .lobytes 7FF2h + .lobytes 7FF3h + .lobytes 7FF4h + .lobytes 7FF5h + .lobytes 7FF6h + .lobytes 7FF7h + .lobytes 7FF8h + .lobytes 7FF9h + .lobytes 7FFAh + .lobytes 7FFBh + .lobytes 7FFCh + .lobytes 7FFDh + .lobytes 7FFEh + .lobytes 7FFFh + .lobytes 8000h + .lobytes 8001h + .lobytes 8002h + .lobytes 8003h + .lobytes 8004h + .lobytes 8005h + .lobytes 8006h + .lobytes 8007h + .lobytes 8008h + .lobytes 8009h + .lobytes 800Ah + .lobytes 800Bh + .lobytes 9FE1h + .lobytes 9FE2h + .lobytes 9FE3h + .lobytes 9FE4h + .lobytes 9FE5h + .lobytes 9FE6h + .lobytes 9FE7h + .lobytes 9FE8h + .lobytes 9FE9h + .lobytes 9FEAh + .lobytes 9FEBh + .lobytes 9FECh + .lobytes 9FEDh + .lobytes 9FEEh + .lobytes 9FEFh + .lobytes 9FF0h + .lobytes 9FF1h + .lobytes 9FF2h + .lobytes 9FF3h + .lobytes 9FF4h + .lobytes 9FF5h + .lobytes 9FF6h + .lobytes 9FF7h + .lobytes 9FF8h + .lobytes 9FF9h + .lobytes 9FFAh + .lobytes 9FFBh + .lobytes 9FFCh + .lobytes 9FFDh + .lobytes 9FFEh + .lobytes 9FFFh + .lobytes 0A000h + .lobytes 0A001h + .lobytes 0A002h + .lobytes 0A003h + .lobytes 0A004h + .lobytes 0A005h + .lobytes 0A006h + .lobytes 0A007h + .lobytes 0A008h + .lobytes 0A009h + .lobytes 0A00Ah + .lobytes 0A00Bh + .lobytes 0A00Ch + .lobytes 0A00Dh + .lobytes 0A00Eh + .lobytes 0A00Fh + .lobytes 0AFE1h + .lobytes 0AFE2h + .lobytes 0AFE3h + .lobytes 0AFE4h + .lobytes 0AFE5h + .lobytes 0AFE6h + .lobytes 0AFE7h + .lobytes 0AFE8h + .lobytes 0AFE9h + .lobytes 0AFEAh + .lobytes 0AFEBh + .lobytes 0AFECh + .lobytes 0AFEDh + .lobytes 0AFEEh + .lobytes 0AFEFh + .lobytes 0AFF0h + .lobytes 0AFF1h + .lobytes 0AFF2h + .lobytes 0AFF3h + .lobytes 0AFF4h + .lobytes 0AFF5h + .lobytes 0AFF6h + .lobytes 0AFF7h + .lobytes 0AFF8h + .lobytes 0AFF9h + .lobytes 0AFFAh + .lobytes 0AFFBh + .lobytes 0AFFCh + .lobytes 0AFFDh + .lobytes 0AFFEh + .lobytes 0AFFFh + .lobytes 0B000h + .lobytes 0B001h + .lobytes 0B002h + .lobytes 0B003h + .lobytes 0B004h + .lobytes 0B005h + .lobytes 0B006h + .lobytes 0B007h + .lobytes 0B008h + .lobytes 0B009h + .lobytes 0B00Ah + .lobytes 0B00Bh + .lobytes 0B00Ch + .lobytes 0B00Dh + .lobytes 0B00Eh + .lobytes 0B00Fh + .lobytes 0BFE1h + .lobytes 0BFE2h + .lobytes 0BFE3h + .lobytes 0BFE4h + .lobytes 0BFE5h + .lobytes 0BFE6h + .lobytes 0BFE7h + .lobytes 0BFE8h + .lobytes 0BFE9h + .lobytes 0BFEAh + .lobytes 0BFEBh + .lobytes 0BFECh + .lobytes 0BFEDh + .lobytes 0BFEEh + .lobytes 0BFEFh + .lobytes 0BFF0h + .lobytes 0BFF1h + .lobytes 0BFF2h + .lobytes 0BFF3h + .lobytes 0BFF4h + .lobytes 0BFF5h + .lobytes 0BFF6h + .lobytes 0BFF7h + .lobytes 0BFF8h + .lobytes 0BFF9h + .lobytes 0BFFAh + .lobytes 0BFFBh + .lobytes 0BFFCh + .lobytes 0BFFDh + .lobytes 0BFFEh + .lobytes 0BFFFh + .lobytes 0C000h + .lobytes 0C001h + .lobytes 0C002h + .lobytes 0C003h + .lobytes 0C004h + .lobytes 0C005h + .lobytes 0C006h + .lobytes 0C007h + .lobytes 0C008h + .lobytes 0C009h + .lobytes 0C00Ah + .lobytes 0C00Bh + .lobytes 0C00Ch + .lobytes 0C00Dh + .lobytes 0C00Eh + .lobytes 0C00Fh + .lobytes 0CFE1h + .lobytes 0CFE2h + .lobytes 0CFE3h + .lobytes 0CFE4h + .lobytes 0CFE5h + .lobytes 0CFE6h + .lobytes 0CFE7h + .lobytes 0CFE8h + .lobytes 0CFE9h + .lobytes 0CFEAh + .lobytes 0CFEBh + .lobytes 0CFECh + .lobytes 0CFEDh + .lobytes 0CFEEh + .lobytes 0CFEFh + .lobytes 0CFF0h + .lobytes 0CFF1h + .lobytes 0CFF2h + .lobytes 0CFF3h + .lobytes 0CFF4h + .lobytes 0CFF5h + .lobytes 0CFF6h + .lobytes 0CFF7h + .lobytes 0CFF8h + .lobytes 0CFF9h + .lobytes 0CFFAh + .lobytes 0CFFBh + .lobytes 0CFFCh + .lobytes 0CFFDh + .lobytes 0CFFEh + .lobytes 0CFFFh + .lobytes 0D000h + .lobytes 0D001h + .lobytes 0D002h + .lobytes 0D003h + .lobytes 0D004h + .lobytes 0D005h + .lobytes 0D006h + .lobytes 0D007h + .lobytes 0D008h + .lobytes 0D009h + .lobytes 0D00Ah + .lobytes 0D00Bh + .lobytes 0D00Ch + .lobytes 0D00Dh + .lobytes 0D00Eh + .lobytes 0D00Fh + .lobytes 0DFE1h + .lobytes 0DFE2h + .lobytes 0DFE3h + .lobytes 0DFE4h + .lobytes 0DFE5h + .lobytes 0DFE6h + .lobytes 0DFE7h + .lobytes 0DFE8h + .lobytes 0DFE9h + .lobytes 0DFEAh + .lobytes 0DFEBh + .lobytes 0DFECh + .lobytes 0DFEDh + .lobytes 0DFEEh + .lobytes 0DFEFh + .lobytes 0DFF0h + .lobytes 0DFF1h + .lobytes 0DFF2h + .lobytes 0DFF3h + .lobytes 0DFF4h + .lobytes 0DFF5h + .lobytes 0DFF6h + .lobytes 0DFF7h + .lobytes 0DFF8h + .lobytes 0DFF9h + .lobytes 0DFFAh + .lobytes 0DFFBh + .lobytes 0DFFCh + .lobytes 0DFFDh + .lobytes 0DFFEh + .lobytes 0DFFFh + .lobytes 0E000h + .lobytes 0E001h + .lobytes 0E002h + .lobytes 0E003h + .lobytes 0E004h + .lobytes 0E005h + .lobytes 0E006h + .lobytes 0E007h + .lobytes 0E008h + .lobytes 0E009h + .lobytes 0E00Ah + .lobytes 0E00Bh + .lobytes 0E00Ch + .lobytes 0E00Dh + .lobytes 0E00Eh + .lobytes 0E00Fh + .lobytes 0EFE1h + .lobytes 0EFE2h + .lobytes 0EFE3h + .lobytes 0EFE4h + .lobytes 0EFE5h + .lobytes 0EFE6h + .lobytes 0EFE7h + .lobytes 0EFE8h + .lobytes 0EFE9h + .lobytes 0EFEAh + .lobytes 0EFEBh + .lobytes 0EFECh + .lobytes 0EFEDh + .lobytes 0EFEEh + .lobytes 0EFEFh + .lobytes 0EFF0h + .lobytes 0EFF1h + .lobytes 0EFF2h + .lobytes 0EFF3h + .lobytes 0EFF4h + .lobytes 0EFF5h + .lobytes 0EFF6h + .lobytes 0EFF7h + .lobytes 0EFF8h + .lobytes 0EFF9h + .lobytes 0EFFAh + .lobytes 0EFFBh + .lobytes 0EFFCh + .lobytes 0EFFDh + .lobytes 0EFFEh + .lobytes 0EFFFh + .lobytes 0F000h + .lobytes 0F001h + .lobytes 0F002h + .lobytes 0F003h + .lobytes 0F004h + .lobytes 0F005h + .lobytes 0F006h + .lobytes 0F007h + .lobytes 0F008h + .lobytes 0F009h + .lobytes 0F00Ah + .lobytes 0F00Bh + .lobytes 0F00Ch + .lobytes 0F00Dh + .lobytes 0F00Eh + .lobytes 0F00Fh + .lobytes 0FFE1h + .lobytes 0FFE2h + .lobytes 0FFE3h + .lobytes 0FFE4h + .lobytes 0FFE5h + .lobytes 0FFE6h + .lobytes 0FFE7h + .lobytes 0FFE8h + .lobytes 0FFE9h + .lobytes 0FFEAh + .lobytes 0FFEBh + .lobytes 0FFECh + .lobytes 0FFEDh + .lobytes 0FFEEh + .lobytes 0FFEFh + .lobytes 0FFF0h + .lobytes 0FFF1h + .lobytes 0FFF2h + .lobytes 0FFF3h + .lobytes 0FFF4h + .lobytes 0FFF5h + .lobytes 0FFF6h + .lobytes 0FFF7h + .lobytes 0FFF8h + .lobytes 0FFF9h + .lobytes 0FFFAh + .lobytes 0FFFBh + .lobytes 0FFFCh + .lobytes 0FFFDh + .lobytes 0FFFEh + .lobytes 0FFFFh + + ; alternative 4-digit hex values + .lobytes 0000h + .lobytes 0001h + .lobytes 0002h + .lobytes 0003h + .lobytes 0004h + .lobytes 0005h + .lobytes 0006h + .lobytes 0007h + .lobytes 0008h + .lobytes 0009h + .lobytes 000ah + .lobytes 000bh + .lobytes 000ch + .lobytes 000dh + .lobytes 000eh + .lobytes 000fh + .lobytes 0010h + .lobytes 0011h + .lobytes 0012h + .lobytes 0013h + .lobytes 0070h + .lobytes 0071h + .lobytes 0072h + .lobytes 0073h + .lobytes 0074h + .lobytes 0075h + .lobytes 0076h + .lobytes 0077h + .lobytes 0078h + .lobytes 0079h + .lobytes 007ah + .lobytes 007bh + .lobytes 007ch + .lobytes 007dh + .lobytes 007eh + .lobytes 007fh + .lobytes 0080h + .lobytes 0081h + .lobytes 0082h + .lobytes 0083h + .lobytes 0084h + .lobytes 0085h + .lobytes 0086h + .lobytes 00f0h + .lobytes 00f1h + .lobytes 00f2h + .lobytes 00f3h + .lobytes 00f4h + .lobytes 00f5h + .lobytes 00f6h + .lobytes 00f7h + .lobytes 00f8h + .lobytes 00f9h + .lobytes 00fah + .lobytes 00fbh + .lobytes 00fch + .lobytes 00fdh + .lobytes 00feh + .lobytes 00ffh + .lobytes 0100h + .lobytes 0101h + .lobytes 0102h + .lobytes 0103h + .lobytes 0fd2h + .lobytes 0fd3h + .lobytes 0fd4h + .lobytes 0fd5h + .lobytes 0fd6h + .lobytes 0fd7h + .lobytes 0fd8h + .lobytes 0fd9h + .lobytes 0fdah + .lobytes 0fdbh + .lobytes 0fdch + .lobytes 0fddh + .lobytes 0fdeh + .lobytes 0fdfh + .lobytes 0fe0h + .lobytes 0fe1h + .lobytes 0fe2h + .lobytes 0fe3h + .lobytes 0fe4h + .lobytes 0fe5h + .lobytes 0fe6h + .lobytes 0fe7h + .lobytes 0fe8h + .lobytes 0fe9h + .lobytes 0feah + .lobytes 0febh + .lobytes 0fech + .lobytes 0fedh + .lobytes 0feeh + .lobytes 0fefh + .lobytes 0ff0h + .lobytes 0ff1h + .lobytes 0ff2h + .lobytes 0ff3h + .lobytes 0ff4h + .lobytes 0ff5h + .lobytes 0ff6h + .lobytes 0ff7h + .lobytes 0ff8h + .lobytes 0ff9h + .lobytes 0ffah + .lobytes 0ffbh + .lobytes 0ffch + .lobytes 0ffdh + .lobytes 0ffeh + .lobytes 0fffh + .lobytes 1000h + .lobytes 1001h + .lobytes 1002h + .lobytes 1003h + .lobytes 1004h + .lobytes 1005h + .lobytes 1006h + .lobytes 1007h + .lobytes 1008h + .lobytes 7ff0h + .lobytes 7ff1h + .lobytes 7ff2h + .lobytes 7ff3h + .lobytes 7ff4h + .lobytes 7ff5h + .lobytes 7ff6h + .lobytes 7ff7h + .lobytes 7ff8h + .lobytes 7ff9h + .lobytes 7ffah + .lobytes 7ffbh + .lobytes 7ffch + .lobytes 7ffdh + .lobytes 7ffeh + .lobytes 7fffh + .lobytes 8000h + .lobytes 8001h + .lobytes 8002h + .lobytes 8003h + .lobytes 8004h + .lobytes 8005h + .lobytes 8006h + .lobytes 8007h + .lobytes 8008h + .lobytes 8009h + .lobytes 800ah + .lobytes 800bh + .lobytes 9fe1h + .lobytes 9fe2h + .lobytes 9fe3h + .lobytes 9fe4h + .lobytes 9fe5h + .lobytes 9fe6h + .lobytes 9fe7h + .lobytes 9fe8h + .lobytes 9fe9h + .lobytes 9feah + .lobytes 9febh + .lobytes 9fech + .lobytes 9fedh + .lobytes 9feeh + .lobytes 9fefh + .lobytes 9ff0h + .lobytes 9ff1h + .lobytes 9ff2h + .lobytes 9ff3h + .lobytes 9ff4h + .lobytes 9ff5h + .lobytes 9ff6h + .lobytes 9ff7h + .lobytes 9ff8h + .lobytes 9ff9h + .lobytes 9ffah + .lobytes 9ffbh + .lobytes 9ffch + .lobytes 9ffdh + .lobytes 9ffeh + .lobytes 9fffh + .lobytes 0a000h + .lobytes 0a001h + .lobytes 0a002h + .lobytes 0a003h + .lobytes 0a004h + .lobytes 0a005h + .lobytes 0a006h + .lobytes 0a007h + .lobytes 0a008h + .lobytes 0a009h + .lobytes 0a00ah + .lobytes 0a00bh + .lobytes 0a00ch + .lobytes 0a00dh + .lobytes 0a00eh + .lobytes 0a00fh + .lobytes 0afe1h + .lobytes 0afe2h + .lobytes 0afe3h + .lobytes 0afe4h + .lobytes 0afe5h + .lobytes 0afe6h + .lobytes 0afe7h + .lobytes 0afe8h + .lobytes 0afe9h + .lobytes 0afeah + .lobytes 0afebh + .lobytes 0afech + .lobytes 0afedh + .lobytes 0afeeh + .lobytes 0afefh + .lobytes 0aff0h + .lobytes 0aff1h + .lobytes 0aff2h + .lobytes 0aff3h + .lobytes 0aff4h + .lobytes 0aff5h + .lobytes 0aff6h + .lobytes 0aff7h + .lobytes 0aff8h + .lobytes 0aff9h + .lobytes 0affah + .lobytes 0affbh + .lobytes 0affch + .lobytes 0affdh + .lobytes 0affeh + .lobytes 0afffh + .lobytes 0b000h + .lobytes 0b001h + .lobytes 0b002h + .lobytes 0b003h + .lobytes 0b004h + .lobytes 0b005h + .lobytes 0b006h + .lobytes 0b007h + .lobytes 0b008h + .lobytes 0b009h + .lobytes 0b00ah + .lobytes 0b00bh + .lobytes 0b00ch + .lobytes 0b00dh + .lobytes 0b00eh + .lobytes 0b00fh + .lobytes 0bfe1h + .lobytes 0bfe2h + .lobytes 0bfe3h + .lobytes 0bfe4h + .lobytes 0bfe5h + .lobytes 0bfe6h + .lobytes 0bfe7h + .lobytes 0bfe8h + .lobytes 0bfe9h + .lobytes 0bfeah + .lobytes 0bfebh + .lobytes 0bfech + .lobytes 0bfedh + .lobytes 0bfeeh + .lobytes 0bfefh + .lobytes 0bff0h + .lobytes 0bff1h + .lobytes 0bff2h + .lobytes 0bff3h + .lobytes 0bff4h + .lobytes 0bff5h + .lobytes 0bff6h + .lobytes 0bff7h + .lobytes 0bff8h + .lobytes 0bff9h + .lobytes 0bffah + .lobytes 0bffbh + .lobytes 0bffch + .lobytes 0bffdh + .lobytes 0bffeh + .lobytes 0bfffh + .lobytes 0c000h + .lobytes 0c001h + .lobytes 0c002h + .lobytes 0c003h + .lobytes 0c004h + .lobytes 0c005h + .lobytes 0c006h + .lobytes 0c007h + .lobytes 0c008h + .lobytes 0c009h + .lobytes 0c00ah + .lobytes 0c00bh + .lobytes 0c00ch + .lobytes 0c00dh + .lobytes 0c00eh + .lobytes 0c00fh + .lobytes 0cfe1h + .lobytes 0cfe2h + .lobytes 0cfe3h + .lobytes 0cfe4h + .lobytes 0cfe5h + .lobytes 0cfe6h + .lobytes 0cfe7h + .lobytes 0cfe8h + .lobytes 0cfe9h + .lobytes 0cfeah + .lobytes 0cfebh + .lobytes 0cfech + .lobytes 0cfedh + .lobytes 0cfeeh + .lobytes 0cfefh + .lobytes 0cff0h + .lobytes 0cff1h + .lobytes 0cff2h + .lobytes 0cff3h + .lobytes 0cff4h + .lobytes 0cff5h + .lobytes 0cff6h + .lobytes 0cff7h + .lobytes 0cff8h + .lobytes 0cff9h + .lobytes 0cffah + .lobytes 0cffbh + .lobytes 0cffch + .lobytes 0cffdh + .lobytes 0cffeh + .lobytes 0cfffh + .lobytes 0d000h + .lobytes 0d001h + .lobytes 0d002h + .lobytes 0d003h + .lobytes 0d004h + .lobytes 0d005h + .lobytes 0d006h + .lobytes 0d007h + .lobytes 0d008h + .lobytes 0d009h + .lobytes 0d00ah + .lobytes 0d00bh + .lobytes 0d00ch + .lobytes 0d00dh + .lobytes 0d00eh + .lobytes 0d00fh + .lobytes 0dfe1h + .lobytes 0dfe2h + .lobytes 0dfe3h + .lobytes 0dfe4h + .lobytes 0dfe5h + .lobytes 0dfe6h + .lobytes 0dfe7h + .lobytes 0dfe8h + .lobytes 0dfe9h + .lobytes 0dfeah + .lobytes 0dfebh + .lobytes 0dfech + .lobytes 0dfedh + .lobytes 0dfeeh + .lobytes 0dfefh + .lobytes 0dff0h + .lobytes 0dff1h + .lobytes 0dff2h + .lobytes 0dff3h + .lobytes 0dff4h + .lobytes 0dff5h + .lobytes 0dff6h + .lobytes 0dff7h + .lobytes 0dff8h + .lobytes 0dff9h + .lobytes 0dffah + .lobytes 0dffbh + .lobytes 0dffch + .lobytes 0dffdh + .lobytes 0dffeh + .lobytes 0dfffh + .lobytes 0e000h + .lobytes 0e001h + .lobytes 0e002h + .lobytes 0e003h + .lobytes 0e004h + .lobytes 0e005h + .lobytes 0e006h + .lobytes 0e007h + .lobytes 0e008h + .lobytes 0e009h + .lobytes 0e00ah + .lobytes 0e00bh + .lobytes 0e00ch + .lobytes 0e00dh + .lobytes 0e00eh + .lobytes 0e00fh + .lobytes 0efe1h + .lobytes 0efe2h + .lobytes 0efe3h + .lobytes 0efe4h + .lobytes 0efe5h + .lobytes 0efe6h + .lobytes 0efe7h + .lobytes 0efe8h + .lobytes 0efe9h + .lobytes 0efeah + .lobytes 0efebh + .lobytes 0efech + .lobytes 0efedh + .lobytes 0efeeh + .lobytes 0efefh + .lobytes 0eff0h + .lobytes 0eff1h + .lobytes 0eff2h + .lobytes 0eff3h + .lobytes 0eff4h + .lobytes 0eff5h + .lobytes 0eff6h + .lobytes 0eff7h + .lobytes 0eff8h + .lobytes 0eff9h + .lobytes 0effah + .lobytes 0effbh + .lobytes 0effch + .lobytes 0effdh + .lobytes 0effeh + .lobytes 0efffh + .lobytes 0f000h + .lobytes 0f001h + .lobytes 0f002h + .lobytes 0f003h + .lobytes 0f004h + .lobytes 0f005h + .lobytes 0f006h + .lobytes 0f007h + .lobytes 0f008h + .lobytes 0f009h + .lobytes 0f00ah + .lobytes 0f00bh + .lobytes 0f00ch + .lobytes 0f00dh + .lobytes 0f00eh + .lobytes 0f00fh + .lobytes 0ffe1h + .lobytes 0ffe2h + .lobytes 0ffe3h + .lobytes 0ffe4h + .lobytes 0ffe5h + .lobytes 0ffe6h + .lobytes 0ffe7h + .lobytes 0ffe8h + .lobytes 0ffe9h + .lobytes 0ffeah + .lobytes 0ffebh + .lobytes 0ffech + .lobytes 0ffedh + .lobytes 0ffeeh + .lobytes 0ffefh + .lobytes 0fff0h + .lobytes 0fff1h + .lobytes 0fff2h + .lobytes 0fff3h + .lobytes 0fff4h + .lobytes 0fff5h + .lobytes 0fff6h + .lobytes 0fff7h + .lobytes 0fff8h + .lobytes 0fff9h + .lobytes 0fffah + .lobytes 0fffbh + .lobytes 0fffch + .lobytes 0fffdh + .lobytes 0fffeh + .lobytes 0ffffh + + ; alternative 4-digit hex values, uppercase + .lobytes 0000h + .lobytes 0001h + .lobytes 0002h + .lobytes 0003h + .lobytes 0004h + .lobytes 0005h + .lobytes 0006h + .lobytes 0007h + .lobytes 0008h + .lobytes 0009h + .lobytes 000Ah + .lobytes 000Bh + .lobytes 000Ch + .lobytes 000Dh + .lobytes 000Eh + .lobytes 000Fh + .lobytes 0010h + .lobytes 0011h + .lobytes 0012h + .lobytes 0013h + .lobytes 0070h + .lobytes 0071h + .lobytes 0072h + .lobytes 0073h + .lobytes 0074h + .lobytes 0075h + .lobytes 0076h + .lobytes 0077h + .lobytes 0078h + .lobytes 0079h + .lobytes 007Ah + .lobytes 007Bh + .lobytes 007Ch + .lobytes 007Dh + .lobytes 007Eh + .lobytes 007Fh + .lobytes 0080h + .lobytes 0081h + .lobytes 0082h + .lobytes 0083h + .lobytes 0084h + .lobytes 0085h + .lobytes 0086h + .lobytes 00F0h + .lobytes 00F1h + .lobytes 00F2h + .lobytes 00F3h + .lobytes 00F4h + .lobytes 00F5h + .lobytes 00F6h + .lobytes 00F7h + .lobytes 00F8h + .lobytes 00F9h + .lobytes 00FAh + .lobytes 00FBh + .lobytes 00FCh + .lobytes 00FDh + .lobytes 00FEh + .lobytes 00FFh + .lobytes 0100h + .lobytes 0101h + .lobytes 0102h + .lobytes 0103h + .lobytes 0FD2h + .lobytes 0FD3h + .lobytes 0FD4h + .lobytes 0FD5h + .lobytes 0FD6h + .lobytes 0FD7h + .lobytes 0FD8h + .lobytes 0FD9h + .lobytes 0FDAh + .lobytes 0FDBh + .lobytes 0FDCh + .lobytes 0FDDh + .lobytes 0FDEh + .lobytes 0FDFh + .lobytes 0FE0h + .lobytes 0FE1h + .lobytes 0FE2h + .lobytes 0FE3h + .lobytes 0FE4h + .lobytes 0FE5h + .lobytes 0FE6h + .lobytes 0FE7h + .lobytes 0FE8h + .lobytes 0FE9h + .lobytes 0FEAh + .lobytes 0FEBh + .lobytes 0FECh + .lobytes 0FEDh + .lobytes 0FEEh + .lobytes 0FEFh + .lobytes 0FF0h + .lobytes 0FF1h + .lobytes 0FF2h + .lobytes 0FF3h + .lobytes 0FF4h + .lobytes 0FF5h + .lobytes 0FF6h + .lobytes 0FF7h + .lobytes 0FF8h + .lobytes 0FF9h + .lobytes 0FFAh + .lobytes 0FFBh + .lobytes 0FFCh + .lobytes 0FFDh + .lobytes 0FFEh + .lobytes 0FFFh + .lobytes 1000h + .lobytes 1001h + .lobytes 1002h + .lobytes 1003h + .lobytes 1004h + .lobytes 1005h + .lobytes 1006h + .lobytes 1007h + .lobytes 1008h + .lobytes 7FF0h + .lobytes 7FF1h + .lobytes 7FF2h + .lobytes 7FF3h + .lobytes 7FF4h + .lobytes 7FF5h + .lobytes 7FF6h + .lobytes 7FF7h + .lobytes 7FF8h + .lobytes 7FF9h + .lobytes 7FFAh + .lobytes 7FFBh + .lobytes 7FFCh + .lobytes 7FFDh + .lobytes 7FFEh + .lobytes 7FFFh + .lobytes 8000h + .lobytes 8001h + .lobytes 8002h + .lobytes 8003h + .lobytes 8004h + .lobytes 8005h + .lobytes 8006h + .lobytes 8007h + .lobytes 8008h + .lobytes 8009h + .lobytes 800Ah + .lobytes 800Bh + .lobytes 9FE1h + .lobytes 9FE2h + .lobytes 9FE3h + .lobytes 9FE4h + .lobytes 9FE5h + .lobytes 9FE6h + .lobytes 9FE7h + .lobytes 9FE8h + .lobytes 9FE9h + .lobytes 9FEAh + .lobytes 9FEBh + .lobytes 9FECh + .lobytes 9FEDh + .lobytes 9FEEh + .lobytes 9FEFh + .lobytes 9FF0h + .lobytes 9FF1h + .lobytes 9FF2h + .lobytes 9FF3h + .lobytes 9FF4h + .lobytes 9FF5h + .lobytes 9FF6h + .lobytes 9FF7h + .lobytes 9FF8h + .lobytes 9FF9h + .lobytes 9FFAh + .lobytes 9FFBh + .lobytes 9FFCh + .lobytes 9FFDh + .lobytes 9FFEh + .lobytes 9FFFh + .lobytes 0A000h + .lobytes 0A001h + .lobytes 0A002h + .lobytes 0A003h + .lobytes 0A004h + .lobytes 0A005h + .lobytes 0A006h + .lobytes 0A007h + .lobytes 0A008h + .lobytes 0A009h + .lobytes 0A00Ah + .lobytes 0A00Bh + .lobytes 0A00Ch + .lobytes 0A00Dh + .lobytes 0A00Eh + .lobytes 0A00Fh + .lobytes 0AFE1h + .lobytes 0AFE2h + .lobytes 0AFE3h + .lobytes 0AFE4h + .lobytes 0AFE5h + .lobytes 0AFE6h + .lobytes 0AFE7h + .lobytes 0AFE8h + .lobytes 0AFE9h + .lobytes 0AFEAh + .lobytes 0AFEBh + .lobytes 0AFECh + .lobytes 0AFEDh + .lobytes 0AFEEh + .lobytes 0AFEFh + .lobytes 0AFF0h + .lobytes 0AFF1h + .lobytes 0AFF2h + .lobytes 0AFF3h + .lobytes 0AFF4h + .lobytes 0AFF5h + .lobytes 0AFF6h + .lobytes 0AFF7h + .lobytes 0AFF8h + .lobytes 0AFF9h + .lobytes 0AFFAh + .lobytes 0AFFBh + .lobytes 0AFFCh + .lobytes 0AFFDh + .lobytes 0AFFEh + .lobytes 0AFFFh + .lobytes 0B000h + .lobytes 0B001h + .lobytes 0B002h + .lobytes 0B003h + .lobytes 0B004h + .lobytes 0B005h + .lobytes 0B006h + .lobytes 0B007h + .lobytes 0B008h + .lobytes 0B009h + .lobytes 0B00Ah + .lobytes 0B00Bh + .lobytes 0B00Ch + .lobytes 0B00Dh + .lobytes 0B00Eh + .lobytes 0B00Fh + .lobytes 0BFE1h + .lobytes 0BFE2h + .lobytes 0BFE3h + .lobytes 0BFE4h + .lobytes 0BFE5h + .lobytes 0BFE6h + .lobytes 0BFE7h + .lobytes 0BFE8h + .lobytes 0BFE9h + .lobytes 0BFEAh + .lobytes 0BFEBh + .lobytes 0BFECh + .lobytes 0BFEDh + .lobytes 0BFEEh + .lobytes 0BFEFh + .lobytes 0BFF0h + .lobytes 0BFF1h + .lobytes 0BFF2h + .lobytes 0BFF3h + .lobytes 0BFF4h + .lobytes 0BFF5h + .lobytes 0BFF6h + .lobytes 0BFF7h + .lobytes 0BFF8h + .lobytes 0BFF9h + .lobytes 0BFFAh + .lobytes 0BFFBh + .lobytes 0BFFCh + .lobytes 0BFFDh + .lobytes 0BFFEh + .lobytes 0BFFFh + .lobytes 0C000h + .lobytes 0C001h + .lobytes 0C002h + .lobytes 0C003h + .lobytes 0C004h + .lobytes 0C005h + .lobytes 0C006h + .lobytes 0C007h + .lobytes 0C008h + .lobytes 0C009h + .lobytes 0C00Ah + .lobytes 0C00Bh + .lobytes 0C00Ch + .lobytes 0C00Dh + .lobytes 0C00Eh + .lobytes 0C00Fh + .lobytes 0CFE1h + .lobytes 0CFE2h + .lobytes 0CFE3h + .lobytes 0CFE4h + .lobytes 0CFE5h + .lobytes 0CFE6h + .lobytes 0CFE7h + .lobytes 0CFE8h + .lobytes 0CFE9h + .lobytes 0CFEAh + .lobytes 0CFEBh + .lobytes 0CFECh + .lobytes 0CFEDh + .lobytes 0CFEEh + .lobytes 0CFEFh + .lobytes 0CFF0h + .lobytes 0CFF1h + .lobytes 0CFF2h + .lobytes 0CFF3h + .lobytes 0CFF4h + .lobytes 0CFF5h + .lobytes 0CFF6h + .lobytes 0CFF7h + .lobytes 0CFF8h + .lobytes 0CFF9h + .lobytes 0CFFAh + .lobytes 0CFFBh + .lobytes 0CFFCh + .lobytes 0CFFDh + .lobytes 0CFFEh + .lobytes 0CFFFh + .lobytes 0D000h + .lobytes 0D001h + .lobytes 0D002h + .lobytes 0D003h + .lobytes 0D004h + .lobytes 0D005h + .lobytes 0D006h + .lobytes 0D007h + .lobytes 0D008h + .lobytes 0D009h + .lobytes 0D00Ah + .lobytes 0D00Bh + .lobytes 0D00Ch + .lobytes 0D00Dh + .lobytes 0D00Eh + .lobytes 0D00Fh + .lobytes 0DFE1h + .lobytes 0DFE2h + .lobytes 0DFE3h + .lobytes 0DFE4h + .lobytes 0DFE5h + .lobytes 0DFE6h + .lobytes 0DFE7h + .lobytes 0DFE8h + .lobytes 0DFE9h + .lobytes 0DFEAh + .lobytes 0DFEBh + .lobytes 0DFECh + .lobytes 0DFEDh + .lobytes 0DFEEh + .lobytes 0DFEFh + .lobytes 0DFF0h + .lobytes 0DFF1h + .lobytes 0DFF2h + .lobytes 0DFF3h + .lobytes 0DFF4h + .lobytes 0DFF5h + .lobytes 0DFF6h + .lobytes 0DFF7h + .lobytes 0DFF8h + .lobytes 0DFF9h + .lobytes 0DFFAh + .lobytes 0DFFBh + .lobytes 0DFFCh + .lobytes 0DFFDh + .lobytes 0DFFEh + .lobytes 0DFFFh + .lobytes 0E000h + .lobytes 0E001h + .lobytes 0E002h + .lobytes 0E003h + .lobytes 0E004h + .lobytes 0E005h + .lobytes 0E006h + .lobytes 0E007h + .lobytes 0E008h + .lobytes 0E009h + .lobytes 0E00Ah + .lobytes 0E00Bh + .lobytes 0E00Ch + .lobytes 0E00Dh + .lobytes 0E00Eh + .lobytes 0E00Fh + .lobytes 0EFE1h + .lobytes 0EFE2h + .lobytes 0EFE3h + .lobytes 0EFE4h + .lobytes 0EFE5h + .lobytes 0EFE6h + .lobytes 0EFE7h + .lobytes 0EFE8h + .lobytes 0EFE9h + .lobytes 0EFEAh + .lobytes 0EFEBh + .lobytes 0EFECh + .lobytes 0EFEDh + .lobytes 0EFEEh + .lobytes 0EFEFh + .lobytes 0EFF0h + .lobytes 0EFF1h + .lobytes 0EFF2h + .lobytes 0EFF3h + .lobytes 0EFF4h + .lobytes 0EFF5h + .lobytes 0EFF6h + .lobytes 0EFF7h + .lobytes 0EFF8h + .lobytes 0EFF9h + .lobytes 0EFFAh + .lobytes 0EFFBh + .lobytes 0EFFCh + .lobytes 0EFFDh + .lobytes 0EFFEh + .lobytes 0EFFFh + .lobytes 0F000h + .lobytes 0F001h + .lobytes 0F002h + .lobytes 0F003h + .lobytes 0F004h + .lobytes 0F005h + .lobytes 0F006h + .lobytes 0F007h + .lobytes 0F008h + .lobytes 0F009h + .lobytes 0F00Ah + .lobytes 0F00Bh + .lobytes 0F00Ch + .lobytes 0F00Dh + .lobytes 0F00Eh + .lobytes 0F00Fh + .lobytes 0FFE1h + .lobytes 0FFE2h + .lobytes 0FFE3h + .lobytes 0FFE4h + .lobytes 0FFE5h + .lobytes 0FFE6h + .lobytes 0FFE7h + .lobytes 0FFE8h + .lobytes 0FFE9h + .lobytes 0FFEAh + .lobytes 0FFEBh + .lobytes 0FFECh + .lobytes 0FFEDh + .lobytes 0FFEEh + .lobytes 0FFEFh + .lobytes 0FFF0h + .lobytes 0FFF1h + .lobytes 0FFF2h + .lobytes 0FFF3h + .lobytes 0FFF4h + .lobytes 0FFF5h + .lobytes 0FFF6h + .lobytes 0FFF7h + .lobytes 0FFF8h + .lobytes 0FFF9h + .lobytes 0FFFAh + .lobytes 0FFFBh + .lobytes 0FFFCh + .lobytes 0FFFDh + .lobytes 0FFFEh + .lobytes 0FFFFh + + ; alternative hex values, always leading zero + .lobytes 00h + .lobytes 01h + .lobytes 02h + .lobytes 03h + .lobytes 04h + .lobytes 05h + .lobytes 06h + .lobytes 07h + .lobytes 08h + .lobytes 09h + .lobytes 0ah + .lobytes 0bh + .lobytes 0ch + .lobytes 0dh + .lobytes 0eh + .lobytes 0fh + .lobytes 010h + .lobytes 011h + .lobytes 012h + .lobytes 013h + .lobytes 070h + .lobytes 071h + .lobytes 072h + .lobytes 073h + .lobytes 074h + .lobytes 075h + .lobytes 076h + .lobytes 077h + .lobytes 078h + .lobytes 079h + .lobytes 07ah + .lobytes 07bh + .lobytes 07ch + .lobytes 07dh + .lobytes 07eh + .lobytes 07fh + .lobytes 080h + .lobytes 081h + .lobytes 082h + .lobytes 083h + .lobytes 084h + .lobytes 085h + .lobytes 086h + .lobytes 0f0h + .lobytes 0f1h + .lobytes 0f2h + .lobytes 0f3h + .lobytes 0f4h + .lobytes 0f5h + .lobytes 0f6h + .lobytes 0f7h + .lobytes 0f8h + .lobytes 0f9h + .lobytes 0fah + .lobytes 0fbh + .lobytes 0fch + .lobytes 0fdh + .lobytes 0feh + .lobytes 0ffh + .lobytes 0100h + .lobytes 0101h + .lobytes 0102h + .lobytes 0103h + .lobytes 0fd2h + .lobytes 0fd3h + .lobytes 0fd4h + .lobytes 0fd5h + .lobytes 0fd6h + .lobytes 0fd7h + .lobytes 0fd8h + .lobytes 0fd9h + .lobytes 0fdah + .lobytes 0fdbh + .lobytes 0fdch + .lobytes 0fddh + .lobytes 0fdeh + .lobytes 0fdfh + .lobytes 0fe0h + .lobytes 0fe1h + .lobytes 0fe2h + .lobytes 0fe3h + .lobytes 0fe4h + .lobytes 0fe5h + .lobytes 0fe6h + .lobytes 0fe7h + .lobytes 0fe8h + .lobytes 0fe9h + .lobytes 0feah + .lobytes 0febh + .lobytes 0fech + .lobytes 0fedh + .lobytes 0feeh + .lobytes 0fefh + .lobytes 0ff0h + .lobytes 0ff1h + .lobytes 0ff2h + .lobytes 0ff3h + .lobytes 0ff4h + .lobytes 0ff5h + .lobytes 0ff6h + .lobytes 0ff7h + .lobytes 0ff8h + .lobytes 0ff9h + .lobytes 0ffah + .lobytes 0ffbh + .lobytes 0ffch + .lobytes 0ffdh + .lobytes 0ffeh + .lobytes 0fffh + .lobytes 01000h + .lobytes 01001h + .lobytes 01002h + .lobytes 01003h + .lobytes 01004h + .lobytes 01005h + .lobytes 01006h + .lobytes 01007h + .lobytes 01008h + .lobytes 07ff0h + .lobytes 07ff1h + .lobytes 07ff2h + .lobytes 07ff3h + .lobytes 07ff4h + .lobytes 07ff5h + .lobytes 07ff6h + .lobytes 07ff7h + .lobytes 07ff8h + .lobytes 07ff9h + .lobytes 07ffah + .lobytes 07ffbh + .lobytes 07ffch + .lobytes 07ffdh + .lobytes 07ffeh + .lobytes 07fffh + .lobytes 08000h + .lobytes 08001h + .lobytes 08002h + .lobytes 08003h + .lobytes 08004h + .lobytes 08005h + .lobytes 08006h + .lobytes 08007h + .lobytes 08008h + .lobytes 08009h + .lobytes 0800ah + .lobytes 0800bh + .lobytes 09fe1h + .lobytes 09fe2h + .lobytes 09fe3h + .lobytes 09fe4h + .lobytes 09fe5h + .lobytes 09fe6h + .lobytes 09fe7h + .lobytes 09fe8h + .lobytes 09fe9h + .lobytes 09feah + .lobytes 09febh + .lobytes 09fech + .lobytes 09fedh + .lobytes 09feeh + .lobytes 09fefh + .lobytes 09ff0h + .lobytes 09ff1h + .lobytes 09ff2h + .lobytes 09ff3h + .lobytes 09ff4h + .lobytes 09ff5h + .lobytes 09ff6h + .lobytes 09ff7h + .lobytes 09ff8h + .lobytes 09ff9h + .lobytes 09ffah + .lobytes 09ffbh + .lobytes 09ffch + .lobytes 09ffdh + .lobytes 09ffeh + .lobytes 09fffh + .lobytes 0a000h + .lobytes 0a001h + .lobytes 0a002h + .lobytes 0a003h + .lobytes 0a004h + .lobytes 0a005h + .lobytes 0a006h + .lobytes 0a007h + .lobytes 0a008h + .lobytes 0a009h + .lobytes 0a00ah + .lobytes 0a00bh + .lobytes 0a00ch + .lobytes 0a00dh + .lobytes 0a00eh + .lobytes 0a00fh + .lobytes 0afe1h + .lobytes 0afe2h + .lobytes 0afe3h + .lobytes 0afe4h + .lobytes 0afe5h + .lobytes 0afe6h + .lobytes 0afe7h + .lobytes 0afe8h + .lobytes 0afe9h + .lobytes 0afeah + .lobytes 0afebh + .lobytes 0afech + .lobytes 0afedh + .lobytes 0afeeh + .lobytes 0afefh + .lobytes 0aff0h + .lobytes 0aff1h + .lobytes 0aff2h + .lobytes 0aff3h + .lobytes 0aff4h + .lobytes 0aff5h + .lobytes 0aff6h + .lobytes 0aff7h + .lobytes 0aff8h + .lobytes 0aff9h + .lobytes 0affah + .lobytes 0affbh + .lobytes 0affch + .lobytes 0affdh + .lobytes 0affeh + .lobytes 0afffh + .lobytes 0b000h + .lobytes 0b001h + .lobytes 0b002h + .lobytes 0b003h + .lobytes 0b004h + .lobytes 0b005h + .lobytes 0b006h + .lobytes 0b007h + .lobytes 0b008h + .lobytes 0b009h + .lobytes 0b00ah + .lobytes 0b00bh + .lobytes 0b00ch + .lobytes 0b00dh + .lobytes 0b00eh + .lobytes 0b00fh + .lobytes 0bfe1h + .lobytes 0bfe2h + .lobytes 0bfe3h + .lobytes 0bfe4h + .lobytes 0bfe5h + .lobytes 0bfe6h + .lobytes 0bfe7h + .lobytes 0bfe8h + .lobytes 0bfe9h + .lobytes 0bfeah + .lobytes 0bfebh + .lobytes 0bfech + .lobytes 0bfedh + .lobytes 0bfeeh + .lobytes 0bfefh + .lobytes 0bff0h + .lobytes 0bff1h + .lobytes 0bff2h + .lobytes 0bff3h + .lobytes 0bff4h + .lobytes 0bff5h + .lobytes 0bff6h + .lobytes 0bff7h + .lobytes 0bff8h + .lobytes 0bff9h + .lobytes 0bffah + .lobytes 0bffbh + .lobytes 0bffch + .lobytes 0bffdh + .lobytes 0bffeh + .lobytes 0bfffh + .lobytes 0c000h + .lobytes 0c001h + .lobytes 0c002h + .lobytes 0c003h + .lobytes 0c004h + .lobytes 0c005h + .lobytes 0c006h + .lobytes 0c007h + .lobytes 0c008h + .lobytes 0c009h + .lobytes 0c00ah + .lobytes 0c00bh + .lobytes 0c00ch + .lobytes 0c00dh + .lobytes 0c00eh + .lobytes 0c00fh + .lobytes 0cfe1h + .lobytes 0cfe2h + .lobytes 0cfe3h + .lobytes 0cfe4h + .lobytes 0cfe5h + .lobytes 0cfe6h + .lobytes 0cfe7h + .lobytes 0cfe8h + .lobytes 0cfe9h + .lobytes 0cfeah + .lobytes 0cfebh + .lobytes 0cfech + .lobytes 0cfedh + .lobytes 0cfeeh + .lobytes 0cfefh + .lobytes 0cff0h + .lobytes 0cff1h + .lobytes 0cff2h + .lobytes 0cff3h + .lobytes 0cff4h + .lobytes 0cff5h + .lobytes 0cff6h + .lobytes 0cff7h + .lobytes 0cff8h + .lobytes 0cff9h + .lobytes 0cffah + .lobytes 0cffbh + .lobytes 0cffch + .lobytes 0cffdh + .lobytes 0cffeh + .lobytes 0cfffh + .lobytes 0d000h + .lobytes 0d001h + .lobytes 0d002h + .lobytes 0d003h + .lobytes 0d004h + .lobytes 0d005h + .lobytes 0d006h + .lobytes 0d007h + .lobytes 0d008h + .lobytes 0d009h + .lobytes 0d00ah + .lobytes 0d00bh + .lobytes 0d00ch + .lobytes 0d00dh + .lobytes 0d00eh + .lobytes 0d00fh + .lobytes 0dfe1h + .lobytes 0dfe2h + .lobytes 0dfe3h + .lobytes 0dfe4h + .lobytes 0dfe5h + .lobytes 0dfe6h + .lobytes 0dfe7h + .lobytes 0dfe8h + .lobytes 0dfe9h + .lobytes 0dfeah + .lobytes 0dfebh + .lobytes 0dfech + .lobytes 0dfedh + .lobytes 0dfeeh + .lobytes 0dfefh + .lobytes 0dff0h + .lobytes 0dff1h + .lobytes 0dff2h + .lobytes 0dff3h + .lobytes 0dff4h + .lobytes 0dff5h + .lobytes 0dff6h + .lobytes 0dff7h + .lobytes 0dff8h + .lobytes 0dff9h + .lobytes 0dffah + .lobytes 0dffbh + .lobytes 0dffch + .lobytes 0dffdh + .lobytes 0dffeh + .lobytes 0dfffh + .lobytes 0e000h + .lobytes 0e001h + .lobytes 0e002h + .lobytes 0e003h + .lobytes 0e004h + .lobytes 0e005h + .lobytes 0e006h + .lobytes 0e007h + .lobytes 0e008h + .lobytes 0e009h + .lobytes 0e00ah + .lobytes 0e00bh + .lobytes 0e00ch + .lobytes 0e00dh + .lobytes 0e00eh + .lobytes 0e00fh + .lobytes 0efe1h + .lobytes 0efe2h + .lobytes 0efe3h + .lobytes 0efe4h + .lobytes 0efe5h + .lobytes 0efe6h + .lobytes 0efe7h + .lobytes 0efe8h + .lobytes 0efe9h + .lobytes 0efeah + .lobytes 0efebh + .lobytes 0efech + .lobytes 0efedh + .lobytes 0efeeh + .lobytes 0efefh + .lobytes 0eff0h + .lobytes 0eff1h + .lobytes 0eff2h + .lobytes 0eff3h + .lobytes 0eff4h + .lobytes 0eff5h + .lobytes 0eff6h + .lobytes 0eff7h + .lobytes 0eff8h + .lobytes 0eff9h + .lobytes 0effah + .lobytes 0effbh + .lobytes 0effch + .lobytes 0effdh + .lobytes 0effeh + .lobytes 0efffh + .lobytes 0f000h + .lobytes 0f001h + .lobytes 0f002h + .lobytes 0f003h + .lobytes 0f004h + .lobytes 0f005h + .lobytes 0f006h + .lobytes 0f007h + .lobytes 0f008h + .lobytes 0f009h + .lobytes 0f00ah + .lobytes 0f00bh + .lobytes 0f00ch + .lobytes 0f00dh + .lobytes 0f00eh + .lobytes 0f00fh + .lobytes 0ffe1h + .lobytes 0ffe2h + .lobytes 0ffe3h + .lobytes 0ffe4h + .lobytes 0ffe5h + .lobytes 0ffe6h + .lobytes 0ffe7h + .lobytes 0ffe8h + .lobytes 0ffe9h + .lobytes 0ffeah + .lobytes 0ffebh + .lobytes 0ffech + .lobytes 0ffedh + .lobytes 0ffeeh + .lobytes 0ffefh + .lobytes 0fff0h + .lobytes 0fff1h + .lobytes 0fff2h + .lobytes 0fff3h + .lobytes 0fff4h + .lobytes 0fff5h + .lobytes 0fff6h + .lobytes 0fff7h + .lobytes 0fff8h + .lobytes 0fff9h + .lobytes 0fffah + .lobytes 0fffbh + .lobytes 0fffch + .lobytes 0fffdh + .lobytes 0fffeh + .lobytes 0ffffh + + ; binary values, variable length + .lobytes %0 + .lobytes %01 + .lobytes %010 + .lobytes %011 + .lobytes %0100 + .lobytes %0101 + .lobytes %0110 + .lobytes %0111 + .lobytes %01000 + .lobytes %01001 + .lobytes %01010 + .lobytes %01011 + .lobytes %01100 + .lobytes %01101 + .lobytes %01110 + .lobytes %01111 + .lobytes %010000 + .lobytes %010001 + .lobytes %010010 + .lobytes %010011 + .lobytes %01110000 + .lobytes %01110001 + .lobytes %01110010 + .lobytes %01110011 + .lobytes %01110100 + .lobytes %01110101 + .lobytes %01110110 + .lobytes %01110111 + .lobytes %01111000 + .lobytes %01111001 + .lobytes %01111010 + .lobytes %01111011 + .lobytes %01111100 + .lobytes %01111101 + .lobytes %01111110 + .lobytes %01111111 + .lobytes %010000000 + .lobytes %010000001 + .lobytes %010000010 + .lobytes %010000011 + .lobytes %010000100 + .lobytes %010000101 + .lobytes %010000110 + .lobytes %011110000 + .lobytes %011110001 + .lobytes %011110010 + .lobytes %011110011 + .lobytes %011110100 + .lobytes %011110101 + .lobytes %011110110 + .lobytes %011110111 + .lobytes %011111000 + .lobytes %011111001 + .lobytes %011111010 + .lobytes %011111011 + .lobytes %011111100 + .lobytes %011111101 + .lobytes %011111110 + .lobytes %011111111 + .lobytes %100000000 + .lobytes %100000001 + .lobytes %100000010 + .lobytes %100000011 + .lobytes %111111010010 + .lobytes %111111010011 + .lobytes %111111010100 + .lobytes %111111010101 + .lobytes %111111010110 + .lobytes %111111010111 + .lobytes %111111011000 + .lobytes %111111011001 + .lobytes %111111011010 + .lobytes %111111011011 + .lobytes %111111011100 + .lobytes %111111011101 + .lobytes %111111011110 + .lobytes %111111011111 + .lobytes %111111100000 + .lobytes %111111100001 + .lobytes %111111100010 + .lobytes %111111100011 + .lobytes %111111100100 + .lobytes %111111100101 + .lobytes %111111100110 + .lobytes %111111100111 + .lobytes %111111101000 + .lobytes %111111101001 + .lobytes %111111101010 + .lobytes %111111101011 + .lobytes %111111101100 + .lobytes %111111101101 + .lobytes %111111101110 + .lobytes %111111101111 + .lobytes %111111110000 + .lobytes %111111110001 + .lobytes %111111110010 + .lobytes %111111110011 + .lobytes %111111110100 + .lobytes %111111110101 + .lobytes %111111110110 + .lobytes %111111110111 + .lobytes %111111111000 + .lobytes %111111111001 + .lobytes %111111111010 + .lobytes %111111111011 + .lobytes %111111111100 + .lobytes %111111111101 + .lobytes %111111111110 + .lobytes %111111111111 + .lobytes %1000000000000 + .lobytes %1000000000001 + .lobytes %1000000000010 + .lobytes %1000000000011 + .lobytes %1000000000100 + .lobytes %1000000000101 + .lobytes %1000000000110 + .lobytes %1000000000111 + .lobytes %1000000001000 + .lobytes %111111111110000 + .lobytes %111111111110001 + .lobytes %111111111110010 + .lobytes %111111111110011 + .lobytes %111111111110100 + .lobytes %111111111110101 + .lobytes %111111111110110 + .lobytes %111111111110111 + .lobytes %111111111111000 + .lobytes %111111111111001 + .lobytes %111111111111010 + .lobytes %111111111111011 + .lobytes %111111111111100 + .lobytes %111111111111101 + .lobytes %111111111111110 + .lobytes %111111111111111 + .lobytes %1000000000000000 + .lobytes %1000000000000001 + .lobytes %1000000000000010 + .lobytes %1000000000000011 + .lobytes %1000000000000100 + .lobytes %1000000000000101 + .lobytes %1000000000000110 + .lobytes %1000000000000111 + .lobytes %1000000000001000 + .lobytes %1000000000001001 + .lobytes %1000000000001010 + .lobytes %1000000000001011 + .lobytes %1001111111100001 + .lobytes %1001111111100010 + .lobytes %1001111111100011 + .lobytes %1001111111100100 + .lobytes %1001111111100101 + .lobytes %1001111111100110 + .lobytes %1001111111100111 + .lobytes %1001111111101000 + .lobytes %1001111111101001 + .lobytes %1001111111101010 + .lobytes %1001111111101011 + .lobytes %1001111111101100 + .lobytes %1001111111101101 + .lobytes %1001111111101110 + .lobytes %1001111111101111 + .lobytes %1001111111110000 + .lobytes %1001111111110001 + .lobytes %1001111111110010 + .lobytes %1001111111110011 + .lobytes %1001111111110100 + .lobytes %1001111111110101 + .lobytes %1001111111110110 + .lobytes %1001111111110111 + .lobytes %1001111111111000 + .lobytes %1001111111111001 + .lobytes %1001111111111010 + .lobytes %1001111111111011 + .lobytes %1001111111111100 + .lobytes %1001111111111101 + .lobytes %1001111111111110 + .lobytes %1001111111111111 + .lobytes %1010000000000000 + .lobytes %1010000000000001 + .lobytes %1010000000000010 + .lobytes %1010000000000011 + .lobytes %1010000000000100 + .lobytes %1010000000000101 + .lobytes %1010000000000110 + .lobytes %1010000000000111 + .lobytes %1010000000001000 + .lobytes %1010000000001001 + .lobytes %1010000000001010 + .lobytes %1010000000001011 + .lobytes %1010000000001100 + .lobytes %1010000000001101 + .lobytes %1010000000001110 + .lobytes %1010000000001111 + .lobytes %1010111111100001 + .lobytes %1010111111100010 + .lobytes %1010111111100011 + .lobytes %1010111111100100 + .lobytes %1010111111100101 + .lobytes %1010111111100110 + .lobytes %1010111111100111 + .lobytes %1010111111101000 + .lobytes %1010111111101001 + .lobytes %1010111111101010 + .lobytes %1010111111101011 + .lobytes %1010111111101100 + .lobytes %1010111111101101 + .lobytes %1010111111101110 + .lobytes %1010111111101111 + .lobytes %1010111111110000 + .lobytes %1010111111110001 + .lobytes %1010111111110010 + .lobytes %1010111111110011 + .lobytes %1010111111110100 + .lobytes %1010111111110101 + .lobytes %1010111111110110 + .lobytes %1010111111110111 + .lobytes %1010111111111000 + .lobytes %1010111111111001 + .lobytes %1010111111111010 + .lobytes %1010111111111011 + .lobytes %1010111111111100 + .lobytes %1010111111111101 + .lobytes %1010111111111110 + .lobytes %1010111111111111 + .lobytes %1011000000000000 + .lobytes %1011000000000001 + .lobytes %1011000000000010 + .lobytes %1011000000000011 + .lobytes %1011000000000100 + .lobytes %1011000000000101 + .lobytes %1011000000000110 + .lobytes %1011000000000111 + .lobytes %1011000000001000 + .lobytes %1011000000001001 + .lobytes %1011000000001010 + .lobytes %1011000000001011 + .lobytes %1011000000001100 + .lobytes %1011000000001101 + .lobytes %1011000000001110 + .lobytes %1011000000001111 + .lobytes %1011111111100001 + .lobytes %1011111111100010 + .lobytes %1011111111100011 + .lobytes %1011111111100100 + .lobytes %1011111111100101 + .lobytes %1011111111100110 + .lobytes %1011111111100111 + .lobytes %1011111111101000 + .lobytes %1011111111101001 + .lobytes %1011111111101010 + .lobytes %1011111111101011 + .lobytes %1011111111101100 + .lobytes %1011111111101101 + .lobytes %1011111111101110 + .lobytes %1011111111101111 + .lobytes %1011111111110000 + .lobytes %1011111111110001 + .lobytes %1011111111110010 + .lobytes %1011111111110011 + .lobytes %1011111111110100 + .lobytes %1011111111110101 + .lobytes %1011111111110110 + .lobytes %1011111111110111 + .lobytes %1011111111111000 + .lobytes %1011111111111001 + .lobytes %1011111111111010 + .lobytes %1011111111111011 + .lobytes %1011111111111100 + .lobytes %1011111111111101 + .lobytes %1011111111111110 + .lobytes %1011111111111111 + .lobytes %1100000000000000 + .lobytes %1100000000000001 + .lobytes %1100000000000010 + .lobytes %1100000000000011 + .lobytes %1100000000000100 + .lobytes %1100000000000101 + .lobytes %1100000000000110 + .lobytes %1100000000000111 + .lobytes %1100000000001000 + .lobytes %1100000000001001 + .lobytes %1100000000001010 + .lobytes %1100000000001011 + .lobytes %1100000000001100 + .lobytes %1100000000001101 + .lobytes %1100000000001110 + .lobytes %1100000000001111 + .lobytes %1100111111100001 + .lobytes %1100111111100010 + .lobytes %1100111111100011 + .lobytes %1100111111100100 + .lobytes %1100111111100101 + .lobytes %1100111111100110 + .lobytes %1100111111100111 + .lobytes %1100111111101000 + .lobytes %1100111111101001 + .lobytes %1100111111101010 + .lobytes %1100111111101011 + .lobytes %1100111111101100 + .lobytes %1100111111101101 + .lobytes %1100111111101110 + .lobytes %1100111111101111 + .lobytes %1100111111110000 + .lobytes %1100111111110001 + .lobytes %1100111111110010 + .lobytes %1100111111110011 + .lobytes %1100111111110100 + .lobytes %1100111111110101 + .lobytes %1100111111110110 + .lobytes %1100111111110111 + .lobytes %1100111111111000 + .lobytes %1100111111111001 + .lobytes %1100111111111010 + .lobytes %1100111111111011 + .lobytes %1100111111111100 + .lobytes %1100111111111101 + .lobytes %1100111111111110 + .lobytes %1100111111111111 + .lobytes %1101000000000000 + .lobytes %1101000000000001 + .lobytes %1101000000000010 + .lobytes %1101000000000011 + .lobytes %1101000000000100 + .lobytes %1101000000000101 + .lobytes %1101000000000110 + .lobytes %1101000000000111 + .lobytes %1101000000001000 + .lobytes %1101000000001001 + .lobytes %1101000000001010 + .lobytes %1101000000001011 + .lobytes %1101000000001100 + .lobytes %1101000000001101 + .lobytes %1101000000001110 + .lobytes %1101000000001111 + .lobytes %1101111111100001 + .lobytes %1101111111100010 + .lobytes %1101111111100011 + .lobytes %1101111111100100 + .lobytes %1101111111100101 + .lobytes %1101111111100110 + .lobytes %1101111111100111 + .lobytes %1101111111101000 + .lobytes %1101111111101001 + .lobytes %1101111111101010 + .lobytes %1101111111101011 + .lobytes %1101111111101100 + .lobytes %1101111111101101 + .lobytes %1101111111101110 + .lobytes %1101111111101111 + .lobytes %1101111111110000 + .lobytes %1101111111110001 + .lobytes %1101111111110010 + .lobytes %1101111111110011 + .lobytes %1101111111110100 + .lobytes %1101111111110101 + .lobytes %1101111111110110 + .lobytes %1101111111110111 + .lobytes %1101111111111000 + .lobytes %1101111111111001 + .lobytes %1101111111111010 + .lobytes %1101111111111011 + .lobytes %1101111111111100 + .lobytes %1101111111111101 + .lobytes %1101111111111110 + .lobytes %1101111111111111 + .lobytes %1110000000000000 + .lobytes %1110000000000001 + .lobytes %1110000000000010 + .lobytes %1110000000000011 + .lobytes %1110000000000100 + .lobytes %1110000000000101 + .lobytes %1110000000000110 + .lobytes %1110000000000111 + .lobytes %1110000000001000 + .lobytes %1110000000001001 + .lobytes %1110000000001010 + .lobytes %1110000000001011 + .lobytes %1110000000001100 + .lobytes %1110000000001101 + .lobytes %1110000000001110 + .lobytes %1110000000001111 + .lobytes %1110111111100001 + .lobytes %1110111111100010 + .lobytes %1110111111100011 + .lobytes %1110111111100100 + .lobytes %1110111111100101 + .lobytes %1110111111100110 + .lobytes %1110111111100111 + .lobytes %1110111111101000 + .lobytes %1110111111101001 + .lobytes %1110111111101010 + .lobytes %1110111111101011 + .lobytes %1110111111101100 + .lobytes %1110111111101101 + .lobytes %1110111111101110 + .lobytes %1110111111101111 + .lobytes %1110111111110000 + .lobytes %1110111111110001 + .lobytes %1110111111110010 + .lobytes %1110111111110011 + .lobytes %1110111111110100 + .lobytes %1110111111110101 + .lobytes %1110111111110110 + .lobytes %1110111111110111 + .lobytes %1110111111111000 + .lobytes %1110111111111001 + .lobytes %1110111111111010 + .lobytes %1110111111111011 + .lobytes %1110111111111100 + .lobytes %1110111111111101 + .lobytes %1110111111111110 + .lobytes %1110111111111111 + .lobytes %1111000000000000 + .lobytes %1111000000000001 + .lobytes %1111000000000010 + .lobytes %1111000000000011 + .lobytes %1111000000000100 + .lobytes %1111000000000101 + .lobytes %1111000000000110 + .lobytes %1111000000000111 + .lobytes %1111000000001000 + .lobytes %1111000000001001 + .lobytes %1111000000001010 + .lobytes %1111000000001011 + .lobytes %1111000000001100 + .lobytes %1111000000001101 + .lobytes %1111000000001110 + .lobytes %1111000000001111 + .lobytes %1111111111100001 + .lobytes %1111111111100010 + .lobytes %1111111111100011 + .lobytes %1111111111100100 + .lobytes %1111111111100101 + .lobytes %1111111111100110 + .lobytes %1111111111100111 + .lobytes %1111111111101000 + .lobytes %1111111111101001 + .lobytes %1111111111101010 + .lobytes %1111111111101011 + .lobytes %1111111111101100 + .lobytes %1111111111101101 + .lobytes %1111111111101110 + .lobytes %1111111111101111 + .lobytes %1111111111110000 + .lobytes %1111111111110001 + .lobytes %1111111111110010 + .lobytes %1111111111110011 + .lobytes %1111111111110100 + .lobytes %1111111111110101 + .lobytes %1111111111110110 + .lobytes %1111111111110111 + .lobytes %1111111111111000 + .lobytes %1111111111111001 + .lobytes %1111111111111010 + .lobytes %1111111111111011 + .lobytes %1111111111111100 + .lobytes %1111111111111101 + .lobytes %1111111111111110 + .lobytes %1111111111111111 + + ; binary values, full length + .lobytes %0000000000000000 + .lobytes %0000000000000001 + .lobytes %0000000000000010 + .lobytes %0000000000000011 + .lobytes %0000000000000100 + .lobytes %0000000000000101 + .lobytes %0000000000000110 + .lobytes %0000000000000111 + .lobytes %0000000000001000 + .lobytes %0000000000001001 + .lobytes %0000000000001010 + .lobytes %0000000000001011 + .lobytes %0000000000001100 + .lobytes %0000000000001101 + .lobytes %0000000000001110 + .lobytes %0000000000001111 + .lobytes %0000000000010000 + .lobytes %0000000000010001 + .lobytes %0000000000010010 + .lobytes %0000000000010011 + .lobytes %0000000001110000 + .lobytes %0000000001110001 + .lobytes %0000000001110010 + .lobytes %0000000001110011 + .lobytes %0000000001110100 + .lobytes %0000000001110101 + .lobytes %0000000001110110 + .lobytes %0000000001110111 + .lobytes %0000000001111000 + .lobytes %0000000001111001 + .lobytes %0000000001111010 + .lobytes %0000000001111011 + .lobytes %0000000001111100 + .lobytes %0000000001111101 + .lobytes %0000000001111110 + .lobytes %0000000001111111 + .lobytes %0000000010000000 + .lobytes %0000000010000001 + .lobytes %0000000010000010 + .lobytes %0000000010000011 + .lobytes %0000000010000100 + .lobytes %0000000010000101 + .lobytes %0000000010000110 + .lobytes %0000000011110000 + .lobytes %0000000011110001 + .lobytes %0000000011110010 + .lobytes %0000000011110011 + .lobytes %0000000011110100 + .lobytes %0000000011110101 + .lobytes %0000000011110110 + .lobytes %0000000011110111 + .lobytes %0000000011111000 + .lobytes %0000000011111001 + .lobytes %0000000011111010 + .lobytes %0000000011111011 + .lobytes %0000000011111100 + .lobytes %0000000011111101 + .lobytes %0000000011111110 + .lobytes %0000000011111111 + .lobytes %0000000100000000 + .lobytes %0000000100000001 + .lobytes %0000000100000010 + .lobytes %0000000100000011 + .lobytes %0000111111010010 + .lobytes %0000111111010011 + .lobytes %0000111111010100 + .lobytes %0000111111010101 + .lobytes %0000111111010110 + .lobytes %0000111111010111 + .lobytes %0000111111011000 + .lobytes %0000111111011001 + .lobytes %0000111111011010 + .lobytes %0000111111011011 + .lobytes %0000111111011100 + .lobytes %0000111111011101 + .lobytes %0000111111011110 + .lobytes %0000111111011111 + .lobytes %0000111111100000 + .lobytes %0000111111100001 + .lobytes %0000111111100010 + .lobytes %0000111111100011 + .lobytes %0000111111100100 + .lobytes %0000111111100101 + .lobytes %0000111111100110 + .lobytes %0000111111100111 + .lobytes %0000111111101000 + .lobytes %0000111111101001 + .lobytes %0000111111101010 + .lobytes %0000111111101011 + .lobytes %0000111111101100 + .lobytes %0000111111101101 + .lobytes %0000111111101110 + .lobytes %0000111111101111 + .lobytes %0000111111110000 + .lobytes %0000111111110001 + .lobytes %0000111111110010 + .lobytes %0000111111110011 + .lobytes %0000111111110100 + .lobytes %0000111111110101 + .lobytes %0000111111110110 + .lobytes %0000111111110111 + .lobytes %0000111111111000 + .lobytes %0000111111111001 + .lobytes %0000111111111010 + .lobytes %0000111111111011 + .lobytes %0000111111111100 + .lobytes %0000111111111101 + .lobytes %0000111111111110 + .lobytes %0000111111111111 + .lobytes %0001000000000000 + .lobytes %0001000000000001 + .lobytes %0001000000000010 + .lobytes %0001000000000011 + .lobytes %0001000000000100 + .lobytes %0001000000000101 + .lobytes %0001000000000110 + .lobytes %0001000000000111 + .lobytes %0001000000001000 + .lobytes %0111111111110000 + .lobytes %0111111111110001 + .lobytes %0111111111110010 + .lobytes %0111111111110011 + .lobytes %0111111111110100 + .lobytes %0111111111110101 + .lobytes %0111111111110110 + .lobytes %0111111111110111 + .lobytes %0111111111111000 + .lobytes %0111111111111001 + .lobytes %0111111111111010 + .lobytes %0111111111111011 + .lobytes %0111111111111100 + .lobytes %0111111111111101 + .lobytes %0111111111111110 + .lobytes %0111111111111111 + .lobytes %1000000000000000 + .lobytes %1000000000000001 + .lobytes %1000000000000010 + .lobytes %1000000000000011 + .lobytes %1000000000000100 + .lobytes %1000000000000101 + .lobytes %1000000000000110 + .lobytes %1000000000000111 + .lobytes %1000000000001000 + .lobytes %1000000000001001 + .lobytes %1000000000001010 + .lobytes %1000000000001011 + .lobytes %1001111111100001 + .lobytes %1001111111100010 + .lobytes %1001111111100011 + .lobytes %1001111111100100 + .lobytes %1001111111100101 + .lobytes %1001111111100110 + .lobytes %1001111111100111 + .lobytes %1001111111101000 + .lobytes %1001111111101001 + .lobytes %1001111111101010 + .lobytes %1001111111101011 + .lobytes %1001111111101100 + .lobytes %1001111111101101 + .lobytes %1001111111101110 + .lobytes %1001111111101111 + .lobytes %1001111111110000 + .lobytes %1001111111110001 + .lobytes %1001111111110010 + .lobytes %1001111111110011 + .lobytes %1001111111110100 + .lobytes %1001111111110101 + .lobytes %1001111111110110 + .lobytes %1001111111110111 + .lobytes %1001111111111000 + .lobytes %1001111111111001 + .lobytes %1001111111111010 + .lobytes %1001111111111011 + .lobytes %1001111111111100 + .lobytes %1001111111111101 + .lobytes %1001111111111110 + .lobytes %1001111111111111 + .lobytes %1010000000000000 + .lobytes %1010000000000001 + .lobytes %1010000000000010 + .lobytes %1010000000000011 + .lobytes %1010000000000100 + .lobytes %1010000000000101 + .lobytes %1010000000000110 + .lobytes %1010000000000111 + .lobytes %1010000000001000 + .lobytes %1010000000001001 + .lobytes %1010000000001010 + .lobytes %1010000000001011 + .lobytes %1010000000001100 + .lobytes %1010000000001101 + .lobytes %1010000000001110 + .lobytes %1010000000001111 + .lobytes %1010111111100001 + .lobytes %1010111111100010 + .lobytes %1010111111100011 + .lobytes %1010111111100100 + .lobytes %1010111111100101 + .lobytes %1010111111100110 + .lobytes %1010111111100111 + .lobytes %1010111111101000 + .lobytes %1010111111101001 + .lobytes %1010111111101010 + .lobytes %1010111111101011 + .lobytes %1010111111101100 + .lobytes %1010111111101101 + .lobytes %1010111111101110 + .lobytes %1010111111101111 + .lobytes %1010111111110000 + .lobytes %1010111111110001 + .lobytes %1010111111110010 + .lobytes %1010111111110011 + .lobytes %1010111111110100 + .lobytes %1010111111110101 + .lobytes %1010111111110110 + .lobytes %1010111111110111 + .lobytes %1010111111111000 + .lobytes %1010111111111001 + .lobytes %1010111111111010 + .lobytes %1010111111111011 + .lobytes %1010111111111100 + .lobytes %1010111111111101 + .lobytes %1010111111111110 + .lobytes %1010111111111111 + .lobytes %1011000000000000 + .lobytes %1011000000000001 + .lobytes %1011000000000010 + .lobytes %1011000000000011 + .lobytes %1011000000000100 + .lobytes %1011000000000101 + .lobytes %1011000000000110 + .lobytes %1011000000000111 + .lobytes %1011000000001000 + .lobytes %1011000000001001 + .lobytes %1011000000001010 + .lobytes %1011000000001011 + .lobytes %1011000000001100 + .lobytes %1011000000001101 + .lobytes %1011000000001110 + .lobytes %1011000000001111 + .lobytes %1011111111100001 + .lobytes %1011111111100010 + .lobytes %1011111111100011 + .lobytes %1011111111100100 + .lobytes %1011111111100101 + .lobytes %1011111111100110 + .lobytes %1011111111100111 + .lobytes %1011111111101000 + .lobytes %1011111111101001 + .lobytes %1011111111101010 + .lobytes %1011111111101011 + .lobytes %1011111111101100 + .lobytes %1011111111101101 + .lobytes %1011111111101110 + .lobytes %1011111111101111 + .lobytes %1011111111110000 + .lobytes %1011111111110001 + .lobytes %1011111111110010 + .lobytes %1011111111110011 + .lobytes %1011111111110100 + .lobytes %1011111111110101 + .lobytes %1011111111110110 + .lobytes %1011111111110111 + .lobytes %1011111111111000 + .lobytes %1011111111111001 + .lobytes %1011111111111010 + .lobytes %1011111111111011 + .lobytes %1011111111111100 + .lobytes %1011111111111101 + .lobytes %1011111111111110 + .lobytes %1011111111111111 + .lobytes %1100000000000000 + .lobytes %1100000000000001 + .lobytes %1100000000000010 + .lobytes %1100000000000011 + .lobytes %1100000000000100 + .lobytes %1100000000000101 + .lobytes %1100000000000110 + .lobytes %1100000000000111 + .lobytes %1100000000001000 + .lobytes %1100000000001001 + .lobytes %1100000000001010 + .lobytes %1100000000001011 + .lobytes %1100000000001100 + .lobytes %1100000000001101 + .lobytes %1100000000001110 + .lobytes %1100000000001111 + .lobytes %1100111111100001 + .lobytes %1100111111100010 + .lobytes %1100111111100011 + .lobytes %1100111111100100 + .lobytes %1100111111100101 + .lobytes %1100111111100110 + .lobytes %1100111111100111 + .lobytes %1100111111101000 + .lobytes %1100111111101001 + .lobytes %1100111111101010 + .lobytes %1100111111101011 + .lobytes %1100111111101100 + .lobytes %1100111111101101 + .lobytes %1100111111101110 + .lobytes %1100111111101111 + .lobytes %1100111111110000 + .lobytes %1100111111110001 + .lobytes %1100111111110010 + .lobytes %1100111111110011 + .lobytes %1100111111110100 + .lobytes %1100111111110101 + .lobytes %1100111111110110 + .lobytes %1100111111110111 + .lobytes %1100111111111000 + .lobytes %1100111111111001 + .lobytes %1100111111111010 + .lobytes %1100111111111011 + .lobytes %1100111111111100 + .lobytes %1100111111111101 + .lobytes %1100111111111110 + .lobytes %1100111111111111 + .lobytes %1101000000000000 + .lobytes %1101000000000001 + .lobytes %1101000000000010 + .lobytes %1101000000000011 + .lobytes %1101000000000100 + .lobytes %1101000000000101 + .lobytes %1101000000000110 + .lobytes %1101000000000111 + .lobytes %1101000000001000 + .lobytes %1101000000001001 + .lobytes %1101000000001010 + .lobytes %1101000000001011 + .lobytes %1101000000001100 + .lobytes %1101000000001101 + .lobytes %1101000000001110 + .lobytes %1101000000001111 + .lobytes %1101111111100001 + .lobytes %1101111111100010 + .lobytes %1101111111100011 + .lobytes %1101111111100100 + .lobytes %1101111111100101 + .lobytes %1101111111100110 + .lobytes %1101111111100111 + .lobytes %1101111111101000 + .lobytes %1101111111101001 + .lobytes %1101111111101010 + .lobytes %1101111111101011 + .lobytes %1101111111101100 + .lobytes %1101111111101101 + .lobytes %1101111111101110 + .lobytes %1101111111101111 + .lobytes %1101111111110000 + .lobytes %1101111111110001 + .lobytes %1101111111110010 + .lobytes %1101111111110011 + .lobytes %1101111111110100 + .lobytes %1101111111110101 + .lobytes %1101111111110110 + .lobytes %1101111111110111 + .lobytes %1101111111111000 + .lobytes %1101111111111001 + .lobytes %1101111111111010 + .lobytes %1101111111111011 + .lobytes %1101111111111100 + .lobytes %1101111111111101 + .lobytes %1101111111111110 + .lobytes %1101111111111111 + .lobytes %1110000000000000 + .lobytes %1110000000000001 + .lobytes %1110000000000010 + .lobytes %1110000000000011 + .lobytes %1110000000000100 + .lobytes %1110000000000101 + .lobytes %1110000000000110 + .lobytes %1110000000000111 + .lobytes %1110000000001000 + .lobytes %1110000000001001 + .lobytes %1110000000001010 + .lobytes %1110000000001011 + .lobytes %1110000000001100 + .lobytes %1110000000001101 + .lobytes %1110000000001110 + .lobytes %1110000000001111 + .lobytes %1110111111100001 + .lobytes %1110111111100010 + .lobytes %1110111111100011 + .lobytes %1110111111100100 + .lobytes %1110111111100101 + .lobytes %1110111111100110 + .lobytes %1110111111100111 + .lobytes %1110111111101000 + .lobytes %1110111111101001 + .lobytes %1110111111101010 + .lobytes %1110111111101011 + .lobytes %1110111111101100 + .lobytes %1110111111101101 + .lobytes %1110111111101110 + .lobytes %1110111111101111 + .lobytes %1110111111110000 + .lobytes %1110111111110001 + .lobytes %1110111111110010 + .lobytes %1110111111110011 + .lobytes %1110111111110100 + .lobytes %1110111111110101 + .lobytes %1110111111110110 + .lobytes %1110111111110111 + .lobytes %1110111111111000 + .lobytes %1110111111111001 + .lobytes %1110111111111010 + .lobytes %1110111111111011 + .lobytes %1110111111111100 + .lobytes %1110111111111101 + .lobytes %1110111111111110 + .lobytes %1110111111111111 + .lobytes %1111000000000000 + .lobytes %1111000000000001 + .lobytes %1111000000000010 + .lobytes %1111000000000011 + .lobytes %1111000000000100 + .lobytes %1111000000000101 + .lobytes %1111000000000110 + .lobytes %1111000000000111 + .lobytes %1111000000001000 + .lobytes %1111000000001001 + .lobytes %1111000000001010 + .lobytes %1111000000001011 + .lobytes %1111000000001100 + .lobytes %1111000000001101 + .lobytes %1111000000001110 + .lobytes %1111000000001111 + .lobytes %1111111111100001 + .lobytes %1111111111100010 + .lobytes %1111111111100011 + .lobytes %1111111111100100 + .lobytes %1111111111100101 + .lobytes %1111111111100110 + .lobytes %1111111111100111 + .lobytes %1111111111101000 + .lobytes %1111111111101001 + .lobytes %1111111111101010 + .lobytes %1111111111101011 + .lobytes %1111111111101100 + .lobytes %1111111111101101 + .lobytes %1111111111101110 + .lobytes %1111111111101111 + .lobytes %1111111111110000 + .lobytes %1111111111110001 + .lobytes %1111111111110010 + .lobytes %1111111111110011 + .lobytes %1111111111110100 + .lobytes %1111111111110101 + .lobytes %1111111111110110 + .lobytes %1111111111110111 + .lobytes %1111111111111000 + .lobytes %1111111111111001 + .lobytes %1111111111111010 + .lobytes %1111111111111011 + .lobytes %1111111111111100 + .lobytes %1111111111111101 + .lobytes %1111111111111110 + .lobytes %1111111111111111 + + ; multiple values on one line, decimal + .lobytes 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 + .lobytes 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 + .lobytes 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 + .lobytes 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 + .lobytes 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 + .lobytes 256,257,258,259,260,261,262,263,264,265,266,267,268,269,270,271 + .lobytes 4064,4065,4066,4067,4068,4069,4070,4071,4072,4073,4074,4075,4076,4077,4078,4079 + .lobytes 4080,4081,4082,4083,4084,4085,4086,4087,4088,4089,4090,4091,4092,4093,4094,4095 + .lobytes 4096,4097,4098,4099,4100,4101,4102,4103,4104,4105,4106,4107,4108,4109,4110,4111 + .lobytes 32752,32753,32754,32755,32756,32757,32758,32759,32760,32761,32762,32763,32764,32765,32766,32767 + .lobytes 32768,32769,32770,32771,32772,32773,32774,32775,32776,32777,32778,32779,32780,32781,32782,32783 + .lobytes 40944,40945,40946,40947,40948,40949,40950,40951,40952,40953,40954,40955,40956,40957,40958,40959 + .lobytes 40960,40961,40962,40963,40964,40965,40966,40967,40968,40969,40970,40971,40972,40973,40974,40975 + .lobytes 45040,45041,45042,45043,45044,45045,45046,45047,45048,45049,45050,45051,45052,45053,45054,45055 + .lobytes 45056,45057,45058,45059,45060,45061,45062,45063,45064,45065,45066,45067,45068,45069,45070,45071 + .lobytes 49136,49137,49138,49139,49140,49141,49142,49143,49144,49145,49146,49147,49148,49149,49150,49151 + .lobytes 49152,49153,49154,49155,49156,49157,49158,49159,49160,49161,49162,49163,49164,49165,49166,49167 + .lobytes 53232,53233,53234,53235,53236,53237,53238,53239,53240,53241,53242,53243,53244,53245,53246,53247 + .lobytes 53248,53249,53250,53251,53252,53253,53254,53255,53256,53257,53258,53259,53260,53261,53262,53263 + .lobytes 57328,57329,57330,57331,57332,57333,57334,57335,57336,57337,57338,57339,57340,57341,57342,57343 + .lobytes 57344,57345,57346,57347,57348,57349,57350,57351,57352,57353,57354,57355,57356,57357,57358,57359 + .lobytes 61424,61425,61426,61427,61428,61429,61430,61431,61432,61433,61434,61435,61436,61437,61438,61439 + .lobytes 61440,61441,61442,61443,61444,61445,61446,61447,61448,61449,61450,61451,61452,61453,61454,61455 + .lobytes 65520,65521,65522,65523,65524,65525,65526,65527,65528,65529,65530,65531,65532,65533,65534,65535 + + ; multiple values on one line, hex + .lobytes $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f + .lobytes $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f + .lobytes $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f + .lobytes $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f + .lobytes $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff + .lobytes $100,$101,$102,$103,$104,$105,$106,$107,$108,$109,$10a,$10b,$10c,$10d,$10e,$10f + .lobytes $fe0,$fe1,$fe2,$fe3,$fe4,$fe5,$fe6,$fe7,$fe8,$fe9,$fea,$feb,$fec,$fed,$fee,$fef + .lobytes $ff0,$ff1,$ff2,$ff3,$ff4,$ff5,$ff6,$ff7,$ff8,$ff9,$ffa,$ffb,$ffc,$ffd,$ffe,$fff + .lobytes $1000,$1001,$1002,$1003,$1004,$1005,$1006,$1007,$1008,$1009,$100a,$100b,$100c,$100d,$100e,$100f + .lobytes $7ff0,$7ff1,$7ff2,$7ff3,$7ff4,$7ff5,$7ff6,$7ff7,$7ff8,$7ff9,$7ffa,$7ffb,$7ffc,$7ffd,$7ffe,$7fff + .lobytes $8000,$8001,$8002,$8003,$8004,$8005,$8006,$8007,$8008,$8009,$800a,$800b,$800c,$800d,$800e,$800f + .lobytes $9ff0,$9ff1,$9ff2,$9ff3,$9ff4,$9ff5,$9ff6,$9ff7,$9ff8,$9ff9,$9ffa,$9ffb,$9ffc,$9ffd,$9ffe,$9fff + .lobytes $a000,$a001,$a002,$a003,$a004,$a005,$a006,$a007,$a008,$a009,$a00a,$a00b,$a00c,$a00d,$a00e,$a00f + .lobytes $aff0,$aff1,$aff2,$aff3,$aff4,$aff5,$aff6,$aff7,$aff8,$aff9,$affa,$affb,$affc,$affd,$affe,$afff + .lobytes $b000,$b001,$b002,$b003,$b004,$b005,$b006,$b007,$b008,$b009,$b00a,$b00b,$b00c,$b00d,$b00e,$b00f + .lobytes $bff0,$bff1,$bff2,$bff3,$bff4,$bff5,$bff6,$bff7,$bff8,$bff9,$bffa,$bffb,$bffc,$bffd,$bffe,$bfff + .lobytes $c000,$c001,$c002,$c003,$c004,$c005,$c006,$c007,$c008,$c009,$c00a,$c00b,$c00c,$c00d,$c00e,$c00f + .lobytes $cff0,$cff1,$cff2,$cff3,$cff4,$cff5,$cff6,$cff7,$cff8,$cff9,$cffa,$cffb,$cffc,$cffd,$cffe,$cfff + .lobytes $d000,$d001,$d002,$d003,$d004,$d005,$d006,$d007,$d008,$d009,$d00a,$d00b,$d00c,$d00d,$d00e,$d00f + .lobytes $dff0,$dff1,$dff2,$dff3,$dff4,$dff5,$dff6,$dff7,$dff8,$dff9,$dffa,$dffb,$dffc,$dffd,$dffe,$dfff + .lobytes $e000,$e001,$e002,$e003,$e004,$e005,$e006,$e007,$e008,$e009,$e00a,$e00b,$e00c,$e00d,$e00e,$e00f + .lobytes $eff0,$eff1,$eff2,$eff3,$eff4,$eff5,$eff6,$eff7,$eff8,$eff9,$effa,$effb,$effc,$effd,$effe,$efff + .lobytes $f000,$f001,$f002,$f003,$f004,$f005,$f006,$f007,$f008,$f009,$f00a,$f00b,$f00c,$f00d,$f00e,$f00f + .lobytes $fff0,$fff1,$fff2,$fff3,$fff4,$fff5,$fff6,$fff7,$fff8,$fff9,$fffa,$fffb,$fffc,$fffd,$fffe,$ffff + + ; multiple values on one line, alternative hex + .lobytes 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh + .lobytes 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh + .lobytes 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh + .lobytes 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh + .lobytes 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh + .lobytes 100h,101h,102h,103h,104h,105h,106h,107h,108h,109h,10ah,10bh,10ch,10dh,10eh,10fh + .lobytes 0fe0h,0fe1h,0fe2h,0fe3h,0fe4h,0fe5h,0fe6h,0fe7h,0fe8h,0fe9h,0feah,0febh,0fech,0fedh,0feeh,0fefh + .lobytes 0ff0h,0ff1h,0ff2h,0ff3h,0ff4h,0ff5h,0ff6h,0ff7h,0ff8h,0ff9h,0ffah,0ffbh,0ffch,0ffdh,0ffeh,0fffh + .lobytes 1000h,1001h,1002h,1003h,1004h,1005h,1006h,1007h,1008h,1009h,100ah,100bh,100ch,100dh,100eh,100fh + .lobytes 7ff0h,7ff1h,7ff2h,7ff3h,7ff4h,7ff5h,7ff6h,7ff7h,7ff8h,7ff9h,7ffah,7ffbh,7ffch,7ffdh,7ffeh,7fffh + .lobytes 8000h,8001h,8002h,8003h,8004h,8005h,8006h,8007h,8008h,8009h,800ah,800bh,800ch,800dh,800eh,800fh + .lobytes 9ff0h,9ff1h,9ff2h,9ff3h,9ff4h,9ff5h,9ff6h,9ff7h,9ff8h,9ff9h,9ffah,9ffbh,9ffch,9ffdh,9ffeh,9fffh + .lobytes 0a000h,0a001h,0a002h,0a003h,0a004h,0a005h,0a006h,0a007h,0a008h,0a009h,0a00ah,0a00bh,0a00ch,0a00dh,0a00eh,0a00fh + .lobytes 0aff0h,0aff1h,0aff2h,0aff3h,0aff4h,0aff5h,0aff6h,0aff7h,0aff8h,0aff9h,0affah,0affbh,0affch,0affdh,0affeh,0afffh + .lobytes 0b000h,0b001h,0b002h,0b003h,0b004h,0b005h,0b006h,0b007h,0b008h,0b009h,0b00ah,0b00bh,0b00ch,0b00dh,0b00eh,0b00fh + .lobytes 0bff0h,0bff1h,0bff2h,0bff3h,0bff4h,0bff5h,0bff6h,0bff7h,0bff8h,0bff9h,0bffah,0bffbh,0bffch,0bffdh,0bffeh,0bfffh + .lobytes 0c000h,0c001h,0c002h,0c003h,0c004h,0c005h,0c006h,0c007h,0c008h,0c009h,0c00ah,0c00bh,0c00ch,0c00dh,0c00eh,0c00fh + .lobytes 0cff0h,0cff1h,0cff2h,0cff3h,0cff4h,0cff5h,0cff6h,0cff7h,0cff8h,0cff9h,0cffah,0cffbh,0cffch,0cffdh,0cffeh,0cfffh + .lobytes 0d000h,0d001h,0d002h,0d003h,0d004h,0d005h,0d006h,0d007h,0d008h,0d009h,0d00ah,0d00bh,0d00ch,0d00dh,0d00eh,0d00fh + .lobytes 0dff0h,0dff1h,0dff2h,0dff3h,0dff4h,0dff5h,0dff6h,0dff7h,0dff8h,0dff9h,0dffah,0dffbh,0dffch,0dffdh,0dffeh,0dfffh + .lobytes 0e000h,0e001h,0e002h,0e003h,0e004h,0e005h,0e006h,0e007h,0e008h,0e009h,0e00ah,0e00bh,0e00ch,0e00dh,0e00eh,0e00fh + .lobytes 0eff0h,0eff1h,0eff2h,0eff3h,0eff4h,0eff5h,0eff6h,0eff7h,0eff8h,0eff9h,0effah,0effbh,0effch,0effdh,0effeh,0efffh + .lobytes 0f000h,0f001h,0f002h,0f003h,0f004h,0f005h,0f006h,0f007h,0f008h,0f009h,0f00ah,0f00bh,0f00ch,0f00dh,0f00eh,0f00fh + .lobytes 0fff0h,0fff1h,0fff2h,0fff3h,0fff4h,0fff5h,0fff6h,0fff7h,0fff8h,0fff9h,0fffah,0fffbh,0fffch,0fffdh,0fffeh,0ffffh + + ; mix some variants + .lobytes 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh diff --git a/test/asm/listing/Makefile b/test/asm/listing/Makefile new file mode 100644 index 000000000..d3dc21409 --- /dev/null +++ b/test/asm/listing/Makefile @@ -0,0 +1,138 @@ +# Makefile for the assembler regression tests + +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + EXE = .exe + MKDIR = mkdir $(subst /,\,$1) + RMDIR = -rmdir /q /s $(subst /,\,$1) +else + EXE = + MKDIR = mkdir -p $1 + RMDIR = $(RM) -r $1 +endif + +ifdef QUIET +# .SILENT: +endif + +CA65 := $(if $(wildcard ../../../bin/ca65*),../../../bin/ca65,ca65) +LD65 := $(if $(wildcard ../../../bin/ld65*),../../../bin/ld65,ld65) + +WORKDIR = ../../../testwrk/asm/listing + +ISEQUAL = ../../../testwrk/isequal$(EXE) + +CC = gcc +CFLAGS = -O2 + +.PHONY: all clean + +LISTING_SRC := $(wildcard *.s) +LISTING_TESTS = $(LISTING_SRC:%.s=%) +LISTING_BINS = $(LISTING_SRC:%.s=$(WORKDIR)/%.bin) + +all: $(LISTING_BINS) + +$(WORKDIR): + $(call MKDIR,$(WORKDIR)) + +$(ISEQUAL): ../../isequal.c | $(WORKDIR) + $(CC) $(CFLAGS) -o $@ $< + + +define LISTING_template + +$(WORKDIR)/$1.bin: $1.s $(ISEQUAL) + $(if $(QUIET),echo asm/$1.bin) + +# compile without generating listing +ifeq ($(wildcard control/$1.err),) + $(CA65) -t none -o $$(@:.bin=.o) $$< > $$(@:.bin=.err) 2>&1 +ifeq ($(wildcard control/$1.no-ld65),) + $(LD65) -t none -o $$@ $$(@:.bin=.o) none.lib > $$(@:.bin=.ld65-err) 2>&1 +endif +else + $(CA65) -t none -o $$(@:.bin=.o) $$< > $$(@:.bin=.err) 2>&1 || true +ifeq ($(wildcard control/$1.no-ld65),) + $(LD65) -t none -o $$@ $$(@:.bin=.o) none.lib > $$(@:.bin=.ld65-err) 2>&1 || true +endif +endif + +ifneq ($(wildcard ref/$1.err-ref),) + $(ISEQUAL) ref/$1.err-ref $$(@:.bin=.err) +else + $(ISEQUAL) --empty $$(@:.bin=.err) +endif + +ifneq ($(wildcard ref/$1.bin-ref),) + $(ISEQUAL) --binary ref/$1.bin-ref $$@ +endif + +ifneq ($(wildcard ref/$1.ld65err-ref),) + @echo cat $$(@:.bin=.ld65-err) + cat $$(@:.bin=.ld65-err) + @echo + @echo + -diff -u ref/$1.ld65err-ref $$(@:.bin=.ld65-err) + @echo + @echo + $(ISEQUAL) --wildcards ref/$1.ld65err-ref $$(@:.bin=.ld65-err) +else +ifneq ($(wildcard $(WORKDIR)/$1.ld65-err),) + $(ISEQUAL) --empty $$(@:.bin=.ld65-err) +endif +endif + +# compile with listing file +ifeq ($(wildcard control/$1.err),) + $(CA65) -t none -l $$(@:.bin=.list-lst) -o $$(@:.bin=.list-o) $$< > $$(@:.bin=.list-err) 2>&1 +ifeq ($(wildcard control/$1.no-ld65),) + $(LD65) -t none -o $$(@:.bin=.list-bin) $$(@:.bin=.list-o) none.lib > $$(@:.bin=.list-ld65-err) 2>&1 +endif +else + $(CA65) -t none -l $$(@:.bin=.list-lst) -o $$(@:.bin=.list-o) $$< > $$(@:.bin=.list-err) 2>&1 || true +ifeq ($(wildcard control/$1.no-ld65),) + $(LD65) -t none -o $$(@:.bin=.list-bin) $$(@:.bin=.list-o) none.lib > $$(@:.bin=.list-ld65-err) 2>&1 || true +endif +endif + +ifneq ($(wildcard ref/$1.err-ref),) + $(ISEQUAL) ref/$1.err-ref $$(@:.bin=.list-err) +else + $(ISEQUAL) --empty $$(@:.bin=.list-err) +endif + +ifneq ($(wildcard ref/$1.ld65err-ref),) + $(ISEQUAL) --wildcards ref/$1.ld65err-ref $$(@:.bin=.list-ld65-err) +else +ifneq ($(wildcard $(WORKDIR)/$1.list-ld65-err),) + $(ISEQUAL) --empty $$(@:.bin=.list-ld65-err) +endif +endif + +# check if the result bin is the same as without listing file +ifeq ($(wildcard control/$1.err),) + $(ISEQUAL) $$@ $$(@:.bin=.list-bin) +endif + +ifneq ($(wildcard ref/$1.list-ref),) +# we have a reference file, compare that, too + +# remove first line which contains a version number + $(ISEQUAL) --skip=1 ref/$1.list-ref $$(@:.bin=.list-lst) +endif + +endef # LISTING_template + + +$(foreach listing,$(LISTING_TESTS),$(eval $(call LISTING_template,$(listing)))) + + +$(WORKDIR)/%.o: %.s | $(WORKDIR) + $(CA65) -l $(@:.o=.lst) -o $@ $< + +clean: + @$(call RMDIR,$(WORKDIR)) diff --git a/test/asm/listing/control/031-assert-error.err b/test/asm/listing/control/031-assert-error.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/031-assert-error.no-ld65 b/test/asm/listing/control/031-assert-error.no-ld65 new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/032-assert-error2.err b/test/asm/listing/control/032-assert-error2.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/032-assert-error3.err b/test/asm/listing/control/032-assert-error3.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/032-assert-error4.err b/test/asm/listing/control/032-assert-error4.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/032-assert-error6.err b/test/asm/listing/control/032-assert-error6.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/032-assert-error7.err b/test/asm/listing/control/032-assert-error7.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/032-assert-error8.err b/test/asm/listing/control/032-assert-error8.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/034-assert-lderror1.err b/test/asm/listing/control/034-assert-lderror1.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/034-assert-lderror1.no-ld65 b/test/asm/listing/control/034-assert-lderror1.no-ld65 new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/034-assert-lderror2.err b/test/asm/listing/control/034-assert-lderror2.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/034-assert-lderror3.err b/test/asm/listing/control/034-assert-lderror3.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/034-assert-lderror4.err b/test/asm/listing/control/034-assert-lderror4.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/034-assert-lderror6.err b/test/asm/listing/control/034-assert-lderror6.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/034-assert-lderror7.err b/test/asm/listing/control/034-assert-lderror7.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/034-assert-lderror8.err b/test/asm/listing/control/034-assert-lderror8.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/050-case-on-1.err b/test/asm/listing/control/050-case-on-1.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/050-case-on-1.no-ld65 b/test/asm/listing/control/050-case-on-1.no-ld65 new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/050-case-on-2.err b/test/asm/listing/control/050-case-on-2.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/050-case-on-2.no-ld65 b/test/asm/listing/control/050-case-on-2.no-ld65 new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/050-case-on-3.err b/test/asm/listing/control/050-case-on-3.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/050-case-on-3.no-ld65 b/test/asm/listing/control/050-case-on-3.no-ld65 new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/050-case-on-4.err b/test/asm/listing/control/050-case-on-4.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/050-case-on-4.no-ld65 b/test/asm/listing/control/050-case-on-4.no-ld65 new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/050-case-on-5.err b/test/asm/listing/control/050-case-on-5.err new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/control/050-case-on-5.no-ld65 b/test/asm/listing/control/050-case-on-5.no-ld65 new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/readme.txt b/test/asm/listing/readme.txt new file mode 100644 index 000000000..e43f2008a --- /dev/null +++ b/test/asm/listing/readme.txt @@ -0,0 +1,27 @@ +Overall test: +------------- + +These testcases can be used to test different aspects of the assembler. +The name of a test is everything in the form <test>.s. + +The following reference files can be added: + +- <test>.bin-ref: + This is a reference for the resulting binary. + The binary as binary tested against this file. + If they are not equal, the test fails. + +- <test>.list-ref + This is a reference for the resulting listing output + This file *must* have the first line of the listing removed, as that + contains a ca65 version string, and almost always this will be changed! + + +Note that the resulting .bin file is generated twice: Once with no listing +file, and once with listing file. This way, one can find out if the listing +file generation changes anything with the resulting binary output. + + +TODO: +- add the possibility to test for specific error output that are to be + expected diff --git a/test/asm/listing/ref/001-macro-simple-listing.list-ref b/test/asm/listing/ref/001-macro-simple-listing.list-ref new file mode 100644 index 000000000..268862e80 --- /dev/null +++ b/test/asm/listing/ref/001-macro-simple-listing.list-ref @@ -0,0 +1,21 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 001-macro-simple-listing.s +Current file: 001-macro-simple-listing.s + +000000r 1 ; 2022-01-17 Spiro Trikaliotis +000000r 1 +000000r 1 .macro TESTER +000000r 1 lda #2 +000000r 1 .endmacro +000000r 1 +000000r 1 test: +000000r 1 A2 00 ldx #0 +000002r 1 A9 02 TESTER +000004r 1 A2 0F ldx #15 +000006r 1 A9 02 TESTER +000008r 1 E8 inx +000009r 1 A9 02 TESTER +00000Br 1 A9 02 TESTER +00000Dr 1 CA dex +00000Er 1 60 rts +00000Er 1 diff --git a/test/asm/listing/ref/002-macro-param-listing.list-ref b/test/asm/listing/ref/002-macro-param-listing.list-ref new file mode 100644 index 000000000..f538ca197 --- /dev/null +++ b/test/asm/listing/ref/002-macro-param-listing.list-ref @@ -0,0 +1,21 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 002-macro-param-listing.s +Current file: 002-macro-param-listing.s + +000000r 1 ; 2022-01-17 Spiro Trikaliotis +000000r 1 +000000r 1 .macro TESTER val +000000r 1 lda #val +000000r 1 .endmacro +000000r 1 +000000r 1 test: +000000r 1 A2 00 ldx #0 +000002r 1 A9 01 TESTER 1 +000004r 1 A2 0F ldx #15 +000006r 1 A9 02 TESTER 2 +000008r 1 E8 inx +000009r 1 A9 03 TESTER 3 +00000Br 1 A9 04 TESTER 4 +00000Dr 1 CA dex +00000Er 1 60 rts +00000Er 1 diff --git a/test/asm/listing/ref/010-paramcount.err-ref b/test/asm/listing/ref/010-paramcount.err-ref new file mode 100644 index 000000000..a66162eb5 --- /dev/null +++ b/test/asm/listing/ref/010-paramcount.err-ref @@ -0,0 +1,15 @@ + .paramcount = 3 + .paramcount = 5 +010-paramcount.s:18: Warning: User warning: r1 is blank! +010-paramcount.s:14: Note: Macro was defined here +010-paramcount.s:8: Note: Macro was defined here + .paramcount = 3 + .paramcount = 5 +010-paramcount.s:19: Warning: User warning: r1 is blank! +010-paramcount.s:14: Note: Macro was defined here +010-paramcount.s:8: Note: Macro was defined here + .paramcount = 1 + .paramcount = 5 +010-paramcount.s:20: Warning: User warning: r1 is blank! +010-paramcount.s:14: Note: Macro was defined here +010-paramcount.s:8: Note: Macro was defined here diff --git a/test/asm/listing/ref/020-asciiz.bin-ref b/test/asm/listing/ref/020-asciiz.bin-ref new file mode 100644 index 000000000..11e154baa Binary files /dev/null and b/test/asm/listing/ref/020-asciiz.bin-ref differ diff --git a/test/asm/listing/ref/020-asciiz.list-ref b/test/asm/listing/ref/020-asciiz.list-ref new file mode 100644 index 000000000..7b2f9d2f4 --- /dev/null +++ b/test/asm/listing/ref/020-asciiz.list-ref @@ -0,0 +1,31 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 020-asciiz.s +Current file: 020-asciiz.s + +000000r 1 ; 2022-06-15 Spiro Trikaliotis +000000r 1 +000000r 1 +000000r 1 ; upper case pseudo-op +000000r 1 00 .ASCIIZ "" +000001r 1 48 65 6C 6C .ASCIIZ "Hello World" +000005r 1 6F 20 57 6F +000009r 1 72 6C 64 00 +00000Dr 1 48 65 6C 6C .ASCIIZ "Hello ","World" +000011r 1 6F 20 57 6F +000015r 1 72 6C 64 00 +000019r 1 48 65 6C 6C .ASCIIZ "Hello ","World"," ","I"," ","am"," ","testing" +00001Dr 1 6F 20 57 6F +000021r 1 72 6C 64 20 +000032r 1 +000032r 1 ; lower case pseudo-op +000032r 1 00 .asciiz "" +000033r 1 48 65 6C 6C .asciiz "Hello World" +000037r 1 6F 20 57 6F +00003Br 1 72 6C 64 00 +00003Fr 1 48 65 6C 6C .asciiz "Hello ","World" +000043r 1 6F 20 57 6F +000047r 1 72 6C 64 00 +00004Br 1 48 65 6C 6C .asciiz "Hello ","World"," ","I"," ","am"," ","testing" +00004Fr 1 6F 20 57 6F +000053r 1 72 6C 64 20 +000063r 1 diff --git a/test/asm/listing/ref/030-assert-success.bin-ref b/test/asm/listing/ref/030-assert-success.bin-ref new file mode 100644 index 000000000..685e809a7 --- /dev/null +++ b/test/asm/listing/ref/030-assert-success.bin-ref @@ -0,0 +1 @@ + \ No newline at end of file diff --git a/test/asm/listing/ref/030-assert-success.err-ref b/test/asm/listing/ref/030-assert-success.err-ref new file mode 100644 index 000000000..e36a9e6bc --- /dev/null +++ b/test/asm/listing/ref/030-assert-success.err-ref @@ -0,0 +1,20 @@ +030-assert-success.s:45: Warning: Code not at $0000 +030-assert-success.s:46: Warning: Code not at $0000 +030-assert-success.s:48: Warning: Code not at $0001 +030-assert-success.s:49: Warning: Code not at $0001 +030-assert-success.s:51: Warning: Code not at $1000 +030-assert-success.s:52: Warning: Code not at $1000 +030-assert-success.s:54: Warning: Code not at $1001 +030-assert-success.s:55: Warning: Code not at $1001 +030-assert-success.s:60: Warning: Code not at $8001 +030-assert-success.s:61: Warning: Code not at $8001 +030-assert-success.s:65: Warning: Code not at $0000 +030-assert-success.s:66: Warning: Code not at $0000 +030-assert-success.s:68: Warning: Code not at $0001 +030-assert-success.s:69: Warning: Code not at $0001 +030-assert-success.s:71: Warning: Code not at $1000 +030-assert-success.s:72: Warning: Code not at $1000 +030-assert-success.s:74: Warning: Code not at $1001 +030-assert-success.s:75: Warning: Code not at $1001 +030-assert-success.s:77: Warning: Code not at $8000 +030-assert-success.s:78: Warning: Code not at $8000 diff --git a/test/asm/listing/ref/030-assert-success.ld65err-ref b/test/asm/listing/ref/030-assert-success.ld65err-ref new file mode 100644 index 000000000..2f099f95f --- /dev/null +++ b/test/asm/listing/ref/030-assert-success.ld65err-ref @@ -0,0 +1,40 @@ +ld65: Warning: 030-assert-success.s:3: Code not at $0000 +ld65: Warning: 030-assert-success.s:4: Code not at $0000 +ld65: Warning: 030-assert-success.s:6: Code not at $0001 +ld65: Warning: 030-assert-success.s:7: Code not at $0001 +ld65: Warning: 030-assert-success.s:12: Code not at $1001 +ld65: Warning: 030-assert-success.s:13: Code not at $1001 +ld65: Warning: 030-assert-success.s:15: Code not at $8000 +ld65: Warning: 030-assert-success.s:16: Code not at $8000 +ld65: Warning: 030-assert-success.s:18: Code not at $8001 +ld65: Warning: 030-assert-success.s:19: Code not at $8001 +ld65: Warning: 030-assert-success.s:23: Code not at $0000 +ld65: Warning: 030-assert-success.s:24: Code not at $0000 +ld65: Warning: 030-assert-success.s:26: Code not at $0001 +ld65: Warning: 030-assert-success.s:27: Code not at $0001 +ld65: Warning: 030-assert-success.s:29: Code not at $1000 +ld65: Warning: 030-assert-success.s:30: Code not at $1000 +ld65: Warning: 030-assert-success.s:35: Code not at $8000 +ld65: Warning: 030-assert-success.s:36: Code not at $8000 +ld65: Warning: 030-assert-success.s:38: Code not at $8001 +ld65: Warning: 030-assert-success.s:39: Code not at $8001 +ld65: Warning: 030-assert-success.s:45: Code not at $0000 +ld65: Warning: 030-assert-success.s:46: Code not at $0000 +ld65: Warning: 030-assert-success.s:48: Code not at $0001 +ld65: Warning: 030-assert-success.s:49: Code not at $0001 +ld65: Warning: 030-assert-success.s:51: Code not at $1000 +ld65: Warning: 030-assert-success.s:52: Code not at $1000 +ld65: Warning: 030-assert-success.s:54: Code not at $1001 +ld65: Warning: 030-assert-success.s:55: Code not at $1001 +ld65: Warning: 030-assert-success.s:60: Code not at $8001 +ld65: Warning: 030-assert-success.s:61: Code not at $8001 +ld65: Warning: 030-assert-success.s:65: Code not at $0000 +ld65: Warning: 030-assert-success.s:66: Code not at $0000 +ld65: Warning: 030-assert-success.s:68: Code not at $0001 +ld65: Warning: 030-assert-success.s:69: Code not at $0001 +ld65: Warning: 030-assert-success.s:71: Code not at $1000 +ld65: Warning: 030-assert-success.s:72: Code not at $1000 +ld65: Warning: 030-assert-success.s:74: Code not at $1001 +ld65: Warning: 030-assert-success.s:75: Code not at $1001 +ld65: Warning: 030-assert-success.s:77: Code not at $8000 +ld65: Warning: 030-assert-success.s:78: Code not at $8000 diff --git a/test/asm/listing/ref/031-assert-error.err-ref b/test/asm/listing/ref/031-assert-error.err-ref new file mode 100644 index 000000000..f5cd108ac --- /dev/null +++ b/test/asm/listing/ref/031-assert-error.err-ref @@ -0,0 +1,2 @@ +031-assert-error.s:27: Error: Code not at $8001 +031-assert-error.s:28: Error: Code not at $8001 diff --git a/test/asm/listing/ref/032-assert-error2.ld65err-ref b/test/asm/listing/ref/032-assert-error2.ld65err-ref new file mode 100644 index 000000000..d275d4ee9 --- /dev/null +++ b/test/asm/listing/ref/032-assert-error2.ld65err-ref @@ -0,0 +1 @@ +ld65: Error: 032-assert-error2.s:3: Code not at $0000 diff --git a/test/asm/listing/ref/032-assert-error3.ld65err-ref b/test/asm/listing/ref/032-assert-error3.ld65err-ref new file mode 100644 index 000000000..623c6642b --- /dev/null +++ b/test/asm/listing/ref/032-assert-error3.ld65err-ref @@ -0,0 +1 @@ +ld65: Error: 032-assert-error3.s:3: Code not at $0000 diff --git a/test/asm/listing/ref/032-assert-error4.ld65err-ref b/test/asm/listing/ref/032-assert-error4.ld65err-ref new file mode 100644 index 000000000..aef48ea00 --- /dev/null +++ b/test/asm/listing/ref/032-assert-error4.ld65err-ref @@ -0,0 +1 @@ +ld65: Error: 032-assert-error4.s:3: Code not at $0001 diff --git a/test/asm/listing/ref/032-assert-error5.ld65err-ref b/test/asm/listing/ref/032-assert-error5.ld65err-ref new file mode 100644 index 000000000..e69de29bb diff --git a/test/asm/listing/ref/032-assert-error6.ld65err-ref b/test/asm/listing/ref/032-assert-error6.ld65err-ref new file mode 100644 index 000000000..431a185d3 --- /dev/null +++ b/test/asm/listing/ref/032-assert-error6.ld65err-ref @@ -0,0 +1 @@ +ld65: Error: 032-assert-error6.s:3: Code not at $1001 diff --git a/test/asm/listing/ref/032-assert-error7.ld65err-ref b/test/asm/listing/ref/032-assert-error7.ld65err-ref new file mode 100644 index 000000000..c7d5fe38f --- /dev/null +++ b/test/asm/listing/ref/032-assert-error7.ld65err-ref @@ -0,0 +1 @@ +ld65: Error: 032-assert-error7.s:3: Code not at $8000 diff --git a/test/asm/listing/ref/032-assert-error8.ld65err-ref b/test/asm/listing/ref/032-assert-error8.ld65err-ref new file mode 100644 index 000000000..ea476cfb6 --- /dev/null +++ b/test/asm/listing/ref/032-assert-error8.ld65err-ref @@ -0,0 +1 @@ +ld65: Error: 032-assert-error8.s:3: Code not at $8001 diff --git a/test/asm/listing/ref/033-assert-ldwarning-success.bin-ref b/test/asm/listing/ref/033-assert-ldwarning-success.bin-ref new file mode 100644 index 000000000..685e809a7 --- /dev/null +++ b/test/asm/listing/ref/033-assert-ldwarning-success.bin-ref @@ -0,0 +1 @@ + \ No newline at end of file diff --git a/test/asm/listing/ref/033-assert-ldwarning-success.ld65err-ref b/test/asm/listing/ref/033-assert-ldwarning-success.ld65err-ref new file mode 100644 index 000000000..67e5b2aed --- /dev/null +++ b/test/asm/listing/ref/033-assert-ldwarning-success.ld65err-ref @@ -0,0 +1,40 @@ +ld65: Warning: 033-assert-ldwarning-success.s:3: Code not at $0000 +ld65: Warning: 033-assert-ldwarning-success.s:4: Code not at $0000 +ld65: Warning: 033-assert-ldwarning-success.s:6: Code not at $0001 +ld65: Warning: 033-assert-ldwarning-success.s:7: Code not at $0001 +ld65: Warning: 033-assert-ldwarning-success.s:12: Code not at $1001 +ld65: Warning: 033-assert-ldwarning-success.s:13: Code not at $1001 +ld65: Warning: 033-assert-ldwarning-success.s:15: Code not at $8000 +ld65: Warning: 033-assert-ldwarning-success.s:16: Code not at $8000 +ld65: Warning: 033-assert-ldwarning-success.s:18: Code not at $8001 +ld65: Warning: 033-assert-ldwarning-success.s:19: Code not at $8001 +ld65: Warning: 033-assert-ldwarning-success.s:23: Code not at $0000 +ld65: Warning: 033-assert-ldwarning-success.s:24: Code not at $0000 +ld65: Warning: 033-assert-ldwarning-success.s:26: Code not at $0001 +ld65: Warning: 033-assert-ldwarning-success.s:27: Code not at $0001 +ld65: Warning: 033-assert-ldwarning-success.s:29: Code not at $1000 +ld65: Warning: 033-assert-ldwarning-success.s:30: Code not at $1000 +ld65: Warning: 033-assert-ldwarning-success.s:35: Code not at $8000 +ld65: Warning: 033-assert-ldwarning-success.s:36: Code not at $8000 +ld65: Warning: 033-assert-ldwarning-success.s:38: Code not at $8001 +ld65: Warning: 033-assert-ldwarning-success.s:39: Code not at $8001 +ld65: Warning: 033-assert-ldwarning-success.s:45: Code not at $0000 +ld65: Warning: 033-assert-ldwarning-success.s:46: Code not at $0000 +ld65: Warning: 033-assert-ldwarning-success.s:48: Code not at $0001 +ld65: Warning: 033-assert-ldwarning-success.s:49: Code not at $0001 +ld65: Warning: 033-assert-ldwarning-success.s:51: Code not at $1000 +ld65: Warning: 033-assert-ldwarning-success.s:52: Code not at $1000 +ld65: Warning: 033-assert-ldwarning-success.s:54: Code not at $1001 +ld65: Warning: 033-assert-ldwarning-success.s:55: Code not at $1001 +ld65: Warning: 033-assert-ldwarning-success.s:60: Code not at $8001 +ld65: Warning: 033-assert-ldwarning-success.s:61: Code not at $8001 +ld65: Warning: 033-assert-ldwarning-success.s:65: Code not at $0000 +ld65: Warning: 033-assert-ldwarning-success.s:66: Code not at $0000 +ld65: Warning: 033-assert-ldwarning-success.s:68: Code not at $0001 +ld65: Warning: 033-assert-ldwarning-success.s:69: Code not at $0001 +ld65: Warning: 033-assert-ldwarning-success.s:71: Code not at $1000 +ld65: Warning: 033-assert-ldwarning-success.s:72: Code not at $1000 +ld65: Warning: 033-assert-ldwarning-success.s:74: Code not at $1001 +ld65: Warning: 033-assert-ldwarning-success.s:75: Code not at $1001 +ld65: Warning: 033-assert-ldwarning-success.s:77: Code not at $8000 +ld65: Warning: 033-assert-ldwarning-success.s:78: Code not at $8000 diff --git a/test/asm/listing/ref/034-assert-lderror1.err-ref b/test/asm/listing/ref/034-assert-lderror1.err-ref new file mode 100644 index 000000000..14986aaf9 --- /dev/null +++ b/test/asm/listing/ref/034-assert-lderror1.err-ref @@ -0,0 +1,2 @@ +034-assert-lderror1.s:27: Error: Code not at $8001 +034-assert-lderror1.s:28: Error: Code not at $8001 diff --git a/test/asm/listing/ref/034-assert-lderror2.ld65err-ref b/test/asm/listing/ref/034-assert-lderror2.ld65err-ref new file mode 100644 index 000000000..d65db4ffd --- /dev/null +++ b/test/asm/listing/ref/034-assert-lderror2.ld65err-ref @@ -0,0 +1 @@ +ld65: Error: 034-assert-lderror2.s:3: Code not at $0000 diff --git a/test/asm/listing/ref/034-assert-lderror3.ld65err-ref b/test/asm/listing/ref/034-assert-lderror3.ld65err-ref new file mode 100644 index 000000000..bad05ca51 --- /dev/null +++ b/test/asm/listing/ref/034-assert-lderror3.ld65err-ref @@ -0,0 +1 @@ +ld65: Error: 034-assert-lderror3.s:3: Code not at $0000 diff --git a/test/asm/listing/ref/034-assert-lderror4.ld65err-ref b/test/asm/listing/ref/034-assert-lderror4.ld65err-ref new file mode 100644 index 000000000..ff1ee25ef --- /dev/null +++ b/test/asm/listing/ref/034-assert-lderror4.ld65err-ref @@ -0,0 +1 @@ +ld65: Error: 034-assert-lderror4.s:3: Code not at $0001 diff --git a/test/asm/listing/ref/034-assert-lderror6.ld65err-ref b/test/asm/listing/ref/034-assert-lderror6.ld65err-ref new file mode 100644 index 000000000..b207ff331 --- /dev/null +++ b/test/asm/listing/ref/034-assert-lderror6.ld65err-ref @@ -0,0 +1 @@ +ld65: Error: 034-assert-lderror6.s:3: Code not at $1001 diff --git a/test/asm/listing/ref/034-assert-lderror7.ld65err-ref b/test/asm/listing/ref/034-assert-lderror7.ld65err-ref new file mode 100644 index 000000000..fcb2dab20 --- /dev/null +++ b/test/asm/listing/ref/034-assert-lderror7.ld65err-ref @@ -0,0 +1 @@ +ld65: Error: 034-assert-lderror7.s:3: Code not at $8000 diff --git a/test/asm/listing/ref/034-assert-lderror8.ld65err-ref b/test/asm/listing/ref/034-assert-lderror8.ld65err-ref new file mode 100644 index 000000000..d1c7fd0b1 --- /dev/null +++ b/test/asm/listing/ref/034-assert-lderror8.ld65err-ref @@ -0,0 +1 @@ +ld65: Error: 034-assert-lderror8.s:3: Code not at $8001 diff --git a/test/asm/listing/ref/040-align.bin-ref b/test/asm/listing/ref/040-align.bin-ref new file mode 100644 index 000000000..59fe4c266 Binary files /dev/null and b/test/asm/listing/ref/040-align.bin-ref differ diff --git a/test/asm/listing/ref/040-align.ld65err-ref b/test/asm/listing/ref/040-align.ld65err-ref new file mode 100644 index 000000000..ac8d96432 --- /dev/null +++ b/test/asm/listing/ref/040-align.ld65err-ref @@ -0,0 +1 @@ +ld65: Warning: <<<#PATH#>>>:<<<#INTEGER#>>>: Segment 'CODE' isn't aligned properly; the resulting executable might not be functional. diff --git a/test/asm/listing/ref/040-align.list-ref b/test/asm/listing/ref/040-align.list-ref new file mode 100644 index 000000000..b9fee7841 --- /dev/null +++ b/test/asm/listing/ref/040-align.list-ref @@ -0,0 +1,29 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 040-align.s +Current file: 040-align.s + +000000r 1 ; 2022-06-20 Spiro Trikaliotis +000000r 1 +000000r 1 00 .byte 0 +000001r 1 +000001r 1 xx xx xx .align 4 +000004r 1 04 .byte 4 +000005r 1 0C 00 .word 12 +000007r 1 12 00 .word 18 +000009r 1 +000009r 1 .align 1 +000009r 1 01 .byte 1 +00000Ar 1 +00000Ar 1 xx xx xx xx .align 8 +00000Er 1 xx xx +000010r 1 08 .byte 8 +000011r 1 +000011r 1 xx xx xx xx .align 8 +000015r 1 xx xx xx +000018r 1 08 .byte 8 +000019r 1 +000019r 1 xx xx xx xx .align 128 +00001Dr 1 xx xx xx xx +000021r 1 xx xx xx xx +000080r 1 80 .byte 128 +000080r 1 diff --git a/test/asm/listing/ref/050-case-off-2.list-ref b/test/asm/listing/ref/050-case-off-2.list-ref new file mode 100644 index 000000000..5a88a19ba --- /dev/null +++ b/test/asm/listing/ref/050-case-off-2.list-ref @@ -0,0 +1,15 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 050-case-off-2.s +Current file: 050-case-off-2.s + +000000r 1 ; 2022-06-20 Spiro Trikaliotis +000000r 1 +000000r 1 .case - +000000r 1 +000000r 1 CamelCase: +000000r 1 A9 00 lda #0 +000002r 1 +000002r 1 Test: +000002r 1 F0 FC beq CamelCase +000004r 1 D0 FA bne camelcase +000004r 1 diff --git a/test/asm/listing/ref/050-case-off-3.list-ref b/test/asm/listing/ref/050-case-off-3.list-ref new file mode 100644 index 000000000..5f6ea21a0 --- /dev/null +++ b/test/asm/listing/ref/050-case-off-3.list-ref @@ -0,0 +1,15 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 050-case-off-3.s +Current file: 050-case-off-3.s + +000000r 1 ; 2022-06-20 Spiro Trikaliotis +000000r 1 +000000r 1 .case off +000000r 1 +000000r 1 CamelCase: +000000r 1 A9 00 lda #0 +000002r 1 +000002r 1 Test: +000002r 1 F0 FC beq CamelCase +000004r 1 D0 FA bne camelcase +000004r 1 diff --git a/test/asm/listing/ref/050-case-off-4.list-ref b/test/asm/listing/ref/050-case-off-4.list-ref new file mode 100644 index 000000000..61f34a7f8 --- /dev/null +++ b/test/asm/listing/ref/050-case-off-4.list-ref @@ -0,0 +1,15 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 050-case-off-4.s +Current file: 050-case-off-4.s + +000000r 1 ; 2022-06-20 Spiro Trikaliotis +000000r 1 +000000r 1 .CASE OFF +000000r 1 +000000r 1 CamelCase: +000000r 1 A9 00 lda #0 +000002r 1 +000002r 1 Test: +000002r 1 F0 FC beq CamelCase +000004r 1 D0 FA bne camelcase +000004r 1 diff --git a/test/asm/listing/ref/050-case-on-1.err-ref b/test/asm/listing/ref/050-case-on-1.err-ref new file mode 100644 index 000000000..12a14ca31 --- /dev/null +++ b/test/asm/listing/ref/050-case-on-1.err-ref @@ -0,0 +1 @@ +050-case-on-1.s:10: Error: Symbol 'camelcase' is undefined diff --git a/test/asm/listing/ref/050-case-on-2.err-ref b/test/asm/listing/ref/050-case-on-2.err-ref new file mode 100644 index 000000000..9331ee992 --- /dev/null +++ b/test/asm/listing/ref/050-case-on-2.err-ref @@ -0,0 +1 @@ +050-case-on-2.s:10: Error: Symbol 'camelcase' is undefined diff --git a/test/asm/listing/ref/050-case-on-3.err-ref b/test/asm/listing/ref/050-case-on-3.err-ref new file mode 100644 index 000000000..5d0a08d1a --- /dev/null +++ b/test/asm/listing/ref/050-case-on-3.err-ref @@ -0,0 +1 @@ +050-case-on-3.s:10: Error: Symbol 'camelcase' is undefined diff --git a/test/asm/listing/ref/050-case-on-4.err-ref b/test/asm/listing/ref/050-case-on-4.err-ref new file mode 100644 index 000000000..4fb8db100 --- /dev/null +++ b/test/asm/listing/ref/050-case-on-4.err-ref @@ -0,0 +1 @@ +050-case-on-4.s:10: Error: Symbol 'camelcase' is undefined diff --git a/test/asm/listing/ref/050-case-on-5.err-ref b/test/asm/listing/ref/050-case-on-5.err-ref new file mode 100644 index 000000000..b6691f5d9 --- /dev/null +++ b/test/asm/listing/ref/050-case-on-5.err-ref @@ -0,0 +1 @@ +050-case-on-5.s:10: Error: Symbol 'camelcase' is undefined diff --git a/test/asm/listing/ref/100-byte.bin-ref b/test/asm/listing/ref/100-byte.bin-ref new file mode 100644 index 000000000..7deb4dffd Binary files /dev/null and b/test/asm/listing/ref/100-byte.bin-ref differ diff --git a/test/asm/listing/ref/100-byte.list-ref b/test/asm/listing/ref/100-byte.list-ref new file mode 100644 index 000000000..4885dfd53 --- /dev/null +++ b/test/asm/listing/ref/100-byte.list-ref @@ -0,0 +1,3653 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 100-byte.s +Current file: 100-byte.s + +000000r 1 ; 2022-06-15 Spiro Trikaliotis +000000r 1 +000000r 1 +000000r 1 ; upper case pseudo-op +000000r 1 00 .BYTE 0 +000001r 1 01 .BYTE 1 +000002r 1 02 .BYTE 2 +000003r 1 03 .BYTE 3 +000004r 1 04 .BYTE 4 +000005r 1 05 .BYTE 5 +000006r 1 06 .BYTE 6 +000007r 1 07 .BYTE 7 +000008r 1 08 .BYTE 8 +000009r 1 09 .BYTE 9 +00000Ar 1 0A .BYTE 10 +00000Br 1 0B .BYTE 11 +00000Cr 1 0C .BYTE 12 +00000Dr 1 0D .BYTE 13 +00000Er 1 0E .BYTE 14 +00000Fr 1 0F .BYTE 15 +000010r 1 10 .BYTE 16 +000011r 1 11 .BYTE 17 +000012r 1 12 .BYTE 18 +000013r 1 13 .BYTE 19 +000014r 1 14 .BYTE 20 +000015r 1 15 .BYTE 21 +000016r 1 16 .BYTE 22 +000017r 1 17 .BYTE 23 +000018r 1 18 .BYTE 24 +000019r 1 19 .BYTE 25 +00001Ar 1 1A .BYTE 26 +00001Br 1 1B .BYTE 27 +00001Cr 1 1C .BYTE 28 +00001Dr 1 1D .BYTE 29 +00001Er 1 1E .BYTE 30 +00001Fr 1 1F .BYTE 31 +000020r 1 20 .BYTE 32 +000021r 1 21 .BYTE 33 +000022r 1 22 .BYTE 34 +000023r 1 23 .BYTE 35 +000024r 1 24 .BYTE 36 +000025r 1 25 .BYTE 37 +000026r 1 26 .BYTE 38 +000027r 1 27 .BYTE 39 +000028r 1 28 .BYTE 40 +000029r 1 29 .BYTE 41 +00002Ar 1 2A .BYTE 42 +00002Br 1 2B .BYTE 43 +00002Cr 1 2C .BYTE 44 +00002Dr 1 2D .BYTE 45 +00002Er 1 2E .BYTE 46 +00002Fr 1 2F .BYTE 47 +000030r 1 30 .BYTE 48 +000031r 1 31 .BYTE 49 +000032r 1 32 .BYTE 50 +000033r 1 33 .BYTE 51 +000034r 1 34 .BYTE 52 +000035r 1 35 .BYTE 53 +000036r 1 36 .BYTE 54 +000037r 1 37 .BYTE 55 +000038r 1 38 .BYTE 56 +000039r 1 39 .BYTE 57 +00003Ar 1 3A .BYTE 58 +00003Br 1 3B .BYTE 59 +00003Cr 1 3C .BYTE 60 +00003Dr 1 3D .BYTE 61 +00003Er 1 3E .BYTE 62 +00003Fr 1 3F .BYTE 63 +000040r 1 40 .BYTE 64 +000041r 1 41 .BYTE 65 +000042r 1 42 .BYTE 66 +000043r 1 43 .BYTE 67 +000044r 1 44 .BYTE 68 +000045r 1 45 .BYTE 69 +000046r 1 46 .BYTE 70 +000047r 1 47 .BYTE 71 +000048r 1 48 .BYTE 72 +000049r 1 49 .BYTE 73 +00004Ar 1 4A .BYTE 74 +00004Br 1 4B .BYTE 75 +00004Cr 1 4C .BYTE 76 +00004Dr 1 4D .BYTE 77 +00004Er 1 4E .BYTE 78 +00004Fr 1 4F .BYTE 79 +000050r 1 50 .BYTE 80 +000051r 1 51 .BYTE 81 +000052r 1 52 .BYTE 82 +000053r 1 53 .BYTE 83 +000054r 1 54 .BYTE 84 +000055r 1 55 .BYTE 85 +000056r 1 56 .BYTE 86 +000057r 1 57 .BYTE 87 +000058r 1 58 .BYTE 88 +000059r 1 59 .BYTE 89 +00005Ar 1 5A .BYTE 90 +00005Br 1 5B .BYTE 91 +00005Cr 1 5C .BYTE 92 +00005Dr 1 5D .BYTE 93 +00005Er 1 5E .BYTE 94 +00005Fr 1 5F .BYTE 95 +000060r 1 60 .BYTE 96 +000061r 1 61 .BYTE 97 +000062r 1 62 .BYTE 98 +000063r 1 63 .BYTE 99 +000064r 1 64 .BYTE 100 +000065r 1 65 .BYTE 101 +000066r 1 66 .BYTE 102 +000067r 1 67 .BYTE 103 +000068r 1 68 .BYTE 104 +000069r 1 69 .BYTE 105 +00006Ar 1 6A .BYTE 106 +00006Br 1 6B .BYTE 107 +00006Cr 1 6C .BYTE 108 +00006Dr 1 6D .BYTE 109 +00006Er 1 6E .BYTE 110 +00006Fr 1 6F .BYTE 111 +000070r 1 70 .BYTE 112 +000071r 1 71 .BYTE 113 +000072r 1 72 .BYTE 114 +000073r 1 73 .BYTE 115 +000074r 1 74 .BYTE 116 +000075r 1 75 .BYTE 117 +000076r 1 76 .BYTE 118 +000077r 1 77 .BYTE 119 +000078r 1 78 .BYTE 120 +000079r 1 79 .BYTE 121 +00007Ar 1 7A .BYTE 122 +00007Br 1 7B .BYTE 123 +00007Cr 1 7C .BYTE 124 +00007Dr 1 7D .BYTE 125 +00007Er 1 7E .BYTE 126 +00007Fr 1 7F .BYTE 127 +000080r 1 80 .BYTE 128 +000081r 1 81 .BYTE 129 +000082r 1 82 .BYTE 130 +000083r 1 83 .BYTE 131 +000084r 1 84 .BYTE 132 +000085r 1 85 .BYTE 133 +000086r 1 86 .BYTE 134 +000087r 1 87 .BYTE 135 +000088r 1 88 .BYTE 136 +000089r 1 89 .BYTE 137 +00008Ar 1 8A .BYTE 138 +00008Br 1 8B .BYTE 139 +00008Cr 1 8C .BYTE 140 +00008Dr 1 8D .BYTE 141 +00008Er 1 8E .BYTE 142 +00008Fr 1 8F .BYTE 143 +000090r 1 90 .BYTE 144 +000091r 1 91 .BYTE 145 +000092r 1 92 .BYTE 146 +000093r 1 93 .BYTE 147 +000094r 1 94 .BYTE 148 +000095r 1 95 .BYTE 149 +000096r 1 96 .BYTE 150 +000097r 1 97 .BYTE 151 +000098r 1 98 .BYTE 152 +000099r 1 99 .BYTE 153 +00009Ar 1 9A .BYTE 154 +00009Br 1 9B .BYTE 155 +00009Cr 1 9C .BYTE 156 +00009Dr 1 9D .BYTE 157 +00009Er 1 9E .BYTE 158 +00009Fr 1 9F .BYTE 159 +0000A0r 1 A0 .BYTE 160 +0000A1r 1 A1 .BYTE 161 +0000A2r 1 A2 .BYTE 162 +0000A3r 1 A3 .BYTE 163 +0000A4r 1 A4 .BYTE 164 +0000A5r 1 A5 .BYTE 165 +0000A6r 1 A6 .BYTE 166 +0000A7r 1 A7 .BYTE 167 +0000A8r 1 A8 .BYTE 168 +0000A9r 1 A9 .BYTE 169 +0000AAr 1 AA .BYTE 170 +0000ABr 1 AB .BYTE 171 +0000ACr 1 AC .BYTE 172 +0000ADr 1 AD .BYTE 173 +0000AEr 1 AE .BYTE 174 +0000AFr 1 AF .BYTE 175 +0000B0r 1 B0 .BYTE 176 +0000B1r 1 B1 .BYTE 177 +0000B2r 1 B2 .BYTE 178 +0000B3r 1 B3 .BYTE 179 +0000B4r 1 B4 .BYTE 180 +0000B5r 1 B5 .BYTE 181 +0000B6r 1 B6 .BYTE 182 +0000B7r 1 B7 .BYTE 183 +0000B8r 1 B8 .BYTE 184 +0000B9r 1 B9 .BYTE 185 +0000BAr 1 BA .BYTE 186 +0000BBr 1 BB .BYTE 187 +0000BCr 1 BC .BYTE 188 +0000BDr 1 BD .BYTE 189 +0000BEr 1 BE .BYTE 190 +0000BFr 1 BF .BYTE 191 +0000C0r 1 C0 .BYTE 192 +0000C1r 1 C1 .BYTE 193 +0000C2r 1 C2 .BYTE 194 +0000C3r 1 C3 .BYTE 195 +0000C4r 1 C4 .BYTE 196 +0000C5r 1 C5 .BYTE 197 +0000C6r 1 C6 .BYTE 198 +0000C7r 1 C7 .BYTE 199 +0000C8r 1 C8 .BYTE 200 +0000C9r 1 C9 .BYTE 201 +0000CAr 1 CA .BYTE 202 +0000CBr 1 CB .BYTE 203 +0000CCr 1 CC .BYTE 204 +0000CDr 1 CD .BYTE 205 +0000CEr 1 CE .BYTE 206 +0000CFr 1 CF .BYTE 207 +0000D0r 1 D0 .BYTE 208 +0000D1r 1 D1 .BYTE 209 +0000D2r 1 D2 .BYTE 210 +0000D3r 1 D3 .BYTE 211 +0000D4r 1 D4 .BYTE 212 +0000D5r 1 D5 .BYTE 213 +0000D6r 1 D6 .BYTE 214 +0000D7r 1 D7 .BYTE 215 +0000D8r 1 D8 .BYTE 216 +0000D9r 1 D9 .BYTE 217 +0000DAr 1 DA .BYTE 218 +0000DBr 1 DB .BYTE 219 +0000DCr 1 DC .BYTE 220 +0000DDr 1 DD .BYTE 221 +0000DEr 1 DE .BYTE 222 +0000DFr 1 DF .BYTE 223 +0000E0r 1 E0 .BYTE 224 +0000E1r 1 E1 .BYTE 225 +0000E2r 1 E2 .BYTE 226 +0000E3r 1 E3 .BYTE 227 +0000E4r 1 E4 .BYTE 228 +0000E5r 1 E5 .BYTE 229 +0000E6r 1 E6 .BYTE 230 +0000E7r 1 E7 .BYTE 231 +0000E8r 1 E8 .BYTE 232 +0000E9r 1 E9 .BYTE 233 +0000EAr 1 EA .BYTE 234 +0000EBr 1 EB .BYTE 235 +0000ECr 1 EC .BYTE 236 +0000EDr 1 ED .BYTE 237 +0000EEr 1 EE .BYTE 238 +0000EFr 1 EF .BYTE 239 +0000F0r 1 F0 .BYTE 240 +0000F1r 1 F1 .BYTE 241 +0000F2r 1 F2 .BYTE 242 +0000F3r 1 F3 .BYTE 243 +0000F4r 1 F4 .BYTE 244 +0000F5r 1 F5 .BYTE 245 +0000F6r 1 F6 .BYTE 246 +0000F7r 1 F7 .BYTE 247 +0000F8r 1 F8 .BYTE 248 +0000F9r 1 F9 .BYTE 249 +0000FAr 1 FA .BYTE 250 +0000FBr 1 FB .BYTE 251 +0000FCr 1 FC .BYTE 252 +0000FDr 1 FD .BYTE 253 +0000FEr 1 FE .BYTE 254 +0000FFr 1 FF .BYTE 255 +000100r 1 +000100r 1 ; lower case pseudo-op +000100r 1 00 .byte 0 +000101r 1 01 .byte 1 +000102r 1 02 .byte 2 +000103r 1 03 .byte 3 +000104r 1 04 .byte 4 +000105r 1 05 .byte 5 +000106r 1 06 .byte 6 +000107r 1 07 .byte 7 +000108r 1 08 .byte 8 +000109r 1 09 .byte 9 +00010Ar 1 0A .byte 10 +00010Br 1 0B .byte 11 +00010Cr 1 0C .byte 12 +00010Dr 1 0D .byte 13 +00010Er 1 0E .byte 14 +00010Fr 1 0F .byte 15 +000110r 1 10 .byte 16 +000111r 1 11 .byte 17 +000112r 1 12 .byte 18 +000113r 1 13 .byte 19 +000114r 1 14 .byte 20 +000115r 1 15 .byte 21 +000116r 1 16 .byte 22 +000117r 1 17 .byte 23 +000118r 1 18 .byte 24 +000119r 1 19 .byte 25 +00011Ar 1 1A .byte 26 +00011Br 1 1B .byte 27 +00011Cr 1 1C .byte 28 +00011Dr 1 1D .byte 29 +00011Er 1 1E .byte 30 +00011Fr 1 1F .byte 31 +000120r 1 20 .byte 32 +000121r 1 21 .byte 33 +000122r 1 22 .byte 34 +000123r 1 23 .byte 35 +000124r 1 24 .byte 36 +000125r 1 25 .byte 37 +000126r 1 26 .byte 38 +000127r 1 27 .byte 39 +000128r 1 28 .byte 40 +000129r 1 29 .byte 41 +00012Ar 1 2A .byte 42 +00012Br 1 2B .byte 43 +00012Cr 1 2C .byte 44 +00012Dr 1 2D .byte 45 +00012Er 1 2E .byte 46 +00012Fr 1 2F .byte 47 +000130r 1 30 .byte 48 +000131r 1 31 .byte 49 +000132r 1 32 .byte 50 +000133r 1 33 .byte 51 +000134r 1 34 .byte 52 +000135r 1 35 .byte 53 +000136r 1 36 .byte 54 +000137r 1 37 .byte 55 +000138r 1 38 .byte 56 +000139r 1 39 .byte 57 +00013Ar 1 3A .byte 58 +00013Br 1 3B .byte 59 +00013Cr 1 3C .byte 60 +00013Dr 1 3D .byte 61 +00013Er 1 3E .byte 62 +00013Fr 1 3F .byte 63 +000140r 1 40 .byte 64 +000141r 1 41 .byte 65 +000142r 1 42 .byte 66 +000143r 1 43 .byte 67 +000144r 1 44 .byte 68 +000145r 1 45 .byte 69 +000146r 1 46 .byte 70 +000147r 1 47 .byte 71 +000148r 1 48 .byte 72 +000149r 1 49 .byte 73 +00014Ar 1 4A .byte 74 +00014Br 1 4B .byte 75 +00014Cr 1 4C .byte 76 +00014Dr 1 4D .byte 77 +00014Er 1 4E .byte 78 +00014Fr 1 4F .byte 79 +000150r 1 50 .byte 80 +000151r 1 51 .byte 81 +000152r 1 52 .byte 82 +000153r 1 53 .byte 83 +000154r 1 54 .byte 84 +000155r 1 55 .byte 85 +000156r 1 56 .byte 86 +000157r 1 57 .byte 87 +000158r 1 58 .byte 88 +000159r 1 59 .byte 89 +00015Ar 1 5A .byte 90 +00015Br 1 5B .byte 91 +00015Cr 1 5C .byte 92 +00015Dr 1 5D .byte 93 +00015Er 1 5E .byte 94 +00015Fr 1 5F .byte 95 +000160r 1 60 .byte 96 +000161r 1 61 .byte 97 +000162r 1 62 .byte 98 +000163r 1 63 .byte 99 +000164r 1 64 .byte 100 +000165r 1 65 .byte 101 +000166r 1 66 .byte 102 +000167r 1 67 .byte 103 +000168r 1 68 .byte 104 +000169r 1 69 .byte 105 +00016Ar 1 6A .byte 106 +00016Br 1 6B .byte 107 +00016Cr 1 6C .byte 108 +00016Dr 1 6D .byte 109 +00016Er 1 6E .byte 110 +00016Fr 1 6F .byte 111 +000170r 1 70 .byte 112 +000171r 1 71 .byte 113 +000172r 1 72 .byte 114 +000173r 1 73 .byte 115 +000174r 1 74 .byte 116 +000175r 1 75 .byte 117 +000176r 1 76 .byte 118 +000177r 1 77 .byte 119 +000178r 1 78 .byte 120 +000179r 1 79 .byte 121 +00017Ar 1 7A .byte 122 +00017Br 1 7B .byte 123 +00017Cr 1 7C .byte 124 +00017Dr 1 7D .byte 125 +00017Er 1 7E .byte 126 +00017Fr 1 7F .byte 127 +000180r 1 80 .byte 128 +000181r 1 81 .byte 129 +000182r 1 82 .byte 130 +000183r 1 83 .byte 131 +000184r 1 84 .byte 132 +000185r 1 85 .byte 133 +000186r 1 86 .byte 134 +000187r 1 87 .byte 135 +000188r 1 88 .byte 136 +000189r 1 89 .byte 137 +00018Ar 1 8A .byte 138 +00018Br 1 8B .byte 139 +00018Cr 1 8C .byte 140 +00018Dr 1 8D .byte 141 +00018Er 1 8E .byte 142 +00018Fr 1 8F .byte 143 +000190r 1 90 .byte 144 +000191r 1 91 .byte 145 +000192r 1 92 .byte 146 +000193r 1 93 .byte 147 +000194r 1 94 .byte 148 +000195r 1 95 .byte 149 +000196r 1 96 .byte 150 +000197r 1 97 .byte 151 +000198r 1 98 .byte 152 +000199r 1 99 .byte 153 +00019Ar 1 9A .byte 154 +00019Br 1 9B .byte 155 +00019Cr 1 9C .byte 156 +00019Dr 1 9D .byte 157 +00019Er 1 9E .byte 158 +00019Fr 1 9F .byte 159 +0001A0r 1 A0 .byte 160 +0001A1r 1 A1 .byte 161 +0001A2r 1 A2 .byte 162 +0001A3r 1 A3 .byte 163 +0001A4r 1 A4 .byte 164 +0001A5r 1 A5 .byte 165 +0001A6r 1 A6 .byte 166 +0001A7r 1 A7 .byte 167 +0001A8r 1 A8 .byte 168 +0001A9r 1 A9 .byte 169 +0001AAr 1 AA .byte 170 +0001ABr 1 AB .byte 171 +0001ACr 1 AC .byte 172 +0001ADr 1 AD .byte 173 +0001AEr 1 AE .byte 174 +0001AFr 1 AF .byte 175 +0001B0r 1 B0 .byte 176 +0001B1r 1 B1 .byte 177 +0001B2r 1 B2 .byte 178 +0001B3r 1 B3 .byte 179 +0001B4r 1 B4 .byte 180 +0001B5r 1 B5 .byte 181 +0001B6r 1 B6 .byte 182 +0001B7r 1 B7 .byte 183 +0001B8r 1 B8 .byte 184 +0001B9r 1 B9 .byte 185 +0001BAr 1 BA .byte 186 +0001BBr 1 BB .byte 187 +0001BCr 1 BC .byte 188 +0001BDr 1 BD .byte 189 +0001BEr 1 BE .byte 190 +0001BFr 1 BF .byte 191 +0001C0r 1 C0 .byte 192 +0001C1r 1 C1 .byte 193 +0001C2r 1 C2 .byte 194 +0001C3r 1 C3 .byte 195 +0001C4r 1 C4 .byte 196 +0001C5r 1 C5 .byte 197 +0001C6r 1 C6 .byte 198 +0001C7r 1 C7 .byte 199 +0001C8r 1 C8 .byte 200 +0001C9r 1 C9 .byte 201 +0001CAr 1 CA .byte 202 +0001CBr 1 CB .byte 203 +0001CCr 1 CC .byte 204 +0001CDr 1 CD .byte 205 +0001CEr 1 CE .byte 206 +0001CFr 1 CF .byte 207 +0001D0r 1 D0 .byte 208 +0001D1r 1 D1 .byte 209 +0001D2r 1 D2 .byte 210 +0001D3r 1 D3 .byte 211 +0001D4r 1 D4 .byte 212 +0001D5r 1 D5 .byte 213 +0001D6r 1 D6 .byte 214 +0001D7r 1 D7 .byte 215 +0001D8r 1 D8 .byte 216 +0001D9r 1 D9 .byte 217 +0001DAr 1 DA .byte 218 +0001DBr 1 DB .byte 219 +0001DCr 1 DC .byte 220 +0001DDr 1 DD .byte 221 +0001DEr 1 DE .byte 222 +0001DFr 1 DF .byte 223 +0001E0r 1 E0 .byte 224 +0001E1r 1 E1 .byte 225 +0001E2r 1 E2 .byte 226 +0001E3r 1 E3 .byte 227 +0001E4r 1 E4 .byte 228 +0001E5r 1 E5 .byte 229 +0001E6r 1 E6 .byte 230 +0001E7r 1 E7 .byte 231 +0001E8r 1 E8 .byte 232 +0001E9r 1 E9 .byte 233 +0001EAr 1 EA .byte 234 +0001EBr 1 EB .byte 235 +0001ECr 1 EC .byte 236 +0001EDr 1 ED .byte 237 +0001EEr 1 EE .byte 238 +0001EFr 1 EF .byte 239 +0001F0r 1 F0 .byte 240 +0001F1r 1 F1 .byte 241 +0001F2r 1 F2 .byte 242 +0001F3r 1 F3 .byte 243 +0001F4r 1 F4 .byte 244 +0001F5r 1 F5 .byte 245 +0001F6r 1 F6 .byte 246 +0001F7r 1 F7 .byte 247 +0001F8r 1 F8 .byte 248 +0001F9r 1 F9 .byte 249 +0001FAr 1 FA .byte 250 +0001FBr 1 FB .byte 251 +0001FCr 1 FC .byte 252 +0001FDr 1 FD .byte 253 +0001FEr 1 FE .byte 254 +0001FFr 1 FF .byte 255 +000200r 1 +000200r 1 ; hex values +000200r 1 00 .byte $0 +000201r 1 01 .byte $1 +000202r 1 02 .byte $2 +000203r 1 03 .byte $3 +000204r 1 04 .byte $4 +000205r 1 05 .byte $5 +000206r 1 06 .byte $6 +000207r 1 07 .byte $7 +000208r 1 08 .byte $8 +000209r 1 09 .byte $9 +00020Ar 1 0A .byte $a +00020Br 1 0B .byte $b +00020Cr 1 0C .byte $c +00020Dr 1 0D .byte $d +00020Er 1 0E .byte $e +00020Fr 1 0F .byte $f +000210r 1 10 .byte $10 +000211r 1 11 .byte $11 +000212r 1 12 .byte $12 +000213r 1 13 .byte $13 +000214r 1 14 .byte $14 +000215r 1 15 .byte $15 +000216r 1 16 .byte $16 +000217r 1 17 .byte $17 +000218r 1 18 .byte $18 +000219r 1 19 .byte $19 +00021Ar 1 1A .byte $1a +00021Br 1 1B .byte $1b +00021Cr 1 1C .byte $1c +00021Dr 1 1D .byte $1d +00021Er 1 1E .byte $1e +00021Fr 1 1F .byte $1f +000220r 1 20 .byte $20 +000221r 1 21 .byte $21 +000222r 1 22 .byte $22 +000223r 1 23 .byte $23 +000224r 1 24 .byte $24 +000225r 1 25 .byte $25 +000226r 1 26 .byte $26 +000227r 1 27 .byte $27 +000228r 1 28 .byte $28 +000229r 1 29 .byte $29 +00022Ar 1 2A .byte $2a +00022Br 1 2B .byte $2b +00022Cr 1 2C .byte $2c +00022Dr 1 2D .byte $2d +00022Er 1 2E .byte $2e +00022Fr 1 2F .byte $2f +000230r 1 30 .byte $30 +000231r 1 31 .byte $31 +000232r 1 32 .byte $32 +000233r 1 33 .byte $33 +000234r 1 34 .byte $34 +000235r 1 35 .byte $35 +000236r 1 36 .byte $36 +000237r 1 37 .byte $37 +000238r 1 38 .byte $38 +000239r 1 39 .byte $39 +00023Ar 1 3A .byte $3a +00023Br 1 3B .byte $3b +00023Cr 1 3C .byte $3c +00023Dr 1 3D .byte $3d +00023Er 1 3E .byte $3e +00023Fr 1 3F .byte $3f +000240r 1 40 .byte $40 +000241r 1 41 .byte $41 +000242r 1 42 .byte $42 +000243r 1 43 .byte $43 +000244r 1 44 .byte $44 +000245r 1 45 .byte $45 +000246r 1 46 .byte $46 +000247r 1 47 .byte $47 +000248r 1 48 .byte $48 +000249r 1 49 .byte $49 +00024Ar 1 4A .byte $4a +00024Br 1 4B .byte $4b +00024Cr 1 4C .byte $4c +00024Dr 1 4D .byte $4d +00024Er 1 4E .byte $4e +00024Fr 1 4F .byte $4f +000250r 1 50 .byte $50 +000251r 1 51 .byte $51 +000252r 1 52 .byte $52 +000253r 1 53 .byte $53 +000254r 1 54 .byte $54 +000255r 1 55 .byte $55 +000256r 1 56 .byte $56 +000257r 1 57 .byte $57 +000258r 1 58 .byte $58 +000259r 1 59 .byte $59 +00025Ar 1 5A .byte $5a +00025Br 1 5B .byte $5b +00025Cr 1 5C .byte $5c +00025Dr 1 5D .byte $5d +00025Er 1 5E .byte $5e +00025Fr 1 5F .byte $5f +000260r 1 60 .byte $60 +000261r 1 61 .byte $61 +000262r 1 62 .byte $62 +000263r 1 63 .byte $63 +000264r 1 64 .byte $64 +000265r 1 65 .byte $65 +000266r 1 66 .byte $66 +000267r 1 67 .byte $67 +000268r 1 68 .byte $68 +000269r 1 69 .byte $69 +00026Ar 1 6A .byte $6a +00026Br 1 6B .byte $6b +00026Cr 1 6C .byte $6c +00026Dr 1 6D .byte $6d +00026Er 1 6E .byte $6e +00026Fr 1 6F .byte $6f +000270r 1 70 .byte $70 +000271r 1 71 .byte $71 +000272r 1 72 .byte $72 +000273r 1 73 .byte $73 +000274r 1 74 .byte $74 +000275r 1 75 .byte $75 +000276r 1 76 .byte $76 +000277r 1 77 .byte $77 +000278r 1 78 .byte $78 +000279r 1 79 .byte $79 +00027Ar 1 7A .byte $7a +00027Br 1 7B .byte $7b +00027Cr 1 7C .byte $7c +00027Dr 1 7D .byte $7d +00027Er 1 7E .byte $7e +00027Fr 1 7F .byte $7f +000280r 1 80 .byte $80 +000281r 1 81 .byte $81 +000282r 1 82 .byte $82 +000283r 1 83 .byte $83 +000284r 1 84 .byte $84 +000285r 1 85 .byte $85 +000286r 1 86 .byte $86 +000287r 1 87 .byte $87 +000288r 1 88 .byte $88 +000289r 1 89 .byte $89 +00028Ar 1 8A .byte $8a +00028Br 1 8B .byte $8b +00028Cr 1 8C .byte $8c +00028Dr 1 8D .byte $8d +00028Er 1 8E .byte $8e +00028Fr 1 8F .byte $8f +000290r 1 90 .byte $90 +000291r 1 91 .byte $91 +000292r 1 92 .byte $92 +000293r 1 93 .byte $93 +000294r 1 94 .byte $94 +000295r 1 95 .byte $95 +000296r 1 96 .byte $96 +000297r 1 97 .byte $97 +000298r 1 98 .byte $98 +000299r 1 99 .byte $99 +00029Ar 1 9A .byte $9a +00029Br 1 9B .byte $9b +00029Cr 1 9C .byte $9c +00029Dr 1 9D .byte $9d +00029Er 1 9E .byte $9e +00029Fr 1 9F .byte $9f +0002A0r 1 A0 .byte $a0 +0002A1r 1 A1 .byte $a1 +0002A2r 1 A2 .byte $a2 +0002A3r 1 A3 .byte $a3 +0002A4r 1 A4 .byte $a4 +0002A5r 1 A5 .byte $a5 +0002A6r 1 A6 .byte $a6 +0002A7r 1 A7 .byte $a7 +0002A8r 1 A8 .byte $a8 +0002A9r 1 A9 .byte $a9 +0002AAr 1 AA .byte $aa +0002ABr 1 AB .byte $ab +0002ACr 1 AC .byte $ac +0002ADr 1 AD .byte $ad +0002AEr 1 AE .byte $ae +0002AFr 1 AF .byte $af +0002B0r 1 B0 .byte $b0 +0002B1r 1 B1 .byte $b1 +0002B2r 1 B2 .byte $b2 +0002B3r 1 B3 .byte $b3 +0002B4r 1 B4 .byte $b4 +0002B5r 1 B5 .byte $b5 +0002B6r 1 B6 .byte $b6 +0002B7r 1 B7 .byte $b7 +0002B8r 1 B8 .byte $b8 +0002B9r 1 B9 .byte $b9 +0002BAr 1 BA .byte $ba +0002BBr 1 BB .byte $bb +0002BCr 1 BC .byte $bc +0002BDr 1 BD .byte $bd +0002BEr 1 BE .byte $be +0002BFr 1 BF .byte $bf +0002C0r 1 C0 .byte $c0 +0002C1r 1 C1 .byte $c1 +0002C2r 1 C2 .byte $c2 +0002C3r 1 C3 .byte $c3 +0002C4r 1 C4 .byte $c4 +0002C5r 1 C5 .byte $c5 +0002C6r 1 C6 .byte $c6 +0002C7r 1 C7 .byte $c7 +0002C8r 1 C8 .byte $c8 +0002C9r 1 C9 .byte $c9 +0002CAr 1 CA .byte $ca +0002CBr 1 CB .byte $cb +0002CCr 1 CC .byte $cc +0002CDr 1 CD .byte $cd +0002CEr 1 CE .byte $ce +0002CFr 1 CF .byte $cf +0002D0r 1 D0 .byte $d0 +0002D1r 1 D1 .byte $d1 +0002D2r 1 D2 .byte $d2 +0002D3r 1 D3 .byte $d3 +0002D4r 1 D4 .byte $d4 +0002D5r 1 D5 .byte $d5 +0002D6r 1 D6 .byte $d6 +0002D7r 1 D7 .byte $d7 +0002D8r 1 D8 .byte $d8 +0002D9r 1 D9 .byte $d9 +0002DAr 1 DA .byte $da +0002DBr 1 DB .byte $db +0002DCr 1 DC .byte $dc +0002DDr 1 DD .byte $dd +0002DEr 1 DE .byte $de +0002DFr 1 DF .byte $df +0002E0r 1 E0 .byte $e0 +0002E1r 1 E1 .byte $e1 +0002E2r 1 E2 .byte $e2 +0002E3r 1 E3 .byte $e3 +0002E4r 1 E4 .byte $e4 +0002E5r 1 E5 .byte $e5 +0002E6r 1 E6 .byte $e6 +0002E7r 1 E7 .byte $e7 +0002E8r 1 E8 .byte $e8 +0002E9r 1 E9 .byte $e9 +0002EAr 1 EA .byte $ea +0002EBr 1 EB .byte $eb +0002ECr 1 EC .byte $ec +0002EDr 1 ED .byte $ed +0002EEr 1 EE .byte $ee +0002EFr 1 EF .byte $ef +0002F0r 1 F0 .byte $f0 +0002F1r 1 F1 .byte $f1 +0002F2r 1 F2 .byte $f2 +0002F3r 1 F3 .byte $f3 +0002F4r 1 F4 .byte $f4 +0002F5r 1 F5 .byte $f5 +0002F6r 1 F6 .byte $f6 +0002F7r 1 F7 .byte $f7 +0002F8r 1 F8 .byte $f8 +0002F9r 1 F9 .byte $f9 +0002FAr 1 FA .byte $fa +0002FBr 1 FB .byte $fb +0002FCr 1 FC .byte $fc +0002FDr 1 FD .byte $fd +0002FEr 1 FE .byte $fe +0002FFr 1 FF .byte $ff +000300r 1 +000300r 1 ; hex values, uppercase +000300r 1 00 .byte $0 +000301r 1 01 .byte $1 +000302r 1 02 .byte $2 +000303r 1 03 .byte $3 +000304r 1 04 .byte $4 +000305r 1 05 .byte $5 +000306r 1 06 .byte $6 +000307r 1 07 .byte $7 +000308r 1 08 .byte $8 +000309r 1 09 .byte $9 +00030Ar 1 0A .byte $A +00030Br 1 0B .byte $B +00030Cr 1 0C .byte $C +00030Dr 1 0D .byte $D +00030Er 1 0E .byte $E +00030Fr 1 0F .byte $F +000310r 1 10 .byte $10 +000311r 1 11 .byte $11 +000312r 1 12 .byte $12 +000313r 1 13 .byte $13 +000314r 1 14 .byte $14 +000315r 1 15 .byte $15 +000316r 1 16 .byte $16 +000317r 1 17 .byte $17 +000318r 1 18 .byte $18 +000319r 1 19 .byte $19 +00031Ar 1 1A .byte $1A +00031Br 1 1B .byte $1B +00031Cr 1 1C .byte $1C +00031Dr 1 1D .byte $1D +00031Er 1 1E .byte $1E +00031Fr 1 1F .byte $1F +000320r 1 20 .byte $20 +000321r 1 21 .byte $21 +000322r 1 22 .byte $22 +000323r 1 23 .byte $23 +000324r 1 24 .byte $24 +000325r 1 25 .byte $25 +000326r 1 26 .byte $26 +000327r 1 27 .byte $27 +000328r 1 28 .byte $28 +000329r 1 29 .byte $29 +00032Ar 1 2A .byte $2A +00032Br 1 2B .byte $2B +00032Cr 1 2C .byte $2C +00032Dr 1 2D .byte $2D +00032Er 1 2E .byte $2E +00032Fr 1 2F .byte $2F +000330r 1 30 .byte $30 +000331r 1 31 .byte $31 +000332r 1 32 .byte $32 +000333r 1 33 .byte $33 +000334r 1 34 .byte $34 +000335r 1 35 .byte $35 +000336r 1 36 .byte $36 +000337r 1 37 .byte $37 +000338r 1 38 .byte $38 +000339r 1 39 .byte $39 +00033Ar 1 3A .byte $3A +00033Br 1 3B .byte $3B +00033Cr 1 3C .byte $3C +00033Dr 1 3D .byte $3D +00033Er 1 3E .byte $3E +00033Fr 1 3F .byte $3F +000340r 1 40 .byte $40 +000341r 1 41 .byte $41 +000342r 1 42 .byte $42 +000343r 1 43 .byte $43 +000344r 1 44 .byte $44 +000345r 1 45 .byte $45 +000346r 1 46 .byte $46 +000347r 1 47 .byte $47 +000348r 1 48 .byte $48 +000349r 1 49 .byte $49 +00034Ar 1 4A .byte $4A +00034Br 1 4B .byte $4B +00034Cr 1 4C .byte $4C +00034Dr 1 4D .byte $4D +00034Er 1 4E .byte $4E +00034Fr 1 4F .byte $4F +000350r 1 50 .byte $50 +000351r 1 51 .byte $51 +000352r 1 52 .byte $52 +000353r 1 53 .byte $53 +000354r 1 54 .byte $54 +000355r 1 55 .byte $55 +000356r 1 56 .byte $56 +000357r 1 57 .byte $57 +000358r 1 58 .byte $58 +000359r 1 59 .byte $59 +00035Ar 1 5A .byte $5A +00035Br 1 5B .byte $5B +00035Cr 1 5C .byte $5C +00035Dr 1 5D .byte $5D +00035Er 1 5E .byte $5E +00035Fr 1 5F .byte $5F +000360r 1 60 .byte $60 +000361r 1 61 .byte $61 +000362r 1 62 .byte $62 +000363r 1 63 .byte $63 +000364r 1 64 .byte $64 +000365r 1 65 .byte $65 +000366r 1 66 .byte $66 +000367r 1 67 .byte $67 +000368r 1 68 .byte $68 +000369r 1 69 .byte $69 +00036Ar 1 6A .byte $6A +00036Br 1 6B .byte $6B +00036Cr 1 6C .byte $6C +00036Dr 1 6D .byte $6D +00036Er 1 6E .byte $6E +00036Fr 1 6F .byte $6F +000370r 1 70 .byte $70 +000371r 1 71 .byte $71 +000372r 1 72 .byte $72 +000373r 1 73 .byte $73 +000374r 1 74 .byte $74 +000375r 1 75 .byte $75 +000376r 1 76 .byte $76 +000377r 1 77 .byte $77 +000378r 1 78 .byte $78 +000379r 1 79 .byte $79 +00037Ar 1 7A .byte $7A +00037Br 1 7B .byte $7B +00037Cr 1 7C .byte $7C +00037Dr 1 7D .byte $7D +00037Er 1 7E .byte $7E +00037Fr 1 7F .byte $7F +000380r 1 80 .byte $80 +000381r 1 81 .byte $81 +000382r 1 82 .byte $82 +000383r 1 83 .byte $83 +000384r 1 84 .byte $84 +000385r 1 85 .byte $85 +000386r 1 86 .byte $86 +000387r 1 87 .byte $87 +000388r 1 88 .byte $88 +000389r 1 89 .byte $89 +00038Ar 1 8A .byte $8A +00038Br 1 8B .byte $8B +00038Cr 1 8C .byte $8C +00038Dr 1 8D .byte $8D +00038Er 1 8E .byte $8E +00038Fr 1 8F .byte $8F +000390r 1 90 .byte $90 +000391r 1 91 .byte $91 +000392r 1 92 .byte $92 +000393r 1 93 .byte $93 +000394r 1 94 .byte $94 +000395r 1 95 .byte $95 +000396r 1 96 .byte $96 +000397r 1 97 .byte $97 +000398r 1 98 .byte $98 +000399r 1 99 .byte $99 +00039Ar 1 9A .byte $9A +00039Br 1 9B .byte $9B +00039Cr 1 9C .byte $9C +00039Dr 1 9D .byte $9D +00039Er 1 9E .byte $9E +00039Fr 1 9F .byte $9F +0003A0r 1 A0 .byte $A0 +0003A1r 1 A1 .byte $A1 +0003A2r 1 A2 .byte $A2 +0003A3r 1 A3 .byte $A3 +0003A4r 1 A4 .byte $A4 +0003A5r 1 A5 .byte $A5 +0003A6r 1 A6 .byte $A6 +0003A7r 1 A7 .byte $A7 +0003A8r 1 A8 .byte $A8 +0003A9r 1 A9 .byte $A9 +0003AAr 1 AA .byte $AA +0003ABr 1 AB .byte $AB +0003ACr 1 AC .byte $AC +0003ADr 1 AD .byte $AD +0003AEr 1 AE .byte $AE +0003AFr 1 AF .byte $AF +0003B0r 1 B0 .byte $B0 +0003B1r 1 B1 .byte $B1 +0003B2r 1 B2 .byte $B2 +0003B3r 1 B3 .byte $B3 +0003B4r 1 B4 .byte $B4 +0003B5r 1 B5 .byte $B5 +0003B6r 1 B6 .byte $B6 +0003B7r 1 B7 .byte $B7 +0003B8r 1 B8 .byte $B8 +0003B9r 1 B9 .byte $B9 +0003BAr 1 BA .byte $BA +0003BBr 1 BB .byte $BB +0003BCr 1 BC .byte $BC +0003BDr 1 BD .byte $BD +0003BEr 1 BE .byte $BE +0003BFr 1 BF .byte $BF +0003C0r 1 C0 .byte $C0 +0003C1r 1 C1 .byte $C1 +0003C2r 1 C2 .byte $C2 +0003C3r 1 C3 .byte $C3 +0003C4r 1 C4 .byte $C4 +0003C5r 1 C5 .byte $C5 +0003C6r 1 C6 .byte $C6 +0003C7r 1 C7 .byte $C7 +0003C8r 1 C8 .byte $C8 +0003C9r 1 C9 .byte $C9 +0003CAr 1 CA .byte $CA +0003CBr 1 CB .byte $CB +0003CCr 1 CC .byte $CC +0003CDr 1 CD .byte $CD +0003CEr 1 CE .byte $CE +0003CFr 1 CF .byte $CF +0003D0r 1 D0 .byte $D0 +0003D1r 1 D1 .byte $D1 +0003D2r 1 D2 .byte $D2 +0003D3r 1 D3 .byte $D3 +0003D4r 1 D4 .byte $D4 +0003D5r 1 D5 .byte $D5 +0003D6r 1 D6 .byte $D6 +0003D7r 1 D7 .byte $D7 +0003D8r 1 D8 .byte $D8 +0003D9r 1 D9 .byte $D9 +0003DAr 1 DA .byte $DA +0003DBr 1 DB .byte $DB +0003DCr 1 DC .byte $DC +0003DDr 1 DD .byte $DD +0003DEr 1 DE .byte $DE +0003DFr 1 DF .byte $DF +0003E0r 1 E0 .byte $E0 +0003E1r 1 E1 .byte $E1 +0003E2r 1 E2 .byte $E2 +0003E3r 1 E3 .byte $E3 +0003E4r 1 E4 .byte $E4 +0003E5r 1 E5 .byte $E5 +0003E6r 1 E6 .byte $E6 +0003E7r 1 E7 .byte $E7 +0003E8r 1 E8 .byte $E8 +0003E9r 1 E9 .byte $E9 +0003EAr 1 EA .byte $EA +0003EBr 1 EB .byte $EB +0003ECr 1 EC .byte $EC +0003EDr 1 ED .byte $ED +0003EEr 1 EE .byte $EE +0003EFr 1 EF .byte $EF +0003F0r 1 F0 .byte $F0 +0003F1r 1 F1 .byte $F1 +0003F2r 1 F2 .byte $F2 +0003F3r 1 F3 .byte $F3 +0003F4r 1 F4 .byte $F4 +0003F5r 1 F5 .byte $F5 +0003F6r 1 F6 .byte $F6 +0003F7r 1 F7 .byte $F7 +0003F8r 1 F8 .byte $F8 +0003F9r 1 F9 .byte $F9 +0003FAr 1 FA .byte $FA +0003FBr 1 FB .byte $FB +0003FCr 1 FC .byte $FC +0003FDr 1 FD .byte $FD +0003FEr 1 FE .byte $FE +0003FFr 1 FF .byte $FF +000400r 1 +000400r 1 ; 2-digit hex values +000400r 1 00 .byte $00 +000401r 1 01 .byte $01 +000402r 1 02 .byte $02 +000403r 1 03 .byte $03 +000404r 1 04 .byte $04 +000405r 1 05 .byte $05 +000406r 1 06 .byte $06 +000407r 1 07 .byte $07 +000408r 1 08 .byte $08 +000409r 1 09 .byte $09 +00040Ar 1 0A .byte $0a +00040Br 1 0B .byte $0b +00040Cr 1 0C .byte $0c +00040Dr 1 0D .byte $0d +00040Er 1 0E .byte $0e +00040Fr 1 0F .byte $0f +000410r 1 10 .byte $10 +000411r 1 11 .byte $11 +000412r 1 12 .byte $12 +000413r 1 13 .byte $13 +000414r 1 14 .byte $14 +000415r 1 15 .byte $15 +000416r 1 16 .byte $16 +000417r 1 17 .byte $17 +000418r 1 18 .byte $18 +000419r 1 19 .byte $19 +00041Ar 1 1A .byte $1a +00041Br 1 1B .byte $1b +00041Cr 1 1C .byte $1c +00041Dr 1 1D .byte $1d +00041Er 1 1E .byte $1e +00041Fr 1 1F .byte $1f +000420r 1 20 .byte $20 +000421r 1 21 .byte $21 +000422r 1 22 .byte $22 +000423r 1 23 .byte $23 +000424r 1 24 .byte $24 +000425r 1 25 .byte $25 +000426r 1 26 .byte $26 +000427r 1 27 .byte $27 +000428r 1 28 .byte $28 +000429r 1 29 .byte $29 +00042Ar 1 2A .byte $2a +00042Br 1 2B .byte $2b +00042Cr 1 2C .byte $2c +00042Dr 1 2D .byte $2d +00042Er 1 2E .byte $2e +00042Fr 1 2F .byte $2f +000430r 1 30 .byte $30 +000431r 1 31 .byte $31 +000432r 1 32 .byte $32 +000433r 1 33 .byte $33 +000434r 1 34 .byte $34 +000435r 1 35 .byte $35 +000436r 1 36 .byte $36 +000437r 1 37 .byte $37 +000438r 1 38 .byte $38 +000439r 1 39 .byte $39 +00043Ar 1 3A .byte $3a +00043Br 1 3B .byte $3b +00043Cr 1 3C .byte $3c +00043Dr 1 3D .byte $3d +00043Er 1 3E .byte $3e +00043Fr 1 3F .byte $3f +000440r 1 40 .byte $40 +000441r 1 41 .byte $41 +000442r 1 42 .byte $42 +000443r 1 43 .byte $43 +000444r 1 44 .byte $44 +000445r 1 45 .byte $45 +000446r 1 46 .byte $46 +000447r 1 47 .byte $47 +000448r 1 48 .byte $48 +000449r 1 49 .byte $49 +00044Ar 1 4A .byte $4a +00044Br 1 4B .byte $4b +00044Cr 1 4C .byte $4c +00044Dr 1 4D .byte $4d +00044Er 1 4E .byte $4e +00044Fr 1 4F .byte $4f +000450r 1 50 .byte $50 +000451r 1 51 .byte $51 +000452r 1 52 .byte $52 +000453r 1 53 .byte $53 +000454r 1 54 .byte $54 +000455r 1 55 .byte $55 +000456r 1 56 .byte $56 +000457r 1 57 .byte $57 +000458r 1 58 .byte $58 +000459r 1 59 .byte $59 +00045Ar 1 5A .byte $5a +00045Br 1 5B .byte $5b +00045Cr 1 5C .byte $5c +00045Dr 1 5D .byte $5d +00045Er 1 5E .byte $5e +00045Fr 1 5F .byte $5f +000460r 1 60 .byte $60 +000461r 1 61 .byte $61 +000462r 1 62 .byte $62 +000463r 1 63 .byte $63 +000464r 1 64 .byte $64 +000465r 1 65 .byte $65 +000466r 1 66 .byte $66 +000467r 1 67 .byte $67 +000468r 1 68 .byte $68 +000469r 1 69 .byte $69 +00046Ar 1 6A .byte $6a +00046Br 1 6B .byte $6b +00046Cr 1 6C .byte $6c +00046Dr 1 6D .byte $6d +00046Er 1 6E .byte $6e +00046Fr 1 6F .byte $6f +000470r 1 70 .byte $70 +000471r 1 71 .byte $71 +000472r 1 72 .byte $72 +000473r 1 73 .byte $73 +000474r 1 74 .byte $74 +000475r 1 75 .byte $75 +000476r 1 76 .byte $76 +000477r 1 77 .byte $77 +000478r 1 78 .byte $78 +000479r 1 79 .byte $79 +00047Ar 1 7A .byte $7a +00047Br 1 7B .byte $7b +00047Cr 1 7C .byte $7c +00047Dr 1 7D .byte $7d +00047Er 1 7E .byte $7e +00047Fr 1 7F .byte $7f +000480r 1 80 .byte $80 +000481r 1 81 .byte $81 +000482r 1 82 .byte $82 +000483r 1 83 .byte $83 +000484r 1 84 .byte $84 +000485r 1 85 .byte $85 +000486r 1 86 .byte $86 +000487r 1 87 .byte $87 +000488r 1 88 .byte $88 +000489r 1 89 .byte $89 +00048Ar 1 8A .byte $8a +00048Br 1 8B .byte $8b +00048Cr 1 8C .byte $8c +00048Dr 1 8D .byte $8d +00048Er 1 8E .byte $8e +00048Fr 1 8F .byte $8f +000490r 1 90 .byte $90 +000491r 1 91 .byte $91 +000492r 1 92 .byte $92 +000493r 1 93 .byte $93 +000494r 1 94 .byte $94 +000495r 1 95 .byte $95 +000496r 1 96 .byte $96 +000497r 1 97 .byte $97 +000498r 1 98 .byte $98 +000499r 1 99 .byte $99 +00049Ar 1 9A .byte $9a +00049Br 1 9B .byte $9b +00049Cr 1 9C .byte $9c +00049Dr 1 9D .byte $9d +00049Er 1 9E .byte $9e +00049Fr 1 9F .byte $9f +0004A0r 1 A0 .byte $a0 +0004A1r 1 A1 .byte $a1 +0004A2r 1 A2 .byte $a2 +0004A3r 1 A3 .byte $a3 +0004A4r 1 A4 .byte $a4 +0004A5r 1 A5 .byte $a5 +0004A6r 1 A6 .byte $a6 +0004A7r 1 A7 .byte $a7 +0004A8r 1 A8 .byte $a8 +0004A9r 1 A9 .byte $a9 +0004AAr 1 AA .byte $aa +0004ABr 1 AB .byte $ab +0004ACr 1 AC .byte $ac +0004ADr 1 AD .byte $ad +0004AEr 1 AE .byte $ae +0004AFr 1 AF .byte $af +0004B0r 1 B0 .byte $b0 +0004B1r 1 B1 .byte $b1 +0004B2r 1 B2 .byte $b2 +0004B3r 1 B3 .byte $b3 +0004B4r 1 B4 .byte $b4 +0004B5r 1 B5 .byte $b5 +0004B6r 1 B6 .byte $b6 +0004B7r 1 B7 .byte $b7 +0004B8r 1 B8 .byte $b8 +0004B9r 1 B9 .byte $b9 +0004BAr 1 BA .byte $ba +0004BBr 1 BB .byte $bb +0004BCr 1 BC .byte $bc +0004BDr 1 BD .byte $bd +0004BEr 1 BE .byte $be +0004BFr 1 BF .byte $bf +0004C0r 1 C0 .byte $c0 +0004C1r 1 C1 .byte $c1 +0004C2r 1 C2 .byte $c2 +0004C3r 1 C3 .byte $c3 +0004C4r 1 C4 .byte $c4 +0004C5r 1 C5 .byte $c5 +0004C6r 1 C6 .byte $c6 +0004C7r 1 C7 .byte $c7 +0004C8r 1 C8 .byte $c8 +0004C9r 1 C9 .byte $c9 +0004CAr 1 CA .byte $ca +0004CBr 1 CB .byte $cb +0004CCr 1 CC .byte $cc +0004CDr 1 CD .byte $cd +0004CEr 1 CE .byte $ce +0004CFr 1 CF .byte $cf +0004D0r 1 D0 .byte $d0 +0004D1r 1 D1 .byte $d1 +0004D2r 1 D2 .byte $d2 +0004D3r 1 D3 .byte $d3 +0004D4r 1 D4 .byte $d4 +0004D5r 1 D5 .byte $d5 +0004D6r 1 D6 .byte $d6 +0004D7r 1 D7 .byte $d7 +0004D8r 1 D8 .byte $d8 +0004D9r 1 D9 .byte $d9 +0004DAr 1 DA .byte $da +0004DBr 1 DB .byte $db +0004DCr 1 DC .byte $dc +0004DDr 1 DD .byte $dd +0004DEr 1 DE .byte $de +0004DFr 1 DF .byte $df +0004E0r 1 E0 .byte $e0 +0004E1r 1 E1 .byte $e1 +0004E2r 1 E2 .byte $e2 +0004E3r 1 E3 .byte $e3 +0004E4r 1 E4 .byte $e4 +0004E5r 1 E5 .byte $e5 +0004E6r 1 E6 .byte $e6 +0004E7r 1 E7 .byte $e7 +0004E8r 1 E8 .byte $e8 +0004E9r 1 E9 .byte $e9 +0004EAr 1 EA .byte $ea +0004EBr 1 EB .byte $eb +0004ECr 1 EC .byte $ec +0004EDr 1 ED .byte $ed +0004EEr 1 EE .byte $ee +0004EFr 1 EF .byte $ef +0004F0r 1 F0 .byte $f0 +0004F1r 1 F1 .byte $f1 +0004F2r 1 F2 .byte $f2 +0004F3r 1 F3 .byte $f3 +0004F4r 1 F4 .byte $f4 +0004F5r 1 F5 .byte $f5 +0004F6r 1 F6 .byte $f6 +0004F7r 1 F7 .byte $f7 +0004F8r 1 F8 .byte $f8 +0004F9r 1 F9 .byte $f9 +0004FAr 1 FA .byte $fa +0004FBr 1 FB .byte $fb +0004FCr 1 FC .byte $fc +0004FDr 1 FD .byte $fd +0004FEr 1 FE .byte $fe +0004FFr 1 FF .byte $ff +000500r 1 +000500r 1 ; 2-digit hex values, uppercase +000500r 1 00 .byte $00 +000501r 1 01 .byte $01 +000502r 1 02 .byte $02 +000503r 1 03 .byte $03 +000504r 1 04 .byte $04 +000505r 1 05 .byte $05 +000506r 1 06 .byte $06 +000507r 1 07 .byte $07 +000508r 1 08 .byte $08 +000509r 1 09 .byte $09 +00050Ar 1 0A .byte $0A +00050Br 1 0B .byte $0B +00050Cr 1 0C .byte $0C +00050Dr 1 0D .byte $0D +00050Er 1 0E .byte $0E +00050Fr 1 0F .byte $0F +000510r 1 10 .byte $10 +000511r 1 11 .byte $11 +000512r 1 12 .byte $12 +000513r 1 13 .byte $13 +000514r 1 14 .byte $14 +000515r 1 15 .byte $15 +000516r 1 16 .byte $16 +000517r 1 17 .byte $17 +000518r 1 18 .byte $18 +000519r 1 19 .byte $19 +00051Ar 1 1A .byte $1A +00051Br 1 1B .byte $1B +00051Cr 1 1C .byte $1C +00051Dr 1 1D .byte $1D +00051Er 1 1E .byte $1E +00051Fr 1 1F .byte $1F +000520r 1 20 .byte $20 +000521r 1 21 .byte $21 +000522r 1 22 .byte $22 +000523r 1 23 .byte $23 +000524r 1 24 .byte $24 +000525r 1 25 .byte $25 +000526r 1 26 .byte $26 +000527r 1 27 .byte $27 +000528r 1 28 .byte $28 +000529r 1 29 .byte $29 +00052Ar 1 2A .byte $2A +00052Br 1 2B .byte $2B +00052Cr 1 2C .byte $2C +00052Dr 1 2D .byte $2D +00052Er 1 2E .byte $2E +00052Fr 1 2F .byte $2F +000530r 1 30 .byte $30 +000531r 1 31 .byte $31 +000532r 1 32 .byte $32 +000533r 1 33 .byte $33 +000534r 1 34 .byte $34 +000535r 1 35 .byte $35 +000536r 1 36 .byte $36 +000537r 1 37 .byte $37 +000538r 1 38 .byte $38 +000539r 1 39 .byte $39 +00053Ar 1 3A .byte $3A +00053Br 1 3B .byte $3B +00053Cr 1 3C .byte $3C +00053Dr 1 3D .byte $3D +00053Er 1 3E .byte $3E +00053Fr 1 3F .byte $3F +000540r 1 40 .byte $40 +000541r 1 41 .byte $41 +000542r 1 42 .byte $42 +000543r 1 43 .byte $43 +000544r 1 44 .byte $44 +000545r 1 45 .byte $45 +000546r 1 46 .byte $46 +000547r 1 47 .byte $47 +000548r 1 48 .byte $48 +000549r 1 49 .byte $49 +00054Ar 1 4A .byte $4A +00054Br 1 4B .byte $4B +00054Cr 1 4C .byte $4C +00054Dr 1 4D .byte $4D +00054Er 1 4E .byte $4E +00054Fr 1 4F .byte $4F +000550r 1 50 .byte $50 +000551r 1 51 .byte $51 +000552r 1 52 .byte $52 +000553r 1 53 .byte $53 +000554r 1 54 .byte $54 +000555r 1 55 .byte $55 +000556r 1 56 .byte $56 +000557r 1 57 .byte $57 +000558r 1 58 .byte $58 +000559r 1 59 .byte $59 +00055Ar 1 5A .byte $5A +00055Br 1 5B .byte $5B +00055Cr 1 5C .byte $5C +00055Dr 1 5D .byte $5D +00055Er 1 5E .byte $5E +00055Fr 1 5F .byte $5F +000560r 1 60 .byte $60 +000561r 1 61 .byte $61 +000562r 1 62 .byte $62 +000563r 1 63 .byte $63 +000564r 1 64 .byte $64 +000565r 1 65 .byte $65 +000566r 1 66 .byte $66 +000567r 1 67 .byte $67 +000568r 1 68 .byte $68 +000569r 1 69 .byte $69 +00056Ar 1 6A .byte $6A +00056Br 1 6B .byte $6B +00056Cr 1 6C .byte $6C +00056Dr 1 6D .byte $6D +00056Er 1 6E .byte $6E +00056Fr 1 6F .byte $6F +000570r 1 70 .byte $70 +000571r 1 71 .byte $71 +000572r 1 72 .byte $72 +000573r 1 73 .byte $73 +000574r 1 74 .byte $74 +000575r 1 75 .byte $75 +000576r 1 76 .byte $76 +000577r 1 77 .byte $77 +000578r 1 78 .byte $78 +000579r 1 79 .byte $79 +00057Ar 1 7A .byte $7A +00057Br 1 7B .byte $7B +00057Cr 1 7C .byte $7C +00057Dr 1 7D .byte $7D +00057Er 1 7E .byte $7E +00057Fr 1 7F .byte $7F +000580r 1 80 .byte $80 +000581r 1 81 .byte $81 +000582r 1 82 .byte $82 +000583r 1 83 .byte $83 +000584r 1 84 .byte $84 +000585r 1 85 .byte $85 +000586r 1 86 .byte $86 +000587r 1 87 .byte $87 +000588r 1 88 .byte $88 +000589r 1 89 .byte $89 +00058Ar 1 8A .byte $8A +00058Br 1 8B .byte $8B +00058Cr 1 8C .byte $8C +00058Dr 1 8D .byte $8D +00058Er 1 8E .byte $8E +00058Fr 1 8F .byte $8F +000590r 1 90 .byte $90 +000591r 1 91 .byte $91 +000592r 1 92 .byte $92 +000593r 1 93 .byte $93 +000594r 1 94 .byte $94 +000595r 1 95 .byte $95 +000596r 1 96 .byte $96 +000597r 1 97 .byte $97 +000598r 1 98 .byte $98 +000599r 1 99 .byte $99 +00059Ar 1 9A .byte $9A +00059Br 1 9B .byte $9B +00059Cr 1 9C .byte $9C +00059Dr 1 9D .byte $9D +00059Er 1 9E .byte $9E +00059Fr 1 9F .byte $9F +0005A0r 1 A0 .byte $A0 +0005A1r 1 A1 .byte $A1 +0005A2r 1 A2 .byte $A2 +0005A3r 1 A3 .byte $A3 +0005A4r 1 A4 .byte $A4 +0005A5r 1 A5 .byte $A5 +0005A6r 1 A6 .byte $A6 +0005A7r 1 A7 .byte $A7 +0005A8r 1 A8 .byte $A8 +0005A9r 1 A9 .byte $A9 +0005AAr 1 AA .byte $AA +0005ABr 1 AB .byte $AB +0005ACr 1 AC .byte $AC +0005ADr 1 AD .byte $AD +0005AEr 1 AE .byte $AE +0005AFr 1 AF .byte $AF +0005B0r 1 B0 .byte $B0 +0005B1r 1 B1 .byte $B1 +0005B2r 1 B2 .byte $B2 +0005B3r 1 B3 .byte $B3 +0005B4r 1 B4 .byte $B4 +0005B5r 1 B5 .byte $B5 +0005B6r 1 B6 .byte $B6 +0005B7r 1 B7 .byte $B7 +0005B8r 1 B8 .byte $B8 +0005B9r 1 B9 .byte $B9 +0005BAr 1 BA .byte $BA +0005BBr 1 BB .byte $BB +0005BCr 1 BC .byte $BC +0005BDr 1 BD .byte $BD +0005BEr 1 BE .byte $BE +0005BFr 1 BF .byte $BF +0005C0r 1 C0 .byte $C0 +0005C1r 1 C1 .byte $C1 +0005C2r 1 C2 .byte $C2 +0005C3r 1 C3 .byte $C3 +0005C4r 1 C4 .byte $C4 +0005C5r 1 C5 .byte $C5 +0005C6r 1 C6 .byte $C6 +0005C7r 1 C7 .byte $C7 +0005C8r 1 C8 .byte $C8 +0005C9r 1 C9 .byte $C9 +0005CAr 1 CA .byte $CA +0005CBr 1 CB .byte $CB +0005CCr 1 CC .byte $CC +0005CDr 1 CD .byte $CD +0005CEr 1 CE .byte $CE +0005CFr 1 CF .byte $CF +0005D0r 1 D0 .byte $D0 +0005D1r 1 D1 .byte $D1 +0005D2r 1 D2 .byte $D2 +0005D3r 1 D3 .byte $D3 +0005D4r 1 D4 .byte $D4 +0005D5r 1 D5 .byte $D5 +0005D6r 1 D6 .byte $D6 +0005D7r 1 D7 .byte $D7 +0005D8r 1 D8 .byte $D8 +0005D9r 1 D9 .byte $D9 +0005DAr 1 DA .byte $DA +0005DBr 1 DB .byte $DB +0005DCr 1 DC .byte $DC +0005DDr 1 DD .byte $DD +0005DEr 1 DE .byte $DE +0005DFr 1 DF .byte $DF +0005E0r 1 E0 .byte $E0 +0005E1r 1 E1 .byte $E1 +0005E2r 1 E2 .byte $E2 +0005E3r 1 E3 .byte $E3 +0005E4r 1 E4 .byte $E4 +0005E5r 1 E5 .byte $E5 +0005E6r 1 E6 .byte $E6 +0005E7r 1 E7 .byte $E7 +0005E8r 1 E8 .byte $E8 +0005E9r 1 E9 .byte $E9 +0005EAr 1 EA .byte $EA +0005EBr 1 EB .byte $EB +0005ECr 1 EC .byte $EC +0005EDr 1 ED .byte $ED +0005EEr 1 EE .byte $EE +0005EFr 1 EF .byte $EF +0005F0r 1 F0 .byte $F0 +0005F1r 1 F1 .byte $F1 +0005F2r 1 F2 .byte $F2 +0005F3r 1 F3 .byte $F3 +0005F4r 1 F4 .byte $F4 +0005F5r 1 F5 .byte $F5 +0005F6r 1 F6 .byte $F6 +0005F7r 1 F7 .byte $F7 +0005F8r 1 F8 .byte $F8 +0005F9r 1 F9 .byte $F9 +0005FAr 1 FA .byte $FA +0005FBr 1 FB .byte $FB +0005FCr 1 FC .byte $FC +0005FDr 1 FD .byte $FD +0005FEr 1 FE .byte $FE +0005FFr 1 FF .byte $FF +000600r 1 +000600r 1 ; alternative hex values +000600r 1 00 .byte 0h +000601r 1 01 .byte 1h +000602r 1 02 .byte 2h +000603r 1 03 .byte 3h +000604r 1 04 .byte 4h +000605r 1 05 .byte 5h +000606r 1 06 .byte 6h +000607r 1 07 .byte 7h +000608r 1 08 .byte 8h +000609r 1 09 .byte 9h +00060Ar 1 0A .byte 0ah +00060Br 1 0B .byte 0bh +00060Cr 1 0C .byte 0ch +00060Dr 1 0D .byte 0dh +00060Er 1 0E .byte 0eh +00060Fr 1 0F .byte 0fh +000610r 1 10 .byte 10h +000611r 1 11 .byte 11h +000612r 1 12 .byte 12h +000613r 1 13 .byte 13h +000614r 1 14 .byte 14h +000615r 1 15 .byte 15h +000616r 1 16 .byte 16h +000617r 1 17 .byte 17h +000618r 1 18 .byte 18h +000619r 1 19 .byte 19h +00061Ar 1 1A .byte 1ah +00061Br 1 1B .byte 1bh +00061Cr 1 1C .byte 1ch +00061Dr 1 1D .byte 1dh +00061Er 1 1E .byte 1eh +00061Fr 1 1F .byte 1fh +000620r 1 20 .byte 20h +000621r 1 21 .byte 21h +000622r 1 22 .byte 22h +000623r 1 23 .byte 23h +000624r 1 24 .byte 24h +000625r 1 25 .byte 25h +000626r 1 26 .byte 26h +000627r 1 27 .byte 27h +000628r 1 28 .byte 28h +000629r 1 29 .byte 29h +00062Ar 1 2A .byte 2ah +00062Br 1 2B .byte 2bh +00062Cr 1 2C .byte 2ch +00062Dr 1 2D .byte 2dh +00062Er 1 2E .byte 2eh +00062Fr 1 2F .byte 2fh +000630r 1 30 .byte 30h +000631r 1 31 .byte 31h +000632r 1 32 .byte 32h +000633r 1 33 .byte 33h +000634r 1 34 .byte 34h +000635r 1 35 .byte 35h +000636r 1 36 .byte 36h +000637r 1 37 .byte 37h +000638r 1 38 .byte 38h +000639r 1 39 .byte 39h +00063Ar 1 3A .byte 3ah +00063Br 1 3B .byte 3bh +00063Cr 1 3C .byte 3ch +00063Dr 1 3D .byte 3dh +00063Er 1 3E .byte 3eh +00063Fr 1 3F .byte 3fh +000640r 1 40 .byte 40h +000641r 1 41 .byte 41h +000642r 1 42 .byte 42h +000643r 1 43 .byte 43h +000644r 1 44 .byte 44h +000645r 1 45 .byte 45h +000646r 1 46 .byte 46h +000647r 1 47 .byte 47h +000648r 1 48 .byte 48h +000649r 1 49 .byte 49h +00064Ar 1 4A .byte 4ah +00064Br 1 4B .byte 4bh +00064Cr 1 4C .byte 4ch +00064Dr 1 4D .byte 4dh +00064Er 1 4E .byte 4eh +00064Fr 1 4F .byte 4fh +000650r 1 50 .byte 50h +000651r 1 51 .byte 51h +000652r 1 52 .byte 52h +000653r 1 53 .byte 53h +000654r 1 54 .byte 54h +000655r 1 55 .byte 55h +000656r 1 56 .byte 56h +000657r 1 57 .byte 57h +000658r 1 58 .byte 58h +000659r 1 59 .byte 59h +00065Ar 1 5A .byte 5ah +00065Br 1 5B .byte 5bh +00065Cr 1 5C .byte 5ch +00065Dr 1 5D .byte 5dh +00065Er 1 5E .byte 5eh +00065Fr 1 5F .byte 5fh +000660r 1 60 .byte 60h +000661r 1 61 .byte 61h +000662r 1 62 .byte 62h +000663r 1 63 .byte 63h +000664r 1 64 .byte 64h +000665r 1 65 .byte 65h +000666r 1 66 .byte 66h +000667r 1 67 .byte 67h +000668r 1 68 .byte 68h +000669r 1 69 .byte 69h +00066Ar 1 6A .byte 6ah +00066Br 1 6B .byte 6bh +00066Cr 1 6C .byte 6ch +00066Dr 1 6D .byte 6dh +00066Er 1 6E .byte 6eh +00066Fr 1 6F .byte 6fh +000670r 1 70 .byte 70h +000671r 1 71 .byte 71h +000672r 1 72 .byte 72h +000673r 1 73 .byte 73h +000674r 1 74 .byte 74h +000675r 1 75 .byte 75h +000676r 1 76 .byte 76h +000677r 1 77 .byte 77h +000678r 1 78 .byte 78h +000679r 1 79 .byte 79h +00067Ar 1 7A .byte 7ah +00067Br 1 7B .byte 7bh +00067Cr 1 7C .byte 7ch +00067Dr 1 7D .byte 7dh +00067Er 1 7E .byte 7eh +00067Fr 1 7F .byte 7fh +000680r 1 80 .byte 80h +000681r 1 81 .byte 81h +000682r 1 82 .byte 82h +000683r 1 83 .byte 83h +000684r 1 84 .byte 84h +000685r 1 85 .byte 85h +000686r 1 86 .byte 86h +000687r 1 87 .byte 87h +000688r 1 88 .byte 88h +000689r 1 89 .byte 89h +00068Ar 1 8A .byte 8ah +00068Br 1 8B .byte 8bh +00068Cr 1 8C .byte 8ch +00068Dr 1 8D .byte 8dh +00068Er 1 8E .byte 8eh +00068Fr 1 8F .byte 8fh +000690r 1 90 .byte 90h +000691r 1 91 .byte 91h +000692r 1 92 .byte 92h +000693r 1 93 .byte 93h +000694r 1 94 .byte 94h +000695r 1 95 .byte 95h +000696r 1 96 .byte 96h +000697r 1 97 .byte 97h +000698r 1 98 .byte 98h +000699r 1 99 .byte 99h +00069Ar 1 9A .byte 9ah +00069Br 1 9B .byte 9bh +00069Cr 1 9C .byte 9ch +00069Dr 1 9D .byte 9dh +00069Er 1 9E .byte 9eh +00069Fr 1 9F .byte 9fh +0006A0r 1 A0 .byte 0a0h +0006A1r 1 A1 .byte 0a1h +0006A2r 1 A2 .byte 0a2h +0006A3r 1 A3 .byte 0a3h +0006A4r 1 A4 .byte 0a4h +0006A5r 1 A5 .byte 0a5h +0006A6r 1 A6 .byte 0a6h +0006A7r 1 A7 .byte 0a7h +0006A8r 1 A8 .byte 0a8h +0006A9r 1 A9 .byte 0a9h +0006AAr 1 AA .byte 0aah +0006ABr 1 AB .byte 0abh +0006ACr 1 AC .byte 0ach +0006ADr 1 AD .byte 0adh +0006AEr 1 AE .byte 0aeh +0006AFr 1 AF .byte 0afh +0006B0r 1 B0 .byte 0b0h +0006B1r 1 B1 .byte 0b1h +0006B2r 1 B2 .byte 0b2h +0006B3r 1 B3 .byte 0b3h +0006B4r 1 B4 .byte 0b4h +0006B5r 1 B5 .byte 0b5h +0006B6r 1 B6 .byte 0b6h +0006B7r 1 B7 .byte 0b7h +0006B8r 1 B8 .byte 0b8h +0006B9r 1 B9 .byte 0b9h +0006BAr 1 BA .byte 0bah +0006BBr 1 BB .byte 0bbh +0006BCr 1 BC .byte 0bch +0006BDr 1 BD .byte 0bdh +0006BEr 1 BE .byte 0beh +0006BFr 1 BF .byte 0bfh +0006C0r 1 C0 .byte 0c0h +0006C1r 1 C1 .byte 0c1h +0006C2r 1 C2 .byte 0c2h +0006C3r 1 C3 .byte 0c3h +0006C4r 1 C4 .byte 0c4h +0006C5r 1 C5 .byte 0c5h +0006C6r 1 C6 .byte 0c6h +0006C7r 1 C7 .byte 0c7h +0006C8r 1 C8 .byte 0c8h +0006C9r 1 C9 .byte 0c9h +0006CAr 1 CA .byte 0cah +0006CBr 1 CB .byte 0cbh +0006CCr 1 CC .byte 0cch +0006CDr 1 CD .byte 0cdh +0006CEr 1 CE .byte 0ceh +0006CFr 1 CF .byte 0cfh +0006D0r 1 D0 .byte 0d0h +0006D1r 1 D1 .byte 0d1h +0006D2r 1 D2 .byte 0d2h +0006D3r 1 D3 .byte 0d3h +0006D4r 1 D4 .byte 0d4h +0006D5r 1 D5 .byte 0d5h +0006D6r 1 D6 .byte 0d6h +0006D7r 1 D7 .byte 0d7h +0006D8r 1 D8 .byte 0d8h +0006D9r 1 D9 .byte 0d9h +0006DAr 1 DA .byte 0dah +0006DBr 1 DB .byte 0dbh +0006DCr 1 DC .byte 0dch +0006DDr 1 DD .byte 0ddh +0006DEr 1 DE .byte 0deh +0006DFr 1 DF .byte 0dfh +0006E0r 1 E0 .byte 0e0h +0006E1r 1 E1 .byte 0e1h +0006E2r 1 E2 .byte 0e2h +0006E3r 1 E3 .byte 0e3h +0006E4r 1 E4 .byte 0e4h +0006E5r 1 E5 .byte 0e5h +0006E6r 1 E6 .byte 0e6h +0006E7r 1 E7 .byte 0e7h +0006E8r 1 E8 .byte 0e8h +0006E9r 1 E9 .byte 0e9h +0006EAr 1 EA .byte 0eah +0006EBr 1 EB .byte 0ebh +0006ECr 1 EC .byte 0ech +0006EDr 1 ED .byte 0edh +0006EEr 1 EE .byte 0eeh +0006EFr 1 EF .byte 0efh +0006F0r 1 F0 .byte 0f0h +0006F1r 1 F1 .byte 0f1h +0006F2r 1 F2 .byte 0f2h +0006F3r 1 F3 .byte 0f3h +0006F4r 1 F4 .byte 0f4h +0006F5r 1 F5 .byte 0f5h +0006F6r 1 F6 .byte 0f6h +0006F7r 1 F7 .byte 0f7h +0006F8r 1 F8 .byte 0f8h +0006F9r 1 F9 .byte 0f9h +0006FAr 1 FA .byte 0fah +0006FBr 1 FB .byte 0fbh +0006FCr 1 FC .byte 0fch +0006FDr 1 FD .byte 0fdh +0006FEr 1 FE .byte 0feh +0006FFr 1 FF .byte 0ffh +000700r 1 +000700r 1 ; alternative hex values, uppercase +000700r 1 00 .byte 0h +000701r 1 01 .byte 1h +000702r 1 02 .byte 2h +000703r 1 03 .byte 3h +000704r 1 04 .byte 4h +000705r 1 05 .byte 5h +000706r 1 06 .byte 6h +000707r 1 07 .byte 7h +000708r 1 08 .byte 8h +000709r 1 09 .byte 9h +00070Ar 1 0A .byte 0Ah +00070Br 1 0B .byte 0Bh +00070Cr 1 0C .byte 0Ch +00070Dr 1 0D .byte 0Dh +00070Er 1 0E .byte 0Eh +00070Fr 1 0F .byte 0Fh +000710r 1 10 .byte 10h +000711r 1 11 .byte 11h +000712r 1 12 .byte 12h +000713r 1 13 .byte 13h +000714r 1 14 .byte 14h +000715r 1 15 .byte 15h +000716r 1 16 .byte 16h +000717r 1 17 .byte 17h +000718r 1 18 .byte 18h +000719r 1 19 .byte 19h +00071Ar 1 1A .byte 1Ah +00071Br 1 1B .byte 1Bh +00071Cr 1 1C .byte 1Ch +00071Dr 1 1D .byte 1Dh +00071Er 1 1E .byte 1Eh +00071Fr 1 1F .byte 1Fh +000720r 1 20 .byte 20h +000721r 1 21 .byte 21h +000722r 1 22 .byte 22h +000723r 1 23 .byte 23h +000724r 1 24 .byte 24h +000725r 1 25 .byte 25h +000726r 1 26 .byte 26h +000727r 1 27 .byte 27h +000728r 1 28 .byte 28h +000729r 1 29 .byte 29h +00072Ar 1 2A .byte 2Ah +00072Br 1 2B .byte 2Bh +00072Cr 1 2C .byte 2Ch +00072Dr 1 2D .byte 2Dh +00072Er 1 2E .byte 2Eh +00072Fr 1 2F .byte 2Fh +000730r 1 30 .byte 30h +000731r 1 31 .byte 31h +000732r 1 32 .byte 32h +000733r 1 33 .byte 33h +000734r 1 34 .byte 34h +000735r 1 35 .byte 35h +000736r 1 36 .byte 36h +000737r 1 37 .byte 37h +000738r 1 38 .byte 38h +000739r 1 39 .byte 39h +00073Ar 1 3A .byte 3Ah +00073Br 1 3B .byte 3Bh +00073Cr 1 3C .byte 3Ch +00073Dr 1 3D .byte 3Dh +00073Er 1 3E .byte 3Eh +00073Fr 1 3F .byte 3Fh +000740r 1 40 .byte 40h +000741r 1 41 .byte 41h +000742r 1 42 .byte 42h +000743r 1 43 .byte 43h +000744r 1 44 .byte 44h +000745r 1 45 .byte 45h +000746r 1 46 .byte 46h +000747r 1 47 .byte 47h +000748r 1 48 .byte 48h +000749r 1 49 .byte 49h +00074Ar 1 4A .byte 4Ah +00074Br 1 4B .byte 4Bh +00074Cr 1 4C .byte 4Ch +00074Dr 1 4D .byte 4Dh +00074Er 1 4E .byte 4Eh +00074Fr 1 4F .byte 4Fh +000750r 1 50 .byte 50h +000751r 1 51 .byte 51h +000752r 1 52 .byte 52h +000753r 1 53 .byte 53h +000754r 1 54 .byte 54h +000755r 1 55 .byte 55h +000756r 1 56 .byte 56h +000757r 1 57 .byte 57h +000758r 1 58 .byte 58h +000759r 1 59 .byte 59h +00075Ar 1 5A .byte 5Ah +00075Br 1 5B .byte 5Bh +00075Cr 1 5C .byte 5Ch +00075Dr 1 5D .byte 5Dh +00075Er 1 5E .byte 5Eh +00075Fr 1 5F .byte 5Fh +000760r 1 60 .byte 60h +000761r 1 61 .byte 61h +000762r 1 62 .byte 62h +000763r 1 63 .byte 63h +000764r 1 64 .byte 64h +000765r 1 65 .byte 65h +000766r 1 66 .byte 66h +000767r 1 67 .byte 67h +000768r 1 68 .byte 68h +000769r 1 69 .byte 69h +00076Ar 1 6A .byte 6Ah +00076Br 1 6B .byte 6Bh +00076Cr 1 6C .byte 6Ch +00076Dr 1 6D .byte 6Dh +00076Er 1 6E .byte 6Eh +00076Fr 1 6F .byte 6Fh +000770r 1 70 .byte 70h +000771r 1 71 .byte 71h +000772r 1 72 .byte 72h +000773r 1 73 .byte 73h +000774r 1 74 .byte 74h +000775r 1 75 .byte 75h +000776r 1 76 .byte 76h +000777r 1 77 .byte 77h +000778r 1 78 .byte 78h +000779r 1 79 .byte 79h +00077Ar 1 7A .byte 7Ah +00077Br 1 7B .byte 7Bh +00077Cr 1 7C .byte 7Ch +00077Dr 1 7D .byte 7Dh +00077Er 1 7E .byte 7Eh +00077Fr 1 7F .byte 7Fh +000780r 1 80 .byte 80h +000781r 1 81 .byte 81h +000782r 1 82 .byte 82h +000783r 1 83 .byte 83h +000784r 1 84 .byte 84h +000785r 1 85 .byte 85h +000786r 1 86 .byte 86h +000787r 1 87 .byte 87h +000788r 1 88 .byte 88h +000789r 1 89 .byte 89h +00078Ar 1 8A .byte 8Ah +00078Br 1 8B .byte 8Bh +00078Cr 1 8C .byte 8Ch +00078Dr 1 8D .byte 8Dh +00078Er 1 8E .byte 8Eh +00078Fr 1 8F .byte 8Fh +000790r 1 90 .byte 90h +000791r 1 91 .byte 91h +000792r 1 92 .byte 92h +000793r 1 93 .byte 93h +000794r 1 94 .byte 94h +000795r 1 95 .byte 95h +000796r 1 96 .byte 96h +000797r 1 97 .byte 97h +000798r 1 98 .byte 98h +000799r 1 99 .byte 99h +00079Ar 1 9A .byte 9Ah +00079Br 1 9B .byte 9Bh +00079Cr 1 9C .byte 9Ch +00079Dr 1 9D .byte 9Dh +00079Er 1 9E .byte 9Eh +00079Fr 1 9F .byte 9Fh +0007A0r 1 A0 .byte 0A0h +0007A1r 1 A1 .byte 0A1h +0007A2r 1 A2 .byte 0A2h +0007A3r 1 A3 .byte 0A3h +0007A4r 1 A4 .byte 0A4h +0007A5r 1 A5 .byte 0A5h +0007A6r 1 A6 .byte 0A6h +0007A7r 1 A7 .byte 0A7h +0007A8r 1 A8 .byte 0A8h +0007A9r 1 A9 .byte 0A9h +0007AAr 1 AA .byte 0AAh +0007ABr 1 AB .byte 0ABh +0007ACr 1 AC .byte 0ACh +0007ADr 1 AD .byte 0ADh +0007AEr 1 AE .byte 0AEh +0007AFr 1 AF .byte 0AFh +0007B0r 1 B0 .byte 0B0h +0007B1r 1 B1 .byte 0B1h +0007B2r 1 B2 .byte 0B2h +0007B3r 1 B3 .byte 0B3h +0007B4r 1 B4 .byte 0B4h +0007B5r 1 B5 .byte 0B5h +0007B6r 1 B6 .byte 0B6h +0007B7r 1 B7 .byte 0B7h +0007B8r 1 B8 .byte 0B8h +0007B9r 1 B9 .byte 0B9h +0007BAr 1 BA .byte 0BAh +0007BBr 1 BB .byte 0BBh +0007BCr 1 BC .byte 0BCh +0007BDr 1 BD .byte 0BDh +0007BEr 1 BE .byte 0BEh +0007BFr 1 BF .byte 0BFh +0007C0r 1 C0 .byte 0C0h +0007C1r 1 C1 .byte 0C1h +0007C2r 1 C2 .byte 0C2h +0007C3r 1 C3 .byte 0C3h +0007C4r 1 C4 .byte 0C4h +0007C5r 1 C5 .byte 0C5h +0007C6r 1 C6 .byte 0C6h +0007C7r 1 C7 .byte 0C7h +0007C8r 1 C8 .byte 0C8h +0007C9r 1 C9 .byte 0C9h +0007CAr 1 CA .byte 0CAh +0007CBr 1 CB .byte 0CBh +0007CCr 1 CC .byte 0CCh +0007CDr 1 CD .byte 0CDh +0007CEr 1 CE .byte 0CEh +0007CFr 1 CF .byte 0CFh +0007D0r 1 D0 .byte 0D0h +0007D1r 1 D1 .byte 0D1h +0007D2r 1 D2 .byte 0D2h +0007D3r 1 D3 .byte 0D3h +0007D4r 1 D4 .byte 0D4h +0007D5r 1 D5 .byte 0D5h +0007D6r 1 D6 .byte 0D6h +0007D7r 1 D7 .byte 0D7h +0007D8r 1 D8 .byte 0D8h +0007D9r 1 D9 .byte 0D9h +0007DAr 1 DA .byte 0DAh +0007DBr 1 DB .byte 0DBh +0007DCr 1 DC .byte 0DCh +0007DDr 1 DD .byte 0DDh +0007DEr 1 DE .byte 0DEh +0007DFr 1 DF .byte 0DFh +0007E0r 1 E0 .byte 0E0h +0007E1r 1 E1 .byte 0E1h +0007E2r 1 E2 .byte 0E2h +0007E3r 1 E3 .byte 0E3h +0007E4r 1 E4 .byte 0E4h +0007E5r 1 E5 .byte 0E5h +0007E6r 1 E6 .byte 0E6h +0007E7r 1 E7 .byte 0E7h +0007E8r 1 E8 .byte 0E8h +0007E9r 1 E9 .byte 0E9h +0007EAr 1 EA .byte 0EAh +0007EBr 1 EB .byte 0EBh +0007ECr 1 EC .byte 0ECh +0007EDr 1 ED .byte 0EDh +0007EEr 1 EE .byte 0EEh +0007EFr 1 EF .byte 0EFh +0007F0r 1 F0 .byte 0F0h +0007F1r 1 F1 .byte 0F1h +0007F2r 1 F2 .byte 0F2h +0007F3r 1 F3 .byte 0F3h +0007F4r 1 F4 .byte 0F4h +0007F5r 1 F5 .byte 0F5h +0007F6r 1 F6 .byte 0F6h +0007F7r 1 F7 .byte 0F7h +0007F8r 1 F8 .byte 0F8h +0007F9r 1 F9 .byte 0F9h +0007FAr 1 FA .byte 0FAh +0007FBr 1 FB .byte 0FBh +0007FCr 1 FC .byte 0FCh +0007FDr 1 FD .byte 0FDh +0007FEr 1 FE .byte 0FEh +0007FFr 1 FF .byte 0FFh +000800r 1 +000800r 1 ; alternative 2-digit hex values +000800r 1 00 .byte 00h +000801r 1 01 .byte 01h +000802r 1 02 .byte 02h +000803r 1 03 .byte 03h +000804r 1 04 .byte 04h +000805r 1 05 .byte 05h +000806r 1 06 .byte 06h +000807r 1 07 .byte 07h +000808r 1 08 .byte 08h +000809r 1 09 .byte 09h +00080Ar 1 0A .byte 0ah +00080Br 1 0B .byte 0bh +00080Cr 1 0C .byte 0ch +00080Dr 1 0D .byte 0dh +00080Er 1 0E .byte 0eh +00080Fr 1 0F .byte 0fh +000810r 1 10 .byte 10h +000811r 1 11 .byte 11h +000812r 1 12 .byte 12h +000813r 1 13 .byte 13h +000814r 1 14 .byte 14h +000815r 1 15 .byte 15h +000816r 1 16 .byte 16h +000817r 1 17 .byte 17h +000818r 1 18 .byte 18h +000819r 1 19 .byte 19h +00081Ar 1 1A .byte 1ah +00081Br 1 1B .byte 1bh +00081Cr 1 1C .byte 1ch +00081Dr 1 1D .byte 1dh +00081Er 1 1E .byte 1eh +00081Fr 1 1F .byte 1fh +000820r 1 20 .byte 20h +000821r 1 21 .byte 21h +000822r 1 22 .byte 22h +000823r 1 23 .byte 23h +000824r 1 24 .byte 24h +000825r 1 25 .byte 25h +000826r 1 26 .byte 26h +000827r 1 27 .byte 27h +000828r 1 28 .byte 28h +000829r 1 29 .byte 29h +00082Ar 1 2A .byte 2ah +00082Br 1 2B .byte 2bh +00082Cr 1 2C .byte 2ch +00082Dr 1 2D .byte 2dh +00082Er 1 2E .byte 2eh +00082Fr 1 2F .byte 2fh +000830r 1 30 .byte 30h +000831r 1 31 .byte 31h +000832r 1 32 .byte 32h +000833r 1 33 .byte 33h +000834r 1 34 .byte 34h +000835r 1 35 .byte 35h +000836r 1 36 .byte 36h +000837r 1 37 .byte 37h +000838r 1 38 .byte 38h +000839r 1 39 .byte 39h +00083Ar 1 3A .byte 3ah +00083Br 1 3B .byte 3bh +00083Cr 1 3C .byte 3ch +00083Dr 1 3D .byte 3dh +00083Er 1 3E .byte 3eh +00083Fr 1 3F .byte 3fh +000840r 1 40 .byte 40h +000841r 1 41 .byte 41h +000842r 1 42 .byte 42h +000843r 1 43 .byte 43h +000844r 1 44 .byte 44h +000845r 1 45 .byte 45h +000846r 1 46 .byte 46h +000847r 1 47 .byte 47h +000848r 1 48 .byte 48h +000849r 1 49 .byte 49h +00084Ar 1 4A .byte 4ah +00084Br 1 4B .byte 4bh +00084Cr 1 4C .byte 4ch +00084Dr 1 4D .byte 4dh +00084Er 1 4E .byte 4eh +00084Fr 1 4F .byte 4fh +000850r 1 50 .byte 50h +000851r 1 51 .byte 51h +000852r 1 52 .byte 52h +000853r 1 53 .byte 53h +000854r 1 54 .byte 54h +000855r 1 55 .byte 55h +000856r 1 56 .byte 56h +000857r 1 57 .byte 57h +000858r 1 58 .byte 58h +000859r 1 59 .byte 59h +00085Ar 1 5A .byte 5ah +00085Br 1 5B .byte 5bh +00085Cr 1 5C .byte 5ch +00085Dr 1 5D .byte 5dh +00085Er 1 5E .byte 5eh +00085Fr 1 5F .byte 5fh +000860r 1 60 .byte 60h +000861r 1 61 .byte 61h +000862r 1 62 .byte 62h +000863r 1 63 .byte 63h +000864r 1 64 .byte 64h +000865r 1 65 .byte 65h +000866r 1 66 .byte 66h +000867r 1 67 .byte 67h +000868r 1 68 .byte 68h +000869r 1 69 .byte 69h +00086Ar 1 6A .byte 6ah +00086Br 1 6B .byte 6bh +00086Cr 1 6C .byte 6ch +00086Dr 1 6D .byte 6dh +00086Er 1 6E .byte 6eh +00086Fr 1 6F .byte 6fh +000870r 1 70 .byte 70h +000871r 1 71 .byte 71h +000872r 1 72 .byte 72h +000873r 1 73 .byte 73h +000874r 1 74 .byte 74h +000875r 1 75 .byte 75h +000876r 1 76 .byte 76h +000877r 1 77 .byte 77h +000878r 1 78 .byte 78h +000879r 1 79 .byte 79h +00087Ar 1 7A .byte 7ah +00087Br 1 7B .byte 7bh +00087Cr 1 7C .byte 7ch +00087Dr 1 7D .byte 7dh +00087Er 1 7E .byte 7eh +00087Fr 1 7F .byte 7fh +000880r 1 80 .byte 80h +000881r 1 81 .byte 81h +000882r 1 82 .byte 82h +000883r 1 83 .byte 83h +000884r 1 84 .byte 84h +000885r 1 85 .byte 85h +000886r 1 86 .byte 86h +000887r 1 87 .byte 87h +000888r 1 88 .byte 88h +000889r 1 89 .byte 89h +00088Ar 1 8A .byte 8ah +00088Br 1 8B .byte 8bh +00088Cr 1 8C .byte 8ch +00088Dr 1 8D .byte 8dh +00088Er 1 8E .byte 8eh +00088Fr 1 8F .byte 8fh +000890r 1 90 .byte 90h +000891r 1 91 .byte 91h +000892r 1 92 .byte 92h +000893r 1 93 .byte 93h +000894r 1 94 .byte 94h +000895r 1 95 .byte 95h +000896r 1 96 .byte 96h +000897r 1 97 .byte 97h +000898r 1 98 .byte 98h +000899r 1 99 .byte 99h +00089Ar 1 9A .byte 9ah +00089Br 1 9B .byte 9bh +00089Cr 1 9C .byte 9ch +00089Dr 1 9D .byte 9dh +00089Er 1 9E .byte 9eh +00089Fr 1 9F .byte 9fh +0008A0r 1 A0 .byte 0a0h +0008A1r 1 A1 .byte 0a1h +0008A2r 1 A2 .byte 0a2h +0008A3r 1 A3 .byte 0a3h +0008A4r 1 A4 .byte 0a4h +0008A5r 1 A5 .byte 0a5h +0008A6r 1 A6 .byte 0a6h +0008A7r 1 A7 .byte 0a7h +0008A8r 1 A8 .byte 0a8h +0008A9r 1 A9 .byte 0a9h +0008AAr 1 AA .byte 0aah +0008ABr 1 AB .byte 0abh +0008ACr 1 AC .byte 0ach +0008ADr 1 AD .byte 0adh +0008AEr 1 AE .byte 0aeh +0008AFr 1 AF .byte 0afh +0008B0r 1 B0 .byte 0b0h +0008B1r 1 B1 .byte 0b1h +0008B2r 1 B2 .byte 0b2h +0008B3r 1 B3 .byte 0b3h +0008B4r 1 B4 .byte 0b4h +0008B5r 1 B5 .byte 0b5h +0008B6r 1 B6 .byte 0b6h +0008B7r 1 B7 .byte 0b7h +0008B8r 1 B8 .byte 0b8h +0008B9r 1 B9 .byte 0b9h +0008BAr 1 BA .byte 0bah +0008BBr 1 BB .byte 0bbh +0008BCr 1 BC .byte 0bch +0008BDr 1 BD .byte 0bdh +0008BEr 1 BE .byte 0beh +0008BFr 1 BF .byte 0bfh +0008C0r 1 C0 .byte 0c0h +0008C1r 1 C1 .byte 0c1h +0008C2r 1 C2 .byte 0c2h +0008C3r 1 C3 .byte 0c3h +0008C4r 1 C4 .byte 0c4h +0008C5r 1 C5 .byte 0c5h +0008C6r 1 C6 .byte 0c6h +0008C7r 1 C7 .byte 0c7h +0008C8r 1 C8 .byte 0c8h +0008C9r 1 C9 .byte 0c9h +0008CAr 1 CA .byte 0cah +0008CBr 1 CB .byte 0cbh +0008CCr 1 CC .byte 0cch +0008CDr 1 CD .byte 0cdh +0008CEr 1 CE .byte 0ceh +0008CFr 1 CF .byte 0cfh +0008D0r 1 D0 .byte 0d0h +0008D1r 1 D1 .byte 0d1h +0008D2r 1 D2 .byte 0d2h +0008D3r 1 D3 .byte 0d3h +0008D4r 1 D4 .byte 0d4h +0008D5r 1 D5 .byte 0d5h +0008D6r 1 D6 .byte 0d6h +0008D7r 1 D7 .byte 0d7h +0008D8r 1 D8 .byte 0d8h +0008D9r 1 D9 .byte 0d9h +0008DAr 1 DA .byte 0dah +0008DBr 1 DB .byte 0dbh +0008DCr 1 DC .byte 0dch +0008DDr 1 DD .byte 0ddh +0008DEr 1 DE .byte 0deh +0008DFr 1 DF .byte 0dfh +0008E0r 1 E0 .byte 0e0h +0008E1r 1 E1 .byte 0e1h +0008E2r 1 E2 .byte 0e2h +0008E3r 1 E3 .byte 0e3h +0008E4r 1 E4 .byte 0e4h +0008E5r 1 E5 .byte 0e5h +0008E6r 1 E6 .byte 0e6h +0008E7r 1 E7 .byte 0e7h +0008E8r 1 E8 .byte 0e8h +0008E9r 1 E9 .byte 0e9h +0008EAr 1 EA .byte 0eah +0008EBr 1 EB .byte 0ebh +0008ECr 1 EC .byte 0ech +0008EDr 1 ED .byte 0edh +0008EEr 1 EE .byte 0eeh +0008EFr 1 EF .byte 0efh +0008F0r 1 F0 .byte 0f0h +0008F1r 1 F1 .byte 0f1h +0008F2r 1 F2 .byte 0f2h +0008F3r 1 F3 .byte 0f3h +0008F4r 1 F4 .byte 0f4h +0008F5r 1 F5 .byte 0f5h +0008F6r 1 F6 .byte 0f6h +0008F7r 1 F7 .byte 0f7h +0008F8r 1 F8 .byte 0f8h +0008F9r 1 F9 .byte 0f9h +0008FAr 1 FA .byte 0fah +0008FBr 1 FB .byte 0fbh +0008FCr 1 FC .byte 0fch +0008FDr 1 FD .byte 0fdh +0008FEr 1 FE .byte 0feh +0008FFr 1 FF .byte 0ffh +000900r 1 +000900r 1 ; alternative 2-digit hex values, uppercase +000900r 1 00 .byte 00h +000901r 1 01 .byte 01h +000902r 1 02 .byte 02h +000903r 1 03 .byte 03h +000904r 1 04 .byte 04h +000905r 1 05 .byte 05h +000906r 1 06 .byte 06h +000907r 1 07 .byte 07h +000908r 1 08 .byte 08h +000909r 1 09 .byte 09h +00090Ar 1 0A .byte 0Ah +00090Br 1 0B .byte 0Bh +00090Cr 1 0C .byte 0Ch +00090Dr 1 0D .byte 0Dh +00090Er 1 0E .byte 0Eh +00090Fr 1 0F .byte 0Fh +000910r 1 10 .byte 10h +000911r 1 11 .byte 11h +000912r 1 12 .byte 12h +000913r 1 13 .byte 13h +000914r 1 14 .byte 14h +000915r 1 15 .byte 15h +000916r 1 16 .byte 16h +000917r 1 17 .byte 17h +000918r 1 18 .byte 18h +000919r 1 19 .byte 19h +00091Ar 1 1A .byte 1Ah +00091Br 1 1B .byte 1Bh +00091Cr 1 1C .byte 1Ch +00091Dr 1 1D .byte 1Dh +00091Er 1 1E .byte 1Eh +00091Fr 1 1F .byte 1Fh +000920r 1 20 .byte 20h +000921r 1 21 .byte 21h +000922r 1 22 .byte 22h +000923r 1 23 .byte 23h +000924r 1 24 .byte 24h +000925r 1 25 .byte 25h +000926r 1 26 .byte 26h +000927r 1 27 .byte 27h +000928r 1 28 .byte 28h +000929r 1 29 .byte 29h +00092Ar 1 2A .byte 2Ah +00092Br 1 2B .byte 2Bh +00092Cr 1 2C .byte 2Ch +00092Dr 1 2D .byte 2Dh +00092Er 1 2E .byte 2Eh +00092Fr 1 2F .byte 2Fh +000930r 1 30 .byte 30h +000931r 1 31 .byte 31h +000932r 1 32 .byte 32h +000933r 1 33 .byte 33h +000934r 1 34 .byte 34h +000935r 1 35 .byte 35h +000936r 1 36 .byte 36h +000937r 1 37 .byte 37h +000938r 1 38 .byte 38h +000939r 1 39 .byte 39h +00093Ar 1 3A .byte 3Ah +00093Br 1 3B .byte 3Bh +00093Cr 1 3C .byte 3Ch +00093Dr 1 3D .byte 3Dh +00093Er 1 3E .byte 3Eh +00093Fr 1 3F .byte 3Fh +000940r 1 40 .byte 40h +000941r 1 41 .byte 41h +000942r 1 42 .byte 42h +000943r 1 43 .byte 43h +000944r 1 44 .byte 44h +000945r 1 45 .byte 45h +000946r 1 46 .byte 46h +000947r 1 47 .byte 47h +000948r 1 48 .byte 48h +000949r 1 49 .byte 49h +00094Ar 1 4A .byte 4Ah +00094Br 1 4B .byte 4Bh +00094Cr 1 4C .byte 4Ch +00094Dr 1 4D .byte 4Dh +00094Er 1 4E .byte 4Eh +00094Fr 1 4F .byte 4Fh +000950r 1 50 .byte 50h +000951r 1 51 .byte 51h +000952r 1 52 .byte 52h +000953r 1 53 .byte 53h +000954r 1 54 .byte 54h +000955r 1 55 .byte 55h +000956r 1 56 .byte 56h +000957r 1 57 .byte 57h +000958r 1 58 .byte 58h +000959r 1 59 .byte 59h +00095Ar 1 5A .byte 5Ah +00095Br 1 5B .byte 5Bh +00095Cr 1 5C .byte 5Ch +00095Dr 1 5D .byte 5Dh +00095Er 1 5E .byte 5Eh +00095Fr 1 5F .byte 5Fh +000960r 1 60 .byte 60h +000961r 1 61 .byte 61h +000962r 1 62 .byte 62h +000963r 1 63 .byte 63h +000964r 1 64 .byte 64h +000965r 1 65 .byte 65h +000966r 1 66 .byte 66h +000967r 1 67 .byte 67h +000968r 1 68 .byte 68h +000969r 1 69 .byte 69h +00096Ar 1 6A .byte 6Ah +00096Br 1 6B .byte 6Bh +00096Cr 1 6C .byte 6Ch +00096Dr 1 6D .byte 6Dh +00096Er 1 6E .byte 6Eh +00096Fr 1 6F .byte 6Fh +000970r 1 70 .byte 70h +000971r 1 71 .byte 71h +000972r 1 72 .byte 72h +000973r 1 73 .byte 73h +000974r 1 74 .byte 74h +000975r 1 75 .byte 75h +000976r 1 76 .byte 76h +000977r 1 77 .byte 77h +000978r 1 78 .byte 78h +000979r 1 79 .byte 79h +00097Ar 1 7A .byte 7Ah +00097Br 1 7B .byte 7Bh +00097Cr 1 7C .byte 7Ch +00097Dr 1 7D .byte 7Dh +00097Er 1 7E .byte 7Eh +00097Fr 1 7F .byte 7Fh +000980r 1 80 .byte 80h +000981r 1 81 .byte 81h +000982r 1 82 .byte 82h +000983r 1 83 .byte 83h +000984r 1 84 .byte 84h +000985r 1 85 .byte 85h +000986r 1 86 .byte 86h +000987r 1 87 .byte 87h +000988r 1 88 .byte 88h +000989r 1 89 .byte 89h +00098Ar 1 8A .byte 8Ah +00098Br 1 8B .byte 8Bh +00098Cr 1 8C .byte 8Ch +00098Dr 1 8D .byte 8Dh +00098Er 1 8E .byte 8Eh +00098Fr 1 8F .byte 8Fh +000990r 1 90 .byte 90h +000991r 1 91 .byte 91h +000992r 1 92 .byte 92h +000993r 1 93 .byte 93h +000994r 1 94 .byte 94h +000995r 1 95 .byte 95h +000996r 1 96 .byte 96h +000997r 1 97 .byte 97h +000998r 1 98 .byte 98h +000999r 1 99 .byte 99h +00099Ar 1 9A .byte 9Ah +00099Br 1 9B .byte 9Bh +00099Cr 1 9C .byte 9Ch +00099Dr 1 9D .byte 9Dh +00099Er 1 9E .byte 9Eh +00099Fr 1 9F .byte 9Fh +0009A0r 1 A0 .byte 0A0h +0009A1r 1 A1 .byte 0A1h +0009A2r 1 A2 .byte 0A2h +0009A3r 1 A3 .byte 0A3h +0009A4r 1 A4 .byte 0A4h +0009A5r 1 A5 .byte 0A5h +0009A6r 1 A6 .byte 0A6h +0009A7r 1 A7 .byte 0A7h +0009A8r 1 A8 .byte 0A8h +0009A9r 1 A9 .byte 0A9h +0009AAr 1 AA .byte 0AAh +0009ABr 1 AB .byte 0ABh +0009ACr 1 AC .byte 0ACh +0009ADr 1 AD .byte 0ADh +0009AEr 1 AE .byte 0AEh +0009AFr 1 AF .byte 0AFh +0009B0r 1 B0 .byte 0B0h +0009B1r 1 B1 .byte 0B1h +0009B2r 1 B2 .byte 0B2h +0009B3r 1 B3 .byte 0B3h +0009B4r 1 B4 .byte 0B4h +0009B5r 1 B5 .byte 0B5h +0009B6r 1 B6 .byte 0B6h +0009B7r 1 B7 .byte 0B7h +0009B8r 1 B8 .byte 0B8h +0009B9r 1 B9 .byte 0B9h +0009BAr 1 BA .byte 0BAh +0009BBr 1 BB .byte 0BBh +0009BCr 1 BC .byte 0BCh +0009BDr 1 BD .byte 0BDh +0009BEr 1 BE .byte 0BEh +0009BFr 1 BF .byte 0BFh +0009C0r 1 C0 .byte 0C0h +0009C1r 1 C1 .byte 0C1h +0009C2r 1 C2 .byte 0C2h +0009C3r 1 C3 .byte 0C3h +0009C4r 1 C4 .byte 0C4h +0009C5r 1 C5 .byte 0C5h +0009C6r 1 C6 .byte 0C6h +0009C7r 1 C7 .byte 0C7h +0009C8r 1 C8 .byte 0C8h +0009C9r 1 C9 .byte 0C9h +0009CAr 1 CA .byte 0CAh +0009CBr 1 CB .byte 0CBh +0009CCr 1 CC .byte 0CCh +0009CDr 1 CD .byte 0CDh +0009CEr 1 CE .byte 0CEh +0009CFr 1 CF .byte 0CFh +0009D0r 1 D0 .byte 0D0h +0009D1r 1 D1 .byte 0D1h +0009D2r 1 D2 .byte 0D2h +0009D3r 1 D3 .byte 0D3h +0009D4r 1 D4 .byte 0D4h +0009D5r 1 D5 .byte 0D5h +0009D6r 1 D6 .byte 0D6h +0009D7r 1 D7 .byte 0D7h +0009D8r 1 D8 .byte 0D8h +0009D9r 1 D9 .byte 0D9h +0009DAr 1 DA .byte 0DAh +0009DBr 1 DB .byte 0DBh +0009DCr 1 DC .byte 0DCh +0009DDr 1 DD .byte 0DDh +0009DEr 1 DE .byte 0DEh +0009DFr 1 DF .byte 0DFh +0009E0r 1 E0 .byte 0E0h +0009E1r 1 E1 .byte 0E1h +0009E2r 1 E2 .byte 0E2h +0009E3r 1 E3 .byte 0E3h +0009E4r 1 E4 .byte 0E4h +0009E5r 1 E5 .byte 0E5h +0009E6r 1 E6 .byte 0E6h +0009E7r 1 E7 .byte 0E7h +0009E8r 1 E8 .byte 0E8h +0009E9r 1 E9 .byte 0E9h +0009EAr 1 EA .byte 0EAh +0009EBr 1 EB .byte 0EBh +0009ECr 1 EC .byte 0ECh +0009EDr 1 ED .byte 0EDh +0009EEr 1 EE .byte 0EEh +0009EFr 1 EF .byte 0EFh +0009F0r 1 F0 .byte 0F0h +0009F1r 1 F1 .byte 0F1h +0009F2r 1 F2 .byte 0F2h +0009F3r 1 F3 .byte 0F3h +0009F4r 1 F4 .byte 0F4h +0009F5r 1 F5 .byte 0F5h +0009F6r 1 F6 .byte 0F6h +0009F7r 1 F7 .byte 0F7h +0009F8r 1 F8 .byte 0F8h +0009F9r 1 F9 .byte 0F9h +0009FAr 1 FA .byte 0FAh +0009FBr 1 FB .byte 0FBh +0009FCr 1 FC .byte 0FCh +0009FDr 1 FD .byte 0FDh +0009FEr 1 FE .byte 0FEh +0009FFr 1 FF .byte 0FFh +000A00r 1 +000A00r 1 ; alternative hex values, always leading zero +000A00r 1 00 .byte 00h +000A01r 1 01 .byte 01h +000A02r 1 02 .byte 02h +000A03r 1 03 .byte 03h +000A04r 1 04 .byte 04h +000A05r 1 05 .byte 05h +000A06r 1 06 .byte 06h +000A07r 1 07 .byte 07h +000A08r 1 08 .byte 08h +000A09r 1 09 .byte 09h +000A0Ar 1 0A .byte 0ah +000A0Br 1 0B .byte 0bh +000A0Cr 1 0C .byte 0ch +000A0Dr 1 0D .byte 0dh +000A0Er 1 0E .byte 0eh +000A0Fr 1 0F .byte 0fh +000A10r 1 10 .byte 010h +000A11r 1 11 .byte 011h +000A12r 1 12 .byte 012h +000A13r 1 13 .byte 013h +000A14r 1 14 .byte 014h +000A15r 1 15 .byte 015h +000A16r 1 16 .byte 016h +000A17r 1 17 .byte 017h +000A18r 1 18 .byte 018h +000A19r 1 19 .byte 019h +000A1Ar 1 1A .byte 01ah +000A1Br 1 1B .byte 01bh +000A1Cr 1 1C .byte 01ch +000A1Dr 1 1D .byte 01dh +000A1Er 1 1E .byte 01eh +000A1Fr 1 1F .byte 01fh +000A20r 1 20 .byte 020h +000A21r 1 21 .byte 021h +000A22r 1 22 .byte 022h +000A23r 1 23 .byte 023h +000A24r 1 24 .byte 024h +000A25r 1 25 .byte 025h +000A26r 1 26 .byte 026h +000A27r 1 27 .byte 027h +000A28r 1 28 .byte 028h +000A29r 1 29 .byte 029h +000A2Ar 1 2A .byte 02ah +000A2Br 1 2B .byte 02bh +000A2Cr 1 2C .byte 02ch +000A2Dr 1 2D .byte 02dh +000A2Er 1 2E .byte 02eh +000A2Fr 1 2F .byte 02fh +000A30r 1 30 .byte 030h +000A31r 1 31 .byte 031h +000A32r 1 32 .byte 032h +000A33r 1 33 .byte 033h +000A34r 1 34 .byte 034h +000A35r 1 35 .byte 035h +000A36r 1 36 .byte 036h +000A37r 1 37 .byte 037h +000A38r 1 38 .byte 038h +000A39r 1 39 .byte 039h +000A3Ar 1 3A .byte 03ah +000A3Br 1 3B .byte 03bh +000A3Cr 1 3C .byte 03ch +000A3Dr 1 3D .byte 03dh +000A3Er 1 3E .byte 03eh +000A3Fr 1 3F .byte 03fh +000A40r 1 40 .byte 040h +000A41r 1 41 .byte 041h +000A42r 1 42 .byte 042h +000A43r 1 43 .byte 043h +000A44r 1 44 .byte 044h +000A45r 1 45 .byte 045h +000A46r 1 46 .byte 046h +000A47r 1 47 .byte 047h +000A48r 1 48 .byte 048h +000A49r 1 49 .byte 049h +000A4Ar 1 4A .byte 04ah +000A4Br 1 4B .byte 04bh +000A4Cr 1 4C .byte 04ch +000A4Dr 1 4D .byte 04dh +000A4Er 1 4E .byte 04eh +000A4Fr 1 4F .byte 04fh +000A50r 1 50 .byte 050h +000A51r 1 51 .byte 051h +000A52r 1 52 .byte 052h +000A53r 1 53 .byte 053h +000A54r 1 54 .byte 054h +000A55r 1 55 .byte 055h +000A56r 1 56 .byte 056h +000A57r 1 57 .byte 057h +000A58r 1 58 .byte 058h +000A59r 1 59 .byte 059h +000A5Ar 1 5A .byte 05ah +000A5Br 1 5B .byte 05bh +000A5Cr 1 5C .byte 05ch +000A5Dr 1 5D .byte 05dh +000A5Er 1 5E .byte 05eh +000A5Fr 1 5F .byte 05fh +000A60r 1 60 .byte 060h +000A61r 1 61 .byte 061h +000A62r 1 62 .byte 062h +000A63r 1 63 .byte 063h +000A64r 1 64 .byte 064h +000A65r 1 65 .byte 065h +000A66r 1 66 .byte 066h +000A67r 1 67 .byte 067h +000A68r 1 68 .byte 068h +000A69r 1 69 .byte 069h +000A6Ar 1 6A .byte 06ah +000A6Br 1 6B .byte 06bh +000A6Cr 1 6C .byte 06ch +000A6Dr 1 6D .byte 06dh +000A6Er 1 6E .byte 06eh +000A6Fr 1 6F .byte 06fh +000A70r 1 70 .byte 070h +000A71r 1 71 .byte 071h +000A72r 1 72 .byte 072h +000A73r 1 73 .byte 073h +000A74r 1 74 .byte 074h +000A75r 1 75 .byte 075h +000A76r 1 76 .byte 076h +000A77r 1 77 .byte 077h +000A78r 1 78 .byte 078h +000A79r 1 79 .byte 079h +000A7Ar 1 7A .byte 07ah +000A7Br 1 7B .byte 07bh +000A7Cr 1 7C .byte 07ch +000A7Dr 1 7D .byte 07dh +000A7Er 1 7E .byte 07eh +000A7Fr 1 7F .byte 07fh +000A80r 1 80 .byte 080h +000A81r 1 81 .byte 081h +000A82r 1 82 .byte 082h +000A83r 1 83 .byte 083h +000A84r 1 84 .byte 084h +000A85r 1 85 .byte 085h +000A86r 1 86 .byte 086h +000A87r 1 87 .byte 087h +000A88r 1 88 .byte 088h +000A89r 1 89 .byte 089h +000A8Ar 1 8A .byte 08ah +000A8Br 1 8B .byte 08bh +000A8Cr 1 8C .byte 08ch +000A8Dr 1 8D .byte 08dh +000A8Er 1 8E .byte 08eh +000A8Fr 1 8F .byte 08fh +000A90r 1 90 .byte 090h +000A91r 1 91 .byte 091h +000A92r 1 92 .byte 092h +000A93r 1 93 .byte 093h +000A94r 1 94 .byte 094h +000A95r 1 95 .byte 095h +000A96r 1 96 .byte 096h +000A97r 1 97 .byte 097h +000A98r 1 98 .byte 098h +000A99r 1 99 .byte 099h +000A9Ar 1 9A .byte 09ah +000A9Br 1 9B .byte 09bh +000A9Cr 1 9C .byte 09ch +000A9Dr 1 9D .byte 09dh +000A9Er 1 9E .byte 09eh +000A9Fr 1 9F .byte 09fh +000AA0r 1 A0 .byte 0a0h +000AA1r 1 A1 .byte 0a1h +000AA2r 1 A2 .byte 0a2h +000AA3r 1 A3 .byte 0a3h +000AA4r 1 A4 .byte 0a4h +000AA5r 1 A5 .byte 0a5h +000AA6r 1 A6 .byte 0a6h +000AA7r 1 A7 .byte 0a7h +000AA8r 1 A8 .byte 0a8h +000AA9r 1 A9 .byte 0a9h +000AAAr 1 AA .byte 0aah +000AABr 1 AB .byte 0abh +000AACr 1 AC .byte 0ach +000AADr 1 AD .byte 0adh +000AAEr 1 AE .byte 0aeh +000AAFr 1 AF .byte 0afh +000AB0r 1 B0 .byte 0b0h +000AB1r 1 B1 .byte 0b1h +000AB2r 1 B2 .byte 0b2h +000AB3r 1 B3 .byte 0b3h +000AB4r 1 B4 .byte 0b4h +000AB5r 1 B5 .byte 0b5h +000AB6r 1 B6 .byte 0b6h +000AB7r 1 B7 .byte 0b7h +000AB8r 1 B8 .byte 0b8h +000AB9r 1 B9 .byte 0b9h +000ABAr 1 BA .byte 0bah +000ABBr 1 BB .byte 0bbh +000ABCr 1 BC .byte 0bch +000ABDr 1 BD .byte 0bdh +000ABEr 1 BE .byte 0beh +000ABFr 1 BF .byte 0bfh +000AC0r 1 C0 .byte 0c0h +000AC1r 1 C1 .byte 0c1h +000AC2r 1 C2 .byte 0c2h +000AC3r 1 C3 .byte 0c3h +000AC4r 1 C4 .byte 0c4h +000AC5r 1 C5 .byte 0c5h +000AC6r 1 C6 .byte 0c6h +000AC7r 1 C7 .byte 0c7h +000AC8r 1 C8 .byte 0c8h +000AC9r 1 C9 .byte 0c9h +000ACAr 1 CA .byte 0cah +000ACBr 1 CB .byte 0cbh +000ACCr 1 CC .byte 0cch +000ACDr 1 CD .byte 0cdh +000ACEr 1 CE .byte 0ceh +000ACFr 1 CF .byte 0cfh +000AD0r 1 D0 .byte 0d0h +000AD1r 1 D1 .byte 0d1h +000AD2r 1 D2 .byte 0d2h +000AD3r 1 D3 .byte 0d3h +000AD4r 1 D4 .byte 0d4h +000AD5r 1 D5 .byte 0d5h +000AD6r 1 D6 .byte 0d6h +000AD7r 1 D7 .byte 0d7h +000AD8r 1 D8 .byte 0d8h +000AD9r 1 D9 .byte 0d9h +000ADAr 1 DA .byte 0dah +000ADBr 1 DB .byte 0dbh +000ADCr 1 DC .byte 0dch +000ADDr 1 DD .byte 0ddh +000ADEr 1 DE .byte 0deh +000ADFr 1 DF .byte 0dfh +000AE0r 1 E0 .byte 0e0h +000AE1r 1 E1 .byte 0e1h +000AE2r 1 E2 .byte 0e2h +000AE3r 1 E3 .byte 0e3h +000AE4r 1 E4 .byte 0e4h +000AE5r 1 E5 .byte 0e5h +000AE6r 1 E6 .byte 0e6h +000AE7r 1 E7 .byte 0e7h +000AE8r 1 E8 .byte 0e8h +000AE9r 1 E9 .byte 0e9h +000AEAr 1 EA .byte 0eah +000AEBr 1 EB .byte 0ebh +000AECr 1 EC .byte 0ech +000AEDr 1 ED .byte 0edh +000AEEr 1 EE .byte 0eeh +000AEFr 1 EF .byte 0efh +000AF0r 1 F0 .byte 0f0h +000AF1r 1 F1 .byte 0f1h +000AF2r 1 F2 .byte 0f2h +000AF3r 1 F3 .byte 0f3h +000AF4r 1 F4 .byte 0f4h +000AF5r 1 F5 .byte 0f5h +000AF6r 1 F6 .byte 0f6h +000AF7r 1 F7 .byte 0f7h +000AF8r 1 F8 .byte 0f8h +000AF9r 1 F9 .byte 0f9h +000AFAr 1 FA .byte 0fah +000AFBr 1 FB .byte 0fbh +000AFCr 1 FC .byte 0fch +000AFDr 1 FD .byte 0fdh +000AFEr 1 FE .byte 0feh +000AFFr 1 FF .byte 0ffh +000B00r 1 +000B00r 1 ; binary values, variable length +000B00r 1 00 .byte %0 +000B01r 1 01 .byte %1 +000B02r 1 02 .byte %10 +000B03r 1 03 .byte %11 +000B04r 1 04 .byte %100 +000B05r 1 05 .byte %101 +000B06r 1 06 .byte %110 +000B07r 1 07 .byte %111 +000B08r 1 08 .byte %1000 +000B09r 1 09 .byte %1001 +000B0Ar 1 0A .byte %1010 +000B0Br 1 0B .byte %1011 +000B0Cr 1 0C .byte %1100 +000B0Dr 1 0D .byte %1101 +000B0Er 1 0E .byte %1110 +000B0Fr 1 0F .byte %1111 +000B10r 1 10 .byte %10000 +000B11r 1 11 .byte %10001 +000B12r 1 12 .byte %10010 +000B13r 1 13 .byte %10011 +000B14r 1 14 .byte %10100 +000B15r 1 15 .byte %10101 +000B16r 1 16 .byte %10110 +000B17r 1 17 .byte %10111 +000B18r 1 18 .byte %11000 +000B19r 1 19 .byte %11001 +000B1Ar 1 1A .byte %11010 +000B1Br 1 1B .byte %11011 +000B1Cr 1 1C .byte %11100 +000B1Dr 1 1D .byte %11101 +000B1Er 1 1E .byte %11110 +000B1Fr 1 1F .byte %11111 +000B20r 1 20 .byte %100000 +000B21r 1 21 .byte %100001 +000B22r 1 22 .byte %100010 +000B23r 1 23 .byte %100011 +000B24r 1 24 .byte %100100 +000B25r 1 25 .byte %100101 +000B26r 1 26 .byte %100110 +000B27r 1 27 .byte %100111 +000B28r 1 28 .byte %101000 +000B29r 1 29 .byte %101001 +000B2Ar 1 2A .byte %101010 +000B2Br 1 2B .byte %101011 +000B2Cr 1 2C .byte %101100 +000B2Dr 1 2D .byte %101101 +000B2Er 1 2E .byte %101110 +000B2Fr 1 2F .byte %101111 +000B30r 1 30 .byte %110000 +000B31r 1 31 .byte %110001 +000B32r 1 32 .byte %110010 +000B33r 1 33 .byte %110011 +000B34r 1 34 .byte %110100 +000B35r 1 35 .byte %110101 +000B36r 1 36 .byte %110110 +000B37r 1 37 .byte %110111 +000B38r 1 38 .byte %111000 +000B39r 1 39 .byte %111001 +000B3Ar 1 3A .byte %111010 +000B3Br 1 3B .byte %111011 +000B3Cr 1 3C .byte %111100 +000B3Dr 1 3D .byte %111101 +000B3Er 1 3E .byte %111110 +000B3Fr 1 3F .byte %111111 +000B40r 1 40 .byte %1000000 +000B41r 1 41 .byte %1000001 +000B42r 1 42 .byte %1000010 +000B43r 1 43 .byte %1000011 +000B44r 1 44 .byte %1000100 +000B45r 1 45 .byte %1000101 +000B46r 1 46 .byte %1000110 +000B47r 1 47 .byte %1000111 +000B48r 1 48 .byte %1001000 +000B49r 1 49 .byte %1001001 +000B4Ar 1 4A .byte %1001010 +000B4Br 1 4B .byte %1001011 +000B4Cr 1 4C .byte %1001100 +000B4Dr 1 4D .byte %1001101 +000B4Er 1 4E .byte %1001110 +000B4Fr 1 4F .byte %1001111 +000B50r 1 50 .byte %1010000 +000B51r 1 51 .byte %1010001 +000B52r 1 52 .byte %1010010 +000B53r 1 53 .byte %1010011 +000B54r 1 54 .byte %1010100 +000B55r 1 55 .byte %1010101 +000B56r 1 56 .byte %1010110 +000B57r 1 57 .byte %1010111 +000B58r 1 58 .byte %1011000 +000B59r 1 59 .byte %1011001 +000B5Ar 1 5A .byte %1011010 +000B5Br 1 5B .byte %1011011 +000B5Cr 1 5C .byte %1011100 +000B5Dr 1 5D .byte %1011101 +000B5Er 1 5E .byte %1011110 +000B5Fr 1 5F .byte %1011111 +000B60r 1 60 .byte %1100000 +000B61r 1 61 .byte %1100001 +000B62r 1 62 .byte %1100010 +000B63r 1 63 .byte %1100011 +000B64r 1 64 .byte %1100100 +000B65r 1 65 .byte %1100101 +000B66r 1 66 .byte %1100110 +000B67r 1 67 .byte %1100111 +000B68r 1 68 .byte %1101000 +000B69r 1 69 .byte %1101001 +000B6Ar 1 6A .byte %1101010 +000B6Br 1 6B .byte %1101011 +000B6Cr 1 6C .byte %1101100 +000B6Dr 1 6D .byte %1101101 +000B6Er 1 6E .byte %1101110 +000B6Fr 1 6F .byte %1101111 +000B70r 1 70 .byte %1110000 +000B71r 1 71 .byte %1110001 +000B72r 1 72 .byte %1110010 +000B73r 1 73 .byte %1110011 +000B74r 1 74 .byte %1110100 +000B75r 1 75 .byte %1110101 +000B76r 1 76 .byte %1110110 +000B77r 1 77 .byte %1110111 +000B78r 1 78 .byte %1111000 +000B79r 1 79 .byte %1111001 +000B7Ar 1 7A .byte %1111010 +000B7Br 1 7B .byte %1111011 +000B7Cr 1 7C .byte %1111100 +000B7Dr 1 7D .byte %1111101 +000B7Er 1 7E .byte %1111110 +000B7Fr 1 7F .byte %1111111 +000B80r 1 80 .byte %10000000 +000B81r 1 81 .byte %10000001 +000B82r 1 82 .byte %10000010 +000B83r 1 83 .byte %10000011 +000B84r 1 84 .byte %10000100 +000B85r 1 85 .byte %10000101 +000B86r 1 86 .byte %10000110 +000B87r 1 87 .byte %10000111 +000B88r 1 88 .byte %10001000 +000B89r 1 89 .byte %10001001 +000B8Ar 1 8A .byte %10001010 +000B8Br 1 8B .byte %10001011 +000B8Cr 1 8C .byte %10001100 +000B8Dr 1 8D .byte %10001101 +000B8Er 1 8E .byte %10001110 +000B8Fr 1 8F .byte %10001111 +000B90r 1 90 .byte %10010000 +000B91r 1 91 .byte %10010001 +000B92r 1 92 .byte %10010010 +000B93r 1 93 .byte %10010011 +000B94r 1 94 .byte %10010100 +000B95r 1 95 .byte %10010101 +000B96r 1 96 .byte %10010110 +000B97r 1 97 .byte %10010111 +000B98r 1 98 .byte %10011000 +000B99r 1 99 .byte %10011001 +000B9Ar 1 9A .byte %10011010 +000B9Br 1 9B .byte %10011011 +000B9Cr 1 9C .byte %10011100 +000B9Dr 1 9D .byte %10011101 +000B9Er 1 9E .byte %10011110 +000B9Fr 1 9F .byte %10011111 +000BA0r 1 A0 .byte %10100000 +000BA1r 1 A1 .byte %10100001 +000BA2r 1 A2 .byte %10100010 +000BA3r 1 A3 .byte %10100011 +000BA4r 1 A4 .byte %10100100 +000BA5r 1 A5 .byte %10100101 +000BA6r 1 A6 .byte %10100110 +000BA7r 1 A7 .byte %10100111 +000BA8r 1 A8 .byte %10101000 +000BA9r 1 A9 .byte %10101001 +000BAAr 1 AA .byte %10101010 +000BABr 1 AB .byte %10101011 +000BACr 1 AC .byte %10101100 +000BADr 1 AD .byte %10101101 +000BAEr 1 AE .byte %10101110 +000BAFr 1 AF .byte %10101111 +000BB0r 1 B0 .byte %10110000 +000BB1r 1 B1 .byte %10110001 +000BB2r 1 B2 .byte %10110010 +000BB3r 1 B3 .byte %10110011 +000BB4r 1 B4 .byte %10110100 +000BB5r 1 B5 .byte %10110101 +000BB6r 1 B6 .byte %10110110 +000BB7r 1 B7 .byte %10110111 +000BB8r 1 B8 .byte %10111000 +000BB9r 1 B9 .byte %10111001 +000BBAr 1 BA .byte %10111010 +000BBBr 1 BB .byte %10111011 +000BBCr 1 BC .byte %10111100 +000BBDr 1 BD .byte %10111101 +000BBEr 1 BE .byte %10111110 +000BBFr 1 BF .byte %10111111 +000BC0r 1 C0 .byte %11000000 +000BC1r 1 C1 .byte %11000001 +000BC2r 1 C2 .byte %11000010 +000BC3r 1 C3 .byte %11000011 +000BC4r 1 C4 .byte %11000100 +000BC5r 1 C5 .byte %11000101 +000BC6r 1 C6 .byte %11000110 +000BC7r 1 C7 .byte %11000111 +000BC8r 1 C8 .byte %11001000 +000BC9r 1 C9 .byte %11001001 +000BCAr 1 CA .byte %11001010 +000BCBr 1 CB .byte %11001011 +000BCCr 1 CC .byte %11001100 +000BCDr 1 CD .byte %11001101 +000BCEr 1 CE .byte %11001110 +000BCFr 1 CF .byte %11001111 +000BD0r 1 D0 .byte %11010000 +000BD1r 1 D1 .byte %11010001 +000BD2r 1 D2 .byte %11010010 +000BD3r 1 D3 .byte %11010011 +000BD4r 1 D4 .byte %11010100 +000BD5r 1 D5 .byte %11010101 +000BD6r 1 D6 .byte %11010110 +000BD7r 1 D7 .byte %11010111 +000BD8r 1 D8 .byte %11011000 +000BD9r 1 D9 .byte %11011001 +000BDAr 1 DA .byte %11011010 +000BDBr 1 DB .byte %11011011 +000BDCr 1 DC .byte %11011100 +000BDDr 1 DD .byte %11011101 +000BDEr 1 DE .byte %11011110 +000BDFr 1 DF .byte %11011111 +000BE0r 1 E0 .byte %11100000 +000BE1r 1 E1 .byte %11100001 +000BE2r 1 E2 .byte %11100010 +000BE3r 1 E3 .byte %11100011 +000BE4r 1 E4 .byte %11100100 +000BE5r 1 E5 .byte %11100101 +000BE6r 1 E6 .byte %11100110 +000BE7r 1 E7 .byte %11100111 +000BE8r 1 E8 .byte %11101000 +000BE9r 1 E9 .byte %11101001 +000BEAr 1 EA .byte %11101010 +000BEBr 1 EB .byte %11101011 +000BECr 1 EC .byte %11101100 +000BEDr 1 ED .byte %11101101 +000BEEr 1 EE .byte %11101110 +000BEFr 1 EF .byte %11101111 +000BF0r 1 F0 .byte %11110000 +000BF1r 1 F1 .byte %11110001 +000BF2r 1 F2 .byte %11110010 +000BF3r 1 F3 .byte %11110011 +000BF4r 1 F4 .byte %11110100 +000BF5r 1 F5 .byte %11110101 +000BF6r 1 F6 .byte %11110110 +000BF7r 1 F7 .byte %11110111 +000BF8r 1 F8 .byte %11111000 +000BF9r 1 F9 .byte %11111001 +000BFAr 1 FA .byte %11111010 +000BFBr 1 FB .byte %11111011 +000BFCr 1 FC .byte %11111100 +000BFDr 1 FD .byte %11111101 +000BFEr 1 FE .byte %11111110 +000BFFr 1 FF .byte %11111111 +000C00r 1 +000C00r 1 ; binary values, full length +000C00r 1 00 .byte %00000000 +000C01r 1 01 .byte %00000001 +000C02r 1 02 .byte %00000010 +000C03r 1 03 .byte %00000011 +000C04r 1 04 .byte %00000100 +000C05r 1 05 .byte %00000101 +000C06r 1 06 .byte %00000110 +000C07r 1 07 .byte %00000111 +000C08r 1 08 .byte %00001000 +000C09r 1 09 .byte %00001001 +000C0Ar 1 0A .byte %00001010 +000C0Br 1 0B .byte %00001011 +000C0Cr 1 0C .byte %00001100 +000C0Dr 1 0D .byte %00001101 +000C0Er 1 0E .byte %00001110 +000C0Fr 1 0F .byte %00001111 +000C10r 1 10 .byte %00010000 +000C11r 1 11 .byte %00010001 +000C12r 1 12 .byte %00010010 +000C13r 1 13 .byte %00010011 +000C14r 1 14 .byte %00010100 +000C15r 1 15 .byte %00010101 +000C16r 1 16 .byte %00010110 +000C17r 1 17 .byte %00010111 +000C18r 1 18 .byte %00011000 +000C19r 1 19 .byte %00011001 +000C1Ar 1 1A .byte %00011010 +000C1Br 1 1B .byte %00011011 +000C1Cr 1 1C .byte %00011100 +000C1Dr 1 1D .byte %00011101 +000C1Er 1 1E .byte %00011110 +000C1Fr 1 1F .byte %00011111 +000C20r 1 20 .byte %00100000 +000C21r 1 21 .byte %00100001 +000C22r 1 22 .byte %00100010 +000C23r 1 23 .byte %00100011 +000C24r 1 24 .byte %00100100 +000C25r 1 25 .byte %00100101 +000C26r 1 26 .byte %00100110 +000C27r 1 27 .byte %00100111 +000C28r 1 28 .byte %00101000 +000C29r 1 29 .byte %00101001 +000C2Ar 1 2A .byte %00101010 +000C2Br 1 2B .byte %00101011 +000C2Cr 1 2C .byte %00101100 +000C2Dr 1 2D .byte %00101101 +000C2Er 1 2E .byte %00101110 +000C2Fr 1 2F .byte %00101111 +000C30r 1 30 .byte %00110000 +000C31r 1 31 .byte %00110001 +000C32r 1 32 .byte %00110010 +000C33r 1 33 .byte %00110011 +000C34r 1 34 .byte %00110100 +000C35r 1 35 .byte %00110101 +000C36r 1 36 .byte %00110110 +000C37r 1 37 .byte %00110111 +000C38r 1 38 .byte %00111000 +000C39r 1 39 .byte %00111001 +000C3Ar 1 3A .byte %00111010 +000C3Br 1 3B .byte %00111011 +000C3Cr 1 3C .byte %00111100 +000C3Dr 1 3D .byte %00111101 +000C3Er 1 3E .byte %00111110 +000C3Fr 1 3F .byte %00111111 +000C40r 1 40 .byte %01000000 +000C41r 1 41 .byte %01000001 +000C42r 1 42 .byte %01000010 +000C43r 1 43 .byte %01000011 +000C44r 1 44 .byte %01000100 +000C45r 1 45 .byte %01000101 +000C46r 1 46 .byte %01000110 +000C47r 1 47 .byte %01000111 +000C48r 1 48 .byte %01001000 +000C49r 1 49 .byte %01001001 +000C4Ar 1 4A .byte %01001010 +000C4Br 1 4B .byte %01001011 +000C4Cr 1 4C .byte %01001100 +000C4Dr 1 4D .byte %01001101 +000C4Er 1 4E .byte %01001110 +000C4Fr 1 4F .byte %01001111 +000C50r 1 50 .byte %01010000 +000C51r 1 51 .byte %01010001 +000C52r 1 52 .byte %01010010 +000C53r 1 53 .byte %01010011 +000C54r 1 54 .byte %01010100 +000C55r 1 55 .byte %01010101 +000C56r 1 56 .byte %01010110 +000C57r 1 57 .byte %01010111 +000C58r 1 58 .byte %01011000 +000C59r 1 59 .byte %01011001 +000C5Ar 1 5A .byte %01011010 +000C5Br 1 5B .byte %01011011 +000C5Cr 1 5C .byte %01011100 +000C5Dr 1 5D .byte %01011101 +000C5Er 1 5E .byte %01011110 +000C5Fr 1 5F .byte %01011111 +000C60r 1 60 .byte %01100000 +000C61r 1 61 .byte %01100001 +000C62r 1 62 .byte %01100010 +000C63r 1 63 .byte %01100011 +000C64r 1 64 .byte %01100100 +000C65r 1 65 .byte %01100101 +000C66r 1 66 .byte %01100110 +000C67r 1 67 .byte %01100111 +000C68r 1 68 .byte %01101000 +000C69r 1 69 .byte %01101001 +000C6Ar 1 6A .byte %01101010 +000C6Br 1 6B .byte %01101011 +000C6Cr 1 6C .byte %01101100 +000C6Dr 1 6D .byte %01101101 +000C6Er 1 6E .byte %01101110 +000C6Fr 1 6F .byte %01101111 +000C70r 1 70 .byte %01110000 +000C71r 1 71 .byte %01110001 +000C72r 1 72 .byte %01110010 +000C73r 1 73 .byte %01110011 +000C74r 1 74 .byte %01110100 +000C75r 1 75 .byte %01110101 +000C76r 1 76 .byte %01110110 +000C77r 1 77 .byte %01110111 +000C78r 1 78 .byte %01111000 +000C79r 1 79 .byte %01111001 +000C7Ar 1 7A .byte %01111010 +000C7Br 1 7B .byte %01111011 +000C7Cr 1 7C .byte %01111100 +000C7Dr 1 7D .byte %01111101 +000C7Er 1 7E .byte %01111110 +000C7Fr 1 7F .byte %01111111 +000C80r 1 80 .byte %10000000 +000C81r 1 81 .byte %10000001 +000C82r 1 82 .byte %10000010 +000C83r 1 83 .byte %10000011 +000C84r 1 84 .byte %10000100 +000C85r 1 85 .byte %10000101 +000C86r 1 86 .byte %10000110 +000C87r 1 87 .byte %10000111 +000C88r 1 88 .byte %10001000 +000C89r 1 89 .byte %10001001 +000C8Ar 1 8A .byte %10001010 +000C8Br 1 8B .byte %10001011 +000C8Cr 1 8C .byte %10001100 +000C8Dr 1 8D .byte %10001101 +000C8Er 1 8E .byte %10001110 +000C8Fr 1 8F .byte %10001111 +000C90r 1 90 .byte %10010000 +000C91r 1 91 .byte %10010001 +000C92r 1 92 .byte %10010010 +000C93r 1 93 .byte %10010011 +000C94r 1 94 .byte %10010100 +000C95r 1 95 .byte %10010101 +000C96r 1 96 .byte %10010110 +000C97r 1 97 .byte %10010111 +000C98r 1 98 .byte %10011000 +000C99r 1 99 .byte %10011001 +000C9Ar 1 9A .byte %10011010 +000C9Br 1 9B .byte %10011011 +000C9Cr 1 9C .byte %10011100 +000C9Dr 1 9D .byte %10011101 +000C9Er 1 9E .byte %10011110 +000C9Fr 1 9F .byte %10011111 +000CA0r 1 A0 .byte %10100000 +000CA1r 1 A1 .byte %10100001 +000CA2r 1 A2 .byte %10100010 +000CA3r 1 A3 .byte %10100011 +000CA4r 1 A4 .byte %10100100 +000CA5r 1 A5 .byte %10100101 +000CA6r 1 A6 .byte %10100110 +000CA7r 1 A7 .byte %10100111 +000CA8r 1 A8 .byte %10101000 +000CA9r 1 A9 .byte %10101001 +000CAAr 1 AA .byte %10101010 +000CABr 1 AB .byte %10101011 +000CACr 1 AC .byte %10101100 +000CADr 1 AD .byte %10101101 +000CAEr 1 AE .byte %10101110 +000CAFr 1 AF .byte %10101111 +000CB0r 1 B0 .byte %10110000 +000CB1r 1 B1 .byte %10110001 +000CB2r 1 B2 .byte %10110010 +000CB3r 1 B3 .byte %10110011 +000CB4r 1 B4 .byte %10110100 +000CB5r 1 B5 .byte %10110101 +000CB6r 1 B6 .byte %10110110 +000CB7r 1 B7 .byte %10110111 +000CB8r 1 B8 .byte %10111000 +000CB9r 1 B9 .byte %10111001 +000CBAr 1 BA .byte %10111010 +000CBBr 1 BB .byte %10111011 +000CBCr 1 BC .byte %10111100 +000CBDr 1 BD .byte %10111101 +000CBEr 1 BE .byte %10111110 +000CBFr 1 BF .byte %10111111 +000CC0r 1 C0 .byte %11000000 +000CC1r 1 C1 .byte %11000001 +000CC2r 1 C2 .byte %11000010 +000CC3r 1 C3 .byte %11000011 +000CC4r 1 C4 .byte %11000100 +000CC5r 1 C5 .byte %11000101 +000CC6r 1 C6 .byte %11000110 +000CC7r 1 C7 .byte %11000111 +000CC8r 1 C8 .byte %11001000 +000CC9r 1 C9 .byte %11001001 +000CCAr 1 CA .byte %11001010 +000CCBr 1 CB .byte %11001011 +000CCCr 1 CC .byte %11001100 +000CCDr 1 CD .byte %11001101 +000CCEr 1 CE .byte %11001110 +000CCFr 1 CF .byte %11001111 +000CD0r 1 D0 .byte %11010000 +000CD1r 1 D1 .byte %11010001 +000CD2r 1 D2 .byte %11010010 +000CD3r 1 D3 .byte %11010011 +000CD4r 1 D4 .byte %11010100 +000CD5r 1 D5 .byte %11010101 +000CD6r 1 D6 .byte %11010110 +000CD7r 1 D7 .byte %11010111 +000CD8r 1 D8 .byte %11011000 +000CD9r 1 D9 .byte %11011001 +000CDAr 1 DA .byte %11011010 +000CDBr 1 DB .byte %11011011 +000CDCr 1 DC .byte %11011100 +000CDDr 1 DD .byte %11011101 +000CDEr 1 DE .byte %11011110 +000CDFr 1 DF .byte %11011111 +000CE0r 1 E0 .byte %11100000 +000CE1r 1 E1 .byte %11100001 +000CE2r 1 E2 .byte %11100010 +000CE3r 1 E3 .byte %11100011 +000CE4r 1 E4 .byte %11100100 +000CE5r 1 E5 .byte %11100101 +000CE6r 1 E6 .byte %11100110 +000CE7r 1 E7 .byte %11100111 +000CE8r 1 E8 .byte %11101000 +000CE9r 1 E9 .byte %11101001 +000CEAr 1 EA .byte %11101010 +000CEBr 1 EB .byte %11101011 +000CECr 1 EC .byte %11101100 +000CEDr 1 ED .byte %11101101 +000CEEr 1 EE .byte %11101110 +000CEFr 1 EF .byte %11101111 +000CF0r 1 F0 .byte %11110000 +000CF1r 1 F1 .byte %11110001 +000CF2r 1 F2 .byte %11110010 +000CF3r 1 F3 .byte %11110011 +000CF4r 1 F4 .byte %11110100 +000CF5r 1 F5 .byte %11110101 +000CF6r 1 F6 .byte %11110110 +000CF7r 1 F7 .byte %11110111 +000CF8r 1 F8 .byte %11111000 +000CF9r 1 F9 .byte %11111001 +000CFAr 1 FA .byte %11111010 +000CFBr 1 FB .byte %11111011 +000CFCr 1 FC .byte %11111100 +000CFDr 1 FD .byte %11111101 +000CFEr 1 FE .byte %11111110 +000CFFr 1 FF .byte %11111111 +000D00r 1 +000D00r 1 ; some character values +000D00r 1 20 .byte ' ' +000D01r 1 21 .byte '!' +000D02r 1 22 .byte '"' +000D03r 1 23 .byte '#' +000D04r 1 24 .byte '$' +000D05r 1 25 .byte '%' +000D06r 1 26 .byte '&' +000D07r 1 27 .byte ''' +000D08r 1 28 .byte '(' +000D09r 1 29 .byte ')' +000D0Ar 1 2A .byte '*' +000D0Br 1 2B .byte '+' +000D0Cr 1 2C .byte ',' +000D0Dr 1 2D .byte '-' +000D0Er 1 2E .byte '.' +000D0Fr 1 2F .byte '/' +000D10r 1 30 .byte '0' +000D11r 1 31 .byte '1' +000D12r 1 32 .byte '2' +000D13r 1 33 .byte '3' +000D14r 1 34 .byte '4' +000D15r 1 35 .byte '5' +000D16r 1 36 .byte '6' +000D17r 1 37 .byte '7' +000D18r 1 38 .byte '8' +000D19r 1 39 .byte '9' +000D1Ar 1 3A .byte ':' +000D1Br 1 3B .byte ';' +000D1Cr 1 3C .byte '<' +000D1Dr 1 3D .byte '=' +000D1Er 1 3E .byte '>' +000D1Fr 1 3F .byte '?' +000D20r 1 40 .byte '@' +000D21r 1 41 .byte 'A' +000D22r 1 42 .byte 'B' +000D23r 1 43 .byte 'C' +000D24r 1 44 .byte 'D' +000D25r 1 45 .byte 'E' +000D26r 1 46 .byte 'F' +000D27r 1 47 .byte 'G' +000D28r 1 48 .byte 'H' +000D29r 1 49 .byte 'I' +000D2Ar 1 4A .byte 'J' +000D2Br 1 4B .byte 'K' +000D2Cr 1 4C .byte 'L' +000D2Dr 1 4D .byte 'M' +000D2Er 1 4E .byte 'N' +000D2Fr 1 4F .byte 'O' +000D30r 1 50 .byte 'P' +000D31r 1 51 .byte 'Q' +000D32r 1 52 .byte 'R' +000D33r 1 53 .byte 'S' +000D34r 1 54 .byte 'T' +000D35r 1 55 .byte 'U' +000D36r 1 56 .byte 'V' +000D37r 1 57 .byte 'W' +000D38r 1 58 .byte 'X' +000D39r 1 59 .byte 'Y' +000D3Ar 1 5A .byte 'Z' +000D3Br 1 5B .byte '[' +000D3Cr 1 5C .byte '\' +000D3Dr 1 5D .byte ']' +000D3Er 1 5E .byte '^' +000D3Fr 1 5F .byte '_' +000D40r 1 60 .byte '`' +000D41r 1 61 .byte 'a' +000D42r 1 62 .byte 'b' +000D43r 1 63 .byte 'c' +000D44r 1 64 .byte 'd' +000D45r 1 65 .byte 'e' +000D46r 1 66 .byte 'f' +000D47r 1 67 .byte 'g' +000D48r 1 68 .byte 'h' +000D49r 1 69 .byte 'i' +000D4Ar 1 6A .byte 'j' +000D4Br 1 6B .byte 'k' +000D4Cr 1 6C .byte 'l' +000D4Dr 1 6D .byte 'm' +000D4Er 1 6E .byte 'n' +000D4Fr 1 6F .byte 'o' +000D50r 1 70 .byte 'p' +000D51r 1 71 .byte 'q' +000D52r 1 72 .byte 'r' +000D53r 1 73 .byte 's' +000D54r 1 74 .byte 't' +000D55r 1 75 .byte 'u' +000D56r 1 76 .byte 'v' +000D57r 1 77 .byte 'w' +000D58r 1 78 .byte 'x' +000D59r 1 79 .byte 'y' +000D5Ar 1 7A .byte 'z' +000D5Br 1 7B .byte '{' +000D5Cr 1 7C .byte '|' +000D5Dr 1 7D .byte '}' +000D5Er 1 7E .byte '~' +000D5Fr 1 +000D5Fr 1 ; multiple values on one line, decimal +000D5Fr 1 00 01 02 03 .byte 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 +000D63r 1 04 05 06 07 +000D67r 1 08 09 0A 0B +000D6Fr 1 10 11 12 13 .byte 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 +000D73r 1 14 15 16 17 +000D77r 1 18 19 1A 1B +000D7Fr 1 20 21 22 23 .byte 32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47 +000D83r 1 24 25 26 27 +000D87r 1 28 29 2A 2B +000D8Fr 1 30 31 32 33 .byte 48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63 +000D93r 1 34 35 36 37 +000D97r 1 38 39 3A 3B +000D9Fr 1 40 41 42 43 .byte 64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79 +000DA3r 1 44 45 46 47 +000DA7r 1 48 49 4A 4B +000DAFr 1 50 51 52 53 .byte 80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95 +000DB3r 1 54 55 56 57 +000DB7r 1 58 59 5A 5B +000DBFr 1 60 61 62 63 .byte 96,97,98,99,100,101,102,103,104,105,106,107,108,109,110,111 +000DC3r 1 64 65 66 67 +000DC7r 1 68 69 6A 6B +000DCFr 1 70 71 72 73 .byte 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 +000DD3r 1 74 75 76 77 +000DD7r 1 78 79 7A 7B +000DDFr 1 80 81 82 83 .byte 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 +000DE3r 1 84 85 86 87 +000DE7r 1 88 89 8A 8B +000DEFr 1 90 91 92 93 .byte 144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159 +000DF3r 1 94 95 96 97 +000DF7r 1 98 99 9A 9B +000DFFr 1 A0 A1 A2 A3 .byte 160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175 +000E03r 1 A4 A5 A6 A7 +000E07r 1 A8 A9 AA AB +000E0Fr 1 B0 B1 B2 B3 .byte 176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191 +000E13r 1 B4 B5 B6 B7 +000E17r 1 B8 B9 BA BB +000E1Fr 1 C0 C1 C2 C3 .byte 192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207 +000E23r 1 C4 C5 C6 C7 +000E27r 1 C8 C9 CA CB +000E2Fr 1 D0 D1 D2 D3 .byte 208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223 +000E33r 1 D4 D5 D6 D7 +000E37r 1 D8 D9 DA DB +000E3Fr 1 E0 E1 E2 E3 .byte 224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239 +000E43r 1 E4 E5 E6 E7 +000E47r 1 E8 E9 EA EB +000E4Fr 1 F0 F1 F2 F3 .byte 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 +000E53r 1 F4 F5 F6 F7 +000E57r 1 F8 F9 FA FB +000E5Fr 1 +000E5Fr 1 ; multiple values on one line, hex +000E5Fr 1 00 01 02 03 .byte $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f +000E63r 1 04 05 06 07 +000E67r 1 08 09 0A 0B +000E6Fr 1 10 11 12 13 .byte $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f +000E73r 1 14 15 16 17 +000E77r 1 18 19 1A 1B +000E7Fr 1 20 21 22 23 .byte $20,$21,$22,$23,$24,$25,$26,$27,$28,$29,$2a,$2b,$2c,$2d,$2e,$2f +000E83r 1 24 25 26 27 +000E87r 1 28 29 2A 2B +000E8Fr 1 30 31 32 33 .byte $30,$31,$32,$33,$34,$35,$36,$37,$38,$39,$3a,$3b,$3c,$3d,$3e,$3f +000E93r 1 34 35 36 37 +000E97r 1 38 39 3A 3B +000E9Fr 1 40 41 42 43 .byte $40,$41,$42,$43,$44,$45,$46,$47,$48,$49,$4a,$4b,$4c,$4d,$4e,$4f +000EA3r 1 44 45 46 47 +000EA7r 1 48 49 4A 4B +000EAFr 1 50 51 52 53 .byte $50,$51,$52,$53,$54,$55,$56,$57,$58,$59,$5a,$5b,$5c,$5d,$5e,$5f +000EB3r 1 54 55 56 57 +000EB7r 1 58 59 5A 5B +000EBFr 1 60 61 62 63 .byte $60,$61,$62,$63,$64,$65,$66,$67,$68,$69,$6a,$6b,$6c,$6d,$6e,$6f +000EC3r 1 64 65 66 67 +000EC7r 1 68 69 6A 6B +000ECFr 1 70 71 72 73 .byte $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f +000ED3r 1 74 75 76 77 +000ED7r 1 78 79 7A 7B +000EDFr 1 80 81 82 83 .byte $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f +000EE3r 1 84 85 86 87 +000EE7r 1 88 89 8A 8B +000EEFr 1 90 91 92 93 .byte $90,$91,$92,$93,$94,$95,$96,$97,$98,$99,$9a,$9b,$9c,$9d,$9e,$9f +000EF3r 1 94 95 96 97 +000EF7r 1 98 99 9A 9B +000EFFr 1 A0 A1 A2 A3 .byte $a0,$a1,$a2,$a3,$a4,$a5,$a6,$a7,$a8,$a9,$aa,$ab,$ac,$ad,$ae,$af +000F03r 1 A4 A5 A6 A7 +000F07r 1 A8 A9 AA AB +000F0Fr 1 B0 B1 B2 B3 .byte $b0,$b1,$b2,$b3,$b4,$b5,$b6,$b7,$b8,$b9,$ba,$bb,$bc,$bd,$be,$bf +000F13r 1 B4 B5 B6 B7 +000F17r 1 B8 B9 BA BB +000F1Fr 1 C0 C1 C2 C3 .byte $c0,$c1,$c2,$c3,$c4,$c5,$c6,$c7,$c8,$c9,$ca,$cb,$cc,$cd,$ce,$cf +000F23r 1 C4 C5 C6 C7 +000F27r 1 C8 C9 CA CB +000F2Fr 1 D0 D1 D2 D3 .byte $d0,$d1,$d2,$d3,$d4,$d5,$d6,$d7,$d8,$d9,$da,$db,$dc,$dd,$de,$df +000F33r 1 D4 D5 D6 D7 +000F37r 1 D8 D9 DA DB +000F3Fr 1 E0 E1 E2 E3 .byte $e0,$e1,$e2,$e3,$e4,$e5,$e6,$e7,$e8,$e9,$ea,$eb,$ec,$ed,$ee,$ef +000F43r 1 E4 E5 E6 E7 +000F47r 1 E8 E9 EA EB +000F4Fr 1 F0 F1 F2 F3 .byte $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff +000F53r 1 F4 F5 F6 F7 +000F57r 1 F8 F9 FA FB +000F5Fr 1 +000F5Fr 1 ; multiple values on one line, alternative hex +000F5Fr 1 00 01 02 03 .byte 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh +000F63r 1 04 05 06 07 +000F67r 1 08 09 0A 0B +000F6Fr 1 10 11 12 13 .byte 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh +000F73r 1 14 15 16 17 +000F77r 1 18 19 1A 1B +000F7Fr 1 20 21 22 23 .byte 20h,21h,22h,23h,24h,25h,26h,27h,28h,29h,2ah,2bh,2ch,2dh,2eh,2fh +000F83r 1 24 25 26 27 +000F87r 1 28 29 2A 2B +000F8Fr 1 30 31 32 33 .byte 30h,31h,32h,33h,34h,35h,36h,37h,38h,39h,3ah,3bh,3ch,3dh,3eh,3fh +000F93r 1 34 35 36 37 +000F97r 1 38 39 3A 3B +000F9Fr 1 40 41 42 43 .byte 40h,41h,42h,43h,44h,45h,46h,47h,48h,49h,4ah,4bh,4ch,4dh,4eh,4fh +000FA3r 1 44 45 46 47 +000FA7r 1 48 49 4A 4B +000FAFr 1 50 51 52 53 .byte 50h,51h,52h,53h,54h,55h,56h,57h,58h,59h,5ah,5bh,5ch,5dh,5eh,5fh +000FB3r 1 54 55 56 57 +000FB7r 1 58 59 5A 5B +000FBFr 1 60 61 62 63 .byte 60h,61h,62h,63h,64h,65h,66h,67h,68h,69h,6ah,6bh,6ch,6dh,6eh,6fh +000FC3r 1 64 65 66 67 +000FC7r 1 68 69 6A 6B +000FCFr 1 70 71 72 73 .byte 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh +000FD3r 1 74 75 76 77 +000FD7r 1 78 79 7A 7B +000FDFr 1 80 81 82 83 .byte 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh +000FE3r 1 84 85 86 87 +000FE7r 1 88 89 8A 8B +000FEFr 1 90 91 92 93 .byte 90h,91h,92h,93h,94h,95h,96h,97h,98h,99h,9ah,9bh,9ch,9dh,9eh,9fh +000FF3r 1 94 95 96 97 +000FF7r 1 98 99 9A 9B +000FFFr 1 A0 A1 A2 A3 .byte 0a0h,0a1h,0a2h,0a3h,0a4h,0a5h,0a6h,0a7h,0a8h,0a9h,0aah,0abh,0ach,0adh,0aeh,0afh +001003r 1 A4 A5 A6 A7 +001007r 1 A8 A9 AA AB +00100Fr 1 B0 B1 B2 B3 .byte 0b0h,0b1h,0b2h,0b3h,0b4h,0b5h,0b6h,0b7h,0b8h,0b9h,0bah,0bbh,0bch,0bdh,0beh,0bfh +001013r 1 B4 B5 B6 B7 +001017r 1 B8 B9 BA BB +00101Fr 1 C0 C1 C2 C3 .byte 0c0h,0c1h,0c2h,0c3h,0c4h,0c5h,0c6h,0c7h,0c8h,0c9h,0cah,0cbh,0cch,0cdh,0ceh,0cfh +001023r 1 C4 C5 C6 C7 +001027r 1 C8 C9 CA CB +00102Fr 1 D0 D1 D2 D3 .byte 0d0h,0d1h,0d2h,0d3h,0d4h,0d5h,0d6h,0d7h,0d8h,0d9h,0dah,0dbh,0dch,0ddh,0deh,0dfh +001033r 1 D4 D5 D6 D7 +001037r 1 D8 D9 DA DB +00103Fr 1 E0 E1 E2 E3 .byte 0e0h,0e1h,0e2h,0e3h,0e4h,0e5h,0e6h,0e7h,0e8h,0e9h,0eah,0ebh,0ech,0edh,0eeh,0efh +001043r 1 E4 E5 E6 E7 +001047r 1 E8 E9 EA EB +00104Fr 1 F0 F1 F2 F3 .byte 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh +001053r 1 F4 F5 F6 F7 +001057r 1 F8 F9 FA FB +00105Fr 1 +00105Fr 1 ; multiple values on one line, characters +00105Fr 1 20 21 22 23 .byte ' ','!','"','#','$','%','&',''','(',')','*','+',',','-','.','/' +001063r 1 24 25 26 27 +001067r 1 28 29 2A 2B +00106Fr 1 30 31 32 33 .byte '0','1','2','3','4','5','6','7','8','9',':',';','<','=','>','?' +001073r 1 34 35 36 37 +001077r 1 38 39 3A 3B +00107Fr 1 40 41 42 43 .byte '@','A','B','C','D','E','F','G','H','I','J','K','L','M','N','O' +001083r 1 44 45 46 47 +001087r 1 48 49 4A 4B +00108Fr 1 50 51 52 53 .byte 'P','Q','R','S','T','U','V','W','X','Y','Z','[','\',']','^','_' +001093r 1 54 55 56 57 +001097r 1 58 59 5A 5B +00109Fr 1 60 61 62 63 .byte '`','a','b','c','d','e','f','g','h','i','j','k','l','m','n','o' +0010A3r 1 64 65 66 67 +0010A7r 1 68 69 6A 6B +0010AFr 1 70 71 72 73 .byte 'p','q','r','s','t','u','v','w','x','y','z','{','|','}','~' +0010B3r 1 74 75 76 77 +0010B7r 1 78 79 7A 7B +0010BEr 1 +0010BEr 1 ; some character strings +0010BEr 1 20 21 23 24 .byte " !#$%&'()*+,-." +0010C2r 1 25 26 27 28 +0010C6r 1 29 2A 2B 2C +0010CCr 1 30 31 32 33 .byte "0123456789:;<=>" +0010D0r 1 34 35 36 37 +0010D4r 1 38 39 3A 3B +0010DBr 1 40 41 42 43 .byte "@ABCDEFGHIJKLMN" +0010DFr 1 44 45 46 47 +0010E3r 1 48 49 4A 4B +0010EAr 1 50 51 52 53 .byte "PQRSTUVWXYZ[\]^" +0010EEr 1 54 55 56 57 +0010F2r 1 58 59 5A 5B +0010F9r 1 60 61 62 63 .byte "`abcdefghijklmn" +0010FDr 1 64 65 66 67 +001101r 1 68 69 6A 6B +001108r 1 70 71 72 73 .byte "pqrstuvwxyz{|}" +00110Cr 1 74 75 76 77 +001110r 1 78 79 7A 7B +001116r 1 +001116r 1 ; mix some variants +001116r 1 0B 11 03 11 .byte 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh +00111Ar 1 61 62 7A 41 +00111Er 1 5A 30 39 AA +001125r 1 diff --git a/test/asm/listing/ref/101-byt.bin-ref b/test/asm/listing/ref/101-byt.bin-ref new file mode 100644 index 000000000..7deb4dffd Binary files /dev/null and b/test/asm/listing/ref/101-byt.bin-ref differ diff --git a/test/asm/listing/ref/101-byt.list-ref b/test/asm/listing/ref/101-byt.list-ref new file mode 100644 index 000000000..43677a703 --- /dev/null +++ b/test/asm/listing/ref/101-byt.list-ref @@ -0,0 +1,3653 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 101-byt.s +Current file: 101-byt.s + +000000r 1 ; 2022-06-15 Spiro Trikaliotis +000000r 1 +000000r 1 +000000r 1 ; upper case pseudo-op +000000r 1 00 .BYT 0 +000001r 1 01 .BYT 1 +000002r 1 02 .BYT 2 +000003r 1 03 .BYT 3 +000004r 1 04 .BYT 4 +000005r 1 05 .BYT 5 +000006r 1 06 .BYT 6 +000007r 1 07 .BYT 7 +000008r 1 08 .BYT 8 +000009r 1 09 .BYT 9 +00000Ar 1 0A .BYT 10 +00000Br 1 0B .BYT 11 +00000Cr 1 0C .BYT 12 +00000Dr 1 0D .BYT 13 +00000Er 1 0E .BYT 14 +00000Fr 1 0F .BYT 15 +000010r 1 10 .BYT 16 +000011r 1 11 .BYT 17 +000012r 1 12 .BYT 18 +000013r 1 13 .BYT 19 +000014r 1 14 .BYT 20 +000015r 1 15 .BYT 21 +000016r 1 16 .BYT 22 +000017r 1 17 .BYT 23 +000018r 1 18 .BYT 24 +000019r 1 19 .BYT 25 +00001Ar 1 1A .BYT 26 +00001Br 1 1B .BYT 27 +00001Cr 1 1C .BYT 28 +00001Dr 1 1D .BYT 29 +00001Er 1 1E .BYT 30 +00001Fr 1 1F .BYT 31 +000020r 1 20 .BYT 32 +000021r 1 21 .BYT 33 +000022r 1 22 .BYT 34 +000023r 1 23 .BYT 35 +000024r 1 24 .BYT 36 +000025r 1 25 .BYT 37 +000026r 1 26 .BYT 38 +000027r 1 27 .BYT 39 +000028r 1 28 .BYT 40 +000029r 1 29 .BYT 41 +00002Ar 1 2A .BYT 42 +00002Br 1 2B .BYT 43 +00002Cr 1 2C .BYT 44 +00002Dr 1 2D .BYT 45 +00002Er 1 2E .BYT 46 +00002Fr 1 2F .BYT 47 +000030r 1 30 .BYT 48 +000031r 1 31 .BYT 49 +000032r 1 32 .BYT 50 +000033r 1 33 .BYT 51 +000034r 1 34 .BYT 52 +000035r 1 35 .BYT 53 +000036r 1 36 .BYT 54 +000037r 1 37 .BYT 55 +000038r 1 38 .BYT 56 +000039r 1 39 .BYT 57 +00003Ar 1 3A .BYT 58 +00003Br 1 3B .BYT 59 +00003Cr 1 3C .BYT 60 +00003Dr 1 3D .BYT 61 +00003Er 1 3E .BYT 62 +00003Fr 1 3F .BYT 63 +000040r 1 40 .BYT 64 +000041r 1 41 .BYT 65 +000042r 1 42 .BYT 66 +000043r 1 43 .BYT 67 +000044r 1 44 .BYT 68 +000045r 1 45 .BYT 69 +000046r 1 46 .BYT 70 +000047r 1 47 .BYT 71 +000048r 1 48 .BYT 72 +000049r 1 49 .BYT 73 +00004Ar 1 4A .BYT 74 +00004Br 1 4B .BYT 75 +00004Cr 1 4C .BYT 76 +00004Dr 1 4D .BYT 77 +00004Er 1 4E .BYT 78 +00004Fr 1 4F .BYT 79 +000050r 1 50 .BYT 80 +000051r 1 51 .BYT 81 +000052r 1 52 .BYT 82 +000053r 1 53 .BYT 83 +000054r 1 54 .BYT 84 +000055r 1 55 .BYT 85 +000056r 1 56 .BYT 86 +000057r 1 57 .BYT 87 +000058r 1 58 .BYT 88 +000059r 1 59 .BYT 89 +00005Ar 1 5A .BYT 90 +00005Br 1 5B .BYT 91 +00005Cr 1 5C .BYT 92 +00005Dr 1 5D .BYT 93 +00005Er 1 5E .BYT 94 +00005Fr 1 5F .BYT 95 +000060r 1 60 .BYT 96 +000061r 1 61 .BYT 97 +000062r 1 62 .BYT 98 +000063r 1 63 .BYT 99 +000064r 1 64 .BYT 100 +000065r 1 65 .BYT 101 +000066r 1 66 .BYT 102 +000067r 1 67 .BYT 103 +000068r 1 68 .BYT 104 +000069r 1 69 .BYT 105 +00006Ar 1 6A .BYT 106 +00006Br 1 6B .BYT 107 +00006Cr 1 6C .BYT 108 +00006Dr 1 6D .BYT 109 +00006Er 1 6E .BYT 110 +00006Fr 1 6F .BYT 111 +000070r 1 70 .BYT 112 +000071r 1 71 .BYT 113 +000072r 1 72 .BYT 114 +000073r 1 73 .BYT 115 +000074r 1 74 .BYT 116 +000075r 1 75 .BYT 117 +000076r 1 76 .BYT 118 +000077r 1 77 .BYT 119 +000078r 1 78 .BYT 120 +000079r 1 79 .BYT 121 +00007Ar 1 7A .BYT 122 +00007Br 1 7B .BYT 123 +00007Cr 1 7C .BYT 124 +00007Dr 1 7D .BYT 125 +00007Er 1 7E .BYT 126 +00007Fr 1 7F .BYT 127 +000080r 1 80 .BYT 128 +000081r 1 81 .BYT 129 +000082r 1 82 .BYT 130 +000083r 1 83 .BYT 131 +000084r 1 84 .BYT 132 +000085r 1 85 .BYT 133 +000086r 1 86 .BYT 134 +000087r 1 87 .BYT 135 +000088r 1 88 .BYT 136 +000089r 1 89 .BYT 137 +00008Ar 1 8A .BYT 138 +00008Br 1 8B .BYT 139 +00008Cr 1 8C .BYT 140 +00008Dr 1 8D .BYT 141 +00008Er 1 8E .BYT 142 +00008Fr 1 8F .BYT 143 +000090r 1 90 .BYT 144 +000091r 1 91 .BYT 145 +000092r 1 92 .BYT 146 +000093r 1 93 .BYT 147 +000094r 1 94 .BYT 148 +000095r 1 95 .BYT 149 +000096r 1 96 .BYT 150 +000097r 1 97 .BYT 151 +000098r 1 98 .BYT 152 +000099r 1 99 .BYT 153 +00009Ar 1 9A .BYT 154 +00009Br 1 9B .BYT 155 +00009Cr 1 9C .BYT 156 +00009Dr 1 9D .BYT 157 +00009Er 1 9E .BYT 158 +00009Fr 1 9F .BYT 159 +0000A0r 1 A0 .BYT 160 +0000A1r 1 A1 .BYT 161 +0000A2r 1 A2 .BYT 162 +0000A3r 1 A3 .BYT 163 +0000A4r 1 A4 .BYT 164 +0000A5r 1 A5 .BYT 165 +0000A6r 1 A6 .BYT 166 +0000A7r 1 A7 .BYT 167 +0000A8r 1 A8 .BYT 168 +0000A9r 1 A9 .BYT 169 +0000AAr 1 AA .BYT 170 +0000ABr 1 AB .BYT 171 +0000ACr 1 AC .BYT 172 +0000ADr 1 AD .BYT 173 +0000AEr 1 AE .BYT 174 +0000AFr 1 AF .BYT 175 +0000B0r 1 B0 .BYT 176 +0000B1r 1 B1 .BYT 177 +0000B2r 1 B2 .BYT 178 +0000B3r 1 B3 .BYT 179 +0000B4r 1 B4 .BYT 180 +0000B5r 1 B5 .BYT 181 +0000B6r 1 B6 .BYT 182 +0000B7r 1 B7 .BYT 183 +0000B8r 1 B8 .BYT 184 +0000B9r 1 B9 .BYT 185 +0000BAr 1 BA .BYT 186 +0000BBr 1 BB .BYT 187 +0000BCr 1 BC .BYT 188 +0000BDr 1 BD .BYT 189 +0000BEr 1 BE .BYT 190 +0000BFr 1 BF .BYT 191 +0000C0r 1 C0 .BYT 192 +0000C1r 1 C1 .BYT 193 +0000C2r 1 C2 .BYT 194 +0000C3r 1 C3 .BYT 195 +0000C4r 1 C4 .BYT 196 +0000C5r 1 C5 .BYT 197 +0000C6r 1 C6 .BYT 198 +0000C7r 1 C7 .BYT 199 +0000C8r 1 C8 .BYT 200 +0000C9r 1 C9 .BYT 201 +0000CAr 1 CA .BYT 202 +0000CBr 1 CB .BYT 203 +0000CCr 1 CC .BYT 204 +0000CDr 1 CD .BYT 205 +0000CEr 1 CE .BYT 206 +0000CFr 1 CF .BYT 207 +0000D0r 1 D0 .BYT 208 +0000D1r 1 D1 .BYT 209 +0000D2r 1 D2 .BYT 210 +0000D3r 1 D3 .BYT 211 +0000D4r 1 D4 .BYT 212 +0000D5r 1 D5 .BYT 213 +0000D6r 1 D6 .BYT 214 +0000D7r 1 D7 .BYT 215 +0000D8r 1 D8 .BYT 216 +0000D9r 1 D9 .BYT 217 +0000DAr 1 DA .BYT 218 +0000DBr 1 DB .BYT 219 +0000DCr 1 DC .BYT 220 +0000DDr 1 DD .BYT 221 +0000DEr 1 DE .BYT 222 +0000DFr 1 DF .BYT 223 +0000E0r 1 E0 .BYT 224 +0000E1r 1 E1 .BYT 225 +0000E2r 1 E2 .BYT 226 +0000E3r 1 E3 .BYT 227 +0000E4r 1 E4 .BYT 228 +0000E5r 1 E5 .BYT 229 +0000E6r 1 E6 .BYT 230 +0000E7r 1 E7 .BYT 231 +0000E8r 1 E8 .BYT 232 +0000E9r 1 E9 .BYT 233 +0000EAr 1 EA .BYT 234 +0000EBr 1 EB .BYT 235 +0000ECr 1 EC .BYT 236 +0000EDr 1 ED .BYT 237 +0000EEr 1 EE .BYT 238 +0000EFr 1 EF .BYT 239 +0000F0r 1 F0 .BYT 240 +0000F1r 1 F1 .BYT 241 +0000F2r 1 F2 .BYT 242 +0000F3r 1 F3 .BYT 243 +0000F4r 1 F4 .BYT 244 +0000F5r 1 F5 .BYT 245 +0000F6r 1 F6 .BYT 246 +0000F7r 1 F7 .BYT 247 +0000F8r 1 F8 .BYT 248 +0000F9r 1 F9 .BYT 249 +0000FAr 1 FA .BYT 250 +0000FBr 1 FB .BYT 251 +0000FCr 1 FC .BYT 252 +0000FDr 1 FD .BYT 253 +0000FEr 1 FE .BYT 254 +0000FFr 1 FF .BYT 255 +000100r 1 +000100r 1 ; lower case pseudo-op +000100r 1 00 .byt 0 +000101r 1 01 .byt 1 +000102r 1 02 .byt 2 +000103r 1 03 .byt 3 +000104r 1 04 .byt 4 +000105r 1 05 .byt 5 +000106r 1 06 .byt 6 +000107r 1 07 .byt 7 +000108r 1 08 .byt 8 +000109r 1 09 .byt 9 +00010Ar 1 0A .byt 10 +00010Br 1 0B .byt 11 +00010Cr 1 0C .byt 12 +00010Dr 1 0D .byt 13 +00010Er 1 0E .byt 14 +00010Fr 1 0F .byt 15 +000110r 1 10 .byt 16 +000111r 1 11 .byt 17 +000112r 1 12 .byt 18 +000113r 1 13 .byt 19 +000114r 1 14 .byt 20 +000115r 1 15 .byt 21 +000116r 1 16 .byt 22 +000117r 1 17 .byt 23 +000118r 1 18 .byt 24 +000119r 1 19 .byt 25 +00011Ar 1 1A .byt 26 +00011Br 1 1B .byt 27 +00011Cr 1 1C .byt 28 +00011Dr 1 1D .byt 29 +00011Er 1 1E .byt 30 +00011Fr 1 1F .byt 31 +000120r 1 20 .byt 32 +000121r 1 21 .byt 33 +000122r 1 22 .byt 34 +000123r 1 23 .byt 35 +000124r 1 24 .byt 36 +000125r 1 25 .byt 37 +000126r 1 26 .byt 38 +000127r 1 27 .byt 39 +000128r 1 28 .byt 40 +000129r 1 29 .byt 41 +00012Ar 1 2A .byt 42 +00012Br 1 2B .byt 43 +00012Cr 1 2C .byt 44 +00012Dr 1 2D .byt 45 +00012Er 1 2E .byt 46 +00012Fr 1 2F .byt 47 +000130r 1 30 .byt 48 +000131r 1 31 .byt 49 +000132r 1 32 .byt 50 +000133r 1 33 .byt 51 +000134r 1 34 .byt 52 +000135r 1 35 .byt 53 +000136r 1 36 .byt 54 +000137r 1 37 .byt 55 +000138r 1 38 .byt 56 +000139r 1 39 .byt 57 +00013Ar 1 3A .byt 58 +00013Br 1 3B .byt 59 +00013Cr 1 3C .byt 60 +00013Dr 1 3D .byt 61 +00013Er 1 3E .byt 62 +00013Fr 1 3F .byt 63 +000140r 1 40 .byt 64 +000141r 1 41 .byt 65 +000142r 1 42 .byt 66 +000143r 1 43 .byt 67 +000144r 1 44 .byt 68 +000145r 1 45 .byt 69 +000146r 1 46 .byt 70 +000147r 1 47 .byt 71 +000148r 1 48 .byt 72 +000149r 1 49 .byt 73 +00014Ar 1 4A .byt 74 +00014Br 1 4B .byt 75 +00014Cr 1 4C .byt 76 +00014Dr 1 4D .byt 77 +00014Er 1 4E .byt 78 +00014Fr 1 4F .byt 79 +000150r 1 50 .byt 80 +000151r 1 51 .byt 81 +000152r 1 52 .byt 82 +000153r 1 53 .byt 83 +000154r 1 54 .byt 84 +000155r 1 55 .byt 85 +000156r 1 56 .byt 86 +000157r 1 57 .byt 87 +000158r 1 58 .byt 88 +000159r 1 59 .byt 89 +00015Ar 1 5A .byt 90 +00015Br 1 5B .byt 91 +00015Cr 1 5C .byt 92 +00015Dr 1 5D .byt 93 +00015Er 1 5E .byt 94 +00015Fr 1 5F .byt 95 +000160r 1 60 .byt 96 +000161r 1 61 .byt 97 +000162r 1 62 .byt 98 +000163r 1 63 .byt 99 +000164r 1 64 .byt 100 +000165r 1 65 .byt 101 +000166r 1 66 .byt 102 +000167r 1 67 .byt 103 +000168r 1 68 .byt 104 +000169r 1 69 .byt 105 +00016Ar 1 6A .byt 106 +00016Br 1 6B .byt 107 +00016Cr 1 6C .byt 108 +00016Dr 1 6D .byt 109 +00016Er 1 6E .byt 110 +00016Fr 1 6F .byt 111 +000170r 1 70 .byt 112 +000171r 1 71 .byt 113 +000172r 1 72 .byt 114 +000173r 1 73 .byt 115 +000174r 1 74 .byt 116 +000175r 1 75 .byt 117 +000176r 1 76 .byt 118 +000177r 1 77 .byt 119 +000178r 1 78 .byt 120 +000179r 1 79 .byt 121 +00017Ar 1 7A .byt 122 +00017Br 1 7B .byt 123 +00017Cr 1 7C .byt 124 +00017Dr 1 7D .byt 125 +00017Er 1 7E .byt 126 +00017Fr 1 7F .byt 127 +000180r 1 80 .byt 128 +000181r 1 81 .byt 129 +000182r 1 82 .byt 130 +000183r 1 83 .byt 131 +000184r 1 84 .byt 132 +000185r 1 85 .byt 133 +000186r 1 86 .byt 134 +000187r 1 87 .byt 135 +000188r 1 88 .byt 136 +000189r 1 89 .byt 137 +00018Ar 1 8A .byt 138 +00018Br 1 8B .byt 139 +00018Cr 1 8C .byt 140 +00018Dr 1 8D .byt 141 +00018Er 1 8E .byt 142 +00018Fr 1 8F .byt 143 +000190r 1 90 .byt 144 +000191r 1 91 .byt 145 +000192r 1 92 .byt 146 +000193r 1 93 .byt 147 +000194r 1 94 .byt 148 +000195r 1 95 .byt 149 +000196r 1 96 .byt 150 +000197r 1 97 .byt 151 +000198r 1 98 .byt 152 +000199r 1 99 .byt 153 +00019Ar 1 9A .byt 154 +00019Br 1 9B .byt 155 +00019Cr 1 9C .byt 156 +00019Dr 1 9D .byt 157 +00019Er 1 9E .byt 158 +00019Fr 1 9F .byt 159 +0001A0r 1 A0 .byt 160 +0001A1r 1 A1 .byt 161 +0001A2r 1 A2 .byt 162 +0001A3r 1 A3 .byt 163 +0001A4r 1 A4 .byt 164 +0001A5r 1 A5 .byt 165 +0001A6r 1 A6 .byt 166 +0001A7r 1 A7 .byt 167 +0001A8r 1 A8 .byt 168 +0001A9r 1 A9 .byt 169 +0001AAr 1 AA .byt 170 +0001ABr 1 AB .byt 171 +0001ACr 1 AC .byt 172 +0001ADr 1 AD .byt 173 +0001AEr 1 AE .byt 174 +0001AFr 1 AF .byt 175 +0001B0r 1 B0 .byt 176 +0001B1r 1 B1 .byt 177 +0001B2r 1 B2 .byt 178 +0001B3r 1 B3 .byt 179 +0001B4r 1 B4 .byt 180 +0001B5r 1 B5 .byt 181 +0001B6r 1 B6 .byt 182 +0001B7r 1 B7 .byt 183 +0001B8r 1 B8 .byt 184 +0001B9r 1 B9 .byt 185 +0001BAr 1 BA .byt 186 +0001BBr 1 BB .byt 187 +0001BCr 1 BC .byt 188 +0001BDr 1 BD .byt 189 +0001BEr 1 BE .byt 190 +0001BFr 1 BF .byt 191 +0001C0r 1 C0 .byt 192 +0001C1r 1 C1 .byt 193 +0001C2r 1 C2 .byt 194 +0001C3r 1 C3 .byt 195 +0001C4r 1 C4 .byt 196 +0001C5r 1 C5 .byt 197 +0001C6r 1 C6 .byt 198 +0001C7r 1 C7 .byt 199 +0001C8r 1 C8 .byt 200 +0001C9r 1 C9 .byt 201 +0001CAr 1 CA .byt 202 +0001CBr 1 CB .byt 203 +0001CCr 1 CC .byt 204 +0001CDr 1 CD .byt 205 +0001CEr 1 CE .byt 206 +0001CFr 1 CF .byt 207 +0001D0r 1 D0 .byt 208 +0001D1r 1 D1 .byt 209 +0001D2r 1 D2 .byt 210 +0001D3r 1 D3 .byt 211 +0001D4r 1 D4 .byt 212 +0001D5r 1 D5 .byt 213 +0001D6r 1 D6 .byt 214 +0001D7r 1 D7 .byt 215 +0001D8r 1 D8 .byt 216 +0001D9r 1 D9 .byt 217 +0001DAr 1 DA .byt 218 +0001DBr 1 DB .byt 219 +0001DCr 1 DC .byt 220 +0001DDr 1 DD .byt 221 +0001DEr 1 DE .byt 222 +0001DFr 1 DF .byt 223 +0001E0r 1 E0 .byt 224 +0001E1r 1 E1 .byt 225 +0001E2r 1 E2 .byt 226 +0001E3r 1 E3 .byt 227 +0001E4r 1 E4 .byt 228 +0001E5r 1 E5 .byt 229 +0001E6r 1 E6 .byt 230 +0001E7r 1 E7 .byt 231 +0001E8r 1 E8 .byt 232 +0001E9r 1 E9 .byt 233 +0001EAr 1 EA .byt 234 +0001EBr 1 EB .byt 235 +0001ECr 1 EC .byt 236 +0001EDr 1 ED .byt 237 +0001EEr 1 EE .byt 238 +0001EFr 1 EF .byt 239 +0001F0r 1 F0 .byt 240 +0001F1r 1 F1 .byt 241 +0001F2r 1 F2 .byt 242 +0001F3r 1 F3 .byt 243 +0001F4r 1 F4 .byt 244 +0001F5r 1 F5 .byt 245 +0001F6r 1 F6 .byt 246 +0001F7r 1 F7 .byt 247 +0001F8r 1 F8 .byt 248 +0001F9r 1 F9 .byt 249 +0001FAr 1 FA .byt 250 +0001FBr 1 FB .byt 251 +0001FCr 1 FC .byt 252 +0001FDr 1 FD .byt 253 +0001FEr 1 FE .byt 254 +0001FFr 1 FF .byt 255 +000200r 1 +000200r 1 ; hex values +000200r 1 00 .byt $0 +000201r 1 01 .byt $1 +000202r 1 02 .byt $2 +000203r 1 03 .byt $3 +000204r 1 04 .byt $4 +000205r 1 05 .byt $5 +000206r 1 06 .byt $6 +000207r 1 07 .byt $7 +000208r 1 08 .byt $8 +000209r 1 09 .byt $9 +00020Ar 1 0A .byt $a +00020Br 1 0B .byt $b +00020Cr 1 0C .byt $c +00020Dr 1 0D .byt $d +00020Er 1 0E .byt $e +00020Fr 1 0F .byt $f +000210r 1 10 .byt $10 +000211r 1 11 .byt $11 +000212r 1 12 .byt $12 +000213r 1 13 .byt $13 +000214r 1 14 .byt $14 +000215r 1 15 .byt $15 +000216r 1 16 .byt $16 +000217r 1 17 .byt $17 +000218r 1 18 .byt $18 +000219r 1 19 .byt $19 +00021Ar 1 1A .byt $1a +00021Br 1 1B .byt $1b +00021Cr 1 1C .byt $1c +00021Dr 1 1D .byt $1d +00021Er 1 1E .byt $1e +00021Fr 1 1F .byt $1f +000220r 1 20 .byt $20 +000221r 1 21 .byt $21 +000222r 1 22 .byt $22 +000223r 1 23 .byt $23 +000224r 1 24 .byt $24 +000225r 1 25 .byt $25 +000226r 1 26 .byt $26 +000227r 1 27 .byt $27 +000228r 1 28 .byt $28 +000229r 1 29 .byt $29 +00022Ar 1 2A .byt $2a +00022Br 1 2B .byt $2b +00022Cr 1 2C .byt $2c +00022Dr 1 2D .byt $2d +00022Er 1 2E .byt $2e +00022Fr 1 2F .byt $2f +000230r 1 30 .byt $30 +000231r 1 31 .byt $31 +000232r 1 32 .byt $32 +000233r 1 33 .byt $33 +000234r 1 34 .byt $34 +000235r 1 35 .byt $35 +000236r 1 36 .byt $36 +000237r 1 37 .byt $37 +000238r 1 38 .byt $38 +000239r 1 39 .byt $39 +00023Ar 1 3A .byt $3a +00023Br 1 3B .byt $3b +00023Cr 1 3C .byt $3c +00023Dr 1 3D .byt $3d +00023Er 1 3E .byt $3e +00023Fr 1 3F .byt $3f +000240r 1 40 .byt $40 +000241r 1 41 .byt $41 +000242r 1 42 .byt $42 +000243r 1 43 .byt $43 +000244r 1 44 .byt $44 +000245r 1 45 .byt $45 +000246r 1 46 .byt $46 +000247r 1 47 .byt $47 +000248r 1 48 .byt $48 +000249r 1 49 .byt $49 +00024Ar 1 4A .byt $4a +00024Br 1 4B .byt $4b +00024Cr 1 4C .byt $4c +00024Dr 1 4D .byt $4d +00024Er 1 4E .byt $4e +00024Fr 1 4F .byt $4f +000250r 1 50 .byt $50 +000251r 1 51 .byt $51 +000252r 1 52 .byt $52 +000253r 1 53 .byt $53 +000254r 1 54 .byt $54 +000255r 1 55 .byt $55 +000256r 1 56 .byt $56 +000257r 1 57 .byt $57 +000258r 1 58 .byt $58 +000259r 1 59 .byt $59 +00025Ar 1 5A .byt $5a +00025Br 1 5B .byt $5b +00025Cr 1 5C .byt $5c +00025Dr 1 5D .byt $5d +00025Er 1 5E .byt $5e +00025Fr 1 5F .byt $5f +000260r 1 60 .byt $60 +000261r 1 61 .byt $61 +000262r 1 62 .byt $62 +000263r 1 63 .byt $63 +000264r 1 64 .byt $64 +000265r 1 65 .byt $65 +000266r 1 66 .byt $66 +000267r 1 67 .byt $67 +000268r 1 68 .byt $68 +000269r 1 69 .byt $69 +00026Ar 1 6A .byt $6a +00026Br 1 6B .byt $6b +00026Cr 1 6C .byt $6c +00026Dr 1 6D .byt $6d +00026Er 1 6E .byt $6e +00026Fr 1 6F .byt $6f +000270r 1 70 .byt $70 +000271r 1 71 .byt $71 +000272r 1 72 .byt $72 +000273r 1 73 .byt $73 +000274r 1 74 .byt $74 +000275r 1 75 .byt $75 +000276r 1 76 .byt $76 +000277r 1 77 .byt $77 +000278r 1 78 .byt $78 +000279r 1 79 .byt $79 +00027Ar 1 7A .byt $7a +00027Br 1 7B .byt $7b +00027Cr 1 7C .byt $7c +00027Dr 1 7D .byt $7d +00027Er 1 7E .byt $7e +00027Fr 1 7F .byt $7f +000280r 1 80 .byt $80 +000281r 1 81 .byt $81 +000282r 1 82 .byt $82 +000283r 1 83 .byt $83 +000284r 1 84 .byt $84 +000285r 1 85 .byt $85 +000286r 1 86 .byt $86 +000287r 1 87 .byt $87 +000288r 1 88 .byt $88 +000289r 1 89 .byt $89 +00028Ar 1 8A .byt $8a +00028Br 1 8B .byt $8b +00028Cr 1 8C .byt $8c +00028Dr 1 8D .byt $8d +00028Er 1 8E .byt $8e +00028Fr 1 8F .byt $8f +000290r 1 90 .byt $90 +000291r 1 91 .byt $91 +000292r 1 92 .byt $92 +000293r 1 93 .byt $93 +000294r 1 94 .byt $94 +000295r 1 95 .byt $95 +000296r 1 96 .byt $96 +000297r 1 97 .byt $97 +000298r 1 98 .byt $98 +000299r 1 99 .byt $99 +00029Ar 1 9A .byt $9a +00029Br 1 9B .byt $9b +00029Cr 1 9C .byt $9c +00029Dr 1 9D .byt $9d +00029Er 1 9E .byt $9e +00029Fr 1 9F .byt $9f +0002A0r 1 A0 .byt $a0 +0002A1r 1 A1 .byt $a1 +0002A2r 1 A2 .byt $a2 +0002A3r 1 A3 .byt $a3 +0002A4r 1 A4 .byt $a4 +0002A5r 1 A5 .byt $a5 +0002A6r 1 A6 .byt $a6 +0002A7r 1 A7 .byt $a7 +0002A8r 1 A8 .byt $a8 +0002A9r 1 A9 .byt $a9 +0002AAr 1 AA .byt $aa +0002ABr 1 AB .byt $ab +0002ACr 1 AC .byt $ac +0002ADr 1 AD .byt $ad +0002AEr 1 AE .byt $ae +0002AFr 1 AF .byt $af +0002B0r 1 B0 .byt $b0 +0002B1r 1 B1 .byt $b1 +0002B2r 1 B2 .byt $b2 +0002B3r 1 B3 .byt $b3 +0002B4r 1 B4 .byt $b4 +0002B5r 1 B5 .byt $b5 +0002B6r 1 B6 .byt $b6 +0002B7r 1 B7 .byt $b7 +0002B8r 1 B8 .byt $b8 +0002B9r 1 B9 .byt $b9 +0002BAr 1 BA .byt $ba +0002BBr 1 BB .byt $bb +0002BCr 1 BC .byt $bc +0002BDr 1 BD .byt $bd +0002BEr 1 BE .byt $be +0002BFr 1 BF .byt $bf +0002C0r 1 C0 .byt $c0 +0002C1r 1 C1 .byt $c1 +0002C2r 1 C2 .byt $c2 +0002C3r 1 C3 .byt $c3 +0002C4r 1 C4 .byt $c4 +0002C5r 1 C5 .byt $c5 +0002C6r 1 C6 .byt $c6 +0002C7r 1 C7 .byt $c7 +0002C8r 1 C8 .byt $c8 +0002C9r 1 C9 .byt $c9 +0002CAr 1 CA .byt $ca +0002CBr 1 CB .byt $cb +0002CCr 1 CC .byt $cc +0002CDr 1 CD .byt $cd +0002CEr 1 CE .byt $ce +0002CFr 1 CF .byt $cf +0002D0r 1 D0 .byt $d0 +0002D1r 1 D1 .byt $d1 +0002D2r 1 D2 .byt $d2 +0002D3r 1 D3 .byt $d3 +0002D4r 1 D4 .byt $d4 +0002D5r 1 D5 .byt $d5 +0002D6r 1 D6 .byt $d6 +0002D7r 1 D7 .byt $d7 +0002D8r 1 D8 .byt $d8 +0002D9r 1 D9 .byt $d9 +0002DAr 1 DA .byt $da +0002DBr 1 DB .byt $db +0002DCr 1 DC .byt $dc +0002DDr 1 DD .byt $dd +0002DEr 1 DE .byt $de +0002DFr 1 DF .byt $df +0002E0r 1 E0 .byt $e0 +0002E1r 1 E1 .byt $e1 +0002E2r 1 E2 .byt $e2 +0002E3r 1 E3 .byt $e3 +0002E4r 1 E4 .byt $e4 +0002E5r 1 E5 .byt $e5 +0002E6r 1 E6 .byt $e6 +0002E7r 1 E7 .byt $e7 +0002E8r 1 E8 .byt $e8 +0002E9r 1 E9 .byt $e9 +0002EAr 1 EA .byt $ea +0002EBr 1 EB .byt $eb +0002ECr 1 EC .byt $ec +0002EDr 1 ED .byt $ed +0002EEr 1 EE .byt $ee +0002EFr 1 EF .byt $ef +0002F0r 1 F0 .byt $f0 +0002F1r 1 F1 .byt $f1 +0002F2r 1 F2 .byt $f2 +0002F3r 1 F3 .byt $f3 +0002F4r 1 F4 .byt $f4 +0002F5r 1 F5 .byt $f5 +0002F6r 1 F6 .byt $f6 +0002F7r 1 F7 .byt $f7 +0002F8r 1 F8 .byt $f8 +0002F9r 1 F9 .byt $f9 +0002FAr 1 FA .byt $fa +0002FBr 1 FB .byt $fb +0002FCr 1 FC .byt $fc +0002FDr 1 FD .byt $fd +0002FEr 1 FE .byt $fe +0002FFr 1 FF .byt $ff +000300r 1 +000300r 1 ; hex values, uppercase +000300r 1 00 .byt $0 +000301r 1 01 .byt $1 +000302r 1 02 .byt $2 +000303r 1 03 .byt $3 +000304r 1 04 .byt $4 +000305r 1 05 .byt $5 +000306r 1 06 .byt $6 +000307r 1 07 .byt $7 +000308r 1 08 .byt $8 +000309r 1 09 .byt $9 +00030Ar 1 0A .byt $A +00030Br 1 0B .byt $B +00030Cr 1 0C .byt $C +00030Dr 1 0D .byt $D +00030Er 1 0E .byt $E +00030Fr 1 0F .byt $F +000310r 1 10 .byt $10 +000311r 1 11 .byt $11 +000312r 1 12 .byt $12 +000313r 1 13 .byt $13 +000314r 1 14 .byt $14 +000315r 1 15 .byt $15 +000316r 1 16 .byt $16 +000317r 1 17 .byt $17 +000318r 1 18 .byt $18 +000319r 1 19 .byt $19 +00031Ar 1 1A .byt $1A +00031Br 1 1B .byt $1B +00031Cr 1 1C .byt $1C +00031Dr 1 1D .byt $1D +00031Er 1 1E .byt $1E +00031Fr 1 1F .byt $1F +000320r 1 20 .byt $20 +000321r 1 21 .byt $21 +000322r 1 22 .byt $22 +000323r 1 23 .byt $23 +000324r 1 24 .byt $24 +000325r 1 25 .byt $25 +000326r 1 26 .byt $26 +000327r 1 27 .byt $27 +000328r 1 28 .byt $28 +000329r 1 29 .byt $29 +00032Ar 1 2A .byt $2A +00032Br 1 2B .byt $2B +00032Cr 1 2C .byt $2C +00032Dr 1 2D .byt $2D +00032Er 1 2E .byt $2E +00032Fr 1 2F .byt $2F +000330r 1 30 .byt $30 +000331r 1 31 .byt $31 +000332r 1 32 .byt $32 +000333r 1 33 .byt $33 +000334r 1 34 .byt $34 +000335r 1 35 .byt $35 +000336r 1 36 .byt $36 +000337r 1 37 .byt $37 +000338r 1 38 .byt $38 +000339r 1 39 .byt $39 +00033Ar 1 3A .byt $3A +00033Br 1 3B .byt $3B +00033Cr 1 3C .byt $3C +00033Dr 1 3D .byt $3D +00033Er 1 3E .byt $3E +00033Fr 1 3F .byt $3F +000340r 1 40 .byt $40 +000341r 1 41 .byt $41 +000342r 1 42 .byt $42 +000343r 1 43 .byt $43 +000344r 1 44 .byt $44 +000345r 1 45 .byt $45 +000346r 1 46 .byt $46 +000347r 1 47 .byt $47 +000348r 1 48 .byt $48 +000349r 1 49 .byt $49 +00034Ar 1 4A .byt $4A +00034Br 1 4B .byt $4B +00034Cr 1 4C .byt $4C +00034Dr 1 4D .byt $4D +00034Er 1 4E .byt $4E +00034Fr 1 4F .byt $4F +000350r 1 50 .byt $50 +000351r 1 51 .byt $51 +000352r 1 52 .byt $52 +000353r 1 53 .byt $53 +000354r 1 54 .byt $54 +000355r 1 55 .byt $55 +000356r 1 56 .byt $56 +000357r 1 57 .byt $57 +000358r 1 58 .byt $58 +000359r 1 59 .byt $59 +00035Ar 1 5A .byt $5A +00035Br 1 5B .byt $5B +00035Cr 1 5C .byt $5C +00035Dr 1 5D .byt $5D +00035Er 1 5E .byt $5E +00035Fr 1 5F .byt $5F +000360r 1 60 .byt $60 +000361r 1 61 .byt $61 +000362r 1 62 .byt $62 +000363r 1 63 .byt $63 +000364r 1 64 .byt $64 +000365r 1 65 .byt $65 +000366r 1 66 .byt $66 +000367r 1 67 .byt $67 +000368r 1 68 .byt $68 +000369r 1 69 .byt $69 +00036Ar 1 6A .byt $6A +00036Br 1 6B .byt $6B +00036Cr 1 6C .byt $6C +00036Dr 1 6D .byt $6D +00036Er 1 6E .byt $6E +00036Fr 1 6F .byt $6F +000370r 1 70 .byt $70 +000371r 1 71 .byt $71 +000372r 1 72 .byt $72 +000373r 1 73 .byt $73 +000374r 1 74 .byt $74 +000375r 1 75 .byt $75 +000376r 1 76 .byt $76 +000377r 1 77 .byt $77 +000378r 1 78 .byt $78 +000379r 1 79 .byt $79 +00037Ar 1 7A .byt $7A +00037Br 1 7B .byt $7B +00037Cr 1 7C .byt $7C +00037Dr 1 7D .byt $7D +00037Er 1 7E .byt $7E +00037Fr 1 7F .byt $7F +000380r 1 80 .byt $80 +000381r 1 81 .byt $81 +000382r 1 82 .byt $82 +000383r 1 83 .byt $83 +000384r 1 84 .byt $84 +000385r 1 85 .byt $85 +000386r 1 86 .byt $86 +000387r 1 87 .byt $87 +000388r 1 88 .byt $88 +000389r 1 89 .byt $89 +00038Ar 1 8A .byt $8A +00038Br 1 8B .byt $8B +00038Cr 1 8C .byt $8C +00038Dr 1 8D .byt $8D +00038Er 1 8E .byt $8E +00038Fr 1 8F .byt $8F +000390r 1 90 .byt $90 +000391r 1 91 .byt $91 +000392r 1 92 .byt $92 +000393r 1 93 .byt $93 +000394r 1 94 .byt $94 +000395r 1 95 .byt $95 +000396r 1 96 .byt $96 +000397r 1 97 .byt $97 +000398r 1 98 .byt $98 +000399r 1 99 .byt $99 +00039Ar 1 9A .byt $9A +00039Br 1 9B .byt $9B +00039Cr 1 9C .byt $9C +00039Dr 1 9D .byt $9D +00039Er 1 9E .byt $9E +00039Fr 1 9F .byt $9F +0003A0r 1 A0 .byt $A0 +0003A1r 1 A1 .byt $A1 +0003A2r 1 A2 .byt $A2 +0003A3r 1 A3 .byt $A3 +0003A4r 1 A4 .byt $A4 +0003A5r 1 A5 .byt $A5 +0003A6r 1 A6 .byt $A6 +0003A7r 1 A7 .byt $A7 +0003A8r 1 A8 .byt $A8 +0003A9r 1 A9 .byt $A9 +0003AAr 1 AA .byt $AA +0003ABr 1 AB .byt $AB +0003ACr 1 AC .byt $AC +0003ADr 1 AD .byt $AD +0003AEr 1 AE .byt $AE +0003AFr 1 AF .byt $AF +0003B0r 1 B0 .byt $B0 +0003B1r 1 B1 .byt $B1 +0003B2r 1 B2 .byt $B2 +0003B3r 1 B3 .byt $B3 +0003B4r 1 B4 .byt $B4 +0003B5r 1 B5 .byt $B5 +0003B6r 1 B6 .byt $B6 +0003B7r 1 B7 .byt $B7 +0003B8r 1 B8 .byt $B8 +0003B9r 1 B9 .byt $B9 +0003BAr 1 BA .byt $BA +0003BBr 1 BB .byt $BB +0003BCr 1 BC .byt $BC +0003BDr 1 BD .byt $BD +0003BEr 1 BE .byt $BE +0003BFr 1 BF .byt $BF +0003C0r 1 C0 .byt $C0 +0003C1r 1 C1 .byt $C1 +0003C2r 1 C2 .byt $C2 +0003C3r 1 C3 .byt $C3 +0003C4r 1 C4 .byt $C4 +0003C5r 1 C5 .byt $C5 +0003C6r 1 C6 .byt $C6 +0003C7r 1 C7 .byt $C7 +0003C8r 1 C8 .byt $C8 +0003C9r 1 C9 .byt $C9 +0003CAr 1 CA .byt $CA +0003CBr 1 CB .byt $CB +0003CCr 1 CC .byt $CC +0003CDr 1 CD .byt $CD +0003CEr 1 CE .byt $CE +0003CFr 1 CF .byt $CF +0003D0r 1 D0 .byt $D0 +0003D1r 1 D1 .byt $D1 +0003D2r 1 D2 .byt $D2 +0003D3r 1 D3 .byt $D3 +0003D4r 1 D4 .byt $D4 +0003D5r 1 D5 .byt $D5 +0003D6r 1 D6 .byt $D6 +0003D7r 1 D7 .byt $D7 +0003D8r 1 D8 .byt $D8 +0003D9r 1 D9 .byt $D9 +0003DAr 1 DA .byt $DA +0003DBr 1 DB .byt $DB +0003DCr 1 DC .byt $DC +0003DDr 1 DD .byt $DD +0003DEr 1 DE .byt $DE +0003DFr 1 DF .byt $DF +0003E0r 1 E0 .byt $E0 +0003E1r 1 E1 .byt $E1 +0003E2r 1 E2 .byt $E2 +0003E3r 1 E3 .byt $E3 +0003E4r 1 E4 .byt $E4 +0003E5r 1 E5 .byt $E5 +0003E6r 1 E6 .byt $E6 +0003E7r 1 E7 .byt $E7 +0003E8r 1 E8 .byt $E8 +0003E9r 1 E9 .byt $E9 +0003EAr 1 EA .byt $EA +0003EBr 1 EB .byt $EB +0003ECr 1 EC .byt $EC +0003EDr 1 ED .byt $ED +0003EEr 1 EE .byt $EE +0003EFr 1 EF .byt $EF +0003F0r 1 F0 .byt $F0 +0003F1r 1 F1 .byt $F1 +0003F2r 1 F2 .byt $F2 +0003F3r 1 F3 .byt $F3 +0003F4r 1 F4 .byt $F4 +0003F5r 1 F5 .byt $F5 +0003F6r 1 F6 .byt $F6 +0003F7r 1 F7 .byt $F7 +0003F8r 1 F8 .byt $F8 +0003F9r 1 F9 .byt $F9 +0003FAr 1 FA .byt $FA +0003FBr 1 FB .byt $FB +0003FCr 1 FC .byt $FC +0003FDr 1 FD .byt $FD +0003FEr 1 FE .byt $FE +0003FFr 1 FF .byt $FF +000400r 1 +000400r 1 ; 2-digit hex values +000400r 1 00 .byt $00 +000401r 1 01 .byt $01 +000402r 1 02 .byt $02 +000403r 1 03 .byt $03 +000404r 1 04 .byt $04 +000405r 1 05 .byt $05 +000406r 1 06 .byt $06 +000407r 1 07 .byt $07 +000408r 1 08 .byt $08 +000409r 1 09 .byt $09 +00040Ar 1 0A .byt $0a +00040Br 1 0B .byt $0b +00040Cr 1 0C .byt $0c +00040Dr 1 0D .byt $0d +00040Er 1 0E .byt $0e +00040Fr 1 0F .byt $0f +000410r 1 10 .byt $10 +000411r 1 11 .byt $11 +000412r 1 12 .byt $12 +000413r 1 13 .byt $13 +000414r 1 14 .byt $14 +000415r 1 15 .byt $15 +000416r 1 16 .byt $16 +000417r 1 17 .byt $17 +000418r 1 18 .byt $18 +000419r 1 19 .byt $19 +00041Ar 1 1A .byt $1a +00041Br 1 1B .byt $1b +00041Cr 1 1C .byt $1c +00041Dr 1 1D .byt $1d +00041Er 1 1E .byt $1e +00041Fr 1 1F .byt $1f +000420r 1 20 .byt $20 +000421r 1 21 .byt $21 +000422r 1 22 .byt $22 +000423r 1 23 .byt $23 +000424r 1 24 .byt $24 +000425r 1 25 .byt $25 +000426r 1 26 .byt $26 +000427r 1 27 .byt $27 +000428r 1 28 .byt $28 +000429r 1 29 .byt $29 +00042Ar 1 2A .byt $2a +00042Br 1 2B .byt $2b +00042Cr 1 2C .byt $2c +00042Dr 1 2D .byt $2d +00042Er 1 2E .byt $2e +00042Fr 1 2F .byt $2f +000430r 1 30 .byt $30 +000431r 1 31 .byt $31 +000432r 1 32 .byt $32 +000433r 1 33 .byt $33 +000434r 1 34 .byt $34 +000435r 1 35 .byt $35 +000436r 1 36 .byt $36 +000437r 1 37 .byt $37 +000438r 1 38 .byt $38 +000439r 1 39 .byt $39 +00043Ar 1 3A .byt $3a +00043Br 1 3B .byt $3b +00043Cr 1 3C .byt $3c +00043Dr 1 3D .byt $3d +00043Er 1 3E .byt $3e +00043Fr 1 3F .byt $3f +000440r 1 40 .byt $40 +000441r 1 41 .byt $41 +000442r 1 42 .byt $42 +000443r 1 43 .byt $43 +000444r 1 44 .byt $44 +000445r 1 45 .byt $45 +000446r 1 46 .byt $46 +000447r 1 47 .byt $47 +000448r 1 48 .byt $48 +000449r 1 49 .byt $49 +00044Ar 1 4A .byt $4a +00044Br 1 4B .byt $4b +00044Cr 1 4C .byt $4c +00044Dr 1 4D .byt $4d +00044Er 1 4E .byt $4e +00044Fr 1 4F .byt $4f +000450r 1 50 .byt $50 +000451r 1 51 .byt $51 +000452r 1 52 .byt $52 +000453r 1 53 .byt $53 +000454r 1 54 .byt $54 +000455r 1 55 .byt $55 +000456r 1 56 .byt $56 +000457r 1 57 .byt $57 +000458r 1 58 .byt $58 +000459r 1 59 .byt $59 +00045Ar 1 5A .byt $5a +00045Br 1 5B .byt $5b +00045Cr 1 5C .byt $5c +00045Dr 1 5D .byt $5d +00045Er 1 5E .byt $5e +00045Fr 1 5F .byt $5f +000460r 1 60 .byt $60 +000461r 1 61 .byt $61 +000462r 1 62 .byt $62 +000463r 1 63 .byt $63 +000464r 1 64 .byt $64 +000465r 1 65 .byt $65 +000466r 1 66 .byt $66 +000467r 1 67 .byt $67 +000468r 1 68 .byt $68 +000469r 1 69 .byt $69 +00046Ar 1 6A .byt $6a +00046Br 1 6B .byt $6b +00046Cr 1 6C .byt $6c +00046Dr 1 6D .byt $6d +00046Er 1 6E .byt $6e +00046Fr 1 6F .byt $6f +000470r 1 70 .byt $70 +000471r 1 71 .byt $71 +000472r 1 72 .byt $72 +000473r 1 73 .byt $73 +000474r 1 74 .byt $74 +000475r 1 75 .byt $75 +000476r 1 76 .byt $76 +000477r 1 77 .byt $77 +000478r 1 78 .byt $78 +000479r 1 79 .byt $79 +00047Ar 1 7A .byt $7a +00047Br 1 7B .byt $7b +00047Cr 1 7C .byt $7c +00047Dr 1 7D .byt $7d +00047Er 1 7E .byt $7e +00047Fr 1 7F .byt $7f +000480r 1 80 .byt $80 +000481r 1 81 .byt $81 +000482r 1 82 .byt $82 +000483r 1 83 .byt $83 +000484r 1 84 .byt $84 +000485r 1 85 .byt $85 +000486r 1 86 .byt $86 +000487r 1 87 .byt $87 +000488r 1 88 .byt $88 +000489r 1 89 .byt $89 +00048Ar 1 8A .byt $8a +00048Br 1 8B .byt $8b +00048Cr 1 8C .byt $8c +00048Dr 1 8D .byt $8d +00048Er 1 8E .byt $8e +00048Fr 1 8F .byt $8f +000490r 1 90 .byt $90 +000491r 1 91 .byt $91 +000492r 1 92 .byt $92 +000493r 1 93 .byt $93 +000494r 1 94 .byt $94 +000495r 1 95 .byt $95 +000496r 1 96 .byt $96 +000497r 1 97 .byt $97 +000498r 1 98 .byt $98 +000499r 1 99 .byt $99 +00049Ar 1 9A .byt $9a +00049Br 1 9B .byt $9b +00049Cr 1 9C .byt $9c +00049Dr 1 9D .byt $9d +00049Er 1 9E .byt $9e +00049Fr 1 9F .byt $9f +0004A0r 1 A0 .byt $a0 +0004A1r 1 A1 .byt $a1 +0004A2r 1 A2 .byt $a2 +0004A3r 1 A3 .byt $a3 +0004A4r 1 A4 .byt $a4 +0004A5r 1 A5 .byt $a5 +0004A6r 1 A6 .byt $a6 +0004A7r 1 A7 .byt $a7 +0004A8r 1 A8 .byt $a8 +0004A9r 1 A9 .byt $a9 +0004AAr 1 AA .byt $aa +0004ABr 1 AB .byt $ab +0004ACr 1 AC .byt $ac +0004ADr 1 AD .byt $ad +0004AEr 1 AE .byt $ae +0004AFr 1 AF .byt $af +0004B0r 1 B0 .byt $b0 +0004B1r 1 B1 .byt $b1 +0004B2r 1 B2 .byt $b2 +0004B3r 1 B3 .byt $b3 +0004B4r 1 B4 .byt $b4 +0004B5r 1 B5 .byt $b5 +0004B6r 1 B6 .byt $b6 +0004B7r 1 B7 .byt $b7 +0004B8r 1 B8 .byt $b8 +0004B9r 1 B9 .byt $b9 +0004BAr 1 BA .byt $ba +0004BBr 1 BB .byt $bb +0004BCr 1 BC .byt $bc +0004BDr 1 BD .byt $bd +0004BEr 1 BE .byt $be +0004BFr 1 BF .byt $bf +0004C0r 1 C0 .byt $c0 +0004C1r 1 C1 .byt $c1 +0004C2r 1 C2 .byt $c2 +0004C3r 1 C3 .byt $c3 +0004C4r 1 C4 .byt $c4 +0004C5r 1 C5 .byt $c5 +0004C6r 1 C6 .byt $c6 +0004C7r 1 C7 .byt $c7 +0004C8r 1 C8 .byt $c8 +0004C9r 1 C9 .byt $c9 +0004CAr 1 CA .byt $ca +0004CBr 1 CB .byt $cb +0004CCr 1 CC .byt $cc +0004CDr 1 CD .byt $cd +0004CEr 1 CE .byt $ce +0004CFr 1 CF .byt $cf +0004D0r 1 D0 .byt $d0 +0004D1r 1 D1 .byt $d1 +0004D2r 1 D2 .byt $d2 +0004D3r 1 D3 .byt $d3 +0004D4r 1 D4 .byt $d4 +0004D5r 1 D5 .byt $d5 +0004D6r 1 D6 .byt $d6 +0004D7r 1 D7 .byt $d7 +0004D8r 1 D8 .byt $d8 +0004D9r 1 D9 .byt $d9 +0004DAr 1 DA .byt $da +0004DBr 1 DB .byt $db +0004DCr 1 DC .byt $dc +0004DDr 1 DD .byt $dd +0004DEr 1 DE .byt $de +0004DFr 1 DF .byt $df +0004E0r 1 E0 .byt $e0 +0004E1r 1 E1 .byt $e1 +0004E2r 1 E2 .byt $e2 +0004E3r 1 E3 .byt $e3 +0004E4r 1 E4 .byt $e4 +0004E5r 1 E5 .byt $e5 +0004E6r 1 E6 .byt $e6 +0004E7r 1 E7 .byt $e7 +0004E8r 1 E8 .byt $e8 +0004E9r 1 E9 .byt $e9 +0004EAr 1 EA .byt $ea +0004EBr 1 EB .byt $eb +0004ECr 1 EC .byt $ec +0004EDr 1 ED .byt $ed +0004EEr 1 EE .byt $ee +0004EFr 1 EF .byt $ef +0004F0r 1 F0 .byt $f0 +0004F1r 1 F1 .byt $f1 +0004F2r 1 F2 .byt $f2 +0004F3r 1 F3 .byt $f3 +0004F4r 1 F4 .byt $f4 +0004F5r 1 F5 .byt $f5 +0004F6r 1 F6 .byt $f6 +0004F7r 1 F7 .byt $f7 +0004F8r 1 F8 .byt $f8 +0004F9r 1 F9 .byt $f9 +0004FAr 1 FA .byt $fa +0004FBr 1 FB .byt $fb +0004FCr 1 FC .byt $fc +0004FDr 1 FD .byt $fd +0004FEr 1 FE .byt $fe +0004FFr 1 FF .byt $ff +000500r 1 +000500r 1 ; 2-digit hex values, uppercase +000500r 1 00 .byt $00 +000501r 1 01 .byt $01 +000502r 1 02 .byt $02 +000503r 1 03 .byt $03 +000504r 1 04 .byt $04 +000505r 1 05 .byt $05 +000506r 1 06 .byt $06 +000507r 1 07 .byt $07 +000508r 1 08 .byt $08 +000509r 1 09 .byt $09 +00050Ar 1 0A .byt $0A +00050Br 1 0B .byt $0B +00050Cr 1 0C .byt $0C +00050Dr 1 0D .byt $0D +00050Er 1 0E .byt $0E +00050Fr 1 0F .byt $0F +000510r 1 10 .byt $10 +000511r 1 11 .byt $11 +000512r 1 12 .byt $12 +000513r 1 13 .byt $13 +000514r 1 14 .byt $14 +000515r 1 15 .byt $15 +000516r 1 16 .byt $16 +000517r 1 17 .byt $17 +000518r 1 18 .byt $18 +000519r 1 19 .byt $19 +00051Ar 1 1A .byt $1A +00051Br 1 1B .byt $1B +00051Cr 1 1C .byt $1C +00051Dr 1 1D .byt $1D +00051Er 1 1E .byt $1E +00051Fr 1 1F .byt $1F +000520r 1 20 .byt $20 +000521r 1 21 .byt $21 +000522r 1 22 .byt $22 +000523r 1 23 .byt $23 +000524r 1 24 .byt $24 +000525r 1 25 .byt $25 +000526r 1 26 .byt $26 +000527r 1 27 .byt $27 +000528r 1 28 .byt $28 +000529r 1 29 .byt $29 +00052Ar 1 2A .byt $2A +00052Br 1 2B .byt $2B +00052Cr 1 2C .byt $2C +00052Dr 1 2D .byt $2D +00052Er 1 2E .byt $2E +00052Fr 1 2F .byt $2F +000530r 1 30 .byt $30 +000531r 1 31 .byt $31 +000532r 1 32 .byt $32 +000533r 1 33 .byt $33 +000534r 1 34 .byt $34 +000535r 1 35 .byt $35 +000536r 1 36 .byt $36 +000537r 1 37 .byt $37 +000538r 1 38 .byt $38 +000539r 1 39 .byt $39 +00053Ar 1 3A .byt $3A +00053Br 1 3B .byt $3B +00053Cr 1 3C .byt $3C +00053Dr 1 3D .byt $3D +00053Er 1 3E .byt $3E +00053Fr 1 3F .byt $3F +000540r 1 40 .byt $40 +000541r 1 41 .byt $41 +000542r 1 42 .byt $42 +000543r 1 43 .byt $43 +000544r 1 44 .byt $44 +000545r 1 45 .byt $45 +000546r 1 46 .byt $46 +000547r 1 47 .byt $47 +000548r 1 48 .byt $48 +000549r 1 49 .byt $49 +00054Ar 1 4A .byt $4A +00054Br 1 4B .byt $4B +00054Cr 1 4C .byt $4C +00054Dr 1 4D .byt $4D +00054Er 1 4E .byt $4E +00054Fr 1 4F .byt $4F +000550r 1 50 .byt $50 +000551r 1 51 .byt $51 +000552r 1 52 .byt $52 +000553r 1 53 .byt $53 +000554r 1 54 .byt $54 +000555r 1 55 .byt $55 +000556r 1 56 .byt $56 +000557r 1 57 .byt $57 +000558r 1 58 .byt $58 +000559r 1 59 .byt $59 +00055Ar 1 5A .byt $5A +00055Br 1 5B .byt $5B +00055Cr 1 5C .byt $5C +00055Dr 1 5D .byt $5D +00055Er 1 5E .byt $5E +00055Fr 1 5F .byt $5F +000560r 1 60 .byt $60 +000561r 1 61 .byt $61 +000562r 1 62 .byt $62 +000563r 1 63 .byt $63 +000564r 1 64 .byt $64 +000565r 1 65 .byt $65 +000566r 1 66 .byt $66 +000567r 1 67 .byt $67 +000568r 1 68 .byt $68 +000569r 1 69 .byt $69 +00056Ar 1 6A .byt $6A +00056Br 1 6B .byt $6B +00056Cr 1 6C .byt $6C +00056Dr 1 6D .byt $6D +00056Er 1 6E .byt $6E +00056Fr 1 6F .byt $6F +000570r 1 70 .byt $70 +000571r 1 71 .byt $71 +000572r 1 72 .byt $72 +000573r 1 73 .byt $73 +000574r 1 74 .byt $74 +000575r 1 75 .byt $75 +000576r 1 76 .byt $76 +000577r 1 77 .byt $77 +000578r 1 78 .byt $78 +000579r 1 79 .byt $79 +00057Ar 1 7A .byt $7A +00057Br 1 7B .byt $7B +00057Cr 1 7C .byt $7C +00057Dr 1 7D .byt $7D +00057Er 1 7E .byt $7E +00057Fr 1 7F .byt $7F +000580r 1 80 .byt $80 +000581r 1 81 .byt $81 +000582r 1 82 .byt $82 +000583r 1 83 .byt $83 +000584r 1 84 .byt $84 +000585r 1 85 .byt $85 +000586r 1 86 .byt $86 +000587r 1 87 .byt $87 +000588r 1 88 .byt $88 +000589r 1 89 .byt $89 +00058Ar 1 8A .byt $8A +00058Br 1 8B .byt $8B +00058Cr 1 8C .byt $8C +00058Dr 1 8D .byt $8D +00058Er 1 8E .byt $8E +00058Fr 1 8F .byt $8F +000590r 1 90 .byt $90 +000591r 1 91 .byt $91 +000592r 1 92 .byt $92 +000593r 1 93 .byt $93 +000594r 1 94 .byt $94 +000595r 1 95 .byt $95 +000596r 1 96 .byt $96 +000597r 1 97 .byt $97 +000598r 1 98 .byt $98 +000599r 1 99 .byt $99 +00059Ar 1 9A .byt $9A +00059Br 1 9B .byt $9B +00059Cr 1 9C .byt $9C +00059Dr 1 9D .byt $9D +00059Er 1 9E .byt $9E +00059Fr 1 9F .byt $9F +0005A0r 1 A0 .byt $A0 +0005A1r 1 A1 .byt $A1 +0005A2r 1 A2 .byt $A2 +0005A3r 1 A3 .byt $A3 +0005A4r 1 A4 .byt $A4 +0005A5r 1 A5 .byt $A5 +0005A6r 1 A6 .byt $A6 +0005A7r 1 A7 .byt $A7 +0005A8r 1 A8 .byt $A8 +0005A9r 1 A9 .byt $A9 +0005AAr 1 AA .byt $AA +0005ABr 1 AB .byt $AB +0005ACr 1 AC .byt $AC +0005ADr 1 AD .byt $AD +0005AEr 1 AE .byt $AE +0005AFr 1 AF .byt $AF +0005B0r 1 B0 .byt $B0 +0005B1r 1 B1 .byt $B1 +0005B2r 1 B2 .byt $B2 +0005B3r 1 B3 .byt $B3 +0005B4r 1 B4 .byt $B4 +0005B5r 1 B5 .byt $B5 +0005B6r 1 B6 .byt $B6 +0005B7r 1 B7 .byt $B7 +0005B8r 1 B8 .byt $B8 +0005B9r 1 B9 .byt $B9 +0005BAr 1 BA .byt $BA +0005BBr 1 BB .byt $BB +0005BCr 1 BC .byt $BC +0005BDr 1 BD .byt $BD +0005BEr 1 BE .byt $BE +0005BFr 1 BF .byt $BF +0005C0r 1 C0 .byt $C0 +0005C1r 1 C1 .byt $C1 +0005C2r 1 C2 .byt $C2 +0005C3r 1 C3 .byt $C3 +0005C4r 1 C4 .byt $C4 +0005C5r 1 C5 .byt $C5 +0005C6r 1 C6 .byt $C6 +0005C7r 1 C7 .byt $C7 +0005C8r 1 C8 .byt $C8 +0005C9r 1 C9 .byt $C9 +0005CAr 1 CA .byt $CA +0005CBr 1 CB .byt $CB +0005CCr 1 CC .byt $CC +0005CDr 1 CD .byt $CD +0005CEr 1 CE .byt $CE +0005CFr 1 CF .byt $CF +0005D0r 1 D0 .byt $D0 +0005D1r 1 D1 .byt $D1 +0005D2r 1 D2 .byt $D2 +0005D3r 1 D3 .byt $D3 +0005D4r 1 D4 .byt $D4 +0005D5r 1 D5 .byt $D5 +0005D6r 1 D6 .byt $D6 +0005D7r 1 D7 .byt $D7 +0005D8r 1 D8 .byt $D8 +0005D9r 1 D9 .byt $D9 +0005DAr 1 DA .byt $DA +0005DBr 1 DB .byt $DB +0005DCr 1 DC .byt $DC +0005DDr 1 DD .byt $DD +0005DEr 1 DE .byt $DE +0005DFr 1 DF .byt $DF +0005E0r 1 E0 .byt $E0 +0005E1r 1 E1 .byt $E1 +0005E2r 1 E2 .byt $E2 +0005E3r 1 E3 .byt $E3 +0005E4r 1 E4 .byt $E4 +0005E5r 1 E5 .byt $E5 +0005E6r 1 E6 .byt $E6 +0005E7r 1 E7 .byt $E7 +0005E8r 1 E8 .byt $E8 +0005E9r 1 E9 .byt $E9 +0005EAr 1 EA .byt $EA +0005EBr 1 EB .byt $EB +0005ECr 1 EC .byt $EC +0005EDr 1 ED .byt $ED +0005EEr 1 EE .byt $EE +0005EFr 1 EF .byt $EF +0005F0r 1 F0 .byt $F0 +0005F1r 1 F1 .byt $F1 +0005F2r 1 F2 .byt $F2 +0005F3r 1 F3 .byt $F3 +0005F4r 1 F4 .byt $F4 +0005F5r 1 F5 .byt $F5 +0005F6r 1 F6 .byt $F6 +0005F7r 1 F7 .byt $F7 +0005F8r 1 F8 .byt $F8 +0005F9r 1 F9 .byt $F9 +0005FAr 1 FA .byt $FA +0005FBr 1 FB .byt $FB +0005FCr 1 FC .byt $FC +0005FDr 1 FD .byt $FD +0005FEr 1 FE .byt $FE +0005FFr 1 FF .byt $FF +000600r 1 +000600r 1 ; alternative hex values +000600r 1 00 .byt 0h +000601r 1 01 .byt 1h +000602r 1 02 .byt 2h +000603r 1 03 .byt 3h +000604r 1 04 .byt 4h +000605r 1 05 .byt 5h +000606r 1 06 .byt 6h +000607r 1 07 .byt 7h +000608r 1 08 .byt 8h +000609r 1 09 .byt 9h +00060Ar 1 0A .byt 0ah +00060Br 1 0B .byt 0bh +00060Cr 1 0C .byt 0ch +00060Dr 1 0D .byt 0dh +00060Er 1 0E .byt 0eh +00060Fr 1 0F .byt 0fh +000610r 1 10 .byt 10h +000611r 1 11 .byt 11h +000612r 1 12 .byt 12h +000613r 1 13 .byt 13h +000614r 1 14 .byt 14h +000615r 1 15 .byt 15h +000616r 1 16 .byt 16h +000617r 1 17 .byt 17h +000618r 1 18 .byt 18h +000619r 1 19 .byt 19h +00061Ar 1 1A .byt 1ah +00061Br 1 1B .byt 1bh +00061Cr 1 1C .byt 1ch +00061Dr 1 1D .byt 1dh +00061Er 1 1E .byt 1eh +00061Fr 1 1F .byt 1fh +000620r 1 20 .byt 20h +000621r 1 21 .byt 21h +000622r 1 22 .byt 22h +000623r 1 23 .byt 23h +000624r 1 24 .byt 24h +000625r 1 25 .byt 25h +000626r 1 26 .byt 26h +000627r 1 27 .byt 27h +000628r 1 28 .byt 28h +000629r 1 29 .byt 29h +00062Ar 1 2A .byt 2ah +00062Br 1 2B .byt 2bh +00062Cr 1 2C .byt 2ch +00062Dr 1 2D .byt 2dh +00062Er 1 2E .byt 2eh +00062Fr 1 2F .byt 2fh +000630r 1 30 .byt 30h +000631r 1 31 .byt 31h +000632r 1 32 .byt 32h +000633r 1 33 .byt 33h +000634r 1 34 .byt 34h +000635r 1 35 .byt 35h +000636r 1 36 .byt 36h +000637r 1 37 .byt 37h +000638r 1 38 .byt 38h +000639r 1 39 .byt 39h +00063Ar 1 3A .byt 3ah +00063Br 1 3B .byt 3bh +00063Cr 1 3C .byt 3ch +00063Dr 1 3D .byt 3dh +00063Er 1 3E .byt 3eh +00063Fr 1 3F .byt 3fh +000640r 1 40 .byt 40h +000641r 1 41 .byt 41h +000642r 1 42 .byt 42h +000643r 1 43 .byt 43h +000644r 1 44 .byt 44h +000645r 1 45 .byt 45h +000646r 1 46 .byt 46h +000647r 1 47 .byt 47h +000648r 1 48 .byt 48h +000649r 1 49 .byt 49h +00064Ar 1 4A .byt 4ah +00064Br 1 4B .byt 4bh +00064Cr 1 4C .byt 4ch +00064Dr 1 4D .byt 4dh +00064Er 1 4E .byt 4eh +00064Fr 1 4F .byt 4fh +000650r 1 50 .byt 50h +000651r 1 51 .byt 51h +000652r 1 52 .byt 52h +000653r 1 53 .byt 53h +000654r 1 54 .byt 54h +000655r 1 55 .byt 55h +000656r 1 56 .byt 56h +000657r 1 57 .byt 57h +000658r 1 58 .byt 58h +000659r 1 59 .byt 59h +00065Ar 1 5A .byt 5ah +00065Br 1 5B .byt 5bh +00065Cr 1 5C .byt 5ch +00065Dr 1 5D .byt 5dh +00065Er 1 5E .byt 5eh +00065Fr 1 5F .byt 5fh +000660r 1 60 .byt 60h +000661r 1 61 .byt 61h +000662r 1 62 .byt 62h +000663r 1 63 .byt 63h +000664r 1 64 .byt 64h +000665r 1 65 .byt 65h +000666r 1 66 .byt 66h +000667r 1 67 .byt 67h +000668r 1 68 .byt 68h +000669r 1 69 .byt 69h +00066Ar 1 6A .byt 6ah +00066Br 1 6B .byt 6bh +00066Cr 1 6C .byt 6ch +00066Dr 1 6D .byt 6dh +00066Er 1 6E .byt 6eh +00066Fr 1 6F .byt 6fh +000670r 1 70 .byt 70h +000671r 1 71 .byt 71h +000672r 1 72 .byt 72h +000673r 1 73 .byt 73h +000674r 1 74 .byt 74h +000675r 1 75 .byt 75h +000676r 1 76 .byt 76h +000677r 1 77 .byt 77h +000678r 1 78 .byt 78h +000679r 1 79 .byt 79h +00067Ar 1 7A .byt 7ah +00067Br 1 7B .byt 7bh +00067Cr 1 7C .byt 7ch +00067Dr 1 7D .byt 7dh +00067Er 1 7E .byt 7eh +00067Fr 1 7F .byt 7fh +000680r 1 80 .byt 80h +000681r 1 81 .byt 81h +000682r 1 82 .byt 82h +000683r 1 83 .byt 83h +000684r 1 84 .byt 84h +000685r 1 85 .byt 85h +000686r 1 86 .byt 86h +000687r 1 87 .byt 87h +000688r 1 88 .byt 88h +000689r 1 89 .byt 89h +00068Ar 1 8A .byt 8ah +00068Br 1 8B .byt 8bh +00068Cr 1 8C .byt 8ch +00068Dr 1 8D .byt 8dh +00068Er 1 8E .byt 8eh +00068Fr 1 8F .byt 8fh +000690r 1 90 .byt 90h +000691r 1 91 .byt 91h +000692r 1 92 .byt 92h +000693r 1 93 .byt 93h +000694r 1 94 .byt 94h +000695r 1 95 .byt 95h +000696r 1 96 .byt 96h +000697r 1 97 .byt 97h +000698r 1 98 .byt 98h +000699r 1 99 .byt 99h +00069Ar 1 9A .byt 9ah +00069Br 1 9B .byt 9bh +00069Cr 1 9C .byt 9ch +00069Dr 1 9D .byt 9dh +00069Er 1 9E .byt 9eh +00069Fr 1 9F .byt 9fh +0006A0r 1 A0 .byt 0a0h +0006A1r 1 A1 .byt 0a1h +0006A2r 1 A2 .byt 0a2h +0006A3r 1 A3 .byt 0a3h +0006A4r 1 A4 .byt 0a4h +0006A5r 1 A5 .byt 0a5h +0006A6r 1 A6 .byt 0a6h +0006A7r 1 A7 .byt 0a7h +0006A8r 1 A8 .byt 0a8h +0006A9r 1 A9 .byt 0a9h +0006AAr 1 AA .byt 0aah +0006ABr 1 AB .byt 0abh +0006ACr 1 AC .byt 0ach +0006ADr 1 AD .byt 0adh +0006AEr 1 AE .byt 0aeh +0006AFr 1 AF .byt 0afh +0006B0r 1 B0 .byt 0b0h +0006B1r 1 B1 .byt 0b1h +0006B2r 1 B2 .byt 0b2h +0006B3r 1 B3 .byt 0b3h +0006B4r 1 B4 .byt 0b4h +0006B5r 1 B5 .byt 0b5h +0006B6r 1 B6 .byt 0b6h +0006B7r 1 B7 .byt 0b7h +0006B8r 1 B8 .byt 0b8h +0006B9r 1 B9 .byt 0b9h +0006BAr 1 BA .byt 0bah +0006BBr 1 BB .byt 0bbh +0006BCr 1 BC .byt 0bch +0006BDr 1 BD .byt 0bdh +0006BEr 1 BE .byt 0beh +0006BFr 1 BF .byt 0bfh +0006C0r 1 C0 .byt 0c0h +0006C1r 1 C1 .byt 0c1h +0006C2r 1 C2 .byt 0c2h +0006C3r 1 C3 .byt 0c3h +0006C4r 1 C4 .byt 0c4h +0006C5r 1 C5 .byt 0c5h +0006C6r 1 C6 .byt 0c6h +0006C7r 1 C7 .byt 0c7h +0006C8r 1 C8 .byt 0c8h +0006C9r 1 C9 .byt 0c9h +0006CAr 1 CA .byt 0cah +0006CBr 1 CB .byt 0cbh +0006CCr 1 CC .byt 0cch +0006CDr 1 CD .byt 0cdh +0006CEr 1 CE .byt 0ceh +0006CFr 1 CF .byt 0cfh +0006D0r 1 D0 .byt 0d0h +0006D1r 1 D1 .byt 0d1h +0006D2r 1 D2 .byt 0d2h +0006D3r 1 D3 .byt 0d3h +0006D4r 1 D4 .byt 0d4h +0006D5r 1 D5 .byt 0d5h +0006D6r 1 D6 .byt 0d6h +0006D7r 1 D7 .byt 0d7h +0006D8r 1 D8 .byt 0d8h +0006D9r 1 D9 .byt 0d9h +0006DAr 1 DA .byt 0dah +0006DBr 1 DB .byt 0dbh +0006DCr 1 DC .byt 0dch +0006DDr 1 DD .byt 0ddh +0006DEr 1 DE .byt 0deh +0006DFr 1 DF .byt 0dfh +0006E0r 1 E0 .byt 0e0h +0006E1r 1 E1 .byt 0e1h +0006E2r 1 E2 .byt 0e2h +0006E3r 1 E3 .byt 0e3h +0006E4r 1 E4 .byt 0e4h +0006E5r 1 E5 .byt 0e5h +0006E6r 1 E6 .byt 0e6h +0006E7r 1 E7 .byt 0e7h +0006E8r 1 E8 .byt 0e8h +0006E9r 1 E9 .byt 0e9h +0006EAr 1 EA .byt 0eah +0006EBr 1 EB .byt 0ebh +0006ECr 1 EC .byt 0ech +0006EDr 1 ED .byt 0edh +0006EEr 1 EE .byt 0eeh +0006EFr 1 EF .byt 0efh +0006F0r 1 F0 .byt 0f0h +0006F1r 1 F1 .byt 0f1h +0006F2r 1 F2 .byt 0f2h +0006F3r 1 F3 .byt 0f3h +0006F4r 1 F4 .byt 0f4h +0006F5r 1 F5 .byt 0f5h +0006F6r 1 F6 .byt 0f6h +0006F7r 1 F7 .byt 0f7h +0006F8r 1 F8 .byt 0f8h +0006F9r 1 F9 .byt 0f9h +0006FAr 1 FA .byt 0fah +0006FBr 1 FB .byt 0fbh +0006FCr 1 FC .byt 0fch +0006FDr 1 FD .byt 0fdh +0006FEr 1 FE .byt 0feh +0006FFr 1 FF .byt 0ffh +000700r 1 +000700r 1 ; alternative hex values, uppercase +000700r 1 00 .byt 0h +000701r 1 01 .byt 1h +000702r 1 02 .byt 2h +000703r 1 03 .byt 3h +000704r 1 04 .byt 4h +000705r 1 05 .byt 5h +000706r 1 06 .byt 6h +000707r 1 07 .byt 7h +000708r 1 08 .byt 8h +000709r 1 09 .byt 9h +00070Ar 1 0A .byt 0Ah +00070Br 1 0B .byt 0Bh +00070Cr 1 0C .byt 0Ch +00070Dr 1 0D .byt 0Dh +00070Er 1 0E .byt 0Eh +00070Fr 1 0F .byt 0Fh +000710r 1 10 .byt 10h +000711r 1 11 .byt 11h +000712r 1 12 .byt 12h +000713r 1 13 .byt 13h +000714r 1 14 .byt 14h +000715r 1 15 .byt 15h +000716r 1 16 .byt 16h +000717r 1 17 .byt 17h +000718r 1 18 .byt 18h +000719r 1 19 .byt 19h +00071Ar 1 1A .byt 1Ah +00071Br 1 1B .byt 1Bh +00071Cr 1 1C .byt 1Ch +00071Dr 1 1D .byt 1Dh +00071Er 1 1E .byt 1Eh +00071Fr 1 1F .byt 1Fh +000720r 1 20 .byt 20h +000721r 1 21 .byt 21h +000722r 1 22 .byt 22h +000723r 1 23 .byt 23h +000724r 1 24 .byt 24h +000725r 1 25 .byt 25h +000726r 1 26 .byt 26h +000727r 1 27 .byt 27h +000728r 1 28 .byt 28h +000729r 1 29 .byt 29h +00072Ar 1 2A .byt 2Ah +00072Br 1 2B .byt 2Bh +00072Cr 1 2C .byt 2Ch +00072Dr 1 2D .byt 2Dh +00072Er 1 2E .byt 2Eh +00072Fr 1 2F .byt 2Fh +000730r 1 30 .byt 30h +000731r 1 31 .byt 31h +000732r 1 32 .byt 32h +000733r 1 33 .byt 33h +000734r 1 34 .byt 34h +000735r 1 35 .byt 35h +000736r 1 36 .byt 36h +000737r 1 37 .byt 37h +000738r 1 38 .byt 38h +000739r 1 39 .byt 39h +00073Ar 1 3A .byt 3Ah +00073Br 1 3B .byt 3Bh +00073Cr 1 3C .byt 3Ch +00073Dr 1 3D .byt 3Dh +00073Er 1 3E .byt 3Eh +00073Fr 1 3F .byt 3Fh +000740r 1 40 .byt 40h +000741r 1 41 .byt 41h +000742r 1 42 .byt 42h +000743r 1 43 .byt 43h +000744r 1 44 .byt 44h +000745r 1 45 .byt 45h +000746r 1 46 .byt 46h +000747r 1 47 .byt 47h +000748r 1 48 .byt 48h +000749r 1 49 .byt 49h +00074Ar 1 4A .byt 4Ah +00074Br 1 4B .byt 4Bh +00074Cr 1 4C .byt 4Ch +00074Dr 1 4D .byt 4Dh +00074Er 1 4E .byt 4Eh +00074Fr 1 4F .byt 4Fh +000750r 1 50 .byt 50h +000751r 1 51 .byt 51h +000752r 1 52 .byt 52h +000753r 1 53 .byt 53h +000754r 1 54 .byt 54h +000755r 1 55 .byt 55h +000756r 1 56 .byt 56h +000757r 1 57 .byt 57h +000758r 1 58 .byt 58h +000759r 1 59 .byt 59h +00075Ar 1 5A .byt 5Ah +00075Br 1 5B .byt 5Bh +00075Cr 1 5C .byt 5Ch +00075Dr 1 5D .byt 5Dh +00075Er 1 5E .byt 5Eh +00075Fr 1 5F .byt 5Fh +000760r 1 60 .byt 60h +000761r 1 61 .byt 61h +000762r 1 62 .byt 62h +000763r 1 63 .byt 63h +000764r 1 64 .byt 64h +000765r 1 65 .byt 65h +000766r 1 66 .byt 66h +000767r 1 67 .byt 67h +000768r 1 68 .byt 68h +000769r 1 69 .byt 69h +00076Ar 1 6A .byt 6Ah +00076Br 1 6B .byt 6Bh +00076Cr 1 6C .byt 6Ch +00076Dr 1 6D .byt 6Dh +00076Er 1 6E .byt 6Eh +00076Fr 1 6F .byt 6Fh +000770r 1 70 .byt 70h +000771r 1 71 .byt 71h +000772r 1 72 .byt 72h +000773r 1 73 .byt 73h +000774r 1 74 .byt 74h +000775r 1 75 .byt 75h +000776r 1 76 .byt 76h +000777r 1 77 .byt 77h +000778r 1 78 .byt 78h +000779r 1 79 .byt 79h +00077Ar 1 7A .byt 7Ah +00077Br 1 7B .byt 7Bh +00077Cr 1 7C .byt 7Ch +00077Dr 1 7D .byt 7Dh +00077Er 1 7E .byt 7Eh +00077Fr 1 7F .byt 7Fh +000780r 1 80 .byt 80h +000781r 1 81 .byt 81h +000782r 1 82 .byt 82h +000783r 1 83 .byt 83h +000784r 1 84 .byt 84h +000785r 1 85 .byt 85h +000786r 1 86 .byt 86h +000787r 1 87 .byt 87h +000788r 1 88 .byt 88h +000789r 1 89 .byt 89h +00078Ar 1 8A .byt 8Ah +00078Br 1 8B .byt 8Bh +00078Cr 1 8C .byt 8Ch +00078Dr 1 8D .byt 8Dh +00078Er 1 8E .byt 8Eh +00078Fr 1 8F .byt 8Fh +000790r 1 90 .byt 90h +000791r 1 91 .byt 91h +000792r 1 92 .byt 92h +000793r 1 93 .byt 93h +000794r 1 94 .byt 94h +000795r 1 95 .byt 95h +000796r 1 96 .byt 96h +000797r 1 97 .byt 97h +000798r 1 98 .byt 98h +000799r 1 99 .byt 99h +00079Ar 1 9A .byt 9Ah +00079Br 1 9B .byt 9Bh +00079Cr 1 9C .byt 9Ch +00079Dr 1 9D .byt 9Dh +00079Er 1 9E .byt 9Eh +00079Fr 1 9F .byt 9Fh +0007A0r 1 A0 .byt 0A0h +0007A1r 1 A1 .byt 0A1h +0007A2r 1 A2 .byt 0A2h +0007A3r 1 A3 .byt 0A3h +0007A4r 1 A4 .byt 0A4h +0007A5r 1 A5 .byt 0A5h +0007A6r 1 A6 .byt 0A6h +0007A7r 1 A7 .byt 0A7h +0007A8r 1 A8 .byt 0A8h +0007A9r 1 A9 .byt 0A9h +0007AAr 1 AA .byt 0AAh +0007ABr 1 AB .byt 0ABh +0007ACr 1 AC .byt 0ACh +0007ADr 1 AD .byt 0ADh +0007AEr 1 AE .byt 0AEh +0007AFr 1 AF .byt 0AFh +0007B0r 1 B0 .byt 0B0h +0007B1r 1 B1 .byt 0B1h +0007B2r 1 B2 .byt 0B2h +0007B3r 1 B3 .byt 0B3h +0007B4r 1 B4 .byt 0B4h +0007B5r 1 B5 .byt 0B5h +0007B6r 1 B6 .byt 0B6h +0007B7r 1 B7 .byt 0B7h +0007B8r 1 B8 .byt 0B8h +0007B9r 1 B9 .byt 0B9h +0007BAr 1 BA .byt 0BAh +0007BBr 1 BB .byt 0BBh +0007BCr 1 BC .byt 0BCh +0007BDr 1 BD .byt 0BDh +0007BEr 1 BE .byt 0BEh +0007BFr 1 BF .byt 0BFh +0007C0r 1 C0 .byt 0C0h +0007C1r 1 C1 .byt 0C1h +0007C2r 1 C2 .byt 0C2h +0007C3r 1 C3 .byt 0C3h +0007C4r 1 C4 .byt 0C4h +0007C5r 1 C5 .byt 0C5h +0007C6r 1 C6 .byt 0C6h +0007C7r 1 C7 .byt 0C7h +0007C8r 1 C8 .byt 0C8h +0007C9r 1 C9 .byt 0C9h +0007CAr 1 CA .byt 0CAh +0007CBr 1 CB .byt 0CBh +0007CCr 1 CC .byt 0CCh +0007CDr 1 CD .byt 0CDh +0007CEr 1 CE .byt 0CEh +0007CFr 1 CF .byt 0CFh +0007D0r 1 D0 .byt 0D0h +0007D1r 1 D1 .byt 0D1h +0007D2r 1 D2 .byt 0D2h +0007D3r 1 D3 .byt 0D3h +0007D4r 1 D4 .byt 0D4h +0007D5r 1 D5 .byt 0D5h +0007D6r 1 D6 .byt 0D6h +0007D7r 1 D7 .byt 0D7h +0007D8r 1 D8 .byt 0D8h +0007D9r 1 D9 .byt 0D9h +0007DAr 1 DA .byt 0DAh +0007DBr 1 DB .byt 0DBh +0007DCr 1 DC .byt 0DCh +0007DDr 1 DD .byt 0DDh +0007DEr 1 DE .byt 0DEh +0007DFr 1 DF .byt 0DFh +0007E0r 1 E0 .byt 0E0h +0007E1r 1 E1 .byt 0E1h +0007E2r 1 E2 .byt 0E2h +0007E3r 1 E3 .byt 0E3h +0007E4r 1 E4 .byt 0E4h +0007E5r 1 E5 .byt 0E5h +0007E6r 1 E6 .byt 0E6h +0007E7r 1 E7 .byt 0E7h +0007E8r 1 E8 .byt 0E8h +0007E9r 1 E9 .byt 0E9h +0007EAr 1 EA .byt 0EAh +0007EBr 1 EB .byt 0EBh +0007ECr 1 EC .byt 0ECh +0007EDr 1 ED .byt 0EDh +0007EEr 1 EE .byt 0EEh +0007EFr 1 EF .byt 0EFh +0007F0r 1 F0 .byt 0F0h +0007F1r 1 F1 .byt 0F1h +0007F2r 1 F2 .byt 0F2h +0007F3r 1 F3 .byt 0F3h +0007F4r 1 F4 .byt 0F4h +0007F5r 1 F5 .byt 0F5h +0007F6r 1 F6 .byt 0F6h +0007F7r 1 F7 .byt 0F7h +0007F8r 1 F8 .byt 0F8h +0007F9r 1 F9 .byt 0F9h +0007FAr 1 FA .byt 0FAh +0007FBr 1 FB .byt 0FBh +0007FCr 1 FC .byt 0FCh +0007FDr 1 FD .byt 0FDh +0007FEr 1 FE .byt 0FEh +0007FFr 1 FF .byt 0FFh +000800r 1 +000800r 1 ; alternative 2-digit hex values +000800r 1 00 .byt 00h +000801r 1 01 .byt 01h +000802r 1 02 .byt 02h +000803r 1 03 .byt 03h +000804r 1 04 .byt 04h +000805r 1 05 .byt 05h +000806r 1 06 .byt 06h +000807r 1 07 .byt 07h +000808r 1 08 .byt 08h +000809r 1 09 .byt 09h +00080Ar 1 0A .byt 0ah +00080Br 1 0B .byt 0bh +00080Cr 1 0C .byt 0ch +00080Dr 1 0D .byt 0dh +00080Er 1 0E .byt 0eh +00080Fr 1 0F .byt 0fh +000810r 1 10 .byt 10h +000811r 1 11 .byt 11h +000812r 1 12 .byt 12h +000813r 1 13 .byt 13h +000814r 1 14 .byt 14h +000815r 1 15 .byt 15h +000816r 1 16 .byt 16h +000817r 1 17 .byt 17h +000818r 1 18 .byt 18h +000819r 1 19 .byt 19h +00081Ar 1 1A .byt 1ah +00081Br 1 1B .byt 1bh +00081Cr 1 1C .byt 1ch +00081Dr 1 1D .byt 1dh +00081Er 1 1E .byt 1eh +00081Fr 1 1F .byt 1fh +000820r 1 20 .byt 20h +000821r 1 21 .byt 21h +000822r 1 22 .byt 22h +000823r 1 23 .byt 23h +000824r 1 24 .byt 24h +000825r 1 25 .byt 25h +000826r 1 26 .byt 26h +000827r 1 27 .byt 27h +000828r 1 28 .byt 28h +000829r 1 29 .byt 29h +00082Ar 1 2A .byt 2ah +00082Br 1 2B .byt 2bh +00082Cr 1 2C .byt 2ch +00082Dr 1 2D .byt 2dh +00082Er 1 2E .byt 2eh +00082Fr 1 2F .byt 2fh +000830r 1 30 .byt 30h +000831r 1 31 .byt 31h +000832r 1 32 .byt 32h +000833r 1 33 .byt 33h +000834r 1 34 .byt 34h +000835r 1 35 .byt 35h +000836r 1 36 .byt 36h +000837r 1 37 .byt 37h +000838r 1 38 .byt 38h +000839r 1 39 .byt 39h +00083Ar 1 3A .byt 3ah +00083Br 1 3B .byt 3bh +00083Cr 1 3C .byt 3ch +00083Dr 1 3D .byt 3dh +00083Er 1 3E .byt 3eh +00083Fr 1 3F .byt 3fh +000840r 1 40 .byt 40h +000841r 1 41 .byt 41h +000842r 1 42 .byt 42h +000843r 1 43 .byt 43h +000844r 1 44 .byt 44h +000845r 1 45 .byt 45h +000846r 1 46 .byt 46h +000847r 1 47 .byt 47h +000848r 1 48 .byt 48h +000849r 1 49 .byt 49h +00084Ar 1 4A .byt 4ah +00084Br 1 4B .byt 4bh +00084Cr 1 4C .byt 4ch +00084Dr 1 4D .byt 4dh +00084Er 1 4E .byt 4eh +00084Fr 1 4F .byt 4fh +000850r 1 50 .byt 50h +000851r 1 51 .byt 51h +000852r 1 52 .byt 52h +000853r 1 53 .byt 53h +000854r 1 54 .byt 54h +000855r 1 55 .byt 55h +000856r 1 56 .byt 56h +000857r 1 57 .byt 57h +000858r 1 58 .byt 58h +000859r 1 59 .byt 59h +00085Ar 1 5A .byt 5ah +00085Br 1 5B .byt 5bh +00085Cr 1 5C .byt 5ch +00085Dr 1 5D .byt 5dh +00085Er 1 5E .byt 5eh +00085Fr 1 5F .byt 5fh +000860r 1 60 .byt 60h +000861r 1 61 .byt 61h +000862r 1 62 .byt 62h +000863r 1 63 .byt 63h +000864r 1 64 .byt 64h +000865r 1 65 .byt 65h +000866r 1 66 .byt 66h +000867r 1 67 .byt 67h +000868r 1 68 .byt 68h +000869r 1 69 .byt 69h +00086Ar 1 6A .byt 6ah +00086Br 1 6B .byt 6bh +00086Cr 1 6C .byt 6ch +00086Dr 1 6D .byt 6dh +00086Er 1 6E .byt 6eh +00086Fr 1 6F .byt 6fh +000870r 1 70 .byt 70h +000871r 1 71 .byt 71h +000872r 1 72 .byt 72h +000873r 1 73 .byt 73h +000874r 1 74 .byt 74h +000875r 1 75 .byt 75h +000876r 1 76 .byt 76h +000877r 1 77 .byt 77h +000878r 1 78 .byt 78h +000879r 1 79 .byt 79h +00087Ar 1 7A .byt 7ah +00087Br 1 7B .byt 7bh +00087Cr 1 7C .byt 7ch +00087Dr 1 7D .byt 7dh +00087Er 1 7E .byt 7eh +00087Fr 1 7F .byt 7fh +000880r 1 80 .byt 80h +000881r 1 81 .byt 81h +000882r 1 82 .byt 82h +000883r 1 83 .byt 83h +000884r 1 84 .byt 84h +000885r 1 85 .byt 85h +000886r 1 86 .byt 86h +000887r 1 87 .byt 87h +000888r 1 88 .byt 88h +000889r 1 89 .byt 89h +00088Ar 1 8A .byt 8ah +00088Br 1 8B .byt 8bh +00088Cr 1 8C .byt 8ch +00088Dr 1 8D .byt 8dh +00088Er 1 8E .byt 8eh +00088Fr 1 8F .byt 8fh +000890r 1 90 .byt 90h +000891r 1 91 .byt 91h +000892r 1 92 .byt 92h +000893r 1 93 .byt 93h +000894r 1 94 .byt 94h +000895r 1 95 .byt 95h +000896r 1 96 .byt 96h +000897r 1 97 .byt 97h +000898r 1 98 .byt 98h +000899r 1 99 .byt 99h +00089Ar 1 9A .byt 9ah +00089Br 1 9B .byt 9bh +00089Cr 1 9C .byt 9ch +00089Dr 1 9D .byt 9dh +00089Er 1 9E .byt 9eh +00089Fr 1 9F .byt 9fh +0008A0r 1 A0 .byt 0a0h +0008A1r 1 A1 .byt 0a1h +0008A2r 1 A2 .byt 0a2h +0008A3r 1 A3 .byt 0a3h +0008A4r 1 A4 .byt 0a4h +0008A5r 1 A5 .byt 0a5h +0008A6r 1 A6 .byt 0a6h +0008A7r 1 A7 .byt 0a7h +0008A8r 1 A8 .byt 0a8h +0008A9r 1 A9 .byt 0a9h +0008AAr 1 AA .byt 0aah +0008ABr 1 AB .byt 0abh +0008ACr 1 AC .byt 0ach +0008ADr 1 AD .byt 0adh +0008AEr 1 AE .byt 0aeh +0008AFr 1 AF .byt 0afh +0008B0r 1 B0 .byt 0b0h +0008B1r 1 B1 .byt 0b1h +0008B2r 1 B2 .byt 0b2h +0008B3r 1 B3 .byt 0b3h +0008B4r 1 B4 .byt 0b4h +0008B5r 1 B5 .byt 0b5h +0008B6r 1 B6 .byt 0b6h +0008B7r 1 B7 .byt 0b7h +0008B8r 1 B8 .byt 0b8h +0008B9r 1 B9 .byt 0b9h +0008BAr 1 BA .byt 0bah +0008BBr 1 BB .byt 0bbh +0008BCr 1 BC .byt 0bch +0008BDr 1 BD .byt 0bdh +0008BEr 1 BE .byt 0beh +0008BFr 1 BF .byt 0bfh +0008C0r 1 C0 .byt 0c0h +0008C1r 1 C1 .byt 0c1h +0008C2r 1 C2 .byt 0c2h +0008C3r 1 C3 .byt 0c3h +0008C4r 1 C4 .byt 0c4h +0008C5r 1 C5 .byt 0c5h +0008C6r 1 C6 .byt 0c6h +0008C7r 1 C7 .byt 0c7h +0008C8r 1 C8 .byt 0c8h +0008C9r 1 C9 .byt 0c9h +0008CAr 1 CA .byt 0cah +0008CBr 1 CB .byt 0cbh +0008CCr 1 CC .byt 0cch +0008CDr 1 CD .byt 0cdh +0008CEr 1 CE .byt 0ceh +0008CFr 1 CF .byt 0cfh +0008D0r 1 D0 .byt 0d0h +0008D1r 1 D1 .byt 0d1h +0008D2r 1 D2 .byt 0d2h +0008D3r 1 D3 .byt 0d3h +0008D4r 1 D4 .byt 0d4h +0008D5r 1 D5 .byt 0d5h +0008D6r 1 D6 .byt 0d6h +0008D7r 1 D7 .byt 0d7h +0008D8r 1 D8 .byt 0d8h +0008D9r 1 D9 .byt 0d9h +0008DAr 1 DA .byt 0dah +0008DBr 1 DB .byt 0dbh +0008DCr 1 DC .byt 0dch +0008DDr 1 DD .byt 0ddh +0008DEr 1 DE .byt 0deh +0008DFr 1 DF .byt 0dfh +0008E0r 1 E0 .byt 0e0h +0008E1r 1 E1 .byt 0e1h +0008E2r 1 E2 .byt 0e2h +0008E3r 1 E3 .byt 0e3h +0008E4r 1 E4 .byt 0e4h +0008E5r 1 E5 .byt 0e5h +0008E6r 1 E6 .byt 0e6h +0008E7r 1 E7 .byt 0e7h +0008E8r 1 E8 .byt 0e8h +0008E9r 1 E9 .byt 0e9h +0008EAr 1 EA .byt 0eah +0008EBr 1 EB .byt 0ebh +0008ECr 1 EC .byt 0ech +0008EDr 1 ED .byt 0edh +0008EEr 1 EE .byt 0eeh +0008EFr 1 EF .byt 0efh +0008F0r 1 F0 .byt 0f0h +0008F1r 1 F1 .byt 0f1h +0008F2r 1 F2 .byt 0f2h +0008F3r 1 F3 .byt 0f3h +0008F4r 1 F4 .byt 0f4h +0008F5r 1 F5 .byt 0f5h +0008F6r 1 F6 .byt 0f6h +0008F7r 1 F7 .byt 0f7h +0008F8r 1 F8 .byt 0f8h +0008F9r 1 F9 .byt 0f9h +0008FAr 1 FA .byt 0fah +0008FBr 1 FB .byt 0fbh +0008FCr 1 FC .byt 0fch +0008FDr 1 FD .byt 0fdh +0008FEr 1 FE .byt 0feh +0008FFr 1 FF .byt 0ffh +000900r 1 +000900r 1 ; alternative 2-digit hex values, uppercase +000900r 1 00 .byt 00h +000901r 1 01 .byt 01h +000902r 1 02 .byt 02h +000903r 1 03 .byt 03h +000904r 1 04 .byt 04h +000905r 1 05 .byt 05h +000906r 1 06 .byt 06h +000907r 1 07 .byt 07h +000908r 1 08 .byt 08h +000909r 1 09 .byt 09h +00090Ar 1 0A .byt 0Ah +00090Br 1 0B .byt 0Bh +00090Cr 1 0C .byt 0Ch +00090Dr 1 0D .byt 0Dh +00090Er 1 0E .byt 0Eh +00090Fr 1 0F .byt 0Fh +000910r 1 10 .byt 10h +000911r 1 11 .byt 11h +000912r 1 12 .byt 12h +000913r 1 13 .byt 13h +000914r 1 14 .byt 14h +000915r 1 15 .byt 15h +000916r 1 16 .byt 16h +000917r 1 17 .byt 17h +000918r 1 18 .byt 18h +000919r 1 19 .byt 19h +00091Ar 1 1A .byt 1Ah +00091Br 1 1B .byt 1Bh +00091Cr 1 1C .byt 1Ch +00091Dr 1 1D .byt 1Dh +00091Er 1 1E .byt 1Eh +00091Fr 1 1F .byt 1Fh +000920r 1 20 .byt 20h +000921r 1 21 .byt 21h +000922r 1 22 .byt 22h +000923r 1 23 .byt 23h +000924r 1 24 .byt 24h +000925r 1 25 .byt 25h +000926r 1 26 .byt 26h +000927r 1 27 .byt 27h +000928r 1 28 .byt 28h +000929r 1 29 .byt 29h +00092Ar 1 2A .byt 2Ah +00092Br 1 2B .byt 2Bh +00092Cr 1 2C .byt 2Ch +00092Dr 1 2D .byt 2Dh +00092Er 1 2E .byt 2Eh +00092Fr 1 2F .byt 2Fh +000930r 1 30 .byt 30h +000931r 1 31 .byt 31h +000932r 1 32 .byt 32h +000933r 1 33 .byt 33h +000934r 1 34 .byt 34h +000935r 1 35 .byt 35h +000936r 1 36 .byt 36h +000937r 1 37 .byt 37h +000938r 1 38 .byt 38h +000939r 1 39 .byt 39h +00093Ar 1 3A .byt 3Ah +00093Br 1 3B .byt 3Bh +00093Cr 1 3C .byt 3Ch +00093Dr 1 3D .byt 3Dh +00093Er 1 3E .byt 3Eh +00093Fr 1 3F .byt 3Fh +000940r 1 40 .byt 40h +000941r 1 41 .byt 41h +000942r 1 42 .byt 42h +000943r 1 43 .byt 43h +000944r 1 44 .byt 44h +000945r 1 45 .byt 45h +000946r 1 46 .byt 46h +000947r 1 47 .byt 47h +000948r 1 48 .byt 48h +000949r 1 49 .byt 49h +00094Ar 1 4A .byt 4Ah +00094Br 1 4B .byt 4Bh +00094Cr 1 4C .byt 4Ch +00094Dr 1 4D .byt 4Dh +00094Er 1 4E .byt 4Eh +00094Fr 1 4F .byt 4Fh +000950r 1 50 .byt 50h +000951r 1 51 .byt 51h +000952r 1 52 .byt 52h +000953r 1 53 .byt 53h +000954r 1 54 .byt 54h +000955r 1 55 .byt 55h +000956r 1 56 .byt 56h +000957r 1 57 .byt 57h +000958r 1 58 .byt 58h +000959r 1 59 .byt 59h +00095Ar 1 5A .byt 5Ah +00095Br 1 5B .byt 5Bh +00095Cr 1 5C .byt 5Ch +00095Dr 1 5D .byt 5Dh +00095Er 1 5E .byt 5Eh +00095Fr 1 5F .byt 5Fh +000960r 1 60 .byt 60h +000961r 1 61 .byt 61h +000962r 1 62 .byt 62h +000963r 1 63 .byt 63h +000964r 1 64 .byt 64h +000965r 1 65 .byt 65h +000966r 1 66 .byt 66h +000967r 1 67 .byt 67h +000968r 1 68 .byt 68h +000969r 1 69 .byt 69h +00096Ar 1 6A .byt 6Ah +00096Br 1 6B .byt 6Bh +00096Cr 1 6C .byt 6Ch +00096Dr 1 6D .byt 6Dh +00096Er 1 6E .byt 6Eh +00096Fr 1 6F .byt 6Fh +000970r 1 70 .byt 70h +000971r 1 71 .byt 71h +000972r 1 72 .byt 72h +000973r 1 73 .byt 73h +000974r 1 74 .byt 74h +000975r 1 75 .byt 75h +000976r 1 76 .byt 76h +000977r 1 77 .byt 77h +000978r 1 78 .byt 78h +000979r 1 79 .byt 79h +00097Ar 1 7A .byt 7Ah +00097Br 1 7B .byt 7Bh +00097Cr 1 7C .byt 7Ch +00097Dr 1 7D .byt 7Dh +00097Er 1 7E .byt 7Eh +00097Fr 1 7F .byt 7Fh +000980r 1 80 .byt 80h +000981r 1 81 .byt 81h +000982r 1 82 .byt 82h +000983r 1 83 .byt 83h +000984r 1 84 .byt 84h +000985r 1 85 .byt 85h +000986r 1 86 .byt 86h +000987r 1 87 .byt 87h +000988r 1 88 .byt 88h +000989r 1 89 .byt 89h +00098Ar 1 8A .byt 8Ah +00098Br 1 8B .byt 8Bh +00098Cr 1 8C .byt 8Ch +00098Dr 1 8D .byt 8Dh +00098Er 1 8E .byt 8Eh +00098Fr 1 8F .byt 8Fh +000990r 1 90 .byt 90h +000991r 1 91 .byt 91h +000992r 1 92 .byt 92h +000993r 1 93 .byt 93h +000994r 1 94 .byt 94h +000995r 1 95 .byt 95h +000996r 1 96 .byt 96h +000997r 1 97 .byt 97h +000998r 1 98 .byt 98h +000999r 1 99 .byt 99h +00099Ar 1 9A .byt 9Ah +00099Br 1 9B .byt 9Bh +00099Cr 1 9C .byt 9Ch +00099Dr 1 9D .byt 9Dh +00099Er 1 9E .byt 9Eh +00099Fr 1 9F .byt 9Fh +0009A0r 1 A0 .byt 0A0h +0009A1r 1 A1 .byt 0A1h +0009A2r 1 A2 .byt 0A2h +0009A3r 1 A3 .byt 0A3h +0009A4r 1 A4 .byt 0A4h +0009A5r 1 A5 .byt 0A5h +0009A6r 1 A6 .byt 0A6h +0009A7r 1 A7 .byt 0A7h +0009A8r 1 A8 .byt 0A8h +0009A9r 1 A9 .byt 0A9h +0009AAr 1 AA .byt 0AAh +0009ABr 1 AB .byt 0ABh +0009ACr 1 AC .byt 0ACh +0009ADr 1 AD .byt 0ADh +0009AEr 1 AE .byt 0AEh +0009AFr 1 AF .byt 0AFh +0009B0r 1 B0 .byt 0B0h +0009B1r 1 B1 .byt 0B1h +0009B2r 1 B2 .byt 0B2h +0009B3r 1 B3 .byt 0B3h +0009B4r 1 B4 .byt 0B4h +0009B5r 1 B5 .byt 0B5h +0009B6r 1 B6 .byt 0B6h +0009B7r 1 B7 .byt 0B7h +0009B8r 1 B8 .byt 0B8h +0009B9r 1 B9 .byt 0B9h +0009BAr 1 BA .byt 0BAh +0009BBr 1 BB .byt 0BBh +0009BCr 1 BC .byt 0BCh +0009BDr 1 BD .byt 0BDh +0009BEr 1 BE .byt 0BEh +0009BFr 1 BF .byt 0BFh +0009C0r 1 C0 .byt 0C0h +0009C1r 1 C1 .byt 0C1h +0009C2r 1 C2 .byt 0C2h +0009C3r 1 C3 .byt 0C3h +0009C4r 1 C4 .byt 0C4h +0009C5r 1 C5 .byt 0C5h +0009C6r 1 C6 .byt 0C6h +0009C7r 1 C7 .byt 0C7h +0009C8r 1 C8 .byt 0C8h +0009C9r 1 C9 .byt 0C9h +0009CAr 1 CA .byt 0CAh +0009CBr 1 CB .byt 0CBh +0009CCr 1 CC .byt 0CCh +0009CDr 1 CD .byt 0CDh +0009CEr 1 CE .byt 0CEh +0009CFr 1 CF .byt 0CFh +0009D0r 1 D0 .byt 0D0h +0009D1r 1 D1 .byt 0D1h +0009D2r 1 D2 .byt 0D2h +0009D3r 1 D3 .byt 0D3h +0009D4r 1 D4 .byt 0D4h +0009D5r 1 D5 .byt 0D5h +0009D6r 1 D6 .byt 0D6h +0009D7r 1 D7 .byt 0D7h +0009D8r 1 D8 .byt 0D8h +0009D9r 1 D9 .byt 0D9h +0009DAr 1 DA .byt 0DAh +0009DBr 1 DB .byt 0DBh +0009DCr 1 DC .byt 0DCh +0009DDr 1 DD .byt 0DDh +0009DEr 1 DE .byt 0DEh +0009DFr 1 DF .byt 0DFh +0009E0r 1 E0 .byt 0E0h +0009E1r 1 E1 .byt 0E1h +0009E2r 1 E2 .byt 0E2h +0009E3r 1 E3 .byt 0E3h +0009E4r 1 E4 .byt 0E4h +0009E5r 1 E5 .byt 0E5h +0009E6r 1 E6 .byt 0E6h +0009E7r 1 E7 .byt 0E7h +0009E8r 1 E8 .byt 0E8h +0009E9r 1 E9 .byt 0E9h +0009EAr 1 EA .byt 0EAh +0009EBr 1 EB .byt 0EBh +0009ECr 1 EC .byt 0ECh +0009EDr 1 ED .byt 0EDh +0009EEr 1 EE .byt 0EEh +0009EFr 1 EF .byt 0EFh +0009F0r 1 F0 .byt 0F0h +0009F1r 1 F1 .byt 0F1h +0009F2r 1 F2 .byt 0F2h +0009F3r 1 F3 .byt 0F3h +0009F4r 1 F4 .byt 0F4h +0009F5r 1 F5 .byt 0F5h +0009F6r 1 F6 .byt 0F6h +0009F7r 1 F7 .byt 0F7h +0009F8r 1 F8 .byt 0F8h +0009F9r 1 F9 .byt 0F9h +0009FAr 1 FA .byt 0FAh +0009FBr 1 FB .byt 0FBh +0009FCr 1 FC .byt 0FCh +0009FDr 1 FD .byt 0FDh +0009FEr 1 FE .byt 0FEh +0009FFr 1 FF .byt 0FFh +000A00r 1 +000A00r 1 ; alternative hex values, always leading zero +000A00r 1 00 .byt 00h +000A01r 1 01 .byt 01h +000A02r 1 02 .byt 02h +000A03r 1 03 .byt 03h +000A04r 1 04 .byt 04h +000A05r 1 05 .byt 05h +000A06r 1 06 .byt 06h +000A07r 1 07 .byt 07h +000A08r 1 08 .byt 08h +000A09r 1 09 .byt 09h +000A0Ar 1 0A .byt 0ah +000A0Br 1 0B .byt 0bh +000A0Cr 1 0C .byt 0ch +000A0Dr 1 0D .byt 0dh +000A0Er 1 0E .byt 0eh +000A0Fr 1 0F .byt 0fh +000A10r 1 10 .byt 010h +000A11r 1 11 .byt 011h +000A12r 1 12 .byt 012h +000A13r 1 13 .byt 013h +000A14r 1 14 .byt 014h +000A15r 1 15 .byt 015h +000A16r 1 16 .byt 016h +000A17r 1 17 .byt 017h +000A18r 1 18 .byt 018h +000A19r 1 19 .byt 019h +000A1Ar 1 1A .byt 01ah +000A1Br 1 1B .byt 01bh +000A1Cr 1 1C .byt 01ch +000A1Dr 1 1D .byt 01dh +000A1Er 1 1E .byt 01eh +000A1Fr 1 1F .byt 01fh +000A20r 1 20 .byt 020h +000A21r 1 21 .byt 021h +000A22r 1 22 .byt 022h +000A23r 1 23 .byt 023h +000A24r 1 24 .byt 024h +000A25r 1 25 .byt 025h +000A26r 1 26 .byt 026h +000A27r 1 27 .byt 027h +000A28r 1 28 .byt 028h +000A29r 1 29 .byt 029h +000A2Ar 1 2A .byt 02ah +000A2Br 1 2B .byt 02bh +000A2Cr 1 2C .byt 02ch +000A2Dr 1 2D .byt 02dh +000A2Er 1 2E .byt 02eh +000A2Fr 1 2F .byt 02fh +000A30r 1 30 .byt 030h +000A31r 1 31 .byt 031h +000A32r 1 32 .byt 032h +000A33r 1 33 .byt 033h +000A34r 1 34 .byt 034h +000A35r 1 35 .byt 035h +000A36r 1 36 .byt 036h +000A37r 1 37 .byt 037h +000A38r 1 38 .byt 038h +000A39r 1 39 .byt 039h +000A3Ar 1 3A .byt 03ah +000A3Br 1 3B .byt 03bh +000A3Cr 1 3C .byt 03ch +000A3Dr 1 3D .byt 03dh +000A3Er 1 3E .byt 03eh +000A3Fr 1 3F .byt 03fh +000A40r 1 40 .byt 040h +000A41r 1 41 .byt 041h +000A42r 1 42 .byt 042h +000A43r 1 43 .byt 043h +000A44r 1 44 .byt 044h +000A45r 1 45 .byt 045h +000A46r 1 46 .byt 046h +000A47r 1 47 .byt 047h +000A48r 1 48 .byt 048h +000A49r 1 49 .byt 049h +000A4Ar 1 4A .byt 04ah +000A4Br 1 4B .byt 04bh +000A4Cr 1 4C .byt 04ch +000A4Dr 1 4D .byt 04dh +000A4Er 1 4E .byt 04eh +000A4Fr 1 4F .byt 04fh +000A50r 1 50 .byt 050h +000A51r 1 51 .byt 051h +000A52r 1 52 .byt 052h +000A53r 1 53 .byt 053h +000A54r 1 54 .byt 054h +000A55r 1 55 .byt 055h +000A56r 1 56 .byt 056h +000A57r 1 57 .byt 057h +000A58r 1 58 .byt 058h +000A59r 1 59 .byt 059h +000A5Ar 1 5A .byt 05ah +000A5Br 1 5B .byt 05bh +000A5Cr 1 5C .byt 05ch +000A5Dr 1 5D .byt 05dh +000A5Er 1 5E .byt 05eh +000A5Fr 1 5F .byt 05fh +000A60r 1 60 .byt 060h +000A61r 1 61 .byt 061h +000A62r 1 62 .byt 062h +000A63r 1 63 .byt 063h +000A64r 1 64 .byt 064h +000A65r 1 65 .byt 065h +000A66r 1 66 .byt 066h +000A67r 1 67 .byt 067h +000A68r 1 68 .byt 068h +000A69r 1 69 .byt 069h +000A6Ar 1 6A .byt 06ah +000A6Br 1 6B .byt 06bh +000A6Cr 1 6C .byt 06ch +000A6Dr 1 6D .byt 06dh +000A6Er 1 6E .byt 06eh +000A6Fr 1 6F .byt 06fh +000A70r 1 70 .byt 070h +000A71r 1 71 .byt 071h +000A72r 1 72 .byt 072h +000A73r 1 73 .byt 073h +000A74r 1 74 .byt 074h +000A75r 1 75 .byt 075h +000A76r 1 76 .byt 076h +000A77r 1 77 .byt 077h +000A78r 1 78 .byt 078h +000A79r 1 79 .byt 079h +000A7Ar 1 7A .byt 07ah +000A7Br 1 7B .byt 07bh +000A7Cr 1 7C .byt 07ch +000A7Dr 1 7D .byt 07dh +000A7Er 1 7E .byt 07eh +000A7Fr 1 7F .byt 07fh +000A80r 1 80 .byt 080h +000A81r 1 81 .byt 081h +000A82r 1 82 .byt 082h +000A83r 1 83 .byt 083h +000A84r 1 84 .byt 084h +000A85r 1 85 .byt 085h +000A86r 1 86 .byt 086h +000A87r 1 87 .byt 087h +000A88r 1 88 .byt 088h +000A89r 1 89 .byt 089h +000A8Ar 1 8A .byt 08ah +000A8Br 1 8B .byt 08bh +000A8Cr 1 8C .byt 08ch +000A8Dr 1 8D .byt 08dh +000A8Er 1 8E .byt 08eh +000A8Fr 1 8F .byt 08fh +000A90r 1 90 .byt 090h +000A91r 1 91 .byt 091h +000A92r 1 92 .byt 092h +000A93r 1 93 .byt 093h +000A94r 1 94 .byt 094h +000A95r 1 95 .byt 095h +000A96r 1 96 .byt 096h +000A97r 1 97 .byt 097h +000A98r 1 98 .byt 098h +000A99r 1 99 .byt 099h +000A9Ar 1 9A .byt 09ah +000A9Br 1 9B .byt 09bh +000A9Cr 1 9C .byt 09ch +000A9Dr 1 9D .byt 09dh +000A9Er 1 9E .byt 09eh +000A9Fr 1 9F .byt 09fh +000AA0r 1 A0 .byt 0a0h +000AA1r 1 A1 .byt 0a1h +000AA2r 1 A2 .byt 0a2h +000AA3r 1 A3 .byt 0a3h +000AA4r 1 A4 .byt 0a4h +000AA5r 1 A5 .byt 0a5h +000AA6r 1 A6 .byt 0a6h +000AA7r 1 A7 .byt 0a7h +000AA8r 1 A8 .byt 0a8h +000AA9r 1 A9 .byt 0a9h +000AAAr 1 AA .byt 0aah +000AABr 1 AB .byt 0abh +000AACr 1 AC .byt 0ach +000AADr 1 AD .byt 0adh +000AAEr 1 AE .byt 0aeh +000AAFr 1 AF .byt 0afh +000AB0r 1 B0 .byt 0b0h +000AB1r 1 B1 .byt 0b1h +000AB2r 1 B2 .byt 0b2h +000AB3r 1 B3 .byt 0b3h +000AB4r 1 B4 .byt 0b4h +000AB5r 1 B5 .byt 0b5h +000AB6r 1 B6 .byt 0b6h +000AB7r 1 B7 .byt 0b7h +000AB8r 1 B8 .byt 0b8h +000AB9r 1 B9 .byt 0b9h +000ABAr 1 BA .byt 0bah +000ABBr 1 BB .byt 0bbh +000ABCr 1 BC .byt 0bch +000ABDr 1 BD .byt 0bdh +000ABEr 1 BE .byt 0beh +000ABFr 1 BF .byt 0bfh +000AC0r 1 C0 .byt 0c0h +000AC1r 1 C1 .byt 0c1h +000AC2r 1 C2 .byt 0c2h +000AC3r 1 C3 .byt 0c3h +000AC4r 1 C4 .byt 0c4h +000AC5r 1 C5 .byt 0c5h +000AC6r 1 C6 .byt 0c6h +000AC7r 1 C7 .byt 0c7h +000AC8r 1 C8 .byt 0c8h +000AC9r 1 C9 .byt 0c9h +000ACAr 1 CA .byt 0cah +000ACBr 1 CB .byt 0cbh +000ACCr 1 CC .byt 0cch +000ACDr 1 CD .byt 0cdh +000ACEr 1 CE .byt 0ceh +000ACFr 1 CF .byt 0cfh +000AD0r 1 D0 .byt 0d0h +000AD1r 1 D1 .byt 0d1h +000AD2r 1 D2 .byt 0d2h +000AD3r 1 D3 .byt 0d3h +000AD4r 1 D4 .byt 0d4h +000AD5r 1 D5 .byt 0d5h +000AD6r 1 D6 .byt 0d6h +000AD7r 1 D7 .byt 0d7h +000AD8r 1 D8 .byt 0d8h +000AD9r 1 D9 .byt 0d9h +000ADAr 1 DA .byt 0dah +000ADBr 1 DB .byt 0dbh +000ADCr 1 DC .byt 0dch +000ADDr 1 DD .byt 0ddh +000ADEr 1 DE .byt 0deh +000ADFr 1 DF .byt 0dfh +000AE0r 1 E0 .byt 0e0h +000AE1r 1 E1 .byt 0e1h +000AE2r 1 E2 .byt 0e2h +000AE3r 1 E3 .byt 0e3h +000AE4r 1 E4 .byt 0e4h +000AE5r 1 E5 .byt 0e5h +000AE6r 1 E6 .byt 0e6h +000AE7r 1 E7 .byt 0e7h +000AE8r 1 E8 .byt 0e8h +000AE9r 1 E9 .byt 0e9h +000AEAr 1 EA .byt 0eah +000AEBr 1 EB .byt 0ebh +000AECr 1 EC .byt 0ech +000AEDr 1 ED .byt 0edh +000AEEr 1 EE .byt 0eeh +000AEFr 1 EF .byt 0efh +000AF0r 1 F0 .byt 0f0h +000AF1r 1 F1 .byt 0f1h +000AF2r 1 F2 .byt 0f2h +000AF3r 1 F3 .byt 0f3h +000AF4r 1 F4 .byt 0f4h +000AF5r 1 F5 .byt 0f5h +000AF6r 1 F6 .byt 0f6h +000AF7r 1 F7 .byt 0f7h +000AF8r 1 F8 .byt 0f8h +000AF9r 1 F9 .byt 0f9h +000AFAr 1 FA .byt 0fah +000AFBr 1 FB .byt 0fbh +000AFCr 1 FC .byt 0fch +000AFDr 1 FD .byt 0fdh +000AFEr 1 FE .byt 0feh +000AFFr 1 FF .byt 0ffh +000B00r 1 +000B00r 1 ; binary values, variable length +000B00r 1 00 .byt %0 +000B01r 1 01 .byt %1 +000B02r 1 02 .byt %10 +000B03r 1 03 .byt %11 +000B04r 1 04 .byt %100 +000B05r 1 05 .byt %101 +000B06r 1 06 .byt %110 +000B07r 1 07 .byt %111 +000B08r 1 08 .byt %1000 +000B09r 1 09 .byt %1001 +000B0Ar 1 0A .byt %1010 +000B0Br 1 0B .byt %1011 +000B0Cr 1 0C .byt %1100 +000B0Dr 1 0D .byt %1101 +000B0Er 1 0E .byt %1110 +000B0Fr 1 0F .byt %1111 +000B10r 1 10 .byt %10000 +000B11r 1 11 .byt %10001 +000B12r 1 12 .byt %10010 +000B13r 1 13 .byt %10011 +000B14r 1 14 .byt %10100 +000B15r 1 15 .byt %10101 +000B16r 1 16 .byt %10110 +000B17r 1 17 .byt %10111 +000B18r 1 18 .byt %11000 +000B19r 1 19 .byt %11001 +000B1Ar 1 1A .byt %11010 +000B1Br 1 1B .byt %11011 +000B1Cr 1 1C .byt %11100 +000B1Dr 1 1D .byt %11101 +000B1Er 1 1E .byt %11110 +000B1Fr 1 1F .byt %11111 +000B20r 1 20 .byt %100000 +000B21r 1 21 .byt %100001 +000B22r 1 22 .byt %100010 +000B23r 1 23 .byt %100011 +000B24r 1 24 .byt %100100 +000B25r 1 25 .byt %100101 +000B26r 1 26 .byt %100110 +000B27r 1 27 .byt %100111 +000B28r 1 28 .byt %101000 +000B29r 1 29 .byt %101001 +000B2Ar 1 2A .byt %101010 +000B2Br 1 2B .byt %101011 +000B2Cr 1 2C .byt %101100 +000B2Dr 1 2D .byt %101101 +000B2Er 1 2E .byt %101110 +000B2Fr 1 2F .byt %101111 +000B30r 1 30 .byt %110000 +000B31r 1 31 .byt %110001 +000B32r 1 32 .byt %110010 +000B33r 1 33 .byt %110011 +000B34r 1 34 .byt %110100 +000B35r 1 35 .byt %110101 +000B36r 1 36 .byt %110110 +000B37r 1 37 .byt %110111 +000B38r 1 38 .byt %111000 +000B39r 1 39 .byt %111001 +000B3Ar 1 3A .byt %111010 +000B3Br 1 3B .byt %111011 +000B3Cr 1 3C .byt %111100 +000B3Dr 1 3D .byt %111101 +000B3Er 1 3E .byt %111110 +000B3Fr 1 3F .byt %111111 +000B40r 1 40 .byt %1000000 +000B41r 1 41 .byt %1000001 +000B42r 1 42 .byt %1000010 +000B43r 1 43 .byt %1000011 +000B44r 1 44 .byt %1000100 +000B45r 1 45 .byt %1000101 +000B46r 1 46 .byt %1000110 +000B47r 1 47 .byt %1000111 +000B48r 1 48 .byt %1001000 +000B49r 1 49 .byt %1001001 +000B4Ar 1 4A .byt %1001010 +000B4Br 1 4B .byt %1001011 +000B4Cr 1 4C .byt %1001100 +000B4Dr 1 4D .byt %1001101 +000B4Er 1 4E .byt %1001110 +000B4Fr 1 4F .byt %1001111 +000B50r 1 50 .byt %1010000 +000B51r 1 51 .byt %1010001 +000B52r 1 52 .byt %1010010 +000B53r 1 53 .byt %1010011 +000B54r 1 54 .byt %1010100 +000B55r 1 55 .byt %1010101 +000B56r 1 56 .byt %1010110 +000B57r 1 57 .byt %1010111 +000B58r 1 58 .byt %1011000 +000B59r 1 59 .byt %1011001 +000B5Ar 1 5A .byt %1011010 +000B5Br 1 5B .byt %1011011 +000B5Cr 1 5C .byt %1011100 +000B5Dr 1 5D .byt %1011101 +000B5Er 1 5E .byt %1011110 +000B5Fr 1 5F .byt %1011111 +000B60r 1 60 .byt %1100000 +000B61r 1 61 .byt %1100001 +000B62r 1 62 .byt %1100010 +000B63r 1 63 .byt %1100011 +000B64r 1 64 .byt %1100100 +000B65r 1 65 .byt %1100101 +000B66r 1 66 .byt %1100110 +000B67r 1 67 .byt %1100111 +000B68r 1 68 .byt %1101000 +000B69r 1 69 .byt %1101001 +000B6Ar 1 6A .byt %1101010 +000B6Br 1 6B .byt %1101011 +000B6Cr 1 6C .byt %1101100 +000B6Dr 1 6D .byt %1101101 +000B6Er 1 6E .byt %1101110 +000B6Fr 1 6F .byt %1101111 +000B70r 1 70 .byt %1110000 +000B71r 1 71 .byt %1110001 +000B72r 1 72 .byt %1110010 +000B73r 1 73 .byt %1110011 +000B74r 1 74 .byt %1110100 +000B75r 1 75 .byt %1110101 +000B76r 1 76 .byt %1110110 +000B77r 1 77 .byt %1110111 +000B78r 1 78 .byt %1111000 +000B79r 1 79 .byt %1111001 +000B7Ar 1 7A .byt %1111010 +000B7Br 1 7B .byt %1111011 +000B7Cr 1 7C .byt %1111100 +000B7Dr 1 7D .byt %1111101 +000B7Er 1 7E .byt %1111110 +000B7Fr 1 7F .byt %1111111 +000B80r 1 80 .byt %10000000 +000B81r 1 81 .byt %10000001 +000B82r 1 82 .byt %10000010 +000B83r 1 83 .byt %10000011 +000B84r 1 84 .byt %10000100 +000B85r 1 85 .byt %10000101 +000B86r 1 86 .byt %10000110 +000B87r 1 87 .byt %10000111 +000B88r 1 88 .byt %10001000 +000B89r 1 89 .byt %10001001 +000B8Ar 1 8A .byt %10001010 +000B8Br 1 8B .byt %10001011 +000B8Cr 1 8C .byt %10001100 +000B8Dr 1 8D .byt %10001101 +000B8Er 1 8E .byt %10001110 +000B8Fr 1 8F .byt %10001111 +000B90r 1 90 .byt %10010000 +000B91r 1 91 .byt %10010001 +000B92r 1 92 .byt %10010010 +000B93r 1 93 .byt %10010011 +000B94r 1 94 .byt %10010100 +000B95r 1 95 .byt %10010101 +000B96r 1 96 .byt %10010110 +000B97r 1 97 .byt %10010111 +000B98r 1 98 .byt %10011000 +000B99r 1 99 .byt %10011001 +000B9Ar 1 9A .byt %10011010 +000B9Br 1 9B .byt %10011011 +000B9Cr 1 9C .byt %10011100 +000B9Dr 1 9D .byt %10011101 +000B9Er 1 9E .byt %10011110 +000B9Fr 1 9F .byt %10011111 +000BA0r 1 A0 .byt %10100000 +000BA1r 1 A1 .byt %10100001 +000BA2r 1 A2 .byt %10100010 +000BA3r 1 A3 .byt %10100011 +000BA4r 1 A4 .byt %10100100 +000BA5r 1 A5 .byt %10100101 +000BA6r 1 A6 .byt %10100110 +000BA7r 1 A7 .byt %10100111 +000BA8r 1 A8 .byt %10101000 +000BA9r 1 A9 .byt %10101001 +000BAAr 1 AA .byt %10101010 +000BABr 1 AB .byt %10101011 +000BACr 1 AC .byt %10101100 +000BADr 1 AD .byt %10101101 +000BAEr 1 AE .byt %10101110 +000BAFr 1 AF .byt %10101111 +000BB0r 1 B0 .byt %10110000 +000BB1r 1 B1 .byt %10110001 +000BB2r 1 B2 .byt %10110010 +000BB3r 1 B3 .byt %10110011 +000BB4r 1 B4 .byt %10110100 +000BB5r 1 B5 .byt %10110101 +000BB6r 1 B6 .byt %10110110 +000BB7r 1 B7 .byt %10110111 +000BB8r 1 B8 .byt %10111000 +000BB9r 1 B9 .byt %10111001 +000BBAr 1 BA .byt %10111010 +000BBBr 1 BB .byt %10111011 +000BBCr 1 BC .byt %10111100 +000BBDr 1 BD .byt %10111101 +000BBEr 1 BE .byt %10111110 +000BBFr 1 BF .byt %10111111 +000BC0r 1 C0 .byt %11000000 +000BC1r 1 C1 .byt %11000001 +000BC2r 1 C2 .byt %11000010 +000BC3r 1 C3 .byt %11000011 +000BC4r 1 C4 .byt %11000100 +000BC5r 1 C5 .byt %11000101 +000BC6r 1 C6 .byt %11000110 +000BC7r 1 C7 .byt %11000111 +000BC8r 1 C8 .byt %11001000 +000BC9r 1 C9 .byt %11001001 +000BCAr 1 CA .byt %11001010 +000BCBr 1 CB .byt %11001011 +000BCCr 1 CC .byt %11001100 +000BCDr 1 CD .byt %11001101 +000BCEr 1 CE .byt %11001110 +000BCFr 1 CF .byt %11001111 +000BD0r 1 D0 .byt %11010000 +000BD1r 1 D1 .byt %11010001 +000BD2r 1 D2 .byt %11010010 +000BD3r 1 D3 .byt %11010011 +000BD4r 1 D4 .byt %11010100 +000BD5r 1 D5 .byt %11010101 +000BD6r 1 D6 .byt %11010110 +000BD7r 1 D7 .byt %11010111 +000BD8r 1 D8 .byt %11011000 +000BD9r 1 D9 .byt %11011001 +000BDAr 1 DA .byt %11011010 +000BDBr 1 DB .byt %11011011 +000BDCr 1 DC .byt %11011100 +000BDDr 1 DD .byt %11011101 +000BDEr 1 DE .byt %11011110 +000BDFr 1 DF .byt %11011111 +000BE0r 1 E0 .byt %11100000 +000BE1r 1 E1 .byt %11100001 +000BE2r 1 E2 .byt %11100010 +000BE3r 1 E3 .byt %11100011 +000BE4r 1 E4 .byt %11100100 +000BE5r 1 E5 .byt %11100101 +000BE6r 1 E6 .byt %11100110 +000BE7r 1 E7 .byt %11100111 +000BE8r 1 E8 .byt %11101000 +000BE9r 1 E9 .byt %11101001 +000BEAr 1 EA .byt %11101010 +000BEBr 1 EB .byt %11101011 +000BECr 1 EC .byt %11101100 +000BEDr 1 ED .byt %11101101 +000BEEr 1 EE .byt %11101110 +000BEFr 1 EF .byt %11101111 +000BF0r 1 F0 .byt %11110000 +000BF1r 1 F1 .byt %11110001 +000BF2r 1 F2 .byt %11110010 +000BF3r 1 F3 .byt %11110011 +000BF4r 1 F4 .byt %11110100 +000BF5r 1 F5 .byt %11110101 +000BF6r 1 F6 .byt %11110110 +000BF7r 1 F7 .byt %11110111 +000BF8r 1 F8 .byt %11111000 +000BF9r 1 F9 .byt %11111001 +000BFAr 1 FA .byt %11111010 +000BFBr 1 FB .byt %11111011 +000BFCr 1 FC .byt %11111100 +000BFDr 1 FD .byt %11111101 +000BFEr 1 FE .byt %11111110 +000BFFr 1 FF .byt %11111111 +000C00r 1 +000C00r 1 ; binary values, full length +000C00r 1 00 .byt %00000000 +000C01r 1 01 .byt %00000001 +000C02r 1 02 .byt %00000010 +000C03r 1 03 .byt %00000011 +000C04r 1 04 .byt %00000100 +000C05r 1 05 .byt %00000101 +000C06r 1 06 .byt %00000110 +000C07r 1 07 .byt %00000111 +000C08r 1 08 .byt %00001000 +000C09r 1 09 .byt %00001001 +000C0Ar 1 0A .byt %00001010 +000C0Br 1 0B .byt %00001011 +000C0Cr 1 0C .byt %00001100 +000C0Dr 1 0D .byt %00001101 +000C0Er 1 0E .byt %00001110 +000C0Fr 1 0F .byt %00001111 +000C10r 1 10 .byt %00010000 +000C11r 1 11 .byt %00010001 +000C12r 1 12 .byt %00010010 +000C13r 1 13 .byt %00010011 +000C14r 1 14 .byt %00010100 +000C15r 1 15 .byt %00010101 +000C16r 1 16 .byt %00010110 +000C17r 1 17 .byt %00010111 +000C18r 1 18 .byt %00011000 +000C19r 1 19 .byt %00011001 +000C1Ar 1 1A .byt %00011010 +000C1Br 1 1B .byt %00011011 +000C1Cr 1 1C .byt %00011100 +000C1Dr 1 1D .byt %00011101 +000C1Er 1 1E .byt %00011110 +000C1Fr 1 1F .byt %00011111 +000C20r 1 20 .byt %00100000 +000C21r 1 21 .byt %00100001 +000C22r 1 22 .byt %00100010 +000C23r 1 23 .byt %00100011 +000C24r 1 24 .byt %00100100 +000C25r 1 25 .byt %00100101 +000C26r 1 26 .byt %00100110 +000C27r 1 27 .byt %00100111 +000C28r 1 28 .byt %00101000 +000C29r 1 29 .byt %00101001 +000C2Ar 1 2A .byt %00101010 +000C2Br 1 2B .byt %00101011 +000C2Cr 1 2C .byt %00101100 +000C2Dr 1 2D .byt %00101101 +000C2Er 1 2E .byt %00101110 +000C2Fr 1 2F .byt %00101111 +000C30r 1 30 .byt %00110000 +000C31r 1 31 .byt %00110001 +000C32r 1 32 .byt %00110010 +000C33r 1 33 .byt %00110011 +000C34r 1 34 .byt %00110100 +000C35r 1 35 .byt %00110101 +000C36r 1 36 .byt %00110110 +000C37r 1 37 .byt %00110111 +000C38r 1 38 .byt %00111000 +000C39r 1 39 .byt %00111001 +000C3Ar 1 3A .byt %00111010 +000C3Br 1 3B .byt %00111011 +000C3Cr 1 3C .byt %00111100 +000C3Dr 1 3D .byt %00111101 +000C3Er 1 3E .byt %00111110 +000C3Fr 1 3F .byt %00111111 +000C40r 1 40 .byt %01000000 +000C41r 1 41 .byt %01000001 +000C42r 1 42 .byt %01000010 +000C43r 1 43 .byt %01000011 +000C44r 1 44 .byt %01000100 +000C45r 1 45 .byt %01000101 +000C46r 1 46 .byt %01000110 +000C47r 1 47 .byt %01000111 +000C48r 1 48 .byt %01001000 +000C49r 1 49 .byt %01001001 +000C4Ar 1 4A .byt %01001010 +000C4Br 1 4B .byt %01001011 +000C4Cr 1 4C .byt %01001100 +000C4Dr 1 4D .byt %01001101 +000C4Er 1 4E .byt %01001110 +000C4Fr 1 4F .byt %01001111 +000C50r 1 50 .byt %01010000 +000C51r 1 51 .byt %01010001 +000C52r 1 52 .byt %01010010 +000C53r 1 53 .byt %01010011 +000C54r 1 54 .byt %01010100 +000C55r 1 55 .byt %01010101 +000C56r 1 56 .byt %01010110 +000C57r 1 57 .byt %01010111 +000C58r 1 58 .byt %01011000 +000C59r 1 59 .byt %01011001 +000C5Ar 1 5A .byt %01011010 +000C5Br 1 5B .byt %01011011 +000C5Cr 1 5C .byt %01011100 +000C5Dr 1 5D .byt %01011101 +000C5Er 1 5E .byt %01011110 +000C5Fr 1 5F .byt %01011111 +000C60r 1 60 .byt %01100000 +000C61r 1 61 .byt %01100001 +000C62r 1 62 .byt %01100010 +000C63r 1 63 .byt %01100011 +000C64r 1 64 .byt %01100100 +000C65r 1 65 .byt %01100101 +000C66r 1 66 .byt %01100110 +000C67r 1 67 .byt %01100111 +000C68r 1 68 .byt %01101000 +000C69r 1 69 .byt %01101001 +000C6Ar 1 6A .byt %01101010 +000C6Br 1 6B .byt %01101011 +000C6Cr 1 6C .byt %01101100 +000C6Dr 1 6D .byt %01101101 +000C6Er 1 6E .byt %01101110 +000C6Fr 1 6F .byt %01101111 +000C70r 1 70 .byt %01110000 +000C71r 1 71 .byt %01110001 +000C72r 1 72 .byt %01110010 +000C73r 1 73 .byt %01110011 +000C74r 1 74 .byt %01110100 +000C75r 1 75 .byt %01110101 +000C76r 1 76 .byt %01110110 +000C77r 1 77 .byt %01110111 +000C78r 1 78 .byt %01111000 +000C79r 1 79 .byt %01111001 +000C7Ar 1 7A .byt %01111010 +000C7Br 1 7B .byt %01111011 +000C7Cr 1 7C .byt %01111100 +000C7Dr 1 7D .byt %01111101 +000C7Er 1 7E .byt %01111110 +000C7Fr 1 7F .byt %01111111 +000C80r 1 80 .byt %10000000 +000C81r 1 81 .byt %10000001 +000C82r 1 82 .byt %10000010 +000C83r 1 83 .byt %10000011 +000C84r 1 84 .byt %10000100 +000C85r 1 85 .byt %10000101 +000C86r 1 86 .byt %10000110 +000C87r 1 87 .byt %10000111 +000C88r 1 88 .byt %10001000 +000C89r 1 89 .byt %10001001 +000C8Ar 1 8A .byt %10001010 +000C8Br 1 8B .byt %10001011 +000C8Cr 1 8C .byt %10001100 +000C8Dr 1 8D .byt %10001101 +000C8Er 1 8E .byt %10001110 +000C8Fr 1 8F .byt %10001111 +000C90r 1 90 .byt %10010000 +000C91r 1 91 .byt %10010001 +000C92r 1 92 .byt %10010010 +000C93r 1 93 .byt %10010011 +000C94r 1 94 .byt %10010100 +000C95r 1 95 .byt %10010101 +000C96r 1 96 .byt %10010110 +000C97r 1 97 .byt %10010111 +000C98r 1 98 .byt %10011000 +000C99r 1 99 .byt %10011001 +000C9Ar 1 9A .byt %10011010 +000C9Br 1 9B .byt %10011011 +000C9Cr 1 9C .byt %10011100 +000C9Dr 1 9D .byt %10011101 +000C9Er 1 9E .byt %10011110 +000C9Fr 1 9F .byt %10011111 +000CA0r 1 A0 .byt %10100000 +000CA1r 1 A1 .byt %10100001 +000CA2r 1 A2 .byt %10100010 +000CA3r 1 A3 .byt %10100011 +000CA4r 1 A4 .byt %10100100 +000CA5r 1 A5 .byt %10100101 +000CA6r 1 A6 .byt %10100110 +000CA7r 1 A7 .byt %10100111 +000CA8r 1 A8 .byt %10101000 +000CA9r 1 A9 .byt %10101001 +000CAAr 1 AA .byt %10101010 +000CABr 1 AB .byt %10101011 +000CACr 1 AC .byt %10101100 +000CADr 1 AD .byt %10101101 +000CAEr 1 AE .byt %10101110 +000CAFr 1 AF .byt %10101111 +000CB0r 1 B0 .byt %10110000 +000CB1r 1 B1 .byt %10110001 +000CB2r 1 B2 .byt %10110010 +000CB3r 1 B3 .byt %10110011 +000CB4r 1 B4 .byt %10110100 +000CB5r 1 B5 .byt %10110101 +000CB6r 1 B6 .byt %10110110 +000CB7r 1 B7 .byt %10110111 +000CB8r 1 B8 .byt %10111000 +000CB9r 1 B9 .byt %10111001 +000CBAr 1 BA .byt %10111010 +000CBBr 1 BB .byt %10111011 +000CBCr 1 BC .byt %10111100 +000CBDr 1 BD .byt %10111101 +000CBEr 1 BE .byt %10111110 +000CBFr 1 BF .byt %10111111 +000CC0r 1 C0 .byt %11000000 +000CC1r 1 C1 .byt %11000001 +000CC2r 1 C2 .byt %11000010 +000CC3r 1 C3 .byt %11000011 +000CC4r 1 C4 .byt %11000100 +000CC5r 1 C5 .byt %11000101 +000CC6r 1 C6 .byt %11000110 +000CC7r 1 C7 .byt %11000111 +000CC8r 1 C8 .byt %11001000 +000CC9r 1 C9 .byt %11001001 +000CCAr 1 CA .byt %11001010 +000CCBr 1 CB .byt %11001011 +000CCCr 1 CC .byt %11001100 +000CCDr 1 CD .byt %11001101 +000CCEr 1 CE .byt %11001110 +000CCFr 1 CF .byt %11001111 +000CD0r 1 D0 .byt %11010000 +000CD1r 1 D1 .byt %11010001 +000CD2r 1 D2 .byt %11010010 +000CD3r 1 D3 .byt %11010011 +000CD4r 1 D4 .byt %11010100 +000CD5r 1 D5 .byt %11010101 +000CD6r 1 D6 .byt %11010110 +000CD7r 1 D7 .byt %11010111 +000CD8r 1 D8 .byt %11011000 +000CD9r 1 D9 .byt %11011001 +000CDAr 1 DA .byt %11011010 +000CDBr 1 DB .byt %11011011 +000CDCr 1 DC .byt %11011100 +000CDDr 1 DD .byt %11011101 +000CDEr 1 DE .byt %11011110 +000CDFr 1 DF .byt %11011111 +000CE0r 1 E0 .byt %11100000 +000CE1r 1 E1 .byt %11100001 +000CE2r 1 E2 .byt %11100010 +000CE3r 1 E3 .byt %11100011 +000CE4r 1 E4 .byt %11100100 +000CE5r 1 E5 .byt %11100101 +000CE6r 1 E6 .byt %11100110 +000CE7r 1 E7 .byt %11100111 +000CE8r 1 E8 .byt %11101000 +000CE9r 1 E9 .byt %11101001 +000CEAr 1 EA .byt %11101010 +000CEBr 1 EB .byt %11101011 +000CECr 1 EC .byt %11101100 +000CEDr 1 ED .byt %11101101 +000CEEr 1 EE .byt %11101110 +000CEFr 1 EF .byt %11101111 +000CF0r 1 F0 .byt %11110000 +000CF1r 1 F1 .byt %11110001 +000CF2r 1 F2 .byt %11110010 +000CF3r 1 F3 .byt %11110011 +000CF4r 1 F4 .byt %11110100 +000CF5r 1 F5 .byt %11110101 +000CF6r 1 F6 .byt %11110110 +000CF7r 1 F7 .byt %11110111 +000CF8r 1 F8 .byt %11111000 +000CF9r 1 F9 .byt %11111001 +000CFAr 1 FA .byt %11111010 +000CFBr 1 FB .byt %11111011 +000CFCr 1 FC .byt %11111100 +000CFDr 1 FD .byt %11111101 +000CFEr 1 FE .byt %11111110 +000CFFr 1 FF .byt %11111111 +000D00r 1 +000D00r 1 ; some character values +000D00r 1 20 .byt ' ' +000D01r 1 21 .byt '!' +000D02r 1 22 .byt '"' +000D03r 1 23 .byt '#' +000D04r 1 24 .byt '$' +000D05r 1 25 .byt '%' +000D06r 1 26 .byt '&' +000D07r 1 27 .byt ''' +000D08r 1 28 .byt '(' +000D09r 1 29 .byt ')' +000D0Ar 1 2A .byt '*' +000D0Br 1 2B .byt '+' +000D0Cr 1 2C .byt ',' +000D0Dr 1 2D .byt '-' +000D0Er 1 2E .byt '.' +000D0Fr 1 2F .byt '/' +000D10r 1 30 .byt '0' +000D11r 1 31 .byt '1' +000D12r 1 32 .byt '2' +000D13r 1 33 .byt '3' +000D14r 1 34 .byt '4' +000D15r 1 35 .byt '5' +000D16r 1 36 .byt '6' +000D17r 1 37 .byt '7' +000D18r 1 38 .byt '8' +000D19r 1 39 .byt '9' +000D1Ar 1 3A .byt ':' +000D1Br 1 3B .byt ';' +000D1Cr 1 3C .byt '<' +000D1Dr 1 3D .byt '=' +000D1Er 1 3E .byt '>' +000D1Fr 1 3F .byt '?' +000D20r 1 40 .byt '@' +000D21r 1 41 .byt 'A' +000D22r 1 42 .byt 'B' +000D23r 1 43 .byt 'C' +000D24r 1 44 .byt 'D' +000D25r 1 45 .byt 'E' +000D26r 1 46 .byt 'F' +000D27r 1 47 .byt 'G' +000D28r 1 48 .byt 'H' +000D29r 1 49 .byt 'I' +000D2Ar 1 4A .byt 'J' +000D2Br 1 4B .byt 'K' +000D2Cr 1 4C .byt 'L' +000D2Dr 1 4D .byt 'M' +000D2Er 1 4E .byt 'N' +000D2Fr 1 4F .byt 'O' +000D30r 1 50 .byt 'P' +000D31r 1 51 .byt 'Q' +000D32r 1 52 .byt 'R' +000D33r 1 53 .byt 'S' +000D34r 1 54 .byt 'T' +000D35r 1 55 .byt 'U' +000D36r 1 56 .byt 'V' +000D37r 1 57 .byt 'W' +000D38r 1 58 .byt 'X' +000D39r 1 59 .byt 'Y' +000D3Ar 1 5A .byt 'Z' +000D3Br 1 5B .byt '[' +000D3Cr 1 5C .byt '\' +000D3Dr 1 5D .byt ']' +000D3Er 1 5E .byt '^' +000D3Fr 1 5F .byt '_' +000D40r 1 60 .byt '`' +000D41r 1 61 .byt 'a' +000D42r 1 62 .byt 'b' +000D43r 1 63 .byt 'c' +000D44r 1 64 .byt 'd' +000D45r 1 65 .byt 'e' +000D46r 1 66 .byt 'f' +000D47r 1 67 .byt 'g' +000D48r 1 68 .byt 'h' +000D49r 1 69 .byt 'i' +000D4Ar 1 6A .byt 'j' +000D4Br 1 6B .byt 'k' +000D4Cr 1 6C .byt 'l' +000D4Dr 1 6D .byt 'm' +000D4Er 1 6E .byt 'n' +000D4Fr 1 6F .byt 'o' +000D50r 1 70 .byt 'p' +000D51r 1 71 .byt 'q' +000D52r 1 72 .byt 'r' +000D53r 1 73 .byt 's' +000D54r 1 74 .byt 't' +000D55r 1 75 .byt 'u' +000D56r 1 76 .byt 'v' +000D57r 1 77 .byt 'w' +000D58r 1 78 .byt 'x' +000D59r 1 79 .byt 'y' +000D5Ar 1 7A .byt 'z' +000D5Br 1 7B .byt '{' +000D5Cr 1 7C .byt '|' +000D5Dr 1 7D .byt '}' +000D5Er 1 7E .byt '~' +000D5Fr 1 +000D5Fr 1 ; multiple values on one line, decimal +000D5Fr 1 00 01 02 03 .byt 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 +000D63r 1 04 05 06 07 +000D67r 1 08 09 0A 0B +000D6Fr 1 10 11 12 13 .byt 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 +000D73r 1 14 15 16 17 +000D77r 1 18 19 1A 1B +000D7Fr 1 20 21 22 23 .byt 32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47 +000D83r 1 24 25 26 27 +000D87r 1 28 29 2A 2B +000D8Fr 1 30 31 32 33 .byt 48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63 +000D93r 1 34 35 36 37 +000D97r 1 38 39 3A 3B +000D9Fr 1 40 41 42 43 .byt 64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79 +000DA3r 1 44 45 46 47 +000DA7r 1 48 49 4A 4B +000DAFr 1 50 51 52 53 .byt 80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95 +000DB3r 1 54 55 56 57 +000DB7r 1 58 59 5A 5B +000DBFr 1 60 61 62 63 .byt 96,97,98,99,100,101,102,103,104,105,106,107,108,109,110,111 +000DC3r 1 64 65 66 67 +000DC7r 1 68 69 6A 6B +000DCFr 1 70 71 72 73 .byt 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 +000DD3r 1 74 75 76 77 +000DD7r 1 78 79 7A 7B +000DDFr 1 80 81 82 83 .byt 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 +000DE3r 1 84 85 86 87 +000DE7r 1 88 89 8A 8B +000DEFr 1 90 91 92 93 .byt 144,145,146,147,148,149,150,151,152,153,154,155,156,157,158,159 +000DF3r 1 94 95 96 97 +000DF7r 1 98 99 9A 9B +000DFFr 1 A0 A1 A2 A3 .byt 160,161,162,163,164,165,166,167,168,169,170,171,172,173,174,175 +000E03r 1 A4 A5 A6 A7 +000E07r 1 A8 A9 AA AB +000E0Fr 1 B0 B1 B2 B3 .byt 176,177,178,179,180,181,182,183,184,185,186,187,188,189,190,191 +000E13r 1 B4 B5 B6 B7 +000E17r 1 B8 B9 BA BB +000E1Fr 1 C0 C1 C2 C3 .byt 192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,207 +000E23r 1 C4 C5 C6 C7 +000E27r 1 C8 C9 CA CB +000E2Fr 1 D0 D1 D2 D3 .byt 208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223 +000E33r 1 D4 D5 D6 D7 +000E37r 1 D8 D9 DA DB +000E3Fr 1 E0 E1 E2 E3 .byt 224,225,226,227,228,229,230,231,232,233,234,235,236,237,238,239 +000E43r 1 E4 E5 E6 E7 +000E47r 1 E8 E9 EA EB +000E4Fr 1 F0 F1 F2 F3 .byt 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 +000E53r 1 F4 F5 F6 F7 +000E57r 1 F8 F9 FA FB +000E5Fr 1 +000E5Fr 1 ; multiple values on one line, hex +000E5Fr 1 00 01 02 03 .byt $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f +000E63r 1 04 05 06 07 +000E67r 1 08 09 0A 0B +000E6Fr 1 10 11 12 13 .byt $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f +000E73r 1 14 15 16 17 +000E77r 1 18 19 1A 1B +000E7Fr 1 20 21 22 23 .byt $20,$21,$22,$23,$24,$25,$26,$27,$28,$29,$2a,$2b,$2c,$2d,$2e,$2f +000E83r 1 24 25 26 27 +000E87r 1 28 29 2A 2B +000E8Fr 1 30 31 32 33 .byt $30,$31,$32,$33,$34,$35,$36,$37,$38,$39,$3a,$3b,$3c,$3d,$3e,$3f +000E93r 1 34 35 36 37 +000E97r 1 38 39 3A 3B +000E9Fr 1 40 41 42 43 .byt $40,$41,$42,$43,$44,$45,$46,$47,$48,$49,$4a,$4b,$4c,$4d,$4e,$4f +000EA3r 1 44 45 46 47 +000EA7r 1 48 49 4A 4B +000EAFr 1 50 51 52 53 .byt $50,$51,$52,$53,$54,$55,$56,$57,$58,$59,$5a,$5b,$5c,$5d,$5e,$5f +000EB3r 1 54 55 56 57 +000EB7r 1 58 59 5A 5B +000EBFr 1 60 61 62 63 .byt $60,$61,$62,$63,$64,$65,$66,$67,$68,$69,$6a,$6b,$6c,$6d,$6e,$6f +000EC3r 1 64 65 66 67 +000EC7r 1 68 69 6A 6B +000ECFr 1 70 71 72 73 .byt $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f +000ED3r 1 74 75 76 77 +000ED7r 1 78 79 7A 7B +000EDFr 1 80 81 82 83 .byt $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f +000EE3r 1 84 85 86 87 +000EE7r 1 88 89 8A 8B +000EEFr 1 90 91 92 93 .byt $90,$91,$92,$93,$94,$95,$96,$97,$98,$99,$9a,$9b,$9c,$9d,$9e,$9f +000EF3r 1 94 95 96 97 +000EF7r 1 98 99 9A 9B +000EFFr 1 A0 A1 A2 A3 .byt $a0,$a1,$a2,$a3,$a4,$a5,$a6,$a7,$a8,$a9,$aa,$ab,$ac,$ad,$ae,$af +000F03r 1 A4 A5 A6 A7 +000F07r 1 A8 A9 AA AB +000F0Fr 1 B0 B1 B2 B3 .byt $b0,$b1,$b2,$b3,$b4,$b5,$b6,$b7,$b8,$b9,$ba,$bb,$bc,$bd,$be,$bf +000F13r 1 B4 B5 B6 B7 +000F17r 1 B8 B9 BA BB +000F1Fr 1 C0 C1 C2 C3 .byt $c0,$c1,$c2,$c3,$c4,$c5,$c6,$c7,$c8,$c9,$ca,$cb,$cc,$cd,$ce,$cf +000F23r 1 C4 C5 C6 C7 +000F27r 1 C8 C9 CA CB +000F2Fr 1 D0 D1 D2 D3 .byt $d0,$d1,$d2,$d3,$d4,$d5,$d6,$d7,$d8,$d9,$da,$db,$dc,$dd,$de,$df +000F33r 1 D4 D5 D6 D7 +000F37r 1 D8 D9 DA DB +000F3Fr 1 E0 E1 E2 E3 .byt $e0,$e1,$e2,$e3,$e4,$e5,$e6,$e7,$e8,$e9,$ea,$eb,$ec,$ed,$ee,$ef +000F43r 1 E4 E5 E6 E7 +000F47r 1 E8 E9 EA EB +000F4Fr 1 F0 F1 F2 F3 .byt $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff +000F53r 1 F4 F5 F6 F7 +000F57r 1 F8 F9 FA FB +000F5Fr 1 +000F5Fr 1 ; multiple values on one line, alternative hex +000F5Fr 1 00 01 02 03 .byt 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh +000F63r 1 04 05 06 07 +000F67r 1 08 09 0A 0B +000F6Fr 1 10 11 12 13 .byt 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh +000F73r 1 14 15 16 17 +000F77r 1 18 19 1A 1B +000F7Fr 1 20 21 22 23 .byt 20h,21h,22h,23h,24h,25h,26h,27h,28h,29h,2ah,2bh,2ch,2dh,2eh,2fh +000F83r 1 24 25 26 27 +000F87r 1 28 29 2A 2B +000F8Fr 1 30 31 32 33 .byt 30h,31h,32h,33h,34h,35h,36h,37h,38h,39h,3ah,3bh,3ch,3dh,3eh,3fh +000F93r 1 34 35 36 37 +000F97r 1 38 39 3A 3B +000F9Fr 1 40 41 42 43 .byt 40h,41h,42h,43h,44h,45h,46h,47h,48h,49h,4ah,4bh,4ch,4dh,4eh,4fh +000FA3r 1 44 45 46 47 +000FA7r 1 48 49 4A 4B +000FAFr 1 50 51 52 53 .byt 50h,51h,52h,53h,54h,55h,56h,57h,58h,59h,5ah,5bh,5ch,5dh,5eh,5fh +000FB3r 1 54 55 56 57 +000FB7r 1 58 59 5A 5B +000FBFr 1 60 61 62 63 .byt 60h,61h,62h,63h,64h,65h,66h,67h,68h,69h,6ah,6bh,6ch,6dh,6eh,6fh +000FC3r 1 64 65 66 67 +000FC7r 1 68 69 6A 6B +000FCFr 1 70 71 72 73 .byt 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh +000FD3r 1 74 75 76 77 +000FD7r 1 78 79 7A 7B +000FDFr 1 80 81 82 83 .byt 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh +000FE3r 1 84 85 86 87 +000FE7r 1 88 89 8A 8B +000FEFr 1 90 91 92 93 .byt 90h,91h,92h,93h,94h,95h,96h,97h,98h,99h,9ah,9bh,9ch,9dh,9eh,9fh +000FF3r 1 94 95 96 97 +000FF7r 1 98 99 9A 9B +000FFFr 1 A0 A1 A2 A3 .byt 0a0h,0a1h,0a2h,0a3h,0a4h,0a5h,0a6h,0a7h,0a8h,0a9h,0aah,0abh,0ach,0adh,0aeh,0afh +001003r 1 A4 A5 A6 A7 +001007r 1 A8 A9 AA AB +00100Fr 1 B0 B1 B2 B3 .byt 0b0h,0b1h,0b2h,0b3h,0b4h,0b5h,0b6h,0b7h,0b8h,0b9h,0bah,0bbh,0bch,0bdh,0beh,0bfh +001013r 1 B4 B5 B6 B7 +001017r 1 B8 B9 BA BB +00101Fr 1 C0 C1 C2 C3 .byt 0c0h,0c1h,0c2h,0c3h,0c4h,0c5h,0c6h,0c7h,0c8h,0c9h,0cah,0cbh,0cch,0cdh,0ceh,0cfh +001023r 1 C4 C5 C6 C7 +001027r 1 C8 C9 CA CB +00102Fr 1 D0 D1 D2 D3 .byt 0d0h,0d1h,0d2h,0d3h,0d4h,0d5h,0d6h,0d7h,0d8h,0d9h,0dah,0dbh,0dch,0ddh,0deh,0dfh +001033r 1 D4 D5 D6 D7 +001037r 1 D8 D9 DA DB +00103Fr 1 E0 E1 E2 E3 .byt 0e0h,0e1h,0e2h,0e3h,0e4h,0e5h,0e6h,0e7h,0e8h,0e9h,0eah,0ebh,0ech,0edh,0eeh,0efh +001043r 1 E4 E5 E6 E7 +001047r 1 E8 E9 EA EB +00104Fr 1 F0 F1 F2 F3 .byt 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh +001053r 1 F4 F5 F6 F7 +001057r 1 F8 F9 FA FB +00105Fr 1 +00105Fr 1 ; multiple values on one line, characters +00105Fr 1 20 21 22 23 .byt ' ','!','"','#','$','%','&',''','(',')','*','+',',','-','.','/' +001063r 1 24 25 26 27 +001067r 1 28 29 2A 2B +00106Fr 1 30 31 32 33 .byt '0','1','2','3','4','5','6','7','8','9',':',';','<','=','>','?' +001073r 1 34 35 36 37 +001077r 1 38 39 3A 3B +00107Fr 1 40 41 42 43 .byt '@','A','B','C','D','E','F','G','H','I','J','K','L','M','N','O' +001083r 1 44 45 46 47 +001087r 1 48 49 4A 4B +00108Fr 1 50 51 52 53 .byt 'P','Q','R','S','T','U','V','W','X','Y','Z','[','\',']','^','_' +001093r 1 54 55 56 57 +001097r 1 58 59 5A 5B +00109Fr 1 60 61 62 63 .byt '`','a','b','c','d','e','f','g','h','i','j','k','l','m','n','o' +0010A3r 1 64 65 66 67 +0010A7r 1 68 69 6A 6B +0010AFr 1 70 71 72 73 .byt 'p','q','r','s','t','u','v','w','x','y','z','{','|','}','~' +0010B3r 1 74 75 76 77 +0010B7r 1 78 79 7A 7B +0010BEr 1 +0010BEr 1 ; some character strings +0010BEr 1 20 21 23 24 .byt " !#$%&'()*+,-." +0010C2r 1 25 26 27 28 +0010C6r 1 29 2A 2B 2C +0010CCr 1 30 31 32 33 .byt "0123456789:;<=>" +0010D0r 1 34 35 36 37 +0010D4r 1 38 39 3A 3B +0010DBr 1 40 41 42 43 .byt "@ABCDEFGHIJKLMN" +0010DFr 1 44 45 46 47 +0010E3r 1 48 49 4A 4B +0010EAr 1 50 51 52 53 .byt "PQRSTUVWXYZ[\]^" +0010EEr 1 54 55 56 57 +0010F2r 1 58 59 5A 5B +0010F9r 1 60 61 62 63 .byt "`abcdefghijklmn" +0010FDr 1 64 65 66 67 +001101r 1 68 69 6A 6B +001108r 1 70 71 72 73 .byt "pqrstuvwxyz{|}" +00110Cr 1 74 75 76 77 +001110r 1 78 79 7A 7B +001116r 1 +001116r 1 ; mix some variants +001116r 1 0B 11 03 11 .byt 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh +00111Ar 1 61 62 7A 41 +00111Er 1 5A 30 39 AA +001125r 1 diff --git a/test/asm/listing/ref/102-word.bin-ref b/test/asm/listing/ref/102-word.bin-ref new file mode 100644 index 000000000..4a0e0747f Binary files /dev/null and b/test/asm/listing/ref/102-word.bin-ref differ diff --git a/test/asm/listing/ref/102-word.list-ref b/test/asm/listing/ref/102-word.list-ref new file mode 100644 index 000000000..5c5d4e9e5 --- /dev/null +++ b/test/asm/listing/ref/102-word.list-ref @@ -0,0 +1,6227 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 102-word.s +Current file: 102-word.s + +000000r 1 ; 2022-06-15 Spiro Trikaliotis +000000r 1 +000000r 1 +000000r 1 ; upper case pseudo-op +000000r 1 00 00 .WORD 0 +000002r 1 01 00 .WORD 1 +000004r 1 02 00 .WORD 2 +000006r 1 03 00 .WORD 3 +000008r 1 04 00 .WORD 4 +00000Ar 1 05 00 .WORD 5 +00000Cr 1 06 00 .WORD 6 +00000Er 1 07 00 .WORD 7 +000010r 1 08 00 .WORD 8 +000012r 1 09 00 .WORD 9 +000014r 1 0A 00 .WORD 10 +000016r 1 0B 00 .WORD 11 +000018r 1 0C 00 .WORD 12 +00001Ar 1 0D 00 .WORD 13 +00001Cr 1 0E 00 .WORD 14 +00001Er 1 0F 00 .WORD 15 +000020r 1 10 00 .WORD 16 +000022r 1 11 00 .WORD 17 +000024r 1 12 00 .WORD 18 +000026r 1 13 00 .WORD 19 +000028r 1 70 00 .WORD 112 +00002Ar 1 71 00 .WORD 113 +00002Cr 1 72 00 .WORD 114 +00002Er 1 73 00 .WORD 115 +000030r 1 74 00 .WORD 116 +000032r 1 75 00 .WORD 117 +000034r 1 76 00 .WORD 118 +000036r 1 77 00 .WORD 119 +000038r 1 78 00 .WORD 120 +00003Ar 1 79 00 .WORD 121 +00003Cr 1 7A 00 .WORD 122 +00003Er 1 7B 00 .WORD 123 +000040r 1 7C 00 .WORD 124 +000042r 1 7D 00 .WORD 125 +000044r 1 7E 00 .WORD 126 +000046r 1 7F 00 .WORD 127 +000048r 1 80 00 .WORD 128 +00004Ar 1 81 00 .WORD 129 +00004Cr 1 82 00 .WORD 130 +00004Er 1 83 00 .WORD 131 +000050r 1 84 00 .WORD 132 +000052r 1 85 00 .WORD 133 +000054r 1 86 00 .WORD 134 +000056r 1 F0 00 .WORD 240 +000058r 1 F1 00 .WORD 241 +00005Ar 1 F2 00 .WORD 242 +00005Cr 1 F3 00 .WORD 243 +00005Er 1 F4 00 .WORD 244 +000060r 1 F5 00 .WORD 245 +000062r 1 F6 00 .WORD 246 +000064r 1 F7 00 .WORD 247 +000066r 1 F8 00 .WORD 248 +000068r 1 F9 00 .WORD 249 +00006Ar 1 FA 00 .WORD 250 +00006Cr 1 FB 00 .WORD 251 +00006Er 1 FC 00 .WORD 252 +000070r 1 FD 00 .WORD 253 +000072r 1 FE 00 .WORD 254 +000074r 1 FF 00 .WORD 255 +000076r 1 00 01 .WORD 256 +000078r 1 01 01 .WORD 257 +00007Ar 1 02 01 .WORD 258 +00007Cr 1 03 01 .WORD 259 +00007Er 1 D2 0F .WORD 4050 +000080r 1 D3 0F .WORD 4051 +000082r 1 D4 0F .WORD 4052 +000084r 1 D5 0F .WORD 4053 +000086r 1 D6 0F .WORD 4054 +000088r 1 D7 0F .WORD 4055 +00008Ar 1 D8 0F .WORD 4056 +00008Cr 1 D9 0F .WORD 4057 +00008Er 1 DA 0F .WORD 4058 +000090r 1 DB 0F .WORD 4059 +000092r 1 DC 0F .WORD 4060 +000094r 1 DD 0F .WORD 4061 +000096r 1 DE 0F .WORD 4062 +000098r 1 DF 0F .WORD 4063 +00009Ar 1 E0 0F .WORD 4064 +00009Cr 1 E1 0F .WORD 4065 +00009Er 1 E2 0F .WORD 4066 +0000A0r 1 E3 0F .WORD 4067 +0000A2r 1 E4 0F .WORD 4068 +0000A4r 1 E5 0F .WORD 4069 +0000A6r 1 E6 0F .WORD 4070 +0000A8r 1 E7 0F .WORD 4071 +0000AAr 1 E8 0F .WORD 4072 +0000ACr 1 E9 0F .WORD 4073 +0000AEr 1 EA 0F .WORD 4074 +0000B0r 1 EB 0F .WORD 4075 +0000B2r 1 EC 0F .WORD 4076 +0000B4r 1 ED 0F .WORD 4077 +0000B6r 1 EE 0F .WORD 4078 +0000B8r 1 EF 0F .WORD 4079 +0000BAr 1 F0 0F .WORD 4080 +0000BCr 1 F1 0F .WORD 4081 +0000BEr 1 F2 0F .WORD 4082 +0000C0r 1 F3 0F .WORD 4083 +0000C2r 1 F4 0F .WORD 4084 +0000C4r 1 F5 0F .WORD 4085 +0000C6r 1 F6 0F .WORD 4086 +0000C8r 1 F7 0F .WORD 4087 +0000CAr 1 F8 0F .WORD 4088 +0000CCr 1 F9 0F .WORD 4089 +0000CEr 1 FA 0F .WORD 4090 +0000D0r 1 FB 0F .WORD 4091 +0000D2r 1 FC 0F .WORD 4092 +0000D4r 1 FD 0F .WORD 4093 +0000D6r 1 FE 0F .WORD 4094 +0000D8r 1 FF 0F .WORD 4095 +0000DAr 1 00 10 .WORD 4096 +0000DCr 1 01 10 .WORD 4097 +0000DEr 1 02 10 .WORD 4098 +0000E0r 1 03 10 .WORD 4099 +0000E2r 1 04 10 .WORD 4100 +0000E4r 1 05 10 .WORD 4101 +0000E6r 1 06 10 .WORD 4102 +0000E8r 1 07 10 .WORD 4103 +0000EAr 1 08 10 .WORD 4104 +0000ECr 1 F0 7F .WORD 32752 +0000EEr 1 F1 7F .WORD 32753 +0000F0r 1 F2 7F .WORD 32754 +0000F2r 1 F3 7F .WORD 32755 +0000F4r 1 F4 7F .WORD 32756 +0000F6r 1 F5 7F .WORD 32757 +0000F8r 1 F6 7F .WORD 32758 +0000FAr 1 F7 7F .WORD 32759 +0000FCr 1 F8 7F .WORD 32760 +0000FEr 1 F9 7F .WORD 32761 +000100r 1 FA 7F .WORD 32762 +000102r 1 FB 7F .WORD 32763 +000104r 1 FC 7F .WORD 32764 +000106r 1 FD 7F .WORD 32765 +000108r 1 FE 7F .WORD 32766 +00010Ar 1 FF 7F .WORD 32767 +00010Cr 1 00 80 .WORD 32768 +00010Er 1 01 80 .WORD 32769 +000110r 1 02 80 .WORD 32770 +000112r 1 03 80 .WORD 32771 +000114r 1 04 80 .WORD 32772 +000116r 1 05 80 .WORD 32773 +000118r 1 06 80 .WORD 32774 +00011Ar 1 07 80 .WORD 32775 +00011Cr 1 08 80 .WORD 32776 +00011Er 1 09 80 .WORD 32777 +000120r 1 0A 80 .WORD 32778 +000122r 1 0B 80 .WORD 32779 +000124r 1 E1 9F .WORD 40929 +000126r 1 E2 9F .WORD 40930 +000128r 1 E3 9F .WORD 40931 +00012Ar 1 E4 9F .WORD 40932 +00012Cr 1 E5 9F .WORD 40933 +00012Er 1 E6 9F .WORD 40934 +000130r 1 E7 9F .WORD 40935 +000132r 1 E8 9F .WORD 40936 +000134r 1 E9 9F .WORD 40937 +000136r 1 EA 9F .WORD 40938 +000138r 1 EB 9F .WORD 40939 +00013Ar 1 EC 9F .WORD 40940 +00013Cr 1 ED 9F .WORD 40941 +00013Er 1 EE 9F .WORD 40942 +000140r 1 EF 9F .WORD 40943 +000142r 1 F0 9F .WORD 40944 +000144r 1 F1 9F .WORD 40945 +000146r 1 F2 9F .WORD 40946 +000148r 1 F3 9F .WORD 40947 +00014Ar 1 F4 9F .WORD 40948 +00014Cr 1 F5 9F .WORD 40949 +00014Er 1 F6 9F .WORD 40950 +000150r 1 F7 9F .WORD 40951 +000152r 1 F8 9F .WORD 40952 +000154r 1 F9 9F .WORD 40953 +000156r 1 FA 9F .WORD 40954 +000158r 1 FB 9F .WORD 40955 +00015Ar 1 FC 9F .WORD 40956 +00015Cr 1 FD 9F .WORD 40957 +00015Er 1 FE 9F .WORD 40958 +000160r 1 FF 9F .WORD 40959 +000162r 1 00 A0 .WORD 40960 +000164r 1 01 A0 .WORD 40961 +000166r 1 02 A0 .WORD 40962 +000168r 1 03 A0 .WORD 40963 +00016Ar 1 04 A0 .WORD 40964 +00016Cr 1 05 A0 .WORD 40965 +00016Er 1 06 A0 .WORD 40966 +000170r 1 07 A0 .WORD 40967 +000172r 1 08 A0 .WORD 40968 +000174r 1 09 A0 .WORD 40969 +000176r 1 0A A0 .WORD 40970 +000178r 1 0B A0 .WORD 40971 +00017Ar 1 0C A0 .WORD 40972 +00017Cr 1 0D A0 .WORD 40973 +00017Er 1 0E A0 .WORD 40974 +000180r 1 0F A0 .WORD 40975 +000182r 1 E1 AF .WORD 45025 +000184r 1 E2 AF .WORD 45026 +000186r 1 E3 AF .WORD 45027 +000188r 1 E4 AF .WORD 45028 +00018Ar 1 E5 AF .WORD 45029 +00018Cr 1 E6 AF .WORD 45030 +00018Er 1 E7 AF .WORD 45031 +000190r 1 E8 AF .WORD 45032 +000192r 1 E9 AF .WORD 45033 +000194r 1 EA AF .WORD 45034 +000196r 1 EB AF .WORD 45035 +000198r 1 EC AF .WORD 45036 +00019Ar 1 ED AF .WORD 45037 +00019Cr 1 EE AF .WORD 45038 +00019Er 1 EF AF .WORD 45039 +0001A0r 1 F0 AF .WORD 45040 +0001A2r 1 F1 AF .WORD 45041 +0001A4r 1 F2 AF .WORD 45042 +0001A6r 1 F3 AF .WORD 45043 +0001A8r 1 F4 AF .WORD 45044 +0001AAr 1 F5 AF .WORD 45045 +0001ACr 1 F6 AF .WORD 45046 +0001AEr 1 F7 AF .WORD 45047 +0001B0r 1 F8 AF .WORD 45048 +0001B2r 1 F9 AF .WORD 45049 +0001B4r 1 FA AF .WORD 45050 +0001B6r 1 FB AF .WORD 45051 +0001B8r 1 FC AF .WORD 45052 +0001BAr 1 FD AF .WORD 45053 +0001BCr 1 FE AF .WORD 45054 +0001BEr 1 FF AF .WORD 45055 +0001C0r 1 00 B0 .WORD 45056 +0001C2r 1 01 B0 .WORD 45057 +0001C4r 1 02 B0 .WORD 45058 +0001C6r 1 03 B0 .WORD 45059 +0001C8r 1 04 B0 .WORD 45060 +0001CAr 1 05 B0 .WORD 45061 +0001CCr 1 06 B0 .WORD 45062 +0001CEr 1 07 B0 .WORD 45063 +0001D0r 1 08 B0 .WORD 45064 +0001D2r 1 09 B0 .WORD 45065 +0001D4r 1 0A B0 .WORD 45066 +0001D6r 1 0B B0 .WORD 45067 +0001D8r 1 0C B0 .WORD 45068 +0001DAr 1 0D B0 .WORD 45069 +0001DCr 1 0E B0 .WORD 45070 +0001DEr 1 0F B0 .WORD 45071 +0001E0r 1 E1 BF .WORD 49121 +0001E2r 1 E2 BF .WORD 49122 +0001E4r 1 E3 BF .WORD 49123 +0001E6r 1 E4 BF .WORD 49124 +0001E8r 1 E5 BF .WORD 49125 +0001EAr 1 E6 BF .WORD 49126 +0001ECr 1 E7 BF .WORD 49127 +0001EEr 1 E8 BF .WORD 49128 +0001F0r 1 E9 BF .WORD 49129 +0001F2r 1 EA BF .WORD 49130 +0001F4r 1 EB BF .WORD 49131 +0001F6r 1 EC BF .WORD 49132 +0001F8r 1 ED BF .WORD 49133 +0001FAr 1 EE BF .WORD 49134 +0001FCr 1 EF BF .WORD 49135 +0001FEr 1 F0 BF .WORD 49136 +000200r 1 F1 BF .WORD 49137 +000202r 1 F2 BF .WORD 49138 +000204r 1 F3 BF .WORD 49139 +000206r 1 F4 BF .WORD 49140 +000208r 1 F5 BF .WORD 49141 +00020Ar 1 F6 BF .WORD 49142 +00020Cr 1 F7 BF .WORD 49143 +00020Er 1 F8 BF .WORD 49144 +000210r 1 F9 BF .WORD 49145 +000212r 1 FA BF .WORD 49146 +000214r 1 FB BF .WORD 49147 +000216r 1 FC BF .WORD 49148 +000218r 1 FD BF .WORD 49149 +00021Ar 1 FE BF .WORD 49150 +00021Cr 1 FF BF .WORD 49151 +00021Er 1 00 C0 .WORD 49152 +000220r 1 01 C0 .WORD 49153 +000222r 1 02 C0 .WORD 49154 +000224r 1 03 C0 .WORD 49155 +000226r 1 04 C0 .WORD 49156 +000228r 1 05 C0 .WORD 49157 +00022Ar 1 06 C0 .WORD 49158 +00022Cr 1 07 C0 .WORD 49159 +00022Er 1 08 C0 .WORD 49160 +000230r 1 09 C0 .WORD 49161 +000232r 1 0A C0 .WORD 49162 +000234r 1 0B C0 .WORD 49163 +000236r 1 0C C0 .WORD 49164 +000238r 1 0D C0 .WORD 49165 +00023Ar 1 0E C0 .WORD 49166 +00023Cr 1 0F C0 .WORD 49167 +00023Er 1 E1 CF .WORD 53217 +000240r 1 E2 CF .WORD 53218 +000242r 1 E3 CF .WORD 53219 +000244r 1 E4 CF .WORD 53220 +000246r 1 E5 CF .WORD 53221 +000248r 1 E6 CF .WORD 53222 +00024Ar 1 E7 CF .WORD 53223 +00024Cr 1 E8 CF .WORD 53224 +00024Er 1 E9 CF .WORD 53225 +000250r 1 EA CF .WORD 53226 +000252r 1 EB CF .WORD 53227 +000254r 1 EC CF .WORD 53228 +000256r 1 ED CF .WORD 53229 +000258r 1 EE CF .WORD 53230 +00025Ar 1 EF CF .WORD 53231 +00025Cr 1 F0 CF .WORD 53232 +00025Er 1 F1 CF .WORD 53233 +000260r 1 F2 CF .WORD 53234 +000262r 1 F3 CF .WORD 53235 +000264r 1 F4 CF .WORD 53236 +000266r 1 F5 CF .WORD 53237 +000268r 1 F6 CF .WORD 53238 +00026Ar 1 F7 CF .WORD 53239 +00026Cr 1 F8 CF .WORD 53240 +00026Er 1 F9 CF .WORD 53241 +000270r 1 FA CF .WORD 53242 +000272r 1 FB CF .WORD 53243 +000274r 1 FC CF .WORD 53244 +000276r 1 FD CF .WORD 53245 +000278r 1 FE CF .WORD 53246 +00027Ar 1 FF CF .WORD 53247 +00027Cr 1 00 D0 .WORD 53248 +00027Er 1 01 D0 .WORD 53249 +000280r 1 02 D0 .WORD 53250 +000282r 1 03 D0 .WORD 53251 +000284r 1 04 D0 .WORD 53252 +000286r 1 05 D0 .WORD 53253 +000288r 1 06 D0 .WORD 53254 +00028Ar 1 07 D0 .WORD 53255 +00028Cr 1 08 D0 .WORD 53256 +00028Er 1 09 D0 .WORD 53257 +000290r 1 0A D0 .WORD 53258 +000292r 1 0B D0 .WORD 53259 +000294r 1 0C D0 .WORD 53260 +000296r 1 0D D0 .WORD 53261 +000298r 1 0E D0 .WORD 53262 +00029Ar 1 0F D0 .WORD 53263 +00029Cr 1 E1 DF .WORD 57313 +00029Er 1 E2 DF .WORD 57314 +0002A0r 1 E3 DF .WORD 57315 +0002A2r 1 E4 DF .WORD 57316 +0002A4r 1 E5 DF .WORD 57317 +0002A6r 1 E6 DF .WORD 57318 +0002A8r 1 E7 DF .WORD 57319 +0002AAr 1 E8 DF .WORD 57320 +0002ACr 1 E9 DF .WORD 57321 +0002AEr 1 EA DF .WORD 57322 +0002B0r 1 EB DF .WORD 57323 +0002B2r 1 EC DF .WORD 57324 +0002B4r 1 ED DF .WORD 57325 +0002B6r 1 EE DF .WORD 57326 +0002B8r 1 EF DF .WORD 57327 +0002BAr 1 F0 DF .WORD 57328 +0002BCr 1 F1 DF .WORD 57329 +0002BEr 1 F2 DF .WORD 57330 +0002C0r 1 F3 DF .WORD 57331 +0002C2r 1 F4 DF .WORD 57332 +0002C4r 1 F5 DF .WORD 57333 +0002C6r 1 F6 DF .WORD 57334 +0002C8r 1 F7 DF .WORD 57335 +0002CAr 1 F8 DF .WORD 57336 +0002CCr 1 F9 DF .WORD 57337 +0002CEr 1 FA DF .WORD 57338 +0002D0r 1 FB DF .WORD 57339 +0002D2r 1 FC DF .WORD 57340 +0002D4r 1 FD DF .WORD 57341 +0002D6r 1 FE DF .WORD 57342 +0002D8r 1 FF DF .WORD 57343 +0002DAr 1 00 E0 .WORD 57344 +0002DCr 1 01 E0 .WORD 57345 +0002DEr 1 02 E0 .WORD 57346 +0002E0r 1 03 E0 .WORD 57347 +0002E2r 1 04 E0 .WORD 57348 +0002E4r 1 05 E0 .WORD 57349 +0002E6r 1 06 E0 .WORD 57350 +0002E8r 1 07 E0 .WORD 57351 +0002EAr 1 08 E0 .WORD 57352 +0002ECr 1 09 E0 .WORD 57353 +0002EEr 1 0A E0 .WORD 57354 +0002F0r 1 0B E0 .WORD 57355 +0002F2r 1 0C E0 .WORD 57356 +0002F4r 1 0D E0 .WORD 57357 +0002F6r 1 0E E0 .WORD 57358 +0002F8r 1 0F E0 .WORD 57359 +0002FAr 1 E1 EF .WORD 61409 +0002FCr 1 E2 EF .WORD 61410 +0002FEr 1 E3 EF .WORD 61411 +000300r 1 E4 EF .WORD 61412 +000302r 1 E5 EF .WORD 61413 +000304r 1 E6 EF .WORD 61414 +000306r 1 E7 EF .WORD 61415 +000308r 1 E8 EF .WORD 61416 +00030Ar 1 E9 EF .WORD 61417 +00030Cr 1 EA EF .WORD 61418 +00030Er 1 EB EF .WORD 61419 +000310r 1 EC EF .WORD 61420 +000312r 1 ED EF .WORD 61421 +000314r 1 EE EF .WORD 61422 +000316r 1 EF EF .WORD 61423 +000318r 1 F0 EF .WORD 61424 +00031Ar 1 F1 EF .WORD 61425 +00031Cr 1 F2 EF .WORD 61426 +00031Er 1 F3 EF .WORD 61427 +000320r 1 F4 EF .WORD 61428 +000322r 1 F5 EF .WORD 61429 +000324r 1 F6 EF .WORD 61430 +000326r 1 F7 EF .WORD 61431 +000328r 1 F8 EF .WORD 61432 +00032Ar 1 F9 EF .WORD 61433 +00032Cr 1 FA EF .WORD 61434 +00032Er 1 FB EF .WORD 61435 +000330r 1 FC EF .WORD 61436 +000332r 1 FD EF .WORD 61437 +000334r 1 FE EF .WORD 61438 +000336r 1 FF EF .WORD 61439 +000338r 1 00 F0 .WORD 61440 +00033Ar 1 01 F0 .WORD 61441 +00033Cr 1 02 F0 .WORD 61442 +00033Er 1 03 F0 .WORD 61443 +000340r 1 04 F0 .WORD 61444 +000342r 1 05 F0 .WORD 61445 +000344r 1 06 F0 .WORD 61446 +000346r 1 07 F0 .WORD 61447 +000348r 1 08 F0 .WORD 61448 +00034Ar 1 09 F0 .WORD 61449 +00034Cr 1 0A F0 .WORD 61450 +00034Er 1 0B F0 .WORD 61451 +000350r 1 0C F0 .WORD 61452 +000352r 1 0D F0 .WORD 61453 +000354r 1 0E F0 .WORD 61454 +000356r 1 0F F0 .WORD 61455 +000358r 1 E1 FF .WORD 65505 +00035Ar 1 E2 FF .WORD 65506 +00035Cr 1 E3 FF .WORD 65507 +00035Er 1 E4 FF .WORD 65508 +000360r 1 E5 FF .WORD 65509 +000362r 1 E6 FF .WORD 65510 +000364r 1 E7 FF .WORD 65511 +000366r 1 E8 FF .WORD 65512 +000368r 1 E9 FF .WORD 65513 +00036Ar 1 EA FF .WORD 65514 +00036Cr 1 EB FF .WORD 65515 +00036Er 1 EC FF .WORD 65516 +000370r 1 ED FF .WORD 65517 +000372r 1 EE FF .WORD 65518 +000374r 1 EF FF .WORD 65519 +000376r 1 F0 FF .WORD 65520 +000378r 1 F1 FF .WORD 65521 +00037Ar 1 F2 FF .WORD 65522 +00037Cr 1 F3 FF .WORD 65523 +00037Er 1 F4 FF .WORD 65524 +000380r 1 F5 FF .WORD 65525 +000382r 1 F6 FF .WORD 65526 +000384r 1 F7 FF .WORD 65527 +000386r 1 F8 FF .WORD 65528 +000388r 1 F9 FF .WORD 65529 +00038Ar 1 FA FF .WORD 65530 +00038Cr 1 FB FF .WORD 65531 +00038Er 1 FC FF .WORD 65532 +000390r 1 FD FF .WORD 65533 +000392r 1 FE FF .WORD 65534 +000394r 1 FF FF .WORD 65535 +000396r 1 +000396r 1 ; lower case pseudo-op +000396r 1 00 00 .word 0 +000398r 1 01 00 .word 1 +00039Ar 1 02 00 .word 2 +00039Cr 1 03 00 .word 3 +00039Er 1 04 00 .word 4 +0003A0r 1 05 00 .word 5 +0003A2r 1 06 00 .word 6 +0003A4r 1 07 00 .word 7 +0003A6r 1 08 00 .word 8 +0003A8r 1 09 00 .word 9 +0003AAr 1 0A 00 .word 10 +0003ACr 1 0B 00 .word 11 +0003AEr 1 0C 00 .word 12 +0003B0r 1 0D 00 .word 13 +0003B2r 1 0E 00 .word 14 +0003B4r 1 0F 00 .word 15 +0003B6r 1 10 00 .word 16 +0003B8r 1 11 00 .word 17 +0003BAr 1 12 00 .word 18 +0003BCr 1 13 00 .word 19 +0003BEr 1 70 00 .word 112 +0003C0r 1 71 00 .word 113 +0003C2r 1 72 00 .word 114 +0003C4r 1 73 00 .word 115 +0003C6r 1 74 00 .word 116 +0003C8r 1 75 00 .word 117 +0003CAr 1 76 00 .word 118 +0003CCr 1 77 00 .word 119 +0003CEr 1 78 00 .word 120 +0003D0r 1 79 00 .word 121 +0003D2r 1 7A 00 .word 122 +0003D4r 1 7B 00 .word 123 +0003D6r 1 7C 00 .word 124 +0003D8r 1 7D 00 .word 125 +0003DAr 1 7E 00 .word 126 +0003DCr 1 7F 00 .word 127 +0003DEr 1 80 00 .word 128 +0003E0r 1 81 00 .word 129 +0003E2r 1 82 00 .word 130 +0003E4r 1 83 00 .word 131 +0003E6r 1 84 00 .word 132 +0003E8r 1 85 00 .word 133 +0003EAr 1 86 00 .word 134 +0003ECr 1 F0 00 .word 240 +0003EEr 1 F1 00 .word 241 +0003F0r 1 F2 00 .word 242 +0003F2r 1 F3 00 .word 243 +0003F4r 1 F4 00 .word 244 +0003F6r 1 F5 00 .word 245 +0003F8r 1 F6 00 .word 246 +0003FAr 1 F7 00 .word 247 +0003FCr 1 F8 00 .word 248 +0003FEr 1 F9 00 .word 249 +000400r 1 FA 00 .word 250 +000402r 1 FB 00 .word 251 +000404r 1 FC 00 .word 252 +000406r 1 FD 00 .word 253 +000408r 1 FE 00 .word 254 +00040Ar 1 FF 00 .word 255 +00040Cr 1 00 01 .word 256 +00040Er 1 01 01 .word 257 +000410r 1 02 01 .word 258 +000412r 1 03 01 .word 259 +000414r 1 D2 0F .word 4050 +000416r 1 D3 0F .word 4051 +000418r 1 D4 0F .word 4052 +00041Ar 1 D5 0F .word 4053 +00041Cr 1 D6 0F .word 4054 +00041Er 1 D7 0F .word 4055 +000420r 1 D8 0F .word 4056 +000422r 1 D9 0F .word 4057 +000424r 1 DA 0F .word 4058 +000426r 1 DB 0F .word 4059 +000428r 1 DC 0F .word 4060 +00042Ar 1 DD 0F .word 4061 +00042Cr 1 DE 0F .word 4062 +00042Er 1 DF 0F .word 4063 +000430r 1 E0 0F .word 4064 +000432r 1 E1 0F .word 4065 +000434r 1 E2 0F .word 4066 +000436r 1 E3 0F .word 4067 +000438r 1 E4 0F .word 4068 +00043Ar 1 E5 0F .word 4069 +00043Cr 1 E6 0F .word 4070 +00043Er 1 E7 0F .word 4071 +000440r 1 E8 0F .word 4072 +000442r 1 E9 0F .word 4073 +000444r 1 EA 0F .word 4074 +000446r 1 EB 0F .word 4075 +000448r 1 EC 0F .word 4076 +00044Ar 1 ED 0F .word 4077 +00044Cr 1 EE 0F .word 4078 +00044Er 1 EF 0F .word 4079 +000450r 1 F0 0F .word 4080 +000452r 1 F1 0F .word 4081 +000454r 1 F2 0F .word 4082 +000456r 1 F3 0F .word 4083 +000458r 1 F4 0F .word 4084 +00045Ar 1 F5 0F .word 4085 +00045Cr 1 F6 0F .word 4086 +00045Er 1 F7 0F .word 4087 +000460r 1 F8 0F .word 4088 +000462r 1 F9 0F .word 4089 +000464r 1 FA 0F .word 4090 +000466r 1 FB 0F .word 4091 +000468r 1 FC 0F .word 4092 +00046Ar 1 FD 0F .word 4093 +00046Cr 1 FE 0F .word 4094 +00046Er 1 FF 0F .word 4095 +000470r 1 00 10 .word 4096 +000472r 1 01 10 .word 4097 +000474r 1 02 10 .word 4098 +000476r 1 03 10 .word 4099 +000478r 1 04 10 .word 4100 +00047Ar 1 05 10 .word 4101 +00047Cr 1 06 10 .word 4102 +00047Er 1 07 10 .word 4103 +000480r 1 08 10 .word 4104 +000482r 1 F0 7F .word 32752 +000484r 1 F1 7F .word 32753 +000486r 1 F2 7F .word 32754 +000488r 1 F3 7F .word 32755 +00048Ar 1 F4 7F .word 32756 +00048Cr 1 F5 7F .word 32757 +00048Er 1 F6 7F .word 32758 +000490r 1 F7 7F .word 32759 +000492r 1 F8 7F .word 32760 +000494r 1 F9 7F .word 32761 +000496r 1 FA 7F .word 32762 +000498r 1 FB 7F .word 32763 +00049Ar 1 FC 7F .word 32764 +00049Cr 1 FD 7F .word 32765 +00049Er 1 FE 7F .word 32766 +0004A0r 1 FF 7F .word 32767 +0004A2r 1 00 80 .word 32768 +0004A4r 1 01 80 .word 32769 +0004A6r 1 02 80 .word 32770 +0004A8r 1 03 80 .word 32771 +0004AAr 1 04 80 .word 32772 +0004ACr 1 05 80 .word 32773 +0004AEr 1 06 80 .word 32774 +0004B0r 1 07 80 .word 32775 +0004B2r 1 08 80 .word 32776 +0004B4r 1 09 80 .word 32777 +0004B6r 1 0A 80 .word 32778 +0004B8r 1 0B 80 .word 32779 +0004BAr 1 E1 9F .word 40929 +0004BCr 1 E2 9F .word 40930 +0004BEr 1 E3 9F .word 40931 +0004C0r 1 E4 9F .word 40932 +0004C2r 1 E5 9F .word 40933 +0004C4r 1 E6 9F .word 40934 +0004C6r 1 E7 9F .word 40935 +0004C8r 1 E8 9F .word 40936 +0004CAr 1 E9 9F .word 40937 +0004CCr 1 EA 9F .word 40938 +0004CEr 1 EB 9F .word 40939 +0004D0r 1 EC 9F .word 40940 +0004D2r 1 ED 9F .word 40941 +0004D4r 1 EE 9F .word 40942 +0004D6r 1 EF 9F .word 40943 +0004D8r 1 F0 9F .word 40944 +0004DAr 1 F1 9F .word 40945 +0004DCr 1 F2 9F .word 40946 +0004DEr 1 F3 9F .word 40947 +0004E0r 1 F4 9F .word 40948 +0004E2r 1 F5 9F .word 40949 +0004E4r 1 F6 9F .word 40950 +0004E6r 1 F7 9F .word 40951 +0004E8r 1 F8 9F .word 40952 +0004EAr 1 F9 9F .word 40953 +0004ECr 1 FA 9F .word 40954 +0004EEr 1 FB 9F .word 40955 +0004F0r 1 FC 9F .word 40956 +0004F2r 1 FD 9F .word 40957 +0004F4r 1 FE 9F .word 40958 +0004F6r 1 FF 9F .word 40959 +0004F8r 1 00 A0 .word 40960 +0004FAr 1 01 A0 .word 40961 +0004FCr 1 02 A0 .word 40962 +0004FEr 1 03 A0 .word 40963 +000500r 1 04 A0 .word 40964 +000502r 1 05 A0 .word 40965 +000504r 1 06 A0 .word 40966 +000506r 1 07 A0 .word 40967 +000508r 1 08 A0 .word 40968 +00050Ar 1 09 A0 .word 40969 +00050Cr 1 0A A0 .word 40970 +00050Er 1 0B A0 .word 40971 +000510r 1 0C A0 .word 40972 +000512r 1 0D A0 .word 40973 +000514r 1 0E A0 .word 40974 +000516r 1 0F A0 .word 40975 +000518r 1 E1 AF .word 45025 +00051Ar 1 E2 AF .word 45026 +00051Cr 1 E3 AF .word 45027 +00051Er 1 E4 AF .word 45028 +000520r 1 E5 AF .word 45029 +000522r 1 E6 AF .word 45030 +000524r 1 E7 AF .word 45031 +000526r 1 E8 AF .word 45032 +000528r 1 E9 AF .word 45033 +00052Ar 1 EA AF .word 45034 +00052Cr 1 EB AF .word 45035 +00052Er 1 EC AF .word 45036 +000530r 1 ED AF .word 45037 +000532r 1 EE AF .word 45038 +000534r 1 EF AF .word 45039 +000536r 1 F0 AF .word 45040 +000538r 1 F1 AF .word 45041 +00053Ar 1 F2 AF .word 45042 +00053Cr 1 F3 AF .word 45043 +00053Er 1 F4 AF .word 45044 +000540r 1 F5 AF .word 45045 +000542r 1 F6 AF .word 45046 +000544r 1 F7 AF .word 45047 +000546r 1 F8 AF .word 45048 +000548r 1 F9 AF .word 45049 +00054Ar 1 FA AF .word 45050 +00054Cr 1 FB AF .word 45051 +00054Er 1 FC AF .word 45052 +000550r 1 FD AF .word 45053 +000552r 1 FE AF .word 45054 +000554r 1 FF AF .word 45055 +000556r 1 00 B0 .word 45056 +000558r 1 01 B0 .word 45057 +00055Ar 1 02 B0 .word 45058 +00055Cr 1 03 B0 .word 45059 +00055Er 1 04 B0 .word 45060 +000560r 1 05 B0 .word 45061 +000562r 1 06 B0 .word 45062 +000564r 1 07 B0 .word 45063 +000566r 1 08 B0 .word 45064 +000568r 1 09 B0 .word 45065 +00056Ar 1 0A B0 .word 45066 +00056Cr 1 0B B0 .word 45067 +00056Er 1 0C B0 .word 45068 +000570r 1 0D B0 .word 45069 +000572r 1 0E B0 .word 45070 +000574r 1 0F B0 .word 45071 +000576r 1 E1 BF .word 49121 +000578r 1 E2 BF .word 49122 +00057Ar 1 E3 BF .word 49123 +00057Cr 1 E4 BF .word 49124 +00057Er 1 E5 BF .word 49125 +000580r 1 E6 BF .word 49126 +000582r 1 E7 BF .word 49127 +000584r 1 E8 BF .word 49128 +000586r 1 E9 BF .word 49129 +000588r 1 EA BF .word 49130 +00058Ar 1 EB BF .word 49131 +00058Cr 1 EC BF .word 49132 +00058Er 1 ED BF .word 49133 +000590r 1 EE BF .word 49134 +000592r 1 EF BF .word 49135 +000594r 1 F0 BF .word 49136 +000596r 1 F1 BF .word 49137 +000598r 1 F2 BF .word 49138 +00059Ar 1 F3 BF .word 49139 +00059Cr 1 F4 BF .word 49140 +00059Er 1 F5 BF .word 49141 +0005A0r 1 F6 BF .word 49142 +0005A2r 1 F7 BF .word 49143 +0005A4r 1 F8 BF .word 49144 +0005A6r 1 F9 BF .word 49145 +0005A8r 1 FA BF .word 49146 +0005AAr 1 FB BF .word 49147 +0005ACr 1 FC BF .word 49148 +0005AEr 1 FD BF .word 49149 +0005B0r 1 FE BF .word 49150 +0005B2r 1 FF BF .word 49151 +0005B4r 1 00 C0 .word 49152 +0005B6r 1 01 C0 .word 49153 +0005B8r 1 02 C0 .word 49154 +0005BAr 1 03 C0 .word 49155 +0005BCr 1 04 C0 .word 49156 +0005BEr 1 05 C0 .word 49157 +0005C0r 1 06 C0 .word 49158 +0005C2r 1 07 C0 .word 49159 +0005C4r 1 08 C0 .word 49160 +0005C6r 1 09 C0 .word 49161 +0005C8r 1 0A C0 .word 49162 +0005CAr 1 0B C0 .word 49163 +0005CCr 1 0C C0 .word 49164 +0005CEr 1 0D C0 .word 49165 +0005D0r 1 0E C0 .word 49166 +0005D2r 1 0F C0 .word 49167 +0005D4r 1 E1 CF .word 53217 +0005D6r 1 E2 CF .word 53218 +0005D8r 1 E3 CF .word 53219 +0005DAr 1 E4 CF .word 53220 +0005DCr 1 E5 CF .word 53221 +0005DEr 1 E6 CF .word 53222 +0005E0r 1 E7 CF .word 53223 +0005E2r 1 E8 CF .word 53224 +0005E4r 1 E9 CF .word 53225 +0005E6r 1 EA CF .word 53226 +0005E8r 1 EB CF .word 53227 +0005EAr 1 EC CF .word 53228 +0005ECr 1 ED CF .word 53229 +0005EEr 1 EE CF .word 53230 +0005F0r 1 EF CF .word 53231 +0005F2r 1 F0 CF .word 53232 +0005F4r 1 F1 CF .word 53233 +0005F6r 1 F2 CF .word 53234 +0005F8r 1 F3 CF .word 53235 +0005FAr 1 F4 CF .word 53236 +0005FCr 1 F5 CF .word 53237 +0005FEr 1 F6 CF .word 53238 +000600r 1 F7 CF .word 53239 +000602r 1 F8 CF .word 53240 +000604r 1 F9 CF .word 53241 +000606r 1 FA CF .word 53242 +000608r 1 FB CF .word 53243 +00060Ar 1 FC CF .word 53244 +00060Cr 1 FD CF .word 53245 +00060Er 1 FE CF .word 53246 +000610r 1 FF CF .word 53247 +000612r 1 00 D0 .word 53248 +000614r 1 01 D0 .word 53249 +000616r 1 02 D0 .word 53250 +000618r 1 03 D0 .word 53251 +00061Ar 1 04 D0 .word 53252 +00061Cr 1 05 D0 .word 53253 +00061Er 1 06 D0 .word 53254 +000620r 1 07 D0 .word 53255 +000622r 1 08 D0 .word 53256 +000624r 1 09 D0 .word 53257 +000626r 1 0A D0 .word 53258 +000628r 1 0B D0 .word 53259 +00062Ar 1 0C D0 .word 53260 +00062Cr 1 0D D0 .word 53261 +00062Er 1 0E D0 .word 53262 +000630r 1 0F D0 .word 53263 +000632r 1 E1 DF .word 57313 +000634r 1 E2 DF .word 57314 +000636r 1 E3 DF .word 57315 +000638r 1 E4 DF .word 57316 +00063Ar 1 E5 DF .word 57317 +00063Cr 1 E6 DF .word 57318 +00063Er 1 E7 DF .word 57319 +000640r 1 E8 DF .word 57320 +000642r 1 E9 DF .word 57321 +000644r 1 EA DF .word 57322 +000646r 1 EB DF .word 57323 +000648r 1 EC DF .word 57324 +00064Ar 1 ED DF .word 57325 +00064Cr 1 EE DF .word 57326 +00064Er 1 EF DF .word 57327 +000650r 1 F0 DF .word 57328 +000652r 1 F1 DF .word 57329 +000654r 1 F2 DF .word 57330 +000656r 1 F3 DF .word 57331 +000658r 1 F4 DF .word 57332 +00065Ar 1 F5 DF .word 57333 +00065Cr 1 F6 DF .word 57334 +00065Er 1 F7 DF .word 57335 +000660r 1 F8 DF .word 57336 +000662r 1 F9 DF .word 57337 +000664r 1 FA DF .word 57338 +000666r 1 FB DF .word 57339 +000668r 1 FC DF .word 57340 +00066Ar 1 FD DF .word 57341 +00066Cr 1 FE DF .word 57342 +00066Er 1 FF DF .word 57343 +000670r 1 00 E0 .word 57344 +000672r 1 01 E0 .word 57345 +000674r 1 02 E0 .word 57346 +000676r 1 03 E0 .word 57347 +000678r 1 04 E0 .word 57348 +00067Ar 1 05 E0 .word 57349 +00067Cr 1 06 E0 .word 57350 +00067Er 1 07 E0 .word 57351 +000680r 1 08 E0 .word 57352 +000682r 1 09 E0 .word 57353 +000684r 1 0A E0 .word 57354 +000686r 1 0B E0 .word 57355 +000688r 1 0C E0 .word 57356 +00068Ar 1 0D E0 .word 57357 +00068Cr 1 0E E0 .word 57358 +00068Er 1 0F E0 .word 57359 +000690r 1 E1 EF .word 61409 +000692r 1 E2 EF .word 61410 +000694r 1 E3 EF .word 61411 +000696r 1 E4 EF .word 61412 +000698r 1 E5 EF .word 61413 +00069Ar 1 E6 EF .word 61414 +00069Cr 1 E7 EF .word 61415 +00069Er 1 E8 EF .word 61416 +0006A0r 1 E9 EF .word 61417 +0006A2r 1 EA EF .word 61418 +0006A4r 1 EB EF .word 61419 +0006A6r 1 EC EF .word 61420 +0006A8r 1 ED EF .word 61421 +0006AAr 1 EE EF .word 61422 +0006ACr 1 EF EF .word 61423 +0006AEr 1 F0 EF .word 61424 +0006B0r 1 F1 EF .word 61425 +0006B2r 1 F2 EF .word 61426 +0006B4r 1 F3 EF .word 61427 +0006B6r 1 F4 EF .word 61428 +0006B8r 1 F5 EF .word 61429 +0006BAr 1 F6 EF .word 61430 +0006BCr 1 F7 EF .word 61431 +0006BEr 1 F8 EF .word 61432 +0006C0r 1 F9 EF .word 61433 +0006C2r 1 FA EF .word 61434 +0006C4r 1 FB EF .word 61435 +0006C6r 1 FC EF .word 61436 +0006C8r 1 FD EF .word 61437 +0006CAr 1 FE EF .word 61438 +0006CCr 1 FF EF .word 61439 +0006CEr 1 00 F0 .word 61440 +0006D0r 1 01 F0 .word 61441 +0006D2r 1 02 F0 .word 61442 +0006D4r 1 03 F0 .word 61443 +0006D6r 1 04 F0 .word 61444 +0006D8r 1 05 F0 .word 61445 +0006DAr 1 06 F0 .word 61446 +0006DCr 1 07 F0 .word 61447 +0006DEr 1 08 F0 .word 61448 +0006E0r 1 09 F0 .word 61449 +0006E2r 1 0A F0 .word 61450 +0006E4r 1 0B F0 .word 61451 +0006E6r 1 0C F0 .word 61452 +0006E8r 1 0D F0 .word 61453 +0006EAr 1 0E F0 .word 61454 +0006ECr 1 0F F0 .word 61455 +0006EEr 1 E1 FF .word 65505 +0006F0r 1 E2 FF .word 65506 +0006F2r 1 E3 FF .word 65507 +0006F4r 1 E4 FF .word 65508 +0006F6r 1 E5 FF .word 65509 +0006F8r 1 E6 FF .word 65510 +0006FAr 1 E7 FF .word 65511 +0006FCr 1 E8 FF .word 65512 +0006FEr 1 E9 FF .word 65513 +000700r 1 EA FF .word 65514 +000702r 1 EB FF .word 65515 +000704r 1 EC FF .word 65516 +000706r 1 ED FF .word 65517 +000708r 1 EE FF .word 65518 +00070Ar 1 EF FF .word 65519 +00070Cr 1 F0 FF .word 65520 +00070Er 1 F1 FF .word 65521 +000710r 1 F2 FF .word 65522 +000712r 1 F3 FF .word 65523 +000714r 1 F4 FF .word 65524 +000716r 1 F5 FF .word 65525 +000718r 1 F6 FF .word 65526 +00071Ar 1 F7 FF .word 65527 +00071Cr 1 F8 FF .word 65528 +00071Er 1 F9 FF .word 65529 +000720r 1 FA FF .word 65530 +000722r 1 FB FF .word 65531 +000724r 1 FC FF .word 65532 +000726r 1 FD FF .word 65533 +000728r 1 FE FF .word 65534 +00072Ar 1 FF FF .word 65535 +00072Cr 1 +00072Cr 1 ; hex values +00072Cr 1 00 00 .word $0 +00072Er 1 01 00 .word $1 +000730r 1 02 00 .word $2 +000732r 1 03 00 .word $3 +000734r 1 04 00 .word $4 +000736r 1 05 00 .word $5 +000738r 1 06 00 .word $6 +00073Ar 1 07 00 .word $7 +00073Cr 1 08 00 .word $8 +00073Er 1 09 00 .word $9 +000740r 1 0A 00 .word $a +000742r 1 0B 00 .word $b +000744r 1 0C 00 .word $c +000746r 1 0D 00 .word $d +000748r 1 0E 00 .word $e +00074Ar 1 0F 00 .word $f +00074Cr 1 10 00 .word $10 +00074Er 1 11 00 .word $11 +000750r 1 12 00 .word $12 +000752r 1 13 00 .word $13 +000754r 1 70 00 .word $70 +000756r 1 71 00 .word $71 +000758r 1 72 00 .word $72 +00075Ar 1 73 00 .word $73 +00075Cr 1 74 00 .word $74 +00075Er 1 75 00 .word $75 +000760r 1 76 00 .word $76 +000762r 1 77 00 .word $77 +000764r 1 78 00 .word $78 +000766r 1 79 00 .word $79 +000768r 1 7A 00 .word $7a +00076Ar 1 7B 00 .word $7b +00076Cr 1 7C 00 .word $7c +00076Er 1 7D 00 .word $7d +000770r 1 7E 00 .word $7e +000772r 1 7F 00 .word $7f +000774r 1 80 00 .word $80 +000776r 1 81 00 .word $81 +000778r 1 82 00 .word $82 +00077Ar 1 83 00 .word $83 +00077Cr 1 84 00 .word $84 +00077Er 1 85 00 .word $85 +000780r 1 86 00 .word $86 +000782r 1 F0 00 .word $f0 +000784r 1 F1 00 .word $f1 +000786r 1 F2 00 .word $f2 +000788r 1 F3 00 .word $f3 +00078Ar 1 F4 00 .word $f4 +00078Cr 1 F5 00 .word $f5 +00078Er 1 F6 00 .word $f6 +000790r 1 F7 00 .word $f7 +000792r 1 F8 00 .word $f8 +000794r 1 F9 00 .word $f9 +000796r 1 FA 00 .word $fa +000798r 1 FB 00 .word $fb +00079Ar 1 FC 00 .word $fc +00079Cr 1 FD 00 .word $fd +00079Er 1 FE 00 .word $fe +0007A0r 1 FF 00 .word $ff +0007A2r 1 00 01 .word $100 +0007A4r 1 01 01 .word $101 +0007A6r 1 02 01 .word $102 +0007A8r 1 03 01 .word $103 +0007AAr 1 D2 0F .word $fd2 +0007ACr 1 D3 0F .word $fd3 +0007AEr 1 D4 0F .word $fd4 +0007B0r 1 D5 0F .word $fd5 +0007B2r 1 D6 0F .word $fd6 +0007B4r 1 D7 0F .word $fd7 +0007B6r 1 D8 0F .word $fd8 +0007B8r 1 D9 0F .word $fd9 +0007BAr 1 DA 0F .word $fda +0007BCr 1 DB 0F .word $fdb +0007BEr 1 DC 0F .word $fdc +0007C0r 1 DD 0F .word $fdd +0007C2r 1 DE 0F .word $fde +0007C4r 1 DF 0F .word $fdf +0007C6r 1 E0 0F .word $fe0 +0007C8r 1 E1 0F .word $fe1 +0007CAr 1 E2 0F .word $fe2 +0007CCr 1 E3 0F .word $fe3 +0007CEr 1 E4 0F .word $fe4 +0007D0r 1 E5 0F .word $fe5 +0007D2r 1 E6 0F .word $fe6 +0007D4r 1 E7 0F .word $fe7 +0007D6r 1 E8 0F .word $fe8 +0007D8r 1 E9 0F .word $fe9 +0007DAr 1 EA 0F .word $fea +0007DCr 1 EB 0F .word $feb +0007DEr 1 EC 0F .word $fec +0007E0r 1 ED 0F .word $fed +0007E2r 1 EE 0F .word $fee +0007E4r 1 EF 0F .word $fef +0007E6r 1 F0 0F .word $ff0 +0007E8r 1 F1 0F .word $ff1 +0007EAr 1 F2 0F .word $ff2 +0007ECr 1 F3 0F .word $ff3 +0007EEr 1 F4 0F .word $ff4 +0007F0r 1 F5 0F .word $ff5 +0007F2r 1 F6 0F .word $ff6 +0007F4r 1 F7 0F .word $ff7 +0007F6r 1 F8 0F .word $ff8 +0007F8r 1 F9 0F .word $ff9 +0007FAr 1 FA 0F .word $ffa +0007FCr 1 FB 0F .word $ffb +0007FEr 1 FC 0F .word $ffc +000800r 1 FD 0F .word $ffd +000802r 1 FE 0F .word $ffe +000804r 1 FF 0F .word $fff +000806r 1 00 10 .word $1000 +000808r 1 01 10 .word $1001 +00080Ar 1 02 10 .word $1002 +00080Cr 1 03 10 .word $1003 +00080Er 1 04 10 .word $1004 +000810r 1 05 10 .word $1005 +000812r 1 06 10 .word $1006 +000814r 1 07 10 .word $1007 +000816r 1 08 10 .word $1008 +000818r 1 F0 7F .word $7ff0 +00081Ar 1 F1 7F .word $7ff1 +00081Cr 1 F2 7F .word $7ff2 +00081Er 1 F3 7F .word $7ff3 +000820r 1 F4 7F .word $7ff4 +000822r 1 F5 7F .word $7ff5 +000824r 1 F6 7F .word $7ff6 +000826r 1 F7 7F .word $7ff7 +000828r 1 F8 7F .word $7ff8 +00082Ar 1 F9 7F .word $7ff9 +00082Cr 1 FA 7F .word $7ffa +00082Er 1 FB 7F .word $7ffb +000830r 1 FC 7F .word $7ffc +000832r 1 FD 7F .word $7ffd +000834r 1 FE 7F .word $7ffe +000836r 1 FF 7F .word $7fff +000838r 1 00 80 .word $8000 +00083Ar 1 01 80 .word $8001 +00083Cr 1 02 80 .word $8002 +00083Er 1 03 80 .word $8003 +000840r 1 04 80 .word $8004 +000842r 1 05 80 .word $8005 +000844r 1 06 80 .word $8006 +000846r 1 07 80 .word $8007 +000848r 1 08 80 .word $8008 +00084Ar 1 09 80 .word $8009 +00084Cr 1 0A 80 .word $800a +00084Er 1 0B 80 .word $800b +000850r 1 E1 9F .word $9fe1 +000852r 1 E2 9F .word $9fe2 +000854r 1 E3 9F .word $9fe3 +000856r 1 E4 9F .word $9fe4 +000858r 1 E5 9F .word $9fe5 +00085Ar 1 E6 9F .word $9fe6 +00085Cr 1 E7 9F .word $9fe7 +00085Er 1 E8 9F .word $9fe8 +000860r 1 E9 9F .word $9fe9 +000862r 1 EA 9F .word $9fea +000864r 1 EB 9F .word $9feb +000866r 1 EC 9F .word $9fec +000868r 1 ED 9F .word $9fed +00086Ar 1 EE 9F .word $9fee +00086Cr 1 EF 9F .word $9fef +00086Er 1 F0 9F .word $9ff0 +000870r 1 F1 9F .word $9ff1 +000872r 1 F2 9F .word $9ff2 +000874r 1 F3 9F .word $9ff3 +000876r 1 F4 9F .word $9ff4 +000878r 1 F5 9F .word $9ff5 +00087Ar 1 F6 9F .word $9ff6 +00087Cr 1 F7 9F .word $9ff7 +00087Er 1 F8 9F .word $9ff8 +000880r 1 F9 9F .word $9ff9 +000882r 1 FA 9F .word $9ffa +000884r 1 FB 9F .word $9ffb +000886r 1 FC 9F .word $9ffc +000888r 1 FD 9F .word $9ffd +00088Ar 1 FE 9F .word $9ffe +00088Cr 1 FF 9F .word $9fff +00088Er 1 00 A0 .word $a000 +000890r 1 01 A0 .word $a001 +000892r 1 02 A0 .word $a002 +000894r 1 03 A0 .word $a003 +000896r 1 04 A0 .word $a004 +000898r 1 05 A0 .word $a005 +00089Ar 1 06 A0 .word $a006 +00089Cr 1 07 A0 .word $a007 +00089Er 1 08 A0 .word $a008 +0008A0r 1 09 A0 .word $a009 +0008A2r 1 0A A0 .word $a00a +0008A4r 1 0B A0 .word $a00b +0008A6r 1 0C A0 .word $a00c +0008A8r 1 0D A0 .word $a00d +0008AAr 1 0E A0 .word $a00e +0008ACr 1 0F A0 .word $a00f +0008AEr 1 E1 AF .word $afe1 +0008B0r 1 E2 AF .word $afe2 +0008B2r 1 E3 AF .word $afe3 +0008B4r 1 E4 AF .word $afe4 +0008B6r 1 E5 AF .word $afe5 +0008B8r 1 E6 AF .word $afe6 +0008BAr 1 E7 AF .word $afe7 +0008BCr 1 E8 AF .word $afe8 +0008BEr 1 E9 AF .word $afe9 +0008C0r 1 EA AF .word $afea +0008C2r 1 EB AF .word $afeb +0008C4r 1 EC AF .word $afec +0008C6r 1 ED AF .word $afed +0008C8r 1 EE AF .word $afee +0008CAr 1 EF AF .word $afef +0008CCr 1 F0 AF .word $aff0 +0008CEr 1 F1 AF .word $aff1 +0008D0r 1 F2 AF .word $aff2 +0008D2r 1 F3 AF .word $aff3 +0008D4r 1 F4 AF .word $aff4 +0008D6r 1 F5 AF .word $aff5 +0008D8r 1 F6 AF .word $aff6 +0008DAr 1 F7 AF .word $aff7 +0008DCr 1 F8 AF .word $aff8 +0008DEr 1 F9 AF .word $aff9 +0008E0r 1 FA AF .word $affa +0008E2r 1 FB AF .word $affb +0008E4r 1 FC AF .word $affc +0008E6r 1 FD AF .word $affd +0008E8r 1 FE AF .word $affe +0008EAr 1 FF AF .word $afff +0008ECr 1 00 B0 .word $b000 +0008EEr 1 01 B0 .word $b001 +0008F0r 1 02 B0 .word $b002 +0008F2r 1 03 B0 .word $b003 +0008F4r 1 04 B0 .word $b004 +0008F6r 1 05 B0 .word $b005 +0008F8r 1 06 B0 .word $b006 +0008FAr 1 07 B0 .word $b007 +0008FCr 1 08 B0 .word $b008 +0008FEr 1 09 B0 .word $b009 +000900r 1 0A B0 .word $b00a +000902r 1 0B B0 .word $b00b +000904r 1 0C B0 .word $b00c +000906r 1 0D B0 .word $b00d +000908r 1 0E B0 .word $b00e +00090Ar 1 0F B0 .word $b00f +00090Cr 1 E1 BF .word $bfe1 +00090Er 1 E2 BF .word $bfe2 +000910r 1 E3 BF .word $bfe3 +000912r 1 E4 BF .word $bfe4 +000914r 1 E5 BF .word $bfe5 +000916r 1 E6 BF .word $bfe6 +000918r 1 E7 BF .word $bfe7 +00091Ar 1 E8 BF .word $bfe8 +00091Cr 1 E9 BF .word $bfe9 +00091Er 1 EA BF .word $bfea +000920r 1 EB BF .word $bfeb +000922r 1 EC BF .word $bfec +000924r 1 ED BF .word $bfed +000926r 1 EE BF .word $bfee +000928r 1 EF BF .word $bfef +00092Ar 1 F0 BF .word $bff0 +00092Cr 1 F1 BF .word $bff1 +00092Er 1 F2 BF .word $bff2 +000930r 1 F3 BF .word $bff3 +000932r 1 F4 BF .word $bff4 +000934r 1 F5 BF .word $bff5 +000936r 1 F6 BF .word $bff6 +000938r 1 F7 BF .word $bff7 +00093Ar 1 F8 BF .word $bff8 +00093Cr 1 F9 BF .word $bff9 +00093Er 1 FA BF .word $bffa +000940r 1 FB BF .word $bffb +000942r 1 FC BF .word $bffc +000944r 1 FD BF .word $bffd +000946r 1 FE BF .word $bffe +000948r 1 FF BF .word $bfff +00094Ar 1 00 C0 .word $c000 +00094Cr 1 01 C0 .word $c001 +00094Er 1 02 C0 .word $c002 +000950r 1 03 C0 .word $c003 +000952r 1 04 C0 .word $c004 +000954r 1 05 C0 .word $c005 +000956r 1 06 C0 .word $c006 +000958r 1 07 C0 .word $c007 +00095Ar 1 08 C0 .word $c008 +00095Cr 1 09 C0 .word $c009 +00095Er 1 0A C0 .word $c00a +000960r 1 0B C0 .word $c00b +000962r 1 0C C0 .word $c00c +000964r 1 0D C0 .word $c00d +000966r 1 0E C0 .word $c00e +000968r 1 0F C0 .word $c00f +00096Ar 1 E1 CF .word $cfe1 +00096Cr 1 E2 CF .word $cfe2 +00096Er 1 E3 CF .word $cfe3 +000970r 1 E4 CF .word $cfe4 +000972r 1 E5 CF .word $cfe5 +000974r 1 E6 CF .word $cfe6 +000976r 1 E7 CF .word $cfe7 +000978r 1 E8 CF .word $cfe8 +00097Ar 1 E9 CF .word $cfe9 +00097Cr 1 EA CF .word $cfea +00097Er 1 EB CF .word $cfeb +000980r 1 EC CF .word $cfec +000982r 1 ED CF .word $cfed +000984r 1 EE CF .word $cfee +000986r 1 EF CF .word $cfef +000988r 1 F0 CF .word $cff0 +00098Ar 1 F1 CF .word $cff1 +00098Cr 1 F2 CF .word $cff2 +00098Er 1 F3 CF .word $cff3 +000990r 1 F4 CF .word $cff4 +000992r 1 F5 CF .word $cff5 +000994r 1 F6 CF .word $cff6 +000996r 1 F7 CF .word $cff7 +000998r 1 F8 CF .word $cff8 +00099Ar 1 F9 CF .word $cff9 +00099Cr 1 FA CF .word $cffa +00099Er 1 FB CF .word $cffb +0009A0r 1 FC CF .word $cffc +0009A2r 1 FD CF .word $cffd +0009A4r 1 FE CF .word $cffe +0009A6r 1 FF CF .word $cfff +0009A8r 1 00 D0 .word $d000 +0009AAr 1 01 D0 .word $d001 +0009ACr 1 02 D0 .word $d002 +0009AEr 1 03 D0 .word $d003 +0009B0r 1 04 D0 .word $d004 +0009B2r 1 05 D0 .word $d005 +0009B4r 1 06 D0 .word $d006 +0009B6r 1 07 D0 .word $d007 +0009B8r 1 08 D0 .word $d008 +0009BAr 1 09 D0 .word $d009 +0009BCr 1 0A D0 .word $d00a +0009BEr 1 0B D0 .word $d00b +0009C0r 1 0C D0 .word $d00c +0009C2r 1 0D D0 .word $d00d +0009C4r 1 0E D0 .word $d00e +0009C6r 1 0F D0 .word $d00f +0009C8r 1 E1 DF .word $dfe1 +0009CAr 1 E2 DF .word $dfe2 +0009CCr 1 E3 DF .word $dfe3 +0009CEr 1 E4 DF .word $dfe4 +0009D0r 1 E5 DF .word $dfe5 +0009D2r 1 E6 DF .word $dfe6 +0009D4r 1 E7 DF .word $dfe7 +0009D6r 1 E8 DF .word $dfe8 +0009D8r 1 E9 DF .word $dfe9 +0009DAr 1 EA DF .word $dfea +0009DCr 1 EB DF .word $dfeb +0009DEr 1 EC DF .word $dfec +0009E0r 1 ED DF .word $dfed +0009E2r 1 EE DF .word $dfee +0009E4r 1 EF DF .word $dfef +0009E6r 1 F0 DF .word $dff0 +0009E8r 1 F1 DF .word $dff1 +0009EAr 1 F2 DF .word $dff2 +0009ECr 1 F3 DF .word $dff3 +0009EEr 1 F4 DF .word $dff4 +0009F0r 1 F5 DF .word $dff5 +0009F2r 1 F6 DF .word $dff6 +0009F4r 1 F7 DF .word $dff7 +0009F6r 1 F8 DF .word $dff8 +0009F8r 1 F9 DF .word $dff9 +0009FAr 1 FA DF .word $dffa +0009FCr 1 FB DF .word $dffb +0009FEr 1 FC DF .word $dffc +000A00r 1 FD DF .word $dffd +000A02r 1 FE DF .word $dffe +000A04r 1 FF DF .word $dfff +000A06r 1 00 E0 .word $e000 +000A08r 1 01 E0 .word $e001 +000A0Ar 1 02 E0 .word $e002 +000A0Cr 1 03 E0 .word $e003 +000A0Er 1 04 E0 .word $e004 +000A10r 1 05 E0 .word $e005 +000A12r 1 06 E0 .word $e006 +000A14r 1 07 E0 .word $e007 +000A16r 1 08 E0 .word $e008 +000A18r 1 09 E0 .word $e009 +000A1Ar 1 0A E0 .word $e00a +000A1Cr 1 0B E0 .word $e00b +000A1Er 1 0C E0 .word $e00c +000A20r 1 0D E0 .word $e00d +000A22r 1 0E E0 .word $e00e +000A24r 1 0F E0 .word $e00f +000A26r 1 E1 EF .word $efe1 +000A28r 1 E2 EF .word $efe2 +000A2Ar 1 E3 EF .word $efe3 +000A2Cr 1 E4 EF .word $efe4 +000A2Er 1 E5 EF .word $efe5 +000A30r 1 E6 EF .word $efe6 +000A32r 1 E7 EF .word $efe7 +000A34r 1 E8 EF .word $efe8 +000A36r 1 E9 EF .word $efe9 +000A38r 1 EA EF .word $efea +000A3Ar 1 EB EF .word $efeb +000A3Cr 1 EC EF .word $efec +000A3Er 1 ED EF .word $efed +000A40r 1 EE EF .word $efee +000A42r 1 EF EF .word $efef +000A44r 1 F0 EF .word $eff0 +000A46r 1 F1 EF .word $eff1 +000A48r 1 F2 EF .word $eff2 +000A4Ar 1 F3 EF .word $eff3 +000A4Cr 1 F4 EF .word $eff4 +000A4Er 1 F5 EF .word $eff5 +000A50r 1 F6 EF .word $eff6 +000A52r 1 F7 EF .word $eff7 +000A54r 1 F8 EF .word $eff8 +000A56r 1 F9 EF .word $eff9 +000A58r 1 FA EF .word $effa +000A5Ar 1 FB EF .word $effb +000A5Cr 1 FC EF .word $effc +000A5Er 1 FD EF .word $effd +000A60r 1 FE EF .word $effe +000A62r 1 FF EF .word $efff +000A64r 1 00 F0 .word $f000 +000A66r 1 01 F0 .word $f001 +000A68r 1 02 F0 .word $f002 +000A6Ar 1 03 F0 .word $f003 +000A6Cr 1 04 F0 .word $f004 +000A6Er 1 05 F0 .word $f005 +000A70r 1 06 F0 .word $f006 +000A72r 1 07 F0 .word $f007 +000A74r 1 08 F0 .word $f008 +000A76r 1 09 F0 .word $f009 +000A78r 1 0A F0 .word $f00a +000A7Ar 1 0B F0 .word $f00b +000A7Cr 1 0C F0 .word $f00c +000A7Er 1 0D F0 .word $f00d +000A80r 1 0E F0 .word $f00e +000A82r 1 0F F0 .word $f00f +000A84r 1 E1 FF .word $ffe1 +000A86r 1 E2 FF .word $ffe2 +000A88r 1 E3 FF .word $ffe3 +000A8Ar 1 E4 FF .word $ffe4 +000A8Cr 1 E5 FF .word $ffe5 +000A8Er 1 E6 FF .word $ffe6 +000A90r 1 E7 FF .word $ffe7 +000A92r 1 E8 FF .word $ffe8 +000A94r 1 E9 FF .word $ffe9 +000A96r 1 EA FF .word $ffea +000A98r 1 EB FF .word $ffeb +000A9Ar 1 EC FF .word $ffec +000A9Cr 1 ED FF .word $ffed +000A9Er 1 EE FF .word $ffee +000AA0r 1 EF FF .word $ffef +000AA2r 1 F0 FF .word $fff0 +000AA4r 1 F1 FF .word $fff1 +000AA6r 1 F2 FF .word $fff2 +000AA8r 1 F3 FF .word $fff3 +000AAAr 1 F4 FF .word $fff4 +000AACr 1 F5 FF .word $fff5 +000AAEr 1 F6 FF .word $fff6 +000AB0r 1 F7 FF .word $fff7 +000AB2r 1 F8 FF .word $fff8 +000AB4r 1 F9 FF .word $fff9 +000AB6r 1 FA FF .word $fffa +000AB8r 1 FB FF .word $fffb +000ABAr 1 FC FF .word $fffc +000ABCr 1 FD FF .word $fffd +000ABEr 1 FE FF .word $fffe +000AC0r 1 FF FF .word $ffff +000AC2r 1 +000AC2r 1 ; hex values, uppercase +000AC2r 1 00 00 .word $0 +000AC4r 1 01 00 .word $1 +000AC6r 1 02 00 .word $2 +000AC8r 1 03 00 .word $3 +000ACAr 1 04 00 .word $4 +000ACCr 1 05 00 .word $5 +000ACEr 1 06 00 .word $6 +000AD0r 1 07 00 .word $7 +000AD2r 1 08 00 .word $8 +000AD4r 1 09 00 .word $9 +000AD6r 1 0A 00 .word $A +000AD8r 1 0B 00 .word $B +000ADAr 1 0C 00 .word $C +000ADCr 1 0D 00 .word $D +000ADEr 1 0E 00 .word $E +000AE0r 1 0F 00 .word $F +000AE2r 1 10 00 .word $10 +000AE4r 1 11 00 .word $11 +000AE6r 1 12 00 .word $12 +000AE8r 1 13 00 .word $13 +000AEAr 1 70 00 .word $70 +000AECr 1 71 00 .word $71 +000AEEr 1 72 00 .word $72 +000AF0r 1 73 00 .word $73 +000AF2r 1 74 00 .word $74 +000AF4r 1 75 00 .word $75 +000AF6r 1 76 00 .word $76 +000AF8r 1 77 00 .word $77 +000AFAr 1 78 00 .word $78 +000AFCr 1 79 00 .word $79 +000AFEr 1 7A 00 .word $7A +000B00r 1 7B 00 .word $7B +000B02r 1 7C 00 .word $7C +000B04r 1 7D 00 .word $7D +000B06r 1 7E 00 .word $7E +000B08r 1 7F 00 .word $7F +000B0Ar 1 80 00 .word $80 +000B0Cr 1 81 00 .word $81 +000B0Er 1 82 00 .word $82 +000B10r 1 83 00 .word $83 +000B12r 1 84 00 .word $84 +000B14r 1 85 00 .word $85 +000B16r 1 86 00 .word $86 +000B18r 1 F0 00 .word $F0 +000B1Ar 1 F1 00 .word $F1 +000B1Cr 1 F2 00 .word $F2 +000B1Er 1 F3 00 .word $F3 +000B20r 1 F4 00 .word $F4 +000B22r 1 F5 00 .word $F5 +000B24r 1 F6 00 .word $F6 +000B26r 1 F7 00 .word $F7 +000B28r 1 F8 00 .word $F8 +000B2Ar 1 F9 00 .word $F9 +000B2Cr 1 FA 00 .word $FA +000B2Er 1 FB 00 .word $FB +000B30r 1 FC 00 .word $FC +000B32r 1 FD 00 .word $FD +000B34r 1 FE 00 .word $FE +000B36r 1 FF 00 .word $FF +000B38r 1 00 01 .word $100 +000B3Ar 1 01 01 .word $101 +000B3Cr 1 02 01 .word $102 +000B3Er 1 03 01 .word $103 +000B40r 1 D2 0F .word $FD2 +000B42r 1 D3 0F .word $FD3 +000B44r 1 D4 0F .word $FD4 +000B46r 1 D5 0F .word $FD5 +000B48r 1 D6 0F .word $FD6 +000B4Ar 1 D7 0F .word $FD7 +000B4Cr 1 D8 0F .word $FD8 +000B4Er 1 D9 0F .word $FD9 +000B50r 1 DA 0F .word $FDA +000B52r 1 DB 0F .word $FDB +000B54r 1 DC 0F .word $FDC +000B56r 1 DD 0F .word $FDD +000B58r 1 DE 0F .word $FDE +000B5Ar 1 DF 0F .word $FDF +000B5Cr 1 E0 0F .word $FE0 +000B5Er 1 E1 0F .word $FE1 +000B60r 1 E2 0F .word $FE2 +000B62r 1 E3 0F .word $FE3 +000B64r 1 E4 0F .word $FE4 +000B66r 1 E5 0F .word $FE5 +000B68r 1 E6 0F .word $FE6 +000B6Ar 1 E7 0F .word $FE7 +000B6Cr 1 E8 0F .word $FE8 +000B6Er 1 E9 0F .word $FE9 +000B70r 1 EA 0F .word $FEA +000B72r 1 EB 0F .word $FEB +000B74r 1 EC 0F .word $FEC +000B76r 1 ED 0F .word $FED +000B78r 1 EE 0F .word $FEE +000B7Ar 1 EF 0F .word $FEF +000B7Cr 1 F0 0F .word $FF0 +000B7Er 1 F1 0F .word $FF1 +000B80r 1 F2 0F .word $FF2 +000B82r 1 F3 0F .word $FF3 +000B84r 1 F4 0F .word $FF4 +000B86r 1 F5 0F .word $FF5 +000B88r 1 F6 0F .word $FF6 +000B8Ar 1 F7 0F .word $FF7 +000B8Cr 1 F8 0F .word $FF8 +000B8Er 1 F9 0F .word $FF9 +000B90r 1 FA 0F .word $FFA +000B92r 1 FB 0F .word $FFB +000B94r 1 FC 0F .word $FFC +000B96r 1 FD 0F .word $FFD +000B98r 1 FE 0F .word $FFE +000B9Ar 1 FF 0F .word $FFF +000B9Cr 1 00 10 .word $1000 +000B9Er 1 01 10 .word $1001 +000BA0r 1 02 10 .word $1002 +000BA2r 1 03 10 .word $1003 +000BA4r 1 04 10 .word $1004 +000BA6r 1 05 10 .word $1005 +000BA8r 1 06 10 .word $1006 +000BAAr 1 07 10 .word $1007 +000BACr 1 08 10 .word $1008 +000BAEr 1 F0 7F .word $7FF0 +000BB0r 1 F1 7F .word $7FF1 +000BB2r 1 F2 7F .word $7FF2 +000BB4r 1 F3 7F .word $7FF3 +000BB6r 1 F4 7F .word $7FF4 +000BB8r 1 F5 7F .word $7FF5 +000BBAr 1 F6 7F .word $7FF6 +000BBCr 1 F7 7F .word $7FF7 +000BBEr 1 F8 7F .word $7FF8 +000BC0r 1 F9 7F .word $7FF9 +000BC2r 1 FA 7F .word $7FFA +000BC4r 1 FB 7F .word $7FFB +000BC6r 1 FC 7F .word $7FFC +000BC8r 1 FD 7F .word $7FFD +000BCAr 1 FE 7F .word $7FFE +000BCCr 1 FF 7F .word $7FFF +000BCEr 1 00 80 .word $8000 +000BD0r 1 01 80 .word $8001 +000BD2r 1 02 80 .word $8002 +000BD4r 1 03 80 .word $8003 +000BD6r 1 04 80 .word $8004 +000BD8r 1 05 80 .word $8005 +000BDAr 1 06 80 .word $8006 +000BDCr 1 07 80 .word $8007 +000BDEr 1 08 80 .word $8008 +000BE0r 1 09 80 .word $8009 +000BE2r 1 0A 80 .word $800A +000BE4r 1 0B 80 .word $800B +000BE6r 1 E1 9F .word $9FE1 +000BE8r 1 E2 9F .word $9FE2 +000BEAr 1 E3 9F .word $9FE3 +000BECr 1 E4 9F .word $9FE4 +000BEEr 1 E5 9F .word $9FE5 +000BF0r 1 E6 9F .word $9FE6 +000BF2r 1 E7 9F .word $9FE7 +000BF4r 1 E8 9F .word $9FE8 +000BF6r 1 E9 9F .word $9FE9 +000BF8r 1 EA 9F .word $9FEA +000BFAr 1 EB 9F .word $9FEB +000BFCr 1 EC 9F .word $9FEC +000BFEr 1 ED 9F .word $9FED +000C00r 1 EE 9F .word $9FEE +000C02r 1 EF 9F .word $9FEF +000C04r 1 F0 9F .word $9FF0 +000C06r 1 F1 9F .word $9FF1 +000C08r 1 F2 9F .word $9FF2 +000C0Ar 1 F3 9F .word $9FF3 +000C0Cr 1 F4 9F .word $9FF4 +000C0Er 1 F5 9F .word $9FF5 +000C10r 1 F6 9F .word $9FF6 +000C12r 1 F7 9F .word $9FF7 +000C14r 1 F8 9F .word $9FF8 +000C16r 1 F9 9F .word $9FF9 +000C18r 1 FA 9F .word $9FFA +000C1Ar 1 FB 9F .word $9FFB +000C1Cr 1 FC 9F .word $9FFC +000C1Er 1 FD 9F .word $9FFD +000C20r 1 FE 9F .word $9FFE +000C22r 1 FF 9F .word $9FFF +000C24r 1 00 A0 .word $A000 +000C26r 1 01 A0 .word $A001 +000C28r 1 02 A0 .word $A002 +000C2Ar 1 03 A0 .word $A003 +000C2Cr 1 04 A0 .word $A004 +000C2Er 1 05 A0 .word $A005 +000C30r 1 06 A0 .word $A006 +000C32r 1 07 A0 .word $A007 +000C34r 1 08 A0 .word $A008 +000C36r 1 09 A0 .word $A009 +000C38r 1 0A A0 .word $A00A +000C3Ar 1 0B A0 .word $A00B +000C3Cr 1 0C A0 .word $A00C +000C3Er 1 0D A0 .word $A00D +000C40r 1 0E A0 .word $A00E +000C42r 1 0F A0 .word $A00F +000C44r 1 E1 AF .word $AFE1 +000C46r 1 E2 AF .word $AFE2 +000C48r 1 E3 AF .word $AFE3 +000C4Ar 1 E4 AF .word $AFE4 +000C4Cr 1 E5 AF .word $AFE5 +000C4Er 1 E6 AF .word $AFE6 +000C50r 1 E7 AF .word $AFE7 +000C52r 1 E8 AF .word $AFE8 +000C54r 1 E9 AF .word $AFE9 +000C56r 1 EA AF .word $AFEA +000C58r 1 EB AF .word $AFEB +000C5Ar 1 EC AF .word $AFEC +000C5Cr 1 ED AF .word $AFED +000C5Er 1 EE AF .word $AFEE +000C60r 1 EF AF .word $AFEF +000C62r 1 F0 AF .word $AFF0 +000C64r 1 F1 AF .word $AFF1 +000C66r 1 F2 AF .word $AFF2 +000C68r 1 F3 AF .word $AFF3 +000C6Ar 1 F4 AF .word $AFF4 +000C6Cr 1 F5 AF .word $AFF5 +000C6Er 1 F6 AF .word $AFF6 +000C70r 1 F7 AF .word $AFF7 +000C72r 1 F8 AF .word $AFF8 +000C74r 1 F9 AF .word $AFF9 +000C76r 1 FA AF .word $AFFA +000C78r 1 FB AF .word $AFFB +000C7Ar 1 FC AF .word $AFFC +000C7Cr 1 FD AF .word $AFFD +000C7Er 1 FE AF .word $AFFE +000C80r 1 FF AF .word $AFFF +000C82r 1 00 B0 .word $B000 +000C84r 1 01 B0 .word $B001 +000C86r 1 02 B0 .word $B002 +000C88r 1 03 B0 .word $B003 +000C8Ar 1 04 B0 .word $B004 +000C8Cr 1 05 B0 .word $B005 +000C8Er 1 06 B0 .word $B006 +000C90r 1 07 B0 .word $B007 +000C92r 1 08 B0 .word $B008 +000C94r 1 09 B0 .word $B009 +000C96r 1 0A B0 .word $B00A +000C98r 1 0B B0 .word $B00B +000C9Ar 1 0C B0 .word $B00C +000C9Cr 1 0D B0 .word $B00D +000C9Er 1 0E B0 .word $B00E +000CA0r 1 0F B0 .word $B00F +000CA2r 1 E1 BF .word $BFE1 +000CA4r 1 E2 BF .word $BFE2 +000CA6r 1 E3 BF .word $BFE3 +000CA8r 1 E4 BF .word $BFE4 +000CAAr 1 E5 BF .word $BFE5 +000CACr 1 E6 BF .word $BFE6 +000CAEr 1 E7 BF .word $BFE7 +000CB0r 1 E8 BF .word $BFE8 +000CB2r 1 E9 BF .word $BFE9 +000CB4r 1 EA BF .word $BFEA +000CB6r 1 EB BF .word $BFEB +000CB8r 1 EC BF .word $BFEC +000CBAr 1 ED BF .word $BFED +000CBCr 1 EE BF .word $BFEE +000CBEr 1 EF BF .word $BFEF +000CC0r 1 F0 BF .word $BFF0 +000CC2r 1 F1 BF .word $BFF1 +000CC4r 1 F2 BF .word $BFF2 +000CC6r 1 F3 BF .word $BFF3 +000CC8r 1 F4 BF .word $BFF4 +000CCAr 1 F5 BF .word $BFF5 +000CCCr 1 F6 BF .word $BFF6 +000CCEr 1 F7 BF .word $BFF7 +000CD0r 1 F8 BF .word $BFF8 +000CD2r 1 F9 BF .word $BFF9 +000CD4r 1 FA BF .word $BFFA +000CD6r 1 FB BF .word $BFFB +000CD8r 1 FC BF .word $BFFC +000CDAr 1 FD BF .word $BFFD +000CDCr 1 FE BF .word $BFFE +000CDEr 1 FF BF .word $BFFF +000CE0r 1 00 C0 .word $C000 +000CE2r 1 01 C0 .word $C001 +000CE4r 1 02 C0 .word $C002 +000CE6r 1 03 C0 .word $C003 +000CE8r 1 04 C0 .word $C004 +000CEAr 1 05 C0 .word $C005 +000CECr 1 06 C0 .word $C006 +000CEEr 1 07 C0 .word $C007 +000CF0r 1 08 C0 .word $C008 +000CF2r 1 09 C0 .word $C009 +000CF4r 1 0A C0 .word $C00A +000CF6r 1 0B C0 .word $C00B +000CF8r 1 0C C0 .word $C00C +000CFAr 1 0D C0 .word $C00D +000CFCr 1 0E C0 .word $C00E +000CFEr 1 0F C0 .word $C00F +000D00r 1 E1 CF .word $CFE1 +000D02r 1 E2 CF .word $CFE2 +000D04r 1 E3 CF .word $CFE3 +000D06r 1 E4 CF .word $CFE4 +000D08r 1 E5 CF .word $CFE5 +000D0Ar 1 E6 CF .word $CFE6 +000D0Cr 1 E7 CF .word $CFE7 +000D0Er 1 E8 CF .word $CFE8 +000D10r 1 E9 CF .word $CFE9 +000D12r 1 EA CF .word $CFEA +000D14r 1 EB CF .word $CFEB +000D16r 1 EC CF .word $CFEC +000D18r 1 ED CF .word $CFED +000D1Ar 1 EE CF .word $CFEE +000D1Cr 1 EF CF .word $CFEF +000D1Er 1 F0 CF .word $CFF0 +000D20r 1 F1 CF .word $CFF1 +000D22r 1 F2 CF .word $CFF2 +000D24r 1 F3 CF .word $CFF3 +000D26r 1 F4 CF .word $CFF4 +000D28r 1 F5 CF .word $CFF5 +000D2Ar 1 F6 CF .word $CFF6 +000D2Cr 1 F7 CF .word $CFF7 +000D2Er 1 F8 CF .word $CFF8 +000D30r 1 F9 CF .word $CFF9 +000D32r 1 FA CF .word $CFFA +000D34r 1 FB CF .word $CFFB +000D36r 1 FC CF .word $CFFC +000D38r 1 FD CF .word $CFFD +000D3Ar 1 FE CF .word $CFFE +000D3Cr 1 FF CF .word $CFFF +000D3Er 1 00 D0 .word $D000 +000D40r 1 01 D0 .word $D001 +000D42r 1 02 D0 .word $D002 +000D44r 1 03 D0 .word $D003 +000D46r 1 04 D0 .word $D004 +000D48r 1 05 D0 .word $D005 +000D4Ar 1 06 D0 .word $D006 +000D4Cr 1 07 D0 .word $D007 +000D4Er 1 08 D0 .word $D008 +000D50r 1 09 D0 .word $D009 +000D52r 1 0A D0 .word $D00A +000D54r 1 0B D0 .word $D00B +000D56r 1 0C D0 .word $D00C +000D58r 1 0D D0 .word $D00D +000D5Ar 1 0E D0 .word $D00E +000D5Cr 1 0F D0 .word $D00F +000D5Er 1 E1 DF .word $DFE1 +000D60r 1 E2 DF .word $DFE2 +000D62r 1 E3 DF .word $DFE3 +000D64r 1 E4 DF .word $DFE4 +000D66r 1 E5 DF .word $DFE5 +000D68r 1 E6 DF .word $DFE6 +000D6Ar 1 E7 DF .word $DFE7 +000D6Cr 1 E8 DF .word $DFE8 +000D6Er 1 E9 DF .word $DFE9 +000D70r 1 EA DF .word $DFEA +000D72r 1 EB DF .word $DFEB +000D74r 1 EC DF .word $DFEC +000D76r 1 ED DF .word $DFED +000D78r 1 EE DF .word $DFEE +000D7Ar 1 EF DF .word $DFEF +000D7Cr 1 F0 DF .word $DFF0 +000D7Er 1 F1 DF .word $DFF1 +000D80r 1 F2 DF .word $DFF2 +000D82r 1 F3 DF .word $DFF3 +000D84r 1 F4 DF .word $DFF4 +000D86r 1 F5 DF .word $DFF5 +000D88r 1 F6 DF .word $DFF6 +000D8Ar 1 F7 DF .word $DFF7 +000D8Cr 1 F8 DF .word $DFF8 +000D8Er 1 F9 DF .word $DFF9 +000D90r 1 FA DF .word $DFFA +000D92r 1 FB DF .word $DFFB +000D94r 1 FC DF .word $DFFC +000D96r 1 FD DF .word $DFFD +000D98r 1 FE DF .word $DFFE +000D9Ar 1 FF DF .word $DFFF +000D9Cr 1 00 E0 .word $E000 +000D9Er 1 01 E0 .word $E001 +000DA0r 1 02 E0 .word $E002 +000DA2r 1 03 E0 .word $E003 +000DA4r 1 04 E0 .word $E004 +000DA6r 1 05 E0 .word $E005 +000DA8r 1 06 E0 .word $E006 +000DAAr 1 07 E0 .word $E007 +000DACr 1 08 E0 .word $E008 +000DAEr 1 09 E0 .word $E009 +000DB0r 1 0A E0 .word $E00A +000DB2r 1 0B E0 .word $E00B +000DB4r 1 0C E0 .word $E00C +000DB6r 1 0D E0 .word $E00D +000DB8r 1 0E E0 .word $E00E +000DBAr 1 0F E0 .word $E00F +000DBCr 1 E1 EF .word $EFE1 +000DBEr 1 E2 EF .word $EFE2 +000DC0r 1 E3 EF .word $EFE3 +000DC2r 1 E4 EF .word $EFE4 +000DC4r 1 E5 EF .word $EFE5 +000DC6r 1 E6 EF .word $EFE6 +000DC8r 1 E7 EF .word $EFE7 +000DCAr 1 E8 EF .word $EFE8 +000DCCr 1 E9 EF .word $EFE9 +000DCEr 1 EA EF .word $EFEA +000DD0r 1 EB EF .word $EFEB +000DD2r 1 EC EF .word $EFEC +000DD4r 1 ED EF .word $EFED +000DD6r 1 EE EF .word $EFEE +000DD8r 1 EF EF .word $EFEF +000DDAr 1 F0 EF .word $EFF0 +000DDCr 1 F1 EF .word $EFF1 +000DDEr 1 F2 EF .word $EFF2 +000DE0r 1 F3 EF .word $EFF3 +000DE2r 1 F4 EF .word $EFF4 +000DE4r 1 F5 EF .word $EFF5 +000DE6r 1 F6 EF .word $EFF6 +000DE8r 1 F7 EF .word $EFF7 +000DEAr 1 F8 EF .word $EFF8 +000DECr 1 F9 EF .word $EFF9 +000DEEr 1 FA EF .word $EFFA +000DF0r 1 FB EF .word $EFFB +000DF2r 1 FC EF .word $EFFC +000DF4r 1 FD EF .word $EFFD +000DF6r 1 FE EF .word $EFFE +000DF8r 1 FF EF .word $EFFF +000DFAr 1 00 F0 .word $F000 +000DFCr 1 01 F0 .word $F001 +000DFEr 1 02 F0 .word $F002 +000E00r 1 03 F0 .word $F003 +000E02r 1 04 F0 .word $F004 +000E04r 1 05 F0 .word $F005 +000E06r 1 06 F0 .word $F006 +000E08r 1 07 F0 .word $F007 +000E0Ar 1 08 F0 .word $F008 +000E0Cr 1 09 F0 .word $F009 +000E0Er 1 0A F0 .word $F00A +000E10r 1 0B F0 .word $F00B +000E12r 1 0C F0 .word $F00C +000E14r 1 0D F0 .word $F00D +000E16r 1 0E F0 .word $F00E +000E18r 1 0F F0 .word $F00F +000E1Ar 1 E1 FF .word $FFE1 +000E1Cr 1 E2 FF .word $FFE2 +000E1Er 1 E3 FF .word $FFE3 +000E20r 1 E4 FF .word $FFE4 +000E22r 1 E5 FF .word $FFE5 +000E24r 1 E6 FF .word $FFE6 +000E26r 1 E7 FF .word $FFE7 +000E28r 1 E8 FF .word $FFE8 +000E2Ar 1 E9 FF .word $FFE9 +000E2Cr 1 EA FF .word $FFEA +000E2Er 1 EB FF .word $FFEB +000E30r 1 EC FF .word $FFEC +000E32r 1 ED FF .word $FFED +000E34r 1 EE FF .word $FFEE +000E36r 1 EF FF .word $FFEF +000E38r 1 F0 FF .word $FFF0 +000E3Ar 1 F1 FF .word $FFF1 +000E3Cr 1 F2 FF .word $FFF2 +000E3Er 1 F3 FF .word $FFF3 +000E40r 1 F4 FF .word $FFF4 +000E42r 1 F5 FF .word $FFF5 +000E44r 1 F6 FF .word $FFF6 +000E46r 1 F7 FF .word $FFF7 +000E48r 1 F8 FF .word $FFF8 +000E4Ar 1 F9 FF .word $FFF9 +000E4Cr 1 FA FF .word $FFFA +000E4Er 1 FB FF .word $FFFB +000E50r 1 FC FF .word $FFFC +000E52r 1 FD FF .word $FFFD +000E54r 1 FE FF .word $FFFE +000E56r 1 FF FF .word $FFFF +000E58r 1 +000E58r 1 ; 4-digit hex values +000E58r 1 00 00 .word $0000 +000E5Ar 1 01 00 .word $0001 +000E5Cr 1 02 00 .word $0002 +000E5Er 1 03 00 .word $0003 +000E60r 1 04 00 .word $0004 +000E62r 1 05 00 .word $0005 +000E64r 1 06 00 .word $0006 +000E66r 1 07 00 .word $0007 +000E68r 1 08 00 .word $0008 +000E6Ar 1 09 00 .word $0009 +000E6Cr 1 0A 00 .word $000a +000E6Er 1 0B 00 .word $000b +000E70r 1 0C 00 .word $000c +000E72r 1 0D 00 .word $000d +000E74r 1 0E 00 .word $000e +000E76r 1 0F 00 .word $000f +000E78r 1 10 00 .word $0010 +000E7Ar 1 11 00 .word $0011 +000E7Cr 1 12 00 .word $0012 +000E7Er 1 13 00 .word $0013 +000E80r 1 70 00 .word $0070 +000E82r 1 71 00 .word $0071 +000E84r 1 72 00 .word $0072 +000E86r 1 73 00 .word $0073 +000E88r 1 74 00 .word $0074 +000E8Ar 1 75 00 .word $0075 +000E8Cr 1 76 00 .word $0076 +000E8Er 1 77 00 .word $0077 +000E90r 1 78 00 .word $0078 +000E92r 1 79 00 .word $0079 +000E94r 1 7A 00 .word $007a +000E96r 1 7B 00 .word $007b +000E98r 1 7C 00 .word $007c +000E9Ar 1 7D 00 .word $007d +000E9Cr 1 7E 00 .word $007e +000E9Er 1 7F 00 .word $007f +000EA0r 1 80 00 .word $0080 +000EA2r 1 81 00 .word $0081 +000EA4r 1 82 00 .word $0082 +000EA6r 1 83 00 .word $0083 +000EA8r 1 84 00 .word $0084 +000EAAr 1 85 00 .word $0085 +000EACr 1 86 00 .word $0086 +000EAEr 1 F0 00 .word $00f0 +000EB0r 1 F1 00 .word $00f1 +000EB2r 1 F2 00 .word $00f2 +000EB4r 1 F3 00 .word $00f3 +000EB6r 1 F4 00 .word $00f4 +000EB8r 1 F5 00 .word $00f5 +000EBAr 1 F6 00 .word $00f6 +000EBCr 1 F7 00 .word $00f7 +000EBEr 1 F8 00 .word $00f8 +000EC0r 1 F9 00 .word $00f9 +000EC2r 1 FA 00 .word $00fa +000EC4r 1 FB 00 .word $00fb +000EC6r 1 FC 00 .word $00fc +000EC8r 1 FD 00 .word $00fd +000ECAr 1 FE 00 .word $00fe +000ECCr 1 FF 00 .word $00ff +000ECEr 1 00 01 .word $0100 +000ED0r 1 01 01 .word $0101 +000ED2r 1 02 01 .word $0102 +000ED4r 1 03 01 .word $0103 +000ED6r 1 D2 0F .word $0fd2 +000ED8r 1 D3 0F .word $0fd3 +000EDAr 1 D4 0F .word $0fd4 +000EDCr 1 D5 0F .word $0fd5 +000EDEr 1 D6 0F .word $0fd6 +000EE0r 1 D7 0F .word $0fd7 +000EE2r 1 D8 0F .word $0fd8 +000EE4r 1 D9 0F .word $0fd9 +000EE6r 1 DA 0F .word $0fda +000EE8r 1 DB 0F .word $0fdb +000EEAr 1 DC 0F .word $0fdc +000EECr 1 DD 0F .word $0fdd +000EEEr 1 DE 0F .word $0fde +000EF0r 1 DF 0F .word $0fdf +000EF2r 1 E0 0F .word $0fe0 +000EF4r 1 E1 0F .word $0fe1 +000EF6r 1 E2 0F .word $0fe2 +000EF8r 1 E3 0F .word $0fe3 +000EFAr 1 E4 0F .word $0fe4 +000EFCr 1 E5 0F .word $0fe5 +000EFEr 1 E6 0F .word $0fe6 +000F00r 1 E7 0F .word $0fe7 +000F02r 1 E8 0F .word $0fe8 +000F04r 1 E9 0F .word $0fe9 +000F06r 1 EA 0F .word $0fea +000F08r 1 EB 0F .word $0feb +000F0Ar 1 EC 0F .word $0fec +000F0Cr 1 ED 0F .word $0fed +000F0Er 1 EE 0F .word $0fee +000F10r 1 EF 0F .word $0fef +000F12r 1 F0 0F .word $0ff0 +000F14r 1 F1 0F .word $0ff1 +000F16r 1 F2 0F .word $0ff2 +000F18r 1 F3 0F .word $0ff3 +000F1Ar 1 F4 0F .word $0ff4 +000F1Cr 1 F5 0F .word $0ff5 +000F1Er 1 F6 0F .word $0ff6 +000F20r 1 F7 0F .word $0ff7 +000F22r 1 F8 0F .word $0ff8 +000F24r 1 F9 0F .word $0ff9 +000F26r 1 FA 0F .word $0ffa +000F28r 1 FB 0F .word $0ffb +000F2Ar 1 FC 0F .word $0ffc +000F2Cr 1 FD 0F .word $0ffd +000F2Er 1 FE 0F .word $0ffe +000F30r 1 FF 0F .word $0fff +000F32r 1 00 10 .word $1000 +000F34r 1 01 10 .word $1001 +000F36r 1 02 10 .word $1002 +000F38r 1 03 10 .word $1003 +000F3Ar 1 04 10 .word $1004 +000F3Cr 1 05 10 .word $1005 +000F3Er 1 06 10 .word $1006 +000F40r 1 07 10 .word $1007 +000F42r 1 08 10 .word $1008 +000F44r 1 F0 7F .word $7ff0 +000F46r 1 F1 7F .word $7ff1 +000F48r 1 F2 7F .word $7ff2 +000F4Ar 1 F3 7F .word $7ff3 +000F4Cr 1 F4 7F .word $7ff4 +000F4Er 1 F5 7F .word $7ff5 +000F50r 1 F6 7F .word $7ff6 +000F52r 1 F7 7F .word $7ff7 +000F54r 1 F8 7F .word $7ff8 +000F56r 1 F9 7F .word $7ff9 +000F58r 1 FA 7F .word $7ffa +000F5Ar 1 FB 7F .word $7ffb +000F5Cr 1 FC 7F .word $7ffc +000F5Er 1 FD 7F .word $7ffd +000F60r 1 FE 7F .word $7ffe +000F62r 1 FF 7F .word $7fff +000F64r 1 00 80 .word $8000 +000F66r 1 01 80 .word $8001 +000F68r 1 02 80 .word $8002 +000F6Ar 1 03 80 .word $8003 +000F6Cr 1 04 80 .word $8004 +000F6Er 1 05 80 .word $8005 +000F70r 1 06 80 .word $8006 +000F72r 1 07 80 .word $8007 +000F74r 1 08 80 .word $8008 +000F76r 1 09 80 .word $8009 +000F78r 1 0A 80 .word $800a +000F7Ar 1 0B 80 .word $800b +000F7Cr 1 E1 9F .word $9fe1 +000F7Er 1 E2 9F .word $9fe2 +000F80r 1 E3 9F .word $9fe3 +000F82r 1 E4 9F .word $9fe4 +000F84r 1 E5 9F .word $9fe5 +000F86r 1 E6 9F .word $9fe6 +000F88r 1 E7 9F .word $9fe7 +000F8Ar 1 E8 9F .word $9fe8 +000F8Cr 1 E9 9F .word $9fe9 +000F8Er 1 EA 9F .word $9fea +000F90r 1 EB 9F .word $9feb +000F92r 1 EC 9F .word $9fec +000F94r 1 ED 9F .word $9fed +000F96r 1 EE 9F .word $9fee +000F98r 1 EF 9F .word $9fef +000F9Ar 1 F0 9F .word $9ff0 +000F9Cr 1 F1 9F .word $9ff1 +000F9Er 1 F2 9F .word $9ff2 +000FA0r 1 F3 9F .word $9ff3 +000FA2r 1 F4 9F .word $9ff4 +000FA4r 1 F5 9F .word $9ff5 +000FA6r 1 F6 9F .word $9ff6 +000FA8r 1 F7 9F .word $9ff7 +000FAAr 1 F8 9F .word $9ff8 +000FACr 1 F9 9F .word $9ff9 +000FAEr 1 FA 9F .word $9ffa +000FB0r 1 FB 9F .word $9ffb +000FB2r 1 FC 9F .word $9ffc +000FB4r 1 FD 9F .word $9ffd +000FB6r 1 FE 9F .word $9ffe +000FB8r 1 FF 9F .word $9fff +000FBAr 1 00 A0 .word $a000 +000FBCr 1 01 A0 .word $a001 +000FBEr 1 02 A0 .word $a002 +000FC0r 1 03 A0 .word $a003 +000FC2r 1 04 A0 .word $a004 +000FC4r 1 05 A0 .word $a005 +000FC6r 1 06 A0 .word $a006 +000FC8r 1 07 A0 .word $a007 +000FCAr 1 08 A0 .word $a008 +000FCCr 1 09 A0 .word $a009 +000FCEr 1 0A A0 .word $a00a +000FD0r 1 0B A0 .word $a00b +000FD2r 1 0C A0 .word $a00c +000FD4r 1 0D A0 .word $a00d +000FD6r 1 0E A0 .word $a00e +000FD8r 1 0F A0 .word $a00f +000FDAr 1 E1 AF .word $afe1 +000FDCr 1 E2 AF .word $afe2 +000FDEr 1 E3 AF .word $afe3 +000FE0r 1 E4 AF .word $afe4 +000FE2r 1 E5 AF .word $afe5 +000FE4r 1 E6 AF .word $afe6 +000FE6r 1 E7 AF .word $afe7 +000FE8r 1 E8 AF .word $afe8 +000FEAr 1 E9 AF .word $afe9 +000FECr 1 EA AF .word $afea +000FEEr 1 EB AF .word $afeb +000FF0r 1 EC AF .word $afec +000FF2r 1 ED AF .word $afed +000FF4r 1 EE AF .word $afee +000FF6r 1 EF AF .word $afef +000FF8r 1 F0 AF .word $aff0 +000FFAr 1 F1 AF .word $aff1 +000FFCr 1 F2 AF .word $aff2 +000FFEr 1 F3 AF .word $aff3 +001000r 1 F4 AF .word $aff4 +001002r 1 F5 AF .word $aff5 +001004r 1 F6 AF .word $aff6 +001006r 1 F7 AF .word $aff7 +001008r 1 F8 AF .word $aff8 +00100Ar 1 F9 AF .word $aff9 +00100Cr 1 FA AF .word $affa +00100Er 1 FB AF .word $affb +001010r 1 FC AF .word $affc +001012r 1 FD AF .word $affd +001014r 1 FE AF .word $affe +001016r 1 FF AF .word $afff +001018r 1 00 B0 .word $b000 +00101Ar 1 01 B0 .word $b001 +00101Cr 1 02 B0 .word $b002 +00101Er 1 03 B0 .word $b003 +001020r 1 04 B0 .word $b004 +001022r 1 05 B0 .word $b005 +001024r 1 06 B0 .word $b006 +001026r 1 07 B0 .word $b007 +001028r 1 08 B0 .word $b008 +00102Ar 1 09 B0 .word $b009 +00102Cr 1 0A B0 .word $b00a +00102Er 1 0B B0 .word $b00b +001030r 1 0C B0 .word $b00c +001032r 1 0D B0 .word $b00d +001034r 1 0E B0 .word $b00e +001036r 1 0F B0 .word $b00f +001038r 1 E1 BF .word $bfe1 +00103Ar 1 E2 BF .word $bfe2 +00103Cr 1 E3 BF .word $bfe3 +00103Er 1 E4 BF .word $bfe4 +001040r 1 E5 BF .word $bfe5 +001042r 1 E6 BF .word $bfe6 +001044r 1 E7 BF .word $bfe7 +001046r 1 E8 BF .word $bfe8 +001048r 1 E9 BF .word $bfe9 +00104Ar 1 EA BF .word $bfea +00104Cr 1 EB BF .word $bfeb +00104Er 1 EC BF .word $bfec +001050r 1 ED BF .word $bfed +001052r 1 EE BF .word $bfee +001054r 1 EF BF .word $bfef +001056r 1 F0 BF .word $bff0 +001058r 1 F1 BF .word $bff1 +00105Ar 1 F2 BF .word $bff2 +00105Cr 1 F3 BF .word $bff3 +00105Er 1 F4 BF .word $bff4 +001060r 1 F5 BF .word $bff5 +001062r 1 F6 BF .word $bff6 +001064r 1 F7 BF .word $bff7 +001066r 1 F8 BF .word $bff8 +001068r 1 F9 BF .word $bff9 +00106Ar 1 FA BF .word $bffa +00106Cr 1 FB BF .word $bffb +00106Er 1 FC BF .word $bffc +001070r 1 FD BF .word $bffd +001072r 1 FE BF .word $bffe +001074r 1 FF BF .word $bfff +001076r 1 00 C0 .word $c000 +001078r 1 01 C0 .word $c001 +00107Ar 1 02 C0 .word $c002 +00107Cr 1 03 C0 .word $c003 +00107Er 1 04 C0 .word $c004 +001080r 1 05 C0 .word $c005 +001082r 1 06 C0 .word $c006 +001084r 1 07 C0 .word $c007 +001086r 1 08 C0 .word $c008 +001088r 1 09 C0 .word $c009 +00108Ar 1 0A C0 .word $c00a +00108Cr 1 0B C0 .word $c00b +00108Er 1 0C C0 .word $c00c +001090r 1 0D C0 .word $c00d +001092r 1 0E C0 .word $c00e +001094r 1 0F C0 .word $c00f +001096r 1 E1 CF .word $cfe1 +001098r 1 E2 CF .word $cfe2 +00109Ar 1 E3 CF .word $cfe3 +00109Cr 1 E4 CF .word $cfe4 +00109Er 1 E5 CF .word $cfe5 +0010A0r 1 E6 CF .word $cfe6 +0010A2r 1 E7 CF .word $cfe7 +0010A4r 1 E8 CF .word $cfe8 +0010A6r 1 E9 CF .word $cfe9 +0010A8r 1 EA CF .word $cfea +0010AAr 1 EB CF .word $cfeb +0010ACr 1 EC CF .word $cfec +0010AEr 1 ED CF .word $cfed +0010B0r 1 EE CF .word $cfee +0010B2r 1 EF CF .word $cfef +0010B4r 1 F0 CF .word $cff0 +0010B6r 1 F1 CF .word $cff1 +0010B8r 1 F2 CF .word $cff2 +0010BAr 1 F3 CF .word $cff3 +0010BCr 1 F4 CF .word $cff4 +0010BEr 1 F5 CF .word $cff5 +0010C0r 1 F6 CF .word $cff6 +0010C2r 1 F7 CF .word $cff7 +0010C4r 1 F8 CF .word $cff8 +0010C6r 1 F9 CF .word $cff9 +0010C8r 1 FA CF .word $cffa +0010CAr 1 FB CF .word $cffb +0010CCr 1 FC CF .word $cffc +0010CEr 1 FD CF .word $cffd +0010D0r 1 FE CF .word $cffe +0010D2r 1 FF CF .word $cfff +0010D4r 1 00 D0 .word $d000 +0010D6r 1 01 D0 .word $d001 +0010D8r 1 02 D0 .word $d002 +0010DAr 1 03 D0 .word $d003 +0010DCr 1 04 D0 .word $d004 +0010DEr 1 05 D0 .word $d005 +0010E0r 1 06 D0 .word $d006 +0010E2r 1 07 D0 .word $d007 +0010E4r 1 08 D0 .word $d008 +0010E6r 1 09 D0 .word $d009 +0010E8r 1 0A D0 .word $d00a +0010EAr 1 0B D0 .word $d00b +0010ECr 1 0C D0 .word $d00c +0010EEr 1 0D D0 .word $d00d +0010F0r 1 0E D0 .word $d00e +0010F2r 1 0F D0 .word $d00f +0010F4r 1 E1 DF .word $dfe1 +0010F6r 1 E2 DF .word $dfe2 +0010F8r 1 E3 DF .word $dfe3 +0010FAr 1 E4 DF .word $dfe4 +0010FCr 1 E5 DF .word $dfe5 +0010FEr 1 E6 DF .word $dfe6 +001100r 1 E7 DF .word $dfe7 +001102r 1 E8 DF .word $dfe8 +001104r 1 E9 DF .word $dfe9 +001106r 1 EA DF .word $dfea +001108r 1 EB DF .word $dfeb +00110Ar 1 EC DF .word $dfec +00110Cr 1 ED DF .word $dfed +00110Er 1 EE DF .word $dfee +001110r 1 EF DF .word $dfef +001112r 1 F0 DF .word $dff0 +001114r 1 F1 DF .word $dff1 +001116r 1 F2 DF .word $dff2 +001118r 1 F3 DF .word $dff3 +00111Ar 1 F4 DF .word $dff4 +00111Cr 1 F5 DF .word $dff5 +00111Er 1 F6 DF .word $dff6 +001120r 1 F7 DF .word $dff7 +001122r 1 F8 DF .word $dff8 +001124r 1 F9 DF .word $dff9 +001126r 1 FA DF .word $dffa +001128r 1 FB DF .word $dffb +00112Ar 1 FC DF .word $dffc +00112Cr 1 FD DF .word $dffd +00112Er 1 FE DF .word $dffe +001130r 1 FF DF .word $dfff +001132r 1 00 E0 .word $e000 +001134r 1 01 E0 .word $e001 +001136r 1 02 E0 .word $e002 +001138r 1 03 E0 .word $e003 +00113Ar 1 04 E0 .word $e004 +00113Cr 1 05 E0 .word $e005 +00113Er 1 06 E0 .word $e006 +001140r 1 07 E0 .word $e007 +001142r 1 08 E0 .word $e008 +001144r 1 09 E0 .word $e009 +001146r 1 0A E0 .word $e00a +001148r 1 0B E0 .word $e00b +00114Ar 1 0C E0 .word $e00c +00114Cr 1 0D E0 .word $e00d +00114Er 1 0E E0 .word $e00e +001150r 1 0F E0 .word $e00f +001152r 1 E1 EF .word $efe1 +001154r 1 E2 EF .word $efe2 +001156r 1 E3 EF .word $efe3 +001158r 1 E4 EF .word $efe4 +00115Ar 1 E5 EF .word $efe5 +00115Cr 1 E6 EF .word $efe6 +00115Er 1 E7 EF .word $efe7 +001160r 1 E8 EF .word $efe8 +001162r 1 E9 EF .word $efe9 +001164r 1 EA EF .word $efea +001166r 1 EB EF .word $efeb +001168r 1 EC EF .word $efec +00116Ar 1 ED EF .word $efed +00116Cr 1 EE EF .word $efee +00116Er 1 EF EF .word $efef +001170r 1 F0 EF .word $eff0 +001172r 1 F1 EF .word $eff1 +001174r 1 F2 EF .word $eff2 +001176r 1 F3 EF .word $eff3 +001178r 1 F4 EF .word $eff4 +00117Ar 1 F5 EF .word $eff5 +00117Cr 1 F6 EF .word $eff6 +00117Er 1 F7 EF .word $eff7 +001180r 1 F8 EF .word $eff8 +001182r 1 F9 EF .word $eff9 +001184r 1 FA EF .word $effa +001186r 1 FB EF .word $effb +001188r 1 FC EF .word $effc +00118Ar 1 FD EF .word $effd +00118Cr 1 FE EF .word $effe +00118Er 1 FF EF .word $efff +001190r 1 00 F0 .word $f000 +001192r 1 01 F0 .word $f001 +001194r 1 02 F0 .word $f002 +001196r 1 03 F0 .word $f003 +001198r 1 04 F0 .word $f004 +00119Ar 1 05 F0 .word $f005 +00119Cr 1 06 F0 .word $f006 +00119Er 1 07 F0 .word $f007 +0011A0r 1 08 F0 .word $f008 +0011A2r 1 09 F0 .word $f009 +0011A4r 1 0A F0 .word $f00a +0011A6r 1 0B F0 .word $f00b +0011A8r 1 0C F0 .word $f00c +0011AAr 1 0D F0 .word $f00d +0011ACr 1 0E F0 .word $f00e +0011AEr 1 0F F0 .word $f00f +0011B0r 1 E1 FF .word $ffe1 +0011B2r 1 E2 FF .word $ffe2 +0011B4r 1 E3 FF .word $ffe3 +0011B6r 1 E4 FF .word $ffe4 +0011B8r 1 E5 FF .word $ffe5 +0011BAr 1 E6 FF .word $ffe6 +0011BCr 1 E7 FF .word $ffe7 +0011BEr 1 E8 FF .word $ffe8 +0011C0r 1 E9 FF .word $ffe9 +0011C2r 1 EA FF .word $ffea +0011C4r 1 EB FF .word $ffeb +0011C6r 1 EC FF .word $ffec +0011C8r 1 ED FF .word $ffed +0011CAr 1 EE FF .word $ffee +0011CCr 1 EF FF .word $ffef +0011CEr 1 F0 FF .word $fff0 +0011D0r 1 F1 FF .word $fff1 +0011D2r 1 F2 FF .word $fff2 +0011D4r 1 F3 FF .word $fff3 +0011D6r 1 F4 FF .word $fff4 +0011D8r 1 F5 FF .word $fff5 +0011DAr 1 F6 FF .word $fff6 +0011DCr 1 F7 FF .word $fff7 +0011DEr 1 F8 FF .word $fff8 +0011E0r 1 F9 FF .word $fff9 +0011E2r 1 FA FF .word $fffa +0011E4r 1 FB FF .word $fffb +0011E6r 1 FC FF .word $fffc +0011E8r 1 FD FF .word $fffd +0011EAr 1 FE FF .word $fffe +0011ECr 1 FF FF .word $ffff +0011EEr 1 +0011EEr 1 ; 4-digit hex values, uppercase +0011EEr 1 00 00 .word $0000 +0011F0r 1 01 00 .word $0001 +0011F2r 1 02 00 .word $0002 +0011F4r 1 03 00 .word $0003 +0011F6r 1 04 00 .word $0004 +0011F8r 1 05 00 .word $0005 +0011FAr 1 06 00 .word $0006 +0011FCr 1 07 00 .word $0007 +0011FEr 1 08 00 .word $0008 +001200r 1 09 00 .word $0009 +001202r 1 0A 00 .word $000A +001204r 1 0B 00 .word $000B +001206r 1 0C 00 .word $000C +001208r 1 0D 00 .word $000D +00120Ar 1 0E 00 .word $000E +00120Cr 1 0F 00 .word $000F +00120Er 1 10 00 .word $0010 +001210r 1 11 00 .word $0011 +001212r 1 12 00 .word $0012 +001214r 1 13 00 .word $0013 +001216r 1 70 00 .word $0070 +001218r 1 71 00 .word $0071 +00121Ar 1 72 00 .word $0072 +00121Cr 1 73 00 .word $0073 +00121Er 1 74 00 .word $0074 +001220r 1 75 00 .word $0075 +001222r 1 76 00 .word $0076 +001224r 1 77 00 .word $0077 +001226r 1 78 00 .word $0078 +001228r 1 79 00 .word $0079 +00122Ar 1 7A 00 .word $007A +00122Cr 1 7B 00 .word $007B +00122Er 1 7C 00 .word $007C +001230r 1 7D 00 .word $007D +001232r 1 7E 00 .word $007E +001234r 1 7F 00 .word $007F +001236r 1 80 00 .word $0080 +001238r 1 81 00 .word $0081 +00123Ar 1 82 00 .word $0082 +00123Cr 1 83 00 .word $0083 +00123Er 1 84 00 .word $0084 +001240r 1 85 00 .word $0085 +001242r 1 86 00 .word $0086 +001244r 1 F0 00 .word $00F0 +001246r 1 F1 00 .word $00F1 +001248r 1 F2 00 .word $00F2 +00124Ar 1 F3 00 .word $00F3 +00124Cr 1 F4 00 .word $00F4 +00124Er 1 F5 00 .word $00F5 +001250r 1 F6 00 .word $00F6 +001252r 1 F7 00 .word $00F7 +001254r 1 F8 00 .word $00F8 +001256r 1 F9 00 .word $00F9 +001258r 1 FA 00 .word $00FA +00125Ar 1 FB 00 .word $00FB +00125Cr 1 FC 00 .word $00FC +00125Er 1 FD 00 .word $00FD +001260r 1 FE 00 .word $00FE +001262r 1 FF 00 .word $00FF +001264r 1 00 01 .word $0100 +001266r 1 01 01 .word $0101 +001268r 1 02 01 .word $0102 +00126Ar 1 03 01 .word $0103 +00126Cr 1 D2 0F .word $0FD2 +00126Er 1 D3 0F .word $0FD3 +001270r 1 D4 0F .word $0FD4 +001272r 1 D5 0F .word $0FD5 +001274r 1 D6 0F .word $0FD6 +001276r 1 D7 0F .word $0FD7 +001278r 1 D8 0F .word $0FD8 +00127Ar 1 D9 0F .word $0FD9 +00127Cr 1 DA 0F .word $0FDA +00127Er 1 DB 0F .word $0FDB +001280r 1 DC 0F .word $0FDC +001282r 1 DD 0F .word $0FDD +001284r 1 DE 0F .word $0FDE +001286r 1 DF 0F .word $0FDF +001288r 1 E0 0F .word $0FE0 +00128Ar 1 E1 0F .word $0FE1 +00128Cr 1 E2 0F .word $0FE2 +00128Er 1 E3 0F .word $0FE3 +001290r 1 E4 0F .word $0FE4 +001292r 1 E5 0F .word $0FE5 +001294r 1 E6 0F .word $0FE6 +001296r 1 E7 0F .word $0FE7 +001298r 1 E8 0F .word $0FE8 +00129Ar 1 E9 0F .word $0FE9 +00129Cr 1 EA 0F .word $0FEA +00129Er 1 EB 0F .word $0FEB +0012A0r 1 EC 0F .word $0FEC +0012A2r 1 ED 0F .word $0FED +0012A4r 1 EE 0F .word $0FEE +0012A6r 1 EF 0F .word $0FEF +0012A8r 1 F0 0F .word $0FF0 +0012AAr 1 F1 0F .word $0FF1 +0012ACr 1 F2 0F .word $0FF2 +0012AEr 1 F3 0F .word $0FF3 +0012B0r 1 F4 0F .word $0FF4 +0012B2r 1 F5 0F .word $0FF5 +0012B4r 1 F6 0F .word $0FF6 +0012B6r 1 F7 0F .word $0FF7 +0012B8r 1 F8 0F .word $0FF8 +0012BAr 1 F9 0F .word $0FF9 +0012BCr 1 FA 0F .word $0FFA +0012BEr 1 FB 0F .word $0FFB +0012C0r 1 FC 0F .word $0FFC +0012C2r 1 FD 0F .word $0FFD +0012C4r 1 FE 0F .word $0FFE +0012C6r 1 FF 0F .word $0FFF +0012C8r 1 00 10 .word $1000 +0012CAr 1 01 10 .word $1001 +0012CCr 1 02 10 .word $1002 +0012CEr 1 03 10 .word $1003 +0012D0r 1 04 10 .word $1004 +0012D2r 1 05 10 .word $1005 +0012D4r 1 06 10 .word $1006 +0012D6r 1 07 10 .word $1007 +0012D8r 1 08 10 .word $1008 +0012DAr 1 F0 7F .word $7FF0 +0012DCr 1 F1 7F .word $7FF1 +0012DEr 1 F2 7F .word $7FF2 +0012E0r 1 F3 7F .word $7FF3 +0012E2r 1 F4 7F .word $7FF4 +0012E4r 1 F5 7F .word $7FF5 +0012E6r 1 F6 7F .word $7FF6 +0012E8r 1 F7 7F .word $7FF7 +0012EAr 1 F8 7F .word $7FF8 +0012ECr 1 F9 7F .word $7FF9 +0012EEr 1 FA 7F .word $7FFA +0012F0r 1 FB 7F .word $7FFB +0012F2r 1 FC 7F .word $7FFC +0012F4r 1 FD 7F .word $7FFD +0012F6r 1 FE 7F .word $7FFE +0012F8r 1 FF 7F .word $7FFF +0012FAr 1 00 80 .word $8000 +0012FCr 1 01 80 .word $8001 +0012FEr 1 02 80 .word $8002 +001300r 1 03 80 .word $8003 +001302r 1 04 80 .word $8004 +001304r 1 05 80 .word $8005 +001306r 1 06 80 .word $8006 +001308r 1 07 80 .word $8007 +00130Ar 1 08 80 .word $8008 +00130Cr 1 09 80 .word $8009 +00130Er 1 0A 80 .word $800A +001310r 1 0B 80 .word $800B +001312r 1 E1 9F .word $9FE1 +001314r 1 E2 9F .word $9FE2 +001316r 1 E3 9F .word $9FE3 +001318r 1 E4 9F .word $9FE4 +00131Ar 1 E5 9F .word $9FE5 +00131Cr 1 E6 9F .word $9FE6 +00131Er 1 E7 9F .word $9FE7 +001320r 1 E8 9F .word $9FE8 +001322r 1 E9 9F .word $9FE9 +001324r 1 EA 9F .word $9FEA +001326r 1 EB 9F .word $9FEB +001328r 1 EC 9F .word $9FEC +00132Ar 1 ED 9F .word $9FED +00132Cr 1 EE 9F .word $9FEE +00132Er 1 EF 9F .word $9FEF +001330r 1 F0 9F .word $9FF0 +001332r 1 F1 9F .word $9FF1 +001334r 1 F2 9F .word $9FF2 +001336r 1 F3 9F .word $9FF3 +001338r 1 F4 9F .word $9FF4 +00133Ar 1 F5 9F .word $9FF5 +00133Cr 1 F6 9F .word $9FF6 +00133Er 1 F7 9F .word $9FF7 +001340r 1 F8 9F .word $9FF8 +001342r 1 F9 9F .word $9FF9 +001344r 1 FA 9F .word $9FFA +001346r 1 FB 9F .word $9FFB +001348r 1 FC 9F .word $9FFC +00134Ar 1 FD 9F .word $9FFD +00134Cr 1 FE 9F .word $9FFE +00134Er 1 FF 9F .word $9FFF +001350r 1 00 A0 .word $A000 +001352r 1 01 A0 .word $A001 +001354r 1 02 A0 .word $A002 +001356r 1 03 A0 .word $A003 +001358r 1 04 A0 .word $A004 +00135Ar 1 05 A0 .word $A005 +00135Cr 1 06 A0 .word $A006 +00135Er 1 07 A0 .word $A007 +001360r 1 08 A0 .word $A008 +001362r 1 09 A0 .word $A009 +001364r 1 0A A0 .word $A00A +001366r 1 0B A0 .word $A00B +001368r 1 0C A0 .word $A00C +00136Ar 1 0D A0 .word $A00D +00136Cr 1 0E A0 .word $A00E +00136Er 1 0F A0 .word $A00F +001370r 1 E1 AF .word $AFE1 +001372r 1 E2 AF .word $AFE2 +001374r 1 E3 AF .word $AFE3 +001376r 1 E4 AF .word $AFE4 +001378r 1 E5 AF .word $AFE5 +00137Ar 1 E6 AF .word $AFE6 +00137Cr 1 E7 AF .word $AFE7 +00137Er 1 E8 AF .word $AFE8 +001380r 1 E9 AF .word $AFE9 +001382r 1 EA AF .word $AFEA +001384r 1 EB AF .word $AFEB +001386r 1 EC AF .word $AFEC +001388r 1 ED AF .word $AFED +00138Ar 1 EE AF .word $AFEE +00138Cr 1 EF AF .word $AFEF +00138Er 1 F0 AF .word $AFF0 +001390r 1 F1 AF .word $AFF1 +001392r 1 F2 AF .word $AFF2 +001394r 1 F3 AF .word $AFF3 +001396r 1 F4 AF .word $AFF4 +001398r 1 F5 AF .word $AFF5 +00139Ar 1 F6 AF .word $AFF6 +00139Cr 1 F7 AF .word $AFF7 +00139Er 1 F8 AF .word $AFF8 +0013A0r 1 F9 AF .word $AFF9 +0013A2r 1 FA AF .word $AFFA +0013A4r 1 FB AF .word $AFFB +0013A6r 1 FC AF .word $AFFC +0013A8r 1 FD AF .word $AFFD +0013AAr 1 FE AF .word $AFFE +0013ACr 1 FF AF .word $AFFF +0013AEr 1 00 B0 .word $B000 +0013B0r 1 01 B0 .word $B001 +0013B2r 1 02 B0 .word $B002 +0013B4r 1 03 B0 .word $B003 +0013B6r 1 04 B0 .word $B004 +0013B8r 1 05 B0 .word $B005 +0013BAr 1 06 B0 .word $B006 +0013BCr 1 07 B0 .word $B007 +0013BEr 1 08 B0 .word $B008 +0013C0r 1 09 B0 .word $B009 +0013C2r 1 0A B0 .word $B00A +0013C4r 1 0B B0 .word $B00B +0013C6r 1 0C B0 .word $B00C +0013C8r 1 0D B0 .word $B00D +0013CAr 1 0E B0 .word $B00E +0013CCr 1 0F B0 .word $B00F +0013CEr 1 E1 BF .word $BFE1 +0013D0r 1 E2 BF .word $BFE2 +0013D2r 1 E3 BF .word $BFE3 +0013D4r 1 E4 BF .word $BFE4 +0013D6r 1 E5 BF .word $BFE5 +0013D8r 1 E6 BF .word $BFE6 +0013DAr 1 E7 BF .word $BFE7 +0013DCr 1 E8 BF .word $BFE8 +0013DEr 1 E9 BF .word $BFE9 +0013E0r 1 EA BF .word $BFEA +0013E2r 1 EB BF .word $BFEB +0013E4r 1 EC BF .word $BFEC +0013E6r 1 ED BF .word $BFED +0013E8r 1 EE BF .word $BFEE +0013EAr 1 EF BF .word $BFEF +0013ECr 1 F0 BF .word $BFF0 +0013EEr 1 F1 BF .word $BFF1 +0013F0r 1 F2 BF .word $BFF2 +0013F2r 1 F3 BF .word $BFF3 +0013F4r 1 F4 BF .word $BFF4 +0013F6r 1 F5 BF .word $BFF5 +0013F8r 1 F6 BF .word $BFF6 +0013FAr 1 F7 BF .word $BFF7 +0013FCr 1 F8 BF .word $BFF8 +0013FEr 1 F9 BF .word $BFF9 +001400r 1 FA BF .word $BFFA +001402r 1 FB BF .word $BFFB +001404r 1 FC BF .word $BFFC +001406r 1 FD BF .word $BFFD +001408r 1 FE BF .word $BFFE +00140Ar 1 FF BF .word $BFFF +00140Cr 1 00 C0 .word $C000 +00140Er 1 01 C0 .word $C001 +001410r 1 02 C0 .word $C002 +001412r 1 03 C0 .word $C003 +001414r 1 04 C0 .word $C004 +001416r 1 05 C0 .word $C005 +001418r 1 06 C0 .word $C006 +00141Ar 1 07 C0 .word $C007 +00141Cr 1 08 C0 .word $C008 +00141Er 1 09 C0 .word $C009 +001420r 1 0A C0 .word $C00A +001422r 1 0B C0 .word $C00B +001424r 1 0C C0 .word $C00C +001426r 1 0D C0 .word $C00D +001428r 1 0E C0 .word $C00E +00142Ar 1 0F C0 .word $C00F +00142Cr 1 E1 CF .word $CFE1 +00142Er 1 E2 CF .word $CFE2 +001430r 1 E3 CF .word $CFE3 +001432r 1 E4 CF .word $CFE4 +001434r 1 E5 CF .word $CFE5 +001436r 1 E6 CF .word $CFE6 +001438r 1 E7 CF .word $CFE7 +00143Ar 1 E8 CF .word $CFE8 +00143Cr 1 E9 CF .word $CFE9 +00143Er 1 EA CF .word $CFEA +001440r 1 EB CF .word $CFEB +001442r 1 EC CF .word $CFEC +001444r 1 ED CF .word $CFED +001446r 1 EE CF .word $CFEE +001448r 1 EF CF .word $CFEF +00144Ar 1 F0 CF .word $CFF0 +00144Cr 1 F1 CF .word $CFF1 +00144Er 1 F2 CF .word $CFF2 +001450r 1 F3 CF .word $CFF3 +001452r 1 F4 CF .word $CFF4 +001454r 1 F5 CF .word $CFF5 +001456r 1 F6 CF .word $CFF6 +001458r 1 F7 CF .word $CFF7 +00145Ar 1 F8 CF .word $CFF8 +00145Cr 1 F9 CF .word $CFF9 +00145Er 1 FA CF .word $CFFA +001460r 1 FB CF .word $CFFB +001462r 1 FC CF .word $CFFC +001464r 1 FD CF .word $CFFD +001466r 1 FE CF .word $CFFE +001468r 1 FF CF .word $CFFF +00146Ar 1 00 D0 .word $D000 +00146Cr 1 01 D0 .word $D001 +00146Er 1 02 D0 .word $D002 +001470r 1 03 D0 .word $D003 +001472r 1 04 D0 .word $D004 +001474r 1 05 D0 .word $D005 +001476r 1 06 D0 .word $D006 +001478r 1 07 D0 .word $D007 +00147Ar 1 08 D0 .word $D008 +00147Cr 1 09 D0 .word $D009 +00147Er 1 0A D0 .word $D00A +001480r 1 0B D0 .word $D00B +001482r 1 0C D0 .word $D00C +001484r 1 0D D0 .word $D00D +001486r 1 0E D0 .word $D00E +001488r 1 0F D0 .word $D00F +00148Ar 1 E1 DF .word $DFE1 +00148Cr 1 E2 DF .word $DFE2 +00148Er 1 E3 DF .word $DFE3 +001490r 1 E4 DF .word $DFE4 +001492r 1 E5 DF .word $DFE5 +001494r 1 E6 DF .word $DFE6 +001496r 1 E7 DF .word $DFE7 +001498r 1 E8 DF .word $DFE8 +00149Ar 1 E9 DF .word $DFE9 +00149Cr 1 EA DF .word $DFEA +00149Er 1 EB DF .word $DFEB +0014A0r 1 EC DF .word $DFEC +0014A2r 1 ED DF .word $DFED +0014A4r 1 EE DF .word $DFEE +0014A6r 1 EF DF .word $DFEF +0014A8r 1 F0 DF .word $DFF0 +0014AAr 1 F1 DF .word $DFF1 +0014ACr 1 F2 DF .word $DFF2 +0014AEr 1 F3 DF .word $DFF3 +0014B0r 1 F4 DF .word $DFF4 +0014B2r 1 F5 DF .word $DFF5 +0014B4r 1 F6 DF .word $DFF6 +0014B6r 1 F7 DF .word $DFF7 +0014B8r 1 F8 DF .word $DFF8 +0014BAr 1 F9 DF .word $DFF9 +0014BCr 1 FA DF .word $DFFA +0014BEr 1 FB DF .word $DFFB +0014C0r 1 FC DF .word $DFFC +0014C2r 1 FD DF .word $DFFD +0014C4r 1 FE DF .word $DFFE +0014C6r 1 FF DF .word $DFFF +0014C8r 1 00 E0 .word $E000 +0014CAr 1 01 E0 .word $E001 +0014CCr 1 02 E0 .word $E002 +0014CEr 1 03 E0 .word $E003 +0014D0r 1 04 E0 .word $E004 +0014D2r 1 05 E0 .word $E005 +0014D4r 1 06 E0 .word $E006 +0014D6r 1 07 E0 .word $E007 +0014D8r 1 08 E0 .word $E008 +0014DAr 1 09 E0 .word $E009 +0014DCr 1 0A E0 .word $E00A +0014DEr 1 0B E0 .word $E00B +0014E0r 1 0C E0 .word $E00C +0014E2r 1 0D E0 .word $E00D +0014E4r 1 0E E0 .word $E00E +0014E6r 1 0F E0 .word $E00F +0014E8r 1 E1 EF .word $EFE1 +0014EAr 1 E2 EF .word $EFE2 +0014ECr 1 E3 EF .word $EFE3 +0014EEr 1 E4 EF .word $EFE4 +0014F0r 1 E5 EF .word $EFE5 +0014F2r 1 E6 EF .word $EFE6 +0014F4r 1 E7 EF .word $EFE7 +0014F6r 1 E8 EF .word $EFE8 +0014F8r 1 E9 EF .word $EFE9 +0014FAr 1 EA EF .word $EFEA +0014FCr 1 EB EF .word $EFEB +0014FEr 1 EC EF .word $EFEC +001500r 1 ED EF .word $EFED +001502r 1 EE EF .word $EFEE +001504r 1 EF EF .word $EFEF +001506r 1 F0 EF .word $EFF0 +001508r 1 F1 EF .word $EFF1 +00150Ar 1 F2 EF .word $EFF2 +00150Cr 1 F3 EF .word $EFF3 +00150Er 1 F4 EF .word $EFF4 +001510r 1 F5 EF .word $EFF5 +001512r 1 F6 EF .word $EFF6 +001514r 1 F7 EF .word $EFF7 +001516r 1 F8 EF .word $EFF8 +001518r 1 F9 EF .word $EFF9 +00151Ar 1 FA EF .word $EFFA +00151Cr 1 FB EF .word $EFFB +00151Er 1 FC EF .word $EFFC +001520r 1 FD EF .word $EFFD +001522r 1 FE EF .word $EFFE +001524r 1 FF EF .word $EFFF +001526r 1 00 F0 .word $F000 +001528r 1 01 F0 .word $F001 +00152Ar 1 02 F0 .word $F002 +00152Cr 1 03 F0 .word $F003 +00152Er 1 04 F0 .word $F004 +001530r 1 05 F0 .word $F005 +001532r 1 06 F0 .word $F006 +001534r 1 07 F0 .word $F007 +001536r 1 08 F0 .word $F008 +001538r 1 09 F0 .word $F009 +00153Ar 1 0A F0 .word $F00A +00153Cr 1 0B F0 .word $F00B +00153Er 1 0C F0 .word $F00C +001540r 1 0D F0 .word $F00D +001542r 1 0E F0 .word $F00E +001544r 1 0F F0 .word $F00F +001546r 1 E1 FF .word $FFE1 +001548r 1 E2 FF .word $FFE2 +00154Ar 1 E3 FF .word $FFE3 +00154Cr 1 E4 FF .word $FFE4 +00154Er 1 E5 FF .word $FFE5 +001550r 1 E6 FF .word $FFE6 +001552r 1 E7 FF .word $FFE7 +001554r 1 E8 FF .word $FFE8 +001556r 1 E9 FF .word $FFE9 +001558r 1 EA FF .word $FFEA +00155Ar 1 EB FF .word $FFEB +00155Cr 1 EC FF .word $FFEC +00155Er 1 ED FF .word $FFED +001560r 1 EE FF .word $FFEE +001562r 1 EF FF .word $FFEF +001564r 1 F0 FF .word $FFF0 +001566r 1 F1 FF .word $FFF1 +001568r 1 F2 FF .word $FFF2 +00156Ar 1 F3 FF .word $FFF3 +00156Cr 1 F4 FF .word $FFF4 +00156Er 1 F5 FF .word $FFF5 +001570r 1 F6 FF .word $FFF6 +001572r 1 F7 FF .word $FFF7 +001574r 1 F8 FF .word $FFF8 +001576r 1 F9 FF .word $FFF9 +001578r 1 FA FF .word $FFFA +00157Ar 1 FB FF .word $FFFB +00157Cr 1 FC FF .word $FFFC +00157Er 1 FD FF .word $FFFD +001580r 1 FE FF .word $FFFE +001582r 1 FF FF .word $FFFF +001584r 1 +001584r 1 ; alternative hex values +001584r 1 00 00 .word 0h +001586r 1 01 00 .word 1h +001588r 1 02 00 .word 2h +00158Ar 1 03 00 .word 3h +00158Cr 1 04 00 .word 4h +00158Er 1 05 00 .word 5h +001590r 1 06 00 .word 6h +001592r 1 07 00 .word 7h +001594r 1 08 00 .word 8h +001596r 1 09 00 .word 9h +001598r 1 0A 00 .word 0ah +00159Ar 1 0B 00 .word 0bh +00159Cr 1 0C 00 .word 0ch +00159Er 1 0D 00 .word 0dh +0015A0r 1 0E 00 .word 0eh +0015A2r 1 0F 00 .word 0fh +0015A4r 1 10 00 .word 10h +0015A6r 1 11 00 .word 11h +0015A8r 1 12 00 .word 12h +0015AAr 1 13 00 .word 13h +0015ACr 1 70 00 .word 70h +0015AEr 1 71 00 .word 71h +0015B0r 1 72 00 .word 72h +0015B2r 1 73 00 .word 73h +0015B4r 1 74 00 .word 74h +0015B6r 1 75 00 .word 75h +0015B8r 1 76 00 .word 76h +0015BAr 1 77 00 .word 77h +0015BCr 1 78 00 .word 78h +0015BEr 1 79 00 .word 79h +0015C0r 1 7A 00 .word 7ah +0015C2r 1 7B 00 .word 7bh +0015C4r 1 7C 00 .word 7ch +0015C6r 1 7D 00 .word 7dh +0015C8r 1 7E 00 .word 7eh +0015CAr 1 7F 00 .word 7fh +0015CCr 1 80 00 .word 80h +0015CEr 1 81 00 .word 81h +0015D0r 1 82 00 .word 82h +0015D2r 1 83 00 .word 83h +0015D4r 1 84 00 .word 84h +0015D6r 1 85 00 .word 85h +0015D8r 1 86 00 .word 86h +0015DAr 1 F0 00 .word 0f0h +0015DCr 1 F1 00 .word 0f1h +0015DEr 1 F2 00 .word 0f2h +0015E0r 1 F3 00 .word 0f3h +0015E2r 1 F4 00 .word 0f4h +0015E4r 1 F5 00 .word 0f5h +0015E6r 1 F6 00 .word 0f6h +0015E8r 1 F7 00 .word 0f7h +0015EAr 1 F8 00 .word 0f8h +0015ECr 1 F9 00 .word 0f9h +0015EEr 1 FA 00 .word 0fah +0015F0r 1 FB 00 .word 0fbh +0015F2r 1 FC 00 .word 0fch +0015F4r 1 FD 00 .word 0fdh +0015F6r 1 FE 00 .word 0feh +0015F8r 1 FF 00 .word 0ffh +0015FAr 1 00 01 .word 100h +0015FCr 1 01 01 .word 101h +0015FEr 1 02 01 .word 102h +001600r 1 03 01 .word 103h +001602r 1 D2 0F .word 0fd2h +001604r 1 D3 0F .word 0fd3h +001606r 1 D4 0F .word 0fd4h +001608r 1 D5 0F .word 0fd5h +00160Ar 1 D6 0F .word 0fd6h +00160Cr 1 D7 0F .word 0fd7h +00160Er 1 D8 0F .word 0fd8h +001610r 1 D9 0F .word 0fd9h +001612r 1 DA 0F .word 0fdah +001614r 1 DB 0F .word 0fdbh +001616r 1 DC 0F .word 0fdch +001618r 1 DD 0F .word 0fddh +00161Ar 1 DE 0F .word 0fdeh +00161Cr 1 DF 0F .word 0fdfh +00161Er 1 E0 0F .word 0fe0h +001620r 1 E1 0F .word 0fe1h +001622r 1 E2 0F .word 0fe2h +001624r 1 E3 0F .word 0fe3h +001626r 1 E4 0F .word 0fe4h +001628r 1 E5 0F .word 0fe5h +00162Ar 1 E6 0F .word 0fe6h +00162Cr 1 E7 0F .word 0fe7h +00162Er 1 E8 0F .word 0fe8h +001630r 1 E9 0F .word 0fe9h +001632r 1 EA 0F .word 0feah +001634r 1 EB 0F .word 0febh +001636r 1 EC 0F .word 0fech +001638r 1 ED 0F .word 0fedh +00163Ar 1 EE 0F .word 0feeh +00163Cr 1 EF 0F .word 0fefh +00163Er 1 F0 0F .word 0ff0h +001640r 1 F1 0F .word 0ff1h +001642r 1 F2 0F .word 0ff2h +001644r 1 F3 0F .word 0ff3h +001646r 1 F4 0F .word 0ff4h +001648r 1 F5 0F .word 0ff5h +00164Ar 1 F6 0F .word 0ff6h +00164Cr 1 F7 0F .word 0ff7h +00164Er 1 F8 0F .word 0ff8h +001650r 1 F9 0F .word 0ff9h +001652r 1 FA 0F .word 0ffah +001654r 1 FB 0F .word 0ffbh +001656r 1 FC 0F .word 0ffch +001658r 1 FD 0F .word 0ffdh +00165Ar 1 FE 0F .word 0ffeh +00165Cr 1 FF 0F .word 0fffh +00165Er 1 00 10 .word 1000h +001660r 1 01 10 .word 1001h +001662r 1 02 10 .word 1002h +001664r 1 03 10 .word 1003h +001666r 1 04 10 .word 1004h +001668r 1 05 10 .word 1005h +00166Ar 1 06 10 .word 1006h +00166Cr 1 07 10 .word 1007h +00166Er 1 08 10 .word 1008h +001670r 1 F0 7F .word 7ff0h +001672r 1 F1 7F .word 7ff1h +001674r 1 F2 7F .word 7ff2h +001676r 1 F3 7F .word 7ff3h +001678r 1 F4 7F .word 7ff4h +00167Ar 1 F5 7F .word 7ff5h +00167Cr 1 F6 7F .word 7ff6h +00167Er 1 F7 7F .word 7ff7h +001680r 1 F8 7F .word 7ff8h +001682r 1 F9 7F .word 7ff9h +001684r 1 FA 7F .word 7ffah +001686r 1 FB 7F .word 7ffbh +001688r 1 FC 7F .word 7ffch +00168Ar 1 FD 7F .word 7ffdh +00168Cr 1 FE 7F .word 7ffeh +00168Er 1 FF 7F .word 7fffh +001690r 1 00 80 .word 8000h +001692r 1 01 80 .word 8001h +001694r 1 02 80 .word 8002h +001696r 1 03 80 .word 8003h +001698r 1 04 80 .word 8004h +00169Ar 1 05 80 .word 8005h +00169Cr 1 06 80 .word 8006h +00169Er 1 07 80 .word 8007h +0016A0r 1 08 80 .word 8008h +0016A2r 1 09 80 .word 8009h +0016A4r 1 0A 80 .word 800ah +0016A6r 1 0B 80 .word 800bh +0016A8r 1 E1 9F .word 9fe1h +0016AAr 1 E2 9F .word 9fe2h +0016ACr 1 E3 9F .word 9fe3h +0016AEr 1 E4 9F .word 9fe4h +0016B0r 1 E5 9F .word 9fe5h +0016B2r 1 E6 9F .word 9fe6h +0016B4r 1 E7 9F .word 9fe7h +0016B6r 1 E8 9F .word 9fe8h +0016B8r 1 E9 9F .word 9fe9h +0016BAr 1 EA 9F .word 9feah +0016BCr 1 EB 9F .word 9febh +0016BEr 1 EC 9F .word 9fech +0016C0r 1 ED 9F .word 9fedh +0016C2r 1 EE 9F .word 9feeh +0016C4r 1 EF 9F .word 9fefh +0016C6r 1 F0 9F .word 9ff0h +0016C8r 1 F1 9F .word 9ff1h +0016CAr 1 F2 9F .word 9ff2h +0016CCr 1 F3 9F .word 9ff3h +0016CEr 1 F4 9F .word 9ff4h +0016D0r 1 F5 9F .word 9ff5h +0016D2r 1 F6 9F .word 9ff6h +0016D4r 1 F7 9F .word 9ff7h +0016D6r 1 F8 9F .word 9ff8h +0016D8r 1 F9 9F .word 9ff9h +0016DAr 1 FA 9F .word 9ffah +0016DCr 1 FB 9F .word 9ffbh +0016DEr 1 FC 9F .word 9ffch +0016E0r 1 FD 9F .word 9ffdh +0016E2r 1 FE 9F .word 9ffeh +0016E4r 1 FF 9F .word 9fffh +0016E6r 1 00 A0 .word 0a000h +0016E8r 1 01 A0 .word 0a001h +0016EAr 1 02 A0 .word 0a002h +0016ECr 1 03 A0 .word 0a003h +0016EEr 1 04 A0 .word 0a004h +0016F0r 1 05 A0 .word 0a005h +0016F2r 1 06 A0 .word 0a006h +0016F4r 1 07 A0 .word 0a007h +0016F6r 1 08 A0 .word 0a008h +0016F8r 1 09 A0 .word 0a009h +0016FAr 1 0A A0 .word 0a00ah +0016FCr 1 0B A0 .word 0a00bh +0016FEr 1 0C A0 .word 0a00ch +001700r 1 0D A0 .word 0a00dh +001702r 1 0E A0 .word 0a00eh +001704r 1 0F A0 .word 0a00fh +001706r 1 E1 AF .word 0afe1h +001708r 1 E2 AF .word 0afe2h +00170Ar 1 E3 AF .word 0afe3h +00170Cr 1 E4 AF .word 0afe4h +00170Er 1 E5 AF .word 0afe5h +001710r 1 E6 AF .word 0afe6h +001712r 1 E7 AF .word 0afe7h +001714r 1 E8 AF .word 0afe8h +001716r 1 E9 AF .word 0afe9h +001718r 1 EA AF .word 0afeah +00171Ar 1 EB AF .word 0afebh +00171Cr 1 EC AF .word 0afech +00171Er 1 ED AF .word 0afedh +001720r 1 EE AF .word 0afeeh +001722r 1 EF AF .word 0afefh +001724r 1 F0 AF .word 0aff0h +001726r 1 F1 AF .word 0aff1h +001728r 1 F2 AF .word 0aff2h +00172Ar 1 F3 AF .word 0aff3h +00172Cr 1 F4 AF .word 0aff4h +00172Er 1 F5 AF .word 0aff5h +001730r 1 F6 AF .word 0aff6h +001732r 1 F7 AF .word 0aff7h +001734r 1 F8 AF .word 0aff8h +001736r 1 F9 AF .word 0aff9h +001738r 1 FA AF .word 0affah +00173Ar 1 FB AF .word 0affbh +00173Cr 1 FC AF .word 0affch +00173Er 1 FD AF .word 0affdh +001740r 1 FE AF .word 0affeh +001742r 1 FF AF .word 0afffh +001744r 1 00 B0 .word 0b000h +001746r 1 01 B0 .word 0b001h +001748r 1 02 B0 .word 0b002h +00174Ar 1 03 B0 .word 0b003h +00174Cr 1 04 B0 .word 0b004h +00174Er 1 05 B0 .word 0b005h +001750r 1 06 B0 .word 0b006h +001752r 1 07 B0 .word 0b007h +001754r 1 08 B0 .word 0b008h +001756r 1 09 B0 .word 0b009h +001758r 1 0A B0 .word 0b00ah +00175Ar 1 0B B0 .word 0b00bh +00175Cr 1 0C B0 .word 0b00ch +00175Er 1 0D B0 .word 0b00dh +001760r 1 0E B0 .word 0b00eh +001762r 1 0F B0 .word 0b00fh +001764r 1 E1 BF .word 0bfe1h +001766r 1 E2 BF .word 0bfe2h +001768r 1 E3 BF .word 0bfe3h +00176Ar 1 E4 BF .word 0bfe4h +00176Cr 1 E5 BF .word 0bfe5h +00176Er 1 E6 BF .word 0bfe6h +001770r 1 E7 BF .word 0bfe7h +001772r 1 E8 BF .word 0bfe8h +001774r 1 E9 BF .word 0bfe9h +001776r 1 EA BF .word 0bfeah +001778r 1 EB BF .word 0bfebh +00177Ar 1 EC BF .word 0bfech +00177Cr 1 ED BF .word 0bfedh +00177Er 1 EE BF .word 0bfeeh +001780r 1 EF BF .word 0bfefh +001782r 1 F0 BF .word 0bff0h +001784r 1 F1 BF .word 0bff1h +001786r 1 F2 BF .word 0bff2h +001788r 1 F3 BF .word 0bff3h +00178Ar 1 F4 BF .word 0bff4h +00178Cr 1 F5 BF .word 0bff5h +00178Er 1 F6 BF .word 0bff6h +001790r 1 F7 BF .word 0bff7h +001792r 1 F8 BF .word 0bff8h +001794r 1 F9 BF .word 0bff9h +001796r 1 FA BF .word 0bffah +001798r 1 FB BF .word 0bffbh +00179Ar 1 FC BF .word 0bffch +00179Cr 1 FD BF .word 0bffdh +00179Er 1 FE BF .word 0bffeh +0017A0r 1 FF BF .word 0bfffh +0017A2r 1 00 C0 .word 0c000h +0017A4r 1 01 C0 .word 0c001h +0017A6r 1 02 C0 .word 0c002h +0017A8r 1 03 C0 .word 0c003h +0017AAr 1 04 C0 .word 0c004h +0017ACr 1 05 C0 .word 0c005h +0017AEr 1 06 C0 .word 0c006h +0017B0r 1 07 C0 .word 0c007h +0017B2r 1 08 C0 .word 0c008h +0017B4r 1 09 C0 .word 0c009h +0017B6r 1 0A C0 .word 0c00ah +0017B8r 1 0B C0 .word 0c00bh +0017BAr 1 0C C0 .word 0c00ch +0017BCr 1 0D C0 .word 0c00dh +0017BEr 1 0E C0 .word 0c00eh +0017C0r 1 0F C0 .word 0c00fh +0017C2r 1 E1 CF .word 0cfe1h +0017C4r 1 E2 CF .word 0cfe2h +0017C6r 1 E3 CF .word 0cfe3h +0017C8r 1 E4 CF .word 0cfe4h +0017CAr 1 E5 CF .word 0cfe5h +0017CCr 1 E6 CF .word 0cfe6h +0017CEr 1 E7 CF .word 0cfe7h +0017D0r 1 E8 CF .word 0cfe8h +0017D2r 1 E9 CF .word 0cfe9h +0017D4r 1 EA CF .word 0cfeah +0017D6r 1 EB CF .word 0cfebh +0017D8r 1 EC CF .word 0cfech +0017DAr 1 ED CF .word 0cfedh +0017DCr 1 EE CF .word 0cfeeh +0017DEr 1 EF CF .word 0cfefh +0017E0r 1 F0 CF .word 0cff0h +0017E2r 1 F1 CF .word 0cff1h +0017E4r 1 F2 CF .word 0cff2h +0017E6r 1 F3 CF .word 0cff3h +0017E8r 1 F4 CF .word 0cff4h +0017EAr 1 F5 CF .word 0cff5h +0017ECr 1 F6 CF .word 0cff6h +0017EEr 1 F7 CF .word 0cff7h +0017F0r 1 F8 CF .word 0cff8h +0017F2r 1 F9 CF .word 0cff9h +0017F4r 1 FA CF .word 0cffah +0017F6r 1 FB CF .word 0cffbh +0017F8r 1 FC CF .word 0cffch +0017FAr 1 FD CF .word 0cffdh +0017FCr 1 FE CF .word 0cffeh +0017FEr 1 FF CF .word 0cfffh +001800r 1 00 D0 .word 0d000h +001802r 1 01 D0 .word 0d001h +001804r 1 02 D0 .word 0d002h +001806r 1 03 D0 .word 0d003h +001808r 1 04 D0 .word 0d004h +00180Ar 1 05 D0 .word 0d005h +00180Cr 1 06 D0 .word 0d006h +00180Er 1 07 D0 .word 0d007h +001810r 1 08 D0 .word 0d008h +001812r 1 09 D0 .word 0d009h +001814r 1 0A D0 .word 0d00ah +001816r 1 0B D0 .word 0d00bh +001818r 1 0C D0 .word 0d00ch +00181Ar 1 0D D0 .word 0d00dh +00181Cr 1 0E D0 .word 0d00eh +00181Er 1 0F D0 .word 0d00fh +001820r 1 E1 DF .word 0dfe1h +001822r 1 E2 DF .word 0dfe2h +001824r 1 E3 DF .word 0dfe3h +001826r 1 E4 DF .word 0dfe4h +001828r 1 E5 DF .word 0dfe5h +00182Ar 1 E6 DF .word 0dfe6h +00182Cr 1 E7 DF .word 0dfe7h +00182Er 1 E8 DF .word 0dfe8h +001830r 1 E9 DF .word 0dfe9h +001832r 1 EA DF .word 0dfeah +001834r 1 EB DF .word 0dfebh +001836r 1 EC DF .word 0dfech +001838r 1 ED DF .word 0dfedh +00183Ar 1 EE DF .word 0dfeeh +00183Cr 1 EF DF .word 0dfefh +00183Er 1 F0 DF .word 0dff0h +001840r 1 F1 DF .word 0dff1h +001842r 1 F2 DF .word 0dff2h +001844r 1 F3 DF .word 0dff3h +001846r 1 F4 DF .word 0dff4h +001848r 1 F5 DF .word 0dff5h +00184Ar 1 F6 DF .word 0dff6h +00184Cr 1 F7 DF .word 0dff7h +00184Er 1 F8 DF .word 0dff8h +001850r 1 F9 DF .word 0dff9h +001852r 1 FA DF .word 0dffah +001854r 1 FB DF .word 0dffbh +001856r 1 FC DF .word 0dffch +001858r 1 FD DF .word 0dffdh +00185Ar 1 FE DF .word 0dffeh +00185Cr 1 FF DF .word 0dfffh +00185Er 1 00 E0 .word 0e000h +001860r 1 01 E0 .word 0e001h +001862r 1 02 E0 .word 0e002h +001864r 1 03 E0 .word 0e003h +001866r 1 04 E0 .word 0e004h +001868r 1 05 E0 .word 0e005h +00186Ar 1 06 E0 .word 0e006h +00186Cr 1 07 E0 .word 0e007h +00186Er 1 08 E0 .word 0e008h +001870r 1 09 E0 .word 0e009h +001872r 1 0A E0 .word 0e00ah +001874r 1 0B E0 .word 0e00bh +001876r 1 0C E0 .word 0e00ch +001878r 1 0D E0 .word 0e00dh +00187Ar 1 0E E0 .word 0e00eh +00187Cr 1 0F E0 .word 0e00fh +00187Er 1 E1 EF .word 0efe1h +001880r 1 E2 EF .word 0efe2h +001882r 1 E3 EF .word 0efe3h +001884r 1 E4 EF .word 0efe4h +001886r 1 E5 EF .word 0efe5h +001888r 1 E6 EF .word 0efe6h +00188Ar 1 E7 EF .word 0efe7h +00188Cr 1 E8 EF .word 0efe8h +00188Er 1 E9 EF .word 0efe9h +001890r 1 EA EF .word 0efeah +001892r 1 EB EF .word 0efebh +001894r 1 EC EF .word 0efech +001896r 1 ED EF .word 0efedh +001898r 1 EE EF .word 0efeeh +00189Ar 1 EF EF .word 0efefh +00189Cr 1 F0 EF .word 0eff0h +00189Er 1 F1 EF .word 0eff1h +0018A0r 1 F2 EF .word 0eff2h +0018A2r 1 F3 EF .word 0eff3h +0018A4r 1 F4 EF .word 0eff4h +0018A6r 1 F5 EF .word 0eff5h +0018A8r 1 F6 EF .word 0eff6h +0018AAr 1 F7 EF .word 0eff7h +0018ACr 1 F8 EF .word 0eff8h +0018AEr 1 F9 EF .word 0eff9h +0018B0r 1 FA EF .word 0effah +0018B2r 1 FB EF .word 0effbh +0018B4r 1 FC EF .word 0effch +0018B6r 1 FD EF .word 0effdh +0018B8r 1 FE EF .word 0effeh +0018BAr 1 FF EF .word 0efffh +0018BCr 1 00 F0 .word 0f000h +0018BEr 1 01 F0 .word 0f001h +0018C0r 1 02 F0 .word 0f002h +0018C2r 1 03 F0 .word 0f003h +0018C4r 1 04 F0 .word 0f004h +0018C6r 1 05 F0 .word 0f005h +0018C8r 1 06 F0 .word 0f006h +0018CAr 1 07 F0 .word 0f007h +0018CCr 1 08 F0 .word 0f008h +0018CEr 1 09 F0 .word 0f009h +0018D0r 1 0A F0 .word 0f00ah +0018D2r 1 0B F0 .word 0f00bh +0018D4r 1 0C F0 .word 0f00ch +0018D6r 1 0D F0 .word 0f00dh +0018D8r 1 0E F0 .word 0f00eh +0018DAr 1 0F F0 .word 0f00fh +0018DCr 1 E1 FF .word 0ffe1h +0018DEr 1 E2 FF .word 0ffe2h +0018E0r 1 E3 FF .word 0ffe3h +0018E2r 1 E4 FF .word 0ffe4h +0018E4r 1 E5 FF .word 0ffe5h +0018E6r 1 E6 FF .word 0ffe6h +0018E8r 1 E7 FF .word 0ffe7h +0018EAr 1 E8 FF .word 0ffe8h +0018ECr 1 E9 FF .word 0ffe9h +0018EEr 1 EA FF .word 0ffeah +0018F0r 1 EB FF .word 0ffebh +0018F2r 1 EC FF .word 0ffech +0018F4r 1 ED FF .word 0ffedh +0018F6r 1 EE FF .word 0ffeeh +0018F8r 1 EF FF .word 0ffefh +0018FAr 1 F0 FF .word 0fff0h +0018FCr 1 F1 FF .word 0fff1h +0018FEr 1 F2 FF .word 0fff2h +001900r 1 F3 FF .word 0fff3h +001902r 1 F4 FF .word 0fff4h +001904r 1 F5 FF .word 0fff5h +001906r 1 F6 FF .word 0fff6h +001908r 1 F7 FF .word 0fff7h +00190Ar 1 F8 FF .word 0fff8h +00190Cr 1 F9 FF .word 0fff9h +00190Er 1 FA FF .word 0fffah +001910r 1 FB FF .word 0fffbh +001912r 1 FC FF .word 0fffch +001914r 1 FD FF .word 0fffdh +001916r 1 FE FF .word 0fffeh +001918r 1 FF FF .word 0ffffh +00191Ar 1 +00191Ar 1 ; alternative hex values, uppercase +00191Ar 1 00 00 .word 0h +00191Cr 1 01 00 .word 1h +00191Er 1 02 00 .word 2h +001920r 1 03 00 .word 3h +001922r 1 04 00 .word 4h +001924r 1 05 00 .word 5h +001926r 1 06 00 .word 6h +001928r 1 07 00 .word 7h +00192Ar 1 08 00 .word 8h +00192Cr 1 09 00 .word 9h +00192Er 1 0A 00 .word 0Ah +001930r 1 0B 00 .word 0Bh +001932r 1 0C 00 .word 0Ch +001934r 1 0D 00 .word 0Dh +001936r 1 0E 00 .word 0Eh +001938r 1 0F 00 .word 0Fh +00193Ar 1 10 00 .word 10h +00193Cr 1 11 00 .word 11h +00193Er 1 12 00 .word 12h +001940r 1 13 00 .word 13h +001942r 1 70 00 .word 70h +001944r 1 71 00 .word 71h +001946r 1 72 00 .word 72h +001948r 1 73 00 .word 73h +00194Ar 1 74 00 .word 74h +00194Cr 1 75 00 .word 75h +00194Er 1 76 00 .word 76h +001950r 1 77 00 .word 77h +001952r 1 78 00 .word 78h +001954r 1 79 00 .word 79h +001956r 1 7A 00 .word 7Ah +001958r 1 7B 00 .word 7Bh +00195Ar 1 7C 00 .word 7Ch +00195Cr 1 7D 00 .word 7Dh +00195Er 1 7E 00 .word 7Eh +001960r 1 7F 00 .word 7Fh +001962r 1 80 00 .word 80h +001964r 1 81 00 .word 81h +001966r 1 82 00 .word 82h +001968r 1 83 00 .word 83h +00196Ar 1 84 00 .word 84h +00196Cr 1 85 00 .word 85h +00196Er 1 86 00 .word 86h +001970r 1 F0 00 .word 0F0h +001972r 1 F1 00 .word 0F1h +001974r 1 F2 00 .word 0F2h +001976r 1 F3 00 .word 0F3h +001978r 1 F4 00 .word 0F4h +00197Ar 1 F5 00 .word 0F5h +00197Cr 1 F6 00 .word 0F6h +00197Er 1 F7 00 .word 0F7h +001980r 1 F8 00 .word 0F8h +001982r 1 F9 00 .word 0F9h +001984r 1 FA 00 .word 0FAh +001986r 1 FB 00 .word 0FBh +001988r 1 FC 00 .word 0FCh +00198Ar 1 FD 00 .word 0FDh +00198Cr 1 FE 00 .word 0FEh +00198Er 1 FF 00 .word 0FFh +001990r 1 00 01 .word 100h +001992r 1 01 01 .word 101h +001994r 1 02 01 .word 102h +001996r 1 03 01 .word 103h +001998r 1 D2 0F .word 0FD2h +00199Ar 1 D3 0F .word 0FD3h +00199Cr 1 D4 0F .word 0FD4h +00199Er 1 D5 0F .word 0FD5h +0019A0r 1 D6 0F .word 0FD6h +0019A2r 1 D7 0F .word 0FD7h +0019A4r 1 D8 0F .word 0FD8h +0019A6r 1 D9 0F .word 0FD9h +0019A8r 1 DA 0F .word 0FDAh +0019AAr 1 DB 0F .word 0FDBh +0019ACr 1 DC 0F .word 0FDCh +0019AEr 1 DD 0F .word 0FDDh +0019B0r 1 DE 0F .word 0FDEh +0019B2r 1 DF 0F .word 0FDFh +0019B4r 1 E0 0F .word 0FE0h +0019B6r 1 E1 0F .word 0FE1h +0019B8r 1 E2 0F .word 0FE2h +0019BAr 1 E3 0F .word 0FE3h +0019BCr 1 E4 0F .word 0FE4h +0019BEr 1 E5 0F .word 0FE5h +0019C0r 1 E6 0F .word 0FE6h +0019C2r 1 E7 0F .word 0FE7h +0019C4r 1 E8 0F .word 0FE8h +0019C6r 1 E9 0F .word 0FE9h +0019C8r 1 EA 0F .word 0FEAh +0019CAr 1 EB 0F .word 0FEBh +0019CCr 1 EC 0F .word 0FECh +0019CEr 1 ED 0F .word 0FEDh +0019D0r 1 EE 0F .word 0FEEh +0019D2r 1 EF 0F .word 0FEFh +0019D4r 1 F0 0F .word 0FF0h +0019D6r 1 F1 0F .word 0FF1h +0019D8r 1 F2 0F .word 0FF2h +0019DAr 1 F3 0F .word 0FF3h +0019DCr 1 F4 0F .word 0FF4h +0019DEr 1 F5 0F .word 0FF5h +0019E0r 1 F6 0F .word 0FF6h +0019E2r 1 F7 0F .word 0FF7h +0019E4r 1 F8 0F .word 0FF8h +0019E6r 1 F9 0F .word 0FF9h +0019E8r 1 FA 0F .word 0FFAh +0019EAr 1 FB 0F .word 0FFBh +0019ECr 1 FC 0F .word 0FFCh +0019EEr 1 FD 0F .word 0FFDh +0019F0r 1 FE 0F .word 0FFEh +0019F2r 1 FF 0F .word 0FFFh +0019F4r 1 00 10 .word 1000h +0019F6r 1 01 10 .word 1001h +0019F8r 1 02 10 .word 1002h +0019FAr 1 03 10 .word 1003h +0019FCr 1 04 10 .word 1004h +0019FEr 1 05 10 .word 1005h +001A00r 1 06 10 .word 1006h +001A02r 1 07 10 .word 1007h +001A04r 1 08 10 .word 1008h +001A06r 1 F0 7F .word 7FF0h +001A08r 1 F1 7F .word 7FF1h +001A0Ar 1 F2 7F .word 7FF2h +001A0Cr 1 F3 7F .word 7FF3h +001A0Er 1 F4 7F .word 7FF4h +001A10r 1 F5 7F .word 7FF5h +001A12r 1 F6 7F .word 7FF6h +001A14r 1 F7 7F .word 7FF7h +001A16r 1 F8 7F .word 7FF8h +001A18r 1 F9 7F .word 7FF9h +001A1Ar 1 FA 7F .word 7FFAh +001A1Cr 1 FB 7F .word 7FFBh +001A1Er 1 FC 7F .word 7FFCh +001A20r 1 FD 7F .word 7FFDh +001A22r 1 FE 7F .word 7FFEh +001A24r 1 FF 7F .word 7FFFh +001A26r 1 00 80 .word 8000h +001A28r 1 01 80 .word 8001h +001A2Ar 1 02 80 .word 8002h +001A2Cr 1 03 80 .word 8003h +001A2Er 1 04 80 .word 8004h +001A30r 1 05 80 .word 8005h +001A32r 1 06 80 .word 8006h +001A34r 1 07 80 .word 8007h +001A36r 1 08 80 .word 8008h +001A38r 1 09 80 .word 8009h +001A3Ar 1 0A 80 .word 800Ah +001A3Cr 1 0B 80 .word 800Bh +001A3Er 1 E1 9F .word 9FE1h +001A40r 1 E2 9F .word 9FE2h +001A42r 1 E3 9F .word 9FE3h +001A44r 1 E4 9F .word 9FE4h +001A46r 1 E5 9F .word 9FE5h +001A48r 1 E6 9F .word 9FE6h +001A4Ar 1 E7 9F .word 9FE7h +001A4Cr 1 E8 9F .word 9FE8h +001A4Er 1 E9 9F .word 9FE9h +001A50r 1 EA 9F .word 9FEAh +001A52r 1 EB 9F .word 9FEBh +001A54r 1 EC 9F .word 9FECh +001A56r 1 ED 9F .word 9FEDh +001A58r 1 EE 9F .word 9FEEh +001A5Ar 1 EF 9F .word 9FEFh +001A5Cr 1 F0 9F .word 9FF0h +001A5Er 1 F1 9F .word 9FF1h +001A60r 1 F2 9F .word 9FF2h +001A62r 1 F3 9F .word 9FF3h +001A64r 1 F4 9F .word 9FF4h +001A66r 1 F5 9F .word 9FF5h +001A68r 1 F6 9F .word 9FF6h +001A6Ar 1 F7 9F .word 9FF7h +001A6Cr 1 F8 9F .word 9FF8h +001A6Er 1 F9 9F .word 9FF9h +001A70r 1 FA 9F .word 9FFAh +001A72r 1 FB 9F .word 9FFBh +001A74r 1 FC 9F .word 9FFCh +001A76r 1 FD 9F .word 9FFDh +001A78r 1 FE 9F .word 9FFEh +001A7Ar 1 FF 9F .word 9FFFh +001A7Cr 1 00 A0 .word 0A000h +001A7Er 1 01 A0 .word 0A001h +001A80r 1 02 A0 .word 0A002h +001A82r 1 03 A0 .word 0A003h +001A84r 1 04 A0 .word 0A004h +001A86r 1 05 A0 .word 0A005h +001A88r 1 06 A0 .word 0A006h +001A8Ar 1 07 A0 .word 0A007h +001A8Cr 1 08 A0 .word 0A008h +001A8Er 1 09 A0 .word 0A009h +001A90r 1 0A A0 .word 0A00Ah +001A92r 1 0B A0 .word 0A00Bh +001A94r 1 0C A0 .word 0A00Ch +001A96r 1 0D A0 .word 0A00Dh +001A98r 1 0E A0 .word 0A00Eh +001A9Ar 1 0F A0 .word 0A00Fh +001A9Cr 1 E1 AF .word 0AFE1h +001A9Er 1 E2 AF .word 0AFE2h +001AA0r 1 E3 AF .word 0AFE3h +001AA2r 1 E4 AF .word 0AFE4h +001AA4r 1 E5 AF .word 0AFE5h +001AA6r 1 E6 AF .word 0AFE6h +001AA8r 1 E7 AF .word 0AFE7h +001AAAr 1 E8 AF .word 0AFE8h +001AACr 1 E9 AF .word 0AFE9h +001AAEr 1 EA AF .word 0AFEAh +001AB0r 1 EB AF .word 0AFEBh +001AB2r 1 EC AF .word 0AFECh +001AB4r 1 ED AF .word 0AFEDh +001AB6r 1 EE AF .word 0AFEEh +001AB8r 1 EF AF .word 0AFEFh +001ABAr 1 F0 AF .word 0AFF0h +001ABCr 1 F1 AF .word 0AFF1h +001ABEr 1 F2 AF .word 0AFF2h +001AC0r 1 F3 AF .word 0AFF3h +001AC2r 1 F4 AF .word 0AFF4h +001AC4r 1 F5 AF .word 0AFF5h +001AC6r 1 F6 AF .word 0AFF6h +001AC8r 1 F7 AF .word 0AFF7h +001ACAr 1 F8 AF .word 0AFF8h +001ACCr 1 F9 AF .word 0AFF9h +001ACEr 1 FA AF .word 0AFFAh +001AD0r 1 FB AF .word 0AFFBh +001AD2r 1 FC AF .word 0AFFCh +001AD4r 1 FD AF .word 0AFFDh +001AD6r 1 FE AF .word 0AFFEh +001AD8r 1 FF AF .word 0AFFFh +001ADAr 1 00 B0 .word 0B000h +001ADCr 1 01 B0 .word 0B001h +001ADEr 1 02 B0 .word 0B002h +001AE0r 1 03 B0 .word 0B003h +001AE2r 1 04 B0 .word 0B004h +001AE4r 1 05 B0 .word 0B005h +001AE6r 1 06 B0 .word 0B006h +001AE8r 1 07 B0 .word 0B007h +001AEAr 1 08 B0 .word 0B008h +001AECr 1 09 B0 .word 0B009h +001AEEr 1 0A B0 .word 0B00Ah +001AF0r 1 0B B0 .word 0B00Bh +001AF2r 1 0C B0 .word 0B00Ch +001AF4r 1 0D B0 .word 0B00Dh +001AF6r 1 0E B0 .word 0B00Eh +001AF8r 1 0F B0 .word 0B00Fh +001AFAr 1 E1 BF .word 0BFE1h +001AFCr 1 E2 BF .word 0BFE2h +001AFEr 1 E3 BF .word 0BFE3h +001B00r 1 E4 BF .word 0BFE4h +001B02r 1 E5 BF .word 0BFE5h +001B04r 1 E6 BF .word 0BFE6h +001B06r 1 E7 BF .word 0BFE7h +001B08r 1 E8 BF .word 0BFE8h +001B0Ar 1 E9 BF .word 0BFE9h +001B0Cr 1 EA BF .word 0BFEAh +001B0Er 1 EB BF .word 0BFEBh +001B10r 1 EC BF .word 0BFECh +001B12r 1 ED BF .word 0BFEDh +001B14r 1 EE BF .word 0BFEEh +001B16r 1 EF BF .word 0BFEFh +001B18r 1 F0 BF .word 0BFF0h +001B1Ar 1 F1 BF .word 0BFF1h +001B1Cr 1 F2 BF .word 0BFF2h +001B1Er 1 F3 BF .word 0BFF3h +001B20r 1 F4 BF .word 0BFF4h +001B22r 1 F5 BF .word 0BFF5h +001B24r 1 F6 BF .word 0BFF6h +001B26r 1 F7 BF .word 0BFF7h +001B28r 1 F8 BF .word 0BFF8h +001B2Ar 1 F9 BF .word 0BFF9h +001B2Cr 1 FA BF .word 0BFFAh +001B2Er 1 FB BF .word 0BFFBh +001B30r 1 FC BF .word 0BFFCh +001B32r 1 FD BF .word 0BFFDh +001B34r 1 FE BF .word 0BFFEh +001B36r 1 FF BF .word 0BFFFh +001B38r 1 00 C0 .word 0C000h +001B3Ar 1 01 C0 .word 0C001h +001B3Cr 1 02 C0 .word 0C002h +001B3Er 1 03 C0 .word 0C003h +001B40r 1 04 C0 .word 0C004h +001B42r 1 05 C0 .word 0C005h +001B44r 1 06 C0 .word 0C006h +001B46r 1 07 C0 .word 0C007h +001B48r 1 08 C0 .word 0C008h +001B4Ar 1 09 C0 .word 0C009h +001B4Cr 1 0A C0 .word 0C00Ah +001B4Er 1 0B C0 .word 0C00Bh +001B50r 1 0C C0 .word 0C00Ch +001B52r 1 0D C0 .word 0C00Dh +001B54r 1 0E C0 .word 0C00Eh +001B56r 1 0F C0 .word 0C00Fh +001B58r 1 E1 CF .word 0CFE1h +001B5Ar 1 E2 CF .word 0CFE2h +001B5Cr 1 E3 CF .word 0CFE3h +001B5Er 1 E4 CF .word 0CFE4h +001B60r 1 E5 CF .word 0CFE5h +001B62r 1 E6 CF .word 0CFE6h +001B64r 1 E7 CF .word 0CFE7h +001B66r 1 E8 CF .word 0CFE8h +001B68r 1 E9 CF .word 0CFE9h +001B6Ar 1 EA CF .word 0CFEAh +001B6Cr 1 EB CF .word 0CFEBh +001B6Er 1 EC CF .word 0CFECh +001B70r 1 ED CF .word 0CFEDh +001B72r 1 EE CF .word 0CFEEh +001B74r 1 EF CF .word 0CFEFh +001B76r 1 F0 CF .word 0CFF0h +001B78r 1 F1 CF .word 0CFF1h +001B7Ar 1 F2 CF .word 0CFF2h +001B7Cr 1 F3 CF .word 0CFF3h +001B7Er 1 F4 CF .word 0CFF4h +001B80r 1 F5 CF .word 0CFF5h +001B82r 1 F6 CF .word 0CFF6h +001B84r 1 F7 CF .word 0CFF7h +001B86r 1 F8 CF .word 0CFF8h +001B88r 1 F9 CF .word 0CFF9h +001B8Ar 1 FA CF .word 0CFFAh +001B8Cr 1 FB CF .word 0CFFBh +001B8Er 1 FC CF .word 0CFFCh +001B90r 1 FD CF .word 0CFFDh +001B92r 1 FE CF .word 0CFFEh +001B94r 1 FF CF .word 0CFFFh +001B96r 1 00 D0 .word 0D000h +001B98r 1 01 D0 .word 0D001h +001B9Ar 1 02 D0 .word 0D002h +001B9Cr 1 03 D0 .word 0D003h +001B9Er 1 04 D0 .word 0D004h +001BA0r 1 05 D0 .word 0D005h +001BA2r 1 06 D0 .word 0D006h +001BA4r 1 07 D0 .word 0D007h +001BA6r 1 08 D0 .word 0D008h +001BA8r 1 09 D0 .word 0D009h +001BAAr 1 0A D0 .word 0D00Ah +001BACr 1 0B D0 .word 0D00Bh +001BAEr 1 0C D0 .word 0D00Ch +001BB0r 1 0D D0 .word 0D00Dh +001BB2r 1 0E D0 .word 0D00Eh +001BB4r 1 0F D0 .word 0D00Fh +001BB6r 1 E1 DF .word 0DFE1h +001BB8r 1 E2 DF .word 0DFE2h +001BBAr 1 E3 DF .word 0DFE3h +001BBCr 1 E4 DF .word 0DFE4h +001BBEr 1 E5 DF .word 0DFE5h +001BC0r 1 E6 DF .word 0DFE6h +001BC2r 1 E7 DF .word 0DFE7h +001BC4r 1 E8 DF .word 0DFE8h +001BC6r 1 E9 DF .word 0DFE9h +001BC8r 1 EA DF .word 0DFEAh +001BCAr 1 EB DF .word 0DFEBh +001BCCr 1 EC DF .word 0DFECh +001BCEr 1 ED DF .word 0DFEDh +001BD0r 1 EE DF .word 0DFEEh +001BD2r 1 EF DF .word 0DFEFh +001BD4r 1 F0 DF .word 0DFF0h +001BD6r 1 F1 DF .word 0DFF1h +001BD8r 1 F2 DF .word 0DFF2h +001BDAr 1 F3 DF .word 0DFF3h +001BDCr 1 F4 DF .word 0DFF4h +001BDEr 1 F5 DF .word 0DFF5h +001BE0r 1 F6 DF .word 0DFF6h +001BE2r 1 F7 DF .word 0DFF7h +001BE4r 1 F8 DF .word 0DFF8h +001BE6r 1 F9 DF .word 0DFF9h +001BE8r 1 FA DF .word 0DFFAh +001BEAr 1 FB DF .word 0DFFBh +001BECr 1 FC DF .word 0DFFCh +001BEEr 1 FD DF .word 0DFFDh +001BF0r 1 FE DF .word 0DFFEh +001BF2r 1 FF DF .word 0DFFFh +001BF4r 1 00 E0 .word 0E000h +001BF6r 1 01 E0 .word 0E001h +001BF8r 1 02 E0 .word 0E002h +001BFAr 1 03 E0 .word 0E003h +001BFCr 1 04 E0 .word 0E004h +001BFEr 1 05 E0 .word 0E005h +001C00r 1 06 E0 .word 0E006h +001C02r 1 07 E0 .word 0E007h +001C04r 1 08 E0 .word 0E008h +001C06r 1 09 E0 .word 0E009h +001C08r 1 0A E0 .word 0E00Ah +001C0Ar 1 0B E0 .word 0E00Bh +001C0Cr 1 0C E0 .word 0E00Ch +001C0Er 1 0D E0 .word 0E00Dh +001C10r 1 0E E0 .word 0E00Eh +001C12r 1 0F E0 .word 0E00Fh +001C14r 1 E1 EF .word 0EFE1h +001C16r 1 E2 EF .word 0EFE2h +001C18r 1 E3 EF .word 0EFE3h +001C1Ar 1 E4 EF .word 0EFE4h +001C1Cr 1 E5 EF .word 0EFE5h +001C1Er 1 E6 EF .word 0EFE6h +001C20r 1 E7 EF .word 0EFE7h +001C22r 1 E8 EF .word 0EFE8h +001C24r 1 E9 EF .word 0EFE9h +001C26r 1 EA EF .word 0EFEAh +001C28r 1 EB EF .word 0EFEBh +001C2Ar 1 EC EF .word 0EFECh +001C2Cr 1 ED EF .word 0EFEDh +001C2Er 1 EE EF .word 0EFEEh +001C30r 1 EF EF .word 0EFEFh +001C32r 1 F0 EF .word 0EFF0h +001C34r 1 F1 EF .word 0EFF1h +001C36r 1 F2 EF .word 0EFF2h +001C38r 1 F3 EF .word 0EFF3h +001C3Ar 1 F4 EF .word 0EFF4h +001C3Cr 1 F5 EF .word 0EFF5h +001C3Er 1 F6 EF .word 0EFF6h +001C40r 1 F7 EF .word 0EFF7h +001C42r 1 F8 EF .word 0EFF8h +001C44r 1 F9 EF .word 0EFF9h +001C46r 1 FA EF .word 0EFFAh +001C48r 1 FB EF .word 0EFFBh +001C4Ar 1 FC EF .word 0EFFCh +001C4Cr 1 FD EF .word 0EFFDh +001C4Er 1 FE EF .word 0EFFEh +001C50r 1 FF EF .word 0EFFFh +001C52r 1 00 F0 .word 0F000h +001C54r 1 01 F0 .word 0F001h +001C56r 1 02 F0 .word 0F002h +001C58r 1 03 F0 .word 0F003h +001C5Ar 1 04 F0 .word 0F004h +001C5Cr 1 05 F0 .word 0F005h +001C5Er 1 06 F0 .word 0F006h +001C60r 1 07 F0 .word 0F007h +001C62r 1 08 F0 .word 0F008h +001C64r 1 09 F0 .word 0F009h +001C66r 1 0A F0 .word 0F00Ah +001C68r 1 0B F0 .word 0F00Bh +001C6Ar 1 0C F0 .word 0F00Ch +001C6Cr 1 0D F0 .word 0F00Dh +001C6Er 1 0E F0 .word 0F00Eh +001C70r 1 0F F0 .word 0F00Fh +001C72r 1 E1 FF .word 0FFE1h +001C74r 1 E2 FF .word 0FFE2h +001C76r 1 E3 FF .word 0FFE3h +001C78r 1 E4 FF .word 0FFE4h +001C7Ar 1 E5 FF .word 0FFE5h +001C7Cr 1 E6 FF .word 0FFE6h +001C7Er 1 E7 FF .word 0FFE7h +001C80r 1 E8 FF .word 0FFE8h +001C82r 1 E9 FF .word 0FFE9h +001C84r 1 EA FF .word 0FFEAh +001C86r 1 EB FF .word 0FFEBh +001C88r 1 EC FF .word 0FFECh +001C8Ar 1 ED FF .word 0FFEDh +001C8Cr 1 EE FF .word 0FFEEh +001C8Er 1 EF FF .word 0FFEFh +001C90r 1 F0 FF .word 0FFF0h +001C92r 1 F1 FF .word 0FFF1h +001C94r 1 F2 FF .word 0FFF2h +001C96r 1 F3 FF .word 0FFF3h +001C98r 1 F4 FF .word 0FFF4h +001C9Ar 1 F5 FF .word 0FFF5h +001C9Cr 1 F6 FF .word 0FFF6h +001C9Er 1 F7 FF .word 0FFF7h +001CA0r 1 F8 FF .word 0FFF8h +001CA2r 1 F9 FF .word 0FFF9h +001CA4r 1 FA FF .word 0FFFAh +001CA6r 1 FB FF .word 0FFFBh +001CA8r 1 FC FF .word 0FFFCh +001CAAr 1 FD FF .word 0FFFDh +001CACr 1 FE FF .word 0FFFEh +001CAEr 1 FF FF .word 0FFFFh +001CB0r 1 +001CB0r 1 ; alternative 4-digit hex values +001CB0r 1 00 00 .word 0000h +001CB2r 1 01 00 .word 0001h +001CB4r 1 02 00 .word 0002h +001CB6r 1 03 00 .word 0003h +001CB8r 1 04 00 .word 0004h +001CBAr 1 05 00 .word 0005h +001CBCr 1 06 00 .word 0006h +001CBEr 1 07 00 .word 0007h +001CC0r 1 08 00 .word 0008h +001CC2r 1 09 00 .word 0009h +001CC4r 1 0A 00 .word 000ah +001CC6r 1 0B 00 .word 000bh +001CC8r 1 0C 00 .word 000ch +001CCAr 1 0D 00 .word 000dh +001CCCr 1 0E 00 .word 000eh +001CCEr 1 0F 00 .word 000fh +001CD0r 1 10 00 .word 0010h +001CD2r 1 11 00 .word 0011h +001CD4r 1 12 00 .word 0012h +001CD6r 1 13 00 .word 0013h +001CD8r 1 70 00 .word 0070h +001CDAr 1 71 00 .word 0071h +001CDCr 1 72 00 .word 0072h +001CDEr 1 73 00 .word 0073h +001CE0r 1 74 00 .word 0074h +001CE2r 1 75 00 .word 0075h +001CE4r 1 76 00 .word 0076h +001CE6r 1 77 00 .word 0077h +001CE8r 1 78 00 .word 0078h +001CEAr 1 79 00 .word 0079h +001CECr 1 7A 00 .word 007ah +001CEEr 1 7B 00 .word 007bh +001CF0r 1 7C 00 .word 007ch +001CF2r 1 7D 00 .word 007dh +001CF4r 1 7E 00 .word 007eh +001CF6r 1 7F 00 .word 007fh +001CF8r 1 80 00 .word 0080h +001CFAr 1 81 00 .word 0081h +001CFCr 1 82 00 .word 0082h +001CFEr 1 83 00 .word 0083h +001D00r 1 84 00 .word 0084h +001D02r 1 85 00 .word 0085h +001D04r 1 86 00 .word 0086h +001D06r 1 F0 00 .word 00f0h +001D08r 1 F1 00 .word 00f1h +001D0Ar 1 F2 00 .word 00f2h +001D0Cr 1 F3 00 .word 00f3h +001D0Er 1 F4 00 .word 00f4h +001D10r 1 F5 00 .word 00f5h +001D12r 1 F6 00 .word 00f6h +001D14r 1 F7 00 .word 00f7h +001D16r 1 F8 00 .word 00f8h +001D18r 1 F9 00 .word 00f9h +001D1Ar 1 FA 00 .word 00fah +001D1Cr 1 FB 00 .word 00fbh +001D1Er 1 FC 00 .word 00fch +001D20r 1 FD 00 .word 00fdh +001D22r 1 FE 00 .word 00feh +001D24r 1 FF 00 .word 00ffh +001D26r 1 00 01 .word 0100h +001D28r 1 01 01 .word 0101h +001D2Ar 1 02 01 .word 0102h +001D2Cr 1 03 01 .word 0103h +001D2Er 1 D2 0F .word 0fd2h +001D30r 1 D3 0F .word 0fd3h +001D32r 1 D4 0F .word 0fd4h +001D34r 1 D5 0F .word 0fd5h +001D36r 1 D6 0F .word 0fd6h +001D38r 1 D7 0F .word 0fd7h +001D3Ar 1 D8 0F .word 0fd8h +001D3Cr 1 D9 0F .word 0fd9h +001D3Er 1 DA 0F .word 0fdah +001D40r 1 DB 0F .word 0fdbh +001D42r 1 DC 0F .word 0fdch +001D44r 1 DD 0F .word 0fddh +001D46r 1 DE 0F .word 0fdeh +001D48r 1 DF 0F .word 0fdfh +001D4Ar 1 E0 0F .word 0fe0h +001D4Cr 1 E1 0F .word 0fe1h +001D4Er 1 E2 0F .word 0fe2h +001D50r 1 E3 0F .word 0fe3h +001D52r 1 E4 0F .word 0fe4h +001D54r 1 E5 0F .word 0fe5h +001D56r 1 E6 0F .word 0fe6h +001D58r 1 E7 0F .word 0fe7h +001D5Ar 1 E8 0F .word 0fe8h +001D5Cr 1 E9 0F .word 0fe9h +001D5Er 1 EA 0F .word 0feah +001D60r 1 EB 0F .word 0febh +001D62r 1 EC 0F .word 0fech +001D64r 1 ED 0F .word 0fedh +001D66r 1 EE 0F .word 0feeh +001D68r 1 EF 0F .word 0fefh +001D6Ar 1 F0 0F .word 0ff0h +001D6Cr 1 F1 0F .word 0ff1h +001D6Er 1 F2 0F .word 0ff2h +001D70r 1 F3 0F .word 0ff3h +001D72r 1 F4 0F .word 0ff4h +001D74r 1 F5 0F .word 0ff5h +001D76r 1 F6 0F .word 0ff6h +001D78r 1 F7 0F .word 0ff7h +001D7Ar 1 F8 0F .word 0ff8h +001D7Cr 1 F9 0F .word 0ff9h +001D7Er 1 FA 0F .word 0ffah +001D80r 1 FB 0F .word 0ffbh +001D82r 1 FC 0F .word 0ffch +001D84r 1 FD 0F .word 0ffdh +001D86r 1 FE 0F .word 0ffeh +001D88r 1 FF 0F .word 0fffh +001D8Ar 1 00 10 .word 1000h +001D8Cr 1 01 10 .word 1001h +001D8Er 1 02 10 .word 1002h +001D90r 1 03 10 .word 1003h +001D92r 1 04 10 .word 1004h +001D94r 1 05 10 .word 1005h +001D96r 1 06 10 .word 1006h +001D98r 1 07 10 .word 1007h +001D9Ar 1 08 10 .word 1008h +001D9Cr 1 F0 7F .word 7ff0h +001D9Er 1 F1 7F .word 7ff1h +001DA0r 1 F2 7F .word 7ff2h +001DA2r 1 F3 7F .word 7ff3h +001DA4r 1 F4 7F .word 7ff4h +001DA6r 1 F5 7F .word 7ff5h +001DA8r 1 F6 7F .word 7ff6h +001DAAr 1 F7 7F .word 7ff7h +001DACr 1 F8 7F .word 7ff8h +001DAEr 1 F9 7F .word 7ff9h +001DB0r 1 FA 7F .word 7ffah +001DB2r 1 FB 7F .word 7ffbh +001DB4r 1 FC 7F .word 7ffch +001DB6r 1 FD 7F .word 7ffdh +001DB8r 1 FE 7F .word 7ffeh +001DBAr 1 FF 7F .word 7fffh +001DBCr 1 00 80 .word 8000h +001DBEr 1 01 80 .word 8001h +001DC0r 1 02 80 .word 8002h +001DC2r 1 03 80 .word 8003h +001DC4r 1 04 80 .word 8004h +001DC6r 1 05 80 .word 8005h +001DC8r 1 06 80 .word 8006h +001DCAr 1 07 80 .word 8007h +001DCCr 1 08 80 .word 8008h +001DCEr 1 09 80 .word 8009h +001DD0r 1 0A 80 .word 800ah +001DD2r 1 0B 80 .word 800bh +001DD4r 1 E1 9F .word 9fe1h +001DD6r 1 E2 9F .word 9fe2h +001DD8r 1 E3 9F .word 9fe3h +001DDAr 1 E4 9F .word 9fe4h +001DDCr 1 E5 9F .word 9fe5h +001DDEr 1 E6 9F .word 9fe6h +001DE0r 1 E7 9F .word 9fe7h +001DE2r 1 E8 9F .word 9fe8h +001DE4r 1 E9 9F .word 9fe9h +001DE6r 1 EA 9F .word 9feah +001DE8r 1 EB 9F .word 9febh +001DEAr 1 EC 9F .word 9fech +001DECr 1 ED 9F .word 9fedh +001DEEr 1 EE 9F .word 9feeh +001DF0r 1 EF 9F .word 9fefh +001DF2r 1 F0 9F .word 9ff0h +001DF4r 1 F1 9F .word 9ff1h +001DF6r 1 F2 9F .word 9ff2h +001DF8r 1 F3 9F .word 9ff3h +001DFAr 1 F4 9F .word 9ff4h +001DFCr 1 F5 9F .word 9ff5h +001DFEr 1 F6 9F .word 9ff6h +001E00r 1 F7 9F .word 9ff7h +001E02r 1 F8 9F .word 9ff8h +001E04r 1 F9 9F .word 9ff9h +001E06r 1 FA 9F .word 9ffah +001E08r 1 FB 9F .word 9ffbh +001E0Ar 1 FC 9F .word 9ffch +001E0Cr 1 FD 9F .word 9ffdh +001E0Er 1 FE 9F .word 9ffeh +001E10r 1 FF 9F .word 9fffh +001E12r 1 00 A0 .word 0a000h +001E14r 1 01 A0 .word 0a001h +001E16r 1 02 A0 .word 0a002h +001E18r 1 03 A0 .word 0a003h +001E1Ar 1 04 A0 .word 0a004h +001E1Cr 1 05 A0 .word 0a005h +001E1Er 1 06 A0 .word 0a006h +001E20r 1 07 A0 .word 0a007h +001E22r 1 08 A0 .word 0a008h +001E24r 1 09 A0 .word 0a009h +001E26r 1 0A A0 .word 0a00ah +001E28r 1 0B A0 .word 0a00bh +001E2Ar 1 0C A0 .word 0a00ch +001E2Cr 1 0D A0 .word 0a00dh +001E2Er 1 0E A0 .word 0a00eh +001E30r 1 0F A0 .word 0a00fh +001E32r 1 E1 AF .word 0afe1h +001E34r 1 E2 AF .word 0afe2h +001E36r 1 E3 AF .word 0afe3h +001E38r 1 E4 AF .word 0afe4h +001E3Ar 1 E5 AF .word 0afe5h +001E3Cr 1 E6 AF .word 0afe6h +001E3Er 1 E7 AF .word 0afe7h +001E40r 1 E8 AF .word 0afe8h +001E42r 1 E9 AF .word 0afe9h +001E44r 1 EA AF .word 0afeah +001E46r 1 EB AF .word 0afebh +001E48r 1 EC AF .word 0afech +001E4Ar 1 ED AF .word 0afedh +001E4Cr 1 EE AF .word 0afeeh +001E4Er 1 EF AF .word 0afefh +001E50r 1 F0 AF .word 0aff0h +001E52r 1 F1 AF .word 0aff1h +001E54r 1 F2 AF .word 0aff2h +001E56r 1 F3 AF .word 0aff3h +001E58r 1 F4 AF .word 0aff4h +001E5Ar 1 F5 AF .word 0aff5h +001E5Cr 1 F6 AF .word 0aff6h +001E5Er 1 F7 AF .word 0aff7h +001E60r 1 F8 AF .word 0aff8h +001E62r 1 F9 AF .word 0aff9h +001E64r 1 FA AF .word 0affah +001E66r 1 FB AF .word 0affbh +001E68r 1 FC AF .word 0affch +001E6Ar 1 FD AF .word 0affdh +001E6Cr 1 FE AF .word 0affeh +001E6Er 1 FF AF .word 0afffh +001E70r 1 00 B0 .word 0b000h +001E72r 1 01 B0 .word 0b001h +001E74r 1 02 B0 .word 0b002h +001E76r 1 03 B0 .word 0b003h +001E78r 1 04 B0 .word 0b004h +001E7Ar 1 05 B0 .word 0b005h +001E7Cr 1 06 B0 .word 0b006h +001E7Er 1 07 B0 .word 0b007h +001E80r 1 08 B0 .word 0b008h +001E82r 1 09 B0 .word 0b009h +001E84r 1 0A B0 .word 0b00ah +001E86r 1 0B B0 .word 0b00bh +001E88r 1 0C B0 .word 0b00ch +001E8Ar 1 0D B0 .word 0b00dh +001E8Cr 1 0E B0 .word 0b00eh +001E8Er 1 0F B0 .word 0b00fh +001E90r 1 E1 BF .word 0bfe1h +001E92r 1 E2 BF .word 0bfe2h +001E94r 1 E3 BF .word 0bfe3h +001E96r 1 E4 BF .word 0bfe4h +001E98r 1 E5 BF .word 0bfe5h +001E9Ar 1 E6 BF .word 0bfe6h +001E9Cr 1 E7 BF .word 0bfe7h +001E9Er 1 E8 BF .word 0bfe8h +001EA0r 1 E9 BF .word 0bfe9h +001EA2r 1 EA BF .word 0bfeah +001EA4r 1 EB BF .word 0bfebh +001EA6r 1 EC BF .word 0bfech +001EA8r 1 ED BF .word 0bfedh +001EAAr 1 EE BF .word 0bfeeh +001EACr 1 EF BF .word 0bfefh +001EAEr 1 F0 BF .word 0bff0h +001EB0r 1 F1 BF .word 0bff1h +001EB2r 1 F2 BF .word 0bff2h +001EB4r 1 F3 BF .word 0bff3h +001EB6r 1 F4 BF .word 0bff4h +001EB8r 1 F5 BF .word 0bff5h +001EBAr 1 F6 BF .word 0bff6h +001EBCr 1 F7 BF .word 0bff7h +001EBEr 1 F8 BF .word 0bff8h +001EC0r 1 F9 BF .word 0bff9h +001EC2r 1 FA BF .word 0bffah +001EC4r 1 FB BF .word 0bffbh +001EC6r 1 FC BF .word 0bffch +001EC8r 1 FD BF .word 0bffdh +001ECAr 1 FE BF .word 0bffeh +001ECCr 1 FF BF .word 0bfffh +001ECEr 1 00 C0 .word 0c000h +001ED0r 1 01 C0 .word 0c001h +001ED2r 1 02 C0 .word 0c002h +001ED4r 1 03 C0 .word 0c003h +001ED6r 1 04 C0 .word 0c004h +001ED8r 1 05 C0 .word 0c005h +001EDAr 1 06 C0 .word 0c006h +001EDCr 1 07 C0 .word 0c007h +001EDEr 1 08 C0 .word 0c008h +001EE0r 1 09 C0 .word 0c009h +001EE2r 1 0A C0 .word 0c00ah +001EE4r 1 0B C0 .word 0c00bh +001EE6r 1 0C C0 .word 0c00ch +001EE8r 1 0D C0 .word 0c00dh +001EEAr 1 0E C0 .word 0c00eh +001EECr 1 0F C0 .word 0c00fh +001EEEr 1 E1 CF .word 0cfe1h +001EF0r 1 E2 CF .word 0cfe2h +001EF2r 1 E3 CF .word 0cfe3h +001EF4r 1 E4 CF .word 0cfe4h +001EF6r 1 E5 CF .word 0cfe5h +001EF8r 1 E6 CF .word 0cfe6h +001EFAr 1 E7 CF .word 0cfe7h +001EFCr 1 E8 CF .word 0cfe8h +001EFEr 1 E9 CF .word 0cfe9h +001F00r 1 EA CF .word 0cfeah +001F02r 1 EB CF .word 0cfebh +001F04r 1 EC CF .word 0cfech +001F06r 1 ED CF .word 0cfedh +001F08r 1 EE CF .word 0cfeeh +001F0Ar 1 EF CF .word 0cfefh +001F0Cr 1 F0 CF .word 0cff0h +001F0Er 1 F1 CF .word 0cff1h +001F10r 1 F2 CF .word 0cff2h +001F12r 1 F3 CF .word 0cff3h +001F14r 1 F4 CF .word 0cff4h +001F16r 1 F5 CF .word 0cff5h +001F18r 1 F6 CF .word 0cff6h +001F1Ar 1 F7 CF .word 0cff7h +001F1Cr 1 F8 CF .word 0cff8h +001F1Er 1 F9 CF .word 0cff9h +001F20r 1 FA CF .word 0cffah +001F22r 1 FB CF .word 0cffbh +001F24r 1 FC CF .word 0cffch +001F26r 1 FD CF .word 0cffdh +001F28r 1 FE CF .word 0cffeh +001F2Ar 1 FF CF .word 0cfffh +001F2Cr 1 00 D0 .word 0d000h +001F2Er 1 01 D0 .word 0d001h +001F30r 1 02 D0 .word 0d002h +001F32r 1 03 D0 .word 0d003h +001F34r 1 04 D0 .word 0d004h +001F36r 1 05 D0 .word 0d005h +001F38r 1 06 D0 .word 0d006h +001F3Ar 1 07 D0 .word 0d007h +001F3Cr 1 08 D0 .word 0d008h +001F3Er 1 09 D0 .word 0d009h +001F40r 1 0A D0 .word 0d00ah +001F42r 1 0B D0 .word 0d00bh +001F44r 1 0C D0 .word 0d00ch +001F46r 1 0D D0 .word 0d00dh +001F48r 1 0E D0 .word 0d00eh +001F4Ar 1 0F D0 .word 0d00fh +001F4Cr 1 E1 DF .word 0dfe1h +001F4Er 1 E2 DF .word 0dfe2h +001F50r 1 E3 DF .word 0dfe3h +001F52r 1 E4 DF .word 0dfe4h +001F54r 1 E5 DF .word 0dfe5h +001F56r 1 E6 DF .word 0dfe6h +001F58r 1 E7 DF .word 0dfe7h +001F5Ar 1 E8 DF .word 0dfe8h +001F5Cr 1 E9 DF .word 0dfe9h +001F5Er 1 EA DF .word 0dfeah +001F60r 1 EB DF .word 0dfebh +001F62r 1 EC DF .word 0dfech +001F64r 1 ED DF .word 0dfedh +001F66r 1 EE DF .word 0dfeeh +001F68r 1 EF DF .word 0dfefh +001F6Ar 1 F0 DF .word 0dff0h +001F6Cr 1 F1 DF .word 0dff1h +001F6Er 1 F2 DF .word 0dff2h +001F70r 1 F3 DF .word 0dff3h +001F72r 1 F4 DF .word 0dff4h +001F74r 1 F5 DF .word 0dff5h +001F76r 1 F6 DF .word 0dff6h +001F78r 1 F7 DF .word 0dff7h +001F7Ar 1 F8 DF .word 0dff8h +001F7Cr 1 F9 DF .word 0dff9h +001F7Er 1 FA DF .word 0dffah +001F80r 1 FB DF .word 0dffbh +001F82r 1 FC DF .word 0dffch +001F84r 1 FD DF .word 0dffdh +001F86r 1 FE DF .word 0dffeh +001F88r 1 FF DF .word 0dfffh +001F8Ar 1 00 E0 .word 0e000h +001F8Cr 1 01 E0 .word 0e001h +001F8Er 1 02 E0 .word 0e002h +001F90r 1 03 E0 .word 0e003h +001F92r 1 04 E0 .word 0e004h +001F94r 1 05 E0 .word 0e005h +001F96r 1 06 E0 .word 0e006h +001F98r 1 07 E0 .word 0e007h +001F9Ar 1 08 E0 .word 0e008h +001F9Cr 1 09 E0 .word 0e009h +001F9Er 1 0A E0 .word 0e00ah +001FA0r 1 0B E0 .word 0e00bh +001FA2r 1 0C E0 .word 0e00ch +001FA4r 1 0D E0 .word 0e00dh +001FA6r 1 0E E0 .word 0e00eh +001FA8r 1 0F E0 .word 0e00fh +001FAAr 1 E1 EF .word 0efe1h +001FACr 1 E2 EF .word 0efe2h +001FAEr 1 E3 EF .word 0efe3h +001FB0r 1 E4 EF .word 0efe4h +001FB2r 1 E5 EF .word 0efe5h +001FB4r 1 E6 EF .word 0efe6h +001FB6r 1 E7 EF .word 0efe7h +001FB8r 1 E8 EF .word 0efe8h +001FBAr 1 E9 EF .word 0efe9h +001FBCr 1 EA EF .word 0efeah +001FBEr 1 EB EF .word 0efebh +001FC0r 1 EC EF .word 0efech +001FC2r 1 ED EF .word 0efedh +001FC4r 1 EE EF .word 0efeeh +001FC6r 1 EF EF .word 0efefh +001FC8r 1 F0 EF .word 0eff0h +001FCAr 1 F1 EF .word 0eff1h +001FCCr 1 F2 EF .word 0eff2h +001FCEr 1 F3 EF .word 0eff3h +001FD0r 1 F4 EF .word 0eff4h +001FD2r 1 F5 EF .word 0eff5h +001FD4r 1 F6 EF .word 0eff6h +001FD6r 1 F7 EF .word 0eff7h +001FD8r 1 F8 EF .word 0eff8h +001FDAr 1 F9 EF .word 0eff9h +001FDCr 1 FA EF .word 0effah +001FDEr 1 FB EF .word 0effbh +001FE0r 1 FC EF .word 0effch +001FE2r 1 FD EF .word 0effdh +001FE4r 1 FE EF .word 0effeh +001FE6r 1 FF EF .word 0efffh +001FE8r 1 00 F0 .word 0f000h +001FEAr 1 01 F0 .word 0f001h +001FECr 1 02 F0 .word 0f002h +001FEEr 1 03 F0 .word 0f003h +001FF0r 1 04 F0 .word 0f004h +001FF2r 1 05 F0 .word 0f005h +001FF4r 1 06 F0 .word 0f006h +001FF6r 1 07 F0 .word 0f007h +001FF8r 1 08 F0 .word 0f008h +001FFAr 1 09 F0 .word 0f009h +001FFCr 1 0A F0 .word 0f00ah +001FFEr 1 0B F0 .word 0f00bh +002000r 1 0C F0 .word 0f00ch +002002r 1 0D F0 .word 0f00dh +002004r 1 0E F0 .word 0f00eh +002006r 1 0F F0 .word 0f00fh +002008r 1 E1 FF .word 0ffe1h +00200Ar 1 E2 FF .word 0ffe2h +00200Cr 1 E3 FF .word 0ffe3h +00200Er 1 E4 FF .word 0ffe4h +002010r 1 E5 FF .word 0ffe5h +002012r 1 E6 FF .word 0ffe6h +002014r 1 E7 FF .word 0ffe7h +002016r 1 E8 FF .word 0ffe8h +002018r 1 E9 FF .word 0ffe9h +00201Ar 1 EA FF .word 0ffeah +00201Cr 1 EB FF .word 0ffebh +00201Er 1 EC FF .word 0ffech +002020r 1 ED FF .word 0ffedh +002022r 1 EE FF .word 0ffeeh +002024r 1 EF FF .word 0ffefh +002026r 1 F0 FF .word 0fff0h +002028r 1 F1 FF .word 0fff1h +00202Ar 1 F2 FF .word 0fff2h +00202Cr 1 F3 FF .word 0fff3h +00202Er 1 F4 FF .word 0fff4h +002030r 1 F5 FF .word 0fff5h +002032r 1 F6 FF .word 0fff6h +002034r 1 F7 FF .word 0fff7h +002036r 1 F8 FF .word 0fff8h +002038r 1 F9 FF .word 0fff9h +00203Ar 1 FA FF .word 0fffah +00203Cr 1 FB FF .word 0fffbh +00203Er 1 FC FF .word 0fffch +002040r 1 FD FF .word 0fffdh +002042r 1 FE FF .word 0fffeh +002044r 1 FF FF .word 0ffffh +002046r 1 +002046r 1 ; alternative 4-digit hex values, uppercase +002046r 1 00 00 .word 0000h +002048r 1 01 00 .word 0001h +00204Ar 1 02 00 .word 0002h +00204Cr 1 03 00 .word 0003h +00204Er 1 04 00 .word 0004h +002050r 1 05 00 .word 0005h +002052r 1 06 00 .word 0006h +002054r 1 07 00 .word 0007h +002056r 1 08 00 .word 0008h +002058r 1 09 00 .word 0009h +00205Ar 1 0A 00 .word 000Ah +00205Cr 1 0B 00 .word 000Bh +00205Er 1 0C 00 .word 000Ch +002060r 1 0D 00 .word 000Dh +002062r 1 0E 00 .word 000Eh +002064r 1 0F 00 .word 000Fh +002066r 1 10 00 .word 0010h +002068r 1 11 00 .word 0011h +00206Ar 1 12 00 .word 0012h +00206Cr 1 13 00 .word 0013h +00206Er 1 70 00 .word 0070h +002070r 1 71 00 .word 0071h +002072r 1 72 00 .word 0072h +002074r 1 73 00 .word 0073h +002076r 1 74 00 .word 0074h +002078r 1 75 00 .word 0075h +00207Ar 1 76 00 .word 0076h +00207Cr 1 77 00 .word 0077h +00207Er 1 78 00 .word 0078h +002080r 1 79 00 .word 0079h +002082r 1 7A 00 .word 007Ah +002084r 1 7B 00 .word 007Bh +002086r 1 7C 00 .word 007Ch +002088r 1 7D 00 .word 007Dh +00208Ar 1 7E 00 .word 007Eh +00208Cr 1 7F 00 .word 007Fh +00208Er 1 80 00 .word 0080h +002090r 1 81 00 .word 0081h +002092r 1 82 00 .word 0082h +002094r 1 83 00 .word 0083h +002096r 1 84 00 .word 0084h +002098r 1 85 00 .word 0085h +00209Ar 1 86 00 .word 0086h +00209Cr 1 F0 00 .word 00F0h +00209Er 1 F1 00 .word 00F1h +0020A0r 1 F2 00 .word 00F2h +0020A2r 1 F3 00 .word 00F3h +0020A4r 1 F4 00 .word 00F4h +0020A6r 1 F5 00 .word 00F5h +0020A8r 1 F6 00 .word 00F6h +0020AAr 1 F7 00 .word 00F7h +0020ACr 1 F8 00 .word 00F8h +0020AEr 1 F9 00 .word 00F9h +0020B0r 1 FA 00 .word 00FAh +0020B2r 1 FB 00 .word 00FBh +0020B4r 1 FC 00 .word 00FCh +0020B6r 1 FD 00 .word 00FDh +0020B8r 1 FE 00 .word 00FEh +0020BAr 1 FF 00 .word 00FFh +0020BCr 1 00 01 .word 0100h +0020BEr 1 01 01 .word 0101h +0020C0r 1 02 01 .word 0102h +0020C2r 1 03 01 .word 0103h +0020C4r 1 D2 0F .word 0FD2h +0020C6r 1 D3 0F .word 0FD3h +0020C8r 1 D4 0F .word 0FD4h +0020CAr 1 D5 0F .word 0FD5h +0020CCr 1 D6 0F .word 0FD6h +0020CEr 1 D7 0F .word 0FD7h +0020D0r 1 D8 0F .word 0FD8h +0020D2r 1 D9 0F .word 0FD9h +0020D4r 1 DA 0F .word 0FDAh +0020D6r 1 DB 0F .word 0FDBh +0020D8r 1 DC 0F .word 0FDCh +0020DAr 1 DD 0F .word 0FDDh +0020DCr 1 DE 0F .word 0FDEh +0020DEr 1 DF 0F .word 0FDFh +0020E0r 1 E0 0F .word 0FE0h +0020E2r 1 E1 0F .word 0FE1h +0020E4r 1 E2 0F .word 0FE2h +0020E6r 1 E3 0F .word 0FE3h +0020E8r 1 E4 0F .word 0FE4h +0020EAr 1 E5 0F .word 0FE5h +0020ECr 1 E6 0F .word 0FE6h +0020EEr 1 E7 0F .word 0FE7h +0020F0r 1 E8 0F .word 0FE8h +0020F2r 1 E9 0F .word 0FE9h +0020F4r 1 EA 0F .word 0FEAh +0020F6r 1 EB 0F .word 0FEBh +0020F8r 1 EC 0F .word 0FECh +0020FAr 1 ED 0F .word 0FEDh +0020FCr 1 EE 0F .word 0FEEh +0020FEr 1 EF 0F .word 0FEFh +002100r 1 F0 0F .word 0FF0h +002102r 1 F1 0F .word 0FF1h +002104r 1 F2 0F .word 0FF2h +002106r 1 F3 0F .word 0FF3h +002108r 1 F4 0F .word 0FF4h +00210Ar 1 F5 0F .word 0FF5h +00210Cr 1 F6 0F .word 0FF6h +00210Er 1 F7 0F .word 0FF7h +002110r 1 F8 0F .word 0FF8h +002112r 1 F9 0F .word 0FF9h +002114r 1 FA 0F .word 0FFAh +002116r 1 FB 0F .word 0FFBh +002118r 1 FC 0F .word 0FFCh +00211Ar 1 FD 0F .word 0FFDh +00211Cr 1 FE 0F .word 0FFEh +00211Er 1 FF 0F .word 0FFFh +002120r 1 00 10 .word 1000h +002122r 1 01 10 .word 1001h +002124r 1 02 10 .word 1002h +002126r 1 03 10 .word 1003h +002128r 1 04 10 .word 1004h +00212Ar 1 05 10 .word 1005h +00212Cr 1 06 10 .word 1006h +00212Er 1 07 10 .word 1007h +002130r 1 08 10 .word 1008h +002132r 1 F0 7F .word 7FF0h +002134r 1 F1 7F .word 7FF1h +002136r 1 F2 7F .word 7FF2h +002138r 1 F3 7F .word 7FF3h +00213Ar 1 F4 7F .word 7FF4h +00213Cr 1 F5 7F .word 7FF5h +00213Er 1 F6 7F .word 7FF6h +002140r 1 F7 7F .word 7FF7h +002142r 1 F8 7F .word 7FF8h +002144r 1 F9 7F .word 7FF9h +002146r 1 FA 7F .word 7FFAh +002148r 1 FB 7F .word 7FFBh +00214Ar 1 FC 7F .word 7FFCh +00214Cr 1 FD 7F .word 7FFDh +00214Er 1 FE 7F .word 7FFEh +002150r 1 FF 7F .word 7FFFh +002152r 1 00 80 .word 8000h +002154r 1 01 80 .word 8001h +002156r 1 02 80 .word 8002h +002158r 1 03 80 .word 8003h +00215Ar 1 04 80 .word 8004h +00215Cr 1 05 80 .word 8005h +00215Er 1 06 80 .word 8006h +002160r 1 07 80 .word 8007h +002162r 1 08 80 .word 8008h +002164r 1 09 80 .word 8009h +002166r 1 0A 80 .word 800Ah +002168r 1 0B 80 .word 800Bh +00216Ar 1 E1 9F .word 9FE1h +00216Cr 1 E2 9F .word 9FE2h +00216Er 1 E3 9F .word 9FE3h +002170r 1 E4 9F .word 9FE4h +002172r 1 E5 9F .word 9FE5h +002174r 1 E6 9F .word 9FE6h +002176r 1 E7 9F .word 9FE7h +002178r 1 E8 9F .word 9FE8h +00217Ar 1 E9 9F .word 9FE9h +00217Cr 1 EA 9F .word 9FEAh +00217Er 1 EB 9F .word 9FEBh +002180r 1 EC 9F .word 9FECh +002182r 1 ED 9F .word 9FEDh +002184r 1 EE 9F .word 9FEEh +002186r 1 EF 9F .word 9FEFh +002188r 1 F0 9F .word 9FF0h +00218Ar 1 F1 9F .word 9FF1h +00218Cr 1 F2 9F .word 9FF2h +00218Er 1 F3 9F .word 9FF3h +002190r 1 F4 9F .word 9FF4h +002192r 1 F5 9F .word 9FF5h +002194r 1 F6 9F .word 9FF6h +002196r 1 F7 9F .word 9FF7h +002198r 1 F8 9F .word 9FF8h +00219Ar 1 F9 9F .word 9FF9h +00219Cr 1 FA 9F .word 9FFAh +00219Er 1 FB 9F .word 9FFBh +0021A0r 1 FC 9F .word 9FFCh +0021A2r 1 FD 9F .word 9FFDh +0021A4r 1 FE 9F .word 9FFEh +0021A6r 1 FF 9F .word 9FFFh +0021A8r 1 00 A0 .word 0A000h +0021AAr 1 01 A0 .word 0A001h +0021ACr 1 02 A0 .word 0A002h +0021AEr 1 03 A0 .word 0A003h +0021B0r 1 04 A0 .word 0A004h +0021B2r 1 05 A0 .word 0A005h +0021B4r 1 06 A0 .word 0A006h +0021B6r 1 07 A0 .word 0A007h +0021B8r 1 08 A0 .word 0A008h +0021BAr 1 09 A0 .word 0A009h +0021BCr 1 0A A0 .word 0A00Ah +0021BEr 1 0B A0 .word 0A00Bh +0021C0r 1 0C A0 .word 0A00Ch +0021C2r 1 0D A0 .word 0A00Dh +0021C4r 1 0E A0 .word 0A00Eh +0021C6r 1 0F A0 .word 0A00Fh +0021C8r 1 E1 AF .word 0AFE1h +0021CAr 1 E2 AF .word 0AFE2h +0021CCr 1 E3 AF .word 0AFE3h +0021CEr 1 E4 AF .word 0AFE4h +0021D0r 1 E5 AF .word 0AFE5h +0021D2r 1 E6 AF .word 0AFE6h +0021D4r 1 E7 AF .word 0AFE7h +0021D6r 1 E8 AF .word 0AFE8h +0021D8r 1 E9 AF .word 0AFE9h +0021DAr 1 EA AF .word 0AFEAh +0021DCr 1 EB AF .word 0AFEBh +0021DEr 1 EC AF .word 0AFECh +0021E0r 1 ED AF .word 0AFEDh +0021E2r 1 EE AF .word 0AFEEh +0021E4r 1 EF AF .word 0AFEFh +0021E6r 1 F0 AF .word 0AFF0h +0021E8r 1 F1 AF .word 0AFF1h +0021EAr 1 F2 AF .word 0AFF2h +0021ECr 1 F3 AF .word 0AFF3h +0021EEr 1 F4 AF .word 0AFF4h +0021F0r 1 F5 AF .word 0AFF5h +0021F2r 1 F6 AF .word 0AFF6h +0021F4r 1 F7 AF .word 0AFF7h +0021F6r 1 F8 AF .word 0AFF8h +0021F8r 1 F9 AF .word 0AFF9h +0021FAr 1 FA AF .word 0AFFAh +0021FCr 1 FB AF .word 0AFFBh +0021FEr 1 FC AF .word 0AFFCh +002200r 1 FD AF .word 0AFFDh +002202r 1 FE AF .word 0AFFEh +002204r 1 FF AF .word 0AFFFh +002206r 1 00 B0 .word 0B000h +002208r 1 01 B0 .word 0B001h +00220Ar 1 02 B0 .word 0B002h +00220Cr 1 03 B0 .word 0B003h +00220Er 1 04 B0 .word 0B004h +002210r 1 05 B0 .word 0B005h +002212r 1 06 B0 .word 0B006h +002214r 1 07 B0 .word 0B007h +002216r 1 08 B0 .word 0B008h +002218r 1 09 B0 .word 0B009h +00221Ar 1 0A B0 .word 0B00Ah +00221Cr 1 0B B0 .word 0B00Bh +00221Er 1 0C B0 .word 0B00Ch +002220r 1 0D B0 .word 0B00Dh +002222r 1 0E B0 .word 0B00Eh +002224r 1 0F B0 .word 0B00Fh +002226r 1 E1 BF .word 0BFE1h +002228r 1 E2 BF .word 0BFE2h +00222Ar 1 E3 BF .word 0BFE3h +00222Cr 1 E4 BF .word 0BFE4h +00222Er 1 E5 BF .word 0BFE5h +002230r 1 E6 BF .word 0BFE6h +002232r 1 E7 BF .word 0BFE7h +002234r 1 E8 BF .word 0BFE8h +002236r 1 E9 BF .word 0BFE9h +002238r 1 EA BF .word 0BFEAh +00223Ar 1 EB BF .word 0BFEBh +00223Cr 1 EC BF .word 0BFECh +00223Er 1 ED BF .word 0BFEDh +002240r 1 EE BF .word 0BFEEh +002242r 1 EF BF .word 0BFEFh +002244r 1 F0 BF .word 0BFF0h +002246r 1 F1 BF .word 0BFF1h +002248r 1 F2 BF .word 0BFF2h +00224Ar 1 F3 BF .word 0BFF3h +00224Cr 1 F4 BF .word 0BFF4h +00224Er 1 F5 BF .word 0BFF5h +002250r 1 F6 BF .word 0BFF6h +002252r 1 F7 BF .word 0BFF7h +002254r 1 F8 BF .word 0BFF8h +002256r 1 F9 BF .word 0BFF9h +002258r 1 FA BF .word 0BFFAh +00225Ar 1 FB BF .word 0BFFBh +00225Cr 1 FC BF .word 0BFFCh +00225Er 1 FD BF .word 0BFFDh +002260r 1 FE BF .word 0BFFEh +002262r 1 FF BF .word 0BFFFh +002264r 1 00 C0 .word 0C000h +002266r 1 01 C0 .word 0C001h +002268r 1 02 C0 .word 0C002h +00226Ar 1 03 C0 .word 0C003h +00226Cr 1 04 C0 .word 0C004h +00226Er 1 05 C0 .word 0C005h +002270r 1 06 C0 .word 0C006h +002272r 1 07 C0 .word 0C007h +002274r 1 08 C0 .word 0C008h +002276r 1 09 C0 .word 0C009h +002278r 1 0A C0 .word 0C00Ah +00227Ar 1 0B C0 .word 0C00Bh +00227Cr 1 0C C0 .word 0C00Ch +00227Er 1 0D C0 .word 0C00Dh +002280r 1 0E C0 .word 0C00Eh +002282r 1 0F C0 .word 0C00Fh +002284r 1 E1 CF .word 0CFE1h +002286r 1 E2 CF .word 0CFE2h +002288r 1 E3 CF .word 0CFE3h +00228Ar 1 E4 CF .word 0CFE4h +00228Cr 1 E5 CF .word 0CFE5h +00228Er 1 E6 CF .word 0CFE6h +002290r 1 E7 CF .word 0CFE7h +002292r 1 E8 CF .word 0CFE8h +002294r 1 E9 CF .word 0CFE9h +002296r 1 EA CF .word 0CFEAh +002298r 1 EB CF .word 0CFEBh +00229Ar 1 EC CF .word 0CFECh +00229Cr 1 ED CF .word 0CFEDh +00229Er 1 EE CF .word 0CFEEh +0022A0r 1 EF CF .word 0CFEFh +0022A2r 1 F0 CF .word 0CFF0h +0022A4r 1 F1 CF .word 0CFF1h +0022A6r 1 F2 CF .word 0CFF2h +0022A8r 1 F3 CF .word 0CFF3h +0022AAr 1 F4 CF .word 0CFF4h +0022ACr 1 F5 CF .word 0CFF5h +0022AEr 1 F6 CF .word 0CFF6h +0022B0r 1 F7 CF .word 0CFF7h +0022B2r 1 F8 CF .word 0CFF8h +0022B4r 1 F9 CF .word 0CFF9h +0022B6r 1 FA CF .word 0CFFAh +0022B8r 1 FB CF .word 0CFFBh +0022BAr 1 FC CF .word 0CFFCh +0022BCr 1 FD CF .word 0CFFDh +0022BEr 1 FE CF .word 0CFFEh +0022C0r 1 FF CF .word 0CFFFh +0022C2r 1 00 D0 .word 0D000h +0022C4r 1 01 D0 .word 0D001h +0022C6r 1 02 D0 .word 0D002h +0022C8r 1 03 D0 .word 0D003h +0022CAr 1 04 D0 .word 0D004h +0022CCr 1 05 D0 .word 0D005h +0022CEr 1 06 D0 .word 0D006h +0022D0r 1 07 D0 .word 0D007h +0022D2r 1 08 D0 .word 0D008h +0022D4r 1 09 D0 .word 0D009h +0022D6r 1 0A D0 .word 0D00Ah +0022D8r 1 0B D0 .word 0D00Bh +0022DAr 1 0C D0 .word 0D00Ch +0022DCr 1 0D D0 .word 0D00Dh +0022DEr 1 0E D0 .word 0D00Eh +0022E0r 1 0F D0 .word 0D00Fh +0022E2r 1 E1 DF .word 0DFE1h +0022E4r 1 E2 DF .word 0DFE2h +0022E6r 1 E3 DF .word 0DFE3h +0022E8r 1 E4 DF .word 0DFE4h +0022EAr 1 E5 DF .word 0DFE5h +0022ECr 1 E6 DF .word 0DFE6h +0022EEr 1 E7 DF .word 0DFE7h +0022F0r 1 E8 DF .word 0DFE8h +0022F2r 1 E9 DF .word 0DFE9h +0022F4r 1 EA DF .word 0DFEAh +0022F6r 1 EB DF .word 0DFEBh +0022F8r 1 EC DF .word 0DFECh +0022FAr 1 ED DF .word 0DFEDh +0022FCr 1 EE DF .word 0DFEEh +0022FEr 1 EF DF .word 0DFEFh +002300r 1 F0 DF .word 0DFF0h +002302r 1 F1 DF .word 0DFF1h +002304r 1 F2 DF .word 0DFF2h +002306r 1 F3 DF .word 0DFF3h +002308r 1 F4 DF .word 0DFF4h +00230Ar 1 F5 DF .word 0DFF5h +00230Cr 1 F6 DF .word 0DFF6h +00230Er 1 F7 DF .word 0DFF7h +002310r 1 F8 DF .word 0DFF8h +002312r 1 F9 DF .word 0DFF9h +002314r 1 FA DF .word 0DFFAh +002316r 1 FB DF .word 0DFFBh +002318r 1 FC DF .word 0DFFCh +00231Ar 1 FD DF .word 0DFFDh +00231Cr 1 FE DF .word 0DFFEh +00231Er 1 FF DF .word 0DFFFh +002320r 1 00 E0 .word 0E000h +002322r 1 01 E0 .word 0E001h +002324r 1 02 E0 .word 0E002h +002326r 1 03 E0 .word 0E003h +002328r 1 04 E0 .word 0E004h +00232Ar 1 05 E0 .word 0E005h +00232Cr 1 06 E0 .word 0E006h +00232Er 1 07 E0 .word 0E007h +002330r 1 08 E0 .word 0E008h +002332r 1 09 E0 .word 0E009h +002334r 1 0A E0 .word 0E00Ah +002336r 1 0B E0 .word 0E00Bh +002338r 1 0C E0 .word 0E00Ch +00233Ar 1 0D E0 .word 0E00Dh +00233Cr 1 0E E0 .word 0E00Eh +00233Er 1 0F E0 .word 0E00Fh +002340r 1 E1 EF .word 0EFE1h +002342r 1 E2 EF .word 0EFE2h +002344r 1 E3 EF .word 0EFE3h +002346r 1 E4 EF .word 0EFE4h +002348r 1 E5 EF .word 0EFE5h +00234Ar 1 E6 EF .word 0EFE6h +00234Cr 1 E7 EF .word 0EFE7h +00234Er 1 E8 EF .word 0EFE8h +002350r 1 E9 EF .word 0EFE9h +002352r 1 EA EF .word 0EFEAh +002354r 1 EB EF .word 0EFEBh +002356r 1 EC EF .word 0EFECh +002358r 1 ED EF .word 0EFEDh +00235Ar 1 EE EF .word 0EFEEh +00235Cr 1 EF EF .word 0EFEFh +00235Er 1 F0 EF .word 0EFF0h +002360r 1 F1 EF .word 0EFF1h +002362r 1 F2 EF .word 0EFF2h +002364r 1 F3 EF .word 0EFF3h +002366r 1 F4 EF .word 0EFF4h +002368r 1 F5 EF .word 0EFF5h +00236Ar 1 F6 EF .word 0EFF6h +00236Cr 1 F7 EF .word 0EFF7h +00236Er 1 F8 EF .word 0EFF8h +002370r 1 F9 EF .word 0EFF9h +002372r 1 FA EF .word 0EFFAh +002374r 1 FB EF .word 0EFFBh +002376r 1 FC EF .word 0EFFCh +002378r 1 FD EF .word 0EFFDh +00237Ar 1 FE EF .word 0EFFEh +00237Cr 1 FF EF .word 0EFFFh +00237Er 1 00 F0 .word 0F000h +002380r 1 01 F0 .word 0F001h +002382r 1 02 F0 .word 0F002h +002384r 1 03 F0 .word 0F003h +002386r 1 04 F0 .word 0F004h +002388r 1 05 F0 .word 0F005h +00238Ar 1 06 F0 .word 0F006h +00238Cr 1 07 F0 .word 0F007h +00238Er 1 08 F0 .word 0F008h +002390r 1 09 F0 .word 0F009h +002392r 1 0A F0 .word 0F00Ah +002394r 1 0B F0 .word 0F00Bh +002396r 1 0C F0 .word 0F00Ch +002398r 1 0D F0 .word 0F00Dh +00239Ar 1 0E F0 .word 0F00Eh +00239Cr 1 0F F0 .word 0F00Fh +00239Er 1 E1 FF .word 0FFE1h +0023A0r 1 E2 FF .word 0FFE2h +0023A2r 1 E3 FF .word 0FFE3h +0023A4r 1 E4 FF .word 0FFE4h +0023A6r 1 E5 FF .word 0FFE5h +0023A8r 1 E6 FF .word 0FFE6h +0023AAr 1 E7 FF .word 0FFE7h +0023ACr 1 E8 FF .word 0FFE8h +0023AEr 1 E9 FF .word 0FFE9h +0023B0r 1 EA FF .word 0FFEAh +0023B2r 1 EB FF .word 0FFEBh +0023B4r 1 EC FF .word 0FFECh +0023B6r 1 ED FF .word 0FFEDh +0023B8r 1 EE FF .word 0FFEEh +0023BAr 1 EF FF .word 0FFEFh +0023BCr 1 F0 FF .word 0FFF0h +0023BEr 1 F1 FF .word 0FFF1h +0023C0r 1 F2 FF .word 0FFF2h +0023C2r 1 F3 FF .word 0FFF3h +0023C4r 1 F4 FF .word 0FFF4h +0023C6r 1 F5 FF .word 0FFF5h +0023C8r 1 F6 FF .word 0FFF6h +0023CAr 1 F7 FF .word 0FFF7h +0023CCr 1 F8 FF .word 0FFF8h +0023CEr 1 F9 FF .word 0FFF9h +0023D0r 1 FA FF .word 0FFFAh +0023D2r 1 FB FF .word 0FFFBh +0023D4r 1 FC FF .word 0FFFCh +0023D6r 1 FD FF .word 0FFFDh +0023D8r 1 FE FF .word 0FFFEh +0023DAr 1 FF FF .word 0FFFFh +0023DCr 1 +0023DCr 1 ; alternative hex values, always leading zero +0023DCr 1 00 00 .word 00h +0023DEr 1 01 00 .word 01h +0023E0r 1 02 00 .word 02h +0023E2r 1 03 00 .word 03h +0023E4r 1 04 00 .word 04h +0023E6r 1 05 00 .word 05h +0023E8r 1 06 00 .word 06h +0023EAr 1 07 00 .word 07h +0023ECr 1 08 00 .word 08h +0023EEr 1 09 00 .word 09h +0023F0r 1 0A 00 .word 0ah +0023F2r 1 0B 00 .word 0bh +0023F4r 1 0C 00 .word 0ch +0023F6r 1 0D 00 .word 0dh +0023F8r 1 0E 00 .word 0eh +0023FAr 1 0F 00 .word 0fh +0023FCr 1 10 00 .word 010h +0023FEr 1 11 00 .word 011h +002400r 1 12 00 .word 012h +002402r 1 13 00 .word 013h +002404r 1 70 00 .word 070h +002406r 1 71 00 .word 071h +002408r 1 72 00 .word 072h +00240Ar 1 73 00 .word 073h +00240Cr 1 74 00 .word 074h +00240Er 1 75 00 .word 075h +002410r 1 76 00 .word 076h +002412r 1 77 00 .word 077h +002414r 1 78 00 .word 078h +002416r 1 79 00 .word 079h +002418r 1 7A 00 .word 07ah +00241Ar 1 7B 00 .word 07bh +00241Cr 1 7C 00 .word 07ch +00241Er 1 7D 00 .word 07dh +002420r 1 7E 00 .word 07eh +002422r 1 7F 00 .word 07fh +002424r 1 80 00 .word 080h +002426r 1 81 00 .word 081h +002428r 1 82 00 .word 082h +00242Ar 1 83 00 .word 083h +00242Cr 1 84 00 .word 084h +00242Er 1 85 00 .word 085h +002430r 1 86 00 .word 086h +002432r 1 F0 00 .word 0f0h +002434r 1 F1 00 .word 0f1h +002436r 1 F2 00 .word 0f2h +002438r 1 F3 00 .word 0f3h +00243Ar 1 F4 00 .word 0f4h +00243Cr 1 F5 00 .word 0f5h +00243Er 1 F6 00 .word 0f6h +002440r 1 F7 00 .word 0f7h +002442r 1 F8 00 .word 0f8h +002444r 1 F9 00 .word 0f9h +002446r 1 FA 00 .word 0fah +002448r 1 FB 00 .word 0fbh +00244Ar 1 FC 00 .word 0fch +00244Cr 1 FD 00 .word 0fdh +00244Er 1 FE 00 .word 0feh +002450r 1 FF 00 .word 0ffh +002452r 1 00 01 .word 0100h +002454r 1 01 01 .word 0101h +002456r 1 02 01 .word 0102h +002458r 1 03 01 .word 0103h +00245Ar 1 D2 0F .word 0fd2h +00245Cr 1 D3 0F .word 0fd3h +00245Er 1 D4 0F .word 0fd4h +002460r 1 D5 0F .word 0fd5h +002462r 1 D6 0F .word 0fd6h +002464r 1 D7 0F .word 0fd7h +002466r 1 D8 0F .word 0fd8h +002468r 1 D9 0F .word 0fd9h +00246Ar 1 DA 0F .word 0fdah +00246Cr 1 DB 0F .word 0fdbh +00246Er 1 DC 0F .word 0fdch +002470r 1 DD 0F .word 0fddh +002472r 1 DE 0F .word 0fdeh +002474r 1 DF 0F .word 0fdfh +002476r 1 E0 0F .word 0fe0h +002478r 1 E1 0F .word 0fe1h +00247Ar 1 E2 0F .word 0fe2h +00247Cr 1 E3 0F .word 0fe3h +00247Er 1 E4 0F .word 0fe4h +002480r 1 E5 0F .word 0fe5h +002482r 1 E6 0F .word 0fe6h +002484r 1 E7 0F .word 0fe7h +002486r 1 E8 0F .word 0fe8h +002488r 1 E9 0F .word 0fe9h +00248Ar 1 EA 0F .word 0feah +00248Cr 1 EB 0F .word 0febh +00248Er 1 EC 0F .word 0fech +002490r 1 ED 0F .word 0fedh +002492r 1 EE 0F .word 0feeh +002494r 1 EF 0F .word 0fefh +002496r 1 F0 0F .word 0ff0h +002498r 1 F1 0F .word 0ff1h +00249Ar 1 F2 0F .word 0ff2h +00249Cr 1 F3 0F .word 0ff3h +00249Er 1 F4 0F .word 0ff4h +0024A0r 1 F5 0F .word 0ff5h +0024A2r 1 F6 0F .word 0ff6h +0024A4r 1 F7 0F .word 0ff7h +0024A6r 1 F8 0F .word 0ff8h +0024A8r 1 F9 0F .word 0ff9h +0024AAr 1 FA 0F .word 0ffah +0024ACr 1 FB 0F .word 0ffbh +0024AEr 1 FC 0F .word 0ffch +0024B0r 1 FD 0F .word 0ffdh +0024B2r 1 FE 0F .word 0ffeh +0024B4r 1 FF 0F .word 0fffh +0024B6r 1 00 10 .word 01000h +0024B8r 1 01 10 .word 01001h +0024BAr 1 02 10 .word 01002h +0024BCr 1 03 10 .word 01003h +0024BEr 1 04 10 .word 01004h +0024C0r 1 05 10 .word 01005h +0024C2r 1 06 10 .word 01006h +0024C4r 1 07 10 .word 01007h +0024C6r 1 08 10 .word 01008h +0024C8r 1 F0 7F .word 07ff0h +0024CAr 1 F1 7F .word 07ff1h +0024CCr 1 F2 7F .word 07ff2h +0024CEr 1 F3 7F .word 07ff3h +0024D0r 1 F4 7F .word 07ff4h +0024D2r 1 F5 7F .word 07ff5h +0024D4r 1 F6 7F .word 07ff6h +0024D6r 1 F7 7F .word 07ff7h +0024D8r 1 F8 7F .word 07ff8h +0024DAr 1 F9 7F .word 07ff9h +0024DCr 1 FA 7F .word 07ffah +0024DEr 1 FB 7F .word 07ffbh +0024E0r 1 FC 7F .word 07ffch +0024E2r 1 FD 7F .word 07ffdh +0024E4r 1 FE 7F .word 07ffeh +0024E6r 1 FF 7F .word 07fffh +0024E8r 1 00 80 .word 08000h +0024EAr 1 01 80 .word 08001h +0024ECr 1 02 80 .word 08002h +0024EEr 1 03 80 .word 08003h +0024F0r 1 04 80 .word 08004h +0024F2r 1 05 80 .word 08005h +0024F4r 1 06 80 .word 08006h +0024F6r 1 07 80 .word 08007h +0024F8r 1 08 80 .word 08008h +0024FAr 1 09 80 .word 08009h +0024FCr 1 0A 80 .word 0800ah +0024FEr 1 0B 80 .word 0800bh +002500r 1 E1 9F .word 09fe1h +002502r 1 E2 9F .word 09fe2h +002504r 1 E3 9F .word 09fe3h +002506r 1 E4 9F .word 09fe4h +002508r 1 E5 9F .word 09fe5h +00250Ar 1 E6 9F .word 09fe6h +00250Cr 1 E7 9F .word 09fe7h +00250Er 1 E8 9F .word 09fe8h +002510r 1 E9 9F .word 09fe9h +002512r 1 EA 9F .word 09feah +002514r 1 EB 9F .word 09febh +002516r 1 EC 9F .word 09fech +002518r 1 ED 9F .word 09fedh +00251Ar 1 EE 9F .word 09feeh +00251Cr 1 EF 9F .word 09fefh +00251Er 1 F0 9F .word 09ff0h +002520r 1 F1 9F .word 09ff1h +002522r 1 F2 9F .word 09ff2h +002524r 1 F3 9F .word 09ff3h +002526r 1 F4 9F .word 09ff4h +002528r 1 F5 9F .word 09ff5h +00252Ar 1 F6 9F .word 09ff6h +00252Cr 1 F7 9F .word 09ff7h +00252Er 1 F8 9F .word 09ff8h +002530r 1 F9 9F .word 09ff9h +002532r 1 FA 9F .word 09ffah +002534r 1 FB 9F .word 09ffbh +002536r 1 FC 9F .word 09ffch +002538r 1 FD 9F .word 09ffdh +00253Ar 1 FE 9F .word 09ffeh +00253Cr 1 FF 9F .word 09fffh +00253Er 1 00 A0 .word 0a000h +002540r 1 01 A0 .word 0a001h +002542r 1 02 A0 .word 0a002h +002544r 1 03 A0 .word 0a003h +002546r 1 04 A0 .word 0a004h +002548r 1 05 A0 .word 0a005h +00254Ar 1 06 A0 .word 0a006h +00254Cr 1 07 A0 .word 0a007h +00254Er 1 08 A0 .word 0a008h +002550r 1 09 A0 .word 0a009h +002552r 1 0A A0 .word 0a00ah +002554r 1 0B A0 .word 0a00bh +002556r 1 0C A0 .word 0a00ch +002558r 1 0D A0 .word 0a00dh +00255Ar 1 0E A0 .word 0a00eh +00255Cr 1 0F A0 .word 0a00fh +00255Er 1 E1 AF .word 0afe1h +002560r 1 E2 AF .word 0afe2h +002562r 1 E3 AF .word 0afe3h +002564r 1 E4 AF .word 0afe4h +002566r 1 E5 AF .word 0afe5h +002568r 1 E6 AF .word 0afe6h +00256Ar 1 E7 AF .word 0afe7h +00256Cr 1 E8 AF .word 0afe8h +00256Er 1 E9 AF .word 0afe9h +002570r 1 EA AF .word 0afeah +002572r 1 EB AF .word 0afebh +002574r 1 EC AF .word 0afech +002576r 1 ED AF .word 0afedh +002578r 1 EE AF .word 0afeeh +00257Ar 1 EF AF .word 0afefh +00257Cr 1 F0 AF .word 0aff0h +00257Er 1 F1 AF .word 0aff1h +002580r 1 F2 AF .word 0aff2h +002582r 1 F3 AF .word 0aff3h +002584r 1 F4 AF .word 0aff4h +002586r 1 F5 AF .word 0aff5h +002588r 1 F6 AF .word 0aff6h +00258Ar 1 F7 AF .word 0aff7h +00258Cr 1 F8 AF .word 0aff8h +00258Er 1 F9 AF .word 0aff9h +002590r 1 FA AF .word 0affah +002592r 1 FB AF .word 0affbh +002594r 1 FC AF .word 0affch +002596r 1 FD AF .word 0affdh +002598r 1 FE AF .word 0affeh +00259Ar 1 FF AF .word 0afffh +00259Cr 1 00 B0 .word 0b000h +00259Er 1 01 B0 .word 0b001h +0025A0r 1 02 B0 .word 0b002h +0025A2r 1 03 B0 .word 0b003h +0025A4r 1 04 B0 .word 0b004h +0025A6r 1 05 B0 .word 0b005h +0025A8r 1 06 B0 .word 0b006h +0025AAr 1 07 B0 .word 0b007h +0025ACr 1 08 B0 .word 0b008h +0025AEr 1 09 B0 .word 0b009h +0025B0r 1 0A B0 .word 0b00ah +0025B2r 1 0B B0 .word 0b00bh +0025B4r 1 0C B0 .word 0b00ch +0025B6r 1 0D B0 .word 0b00dh +0025B8r 1 0E B0 .word 0b00eh +0025BAr 1 0F B0 .word 0b00fh +0025BCr 1 E1 BF .word 0bfe1h +0025BEr 1 E2 BF .word 0bfe2h +0025C0r 1 E3 BF .word 0bfe3h +0025C2r 1 E4 BF .word 0bfe4h +0025C4r 1 E5 BF .word 0bfe5h +0025C6r 1 E6 BF .word 0bfe6h +0025C8r 1 E7 BF .word 0bfe7h +0025CAr 1 E8 BF .word 0bfe8h +0025CCr 1 E9 BF .word 0bfe9h +0025CEr 1 EA BF .word 0bfeah +0025D0r 1 EB BF .word 0bfebh +0025D2r 1 EC BF .word 0bfech +0025D4r 1 ED BF .word 0bfedh +0025D6r 1 EE BF .word 0bfeeh +0025D8r 1 EF BF .word 0bfefh +0025DAr 1 F0 BF .word 0bff0h +0025DCr 1 F1 BF .word 0bff1h +0025DEr 1 F2 BF .word 0bff2h +0025E0r 1 F3 BF .word 0bff3h +0025E2r 1 F4 BF .word 0bff4h +0025E4r 1 F5 BF .word 0bff5h +0025E6r 1 F6 BF .word 0bff6h +0025E8r 1 F7 BF .word 0bff7h +0025EAr 1 F8 BF .word 0bff8h +0025ECr 1 F9 BF .word 0bff9h +0025EEr 1 FA BF .word 0bffah +0025F0r 1 FB BF .word 0bffbh +0025F2r 1 FC BF .word 0bffch +0025F4r 1 FD BF .word 0bffdh +0025F6r 1 FE BF .word 0bffeh +0025F8r 1 FF BF .word 0bfffh +0025FAr 1 00 C0 .word 0c000h +0025FCr 1 01 C0 .word 0c001h +0025FEr 1 02 C0 .word 0c002h +002600r 1 03 C0 .word 0c003h +002602r 1 04 C0 .word 0c004h +002604r 1 05 C0 .word 0c005h +002606r 1 06 C0 .word 0c006h +002608r 1 07 C0 .word 0c007h +00260Ar 1 08 C0 .word 0c008h +00260Cr 1 09 C0 .word 0c009h +00260Er 1 0A C0 .word 0c00ah +002610r 1 0B C0 .word 0c00bh +002612r 1 0C C0 .word 0c00ch +002614r 1 0D C0 .word 0c00dh +002616r 1 0E C0 .word 0c00eh +002618r 1 0F C0 .word 0c00fh +00261Ar 1 E1 CF .word 0cfe1h +00261Cr 1 E2 CF .word 0cfe2h +00261Er 1 E3 CF .word 0cfe3h +002620r 1 E4 CF .word 0cfe4h +002622r 1 E5 CF .word 0cfe5h +002624r 1 E6 CF .word 0cfe6h +002626r 1 E7 CF .word 0cfe7h +002628r 1 E8 CF .word 0cfe8h +00262Ar 1 E9 CF .word 0cfe9h +00262Cr 1 EA CF .word 0cfeah +00262Er 1 EB CF .word 0cfebh +002630r 1 EC CF .word 0cfech +002632r 1 ED CF .word 0cfedh +002634r 1 EE CF .word 0cfeeh +002636r 1 EF CF .word 0cfefh +002638r 1 F0 CF .word 0cff0h +00263Ar 1 F1 CF .word 0cff1h +00263Cr 1 F2 CF .word 0cff2h +00263Er 1 F3 CF .word 0cff3h +002640r 1 F4 CF .word 0cff4h +002642r 1 F5 CF .word 0cff5h +002644r 1 F6 CF .word 0cff6h +002646r 1 F7 CF .word 0cff7h +002648r 1 F8 CF .word 0cff8h +00264Ar 1 F9 CF .word 0cff9h +00264Cr 1 FA CF .word 0cffah +00264Er 1 FB CF .word 0cffbh +002650r 1 FC CF .word 0cffch +002652r 1 FD CF .word 0cffdh +002654r 1 FE CF .word 0cffeh +002656r 1 FF CF .word 0cfffh +002658r 1 00 D0 .word 0d000h +00265Ar 1 01 D0 .word 0d001h +00265Cr 1 02 D0 .word 0d002h +00265Er 1 03 D0 .word 0d003h +002660r 1 04 D0 .word 0d004h +002662r 1 05 D0 .word 0d005h +002664r 1 06 D0 .word 0d006h +002666r 1 07 D0 .word 0d007h +002668r 1 08 D0 .word 0d008h +00266Ar 1 09 D0 .word 0d009h +00266Cr 1 0A D0 .word 0d00ah +00266Er 1 0B D0 .word 0d00bh +002670r 1 0C D0 .word 0d00ch +002672r 1 0D D0 .word 0d00dh +002674r 1 0E D0 .word 0d00eh +002676r 1 0F D0 .word 0d00fh +002678r 1 E1 DF .word 0dfe1h +00267Ar 1 E2 DF .word 0dfe2h +00267Cr 1 E3 DF .word 0dfe3h +00267Er 1 E4 DF .word 0dfe4h +002680r 1 E5 DF .word 0dfe5h +002682r 1 E6 DF .word 0dfe6h +002684r 1 E7 DF .word 0dfe7h +002686r 1 E8 DF .word 0dfe8h +002688r 1 E9 DF .word 0dfe9h +00268Ar 1 EA DF .word 0dfeah +00268Cr 1 EB DF .word 0dfebh +00268Er 1 EC DF .word 0dfech +002690r 1 ED DF .word 0dfedh +002692r 1 EE DF .word 0dfeeh +002694r 1 EF DF .word 0dfefh +002696r 1 F0 DF .word 0dff0h +002698r 1 F1 DF .word 0dff1h +00269Ar 1 F2 DF .word 0dff2h +00269Cr 1 F3 DF .word 0dff3h +00269Er 1 F4 DF .word 0dff4h +0026A0r 1 F5 DF .word 0dff5h +0026A2r 1 F6 DF .word 0dff6h +0026A4r 1 F7 DF .word 0dff7h +0026A6r 1 F8 DF .word 0dff8h +0026A8r 1 F9 DF .word 0dff9h +0026AAr 1 FA DF .word 0dffah +0026ACr 1 FB DF .word 0dffbh +0026AEr 1 FC DF .word 0dffch +0026B0r 1 FD DF .word 0dffdh +0026B2r 1 FE DF .word 0dffeh +0026B4r 1 FF DF .word 0dfffh +0026B6r 1 00 E0 .word 0e000h +0026B8r 1 01 E0 .word 0e001h +0026BAr 1 02 E0 .word 0e002h +0026BCr 1 03 E0 .word 0e003h +0026BEr 1 04 E0 .word 0e004h +0026C0r 1 05 E0 .word 0e005h +0026C2r 1 06 E0 .word 0e006h +0026C4r 1 07 E0 .word 0e007h +0026C6r 1 08 E0 .word 0e008h +0026C8r 1 09 E0 .word 0e009h +0026CAr 1 0A E0 .word 0e00ah +0026CCr 1 0B E0 .word 0e00bh +0026CEr 1 0C E0 .word 0e00ch +0026D0r 1 0D E0 .word 0e00dh +0026D2r 1 0E E0 .word 0e00eh +0026D4r 1 0F E0 .word 0e00fh +0026D6r 1 E1 EF .word 0efe1h +0026D8r 1 E2 EF .word 0efe2h +0026DAr 1 E3 EF .word 0efe3h +0026DCr 1 E4 EF .word 0efe4h +0026DEr 1 E5 EF .word 0efe5h +0026E0r 1 E6 EF .word 0efe6h +0026E2r 1 E7 EF .word 0efe7h +0026E4r 1 E8 EF .word 0efe8h +0026E6r 1 E9 EF .word 0efe9h +0026E8r 1 EA EF .word 0efeah +0026EAr 1 EB EF .word 0efebh +0026ECr 1 EC EF .word 0efech +0026EEr 1 ED EF .word 0efedh +0026F0r 1 EE EF .word 0efeeh +0026F2r 1 EF EF .word 0efefh +0026F4r 1 F0 EF .word 0eff0h +0026F6r 1 F1 EF .word 0eff1h +0026F8r 1 F2 EF .word 0eff2h +0026FAr 1 F3 EF .word 0eff3h +0026FCr 1 F4 EF .word 0eff4h +0026FEr 1 F5 EF .word 0eff5h +002700r 1 F6 EF .word 0eff6h +002702r 1 F7 EF .word 0eff7h +002704r 1 F8 EF .word 0eff8h +002706r 1 F9 EF .word 0eff9h +002708r 1 FA EF .word 0effah +00270Ar 1 FB EF .word 0effbh +00270Cr 1 FC EF .word 0effch +00270Er 1 FD EF .word 0effdh +002710r 1 FE EF .word 0effeh +002712r 1 FF EF .word 0efffh +002714r 1 00 F0 .word 0f000h +002716r 1 01 F0 .word 0f001h +002718r 1 02 F0 .word 0f002h +00271Ar 1 03 F0 .word 0f003h +00271Cr 1 04 F0 .word 0f004h +00271Er 1 05 F0 .word 0f005h +002720r 1 06 F0 .word 0f006h +002722r 1 07 F0 .word 0f007h +002724r 1 08 F0 .word 0f008h +002726r 1 09 F0 .word 0f009h +002728r 1 0A F0 .word 0f00ah +00272Ar 1 0B F0 .word 0f00bh +00272Cr 1 0C F0 .word 0f00ch +00272Er 1 0D F0 .word 0f00dh +002730r 1 0E F0 .word 0f00eh +002732r 1 0F F0 .word 0f00fh +002734r 1 E1 FF .word 0ffe1h +002736r 1 E2 FF .word 0ffe2h +002738r 1 E3 FF .word 0ffe3h +00273Ar 1 E4 FF .word 0ffe4h +00273Cr 1 E5 FF .word 0ffe5h +00273Er 1 E6 FF .word 0ffe6h +002740r 1 E7 FF .word 0ffe7h +002742r 1 E8 FF .word 0ffe8h +002744r 1 E9 FF .word 0ffe9h +002746r 1 EA FF .word 0ffeah +002748r 1 EB FF .word 0ffebh +00274Ar 1 EC FF .word 0ffech +00274Cr 1 ED FF .word 0ffedh +00274Er 1 EE FF .word 0ffeeh +002750r 1 EF FF .word 0ffefh +002752r 1 F0 FF .word 0fff0h +002754r 1 F1 FF .word 0fff1h +002756r 1 F2 FF .word 0fff2h +002758r 1 F3 FF .word 0fff3h +00275Ar 1 F4 FF .word 0fff4h +00275Cr 1 F5 FF .word 0fff5h +00275Er 1 F6 FF .word 0fff6h +002760r 1 F7 FF .word 0fff7h +002762r 1 F8 FF .word 0fff8h +002764r 1 F9 FF .word 0fff9h +002766r 1 FA FF .word 0fffah +002768r 1 FB FF .word 0fffbh +00276Ar 1 FC FF .word 0fffch +00276Cr 1 FD FF .word 0fffdh +00276Er 1 FE FF .word 0fffeh +002770r 1 FF FF .word 0ffffh +002772r 1 +002772r 1 ; binary values, variable length +002772r 1 00 00 .word %0 +002774r 1 01 00 .word %01 +002776r 1 02 00 .word %010 +002778r 1 03 00 .word %011 +00277Ar 1 04 00 .word %0100 +00277Cr 1 05 00 .word %0101 +00277Er 1 06 00 .word %0110 +002780r 1 07 00 .word %0111 +002782r 1 08 00 .word %01000 +002784r 1 09 00 .word %01001 +002786r 1 0A 00 .word %01010 +002788r 1 0B 00 .word %01011 +00278Ar 1 0C 00 .word %01100 +00278Cr 1 0D 00 .word %01101 +00278Er 1 0E 00 .word %01110 +002790r 1 0F 00 .word %01111 +002792r 1 10 00 .word %010000 +002794r 1 11 00 .word %010001 +002796r 1 12 00 .word %010010 +002798r 1 13 00 .word %010011 +00279Ar 1 70 00 .word %01110000 +00279Cr 1 71 00 .word %01110001 +00279Er 1 72 00 .word %01110010 +0027A0r 1 73 00 .word %01110011 +0027A2r 1 74 00 .word %01110100 +0027A4r 1 75 00 .word %01110101 +0027A6r 1 76 00 .word %01110110 +0027A8r 1 77 00 .word %01110111 +0027AAr 1 78 00 .word %01111000 +0027ACr 1 79 00 .word %01111001 +0027AEr 1 7A 00 .word %01111010 +0027B0r 1 7B 00 .word %01111011 +0027B2r 1 7C 00 .word %01111100 +0027B4r 1 7D 00 .word %01111101 +0027B6r 1 7E 00 .word %01111110 +0027B8r 1 7F 00 .word %01111111 +0027BAr 1 80 00 .word %010000000 +0027BCr 1 81 00 .word %010000001 +0027BEr 1 82 00 .word %010000010 +0027C0r 1 83 00 .word %010000011 +0027C2r 1 84 00 .word %010000100 +0027C4r 1 85 00 .word %010000101 +0027C6r 1 86 00 .word %010000110 +0027C8r 1 F0 00 .word %011110000 +0027CAr 1 F1 00 .word %011110001 +0027CCr 1 F2 00 .word %011110010 +0027CEr 1 F3 00 .word %011110011 +0027D0r 1 F4 00 .word %011110100 +0027D2r 1 F5 00 .word %011110101 +0027D4r 1 F6 00 .word %011110110 +0027D6r 1 F7 00 .word %011110111 +0027D8r 1 F8 00 .word %011111000 +0027DAr 1 F9 00 .word %011111001 +0027DCr 1 FA 00 .word %011111010 +0027DEr 1 FB 00 .word %011111011 +0027E0r 1 FC 00 .word %011111100 +0027E2r 1 FD 00 .word %011111101 +0027E4r 1 FE 00 .word %011111110 +0027E6r 1 FF 00 .word %011111111 +0027E8r 1 00 01 .word %100000000 +0027EAr 1 01 01 .word %100000001 +0027ECr 1 02 01 .word %100000010 +0027EEr 1 03 01 .word %100000011 +0027F0r 1 D2 0F .word %111111010010 +0027F2r 1 D3 0F .word %111111010011 +0027F4r 1 D4 0F .word %111111010100 +0027F6r 1 D5 0F .word %111111010101 +0027F8r 1 D6 0F .word %111111010110 +0027FAr 1 D7 0F .word %111111010111 +0027FCr 1 D8 0F .word %111111011000 +0027FEr 1 D9 0F .word %111111011001 +002800r 1 DA 0F .word %111111011010 +002802r 1 DB 0F .word %111111011011 +002804r 1 DC 0F .word %111111011100 +002806r 1 DD 0F .word %111111011101 +002808r 1 DE 0F .word %111111011110 +00280Ar 1 DF 0F .word %111111011111 +00280Cr 1 E0 0F .word %111111100000 +00280Er 1 E1 0F .word %111111100001 +002810r 1 E2 0F .word %111111100010 +002812r 1 E3 0F .word %111111100011 +002814r 1 E4 0F .word %111111100100 +002816r 1 E5 0F .word %111111100101 +002818r 1 E6 0F .word %111111100110 +00281Ar 1 E7 0F .word %111111100111 +00281Cr 1 E8 0F .word %111111101000 +00281Er 1 E9 0F .word %111111101001 +002820r 1 EA 0F .word %111111101010 +002822r 1 EB 0F .word %111111101011 +002824r 1 EC 0F .word %111111101100 +002826r 1 ED 0F .word %111111101101 +002828r 1 EE 0F .word %111111101110 +00282Ar 1 EF 0F .word %111111101111 +00282Cr 1 F0 0F .word %111111110000 +00282Er 1 F1 0F .word %111111110001 +002830r 1 F2 0F .word %111111110010 +002832r 1 F3 0F .word %111111110011 +002834r 1 F4 0F .word %111111110100 +002836r 1 F5 0F .word %111111110101 +002838r 1 F6 0F .word %111111110110 +00283Ar 1 F7 0F .word %111111110111 +00283Cr 1 F8 0F .word %111111111000 +00283Er 1 F9 0F .word %111111111001 +002840r 1 FA 0F .word %111111111010 +002842r 1 FB 0F .word %111111111011 +002844r 1 FC 0F .word %111111111100 +002846r 1 FD 0F .word %111111111101 +002848r 1 FE 0F .word %111111111110 +00284Ar 1 FF 0F .word %111111111111 +00284Cr 1 00 10 .word %1000000000000 +00284Er 1 01 10 .word %1000000000001 +002850r 1 02 10 .word %1000000000010 +002852r 1 03 10 .word %1000000000011 +002854r 1 04 10 .word %1000000000100 +002856r 1 05 10 .word %1000000000101 +002858r 1 06 10 .word %1000000000110 +00285Ar 1 07 10 .word %1000000000111 +00285Cr 1 08 10 .word %1000000001000 +00285Er 1 F0 7F .word %111111111110000 +002860r 1 F1 7F .word %111111111110001 +002862r 1 F2 7F .word %111111111110010 +002864r 1 F3 7F .word %111111111110011 +002866r 1 F4 7F .word %111111111110100 +002868r 1 F5 7F .word %111111111110101 +00286Ar 1 F6 7F .word %111111111110110 +00286Cr 1 F7 7F .word %111111111110111 +00286Er 1 F8 7F .word %111111111111000 +002870r 1 F9 7F .word %111111111111001 +002872r 1 FA 7F .word %111111111111010 +002874r 1 FB 7F .word %111111111111011 +002876r 1 FC 7F .word %111111111111100 +002878r 1 FD 7F .word %111111111111101 +00287Ar 1 FE 7F .word %111111111111110 +00287Cr 1 FF 7F .word %111111111111111 +00287Er 1 00 80 .word %1000000000000000 +002880r 1 01 80 .word %1000000000000001 +002882r 1 02 80 .word %1000000000000010 +002884r 1 03 80 .word %1000000000000011 +002886r 1 04 80 .word %1000000000000100 +002888r 1 05 80 .word %1000000000000101 +00288Ar 1 06 80 .word %1000000000000110 +00288Cr 1 07 80 .word %1000000000000111 +00288Er 1 08 80 .word %1000000000001000 +002890r 1 09 80 .word %1000000000001001 +002892r 1 0A 80 .word %1000000000001010 +002894r 1 0B 80 .word %1000000000001011 +002896r 1 E1 9F .word %1001111111100001 +002898r 1 E2 9F .word %1001111111100010 +00289Ar 1 E3 9F .word %1001111111100011 +00289Cr 1 E4 9F .word %1001111111100100 +00289Er 1 E5 9F .word %1001111111100101 +0028A0r 1 E6 9F .word %1001111111100110 +0028A2r 1 E7 9F .word %1001111111100111 +0028A4r 1 E8 9F .word %1001111111101000 +0028A6r 1 E9 9F .word %1001111111101001 +0028A8r 1 EA 9F .word %1001111111101010 +0028AAr 1 EB 9F .word %1001111111101011 +0028ACr 1 EC 9F .word %1001111111101100 +0028AEr 1 ED 9F .word %1001111111101101 +0028B0r 1 EE 9F .word %1001111111101110 +0028B2r 1 EF 9F .word %1001111111101111 +0028B4r 1 F0 9F .word %1001111111110000 +0028B6r 1 F1 9F .word %1001111111110001 +0028B8r 1 F2 9F .word %1001111111110010 +0028BAr 1 F3 9F .word %1001111111110011 +0028BCr 1 F4 9F .word %1001111111110100 +0028BEr 1 F5 9F .word %1001111111110101 +0028C0r 1 F6 9F .word %1001111111110110 +0028C2r 1 F7 9F .word %1001111111110111 +0028C4r 1 F8 9F .word %1001111111111000 +0028C6r 1 F9 9F .word %1001111111111001 +0028C8r 1 FA 9F .word %1001111111111010 +0028CAr 1 FB 9F .word %1001111111111011 +0028CCr 1 FC 9F .word %1001111111111100 +0028CEr 1 FD 9F .word %1001111111111101 +0028D0r 1 FE 9F .word %1001111111111110 +0028D2r 1 FF 9F .word %1001111111111111 +0028D4r 1 00 A0 .word %1010000000000000 +0028D6r 1 01 A0 .word %1010000000000001 +0028D8r 1 02 A0 .word %1010000000000010 +0028DAr 1 03 A0 .word %1010000000000011 +0028DCr 1 04 A0 .word %1010000000000100 +0028DEr 1 05 A0 .word %1010000000000101 +0028E0r 1 06 A0 .word %1010000000000110 +0028E2r 1 07 A0 .word %1010000000000111 +0028E4r 1 08 A0 .word %1010000000001000 +0028E6r 1 09 A0 .word %1010000000001001 +0028E8r 1 0A A0 .word %1010000000001010 +0028EAr 1 0B A0 .word %1010000000001011 +0028ECr 1 0C A0 .word %1010000000001100 +0028EEr 1 0D A0 .word %1010000000001101 +0028F0r 1 0E A0 .word %1010000000001110 +0028F2r 1 0F A0 .word %1010000000001111 +0028F4r 1 E1 AF .word %1010111111100001 +0028F6r 1 E2 AF .word %1010111111100010 +0028F8r 1 E3 AF .word %1010111111100011 +0028FAr 1 E4 AF .word %1010111111100100 +0028FCr 1 E5 AF .word %1010111111100101 +0028FEr 1 E6 AF .word %1010111111100110 +002900r 1 E7 AF .word %1010111111100111 +002902r 1 E8 AF .word %1010111111101000 +002904r 1 E9 AF .word %1010111111101001 +002906r 1 EA AF .word %1010111111101010 +002908r 1 EB AF .word %1010111111101011 +00290Ar 1 EC AF .word %1010111111101100 +00290Cr 1 ED AF .word %1010111111101101 +00290Er 1 EE AF .word %1010111111101110 +002910r 1 EF AF .word %1010111111101111 +002912r 1 F0 AF .word %1010111111110000 +002914r 1 F1 AF .word %1010111111110001 +002916r 1 F2 AF .word %1010111111110010 +002918r 1 F3 AF .word %1010111111110011 +00291Ar 1 F4 AF .word %1010111111110100 +00291Cr 1 F5 AF .word %1010111111110101 +00291Er 1 F6 AF .word %1010111111110110 +002920r 1 F7 AF .word %1010111111110111 +002922r 1 F8 AF .word %1010111111111000 +002924r 1 F9 AF .word %1010111111111001 +002926r 1 FA AF .word %1010111111111010 +002928r 1 FB AF .word %1010111111111011 +00292Ar 1 FC AF .word %1010111111111100 +00292Cr 1 FD AF .word %1010111111111101 +00292Er 1 FE AF .word %1010111111111110 +002930r 1 FF AF .word %1010111111111111 +002932r 1 00 B0 .word %1011000000000000 +002934r 1 01 B0 .word %1011000000000001 +002936r 1 02 B0 .word %1011000000000010 +002938r 1 03 B0 .word %1011000000000011 +00293Ar 1 04 B0 .word %1011000000000100 +00293Cr 1 05 B0 .word %1011000000000101 +00293Er 1 06 B0 .word %1011000000000110 +002940r 1 07 B0 .word %1011000000000111 +002942r 1 08 B0 .word %1011000000001000 +002944r 1 09 B0 .word %1011000000001001 +002946r 1 0A B0 .word %1011000000001010 +002948r 1 0B B0 .word %1011000000001011 +00294Ar 1 0C B0 .word %1011000000001100 +00294Cr 1 0D B0 .word %1011000000001101 +00294Er 1 0E B0 .word %1011000000001110 +002950r 1 0F B0 .word %1011000000001111 +002952r 1 E1 BF .word %1011111111100001 +002954r 1 E2 BF .word %1011111111100010 +002956r 1 E3 BF .word %1011111111100011 +002958r 1 E4 BF .word %1011111111100100 +00295Ar 1 E5 BF .word %1011111111100101 +00295Cr 1 E6 BF .word %1011111111100110 +00295Er 1 E7 BF .word %1011111111100111 +002960r 1 E8 BF .word %1011111111101000 +002962r 1 E9 BF .word %1011111111101001 +002964r 1 EA BF .word %1011111111101010 +002966r 1 EB BF .word %1011111111101011 +002968r 1 EC BF .word %1011111111101100 +00296Ar 1 ED BF .word %1011111111101101 +00296Cr 1 EE BF .word %1011111111101110 +00296Er 1 EF BF .word %1011111111101111 +002970r 1 F0 BF .word %1011111111110000 +002972r 1 F1 BF .word %1011111111110001 +002974r 1 F2 BF .word %1011111111110010 +002976r 1 F3 BF .word %1011111111110011 +002978r 1 F4 BF .word %1011111111110100 +00297Ar 1 F5 BF .word %1011111111110101 +00297Cr 1 F6 BF .word %1011111111110110 +00297Er 1 F7 BF .word %1011111111110111 +002980r 1 F8 BF .word %1011111111111000 +002982r 1 F9 BF .word %1011111111111001 +002984r 1 FA BF .word %1011111111111010 +002986r 1 FB BF .word %1011111111111011 +002988r 1 FC BF .word %1011111111111100 +00298Ar 1 FD BF .word %1011111111111101 +00298Cr 1 FE BF .word %1011111111111110 +00298Er 1 FF BF .word %1011111111111111 +002990r 1 00 C0 .word %1100000000000000 +002992r 1 01 C0 .word %1100000000000001 +002994r 1 02 C0 .word %1100000000000010 +002996r 1 03 C0 .word %1100000000000011 +002998r 1 04 C0 .word %1100000000000100 +00299Ar 1 05 C0 .word %1100000000000101 +00299Cr 1 06 C0 .word %1100000000000110 +00299Er 1 07 C0 .word %1100000000000111 +0029A0r 1 08 C0 .word %1100000000001000 +0029A2r 1 09 C0 .word %1100000000001001 +0029A4r 1 0A C0 .word %1100000000001010 +0029A6r 1 0B C0 .word %1100000000001011 +0029A8r 1 0C C0 .word %1100000000001100 +0029AAr 1 0D C0 .word %1100000000001101 +0029ACr 1 0E C0 .word %1100000000001110 +0029AEr 1 0F C0 .word %1100000000001111 +0029B0r 1 E1 CF .word %1100111111100001 +0029B2r 1 E2 CF .word %1100111111100010 +0029B4r 1 E3 CF .word %1100111111100011 +0029B6r 1 E4 CF .word %1100111111100100 +0029B8r 1 E5 CF .word %1100111111100101 +0029BAr 1 E6 CF .word %1100111111100110 +0029BCr 1 E7 CF .word %1100111111100111 +0029BEr 1 E8 CF .word %1100111111101000 +0029C0r 1 E9 CF .word %1100111111101001 +0029C2r 1 EA CF .word %1100111111101010 +0029C4r 1 EB CF .word %1100111111101011 +0029C6r 1 EC CF .word %1100111111101100 +0029C8r 1 ED CF .word %1100111111101101 +0029CAr 1 EE CF .word %1100111111101110 +0029CCr 1 EF CF .word %1100111111101111 +0029CEr 1 F0 CF .word %1100111111110000 +0029D0r 1 F1 CF .word %1100111111110001 +0029D2r 1 F2 CF .word %1100111111110010 +0029D4r 1 F3 CF .word %1100111111110011 +0029D6r 1 F4 CF .word %1100111111110100 +0029D8r 1 F5 CF .word %1100111111110101 +0029DAr 1 F6 CF .word %1100111111110110 +0029DCr 1 F7 CF .word %1100111111110111 +0029DEr 1 F8 CF .word %1100111111111000 +0029E0r 1 F9 CF .word %1100111111111001 +0029E2r 1 FA CF .word %1100111111111010 +0029E4r 1 FB CF .word %1100111111111011 +0029E6r 1 FC CF .word %1100111111111100 +0029E8r 1 FD CF .word %1100111111111101 +0029EAr 1 FE CF .word %1100111111111110 +0029ECr 1 FF CF .word %1100111111111111 +0029EEr 1 00 D0 .word %1101000000000000 +0029F0r 1 01 D0 .word %1101000000000001 +0029F2r 1 02 D0 .word %1101000000000010 +0029F4r 1 03 D0 .word %1101000000000011 +0029F6r 1 04 D0 .word %1101000000000100 +0029F8r 1 05 D0 .word %1101000000000101 +0029FAr 1 06 D0 .word %1101000000000110 +0029FCr 1 07 D0 .word %1101000000000111 +0029FEr 1 08 D0 .word %1101000000001000 +002A00r 1 09 D0 .word %1101000000001001 +002A02r 1 0A D0 .word %1101000000001010 +002A04r 1 0B D0 .word %1101000000001011 +002A06r 1 0C D0 .word %1101000000001100 +002A08r 1 0D D0 .word %1101000000001101 +002A0Ar 1 0E D0 .word %1101000000001110 +002A0Cr 1 0F D0 .word %1101000000001111 +002A0Er 1 E1 DF .word %1101111111100001 +002A10r 1 E2 DF .word %1101111111100010 +002A12r 1 E3 DF .word %1101111111100011 +002A14r 1 E4 DF .word %1101111111100100 +002A16r 1 E5 DF .word %1101111111100101 +002A18r 1 E6 DF .word %1101111111100110 +002A1Ar 1 E7 DF .word %1101111111100111 +002A1Cr 1 E8 DF .word %1101111111101000 +002A1Er 1 E9 DF .word %1101111111101001 +002A20r 1 EA DF .word %1101111111101010 +002A22r 1 EB DF .word %1101111111101011 +002A24r 1 EC DF .word %1101111111101100 +002A26r 1 ED DF .word %1101111111101101 +002A28r 1 EE DF .word %1101111111101110 +002A2Ar 1 EF DF .word %1101111111101111 +002A2Cr 1 F0 DF .word %1101111111110000 +002A2Er 1 F1 DF .word %1101111111110001 +002A30r 1 F2 DF .word %1101111111110010 +002A32r 1 F3 DF .word %1101111111110011 +002A34r 1 F4 DF .word %1101111111110100 +002A36r 1 F5 DF .word %1101111111110101 +002A38r 1 F6 DF .word %1101111111110110 +002A3Ar 1 F7 DF .word %1101111111110111 +002A3Cr 1 F8 DF .word %1101111111111000 +002A3Er 1 F9 DF .word %1101111111111001 +002A40r 1 FA DF .word %1101111111111010 +002A42r 1 FB DF .word %1101111111111011 +002A44r 1 FC DF .word %1101111111111100 +002A46r 1 FD DF .word %1101111111111101 +002A48r 1 FE DF .word %1101111111111110 +002A4Ar 1 FF DF .word %1101111111111111 +002A4Cr 1 00 E0 .word %1110000000000000 +002A4Er 1 01 E0 .word %1110000000000001 +002A50r 1 02 E0 .word %1110000000000010 +002A52r 1 03 E0 .word %1110000000000011 +002A54r 1 04 E0 .word %1110000000000100 +002A56r 1 05 E0 .word %1110000000000101 +002A58r 1 06 E0 .word %1110000000000110 +002A5Ar 1 07 E0 .word %1110000000000111 +002A5Cr 1 08 E0 .word %1110000000001000 +002A5Er 1 09 E0 .word %1110000000001001 +002A60r 1 0A E0 .word %1110000000001010 +002A62r 1 0B E0 .word %1110000000001011 +002A64r 1 0C E0 .word %1110000000001100 +002A66r 1 0D E0 .word %1110000000001101 +002A68r 1 0E E0 .word %1110000000001110 +002A6Ar 1 0F E0 .word %1110000000001111 +002A6Cr 1 E1 EF .word %1110111111100001 +002A6Er 1 E2 EF .word %1110111111100010 +002A70r 1 E3 EF .word %1110111111100011 +002A72r 1 E4 EF .word %1110111111100100 +002A74r 1 E5 EF .word %1110111111100101 +002A76r 1 E6 EF .word %1110111111100110 +002A78r 1 E7 EF .word %1110111111100111 +002A7Ar 1 E8 EF .word %1110111111101000 +002A7Cr 1 E9 EF .word %1110111111101001 +002A7Er 1 EA EF .word %1110111111101010 +002A80r 1 EB EF .word %1110111111101011 +002A82r 1 EC EF .word %1110111111101100 +002A84r 1 ED EF .word %1110111111101101 +002A86r 1 EE EF .word %1110111111101110 +002A88r 1 EF EF .word %1110111111101111 +002A8Ar 1 F0 EF .word %1110111111110000 +002A8Cr 1 F1 EF .word %1110111111110001 +002A8Er 1 F2 EF .word %1110111111110010 +002A90r 1 F3 EF .word %1110111111110011 +002A92r 1 F4 EF .word %1110111111110100 +002A94r 1 F5 EF .word %1110111111110101 +002A96r 1 F6 EF .word %1110111111110110 +002A98r 1 F7 EF .word %1110111111110111 +002A9Ar 1 F8 EF .word %1110111111111000 +002A9Cr 1 F9 EF .word %1110111111111001 +002A9Er 1 FA EF .word %1110111111111010 +002AA0r 1 FB EF .word %1110111111111011 +002AA2r 1 FC EF .word %1110111111111100 +002AA4r 1 FD EF .word %1110111111111101 +002AA6r 1 FE EF .word %1110111111111110 +002AA8r 1 FF EF .word %1110111111111111 +002AAAr 1 00 F0 .word %1111000000000000 +002AACr 1 01 F0 .word %1111000000000001 +002AAEr 1 02 F0 .word %1111000000000010 +002AB0r 1 03 F0 .word %1111000000000011 +002AB2r 1 04 F0 .word %1111000000000100 +002AB4r 1 05 F0 .word %1111000000000101 +002AB6r 1 06 F0 .word %1111000000000110 +002AB8r 1 07 F0 .word %1111000000000111 +002ABAr 1 08 F0 .word %1111000000001000 +002ABCr 1 09 F0 .word %1111000000001001 +002ABEr 1 0A F0 .word %1111000000001010 +002AC0r 1 0B F0 .word %1111000000001011 +002AC2r 1 0C F0 .word %1111000000001100 +002AC4r 1 0D F0 .word %1111000000001101 +002AC6r 1 0E F0 .word %1111000000001110 +002AC8r 1 0F F0 .word %1111000000001111 +002ACAr 1 E1 FF .word %1111111111100001 +002ACCr 1 E2 FF .word %1111111111100010 +002ACEr 1 E3 FF .word %1111111111100011 +002AD0r 1 E4 FF .word %1111111111100100 +002AD2r 1 E5 FF .word %1111111111100101 +002AD4r 1 E6 FF .word %1111111111100110 +002AD6r 1 E7 FF .word %1111111111100111 +002AD8r 1 E8 FF .word %1111111111101000 +002ADAr 1 E9 FF .word %1111111111101001 +002ADCr 1 EA FF .word %1111111111101010 +002ADEr 1 EB FF .word %1111111111101011 +002AE0r 1 EC FF .word %1111111111101100 +002AE2r 1 ED FF .word %1111111111101101 +002AE4r 1 EE FF .word %1111111111101110 +002AE6r 1 EF FF .word %1111111111101111 +002AE8r 1 F0 FF .word %1111111111110000 +002AEAr 1 F1 FF .word %1111111111110001 +002AECr 1 F2 FF .word %1111111111110010 +002AEEr 1 F3 FF .word %1111111111110011 +002AF0r 1 F4 FF .word %1111111111110100 +002AF2r 1 F5 FF .word %1111111111110101 +002AF4r 1 F6 FF .word %1111111111110110 +002AF6r 1 F7 FF .word %1111111111110111 +002AF8r 1 F8 FF .word %1111111111111000 +002AFAr 1 F9 FF .word %1111111111111001 +002AFCr 1 FA FF .word %1111111111111010 +002AFEr 1 FB FF .word %1111111111111011 +002B00r 1 FC FF .word %1111111111111100 +002B02r 1 FD FF .word %1111111111111101 +002B04r 1 FE FF .word %1111111111111110 +002B06r 1 FF FF .word %1111111111111111 +002B08r 1 +002B08r 1 ; binary values, full length +002B08r 1 00 00 .word %0000000000000000 +002B0Ar 1 01 00 .word %0000000000000001 +002B0Cr 1 02 00 .word %0000000000000010 +002B0Er 1 03 00 .word %0000000000000011 +002B10r 1 04 00 .word %0000000000000100 +002B12r 1 05 00 .word %0000000000000101 +002B14r 1 06 00 .word %0000000000000110 +002B16r 1 07 00 .word %0000000000000111 +002B18r 1 08 00 .word %0000000000001000 +002B1Ar 1 09 00 .word %0000000000001001 +002B1Cr 1 0A 00 .word %0000000000001010 +002B1Er 1 0B 00 .word %0000000000001011 +002B20r 1 0C 00 .word %0000000000001100 +002B22r 1 0D 00 .word %0000000000001101 +002B24r 1 0E 00 .word %0000000000001110 +002B26r 1 0F 00 .word %0000000000001111 +002B28r 1 10 00 .word %0000000000010000 +002B2Ar 1 11 00 .word %0000000000010001 +002B2Cr 1 12 00 .word %0000000000010010 +002B2Er 1 13 00 .word %0000000000010011 +002B30r 1 70 00 .word %0000000001110000 +002B32r 1 71 00 .word %0000000001110001 +002B34r 1 72 00 .word %0000000001110010 +002B36r 1 73 00 .word %0000000001110011 +002B38r 1 74 00 .word %0000000001110100 +002B3Ar 1 75 00 .word %0000000001110101 +002B3Cr 1 76 00 .word %0000000001110110 +002B3Er 1 77 00 .word %0000000001110111 +002B40r 1 78 00 .word %0000000001111000 +002B42r 1 79 00 .word %0000000001111001 +002B44r 1 7A 00 .word %0000000001111010 +002B46r 1 7B 00 .word %0000000001111011 +002B48r 1 7C 00 .word %0000000001111100 +002B4Ar 1 7D 00 .word %0000000001111101 +002B4Cr 1 7E 00 .word %0000000001111110 +002B4Er 1 7F 00 .word %0000000001111111 +002B50r 1 80 00 .word %0000000010000000 +002B52r 1 81 00 .word %0000000010000001 +002B54r 1 82 00 .word %0000000010000010 +002B56r 1 83 00 .word %0000000010000011 +002B58r 1 84 00 .word %0000000010000100 +002B5Ar 1 85 00 .word %0000000010000101 +002B5Cr 1 86 00 .word %0000000010000110 +002B5Er 1 F0 00 .word %0000000011110000 +002B60r 1 F1 00 .word %0000000011110001 +002B62r 1 F2 00 .word %0000000011110010 +002B64r 1 F3 00 .word %0000000011110011 +002B66r 1 F4 00 .word %0000000011110100 +002B68r 1 F5 00 .word %0000000011110101 +002B6Ar 1 F6 00 .word %0000000011110110 +002B6Cr 1 F7 00 .word %0000000011110111 +002B6Er 1 F8 00 .word %0000000011111000 +002B70r 1 F9 00 .word %0000000011111001 +002B72r 1 FA 00 .word %0000000011111010 +002B74r 1 FB 00 .word %0000000011111011 +002B76r 1 FC 00 .word %0000000011111100 +002B78r 1 FD 00 .word %0000000011111101 +002B7Ar 1 FE 00 .word %0000000011111110 +002B7Cr 1 FF 00 .word %0000000011111111 +002B7Er 1 00 01 .word %0000000100000000 +002B80r 1 01 01 .word %0000000100000001 +002B82r 1 02 01 .word %0000000100000010 +002B84r 1 03 01 .word %0000000100000011 +002B86r 1 D2 0F .word %0000111111010010 +002B88r 1 D3 0F .word %0000111111010011 +002B8Ar 1 D4 0F .word %0000111111010100 +002B8Cr 1 D5 0F .word %0000111111010101 +002B8Er 1 D6 0F .word %0000111111010110 +002B90r 1 D7 0F .word %0000111111010111 +002B92r 1 D8 0F .word %0000111111011000 +002B94r 1 D9 0F .word %0000111111011001 +002B96r 1 DA 0F .word %0000111111011010 +002B98r 1 DB 0F .word %0000111111011011 +002B9Ar 1 DC 0F .word %0000111111011100 +002B9Cr 1 DD 0F .word %0000111111011101 +002B9Er 1 DE 0F .word %0000111111011110 +002BA0r 1 DF 0F .word %0000111111011111 +002BA2r 1 E0 0F .word %0000111111100000 +002BA4r 1 E1 0F .word %0000111111100001 +002BA6r 1 E2 0F .word %0000111111100010 +002BA8r 1 E3 0F .word %0000111111100011 +002BAAr 1 E4 0F .word %0000111111100100 +002BACr 1 E5 0F .word %0000111111100101 +002BAEr 1 E6 0F .word %0000111111100110 +002BB0r 1 E7 0F .word %0000111111100111 +002BB2r 1 E8 0F .word %0000111111101000 +002BB4r 1 E9 0F .word %0000111111101001 +002BB6r 1 EA 0F .word %0000111111101010 +002BB8r 1 EB 0F .word %0000111111101011 +002BBAr 1 EC 0F .word %0000111111101100 +002BBCr 1 ED 0F .word %0000111111101101 +002BBEr 1 EE 0F .word %0000111111101110 +002BC0r 1 EF 0F .word %0000111111101111 +002BC2r 1 F0 0F .word %0000111111110000 +002BC4r 1 F1 0F .word %0000111111110001 +002BC6r 1 F2 0F .word %0000111111110010 +002BC8r 1 F3 0F .word %0000111111110011 +002BCAr 1 F4 0F .word %0000111111110100 +002BCCr 1 F5 0F .word %0000111111110101 +002BCEr 1 F6 0F .word %0000111111110110 +002BD0r 1 F7 0F .word %0000111111110111 +002BD2r 1 F8 0F .word %0000111111111000 +002BD4r 1 F9 0F .word %0000111111111001 +002BD6r 1 FA 0F .word %0000111111111010 +002BD8r 1 FB 0F .word %0000111111111011 +002BDAr 1 FC 0F .word %0000111111111100 +002BDCr 1 FD 0F .word %0000111111111101 +002BDEr 1 FE 0F .word %0000111111111110 +002BE0r 1 FF 0F .word %0000111111111111 +002BE2r 1 00 10 .word %0001000000000000 +002BE4r 1 01 10 .word %0001000000000001 +002BE6r 1 02 10 .word %0001000000000010 +002BE8r 1 03 10 .word %0001000000000011 +002BEAr 1 04 10 .word %0001000000000100 +002BECr 1 05 10 .word %0001000000000101 +002BEEr 1 06 10 .word %0001000000000110 +002BF0r 1 07 10 .word %0001000000000111 +002BF2r 1 08 10 .word %0001000000001000 +002BF4r 1 F0 7F .word %0111111111110000 +002BF6r 1 F1 7F .word %0111111111110001 +002BF8r 1 F2 7F .word %0111111111110010 +002BFAr 1 F3 7F .word %0111111111110011 +002BFCr 1 F4 7F .word %0111111111110100 +002BFEr 1 F5 7F .word %0111111111110101 +002C00r 1 F6 7F .word %0111111111110110 +002C02r 1 F7 7F .word %0111111111110111 +002C04r 1 F8 7F .word %0111111111111000 +002C06r 1 F9 7F .word %0111111111111001 +002C08r 1 FA 7F .word %0111111111111010 +002C0Ar 1 FB 7F .word %0111111111111011 +002C0Cr 1 FC 7F .word %0111111111111100 +002C0Er 1 FD 7F .word %0111111111111101 +002C10r 1 FE 7F .word %0111111111111110 +002C12r 1 FF 7F .word %0111111111111111 +002C14r 1 00 80 .word %1000000000000000 +002C16r 1 01 80 .word %1000000000000001 +002C18r 1 02 80 .word %1000000000000010 +002C1Ar 1 03 80 .word %1000000000000011 +002C1Cr 1 04 80 .word %1000000000000100 +002C1Er 1 05 80 .word %1000000000000101 +002C20r 1 06 80 .word %1000000000000110 +002C22r 1 07 80 .word %1000000000000111 +002C24r 1 08 80 .word %1000000000001000 +002C26r 1 09 80 .word %1000000000001001 +002C28r 1 0A 80 .word %1000000000001010 +002C2Ar 1 0B 80 .word %1000000000001011 +002C2Cr 1 E1 9F .word %1001111111100001 +002C2Er 1 E2 9F .word %1001111111100010 +002C30r 1 E3 9F .word %1001111111100011 +002C32r 1 E4 9F .word %1001111111100100 +002C34r 1 E5 9F .word %1001111111100101 +002C36r 1 E6 9F .word %1001111111100110 +002C38r 1 E7 9F .word %1001111111100111 +002C3Ar 1 E8 9F .word %1001111111101000 +002C3Cr 1 E9 9F .word %1001111111101001 +002C3Er 1 EA 9F .word %1001111111101010 +002C40r 1 EB 9F .word %1001111111101011 +002C42r 1 EC 9F .word %1001111111101100 +002C44r 1 ED 9F .word %1001111111101101 +002C46r 1 EE 9F .word %1001111111101110 +002C48r 1 EF 9F .word %1001111111101111 +002C4Ar 1 F0 9F .word %1001111111110000 +002C4Cr 1 F1 9F .word %1001111111110001 +002C4Er 1 F2 9F .word %1001111111110010 +002C50r 1 F3 9F .word %1001111111110011 +002C52r 1 F4 9F .word %1001111111110100 +002C54r 1 F5 9F .word %1001111111110101 +002C56r 1 F6 9F .word %1001111111110110 +002C58r 1 F7 9F .word %1001111111110111 +002C5Ar 1 F8 9F .word %1001111111111000 +002C5Cr 1 F9 9F .word %1001111111111001 +002C5Er 1 FA 9F .word %1001111111111010 +002C60r 1 FB 9F .word %1001111111111011 +002C62r 1 FC 9F .word %1001111111111100 +002C64r 1 FD 9F .word %1001111111111101 +002C66r 1 FE 9F .word %1001111111111110 +002C68r 1 FF 9F .word %1001111111111111 +002C6Ar 1 00 A0 .word %1010000000000000 +002C6Cr 1 01 A0 .word %1010000000000001 +002C6Er 1 02 A0 .word %1010000000000010 +002C70r 1 03 A0 .word %1010000000000011 +002C72r 1 04 A0 .word %1010000000000100 +002C74r 1 05 A0 .word %1010000000000101 +002C76r 1 06 A0 .word %1010000000000110 +002C78r 1 07 A0 .word %1010000000000111 +002C7Ar 1 08 A0 .word %1010000000001000 +002C7Cr 1 09 A0 .word %1010000000001001 +002C7Er 1 0A A0 .word %1010000000001010 +002C80r 1 0B A0 .word %1010000000001011 +002C82r 1 0C A0 .word %1010000000001100 +002C84r 1 0D A0 .word %1010000000001101 +002C86r 1 0E A0 .word %1010000000001110 +002C88r 1 0F A0 .word %1010000000001111 +002C8Ar 1 E1 AF .word %1010111111100001 +002C8Cr 1 E2 AF .word %1010111111100010 +002C8Er 1 E3 AF .word %1010111111100011 +002C90r 1 E4 AF .word %1010111111100100 +002C92r 1 E5 AF .word %1010111111100101 +002C94r 1 E6 AF .word %1010111111100110 +002C96r 1 E7 AF .word %1010111111100111 +002C98r 1 E8 AF .word %1010111111101000 +002C9Ar 1 E9 AF .word %1010111111101001 +002C9Cr 1 EA AF .word %1010111111101010 +002C9Er 1 EB AF .word %1010111111101011 +002CA0r 1 EC AF .word %1010111111101100 +002CA2r 1 ED AF .word %1010111111101101 +002CA4r 1 EE AF .word %1010111111101110 +002CA6r 1 EF AF .word %1010111111101111 +002CA8r 1 F0 AF .word %1010111111110000 +002CAAr 1 F1 AF .word %1010111111110001 +002CACr 1 F2 AF .word %1010111111110010 +002CAEr 1 F3 AF .word %1010111111110011 +002CB0r 1 F4 AF .word %1010111111110100 +002CB2r 1 F5 AF .word %1010111111110101 +002CB4r 1 F6 AF .word %1010111111110110 +002CB6r 1 F7 AF .word %1010111111110111 +002CB8r 1 F8 AF .word %1010111111111000 +002CBAr 1 F9 AF .word %1010111111111001 +002CBCr 1 FA AF .word %1010111111111010 +002CBEr 1 FB AF .word %1010111111111011 +002CC0r 1 FC AF .word %1010111111111100 +002CC2r 1 FD AF .word %1010111111111101 +002CC4r 1 FE AF .word %1010111111111110 +002CC6r 1 FF AF .word %1010111111111111 +002CC8r 1 00 B0 .word %1011000000000000 +002CCAr 1 01 B0 .word %1011000000000001 +002CCCr 1 02 B0 .word %1011000000000010 +002CCEr 1 03 B0 .word %1011000000000011 +002CD0r 1 04 B0 .word %1011000000000100 +002CD2r 1 05 B0 .word %1011000000000101 +002CD4r 1 06 B0 .word %1011000000000110 +002CD6r 1 07 B0 .word %1011000000000111 +002CD8r 1 08 B0 .word %1011000000001000 +002CDAr 1 09 B0 .word %1011000000001001 +002CDCr 1 0A B0 .word %1011000000001010 +002CDEr 1 0B B0 .word %1011000000001011 +002CE0r 1 0C B0 .word %1011000000001100 +002CE2r 1 0D B0 .word %1011000000001101 +002CE4r 1 0E B0 .word %1011000000001110 +002CE6r 1 0F B0 .word %1011000000001111 +002CE8r 1 E1 BF .word %1011111111100001 +002CEAr 1 E2 BF .word %1011111111100010 +002CECr 1 E3 BF .word %1011111111100011 +002CEEr 1 E4 BF .word %1011111111100100 +002CF0r 1 E5 BF .word %1011111111100101 +002CF2r 1 E6 BF .word %1011111111100110 +002CF4r 1 E7 BF .word %1011111111100111 +002CF6r 1 E8 BF .word %1011111111101000 +002CF8r 1 E9 BF .word %1011111111101001 +002CFAr 1 EA BF .word %1011111111101010 +002CFCr 1 EB BF .word %1011111111101011 +002CFEr 1 EC BF .word %1011111111101100 +002D00r 1 ED BF .word %1011111111101101 +002D02r 1 EE BF .word %1011111111101110 +002D04r 1 EF BF .word %1011111111101111 +002D06r 1 F0 BF .word %1011111111110000 +002D08r 1 F1 BF .word %1011111111110001 +002D0Ar 1 F2 BF .word %1011111111110010 +002D0Cr 1 F3 BF .word %1011111111110011 +002D0Er 1 F4 BF .word %1011111111110100 +002D10r 1 F5 BF .word %1011111111110101 +002D12r 1 F6 BF .word %1011111111110110 +002D14r 1 F7 BF .word %1011111111110111 +002D16r 1 F8 BF .word %1011111111111000 +002D18r 1 F9 BF .word %1011111111111001 +002D1Ar 1 FA BF .word %1011111111111010 +002D1Cr 1 FB BF .word %1011111111111011 +002D1Er 1 FC BF .word %1011111111111100 +002D20r 1 FD BF .word %1011111111111101 +002D22r 1 FE BF .word %1011111111111110 +002D24r 1 FF BF .word %1011111111111111 +002D26r 1 00 C0 .word %1100000000000000 +002D28r 1 01 C0 .word %1100000000000001 +002D2Ar 1 02 C0 .word %1100000000000010 +002D2Cr 1 03 C0 .word %1100000000000011 +002D2Er 1 04 C0 .word %1100000000000100 +002D30r 1 05 C0 .word %1100000000000101 +002D32r 1 06 C0 .word %1100000000000110 +002D34r 1 07 C0 .word %1100000000000111 +002D36r 1 08 C0 .word %1100000000001000 +002D38r 1 09 C0 .word %1100000000001001 +002D3Ar 1 0A C0 .word %1100000000001010 +002D3Cr 1 0B C0 .word %1100000000001011 +002D3Er 1 0C C0 .word %1100000000001100 +002D40r 1 0D C0 .word %1100000000001101 +002D42r 1 0E C0 .word %1100000000001110 +002D44r 1 0F C0 .word %1100000000001111 +002D46r 1 E1 CF .word %1100111111100001 +002D48r 1 E2 CF .word %1100111111100010 +002D4Ar 1 E3 CF .word %1100111111100011 +002D4Cr 1 E4 CF .word %1100111111100100 +002D4Er 1 E5 CF .word %1100111111100101 +002D50r 1 E6 CF .word %1100111111100110 +002D52r 1 E7 CF .word %1100111111100111 +002D54r 1 E8 CF .word %1100111111101000 +002D56r 1 E9 CF .word %1100111111101001 +002D58r 1 EA CF .word %1100111111101010 +002D5Ar 1 EB CF .word %1100111111101011 +002D5Cr 1 EC CF .word %1100111111101100 +002D5Er 1 ED CF .word %1100111111101101 +002D60r 1 EE CF .word %1100111111101110 +002D62r 1 EF CF .word %1100111111101111 +002D64r 1 F0 CF .word %1100111111110000 +002D66r 1 F1 CF .word %1100111111110001 +002D68r 1 F2 CF .word %1100111111110010 +002D6Ar 1 F3 CF .word %1100111111110011 +002D6Cr 1 F4 CF .word %1100111111110100 +002D6Er 1 F5 CF .word %1100111111110101 +002D70r 1 F6 CF .word %1100111111110110 +002D72r 1 F7 CF .word %1100111111110111 +002D74r 1 F8 CF .word %1100111111111000 +002D76r 1 F9 CF .word %1100111111111001 +002D78r 1 FA CF .word %1100111111111010 +002D7Ar 1 FB CF .word %1100111111111011 +002D7Cr 1 FC CF .word %1100111111111100 +002D7Er 1 FD CF .word %1100111111111101 +002D80r 1 FE CF .word %1100111111111110 +002D82r 1 FF CF .word %1100111111111111 +002D84r 1 00 D0 .word %1101000000000000 +002D86r 1 01 D0 .word %1101000000000001 +002D88r 1 02 D0 .word %1101000000000010 +002D8Ar 1 03 D0 .word %1101000000000011 +002D8Cr 1 04 D0 .word %1101000000000100 +002D8Er 1 05 D0 .word %1101000000000101 +002D90r 1 06 D0 .word %1101000000000110 +002D92r 1 07 D0 .word %1101000000000111 +002D94r 1 08 D0 .word %1101000000001000 +002D96r 1 09 D0 .word %1101000000001001 +002D98r 1 0A D0 .word %1101000000001010 +002D9Ar 1 0B D0 .word %1101000000001011 +002D9Cr 1 0C D0 .word %1101000000001100 +002D9Er 1 0D D0 .word %1101000000001101 +002DA0r 1 0E D0 .word %1101000000001110 +002DA2r 1 0F D0 .word %1101000000001111 +002DA4r 1 E1 DF .word %1101111111100001 +002DA6r 1 E2 DF .word %1101111111100010 +002DA8r 1 E3 DF .word %1101111111100011 +002DAAr 1 E4 DF .word %1101111111100100 +002DACr 1 E5 DF .word %1101111111100101 +002DAEr 1 E6 DF .word %1101111111100110 +002DB0r 1 E7 DF .word %1101111111100111 +002DB2r 1 E8 DF .word %1101111111101000 +002DB4r 1 E9 DF .word %1101111111101001 +002DB6r 1 EA DF .word %1101111111101010 +002DB8r 1 EB DF .word %1101111111101011 +002DBAr 1 EC DF .word %1101111111101100 +002DBCr 1 ED DF .word %1101111111101101 +002DBEr 1 EE DF .word %1101111111101110 +002DC0r 1 EF DF .word %1101111111101111 +002DC2r 1 F0 DF .word %1101111111110000 +002DC4r 1 F1 DF .word %1101111111110001 +002DC6r 1 F2 DF .word %1101111111110010 +002DC8r 1 F3 DF .word %1101111111110011 +002DCAr 1 F4 DF .word %1101111111110100 +002DCCr 1 F5 DF .word %1101111111110101 +002DCEr 1 F6 DF .word %1101111111110110 +002DD0r 1 F7 DF .word %1101111111110111 +002DD2r 1 F8 DF .word %1101111111111000 +002DD4r 1 F9 DF .word %1101111111111001 +002DD6r 1 FA DF .word %1101111111111010 +002DD8r 1 FB DF .word %1101111111111011 +002DDAr 1 FC DF .word %1101111111111100 +002DDCr 1 FD DF .word %1101111111111101 +002DDEr 1 FE DF .word %1101111111111110 +002DE0r 1 FF DF .word %1101111111111111 +002DE2r 1 00 E0 .word %1110000000000000 +002DE4r 1 01 E0 .word %1110000000000001 +002DE6r 1 02 E0 .word %1110000000000010 +002DE8r 1 03 E0 .word %1110000000000011 +002DEAr 1 04 E0 .word %1110000000000100 +002DECr 1 05 E0 .word %1110000000000101 +002DEEr 1 06 E0 .word %1110000000000110 +002DF0r 1 07 E0 .word %1110000000000111 +002DF2r 1 08 E0 .word %1110000000001000 +002DF4r 1 09 E0 .word %1110000000001001 +002DF6r 1 0A E0 .word %1110000000001010 +002DF8r 1 0B E0 .word %1110000000001011 +002DFAr 1 0C E0 .word %1110000000001100 +002DFCr 1 0D E0 .word %1110000000001101 +002DFEr 1 0E E0 .word %1110000000001110 +002E00r 1 0F E0 .word %1110000000001111 +002E02r 1 E1 EF .word %1110111111100001 +002E04r 1 E2 EF .word %1110111111100010 +002E06r 1 E3 EF .word %1110111111100011 +002E08r 1 E4 EF .word %1110111111100100 +002E0Ar 1 E5 EF .word %1110111111100101 +002E0Cr 1 E6 EF .word %1110111111100110 +002E0Er 1 E7 EF .word %1110111111100111 +002E10r 1 E8 EF .word %1110111111101000 +002E12r 1 E9 EF .word %1110111111101001 +002E14r 1 EA EF .word %1110111111101010 +002E16r 1 EB EF .word %1110111111101011 +002E18r 1 EC EF .word %1110111111101100 +002E1Ar 1 ED EF .word %1110111111101101 +002E1Cr 1 EE EF .word %1110111111101110 +002E1Er 1 EF EF .word %1110111111101111 +002E20r 1 F0 EF .word %1110111111110000 +002E22r 1 F1 EF .word %1110111111110001 +002E24r 1 F2 EF .word %1110111111110010 +002E26r 1 F3 EF .word %1110111111110011 +002E28r 1 F4 EF .word %1110111111110100 +002E2Ar 1 F5 EF .word %1110111111110101 +002E2Cr 1 F6 EF .word %1110111111110110 +002E2Er 1 F7 EF .word %1110111111110111 +002E30r 1 F8 EF .word %1110111111111000 +002E32r 1 F9 EF .word %1110111111111001 +002E34r 1 FA EF .word %1110111111111010 +002E36r 1 FB EF .word %1110111111111011 +002E38r 1 FC EF .word %1110111111111100 +002E3Ar 1 FD EF .word %1110111111111101 +002E3Cr 1 FE EF .word %1110111111111110 +002E3Er 1 FF EF .word %1110111111111111 +002E40r 1 00 F0 .word %1111000000000000 +002E42r 1 01 F0 .word %1111000000000001 +002E44r 1 02 F0 .word %1111000000000010 +002E46r 1 03 F0 .word %1111000000000011 +002E48r 1 04 F0 .word %1111000000000100 +002E4Ar 1 05 F0 .word %1111000000000101 +002E4Cr 1 06 F0 .word %1111000000000110 +002E4Er 1 07 F0 .word %1111000000000111 +002E50r 1 08 F0 .word %1111000000001000 +002E52r 1 09 F0 .word %1111000000001001 +002E54r 1 0A F0 .word %1111000000001010 +002E56r 1 0B F0 .word %1111000000001011 +002E58r 1 0C F0 .word %1111000000001100 +002E5Ar 1 0D F0 .word %1111000000001101 +002E5Cr 1 0E F0 .word %1111000000001110 +002E5Er 1 0F F0 .word %1111000000001111 +002E60r 1 E1 FF .word %1111111111100001 +002E62r 1 E2 FF .word %1111111111100010 +002E64r 1 E3 FF .word %1111111111100011 +002E66r 1 E4 FF .word %1111111111100100 +002E68r 1 E5 FF .word %1111111111100101 +002E6Ar 1 E6 FF .word %1111111111100110 +002E6Cr 1 E7 FF .word %1111111111100111 +002E6Er 1 E8 FF .word %1111111111101000 +002E70r 1 E9 FF .word %1111111111101001 +002E72r 1 EA FF .word %1111111111101010 +002E74r 1 EB FF .word %1111111111101011 +002E76r 1 EC FF .word %1111111111101100 +002E78r 1 ED FF .word %1111111111101101 +002E7Ar 1 EE FF .word %1111111111101110 +002E7Cr 1 EF FF .word %1111111111101111 +002E7Er 1 F0 FF .word %1111111111110000 +002E80r 1 F1 FF .word %1111111111110001 +002E82r 1 F2 FF .word %1111111111110010 +002E84r 1 F3 FF .word %1111111111110011 +002E86r 1 F4 FF .word %1111111111110100 +002E88r 1 F5 FF .word %1111111111110101 +002E8Ar 1 F6 FF .word %1111111111110110 +002E8Cr 1 F7 FF .word %1111111111110111 +002E8Er 1 F8 FF .word %1111111111111000 +002E90r 1 F9 FF .word %1111111111111001 +002E92r 1 FA FF .word %1111111111111010 +002E94r 1 FB FF .word %1111111111111011 +002E96r 1 FC FF .word %1111111111111100 +002E98r 1 FD FF .word %1111111111111101 +002E9Ar 1 FE FF .word %1111111111111110 +002E9Cr 1 FF FF .word %1111111111111111 +002E9Er 1 +002E9Er 1 ; multiple values on one line, decimal +002E9Er 1 00 00 01 00 .word 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 +002EA2r 1 02 00 03 00 +002EA6r 1 04 00 05 00 +002EBEr 1 10 00 11 00 .word 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 +002EC2r 1 12 00 13 00 +002EC6r 1 14 00 15 00 +002EDEr 1 70 00 71 00 .word 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 +002EE2r 1 72 00 73 00 +002EE6r 1 74 00 75 00 +002EFEr 1 80 00 81 00 .word 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 +002F02r 1 82 00 83 00 +002F06r 1 84 00 85 00 +002F1Er 1 F0 00 F1 00 .word 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 +002F22r 1 F2 00 F3 00 +002F26r 1 F4 00 F5 00 +002F3Er 1 00 01 01 01 .word 256,257,258,259,260,261,262,263,264,265,266,267,268,269,270,271 +002F42r 1 02 01 03 01 +002F46r 1 04 01 05 01 +002F5Er 1 E0 0F E1 0F .word 4064,4065,4066,4067,4068,4069,4070,4071,4072,4073,4074,4075,4076,4077,4078,4079 +002F62r 1 E2 0F E3 0F +002F66r 1 E4 0F E5 0F +002F7Er 1 F0 0F F1 0F .word 4080,4081,4082,4083,4084,4085,4086,4087,4088,4089,4090,4091,4092,4093,4094,4095 +002F82r 1 F2 0F F3 0F +002F86r 1 F4 0F F5 0F +002F9Er 1 00 10 01 10 .word 4096,4097,4098,4099,4100,4101,4102,4103,4104,4105,4106,4107,4108,4109,4110,4111 +002FA2r 1 02 10 03 10 +002FA6r 1 04 10 05 10 +002FBEr 1 F0 7F F1 7F .word 32752,32753,32754,32755,32756,32757,32758,32759,32760,32761,32762,32763,32764,32765,32766,32767 +002FC2r 1 F2 7F F3 7F +002FC6r 1 F4 7F F5 7F +002FDEr 1 00 80 01 80 .word 32768,32769,32770,32771,32772,32773,32774,32775,32776,32777,32778,32779,32780,32781,32782,32783 +002FE2r 1 02 80 03 80 +002FE6r 1 04 80 05 80 +002FFEr 1 F0 9F F1 9F .word 40944,40945,40946,40947,40948,40949,40950,40951,40952,40953,40954,40955,40956,40957,40958,40959 +003002r 1 F2 9F F3 9F +003006r 1 F4 9F F5 9F +00301Er 1 00 A0 01 A0 .word 40960,40961,40962,40963,40964,40965,40966,40967,40968,40969,40970,40971,40972,40973,40974,40975 +003022r 1 02 A0 03 A0 +003026r 1 04 A0 05 A0 +00303Er 1 F0 AF F1 AF .word 45040,45041,45042,45043,45044,45045,45046,45047,45048,45049,45050,45051,45052,45053,45054,45055 +003042r 1 F2 AF F3 AF +003046r 1 F4 AF F5 AF +00305Er 1 00 B0 01 B0 .word 45056,45057,45058,45059,45060,45061,45062,45063,45064,45065,45066,45067,45068,45069,45070,45071 +003062r 1 02 B0 03 B0 +003066r 1 04 B0 05 B0 +00307Er 1 F0 BF F1 BF .word 49136,49137,49138,49139,49140,49141,49142,49143,49144,49145,49146,49147,49148,49149,49150,49151 +003082r 1 F2 BF F3 BF +003086r 1 F4 BF F5 BF +00309Er 1 00 C0 01 C0 .word 49152,49153,49154,49155,49156,49157,49158,49159,49160,49161,49162,49163,49164,49165,49166,49167 +0030A2r 1 02 C0 03 C0 +0030A6r 1 04 C0 05 C0 +0030BEr 1 F0 CF F1 CF .word 53232,53233,53234,53235,53236,53237,53238,53239,53240,53241,53242,53243,53244,53245,53246,53247 +0030C2r 1 F2 CF F3 CF +0030C6r 1 F4 CF F5 CF +0030DEr 1 00 D0 01 D0 .word 53248,53249,53250,53251,53252,53253,53254,53255,53256,53257,53258,53259,53260,53261,53262,53263 +0030E2r 1 02 D0 03 D0 +0030E6r 1 04 D0 05 D0 +0030FEr 1 F0 DF F1 DF .word 57328,57329,57330,57331,57332,57333,57334,57335,57336,57337,57338,57339,57340,57341,57342,57343 +003102r 1 F2 DF F3 DF +003106r 1 F4 DF F5 DF +00311Er 1 00 E0 01 E0 .word 57344,57345,57346,57347,57348,57349,57350,57351,57352,57353,57354,57355,57356,57357,57358,57359 +003122r 1 02 E0 03 E0 +003126r 1 04 E0 05 E0 +00313Er 1 F0 EF F1 EF .word 61424,61425,61426,61427,61428,61429,61430,61431,61432,61433,61434,61435,61436,61437,61438,61439 +003142r 1 F2 EF F3 EF +003146r 1 F4 EF F5 EF +00315Er 1 00 F0 01 F0 .word 61440,61441,61442,61443,61444,61445,61446,61447,61448,61449,61450,61451,61452,61453,61454,61455 +003162r 1 02 F0 03 F0 +003166r 1 04 F0 05 F0 +00317Er 1 F0 FF F1 FF .word 65520,65521,65522,65523,65524,65525,65526,65527,65528,65529,65530,65531,65532,65533,65534,65535 +003182r 1 F2 FF F3 FF +003186r 1 F4 FF F5 FF +00319Er 1 +00319Er 1 ; multiple values on one line, hex +00319Er 1 00 00 01 00 .word $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f +0031A2r 1 02 00 03 00 +0031A6r 1 04 00 05 00 +0031BEr 1 10 00 11 00 .word $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f +0031C2r 1 12 00 13 00 +0031C6r 1 14 00 15 00 +0031DEr 1 70 00 71 00 .word $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f +0031E2r 1 72 00 73 00 +0031E6r 1 74 00 75 00 +0031FEr 1 80 00 81 00 .word $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f +003202r 1 82 00 83 00 +003206r 1 84 00 85 00 +00321Er 1 F0 00 F1 00 .word $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff +003222r 1 F2 00 F3 00 +003226r 1 F4 00 F5 00 +00323Er 1 00 01 01 01 .word $100,$101,$102,$103,$104,$105,$106,$107,$108,$109,$10a,$10b,$10c,$10d,$10e,$10f +003242r 1 02 01 03 01 +003246r 1 04 01 05 01 +00325Er 1 E0 0F E1 0F .word $fe0,$fe1,$fe2,$fe3,$fe4,$fe5,$fe6,$fe7,$fe8,$fe9,$fea,$feb,$fec,$fed,$fee,$fef +003262r 1 E2 0F E3 0F +003266r 1 E4 0F E5 0F +00327Er 1 F0 0F F1 0F .word $ff0,$ff1,$ff2,$ff3,$ff4,$ff5,$ff6,$ff7,$ff8,$ff9,$ffa,$ffb,$ffc,$ffd,$ffe,$fff +003282r 1 F2 0F F3 0F +003286r 1 F4 0F F5 0F +00329Er 1 00 10 01 10 .word $1000,$1001,$1002,$1003,$1004,$1005,$1006,$1007,$1008,$1009,$100a,$100b,$100c,$100d,$100e,$100f +0032A2r 1 02 10 03 10 +0032A6r 1 04 10 05 10 +0032BEr 1 F0 7F F1 7F .word $7ff0,$7ff1,$7ff2,$7ff3,$7ff4,$7ff5,$7ff6,$7ff7,$7ff8,$7ff9,$7ffa,$7ffb,$7ffc,$7ffd,$7ffe,$7fff +0032C2r 1 F2 7F F3 7F +0032C6r 1 F4 7F F5 7F +0032DEr 1 00 80 01 80 .word $8000,$8001,$8002,$8003,$8004,$8005,$8006,$8007,$8008,$8009,$800a,$800b,$800c,$800d,$800e,$800f +0032E2r 1 02 80 03 80 +0032E6r 1 04 80 05 80 +0032FEr 1 F0 9F F1 9F .word $9ff0,$9ff1,$9ff2,$9ff3,$9ff4,$9ff5,$9ff6,$9ff7,$9ff8,$9ff9,$9ffa,$9ffb,$9ffc,$9ffd,$9ffe,$9fff +003302r 1 F2 9F F3 9F +003306r 1 F4 9F F5 9F +00331Er 1 00 A0 01 A0 .word $a000,$a001,$a002,$a003,$a004,$a005,$a006,$a007,$a008,$a009,$a00a,$a00b,$a00c,$a00d,$a00e,$a00f +003322r 1 02 A0 03 A0 +003326r 1 04 A0 05 A0 +00333Er 1 F0 AF F1 AF .word $aff0,$aff1,$aff2,$aff3,$aff4,$aff5,$aff6,$aff7,$aff8,$aff9,$affa,$affb,$affc,$affd,$affe,$afff +003342r 1 F2 AF F3 AF +003346r 1 F4 AF F5 AF +00335Er 1 00 B0 01 B0 .word $b000,$b001,$b002,$b003,$b004,$b005,$b006,$b007,$b008,$b009,$b00a,$b00b,$b00c,$b00d,$b00e,$b00f +003362r 1 02 B0 03 B0 +003366r 1 04 B0 05 B0 +00337Er 1 F0 BF F1 BF .word $bff0,$bff1,$bff2,$bff3,$bff4,$bff5,$bff6,$bff7,$bff8,$bff9,$bffa,$bffb,$bffc,$bffd,$bffe,$bfff +003382r 1 F2 BF F3 BF +003386r 1 F4 BF F5 BF +00339Er 1 00 C0 01 C0 .word $c000,$c001,$c002,$c003,$c004,$c005,$c006,$c007,$c008,$c009,$c00a,$c00b,$c00c,$c00d,$c00e,$c00f +0033A2r 1 02 C0 03 C0 +0033A6r 1 04 C0 05 C0 +0033BEr 1 F0 CF F1 CF .word $cff0,$cff1,$cff2,$cff3,$cff4,$cff5,$cff6,$cff7,$cff8,$cff9,$cffa,$cffb,$cffc,$cffd,$cffe,$cfff +0033C2r 1 F2 CF F3 CF +0033C6r 1 F4 CF F5 CF +0033DEr 1 00 D0 01 D0 .word $d000,$d001,$d002,$d003,$d004,$d005,$d006,$d007,$d008,$d009,$d00a,$d00b,$d00c,$d00d,$d00e,$d00f +0033E2r 1 02 D0 03 D0 +0033E6r 1 04 D0 05 D0 +0033FEr 1 F0 DF F1 DF .word $dff0,$dff1,$dff2,$dff3,$dff4,$dff5,$dff6,$dff7,$dff8,$dff9,$dffa,$dffb,$dffc,$dffd,$dffe,$dfff +003402r 1 F2 DF F3 DF +003406r 1 F4 DF F5 DF +00341Er 1 00 E0 01 E0 .word $e000,$e001,$e002,$e003,$e004,$e005,$e006,$e007,$e008,$e009,$e00a,$e00b,$e00c,$e00d,$e00e,$e00f +003422r 1 02 E0 03 E0 +003426r 1 04 E0 05 E0 +00343Er 1 F0 EF F1 EF .word $eff0,$eff1,$eff2,$eff3,$eff4,$eff5,$eff6,$eff7,$eff8,$eff9,$effa,$effb,$effc,$effd,$effe,$efff +003442r 1 F2 EF F3 EF +003446r 1 F4 EF F5 EF +00345Er 1 00 F0 01 F0 .word $f000,$f001,$f002,$f003,$f004,$f005,$f006,$f007,$f008,$f009,$f00a,$f00b,$f00c,$f00d,$f00e,$f00f +003462r 1 02 F0 03 F0 +003466r 1 04 F0 05 F0 +00347Er 1 F0 FF F1 FF .word $fff0,$fff1,$fff2,$fff3,$fff4,$fff5,$fff6,$fff7,$fff8,$fff9,$fffa,$fffb,$fffc,$fffd,$fffe,$ffff +003482r 1 F2 FF F3 FF +003486r 1 F4 FF F5 FF +00349Er 1 +00349Er 1 ; multiple values on one line, alternative hex +00349Er 1 00 00 01 00 .word 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh +0034A2r 1 02 00 03 00 +0034A6r 1 04 00 05 00 +0034BEr 1 10 00 11 00 .word 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh +0034C2r 1 12 00 13 00 +0034C6r 1 14 00 15 00 +0034DEr 1 70 00 71 00 .word 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh +0034E2r 1 72 00 73 00 +0034E6r 1 74 00 75 00 +0034FEr 1 80 00 81 00 .word 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh +003502r 1 82 00 83 00 +003506r 1 84 00 85 00 +00351Er 1 F0 00 F1 00 .word 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh +003522r 1 F2 00 F3 00 +003526r 1 F4 00 F5 00 +00353Er 1 00 01 01 01 .word 100h,101h,102h,103h,104h,105h,106h,107h,108h,109h,10ah,10bh,10ch,10dh,10eh,10fh +003542r 1 02 01 03 01 +003546r 1 04 01 05 01 +00355Er 1 E0 0F E1 0F .word 0fe0h,0fe1h,0fe2h,0fe3h,0fe4h,0fe5h,0fe6h,0fe7h,0fe8h,0fe9h,0feah,0febh,0fech,0fedh,0feeh,0fefh +003562r 1 E2 0F E3 0F +003566r 1 E4 0F E5 0F +00357Er 1 F0 0F F1 0F .word 0ff0h,0ff1h,0ff2h,0ff3h,0ff4h,0ff5h,0ff6h,0ff7h,0ff8h,0ff9h,0ffah,0ffbh,0ffch,0ffdh,0ffeh,0fffh +003582r 1 F2 0F F3 0F +003586r 1 F4 0F F5 0F +00359Er 1 00 10 01 10 .word 1000h,1001h,1002h,1003h,1004h,1005h,1006h,1007h,1008h,1009h,100ah,100bh,100ch,100dh,100eh,100fh +0035A2r 1 02 10 03 10 +0035A6r 1 04 10 05 10 +0035BEr 1 F0 7F F1 7F .word 7ff0h,7ff1h,7ff2h,7ff3h,7ff4h,7ff5h,7ff6h,7ff7h,7ff8h,7ff9h,7ffah,7ffbh,7ffch,7ffdh,7ffeh,7fffh +0035C2r 1 F2 7F F3 7F +0035C6r 1 F4 7F F5 7F +0035DEr 1 00 80 01 80 .word 8000h,8001h,8002h,8003h,8004h,8005h,8006h,8007h,8008h,8009h,800ah,800bh,800ch,800dh,800eh,800fh +0035E2r 1 02 80 03 80 +0035E6r 1 04 80 05 80 +0035FEr 1 F0 9F F1 9F .word 9ff0h,9ff1h,9ff2h,9ff3h,9ff4h,9ff5h,9ff6h,9ff7h,9ff8h,9ff9h,9ffah,9ffbh,9ffch,9ffdh,9ffeh,9fffh +003602r 1 F2 9F F3 9F +003606r 1 F4 9F F5 9F +00361Er 1 00 A0 01 A0 .word 0a000h,0a001h,0a002h,0a003h,0a004h,0a005h,0a006h,0a007h,0a008h,0a009h,0a00ah,0a00bh,0a00ch,0a00dh,0a00eh,0a00fh +003622r 1 02 A0 03 A0 +003626r 1 04 A0 05 A0 +00363Er 1 F0 AF F1 AF .word 0aff0h,0aff1h,0aff2h,0aff3h,0aff4h,0aff5h,0aff6h,0aff7h,0aff8h,0aff9h,0affah,0affbh,0affch,0affdh,0affeh,0afffh +003642r 1 F2 AF F3 AF +003646r 1 F4 AF F5 AF +00365Er 1 00 B0 01 B0 .word 0b000h,0b001h,0b002h,0b003h,0b004h,0b005h,0b006h,0b007h,0b008h,0b009h,0b00ah,0b00bh,0b00ch,0b00dh,0b00eh,0b00fh +003662r 1 02 B0 03 B0 +003666r 1 04 B0 05 B0 +00367Er 1 F0 BF F1 BF .word 0bff0h,0bff1h,0bff2h,0bff3h,0bff4h,0bff5h,0bff6h,0bff7h,0bff8h,0bff9h,0bffah,0bffbh,0bffch,0bffdh,0bffeh,0bfffh +003682r 1 F2 BF F3 BF +003686r 1 F4 BF F5 BF +00369Er 1 00 C0 01 C0 .word 0c000h,0c001h,0c002h,0c003h,0c004h,0c005h,0c006h,0c007h,0c008h,0c009h,0c00ah,0c00bh,0c00ch,0c00dh,0c00eh,0c00fh +0036A2r 1 02 C0 03 C0 +0036A6r 1 04 C0 05 C0 +0036BEr 1 F0 CF F1 CF .word 0cff0h,0cff1h,0cff2h,0cff3h,0cff4h,0cff5h,0cff6h,0cff7h,0cff8h,0cff9h,0cffah,0cffbh,0cffch,0cffdh,0cffeh,0cfffh +0036C2r 1 F2 CF F3 CF +0036C6r 1 F4 CF F5 CF +0036DEr 1 00 D0 01 D0 .word 0d000h,0d001h,0d002h,0d003h,0d004h,0d005h,0d006h,0d007h,0d008h,0d009h,0d00ah,0d00bh,0d00ch,0d00dh,0d00eh,0d00fh +0036E2r 1 02 D0 03 D0 +0036E6r 1 04 D0 05 D0 +0036FEr 1 F0 DF F1 DF .word 0dff0h,0dff1h,0dff2h,0dff3h,0dff4h,0dff5h,0dff6h,0dff7h,0dff8h,0dff9h,0dffah,0dffbh,0dffch,0dffdh,0dffeh,0dfffh +003702r 1 F2 DF F3 DF +003706r 1 F4 DF F5 DF +00371Er 1 00 E0 01 E0 .word 0e000h,0e001h,0e002h,0e003h,0e004h,0e005h,0e006h,0e007h,0e008h,0e009h,0e00ah,0e00bh,0e00ch,0e00dh,0e00eh,0e00fh +003722r 1 02 E0 03 E0 +003726r 1 04 E0 05 E0 +00373Er 1 F0 EF F1 EF .word 0eff0h,0eff1h,0eff2h,0eff3h,0eff4h,0eff5h,0eff6h,0eff7h,0eff8h,0eff9h,0effah,0effbh,0effch,0effdh,0effeh,0efffh +003742r 1 F2 EF F3 EF +003746r 1 F4 EF F5 EF +00375Er 1 00 F0 01 F0 .word 0f000h,0f001h,0f002h,0f003h,0f004h,0f005h,0f006h,0f007h,0f008h,0f009h,0f00ah,0f00bh,0f00ch,0f00dh,0f00eh,0f00fh +003762r 1 02 F0 03 F0 +003766r 1 04 F0 05 F0 +00377Er 1 F0 FF F1 FF .word 0fff0h,0fff1h,0fff2h,0fff3h,0fff4h,0fff5h,0fff6h,0fff7h,0fff8h,0fff9h,0fffah,0fffbh,0fffch,0fffdh,0fffeh,0ffffh +003782r 1 F2 FF F3 FF +003786r 1 F4 FF F5 FF +00379Er 1 +00379Er 1 ; mix some variants +00379Er 1 0B 00 11 00 .word 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh +0037A2r 1 03 00 11 00 +0037A6r 1 61 00 62 00 +0037BCr 1 diff --git a/test/asm/listing/ref/103-dbyt.bin-ref b/test/asm/listing/ref/103-dbyt.bin-ref new file mode 100644 index 000000000..6bfb6f738 Binary files /dev/null and b/test/asm/listing/ref/103-dbyt.bin-ref differ diff --git a/test/asm/listing/ref/103-dbyt.list-ref b/test/asm/listing/ref/103-dbyt.list-ref new file mode 100644 index 000000000..211ec8280 --- /dev/null +++ b/test/asm/listing/ref/103-dbyt.list-ref @@ -0,0 +1,6227 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 103-dbyt.s +Current file: 103-dbyt.s + +000000r 1 ; 2022-06-15 Spiro Trikaliotis +000000r 1 +000000r 1 +000000r 1 ; upper case pseudo-op +000000r 1 00 00 .DBYT 0 +000002r 1 00 01 .DBYT 1 +000004r 1 00 02 .DBYT 2 +000006r 1 00 03 .DBYT 3 +000008r 1 00 04 .DBYT 4 +00000Ar 1 00 05 .DBYT 5 +00000Cr 1 00 06 .DBYT 6 +00000Er 1 00 07 .DBYT 7 +000010r 1 00 08 .DBYT 8 +000012r 1 00 09 .DBYT 9 +000014r 1 00 0A .DBYT 10 +000016r 1 00 0B .DBYT 11 +000018r 1 00 0C .DBYT 12 +00001Ar 1 00 0D .DBYT 13 +00001Cr 1 00 0E .DBYT 14 +00001Er 1 00 0F .DBYT 15 +000020r 1 00 10 .DBYT 16 +000022r 1 00 11 .DBYT 17 +000024r 1 00 12 .DBYT 18 +000026r 1 00 13 .DBYT 19 +000028r 1 00 70 .DBYT 112 +00002Ar 1 00 71 .DBYT 113 +00002Cr 1 00 72 .DBYT 114 +00002Er 1 00 73 .DBYT 115 +000030r 1 00 74 .DBYT 116 +000032r 1 00 75 .DBYT 117 +000034r 1 00 76 .DBYT 118 +000036r 1 00 77 .DBYT 119 +000038r 1 00 78 .DBYT 120 +00003Ar 1 00 79 .DBYT 121 +00003Cr 1 00 7A .DBYT 122 +00003Er 1 00 7B .DBYT 123 +000040r 1 00 7C .DBYT 124 +000042r 1 00 7D .DBYT 125 +000044r 1 00 7E .DBYT 126 +000046r 1 00 7F .DBYT 127 +000048r 1 00 80 .DBYT 128 +00004Ar 1 00 81 .DBYT 129 +00004Cr 1 00 82 .DBYT 130 +00004Er 1 00 83 .DBYT 131 +000050r 1 00 84 .DBYT 132 +000052r 1 00 85 .DBYT 133 +000054r 1 00 86 .DBYT 134 +000056r 1 00 F0 .DBYT 240 +000058r 1 00 F1 .DBYT 241 +00005Ar 1 00 F2 .DBYT 242 +00005Cr 1 00 F3 .DBYT 243 +00005Er 1 00 F4 .DBYT 244 +000060r 1 00 F5 .DBYT 245 +000062r 1 00 F6 .DBYT 246 +000064r 1 00 F7 .DBYT 247 +000066r 1 00 F8 .DBYT 248 +000068r 1 00 F9 .DBYT 249 +00006Ar 1 00 FA .DBYT 250 +00006Cr 1 00 FB .DBYT 251 +00006Er 1 00 FC .DBYT 252 +000070r 1 00 FD .DBYT 253 +000072r 1 00 FE .DBYT 254 +000074r 1 00 FF .DBYT 255 +000076r 1 01 00 .DBYT 256 +000078r 1 01 01 .DBYT 257 +00007Ar 1 01 02 .DBYT 258 +00007Cr 1 01 03 .DBYT 259 +00007Er 1 0F D2 .DBYT 4050 +000080r 1 0F D3 .DBYT 4051 +000082r 1 0F D4 .DBYT 4052 +000084r 1 0F D5 .DBYT 4053 +000086r 1 0F D6 .DBYT 4054 +000088r 1 0F D7 .DBYT 4055 +00008Ar 1 0F D8 .DBYT 4056 +00008Cr 1 0F D9 .DBYT 4057 +00008Er 1 0F DA .DBYT 4058 +000090r 1 0F DB .DBYT 4059 +000092r 1 0F DC .DBYT 4060 +000094r 1 0F DD .DBYT 4061 +000096r 1 0F DE .DBYT 4062 +000098r 1 0F DF .DBYT 4063 +00009Ar 1 0F E0 .DBYT 4064 +00009Cr 1 0F E1 .DBYT 4065 +00009Er 1 0F E2 .DBYT 4066 +0000A0r 1 0F E3 .DBYT 4067 +0000A2r 1 0F E4 .DBYT 4068 +0000A4r 1 0F E5 .DBYT 4069 +0000A6r 1 0F E6 .DBYT 4070 +0000A8r 1 0F E7 .DBYT 4071 +0000AAr 1 0F E8 .DBYT 4072 +0000ACr 1 0F E9 .DBYT 4073 +0000AEr 1 0F EA .DBYT 4074 +0000B0r 1 0F EB .DBYT 4075 +0000B2r 1 0F EC .DBYT 4076 +0000B4r 1 0F ED .DBYT 4077 +0000B6r 1 0F EE .DBYT 4078 +0000B8r 1 0F EF .DBYT 4079 +0000BAr 1 0F F0 .DBYT 4080 +0000BCr 1 0F F1 .DBYT 4081 +0000BEr 1 0F F2 .DBYT 4082 +0000C0r 1 0F F3 .DBYT 4083 +0000C2r 1 0F F4 .DBYT 4084 +0000C4r 1 0F F5 .DBYT 4085 +0000C6r 1 0F F6 .DBYT 4086 +0000C8r 1 0F F7 .DBYT 4087 +0000CAr 1 0F F8 .DBYT 4088 +0000CCr 1 0F F9 .DBYT 4089 +0000CEr 1 0F FA .DBYT 4090 +0000D0r 1 0F FB .DBYT 4091 +0000D2r 1 0F FC .DBYT 4092 +0000D4r 1 0F FD .DBYT 4093 +0000D6r 1 0F FE .DBYT 4094 +0000D8r 1 0F FF .DBYT 4095 +0000DAr 1 10 00 .DBYT 4096 +0000DCr 1 10 01 .DBYT 4097 +0000DEr 1 10 02 .DBYT 4098 +0000E0r 1 10 03 .DBYT 4099 +0000E2r 1 10 04 .DBYT 4100 +0000E4r 1 10 05 .DBYT 4101 +0000E6r 1 10 06 .DBYT 4102 +0000E8r 1 10 07 .DBYT 4103 +0000EAr 1 10 08 .DBYT 4104 +0000ECr 1 7F F0 .DBYT 32752 +0000EEr 1 7F F1 .DBYT 32753 +0000F0r 1 7F F2 .DBYT 32754 +0000F2r 1 7F F3 .DBYT 32755 +0000F4r 1 7F F4 .DBYT 32756 +0000F6r 1 7F F5 .DBYT 32757 +0000F8r 1 7F F6 .DBYT 32758 +0000FAr 1 7F F7 .DBYT 32759 +0000FCr 1 7F F8 .DBYT 32760 +0000FEr 1 7F F9 .DBYT 32761 +000100r 1 7F FA .DBYT 32762 +000102r 1 7F FB .DBYT 32763 +000104r 1 7F FC .DBYT 32764 +000106r 1 7F FD .DBYT 32765 +000108r 1 7F FE .DBYT 32766 +00010Ar 1 7F FF .DBYT 32767 +00010Cr 1 80 00 .DBYT 32768 +00010Er 1 80 01 .DBYT 32769 +000110r 1 80 02 .DBYT 32770 +000112r 1 80 03 .DBYT 32771 +000114r 1 80 04 .DBYT 32772 +000116r 1 80 05 .DBYT 32773 +000118r 1 80 06 .DBYT 32774 +00011Ar 1 80 07 .DBYT 32775 +00011Cr 1 80 08 .DBYT 32776 +00011Er 1 80 09 .DBYT 32777 +000120r 1 80 0A .DBYT 32778 +000122r 1 80 0B .DBYT 32779 +000124r 1 9F E1 .DBYT 40929 +000126r 1 9F E2 .DBYT 40930 +000128r 1 9F E3 .DBYT 40931 +00012Ar 1 9F E4 .DBYT 40932 +00012Cr 1 9F E5 .DBYT 40933 +00012Er 1 9F E6 .DBYT 40934 +000130r 1 9F E7 .DBYT 40935 +000132r 1 9F E8 .DBYT 40936 +000134r 1 9F E9 .DBYT 40937 +000136r 1 9F EA .DBYT 40938 +000138r 1 9F EB .DBYT 40939 +00013Ar 1 9F EC .DBYT 40940 +00013Cr 1 9F ED .DBYT 40941 +00013Er 1 9F EE .DBYT 40942 +000140r 1 9F EF .DBYT 40943 +000142r 1 9F F0 .DBYT 40944 +000144r 1 9F F1 .DBYT 40945 +000146r 1 9F F2 .DBYT 40946 +000148r 1 9F F3 .DBYT 40947 +00014Ar 1 9F F4 .DBYT 40948 +00014Cr 1 9F F5 .DBYT 40949 +00014Er 1 9F F6 .DBYT 40950 +000150r 1 9F F7 .DBYT 40951 +000152r 1 9F F8 .DBYT 40952 +000154r 1 9F F9 .DBYT 40953 +000156r 1 9F FA .DBYT 40954 +000158r 1 9F FB .DBYT 40955 +00015Ar 1 9F FC .DBYT 40956 +00015Cr 1 9F FD .DBYT 40957 +00015Er 1 9F FE .DBYT 40958 +000160r 1 9F FF .DBYT 40959 +000162r 1 A0 00 .DBYT 40960 +000164r 1 A0 01 .DBYT 40961 +000166r 1 A0 02 .DBYT 40962 +000168r 1 A0 03 .DBYT 40963 +00016Ar 1 A0 04 .DBYT 40964 +00016Cr 1 A0 05 .DBYT 40965 +00016Er 1 A0 06 .DBYT 40966 +000170r 1 A0 07 .DBYT 40967 +000172r 1 A0 08 .DBYT 40968 +000174r 1 A0 09 .DBYT 40969 +000176r 1 A0 0A .DBYT 40970 +000178r 1 A0 0B .DBYT 40971 +00017Ar 1 A0 0C .DBYT 40972 +00017Cr 1 A0 0D .DBYT 40973 +00017Er 1 A0 0E .DBYT 40974 +000180r 1 A0 0F .DBYT 40975 +000182r 1 AF E1 .DBYT 45025 +000184r 1 AF E2 .DBYT 45026 +000186r 1 AF E3 .DBYT 45027 +000188r 1 AF E4 .DBYT 45028 +00018Ar 1 AF E5 .DBYT 45029 +00018Cr 1 AF E6 .DBYT 45030 +00018Er 1 AF E7 .DBYT 45031 +000190r 1 AF E8 .DBYT 45032 +000192r 1 AF E9 .DBYT 45033 +000194r 1 AF EA .DBYT 45034 +000196r 1 AF EB .DBYT 45035 +000198r 1 AF EC .DBYT 45036 +00019Ar 1 AF ED .DBYT 45037 +00019Cr 1 AF EE .DBYT 45038 +00019Er 1 AF EF .DBYT 45039 +0001A0r 1 AF F0 .DBYT 45040 +0001A2r 1 AF F1 .DBYT 45041 +0001A4r 1 AF F2 .DBYT 45042 +0001A6r 1 AF F3 .DBYT 45043 +0001A8r 1 AF F4 .DBYT 45044 +0001AAr 1 AF F5 .DBYT 45045 +0001ACr 1 AF F6 .DBYT 45046 +0001AEr 1 AF F7 .DBYT 45047 +0001B0r 1 AF F8 .DBYT 45048 +0001B2r 1 AF F9 .DBYT 45049 +0001B4r 1 AF FA .DBYT 45050 +0001B6r 1 AF FB .DBYT 45051 +0001B8r 1 AF FC .DBYT 45052 +0001BAr 1 AF FD .DBYT 45053 +0001BCr 1 AF FE .DBYT 45054 +0001BEr 1 AF FF .DBYT 45055 +0001C0r 1 B0 00 .DBYT 45056 +0001C2r 1 B0 01 .DBYT 45057 +0001C4r 1 B0 02 .DBYT 45058 +0001C6r 1 B0 03 .DBYT 45059 +0001C8r 1 B0 04 .DBYT 45060 +0001CAr 1 B0 05 .DBYT 45061 +0001CCr 1 B0 06 .DBYT 45062 +0001CEr 1 B0 07 .DBYT 45063 +0001D0r 1 B0 08 .DBYT 45064 +0001D2r 1 B0 09 .DBYT 45065 +0001D4r 1 B0 0A .DBYT 45066 +0001D6r 1 B0 0B .DBYT 45067 +0001D8r 1 B0 0C .DBYT 45068 +0001DAr 1 B0 0D .DBYT 45069 +0001DCr 1 B0 0E .DBYT 45070 +0001DEr 1 B0 0F .DBYT 45071 +0001E0r 1 BF E1 .DBYT 49121 +0001E2r 1 BF E2 .DBYT 49122 +0001E4r 1 BF E3 .DBYT 49123 +0001E6r 1 BF E4 .DBYT 49124 +0001E8r 1 BF E5 .DBYT 49125 +0001EAr 1 BF E6 .DBYT 49126 +0001ECr 1 BF E7 .DBYT 49127 +0001EEr 1 BF E8 .DBYT 49128 +0001F0r 1 BF E9 .DBYT 49129 +0001F2r 1 BF EA .DBYT 49130 +0001F4r 1 BF EB .DBYT 49131 +0001F6r 1 BF EC .DBYT 49132 +0001F8r 1 BF ED .DBYT 49133 +0001FAr 1 BF EE .DBYT 49134 +0001FCr 1 BF EF .DBYT 49135 +0001FEr 1 BF F0 .DBYT 49136 +000200r 1 BF F1 .DBYT 49137 +000202r 1 BF F2 .DBYT 49138 +000204r 1 BF F3 .DBYT 49139 +000206r 1 BF F4 .DBYT 49140 +000208r 1 BF F5 .DBYT 49141 +00020Ar 1 BF F6 .DBYT 49142 +00020Cr 1 BF F7 .DBYT 49143 +00020Er 1 BF F8 .DBYT 49144 +000210r 1 BF F9 .DBYT 49145 +000212r 1 BF FA .DBYT 49146 +000214r 1 BF FB .DBYT 49147 +000216r 1 BF FC .DBYT 49148 +000218r 1 BF FD .DBYT 49149 +00021Ar 1 BF FE .DBYT 49150 +00021Cr 1 BF FF .DBYT 49151 +00021Er 1 C0 00 .DBYT 49152 +000220r 1 C0 01 .DBYT 49153 +000222r 1 C0 02 .DBYT 49154 +000224r 1 C0 03 .DBYT 49155 +000226r 1 C0 04 .DBYT 49156 +000228r 1 C0 05 .DBYT 49157 +00022Ar 1 C0 06 .DBYT 49158 +00022Cr 1 C0 07 .DBYT 49159 +00022Er 1 C0 08 .DBYT 49160 +000230r 1 C0 09 .DBYT 49161 +000232r 1 C0 0A .DBYT 49162 +000234r 1 C0 0B .DBYT 49163 +000236r 1 C0 0C .DBYT 49164 +000238r 1 C0 0D .DBYT 49165 +00023Ar 1 C0 0E .DBYT 49166 +00023Cr 1 C0 0F .DBYT 49167 +00023Er 1 CF E1 .DBYT 53217 +000240r 1 CF E2 .DBYT 53218 +000242r 1 CF E3 .DBYT 53219 +000244r 1 CF E4 .DBYT 53220 +000246r 1 CF E5 .DBYT 53221 +000248r 1 CF E6 .DBYT 53222 +00024Ar 1 CF E7 .DBYT 53223 +00024Cr 1 CF E8 .DBYT 53224 +00024Er 1 CF E9 .DBYT 53225 +000250r 1 CF EA .DBYT 53226 +000252r 1 CF EB .DBYT 53227 +000254r 1 CF EC .DBYT 53228 +000256r 1 CF ED .DBYT 53229 +000258r 1 CF EE .DBYT 53230 +00025Ar 1 CF EF .DBYT 53231 +00025Cr 1 CF F0 .DBYT 53232 +00025Er 1 CF F1 .DBYT 53233 +000260r 1 CF F2 .DBYT 53234 +000262r 1 CF F3 .DBYT 53235 +000264r 1 CF F4 .DBYT 53236 +000266r 1 CF F5 .DBYT 53237 +000268r 1 CF F6 .DBYT 53238 +00026Ar 1 CF F7 .DBYT 53239 +00026Cr 1 CF F8 .DBYT 53240 +00026Er 1 CF F9 .DBYT 53241 +000270r 1 CF FA .DBYT 53242 +000272r 1 CF FB .DBYT 53243 +000274r 1 CF FC .DBYT 53244 +000276r 1 CF FD .DBYT 53245 +000278r 1 CF FE .DBYT 53246 +00027Ar 1 CF FF .DBYT 53247 +00027Cr 1 D0 00 .DBYT 53248 +00027Er 1 D0 01 .DBYT 53249 +000280r 1 D0 02 .DBYT 53250 +000282r 1 D0 03 .DBYT 53251 +000284r 1 D0 04 .DBYT 53252 +000286r 1 D0 05 .DBYT 53253 +000288r 1 D0 06 .DBYT 53254 +00028Ar 1 D0 07 .DBYT 53255 +00028Cr 1 D0 08 .DBYT 53256 +00028Er 1 D0 09 .DBYT 53257 +000290r 1 D0 0A .DBYT 53258 +000292r 1 D0 0B .DBYT 53259 +000294r 1 D0 0C .DBYT 53260 +000296r 1 D0 0D .DBYT 53261 +000298r 1 D0 0E .DBYT 53262 +00029Ar 1 D0 0F .DBYT 53263 +00029Cr 1 DF E1 .DBYT 57313 +00029Er 1 DF E2 .DBYT 57314 +0002A0r 1 DF E3 .DBYT 57315 +0002A2r 1 DF E4 .DBYT 57316 +0002A4r 1 DF E5 .DBYT 57317 +0002A6r 1 DF E6 .DBYT 57318 +0002A8r 1 DF E7 .DBYT 57319 +0002AAr 1 DF E8 .DBYT 57320 +0002ACr 1 DF E9 .DBYT 57321 +0002AEr 1 DF EA .DBYT 57322 +0002B0r 1 DF EB .DBYT 57323 +0002B2r 1 DF EC .DBYT 57324 +0002B4r 1 DF ED .DBYT 57325 +0002B6r 1 DF EE .DBYT 57326 +0002B8r 1 DF EF .DBYT 57327 +0002BAr 1 DF F0 .DBYT 57328 +0002BCr 1 DF F1 .DBYT 57329 +0002BEr 1 DF F2 .DBYT 57330 +0002C0r 1 DF F3 .DBYT 57331 +0002C2r 1 DF F4 .DBYT 57332 +0002C4r 1 DF F5 .DBYT 57333 +0002C6r 1 DF F6 .DBYT 57334 +0002C8r 1 DF F7 .DBYT 57335 +0002CAr 1 DF F8 .DBYT 57336 +0002CCr 1 DF F9 .DBYT 57337 +0002CEr 1 DF FA .DBYT 57338 +0002D0r 1 DF FB .DBYT 57339 +0002D2r 1 DF FC .DBYT 57340 +0002D4r 1 DF FD .DBYT 57341 +0002D6r 1 DF FE .DBYT 57342 +0002D8r 1 DF FF .DBYT 57343 +0002DAr 1 E0 00 .DBYT 57344 +0002DCr 1 E0 01 .DBYT 57345 +0002DEr 1 E0 02 .DBYT 57346 +0002E0r 1 E0 03 .DBYT 57347 +0002E2r 1 E0 04 .DBYT 57348 +0002E4r 1 E0 05 .DBYT 57349 +0002E6r 1 E0 06 .DBYT 57350 +0002E8r 1 E0 07 .DBYT 57351 +0002EAr 1 E0 08 .DBYT 57352 +0002ECr 1 E0 09 .DBYT 57353 +0002EEr 1 E0 0A .DBYT 57354 +0002F0r 1 E0 0B .DBYT 57355 +0002F2r 1 E0 0C .DBYT 57356 +0002F4r 1 E0 0D .DBYT 57357 +0002F6r 1 E0 0E .DBYT 57358 +0002F8r 1 E0 0F .DBYT 57359 +0002FAr 1 EF E1 .DBYT 61409 +0002FCr 1 EF E2 .DBYT 61410 +0002FEr 1 EF E3 .DBYT 61411 +000300r 1 EF E4 .DBYT 61412 +000302r 1 EF E5 .DBYT 61413 +000304r 1 EF E6 .DBYT 61414 +000306r 1 EF E7 .DBYT 61415 +000308r 1 EF E8 .DBYT 61416 +00030Ar 1 EF E9 .DBYT 61417 +00030Cr 1 EF EA .DBYT 61418 +00030Er 1 EF EB .DBYT 61419 +000310r 1 EF EC .DBYT 61420 +000312r 1 EF ED .DBYT 61421 +000314r 1 EF EE .DBYT 61422 +000316r 1 EF EF .DBYT 61423 +000318r 1 EF F0 .DBYT 61424 +00031Ar 1 EF F1 .DBYT 61425 +00031Cr 1 EF F2 .DBYT 61426 +00031Er 1 EF F3 .DBYT 61427 +000320r 1 EF F4 .DBYT 61428 +000322r 1 EF F5 .DBYT 61429 +000324r 1 EF F6 .DBYT 61430 +000326r 1 EF F7 .DBYT 61431 +000328r 1 EF F8 .DBYT 61432 +00032Ar 1 EF F9 .DBYT 61433 +00032Cr 1 EF FA .DBYT 61434 +00032Er 1 EF FB .DBYT 61435 +000330r 1 EF FC .DBYT 61436 +000332r 1 EF FD .DBYT 61437 +000334r 1 EF FE .DBYT 61438 +000336r 1 EF FF .DBYT 61439 +000338r 1 F0 00 .DBYT 61440 +00033Ar 1 F0 01 .DBYT 61441 +00033Cr 1 F0 02 .DBYT 61442 +00033Er 1 F0 03 .DBYT 61443 +000340r 1 F0 04 .DBYT 61444 +000342r 1 F0 05 .DBYT 61445 +000344r 1 F0 06 .DBYT 61446 +000346r 1 F0 07 .DBYT 61447 +000348r 1 F0 08 .DBYT 61448 +00034Ar 1 F0 09 .DBYT 61449 +00034Cr 1 F0 0A .DBYT 61450 +00034Er 1 F0 0B .DBYT 61451 +000350r 1 F0 0C .DBYT 61452 +000352r 1 F0 0D .DBYT 61453 +000354r 1 F0 0E .DBYT 61454 +000356r 1 F0 0F .DBYT 61455 +000358r 1 FF E1 .DBYT 65505 +00035Ar 1 FF E2 .DBYT 65506 +00035Cr 1 FF E3 .DBYT 65507 +00035Er 1 FF E4 .DBYT 65508 +000360r 1 FF E5 .DBYT 65509 +000362r 1 FF E6 .DBYT 65510 +000364r 1 FF E7 .DBYT 65511 +000366r 1 FF E8 .DBYT 65512 +000368r 1 FF E9 .DBYT 65513 +00036Ar 1 FF EA .DBYT 65514 +00036Cr 1 FF EB .DBYT 65515 +00036Er 1 FF EC .DBYT 65516 +000370r 1 FF ED .DBYT 65517 +000372r 1 FF EE .DBYT 65518 +000374r 1 FF EF .DBYT 65519 +000376r 1 FF F0 .DBYT 65520 +000378r 1 FF F1 .DBYT 65521 +00037Ar 1 FF F2 .DBYT 65522 +00037Cr 1 FF F3 .DBYT 65523 +00037Er 1 FF F4 .DBYT 65524 +000380r 1 FF F5 .DBYT 65525 +000382r 1 FF F6 .DBYT 65526 +000384r 1 FF F7 .DBYT 65527 +000386r 1 FF F8 .DBYT 65528 +000388r 1 FF F9 .DBYT 65529 +00038Ar 1 FF FA .DBYT 65530 +00038Cr 1 FF FB .DBYT 65531 +00038Er 1 FF FC .DBYT 65532 +000390r 1 FF FD .DBYT 65533 +000392r 1 FF FE .DBYT 65534 +000394r 1 FF FF .DBYT 65535 +000396r 1 +000396r 1 ; lower case pseudo-op +000396r 1 00 00 .dbyt 0 +000398r 1 00 01 .dbyt 1 +00039Ar 1 00 02 .dbyt 2 +00039Cr 1 00 03 .dbyt 3 +00039Er 1 00 04 .dbyt 4 +0003A0r 1 00 05 .dbyt 5 +0003A2r 1 00 06 .dbyt 6 +0003A4r 1 00 07 .dbyt 7 +0003A6r 1 00 08 .dbyt 8 +0003A8r 1 00 09 .dbyt 9 +0003AAr 1 00 0A .dbyt 10 +0003ACr 1 00 0B .dbyt 11 +0003AEr 1 00 0C .dbyt 12 +0003B0r 1 00 0D .dbyt 13 +0003B2r 1 00 0E .dbyt 14 +0003B4r 1 00 0F .dbyt 15 +0003B6r 1 00 10 .dbyt 16 +0003B8r 1 00 11 .dbyt 17 +0003BAr 1 00 12 .dbyt 18 +0003BCr 1 00 13 .dbyt 19 +0003BEr 1 00 70 .dbyt 112 +0003C0r 1 00 71 .dbyt 113 +0003C2r 1 00 72 .dbyt 114 +0003C4r 1 00 73 .dbyt 115 +0003C6r 1 00 74 .dbyt 116 +0003C8r 1 00 75 .dbyt 117 +0003CAr 1 00 76 .dbyt 118 +0003CCr 1 00 77 .dbyt 119 +0003CEr 1 00 78 .dbyt 120 +0003D0r 1 00 79 .dbyt 121 +0003D2r 1 00 7A .dbyt 122 +0003D4r 1 00 7B .dbyt 123 +0003D6r 1 00 7C .dbyt 124 +0003D8r 1 00 7D .dbyt 125 +0003DAr 1 00 7E .dbyt 126 +0003DCr 1 00 7F .dbyt 127 +0003DEr 1 00 80 .dbyt 128 +0003E0r 1 00 81 .dbyt 129 +0003E2r 1 00 82 .dbyt 130 +0003E4r 1 00 83 .dbyt 131 +0003E6r 1 00 84 .dbyt 132 +0003E8r 1 00 85 .dbyt 133 +0003EAr 1 00 86 .dbyt 134 +0003ECr 1 00 F0 .dbyt 240 +0003EEr 1 00 F1 .dbyt 241 +0003F0r 1 00 F2 .dbyt 242 +0003F2r 1 00 F3 .dbyt 243 +0003F4r 1 00 F4 .dbyt 244 +0003F6r 1 00 F5 .dbyt 245 +0003F8r 1 00 F6 .dbyt 246 +0003FAr 1 00 F7 .dbyt 247 +0003FCr 1 00 F8 .dbyt 248 +0003FEr 1 00 F9 .dbyt 249 +000400r 1 00 FA .dbyt 250 +000402r 1 00 FB .dbyt 251 +000404r 1 00 FC .dbyt 252 +000406r 1 00 FD .dbyt 253 +000408r 1 00 FE .dbyt 254 +00040Ar 1 00 FF .dbyt 255 +00040Cr 1 01 00 .dbyt 256 +00040Er 1 01 01 .dbyt 257 +000410r 1 01 02 .dbyt 258 +000412r 1 01 03 .dbyt 259 +000414r 1 0F D2 .dbyt 4050 +000416r 1 0F D3 .dbyt 4051 +000418r 1 0F D4 .dbyt 4052 +00041Ar 1 0F D5 .dbyt 4053 +00041Cr 1 0F D6 .dbyt 4054 +00041Er 1 0F D7 .dbyt 4055 +000420r 1 0F D8 .dbyt 4056 +000422r 1 0F D9 .dbyt 4057 +000424r 1 0F DA .dbyt 4058 +000426r 1 0F DB .dbyt 4059 +000428r 1 0F DC .dbyt 4060 +00042Ar 1 0F DD .dbyt 4061 +00042Cr 1 0F DE .dbyt 4062 +00042Er 1 0F DF .dbyt 4063 +000430r 1 0F E0 .dbyt 4064 +000432r 1 0F E1 .dbyt 4065 +000434r 1 0F E2 .dbyt 4066 +000436r 1 0F E3 .dbyt 4067 +000438r 1 0F E4 .dbyt 4068 +00043Ar 1 0F E5 .dbyt 4069 +00043Cr 1 0F E6 .dbyt 4070 +00043Er 1 0F E7 .dbyt 4071 +000440r 1 0F E8 .dbyt 4072 +000442r 1 0F E9 .dbyt 4073 +000444r 1 0F EA .dbyt 4074 +000446r 1 0F EB .dbyt 4075 +000448r 1 0F EC .dbyt 4076 +00044Ar 1 0F ED .dbyt 4077 +00044Cr 1 0F EE .dbyt 4078 +00044Er 1 0F EF .dbyt 4079 +000450r 1 0F F0 .dbyt 4080 +000452r 1 0F F1 .dbyt 4081 +000454r 1 0F F2 .dbyt 4082 +000456r 1 0F F3 .dbyt 4083 +000458r 1 0F F4 .dbyt 4084 +00045Ar 1 0F F5 .dbyt 4085 +00045Cr 1 0F F6 .dbyt 4086 +00045Er 1 0F F7 .dbyt 4087 +000460r 1 0F F8 .dbyt 4088 +000462r 1 0F F9 .dbyt 4089 +000464r 1 0F FA .dbyt 4090 +000466r 1 0F FB .dbyt 4091 +000468r 1 0F FC .dbyt 4092 +00046Ar 1 0F FD .dbyt 4093 +00046Cr 1 0F FE .dbyt 4094 +00046Er 1 0F FF .dbyt 4095 +000470r 1 10 00 .dbyt 4096 +000472r 1 10 01 .dbyt 4097 +000474r 1 10 02 .dbyt 4098 +000476r 1 10 03 .dbyt 4099 +000478r 1 10 04 .dbyt 4100 +00047Ar 1 10 05 .dbyt 4101 +00047Cr 1 10 06 .dbyt 4102 +00047Er 1 10 07 .dbyt 4103 +000480r 1 10 08 .dbyt 4104 +000482r 1 7F F0 .dbyt 32752 +000484r 1 7F F1 .dbyt 32753 +000486r 1 7F F2 .dbyt 32754 +000488r 1 7F F3 .dbyt 32755 +00048Ar 1 7F F4 .dbyt 32756 +00048Cr 1 7F F5 .dbyt 32757 +00048Er 1 7F F6 .dbyt 32758 +000490r 1 7F F7 .dbyt 32759 +000492r 1 7F F8 .dbyt 32760 +000494r 1 7F F9 .dbyt 32761 +000496r 1 7F FA .dbyt 32762 +000498r 1 7F FB .dbyt 32763 +00049Ar 1 7F FC .dbyt 32764 +00049Cr 1 7F FD .dbyt 32765 +00049Er 1 7F FE .dbyt 32766 +0004A0r 1 7F FF .dbyt 32767 +0004A2r 1 80 00 .dbyt 32768 +0004A4r 1 80 01 .dbyt 32769 +0004A6r 1 80 02 .dbyt 32770 +0004A8r 1 80 03 .dbyt 32771 +0004AAr 1 80 04 .dbyt 32772 +0004ACr 1 80 05 .dbyt 32773 +0004AEr 1 80 06 .dbyt 32774 +0004B0r 1 80 07 .dbyt 32775 +0004B2r 1 80 08 .dbyt 32776 +0004B4r 1 80 09 .dbyt 32777 +0004B6r 1 80 0A .dbyt 32778 +0004B8r 1 80 0B .dbyt 32779 +0004BAr 1 9F E1 .dbyt 40929 +0004BCr 1 9F E2 .dbyt 40930 +0004BEr 1 9F E3 .dbyt 40931 +0004C0r 1 9F E4 .dbyt 40932 +0004C2r 1 9F E5 .dbyt 40933 +0004C4r 1 9F E6 .dbyt 40934 +0004C6r 1 9F E7 .dbyt 40935 +0004C8r 1 9F E8 .dbyt 40936 +0004CAr 1 9F E9 .dbyt 40937 +0004CCr 1 9F EA .dbyt 40938 +0004CEr 1 9F EB .dbyt 40939 +0004D0r 1 9F EC .dbyt 40940 +0004D2r 1 9F ED .dbyt 40941 +0004D4r 1 9F EE .dbyt 40942 +0004D6r 1 9F EF .dbyt 40943 +0004D8r 1 9F F0 .dbyt 40944 +0004DAr 1 9F F1 .dbyt 40945 +0004DCr 1 9F F2 .dbyt 40946 +0004DEr 1 9F F3 .dbyt 40947 +0004E0r 1 9F F4 .dbyt 40948 +0004E2r 1 9F F5 .dbyt 40949 +0004E4r 1 9F F6 .dbyt 40950 +0004E6r 1 9F F7 .dbyt 40951 +0004E8r 1 9F F8 .dbyt 40952 +0004EAr 1 9F F9 .dbyt 40953 +0004ECr 1 9F FA .dbyt 40954 +0004EEr 1 9F FB .dbyt 40955 +0004F0r 1 9F FC .dbyt 40956 +0004F2r 1 9F FD .dbyt 40957 +0004F4r 1 9F FE .dbyt 40958 +0004F6r 1 9F FF .dbyt 40959 +0004F8r 1 A0 00 .dbyt 40960 +0004FAr 1 A0 01 .dbyt 40961 +0004FCr 1 A0 02 .dbyt 40962 +0004FEr 1 A0 03 .dbyt 40963 +000500r 1 A0 04 .dbyt 40964 +000502r 1 A0 05 .dbyt 40965 +000504r 1 A0 06 .dbyt 40966 +000506r 1 A0 07 .dbyt 40967 +000508r 1 A0 08 .dbyt 40968 +00050Ar 1 A0 09 .dbyt 40969 +00050Cr 1 A0 0A .dbyt 40970 +00050Er 1 A0 0B .dbyt 40971 +000510r 1 A0 0C .dbyt 40972 +000512r 1 A0 0D .dbyt 40973 +000514r 1 A0 0E .dbyt 40974 +000516r 1 A0 0F .dbyt 40975 +000518r 1 AF E1 .dbyt 45025 +00051Ar 1 AF E2 .dbyt 45026 +00051Cr 1 AF E3 .dbyt 45027 +00051Er 1 AF E4 .dbyt 45028 +000520r 1 AF E5 .dbyt 45029 +000522r 1 AF E6 .dbyt 45030 +000524r 1 AF E7 .dbyt 45031 +000526r 1 AF E8 .dbyt 45032 +000528r 1 AF E9 .dbyt 45033 +00052Ar 1 AF EA .dbyt 45034 +00052Cr 1 AF EB .dbyt 45035 +00052Er 1 AF EC .dbyt 45036 +000530r 1 AF ED .dbyt 45037 +000532r 1 AF EE .dbyt 45038 +000534r 1 AF EF .dbyt 45039 +000536r 1 AF F0 .dbyt 45040 +000538r 1 AF F1 .dbyt 45041 +00053Ar 1 AF F2 .dbyt 45042 +00053Cr 1 AF F3 .dbyt 45043 +00053Er 1 AF F4 .dbyt 45044 +000540r 1 AF F5 .dbyt 45045 +000542r 1 AF F6 .dbyt 45046 +000544r 1 AF F7 .dbyt 45047 +000546r 1 AF F8 .dbyt 45048 +000548r 1 AF F9 .dbyt 45049 +00054Ar 1 AF FA .dbyt 45050 +00054Cr 1 AF FB .dbyt 45051 +00054Er 1 AF FC .dbyt 45052 +000550r 1 AF FD .dbyt 45053 +000552r 1 AF FE .dbyt 45054 +000554r 1 AF FF .dbyt 45055 +000556r 1 B0 00 .dbyt 45056 +000558r 1 B0 01 .dbyt 45057 +00055Ar 1 B0 02 .dbyt 45058 +00055Cr 1 B0 03 .dbyt 45059 +00055Er 1 B0 04 .dbyt 45060 +000560r 1 B0 05 .dbyt 45061 +000562r 1 B0 06 .dbyt 45062 +000564r 1 B0 07 .dbyt 45063 +000566r 1 B0 08 .dbyt 45064 +000568r 1 B0 09 .dbyt 45065 +00056Ar 1 B0 0A .dbyt 45066 +00056Cr 1 B0 0B .dbyt 45067 +00056Er 1 B0 0C .dbyt 45068 +000570r 1 B0 0D .dbyt 45069 +000572r 1 B0 0E .dbyt 45070 +000574r 1 B0 0F .dbyt 45071 +000576r 1 BF E1 .dbyt 49121 +000578r 1 BF E2 .dbyt 49122 +00057Ar 1 BF E3 .dbyt 49123 +00057Cr 1 BF E4 .dbyt 49124 +00057Er 1 BF E5 .dbyt 49125 +000580r 1 BF E6 .dbyt 49126 +000582r 1 BF E7 .dbyt 49127 +000584r 1 BF E8 .dbyt 49128 +000586r 1 BF E9 .dbyt 49129 +000588r 1 BF EA .dbyt 49130 +00058Ar 1 BF EB .dbyt 49131 +00058Cr 1 BF EC .dbyt 49132 +00058Er 1 BF ED .dbyt 49133 +000590r 1 BF EE .dbyt 49134 +000592r 1 BF EF .dbyt 49135 +000594r 1 BF F0 .dbyt 49136 +000596r 1 BF F1 .dbyt 49137 +000598r 1 BF F2 .dbyt 49138 +00059Ar 1 BF F3 .dbyt 49139 +00059Cr 1 BF F4 .dbyt 49140 +00059Er 1 BF F5 .dbyt 49141 +0005A0r 1 BF F6 .dbyt 49142 +0005A2r 1 BF F7 .dbyt 49143 +0005A4r 1 BF F8 .dbyt 49144 +0005A6r 1 BF F9 .dbyt 49145 +0005A8r 1 BF FA .dbyt 49146 +0005AAr 1 BF FB .dbyt 49147 +0005ACr 1 BF FC .dbyt 49148 +0005AEr 1 BF FD .dbyt 49149 +0005B0r 1 BF FE .dbyt 49150 +0005B2r 1 BF FF .dbyt 49151 +0005B4r 1 C0 00 .dbyt 49152 +0005B6r 1 C0 01 .dbyt 49153 +0005B8r 1 C0 02 .dbyt 49154 +0005BAr 1 C0 03 .dbyt 49155 +0005BCr 1 C0 04 .dbyt 49156 +0005BEr 1 C0 05 .dbyt 49157 +0005C0r 1 C0 06 .dbyt 49158 +0005C2r 1 C0 07 .dbyt 49159 +0005C4r 1 C0 08 .dbyt 49160 +0005C6r 1 C0 09 .dbyt 49161 +0005C8r 1 C0 0A .dbyt 49162 +0005CAr 1 C0 0B .dbyt 49163 +0005CCr 1 C0 0C .dbyt 49164 +0005CEr 1 C0 0D .dbyt 49165 +0005D0r 1 C0 0E .dbyt 49166 +0005D2r 1 C0 0F .dbyt 49167 +0005D4r 1 CF E1 .dbyt 53217 +0005D6r 1 CF E2 .dbyt 53218 +0005D8r 1 CF E3 .dbyt 53219 +0005DAr 1 CF E4 .dbyt 53220 +0005DCr 1 CF E5 .dbyt 53221 +0005DEr 1 CF E6 .dbyt 53222 +0005E0r 1 CF E7 .dbyt 53223 +0005E2r 1 CF E8 .dbyt 53224 +0005E4r 1 CF E9 .dbyt 53225 +0005E6r 1 CF EA .dbyt 53226 +0005E8r 1 CF EB .dbyt 53227 +0005EAr 1 CF EC .dbyt 53228 +0005ECr 1 CF ED .dbyt 53229 +0005EEr 1 CF EE .dbyt 53230 +0005F0r 1 CF EF .dbyt 53231 +0005F2r 1 CF F0 .dbyt 53232 +0005F4r 1 CF F1 .dbyt 53233 +0005F6r 1 CF F2 .dbyt 53234 +0005F8r 1 CF F3 .dbyt 53235 +0005FAr 1 CF F4 .dbyt 53236 +0005FCr 1 CF F5 .dbyt 53237 +0005FEr 1 CF F6 .dbyt 53238 +000600r 1 CF F7 .dbyt 53239 +000602r 1 CF F8 .dbyt 53240 +000604r 1 CF F9 .dbyt 53241 +000606r 1 CF FA .dbyt 53242 +000608r 1 CF FB .dbyt 53243 +00060Ar 1 CF FC .dbyt 53244 +00060Cr 1 CF FD .dbyt 53245 +00060Er 1 CF FE .dbyt 53246 +000610r 1 CF FF .dbyt 53247 +000612r 1 D0 00 .dbyt 53248 +000614r 1 D0 01 .dbyt 53249 +000616r 1 D0 02 .dbyt 53250 +000618r 1 D0 03 .dbyt 53251 +00061Ar 1 D0 04 .dbyt 53252 +00061Cr 1 D0 05 .dbyt 53253 +00061Er 1 D0 06 .dbyt 53254 +000620r 1 D0 07 .dbyt 53255 +000622r 1 D0 08 .dbyt 53256 +000624r 1 D0 09 .dbyt 53257 +000626r 1 D0 0A .dbyt 53258 +000628r 1 D0 0B .dbyt 53259 +00062Ar 1 D0 0C .dbyt 53260 +00062Cr 1 D0 0D .dbyt 53261 +00062Er 1 D0 0E .dbyt 53262 +000630r 1 D0 0F .dbyt 53263 +000632r 1 DF E1 .dbyt 57313 +000634r 1 DF E2 .dbyt 57314 +000636r 1 DF E3 .dbyt 57315 +000638r 1 DF E4 .dbyt 57316 +00063Ar 1 DF E5 .dbyt 57317 +00063Cr 1 DF E6 .dbyt 57318 +00063Er 1 DF E7 .dbyt 57319 +000640r 1 DF E8 .dbyt 57320 +000642r 1 DF E9 .dbyt 57321 +000644r 1 DF EA .dbyt 57322 +000646r 1 DF EB .dbyt 57323 +000648r 1 DF EC .dbyt 57324 +00064Ar 1 DF ED .dbyt 57325 +00064Cr 1 DF EE .dbyt 57326 +00064Er 1 DF EF .dbyt 57327 +000650r 1 DF F0 .dbyt 57328 +000652r 1 DF F1 .dbyt 57329 +000654r 1 DF F2 .dbyt 57330 +000656r 1 DF F3 .dbyt 57331 +000658r 1 DF F4 .dbyt 57332 +00065Ar 1 DF F5 .dbyt 57333 +00065Cr 1 DF F6 .dbyt 57334 +00065Er 1 DF F7 .dbyt 57335 +000660r 1 DF F8 .dbyt 57336 +000662r 1 DF F9 .dbyt 57337 +000664r 1 DF FA .dbyt 57338 +000666r 1 DF FB .dbyt 57339 +000668r 1 DF FC .dbyt 57340 +00066Ar 1 DF FD .dbyt 57341 +00066Cr 1 DF FE .dbyt 57342 +00066Er 1 DF FF .dbyt 57343 +000670r 1 E0 00 .dbyt 57344 +000672r 1 E0 01 .dbyt 57345 +000674r 1 E0 02 .dbyt 57346 +000676r 1 E0 03 .dbyt 57347 +000678r 1 E0 04 .dbyt 57348 +00067Ar 1 E0 05 .dbyt 57349 +00067Cr 1 E0 06 .dbyt 57350 +00067Er 1 E0 07 .dbyt 57351 +000680r 1 E0 08 .dbyt 57352 +000682r 1 E0 09 .dbyt 57353 +000684r 1 E0 0A .dbyt 57354 +000686r 1 E0 0B .dbyt 57355 +000688r 1 E0 0C .dbyt 57356 +00068Ar 1 E0 0D .dbyt 57357 +00068Cr 1 E0 0E .dbyt 57358 +00068Er 1 E0 0F .dbyt 57359 +000690r 1 EF E1 .dbyt 61409 +000692r 1 EF E2 .dbyt 61410 +000694r 1 EF E3 .dbyt 61411 +000696r 1 EF E4 .dbyt 61412 +000698r 1 EF E5 .dbyt 61413 +00069Ar 1 EF E6 .dbyt 61414 +00069Cr 1 EF E7 .dbyt 61415 +00069Er 1 EF E8 .dbyt 61416 +0006A0r 1 EF E9 .dbyt 61417 +0006A2r 1 EF EA .dbyt 61418 +0006A4r 1 EF EB .dbyt 61419 +0006A6r 1 EF EC .dbyt 61420 +0006A8r 1 EF ED .dbyt 61421 +0006AAr 1 EF EE .dbyt 61422 +0006ACr 1 EF EF .dbyt 61423 +0006AEr 1 EF F0 .dbyt 61424 +0006B0r 1 EF F1 .dbyt 61425 +0006B2r 1 EF F2 .dbyt 61426 +0006B4r 1 EF F3 .dbyt 61427 +0006B6r 1 EF F4 .dbyt 61428 +0006B8r 1 EF F5 .dbyt 61429 +0006BAr 1 EF F6 .dbyt 61430 +0006BCr 1 EF F7 .dbyt 61431 +0006BEr 1 EF F8 .dbyt 61432 +0006C0r 1 EF F9 .dbyt 61433 +0006C2r 1 EF FA .dbyt 61434 +0006C4r 1 EF FB .dbyt 61435 +0006C6r 1 EF FC .dbyt 61436 +0006C8r 1 EF FD .dbyt 61437 +0006CAr 1 EF FE .dbyt 61438 +0006CCr 1 EF FF .dbyt 61439 +0006CEr 1 F0 00 .dbyt 61440 +0006D0r 1 F0 01 .dbyt 61441 +0006D2r 1 F0 02 .dbyt 61442 +0006D4r 1 F0 03 .dbyt 61443 +0006D6r 1 F0 04 .dbyt 61444 +0006D8r 1 F0 05 .dbyt 61445 +0006DAr 1 F0 06 .dbyt 61446 +0006DCr 1 F0 07 .dbyt 61447 +0006DEr 1 F0 08 .dbyt 61448 +0006E0r 1 F0 09 .dbyt 61449 +0006E2r 1 F0 0A .dbyt 61450 +0006E4r 1 F0 0B .dbyt 61451 +0006E6r 1 F0 0C .dbyt 61452 +0006E8r 1 F0 0D .dbyt 61453 +0006EAr 1 F0 0E .dbyt 61454 +0006ECr 1 F0 0F .dbyt 61455 +0006EEr 1 FF E1 .dbyt 65505 +0006F0r 1 FF E2 .dbyt 65506 +0006F2r 1 FF E3 .dbyt 65507 +0006F4r 1 FF E4 .dbyt 65508 +0006F6r 1 FF E5 .dbyt 65509 +0006F8r 1 FF E6 .dbyt 65510 +0006FAr 1 FF E7 .dbyt 65511 +0006FCr 1 FF E8 .dbyt 65512 +0006FEr 1 FF E9 .dbyt 65513 +000700r 1 FF EA .dbyt 65514 +000702r 1 FF EB .dbyt 65515 +000704r 1 FF EC .dbyt 65516 +000706r 1 FF ED .dbyt 65517 +000708r 1 FF EE .dbyt 65518 +00070Ar 1 FF EF .dbyt 65519 +00070Cr 1 FF F0 .dbyt 65520 +00070Er 1 FF F1 .dbyt 65521 +000710r 1 FF F2 .dbyt 65522 +000712r 1 FF F3 .dbyt 65523 +000714r 1 FF F4 .dbyt 65524 +000716r 1 FF F5 .dbyt 65525 +000718r 1 FF F6 .dbyt 65526 +00071Ar 1 FF F7 .dbyt 65527 +00071Cr 1 FF F8 .dbyt 65528 +00071Er 1 FF F9 .dbyt 65529 +000720r 1 FF FA .dbyt 65530 +000722r 1 FF FB .dbyt 65531 +000724r 1 FF FC .dbyt 65532 +000726r 1 FF FD .dbyt 65533 +000728r 1 FF FE .dbyt 65534 +00072Ar 1 FF FF .dbyt 65535 +00072Cr 1 +00072Cr 1 ; hex values +00072Cr 1 00 00 .dbyt $0 +00072Er 1 00 01 .dbyt $1 +000730r 1 00 02 .dbyt $2 +000732r 1 00 03 .dbyt $3 +000734r 1 00 04 .dbyt $4 +000736r 1 00 05 .dbyt $5 +000738r 1 00 06 .dbyt $6 +00073Ar 1 00 07 .dbyt $7 +00073Cr 1 00 08 .dbyt $8 +00073Er 1 00 09 .dbyt $9 +000740r 1 00 0A .dbyt $a +000742r 1 00 0B .dbyt $b +000744r 1 00 0C .dbyt $c +000746r 1 00 0D .dbyt $d +000748r 1 00 0E .dbyt $e +00074Ar 1 00 0F .dbyt $f +00074Cr 1 00 10 .dbyt $10 +00074Er 1 00 11 .dbyt $11 +000750r 1 00 12 .dbyt $12 +000752r 1 00 13 .dbyt $13 +000754r 1 00 70 .dbyt $70 +000756r 1 00 71 .dbyt $71 +000758r 1 00 72 .dbyt $72 +00075Ar 1 00 73 .dbyt $73 +00075Cr 1 00 74 .dbyt $74 +00075Er 1 00 75 .dbyt $75 +000760r 1 00 76 .dbyt $76 +000762r 1 00 77 .dbyt $77 +000764r 1 00 78 .dbyt $78 +000766r 1 00 79 .dbyt $79 +000768r 1 00 7A .dbyt $7a +00076Ar 1 00 7B .dbyt $7b +00076Cr 1 00 7C .dbyt $7c +00076Er 1 00 7D .dbyt $7d +000770r 1 00 7E .dbyt $7e +000772r 1 00 7F .dbyt $7f +000774r 1 00 80 .dbyt $80 +000776r 1 00 81 .dbyt $81 +000778r 1 00 82 .dbyt $82 +00077Ar 1 00 83 .dbyt $83 +00077Cr 1 00 84 .dbyt $84 +00077Er 1 00 85 .dbyt $85 +000780r 1 00 86 .dbyt $86 +000782r 1 00 F0 .dbyt $f0 +000784r 1 00 F1 .dbyt $f1 +000786r 1 00 F2 .dbyt $f2 +000788r 1 00 F3 .dbyt $f3 +00078Ar 1 00 F4 .dbyt $f4 +00078Cr 1 00 F5 .dbyt $f5 +00078Er 1 00 F6 .dbyt $f6 +000790r 1 00 F7 .dbyt $f7 +000792r 1 00 F8 .dbyt $f8 +000794r 1 00 F9 .dbyt $f9 +000796r 1 00 FA .dbyt $fa +000798r 1 00 FB .dbyt $fb +00079Ar 1 00 FC .dbyt $fc +00079Cr 1 00 FD .dbyt $fd +00079Er 1 00 FE .dbyt $fe +0007A0r 1 00 FF .dbyt $ff +0007A2r 1 01 00 .dbyt $100 +0007A4r 1 01 01 .dbyt $101 +0007A6r 1 01 02 .dbyt $102 +0007A8r 1 01 03 .dbyt $103 +0007AAr 1 0F D2 .dbyt $fd2 +0007ACr 1 0F D3 .dbyt $fd3 +0007AEr 1 0F D4 .dbyt $fd4 +0007B0r 1 0F D5 .dbyt $fd5 +0007B2r 1 0F D6 .dbyt $fd6 +0007B4r 1 0F D7 .dbyt $fd7 +0007B6r 1 0F D8 .dbyt $fd8 +0007B8r 1 0F D9 .dbyt $fd9 +0007BAr 1 0F DA .dbyt $fda +0007BCr 1 0F DB .dbyt $fdb +0007BEr 1 0F DC .dbyt $fdc +0007C0r 1 0F DD .dbyt $fdd +0007C2r 1 0F DE .dbyt $fde +0007C4r 1 0F DF .dbyt $fdf +0007C6r 1 0F E0 .dbyt $fe0 +0007C8r 1 0F E1 .dbyt $fe1 +0007CAr 1 0F E2 .dbyt $fe2 +0007CCr 1 0F E3 .dbyt $fe3 +0007CEr 1 0F E4 .dbyt $fe4 +0007D0r 1 0F E5 .dbyt $fe5 +0007D2r 1 0F E6 .dbyt $fe6 +0007D4r 1 0F E7 .dbyt $fe7 +0007D6r 1 0F E8 .dbyt $fe8 +0007D8r 1 0F E9 .dbyt $fe9 +0007DAr 1 0F EA .dbyt $fea +0007DCr 1 0F EB .dbyt $feb +0007DEr 1 0F EC .dbyt $fec +0007E0r 1 0F ED .dbyt $fed +0007E2r 1 0F EE .dbyt $fee +0007E4r 1 0F EF .dbyt $fef +0007E6r 1 0F F0 .dbyt $ff0 +0007E8r 1 0F F1 .dbyt $ff1 +0007EAr 1 0F F2 .dbyt $ff2 +0007ECr 1 0F F3 .dbyt $ff3 +0007EEr 1 0F F4 .dbyt $ff4 +0007F0r 1 0F F5 .dbyt $ff5 +0007F2r 1 0F F6 .dbyt $ff6 +0007F4r 1 0F F7 .dbyt $ff7 +0007F6r 1 0F F8 .dbyt $ff8 +0007F8r 1 0F F9 .dbyt $ff9 +0007FAr 1 0F FA .dbyt $ffa +0007FCr 1 0F FB .dbyt $ffb +0007FEr 1 0F FC .dbyt $ffc +000800r 1 0F FD .dbyt $ffd +000802r 1 0F FE .dbyt $ffe +000804r 1 0F FF .dbyt $fff +000806r 1 10 00 .dbyt $1000 +000808r 1 10 01 .dbyt $1001 +00080Ar 1 10 02 .dbyt $1002 +00080Cr 1 10 03 .dbyt $1003 +00080Er 1 10 04 .dbyt $1004 +000810r 1 10 05 .dbyt $1005 +000812r 1 10 06 .dbyt $1006 +000814r 1 10 07 .dbyt $1007 +000816r 1 10 08 .dbyt $1008 +000818r 1 7F F0 .dbyt $7ff0 +00081Ar 1 7F F1 .dbyt $7ff1 +00081Cr 1 7F F2 .dbyt $7ff2 +00081Er 1 7F F3 .dbyt $7ff3 +000820r 1 7F F4 .dbyt $7ff4 +000822r 1 7F F5 .dbyt $7ff5 +000824r 1 7F F6 .dbyt $7ff6 +000826r 1 7F F7 .dbyt $7ff7 +000828r 1 7F F8 .dbyt $7ff8 +00082Ar 1 7F F9 .dbyt $7ff9 +00082Cr 1 7F FA .dbyt $7ffa +00082Er 1 7F FB .dbyt $7ffb +000830r 1 7F FC .dbyt $7ffc +000832r 1 7F FD .dbyt $7ffd +000834r 1 7F FE .dbyt $7ffe +000836r 1 7F FF .dbyt $7fff +000838r 1 80 00 .dbyt $8000 +00083Ar 1 80 01 .dbyt $8001 +00083Cr 1 80 02 .dbyt $8002 +00083Er 1 80 03 .dbyt $8003 +000840r 1 80 04 .dbyt $8004 +000842r 1 80 05 .dbyt $8005 +000844r 1 80 06 .dbyt $8006 +000846r 1 80 07 .dbyt $8007 +000848r 1 80 08 .dbyt $8008 +00084Ar 1 80 09 .dbyt $8009 +00084Cr 1 80 0A .dbyt $800a +00084Er 1 80 0B .dbyt $800b +000850r 1 9F E1 .dbyt $9fe1 +000852r 1 9F E2 .dbyt $9fe2 +000854r 1 9F E3 .dbyt $9fe3 +000856r 1 9F E4 .dbyt $9fe4 +000858r 1 9F E5 .dbyt $9fe5 +00085Ar 1 9F E6 .dbyt $9fe6 +00085Cr 1 9F E7 .dbyt $9fe7 +00085Er 1 9F E8 .dbyt $9fe8 +000860r 1 9F E9 .dbyt $9fe9 +000862r 1 9F EA .dbyt $9fea +000864r 1 9F EB .dbyt $9feb +000866r 1 9F EC .dbyt $9fec +000868r 1 9F ED .dbyt $9fed +00086Ar 1 9F EE .dbyt $9fee +00086Cr 1 9F EF .dbyt $9fef +00086Er 1 9F F0 .dbyt $9ff0 +000870r 1 9F F1 .dbyt $9ff1 +000872r 1 9F F2 .dbyt $9ff2 +000874r 1 9F F3 .dbyt $9ff3 +000876r 1 9F F4 .dbyt $9ff4 +000878r 1 9F F5 .dbyt $9ff5 +00087Ar 1 9F F6 .dbyt $9ff6 +00087Cr 1 9F F7 .dbyt $9ff7 +00087Er 1 9F F8 .dbyt $9ff8 +000880r 1 9F F9 .dbyt $9ff9 +000882r 1 9F FA .dbyt $9ffa +000884r 1 9F FB .dbyt $9ffb +000886r 1 9F FC .dbyt $9ffc +000888r 1 9F FD .dbyt $9ffd +00088Ar 1 9F FE .dbyt $9ffe +00088Cr 1 9F FF .dbyt $9fff +00088Er 1 A0 00 .dbyt $a000 +000890r 1 A0 01 .dbyt $a001 +000892r 1 A0 02 .dbyt $a002 +000894r 1 A0 03 .dbyt $a003 +000896r 1 A0 04 .dbyt $a004 +000898r 1 A0 05 .dbyt $a005 +00089Ar 1 A0 06 .dbyt $a006 +00089Cr 1 A0 07 .dbyt $a007 +00089Er 1 A0 08 .dbyt $a008 +0008A0r 1 A0 09 .dbyt $a009 +0008A2r 1 A0 0A .dbyt $a00a +0008A4r 1 A0 0B .dbyt $a00b +0008A6r 1 A0 0C .dbyt $a00c +0008A8r 1 A0 0D .dbyt $a00d +0008AAr 1 A0 0E .dbyt $a00e +0008ACr 1 A0 0F .dbyt $a00f +0008AEr 1 AF E1 .dbyt $afe1 +0008B0r 1 AF E2 .dbyt $afe2 +0008B2r 1 AF E3 .dbyt $afe3 +0008B4r 1 AF E4 .dbyt $afe4 +0008B6r 1 AF E5 .dbyt $afe5 +0008B8r 1 AF E6 .dbyt $afe6 +0008BAr 1 AF E7 .dbyt $afe7 +0008BCr 1 AF E8 .dbyt $afe8 +0008BEr 1 AF E9 .dbyt $afe9 +0008C0r 1 AF EA .dbyt $afea +0008C2r 1 AF EB .dbyt $afeb +0008C4r 1 AF EC .dbyt $afec +0008C6r 1 AF ED .dbyt $afed +0008C8r 1 AF EE .dbyt $afee +0008CAr 1 AF EF .dbyt $afef +0008CCr 1 AF F0 .dbyt $aff0 +0008CEr 1 AF F1 .dbyt $aff1 +0008D0r 1 AF F2 .dbyt $aff2 +0008D2r 1 AF F3 .dbyt $aff3 +0008D4r 1 AF F4 .dbyt $aff4 +0008D6r 1 AF F5 .dbyt $aff5 +0008D8r 1 AF F6 .dbyt $aff6 +0008DAr 1 AF F7 .dbyt $aff7 +0008DCr 1 AF F8 .dbyt $aff8 +0008DEr 1 AF F9 .dbyt $aff9 +0008E0r 1 AF FA .dbyt $affa +0008E2r 1 AF FB .dbyt $affb +0008E4r 1 AF FC .dbyt $affc +0008E6r 1 AF FD .dbyt $affd +0008E8r 1 AF FE .dbyt $affe +0008EAr 1 AF FF .dbyt $afff +0008ECr 1 B0 00 .dbyt $b000 +0008EEr 1 B0 01 .dbyt $b001 +0008F0r 1 B0 02 .dbyt $b002 +0008F2r 1 B0 03 .dbyt $b003 +0008F4r 1 B0 04 .dbyt $b004 +0008F6r 1 B0 05 .dbyt $b005 +0008F8r 1 B0 06 .dbyt $b006 +0008FAr 1 B0 07 .dbyt $b007 +0008FCr 1 B0 08 .dbyt $b008 +0008FEr 1 B0 09 .dbyt $b009 +000900r 1 B0 0A .dbyt $b00a +000902r 1 B0 0B .dbyt $b00b +000904r 1 B0 0C .dbyt $b00c +000906r 1 B0 0D .dbyt $b00d +000908r 1 B0 0E .dbyt $b00e +00090Ar 1 B0 0F .dbyt $b00f +00090Cr 1 BF E1 .dbyt $bfe1 +00090Er 1 BF E2 .dbyt $bfe2 +000910r 1 BF E3 .dbyt $bfe3 +000912r 1 BF E4 .dbyt $bfe4 +000914r 1 BF E5 .dbyt $bfe5 +000916r 1 BF E6 .dbyt $bfe6 +000918r 1 BF E7 .dbyt $bfe7 +00091Ar 1 BF E8 .dbyt $bfe8 +00091Cr 1 BF E9 .dbyt $bfe9 +00091Er 1 BF EA .dbyt $bfea +000920r 1 BF EB .dbyt $bfeb +000922r 1 BF EC .dbyt $bfec +000924r 1 BF ED .dbyt $bfed +000926r 1 BF EE .dbyt $bfee +000928r 1 BF EF .dbyt $bfef +00092Ar 1 BF F0 .dbyt $bff0 +00092Cr 1 BF F1 .dbyt $bff1 +00092Er 1 BF F2 .dbyt $bff2 +000930r 1 BF F3 .dbyt $bff3 +000932r 1 BF F4 .dbyt $bff4 +000934r 1 BF F5 .dbyt $bff5 +000936r 1 BF F6 .dbyt $bff6 +000938r 1 BF F7 .dbyt $bff7 +00093Ar 1 BF F8 .dbyt $bff8 +00093Cr 1 BF F9 .dbyt $bff9 +00093Er 1 BF FA .dbyt $bffa +000940r 1 BF FB .dbyt $bffb +000942r 1 BF FC .dbyt $bffc +000944r 1 BF FD .dbyt $bffd +000946r 1 BF FE .dbyt $bffe +000948r 1 BF FF .dbyt $bfff +00094Ar 1 C0 00 .dbyt $c000 +00094Cr 1 C0 01 .dbyt $c001 +00094Er 1 C0 02 .dbyt $c002 +000950r 1 C0 03 .dbyt $c003 +000952r 1 C0 04 .dbyt $c004 +000954r 1 C0 05 .dbyt $c005 +000956r 1 C0 06 .dbyt $c006 +000958r 1 C0 07 .dbyt $c007 +00095Ar 1 C0 08 .dbyt $c008 +00095Cr 1 C0 09 .dbyt $c009 +00095Er 1 C0 0A .dbyt $c00a +000960r 1 C0 0B .dbyt $c00b +000962r 1 C0 0C .dbyt $c00c +000964r 1 C0 0D .dbyt $c00d +000966r 1 C0 0E .dbyt $c00e +000968r 1 C0 0F .dbyt $c00f +00096Ar 1 CF E1 .dbyt $cfe1 +00096Cr 1 CF E2 .dbyt $cfe2 +00096Er 1 CF E3 .dbyt $cfe3 +000970r 1 CF E4 .dbyt $cfe4 +000972r 1 CF E5 .dbyt $cfe5 +000974r 1 CF E6 .dbyt $cfe6 +000976r 1 CF E7 .dbyt $cfe7 +000978r 1 CF E8 .dbyt $cfe8 +00097Ar 1 CF E9 .dbyt $cfe9 +00097Cr 1 CF EA .dbyt $cfea +00097Er 1 CF EB .dbyt $cfeb +000980r 1 CF EC .dbyt $cfec +000982r 1 CF ED .dbyt $cfed +000984r 1 CF EE .dbyt $cfee +000986r 1 CF EF .dbyt $cfef +000988r 1 CF F0 .dbyt $cff0 +00098Ar 1 CF F1 .dbyt $cff1 +00098Cr 1 CF F2 .dbyt $cff2 +00098Er 1 CF F3 .dbyt $cff3 +000990r 1 CF F4 .dbyt $cff4 +000992r 1 CF F5 .dbyt $cff5 +000994r 1 CF F6 .dbyt $cff6 +000996r 1 CF F7 .dbyt $cff7 +000998r 1 CF F8 .dbyt $cff8 +00099Ar 1 CF F9 .dbyt $cff9 +00099Cr 1 CF FA .dbyt $cffa +00099Er 1 CF FB .dbyt $cffb +0009A0r 1 CF FC .dbyt $cffc +0009A2r 1 CF FD .dbyt $cffd +0009A4r 1 CF FE .dbyt $cffe +0009A6r 1 CF FF .dbyt $cfff +0009A8r 1 D0 00 .dbyt $d000 +0009AAr 1 D0 01 .dbyt $d001 +0009ACr 1 D0 02 .dbyt $d002 +0009AEr 1 D0 03 .dbyt $d003 +0009B0r 1 D0 04 .dbyt $d004 +0009B2r 1 D0 05 .dbyt $d005 +0009B4r 1 D0 06 .dbyt $d006 +0009B6r 1 D0 07 .dbyt $d007 +0009B8r 1 D0 08 .dbyt $d008 +0009BAr 1 D0 09 .dbyt $d009 +0009BCr 1 D0 0A .dbyt $d00a +0009BEr 1 D0 0B .dbyt $d00b +0009C0r 1 D0 0C .dbyt $d00c +0009C2r 1 D0 0D .dbyt $d00d +0009C4r 1 D0 0E .dbyt $d00e +0009C6r 1 D0 0F .dbyt $d00f +0009C8r 1 DF E1 .dbyt $dfe1 +0009CAr 1 DF E2 .dbyt $dfe2 +0009CCr 1 DF E3 .dbyt $dfe3 +0009CEr 1 DF E4 .dbyt $dfe4 +0009D0r 1 DF E5 .dbyt $dfe5 +0009D2r 1 DF E6 .dbyt $dfe6 +0009D4r 1 DF E7 .dbyt $dfe7 +0009D6r 1 DF E8 .dbyt $dfe8 +0009D8r 1 DF E9 .dbyt $dfe9 +0009DAr 1 DF EA .dbyt $dfea +0009DCr 1 DF EB .dbyt $dfeb +0009DEr 1 DF EC .dbyt $dfec +0009E0r 1 DF ED .dbyt $dfed +0009E2r 1 DF EE .dbyt $dfee +0009E4r 1 DF EF .dbyt $dfef +0009E6r 1 DF F0 .dbyt $dff0 +0009E8r 1 DF F1 .dbyt $dff1 +0009EAr 1 DF F2 .dbyt $dff2 +0009ECr 1 DF F3 .dbyt $dff3 +0009EEr 1 DF F4 .dbyt $dff4 +0009F0r 1 DF F5 .dbyt $dff5 +0009F2r 1 DF F6 .dbyt $dff6 +0009F4r 1 DF F7 .dbyt $dff7 +0009F6r 1 DF F8 .dbyt $dff8 +0009F8r 1 DF F9 .dbyt $dff9 +0009FAr 1 DF FA .dbyt $dffa +0009FCr 1 DF FB .dbyt $dffb +0009FEr 1 DF FC .dbyt $dffc +000A00r 1 DF FD .dbyt $dffd +000A02r 1 DF FE .dbyt $dffe +000A04r 1 DF FF .dbyt $dfff +000A06r 1 E0 00 .dbyt $e000 +000A08r 1 E0 01 .dbyt $e001 +000A0Ar 1 E0 02 .dbyt $e002 +000A0Cr 1 E0 03 .dbyt $e003 +000A0Er 1 E0 04 .dbyt $e004 +000A10r 1 E0 05 .dbyt $e005 +000A12r 1 E0 06 .dbyt $e006 +000A14r 1 E0 07 .dbyt $e007 +000A16r 1 E0 08 .dbyt $e008 +000A18r 1 E0 09 .dbyt $e009 +000A1Ar 1 E0 0A .dbyt $e00a +000A1Cr 1 E0 0B .dbyt $e00b +000A1Er 1 E0 0C .dbyt $e00c +000A20r 1 E0 0D .dbyt $e00d +000A22r 1 E0 0E .dbyt $e00e +000A24r 1 E0 0F .dbyt $e00f +000A26r 1 EF E1 .dbyt $efe1 +000A28r 1 EF E2 .dbyt $efe2 +000A2Ar 1 EF E3 .dbyt $efe3 +000A2Cr 1 EF E4 .dbyt $efe4 +000A2Er 1 EF E5 .dbyt $efe5 +000A30r 1 EF E6 .dbyt $efe6 +000A32r 1 EF E7 .dbyt $efe7 +000A34r 1 EF E8 .dbyt $efe8 +000A36r 1 EF E9 .dbyt $efe9 +000A38r 1 EF EA .dbyt $efea +000A3Ar 1 EF EB .dbyt $efeb +000A3Cr 1 EF EC .dbyt $efec +000A3Er 1 EF ED .dbyt $efed +000A40r 1 EF EE .dbyt $efee +000A42r 1 EF EF .dbyt $efef +000A44r 1 EF F0 .dbyt $eff0 +000A46r 1 EF F1 .dbyt $eff1 +000A48r 1 EF F2 .dbyt $eff2 +000A4Ar 1 EF F3 .dbyt $eff3 +000A4Cr 1 EF F4 .dbyt $eff4 +000A4Er 1 EF F5 .dbyt $eff5 +000A50r 1 EF F6 .dbyt $eff6 +000A52r 1 EF F7 .dbyt $eff7 +000A54r 1 EF F8 .dbyt $eff8 +000A56r 1 EF F9 .dbyt $eff9 +000A58r 1 EF FA .dbyt $effa +000A5Ar 1 EF FB .dbyt $effb +000A5Cr 1 EF FC .dbyt $effc +000A5Er 1 EF FD .dbyt $effd +000A60r 1 EF FE .dbyt $effe +000A62r 1 EF FF .dbyt $efff +000A64r 1 F0 00 .dbyt $f000 +000A66r 1 F0 01 .dbyt $f001 +000A68r 1 F0 02 .dbyt $f002 +000A6Ar 1 F0 03 .dbyt $f003 +000A6Cr 1 F0 04 .dbyt $f004 +000A6Er 1 F0 05 .dbyt $f005 +000A70r 1 F0 06 .dbyt $f006 +000A72r 1 F0 07 .dbyt $f007 +000A74r 1 F0 08 .dbyt $f008 +000A76r 1 F0 09 .dbyt $f009 +000A78r 1 F0 0A .dbyt $f00a +000A7Ar 1 F0 0B .dbyt $f00b +000A7Cr 1 F0 0C .dbyt $f00c +000A7Er 1 F0 0D .dbyt $f00d +000A80r 1 F0 0E .dbyt $f00e +000A82r 1 F0 0F .dbyt $f00f +000A84r 1 FF E1 .dbyt $ffe1 +000A86r 1 FF E2 .dbyt $ffe2 +000A88r 1 FF E3 .dbyt $ffe3 +000A8Ar 1 FF E4 .dbyt $ffe4 +000A8Cr 1 FF E5 .dbyt $ffe5 +000A8Er 1 FF E6 .dbyt $ffe6 +000A90r 1 FF E7 .dbyt $ffe7 +000A92r 1 FF E8 .dbyt $ffe8 +000A94r 1 FF E9 .dbyt $ffe9 +000A96r 1 FF EA .dbyt $ffea +000A98r 1 FF EB .dbyt $ffeb +000A9Ar 1 FF EC .dbyt $ffec +000A9Cr 1 FF ED .dbyt $ffed +000A9Er 1 FF EE .dbyt $ffee +000AA0r 1 FF EF .dbyt $ffef +000AA2r 1 FF F0 .dbyt $fff0 +000AA4r 1 FF F1 .dbyt $fff1 +000AA6r 1 FF F2 .dbyt $fff2 +000AA8r 1 FF F3 .dbyt $fff3 +000AAAr 1 FF F4 .dbyt $fff4 +000AACr 1 FF F5 .dbyt $fff5 +000AAEr 1 FF F6 .dbyt $fff6 +000AB0r 1 FF F7 .dbyt $fff7 +000AB2r 1 FF F8 .dbyt $fff8 +000AB4r 1 FF F9 .dbyt $fff9 +000AB6r 1 FF FA .dbyt $fffa +000AB8r 1 FF FB .dbyt $fffb +000ABAr 1 FF FC .dbyt $fffc +000ABCr 1 FF FD .dbyt $fffd +000ABEr 1 FF FE .dbyt $fffe +000AC0r 1 FF FF .dbyt $ffff +000AC2r 1 +000AC2r 1 ; hex values, uppercase +000AC2r 1 00 00 .dbyt $0 +000AC4r 1 00 01 .dbyt $1 +000AC6r 1 00 02 .dbyt $2 +000AC8r 1 00 03 .dbyt $3 +000ACAr 1 00 04 .dbyt $4 +000ACCr 1 00 05 .dbyt $5 +000ACEr 1 00 06 .dbyt $6 +000AD0r 1 00 07 .dbyt $7 +000AD2r 1 00 08 .dbyt $8 +000AD4r 1 00 09 .dbyt $9 +000AD6r 1 00 0A .dbyt $A +000AD8r 1 00 0B .dbyt $B +000ADAr 1 00 0C .dbyt $C +000ADCr 1 00 0D .dbyt $D +000ADEr 1 00 0E .dbyt $E +000AE0r 1 00 0F .dbyt $F +000AE2r 1 00 10 .dbyt $10 +000AE4r 1 00 11 .dbyt $11 +000AE6r 1 00 12 .dbyt $12 +000AE8r 1 00 13 .dbyt $13 +000AEAr 1 00 70 .dbyt $70 +000AECr 1 00 71 .dbyt $71 +000AEEr 1 00 72 .dbyt $72 +000AF0r 1 00 73 .dbyt $73 +000AF2r 1 00 74 .dbyt $74 +000AF4r 1 00 75 .dbyt $75 +000AF6r 1 00 76 .dbyt $76 +000AF8r 1 00 77 .dbyt $77 +000AFAr 1 00 78 .dbyt $78 +000AFCr 1 00 79 .dbyt $79 +000AFEr 1 00 7A .dbyt $7A +000B00r 1 00 7B .dbyt $7B +000B02r 1 00 7C .dbyt $7C +000B04r 1 00 7D .dbyt $7D +000B06r 1 00 7E .dbyt $7E +000B08r 1 00 7F .dbyt $7F +000B0Ar 1 00 80 .dbyt $80 +000B0Cr 1 00 81 .dbyt $81 +000B0Er 1 00 82 .dbyt $82 +000B10r 1 00 83 .dbyt $83 +000B12r 1 00 84 .dbyt $84 +000B14r 1 00 85 .dbyt $85 +000B16r 1 00 86 .dbyt $86 +000B18r 1 00 F0 .dbyt $F0 +000B1Ar 1 00 F1 .dbyt $F1 +000B1Cr 1 00 F2 .dbyt $F2 +000B1Er 1 00 F3 .dbyt $F3 +000B20r 1 00 F4 .dbyt $F4 +000B22r 1 00 F5 .dbyt $F5 +000B24r 1 00 F6 .dbyt $F6 +000B26r 1 00 F7 .dbyt $F7 +000B28r 1 00 F8 .dbyt $F8 +000B2Ar 1 00 F9 .dbyt $F9 +000B2Cr 1 00 FA .dbyt $FA +000B2Er 1 00 FB .dbyt $FB +000B30r 1 00 FC .dbyt $FC +000B32r 1 00 FD .dbyt $FD +000B34r 1 00 FE .dbyt $FE +000B36r 1 00 FF .dbyt $FF +000B38r 1 01 00 .dbyt $100 +000B3Ar 1 01 01 .dbyt $101 +000B3Cr 1 01 02 .dbyt $102 +000B3Er 1 01 03 .dbyt $103 +000B40r 1 0F D2 .dbyt $FD2 +000B42r 1 0F D3 .dbyt $FD3 +000B44r 1 0F D4 .dbyt $FD4 +000B46r 1 0F D5 .dbyt $FD5 +000B48r 1 0F D6 .dbyt $FD6 +000B4Ar 1 0F D7 .dbyt $FD7 +000B4Cr 1 0F D8 .dbyt $FD8 +000B4Er 1 0F D9 .dbyt $FD9 +000B50r 1 0F DA .dbyt $FDA +000B52r 1 0F DB .dbyt $FDB +000B54r 1 0F DC .dbyt $FDC +000B56r 1 0F DD .dbyt $FDD +000B58r 1 0F DE .dbyt $FDE +000B5Ar 1 0F DF .dbyt $FDF +000B5Cr 1 0F E0 .dbyt $FE0 +000B5Er 1 0F E1 .dbyt $FE1 +000B60r 1 0F E2 .dbyt $FE2 +000B62r 1 0F E3 .dbyt $FE3 +000B64r 1 0F E4 .dbyt $FE4 +000B66r 1 0F E5 .dbyt $FE5 +000B68r 1 0F E6 .dbyt $FE6 +000B6Ar 1 0F E7 .dbyt $FE7 +000B6Cr 1 0F E8 .dbyt $FE8 +000B6Er 1 0F E9 .dbyt $FE9 +000B70r 1 0F EA .dbyt $FEA +000B72r 1 0F EB .dbyt $FEB +000B74r 1 0F EC .dbyt $FEC +000B76r 1 0F ED .dbyt $FED +000B78r 1 0F EE .dbyt $FEE +000B7Ar 1 0F EF .dbyt $FEF +000B7Cr 1 0F F0 .dbyt $FF0 +000B7Er 1 0F F1 .dbyt $FF1 +000B80r 1 0F F2 .dbyt $FF2 +000B82r 1 0F F3 .dbyt $FF3 +000B84r 1 0F F4 .dbyt $FF4 +000B86r 1 0F F5 .dbyt $FF5 +000B88r 1 0F F6 .dbyt $FF6 +000B8Ar 1 0F F7 .dbyt $FF7 +000B8Cr 1 0F F8 .dbyt $FF8 +000B8Er 1 0F F9 .dbyt $FF9 +000B90r 1 0F FA .dbyt $FFA +000B92r 1 0F FB .dbyt $FFB +000B94r 1 0F FC .dbyt $FFC +000B96r 1 0F FD .dbyt $FFD +000B98r 1 0F FE .dbyt $FFE +000B9Ar 1 0F FF .dbyt $FFF +000B9Cr 1 10 00 .dbyt $1000 +000B9Er 1 10 01 .dbyt $1001 +000BA0r 1 10 02 .dbyt $1002 +000BA2r 1 10 03 .dbyt $1003 +000BA4r 1 10 04 .dbyt $1004 +000BA6r 1 10 05 .dbyt $1005 +000BA8r 1 10 06 .dbyt $1006 +000BAAr 1 10 07 .dbyt $1007 +000BACr 1 10 08 .dbyt $1008 +000BAEr 1 7F F0 .dbyt $7FF0 +000BB0r 1 7F F1 .dbyt $7FF1 +000BB2r 1 7F F2 .dbyt $7FF2 +000BB4r 1 7F F3 .dbyt $7FF3 +000BB6r 1 7F F4 .dbyt $7FF4 +000BB8r 1 7F F5 .dbyt $7FF5 +000BBAr 1 7F F6 .dbyt $7FF6 +000BBCr 1 7F F7 .dbyt $7FF7 +000BBEr 1 7F F8 .dbyt $7FF8 +000BC0r 1 7F F9 .dbyt $7FF9 +000BC2r 1 7F FA .dbyt $7FFA +000BC4r 1 7F FB .dbyt $7FFB +000BC6r 1 7F FC .dbyt $7FFC +000BC8r 1 7F FD .dbyt $7FFD +000BCAr 1 7F FE .dbyt $7FFE +000BCCr 1 7F FF .dbyt $7FFF +000BCEr 1 80 00 .dbyt $8000 +000BD0r 1 80 01 .dbyt $8001 +000BD2r 1 80 02 .dbyt $8002 +000BD4r 1 80 03 .dbyt $8003 +000BD6r 1 80 04 .dbyt $8004 +000BD8r 1 80 05 .dbyt $8005 +000BDAr 1 80 06 .dbyt $8006 +000BDCr 1 80 07 .dbyt $8007 +000BDEr 1 80 08 .dbyt $8008 +000BE0r 1 80 09 .dbyt $8009 +000BE2r 1 80 0A .dbyt $800A +000BE4r 1 80 0B .dbyt $800B +000BE6r 1 9F E1 .dbyt $9FE1 +000BE8r 1 9F E2 .dbyt $9FE2 +000BEAr 1 9F E3 .dbyt $9FE3 +000BECr 1 9F E4 .dbyt $9FE4 +000BEEr 1 9F E5 .dbyt $9FE5 +000BF0r 1 9F E6 .dbyt $9FE6 +000BF2r 1 9F E7 .dbyt $9FE7 +000BF4r 1 9F E8 .dbyt $9FE8 +000BF6r 1 9F E9 .dbyt $9FE9 +000BF8r 1 9F EA .dbyt $9FEA +000BFAr 1 9F EB .dbyt $9FEB +000BFCr 1 9F EC .dbyt $9FEC +000BFEr 1 9F ED .dbyt $9FED +000C00r 1 9F EE .dbyt $9FEE +000C02r 1 9F EF .dbyt $9FEF +000C04r 1 9F F0 .dbyt $9FF0 +000C06r 1 9F F1 .dbyt $9FF1 +000C08r 1 9F F2 .dbyt $9FF2 +000C0Ar 1 9F F3 .dbyt $9FF3 +000C0Cr 1 9F F4 .dbyt $9FF4 +000C0Er 1 9F F5 .dbyt $9FF5 +000C10r 1 9F F6 .dbyt $9FF6 +000C12r 1 9F F7 .dbyt $9FF7 +000C14r 1 9F F8 .dbyt $9FF8 +000C16r 1 9F F9 .dbyt $9FF9 +000C18r 1 9F FA .dbyt $9FFA +000C1Ar 1 9F FB .dbyt $9FFB +000C1Cr 1 9F FC .dbyt $9FFC +000C1Er 1 9F FD .dbyt $9FFD +000C20r 1 9F FE .dbyt $9FFE +000C22r 1 9F FF .dbyt $9FFF +000C24r 1 A0 00 .dbyt $A000 +000C26r 1 A0 01 .dbyt $A001 +000C28r 1 A0 02 .dbyt $A002 +000C2Ar 1 A0 03 .dbyt $A003 +000C2Cr 1 A0 04 .dbyt $A004 +000C2Er 1 A0 05 .dbyt $A005 +000C30r 1 A0 06 .dbyt $A006 +000C32r 1 A0 07 .dbyt $A007 +000C34r 1 A0 08 .dbyt $A008 +000C36r 1 A0 09 .dbyt $A009 +000C38r 1 A0 0A .dbyt $A00A +000C3Ar 1 A0 0B .dbyt $A00B +000C3Cr 1 A0 0C .dbyt $A00C +000C3Er 1 A0 0D .dbyt $A00D +000C40r 1 A0 0E .dbyt $A00E +000C42r 1 A0 0F .dbyt $A00F +000C44r 1 AF E1 .dbyt $AFE1 +000C46r 1 AF E2 .dbyt $AFE2 +000C48r 1 AF E3 .dbyt $AFE3 +000C4Ar 1 AF E4 .dbyt $AFE4 +000C4Cr 1 AF E5 .dbyt $AFE5 +000C4Er 1 AF E6 .dbyt $AFE6 +000C50r 1 AF E7 .dbyt $AFE7 +000C52r 1 AF E8 .dbyt $AFE8 +000C54r 1 AF E9 .dbyt $AFE9 +000C56r 1 AF EA .dbyt $AFEA +000C58r 1 AF EB .dbyt $AFEB +000C5Ar 1 AF EC .dbyt $AFEC +000C5Cr 1 AF ED .dbyt $AFED +000C5Er 1 AF EE .dbyt $AFEE +000C60r 1 AF EF .dbyt $AFEF +000C62r 1 AF F0 .dbyt $AFF0 +000C64r 1 AF F1 .dbyt $AFF1 +000C66r 1 AF F2 .dbyt $AFF2 +000C68r 1 AF F3 .dbyt $AFF3 +000C6Ar 1 AF F4 .dbyt $AFF4 +000C6Cr 1 AF F5 .dbyt $AFF5 +000C6Er 1 AF F6 .dbyt $AFF6 +000C70r 1 AF F7 .dbyt $AFF7 +000C72r 1 AF F8 .dbyt $AFF8 +000C74r 1 AF F9 .dbyt $AFF9 +000C76r 1 AF FA .dbyt $AFFA +000C78r 1 AF FB .dbyt $AFFB +000C7Ar 1 AF FC .dbyt $AFFC +000C7Cr 1 AF FD .dbyt $AFFD +000C7Er 1 AF FE .dbyt $AFFE +000C80r 1 AF FF .dbyt $AFFF +000C82r 1 B0 00 .dbyt $B000 +000C84r 1 B0 01 .dbyt $B001 +000C86r 1 B0 02 .dbyt $B002 +000C88r 1 B0 03 .dbyt $B003 +000C8Ar 1 B0 04 .dbyt $B004 +000C8Cr 1 B0 05 .dbyt $B005 +000C8Er 1 B0 06 .dbyt $B006 +000C90r 1 B0 07 .dbyt $B007 +000C92r 1 B0 08 .dbyt $B008 +000C94r 1 B0 09 .dbyt $B009 +000C96r 1 B0 0A .dbyt $B00A +000C98r 1 B0 0B .dbyt $B00B +000C9Ar 1 B0 0C .dbyt $B00C +000C9Cr 1 B0 0D .dbyt $B00D +000C9Er 1 B0 0E .dbyt $B00E +000CA0r 1 B0 0F .dbyt $B00F +000CA2r 1 BF E1 .dbyt $BFE1 +000CA4r 1 BF E2 .dbyt $BFE2 +000CA6r 1 BF E3 .dbyt $BFE3 +000CA8r 1 BF E4 .dbyt $BFE4 +000CAAr 1 BF E5 .dbyt $BFE5 +000CACr 1 BF E6 .dbyt $BFE6 +000CAEr 1 BF E7 .dbyt $BFE7 +000CB0r 1 BF E8 .dbyt $BFE8 +000CB2r 1 BF E9 .dbyt $BFE9 +000CB4r 1 BF EA .dbyt $BFEA +000CB6r 1 BF EB .dbyt $BFEB +000CB8r 1 BF EC .dbyt $BFEC +000CBAr 1 BF ED .dbyt $BFED +000CBCr 1 BF EE .dbyt $BFEE +000CBEr 1 BF EF .dbyt $BFEF +000CC0r 1 BF F0 .dbyt $BFF0 +000CC2r 1 BF F1 .dbyt $BFF1 +000CC4r 1 BF F2 .dbyt $BFF2 +000CC6r 1 BF F3 .dbyt $BFF3 +000CC8r 1 BF F4 .dbyt $BFF4 +000CCAr 1 BF F5 .dbyt $BFF5 +000CCCr 1 BF F6 .dbyt $BFF6 +000CCEr 1 BF F7 .dbyt $BFF7 +000CD0r 1 BF F8 .dbyt $BFF8 +000CD2r 1 BF F9 .dbyt $BFF9 +000CD4r 1 BF FA .dbyt $BFFA +000CD6r 1 BF FB .dbyt $BFFB +000CD8r 1 BF FC .dbyt $BFFC +000CDAr 1 BF FD .dbyt $BFFD +000CDCr 1 BF FE .dbyt $BFFE +000CDEr 1 BF FF .dbyt $BFFF +000CE0r 1 C0 00 .dbyt $C000 +000CE2r 1 C0 01 .dbyt $C001 +000CE4r 1 C0 02 .dbyt $C002 +000CE6r 1 C0 03 .dbyt $C003 +000CE8r 1 C0 04 .dbyt $C004 +000CEAr 1 C0 05 .dbyt $C005 +000CECr 1 C0 06 .dbyt $C006 +000CEEr 1 C0 07 .dbyt $C007 +000CF0r 1 C0 08 .dbyt $C008 +000CF2r 1 C0 09 .dbyt $C009 +000CF4r 1 C0 0A .dbyt $C00A +000CF6r 1 C0 0B .dbyt $C00B +000CF8r 1 C0 0C .dbyt $C00C +000CFAr 1 C0 0D .dbyt $C00D +000CFCr 1 C0 0E .dbyt $C00E +000CFEr 1 C0 0F .dbyt $C00F +000D00r 1 CF E1 .dbyt $CFE1 +000D02r 1 CF E2 .dbyt $CFE2 +000D04r 1 CF E3 .dbyt $CFE3 +000D06r 1 CF E4 .dbyt $CFE4 +000D08r 1 CF E5 .dbyt $CFE5 +000D0Ar 1 CF E6 .dbyt $CFE6 +000D0Cr 1 CF E7 .dbyt $CFE7 +000D0Er 1 CF E8 .dbyt $CFE8 +000D10r 1 CF E9 .dbyt $CFE9 +000D12r 1 CF EA .dbyt $CFEA +000D14r 1 CF EB .dbyt $CFEB +000D16r 1 CF EC .dbyt $CFEC +000D18r 1 CF ED .dbyt $CFED +000D1Ar 1 CF EE .dbyt $CFEE +000D1Cr 1 CF EF .dbyt $CFEF +000D1Er 1 CF F0 .dbyt $CFF0 +000D20r 1 CF F1 .dbyt $CFF1 +000D22r 1 CF F2 .dbyt $CFF2 +000D24r 1 CF F3 .dbyt $CFF3 +000D26r 1 CF F4 .dbyt $CFF4 +000D28r 1 CF F5 .dbyt $CFF5 +000D2Ar 1 CF F6 .dbyt $CFF6 +000D2Cr 1 CF F7 .dbyt $CFF7 +000D2Er 1 CF F8 .dbyt $CFF8 +000D30r 1 CF F9 .dbyt $CFF9 +000D32r 1 CF FA .dbyt $CFFA +000D34r 1 CF FB .dbyt $CFFB +000D36r 1 CF FC .dbyt $CFFC +000D38r 1 CF FD .dbyt $CFFD +000D3Ar 1 CF FE .dbyt $CFFE +000D3Cr 1 CF FF .dbyt $CFFF +000D3Er 1 D0 00 .dbyt $D000 +000D40r 1 D0 01 .dbyt $D001 +000D42r 1 D0 02 .dbyt $D002 +000D44r 1 D0 03 .dbyt $D003 +000D46r 1 D0 04 .dbyt $D004 +000D48r 1 D0 05 .dbyt $D005 +000D4Ar 1 D0 06 .dbyt $D006 +000D4Cr 1 D0 07 .dbyt $D007 +000D4Er 1 D0 08 .dbyt $D008 +000D50r 1 D0 09 .dbyt $D009 +000D52r 1 D0 0A .dbyt $D00A +000D54r 1 D0 0B .dbyt $D00B +000D56r 1 D0 0C .dbyt $D00C +000D58r 1 D0 0D .dbyt $D00D +000D5Ar 1 D0 0E .dbyt $D00E +000D5Cr 1 D0 0F .dbyt $D00F +000D5Er 1 DF E1 .dbyt $DFE1 +000D60r 1 DF E2 .dbyt $DFE2 +000D62r 1 DF E3 .dbyt $DFE3 +000D64r 1 DF E4 .dbyt $DFE4 +000D66r 1 DF E5 .dbyt $DFE5 +000D68r 1 DF E6 .dbyt $DFE6 +000D6Ar 1 DF E7 .dbyt $DFE7 +000D6Cr 1 DF E8 .dbyt $DFE8 +000D6Er 1 DF E9 .dbyt $DFE9 +000D70r 1 DF EA .dbyt $DFEA +000D72r 1 DF EB .dbyt $DFEB +000D74r 1 DF EC .dbyt $DFEC +000D76r 1 DF ED .dbyt $DFED +000D78r 1 DF EE .dbyt $DFEE +000D7Ar 1 DF EF .dbyt $DFEF +000D7Cr 1 DF F0 .dbyt $DFF0 +000D7Er 1 DF F1 .dbyt $DFF1 +000D80r 1 DF F2 .dbyt $DFF2 +000D82r 1 DF F3 .dbyt $DFF3 +000D84r 1 DF F4 .dbyt $DFF4 +000D86r 1 DF F5 .dbyt $DFF5 +000D88r 1 DF F6 .dbyt $DFF6 +000D8Ar 1 DF F7 .dbyt $DFF7 +000D8Cr 1 DF F8 .dbyt $DFF8 +000D8Er 1 DF F9 .dbyt $DFF9 +000D90r 1 DF FA .dbyt $DFFA +000D92r 1 DF FB .dbyt $DFFB +000D94r 1 DF FC .dbyt $DFFC +000D96r 1 DF FD .dbyt $DFFD +000D98r 1 DF FE .dbyt $DFFE +000D9Ar 1 DF FF .dbyt $DFFF +000D9Cr 1 E0 00 .dbyt $E000 +000D9Er 1 E0 01 .dbyt $E001 +000DA0r 1 E0 02 .dbyt $E002 +000DA2r 1 E0 03 .dbyt $E003 +000DA4r 1 E0 04 .dbyt $E004 +000DA6r 1 E0 05 .dbyt $E005 +000DA8r 1 E0 06 .dbyt $E006 +000DAAr 1 E0 07 .dbyt $E007 +000DACr 1 E0 08 .dbyt $E008 +000DAEr 1 E0 09 .dbyt $E009 +000DB0r 1 E0 0A .dbyt $E00A +000DB2r 1 E0 0B .dbyt $E00B +000DB4r 1 E0 0C .dbyt $E00C +000DB6r 1 E0 0D .dbyt $E00D +000DB8r 1 E0 0E .dbyt $E00E +000DBAr 1 E0 0F .dbyt $E00F +000DBCr 1 EF E1 .dbyt $EFE1 +000DBEr 1 EF E2 .dbyt $EFE2 +000DC0r 1 EF E3 .dbyt $EFE3 +000DC2r 1 EF E4 .dbyt $EFE4 +000DC4r 1 EF E5 .dbyt $EFE5 +000DC6r 1 EF E6 .dbyt $EFE6 +000DC8r 1 EF E7 .dbyt $EFE7 +000DCAr 1 EF E8 .dbyt $EFE8 +000DCCr 1 EF E9 .dbyt $EFE9 +000DCEr 1 EF EA .dbyt $EFEA +000DD0r 1 EF EB .dbyt $EFEB +000DD2r 1 EF EC .dbyt $EFEC +000DD4r 1 EF ED .dbyt $EFED +000DD6r 1 EF EE .dbyt $EFEE +000DD8r 1 EF EF .dbyt $EFEF +000DDAr 1 EF F0 .dbyt $EFF0 +000DDCr 1 EF F1 .dbyt $EFF1 +000DDEr 1 EF F2 .dbyt $EFF2 +000DE0r 1 EF F3 .dbyt $EFF3 +000DE2r 1 EF F4 .dbyt $EFF4 +000DE4r 1 EF F5 .dbyt $EFF5 +000DE6r 1 EF F6 .dbyt $EFF6 +000DE8r 1 EF F7 .dbyt $EFF7 +000DEAr 1 EF F8 .dbyt $EFF8 +000DECr 1 EF F9 .dbyt $EFF9 +000DEEr 1 EF FA .dbyt $EFFA +000DF0r 1 EF FB .dbyt $EFFB +000DF2r 1 EF FC .dbyt $EFFC +000DF4r 1 EF FD .dbyt $EFFD +000DF6r 1 EF FE .dbyt $EFFE +000DF8r 1 EF FF .dbyt $EFFF +000DFAr 1 F0 00 .dbyt $F000 +000DFCr 1 F0 01 .dbyt $F001 +000DFEr 1 F0 02 .dbyt $F002 +000E00r 1 F0 03 .dbyt $F003 +000E02r 1 F0 04 .dbyt $F004 +000E04r 1 F0 05 .dbyt $F005 +000E06r 1 F0 06 .dbyt $F006 +000E08r 1 F0 07 .dbyt $F007 +000E0Ar 1 F0 08 .dbyt $F008 +000E0Cr 1 F0 09 .dbyt $F009 +000E0Er 1 F0 0A .dbyt $F00A +000E10r 1 F0 0B .dbyt $F00B +000E12r 1 F0 0C .dbyt $F00C +000E14r 1 F0 0D .dbyt $F00D +000E16r 1 F0 0E .dbyt $F00E +000E18r 1 F0 0F .dbyt $F00F +000E1Ar 1 FF E1 .dbyt $FFE1 +000E1Cr 1 FF E2 .dbyt $FFE2 +000E1Er 1 FF E3 .dbyt $FFE3 +000E20r 1 FF E4 .dbyt $FFE4 +000E22r 1 FF E5 .dbyt $FFE5 +000E24r 1 FF E6 .dbyt $FFE6 +000E26r 1 FF E7 .dbyt $FFE7 +000E28r 1 FF E8 .dbyt $FFE8 +000E2Ar 1 FF E9 .dbyt $FFE9 +000E2Cr 1 FF EA .dbyt $FFEA +000E2Er 1 FF EB .dbyt $FFEB +000E30r 1 FF EC .dbyt $FFEC +000E32r 1 FF ED .dbyt $FFED +000E34r 1 FF EE .dbyt $FFEE +000E36r 1 FF EF .dbyt $FFEF +000E38r 1 FF F0 .dbyt $FFF0 +000E3Ar 1 FF F1 .dbyt $FFF1 +000E3Cr 1 FF F2 .dbyt $FFF2 +000E3Er 1 FF F3 .dbyt $FFF3 +000E40r 1 FF F4 .dbyt $FFF4 +000E42r 1 FF F5 .dbyt $FFF5 +000E44r 1 FF F6 .dbyt $FFF6 +000E46r 1 FF F7 .dbyt $FFF7 +000E48r 1 FF F8 .dbyt $FFF8 +000E4Ar 1 FF F9 .dbyt $FFF9 +000E4Cr 1 FF FA .dbyt $FFFA +000E4Er 1 FF FB .dbyt $FFFB +000E50r 1 FF FC .dbyt $FFFC +000E52r 1 FF FD .dbyt $FFFD +000E54r 1 FF FE .dbyt $FFFE +000E56r 1 FF FF .dbyt $FFFF +000E58r 1 +000E58r 1 ; 4-digit hex values +000E58r 1 00 00 .dbyt $0000 +000E5Ar 1 00 01 .dbyt $0001 +000E5Cr 1 00 02 .dbyt $0002 +000E5Er 1 00 03 .dbyt $0003 +000E60r 1 00 04 .dbyt $0004 +000E62r 1 00 05 .dbyt $0005 +000E64r 1 00 06 .dbyt $0006 +000E66r 1 00 07 .dbyt $0007 +000E68r 1 00 08 .dbyt $0008 +000E6Ar 1 00 09 .dbyt $0009 +000E6Cr 1 00 0A .dbyt $000a +000E6Er 1 00 0B .dbyt $000b +000E70r 1 00 0C .dbyt $000c +000E72r 1 00 0D .dbyt $000d +000E74r 1 00 0E .dbyt $000e +000E76r 1 00 0F .dbyt $000f +000E78r 1 00 10 .dbyt $0010 +000E7Ar 1 00 11 .dbyt $0011 +000E7Cr 1 00 12 .dbyt $0012 +000E7Er 1 00 13 .dbyt $0013 +000E80r 1 00 70 .dbyt $0070 +000E82r 1 00 71 .dbyt $0071 +000E84r 1 00 72 .dbyt $0072 +000E86r 1 00 73 .dbyt $0073 +000E88r 1 00 74 .dbyt $0074 +000E8Ar 1 00 75 .dbyt $0075 +000E8Cr 1 00 76 .dbyt $0076 +000E8Er 1 00 77 .dbyt $0077 +000E90r 1 00 78 .dbyt $0078 +000E92r 1 00 79 .dbyt $0079 +000E94r 1 00 7A .dbyt $007a +000E96r 1 00 7B .dbyt $007b +000E98r 1 00 7C .dbyt $007c +000E9Ar 1 00 7D .dbyt $007d +000E9Cr 1 00 7E .dbyt $007e +000E9Er 1 00 7F .dbyt $007f +000EA0r 1 00 80 .dbyt $0080 +000EA2r 1 00 81 .dbyt $0081 +000EA4r 1 00 82 .dbyt $0082 +000EA6r 1 00 83 .dbyt $0083 +000EA8r 1 00 84 .dbyt $0084 +000EAAr 1 00 85 .dbyt $0085 +000EACr 1 00 86 .dbyt $0086 +000EAEr 1 00 F0 .dbyt $00f0 +000EB0r 1 00 F1 .dbyt $00f1 +000EB2r 1 00 F2 .dbyt $00f2 +000EB4r 1 00 F3 .dbyt $00f3 +000EB6r 1 00 F4 .dbyt $00f4 +000EB8r 1 00 F5 .dbyt $00f5 +000EBAr 1 00 F6 .dbyt $00f6 +000EBCr 1 00 F7 .dbyt $00f7 +000EBEr 1 00 F8 .dbyt $00f8 +000EC0r 1 00 F9 .dbyt $00f9 +000EC2r 1 00 FA .dbyt $00fa +000EC4r 1 00 FB .dbyt $00fb +000EC6r 1 00 FC .dbyt $00fc +000EC8r 1 00 FD .dbyt $00fd +000ECAr 1 00 FE .dbyt $00fe +000ECCr 1 00 FF .dbyt $00ff +000ECEr 1 01 00 .dbyt $0100 +000ED0r 1 01 01 .dbyt $0101 +000ED2r 1 01 02 .dbyt $0102 +000ED4r 1 01 03 .dbyt $0103 +000ED6r 1 0F D2 .dbyt $0fd2 +000ED8r 1 0F D3 .dbyt $0fd3 +000EDAr 1 0F D4 .dbyt $0fd4 +000EDCr 1 0F D5 .dbyt $0fd5 +000EDEr 1 0F D6 .dbyt $0fd6 +000EE0r 1 0F D7 .dbyt $0fd7 +000EE2r 1 0F D8 .dbyt $0fd8 +000EE4r 1 0F D9 .dbyt $0fd9 +000EE6r 1 0F DA .dbyt $0fda +000EE8r 1 0F DB .dbyt $0fdb +000EEAr 1 0F DC .dbyt $0fdc +000EECr 1 0F DD .dbyt $0fdd +000EEEr 1 0F DE .dbyt $0fde +000EF0r 1 0F DF .dbyt $0fdf +000EF2r 1 0F E0 .dbyt $0fe0 +000EF4r 1 0F E1 .dbyt $0fe1 +000EF6r 1 0F E2 .dbyt $0fe2 +000EF8r 1 0F E3 .dbyt $0fe3 +000EFAr 1 0F E4 .dbyt $0fe4 +000EFCr 1 0F E5 .dbyt $0fe5 +000EFEr 1 0F E6 .dbyt $0fe6 +000F00r 1 0F E7 .dbyt $0fe7 +000F02r 1 0F E8 .dbyt $0fe8 +000F04r 1 0F E9 .dbyt $0fe9 +000F06r 1 0F EA .dbyt $0fea +000F08r 1 0F EB .dbyt $0feb +000F0Ar 1 0F EC .dbyt $0fec +000F0Cr 1 0F ED .dbyt $0fed +000F0Er 1 0F EE .dbyt $0fee +000F10r 1 0F EF .dbyt $0fef +000F12r 1 0F F0 .dbyt $0ff0 +000F14r 1 0F F1 .dbyt $0ff1 +000F16r 1 0F F2 .dbyt $0ff2 +000F18r 1 0F F3 .dbyt $0ff3 +000F1Ar 1 0F F4 .dbyt $0ff4 +000F1Cr 1 0F F5 .dbyt $0ff5 +000F1Er 1 0F F6 .dbyt $0ff6 +000F20r 1 0F F7 .dbyt $0ff7 +000F22r 1 0F F8 .dbyt $0ff8 +000F24r 1 0F F9 .dbyt $0ff9 +000F26r 1 0F FA .dbyt $0ffa +000F28r 1 0F FB .dbyt $0ffb +000F2Ar 1 0F FC .dbyt $0ffc +000F2Cr 1 0F FD .dbyt $0ffd +000F2Er 1 0F FE .dbyt $0ffe +000F30r 1 0F FF .dbyt $0fff +000F32r 1 10 00 .dbyt $1000 +000F34r 1 10 01 .dbyt $1001 +000F36r 1 10 02 .dbyt $1002 +000F38r 1 10 03 .dbyt $1003 +000F3Ar 1 10 04 .dbyt $1004 +000F3Cr 1 10 05 .dbyt $1005 +000F3Er 1 10 06 .dbyt $1006 +000F40r 1 10 07 .dbyt $1007 +000F42r 1 10 08 .dbyt $1008 +000F44r 1 7F F0 .dbyt $7ff0 +000F46r 1 7F F1 .dbyt $7ff1 +000F48r 1 7F F2 .dbyt $7ff2 +000F4Ar 1 7F F3 .dbyt $7ff3 +000F4Cr 1 7F F4 .dbyt $7ff4 +000F4Er 1 7F F5 .dbyt $7ff5 +000F50r 1 7F F6 .dbyt $7ff6 +000F52r 1 7F F7 .dbyt $7ff7 +000F54r 1 7F F8 .dbyt $7ff8 +000F56r 1 7F F9 .dbyt $7ff9 +000F58r 1 7F FA .dbyt $7ffa +000F5Ar 1 7F FB .dbyt $7ffb +000F5Cr 1 7F FC .dbyt $7ffc +000F5Er 1 7F FD .dbyt $7ffd +000F60r 1 7F FE .dbyt $7ffe +000F62r 1 7F FF .dbyt $7fff +000F64r 1 80 00 .dbyt $8000 +000F66r 1 80 01 .dbyt $8001 +000F68r 1 80 02 .dbyt $8002 +000F6Ar 1 80 03 .dbyt $8003 +000F6Cr 1 80 04 .dbyt $8004 +000F6Er 1 80 05 .dbyt $8005 +000F70r 1 80 06 .dbyt $8006 +000F72r 1 80 07 .dbyt $8007 +000F74r 1 80 08 .dbyt $8008 +000F76r 1 80 09 .dbyt $8009 +000F78r 1 80 0A .dbyt $800a +000F7Ar 1 80 0B .dbyt $800b +000F7Cr 1 9F E1 .dbyt $9fe1 +000F7Er 1 9F E2 .dbyt $9fe2 +000F80r 1 9F E3 .dbyt $9fe3 +000F82r 1 9F E4 .dbyt $9fe4 +000F84r 1 9F E5 .dbyt $9fe5 +000F86r 1 9F E6 .dbyt $9fe6 +000F88r 1 9F E7 .dbyt $9fe7 +000F8Ar 1 9F E8 .dbyt $9fe8 +000F8Cr 1 9F E9 .dbyt $9fe9 +000F8Er 1 9F EA .dbyt $9fea +000F90r 1 9F EB .dbyt $9feb +000F92r 1 9F EC .dbyt $9fec +000F94r 1 9F ED .dbyt $9fed +000F96r 1 9F EE .dbyt $9fee +000F98r 1 9F EF .dbyt $9fef +000F9Ar 1 9F F0 .dbyt $9ff0 +000F9Cr 1 9F F1 .dbyt $9ff1 +000F9Er 1 9F F2 .dbyt $9ff2 +000FA0r 1 9F F3 .dbyt $9ff3 +000FA2r 1 9F F4 .dbyt $9ff4 +000FA4r 1 9F F5 .dbyt $9ff5 +000FA6r 1 9F F6 .dbyt $9ff6 +000FA8r 1 9F F7 .dbyt $9ff7 +000FAAr 1 9F F8 .dbyt $9ff8 +000FACr 1 9F F9 .dbyt $9ff9 +000FAEr 1 9F FA .dbyt $9ffa +000FB0r 1 9F FB .dbyt $9ffb +000FB2r 1 9F FC .dbyt $9ffc +000FB4r 1 9F FD .dbyt $9ffd +000FB6r 1 9F FE .dbyt $9ffe +000FB8r 1 9F FF .dbyt $9fff +000FBAr 1 A0 00 .dbyt $a000 +000FBCr 1 A0 01 .dbyt $a001 +000FBEr 1 A0 02 .dbyt $a002 +000FC0r 1 A0 03 .dbyt $a003 +000FC2r 1 A0 04 .dbyt $a004 +000FC4r 1 A0 05 .dbyt $a005 +000FC6r 1 A0 06 .dbyt $a006 +000FC8r 1 A0 07 .dbyt $a007 +000FCAr 1 A0 08 .dbyt $a008 +000FCCr 1 A0 09 .dbyt $a009 +000FCEr 1 A0 0A .dbyt $a00a +000FD0r 1 A0 0B .dbyt $a00b +000FD2r 1 A0 0C .dbyt $a00c +000FD4r 1 A0 0D .dbyt $a00d +000FD6r 1 A0 0E .dbyt $a00e +000FD8r 1 A0 0F .dbyt $a00f +000FDAr 1 AF E1 .dbyt $afe1 +000FDCr 1 AF E2 .dbyt $afe2 +000FDEr 1 AF E3 .dbyt $afe3 +000FE0r 1 AF E4 .dbyt $afe4 +000FE2r 1 AF E5 .dbyt $afe5 +000FE4r 1 AF E6 .dbyt $afe6 +000FE6r 1 AF E7 .dbyt $afe7 +000FE8r 1 AF E8 .dbyt $afe8 +000FEAr 1 AF E9 .dbyt $afe9 +000FECr 1 AF EA .dbyt $afea +000FEEr 1 AF EB .dbyt $afeb +000FF0r 1 AF EC .dbyt $afec +000FF2r 1 AF ED .dbyt $afed +000FF4r 1 AF EE .dbyt $afee +000FF6r 1 AF EF .dbyt $afef +000FF8r 1 AF F0 .dbyt $aff0 +000FFAr 1 AF F1 .dbyt $aff1 +000FFCr 1 AF F2 .dbyt $aff2 +000FFEr 1 AF F3 .dbyt $aff3 +001000r 1 AF F4 .dbyt $aff4 +001002r 1 AF F5 .dbyt $aff5 +001004r 1 AF F6 .dbyt $aff6 +001006r 1 AF F7 .dbyt $aff7 +001008r 1 AF F8 .dbyt $aff8 +00100Ar 1 AF F9 .dbyt $aff9 +00100Cr 1 AF FA .dbyt $affa +00100Er 1 AF FB .dbyt $affb +001010r 1 AF FC .dbyt $affc +001012r 1 AF FD .dbyt $affd +001014r 1 AF FE .dbyt $affe +001016r 1 AF FF .dbyt $afff +001018r 1 B0 00 .dbyt $b000 +00101Ar 1 B0 01 .dbyt $b001 +00101Cr 1 B0 02 .dbyt $b002 +00101Er 1 B0 03 .dbyt $b003 +001020r 1 B0 04 .dbyt $b004 +001022r 1 B0 05 .dbyt $b005 +001024r 1 B0 06 .dbyt $b006 +001026r 1 B0 07 .dbyt $b007 +001028r 1 B0 08 .dbyt $b008 +00102Ar 1 B0 09 .dbyt $b009 +00102Cr 1 B0 0A .dbyt $b00a +00102Er 1 B0 0B .dbyt $b00b +001030r 1 B0 0C .dbyt $b00c +001032r 1 B0 0D .dbyt $b00d +001034r 1 B0 0E .dbyt $b00e +001036r 1 B0 0F .dbyt $b00f +001038r 1 BF E1 .dbyt $bfe1 +00103Ar 1 BF E2 .dbyt $bfe2 +00103Cr 1 BF E3 .dbyt $bfe3 +00103Er 1 BF E4 .dbyt $bfe4 +001040r 1 BF E5 .dbyt $bfe5 +001042r 1 BF E6 .dbyt $bfe6 +001044r 1 BF E7 .dbyt $bfe7 +001046r 1 BF E8 .dbyt $bfe8 +001048r 1 BF E9 .dbyt $bfe9 +00104Ar 1 BF EA .dbyt $bfea +00104Cr 1 BF EB .dbyt $bfeb +00104Er 1 BF EC .dbyt $bfec +001050r 1 BF ED .dbyt $bfed +001052r 1 BF EE .dbyt $bfee +001054r 1 BF EF .dbyt $bfef +001056r 1 BF F0 .dbyt $bff0 +001058r 1 BF F1 .dbyt $bff1 +00105Ar 1 BF F2 .dbyt $bff2 +00105Cr 1 BF F3 .dbyt $bff3 +00105Er 1 BF F4 .dbyt $bff4 +001060r 1 BF F5 .dbyt $bff5 +001062r 1 BF F6 .dbyt $bff6 +001064r 1 BF F7 .dbyt $bff7 +001066r 1 BF F8 .dbyt $bff8 +001068r 1 BF F9 .dbyt $bff9 +00106Ar 1 BF FA .dbyt $bffa +00106Cr 1 BF FB .dbyt $bffb +00106Er 1 BF FC .dbyt $bffc +001070r 1 BF FD .dbyt $bffd +001072r 1 BF FE .dbyt $bffe +001074r 1 BF FF .dbyt $bfff +001076r 1 C0 00 .dbyt $c000 +001078r 1 C0 01 .dbyt $c001 +00107Ar 1 C0 02 .dbyt $c002 +00107Cr 1 C0 03 .dbyt $c003 +00107Er 1 C0 04 .dbyt $c004 +001080r 1 C0 05 .dbyt $c005 +001082r 1 C0 06 .dbyt $c006 +001084r 1 C0 07 .dbyt $c007 +001086r 1 C0 08 .dbyt $c008 +001088r 1 C0 09 .dbyt $c009 +00108Ar 1 C0 0A .dbyt $c00a +00108Cr 1 C0 0B .dbyt $c00b +00108Er 1 C0 0C .dbyt $c00c +001090r 1 C0 0D .dbyt $c00d +001092r 1 C0 0E .dbyt $c00e +001094r 1 C0 0F .dbyt $c00f +001096r 1 CF E1 .dbyt $cfe1 +001098r 1 CF E2 .dbyt $cfe2 +00109Ar 1 CF E3 .dbyt $cfe3 +00109Cr 1 CF E4 .dbyt $cfe4 +00109Er 1 CF E5 .dbyt $cfe5 +0010A0r 1 CF E6 .dbyt $cfe6 +0010A2r 1 CF E7 .dbyt $cfe7 +0010A4r 1 CF E8 .dbyt $cfe8 +0010A6r 1 CF E9 .dbyt $cfe9 +0010A8r 1 CF EA .dbyt $cfea +0010AAr 1 CF EB .dbyt $cfeb +0010ACr 1 CF EC .dbyt $cfec +0010AEr 1 CF ED .dbyt $cfed +0010B0r 1 CF EE .dbyt $cfee +0010B2r 1 CF EF .dbyt $cfef +0010B4r 1 CF F0 .dbyt $cff0 +0010B6r 1 CF F1 .dbyt $cff1 +0010B8r 1 CF F2 .dbyt $cff2 +0010BAr 1 CF F3 .dbyt $cff3 +0010BCr 1 CF F4 .dbyt $cff4 +0010BEr 1 CF F5 .dbyt $cff5 +0010C0r 1 CF F6 .dbyt $cff6 +0010C2r 1 CF F7 .dbyt $cff7 +0010C4r 1 CF F8 .dbyt $cff8 +0010C6r 1 CF F9 .dbyt $cff9 +0010C8r 1 CF FA .dbyt $cffa +0010CAr 1 CF FB .dbyt $cffb +0010CCr 1 CF FC .dbyt $cffc +0010CEr 1 CF FD .dbyt $cffd +0010D0r 1 CF FE .dbyt $cffe +0010D2r 1 CF FF .dbyt $cfff +0010D4r 1 D0 00 .dbyt $d000 +0010D6r 1 D0 01 .dbyt $d001 +0010D8r 1 D0 02 .dbyt $d002 +0010DAr 1 D0 03 .dbyt $d003 +0010DCr 1 D0 04 .dbyt $d004 +0010DEr 1 D0 05 .dbyt $d005 +0010E0r 1 D0 06 .dbyt $d006 +0010E2r 1 D0 07 .dbyt $d007 +0010E4r 1 D0 08 .dbyt $d008 +0010E6r 1 D0 09 .dbyt $d009 +0010E8r 1 D0 0A .dbyt $d00a +0010EAr 1 D0 0B .dbyt $d00b +0010ECr 1 D0 0C .dbyt $d00c +0010EEr 1 D0 0D .dbyt $d00d +0010F0r 1 D0 0E .dbyt $d00e +0010F2r 1 D0 0F .dbyt $d00f +0010F4r 1 DF E1 .dbyt $dfe1 +0010F6r 1 DF E2 .dbyt $dfe2 +0010F8r 1 DF E3 .dbyt $dfe3 +0010FAr 1 DF E4 .dbyt $dfe4 +0010FCr 1 DF E5 .dbyt $dfe5 +0010FEr 1 DF E6 .dbyt $dfe6 +001100r 1 DF E7 .dbyt $dfe7 +001102r 1 DF E8 .dbyt $dfe8 +001104r 1 DF E9 .dbyt $dfe9 +001106r 1 DF EA .dbyt $dfea +001108r 1 DF EB .dbyt $dfeb +00110Ar 1 DF EC .dbyt $dfec +00110Cr 1 DF ED .dbyt $dfed +00110Er 1 DF EE .dbyt $dfee +001110r 1 DF EF .dbyt $dfef +001112r 1 DF F0 .dbyt $dff0 +001114r 1 DF F1 .dbyt $dff1 +001116r 1 DF F2 .dbyt $dff2 +001118r 1 DF F3 .dbyt $dff3 +00111Ar 1 DF F4 .dbyt $dff4 +00111Cr 1 DF F5 .dbyt $dff5 +00111Er 1 DF F6 .dbyt $dff6 +001120r 1 DF F7 .dbyt $dff7 +001122r 1 DF F8 .dbyt $dff8 +001124r 1 DF F9 .dbyt $dff9 +001126r 1 DF FA .dbyt $dffa +001128r 1 DF FB .dbyt $dffb +00112Ar 1 DF FC .dbyt $dffc +00112Cr 1 DF FD .dbyt $dffd +00112Er 1 DF FE .dbyt $dffe +001130r 1 DF FF .dbyt $dfff +001132r 1 E0 00 .dbyt $e000 +001134r 1 E0 01 .dbyt $e001 +001136r 1 E0 02 .dbyt $e002 +001138r 1 E0 03 .dbyt $e003 +00113Ar 1 E0 04 .dbyt $e004 +00113Cr 1 E0 05 .dbyt $e005 +00113Er 1 E0 06 .dbyt $e006 +001140r 1 E0 07 .dbyt $e007 +001142r 1 E0 08 .dbyt $e008 +001144r 1 E0 09 .dbyt $e009 +001146r 1 E0 0A .dbyt $e00a +001148r 1 E0 0B .dbyt $e00b +00114Ar 1 E0 0C .dbyt $e00c +00114Cr 1 E0 0D .dbyt $e00d +00114Er 1 E0 0E .dbyt $e00e +001150r 1 E0 0F .dbyt $e00f +001152r 1 EF E1 .dbyt $efe1 +001154r 1 EF E2 .dbyt $efe2 +001156r 1 EF E3 .dbyt $efe3 +001158r 1 EF E4 .dbyt $efe4 +00115Ar 1 EF E5 .dbyt $efe5 +00115Cr 1 EF E6 .dbyt $efe6 +00115Er 1 EF E7 .dbyt $efe7 +001160r 1 EF E8 .dbyt $efe8 +001162r 1 EF E9 .dbyt $efe9 +001164r 1 EF EA .dbyt $efea +001166r 1 EF EB .dbyt $efeb +001168r 1 EF EC .dbyt $efec +00116Ar 1 EF ED .dbyt $efed +00116Cr 1 EF EE .dbyt $efee +00116Er 1 EF EF .dbyt $efef +001170r 1 EF F0 .dbyt $eff0 +001172r 1 EF F1 .dbyt $eff1 +001174r 1 EF F2 .dbyt $eff2 +001176r 1 EF F3 .dbyt $eff3 +001178r 1 EF F4 .dbyt $eff4 +00117Ar 1 EF F5 .dbyt $eff5 +00117Cr 1 EF F6 .dbyt $eff6 +00117Er 1 EF F7 .dbyt $eff7 +001180r 1 EF F8 .dbyt $eff8 +001182r 1 EF F9 .dbyt $eff9 +001184r 1 EF FA .dbyt $effa +001186r 1 EF FB .dbyt $effb +001188r 1 EF FC .dbyt $effc +00118Ar 1 EF FD .dbyt $effd +00118Cr 1 EF FE .dbyt $effe +00118Er 1 EF FF .dbyt $efff +001190r 1 F0 00 .dbyt $f000 +001192r 1 F0 01 .dbyt $f001 +001194r 1 F0 02 .dbyt $f002 +001196r 1 F0 03 .dbyt $f003 +001198r 1 F0 04 .dbyt $f004 +00119Ar 1 F0 05 .dbyt $f005 +00119Cr 1 F0 06 .dbyt $f006 +00119Er 1 F0 07 .dbyt $f007 +0011A0r 1 F0 08 .dbyt $f008 +0011A2r 1 F0 09 .dbyt $f009 +0011A4r 1 F0 0A .dbyt $f00a +0011A6r 1 F0 0B .dbyt $f00b +0011A8r 1 F0 0C .dbyt $f00c +0011AAr 1 F0 0D .dbyt $f00d +0011ACr 1 F0 0E .dbyt $f00e +0011AEr 1 F0 0F .dbyt $f00f +0011B0r 1 FF E1 .dbyt $ffe1 +0011B2r 1 FF E2 .dbyt $ffe2 +0011B4r 1 FF E3 .dbyt $ffe3 +0011B6r 1 FF E4 .dbyt $ffe4 +0011B8r 1 FF E5 .dbyt $ffe5 +0011BAr 1 FF E6 .dbyt $ffe6 +0011BCr 1 FF E7 .dbyt $ffe7 +0011BEr 1 FF E8 .dbyt $ffe8 +0011C0r 1 FF E9 .dbyt $ffe9 +0011C2r 1 FF EA .dbyt $ffea +0011C4r 1 FF EB .dbyt $ffeb +0011C6r 1 FF EC .dbyt $ffec +0011C8r 1 FF ED .dbyt $ffed +0011CAr 1 FF EE .dbyt $ffee +0011CCr 1 FF EF .dbyt $ffef +0011CEr 1 FF F0 .dbyt $fff0 +0011D0r 1 FF F1 .dbyt $fff1 +0011D2r 1 FF F2 .dbyt $fff2 +0011D4r 1 FF F3 .dbyt $fff3 +0011D6r 1 FF F4 .dbyt $fff4 +0011D8r 1 FF F5 .dbyt $fff5 +0011DAr 1 FF F6 .dbyt $fff6 +0011DCr 1 FF F7 .dbyt $fff7 +0011DEr 1 FF F8 .dbyt $fff8 +0011E0r 1 FF F9 .dbyt $fff9 +0011E2r 1 FF FA .dbyt $fffa +0011E4r 1 FF FB .dbyt $fffb +0011E6r 1 FF FC .dbyt $fffc +0011E8r 1 FF FD .dbyt $fffd +0011EAr 1 FF FE .dbyt $fffe +0011ECr 1 FF FF .dbyt $ffff +0011EEr 1 +0011EEr 1 ; 4-digit hex values, uppercase +0011EEr 1 00 00 .dbyt $0000 +0011F0r 1 00 01 .dbyt $0001 +0011F2r 1 00 02 .dbyt $0002 +0011F4r 1 00 03 .dbyt $0003 +0011F6r 1 00 04 .dbyt $0004 +0011F8r 1 00 05 .dbyt $0005 +0011FAr 1 00 06 .dbyt $0006 +0011FCr 1 00 07 .dbyt $0007 +0011FEr 1 00 08 .dbyt $0008 +001200r 1 00 09 .dbyt $0009 +001202r 1 00 0A .dbyt $000A +001204r 1 00 0B .dbyt $000B +001206r 1 00 0C .dbyt $000C +001208r 1 00 0D .dbyt $000D +00120Ar 1 00 0E .dbyt $000E +00120Cr 1 00 0F .dbyt $000F +00120Er 1 00 10 .dbyt $0010 +001210r 1 00 11 .dbyt $0011 +001212r 1 00 12 .dbyt $0012 +001214r 1 00 13 .dbyt $0013 +001216r 1 00 70 .dbyt $0070 +001218r 1 00 71 .dbyt $0071 +00121Ar 1 00 72 .dbyt $0072 +00121Cr 1 00 73 .dbyt $0073 +00121Er 1 00 74 .dbyt $0074 +001220r 1 00 75 .dbyt $0075 +001222r 1 00 76 .dbyt $0076 +001224r 1 00 77 .dbyt $0077 +001226r 1 00 78 .dbyt $0078 +001228r 1 00 79 .dbyt $0079 +00122Ar 1 00 7A .dbyt $007A +00122Cr 1 00 7B .dbyt $007B +00122Er 1 00 7C .dbyt $007C +001230r 1 00 7D .dbyt $007D +001232r 1 00 7E .dbyt $007E +001234r 1 00 7F .dbyt $007F +001236r 1 00 80 .dbyt $0080 +001238r 1 00 81 .dbyt $0081 +00123Ar 1 00 82 .dbyt $0082 +00123Cr 1 00 83 .dbyt $0083 +00123Er 1 00 84 .dbyt $0084 +001240r 1 00 85 .dbyt $0085 +001242r 1 00 86 .dbyt $0086 +001244r 1 00 F0 .dbyt $00F0 +001246r 1 00 F1 .dbyt $00F1 +001248r 1 00 F2 .dbyt $00F2 +00124Ar 1 00 F3 .dbyt $00F3 +00124Cr 1 00 F4 .dbyt $00F4 +00124Er 1 00 F5 .dbyt $00F5 +001250r 1 00 F6 .dbyt $00F6 +001252r 1 00 F7 .dbyt $00F7 +001254r 1 00 F8 .dbyt $00F8 +001256r 1 00 F9 .dbyt $00F9 +001258r 1 00 FA .dbyt $00FA +00125Ar 1 00 FB .dbyt $00FB +00125Cr 1 00 FC .dbyt $00FC +00125Er 1 00 FD .dbyt $00FD +001260r 1 00 FE .dbyt $00FE +001262r 1 00 FF .dbyt $00FF +001264r 1 01 00 .dbyt $0100 +001266r 1 01 01 .dbyt $0101 +001268r 1 01 02 .dbyt $0102 +00126Ar 1 01 03 .dbyt $0103 +00126Cr 1 0F D2 .dbyt $0FD2 +00126Er 1 0F D3 .dbyt $0FD3 +001270r 1 0F D4 .dbyt $0FD4 +001272r 1 0F D5 .dbyt $0FD5 +001274r 1 0F D6 .dbyt $0FD6 +001276r 1 0F D7 .dbyt $0FD7 +001278r 1 0F D8 .dbyt $0FD8 +00127Ar 1 0F D9 .dbyt $0FD9 +00127Cr 1 0F DA .dbyt $0FDA +00127Er 1 0F DB .dbyt $0FDB +001280r 1 0F DC .dbyt $0FDC +001282r 1 0F DD .dbyt $0FDD +001284r 1 0F DE .dbyt $0FDE +001286r 1 0F DF .dbyt $0FDF +001288r 1 0F E0 .dbyt $0FE0 +00128Ar 1 0F E1 .dbyt $0FE1 +00128Cr 1 0F E2 .dbyt $0FE2 +00128Er 1 0F E3 .dbyt $0FE3 +001290r 1 0F E4 .dbyt $0FE4 +001292r 1 0F E5 .dbyt $0FE5 +001294r 1 0F E6 .dbyt $0FE6 +001296r 1 0F E7 .dbyt $0FE7 +001298r 1 0F E8 .dbyt $0FE8 +00129Ar 1 0F E9 .dbyt $0FE9 +00129Cr 1 0F EA .dbyt $0FEA +00129Er 1 0F EB .dbyt $0FEB +0012A0r 1 0F EC .dbyt $0FEC +0012A2r 1 0F ED .dbyt $0FED +0012A4r 1 0F EE .dbyt $0FEE +0012A6r 1 0F EF .dbyt $0FEF +0012A8r 1 0F F0 .dbyt $0FF0 +0012AAr 1 0F F1 .dbyt $0FF1 +0012ACr 1 0F F2 .dbyt $0FF2 +0012AEr 1 0F F3 .dbyt $0FF3 +0012B0r 1 0F F4 .dbyt $0FF4 +0012B2r 1 0F F5 .dbyt $0FF5 +0012B4r 1 0F F6 .dbyt $0FF6 +0012B6r 1 0F F7 .dbyt $0FF7 +0012B8r 1 0F F8 .dbyt $0FF8 +0012BAr 1 0F F9 .dbyt $0FF9 +0012BCr 1 0F FA .dbyt $0FFA +0012BEr 1 0F FB .dbyt $0FFB +0012C0r 1 0F FC .dbyt $0FFC +0012C2r 1 0F FD .dbyt $0FFD +0012C4r 1 0F FE .dbyt $0FFE +0012C6r 1 0F FF .dbyt $0FFF +0012C8r 1 10 00 .dbyt $1000 +0012CAr 1 10 01 .dbyt $1001 +0012CCr 1 10 02 .dbyt $1002 +0012CEr 1 10 03 .dbyt $1003 +0012D0r 1 10 04 .dbyt $1004 +0012D2r 1 10 05 .dbyt $1005 +0012D4r 1 10 06 .dbyt $1006 +0012D6r 1 10 07 .dbyt $1007 +0012D8r 1 10 08 .dbyt $1008 +0012DAr 1 7F F0 .dbyt $7FF0 +0012DCr 1 7F F1 .dbyt $7FF1 +0012DEr 1 7F F2 .dbyt $7FF2 +0012E0r 1 7F F3 .dbyt $7FF3 +0012E2r 1 7F F4 .dbyt $7FF4 +0012E4r 1 7F F5 .dbyt $7FF5 +0012E6r 1 7F F6 .dbyt $7FF6 +0012E8r 1 7F F7 .dbyt $7FF7 +0012EAr 1 7F F8 .dbyt $7FF8 +0012ECr 1 7F F9 .dbyt $7FF9 +0012EEr 1 7F FA .dbyt $7FFA +0012F0r 1 7F FB .dbyt $7FFB +0012F2r 1 7F FC .dbyt $7FFC +0012F4r 1 7F FD .dbyt $7FFD +0012F6r 1 7F FE .dbyt $7FFE +0012F8r 1 7F FF .dbyt $7FFF +0012FAr 1 80 00 .dbyt $8000 +0012FCr 1 80 01 .dbyt $8001 +0012FEr 1 80 02 .dbyt $8002 +001300r 1 80 03 .dbyt $8003 +001302r 1 80 04 .dbyt $8004 +001304r 1 80 05 .dbyt $8005 +001306r 1 80 06 .dbyt $8006 +001308r 1 80 07 .dbyt $8007 +00130Ar 1 80 08 .dbyt $8008 +00130Cr 1 80 09 .dbyt $8009 +00130Er 1 80 0A .dbyt $800A +001310r 1 80 0B .dbyt $800B +001312r 1 9F E1 .dbyt $9FE1 +001314r 1 9F E2 .dbyt $9FE2 +001316r 1 9F E3 .dbyt $9FE3 +001318r 1 9F E4 .dbyt $9FE4 +00131Ar 1 9F E5 .dbyt $9FE5 +00131Cr 1 9F E6 .dbyt $9FE6 +00131Er 1 9F E7 .dbyt $9FE7 +001320r 1 9F E8 .dbyt $9FE8 +001322r 1 9F E9 .dbyt $9FE9 +001324r 1 9F EA .dbyt $9FEA +001326r 1 9F EB .dbyt $9FEB +001328r 1 9F EC .dbyt $9FEC +00132Ar 1 9F ED .dbyt $9FED +00132Cr 1 9F EE .dbyt $9FEE +00132Er 1 9F EF .dbyt $9FEF +001330r 1 9F F0 .dbyt $9FF0 +001332r 1 9F F1 .dbyt $9FF1 +001334r 1 9F F2 .dbyt $9FF2 +001336r 1 9F F3 .dbyt $9FF3 +001338r 1 9F F4 .dbyt $9FF4 +00133Ar 1 9F F5 .dbyt $9FF5 +00133Cr 1 9F F6 .dbyt $9FF6 +00133Er 1 9F F7 .dbyt $9FF7 +001340r 1 9F F8 .dbyt $9FF8 +001342r 1 9F F9 .dbyt $9FF9 +001344r 1 9F FA .dbyt $9FFA +001346r 1 9F FB .dbyt $9FFB +001348r 1 9F FC .dbyt $9FFC +00134Ar 1 9F FD .dbyt $9FFD +00134Cr 1 9F FE .dbyt $9FFE +00134Er 1 9F FF .dbyt $9FFF +001350r 1 A0 00 .dbyt $A000 +001352r 1 A0 01 .dbyt $A001 +001354r 1 A0 02 .dbyt $A002 +001356r 1 A0 03 .dbyt $A003 +001358r 1 A0 04 .dbyt $A004 +00135Ar 1 A0 05 .dbyt $A005 +00135Cr 1 A0 06 .dbyt $A006 +00135Er 1 A0 07 .dbyt $A007 +001360r 1 A0 08 .dbyt $A008 +001362r 1 A0 09 .dbyt $A009 +001364r 1 A0 0A .dbyt $A00A +001366r 1 A0 0B .dbyt $A00B +001368r 1 A0 0C .dbyt $A00C +00136Ar 1 A0 0D .dbyt $A00D +00136Cr 1 A0 0E .dbyt $A00E +00136Er 1 A0 0F .dbyt $A00F +001370r 1 AF E1 .dbyt $AFE1 +001372r 1 AF E2 .dbyt $AFE2 +001374r 1 AF E3 .dbyt $AFE3 +001376r 1 AF E4 .dbyt $AFE4 +001378r 1 AF E5 .dbyt $AFE5 +00137Ar 1 AF E6 .dbyt $AFE6 +00137Cr 1 AF E7 .dbyt $AFE7 +00137Er 1 AF E8 .dbyt $AFE8 +001380r 1 AF E9 .dbyt $AFE9 +001382r 1 AF EA .dbyt $AFEA +001384r 1 AF EB .dbyt $AFEB +001386r 1 AF EC .dbyt $AFEC +001388r 1 AF ED .dbyt $AFED +00138Ar 1 AF EE .dbyt $AFEE +00138Cr 1 AF EF .dbyt $AFEF +00138Er 1 AF F0 .dbyt $AFF0 +001390r 1 AF F1 .dbyt $AFF1 +001392r 1 AF F2 .dbyt $AFF2 +001394r 1 AF F3 .dbyt $AFF3 +001396r 1 AF F4 .dbyt $AFF4 +001398r 1 AF F5 .dbyt $AFF5 +00139Ar 1 AF F6 .dbyt $AFF6 +00139Cr 1 AF F7 .dbyt $AFF7 +00139Er 1 AF F8 .dbyt $AFF8 +0013A0r 1 AF F9 .dbyt $AFF9 +0013A2r 1 AF FA .dbyt $AFFA +0013A4r 1 AF FB .dbyt $AFFB +0013A6r 1 AF FC .dbyt $AFFC +0013A8r 1 AF FD .dbyt $AFFD +0013AAr 1 AF FE .dbyt $AFFE +0013ACr 1 AF FF .dbyt $AFFF +0013AEr 1 B0 00 .dbyt $B000 +0013B0r 1 B0 01 .dbyt $B001 +0013B2r 1 B0 02 .dbyt $B002 +0013B4r 1 B0 03 .dbyt $B003 +0013B6r 1 B0 04 .dbyt $B004 +0013B8r 1 B0 05 .dbyt $B005 +0013BAr 1 B0 06 .dbyt $B006 +0013BCr 1 B0 07 .dbyt $B007 +0013BEr 1 B0 08 .dbyt $B008 +0013C0r 1 B0 09 .dbyt $B009 +0013C2r 1 B0 0A .dbyt $B00A +0013C4r 1 B0 0B .dbyt $B00B +0013C6r 1 B0 0C .dbyt $B00C +0013C8r 1 B0 0D .dbyt $B00D +0013CAr 1 B0 0E .dbyt $B00E +0013CCr 1 B0 0F .dbyt $B00F +0013CEr 1 BF E1 .dbyt $BFE1 +0013D0r 1 BF E2 .dbyt $BFE2 +0013D2r 1 BF E3 .dbyt $BFE3 +0013D4r 1 BF E4 .dbyt $BFE4 +0013D6r 1 BF E5 .dbyt $BFE5 +0013D8r 1 BF E6 .dbyt $BFE6 +0013DAr 1 BF E7 .dbyt $BFE7 +0013DCr 1 BF E8 .dbyt $BFE8 +0013DEr 1 BF E9 .dbyt $BFE9 +0013E0r 1 BF EA .dbyt $BFEA +0013E2r 1 BF EB .dbyt $BFEB +0013E4r 1 BF EC .dbyt $BFEC +0013E6r 1 BF ED .dbyt $BFED +0013E8r 1 BF EE .dbyt $BFEE +0013EAr 1 BF EF .dbyt $BFEF +0013ECr 1 BF F0 .dbyt $BFF0 +0013EEr 1 BF F1 .dbyt $BFF1 +0013F0r 1 BF F2 .dbyt $BFF2 +0013F2r 1 BF F3 .dbyt $BFF3 +0013F4r 1 BF F4 .dbyt $BFF4 +0013F6r 1 BF F5 .dbyt $BFF5 +0013F8r 1 BF F6 .dbyt $BFF6 +0013FAr 1 BF F7 .dbyt $BFF7 +0013FCr 1 BF F8 .dbyt $BFF8 +0013FEr 1 BF F9 .dbyt $BFF9 +001400r 1 BF FA .dbyt $BFFA +001402r 1 BF FB .dbyt $BFFB +001404r 1 BF FC .dbyt $BFFC +001406r 1 BF FD .dbyt $BFFD +001408r 1 BF FE .dbyt $BFFE +00140Ar 1 BF FF .dbyt $BFFF +00140Cr 1 C0 00 .dbyt $C000 +00140Er 1 C0 01 .dbyt $C001 +001410r 1 C0 02 .dbyt $C002 +001412r 1 C0 03 .dbyt $C003 +001414r 1 C0 04 .dbyt $C004 +001416r 1 C0 05 .dbyt $C005 +001418r 1 C0 06 .dbyt $C006 +00141Ar 1 C0 07 .dbyt $C007 +00141Cr 1 C0 08 .dbyt $C008 +00141Er 1 C0 09 .dbyt $C009 +001420r 1 C0 0A .dbyt $C00A +001422r 1 C0 0B .dbyt $C00B +001424r 1 C0 0C .dbyt $C00C +001426r 1 C0 0D .dbyt $C00D +001428r 1 C0 0E .dbyt $C00E +00142Ar 1 C0 0F .dbyt $C00F +00142Cr 1 CF E1 .dbyt $CFE1 +00142Er 1 CF E2 .dbyt $CFE2 +001430r 1 CF E3 .dbyt $CFE3 +001432r 1 CF E4 .dbyt $CFE4 +001434r 1 CF E5 .dbyt $CFE5 +001436r 1 CF E6 .dbyt $CFE6 +001438r 1 CF E7 .dbyt $CFE7 +00143Ar 1 CF E8 .dbyt $CFE8 +00143Cr 1 CF E9 .dbyt $CFE9 +00143Er 1 CF EA .dbyt $CFEA +001440r 1 CF EB .dbyt $CFEB +001442r 1 CF EC .dbyt $CFEC +001444r 1 CF ED .dbyt $CFED +001446r 1 CF EE .dbyt $CFEE +001448r 1 CF EF .dbyt $CFEF +00144Ar 1 CF F0 .dbyt $CFF0 +00144Cr 1 CF F1 .dbyt $CFF1 +00144Er 1 CF F2 .dbyt $CFF2 +001450r 1 CF F3 .dbyt $CFF3 +001452r 1 CF F4 .dbyt $CFF4 +001454r 1 CF F5 .dbyt $CFF5 +001456r 1 CF F6 .dbyt $CFF6 +001458r 1 CF F7 .dbyt $CFF7 +00145Ar 1 CF F8 .dbyt $CFF8 +00145Cr 1 CF F9 .dbyt $CFF9 +00145Er 1 CF FA .dbyt $CFFA +001460r 1 CF FB .dbyt $CFFB +001462r 1 CF FC .dbyt $CFFC +001464r 1 CF FD .dbyt $CFFD +001466r 1 CF FE .dbyt $CFFE +001468r 1 CF FF .dbyt $CFFF +00146Ar 1 D0 00 .dbyt $D000 +00146Cr 1 D0 01 .dbyt $D001 +00146Er 1 D0 02 .dbyt $D002 +001470r 1 D0 03 .dbyt $D003 +001472r 1 D0 04 .dbyt $D004 +001474r 1 D0 05 .dbyt $D005 +001476r 1 D0 06 .dbyt $D006 +001478r 1 D0 07 .dbyt $D007 +00147Ar 1 D0 08 .dbyt $D008 +00147Cr 1 D0 09 .dbyt $D009 +00147Er 1 D0 0A .dbyt $D00A +001480r 1 D0 0B .dbyt $D00B +001482r 1 D0 0C .dbyt $D00C +001484r 1 D0 0D .dbyt $D00D +001486r 1 D0 0E .dbyt $D00E +001488r 1 D0 0F .dbyt $D00F +00148Ar 1 DF E1 .dbyt $DFE1 +00148Cr 1 DF E2 .dbyt $DFE2 +00148Er 1 DF E3 .dbyt $DFE3 +001490r 1 DF E4 .dbyt $DFE4 +001492r 1 DF E5 .dbyt $DFE5 +001494r 1 DF E6 .dbyt $DFE6 +001496r 1 DF E7 .dbyt $DFE7 +001498r 1 DF E8 .dbyt $DFE8 +00149Ar 1 DF E9 .dbyt $DFE9 +00149Cr 1 DF EA .dbyt $DFEA +00149Er 1 DF EB .dbyt $DFEB +0014A0r 1 DF EC .dbyt $DFEC +0014A2r 1 DF ED .dbyt $DFED +0014A4r 1 DF EE .dbyt $DFEE +0014A6r 1 DF EF .dbyt $DFEF +0014A8r 1 DF F0 .dbyt $DFF0 +0014AAr 1 DF F1 .dbyt $DFF1 +0014ACr 1 DF F2 .dbyt $DFF2 +0014AEr 1 DF F3 .dbyt $DFF3 +0014B0r 1 DF F4 .dbyt $DFF4 +0014B2r 1 DF F5 .dbyt $DFF5 +0014B4r 1 DF F6 .dbyt $DFF6 +0014B6r 1 DF F7 .dbyt $DFF7 +0014B8r 1 DF F8 .dbyt $DFF8 +0014BAr 1 DF F9 .dbyt $DFF9 +0014BCr 1 DF FA .dbyt $DFFA +0014BEr 1 DF FB .dbyt $DFFB +0014C0r 1 DF FC .dbyt $DFFC +0014C2r 1 DF FD .dbyt $DFFD +0014C4r 1 DF FE .dbyt $DFFE +0014C6r 1 DF FF .dbyt $DFFF +0014C8r 1 E0 00 .dbyt $E000 +0014CAr 1 E0 01 .dbyt $E001 +0014CCr 1 E0 02 .dbyt $E002 +0014CEr 1 E0 03 .dbyt $E003 +0014D0r 1 E0 04 .dbyt $E004 +0014D2r 1 E0 05 .dbyt $E005 +0014D4r 1 E0 06 .dbyt $E006 +0014D6r 1 E0 07 .dbyt $E007 +0014D8r 1 E0 08 .dbyt $E008 +0014DAr 1 E0 09 .dbyt $E009 +0014DCr 1 E0 0A .dbyt $E00A +0014DEr 1 E0 0B .dbyt $E00B +0014E0r 1 E0 0C .dbyt $E00C +0014E2r 1 E0 0D .dbyt $E00D +0014E4r 1 E0 0E .dbyt $E00E +0014E6r 1 E0 0F .dbyt $E00F +0014E8r 1 EF E1 .dbyt $EFE1 +0014EAr 1 EF E2 .dbyt $EFE2 +0014ECr 1 EF E3 .dbyt $EFE3 +0014EEr 1 EF E4 .dbyt $EFE4 +0014F0r 1 EF E5 .dbyt $EFE5 +0014F2r 1 EF E6 .dbyt $EFE6 +0014F4r 1 EF E7 .dbyt $EFE7 +0014F6r 1 EF E8 .dbyt $EFE8 +0014F8r 1 EF E9 .dbyt $EFE9 +0014FAr 1 EF EA .dbyt $EFEA +0014FCr 1 EF EB .dbyt $EFEB +0014FEr 1 EF EC .dbyt $EFEC +001500r 1 EF ED .dbyt $EFED +001502r 1 EF EE .dbyt $EFEE +001504r 1 EF EF .dbyt $EFEF +001506r 1 EF F0 .dbyt $EFF0 +001508r 1 EF F1 .dbyt $EFF1 +00150Ar 1 EF F2 .dbyt $EFF2 +00150Cr 1 EF F3 .dbyt $EFF3 +00150Er 1 EF F4 .dbyt $EFF4 +001510r 1 EF F5 .dbyt $EFF5 +001512r 1 EF F6 .dbyt $EFF6 +001514r 1 EF F7 .dbyt $EFF7 +001516r 1 EF F8 .dbyt $EFF8 +001518r 1 EF F9 .dbyt $EFF9 +00151Ar 1 EF FA .dbyt $EFFA +00151Cr 1 EF FB .dbyt $EFFB +00151Er 1 EF FC .dbyt $EFFC +001520r 1 EF FD .dbyt $EFFD +001522r 1 EF FE .dbyt $EFFE +001524r 1 EF FF .dbyt $EFFF +001526r 1 F0 00 .dbyt $F000 +001528r 1 F0 01 .dbyt $F001 +00152Ar 1 F0 02 .dbyt $F002 +00152Cr 1 F0 03 .dbyt $F003 +00152Er 1 F0 04 .dbyt $F004 +001530r 1 F0 05 .dbyt $F005 +001532r 1 F0 06 .dbyt $F006 +001534r 1 F0 07 .dbyt $F007 +001536r 1 F0 08 .dbyt $F008 +001538r 1 F0 09 .dbyt $F009 +00153Ar 1 F0 0A .dbyt $F00A +00153Cr 1 F0 0B .dbyt $F00B +00153Er 1 F0 0C .dbyt $F00C +001540r 1 F0 0D .dbyt $F00D +001542r 1 F0 0E .dbyt $F00E +001544r 1 F0 0F .dbyt $F00F +001546r 1 FF E1 .dbyt $FFE1 +001548r 1 FF E2 .dbyt $FFE2 +00154Ar 1 FF E3 .dbyt $FFE3 +00154Cr 1 FF E4 .dbyt $FFE4 +00154Er 1 FF E5 .dbyt $FFE5 +001550r 1 FF E6 .dbyt $FFE6 +001552r 1 FF E7 .dbyt $FFE7 +001554r 1 FF E8 .dbyt $FFE8 +001556r 1 FF E9 .dbyt $FFE9 +001558r 1 FF EA .dbyt $FFEA +00155Ar 1 FF EB .dbyt $FFEB +00155Cr 1 FF EC .dbyt $FFEC +00155Er 1 FF ED .dbyt $FFED +001560r 1 FF EE .dbyt $FFEE +001562r 1 FF EF .dbyt $FFEF +001564r 1 FF F0 .dbyt $FFF0 +001566r 1 FF F1 .dbyt $FFF1 +001568r 1 FF F2 .dbyt $FFF2 +00156Ar 1 FF F3 .dbyt $FFF3 +00156Cr 1 FF F4 .dbyt $FFF4 +00156Er 1 FF F5 .dbyt $FFF5 +001570r 1 FF F6 .dbyt $FFF6 +001572r 1 FF F7 .dbyt $FFF7 +001574r 1 FF F8 .dbyt $FFF8 +001576r 1 FF F9 .dbyt $FFF9 +001578r 1 FF FA .dbyt $FFFA +00157Ar 1 FF FB .dbyt $FFFB +00157Cr 1 FF FC .dbyt $FFFC +00157Er 1 FF FD .dbyt $FFFD +001580r 1 FF FE .dbyt $FFFE +001582r 1 FF FF .dbyt $FFFF +001584r 1 +001584r 1 ; alternative hex values +001584r 1 00 00 .dbyt 0h +001586r 1 00 01 .dbyt 1h +001588r 1 00 02 .dbyt 2h +00158Ar 1 00 03 .dbyt 3h +00158Cr 1 00 04 .dbyt 4h +00158Er 1 00 05 .dbyt 5h +001590r 1 00 06 .dbyt 6h +001592r 1 00 07 .dbyt 7h +001594r 1 00 08 .dbyt 8h +001596r 1 00 09 .dbyt 9h +001598r 1 00 0A .dbyt 0ah +00159Ar 1 00 0B .dbyt 0bh +00159Cr 1 00 0C .dbyt 0ch +00159Er 1 00 0D .dbyt 0dh +0015A0r 1 00 0E .dbyt 0eh +0015A2r 1 00 0F .dbyt 0fh +0015A4r 1 00 10 .dbyt 10h +0015A6r 1 00 11 .dbyt 11h +0015A8r 1 00 12 .dbyt 12h +0015AAr 1 00 13 .dbyt 13h +0015ACr 1 00 70 .dbyt 70h +0015AEr 1 00 71 .dbyt 71h +0015B0r 1 00 72 .dbyt 72h +0015B2r 1 00 73 .dbyt 73h +0015B4r 1 00 74 .dbyt 74h +0015B6r 1 00 75 .dbyt 75h +0015B8r 1 00 76 .dbyt 76h +0015BAr 1 00 77 .dbyt 77h +0015BCr 1 00 78 .dbyt 78h +0015BEr 1 00 79 .dbyt 79h +0015C0r 1 00 7A .dbyt 7ah +0015C2r 1 00 7B .dbyt 7bh +0015C4r 1 00 7C .dbyt 7ch +0015C6r 1 00 7D .dbyt 7dh +0015C8r 1 00 7E .dbyt 7eh +0015CAr 1 00 7F .dbyt 7fh +0015CCr 1 00 80 .dbyt 80h +0015CEr 1 00 81 .dbyt 81h +0015D0r 1 00 82 .dbyt 82h +0015D2r 1 00 83 .dbyt 83h +0015D4r 1 00 84 .dbyt 84h +0015D6r 1 00 85 .dbyt 85h +0015D8r 1 00 86 .dbyt 86h +0015DAr 1 00 F0 .dbyt 0f0h +0015DCr 1 00 F1 .dbyt 0f1h +0015DEr 1 00 F2 .dbyt 0f2h +0015E0r 1 00 F3 .dbyt 0f3h +0015E2r 1 00 F4 .dbyt 0f4h +0015E4r 1 00 F5 .dbyt 0f5h +0015E6r 1 00 F6 .dbyt 0f6h +0015E8r 1 00 F7 .dbyt 0f7h +0015EAr 1 00 F8 .dbyt 0f8h +0015ECr 1 00 F9 .dbyt 0f9h +0015EEr 1 00 FA .dbyt 0fah +0015F0r 1 00 FB .dbyt 0fbh +0015F2r 1 00 FC .dbyt 0fch +0015F4r 1 00 FD .dbyt 0fdh +0015F6r 1 00 FE .dbyt 0feh +0015F8r 1 00 FF .dbyt 0ffh +0015FAr 1 01 00 .dbyt 100h +0015FCr 1 01 01 .dbyt 101h +0015FEr 1 01 02 .dbyt 102h +001600r 1 01 03 .dbyt 103h +001602r 1 0F D2 .dbyt 0fd2h +001604r 1 0F D3 .dbyt 0fd3h +001606r 1 0F D4 .dbyt 0fd4h +001608r 1 0F D5 .dbyt 0fd5h +00160Ar 1 0F D6 .dbyt 0fd6h +00160Cr 1 0F D7 .dbyt 0fd7h +00160Er 1 0F D8 .dbyt 0fd8h +001610r 1 0F D9 .dbyt 0fd9h +001612r 1 0F DA .dbyt 0fdah +001614r 1 0F DB .dbyt 0fdbh +001616r 1 0F DC .dbyt 0fdch +001618r 1 0F DD .dbyt 0fddh +00161Ar 1 0F DE .dbyt 0fdeh +00161Cr 1 0F DF .dbyt 0fdfh +00161Er 1 0F E0 .dbyt 0fe0h +001620r 1 0F E1 .dbyt 0fe1h +001622r 1 0F E2 .dbyt 0fe2h +001624r 1 0F E3 .dbyt 0fe3h +001626r 1 0F E4 .dbyt 0fe4h +001628r 1 0F E5 .dbyt 0fe5h +00162Ar 1 0F E6 .dbyt 0fe6h +00162Cr 1 0F E7 .dbyt 0fe7h +00162Er 1 0F E8 .dbyt 0fe8h +001630r 1 0F E9 .dbyt 0fe9h +001632r 1 0F EA .dbyt 0feah +001634r 1 0F EB .dbyt 0febh +001636r 1 0F EC .dbyt 0fech +001638r 1 0F ED .dbyt 0fedh +00163Ar 1 0F EE .dbyt 0feeh +00163Cr 1 0F EF .dbyt 0fefh +00163Er 1 0F F0 .dbyt 0ff0h +001640r 1 0F F1 .dbyt 0ff1h +001642r 1 0F F2 .dbyt 0ff2h +001644r 1 0F F3 .dbyt 0ff3h +001646r 1 0F F4 .dbyt 0ff4h +001648r 1 0F F5 .dbyt 0ff5h +00164Ar 1 0F F6 .dbyt 0ff6h +00164Cr 1 0F F7 .dbyt 0ff7h +00164Er 1 0F F8 .dbyt 0ff8h +001650r 1 0F F9 .dbyt 0ff9h +001652r 1 0F FA .dbyt 0ffah +001654r 1 0F FB .dbyt 0ffbh +001656r 1 0F FC .dbyt 0ffch +001658r 1 0F FD .dbyt 0ffdh +00165Ar 1 0F FE .dbyt 0ffeh +00165Cr 1 0F FF .dbyt 0fffh +00165Er 1 10 00 .dbyt 1000h +001660r 1 10 01 .dbyt 1001h +001662r 1 10 02 .dbyt 1002h +001664r 1 10 03 .dbyt 1003h +001666r 1 10 04 .dbyt 1004h +001668r 1 10 05 .dbyt 1005h +00166Ar 1 10 06 .dbyt 1006h +00166Cr 1 10 07 .dbyt 1007h +00166Er 1 10 08 .dbyt 1008h +001670r 1 7F F0 .dbyt 7ff0h +001672r 1 7F F1 .dbyt 7ff1h +001674r 1 7F F2 .dbyt 7ff2h +001676r 1 7F F3 .dbyt 7ff3h +001678r 1 7F F4 .dbyt 7ff4h +00167Ar 1 7F F5 .dbyt 7ff5h +00167Cr 1 7F F6 .dbyt 7ff6h +00167Er 1 7F F7 .dbyt 7ff7h +001680r 1 7F F8 .dbyt 7ff8h +001682r 1 7F F9 .dbyt 7ff9h +001684r 1 7F FA .dbyt 7ffah +001686r 1 7F FB .dbyt 7ffbh +001688r 1 7F FC .dbyt 7ffch +00168Ar 1 7F FD .dbyt 7ffdh +00168Cr 1 7F FE .dbyt 7ffeh +00168Er 1 7F FF .dbyt 7fffh +001690r 1 80 00 .dbyt 8000h +001692r 1 80 01 .dbyt 8001h +001694r 1 80 02 .dbyt 8002h +001696r 1 80 03 .dbyt 8003h +001698r 1 80 04 .dbyt 8004h +00169Ar 1 80 05 .dbyt 8005h +00169Cr 1 80 06 .dbyt 8006h +00169Er 1 80 07 .dbyt 8007h +0016A0r 1 80 08 .dbyt 8008h +0016A2r 1 80 09 .dbyt 8009h +0016A4r 1 80 0A .dbyt 800ah +0016A6r 1 80 0B .dbyt 800bh +0016A8r 1 9F E1 .dbyt 9fe1h +0016AAr 1 9F E2 .dbyt 9fe2h +0016ACr 1 9F E3 .dbyt 9fe3h +0016AEr 1 9F E4 .dbyt 9fe4h +0016B0r 1 9F E5 .dbyt 9fe5h +0016B2r 1 9F E6 .dbyt 9fe6h +0016B4r 1 9F E7 .dbyt 9fe7h +0016B6r 1 9F E8 .dbyt 9fe8h +0016B8r 1 9F E9 .dbyt 9fe9h +0016BAr 1 9F EA .dbyt 9feah +0016BCr 1 9F EB .dbyt 9febh +0016BEr 1 9F EC .dbyt 9fech +0016C0r 1 9F ED .dbyt 9fedh +0016C2r 1 9F EE .dbyt 9feeh +0016C4r 1 9F EF .dbyt 9fefh +0016C6r 1 9F F0 .dbyt 9ff0h +0016C8r 1 9F F1 .dbyt 9ff1h +0016CAr 1 9F F2 .dbyt 9ff2h +0016CCr 1 9F F3 .dbyt 9ff3h +0016CEr 1 9F F4 .dbyt 9ff4h +0016D0r 1 9F F5 .dbyt 9ff5h +0016D2r 1 9F F6 .dbyt 9ff6h +0016D4r 1 9F F7 .dbyt 9ff7h +0016D6r 1 9F F8 .dbyt 9ff8h +0016D8r 1 9F F9 .dbyt 9ff9h +0016DAr 1 9F FA .dbyt 9ffah +0016DCr 1 9F FB .dbyt 9ffbh +0016DEr 1 9F FC .dbyt 9ffch +0016E0r 1 9F FD .dbyt 9ffdh +0016E2r 1 9F FE .dbyt 9ffeh +0016E4r 1 9F FF .dbyt 9fffh +0016E6r 1 A0 00 .dbyt 0a000h +0016E8r 1 A0 01 .dbyt 0a001h +0016EAr 1 A0 02 .dbyt 0a002h +0016ECr 1 A0 03 .dbyt 0a003h +0016EEr 1 A0 04 .dbyt 0a004h +0016F0r 1 A0 05 .dbyt 0a005h +0016F2r 1 A0 06 .dbyt 0a006h +0016F4r 1 A0 07 .dbyt 0a007h +0016F6r 1 A0 08 .dbyt 0a008h +0016F8r 1 A0 09 .dbyt 0a009h +0016FAr 1 A0 0A .dbyt 0a00ah +0016FCr 1 A0 0B .dbyt 0a00bh +0016FEr 1 A0 0C .dbyt 0a00ch +001700r 1 A0 0D .dbyt 0a00dh +001702r 1 A0 0E .dbyt 0a00eh +001704r 1 A0 0F .dbyt 0a00fh +001706r 1 AF E1 .dbyt 0afe1h +001708r 1 AF E2 .dbyt 0afe2h +00170Ar 1 AF E3 .dbyt 0afe3h +00170Cr 1 AF E4 .dbyt 0afe4h +00170Er 1 AF E5 .dbyt 0afe5h +001710r 1 AF E6 .dbyt 0afe6h +001712r 1 AF E7 .dbyt 0afe7h +001714r 1 AF E8 .dbyt 0afe8h +001716r 1 AF E9 .dbyt 0afe9h +001718r 1 AF EA .dbyt 0afeah +00171Ar 1 AF EB .dbyt 0afebh +00171Cr 1 AF EC .dbyt 0afech +00171Er 1 AF ED .dbyt 0afedh +001720r 1 AF EE .dbyt 0afeeh +001722r 1 AF EF .dbyt 0afefh +001724r 1 AF F0 .dbyt 0aff0h +001726r 1 AF F1 .dbyt 0aff1h +001728r 1 AF F2 .dbyt 0aff2h +00172Ar 1 AF F3 .dbyt 0aff3h +00172Cr 1 AF F4 .dbyt 0aff4h +00172Er 1 AF F5 .dbyt 0aff5h +001730r 1 AF F6 .dbyt 0aff6h +001732r 1 AF F7 .dbyt 0aff7h +001734r 1 AF F8 .dbyt 0aff8h +001736r 1 AF F9 .dbyt 0aff9h +001738r 1 AF FA .dbyt 0affah +00173Ar 1 AF FB .dbyt 0affbh +00173Cr 1 AF FC .dbyt 0affch +00173Er 1 AF FD .dbyt 0affdh +001740r 1 AF FE .dbyt 0affeh +001742r 1 AF FF .dbyt 0afffh +001744r 1 B0 00 .dbyt 0b000h +001746r 1 B0 01 .dbyt 0b001h +001748r 1 B0 02 .dbyt 0b002h +00174Ar 1 B0 03 .dbyt 0b003h +00174Cr 1 B0 04 .dbyt 0b004h +00174Er 1 B0 05 .dbyt 0b005h +001750r 1 B0 06 .dbyt 0b006h +001752r 1 B0 07 .dbyt 0b007h +001754r 1 B0 08 .dbyt 0b008h +001756r 1 B0 09 .dbyt 0b009h +001758r 1 B0 0A .dbyt 0b00ah +00175Ar 1 B0 0B .dbyt 0b00bh +00175Cr 1 B0 0C .dbyt 0b00ch +00175Er 1 B0 0D .dbyt 0b00dh +001760r 1 B0 0E .dbyt 0b00eh +001762r 1 B0 0F .dbyt 0b00fh +001764r 1 BF E1 .dbyt 0bfe1h +001766r 1 BF E2 .dbyt 0bfe2h +001768r 1 BF E3 .dbyt 0bfe3h +00176Ar 1 BF E4 .dbyt 0bfe4h +00176Cr 1 BF E5 .dbyt 0bfe5h +00176Er 1 BF E6 .dbyt 0bfe6h +001770r 1 BF E7 .dbyt 0bfe7h +001772r 1 BF E8 .dbyt 0bfe8h +001774r 1 BF E9 .dbyt 0bfe9h +001776r 1 BF EA .dbyt 0bfeah +001778r 1 BF EB .dbyt 0bfebh +00177Ar 1 BF EC .dbyt 0bfech +00177Cr 1 BF ED .dbyt 0bfedh +00177Er 1 BF EE .dbyt 0bfeeh +001780r 1 BF EF .dbyt 0bfefh +001782r 1 BF F0 .dbyt 0bff0h +001784r 1 BF F1 .dbyt 0bff1h +001786r 1 BF F2 .dbyt 0bff2h +001788r 1 BF F3 .dbyt 0bff3h +00178Ar 1 BF F4 .dbyt 0bff4h +00178Cr 1 BF F5 .dbyt 0bff5h +00178Er 1 BF F6 .dbyt 0bff6h +001790r 1 BF F7 .dbyt 0bff7h +001792r 1 BF F8 .dbyt 0bff8h +001794r 1 BF F9 .dbyt 0bff9h +001796r 1 BF FA .dbyt 0bffah +001798r 1 BF FB .dbyt 0bffbh +00179Ar 1 BF FC .dbyt 0bffch +00179Cr 1 BF FD .dbyt 0bffdh +00179Er 1 BF FE .dbyt 0bffeh +0017A0r 1 BF FF .dbyt 0bfffh +0017A2r 1 C0 00 .dbyt 0c000h +0017A4r 1 C0 01 .dbyt 0c001h +0017A6r 1 C0 02 .dbyt 0c002h +0017A8r 1 C0 03 .dbyt 0c003h +0017AAr 1 C0 04 .dbyt 0c004h +0017ACr 1 C0 05 .dbyt 0c005h +0017AEr 1 C0 06 .dbyt 0c006h +0017B0r 1 C0 07 .dbyt 0c007h +0017B2r 1 C0 08 .dbyt 0c008h +0017B4r 1 C0 09 .dbyt 0c009h +0017B6r 1 C0 0A .dbyt 0c00ah +0017B8r 1 C0 0B .dbyt 0c00bh +0017BAr 1 C0 0C .dbyt 0c00ch +0017BCr 1 C0 0D .dbyt 0c00dh +0017BEr 1 C0 0E .dbyt 0c00eh +0017C0r 1 C0 0F .dbyt 0c00fh +0017C2r 1 CF E1 .dbyt 0cfe1h +0017C4r 1 CF E2 .dbyt 0cfe2h +0017C6r 1 CF E3 .dbyt 0cfe3h +0017C8r 1 CF E4 .dbyt 0cfe4h +0017CAr 1 CF E5 .dbyt 0cfe5h +0017CCr 1 CF E6 .dbyt 0cfe6h +0017CEr 1 CF E7 .dbyt 0cfe7h +0017D0r 1 CF E8 .dbyt 0cfe8h +0017D2r 1 CF E9 .dbyt 0cfe9h +0017D4r 1 CF EA .dbyt 0cfeah +0017D6r 1 CF EB .dbyt 0cfebh +0017D8r 1 CF EC .dbyt 0cfech +0017DAr 1 CF ED .dbyt 0cfedh +0017DCr 1 CF EE .dbyt 0cfeeh +0017DEr 1 CF EF .dbyt 0cfefh +0017E0r 1 CF F0 .dbyt 0cff0h +0017E2r 1 CF F1 .dbyt 0cff1h +0017E4r 1 CF F2 .dbyt 0cff2h +0017E6r 1 CF F3 .dbyt 0cff3h +0017E8r 1 CF F4 .dbyt 0cff4h +0017EAr 1 CF F5 .dbyt 0cff5h +0017ECr 1 CF F6 .dbyt 0cff6h +0017EEr 1 CF F7 .dbyt 0cff7h +0017F0r 1 CF F8 .dbyt 0cff8h +0017F2r 1 CF F9 .dbyt 0cff9h +0017F4r 1 CF FA .dbyt 0cffah +0017F6r 1 CF FB .dbyt 0cffbh +0017F8r 1 CF FC .dbyt 0cffch +0017FAr 1 CF FD .dbyt 0cffdh +0017FCr 1 CF FE .dbyt 0cffeh +0017FEr 1 CF FF .dbyt 0cfffh +001800r 1 D0 00 .dbyt 0d000h +001802r 1 D0 01 .dbyt 0d001h +001804r 1 D0 02 .dbyt 0d002h +001806r 1 D0 03 .dbyt 0d003h +001808r 1 D0 04 .dbyt 0d004h +00180Ar 1 D0 05 .dbyt 0d005h +00180Cr 1 D0 06 .dbyt 0d006h +00180Er 1 D0 07 .dbyt 0d007h +001810r 1 D0 08 .dbyt 0d008h +001812r 1 D0 09 .dbyt 0d009h +001814r 1 D0 0A .dbyt 0d00ah +001816r 1 D0 0B .dbyt 0d00bh +001818r 1 D0 0C .dbyt 0d00ch +00181Ar 1 D0 0D .dbyt 0d00dh +00181Cr 1 D0 0E .dbyt 0d00eh +00181Er 1 D0 0F .dbyt 0d00fh +001820r 1 DF E1 .dbyt 0dfe1h +001822r 1 DF E2 .dbyt 0dfe2h +001824r 1 DF E3 .dbyt 0dfe3h +001826r 1 DF E4 .dbyt 0dfe4h +001828r 1 DF E5 .dbyt 0dfe5h +00182Ar 1 DF E6 .dbyt 0dfe6h +00182Cr 1 DF E7 .dbyt 0dfe7h +00182Er 1 DF E8 .dbyt 0dfe8h +001830r 1 DF E9 .dbyt 0dfe9h +001832r 1 DF EA .dbyt 0dfeah +001834r 1 DF EB .dbyt 0dfebh +001836r 1 DF EC .dbyt 0dfech +001838r 1 DF ED .dbyt 0dfedh +00183Ar 1 DF EE .dbyt 0dfeeh +00183Cr 1 DF EF .dbyt 0dfefh +00183Er 1 DF F0 .dbyt 0dff0h +001840r 1 DF F1 .dbyt 0dff1h +001842r 1 DF F2 .dbyt 0dff2h +001844r 1 DF F3 .dbyt 0dff3h +001846r 1 DF F4 .dbyt 0dff4h +001848r 1 DF F5 .dbyt 0dff5h +00184Ar 1 DF F6 .dbyt 0dff6h +00184Cr 1 DF F7 .dbyt 0dff7h +00184Er 1 DF F8 .dbyt 0dff8h +001850r 1 DF F9 .dbyt 0dff9h +001852r 1 DF FA .dbyt 0dffah +001854r 1 DF FB .dbyt 0dffbh +001856r 1 DF FC .dbyt 0dffch +001858r 1 DF FD .dbyt 0dffdh +00185Ar 1 DF FE .dbyt 0dffeh +00185Cr 1 DF FF .dbyt 0dfffh +00185Er 1 E0 00 .dbyt 0e000h +001860r 1 E0 01 .dbyt 0e001h +001862r 1 E0 02 .dbyt 0e002h +001864r 1 E0 03 .dbyt 0e003h +001866r 1 E0 04 .dbyt 0e004h +001868r 1 E0 05 .dbyt 0e005h +00186Ar 1 E0 06 .dbyt 0e006h +00186Cr 1 E0 07 .dbyt 0e007h +00186Er 1 E0 08 .dbyt 0e008h +001870r 1 E0 09 .dbyt 0e009h +001872r 1 E0 0A .dbyt 0e00ah +001874r 1 E0 0B .dbyt 0e00bh +001876r 1 E0 0C .dbyt 0e00ch +001878r 1 E0 0D .dbyt 0e00dh +00187Ar 1 E0 0E .dbyt 0e00eh +00187Cr 1 E0 0F .dbyt 0e00fh +00187Er 1 EF E1 .dbyt 0efe1h +001880r 1 EF E2 .dbyt 0efe2h +001882r 1 EF E3 .dbyt 0efe3h +001884r 1 EF E4 .dbyt 0efe4h +001886r 1 EF E5 .dbyt 0efe5h +001888r 1 EF E6 .dbyt 0efe6h +00188Ar 1 EF E7 .dbyt 0efe7h +00188Cr 1 EF E8 .dbyt 0efe8h +00188Er 1 EF E9 .dbyt 0efe9h +001890r 1 EF EA .dbyt 0efeah +001892r 1 EF EB .dbyt 0efebh +001894r 1 EF EC .dbyt 0efech +001896r 1 EF ED .dbyt 0efedh +001898r 1 EF EE .dbyt 0efeeh +00189Ar 1 EF EF .dbyt 0efefh +00189Cr 1 EF F0 .dbyt 0eff0h +00189Er 1 EF F1 .dbyt 0eff1h +0018A0r 1 EF F2 .dbyt 0eff2h +0018A2r 1 EF F3 .dbyt 0eff3h +0018A4r 1 EF F4 .dbyt 0eff4h +0018A6r 1 EF F5 .dbyt 0eff5h +0018A8r 1 EF F6 .dbyt 0eff6h +0018AAr 1 EF F7 .dbyt 0eff7h +0018ACr 1 EF F8 .dbyt 0eff8h +0018AEr 1 EF F9 .dbyt 0eff9h +0018B0r 1 EF FA .dbyt 0effah +0018B2r 1 EF FB .dbyt 0effbh +0018B4r 1 EF FC .dbyt 0effch +0018B6r 1 EF FD .dbyt 0effdh +0018B8r 1 EF FE .dbyt 0effeh +0018BAr 1 EF FF .dbyt 0efffh +0018BCr 1 F0 00 .dbyt 0f000h +0018BEr 1 F0 01 .dbyt 0f001h +0018C0r 1 F0 02 .dbyt 0f002h +0018C2r 1 F0 03 .dbyt 0f003h +0018C4r 1 F0 04 .dbyt 0f004h +0018C6r 1 F0 05 .dbyt 0f005h +0018C8r 1 F0 06 .dbyt 0f006h +0018CAr 1 F0 07 .dbyt 0f007h +0018CCr 1 F0 08 .dbyt 0f008h +0018CEr 1 F0 09 .dbyt 0f009h +0018D0r 1 F0 0A .dbyt 0f00ah +0018D2r 1 F0 0B .dbyt 0f00bh +0018D4r 1 F0 0C .dbyt 0f00ch +0018D6r 1 F0 0D .dbyt 0f00dh +0018D8r 1 F0 0E .dbyt 0f00eh +0018DAr 1 F0 0F .dbyt 0f00fh +0018DCr 1 FF E1 .dbyt 0ffe1h +0018DEr 1 FF E2 .dbyt 0ffe2h +0018E0r 1 FF E3 .dbyt 0ffe3h +0018E2r 1 FF E4 .dbyt 0ffe4h +0018E4r 1 FF E5 .dbyt 0ffe5h +0018E6r 1 FF E6 .dbyt 0ffe6h +0018E8r 1 FF E7 .dbyt 0ffe7h +0018EAr 1 FF E8 .dbyt 0ffe8h +0018ECr 1 FF E9 .dbyt 0ffe9h +0018EEr 1 FF EA .dbyt 0ffeah +0018F0r 1 FF EB .dbyt 0ffebh +0018F2r 1 FF EC .dbyt 0ffech +0018F4r 1 FF ED .dbyt 0ffedh +0018F6r 1 FF EE .dbyt 0ffeeh +0018F8r 1 FF EF .dbyt 0ffefh +0018FAr 1 FF F0 .dbyt 0fff0h +0018FCr 1 FF F1 .dbyt 0fff1h +0018FEr 1 FF F2 .dbyt 0fff2h +001900r 1 FF F3 .dbyt 0fff3h +001902r 1 FF F4 .dbyt 0fff4h +001904r 1 FF F5 .dbyt 0fff5h +001906r 1 FF F6 .dbyt 0fff6h +001908r 1 FF F7 .dbyt 0fff7h +00190Ar 1 FF F8 .dbyt 0fff8h +00190Cr 1 FF F9 .dbyt 0fff9h +00190Er 1 FF FA .dbyt 0fffah +001910r 1 FF FB .dbyt 0fffbh +001912r 1 FF FC .dbyt 0fffch +001914r 1 FF FD .dbyt 0fffdh +001916r 1 FF FE .dbyt 0fffeh +001918r 1 FF FF .dbyt 0ffffh +00191Ar 1 +00191Ar 1 ; alternative hex values, uppercase +00191Ar 1 00 00 .dbyt 0h +00191Cr 1 00 01 .dbyt 1h +00191Er 1 00 02 .dbyt 2h +001920r 1 00 03 .dbyt 3h +001922r 1 00 04 .dbyt 4h +001924r 1 00 05 .dbyt 5h +001926r 1 00 06 .dbyt 6h +001928r 1 00 07 .dbyt 7h +00192Ar 1 00 08 .dbyt 8h +00192Cr 1 00 09 .dbyt 9h +00192Er 1 00 0A .dbyt 0Ah +001930r 1 00 0B .dbyt 0Bh +001932r 1 00 0C .dbyt 0Ch +001934r 1 00 0D .dbyt 0Dh +001936r 1 00 0E .dbyt 0Eh +001938r 1 00 0F .dbyt 0Fh +00193Ar 1 00 10 .dbyt 10h +00193Cr 1 00 11 .dbyt 11h +00193Er 1 00 12 .dbyt 12h +001940r 1 00 13 .dbyt 13h +001942r 1 00 70 .dbyt 70h +001944r 1 00 71 .dbyt 71h +001946r 1 00 72 .dbyt 72h +001948r 1 00 73 .dbyt 73h +00194Ar 1 00 74 .dbyt 74h +00194Cr 1 00 75 .dbyt 75h +00194Er 1 00 76 .dbyt 76h +001950r 1 00 77 .dbyt 77h +001952r 1 00 78 .dbyt 78h +001954r 1 00 79 .dbyt 79h +001956r 1 00 7A .dbyt 7Ah +001958r 1 00 7B .dbyt 7Bh +00195Ar 1 00 7C .dbyt 7Ch +00195Cr 1 00 7D .dbyt 7Dh +00195Er 1 00 7E .dbyt 7Eh +001960r 1 00 7F .dbyt 7Fh +001962r 1 00 80 .dbyt 80h +001964r 1 00 81 .dbyt 81h +001966r 1 00 82 .dbyt 82h +001968r 1 00 83 .dbyt 83h +00196Ar 1 00 84 .dbyt 84h +00196Cr 1 00 85 .dbyt 85h +00196Er 1 00 86 .dbyt 86h +001970r 1 00 F0 .dbyt 0F0h +001972r 1 00 F1 .dbyt 0F1h +001974r 1 00 F2 .dbyt 0F2h +001976r 1 00 F3 .dbyt 0F3h +001978r 1 00 F4 .dbyt 0F4h +00197Ar 1 00 F5 .dbyt 0F5h +00197Cr 1 00 F6 .dbyt 0F6h +00197Er 1 00 F7 .dbyt 0F7h +001980r 1 00 F8 .dbyt 0F8h +001982r 1 00 F9 .dbyt 0F9h +001984r 1 00 FA .dbyt 0FAh +001986r 1 00 FB .dbyt 0FBh +001988r 1 00 FC .dbyt 0FCh +00198Ar 1 00 FD .dbyt 0FDh +00198Cr 1 00 FE .dbyt 0FEh +00198Er 1 00 FF .dbyt 0FFh +001990r 1 01 00 .dbyt 100h +001992r 1 01 01 .dbyt 101h +001994r 1 01 02 .dbyt 102h +001996r 1 01 03 .dbyt 103h +001998r 1 0F D2 .dbyt 0FD2h +00199Ar 1 0F D3 .dbyt 0FD3h +00199Cr 1 0F D4 .dbyt 0FD4h +00199Er 1 0F D5 .dbyt 0FD5h +0019A0r 1 0F D6 .dbyt 0FD6h +0019A2r 1 0F D7 .dbyt 0FD7h +0019A4r 1 0F D8 .dbyt 0FD8h +0019A6r 1 0F D9 .dbyt 0FD9h +0019A8r 1 0F DA .dbyt 0FDAh +0019AAr 1 0F DB .dbyt 0FDBh +0019ACr 1 0F DC .dbyt 0FDCh +0019AEr 1 0F DD .dbyt 0FDDh +0019B0r 1 0F DE .dbyt 0FDEh +0019B2r 1 0F DF .dbyt 0FDFh +0019B4r 1 0F E0 .dbyt 0FE0h +0019B6r 1 0F E1 .dbyt 0FE1h +0019B8r 1 0F E2 .dbyt 0FE2h +0019BAr 1 0F E3 .dbyt 0FE3h +0019BCr 1 0F E4 .dbyt 0FE4h +0019BEr 1 0F E5 .dbyt 0FE5h +0019C0r 1 0F E6 .dbyt 0FE6h +0019C2r 1 0F E7 .dbyt 0FE7h +0019C4r 1 0F E8 .dbyt 0FE8h +0019C6r 1 0F E9 .dbyt 0FE9h +0019C8r 1 0F EA .dbyt 0FEAh +0019CAr 1 0F EB .dbyt 0FEBh +0019CCr 1 0F EC .dbyt 0FECh +0019CEr 1 0F ED .dbyt 0FEDh +0019D0r 1 0F EE .dbyt 0FEEh +0019D2r 1 0F EF .dbyt 0FEFh +0019D4r 1 0F F0 .dbyt 0FF0h +0019D6r 1 0F F1 .dbyt 0FF1h +0019D8r 1 0F F2 .dbyt 0FF2h +0019DAr 1 0F F3 .dbyt 0FF3h +0019DCr 1 0F F4 .dbyt 0FF4h +0019DEr 1 0F F5 .dbyt 0FF5h +0019E0r 1 0F F6 .dbyt 0FF6h +0019E2r 1 0F F7 .dbyt 0FF7h +0019E4r 1 0F F8 .dbyt 0FF8h +0019E6r 1 0F F9 .dbyt 0FF9h +0019E8r 1 0F FA .dbyt 0FFAh +0019EAr 1 0F FB .dbyt 0FFBh +0019ECr 1 0F FC .dbyt 0FFCh +0019EEr 1 0F FD .dbyt 0FFDh +0019F0r 1 0F FE .dbyt 0FFEh +0019F2r 1 0F FF .dbyt 0FFFh +0019F4r 1 10 00 .dbyt 1000h +0019F6r 1 10 01 .dbyt 1001h +0019F8r 1 10 02 .dbyt 1002h +0019FAr 1 10 03 .dbyt 1003h +0019FCr 1 10 04 .dbyt 1004h +0019FEr 1 10 05 .dbyt 1005h +001A00r 1 10 06 .dbyt 1006h +001A02r 1 10 07 .dbyt 1007h +001A04r 1 10 08 .dbyt 1008h +001A06r 1 7F F0 .dbyt 7FF0h +001A08r 1 7F F1 .dbyt 7FF1h +001A0Ar 1 7F F2 .dbyt 7FF2h +001A0Cr 1 7F F3 .dbyt 7FF3h +001A0Er 1 7F F4 .dbyt 7FF4h +001A10r 1 7F F5 .dbyt 7FF5h +001A12r 1 7F F6 .dbyt 7FF6h +001A14r 1 7F F7 .dbyt 7FF7h +001A16r 1 7F F8 .dbyt 7FF8h +001A18r 1 7F F9 .dbyt 7FF9h +001A1Ar 1 7F FA .dbyt 7FFAh +001A1Cr 1 7F FB .dbyt 7FFBh +001A1Er 1 7F FC .dbyt 7FFCh +001A20r 1 7F FD .dbyt 7FFDh +001A22r 1 7F FE .dbyt 7FFEh +001A24r 1 7F FF .dbyt 7FFFh +001A26r 1 80 00 .dbyt 8000h +001A28r 1 80 01 .dbyt 8001h +001A2Ar 1 80 02 .dbyt 8002h +001A2Cr 1 80 03 .dbyt 8003h +001A2Er 1 80 04 .dbyt 8004h +001A30r 1 80 05 .dbyt 8005h +001A32r 1 80 06 .dbyt 8006h +001A34r 1 80 07 .dbyt 8007h +001A36r 1 80 08 .dbyt 8008h +001A38r 1 80 09 .dbyt 8009h +001A3Ar 1 80 0A .dbyt 800Ah +001A3Cr 1 80 0B .dbyt 800Bh +001A3Er 1 9F E1 .dbyt 9FE1h +001A40r 1 9F E2 .dbyt 9FE2h +001A42r 1 9F E3 .dbyt 9FE3h +001A44r 1 9F E4 .dbyt 9FE4h +001A46r 1 9F E5 .dbyt 9FE5h +001A48r 1 9F E6 .dbyt 9FE6h +001A4Ar 1 9F E7 .dbyt 9FE7h +001A4Cr 1 9F E8 .dbyt 9FE8h +001A4Er 1 9F E9 .dbyt 9FE9h +001A50r 1 9F EA .dbyt 9FEAh +001A52r 1 9F EB .dbyt 9FEBh +001A54r 1 9F EC .dbyt 9FECh +001A56r 1 9F ED .dbyt 9FEDh +001A58r 1 9F EE .dbyt 9FEEh +001A5Ar 1 9F EF .dbyt 9FEFh +001A5Cr 1 9F F0 .dbyt 9FF0h +001A5Er 1 9F F1 .dbyt 9FF1h +001A60r 1 9F F2 .dbyt 9FF2h +001A62r 1 9F F3 .dbyt 9FF3h +001A64r 1 9F F4 .dbyt 9FF4h +001A66r 1 9F F5 .dbyt 9FF5h +001A68r 1 9F F6 .dbyt 9FF6h +001A6Ar 1 9F F7 .dbyt 9FF7h +001A6Cr 1 9F F8 .dbyt 9FF8h +001A6Er 1 9F F9 .dbyt 9FF9h +001A70r 1 9F FA .dbyt 9FFAh +001A72r 1 9F FB .dbyt 9FFBh +001A74r 1 9F FC .dbyt 9FFCh +001A76r 1 9F FD .dbyt 9FFDh +001A78r 1 9F FE .dbyt 9FFEh +001A7Ar 1 9F FF .dbyt 9FFFh +001A7Cr 1 A0 00 .dbyt 0A000h +001A7Er 1 A0 01 .dbyt 0A001h +001A80r 1 A0 02 .dbyt 0A002h +001A82r 1 A0 03 .dbyt 0A003h +001A84r 1 A0 04 .dbyt 0A004h +001A86r 1 A0 05 .dbyt 0A005h +001A88r 1 A0 06 .dbyt 0A006h +001A8Ar 1 A0 07 .dbyt 0A007h +001A8Cr 1 A0 08 .dbyt 0A008h +001A8Er 1 A0 09 .dbyt 0A009h +001A90r 1 A0 0A .dbyt 0A00Ah +001A92r 1 A0 0B .dbyt 0A00Bh +001A94r 1 A0 0C .dbyt 0A00Ch +001A96r 1 A0 0D .dbyt 0A00Dh +001A98r 1 A0 0E .dbyt 0A00Eh +001A9Ar 1 A0 0F .dbyt 0A00Fh +001A9Cr 1 AF E1 .dbyt 0AFE1h +001A9Er 1 AF E2 .dbyt 0AFE2h +001AA0r 1 AF E3 .dbyt 0AFE3h +001AA2r 1 AF E4 .dbyt 0AFE4h +001AA4r 1 AF E5 .dbyt 0AFE5h +001AA6r 1 AF E6 .dbyt 0AFE6h +001AA8r 1 AF E7 .dbyt 0AFE7h +001AAAr 1 AF E8 .dbyt 0AFE8h +001AACr 1 AF E9 .dbyt 0AFE9h +001AAEr 1 AF EA .dbyt 0AFEAh +001AB0r 1 AF EB .dbyt 0AFEBh +001AB2r 1 AF EC .dbyt 0AFECh +001AB4r 1 AF ED .dbyt 0AFEDh +001AB6r 1 AF EE .dbyt 0AFEEh +001AB8r 1 AF EF .dbyt 0AFEFh +001ABAr 1 AF F0 .dbyt 0AFF0h +001ABCr 1 AF F1 .dbyt 0AFF1h +001ABEr 1 AF F2 .dbyt 0AFF2h +001AC0r 1 AF F3 .dbyt 0AFF3h +001AC2r 1 AF F4 .dbyt 0AFF4h +001AC4r 1 AF F5 .dbyt 0AFF5h +001AC6r 1 AF F6 .dbyt 0AFF6h +001AC8r 1 AF F7 .dbyt 0AFF7h +001ACAr 1 AF F8 .dbyt 0AFF8h +001ACCr 1 AF F9 .dbyt 0AFF9h +001ACEr 1 AF FA .dbyt 0AFFAh +001AD0r 1 AF FB .dbyt 0AFFBh +001AD2r 1 AF FC .dbyt 0AFFCh +001AD4r 1 AF FD .dbyt 0AFFDh +001AD6r 1 AF FE .dbyt 0AFFEh +001AD8r 1 AF FF .dbyt 0AFFFh +001ADAr 1 B0 00 .dbyt 0B000h +001ADCr 1 B0 01 .dbyt 0B001h +001ADEr 1 B0 02 .dbyt 0B002h +001AE0r 1 B0 03 .dbyt 0B003h +001AE2r 1 B0 04 .dbyt 0B004h +001AE4r 1 B0 05 .dbyt 0B005h +001AE6r 1 B0 06 .dbyt 0B006h +001AE8r 1 B0 07 .dbyt 0B007h +001AEAr 1 B0 08 .dbyt 0B008h +001AECr 1 B0 09 .dbyt 0B009h +001AEEr 1 B0 0A .dbyt 0B00Ah +001AF0r 1 B0 0B .dbyt 0B00Bh +001AF2r 1 B0 0C .dbyt 0B00Ch +001AF4r 1 B0 0D .dbyt 0B00Dh +001AF6r 1 B0 0E .dbyt 0B00Eh +001AF8r 1 B0 0F .dbyt 0B00Fh +001AFAr 1 BF E1 .dbyt 0BFE1h +001AFCr 1 BF E2 .dbyt 0BFE2h +001AFEr 1 BF E3 .dbyt 0BFE3h +001B00r 1 BF E4 .dbyt 0BFE4h +001B02r 1 BF E5 .dbyt 0BFE5h +001B04r 1 BF E6 .dbyt 0BFE6h +001B06r 1 BF E7 .dbyt 0BFE7h +001B08r 1 BF E8 .dbyt 0BFE8h +001B0Ar 1 BF E9 .dbyt 0BFE9h +001B0Cr 1 BF EA .dbyt 0BFEAh +001B0Er 1 BF EB .dbyt 0BFEBh +001B10r 1 BF EC .dbyt 0BFECh +001B12r 1 BF ED .dbyt 0BFEDh +001B14r 1 BF EE .dbyt 0BFEEh +001B16r 1 BF EF .dbyt 0BFEFh +001B18r 1 BF F0 .dbyt 0BFF0h +001B1Ar 1 BF F1 .dbyt 0BFF1h +001B1Cr 1 BF F2 .dbyt 0BFF2h +001B1Er 1 BF F3 .dbyt 0BFF3h +001B20r 1 BF F4 .dbyt 0BFF4h +001B22r 1 BF F5 .dbyt 0BFF5h +001B24r 1 BF F6 .dbyt 0BFF6h +001B26r 1 BF F7 .dbyt 0BFF7h +001B28r 1 BF F8 .dbyt 0BFF8h +001B2Ar 1 BF F9 .dbyt 0BFF9h +001B2Cr 1 BF FA .dbyt 0BFFAh +001B2Er 1 BF FB .dbyt 0BFFBh +001B30r 1 BF FC .dbyt 0BFFCh +001B32r 1 BF FD .dbyt 0BFFDh +001B34r 1 BF FE .dbyt 0BFFEh +001B36r 1 BF FF .dbyt 0BFFFh +001B38r 1 C0 00 .dbyt 0C000h +001B3Ar 1 C0 01 .dbyt 0C001h +001B3Cr 1 C0 02 .dbyt 0C002h +001B3Er 1 C0 03 .dbyt 0C003h +001B40r 1 C0 04 .dbyt 0C004h +001B42r 1 C0 05 .dbyt 0C005h +001B44r 1 C0 06 .dbyt 0C006h +001B46r 1 C0 07 .dbyt 0C007h +001B48r 1 C0 08 .dbyt 0C008h +001B4Ar 1 C0 09 .dbyt 0C009h +001B4Cr 1 C0 0A .dbyt 0C00Ah +001B4Er 1 C0 0B .dbyt 0C00Bh +001B50r 1 C0 0C .dbyt 0C00Ch +001B52r 1 C0 0D .dbyt 0C00Dh +001B54r 1 C0 0E .dbyt 0C00Eh +001B56r 1 C0 0F .dbyt 0C00Fh +001B58r 1 CF E1 .dbyt 0CFE1h +001B5Ar 1 CF E2 .dbyt 0CFE2h +001B5Cr 1 CF E3 .dbyt 0CFE3h +001B5Er 1 CF E4 .dbyt 0CFE4h +001B60r 1 CF E5 .dbyt 0CFE5h +001B62r 1 CF E6 .dbyt 0CFE6h +001B64r 1 CF E7 .dbyt 0CFE7h +001B66r 1 CF E8 .dbyt 0CFE8h +001B68r 1 CF E9 .dbyt 0CFE9h +001B6Ar 1 CF EA .dbyt 0CFEAh +001B6Cr 1 CF EB .dbyt 0CFEBh +001B6Er 1 CF EC .dbyt 0CFECh +001B70r 1 CF ED .dbyt 0CFEDh +001B72r 1 CF EE .dbyt 0CFEEh +001B74r 1 CF EF .dbyt 0CFEFh +001B76r 1 CF F0 .dbyt 0CFF0h +001B78r 1 CF F1 .dbyt 0CFF1h +001B7Ar 1 CF F2 .dbyt 0CFF2h +001B7Cr 1 CF F3 .dbyt 0CFF3h +001B7Er 1 CF F4 .dbyt 0CFF4h +001B80r 1 CF F5 .dbyt 0CFF5h +001B82r 1 CF F6 .dbyt 0CFF6h +001B84r 1 CF F7 .dbyt 0CFF7h +001B86r 1 CF F8 .dbyt 0CFF8h +001B88r 1 CF F9 .dbyt 0CFF9h +001B8Ar 1 CF FA .dbyt 0CFFAh +001B8Cr 1 CF FB .dbyt 0CFFBh +001B8Er 1 CF FC .dbyt 0CFFCh +001B90r 1 CF FD .dbyt 0CFFDh +001B92r 1 CF FE .dbyt 0CFFEh +001B94r 1 CF FF .dbyt 0CFFFh +001B96r 1 D0 00 .dbyt 0D000h +001B98r 1 D0 01 .dbyt 0D001h +001B9Ar 1 D0 02 .dbyt 0D002h +001B9Cr 1 D0 03 .dbyt 0D003h +001B9Er 1 D0 04 .dbyt 0D004h +001BA0r 1 D0 05 .dbyt 0D005h +001BA2r 1 D0 06 .dbyt 0D006h +001BA4r 1 D0 07 .dbyt 0D007h +001BA6r 1 D0 08 .dbyt 0D008h +001BA8r 1 D0 09 .dbyt 0D009h +001BAAr 1 D0 0A .dbyt 0D00Ah +001BACr 1 D0 0B .dbyt 0D00Bh +001BAEr 1 D0 0C .dbyt 0D00Ch +001BB0r 1 D0 0D .dbyt 0D00Dh +001BB2r 1 D0 0E .dbyt 0D00Eh +001BB4r 1 D0 0F .dbyt 0D00Fh +001BB6r 1 DF E1 .dbyt 0DFE1h +001BB8r 1 DF E2 .dbyt 0DFE2h +001BBAr 1 DF E3 .dbyt 0DFE3h +001BBCr 1 DF E4 .dbyt 0DFE4h +001BBEr 1 DF E5 .dbyt 0DFE5h +001BC0r 1 DF E6 .dbyt 0DFE6h +001BC2r 1 DF E7 .dbyt 0DFE7h +001BC4r 1 DF E8 .dbyt 0DFE8h +001BC6r 1 DF E9 .dbyt 0DFE9h +001BC8r 1 DF EA .dbyt 0DFEAh +001BCAr 1 DF EB .dbyt 0DFEBh +001BCCr 1 DF EC .dbyt 0DFECh +001BCEr 1 DF ED .dbyt 0DFEDh +001BD0r 1 DF EE .dbyt 0DFEEh +001BD2r 1 DF EF .dbyt 0DFEFh +001BD4r 1 DF F0 .dbyt 0DFF0h +001BD6r 1 DF F1 .dbyt 0DFF1h +001BD8r 1 DF F2 .dbyt 0DFF2h +001BDAr 1 DF F3 .dbyt 0DFF3h +001BDCr 1 DF F4 .dbyt 0DFF4h +001BDEr 1 DF F5 .dbyt 0DFF5h +001BE0r 1 DF F6 .dbyt 0DFF6h +001BE2r 1 DF F7 .dbyt 0DFF7h +001BE4r 1 DF F8 .dbyt 0DFF8h +001BE6r 1 DF F9 .dbyt 0DFF9h +001BE8r 1 DF FA .dbyt 0DFFAh +001BEAr 1 DF FB .dbyt 0DFFBh +001BECr 1 DF FC .dbyt 0DFFCh +001BEEr 1 DF FD .dbyt 0DFFDh +001BF0r 1 DF FE .dbyt 0DFFEh +001BF2r 1 DF FF .dbyt 0DFFFh +001BF4r 1 E0 00 .dbyt 0E000h +001BF6r 1 E0 01 .dbyt 0E001h +001BF8r 1 E0 02 .dbyt 0E002h +001BFAr 1 E0 03 .dbyt 0E003h +001BFCr 1 E0 04 .dbyt 0E004h +001BFEr 1 E0 05 .dbyt 0E005h +001C00r 1 E0 06 .dbyt 0E006h +001C02r 1 E0 07 .dbyt 0E007h +001C04r 1 E0 08 .dbyt 0E008h +001C06r 1 E0 09 .dbyt 0E009h +001C08r 1 E0 0A .dbyt 0E00Ah +001C0Ar 1 E0 0B .dbyt 0E00Bh +001C0Cr 1 E0 0C .dbyt 0E00Ch +001C0Er 1 E0 0D .dbyt 0E00Dh +001C10r 1 E0 0E .dbyt 0E00Eh +001C12r 1 E0 0F .dbyt 0E00Fh +001C14r 1 EF E1 .dbyt 0EFE1h +001C16r 1 EF E2 .dbyt 0EFE2h +001C18r 1 EF E3 .dbyt 0EFE3h +001C1Ar 1 EF E4 .dbyt 0EFE4h +001C1Cr 1 EF E5 .dbyt 0EFE5h +001C1Er 1 EF E6 .dbyt 0EFE6h +001C20r 1 EF E7 .dbyt 0EFE7h +001C22r 1 EF E8 .dbyt 0EFE8h +001C24r 1 EF E9 .dbyt 0EFE9h +001C26r 1 EF EA .dbyt 0EFEAh +001C28r 1 EF EB .dbyt 0EFEBh +001C2Ar 1 EF EC .dbyt 0EFECh +001C2Cr 1 EF ED .dbyt 0EFEDh +001C2Er 1 EF EE .dbyt 0EFEEh +001C30r 1 EF EF .dbyt 0EFEFh +001C32r 1 EF F0 .dbyt 0EFF0h +001C34r 1 EF F1 .dbyt 0EFF1h +001C36r 1 EF F2 .dbyt 0EFF2h +001C38r 1 EF F3 .dbyt 0EFF3h +001C3Ar 1 EF F4 .dbyt 0EFF4h +001C3Cr 1 EF F5 .dbyt 0EFF5h +001C3Er 1 EF F6 .dbyt 0EFF6h +001C40r 1 EF F7 .dbyt 0EFF7h +001C42r 1 EF F8 .dbyt 0EFF8h +001C44r 1 EF F9 .dbyt 0EFF9h +001C46r 1 EF FA .dbyt 0EFFAh +001C48r 1 EF FB .dbyt 0EFFBh +001C4Ar 1 EF FC .dbyt 0EFFCh +001C4Cr 1 EF FD .dbyt 0EFFDh +001C4Er 1 EF FE .dbyt 0EFFEh +001C50r 1 EF FF .dbyt 0EFFFh +001C52r 1 F0 00 .dbyt 0F000h +001C54r 1 F0 01 .dbyt 0F001h +001C56r 1 F0 02 .dbyt 0F002h +001C58r 1 F0 03 .dbyt 0F003h +001C5Ar 1 F0 04 .dbyt 0F004h +001C5Cr 1 F0 05 .dbyt 0F005h +001C5Er 1 F0 06 .dbyt 0F006h +001C60r 1 F0 07 .dbyt 0F007h +001C62r 1 F0 08 .dbyt 0F008h +001C64r 1 F0 09 .dbyt 0F009h +001C66r 1 F0 0A .dbyt 0F00Ah +001C68r 1 F0 0B .dbyt 0F00Bh +001C6Ar 1 F0 0C .dbyt 0F00Ch +001C6Cr 1 F0 0D .dbyt 0F00Dh +001C6Er 1 F0 0E .dbyt 0F00Eh +001C70r 1 F0 0F .dbyt 0F00Fh +001C72r 1 FF E1 .dbyt 0FFE1h +001C74r 1 FF E2 .dbyt 0FFE2h +001C76r 1 FF E3 .dbyt 0FFE3h +001C78r 1 FF E4 .dbyt 0FFE4h +001C7Ar 1 FF E5 .dbyt 0FFE5h +001C7Cr 1 FF E6 .dbyt 0FFE6h +001C7Er 1 FF E7 .dbyt 0FFE7h +001C80r 1 FF E8 .dbyt 0FFE8h +001C82r 1 FF E9 .dbyt 0FFE9h +001C84r 1 FF EA .dbyt 0FFEAh +001C86r 1 FF EB .dbyt 0FFEBh +001C88r 1 FF EC .dbyt 0FFECh +001C8Ar 1 FF ED .dbyt 0FFEDh +001C8Cr 1 FF EE .dbyt 0FFEEh +001C8Er 1 FF EF .dbyt 0FFEFh +001C90r 1 FF F0 .dbyt 0FFF0h +001C92r 1 FF F1 .dbyt 0FFF1h +001C94r 1 FF F2 .dbyt 0FFF2h +001C96r 1 FF F3 .dbyt 0FFF3h +001C98r 1 FF F4 .dbyt 0FFF4h +001C9Ar 1 FF F5 .dbyt 0FFF5h +001C9Cr 1 FF F6 .dbyt 0FFF6h +001C9Er 1 FF F7 .dbyt 0FFF7h +001CA0r 1 FF F8 .dbyt 0FFF8h +001CA2r 1 FF F9 .dbyt 0FFF9h +001CA4r 1 FF FA .dbyt 0FFFAh +001CA6r 1 FF FB .dbyt 0FFFBh +001CA8r 1 FF FC .dbyt 0FFFCh +001CAAr 1 FF FD .dbyt 0FFFDh +001CACr 1 FF FE .dbyt 0FFFEh +001CAEr 1 FF FF .dbyt 0FFFFh +001CB0r 1 +001CB0r 1 ; alternative 4-digit hex values +001CB0r 1 00 00 .dbyt 0000h +001CB2r 1 00 01 .dbyt 0001h +001CB4r 1 00 02 .dbyt 0002h +001CB6r 1 00 03 .dbyt 0003h +001CB8r 1 00 04 .dbyt 0004h +001CBAr 1 00 05 .dbyt 0005h +001CBCr 1 00 06 .dbyt 0006h +001CBEr 1 00 07 .dbyt 0007h +001CC0r 1 00 08 .dbyt 0008h +001CC2r 1 00 09 .dbyt 0009h +001CC4r 1 00 0A .dbyt 000ah +001CC6r 1 00 0B .dbyt 000bh +001CC8r 1 00 0C .dbyt 000ch +001CCAr 1 00 0D .dbyt 000dh +001CCCr 1 00 0E .dbyt 000eh +001CCEr 1 00 0F .dbyt 000fh +001CD0r 1 00 10 .dbyt 0010h +001CD2r 1 00 11 .dbyt 0011h +001CD4r 1 00 12 .dbyt 0012h +001CD6r 1 00 13 .dbyt 0013h +001CD8r 1 00 70 .dbyt 0070h +001CDAr 1 00 71 .dbyt 0071h +001CDCr 1 00 72 .dbyt 0072h +001CDEr 1 00 73 .dbyt 0073h +001CE0r 1 00 74 .dbyt 0074h +001CE2r 1 00 75 .dbyt 0075h +001CE4r 1 00 76 .dbyt 0076h +001CE6r 1 00 77 .dbyt 0077h +001CE8r 1 00 78 .dbyt 0078h +001CEAr 1 00 79 .dbyt 0079h +001CECr 1 00 7A .dbyt 007ah +001CEEr 1 00 7B .dbyt 007bh +001CF0r 1 00 7C .dbyt 007ch +001CF2r 1 00 7D .dbyt 007dh +001CF4r 1 00 7E .dbyt 007eh +001CF6r 1 00 7F .dbyt 007fh +001CF8r 1 00 80 .dbyt 0080h +001CFAr 1 00 81 .dbyt 0081h +001CFCr 1 00 82 .dbyt 0082h +001CFEr 1 00 83 .dbyt 0083h +001D00r 1 00 84 .dbyt 0084h +001D02r 1 00 85 .dbyt 0085h +001D04r 1 00 86 .dbyt 0086h +001D06r 1 00 F0 .dbyt 00f0h +001D08r 1 00 F1 .dbyt 00f1h +001D0Ar 1 00 F2 .dbyt 00f2h +001D0Cr 1 00 F3 .dbyt 00f3h +001D0Er 1 00 F4 .dbyt 00f4h +001D10r 1 00 F5 .dbyt 00f5h +001D12r 1 00 F6 .dbyt 00f6h +001D14r 1 00 F7 .dbyt 00f7h +001D16r 1 00 F8 .dbyt 00f8h +001D18r 1 00 F9 .dbyt 00f9h +001D1Ar 1 00 FA .dbyt 00fah +001D1Cr 1 00 FB .dbyt 00fbh +001D1Er 1 00 FC .dbyt 00fch +001D20r 1 00 FD .dbyt 00fdh +001D22r 1 00 FE .dbyt 00feh +001D24r 1 00 FF .dbyt 00ffh +001D26r 1 01 00 .dbyt 0100h +001D28r 1 01 01 .dbyt 0101h +001D2Ar 1 01 02 .dbyt 0102h +001D2Cr 1 01 03 .dbyt 0103h +001D2Er 1 0F D2 .dbyt 0fd2h +001D30r 1 0F D3 .dbyt 0fd3h +001D32r 1 0F D4 .dbyt 0fd4h +001D34r 1 0F D5 .dbyt 0fd5h +001D36r 1 0F D6 .dbyt 0fd6h +001D38r 1 0F D7 .dbyt 0fd7h +001D3Ar 1 0F D8 .dbyt 0fd8h +001D3Cr 1 0F D9 .dbyt 0fd9h +001D3Er 1 0F DA .dbyt 0fdah +001D40r 1 0F DB .dbyt 0fdbh +001D42r 1 0F DC .dbyt 0fdch +001D44r 1 0F DD .dbyt 0fddh +001D46r 1 0F DE .dbyt 0fdeh +001D48r 1 0F DF .dbyt 0fdfh +001D4Ar 1 0F E0 .dbyt 0fe0h +001D4Cr 1 0F E1 .dbyt 0fe1h +001D4Er 1 0F E2 .dbyt 0fe2h +001D50r 1 0F E3 .dbyt 0fe3h +001D52r 1 0F E4 .dbyt 0fe4h +001D54r 1 0F E5 .dbyt 0fe5h +001D56r 1 0F E6 .dbyt 0fe6h +001D58r 1 0F E7 .dbyt 0fe7h +001D5Ar 1 0F E8 .dbyt 0fe8h +001D5Cr 1 0F E9 .dbyt 0fe9h +001D5Er 1 0F EA .dbyt 0feah +001D60r 1 0F EB .dbyt 0febh +001D62r 1 0F EC .dbyt 0fech +001D64r 1 0F ED .dbyt 0fedh +001D66r 1 0F EE .dbyt 0feeh +001D68r 1 0F EF .dbyt 0fefh +001D6Ar 1 0F F0 .dbyt 0ff0h +001D6Cr 1 0F F1 .dbyt 0ff1h +001D6Er 1 0F F2 .dbyt 0ff2h +001D70r 1 0F F3 .dbyt 0ff3h +001D72r 1 0F F4 .dbyt 0ff4h +001D74r 1 0F F5 .dbyt 0ff5h +001D76r 1 0F F6 .dbyt 0ff6h +001D78r 1 0F F7 .dbyt 0ff7h +001D7Ar 1 0F F8 .dbyt 0ff8h +001D7Cr 1 0F F9 .dbyt 0ff9h +001D7Er 1 0F FA .dbyt 0ffah +001D80r 1 0F FB .dbyt 0ffbh +001D82r 1 0F FC .dbyt 0ffch +001D84r 1 0F FD .dbyt 0ffdh +001D86r 1 0F FE .dbyt 0ffeh +001D88r 1 0F FF .dbyt 0fffh +001D8Ar 1 10 00 .dbyt 1000h +001D8Cr 1 10 01 .dbyt 1001h +001D8Er 1 10 02 .dbyt 1002h +001D90r 1 10 03 .dbyt 1003h +001D92r 1 10 04 .dbyt 1004h +001D94r 1 10 05 .dbyt 1005h +001D96r 1 10 06 .dbyt 1006h +001D98r 1 10 07 .dbyt 1007h +001D9Ar 1 10 08 .dbyt 1008h +001D9Cr 1 7F F0 .dbyt 7ff0h +001D9Er 1 7F F1 .dbyt 7ff1h +001DA0r 1 7F F2 .dbyt 7ff2h +001DA2r 1 7F F3 .dbyt 7ff3h +001DA4r 1 7F F4 .dbyt 7ff4h +001DA6r 1 7F F5 .dbyt 7ff5h +001DA8r 1 7F F6 .dbyt 7ff6h +001DAAr 1 7F F7 .dbyt 7ff7h +001DACr 1 7F F8 .dbyt 7ff8h +001DAEr 1 7F F9 .dbyt 7ff9h +001DB0r 1 7F FA .dbyt 7ffah +001DB2r 1 7F FB .dbyt 7ffbh +001DB4r 1 7F FC .dbyt 7ffch +001DB6r 1 7F FD .dbyt 7ffdh +001DB8r 1 7F FE .dbyt 7ffeh +001DBAr 1 7F FF .dbyt 7fffh +001DBCr 1 80 00 .dbyt 8000h +001DBEr 1 80 01 .dbyt 8001h +001DC0r 1 80 02 .dbyt 8002h +001DC2r 1 80 03 .dbyt 8003h +001DC4r 1 80 04 .dbyt 8004h +001DC6r 1 80 05 .dbyt 8005h +001DC8r 1 80 06 .dbyt 8006h +001DCAr 1 80 07 .dbyt 8007h +001DCCr 1 80 08 .dbyt 8008h +001DCEr 1 80 09 .dbyt 8009h +001DD0r 1 80 0A .dbyt 800ah +001DD2r 1 80 0B .dbyt 800bh +001DD4r 1 9F E1 .dbyt 9fe1h +001DD6r 1 9F E2 .dbyt 9fe2h +001DD8r 1 9F E3 .dbyt 9fe3h +001DDAr 1 9F E4 .dbyt 9fe4h +001DDCr 1 9F E5 .dbyt 9fe5h +001DDEr 1 9F E6 .dbyt 9fe6h +001DE0r 1 9F E7 .dbyt 9fe7h +001DE2r 1 9F E8 .dbyt 9fe8h +001DE4r 1 9F E9 .dbyt 9fe9h +001DE6r 1 9F EA .dbyt 9feah +001DE8r 1 9F EB .dbyt 9febh +001DEAr 1 9F EC .dbyt 9fech +001DECr 1 9F ED .dbyt 9fedh +001DEEr 1 9F EE .dbyt 9feeh +001DF0r 1 9F EF .dbyt 9fefh +001DF2r 1 9F F0 .dbyt 9ff0h +001DF4r 1 9F F1 .dbyt 9ff1h +001DF6r 1 9F F2 .dbyt 9ff2h +001DF8r 1 9F F3 .dbyt 9ff3h +001DFAr 1 9F F4 .dbyt 9ff4h +001DFCr 1 9F F5 .dbyt 9ff5h +001DFEr 1 9F F6 .dbyt 9ff6h +001E00r 1 9F F7 .dbyt 9ff7h +001E02r 1 9F F8 .dbyt 9ff8h +001E04r 1 9F F9 .dbyt 9ff9h +001E06r 1 9F FA .dbyt 9ffah +001E08r 1 9F FB .dbyt 9ffbh +001E0Ar 1 9F FC .dbyt 9ffch +001E0Cr 1 9F FD .dbyt 9ffdh +001E0Er 1 9F FE .dbyt 9ffeh +001E10r 1 9F FF .dbyt 9fffh +001E12r 1 A0 00 .dbyt 0a000h +001E14r 1 A0 01 .dbyt 0a001h +001E16r 1 A0 02 .dbyt 0a002h +001E18r 1 A0 03 .dbyt 0a003h +001E1Ar 1 A0 04 .dbyt 0a004h +001E1Cr 1 A0 05 .dbyt 0a005h +001E1Er 1 A0 06 .dbyt 0a006h +001E20r 1 A0 07 .dbyt 0a007h +001E22r 1 A0 08 .dbyt 0a008h +001E24r 1 A0 09 .dbyt 0a009h +001E26r 1 A0 0A .dbyt 0a00ah +001E28r 1 A0 0B .dbyt 0a00bh +001E2Ar 1 A0 0C .dbyt 0a00ch +001E2Cr 1 A0 0D .dbyt 0a00dh +001E2Er 1 A0 0E .dbyt 0a00eh +001E30r 1 A0 0F .dbyt 0a00fh +001E32r 1 AF E1 .dbyt 0afe1h +001E34r 1 AF E2 .dbyt 0afe2h +001E36r 1 AF E3 .dbyt 0afe3h +001E38r 1 AF E4 .dbyt 0afe4h +001E3Ar 1 AF E5 .dbyt 0afe5h +001E3Cr 1 AF E6 .dbyt 0afe6h +001E3Er 1 AF E7 .dbyt 0afe7h +001E40r 1 AF E8 .dbyt 0afe8h +001E42r 1 AF E9 .dbyt 0afe9h +001E44r 1 AF EA .dbyt 0afeah +001E46r 1 AF EB .dbyt 0afebh +001E48r 1 AF EC .dbyt 0afech +001E4Ar 1 AF ED .dbyt 0afedh +001E4Cr 1 AF EE .dbyt 0afeeh +001E4Er 1 AF EF .dbyt 0afefh +001E50r 1 AF F0 .dbyt 0aff0h +001E52r 1 AF F1 .dbyt 0aff1h +001E54r 1 AF F2 .dbyt 0aff2h +001E56r 1 AF F3 .dbyt 0aff3h +001E58r 1 AF F4 .dbyt 0aff4h +001E5Ar 1 AF F5 .dbyt 0aff5h +001E5Cr 1 AF F6 .dbyt 0aff6h +001E5Er 1 AF F7 .dbyt 0aff7h +001E60r 1 AF F8 .dbyt 0aff8h +001E62r 1 AF F9 .dbyt 0aff9h +001E64r 1 AF FA .dbyt 0affah +001E66r 1 AF FB .dbyt 0affbh +001E68r 1 AF FC .dbyt 0affch +001E6Ar 1 AF FD .dbyt 0affdh +001E6Cr 1 AF FE .dbyt 0affeh +001E6Er 1 AF FF .dbyt 0afffh +001E70r 1 B0 00 .dbyt 0b000h +001E72r 1 B0 01 .dbyt 0b001h +001E74r 1 B0 02 .dbyt 0b002h +001E76r 1 B0 03 .dbyt 0b003h +001E78r 1 B0 04 .dbyt 0b004h +001E7Ar 1 B0 05 .dbyt 0b005h +001E7Cr 1 B0 06 .dbyt 0b006h +001E7Er 1 B0 07 .dbyt 0b007h +001E80r 1 B0 08 .dbyt 0b008h +001E82r 1 B0 09 .dbyt 0b009h +001E84r 1 B0 0A .dbyt 0b00ah +001E86r 1 B0 0B .dbyt 0b00bh +001E88r 1 B0 0C .dbyt 0b00ch +001E8Ar 1 B0 0D .dbyt 0b00dh +001E8Cr 1 B0 0E .dbyt 0b00eh +001E8Er 1 B0 0F .dbyt 0b00fh +001E90r 1 BF E1 .dbyt 0bfe1h +001E92r 1 BF E2 .dbyt 0bfe2h +001E94r 1 BF E3 .dbyt 0bfe3h +001E96r 1 BF E4 .dbyt 0bfe4h +001E98r 1 BF E5 .dbyt 0bfe5h +001E9Ar 1 BF E6 .dbyt 0bfe6h +001E9Cr 1 BF E7 .dbyt 0bfe7h +001E9Er 1 BF E8 .dbyt 0bfe8h +001EA0r 1 BF E9 .dbyt 0bfe9h +001EA2r 1 BF EA .dbyt 0bfeah +001EA4r 1 BF EB .dbyt 0bfebh +001EA6r 1 BF EC .dbyt 0bfech +001EA8r 1 BF ED .dbyt 0bfedh +001EAAr 1 BF EE .dbyt 0bfeeh +001EACr 1 BF EF .dbyt 0bfefh +001EAEr 1 BF F0 .dbyt 0bff0h +001EB0r 1 BF F1 .dbyt 0bff1h +001EB2r 1 BF F2 .dbyt 0bff2h +001EB4r 1 BF F3 .dbyt 0bff3h +001EB6r 1 BF F4 .dbyt 0bff4h +001EB8r 1 BF F5 .dbyt 0bff5h +001EBAr 1 BF F6 .dbyt 0bff6h +001EBCr 1 BF F7 .dbyt 0bff7h +001EBEr 1 BF F8 .dbyt 0bff8h +001EC0r 1 BF F9 .dbyt 0bff9h +001EC2r 1 BF FA .dbyt 0bffah +001EC4r 1 BF FB .dbyt 0bffbh +001EC6r 1 BF FC .dbyt 0bffch +001EC8r 1 BF FD .dbyt 0bffdh +001ECAr 1 BF FE .dbyt 0bffeh +001ECCr 1 BF FF .dbyt 0bfffh +001ECEr 1 C0 00 .dbyt 0c000h +001ED0r 1 C0 01 .dbyt 0c001h +001ED2r 1 C0 02 .dbyt 0c002h +001ED4r 1 C0 03 .dbyt 0c003h +001ED6r 1 C0 04 .dbyt 0c004h +001ED8r 1 C0 05 .dbyt 0c005h +001EDAr 1 C0 06 .dbyt 0c006h +001EDCr 1 C0 07 .dbyt 0c007h +001EDEr 1 C0 08 .dbyt 0c008h +001EE0r 1 C0 09 .dbyt 0c009h +001EE2r 1 C0 0A .dbyt 0c00ah +001EE4r 1 C0 0B .dbyt 0c00bh +001EE6r 1 C0 0C .dbyt 0c00ch +001EE8r 1 C0 0D .dbyt 0c00dh +001EEAr 1 C0 0E .dbyt 0c00eh +001EECr 1 C0 0F .dbyt 0c00fh +001EEEr 1 CF E1 .dbyt 0cfe1h +001EF0r 1 CF E2 .dbyt 0cfe2h +001EF2r 1 CF E3 .dbyt 0cfe3h +001EF4r 1 CF E4 .dbyt 0cfe4h +001EF6r 1 CF E5 .dbyt 0cfe5h +001EF8r 1 CF E6 .dbyt 0cfe6h +001EFAr 1 CF E7 .dbyt 0cfe7h +001EFCr 1 CF E8 .dbyt 0cfe8h +001EFEr 1 CF E9 .dbyt 0cfe9h +001F00r 1 CF EA .dbyt 0cfeah +001F02r 1 CF EB .dbyt 0cfebh +001F04r 1 CF EC .dbyt 0cfech +001F06r 1 CF ED .dbyt 0cfedh +001F08r 1 CF EE .dbyt 0cfeeh +001F0Ar 1 CF EF .dbyt 0cfefh +001F0Cr 1 CF F0 .dbyt 0cff0h +001F0Er 1 CF F1 .dbyt 0cff1h +001F10r 1 CF F2 .dbyt 0cff2h +001F12r 1 CF F3 .dbyt 0cff3h +001F14r 1 CF F4 .dbyt 0cff4h +001F16r 1 CF F5 .dbyt 0cff5h +001F18r 1 CF F6 .dbyt 0cff6h +001F1Ar 1 CF F7 .dbyt 0cff7h +001F1Cr 1 CF F8 .dbyt 0cff8h +001F1Er 1 CF F9 .dbyt 0cff9h +001F20r 1 CF FA .dbyt 0cffah +001F22r 1 CF FB .dbyt 0cffbh +001F24r 1 CF FC .dbyt 0cffch +001F26r 1 CF FD .dbyt 0cffdh +001F28r 1 CF FE .dbyt 0cffeh +001F2Ar 1 CF FF .dbyt 0cfffh +001F2Cr 1 D0 00 .dbyt 0d000h +001F2Er 1 D0 01 .dbyt 0d001h +001F30r 1 D0 02 .dbyt 0d002h +001F32r 1 D0 03 .dbyt 0d003h +001F34r 1 D0 04 .dbyt 0d004h +001F36r 1 D0 05 .dbyt 0d005h +001F38r 1 D0 06 .dbyt 0d006h +001F3Ar 1 D0 07 .dbyt 0d007h +001F3Cr 1 D0 08 .dbyt 0d008h +001F3Er 1 D0 09 .dbyt 0d009h +001F40r 1 D0 0A .dbyt 0d00ah +001F42r 1 D0 0B .dbyt 0d00bh +001F44r 1 D0 0C .dbyt 0d00ch +001F46r 1 D0 0D .dbyt 0d00dh +001F48r 1 D0 0E .dbyt 0d00eh +001F4Ar 1 D0 0F .dbyt 0d00fh +001F4Cr 1 DF E1 .dbyt 0dfe1h +001F4Er 1 DF E2 .dbyt 0dfe2h +001F50r 1 DF E3 .dbyt 0dfe3h +001F52r 1 DF E4 .dbyt 0dfe4h +001F54r 1 DF E5 .dbyt 0dfe5h +001F56r 1 DF E6 .dbyt 0dfe6h +001F58r 1 DF E7 .dbyt 0dfe7h +001F5Ar 1 DF E8 .dbyt 0dfe8h +001F5Cr 1 DF E9 .dbyt 0dfe9h +001F5Er 1 DF EA .dbyt 0dfeah +001F60r 1 DF EB .dbyt 0dfebh +001F62r 1 DF EC .dbyt 0dfech +001F64r 1 DF ED .dbyt 0dfedh +001F66r 1 DF EE .dbyt 0dfeeh +001F68r 1 DF EF .dbyt 0dfefh +001F6Ar 1 DF F0 .dbyt 0dff0h +001F6Cr 1 DF F1 .dbyt 0dff1h +001F6Er 1 DF F2 .dbyt 0dff2h +001F70r 1 DF F3 .dbyt 0dff3h +001F72r 1 DF F4 .dbyt 0dff4h +001F74r 1 DF F5 .dbyt 0dff5h +001F76r 1 DF F6 .dbyt 0dff6h +001F78r 1 DF F7 .dbyt 0dff7h +001F7Ar 1 DF F8 .dbyt 0dff8h +001F7Cr 1 DF F9 .dbyt 0dff9h +001F7Er 1 DF FA .dbyt 0dffah +001F80r 1 DF FB .dbyt 0dffbh +001F82r 1 DF FC .dbyt 0dffch +001F84r 1 DF FD .dbyt 0dffdh +001F86r 1 DF FE .dbyt 0dffeh +001F88r 1 DF FF .dbyt 0dfffh +001F8Ar 1 E0 00 .dbyt 0e000h +001F8Cr 1 E0 01 .dbyt 0e001h +001F8Er 1 E0 02 .dbyt 0e002h +001F90r 1 E0 03 .dbyt 0e003h +001F92r 1 E0 04 .dbyt 0e004h +001F94r 1 E0 05 .dbyt 0e005h +001F96r 1 E0 06 .dbyt 0e006h +001F98r 1 E0 07 .dbyt 0e007h +001F9Ar 1 E0 08 .dbyt 0e008h +001F9Cr 1 E0 09 .dbyt 0e009h +001F9Er 1 E0 0A .dbyt 0e00ah +001FA0r 1 E0 0B .dbyt 0e00bh +001FA2r 1 E0 0C .dbyt 0e00ch +001FA4r 1 E0 0D .dbyt 0e00dh +001FA6r 1 E0 0E .dbyt 0e00eh +001FA8r 1 E0 0F .dbyt 0e00fh +001FAAr 1 EF E1 .dbyt 0efe1h +001FACr 1 EF E2 .dbyt 0efe2h +001FAEr 1 EF E3 .dbyt 0efe3h +001FB0r 1 EF E4 .dbyt 0efe4h +001FB2r 1 EF E5 .dbyt 0efe5h +001FB4r 1 EF E6 .dbyt 0efe6h +001FB6r 1 EF E7 .dbyt 0efe7h +001FB8r 1 EF E8 .dbyt 0efe8h +001FBAr 1 EF E9 .dbyt 0efe9h +001FBCr 1 EF EA .dbyt 0efeah +001FBEr 1 EF EB .dbyt 0efebh +001FC0r 1 EF EC .dbyt 0efech +001FC2r 1 EF ED .dbyt 0efedh +001FC4r 1 EF EE .dbyt 0efeeh +001FC6r 1 EF EF .dbyt 0efefh +001FC8r 1 EF F0 .dbyt 0eff0h +001FCAr 1 EF F1 .dbyt 0eff1h +001FCCr 1 EF F2 .dbyt 0eff2h +001FCEr 1 EF F3 .dbyt 0eff3h +001FD0r 1 EF F4 .dbyt 0eff4h +001FD2r 1 EF F5 .dbyt 0eff5h +001FD4r 1 EF F6 .dbyt 0eff6h +001FD6r 1 EF F7 .dbyt 0eff7h +001FD8r 1 EF F8 .dbyt 0eff8h +001FDAr 1 EF F9 .dbyt 0eff9h +001FDCr 1 EF FA .dbyt 0effah +001FDEr 1 EF FB .dbyt 0effbh +001FE0r 1 EF FC .dbyt 0effch +001FE2r 1 EF FD .dbyt 0effdh +001FE4r 1 EF FE .dbyt 0effeh +001FE6r 1 EF FF .dbyt 0efffh +001FE8r 1 F0 00 .dbyt 0f000h +001FEAr 1 F0 01 .dbyt 0f001h +001FECr 1 F0 02 .dbyt 0f002h +001FEEr 1 F0 03 .dbyt 0f003h +001FF0r 1 F0 04 .dbyt 0f004h +001FF2r 1 F0 05 .dbyt 0f005h +001FF4r 1 F0 06 .dbyt 0f006h +001FF6r 1 F0 07 .dbyt 0f007h +001FF8r 1 F0 08 .dbyt 0f008h +001FFAr 1 F0 09 .dbyt 0f009h +001FFCr 1 F0 0A .dbyt 0f00ah +001FFEr 1 F0 0B .dbyt 0f00bh +002000r 1 F0 0C .dbyt 0f00ch +002002r 1 F0 0D .dbyt 0f00dh +002004r 1 F0 0E .dbyt 0f00eh +002006r 1 F0 0F .dbyt 0f00fh +002008r 1 FF E1 .dbyt 0ffe1h +00200Ar 1 FF E2 .dbyt 0ffe2h +00200Cr 1 FF E3 .dbyt 0ffe3h +00200Er 1 FF E4 .dbyt 0ffe4h +002010r 1 FF E5 .dbyt 0ffe5h +002012r 1 FF E6 .dbyt 0ffe6h +002014r 1 FF E7 .dbyt 0ffe7h +002016r 1 FF E8 .dbyt 0ffe8h +002018r 1 FF E9 .dbyt 0ffe9h +00201Ar 1 FF EA .dbyt 0ffeah +00201Cr 1 FF EB .dbyt 0ffebh +00201Er 1 FF EC .dbyt 0ffech +002020r 1 FF ED .dbyt 0ffedh +002022r 1 FF EE .dbyt 0ffeeh +002024r 1 FF EF .dbyt 0ffefh +002026r 1 FF F0 .dbyt 0fff0h +002028r 1 FF F1 .dbyt 0fff1h +00202Ar 1 FF F2 .dbyt 0fff2h +00202Cr 1 FF F3 .dbyt 0fff3h +00202Er 1 FF F4 .dbyt 0fff4h +002030r 1 FF F5 .dbyt 0fff5h +002032r 1 FF F6 .dbyt 0fff6h +002034r 1 FF F7 .dbyt 0fff7h +002036r 1 FF F8 .dbyt 0fff8h +002038r 1 FF F9 .dbyt 0fff9h +00203Ar 1 FF FA .dbyt 0fffah +00203Cr 1 FF FB .dbyt 0fffbh +00203Er 1 FF FC .dbyt 0fffch +002040r 1 FF FD .dbyt 0fffdh +002042r 1 FF FE .dbyt 0fffeh +002044r 1 FF FF .dbyt 0ffffh +002046r 1 +002046r 1 ; alternative 4-digit hex values, uppercase +002046r 1 00 00 .dbyt 0000h +002048r 1 00 01 .dbyt 0001h +00204Ar 1 00 02 .dbyt 0002h +00204Cr 1 00 03 .dbyt 0003h +00204Er 1 00 04 .dbyt 0004h +002050r 1 00 05 .dbyt 0005h +002052r 1 00 06 .dbyt 0006h +002054r 1 00 07 .dbyt 0007h +002056r 1 00 08 .dbyt 0008h +002058r 1 00 09 .dbyt 0009h +00205Ar 1 00 0A .dbyt 000Ah +00205Cr 1 00 0B .dbyt 000Bh +00205Er 1 00 0C .dbyt 000Ch +002060r 1 00 0D .dbyt 000Dh +002062r 1 00 0E .dbyt 000Eh +002064r 1 00 0F .dbyt 000Fh +002066r 1 00 10 .dbyt 0010h +002068r 1 00 11 .dbyt 0011h +00206Ar 1 00 12 .dbyt 0012h +00206Cr 1 00 13 .dbyt 0013h +00206Er 1 00 70 .dbyt 0070h +002070r 1 00 71 .dbyt 0071h +002072r 1 00 72 .dbyt 0072h +002074r 1 00 73 .dbyt 0073h +002076r 1 00 74 .dbyt 0074h +002078r 1 00 75 .dbyt 0075h +00207Ar 1 00 76 .dbyt 0076h +00207Cr 1 00 77 .dbyt 0077h +00207Er 1 00 78 .dbyt 0078h +002080r 1 00 79 .dbyt 0079h +002082r 1 00 7A .dbyt 007Ah +002084r 1 00 7B .dbyt 007Bh +002086r 1 00 7C .dbyt 007Ch +002088r 1 00 7D .dbyt 007Dh +00208Ar 1 00 7E .dbyt 007Eh +00208Cr 1 00 7F .dbyt 007Fh +00208Er 1 00 80 .dbyt 0080h +002090r 1 00 81 .dbyt 0081h +002092r 1 00 82 .dbyt 0082h +002094r 1 00 83 .dbyt 0083h +002096r 1 00 84 .dbyt 0084h +002098r 1 00 85 .dbyt 0085h +00209Ar 1 00 86 .dbyt 0086h +00209Cr 1 00 F0 .dbyt 00F0h +00209Er 1 00 F1 .dbyt 00F1h +0020A0r 1 00 F2 .dbyt 00F2h +0020A2r 1 00 F3 .dbyt 00F3h +0020A4r 1 00 F4 .dbyt 00F4h +0020A6r 1 00 F5 .dbyt 00F5h +0020A8r 1 00 F6 .dbyt 00F6h +0020AAr 1 00 F7 .dbyt 00F7h +0020ACr 1 00 F8 .dbyt 00F8h +0020AEr 1 00 F9 .dbyt 00F9h +0020B0r 1 00 FA .dbyt 00FAh +0020B2r 1 00 FB .dbyt 00FBh +0020B4r 1 00 FC .dbyt 00FCh +0020B6r 1 00 FD .dbyt 00FDh +0020B8r 1 00 FE .dbyt 00FEh +0020BAr 1 00 FF .dbyt 00FFh +0020BCr 1 01 00 .dbyt 0100h +0020BEr 1 01 01 .dbyt 0101h +0020C0r 1 01 02 .dbyt 0102h +0020C2r 1 01 03 .dbyt 0103h +0020C4r 1 0F D2 .dbyt 0FD2h +0020C6r 1 0F D3 .dbyt 0FD3h +0020C8r 1 0F D4 .dbyt 0FD4h +0020CAr 1 0F D5 .dbyt 0FD5h +0020CCr 1 0F D6 .dbyt 0FD6h +0020CEr 1 0F D7 .dbyt 0FD7h +0020D0r 1 0F D8 .dbyt 0FD8h +0020D2r 1 0F D9 .dbyt 0FD9h +0020D4r 1 0F DA .dbyt 0FDAh +0020D6r 1 0F DB .dbyt 0FDBh +0020D8r 1 0F DC .dbyt 0FDCh +0020DAr 1 0F DD .dbyt 0FDDh +0020DCr 1 0F DE .dbyt 0FDEh +0020DEr 1 0F DF .dbyt 0FDFh +0020E0r 1 0F E0 .dbyt 0FE0h +0020E2r 1 0F E1 .dbyt 0FE1h +0020E4r 1 0F E2 .dbyt 0FE2h +0020E6r 1 0F E3 .dbyt 0FE3h +0020E8r 1 0F E4 .dbyt 0FE4h +0020EAr 1 0F E5 .dbyt 0FE5h +0020ECr 1 0F E6 .dbyt 0FE6h +0020EEr 1 0F E7 .dbyt 0FE7h +0020F0r 1 0F E8 .dbyt 0FE8h +0020F2r 1 0F E9 .dbyt 0FE9h +0020F4r 1 0F EA .dbyt 0FEAh +0020F6r 1 0F EB .dbyt 0FEBh +0020F8r 1 0F EC .dbyt 0FECh +0020FAr 1 0F ED .dbyt 0FEDh +0020FCr 1 0F EE .dbyt 0FEEh +0020FEr 1 0F EF .dbyt 0FEFh +002100r 1 0F F0 .dbyt 0FF0h +002102r 1 0F F1 .dbyt 0FF1h +002104r 1 0F F2 .dbyt 0FF2h +002106r 1 0F F3 .dbyt 0FF3h +002108r 1 0F F4 .dbyt 0FF4h +00210Ar 1 0F F5 .dbyt 0FF5h +00210Cr 1 0F F6 .dbyt 0FF6h +00210Er 1 0F F7 .dbyt 0FF7h +002110r 1 0F F8 .dbyt 0FF8h +002112r 1 0F F9 .dbyt 0FF9h +002114r 1 0F FA .dbyt 0FFAh +002116r 1 0F FB .dbyt 0FFBh +002118r 1 0F FC .dbyt 0FFCh +00211Ar 1 0F FD .dbyt 0FFDh +00211Cr 1 0F FE .dbyt 0FFEh +00211Er 1 0F FF .dbyt 0FFFh +002120r 1 10 00 .dbyt 1000h +002122r 1 10 01 .dbyt 1001h +002124r 1 10 02 .dbyt 1002h +002126r 1 10 03 .dbyt 1003h +002128r 1 10 04 .dbyt 1004h +00212Ar 1 10 05 .dbyt 1005h +00212Cr 1 10 06 .dbyt 1006h +00212Er 1 10 07 .dbyt 1007h +002130r 1 10 08 .dbyt 1008h +002132r 1 7F F0 .dbyt 7FF0h +002134r 1 7F F1 .dbyt 7FF1h +002136r 1 7F F2 .dbyt 7FF2h +002138r 1 7F F3 .dbyt 7FF3h +00213Ar 1 7F F4 .dbyt 7FF4h +00213Cr 1 7F F5 .dbyt 7FF5h +00213Er 1 7F F6 .dbyt 7FF6h +002140r 1 7F F7 .dbyt 7FF7h +002142r 1 7F F8 .dbyt 7FF8h +002144r 1 7F F9 .dbyt 7FF9h +002146r 1 7F FA .dbyt 7FFAh +002148r 1 7F FB .dbyt 7FFBh +00214Ar 1 7F FC .dbyt 7FFCh +00214Cr 1 7F FD .dbyt 7FFDh +00214Er 1 7F FE .dbyt 7FFEh +002150r 1 7F FF .dbyt 7FFFh +002152r 1 80 00 .dbyt 8000h +002154r 1 80 01 .dbyt 8001h +002156r 1 80 02 .dbyt 8002h +002158r 1 80 03 .dbyt 8003h +00215Ar 1 80 04 .dbyt 8004h +00215Cr 1 80 05 .dbyt 8005h +00215Er 1 80 06 .dbyt 8006h +002160r 1 80 07 .dbyt 8007h +002162r 1 80 08 .dbyt 8008h +002164r 1 80 09 .dbyt 8009h +002166r 1 80 0A .dbyt 800Ah +002168r 1 80 0B .dbyt 800Bh +00216Ar 1 9F E1 .dbyt 9FE1h +00216Cr 1 9F E2 .dbyt 9FE2h +00216Er 1 9F E3 .dbyt 9FE3h +002170r 1 9F E4 .dbyt 9FE4h +002172r 1 9F E5 .dbyt 9FE5h +002174r 1 9F E6 .dbyt 9FE6h +002176r 1 9F E7 .dbyt 9FE7h +002178r 1 9F E8 .dbyt 9FE8h +00217Ar 1 9F E9 .dbyt 9FE9h +00217Cr 1 9F EA .dbyt 9FEAh +00217Er 1 9F EB .dbyt 9FEBh +002180r 1 9F EC .dbyt 9FECh +002182r 1 9F ED .dbyt 9FEDh +002184r 1 9F EE .dbyt 9FEEh +002186r 1 9F EF .dbyt 9FEFh +002188r 1 9F F0 .dbyt 9FF0h +00218Ar 1 9F F1 .dbyt 9FF1h +00218Cr 1 9F F2 .dbyt 9FF2h +00218Er 1 9F F3 .dbyt 9FF3h +002190r 1 9F F4 .dbyt 9FF4h +002192r 1 9F F5 .dbyt 9FF5h +002194r 1 9F F6 .dbyt 9FF6h +002196r 1 9F F7 .dbyt 9FF7h +002198r 1 9F F8 .dbyt 9FF8h +00219Ar 1 9F F9 .dbyt 9FF9h +00219Cr 1 9F FA .dbyt 9FFAh +00219Er 1 9F FB .dbyt 9FFBh +0021A0r 1 9F FC .dbyt 9FFCh +0021A2r 1 9F FD .dbyt 9FFDh +0021A4r 1 9F FE .dbyt 9FFEh +0021A6r 1 9F FF .dbyt 9FFFh +0021A8r 1 A0 00 .dbyt 0A000h +0021AAr 1 A0 01 .dbyt 0A001h +0021ACr 1 A0 02 .dbyt 0A002h +0021AEr 1 A0 03 .dbyt 0A003h +0021B0r 1 A0 04 .dbyt 0A004h +0021B2r 1 A0 05 .dbyt 0A005h +0021B4r 1 A0 06 .dbyt 0A006h +0021B6r 1 A0 07 .dbyt 0A007h +0021B8r 1 A0 08 .dbyt 0A008h +0021BAr 1 A0 09 .dbyt 0A009h +0021BCr 1 A0 0A .dbyt 0A00Ah +0021BEr 1 A0 0B .dbyt 0A00Bh +0021C0r 1 A0 0C .dbyt 0A00Ch +0021C2r 1 A0 0D .dbyt 0A00Dh +0021C4r 1 A0 0E .dbyt 0A00Eh +0021C6r 1 A0 0F .dbyt 0A00Fh +0021C8r 1 AF E1 .dbyt 0AFE1h +0021CAr 1 AF E2 .dbyt 0AFE2h +0021CCr 1 AF E3 .dbyt 0AFE3h +0021CEr 1 AF E4 .dbyt 0AFE4h +0021D0r 1 AF E5 .dbyt 0AFE5h +0021D2r 1 AF E6 .dbyt 0AFE6h +0021D4r 1 AF E7 .dbyt 0AFE7h +0021D6r 1 AF E8 .dbyt 0AFE8h +0021D8r 1 AF E9 .dbyt 0AFE9h +0021DAr 1 AF EA .dbyt 0AFEAh +0021DCr 1 AF EB .dbyt 0AFEBh +0021DEr 1 AF EC .dbyt 0AFECh +0021E0r 1 AF ED .dbyt 0AFEDh +0021E2r 1 AF EE .dbyt 0AFEEh +0021E4r 1 AF EF .dbyt 0AFEFh +0021E6r 1 AF F0 .dbyt 0AFF0h +0021E8r 1 AF F1 .dbyt 0AFF1h +0021EAr 1 AF F2 .dbyt 0AFF2h +0021ECr 1 AF F3 .dbyt 0AFF3h +0021EEr 1 AF F4 .dbyt 0AFF4h +0021F0r 1 AF F5 .dbyt 0AFF5h +0021F2r 1 AF F6 .dbyt 0AFF6h +0021F4r 1 AF F7 .dbyt 0AFF7h +0021F6r 1 AF F8 .dbyt 0AFF8h +0021F8r 1 AF F9 .dbyt 0AFF9h +0021FAr 1 AF FA .dbyt 0AFFAh +0021FCr 1 AF FB .dbyt 0AFFBh +0021FEr 1 AF FC .dbyt 0AFFCh +002200r 1 AF FD .dbyt 0AFFDh +002202r 1 AF FE .dbyt 0AFFEh +002204r 1 AF FF .dbyt 0AFFFh +002206r 1 B0 00 .dbyt 0B000h +002208r 1 B0 01 .dbyt 0B001h +00220Ar 1 B0 02 .dbyt 0B002h +00220Cr 1 B0 03 .dbyt 0B003h +00220Er 1 B0 04 .dbyt 0B004h +002210r 1 B0 05 .dbyt 0B005h +002212r 1 B0 06 .dbyt 0B006h +002214r 1 B0 07 .dbyt 0B007h +002216r 1 B0 08 .dbyt 0B008h +002218r 1 B0 09 .dbyt 0B009h +00221Ar 1 B0 0A .dbyt 0B00Ah +00221Cr 1 B0 0B .dbyt 0B00Bh +00221Er 1 B0 0C .dbyt 0B00Ch +002220r 1 B0 0D .dbyt 0B00Dh +002222r 1 B0 0E .dbyt 0B00Eh +002224r 1 B0 0F .dbyt 0B00Fh +002226r 1 BF E1 .dbyt 0BFE1h +002228r 1 BF E2 .dbyt 0BFE2h +00222Ar 1 BF E3 .dbyt 0BFE3h +00222Cr 1 BF E4 .dbyt 0BFE4h +00222Er 1 BF E5 .dbyt 0BFE5h +002230r 1 BF E6 .dbyt 0BFE6h +002232r 1 BF E7 .dbyt 0BFE7h +002234r 1 BF E8 .dbyt 0BFE8h +002236r 1 BF E9 .dbyt 0BFE9h +002238r 1 BF EA .dbyt 0BFEAh +00223Ar 1 BF EB .dbyt 0BFEBh +00223Cr 1 BF EC .dbyt 0BFECh +00223Er 1 BF ED .dbyt 0BFEDh +002240r 1 BF EE .dbyt 0BFEEh +002242r 1 BF EF .dbyt 0BFEFh +002244r 1 BF F0 .dbyt 0BFF0h +002246r 1 BF F1 .dbyt 0BFF1h +002248r 1 BF F2 .dbyt 0BFF2h +00224Ar 1 BF F3 .dbyt 0BFF3h +00224Cr 1 BF F4 .dbyt 0BFF4h +00224Er 1 BF F5 .dbyt 0BFF5h +002250r 1 BF F6 .dbyt 0BFF6h +002252r 1 BF F7 .dbyt 0BFF7h +002254r 1 BF F8 .dbyt 0BFF8h +002256r 1 BF F9 .dbyt 0BFF9h +002258r 1 BF FA .dbyt 0BFFAh +00225Ar 1 BF FB .dbyt 0BFFBh +00225Cr 1 BF FC .dbyt 0BFFCh +00225Er 1 BF FD .dbyt 0BFFDh +002260r 1 BF FE .dbyt 0BFFEh +002262r 1 BF FF .dbyt 0BFFFh +002264r 1 C0 00 .dbyt 0C000h +002266r 1 C0 01 .dbyt 0C001h +002268r 1 C0 02 .dbyt 0C002h +00226Ar 1 C0 03 .dbyt 0C003h +00226Cr 1 C0 04 .dbyt 0C004h +00226Er 1 C0 05 .dbyt 0C005h +002270r 1 C0 06 .dbyt 0C006h +002272r 1 C0 07 .dbyt 0C007h +002274r 1 C0 08 .dbyt 0C008h +002276r 1 C0 09 .dbyt 0C009h +002278r 1 C0 0A .dbyt 0C00Ah +00227Ar 1 C0 0B .dbyt 0C00Bh +00227Cr 1 C0 0C .dbyt 0C00Ch +00227Er 1 C0 0D .dbyt 0C00Dh +002280r 1 C0 0E .dbyt 0C00Eh +002282r 1 C0 0F .dbyt 0C00Fh +002284r 1 CF E1 .dbyt 0CFE1h +002286r 1 CF E2 .dbyt 0CFE2h +002288r 1 CF E3 .dbyt 0CFE3h +00228Ar 1 CF E4 .dbyt 0CFE4h +00228Cr 1 CF E5 .dbyt 0CFE5h +00228Er 1 CF E6 .dbyt 0CFE6h +002290r 1 CF E7 .dbyt 0CFE7h +002292r 1 CF E8 .dbyt 0CFE8h +002294r 1 CF E9 .dbyt 0CFE9h +002296r 1 CF EA .dbyt 0CFEAh +002298r 1 CF EB .dbyt 0CFEBh +00229Ar 1 CF EC .dbyt 0CFECh +00229Cr 1 CF ED .dbyt 0CFEDh +00229Er 1 CF EE .dbyt 0CFEEh +0022A0r 1 CF EF .dbyt 0CFEFh +0022A2r 1 CF F0 .dbyt 0CFF0h +0022A4r 1 CF F1 .dbyt 0CFF1h +0022A6r 1 CF F2 .dbyt 0CFF2h +0022A8r 1 CF F3 .dbyt 0CFF3h +0022AAr 1 CF F4 .dbyt 0CFF4h +0022ACr 1 CF F5 .dbyt 0CFF5h +0022AEr 1 CF F6 .dbyt 0CFF6h +0022B0r 1 CF F7 .dbyt 0CFF7h +0022B2r 1 CF F8 .dbyt 0CFF8h +0022B4r 1 CF F9 .dbyt 0CFF9h +0022B6r 1 CF FA .dbyt 0CFFAh +0022B8r 1 CF FB .dbyt 0CFFBh +0022BAr 1 CF FC .dbyt 0CFFCh +0022BCr 1 CF FD .dbyt 0CFFDh +0022BEr 1 CF FE .dbyt 0CFFEh +0022C0r 1 CF FF .dbyt 0CFFFh +0022C2r 1 D0 00 .dbyt 0D000h +0022C4r 1 D0 01 .dbyt 0D001h +0022C6r 1 D0 02 .dbyt 0D002h +0022C8r 1 D0 03 .dbyt 0D003h +0022CAr 1 D0 04 .dbyt 0D004h +0022CCr 1 D0 05 .dbyt 0D005h +0022CEr 1 D0 06 .dbyt 0D006h +0022D0r 1 D0 07 .dbyt 0D007h +0022D2r 1 D0 08 .dbyt 0D008h +0022D4r 1 D0 09 .dbyt 0D009h +0022D6r 1 D0 0A .dbyt 0D00Ah +0022D8r 1 D0 0B .dbyt 0D00Bh +0022DAr 1 D0 0C .dbyt 0D00Ch +0022DCr 1 D0 0D .dbyt 0D00Dh +0022DEr 1 D0 0E .dbyt 0D00Eh +0022E0r 1 D0 0F .dbyt 0D00Fh +0022E2r 1 DF E1 .dbyt 0DFE1h +0022E4r 1 DF E2 .dbyt 0DFE2h +0022E6r 1 DF E3 .dbyt 0DFE3h +0022E8r 1 DF E4 .dbyt 0DFE4h +0022EAr 1 DF E5 .dbyt 0DFE5h +0022ECr 1 DF E6 .dbyt 0DFE6h +0022EEr 1 DF E7 .dbyt 0DFE7h +0022F0r 1 DF E8 .dbyt 0DFE8h +0022F2r 1 DF E9 .dbyt 0DFE9h +0022F4r 1 DF EA .dbyt 0DFEAh +0022F6r 1 DF EB .dbyt 0DFEBh +0022F8r 1 DF EC .dbyt 0DFECh +0022FAr 1 DF ED .dbyt 0DFEDh +0022FCr 1 DF EE .dbyt 0DFEEh +0022FEr 1 DF EF .dbyt 0DFEFh +002300r 1 DF F0 .dbyt 0DFF0h +002302r 1 DF F1 .dbyt 0DFF1h +002304r 1 DF F2 .dbyt 0DFF2h +002306r 1 DF F3 .dbyt 0DFF3h +002308r 1 DF F4 .dbyt 0DFF4h +00230Ar 1 DF F5 .dbyt 0DFF5h +00230Cr 1 DF F6 .dbyt 0DFF6h +00230Er 1 DF F7 .dbyt 0DFF7h +002310r 1 DF F8 .dbyt 0DFF8h +002312r 1 DF F9 .dbyt 0DFF9h +002314r 1 DF FA .dbyt 0DFFAh +002316r 1 DF FB .dbyt 0DFFBh +002318r 1 DF FC .dbyt 0DFFCh +00231Ar 1 DF FD .dbyt 0DFFDh +00231Cr 1 DF FE .dbyt 0DFFEh +00231Er 1 DF FF .dbyt 0DFFFh +002320r 1 E0 00 .dbyt 0E000h +002322r 1 E0 01 .dbyt 0E001h +002324r 1 E0 02 .dbyt 0E002h +002326r 1 E0 03 .dbyt 0E003h +002328r 1 E0 04 .dbyt 0E004h +00232Ar 1 E0 05 .dbyt 0E005h +00232Cr 1 E0 06 .dbyt 0E006h +00232Er 1 E0 07 .dbyt 0E007h +002330r 1 E0 08 .dbyt 0E008h +002332r 1 E0 09 .dbyt 0E009h +002334r 1 E0 0A .dbyt 0E00Ah +002336r 1 E0 0B .dbyt 0E00Bh +002338r 1 E0 0C .dbyt 0E00Ch +00233Ar 1 E0 0D .dbyt 0E00Dh +00233Cr 1 E0 0E .dbyt 0E00Eh +00233Er 1 E0 0F .dbyt 0E00Fh +002340r 1 EF E1 .dbyt 0EFE1h +002342r 1 EF E2 .dbyt 0EFE2h +002344r 1 EF E3 .dbyt 0EFE3h +002346r 1 EF E4 .dbyt 0EFE4h +002348r 1 EF E5 .dbyt 0EFE5h +00234Ar 1 EF E6 .dbyt 0EFE6h +00234Cr 1 EF E7 .dbyt 0EFE7h +00234Er 1 EF E8 .dbyt 0EFE8h +002350r 1 EF E9 .dbyt 0EFE9h +002352r 1 EF EA .dbyt 0EFEAh +002354r 1 EF EB .dbyt 0EFEBh +002356r 1 EF EC .dbyt 0EFECh +002358r 1 EF ED .dbyt 0EFEDh +00235Ar 1 EF EE .dbyt 0EFEEh +00235Cr 1 EF EF .dbyt 0EFEFh +00235Er 1 EF F0 .dbyt 0EFF0h +002360r 1 EF F1 .dbyt 0EFF1h +002362r 1 EF F2 .dbyt 0EFF2h +002364r 1 EF F3 .dbyt 0EFF3h +002366r 1 EF F4 .dbyt 0EFF4h +002368r 1 EF F5 .dbyt 0EFF5h +00236Ar 1 EF F6 .dbyt 0EFF6h +00236Cr 1 EF F7 .dbyt 0EFF7h +00236Er 1 EF F8 .dbyt 0EFF8h +002370r 1 EF F9 .dbyt 0EFF9h +002372r 1 EF FA .dbyt 0EFFAh +002374r 1 EF FB .dbyt 0EFFBh +002376r 1 EF FC .dbyt 0EFFCh +002378r 1 EF FD .dbyt 0EFFDh +00237Ar 1 EF FE .dbyt 0EFFEh +00237Cr 1 EF FF .dbyt 0EFFFh +00237Er 1 F0 00 .dbyt 0F000h +002380r 1 F0 01 .dbyt 0F001h +002382r 1 F0 02 .dbyt 0F002h +002384r 1 F0 03 .dbyt 0F003h +002386r 1 F0 04 .dbyt 0F004h +002388r 1 F0 05 .dbyt 0F005h +00238Ar 1 F0 06 .dbyt 0F006h +00238Cr 1 F0 07 .dbyt 0F007h +00238Er 1 F0 08 .dbyt 0F008h +002390r 1 F0 09 .dbyt 0F009h +002392r 1 F0 0A .dbyt 0F00Ah +002394r 1 F0 0B .dbyt 0F00Bh +002396r 1 F0 0C .dbyt 0F00Ch +002398r 1 F0 0D .dbyt 0F00Dh +00239Ar 1 F0 0E .dbyt 0F00Eh +00239Cr 1 F0 0F .dbyt 0F00Fh +00239Er 1 FF E1 .dbyt 0FFE1h +0023A0r 1 FF E2 .dbyt 0FFE2h +0023A2r 1 FF E3 .dbyt 0FFE3h +0023A4r 1 FF E4 .dbyt 0FFE4h +0023A6r 1 FF E5 .dbyt 0FFE5h +0023A8r 1 FF E6 .dbyt 0FFE6h +0023AAr 1 FF E7 .dbyt 0FFE7h +0023ACr 1 FF E8 .dbyt 0FFE8h +0023AEr 1 FF E9 .dbyt 0FFE9h +0023B0r 1 FF EA .dbyt 0FFEAh +0023B2r 1 FF EB .dbyt 0FFEBh +0023B4r 1 FF EC .dbyt 0FFECh +0023B6r 1 FF ED .dbyt 0FFEDh +0023B8r 1 FF EE .dbyt 0FFEEh +0023BAr 1 FF EF .dbyt 0FFEFh +0023BCr 1 FF F0 .dbyt 0FFF0h +0023BEr 1 FF F1 .dbyt 0FFF1h +0023C0r 1 FF F2 .dbyt 0FFF2h +0023C2r 1 FF F3 .dbyt 0FFF3h +0023C4r 1 FF F4 .dbyt 0FFF4h +0023C6r 1 FF F5 .dbyt 0FFF5h +0023C8r 1 FF F6 .dbyt 0FFF6h +0023CAr 1 FF F7 .dbyt 0FFF7h +0023CCr 1 FF F8 .dbyt 0FFF8h +0023CEr 1 FF F9 .dbyt 0FFF9h +0023D0r 1 FF FA .dbyt 0FFFAh +0023D2r 1 FF FB .dbyt 0FFFBh +0023D4r 1 FF FC .dbyt 0FFFCh +0023D6r 1 FF FD .dbyt 0FFFDh +0023D8r 1 FF FE .dbyt 0FFFEh +0023DAr 1 FF FF .dbyt 0FFFFh +0023DCr 1 +0023DCr 1 ; alternative hex values, always leading zero +0023DCr 1 00 00 .dbyt 00h +0023DEr 1 00 01 .dbyt 01h +0023E0r 1 00 02 .dbyt 02h +0023E2r 1 00 03 .dbyt 03h +0023E4r 1 00 04 .dbyt 04h +0023E6r 1 00 05 .dbyt 05h +0023E8r 1 00 06 .dbyt 06h +0023EAr 1 00 07 .dbyt 07h +0023ECr 1 00 08 .dbyt 08h +0023EEr 1 00 09 .dbyt 09h +0023F0r 1 00 0A .dbyt 0ah +0023F2r 1 00 0B .dbyt 0bh +0023F4r 1 00 0C .dbyt 0ch +0023F6r 1 00 0D .dbyt 0dh +0023F8r 1 00 0E .dbyt 0eh +0023FAr 1 00 0F .dbyt 0fh +0023FCr 1 00 10 .dbyt 010h +0023FEr 1 00 11 .dbyt 011h +002400r 1 00 12 .dbyt 012h +002402r 1 00 13 .dbyt 013h +002404r 1 00 70 .dbyt 070h +002406r 1 00 71 .dbyt 071h +002408r 1 00 72 .dbyt 072h +00240Ar 1 00 73 .dbyt 073h +00240Cr 1 00 74 .dbyt 074h +00240Er 1 00 75 .dbyt 075h +002410r 1 00 76 .dbyt 076h +002412r 1 00 77 .dbyt 077h +002414r 1 00 78 .dbyt 078h +002416r 1 00 79 .dbyt 079h +002418r 1 00 7A .dbyt 07ah +00241Ar 1 00 7B .dbyt 07bh +00241Cr 1 00 7C .dbyt 07ch +00241Er 1 00 7D .dbyt 07dh +002420r 1 00 7E .dbyt 07eh +002422r 1 00 7F .dbyt 07fh +002424r 1 00 80 .dbyt 080h +002426r 1 00 81 .dbyt 081h +002428r 1 00 82 .dbyt 082h +00242Ar 1 00 83 .dbyt 083h +00242Cr 1 00 84 .dbyt 084h +00242Er 1 00 85 .dbyt 085h +002430r 1 00 86 .dbyt 086h +002432r 1 00 F0 .dbyt 0f0h +002434r 1 00 F1 .dbyt 0f1h +002436r 1 00 F2 .dbyt 0f2h +002438r 1 00 F3 .dbyt 0f3h +00243Ar 1 00 F4 .dbyt 0f4h +00243Cr 1 00 F5 .dbyt 0f5h +00243Er 1 00 F6 .dbyt 0f6h +002440r 1 00 F7 .dbyt 0f7h +002442r 1 00 F8 .dbyt 0f8h +002444r 1 00 F9 .dbyt 0f9h +002446r 1 00 FA .dbyt 0fah +002448r 1 00 FB .dbyt 0fbh +00244Ar 1 00 FC .dbyt 0fch +00244Cr 1 00 FD .dbyt 0fdh +00244Er 1 00 FE .dbyt 0feh +002450r 1 00 FF .dbyt 0ffh +002452r 1 01 00 .dbyt 0100h +002454r 1 01 01 .dbyt 0101h +002456r 1 01 02 .dbyt 0102h +002458r 1 01 03 .dbyt 0103h +00245Ar 1 0F D2 .dbyt 0fd2h +00245Cr 1 0F D3 .dbyt 0fd3h +00245Er 1 0F D4 .dbyt 0fd4h +002460r 1 0F D5 .dbyt 0fd5h +002462r 1 0F D6 .dbyt 0fd6h +002464r 1 0F D7 .dbyt 0fd7h +002466r 1 0F D8 .dbyt 0fd8h +002468r 1 0F D9 .dbyt 0fd9h +00246Ar 1 0F DA .dbyt 0fdah +00246Cr 1 0F DB .dbyt 0fdbh +00246Er 1 0F DC .dbyt 0fdch +002470r 1 0F DD .dbyt 0fddh +002472r 1 0F DE .dbyt 0fdeh +002474r 1 0F DF .dbyt 0fdfh +002476r 1 0F E0 .dbyt 0fe0h +002478r 1 0F E1 .dbyt 0fe1h +00247Ar 1 0F E2 .dbyt 0fe2h +00247Cr 1 0F E3 .dbyt 0fe3h +00247Er 1 0F E4 .dbyt 0fe4h +002480r 1 0F E5 .dbyt 0fe5h +002482r 1 0F E6 .dbyt 0fe6h +002484r 1 0F E7 .dbyt 0fe7h +002486r 1 0F E8 .dbyt 0fe8h +002488r 1 0F E9 .dbyt 0fe9h +00248Ar 1 0F EA .dbyt 0feah +00248Cr 1 0F EB .dbyt 0febh +00248Er 1 0F EC .dbyt 0fech +002490r 1 0F ED .dbyt 0fedh +002492r 1 0F EE .dbyt 0feeh +002494r 1 0F EF .dbyt 0fefh +002496r 1 0F F0 .dbyt 0ff0h +002498r 1 0F F1 .dbyt 0ff1h +00249Ar 1 0F F2 .dbyt 0ff2h +00249Cr 1 0F F3 .dbyt 0ff3h +00249Er 1 0F F4 .dbyt 0ff4h +0024A0r 1 0F F5 .dbyt 0ff5h +0024A2r 1 0F F6 .dbyt 0ff6h +0024A4r 1 0F F7 .dbyt 0ff7h +0024A6r 1 0F F8 .dbyt 0ff8h +0024A8r 1 0F F9 .dbyt 0ff9h +0024AAr 1 0F FA .dbyt 0ffah +0024ACr 1 0F FB .dbyt 0ffbh +0024AEr 1 0F FC .dbyt 0ffch +0024B0r 1 0F FD .dbyt 0ffdh +0024B2r 1 0F FE .dbyt 0ffeh +0024B4r 1 0F FF .dbyt 0fffh +0024B6r 1 10 00 .dbyt 01000h +0024B8r 1 10 01 .dbyt 01001h +0024BAr 1 10 02 .dbyt 01002h +0024BCr 1 10 03 .dbyt 01003h +0024BEr 1 10 04 .dbyt 01004h +0024C0r 1 10 05 .dbyt 01005h +0024C2r 1 10 06 .dbyt 01006h +0024C4r 1 10 07 .dbyt 01007h +0024C6r 1 10 08 .dbyt 01008h +0024C8r 1 7F F0 .dbyt 07ff0h +0024CAr 1 7F F1 .dbyt 07ff1h +0024CCr 1 7F F2 .dbyt 07ff2h +0024CEr 1 7F F3 .dbyt 07ff3h +0024D0r 1 7F F4 .dbyt 07ff4h +0024D2r 1 7F F5 .dbyt 07ff5h +0024D4r 1 7F F6 .dbyt 07ff6h +0024D6r 1 7F F7 .dbyt 07ff7h +0024D8r 1 7F F8 .dbyt 07ff8h +0024DAr 1 7F F9 .dbyt 07ff9h +0024DCr 1 7F FA .dbyt 07ffah +0024DEr 1 7F FB .dbyt 07ffbh +0024E0r 1 7F FC .dbyt 07ffch +0024E2r 1 7F FD .dbyt 07ffdh +0024E4r 1 7F FE .dbyt 07ffeh +0024E6r 1 7F FF .dbyt 07fffh +0024E8r 1 80 00 .dbyt 08000h +0024EAr 1 80 01 .dbyt 08001h +0024ECr 1 80 02 .dbyt 08002h +0024EEr 1 80 03 .dbyt 08003h +0024F0r 1 80 04 .dbyt 08004h +0024F2r 1 80 05 .dbyt 08005h +0024F4r 1 80 06 .dbyt 08006h +0024F6r 1 80 07 .dbyt 08007h +0024F8r 1 80 08 .dbyt 08008h +0024FAr 1 80 09 .dbyt 08009h +0024FCr 1 80 0A .dbyt 0800ah +0024FEr 1 80 0B .dbyt 0800bh +002500r 1 9F E1 .dbyt 09fe1h +002502r 1 9F E2 .dbyt 09fe2h +002504r 1 9F E3 .dbyt 09fe3h +002506r 1 9F E4 .dbyt 09fe4h +002508r 1 9F E5 .dbyt 09fe5h +00250Ar 1 9F E6 .dbyt 09fe6h +00250Cr 1 9F E7 .dbyt 09fe7h +00250Er 1 9F E8 .dbyt 09fe8h +002510r 1 9F E9 .dbyt 09fe9h +002512r 1 9F EA .dbyt 09feah +002514r 1 9F EB .dbyt 09febh +002516r 1 9F EC .dbyt 09fech +002518r 1 9F ED .dbyt 09fedh +00251Ar 1 9F EE .dbyt 09feeh +00251Cr 1 9F EF .dbyt 09fefh +00251Er 1 9F F0 .dbyt 09ff0h +002520r 1 9F F1 .dbyt 09ff1h +002522r 1 9F F2 .dbyt 09ff2h +002524r 1 9F F3 .dbyt 09ff3h +002526r 1 9F F4 .dbyt 09ff4h +002528r 1 9F F5 .dbyt 09ff5h +00252Ar 1 9F F6 .dbyt 09ff6h +00252Cr 1 9F F7 .dbyt 09ff7h +00252Er 1 9F F8 .dbyt 09ff8h +002530r 1 9F F9 .dbyt 09ff9h +002532r 1 9F FA .dbyt 09ffah +002534r 1 9F FB .dbyt 09ffbh +002536r 1 9F FC .dbyt 09ffch +002538r 1 9F FD .dbyt 09ffdh +00253Ar 1 9F FE .dbyt 09ffeh +00253Cr 1 9F FF .dbyt 09fffh +00253Er 1 A0 00 .dbyt 0a000h +002540r 1 A0 01 .dbyt 0a001h +002542r 1 A0 02 .dbyt 0a002h +002544r 1 A0 03 .dbyt 0a003h +002546r 1 A0 04 .dbyt 0a004h +002548r 1 A0 05 .dbyt 0a005h +00254Ar 1 A0 06 .dbyt 0a006h +00254Cr 1 A0 07 .dbyt 0a007h +00254Er 1 A0 08 .dbyt 0a008h +002550r 1 A0 09 .dbyt 0a009h +002552r 1 A0 0A .dbyt 0a00ah +002554r 1 A0 0B .dbyt 0a00bh +002556r 1 A0 0C .dbyt 0a00ch +002558r 1 A0 0D .dbyt 0a00dh +00255Ar 1 A0 0E .dbyt 0a00eh +00255Cr 1 A0 0F .dbyt 0a00fh +00255Er 1 AF E1 .dbyt 0afe1h +002560r 1 AF E2 .dbyt 0afe2h +002562r 1 AF E3 .dbyt 0afe3h +002564r 1 AF E4 .dbyt 0afe4h +002566r 1 AF E5 .dbyt 0afe5h +002568r 1 AF E6 .dbyt 0afe6h +00256Ar 1 AF E7 .dbyt 0afe7h +00256Cr 1 AF E8 .dbyt 0afe8h +00256Er 1 AF E9 .dbyt 0afe9h +002570r 1 AF EA .dbyt 0afeah +002572r 1 AF EB .dbyt 0afebh +002574r 1 AF EC .dbyt 0afech +002576r 1 AF ED .dbyt 0afedh +002578r 1 AF EE .dbyt 0afeeh +00257Ar 1 AF EF .dbyt 0afefh +00257Cr 1 AF F0 .dbyt 0aff0h +00257Er 1 AF F1 .dbyt 0aff1h +002580r 1 AF F2 .dbyt 0aff2h +002582r 1 AF F3 .dbyt 0aff3h +002584r 1 AF F4 .dbyt 0aff4h +002586r 1 AF F5 .dbyt 0aff5h +002588r 1 AF F6 .dbyt 0aff6h +00258Ar 1 AF F7 .dbyt 0aff7h +00258Cr 1 AF F8 .dbyt 0aff8h +00258Er 1 AF F9 .dbyt 0aff9h +002590r 1 AF FA .dbyt 0affah +002592r 1 AF FB .dbyt 0affbh +002594r 1 AF FC .dbyt 0affch +002596r 1 AF FD .dbyt 0affdh +002598r 1 AF FE .dbyt 0affeh +00259Ar 1 AF FF .dbyt 0afffh +00259Cr 1 B0 00 .dbyt 0b000h +00259Er 1 B0 01 .dbyt 0b001h +0025A0r 1 B0 02 .dbyt 0b002h +0025A2r 1 B0 03 .dbyt 0b003h +0025A4r 1 B0 04 .dbyt 0b004h +0025A6r 1 B0 05 .dbyt 0b005h +0025A8r 1 B0 06 .dbyt 0b006h +0025AAr 1 B0 07 .dbyt 0b007h +0025ACr 1 B0 08 .dbyt 0b008h +0025AEr 1 B0 09 .dbyt 0b009h +0025B0r 1 B0 0A .dbyt 0b00ah +0025B2r 1 B0 0B .dbyt 0b00bh +0025B4r 1 B0 0C .dbyt 0b00ch +0025B6r 1 B0 0D .dbyt 0b00dh +0025B8r 1 B0 0E .dbyt 0b00eh +0025BAr 1 B0 0F .dbyt 0b00fh +0025BCr 1 BF E1 .dbyt 0bfe1h +0025BEr 1 BF E2 .dbyt 0bfe2h +0025C0r 1 BF E3 .dbyt 0bfe3h +0025C2r 1 BF E4 .dbyt 0bfe4h +0025C4r 1 BF E5 .dbyt 0bfe5h +0025C6r 1 BF E6 .dbyt 0bfe6h +0025C8r 1 BF E7 .dbyt 0bfe7h +0025CAr 1 BF E8 .dbyt 0bfe8h +0025CCr 1 BF E9 .dbyt 0bfe9h +0025CEr 1 BF EA .dbyt 0bfeah +0025D0r 1 BF EB .dbyt 0bfebh +0025D2r 1 BF EC .dbyt 0bfech +0025D4r 1 BF ED .dbyt 0bfedh +0025D6r 1 BF EE .dbyt 0bfeeh +0025D8r 1 BF EF .dbyt 0bfefh +0025DAr 1 BF F0 .dbyt 0bff0h +0025DCr 1 BF F1 .dbyt 0bff1h +0025DEr 1 BF F2 .dbyt 0bff2h +0025E0r 1 BF F3 .dbyt 0bff3h +0025E2r 1 BF F4 .dbyt 0bff4h +0025E4r 1 BF F5 .dbyt 0bff5h +0025E6r 1 BF F6 .dbyt 0bff6h +0025E8r 1 BF F7 .dbyt 0bff7h +0025EAr 1 BF F8 .dbyt 0bff8h +0025ECr 1 BF F9 .dbyt 0bff9h +0025EEr 1 BF FA .dbyt 0bffah +0025F0r 1 BF FB .dbyt 0bffbh +0025F2r 1 BF FC .dbyt 0bffch +0025F4r 1 BF FD .dbyt 0bffdh +0025F6r 1 BF FE .dbyt 0bffeh +0025F8r 1 BF FF .dbyt 0bfffh +0025FAr 1 C0 00 .dbyt 0c000h +0025FCr 1 C0 01 .dbyt 0c001h +0025FEr 1 C0 02 .dbyt 0c002h +002600r 1 C0 03 .dbyt 0c003h +002602r 1 C0 04 .dbyt 0c004h +002604r 1 C0 05 .dbyt 0c005h +002606r 1 C0 06 .dbyt 0c006h +002608r 1 C0 07 .dbyt 0c007h +00260Ar 1 C0 08 .dbyt 0c008h +00260Cr 1 C0 09 .dbyt 0c009h +00260Er 1 C0 0A .dbyt 0c00ah +002610r 1 C0 0B .dbyt 0c00bh +002612r 1 C0 0C .dbyt 0c00ch +002614r 1 C0 0D .dbyt 0c00dh +002616r 1 C0 0E .dbyt 0c00eh +002618r 1 C0 0F .dbyt 0c00fh +00261Ar 1 CF E1 .dbyt 0cfe1h +00261Cr 1 CF E2 .dbyt 0cfe2h +00261Er 1 CF E3 .dbyt 0cfe3h +002620r 1 CF E4 .dbyt 0cfe4h +002622r 1 CF E5 .dbyt 0cfe5h +002624r 1 CF E6 .dbyt 0cfe6h +002626r 1 CF E7 .dbyt 0cfe7h +002628r 1 CF E8 .dbyt 0cfe8h +00262Ar 1 CF E9 .dbyt 0cfe9h +00262Cr 1 CF EA .dbyt 0cfeah +00262Er 1 CF EB .dbyt 0cfebh +002630r 1 CF EC .dbyt 0cfech +002632r 1 CF ED .dbyt 0cfedh +002634r 1 CF EE .dbyt 0cfeeh +002636r 1 CF EF .dbyt 0cfefh +002638r 1 CF F0 .dbyt 0cff0h +00263Ar 1 CF F1 .dbyt 0cff1h +00263Cr 1 CF F2 .dbyt 0cff2h +00263Er 1 CF F3 .dbyt 0cff3h +002640r 1 CF F4 .dbyt 0cff4h +002642r 1 CF F5 .dbyt 0cff5h +002644r 1 CF F6 .dbyt 0cff6h +002646r 1 CF F7 .dbyt 0cff7h +002648r 1 CF F8 .dbyt 0cff8h +00264Ar 1 CF F9 .dbyt 0cff9h +00264Cr 1 CF FA .dbyt 0cffah +00264Er 1 CF FB .dbyt 0cffbh +002650r 1 CF FC .dbyt 0cffch +002652r 1 CF FD .dbyt 0cffdh +002654r 1 CF FE .dbyt 0cffeh +002656r 1 CF FF .dbyt 0cfffh +002658r 1 D0 00 .dbyt 0d000h +00265Ar 1 D0 01 .dbyt 0d001h +00265Cr 1 D0 02 .dbyt 0d002h +00265Er 1 D0 03 .dbyt 0d003h +002660r 1 D0 04 .dbyt 0d004h +002662r 1 D0 05 .dbyt 0d005h +002664r 1 D0 06 .dbyt 0d006h +002666r 1 D0 07 .dbyt 0d007h +002668r 1 D0 08 .dbyt 0d008h +00266Ar 1 D0 09 .dbyt 0d009h +00266Cr 1 D0 0A .dbyt 0d00ah +00266Er 1 D0 0B .dbyt 0d00bh +002670r 1 D0 0C .dbyt 0d00ch +002672r 1 D0 0D .dbyt 0d00dh +002674r 1 D0 0E .dbyt 0d00eh +002676r 1 D0 0F .dbyt 0d00fh +002678r 1 DF E1 .dbyt 0dfe1h +00267Ar 1 DF E2 .dbyt 0dfe2h +00267Cr 1 DF E3 .dbyt 0dfe3h +00267Er 1 DF E4 .dbyt 0dfe4h +002680r 1 DF E5 .dbyt 0dfe5h +002682r 1 DF E6 .dbyt 0dfe6h +002684r 1 DF E7 .dbyt 0dfe7h +002686r 1 DF E8 .dbyt 0dfe8h +002688r 1 DF E9 .dbyt 0dfe9h +00268Ar 1 DF EA .dbyt 0dfeah +00268Cr 1 DF EB .dbyt 0dfebh +00268Er 1 DF EC .dbyt 0dfech +002690r 1 DF ED .dbyt 0dfedh +002692r 1 DF EE .dbyt 0dfeeh +002694r 1 DF EF .dbyt 0dfefh +002696r 1 DF F0 .dbyt 0dff0h +002698r 1 DF F1 .dbyt 0dff1h +00269Ar 1 DF F2 .dbyt 0dff2h +00269Cr 1 DF F3 .dbyt 0dff3h +00269Er 1 DF F4 .dbyt 0dff4h +0026A0r 1 DF F5 .dbyt 0dff5h +0026A2r 1 DF F6 .dbyt 0dff6h +0026A4r 1 DF F7 .dbyt 0dff7h +0026A6r 1 DF F8 .dbyt 0dff8h +0026A8r 1 DF F9 .dbyt 0dff9h +0026AAr 1 DF FA .dbyt 0dffah +0026ACr 1 DF FB .dbyt 0dffbh +0026AEr 1 DF FC .dbyt 0dffch +0026B0r 1 DF FD .dbyt 0dffdh +0026B2r 1 DF FE .dbyt 0dffeh +0026B4r 1 DF FF .dbyt 0dfffh +0026B6r 1 E0 00 .dbyt 0e000h +0026B8r 1 E0 01 .dbyt 0e001h +0026BAr 1 E0 02 .dbyt 0e002h +0026BCr 1 E0 03 .dbyt 0e003h +0026BEr 1 E0 04 .dbyt 0e004h +0026C0r 1 E0 05 .dbyt 0e005h +0026C2r 1 E0 06 .dbyt 0e006h +0026C4r 1 E0 07 .dbyt 0e007h +0026C6r 1 E0 08 .dbyt 0e008h +0026C8r 1 E0 09 .dbyt 0e009h +0026CAr 1 E0 0A .dbyt 0e00ah +0026CCr 1 E0 0B .dbyt 0e00bh +0026CEr 1 E0 0C .dbyt 0e00ch +0026D0r 1 E0 0D .dbyt 0e00dh +0026D2r 1 E0 0E .dbyt 0e00eh +0026D4r 1 E0 0F .dbyt 0e00fh +0026D6r 1 EF E1 .dbyt 0efe1h +0026D8r 1 EF E2 .dbyt 0efe2h +0026DAr 1 EF E3 .dbyt 0efe3h +0026DCr 1 EF E4 .dbyt 0efe4h +0026DEr 1 EF E5 .dbyt 0efe5h +0026E0r 1 EF E6 .dbyt 0efe6h +0026E2r 1 EF E7 .dbyt 0efe7h +0026E4r 1 EF E8 .dbyt 0efe8h +0026E6r 1 EF E9 .dbyt 0efe9h +0026E8r 1 EF EA .dbyt 0efeah +0026EAr 1 EF EB .dbyt 0efebh +0026ECr 1 EF EC .dbyt 0efech +0026EEr 1 EF ED .dbyt 0efedh +0026F0r 1 EF EE .dbyt 0efeeh +0026F2r 1 EF EF .dbyt 0efefh +0026F4r 1 EF F0 .dbyt 0eff0h +0026F6r 1 EF F1 .dbyt 0eff1h +0026F8r 1 EF F2 .dbyt 0eff2h +0026FAr 1 EF F3 .dbyt 0eff3h +0026FCr 1 EF F4 .dbyt 0eff4h +0026FEr 1 EF F5 .dbyt 0eff5h +002700r 1 EF F6 .dbyt 0eff6h +002702r 1 EF F7 .dbyt 0eff7h +002704r 1 EF F8 .dbyt 0eff8h +002706r 1 EF F9 .dbyt 0eff9h +002708r 1 EF FA .dbyt 0effah +00270Ar 1 EF FB .dbyt 0effbh +00270Cr 1 EF FC .dbyt 0effch +00270Er 1 EF FD .dbyt 0effdh +002710r 1 EF FE .dbyt 0effeh +002712r 1 EF FF .dbyt 0efffh +002714r 1 F0 00 .dbyt 0f000h +002716r 1 F0 01 .dbyt 0f001h +002718r 1 F0 02 .dbyt 0f002h +00271Ar 1 F0 03 .dbyt 0f003h +00271Cr 1 F0 04 .dbyt 0f004h +00271Er 1 F0 05 .dbyt 0f005h +002720r 1 F0 06 .dbyt 0f006h +002722r 1 F0 07 .dbyt 0f007h +002724r 1 F0 08 .dbyt 0f008h +002726r 1 F0 09 .dbyt 0f009h +002728r 1 F0 0A .dbyt 0f00ah +00272Ar 1 F0 0B .dbyt 0f00bh +00272Cr 1 F0 0C .dbyt 0f00ch +00272Er 1 F0 0D .dbyt 0f00dh +002730r 1 F0 0E .dbyt 0f00eh +002732r 1 F0 0F .dbyt 0f00fh +002734r 1 FF E1 .dbyt 0ffe1h +002736r 1 FF E2 .dbyt 0ffe2h +002738r 1 FF E3 .dbyt 0ffe3h +00273Ar 1 FF E4 .dbyt 0ffe4h +00273Cr 1 FF E5 .dbyt 0ffe5h +00273Er 1 FF E6 .dbyt 0ffe6h +002740r 1 FF E7 .dbyt 0ffe7h +002742r 1 FF E8 .dbyt 0ffe8h +002744r 1 FF E9 .dbyt 0ffe9h +002746r 1 FF EA .dbyt 0ffeah +002748r 1 FF EB .dbyt 0ffebh +00274Ar 1 FF EC .dbyt 0ffech +00274Cr 1 FF ED .dbyt 0ffedh +00274Er 1 FF EE .dbyt 0ffeeh +002750r 1 FF EF .dbyt 0ffefh +002752r 1 FF F0 .dbyt 0fff0h +002754r 1 FF F1 .dbyt 0fff1h +002756r 1 FF F2 .dbyt 0fff2h +002758r 1 FF F3 .dbyt 0fff3h +00275Ar 1 FF F4 .dbyt 0fff4h +00275Cr 1 FF F5 .dbyt 0fff5h +00275Er 1 FF F6 .dbyt 0fff6h +002760r 1 FF F7 .dbyt 0fff7h +002762r 1 FF F8 .dbyt 0fff8h +002764r 1 FF F9 .dbyt 0fff9h +002766r 1 FF FA .dbyt 0fffah +002768r 1 FF FB .dbyt 0fffbh +00276Ar 1 FF FC .dbyt 0fffch +00276Cr 1 FF FD .dbyt 0fffdh +00276Er 1 FF FE .dbyt 0fffeh +002770r 1 FF FF .dbyt 0ffffh +002772r 1 +002772r 1 ; binary values, variable length +002772r 1 00 00 .dbyt %0 +002774r 1 00 01 .dbyt %01 +002776r 1 00 02 .dbyt %010 +002778r 1 00 03 .dbyt %011 +00277Ar 1 00 04 .dbyt %0100 +00277Cr 1 00 05 .dbyt %0101 +00277Er 1 00 06 .dbyt %0110 +002780r 1 00 07 .dbyt %0111 +002782r 1 00 08 .dbyt %01000 +002784r 1 00 09 .dbyt %01001 +002786r 1 00 0A .dbyt %01010 +002788r 1 00 0B .dbyt %01011 +00278Ar 1 00 0C .dbyt %01100 +00278Cr 1 00 0D .dbyt %01101 +00278Er 1 00 0E .dbyt %01110 +002790r 1 00 0F .dbyt %01111 +002792r 1 00 10 .dbyt %010000 +002794r 1 00 11 .dbyt %010001 +002796r 1 00 12 .dbyt %010010 +002798r 1 00 13 .dbyt %010011 +00279Ar 1 00 70 .dbyt %01110000 +00279Cr 1 00 71 .dbyt %01110001 +00279Er 1 00 72 .dbyt %01110010 +0027A0r 1 00 73 .dbyt %01110011 +0027A2r 1 00 74 .dbyt %01110100 +0027A4r 1 00 75 .dbyt %01110101 +0027A6r 1 00 76 .dbyt %01110110 +0027A8r 1 00 77 .dbyt %01110111 +0027AAr 1 00 78 .dbyt %01111000 +0027ACr 1 00 79 .dbyt %01111001 +0027AEr 1 00 7A .dbyt %01111010 +0027B0r 1 00 7B .dbyt %01111011 +0027B2r 1 00 7C .dbyt %01111100 +0027B4r 1 00 7D .dbyt %01111101 +0027B6r 1 00 7E .dbyt %01111110 +0027B8r 1 00 7F .dbyt %01111111 +0027BAr 1 00 80 .dbyt %010000000 +0027BCr 1 00 81 .dbyt %010000001 +0027BEr 1 00 82 .dbyt %010000010 +0027C0r 1 00 83 .dbyt %010000011 +0027C2r 1 00 84 .dbyt %010000100 +0027C4r 1 00 85 .dbyt %010000101 +0027C6r 1 00 86 .dbyt %010000110 +0027C8r 1 00 F0 .dbyt %011110000 +0027CAr 1 00 F1 .dbyt %011110001 +0027CCr 1 00 F2 .dbyt %011110010 +0027CEr 1 00 F3 .dbyt %011110011 +0027D0r 1 00 F4 .dbyt %011110100 +0027D2r 1 00 F5 .dbyt %011110101 +0027D4r 1 00 F6 .dbyt %011110110 +0027D6r 1 00 F7 .dbyt %011110111 +0027D8r 1 00 F8 .dbyt %011111000 +0027DAr 1 00 F9 .dbyt %011111001 +0027DCr 1 00 FA .dbyt %011111010 +0027DEr 1 00 FB .dbyt %011111011 +0027E0r 1 00 FC .dbyt %011111100 +0027E2r 1 00 FD .dbyt %011111101 +0027E4r 1 00 FE .dbyt %011111110 +0027E6r 1 00 FF .dbyt %011111111 +0027E8r 1 01 00 .dbyt %100000000 +0027EAr 1 01 01 .dbyt %100000001 +0027ECr 1 01 02 .dbyt %100000010 +0027EEr 1 01 03 .dbyt %100000011 +0027F0r 1 0F D2 .dbyt %111111010010 +0027F2r 1 0F D3 .dbyt %111111010011 +0027F4r 1 0F D4 .dbyt %111111010100 +0027F6r 1 0F D5 .dbyt %111111010101 +0027F8r 1 0F D6 .dbyt %111111010110 +0027FAr 1 0F D7 .dbyt %111111010111 +0027FCr 1 0F D8 .dbyt %111111011000 +0027FEr 1 0F D9 .dbyt %111111011001 +002800r 1 0F DA .dbyt %111111011010 +002802r 1 0F DB .dbyt %111111011011 +002804r 1 0F DC .dbyt %111111011100 +002806r 1 0F DD .dbyt %111111011101 +002808r 1 0F DE .dbyt %111111011110 +00280Ar 1 0F DF .dbyt %111111011111 +00280Cr 1 0F E0 .dbyt %111111100000 +00280Er 1 0F E1 .dbyt %111111100001 +002810r 1 0F E2 .dbyt %111111100010 +002812r 1 0F E3 .dbyt %111111100011 +002814r 1 0F E4 .dbyt %111111100100 +002816r 1 0F E5 .dbyt %111111100101 +002818r 1 0F E6 .dbyt %111111100110 +00281Ar 1 0F E7 .dbyt %111111100111 +00281Cr 1 0F E8 .dbyt %111111101000 +00281Er 1 0F E9 .dbyt %111111101001 +002820r 1 0F EA .dbyt %111111101010 +002822r 1 0F EB .dbyt %111111101011 +002824r 1 0F EC .dbyt %111111101100 +002826r 1 0F ED .dbyt %111111101101 +002828r 1 0F EE .dbyt %111111101110 +00282Ar 1 0F EF .dbyt %111111101111 +00282Cr 1 0F F0 .dbyt %111111110000 +00282Er 1 0F F1 .dbyt %111111110001 +002830r 1 0F F2 .dbyt %111111110010 +002832r 1 0F F3 .dbyt %111111110011 +002834r 1 0F F4 .dbyt %111111110100 +002836r 1 0F F5 .dbyt %111111110101 +002838r 1 0F F6 .dbyt %111111110110 +00283Ar 1 0F F7 .dbyt %111111110111 +00283Cr 1 0F F8 .dbyt %111111111000 +00283Er 1 0F F9 .dbyt %111111111001 +002840r 1 0F FA .dbyt %111111111010 +002842r 1 0F FB .dbyt %111111111011 +002844r 1 0F FC .dbyt %111111111100 +002846r 1 0F FD .dbyt %111111111101 +002848r 1 0F FE .dbyt %111111111110 +00284Ar 1 0F FF .dbyt %111111111111 +00284Cr 1 10 00 .dbyt %1000000000000 +00284Er 1 10 01 .dbyt %1000000000001 +002850r 1 10 02 .dbyt %1000000000010 +002852r 1 10 03 .dbyt %1000000000011 +002854r 1 10 04 .dbyt %1000000000100 +002856r 1 10 05 .dbyt %1000000000101 +002858r 1 10 06 .dbyt %1000000000110 +00285Ar 1 10 07 .dbyt %1000000000111 +00285Cr 1 10 08 .dbyt %1000000001000 +00285Er 1 7F F0 .dbyt %111111111110000 +002860r 1 7F F1 .dbyt %111111111110001 +002862r 1 7F F2 .dbyt %111111111110010 +002864r 1 7F F3 .dbyt %111111111110011 +002866r 1 7F F4 .dbyt %111111111110100 +002868r 1 7F F5 .dbyt %111111111110101 +00286Ar 1 7F F6 .dbyt %111111111110110 +00286Cr 1 7F F7 .dbyt %111111111110111 +00286Er 1 7F F8 .dbyt %111111111111000 +002870r 1 7F F9 .dbyt %111111111111001 +002872r 1 7F FA .dbyt %111111111111010 +002874r 1 7F FB .dbyt %111111111111011 +002876r 1 7F FC .dbyt %111111111111100 +002878r 1 7F FD .dbyt %111111111111101 +00287Ar 1 7F FE .dbyt %111111111111110 +00287Cr 1 7F FF .dbyt %111111111111111 +00287Er 1 80 00 .dbyt %1000000000000000 +002880r 1 80 01 .dbyt %1000000000000001 +002882r 1 80 02 .dbyt %1000000000000010 +002884r 1 80 03 .dbyt %1000000000000011 +002886r 1 80 04 .dbyt %1000000000000100 +002888r 1 80 05 .dbyt %1000000000000101 +00288Ar 1 80 06 .dbyt %1000000000000110 +00288Cr 1 80 07 .dbyt %1000000000000111 +00288Er 1 80 08 .dbyt %1000000000001000 +002890r 1 80 09 .dbyt %1000000000001001 +002892r 1 80 0A .dbyt %1000000000001010 +002894r 1 80 0B .dbyt %1000000000001011 +002896r 1 9F E1 .dbyt %1001111111100001 +002898r 1 9F E2 .dbyt %1001111111100010 +00289Ar 1 9F E3 .dbyt %1001111111100011 +00289Cr 1 9F E4 .dbyt %1001111111100100 +00289Er 1 9F E5 .dbyt %1001111111100101 +0028A0r 1 9F E6 .dbyt %1001111111100110 +0028A2r 1 9F E7 .dbyt %1001111111100111 +0028A4r 1 9F E8 .dbyt %1001111111101000 +0028A6r 1 9F E9 .dbyt %1001111111101001 +0028A8r 1 9F EA .dbyt %1001111111101010 +0028AAr 1 9F EB .dbyt %1001111111101011 +0028ACr 1 9F EC .dbyt %1001111111101100 +0028AEr 1 9F ED .dbyt %1001111111101101 +0028B0r 1 9F EE .dbyt %1001111111101110 +0028B2r 1 9F EF .dbyt %1001111111101111 +0028B4r 1 9F F0 .dbyt %1001111111110000 +0028B6r 1 9F F1 .dbyt %1001111111110001 +0028B8r 1 9F F2 .dbyt %1001111111110010 +0028BAr 1 9F F3 .dbyt %1001111111110011 +0028BCr 1 9F F4 .dbyt %1001111111110100 +0028BEr 1 9F F5 .dbyt %1001111111110101 +0028C0r 1 9F F6 .dbyt %1001111111110110 +0028C2r 1 9F F7 .dbyt %1001111111110111 +0028C4r 1 9F F8 .dbyt %1001111111111000 +0028C6r 1 9F F9 .dbyt %1001111111111001 +0028C8r 1 9F FA .dbyt %1001111111111010 +0028CAr 1 9F FB .dbyt %1001111111111011 +0028CCr 1 9F FC .dbyt %1001111111111100 +0028CEr 1 9F FD .dbyt %1001111111111101 +0028D0r 1 9F FE .dbyt %1001111111111110 +0028D2r 1 9F FF .dbyt %1001111111111111 +0028D4r 1 A0 00 .dbyt %1010000000000000 +0028D6r 1 A0 01 .dbyt %1010000000000001 +0028D8r 1 A0 02 .dbyt %1010000000000010 +0028DAr 1 A0 03 .dbyt %1010000000000011 +0028DCr 1 A0 04 .dbyt %1010000000000100 +0028DEr 1 A0 05 .dbyt %1010000000000101 +0028E0r 1 A0 06 .dbyt %1010000000000110 +0028E2r 1 A0 07 .dbyt %1010000000000111 +0028E4r 1 A0 08 .dbyt %1010000000001000 +0028E6r 1 A0 09 .dbyt %1010000000001001 +0028E8r 1 A0 0A .dbyt %1010000000001010 +0028EAr 1 A0 0B .dbyt %1010000000001011 +0028ECr 1 A0 0C .dbyt %1010000000001100 +0028EEr 1 A0 0D .dbyt %1010000000001101 +0028F0r 1 A0 0E .dbyt %1010000000001110 +0028F2r 1 A0 0F .dbyt %1010000000001111 +0028F4r 1 AF E1 .dbyt %1010111111100001 +0028F6r 1 AF E2 .dbyt %1010111111100010 +0028F8r 1 AF E3 .dbyt %1010111111100011 +0028FAr 1 AF E4 .dbyt %1010111111100100 +0028FCr 1 AF E5 .dbyt %1010111111100101 +0028FEr 1 AF E6 .dbyt %1010111111100110 +002900r 1 AF E7 .dbyt %1010111111100111 +002902r 1 AF E8 .dbyt %1010111111101000 +002904r 1 AF E9 .dbyt %1010111111101001 +002906r 1 AF EA .dbyt %1010111111101010 +002908r 1 AF EB .dbyt %1010111111101011 +00290Ar 1 AF EC .dbyt %1010111111101100 +00290Cr 1 AF ED .dbyt %1010111111101101 +00290Er 1 AF EE .dbyt %1010111111101110 +002910r 1 AF EF .dbyt %1010111111101111 +002912r 1 AF F0 .dbyt %1010111111110000 +002914r 1 AF F1 .dbyt %1010111111110001 +002916r 1 AF F2 .dbyt %1010111111110010 +002918r 1 AF F3 .dbyt %1010111111110011 +00291Ar 1 AF F4 .dbyt %1010111111110100 +00291Cr 1 AF F5 .dbyt %1010111111110101 +00291Er 1 AF F6 .dbyt %1010111111110110 +002920r 1 AF F7 .dbyt %1010111111110111 +002922r 1 AF F8 .dbyt %1010111111111000 +002924r 1 AF F9 .dbyt %1010111111111001 +002926r 1 AF FA .dbyt %1010111111111010 +002928r 1 AF FB .dbyt %1010111111111011 +00292Ar 1 AF FC .dbyt %1010111111111100 +00292Cr 1 AF FD .dbyt %1010111111111101 +00292Er 1 AF FE .dbyt %1010111111111110 +002930r 1 AF FF .dbyt %1010111111111111 +002932r 1 B0 00 .dbyt %1011000000000000 +002934r 1 B0 01 .dbyt %1011000000000001 +002936r 1 B0 02 .dbyt %1011000000000010 +002938r 1 B0 03 .dbyt %1011000000000011 +00293Ar 1 B0 04 .dbyt %1011000000000100 +00293Cr 1 B0 05 .dbyt %1011000000000101 +00293Er 1 B0 06 .dbyt %1011000000000110 +002940r 1 B0 07 .dbyt %1011000000000111 +002942r 1 B0 08 .dbyt %1011000000001000 +002944r 1 B0 09 .dbyt %1011000000001001 +002946r 1 B0 0A .dbyt %1011000000001010 +002948r 1 B0 0B .dbyt %1011000000001011 +00294Ar 1 B0 0C .dbyt %1011000000001100 +00294Cr 1 B0 0D .dbyt %1011000000001101 +00294Er 1 B0 0E .dbyt %1011000000001110 +002950r 1 B0 0F .dbyt %1011000000001111 +002952r 1 BF E1 .dbyt %1011111111100001 +002954r 1 BF E2 .dbyt %1011111111100010 +002956r 1 BF E3 .dbyt %1011111111100011 +002958r 1 BF E4 .dbyt %1011111111100100 +00295Ar 1 BF E5 .dbyt %1011111111100101 +00295Cr 1 BF E6 .dbyt %1011111111100110 +00295Er 1 BF E7 .dbyt %1011111111100111 +002960r 1 BF E8 .dbyt %1011111111101000 +002962r 1 BF E9 .dbyt %1011111111101001 +002964r 1 BF EA .dbyt %1011111111101010 +002966r 1 BF EB .dbyt %1011111111101011 +002968r 1 BF EC .dbyt %1011111111101100 +00296Ar 1 BF ED .dbyt %1011111111101101 +00296Cr 1 BF EE .dbyt %1011111111101110 +00296Er 1 BF EF .dbyt %1011111111101111 +002970r 1 BF F0 .dbyt %1011111111110000 +002972r 1 BF F1 .dbyt %1011111111110001 +002974r 1 BF F2 .dbyt %1011111111110010 +002976r 1 BF F3 .dbyt %1011111111110011 +002978r 1 BF F4 .dbyt %1011111111110100 +00297Ar 1 BF F5 .dbyt %1011111111110101 +00297Cr 1 BF F6 .dbyt %1011111111110110 +00297Er 1 BF F7 .dbyt %1011111111110111 +002980r 1 BF F8 .dbyt %1011111111111000 +002982r 1 BF F9 .dbyt %1011111111111001 +002984r 1 BF FA .dbyt %1011111111111010 +002986r 1 BF FB .dbyt %1011111111111011 +002988r 1 BF FC .dbyt %1011111111111100 +00298Ar 1 BF FD .dbyt %1011111111111101 +00298Cr 1 BF FE .dbyt %1011111111111110 +00298Er 1 BF FF .dbyt %1011111111111111 +002990r 1 C0 00 .dbyt %1100000000000000 +002992r 1 C0 01 .dbyt %1100000000000001 +002994r 1 C0 02 .dbyt %1100000000000010 +002996r 1 C0 03 .dbyt %1100000000000011 +002998r 1 C0 04 .dbyt %1100000000000100 +00299Ar 1 C0 05 .dbyt %1100000000000101 +00299Cr 1 C0 06 .dbyt %1100000000000110 +00299Er 1 C0 07 .dbyt %1100000000000111 +0029A0r 1 C0 08 .dbyt %1100000000001000 +0029A2r 1 C0 09 .dbyt %1100000000001001 +0029A4r 1 C0 0A .dbyt %1100000000001010 +0029A6r 1 C0 0B .dbyt %1100000000001011 +0029A8r 1 C0 0C .dbyt %1100000000001100 +0029AAr 1 C0 0D .dbyt %1100000000001101 +0029ACr 1 C0 0E .dbyt %1100000000001110 +0029AEr 1 C0 0F .dbyt %1100000000001111 +0029B0r 1 CF E1 .dbyt %1100111111100001 +0029B2r 1 CF E2 .dbyt %1100111111100010 +0029B4r 1 CF E3 .dbyt %1100111111100011 +0029B6r 1 CF E4 .dbyt %1100111111100100 +0029B8r 1 CF E5 .dbyt %1100111111100101 +0029BAr 1 CF E6 .dbyt %1100111111100110 +0029BCr 1 CF E7 .dbyt %1100111111100111 +0029BEr 1 CF E8 .dbyt %1100111111101000 +0029C0r 1 CF E9 .dbyt %1100111111101001 +0029C2r 1 CF EA .dbyt %1100111111101010 +0029C4r 1 CF EB .dbyt %1100111111101011 +0029C6r 1 CF EC .dbyt %1100111111101100 +0029C8r 1 CF ED .dbyt %1100111111101101 +0029CAr 1 CF EE .dbyt %1100111111101110 +0029CCr 1 CF EF .dbyt %1100111111101111 +0029CEr 1 CF F0 .dbyt %1100111111110000 +0029D0r 1 CF F1 .dbyt %1100111111110001 +0029D2r 1 CF F2 .dbyt %1100111111110010 +0029D4r 1 CF F3 .dbyt %1100111111110011 +0029D6r 1 CF F4 .dbyt %1100111111110100 +0029D8r 1 CF F5 .dbyt %1100111111110101 +0029DAr 1 CF F6 .dbyt %1100111111110110 +0029DCr 1 CF F7 .dbyt %1100111111110111 +0029DEr 1 CF F8 .dbyt %1100111111111000 +0029E0r 1 CF F9 .dbyt %1100111111111001 +0029E2r 1 CF FA .dbyt %1100111111111010 +0029E4r 1 CF FB .dbyt %1100111111111011 +0029E6r 1 CF FC .dbyt %1100111111111100 +0029E8r 1 CF FD .dbyt %1100111111111101 +0029EAr 1 CF FE .dbyt %1100111111111110 +0029ECr 1 CF FF .dbyt %1100111111111111 +0029EEr 1 D0 00 .dbyt %1101000000000000 +0029F0r 1 D0 01 .dbyt %1101000000000001 +0029F2r 1 D0 02 .dbyt %1101000000000010 +0029F4r 1 D0 03 .dbyt %1101000000000011 +0029F6r 1 D0 04 .dbyt %1101000000000100 +0029F8r 1 D0 05 .dbyt %1101000000000101 +0029FAr 1 D0 06 .dbyt %1101000000000110 +0029FCr 1 D0 07 .dbyt %1101000000000111 +0029FEr 1 D0 08 .dbyt %1101000000001000 +002A00r 1 D0 09 .dbyt %1101000000001001 +002A02r 1 D0 0A .dbyt %1101000000001010 +002A04r 1 D0 0B .dbyt %1101000000001011 +002A06r 1 D0 0C .dbyt %1101000000001100 +002A08r 1 D0 0D .dbyt %1101000000001101 +002A0Ar 1 D0 0E .dbyt %1101000000001110 +002A0Cr 1 D0 0F .dbyt %1101000000001111 +002A0Er 1 DF E1 .dbyt %1101111111100001 +002A10r 1 DF E2 .dbyt %1101111111100010 +002A12r 1 DF E3 .dbyt %1101111111100011 +002A14r 1 DF E4 .dbyt %1101111111100100 +002A16r 1 DF E5 .dbyt %1101111111100101 +002A18r 1 DF E6 .dbyt %1101111111100110 +002A1Ar 1 DF E7 .dbyt %1101111111100111 +002A1Cr 1 DF E8 .dbyt %1101111111101000 +002A1Er 1 DF E9 .dbyt %1101111111101001 +002A20r 1 DF EA .dbyt %1101111111101010 +002A22r 1 DF EB .dbyt %1101111111101011 +002A24r 1 DF EC .dbyt %1101111111101100 +002A26r 1 DF ED .dbyt %1101111111101101 +002A28r 1 DF EE .dbyt %1101111111101110 +002A2Ar 1 DF EF .dbyt %1101111111101111 +002A2Cr 1 DF F0 .dbyt %1101111111110000 +002A2Er 1 DF F1 .dbyt %1101111111110001 +002A30r 1 DF F2 .dbyt %1101111111110010 +002A32r 1 DF F3 .dbyt %1101111111110011 +002A34r 1 DF F4 .dbyt %1101111111110100 +002A36r 1 DF F5 .dbyt %1101111111110101 +002A38r 1 DF F6 .dbyt %1101111111110110 +002A3Ar 1 DF F7 .dbyt %1101111111110111 +002A3Cr 1 DF F8 .dbyt %1101111111111000 +002A3Er 1 DF F9 .dbyt %1101111111111001 +002A40r 1 DF FA .dbyt %1101111111111010 +002A42r 1 DF FB .dbyt %1101111111111011 +002A44r 1 DF FC .dbyt %1101111111111100 +002A46r 1 DF FD .dbyt %1101111111111101 +002A48r 1 DF FE .dbyt %1101111111111110 +002A4Ar 1 DF FF .dbyt %1101111111111111 +002A4Cr 1 E0 00 .dbyt %1110000000000000 +002A4Er 1 E0 01 .dbyt %1110000000000001 +002A50r 1 E0 02 .dbyt %1110000000000010 +002A52r 1 E0 03 .dbyt %1110000000000011 +002A54r 1 E0 04 .dbyt %1110000000000100 +002A56r 1 E0 05 .dbyt %1110000000000101 +002A58r 1 E0 06 .dbyt %1110000000000110 +002A5Ar 1 E0 07 .dbyt %1110000000000111 +002A5Cr 1 E0 08 .dbyt %1110000000001000 +002A5Er 1 E0 09 .dbyt %1110000000001001 +002A60r 1 E0 0A .dbyt %1110000000001010 +002A62r 1 E0 0B .dbyt %1110000000001011 +002A64r 1 E0 0C .dbyt %1110000000001100 +002A66r 1 E0 0D .dbyt %1110000000001101 +002A68r 1 E0 0E .dbyt %1110000000001110 +002A6Ar 1 E0 0F .dbyt %1110000000001111 +002A6Cr 1 EF E1 .dbyt %1110111111100001 +002A6Er 1 EF E2 .dbyt %1110111111100010 +002A70r 1 EF E3 .dbyt %1110111111100011 +002A72r 1 EF E4 .dbyt %1110111111100100 +002A74r 1 EF E5 .dbyt %1110111111100101 +002A76r 1 EF E6 .dbyt %1110111111100110 +002A78r 1 EF E7 .dbyt %1110111111100111 +002A7Ar 1 EF E8 .dbyt %1110111111101000 +002A7Cr 1 EF E9 .dbyt %1110111111101001 +002A7Er 1 EF EA .dbyt %1110111111101010 +002A80r 1 EF EB .dbyt %1110111111101011 +002A82r 1 EF EC .dbyt %1110111111101100 +002A84r 1 EF ED .dbyt %1110111111101101 +002A86r 1 EF EE .dbyt %1110111111101110 +002A88r 1 EF EF .dbyt %1110111111101111 +002A8Ar 1 EF F0 .dbyt %1110111111110000 +002A8Cr 1 EF F1 .dbyt %1110111111110001 +002A8Er 1 EF F2 .dbyt %1110111111110010 +002A90r 1 EF F3 .dbyt %1110111111110011 +002A92r 1 EF F4 .dbyt %1110111111110100 +002A94r 1 EF F5 .dbyt %1110111111110101 +002A96r 1 EF F6 .dbyt %1110111111110110 +002A98r 1 EF F7 .dbyt %1110111111110111 +002A9Ar 1 EF F8 .dbyt %1110111111111000 +002A9Cr 1 EF F9 .dbyt %1110111111111001 +002A9Er 1 EF FA .dbyt %1110111111111010 +002AA0r 1 EF FB .dbyt %1110111111111011 +002AA2r 1 EF FC .dbyt %1110111111111100 +002AA4r 1 EF FD .dbyt %1110111111111101 +002AA6r 1 EF FE .dbyt %1110111111111110 +002AA8r 1 EF FF .dbyt %1110111111111111 +002AAAr 1 F0 00 .dbyt %1111000000000000 +002AACr 1 F0 01 .dbyt %1111000000000001 +002AAEr 1 F0 02 .dbyt %1111000000000010 +002AB0r 1 F0 03 .dbyt %1111000000000011 +002AB2r 1 F0 04 .dbyt %1111000000000100 +002AB4r 1 F0 05 .dbyt %1111000000000101 +002AB6r 1 F0 06 .dbyt %1111000000000110 +002AB8r 1 F0 07 .dbyt %1111000000000111 +002ABAr 1 F0 08 .dbyt %1111000000001000 +002ABCr 1 F0 09 .dbyt %1111000000001001 +002ABEr 1 F0 0A .dbyt %1111000000001010 +002AC0r 1 F0 0B .dbyt %1111000000001011 +002AC2r 1 F0 0C .dbyt %1111000000001100 +002AC4r 1 F0 0D .dbyt %1111000000001101 +002AC6r 1 F0 0E .dbyt %1111000000001110 +002AC8r 1 F0 0F .dbyt %1111000000001111 +002ACAr 1 FF E1 .dbyt %1111111111100001 +002ACCr 1 FF E2 .dbyt %1111111111100010 +002ACEr 1 FF E3 .dbyt %1111111111100011 +002AD0r 1 FF E4 .dbyt %1111111111100100 +002AD2r 1 FF E5 .dbyt %1111111111100101 +002AD4r 1 FF E6 .dbyt %1111111111100110 +002AD6r 1 FF E7 .dbyt %1111111111100111 +002AD8r 1 FF E8 .dbyt %1111111111101000 +002ADAr 1 FF E9 .dbyt %1111111111101001 +002ADCr 1 FF EA .dbyt %1111111111101010 +002ADEr 1 FF EB .dbyt %1111111111101011 +002AE0r 1 FF EC .dbyt %1111111111101100 +002AE2r 1 FF ED .dbyt %1111111111101101 +002AE4r 1 FF EE .dbyt %1111111111101110 +002AE6r 1 FF EF .dbyt %1111111111101111 +002AE8r 1 FF F0 .dbyt %1111111111110000 +002AEAr 1 FF F1 .dbyt %1111111111110001 +002AECr 1 FF F2 .dbyt %1111111111110010 +002AEEr 1 FF F3 .dbyt %1111111111110011 +002AF0r 1 FF F4 .dbyt %1111111111110100 +002AF2r 1 FF F5 .dbyt %1111111111110101 +002AF4r 1 FF F6 .dbyt %1111111111110110 +002AF6r 1 FF F7 .dbyt %1111111111110111 +002AF8r 1 FF F8 .dbyt %1111111111111000 +002AFAr 1 FF F9 .dbyt %1111111111111001 +002AFCr 1 FF FA .dbyt %1111111111111010 +002AFEr 1 FF FB .dbyt %1111111111111011 +002B00r 1 FF FC .dbyt %1111111111111100 +002B02r 1 FF FD .dbyt %1111111111111101 +002B04r 1 FF FE .dbyt %1111111111111110 +002B06r 1 FF FF .dbyt %1111111111111111 +002B08r 1 +002B08r 1 ; binary values, full length +002B08r 1 00 00 .dbyt %0000000000000000 +002B0Ar 1 00 01 .dbyt %0000000000000001 +002B0Cr 1 00 02 .dbyt %0000000000000010 +002B0Er 1 00 03 .dbyt %0000000000000011 +002B10r 1 00 04 .dbyt %0000000000000100 +002B12r 1 00 05 .dbyt %0000000000000101 +002B14r 1 00 06 .dbyt %0000000000000110 +002B16r 1 00 07 .dbyt %0000000000000111 +002B18r 1 00 08 .dbyt %0000000000001000 +002B1Ar 1 00 09 .dbyt %0000000000001001 +002B1Cr 1 00 0A .dbyt %0000000000001010 +002B1Er 1 00 0B .dbyt %0000000000001011 +002B20r 1 00 0C .dbyt %0000000000001100 +002B22r 1 00 0D .dbyt %0000000000001101 +002B24r 1 00 0E .dbyt %0000000000001110 +002B26r 1 00 0F .dbyt %0000000000001111 +002B28r 1 00 10 .dbyt %0000000000010000 +002B2Ar 1 00 11 .dbyt %0000000000010001 +002B2Cr 1 00 12 .dbyt %0000000000010010 +002B2Er 1 00 13 .dbyt %0000000000010011 +002B30r 1 00 70 .dbyt %0000000001110000 +002B32r 1 00 71 .dbyt %0000000001110001 +002B34r 1 00 72 .dbyt %0000000001110010 +002B36r 1 00 73 .dbyt %0000000001110011 +002B38r 1 00 74 .dbyt %0000000001110100 +002B3Ar 1 00 75 .dbyt %0000000001110101 +002B3Cr 1 00 76 .dbyt %0000000001110110 +002B3Er 1 00 77 .dbyt %0000000001110111 +002B40r 1 00 78 .dbyt %0000000001111000 +002B42r 1 00 79 .dbyt %0000000001111001 +002B44r 1 00 7A .dbyt %0000000001111010 +002B46r 1 00 7B .dbyt %0000000001111011 +002B48r 1 00 7C .dbyt %0000000001111100 +002B4Ar 1 00 7D .dbyt %0000000001111101 +002B4Cr 1 00 7E .dbyt %0000000001111110 +002B4Er 1 00 7F .dbyt %0000000001111111 +002B50r 1 00 80 .dbyt %0000000010000000 +002B52r 1 00 81 .dbyt %0000000010000001 +002B54r 1 00 82 .dbyt %0000000010000010 +002B56r 1 00 83 .dbyt %0000000010000011 +002B58r 1 00 84 .dbyt %0000000010000100 +002B5Ar 1 00 85 .dbyt %0000000010000101 +002B5Cr 1 00 86 .dbyt %0000000010000110 +002B5Er 1 00 F0 .dbyt %0000000011110000 +002B60r 1 00 F1 .dbyt %0000000011110001 +002B62r 1 00 F2 .dbyt %0000000011110010 +002B64r 1 00 F3 .dbyt %0000000011110011 +002B66r 1 00 F4 .dbyt %0000000011110100 +002B68r 1 00 F5 .dbyt %0000000011110101 +002B6Ar 1 00 F6 .dbyt %0000000011110110 +002B6Cr 1 00 F7 .dbyt %0000000011110111 +002B6Er 1 00 F8 .dbyt %0000000011111000 +002B70r 1 00 F9 .dbyt %0000000011111001 +002B72r 1 00 FA .dbyt %0000000011111010 +002B74r 1 00 FB .dbyt %0000000011111011 +002B76r 1 00 FC .dbyt %0000000011111100 +002B78r 1 00 FD .dbyt %0000000011111101 +002B7Ar 1 00 FE .dbyt %0000000011111110 +002B7Cr 1 00 FF .dbyt %0000000011111111 +002B7Er 1 01 00 .dbyt %0000000100000000 +002B80r 1 01 01 .dbyt %0000000100000001 +002B82r 1 01 02 .dbyt %0000000100000010 +002B84r 1 01 03 .dbyt %0000000100000011 +002B86r 1 0F D2 .dbyt %0000111111010010 +002B88r 1 0F D3 .dbyt %0000111111010011 +002B8Ar 1 0F D4 .dbyt %0000111111010100 +002B8Cr 1 0F D5 .dbyt %0000111111010101 +002B8Er 1 0F D6 .dbyt %0000111111010110 +002B90r 1 0F D7 .dbyt %0000111111010111 +002B92r 1 0F D8 .dbyt %0000111111011000 +002B94r 1 0F D9 .dbyt %0000111111011001 +002B96r 1 0F DA .dbyt %0000111111011010 +002B98r 1 0F DB .dbyt %0000111111011011 +002B9Ar 1 0F DC .dbyt %0000111111011100 +002B9Cr 1 0F DD .dbyt %0000111111011101 +002B9Er 1 0F DE .dbyt %0000111111011110 +002BA0r 1 0F DF .dbyt %0000111111011111 +002BA2r 1 0F E0 .dbyt %0000111111100000 +002BA4r 1 0F E1 .dbyt %0000111111100001 +002BA6r 1 0F E2 .dbyt %0000111111100010 +002BA8r 1 0F E3 .dbyt %0000111111100011 +002BAAr 1 0F E4 .dbyt %0000111111100100 +002BACr 1 0F E5 .dbyt %0000111111100101 +002BAEr 1 0F E6 .dbyt %0000111111100110 +002BB0r 1 0F E7 .dbyt %0000111111100111 +002BB2r 1 0F E8 .dbyt %0000111111101000 +002BB4r 1 0F E9 .dbyt %0000111111101001 +002BB6r 1 0F EA .dbyt %0000111111101010 +002BB8r 1 0F EB .dbyt %0000111111101011 +002BBAr 1 0F EC .dbyt %0000111111101100 +002BBCr 1 0F ED .dbyt %0000111111101101 +002BBEr 1 0F EE .dbyt %0000111111101110 +002BC0r 1 0F EF .dbyt %0000111111101111 +002BC2r 1 0F F0 .dbyt %0000111111110000 +002BC4r 1 0F F1 .dbyt %0000111111110001 +002BC6r 1 0F F2 .dbyt %0000111111110010 +002BC8r 1 0F F3 .dbyt %0000111111110011 +002BCAr 1 0F F4 .dbyt %0000111111110100 +002BCCr 1 0F F5 .dbyt %0000111111110101 +002BCEr 1 0F F6 .dbyt %0000111111110110 +002BD0r 1 0F F7 .dbyt %0000111111110111 +002BD2r 1 0F F8 .dbyt %0000111111111000 +002BD4r 1 0F F9 .dbyt %0000111111111001 +002BD6r 1 0F FA .dbyt %0000111111111010 +002BD8r 1 0F FB .dbyt %0000111111111011 +002BDAr 1 0F FC .dbyt %0000111111111100 +002BDCr 1 0F FD .dbyt %0000111111111101 +002BDEr 1 0F FE .dbyt %0000111111111110 +002BE0r 1 0F FF .dbyt %0000111111111111 +002BE2r 1 10 00 .dbyt %0001000000000000 +002BE4r 1 10 01 .dbyt %0001000000000001 +002BE6r 1 10 02 .dbyt %0001000000000010 +002BE8r 1 10 03 .dbyt %0001000000000011 +002BEAr 1 10 04 .dbyt %0001000000000100 +002BECr 1 10 05 .dbyt %0001000000000101 +002BEEr 1 10 06 .dbyt %0001000000000110 +002BF0r 1 10 07 .dbyt %0001000000000111 +002BF2r 1 10 08 .dbyt %0001000000001000 +002BF4r 1 7F F0 .dbyt %0111111111110000 +002BF6r 1 7F F1 .dbyt %0111111111110001 +002BF8r 1 7F F2 .dbyt %0111111111110010 +002BFAr 1 7F F3 .dbyt %0111111111110011 +002BFCr 1 7F F4 .dbyt %0111111111110100 +002BFEr 1 7F F5 .dbyt %0111111111110101 +002C00r 1 7F F6 .dbyt %0111111111110110 +002C02r 1 7F F7 .dbyt %0111111111110111 +002C04r 1 7F F8 .dbyt %0111111111111000 +002C06r 1 7F F9 .dbyt %0111111111111001 +002C08r 1 7F FA .dbyt %0111111111111010 +002C0Ar 1 7F FB .dbyt %0111111111111011 +002C0Cr 1 7F FC .dbyt %0111111111111100 +002C0Er 1 7F FD .dbyt %0111111111111101 +002C10r 1 7F FE .dbyt %0111111111111110 +002C12r 1 7F FF .dbyt %0111111111111111 +002C14r 1 80 00 .dbyt %1000000000000000 +002C16r 1 80 01 .dbyt %1000000000000001 +002C18r 1 80 02 .dbyt %1000000000000010 +002C1Ar 1 80 03 .dbyt %1000000000000011 +002C1Cr 1 80 04 .dbyt %1000000000000100 +002C1Er 1 80 05 .dbyt %1000000000000101 +002C20r 1 80 06 .dbyt %1000000000000110 +002C22r 1 80 07 .dbyt %1000000000000111 +002C24r 1 80 08 .dbyt %1000000000001000 +002C26r 1 80 09 .dbyt %1000000000001001 +002C28r 1 80 0A .dbyt %1000000000001010 +002C2Ar 1 80 0B .dbyt %1000000000001011 +002C2Cr 1 9F E1 .dbyt %1001111111100001 +002C2Er 1 9F E2 .dbyt %1001111111100010 +002C30r 1 9F E3 .dbyt %1001111111100011 +002C32r 1 9F E4 .dbyt %1001111111100100 +002C34r 1 9F E5 .dbyt %1001111111100101 +002C36r 1 9F E6 .dbyt %1001111111100110 +002C38r 1 9F E7 .dbyt %1001111111100111 +002C3Ar 1 9F E8 .dbyt %1001111111101000 +002C3Cr 1 9F E9 .dbyt %1001111111101001 +002C3Er 1 9F EA .dbyt %1001111111101010 +002C40r 1 9F EB .dbyt %1001111111101011 +002C42r 1 9F EC .dbyt %1001111111101100 +002C44r 1 9F ED .dbyt %1001111111101101 +002C46r 1 9F EE .dbyt %1001111111101110 +002C48r 1 9F EF .dbyt %1001111111101111 +002C4Ar 1 9F F0 .dbyt %1001111111110000 +002C4Cr 1 9F F1 .dbyt %1001111111110001 +002C4Er 1 9F F2 .dbyt %1001111111110010 +002C50r 1 9F F3 .dbyt %1001111111110011 +002C52r 1 9F F4 .dbyt %1001111111110100 +002C54r 1 9F F5 .dbyt %1001111111110101 +002C56r 1 9F F6 .dbyt %1001111111110110 +002C58r 1 9F F7 .dbyt %1001111111110111 +002C5Ar 1 9F F8 .dbyt %1001111111111000 +002C5Cr 1 9F F9 .dbyt %1001111111111001 +002C5Er 1 9F FA .dbyt %1001111111111010 +002C60r 1 9F FB .dbyt %1001111111111011 +002C62r 1 9F FC .dbyt %1001111111111100 +002C64r 1 9F FD .dbyt %1001111111111101 +002C66r 1 9F FE .dbyt %1001111111111110 +002C68r 1 9F FF .dbyt %1001111111111111 +002C6Ar 1 A0 00 .dbyt %1010000000000000 +002C6Cr 1 A0 01 .dbyt %1010000000000001 +002C6Er 1 A0 02 .dbyt %1010000000000010 +002C70r 1 A0 03 .dbyt %1010000000000011 +002C72r 1 A0 04 .dbyt %1010000000000100 +002C74r 1 A0 05 .dbyt %1010000000000101 +002C76r 1 A0 06 .dbyt %1010000000000110 +002C78r 1 A0 07 .dbyt %1010000000000111 +002C7Ar 1 A0 08 .dbyt %1010000000001000 +002C7Cr 1 A0 09 .dbyt %1010000000001001 +002C7Er 1 A0 0A .dbyt %1010000000001010 +002C80r 1 A0 0B .dbyt %1010000000001011 +002C82r 1 A0 0C .dbyt %1010000000001100 +002C84r 1 A0 0D .dbyt %1010000000001101 +002C86r 1 A0 0E .dbyt %1010000000001110 +002C88r 1 A0 0F .dbyt %1010000000001111 +002C8Ar 1 AF E1 .dbyt %1010111111100001 +002C8Cr 1 AF E2 .dbyt %1010111111100010 +002C8Er 1 AF E3 .dbyt %1010111111100011 +002C90r 1 AF E4 .dbyt %1010111111100100 +002C92r 1 AF E5 .dbyt %1010111111100101 +002C94r 1 AF E6 .dbyt %1010111111100110 +002C96r 1 AF E7 .dbyt %1010111111100111 +002C98r 1 AF E8 .dbyt %1010111111101000 +002C9Ar 1 AF E9 .dbyt %1010111111101001 +002C9Cr 1 AF EA .dbyt %1010111111101010 +002C9Er 1 AF EB .dbyt %1010111111101011 +002CA0r 1 AF EC .dbyt %1010111111101100 +002CA2r 1 AF ED .dbyt %1010111111101101 +002CA4r 1 AF EE .dbyt %1010111111101110 +002CA6r 1 AF EF .dbyt %1010111111101111 +002CA8r 1 AF F0 .dbyt %1010111111110000 +002CAAr 1 AF F1 .dbyt %1010111111110001 +002CACr 1 AF F2 .dbyt %1010111111110010 +002CAEr 1 AF F3 .dbyt %1010111111110011 +002CB0r 1 AF F4 .dbyt %1010111111110100 +002CB2r 1 AF F5 .dbyt %1010111111110101 +002CB4r 1 AF F6 .dbyt %1010111111110110 +002CB6r 1 AF F7 .dbyt %1010111111110111 +002CB8r 1 AF F8 .dbyt %1010111111111000 +002CBAr 1 AF F9 .dbyt %1010111111111001 +002CBCr 1 AF FA .dbyt %1010111111111010 +002CBEr 1 AF FB .dbyt %1010111111111011 +002CC0r 1 AF FC .dbyt %1010111111111100 +002CC2r 1 AF FD .dbyt %1010111111111101 +002CC4r 1 AF FE .dbyt %1010111111111110 +002CC6r 1 AF FF .dbyt %1010111111111111 +002CC8r 1 B0 00 .dbyt %1011000000000000 +002CCAr 1 B0 01 .dbyt %1011000000000001 +002CCCr 1 B0 02 .dbyt %1011000000000010 +002CCEr 1 B0 03 .dbyt %1011000000000011 +002CD0r 1 B0 04 .dbyt %1011000000000100 +002CD2r 1 B0 05 .dbyt %1011000000000101 +002CD4r 1 B0 06 .dbyt %1011000000000110 +002CD6r 1 B0 07 .dbyt %1011000000000111 +002CD8r 1 B0 08 .dbyt %1011000000001000 +002CDAr 1 B0 09 .dbyt %1011000000001001 +002CDCr 1 B0 0A .dbyt %1011000000001010 +002CDEr 1 B0 0B .dbyt %1011000000001011 +002CE0r 1 B0 0C .dbyt %1011000000001100 +002CE2r 1 B0 0D .dbyt %1011000000001101 +002CE4r 1 B0 0E .dbyt %1011000000001110 +002CE6r 1 B0 0F .dbyt %1011000000001111 +002CE8r 1 BF E1 .dbyt %1011111111100001 +002CEAr 1 BF E2 .dbyt %1011111111100010 +002CECr 1 BF E3 .dbyt %1011111111100011 +002CEEr 1 BF E4 .dbyt %1011111111100100 +002CF0r 1 BF E5 .dbyt %1011111111100101 +002CF2r 1 BF E6 .dbyt %1011111111100110 +002CF4r 1 BF E7 .dbyt %1011111111100111 +002CF6r 1 BF E8 .dbyt %1011111111101000 +002CF8r 1 BF E9 .dbyt %1011111111101001 +002CFAr 1 BF EA .dbyt %1011111111101010 +002CFCr 1 BF EB .dbyt %1011111111101011 +002CFEr 1 BF EC .dbyt %1011111111101100 +002D00r 1 BF ED .dbyt %1011111111101101 +002D02r 1 BF EE .dbyt %1011111111101110 +002D04r 1 BF EF .dbyt %1011111111101111 +002D06r 1 BF F0 .dbyt %1011111111110000 +002D08r 1 BF F1 .dbyt %1011111111110001 +002D0Ar 1 BF F2 .dbyt %1011111111110010 +002D0Cr 1 BF F3 .dbyt %1011111111110011 +002D0Er 1 BF F4 .dbyt %1011111111110100 +002D10r 1 BF F5 .dbyt %1011111111110101 +002D12r 1 BF F6 .dbyt %1011111111110110 +002D14r 1 BF F7 .dbyt %1011111111110111 +002D16r 1 BF F8 .dbyt %1011111111111000 +002D18r 1 BF F9 .dbyt %1011111111111001 +002D1Ar 1 BF FA .dbyt %1011111111111010 +002D1Cr 1 BF FB .dbyt %1011111111111011 +002D1Er 1 BF FC .dbyt %1011111111111100 +002D20r 1 BF FD .dbyt %1011111111111101 +002D22r 1 BF FE .dbyt %1011111111111110 +002D24r 1 BF FF .dbyt %1011111111111111 +002D26r 1 C0 00 .dbyt %1100000000000000 +002D28r 1 C0 01 .dbyt %1100000000000001 +002D2Ar 1 C0 02 .dbyt %1100000000000010 +002D2Cr 1 C0 03 .dbyt %1100000000000011 +002D2Er 1 C0 04 .dbyt %1100000000000100 +002D30r 1 C0 05 .dbyt %1100000000000101 +002D32r 1 C0 06 .dbyt %1100000000000110 +002D34r 1 C0 07 .dbyt %1100000000000111 +002D36r 1 C0 08 .dbyt %1100000000001000 +002D38r 1 C0 09 .dbyt %1100000000001001 +002D3Ar 1 C0 0A .dbyt %1100000000001010 +002D3Cr 1 C0 0B .dbyt %1100000000001011 +002D3Er 1 C0 0C .dbyt %1100000000001100 +002D40r 1 C0 0D .dbyt %1100000000001101 +002D42r 1 C0 0E .dbyt %1100000000001110 +002D44r 1 C0 0F .dbyt %1100000000001111 +002D46r 1 CF E1 .dbyt %1100111111100001 +002D48r 1 CF E2 .dbyt %1100111111100010 +002D4Ar 1 CF E3 .dbyt %1100111111100011 +002D4Cr 1 CF E4 .dbyt %1100111111100100 +002D4Er 1 CF E5 .dbyt %1100111111100101 +002D50r 1 CF E6 .dbyt %1100111111100110 +002D52r 1 CF E7 .dbyt %1100111111100111 +002D54r 1 CF E8 .dbyt %1100111111101000 +002D56r 1 CF E9 .dbyt %1100111111101001 +002D58r 1 CF EA .dbyt %1100111111101010 +002D5Ar 1 CF EB .dbyt %1100111111101011 +002D5Cr 1 CF EC .dbyt %1100111111101100 +002D5Er 1 CF ED .dbyt %1100111111101101 +002D60r 1 CF EE .dbyt %1100111111101110 +002D62r 1 CF EF .dbyt %1100111111101111 +002D64r 1 CF F0 .dbyt %1100111111110000 +002D66r 1 CF F1 .dbyt %1100111111110001 +002D68r 1 CF F2 .dbyt %1100111111110010 +002D6Ar 1 CF F3 .dbyt %1100111111110011 +002D6Cr 1 CF F4 .dbyt %1100111111110100 +002D6Er 1 CF F5 .dbyt %1100111111110101 +002D70r 1 CF F6 .dbyt %1100111111110110 +002D72r 1 CF F7 .dbyt %1100111111110111 +002D74r 1 CF F8 .dbyt %1100111111111000 +002D76r 1 CF F9 .dbyt %1100111111111001 +002D78r 1 CF FA .dbyt %1100111111111010 +002D7Ar 1 CF FB .dbyt %1100111111111011 +002D7Cr 1 CF FC .dbyt %1100111111111100 +002D7Er 1 CF FD .dbyt %1100111111111101 +002D80r 1 CF FE .dbyt %1100111111111110 +002D82r 1 CF FF .dbyt %1100111111111111 +002D84r 1 D0 00 .dbyt %1101000000000000 +002D86r 1 D0 01 .dbyt %1101000000000001 +002D88r 1 D0 02 .dbyt %1101000000000010 +002D8Ar 1 D0 03 .dbyt %1101000000000011 +002D8Cr 1 D0 04 .dbyt %1101000000000100 +002D8Er 1 D0 05 .dbyt %1101000000000101 +002D90r 1 D0 06 .dbyt %1101000000000110 +002D92r 1 D0 07 .dbyt %1101000000000111 +002D94r 1 D0 08 .dbyt %1101000000001000 +002D96r 1 D0 09 .dbyt %1101000000001001 +002D98r 1 D0 0A .dbyt %1101000000001010 +002D9Ar 1 D0 0B .dbyt %1101000000001011 +002D9Cr 1 D0 0C .dbyt %1101000000001100 +002D9Er 1 D0 0D .dbyt %1101000000001101 +002DA0r 1 D0 0E .dbyt %1101000000001110 +002DA2r 1 D0 0F .dbyt %1101000000001111 +002DA4r 1 DF E1 .dbyt %1101111111100001 +002DA6r 1 DF E2 .dbyt %1101111111100010 +002DA8r 1 DF E3 .dbyt %1101111111100011 +002DAAr 1 DF E4 .dbyt %1101111111100100 +002DACr 1 DF E5 .dbyt %1101111111100101 +002DAEr 1 DF E6 .dbyt %1101111111100110 +002DB0r 1 DF E7 .dbyt %1101111111100111 +002DB2r 1 DF E8 .dbyt %1101111111101000 +002DB4r 1 DF E9 .dbyt %1101111111101001 +002DB6r 1 DF EA .dbyt %1101111111101010 +002DB8r 1 DF EB .dbyt %1101111111101011 +002DBAr 1 DF EC .dbyt %1101111111101100 +002DBCr 1 DF ED .dbyt %1101111111101101 +002DBEr 1 DF EE .dbyt %1101111111101110 +002DC0r 1 DF EF .dbyt %1101111111101111 +002DC2r 1 DF F0 .dbyt %1101111111110000 +002DC4r 1 DF F1 .dbyt %1101111111110001 +002DC6r 1 DF F2 .dbyt %1101111111110010 +002DC8r 1 DF F3 .dbyt %1101111111110011 +002DCAr 1 DF F4 .dbyt %1101111111110100 +002DCCr 1 DF F5 .dbyt %1101111111110101 +002DCEr 1 DF F6 .dbyt %1101111111110110 +002DD0r 1 DF F7 .dbyt %1101111111110111 +002DD2r 1 DF F8 .dbyt %1101111111111000 +002DD4r 1 DF F9 .dbyt %1101111111111001 +002DD6r 1 DF FA .dbyt %1101111111111010 +002DD8r 1 DF FB .dbyt %1101111111111011 +002DDAr 1 DF FC .dbyt %1101111111111100 +002DDCr 1 DF FD .dbyt %1101111111111101 +002DDEr 1 DF FE .dbyt %1101111111111110 +002DE0r 1 DF FF .dbyt %1101111111111111 +002DE2r 1 E0 00 .dbyt %1110000000000000 +002DE4r 1 E0 01 .dbyt %1110000000000001 +002DE6r 1 E0 02 .dbyt %1110000000000010 +002DE8r 1 E0 03 .dbyt %1110000000000011 +002DEAr 1 E0 04 .dbyt %1110000000000100 +002DECr 1 E0 05 .dbyt %1110000000000101 +002DEEr 1 E0 06 .dbyt %1110000000000110 +002DF0r 1 E0 07 .dbyt %1110000000000111 +002DF2r 1 E0 08 .dbyt %1110000000001000 +002DF4r 1 E0 09 .dbyt %1110000000001001 +002DF6r 1 E0 0A .dbyt %1110000000001010 +002DF8r 1 E0 0B .dbyt %1110000000001011 +002DFAr 1 E0 0C .dbyt %1110000000001100 +002DFCr 1 E0 0D .dbyt %1110000000001101 +002DFEr 1 E0 0E .dbyt %1110000000001110 +002E00r 1 E0 0F .dbyt %1110000000001111 +002E02r 1 EF E1 .dbyt %1110111111100001 +002E04r 1 EF E2 .dbyt %1110111111100010 +002E06r 1 EF E3 .dbyt %1110111111100011 +002E08r 1 EF E4 .dbyt %1110111111100100 +002E0Ar 1 EF E5 .dbyt %1110111111100101 +002E0Cr 1 EF E6 .dbyt %1110111111100110 +002E0Er 1 EF E7 .dbyt %1110111111100111 +002E10r 1 EF E8 .dbyt %1110111111101000 +002E12r 1 EF E9 .dbyt %1110111111101001 +002E14r 1 EF EA .dbyt %1110111111101010 +002E16r 1 EF EB .dbyt %1110111111101011 +002E18r 1 EF EC .dbyt %1110111111101100 +002E1Ar 1 EF ED .dbyt %1110111111101101 +002E1Cr 1 EF EE .dbyt %1110111111101110 +002E1Er 1 EF EF .dbyt %1110111111101111 +002E20r 1 EF F0 .dbyt %1110111111110000 +002E22r 1 EF F1 .dbyt %1110111111110001 +002E24r 1 EF F2 .dbyt %1110111111110010 +002E26r 1 EF F3 .dbyt %1110111111110011 +002E28r 1 EF F4 .dbyt %1110111111110100 +002E2Ar 1 EF F5 .dbyt %1110111111110101 +002E2Cr 1 EF F6 .dbyt %1110111111110110 +002E2Er 1 EF F7 .dbyt %1110111111110111 +002E30r 1 EF F8 .dbyt %1110111111111000 +002E32r 1 EF F9 .dbyt %1110111111111001 +002E34r 1 EF FA .dbyt %1110111111111010 +002E36r 1 EF FB .dbyt %1110111111111011 +002E38r 1 EF FC .dbyt %1110111111111100 +002E3Ar 1 EF FD .dbyt %1110111111111101 +002E3Cr 1 EF FE .dbyt %1110111111111110 +002E3Er 1 EF FF .dbyt %1110111111111111 +002E40r 1 F0 00 .dbyt %1111000000000000 +002E42r 1 F0 01 .dbyt %1111000000000001 +002E44r 1 F0 02 .dbyt %1111000000000010 +002E46r 1 F0 03 .dbyt %1111000000000011 +002E48r 1 F0 04 .dbyt %1111000000000100 +002E4Ar 1 F0 05 .dbyt %1111000000000101 +002E4Cr 1 F0 06 .dbyt %1111000000000110 +002E4Er 1 F0 07 .dbyt %1111000000000111 +002E50r 1 F0 08 .dbyt %1111000000001000 +002E52r 1 F0 09 .dbyt %1111000000001001 +002E54r 1 F0 0A .dbyt %1111000000001010 +002E56r 1 F0 0B .dbyt %1111000000001011 +002E58r 1 F0 0C .dbyt %1111000000001100 +002E5Ar 1 F0 0D .dbyt %1111000000001101 +002E5Cr 1 F0 0E .dbyt %1111000000001110 +002E5Er 1 F0 0F .dbyt %1111000000001111 +002E60r 1 FF E1 .dbyt %1111111111100001 +002E62r 1 FF E2 .dbyt %1111111111100010 +002E64r 1 FF E3 .dbyt %1111111111100011 +002E66r 1 FF E4 .dbyt %1111111111100100 +002E68r 1 FF E5 .dbyt %1111111111100101 +002E6Ar 1 FF E6 .dbyt %1111111111100110 +002E6Cr 1 FF E7 .dbyt %1111111111100111 +002E6Er 1 FF E8 .dbyt %1111111111101000 +002E70r 1 FF E9 .dbyt %1111111111101001 +002E72r 1 FF EA .dbyt %1111111111101010 +002E74r 1 FF EB .dbyt %1111111111101011 +002E76r 1 FF EC .dbyt %1111111111101100 +002E78r 1 FF ED .dbyt %1111111111101101 +002E7Ar 1 FF EE .dbyt %1111111111101110 +002E7Cr 1 FF EF .dbyt %1111111111101111 +002E7Er 1 FF F0 .dbyt %1111111111110000 +002E80r 1 FF F1 .dbyt %1111111111110001 +002E82r 1 FF F2 .dbyt %1111111111110010 +002E84r 1 FF F3 .dbyt %1111111111110011 +002E86r 1 FF F4 .dbyt %1111111111110100 +002E88r 1 FF F5 .dbyt %1111111111110101 +002E8Ar 1 FF F6 .dbyt %1111111111110110 +002E8Cr 1 FF F7 .dbyt %1111111111110111 +002E8Er 1 FF F8 .dbyt %1111111111111000 +002E90r 1 FF F9 .dbyt %1111111111111001 +002E92r 1 FF FA .dbyt %1111111111111010 +002E94r 1 FF FB .dbyt %1111111111111011 +002E96r 1 FF FC .dbyt %1111111111111100 +002E98r 1 FF FD .dbyt %1111111111111101 +002E9Ar 1 FF FE .dbyt %1111111111111110 +002E9Cr 1 FF FF .dbyt %1111111111111111 +002E9Er 1 +002E9Er 1 ; multiple values on one line, decimal +002E9Er 1 00 00 00 01 .dbyt 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 +002EA2r 1 00 02 00 03 +002EA6r 1 00 04 00 05 +002EBEr 1 00 10 00 11 .dbyt 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 +002EC2r 1 00 12 00 13 +002EC6r 1 00 14 00 15 +002EDEr 1 00 70 00 71 .dbyt 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 +002EE2r 1 00 72 00 73 +002EE6r 1 00 74 00 75 +002EFEr 1 00 80 00 81 .dbyt 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 +002F02r 1 00 82 00 83 +002F06r 1 00 84 00 85 +002F1Er 1 00 F0 00 F1 .dbyt 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 +002F22r 1 00 F2 00 F3 +002F26r 1 00 F4 00 F5 +002F3Er 1 01 00 01 01 .dbyt 256,257,258,259,260,261,262,263,264,265,266,267,268,269,270,271 +002F42r 1 01 02 01 03 +002F46r 1 01 04 01 05 +002F5Er 1 0F E0 0F E1 .dbyt 4064,4065,4066,4067,4068,4069,4070,4071,4072,4073,4074,4075,4076,4077,4078,4079 +002F62r 1 0F E2 0F E3 +002F66r 1 0F E4 0F E5 +002F7Er 1 0F F0 0F F1 .dbyt 4080,4081,4082,4083,4084,4085,4086,4087,4088,4089,4090,4091,4092,4093,4094,4095 +002F82r 1 0F F2 0F F3 +002F86r 1 0F F4 0F F5 +002F9Er 1 10 00 10 01 .dbyt 4096,4097,4098,4099,4100,4101,4102,4103,4104,4105,4106,4107,4108,4109,4110,4111 +002FA2r 1 10 02 10 03 +002FA6r 1 10 04 10 05 +002FBEr 1 7F F0 7F F1 .dbyt 32752,32753,32754,32755,32756,32757,32758,32759,32760,32761,32762,32763,32764,32765,32766,32767 +002FC2r 1 7F F2 7F F3 +002FC6r 1 7F F4 7F F5 +002FDEr 1 80 00 80 01 .dbyt 32768,32769,32770,32771,32772,32773,32774,32775,32776,32777,32778,32779,32780,32781,32782,32783 +002FE2r 1 80 02 80 03 +002FE6r 1 80 04 80 05 +002FFEr 1 9F F0 9F F1 .dbyt 40944,40945,40946,40947,40948,40949,40950,40951,40952,40953,40954,40955,40956,40957,40958,40959 +003002r 1 9F F2 9F F3 +003006r 1 9F F4 9F F5 +00301Er 1 A0 00 A0 01 .dbyt 40960,40961,40962,40963,40964,40965,40966,40967,40968,40969,40970,40971,40972,40973,40974,40975 +003022r 1 A0 02 A0 03 +003026r 1 A0 04 A0 05 +00303Er 1 AF F0 AF F1 .dbyt 45040,45041,45042,45043,45044,45045,45046,45047,45048,45049,45050,45051,45052,45053,45054,45055 +003042r 1 AF F2 AF F3 +003046r 1 AF F4 AF F5 +00305Er 1 B0 00 B0 01 .dbyt 45056,45057,45058,45059,45060,45061,45062,45063,45064,45065,45066,45067,45068,45069,45070,45071 +003062r 1 B0 02 B0 03 +003066r 1 B0 04 B0 05 +00307Er 1 BF F0 BF F1 .dbyt 49136,49137,49138,49139,49140,49141,49142,49143,49144,49145,49146,49147,49148,49149,49150,49151 +003082r 1 BF F2 BF F3 +003086r 1 BF F4 BF F5 +00309Er 1 C0 00 C0 01 .dbyt 49152,49153,49154,49155,49156,49157,49158,49159,49160,49161,49162,49163,49164,49165,49166,49167 +0030A2r 1 C0 02 C0 03 +0030A6r 1 C0 04 C0 05 +0030BEr 1 CF F0 CF F1 .dbyt 53232,53233,53234,53235,53236,53237,53238,53239,53240,53241,53242,53243,53244,53245,53246,53247 +0030C2r 1 CF F2 CF F3 +0030C6r 1 CF F4 CF F5 +0030DEr 1 D0 00 D0 01 .dbyt 53248,53249,53250,53251,53252,53253,53254,53255,53256,53257,53258,53259,53260,53261,53262,53263 +0030E2r 1 D0 02 D0 03 +0030E6r 1 D0 04 D0 05 +0030FEr 1 DF F0 DF F1 .dbyt 57328,57329,57330,57331,57332,57333,57334,57335,57336,57337,57338,57339,57340,57341,57342,57343 +003102r 1 DF F2 DF F3 +003106r 1 DF F4 DF F5 +00311Er 1 E0 00 E0 01 .dbyt 57344,57345,57346,57347,57348,57349,57350,57351,57352,57353,57354,57355,57356,57357,57358,57359 +003122r 1 E0 02 E0 03 +003126r 1 E0 04 E0 05 +00313Er 1 EF F0 EF F1 .dbyt 61424,61425,61426,61427,61428,61429,61430,61431,61432,61433,61434,61435,61436,61437,61438,61439 +003142r 1 EF F2 EF F3 +003146r 1 EF F4 EF F5 +00315Er 1 F0 00 F0 01 .dbyt 61440,61441,61442,61443,61444,61445,61446,61447,61448,61449,61450,61451,61452,61453,61454,61455 +003162r 1 F0 02 F0 03 +003166r 1 F0 04 F0 05 +00317Er 1 FF F0 FF F1 .dbyt 65520,65521,65522,65523,65524,65525,65526,65527,65528,65529,65530,65531,65532,65533,65534,65535 +003182r 1 FF F2 FF F3 +003186r 1 FF F4 FF F5 +00319Er 1 +00319Er 1 ; multiple values on one line, hex +00319Er 1 00 00 00 01 .dbyt $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f +0031A2r 1 00 02 00 03 +0031A6r 1 00 04 00 05 +0031BEr 1 00 10 00 11 .dbyt $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f +0031C2r 1 00 12 00 13 +0031C6r 1 00 14 00 15 +0031DEr 1 00 70 00 71 .dbyt $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f +0031E2r 1 00 72 00 73 +0031E6r 1 00 74 00 75 +0031FEr 1 00 80 00 81 .dbyt $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f +003202r 1 00 82 00 83 +003206r 1 00 84 00 85 +00321Er 1 00 F0 00 F1 .dbyt $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff +003222r 1 00 F2 00 F3 +003226r 1 00 F4 00 F5 +00323Er 1 01 00 01 01 .dbyt $100,$101,$102,$103,$104,$105,$106,$107,$108,$109,$10a,$10b,$10c,$10d,$10e,$10f +003242r 1 01 02 01 03 +003246r 1 01 04 01 05 +00325Er 1 0F E0 0F E1 .dbyt $fe0,$fe1,$fe2,$fe3,$fe4,$fe5,$fe6,$fe7,$fe8,$fe9,$fea,$feb,$fec,$fed,$fee,$fef +003262r 1 0F E2 0F E3 +003266r 1 0F E4 0F E5 +00327Er 1 0F F0 0F F1 .dbyt $ff0,$ff1,$ff2,$ff3,$ff4,$ff5,$ff6,$ff7,$ff8,$ff9,$ffa,$ffb,$ffc,$ffd,$ffe,$fff +003282r 1 0F F2 0F F3 +003286r 1 0F F4 0F F5 +00329Er 1 10 00 10 01 .dbyt $1000,$1001,$1002,$1003,$1004,$1005,$1006,$1007,$1008,$1009,$100a,$100b,$100c,$100d,$100e,$100f +0032A2r 1 10 02 10 03 +0032A6r 1 10 04 10 05 +0032BEr 1 7F F0 7F F1 .dbyt $7ff0,$7ff1,$7ff2,$7ff3,$7ff4,$7ff5,$7ff6,$7ff7,$7ff8,$7ff9,$7ffa,$7ffb,$7ffc,$7ffd,$7ffe,$7fff +0032C2r 1 7F F2 7F F3 +0032C6r 1 7F F4 7F F5 +0032DEr 1 80 00 80 01 .dbyt $8000,$8001,$8002,$8003,$8004,$8005,$8006,$8007,$8008,$8009,$800a,$800b,$800c,$800d,$800e,$800f +0032E2r 1 80 02 80 03 +0032E6r 1 80 04 80 05 +0032FEr 1 9F F0 9F F1 .dbyt $9ff0,$9ff1,$9ff2,$9ff3,$9ff4,$9ff5,$9ff6,$9ff7,$9ff8,$9ff9,$9ffa,$9ffb,$9ffc,$9ffd,$9ffe,$9fff +003302r 1 9F F2 9F F3 +003306r 1 9F F4 9F F5 +00331Er 1 A0 00 A0 01 .dbyt $a000,$a001,$a002,$a003,$a004,$a005,$a006,$a007,$a008,$a009,$a00a,$a00b,$a00c,$a00d,$a00e,$a00f +003322r 1 A0 02 A0 03 +003326r 1 A0 04 A0 05 +00333Er 1 AF F0 AF F1 .dbyt $aff0,$aff1,$aff2,$aff3,$aff4,$aff5,$aff6,$aff7,$aff8,$aff9,$affa,$affb,$affc,$affd,$affe,$afff +003342r 1 AF F2 AF F3 +003346r 1 AF F4 AF F5 +00335Er 1 B0 00 B0 01 .dbyt $b000,$b001,$b002,$b003,$b004,$b005,$b006,$b007,$b008,$b009,$b00a,$b00b,$b00c,$b00d,$b00e,$b00f +003362r 1 B0 02 B0 03 +003366r 1 B0 04 B0 05 +00337Er 1 BF F0 BF F1 .dbyt $bff0,$bff1,$bff2,$bff3,$bff4,$bff5,$bff6,$bff7,$bff8,$bff9,$bffa,$bffb,$bffc,$bffd,$bffe,$bfff +003382r 1 BF F2 BF F3 +003386r 1 BF F4 BF F5 +00339Er 1 C0 00 C0 01 .dbyt $c000,$c001,$c002,$c003,$c004,$c005,$c006,$c007,$c008,$c009,$c00a,$c00b,$c00c,$c00d,$c00e,$c00f +0033A2r 1 C0 02 C0 03 +0033A6r 1 C0 04 C0 05 +0033BEr 1 CF F0 CF F1 .dbyt $cff0,$cff1,$cff2,$cff3,$cff4,$cff5,$cff6,$cff7,$cff8,$cff9,$cffa,$cffb,$cffc,$cffd,$cffe,$cfff +0033C2r 1 CF F2 CF F3 +0033C6r 1 CF F4 CF F5 +0033DEr 1 D0 00 D0 01 .dbyt $d000,$d001,$d002,$d003,$d004,$d005,$d006,$d007,$d008,$d009,$d00a,$d00b,$d00c,$d00d,$d00e,$d00f +0033E2r 1 D0 02 D0 03 +0033E6r 1 D0 04 D0 05 +0033FEr 1 DF F0 DF F1 .dbyt $dff0,$dff1,$dff2,$dff3,$dff4,$dff5,$dff6,$dff7,$dff8,$dff9,$dffa,$dffb,$dffc,$dffd,$dffe,$dfff +003402r 1 DF F2 DF F3 +003406r 1 DF F4 DF F5 +00341Er 1 E0 00 E0 01 .dbyt $e000,$e001,$e002,$e003,$e004,$e005,$e006,$e007,$e008,$e009,$e00a,$e00b,$e00c,$e00d,$e00e,$e00f +003422r 1 E0 02 E0 03 +003426r 1 E0 04 E0 05 +00343Er 1 EF F0 EF F1 .dbyt $eff0,$eff1,$eff2,$eff3,$eff4,$eff5,$eff6,$eff7,$eff8,$eff9,$effa,$effb,$effc,$effd,$effe,$efff +003442r 1 EF F2 EF F3 +003446r 1 EF F4 EF F5 +00345Er 1 F0 00 F0 01 .dbyt $f000,$f001,$f002,$f003,$f004,$f005,$f006,$f007,$f008,$f009,$f00a,$f00b,$f00c,$f00d,$f00e,$f00f +003462r 1 F0 02 F0 03 +003466r 1 F0 04 F0 05 +00347Er 1 FF F0 FF F1 .dbyt $fff0,$fff1,$fff2,$fff3,$fff4,$fff5,$fff6,$fff7,$fff8,$fff9,$fffa,$fffb,$fffc,$fffd,$fffe,$ffff +003482r 1 FF F2 FF F3 +003486r 1 FF F4 FF F5 +00349Er 1 +00349Er 1 ; multiple values on one line, alternative hex +00349Er 1 00 00 00 01 .dbyt 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh +0034A2r 1 00 02 00 03 +0034A6r 1 00 04 00 05 +0034BEr 1 00 10 00 11 .dbyt 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh +0034C2r 1 00 12 00 13 +0034C6r 1 00 14 00 15 +0034DEr 1 00 70 00 71 .dbyt 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh +0034E2r 1 00 72 00 73 +0034E6r 1 00 74 00 75 +0034FEr 1 00 80 00 81 .dbyt 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh +003502r 1 00 82 00 83 +003506r 1 00 84 00 85 +00351Er 1 00 F0 00 F1 .dbyt 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh +003522r 1 00 F2 00 F3 +003526r 1 00 F4 00 F5 +00353Er 1 01 00 01 01 .dbyt 100h,101h,102h,103h,104h,105h,106h,107h,108h,109h,10ah,10bh,10ch,10dh,10eh,10fh +003542r 1 01 02 01 03 +003546r 1 01 04 01 05 +00355Er 1 0F E0 0F E1 .dbyt 0fe0h,0fe1h,0fe2h,0fe3h,0fe4h,0fe5h,0fe6h,0fe7h,0fe8h,0fe9h,0feah,0febh,0fech,0fedh,0feeh,0fefh +003562r 1 0F E2 0F E3 +003566r 1 0F E4 0F E5 +00357Er 1 0F F0 0F F1 .dbyt 0ff0h,0ff1h,0ff2h,0ff3h,0ff4h,0ff5h,0ff6h,0ff7h,0ff8h,0ff9h,0ffah,0ffbh,0ffch,0ffdh,0ffeh,0fffh +003582r 1 0F F2 0F F3 +003586r 1 0F F4 0F F5 +00359Er 1 10 00 10 01 .dbyt 1000h,1001h,1002h,1003h,1004h,1005h,1006h,1007h,1008h,1009h,100ah,100bh,100ch,100dh,100eh,100fh +0035A2r 1 10 02 10 03 +0035A6r 1 10 04 10 05 +0035BEr 1 7F F0 7F F1 .dbyt 7ff0h,7ff1h,7ff2h,7ff3h,7ff4h,7ff5h,7ff6h,7ff7h,7ff8h,7ff9h,7ffah,7ffbh,7ffch,7ffdh,7ffeh,7fffh +0035C2r 1 7F F2 7F F3 +0035C6r 1 7F F4 7F F5 +0035DEr 1 80 00 80 01 .dbyt 8000h,8001h,8002h,8003h,8004h,8005h,8006h,8007h,8008h,8009h,800ah,800bh,800ch,800dh,800eh,800fh +0035E2r 1 80 02 80 03 +0035E6r 1 80 04 80 05 +0035FEr 1 9F F0 9F F1 .dbyt 9ff0h,9ff1h,9ff2h,9ff3h,9ff4h,9ff5h,9ff6h,9ff7h,9ff8h,9ff9h,9ffah,9ffbh,9ffch,9ffdh,9ffeh,9fffh +003602r 1 9F F2 9F F3 +003606r 1 9F F4 9F F5 +00361Er 1 A0 00 A0 01 .dbyt 0a000h,0a001h,0a002h,0a003h,0a004h,0a005h,0a006h,0a007h,0a008h,0a009h,0a00ah,0a00bh,0a00ch,0a00dh,0a00eh,0a00fh +003622r 1 A0 02 A0 03 +003626r 1 A0 04 A0 05 +00363Er 1 AF F0 AF F1 .dbyt 0aff0h,0aff1h,0aff2h,0aff3h,0aff4h,0aff5h,0aff6h,0aff7h,0aff8h,0aff9h,0affah,0affbh,0affch,0affdh,0affeh,0afffh +003642r 1 AF F2 AF F3 +003646r 1 AF F4 AF F5 +00365Er 1 B0 00 B0 01 .dbyt 0b000h,0b001h,0b002h,0b003h,0b004h,0b005h,0b006h,0b007h,0b008h,0b009h,0b00ah,0b00bh,0b00ch,0b00dh,0b00eh,0b00fh +003662r 1 B0 02 B0 03 +003666r 1 B0 04 B0 05 +00367Er 1 BF F0 BF F1 .dbyt 0bff0h,0bff1h,0bff2h,0bff3h,0bff4h,0bff5h,0bff6h,0bff7h,0bff8h,0bff9h,0bffah,0bffbh,0bffch,0bffdh,0bffeh,0bfffh +003682r 1 BF F2 BF F3 +003686r 1 BF F4 BF F5 +00369Er 1 C0 00 C0 01 .dbyt 0c000h,0c001h,0c002h,0c003h,0c004h,0c005h,0c006h,0c007h,0c008h,0c009h,0c00ah,0c00bh,0c00ch,0c00dh,0c00eh,0c00fh +0036A2r 1 C0 02 C0 03 +0036A6r 1 C0 04 C0 05 +0036BEr 1 CF F0 CF F1 .dbyt 0cff0h,0cff1h,0cff2h,0cff3h,0cff4h,0cff5h,0cff6h,0cff7h,0cff8h,0cff9h,0cffah,0cffbh,0cffch,0cffdh,0cffeh,0cfffh +0036C2r 1 CF F2 CF F3 +0036C6r 1 CF F4 CF F5 +0036DEr 1 D0 00 D0 01 .dbyt 0d000h,0d001h,0d002h,0d003h,0d004h,0d005h,0d006h,0d007h,0d008h,0d009h,0d00ah,0d00bh,0d00ch,0d00dh,0d00eh,0d00fh +0036E2r 1 D0 02 D0 03 +0036E6r 1 D0 04 D0 05 +0036FEr 1 DF F0 DF F1 .dbyt 0dff0h,0dff1h,0dff2h,0dff3h,0dff4h,0dff5h,0dff6h,0dff7h,0dff8h,0dff9h,0dffah,0dffbh,0dffch,0dffdh,0dffeh,0dfffh +003702r 1 DF F2 DF F3 +003706r 1 DF F4 DF F5 +00371Er 1 E0 00 E0 01 .dbyt 0e000h,0e001h,0e002h,0e003h,0e004h,0e005h,0e006h,0e007h,0e008h,0e009h,0e00ah,0e00bh,0e00ch,0e00dh,0e00eh,0e00fh +003722r 1 E0 02 E0 03 +003726r 1 E0 04 E0 05 +00373Er 1 EF F0 EF F1 .dbyt 0eff0h,0eff1h,0eff2h,0eff3h,0eff4h,0eff5h,0eff6h,0eff7h,0eff8h,0eff9h,0effah,0effbh,0effch,0effdh,0effeh,0efffh +003742r 1 EF F2 EF F3 +003746r 1 EF F4 EF F5 +00375Er 1 F0 00 F0 01 .dbyt 0f000h,0f001h,0f002h,0f003h,0f004h,0f005h,0f006h,0f007h,0f008h,0f009h,0f00ah,0f00bh,0f00ch,0f00dh,0f00eh,0f00fh +003762r 1 F0 02 F0 03 +003766r 1 F0 04 F0 05 +00377Er 1 FF F0 FF F1 .dbyt 0fff0h,0fff1h,0fff2h,0fff3h,0fff4h,0fff5h,0fff6h,0fff7h,0fff8h,0fff9h,0fffah,0fffbh,0fffch,0fffdh,0fffeh,0ffffh +003782r 1 FF F2 FF F3 +003786r 1 FF F4 FF F5 +00379Er 1 +00379Er 1 ; mix some variants +00379Er 1 00 0B 00 11 .dbyt 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh +0037A2r 1 00 03 00 11 +0037A6r 1 00 61 00 62 +0037BCr 1 diff --git a/test/asm/listing/ref/104-dword.bin-ref b/test/asm/listing/ref/104-dword.bin-ref new file mode 100644 index 000000000..8a9db7bf0 Binary files /dev/null and b/test/asm/listing/ref/104-dword.bin-ref differ diff --git a/test/asm/listing/ref/104-dword.list-ref b/test/asm/listing/ref/104-dword.list-ref new file mode 100644 index 000000000..9f52412d8 --- /dev/null +++ b/test/asm/listing/ref/104-dword.list-ref @@ -0,0 +1,5007 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 104-dword.s +Current file: 104-dword.s + +000000r 1 ; 2022-06-15 Spiro Trikaliotis +000000r 1 +000000r 1 +000000r 1 ; upper case pseudo-op +000000r 1 00 00 00 00 .DWORD 0 +000004r 1 01 00 00 00 .DWORD 1 +000008r 1 02 00 00 00 .DWORD 2 +00000Cr 1 03 00 00 00 .DWORD 3 +000010r 1 04 00 00 00 .DWORD 4 +000014r 1 05 00 00 00 .DWORD 5 +000018r 1 06 00 00 00 .DWORD 6 +00001Cr 1 07 00 00 00 .DWORD 7 +000020r 1 08 00 00 00 .DWORD 8 +000024r 1 09 00 00 00 .DWORD 9 +000028r 1 0A 00 00 00 .DWORD 10 +00002Cr 1 0B 00 00 00 .DWORD 11 +000030r 1 0C 00 00 00 .DWORD 12 +000034r 1 0D 00 00 00 .DWORD 13 +000038r 1 0E 00 00 00 .DWORD 14 +00003Cr 1 0F 00 00 00 .DWORD 15 +000040r 1 10 00 00 00 .DWORD 16 +000044r 1 11 00 00 00 .DWORD 17 +000048r 1 12 00 00 00 .DWORD 18 +00004Cr 1 13 00 00 00 .DWORD 19 +000050r 1 70 00 00 00 .DWORD 112 +000054r 1 71 00 00 00 .DWORD 113 +000058r 1 72 00 00 00 .DWORD 114 +00005Cr 1 73 00 00 00 .DWORD 115 +000060r 1 74 00 00 00 .DWORD 116 +000064r 1 75 00 00 00 .DWORD 117 +000068r 1 76 00 00 00 .DWORD 118 +00006Cr 1 77 00 00 00 .DWORD 119 +000070r 1 78 00 00 00 .DWORD 120 +000074r 1 79 00 00 00 .DWORD 121 +000078r 1 7A 00 00 00 .DWORD 122 +00007Cr 1 7B 00 00 00 .DWORD 123 +000080r 1 7C 00 00 00 .DWORD 124 +000084r 1 7D 00 00 00 .DWORD 125 +000088r 1 7E 00 00 00 .DWORD 126 +00008Cr 1 7F 00 00 00 .DWORD 127 +000090r 1 80 00 00 00 .DWORD 128 +000094r 1 81 00 00 00 .DWORD 129 +000098r 1 82 00 00 00 .DWORD 130 +00009Cr 1 83 00 00 00 .DWORD 131 +0000A0r 1 84 00 00 00 .DWORD 132 +0000A4r 1 85 00 00 00 .DWORD 133 +0000A8r 1 86 00 00 00 .DWORD 134 +0000ACr 1 F0 00 00 00 .DWORD 240 +0000B0r 1 F1 00 00 00 .DWORD 241 +0000B4r 1 F2 00 00 00 .DWORD 242 +0000B8r 1 F3 00 00 00 .DWORD 243 +0000BCr 1 F4 00 00 00 .DWORD 244 +0000C0r 1 F5 00 00 00 .DWORD 245 +0000C4r 1 F6 00 00 00 .DWORD 246 +0000C8r 1 F7 00 00 00 .DWORD 247 +0000CCr 1 F8 00 00 00 .DWORD 248 +0000D0r 1 F9 00 00 00 .DWORD 249 +0000D4r 1 FA 00 00 00 .DWORD 250 +0000D8r 1 FB 00 00 00 .DWORD 251 +0000DCr 1 FC 00 00 00 .DWORD 252 +0000E0r 1 FD 00 00 00 .DWORD 253 +0000E4r 1 FE 00 00 00 .DWORD 254 +0000E8r 1 FF 00 00 00 .DWORD 255 +0000ECr 1 00 01 00 00 .DWORD 256 +0000F0r 1 01 01 00 00 .DWORD 257 +0000F4r 1 02 01 00 00 .DWORD 258 +0000F8r 1 03 01 00 00 .DWORD 259 +0000FCr 1 D2 0F 00 00 .DWORD 4050 +000100r 1 D3 0F 00 00 .DWORD 4051 +000104r 1 D4 0F 00 00 .DWORD 4052 +000108r 1 D5 0F 00 00 .DWORD 4053 +00010Cr 1 D6 0F 00 00 .DWORD 4054 +000110r 1 D7 0F 00 00 .DWORD 4055 +000114r 1 D8 0F 00 00 .DWORD 4056 +000118r 1 D9 0F 00 00 .DWORD 4057 +00011Cr 1 DA 0F 00 00 .DWORD 4058 +000120r 1 DB 0F 00 00 .DWORD 4059 +000124r 1 DC 0F 00 00 .DWORD 4060 +000128r 1 DD 0F 00 00 .DWORD 4061 +00012Cr 1 DE 0F 00 00 .DWORD 4062 +000130r 1 DF 0F 00 00 .DWORD 4063 +000134r 1 E0 0F 00 00 .DWORD 4064 +000138r 1 E1 0F 00 00 .DWORD 4065 +00013Cr 1 E2 0F 00 00 .DWORD 4066 +000140r 1 E3 0F 00 00 .DWORD 4067 +000144r 1 E4 0F 00 00 .DWORD 4068 +000148r 1 E5 0F 00 00 .DWORD 4069 +00014Cr 1 E6 0F 00 00 .DWORD 4070 +000150r 1 E7 0F 00 00 .DWORD 4071 +000154r 1 E8 0F 00 00 .DWORD 4072 +000158r 1 E9 0F 00 00 .DWORD 4073 +00015Cr 1 EA 0F 00 00 .DWORD 4074 +000160r 1 EB 0F 00 00 .DWORD 4075 +000164r 1 EC 0F 00 00 .DWORD 4076 +000168r 1 ED 0F 00 00 .DWORD 4077 +00016Cr 1 EE 0F 00 00 .DWORD 4078 +000170r 1 EF 0F 00 00 .DWORD 4079 +000174r 1 F0 0F 00 00 .DWORD 4080 +000178r 1 F1 0F 00 00 .DWORD 4081 +00017Cr 1 F2 0F 00 00 .DWORD 4082 +000180r 1 F3 0F 00 00 .DWORD 4083 +000184r 1 F4 0F 00 00 .DWORD 4084 +000188r 1 F5 0F 00 00 .DWORD 4085 +00018Cr 1 F6 0F 00 00 .DWORD 4086 +000190r 1 F7 0F 00 00 .DWORD 4087 +000194r 1 F8 0F 00 00 .DWORD 4088 +000198r 1 F9 0F 00 00 .DWORD 4089 +00019Cr 1 FA 0F 00 00 .DWORD 4090 +0001A0r 1 FB 0F 00 00 .DWORD 4091 +0001A4r 1 FC 0F 00 00 .DWORD 4092 +0001A8r 1 FD 0F 00 00 .DWORD 4093 +0001ACr 1 FE 0F 00 00 .DWORD 4094 +0001B0r 1 FF 0F 00 00 .DWORD 4095 +0001B4r 1 00 10 00 00 .DWORD 4096 +0001B8r 1 01 10 00 00 .DWORD 4097 +0001BCr 1 02 10 00 00 .DWORD 4098 +0001C0r 1 03 10 00 00 .DWORD 4099 +0001C4r 1 04 10 00 00 .DWORD 4100 +0001C8r 1 05 10 00 00 .DWORD 4101 +0001CCr 1 06 10 00 00 .DWORD 4102 +0001D0r 1 07 10 00 00 .DWORD 4103 +0001D4r 1 08 10 00 00 .DWORD 4104 +0001D8r 1 F0 7F 00 00 .DWORD 32752 +0001DCr 1 F1 7F 00 00 .DWORD 32753 +0001E0r 1 F2 7F 00 00 .DWORD 32754 +0001E4r 1 F3 7F 00 00 .DWORD 32755 +0001E8r 1 F4 7F 00 00 .DWORD 32756 +0001ECr 1 F5 7F 00 00 .DWORD 32757 +0001F0r 1 F6 7F 00 00 .DWORD 32758 +0001F4r 1 F7 7F 00 00 .DWORD 32759 +0001F8r 1 F8 7F 00 00 .DWORD 32760 +0001FCr 1 F9 7F 00 00 .DWORD 32761 +000200r 1 FA 7F 00 00 .DWORD 32762 +000204r 1 FB 7F 00 00 .DWORD 32763 +000208r 1 FC 7F 00 00 .DWORD 32764 +00020Cr 1 FD 7F 00 00 .DWORD 32765 +000210r 1 FE 7F 00 00 .DWORD 32766 +000214r 1 FF 7F 00 00 .DWORD 32767 +000218r 1 00 80 00 00 .DWORD 32768 +00021Cr 1 01 80 00 00 .DWORD 32769 +000220r 1 02 80 00 00 .DWORD 32770 +000224r 1 03 80 00 00 .DWORD 32771 +000228r 1 04 80 00 00 .DWORD 32772 +00022Cr 1 05 80 00 00 .DWORD 32773 +000230r 1 06 80 00 00 .DWORD 32774 +000234r 1 07 80 00 00 .DWORD 32775 +000238r 1 08 80 00 00 .DWORD 32776 +00023Cr 1 09 80 00 00 .DWORD 32777 +000240r 1 0A 80 00 00 .DWORD 32778 +000244r 1 0B 80 00 00 .DWORD 32779 +000248r 1 E1 9F 00 00 .DWORD 40929 +00024Cr 1 E2 9F 00 00 .DWORD 40930 +000250r 1 E3 9F 00 00 .DWORD 40931 +000254r 1 E4 9F 00 00 .DWORD 40932 +000258r 1 E5 9F 00 00 .DWORD 40933 +00025Cr 1 E6 9F 00 00 .DWORD 40934 +000260r 1 E7 9F 00 00 .DWORD 40935 +000264r 1 E8 9F 00 00 .DWORD 40936 +000268r 1 E9 9F 00 00 .DWORD 40937 +00026Cr 1 EA 9F 00 00 .DWORD 40938 +000270r 1 EB 9F 00 00 .DWORD 40939 +000274r 1 EC 9F 00 00 .DWORD 40940 +000278r 1 ED 9F 00 00 .DWORD 40941 +00027Cr 1 EE 9F 00 00 .DWORD 40942 +000280r 1 EF 9F 00 00 .DWORD 40943 +000284r 1 F0 9F 00 00 .DWORD 40944 +000288r 1 F1 9F 00 00 .DWORD 40945 +00028Cr 1 F2 9F 00 00 .DWORD 40946 +000290r 1 F3 9F 00 00 .DWORD 40947 +000294r 1 F4 9F 00 00 .DWORD 40948 +000298r 1 F5 9F 00 00 .DWORD 40949 +00029Cr 1 F6 9F 00 00 .DWORD 40950 +0002A0r 1 F7 9F 00 00 .DWORD 40951 +0002A4r 1 F8 9F 00 00 .DWORD 40952 +0002A8r 1 F9 9F 00 00 .DWORD 40953 +0002ACr 1 FA 9F 00 00 .DWORD 40954 +0002B0r 1 FB 9F 00 00 .DWORD 40955 +0002B4r 1 FC 9F 00 00 .DWORD 40956 +0002B8r 1 FD 9F 00 00 .DWORD 40957 +0002BCr 1 FE 9F 00 00 .DWORD 40958 +0002C0r 1 FF 9F 00 00 .DWORD 40959 +0002C4r 1 00 A0 00 00 .DWORD 40960 +0002C8r 1 01 A0 00 00 .DWORD 40961 +0002CCr 1 02 A0 00 00 .DWORD 40962 +0002D0r 1 03 A0 00 00 .DWORD 40963 +0002D4r 1 04 A0 00 00 .DWORD 40964 +0002D8r 1 05 A0 00 00 .DWORD 40965 +0002DCr 1 06 A0 00 00 .DWORD 40966 +0002E0r 1 07 A0 00 00 .DWORD 40967 +0002E4r 1 08 A0 00 00 .DWORD 40968 +0002E8r 1 09 A0 00 00 .DWORD 40969 +0002ECr 1 0A A0 00 00 .DWORD 40970 +0002F0r 1 0B A0 00 00 .DWORD 40971 +0002F4r 1 0C A0 00 00 .DWORD 40972 +0002F8r 1 0D A0 00 00 .DWORD 40973 +0002FCr 1 0E A0 00 00 .DWORD 40974 +000300r 1 0F A0 00 00 .DWORD 40975 +000304r 1 E1 AF 00 00 .DWORD 45025 +000308r 1 E2 AF 00 00 .DWORD 45026 +00030Cr 1 E3 AF 00 00 .DWORD 45027 +000310r 1 E4 AF 00 00 .DWORD 45028 +000314r 1 E5 AF 00 00 .DWORD 45029 +000318r 1 E6 AF 00 00 .DWORD 45030 +00031Cr 1 E7 AF 00 00 .DWORD 45031 +000320r 1 E8 AF 00 00 .DWORD 45032 +000324r 1 E9 AF 00 00 .DWORD 45033 +000328r 1 EA AF 00 00 .DWORD 45034 +00032Cr 1 EB AF 00 00 .DWORD 45035 +000330r 1 EC AF 00 00 .DWORD 45036 +000334r 1 ED AF 00 00 .DWORD 45037 +000338r 1 EE AF 00 00 .DWORD 45038 +00033Cr 1 EF AF 00 00 .DWORD 45039 +000340r 1 F0 AF 00 00 .DWORD 45040 +000344r 1 F1 AF 00 00 .DWORD 45041 +000348r 1 F2 AF 00 00 .DWORD 45042 +00034Cr 1 F3 AF 00 00 .DWORD 45043 +000350r 1 F4 AF 00 00 .DWORD 45044 +000354r 1 F5 AF 00 00 .DWORD 45045 +000358r 1 F6 AF 00 00 .DWORD 45046 +00035Cr 1 F7 AF 00 00 .DWORD 45047 +000360r 1 F8 AF 00 00 .DWORD 45048 +000364r 1 F9 AF 00 00 .DWORD 45049 +000368r 1 FA AF 00 00 .DWORD 45050 +00036Cr 1 FB AF 00 00 .DWORD 45051 +000370r 1 FC AF 00 00 .DWORD 45052 +000374r 1 FD AF 00 00 .DWORD 45053 +000378r 1 FE AF 00 00 .DWORD 45054 +00037Cr 1 FF AF 00 00 .DWORD 45055 +000380r 1 00 B0 00 00 .DWORD 45056 +000384r 1 01 B0 00 00 .DWORD 45057 +000388r 1 02 B0 00 00 .DWORD 45058 +00038Cr 1 03 B0 00 00 .DWORD 45059 +000390r 1 04 B0 00 00 .DWORD 45060 +000394r 1 05 B0 00 00 .DWORD 45061 +000398r 1 06 B0 00 00 .DWORD 45062 +00039Cr 1 07 B0 00 00 .DWORD 45063 +0003A0r 1 08 B0 00 00 .DWORD 45064 +0003A4r 1 09 B0 00 00 .DWORD 45065 +0003A8r 1 0A B0 00 00 .DWORD 45066 +0003ACr 1 0B B0 00 00 .DWORD 45067 +0003B0r 1 0C B0 00 00 .DWORD 45068 +0003B4r 1 0D B0 00 00 .DWORD 45069 +0003B8r 1 0E B0 00 00 .DWORD 45070 +0003BCr 1 0F B0 00 00 .DWORD 45071 +0003C0r 1 E1 FF 00 00 .DWORD 65505 +0003C4r 1 E2 FF 00 00 .DWORD 65506 +0003C8r 1 E3 FF 00 00 .DWORD 65507 +0003CCr 1 E4 FF 00 00 .DWORD 65508 +0003D0r 1 E5 FF 00 00 .DWORD 65509 +0003D4r 1 E6 FF 00 00 .DWORD 65510 +0003D8r 1 E7 FF 00 00 .DWORD 65511 +0003DCr 1 E8 FF 00 00 .DWORD 65512 +0003E0r 1 E9 FF 00 00 .DWORD 65513 +0003E4r 1 EA FF 00 00 .DWORD 65514 +0003E8r 1 EB FF 00 00 .DWORD 65515 +0003ECr 1 EC FF 00 00 .DWORD 65516 +0003F0r 1 ED FF 00 00 .DWORD 65517 +0003F4r 1 EE FF 00 00 .DWORD 65518 +0003F8r 1 EF FF 00 00 .DWORD 65519 +0003FCr 1 F0 FF 00 00 .DWORD 65520 +000400r 1 F1 FF 00 00 .DWORD 65521 +000404r 1 F2 FF 00 00 .DWORD 65522 +000408r 1 F3 FF 00 00 .DWORD 65523 +00040Cr 1 F4 FF 00 00 .DWORD 65524 +000410r 1 F5 FF 00 00 .DWORD 65525 +000414r 1 F6 FF 00 00 .DWORD 65526 +000418r 1 F7 FF 00 00 .DWORD 65527 +00041Cr 1 F8 FF 00 00 .DWORD 65528 +000420r 1 F9 FF 00 00 .DWORD 65529 +000424r 1 FA FF 00 00 .DWORD 65530 +000428r 1 FB FF 00 00 .DWORD 65531 +00042Cr 1 FC FF 00 00 .DWORD 65532 +000430r 1 FD FF 00 00 .DWORD 65533 +000434r 1 FE FF 00 00 .DWORD 65534 +000438r 1 FF FF 00 00 .DWORD 65535 +00043Cr 1 00 00 01 00 .DWORD 65536 +000440r 1 01 00 01 00 .DWORD 65537 +000444r 1 02 00 01 00 .DWORD 65538 +000448r 1 03 00 01 00 .DWORD 65539 +00044Cr 1 04 00 01 00 .DWORD 65540 +000450r 1 05 00 01 00 .DWORD 65541 +000454r 1 06 00 01 00 .DWORD 65542 +000458r 1 07 00 01 00 .DWORD 65543 +00045Cr 1 08 00 01 00 .DWORD 65544 +000460r 1 09 00 01 00 .DWORD 65545 +000464r 1 0A 00 01 00 .DWORD 65546 +000468r 1 0B 00 01 00 .DWORD 65547 +00046Cr 1 0C 00 01 00 .DWORD 65548 +000470r 1 0D 00 01 00 .DWORD 65549 +000474r 1 0E 00 01 00 .DWORD 65550 +000478r 1 0F 00 01 00 .DWORD 65551 +00047Cr 1 F0 FF FF 7F .DWORD 2147483632 +000480r 1 F1 FF FF 7F .DWORD 2147483633 +000484r 1 F2 FF FF 7F .DWORD 2147483634 +000488r 1 F3 FF FF 7F .DWORD 2147483635 +00048Cr 1 F4 FF FF 7F .DWORD 2147483636 +000490r 1 F5 FF FF 7F .DWORD 2147483637 +000494r 1 F6 FF FF 7F .DWORD 2147483638 +000498r 1 F7 FF FF 7F .DWORD 2147483639 +00049Cr 1 F8 FF FF 7F .DWORD 2147483640 +0004A0r 1 F9 FF FF 7F .DWORD 2147483641 +0004A4r 1 FA FF FF 7F .DWORD 2147483642 +0004A8r 1 FB FF FF 7F .DWORD 2147483643 +0004ACr 1 FC FF FF 7F .DWORD 2147483644 +0004B0r 1 FD FF FF 7F .DWORD 2147483645 +0004B4r 1 FE FF FF 7F .DWORD 2147483646 +0004B8r 1 FF FF FF 7F .DWORD 2147483647 +0004BCr 1 00 00 00 80 .DWORD 2147483648 +0004C0r 1 01 00 00 80 .DWORD 2147483649 +0004C4r 1 02 00 00 80 .DWORD 2147483650 +0004C8r 1 03 00 00 80 .DWORD 2147483651 +0004CCr 1 04 00 00 80 .DWORD 2147483652 +0004D0r 1 05 00 00 80 .DWORD 2147483653 +0004D4r 1 06 00 00 80 .DWORD 2147483654 +0004D8r 1 07 00 00 80 .DWORD 2147483655 +0004DCr 1 08 00 00 80 .DWORD 2147483656 +0004E0r 1 09 00 00 80 .DWORD 2147483657 +0004E4r 1 0A 00 00 80 .DWORD 2147483658 +0004E8r 1 0B 00 00 80 .DWORD 2147483659 +0004ECr 1 0C 00 00 80 .DWORD 2147483660 +0004F0r 1 0D 00 00 80 .DWORD 2147483661 +0004F4r 1 0E 00 00 80 .DWORD 2147483662 +0004F8r 1 0F 00 00 80 .DWORD 2147483663 +0004FCr 1 F0 FF FF 9F .DWORD 2684354544 +000500r 1 F1 FF FF 9F .DWORD 2684354545 +000504r 1 F2 FF FF 9F .DWORD 2684354546 +000508r 1 F3 FF FF 9F .DWORD 2684354547 +00050Cr 1 F4 FF FF 9F .DWORD 2684354548 +000510r 1 F5 FF FF 9F .DWORD 2684354549 +000514r 1 F6 FF FF 9F .DWORD 2684354550 +000518r 1 F7 FF FF 9F .DWORD 2684354551 +00051Cr 1 F8 FF FF 9F .DWORD 2684354552 +000520r 1 F9 FF FF 9F .DWORD 2684354553 +000524r 1 FA FF FF 9F .DWORD 2684354554 +000528r 1 FB FF FF 9F .DWORD 2684354555 +00052Cr 1 FC FF FF 9F .DWORD 2684354556 +000530r 1 FD FF FF 9F .DWORD 2684354557 +000534r 1 FE FF FF 9F .DWORD 2684354558 +000538r 1 FF FF FF 9F .DWORD 2684354559 +00053Cr 1 00 00 00 A0 .DWORD 2684354560 +000540r 1 01 00 00 A0 .DWORD 2684354561 +000544r 1 02 00 00 A0 .DWORD 2684354562 +000548r 1 03 00 00 A0 .DWORD 2684354563 +00054Cr 1 04 00 00 A0 .DWORD 2684354564 +000550r 1 05 00 00 A0 .DWORD 2684354565 +000554r 1 06 00 00 A0 .DWORD 2684354566 +000558r 1 07 00 00 A0 .DWORD 2684354567 +00055Cr 1 08 00 00 A0 .DWORD 2684354568 +000560r 1 09 00 00 A0 .DWORD 2684354569 +000564r 1 0A 00 00 A0 .DWORD 2684354570 +000568r 1 0B 00 00 A0 .DWORD 2684354571 +00056Cr 1 0C 00 00 A0 .DWORD 2684354572 +000570r 1 0D 00 00 A0 .DWORD 2684354573 +000574r 1 0E 00 00 A0 .DWORD 2684354574 +000578r 1 0F 00 00 A0 .DWORD 2684354575 +00057Cr 1 F0 FF FF FF .DWORD 4294967280 +000580r 1 F1 FF FF FF .DWORD 4294967281 +000584r 1 F2 FF FF FF .DWORD 4294967282 +000588r 1 F3 FF FF FF .DWORD 4294967283 +00058Cr 1 F4 FF FF FF .DWORD 4294967284 +000590r 1 F5 FF FF FF .DWORD 4294967285 +000594r 1 F6 FF FF FF .DWORD 4294967286 +000598r 1 F7 FF FF FF .DWORD 4294967287 +00059Cr 1 F8 FF FF FF .DWORD 4294967288 +0005A0r 1 F9 FF FF FF .DWORD 4294967289 +0005A4r 1 FA FF FF FF .DWORD 4294967290 +0005A8r 1 FB FF FF FF .DWORD 4294967291 +0005ACr 1 FC FF FF FF .DWORD 4294967292 +0005B0r 1 FD FF FF FF .DWORD 4294967293 +0005B4r 1 FE FF FF FF .DWORD 4294967294 +0005B8r 1 FF FF FF FF .DWORD 4294967295 +0005BCr 1 +0005BCr 1 ; lower case pseudo-op +0005BCr 1 00 00 00 00 .dword 0 +0005C0r 1 01 00 00 00 .dword 1 +0005C4r 1 02 00 00 00 .dword 2 +0005C8r 1 03 00 00 00 .dword 3 +0005CCr 1 04 00 00 00 .dword 4 +0005D0r 1 05 00 00 00 .dword 5 +0005D4r 1 06 00 00 00 .dword 6 +0005D8r 1 07 00 00 00 .dword 7 +0005DCr 1 08 00 00 00 .dword 8 +0005E0r 1 09 00 00 00 .dword 9 +0005E4r 1 0A 00 00 00 .dword 10 +0005E8r 1 0B 00 00 00 .dword 11 +0005ECr 1 0C 00 00 00 .dword 12 +0005F0r 1 0D 00 00 00 .dword 13 +0005F4r 1 0E 00 00 00 .dword 14 +0005F8r 1 0F 00 00 00 .dword 15 +0005FCr 1 10 00 00 00 .dword 16 +000600r 1 11 00 00 00 .dword 17 +000604r 1 12 00 00 00 .dword 18 +000608r 1 13 00 00 00 .dword 19 +00060Cr 1 70 00 00 00 .dword 112 +000610r 1 71 00 00 00 .dword 113 +000614r 1 72 00 00 00 .dword 114 +000618r 1 73 00 00 00 .dword 115 +00061Cr 1 74 00 00 00 .dword 116 +000620r 1 75 00 00 00 .dword 117 +000624r 1 76 00 00 00 .dword 118 +000628r 1 77 00 00 00 .dword 119 +00062Cr 1 78 00 00 00 .dword 120 +000630r 1 79 00 00 00 .dword 121 +000634r 1 7A 00 00 00 .dword 122 +000638r 1 7B 00 00 00 .dword 123 +00063Cr 1 7C 00 00 00 .dword 124 +000640r 1 7D 00 00 00 .dword 125 +000644r 1 7E 00 00 00 .dword 126 +000648r 1 7F 00 00 00 .dword 127 +00064Cr 1 80 00 00 00 .dword 128 +000650r 1 81 00 00 00 .dword 129 +000654r 1 82 00 00 00 .dword 130 +000658r 1 83 00 00 00 .dword 131 +00065Cr 1 84 00 00 00 .dword 132 +000660r 1 85 00 00 00 .dword 133 +000664r 1 86 00 00 00 .dword 134 +000668r 1 F0 00 00 00 .dword 240 +00066Cr 1 F1 00 00 00 .dword 241 +000670r 1 F2 00 00 00 .dword 242 +000674r 1 F3 00 00 00 .dword 243 +000678r 1 F4 00 00 00 .dword 244 +00067Cr 1 F5 00 00 00 .dword 245 +000680r 1 F6 00 00 00 .dword 246 +000684r 1 F7 00 00 00 .dword 247 +000688r 1 F8 00 00 00 .dword 248 +00068Cr 1 F9 00 00 00 .dword 249 +000690r 1 FA 00 00 00 .dword 250 +000694r 1 FB 00 00 00 .dword 251 +000698r 1 FC 00 00 00 .dword 252 +00069Cr 1 FD 00 00 00 .dword 253 +0006A0r 1 FE 00 00 00 .dword 254 +0006A4r 1 FF 00 00 00 .dword 255 +0006A8r 1 00 01 00 00 .dword 256 +0006ACr 1 01 01 00 00 .dword 257 +0006B0r 1 02 01 00 00 .dword 258 +0006B4r 1 03 01 00 00 .dword 259 +0006B8r 1 D2 0F 00 00 .dword 4050 +0006BCr 1 D3 0F 00 00 .dword 4051 +0006C0r 1 D4 0F 00 00 .dword 4052 +0006C4r 1 D5 0F 00 00 .dword 4053 +0006C8r 1 D6 0F 00 00 .dword 4054 +0006CCr 1 D7 0F 00 00 .dword 4055 +0006D0r 1 D8 0F 00 00 .dword 4056 +0006D4r 1 D9 0F 00 00 .dword 4057 +0006D8r 1 DA 0F 00 00 .dword 4058 +0006DCr 1 DB 0F 00 00 .dword 4059 +0006E0r 1 DC 0F 00 00 .dword 4060 +0006E4r 1 DD 0F 00 00 .dword 4061 +0006E8r 1 DE 0F 00 00 .dword 4062 +0006ECr 1 DF 0F 00 00 .dword 4063 +0006F0r 1 E0 0F 00 00 .dword 4064 +0006F4r 1 E1 0F 00 00 .dword 4065 +0006F8r 1 E2 0F 00 00 .dword 4066 +0006FCr 1 E3 0F 00 00 .dword 4067 +000700r 1 E4 0F 00 00 .dword 4068 +000704r 1 E5 0F 00 00 .dword 4069 +000708r 1 E6 0F 00 00 .dword 4070 +00070Cr 1 E7 0F 00 00 .dword 4071 +000710r 1 E8 0F 00 00 .dword 4072 +000714r 1 E9 0F 00 00 .dword 4073 +000718r 1 EA 0F 00 00 .dword 4074 +00071Cr 1 EB 0F 00 00 .dword 4075 +000720r 1 EC 0F 00 00 .dword 4076 +000724r 1 ED 0F 00 00 .dword 4077 +000728r 1 EE 0F 00 00 .dword 4078 +00072Cr 1 EF 0F 00 00 .dword 4079 +000730r 1 F0 0F 00 00 .dword 4080 +000734r 1 F1 0F 00 00 .dword 4081 +000738r 1 F2 0F 00 00 .dword 4082 +00073Cr 1 F3 0F 00 00 .dword 4083 +000740r 1 F4 0F 00 00 .dword 4084 +000744r 1 F5 0F 00 00 .dword 4085 +000748r 1 F6 0F 00 00 .dword 4086 +00074Cr 1 F7 0F 00 00 .dword 4087 +000750r 1 F8 0F 00 00 .dword 4088 +000754r 1 F9 0F 00 00 .dword 4089 +000758r 1 FA 0F 00 00 .dword 4090 +00075Cr 1 FB 0F 00 00 .dword 4091 +000760r 1 FC 0F 00 00 .dword 4092 +000764r 1 FD 0F 00 00 .dword 4093 +000768r 1 FE 0F 00 00 .dword 4094 +00076Cr 1 FF 0F 00 00 .dword 4095 +000770r 1 00 10 00 00 .dword 4096 +000774r 1 01 10 00 00 .dword 4097 +000778r 1 02 10 00 00 .dword 4098 +00077Cr 1 03 10 00 00 .dword 4099 +000780r 1 04 10 00 00 .dword 4100 +000784r 1 05 10 00 00 .dword 4101 +000788r 1 06 10 00 00 .dword 4102 +00078Cr 1 07 10 00 00 .dword 4103 +000790r 1 08 10 00 00 .dword 4104 +000794r 1 F0 7F 00 00 .dword 32752 +000798r 1 F1 7F 00 00 .dword 32753 +00079Cr 1 F2 7F 00 00 .dword 32754 +0007A0r 1 F3 7F 00 00 .dword 32755 +0007A4r 1 F4 7F 00 00 .dword 32756 +0007A8r 1 F5 7F 00 00 .dword 32757 +0007ACr 1 F6 7F 00 00 .dword 32758 +0007B0r 1 F7 7F 00 00 .dword 32759 +0007B4r 1 F8 7F 00 00 .dword 32760 +0007B8r 1 F9 7F 00 00 .dword 32761 +0007BCr 1 FA 7F 00 00 .dword 32762 +0007C0r 1 FB 7F 00 00 .dword 32763 +0007C4r 1 FC 7F 00 00 .dword 32764 +0007C8r 1 FD 7F 00 00 .dword 32765 +0007CCr 1 FE 7F 00 00 .dword 32766 +0007D0r 1 FF 7F 00 00 .dword 32767 +0007D4r 1 00 80 00 00 .dword 32768 +0007D8r 1 01 80 00 00 .dword 32769 +0007DCr 1 02 80 00 00 .dword 32770 +0007E0r 1 03 80 00 00 .dword 32771 +0007E4r 1 04 80 00 00 .dword 32772 +0007E8r 1 05 80 00 00 .dword 32773 +0007ECr 1 06 80 00 00 .dword 32774 +0007F0r 1 07 80 00 00 .dword 32775 +0007F4r 1 08 80 00 00 .dword 32776 +0007F8r 1 09 80 00 00 .dword 32777 +0007FCr 1 0A 80 00 00 .dword 32778 +000800r 1 0B 80 00 00 .dword 32779 +000804r 1 E1 9F 00 00 .dword 40929 +000808r 1 E2 9F 00 00 .dword 40930 +00080Cr 1 E3 9F 00 00 .dword 40931 +000810r 1 E4 9F 00 00 .dword 40932 +000814r 1 E5 9F 00 00 .dword 40933 +000818r 1 E6 9F 00 00 .dword 40934 +00081Cr 1 E7 9F 00 00 .dword 40935 +000820r 1 E8 9F 00 00 .dword 40936 +000824r 1 E9 9F 00 00 .dword 40937 +000828r 1 EA 9F 00 00 .dword 40938 +00082Cr 1 EB 9F 00 00 .dword 40939 +000830r 1 EC 9F 00 00 .dword 40940 +000834r 1 ED 9F 00 00 .dword 40941 +000838r 1 EE 9F 00 00 .dword 40942 +00083Cr 1 EF 9F 00 00 .dword 40943 +000840r 1 F0 9F 00 00 .dword 40944 +000844r 1 F1 9F 00 00 .dword 40945 +000848r 1 F2 9F 00 00 .dword 40946 +00084Cr 1 F3 9F 00 00 .dword 40947 +000850r 1 F4 9F 00 00 .dword 40948 +000854r 1 F5 9F 00 00 .dword 40949 +000858r 1 F6 9F 00 00 .dword 40950 +00085Cr 1 F7 9F 00 00 .dword 40951 +000860r 1 F8 9F 00 00 .dword 40952 +000864r 1 F9 9F 00 00 .dword 40953 +000868r 1 FA 9F 00 00 .dword 40954 +00086Cr 1 FB 9F 00 00 .dword 40955 +000870r 1 FC 9F 00 00 .dword 40956 +000874r 1 FD 9F 00 00 .dword 40957 +000878r 1 FE 9F 00 00 .dword 40958 +00087Cr 1 FF 9F 00 00 .dword 40959 +000880r 1 00 A0 00 00 .dword 40960 +000884r 1 01 A0 00 00 .dword 40961 +000888r 1 02 A0 00 00 .dword 40962 +00088Cr 1 03 A0 00 00 .dword 40963 +000890r 1 04 A0 00 00 .dword 40964 +000894r 1 05 A0 00 00 .dword 40965 +000898r 1 06 A0 00 00 .dword 40966 +00089Cr 1 07 A0 00 00 .dword 40967 +0008A0r 1 08 A0 00 00 .dword 40968 +0008A4r 1 09 A0 00 00 .dword 40969 +0008A8r 1 0A A0 00 00 .dword 40970 +0008ACr 1 0B A0 00 00 .dword 40971 +0008B0r 1 0C A0 00 00 .dword 40972 +0008B4r 1 0D A0 00 00 .dword 40973 +0008B8r 1 0E A0 00 00 .dword 40974 +0008BCr 1 0F A0 00 00 .dword 40975 +0008C0r 1 E1 AF 00 00 .dword 45025 +0008C4r 1 E2 AF 00 00 .dword 45026 +0008C8r 1 E3 AF 00 00 .dword 45027 +0008CCr 1 E4 AF 00 00 .dword 45028 +0008D0r 1 E5 AF 00 00 .dword 45029 +0008D4r 1 E6 AF 00 00 .dword 45030 +0008D8r 1 E7 AF 00 00 .dword 45031 +0008DCr 1 E8 AF 00 00 .dword 45032 +0008E0r 1 E9 AF 00 00 .dword 45033 +0008E4r 1 EA AF 00 00 .dword 45034 +0008E8r 1 EB AF 00 00 .dword 45035 +0008ECr 1 EC AF 00 00 .dword 45036 +0008F0r 1 ED AF 00 00 .dword 45037 +0008F4r 1 EE AF 00 00 .dword 45038 +0008F8r 1 EF AF 00 00 .dword 45039 +0008FCr 1 F0 AF 00 00 .dword 45040 +000900r 1 F1 AF 00 00 .dword 45041 +000904r 1 F2 AF 00 00 .dword 45042 +000908r 1 F3 AF 00 00 .dword 45043 +00090Cr 1 F4 AF 00 00 .dword 45044 +000910r 1 F5 AF 00 00 .dword 45045 +000914r 1 F6 AF 00 00 .dword 45046 +000918r 1 F7 AF 00 00 .dword 45047 +00091Cr 1 F8 AF 00 00 .dword 45048 +000920r 1 F9 AF 00 00 .dword 45049 +000924r 1 FA AF 00 00 .dword 45050 +000928r 1 FB AF 00 00 .dword 45051 +00092Cr 1 FC AF 00 00 .dword 45052 +000930r 1 FD AF 00 00 .dword 45053 +000934r 1 FE AF 00 00 .dword 45054 +000938r 1 FF AF 00 00 .dword 45055 +00093Cr 1 00 B0 00 00 .dword 45056 +000940r 1 01 B0 00 00 .dword 45057 +000944r 1 02 B0 00 00 .dword 45058 +000948r 1 03 B0 00 00 .dword 45059 +00094Cr 1 04 B0 00 00 .dword 45060 +000950r 1 05 B0 00 00 .dword 45061 +000954r 1 06 B0 00 00 .dword 45062 +000958r 1 07 B0 00 00 .dword 45063 +00095Cr 1 08 B0 00 00 .dword 45064 +000960r 1 09 B0 00 00 .dword 45065 +000964r 1 0A B0 00 00 .dword 45066 +000968r 1 0B B0 00 00 .dword 45067 +00096Cr 1 0C B0 00 00 .dword 45068 +000970r 1 0D B0 00 00 .dword 45069 +000974r 1 0E B0 00 00 .dword 45070 +000978r 1 0F B0 00 00 .dword 45071 +00097Cr 1 E1 FF 00 00 .dword 65505 +000980r 1 E2 FF 00 00 .dword 65506 +000984r 1 E3 FF 00 00 .dword 65507 +000988r 1 E4 FF 00 00 .dword 65508 +00098Cr 1 E5 FF 00 00 .dword 65509 +000990r 1 E6 FF 00 00 .dword 65510 +000994r 1 E7 FF 00 00 .dword 65511 +000998r 1 E8 FF 00 00 .dword 65512 +00099Cr 1 E9 FF 00 00 .dword 65513 +0009A0r 1 EA FF 00 00 .dword 65514 +0009A4r 1 EB FF 00 00 .dword 65515 +0009A8r 1 EC FF 00 00 .dword 65516 +0009ACr 1 ED FF 00 00 .dword 65517 +0009B0r 1 EE FF 00 00 .dword 65518 +0009B4r 1 EF FF 00 00 .dword 65519 +0009B8r 1 F0 FF 00 00 .dword 65520 +0009BCr 1 F1 FF 00 00 .dword 65521 +0009C0r 1 F2 FF 00 00 .dword 65522 +0009C4r 1 F3 FF 00 00 .dword 65523 +0009C8r 1 F4 FF 00 00 .dword 65524 +0009CCr 1 F5 FF 00 00 .dword 65525 +0009D0r 1 F6 FF 00 00 .dword 65526 +0009D4r 1 F7 FF 00 00 .dword 65527 +0009D8r 1 F8 FF 00 00 .dword 65528 +0009DCr 1 F9 FF 00 00 .dword 65529 +0009E0r 1 FA FF 00 00 .dword 65530 +0009E4r 1 FB FF 00 00 .dword 65531 +0009E8r 1 FC FF 00 00 .dword 65532 +0009ECr 1 FD FF 00 00 .dword 65533 +0009F0r 1 FE FF 00 00 .dword 65534 +0009F4r 1 FF FF 00 00 .dword 65535 +0009F8r 1 00 00 01 00 .dword 65536 +0009FCr 1 01 00 01 00 .dword 65537 +000A00r 1 02 00 01 00 .dword 65538 +000A04r 1 03 00 01 00 .dword 65539 +000A08r 1 04 00 01 00 .dword 65540 +000A0Cr 1 05 00 01 00 .dword 65541 +000A10r 1 06 00 01 00 .dword 65542 +000A14r 1 07 00 01 00 .dword 65543 +000A18r 1 08 00 01 00 .dword 65544 +000A1Cr 1 09 00 01 00 .dword 65545 +000A20r 1 0A 00 01 00 .dword 65546 +000A24r 1 0B 00 01 00 .dword 65547 +000A28r 1 0C 00 01 00 .dword 65548 +000A2Cr 1 0D 00 01 00 .dword 65549 +000A30r 1 0E 00 01 00 .dword 65550 +000A34r 1 0F 00 01 00 .dword 65551 +000A38r 1 F0 FF FF 7F .dword 2147483632 +000A3Cr 1 F1 FF FF 7F .dword 2147483633 +000A40r 1 F2 FF FF 7F .dword 2147483634 +000A44r 1 F3 FF FF 7F .dword 2147483635 +000A48r 1 F4 FF FF 7F .dword 2147483636 +000A4Cr 1 F5 FF FF 7F .dword 2147483637 +000A50r 1 F6 FF FF 7F .dword 2147483638 +000A54r 1 F7 FF FF 7F .dword 2147483639 +000A58r 1 F8 FF FF 7F .dword 2147483640 +000A5Cr 1 F9 FF FF 7F .dword 2147483641 +000A60r 1 FA FF FF 7F .dword 2147483642 +000A64r 1 FB FF FF 7F .dword 2147483643 +000A68r 1 FC FF FF 7F .dword 2147483644 +000A6Cr 1 FD FF FF 7F .dword 2147483645 +000A70r 1 FE FF FF 7F .dword 2147483646 +000A74r 1 FF FF FF 7F .dword 2147483647 +000A78r 1 00 00 00 80 .dword 2147483648 +000A7Cr 1 01 00 00 80 .dword 2147483649 +000A80r 1 02 00 00 80 .dword 2147483650 +000A84r 1 03 00 00 80 .dword 2147483651 +000A88r 1 04 00 00 80 .dword 2147483652 +000A8Cr 1 05 00 00 80 .dword 2147483653 +000A90r 1 06 00 00 80 .dword 2147483654 +000A94r 1 07 00 00 80 .dword 2147483655 +000A98r 1 08 00 00 80 .dword 2147483656 +000A9Cr 1 09 00 00 80 .dword 2147483657 +000AA0r 1 0A 00 00 80 .dword 2147483658 +000AA4r 1 0B 00 00 80 .dword 2147483659 +000AA8r 1 0C 00 00 80 .dword 2147483660 +000AACr 1 0D 00 00 80 .dword 2147483661 +000AB0r 1 0E 00 00 80 .dword 2147483662 +000AB4r 1 0F 00 00 80 .dword 2147483663 +000AB8r 1 F0 FF FF 9F .dword 2684354544 +000ABCr 1 F1 FF FF 9F .dword 2684354545 +000AC0r 1 F2 FF FF 9F .dword 2684354546 +000AC4r 1 F3 FF FF 9F .dword 2684354547 +000AC8r 1 F4 FF FF 9F .dword 2684354548 +000ACCr 1 F5 FF FF 9F .dword 2684354549 +000AD0r 1 F6 FF FF 9F .dword 2684354550 +000AD4r 1 F7 FF FF 9F .dword 2684354551 +000AD8r 1 F8 FF FF 9F .dword 2684354552 +000ADCr 1 F9 FF FF 9F .dword 2684354553 +000AE0r 1 FA FF FF 9F .dword 2684354554 +000AE4r 1 FB FF FF 9F .dword 2684354555 +000AE8r 1 FC FF FF 9F .dword 2684354556 +000AECr 1 FD FF FF 9F .dword 2684354557 +000AF0r 1 FE FF FF 9F .dword 2684354558 +000AF4r 1 FF FF FF 9F .dword 2684354559 +000AF8r 1 00 00 00 A0 .dword 2684354560 +000AFCr 1 01 00 00 A0 .dword 2684354561 +000B00r 1 02 00 00 A0 .dword 2684354562 +000B04r 1 03 00 00 A0 .dword 2684354563 +000B08r 1 04 00 00 A0 .dword 2684354564 +000B0Cr 1 05 00 00 A0 .dword 2684354565 +000B10r 1 06 00 00 A0 .dword 2684354566 +000B14r 1 07 00 00 A0 .dword 2684354567 +000B18r 1 08 00 00 A0 .dword 2684354568 +000B1Cr 1 09 00 00 A0 .dword 2684354569 +000B20r 1 0A 00 00 A0 .dword 2684354570 +000B24r 1 0B 00 00 A0 .dword 2684354571 +000B28r 1 0C 00 00 A0 .dword 2684354572 +000B2Cr 1 0D 00 00 A0 .dword 2684354573 +000B30r 1 0E 00 00 A0 .dword 2684354574 +000B34r 1 0F 00 00 A0 .dword 2684354575 +000B38r 1 F0 FF FF FF .dword 4294967280 +000B3Cr 1 F1 FF FF FF .dword 4294967281 +000B40r 1 F2 FF FF FF .dword 4294967282 +000B44r 1 F3 FF FF FF .dword 4294967283 +000B48r 1 F4 FF FF FF .dword 4294967284 +000B4Cr 1 F5 FF FF FF .dword 4294967285 +000B50r 1 F6 FF FF FF .dword 4294967286 +000B54r 1 F7 FF FF FF .dword 4294967287 +000B58r 1 F8 FF FF FF .dword 4294967288 +000B5Cr 1 F9 FF FF FF .dword 4294967289 +000B60r 1 FA FF FF FF .dword 4294967290 +000B64r 1 FB FF FF FF .dword 4294967291 +000B68r 1 FC FF FF FF .dword 4294967292 +000B6Cr 1 FD FF FF FF .dword 4294967293 +000B70r 1 FE FF FF FF .dword 4294967294 +000B74r 1 FF FF FF FF .dword 4294967295 +000B78r 1 +000B78r 1 ; hex values +000B78r 1 00 00 00 00 .dword $0 +000B7Cr 1 01 00 00 00 .dword $1 +000B80r 1 02 00 00 00 .dword $2 +000B84r 1 03 00 00 00 .dword $3 +000B88r 1 04 00 00 00 .dword $4 +000B8Cr 1 05 00 00 00 .dword $5 +000B90r 1 06 00 00 00 .dword $6 +000B94r 1 07 00 00 00 .dword $7 +000B98r 1 08 00 00 00 .dword $8 +000B9Cr 1 09 00 00 00 .dword $9 +000BA0r 1 0A 00 00 00 .dword $a +000BA4r 1 0B 00 00 00 .dword $b +000BA8r 1 0C 00 00 00 .dword $c +000BACr 1 0D 00 00 00 .dword $d +000BB0r 1 0E 00 00 00 .dword $e +000BB4r 1 0F 00 00 00 .dword $f +000BB8r 1 10 00 00 00 .dword $10 +000BBCr 1 11 00 00 00 .dword $11 +000BC0r 1 12 00 00 00 .dword $12 +000BC4r 1 13 00 00 00 .dword $13 +000BC8r 1 70 00 00 00 .dword $70 +000BCCr 1 71 00 00 00 .dword $71 +000BD0r 1 72 00 00 00 .dword $72 +000BD4r 1 73 00 00 00 .dword $73 +000BD8r 1 74 00 00 00 .dword $74 +000BDCr 1 75 00 00 00 .dword $75 +000BE0r 1 76 00 00 00 .dword $76 +000BE4r 1 77 00 00 00 .dword $77 +000BE8r 1 78 00 00 00 .dword $78 +000BECr 1 79 00 00 00 .dword $79 +000BF0r 1 7A 00 00 00 .dword $7a +000BF4r 1 7B 00 00 00 .dword $7b +000BF8r 1 7C 00 00 00 .dword $7c +000BFCr 1 7D 00 00 00 .dword $7d +000C00r 1 7E 00 00 00 .dword $7e +000C04r 1 7F 00 00 00 .dword $7f +000C08r 1 80 00 00 00 .dword $80 +000C0Cr 1 81 00 00 00 .dword $81 +000C10r 1 82 00 00 00 .dword $82 +000C14r 1 83 00 00 00 .dword $83 +000C18r 1 84 00 00 00 .dword $84 +000C1Cr 1 85 00 00 00 .dword $85 +000C20r 1 86 00 00 00 .dword $86 +000C24r 1 F0 00 00 00 .dword $f0 +000C28r 1 F1 00 00 00 .dword $f1 +000C2Cr 1 F2 00 00 00 .dword $f2 +000C30r 1 F3 00 00 00 .dword $f3 +000C34r 1 F4 00 00 00 .dword $f4 +000C38r 1 F5 00 00 00 .dword $f5 +000C3Cr 1 F6 00 00 00 .dword $f6 +000C40r 1 F7 00 00 00 .dword $f7 +000C44r 1 F8 00 00 00 .dword $f8 +000C48r 1 F9 00 00 00 .dword $f9 +000C4Cr 1 FA 00 00 00 .dword $fa +000C50r 1 FB 00 00 00 .dword $fb +000C54r 1 FC 00 00 00 .dword $fc +000C58r 1 FD 00 00 00 .dword $fd +000C5Cr 1 FE 00 00 00 .dword $fe +000C60r 1 FF 00 00 00 .dword $ff +000C64r 1 00 01 00 00 .dword $100 +000C68r 1 01 01 00 00 .dword $101 +000C6Cr 1 02 01 00 00 .dword $102 +000C70r 1 03 01 00 00 .dword $103 +000C74r 1 D2 0F 00 00 .dword $fd2 +000C78r 1 D3 0F 00 00 .dword $fd3 +000C7Cr 1 D4 0F 00 00 .dword $fd4 +000C80r 1 D5 0F 00 00 .dword $fd5 +000C84r 1 D6 0F 00 00 .dword $fd6 +000C88r 1 D7 0F 00 00 .dword $fd7 +000C8Cr 1 D8 0F 00 00 .dword $fd8 +000C90r 1 D9 0F 00 00 .dword $fd9 +000C94r 1 DA 0F 00 00 .dword $fda +000C98r 1 DB 0F 00 00 .dword $fdb +000C9Cr 1 DC 0F 00 00 .dword $fdc +000CA0r 1 DD 0F 00 00 .dword $fdd +000CA4r 1 DE 0F 00 00 .dword $fde +000CA8r 1 DF 0F 00 00 .dword $fdf +000CACr 1 E0 0F 00 00 .dword $fe0 +000CB0r 1 E1 0F 00 00 .dword $fe1 +000CB4r 1 E2 0F 00 00 .dword $fe2 +000CB8r 1 E3 0F 00 00 .dword $fe3 +000CBCr 1 E4 0F 00 00 .dword $fe4 +000CC0r 1 E5 0F 00 00 .dword $fe5 +000CC4r 1 E6 0F 00 00 .dword $fe6 +000CC8r 1 E7 0F 00 00 .dword $fe7 +000CCCr 1 E8 0F 00 00 .dword $fe8 +000CD0r 1 E9 0F 00 00 .dword $fe9 +000CD4r 1 EA 0F 00 00 .dword $fea +000CD8r 1 EB 0F 00 00 .dword $feb +000CDCr 1 EC 0F 00 00 .dword $fec +000CE0r 1 ED 0F 00 00 .dword $fed +000CE4r 1 EE 0F 00 00 .dword $fee +000CE8r 1 EF 0F 00 00 .dword $fef +000CECr 1 F0 0F 00 00 .dword $ff0 +000CF0r 1 F1 0F 00 00 .dword $ff1 +000CF4r 1 F2 0F 00 00 .dword $ff2 +000CF8r 1 F3 0F 00 00 .dword $ff3 +000CFCr 1 F4 0F 00 00 .dword $ff4 +000D00r 1 F5 0F 00 00 .dword $ff5 +000D04r 1 F6 0F 00 00 .dword $ff6 +000D08r 1 F7 0F 00 00 .dword $ff7 +000D0Cr 1 F8 0F 00 00 .dword $ff8 +000D10r 1 F9 0F 00 00 .dword $ff9 +000D14r 1 FA 0F 00 00 .dword $ffa +000D18r 1 FB 0F 00 00 .dword $ffb +000D1Cr 1 FC 0F 00 00 .dword $ffc +000D20r 1 FD 0F 00 00 .dword $ffd +000D24r 1 FE 0F 00 00 .dword $ffe +000D28r 1 FF 0F 00 00 .dword $fff +000D2Cr 1 00 10 00 00 .dword $1000 +000D30r 1 01 10 00 00 .dword $1001 +000D34r 1 02 10 00 00 .dword $1002 +000D38r 1 03 10 00 00 .dword $1003 +000D3Cr 1 04 10 00 00 .dword $1004 +000D40r 1 05 10 00 00 .dword $1005 +000D44r 1 06 10 00 00 .dword $1006 +000D48r 1 07 10 00 00 .dword $1007 +000D4Cr 1 08 10 00 00 .dword $1008 +000D50r 1 F0 7F 00 00 .dword $7ff0 +000D54r 1 F1 7F 00 00 .dword $7ff1 +000D58r 1 F2 7F 00 00 .dword $7ff2 +000D5Cr 1 F3 7F 00 00 .dword $7ff3 +000D60r 1 F4 7F 00 00 .dword $7ff4 +000D64r 1 F5 7F 00 00 .dword $7ff5 +000D68r 1 F6 7F 00 00 .dword $7ff6 +000D6Cr 1 F7 7F 00 00 .dword $7ff7 +000D70r 1 F8 7F 00 00 .dword $7ff8 +000D74r 1 F9 7F 00 00 .dword $7ff9 +000D78r 1 FA 7F 00 00 .dword $7ffa +000D7Cr 1 FB 7F 00 00 .dword $7ffb +000D80r 1 FC 7F 00 00 .dword $7ffc +000D84r 1 FD 7F 00 00 .dword $7ffd +000D88r 1 FE 7F 00 00 .dword $7ffe +000D8Cr 1 FF 7F 00 00 .dword $7fff +000D90r 1 00 80 00 00 .dword $8000 +000D94r 1 01 80 00 00 .dword $8001 +000D98r 1 02 80 00 00 .dword $8002 +000D9Cr 1 03 80 00 00 .dword $8003 +000DA0r 1 04 80 00 00 .dword $8004 +000DA4r 1 05 80 00 00 .dword $8005 +000DA8r 1 06 80 00 00 .dword $8006 +000DACr 1 07 80 00 00 .dword $8007 +000DB0r 1 08 80 00 00 .dword $8008 +000DB4r 1 09 80 00 00 .dword $8009 +000DB8r 1 0A 80 00 00 .dword $800a +000DBCr 1 0B 80 00 00 .dword $800b +000DC0r 1 E1 9F 00 00 .dword $9fe1 +000DC4r 1 E2 9F 00 00 .dword $9fe2 +000DC8r 1 E3 9F 00 00 .dword $9fe3 +000DCCr 1 E4 9F 00 00 .dword $9fe4 +000DD0r 1 E5 9F 00 00 .dword $9fe5 +000DD4r 1 E6 9F 00 00 .dword $9fe6 +000DD8r 1 E7 9F 00 00 .dword $9fe7 +000DDCr 1 E8 9F 00 00 .dword $9fe8 +000DE0r 1 E9 9F 00 00 .dword $9fe9 +000DE4r 1 EA 9F 00 00 .dword $9fea +000DE8r 1 EB 9F 00 00 .dword $9feb +000DECr 1 EC 9F 00 00 .dword $9fec +000DF0r 1 ED 9F 00 00 .dword $9fed +000DF4r 1 EE 9F 00 00 .dword $9fee +000DF8r 1 EF 9F 00 00 .dword $9fef +000DFCr 1 F0 9F 00 00 .dword $9ff0 +000E00r 1 F1 9F 00 00 .dword $9ff1 +000E04r 1 F2 9F 00 00 .dword $9ff2 +000E08r 1 F3 9F 00 00 .dword $9ff3 +000E0Cr 1 F4 9F 00 00 .dword $9ff4 +000E10r 1 F5 9F 00 00 .dword $9ff5 +000E14r 1 F6 9F 00 00 .dword $9ff6 +000E18r 1 F7 9F 00 00 .dword $9ff7 +000E1Cr 1 F8 9F 00 00 .dword $9ff8 +000E20r 1 F9 9F 00 00 .dword $9ff9 +000E24r 1 FA 9F 00 00 .dword $9ffa +000E28r 1 FB 9F 00 00 .dword $9ffb +000E2Cr 1 FC 9F 00 00 .dword $9ffc +000E30r 1 FD 9F 00 00 .dword $9ffd +000E34r 1 FE 9F 00 00 .dword $9ffe +000E38r 1 FF 9F 00 00 .dword $9fff +000E3Cr 1 00 A0 00 00 .dword $a000 +000E40r 1 01 A0 00 00 .dword $a001 +000E44r 1 02 A0 00 00 .dword $a002 +000E48r 1 03 A0 00 00 .dword $a003 +000E4Cr 1 04 A0 00 00 .dword $a004 +000E50r 1 05 A0 00 00 .dword $a005 +000E54r 1 06 A0 00 00 .dword $a006 +000E58r 1 07 A0 00 00 .dword $a007 +000E5Cr 1 08 A0 00 00 .dword $a008 +000E60r 1 09 A0 00 00 .dword $a009 +000E64r 1 0A A0 00 00 .dword $a00a +000E68r 1 0B A0 00 00 .dword $a00b +000E6Cr 1 0C A0 00 00 .dword $a00c +000E70r 1 0D A0 00 00 .dword $a00d +000E74r 1 0E A0 00 00 .dword $a00e +000E78r 1 0F A0 00 00 .dword $a00f +000E7Cr 1 E1 AF 00 00 .dword $afe1 +000E80r 1 E2 AF 00 00 .dword $afe2 +000E84r 1 E3 AF 00 00 .dword $afe3 +000E88r 1 E4 AF 00 00 .dword $afe4 +000E8Cr 1 E5 AF 00 00 .dword $afe5 +000E90r 1 E6 AF 00 00 .dword $afe6 +000E94r 1 E7 AF 00 00 .dword $afe7 +000E98r 1 E8 AF 00 00 .dword $afe8 +000E9Cr 1 E9 AF 00 00 .dword $afe9 +000EA0r 1 EA AF 00 00 .dword $afea +000EA4r 1 EB AF 00 00 .dword $afeb +000EA8r 1 EC AF 00 00 .dword $afec +000EACr 1 ED AF 00 00 .dword $afed +000EB0r 1 EE AF 00 00 .dword $afee +000EB4r 1 EF AF 00 00 .dword $afef +000EB8r 1 F0 AF 00 00 .dword $aff0 +000EBCr 1 F1 AF 00 00 .dword $aff1 +000EC0r 1 F2 AF 00 00 .dword $aff2 +000EC4r 1 F3 AF 00 00 .dword $aff3 +000EC8r 1 F4 AF 00 00 .dword $aff4 +000ECCr 1 F5 AF 00 00 .dword $aff5 +000ED0r 1 F6 AF 00 00 .dword $aff6 +000ED4r 1 F7 AF 00 00 .dword $aff7 +000ED8r 1 F8 AF 00 00 .dword $aff8 +000EDCr 1 F9 AF 00 00 .dword $aff9 +000EE0r 1 FA AF 00 00 .dword $affa +000EE4r 1 FB AF 00 00 .dword $affb +000EE8r 1 FC AF 00 00 .dword $affc +000EECr 1 FD AF 00 00 .dword $affd +000EF0r 1 FE AF 00 00 .dword $affe +000EF4r 1 FF AF 00 00 .dword $afff +000EF8r 1 00 B0 00 00 .dword $b000 +000EFCr 1 01 B0 00 00 .dword $b001 +000F00r 1 02 B0 00 00 .dword $b002 +000F04r 1 03 B0 00 00 .dword $b003 +000F08r 1 04 B0 00 00 .dword $b004 +000F0Cr 1 05 B0 00 00 .dword $b005 +000F10r 1 06 B0 00 00 .dword $b006 +000F14r 1 07 B0 00 00 .dword $b007 +000F18r 1 08 B0 00 00 .dword $b008 +000F1Cr 1 09 B0 00 00 .dword $b009 +000F20r 1 0A B0 00 00 .dword $b00a +000F24r 1 0B B0 00 00 .dword $b00b +000F28r 1 0C B0 00 00 .dword $b00c +000F2Cr 1 0D B0 00 00 .dword $b00d +000F30r 1 0E B0 00 00 .dword $b00e +000F34r 1 0F B0 00 00 .dword $b00f +000F38r 1 E1 FF 00 00 .dword $ffe1 +000F3Cr 1 E2 FF 00 00 .dword $ffe2 +000F40r 1 E3 FF 00 00 .dword $ffe3 +000F44r 1 E4 FF 00 00 .dword $ffe4 +000F48r 1 E5 FF 00 00 .dword $ffe5 +000F4Cr 1 E6 FF 00 00 .dword $ffe6 +000F50r 1 E7 FF 00 00 .dword $ffe7 +000F54r 1 E8 FF 00 00 .dword $ffe8 +000F58r 1 E9 FF 00 00 .dword $ffe9 +000F5Cr 1 EA FF 00 00 .dword $ffea +000F60r 1 EB FF 00 00 .dword $ffeb +000F64r 1 EC FF 00 00 .dword $ffec +000F68r 1 ED FF 00 00 .dword $ffed +000F6Cr 1 EE FF 00 00 .dword $ffee +000F70r 1 EF FF 00 00 .dword $ffef +000F74r 1 F0 FF 00 00 .dword $fff0 +000F78r 1 F1 FF 00 00 .dword $fff1 +000F7Cr 1 F2 FF 00 00 .dword $fff2 +000F80r 1 F3 FF 00 00 .dword $fff3 +000F84r 1 F4 FF 00 00 .dword $fff4 +000F88r 1 F5 FF 00 00 .dword $fff5 +000F8Cr 1 F6 FF 00 00 .dword $fff6 +000F90r 1 F7 FF 00 00 .dword $fff7 +000F94r 1 F8 FF 00 00 .dword $fff8 +000F98r 1 F9 FF 00 00 .dword $fff9 +000F9Cr 1 FA FF 00 00 .dword $fffa +000FA0r 1 FB FF 00 00 .dword $fffb +000FA4r 1 FC FF 00 00 .dword $fffc +000FA8r 1 FD FF 00 00 .dword $fffd +000FACr 1 FE FF 00 00 .dword $fffe +000FB0r 1 FF FF 00 00 .dword $ffff +000FB4r 1 00 00 01 00 .dword $10000 +000FB8r 1 01 00 01 00 .dword $10001 +000FBCr 1 02 00 01 00 .dword $10002 +000FC0r 1 03 00 01 00 .dword $10003 +000FC4r 1 04 00 01 00 .dword $10004 +000FC8r 1 05 00 01 00 .dword $10005 +000FCCr 1 06 00 01 00 .dword $10006 +000FD0r 1 07 00 01 00 .dword $10007 +000FD4r 1 08 00 01 00 .dword $10008 +000FD8r 1 09 00 01 00 .dword $10009 +000FDCr 1 0A 00 01 00 .dword $1000a +000FE0r 1 0B 00 01 00 .dword $1000b +000FE4r 1 0C 00 01 00 .dword $1000c +000FE8r 1 0D 00 01 00 .dword $1000d +000FECr 1 0E 00 01 00 .dword $1000e +000FF0r 1 0F 00 01 00 .dword $1000f +000FF4r 1 F0 FF FF 7F .dword $7ffffff0 +000FF8r 1 F1 FF FF 7F .dword $7ffffff1 +000FFCr 1 F2 FF FF 7F .dword $7ffffff2 +001000r 1 F3 FF FF 7F .dword $7ffffff3 +001004r 1 F4 FF FF 7F .dword $7ffffff4 +001008r 1 F5 FF FF 7F .dword $7ffffff5 +00100Cr 1 F6 FF FF 7F .dword $7ffffff6 +001010r 1 F7 FF FF 7F .dword $7ffffff7 +001014r 1 F8 FF FF 7F .dword $7ffffff8 +001018r 1 F9 FF FF 7F .dword $7ffffff9 +00101Cr 1 FA FF FF 7F .dword $7ffffffa +001020r 1 FB FF FF 7F .dword $7ffffffb +001024r 1 FC FF FF 7F .dword $7ffffffc +001028r 1 FD FF FF 7F .dword $7ffffffd +00102Cr 1 FE FF FF 7F .dword $7ffffffe +001030r 1 FF FF FF 7F .dword $7fffffff +001034r 1 00 00 00 80 .dword $80000000 +001038r 1 01 00 00 80 .dword $80000001 +00103Cr 1 02 00 00 80 .dword $80000002 +001040r 1 03 00 00 80 .dword $80000003 +001044r 1 04 00 00 80 .dword $80000004 +001048r 1 05 00 00 80 .dword $80000005 +00104Cr 1 06 00 00 80 .dword $80000006 +001050r 1 07 00 00 80 .dword $80000007 +001054r 1 08 00 00 80 .dword $80000008 +001058r 1 09 00 00 80 .dword $80000009 +00105Cr 1 0A 00 00 80 .dword $8000000a +001060r 1 0B 00 00 80 .dword $8000000b +001064r 1 0C 00 00 80 .dword $8000000c +001068r 1 0D 00 00 80 .dword $8000000d +00106Cr 1 0E 00 00 80 .dword $8000000e +001070r 1 0F 00 00 80 .dword $8000000f +001074r 1 F0 FF FF 9F .dword $9ffffff0 +001078r 1 F1 FF FF 9F .dword $9ffffff1 +00107Cr 1 F2 FF FF 9F .dword $9ffffff2 +001080r 1 F3 FF FF 9F .dword $9ffffff3 +001084r 1 F4 FF FF 9F .dword $9ffffff4 +001088r 1 F5 FF FF 9F .dword $9ffffff5 +00108Cr 1 F6 FF FF 9F .dword $9ffffff6 +001090r 1 F7 FF FF 9F .dword $9ffffff7 +001094r 1 F8 FF FF 9F .dword $9ffffff8 +001098r 1 F9 FF FF 9F .dword $9ffffff9 +00109Cr 1 FA FF FF 9F .dword $9ffffffa +0010A0r 1 FB FF FF 9F .dword $9ffffffb +0010A4r 1 FC FF FF 9F .dword $9ffffffc +0010A8r 1 FD FF FF 9F .dword $9ffffffd +0010ACr 1 FE FF FF 9F .dword $9ffffffe +0010B0r 1 FF FF FF 9F .dword $9fffffff +0010B4r 1 00 00 00 A0 .dword $a0000000 +0010B8r 1 01 00 00 A0 .dword $a0000001 +0010BCr 1 02 00 00 A0 .dword $a0000002 +0010C0r 1 03 00 00 A0 .dword $a0000003 +0010C4r 1 04 00 00 A0 .dword $a0000004 +0010C8r 1 05 00 00 A0 .dword $a0000005 +0010CCr 1 06 00 00 A0 .dword $a0000006 +0010D0r 1 07 00 00 A0 .dword $a0000007 +0010D4r 1 08 00 00 A0 .dword $a0000008 +0010D8r 1 09 00 00 A0 .dword $a0000009 +0010DCr 1 0A 00 00 A0 .dword $a000000a +0010E0r 1 0B 00 00 A0 .dword $a000000b +0010E4r 1 0C 00 00 A0 .dword $a000000c +0010E8r 1 0D 00 00 A0 .dword $a000000d +0010ECr 1 0E 00 00 A0 .dword $a000000e +0010F0r 1 0F 00 00 A0 .dword $a000000f +0010F4r 1 F0 FF FF FF .dword $fffffff0 +0010F8r 1 F1 FF FF FF .dword $fffffff1 +0010FCr 1 F2 FF FF FF .dword $fffffff2 +001100r 1 F3 FF FF FF .dword $fffffff3 +001104r 1 F4 FF FF FF .dword $fffffff4 +001108r 1 F5 FF FF FF .dword $fffffff5 +00110Cr 1 F6 FF FF FF .dword $fffffff6 +001110r 1 F7 FF FF FF .dword $fffffff7 +001114r 1 F8 FF FF FF .dword $fffffff8 +001118r 1 F9 FF FF FF .dword $fffffff9 +00111Cr 1 FA FF FF FF .dword $fffffffa +001120r 1 FB FF FF FF .dword $fffffffb +001124r 1 FC FF FF FF .dword $fffffffc +001128r 1 FD FF FF FF .dword $fffffffd +00112Cr 1 FE FF FF FF .dword $fffffffe +001130r 1 FF FF FF FF .dword $ffffffff +001134r 1 +001134r 1 ; hex values, uppercase +001134r 1 00 00 00 00 .dword $0 +001138r 1 01 00 00 00 .dword $1 +00113Cr 1 02 00 00 00 .dword $2 +001140r 1 03 00 00 00 .dword $3 +001144r 1 04 00 00 00 .dword $4 +001148r 1 05 00 00 00 .dword $5 +00114Cr 1 06 00 00 00 .dword $6 +001150r 1 07 00 00 00 .dword $7 +001154r 1 08 00 00 00 .dword $8 +001158r 1 09 00 00 00 .dword $9 +00115Cr 1 0A 00 00 00 .dword $A +001160r 1 0B 00 00 00 .dword $B +001164r 1 0C 00 00 00 .dword $C +001168r 1 0D 00 00 00 .dword $D +00116Cr 1 0E 00 00 00 .dword $E +001170r 1 0F 00 00 00 .dword $F +001174r 1 10 00 00 00 .dword $10 +001178r 1 11 00 00 00 .dword $11 +00117Cr 1 12 00 00 00 .dword $12 +001180r 1 13 00 00 00 .dword $13 +001184r 1 70 00 00 00 .dword $70 +001188r 1 71 00 00 00 .dword $71 +00118Cr 1 72 00 00 00 .dword $72 +001190r 1 73 00 00 00 .dword $73 +001194r 1 74 00 00 00 .dword $74 +001198r 1 75 00 00 00 .dword $75 +00119Cr 1 76 00 00 00 .dword $76 +0011A0r 1 77 00 00 00 .dword $77 +0011A4r 1 78 00 00 00 .dword $78 +0011A8r 1 79 00 00 00 .dword $79 +0011ACr 1 7A 00 00 00 .dword $7A +0011B0r 1 7B 00 00 00 .dword $7B +0011B4r 1 7C 00 00 00 .dword $7C +0011B8r 1 7D 00 00 00 .dword $7D +0011BCr 1 7E 00 00 00 .dword $7E +0011C0r 1 7F 00 00 00 .dword $7F +0011C4r 1 80 00 00 00 .dword $80 +0011C8r 1 81 00 00 00 .dword $81 +0011CCr 1 82 00 00 00 .dword $82 +0011D0r 1 83 00 00 00 .dword $83 +0011D4r 1 84 00 00 00 .dword $84 +0011D8r 1 85 00 00 00 .dword $85 +0011DCr 1 86 00 00 00 .dword $86 +0011E0r 1 F0 00 00 00 .dword $F0 +0011E4r 1 F1 00 00 00 .dword $F1 +0011E8r 1 F2 00 00 00 .dword $F2 +0011ECr 1 F3 00 00 00 .dword $F3 +0011F0r 1 F4 00 00 00 .dword $F4 +0011F4r 1 F5 00 00 00 .dword $F5 +0011F8r 1 F6 00 00 00 .dword $F6 +0011FCr 1 F7 00 00 00 .dword $F7 +001200r 1 F8 00 00 00 .dword $F8 +001204r 1 F9 00 00 00 .dword $F9 +001208r 1 FA 00 00 00 .dword $FA +00120Cr 1 FB 00 00 00 .dword $FB +001210r 1 FC 00 00 00 .dword $FC +001214r 1 FD 00 00 00 .dword $FD +001218r 1 FE 00 00 00 .dword $FE +00121Cr 1 FF 00 00 00 .dword $FF +001220r 1 00 01 00 00 .dword $100 +001224r 1 01 01 00 00 .dword $101 +001228r 1 02 01 00 00 .dword $102 +00122Cr 1 03 01 00 00 .dword $103 +001230r 1 D2 0F 00 00 .dword $FD2 +001234r 1 D3 0F 00 00 .dword $FD3 +001238r 1 D4 0F 00 00 .dword $FD4 +00123Cr 1 D5 0F 00 00 .dword $FD5 +001240r 1 D6 0F 00 00 .dword $FD6 +001244r 1 D7 0F 00 00 .dword $FD7 +001248r 1 D8 0F 00 00 .dword $FD8 +00124Cr 1 D9 0F 00 00 .dword $FD9 +001250r 1 DA 0F 00 00 .dword $FDA +001254r 1 DB 0F 00 00 .dword $FDB +001258r 1 DC 0F 00 00 .dword $FDC +00125Cr 1 DD 0F 00 00 .dword $FDD +001260r 1 DE 0F 00 00 .dword $FDE +001264r 1 DF 0F 00 00 .dword $FDF +001268r 1 E0 0F 00 00 .dword $FE0 +00126Cr 1 E1 0F 00 00 .dword $FE1 +001270r 1 E2 0F 00 00 .dword $FE2 +001274r 1 E3 0F 00 00 .dword $FE3 +001278r 1 E4 0F 00 00 .dword $FE4 +00127Cr 1 E5 0F 00 00 .dword $FE5 +001280r 1 E6 0F 00 00 .dword $FE6 +001284r 1 E7 0F 00 00 .dword $FE7 +001288r 1 E8 0F 00 00 .dword $FE8 +00128Cr 1 E9 0F 00 00 .dword $FE9 +001290r 1 EA 0F 00 00 .dword $FEA +001294r 1 EB 0F 00 00 .dword $FEB +001298r 1 EC 0F 00 00 .dword $FEC +00129Cr 1 ED 0F 00 00 .dword $FED +0012A0r 1 EE 0F 00 00 .dword $FEE +0012A4r 1 EF 0F 00 00 .dword $FEF +0012A8r 1 F0 0F 00 00 .dword $FF0 +0012ACr 1 F1 0F 00 00 .dword $FF1 +0012B0r 1 F2 0F 00 00 .dword $FF2 +0012B4r 1 F3 0F 00 00 .dword $FF3 +0012B8r 1 F4 0F 00 00 .dword $FF4 +0012BCr 1 F5 0F 00 00 .dword $FF5 +0012C0r 1 F6 0F 00 00 .dword $FF6 +0012C4r 1 F7 0F 00 00 .dword $FF7 +0012C8r 1 F8 0F 00 00 .dword $FF8 +0012CCr 1 F9 0F 00 00 .dword $FF9 +0012D0r 1 FA 0F 00 00 .dword $FFA +0012D4r 1 FB 0F 00 00 .dword $FFB +0012D8r 1 FC 0F 00 00 .dword $FFC +0012DCr 1 FD 0F 00 00 .dword $FFD +0012E0r 1 FE 0F 00 00 .dword $FFE +0012E4r 1 FF 0F 00 00 .dword $FFF +0012E8r 1 00 10 00 00 .dword $1000 +0012ECr 1 01 10 00 00 .dword $1001 +0012F0r 1 02 10 00 00 .dword $1002 +0012F4r 1 03 10 00 00 .dword $1003 +0012F8r 1 04 10 00 00 .dword $1004 +0012FCr 1 05 10 00 00 .dword $1005 +001300r 1 06 10 00 00 .dword $1006 +001304r 1 07 10 00 00 .dword $1007 +001308r 1 08 10 00 00 .dword $1008 +00130Cr 1 F0 7F 00 00 .dword $7FF0 +001310r 1 F1 7F 00 00 .dword $7FF1 +001314r 1 F2 7F 00 00 .dword $7FF2 +001318r 1 F3 7F 00 00 .dword $7FF3 +00131Cr 1 F4 7F 00 00 .dword $7FF4 +001320r 1 F5 7F 00 00 .dword $7FF5 +001324r 1 F6 7F 00 00 .dword $7FF6 +001328r 1 F7 7F 00 00 .dword $7FF7 +00132Cr 1 F8 7F 00 00 .dword $7FF8 +001330r 1 F9 7F 00 00 .dword $7FF9 +001334r 1 FA 7F 00 00 .dword $7FFA +001338r 1 FB 7F 00 00 .dword $7FFB +00133Cr 1 FC 7F 00 00 .dword $7FFC +001340r 1 FD 7F 00 00 .dword $7FFD +001344r 1 FE 7F 00 00 .dword $7FFE +001348r 1 FF 7F 00 00 .dword $7FFF +00134Cr 1 00 80 00 00 .dword $8000 +001350r 1 01 80 00 00 .dword $8001 +001354r 1 02 80 00 00 .dword $8002 +001358r 1 03 80 00 00 .dword $8003 +00135Cr 1 04 80 00 00 .dword $8004 +001360r 1 05 80 00 00 .dword $8005 +001364r 1 06 80 00 00 .dword $8006 +001368r 1 07 80 00 00 .dword $8007 +00136Cr 1 08 80 00 00 .dword $8008 +001370r 1 09 80 00 00 .dword $8009 +001374r 1 0A 80 00 00 .dword $800A +001378r 1 0B 80 00 00 .dword $800B +00137Cr 1 E1 9F 00 00 .dword $9FE1 +001380r 1 E2 9F 00 00 .dword $9FE2 +001384r 1 E3 9F 00 00 .dword $9FE3 +001388r 1 E4 9F 00 00 .dword $9FE4 +00138Cr 1 E5 9F 00 00 .dword $9FE5 +001390r 1 E6 9F 00 00 .dword $9FE6 +001394r 1 E7 9F 00 00 .dword $9FE7 +001398r 1 E8 9F 00 00 .dword $9FE8 +00139Cr 1 E9 9F 00 00 .dword $9FE9 +0013A0r 1 EA 9F 00 00 .dword $9FEA +0013A4r 1 EB 9F 00 00 .dword $9FEB +0013A8r 1 EC 9F 00 00 .dword $9FEC +0013ACr 1 ED 9F 00 00 .dword $9FED +0013B0r 1 EE 9F 00 00 .dword $9FEE +0013B4r 1 EF 9F 00 00 .dword $9FEF +0013B8r 1 F0 9F 00 00 .dword $9FF0 +0013BCr 1 F1 9F 00 00 .dword $9FF1 +0013C0r 1 F2 9F 00 00 .dword $9FF2 +0013C4r 1 F3 9F 00 00 .dword $9FF3 +0013C8r 1 F4 9F 00 00 .dword $9FF4 +0013CCr 1 F5 9F 00 00 .dword $9FF5 +0013D0r 1 F6 9F 00 00 .dword $9FF6 +0013D4r 1 F7 9F 00 00 .dword $9FF7 +0013D8r 1 F8 9F 00 00 .dword $9FF8 +0013DCr 1 F9 9F 00 00 .dword $9FF9 +0013E0r 1 FA 9F 00 00 .dword $9FFA +0013E4r 1 FB 9F 00 00 .dword $9FFB +0013E8r 1 FC 9F 00 00 .dword $9FFC +0013ECr 1 FD 9F 00 00 .dword $9FFD +0013F0r 1 FE 9F 00 00 .dword $9FFE +0013F4r 1 FF 9F 00 00 .dword $9FFF +0013F8r 1 00 A0 00 00 .dword $A000 +0013FCr 1 01 A0 00 00 .dword $A001 +001400r 1 02 A0 00 00 .dword $A002 +001404r 1 03 A0 00 00 .dword $A003 +001408r 1 04 A0 00 00 .dword $A004 +00140Cr 1 05 A0 00 00 .dword $A005 +001410r 1 06 A0 00 00 .dword $A006 +001414r 1 07 A0 00 00 .dword $A007 +001418r 1 08 A0 00 00 .dword $A008 +00141Cr 1 09 A0 00 00 .dword $A009 +001420r 1 0A A0 00 00 .dword $A00A +001424r 1 0B A0 00 00 .dword $A00B +001428r 1 0C A0 00 00 .dword $A00C +00142Cr 1 0D A0 00 00 .dword $A00D +001430r 1 0E A0 00 00 .dword $A00E +001434r 1 0F A0 00 00 .dword $A00F +001438r 1 E1 AF 00 00 .dword $AFE1 +00143Cr 1 E2 AF 00 00 .dword $AFE2 +001440r 1 E3 AF 00 00 .dword $AFE3 +001444r 1 E4 AF 00 00 .dword $AFE4 +001448r 1 E5 AF 00 00 .dword $AFE5 +00144Cr 1 E6 AF 00 00 .dword $AFE6 +001450r 1 E7 AF 00 00 .dword $AFE7 +001454r 1 E8 AF 00 00 .dword $AFE8 +001458r 1 E9 AF 00 00 .dword $AFE9 +00145Cr 1 EA AF 00 00 .dword $AFEA +001460r 1 EB AF 00 00 .dword $AFEB +001464r 1 EC AF 00 00 .dword $AFEC +001468r 1 ED AF 00 00 .dword $AFED +00146Cr 1 EE AF 00 00 .dword $AFEE +001470r 1 EF AF 00 00 .dword $AFEF +001474r 1 F0 AF 00 00 .dword $AFF0 +001478r 1 F1 AF 00 00 .dword $AFF1 +00147Cr 1 F2 AF 00 00 .dword $AFF2 +001480r 1 F3 AF 00 00 .dword $AFF3 +001484r 1 F4 AF 00 00 .dword $AFF4 +001488r 1 F5 AF 00 00 .dword $AFF5 +00148Cr 1 F6 AF 00 00 .dword $AFF6 +001490r 1 F7 AF 00 00 .dword $AFF7 +001494r 1 F8 AF 00 00 .dword $AFF8 +001498r 1 F9 AF 00 00 .dword $AFF9 +00149Cr 1 FA AF 00 00 .dword $AFFA +0014A0r 1 FB AF 00 00 .dword $AFFB +0014A4r 1 FC AF 00 00 .dword $AFFC +0014A8r 1 FD AF 00 00 .dword $AFFD +0014ACr 1 FE AF 00 00 .dword $AFFE +0014B0r 1 FF AF 00 00 .dword $AFFF +0014B4r 1 00 B0 00 00 .dword $B000 +0014B8r 1 01 B0 00 00 .dword $B001 +0014BCr 1 02 B0 00 00 .dword $B002 +0014C0r 1 03 B0 00 00 .dword $B003 +0014C4r 1 04 B0 00 00 .dword $B004 +0014C8r 1 05 B0 00 00 .dword $B005 +0014CCr 1 06 B0 00 00 .dword $B006 +0014D0r 1 07 B0 00 00 .dword $B007 +0014D4r 1 08 B0 00 00 .dword $B008 +0014D8r 1 09 B0 00 00 .dword $B009 +0014DCr 1 0A B0 00 00 .dword $B00A +0014E0r 1 0B B0 00 00 .dword $B00B +0014E4r 1 0C B0 00 00 .dword $B00C +0014E8r 1 0D B0 00 00 .dword $B00D +0014ECr 1 0E B0 00 00 .dword $B00E +0014F0r 1 0F B0 00 00 .dword $B00F +0014F4r 1 E1 FF 00 00 .dword $FFE1 +0014F8r 1 E2 FF 00 00 .dword $FFE2 +0014FCr 1 E3 FF 00 00 .dword $FFE3 +001500r 1 E4 FF 00 00 .dword $FFE4 +001504r 1 E5 FF 00 00 .dword $FFE5 +001508r 1 E6 FF 00 00 .dword $FFE6 +00150Cr 1 E7 FF 00 00 .dword $FFE7 +001510r 1 E8 FF 00 00 .dword $FFE8 +001514r 1 E9 FF 00 00 .dword $FFE9 +001518r 1 EA FF 00 00 .dword $FFEA +00151Cr 1 EB FF 00 00 .dword $FFEB +001520r 1 EC FF 00 00 .dword $FFEC +001524r 1 ED FF 00 00 .dword $FFED +001528r 1 EE FF 00 00 .dword $FFEE +00152Cr 1 EF FF 00 00 .dword $FFEF +001530r 1 F0 FF 00 00 .dword $FFF0 +001534r 1 F1 FF 00 00 .dword $FFF1 +001538r 1 F2 FF 00 00 .dword $FFF2 +00153Cr 1 F3 FF 00 00 .dword $FFF3 +001540r 1 F4 FF 00 00 .dword $FFF4 +001544r 1 F5 FF 00 00 .dword $FFF5 +001548r 1 F6 FF 00 00 .dword $FFF6 +00154Cr 1 F7 FF 00 00 .dword $FFF7 +001550r 1 F8 FF 00 00 .dword $FFF8 +001554r 1 F9 FF 00 00 .dword $FFF9 +001558r 1 FA FF 00 00 .dword $FFFA +00155Cr 1 FB FF 00 00 .dword $FFFB +001560r 1 FC FF 00 00 .dword $FFFC +001564r 1 FD FF 00 00 .dword $FFFD +001568r 1 FE FF 00 00 .dword $FFFE +00156Cr 1 FF FF 00 00 .dword $FFFF +001570r 1 00 00 01 00 .dword $10000 +001574r 1 01 00 01 00 .dword $10001 +001578r 1 02 00 01 00 .dword $10002 +00157Cr 1 03 00 01 00 .dword $10003 +001580r 1 04 00 01 00 .dword $10004 +001584r 1 05 00 01 00 .dword $10005 +001588r 1 06 00 01 00 .dword $10006 +00158Cr 1 07 00 01 00 .dword $10007 +001590r 1 08 00 01 00 .dword $10008 +001594r 1 09 00 01 00 .dword $10009 +001598r 1 0A 00 01 00 .dword $1000A +00159Cr 1 0B 00 01 00 .dword $1000B +0015A0r 1 0C 00 01 00 .dword $1000C +0015A4r 1 0D 00 01 00 .dword $1000D +0015A8r 1 0E 00 01 00 .dword $1000E +0015ACr 1 0F 00 01 00 .dword $1000F +0015B0r 1 F0 FF FF 7F .dword $7FFFFFF0 +0015B4r 1 F1 FF FF 7F .dword $7FFFFFF1 +0015B8r 1 F2 FF FF 7F .dword $7FFFFFF2 +0015BCr 1 F3 FF FF 7F .dword $7FFFFFF3 +0015C0r 1 F4 FF FF 7F .dword $7FFFFFF4 +0015C4r 1 F5 FF FF 7F .dword $7FFFFFF5 +0015C8r 1 F6 FF FF 7F .dword $7FFFFFF6 +0015CCr 1 F7 FF FF 7F .dword $7FFFFFF7 +0015D0r 1 F8 FF FF 7F .dword $7FFFFFF8 +0015D4r 1 F9 FF FF 7F .dword $7FFFFFF9 +0015D8r 1 FA FF FF 7F .dword $7FFFFFFA +0015DCr 1 FB FF FF 7F .dword $7FFFFFFB +0015E0r 1 FC FF FF 7F .dword $7FFFFFFC +0015E4r 1 FD FF FF 7F .dword $7FFFFFFD +0015E8r 1 FE FF FF 7F .dword $7FFFFFFE +0015ECr 1 FF FF FF 7F .dword $7FFFFFFF +0015F0r 1 00 00 00 80 .dword $80000000 +0015F4r 1 01 00 00 80 .dword $80000001 +0015F8r 1 02 00 00 80 .dword $80000002 +0015FCr 1 03 00 00 80 .dword $80000003 +001600r 1 04 00 00 80 .dword $80000004 +001604r 1 05 00 00 80 .dword $80000005 +001608r 1 06 00 00 80 .dword $80000006 +00160Cr 1 07 00 00 80 .dword $80000007 +001610r 1 08 00 00 80 .dword $80000008 +001614r 1 09 00 00 80 .dword $80000009 +001618r 1 0A 00 00 80 .dword $8000000A +00161Cr 1 0B 00 00 80 .dword $8000000B +001620r 1 0C 00 00 80 .dword $8000000C +001624r 1 0D 00 00 80 .dword $8000000D +001628r 1 0E 00 00 80 .dword $8000000E +00162Cr 1 0F 00 00 80 .dword $8000000F +001630r 1 F0 FF FF 9F .dword $9FFFFFF0 +001634r 1 F1 FF FF 9F .dword $9FFFFFF1 +001638r 1 F2 FF FF 9F .dword $9FFFFFF2 +00163Cr 1 F3 FF FF 9F .dword $9FFFFFF3 +001640r 1 F4 FF FF 9F .dword $9FFFFFF4 +001644r 1 F5 FF FF 9F .dword $9FFFFFF5 +001648r 1 F6 FF FF 9F .dword $9FFFFFF6 +00164Cr 1 F7 FF FF 9F .dword $9FFFFFF7 +001650r 1 F8 FF FF 9F .dword $9FFFFFF8 +001654r 1 F9 FF FF 9F .dword $9FFFFFF9 +001658r 1 FA FF FF 9F .dword $9FFFFFFA +00165Cr 1 FB FF FF 9F .dword $9FFFFFFB +001660r 1 FC FF FF 9F .dword $9FFFFFFC +001664r 1 FD FF FF 9F .dword $9FFFFFFD +001668r 1 FE FF FF 9F .dword $9FFFFFFE +00166Cr 1 FF FF FF 9F .dword $9FFFFFFF +001670r 1 00 00 00 A0 .dword $A0000000 +001674r 1 01 00 00 A0 .dword $A0000001 +001678r 1 02 00 00 A0 .dword $A0000002 +00167Cr 1 03 00 00 A0 .dword $A0000003 +001680r 1 04 00 00 A0 .dword $A0000004 +001684r 1 05 00 00 A0 .dword $A0000005 +001688r 1 06 00 00 A0 .dword $A0000006 +00168Cr 1 07 00 00 A0 .dword $A0000007 +001690r 1 08 00 00 A0 .dword $A0000008 +001694r 1 09 00 00 A0 .dword $A0000009 +001698r 1 0A 00 00 A0 .dword $A000000A +00169Cr 1 0B 00 00 A0 .dword $A000000B +0016A0r 1 0C 00 00 A0 .dword $A000000C +0016A4r 1 0D 00 00 A0 .dword $A000000D +0016A8r 1 0E 00 00 A0 .dword $A000000E +0016ACr 1 0F 00 00 A0 .dword $A000000F +0016B0r 1 F0 FF FF FF .dword $FFFFFFF0 +0016B4r 1 F1 FF FF FF .dword $FFFFFFF1 +0016B8r 1 F2 FF FF FF .dword $FFFFFFF2 +0016BCr 1 F3 FF FF FF .dword $FFFFFFF3 +0016C0r 1 F4 FF FF FF .dword $FFFFFFF4 +0016C4r 1 F5 FF FF FF .dword $FFFFFFF5 +0016C8r 1 F6 FF FF FF .dword $FFFFFFF6 +0016CCr 1 F7 FF FF FF .dword $FFFFFFF7 +0016D0r 1 F8 FF FF FF .dword $FFFFFFF8 +0016D4r 1 F9 FF FF FF .dword $FFFFFFF9 +0016D8r 1 FA FF FF FF .dword $FFFFFFFA +0016DCr 1 FB FF FF FF .dword $FFFFFFFB +0016E0r 1 FC FF FF FF .dword $FFFFFFFC +0016E4r 1 FD FF FF FF .dword $FFFFFFFD +0016E8r 1 FE FF FF FF .dword $FFFFFFFE +0016ECr 1 FF FF FF FF .dword $FFFFFFFF +0016F0r 1 +0016F0r 1 ; 8-digit hex values +0016F0r 1 00 00 00 00 .dword $00000000 +0016F4r 1 01 00 00 00 .dword $00000001 +0016F8r 1 02 00 00 00 .dword $00000002 +0016FCr 1 03 00 00 00 .dword $00000003 +001700r 1 04 00 00 00 .dword $00000004 +001704r 1 05 00 00 00 .dword $00000005 +001708r 1 06 00 00 00 .dword $00000006 +00170Cr 1 07 00 00 00 .dword $00000007 +001710r 1 08 00 00 00 .dword $00000008 +001714r 1 09 00 00 00 .dword $00000009 +001718r 1 0A 00 00 00 .dword $0000000a +00171Cr 1 0B 00 00 00 .dword $0000000b +001720r 1 0C 00 00 00 .dword $0000000c +001724r 1 0D 00 00 00 .dword $0000000d +001728r 1 0E 00 00 00 .dword $0000000e +00172Cr 1 0F 00 00 00 .dword $0000000f +001730r 1 10 00 00 00 .dword $00000010 +001734r 1 11 00 00 00 .dword $00000011 +001738r 1 12 00 00 00 .dword $00000012 +00173Cr 1 13 00 00 00 .dword $00000013 +001740r 1 70 00 00 00 .dword $00000070 +001744r 1 71 00 00 00 .dword $00000071 +001748r 1 72 00 00 00 .dword $00000072 +00174Cr 1 73 00 00 00 .dword $00000073 +001750r 1 74 00 00 00 .dword $00000074 +001754r 1 75 00 00 00 .dword $00000075 +001758r 1 76 00 00 00 .dword $00000076 +00175Cr 1 77 00 00 00 .dword $00000077 +001760r 1 78 00 00 00 .dword $00000078 +001764r 1 79 00 00 00 .dword $00000079 +001768r 1 7A 00 00 00 .dword $0000007a +00176Cr 1 7B 00 00 00 .dword $0000007b +001770r 1 7C 00 00 00 .dword $0000007c +001774r 1 7D 00 00 00 .dword $0000007d +001778r 1 7E 00 00 00 .dword $0000007e +00177Cr 1 7F 00 00 00 .dword $0000007f +001780r 1 80 00 00 00 .dword $00000080 +001784r 1 81 00 00 00 .dword $00000081 +001788r 1 82 00 00 00 .dword $00000082 +00178Cr 1 83 00 00 00 .dword $00000083 +001790r 1 84 00 00 00 .dword $00000084 +001794r 1 85 00 00 00 .dword $00000085 +001798r 1 86 00 00 00 .dword $00000086 +00179Cr 1 F0 00 00 00 .dword $000000f0 +0017A0r 1 F1 00 00 00 .dword $000000f1 +0017A4r 1 F2 00 00 00 .dword $000000f2 +0017A8r 1 F3 00 00 00 .dword $000000f3 +0017ACr 1 F4 00 00 00 .dword $000000f4 +0017B0r 1 F5 00 00 00 .dword $000000f5 +0017B4r 1 F6 00 00 00 .dword $000000f6 +0017B8r 1 F7 00 00 00 .dword $000000f7 +0017BCr 1 F8 00 00 00 .dword $000000f8 +0017C0r 1 F9 00 00 00 .dword $000000f9 +0017C4r 1 FA 00 00 00 .dword $000000fa +0017C8r 1 FB 00 00 00 .dword $000000fb +0017CCr 1 FC 00 00 00 .dword $000000fc +0017D0r 1 FD 00 00 00 .dword $000000fd +0017D4r 1 FE 00 00 00 .dword $000000fe +0017D8r 1 FF 00 00 00 .dword $000000ff +0017DCr 1 00 01 00 00 .dword $00000100 +0017E0r 1 01 01 00 00 .dword $00000101 +0017E4r 1 02 01 00 00 .dword $00000102 +0017E8r 1 03 01 00 00 .dword $00000103 +0017ECr 1 D2 0F 00 00 .dword $00000fd2 +0017F0r 1 D3 0F 00 00 .dword $00000fd3 +0017F4r 1 D4 0F 00 00 .dword $00000fd4 +0017F8r 1 D5 0F 00 00 .dword $00000fd5 +0017FCr 1 D6 0F 00 00 .dword $00000fd6 +001800r 1 D7 0F 00 00 .dword $00000fd7 +001804r 1 D8 0F 00 00 .dword $00000fd8 +001808r 1 D9 0F 00 00 .dword $00000fd9 +00180Cr 1 DA 0F 00 00 .dword $00000fda +001810r 1 DB 0F 00 00 .dword $00000fdb +001814r 1 DC 0F 00 00 .dword $00000fdc +001818r 1 DD 0F 00 00 .dword $00000fdd +00181Cr 1 DE 0F 00 00 .dword $00000fde +001820r 1 DF 0F 00 00 .dword $00000fdf +001824r 1 E0 0F 00 00 .dword $00000fe0 +001828r 1 E1 0F 00 00 .dword $00000fe1 +00182Cr 1 E2 0F 00 00 .dword $00000fe2 +001830r 1 E3 0F 00 00 .dword $00000fe3 +001834r 1 E4 0F 00 00 .dword $00000fe4 +001838r 1 E5 0F 00 00 .dword $00000fe5 +00183Cr 1 E6 0F 00 00 .dword $00000fe6 +001840r 1 E7 0F 00 00 .dword $00000fe7 +001844r 1 E8 0F 00 00 .dword $00000fe8 +001848r 1 E9 0F 00 00 .dword $00000fe9 +00184Cr 1 EA 0F 00 00 .dword $00000fea +001850r 1 EB 0F 00 00 .dword $00000feb +001854r 1 EC 0F 00 00 .dword $00000fec +001858r 1 ED 0F 00 00 .dword $00000fed +00185Cr 1 EE 0F 00 00 .dword $00000fee +001860r 1 EF 0F 00 00 .dword $00000fef +001864r 1 F0 0F 00 00 .dword $00000ff0 +001868r 1 F1 0F 00 00 .dword $00000ff1 +00186Cr 1 F2 0F 00 00 .dword $00000ff2 +001870r 1 F3 0F 00 00 .dword $00000ff3 +001874r 1 F4 0F 00 00 .dword $00000ff4 +001878r 1 F5 0F 00 00 .dword $00000ff5 +00187Cr 1 F6 0F 00 00 .dword $00000ff6 +001880r 1 F7 0F 00 00 .dword $00000ff7 +001884r 1 F8 0F 00 00 .dword $00000ff8 +001888r 1 F9 0F 00 00 .dword $00000ff9 +00188Cr 1 FA 0F 00 00 .dword $00000ffa +001890r 1 FB 0F 00 00 .dword $00000ffb +001894r 1 FC 0F 00 00 .dword $00000ffc +001898r 1 FD 0F 00 00 .dword $00000ffd +00189Cr 1 FE 0F 00 00 .dword $00000ffe +0018A0r 1 FF 0F 00 00 .dword $00000fff +0018A4r 1 00 10 00 00 .dword $00001000 +0018A8r 1 01 10 00 00 .dword $00001001 +0018ACr 1 02 10 00 00 .dword $00001002 +0018B0r 1 03 10 00 00 .dword $00001003 +0018B4r 1 04 10 00 00 .dword $00001004 +0018B8r 1 05 10 00 00 .dword $00001005 +0018BCr 1 06 10 00 00 .dword $00001006 +0018C0r 1 07 10 00 00 .dword $00001007 +0018C4r 1 08 10 00 00 .dword $00001008 +0018C8r 1 F0 7F 00 00 .dword $00007ff0 +0018CCr 1 F1 7F 00 00 .dword $00007ff1 +0018D0r 1 F2 7F 00 00 .dword $00007ff2 +0018D4r 1 F3 7F 00 00 .dword $00007ff3 +0018D8r 1 F4 7F 00 00 .dword $00007ff4 +0018DCr 1 F5 7F 00 00 .dword $00007ff5 +0018E0r 1 F6 7F 00 00 .dword $00007ff6 +0018E4r 1 F7 7F 00 00 .dword $00007ff7 +0018E8r 1 F8 7F 00 00 .dword $00007ff8 +0018ECr 1 F9 7F 00 00 .dword $00007ff9 +0018F0r 1 FA 7F 00 00 .dword $00007ffa +0018F4r 1 FB 7F 00 00 .dword $00007ffb +0018F8r 1 FC 7F 00 00 .dword $00007ffc +0018FCr 1 FD 7F 00 00 .dword $00007ffd +001900r 1 FE 7F 00 00 .dword $00007ffe +001904r 1 FF 7F 00 00 .dword $00007fff +001908r 1 00 80 00 00 .dword $00008000 +00190Cr 1 01 80 00 00 .dword $00008001 +001910r 1 02 80 00 00 .dword $00008002 +001914r 1 03 80 00 00 .dword $00008003 +001918r 1 04 80 00 00 .dword $00008004 +00191Cr 1 05 80 00 00 .dword $00008005 +001920r 1 06 80 00 00 .dword $00008006 +001924r 1 07 80 00 00 .dword $00008007 +001928r 1 08 80 00 00 .dword $00008008 +00192Cr 1 09 80 00 00 .dword $00008009 +001930r 1 0A 80 00 00 .dword $0000800a +001934r 1 0B 80 00 00 .dword $0000800b +001938r 1 E1 9F 00 00 .dword $00009fe1 +00193Cr 1 E2 9F 00 00 .dword $00009fe2 +001940r 1 E3 9F 00 00 .dword $00009fe3 +001944r 1 E4 9F 00 00 .dword $00009fe4 +001948r 1 E5 9F 00 00 .dword $00009fe5 +00194Cr 1 E6 9F 00 00 .dword $00009fe6 +001950r 1 E7 9F 00 00 .dword $00009fe7 +001954r 1 E8 9F 00 00 .dword $00009fe8 +001958r 1 E9 9F 00 00 .dword $00009fe9 +00195Cr 1 EA 9F 00 00 .dword $00009fea +001960r 1 EB 9F 00 00 .dword $00009feb +001964r 1 EC 9F 00 00 .dword $00009fec +001968r 1 ED 9F 00 00 .dword $00009fed +00196Cr 1 EE 9F 00 00 .dword $00009fee +001970r 1 EF 9F 00 00 .dword $00009fef +001974r 1 F0 9F 00 00 .dword $00009ff0 +001978r 1 F1 9F 00 00 .dword $00009ff1 +00197Cr 1 F2 9F 00 00 .dword $00009ff2 +001980r 1 F3 9F 00 00 .dword $00009ff3 +001984r 1 F4 9F 00 00 .dword $00009ff4 +001988r 1 F5 9F 00 00 .dword $00009ff5 +00198Cr 1 F6 9F 00 00 .dword $00009ff6 +001990r 1 F7 9F 00 00 .dword $00009ff7 +001994r 1 F8 9F 00 00 .dword $00009ff8 +001998r 1 F9 9F 00 00 .dword $00009ff9 +00199Cr 1 FA 9F 00 00 .dword $00009ffa +0019A0r 1 FB 9F 00 00 .dword $00009ffb +0019A4r 1 FC 9F 00 00 .dword $00009ffc +0019A8r 1 FD 9F 00 00 .dword $00009ffd +0019ACr 1 FE 9F 00 00 .dword $00009ffe +0019B0r 1 FF 9F 00 00 .dword $00009fff +0019B4r 1 00 A0 00 00 .dword $0000a000 +0019B8r 1 01 A0 00 00 .dword $0000a001 +0019BCr 1 02 A0 00 00 .dword $0000a002 +0019C0r 1 03 A0 00 00 .dword $0000a003 +0019C4r 1 04 A0 00 00 .dword $0000a004 +0019C8r 1 05 A0 00 00 .dword $0000a005 +0019CCr 1 06 A0 00 00 .dword $0000a006 +0019D0r 1 07 A0 00 00 .dword $0000a007 +0019D4r 1 08 A0 00 00 .dword $0000a008 +0019D8r 1 09 A0 00 00 .dword $0000a009 +0019DCr 1 0A A0 00 00 .dword $0000a00a +0019E0r 1 0B A0 00 00 .dword $0000a00b +0019E4r 1 0C A0 00 00 .dword $0000a00c +0019E8r 1 0D A0 00 00 .dword $0000a00d +0019ECr 1 0E A0 00 00 .dword $0000a00e +0019F0r 1 0F A0 00 00 .dword $0000a00f +0019F4r 1 E1 AF 00 00 .dword $0000afe1 +0019F8r 1 E2 AF 00 00 .dword $0000afe2 +0019FCr 1 E3 AF 00 00 .dword $0000afe3 +001A00r 1 E4 AF 00 00 .dword $0000afe4 +001A04r 1 E5 AF 00 00 .dword $0000afe5 +001A08r 1 E6 AF 00 00 .dword $0000afe6 +001A0Cr 1 E7 AF 00 00 .dword $0000afe7 +001A10r 1 E8 AF 00 00 .dword $0000afe8 +001A14r 1 E9 AF 00 00 .dword $0000afe9 +001A18r 1 EA AF 00 00 .dword $0000afea +001A1Cr 1 EB AF 00 00 .dword $0000afeb +001A20r 1 EC AF 00 00 .dword $0000afec +001A24r 1 ED AF 00 00 .dword $0000afed +001A28r 1 EE AF 00 00 .dword $0000afee +001A2Cr 1 EF AF 00 00 .dword $0000afef +001A30r 1 F0 AF 00 00 .dword $0000aff0 +001A34r 1 F1 AF 00 00 .dword $0000aff1 +001A38r 1 F2 AF 00 00 .dword $0000aff2 +001A3Cr 1 F3 AF 00 00 .dword $0000aff3 +001A40r 1 F4 AF 00 00 .dword $0000aff4 +001A44r 1 F5 AF 00 00 .dword $0000aff5 +001A48r 1 F6 AF 00 00 .dword $0000aff6 +001A4Cr 1 F7 AF 00 00 .dword $0000aff7 +001A50r 1 F8 AF 00 00 .dword $0000aff8 +001A54r 1 F9 AF 00 00 .dword $0000aff9 +001A58r 1 FA AF 00 00 .dword $0000affa +001A5Cr 1 FB AF 00 00 .dword $0000affb +001A60r 1 FC AF 00 00 .dword $0000affc +001A64r 1 FD AF 00 00 .dword $0000affd +001A68r 1 FE AF 00 00 .dword $0000affe +001A6Cr 1 FF AF 00 00 .dword $0000afff +001A70r 1 00 B0 00 00 .dword $0000b000 +001A74r 1 01 B0 00 00 .dword $0000b001 +001A78r 1 02 B0 00 00 .dword $0000b002 +001A7Cr 1 03 B0 00 00 .dword $0000b003 +001A80r 1 04 B0 00 00 .dword $0000b004 +001A84r 1 05 B0 00 00 .dword $0000b005 +001A88r 1 06 B0 00 00 .dword $0000b006 +001A8Cr 1 07 B0 00 00 .dword $0000b007 +001A90r 1 08 B0 00 00 .dword $0000b008 +001A94r 1 09 B0 00 00 .dword $0000b009 +001A98r 1 0A B0 00 00 .dword $0000b00a +001A9Cr 1 0B B0 00 00 .dword $0000b00b +001AA0r 1 0C B0 00 00 .dword $0000b00c +001AA4r 1 0D B0 00 00 .dword $0000b00d +001AA8r 1 0E B0 00 00 .dword $0000b00e +001AACr 1 0F B0 00 00 .dword $0000b00f +001AB0r 1 E1 FF 00 00 .dword $0000ffe1 +001AB4r 1 E2 FF 00 00 .dword $0000ffe2 +001AB8r 1 E3 FF 00 00 .dword $0000ffe3 +001ABCr 1 E4 FF 00 00 .dword $0000ffe4 +001AC0r 1 E5 FF 00 00 .dword $0000ffe5 +001AC4r 1 E6 FF 00 00 .dword $0000ffe6 +001AC8r 1 E7 FF 00 00 .dword $0000ffe7 +001ACCr 1 E8 FF 00 00 .dword $0000ffe8 +001AD0r 1 E9 FF 00 00 .dword $0000ffe9 +001AD4r 1 EA FF 00 00 .dword $0000ffea +001AD8r 1 EB FF 00 00 .dword $0000ffeb +001ADCr 1 EC FF 00 00 .dword $0000ffec +001AE0r 1 ED FF 00 00 .dword $0000ffed +001AE4r 1 EE FF 00 00 .dword $0000ffee +001AE8r 1 EF FF 00 00 .dword $0000ffef +001AECr 1 F0 FF 00 00 .dword $0000fff0 +001AF0r 1 F1 FF 00 00 .dword $0000fff1 +001AF4r 1 F2 FF 00 00 .dword $0000fff2 +001AF8r 1 F3 FF 00 00 .dword $0000fff3 +001AFCr 1 F4 FF 00 00 .dword $0000fff4 +001B00r 1 F5 FF 00 00 .dword $0000fff5 +001B04r 1 F6 FF 00 00 .dword $0000fff6 +001B08r 1 F7 FF 00 00 .dword $0000fff7 +001B0Cr 1 F8 FF 00 00 .dword $0000fff8 +001B10r 1 F9 FF 00 00 .dword $0000fff9 +001B14r 1 FA FF 00 00 .dword $0000fffa +001B18r 1 FB FF 00 00 .dword $0000fffb +001B1Cr 1 FC FF 00 00 .dword $0000fffc +001B20r 1 FD FF 00 00 .dword $0000fffd +001B24r 1 FE FF 00 00 .dword $0000fffe +001B28r 1 FF FF 00 00 .dword $0000ffff +001B2Cr 1 00 00 01 00 .dword $00010000 +001B30r 1 01 00 01 00 .dword $00010001 +001B34r 1 02 00 01 00 .dword $00010002 +001B38r 1 03 00 01 00 .dword $00010003 +001B3Cr 1 04 00 01 00 .dword $00010004 +001B40r 1 05 00 01 00 .dword $00010005 +001B44r 1 06 00 01 00 .dword $00010006 +001B48r 1 07 00 01 00 .dword $00010007 +001B4Cr 1 08 00 01 00 .dword $00010008 +001B50r 1 09 00 01 00 .dword $00010009 +001B54r 1 0A 00 01 00 .dword $0001000a +001B58r 1 0B 00 01 00 .dword $0001000b +001B5Cr 1 0C 00 01 00 .dword $0001000c +001B60r 1 0D 00 01 00 .dword $0001000d +001B64r 1 0E 00 01 00 .dword $0001000e +001B68r 1 0F 00 01 00 .dword $0001000f +001B6Cr 1 F0 FF FF 7F .dword $7ffffff0 +001B70r 1 F1 FF FF 7F .dword $7ffffff1 +001B74r 1 F2 FF FF 7F .dword $7ffffff2 +001B78r 1 F3 FF FF 7F .dword $7ffffff3 +001B7Cr 1 F4 FF FF 7F .dword $7ffffff4 +001B80r 1 F5 FF FF 7F .dword $7ffffff5 +001B84r 1 F6 FF FF 7F .dword $7ffffff6 +001B88r 1 F7 FF FF 7F .dword $7ffffff7 +001B8Cr 1 F8 FF FF 7F .dword $7ffffff8 +001B90r 1 F9 FF FF 7F .dword $7ffffff9 +001B94r 1 FA FF FF 7F .dword $7ffffffa +001B98r 1 FB FF FF 7F .dword $7ffffffb +001B9Cr 1 FC FF FF 7F .dword $7ffffffc +001BA0r 1 FD FF FF 7F .dword $7ffffffd +001BA4r 1 FE FF FF 7F .dword $7ffffffe +001BA8r 1 FF FF FF 7F .dword $7fffffff +001BACr 1 00 00 00 80 .dword $80000000 +001BB0r 1 01 00 00 80 .dword $80000001 +001BB4r 1 02 00 00 80 .dword $80000002 +001BB8r 1 03 00 00 80 .dword $80000003 +001BBCr 1 04 00 00 80 .dword $80000004 +001BC0r 1 05 00 00 80 .dword $80000005 +001BC4r 1 06 00 00 80 .dword $80000006 +001BC8r 1 07 00 00 80 .dword $80000007 +001BCCr 1 08 00 00 80 .dword $80000008 +001BD0r 1 09 00 00 80 .dword $80000009 +001BD4r 1 0A 00 00 80 .dword $8000000a +001BD8r 1 0B 00 00 80 .dword $8000000b +001BDCr 1 0C 00 00 80 .dword $8000000c +001BE0r 1 0D 00 00 80 .dword $8000000d +001BE4r 1 0E 00 00 80 .dword $8000000e +001BE8r 1 0F 00 00 80 .dword $8000000f +001BECr 1 F0 FF FF 9F .dword $9ffffff0 +001BF0r 1 F1 FF FF 9F .dword $9ffffff1 +001BF4r 1 F2 FF FF 9F .dword $9ffffff2 +001BF8r 1 F3 FF FF 9F .dword $9ffffff3 +001BFCr 1 F4 FF FF 9F .dword $9ffffff4 +001C00r 1 F5 FF FF 9F .dword $9ffffff5 +001C04r 1 F6 FF FF 9F .dword $9ffffff6 +001C08r 1 F7 FF FF 9F .dword $9ffffff7 +001C0Cr 1 F8 FF FF 9F .dword $9ffffff8 +001C10r 1 F9 FF FF 9F .dword $9ffffff9 +001C14r 1 FA FF FF 9F .dword $9ffffffa +001C18r 1 FB FF FF 9F .dword $9ffffffb +001C1Cr 1 FC FF FF 9F .dword $9ffffffc +001C20r 1 FD FF FF 9F .dword $9ffffffd +001C24r 1 FE FF FF 9F .dword $9ffffffe +001C28r 1 FF FF FF 9F .dword $9fffffff +001C2Cr 1 00 00 00 A0 .dword $a0000000 +001C30r 1 01 00 00 A0 .dword $a0000001 +001C34r 1 02 00 00 A0 .dword $a0000002 +001C38r 1 03 00 00 A0 .dword $a0000003 +001C3Cr 1 04 00 00 A0 .dword $a0000004 +001C40r 1 05 00 00 A0 .dword $a0000005 +001C44r 1 06 00 00 A0 .dword $a0000006 +001C48r 1 07 00 00 A0 .dword $a0000007 +001C4Cr 1 08 00 00 A0 .dword $a0000008 +001C50r 1 09 00 00 A0 .dword $a0000009 +001C54r 1 0A 00 00 A0 .dword $a000000a +001C58r 1 0B 00 00 A0 .dword $a000000b +001C5Cr 1 0C 00 00 A0 .dword $a000000c +001C60r 1 0D 00 00 A0 .dword $a000000d +001C64r 1 0E 00 00 A0 .dword $a000000e +001C68r 1 0F 00 00 A0 .dword $a000000f +001C6Cr 1 F0 FF FF FF .dword $fffffff0 +001C70r 1 F1 FF FF FF .dword $fffffff1 +001C74r 1 F2 FF FF FF .dword $fffffff2 +001C78r 1 F3 FF FF FF .dword $fffffff3 +001C7Cr 1 F4 FF FF FF .dword $fffffff4 +001C80r 1 F5 FF FF FF .dword $fffffff5 +001C84r 1 F6 FF FF FF .dword $fffffff6 +001C88r 1 F7 FF FF FF .dword $fffffff7 +001C8Cr 1 F8 FF FF FF .dword $fffffff8 +001C90r 1 F9 FF FF FF .dword $fffffff9 +001C94r 1 FA FF FF FF .dword $fffffffa +001C98r 1 FB FF FF FF .dword $fffffffb +001C9Cr 1 FC FF FF FF .dword $fffffffc +001CA0r 1 FD FF FF FF .dword $fffffffd +001CA4r 1 FE FF FF FF .dword $fffffffe +001CA8r 1 FF FF FF FF .dword $ffffffff +001CACr 1 +001CACr 1 ; 8-digit hex values, uppercase +001CACr 1 00 00 00 00 .dword $00000000 +001CB0r 1 01 00 00 00 .dword $00000001 +001CB4r 1 02 00 00 00 .dword $00000002 +001CB8r 1 03 00 00 00 .dword $00000003 +001CBCr 1 04 00 00 00 .dword $00000004 +001CC0r 1 05 00 00 00 .dword $00000005 +001CC4r 1 06 00 00 00 .dword $00000006 +001CC8r 1 07 00 00 00 .dword $00000007 +001CCCr 1 08 00 00 00 .dword $00000008 +001CD0r 1 09 00 00 00 .dword $00000009 +001CD4r 1 0A 00 00 00 .dword $0000000A +001CD8r 1 0B 00 00 00 .dword $0000000B +001CDCr 1 0C 00 00 00 .dword $0000000C +001CE0r 1 0D 00 00 00 .dword $0000000D +001CE4r 1 0E 00 00 00 .dword $0000000E +001CE8r 1 0F 00 00 00 .dword $0000000F +001CECr 1 10 00 00 00 .dword $00000010 +001CF0r 1 11 00 00 00 .dword $00000011 +001CF4r 1 12 00 00 00 .dword $00000012 +001CF8r 1 13 00 00 00 .dword $00000013 +001CFCr 1 70 00 00 00 .dword $00000070 +001D00r 1 71 00 00 00 .dword $00000071 +001D04r 1 72 00 00 00 .dword $00000072 +001D08r 1 73 00 00 00 .dword $00000073 +001D0Cr 1 74 00 00 00 .dword $00000074 +001D10r 1 75 00 00 00 .dword $00000075 +001D14r 1 76 00 00 00 .dword $00000076 +001D18r 1 77 00 00 00 .dword $00000077 +001D1Cr 1 78 00 00 00 .dword $00000078 +001D20r 1 79 00 00 00 .dword $00000079 +001D24r 1 7A 00 00 00 .dword $0000007A +001D28r 1 7B 00 00 00 .dword $0000007B +001D2Cr 1 7C 00 00 00 .dword $0000007C +001D30r 1 7D 00 00 00 .dword $0000007D +001D34r 1 7E 00 00 00 .dword $0000007E +001D38r 1 7F 00 00 00 .dword $0000007F +001D3Cr 1 80 00 00 00 .dword $00000080 +001D40r 1 81 00 00 00 .dword $00000081 +001D44r 1 82 00 00 00 .dword $00000082 +001D48r 1 83 00 00 00 .dword $00000083 +001D4Cr 1 84 00 00 00 .dword $00000084 +001D50r 1 85 00 00 00 .dword $00000085 +001D54r 1 86 00 00 00 .dword $00000086 +001D58r 1 F0 00 00 00 .dword $000000F0 +001D5Cr 1 F1 00 00 00 .dword $000000F1 +001D60r 1 F2 00 00 00 .dword $000000F2 +001D64r 1 F3 00 00 00 .dword $000000F3 +001D68r 1 F4 00 00 00 .dword $000000F4 +001D6Cr 1 F5 00 00 00 .dword $000000F5 +001D70r 1 F6 00 00 00 .dword $000000F6 +001D74r 1 F7 00 00 00 .dword $000000F7 +001D78r 1 F8 00 00 00 .dword $000000F8 +001D7Cr 1 F9 00 00 00 .dword $000000F9 +001D80r 1 FA 00 00 00 .dword $000000FA +001D84r 1 FB 00 00 00 .dword $000000FB +001D88r 1 FC 00 00 00 .dword $000000FC +001D8Cr 1 FD 00 00 00 .dword $000000FD +001D90r 1 FE 00 00 00 .dword $000000FE +001D94r 1 FF 00 00 00 .dword $000000FF +001D98r 1 00 01 00 00 .dword $00000100 +001D9Cr 1 01 01 00 00 .dword $00000101 +001DA0r 1 02 01 00 00 .dword $00000102 +001DA4r 1 03 01 00 00 .dword $00000103 +001DA8r 1 D2 0F 00 00 .dword $00000FD2 +001DACr 1 D3 0F 00 00 .dword $00000FD3 +001DB0r 1 D4 0F 00 00 .dword $00000FD4 +001DB4r 1 D5 0F 00 00 .dword $00000FD5 +001DB8r 1 D6 0F 00 00 .dword $00000FD6 +001DBCr 1 D7 0F 00 00 .dword $00000FD7 +001DC0r 1 D8 0F 00 00 .dword $00000FD8 +001DC4r 1 D9 0F 00 00 .dword $00000FD9 +001DC8r 1 DA 0F 00 00 .dword $00000FDA +001DCCr 1 DB 0F 00 00 .dword $00000FDB +001DD0r 1 DC 0F 00 00 .dword $00000FDC +001DD4r 1 DD 0F 00 00 .dword $00000FDD +001DD8r 1 DE 0F 00 00 .dword $00000FDE +001DDCr 1 DF 0F 00 00 .dword $00000FDF +001DE0r 1 E0 0F 00 00 .dword $00000FE0 +001DE4r 1 E1 0F 00 00 .dword $00000FE1 +001DE8r 1 E2 0F 00 00 .dword $00000FE2 +001DECr 1 E3 0F 00 00 .dword $00000FE3 +001DF0r 1 E4 0F 00 00 .dword $00000FE4 +001DF4r 1 E5 0F 00 00 .dword $00000FE5 +001DF8r 1 E6 0F 00 00 .dword $00000FE6 +001DFCr 1 E7 0F 00 00 .dword $00000FE7 +001E00r 1 E8 0F 00 00 .dword $00000FE8 +001E04r 1 E9 0F 00 00 .dword $00000FE9 +001E08r 1 EA 0F 00 00 .dword $00000FEA +001E0Cr 1 EB 0F 00 00 .dword $00000FEB +001E10r 1 EC 0F 00 00 .dword $00000FEC +001E14r 1 ED 0F 00 00 .dword $00000FED +001E18r 1 EE 0F 00 00 .dword $00000FEE +001E1Cr 1 EF 0F 00 00 .dword $00000FEF +001E20r 1 F0 0F 00 00 .dword $00000FF0 +001E24r 1 F1 0F 00 00 .dword $00000FF1 +001E28r 1 F2 0F 00 00 .dword $00000FF2 +001E2Cr 1 F3 0F 00 00 .dword $00000FF3 +001E30r 1 F4 0F 00 00 .dword $00000FF4 +001E34r 1 F5 0F 00 00 .dword $00000FF5 +001E38r 1 F6 0F 00 00 .dword $00000FF6 +001E3Cr 1 F7 0F 00 00 .dword $00000FF7 +001E40r 1 F8 0F 00 00 .dword $00000FF8 +001E44r 1 F9 0F 00 00 .dword $00000FF9 +001E48r 1 FA 0F 00 00 .dword $00000FFA +001E4Cr 1 FB 0F 00 00 .dword $00000FFB +001E50r 1 FC 0F 00 00 .dword $00000FFC +001E54r 1 FD 0F 00 00 .dword $00000FFD +001E58r 1 FE 0F 00 00 .dword $00000FFE +001E5Cr 1 FF 0F 00 00 .dword $00000FFF +001E60r 1 00 10 00 00 .dword $00001000 +001E64r 1 01 10 00 00 .dword $00001001 +001E68r 1 02 10 00 00 .dword $00001002 +001E6Cr 1 03 10 00 00 .dword $00001003 +001E70r 1 04 10 00 00 .dword $00001004 +001E74r 1 05 10 00 00 .dword $00001005 +001E78r 1 06 10 00 00 .dword $00001006 +001E7Cr 1 07 10 00 00 .dword $00001007 +001E80r 1 08 10 00 00 .dword $00001008 +001E84r 1 F0 7F 00 00 .dword $00007FF0 +001E88r 1 F1 7F 00 00 .dword $00007FF1 +001E8Cr 1 F2 7F 00 00 .dword $00007FF2 +001E90r 1 F3 7F 00 00 .dword $00007FF3 +001E94r 1 F4 7F 00 00 .dword $00007FF4 +001E98r 1 F5 7F 00 00 .dword $00007FF5 +001E9Cr 1 F6 7F 00 00 .dword $00007FF6 +001EA0r 1 F7 7F 00 00 .dword $00007FF7 +001EA4r 1 F8 7F 00 00 .dword $00007FF8 +001EA8r 1 F9 7F 00 00 .dword $00007FF9 +001EACr 1 FA 7F 00 00 .dword $00007FFA +001EB0r 1 FB 7F 00 00 .dword $00007FFB +001EB4r 1 FC 7F 00 00 .dword $00007FFC +001EB8r 1 FD 7F 00 00 .dword $00007FFD +001EBCr 1 FE 7F 00 00 .dword $00007FFE +001EC0r 1 FF 7F 00 00 .dword $00007FFF +001EC4r 1 00 80 00 00 .dword $00008000 +001EC8r 1 01 80 00 00 .dword $00008001 +001ECCr 1 02 80 00 00 .dword $00008002 +001ED0r 1 03 80 00 00 .dword $00008003 +001ED4r 1 04 80 00 00 .dword $00008004 +001ED8r 1 05 80 00 00 .dword $00008005 +001EDCr 1 06 80 00 00 .dword $00008006 +001EE0r 1 07 80 00 00 .dword $00008007 +001EE4r 1 08 80 00 00 .dword $00008008 +001EE8r 1 09 80 00 00 .dword $00008009 +001EECr 1 0A 80 00 00 .dword $0000800A +001EF0r 1 0B 80 00 00 .dword $0000800B +001EF4r 1 E1 9F 00 00 .dword $00009FE1 +001EF8r 1 E2 9F 00 00 .dword $00009FE2 +001EFCr 1 E3 9F 00 00 .dword $00009FE3 +001F00r 1 E4 9F 00 00 .dword $00009FE4 +001F04r 1 E5 9F 00 00 .dword $00009FE5 +001F08r 1 E6 9F 00 00 .dword $00009FE6 +001F0Cr 1 E7 9F 00 00 .dword $00009FE7 +001F10r 1 E8 9F 00 00 .dword $00009FE8 +001F14r 1 E9 9F 00 00 .dword $00009FE9 +001F18r 1 EA 9F 00 00 .dword $00009FEA +001F1Cr 1 EB 9F 00 00 .dword $00009FEB +001F20r 1 EC 9F 00 00 .dword $00009FEC +001F24r 1 ED 9F 00 00 .dword $00009FED +001F28r 1 EE 9F 00 00 .dword $00009FEE +001F2Cr 1 EF 9F 00 00 .dword $00009FEF +001F30r 1 F0 9F 00 00 .dword $00009FF0 +001F34r 1 F1 9F 00 00 .dword $00009FF1 +001F38r 1 F2 9F 00 00 .dword $00009FF2 +001F3Cr 1 F3 9F 00 00 .dword $00009FF3 +001F40r 1 F4 9F 00 00 .dword $00009FF4 +001F44r 1 F5 9F 00 00 .dword $00009FF5 +001F48r 1 F6 9F 00 00 .dword $00009FF6 +001F4Cr 1 F7 9F 00 00 .dword $00009FF7 +001F50r 1 F8 9F 00 00 .dword $00009FF8 +001F54r 1 F9 9F 00 00 .dword $00009FF9 +001F58r 1 FA 9F 00 00 .dword $00009FFA +001F5Cr 1 FB 9F 00 00 .dword $00009FFB +001F60r 1 FC 9F 00 00 .dword $00009FFC +001F64r 1 FD 9F 00 00 .dword $00009FFD +001F68r 1 FE 9F 00 00 .dword $00009FFE +001F6Cr 1 FF 9F 00 00 .dword $00009FFF +001F70r 1 00 A0 00 00 .dword $0000A000 +001F74r 1 01 A0 00 00 .dword $0000A001 +001F78r 1 02 A0 00 00 .dword $0000A002 +001F7Cr 1 03 A0 00 00 .dword $0000A003 +001F80r 1 04 A0 00 00 .dword $0000A004 +001F84r 1 05 A0 00 00 .dword $0000A005 +001F88r 1 06 A0 00 00 .dword $0000A006 +001F8Cr 1 07 A0 00 00 .dword $0000A007 +001F90r 1 08 A0 00 00 .dword $0000A008 +001F94r 1 09 A0 00 00 .dword $0000A009 +001F98r 1 0A A0 00 00 .dword $0000A00A +001F9Cr 1 0B A0 00 00 .dword $0000A00B +001FA0r 1 0C A0 00 00 .dword $0000A00C +001FA4r 1 0D A0 00 00 .dword $0000A00D +001FA8r 1 0E A0 00 00 .dword $0000A00E +001FACr 1 0F A0 00 00 .dword $0000A00F +001FB0r 1 E1 AF 00 00 .dword $0000AFE1 +001FB4r 1 E2 AF 00 00 .dword $0000AFE2 +001FB8r 1 E3 AF 00 00 .dword $0000AFE3 +001FBCr 1 E4 AF 00 00 .dword $0000AFE4 +001FC0r 1 E5 AF 00 00 .dword $0000AFE5 +001FC4r 1 E6 AF 00 00 .dword $0000AFE6 +001FC8r 1 E7 AF 00 00 .dword $0000AFE7 +001FCCr 1 E8 AF 00 00 .dword $0000AFE8 +001FD0r 1 E9 AF 00 00 .dword $0000AFE9 +001FD4r 1 EA AF 00 00 .dword $0000AFEA +001FD8r 1 EB AF 00 00 .dword $0000AFEB +001FDCr 1 EC AF 00 00 .dword $0000AFEC +001FE0r 1 ED AF 00 00 .dword $0000AFED +001FE4r 1 EE AF 00 00 .dword $0000AFEE +001FE8r 1 EF AF 00 00 .dword $0000AFEF +001FECr 1 F0 AF 00 00 .dword $0000AFF0 +001FF0r 1 F1 AF 00 00 .dword $0000AFF1 +001FF4r 1 F2 AF 00 00 .dword $0000AFF2 +001FF8r 1 F3 AF 00 00 .dword $0000AFF3 +001FFCr 1 F4 AF 00 00 .dword $0000AFF4 +002000r 1 F5 AF 00 00 .dword $0000AFF5 +002004r 1 F6 AF 00 00 .dword $0000AFF6 +002008r 1 F7 AF 00 00 .dword $0000AFF7 +00200Cr 1 F8 AF 00 00 .dword $0000AFF8 +002010r 1 F9 AF 00 00 .dword $0000AFF9 +002014r 1 FA AF 00 00 .dword $0000AFFA +002018r 1 FB AF 00 00 .dword $0000AFFB +00201Cr 1 FC AF 00 00 .dword $0000AFFC +002020r 1 FD AF 00 00 .dword $0000AFFD +002024r 1 FE AF 00 00 .dword $0000AFFE +002028r 1 FF AF 00 00 .dword $0000AFFF +00202Cr 1 00 B0 00 00 .dword $0000B000 +002030r 1 01 B0 00 00 .dword $0000B001 +002034r 1 02 B0 00 00 .dword $0000B002 +002038r 1 03 B0 00 00 .dword $0000B003 +00203Cr 1 04 B0 00 00 .dword $0000B004 +002040r 1 05 B0 00 00 .dword $0000B005 +002044r 1 06 B0 00 00 .dword $0000B006 +002048r 1 07 B0 00 00 .dword $0000B007 +00204Cr 1 08 B0 00 00 .dword $0000B008 +002050r 1 09 B0 00 00 .dword $0000B009 +002054r 1 0A B0 00 00 .dword $0000B00A +002058r 1 0B B0 00 00 .dword $0000B00B +00205Cr 1 0C B0 00 00 .dword $0000B00C +002060r 1 0D B0 00 00 .dword $0000B00D +002064r 1 0E B0 00 00 .dword $0000B00E +002068r 1 0F B0 00 00 .dword $0000B00F +00206Cr 1 E1 FF 00 00 .dword $0000FFE1 +002070r 1 E2 FF 00 00 .dword $0000FFE2 +002074r 1 E3 FF 00 00 .dword $0000FFE3 +002078r 1 E4 FF 00 00 .dword $0000FFE4 +00207Cr 1 E5 FF 00 00 .dword $0000FFE5 +002080r 1 E6 FF 00 00 .dword $0000FFE6 +002084r 1 E7 FF 00 00 .dword $0000FFE7 +002088r 1 E8 FF 00 00 .dword $0000FFE8 +00208Cr 1 E9 FF 00 00 .dword $0000FFE9 +002090r 1 EA FF 00 00 .dword $0000FFEA +002094r 1 EB FF 00 00 .dword $0000FFEB +002098r 1 EC FF 00 00 .dword $0000FFEC +00209Cr 1 ED FF 00 00 .dword $0000FFED +0020A0r 1 EE FF 00 00 .dword $0000FFEE +0020A4r 1 EF FF 00 00 .dword $0000FFEF +0020A8r 1 F0 FF 00 00 .dword $0000FFF0 +0020ACr 1 F1 FF 00 00 .dword $0000FFF1 +0020B0r 1 F2 FF 00 00 .dword $0000FFF2 +0020B4r 1 F3 FF 00 00 .dword $0000FFF3 +0020B8r 1 F4 FF 00 00 .dword $0000FFF4 +0020BCr 1 F5 FF 00 00 .dword $0000FFF5 +0020C0r 1 F6 FF 00 00 .dword $0000FFF6 +0020C4r 1 F7 FF 00 00 .dword $0000FFF7 +0020C8r 1 F8 FF 00 00 .dword $0000FFF8 +0020CCr 1 F9 FF 00 00 .dword $0000FFF9 +0020D0r 1 FA FF 00 00 .dword $0000FFFA +0020D4r 1 FB FF 00 00 .dword $0000FFFB +0020D8r 1 FC FF 00 00 .dword $0000FFFC +0020DCr 1 FD FF 00 00 .dword $0000FFFD +0020E0r 1 FE FF 00 00 .dword $0000FFFE +0020E4r 1 FF FF 00 00 .dword $0000FFFF +0020E8r 1 00 00 01 00 .dword $00010000 +0020ECr 1 01 00 01 00 .dword $00010001 +0020F0r 1 02 00 01 00 .dword $00010002 +0020F4r 1 03 00 01 00 .dword $00010003 +0020F8r 1 04 00 01 00 .dword $00010004 +0020FCr 1 05 00 01 00 .dword $00010005 +002100r 1 06 00 01 00 .dword $00010006 +002104r 1 07 00 01 00 .dword $00010007 +002108r 1 08 00 01 00 .dword $00010008 +00210Cr 1 09 00 01 00 .dword $00010009 +002110r 1 0A 00 01 00 .dword $0001000A +002114r 1 0B 00 01 00 .dword $0001000B +002118r 1 0C 00 01 00 .dword $0001000C +00211Cr 1 0D 00 01 00 .dword $0001000D +002120r 1 0E 00 01 00 .dword $0001000E +002124r 1 0F 00 01 00 .dword $0001000F +002128r 1 F0 FF FF 7F .dword $7FFFFFF0 +00212Cr 1 F1 FF FF 7F .dword $7FFFFFF1 +002130r 1 F2 FF FF 7F .dword $7FFFFFF2 +002134r 1 F3 FF FF 7F .dword $7FFFFFF3 +002138r 1 F4 FF FF 7F .dword $7FFFFFF4 +00213Cr 1 F5 FF FF 7F .dword $7FFFFFF5 +002140r 1 F6 FF FF 7F .dword $7FFFFFF6 +002144r 1 F7 FF FF 7F .dword $7FFFFFF7 +002148r 1 F8 FF FF 7F .dword $7FFFFFF8 +00214Cr 1 F9 FF FF 7F .dword $7FFFFFF9 +002150r 1 FA FF FF 7F .dword $7FFFFFFA +002154r 1 FB FF FF 7F .dword $7FFFFFFB +002158r 1 FC FF FF 7F .dword $7FFFFFFC +00215Cr 1 FD FF FF 7F .dword $7FFFFFFD +002160r 1 FE FF FF 7F .dword $7FFFFFFE +002164r 1 FF FF FF 7F .dword $7FFFFFFF +002168r 1 00 00 00 80 .dword $80000000 +00216Cr 1 01 00 00 80 .dword $80000001 +002170r 1 02 00 00 80 .dword $80000002 +002174r 1 03 00 00 80 .dword $80000003 +002178r 1 04 00 00 80 .dword $80000004 +00217Cr 1 05 00 00 80 .dword $80000005 +002180r 1 06 00 00 80 .dword $80000006 +002184r 1 07 00 00 80 .dword $80000007 +002188r 1 08 00 00 80 .dword $80000008 +00218Cr 1 09 00 00 80 .dword $80000009 +002190r 1 0A 00 00 80 .dword $8000000A +002194r 1 0B 00 00 80 .dword $8000000B +002198r 1 0C 00 00 80 .dword $8000000C +00219Cr 1 0D 00 00 80 .dword $8000000D +0021A0r 1 0E 00 00 80 .dword $8000000E +0021A4r 1 0F 00 00 80 .dword $8000000F +0021A8r 1 F0 FF FF 9F .dword $9FFFFFF0 +0021ACr 1 F1 FF FF 9F .dword $9FFFFFF1 +0021B0r 1 F2 FF FF 9F .dword $9FFFFFF2 +0021B4r 1 F3 FF FF 9F .dword $9FFFFFF3 +0021B8r 1 F4 FF FF 9F .dword $9FFFFFF4 +0021BCr 1 F5 FF FF 9F .dword $9FFFFFF5 +0021C0r 1 F6 FF FF 9F .dword $9FFFFFF6 +0021C4r 1 F7 FF FF 9F .dword $9FFFFFF7 +0021C8r 1 F8 FF FF 9F .dword $9FFFFFF8 +0021CCr 1 F9 FF FF 9F .dword $9FFFFFF9 +0021D0r 1 FA FF FF 9F .dword $9FFFFFFA +0021D4r 1 FB FF FF 9F .dword $9FFFFFFB +0021D8r 1 FC FF FF 9F .dword $9FFFFFFC +0021DCr 1 FD FF FF 9F .dword $9FFFFFFD +0021E0r 1 FE FF FF 9F .dword $9FFFFFFE +0021E4r 1 FF FF FF 9F .dword $9FFFFFFF +0021E8r 1 00 00 00 A0 .dword $A0000000 +0021ECr 1 01 00 00 A0 .dword $A0000001 +0021F0r 1 02 00 00 A0 .dword $A0000002 +0021F4r 1 03 00 00 A0 .dword $A0000003 +0021F8r 1 04 00 00 A0 .dword $A0000004 +0021FCr 1 05 00 00 A0 .dword $A0000005 +002200r 1 06 00 00 A0 .dword $A0000006 +002204r 1 07 00 00 A0 .dword $A0000007 +002208r 1 08 00 00 A0 .dword $A0000008 +00220Cr 1 09 00 00 A0 .dword $A0000009 +002210r 1 0A 00 00 A0 .dword $A000000A +002214r 1 0B 00 00 A0 .dword $A000000B +002218r 1 0C 00 00 A0 .dword $A000000C +00221Cr 1 0D 00 00 A0 .dword $A000000D +002220r 1 0E 00 00 A0 .dword $A000000E +002224r 1 0F 00 00 A0 .dword $A000000F +002228r 1 F0 FF FF FF .dword $FFFFFFF0 +00222Cr 1 F1 FF FF FF .dword $FFFFFFF1 +002230r 1 F2 FF FF FF .dword $FFFFFFF2 +002234r 1 F3 FF FF FF .dword $FFFFFFF3 +002238r 1 F4 FF FF FF .dword $FFFFFFF4 +00223Cr 1 F5 FF FF FF .dword $FFFFFFF5 +002240r 1 F6 FF FF FF .dword $FFFFFFF6 +002244r 1 F7 FF FF FF .dword $FFFFFFF7 +002248r 1 F8 FF FF FF .dword $FFFFFFF8 +00224Cr 1 F9 FF FF FF .dword $FFFFFFF9 +002250r 1 FA FF FF FF .dword $FFFFFFFA +002254r 1 FB FF FF FF .dword $FFFFFFFB +002258r 1 FC FF FF FF .dword $FFFFFFFC +00225Cr 1 FD FF FF FF .dword $FFFFFFFD +002260r 1 FE FF FF FF .dword $FFFFFFFE +002264r 1 FF FF FF FF .dword $FFFFFFFF +002268r 1 +002268r 1 ; alternative hex values +002268r 1 00 00 00 00 .dword 0h +00226Cr 1 01 00 00 00 .dword 1h +002270r 1 02 00 00 00 .dword 2h +002274r 1 03 00 00 00 .dword 3h +002278r 1 04 00 00 00 .dword 4h +00227Cr 1 05 00 00 00 .dword 5h +002280r 1 06 00 00 00 .dword 6h +002284r 1 07 00 00 00 .dword 7h +002288r 1 08 00 00 00 .dword 8h +00228Cr 1 09 00 00 00 .dword 9h +002290r 1 0A 00 00 00 .dword 0ah +002294r 1 0B 00 00 00 .dword 0bh +002298r 1 0C 00 00 00 .dword 0ch +00229Cr 1 0D 00 00 00 .dword 0dh +0022A0r 1 0E 00 00 00 .dword 0eh +0022A4r 1 0F 00 00 00 .dword 0fh +0022A8r 1 10 00 00 00 .dword 10h +0022ACr 1 11 00 00 00 .dword 11h +0022B0r 1 12 00 00 00 .dword 12h +0022B4r 1 13 00 00 00 .dword 13h +0022B8r 1 70 00 00 00 .dword 70h +0022BCr 1 71 00 00 00 .dword 71h +0022C0r 1 72 00 00 00 .dword 72h +0022C4r 1 73 00 00 00 .dword 73h +0022C8r 1 74 00 00 00 .dword 74h +0022CCr 1 75 00 00 00 .dword 75h +0022D0r 1 76 00 00 00 .dword 76h +0022D4r 1 77 00 00 00 .dword 77h +0022D8r 1 78 00 00 00 .dword 78h +0022DCr 1 79 00 00 00 .dword 79h +0022E0r 1 7A 00 00 00 .dword 7ah +0022E4r 1 7B 00 00 00 .dword 7bh +0022E8r 1 7C 00 00 00 .dword 7ch +0022ECr 1 7D 00 00 00 .dword 7dh +0022F0r 1 7E 00 00 00 .dword 7eh +0022F4r 1 7F 00 00 00 .dword 7fh +0022F8r 1 80 00 00 00 .dword 80h +0022FCr 1 81 00 00 00 .dword 81h +002300r 1 82 00 00 00 .dword 82h +002304r 1 83 00 00 00 .dword 83h +002308r 1 84 00 00 00 .dword 84h +00230Cr 1 85 00 00 00 .dword 85h +002310r 1 86 00 00 00 .dword 86h +002314r 1 F0 00 00 00 .dword 0f0h +002318r 1 F1 00 00 00 .dword 0f1h +00231Cr 1 F2 00 00 00 .dword 0f2h +002320r 1 F3 00 00 00 .dword 0f3h +002324r 1 F4 00 00 00 .dword 0f4h +002328r 1 F5 00 00 00 .dword 0f5h +00232Cr 1 F6 00 00 00 .dword 0f6h +002330r 1 F7 00 00 00 .dword 0f7h +002334r 1 F8 00 00 00 .dword 0f8h +002338r 1 F9 00 00 00 .dword 0f9h +00233Cr 1 FA 00 00 00 .dword 0fah +002340r 1 FB 00 00 00 .dword 0fbh +002344r 1 FC 00 00 00 .dword 0fch +002348r 1 FD 00 00 00 .dword 0fdh +00234Cr 1 FE 00 00 00 .dword 0feh +002350r 1 FF 00 00 00 .dword 0ffh +002354r 1 00 01 00 00 .dword 100h +002358r 1 01 01 00 00 .dword 101h +00235Cr 1 02 01 00 00 .dword 102h +002360r 1 03 01 00 00 .dword 103h +002364r 1 D2 0F 00 00 .dword 0fd2h +002368r 1 D3 0F 00 00 .dword 0fd3h +00236Cr 1 D4 0F 00 00 .dword 0fd4h +002370r 1 D5 0F 00 00 .dword 0fd5h +002374r 1 D6 0F 00 00 .dword 0fd6h +002378r 1 D7 0F 00 00 .dword 0fd7h +00237Cr 1 D8 0F 00 00 .dword 0fd8h +002380r 1 D9 0F 00 00 .dword 0fd9h +002384r 1 DA 0F 00 00 .dword 0fdah +002388r 1 DB 0F 00 00 .dword 0fdbh +00238Cr 1 DC 0F 00 00 .dword 0fdch +002390r 1 DD 0F 00 00 .dword 0fddh +002394r 1 DE 0F 00 00 .dword 0fdeh +002398r 1 DF 0F 00 00 .dword 0fdfh +00239Cr 1 E0 0F 00 00 .dword 0fe0h +0023A0r 1 E1 0F 00 00 .dword 0fe1h +0023A4r 1 E2 0F 00 00 .dword 0fe2h +0023A8r 1 E3 0F 00 00 .dword 0fe3h +0023ACr 1 E4 0F 00 00 .dword 0fe4h +0023B0r 1 E5 0F 00 00 .dword 0fe5h +0023B4r 1 E6 0F 00 00 .dword 0fe6h +0023B8r 1 E7 0F 00 00 .dword 0fe7h +0023BCr 1 E8 0F 00 00 .dword 0fe8h +0023C0r 1 E9 0F 00 00 .dword 0fe9h +0023C4r 1 EA 0F 00 00 .dword 0feah +0023C8r 1 EB 0F 00 00 .dword 0febh +0023CCr 1 EC 0F 00 00 .dword 0fech +0023D0r 1 ED 0F 00 00 .dword 0fedh +0023D4r 1 EE 0F 00 00 .dword 0feeh +0023D8r 1 EF 0F 00 00 .dword 0fefh +0023DCr 1 F0 0F 00 00 .dword 0ff0h +0023E0r 1 F1 0F 00 00 .dword 0ff1h +0023E4r 1 F2 0F 00 00 .dword 0ff2h +0023E8r 1 F3 0F 00 00 .dword 0ff3h +0023ECr 1 F4 0F 00 00 .dword 0ff4h +0023F0r 1 F5 0F 00 00 .dword 0ff5h +0023F4r 1 F6 0F 00 00 .dword 0ff6h +0023F8r 1 F7 0F 00 00 .dword 0ff7h +0023FCr 1 F8 0F 00 00 .dword 0ff8h +002400r 1 F9 0F 00 00 .dword 0ff9h +002404r 1 FA 0F 00 00 .dword 0ffah +002408r 1 FB 0F 00 00 .dword 0ffbh +00240Cr 1 FC 0F 00 00 .dword 0ffch +002410r 1 FD 0F 00 00 .dword 0ffdh +002414r 1 FE 0F 00 00 .dword 0ffeh +002418r 1 FF 0F 00 00 .dword 0fffh +00241Cr 1 00 10 00 00 .dword 1000h +002420r 1 01 10 00 00 .dword 1001h +002424r 1 02 10 00 00 .dword 1002h +002428r 1 03 10 00 00 .dword 1003h +00242Cr 1 04 10 00 00 .dword 1004h +002430r 1 05 10 00 00 .dword 1005h +002434r 1 06 10 00 00 .dword 1006h +002438r 1 07 10 00 00 .dword 1007h +00243Cr 1 08 10 00 00 .dword 1008h +002440r 1 F0 7F 00 00 .dword 7ff0h +002444r 1 F1 7F 00 00 .dword 7ff1h +002448r 1 F2 7F 00 00 .dword 7ff2h +00244Cr 1 F3 7F 00 00 .dword 7ff3h +002450r 1 F4 7F 00 00 .dword 7ff4h +002454r 1 F5 7F 00 00 .dword 7ff5h +002458r 1 F6 7F 00 00 .dword 7ff6h +00245Cr 1 F7 7F 00 00 .dword 7ff7h +002460r 1 F8 7F 00 00 .dword 7ff8h +002464r 1 F9 7F 00 00 .dword 7ff9h +002468r 1 FA 7F 00 00 .dword 7ffah +00246Cr 1 FB 7F 00 00 .dword 7ffbh +002470r 1 FC 7F 00 00 .dword 7ffch +002474r 1 FD 7F 00 00 .dword 7ffdh +002478r 1 FE 7F 00 00 .dword 7ffeh +00247Cr 1 FF 7F 00 00 .dword 7fffh +002480r 1 00 80 00 00 .dword 8000h +002484r 1 01 80 00 00 .dword 8001h +002488r 1 02 80 00 00 .dword 8002h +00248Cr 1 03 80 00 00 .dword 8003h +002490r 1 04 80 00 00 .dword 8004h +002494r 1 05 80 00 00 .dword 8005h +002498r 1 06 80 00 00 .dword 8006h +00249Cr 1 07 80 00 00 .dword 8007h +0024A0r 1 08 80 00 00 .dword 8008h +0024A4r 1 09 80 00 00 .dword 8009h +0024A8r 1 0A 80 00 00 .dword 800ah +0024ACr 1 0B 80 00 00 .dword 800bh +0024B0r 1 E1 9F 00 00 .dword 9fe1h +0024B4r 1 E2 9F 00 00 .dword 9fe2h +0024B8r 1 E3 9F 00 00 .dword 9fe3h +0024BCr 1 E4 9F 00 00 .dword 9fe4h +0024C0r 1 E5 9F 00 00 .dword 9fe5h +0024C4r 1 E6 9F 00 00 .dword 9fe6h +0024C8r 1 E7 9F 00 00 .dword 9fe7h +0024CCr 1 E8 9F 00 00 .dword 9fe8h +0024D0r 1 E9 9F 00 00 .dword 9fe9h +0024D4r 1 EA 9F 00 00 .dword 9feah +0024D8r 1 EB 9F 00 00 .dword 9febh +0024DCr 1 EC 9F 00 00 .dword 9fech +0024E0r 1 ED 9F 00 00 .dword 9fedh +0024E4r 1 EE 9F 00 00 .dword 9feeh +0024E8r 1 EF 9F 00 00 .dword 9fefh +0024ECr 1 F0 9F 00 00 .dword 9ff0h +0024F0r 1 F1 9F 00 00 .dword 9ff1h +0024F4r 1 F2 9F 00 00 .dword 9ff2h +0024F8r 1 F3 9F 00 00 .dword 9ff3h +0024FCr 1 F4 9F 00 00 .dword 9ff4h +002500r 1 F5 9F 00 00 .dword 9ff5h +002504r 1 F6 9F 00 00 .dword 9ff6h +002508r 1 F7 9F 00 00 .dword 9ff7h +00250Cr 1 F8 9F 00 00 .dword 9ff8h +002510r 1 F9 9F 00 00 .dword 9ff9h +002514r 1 FA 9F 00 00 .dword 9ffah +002518r 1 FB 9F 00 00 .dword 9ffbh +00251Cr 1 FC 9F 00 00 .dword 9ffch +002520r 1 FD 9F 00 00 .dword 9ffdh +002524r 1 FE 9F 00 00 .dword 9ffeh +002528r 1 FF 9F 00 00 .dword 9fffh +00252Cr 1 00 A0 00 00 .dword 0a000h +002530r 1 01 A0 00 00 .dword 0a001h +002534r 1 02 A0 00 00 .dword 0a002h +002538r 1 03 A0 00 00 .dword 0a003h +00253Cr 1 04 A0 00 00 .dword 0a004h +002540r 1 05 A0 00 00 .dword 0a005h +002544r 1 06 A0 00 00 .dword 0a006h +002548r 1 07 A0 00 00 .dword 0a007h +00254Cr 1 08 A0 00 00 .dword 0a008h +002550r 1 09 A0 00 00 .dword 0a009h +002554r 1 0A A0 00 00 .dword 0a00ah +002558r 1 0B A0 00 00 .dword 0a00bh +00255Cr 1 0C A0 00 00 .dword 0a00ch +002560r 1 0D A0 00 00 .dword 0a00dh +002564r 1 0E A0 00 00 .dword 0a00eh +002568r 1 0F A0 00 00 .dword 0a00fh +00256Cr 1 E1 AF 00 00 .dword 0afe1h +002570r 1 E2 AF 00 00 .dword 0afe2h +002574r 1 E3 AF 00 00 .dword 0afe3h +002578r 1 E4 AF 00 00 .dword 0afe4h +00257Cr 1 E5 AF 00 00 .dword 0afe5h +002580r 1 E6 AF 00 00 .dword 0afe6h +002584r 1 E7 AF 00 00 .dword 0afe7h +002588r 1 E8 AF 00 00 .dword 0afe8h +00258Cr 1 E9 AF 00 00 .dword 0afe9h +002590r 1 EA AF 00 00 .dword 0afeah +002594r 1 EB AF 00 00 .dword 0afebh +002598r 1 EC AF 00 00 .dword 0afech +00259Cr 1 ED AF 00 00 .dword 0afedh +0025A0r 1 EE AF 00 00 .dword 0afeeh +0025A4r 1 EF AF 00 00 .dword 0afefh +0025A8r 1 F0 AF 00 00 .dword 0aff0h +0025ACr 1 F1 AF 00 00 .dword 0aff1h +0025B0r 1 F2 AF 00 00 .dword 0aff2h +0025B4r 1 F3 AF 00 00 .dword 0aff3h +0025B8r 1 F4 AF 00 00 .dword 0aff4h +0025BCr 1 F5 AF 00 00 .dword 0aff5h +0025C0r 1 F6 AF 00 00 .dword 0aff6h +0025C4r 1 F7 AF 00 00 .dword 0aff7h +0025C8r 1 F8 AF 00 00 .dword 0aff8h +0025CCr 1 F9 AF 00 00 .dword 0aff9h +0025D0r 1 FA AF 00 00 .dword 0affah +0025D4r 1 FB AF 00 00 .dword 0affbh +0025D8r 1 FC AF 00 00 .dword 0affch +0025DCr 1 FD AF 00 00 .dword 0affdh +0025E0r 1 FE AF 00 00 .dword 0affeh +0025E4r 1 FF AF 00 00 .dword 0afffh +0025E8r 1 00 B0 00 00 .dword 0b000h +0025ECr 1 01 B0 00 00 .dword 0b001h +0025F0r 1 02 B0 00 00 .dword 0b002h +0025F4r 1 03 B0 00 00 .dword 0b003h +0025F8r 1 04 B0 00 00 .dword 0b004h +0025FCr 1 05 B0 00 00 .dword 0b005h +002600r 1 06 B0 00 00 .dword 0b006h +002604r 1 07 B0 00 00 .dword 0b007h +002608r 1 08 B0 00 00 .dword 0b008h +00260Cr 1 09 B0 00 00 .dword 0b009h +002610r 1 0A B0 00 00 .dword 0b00ah +002614r 1 0B B0 00 00 .dword 0b00bh +002618r 1 0C B0 00 00 .dword 0b00ch +00261Cr 1 0D B0 00 00 .dword 0b00dh +002620r 1 0E B0 00 00 .dword 0b00eh +002624r 1 0F B0 00 00 .dword 0b00fh +002628r 1 E1 FF 00 00 .dword 0ffe1h +00262Cr 1 E2 FF 00 00 .dword 0ffe2h +002630r 1 E3 FF 00 00 .dword 0ffe3h +002634r 1 E4 FF 00 00 .dword 0ffe4h +002638r 1 E5 FF 00 00 .dword 0ffe5h +00263Cr 1 E6 FF 00 00 .dword 0ffe6h +002640r 1 E7 FF 00 00 .dword 0ffe7h +002644r 1 E8 FF 00 00 .dword 0ffe8h +002648r 1 E9 FF 00 00 .dword 0ffe9h +00264Cr 1 EA FF 00 00 .dword 0ffeah +002650r 1 EB FF 00 00 .dword 0ffebh +002654r 1 EC FF 00 00 .dword 0ffech +002658r 1 ED FF 00 00 .dword 0ffedh +00265Cr 1 EE FF 00 00 .dword 0ffeeh +002660r 1 EF FF 00 00 .dword 0ffefh +002664r 1 F0 FF 00 00 .dword 0fff0h +002668r 1 F1 FF 00 00 .dword 0fff1h +00266Cr 1 F2 FF 00 00 .dword 0fff2h +002670r 1 F3 FF 00 00 .dword 0fff3h +002674r 1 F4 FF 00 00 .dword 0fff4h +002678r 1 F5 FF 00 00 .dword 0fff5h +00267Cr 1 F6 FF 00 00 .dword 0fff6h +002680r 1 F7 FF 00 00 .dword 0fff7h +002684r 1 F8 FF 00 00 .dword 0fff8h +002688r 1 F9 FF 00 00 .dword 0fff9h +00268Cr 1 FA FF 00 00 .dword 0fffah +002690r 1 FB FF 00 00 .dword 0fffbh +002694r 1 FC FF 00 00 .dword 0fffch +002698r 1 FD FF 00 00 .dword 0fffdh +00269Cr 1 FE FF 00 00 .dword 0fffeh +0026A0r 1 FF FF 00 00 .dword 0ffffh +0026A4r 1 00 00 01 00 .dword 10000h +0026A8r 1 01 00 01 00 .dword 10001h +0026ACr 1 02 00 01 00 .dword 10002h +0026B0r 1 03 00 01 00 .dword 10003h +0026B4r 1 04 00 01 00 .dword 10004h +0026B8r 1 05 00 01 00 .dword 10005h +0026BCr 1 06 00 01 00 .dword 10006h +0026C0r 1 07 00 01 00 .dword 10007h +0026C4r 1 08 00 01 00 .dword 10008h +0026C8r 1 09 00 01 00 .dword 10009h +0026CCr 1 0A 00 01 00 .dword 1000ah +0026D0r 1 0B 00 01 00 .dword 1000bh +0026D4r 1 0C 00 01 00 .dword 1000ch +0026D8r 1 0D 00 01 00 .dword 1000dh +0026DCr 1 0E 00 01 00 .dword 1000eh +0026E0r 1 0F 00 01 00 .dword 1000fh +0026E4r 1 F0 FF FF 7F .dword 7ffffff0h +0026E8r 1 F1 FF FF 7F .dword 7ffffff1h +0026ECr 1 F2 FF FF 7F .dword 7ffffff2h +0026F0r 1 F3 FF FF 7F .dword 7ffffff3h +0026F4r 1 F4 FF FF 7F .dword 7ffffff4h +0026F8r 1 F5 FF FF 7F .dword 7ffffff5h +0026FCr 1 F6 FF FF 7F .dword 7ffffff6h +002700r 1 F7 FF FF 7F .dword 7ffffff7h +002704r 1 F8 FF FF 7F .dword 7ffffff8h +002708r 1 F9 FF FF 7F .dword 7ffffff9h +00270Cr 1 FA FF FF 7F .dword 7ffffffah +002710r 1 FB FF FF 7F .dword 7ffffffbh +002714r 1 FC FF FF 7F .dword 7ffffffch +002718r 1 FD FF FF 7F .dword 7ffffffdh +00271Cr 1 FE FF FF 7F .dword 7ffffffeh +002720r 1 FF FF FF 7F .dword 7fffffffh +002724r 1 00 00 00 80 .dword 80000000h +002728r 1 01 00 00 80 .dword 80000001h +00272Cr 1 02 00 00 80 .dword 80000002h +002730r 1 03 00 00 80 .dword 80000003h +002734r 1 04 00 00 80 .dword 80000004h +002738r 1 05 00 00 80 .dword 80000005h +00273Cr 1 06 00 00 80 .dword 80000006h +002740r 1 07 00 00 80 .dword 80000007h +002744r 1 08 00 00 80 .dword 80000008h +002748r 1 09 00 00 80 .dword 80000009h +00274Cr 1 0A 00 00 80 .dword 8000000ah +002750r 1 0B 00 00 80 .dword 8000000bh +002754r 1 0C 00 00 80 .dword 8000000ch +002758r 1 0D 00 00 80 .dword 8000000dh +00275Cr 1 0E 00 00 80 .dword 8000000eh +002760r 1 0F 00 00 80 .dword 8000000fh +002764r 1 F0 FF FF 9F .dword 9ffffff0h +002768r 1 F1 FF FF 9F .dword 9ffffff1h +00276Cr 1 F2 FF FF 9F .dword 9ffffff2h +002770r 1 F3 FF FF 9F .dword 9ffffff3h +002774r 1 F4 FF FF 9F .dword 9ffffff4h +002778r 1 F5 FF FF 9F .dword 9ffffff5h +00277Cr 1 F6 FF FF 9F .dword 9ffffff6h +002780r 1 F7 FF FF 9F .dword 9ffffff7h +002784r 1 F8 FF FF 9F .dword 9ffffff8h +002788r 1 F9 FF FF 9F .dword 9ffffff9h +00278Cr 1 FA FF FF 9F .dword 9ffffffah +002790r 1 FB FF FF 9F .dword 9ffffffbh +002794r 1 FC FF FF 9F .dword 9ffffffch +002798r 1 FD FF FF 9F .dword 9ffffffdh +00279Cr 1 FE FF FF 9F .dword 9ffffffeh +0027A0r 1 FF FF FF 9F .dword 9fffffffh +0027A4r 1 00 00 00 A0 .dword 0a0000000h +0027A8r 1 01 00 00 A0 .dword 0a0000001h +0027ACr 1 02 00 00 A0 .dword 0a0000002h +0027B0r 1 03 00 00 A0 .dword 0a0000003h +0027B4r 1 04 00 00 A0 .dword 0a0000004h +0027B8r 1 05 00 00 A0 .dword 0a0000005h +0027BCr 1 06 00 00 A0 .dword 0a0000006h +0027C0r 1 07 00 00 A0 .dword 0a0000007h +0027C4r 1 08 00 00 A0 .dword 0a0000008h +0027C8r 1 09 00 00 A0 .dword 0a0000009h +0027CCr 1 0A 00 00 A0 .dword 0a000000ah +0027D0r 1 0B 00 00 A0 .dword 0a000000bh +0027D4r 1 0C 00 00 A0 .dword 0a000000ch +0027D8r 1 0D 00 00 A0 .dword 0a000000dh +0027DCr 1 0E 00 00 A0 .dword 0a000000eh +0027E0r 1 0F 00 00 A0 .dword 0a000000fh +0027E4r 1 F0 FF FF FF .dword 0fffffff0h +0027E8r 1 F1 FF FF FF .dword 0fffffff1h +0027ECr 1 F2 FF FF FF .dword 0fffffff2h +0027F0r 1 F3 FF FF FF .dword 0fffffff3h +0027F4r 1 F4 FF FF FF .dword 0fffffff4h +0027F8r 1 F5 FF FF FF .dword 0fffffff5h +0027FCr 1 F6 FF FF FF .dword 0fffffff6h +002800r 1 F7 FF FF FF .dword 0fffffff7h +002804r 1 F8 FF FF FF .dword 0fffffff8h +002808r 1 F9 FF FF FF .dword 0fffffff9h +00280Cr 1 FA FF FF FF .dword 0fffffffah +002810r 1 FB FF FF FF .dword 0fffffffbh +002814r 1 FC FF FF FF .dword 0fffffffch +002818r 1 FD FF FF FF .dword 0fffffffdh +00281Cr 1 FE FF FF FF .dword 0fffffffeh +002820r 1 FF FF FF FF .dword 0ffffffffh +002824r 1 +002824r 1 ; alternative hex values, uppercase +002824r 1 00 00 00 00 .dword 0h +002828r 1 01 00 00 00 .dword 1h +00282Cr 1 02 00 00 00 .dword 2h +002830r 1 03 00 00 00 .dword 3h +002834r 1 04 00 00 00 .dword 4h +002838r 1 05 00 00 00 .dword 5h +00283Cr 1 06 00 00 00 .dword 6h +002840r 1 07 00 00 00 .dword 7h +002844r 1 08 00 00 00 .dword 8h +002848r 1 09 00 00 00 .dword 9h +00284Cr 1 0A 00 00 00 .dword 0Ah +002850r 1 0B 00 00 00 .dword 0Bh +002854r 1 0C 00 00 00 .dword 0Ch +002858r 1 0D 00 00 00 .dword 0Dh +00285Cr 1 0E 00 00 00 .dword 0Eh +002860r 1 0F 00 00 00 .dword 0Fh +002864r 1 10 00 00 00 .dword 10h +002868r 1 11 00 00 00 .dword 11h +00286Cr 1 12 00 00 00 .dword 12h +002870r 1 13 00 00 00 .dword 13h +002874r 1 70 00 00 00 .dword 70h +002878r 1 71 00 00 00 .dword 71h +00287Cr 1 72 00 00 00 .dword 72h +002880r 1 73 00 00 00 .dword 73h +002884r 1 74 00 00 00 .dword 74h +002888r 1 75 00 00 00 .dword 75h +00288Cr 1 76 00 00 00 .dword 76h +002890r 1 77 00 00 00 .dword 77h +002894r 1 78 00 00 00 .dword 78h +002898r 1 79 00 00 00 .dword 79h +00289Cr 1 7A 00 00 00 .dword 7Ah +0028A0r 1 7B 00 00 00 .dword 7Bh +0028A4r 1 7C 00 00 00 .dword 7Ch +0028A8r 1 7D 00 00 00 .dword 7Dh +0028ACr 1 7E 00 00 00 .dword 7Eh +0028B0r 1 7F 00 00 00 .dword 7Fh +0028B4r 1 80 00 00 00 .dword 80h +0028B8r 1 81 00 00 00 .dword 81h +0028BCr 1 82 00 00 00 .dword 82h +0028C0r 1 83 00 00 00 .dword 83h +0028C4r 1 84 00 00 00 .dword 84h +0028C8r 1 85 00 00 00 .dword 85h +0028CCr 1 86 00 00 00 .dword 86h +0028D0r 1 F0 00 00 00 .dword 0F0h +0028D4r 1 F1 00 00 00 .dword 0F1h +0028D8r 1 F2 00 00 00 .dword 0F2h +0028DCr 1 F3 00 00 00 .dword 0F3h +0028E0r 1 F4 00 00 00 .dword 0F4h +0028E4r 1 F5 00 00 00 .dword 0F5h +0028E8r 1 F6 00 00 00 .dword 0F6h +0028ECr 1 F7 00 00 00 .dword 0F7h +0028F0r 1 F8 00 00 00 .dword 0F8h +0028F4r 1 F9 00 00 00 .dword 0F9h +0028F8r 1 FA 00 00 00 .dword 0FAh +0028FCr 1 FB 00 00 00 .dword 0FBh +002900r 1 FC 00 00 00 .dword 0FCh +002904r 1 FD 00 00 00 .dword 0FDh +002908r 1 FE 00 00 00 .dword 0FEh +00290Cr 1 FF 00 00 00 .dword 0FFh +002910r 1 00 01 00 00 .dword 100h +002914r 1 01 01 00 00 .dword 101h +002918r 1 02 01 00 00 .dword 102h +00291Cr 1 03 01 00 00 .dword 103h +002920r 1 D2 0F 00 00 .dword 0FD2h +002924r 1 D3 0F 00 00 .dword 0FD3h +002928r 1 D4 0F 00 00 .dword 0FD4h +00292Cr 1 D5 0F 00 00 .dword 0FD5h +002930r 1 D6 0F 00 00 .dword 0FD6h +002934r 1 D7 0F 00 00 .dword 0FD7h +002938r 1 D8 0F 00 00 .dword 0FD8h +00293Cr 1 D9 0F 00 00 .dword 0FD9h +002940r 1 DA 0F 00 00 .dword 0FDAh +002944r 1 DB 0F 00 00 .dword 0FDBh +002948r 1 DC 0F 00 00 .dword 0FDCh +00294Cr 1 DD 0F 00 00 .dword 0FDDh +002950r 1 DE 0F 00 00 .dword 0FDEh +002954r 1 DF 0F 00 00 .dword 0FDFh +002958r 1 E0 0F 00 00 .dword 0FE0h +00295Cr 1 E1 0F 00 00 .dword 0FE1h +002960r 1 E2 0F 00 00 .dword 0FE2h +002964r 1 E3 0F 00 00 .dword 0FE3h +002968r 1 E4 0F 00 00 .dword 0FE4h +00296Cr 1 E5 0F 00 00 .dword 0FE5h +002970r 1 E6 0F 00 00 .dword 0FE6h +002974r 1 E7 0F 00 00 .dword 0FE7h +002978r 1 E8 0F 00 00 .dword 0FE8h +00297Cr 1 E9 0F 00 00 .dword 0FE9h +002980r 1 EA 0F 00 00 .dword 0FEAh +002984r 1 EB 0F 00 00 .dword 0FEBh +002988r 1 EC 0F 00 00 .dword 0FECh +00298Cr 1 ED 0F 00 00 .dword 0FEDh +002990r 1 EE 0F 00 00 .dword 0FEEh +002994r 1 EF 0F 00 00 .dword 0FEFh +002998r 1 F0 0F 00 00 .dword 0FF0h +00299Cr 1 F1 0F 00 00 .dword 0FF1h +0029A0r 1 F2 0F 00 00 .dword 0FF2h +0029A4r 1 F3 0F 00 00 .dword 0FF3h +0029A8r 1 F4 0F 00 00 .dword 0FF4h +0029ACr 1 F5 0F 00 00 .dword 0FF5h +0029B0r 1 F6 0F 00 00 .dword 0FF6h +0029B4r 1 F7 0F 00 00 .dword 0FF7h +0029B8r 1 F8 0F 00 00 .dword 0FF8h +0029BCr 1 F9 0F 00 00 .dword 0FF9h +0029C0r 1 FA 0F 00 00 .dword 0FFAh +0029C4r 1 FB 0F 00 00 .dword 0FFBh +0029C8r 1 FC 0F 00 00 .dword 0FFCh +0029CCr 1 FD 0F 00 00 .dword 0FFDh +0029D0r 1 FE 0F 00 00 .dword 0FFEh +0029D4r 1 FF 0F 00 00 .dword 0FFFh +0029D8r 1 00 10 00 00 .dword 1000h +0029DCr 1 01 10 00 00 .dword 1001h +0029E0r 1 02 10 00 00 .dword 1002h +0029E4r 1 03 10 00 00 .dword 1003h +0029E8r 1 04 10 00 00 .dword 1004h +0029ECr 1 05 10 00 00 .dword 1005h +0029F0r 1 06 10 00 00 .dword 1006h +0029F4r 1 07 10 00 00 .dword 1007h +0029F8r 1 08 10 00 00 .dword 1008h +0029FCr 1 F0 7F 00 00 .dword 7FF0h +002A00r 1 F1 7F 00 00 .dword 7FF1h +002A04r 1 F2 7F 00 00 .dword 7FF2h +002A08r 1 F3 7F 00 00 .dword 7FF3h +002A0Cr 1 F4 7F 00 00 .dword 7FF4h +002A10r 1 F5 7F 00 00 .dword 7FF5h +002A14r 1 F6 7F 00 00 .dword 7FF6h +002A18r 1 F7 7F 00 00 .dword 7FF7h +002A1Cr 1 F8 7F 00 00 .dword 7FF8h +002A20r 1 F9 7F 00 00 .dword 7FF9h +002A24r 1 FA 7F 00 00 .dword 7FFAh +002A28r 1 FB 7F 00 00 .dword 7FFBh +002A2Cr 1 FC 7F 00 00 .dword 7FFCh +002A30r 1 FD 7F 00 00 .dword 7FFDh +002A34r 1 FE 7F 00 00 .dword 7FFEh +002A38r 1 FF 7F 00 00 .dword 7FFFh +002A3Cr 1 00 80 00 00 .dword 8000h +002A40r 1 01 80 00 00 .dword 8001h +002A44r 1 02 80 00 00 .dword 8002h +002A48r 1 03 80 00 00 .dword 8003h +002A4Cr 1 04 80 00 00 .dword 8004h +002A50r 1 05 80 00 00 .dword 8005h +002A54r 1 06 80 00 00 .dword 8006h +002A58r 1 07 80 00 00 .dword 8007h +002A5Cr 1 08 80 00 00 .dword 8008h +002A60r 1 09 80 00 00 .dword 8009h +002A64r 1 0A 80 00 00 .dword 800Ah +002A68r 1 0B 80 00 00 .dword 800Bh +002A6Cr 1 E1 9F 00 00 .dword 9FE1h +002A70r 1 E2 9F 00 00 .dword 9FE2h +002A74r 1 E3 9F 00 00 .dword 9FE3h +002A78r 1 E4 9F 00 00 .dword 9FE4h +002A7Cr 1 E5 9F 00 00 .dword 9FE5h +002A80r 1 E6 9F 00 00 .dword 9FE6h +002A84r 1 E7 9F 00 00 .dword 9FE7h +002A88r 1 E8 9F 00 00 .dword 9FE8h +002A8Cr 1 E9 9F 00 00 .dword 9FE9h +002A90r 1 EA 9F 00 00 .dword 9FEAh +002A94r 1 EB 9F 00 00 .dword 9FEBh +002A98r 1 EC 9F 00 00 .dword 9FECh +002A9Cr 1 ED 9F 00 00 .dword 9FEDh +002AA0r 1 EE 9F 00 00 .dword 9FEEh +002AA4r 1 EF 9F 00 00 .dword 9FEFh +002AA8r 1 F0 9F 00 00 .dword 9FF0h +002AACr 1 F1 9F 00 00 .dword 9FF1h +002AB0r 1 F2 9F 00 00 .dword 9FF2h +002AB4r 1 F3 9F 00 00 .dword 9FF3h +002AB8r 1 F4 9F 00 00 .dword 9FF4h +002ABCr 1 F5 9F 00 00 .dword 9FF5h +002AC0r 1 F6 9F 00 00 .dword 9FF6h +002AC4r 1 F7 9F 00 00 .dword 9FF7h +002AC8r 1 F8 9F 00 00 .dword 9FF8h +002ACCr 1 F9 9F 00 00 .dword 9FF9h +002AD0r 1 FA 9F 00 00 .dword 9FFAh +002AD4r 1 FB 9F 00 00 .dword 9FFBh +002AD8r 1 FC 9F 00 00 .dword 9FFCh +002ADCr 1 FD 9F 00 00 .dword 9FFDh +002AE0r 1 FE 9F 00 00 .dword 9FFEh +002AE4r 1 FF 9F 00 00 .dword 9FFFh +002AE8r 1 00 A0 00 00 .dword 0A000h +002AECr 1 01 A0 00 00 .dword 0A001h +002AF0r 1 02 A0 00 00 .dword 0A002h +002AF4r 1 03 A0 00 00 .dword 0A003h +002AF8r 1 04 A0 00 00 .dword 0A004h +002AFCr 1 05 A0 00 00 .dword 0A005h +002B00r 1 06 A0 00 00 .dword 0A006h +002B04r 1 07 A0 00 00 .dword 0A007h +002B08r 1 08 A0 00 00 .dword 0A008h +002B0Cr 1 09 A0 00 00 .dword 0A009h +002B10r 1 0A A0 00 00 .dword 0A00Ah +002B14r 1 0B A0 00 00 .dword 0A00Bh +002B18r 1 0C A0 00 00 .dword 0A00Ch +002B1Cr 1 0D A0 00 00 .dword 0A00Dh +002B20r 1 0E A0 00 00 .dword 0A00Eh +002B24r 1 0F A0 00 00 .dword 0A00Fh +002B28r 1 E1 AF 00 00 .dword 0AFE1h +002B2Cr 1 E2 AF 00 00 .dword 0AFE2h +002B30r 1 E3 AF 00 00 .dword 0AFE3h +002B34r 1 E4 AF 00 00 .dword 0AFE4h +002B38r 1 E5 AF 00 00 .dword 0AFE5h +002B3Cr 1 E6 AF 00 00 .dword 0AFE6h +002B40r 1 E7 AF 00 00 .dword 0AFE7h +002B44r 1 E8 AF 00 00 .dword 0AFE8h +002B48r 1 E9 AF 00 00 .dword 0AFE9h +002B4Cr 1 EA AF 00 00 .dword 0AFEAh +002B50r 1 EB AF 00 00 .dword 0AFEBh +002B54r 1 EC AF 00 00 .dword 0AFECh +002B58r 1 ED AF 00 00 .dword 0AFEDh +002B5Cr 1 EE AF 00 00 .dword 0AFEEh +002B60r 1 EF AF 00 00 .dword 0AFEFh +002B64r 1 F0 AF 00 00 .dword 0AFF0h +002B68r 1 F1 AF 00 00 .dword 0AFF1h +002B6Cr 1 F2 AF 00 00 .dword 0AFF2h +002B70r 1 F3 AF 00 00 .dword 0AFF3h +002B74r 1 F4 AF 00 00 .dword 0AFF4h +002B78r 1 F5 AF 00 00 .dword 0AFF5h +002B7Cr 1 F6 AF 00 00 .dword 0AFF6h +002B80r 1 F7 AF 00 00 .dword 0AFF7h +002B84r 1 F8 AF 00 00 .dword 0AFF8h +002B88r 1 F9 AF 00 00 .dword 0AFF9h +002B8Cr 1 FA AF 00 00 .dword 0AFFAh +002B90r 1 FB AF 00 00 .dword 0AFFBh +002B94r 1 FC AF 00 00 .dword 0AFFCh +002B98r 1 FD AF 00 00 .dword 0AFFDh +002B9Cr 1 FE AF 00 00 .dword 0AFFEh +002BA0r 1 FF AF 00 00 .dword 0AFFFh +002BA4r 1 00 B0 00 00 .dword 0B000h +002BA8r 1 01 B0 00 00 .dword 0B001h +002BACr 1 02 B0 00 00 .dword 0B002h +002BB0r 1 03 B0 00 00 .dword 0B003h +002BB4r 1 04 B0 00 00 .dword 0B004h +002BB8r 1 05 B0 00 00 .dword 0B005h +002BBCr 1 06 B0 00 00 .dword 0B006h +002BC0r 1 07 B0 00 00 .dword 0B007h +002BC4r 1 08 B0 00 00 .dword 0B008h +002BC8r 1 09 B0 00 00 .dword 0B009h +002BCCr 1 0A B0 00 00 .dword 0B00Ah +002BD0r 1 0B B0 00 00 .dword 0B00Bh +002BD4r 1 0C B0 00 00 .dword 0B00Ch +002BD8r 1 0D B0 00 00 .dword 0B00Dh +002BDCr 1 0E B0 00 00 .dword 0B00Eh +002BE0r 1 0F B0 00 00 .dword 0B00Fh +002BE4r 1 E1 FF 00 00 .dword 0FFE1h +002BE8r 1 E2 FF 00 00 .dword 0FFE2h +002BECr 1 E3 FF 00 00 .dword 0FFE3h +002BF0r 1 E4 FF 00 00 .dword 0FFE4h +002BF4r 1 E5 FF 00 00 .dword 0FFE5h +002BF8r 1 E6 FF 00 00 .dword 0FFE6h +002BFCr 1 E7 FF 00 00 .dword 0FFE7h +002C00r 1 E8 FF 00 00 .dword 0FFE8h +002C04r 1 E9 FF 00 00 .dword 0FFE9h +002C08r 1 EA FF 00 00 .dword 0FFEAh +002C0Cr 1 EB FF 00 00 .dword 0FFEBh +002C10r 1 EC FF 00 00 .dword 0FFECh +002C14r 1 ED FF 00 00 .dword 0FFEDh +002C18r 1 EE FF 00 00 .dword 0FFEEh +002C1Cr 1 EF FF 00 00 .dword 0FFEFh +002C20r 1 F0 FF 00 00 .dword 0FFF0h +002C24r 1 F1 FF 00 00 .dword 0FFF1h +002C28r 1 F2 FF 00 00 .dword 0FFF2h +002C2Cr 1 F3 FF 00 00 .dword 0FFF3h +002C30r 1 F4 FF 00 00 .dword 0FFF4h +002C34r 1 F5 FF 00 00 .dword 0FFF5h +002C38r 1 F6 FF 00 00 .dword 0FFF6h +002C3Cr 1 F7 FF 00 00 .dword 0FFF7h +002C40r 1 F8 FF 00 00 .dword 0FFF8h +002C44r 1 F9 FF 00 00 .dword 0FFF9h +002C48r 1 FA FF 00 00 .dword 0FFFAh +002C4Cr 1 FB FF 00 00 .dword 0FFFBh +002C50r 1 FC FF 00 00 .dword 0FFFCh +002C54r 1 FD FF 00 00 .dword 0FFFDh +002C58r 1 FE FF 00 00 .dword 0FFFEh +002C5Cr 1 FF FF 00 00 .dword 0FFFFh +002C60r 1 00 00 01 00 .dword 10000h +002C64r 1 01 00 01 00 .dword 10001h +002C68r 1 02 00 01 00 .dword 10002h +002C6Cr 1 03 00 01 00 .dword 10003h +002C70r 1 04 00 01 00 .dword 10004h +002C74r 1 05 00 01 00 .dword 10005h +002C78r 1 06 00 01 00 .dword 10006h +002C7Cr 1 07 00 01 00 .dword 10007h +002C80r 1 08 00 01 00 .dword 10008h +002C84r 1 09 00 01 00 .dword 10009h +002C88r 1 0A 00 01 00 .dword 1000Ah +002C8Cr 1 0B 00 01 00 .dword 1000Bh +002C90r 1 0C 00 01 00 .dword 1000Ch +002C94r 1 0D 00 01 00 .dword 1000Dh +002C98r 1 0E 00 01 00 .dword 1000Eh +002C9Cr 1 0F 00 01 00 .dword 1000Fh +002CA0r 1 F0 FF FF 7F .dword 7FFFFFF0h +002CA4r 1 F1 FF FF 7F .dword 7FFFFFF1h +002CA8r 1 F2 FF FF 7F .dword 7FFFFFF2h +002CACr 1 F3 FF FF 7F .dword 7FFFFFF3h +002CB0r 1 F4 FF FF 7F .dword 7FFFFFF4h +002CB4r 1 F5 FF FF 7F .dword 7FFFFFF5h +002CB8r 1 F6 FF FF 7F .dword 7FFFFFF6h +002CBCr 1 F7 FF FF 7F .dword 7FFFFFF7h +002CC0r 1 F8 FF FF 7F .dword 7FFFFFF8h +002CC4r 1 F9 FF FF 7F .dword 7FFFFFF9h +002CC8r 1 FA FF FF 7F .dword 7FFFFFFAh +002CCCr 1 FB FF FF 7F .dword 7FFFFFFBh +002CD0r 1 FC FF FF 7F .dword 7FFFFFFCh +002CD4r 1 FD FF FF 7F .dword 7FFFFFFDh +002CD8r 1 FE FF FF 7F .dword 7FFFFFFEh +002CDCr 1 FF FF FF 7F .dword 7FFFFFFFh +002CE0r 1 00 00 00 80 .dword 80000000h +002CE4r 1 01 00 00 80 .dword 80000001h +002CE8r 1 02 00 00 80 .dword 80000002h +002CECr 1 03 00 00 80 .dword 80000003h +002CF0r 1 04 00 00 80 .dword 80000004h +002CF4r 1 05 00 00 80 .dword 80000005h +002CF8r 1 06 00 00 80 .dword 80000006h +002CFCr 1 07 00 00 80 .dword 80000007h +002D00r 1 08 00 00 80 .dword 80000008h +002D04r 1 09 00 00 80 .dword 80000009h +002D08r 1 0A 00 00 80 .dword 8000000Ah +002D0Cr 1 0B 00 00 80 .dword 8000000Bh +002D10r 1 0C 00 00 80 .dword 8000000Ch +002D14r 1 0D 00 00 80 .dword 8000000Dh +002D18r 1 0E 00 00 80 .dword 8000000Eh +002D1Cr 1 0F 00 00 80 .dword 8000000Fh +002D20r 1 F0 FF FF 9F .dword 9FFFFFF0h +002D24r 1 F1 FF FF 9F .dword 9FFFFFF1h +002D28r 1 F2 FF FF 9F .dword 9FFFFFF2h +002D2Cr 1 F3 FF FF 9F .dword 9FFFFFF3h +002D30r 1 F4 FF FF 9F .dword 9FFFFFF4h +002D34r 1 F5 FF FF 9F .dword 9FFFFFF5h +002D38r 1 F6 FF FF 9F .dword 9FFFFFF6h +002D3Cr 1 F7 FF FF 9F .dword 9FFFFFF7h +002D40r 1 F8 FF FF 9F .dword 9FFFFFF8h +002D44r 1 F9 FF FF 9F .dword 9FFFFFF9h +002D48r 1 FA FF FF 9F .dword 9FFFFFFAh +002D4Cr 1 FB FF FF 9F .dword 9FFFFFFBh +002D50r 1 FC FF FF 9F .dword 9FFFFFFCh +002D54r 1 FD FF FF 9F .dword 9FFFFFFDh +002D58r 1 FE FF FF 9F .dword 9FFFFFFEh +002D5Cr 1 FF FF FF 9F .dword 9FFFFFFFh +002D60r 1 00 00 00 A0 .dword 0A0000000h +002D64r 1 01 00 00 A0 .dword 0A0000001h +002D68r 1 02 00 00 A0 .dword 0A0000002h +002D6Cr 1 03 00 00 A0 .dword 0A0000003h +002D70r 1 04 00 00 A0 .dword 0A0000004h +002D74r 1 05 00 00 A0 .dword 0A0000005h +002D78r 1 06 00 00 A0 .dword 0A0000006h +002D7Cr 1 07 00 00 A0 .dword 0A0000007h +002D80r 1 08 00 00 A0 .dword 0A0000008h +002D84r 1 09 00 00 A0 .dword 0A0000009h +002D88r 1 0A 00 00 A0 .dword 0A000000Ah +002D8Cr 1 0B 00 00 A0 .dword 0A000000Bh +002D90r 1 0C 00 00 A0 .dword 0A000000Ch +002D94r 1 0D 00 00 A0 .dword 0A000000Dh +002D98r 1 0E 00 00 A0 .dword 0A000000Eh +002D9Cr 1 0F 00 00 A0 .dword 0A000000Fh +002DA0r 1 F0 FF FF FF .dword 0FFFFFFF0h +002DA4r 1 F1 FF FF FF .dword 0FFFFFFF1h +002DA8r 1 F2 FF FF FF .dword 0FFFFFFF2h +002DACr 1 F3 FF FF FF .dword 0FFFFFFF3h +002DB0r 1 F4 FF FF FF .dword 0FFFFFFF4h +002DB4r 1 F5 FF FF FF .dword 0FFFFFFF5h +002DB8r 1 F6 FF FF FF .dword 0FFFFFFF6h +002DBCr 1 F7 FF FF FF .dword 0FFFFFFF7h +002DC0r 1 F8 FF FF FF .dword 0FFFFFFF8h +002DC4r 1 F9 FF FF FF .dword 0FFFFFFF9h +002DC8r 1 FA FF FF FF .dword 0FFFFFFFAh +002DCCr 1 FB FF FF FF .dword 0FFFFFFFBh +002DD0r 1 FC FF FF FF .dword 0FFFFFFFCh +002DD4r 1 FD FF FF FF .dword 0FFFFFFFDh +002DD8r 1 FE FF FF FF .dword 0FFFFFFFEh +002DDCr 1 FF FF FF FF .dword 0FFFFFFFFh +002DE0r 1 +002DE0r 1 ; alternative 8-digit hex values +002DE0r 1 00 00 00 00 .dword 00000000h +002DE4r 1 01 00 00 00 .dword 00000001h +002DE8r 1 02 00 00 00 .dword 00000002h +002DECr 1 03 00 00 00 .dword 00000003h +002DF0r 1 04 00 00 00 .dword 00000004h +002DF4r 1 05 00 00 00 .dword 00000005h +002DF8r 1 06 00 00 00 .dword 00000006h +002DFCr 1 07 00 00 00 .dword 00000007h +002E00r 1 08 00 00 00 .dword 00000008h +002E04r 1 09 00 00 00 .dword 00000009h +002E08r 1 0A 00 00 00 .dword 0000000ah +002E0Cr 1 0B 00 00 00 .dword 0000000bh +002E10r 1 0C 00 00 00 .dword 0000000ch +002E14r 1 0D 00 00 00 .dword 0000000dh +002E18r 1 0E 00 00 00 .dword 0000000eh +002E1Cr 1 0F 00 00 00 .dword 0000000fh +002E20r 1 10 00 00 00 .dword 00000010h +002E24r 1 11 00 00 00 .dword 00000011h +002E28r 1 12 00 00 00 .dword 00000012h +002E2Cr 1 13 00 00 00 .dword 00000013h +002E30r 1 70 00 00 00 .dword 00000070h +002E34r 1 71 00 00 00 .dword 00000071h +002E38r 1 72 00 00 00 .dword 00000072h +002E3Cr 1 73 00 00 00 .dword 00000073h +002E40r 1 74 00 00 00 .dword 00000074h +002E44r 1 75 00 00 00 .dword 00000075h +002E48r 1 76 00 00 00 .dword 00000076h +002E4Cr 1 77 00 00 00 .dword 00000077h +002E50r 1 78 00 00 00 .dword 00000078h +002E54r 1 79 00 00 00 .dword 00000079h +002E58r 1 7A 00 00 00 .dword 0000007ah +002E5Cr 1 7B 00 00 00 .dword 0000007bh +002E60r 1 7C 00 00 00 .dword 0000007ch +002E64r 1 7D 00 00 00 .dword 0000007dh +002E68r 1 7E 00 00 00 .dword 0000007eh +002E6Cr 1 7F 00 00 00 .dword 0000007fh +002E70r 1 80 00 00 00 .dword 00000080h +002E74r 1 81 00 00 00 .dword 00000081h +002E78r 1 82 00 00 00 .dword 00000082h +002E7Cr 1 83 00 00 00 .dword 00000083h +002E80r 1 84 00 00 00 .dword 00000084h +002E84r 1 85 00 00 00 .dword 00000085h +002E88r 1 86 00 00 00 .dword 00000086h +002E8Cr 1 F0 00 00 00 .dword 000000f0h +002E90r 1 F1 00 00 00 .dword 000000f1h +002E94r 1 F2 00 00 00 .dword 000000f2h +002E98r 1 F3 00 00 00 .dword 000000f3h +002E9Cr 1 F4 00 00 00 .dword 000000f4h +002EA0r 1 F5 00 00 00 .dword 000000f5h +002EA4r 1 F6 00 00 00 .dword 000000f6h +002EA8r 1 F7 00 00 00 .dword 000000f7h +002EACr 1 F8 00 00 00 .dword 000000f8h +002EB0r 1 F9 00 00 00 .dword 000000f9h +002EB4r 1 FA 00 00 00 .dword 000000fah +002EB8r 1 FB 00 00 00 .dword 000000fbh +002EBCr 1 FC 00 00 00 .dword 000000fch +002EC0r 1 FD 00 00 00 .dword 000000fdh +002EC4r 1 FE 00 00 00 .dword 000000feh +002EC8r 1 FF 00 00 00 .dword 000000ffh +002ECCr 1 00 01 00 00 .dword 00000100h +002ED0r 1 01 01 00 00 .dword 00000101h +002ED4r 1 02 01 00 00 .dword 00000102h +002ED8r 1 03 01 00 00 .dword 00000103h +002EDCr 1 D2 0F 00 00 .dword 00000fd2h +002EE0r 1 D3 0F 00 00 .dword 00000fd3h +002EE4r 1 D4 0F 00 00 .dword 00000fd4h +002EE8r 1 D5 0F 00 00 .dword 00000fd5h +002EECr 1 D6 0F 00 00 .dword 00000fd6h +002EF0r 1 D7 0F 00 00 .dword 00000fd7h +002EF4r 1 D8 0F 00 00 .dword 00000fd8h +002EF8r 1 D9 0F 00 00 .dword 00000fd9h +002EFCr 1 DA 0F 00 00 .dword 00000fdah +002F00r 1 DB 0F 00 00 .dword 00000fdbh +002F04r 1 DC 0F 00 00 .dword 00000fdch +002F08r 1 DD 0F 00 00 .dword 00000fddh +002F0Cr 1 DE 0F 00 00 .dword 00000fdeh +002F10r 1 DF 0F 00 00 .dword 00000fdfh +002F14r 1 E0 0F 00 00 .dword 00000fe0h +002F18r 1 E1 0F 00 00 .dword 00000fe1h +002F1Cr 1 E2 0F 00 00 .dword 00000fe2h +002F20r 1 E3 0F 00 00 .dword 00000fe3h +002F24r 1 E4 0F 00 00 .dword 00000fe4h +002F28r 1 E5 0F 00 00 .dword 00000fe5h +002F2Cr 1 E6 0F 00 00 .dword 00000fe6h +002F30r 1 E7 0F 00 00 .dword 00000fe7h +002F34r 1 E8 0F 00 00 .dword 00000fe8h +002F38r 1 E9 0F 00 00 .dword 00000fe9h +002F3Cr 1 EA 0F 00 00 .dword 00000feah +002F40r 1 EB 0F 00 00 .dword 00000febh +002F44r 1 EC 0F 00 00 .dword 00000fech +002F48r 1 ED 0F 00 00 .dword 00000fedh +002F4Cr 1 EE 0F 00 00 .dword 00000feeh +002F50r 1 EF 0F 00 00 .dword 00000fefh +002F54r 1 F0 0F 00 00 .dword 00000ff0h +002F58r 1 F1 0F 00 00 .dword 00000ff1h +002F5Cr 1 F2 0F 00 00 .dword 00000ff2h +002F60r 1 F3 0F 00 00 .dword 00000ff3h +002F64r 1 F4 0F 00 00 .dword 00000ff4h +002F68r 1 F5 0F 00 00 .dword 00000ff5h +002F6Cr 1 F6 0F 00 00 .dword 00000ff6h +002F70r 1 F7 0F 00 00 .dword 00000ff7h +002F74r 1 F8 0F 00 00 .dword 00000ff8h +002F78r 1 F9 0F 00 00 .dword 00000ff9h +002F7Cr 1 FA 0F 00 00 .dword 00000ffah +002F80r 1 FB 0F 00 00 .dword 00000ffbh +002F84r 1 FC 0F 00 00 .dword 00000ffch +002F88r 1 FD 0F 00 00 .dword 00000ffdh +002F8Cr 1 FE 0F 00 00 .dword 00000ffeh +002F90r 1 FF 0F 00 00 .dword 00000fffh +002F94r 1 00 10 00 00 .dword 00001000h +002F98r 1 01 10 00 00 .dword 00001001h +002F9Cr 1 02 10 00 00 .dword 00001002h +002FA0r 1 03 10 00 00 .dword 00001003h +002FA4r 1 04 10 00 00 .dword 00001004h +002FA8r 1 05 10 00 00 .dword 00001005h +002FACr 1 06 10 00 00 .dword 00001006h +002FB0r 1 07 10 00 00 .dword 00001007h +002FB4r 1 08 10 00 00 .dword 00001008h +002FB8r 1 F0 7F 00 00 .dword 00007ff0h +002FBCr 1 F1 7F 00 00 .dword 00007ff1h +002FC0r 1 F2 7F 00 00 .dword 00007ff2h +002FC4r 1 F3 7F 00 00 .dword 00007ff3h +002FC8r 1 F4 7F 00 00 .dword 00007ff4h +002FCCr 1 F5 7F 00 00 .dword 00007ff5h +002FD0r 1 F6 7F 00 00 .dword 00007ff6h +002FD4r 1 F7 7F 00 00 .dword 00007ff7h +002FD8r 1 F8 7F 00 00 .dword 00007ff8h +002FDCr 1 F9 7F 00 00 .dword 00007ff9h +002FE0r 1 FA 7F 00 00 .dword 00007ffah +002FE4r 1 FB 7F 00 00 .dword 00007ffbh +002FE8r 1 FC 7F 00 00 .dword 00007ffch +002FECr 1 FD 7F 00 00 .dword 00007ffdh +002FF0r 1 FE 7F 00 00 .dword 00007ffeh +002FF4r 1 FF 7F 00 00 .dword 00007fffh +002FF8r 1 00 80 00 00 .dword 00008000h +002FFCr 1 01 80 00 00 .dword 00008001h +003000r 1 02 80 00 00 .dword 00008002h +003004r 1 03 80 00 00 .dword 00008003h +003008r 1 04 80 00 00 .dword 00008004h +00300Cr 1 05 80 00 00 .dword 00008005h +003010r 1 06 80 00 00 .dword 00008006h +003014r 1 07 80 00 00 .dword 00008007h +003018r 1 08 80 00 00 .dword 00008008h +00301Cr 1 09 80 00 00 .dword 00008009h +003020r 1 0A 80 00 00 .dword 0000800ah +003024r 1 0B 80 00 00 .dword 0000800bh +003028r 1 E1 9F 00 00 .dword 00009fe1h +00302Cr 1 E2 9F 00 00 .dword 00009fe2h +003030r 1 E3 9F 00 00 .dword 00009fe3h +003034r 1 E4 9F 00 00 .dword 00009fe4h +003038r 1 E5 9F 00 00 .dword 00009fe5h +00303Cr 1 E6 9F 00 00 .dword 00009fe6h +003040r 1 E7 9F 00 00 .dword 00009fe7h +003044r 1 E8 9F 00 00 .dword 00009fe8h +003048r 1 E9 9F 00 00 .dword 00009fe9h +00304Cr 1 EA 9F 00 00 .dword 00009feah +003050r 1 EB 9F 00 00 .dword 00009febh +003054r 1 EC 9F 00 00 .dword 00009fech +003058r 1 ED 9F 00 00 .dword 00009fedh +00305Cr 1 EE 9F 00 00 .dword 00009feeh +003060r 1 EF 9F 00 00 .dword 00009fefh +003064r 1 F0 9F 00 00 .dword 00009ff0h +003068r 1 F1 9F 00 00 .dword 00009ff1h +00306Cr 1 F2 9F 00 00 .dword 00009ff2h +003070r 1 F3 9F 00 00 .dword 00009ff3h +003074r 1 F4 9F 00 00 .dword 00009ff4h +003078r 1 F5 9F 00 00 .dword 00009ff5h +00307Cr 1 F6 9F 00 00 .dword 00009ff6h +003080r 1 F7 9F 00 00 .dword 00009ff7h +003084r 1 F8 9F 00 00 .dword 00009ff8h +003088r 1 F9 9F 00 00 .dword 00009ff9h +00308Cr 1 FA 9F 00 00 .dword 00009ffah +003090r 1 FB 9F 00 00 .dword 00009ffbh +003094r 1 FC 9F 00 00 .dword 00009ffch +003098r 1 FD 9F 00 00 .dword 00009ffdh +00309Cr 1 FE 9F 00 00 .dword 00009ffeh +0030A0r 1 FF 9F 00 00 .dword 00009fffh +0030A4r 1 00 A0 00 00 .dword 0000a000h +0030A8r 1 01 A0 00 00 .dword 0000a001h +0030ACr 1 02 A0 00 00 .dword 0000a002h +0030B0r 1 03 A0 00 00 .dword 0000a003h +0030B4r 1 04 A0 00 00 .dword 0000a004h +0030B8r 1 05 A0 00 00 .dword 0000a005h +0030BCr 1 06 A0 00 00 .dword 0000a006h +0030C0r 1 07 A0 00 00 .dword 0000a007h +0030C4r 1 08 A0 00 00 .dword 0000a008h +0030C8r 1 09 A0 00 00 .dword 0000a009h +0030CCr 1 0A A0 00 00 .dword 0000a00ah +0030D0r 1 0B A0 00 00 .dword 0000a00bh +0030D4r 1 0C A0 00 00 .dword 0000a00ch +0030D8r 1 0D A0 00 00 .dword 0000a00dh +0030DCr 1 0E A0 00 00 .dword 0000a00eh +0030E0r 1 0F A0 00 00 .dword 0000a00fh +0030E4r 1 E1 AF 00 00 .dword 0000afe1h +0030E8r 1 E2 AF 00 00 .dword 0000afe2h +0030ECr 1 E3 AF 00 00 .dword 0000afe3h +0030F0r 1 E4 AF 00 00 .dword 0000afe4h +0030F4r 1 E5 AF 00 00 .dword 0000afe5h +0030F8r 1 E6 AF 00 00 .dword 0000afe6h +0030FCr 1 E7 AF 00 00 .dword 0000afe7h +003100r 1 E8 AF 00 00 .dword 0000afe8h +003104r 1 E9 AF 00 00 .dword 0000afe9h +003108r 1 EA AF 00 00 .dword 0000afeah +00310Cr 1 EB AF 00 00 .dword 0000afebh +003110r 1 EC AF 00 00 .dword 0000afech +003114r 1 ED AF 00 00 .dword 0000afedh +003118r 1 EE AF 00 00 .dword 0000afeeh +00311Cr 1 EF AF 00 00 .dword 0000afefh +003120r 1 F0 AF 00 00 .dword 0000aff0h +003124r 1 F1 AF 00 00 .dword 0000aff1h +003128r 1 F2 AF 00 00 .dword 0000aff2h +00312Cr 1 F3 AF 00 00 .dword 0000aff3h +003130r 1 F4 AF 00 00 .dword 0000aff4h +003134r 1 F5 AF 00 00 .dword 0000aff5h +003138r 1 F6 AF 00 00 .dword 0000aff6h +00313Cr 1 F7 AF 00 00 .dword 0000aff7h +003140r 1 F8 AF 00 00 .dword 0000aff8h +003144r 1 F9 AF 00 00 .dword 0000aff9h +003148r 1 FA AF 00 00 .dword 0000affah +00314Cr 1 FB AF 00 00 .dword 0000affbh +003150r 1 FC AF 00 00 .dword 0000affch +003154r 1 FD AF 00 00 .dword 0000affdh +003158r 1 FE AF 00 00 .dword 0000affeh +00315Cr 1 FF AF 00 00 .dword 0000afffh +003160r 1 00 B0 00 00 .dword 0000b000h +003164r 1 01 B0 00 00 .dword 0000b001h +003168r 1 02 B0 00 00 .dword 0000b002h +00316Cr 1 03 B0 00 00 .dword 0000b003h +003170r 1 04 B0 00 00 .dword 0000b004h +003174r 1 05 B0 00 00 .dword 0000b005h +003178r 1 06 B0 00 00 .dword 0000b006h +00317Cr 1 07 B0 00 00 .dword 0000b007h +003180r 1 08 B0 00 00 .dword 0000b008h +003184r 1 09 B0 00 00 .dword 0000b009h +003188r 1 0A B0 00 00 .dword 0000b00ah +00318Cr 1 0B B0 00 00 .dword 0000b00bh +003190r 1 0C B0 00 00 .dword 0000b00ch +003194r 1 0D B0 00 00 .dword 0000b00dh +003198r 1 0E B0 00 00 .dword 0000b00eh +00319Cr 1 0F B0 00 00 .dword 0000b00fh +0031A0r 1 E1 FF 00 00 .dword 0000ffe1h +0031A4r 1 E2 FF 00 00 .dword 0000ffe2h +0031A8r 1 E3 FF 00 00 .dword 0000ffe3h +0031ACr 1 E4 FF 00 00 .dword 0000ffe4h +0031B0r 1 E5 FF 00 00 .dword 0000ffe5h +0031B4r 1 E6 FF 00 00 .dword 0000ffe6h +0031B8r 1 E7 FF 00 00 .dword 0000ffe7h +0031BCr 1 E8 FF 00 00 .dword 0000ffe8h +0031C0r 1 E9 FF 00 00 .dword 0000ffe9h +0031C4r 1 EA FF 00 00 .dword 0000ffeah +0031C8r 1 EB FF 00 00 .dword 0000ffebh +0031CCr 1 EC FF 00 00 .dword 0000ffech +0031D0r 1 ED FF 00 00 .dword 0000ffedh +0031D4r 1 EE FF 00 00 .dword 0000ffeeh +0031D8r 1 EF FF 00 00 .dword 0000ffefh +0031DCr 1 F0 FF 00 00 .dword 0000fff0h +0031E0r 1 F1 FF 00 00 .dword 0000fff1h +0031E4r 1 F2 FF 00 00 .dword 0000fff2h +0031E8r 1 F3 FF 00 00 .dword 0000fff3h +0031ECr 1 F4 FF 00 00 .dword 0000fff4h +0031F0r 1 F5 FF 00 00 .dword 0000fff5h +0031F4r 1 F6 FF 00 00 .dword 0000fff6h +0031F8r 1 F7 FF 00 00 .dword 0000fff7h +0031FCr 1 F8 FF 00 00 .dword 0000fff8h +003200r 1 F9 FF 00 00 .dword 0000fff9h +003204r 1 FA FF 00 00 .dword 0000fffah +003208r 1 FB FF 00 00 .dword 0000fffbh +00320Cr 1 FC FF 00 00 .dword 0000fffch +003210r 1 FD FF 00 00 .dword 0000fffdh +003214r 1 FE FF 00 00 .dword 0000fffeh +003218r 1 FF FF 00 00 .dword 0000ffffh +00321Cr 1 00 00 01 00 .dword 00010000h +003220r 1 01 00 01 00 .dword 00010001h +003224r 1 02 00 01 00 .dword 00010002h +003228r 1 03 00 01 00 .dword 00010003h +00322Cr 1 04 00 01 00 .dword 00010004h +003230r 1 05 00 01 00 .dword 00010005h +003234r 1 06 00 01 00 .dword 00010006h +003238r 1 07 00 01 00 .dword 00010007h +00323Cr 1 08 00 01 00 .dword 00010008h +003240r 1 09 00 01 00 .dword 00010009h +003244r 1 0A 00 01 00 .dword 0001000ah +003248r 1 0B 00 01 00 .dword 0001000bh +00324Cr 1 0C 00 01 00 .dword 0001000ch +003250r 1 0D 00 01 00 .dword 0001000dh +003254r 1 0E 00 01 00 .dword 0001000eh +003258r 1 0F 00 01 00 .dword 0001000fh +00325Cr 1 F0 FF FF 7F .dword 7ffffff0h +003260r 1 F1 FF FF 7F .dword 7ffffff1h +003264r 1 F2 FF FF 7F .dword 7ffffff2h +003268r 1 F3 FF FF 7F .dword 7ffffff3h +00326Cr 1 F4 FF FF 7F .dword 7ffffff4h +003270r 1 F5 FF FF 7F .dword 7ffffff5h +003274r 1 F6 FF FF 7F .dword 7ffffff6h +003278r 1 F7 FF FF 7F .dword 7ffffff7h +00327Cr 1 F8 FF FF 7F .dword 7ffffff8h +003280r 1 F9 FF FF 7F .dword 7ffffff9h +003284r 1 FA FF FF 7F .dword 7ffffffah +003288r 1 FB FF FF 7F .dword 7ffffffbh +00328Cr 1 FC FF FF 7F .dword 7ffffffch +003290r 1 FD FF FF 7F .dword 7ffffffdh +003294r 1 FE FF FF 7F .dword 7ffffffeh +003298r 1 FF FF FF 7F .dword 7fffffffh +00329Cr 1 00 00 00 80 .dword 80000000h +0032A0r 1 01 00 00 80 .dword 80000001h +0032A4r 1 02 00 00 80 .dword 80000002h +0032A8r 1 03 00 00 80 .dword 80000003h +0032ACr 1 04 00 00 80 .dword 80000004h +0032B0r 1 05 00 00 80 .dword 80000005h +0032B4r 1 06 00 00 80 .dword 80000006h +0032B8r 1 07 00 00 80 .dword 80000007h +0032BCr 1 08 00 00 80 .dword 80000008h +0032C0r 1 09 00 00 80 .dword 80000009h +0032C4r 1 0A 00 00 80 .dword 8000000ah +0032C8r 1 0B 00 00 80 .dword 8000000bh +0032CCr 1 0C 00 00 80 .dword 8000000ch +0032D0r 1 0D 00 00 80 .dword 8000000dh +0032D4r 1 0E 00 00 80 .dword 8000000eh +0032D8r 1 0F 00 00 80 .dword 8000000fh +0032DCr 1 F0 FF FF 9F .dword 9ffffff0h +0032E0r 1 F1 FF FF 9F .dword 9ffffff1h +0032E4r 1 F2 FF FF 9F .dword 9ffffff2h +0032E8r 1 F3 FF FF 9F .dword 9ffffff3h +0032ECr 1 F4 FF FF 9F .dword 9ffffff4h +0032F0r 1 F5 FF FF 9F .dword 9ffffff5h +0032F4r 1 F6 FF FF 9F .dword 9ffffff6h +0032F8r 1 F7 FF FF 9F .dword 9ffffff7h +0032FCr 1 F8 FF FF 9F .dword 9ffffff8h +003300r 1 F9 FF FF 9F .dword 9ffffff9h +003304r 1 FA FF FF 9F .dword 9ffffffah +003308r 1 FB FF FF 9F .dword 9ffffffbh +00330Cr 1 FC FF FF 9F .dword 9ffffffch +003310r 1 FD FF FF 9F .dword 9ffffffdh +003314r 1 FE FF FF 9F .dword 9ffffffeh +003318r 1 FF FF FF 9F .dword 9fffffffh +00331Cr 1 00 00 00 A0 .dword 0a0000000h +003320r 1 01 00 00 A0 .dword 0a0000001h +003324r 1 02 00 00 A0 .dword 0a0000002h +003328r 1 03 00 00 A0 .dword 0a0000003h +00332Cr 1 04 00 00 A0 .dword 0a0000004h +003330r 1 05 00 00 A0 .dword 0a0000005h +003334r 1 06 00 00 A0 .dword 0a0000006h +003338r 1 07 00 00 A0 .dword 0a0000007h +00333Cr 1 08 00 00 A0 .dword 0a0000008h +003340r 1 09 00 00 A0 .dword 0a0000009h +003344r 1 0A 00 00 A0 .dword 0a000000ah +003348r 1 0B 00 00 A0 .dword 0a000000bh +00334Cr 1 0C 00 00 A0 .dword 0a000000ch +003350r 1 0D 00 00 A0 .dword 0a000000dh +003354r 1 0E 00 00 A0 .dword 0a000000eh +003358r 1 0F 00 00 A0 .dword 0a000000fh +00335Cr 1 F0 FF FF FF .dword 0fffffff0h +003360r 1 F1 FF FF FF .dword 0fffffff1h +003364r 1 F2 FF FF FF .dword 0fffffff2h +003368r 1 F3 FF FF FF .dword 0fffffff3h +00336Cr 1 F4 FF FF FF .dword 0fffffff4h +003370r 1 F5 FF FF FF .dword 0fffffff5h +003374r 1 F6 FF FF FF .dword 0fffffff6h +003378r 1 F7 FF FF FF .dword 0fffffff7h +00337Cr 1 F8 FF FF FF .dword 0fffffff8h +003380r 1 F9 FF FF FF .dword 0fffffff9h +003384r 1 FA FF FF FF .dword 0fffffffah +003388r 1 FB FF FF FF .dword 0fffffffbh +00338Cr 1 FC FF FF FF .dword 0fffffffch +003390r 1 FD FF FF FF .dword 0fffffffdh +003394r 1 FE FF FF FF .dword 0fffffffeh +003398r 1 FF FF FF FF .dword 0ffffffffh +00339Cr 1 +00339Cr 1 ; alternative 8-digit hex values, uppercase +00339Cr 1 00 00 00 00 .dword 00000000h +0033A0r 1 01 00 00 00 .dword 00000001h +0033A4r 1 02 00 00 00 .dword 00000002h +0033A8r 1 03 00 00 00 .dword 00000003h +0033ACr 1 04 00 00 00 .dword 00000004h +0033B0r 1 05 00 00 00 .dword 00000005h +0033B4r 1 06 00 00 00 .dword 00000006h +0033B8r 1 07 00 00 00 .dword 00000007h +0033BCr 1 08 00 00 00 .dword 00000008h +0033C0r 1 09 00 00 00 .dword 00000009h +0033C4r 1 0A 00 00 00 .dword 0000000Ah +0033C8r 1 0B 00 00 00 .dword 0000000Bh +0033CCr 1 0C 00 00 00 .dword 0000000Ch +0033D0r 1 0D 00 00 00 .dword 0000000Dh +0033D4r 1 0E 00 00 00 .dword 0000000Eh +0033D8r 1 0F 00 00 00 .dword 0000000Fh +0033DCr 1 10 00 00 00 .dword 00000010h +0033E0r 1 11 00 00 00 .dword 00000011h +0033E4r 1 12 00 00 00 .dword 00000012h +0033E8r 1 13 00 00 00 .dword 00000013h +0033ECr 1 70 00 00 00 .dword 00000070h +0033F0r 1 71 00 00 00 .dword 00000071h +0033F4r 1 72 00 00 00 .dword 00000072h +0033F8r 1 73 00 00 00 .dword 00000073h +0033FCr 1 74 00 00 00 .dword 00000074h +003400r 1 75 00 00 00 .dword 00000075h +003404r 1 76 00 00 00 .dword 00000076h +003408r 1 77 00 00 00 .dword 00000077h +00340Cr 1 78 00 00 00 .dword 00000078h +003410r 1 79 00 00 00 .dword 00000079h +003414r 1 7A 00 00 00 .dword 0000007Ah +003418r 1 7B 00 00 00 .dword 0000007Bh +00341Cr 1 7C 00 00 00 .dword 0000007Ch +003420r 1 7D 00 00 00 .dword 0000007Dh +003424r 1 7E 00 00 00 .dword 0000007Eh +003428r 1 7F 00 00 00 .dword 0000007Fh +00342Cr 1 80 00 00 00 .dword 00000080h +003430r 1 81 00 00 00 .dword 00000081h +003434r 1 82 00 00 00 .dword 00000082h +003438r 1 83 00 00 00 .dword 00000083h +00343Cr 1 84 00 00 00 .dword 00000084h +003440r 1 85 00 00 00 .dword 00000085h +003444r 1 86 00 00 00 .dword 00000086h +003448r 1 F0 00 00 00 .dword 000000F0h +00344Cr 1 F1 00 00 00 .dword 000000F1h +003450r 1 F2 00 00 00 .dword 000000F2h +003454r 1 F3 00 00 00 .dword 000000F3h +003458r 1 F4 00 00 00 .dword 000000F4h +00345Cr 1 F5 00 00 00 .dword 000000F5h +003460r 1 F6 00 00 00 .dword 000000F6h +003464r 1 F7 00 00 00 .dword 000000F7h +003468r 1 F8 00 00 00 .dword 000000F8h +00346Cr 1 F9 00 00 00 .dword 000000F9h +003470r 1 FA 00 00 00 .dword 000000FAh +003474r 1 FB 00 00 00 .dword 000000FBh +003478r 1 FC 00 00 00 .dword 000000FCh +00347Cr 1 FD 00 00 00 .dword 000000FDh +003480r 1 FE 00 00 00 .dword 000000FEh +003484r 1 FF 00 00 00 .dword 000000FFh +003488r 1 00 01 00 00 .dword 00000100h +00348Cr 1 01 01 00 00 .dword 00000101h +003490r 1 02 01 00 00 .dword 00000102h +003494r 1 03 01 00 00 .dword 00000103h +003498r 1 D2 0F 00 00 .dword 00000FD2h +00349Cr 1 D3 0F 00 00 .dword 00000FD3h +0034A0r 1 D4 0F 00 00 .dword 00000FD4h +0034A4r 1 D5 0F 00 00 .dword 00000FD5h +0034A8r 1 D6 0F 00 00 .dword 00000FD6h +0034ACr 1 D7 0F 00 00 .dword 00000FD7h +0034B0r 1 D8 0F 00 00 .dword 00000FD8h +0034B4r 1 D9 0F 00 00 .dword 00000FD9h +0034B8r 1 DA 0F 00 00 .dword 00000FDAh +0034BCr 1 DB 0F 00 00 .dword 00000FDBh +0034C0r 1 DC 0F 00 00 .dword 00000FDCh +0034C4r 1 DD 0F 00 00 .dword 00000FDDh +0034C8r 1 DE 0F 00 00 .dword 00000FDEh +0034CCr 1 DF 0F 00 00 .dword 00000FDFh +0034D0r 1 E0 0F 00 00 .dword 00000FE0h +0034D4r 1 E1 0F 00 00 .dword 00000FE1h +0034D8r 1 E2 0F 00 00 .dword 00000FE2h +0034DCr 1 E3 0F 00 00 .dword 00000FE3h +0034E0r 1 E4 0F 00 00 .dword 00000FE4h +0034E4r 1 E5 0F 00 00 .dword 00000FE5h +0034E8r 1 E6 0F 00 00 .dword 00000FE6h +0034ECr 1 E7 0F 00 00 .dword 00000FE7h +0034F0r 1 E8 0F 00 00 .dword 00000FE8h +0034F4r 1 E9 0F 00 00 .dword 00000FE9h +0034F8r 1 EA 0F 00 00 .dword 00000FEAh +0034FCr 1 EB 0F 00 00 .dword 00000FEBh +003500r 1 EC 0F 00 00 .dword 00000FECh +003504r 1 ED 0F 00 00 .dword 00000FEDh +003508r 1 EE 0F 00 00 .dword 00000FEEh +00350Cr 1 EF 0F 00 00 .dword 00000FEFh +003510r 1 F0 0F 00 00 .dword 00000FF0h +003514r 1 F1 0F 00 00 .dword 00000FF1h +003518r 1 F2 0F 00 00 .dword 00000FF2h +00351Cr 1 F3 0F 00 00 .dword 00000FF3h +003520r 1 F4 0F 00 00 .dword 00000FF4h +003524r 1 F5 0F 00 00 .dword 00000FF5h +003528r 1 F6 0F 00 00 .dword 00000FF6h +00352Cr 1 F7 0F 00 00 .dword 00000FF7h +003530r 1 F8 0F 00 00 .dword 00000FF8h +003534r 1 F9 0F 00 00 .dword 00000FF9h +003538r 1 FA 0F 00 00 .dword 00000FFAh +00353Cr 1 FB 0F 00 00 .dword 00000FFBh +003540r 1 FC 0F 00 00 .dword 00000FFCh +003544r 1 FD 0F 00 00 .dword 00000FFDh +003548r 1 FE 0F 00 00 .dword 00000FFEh +00354Cr 1 FF 0F 00 00 .dword 00000FFFh +003550r 1 00 10 00 00 .dword 00001000h +003554r 1 01 10 00 00 .dword 00001001h +003558r 1 02 10 00 00 .dword 00001002h +00355Cr 1 03 10 00 00 .dword 00001003h +003560r 1 04 10 00 00 .dword 00001004h +003564r 1 05 10 00 00 .dword 00001005h +003568r 1 06 10 00 00 .dword 00001006h +00356Cr 1 07 10 00 00 .dword 00001007h +003570r 1 08 10 00 00 .dword 00001008h +003574r 1 F0 7F 00 00 .dword 00007FF0h +003578r 1 F1 7F 00 00 .dword 00007FF1h +00357Cr 1 F2 7F 00 00 .dword 00007FF2h +003580r 1 F3 7F 00 00 .dword 00007FF3h +003584r 1 F4 7F 00 00 .dword 00007FF4h +003588r 1 F5 7F 00 00 .dword 00007FF5h +00358Cr 1 F6 7F 00 00 .dword 00007FF6h +003590r 1 F7 7F 00 00 .dword 00007FF7h +003594r 1 F8 7F 00 00 .dword 00007FF8h +003598r 1 F9 7F 00 00 .dword 00007FF9h +00359Cr 1 FA 7F 00 00 .dword 00007FFAh +0035A0r 1 FB 7F 00 00 .dword 00007FFBh +0035A4r 1 FC 7F 00 00 .dword 00007FFCh +0035A8r 1 FD 7F 00 00 .dword 00007FFDh +0035ACr 1 FE 7F 00 00 .dword 00007FFEh +0035B0r 1 FF 7F 00 00 .dword 00007FFFh +0035B4r 1 00 80 00 00 .dword 00008000h +0035B8r 1 01 80 00 00 .dword 00008001h +0035BCr 1 02 80 00 00 .dword 00008002h +0035C0r 1 03 80 00 00 .dword 00008003h +0035C4r 1 04 80 00 00 .dword 00008004h +0035C8r 1 05 80 00 00 .dword 00008005h +0035CCr 1 06 80 00 00 .dword 00008006h +0035D0r 1 07 80 00 00 .dword 00008007h +0035D4r 1 08 80 00 00 .dword 00008008h +0035D8r 1 09 80 00 00 .dword 00008009h +0035DCr 1 0A 80 00 00 .dword 0000800Ah +0035E0r 1 0B 80 00 00 .dword 0000800Bh +0035E4r 1 E1 9F 00 00 .dword 00009FE1h +0035E8r 1 E2 9F 00 00 .dword 00009FE2h +0035ECr 1 E3 9F 00 00 .dword 00009FE3h +0035F0r 1 E4 9F 00 00 .dword 00009FE4h +0035F4r 1 E5 9F 00 00 .dword 00009FE5h +0035F8r 1 E6 9F 00 00 .dword 00009FE6h +0035FCr 1 E7 9F 00 00 .dword 00009FE7h +003600r 1 E8 9F 00 00 .dword 00009FE8h +003604r 1 E9 9F 00 00 .dword 00009FE9h +003608r 1 EA 9F 00 00 .dword 00009FEAh +00360Cr 1 EB 9F 00 00 .dword 00009FEBh +003610r 1 EC 9F 00 00 .dword 00009FECh +003614r 1 ED 9F 00 00 .dword 00009FEDh +003618r 1 EE 9F 00 00 .dword 00009FEEh +00361Cr 1 EF 9F 00 00 .dword 00009FEFh +003620r 1 F0 9F 00 00 .dword 00009FF0h +003624r 1 F1 9F 00 00 .dword 00009FF1h +003628r 1 F2 9F 00 00 .dword 00009FF2h +00362Cr 1 F3 9F 00 00 .dword 00009FF3h +003630r 1 F4 9F 00 00 .dword 00009FF4h +003634r 1 F5 9F 00 00 .dword 00009FF5h +003638r 1 F6 9F 00 00 .dword 00009FF6h +00363Cr 1 F7 9F 00 00 .dword 00009FF7h +003640r 1 F8 9F 00 00 .dword 00009FF8h +003644r 1 F9 9F 00 00 .dword 00009FF9h +003648r 1 FA 9F 00 00 .dword 00009FFAh +00364Cr 1 FB 9F 00 00 .dword 00009FFBh +003650r 1 FC 9F 00 00 .dword 00009FFCh +003654r 1 FD 9F 00 00 .dword 00009FFDh +003658r 1 FE 9F 00 00 .dword 00009FFEh +00365Cr 1 FF 9F 00 00 .dword 00009FFFh +003660r 1 00 A0 00 00 .dword 0000A000h +003664r 1 01 A0 00 00 .dword 0000A001h +003668r 1 02 A0 00 00 .dword 0000A002h +00366Cr 1 03 A0 00 00 .dword 0000A003h +003670r 1 04 A0 00 00 .dword 0000A004h +003674r 1 05 A0 00 00 .dword 0000A005h +003678r 1 06 A0 00 00 .dword 0000A006h +00367Cr 1 07 A0 00 00 .dword 0000A007h +003680r 1 08 A0 00 00 .dword 0000A008h +003684r 1 09 A0 00 00 .dword 0000A009h +003688r 1 0A A0 00 00 .dword 0000A00Ah +00368Cr 1 0B A0 00 00 .dword 0000A00Bh +003690r 1 0C A0 00 00 .dword 0000A00Ch +003694r 1 0D A0 00 00 .dword 0000A00Dh +003698r 1 0E A0 00 00 .dword 0000A00Eh +00369Cr 1 0F A0 00 00 .dword 0000A00Fh +0036A0r 1 E1 AF 00 00 .dword 0000AFE1h +0036A4r 1 E2 AF 00 00 .dword 0000AFE2h +0036A8r 1 E3 AF 00 00 .dword 0000AFE3h +0036ACr 1 E4 AF 00 00 .dword 0000AFE4h +0036B0r 1 E5 AF 00 00 .dword 0000AFE5h +0036B4r 1 E6 AF 00 00 .dword 0000AFE6h +0036B8r 1 E7 AF 00 00 .dword 0000AFE7h +0036BCr 1 E8 AF 00 00 .dword 0000AFE8h +0036C0r 1 E9 AF 00 00 .dword 0000AFE9h +0036C4r 1 EA AF 00 00 .dword 0000AFEAh +0036C8r 1 EB AF 00 00 .dword 0000AFEBh +0036CCr 1 EC AF 00 00 .dword 0000AFECh +0036D0r 1 ED AF 00 00 .dword 0000AFEDh +0036D4r 1 EE AF 00 00 .dword 0000AFEEh +0036D8r 1 EF AF 00 00 .dword 0000AFEFh +0036DCr 1 F0 AF 00 00 .dword 0000AFF0h +0036E0r 1 F1 AF 00 00 .dword 0000AFF1h +0036E4r 1 F2 AF 00 00 .dword 0000AFF2h +0036E8r 1 F3 AF 00 00 .dword 0000AFF3h +0036ECr 1 F4 AF 00 00 .dword 0000AFF4h +0036F0r 1 F5 AF 00 00 .dword 0000AFF5h +0036F4r 1 F6 AF 00 00 .dword 0000AFF6h +0036F8r 1 F7 AF 00 00 .dword 0000AFF7h +0036FCr 1 F8 AF 00 00 .dword 0000AFF8h +003700r 1 F9 AF 00 00 .dword 0000AFF9h +003704r 1 FA AF 00 00 .dword 0000AFFAh +003708r 1 FB AF 00 00 .dword 0000AFFBh +00370Cr 1 FC AF 00 00 .dword 0000AFFCh +003710r 1 FD AF 00 00 .dword 0000AFFDh +003714r 1 FE AF 00 00 .dword 0000AFFEh +003718r 1 FF AF 00 00 .dword 0000AFFFh +00371Cr 1 00 B0 00 00 .dword 0000B000h +003720r 1 01 B0 00 00 .dword 0000B001h +003724r 1 02 B0 00 00 .dword 0000B002h +003728r 1 03 B0 00 00 .dword 0000B003h +00372Cr 1 04 B0 00 00 .dword 0000B004h +003730r 1 05 B0 00 00 .dword 0000B005h +003734r 1 06 B0 00 00 .dword 0000B006h +003738r 1 07 B0 00 00 .dword 0000B007h +00373Cr 1 08 B0 00 00 .dword 0000B008h +003740r 1 09 B0 00 00 .dword 0000B009h +003744r 1 0A B0 00 00 .dword 0000B00Ah +003748r 1 0B B0 00 00 .dword 0000B00Bh +00374Cr 1 0C B0 00 00 .dword 0000B00Ch +003750r 1 0D B0 00 00 .dword 0000B00Dh +003754r 1 0E B0 00 00 .dword 0000B00Eh +003758r 1 0F B0 00 00 .dword 0000B00Fh +00375Cr 1 E1 FF 00 00 .dword 0000FFE1h +003760r 1 E2 FF 00 00 .dword 0000FFE2h +003764r 1 E3 FF 00 00 .dword 0000FFE3h +003768r 1 E4 FF 00 00 .dword 0000FFE4h +00376Cr 1 E5 FF 00 00 .dword 0000FFE5h +003770r 1 E6 FF 00 00 .dword 0000FFE6h +003774r 1 E7 FF 00 00 .dword 0000FFE7h +003778r 1 E8 FF 00 00 .dword 0000FFE8h +00377Cr 1 E9 FF 00 00 .dword 0000FFE9h +003780r 1 EA FF 00 00 .dword 0000FFEAh +003784r 1 EB FF 00 00 .dword 0000FFEBh +003788r 1 EC FF 00 00 .dword 0000FFECh +00378Cr 1 ED FF 00 00 .dword 0000FFEDh +003790r 1 EE FF 00 00 .dword 0000FFEEh +003794r 1 EF FF 00 00 .dword 0000FFEFh +003798r 1 F0 FF 00 00 .dword 0000FFF0h +00379Cr 1 F1 FF 00 00 .dword 0000FFF1h +0037A0r 1 F2 FF 00 00 .dword 0000FFF2h +0037A4r 1 F3 FF 00 00 .dword 0000FFF3h +0037A8r 1 F4 FF 00 00 .dword 0000FFF4h +0037ACr 1 F5 FF 00 00 .dword 0000FFF5h +0037B0r 1 F6 FF 00 00 .dword 0000FFF6h +0037B4r 1 F7 FF 00 00 .dword 0000FFF7h +0037B8r 1 F8 FF 00 00 .dword 0000FFF8h +0037BCr 1 F9 FF 00 00 .dword 0000FFF9h +0037C0r 1 FA FF 00 00 .dword 0000FFFAh +0037C4r 1 FB FF 00 00 .dword 0000FFFBh +0037C8r 1 FC FF 00 00 .dword 0000FFFCh +0037CCr 1 FD FF 00 00 .dword 0000FFFDh +0037D0r 1 FE FF 00 00 .dword 0000FFFEh +0037D4r 1 FF FF 00 00 .dword 0000FFFFh +0037D8r 1 00 00 01 00 .dword 00010000h +0037DCr 1 01 00 01 00 .dword 00010001h +0037E0r 1 02 00 01 00 .dword 00010002h +0037E4r 1 03 00 01 00 .dword 00010003h +0037E8r 1 04 00 01 00 .dword 00010004h +0037ECr 1 05 00 01 00 .dword 00010005h +0037F0r 1 06 00 01 00 .dword 00010006h +0037F4r 1 07 00 01 00 .dword 00010007h +0037F8r 1 08 00 01 00 .dword 00010008h +0037FCr 1 09 00 01 00 .dword 00010009h +003800r 1 0A 00 01 00 .dword 0001000Ah +003804r 1 0B 00 01 00 .dword 0001000Bh +003808r 1 0C 00 01 00 .dword 0001000Ch +00380Cr 1 0D 00 01 00 .dword 0001000Dh +003810r 1 0E 00 01 00 .dword 0001000Eh +003814r 1 0F 00 01 00 .dword 0001000Fh +003818r 1 F0 FF FF 7F .dword 7FFFFFF0h +00381Cr 1 F1 FF FF 7F .dword 7FFFFFF1h +003820r 1 F2 FF FF 7F .dword 7FFFFFF2h +003824r 1 F3 FF FF 7F .dword 7FFFFFF3h +003828r 1 F4 FF FF 7F .dword 7FFFFFF4h +00382Cr 1 F5 FF FF 7F .dword 7FFFFFF5h +003830r 1 F6 FF FF 7F .dword 7FFFFFF6h +003834r 1 F7 FF FF 7F .dword 7FFFFFF7h +003838r 1 F8 FF FF 7F .dword 7FFFFFF8h +00383Cr 1 F9 FF FF 7F .dword 7FFFFFF9h +003840r 1 FA FF FF 7F .dword 7FFFFFFAh +003844r 1 FB FF FF 7F .dword 7FFFFFFBh +003848r 1 FC FF FF 7F .dword 7FFFFFFCh +00384Cr 1 FD FF FF 7F .dword 7FFFFFFDh +003850r 1 FE FF FF 7F .dword 7FFFFFFEh +003854r 1 FF FF FF 7F .dword 7FFFFFFFh +003858r 1 00 00 00 80 .dword 80000000h +00385Cr 1 01 00 00 80 .dword 80000001h +003860r 1 02 00 00 80 .dword 80000002h +003864r 1 03 00 00 80 .dword 80000003h +003868r 1 04 00 00 80 .dword 80000004h +00386Cr 1 05 00 00 80 .dword 80000005h +003870r 1 06 00 00 80 .dword 80000006h +003874r 1 07 00 00 80 .dword 80000007h +003878r 1 08 00 00 80 .dword 80000008h +00387Cr 1 09 00 00 80 .dword 80000009h +003880r 1 0A 00 00 80 .dword 8000000Ah +003884r 1 0B 00 00 80 .dword 8000000Bh +003888r 1 0C 00 00 80 .dword 8000000Ch +00388Cr 1 0D 00 00 80 .dword 8000000Dh +003890r 1 0E 00 00 80 .dword 8000000Eh +003894r 1 0F 00 00 80 .dword 8000000Fh +003898r 1 F0 FF FF 9F .dword 9FFFFFF0h +00389Cr 1 F1 FF FF 9F .dword 9FFFFFF1h +0038A0r 1 F2 FF FF 9F .dword 9FFFFFF2h +0038A4r 1 F3 FF FF 9F .dword 9FFFFFF3h +0038A8r 1 F4 FF FF 9F .dword 9FFFFFF4h +0038ACr 1 F5 FF FF 9F .dword 9FFFFFF5h +0038B0r 1 F6 FF FF 9F .dword 9FFFFFF6h +0038B4r 1 F7 FF FF 9F .dword 9FFFFFF7h +0038B8r 1 F8 FF FF 9F .dword 9FFFFFF8h +0038BCr 1 F9 FF FF 9F .dword 9FFFFFF9h +0038C0r 1 FA FF FF 9F .dword 9FFFFFFAh +0038C4r 1 FB FF FF 9F .dword 9FFFFFFBh +0038C8r 1 FC FF FF 9F .dword 9FFFFFFCh +0038CCr 1 FD FF FF 9F .dword 9FFFFFFDh +0038D0r 1 FE FF FF 9F .dword 9FFFFFFEh +0038D4r 1 FF FF FF 9F .dword 9FFFFFFFh +0038D8r 1 00 00 00 A0 .dword 0A0000000h +0038DCr 1 01 00 00 A0 .dword 0A0000001h +0038E0r 1 02 00 00 A0 .dword 0A0000002h +0038E4r 1 03 00 00 A0 .dword 0A0000003h +0038E8r 1 04 00 00 A0 .dword 0A0000004h +0038ECr 1 05 00 00 A0 .dword 0A0000005h +0038F0r 1 06 00 00 A0 .dword 0A0000006h +0038F4r 1 07 00 00 A0 .dword 0A0000007h +0038F8r 1 08 00 00 A0 .dword 0A0000008h +0038FCr 1 09 00 00 A0 .dword 0A0000009h +003900r 1 0A 00 00 A0 .dword 0A000000Ah +003904r 1 0B 00 00 A0 .dword 0A000000Bh +003908r 1 0C 00 00 A0 .dword 0A000000Ch +00390Cr 1 0D 00 00 A0 .dword 0A000000Dh +003910r 1 0E 00 00 A0 .dword 0A000000Eh +003914r 1 0F 00 00 A0 .dword 0A000000Fh +003918r 1 F0 FF FF FF .dword 0FFFFFFF0h +00391Cr 1 F1 FF FF FF .dword 0FFFFFFF1h +003920r 1 F2 FF FF FF .dword 0FFFFFFF2h +003924r 1 F3 FF FF FF .dword 0FFFFFFF3h +003928r 1 F4 FF FF FF .dword 0FFFFFFF4h +00392Cr 1 F5 FF FF FF .dword 0FFFFFFF5h +003930r 1 F6 FF FF FF .dword 0FFFFFFF6h +003934r 1 F7 FF FF FF .dword 0FFFFFFF7h +003938r 1 F8 FF FF FF .dword 0FFFFFFF8h +00393Cr 1 F9 FF FF FF .dword 0FFFFFFF9h +003940r 1 FA FF FF FF .dword 0FFFFFFFAh +003944r 1 FB FF FF FF .dword 0FFFFFFFBh +003948r 1 FC FF FF FF .dword 0FFFFFFFCh +00394Cr 1 FD FF FF FF .dword 0FFFFFFFDh +003950r 1 FE FF FF FF .dword 0FFFFFFFEh +003954r 1 FF FF FF FF .dword 0FFFFFFFFh +003958r 1 +003958r 1 ; alternative hex values, always leading zero +003958r 1 00 00 00 00 .dword 00h +00395Cr 1 01 00 00 00 .dword 01h +003960r 1 02 00 00 00 .dword 02h +003964r 1 03 00 00 00 .dword 03h +003968r 1 04 00 00 00 .dword 04h +00396Cr 1 05 00 00 00 .dword 05h +003970r 1 06 00 00 00 .dword 06h +003974r 1 07 00 00 00 .dword 07h +003978r 1 08 00 00 00 .dword 08h +00397Cr 1 09 00 00 00 .dword 09h +003980r 1 0A 00 00 00 .dword 0ah +003984r 1 0B 00 00 00 .dword 0bh +003988r 1 0C 00 00 00 .dword 0ch +00398Cr 1 0D 00 00 00 .dword 0dh +003990r 1 0E 00 00 00 .dword 0eh +003994r 1 0F 00 00 00 .dword 0fh +003998r 1 10 00 00 00 .dword 010h +00399Cr 1 11 00 00 00 .dword 011h +0039A0r 1 12 00 00 00 .dword 012h +0039A4r 1 13 00 00 00 .dword 013h +0039A8r 1 70 00 00 00 .dword 070h +0039ACr 1 71 00 00 00 .dword 071h +0039B0r 1 72 00 00 00 .dword 072h +0039B4r 1 73 00 00 00 .dword 073h +0039B8r 1 74 00 00 00 .dword 074h +0039BCr 1 75 00 00 00 .dword 075h +0039C0r 1 76 00 00 00 .dword 076h +0039C4r 1 77 00 00 00 .dword 077h +0039C8r 1 78 00 00 00 .dword 078h +0039CCr 1 79 00 00 00 .dword 079h +0039D0r 1 7A 00 00 00 .dword 07ah +0039D4r 1 7B 00 00 00 .dword 07bh +0039D8r 1 7C 00 00 00 .dword 07ch +0039DCr 1 7D 00 00 00 .dword 07dh +0039E0r 1 7E 00 00 00 .dword 07eh +0039E4r 1 7F 00 00 00 .dword 07fh +0039E8r 1 80 00 00 00 .dword 080h +0039ECr 1 81 00 00 00 .dword 081h +0039F0r 1 82 00 00 00 .dword 082h +0039F4r 1 83 00 00 00 .dword 083h +0039F8r 1 84 00 00 00 .dword 084h +0039FCr 1 85 00 00 00 .dword 085h +003A00r 1 86 00 00 00 .dword 086h +003A04r 1 F0 00 00 00 .dword 0f0h +003A08r 1 F1 00 00 00 .dword 0f1h +003A0Cr 1 F2 00 00 00 .dword 0f2h +003A10r 1 F3 00 00 00 .dword 0f3h +003A14r 1 F4 00 00 00 .dword 0f4h +003A18r 1 F5 00 00 00 .dword 0f5h +003A1Cr 1 F6 00 00 00 .dword 0f6h +003A20r 1 F7 00 00 00 .dword 0f7h +003A24r 1 F8 00 00 00 .dword 0f8h +003A28r 1 F9 00 00 00 .dword 0f9h +003A2Cr 1 FA 00 00 00 .dword 0fah +003A30r 1 FB 00 00 00 .dword 0fbh +003A34r 1 FC 00 00 00 .dword 0fch +003A38r 1 FD 00 00 00 .dword 0fdh +003A3Cr 1 FE 00 00 00 .dword 0feh +003A40r 1 FF 00 00 00 .dword 0ffh +003A44r 1 00 01 00 00 .dword 0100h +003A48r 1 01 01 00 00 .dword 0101h +003A4Cr 1 02 01 00 00 .dword 0102h +003A50r 1 03 01 00 00 .dword 0103h +003A54r 1 D2 0F 00 00 .dword 0fd2h +003A58r 1 D3 0F 00 00 .dword 0fd3h +003A5Cr 1 D4 0F 00 00 .dword 0fd4h +003A60r 1 D5 0F 00 00 .dword 0fd5h +003A64r 1 D6 0F 00 00 .dword 0fd6h +003A68r 1 D7 0F 00 00 .dword 0fd7h +003A6Cr 1 D8 0F 00 00 .dword 0fd8h +003A70r 1 D9 0F 00 00 .dword 0fd9h +003A74r 1 DA 0F 00 00 .dword 0fdah +003A78r 1 DB 0F 00 00 .dword 0fdbh +003A7Cr 1 DC 0F 00 00 .dword 0fdch +003A80r 1 DD 0F 00 00 .dword 0fddh +003A84r 1 DE 0F 00 00 .dword 0fdeh +003A88r 1 DF 0F 00 00 .dword 0fdfh +003A8Cr 1 E0 0F 00 00 .dword 0fe0h +003A90r 1 E1 0F 00 00 .dword 0fe1h +003A94r 1 E2 0F 00 00 .dword 0fe2h +003A98r 1 E3 0F 00 00 .dword 0fe3h +003A9Cr 1 E4 0F 00 00 .dword 0fe4h +003AA0r 1 E5 0F 00 00 .dword 0fe5h +003AA4r 1 E6 0F 00 00 .dword 0fe6h +003AA8r 1 E7 0F 00 00 .dword 0fe7h +003AACr 1 E8 0F 00 00 .dword 0fe8h +003AB0r 1 E9 0F 00 00 .dword 0fe9h +003AB4r 1 EA 0F 00 00 .dword 0feah +003AB8r 1 EB 0F 00 00 .dword 0febh +003ABCr 1 EC 0F 00 00 .dword 0fech +003AC0r 1 ED 0F 00 00 .dword 0fedh +003AC4r 1 EE 0F 00 00 .dword 0feeh +003AC8r 1 EF 0F 00 00 .dword 0fefh +003ACCr 1 F0 0F 00 00 .dword 0ff0h +003AD0r 1 F1 0F 00 00 .dword 0ff1h +003AD4r 1 F2 0F 00 00 .dword 0ff2h +003AD8r 1 F3 0F 00 00 .dword 0ff3h +003ADCr 1 F4 0F 00 00 .dword 0ff4h +003AE0r 1 F5 0F 00 00 .dword 0ff5h +003AE4r 1 F6 0F 00 00 .dword 0ff6h +003AE8r 1 F7 0F 00 00 .dword 0ff7h +003AECr 1 F8 0F 00 00 .dword 0ff8h +003AF0r 1 F9 0F 00 00 .dword 0ff9h +003AF4r 1 FA 0F 00 00 .dword 0ffah +003AF8r 1 FB 0F 00 00 .dword 0ffbh +003AFCr 1 FC 0F 00 00 .dword 0ffch +003B00r 1 FD 0F 00 00 .dword 0ffdh +003B04r 1 FE 0F 00 00 .dword 0ffeh +003B08r 1 FF 0F 00 00 .dword 0fffh +003B0Cr 1 00 10 00 00 .dword 01000h +003B10r 1 01 10 00 00 .dword 01001h +003B14r 1 02 10 00 00 .dword 01002h +003B18r 1 03 10 00 00 .dword 01003h +003B1Cr 1 04 10 00 00 .dword 01004h +003B20r 1 05 10 00 00 .dword 01005h +003B24r 1 06 10 00 00 .dword 01006h +003B28r 1 07 10 00 00 .dword 01007h +003B2Cr 1 08 10 00 00 .dword 01008h +003B30r 1 F0 7F 00 00 .dword 07ff0h +003B34r 1 F1 7F 00 00 .dword 07ff1h +003B38r 1 F2 7F 00 00 .dword 07ff2h +003B3Cr 1 F3 7F 00 00 .dword 07ff3h +003B40r 1 F4 7F 00 00 .dword 07ff4h +003B44r 1 F5 7F 00 00 .dword 07ff5h +003B48r 1 F6 7F 00 00 .dword 07ff6h +003B4Cr 1 F7 7F 00 00 .dword 07ff7h +003B50r 1 F8 7F 00 00 .dword 07ff8h +003B54r 1 F9 7F 00 00 .dword 07ff9h +003B58r 1 FA 7F 00 00 .dword 07ffah +003B5Cr 1 FB 7F 00 00 .dword 07ffbh +003B60r 1 FC 7F 00 00 .dword 07ffch +003B64r 1 FD 7F 00 00 .dword 07ffdh +003B68r 1 FE 7F 00 00 .dword 07ffeh +003B6Cr 1 FF 7F 00 00 .dword 07fffh +003B70r 1 00 80 00 00 .dword 08000h +003B74r 1 01 80 00 00 .dword 08001h +003B78r 1 02 80 00 00 .dword 08002h +003B7Cr 1 03 80 00 00 .dword 08003h +003B80r 1 04 80 00 00 .dword 08004h +003B84r 1 05 80 00 00 .dword 08005h +003B88r 1 06 80 00 00 .dword 08006h +003B8Cr 1 07 80 00 00 .dword 08007h +003B90r 1 08 80 00 00 .dword 08008h +003B94r 1 09 80 00 00 .dword 08009h +003B98r 1 0A 80 00 00 .dword 0800ah +003B9Cr 1 0B 80 00 00 .dword 0800bh +003BA0r 1 E1 9F 00 00 .dword 09fe1h +003BA4r 1 E2 9F 00 00 .dword 09fe2h +003BA8r 1 E3 9F 00 00 .dword 09fe3h +003BACr 1 E4 9F 00 00 .dword 09fe4h +003BB0r 1 E5 9F 00 00 .dword 09fe5h +003BB4r 1 E6 9F 00 00 .dword 09fe6h +003BB8r 1 E7 9F 00 00 .dword 09fe7h +003BBCr 1 E8 9F 00 00 .dword 09fe8h +003BC0r 1 E9 9F 00 00 .dword 09fe9h +003BC4r 1 EA 9F 00 00 .dword 09feah +003BC8r 1 EB 9F 00 00 .dword 09febh +003BCCr 1 EC 9F 00 00 .dword 09fech +003BD0r 1 ED 9F 00 00 .dword 09fedh +003BD4r 1 EE 9F 00 00 .dword 09feeh +003BD8r 1 EF 9F 00 00 .dword 09fefh +003BDCr 1 F0 9F 00 00 .dword 09ff0h +003BE0r 1 F1 9F 00 00 .dword 09ff1h +003BE4r 1 F2 9F 00 00 .dword 09ff2h +003BE8r 1 F3 9F 00 00 .dword 09ff3h +003BECr 1 F4 9F 00 00 .dword 09ff4h +003BF0r 1 F5 9F 00 00 .dword 09ff5h +003BF4r 1 F6 9F 00 00 .dword 09ff6h +003BF8r 1 F7 9F 00 00 .dword 09ff7h +003BFCr 1 F8 9F 00 00 .dword 09ff8h +003C00r 1 F9 9F 00 00 .dword 09ff9h +003C04r 1 FA 9F 00 00 .dword 09ffah +003C08r 1 FB 9F 00 00 .dword 09ffbh +003C0Cr 1 FC 9F 00 00 .dword 09ffch +003C10r 1 FD 9F 00 00 .dword 09ffdh +003C14r 1 FE 9F 00 00 .dword 09ffeh +003C18r 1 FF 9F 00 00 .dword 09fffh +003C1Cr 1 00 A0 00 00 .dword 0a000h +003C20r 1 01 A0 00 00 .dword 0a001h +003C24r 1 02 A0 00 00 .dword 0a002h +003C28r 1 03 A0 00 00 .dword 0a003h +003C2Cr 1 04 A0 00 00 .dword 0a004h +003C30r 1 05 A0 00 00 .dword 0a005h +003C34r 1 06 A0 00 00 .dword 0a006h +003C38r 1 07 A0 00 00 .dword 0a007h +003C3Cr 1 08 A0 00 00 .dword 0a008h +003C40r 1 09 A0 00 00 .dword 0a009h +003C44r 1 0A A0 00 00 .dword 0a00ah +003C48r 1 0B A0 00 00 .dword 0a00bh +003C4Cr 1 0C A0 00 00 .dword 0a00ch +003C50r 1 0D A0 00 00 .dword 0a00dh +003C54r 1 0E A0 00 00 .dword 0a00eh +003C58r 1 0F A0 00 00 .dword 0a00fh +003C5Cr 1 E1 AF 00 00 .dword 0afe1h +003C60r 1 E2 AF 00 00 .dword 0afe2h +003C64r 1 E3 AF 00 00 .dword 0afe3h +003C68r 1 E4 AF 00 00 .dword 0afe4h +003C6Cr 1 E5 AF 00 00 .dword 0afe5h +003C70r 1 E6 AF 00 00 .dword 0afe6h +003C74r 1 E7 AF 00 00 .dword 0afe7h +003C78r 1 E8 AF 00 00 .dword 0afe8h +003C7Cr 1 E9 AF 00 00 .dword 0afe9h +003C80r 1 EA AF 00 00 .dword 0afeah +003C84r 1 EB AF 00 00 .dword 0afebh +003C88r 1 EC AF 00 00 .dword 0afech +003C8Cr 1 ED AF 00 00 .dword 0afedh +003C90r 1 EE AF 00 00 .dword 0afeeh +003C94r 1 EF AF 00 00 .dword 0afefh +003C98r 1 F0 AF 00 00 .dword 0aff0h +003C9Cr 1 F1 AF 00 00 .dword 0aff1h +003CA0r 1 F2 AF 00 00 .dword 0aff2h +003CA4r 1 F3 AF 00 00 .dword 0aff3h +003CA8r 1 F4 AF 00 00 .dword 0aff4h +003CACr 1 F5 AF 00 00 .dword 0aff5h +003CB0r 1 F6 AF 00 00 .dword 0aff6h +003CB4r 1 F7 AF 00 00 .dword 0aff7h +003CB8r 1 F8 AF 00 00 .dword 0aff8h +003CBCr 1 F9 AF 00 00 .dword 0aff9h +003CC0r 1 FA AF 00 00 .dword 0affah +003CC4r 1 FB AF 00 00 .dword 0affbh +003CC8r 1 FC AF 00 00 .dword 0affch +003CCCr 1 FD AF 00 00 .dword 0affdh +003CD0r 1 FE AF 00 00 .dword 0affeh +003CD4r 1 FF AF 00 00 .dword 0afffh +003CD8r 1 00 B0 00 00 .dword 0b000h +003CDCr 1 01 B0 00 00 .dword 0b001h +003CE0r 1 02 B0 00 00 .dword 0b002h +003CE4r 1 03 B0 00 00 .dword 0b003h +003CE8r 1 04 B0 00 00 .dword 0b004h +003CECr 1 05 B0 00 00 .dword 0b005h +003CF0r 1 06 B0 00 00 .dword 0b006h +003CF4r 1 07 B0 00 00 .dword 0b007h +003CF8r 1 08 B0 00 00 .dword 0b008h +003CFCr 1 09 B0 00 00 .dword 0b009h +003D00r 1 0A B0 00 00 .dword 0b00ah +003D04r 1 0B B0 00 00 .dword 0b00bh +003D08r 1 0C B0 00 00 .dword 0b00ch +003D0Cr 1 0D B0 00 00 .dword 0b00dh +003D10r 1 0E B0 00 00 .dword 0b00eh +003D14r 1 0F B0 00 00 .dword 0b00fh +003D18r 1 E1 FF 00 00 .dword 0ffe1h +003D1Cr 1 E2 FF 00 00 .dword 0ffe2h +003D20r 1 E3 FF 00 00 .dword 0ffe3h +003D24r 1 E4 FF 00 00 .dword 0ffe4h +003D28r 1 E5 FF 00 00 .dword 0ffe5h +003D2Cr 1 E6 FF 00 00 .dword 0ffe6h +003D30r 1 E7 FF 00 00 .dword 0ffe7h +003D34r 1 E8 FF 00 00 .dword 0ffe8h +003D38r 1 E9 FF 00 00 .dword 0ffe9h +003D3Cr 1 EA FF 00 00 .dword 0ffeah +003D40r 1 EB FF 00 00 .dword 0ffebh +003D44r 1 EC FF 00 00 .dword 0ffech +003D48r 1 ED FF 00 00 .dword 0ffedh +003D4Cr 1 EE FF 00 00 .dword 0ffeeh +003D50r 1 EF FF 00 00 .dword 0ffefh +003D54r 1 F0 FF 00 00 .dword 0fff0h +003D58r 1 F1 FF 00 00 .dword 0fff1h +003D5Cr 1 F2 FF 00 00 .dword 0fff2h +003D60r 1 F3 FF 00 00 .dword 0fff3h +003D64r 1 F4 FF 00 00 .dword 0fff4h +003D68r 1 F5 FF 00 00 .dword 0fff5h +003D6Cr 1 F6 FF 00 00 .dword 0fff6h +003D70r 1 F7 FF 00 00 .dword 0fff7h +003D74r 1 F8 FF 00 00 .dword 0fff8h +003D78r 1 F9 FF 00 00 .dword 0fff9h +003D7Cr 1 FA FF 00 00 .dword 0fffah +003D80r 1 FB FF 00 00 .dword 0fffbh +003D84r 1 FC FF 00 00 .dword 0fffch +003D88r 1 FD FF 00 00 .dword 0fffdh +003D8Cr 1 FE FF 00 00 .dword 0fffeh +003D90r 1 FF FF 00 00 .dword 0ffffh +003D94r 1 00 00 01 00 .dword 010000h +003D98r 1 01 00 01 00 .dword 010001h +003D9Cr 1 02 00 01 00 .dword 010002h +003DA0r 1 03 00 01 00 .dword 010003h +003DA4r 1 04 00 01 00 .dword 010004h +003DA8r 1 05 00 01 00 .dword 010005h +003DACr 1 06 00 01 00 .dword 010006h +003DB0r 1 07 00 01 00 .dword 010007h +003DB4r 1 08 00 01 00 .dword 010008h +003DB8r 1 09 00 01 00 .dword 010009h +003DBCr 1 0A 00 01 00 .dword 01000ah +003DC0r 1 0B 00 01 00 .dword 01000bh +003DC4r 1 0C 00 01 00 .dword 01000ch +003DC8r 1 0D 00 01 00 .dword 01000dh +003DCCr 1 0E 00 01 00 .dword 01000eh +003DD0r 1 0F 00 01 00 .dword 01000fh +003DD4r 1 F0 FF FF 7F .dword 07ffffff0h +003DD8r 1 F1 FF FF 7F .dword 07ffffff1h +003DDCr 1 F2 FF FF 7F .dword 07ffffff2h +003DE0r 1 F3 FF FF 7F .dword 07ffffff3h +003DE4r 1 F4 FF FF 7F .dword 07ffffff4h +003DE8r 1 F5 FF FF 7F .dword 07ffffff5h +003DECr 1 F6 FF FF 7F .dword 07ffffff6h +003DF0r 1 F7 FF FF 7F .dword 07ffffff7h +003DF4r 1 F8 FF FF 7F .dword 07ffffff8h +003DF8r 1 F9 FF FF 7F .dword 07ffffff9h +003DFCr 1 FA FF FF 7F .dword 07ffffffah +003E00r 1 FB FF FF 7F .dword 07ffffffbh +003E04r 1 FC FF FF 7F .dword 07ffffffch +003E08r 1 FD FF FF 7F .dword 07ffffffdh +003E0Cr 1 FE FF FF 7F .dword 07ffffffeh +003E10r 1 FF FF FF 7F .dword 07fffffffh +003E14r 1 00 00 00 80 .dword 080000000h +003E18r 1 01 00 00 80 .dword 080000001h +003E1Cr 1 02 00 00 80 .dword 080000002h +003E20r 1 03 00 00 80 .dword 080000003h +003E24r 1 04 00 00 80 .dword 080000004h +003E28r 1 05 00 00 80 .dword 080000005h +003E2Cr 1 06 00 00 80 .dword 080000006h +003E30r 1 07 00 00 80 .dword 080000007h +003E34r 1 08 00 00 80 .dword 080000008h +003E38r 1 09 00 00 80 .dword 080000009h +003E3Cr 1 0A 00 00 80 .dword 08000000ah +003E40r 1 0B 00 00 80 .dword 08000000bh +003E44r 1 0C 00 00 80 .dword 08000000ch +003E48r 1 0D 00 00 80 .dword 08000000dh +003E4Cr 1 0E 00 00 80 .dword 08000000eh +003E50r 1 0F 00 00 80 .dword 08000000fh +003E54r 1 F0 FF FF 9F .dword 09ffffff0h +003E58r 1 F1 FF FF 9F .dword 09ffffff1h +003E5Cr 1 F2 FF FF 9F .dword 09ffffff2h +003E60r 1 F3 FF FF 9F .dword 09ffffff3h +003E64r 1 F4 FF FF 9F .dword 09ffffff4h +003E68r 1 F5 FF FF 9F .dword 09ffffff5h +003E6Cr 1 F6 FF FF 9F .dword 09ffffff6h +003E70r 1 F7 FF FF 9F .dword 09ffffff7h +003E74r 1 F8 FF FF 9F .dword 09ffffff8h +003E78r 1 F9 FF FF 9F .dword 09ffffff9h +003E7Cr 1 FA FF FF 9F .dword 09ffffffah +003E80r 1 FB FF FF 9F .dword 09ffffffbh +003E84r 1 FC FF FF 9F .dword 09ffffffch +003E88r 1 FD FF FF 9F .dword 09ffffffdh +003E8Cr 1 FE FF FF 9F .dword 09ffffffeh +003E90r 1 FF FF FF 9F .dword 09fffffffh +003E94r 1 00 00 00 A0 .dword 0a0000000h +003E98r 1 01 00 00 A0 .dword 0a0000001h +003E9Cr 1 02 00 00 A0 .dword 0a0000002h +003EA0r 1 03 00 00 A0 .dword 0a0000003h +003EA4r 1 04 00 00 A0 .dword 0a0000004h +003EA8r 1 05 00 00 A0 .dword 0a0000005h +003EACr 1 06 00 00 A0 .dword 0a0000006h +003EB0r 1 07 00 00 A0 .dword 0a0000007h +003EB4r 1 08 00 00 A0 .dword 0a0000008h +003EB8r 1 09 00 00 A0 .dword 0a0000009h +003EBCr 1 0A 00 00 A0 .dword 0a000000ah +003EC0r 1 0B 00 00 A0 .dword 0a000000bh +003EC4r 1 0C 00 00 A0 .dword 0a000000ch +003EC8r 1 0D 00 00 A0 .dword 0a000000dh +003ECCr 1 0E 00 00 A0 .dword 0a000000eh +003ED0r 1 0F 00 00 A0 .dword 0a000000fh +003ED4r 1 F0 FF FF FF .dword 0fffffff0h +003ED8r 1 F1 FF FF FF .dword 0fffffff1h +003EDCr 1 F2 FF FF FF .dword 0fffffff2h +003EE0r 1 F3 FF FF FF .dword 0fffffff3h +003EE4r 1 F4 FF FF FF .dword 0fffffff4h +003EE8r 1 F5 FF FF FF .dword 0fffffff5h +003EECr 1 F6 FF FF FF .dword 0fffffff6h +003EF0r 1 F7 FF FF FF .dword 0fffffff7h +003EF4r 1 F8 FF FF FF .dword 0fffffff8h +003EF8r 1 F9 FF FF FF .dword 0fffffff9h +003EFCr 1 FA FF FF FF .dword 0fffffffah +003F00r 1 FB FF FF FF .dword 0fffffffbh +003F04r 1 FC FF FF FF .dword 0fffffffch +003F08r 1 FD FF FF FF .dword 0fffffffdh +003F0Cr 1 FE FF FF FF .dword 0fffffffeh +003F10r 1 FF FF FF FF .dword 0ffffffffh +003F14r 1 +003F14r 1 ; binary values, variable length +003F14r 1 00 00 00 00 .dword %0 +003F18r 1 01 00 00 00 .dword %01 +003F1Cr 1 02 00 00 00 .dword %010 +003F20r 1 03 00 00 00 .dword %011 +003F24r 1 04 00 00 00 .dword %0100 +003F28r 1 05 00 00 00 .dword %0101 +003F2Cr 1 06 00 00 00 .dword %0110 +003F30r 1 07 00 00 00 .dword %0111 +003F34r 1 08 00 00 00 .dword %01000 +003F38r 1 09 00 00 00 .dword %01001 +003F3Cr 1 0A 00 00 00 .dword %01010 +003F40r 1 0B 00 00 00 .dword %01011 +003F44r 1 0C 00 00 00 .dword %01100 +003F48r 1 0D 00 00 00 .dword %01101 +003F4Cr 1 0E 00 00 00 .dword %01110 +003F50r 1 0F 00 00 00 .dword %01111 +003F54r 1 10 00 00 00 .dword %010000 +003F58r 1 11 00 00 00 .dword %010001 +003F5Cr 1 12 00 00 00 .dword %010010 +003F60r 1 13 00 00 00 .dword %010011 +003F64r 1 70 00 00 00 .dword %01110000 +003F68r 1 71 00 00 00 .dword %01110001 +003F6Cr 1 72 00 00 00 .dword %01110010 +003F70r 1 73 00 00 00 .dword %01110011 +003F74r 1 74 00 00 00 .dword %01110100 +003F78r 1 75 00 00 00 .dword %01110101 +003F7Cr 1 76 00 00 00 .dword %01110110 +003F80r 1 77 00 00 00 .dword %01110111 +003F84r 1 78 00 00 00 .dword %01111000 +003F88r 1 79 00 00 00 .dword %01111001 +003F8Cr 1 7A 00 00 00 .dword %01111010 +003F90r 1 7B 00 00 00 .dword %01111011 +003F94r 1 7C 00 00 00 .dword %01111100 +003F98r 1 7D 00 00 00 .dword %01111101 +003F9Cr 1 7E 00 00 00 .dword %01111110 +003FA0r 1 7F 00 00 00 .dword %01111111 +003FA4r 1 80 00 00 00 .dword %010000000 +003FA8r 1 81 00 00 00 .dword %010000001 +003FACr 1 82 00 00 00 .dword %010000010 +003FB0r 1 83 00 00 00 .dword %010000011 +003FB4r 1 84 00 00 00 .dword %010000100 +003FB8r 1 85 00 00 00 .dword %010000101 +003FBCr 1 86 00 00 00 .dword %010000110 +003FC0r 1 F0 00 00 00 .dword %011110000 +003FC4r 1 F1 00 00 00 .dword %011110001 +003FC8r 1 F2 00 00 00 .dword %011110010 +003FCCr 1 F3 00 00 00 .dword %011110011 +003FD0r 1 F4 00 00 00 .dword %011110100 +003FD4r 1 F5 00 00 00 .dword %011110101 +003FD8r 1 F6 00 00 00 .dword %011110110 +003FDCr 1 F7 00 00 00 .dword %011110111 +003FE0r 1 F8 00 00 00 .dword %011111000 +003FE4r 1 F9 00 00 00 .dword %011111001 +003FE8r 1 FA 00 00 00 .dword %011111010 +003FECr 1 FB 00 00 00 .dword %011111011 +003FF0r 1 FC 00 00 00 .dword %011111100 +003FF4r 1 FD 00 00 00 .dword %011111101 +003FF8r 1 FE 00 00 00 .dword %011111110 +003FFCr 1 FF 00 00 00 .dword %011111111 +004000r 1 00 01 00 00 .dword %0100000000 +004004r 1 01 01 00 00 .dword %0100000001 +004008r 1 02 01 00 00 .dword %0100000010 +00400Cr 1 03 01 00 00 .dword %0100000011 +004010r 1 D2 0F 00 00 .dword %0111111010010 +004014r 1 D3 0F 00 00 .dword %0111111010011 +004018r 1 D4 0F 00 00 .dword %0111111010100 +00401Cr 1 D5 0F 00 00 .dword %0111111010101 +004020r 1 D6 0F 00 00 .dword %0111111010110 +004024r 1 D7 0F 00 00 .dword %0111111010111 +004028r 1 D8 0F 00 00 .dword %0111111011000 +00402Cr 1 D9 0F 00 00 .dword %0111111011001 +004030r 1 DA 0F 00 00 .dword %0111111011010 +004034r 1 DB 0F 00 00 .dword %0111111011011 +004038r 1 DC 0F 00 00 .dword %0111111011100 +00403Cr 1 DD 0F 00 00 .dword %0111111011101 +004040r 1 DE 0F 00 00 .dword %0111111011110 +004044r 1 DF 0F 00 00 .dword %0111111011111 +004048r 1 E0 0F 00 00 .dword %0111111100000 +00404Cr 1 E1 0F 00 00 .dword %0111111100001 +004050r 1 E2 0F 00 00 .dword %0111111100010 +004054r 1 E3 0F 00 00 .dword %0111111100011 +004058r 1 E4 0F 00 00 .dword %0111111100100 +00405Cr 1 E5 0F 00 00 .dword %0111111100101 +004060r 1 E6 0F 00 00 .dword %0111111100110 +004064r 1 E7 0F 00 00 .dword %0111111100111 +004068r 1 E8 0F 00 00 .dword %0111111101000 +00406Cr 1 E9 0F 00 00 .dword %0111111101001 +004070r 1 EA 0F 00 00 .dword %0111111101010 +004074r 1 EB 0F 00 00 .dword %0111111101011 +004078r 1 EC 0F 00 00 .dword %0111111101100 +00407Cr 1 ED 0F 00 00 .dword %0111111101101 +004080r 1 EE 0F 00 00 .dword %0111111101110 +004084r 1 EF 0F 00 00 .dword %0111111101111 +004088r 1 F0 0F 00 00 .dword %0111111110000 +00408Cr 1 F1 0F 00 00 .dword %0111111110001 +004090r 1 F2 0F 00 00 .dword %0111111110010 +004094r 1 F3 0F 00 00 .dword %0111111110011 +004098r 1 F4 0F 00 00 .dword %0111111110100 +00409Cr 1 F5 0F 00 00 .dword %0111111110101 +0040A0r 1 F6 0F 00 00 .dword %0111111110110 +0040A4r 1 F7 0F 00 00 .dword %0111111110111 +0040A8r 1 F8 0F 00 00 .dword %0111111111000 +0040ACr 1 F9 0F 00 00 .dword %0111111111001 +0040B0r 1 FA 0F 00 00 .dword %0111111111010 +0040B4r 1 FB 0F 00 00 .dword %0111111111011 +0040B8r 1 FC 0F 00 00 .dword %0111111111100 +0040BCr 1 FD 0F 00 00 .dword %0111111111101 +0040C0r 1 FE 0F 00 00 .dword %0111111111110 +0040C4r 1 FF 0F 00 00 .dword %0111111111111 +0040C8r 1 00 10 00 00 .dword %01000000000000 +0040CCr 1 01 10 00 00 .dword %01000000000001 +0040D0r 1 02 10 00 00 .dword %01000000000010 +0040D4r 1 03 10 00 00 .dword %01000000000011 +0040D8r 1 04 10 00 00 .dword %01000000000100 +0040DCr 1 05 10 00 00 .dword %01000000000101 +0040E0r 1 06 10 00 00 .dword %01000000000110 +0040E4r 1 07 10 00 00 .dword %01000000000111 +0040E8r 1 08 10 00 00 .dword %01000000001000 +0040ECr 1 F0 7F 00 00 .dword %0111111111110000 +0040F0r 1 F1 7F 00 00 .dword %0111111111110001 +0040F4r 1 F2 7F 00 00 .dword %0111111111110010 +0040F8r 1 F3 7F 00 00 .dword %0111111111110011 +0040FCr 1 F4 7F 00 00 .dword %0111111111110100 +004100r 1 F5 7F 00 00 .dword %0111111111110101 +004104r 1 F6 7F 00 00 .dword %0111111111110110 +004108r 1 F7 7F 00 00 .dword %0111111111110111 +00410Cr 1 F8 7F 00 00 .dword %0111111111111000 +004110r 1 F9 7F 00 00 .dword %0111111111111001 +004114r 1 FA 7F 00 00 .dword %0111111111111010 +004118r 1 FB 7F 00 00 .dword %0111111111111011 +00411Cr 1 FC 7F 00 00 .dword %0111111111111100 +004120r 1 FD 7F 00 00 .dword %0111111111111101 +004124r 1 FE 7F 00 00 .dword %0111111111111110 +004128r 1 FF 7F 00 00 .dword %0111111111111111 +00412Cr 1 00 80 00 00 .dword %01000000000000000 +004130r 1 01 80 00 00 .dword %01000000000000001 +004134r 1 02 80 00 00 .dword %01000000000000010 +004138r 1 03 80 00 00 .dword %01000000000000011 +00413Cr 1 04 80 00 00 .dword %01000000000000100 +004140r 1 05 80 00 00 .dword %01000000000000101 +004144r 1 06 80 00 00 .dword %01000000000000110 +004148r 1 07 80 00 00 .dword %01000000000000111 +00414Cr 1 08 80 00 00 .dword %01000000000001000 +004150r 1 09 80 00 00 .dword %01000000000001001 +004154r 1 0A 80 00 00 .dword %01000000000001010 +004158r 1 0B 80 00 00 .dword %01000000000001011 +00415Cr 1 E1 9F 00 00 .dword %01001111111100001 +004160r 1 E2 9F 00 00 .dword %01001111111100010 +004164r 1 E3 9F 00 00 .dword %01001111111100011 +004168r 1 E4 9F 00 00 .dword %01001111111100100 +00416Cr 1 E5 9F 00 00 .dword %01001111111100101 +004170r 1 E6 9F 00 00 .dword %01001111111100110 +004174r 1 E7 9F 00 00 .dword %01001111111100111 +004178r 1 E8 9F 00 00 .dword %01001111111101000 +00417Cr 1 E9 9F 00 00 .dword %01001111111101001 +004180r 1 EA 9F 00 00 .dword %01001111111101010 +004184r 1 EB 9F 00 00 .dword %01001111111101011 +004188r 1 EC 9F 00 00 .dword %01001111111101100 +00418Cr 1 ED 9F 00 00 .dword %01001111111101101 +004190r 1 EE 9F 00 00 .dword %01001111111101110 +004194r 1 EF 9F 00 00 .dword %01001111111101111 +004198r 1 F0 9F 00 00 .dword %01001111111110000 +00419Cr 1 F1 9F 00 00 .dword %01001111111110001 +0041A0r 1 F2 9F 00 00 .dword %01001111111110010 +0041A4r 1 F3 9F 00 00 .dword %01001111111110011 +0041A8r 1 F4 9F 00 00 .dword %01001111111110100 +0041ACr 1 F5 9F 00 00 .dword %01001111111110101 +0041B0r 1 F6 9F 00 00 .dword %01001111111110110 +0041B4r 1 F7 9F 00 00 .dword %01001111111110111 +0041B8r 1 F8 9F 00 00 .dword %01001111111111000 +0041BCr 1 F9 9F 00 00 .dword %01001111111111001 +0041C0r 1 FA 9F 00 00 .dword %01001111111111010 +0041C4r 1 FB 9F 00 00 .dword %01001111111111011 +0041C8r 1 FC 9F 00 00 .dword %01001111111111100 +0041CCr 1 FD 9F 00 00 .dword %01001111111111101 +0041D0r 1 FE 9F 00 00 .dword %01001111111111110 +0041D4r 1 FF 9F 00 00 .dword %01001111111111111 +0041D8r 1 00 A0 00 00 .dword %01010000000000000 +0041DCr 1 01 A0 00 00 .dword %01010000000000001 +0041E0r 1 02 A0 00 00 .dword %01010000000000010 +0041E4r 1 03 A0 00 00 .dword %01010000000000011 +0041E8r 1 04 A0 00 00 .dword %01010000000000100 +0041ECr 1 05 A0 00 00 .dword %01010000000000101 +0041F0r 1 06 A0 00 00 .dword %01010000000000110 +0041F4r 1 07 A0 00 00 .dword %01010000000000111 +0041F8r 1 08 A0 00 00 .dword %01010000000001000 +0041FCr 1 09 A0 00 00 .dword %01010000000001001 +004200r 1 0A A0 00 00 .dword %01010000000001010 +004204r 1 0B A0 00 00 .dword %01010000000001011 +004208r 1 0C A0 00 00 .dword %01010000000001100 +00420Cr 1 0D A0 00 00 .dword %01010000000001101 +004210r 1 0E A0 00 00 .dword %01010000000001110 +004214r 1 0F A0 00 00 .dword %01010000000001111 +004218r 1 E1 AF 00 00 .dword %01010111111100001 +00421Cr 1 E2 AF 00 00 .dword %01010111111100010 +004220r 1 E3 AF 00 00 .dword %01010111111100011 +004224r 1 E4 AF 00 00 .dword %01010111111100100 +004228r 1 E5 AF 00 00 .dword %01010111111100101 +00422Cr 1 E6 AF 00 00 .dword %01010111111100110 +004230r 1 E7 AF 00 00 .dword %01010111111100111 +004234r 1 E8 AF 00 00 .dword %01010111111101000 +004238r 1 E9 AF 00 00 .dword %01010111111101001 +00423Cr 1 EA AF 00 00 .dword %01010111111101010 +004240r 1 EB AF 00 00 .dword %01010111111101011 +004244r 1 EC AF 00 00 .dword %01010111111101100 +004248r 1 ED AF 00 00 .dword %01010111111101101 +00424Cr 1 EE AF 00 00 .dword %01010111111101110 +004250r 1 EF AF 00 00 .dword %01010111111101111 +004254r 1 F0 AF 00 00 .dword %01010111111110000 +004258r 1 F1 AF 00 00 .dword %01010111111110001 +00425Cr 1 F2 AF 00 00 .dword %01010111111110010 +004260r 1 F3 AF 00 00 .dword %01010111111110011 +004264r 1 F4 AF 00 00 .dword %01010111111110100 +004268r 1 F5 AF 00 00 .dword %01010111111110101 +00426Cr 1 F6 AF 00 00 .dword %01010111111110110 +004270r 1 F7 AF 00 00 .dword %01010111111110111 +004274r 1 F8 AF 00 00 .dword %01010111111111000 +004278r 1 F9 AF 00 00 .dword %01010111111111001 +00427Cr 1 FA AF 00 00 .dword %01010111111111010 +004280r 1 FB AF 00 00 .dword %01010111111111011 +004284r 1 FC AF 00 00 .dword %01010111111111100 +004288r 1 FD AF 00 00 .dword %01010111111111101 +00428Cr 1 FE AF 00 00 .dword %01010111111111110 +004290r 1 FF AF 00 00 .dword %01010111111111111 +004294r 1 00 B0 00 00 .dword %01011000000000000 +004298r 1 01 B0 00 00 .dword %01011000000000001 +00429Cr 1 02 B0 00 00 .dword %01011000000000010 +0042A0r 1 03 B0 00 00 .dword %01011000000000011 +0042A4r 1 04 B0 00 00 .dword %01011000000000100 +0042A8r 1 05 B0 00 00 .dword %01011000000000101 +0042ACr 1 06 B0 00 00 .dword %01011000000000110 +0042B0r 1 07 B0 00 00 .dword %01011000000000111 +0042B4r 1 08 B0 00 00 .dword %01011000000001000 +0042B8r 1 09 B0 00 00 .dword %01011000000001001 +0042BCr 1 0A B0 00 00 .dword %01011000000001010 +0042C0r 1 0B B0 00 00 .dword %01011000000001011 +0042C4r 1 0C B0 00 00 .dword %01011000000001100 +0042C8r 1 0D B0 00 00 .dword %01011000000001101 +0042CCr 1 0E B0 00 00 .dword %01011000000001110 +0042D0r 1 0F B0 00 00 .dword %01011000000001111 +0042D4r 1 E1 FF 00 00 .dword %01111111111100001 +0042D8r 1 E2 FF 00 00 .dword %01111111111100010 +0042DCr 1 E3 FF 00 00 .dword %01111111111100011 +0042E0r 1 E4 FF 00 00 .dword %01111111111100100 +0042E4r 1 E5 FF 00 00 .dword %01111111111100101 +0042E8r 1 E6 FF 00 00 .dword %01111111111100110 +0042ECr 1 E7 FF 00 00 .dword %01111111111100111 +0042F0r 1 E8 FF 00 00 .dword %01111111111101000 +0042F4r 1 E9 FF 00 00 .dword %01111111111101001 +0042F8r 1 EA FF 00 00 .dword %01111111111101010 +0042FCr 1 EB FF 00 00 .dword %01111111111101011 +004300r 1 EC FF 00 00 .dword %01111111111101100 +004304r 1 ED FF 00 00 .dword %01111111111101101 +004308r 1 EE FF 00 00 .dword %01111111111101110 +00430Cr 1 EF FF 00 00 .dword %01111111111101111 +004310r 1 F0 FF 00 00 .dword %01111111111110000 +004314r 1 F1 FF 00 00 .dword %01111111111110001 +004318r 1 F2 FF 00 00 .dword %01111111111110010 +00431Cr 1 F3 FF 00 00 .dword %01111111111110011 +004320r 1 F4 FF 00 00 .dword %01111111111110100 +004324r 1 F5 FF 00 00 .dword %01111111111110101 +004328r 1 F6 FF 00 00 .dword %01111111111110110 +00432Cr 1 F7 FF 00 00 .dword %01111111111110111 +004330r 1 F8 FF 00 00 .dword %01111111111111000 +004334r 1 F9 FF 00 00 .dword %01111111111111001 +004338r 1 FA FF 00 00 .dword %01111111111111010 +00433Cr 1 FB FF 00 00 .dword %01111111111111011 +004340r 1 FC FF 00 00 .dword %01111111111111100 +004344r 1 FD FF 00 00 .dword %01111111111111101 +004348r 1 FE FF 00 00 .dword %01111111111111110 +00434Cr 1 FF FF 00 00 .dword %01111111111111111 +004350r 1 00 00 01 00 .dword %010000000000000000 +004354r 1 01 00 01 00 .dword %010000000000000001 +004358r 1 02 00 01 00 .dword %010000000000000010 +00435Cr 1 03 00 01 00 .dword %010000000000000011 +004360r 1 04 00 01 00 .dword %010000000000000100 +004364r 1 05 00 01 00 .dword %010000000000000101 +004368r 1 06 00 01 00 .dword %010000000000000110 +00436Cr 1 07 00 01 00 .dword %010000000000000111 +004370r 1 08 00 01 00 .dword %010000000000001000 +004374r 1 09 00 01 00 .dword %010000000000001001 +004378r 1 0A 00 01 00 .dword %010000000000001010 +00437Cr 1 0B 00 01 00 .dword %010000000000001011 +004380r 1 0C 00 01 00 .dword %010000000000001100 +004384r 1 0D 00 01 00 .dword %010000000000001101 +004388r 1 0E 00 01 00 .dword %010000000000001110 +00438Cr 1 0F 00 01 00 .dword %010000000000001111 +004390r 1 F0 FF FF 7F .dword %1111111111111111111111111110000 +004394r 1 F1 FF FF 7F .dword %1111111111111111111111111110001 +004398r 1 F2 FF FF 7F .dword %1111111111111111111111111110010 +00439Cr 1 F3 FF FF 7F .dword %1111111111111111111111111110011 +0043A0r 1 F4 FF FF 7F .dword %1111111111111111111111111110100 +0043A4r 1 F5 FF FF 7F .dword %1111111111111111111111111110101 +0043A8r 1 F6 FF FF 7F .dword %1111111111111111111111111110110 +0043ACr 1 F7 FF FF 7F .dword %1111111111111111111111111110111 +0043B0r 1 F8 FF FF 7F .dword %1111111111111111111111111111000 +0043B4r 1 F9 FF FF 7F .dword %1111111111111111111111111111001 +0043B8r 1 FA FF FF 7F .dword %1111111111111111111111111111010 +0043BCr 1 FB FF FF 7F .dword %1111111111111111111111111111011 +0043C0r 1 FC FF FF 7F .dword %1111111111111111111111111111100 +0043C4r 1 FD FF FF 7F .dword %1111111111111111111111111111101 +0043C8r 1 FE FF FF 7F .dword %1111111111111111111111111111110 +0043CCr 1 FF FF FF 7F .dword %1111111111111111111111111111111 +0043D0r 1 00 00 00 80 .dword %10000000000000000000000000000000 +0043D4r 1 01 00 00 80 .dword %10000000000000000000000000000001 +0043D8r 1 02 00 00 80 .dword %10000000000000000000000000000010 +0043DCr 1 03 00 00 80 .dword %10000000000000000000000000000011 +0043E0r 1 04 00 00 80 .dword %10000000000000000000000000000100 +0043E4r 1 05 00 00 80 .dword %10000000000000000000000000000101 +0043E8r 1 06 00 00 80 .dword %10000000000000000000000000000110 +0043ECr 1 07 00 00 80 .dword %10000000000000000000000000000111 +0043F0r 1 08 00 00 80 .dword %10000000000000000000000000001000 +0043F4r 1 09 00 00 80 .dword %10000000000000000000000000001001 +0043F8r 1 0A 00 00 80 .dword %10000000000000000000000000001010 +0043FCr 1 0B 00 00 80 .dword %10000000000000000000000000001011 +004400r 1 0C 00 00 80 .dword %10000000000000000000000000001100 +004404r 1 0D 00 00 80 .dword %10000000000000000000000000001101 +004408r 1 0E 00 00 80 .dword %10000000000000000000000000001110 +00440Cr 1 0F 00 00 80 .dword %10000000000000000000000000001111 +004410r 1 F0 FF FF 9F .dword %10011111111111111111111111110000 +004414r 1 F1 FF FF 9F .dword %10011111111111111111111111110001 +004418r 1 F2 FF FF 9F .dword %10011111111111111111111111110010 +00441Cr 1 F3 FF FF 9F .dword %10011111111111111111111111110011 +004420r 1 F4 FF FF 9F .dword %10011111111111111111111111110100 +004424r 1 F5 FF FF 9F .dword %10011111111111111111111111110101 +004428r 1 F6 FF FF 9F .dword %10011111111111111111111111110110 +00442Cr 1 F7 FF FF 9F .dword %10011111111111111111111111110111 +004430r 1 F8 FF FF 9F .dword %10011111111111111111111111111000 +004434r 1 F9 FF FF 9F .dword %10011111111111111111111111111001 +004438r 1 FA FF FF 9F .dword %10011111111111111111111111111010 +00443Cr 1 FB FF FF 9F .dword %10011111111111111111111111111011 +004440r 1 FC FF FF 9F .dword %10011111111111111111111111111100 +004444r 1 FD FF FF 9F .dword %10011111111111111111111111111101 +004448r 1 FE FF FF 9F .dword %10011111111111111111111111111110 +00444Cr 1 FF FF FF 9F .dword %10011111111111111111111111111111 +004450r 1 00 00 00 A0 .dword %10100000000000000000000000000000 +004454r 1 01 00 00 A0 .dword %10100000000000000000000000000001 +004458r 1 02 00 00 A0 .dword %10100000000000000000000000000010 +00445Cr 1 03 00 00 A0 .dword %10100000000000000000000000000011 +004460r 1 04 00 00 A0 .dword %10100000000000000000000000000100 +004464r 1 05 00 00 A0 .dword %10100000000000000000000000000101 +004468r 1 06 00 00 A0 .dword %10100000000000000000000000000110 +00446Cr 1 07 00 00 A0 .dword %10100000000000000000000000000111 +004470r 1 08 00 00 A0 .dword %10100000000000000000000000001000 +004474r 1 09 00 00 A0 .dword %10100000000000000000000000001001 +004478r 1 0A 00 00 A0 .dword %10100000000000000000000000001010 +00447Cr 1 0B 00 00 A0 .dword %10100000000000000000000000001011 +004480r 1 0C 00 00 A0 .dword %10100000000000000000000000001100 +004484r 1 0D 00 00 A0 .dword %10100000000000000000000000001101 +004488r 1 0E 00 00 A0 .dword %10100000000000000000000000001110 +00448Cr 1 0F 00 00 A0 .dword %10100000000000000000000000001111 +004490r 1 F0 FF FF FF .dword %11111111111111111111111111110000 +004494r 1 F1 FF FF FF .dword %11111111111111111111111111110001 +004498r 1 F2 FF FF FF .dword %11111111111111111111111111110010 +00449Cr 1 F3 FF FF FF .dword %11111111111111111111111111110011 +0044A0r 1 F4 FF FF FF .dword %11111111111111111111111111110100 +0044A4r 1 F5 FF FF FF .dword %11111111111111111111111111110101 +0044A8r 1 F6 FF FF FF .dword %11111111111111111111111111110110 +0044ACr 1 F7 FF FF FF .dword %11111111111111111111111111110111 +0044B0r 1 F8 FF FF FF .dword %11111111111111111111111111111000 +0044B4r 1 F9 FF FF FF .dword %11111111111111111111111111111001 +0044B8r 1 FA FF FF FF .dword %11111111111111111111111111111010 +0044BCr 1 FB FF FF FF .dword %11111111111111111111111111111011 +0044C0r 1 FC FF FF FF .dword %11111111111111111111111111111100 +0044C4r 1 FD FF FF FF .dword %11111111111111111111111111111101 +0044C8r 1 FE FF FF FF .dword %11111111111111111111111111111110 +0044CCr 1 FF FF FF FF .dword %11111111111111111111111111111111 +0044D0r 1 +0044D0r 1 ; binary values, full length +0044D0r 1 00 00 00 00 .dword %00000000000000000000000000000000 +0044D4r 1 01 00 00 00 .dword %00000000000000000000000000000001 +0044D8r 1 02 00 00 00 .dword %00000000000000000000000000000010 +0044DCr 1 03 00 00 00 .dword %00000000000000000000000000000011 +0044E0r 1 04 00 00 00 .dword %00000000000000000000000000000100 +0044E4r 1 05 00 00 00 .dword %00000000000000000000000000000101 +0044E8r 1 06 00 00 00 .dword %00000000000000000000000000000110 +0044ECr 1 07 00 00 00 .dword %00000000000000000000000000000111 +0044F0r 1 08 00 00 00 .dword %00000000000000000000000000001000 +0044F4r 1 09 00 00 00 .dword %00000000000000000000000000001001 +0044F8r 1 0A 00 00 00 .dword %00000000000000000000000000001010 +0044FCr 1 0B 00 00 00 .dword %00000000000000000000000000001011 +004500r 1 0C 00 00 00 .dword %00000000000000000000000000001100 +004504r 1 0D 00 00 00 .dword %00000000000000000000000000001101 +004508r 1 0E 00 00 00 .dword %00000000000000000000000000001110 +00450Cr 1 0F 00 00 00 .dword %00000000000000000000000000001111 +004510r 1 10 00 00 00 .dword %00000000000000000000000000010000 +004514r 1 11 00 00 00 .dword %00000000000000000000000000010001 +004518r 1 12 00 00 00 .dword %00000000000000000000000000010010 +00451Cr 1 13 00 00 00 .dword %00000000000000000000000000010011 +004520r 1 70 00 00 00 .dword %00000000000000000000000001110000 +004524r 1 71 00 00 00 .dword %00000000000000000000000001110001 +004528r 1 72 00 00 00 .dword %00000000000000000000000001110010 +00452Cr 1 73 00 00 00 .dword %00000000000000000000000001110011 +004530r 1 74 00 00 00 .dword %00000000000000000000000001110100 +004534r 1 75 00 00 00 .dword %00000000000000000000000001110101 +004538r 1 76 00 00 00 .dword %00000000000000000000000001110110 +00453Cr 1 77 00 00 00 .dword %00000000000000000000000001110111 +004540r 1 78 00 00 00 .dword %00000000000000000000000001111000 +004544r 1 79 00 00 00 .dword %00000000000000000000000001111001 +004548r 1 7A 00 00 00 .dword %00000000000000000000000001111010 +00454Cr 1 7B 00 00 00 .dword %00000000000000000000000001111011 +004550r 1 7C 00 00 00 .dword %00000000000000000000000001111100 +004554r 1 7D 00 00 00 .dword %00000000000000000000000001111101 +004558r 1 7E 00 00 00 .dword %00000000000000000000000001111110 +00455Cr 1 7F 00 00 00 .dword %00000000000000000000000001111111 +004560r 1 80 00 00 00 .dword %00000000000000000000000010000000 +004564r 1 81 00 00 00 .dword %00000000000000000000000010000001 +004568r 1 82 00 00 00 .dword %00000000000000000000000010000010 +00456Cr 1 83 00 00 00 .dword %00000000000000000000000010000011 +004570r 1 84 00 00 00 .dword %00000000000000000000000010000100 +004574r 1 85 00 00 00 .dword %00000000000000000000000010000101 +004578r 1 86 00 00 00 .dword %00000000000000000000000010000110 +00457Cr 1 F0 00 00 00 .dword %00000000000000000000000011110000 +004580r 1 F1 00 00 00 .dword %00000000000000000000000011110001 +004584r 1 F2 00 00 00 .dword %00000000000000000000000011110010 +004588r 1 F3 00 00 00 .dword %00000000000000000000000011110011 +00458Cr 1 F4 00 00 00 .dword %00000000000000000000000011110100 +004590r 1 F5 00 00 00 .dword %00000000000000000000000011110101 +004594r 1 F6 00 00 00 .dword %00000000000000000000000011110110 +004598r 1 F7 00 00 00 .dword %00000000000000000000000011110111 +00459Cr 1 F8 00 00 00 .dword %00000000000000000000000011111000 +0045A0r 1 F9 00 00 00 .dword %00000000000000000000000011111001 +0045A4r 1 FA 00 00 00 .dword %00000000000000000000000011111010 +0045A8r 1 FB 00 00 00 .dword %00000000000000000000000011111011 +0045ACr 1 FC 00 00 00 .dword %00000000000000000000000011111100 +0045B0r 1 FD 00 00 00 .dword %00000000000000000000000011111101 +0045B4r 1 FE 00 00 00 .dword %00000000000000000000000011111110 +0045B8r 1 FF 00 00 00 .dword %00000000000000000000000011111111 +0045BCr 1 00 01 00 00 .dword %00000000000000000000000100000000 +0045C0r 1 01 01 00 00 .dword %00000000000000000000000100000001 +0045C4r 1 02 01 00 00 .dword %00000000000000000000000100000010 +0045C8r 1 03 01 00 00 .dword %00000000000000000000000100000011 +0045CCr 1 D2 0F 00 00 .dword %00000000000000000000111111010010 +0045D0r 1 D3 0F 00 00 .dword %00000000000000000000111111010011 +0045D4r 1 D4 0F 00 00 .dword %00000000000000000000111111010100 +0045D8r 1 D5 0F 00 00 .dword %00000000000000000000111111010101 +0045DCr 1 D6 0F 00 00 .dword %00000000000000000000111111010110 +0045E0r 1 D7 0F 00 00 .dword %00000000000000000000111111010111 +0045E4r 1 D8 0F 00 00 .dword %00000000000000000000111111011000 +0045E8r 1 D9 0F 00 00 .dword %00000000000000000000111111011001 +0045ECr 1 DA 0F 00 00 .dword %00000000000000000000111111011010 +0045F0r 1 DB 0F 00 00 .dword %00000000000000000000111111011011 +0045F4r 1 DC 0F 00 00 .dword %00000000000000000000111111011100 +0045F8r 1 DD 0F 00 00 .dword %00000000000000000000111111011101 +0045FCr 1 DE 0F 00 00 .dword %00000000000000000000111111011110 +004600r 1 DF 0F 00 00 .dword %00000000000000000000111111011111 +004604r 1 E0 0F 00 00 .dword %00000000000000000000111111100000 +004608r 1 E1 0F 00 00 .dword %00000000000000000000111111100001 +00460Cr 1 E2 0F 00 00 .dword %00000000000000000000111111100010 +004610r 1 E3 0F 00 00 .dword %00000000000000000000111111100011 +004614r 1 E4 0F 00 00 .dword %00000000000000000000111111100100 +004618r 1 E5 0F 00 00 .dword %00000000000000000000111111100101 +00461Cr 1 E6 0F 00 00 .dword %00000000000000000000111111100110 +004620r 1 E7 0F 00 00 .dword %00000000000000000000111111100111 +004624r 1 E8 0F 00 00 .dword %00000000000000000000111111101000 +004628r 1 E9 0F 00 00 .dword %00000000000000000000111111101001 +00462Cr 1 EA 0F 00 00 .dword %00000000000000000000111111101010 +004630r 1 EB 0F 00 00 .dword %00000000000000000000111111101011 +004634r 1 EC 0F 00 00 .dword %00000000000000000000111111101100 +004638r 1 ED 0F 00 00 .dword %00000000000000000000111111101101 +00463Cr 1 EE 0F 00 00 .dword %00000000000000000000111111101110 +004640r 1 EF 0F 00 00 .dword %00000000000000000000111111101111 +004644r 1 F0 0F 00 00 .dword %00000000000000000000111111110000 +004648r 1 F1 0F 00 00 .dword %00000000000000000000111111110001 +00464Cr 1 F2 0F 00 00 .dword %00000000000000000000111111110010 +004650r 1 F3 0F 00 00 .dword %00000000000000000000111111110011 +004654r 1 F4 0F 00 00 .dword %00000000000000000000111111110100 +004658r 1 F5 0F 00 00 .dword %00000000000000000000111111110101 +00465Cr 1 F6 0F 00 00 .dword %00000000000000000000111111110110 +004660r 1 F7 0F 00 00 .dword %00000000000000000000111111110111 +004664r 1 F8 0F 00 00 .dword %00000000000000000000111111111000 +004668r 1 F9 0F 00 00 .dword %00000000000000000000111111111001 +00466Cr 1 FA 0F 00 00 .dword %00000000000000000000111111111010 +004670r 1 FB 0F 00 00 .dword %00000000000000000000111111111011 +004674r 1 FC 0F 00 00 .dword %00000000000000000000111111111100 +004678r 1 FD 0F 00 00 .dword %00000000000000000000111111111101 +00467Cr 1 FE 0F 00 00 .dword %00000000000000000000111111111110 +004680r 1 FF 0F 00 00 .dword %00000000000000000000111111111111 +004684r 1 00 10 00 00 .dword %00000000000000000001000000000000 +004688r 1 01 10 00 00 .dword %00000000000000000001000000000001 +00468Cr 1 02 10 00 00 .dword %00000000000000000001000000000010 +004690r 1 03 10 00 00 .dword %00000000000000000001000000000011 +004694r 1 04 10 00 00 .dword %00000000000000000001000000000100 +004698r 1 05 10 00 00 .dword %00000000000000000001000000000101 +00469Cr 1 06 10 00 00 .dword %00000000000000000001000000000110 +0046A0r 1 07 10 00 00 .dword %00000000000000000001000000000111 +0046A4r 1 08 10 00 00 .dword %00000000000000000001000000001000 +0046A8r 1 F0 7F 00 00 .dword %00000000000000000111111111110000 +0046ACr 1 F1 7F 00 00 .dword %00000000000000000111111111110001 +0046B0r 1 F2 7F 00 00 .dword %00000000000000000111111111110010 +0046B4r 1 F3 7F 00 00 .dword %00000000000000000111111111110011 +0046B8r 1 F4 7F 00 00 .dword %00000000000000000111111111110100 +0046BCr 1 F5 7F 00 00 .dword %00000000000000000111111111110101 +0046C0r 1 F6 7F 00 00 .dword %00000000000000000111111111110110 +0046C4r 1 F7 7F 00 00 .dword %00000000000000000111111111110111 +0046C8r 1 F8 7F 00 00 .dword %00000000000000000111111111111000 +0046CCr 1 F9 7F 00 00 .dword %00000000000000000111111111111001 +0046D0r 1 FA 7F 00 00 .dword %00000000000000000111111111111010 +0046D4r 1 FB 7F 00 00 .dword %00000000000000000111111111111011 +0046D8r 1 FC 7F 00 00 .dword %00000000000000000111111111111100 +0046DCr 1 FD 7F 00 00 .dword %00000000000000000111111111111101 +0046E0r 1 FE 7F 00 00 .dword %00000000000000000111111111111110 +0046E4r 1 FF 7F 00 00 .dword %00000000000000000111111111111111 +0046E8r 1 00 80 00 00 .dword %00000000000000001000000000000000 +0046ECr 1 01 80 00 00 .dword %00000000000000001000000000000001 +0046F0r 1 02 80 00 00 .dword %00000000000000001000000000000010 +0046F4r 1 03 80 00 00 .dword %00000000000000001000000000000011 +0046F8r 1 04 80 00 00 .dword %00000000000000001000000000000100 +0046FCr 1 05 80 00 00 .dword %00000000000000001000000000000101 +004700r 1 06 80 00 00 .dword %00000000000000001000000000000110 +004704r 1 07 80 00 00 .dword %00000000000000001000000000000111 +004708r 1 08 80 00 00 .dword %00000000000000001000000000001000 +00470Cr 1 09 80 00 00 .dword %00000000000000001000000000001001 +004710r 1 0A 80 00 00 .dword %00000000000000001000000000001010 +004714r 1 0B 80 00 00 .dword %00000000000000001000000000001011 +004718r 1 E1 9F 00 00 .dword %00000000000000001001111111100001 +00471Cr 1 E2 9F 00 00 .dword %00000000000000001001111111100010 +004720r 1 E3 9F 00 00 .dword %00000000000000001001111111100011 +004724r 1 E4 9F 00 00 .dword %00000000000000001001111111100100 +004728r 1 E5 9F 00 00 .dword %00000000000000001001111111100101 +00472Cr 1 E6 9F 00 00 .dword %00000000000000001001111111100110 +004730r 1 E7 9F 00 00 .dword %00000000000000001001111111100111 +004734r 1 E8 9F 00 00 .dword %00000000000000001001111111101000 +004738r 1 E9 9F 00 00 .dword %00000000000000001001111111101001 +00473Cr 1 EA 9F 00 00 .dword %00000000000000001001111111101010 +004740r 1 EB 9F 00 00 .dword %00000000000000001001111111101011 +004744r 1 EC 9F 00 00 .dword %00000000000000001001111111101100 +004748r 1 ED 9F 00 00 .dword %00000000000000001001111111101101 +00474Cr 1 EE 9F 00 00 .dword %00000000000000001001111111101110 +004750r 1 EF 9F 00 00 .dword %00000000000000001001111111101111 +004754r 1 F0 9F 00 00 .dword %00000000000000001001111111110000 +004758r 1 F1 9F 00 00 .dword %00000000000000001001111111110001 +00475Cr 1 F2 9F 00 00 .dword %00000000000000001001111111110010 +004760r 1 F3 9F 00 00 .dword %00000000000000001001111111110011 +004764r 1 F4 9F 00 00 .dword %00000000000000001001111111110100 +004768r 1 F5 9F 00 00 .dword %00000000000000001001111111110101 +00476Cr 1 F6 9F 00 00 .dword %00000000000000001001111111110110 +004770r 1 F7 9F 00 00 .dword %00000000000000001001111111110111 +004774r 1 F8 9F 00 00 .dword %00000000000000001001111111111000 +004778r 1 F9 9F 00 00 .dword %00000000000000001001111111111001 +00477Cr 1 FA 9F 00 00 .dword %00000000000000001001111111111010 +004780r 1 FB 9F 00 00 .dword %00000000000000001001111111111011 +004784r 1 FC 9F 00 00 .dword %00000000000000001001111111111100 +004788r 1 FD 9F 00 00 .dword %00000000000000001001111111111101 +00478Cr 1 FE 9F 00 00 .dword %00000000000000001001111111111110 +004790r 1 FF 9F 00 00 .dword %00000000000000001001111111111111 +004794r 1 00 A0 00 00 .dword %00000000000000001010000000000000 +004798r 1 01 A0 00 00 .dword %00000000000000001010000000000001 +00479Cr 1 02 A0 00 00 .dword %00000000000000001010000000000010 +0047A0r 1 03 A0 00 00 .dword %00000000000000001010000000000011 +0047A4r 1 04 A0 00 00 .dword %00000000000000001010000000000100 +0047A8r 1 05 A0 00 00 .dword %00000000000000001010000000000101 +0047ACr 1 06 A0 00 00 .dword %00000000000000001010000000000110 +0047B0r 1 07 A0 00 00 .dword %00000000000000001010000000000111 +0047B4r 1 08 A0 00 00 .dword %00000000000000001010000000001000 +0047B8r 1 09 A0 00 00 .dword %00000000000000001010000000001001 +0047BCr 1 0A A0 00 00 .dword %00000000000000001010000000001010 +0047C0r 1 0B A0 00 00 .dword %00000000000000001010000000001011 +0047C4r 1 0C A0 00 00 .dword %00000000000000001010000000001100 +0047C8r 1 0D A0 00 00 .dword %00000000000000001010000000001101 +0047CCr 1 0E A0 00 00 .dword %00000000000000001010000000001110 +0047D0r 1 0F A0 00 00 .dword %00000000000000001010000000001111 +0047D4r 1 E1 AF 00 00 .dword %00000000000000001010111111100001 +0047D8r 1 E2 AF 00 00 .dword %00000000000000001010111111100010 +0047DCr 1 E3 AF 00 00 .dword %00000000000000001010111111100011 +0047E0r 1 E4 AF 00 00 .dword %00000000000000001010111111100100 +0047E4r 1 E5 AF 00 00 .dword %00000000000000001010111111100101 +0047E8r 1 E6 AF 00 00 .dword %00000000000000001010111111100110 +0047ECr 1 E7 AF 00 00 .dword %00000000000000001010111111100111 +0047F0r 1 E8 AF 00 00 .dword %00000000000000001010111111101000 +0047F4r 1 E9 AF 00 00 .dword %00000000000000001010111111101001 +0047F8r 1 EA AF 00 00 .dword %00000000000000001010111111101010 +0047FCr 1 EB AF 00 00 .dword %00000000000000001010111111101011 +004800r 1 EC AF 00 00 .dword %00000000000000001010111111101100 +004804r 1 ED AF 00 00 .dword %00000000000000001010111111101101 +004808r 1 EE AF 00 00 .dword %00000000000000001010111111101110 +00480Cr 1 EF AF 00 00 .dword %00000000000000001010111111101111 +004810r 1 F0 AF 00 00 .dword %00000000000000001010111111110000 +004814r 1 F1 AF 00 00 .dword %00000000000000001010111111110001 +004818r 1 F2 AF 00 00 .dword %00000000000000001010111111110010 +00481Cr 1 F3 AF 00 00 .dword %00000000000000001010111111110011 +004820r 1 F4 AF 00 00 .dword %00000000000000001010111111110100 +004824r 1 F5 AF 00 00 .dword %00000000000000001010111111110101 +004828r 1 F6 AF 00 00 .dword %00000000000000001010111111110110 +00482Cr 1 F7 AF 00 00 .dword %00000000000000001010111111110111 +004830r 1 F8 AF 00 00 .dword %00000000000000001010111111111000 +004834r 1 F9 AF 00 00 .dword %00000000000000001010111111111001 +004838r 1 FA AF 00 00 .dword %00000000000000001010111111111010 +00483Cr 1 FB AF 00 00 .dword %00000000000000001010111111111011 +004840r 1 FC AF 00 00 .dword %00000000000000001010111111111100 +004844r 1 FD AF 00 00 .dword %00000000000000001010111111111101 +004848r 1 FE AF 00 00 .dword %00000000000000001010111111111110 +00484Cr 1 FF AF 00 00 .dword %00000000000000001010111111111111 +004850r 1 00 B0 00 00 .dword %00000000000000001011000000000000 +004854r 1 01 B0 00 00 .dword %00000000000000001011000000000001 +004858r 1 02 B0 00 00 .dword %00000000000000001011000000000010 +00485Cr 1 03 B0 00 00 .dword %00000000000000001011000000000011 +004860r 1 04 B0 00 00 .dword %00000000000000001011000000000100 +004864r 1 05 B0 00 00 .dword %00000000000000001011000000000101 +004868r 1 06 B0 00 00 .dword %00000000000000001011000000000110 +00486Cr 1 07 B0 00 00 .dword %00000000000000001011000000000111 +004870r 1 08 B0 00 00 .dword %00000000000000001011000000001000 +004874r 1 09 B0 00 00 .dword %00000000000000001011000000001001 +004878r 1 0A B0 00 00 .dword %00000000000000001011000000001010 +00487Cr 1 0B B0 00 00 .dword %00000000000000001011000000001011 +004880r 1 0C B0 00 00 .dword %00000000000000001011000000001100 +004884r 1 0D B0 00 00 .dword %00000000000000001011000000001101 +004888r 1 0E B0 00 00 .dword %00000000000000001011000000001110 +00488Cr 1 0F B0 00 00 .dword %00000000000000001011000000001111 +004890r 1 E1 FF 00 00 .dword %00000000000000001111111111100001 +004894r 1 E2 FF 00 00 .dword %00000000000000001111111111100010 +004898r 1 E3 FF 00 00 .dword %00000000000000001111111111100011 +00489Cr 1 E4 FF 00 00 .dword %00000000000000001111111111100100 +0048A0r 1 E5 FF 00 00 .dword %00000000000000001111111111100101 +0048A4r 1 E6 FF 00 00 .dword %00000000000000001111111111100110 +0048A8r 1 E7 FF 00 00 .dword %00000000000000001111111111100111 +0048ACr 1 E8 FF 00 00 .dword %00000000000000001111111111101000 +0048B0r 1 E9 FF 00 00 .dword %00000000000000001111111111101001 +0048B4r 1 EA FF 00 00 .dword %00000000000000001111111111101010 +0048B8r 1 EB FF 00 00 .dword %00000000000000001111111111101011 +0048BCr 1 EC FF 00 00 .dword %00000000000000001111111111101100 +0048C0r 1 ED FF 00 00 .dword %00000000000000001111111111101101 +0048C4r 1 EE FF 00 00 .dword %00000000000000001111111111101110 +0048C8r 1 EF FF 00 00 .dword %00000000000000001111111111101111 +0048CCr 1 F0 FF 00 00 .dword %00000000000000001111111111110000 +0048D0r 1 F1 FF 00 00 .dword %00000000000000001111111111110001 +0048D4r 1 F2 FF 00 00 .dword %00000000000000001111111111110010 +0048D8r 1 F3 FF 00 00 .dword %00000000000000001111111111110011 +0048DCr 1 F4 FF 00 00 .dword %00000000000000001111111111110100 +0048E0r 1 F5 FF 00 00 .dword %00000000000000001111111111110101 +0048E4r 1 F6 FF 00 00 .dword %00000000000000001111111111110110 +0048E8r 1 F7 FF 00 00 .dword %00000000000000001111111111110111 +0048ECr 1 F8 FF 00 00 .dword %00000000000000001111111111111000 +0048F0r 1 F9 FF 00 00 .dword %00000000000000001111111111111001 +0048F4r 1 FA FF 00 00 .dword %00000000000000001111111111111010 +0048F8r 1 FB FF 00 00 .dword %00000000000000001111111111111011 +0048FCr 1 FC FF 00 00 .dword %00000000000000001111111111111100 +004900r 1 FD FF 00 00 .dword %00000000000000001111111111111101 +004904r 1 FE FF 00 00 .dword %00000000000000001111111111111110 +004908r 1 FF FF 00 00 .dword %00000000000000001111111111111111 +00490Cr 1 00 00 01 00 .dword %00000000000000010000000000000000 +004910r 1 01 00 01 00 .dword %00000000000000010000000000000001 +004914r 1 02 00 01 00 .dword %00000000000000010000000000000010 +004918r 1 03 00 01 00 .dword %00000000000000010000000000000011 +00491Cr 1 04 00 01 00 .dword %00000000000000010000000000000100 +004920r 1 05 00 01 00 .dword %00000000000000010000000000000101 +004924r 1 06 00 01 00 .dword %00000000000000010000000000000110 +004928r 1 07 00 01 00 .dword %00000000000000010000000000000111 +00492Cr 1 08 00 01 00 .dword %00000000000000010000000000001000 +004930r 1 09 00 01 00 .dword %00000000000000010000000000001001 +004934r 1 0A 00 01 00 .dword %00000000000000010000000000001010 +004938r 1 0B 00 01 00 .dword %00000000000000010000000000001011 +00493Cr 1 0C 00 01 00 .dword %00000000000000010000000000001100 +004940r 1 0D 00 01 00 .dword %00000000000000010000000000001101 +004944r 1 0E 00 01 00 .dword %00000000000000010000000000001110 +004948r 1 0F 00 01 00 .dword %00000000000000010000000000001111 +00494Cr 1 F0 FF FF 7F .dword %01111111111111111111111111110000 +004950r 1 F1 FF FF 7F .dword %01111111111111111111111111110001 +004954r 1 F2 FF FF 7F .dword %01111111111111111111111111110010 +004958r 1 F3 FF FF 7F .dword %01111111111111111111111111110011 +00495Cr 1 F4 FF FF 7F .dword %01111111111111111111111111110100 +004960r 1 F5 FF FF 7F .dword %01111111111111111111111111110101 +004964r 1 F6 FF FF 7F .dword %01111111111111111111111111110110 +004968r 1 F7 FF FF 7F .dword %01111111111111111111111111110111 +00496Cr 1 F8 FF FF 7F .dword %01111111111111111111111111111000 +004970r 1 F9 FF FF 7F .dword %01111111111111111111111111111001 +004974r 1 FA FF FF 7F .dword %01111111111111111111111111111010 +004978r 1 FB FF FF 7F .dword %01111111111111111111111111111011 +00497Cr 1 FC FF FF 7F .dword %01111111111111111111111111111100 +004980r 1 FD FF FF 7F .dword %01111111111111111111111111111101 +004984r 1 FE FF FF 7F .dword %01111111111111111111111111111110 +004988r 1 FF FF FF 7F .dword %01111111111111111111111111111111 +00498Cr 1 00 00 00 80 .dword %10000000000000000000000000000000 +004990r 1 01 00 00 80 .dword %10000000000000000000000000000001 +004994r 1 02 00 00 80 .dword %10000000000000000000000000000010 +004998r 1 03 00 00 80 .dword %10000000000000000000000000000011 +00499Cr 1 04 00 00 80 .dword %10000000000000000000000000000100 +0049A0r 1 05 00 00 80 .dword %10000000000000000000000000000101 +0049A4r 1 06 00 00 80 .dword %10000000000000000000000000000110 +0049A8r 1 07 00 00 80 .dword %10000000000000000000000000000111 +0049ACr 1 08 00 00 80 .dword %10000000000000000000000000001000 +0049B0r 1 09 00 00 80 .dword %10000000000000000000000000001001 +0049B4r 1 0A 00 00 80 .dword %10000000000000000000000000001010 +0049B8r 1 0B 00 00 80 .dword %10000000000000000000000000001011 +0049BCr 1 0C 00 00 80 .dword %10000000000000000000000000001100 +0049C0r 1 0D 00 00 80 .dword %10000000000000000000000000001101 +0049C4r 1 0E 00 00 80 .dword %10000000000000000000000000001110 +0049C8r 1 0F 00 00 80 .dword %10000000000000000000000000001111 +0049CCr 1 F0 FF FF 9F .dword %10011111111111111111111111110000 +0049D0r 1 F1 FF FF 9F .dword %10011111111111111111111111110001 +0049D4r 1 F2 FF FF 9F .dword %10011111111111111111111111110010 +0049D8r 1 F3 FF FF 9F .dword %10011111111111111111111111110011 +0049DCr 1 F4 FF FF 9F .dword %10011111111111111111111111110100 +0049E0r 1 F5 FF FF 9F .dword %10011111111111111111111111110101 +0049E4r 1 F6 FF FF 9F .dword %10011111111111111111111111110110 +0049E8r 1 F7 FF FF 9F .dword %10011111111111111111111111110111 +0049ECr 1 F8 FF FF 9F .dword %10011111111111111111111111111000 +0049F0r 1 F9 FF FF 9F .dword %10011111111111111111111111111001 +0049F4r 1 FA FF FF 9F .dword %10011111111111111111111111111010 +0049F8r 1 FB FF FF 9F .dword %10011111111111111111111111111011 +0049FCr 1 FC FF FF 9F .dword %10011111111111111111111111111100 +004A00r 1 FD FF FF 9F .dword %10011111111111111111111111111101 +004A04r 1 FE FF FF 9F .dword %10011111111111111111111111111110 +004A08r 1 FF FF FF 9F .dword %10011111111111111111111111111111 +004A0Cr 1 00 00 00 A0 .dword %10100000000000000000000000000000 +004A10r 1 01 00 00 A0 .dword %10100000000000000000000000000001 +004A14r 1 02 00 00 A0 .dword %10100000000000000000000000000010 +004A18r 1 03 00 00 A0 .dword %10100000000000000000000000000011 +004A1Cr 1 04 00 00 A0 .dword %10100000000000000000000000000100 +004A20r 1 05 00 00 A0 .dword %10100000000000000000000000000101 +004A24r 1 06 00 00 A0 .dword %10100000000000000000000000000110 +004A28r 1 07 00 00 A0 .dword %10100000000000000000000000000111 +004A2Cr 1 08 00 00 A0 .dword %10100000000000000000000000001000 +004A30r 1 09 00 00 A0 .dword %10100000000000000000000000001001 +004A34r 1 0A 00 00 A0 .dword %10100000000000000000000000001010 +004A38r 1 0B 00 00 A0 .dword %10100000000000000000000000001011 +004A3Cr 1 0C 00 00 A0 .dword %10100000000000000000000000001100 +004A40r 1 0D 00 00 A0 .dword %10100000000000000000000000001101 +004A44r 1 0E 00 00 A0 .dword %10100000000000000000000000001110 +004A48r 1 0F 00 00 A0 .dword %10100000000000000000000000001111 +004A4Cr 1 F0 FF FF FF .dword %11111111111111111111111111110000 +004A50r 1 F1 FF FF FF .dword %11111111111111111111111111110001 +004A54r 1 F2 FF FF FF .dword %11111111111111111111111111110010 +004A58r 1 F3 FF FF FF .dword %11111111111111111111111111110011 +004A5Cr 1 F4 FF FF FF .dword %11111111111111111111111111110100 +004A60r 1 F5 FF FF FF .dword %11111111111111111111111111110101 +004A64r 1 F6 FF FF FF .dword %11111111111111111111111111110110 +004A68r 1 F7 FF FF FF .dword %11111111111111111111111111110111 +004A6Cr 1 F8 FF FF FF .dword %11111111111111111111111111111000 +004A70r 1 F9 FF FF FF .dword %11111111111111111111111111111001 +004A74r 1 FA FF FF FF .dword %11111111111111111111111111111010 +004A78r 1 FB FF FF FF .dword %11111111111111111111111111111011 +004A7Cr 1 FC FF FF FF .dword %11111111111111111111111111111100 +004A80r 1 FD FF FF FF .dword %11111111111111111111111111111101 +004A84r 1 FE FF FF FF .dword %11111111111111111111111111111110 +004A88r 1 FF FF FF FF .dword %11111111111111111111111111111111 +004A8Cr 1 +004A8Cr 1 ; multiple values on one line, decimal +004A8Cr 1 00 00 00 00 .dword 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 +004A90r 1 01 00 00 00 +004A94r 1 02 00 00 00 +004ACCr 1 10 00 00 00 .dword 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 +004AD0r 1 11 00 00 00 +004AD4r 1 12 00 00 00 +004B0Cr 1 70 00 00 00 .dword 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 +004B10r 1 71 00 00 00 +004B14r 1 72 00 00 00 +004B4Cr 1 80 00 00 00 .dword 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 +004B50r 1 81 00 00 00 +004B54r 1 82 00 00 00 +004B8Cr 1 F0 00 00 00 .dword 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 +004B90r 1 F1 00 00 00 +004B94r 1 F2 00 00 00 +004BCCr 1 00 01 00 00 .dword 256,257,258,259,260,261,262,263,264,265,266,267,268,269,270,271 +004BD0r 1 01 01 00 00 +004BD4r 1 02 01 00 00 +004C0Cr 1 E0 0F 00 00 .dword 4064,4065,4066,4067,4068,4069,4070,4071,4072,4073,4074,4075,4076,4077,4078,4079 +004C10r 1 E1 0F 00 00 +004C14r 1 E2 0F 00 00 +004C4Cr 1 F0 0F 00 00 .dword 4080,4081,4082,4083,4084,4085,4086,4087,4088,4089,4090,4091,4092,4093,4094,4095 +004C50r 1 F1 0F 00 00 +004C54r 1 F2 0F 00 00 +004C8Cr 1 00 10 00 00 .dword 4096,4097,4098,4099,4100,4101,4102,4103,4104,4105,4106,4107,4108,4109,4110,4111 +004C90r 1 01 10 00 00 +004C94r 1 02 10 00 00 +004CCCr 1 F0 7F 00 00 .dword 32752,32753,32754,32755,32756,32757,32758,32759,32760,32761,32762,32763,32764,32765,32766,32767 +004CD0r 1 F1 7F 00 00 +004CD4r 1 F2 7F 00 00 +004D0Cr 1 00 80 00 00 .dword 32768,32769,32770,32771,32772,32773,32774,32775,32776,32777,32778,32779,32780,32781,32782,32783 +004D10r 1 01 80 00 00 +004D14r 1 02 80 00 00 +004D4Cr 1 F0 9F 00 00 .dword 40944,40945,40946,40947,40948,40949,40950,40951,40952,40953,40954,40955,40956,40957,40958,40959 +004D50r 1 F1 9F 00 00 +004D54r 1 F2 9F 00 00 +004D8Cr 1 00 A0 00 00 .dword 40960,40961,40962,40963,40964,40965,40966,40967,40968,40969,40970,40971,40972,40973,40974,40975 +004D90r 1 01 A0 00 00 +004D94r 1 02 A0 00 00 +004DCCr 1 F0 AF 00 00 .dword 45040,45041,45042,45043,45044,45045,45046,45047,45048,45049,45050,45051,45052,45053,45054,45055 +004DD0r 1 F1 AF 00 00 +004DD4r 1 F2 AF 00 00 +004E0Cr 1 00 B0 00 00 .dword 45056,45057,45058,45059,45060,45061,45062,45063,45064,45065,45066,45067,45068,45069,45070,45071 +004E10r 1 01 B0 00 00 +004E14r 1 02 B0 00 00 +004E4Cr 1 F0 FF 00 00 .dword 65520,65521,65522,65523,65524,65525,65526,65527,65528,65529,65530,65531,65532,65533,65534,65535 +004E50r 1 F1 FF 00 00 +004E54r 1 F2 FF 00 00 +004E8Cr 1 00 00 01 00 .dword 65536,65537,65538,65539,65540,65541,65542,65543,65544,65545,65546,65547,65548,65549,65550,65551 +004E90r 1 01 00 01 00 +004E94r 1 02 00 01 00 +004ECCr 1 FF FF FF 7F .dword 2147483647,2147483648,2147483649,2147483650,2147483651,2147483652,2147483653,2147483654,2147483655,2147483656,2147483657,2147483658,2147483659,2147483660,2147483661,2147483662 +004ED0r 1 00 00 00 80 +004ED4r 1 01 00 00 80 +004F0Cr 1 0F 00 00 80 .dword 2147483663,2147483664,2147483665,2147483666,2147483667,2147483668,2147483669,2147483670,2147483671,2147483672,2147483673,2147483674,2147483675,2147483676,2147483677,2147483678 +004F10r 1 10 00 00 80 +004F14r 1 11 00 00 80 +004F4Cr 1 FF FF FF 9F .dword 2684354559,2684354560,2684354561,2684354562,2684354563,2684354564,2684354565,2684354566,2684354567,2684354568,2684354569,2684354570,2684354571,2684354572,2684354573,2684354574 +004F50r 1 00 00 00 A0 +004F54r 1 01 00 00 A0 +004F8Cr 1 0F 00 00 A0 .dword 2684354575,2684354576,2684354577,2684354578,2684354579,2684354580,2684354581,2684354582,2684354583,2684354584,2684354585,2684354586,2684354587,2684354588,2684354589,2684354590 +004F90r 1 10 00 00 A0 +004F94r 1 11 00 00 A0 +004FCCr 1 FF FF FF FF .dword 4294967295 +004FD0r 1 +004FD0r 1 ; multiple values on one line, hex +004FD0r 1 00 00 00 00 .dword $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f +004FD4r 1 01 00 00 00 +004FD8r 1 02 00 00 00 +005010r 1 10 00 00 00 .dword $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f +005014r 1 11 00 00 00 +005018r 1 12 00 00 00 +005050r 1 70 00 00 00 .dword $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f +005054r 1 71 00 00 00 +005058r 1 72 00 00 00 +005090r 1 80 00 00 00 .dword $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f +005094r 1 81 00 00 00 +005098r 1 82 00 00 00 +0050D0r 1 F0 00 00 00 .dword $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff +0050D4r 1 F1 00 00 00 +0050D8r 1 F2 00 00 00 +005110r 1 00 01 00 00 .dword $100,$101,$102,$103,$104,$105,$106,$107,$108,$109,$10a,$10b,$10c,$10d,$10e,$10f +005114r 1 01 01 00 00 +005118r 1 02 01 00 00 +005150r 1 E0 0F 00 00 .dword $fe0,$fe1,$fe2,$fe3,$fe4,$fe5,$fe6,$fe7,$fe8,$fe9,$fea,$feb,$fec,$fed,$fee,$fef +005154r 1 E1 0F 00 00 +005158r 1 E2 0F 00 00 +005190r 1 F0 0F 00 00 .dword $ff0,$ff1,$ff2,$ff3,$ff4,$ff5,$ff6,$ff7,$ff8,$ff9,$ffa,$ffb,$ffc,$ffd,$ffe,$fff +005194r 1 F1 0F 00 00 +005198r 1 F2 0F 00 00 +0051D0r 1 00 10 00 00 .dword $1000,$1001,$1002,$1003,$1004,$1005,$1006,$1007,$1008,$1009,$100a,$100b,$100c,$100d,$100e,$100f +0051D4r 1 01 10 00 00 +0051D8r 1 02 10 00 00 +005210r 1 F0 7F 00 00 .dword $7ff0,$7ff1,$7ff2,$7ff3,$7ff4,$7ff5,$7ff6,$7ff7,$7ff8,$7ff9,$7ffa,$7ffb,$7ffc,$7ffd,$7ffe,$7fff +005214r 1 F1 7F 00 00 +005218r 1 F2 7F 00 00 +005250r 1 00 80 00 00 .dword $8000,$8001,$8002,$8003,$8004,$8005,$8006,$8007,$8008,$8009,$800a,$800b,$800c,$800d,$800e,$800f +005254r 1 01 80 00 00 +005258r 1 02 80 00 00 +005290r 1 F0 9F 00 00 .dword $9ff0,$9ff1,$9ff2,$9ff3,$9ff4,$9ff5,$9ff6,$9ff7,$9ff8,$9ff9,$9ffa,$9ffb,$9ffc,$9ffd,$9ffe,$9fff +005294r 1 F1 9F 00 00 +005298r 1 F2 9F 00 00 +0052D0r 1 00 A0 00 00 .dword $a000,$a001,$a002,$a003,$a004,$a005,$a006,$a007,$a008,$a009,$a00a,$a00b,$a00c,$a00d,$a00e,$a00f +0052D4r 1 01 A0 00 00 +0052D8r 1 02 A0 00 00 +005310r 1 F0 AF 00 00 .dword $aff0,$aff1,$aff2,$aff3,$aff4,$aff5,$aff6,$aff7,$aff8,$aff9,$affa,$affb,$affc,$affd,$affe,$afff +005314r 1 F1 AF 00 00 +005318r 1 F2 AF 00 00 +005350r 1 00 B0 00 00 .dword $b000,$b001,$b002,$b003,$b004,$b005,$b006,$b007,$b008,$b009,$b00a,$b00b,$b00c,$b00d,$b00e,$b00f +005354r 1 01 B0 00 00 +005358r 1 02 B0 00 00 +005390r 1 F0 FF 00 00 .dword $fff0,$fff1,$fff2,$fff3,$fff4,$fff5,$fff6,$fff7,$fff8,$fff9,$fffa,$fffb,$fffc,$fffd,$fffe,$ffff +005394r 1 F1 FF 00 00 +005398r 1 F2 FF 00 00 +0053D0r 1 00 00 01 00 .dword $10000,$10001,$10002,$10003,$10004,$10005,$10006,$10007,$10008,$10009,$1000a,$1000b,$1000c,$1000d,$1000e,$1000f +0053D4r 1 01 00 01 00 +0053D8r 1 02 00 01 00 +005410r 1 FF FF FF 7F .dword $7fffffff,$80000000,$80000001,$80000002,$80000003,$80000004,$80000005,$80000006,$80000007,$80000008,$80000009,$8000000a,$8000000b,$8000000c,$8000000d,$8000000e +005414r 1 00 00 00 80 +005418r 1 01 00 00 80 +005450r 1 0F 00 00 80 .dword $8000000f,$80000010,$80000011,$80000012,$80000013,$80000014,$80000015,$80000016,$80000017,$80000018,$80000019,$8000001a,$8000001b,$8000001c,$8000001d,$8000001e +005454r 1 10 00 00 80 +005458r 1 11 00 00 80 +005490r 1 FF FF FF 9F .dword $9fffffff,$a0000000,$a0000001,$a0000002,$a0000003,$a0000004,$a0000005,$a0000006,$a0000007,$a0000008,$a0000009,$a000000a,$a000000b,$a000000c,$a000000d,$a000000e +005494r 1 00 00 00 A0 +005498r 1 01 00 00 A0 +0054D0r 1 0F 00 00 A0 .dword $a000000f,$a0000010,$a0000011,$a0000012,$a0000013,$a0000014,$a0000015,$a0000016,$a0000017,$a0000018,$a0000019,$a000001a,$a000001b,$a000001c,$a000001d,$a000001e +0054D4r 1 10 00 00 A0 +0054D8r 1 11 00 00 A0 +005510r 1 FF FF FF FF .dword $ffffffff +005514r 1 +005514r 1 ; multiple values on one line, alternative hex +005514r 1 00 00 00 00 .dword 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh +005518r 1 01 00 00 00 +00551Cr 1 02 00 00 00 +005554r 1 10 00 00 00 .dword 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh +005558r 1 11 00 00 00 +00555Cr 1 12 00 00 00 +005594r 1 70 00 00 00 .dword 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh +005598r 1 71 00 00 00 +00559Cr 1 72 00 00 00 +0055D4r 1 80 00 00 00 .dword 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh +0055D8r 1 81 00 00 00 +0055DCr 1 82 00 00 00 +005614r 1 F0 00 00 00 .dword 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh +005618r 1 F1 00 00 00 +00561Cr 1 F2 00 00 00 +005654r 1 00 01 00 00 .dword 100h,101h,102h,103h,104h,105h,106h,107h,108h,109h,10ah,10bh,10ch,10dh,10eh,10fh +005658r 1 01 01 00 00 +00565Cr 1 02 01 00 00 +005694r 1 E0 0F 00 00 .dword 0fe0h,0fe1h,0fe2h,0fe3h,0fe4h,0fe5h,0fe6h,0fe7h,0fe8h,0fe9h,0feah,0febh,0fech,0fedh,0feeh,0fefh +005698r 1 E1 0F 00 00 +00569Cr 1 E2 0F 00 00 +0056D4r 1 F0 0F 00 00 .dword 0ff0h,0ff1h,0ff2h,0ff3h,0ff4h,0ff5h,0ff6h,0ff7h,0ff8h,0ff9h,0ffah,0ffbh,0ffch,0ffdh,0ffeh,0fffh +0056D8r 1 F1 0F 00 00 +0056DCr 1 F2 0F 00 00 +005714r 1 00 10 00 00 .dword 1000h,1001h,1002h,1003h,1004h,1005h,1006h,1007h,1008h,1009h,100ah,100bh,100ch,100dh,100eh,100fh +005718r 1 01 10 00 00 +00571Cr 1 02 10 00 00 +005754r 1 F0 7F 00 00 .dword 7ff0h,7ff1h,7ff2h,7ff3h,7ff4h,7ff5h,7ff6h,7ff7h,7ff8h,7ff9h,7ffah,7ffbh,7ffch,7ffdh,7ffeh,7fffh +005758r 1 F1 7F 00 00 +00575Cr 1 F2 7F 00 00 +005794r 1 00 80 00 00 .dword 8000h,8001h,8002h,8003h,8004h,8005h,8006h,8007h,8008h,8009h,800ah,800bh,800ch,800dh,800eh,800fh +005798r 1 01 80 00 00 +00579Cr 1 02 80 00 00 +0057D4r 1 F0 9F 00 00 .dword 9ff0h,9ff1h,9ff2h,9ff3h,9ff4h,9ff5h,9ff6h,9ff7h,9ff8h,9ff9h,9ffah,9ffbh,9ffch,9ffdh,9ffeh,9fffh +0057D8r 1 F1 9F 00 00 +0057DCr 1 F2 9F 00 00 +005814r 1 00 A0 00 00 .dword 0a000h,0a001h,0a002h,0a003h,0a004h,0a005h,0a006h,0a007h,0a008h,0a009h,0a00ah,0a00bh,0a00ch,0a00dh,0a00eh,0a00fh +005818r 1 01 A0 00 00 +00581Cr 1 02 A0 00 00 +005854r 1 F0 AF 00 00 .dword 0aff0h,0aff1h,0aff2h,0aff3h,0aff4h,0aff5h,0aff6h,0aff7h,0aff8h,0aff9h,0affah,0affbh,0affch,0affdh,0affeh,0afffh +005858r 1 F1 AF 00 00 +00585Cr 1 F2 AF 00 00 +005894r 1 00 B0 00 00 .dword 0b000h,0b001h,0b002h,0b003h,0b004h,0b005h,0b006h,0b007h,0b008h,0b009h,0b00ah,0b00bh,0b00ch,0b00dh,0b00eh,0b00fh +005898r 1 01 B0 00 00 +00589Cr 1 02 B0 00 00 +0058D4r 1 F0 FF 00 00 .dword 0fff0h,0fff1h,0fff2h,0fff3h,0fff4h,0fff5h,0fff6h,0fff7h,0fff8h,0fff9h,0fffah,0fffbh,0fffch,0fffdh,0fffeh,0ffffh +0058D8r 1 F1 FF 00 00 +0058DCr 1 F2 FF 00 00 +005914r 1 00 00 01 00 .dword 10000h,10001h,10002h,10003h,10004h,10005h,10006h,10007h,10008h,10009h,1000ah,1000bh,1000ch,1000dh,1000eh,1000fh +005918r 1 01 00 01 00 +00591Cr 1 02 00 01 00 +005954r 1 FF FF FF 7F .dword 7fffffffh,80000000h,80000001h,80000002h,80000003h,80000004h,80000005h,80000006h,80000007h,80000008h,80000009h,8000000ah,8000000bh,8000000ch,8000000dh,8000000eh +005958r 1 00 00 00 80 +00595Cr 1 01 00 00 80 +005994r 1 0F 00 00 80 .dword 8000000fh,80000010h,80000011h,80000012h,80000013h,80000014h,80000015h,80000016h,80000017h,80000018h,80000019h,8000001ah,8000001bh,8000001ch,8000001dh,8000001eh +005998r 1 10 00 00 80 +00599Cr 1 11 00 00 80 +0059D4r 1 FF FF FF 9F .dword 9fffffffh,0a0000000h,0a0000001h,0a0000002h,0a0000003h,0a0000004h,0a0000005h,0a0000006h,0a0000007h,0a0000008h,0a0000009h,0a000000ah,0a000000bh,0a000000ch,0a000000dh,0a000000eh +0059D8r 1 00 00 00 A0 +0059DCr 1 01 00 00 A0 +005A14r 1 0F 00 00 A0 .dword 0a000000fh,0a0000010h,0a0000011h,0a0000012h,0a0000013h,0a0000014h,0a0000015h,0a0000016h,0a0000017h,0a0000018h,0a0000019h,0a000001ah,0a000001bh,0a000001ch,0a000001dh,0a000001eh +005A18r 1 10 00 00 A0 +005A1Cr 1 11 00 00 A0 +005A54r 1 FF FF FF FF .dword 0ffffffffh +005A58r 1 +005A58r 1 ; mix some variants +005A58r 1 0B 00 00 00 .dword 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh +005A5Cr 1 11 00 00 00 +005A60r 1 03 00 00 00 +005A94r 1 diff --git a/test/asm/listing/ref/105-faraddr.bin-ref b/test/asm/listing/ref/105-faraddr.bin-ref new file mode 100644 index 000000000..85a68c186 Binary files /dev/null and b/test/asm/listing/ref/105-faraddr.bin-ref differ diff --git a/test/asm/listing/ref/105-faraddr.list-ref b/test/asm/listing/ref/105-faraddr.list-ref new file mode 100644 index 000000000..86f534b76 --- /dev/null +++ b/test/asm/listing/ref/105-faraddr.list-ref @@ -0,0 +1,6922 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 105-faraddr.s +Current file: 105-faraddr.s + +000000r 1 ; 2022-06-15 Spiro Trikaliotis +000000r 1 +000000r 1 +000000r 1 ; upper case pseudo-op +000000r 1 00 00 00 .FARADDR 0 +000003r 1 01 00 00 .FARADDR 1 +000006r 1 02 00 00 .FARADDR 2 +000009r 1 03 00 00 .FARADDR 3 +00000Cr 1 04 00 00 .FARADDR 4 +00000Fr 1 05 00 00 .FARADDR 5 +000012r 1 06 00 00 .FARADDR 6 +000015r 1 07 00 00 .FARADDR 7 +000018r 1 08 00 00 .FARADDR 8 +00001Br 1 09 00 00 .FARADDR 9 +00001Er 1 0A 00 00 .FARADDR 10 +000021r 1 0B 00 00 .FARADDR 11 +000024r 1 0C 00 00 .FARADDR 12 +000027r 1 0D 00 00 .FARADDR 13 +00002Ar 1 0E 00 00 .FARADDR 14 +00002Dr 1 0F 00 00 .FARADDR 15 +000030r 1 10 00 00 .FARADDR 16 +000033r 1 11 00 00 .FARADDR 17 +000036r 1 12 00 00 .FARADDR 18 +000039r 1 13 00 00 .FARADDR 19 +00003Cr 1 70 00 00 .FARADDR 112 +00003Fr 1 71 00 00 .FARADDR 113 +000042r 1 72 00 00 .FARADDR 114 +000045r 1 73 00 00 .FARADDR 115 +000048r 1 74 00 00 .FARADDR 116 +00004Br 1 75 00 00 .FARADDR 117 +00004Er 1 76 00 00 .FARADDR 118 +000051r 1 77 00 00 .FARADDR 119 +000054r 1 78 00 00 .FARADDR 120 +000057r 1 79 00 00 .FARADDR 121 +00005Ar 1 7A 00 00 .FARADDR 122 +00005Dr 1 7B 00 00 .FARADDR 123 +000060r 1 7C 00 00 .FARADDR 124 +000063r 1 7D 00 00 .FARADDR 125 +000066r 1 7E 00 00 .FARADDR 126 +000069r 1 7F 00 00 .FARADDR 127 +00006Cr 1 80 00 00 .FARADDR 128 +00006Fr 1 81 00 00 .FARADDR 129 +000072r 1 82 00 00 .FARADDR 130 +000075r 1 83 00 00 .FARADDR 131 +000078r 1 84 00 00 .FARADDR 132 +00007Br 1 85 00 00 .FARADDR 133 +00007Er 1 86 00 00 .FARADDR 134 +000081r 1 F0 00 00 .FARADDR 240 +000084r 1 F1 00 00 .FARADDR 241 +000087r 1 F2 00 00 .FARADDR 242 +00008Ar 1 F3 00 00 .FARADDR 243 +00008Dr 1 F4 00 00 .FARADDR 244 +000090r 1 F5 00 00 .FARADDR 245 +000093r 1 F6 00 00 .FARADDR 246 +000096r 1 F7 00 00 .FARADDR 247 +000099r 1 F8 00 00 .FARADDR 248 +00009Cr 1 F9 00 00 .FARADDR 249 +00009Fr 1 FA 00 00 .FARADDR 250 +0000A2r 1 FB 00 00 .FARADDR 251 +0000A5r 1 FC 00 00 .FARADDR 252 +0000A8r 1 FD 00 00 .FARADDR 253 +0000ABr 1 FE 00 00 .FARADDR 254 +0000AEr 1 FF 00 00 .FARADDR 255 +0000B1r 1 00 01 00 .FARADDR 256 +0000B4r 1 01 01 00 .FARADDR 257 +0000B7r 1 02 01 00 .FARADDR 258 +0000BAr 1 03 01 00 .FARADDR 259 +0000BDr 1 D2 0F 00 .FARADDR 4050 +0000C0r 1 D3 0F 00 .FARADDR 4051 +0000C3r 1 D4 0F 00 .FARADDR 4052 +0000C6r 1 D5 0F 00 .FARADDR 4053 +0000C9r 1 D6 0F 00 .FARADDR 4054 +0000CCr 1 D7 0F 00 .FARADDR 4055 +0000CFr 1 D8 0F 00 .FARADDR 4056 +0000D2r 1 D9 0F 00 .FARADDR 4057 +0000D5r 1 DA 0F 00 .FARADDR 4058 +0000D8r 1 DB 0F 00 .FARADDR 4059 +0000DBr 1 DC 0F 00 .FARADDR 4060 +0000DEr 1 DD 0F 00 .FARADDR 4061 +0000E1r 1 DE 0F 00 .FARADDR 4062 +0000E4r 1 DF 0F 00 .FARADDR 4063 +0000E7r 1 E0 0F 00 .FARADDR 4064 +0000EAr 1 E1 0F 00 .FARADDR 4065 +0000EDr 1 E2 0F 00 .FARADDR 4066 +0000F0r 1 E3 0F 00 .FARADDR 4067 +0000F3r 1 E4 0F 00 .FARADDR 4068 +0000F6r 1 E5 0F 00 .FARADDR 4069 +0000F9r 1 E6 0F 00 .FARADDR 4070 +0000FCr 1 E7 0F 00 .FARADDR 4071 +0000FFr 1 E8 0F 00 .FARADDR 4072 +000102r 1 E9 0F 00 .FARADDR 4073 +000105r 1 EA 0F 00 .FARADDR 4074 +000108r 1 EB 0F 00 .FARADDR 4075 +00010Br 1 EC 0F 00 .FARADDR 4076 +00010Er 1 ED 0F 00 .FARADDR 4077 +000111r 1 EE 0F 00 .FARADDR 4078 +000114r 1 EF 0F 00 .FARADDR 4079 +000117r 1 F0 0F 00 .FARADDR 4080 +00011Ar 1 F1 0F 00 .FARADDR 4081 +00011Dr 1 F2 0F 00 .FARADDR 4082 +000120r 1 F3 0F 00 .FARADDR 4083 +000123r 1 F4 0F 00 .FARADDR 4084 +000126r 1 F5 0F 00 .FARADDR 4085 +000129r 1 F6 0F 00 .FARADDR 4086 +00012Cr 1 F7 0F 00 .FARADDR 4087 +00012Fr 1 F8 0F 00 .FARADDR 4088 +000132r 1 F9 0F 00 .FARADDR 4089 +000135r 1 FA 0F 00 .FARADDR 4090 +000138r 1 FB 0F 00 .FARADDR 4091 +00013Br 1 FC 0F 00 .FARADDR 4092 +00013Er 1 FD 0F 00 .FARADDR 4093 +000141r 1 FE 0F 00 .FARADDR 4094 +000144r 1 FF 0F 00 .FARADDR 4095 +000147r 1 00 10 00 .FARADDR 4096 +00014Ar 1 01 10 00 .FARADDR 4097 +00014Dr 1 02 10 00 .FARADDR 4098 +000150r 1 03 10 00 .FARADDR 4099 +000153r 1 04 10 00 .FARADDR 4100 +000156r 1 05 10 00 .FARADDR 4101 +000159r 1 06 10 00 .FARADDR 4102 +00015Cr 1 07 10 00 .FARADDR 4103 +00015Fr 1 08 10 00 .FARADDR 4104 +000162r 1 F0 7F 00 .FARADDR 32752 +000165r 1 F1 7F 00 .FARADDR 32753 +000168r 1 F2 7F 00 .FARADDR 32754 +00016Br 1 F3 7F 00 .FARADDR 32755 +00016Er 1 F4 7F 00 .FARADDR 32756 +000171r 1 F5 7F 00 .FARADDR 32757 +000174r 1 F6 7F 00 .FARADDR 32758 +000177r 1 F7 7F 00 .FARADDR 32759 +00017Ar 1 F8 7F 00 .FARADDR 32760 +00017Dr 1 F9 7F 00 .FARADDR 32761 +000180r 1 FA 7F 00 .FARADDR 32762 +000183r 1 FB 7F 00 .FARADDR 32763 +000186r 1 FC 7F 00 .FARADDR 32764 +000189r 1 FD 7F 00 .FARADDR 32765 +00018Cr 1 FE 7F 00 .FARADDR 32766 +00018Fr 1 FF 7F 00 .FARADDR 32767 +000192r 1 00 80 00 .FARADDR 32768 +000195r 1 01 80 00 .FARADDR 32769 +000198r 1 02 80 00 .FARADDR 32770 +00019Br 1 03 80 00 .FARADDR 32771 +00019Er 1 04 80 00 .FARADDR 32772 +0001A1r 1 05 80 00 .FARADDR 32773 +0001A4r 1 06 80 00 .FARADDR 32774 +0001A7r 1 07 80 00 .FARADDR 32775 +0001AAr 1 08 80 00 .FARADDR 32776 +0001ADr 1 09 80 00 .FARADDR 32777 +0001B0r 1 0A 80 00 .FARADDR 32778 +0001B3r 1 0B 80 00 .FARADDR 32779 +0001B6r 1 E1 9F 00 .FARADDR 40929 +0001B9r 1 E2 9F 00 .FARADDR 40930 +0001BCr 1 E3 9F 00 .FARADDR 40931 +0001BFr 1 E4 9F 00 .FARADDR 40932 +0001C2r 1 E5 9F 00 .FARADDR 40933 +0001C5r 1 E6 9F 00 .FARADDR 40934 +0001C8r 1 E7 9F 00 .FARADDR 40935 +0001CBr 1 E8 9F 00 .FARADDR 40936 +0001CEr 1 E9 9F 00 .FARADDR 40937 +0001D1r 1 EA 9F 00 .FARADDR 40938 +0001D4r 1 EB 9F 00 .FARADDR 40939 +0001D7r 1 EC 9F 00 .FARADDR 40940 +0001DAr 1 ED 9F 00 .FARADDR 40941 +0001DDr 1 EE 9F 00 .FARADDR 40942 +0001E0r 1 EF 9F 00 .FARADDR 40943 +0001E3r 1 F0 9F 00 .FARADDR 40944 +0001E6r 1 F1 9F 00 .FARADDR 40945 +0001E9r 1 F2 9F 00 .FARADDR 40946 +0001ECr 1 F3 9F 00 .FARADDR 40947 +0001EFr 1 F4 9F 00 .FARADDR 40948 +0001F2r 1 F5 9F 00 .FARADDR 40949 +0001F5r 1 F6 9F 00 .FARADDR 40950 +0001F8r 1 F7 9F 00 .FARADDR 40951 +0001FBr 1 F8 9F 00 .FARADDR 40952 +0001FEr 1 F9 9F 00 .FARADDR 40953 +000201r 1 FA 9F 00 .FARADDR 40954 +000204r 1 FB 9F 00 .FARADDR 40955 +000207r 1 FC 9F 00 .FARADDR 40956 +00020Ar 1 FD 9F 00 .FARADDR 40957 +00020Dr 1 FE 9F 00 .FARADDR 40958 +000210r 1 FF 9F 00 .FARADDR 40959 +000213r 1 00 A0 00 .FARADDR 40960 +000216r 1 01 A0 00 .FARADDR 40961 +000219r 1 02 A0 00 .FARADDR 40962 +00021Cr 1 03 A0 00 .FARADDR 40963 +00021Fr 1 04 A0 00 .FARADDR 40964 +000222r 1 05 A0 00 .FARADDR 40965 +000225r 1 06 A0 00 .FARADDR 40966 +000228r 1 07 A0 00 .FARADDR 40967 +00022Br 1 08 A0 00 .FARADDR 40968 +00022Er 1 09 A0 00 .FARADDR 40969 +000231r 1 0A A0 00 .FARADDR 40970 +000234r 1 0B A0 00 .FARADDR 40971 +000237r 1 0C A0 00 .FARADDR 40972 +00023Ar 1 0D A0 00 .FARADDR 40973 +00023Dr 1 0E A0 00 .FARADDR 40974 +000240r 1 0F A0 00 .FARADDR 40975 +000243r 1 E1 AF 00 .FARADDR 45025 +000246r 1 E2 AF 00 .FARADDR 45026 +000249r 1 E3 AF 00 .FARADDR 45027 +00024Cr 1 E4 AF 00 .FARADDR 45028 +00024Fr 1 E5 AF 00 .FARADDR 45029 +000252r 1 E6 AF 00 .FARADDR 45030 +000255r 1 E7 AF 00 .FARADDR 45031 +000258r 1 E8 AF 00 .FARADDR 45032 +00025Br 1 E9 AF 00 .FARADDR 45033 +00025Er 1 EA AF 00 .FARADDR 45034 +000261r 1 EB AF 00 .FARADDR 45035 +000264r 1 EC AF 00 .FARADDR 45036 +000267r 1 ED AF 00 .FARADDR 45037 +00026Ar 1 EE AF 00 .FARADDR 45038 +00026Dr 1 EF AF 00 .FARADDR 45039 +000270r 1 F0 AF 00 .FARADDR 45040 +000273r 1 F1 AF 00 .FARADDR 45041 +000276r 1 F2 AF 00 .FARADDR 45042 +000279r 1 F3 AF 00 .FARADDR 45043 +00027Cr 1 F4 AF 00 .FARADDR 45044 +00027Fr 1 F5 AF 00 .FARADDR 45045 +000282r 1 F6 AF 00 .FARADDR 45046 +000285r 1 F7 AF 00 .FARADDR 45047 +000288r 1 F8 AF 00 .FARADDR 45048 +00028Br 1 F9 AF 00 .FARADDR 45049 +00028Er 1 FA AF 00 .FARADDR 45050 +000291r 1 FB AF 00 .FARADDR 45051 +000294r 1 FC AF 00 .FARADDR 45052 +000297r 1 FD AF 00 .FARADDR 45053 +00029Ar 1 FE AF 00 .FARADDR 45054 +00029Dr 1 FF AF 00 .FARADDR 45055 +0002A0r 1 00 B0 00 .FARADDR 45056 +0002A3r 1 01 B0 00 .FARADDR 45057 +0002A6r 1 02 B0 00 .FARADDR 45058 +0002A9r 1 03 B0 00 .FARADDR 45059 +0002ACr 1 04 B0 00 .FARADDR 45060 +0002AFr 1 05 B0 00 .FARADDR 45061 +0002B2r 1 06 B0 00 .FARADDR 45062 +0002B5r 1 07 B0 00 .FARADDR 45063 +0002B8r 1 08 B0 00 .FARADDR 45064 +0002BBr 1 09 B0 00 .FARADDR 45065 +0002BEr 1 0A B0 00 .FARADDR 45066 +0002C1r 1 0B B0 00 .FARADDR 45067 +0002C4r 1 0C B0 00 .FARADDR 45068 +0002C7r 1 0D B0 00 .FARADDR 45069 +0002CAr 1 0E B0 00 .FARADDR 45070 +0002CDr 1 0F B0 00 .FARADDR 45071 +0002D0r 1 E1 FF 00 .FARADDR 65505 +0002D3r 1 E2 FF 00 .FARADDR 65506 +0002D6r 1 E3 FF 00 .FARADDR 65507 +0002D9r 1 E4 FF 00 .FARADDR 65508 +0002DCr 1 E5 FF 00 .FARADDR 65509 +0002DFr 1 E6 FF 00 .FARADDR 65510 +0002E2r 1 E7 FF 00 .FARADDR 65511 +0002E5r 1 E8 FF 00 .FARADDR 65512 +0002E8r 1 E9 FF 00 .FARADDR 65513 +0002EBr 1 EA FF 00 .FARADDR 65514 +0002EEr 1 EB FF 00 .FARADDR 65515 +0002F1r 1 EC FF 00 .FARADDR 65516 +0002F4r 1 ED FF 00 .FARADDR 65517 +0002F7r 1 EE FF 00 .FARADDR 65518 +0002FAr 1 EF FF 00 .FARADDR 65519 +0002FDr 1 F0 FF 00 .FARADDR 65520 +000300r 1 F1 FF 00 .FARADDR 65521 +000303r 1 F2 FF 00 .FARADDR 65522 +000306r 1 F3 FF 00 .FARADDR 65523 +000309r 1 F4 FF 00 .FARADDR 65524 +00030Cr 1 F5 FF 00 .FARADDR 65525 +00030Fr 1 F6 FF 00 .FARADDR 65526 +000312r 1 F7 FF 00 .FARADDR 65527 +000315r 1 F8 FF 00 .FARADDR 65528 +000318r 1 F9 FF 00 .FARADDR 65529 +00031Br 1 FA FF 00 .FARADDR 65530 +00031Er 1 FB FF 00 .FARADDR 65531 +000321r 1 FC FF 00 .FARADDR 65532 +000324r 1 FD FF 00 .FARADDR 65533 +000327r 1 FE FF 00 .FARADDR 65534 +00032Ar 1 FF FF 00 .FARADDR 65535 +00032Dr 1 00 00 01 .FARADDR 65536 +000330r 1 01 00 01 .FARADDR 65537 +000333r 1 02 00 01 .FARADDR 65538 +000336r 1 03 00 01 .FARADDR 65539 +000339r 1 04 00 01 .FARADDR 65540 +00033Cr 1 05 00 01 .FARADDR 65541 +00033Fr 1 06 00 01 .FARADDR 65542 +000342r 1 07 00 01 .FARADDR 65543 +000345r 1 08 00 01 .FARADDR 65544 +000348r 1 09 00 01 .FARADDR 65545 +00034Br 1 0A 00 01 .FARADDR 65546 +00034Er 1 0B 00 01 .FARADDR 65547 +000351r 1 0C 00 01 .FARADDR 65548 +000354r 1 0D 00 01 .FARADDR 65549 +000357r 1 0E 00 01 .FARADDR 65550 +00035Ar 1 0F 00 01 .FARADDR 65551 +00035Dr 1 E1 FF 10 .FARADDR 1114081 +000360r 1 E2 FF 10 .FARADDR 1114082 +000363r 1 E3 FF 10 .FARADDR 1114083 +000366r 1 E4 FF 10 .FARADDR 1114084 +000369r 1 E5 FF 10 .FARADDR 1114085 +00036Cr 1 E6 FF 10 .FARADDR 1114086 +00036Fr 1 E7 FF 10 .FARADDR 1114087 +000372r 1 E8 FF 10 .FARADDR 1114088 +000375r 1 E9 FF 10 .FARADDR 1114089 +000378r 1 EA FF 10 .FARADDR 1114090 +00037Br 1 EB FF 10 .FARADDR 1114091 +00037Er 1 EC FF 10 .FARADDR 1114092 +000381r 1 ED FF 10 .FARADDR 1114093 +000384r 1 EE FF 10 .FARADDR 1114094 +000387r 1 EF FF 10 .FARADDR 1114095 +00038Ar 1 F0 FF 10 .FARADDR 1114096 +00038Dr 1 F1 FF 10 .FARADDR 1114097 +000390r 1 F2 FF 10 .FARADDR 1114098 +000393r 1 F3 FF 10 .FARADDR 1114099 +000396r 1 F4 FF 10 .FARADDR 1114100 +000399r 1 F5 FF 10 .FARADDR 1114101 +00039Cr 1 F6 FF 10 .FARADDR 1114102 +00039Fr 1 F7 FF 10 .FARADDR 1114103 +0003A2r 1 F8 FF 10 .FARADDR 1114104 +0003A5r 1 F9 FF 10 .FARADDR 1114105 +0003A8r 1 FA FF 10 .FARADDR 1114106 +0003ABr 1 FB FF 10 .FARADDR 1114107 +0003AEr 1 FC FF 10 .FARADDR 1114108 +0003B1r 1 FD FF 10 .FARADDR 1114109 +0003B4r 1 FE FF 10 .FARADDR 1114110 +0003B7r 1 FF FF 10 .FARADDR 1114111 +0003BAr 1 00 00 11 .FARADDR 1114112 +0003BDr 1 01 00 11 .FARADDR 1114113 +0003C0r 1 02 00 11 .FARADDR 1114114 +0003C3r 1 03 00 11 .FARADDR 1114115 +0003C6r 1 04 00 11 .FARADDR 1114116 +0003C9r 1 05 00 11 .FARADDR 1114117 +0003CCr 1 06 00 11 .FARADDR 1114118 +0003CFr 1 07 00 11 .FARADDR 1114119 +0003D2r 1 08 00 11 .FARADDR 1114120 +0003D5r 1 09 00 11 .FARADDR 1114121 +0003D8r 1 0A 00 11 .FARADDR 1114122 +0003DBr 1 0B 00 11 .FARADDR 1114123 +0003DEr 1 0C 00 11 .FARADDR 1114124 +0003E1r 1 0D 00 11 .FARADDR 1114125 +0003E4r 1 0E 00 11 .FARADDR 1114126 +0003E7r 1 0F 00 11 .FARADDR 1114127 +0003EAr 1 E1 FF 20 .FARADDR 2162657 +0003EDr 1 E2 FF 20 .FARADDR 2162658 +0003F0r 1 E3 FF 20 .FARADDR 2162659 +0003F3r 1 E4 FF 20 .FARADDR 2162660 +0003F6r 1 E5 FF 20 .FARADDR 2162661 +0003F9r 1 E6 FF 20 .FARADDR 2162662 +0003FCr 1 E7 FF 20 .FARADDR 2162663 +0003FFr 1 E8 FF 20 .FARADDR 2162664 +000402r 1 E9 FF 20 .FARADDR 2162665 +000405r 1 EA FF 20 .FARADDR 2162666 +000408r 1 EB FF 20 .FARADDR 2162667 +00040Br 1 EC FF 20 .FARADDR 2162668 +00040Er 1 ED FF 20 .FARADDR 2162669 +000411r 1 EE FF 20 .FARADDR 2162670 +000414r 1 EF FF 20 .FARADDR 2162671 +000417r 1 F0 FF 20 .FARADDR 2162672 +00041Ar 1 F1 FF 20 .FARADDR 2162673 +00041Dr 1 F2 FF 20 .FARADDR 2162674 +000420r 1 F3 FF 20 .FARADDR 2162675 +000423r 1 F4 FF 20 .FARADDR 2162676 +000426r 1 F5 FF 20 .FARADDR 2162677 +000429r 1 F6 FF 20 .FARADDR 2162678 +00042Cr 1 F7 FF 20 .FARADDR 2162679 +00042Fr 1 F8 FF 20 .FARADDR 2162680 +000432r 1 F9 FF 20 .FARADDR 2162681 +000435r 1 FA FF 20 .FARADDR 2162682 +000438r 1 FB FF 20 .FARADDR 2162683 +00043Br 1 FC FF 20 .FARADDR 2162684 +00043Er 1 FD FF 20 .FARADDR 2162685 +000441r 1 FE FF 20 .FARADDR 2162686 +000444r 1 FF FF 20 .FARADDR 2162687 +000447r 1 00 00 21 .FARADDR 2162688 +00044Ar 1 01 00 21 .FARADDR 2162689 +00044Dr 1 02 00 21 .FARADDR 2162690 +000450r 1 03 00 21 .FARADDR 2162691 +000453r 1 04 00 21 .FARADDR 2162692 +000456r 1 05 00 21 .FARADDR 2162693 +000459r 1 06 00 21 .FARADDR 2162694 +00045Cr 1 07 00 21 .FARADDR 2162695 +00045Fr 1 08 00 21 .FARADDR 2162696 +000462r 1 09 00 21 .FARADDR 2162697 +000465r 1 0A 00 21 .FARADDR 2162698 +000468r 1 0B 00 21 .FARADDR 2162699 +00046Br 1 0C 00 21 .FARADDR 2162700 +00046Er 1 0D 00 21 .FARADDR 2162701 +000471r 1 0E 00 21 .FARADDR 2162702 +000474r 1 0F 00 21 .FARADDR 2162703 +000477r 1 E1 FF 7F .FARADDR 8388577 +00047Ar 1 E2 FF 7F .FARADDR 8388578 +00047Dr 1 E3 FF 7F .FARADDR 8388579 +000480r 1 E4 FF 7F .FARADDR 8388580 +000483r 1 E5 FF 7F .FARADDR 8388581 +000486r 1 E6 FF 7F .FARADDR 8388582 +000489r 1 E7 FF 7F .FARADDR 8388583 +00048Cr 1 E8 FF 7F .FARADDR 8388584 +00048Fr 1 E9 FF 7F .FARADDR 8388585 +000492r 1 EA FF 7F .FARADDR 8388586 +000495r 1 EB FF 7F .FARADDR 8388587 +000498r 1 EC FF 7F .FARADDR 8388588 +00049Br 1 ED FF 7F .FARADDR 8388589 +00049Er 1 EE FF 7F .FARADDR 8388590 +0004A1r 1 EF FF 7F .FARADDR 8388591 +0004A4r 1 F0 FF 7F .FARADDR 8388592 +0004A7r 1 F1 FF 7F .FARADDR 8388593 +0004AAr 1 F2 FF 7F .FARADDR 8388594 +0004ADr 1 F3 FF 7F .FARADDR 8388595 +0004B0r 1 F4 FF 7F .FARADDR 8388596 +0004B3r 1 F5 FF 7F .FARADDR 8388597 +0004B6r 1 F6 FF 7F .FARADDR 8388598 +0004B9r 1 F7 FF 7F .FARADDR 8388599 +0004BCr 1 F8 FF 7F .FARADDR 8388600 +0004BFr 1 F9 FF 7F .FARADDR 8388601 +0004C2r 1 FA FF 7F .FARADDR 8388602 +0004C5r 1 FB FF 7F .FARADDR 8388603 +0004C8r 1 FC FF 7F .FARADDR 8388604 +0004CBr 1 FD FF 7F .FARADDR 8388605 +0004CEr 1 FE FF 7F .FARADDR 8388606 +0004D1r 1 FF FF 7F .FARADDR 8388607 +0004D4r 1 00 00 80 .FARADDR 8388608 +0004D7r 1 01 00 80 .FARADDR 8388609 +0004DAr 1 02 00 80 .FARADDR 8388610 +0004DDr 1 03 00 80 .FARADDR 8388611 +0004E0r 1 04 00 80 .FARADDR 8388612 +0004E3r 1 05 00 80 .FARADDR 8388613 +0004E6r 1 06 00 80 .FARADDR 8388614 +0004E9r 1 07 00 80 .FARADDR 8388615 +0004ECr 1 08 00 80 .FARADDR 8388616 +0004EFr 1 09 00 80 .FARADDR 8388617 +0004F2r 1 0A 00 80 .FARADDR 8388618 +0004F5r 1 0B 00 80 .FARADDR 8388619 +0004F8r 1 0C 00 80 .FARADDR 8388620 +0004FBr 1 0D 00 80 .FARADDR 8388621 +0004FEr 1 0E 00 80 .FARADDR 8388622 +000501r 1 0F 00 80 .FARADDR 8388623 +000504r 1 E1 FF 9F .FARADDR 10485729 +000507r 1 E2 FF 9F .FARADDR 10485730 +00050Ar 1 E3 FF 9F .FARADDR 10485731 +00050Dr 1 E4 FF 9F .FARADDR 10485732 +000510r 1 E5 FF 9F .FARADDR 10485733 +000513r 1 E6 FF 9F .FARADDR 10485734 +000516r 1 E7 FF 9F .FARADDR 10485735 +000519r 1 E8 FF 9F .FARADDR 10485736 +00051Cr 1 E9 FF 9F .FARADDR 10485737 +00051Fr 1 EA FF 9F .FARADDR 10485738 +000522r 1 EB FF 9F .FARADDR 10485739 +000525r 1 EC FF 9F .FARADDR 10485740 +000528r 1 ED FF 9F .FARADDR 10485741 +00052Br 1 EE FF 9F .FARADDR 10485742 +00052Er 1 EF FF 9F .FARADDR 10485743 +000531r 1 F0 FF 9F .FARADDR 10485744 +000534r 1 F1 FF 9F .FARADDR 10485745 +000537r 1 F2 FF 9F .FARADDR 10485746 +00053Ar 1 F3 FF 9F .FARADDR 10485747 +00053Dr 1 F4 FF 9F .FARADDR 10485748 +000540r 1 F5 FF 9F .FARADDR 10485749 +000543r 1 F6 FF 9F .FARADDR 10485750 +000546r 1 F7 FF 9F .FARADDR 10485751 +000549r 1 F8 FF 9F .FARADDR 10485752 +00054Cr 1 F9 FF 9F .FARADDR 10485753 +00054Fr 1 FA FF 9F .FARADDR 10485754 +000552r 1 FB FF 9F .FARADDR 10485755 +000555r 1 FC FF 9F .FARADDR 10485756 +000558r 1 FD FF 9F .FARADDR 10485757 +00055Br 1 FE FF 9F .FARADDR 10485758 +00055Er 1 FF FF 9F .FARADDR 10485759 +000561r 1 00 00 A0 .FARADDR 10485760 +000564r 1 01 00 A0 .FARADDR 10485761 +000567r 1 02 00 A0 .FARADDR 10485762 +00056Ar 1 03 00 A0 .FARADDR 10485763 +00056Dr 1 04 00 A0 .FARADDR 10485764 +000570r 1 05 00 A0 .FARADDR 10485765 +000573r 1 06 00 A0 .FARADDR 10485766 +000576r 1 07 00 A0 .FARADDR 10485767 +000579r 1 08 00 A0 .FARADDR 10485768 +00057Cr 1 09 00 A0 .FARADDR 10485769 +00057Fr 1 0A 00 A0 .FARADDR 10485770 +000582r 1 0B 00 A0 .FARADDR 10485771 +000585r 1 0C 00 A0 .FARADDR 10485772 +000588r 1 0D 00 A0 .FARADDR 10485773 +00058Br 1 0E 00 A0 .FARADDR 10485774 +00058Er 1 0F 00 A0 .FARADDR 10485775 +000591r 1 E1 FF FF .FARADDR 16777185 +000594r 1 E2 FF FF .FARADDR 16777186 +000597r 1 E3 FF FF .FARADDR 16777187 +00059Ar 1 E4 FF FF .FARADDR 16777188 +00059Dr 1 E5 FF FF .FARADDR 16777189 +0005A0r 1 E6 FF FF .FARADDR 16777190 +0005A3r 1 E7 FF FF .FARADDR 16777191 +0005A6r 1 E8 FF FF .FARADDR 16777192 +0005A9r 1 E9 FF FF .FARADDR 16777193 +0005ACr 1 EA FF FF .FARADDR 16777194 +0005AFr 1 EB FF FF .FARADDR 16777195 +0005B2r 1 EC FF FF .FARADDR 16777196 +0005B5r 1 ED FF FF .FARADDR 16777197 +0005B8r 1 EE FF FF .FARADDR 16777198 +0005BBr 1 EF FF FF .FARADDR 16777199 +0005BEr 1 F0 FF FF .FARADDR 16777200 +0005C1r 1 F1 FF FF .FARADDR 16777201 +0005C4r 1 F2 FF FF .FARADDR 16777202 +0005C7r 1 F3 FF FF .FARADDR 16777203 +0005CAr 1 F4 FF FF .FARADDR 16777204 +0005CDr 1 F5 FF FF .FARADDR 16777205 +0005D0r 1 F6 FF FF .FARADDR 16777206 +0005D3r 1 F7 FF FF .FARADDR 16777207 +0005D6r 1 F8 FF FF .FARADDR 16777208 +0005D9r 1 F9 FF FF .FARADDR 16777209 +0005DCr 1 FA FF FF .FARADDR 16777210 +0005DFr 1 FB FF FF .FARADDR 16777211 +0005E2r 1 FC FF FF .FARADDR 16777212 +0005E5r 1 FD FF FF .FARADDR 16777213 +0005E8r 1 FE FF FF .FARADDR 16777214 +0005EBr 1 FF FF FF .FARADDR 16777215 +0005EEr 1 +0005EEr 1 ; lower case pseudo-op +0005EEr 1 00 00 00 .faraddr 0 +0005F1r 1 01 00 00 .faraddr 1 +0005F4r 1 02 00 00 .faraddr 2 +0005F7r 1 03 00 00 .faraddr 3 +0005FAr 1 04 00 00 .faraddr 4 +0005FDr 1 05 00 00 .faraddr 5 +000600r 1 06 00 00 .faraddr 6 +000603r 1 07 00 00 .faraddr 7 +000606r 1 08 00 00 .faraddr 8 +000609r 1 09 00 00 .faraddr 9 +00060Cr 1 0A 00 00 .faraddr 10 +00060Fr 1 0B 00 00 .faraddr 11 +000612r 1 0C 00 00 .faraddr 12 +000615r 1 0D 00 00 .faraddr 13 +000618r 1 0E 00 00 .faraddr 14 +00061Br 1 0F 00 00 .faraddr 15 +00061Er 1 10 00 00 .faraddr 16 +000621r 1 11 00 00 .faraddr 17 +000624r 1 12 00 00 .faraddr 18 +000627r 1 13 00 00 .faraddr 19 +00062Ar 1 70 00 00 .faraddr 112 +00062Dr 1 71 00 00 .faraddr 113 +000630r 1 72 00 00 .faraddr 114 +000633r 1 73 00 00 .faraddr 115 +000636r 1 74 00 00 .faraddr 116 +000639r 1 75 00 00 .faraddr 117 +00063Cr 1 76 00 00 .faraddr 118 +00063Fr 1 77 00 00 .faraddr 119 +000642r 1 78 00 00 .faraddr 120 +000645r 1 79 00 00 .faraddr 121 +000648r 1 7A 00 00 .faraddr 122 +00064Br 1 7B 00 00 .faraddr 123 +00064Er 1 7C 00 00 .faraddr 124 +000651r 1 7D 00 00 .faraddr 125 +000654r 1 7E 00 00 .faraddr 126 +000657r 1 7F 00 00 .faraddr 127 +00065Ar 1 80 00 00 .faraddr 128 +00065Dr 1 81 00 00 .faraddr 129 +000660r 1 82 00 00 .faraddr 130 +000663r 1 83 00 00 .faraddr 131 +000666r 1 84 00 00 .faraddr 132 +000669r 1 85 00 00 .faraddr 133 +00066Cr 1 86 00 00 .faraddr 134 +00066Fr 1 F0 00 00 .faraddr 240 +000672r 1 F1 00 00 .faraddr 241 +000675r 1 F2 00 00 .faraddr 242 +000678r 1 F3 00 00 .faraddr 243 +00067Br 1 F4 00 00 .faraddr 244 +00067Er 1 F5 00 00 .faraddr 245 +000681r 1 F6 00 00 .faraddr 246 +000684r 1 F7 00 00 .faraddr 247 +000687r 1 F8 00 00 .faraddr 248 +00068Ar 1 F9 00 00 .faraddr 249 +00068Dr 1 FA 00 00 .faraddr 250 +000690r 1 FB 00 00 .faraddr 251 +000693r 1 FC 00 00 .faraddr 252 +000696r 1 FD 00 00 .faraddr 253 +000699r 1 FE 00 00 .faraddr 254 +00069Cr 1 FF 00 00 .faraddr 255 +00069Fr 1 00 01 00 .faraddr 256 +0006A2r 1 01 01 00 .faraddr 257 +0006A5r 1 02 01 00 .faraddr 258 +0006A8r 1 03 01 00 .faraddr 259 +0006ABr 1 D2 0F 00 .faraddr 4050 +0006AEr 1 D3 0F 00 .faraddr 4051 +0006B1r 1 D4 0F 00 .faraddr 4052 +0006B4r 1 D5 0F 00 .faraddr 4053 +0006B7r 1 D6 0F 00 .faraddr 4054 +0006BAr 1 D7 0F 00 .faraddr 4055 +0006BDr 1 D8 0F 00 .faraddr 4056 +0006C0r 1 D9 0F 00 .faraddr 4057 +0006C3r 1 DA 0F 00 .faraddr 4058 +0006C6r 1 DB 0F 00 .faraddr 4059 +0006C9r 1 DC 0F 00 .faraddr 4060 +0006CCr 1 DD 0F 00 .faraddr 4061 +0006CFr 1 DE 0F 00 .faraddr 4062 +0006D2r 1 DF 0F 00 .faraddr 4063 +0006D5r 1 E0 0F 00 .faraddr 4064 +0006D8r 1 E1 0F 00 .faraddr 4065 +0006DBr 1 E2 0F 00 .faraddr 4066 +0006DEr 1 E3 0F 00 .faraddr 4067 +0006E1r 1 E4 0F 00 .faraddr 4068 +0006E4r 1 E5 0F 00 .faraddr 4069 +0006E7r 1 E6 0F 00 .faraddr 4070 +0006EAr 1 E7 0F 00 .faraddr 4071 +0006EDr 1 E8 0F 00 .faraddr 4072 +0006F0r 1 E9 0F 00 .faraddr 4073 +0006F3r 1 EA 0F 00 .faraddr 4074 +0006F6r 1 EB 0F 00 .faraddr 4075 +0006F9r 1 EC 0F 00 .faraddr 4076 +0006FCr 1 ED 0F 00 .faraddr 4077 +0006FFr 1 EE 0F 00 .faraddr 4078 +000702r 1 EF 0F 00 .faraddr 4079 +000705r 1 F0 0F 00 .faraddr 4080 +000708r 1 F1 0F 00 .faraddr 4081 +00070Br 1 F2 0F 00 .faraddr 4082 +00070Er 1 F3 0F 00 .faraddr 4083 +000711r 1 F4 0F 00 .faraddr 4084 +000714r 1 F5 0F 00 .faraddr 4085 +000717r 1 F6 0F 00 .faraddr 4086 +00071Ar 1 F7 0F 00 .faraddr 4087 +00071Dr 1 F8 0F 00 .faraddr 4088 +000720r 1 F9 0F 00 .faraddr 4089 +000723r 1 FA 0F 00 .faraddr 4090 +000726r 1 FB 0F 00 .faraddr 4091 +000729r 1 FC 0F 00 .faraddr 4092 +00072Cr 1 FD 0F 00 .faraddr 4093 +00072Fr 1 FE 0F 00 .faraddr 4094 +000732r 1 FF 0F 00 .faraddr 4095 +000735r 1 00 10 00 .faraddr 4096 +000738r 1 01 10 00 .faraddr 4097 +00073Br 1 02 10 00 .faraddr 4098 +00073Er 1 03 10 00 .faraddr 4099 +000741r 1 04 10 00 .faraddr 4100 +000744r 1 05 10 00 .faraddr 4101 +000747r 1 06 10 00 .faraddr 4102 +00074Ar 1 07 10 00 .faraddr 4103 +00074Dr 1 08 10 00 .faraddr 4104 +000750r 1 F0 7F 00 .faraddr 32752 +000753r 1 F1 7F 00 .faraddr 32753 +000756r 1 F2 7F 00 .faraddr 32754 +000759r 1 F3 7F 00 .faraddr 32755 +00075Cr 1 F4 7F 00 .faraddr 32756 +00075Fr 1 F5 7F 00 .faraddr 32757 +000762r 1 F6 7F 00 .faraddr 32758 +000765r 1 F7 7F 00 .faraddr 32759 +000768r 1 F8 7F 00 .faraddr 32760 +00076Br 1 F9 7F 00 .faraddr 32761 +00076Er 1 FA 7F 00 .faraddr 32762 +000771r 1 FB 7F 00 .faraddr 32763 +000774r 1 FC 7F 00 .faraddr 32764 +000777r 1 FD 7F 00 .faraddr 32765 +00077Ar 1 FE 7F 00 .faraddr 32766 +00077Dr 1 FF 7F 00 .faraddr 32767 +000780r 1 00 80 00 .faraddr 32768 +000783r 1 01 80 00 .faraddr 32769 +000786r 1 02 80 00 .faraddr 32770 +000789r 1 03 80 00 .faraddr 32771 +00078Cr 1 04 80 00 .faraddr 32772 +00078Fr 1 05 80 00 .faraddr 32773 +000792r 1 06 80 00 .faraddr 32774 +000795r 1 07 80 00 .faraddr 32775 +000798r 1 08 80 00 .faraddr 32776 +00079Br 1 09 80 00 .faraddr 32777 +00079Er 1 0A 80 00 .faraddr 32778 +0007A1r 1 0B 80 00 .faraddr 32779 +0007A4r 1 E1 9F 00 .faraddr 40929 +0007A7r 1 E2 9F 00 .faraddr 40930 +0007AAr 1 E3 9F 00 .faraddr 40931 +0007ADr 1 E4 9F 00 .faraddr 40932 +0007B0r 1 E5 9F 00 .faraddr 40933 +0007B3r 1 E6 9F 00 .faraddr 40934 +0007B6r 1 E7 9F 00 .faraddr 40935 +0007B9r 1 E8 9F 00 .faraddr 40936 +0007BCr 1 E9 9F 00 .faraddr 40937 +0007BFr 1 EA 9F 00 .faraddr 40938 +0007C2r 1 EB 9F 00 .faraddr 40939 +0007C5r 1 EC 9F 00 .faraddr 40940 +0007C8r 1 ED 9F 00 .faraddr 40941 +0007CBr 1 EE 9F 00 .faraddr 40942 +0007CEr 1 EF 9F 00 .faraddr 40943 +0007D1r 1 F0 9F 00 .faraddr 40944 +0007D4r 1 F1 9F 00 .faraddr 40945 +0007D7r 1 F2 9F 00 .faraddr 40946 +0007DAr 1 F3 9F 00 .faraddr 40947 +0007DDr 1 F4 9F 00 .faraddr 40948 +0007E0r 1 F5 9F 00 .faraddr 40949 +0007E3r 1 F6 9F 00 .faraddr 40950 +0007E6r 1 F7 9F 00 .faraddr 40951 +0007E9r 1 F8 9F 00 .faraddr 40952 +0007ECr 1 F9 9F 00 .faraddr 40953 +0007EFr 1 FA 9F 00 .faraddr 40954 +0007F2r 1 FB 9F 00 .faraddr 40955 +0007F5r 1 FC 9F 00 .faraddr 40956 +0007F8r 1 FD 9F 00 .faraddr 40957 +0007FBr 1 FE 9F 00 .faraddr 40958 +0007FEr 1 FF 9F 00 .faraddr 40959 +000801r 1 00 A0 00 .faraddr 40960 +000804r 1 01 A0 00 .faraddr 40961 +000807r 1 02 A0 00 .faraddr 40962 +00080Ar 1 03 A0 00 .faraddr 40963 +00080Dr 1 04 A0 00 .faraddr 40964 +000810r 1 05 A0 00 .faraddr 40965 +000813r 1 06 A0 00 .faraddr 40966 +000816r 1 07 A0 00 .faraddr 40967 +000819r 1 08 A0 00 .faraddr 40968 +00081Cr 1 09 A0 00 .faraddr 40969 +00081Fr 1 0A A0 00 .faraddr 40970 +000822r 1 0B A0 00 .faraddr 40971 +000825r 1 0C A0 00 .faraddr 40972 +000828r 1 0D A0 00 .faraddr 40973 +00082Br 1 0E A0 00 .faraddr 40974 +00082Er 1 0F A0 00 .faraddr 40975 +000831r 1 E1 AF 00 .faraddr 45025 +000834r 1 E2 AF 00 .faraddr 45026 +000837r 1 E3 AF 00 .faraddr 45027 +00083Ar 1 E4 AF 00 .faraddr 45028 +00083Dr 1 E5 AF 00 .faraddr 45029 +000840r 1 E6 AF 00 .faraddr 45030 +000843r 1 E7 AF 00 .faraddr 45031 +000846r 1 E8 AF 00 .faraddr 45032 +000849r 1 E9 AF 00 .faraddr 45033 +00084Cr 1 EA AF 00 .faraddr 45034 +00084Fr 1 EB AF 00 .faraddr 45035 +000852r 1 EC AF 00 .faraddr 45036 +000855r 1 ED AF 00 .faraddr 45037 +000858r 1 EE AF 00 .faraddr 45038 +00085Br 1 EF AF 00 .faraddr 45039 +00085Er 1 F0 AF 00 .faraddr 45040 +000861r 1 F1 AF 00 .faraddr 45041 +000864r 1 F2 AF 00 .faraddr 45042 +000867r 1 F3 AF 00 .faraddr 45043 +00086Ar 1 F4 AF 00 .faraddr 45044 +00086Dr 1 F5 AF 00 .faraddr 45045 +000870r 1 F6 AF 00 .faraddr 45046 +000873r 1 F7 AF 00 .faraddr 45047 +000876r 1 F8 AF 00 .faraddr 45048 +000879r 1 F9 AF 00 .faraddr 45049 +00087Cr 1 FA AF 00 .faraddr 45050 +00087Fr 1 FB AF 00 .faraddr 45051 +000882r 1 FC AF 00 .faraddr 45052 +000885r 1 FD AF 00 .faraddr 45053 +000888r 1 FE AF 00 .faraddr 45054 +00088Br 1 FF AF 00 .faraddr 45055 +00088Er 1 00 B0 00 .faraddr 45056 +000891r 1 01 B0 00 .faraddr 45057 +000894r 1 02 B0 00 .faraddr 45058 +000897r 1 03 B0 00 .faraddr 45059 +00089Ar 1 04 B0 00 .faraddr 45060 +00089Dr 1 05 B0 00 .faraddr 45061 +0008A0r 1 06 B0 00 .faraddr 45062 +0008A3r 1 07 B0 00 .faraddr 45063 +0008A6r 1 08 B0 00 .faraddr 45064 +0008A9r 1 09 B0 00 .faraddr 45065 +0008ACr 1 0A B0 00 .faraddr 45066 +0008AFr 1 0B B0 00 .faraddr 45067 +0008B2r 1 0C B0 00 .faraddr 45068 +0008B5r 1 0D B0 00 .faraddr 45069 +0008B8r 1 0E B0 00 .faraddr 45070 +0008BBr 1 0F B0 00 .faraddr 45071 +0008BEr 1 E1 FF 00 .faraddr 65505 +0008C1r 1 E2 FF 00 .faraddr 65506 +0008C4r 1 E3 FF 00 .faraddr 65507 +0008C7r 1 E4 FF 00 .faraddr 65508 +0008CAr 1 E5 FF 00 .faraddr 65509 +0008CDr 1 E6 FF 00 .faraddr 65510 +0008D0r 1 E7 FF 00 .faraddr 65511 +0008D3r 1 E8 FF 00 .faraddr 65512 +0008D6r 1 E9 FF 00 .faraddr 65513 +0008D9r 1 EA FF 00 .faraddr 65514 +0008DCr 1 EB FF 00 .faraddr 65515 +0008DFr 1 EC FF 00 .faraddr 65516 +0008E2r 1 ED FF 00 .faraddr 65517 +0008E5r 1 EE FF 00 .faraddr 65518 +0008E8r 1 EF FF 00 .faraddr 65519 +0008EBr 1 F0 FF 00 .faraddr 65520 +0008EEr 1 F1 FF 00 .faraddr 65521 +0008F1r 1 F2 FF 00 .faraddr 65522 +0008F4r 1 F3 FF 00 .faraddr 65523 +0008F7r 1 F4 FF 00 .faraddr 65524 +0008FAr 1 F5 FF 00 .faraddr 65525 +0008FDr 1 F6 FF 00 .faraddr 65526 +000900r 1 F7 FF 00 .faraddr 65527 +000903r 1 F8 FF 00 .faraddr 65528 +000906r 1 F9 FF 00 .faraddr 65529 +000909r 1 FA FF 00 .faraddr 65530 +00090Cr 1 FB FF 00 .faraddr 65531 +00090Fr 1 FC FF 00 .faraddr 65532 +000912r 1 FD FF 00 .faraddr 65533 +000915r 1 FE FF 00 .faraddr 65534 +000918r 1 FF FF 00 .faraddr 65535 +00091Br 1 00 00 01 .faraddr 65536 +00091Er 1 01 00 01 .faraddr 65537 +000921r 1 02 00 01 .faraddr 65538 +000924r 1 03 00 01 .faraddr 65539 +000927r 1 04 00 01 .faraddr 65540 +00092Ar 1 05 00 01 .faraddr 65541 +00092Dr 1 06 00 01 .faraddr 65542 +000930r 1 07 00 01 .faraddr 65543 +000933r 1 08 00 01 .faraddr 65544 +000936r 1 09 00 01 .faraddr 65545 +000939r 1 0A 00 01 .faraddr 65546 +00093Cr 1 0B 00 01 .faraddr 65547 +00093Fr 1 0C 00 01 .faraddr 65548 +000942r 1 0D 00 01 .faraddr 65549 +000945r 1 0E 00 01 .faraddr 65550 +000948r 1 0F 00 01 .faraddr 65551 +00094Br 1 E1 FF 10 .faraddr 1114081 +00094Er 1 E2 FF 10 .faraddr 1114082 +000951r 1 E3 FF 10 .faraddr 1114083 +000954r 1 E4 FF 10 .faraddr 1114084 +000957r 1 E5 FF 10 .faraddr 1114085 +00095Ar 1 E6 FF 10 .faraddr 1114086 +00095Dr 1 E7 FF 10 .faraddr 1114087 +000960r 1 E8 FF 10 .faraddr 1114088 +000963r 1 E9 FF 10 .faraddr 1114089 +000966r 1 EA FF 10 .faraddr 1114090 +000969r 1 EB FF 10 .faraddr 1114091 +00096Cr 1 EC FF 10 .faraddr 1114092 +00096Fr 1 ED FF 10 .faraddr 1114093 +000972r 1 EE FF 10 .faraddr 1114094 +000975r 1 EF FF 10 .faraddr 1114095 +000978r 1 F0 FF 10 .faraddr 1114096 +00097Br 1 F1 FF 10 .faraddr 1114097 +00097Er 1 F2 FF 10 .faraddr 1114098 +000981r 1 F3 FF 10 .faraddr 1114099 +000984r 1 F4 FF 10 .faraddr 1114100 +000987r 1 F5 FF 10 .faraddr 1114101 +00098Ar 1 F6 FF 10 .faraddr 1114102 +00098Dr 1 F7 FF 10 .faraddr 1114103 +000990r 1 F8 FF 10 .faraddr 1114104 +000993r 1 F9 FF 10 .faraddr 1114105 +000996r 1 FA FF 10 .faraddr 1114106 +000999r 1 FB FF 10 .faraddr 1114107 +00099Cr 1 FC FF 10 .faraddr 1114108 +00099Fr 1 FD FF 10 .faraddr 1114109 +0009A2r 1 FE FF 10 .faraddr 1114110 +0009A5r 1 FF FF 10 .faraddr 1114111 +0009A8r 1 00 00 11 .faraddr 1114112 +0009ABr 1 01 00 11 .faraddr 1114113 +0009AEr 1 02 00 11 .faraddr 1114114 +0009B1r 1 03 00 11 .faraddr 1114115 +0009B4r 1 04 00 11 .faraddr 1114116 +0009B7r 1 05 00 11 .faraddr 1114117 +0009BAr 1 06 00 11 .faraddr 1114118 +0009BDr 1 07 00 11 .faraddr 1114119 +0009C0r 1 08 00 11 .faraddr 1114120 +0009C3r 1 09 00 11 .faraddr 1114121 +0009C6r 1 0A 00 11 .faraddr 1114122 +0009C9r 1 0B 00 11 .faraddr 1114123 +0009CCr 1 0C 00 11 .faraddr 1114124 +0009CFr 1 0D 00 11 .faraddr 1114125 +0009D2r 1 0E 00 11 .faraddr 1114126 +0009D5r 1 0F 00 11 .faraddr 1114127 +0009D8r 1 E1 FF 20 .faraddr 2162657 +0009DBr 1 E2 FF 20 .faraddr 2162658 +0009DEr 1 E3 FF 20 .faraddr 2162659 +0009E1r 1 E4 FF 20 .faraddr 2162660 +0009E4r 1 E5 FF 20 .faraddr 2162661 +0009E7r 1 E6 FF 20 .faraddr 2162662 +0009EAr 1 E7 FF 20 .faraddr 2162663 +0009EDr 1 E8 FF 20 .faraddr 2162664 +0009F0r 1 E9 FF 20 .faraddr 2162665 +0009F3r 1 EA FF 20 .faraddr 2162666 +0009F6r 1 EB FF 20 .faraddr 2162667 +0009F9r 1 EC FF 20 .faraddr 2162668 +0009FCr 1 ED FF 20 .faraddr 2162669 +0009FFr 1 EE FF 20 .faraddr 2162670 +000A02r 1 EF FF 20 .faraddr 2162671 +000A05r 1 F0 FF 20 .faraddr 2162672 +000A08r 1 F1 FF 20 .faraddr 2162673 +000A0Br 1 F2 FF 20 .faraddr 2162674 +000A0Er 1 F3 FF 20 .faraddr 2162675 +000A11r 1 F4 FF 20 .faraddr 2162676 +000A14r 1 F5 FF 20 .faraddr 2162677 +000A17r 1 F6 FF 20 .faraddr 2162678 +000A1Ar 1 F7 FF 20 .faraddr 2162679 +000A1Dr 1 F8 FF 20 .faraddr 2162680 +000A20r 1 F9 FF 20 .faraddr 2162681 +000A23r 1 FA FF 20 .faraddr 2162682 +000A26r 1 FB FF 20 .faraddr 2162683 +000A29r 1 FC FF 20 .faraddr 2162684 +000A2Cr 1 FD FF 20 .faraddr 2162685 +000A2Fr 1 FE FF 20 .faraddr 2162686 +000A32r 1 FF FF 20 .faraddr 2162687 +000A35r 1 00 00 21 .faraddr 2162688 +000A38r 1 01 00 21 .faraddr 2162689 +000A3Br 1 02 00 21 .faraddr 2162690 +000A3Er 1 03 00 21 .faraddr 2162691 +000A41r 1 04 00 21 .faraddr 2162692 +000A44r 1 05 00 21 .faraddr 2162693 +000A47r 1 06 00 21 .faraddr 2162694 +000A4Ar 1 07 00 21 .faraddr 2162695 +000A4Dr 1 08 00 21 .faraddr 2162696 +000A50r 1 09 00 21 .faraddr 2162697 +000A53r 1 0A 00 21 .faraddr 2162698 +000A56r 1 0B 00 21 .faraddr 2162699 +000A59r 1 0C 00 21 .faraddr 2162700 +000A5Cr 1 0D 00 21 .faraddr 2162701 +000A5Fr 1 0E 00 21 .faraddr 2162702 +000A62r 1 0F 00 21 .faraddr 2162703 +000A65r 1 E1 FF 7F .faraddr 8388577 +000A68r 1 E2 FF 7F .faraddr 8388578 +000A6Br 1 E3 FF 7F .faraddr 8388579 +000A6Er 1 E4 FF 7F .faraddr 8388580 +000A71r 1 E5 FF 7F .faraddr 8388581 +000A74r 1 E6 FF 7F .faraddr 8388582 +000A77r 1 E7 FF 7F .faraddr 8388583 +000A7Ar 1 E8 FF 7F .faraddr 8388584 +000A7Dr 1 E9 FF 7F .faraddr 8388585 +000A80r 1 EA FF 7F .faraddr 8388586 +000A83r 1 EB FF 7F .faraddr 8388587 +000A86r 1 EC FF 7F .faraddr 8388588 +000A89r 1 ED FF 7F .faraddr 8388589 +000A8Cr 1 EE FF 7F .faraddr 8388590 +000A8Fr 1 EF FF 7F .faraddr 8388591 +000A92r 1 F0 FF 7F .faraddr 8388592 +000A95r 1 F1 FF 7F .faraddr 8388593 +000A98r 1 F2 FF 7F .faraddr 8388594 +000A9Br 1 F3 FF 7F .faraddr 8388595 +000A9Er 1 F4 FF 7F .faraddr 8388596 +000AA1r 1 F5 FF 7F .faraddr 8388597 +000AA4r 1 F6 FF 7F .faraddr 8388598 +000AA7r 1 F7 FF 7F .faraddr 8388599 +000AAAr 1 F8 FF 7F .faraddr 8388600 +000AADr 1 F9 FF 7F .faraddr 8388601 +000AB0r 1 FA FF 7F .faraddr 8388602 +000AB3r 1 FB FF 7F .faraddr 8388603 +000AB6r 1 FC FF 7F .faraddr 8388604 +000AB9r 1 FD FF 7F .faraddr 8388605 +000ABCr 1 FE FF 7F .faraddr 8388606 +000ABFr 1 FF FF 7F .faraddr 8388607 +000AC2r 1 00 00 80 .faraddr 8388608 +000AC5r 1 01 00 80 .faraddr 8388609 +000AC8r 1 02 00 80 .faraddr 8388610 +000ACBr 1 03 00 80 .faraddr 8388611 +000ACEr 1 04 00 80 .faraddr 8388612 +000AD1r 1 05 00 80 .faraddr 8388613 +000AD4r 1 06 00 80 .faraddr 8388614 +000AD7r 1 07 00 80 .faraddr 8388615 +000ADAr 1 08 00 80 .faraddr 8388616 +000ADDr 1 09 00 80 .faraddr 8388617 +000AE0r 1 0A 00 80 .faraddr 8388618 +000AE3r 1 0B 00 80 .faraddr 8388619 +000AE6r 1 0C 00 80 .faraddr 8388620 +000AE9r 1 0D 00 80 .faraddr 8388621 +000AECr 1 0E 00 80 .faraddr 8388622 +000AEFr 1 0F 00 80 .faraddr 8388623 +000AF2r 1 E1 FF 9F .faraddr 10485729 +000AF5r 1 E2 FF 9F .faraddr 10485730 +000AF8r 1 E3 FF 9F .faraddr 10485731 +000AFBr 1 E4 FF 9F .faraddr 10485732 +000AFEr 1 E5 FF 9F .faraddr 10485733 +000B01r 1 E6 FF 9F .faraddr 10485734 +000B04r 1 E7 FF 9F .faraddr 10485735 +000B07r 1 E8 FF 9F .faraddr 10485736 +000B0Ar 1 E9 FF 9F .faraddr 10485737 +000B0Dr 1 EA FF 9F .faraddr 10485738 +000B10r 1 EB FF 9F .faraddr 10485739 +000B13r 1 EC FF 9F .faraddr 10485740 +000B16r 1 ED FF 9F .faraddr 10485741 +000B19r 1 EE FF 9F .faraddr 10485742 +000B1Cr 1 EF FF 9F .faraddr 10485743 +000B1Fr 1 F0 FF 9F .faraddr 10485744 +000B22r 1 F1 FF 9F .faraddr 10485745 +000B25r 1 F2 FF 9F .faraddr 10485746 +000B28r 1 F3 FF 9F .faraddr 10485747 +000B2Br 1 F4 FF 9F .faraddr 10485748 +000B2Er 1 F5 FF 9F .faraddr 10485749 +000B31r 1 F6 FF 9F .faraddr 10485750 +000B34r 1 F7 FF 9F .faraddr 10485751 +000B37r 1 F8 FF 9F .faraddr 10485752 +000B3Ar 1 F9 FF 9F .faraddr 10485753 +000B3Dr 1 FA FF 9F .faraddr 10485754 +000B40r 1 FB FF 9F .faraddr 10485755 +000B43r 1 FC FF 9F .faraddr 10485756 +000B46r 1 FD FF 9F .faraddr 10485757 +000B49r 1 FE FF 9F .faraddr 10485758 +000B4Cr 1 FF FF 9F .faraddr 10485759 +000B4Fr 1 00 00 A0 .faraddr 10485760 +000B52r 1 01 00 A0 .faraddr 10485761 +000B55r 1 02 00 A0 .faraddr 10485762 +000B58r 1 03 00 A0 .faraddr 10485763 +000B5Br 1 04 00 A0 .faraddr 10485764 +000B5Er 1 05 00 A0 .faraddr 10485765 +000B61r 1 06 00 A0 .faraddr 10485766 +000B64r 1 07 00 A0 .faraddr 10485767 +000B67r 1 08 00 A0 .faraddr 10485768 +000B6Ar 1 09 00 A0 .faraddr 10485769 +000B6Dr 1 0A 00 A0 .faraddr 10485770 +000B70r 1 0B 00 A0 .faraddr 10485771 +000B73r 1 0C 00 A0 .faraddr 10485772 +000B76r 1 0D 00 A0 .faraddr 10485773 +000B79r 1 0E 00 A0 .faraddr 10485774 +000B7Cr 1 0F 00 A0 .faraddr 10485775 +000B7Fr 1 E1 FF FF .faraddr 16777185 +000B82r 1 E2 FF FF .faraddr 16777186 +000B85r 1 E3 FF FF .faraddr 16777187 +000B88r 1 E4 FF FF .faraddr 16777188 +000B8Br 1 E5 FF FF .faraddr 16777189 +000B8Er 1 E6 FF FF .faraddr 16777190 +000B91r 1 E7 FF FF .faraddr 16777191 +000B94r 1 E8 FF FF .faraddr 16777192 +000B97r 1 E9 FF FF .faraddr 16777193 +000B9Ar 1 EA FF FF .faraddr 16777194 +000B9Dr 1 EB FF FF .faraddr 16777195 +000BA0r 1 EC FF FF .faraddr 16777196 +000BA3r 1 ED FF FF .faraddr 16777197 +000BA6r 1 EE FF FF .faraddr 16777198 +000BA9r 1 EF FF FF .faraddr 16777199 +000BACr 1 F0 FF FF .faraddr 16777200 +000BAFr 1 F1 FF FF .faraddr 16777201 +000BB2r 1 F2 FF FF .faraddr 16777202 +000BB5r 1 F3 FF FF .faraddr 16777203 +000BB8r 1 F4 FF FF .faraddr 16777204 +000BBBr 1 F5 FF FF .faraddr 16777205 +000BBEr 1 F6 FF FF .faraddr 16777206 +000BC1r 1 F7 FF FF .faraddr 16777207 +000BC4r 1 F8 FF FF .faraddr 16777208 +000BC7r 1 F9 FF FF .faraddr 16777209 +000BCAr 1 FA FF FF .faraddr 16777210 +000BCDr 1 FB FF FF .faraddr 16777211 +000BD0r 1 FC FF FF .faraddr 16777212 +000BD3r 1 FD FF FF .faraddr 16777213 +000BD6r 1 FE FF FF .faraddr 16777214 +000BD9r 1 FF FF FF .faraddr 16777215 +000BDCr 1 +000BDCr 1 ; hex values +000BDCr 1 00 00 00 .faraddr $0 +000BDFr 1 01 00 00 .faraddr $1 +000BE2r 1 02 00 00 .faraddr $2 +000BE5r 1 03 00 00 .faraddr $3 +000BE8r 1 04 00 00 .faraddr $4 +000BEBr 1 05 00 00 .faraddr $5 +000BEEr 1 06 00 00 .faraddr $6 +000BF1r 1 07 00 00 .faraddr $7 +000BF4r 1 08 00 00 .faraddr $8 +000BF7r 1 09 00 00 .faraddr $9 +000BFAr 1 0A 00 00 .faraddr $a +000BFDr 1 0B 00 00 .faraddr $b +000C00r 1 0C 00 00 .faraddr $c +000C03r 1 0D 00 00 .faraddr $d +000C06r 1 0E 00 00 .faraddr $e +000C09r 1 0F 00 00 .faraddr $f +000C0Cr 1 10 00 00 .faraddr $10 +000C0Fr 1 11 00 00 .faraddr $11 +000C12r 1 12 00 00 .faraddr $12 +000C15r 1 13 00 00 .faraddr $13 +000C18r 1 70 00 00 .faraddr $70 +000C1Br 1 71 00 00 .faraddr $71 +000C1Er 1 72 00 00 .faraddr $72 +000C21r 1 73 00 00 .faraddr $73 +000C24r 1 74 00 00 .faraddr $74 +000C27r 1 75 00 00 .faraddr $75 +000C2Ar 1 76 00 00 .faraddr $76 +000C2Dr 1 77 00 00 .faraddr $77 +000C30r 1 78 00 00 .faraddr $78 +000C33r 1 79 00 00 .faraddr $79 +000C36r 1 7A 00 00 .faraddr $7a +000C39r 1 7B 00 00 .faraddr $7b +000C3Cr 1 7C 00 00 .faraddr $7c +000C3Fr 1 7D 00 00 .faraddr $7d +000C42r 1 7E 00 00 .faraddr $7e +000C45r 1 7F 00 00 .faraddr $7f +000C48r 1 80 00 00 .faraddr $80 +000C4Br 1 81 00 00 .faraddr $81 +000C4Er 1 82 00 00 .faraddr $82 +000C51r 1 83 00 00 .faraddr $83 +000C54r 1 84 00 00 .faraddr $84 +000C57r 1 85 00 00 .faraddr $85 +000C5Ar 1 86 00 00 .faraddr $86 +000C5Dr 1 F0 00 00 .faraddr $f0 +000C60r 1 F1 00 00 .faraddr $f1 +000C63r 1 F2 00 00 .faraddr $f2 +000C66r 1 F3 00 00 .faraddr $f3 +000C69r 1 F4 00 00 .faraddr $f4 +000C6Cr 1 F5 00 00 .faraddr $f5 +000C6Fr 1 F6 00 00 .faraddr $f6 +000C72r 1 F7 00 00 .faraddr $f7 +000C75r 1 F8 00 00 .faraddr $f8 +000C78r 1 F9 00 00 .faraddr $f9 +000C7Br 1 FA 00 00 .faraddr $fa +000C7Er 1 FB 00 00 .faraddr $fb +000C81r 1 FC 00 00 .faraddr $fc +000C84r 1 FD 00 00 .faraddr $fd +000C87r 1 FE 00 00 .faraddr $fe +000C8Ar 1 FF 00 00 .faraddr $ff +000C8Dr 1 00 01 00 .faraddr $100 +000C90r 1 01 01 00 .faraddr $101 +000C93r 1 02 01 00 .faraddr $102 +000C96r 1 03 01 00 .faraddr $103 +000C99r 1 D2 0F 00 .faraddr $fd2 +000C9Cr 1 D3 0F 00 .faraddr $fd3 +000C9Fr 1 D4 0F 00 .faraddr $fd4 +000CA2r 1 D5 0F 00 .faraddr $fd5 +000CA5r 1 D6 0F 00 .faraddr $fd6 +000CA8r 1 D7 0F 00 .faraddr $fd7 +000CABr 1 D8 0F 00 .faraddr $fd8 +000CAEr 1 D9 0F 00 .faraddr $fd9 +000CB1r 1 DA 0F 00 .faraddr $fda +000CB4r 1 DB 0F 00 .faraddr $fdb +000CB7r 1 DC 0F 00 .faraddr $fdc +000CBAr 1 DD 0F 00 .faraddr $fdd +000CBDr 1 DE 0F 00 .faraddr $fde +000CC0r 1 DF 0F 00 .faraddr $fdf +000CC3r 1 E0 0F 00 .faraddr $fe0 +000CC6r 1 E1 0F 00 .faraddr $fe1 +000CC9r 1 E2 0F 00 .faraddr $fe2 +000CCCr 1 E3 0F 00 .faraddr $fe3 +000CCFr 1 E4 0F 00 .faraddr $fe4 +000CD2r 1 E5 0F 00 .faraddr $fe5 +000CD5r 1 E6 0F 00 .faraddr $fe6 +000CD8r 1 E7 0F 00 .faraddr $fe7 +000CDBr 1 E8 0F 00 .faraddr $fe8 +000CDEr 1 E9 0F 00 .faraddr $fe9 +000CE1r 1 EA 0F 00 .faraddr $fea +000CE4r 1 EB 0F 00 .faraddr $feb +000CE7r 1 EC 0F 00 .faraddr $fec +000CEAr 1 ED 0F 00 .faraddr $fed +000CEDr 1 EE 0F 00 .faraddr $fee +000CF0r 1 EF 0F 00 .faraddr $fef +000CF3r 1 F0 0F 00 .faraddr $ff0 +000CF6r 1 F1 0F 00 .faraddr $ff1 +000CF9r 1 F2 0F 00 .faraddr $ff2 +000CFCr 1 F3 0F 00 .faraddr $ff3 +000CFFr 1 F4 0F 00 .faraddr $ff4 +000D02r 1 F5 0F 00 .faraddr $ff5 +000D05r 1 F6 0F 00 .faraddr $ff6 +000D08r 1 F7 0F 00 .faraddr $ff7 +000D0Br 1 F8 0F 00 .faraddr $ff8 +000D0Er 1 F9 0F 00 .faraddr $ff9 +000D11r 1 FA 0F 00 .faraddr $ffa +000D14r 1 FB 0F 00 .faraddr $ffb +000D17r 1 FC 0F 00 .faraddr $ffc +000D1Ar 1 FD 0F 00 .faraddr $ffd +000D1Dr 1 FE 0F 00 .faraddr $ffe +000D20r 1 FF 0F 00 .faraddr $fff +000D23r 1 00 10 00 .faraddr $1000 +000D26r 1 01 10 00 .faraddr $1001 +000D29r 1 02 10 00 .faraddr $1002 +000D2Cr 1 03 10 00 .faraddr $1003 +000D2Fr 1 04 10 00 .faraddr $1004 +000D32r 1 05 10 00 .faraddr $1005 +000D35r 1 06 10 00 .faraddr $1006 +000D38r 1 07 10 00 .faraddr $1007 +000D3Br 1 08 10 00 .faraddr $1008 +000D3Er 1 F0 7F 00 .faraddr $7ff0 +000D41r 1 F1 7F 00 .faraddr $7ff1 +000D44r 1 F2 7F 00 .faraddr $7ff2 +000D47r 1 F3 7F 00 .faraddr $7ff3 +000D4Ar 1 F4 7F 00 .faraddr $7ff4 +000D4Dr 1 F5 7F 00 .faraddr $7ff5 +000D50r 1 F6 7F 00 .faraddr $7ff6 +000D53r 1 F7 7F 00 .faraddr $7ff7 +000D56r 1 F8 7F 00 .faraddr $7ff8 +000D59r 1 F9 7F 00 .faraddr $7ff9 +000D5Cr 1 FA 7F 00 .faraddr $7ffa +000D5Fr 1 FB 7F 00 .faraddr $7ffb +000D62r 1 FC 7F 00 .faraddr $7ffc +000D65r 1 FD 7F 00 .faraddr $7ffd +000D68r 1 FE 7F 00 .faraddr $7ffe +000D6Br 1 FF 7F 00 .faraddr $7fff +000D6Er 1 00 80 00 .faraddr $8000 +000D71r 1 01 80 00 .faraddr $8001 +000D74r 1 02 80 00 .faraddr $8002 +000D77r 1 03 80 00 .faraddr $8003 +000D7Ar 1 04 80 00 .faraddr $8004 +000D7Dr 1 05 80 00 .faraddr $8005 +000D80r 1 06 80 00 .faraddr $8006 +000D83r 1 07 80 00 .faraddr $8007 +000D86r 1 08 80 00 .faraddr $8008 +000D89r 1 09 80 00 .faraddr $8009 +000D8Cr 1 0A 80 00 .faraddr $800a +000D8Fr 1 0B 80 00 .faraddr $800b +000D92r 1 E1 9F 00 .faraddr $9fe1 +000D95r 1 E2 9F 00 .faraddr $9fe2 +000D98r 1 E3 9F 00 .faraddr $9fe3 +000D9Br 1 E4 9F 00 .faraddr $9fe4 +000D9Er 1 E5 9F 00 .faraddr $9fe5 +000DA1r 1 E6 9F 00 .faraddr $9fe6 +000DA4r 1 E7 9F 00 .faraddr $9fe7 +000DA7r 1 E8 9F 00 .faraddr $9fe8 +000DAAr 1 E9 9F 00 .faraddr $9fe9 +000DADr 1 EA 9F 00 .faraddr $9fea +000DB0r 1 EB 9F 00 .faraddr $9feb +000DB3r 1 EC 9F 00 .faraddr $9fec +000DB6r 1 ED 9F 00 .faraddr $9fed +000DB9r 1 EE 9F 00 .faraddr $9fee +000DBCr 1 EF 9F 00 .faraddr $9fef +000DBFr 1 F0 9F 00 .faraddr $9ff0 +000DC2r 1 F1 9F 00 .faraddr $9ff1 +000DC5r 1 F2 9F 00 .faraddr $9ff2 +000DC8r 1 F3 9F 00 .faraddr $9ff3 +000DCBr 1 F4 9F 00 .faraddr $9ff4 +000DCEr 1 F5 9F 00 .faraddr $9ff5 +000DD1r 1 F6 9F 00 .faraddr $9ff6 +000DD4r 1 F7 9F 00 .faraddr $9ff7 +000DD7r 1 F8 9F 00 .faraddr $9ff8 +000DDAr 1 F9 9F 00 .faraddr $9ff9 +000DDDr 1 FA 9F 00 .faraddr $9ffa +000DE0r 1 FB 9F 00 .faraddr $9ffb +000DE3r 1 FC 9F 00 .faraddr $9ffc +000DE6r 1 FD 9F 00 .faraddr $9ffd +000DE9r 1 FE 9F 00 .faraddr $9ffe +000DECr 1 FF 9F 00 .faraddr $9fff +000DEFr 1 00 A0 00 .faraddr $a000 +000DF2r 1 01 A0 00 .faraddr $a001 +000DF5r 1 02 A0 00 .faraddr $a002 +000DF8r 1 03 A0 00 .faraddr $a003 +000DFBr 1 04 A0 00 .faraddr $a004 +000DFEr 1 05 A0 00 .faraddr $a005 +000E01r 1 06 A0 00 .faraddr $a006 +000E04r 1 07 A0 00 .faraddr $a007 +000E07r 1 08 A0 00 .faraddr $a008 +000E0Ar 1 09 A0 00 .faraddr $a009 +000E0Dr 1 0A A0 00 .faraddr $a00a +000E10r 1 0B A0 00 .faraddr $a00b +000E13r 1 0C A0 00 .faraddr $a00c +000E16r 1 0D A0 00 .faraddr $a00d +000E19r 1 0E A0 00 .faraddr $a00e +000E1Cr 1 0F A0 00 .faraddr $a00f +000E1Fr 1 E1 AF 00 .faraddr $afe1 +000E22r 1 E2 AF 00 .faraddr $afe2 +000E25r 1 E3 AF 00 .faraddr $afe3 +000E28r 1 E4 AF 00 .faraddr $afe4 +000E2Br 1 E5 AF 00 .faraddr $afe5 +000E2Er 1 E6 AF 00 .faraddr $afe6 +000E31r 1 E7 AF 00 .faraddr $afe7 +000E34r 1 E8 AF 00 .faraddr $afe8 +000E37r 1 E9 AF 00 .faraddr $afe9 +000E3Ar 1 EA AF 00 .faraddr $afea +000E3Dr 1 EB AF 00 .faraddr $afeb +000E40r 1 EC AF 00 .faraddr $afec +000E43r 1 ED AF 00 .faraddr $afed +000E46r 1 EE AF 00 .faraddr $afee +000E49r 1 EF AF 00 .faraddr $afef +000E4Cr 1 F0 AF 00 .faraddr $aff0 +000E4Fr 1 F1 AF 00 .faraddr $aff1 +000E52r 1 F2 AF 00 .faraddr $aff2 +000E55r 1 F3 AF 00 .faraddr $aff3 +000E58r 1 F4 AF 00 .faraddr $aff4 +000E5Br 1 F5 AF 00 .faraddr $aff5 +000E5Er 1 F6 AF 00 .faraddr $aff6 +000E61r 1 F7 AF 00 .faraddr $aff7 +000E64r 1 F8 AF 00 .faraddr $aff8 +000E67r 1 F9 AF 00 .faraddr $aff9 +000E6Ar 1 FA AF 00 .faraddr $affa +000E6Dr 1 FB AF 00 .faraddr $affb +000E70r 1 FC AF 00 .faraddr $affc +000E73r 1 FD AF 00 .faraddr $affd +000E76r 1 FE AF 00 .faraddr $affe +000E79r 1 FF AF 00 .faraddr $afff +000E7Cr 1 00 B0 00 .faraddr $b000 +000E7Fr 1 01 B0 00 .faraddr $b001 +000E82r 1 02 B0 00 .faraddr $b002 +000E85r 1 03 B0 00 .faraddr $b003 +000E88r 1 04 B0 00 .faraddr $b004 +000E8Br 1 05 B0 00 .faraddr $b005 +000E8Er 1 06 B0 00 .faraddr $b006 +000E91r 1 07 B0 00 .faraddr $b007 +000E94r 1 08 B0 00 .faraddr $b008 +000E97r 1 09 B0 00 .faraddr $b009 +000E9Ar 1 0A B0 00 .faraddr $b00a +000E9Dr 1 0B B0 00 .faraddr $b00b +000EA0r 1 0C B0 00 .faraddr $b00c +000EA3r 1 0D B0 00 .faraddr $b00d +000EA6r 1 0E B0 00 .faraddr $b00e +000EA9r 1 0F B0 00 .faraddr $b00f +000EACr 1 E1 FF 00 .faraddr $ffe1 +000EAFr 1 E2 FF 00 .faraddr $ffe2 +000EB2r 1 E3 FF 00 .faraddr $ffe3 +000EB5r 1 E4 FF 00 .faraddr $ffe4 +000EB8r 1 E5 FF 00 .faraddr $ffe5 +000EBBr 1 E6 FF 00 .faraddr $ffe6 +000EBEr 1 E7 FF 00 .faraddr $ffe7 +000EC1r 1 E8 FF 00 .faraddr $ffe8 +000EC4r 1 E9 FF 00 .faraddr $ffe9 +000EC7r 1 EA FF 00 .faraddr $ffea +000ECAr 1 EB FF 00 .faraddr $ffeb +000ECDr 1 EC FF 00 .faraddr $ffec +000ED0r 1 ED FF 00 .faraddr $ffed +000ED3r 1 EE FF 00 .faraddr $ffee +000ED6r 1 EF FF 00 .faraddr $ffef +000ED9r 1 F0 FF 00 .faraddr $fff0 +000EDCr 1 F1 FF 00 .faraddr $fff1 +000EDFr 1 F2 FF 00 .faraddr $fff2 +000EE2r 1 F3 FF 00 .faraddr $fff3 +000EE5r 1 F4 FF 00 .faraddr $fff4 +000EE8r 1 F5 FF 00 .faraddr $fff5 +000EEBr 1 F6 FF 00 .faraddr $fff6 +000EEEr 1 F7 FF 00 .faraddr $fff7 +000EF1r 1 F8 FF 00 .faraddr $fff8 +000EF4r 1 F9 FF 00 .faraddr $fff9 +000EF7r 1 FA FF 00 .faraddr $fffa +000EFAr 1 FB FF 00 .faraddr $fffb +000EFDr 1 FC FF 00 .faraddr $fffc +000F00r 1 FD FF 00 .faraddr $fffd +000F03r 1 FE FF 00 .faraddr $fffe +000F06r 1 FF FF 00 .faraddr $ffff +000F09r 1 00 00 01 .faraddr $10000 +000F0Cr 1 01 00 01 .faraddr $10001 +000F0Fr 1 02 00 01 .faraddr $10002 +000F12r 1 03 00 01 .faraddr $10003 +000F15r 1 04 00 01 .faraddr $10004 +000F18r 1 05 00 01 .faraddr $10005 +000F1Br 1 06 00 01 .faraddr $10006 +000F1Er 1 07 00 01 .faraddr $10007 +000F21r 1 08 00 01 .faraddr $10008 +000F24r 1 09 00 01 .faraddr $10009 +000F27r 1 0A 00 01 .faraddr $1000a +000F2Ar 1 0B 00 01 .faraddr $1000b +000F2Dr 1 0C 00 01 .faraddr $1000c +000F30r 1 0D 00 01 .faraddr $1000d +000F33r 1 0E 00 01 .faraddr $1000e +000F36r 1 0F 00 01 .faraddr $1000f +000F39r 1 E1 FF 10 .faraddr $10ffe1 +000F3Cr 1 E2 FF 10 .faraddr $10ffe2 +000F3Fr 1 E3 FF 10 .faraddr $10ffe3 +000F42r 1 E4 FF 10 .faraddr $10ffe4 +000F45r 1 E5 FF 10 .faraddr $10ffe5 +000F48r 1 E6 FF 10 .faraddr $10ffe6 +000F4Br 1 E7 FF 10 .faraddr $10ffe7 +000F4Er 1 E8 FF 10 .faraddr $10ffe8 +000F51r 1 E9 FF 10 .faraddr $10ffe9 +000F54r 1 EA FF 10 .faraddr $10ffea +000F57r 1 EB FF 10 .faraddr $10ffeb +000F5Ar 1 EC FF 10 .faraddr $10ffec +000F5Dr 1 ED FF 10 .faraddr $10ffed +000F60r 1 EE FF 10 .faraddr $10ffee +000F63r 1 EF FF 10 .faraddr $10ffef +000F66r 1 F0 FF 10 .faraddr $10fff0 +000F69r 1 F1 FF 10 .faraddr $10fff1 +000F6Cr 1 F2 FF 10 .faraddr $10fff2 +000F6Fr 1 F3 FF 10 .faraddr $10fff3 +000F72r 1 F4 FF 10 .faraddr $10fff4 +000F75r 1 F5 FF 10 .faraddr $10fff5 +000F78r 1 F6 FF 10 .faraddr $10fff6 +000F7Br 1 F7 FF 10 .faraddr $10fff7 +000F7Er 1 F8 FF 10 .faraddr $10fff8 +000F81r 1 F9 FF 10 .faraddr $10fff9 +000F84r 1 FA FF 10 .faraddr $10fffa +000F87r 1 FB FF 10 .faraddr $10fffb +000F8Ar 1 FC FF 10 .faraddr $10fffc +000F8Dr 1 FD FF 10 .faraddr $10fffd +000F90r 1 FE FF 10 .faraddr $10fffe +000F93r 1 FF FF 10 .faraddr $10ffff +000F96r 1 00 00 11 .faraddr $110000 +000F99r 1 01 00 11 .faraddr $110001 +000F9Cr 1 02 00 11 .faraddr $110002 +000F9Fr 1 03 00 11 .faraddr $110003 +000FA2r 1 04 00 11 .faraddr $110004 +000FA5r 1 05 00 11 .faraddr $110005 +000FA8r 1 06 00 11 .faraddr $110006 +000FABr 1 07 00 11 .faraddr $110007 +000FAEr 1 08 00 11 .faraddr $110008 +000FB1r 1 09 00 11 .faraddr $110009 +000FB4r 1 0A 00 11 .faraddr $11000a +000FB7r 1 0B 00 11 .faraddr $11000b +000FBAr 1 0C 00 11 .faraddr $11000c +000FBDr 1 0D 00 11 .faraddr $11000d +000FC0r 1 0E 00 11 .faraddr $11000e +000FC3r 1 0F 00 11 .faraddr $11000f +000FC6r 1 E1 FF 20 .faraddr $20ffe1 +000FC9r 1 E2 FF 20 .faraddr $20ffe2 +000FCCr 1 E3 FF 20 .faraddr $20ffe3 +000FCFr 1 E4 FF 20 .faraddr $20ffe4 +000FD2r 1 E5 FF 20 .faraddr $20ffe5 +000FD5r 1 E6 FF 20 .faraddr $20ffe6 +000FD8r 1 E7 FF 20 .faraddr $20ffe7 +000FDBr 1 E8 FF 20 .faraddr $20ffe8 +000FDEr 1 E9 FF 20 .faraddr $20ffe9 +000FE1r 1 EA FF 20 .faraddr $20ffea +000FE4r 1 EB FF 20 .faraddr $20ffeb +000FE7r 1 EC FF 20 .faraddr $20ffec +000FEAr 1 ED FF 20 .faraddr $20ffed +000FEDr 1 EE FF 20 .faraddr $20ffee +000FF0r 1 EF FF 20 .faraddr $20ffef +000FF3r 1 F0 FF 20 .faraddr $20fff0 +000FF6r 1 F1 FF 20 .faraddr $20fff1 +000FF9r 1 F2 FF 20 .faraddr $20fff2 +000FFCr 1 F3 FF 20 .faraddr $20fff3 +000FFFr 1 F4 FF 20 .faraddr $20fff4 +001002r 1 F5 FF 20 .faraddr $20fff5 +001005r 1 F6 FF 20 .faraddr $20fff6 +001008r 1 F7 FF 20 .faraddr $20fff7 +00100Br 1 F8 FF 20 .faraddr $20fff8 +00100Er 1 F9 FF 20 .faraddr $20fff9 +001011r 1 FA FF 20 .faraddr $20fffa +001014r 1 FB FF 20 .faraddr $20fffb +001017r 1 FC FF 20 .faraddr $20fffc +00101Ar 1 FD FF 20 .faraddr $20fffd +00101Dr 1 FE FF 20 .faraddr $20fffe +001020r 1 FF FF 20 .faraddr $20ffff +001023r 1 00 00 21 .faraddr $210000 +001026r 1 01 00 21 .faraddr $210001 +001029r 1 02 00 21 .faraddr $210002 +00102Cr 1 03 00 21 .faraddr $210003 +00102Fr 1 04 00 21 .faraddr $210004 +001032r 1 05 00 21 .faraddr $210005 +001035r 1 06 00 21 .faraddr $210006 +001038r 1 07 00 21 .faraddr $210007 +00103Br 1 08 00 21 .faraddr $210008 +00103Er 1 09 00 21 .faraddr $210009 +001041r 1 0A 00 21 .faraddr $21000a +001044r 1 0B 00 21 .faraddr $21000b +001047r 1 0C 00 21 .faraddr $21000c +00104Ar 1 0D 00 21 .faraddr $21000d +00104Dr 1 0E 00 21 .faraddr $21000e +001050r 1 0F 00 21 .faraddr $21000f +001053r 1 E1 FF 7F .faraddr $7fffe1 +001056r 1 E2 FF 7F .faraddr $7fffe2 +001059r 1 E3 FF 7F .faraddr $7fffe3 +00105Cr 1 E4 FF 7F .faraddr $7fffe4 +00105Fr 1 E5 FF 7F .faraddr $7fffe5 +001062r 1 E6 FF 7F .faraddr $7fffe6 +001065r 1 E7 FF 7F .faraddr $7fffe7 +001068r 1 E8 FF 7F .faraddr $7fffe8 +00106Br 1 E9 FF 7F .faraddr $7fffe9 +00106Er 1 EA FF 7F .faraddr $7fffea +001071r 1 EB FF 7F .faraddr $7fffeb +001074r 1 EC FF 7F .faraddr $7fffec +001077r 1 ED FF 7F .faraddr $7fffed +00107Ar 1 EE FF 7F .faraddr $7fffee +00107Dr 1 EF FF 7F .faraddr $7fffef +001080r 1 F0 FF 7F .faraddr $7ffff0 +001083r 1 F1 FF 7F .faraddr $7ffff1 +001086r 1 F2 FF 7F .faraddr $7ffff2 +001089r 1 F3 FF 7F .faraddr $7ffff3 +00108Cr 1 F4 FF 7F .faraddr $7ffff4 +00108Fr 1 F5 FF 7F .faraddr $7ffff5 +001092r 1 F6 FF 7F .faraddr $7ffff6 +001095r 1 F7 FF 7F .faraddr $7ffff7 +001098r 1 F8 FF 7F .faraddr $7ffff8 +00109Br 1 F9 FF 7F .faraddr $7ffff9 +00109Er 1 FA FF 7F .faraddr $7ffffa +0010A1r 1 FB FF 7F .faraddr $7ffffb +0010A4r 1 FC FF 7F .faraddr $7ffffc +0010A7r 1 FD FF 7F .faraddr $7ffffd +0010AAr 1 FE FF 7F .faraddr $7ffffe +0010ADr 1 FF FF 7F .faraddr $7fffff +0010B0r 1 00 00 80 .faraddr $800000 +0010B3r 1 01 00 80 .faraddr $800001 +0010B6r 1 02 00 80 .faraddr $800002 +0010B9r 1 03 00 80 .faraddr $800003 +0010BCr 1 04 00 80 .faraddr $800004 +0010BFr 1 05 00 80 .faraddr $800005 +0010C2r 1 06 00 80 .faraddr $800006 +0010C5r 1 07 00 80 .faraddr $800007 +0010C8r 1 08 00 80 .faraddr $800008 +0010CBr 1 09 00 80 .faraddr $800009 +0010CEr 1 0A 00 80 .faraddr $80000a +0010D1r 1 0B 00 80 .faraddr $80000b +0010D4r 1 0C 00 80 .faraddr $80000c +0010D7r 1 0D 00 80 .faraddr $80000d +0010DAr 1 0E 00 80 .faraddr $80000e +0010DDr 1 0F 00 80 .faraddr $80000f +0010E0r 1 E1 FF 9F .faraddr $9fffe1 +0010E3r 1 E2 FF 9F .faraddr $9fffe2 +0010E6r 1 E3 FF 9F .faraddr $9fffe3 +0010E9r 1 E4 FF 9F .faraddr $9fffe4 +0010ECr 1 E5 FF 9F .faraddr $9fffe5 +0010EFr 1 E6 FF 9F .faraddr $9fffe6 +0010F2r 1 E7 FF 9F .faraddr $9fffe7 +0010F5r 1 E8 FF 9F .faraddr $9fffe8 +0010F8r 1 E9 FF 9F .faraddr $9fffe9 +0010FBr 1 EA FF 9F .faraddr $9fffea +0010FEr 1 EB FF 9F .faraddr $9fffeb +001101r 1 EC FF 9F .faraddr $9fffec +001104r 1 ED FF 9F .faraddr $9fffed +001107r 1 EE FF 9F .faraddr $9fffee +00110Ar 1 EF FF 9F .faraddr $9fffef +00110Dr 1 F0 FF 9F .faraddr $9ffff0 +001110r 1 F1 FF 9F .faraddr $9ffff1 +001113r 1 F2 FF 9F .faraddr $9ffff2 +001116r 1 F3 FF 9F .faraddr $9ffff3 +001119r 1 F4 FF 9F .faraddr $9ffff4 +00111Cr 1 F5 FF 9F .faraddr $9ffff5 +00111Fr 1 F6 FF 9F .faraddr $9ffff6 +001122r 1 F7 FF 9F .faraddr $9ffff7 +001125r 1 F8 FF 9F .faraddr $9ffff8 +001128r 1 F9 FF 9F .faraddr $9ffff9 +00112Br 1 FA FF 9F .faraddr $9ffffa +00112Er 1 FB FF 9F .faraddr $9ffffb +001131r 1 FC FF 9F .faraddr $9ffffc +001134r 1 FD FF 9F .faraddr $9ffffd +001137r 1 FE FF 9F .faraddr $9ffffe +00113Ar 1 FF FF 9F .faraddr $9fffff +00113Dr 1 00 00 A0 .faraddr $a00000 +001140r 1 01 00 A0 .faraddr $a00001 +001143r 1 02 00 A0 .faraddr $a00002 +001146r 1 03 00 A0 .faraddr $a00003 +001149r 1 04 00 A0 .faraddr $a00004 +00114Cr 1 05 00 A0 .faraddr $a00005 +00114Fr 1 06 00 A0 .faraddr $a00006 +001152r 1 07 00 A0 .faraddr $a00007 +001155r 1 08 00 A0 .faraddr $a00008 +001158r 1 09 00 A0 .faraddr $a00009 +00115Br 1 0A 00 A0 .faraddr $a0000a +00115Er 1 0B 00 A0 .faraddr $a0000b +001161r 1 0C 00 A0 .faraddr $a0000c +001164r 1 0D 00 A0 .faraddr $a0000d +001167r 1 0E 00 A0 .faraddr $a0000e +00116Ar 1 0F 00 A0 .faraddr $a0000f +00116Dr 1 E1 FF FF .faraddr $ffffe1 +001170r 1 E2 FF FF .faraddr $ffffe2 +001173r 1 E3 FF FF .faraddr $ffffe3 +001176r 1 E4 FF FF .faraddr $ffffe4 +001179r 1 E5 FF FF .faraddr $ffffe5 +00117Cr 1 E6 FF FF .faraddr $ffffe6 +00117Fr 1 E7 FF FF .faraddr $ffffe7 +001182r 1 E8 FF FF .faraddr $ffffe8 +001185r 1 E9 FF FF .faraddr $ffffe9 +001188r 1 EA FF FF .faraddr $ffffea +00118Br 1 EB FF FF .faraddr $ffffeb +00118Er 1 EC FF FF .faraddr $ffffec +001191r 1 ED FF FF .faraddr $ffffed +001194r 1 EE FF FF .faraddr $ffffee +001197r 1 EF FF FF .faraddr $ffffef +00119Ar 1 F0 FF FF .faraddr $fffff0 +00119Dr 1 F1 FF FF .faraddr $fffff1 +0011A0r 1 F2 FF FF .faraddr $fffff2 +0011A3r 1 F3 FF FF .faraddr $fffff3 +0011A6r 1 F4 FF FF .faraddr $fffff4 +0011A9r 1 F5 FF FF .faraddr $fffff5 +0011ACr 1 F6 FF FF .faraddr $fffff6 +0011AFr 1 F7 FF FF .faraddr $fffff7 +0011B2r 1 F8 FF FF .faraddr $fffff8 +0011B5r 1 F9 FF FF .faraddr $fffff9 +0011B8r 1 FA FF FF .faraddr $fffffa +0011BBr 1 FB FF FF .faraddr $fffffb +0011BEr 1 FC FF FF .faraddr $fffffc +0011C1r 1 FD FF FF .faraddr $fffffd +0011C4r 1 FE FF FF .faraddr $fffffe +0011C7r 1 FF FF FF .faraddr $ffffff +0011CAr 1 +0011CAr 1 ; hex values, uppercase +0011CAr 1 00 00 00 .faraddr $0 +0011CDr 1 01 00 00 .faraddr $1 +0011D0r 1 02 00 00 .faraddr $2 +0011D3r 1 03 00 00 .faraddr $3 +0011D6r 1 04 00 00 .faraddr $4 +0011D9r 1 05 00 00 .faraddr $5 +0011DCr 1 06 00 00 .faraddr $6 +0011DFr 1 07 00 00 .faraddr $7 +0011E2r 1 08 00 00 .faraddr $8 +0011E5r 1 09 00 00 .faraddr $9 +0011E8r 1 0A 00 00 .faraddr $A +0011EBr 1 0B 00 00 .faraddr $B +0011EEr 1 0C 00 00 .faraddr $C +0011F1r 1 0D 00 00 .faraddr $D +0011F4r 1 0E 00 00 .faraddr $E +0011F7r 1 0F 00 00 .faraddr $F +0011FAr 1 10 00 00 .faraddr $10 +0011FDr 1 11 00 00 .faraddr $11 +001200r 1 12 00 00 .faraddr $12 +001203r 1 13 00 00 .faraddr $13 +001206r 1 70 00 00 .faraddr $70 +001209r 1 71 00 00 .faraddr $71 +00120Cr 1 72 00 00 .faraddr $72 +00120Fr 1 73 00 00 .faraddr $73 +001212r 1 74 00 00 .faraddr $74 +001215r 1 75 00 00 .faraddr $75 +001218r 1 76 00 00 .faraddr $76 +00121Br 1 77 00 00 .faraddr $77 +00121Er 1 78 00 00 .faraddr $78 +001221r 1 79 00 00 .faraddr $79 +001224r 1 7A 00 00 .faraddr $7A +001227r 1 7B 00 00 .faraddr $7B +00122Ar 1 7C 00 00 .faraddr $7C +00122Dr 1 7D 00 00 .faraddr $7D +001230r 1 7E 00 00 .faraddr $7E +001233r 1 7F 00 00 .faraddr $7F +001236r 1 80 00 00 .faraddr $80 +001239r 1 81 00 00 .faraddr $81 +00123Cr 1 82 00 00 .faraddr $82 +00123Fr 1 83 00 00 .faraddr $83 +001242r 1 84 00 00 .faraddr $84 +001245r 1 85 00 00 .faraddr $85 +001248r 1 86 00 00 .faraddr $86 +00124Br 1 F0 00 00 .faraddr $F0 +00124Er 1 F1 00 00 .faraddr $F1 +001251r 1 F2 00 00 .faraddr $F2 +001254r 1 F3 00 00 .faraddr $F3 +001257r 1 F4 00 00 .faraddr $F4 +00125Ar 1 F5 00 00 .faraddr $F5 +00125Dr 1 F6 00 00 .faraddr $F6 +001260r 1 F7 00 00 .faraddr $F7 +001263r 1 F8 00 00 .faraddr $F8 +001266r 1 F9 00 00 .faraddr $F9 +001269r 1 FA 00 00 .faraddr $FA +00126Cr 1 FB 00 00 .faraddr $FB +00126Fr 1 FC 00 00 .faraddr $FC +001272r 1 FD 00 00 .faraddr $FD +001275r 1 FE 00 00 .faraddr $FE +001278r 1 FF 00 00 .faraddr $FF +00127Br 1 00 01 00 .faraddr $100 +00127Er 1 01 01 00 .faraddr $101 +001281r 1 02 01 00 .faraddr $102 +001284r 1 03 01 00 .faraddr $103 +001287r 1 D2 0F 00 .faraddr $FD2 +00128Ar 1 D3 0F 00 .faraddr $FD3 +00128Dr 1 D4 0F 00 .faraddr $FD4 +001290r 1 D5 0F 00 .faraddr $FD5 +001293r 1 D6 0F 00 .faraddr $FD6 +001296r 1 D7 0F 00 .faraddr $FD7 +001299r 1 D8 0F 00 .faraddr $FD8 +00129Cr 1 D9 0F 00 .faraddr $FD9 +00129Fr 1 DA 0F 00 .faraddr $FDA +0012A2r 1 DB 0F 00 .faraddr $FDB +0012A5r 1 DC 0F 00 .faraddr $FDC +0012A8r 1 DD 0F 00 .faraddr $FDD +0012ABr 1 DE 0F 00 .faraddr $FDE +0012AEr 1 DF 0F 00 .faraddr $FDF +0012B1r 1 E0 0F 00 .faraddr $FE0 +0012B4r 1 E1 0F 00 .faraddr $FE1 +0012B7r 1 E2 0F 00 .faraddr $FE2 +0012BAr 1 E3 0F 00 .faraddr $FE3 +0012BDr 1 E4 0F 00 .faraddr $FE4 +0012C0r 1 E5 0F 00 .faraddr $FE5 +0012C3r 1 E6 0F 00 .faraddr $FE6 +0012C6r 1 E7 0F 00 .faraddr $FE7 +0012C9r 1 E8 0F 00 .faraddr $FE8 +0012CCr 1 E9 0F 00 .faraddr $FE9 +0012CFr 1 EA 0F 00 .faraddr $FEA +0012D2r 1 EB 0F 00 .faraddr $FEB +0012D5r 1 EC 0F 00 .faraddr $FEC +0012D8r 1 ED 0F 00 .faraddr $FED +0012DBr 1 EE 0F 00 .faraddr $FEE +0012DEr 1 EF 0F 00 .faraddr $FEF +0012E1r 1 F0 0F 00 .faraddr $FF0 +0012E4r 1 F1 0F 00 .faraddr $FF1 +0012E7r 1 F2 0F 00 .faraddr $FF2 +0012EAr 1 F3 0F 00 .faraddr $FF3 +0012EDr 1 F4 0F 00 .faraddr $FF4 +0012F0r 1 F5 0F 00 .faraddr $FF5 +0012F3r 1 F6 0F 00 .faraddr $FF6 +0012F6r 1 F7 0F 00 .faraddr $FF7 +0012F9r 1 F8 0F 00 .faraddr $FF8 +0012FCr 1 F9 0F 00 .faraddr $FF9 +0012FFr 1 FA 0F 00 .faraddr $FFA +001302r 1 FB 0F 00 .faraddr $FFB +001305r 1 FC 0F 00 .faraddr $FFC +001308r 1 FD 0F 00 .faraddr $FFD +00130Br 1 FE 0F 00 .faraddr $FFE +00130Er 1 FF 0F 00 .faraddr $FFF +001311r 1 00 10 00 .faraddr $1000 +001314r 1 01 10 00 .faraddr $1001 +001317r 1 02 10 00 .faraddr $1002 +00131Ar 1 03 10 00 .faraddr $1003 +00131Dr 1 04 10 00 .faraddr $1004 +001320r 1 05 10 00 .faraddr $1005 +001323r 1 06 10 00 .faraddr $1006 +001326r 1 07 10 00 .faraddr $1007 +001329r 1 08 10 00 .faraddr $1008 +00132Cr 1 F0 7F 00 .faraddr $7FF0 +00132Fr 1 F1 7F 00 .faraddr $7FF1 +001332r 1 F2 7F 00 .faraddr $7FF2 +001335r 1 F3 7F 00 .faraddr $7FF3 +001338r 1 F4 7F 00 .faraddr $7FF4 +00133Br 1 F5 7F 00 .faraddr $7FF5 +00133Er 1 F6 7F 00 .faraddr $7FF6 +001341r 1 F7 7F 00 .faraddr $7FF7 +001344r 1 F8 7F 00 .faraddr $7FF8 +001347r 1 F9 7F 00 .faraddr $7FF9 +00134Ar 1 FA 7F 00 .faraddr $7FFA +00134Dr 1 FB 7F 00 .faraddr $7FFB +001350r 1 FC 7F 00 .faraddr $7FFC +001353r 1 FD 7F 00 .faraddr $7FFD +001356r 1 FE 7F 00 .faraddr $7FFE +001359r 1 FF 7F 00 .faraddr $7FFF +00135Cr 1 00 80 00 .faraddr $8000 +00135Fr 1 01 80 00 .faraddr $8001 +001362r 1 02 80 00 .faraddr $8002 +001365r 1 03 80 00 .faraddr $8003 +001368r 1 04 80 00 .faraddr $8004 +00136Br 1 05 80 00 .faraddr $8005 +00136Er 1 06 80 00 .faraddr $8006 +001371r 1 07 80 00 .faraddr $8007 +001374r 1 08 80 00 .faraddr $8008 +001377r 1 09 80 00 .faraddr $8009 +00137Ar 1 0A 80 00 .faraddr $800A +00137Dr 1 0B 80 00 .faraddr $800B +001380r 1 E1 9F 00 .faraddr $9FE1 +001383r 1 E2 9F 00 .faraddr $9FE2 +001386r 1 E3 9F 00 .faraddr $9FE3 +001389r 1 E4 9F 00 .faraddr $9FE4 +00138Cr 1 E5 9F 00 .faraddr $9FE5 +00138Fr 1 E6 9F 00 .faraddr $9FE6 +001392r 1 E7 9F 00 .faraddr $9FE7 +001395r 1 E8 9F 00 .faraddr $9FE8 +001398r 1 E9 9F 00 .faraddr $9FE9 +00139Br 1 EA 9F 00 .faraddr $9FEA +00139Er 1 EB 9F 00 .faraddr $9FEB +0013A1r 1 EC 9F 00 .faraddr $9FEC +0013A4r 1 ED 9F 00 .faraddr $9FED +0013A7r 1 EE 9F 00 .faraddr $9FEE +0013AAr 1 EF 9F 00 .faraddr $9FEF +0013ADr 1 F0 9F 00 .faraddr $9FF0 +0013B0r 1 F1 9F 00 .faraddr $9FF1 +0013B3r 1 F2 9F 00 .faraddr $9FF2 +0013B6r 1 F3 9F 00 .faraddr $9FF3 +0013B9r 1 F4 9F 00 .faraddr $9FF4 +0013BCr 1 F5 9F 00 .faraddr $9FF5 +0013BFr 1 F6 9F 00 .faraddr $9FF6 +0013C2r 1 F7 9F 00 .faraddr $9FF7 +0013C5r 1 F8 9F 00 .faraddr $9FF8 +0013C8r 1 F9 9F 00 .faraddr $9FF9 +0013CBr 1 FA 9F 00 .faraddr $9FFA +0013CEr 1 FB 9F 00 .faraddr $9FFB +0013D1r 1 FC 9F 00 .faraddr $9FFC +0013D4r 1 FD 9F 00 .faraddr $9FFD +0013D7r 1 FE 9F 00 .faraddr $9FFE +0013DAr 1 FF 9F 00 .faraddr $9FFF +0013DDr 1 00 A0 00 .faraddr $A000 +0013E0r 1 01 A0 00 .faraddr $A001 +0013E3r 1 02 A0 00 .faraddr $A002 +0013E6r 1 03 A0 00 .faraddr $A003 +0013E9r 1 04 A0 00 .faraddr $A004 +0013ECr 1 05 A0 00 .faraddr $A005 +0013EFr 1 06 A0 00 .faraddr $A006 +0013F2r 1 07 A0 00 .faraddr $A007 +0013F5r 1 08 A0 00 .faraddr $A008 +0013F8r 1 09 A0 00 .faraddr $A009 +0013FBr 1 0A A0 00 .faraddr $A00A +0013FEr 1 0B A0 00 .faraddr $A00B +001401r 1 0C A0 00 .faraddr $A00C +001404r 1 0D A0 00 .faraddr $A00D +001407r 1 0E A0 00 .faraddr $A00E +00140Ar 1 0F A0 00 .faraddr $A00F +00140Dr 1 E1 AF 00 .faraddr $AFE1 +001410r 1 E2 AF 00 .faraddr $AFE2 +001413r 1 E3 AF 00 .faraddr $AFE3 +001416r 1 E4 AF 00 .faraddr $AFE4 +001419r 1 E5 AF 00 .faraddr $AFE5 +00141Cr 1 E6 AF 00 .faraddr $AFE6 +00141Fr 1 E7 AF 00 .faraddr $AFE7 +001422r 1 E8 AF 00 .faraddr $AFE8 +001425r 1 E9 AF 00 .faraddr $AFE9 +001428r 1 EA AF 00 .faraddr $AFEA +00142Br 1 EB AF 00 .faraddr $AFEB +00142Er 1 EC AF 00 .faraddr $AFEC +001431r 1 ED AF 00 .faraddr $AFED +001434r 1 EE AF 00 .faraddr $AFEE +001437r 1 EF AF 00 .faraddr $AFEF +00143Ar 1 F0 AF 00 .faraddr $AFF0 +00143Dr 1 F1 AF 00 .faraddr $AFF1 +001440r 1 F2 AF 00 .faraddr $AFF2 +001443r 1 F3 AF 00 .faraddr $AFF3 +001446r 1 F4 AF 00 .faraddr $AFF4 +001449r 1 F5 AF 00 .faraddr $AFF5 +00144Cr 1 F6 AF 00 .faraddr $AFF6 +00144Fr 1 F7 AF 00 .faraddr $AFF7 +001452r 1 F8 AF 00 .faraddr $AFF8 +001455r 1 F9 AF 00 .faraddr $AFF9 +001458r 1 FA AF 00 .faraddr $AFFA +00145Br 1 FB AF 00 .faraddr $AFFB +00145Er 1 FC AF 00 .faraddr $AFFC +001461r 1 FD AF 00 .faraddr $AFFD +001464r 1 FE AF 00 .faraddr $AFFE +001467r 1 FF AF 00 .faraddr $AFFF +00146Ar 1 00 B0 00 .faraddr $B000 +00146Dr 1 01 B0 00 .faraddr $B001 +001470r 1 02 B0 00 .faraddr $B002 +001473r 1 03 B0 00 .faraddr $B003 +001476r 1 04 B0 00 .faraddr $B004 +001479r 1 05 B0 00 .faraddr $B005 +00147Cr 1 06 B0 00 .faraddr $B006 +00147Fr 1 07 B0 00 .faraddr $B007 +001482r 1 08 B0 00 .faraddr $B008 +001485r 1 09 B0 00 .faraddr $B009 +001488r 1 0A B0 00 .faraddr $B00A +00148Br 1 0B B0 00 .faraddr $B00B +00148Er 1 0C B0 00 .faraddr $B00C +001491r 1 0D B0 00 .faraddr $B00D +001494r 1 0E B0 00 .faraddr $B00E +001497r 1 0F B0 00 .faraddr $B00F +00149Ar 1 E1 FF 00 .faraddr $FFE1 +00149Dr 1 E2 FF 00 .faraddr $FFE2 +0014A0r 1 E3 FF 00 .faraddr $FFE3 +0014A3r 1 E4 FF 00 .faraddr $FFE4 +0014A6r 1 E5 FF 00 .faraddr $FFE5 +0014A9r 1 E6 FF 00 .faraddr $FFE6 +0014ACr 1 E7 FF 00 .faraddr $FFE7 +0014AFr 1 E8 FF 00 .faraddr $FFE8 +0014B2r 1 E9 FF 00 .faraddr $FFE9 +0014B5r 1 EA FF 00 .faraddr $FFEA +0014B8r 1 EB FF 00 .faraddr $FFEB +0014BBr 1 EC FF 00 .faraddr $FFEC +0014BEr 1 ED FF 00 .faraddr $FFED +0014C1r 1 EE FF 00 .faraddr $FFEE +0014C4r 1 EF FF 00 .faraddr $FFEF +0014C7r 1 F0 FF 00 .faraddr $FFF0 +0014CAr 1 F1 FF 00 .faraddr $FFF1 +0014CDr 1 F2 FF 00 .faraddr $FFF2 +0014D0r 1 F3 FF 00 .faraddr $FFF3 +0014D3r 1 F4 FF 00 .faraddr $FFF4 +0014D6r 1 F5 FF 00 .faraddr $FFF5 +0014D9r 1 F6 FF 00 .faraddr $FFF6 +0014DCr 1 F7 FF 00 .faraddr $FFF7 +0014DFr 1 F8 FF 00 .faraddr $FFF8 +0014E2r 1 F9 FF 00 .faraddr $FFF9 +0014E5r 1 FA FF 00 .faraddr $FFFA +0014E8r 1 FB FF 00 .faraddr $FFFB +0014EBr 1 FC FF 00 .faraddr $FFFC +0014EEr 1 FD FF 00 .faraddr $FFFD +0014F1r 1 FE FF 00 .faraddr $FFFE +0014F4r 1 FF FF 00 .faraddr $FFFF +0014F7r 1 00 00 01 .faraddr $10000 +0014FAr 1 01 00 01 .faraddr $10001 +0014FDr 1 02 00 01 .faraddr $10002 +001500r 1 03 00 01 .faraddr $10003 +001503r 1 04 00 01 .faraddr $10004 +001506r 1 05 00 01 .faraddr $10005 +001509r 1 06 00 01 .faraddr $10006 +00150Cr 1 07 00 01 .faraddr $10007 +00150Fr 1 08 00 01 .faraddr $10008 +001512r 1 09 00 01 .faraddr $10009 +001515r 1 0A 00 01 .faraddr $1000A +001518r 1 0B 00 01 .faraddr $1000B +00151Br 1 0C 00 01 .faraddr $1000C +00151Er 1 0D 00 01 .faraddr $1000D +001521r 1 0E 00 01 .faraddr $1000E +001524r 1 0F 00 01 .faraddr $1000F +001527r 1 E1 FF 10 .faraddr $10FFE1 +00152Ar 1 E2 FF 10 .faraddr $10FFE2 +00152Dr 1 E3 FF 10 .faraddr $10FFE3 +001530r 1 E4 FF 10 .faraddr $10FFE4 +001533r 1 E5 FF 10 .faraddr $10FFE5 +001536r 1 E6 FF 10 .faraddr $10FFE6 +001539r 1 E7 FF 10 .faraddr $10FFE7 +00153Cr 1 E8 FF 10 .faraddr $10FFE8 +00153Fr 1 E9 FF 10 .faraddr $10FFE9 +001542r 1 EA FF 10 .faraddr $10FFEA +001545r 1 EB FF 10 .faraddr $10FFEB +001548r 1 EC FF 10 .faraddr $10FFEC +00154Br 1 ED FF 10 .faraddr $10FFED +00154Er 1 EE FF 10 .faraddr $10FFEE +001551r 1 EF FF 10 .faraddr $10FFEF +001554r 1 F0 FF 10 .faraddr $10FFF0 +001557r 1 F1 FF 10 .faraddr $10FFF1 +00155Ar 1 F2 FF 10 .faraddr $10FFF2 +00155Dr 1 F3 FF 10 .faraddr $10FFF3 +001560r 1 F4 FF 10 .faraddr $10FFF4 +001563r 1 F5 FF 10 .faraddr $10FFF5 +001566r 1 F6 FF 10 .faraddr $10FFF6 +001569r 1 F7 FF 10 .faraddr $10FFF7 +00156Cr 1 F8 FF 10 .faraddr $10FFF8 +00156Fr 1 F9 FF 10 .faraddr $10FFF9 +001572r 1 FA FF 10 .faraddr $10FFFA +001575r 1 FB FF 10 .faraddr $10FFFB +001578r 1 FC FF 10 .faraddr $10FFFC +00157Br 1 FD FF 10 .faraddr $10FFFD +00157Er 1 FE FF 10 .faraddr $10FFFE +001581r 1 FF FF 10 .faraddr $10FFFF +001584r 1 00 00 11 .faraddr $110000 +001587r 1 01 00 11 .faraddr $110001 +00158Ar 1 02 00 11 .faraddr $110002 +00158Dr 1 03 00 11 .faraddr $110003 +001590r 1 04 00 11 .faraddr $110004 +001593r 1 05 00 11 .faraddr $110005 +001596r 1 06 00 11 .faraddr $110006 +001599r 1 07 00 11 .faraddr $110007 +00159Cr 1 08 00 11 .faraddr $110008 +00159Fr 1 09 00 11 .faraddr $110009 +0015A2r 1 0A 00 11 .faraddr $11000A +0015A5r 1 0B 00 11 .faraddr $11000B +0015A8r 1 0C 00 11 .faraddr $11000C +0015ABr 1 0D 00 11 .faraddr $11000D +0015AEr 1 0E 00 11 .faraddr $11000E +0015B1r 1 0F 00 11 .faraddr $11000F +0015B4r 1 E1 FF 20 .faraddr $20FFE1 +0015B7r 1 E2 FF 20 .faraddr $20FFE2 +0015BAr 1 E3 FF 20 .faraddr $20FFE3 +0015BDr 1 E4 FF 20 .faraddr $20FFE4 +0015C0r 1 E5 FF 20 .faraddr $20FFE5 +0015C3r 1 E6 FF 20 .faraddr $20FFE6 +0015C6r 1 E7 FF 20 .faraddr $20FFE7 +0015C9r 1 E8 FF 20 .faraddr $20FFE8 +0015CCr 1 E9 FF 20 .faraddr $20FFE9 +0015CFr 1 EA FF 20 .faraddr $20FFEA +0015D2r 1 EB FF 20 .faraddr $20FFEB +0015D5r 1 EC FF 20 .faraddr $20FFEC +0015D8r 1 ED FF 20 .faraddr $20FFED +0015DBr 1 EE FF 20 .faraddr $20FFEE +0015DEr 1 EF FF 20 .faraddr $20FFEF +0015E1r 1 F0 FF 20 .faraddr $20FFF0 +0015E4r 1 F1 FF 20 .faraddr $20FFF1 +0015E7r 1 F2 FF 20 .faraddr $20FFF2 +0015EAr 1 F3 FF 20 .faraddr $20FFF3 +0015EDr 1 F4 FF 20 .faraddr $20FFF4 +0015F0r 1 F5 FF 20 .faraddr $20FFF5 +0015F3r 1 F6 FF 20 .faraddr $20FFF6 +0015F6r 1 F7 FF 20 .faraddr $20FFF7 +0015F9r 1 F8 FF 20 .faraddr $20FFF8 +0015FCr 1 F9 FF 20 .faraddr $20FFF9 +0015FFr 1 FA FF 20 .faraddr $20FFFA +001602r 1 FB FF 20 .faraddr $20FFFB +001605r 1 FC FF 20 .faraddr $20FFFC +001608r 1 FD FF 20 .faraddr $20FFFD +00160Br 1 FE FF 20 .faraddr $20FFFE +00160Er 1 FF FF 20 .faraddr $20FFFF +001611r 1 00 00 21 .faraddr $210000 +001614r 1 01 00 21 .faraddr $210001 +001617r 1 02 00 21 .faraddr $210002 +00161Ar 1 03 00 21 .faraddr $210003 +00161Dr 1 04 00 21 .faraddr $210004 +001620r 1 05 00 21 .faraddr $210005 +001623r 1 06 00 21 .faraddr $210006 +001626r 1 07 00 21 .faraddr $210007 +001629r 1 08 00 21 .faraddr $210008 +00162Cr 1 09 00 21 .faraddr $210009 +00162Fr 1 0A 00 21 .faraddr $21000A +001632r 1 0B 00 21 .faraddr $21000B +001635r 1 0C 00 21 .faraddr $21000C +001638r 1 0D 00 21 .faraddr $21000D +00163Br 1 0E 00 21 .faraddr $21000E +00163Er 1 0F 00 21 .faraddr $21000F +001641r 1 E1 FF 7F .faraddr $7FFFE1 +001644r 1 E2 FF 7F .faraddr $7FFFE2 +001647r 1 E3 FF 7F .faraddr $7FFFE3 +00164Ar 1 E4 FF 7F .faraddr $7FFFE4 +00164Dr 1 E5 FF 7F .faraddr $7FFFE5 +001650r 1 E6 FF 7F .faraddr $7FFFE6 +001653r 1 E7 FF 7F .faraddr $7FFFE7 +001656r 1 E8 FF 7F .faraddr $7FFFE8 +001659r 1 E9 FF 7F .faraddr $7FFFE9 +00165Cr 1 EA FF 7F .faraddr $7FFFEA +00165Fr 1 EB FF 7F .faraddr $7FFFEB +001662r 1 EC FF 7F .faraddr $7FFFEC +001665r 1 ED FF 7F .faraddr $7FFFED +001668r 1 EE FF 7F .faraddr $7FFFEE +00166Br 1 EF FF 7F .faraddr $7FFFEF +00166Er 1 F0 FF 7F .faraddr $7FFFF0 +001671r 1 F1 FF 7F .faraddr $7FFFF1 +001674r 1 F2 FF 7F .faraddr $7FFFF2 +001677r 1 F3 FF 7F .faraddr $7FFFF3 +00167Ar 1 F4 FF 7F .faraddr $7FFFF4 +00167Dr 1 F5 FF 7F .faraddr $7FFFF5 +001680r 1 F6 FF 7F .faraddr $7FFFF6 +001683r 1 F7 FF 7F .faraddr $7FFFF7 +001686r 1 F8 FF 7F .faraddr $7FFFF8 +001689r 1 F9 FF 7F .faraddr $7FFFF9 +00168Cr 1 FA FF 7F .faraddr $7FFFFA +00168Fr 1 FB FF 7F .faraddr $7FFFFB +001692r 1 FC FF 7F .faraddr $7FFFFC +001695r 1 FD FF 7F .faraddr $7FFFFD +001698r 1 FE FF 7F .faraddr $7FFFFE +00169Br 1 FF FF 7F .faraddr $7FFFFF +00169Er 1 00 00 80 .faraddr $800000 +0016A1r 1 01 00 80 .faraddr $800001 +0016A4r 1 02 00 80 .faraddr $800002 +0016A7r 1 03 00 80 .faraddr $800003 +0016AAr 1 04 00 80 .faraddr $800004 +0016ADr 1 05 00 80 .faraddr $800005 +0016B0r 1 06 00 80 .faraddr $800006 +0016B3r 1 07 00 80 .faraddr $800007 +0016B6r 1 08 00 80 .faraddr $800008 +0016B9r 1 09 00 80 .faraddr $800009 +0016BCr 1 0A 00 80 .faraddr $80000A +0016BFr 1 0B 00 80 .faraddr $80000B +0016C2r 1 0C 00 80 .faraddr $80000C +0016C5r 1 0D 00 80 .faraddr $80000D +0016C8r 1 0E 00 80 .faraddr $80000E +0016CBr 1 0F 00 80 .faraddr $80000F +0016CEr 1 E1 FF 9F .faraddr $9FFFE1 +0016D1r 1 E2 FF 9F .faraddr $9FFFE2 +0016D4r 1 E3 FF 9F .faraddr $9FFFE3 +0016D7r 1 E4 FF 9F .faraddr $9FFFE4 +0016DAr 1 E5 FF 9F .faraddr $9FFFE5 +0016DDr 1 E6 FF 9F .faraddr $9FFFE6 +0016E0r 1 E7 FF 9F .faraddr $9FFFE7 +0016E3r 1 E8 FF 9F .faraddr $9FFFE8 +0016E6r 1 E9 FF 9F .faraddr $9FFFE9 +0016E9r 1 EA FF 9F .faraddr $9FFFEA +0016ECr 1 EB FF 9F .faraddr $9FFFEB +0016EFr 1 EC FF 9F .faraddr $9FFFEC +0016F2r 1 ED FF 9F .faraddr $9FFFED +0016F5r 1 EE FF 9F .faraddr $9FFFEE +0016F8r 1 EF FF 9F .faraddr $9FFFEF +0016FBr 1 F0 FF 9F .faraddr $9FFFF0 +0016FEr 1 F1 FF 9F .faraddr $9FFFF1 +001701r 1 F2 FF 9F .faraddr $9FFFF2 +001704r 1 F3 FF 9F .faraddr $9FFFF3 +001707r 1 F4 FF 9F .faraddr $9FFFF4 +00170Ar 1 F5 FF 9F .faraddr $9FFFF5 +00170Dr 1 F6 FF 9F .faraddr $9FFFF6 +001710r 1 F7 FF 9F .faraddr $9FFFF7 +001713r 1 F8 FF 9F .faraddr $9FFFF8 +001716r 1 F9 FF 9F .faraddr $9FFFF9 +001719r 1 FA FF 9F .faraddr $9FFFFA +00171Cr 1 FB FF 9F .faraddr $9FFFFB +00171Fr 1 FC FF 9F .faraddr $9FFFFC +001722r 1 FD FF 9F .faraddr $9FFFFD +001725r 1 FE FF 9F .faraddr $9FFFFE +001728r 1 FF FF 9F .faraddr $9FFFFF +00172Br 1 00 00 A0 .faraddr $A00000 +00172Er 1 01 00 A0 .faraddr $A00001 +001731r 1 02 00 A0 .faraddr $A00002 +001734r 1 03 00 A0 .faraddr $A00003 +001737r 1 04 00 A0 .faraddr $A00004 +00173Ar 1 05 00 A0 .faraddr $A00005 +00173Dr 1 06 00 A0 .faraddr $A00006 +001740r 1 07 00 A0 .faraddr $A00007 +001743r 1 08 00 A0 .faraddr $A00008 +001746r 1 09 00 A0 .faraddr $A00009 +001749r 1 0A 00 A0 .faraddr $A0000A +00174Cr 1 0B 00 A0 .faraddr $A0000B +00174Fr 1 0C 00 A0 .faraddr $A0000C +001752r 1 0D 00 A0 .faraddr $A0000D +001755r 1 0E 00 A0 .faraddr $A0000E +001758r 1 0F 00 A0 .faraddr $A0000F +00175Br 1 E1 FF FF .faraddr $FFFFE1 +00175Er 1 E2 FF FF .faraddr $FFFFE2 +001761r 1 E3 FF FF .faraddr $FFFFE3 +001764r 1 E4 FF FF .faraddr $FFFFE4 +001767r 1 E5 FF FF .faraddr $FFFFE5 +00176Ar 1 E6 FF FF .faraddr $FFFFE6 +00176Dr 1 E7 FF FF .faraddr $FFFFE7 +001770r 1 E8 FF FF .faraddr $FFFFE8 +001773r 1 E9 FF FF .faraddr $FFFFE9 +001776r 1 EA FF FF .faraddr $FFFFEA +001779r 1 EB FF FF .faraddr $FFFFEB +00177Cr 1 EC FF FF .faraddr $FFFFEC +00177Fr 1 ED FF FF .faraddr $FFFFED +001782r 1 EE FF FF .faraddr $FFFFEE +001785r 1 EF FF FF .faraddr $FFFFEF +001788r 1 F0 FF FF .faraddr $FFFFF0 +00178Br 1 F1 FF FF .faraddr $FFFFF1 +00178Er 1 F2 FF FF .faraddr $FFFFF2 +001791r 1 F3 FF FF .faraddr $FFFFF3 +001794r 1 F4 FF FF .faraddr $FFFFF4 +001797r 1 F5 FF FF .faraddr $FFFFF5 +00179Ar 1 F6 FF FF .faraddr $FFFFF6 +00179Dr 1 F7 FF FF .faraddr $FFFFF7 +0017A0r 1 F8 FF FF .faraddr $FFFFF8 +0017A3r 1 F9 FF FF .faraddr $FFFFF9 +0017A6r 1 FA FF FF .faraddr $FFFFFA +0017A9r 1 FB FF FF .faraddr $FFFFFB +0017ACr 1 FC FF FF .faraddr $FFFFFC +0017AFr 1 FD FF FF .faraddr $FFFFFD +0017B2r 1 FE FF FF .faraddr $FFFFFE +0017B5r 1 FF FF FF .faraddr $FFFFFF +0017B8r 1 +0017B8r 1 ; 8-digit hex values +0017B8r 1 00 00 00 .faraddr $00000000 +0017BBr 1 01 00 00 .faraddr $00000001 +0017BEr 1 02 00 00 .faraddr $00000002 +0017C1r 1 03 00 00 .faraddr $00000003 +0017C4r 1 04 00 00 .faraddr $00000004 +0017C7r 1 05 00 00 .faraddr $00000005 +0017CAr 1 06 00 00 .faraddr $00000006 +0017CDr 1 07 00 00 .faraddr $00000007 +0017D0r 1 08 00 00 .faraddr $00000008 +0017D3r 1 09 00 00 .faraddr $00000009 +0017D6r 1 0A 00 00 .faraddr $0000000a +0017D9r 1 0B 00 00 .faraddr $0000000b +0017DCr 1 0C 00 00 .faraddr $0000000c +0017DFr 1 0D 00 00 .faraddr $0000000d +0017E2r 1 0E 00 00 .faraddr $0000000e +0017E5r 1 0F 00 00 .faraddr $0000000f +0017E8r 1 10 00 00 .faraddr $00000010 +0017EBr 1 11 00 00 .faraddr $00000011 +0017EEr 1 12 00 00 .faraddr $00000012 +0017F1r 1 13 00 00 .faraddr $00000013 +0017F4r 1 70 00 00 .faraddr $00000070 +0017F7r 1 71 00 00 .faraddr $00000071 +0017FAr 1 72 00 00 .faraddr $00000072 +0017FDr 1 73 00 00 .faraddr $00000073 +001800r 1 74 00 00 .faraddr $00000074 +001803r 1 75 00 00 .faraddr $00000075 +001806r 1 76 00 00 .faraddr $00000076 +001809r 1 77 00 00 .faraddr $00000077 +00180Cr 1 78 00 00 .faraddr $00000078 +00180Fr 1 79 00 00 .faraddr $00000079 +001812r 1 7A 00 00 .faraddr $0000007a +001815r 1 7B 00 00 .faraddr $0000007b +001818r 1 7C 00 00 .faraddr $0000007c +00181Br 1 7D 00 00 .faraddr $0000007d +00181Er 1 7E 00 00 .faraddr $0000007e +001821r 1 7F 00 00 .faraddr $0000007f +001824r 1 80 00 00 .faraddr $00000080 +001827r 1 81 00 00 .faraddr $00000081 +00182Ar 1 82 00 00 .faraddr $00000082 +00182Dr 1 83 00 00 .faraddr $00000083 +001830r 1 84 00 00 .faraddr $00000084 +001833r 1 85 00 00 .faraddr $00000085 +001836r 1 86 00 00 .faraddr $00000086 +001839r 1 F0 00 00 .faraddr $000000f0 +00183Cr 1 F1 00 00 .faraddr $000000f1 +00183Fr 1 F2 00 00 .faraddr $000000f2 +001842r 1 F3 00 00 .faraddr $000000f3 +001845r 1 F4 00 00 .faraddr $000000f4 +001848r 1 F5 00 00 .faraddr $000000f5 +00184Br 1 F6 00 00 .faraddr $000000f6 +00184Er 1 F7 00 00 .faraddr $000000f7 +001851r 1 F8 00 00 .faraddr $000000f8 +001854r 1 F9 00 00 .faraddr $000000f9 +001857r 1 FA 00 00 .faraddr $000000fa +00185Ar 1 FB 00 00 .faraddr $000000fb +00185Dr 1 FC 00 00 .faraddr $000000fc +001860r 1 FD 00 00 .faraddr $000000fd +001863r 1 FE 00 00 .faraddr $000000fe +001866r 1 FF 00 00 .faraddr $000000ff +001869r 1 00 01 00 .faraddr $00000100 +00186Cr 1 01 01 00 .faraddr $00000101 +00186Fr 1 02 01 00 .faraddr $00000102 +001872r 1 03 01 00 .faraddr $00000103 +001875r 1 D2 0F 00 .faraddr $00000fd2 +001878r 1 D3 0F 00 .faraddr $00000fd3 +00187Br 1 D4 0F 00 .faraddr $00000fd4 +00187Er 1 D5 0F 00 .faraddr $00000fd5 +001881r 1 D6 0F 00 .faraddr $00000fd6 +001884r 1 D7 0F 00 .faraddr $00000fd7 +001887r 1 D8 0F 00 .faraddr $00000fd8 +00188Ar 1 D9 0F 00 .faraddr $00000fd9 +00188Dr 1 DA 0F 00 .faraddr $00000fda +001890r 1 DB 0F 00 .faraddr $00000fdb +001893r 1 DC 0F 00 .faraddr $00000fdc +001896r 1 DD 0F 00 .faraddr $00000fdd +001899r 1 DE 0F 00 .faraddr $00000fde +00189Cr 1 DF 0F 00 .faraddr $00000fdf +00189Fr 1 E0 0F 00 .faraddr $00000fe0 +0018A2r 1 E1 0F 00 .faraddr $00000fe1 +0018A5r 1 E2 0F 00 .faraddr $00000fe2 +0018A8r 1 E3 0F 00 .faraddr $00000fe3 +0018ABr 1 E4 0F 00 .faraddr $00000fe4 +0018AEr 1 E5 0F 00 .faraddr $00000fe5 +0018B1r 1 E6 0F 00 .faraddr $00000fe6 +0018B4r 1 E7 0F 00 .faraddr $00000fe7 +0018B7r 1 E8 0F 00 .faraddr $00000fe8 +0018BAr 1 E9 0F 00 .faraddr $00000fe9 +0018BDr 1 EA 0F 00 .faraddr $00000fea +0018C0r 1 EB 0F 00 .faraddr $00000feb +0018C3r 1 EC 0F 00 .faraddr $00000fec +0018C6r 1 ED 0F 00 .faraddr $00000fed +0018C9r 1 EE 0F 00 .faraddr $00000fee +0018CCr 1 EF 0F 00 .faraddr $00000fef +0018CFr 1 F0 0F 00 .faraddr $00000ff0 +0018D2r 1 F1 0F 00 .faraddr $00000ff1 +0018D5r 1 F2 0F 00 .faraddr $00000ff2 +0018D8r 1 F3 0F 00 .faraddr $00000ff3 +0018DBr 1 F4 0F 00 .faraddr $00000ff4 +0018DEr 1 F5 0F 00 .faraddr $00000ff5 +0018E1r 1 F6 0F 00 .faraddr $00000ff6 +0018E4r 1 F7 0F 00 .faraddr $00000ff7 +0018E7r 1 F8 0F 00 .faraddr $00000ff8 +0018EAr 1 F9 0F 00 .faraddr $00000ff9 +0018EDr 1 FA 0F 00 .faraddr $00000ffa +0018F0r 1 FB 0F 00 .faraddr $00000ffb +0018F3r 1 FC 0F 00 .faraddr $00000ffc +0018F6r 1 FD 0F 00 .faraddr $00000ffd +0018F9r 1 FE 0F 00 .faraddr $00000ffe +0018FCr 1 FF 0F 00 .faraddr $00000fff +0018FFr 1 00 10 00 .faraddr $00001000 +001902r 1 01 10 00 .faraddr $00001001 +001905r 1 02 10 00 .faraddr $00001002 +001908r 1 03 10 00 .faraddr $00001003 +00190Br 1 04 10 00 .faraddr $00001004 +00190Er 1 05 10 00 .faraddr $00001005 +001911r 1 06 10 00 .faraddr $00001006 +001914r 1 07 10 00 .faraddr $00001007 +001917r 1 08 10 00 .faraddr $00001008 +00191Ar 1 F0 7F 00 .faraddr $00007ff0 +00191Dr 1 F1 7F 00 .faraddr $00007ff1 +001920r 1 F2 7F 00 .faraddr $00007ff2 +001923r 1 F3 7F 00 .faraddr $00007ff3 +001926r 1 F4 7F 00 .faraddr $00007ff4 +001929r 1 F5 7F 00 .faraddr $00007ff5 +00192Cr 1 F6 7F 00 .faraddr $00007ff6 +00192Fr 1 F7 7F 00 .faraddr $00007ff7 +001932r 1 F8 7F 00 .faraddr $00007ff8 +001935r 1 F9 7F 00 .faraddr $00007ff9 +001938r 1 FA 7F 00 .faraddr $00007ffa +00193Br 1 FB 7F 00 .faraddr $00007ffb +00193Er 1 FC 7F 00 .faraddr $00007ffc +001941r 1 FD 7F 00 .faraddr $00007ffd +001944r 1 FE 7F 00 .faraddr $00007ffe +001947r 1 FF 7F 00 .faraddr $00007fff +00194Ar 1 00 80 00 .faraddr $00008000 +00194Dr 1 01 80 00 .faraddr $00008001 +001950r 1 02 80 00 .faraddr $00008002 +001953r 1 03 80 00 .faraddr $00008003 +001956r 1 04 80 00 .faraddr $00008004 +001959r 1 05 80 00 .faraddr $00008005 +00195Cr 1 06 80 00 .faraddr $00008006 +00195Fr 1 07 80 00 .faraddr $00008007 +001962r 1 08 80 00 .faraddr $00008008 +001965r 1 09 80 00 .faraddr $00008009 +001968r 1 0A 80 00 .faraddr $0000800a +00196Br 1 0B 80 00 .faraddr $0000800b +00196Er 1 E1 9F 00 .faraddr $00009fe1 +001971r 1 E2 9F 00 .faraddr $00009fe2 +001974r 1 E3 9F 00 .faraddr $00009fe3 +001977r 1 E4 9F 00 .faraddr $00009fe4 +00197Ar 1 E5 9F 00 .faraddr $00009fe5 +00197Dr 1 E6 9F 00 .faraddr $00009fe6 +001980r 1 E7 9F 00 .faraddr $00009fe7 +001983r 1 E8 9F 00 .faraddr $00009fe8 +001986r 1 E9 9F 00 .faraddr $00009fe9 +001989r 1 EA 9F 00 .faraddr $00009fea +00198Cr 1 EB 9F 00 .faraddr $00009feb +00198Fr 1 EC 9F 00 .faraddr $00009fec +001992r 1 ED 9F 00 .faraddr $00009fed +001995r 1 EE 9F 00 .faraddr $00009fee +001998r 1 EF 9F 00 .faraddr $00009fef +00199Br 1 F0 9F 00 .faraddr $00009ff0 +00199Er 1 F1 9F 00 .faraddr $00009ff1 +0019A1r 1 F2 9F 00 .faraddr $00009ff2 +0019A4r 1 F3 9F 00 .faraddr $00009ff3 +0019A7r 1 F4 9F 00 .faraddr $00009ff4 +0019AAr 1 F5 9F 00 .faraddr $00009ff5 +0019ADr 1 F6 9F 00 .faraddr $00009ff6 +0019B0r 1 F7 9F 00 .faraddr $00009ff7 +0019B3r 1 F8 9F 00 .faraddr $00009ff8 +0019B6r 1 F9 9F 00 .faraddr $00009ff9 +0019B9r 1 FA 9F 00 .faraddr $00009ffa +0019BCr 1 FB 9F 00 .faraddr $00009ffb +0019BFr 1 FC 9F 00 .faraddr $00009ffc +0019C2r 1 FD 9F 00 .faraddr $00009ffd +0019C5r 1 FE 9F 00 .faraddr $00009ffe +0019C8r 1 FF 9F 00 .faraddr $00009fff +0019CBr 1 00 A0 00 .faraddr $0000a000 +0019CEr 1 01 A0 00 .faraddr $0000a001 +0019D1r 1 02 A0 00 .faraddr $0000a002 +0019D4r 1 03 A0 00 .faraddr $0000a003 +0019D7r 1 04 A0 00 .faraddr $0000a004 +0019DAr 1 05 A0 00 .faraddr $0000a005 +0019DDr 1 06 A0 00 .faraddr $0000a006 +0019E0r 1 07 A0 00 .faraddr $0000a007 +0019E3r 1 08 A0 00 .faraddr $0000a008 +0019E6r 1 09 A0 00 .faraddr $0000a009 +0019E9r 1 0A A0 00 .faraddr $0000a00a +0019ECr 1 0B A0 00 .faraddr $0000a00b +0019EFr 1 0C A0 00 .faraddr $0000a00c +0019F2r 1 0D A0 00 .faraddr $0000a00d +0019F5r 1 0E A0 00 .faraddr $0000a00e +0019F8r 1 0F A0 00 .faraddr $0000a00f +0019FBr 1 E1 AF 00 .faraddr $0000afe1 +0019FEr 1 E2 AF 00 .faraddr $0000afe2 +001A01r 1 E3 AF 00 .faraddr $0000afe3 +001A04r 1 E4 AF 00 .faraddr $0000afe4 +001A07r 1 E5 AF 00 .faraddr $0000afe5 +001A0Ar 1 E6 AF 00 .faraddr $0000afe6 +001A0Dr 1 E7 AF 00 .faraddr $0000afe7 +001A10r 1 E8 AF 00 .faraddr $0000afe8 +001A13r 1 E9 AF 00 .faraddr $0000afe9 +001A16r 1 EA AF 00 .faraddr $0000afea +001A19r 1 EB AF 00 .faraddr $0000afeb +001A1Cr 1 EC AF 00 .faraddr $0000afec +001A1Fr 1 ED AF 00 .faraddr $0000afed +001A22r 1 EE AF 00 .faraddr $0000afee +001A25r 1 EF AF 00 .faraddr $0000afef +001A28r 1 F0 AF 00 .faraddr $0000aff0 +001A2Br 1 F1 AF 00 .faraddr $0000aff1 +001A2Er 1 F2 AF 00 .faraddr $0000aff2 +001A31r 1 F3 AF 00 .faraddr $0000aff3 +001A34r 1 F4 AF 00 .faraddr $0000aff4 +001A37r 1 F5 AF 00 .faraddr $0000aff5 +001A3Ar 1 F6 AF 00 .faraddr $0000aff6 +001A3Dr 1 F7 AF 00 .faraddr $0000aff7 +001A40r 1 F8 AF 00 .faraddr $0000aff8 +001A43r 1 F9 AF 00 .faraddr $0000aff9 +001A46r 1 FA AF 00 .faraddr $0000affa +001A49r 1 FB AF 00 .faraddr $0000affb +001A4Cr 1 FC AF 00 .faraddr $0000affc +001A4Fr 1 FD AF 00 .faraddr $0000affd +001A52r 1 FE AF 00 .faraddr $0000affe +001A55r 1 FF AF 00 .faraddr $0000afff +001A58r 1 00 B0 00 .faraddr $0000b000 +001A5Br 1 01 B0 00 .faraddr $0000b001 +001A5Er 1 02 B0 00 .faraddr $0000b002 +001A61r 1 03 B0 00 .faraddr $0000b003 +001A64r 1 04 B0 00 .faraddr $0000b004 +001A67r 1 05 B0 00 .faraddr $0000b005 +001A6Ar 1 06 B0 00 .faraddr $0000b006 +001A6Dr 1 07 B0 00 .faraddr $0000b007 +001A70r 1 08 B0 00 .faraddr $0000b008 +001A73r 1 09 B0 00 .faraddr $0000b009 +001A76r 1 0A B0 00 .faraddr $0000b00a +001A79r 1 0B B0 00 .faraddr $0000b00b +001A7Cr 1 0C B0 00 .faraddr $0000b00c +001A7Fr 1 0D B0 00 .faraddr $0000b00d +001A82r 1 0E B0 00 .faraddr $0000b00e +001A85r 1 0F B0 00 .faraddr $0000b00f +001A88r 1 E1 FF 00 .faraddr $0000ffe1 +001A8Br 1 E2 FF 00 .faraddr $0000ffe2 +001A8Er 1 E3 FF 00 .faraddr $0000ffe3 +001A91r 1 E4 FF 00 .faraddr $0000ffe4 +001A94r 1 E5 FF 00 .faraddr $0000ffe5 +001A97r 1 E6 FF 00 .faraddr $0000ffe6 +001A9Ar 1 E7 FF 00 .faraddr $0000ffe7 +001A9Dr 1 E8 FF 00 .faraddr $0000ffe8 +001AA0r 1 E9 FF 00 .faraddr $0000ffe9 +001AA3r 1 EA FF 00 .faraddr $0000ffea +001AA6r 1 EB FF 00 .faraddr $0000ffeb +001AA9r 1 EC FF 00 .faraddr $0000ffec +001AACr 1 ED FF 00 .faraddr $0000ffed +001AAFr 1 EE FF 00 .faraddr $0000ffee +001AB2r 1 EF FF 00 .faraddr $0000ffef +001AB5r 1 F0 FF 00 .faraddr $0000fff0 +001AB8r 1 F1 FF 00 .faraddr $0000fff1 +001ABBr 1 F2 FF 00 .faraddr $0000fff2 +001ABEr 1 F3 FF 00 .faraddr $0000fff3 +001AC1r 1 F4 FF 00 .faraddr $0000fff4 +001AC4r 1 F5 FF 00 .faraddr $0000fff5 +001AC7r 1 F6 FF 00 .faraddr $0000fff6 +001ACAr 1 F7 FF 00 .faraddr $0000fff7 +001ACDr 1 F8 FF 00 .faraddr $0000fff8 +001AD0r 1 F9 FF 00 .faraddr $0000fff9 +001AD3r 1 FA FF 00 .faraddr $0000fffa +001AD6r 1 FB FF 00 .faraddr $0000fffb +001AD9r 1 FC FF 00 .faraddr $0000fffc +001ADCr 1 FD FF 00 .faraddr $0000fffd +001ADFr 1 FE FF 00 .faraddr $0000fffe +001AE2r 1 FF FF 00 .faraddr $0000ffff +001AE5r 1 00 00 01 .faraddr $00010000 +001AE8r 1 01 00 01 .faraddr $00010001 +001AEBr 1 02 00 01 .faraddr $00010002 +001AEEr 1 03 00 01 .faraddr $00010003 +001AF1r 1 04 00 01 .faraddr $00010004 +001AF4r 1 05 00 01 .faraddr $00010005 +001AF7r 1 06 00 01 .faraddr $00010006 +001AFAr 1 07 00 01 .faraddr $00010007 +001AFDr 1 08 00 01 .faraddr $00010008 +001B00r 1 09 00 01 .faraddr $00010009 +001B03r 1 0A 00 01 .faraddr $0001000a +001B06r 1 0B 00 01 .faraddr $0001000b +001B09r 1 0C 00 01 .faraddr $0001000c +001B0Cr 1 0D 00 01 .faraddr $0001000d +001B0Fr 1 0E 00 01 .faraddr $0001000e +001B12r 1 0F 00 01 .faraddr $0001000f +001B15r 1 E1 FF 10 .faraddr $0010ffe1 +001B18r 1 E2 FF 10 .faraddr $0010ffe2 +001B1Br 1 E3 FF 10 .faraddr $0010ffe3 +001B1Er 1 E4 FF 10 .faraddr $0010ffe4 +001B21r 1 E5 FF 10 .faraddr $0010ffe5 +001B24r 1 E6 FF 10 .faraddr $0010ffe6 +001B27r 1 E7 FF 10 .faraddr $0010ffe7 +001B2Ar 1 E8 FF 10 .faraddr $0010ffe8 +001B2Dr 1 E9 FF 10 .faraddr $0010ffe9 +001B30r 1 EA FF 10 .faraddr $0010ffea +001B33r 1 EB FF 10 .faraddr $0010ffeb +001B36r 1 EC FF 10 .faraddr $0010ffec +001B39r 1 ED FF 10 .faraddr $0010ffed +001B3Cr 1 EE FF 10 .faraddr $0010ffee +001B3Fr 1 EF FF 10 .faraddr $0010ffef +001B42r 1 F0 FF 10 .faraddr $0010fff0 +001B45r 1 F1 FF 10 .faraddr $0010fff1 +001B48r 1 F2 FF 10 .faraddr $0010fff2 +001B4Br 1 F3 FF 10 .faraddr $0010fff3 +001B4Er 1 F4 FF 10 .faraddr $0010fff4 +001B51r 1 F5 FF 10 .faraddr $0010fff5 +001B54r 1 F6 FF 10 .faraddr $0010fff6 +001B57r 1 F7 FF 10 .faraddr $0010fff7 +001B5Ar 1 F8 FF 10 .faraddr $0010fff8 +001B5Dr 1 F9 FF 10 .faraddr $0010fff9 +001B60r 1 FA FF 10 .faraddr $0010fffa +001B63r 1 FB FF 10 .faraddr $0010fffb +001B66r 1 FC FF 10 .faraddr $0010fffc +001B69r 1 FD FF 10 .faraddr $0010fffd +001B6Cr 1 FE FF 10 .faraddr $0010fffe +001B6Fr 1 FF FF 10 .faraddr $0010ffff +001B72r 1 00 00 11 .faraddr $00110000 +001B75r 1 01 00 11 .faraddr $00110001 +001B78r 1 02 00 11 .faraddr $00110002 +001B7Br 1 03 00 11 .faraddr $00110003 +001B7Er 1 04 00 11 .faraddr $00110004 +001B81r 1 05 00 11 .faraddr $00110005 +001B84r 1 06 00 11 .faraddr $00110006 +001B87r 1 07 00 11 .faraddr $00110007 +001B8Ar 1 08 00 11 .faraddr $00110008 +001B8Dr 1 09 00 11 .faraddr $00110009 +001B90r 1 0A 00 11 .faraddr $0011000a +001B93r 1 0B 00 11 .faraddr $0011000b +001B96r 1 0C 00 11 .faraddr $0011000c +001B99r 1 0D 00 11 .faraddr $0011000d +001B9Cr 1 0E 00 11 .faraddr $0011000e +001B9Fr 1 0F 00 11 .faraddr $0011000f +001BA2r 1 E1 FF 20 .faraddr $0020ffe1 +001BA5r 1 E2 FF 20 .faraddr $0020ffe2 +001BA8r 1 E3 FF 20 .faraddr $0020ffe3 +001BABr 1 E4 FF 20 .faraddr $0020ffe4 +001BAEr 1 E5 FF 20 .faraddr $0020ffe5 +001BB1r 1 E6 FF 20 .faraddr $0020ffe6 +001BB4r 1 E7 FF 20 .faraddr $0020ffe7 +001BB7r 1 E8 FF 20 .faraddr $0020ffe8 +001BBAr 1 E9 FF 20 .faraddr $0020ffe9 +001BBDr 1 EA FF 20 .faraddr $0020ffea +001BC0r 1 EB FF 20 .faraddr $0020ffeb +001BC3r 1 EC FF 20 .faraddr $0020ffec +001BC6r 1 ED FF 20 .faraddr $0020ffed +001BC9r 1 EE FF 20 .faraddr $0020ffee +001BCCr 1 EF FF 20 .faraddr $0020ffef +001BCFr 1 F0 FF 20 .faraddr $0020fff0 +001BD2r 1 F1 FF 20 .faraddr $0020fff1 +001BD5r 1 F2 FF 20 .faraddr $0020fff2 +001BD8r 1 F3 FF 20 .faraddr $0020fff3 +001BDBr 1 F4 FF 20 .faraddr $0020fff4 +001BDEr 1 F5 FF 20 .faraddr $0020fff5 +001BE1r 1 F6 FF 20 .faraddr $0020fff6 +001BE4r 1 F7 FF 20 .faraddr $0020fff7 +001BE7r 1 F8 FF 20 .faraddr $0020fff8 +001BEAr 1 F9 FF 20 .faraddr $0020fff9 +001BEDr 1 FA FF 20 .faraddr $0020fffa +001BF0r 1 FB FF 20 .faraddr $0020fffb +001BF3r 1 FC FF 20 .faraddr $0020fffc +001BF6r 1 FD FF 20 .faraddr $0020fffd +001BF9r 1 FE FF 20 .faraddr $0020fffe +001BFCr 1 FF FF 20 .faraddr $0020ffff +001BFFr 1 00 00 21 .faraddr $00210000 +001C02r 1 01 00 21 .faraddr $00210001 +001C05r 1 02 00 21 .faraddr $00210002 +001C08r 1 03 00 21 .faraddr $00210003 +001C0Br 1 04 00 21 .faraddr $00210004 +001C0Er 1 05 00 21 .faraddr $00210005 +001C11r 1 06 00 21 .faraddr $00210006 +001C14r 1 07 00 21 .faraddr $00210007 +001C17r 1 08 00 21 .faraddr $00210008 +001C1Ar 1 09 00 21 .faraddr $00210009 +001C1Dr 1 0A 00 21 .faraddr $0021000a +001C20r 1 0B 00 21 .faraddr $0021000b +001C23r 1 0C 00 21 .faraddr $0021000c +001C26r 1 0D 00 21 .faraddr $0021000d +001C29r 1 0E 00 21 .faraddr $0021000e +001C2Cr 1 0F 00 21 .faraddr $0021000f +001C2Fr 1 E1 FF 7F .faraddr $007fffe1 +001C32r 1 E2 FF 7F .faraddr $007fffe2 +001C35r 1 E3 FF 7F .faraddr $007fffe3 +001C38r 1 E4 FF 7F .faraddr $007fffe4 +001C3Br 1 E5 FF 7F .faraddr $007fffe5 +001C3Er 1 E6 FF 7F .faraddr $007fffe6 +001C41r 1 E7 FF 7F .faraddr $007fffe7 +001C44r 1 E8 FF 7F .faraddr $007fffe8 +001C47r 1 E9 FF 7F .faraddr $007fffe9 +001C4Ar 1 EA FF 7F .faraddr $007fffea +001C4Dr 1 EB FF 7F .faraddr $007fffeb +001C50r 1 EC FF 7F .faraddr $007fffec +001C53r 1 ED FF 7F .faraddr $007fffed +001C56r 1 EE FF 7F .faraddr $007fffee +001C59r 1 EF FF 7F .faraddr $007fffef +001C5Cr 1 F0 FF 7F .faraddr $007ffff0 +001C5Fr 1 F1 FF 7F .faraddr $007ffff1 +001C62r 1 F2 FF 7F .faraddr $007ffff2 +001C65r 1 F3 FF 7F .faraddr $007ffff3 +001C68r 1 F4 FF 7F .faraddr $007ffff4 +001C6Br 1 F5 FF 7F .faraddr $007ffff5 +001C6Er 1 F6 FF 7F .faraddr $007ffff6 +001C71r 1 F7 FF 7F .faraddr $007ffff7 +001C74r 1 F8 FF 7F .faraddr $007ffff8 +001C77r 1 F9 FF 7F .faraddr $007ffff9 +001C7Ar 1 FA FF 7F .faraddr $007ffffa +001C7Dr 1 FB FF 7F .faraddr $007ffffb +001C80r 1 FC FF 7F .faraddr $007ffffc +001C83r 1 FD FF 7F .faraddr $007ffffd +001C86r 1 FE FF 7F .faraddr $007ffffe +001C89r 1 FF FF 7F .faraddr $007fffff +001C8Cr 1 00 00 80 .faraddr $00800000 +001C8Fr 1 01 00 80 .faraddr $00800001 +001C92r 1 02 00 80 .faraddr $00800002 +001C95r 1 03 00 80 .faraddr $00800003 +001C98r 1 04 00 80 .faraddr $00800004 +001C9Br 1 05 00 80 .faraddr $00800005 +001C9Er 1 06 00 80 .faraddr $00800006 +001CA1r 1 07 00 80 .faraddr $00800007 +001CA4r 1 08 00 80 .faraddr $00800008 +001CA7r 1 09 00 80 .faraddr $00800009 +001CAAr 1 0A 00 80 .faraddr $0080000a +001CADr 1 0B 00 80 .faraddr $0080000b +001CB0r 1 0C 00 80 .faraddr $0080000c +001CB3r 1 0D 00 80 .faraddr $0080000d +001CB6r 1 0E 00 80 .faraddr $0080000e +001CB9r 1 0F 00 80 .faraddr $0080000f +001CBCr 1 E1 FF 9F .faraddr $009fffe1 +001CBFr 1 E2 FF 9F .faraddr $009fffe2 +001CC2r 1 E3 FF 9F .faraddr $009fffe3 +001CC5r 1 E4 FF 9F .faraddr $009fffe4 +001CC8r 1 E5 FF 9F .faraddr $009fffe5 +001CCBr 1 E6 FF 9F .faraddr $009fffe6 +001CCEr 1 E7 FF 9F .faraddr $009fffe7 +001CD1r 1 E8 FF 9F .faraddr $009fffe8 +001CD4r 1 E9 FF 9F .faraddr $009fffe9 +001CD7r 1 EA FF 9F .faraddr $009fffea +001CDAr 1 EB FF 9F .faraddr $009fffeb +001CDDr 1 EC FF 9F .faraddr $009fffec +001CE0r 1 ED FF 9F .faraddr $009fffed +001CE3r 1 EE FF 9F .faraddr $009fffee +001CE6r 1 EF FF 9F .faraddr $009fffef +001CE9r 1 F0 FF 9F .faraddr $009ffff0 +001CECr 1 F1 FF 9F .faraddr $009ffff1 +001CEFr 1 F2 FF 9F .faraddr $009ffff2 +001CF2r 1 F3 FF 9F .faraddr $009ffff3 +001CF5r 1 F4 FF 9F .faraddr $009ffff4 +001CF8r 1 F5 FF 9F .faraddr $009ffff5 +001CFBr 1 F6 FF 9F .faraddr $009ffff6 +001CFEr 1 F7 FF 9F .faraddr $009ffff7 +001D01r 1 F8 FF 9F .faraddr $009ffff8 +001D04r 1 F9 FF 9F .faraddr $009ffff9 +001D07r 1 FA FF 9F .faraddr $009ffffa +001D0Ar 1 FB FF 9F .faraddr $009ffffb +001D0Dr 1 FC FF 9F .faraddr $009ffffc +001D10r 1 FD FF 9F .faraddr $009ffffd +001D13r 1 FE FF 9F .faraddr $009ffffe +001D16r 1 FF FF 9F .faraddr $009fffff +001D19r 1 00 00 A0 .faraddr $00a00000 +001D1Cr 1 01 00 A0 .faraddr $00a00001 +001D1Fr 1 02 00 A0 .faraddr $00a00002 +001D22r 1 03 00 A0 .faraddr $00a00003 +001D25r 1 04 00 A0 .faraddr $00a00004 +001D28r 1 05 00 A0 .faraddr $00a00005 +001D2Br 1 06 00 A0 .faraddr $00a00006 +001D2Er 1 07 00 A0 .faraddr $00a00007 +001D31r 1 08 00 A0 .faraddr $00a00008 +001D34r 1 09 00 A0 .faraddr $00a00009 +001D37r 1 0A 00 A0 .faraddr $00a0000a +001D3Ar 1 0B 00 A0 .faraddr $00a0000b +001D3Dr 1 0C 00 A0 .faraddr $00a0000c +001D40r 1 0D 00 A0 .faraddr $00a0000d +001D43r 1 0E 00 A0 .faraddr $00a0000e +001D46r 1 0F 00 A0 .faraddr $00a0000f +001D49r 1 E1 FF FF .faraddr $00ffffe1 +001D4Cr 1 E2 FF FF .faraddr $00ffffe2 +001D4Fr 1 E3 FF FF .faraddr $00ffffe3 +001D52r 1 E4 FF FF .faraddr $00ffffe4 +001D55r 1 E5 FF FF .faraddr $00ffffe5 +001D58r 1 E6 FF FF .faraddr $00ffffe6 +001D5Br 1 E7 FF FF .faraddr $00ffffe7 +001D5Er 1 E8 FF FF .faraddr $00ffffe8 +001D61r 1 E9 FF FF .faraddr $00ffffe9 +001D64r 1 EA FF FF .faraddr $00ffffea +001D67r 1 EB FF FF .faraddr $00ffffeb +001D6Ar 1 EC FF FF .faraddr $00ffffec +001D6Dr 1 ED FF FF .faraddr $00ffffed +001D70r 1 EE FF FF .faraddr $00ffffee +001D73r 1 EF FF FF .faraddr $00ffffef +001D76r 1 F0 FF FF .faraddr $00fffff0 +001D79r 1 F1 FF FF .faraddr $00fffff1 +001D7Cr 1 F2 FF FF .faraddr $00fffff2 +001D7Fr 1 F3 FF FF .faraddr $00fffff3 +001D82r 1 F4 FF FF .faraddr $00fffff4 +001D85r 1 F5 FF FF .faraddr $00fffff5 +001D88r 1 F6 FF FF .faraddr $00fffff6 +001D8Br 1 F7 FF FF .faraddr $00fffff7 +001D8Er 1 F8 FF FF .faraddr $00fffff8 +001D91r 1 F9 FF FF .faraddr $00fffff9 +001D94r 1 FA FF FF .faraddr $00fffffa +001D97r 1 FB FF FF .faraddr $00fffffb +001D9Ar 1 FC FF FF .faraddr $00fffffc +001D9Dr 1 FD FF FF .faraddr $00fffffd +001DA0r 1 FE FF FF .faraddr $00fffffe +001DA3r 1 FF FF FF .faraddr $00ffffff +001DA6r 1 +001DA6r 1 ; 8-digit hex values, uppercase +001DA6r 1 00 00 00 .faraddr $00000000 +001DA9r 1 01 00 00 .faraddr $00000001 +001DACr 1 02 00 00 .faraddr $00000002 +001DAFr 1 03 00 00 .faraddr $00000003 +001DB2r 1 04 00 00 .faraddr $00000004 +001DB5r 1 05 00 00 .faraddr $00000005 +001DB8r 1 06 00 00 .faraddr $00000006 +001DBBr 1 07 00 00 .faraddr $00000007 +001DBEr 1 08 00 00 .faraddr $00000008 +001DC1r 1 09 00 00 .faraddr $00000009 +001DC4r 1 0A 00 00 .faraddr $0000000A +001DC7r 1 0B 00 00 .faraddr $0000000B +001DCAr 1 0C 00 00 .faraddr $0000000C +001DCDr 1 0D 00 00 .faraddr $0000000D +001DD0r 1 0E 00 00 .faraddr $0000000E +001DD3r 1 0F 00 00 .faraddr $0000000F +001DD6r 1 10 00 00 .faraddr $00000010 +001DD9r 1 11 00 00 .faraddr $00000011 +001DDCr 1 12 00 00 .faraddr $00000012 +001DDFr 1 13 00 00 .faraddr $00000013 +001DE2r 1 70 00 00 .faraddr $00000070 +001DE5r 1 71 00 00 .faraddr $00000071 +001DE8r 1 72 00 00 .faraddr $00000072 +001DEBr 1 73 00 00 .faraddr $00000073 +001DEEr 1 74 00 00 .faraddr $00000074 +001DF1r 1 75 00 00 .faraddr $00000075 +001DF4r 1 76 00 00 .faraddr $00000076 +001DF7r 1 77 00 00 .faraddr $00000077 +001DFAr 1 78 00 00 .faraddr $00000078 +001DFDr 1 79 00 00 .faraddr $00000079 +001E00r 1 7A 00 00 .faraddr $0000007A +001E03r 1 7B 00 00 .faraddr $0000007B +001E06r 1 7C 00 00 .faraddr $0000007C +001E09r 1 7D 00 00 .faraddr $0000007D +001E0Cr 1 7E 00 00 .faraddr $0000007E +001E0Fr 1 7F 00 00 .faraddr $0000007F +001E12r 1 80 00 00 .faraddr $00000080 +001E15r 1 81 00 00 .faraddr $00000081 +001E18r 1 82 00 00 .faraddr $00000082 +001E1Br 1 83 00 00 .faraddr $00000083 +001E1Er 1 84 00 00 .faraddr $00000084 +001E21r 1 85 00 00 .faraddr $00000085 +001E24r 1 86 00 00 .faraddr $00000086 +001E27r 1 F0 00 00 .faraddr $000000F0 +001E2Ar 1 F1 00 00 .faraddr $000000F1 +001E2Dr 1 F2 00 00 .faraddr $000000F2 +001E30r 1 F3 00 00 .faraddr $000000F3 +001E33r 1 F4 00 00 .faraddr $000000F4 +001E36r 1 F5 00 00 .faraddr $000000F5 +001E39r 1 F6 00 00 .faraddr $000000F6 +001E3Cr 1 F7 00 00 .faraddr $000000F7 +001E3Fr 1 F8 00 00 .faraddr $000000F8 +001E42r 1 F9 00 00 .faraddr $000000F9 +001E45r 1 FA 00 00 .faraddr $000000FA +001E48r 1 FB 00 00 .faraddr $000000FB +001E4Br 1 FC 00 00 .faraddr $000000FC +001E4Er 1 FD 00 00 .faraddr $000000FD +001E51r 1 FE 00 00 .faraddr $000000FE +001E54r 1 FF 00 00 .faraddr $000000FF +001E57r 1 00 01 00 .faraddr $00000100 +001E5Ar 1 01 01 00 .faraddr $00000101 +001E5Dr 1 02 01 00 .faraddr $00000102 +001E60r 1 03 01 00 .faraddr $00000103 +001E63r 1 D2 0F 00 .faraddr $00000FD2 +001E66r 1 D3 0F 00 .faraddr $00000FD3 +001E69r 1 D4 0F 00 .faraddr $00000FD4 +001E6Cr 1 D5 0F 00 .faraddr $00000FD5 +001E6Fr 1 D6 0F 00 .faraddr $00000FD6 +001E72r 1 D7 0F 00 .faraddr $00000FD7 +001E75r 1 D8 0F 00 .faraddr $00000FD8 +001E78r 1 D9 0F 00 .faraddr $00000FD9 +001E7Br 1 DA 0F 00 .faraddr $00000FDA +001E7Er 1 DB 0F 00 .faraddr $00000FDB +001E81r 1 DC 0F 00 .faraddr $00000FDC +001E84r 1 DD 0F 00 .faraddr $00000FDD +001E87r 1 DE 0F 00 .faraddr $00000FDE +001E8Ar 1 DF 0F 00 .faraddr $00000FDF +001E8Dr 1 E0 0F 00 .faraddr $00000FE0 +001E90r 1 E1 0F 00 .faraddr $00000FE1 +001E93r 1 E2 0F 00 .faraddr $00000FE2 +001E96r 1 E3 0F 00 .faraddr $00000FE3 +001E99r 1 E4 0F 00 .faraddr $00000FE4 +001E9Cr 1 E5 0F 00 .faraddr $00000FE5 +001E9Fr 1 E6 0F 00 .faraddr $00000FE6 +001EA2r 1 E7 0F 00 .faraddr $00000FE7 +001EA5r 1 E8 0F 00 .faraddr $00000FE8 +001EA8r 1 E9 0F 00 .faraddr $00000FE9 +001EABr 1 EA 0F 00 .faraddr $00000FEA +001EAEr 1 EB 0F 00 .faraddr $00000FEB +001EB1r 1 EC 0F 00 .faraddr $00000FEC +001EB4r 1 ED 0F 00 .faraddr $00000FED +001EB7r 1 EE 0F 00 .faraddr $00000FEE +001EBAr 1 EF 0F 00 .faraddr $00000FEF +001EBDr 1 F0 0F 00 .faraddr $00000FF0 +001EC0r 1 F1 0F 00 .faraddr $00000FF1 +001EC3r 1 F2 0F 00 .faraddr $00000FF2 +001EC6r 1 F3 0F 00 .faraddr $00000FF3 +001EC9r 1 F4 0F 00 .faraddr $00000FF4 +001ECCr 1 F5 0F 00 .faraddr $00000FF5 +001ECFr 1 F6 0F 00 .faraddr $00000FF6 +001ED2r 1 F7 0F 00 .faraddr $00000FF7 +001ED5r 1 F8 0F 00 .faraddr $00000FF8 +001ED8r 1 F9 0F 00 .faraddr $00000FF9 +001EDBr 1 FA 0F 00 .faraddr $00000FFA +001EDEr 1 FB 0F 00 .faraddr $00000FFB +001EE1r 1 FC 0F 00 .faraddr $00000FFC +001EE4r 1 FD 0F 00 .faraddr $00000FFD +001EE7r 1 FE 0F 00 .faraddr $00000FFE +001EEAr 1 FF 0F 00 .faraddr $00000FFF +001EEDr 1 00 10 00 .faraddr $00001000 +001EF0r 1 01 10 00 .faraddr $00001001 +001EF3r 1 02 10 00 .faraddr $00001002 +001EF6r 1 03 10 00 .faraddr $00001003 +001EF9r 1 04 10 00 .faraddr $00001004 +001EFCr 1 05 10 00 .faraddr $00001005 +001EFFr 1 06 10 00 .faraddr $00001006 +001F02r 1 07 10 00 .faraddr $00001007 +001F05r 1 08 10 00 .faraddr $00001008 +001F08r 1 F0 7F 00 .faraddr $00007FF0 +001F0Br 1 F1 7F 00 .faraddr $00007FF1 +001F0Er 1 F2 7F 00 .faraddr $00007FF2 +001F11r 1 F3 7F 00 .faraddr $00007FF3 +001F14r 1 F4 7F 00 .faraddr $00007FF4 +001F17r 1 F5 7F 00 .faraddr $00007FF5 +001F1Ar 1 F6 7F 00 .faraddr $00007FF6 +001F1Dr 1 F7 7F 00 .faraddr $00007FF7 +001F20r 1 F8 7F 00 .faraddr $00007FF8 +001F23r 1 F9 7F 00 .faraddr $00007FF9 +001F26r 1 FA 7F 00 .faraddr $00007FFA +001F29r 1 FB 7F 00 .faraddr $00007FFB +001F2Cr 1 FC 7F 00 .faraddr $00007FFC +001F2Fr 1 FD 7F 00 .faraddr $00007FFD +001F32r 1 FE 7F 00 .faraddr $00007FFE +001F35r 1 FF 7F 00 .faraddr $00007FFF +001F38r 1 00 80 00 .faraddr $00008000 +001F3Br 1 01 80 00 .faraddr $00008001 +001F3Er 1 02 80 00 .faraddr $00008002 +001F41r 1 03 80 00 .faraddr $00008003 +001F44r 1 04 80 00 .faraddr $00008004 +001F47r 1 05 80 00 .faraddr $00008005 +001F4Ar 1 06 80 00 .faraddr $00008006 +001F4Dr 1 07 80 00 .faraddr $00008007 +001F50r 1 08 80 00 .faraddr $00008008 +001F53r 1 09 80 00 .faraddr $00008009 +001F56r 1 0A 80 00 .faraddr $0000800A +001F59r 1 0B 80 00 .faraddr $0000800B +001F5Cr 1 E1 9F 00 .faraddr $00009FE1 +001F5Fr 1 E2 9F 00 .faraddr $00009FE2 +001F62r 1 E3 9F 00 .faraddr $00009FE3 +001F65r 1 E4 9F 00 .faraddr $00009FE4 +001F68r 1 E5 9F 00 .faraddr $00009FE5 +001F6Br 1 E6 9F 00 .faraddr $00009FE6 +001F6Er 1 E7 9F 00 .faraddr $00009FE7 +001F71r 1 E8 9F 00 .faraddr $00009FE8 +001F74r 1 E9 9F 00 .faraddr $00009FE9 +001F77r 1 EA 9F 00 .faraddr $00009FEA +001F7Ar 1 EB 9F 00 .faraddr $00009FEB +001F7Dr 1 EC 9F 00 .faraddr $00009FEC +001F80r 1 ED 9F 00 .faraddr $00009FED +001F83r 1 EE 9F 00 .faraddr $00009FEE +001F86r 1 EF 9F 00 .faraddr $00009FEF +001F89r 1 F0 9F 00 .faraddr $00009FF0 +001F8Cr 1 F1 9F 00 .faraddr $00009FF1 +001F8Fr 1 F2 9F 00 .faraddr $00009FF2 +001F92r 1 F3 9F 00 .faraddr $00009FF3 +001F95r 1 F4 9F 00 .faraddr $00009FF4 +001F98r 1 F5 9F 00 .faraddr $00009FF5 +001F9Br 1 F6 9F 00 .faraddr $00009FF6 +001F9Er 1 F7 9F 00 .faraddr $00009FF7 +001FA1r 1 F8 9F 00 .faraddr $00009FF8 +001FA4r 1 F9 9F 00 .faraddr $00009FF9 +001FA7r 1 FA 9F 00 .faraddr $00009FFA +001FAAr 1 FB 9F 00 .faraddr $00009FFB +001FADr 1 FC 9F 00 .faraddr $00009FFC +001FB0r 1 FD 9F 00 .faraddr $00009FFD +001FB3r 1 FE 9F 00 .faraddr $00009FFE +001FB6r 1 FF 9F 00 .faraddr $00009FFF +001FB9r 1 00 A0 00 .faraddr $0000A000 +001FBCr 1 01 A0 00 .faraddr $0000A001 +001FBFr 1 02 A0 00 .faraddr $0000A002 +001FC2r 1 03 A0 00 .faraddr $0000A003 +001FC5r 1 04 A0 00 .faraddr $0000A004 +001FC8r 1 05 A0 00 .faraddr $0000A005 +001FCBr 1 06 A0 00 .faraddr $0000A006 +001FCEr 1 07 A0 00 .faraddr $0000A007 +001FD1r 1 08 A0 00 .faraddr $0000A008 +001FD4r 1 09 A0 00 .faraddr $0000A009 +001FD7r 1 0A A0 00 .faraddr $0000A00A +001FDAr 1 0B A0 00 .faraddr $0000A00B +001FDDr 1 0C A0 00 .faraddr $0000A00C +001FE0r 1 0D A0 00 .faraddr $0000A00D +001FE3r 1 0E A0 00 .faraddr $0000A00E +001FE6r 1 0F A0 00 .faraddr $0000A00F +001FE9r 1 E1 AF 00 .faraddr $0000AFE1 +001FECr 1 E2 AF 00 .faraddr $0000AFE2 +001FEFr 1 E3 AF 00 .faraddr $0000AFE3 +001FF2r 1 E4 AF 00 .faraddr $0000AFE4 +001FF5r 1 E5 AF 00 .faraddr $0000AFE5 +001FF8r 1 E6 AF 00 .faraddr $0000AFE6 +001FFBr 1 E7 AF 00 .faraddr $0000AFE7 +001FFEr 1 E8 AF 00 .faraddr $0000AFE8 +002001r 1 E9 AF 00 .faraddr $0000AFE9 +002004r 1 EA AF 00 .faraddr $0000AFEA +002007r 1 EB AF 00 .faraddr $0000AFEB +00200Ar 1 EC AF 00 .faraddr $0000AFEC +00200Dr 1 ED AF 00 .faraddr $0000AFED +002010r 1 EE AF 00 .faraddr $0000AFEE +002013r 1 EF AF 00 .faraddr $0000AFEF +002016r 1 F0 AF 00 .faraddr $0000AFF0 +002019r 1 F1 AF 00 .faraddr $0000AFF1 +00201Cr 1 F2 AF 00 .faraddr $0000AFF2 +00201Fr 1 F3 AF 00 .faraddr $0000AFF3 +002022r 1 F4 AF 00 .faraddr $0000AFF4 +002025r 1 F5 AF 00 .faraddr $0000AFF5 +002028r 1 F6 AF 00 .faraddr $0000AFF6 +00202Br 1 F7 AF 00 .faraddr $0000AFF7 +00202Er 1 F8 AF 00 .faraddr $0000AFF8 +002031r 1 F9 AF 00 .faraddr $0000AFF9 +002034r 1 FA AF 00 .faraddr $0000AFFA +002037r 1 FB AF 00 .faraddr $0000AFFB +00203Ar 1 FC AF 00 .faraddr $0000AFFC +00203Dr 1 FD AF 00 .faraddr $0000AFFD +002040r 1 FE AF 00 .faraddr $0000AFFE +002043r 1 FF AF 00 .faraddr $0000AFFF +002046r 1 00 B0 00 .faraddr $0000B000 +002049r 1 01 B0 00 .faraddr $0000B001 +00204Cr 1 02 B0 00 .faraddr $0000B002 +00204Fr 1 03 B0 00 .faraddr $0000B003 +002052r 1 04 B0 00 .faraddr $0000B004 +002055r 1 05 B0 00 .faraddr $0000B005 +002058r 1 06 B0 00 .faraddr $0000B006 +00205Br 1 07 B0 00 .faraddr $0000B007 +00205Er 1 08 B0 00 .faraddr $0000B008 +002061r 1 09 B0 00 .faraddr $0000B009 +002064r 1 0A B0 00 .faraddr $0000B00A +002067r 1 0B B0 00 .faraddr $0000B00B +00206Ar 1 0C B0 00 .faraddr $0000B00C +00206Dr 1 0D B0 00 .faraddr $0000B00D +002070r 1 0E B0 00 .faraddr $0000B00E +002073r 1 0F B0 00 .faraddr $0000B00F +002076r 1 E1 FF 00 .faraddr $0000FFE1 +002079r 1 E2 FF 00 .faraddr $0000FFE2 +00207Cr 1 E3 FF 00 .faraddr $0000FFE3 +00207Fr 1 E4 FF 00 .faraddr $0000FFE4 +002082r 1 E5 FF 00 .faraddr $0000FFE5 +002085r 1 E6 FF 00 .faraddr $0000FFE6 +002088r 1 E7 FF 00 .faraddr $0000FFE7 +00208Br 1 E8 FF 00 .faraddr $0000FFE8 +00208Er 1 E9 FF 00 .faraddr $0000FFE9 +002091r 1 EA FF 00 .faraddr $0000FFEA +002094r 1 EB FF 00 .faraddr $0000FFEB +002097r 1 EC FF 00 .faraddr $0000FFEC +00209Ar 1 ED FF 00 .faraddr $0000FFED +00209Dr 1 EE FF 00 .faraddr $0000FFEE +0020A0r 1 EF FF 00 .faraddr $0000FFEF +0020A3r 1 F0 FF 00 .faraddr $0000FFF0 +0020A6r 1 F1 FF 00 .faraddr $0000FFF1 +0020A9r 1 F2 FF 00 .faraddr $0000FFF2 +0020ACr 1 F3 FF 00 .faraddr $0000FFF3 +0020AFr 1 F4 FF 00 .faraddr $0000FFF4 +0020B2r 1 F5 FF 00 .faraddr $0000FFF5 +0020B5r 1 F6 FF 00 .faraddr $0000FFF6 +0020B8r 1 F7 FF 00 .faraddr $0000FFF7 +0020BBr 1 F8 FF 00 .faraddr $0000FFF8 +0020BEr 1 F9 FF 00 .faraddr $0000FFF9 +0020C1r 1 FA FF 00 .faraddr $0000FFFA +0020C4r 1 FB FF 00 .faraddr $0000FFFB +0020C7r 1 FC FF 00 .faraddr $0000FFFC +0020CAr 1 FD FF 00 .faraddr $0000FFFD +0020CDr 1 FE FF 00 .faraddr $0000FFFE +0020D0r 1 FF FF 00 .faraddr $0000FFFF +0020D3r 1 00 00 01 .faraddr $00010000 +0020D6r 1 01 00 01 .faraddr $00010001 +0020D9r 1 02 00 01 .faraddr $00010002 +0020DCr 1 03 00 01 .faraddr $00010003 +0020DFr 1 04 00 01 .faraddr $00010004 +0020E2r 1 05 00 01 .faraddr $00010005 +0020E5r 1 06 00 01 .faraddr $00010006 +0020E8r 1 07 00 01 .faraddr $00010007 +0020EBr 1 08 00 01 .faraddr $00010008 +0020EEr 1 09 00 01 .faraddr $00010009 +0020F1r 1 0A 00 01 .faraddr $0001000A +0020F4r 1 0B 00 01 .faraddr $0001000B +0020F7r 1 0C 00 01 .faraddr $0001000C +0020FAr 1 0D 00 01 .faraddr $0001000D +0020FDr 1 0E 00 01 .faraddr $0001000E +002100r 1 0F 00 01 .faraddr $0001000F +002103r 1 E1 FF 10 .faraddr $0010FFE1 +002106r 1 E2 FF 10 .faraddr $0010FFE2 +002109r 1 E3 FF 10 .faraddr $0010FFE3 +00210Cr 1 E4 FF 10 .faraddr $0010FFE4 +00210Fr 1 E5 FF 10 .faraddr $0010FFE5 +002112r 1 E6 FF 10 .faraddr $0010FFE6 +002115r 1 E7 FF 10 .faraddr $0010FFE7 +002118r 1 E8 FF 10 .faraddr $0010FFE8 +00211Br 1 E9 FF 10 .faraddr $0010FFE9 +00211Er 1 EA FF 10 .faraddr $0010FFEA +002121r 1 EB FF 10 .faraddr $0010FFEB +002124r 1 EC FF 10 .faraddr $0010FFEC +002127r 1 ED FF 10 .faraddr $0010FFED +00212Ar 1 EE FF 10 .faraddr $0010FFEE +00212Dr 1 EF FF 10 .faraddr $0010FFEF +002130r 1 F0 FF 10 .faraddr $0010FFF0 +002133r 1 F1 FF 10 .faraddr $0010FFF1 +002136r 1 F2 FF 10 .faraddr $0010FFF2 +002139r 1 F3 FF 10 .faraddr $0010FFF3 +00213Cr 1 F4 FF 10 .faraddr $0010FFF4 +00213Fr 1 F5 FF 10 .faraddr $0010FFF5 +002142r 1 F6 FF 10 .faraddr $0010FFF6 +002145r 1 F7 FF 10 .faraddr $0010FFF7 +002148r 1 F8 FF 10 .faraddr $0010FFF8 +00214Br 1 F9 FF 10 .faraddr $0010FFF9 +00214Er 1 FA FF 10 .faraddr $0010FFFA +002151r 1 FB FF 10 .faraddr $0010FFFB +002154r 1 FC FF 10 .faraddr $0010FFFC +002157r 1 FD FF 10 .faraddr $0010FFFD +00215Ar 1 FE FF 10 .faraddr $0010FFFE +00215Dr 1 FF FF 10 .faraddr $0010FFFF +002160r 1 00 00 11 .faraddr $00110000 +002163r 1 01 00 11 .faraddr $00110001 +002166r 1 02 00 11 .faraddr $00110002 +002169r 1 03 00 11 .faraddr $00110003 +00216Cr 1 04 00 11 .faraddr $00110004 +00216Fr 1 05 00 11 .faraddr $00110005 +002172r 1 06 00 11 .faraddr $00110006 +002175r 1 07 00 11 .faraddr $00110007 +002178r 1 08 00 11 .faraddr $00110008 +00217Br 1 09 00 11 .faraddr $00110009 +00217Er 1 0A 00 11 .faraddr $0011000A +002181r 1 0B 00 11 .faraddr $0011000B +002184r 1 0C 00 11 .faraddr $0011000C +002187r 1 0D 00 11 .faraddr $0011000D +00218Ar 1 0E 00 11 .faraddr $0011000E +00218Dr 1 0F 00 11 .faraddr $0011000F +002190r 1 E1 FF 20 .faraddr $0020FFE1 +002193r 1 E2 FF 20 .faraddr $0020FFE2 +002196r 1 E3 FF 20 .faraddr $0020FFE3 +002199r 1 E4 FF 20 .faraddr $0020FFE4 +00219Cr 1 E5 FF 20 .faraddr $0020FFE5 +00219Fr 1 E6 FF 20 .faraddr $0020FFE6 +0021A2r 1 E7 FF 20 .faraddr $0020FFE7 +0021A5r 1 E8 FF 20 .faraddr $0020FFE8 +0021A8r 1 E9 FF 20 .faraddr $0020FFE9 +0021ABr 1 EA FF 20 .faraddr $0020FFEA +0021AEr 1 EB FF 20 .faraddr $0020FFEB +0021B1r 1 EC FF 20 .faraddr $0020FFEC +0021B4r 1 ED FF 20 .faraddr $0020FFED +0021B7r 1 EE FF 20 .faraddr $0020FFEE +0021BAr 1 EF FF 20 .faraddr $0020FFEF +0021BDr 1 F0 FF 20 .faraddr $0020FFF0 +0021C0r 1 F1 FF 20 .faraddr $0020FFF1 +0021C3r 1 F2 FF 20 .faraddr $0020FFF2 +0021C6r 1 F3 FF 20 .faraddr $0020FFF3 +0021C9r 1 F4 FF 20 .faraddr $0020FFF4 +0021CCr 1 F5 FF 20 .faraddr $0020FFF5 +0021CFr 1 F6 FF 20 .faraddr $0020FFF6 +0021D2r 1 F7 FF 20 .faraddr $0020FFF7 +0021D5r 1 F8 FF 20 .faraddr $0020FFF8 +0021D8r 1 F9 FF 20 .faraddr $0020FFF9 +0021DBr 1 FA FF 20 .faraddr $0020FFFA +0021DEr 1 FB FF 20 .faraddr $0020FFFB +0021E1r 1 FC FF 20 .faraddr $0020FFFC +0021E4r 1 FD FF 20 .faraddr $0020FFFD +0021E7r 1 FE FF 20 .faraddr $0020FFFE +0021EAr 1 FF FF 20 .faraddr $0020FFFF +0021EDr 1 00 00 21 .faraddr $00210000 +0021F0r 1 01 00 21 .faraddr $00210001 +0021F3r 1 02 00 21 .faraddr $00210002 +0021F6r 1 03 00 21 .faraddr $00210003 +0021F9r 1 04 00 21 .faraddr $00210004 +0021FCr 1 05 00 21 .faraddr $00210005 +0021FFr 1 06 00 21 .faraddr $00210006 +002202r 1 07 00 21 .faraddr $00210007 +002205r 1 08 00 21 .faraddr $00210008 +002208r 1 09 00 21 .faraddr $00210009 +00220Br 1 0A 00 21 .faraddr $0021000A +00220Er 1 0B 00 21 .faraddr $0021000B +002211r 1 0C 00 21 .faraddr $0021000C +002214r 1 0D 00 21 .faraddr $0021000D +002217r 1 0E 00 21 .faraddr $0021000E +00221Ar 1 0F 00 21 .faraddr $0021000F +00221Dr 1 E1 FF 7F .faraddr $007FFFE1 +002220r 1 E2 FF 7F .faraddr $007FFFE2 +002223r 1 E3 FF 7F .faraddr $007FFFE3 +002226r 1 E4 FF 7F .faraddr $007FFFE4 +002229r 1 E5 FF 7F .faraddr $007FFFE5 +00222Cr 1 E6 FF 7F .faraddr $007FFFE6 +00222Fr 1 E7 FF 7F .faraddr $007FFFE7 +002232r 1 E8 FF 7F .faraddr $007FFFE8 +002235r 1 E9 FF 7F .faraddr $007FFFE9 +002238r 1 EA FF 7F .faraddr $007FFFEA +00223Br 1 EB FF 7F .faraddr $007FFFEB +00223Er 1 EC FF 7F .faraddr $007FFFEC +002241r 1 ED FF 7F .faraddr $007FFFED +002244r 1 EE FF 7F .faraddr $007FFFEE +002247r 1 EF FF 7F .faraddr $007FFFEF +00224Ar 1 F0 FF 7F .faraddr $007FFFF0 +00224Dr 1 F1 FF 7F .faraddr $007FFFF1 +002250r 1 F2 FF 7F .faraddr $007FFFF2 +002253r 1 F3 FF 7F .faraddr $007FFFF3 +002256r 1 F4 FF 7F .faraddr $007FFFF4 +002259r 1 F5 FF 7F .faraddr $007FFFF5 +00225Cr 1 F6 FF 7F .faraddr $007FFFF6 +00225Fr 1 F7 FF 7F .faraddr $007FFFF7 +002262r 1 F8 FF 7F .faraddr $007FFFF8 +002265r 1 F9 FF 7F .faraddr $007FFFF9 +002268r 1 FA FF 7F .faraddr $007FFFFA +00226Br 1 FB FF 7F .faraddr $007FFFFB +00226Er 1 FC FF 7F .faraddr $007FFFFC +002271r 1 FD FF 7F .faraddr $007FFFFD +002274r 1 FE FF 7F .faraddr $007FFFFE +002277r 1 FF FF 7F .faraddr $007FFFFF +00227Ar 1 00 00 80 .faraddr $00800000 +00227Dr 1 01 00 80 .faraddr $00800001 +002280r 1 02 00 80 .faraddr $00800002 +002283r 1 03 00 80 .faraddr $00800003 +002286r 1 04 00 80 .faraddr $00800004 +002289r 1 05 00 80 .faraddr $00800005 +00228Cr 1 06 00 80 .faraddr $00800006 +00228Fr 1 07 00 80 .faraddr $00800007 +002292r 1 08 00 80 .faraddr $00800008 +002295r 1 09 00 80 .faraddr $00800009 +002298r 1 0A 00 80 .faraddr $0080000A +00229Br 1 0B 00 80 .faraddr $0080000B +00229Er 1 0C 00 80 .faraddr $0080000C +0022A1r 1 0D 00 80 .faraddr $0080000D +0022A4r 1 0E 00 80 .faraddr $0080000E +0022A7r 1 0F 00 80 .faraddr $0080000F +0022AAr 1 E1 FF 9F .faraddr $009FFFE1 +0022ADr 1 E2 FF 9F .faraddr $009FFFE2 +0022B0r 1 E3 FF 9F .faraddr $009FFFE3 +0022B3r 1 E4 FF 9F .faraddr $009FFFE4 +0022B6r 1 E5 FF 9F .faraddr $009FFFE5 +0022B9r 1 E6 FF 9F .faraddr $009FFFE6 +0022BCr 1 E7 FF 9F .faraddr $009FFFE7 +0022BFr 1 E8 FF 9F .faraddr $009FFFE8 +0022C2r 1 E9 FF 9F .faraddr $009FFFE9 +0022C5r 1 EA FF 9F .faraddr $009FFFEA +0022C8r 1 EB FF 9F .faraddr $009FFFEB +0022CBr 1 EC FF 9F .faraddr $009FFFEC +0022CEr 1 ED FF 9F .faraddr $009FFFED +0022D1r 1 EE FF 9F .faraddr $009FFFEE +0022D4r 1 EF FF 9F .faraddr $009FFFEF +0022D7r 1 F0 FF 9F .faraddr $009FFFF0 +0022DAr 1 F1 FF 9F .faraddr $009FFFF1 +0022DDr 1 F2 FF 9F .faraddr $009FFFF2 +0022E0r 1 F3 FF 9F .faraddr $009FFFF3 +0022E3r 1 F4 FF 9F .faraddr $009FFFF4 +0022E6r 1 F5 FF 9F .faraddr $009FFFF5 +0022E9r 1 F6 FF 9F .faraddr $009FFFF6 +0022ECr 1 F7 FF 9F .faraddr $009FFFF7 +0022EFr 1 F8 FF 9F .faraddr $009FFFF8 +0022F2r 1 F9 FF 9F .faraddr $009FFFF9 +0022F5r 1 FA FF 9F .faraddr $009FFFFA +0022F8r 1 FB FF 9F .faraddr $009FFFFB +0022FBr 1 FC FF 9F .faraddr $009FFFFC +0022FEr 1 FD FF 9F .faraddr $009FFFFD +002301r 1 FE FF 9F .faraddr $009FFFFE +002304r 1 FF FF 9F .faraddr $009FFFFF +002307r 1 00 00 A0 .faraddr $00A00000 +00230Ar 1 01 00 A0 .faraddr $00A00001 +00230Dr 1 02 00 A0 .faraddr $00A00002 +002310r 1 03 00 A0 .faraddr $00A00003 +002313r 1 04 00 A0 .faraddr $00A00004 +002316r 1 05 00 A0 .faraddr $00A00005 +002319r 1 06 00 A0 .faraddr $00A00006 +00231Cr 1 07 00 A0 .faraddr $00A00007 +00231Fr 1 08 00 A0 .faraddr $00A00008 +002322r 1 09 00 A0 .faraddr $00A00009 +002325r 1 0A 00 A0 .faraddr $00A0000A +002328r 1 0B 00 A0 .faraddr $00A0000B +00232Br 1 0C 00 A0 .faraddr $00A0000C +00232Er 1 0D 00 A0 .faraddr $00A0000D +002331r 1 0E 00 A0 .faraddr $00A0000E +002334r 1 0F 00 A0 .faraddr $00A0000F +002337r 1 E1 FF FF .faraddr $00FFFFE1 +00233Ar 1 E2 FF FF .faraddr $00FFFFE2 +00233Dr 1 E3 FF FF .faraddr $00FFFFE3 +002340r 1 E4 FF FF .faraddr $00FFFFE4 +002343r 1 E5 FF FF .faraddr $00FFFFE5 +002346r 1 E6 FF FF .faraddr $00FFFFE6 +002349r 1 E7 FF FF .faraddr $00FFFFE7 +00234Cr 1 E8 FF FF .faraddr $00FFFFE8 +00234Fr 1 E9 FF FF .faraddr $00FFFFE9 +002352r 1 EA FF FF .faraddr $00FFFFEA +002355r 1 EB FF FF .faraddr $00FFFFEB +002358r 1 EC FF FF .faraddr $00FFFFEC +00235Br 1 ED FF FF .faraddr $00FFFFED +00235Er 1 EE FF FF .faraddr $00FFFFEE +002361r 1 EF FF FF .faraddr $00FFFFEF +002364r 1 F0 FF FF .faraddr $00FFFFF0 +002367r 1 F1 FF FF .faraddr $00FFFFF1 +00236Ar 1 F2 FF FF .faraddr $00FFFFF2 +00236Dr 1 F3 FF FF .faraddr $00FFFFF3 +002370r 1 F4 FF FF .faraddr $00FFFFF4 +002373r 1 F5 FF FF .faraddr $00FFFFF5 +002376r 1 F6 FF FF .faraddr $00FFFFF6 +002379r 1 F7 FF FF .faraddr $00FFFFF7 +00237Cr 1 F8 FF FF .faraddr $00FFFFF8 +00237Fr 1 F9 FF FF .faraddr $00FFFFF9 +002382r 1 FA FF FF .faraddr $00FFFFFA +002385r 1 FB FF FF .faraddr $00FFFFFB +002388r 1 FC FF FF .faraddr $00FFFFFC +00238Br 1 FD FF FF .faraddr $00FFFFFD +00238Er 1 FE FF FF .faraddr $00FFFFFE +002391r 1 FF FF FF .faraddr $00FFFFFF +002394r 1 +002394r 1 ; alternative hex values +002394r 1 00 00 00 .faraddr 0h +002397r 1 01 00 00 .faraddr 1h +00239Ar 1 02 00 00 .faraddr 2h +00239Dr 1 03 00 00 .faraddr 3h +0023A0r 1 04 00 00 .faraddr 4h +0023A3r 1 05 00 00 .faraddr 5h +0023A6r 1 06 00 00 .faraddr 6h +0023A9r 1 07 00 00 .faraddr 7h +0023ACr 1 08 00 00 .faraddr 8h +0023AFr 1 09 00 00 .faraddr 9h +0023B2r 1 0A 00 00 .faraddr 0ah +0023B5r 1 0B 00 00 .faraddr 0bh +0023B8r 1 0C 00 00 .faraddr 0ch +0023BBr 1 0D 00 00 .faraddr 0dh +0023BEr 1 0E 00 00 .faraddr 0eh +0023C1r 1 0F 00 00 .faraddr 0fh +0023C4r 1 10 00 00 .faraddr 10h +0023C7r 1 11 00 00 .faraddr 11h +0023CAr 1 12 00 00 .faraddr 12h +0023CDr 1 13 00 00 .faraddr 13h +0023D0r 1 70 00 00 .faraddr 70h +0023D3r 1 71 00 00 .faraddr 71h +0023D6r 1 72 00 00 .faraddr 72h +0023D9r 1 73 00 00 .faraddr 73h +0023DCr 1 74 00 00 .faraddr 74h +0023DFr 1 75 00 00 .faraddr 75h +0023E2r 1 76 00 00 .faraddr 76h +0023E5r 1 77 00 00 .faraddr 77h +0023E8r 1 78 00 00 .faraddr 78h +0023EBr 1 79 00 00 .faraddr 79h +0023EEr 1 7A 00 00 .faraddr 7ah +0023F1r 1 7B 00 00 .faraddr 7bh +0023F4r 1 7C 00 00 .faraddr 7ch +0023F7r 1 7D 00 00 .faraddr 7dh +0023FAr 1 7E 00 00 .faraddr 7eh +0023FDr 1 7F 00 00 .faraddr 7fh +002400r 1 80 00 00 .faraddr 80h +002403r 1 81 00 00 .faraddr 81h +002406r 1 82 00 00 .faraddr 82h +002409r 1 83 00 00 .faraddr 83h +00240Cr 1 84 00 00 .faraddr 84h +00240Fr 1 85 00 00 .faraddr 85h +002412r 1 86 00 00 .faraddr 86h +002415r 1 F0 00 00 .faraddr 0f0h +002418r 1 F1 00 00 .faraddr 0f1h +00241Br 1 F2 00 00 .faraddr 0f2h +00241Er 1 F3 00 00 .faraddr 0f3h +002421r 1 F4 00 00 .faraddr 0f4h +002424r 1 F5 00 00 .faraddr 0f5h +002427r 1 F6 00 00 .faraddr 0f6h +00242Ar 1 F7 00 00 .faraddr 0f7h +00242Dr 1 F8 00 00 .faraddr 0f8h +002430r 1 F9 00 00 .faraddr 0f9h +002433r 1 FA 00 00 .faraddr 0fah +002436r 1 FB 00 00 .faraddr 0fbh +002439r 1 FC 00 00 .faraddr 0fch +00243Cr 1 FD 00 00 .faraddr 0fdh +00243Fr 1 FE 00 00 .faraddr 0feh +002442r 1 FF 00 00 .faraddr 0ffh +002445r 1 00 01 00 .faraddr 100h +002448r 1 01 01 00 .faraddr 101h +00244Br 1 02 01 00 .faraddr 102h +00244Er 1 03 01 00 .faraddr 103h +002451r 1 D2 0F 00 .faraddr 0fd2h +002454r 1 D3 0F 00 .faraddr 0fd3h +002457r 1 D4 0F 00 .faraddr 0fd4h +00245Ar 1 D5 0F 00 .faraddr 0fd5h +00245Dr 1 D6 0F 00 .faraddr 0fd6h +002460r 1 D7 0F 00 .faraddr 0fd7h +002463r 1 D8 0F 00 .faraddr 0fd8h +002466r 1 D9 0F 00 .faraddr 0fd9h +002469r 1 DA 0F 00 .faraddr 0fdah +00246Cr 1 DB 0F 00 .faraddr 0fdbh +00246Fr 1 DC 0F 00 .faraddr 0fdch +002472r 1 DD 0F 00 .faraddr 0fddh +002475r 1 DE 0F 00 .faraddr 0fdeh +002478r 1 DF 0F 00 .faraddr 0fdfh +00247Br 1 E0 0F 00 .faraddr 0fe0h +00247Er 1 E1 0F 00 .faraddr 0fe1h +002481r 1 E2 0F 00 .faraddr 0fe2h +002484r 1 E3 0F 00 .faraddr 0fe3h +002487r 1 E4 0F 00 .faraddr 0fe4h +00248Ar 1 E5 0F 00 .faraddr 0fe5h +00248Dr 1 E6 0F 00 .faraddr 0fe6h +002490r 1 E7 0F 00 .faraddr 0fe7h +002493r 1 E8 0F 00 .faraddr 0fe8h +002496r 1 E9 0F 00 .faraddr 0fe9h +002499r 1 EA 0F 00 .faraddr 0feah +00249Cr 1 EB 0F 00 .faraddr 0febh +00249Fr 1 EC 0F 00 .faraddr 0fech +0024A2r 1 ED 0F 00 .faraddr 0fedh +0024A5r 1 EE 0F 00 .faraddr 0feeh +0024A8r 1 EF 0F 00 .faraddr 0fefh +0024ABr 1 F0 0F 00 .faraddr 0ff0h +0024AEr 1 F1 0F 00 .faraddr 0ff1h +0024B1r 1 F2 0F 00 .faraddr 0ff2h +0024B4r 1 F3 0F 00 .faraddr 0ff3h +0024B7r 1 F4 0F 00 .faraddr 0ff4h +0024BAr 1 F5 0F 00 .faraddr 0ff5h +0024BDr 1 F6 0F 00 .faraddr 0ff6h +0024C0r 1 F7 0F 00 .faraddr 0ff7h +0024C3r 1 F8 0F 00 .faraddr 0ff8h +0024C6r 1 F9 0F 00 .faraddr 0ff9h +0024C9r 1 FA 0F 00 .faraddr 0ffah +0024CCr 1 FB 0F 00 .faraddr 0ffbh +0024CFr 1 FC 0F 00 .faraddr 0ffch +0024D2r 1 FD 0F 00 .faraddr 0ffdh +0024D5r 1 FE 0F 00 .faraddr 0ffeh +0024D8r 1 FF 0F 00 .faraddr 0fffh +0024DBr 1 00 10 00 .faraddr 1000h +0024DEr 1 01 10 00 .faraddr 1001h +0024E1r 1 02 10 00 .faraddr 1002h +0024E4r 1 03 10 00 .faraddr 1003h +0024E7r 1 04 10 00 .faraddr 1004h +0024EAr 1 05 10 00 .faraddr 1005h +0024EDr 1 06 10 00 .faraddr 1006h +0024F0r 1 07 10 00 .faraddr 1007h +0024F3r 1 08 10 00 .faraddr 1008h +0024F6r 1 F0 7F 00 .faraddr 7ff0h +0024F9r 1 F1 7F 00 .faraddr 7ff1h +0024FCr 1 F2 7F 00 .faraddr 7ff2h +0024FFr 1 F3 7F 00 .faraddr 7ff3h +002502r 1 F4 7F 00 .faraddr 7ff4h +002505r 1 F5 7F 00 .faraddr 7ff5h +002508r 1 F6 7F 00 .faraddr 7ff6h +00250Br 1 F7 7F 00 .faraddr 7ff7h +00250Er 1 F8 7F 00 .faraddr 7ff8h +002511r 1 F9 7F 00 .faraddr 7ff9h +002514r 1 FA 7F 00 .faraddr 7ffah +002517r 1 FB 7F 00 .faraddr 7ffbh +00251Ar 1 FC 7F 00 .faraddr 7ffch +00251Dr 1 FD 7F 00 .faraddr 7ffdh +002520r 1 FE 7F 00 .faraddr 7ffeh +002523r 1 FF 7F 00 .faraddr 7fffh +002526r 1 00 80 00 .faraddr 8000h +002529r 1 01 80 00 .faraddr 8001h +00252Cr 1 02 80 00 .faraddr 8002h +00252Fr 1 03 80 00 .faraddr 8003h +002532r 1 04 80 00 .faraddr 8004h +002535r 1 05 80 00 .faraddr 8005h +002538r 1 06 80 00 .faraddr 8006h +00253Br 1 07 80 00 .faraddr 8007h +00253Er 1 08 80 00 .faraddr 8008h +002541r 1 09 80 00 .faraddr 8009h +002544r 1 0A 80 00 .faraddr 800ah +002547r 1 0B 80 00 .faraddr 800bh +00254Ar 1 E1 9F 00 .faraddr 9fe1h +00254Dr 1 E2 9F 00 .faraddr 9fe2h +002550r 1 E3 9F 00 .faraddr 9fe3h +002553r 1 E4 9F 00 .faraddr 9fe4h +002556r 1 E5 9F 00 .faraddr 9fe5h +002559r 1 E6 9F 00 .faraddr 9fe6h +00255Cr 1 E7 9F 00 .faraddr 9fe7h +00255Fr 1 E8 9F 00 .faraddr 9fe8h +002562r 1 E9 9F 00 .faraddr 9fe9h +002565r 1 EA 9F 00 .faraddr 9feah +002568r 1 EB 9F 00 .faraddr 9febh +00256Br 1 EC 9F 00 .faraddr 9fech +00256Er 1 ED 9F 00 .faraddr 9fedh +002571r 1 EE 9F 00 .faraddr 9feeh +002574r 1 EF 9F 00 .faraddr 9fefh +002577r 1 F0 9F 00 .faraddr 9ff0h +00257Ar 1 F1 9F 00 .faraddr 9ff1h +00257Dr 1 F2 9F 00 .faraddr 9ff2h +002580r 1 F3 9F 00 .faraddr 9ff3h +002583r 1 F4 9F 00 .faraddr 9ff4h +002586r 1 F5 9F 00 .faraddr 9ff5h +002589r 1 F6 9F 00 .faraddr 9ff6h +00258Cr 1 F7 9F 00 .faraddr 9ff7h +00258Fr 1 F8 9F 00 .faraddr 9ff8h +002592r 1 F9 9F 00 .faraddr 9ff9h +002595r 1 FA 9F 00 .faraddr 9ffah +002598r 1 FB 9F 00 .faraddr 9ffbh +00259Br 1 FC 9F 00 .faraddr 9ffch +00259Er 1 FD 9F 00 .faraddr 9ffdh +0025A1r 1 FE 9F 00 .faraddr 9ffeh +0025A4r 1 FF 9F 00 .faraddr 9fffh +0025A7r 1 00 A0 00 .faraddr 0a000h +0025AAr 1 01 A0 00 .faraddr 0a001h +0025ADr 1 02 A0 00 .faraddr 0a002h +0025B0r 1 03 A0 00 .faraddr 0a003h +0025B3r 1 04 A0 00 .faraddr 0a004h +0025B6r 1 05 A0 00 .faraddr 0a005h +0025B9r 1 06 A0 00 .faraddr 0a006h +0025BCr 1 07 A0 00 .faraddr 0a007h +0025BFr 1 08 A0 00 .faraddr 0a008h +0025C2r 1 09 A0 00 .faraddr 0a009h +0025C5r 1 0A A0 00 .faraddr 0a00ah +0025C8r 1 0B A0 00 .faraddr 0a00bh +0025CBr 1 0C A0 00 .faraddr 0a00ch +0025CEr 1 0D A0 00 .faraddr 0a00dh +0025D1r 1 0E A0 00 .faraddr 0a00eh +0025D4r 1 0F A0 00 .faraddr 0a00fh +0025D7r 1 E1 AF 00 .faraddr 0afe1h +0025DAr 1 E2 AF 00 .faraddr 0afe2h +0025DDr 1 E3 AF 00 .faraddr 0afe3h +0025E0r 1 E4 AF 00 .faraddr 0afe4h +0025E3r 1 E5 AF 00 .faraddr 0afe5h +0025E6r 1 E6 AF 00 .faraddr 0afe6h +0025E9r 1 E7 AF 00 .faraddr 0afe7h +0025ECr 1 E8 AF 00 .faraddr 0afe8h +0025EFr 1 E9 AF 00 .faraddr 0afe9h +0025F2r 1 EA AF 00 .faraddr 0afeah +0025F5r 1 EB AF 00 .faraddr 0afebh +0025F8r 1 EC AF 00 .faraddr 0afech +0025FBr 1 ED AF 00 .faraddr 0afedh +0025FEr 1 EE AF 00 .faraddr 0afeeh +002601r 1 EF AF 00 .faraddr 0afefh +002604r 1 F0 AF 00 .faraddr 0aff0h +002607r 1 F1 AF 00 .faraddr 0aff1h +00260Ar 1 F2 AF 00 .faraddr 0aff2h +00260Dr 1 F3 AF 00 .faraddr 0aff3h +002610r 1 F4 AF 00 .faraddr 0aff4h +002613r 1 F5 AF 00 .faraddr 0aff5h +002616r 1 F6 AF 00 .faraddr 0aff6h +002619r 1 F7 AF 00 .faraddr 0aff7h +00261Cr 1 F8 AF 00 .faraddr 0aff8h +00261Fr 1 F9 AF 00 .faraddr 0aff9h +002622r 1 FA AF 00 .faraddr 0affah +002625r 1 FB AF 00 .faraddr 0affbh +002628r 1 FC AF 00 .faraddr 0affch +00262Br 1 FD AF 00 .faraddr 0affdh +00262Er 1 FE AF 00 .faraddr 0affeh +002631r 1 FF AF 00 .faraddr 0afffh +002634r 1 00 B0 00 .faraddr 0b000h +002637r 1 01 B0 00 .faraddr 0b001h +00263Ar 1 02 B0 00 .faraddr 0b002h +00263Dr 1 03 B0 00 .faraddr 0b003h +002640r 1 04 B0 00 .faraddr 0b004h +002643r 1 05 B0 00 .faraddr 0b005h +002646r 1 06 B0 00 .faraddr 0b006h +002649r 1 07 B0 00 .faraddr 0b007h +00264Cr 1 08 B0 00 .faraddr 0b008h +00264Fr 1 09 B0 00 .faraddr 0b009h +002652r 1 0A B0 00 .faraddr 0b00ah +002655r 1 0B B0 00 .faraddr 0b00bh +002658r 1 0C B0 00 .faraddr 0b00ch +00265Br 1 0D B0 00 .faraddr 0b00dh +00265Er 1 0E B0 00 .faraddr 0b00eh +002661r 1 0F B0 00 .faraddr 0b00fh +002664r 1 E1 FF 00 .faraddr 0ffe1h +002667r 1 E2 FF 00 .faraddr 0ffe2h +00266Ar 1 E3 FF 00 .faraddr 0ffe3h +00266Dr 1 E4 FF 00 .faraddr 0ffe4h +002670r 1 E5 FF 00 .faraddr 0ffe5h +002673r 1 E6 FF 00 .faraddr 0ffe6h +002676r 1 E7 FF 00 .faraddr 0ffe7h +002679r 1 E8 FF 00 .faraddr 0ffe8h +00267Cr 1 E9 FF 00 .faraddr 0ffe9h +00267Fr 1 EA FF 00 .faraddr 0ffeah +002682r 1 EB FF 00 .faraddr 0ffebh +002685r 1 EC FF 00 .faraddr 0ffech +002688r 1 ED FF 00 .faraddr 0ffedh +00268Br 1 EE FF 00 .faraddr 0ffeeh +00268Er 1 EF FF 00 .faraddr 0ffefh +002691r 1 F0 FF 00 .faraddr 0fff0h +002694r 1 F1 FF 00 .faraddr 0fff1h +002697r 1 F2 FF 00 .faraddr 0fff2h +00269Ar 1 F3 FF 00 .faraddr 0fff3h +00269Dr 1 F4 FF 00 .faraddr 0fff4h +0026A0r 1 F5 FF 00 .faraddr 0fff5h +0026A3r 1 F6 FF 00 .faraddr 0fff6h +0026A6r 1 F7 FF 00 .faraddr 0fff7h +0026A9r 1 F8 FF 00 .faraddr 0fff8h +0026ACr 1 F9 FF 00 .faraddr 0fff9h +0026AFr 1 FA FF 00 .faraddr 0fffah +0026B2r 1 FB FF 00 .faraddr 0fffbh +0026B5r 1 FC FF 00 .faraddr 0fffch +0026B8r 1 FD FF 00 .faraddr 0fffdh +0026BBr 1 FE FF 00 .faraddr 0fffeh +0026BEr 1 FF FF 00 .faraddr 0ffffh +0026C1r 1 00 00 01 .faraddr 10000h +0026C4r 1 01 00 01 .faraddr 10001h +0026C7r 1 02 00 01 .faraddr 10002h +0026CAr 1 03 00 01 .faraddr 10003h +0026CDr 1 04 00 01 .faraddr 10004h +0026D0r 1 05 00 01 .faraddr 10005h +0026D3r 1 06 00 01 .faraddr 10006h +0026D6r 1 07 00 01 .faraddr 10007h +0026D9r 1 08 00 01 .faraddr 10008h +0026DCr 1 09 00 01 .faraddr 10009h +0026DFr 1 0A 00 01 .faraddr 1000ah +0026E2r 1 0B 00 01 .faraddr 1000bh +0026E5r 1 0C 00 01 .faraddr 1000ch +0026E8r 1 0D 00 01 .faraddr 1000dh +0026EBr 1 0E 00 01 .faraddr 1000eh +0026EEr 1 0F 00 01 .faraddr 1000fh +0026F1r 1 E1 FF 10 .faraddr 10ffe1h +0026F4r 1 E2 FF 10 .faraddr 10ffe2h +0026F7r 1 E3 FF 10 .faraddr 10ffe3h +0026FAr 1 E4 FF 10 .faraddr 10ffe4h +0026FDr 1 E5 FF 10 .faraddr 10ffe5h +002700r 1 E6 FF 10 .faraddr 10ffe6h +002703r 1 E7 FF 10 .faraddr 10ffe7h +002706r 1 E8 FF 10 .faraddr 10ffe8h +002709r 1 E9 FF 10 .faraddr 10ffe9h +00270Cr 1 EA FF 10 .faraddr 10ffeah +00270Fr 1 EB FF 10 .faraddr 10ffebh +002712r 1 EC FF 10 .faraddr 10ffech +002715r 1 ED FF 10 .faraddr 10ffedh +002718r 1 EE FF 10 .faraddr 10ffeeh +00271Br 1 EF FF 10 .faraddr 10ffefh +00271Er 1 F0 FF 10 .faraddr 10fff0h +002721r 1 F1 FF 10 .faraddr 10fff1h +002724r 1 F2 FF 10 .faraddr 10fff2h +002727r 1 F3 FF 10 .faraddr 10fff3h +00272Ar 1 F4 FF 10 .faraddr 10fff4h +00272Dr 1 F5 FF 10 .faraddr 10fff5h +002730r 1 F6 FF 10 .faraddr 10fff6h +002733r 1 F7 FF 10 .faraddr 10fff7h +002736r 1 F8 FF 10 .faraddr 10fff8h +002739r 1 F9 FF 10 .faraddr 10fff9h +00273Cr 1 FA FF 10 .faraddr 10fffah +00273Fr 1 FB FF 10 .faraddr 10fffbh +002742r 1 FC FF 10 .faraddr 10fffch +002745r 1 FD FF 10 .faraddr 10fffdh +002748r 1 FE FF 10 .faraddr 10fffeh +00274Br 1 FF FF 10 .faraddr 10ffffh +00274Er 1 00 00 11 .faraddr 110000h +002751r 1 01 00 11 .faraddr 110001h +002754r 1 02 00 11 .faraddr 110002h +002757r 1 03 00 11 .faraddr 110003h +00275Ar 1 04 00 11 .faraddr 110004h +00275Dr 1 05 00 11 .faraddr 110005h +002760r 1 06 00 11 .faraddr 110006h +002763r 1 07 00 11 .faraddr 110007h +002766r 1 08 00 11 .faraddr 110008h +002769r 1 09 00 11 .faraddr 110009h +00276Cr 1 0A 00 11 .faraddr 11000ah +00276Fr 1 0B 00 11 .faraddr 11000bh +002772r 1 0C 00 11 .faraddr 11000ch +002775r 1 0D 00 11 .faraddr 11000dh +002778r 1 0E 00 11 .faraddr 11000eh +00277Br 1 0F 00 11 .faraddr 11000fh +00277Er 1 E1 FF 20 .faraddr 20ffe1h +002781r 1 E2 FF 20 .faraddr 20ffe2h +002784r 1 E3 FF 20 .faraddr 20ffe3h +002787r 1 E4 FF 20 .faraddr 20ffe4h +00278Ar 1 E5 FF 20 .faraddr 20ffe5h +00278Dr 1 E6 FF 20 .faraddr 20ffe6h +002790r 1 E7 FF 20 .faraddr 20ffe7h +002793r 1 E8 FF 20 .faraddr 20ffe8h +002796r 1 E9 FF 20 .faraddr 20ffe9h +002799r 1 EA FF 20 .faraddr 20ffeah +00279Cr 1 EB FF 20 .faraddr 20ffebh +00279Fr 1 EC FF 20 .faraddr 20ffech +0027A2r 1 ED FF 20 .faraddr 20ffedh +0027A5r 1 EE FF 20 .faraddr 20ffeeh +0027A8r 1 EF FF 20 .faraddr 20ffefh +0027ABr 1 F0 FF 20 .faraddr 20fff0h +0027AEr 1 F1 FF 20 .faraddr 20fff1h +0027B1r 1 F2 FF 20 .faraddr 20fff2h +0027B4r 1 F3 FF 20 .faraddr 20fff3h +0027B7r 1 F4 FF 20 .faraddr 20fff4h +0027BAr 1 F5 FF 20 .faraddr 20fff5h +0027BDr 1 F6 FF 20 .faraddr 20fff6h +0027C0r 1 F7 FF 20 .faraddr 20fff7h +0027C3r 1 F8 FF 20 .faraddr 20fff8h +0027C6r 1 F9 FF 20 .faraddr 20fff9h +0027C9r 1 FA FF 20 .faraddr 20fffah +0027CCr 1 FB FF 20 .faraddr 20fffbh +0027CFr 1 FC FF 20 .faraddr 20fffch +0027D2r 1 FD FF 20 .faraddr 20fffdh +0027D5r 1 FE FF 20 .faraddr 20fffeh +0027D8r 1 FF FF 20 .faraddr 20ffffh +0027DBr 1 00 00 21 .faraddr 210000h +0027DEr 1 01 00 21 .faraddr 210001h +0027E1r 1 02 00 21 .faraddr 210002h +0027E4r 1 03 00 21 .faraddr 210003h +0027E7r 1 04 00 21 .faraddr 210004h +0027EAr 1 05 00 21 .faraddr 210005h +0027EDr 1 06 00 21 .faraddr 210006h +0027F0r 1 07 00 21 .faraddr 210007h +0027F3r 1 08 00 21 .faraddr 210008h +0027F6r 1 09 00 21 .faraddr 210009h +0027F9r 1 0A 00 21 .faraddr 21000ah +0027FCr 1 0B 00 21 .faraddr 21000bh +0027FFr 1 0C 00 21 .faraddr 21000ch +002802r 1 0D 00 21 .faraddr 21000dh +002805r 1 0E 00 21 .faraddr 21000eh +002808r 1 0F 00 21 .faraddr 21000fh +00280Br 1 E1 FF 7F .faraddr 7fffe1h +00280Er 1 E2 FF 7F .faraddr 7fffe2h +002811r 1 E3 FF 7F .faraddr 7fffe3h +002814r 1 E4 FF 7F .faraddr 7fffe4h +002817r 1 E5 FF 7F .faraddr 7fffe5h +00281Ar 1 E6 FF 7F .faraddr 7fffe6h +00281Dr 1 E7 FF 7F .faraddr 7fffe7h +002820r 1 E8 FF 7F .faraddr 7fffe8h +002823r 1 E9 FF 7F .faraddr 7fffe9h +002826r 1 EA FF 7F .faraddr 7fffeah +002829r 1 EB FF 7F .faraddr 7fffebh +00282Cr 1 EC FF 7F .faraddr 7fffech +00282Fr 1 ED FF 7F .faraddr 7fffedh +002832r 1 EE FF 7F .faraddr 7fffeeh +002835r 1 EF FF 7F .faraddr 7fffefh +002838r 1 F0 FF 7F .faraddr 7ffff0h +00283Br 1 F1 FF 7F .faraddr 7ffff1h +00283Er 1 F2 FF 7F .faraddr 7ffff2h +002841r 1 F3 FF 7F .faraddr 7ffff3h +002844r 1 F4 FF 7F .faraddr 7ffff4h +002847r 1 F5 FF 7F .faraddr 7ffff5h +00284Ar 1 F6 FF 7F .faraddr 7ffff6h +00284Dr 1 F7 FF 7F .faraddr 7ffff7h +002850r 1 F8 FF 7F .faraddr 7ffff8h +002853r 1 F9 FF 7F .faraddr 7ffff9h +002856r 1 FA FF 7F .faraddr 7ffffah +002859r 1 FB FF 7F .faraddr 7ffffbh +00285Cr 1 FC FF 7F .faraddr 7ffffch +00285Fr 1 FD FF 7F .faraddr 7ffffdh +002862r 1 FE FF 7F .faraddr 7ffffeh +002865r 1 FF FF 7F .faraddr 7fffffh +002868r 1 00 00 80 .faraddr 800000h +00286Br 1 01 00 80 .faraddr 800001h +00286Er 1 02 00 80 .faraddr 800002h +002871r 1 03 00 80 .faraddr 800003h +002874r 1 04 00 80 .faraddr 800004h +002877r 1 05 00 80 .faraddr 800005h +00287Ar 1 06 00 80 .faraddr 800006h +00287Dr 1 07 00 80 .faraddr 800007h +002880r 1 08 00 80 .faraddr 800008h +002883r 1 09 00 80 .faraddr 800009h +002886r 1 0A 00 80 .faraddr 80000ah +002889r 1 0B 00 80 .faraddr 80000bh +00288Cr 1 0C 00 80 .faraddr 80000ch +00288Fr 1 0D 00 80 .faraddr 80000dh +002892r 1 0E 00 80 .faraddr 80000eh +002895r 1 0F 00 80 .faraddr 80000fh +002898r 1 E1 FF 9F .faraddr 9fffe1h +00289Br 1 E2 FF 9F .faraddr 9fffe2h +00289Er 1 E3 FF 9F .faraddr 9fffe3h +0028A1r 1 E4 FF 9F .faraddr 9fffe4h +0028A4r 1 E5 FF 9F .faraddr 9fffe5h +0028A7r 1 E6 FF 9F .faraddr 9fffe6h +0028AAr 1 E7 FF 9F .faraddr 9fffe7h +0028ADr 1 E8 FF 9F .faraddr 9fffe8h +0028B0r 1 E9 FF 9F .faraddr 9fffe9h +0028B3r 1 EA FF 9F .faraddr 9fffeah +0028B6r 1 EB FF 9F .faraddr 9fffebh +0028B9r 1 EC FF 9F .faraddr 9fffech +0028BCr 1 ED FF 9F .faraddr 9fffedh +0028BFr 1 EE FF 9F .faraddr 9fffeeh +0028C2r 1 EF FF 9F .faraddr 9fffefh +0028C5r 1 F0 FF 9F .faraddr 9ffff0h +0028C8r 1 F1 FF 9F .faraddr 9ffff1h +0028CBr 1 F2 FF 9F .faraddr 9ffff2h +0028CEr 1 F3 FF 9F .faraddr 9ffff3h +0028D1r 1 F4 FF 9F .faraddr 9ffff4h +0028D4r 1 F5 FF 9F .faraddr 9ffff5h +0028D7r 1 F6 FF 9F .faraddr 9ffff6h +0028DAr 1 F7 FF 9F .faraddr 9ffff7h +0028DDr 1 F8 FF 9F .faraddr 9ffff8h +0028E0r 1 F9 FF 9F .faraddr 9ffff9h +0028E3r 1 FA FF 9F .faraddr 9ffffah +0028E6r 1 FB FF 9F .faraddr 9ffffbh +0028E9r 1 FC FF 9F .faraddr 9ffffch +0028ECr 1 FD FF 9F .faraddr 9ffffdh +0028EFr 1 FE FF 9F .faraddr 9ffffeh +0028F2r 1 FF FF 9F .faraddr 9fffffh +0028F5r 1 00 00 A0 .faraddr 0a00000h +0028F8r 1 01 00 A0 .faraddr 0a00001h +0028FBr 1 02 00 A0 .faraddr 0a00002h +0028FEr 1 03 00 A0 .faraddr 0a00003h +002901r 1 04 00 A0 .faraddr 0a00004h +002904r 1 05 00 A0 .faraddr 0a00005h +002907r 1 06 00 A0 .faraddr 0a00006h +00290Ar 1 07 00 A0 .faraddr 0a00007h +00290Dr 1 08 00 A0 .faraddr 0a00008h +002910r 1 09 00 A0 .faraddr 0a00009h +002913r 1 0A 00 A0 .faraddr 0a0000ah +002916r 1 0B 00 A0 .faraddr 0a0000bh +002919r 1 0C 00 A0 .faraddr 0a0000ch +00291Cr 1 0D 00 A0 .faraddr 0a0000dh +00291Fr 1 0E 00 A0 .faraddr 0a0000eh +002922r 1 0F 00 A0 .faraddr 0a0000fh +002925r 1 E1 FF FF .faraddr 0ffffe1h +002928r 1 E2 FF FF .faraddr 0ffffe2h +00292Br 1 E3 FF FF .faraddr 0ffffe3h +00292Er 1 E4 FF FF .faraddr 0ffffe4h +002931r 1 E5 FF FF .faraddr 0ffffe5h +002934r 1 E6 FF FF .faraddr 0ffffe6h +002937r 1 E7 FF FF .faraddr 0ffffe7h +00293Ar 1 E8 FF FF .faraddr 0ffffe8h +00293Dr 1 E9 FF FF .faraddr 0ffffe9h +002940r 1 EA FF FF .faraddr 0ffffeah +002943r 1 EB FF FF .faraddr 0ffffebh +002946r 1 EC FF FF .faraddr 0ffffech +002949r 1 ED FF FF .faraddr 0ffffedh +00294Cr 1 EE FF FF .faraddr 0ffffeeh +00294Fr 1 EF FF FF .faraddr 0ffffefh +002952r 1 F0 FF FF .faraddr 0fffff0h +002955r 1 F1 FF FF .faraddr 0fffff1h +002958r 1 F2 FF FF .faraddr 0fffff2h +00295Br 1 F3 FF FF .faraddr 0fffff3h +00295Er 1 F4 FF FF .faraddr 0fffff4h +002961r 1 F5 FF FF .faraddr 0fffff5h +002964r 1 F6 FF FF .faraddr 0fffff6h +002967r 1 F7 FF FF .faraddr 0fffff7h +00296Ar 1 F8 FF FF .faraddr 0fffff8h +00296Dr 1 F9 FF FF .faraddr 0fffff9h +002970r 1 FA FF FF .faraddr 0fffffah +002973r 1 FB FF FF .faraddr 0fffffbh +002976r 1 FC FF FF .faraddr 0fffffch +002979r 1 FD FF FF .faraddr 0fffffdh +00297Cr 1 FE FF FF .faraddr 0fffffeh +00297Fr 1 FF FF FF .faraddr 0ffffffh +002982r 1 +002982r 1 ; alternative hex values, uppercase +002982r 1 00 00 00 .faraddr 0h +002985r 1 01 00 00 .faraddr 1h +002988r 1 02 00 00 .faraddr 2h +00298Br 1 03 00 00 .faraddr 3h +00298Er 1 04 00 00 .faraddr 4h +002991r 1 05 00 00 .faraddr 5h +002994r 1 06 00 00 .faraddr 6h +002997r 1 07 00 00 .faraddr 7h +00299Ar 1 08 00 00 .faraddr 8h +00299Dr 1 09 00 00 .faraddr 9h +0029A0r 1 0A 00 00 .faraddr 0Ah +0029A3r 1 0B 00 00 .faraddr 0Bh +0029A6r 1 0C 00 00 .faraddr 0Ch +0029A9r 1 0D 00 00 .faraddr 0Dh +0029ACr 1 0E 00 00 .faraddr 0Eh +0029AFr 1 0F 00 00 .faraddr 0Fh +0029B2r 1 10 00 00 .faraddr 10h +0029B5r 1 11 00 00 .faraddr 11h +0029B8r 1 12 00 00 .faraddr 12h +0029BBr 1 13 00 00 .faraddr 13h +0029BEr 1 70 00 00 .faraddr 70h +0029C1r 1 71 00 00 .faraddr 71h +0029C4r 1 72 00 00 .faraddr 72h +0029C7r 1 73 00 00 .faraddr 73h +0029CAr 1 74 00 00 .faraddr 74h +0029CDr 1 75 00 00 .faraddr 75h +0029D0r 1 76 00 00 .faraddr 76h +0029D3r 1 77 00 00 .faraddr 77h +0029D6r 1 78 00 00 .faraddr 78h +0029D9r 1 79 00 00 .faraddr 79h +0029DCr 1 7A 00 00 .faraddr 7Ah +0029DFr 1 7B 00 00 .faraddr 7Bh +0029E2r 1 7C 00 00 .faraddr 7Ch +0029E5r 1 7D 00 00 .faraddr 7Dh +0029E8r 1 7E 00 00 .faraddr 7Eh +0029EBr 1 7F 00 00 .faraddr 7Fh +0029EEr 1 80 00 00 .faraddr 80h +0029F1r 1 81 00 00 .faraddr 81h +0029F4r 1 82 00 00 .faraddr 82h +0029F7r 1 83 00 00 .faraddr 83h +0029FAr 1 84 00 00 .faraddr 84h +0029FDr 1 85 00 00 .faraddr 85h +002A00r 1 86 00 00 .faraddr 86h +002A03r 1 F0 00 00 .faraddr 0F0h +002A06r 1 F1 00 00 .faraddr 0F1h +002A09r 1 F2 00 00 .faraddr 0F2h +002A0Cr 1 F3 00 00 .faraddr 0F3h +002A0Fr 1 F4 00 00 .faraddr 0F4h +002A12r 1 F5 00 00 .faraddr 0F5h +002A15r 1 F6 00 00 .faraddr 0F6h +002A18r 1 F7 00 00 .faraddr 0F7h +002A1Br 1 F8 00 00 .faraddr 0F8h +002A1Er 1 F9 00 00 .faraddr 0F9h +002A21r 1 FA 00 00 .faraddr 0FAh +002A24r 1 FB 00 00 .faraddr 0FBh +002A27r 1 FC 00 00 .faraddr 0FCh +002A2Ar 1 FD 00 00 .faraddr 0FDh +002A2Dr 1 FE 00 00 .faraddr 0FEh +002A30r 1 FF 00 00 .faraddr 0FFh +002A33r 1 00 01 00 .faraddr 100h +002A36r 1 01 01 00 .faraddr 101h +002A39r 1 02 01 00 .faraddr 102h +002A3Cr 1 03 01 00 .faraddr 103h +002A3Fr 1 D2 0F 00 .faraddr 0FD2h +002A42r 1 D3 0F 00 .faraddr 0FD3h +002A45r 1 D4 0F 00 .faraddr 0FD4h +002A48r 1 D5 0F 00 .faraddr 0FD5h +002A4Br 1 D6 0F 00 .faraddr 0FD6h +002A4Er 1 D7 0F 00 .faraddr 0FD7h +002A51r 1 D8 0F 00 .faraddr 0FD8h +002A54r 1 D9 0F 00 .faraddr 0FD9h +002A57r 1 DA 0F 00 .faraddr 0FDAh +002A5Ar 1 DB 0F 00 .faraddr 0FDBh +002A5Dr 1 DC 0F 00 .faraddr 0FDCh +002A60r 1 DD 0F 00 .faraddr 0FDDh +002A63r 1 DE 0F 00 .faraddr 0FDEh +002A66r 1 DF 0F 00 .faraddr 0FDFh +002A69r 1 E0 0F 00 .faraddr 0FE0h +002A6Cr 1 E1 0F 00 .faraddr 0FE1h +002A6Fr 1 E2 0F 00 .faraddr 0FE2h +002A72r 1 E3 0F 00 .faraddr 0FE3h +002A75r 1 E4 0F 00 .faraddr 0FE4h +002A78r 1 E5 0F 00 .faraddr 0FE5h +002A7Br 1 E6 0F 00 .faraddr 0FE6h +002A7Er 1 E7 0F 00 .faraddr 0FE7h +002A81r 1 E8 0F 00 .faraddr 0FE8h +002A84r 1 E9 0F 00 .faraddr 0FE9h +002A87r 1 EA 0F 00 .faraddr 0FEAh +002A8Ar 1 EB 0F 00 .faraddr 0FEBh +002A8Dr 1 EC 0F 00 .faraddr 0FECh +002A90r 1 ED 0F 00 .faraddr 0FEDh +002A93r 1 EE 0F 00 .faraddr 0FEEh +002A96r 1 EF 0F 00 .faraddr 0FEFh +002A99r 1 F0 0F 00 .faraddr 0FF0h +002A9Cr 1 F1 0F 00 .faraddr 0FF1h +002A9Fr 1 F2 0F 00 .faraddr 0FF2h +002AA2r 1 F3 0F 00 .faraddr 0FF3h +002AA5r 1 F4 0F 00 .faraddr 0FF4h +002AA8r 1 F5 0F 00 .faraddr 0FF5h +002AABr 1 F6 0F 00 .faraddr 0FF6h +002AAEr 1 F7 0F 00 .faraddr 0FF7h +002AB1r 1 F8 0F 00 .faraddr 0FF8h +002AB4r 1 F9 0F 00 .faraddr 0FF9h +002AB7r 1 FA 0F 00 .faraddr 0FFAh +002ABAr 1 FB 0F 00 .faraddr 0FFBh +002ABDr 1 FC 0F 00 .faraddr 0FFCh +002AC0r 1 FD 0F 00 .faraddr 0FFDh +002AC3r 1 FE 0F 00 .faraddr 0FFEh +002AC6r 1 FF 0F 00 .faraddr 0FFFh +002AC9r 1 00 10 00 .faraddr 1000h +002ACCr 1 01 10 00 .faraddr 1001h +002ACFr 1 02 10 00 .faraddr 1002h +002AD2r 1 03 10 00 .faraddr 1003h +002AD5r 1 04 10 00 .faraddr 1004h +002AD8r 1 05 10 00 .faraddr 1005h +002ADBr 1 06 10 00 .faraddr 1006h +002ADEr 1 07 10 00 .faraddr 1007h +002AE1r 1 08 10 00 .faraddr 1008h +002AE4r 1 F0 7F 00 .faraddr 7FF0h +002AE7r 1 F1 7F 00 .faraddr 7FF1h +002AEAr 1 F2 7F 00 .faraddr 7FF2h +002AEDr 1 F3 7F 00 .faraddr 7FF3h +002AF0r 1 F4 7F 00 .faraddr 7FF4h +002AF3r 1 F5 7F 00 .faraddr 7FF5h +002AF6r 1 F6 7F 00 .faraddr 7FF6h +002AF9r 1 F7 7F 00 .faraddr 7FF7h +002AFCr 1 F8 7F 00 .faraddr 7FF8h +002AFFr 1 F9 7F 00 .faraddr 7FF9h +002B02r 1 FA 7F 00 .faraddr 7FFAh +002B05r 1 FB 7F 00 .faraddr 7FFBh +002B08r 1 FC 7F 00 .faraddr 7FFCh +002B0Br 1 FD 7F 00 .faraddr 7FFDh +002B0Er 1 FE 7F 00 .faraddr 7FFEh +002B11r 1 FF 7F 00 .faraddr 7FFFh +002B14r 1 00 80 00 .faraddr 8000h +002B17r 1 01 80 00 .faraddr 8001h +002B1Ar 1 02 80 00 .faraddr 8002h +002B1Dr 1 03 80 00 .faraddr 8003h +002B20r 1 04 80 00 .faraddr 8004h +002B23r 1 05 80 00 .faraddr 8005h +002B26r 1 06 80 00 .faraddr 8006h +002B29r 1 07 80 00 .faraddr 8007h +002B2Cr 1 08 80 00 .faraddr 8008h +002B2Fr 1 09 80 00 .faraddr 8009h +002B32r 1 0A 80 00 .faraddr 800Ah +002B35r 1 0B 80 00 .faraddr 800Bh +002B38r 1 E1 9F 00 .faraddr 9FE1h +002B3Br 1 E2 9F 00 .faraddr 9FE2h +002B3Er 1 E3 9F 00 .faraddr 9FE3h +002B41r 1 E4 9F 00 .faraddr 9FE4h +002B44r 1 E5 9F 00 .faraddr 9FE5h +002B47r 1 E6 9F 00 .faraddr 9FE6h +002B4Ar 1 E7 9F 00 .faraddr 9FE7h +002B4Dr 1 E8 9F 00 .faraddr 9FE8h +002B50r 1 E9 9F 00 .faraddr 9FE9h +002B53r 1 EA 9F 00 .faraddr 9FEAh +002B56r 1 EB 9F 00 .faraddr 9FEBh +002B59r 1 EC 9F 00 .faraddr 9FECh +002B5Cr 1 ED 9F 00 .faraddr 9FEDh +002B5Fr 1 EE 9F 00 .faraddr 9FEEh +002B62r 1 EF 9F 00 .faraddr 9FEFh +002B65r 1 F0 9F 00 .faraddr 9FF0h +002B68r 1 F1 9F 00 .faraddr 9FF1h +002B6Br 1 F2 9F 00 .faraddr 9FF2h +002B6Er 1 F3 9F 00 .faraddr 9FF3h +002B71r 1 F4 9F 00 .faraddr 9FF4h +002B74r 1 F5 9F 00 .faraddr 9FF5h +002B77r 1 F6 9F 00 .faraddr 9FF6h +002B7Ar 1 F7 9F 00 .faraddr 9FF7h +002B7Dr 1 F8 9F 00 .faraddr 9FF8h +002B80r 1 F9 9F 00 .faraddr 9FF9h +002B83r 1 FA 9F 00 .faraddr 9FFAh +002B86r 1 FB 9F 00 .faraddr 9FFBh +002B89r 1 FC 9F 00 .faraddr 9FFCh +002B8Cr 1 FD 9F 00 .faraddr 9FFDh +002B8Fr 1 FE 9F 00 .faraddr 9FFEh +002B92r 1 FF 9F 00 .faraddr 9FFFh +002B95r 1 00 A0 00 .faraddr 0A000h +002B98r 1 01 A0 00 .faraddr 0A001h +002B9Br 1 02 A0 00 .faraddr 0A002h +002B9Er 1 03 A0 00 .faraddr 0A003h +002BA1r 1 04 A0 00 .faraddr 0A004h +002BA4r 1 05 A0 00 .faraddr 0A005h +002BA7r 1 06 A0 00 .faraddr 0A006h +002BAAr 1 07 A0 00 .faraddr 0A007h +002BADr 1 08 A0 00 .faraddr 0A008h +002BB0r 1 09 A0 00 .faraddr 0A009h +002BB3r 1 0A A0 00 .faraddr 0A00Ah +002BB6r 1 0B A0 00 .faraddr 0A00Bh +002BB9r 1 0C A0 00 .faraddr 0A00Ch +002BBCr 1 0D A0 00 .faraddr 0A00Dh +002BBFr 1 0E A0 00 .faraddr 0A00Eh +002BC2r 1 0F A0 00 .faraddr 0A00Fh +002BC5r 1 E1 AF 00 .faraddr 0AFE1h +002BC8r 1 E2 AF 00 .faraddr 0AFE2h +002BCBr 1 E3 AF 00 .faraddr 0AFE3h +002BCEr 1 E4 AF 00 .faraddr 0AFE4h +002BD1r 1 E5 AF 00 .faraddr 0AFE5h +002BD4r 1 E6 AF 00 .faraddr 0AFE6h +002BD7r 1 E7 AF 00 .faraddr 0AFE7h +002BDAr 1 E8 AF 00 .faraddr 0AFE8h +002BDDr 1 E9 AF 00 .faraddr 0AFE9h +002BE0r 1 EA AF 00 .faraddr 0AFEAh +002BE3r 1 EB AF 00 .faraddr 0AFEBh +002BE6r 1 EC AF 00 .faraddr 0AFECh +002BE9r 1 ED AF 00 .faraddr 0AFEDh +002BECr 1 EE AF 00 .faraddr 0AFEEh +002BEFr 1 EF AF 00 .faraddr 0AFEFh +002BF2r 1 F0 AF 00 .faraddr 0AFF0h +002BF5r 1 F1 AF 00 .faraddr 0AFF1h +002BF8r 1 F2 AF 00 .faraddr 0AFF2h +002BFBr 1 F3 AF 00 .faraddr 0AFF3h +002BFEr 1 F4 AF 00 .faraddr 0AFF4h +002C01r 1 F5 AF 00 .faraddr 0AFF5h +002C04r 1 F6 AF 00 .faraddr 0AFF6h +002C07r 1 F7 AF 00 .faraddr 0AFF7h +002C0Ar 1 F8 AF 00 .faraddr 0AFF8h +002C0Dr 1 F9 AF 00 .faraddr 0AFF9h +002C10r 1 FA AF 00 .faraddr 0AFFAh +002C13r 1 FB AF 00 .faraddr 0AFFBh +002C16r 1 FC AF 00 .faraddr 0AFFCh +002C19r 1 FD AF 00 .faraddr 0AFFDh +002C1Cr 1 FE AF 00 .faraddr 0AFFEh +002C1Fr 1 FF AF 00 .faraddr 0AFFFh +002C22r 1 00 B0 00 .faraddr 0B000h +002C25r 1 01 B0 00 .faraddr 0B001h +002C28r 1 02 B0 00 .faraddr 0B002h +002C2Br 1 03 B0 00 .faraddr 0B003h +002C2Er 1 04 B0 00 .faraddr 0B004h +002C31r 1 05 B0 00 .faraddr 0B005h +002C34r 1 06 B0 00 .faraddr 0B006h +002C37r 1 07 B0 00 .faraddr 0B007h +002C3Ar 1 08 B0 00 .faraddr 0B008h +002C3Dr 1 09 B0 00 .faraddr 0B009h +002C40r 1 0A B0 00 .faraddr 0B00Ah +002C43r 1 0B B0 00 .faraddr 0B00Bh +002C46r 1 0C B0 00 .faraddr 0B00Ch +002C49r 1 0D B0 00 .faraddr 0B00Dh +002C4Cr 1 0E B0 00 .faraddr 0B00Eh +002C4Fr 1 0F B0 00 .faraddr 0B00Fh +002C52r 1 E1 FF 00 .faraddr 0FFE1h +002C55r 1 E2 FF 00 .faraddr 0FFE2h +002C58r 1 E3 FF 00 .faraddr 0FFE3h +002C5Br 1 E4 FF 00 .faraddr 0FFE4h +002C5Er 1 E5 FF 00 .faraddr 0FFE5h +002C61r 1 E6 FF 00 .faraddr 0FFE6h +002C64r 1 E7 FF 00 .faraddr 0FFE7h +002C67r 1 E8 FF 00 .faraddr 0FFE8h +002C6Ar 1 E9 FF 00 .faraddr 0FFE9h +002C6Dr 1 EA FF 00 .faraddr 0FFEAh +002C70r 1 EB FF 00 .faraddr 0FFEBh +002C73r 1 EC FF 00 .faraddr 0FFECh +002C76r 1 ED FF 00 .faraddr 0FFEDh +002C79r 1 EE FF 00 .faraddr 0FFEEh +002C7Cr 1 EF FF 00 .faraddr 0FFEFh +002C7Fr 1 F0 FF 00 .faraddr 0FFF0h +002C82r 1 F1 FF 00 .faraddr 0FFF1h +002C85r 1 F2 FF 00 .faraddr 0FFF2h +002C88r 1 F3 FF 00 .faraddr 0FFF3h +002C8Br 1 F4 FF 00 .faraddr 0FFF4h +002C8Er 1 F5 FF 00 .faraddr 0FFF5h +002C91r 1 F6 FF 00 .faraddr 0FFF6h +002C94r 1 F7 FF 00 .faraddr 0FFF7h +002C97r 1 F8 FF 00 .faraddr 0FFF8h +002C9Ar 1 F9 FF 00 .faraddr 0FFF9h +002C9Dr 1 FA FF 00 .faraddr 0FFFAh +002CA0r 1 FB FF 00 .faraddr 0FFFBh +002CA3r 1 FC FF 00 .faraddr 0FFFCh +002CA6r 1 FD FF 00 .faraddr 0FFFDh +002CA9r 1 FE FF 00 .faraddr 0FFFEh +002CACr 1 FF FF 00 .faraddr 0FFFFh +002CAFr 1 00 00 01 .faraddr 10000h +002CB2r 1 01 00 01 .faraddr 10001h +002CB5r 1 02 00 01 .faraddr 10002h +002CB8r 1 03 00 01 .faraddr 10003h +002CBBr 1 04 00 01 .faraddr 10004h +002CBEr 1 05 00 01 .faraddr 10005h +002CC1r 1 06 00 01 .faraddr 10006h +002CC4r 1 07 00 01 .faraddr 10007h +002CC7r 1 08 00 01 .faraddr 10008h +002CCAr 1 09 00 01 .faraddr 10009h +002CCDr 1 0A 00 01 .faraddr 1000Ah +002CD0r 1 0B 00 01 .faraddr 1000Bh +002CD3r 1 0C 00 01 .faraddr 1000Ch +002CD6r 1 0D 00 01 .faraddr 1000Dh +002CD9r 1 0E 00 01 .faraddr 1000Eh +002CDCr 1 0F 00 01 .faraddr 1000Fh +002CDFr 1 E1 FF 10 .faraddr 10FFE1h +002CE2r 1 E2 FF 10 .faraddr 10FFE2h +002CE5r 1 E3 FF 10 .faraddr 10FFE3h +002CE8r 1 E4 FF 10 .faraddr 10FFE4h +002CEBr 1 E5 FF 10 .faraddr 10FFE5h +002CEEr 1 E6 FF 10 .faraddr 10FFE6h +002CF1r 1 E7 FF 10 .faraddr 10FFE7h +002CF4r 1 E8 FF 10 .faraddr 10FFE8h +002CF7r 1 E9 FF 10 .faraddr 10FFE9h +002CFAr 1 EA FF 10 .faraddr 10FFEAh +002CFDr 1 EB FF 10 .faraddr 10FFEBh +002D00r 1 EC FF 10 .faraddr 10FFECh +002D03r 1 ED FF 10 .faraddr 10FFEDh +002D06r 1 EE FF 10 .faraddr 10FFEEh +002D09r 1 EF FF 10 .faraddr 10FFEFh +002D0Cr 1 F0 FF 10 .faraddr 10FFF0h +002D0Fr 1 F1 FF 10 .faraddr 10FFF1h +002D12r 1 F2 FF 10 .faraddr 10FFF2h +002D15r 1 F3 FF 10 .faraddr 10FFF3h +002D18r 1 F4 FF 10 .faraddr 10FFF4h +002D1Br 1 F5 FF 10 .faraddr 10FFF5h +002D1Er 1 F6 FF 10 .faraddr 10FFF6h +002D21r 1 F7 FF 10 .faraddr 10FFF7h +002D24r 1 F8 FF 10 .faraddr 10FFF8h +002D27r 1 F9 FF 10 .faraddr 10FFF9h +002D2Ar 1 FA FF 10 .faraddr 10FFFAh +002D2Dr 1 FB FF 10 .faraddr 10FFFBh +002D30r 1 FC FF 10 .faraddr 10FFFCh +002D33r 1 FD FF 10 .faraddr 10FFFDh +002D36r 1 FE FF 10 .faraddr 10FFFEh +002D39r 1 FF FF 10 .faraddr 10FFFFh +002D3Cr 1 00 00 11 .faraddr 110000h +002D3Fr 1 01 00 11 .faraddr 110001h +002D42r 1 02 00 11 .faraddr 110002h +002D45r 1 03 00 11 .faraddr 110003h +002D48r 1 04 00 11 .faraddr 110004h +002D4Br 1 05 00 11 .faraddr 110005h +002D4Er 1 06 00 11 .faraddr 110006h +002D51r 1 07 00 11 .faraddr 110007h +002D54r 1 08 00 11 .faraddr 110008h +002D57r 1 09 00 11 .faraddr 110009h +002D5Ar 1 0A 00 11 .faraddr 11000Ah +002D5Dr 1 0B 00 11 .faraddr 11000Bh +002D60r 1 0C 00 11 .faraddr 11000Ch +002D63r 1 0D 00 11 .faraddr 11000Dh +002D66r 1 0E 00 11 .faraddr 11000Eh +002D69r 1 0F 00 11 .faraddr 11000Fh +002D6Cr 1 E1 FF 20 .faraddr 20FFE1h +002D6Fr 1 E2 FF 20 .faraddr 20FFE2h +002D72r 1 E3 FF 20 .faraddr 20FFE3h +002D75r 1 E4 FF 20 .faraddr 20FFE4h +002D78r 1 E5 FF 20 .faraddr 20FFE5h +002D7Br 1 E6 FF 20 .faraddr 20FFE6h +002D7Er 1 E7 FF 20 .faraddr 20FFE7h +002D81r 1 E8 FF 20 .faraddr 20FFE8h +002D84r 1 E9 FF 20 .faraddr 20FFE9h +002D87r 1 EA FF 20 .faraddr 20FFEAh +002D8Ar 1 EB FF 20 .faraddr 20FFEBh +002D8Dr 1 EC FF 20 .faraddr 20FFECh +002D90r 1 ED FF 20 .faraddr 20FFEDh +002D93r 1 EE FF 20 .faraddr 20FFEEh +002D96r 1 EF FF 20 .faraddr 20FFEFh +002D99r 1 F0 FF 20 .faraddr 20FFF0h +002D9Cr 1 F1 FF 20 .faraddr 20FFF1h +002D9Fr 1 F2 FF 20 .faraddr 20FFF2h +002DA2r 1 F3 FF 20 .faraddr 20FFF3h +002DA5r 1 F4 FF 20 .faraddr 20FFF4h +002DA8r 1 F5 FF 20 .faraddr 20FFF5h +002DABr 1 F6 FF 20 .faraddr 20FFF6h +002DAEr 1 F7 FF 20 .faraddr 20FFF7h +002DB1r 1 F8 FF 20 .faraddr 20FFF8h +002DB4r 1 F9 FF 20 .faraddr 20FFF9h +002DB7r 1 FA FF 20 .faraddr 20FFFAh +002DBAr 1 FB FF 20 .faraddr 20FFFBh +002DBDr 1 FC FF 20 .faraddr 20FFFCh +002DC0r 1 FD FF 20 .faraddr 20FFFDh +002DC3r 1 FE FF 20 .faraddr 20FFFEh +002DC6r 1 FF FF 20 .faraddr 20FFFFh +002DC9r 1 00 00 21 .faraddr 210000h +002DCCr 1 01 00 21 .faraddr 210001h +002DCFr 1 02 00 21 .faraddr 210002h +002DD2r 1 03 00 21 .faraddr 210003h +002DD5r 1 04 00 21 .faraddr 210004h +002DD8r 1 05 00 21 .faraddr 210005h +002DDBr 1 06 00 21 .faraddr 210006h +002DDEr 1 07 00 21 .faraddr 210007h +002DE1r 1 08 00 21 .faraddr 210008h +002DE4r 1 09 00 21 .faraddr 210009h +002DE7r 1 0A 00 21 .faraddr 21000Ah +002DEAr 1 0B 00 21 .faraddr 21000Bh +002DEDr 1 0C 00 21 .faraddr 21000Ch +002DF0r 1 0D 00 21 .faraddr 21000Dh +002DF3r 1 0E 00 21 .faraddr 21000Eh +002DF6r 1 0F 00 21 .faraddr 21000Fh +002DF9r 1 E1 FF 7F .faraddr 7FFFE1h +002DFCr 1 E2 FF 7F .faraddr 7FFFE2h +002DFFr 1 E3 FF 7F .faraddr 7FFFE3h +002E02r 1 E4 FF 7F .faraddr 7FFFE4h +002E05r 1 E5 FF 7F .faraddr 7FFFE5h +002E08r 1 E6 FF 7F .faraddr 7FFFE6h +002E0Br 1 E7 FF 7F .faraddr 7FFFE7h +002E0Er 1 E8 FF 7F .faraddr 7FFFE8h +002E11r 1 E9 FF 7F .faraddr 7FFFE9h +002E14r 1 EA FF 7F .faraddr 7FFFEAh +002E17r 1 EB FF 7F .faraddr 7FFFEBh +002E1Ar 1 EC FF 7F .faraddr 7FFFECh +002E1Dr 1 ED FF 7F .faraddr 7FFFEDh +002E20r 1 EE FF 7F .faraddr 7FFFEEh +002E23r 1 EF FF 7F .faraddr 7FFFEFh +002E26r 1 F0 FF 7F .faraddr 7FFFF0h +002E29r 1 F1 FF 7F .faraddr 7FFFF1h +002E2Cr 1 F2 FF 7F .faraddr 7FFFF2h +002E2Fr 1 F3 FF 7F .faraddr 7FFFF3h +002E32r 1 F4 FF 7F .faraddr 7FFFF4h +002E35r 1 F5 FF 7F .faraddr 7FFFF5h +002E38r 1 F6 FF 7F .faraddr 7FFFF6h +002E3Br 1 F7 FF 7F .faraddr 7FFFF7h +002E3Er 1 F8 FF 7F .faraddr 7FFFF8h +002E41r 1 F9 FF 7F .faraddr 7FFFF9h +002E44r 1 FA FF 7F .faraddr 7FFFFAh +002E47r 1 FB FF 7F .faraddr 7FFFFBh +002E4Ar 1 FC FF 7F .faraddr 7FFFFCh +002E4Dr 1 FD FF 7F .faraddr 7FFFFDh +002E50r 1 FE FF 7F .faraddr 7FFFFEh +002E53r 1 FF FF 7F .faraddr 7FFFFFh +002E56r 1 00 00 80 .faraddr 800000h +002E59r 1 01 00 80 .faraddr 800001h +002E5Cr 1 02 00 80 .faraddr 800002h +002E5Fr 1 03 00 80 .faraddr 800003h +002E62r 1 04 00 80 .faraddr 800004h +002E65r 1 05 00 80 .faraddr 800005h +002E68r 1 06 00 80 .faraddr 800006h +002E6Br 1 07 00 80 .faraddr 800007h +002E6Er 1 08 00 80 .faraddr 800008h +002E71r 1 09 00 80 .faraddr 800009h +002E74r 1 0A 00 80 .faraddr 80000Ah +002E77r 1 0B 00 80 .faraddr 80000Bh +002E7Ar 1 0C 00 80 .faraddr 80000Ch +002E7Dr 1 0D 00 80 .faraddr 80000Dh +002E80r 1 0E 00 80 .faraddr 80000Eh +002E83r 1 0F 00 80 .faraddr 80000Fh +002E86r 1 E1 FF 9F .faraddr 9FFFE1h +002E89r 1 E2 FF 9F .faraddr 9FFFE2h +002E8Cr 1 E3 FF 9F .faraddr 9FFFE3h +002E8Fr 1 E4 FF 9F .faraddr 9FFFE4h +002E92r 1 E5 FF 9F .faraddr 9FFFE5h +002E95r 1 E6 FF 9F .faraddr 9FFFE6h +002E98r 1 E7 FF 9F .faraddr 9FFFE7h +002E9Br 1 E8 FF 9F .faraddr 9FFFE8h +002E9Er 1 E9 FF 9F .faraddr 9FFFE9h +002EA1r 1 EA FF 9F .faraddr 9FFFEAh +002EA4r 1 EB FF 9F .faraddr 9FFFEBh +002EA7r 1 EC FF 9F .faraddr 9FFFECh +002EAAr 1 ED FF 9F .faraddr 9FFFEDh +002EADr 1 EE FF 9F .faraddr 9FFFEEh +002EB0r 1 EF FF 9F .faraddr 9FFFEFh +002EB3r 1 F0 FF 9F .faraddr 9FFFF0h +002EB6r 1 F1 FF 9F .faraddr 9FFFF1h +002EB9r 1 F2 FF 9F .faraddr 9FFFF2h +002EBCr 1 F3 FF 9F .faraddr 9FFFF3h +002EBFr 1 F4 FF 9F .faraddr 9FFFF4h +002EC2r 1 F5 FF 9F .faraddr 9FFFF5h +002EC5r 1 F6 FF 9F .faraddr 9FFFF6h +002EC8r 1 F7 FF 9F .faraddr 9FFFF7h +002ECBr 1 F8 FF 9F .faraddr 9FFFF8h +002ECEr 1 F9 FF 9F .faraddr 9FFFF9h +002ED1r 1 FA FF 9F .faraddr 9FFFFAh +002ED4r 1 FB FF 9F .faraddr 9FFFFBh +002ED7r 1 FC FF 9F .faraddr 9FFFFCh +002EDAr 1 FD FF 9F .faraddr 9FFFFDh +002EDDr 1 FE FF 9F .faraddr 9FFFFEh +002EE0r 1 FF FF 9F .faraddr 9FFFFFh +002EE3r 1 00 00 A0 .faraddr 0A00000h +002EE6r 1 01 00 A0 .faraddr 0A00001h +002EE9r 1 02 00 A0 .faraddr 0A00002h +002EECr 1 03 00 A0 .faraddr 0A00003h +002EEFr 1 04 00 A0 .faraddr 0A00004h +002EF2r 1 05 00 A0 .faraddr 0A00005h +002EF5r 1 06 00 A0 .faraddr 0A00006h +002EF8r 1 07 00 A0 .faraddr 0A00007h +002EFBr 1 08 00 A0 .faraddr 0A00008h +002EFEr 1 09 00 A0 .faraddr 0A00009h +002F01r 1 0A 00 A0 .faraddr 0A0000Ah +002F04r 1 0B 00 A0 .faraddr 0A0000Bh +002F07r 1 0C 00 A0 .faraddr 0A0000Ch +002F0Ar 1 0D 00 A0 .faraddr 0A0000Dh +002F0Dr 1 0E 00 A0 .faraddr 0A0000Eh +002F10r 1 0F 00 A0 .faraddr 0A0000Fh +002F13r 1 E1 FF FF .faraddr 0FFFFE1h +002F16r 1 E2 FF FF .faraddr 0FFFFE2h +002F19r 1 E3 FF FF .faraddr 0FFFFE3h +002F1Cr 1 E4 FF FF .faraddr 0FFFFE4h +002F1Fr 1 E5 FF FF .faraddr 0FFFFE5h +002F22r 1 E6 FF FF .faraddr 0FFFFE6h +002F25r 1 E7 FF FF .faraddr 0FFFFE7h +002F28r 1 E8 FF FF .faraddr 0FFFFE8h +002F2Br 1 E9 FF FF .faraddr 0FFFFE9h +002F2Er 1 EA FF FF .faraddr 0FFFFEAh +002F31r 1 EB FF FF .faraddr 0FFFFEBh +002F34r 1 EC FF FF .faraddr 0FFFFECh +002F37r 1 ED FF FF .faraddr 0FFFFEDh +002F3Ar 1 EE FF FF .faraddr 0FFFFEEh +002F3Dr 1 EF FF FF .faraddr 0FFFFEFh +002F40r 1 F0 FF FF .faraddr 0FFFFF0h +002F43r 1 F1 FF FF .faraddr 0FFFFF1h +002F46r 1 F2 FF FF .faraddr 0FFFFF2h +002F49r 1 F3 FF FF .faraddr 0FFFFF3h +002F4Cr 1 F4 FF FF .faraddr 0FFFFF4h +002F4Fr 1 F5 FF FF .faraddr 0FFFFF5h +002F52r 1 F6 FF FF .faraddr 0FFFFF6h +002F55r 1 F7 FF FF .faraddr 0FFFFF7h +002F58r 1 F8 FF FF .faraddr 0FFFFF8h +002F5Br 1 F9 FF FF .faraddr 0FFFFF9h +002F5Er 1 FA FF FF .faraddr 0FFFFFAh +002F61r 1 FB FF FF .faraddr 0FFFFFBh +002F64r 1 FC FF FF .faraddr 0FFFFFCh +002F67r 1 FD FF FF .faraddr 0FFFFFDh +002F6Ar 1 FE FF FF .faraddr 0FFFFFEh +002F6Dr 1 FF FF FF .faraddr 0FFFFFFh +002F70r 1 +002F70r 1 ; alternative 8-digit hex values +002F70r 1 00 00 00 .faraddr 00000000h +002F73r 1 01 00 00 .faraddr 00000001h +002F76r 1 02 00 00 .faraddr 00000002h +002F79r 1 03 00 00 .faraddr 00000003h +002F7Cr 1 04 00 00 .faraddr 00000004h +002F7Fr 1 05 00 00 .faraddr 00000005h +002F82r 1 06 00 00 .faraddr 00000006h +002F85r 1 07 00 00 .faraddr 00000007h +002F88r 1 08 00 00 .faraddr 00000008h +002F8Br 1 09 00 00 .faraddr 00000009h +002F8Er 1 0A 00 00 .faraddr 0000000ah +002F91r 1 0B 00 00 .faraddr 0000000bh +002F94r 1 0C 00 00 .faraddr 0000000ch +002F97r 1 0D 00 00 .faraddr 0000000dh +002F9Ar 1 0E 00 00 .faraddr 0000000eh +002F9Dr 1 0F 00 00 .faraddr 0000000fh +002FA0r 1 10 00 00 .faraddr 00000010h +002FA3r 1 11 00 00 .faraddr 00000011h +002FA6r 1 12 00 00 .faraddr 00000012h +002FA9r 1 13 00 00 .faraddr 00000013h +002FACr 1 70 00 00 .faraddr 00000070h +002FAFr 1 71 00 00 .faraddr 00000071h +002FB2r 1 72 00 00 .faraddr 00000072h +002FB5r 1 73 00 00 .faraddr 00000073h +002FB8r 1 74 00 00 .faraddr 00000074h +002FBBr 1 75 00 00 .faraddr 00000075h +002FBEr 1 76 00 00 .faraddr 00000076h +002FC1r 1 77 00 00 .faraddr 00000077h +002FC4r 1 78 00 00 .faraddr 00000078h +002FC7r 1 79 00 00 .faraddr 00000079h +002FCAr 1 7A 00 00 .faraddr 0000007ah +002FCDr 1 7B 00 00 .faraddr 0000007bh +002FD0r 1 7C 00 00 .faraddr 0000007ch +002FD3r 1 7D 00 00 .faraddr 0000007dh +002FD6r 1 7E 00 00 .faraddr 0000007eh +002FD9r 1 7F 00 00 .faraddr 0000007fh +002FDCr 1 80 00 00 .faraddr 00000080h +002FDFr 1 81 00 00 .faraddr 00000081h +002FE2r 1 82 00 00 .faraddr 00000082h +002FE5r 1 83 00 00 .faraddr 00000083h +002FE8r 1 84 00 00 .faraddr 00000084h +002FEBr 1 85 00 00 .faraddr 00000085h +002FEEr 1 86 00 00 .faraddr 00000086h +002FF1r 1 F0 00 00 .faraddr 000000f0h +002FF4r 1 F1 00 00 .faraddr 000000f1h +002FF7r 1 F2 00 00 .faraddr 000000f2h +002FFAr 1 F3 00 00 .faraddr 000000f3h +002FFDr 1 F4 00 00 .faraddr 000000f4h +003000r 1 F5 00 00 .faraddr 000000f5h +003003r 1 F6 00 00 .faraddr 000000f6h +003006r 1 F7 00 00 .faraddr 000000f7h +003009r 1 F8 00 00 .faraddr 000000f8h +00300Cr 1 F9 00 00 .faraddr 000000f9h +00300Fr 1 FA 00 00 .faraddr 000000fah +003012r 1 FB 00 00 .faraddr 000000fbh +003015r 1 FC 00 00 .faraddr 000000fch +003018r 1 FD 00 00 .faraddr 000000fdh +00301Br 1 FE 00 00 .faraddr 000000feh +00301Er 1 FF 00 00 .faraddr 000000ffh +003021r 1 00 01 00 .faraddr 00000100h +003024r 1 01 01 00 .faraddr 00000101h +003027r 1 02 01 00 .faraddr 00000102h +00302Ar 1 03 01 00 .faraddr 00000103h +00302Dr 1 D2 0F 00 .faraddr 00000fd2h +003030r 1 D3 0F 00 .faraddr 00000fd3h +003033r 1 D4 0F 00 .faraddr 00000fd4h +003036r 1 D5 0F 00 .faraddr 00000fd5h +003039r 1 D6 0F 00 .faraddr 00000fd6h +00303Cr 1 D7 0F 00 .faraddr 00000fd7h +00303Fr 1 D8 0F 00 .faraddr 00000fd8h +003042r 1 D9 0F 00 .faraddr 00000fd9h +003045r 1 DA 0F 00 .faraddr 00000fdah +003048r 1 DB 0F 00 .faraddr 00000fdbh +00304Br 1 DC 0F 00 .faraddr 00000fdch +00304Er 1 DD 0F 00 .faraddr 00000fddh +003051r 1 DE 0F 00 .faraddr 00000fdeh +003054r 1 DF 0F 00 .faraddr 00000fdfh +003057r 1 E0 0F 00 .faraddr 00000fe0h +00305Ar 1 E1 0F 00 .faraddr 00000fe1h +00305Dr 1 E2 0F 00 .faraddr 00000fe2h +003060r 1 E3 0F 00 .faraddr 00000fe3h +003063r 1 E4 0F 00 .faraddr 00000fe4h +003066r 1 E5 0F 00 .faraddr 00000fe5h +003069r 1 E6 0F 00 .faraddr 00000fe6h +00306Cr 1 E7 0F 00 .faraddr 00000fe7h +00306Fr 1 E8 0F 00 .faraddr 00000fe8h +003072r 1 E9 0F 00 .faraddr 00000fe9h +003075r 1 EA 0F 00 .faraddr 00000feah +003078r 1 EB 0F 00 .faraddr 00000febh +00307Br 1 EC 0F 00 .faraddr 00000fech +00307Er 1 ED 0F 00 .faraddr 00000fedh +003081r 1 EE 0F 00 .faraddr 00000feeh +003084r 1 EF 0F 00 .faraddr 00000fefh +003087r 1 F0 0F 00 .faraddr 00000ff0h +00308Ar 1 F1 0F 00 .faraddr 00000ff1h +00308Dr 1 F2 0F 00 .faraddr 00000ff2h +003090r 1 F3 0F 00 .faraddr 00000ff3h +003093r 1 F4 0F 00 .faraddr 00000ff4h +003096r 1 F5 0F 00 .faraddr 00000ff5h +003099r 1 F6 0F 00 .faraddr 00000ff6h +00309Cr 1 F7 0F 00 .faraddr 00000ff7h +00309Fr 1 F8 0F 00 .faraddr 00000ff8h +0030A2r 1 F9 0F 00 .faraddr 00000ff9h +0030A5r 1 FA 0F 00 .faraddr 00000ffah +0030A8r 1 FB 0F 00 .faraddr 00000ffbh +0030ABr 1 FC 0F 00 .faraddr 00000ffch +0030AEr 1 FD 0F 00 .faraddr 00000ffdh +0030B1r 1 FE 0F 00 .faraddr 00000ffeh +0030B4r 1 FF 0F 00 .faraddr 00000fffh +0030B7r 1 00 10 00 .faraddr 00001000h +0030BAr 1 01 10 00 .faraddr 00001001h +0030BDr 1 02 10 00 .faraddr 00001002h +0030C0r 1 03 10 00 .faraddr 00001003h +0030C3r 1 04 10 00 .faraddr 00001004h +0030C6r 1 05 10 00 .faraddr 00001005h +0030C9r 1 06 10 00 .faraddr 00001006h +0030CCr 1 07 10 00 .faraddr 00001007h +0030CFr 1 08 10 00 .faraddr 00001008h +0030D2r 1 F0 7F 00 .faraddr 00007ff0h +0030D5r 1 F1 7F 00 .faraddr 00007ff1h +0030D8r 1 F2 7F 00 .faraddr 00007ff2h +0030DBr 1 F3 7F 00 .faraddr 00007ff3h +0030DEr 1 F4 7F 00 .faraddr 00007ff4h +0030E1r 1 F5 7F 00 .faraddr 00007ff5h +0030E4r 1 F6 7F 00 .faraddr 00007ff6h +0030E7r 1 F7 7F 00 .faraddr 00007ff7h +0030EAr 1 F8 7F 00 .faraddr 00007ff8h +0030EDr 1 F9 7F 00 .faraddr 00007ff9h +0030F0r 1 FA 7F 00 .faraddr 00007ffah +0030F3r 1 FB 7F 00 .faraddr 00007ffbh +0030F6r 1 FC 7F 00 .faraddr 00007ffch +0030F9r 1 FD 7F 00 .faraddr 00007ffdh +0030FCr 1 FE 7F 00 .faraddr 00007ffeh +0030FFr 1 FF 7F 00 .faraddr 00007fffh +003102r 1 00 80 00 .faraddr 00008000h +003105r 1 01 80 00 .faraddr 00008001h +003108r 1 02 80 00 .faraddr 00008002h +00310Br 1 03 80 00 .faraddr 00008003h +00310Er 1 04 80 00 .faraddr 00008004h +003111r 1 05 80 00 .faraddr 00008005h +003114r 1 06 80 00 .faraddr 00008006h +003117r 1 07 80 00 .faraddr 00008007h +00311Ar 1 08 80 00 .faraddr 00008008h +00311Dr 1 09 80 00 .faraddr 00008009h +003120r 1 0A 80 00 .faraddr 0000800ah +003123r 1 0B 80 00 .faraddr 0000800bh +003126r 1 E1 9F 00 .faraddr 00009fe1h +003129r 1 E2 9F 00 .faraddr 00009fe2h +00312Cr 1 E3 9F 00 .faraddr 00009fe3h +00312Fr 1 E4 9F 00 .faraddr 00009fe4h +003132r 1 E5 9F 00 .faraddr 00009fe5h +003135r 1 E6 9F 00 .faraddr 00009fe6h +003138r 1 E7 9F 00 .faraddr 00009fe7h +00313Br 1 E8 9F 00 .faraddr 00009fe8h +00313Er 1 E9 9F 00 .faraddr 00009fe9h +003141r 1 EA 9F 00 .faraddr 00009feah +003144r 1 EB 9F 00 .faraddr 00009febh +003147r 1 EC 9F 00 .faraddr 00009fech +00314Ar 1 ED 9F 00 .faraddr 00009fedh +00314Dr 1 EE 9F 00 .faraddr 00009feeh +003150r 1 EF 9F 00 .faraddr 00009fefh +003153r 1 F0 9F 00 .faraddr 00009ff0h +003156r 1 F1 9F 00 .faraddr 00009ff1h +003159r 1 F2 9F 00 .faraddr 00009ff2h +00315Cr 1 F3 9F 00 .faraddr 00009ff3h +00315Fr 1 F4 9F 00 .faraddr 00009ff4h +003162r 1 F5 9F 00 .faraddr 00009ff5h +003165r 1 F6 9F 00 .faraddr 00009ff6h +003168r 1 F7 9F 00 .faraddr 00009ff7h +00316Br 1 F8 9F 00 .faraddr 00009ff8h +00316Er 1 F9 9F 00 .faraddr 00009ff9h +003171r 1 FA 9F 00 .faraddr 00009ffah +003174r 1 FB 9F 00 .faraddr 00009ffbh +003177r 1 FC 9F 00 .faraddr 00009ffch +00317Ar 1 FD 9F 00 .faraddr 00009ffdh +00317Dr 1 FE 9F 00 .faraddr 00009ffeh +003180r 1 FF 9F 00 .faraddr 00009fffh +003183r 1 00 A0 00 .faraddr 0000a000h +003186r 1 01 A0 00 .faraddr 0000a001h +003189r 1 02 A0 00 .faraddr 0000a002h +00318Cr 1 03 A0 00 .faraddr 0000a003h +00318Fr 1 04 A0 00 .faraddr 0000a004h +003192r 1 05 A0 00 .faraddr 0000a005h +003195r 1 06 A0 00 .faraddr 0000a006h +003198r 1 07 A0 00 .faraddr 0000a007h +00319Br 1 08 A0 00 .faraddr 0000a008h +00319Er 1 09 A0 00 .faraddr 0000a009h +0031A1r 1 0A A0 00 .faraddr 0000a00ah +0031A4r 1 0B A0 00 .faraddr 0000a00bh +0031A7r 1 0C A0 00 .faraddr 0000a00ch +0031AAr 1 0D A0 00 .faraddr 0000a00dh +0031ADr 1 0E A0 00 .faraddr 0000a00eh +0031B0r 1 0F A0 00 .faraddr 0000a00fh +0031B3r 1 E1 AF 00 .faraddr 0000afe1h +0031B6r 1 E2 AF 00 .faraddr 0000afe2h +0031B9r 1 E3 AF 00 .faraddr 0000afe3h +0031BCr 1 E4 AF 00 .faraddr 0000afe4h +0031BFr 1 E5 AF 00 .faraddr 0000afe5h +0031C2r 1 E6 AF 00 .faraddr 0000afe6h +0031C5r 1 E7 AF 00 .faraddr 0000afe7h +0031C8r 1 E8 AF 00 .faraddr 0000afe8h +0031CBr 1 E9 AF 00 .faraddr 0000afe9h +0031CEr 1 EA AF 00 .faraddr 0000afeah +0031D1r 1 EB AF 00 .faraddr 0000afebh +0031D4r 1 EC AF 00 .faraddr 0000afech +0031D7r 1 ED AF 00 .faraddr 0000afedh +0031DAr 1 EE AF 00 .faraddr 0000afeeh +0031DDr 1 EF AF 00 .faraddr 0000afefh +0031E0r 1 F0 AF 00 .faraddr 0000aff0h +0031E3r 1 F1 AF 00 .faraddr 0000aff1h +0031E6r 1 F2 AF 00 .faraddr 0000aff2h +0031E9r 1 F3 AF 00 .faraddr 0000aff3h +0031ECr 1 F4 AF 00 .faraddr 0000aff4h +0031EFr 1 F5 AF 00 .faraddr 0000aff5h +0031F2r 1 F6 AF 00 .faraddr 0000aff6h +0031F5r 1 F7 AF 00 .faraddr 0000aff7h +0031F8r 1 F8 AF 00 .faraddr 0000aff8h +0031FBr 1 F9 AF 00 .faraddr 0000aff9h +0031FEr 1 FA AF 00 .faraddr 0000affah +003201r 1 FB AF 00 .faraddr 0000affbh +003204r 1 FC AF 00 .faraddr 0000affch +003207r 1 FD AF 00 .faraddr 0000affdh +00320Ar 1 FE AF 00 .faraddr 0000affeh +00320Dr 1 FF AF 00 .faraddr 0000afffh +003210r 1 00 B0 00 .faraddr 0000b000h +003213r 1 01 B0 00 .faraddr 0000b001h +003216r 1 02 B0 00 .faraddr 0000b002h +003219r 1 03 B0 00 .faraddr 0000b003h +00321Cr 1 04 B0 00 .faraddr 0000b004h +00321Fr 1 05 B0 00 .faraddr 0000b005h +003222r 1 06 B0 00 .faraddr 0000b006h +003225r 1 07 B0 00 .faraddr 0000b007h +003228r 1 08 B0 00 .faraddr 0000b008h +00322Br 1 09 B0 00 .faraddr 0000b009h +00322Er 1 0A B0 00 .faraddr 0000b00ah +003231r 1 0B B0 00 .faraddr 0000b00bh +003234r 1 0C B0 00 .faraddr 0000b00ch +003237r 1 0D B0 00 .faraddr 0000b00dh +00323Ar 1 0E B0 00 .faraddr 0000b00eh +00323Dr 1 0F B0 00 .faraddr 0000b00fh +003240r 1 E1 FF 00 .faraddr 0000ffe1h +003243r 1 E2 FF 00 .faraddr 0000ffe2h +003246r 1 E3 FF 00 .faraddr 0000ffe3h +003249r 1 E4 FF 00 .faraddr 0000ffe4h +00324Cr 1 E5 FF 00 .faraddr 0000ffe5h +00324Fr 1 E6 FF 00 .faraddr 0000ffe6h +003252r 1 E7 FF 00 .faraddr 0000ffe7h +003255r 1 E8 FF 00 .faraddr 0000ffe8h +003258r 1 E9 FF 00 .faraddr 0000ffe9h +00325Br 1 EA FF 00 .faraddr 0000ffeah +00325Er 1 EB FF 00 .faraddr 0000ffebh +003261r 1 EC FF 00 .faraddr 0000ffech +003264r 1 ED FF 00 .faraddr 0000ffedh +003267r 1 EE FF 00 .faraddr 0000ffeeh +00326Ar 1 EF FF 00 .faraddr 0000ffefh +00326Dr 1 F0 FF 00 .faraddr 0000fff0h +003270r 1 F1 FF 00 .faraddr 0000fff1h +003273r 1 F2 FF 00 .faraddr 0000fff2h +003276r 1 F3 FF 00 .faraddr 0000fff3h +003279r 1 F4 FF 00 .faraddr 0000fff4h +00327Cr 1 F5 FF 00 .faraddr 0000fff5h +00327Fr 1 F6 FF 00 .faraddr 0000fff6h +003282r 1 F7 FF 00 .faraddr 0000fff7h +003285r 1 F8 FF 00 .faraddr 0000fff8h +003288r 1 F9 FF 00 .faraddr 0000fff9h +00328Br 1 FA FF 00 .faraddr 0000fffah +00328Er 1 FB FF 00 .faraddr 0000fffbh +003291r 1 FC FF 00 .faraddr 0000fffch +003294r 1 FD FF 00 .faraddr 0000fffdh +003297r 1 FE FF 00 .faraddr 0000fffeh +00329Ar 1 FF FF 00 .faraddr 0000ffffh +00329Dr 1 00 00 01 .faraddr 00010000h +0032A0r 1 01 00 01 .faraddr 00010001h +0032A3r 1 02 00 01 .faraddr 00010002h +0032A6r 1 03 00 01 .faraddr 00010003h +0032A9r 1 04 00 01 .faraddr 00010004h +0032ACr 1 05 00 01 .faraddr 00010005h +0032AFr 1 06 00 01 .faraddr 00010006h +0032B2r 1 07 00 01 .faraddr 00010007h +0032B5r 1 08 00 01 .faraddr 00010008h +0032B8r 1 09 00 01 .faraddr 00010009h +0032BBr 1 0A 00 01 .faraddr 0001000ah +0032BEr 1 0B 00 01 .faraddr 0001000bh +0032C1r 1 0C 00 01 .faraddr 0001000ch +0032C4r 1 0D 00 01 .faraddr 0001000dh +0032C7r 1 0E 00 01 .faraddr 0001000eh +0032CAr 1 0F 00 01 .faraddr 0001000fh +0032CDr 1 E1 FF 10 .faraddr 0010ffe1h +0032D0r 1 E2 FF 10 .faraddr 0010ffe2h +0032D3r 1 E3 FF 10 .faraddr 0010ffe3h +0032D6r 1 E4 FF 10 .faraddr 0010ffe4h +0032D9r 1 E5 FF 10 .faraddr 0010ffe5h +0032DCr 1 E6 FF 10 .faraddr 0010ffe6h +0032DFr 1 E7 FF 10 .faraddr 0010ffe7h +0032E2r 1 E8 FF 10 .faraddr 0010ffe8h +0032E5r 1 E9 FF 10 .faraddr 0010ffe9h +0032E8r 1 EA FF 10 .faraddr 0010ffeah +0032EBr 1 EB FF 10 .faraddr 0010ffebh +0032EEr 1 EC FF 10 .faraddr 0010ffech +0032F1r 1 ED FF 10 .faraddr 0010ffedh +0032F4r 1 EE FF 10 .faraddr 0010ffeeh +0032F7r 1 EF FF 10 .faraddr 0010ffefh +0032FAr 1 F0 FF 10 .faraddr 0010fff0h +0032FDr 1 F1 FF 10 .faraddr 0010fff1h +003300r 1 F2 FF 10 .faraddr 0010fff2h +003303r 1 F3 FF 10 .faraddr 0010fff3h +003306r 1 F4 FF 10 .faraddr 0010fff4h +003309r 1 F5 FF 10 .faraddr 0010fff5h +00330Cr 1 F6 FF 10 .faraddr 0010fff6h +00330Fr 1 F7 FF 10 .faraddr 0010fff7h +003312r 1 F8 FF 10 .faraddr 0010fff8h +003315r 1 F9 FF 10 .faraddr 0010fff9h +003318r 1 FA FF 10 .faraddr 0010fffah +00331Br 1 FB FF 10 .faraddr 0010fffbh +00331Er 1 FC FF 10 .faraddr 0010fffch +003321r 1 FD FF 10 .faraddr 0010fffdh +003324r 1 FE FF 10 .faraddr 0010fffeh +003327r 1 FF FF 10 .faraddr 0010ffffh +00332Ar 1 00 00 11 .faraddr 00110000h +00332Dr 1 01 00 11 .faraddr 00110001h +003330r 1 02 00 11 .faraddr 00110002h +003333r 1 03 00 11 .faraddr 00110003h +003336r 1 04 00 11 .faraddr 00110004h +003339r 1 05 00 11 .faraddr 00110005h +00333Cr 1 06 00 11 .faraddr 00110006h +00333Fr 1 07 00 11 .faraddr 00110007h +003342r 1 08 00 11 .faraddr 00110008h +003345r 1 09 00 11 .faraddr 00110009h +003348r 1 0A 00 11 .faraddr 0011000ah +00334Br 1 0B 00 11 .faraddr 0011000bh +00334Er 1 0C 00 11 .faraddr 0011000ch +003351r 1 0D 00 11 .faraddr 0011000dh +003354r 1 0E 00 11 .faraddr 0011000eh +003357r 1 0F 00 11 .faraddr 0011000fh +00335Ar 1 E1 FF 20 .faraddr 0020ffe1h +00335Dr 1 E2 FF 20 .faraddr 0020ffe2h +003360r 1 E3 FF 20 .faraddr 0020ffe3h +003363r 1 E4 FF 20 .faraddr 0020ffe4h +003366r 1 E5 FF 20 .faraddr 0020ffe5h +003369r 1 E6 FF 20 .faraddr 0020ffe6h +00336Cr 1 E7 FF 20 .faraddr 0020ffe7h +00336Fr 1 E8 FF 20 .faraddr 0020ffe8h +003372r 1 E9 FF 20 .faraddr 0020ffe9h +003375r 1 EA FF 20 .faraddr 0020ffeah +003378r 1 EB FF 20 .faraddr 0020ffebh +00337Br 1 EC FF 20 .faraddr 0020ffech +00337Er 1 ED FF 20 .faraddr 0020ffedh +003381r 1 EE FF 20 .faraddr 0020ffeeh +003384r 1 EF FF 20 .faraddr 0020ffefh +003387r 1 F0 FF 20 .faraddr 0020fff0h +00338Ar 1 F1 FF 20 .faraddr 0020fff1h +00338Dr 1 F2 FF 20 .faraddr 0020fff2h +003390r 1 F3 FF 20 .faraddr 0020fff3h +003393r 1 F4 FF 20 .faraddr 0020fff4h +003396r 1 F5 FF 20 .faraddr 0020fff5h +003399r 1 F6 FF 20 .faraddr 0020fff6h +00339Cr 1 F7 FF 20 .faraddr 0020fff7h +00339Fr 1 F8 FF 20 .faraddr 0020fff8h +0033A2r 1 F9 FF 20 .faraddr 0020fff9h +0033A5r 1 FA FF 20 .faraddr 0020fffah +0033A8r 1 FB FF 20 .faraddr 0020fffbh +0033ABr 1 FC FF 20 .faraddr 0020fffch +0033AEr 1 FD FF 20 .faraddr 0020fffdh +0033B1r 1 FE FF 20 .faraddr 0020fffeh +0033B4r 1 FF FF 20 .faraddr 0020ffffh +0033B7r 1 00 00 21 .faraddr 00210000h +0033BAr 1 01 00 21 .faraddr 00210001h +0033BDr 1 02 00 21 .faraddr 00210002h +0033C0r 1 03 00 21 .faraddr 00210003h +0033C3r 1 04 00 21 .faraddr 00210004h +0033C6r 1 05 00 21 .faraddr 00210005h +0033C9r 1 06 00 21 .faraddr 00210006h +0033CCr 1 07 00 21 .faraddr 00210007h +0033CFr 1 08 00 21 .faraddr 00210008h +0033D2r 1 09 00 21 .faraddr 00210009h +0033D5r 1 0A 00 21 .faraddr 0021000ah +0033D8r 1 0B 00 21 .faraddr 0021000bh +0033DBr 1 0C 00 21 .faraddr 0021000ch +0033DEr 1 0D 00 21 .faraddr 0021000dh +0033E1r 1 0E 00 21 .faraddr 0021000eh +0033E4r 1 0F 00 21 .faraddr 0021000fh +0033E7r 1 E1 FF 7F .faraddr 007fffe1h +0033EAr 1 E2 FF 7F .faraddr 007fffe2h +0033EDr 1 E3 FF 7F .faraddr 007fffe3h +0033F0r 1 E4 FF 7F .faraddr 007fffe4h +0033F3r 1 E5 FF 7F .faraddr 007fffe5h +0033F6r 1 E6 FF 7F .faraddr 007fffe6h +0033F9r 1 E7 FF 7F .faraddr 007fffe7h +0033FCr 1 E8 FF 7F .faraddr 007fffe8h +0033FFr 1 E9 FF 7F .faraddr 007fffe9h +003402r 1 EA FF 7F .faraddr 007fffeah +003405r 1 EB FF 7F .faraddr 007fffebh +003408r 1 EC FF 7F .faraddr 007fffech +00340Br 1 ED FF 7F .faraddr 007fffedh +00340Er 1 EE FF 7F .faraddr 007fffeeh +003411r 1 EF FF 7F .faraddr 007fffefh +003414r 1 F0 FF 7F .faraddr 007ffff0h +003417r 1 F1 FF 7F .faraddr 007ffff1h +00341Ar 1 F2 FF 7F .faraddr 007ffff2h +00341Dr 1 F3 FF 7F .faraddr 007ffff3h +003420r 1 F4 FF 7F .faraddr 007ffff4h +003423r 1 F5 FF 7F .faraddr 007ffff5h +003426r 1 F6 FF 7F .faraddr 007ffff6h +003429r 1 F7 FF 7F .faraddr 007ffff7h +00342Cr 1 F8 FF 7F .faraddr 007ffff8h +00342Fr 1 F9 FF 7F .faraddr 007ffff9h +003432r 1 FA FF 7F .faraddr 007ffffah +003435r 1 FB FF 7F .faraddr 007ffffbh +003438r 1 FC FF 7F .faraddr 007ffffch +00343Br 1 FD FF 7F .faraddr 007ffffdh +00343Er 1 FE FF 7F .faraddr 007ffffeh +003441r 1 FF FF 7F .faraddr 007fffffh +003444r 1 00 00 80 .faraddr 00800000h +003447r 1 01 00 80 .faraddr 00800001h +00344Ar 1 02 00 80 .faraddr 00800002h +00344Dr 1 03 00 80 .faraddr 00800003h +003450r 1 04 00 80 .faraddr 00800004h +003453r 1 05 00 80 .faraddr 00800005h +003456r 1 06 00 80 .faraddr 00800006h +003459r 1 07 00 80 .faraddr 00800007h +00345Cr 1 08 00 80 .faraddr 00800008h +00345Fr 1 09 00 80 .faraddr 00800009h +003462r 1 0A 00 80 .faraddr 0080000ah +003465r 1 0B 00 80 .faraddr 0080000bh +003468r 1 0C 00 80 .faraddr 0080000ch +00346Br 1 0D 00 80 .faraddr 0080000dh +00346Er 1 0E 00 80 .faraddr 0080000eh +003471r 1 0F 00 80 .faraddr 0080000fh +003474r 1 E1 FF 9F .faraddr 009fffe1h +003477r 1 E2 FF 9F .faraddr 009fffe2h +00347Ar 1 E3 FF 9F .faraddr 009fffe3h +00347Dr 1 E4 FF 9F .faraddr 009fffe4h +003480r 1 E5 FF 9F .faraddr 009fffe5h +003483r 1 E6 FF 9F .faraddr 009fffe6h +003486r 1 E7 FF 9F .faraddr 009fffe7h +003489r 1 E8 FF 9F .faraddr 009fffe8h +00348Cr 1 E9 FF 9F .faraddr 009fffe9h +00348Fr 1 EA FF 9F .faraddr 009fffeah +003492r 1 EB FF 9F .faraddr 009fffebh +003495r 1 EC FF 9F .faraddr 009fffech +003498r 1 ED FF 9F .faraddr 009fffedh +00349Br 1 EE FF 9F .faraddr 009fffeeh +00349Er 1 EF FF 9F .faraddr 009fffefh +0034A1r 1 F0 FF 9F .faraddr 009ffff0h +0034A4r 1 F1 FF 9F .faraddr 009ffff1h +0034A7r 1 F2 FF 9F .faraddr 009ffff2h +0034AAr 1 F3 FF 9F .faraddr 009ffff3h +0034ADr 1 F4 FF 9F .faraddr 009ffff4h +0034B0r 1 F5 FF 9F .faraddr 009ffff5h +0034B3r 1 F6 FF 9F .faraddr 009ffff6h +0034B6r 1 F7 FF 9F .faraddr 009ffff7h +0034B9r 1 F8 FF 9F .faraddr 009ffff8h +0034BCr 1 F9 FF 9F .faraddr 009ffff9h +0034BFr 1 FA FF 9F .faraddr 009ffffah +0034C2r 1 FB FF 9F .faraddr 009ffffbh +0034C5r 1 FC FF 9F .faraddr 009ffffch +0034C8r 1 FD FF 9F .faraddr 009ffffdh +0034CBr 1 FE FF 9F .faraddr 009ffffeh +0034CEr 1 FF FF 9F .faraddr 009fffffh +0034D1r 1 00 00 A0 .faraddr 00a00000h +0034D4r 1 01 00 A0 .faraddr 00a00001h +0034D7r 1 02 00 A0 .faraddr 00a00002h +0034DAr 1 03 00 A0 .faraddr 00a00003h +0034DDr 1 04 00 A0 .faraddr 00a00004h +0034E0r 1 05 00 A0 .faraddr 00a00005h +0034E3r 1 06 00 A0 .faraddr 00a00006h +0034E6r 1 07 00 A0 .faraddr 00a00007h +0034E9r 1 08 00 A0 .faraddr 00a00008h +0034ECr 1 09 00 A0 .faraddr 00a00009h +0034EFr 1 0A 00 A0 .faraddr 00a0000ah +0034F2r 1 0B 00 A0 .faraddr 00a0000bh +0034F5r 1 0C 00 A0 .faraddr 00a0000ch +0034F8r 1 0D 00 A0 .faraddr 00a0000dh +0034FBr 1 0E 00 A0 .faraddr 00a0000eh +0034FEr 1 0F 00 A0 .faraddr 00a0000fh +003501r 1 E1 FF FF .faraddr 00ffffe1h +003504r 1 E2 FF FF .faraddr 00ffffe2h +003507r 1 E3 FF FF .faraddr 00ffffe3h +00350Ar 1 E4 FF FF .faraddr 00ffffe4h +00350Dr 1 E5 FF FF .faraddr 00ffffe5h +003510r 1 E6 FF FF .faraddr 00ffffe6h +003513r 1 E7 FF FF .faraddr 00ffffe7h +003516r 1 E8 FF FF .faraddr 00ffffe8h +003519r 1 E9 FF FF .faraddr 00ffffe9h +00351Cr 1 EA FF FF .faraddr 00ffffeah +00351Fr 1 EB FF FF .faraddr 00ffffebh +003522r 1 EC FF FF .faraddr 00ffffech +003525r 1 ED FF FF .faraddr 00ffffedh +003528r 1 EE FF FF .faraddr 00ffffeeh +00352Br 1 EF FF FF .faraddr 00ffffefh +00352Er 1 F0 FF FF .faraddr 00fffff0h +003531r 1 F1 FF FF .faraddr 00fffff1h +003534r 1 F2 FF FF .faraddr 00fffff2h +003537r 1 F3 FF FF .faraddr 00fffff3h +00353Ar 1 F4 FF FF .faraddr 00fffff4h +00353Dr 1 F5 FF FF .faraddr 00fffff5h +003540r 1 F6 FF FF .faraddr 00fffff6h +003543r 1 F7 FF FF .faraddr 00fffff7h +003546r 1 F8 FF FF .faraddr 00fffff8h +003549r 1 F9 FF FF .faraddr 00fffff9h +00354Cr 1 FA FF FF .faraddr 00fffffah +00354Fr 1 FB FF FF .faraddr 00fffffbh +003552r 1 FC FF FF .faraddr 00fffffch +003555r 1 FD FF FF .faraddr 00fffffdh +003558r 1 FE FF FF .faraddr 00fffffeh +00355Br 1 FF FF FF .faraddr 00ffffffh +00355Er 1 +00355Er 1 ; alternative 8-digit hex values, uppercase +00355Er 1 00 00 00 .faraddr 00000000h +003561r 1 01 00 00 .faraddr 00000001h +003564r 1 02 00 00 .faraddr 00000002h +003567r 1 03 00 00 .faraddr 00000003h +00356Ar 1 04 00 00 .faraddr 00000004h +00356Dr 1 05 00 00 .faraddr 00000005h +003570r 1 06 00 00 .faraddr 00000006h +003573r 1 07 00 00 .faraddr 00000007h +003576r 1 08 00 00 .faraddr 00000008h +003579r 1 09 00 00 .faraddr 00000009h +00357Cr 1 0A 00 00 .faraddr 0000000Ah +00357Fr 1 0B 00 00 .faraddr 0000000Bh +003582r 1 0C 00 00 .faraddr 0000000Ch +003585r 1 0D 00 00 .faraddr 0000000Dh +003588r 1 0E 00 00 .faraddr 0000000Eh +00358Br 1 0F 00 00 .faraddr 0000000Fh +00358Er 1 10 00 00 .faraddr 00000010h +003591r 1 11 00 00 .faraddr 00000011h +003594r 1 12 00 00 .faraddr 00000012h +003597r 1 13 00 00 .faraddr 00000013h +00359Ar 1 70 00 00 .faraddr 00000070h +00359Dr 1 71 00 00 .faraddr 00000071h +0035A0r 1 72 00 00 .faraddr 00000072h +0035A3r 1 73 00 00 .faraddr 00000073h +0035A6r 1 74 00 00 .faraddr 00000074h +0035A9r 1 75 00 00 .faraddr 00000075h +0035ACr 1 76 00 00 .faraddr 00000076h +0035AFr 1 77 00 00 .faraddr 00000077h +0035B2r 1 78 00 00 .faraddr 00000078h +0035B5r 1 79 00 00 .faraddr 00000079h +0035B8r 1 7A 00 00 .faraddr 0000007Ah +0035BBr 1 7B 00 00 .faraddr 0000007Bh +0035BEr 1 7C 00 00 .faraddr 0000007Ch +0035C1r 1 7D 00 00 .faraddr 0000007Dh +0035C4r 1 7E 00 00 .faraddr 0000007Eh +0035C7r 1 7F 00 00 .faraddr 0000007Fh +0035CAr 1 80 00 00 .faraddr 00000080h +0035CDr 1 81 00 00 .faraddr 00000081h +0035D0r 1 82 00 00 .faraddr 00000082h +0035D3r 1 83 00 00 .faraddr 00000083h +0035D6r 1 84 00 00 .faraddr 00000084h +0035D9r 1 85 00 00 .faraddr 00000085h +0035DCr 1 86 00 00 .faraddr 00000086h +0035DFr 1 F0 00 00 .faraddr 000000F0h +0035E2r 1 F1 00 00 .faraddr 000000F1h +0035E5r 1 F2 00 00 .faraddr 000000F2h +0035E8r 1 F3 00 00 .faraddr 000000F3h +0035EBr 1 F4 00 00 .faraddr 000000F4h +0035EEr 1 F5 00 00 .faraddr 000000F5h +0035F1r 1 F6 00 00 .faraddr 000000F6h +0035F4r 1 F7 00 00 .faraddr 000000F7h +0035F7r 1 F8 00 00 .faraddr 000000F8h +0035FAr 1 F9 00 00 .faraddr 000000F9h +0035FDr 1 FA 00 00 .faraddr 000000FAh +003600r 1 FB 00 00 .faraddr 000000FBh +003603r 1 FC 00 00 .faraddr 000000FCh +003606r 1 FD 00 00 .faraddr 000000FDh +003609r 1 FE 00 00 .faraddr 000000FEh +00360Cr 1 FF 00 00 .faraddr 000000FFh +00360Fr 1 00 01 00 .faraddr 00000100h +003612r 1 01 01 00 .faraddr 00000101h +003615r 1 02 01 00 .faraddr 00000102h +003618r 1 03 01 00 .faraddr 00000103h +00361Br 1 D2 0F 00 .faraddr 00000FD2h +00361Er 1 D3 0F 00 .faraddr 00000FD3h +003621r 1 D4 0F 00 .faraddr 00000FD4h +003624r 1 D5 0F 00 .faraddr 00000FD5h +003627r 1 D6 0F 00 .faraddr 00000FD6h +00362Ar 1 D7 0F 00 .faraddr 00000FD7h +00362Dr 1 D8 0F 00 .faraddr 00000FD8h +003630r 1 D9 0F 00 .faraddr 00000FD9h +003633r 1 DA 0F 00 .faraddr 00000FDAh +003636r 1 DB 0F 00 .faraddr 00000FDBh +003639r 1 DC 0F 00 .faraddr 00000FDCh +00363Cr 1 DD 0F 00 .faraddr 00000FDDh +00363Fr 1 DE 0F 00 .faraddr 00000FDEh +003642r 1 DF 0F 00 .faraddr 00000FDFh +003645r 1 E0 0F 00 .faraddr 00000FE0h +003648r 1 E1 0F 00 .faraddr 00000FE1h +00364Br 1 E2 0F 00 .faraddr 00000FE2h +00364Er 1 E3 0F 00 .faraddr 00000FE3h +003651r 1 E4 0F 00 .faraddr 00000FE4h +003654r 1 E5 0F 00 .faraddr 00000FE5h +003657r 1 E6 0F 00 .faraddr 00000FE6h +00365Ar 1 E7 0F 00 .faraddr 00000FE7h +00365Dr 1 E8 0F 00 .faraddr 00000FE8h +003660r 1 E9 0F 00 .faraddr 00000FE9h +003663r 1 EA 0F 00 .faraddr 00000FEAh +003666r 1 EB 0F 00 .faraddr 00000FEBh +003669r 1 EC 0F 00 .faraddr 00000FECh +00366Cr 1 ED 0F 00 .faraddr 00000FEDh +00366Fr 1 EE 0F 00 .faraddr 00000FEEh +003672r 1 EF 0F 00 .faraddr 00000FEFh +003675r 1 F0 0F 00 .faraddr 00000FF0h +003678r 1 F1 0F 00 .faraddr 00000FF1h +00367Br 1 F2 0F 00 .faraddr 00000FF2h +00367Er 1 F3 0F 00 .faraddr 00000FF3h +003681r 1 F4 0F 00 .faraddr 00000FF4h +003684r 1 F5 0F 00 .faraddr 00000FF5h +003687r 1 F6 0F 00 .faraddr 00000FF6h +00368Ar 1 F7 0F 00 .faraddr 00000FF7h +00368Dr 1 F8 0F 00 .faraddr 00000FF8h +003690r 1 F9 0F 00 .faraddr 00000FF9h +003693r 1 FA 0F 00 .faraddr 00000FFAh +003696r 1 FB 0F 00 .faraddr 00000FFBh +003699r 1 FC 0F 00 .faraddr 00000FFCh +00369Cr 1 FD 0F 00 .faraddr 00000FFDh +00369Fr 1 FE 0F 00 .faraddr 00000FFEh +0036A2r 1 FF 0F 00 .faraddr 00000FFFh +0036A5r 1 00 10 00 .faraddr 00001000h +0036A8r 1 01 10 00 .faraddr 00001001h +0036ABr 1 02 10 00 .faraddr 00001002h +0036AEr 1 03 10 00 .faraddr 00001003h +0036B1r 1 04 10 00 .faraddr 00001004h +0036B4r 1 05 10 00 .faraddr 00001005h +0036B7r 1 06 10 00 .faraddr 00001006h +0036BAr 1 07 10 00 .faraddr 00001007h +0036BDr 1 08 10 00 .faraddr 00001008h +0036C0r 1 F0 7F 00 .faraddr 00007FF0h +0036C3r 1 F1 7F 00 .faraddr 00007FF1h +0036C6r 1 F2 7F 00 .faraddr 00007FF2h +0036C9r 1 F3 7F 00 .faraddr 00007FF3h +0036CCr 1 F4 7F 00 .faraddr 00007FF4h +0036CFr 1 F5 7F 00 .faraddr 00007FF5h +0036D2r 1 F6 7F 00 .faraddr 00007FF6h +0036D5r 1 F7 7F 00 .faraddr 00007FF7h +0036D8r 1 F8 7F 00 .faraddr 00007FF8h +0036DBr 1 F9 7F 00 .faraddr 00007FF9h +0036DEr 1 FA 7F 00 .faraddr 00007FFAh +0036E1r 1 FB 7F 00 .faraddr 00007FFBh +0036E4r 1 FC 7F 00 .faraddr 00007FFCh +0036E7r 1 FD 7F 00 .faraddr 00007FFDh +0036EAr 1 FE 7F 00 .faraddr 00007FFEh +0036EDr 1 FF 7F 00 .faraddr 00007FFFh +0036F0r 1 00 80 00 .faraddr 00008000h +0036F3r 1 01 80 00 .faraddr 00008001h +0036F6r 1 02 80 00 .faraddr 00008002h +0036F9r 1 03 80 00 .faraddr 00008003h +0036FCr 1 04 80 00 .faraddr 00008004h +0036FFr 1 05 80 00 .faraddr 00008005h +003702r 1 06 80 00 .faraddr 00008006h +003705r 1 07 80 00 .faraddr 00008007h +003708r 1 08 80 00 .faraddr 00008008h +00370Br 1 09 80 00 .faraddr 00008009h +00370Er 1 0A 80 00 .faraddr 0000800Ah +003711r 1 0B 80 00 .faraddr 0000800Bh +003714r 1 E1 9F 00 .faraddr 00009FE1h +003717r 1 E2 9F 00 .faraddr 00009FE2h +00371Ar 1 E3 9F 00 .faraddr 00009FE3h +00371Dr 1 E4 9F 00 .faraddr 00009FE4h +003720r 1 E5 9F 00 .faraddr 00009FE5h +003723r 1 E6 9F 00 .faraddr 00009FE6h +003726r 1 E7 9F 00 .faraddr 00009FE7h +003729r 1 E8 9F 00 .faraddr 00009FE8h +00372Cr 1 E9 9F 00 .faraddr 00009FE9h +00372Fr 1 EA 9F 00 .faraddr 00009FEAh +003732r 1 EB 9F 00 .faraddr 00009FEBh +003735r 1 EC 9F 00 .faraddr 00009FECh +003738r 1 ED 9F 00 .faraddr 00009FEDh +00373Br 1 EE 9F 00 .faraddr 00009FEEh +00373Er 1 EF 9F 00 .faraddr 00009FEFh +003741r 1 F0 9F 00 .faraddr 00009FF0h +003744r 1 F1 9F 00 .faraddr 00009FF1h +003747r 1 F2 9F 00 .faraddr 00009FF2h +00374Ar 1 F3 9F 00 .faraddr 00009FF3h +00374Dr 1 F4 9F 00 .faraddr 00009FF4h +003750r 1 F5 9F 00 .faraddr 00009FF5h +003753r 1 F6 9F 00 .faraddr 00009FF6h +003756r 1 F7 9F 00 .faraddr 00009FF7h +003759r 1 F8 9F 00 .faraddr 00009FF8h +00375Cr 1 F9 9F 00 .faraddr 00009FF9h +00375Fr 1 FA 9F 00 .faraddr 00009FFAh +003762r 1 FB 9F 00 .faraddr 00009FFBh +003765r 1 FC 9F 00 .faraddr 00009FFCh +003768r 1 FD 9F 00 .faraddr 00009FFDh +00376Br 1 FE 9F 00 .faraddr 00009FFEh +00376Er 1 FF 9F 00 .faraddr 00009FFFh +003771r 1 00 A0 00 .faraddr 0000A000h +003774r 1 01 A0 00 .faraddr 0000A001h +003777r 1 02 A0 00 .faraddr 0000A002h +00377Ar 1 03 A0 00 .faraddr 0000A003h +00377Dr 1 04 A0 00 .faraddr 0000A004h +003780r 1 05 A0 00 .faraddr 0000A005h +003783r 1 06 A0 00 .faraddr 0000A006h +003786r 1 07 A0 00 .faraddr 0000A007h +003789r 1 08 A0 00 .faraddr 0000A008h +00378Cr 1 09 A0 00 .faraddr 0000A009h +00378Fr 1 0A A0 00 .faraddr 0000A00Ah +003792r 1 0B A0 00 .faraddr 0000A00Bh +003795r 1 0C A0 00 .faraddr 0000A00Ch +003798r 1 0D A0 00 .faraddr 0000A00Dh +00379Br 1 0E A0 00 .faraddr 0000A00Eh +00379Er 1 0F A0 00 .faraddr 0000A00Fh +0037A1r 1 E1 AF 00 .faraddr 0000AFE1h +0037A4r 1 E2 AF 00 .faraddr 0000AFE2h +0037A7r 1 E3 AF 00 .faraddr 0000AFE3h +0037AAr 1 E4 AF 00 .faraddr 0000AFE4h +0037ADr 1 E5 AF 00 .faraddr 0000AFE5h +0037B0r 1 E6 AF 00 .faraddr 0000AFE6h +0037B3r 1 E7 AF 00 .faraddr 0000AFE7h +0037B6r 1 E8 AF 00 .faraddr 0000AFE8h +0037B9r 1 E9 AF 00 .faraddr 0000AFE9h +0037BCr 1 EA AF 00 .faraddr 0000AFEAh +0037BFr 1 EB AF 00 .faraddr 0000AFEBh +0037C2r 1 EC AF 00 .faraddr 0000AFECh +0037C5r 1 ED AF 00 .faraddr 0000AFEDh +0037C8r 1 EE AF 00 .faraddr 0000AFEEh +0037CBr 1 EF AF 00 .faraddr 0000AFEFh +0037CEr 1 F0 AF 00 .faraddr 0000AFF0h +0037D1r 1 F1 AF 00 .faraddr 0000AFF1h +0037D4r 1 F2 AF 00 .faraddr 0000AFF2h +0037D7r 1 F3 AF 00 .faraddr 0000AFF3h +0037DAr 1 F4 AF 00 .faraddr 0000AFF4h +0037DDr 1 F5 AF 00 .faraddr 0000AFF5h +0037E0r 1 F6 AF 00 .faraddr 0000AFF6h +0037E3r 1 F7 AF 00 .faraddr 0000AFF7h +0037E6r 1 F8 AF 00 .faraddr 0000AFF8h +0037E9r 1 F9 AF 00 .faraddr 0000AFF9h +0037ECr 1 FA AF 00 .faraddr 0000AFFAh +0037EFr 1 FB AF 00 .faraddr 0000AFFBh +0037F2r 1 FC AF 00 .faraddr 0000AFFCh +0037F5r 1 FD AF 00 .faraddr 0000AFFDh +0037F8r 1 FE AF 00 .faraddr 0000AFFEh +0037FBr 1 FF AF 00 .faraddr 0000AFFFh +0037FEr 1 00 B0 00 .faraddr 0000B000h +003801r 1 01 B0 00 .faraddr 0000B001h +003804r 1 02 B0 00 .faraddr 0000B002h +003807r 1 03 B0 00 .faraddr 0000B003h +00380Ar 1 04 B0 00 .faraddr 0000B004h +00380Dr 1 05 B0 00 .faraddr 0000B005h +003810r 1 06 B0 00 .faraddr 0000B006h +003813r 1 07 B0 00 .faraddr 0000B007h +003816r 1 08 B0 00 .faraddr 0000B008h +003819r 1 09 B0 00 .faraddr 0000B009h +00381Cr 1 0A B0 00 .faraddr 0000B00Ah +00381Fr 1 0B B0 00 .faraddr 0000B00Bh +003822r 1 0C B0 00 .faraddr 0000B00Ch +003825r 1 0D B0 00 .faraddr 0000B00Dh +003828r 1 0E B0 00 .faraddr 0000B00Eh +00382Br 1 0F B0 00 .faraddr 0000B00Fh +00382Er 1 E1 FF 00 .faraddr 0000FFE1h +003831r 1 E2 FF 00 .faraddr 0000FFE2h +003834r 1 E3 FF 00 .faraddr 0000FFE3h +003837r 1 E4 FF 00 .faraddr 0000FFE4h +00383Ar 1 E5 FF 00 .faraddr 0000FFE5h +00383Dr 1 E6 FF 00 .faraddr 0000FFE6h +003840r 1 E7 FF 00 .faraddr 0000FFE7h +003843r 1 E8 FF 00 .faraddr 0000FFE8h +003846r 1 E9 FF 00 .faraddr 0000FFE9h +003849r 1 EA FF 00 .faraddr 0000FFEAh +00384Cr 1 EB FF 00 .faraddr 0000FFEBh +00384Fr 1 EC FF 00 .faraddr 0000FFECh +003852r 1 ED FF 00 .faraddr 0000FFEDh +003855r 1 EE FF 00 .faraddr 0000FFEEh +003858r 1 EF FF 00 .faraddr 0000FFEFh +00385Br 1 F0 FF 00 .faraddr 0000FFF0h +00385Er 1 F1 FF 00 .faraddr 0000FFF1h +003861r 1 F2 FF 00 .faraddr 0000FFF2h +003864r 1 F3 FF 00 .faraddr 0000FFF3h +003867r 1 F4 FF 00 .faraddr 0000FFF4h +00386Ar 1 F5 FF 00 .faraddr 0000FFF5h +00386Dr 1 F6 FF 00 .faraddr 0000FFF6h +003870r 1 F7 FF 00 .faraddr 0000FFF7h +003873r 1 F8 FF 00 .faraddr 0000FFF8h +003876r 1 F9 FF 00 .faraddr 0000FFF9h +003879r 1 FA FF 00 .faraddr 0000FFFAh +00387Cr 1 FB FF 00 .faraddr 0000FFFBh +00387Fr 1 FC FF 00 .faraddr 0000FFFCh +003882r 1 FD FF 00 .faraddr 0000FFFDh +003885r 1 FE FF 00 .faraddr 0000FFFEh +003888r 1 FF FF 00 .faraddr 0000FFFFh +00388Br 1 00 00 01 .faraddr 00010000h +00388Er 1 01 00 01 .faraddr 00010001h +003891r 1 02 00 01 .faraddr 00010002h +003894r 1 03 00 01 .faraddr 00010003h +003897r 1 04 00 01 .faraddr 00010004h +00389Ar 1 05 00 01 .faraddr 00010005h +00389Dr 1 06 00 01 .faraddr 00010006h +0038A0r 1 07 00 01 .faraddr 00010007h +0038A3r 1 08 00 01 .faraddr 00010008h +0038A6r 1 09 00 01 .faraddr 00010009h +0038A9r 1 0A 00 01 .faraddr 0001000Ah +0038ACr 1 0B 00 01 .faraddr 0001000Bh +0038AFr 1 0C 00 01 .faraddr 0001000Ch +0038B2r 1 0D 00 01 .faraddr 0001000Dh +0038B5r 1 0E 00 01 .faraddr 0001000Eh +0038B8r 1 0F 00 01 .faraddr 0001000Fh +0038BBr 1 E1 FF 10 .faraddr 0010FFE1h +0038BEr 1 E2 FF 10 .faraddr 0010FFE2h +0038C1r 1 E3 FF 10 .faraddr 0010FFE3h +0038C4r 1 E4 FF 10 .faraddr 0010FFE4h +0038C7r 1 E5 FF 10 .faraddr 0010FFE5h +0038CAr 1 E6 FF 10 .faraddr 0010FFE6h +0038CDr 1 E7 FF 10 .faraddr 0010FFE7h +0038D0r 1 E8 FF 10 .faraddr 0010FFE8h +0038D3r 1 E9 FF 10 .faraddr 0010FFE9h +0038D6r 1 EA FF 10 .faraddr 0010FFEAh +0038D9r 1 EB FF 10 .faraddr 0010FFEBh +0038DCr 1 EC FF 10 .faraddr 0010FFECh +0038DFr 1 ED FF 10 .faraddr 0010FFEDh +0038E2r 1 EE FF 10 .faraddr 0010FFEEh +0038E5r 1 EF FF 10 .faraddr 0010FFEFh +0038E8r 1 F0 FF 10 .faraddr 0010FFF0h +0038EBr 1 F1 FF 10 .faraddr 0010FFF1h +0038EEr 1 F2 FF 10 .faraddr 0010FFF2h +0038F1r 1 F3 FF 10 .faraddr 0010FFF3h +0038F4r 1 F4 FF 10 .faraddr 0010FFF4h +0038F7r 1 F5 FF 10 .faraddr 0010FFF5h +0038FAr 1 F6 FF 10 .faraddr 0010FFF6h +0038FDr 1 F7 FF 10 .faraddr 0010FFF7h +003900r 1 F8 FF 10 .faraddr 0010FFF8h +003903r 1 F9 FF 10 .faraddr 0010FFF9h +003906r 1 FA FF 10 .faraddr 0010FFFAh +003909r 1 FB FF 10 .faraddr 0010FFFBh +00390Cr 1 FC FF 10 .faraddr 0010FFFCh +00390Fr 1 FD FF 10 .faraddr 0010FFFDh +003912r 1 FE FF 10 .faraddr 0010FFFEh +003915r 1 FF FF 10 .faraddr 0010FFFFh +003918r 1 00 00 11 .faraddr 00110000h +00391Br 1 01 00 11 .faraddr 00110001h +00391Er 1 02 00 11 .faraddr 00110002h +003921r 1 03 00 11 .faraddr 00110003h +003924r 1 04 00 11 .faraddr 00110004h +003927r 1 05 00 11 .faraddr 00110005h +00392Ar 1 06 00 11 .faraddr 00110006h +00392Dr 1 07 00 11 .faraddr 00110007h +003930r 1 08 00 11 .faraddr 00110008h +003933r 1 09 00 11 .faraddr 00110009h +003936r 1 0A 00 11 .faraddr 0011000Ah +003939r 1 0B 00 11 .faraddr 0011000Bh +00393Cr 1 0C 00 11 .faraddr 0011000Ch +00393Fr 1 0D 00 11 .faraddr 0011000Dh +003942r 1 0E 00 11 .faraddr 0011000Eh +003945r 1 0F 00 11 .faraddr 0011000Fh +003948r 1 E1 FF 20 .faraddr 0020FFE1h +00394Br 1 E2 FF 20 .faraddr 0020FFE2h +00394Er 1 E3 FF 20 .faraddr 0020FFE3h +003951r 1 E4 FF 20 .faraddr 0020FFE4h +003954r 1 E5 FF 20 .faraddr 0020FFE5h +003957r 1 E6 FF 20 .faraddr 0020FFE6h +00395Ar 1 E7 FF 20 .faraddr 0020FFE7h +00395Dr 1 E8 FF 20 .faraddr 0020FFE8h +003960r 1 E9 FF 20 .faraddr 0020FFE9h +003963r 1 EA FF 20 .faraddr 0020FFEAh +003966r 1 EB FF 20 .faraddr 0020FFEBh +003969r 1 EC FF 20 .faraddr 0020FFECh +00396Cr 1 ED FF 20 .faraddr 0020FFEDh +00396Fr 1 EE FF 20 .faraddr 0020FFEEh +003972r 1 EF FF 20 .faraddr 0020FFEFh +003975r 1 F0 FF 20 .faraddr 0020FFF0h +003978r 1 F1 FF 20 .faraddr 0020FFF1h +00397Br 1 F2 FF 20 .faraddr 0020FFF2h +00397Er 1 F3 FF 20 .faraddr 0020FFF3h +003981r 1 F4 FF 20 .faraddr 0020FFF4h +003984r 1 F5 FF 20 .faraddr 0020FFF5h +003987r 1 F6 FF 20 .faraddr 0020FFF6h +00398Ar 1 F7 FF 20 .faraddr 0020FFF7h +00398Dr 1 F8 FF 20 .faraddr 0020FFF8h +003990r 1 F9 FF 20 .faraddr 0020FFF9h +003993r 1 FA FF 20 .faraddr 0020FFFAh +003996r 1 FB FF 20 .faraddr 0020FFFBh +003999r 1 FC FF 20 .faraddr 0020FFFCh +00399Cr 1 FD FF 20 .faraddr 0020FFFDh +00399Fr 1 FE FF 20 .faraddr 0020FFFEh +0039A2r 1 FF FF 20 .faraddr 0020FFFFh +0039A5r 1 00 00 21 .faraddr 00210000h +0039A8r 1 01 00 21 .faraddr 00210001h +0039ABr 1 02 00 21 .faraddr 00210002h +0039AEr 1 03 00 21 .faraddr 00210003h +0039B1r 1 04 00 21 .faraddr 00210004h +0039B4r 1 05 00 21 .faraddr 00210005h +0039B7r 1 06 00 21 .faraddr 00210006h +0039BAr 1 07 00 21 .faraddr 00210007h +0039BDr 1 08 00 21 .faraddr 00210008h +0039C0r 1 09 00 21 .faraddr 00210009h +0039C3r 1 0A 00 21 .faraddr 0021000Ah +0039C6r 1 0B 00 21 .faraddr 0021000Bh +0039C9r 1 0C 00 21 .faraddr 0021000Ch +0039CCr 1 0D 00 21 .faraddr 0021000Dh +0039CFr 1 0E 00 21 .faraddr 0021000Eh +0039D2r 1 0F 00 21 .faraddr 0021000Fh +0039D5r 1 E1 FF 7F .faraddr 007FFFE1h +0039D8r 1 E2 FF 7F .faraddr 007FFFE2h +0039DBr 1 E3 FF 7F .faraddr 007FFFE3h +0039DEr 1 E4 FF 7F .faraddr 007FFFE4h +0039E1r 1 E5 FF 7F .faraddr 007FFFE5h +0039E4r 1 E6 FF 7F .faraddr 007FFFE6h +0039E7r 1 E7 FF 7F .faraddr 007FFFE7h +0039EAr 1 E8 FF 7F .faraddr 007FFFE8h +0039EDr 1 E9 FF 7F .faraddr 007FFFE9h +0039F0r 1 EA FF 7F .faraddr 007FFFEAh +0039F3r 1 EB FF 7F .faraddr 007FFFEBh +0039F6r 1 EC FF 7F .faraddr 007FFFECh +0039F9r 1 ED FF 7F .faraddr 007FFFEDh +0039FCr 1 EE FF 7F .faraddr 007FFFEEh +0039FFr 1 EF FF 7F .faraddr 007FFFEFh +003A02r 1 F0 FF 7F .faraddr 007FFFF0h +003A05r 1 F1 FF 7F .faraddr 007FFFF1h +003A08r 1 F2 FF 7F .faraddr 007FFFF2h +003A0Br 1 F3 FF 7F .faraddr 007FFFF3h +003A0Er 1 F4 FF 7F .faraddr 007FFFF4h +003A11r 1 F5 FF 7F .faraddr 007FFFF5h +003A14r 1 F6 FF 7F .faraddr 007FFFF6h +003A17r 1 F7 FF 7F .faraddr 007FFFF7h +003A1Ar 1 F8 FF 7F .faraddr 007FFFF8h +003A1Dr 1 F9 FF 7F .faraddr 007FFFF9h +003A20r 1 FA FF 7F .faraddr 007FFFFAh +003A23r 1 FB FF 7F .faraddr 007FFFFBh +003A26r 1 FC FF 7F .faraddr 007FFFFCh +003A29r 1 FD FF 7F .faraddr 007FFFFDh +003A2Cr 1 FE FF 7F .faraddr 007FFFFEh +003A2Fr 1 FF FF 7F .faraddr 007FFFFFh +003A32r 1 00 00 80 .faraddr 00800000h +003A35r 1 01 00 80 .faraddr 00800001h +003A38r 1 02 00 80 .faraddr 00800002h +003A3Br 1 03 00 80 .faraddr 00800003h +003A3Er 1 04 00 80 .faraddr 00800004h +003A41r 1 05 00 80 .faraddr 00800005h +003A44r 1 06 00 80 .faraddr 00800006h +003A47r 1 07 00 80 .faraddr 00800007h +003A4Ar 1 08 00 80 .faraddr 00800008h +003A4Dr 1 09 00 80 .faraddr 00800009h +003A50r 1 0A 00 80 .faraddr 0080000Ah +003A53r 1 0B 00 80 .faraddr 0080000Bh +003A56r 1 0C 00 80 .faraddr 0080000Ch +003A59r 1 0D 00 80 .faraddr 0080000Dh +003A5Cr 1 0E 00 80 .faraddr 0080000Eh +003A5Fr 1 0F 00 80 .faraddr 0080000Fh +003A62r 1 E1 FF 9F .faraddr 009FFFE1h +003A65r 1 E2 FF 9F .faraddr 009FFFE2h +003A68r 1 E3 FF 9F .faraddr 009FFFE3h +003A6Br 1 E4 FF 9F .faraddr 009FFFE4h +003A6Er 1 E5 FF 9F .faraddr 009FFFE5h +003A71r 1 E6 FF 9F .faraddr 009FFFE6h +003A74r 1 E7 FF 9F .faraddr 009FFFE7h +003A77r 1 E8 FF 9F .faraddr 009FFFE8h +003A7Ar 1 E9 FF 9F .faraddr 009FFFE9h +003A7Dr 1 EA FF 9F .faraddr 009FFFEAh +003A80r 1 EB FF 9F .faraddr 009FFFEBh +003A83r 1 EC FF 9F .faraddr 009FFFECh +003A86r 1 ED FF 9F .faraddr 009FFFEDh +003A89r 1 EE FF 9F .faraddr 009FFFEEh +003A8Cr 1 EF FF 9F .faraddr 009FFFEFh +003A8Fr 1 F0 FF 9F .faraddr 009FFFF0h +003A92r 1 F1 FF 9F .faraddr 009FFFF1h +003A95r 1 F2 FF 9F .faraddr 009FFFF2h +003A98r 1 F3 FF 9F .faraddr 009FFFF3h +003A9Br 1 F4 FF 9F .faraddr 009FFFF4h +003A9Er 1 F5 FF 9F .faraddr 009FFFF5h +003AA1r 1 F6 FF 9F .faraddr 009FFFF6h +003AA4r 1 F7 FF 9F .faraddr 009FFFF7h +003AA7r 1 F8 FF 9F .faraddr 009FFFF8h +003AAAr 1 F9 FF 9F .faraddr 009FFFF9h +003AADr 1 FA FF 9F .faraddr 009FFFFAh +003AB0r 1 FB FF 9F .faraddr 009FFFFBh +003AB3r 1 FC FF 9F .faraddr 009FFFFCh +003AB6r 1 FD FF 9F .faraddr 009FFFFDh +003AB9r 1 FE FF 9F .faraddr 009FFFFEh +003ABCr 1 FF FF 9F .faraddr 009FFFFFh +003ABFr 1 00 00 A0 .faraddr 00A00000h +003AC2r 1 01 00 A0 .faraddr 00A00001h +003AC5r 1 02 00 A0 .faraddr 00A00002h +003AC8r 1 03 00 A0 .faraddr 00A00003h +003ACBr 1 04 00 A0 .faraddr 00A00004h +003ACEr 1 05 00 A0 .faraddr 00A00005h +003AD1r 1 06 00 A0 .faraddr 00A00006h +003AD4r 1 07 00 A0 .faraddr 00A00007h +003AD7r 1 08 00 A0 .faraddr 00A00008h +003ADAr 1 09 00 A0 .faraddr 00A00009h +003ADDr 1 0A 00 A0 .faraddr 00A0000Ah +003AE0r 1 0B 00 A0 .faraddr 00A0000Bh +003AE3r 1 0C 00 A0 .faraddr 00A0000Ch +003AE6r 1 0D 00 A0 .faraddr 00A0000Dh +003AE9r 1 0E 00 A0 .faraddr 00A0000Eh +003AECr 1 0F 00 A0 .faraddr 00A0000Fh +003AEFr 1 E1 FF FF .faraddr 00FFFFE1h +003AF2r 1 E2 FF FF .faraddr 00FFFFE2h +003AF5r 1 E3 FF FF .faraddr 00FFFFE3h +003AF8r 1 E4 FF FF .faraddr 00FFFFE4h +003AFBr 1 E5 FF FF .faraddr 00FFFFE5h +003AFEr 1 E6 FF FF .faraddr 00FFFFE6h +003B01r 1 E7 FF FF .faraddr 00FFFFE7h +003B04r 1 E8 FF FF .faraddr 00FFFFE8h +003B07r 1 E9 FF FF .faraddr 00FFFFE9h +003B0Ar 1 EA FF FF .faraddr 00FFFFEAh +003B0Dr 1 EB FF FF .faraddr 00FFFFEBh +003B10r 1 EC FF FF .faraddr 00FFFFECh +003B13r 1 ED FF FF .faraddr 00FFFFEDh +003B16r 1 EE FF FF .faraddr 00FFFFEEh +003B19r 1 EF FF FF .faraddr 00FFFFEFh +003B1Cr 1 F0 FF FF .faraddr 00FFFFF0h +003B1Fr 1 F1 FF FF .faraddr 00FFFFF1h +003B22r 1 F2 FF FF .faraddr 00FFFFF2h +003B25r 1 F3 FF FF .faraddr 00FFFFF3h +003B28r 1 F4 FF FF .faraddr 00FFFFF4h +003B2Br 1 F5 FF FF .faraddr 00FFFFF5h +003B2Er 1 F6 FF FF .faraddr 00FFFFF6h +003B31r 1 F7 FF FF .faraddr 00FFFFF7h +003B34r 1 F8 FF FF .faraddr 00FFFFF8h +003B37r 1 F9 FF FF .faraddr 00FFFFF9h +003B3Ar 1 FA FF FF .faraddr 00FFFFFAh +003B3Dr 1 FB FF FF .faraddr 00FFFFFBh +003B40r 1 FC FF FF .faraddr 00FFFFFCh +003B43r 1 FD FF FF .faraddr 00FFFFFDh +003B46r 1 FE FF FF .faraddr 00FFFFFEh +003B49r 1 FF FF FF .faraddr 00FFFFFFh +003B4Cr 1 +003B4Cr 1 ; alternative hex values, always leading zero +003B4Cr 1 00 00 00 .faraddr 00h +003B4Fr 1 01 00 00 .faraddr 01h +003B52r 1 02 00 00 .faraddr 02h +003B55r 1 03 00 00 .faraddr 03h +003B58r 1 04 00 00 .faraddr 04h +003B5Br 1 05 00 00 .faraddr 05h +003B5Er 1 06 00 00 .faraddr 06h +003B61r 1 07 00 00 .faraddr 07h +003B64r 1 08 00 00 .faraddr 08h +003B67r 1 09 00 00 .faraddr 09h +003B6Ar 1 0A 00 00 .faraddr 0ah +003B6Dr 1 0B 00 00 .faraddr 0bh +003B70r 1 0C 00 00 .faraddr 0ch +003B73r 1 0D 00 00 .faraddr 0dh +003B76r 1 0E 00 00 .faraddr 0eh +003B79r 1 0F 00 00 .faraddr 0fh +003B7Cr 1 10 00 00 .faraddr 010h +003B7Fr 1 11 00 00 .faraddr 011h +003B82r 1 12 00 00 .faraddr 012h +003B85r 1 13 00 00 .faraddr 013h +003B88r 1 70 00 00 .faraddr 070h +003B8Br 1 71 00 00 .faraddr 071h +003B8Er 1 72 00 00 .faraddr 072h +003B91r 1 73 00 00 .faraddr 073h +003B94r 1 74 00 00 .faraddr 074h +003B97r 1 75 00 00 .faraddr 075h +003B9Ar 1 76 00 00 .faraddr 076h +003B9Dr 1 77 00 00 .faraddr 077h +003BA0r 1 78 00 00 .faraddr 078h +003BA3r 1 79 00 00 .faraddr 079h +003BA6r 1 7A 00 00 .faraddr 07ah +003BA9r 1 7B 00 00 .faraddr 07bh +003BACr 1 7C 00 00 .faraddr 07ch +003BAFr 1 7D 00 00 .faraddr 07dh +003BB2r 1 7E 00 00 .faraddr 07eh +003BB5r 1 7F 00 00 .faraddr 07fh +003BB8r 1 80 00 00 .faraddr 080h +003BBBr 1 81 00 00 .faraddr 081h +003BBEr 1 82 00 00 .faraddr 082h +003BC1r 1 83 00 00 .faraddr 083h +003BC4r 1 84 00 00 .faraddr 084h +003BC7r 1 85 00 00 .faraddr 085h +003BCAr 1 86 00 00 .faraddr 086h +003BCDr 1 F0 00 00 .faraddr 0f0h +003BD0r 1 F1 00 00 .faraddr 0f1h +003BD3r 1 F2 00 00 .faraddr 0f2h +003BD6r 1 F3 00 00 .faraddr 0f3h +003BD9r 1 F4 00 00 .faraddr 0f4h +003BDCr 1 F5 00 00 .faraddr 0f5h +003BDFr 1 F6 00 00 .faraddr 0f6h +003BE2r 1 F7 00 00 .faraddr 0f7h +003BE5r 1 F8 00 00 .faraddr 0f8h +003BE8r 1 F9 00 00 .faraddr 0f9h +003BEBr 1 FA 00 00 .faraddr 0fah +003BEEr 1 FB 00 00 .faraddr 0fbh +003BF1r 1 FC 00 00 .faraddr 0fch +003BF4r 1 FD 00 00 .faraddr 0fdh +003BF7r 1 FE 00 00 .faraddr 0feh +003BFAr 1 FF 00 00 .faraddr 0ffh +003BFDr 1 00 01 00 .faraddr 0100h +003C00r 1 01 01 00 .faraddr 0101h +003C03r 1 02 01 00 .faraddr 0102h +003C06r 1 03 01 00 .faraddr 0103h +003C09r 1 D2 0F 00 .faraddr 0fd2h +003C0Cr 1 D3 0F 00 .faraddr 0fd3h +003C0Fr 1 D4 0F 00 .faraddr 0fd4h +003C12r 1 D5 0F 00 .faraddr 0fd5h +003C15r 1 D6 0F 00 .faraddr 0fd6h +003C18r 1 D7 0F 00 .faraddr 0fd7h +003C1Br 1 D8 0F 00 .faraddr 0fd8h +003C1Er 1 D9 0F 00 .faraddr 0fd9h +003C21r 1 DA 0F 00 .faraddr 0fdah +003C24r 1 DB 0F 00 .faraddr 0fdbh +003C27r 1 DC 0F 00 .faraddr 0fdch +003C2Ar 1 DD 0F 00 .faraddr 0fddh +003C2Dr 1 DE 0F 00 .faraddr 0fdeh +003C30r 1 DF 0F 00 .faraddr 0fdfh +003C33r 1 E0 0F 00 .faraddr 0fe0h +003C36r 1 E1 0F 00 .faraddr 0fe1h +003C39r 1 E2 0F 00 .faraddr 0fe2h +003C3Cr 1 E3 0F 00 .faraddr 0fe3h +003C3Fr 1 E4 0F 00 .faraddr 0fe4h +003C42r 1 E5 0F 00 .faraddr 0fe5h +003C45r 1 E6 0F 00 .faraddr 0fe6h +003C48r 1 E7 0F 00 .faraddr 0fe7h +003C4Br 1 E8 0F 00 .faraddr 0fe8h +003C4Er 1 E9 0F 00 .faraddr 0fe9h +003C51r 1 EA 0F 00 .faraddr 0feah +003C54r 1 EB 0F 00 .faraddr 0febh +003C57r 1 EC 0F 00 .faraddr 0fech +003C5Ar 1 ED 0F 00 .faraddr 0fedh +003C5Dr 1 EE 0F 00 .faraddr 0feeh +003C60r 1 EF 0F 00 .faraddr 0fefh +003C63r 1 F0 0F 00 .faraddr 0ff0h +003C66r 1 F1 0F 00 .faraddr 0ff1h +003C69r 1 F2 0F 00 .faraddr 0ff2h +003C6Cr 1 F3 0F 00 .faraddr 0ff3h +003C6Fr 1 F4 0F 00 .faraddr 0ff4h +003C72r 1 F5 0F 00 .faraddr 0ff5h +003C75r 1 F6 0F 00 .faraddr 0ff6h +003C78r 1 F7 0F 00 .faraddr 0ff7h +003C7Br 1 F8 0F 00 .faraddr 0ff8h +003C7Er 1 F9 0F 00 .faraddr 0ff9h +003C81r 1 FA 0F 00 .faraddr 0ffah +003C84r 1 FB 0F 00 .faraddr 0ffbh +003C87r 1 FC 0F 00 .faraddr 0ffch +003C8Ar 1 FD 0F 00 .faraddr 0ffdh +003C8Dr 1 FE 0F 00 .faraddr 0ffeh +003C90r 1 FF 0F 00 .faraddr 0fffh +003C93r 1 00 10 00 .faraddr 01000h +003C96r 1 01 10 00 .faraddr 01001h +003C99r 1 02 10 00 .faraddr 01002h +003C9Cr 1 03 10 00 .faraddr 01003h +003C9Fr 1 04 10 00 .faraddr 01004h +003CA2r 1 05 10 00 .faraddr 01005h +003CA5r 1 06 10 00 .faraddr 01006h +003CA8r 1 07 10 00 .faraddr 01007h +003CABr 1 08 10 00 .faraddr 01008h +003CAEr 1 F0 7F 00 .faraddr 07ff0h +003CB1r 1 F1 7F 00 .faraddr 07ff1h +003CB4r 1 F2 7F 00 .faraddr 07ff2h +003CB7r 1 F3 7F 00 .faraddr 07ff3h +003CBAr 1 F4 7F 00 .faraddr 07ff4h +003CBDr 1 F5 7F 00 .faraddr 07ff5h +003CC0r 1 F6 7F 00 .faraddr 07ff6h +003CC3r 1 F7 7F 00 .faraddr 07ff7h +003CC6r 1 F8 7F 00 .faraddr 07ff8h +003CC9r 1 F9 7F 00 .faraddr 07ff9h +003CCCr 1 FA 7F 00 .faraddr 07ffah +003CCFr 1 FB 7F 00 .faraddr 07ffbh +003CD2r 1 FC 7F 00 .faraddr 07ffch +003CD5r 1 FD 7F 00 .faraddr 07ffdh +003CD8r 1 FE 7F 00 .faraddr 07ffeh +003CDBr 1 FF 7F 00 .faraddr 07fffh +003CDEr 1 00 80 00 .faraddr 08000h +003CE1r 1 01 80 00 .faraddr 08001h +003CE4r 1 02 80 00 .faraddr 08002h +003CE7r 1 03 80 00 .faraddr 08003h +003CEAr 1 04 80 00 .faraddr 08004h +003CEDr 1 05 80 00 .faraddr 08005h +003CF0r 1 06 80 00 .faraddr 08006h +003CF3r 1 07 80 00 .faraddr 08007h +003CF6r 1 08 80 00 .faraddr 08008h +003CF9r 1 09 80 00 .faraddr 08009h +003CFCr 1 0A 80 00 .faraddr 0800ah +003CFFr 1 0B 80 00 .faraddr 0800bh +003D02r 1 E1 9F 00 .faraddr 09fe1h +003D05r 1 E2 9F 00 .faraddr 09fe2h +003D08r 1 E3 9F 00 .faraddr 09fe3h +003D0Br 1 E4 9F 00 .faraddr 09fe4h +003D0Er 1 E5 9F 00 .faraddr 09fe5h +003D11r 1 E6 9F 00 .faraddr 09fe6h +003D14r 1 E7 9F 00 .faraddr 09fe7h +003D17r 1 E8 9F 00 .faraddr 09fe8h +003D1Ar 1 E9 9F 00 .faraddr 09fe9h +003D1Dr 1 EA 9F 00 .faraddr 09feah +003D20r 1 EB 9F 00 .faraddr 09febh +003D23r 1 EC 9F 00 .faraddr 09fech +003D26r 1 ED 9F 00 .faraddr 09fedh +003D29r 1 EE 9F 00 .faraddr 09feeh +003D2Cr 1 EF 9F 00 .faraddr 09fefh +003D2Fr 1 F0 9F 00 .faraddr 09ff0h +003D32r 1 F1 9F 00 .faraddr 09ff1h +003D35r 1 F2 9F 00 .faraddr 09ff2h +003D38r 1 F3 9F 00 .faraddr 09ff3h +003D3Br 1 F4 9F 00 .faraddr 09ff4h +003D3Er 1 F5 9F 00 .faraddr 09ff5h +003D41r 1 F6 9F 00 .faraddr 09ff6h +003D44r 1 F7 9F 00 .faraddr 09ff7h +003D47r 1 F8 9F 00 .faraddr 09ff8h +003D4Ar 1 F9 9F 00 .faraddr 09ff9h +003D4Dr 1 FA 9F 00 .faraddr 09ffah +003D50r 1 FB 9F 00 .faraddr 09ffbh +003D53r 1 FC 9F 00 .faraddr 09ffch +003D56r 1 FD 9F 00 .faraddr 09ffdh +003D59r 1 FE 9F 00 .faraddr 09ffeh +003D5Cr 1 FF 9F 00 .faraddr 09fffh +003D5Fr 1 00 A0 00 .faraddr 0a000h +003D62r 1 01 A0 00 .faraddr 0a001h +003D65r 1 02 A0 00 .faraddr 0a002h +003D68r 1 03 A0 00 .faraddr 0a003h +003D6Br 1 04 A0 00 .faraddr 0a004h +003D6Er 1 05 A0 00 .faraddr 0a005h +003D71r 1 06 A0 00 .faraddr 0a006h +003D74r 1 07 A0 00 .faraddr 0a007h +003D77r 1 08 A0 00 .faraddr 0a008h +003D7Ar 1 09 A0 00 .faraddr 0a009h +003D7Dr 1 0A A0 00 .faraddr 0a00ah +003D80r 1 0B A0 00 .faraddr 0a00bh +003D83r 1 0C A0 00 .faraddr 0a00ch +003D86r 1 0D A0 00 .faraddr 0a00dh +003D89r 1 0E A0 00 .faraddr 0a00eh +003D8Cr 1 0F A0 00 .faraddr 0a00fh +003D8Fr 1 E1 AF 00 .faraddr 0afe1h +003D92r 1 E2 AF 00 .faraddr 0afe2h +003D95r 1 E3 AF 00 .faraddr 0afe3h +003D98r 1 E4 AF 00 .faraddr 0afe4h +003D9Br 1 E5 AF 00 .faraddr 0afe5h +003D9Er 1 E6 AF 00 .faraddr 0afe6h +003DA1r 1 E7 AF 00 .faraddr 0afe7h +003DA4r 1 E8 AF 00 .faraddr 0afe8h +003DA7r 1 E9 AF 00 .faraddr 0afe9h +003DAAr 1 EA AF 00 .faraddr 0afeah +003DADr 1 EB AF 00 .faraddr 0afebh +003DB0r 1 EC AF 00 .faraddr 0afech +003DB3r 1 ED AF 00 .faraddr 0afedh +003DB6r 1 EE AF 00 .faraddr 0afeeh +003DB9r 1 EF AF 00 .faraddr 0afefh +003DBCr 1 F0 AF 00 .faraddr 0aff0h +003DBFr 1 F1 AF 00 .faraddr 0aff1h +003DC2r 1 F2 AF 00 .faraddr 0aff2h +003DC5r 1 F3 AF 00 .faraddr 0aff3h +003DC8r 1 F4 AF 00 .faraddr 0aff4h +003DCBr 1 F5 AF 00 .faraddr 0aff5h +003DCEr 1 F6 AF 00 .faraddr 0aff6h +003DD1r 1 F7 AF 00 .faraddr 0aff7h +003DD4r 1 F8 AF 00 .faraddr 0aff8h +003DD7r 1 F9 AF 00 .faraddr 0aff9h +003DDAr 1 FA AF 00 .faraddr 0affah +003DDDr 1 FB AF 00 .faraddr 0affbh +003DE0r 1 FC AF 00 .faraddr 0affch +003DE3r 1 FD AF 00 .faraddr 0affdh +003DE6r 1 FE AF 00 .faraddr 0affeh +003DE9r 1 FF AF 00 .faraddr 0afffh +003DECr 1 00 B0 00 .faraddr 0b000h +003DEFr 1 01 B0 00 .faraddr 0b001h +003DF2r 1 02 B0 00 .faraddr 0b002h +003DF5r 1 03 B0 00 .faraddr 0b003h +003DF8r 1 04 B0 00 .faraddr 0b004h +003DFBr 1 05 B0 00 .faraddr 0b005h +003DFEr 1 06 B0 00 .faraddr 0b006h +003E01r 1 07 B0 00 .faraddr 0b007h +003E04r 1 08 B0 00 .faraddr 0b008h +003E07r 1 09 B0 00 .faraddr 0b009h +003E0Ar 1 0A B0 00 .faraddr 0b00ah +003E0Dr 1 0B B0 00 .faraddr 0b00bh +003E10r 1 0C B0 00 .faraddr 0b00ch +003E13r 1 0D B0 00 .faraddr 0b00dh +003E16r 1 0E B0 00 .faraddr 0b00eh +003E19r 1 0F B0 00 .faraddr 0b00fh +003E1Cr 1 E1 FF 00 .faraddr 0ffe1h +003E1Fr 1 E2 FF 00 .faraddr 0ffe2h +003E22r 1 E3 FF 00 .faraddr 0ffe3h +003E25r 1 E4 FF 00 .faraddr 0ffe4h +003E28r 1 E5 FF 00 .faraddr 0ffe5h +003E2Br 1 E6 FF 00 .faraddr 0ffe6h +003E2Er 1 E7 FF 00 .faraddr 0ffe7h +003E31r 1 E8 FF 00 .faraddr 0ffe8h +003E34r 1 E9 FF 00 .faraddr 0ffe9h +003E37r 1 EA FF 00 .faraddr 0ffeah +003E3Ar 1 EB FF 00 .faraddr 0ffebh +003E3Dr 1 EC FF 00 .faraddr 0ffech +003E40r 1 ED FF 00 .faraddr 0ffedh +003E43r 1 EE FF 00 .faraddr 0ffeeh +003E46r 1 EF FF 00 .faraddr 0ffefh +003E49r 1 F0 FF 00 .faraddr 0fff0h +003E4Cr 1 F1 FF 00 .faraddr 0fff1h +003E4Fr 1 F2 FF 00 .faraddr 0fff2h +003E52r 1 F3 FF 00 .faraddr 0fff3h +003E55r 1 F4 FF 00 .faraddr 0fff4h +003E58r 1 F5 FF 00 .faraddr 0fff5h +003E5Br 1 F6 FF 00 .faraddr 0fff6h +003E5Er 1 F7 FF 00 .faraddr 0fff7h +003E61r 1 F8 FF 00 .faraddr 0fff8h +003E64r 1 F9 FF 00 .faraddr 0fff9h +003E67r 1 FA FF 00 .faraddr 0fffah +003E6Ar 1 FB FF 00 .faraddr 0fffbh +003E6Dr 1 FC FF 00 .faraddr 0fffch +003E70r 1 FD FF 00 .faraddr 0fffdh +003E73r 1 FE FF 00 .faraddr 0fffeh +003E76r 1 FF FF 00 .faraddr 0ffffh +003E79r 1 00 00 01 .faraddr 010000h +003E7Cr 1 01 00 01 .faraddr 010001h +003E7Fr 1 02 00 01 .faraddr 010002h +003E82r 1 03 00 01 .faraddr 010003h +003E85r 1 04 00 01 .faraddr 010004h +003E88r 1 05 00 01 .faraddr 010005h +003E8Br 1 06 00 01 .faraddr 010006h +003E8Er 1 07 00 01 .faraddr 010007h +003E91r 1 08 00 01 .faraddr 010008h +003E94r 1 09 00 01 .faraddr 010009h +003E97r 1 0A 00 01 .faraddr 01000ah +003E9Ar 1 0B 00 01 .faraddr 01000bh +003E9Dr 1 0C 00 01 .faraddr 01000ch +003EA0r 1 0D 00 01 .faraddr 01000dh +003EA3r 1 0E 00 01 .faraddr 01000eh +003EA6r 1 0F 00 01 .faraddr 01000fh +003EA9r 1 E1 FF 10 .faraddr 010ffe1h +003EACr 1 E2 FF 10 .faraddr 010ffe2h +003EAFr 1 E3 FF 10 .faraddr 010ffe3h +003EB2r 1 E4 FF 10 .faraddr 010ffe4h +003EB5r 1 E5 FF 10 .faraddr 010ffe5h +003EB8r 1 E6 FF 10 .faraddr 010ffe6h +003EBBr 1 E7 FF 10 .faraddr 010ffe7h +003EBEr 1 E8 FF 10 .faraddr 010ffe8h +003EC1r 1 E9 FF 10 .faraddr 010ffe9h +003EC4r 1 EA FF 10 .faraddr 010ffeah +003EC7r 1 EB FF 10 .faraddr 010ffebh +003ECAr 1 EC FF 10 .faraddr 010ffech +003ECDr 1 ED FF 10 .faraddr 010ffedh +003ED0r 1 EE FF 10 .faraddr 010ffeeh +003ED3r 1 EF FF 10 .faraddr 010ffefh +003ED6r 1 F0 FF 10 .faraddr 010fff0h +003ED9r 1 F1 FF 10 .faraddr 010fff1h +003EDCr 1 F2 FF 10 .faraddr 010fff2h +003EDFr 1 F3 FF 10 .faraddr 010fff3h +003EE2r 1 F4 FF 10 .faraddr 010fff4h +003EE5r 1 F5 FF 10 .faraddr 010fff5h +003EE8r 1 F6 FF 10 .faraddr 010fff6h +003EEBr 1 F7 FF 10 .faraddr 010fff7h +003EEEr 1 F8 FF 10 .faraddr 010fff8h +003EF1r 1 F9 FF 10 .faraddr 010fff9h +003EF4r 1 FA FF 10 .faraddr 010fffah +003EF7r 1 FB FF 10 .faraddr 010fffbh +003EFAr 1 FC FF 10 .faraddr 010fffch +003EFDr 1 FD FF 10 .faraddr 010fffdh +003F00r 1 FE FF 10 .faraddr 010fffeh +003F03r 1 FF FF 10 .faraddr 010ffffh +003F06r 1 00 00 11 .faraddr 0110000h +003F09r 1 01 00 11 .faraddr 0110001h +003F0Cr 1 02 00 11 .faraddr 0110002h +003F0Fr 1 03 00 11 .faraddr 0110003h +003F12r 1 04 00 11 .faraddr 0110004h +003F15r 1 05 00 11 .faraddr 0110005h +003F18r 1 06 00 11 .faraddr 0110006h +003F1Br 1 07 00 11 .faraddr 0110007h +003F1Er 1 08 00 11 .faraddr 0110008h +003F21r 1 09 00 11 .faraddr 0110009h +003F24r 1 0A 00 11 .faraddr 011000ah +003F27r 1 0B 00 11 .faraddr 011000bh +003F2Ar 1 0C 00 11 .faraddr 011000ch +003F2Dr 1 0D 00 11 .faraddr 011000dh +003F30r 1 0E 00 11 .faraddr 011000eh +003F33r 1 0F 00 11 .faraddr 011000fh +003F36r 1 E1 FF 20 .faraddr 020ffe1h +003F39r 1 E2 FF 20 .faraddr 020ffe2h +003F3Cr 1 E3 FF 20 .faraddr 020ffe3h +003F3Fr 1 E4 FF 20 .faraddr 020ffe4h +003F42r 1 E5 FF 20 .faraddr 020ffe5h +003F45r 1 E6 FF 20 .faraddr 020ffe6h +003F48r 1 E7 FF 20 .faraddr 020ffe7h +003F4Br 1 E8 FF 20 .faraddr 020ffe8h +003F4Er 1 E9 FF 20 .faraddr 020ffe9h +003F51r 1 EA FF 20 .faraddr 020ffeah +003F54r 1 EB FF 20 .faraddr 020ffebh +003F57r 1 EC FF 20 .faraddr 020ffech +003F5Ar 1 ED FF 20 .faraddr 020ffedh +003F5Dr 1 EE FF 20 .faraddr 020ffeeh +003F60r 1 EF FF 20 .faraddr 020ffefh +003F63r 1 F0 FF 20 .faraddr 020fff0h +003F66r 1 F1 FF 20 .faraddr 020fff1h +003F69r 1 F2 FF 20 .faraddr 020fff2h +003F6Cr 1 F3 FF 20 .faraddr 020fff3h +003F6Fr 1 F4 FF 20 .faraddr 020fff4h +003F72r 1 F5 FF 20 .faraddr 020fff5h +003F75r 1 F6 FF 20 .faraddr 020fff6h +003F78r 1 F7 FF 20 .faraddr 020fff7h +003F7Br 1 F8 FF 20 .faraddr 020fff8h +003F7Er 1 F9 FF 20 .faraddr 020fff9h +003F81r 1 FA FF 20 .faraddr 020fffah +003F84r 1 FB FF 20 .faraddr 020fffbh +003F87r 1 FC FF 20 .faraddr 020fffch +003F8Ar 1 FD FF 20 .faraddr 020fffdh +003F8Dr 1 FE FF 20 .faraddr 020fffeh +003F90r 1 FF FF 20 .faraddr 020ffffh +003F93r 1 00 00 21 .faraddr 0210000h +003F96r 1 01 00 21 .faraddr 0210001h +003F99r 1 02 00 21 .faraddr 0210002h +003F9Cr 1 03 00 21 .faraddr 0210003h +003F9Fr 1 04 00 21 .faraddr 0210004h +003FA2r 1 05 00 21 .faraddr 0210005h +003FA5r 1 06 00 21 .faraddr 0210006h +003FA8r 1 07 00 21 .faraddr 0210007h +003FABr 1 08 00 21 .faraddr 0210008h +003FAEr 1 09 00 21 .faraddr 0210009h +003FB1r 1 0A 00 21 .faraddr 021000ah +003FB4r 1 0B 00 21 .faraddr 021000bh +003FB7r 1 0C 00 21 .faraddr 021000ch +003FBAr 1 0D 00 21 .faraddr 021000dh +003FBDr 1 0E 00 21 .faraddr 021000eh +003FC0r 1 0F 00 21 .faraddr 021000fh +003FC3r 1 E1 FF 7F .faraddr 07fffe1h +003FC6r 1 E2 FF 7F .faraddr 07fffe2h +003FC9r 1 E3 FF 7F .faraddr 07fffe3h +003FCCr 1 E4 FF 7F .faraddr 07fffe4h +003FCFr 1 E5 FF 7F .faraddr 07fffe5h +003FD2r 1 E6 FF 7F .faraddr 07fffe6h +003FD5r 1 E7 FF 7F .faraddr 07fffe7h +003FD8r 1 E8 FF 7F .faraddr 07fffe8h +003FDBr 1 E9 FF 7F .faraddr 07fffe9h +003FDEr 1 EA FF 7F .faraddr 07fffeah +003FE1r 1 EB FF 7F .faraddr 07fffebh +003FE4r 1 EC FF 7F .faraddr 07fffech +003FE7r 1 ED FF 7F .faraddr 07fffedh +003FEAr 1 EE FF 7F .faraddr 07fffeeh +003FEDr 1 EF FF 7F .faraddr 07fffefh +003FF0r 1 F0 FF 7F .faraddr 07ffff0h +003FF3r 1 F1 FF 7F .faraddr 07ffff1h +003FF6r 1 F2 FF 7F .faraddr 07ffff2h +003FF9r 1 F3 FF 7F .faraddr 07ffff3h +003FFCr 1 F4 FF 7F .faraddr 07ffff4h +003FFFr 1 F5 FF 7F .faraddr 07ffff5h +004002r 1 F6 FF 7F .faraddr 07ffff6h +004005r 1 F7 FF 7F .faraddr 07ffff7h +004008r 1 F8 FF 7F .faraddr 07ffff8h +00400Br 1 F9 FF 7F .faraddr 07ffff9h +00400Er 1 FA FF 7F .faraddr 07ffffah +004011r 1 FB FF 7F .faraddr 07ffffbh +004014r 1 FC FF 7F .faraddr 07ffffch +004017r 1 FD FF 7F .faraddr 07ffffdh +00401Ar 1 FE FF 7F .faraddr 07ffffeh +00401Dr 1 FF FF 7F .faraddr 07fffffh +004020r 1 00 00 80 .faraddr 0800000h +004023r 1 01 00 80 .faraddr 0800001h +004026r 1 02 00 80 .faraddr 0800002h +004029r 1 03 00 80 .faraddr 0800003h +00402Cr 1 04 00 80 .faraddr 0800004h +00402Fr 1 05 00 80 .faraddr 0800005h +004032r 1 06 00 80 .faraddr 0800006h +004035r 1 07 00 80 .faraddr 0800007h +004038r 1 08 00 80 .faraddr 0800008h +00403Br 1 09 00 80 .faraddr 0800009h +00403Er 1 0A 00 80 .faraddr 080000ah +004041r 1 0B 00 80 .faraddr 080000bh +004044r 1 0C 00 80 .faraddr 080000ch +004047r 1 0D 00 80 .faraddr 080000dh +00404Ar 1 0E 00 80 .faraddr 080000eh +00404Dr 1 0F 00 80 .faraddr 080000fh +004050r 1 E1 FF 9F .faraddr 09fffe1h +004053r 1 E2 FF 9F .faraddr 09fffe2h +004056r 1 E3 FF 9F .faraddr 09fffe3h +004059r 1 E4 FF 9F .faraddr 09fffe4h +00405Cr 1 E5 FF 9F .faraddr 09fffe5h +00405Fr 1 E6 FF 9F .faraddr 09fffe6h +004062r 1 E7 FF 9F .faraddr 09fffe7h +004065r 1 E8 FF 9F .faraddr 09fffe8h +004068r 1 E9 FF 9F .faraddr 09fffe9h +00406Br 1 EA FF 9F .faraddr 09fffeah +00406Er 1 EB FF 9F .faraddr 09fffebh +004071r 1 EC FF 9F .faraddr 09fffech +004074r 1 ED FF 9F .faraddr 09fffedh +004077r 1 EE FF 9F .faraddr 09fffeeh +00407Ar 1 EF FF 9F .faraddr 09fffefh +00407Dr 1 F0 FF 9F .faraddr 09ffff0h +004080r 1 F1 FF 9F .faraddr 09ffff1h +004083r 1 F2 FF 9F .faraddr 09ffff2h +004086r 1 F3 FF 9F .faraddr 09ffff3h +004089r 1 F4 FF 9F .faraddr 09ffff4h +00408Cr 1 F5 FF 9F .faraddr 09ffff5h +00408Fr 1 F6 FF 9F .faraddr 09ffff6h +004092r 1 F7 FF 9F .faraddr 09ffff7h +004095r 1 F8 FF 9F .faraddr 09ffff8h +004098r 1 F9 FF 9F .faraddr 09ffff9h +00409Br 1 FA FF 9F .faraddr 09ffffah +00409Er 1 FB FF 9F .faraddr 09ffffbh +0040A1r 1 FC FF 9F .faraddr 09ffffch +0040A4r 1 FD FF 9F .faraddr 09ffffdh +0040A7r 1 FE FF 9F .faraddr 09ffffeh +0040AAr 1 FF FF 9F .faraddr 09fffffh +0040ADr 1 00 00 A0 .faraddr 0a00000h +0040B0r 1 01 00 A0 .faraddr 0a00001h +0040B3r 1 02 00 A0 .faraddr 0a00002h +0040B6r 1 03 00 A0 .faraddr 0a00003h +0040B9r 1 04 00 A0 .faraddr 0a00004h +0040BCr 1 05 00 A0 .faraddr 0a00005h +0040BFr 1 06 00 A0 .faraddr 0a00006h +0040C2r 1 07 00 A0 .faraddr 0a00007h +0040C5r 1 08 00 A0 .faraddr 0a00008h +0040C8r 1 09 00 A0 .faraddr 0a00009h +0040CBr 1 0A 00 A0 .faraddr 0a0000ah +0040CEr 1 0B 00 A0 .faraddr 0a0000bh +0040D1r 1 0C 00 A0 .faraddr 0a0000ch +0040D4r 1 0D 00 A0 .faraddr 0a0000dh +0040D7r 1 0E 00 A0 .faraddr 0a0000eh +0040DAr 1 0F 00 A0 .faraddr 0a0000fh +0040DDr 1 E1 FF FF .faraddr 0ffffe1h +0040E0r 1 E2 FF FF .faraddr 0ffffe2h +0040E3r 1 E3 FF FF .faraddr 0ffffe3h +0040E6r 1 E4 FF FF .faraddr 0ffffe4h +0040E9r 1 E5 FF FF .faraddr 0ffffe5h +0040ECr 1 E6 FF FF .faraddr 0ffffe6h +0040EFr 1 E7 FF FF .faraddr 0ffffe7h +0040F2r 1 E8 FF FF .faraddr 0ffffe8h +0040F5r 1 E9 FF FF .faraddr 0ffffe9h +0040F8r 1 EA FF FF .faraddr 0ffffeah +0040FBr 1 EB FF FF .faraddr 0ffffebh +0040FEr 1 EC FF FF .faraddr 0ffffech +004101r 1 ED FF FF .faraddr 0ffffedh +004104r 1 EE FF FF .faraddr 0ffffeeh +004107r 1 EF FF FF .faraddr 0ffffefh +00410Ar 1 F0 FF FF .faraddr 0fffff0h +00410Dr 1 F1 FF FF .faraddr 0fffff1h +004110r 1 F2 FF FF .faraddr 0fffff2h +004113r 1 F3 FF FF .faraddr 0fffff3h +004116r 1 F4 FF FF .faraddr 0fffff4h +004119r 1 F5 FF FF .faraddr 0fffff5h +00411Cr 1 F6 FF FF .faraddr 0fffff6h +00411Fr 1 F7 FF FF .faraddr 0fffff7h +004122r 1 F8 FF FF .faraddr 0fffff8h +004125r 1 F9 FF FF .faraddr 0fffff9h +004128r 1 FA FF FF .faraddr 0fffffah +00412Br 1 FB FF FF .faraddr 0fffffbh +00412Er 1 FC FF FF .faraddr 0fffffch +004131r 1 FD FF FF .faraddr 0fffffdh +004134r 1 FE FF FF .faraddr 0fffffeh +004137r 1 FF FF FF .faraddr 0ffffffh +00413Ar 1 +00413Ar 1 ; binary values, variable length +00413Ar 1 00 00 00 .faraddr %0 +00413Dr 1 01 00 00 .faraddr %01 +004140r 1 02 00 00 .faraddr %010 +004143r 1 03 00 00 .faraddr %011 +004146r 1 04 00 00 .faraddr %0100 +004149r 1 05 00 00 .faraddr %0101 +00414Cr 1 06 00 00 .faraddr %0110 +00414Fr 1 07 00 00 .faraddr %0111 +004152r 1 08 00 00 .faraddr %01000 +004155r 1 09 00 00 .faraddr %01001 +004158r 1 0A 00 00 .faraddr %01010 +00415Br 1 0B 00 00 .faraddr %01011 +00415Er 1 0C 00 00 .faraddr %01100 +004161r 1 0D 00 00 .faraddr %01101 +004164r 1 0E 00 00 .faraddr %01110 +004167r 1 0F 00 00 .faraddr %01111 +00416Ar 1 10 00 00 .faraddr %010000 +00416Dr 1 11 00 00 .faraddr %010001 +004170r 1 12 00 00 .faraddr %010010 +004173r 1 13 00 00 .faraddr %010011 +004176r 1 70 00 00 .faraddr %01110000 +004179r 1 71 00 00 .faraddr %01110001 +00417Cr 1 72 00 00 .faraddr %01110010 +00417Fr 1 73 00 00 .faraddr %01110011 +004182r 1 74 00 00 .faraddr %01110100 +004185r 1 75 00 00 .faraddr %01110101 +004188r 1 76 00 00 .faraddr %01110110 +00418Br 1 77 00 00 .faraddr %01110111 +00418Er 1 78 00 00 .faraddr %01111000 +004191r 1 79 00 00 .faraddr %01111001 +004194r 1 7A 00 00 .faraddr %01111010 +004197r 1 7B 00 00 .faraddr %01111011 +00419Ar 1 7C 00 00 .faraddr %01111100 +00419Dr 1 7D 00 00 .faraddr %01111101 +0041A0r 1 7E 00 00 .faraddr %01111110 +0041A3r 1 7F 00 00 .faraddr %01111111 +0041A6r 1 80 00 00 .faraddr %010000000 +0041A9r 1 81 00 00 .faraddr %010000001 +0041ACr 1 82 00 00 .faraddr %010000010 +0041AFr 1 83 00 00 .faraddr %010000011 +0041B2r 1 84 00 00 .faraddr %010000100 +0041B5r 1 85 00 00 .faraddr %010000101 +0041B8r 1 86 00 00 .faraddr %010000110 +0041BBr 1 F0 00 00 .faraddr %011110000 +0041BEr 1 F1 00 00 .faraddr %011110001 +0041C1r 1 F2 00 00 .faraddr %011110010 +0041C4r 1 F3 00 00 .faraddr %011110011 +0041C7r 1 F4 00 00 .faraddr %011110100 +0041CAr 1 F5 00 00 .faraddr %011110101 +0041CDr 1 F6 00 00 .faraddr %011110110 +0041D0r 1 F7 00 00 .faraddr %011110111 +0041D3r 1 F8 00 00 .faraddr %011111000 +0041D6r 1 F9 00 00 .faraddr %011111001 +0041D9r 1 FA 00 00 .faraddr %011111010 +0041DCr 1 FB 00 00 .faraddr %011111011 +0041DFr 1 FC 00 00 .faraddr %011111100 +0041E2r 1 FD 00 00 .faraddr %011111101 +0041E5r 1 FE 00 00 .faraddr %011111110 +0041E8r 1 FF 00 00 .faraddr %011111111 +0041EBr 1 00 01 00 .faraddr %0100000000 +0041EEr 1 01 01 00 .faraddr %0100000001 +0041F1r 1 02 01 00 .faraddr %0100000010 +0041F4r 1 03 01 00 .faraddr %0100000011 +0041F7r 1 D2 0F 00 .faraddr %0111111010010 +0041FAr 1 D3 0F 00 .faraddr %0111111010011 +0041FDr 1 D4 0F 00 .faraddr %0111111010100 +004200r 1 D5 0F 00 .faraddr %0111111010101 +004203r 1 D6 0F 00 .faraddr %0111111010110 +004206r 1 D7 0F 00 .faraddr %0111111010111 +004209r 1 D8 0F 00 .faraddr %0111111011000 +00420Cr 1 D9 0F 00 .faraddr %0111111011001 +00420Fr 1 DA 0F 00 .faraddr %0111111011010 +004212r 1 DB 0F 00 .faraddr %0111111011011 +004215r 1 DC 0F 00 .faraddr %0111111011100 +004218r 1 DD 0F 00 .faraddr %0111111011101 +00421Br 1 DE 0F 00 .faraddr %0111111011110 +00421Er 1 DF 0F 00 .faraddr %0111111011111 +004221r 1 E0 0F 00 .faraddr %0111111100000 +004224r 1 E1 0F 00 .faraddr %0111111100001 +004227r 1 E2 0F 00 .faraddr %0111111100010 +00422Ar 1 E3 0F 00 .faraddr %0111111100011 +00422Dr 1 E4 0F 00 .faraddr %0111111100100 +004230r 1 E5 0F 00 .faraddr %0111111100101 +004233r 1 E6 0F 00 .faraddr %0111111100110 +004236r 1 E7 0F 00 .faraddr %0111111100111 +004239r 1 E8 0F 00 .faraddr %0111111101000 +00423Cr 1 E9 0F 00 .faraddr %0111111101001 +00423Fr 1 EA 0F 00 .faraddr %0111111101010 +004242r 1 EB 0F 00 .faraddr %0111111101011 +004245r 1 EC 0F 00 .faraddr %0111111101100 +004248r 1 ED 0F 00 .faraddr %0111111101101 +00424Br 1 EE 0F 00 .faraddr %0111111101110 +00424Er 1 EF 0F 00 .faraddr %0111111101111 +004251r 1 F0 0F 00 .faraddr %0111111110000 +004254r 1 F1 0F 00 .faraddr %0111111110001 +004257r 1 F2 0F 00 .faraddr %0111111110010 +00425Ar 1 F3 0F 00 .faraddr %0111111110011 +00425Dr 1 F4 0F 00 .faraddr %0111111110100 +004260r 1 F5 0F 00 .faraddr %0111111110101 +004263r 1 F6 0F 00 .faraddr %0111111110110 +004266r 1 F7 0F 00 .faraddr %0111111110111 +004269r 1 F8 0F 00 .faraddr %0111111111000 +00426Cr 1 F9 0F 00 .faraddr %0111111111001 +00426Fr 1 FA 0F 00 .faraddr %0111111111010 +004272r 1 FB 0F 00 .faraddr %0111111111011 +004275r 1 FC 0F 00 .faraddr %0111111111100 +004278r 1 FD 0F 00 .faraddr %0111111111101 +00427Br 1 FE 0F 00 .faraddr %0111111111110 +00427Er 1 FF 0F 00 .faraddr %0111111111111 +004281r 1 00 10 00 .faraddr %01000000000000 +004284r 1 01 10 00 .faraddr %01000000000001 +004287r 1 02 10 00 .faraddr %01000000000010 +00428Ar 1 03 10 00 .faraddr %01000000000011 +00428Dr 1 04 10 00 .faraddr %01000000000100 +004290r 1 05 10 00 .faraddr %01000000000101 +004293r 1 06 10 00 .faraddr %01000000000110 +004296r 1 07 10 00 .faraddr %01000000000111 +004299r 1 08 10 00 .faraddr %01000000001000 +00429Cr 1 F0 7F 00 .faraddr %0111111111110000 +00429Fr 1 F1 7F 00 .faraddr %0111111111110001 +0042A2r 1 F2 7F 00 .faraddr %0111111111110010 +0042A5r 1 F3 7F 00 .faraddr %0111111111110011 +0042A8r 1 F4 7F 00 .faraddr %0111111111110100 +0042ABr 1 F5 7F 00 .faraddr %0111111111110101 +0042AEr 1 F6 7F 00 .faraddr %0111111111110110 +0042B1r 1 F7 7F 00 .faraddr %0111111111110111 +0042B4r 1 F8 7F 00 .faraddr %0111111111111000 +0042B7r 1 F9 7F 00 .faraddr %0111111111111001 +0042BAr 1 FA 7F 00 .faraddr %0111111111111010 +0042BDr 1 FB 7F 00 .faraddr %0111111111111011 +0042C0r 1 FC 7F 00 .faraddr %0111111111111100 +0042C3r 1 FD 7F 00 .faraddr %0111111111111101 +0042C6r 1 FE 7F 00 .faraddr %0111111111111110 +0042C9r 1 FF 7F 00 .faraddr %0111111111111111 +0042CCr 1 00 80 00 .faraddr %01000000000000000 +0042CFr 1 01 80 00 .faraddr %01000000000000001 +0042D2r 1 02 80 00 .faraddr %01000000000000010 +0042D5r 1 03 80 00 .faraddr %01000000000000011 +0042D8r 1 04 80 00 .faraddr %01000000000000100 +0042DBr 1 05 80 00 .faraddr %01000000000000101 +0042DEr 1 06 80 00 .faraddr %01000000000000110 +0042E1r 1 07 80 00 .faraddr %01000000000000111 +0042E4r 1 08 80 00 .faraddr %01000000000001000 +0042E7r 1 09 80 00 .faraddr %01000000000001001 +0042EAr 1 0A 80 00 .faraddr %01000000000001010 +0042EDr 1 0B 80 00 .faraddr %01000000000001011 +0042F0r 1 E1 9F 00 .faraddr %01001111111100001 +0042F3r 1 E2 9F 00 .faraddr %01001111111100010 +0042F6r 1 E3 9F 00 .faraddr %01001111111100011 +0042F9r 1 E4 9F 00 .faraddr %01001111111100100 +0042FCr 1 E5 9F 00 .faraddr %01001111111100101 +0042FFr 1 E6 9F 00 .faraddr %01001111111100110 +004302r 1 E7 9F 00 .faraddr %01001111111100111 +004305r 1 E8 9F 00 .faraddr %01001111111101000 +004308r 1 E9 9F 00 .faraddr %01001111111101001 +00430Br 1 EA 9F 00 .faraddr %01001111111101010 +00430Er 1 EB 9F 00 .faraddr %01001111111101011 +004311r 1 EC 9F 00 .faraddr %01001111111101100 +004314r 1 ED 9F 00 .faraddr %01001111111101101 +004317r 1 EE 9F 00 .faraddr %01001111111101110 +00431Ar 1 EF 9F 00 .faraddr %01001111111101111 +00431Dr 1 F0 9F 00 .faraddr %01001111111110000 +004320r 1 F1 9F 00 .faraddr %01001111111110001 +004323r 1 F2 9F 00 .faraddr %01001111111110010 +004326r 1 F3 9F 00 .faraddr %01001111111110011 +004329r 1 F4 9F 00 .faraddr %01001111111110100 +00432Cr 1 F5 9F 00 .faraddr %01001111111110101 +00432Fr 1 F6 9F 00 .faraddr %01001111111110110 +004332r 1 F7 9F 00 .faraddr %01001111111110111 +004335r 1 F8 9F 00 .faraddr %01001111111111000 +004338r 1 F9 9F 00 .faraddr %01001111111111001 +00433Br 1 FA 9F 00 .faraddr %01001111111111010 +00433Er 1 FB 9F 00 .faraddr %01001111111111011 +004341r 1 FC 9F 00 .faraddr %01001111111111100 +004344r 1 FD 9F 00 .faraddr %01001111111111101 +004347r 1 FE 9F 00 .faraddr %01001111111111110 +00434Ar 1 FF 9F 00 .faraddr %01001111111111111 +00434Dr 1 00 A0 00 .faraddr %01010000000000000 +004350r 1 01 A0 00 .faraddr %01010000000000001 +004353r 1 02 A0 00 .faraddr %01010000000000010 +004356r 1 03 A0 00 .faraddr %01010000000000011 +004359r 1 04 A0 00 .faraddr %01010000000000100 +00435Cr 1 05 A0 00 .faraddr %01010000000000101 +00435Fr 1 06 A0 00 .faraddr %01010000000000110 +004362r 1 07 A0 00 .faraddr %01010000000000111 +004365r 1 08 A0 00 .faraddr %01010000000001000 +004368r 1 09 A0 00 .faraddr %01010000000001001 +00436Br 1 0A A0 00 .faraddr %01010000000001010 +00436Er 1 0B A0 00 .faraddr %01010000000001011 +004371r 1 0C A0 00 .faraddr %01010000000001100 +004374r 1 0D A0 00 .faraddr %01010000000001101 +004377r 1 0E A0 00 .faraddr %01010000000001110 +00437Ar 1 0F A0 00 .faraddr %01010000000001111 +00437Dr 1 E1 AF 00 .faraddr %01010111111100001 +004380r 1 E2 AF 00 .faraddr %01010111111100010 +004383r 1 E3 AF 00 .faraddr %01010111111100011 +004386r 1 E4 AF 00 .faraddr %01010111111100100 +004389r 1 E5 AF 00 .faraddr %01010111111100101 +00438Cr 1 E6 AF 00 .faraddr %01010111111100110 +00438Fr 1 E7 AF 00 .faraddr %01010111111100111 +004392r 1 E8 AF 00 .faraddr %01010111111101000 +004395r 1 E9 AF 00 .faraddr %01010111111101001 +004398r 1 EA AF 00 .faraddr %01010111111101010 +00439Br 1 EB AF 00 .faraddr %01010111111101011 +00439Er 1 EC AF 00 .faraddr %01010111111101100 +0043A1r 1 ED AF 00 .faraddr %01010111111101101 +0043A4r 1 EE AF 00 .faraddr %01010111111101110 +0043A7r 1 EF AF 00 .faraddr %01010111111101111 +0043AAr 1 F0 AF 00 .faraddr %01010111111110000 +0043ADr 1 F1 AF 00 .faraddr %01010111111110001 +0043B0r 1 F2 AF 00 .faraddr %01010111111110010 +0043B3r 1 F3 AF 00 .faraddr %01010111111110011 +0043B6r 1 F4 AF 00 .faraddr %01010111111110100 +0043B9r 1 F5 AF 00 .faraddr %01010111111110101 +0043BCr 1 F6 AF 00 .faraddr %01010111111110110 +0043BFr 1 F7 AF 00 .faraddr %01010111111110111 +0043C2r 1 F8 AF 00 .faraddr %01010111111111000 +0043C5r 1 F9 AF 00 .faraddr %01010111111111001 +0043C8r 1 FA AF 00 .faraddr %01010111111111010 +0043CBr 1 FB AF 00 .faraddr %01010111111111011 +0043CEr 1 FC AF 00 .faraddr %01010111111111100 +0043D1r 1 FD AF 00 .faraddr %01010111111111101 +0043D4r 1 FE AF 00 .faraddr %01010111111111110 +0043D7r 1 FF AF 00 .faraddr %01010111111111111 +0043DAr 1 00 B0 00 .faraddr %01011000000000000 +0043DDr 1 01 B0 00 .faraddr %01011000000000001 +0043E0r 1 02 B0 00 .faraddr %01011000000000010 +0043E3r 1 03 B0 00 .faraddr %01011000000000011 +0043E6r 1 04 B0 00 .faraddr %01011000000000100 +0043E9r 1 05 B0 00 .faraddr %01011000000000101 +0043ECr 1 06 B0 00 .faraddr %01011000000000110 +0043EFr 1 07 B0 00 .faraddr %01011000000000111 +0043F2r 1 08 B0 00 .faraddr %01011000000001000 +0043F5r 1 09 B0 00 .faraddr %01011000000001001 +0043F8r 1 0A B0 00 .faraddr %01011000000001010 +0043FBr 1 0B B0 00 .faraddr %01011000000001011 +0043FEr 1 0C B0 00 .faraddr %01011000000001100 +004401r 1 0D B0 00 .faraddr %01011000000001101 +004404r 1 0E B0 00 .faraddr %01011000000001110 +004407r 1 0F B0 00 .faraddr %01011000000001111 +00440Ar 1 E1 FF 00 .faraddr %01111111111100001 +00440Dr 1 E2 FF 00 .faraddr %01111111111100010 +004410r 1 E3 FF 00 .faraddr %01111111111100011 +004413r 1 E4 FF 00 .faraddr %01111111111100100 +004416r 1 E5 FF 00 .faraddr %01111111111100101 +004419r 1 E6 FF 00 .faraddr %01111111111100110 +00441Cr 1 E7 FF 00 .faraddr %01111111111100111 +00441Fr 1 E8 FF 00 .faraddr %01111111111101000 +004422r 1 E9 FF 00 .faraddr %01111111111101001 +004425r 1 EA FF 00 .faraddr %01111111111101010 +004428r 1 EB FF 00 .faraddr %01111111111101011 +00442Br 1 EC FF 00 .faraddr %01111111111101100 +00442Er 1 ED FF 00 .faraddr %01111111111101101 +004431r 1 EE FF 00 .faraddr %01111111111101110 +004434r 1 EF FF 00 .faraddr %01111111111101111 +004437r 1 F0 FF 00 .faraddr %01111111111110000 +00443Ar 1 F1 FF 00 .faraddr %01111111111110001 +00443Dr 1 F2 FF 00 .faraddr %01111111111110010 +004440r 1 F3 FF 00 .faraddr %01111111111110011 +004443r 1 F4 FF 00 .faraddr %01111111111110100 +004446r 1 F5 FF 00 .faraddr %01111111111110101 +004449r 1 F6 FF 00 .faraddr %01111111111110110 +00444Cr 1 F7 FF 00 .faraddr %01111111111110111 +00444Fr 1 F8 FF 00 .faraddr %01111111111111000 +004452r 1 F9 FF 00 .faraddr %01111111111111001 +004455r 1 FA FF 00 .faraddr %01111111111111010 +004458r 1 FB FF 00 .faraddr %01111111111111011 +00445Br 1 FC FF 00 .faraddr %01111111111111100 +00445Er 1 FD FF 00 .faraddr %01111111111111101 +004461r 1 FE FF 00 .faraddr %01111111111111110 +004464r 1 FF FF 00 .faraddr %01111111111111111 +004467r 1 00 00 01 .faraddr %10000000000000000 +00446Ar 1 01 00 01 .faraddr %10000000000000001 +00446Dr 1 02 00 01 .faraddr %10000000000000010 +004470r 1 03 00 01 .faraddr %10000000000000011 +004473r 1 04 00 01 .faraddr %10000000000000100 +004476r 1 05 00 01 .faraddr %10000000000000101 +004479r 1 06 00 01 .faraddr %10000000000000110 +00447Cr 1 07 00 01 .faraddr %10000000000000111 +00447Fr 1 08 00 01 .faraddr %10000000000001000 +004482r 1 09 00 01 .faraddr %10000000000001001 +004485r 1 0A 00 01 .faraddr %10000000000001010 +004488r 1 0B 00 01 .faraddr %10000000000001011 +00448Br 1 0C 00 01 .faraddr %10000000000001100 +00448Er 1 0D 00 01 .faraddr %10000000000001101 +004491r 1 0E 00 01 .faraddr %10000000000001110 +004494r 1 0F 00 01 .faraddr %10000000000001111 +004497r 1 E1 FF 10 .faraddr %100001111111111100001 +00449Ar 1 E2 FF 10 .faraddr %100001111111111100010 +00449Dr 1 E3 FF 10 .faraddr %100001111111111100011 +0044A0r 1 E4 FF 10 .faraddr %100001111111111100100 +0044A3r 1 E5 FF 10 .faraddr %100001111111111100101 +0044A6r 1 E6 FF 10 .faraddr %100001111111111100110 +0044A9r 1 E7 FF 10 .faraddr %100001111111111100111 +0044ACr 1 E8 FF 10 .faraddr %100001111111111101000 +0044AFr 1 E9 FF 10 .faraddr %100001111111111101001 +0044B2r 1 EA FF 10 .faraddr %100001111111111101010 +0044B5r 1 EB FF 10 .faraddr %100001111111111101011 +0044B8r 1 EC FF 10 .faraddr %100001111111111101100 +0044BBr 1 ED FF 10 .faraddr %100001111111111101101 +0044BEr 1 EE FF 10 .faraddr %100001111111111101110 +0044C1r 1 EF FF 10 .faraddr %100001111111111101111 +0044C4r 1 F0 FF 10 .faraddr %100001111111111110000 +0044C7r 1 F1 FF 10 .faraddr %100001111111111110001 +0044CAr 1 F2 FF 10 .faraddr %100001111111111110010 +0044CDr 1 F3 FF 10 .faraddr %100001111111111110011 +0044D0r 1 F4 FF 10 .faraddr %100001111111111110100 +0044D3r 1 F5 FF 10 .faraddr %100001111111111110101 +0044D6r 1 F6 FF 10 .faraddr %100001111111111110110 +0044D9r 1 F7 FF 10 .faraddr %100001111111111110111 +0044DCr 1 F8 FF 10 .faraddr %100001111111111111000 +0044DFr 1 F9 FF 10 .faraddr %100001111111111111001 +0044E2r 1 FA FF 10 .faraddr %100001111111111111010 +0044E5r 1 FB FF 10 .faraddr %100001111111111111011 +0044E8r 1 FC FF 10 .faraddr %100001111111111111100 +0044EBr 1 FD FF 10 .faraddr %100001111111111111101 +0044EEr 1 FE FF 10 .faraddr %100001111111111111110 +0044F1r 1 FF FF 10 .faraddr %100001111111111111111 +0044F4r 1 00 00 11 .faraddr %100010000000000000000 +0044F7r 1 01 00 11 .faraddr %100010000000000000001 +0044FAr 1 02 00 11 .faraddr %100010000000000000010 +0044FDr 1 03 00 11 .faraddr %100010000000000000011 +004500r 1 04 00 11 .faraddr %100010000000000000100 +004503r 1 05 00 11 .faraddr %100010000000000000101 +004506r 1 06 00 11 .faraddr %100010000000000000110 +004509r 1 07 00 11 .faraddr %100010000000000000111 +00450Cr 1 08 00 11 .faraddr %100010000000000001000 +00450Fr 1 09 00 11 .faraddr %100010000000000001001 +004512r 1 0A 00 11 .faraddr %100010000000000001010 +004515r 1 0B 00 11 .faraddr %100010000000000001011 +004518r 1 0C 00 11 .faraddr %100010000000000001100 +00451Br 1 0D 00 11 .faraddr %100010000000000001101 +00451Er 1 0E 00 11 .faraddr %100010000000000001110 +004521r 1 0F 00 11 .faraddr %100010000000000001111 +004524r 1 E1 FF 20 .faraddr %1000001111111111100001 +004527r 1 E2 FF 20 .faraddr %1000001111111111100010 +00452Ar 1 E3 FF 20 .faraddr %1000001111111111100011 +00452Dr 1 E4 FF 20 .faraddr %1000001111111111100100 +004530r 1 E5 FF 20 .faraddr %1000001111111111100101 +004533r 1 E6 FF 20 .faraddr %1000001111111111100110 +004536r 1 E7 FF 20 .faraddr %1000001111111111100111 +004539r 1 E8 FF 20 .faraddr %1000001111111111101000 +00453Cr 1 E9 FF 20 .faraddr %1000001111111111101001 +00453Fr 1 EA FF 20 .faraddr %1000001111111111101010 +004542r 1 EB FF 20 .faraddr %1000001111111111101011 +004545r 1 EC FF 20 .faraddr %1000001111111111101100 +004548r 1 ED FF 20 .faraddr %1000001111111111101101 +00454Br 1 EE FF 20 .faraddr %1000001111111111101110 +00454Er 1 EF FF 20 .faraddr %1000001111111111101111 +004551r 1 F0 FF 20 .faraddr %1000001111111111110000 +004554r 1 F1 FF 20 .faraddr %1000001111111111110001 +004557r 1 F2 FF 20 .faraddr %1000001111111111110010 +00455Ar 1 F3 FF 20 .faraddr %1000001111111111110011 +00455Dr 1 F4 FF 20 .faraddr %1000001111111111110100 +004560r 1 F5 FF 20 .faraddr %1000001111111111110101 +004563r 1 F6 FF 20 .faraddr %1000001111111111110110 +004566r 1 F7 FF 20 .faraddr %1000001111111111110111 +004569r 1 F8 FF 20 .faraddr %1000001111111111111000 +00456Cr 1 F9 FF 20 .faraddr %1000001111111111111001 +00456Fr 1 FA FF 20 .faraddr %1000001111111111111010 +004572r 1 FB FF 20 .faraddr %1000001111111111111011 +004575r 1 FC FF 20 .faraddr %1000001111111111111100 +004578r 1 FD FF 20 .faraddr %1000001111111111111101 +00457Br 1 FE FF 20 .faraddr %1000001111111111111110 +00457Er 1 FF FF 20 .faraddr %1000001111111111111111 +004581r 1 00 00 21 .faraddr %1000010000000000000000 +004584r 1 01 00 21 .faraddr %1000010000000000000001 +004587r 1 02 00 21 .faraddr %1000010000000000000010 +00458Ar 1 03 00 21 .faraddr %1000010000000000000011 +00458Dr 1 04 00 21 .faraddr %1000010000000000000100 +004590r 1 05 00 21 .faraddr %1000010000000000000101 +004593r 1 06 00 21 .faraddr %1000010000000000000110 +004596r 1 07 00 21 .faraddr %1000010000000000000111 +004599r 1 08 00 21 .faraddr %1000010000000000001000 +00459Cr 1 09 00 21 .faraddr %1000010000000000001001 +00459Fr 1 0A 00 21 .faraddr %1000010000000000001010 +0045A2r 1 0B 00 21 .faraddr %1000010000000000001011 +0045A5r 1 0C 00 21 .faraddr %1000010000000000001100 +0045A8r 1 0D 00 21 .faraddr %1000010000000000001101 +0045ABr 1 0E 00 21 .faraddr %1000010000000000001110 +0045AEr 1 0F 00 21 .faraddr %1000010000000000001111 +0045B1r 1 E1 FF 7F .faraddr %11111111111111111100001 +0045B4r 1 E2 FF 7F .faraddr %11111111111111111100010 +0045B7r 1 E3 FF 7F .faraddr %11111111111111111100011 +0045BAr 1 E4 FF 7F .faraddr %11111111111111111100100 +0045BDr 1 E5 FF 7F .faraddr %11111111111111111100101 +0045C0r 1 E6 FF 7F .faraddr %11111111111111111100110 +0045C3r 1 E7 FF 7F .faraddr %11111111111111111100111 +0045C6r 1 E8 FF 7F .faraddr %11111111111111111101000 +0045C9r 1 E9 FF 7F .faraddr %11111111111111111101001 +0045CCr 1 EA FF 7F .faraddr %11111111111111111101010 +0045CFr 1 EB FF 7F .faraddr %11111111111111111101011 +0045D2r 1 EC FF 7F .faraddr %11111111111111111101100 +0045D5r 1 ED FF 7F .faraddr %11111111111111111101101 +0045D8r 1 EE FF 7F .faraddr %11111111111111111101110 +0045DBr 1 EF FF 7F .faraddr %11111111111111111101111 +0045DEr 1 F0 FF 7F .faraddr %11111111111111111110000 +0045E1r 1 F1 FF 7F .faraddr %11111111111111111110001 +0045E4r 1 F2 FF 7F .faraddr %11111111111111111110010 +0045E7r 1 F3 FF 7F .faraddr %11111111111111111110011 +0045EAr 1 F4 FF 7F .faraddr %11111111111111111110100 +0045EDr 1 F5 FF 7F .faraddr %11111111111111111110101 +0045F0r 1 F6 FF 7F .faraddr %11111111111111111110110 +0045F3r 1 F7 FF 7F .faraddr %11111111111111111110111 +0045F6r 1 F8 FF 7F .faraddr %11111111111111111111000 +0045F9r 1 F9 FF 7F .faraddr %11111111111111111111001 +0045FCr 1 FA FF 7F .faraddr %11111111111111111111010 +0045FFr 1 FB FF 7F .faraddr %11111111111111111111011 +004602r 1 FC FF 7F .faraddr %11111111111111111111100 +004605r 1 FD FF 7F .faraddr %11111111111111111111101 +004608r 1 FE FF 7F .faraddr %11111111111111111111110 +00460Br 1 FF FF 7F .faraddr %11111111111111111111111 +00460Er 1 00 00 80 .faraddr %100000000000000000000000 +004611r 1 01 00 80 .faraddr %100000000000000000000001 +004614r 1 02 00 80 .faraddr %100000000000000000000010 +004617r 1 03 00 80 .faraddr %100000000000000000000011 +00461Ar 1 04 00 80 .faraddr %100000000000000000000100 +00461Dr 1 05 00 80 .faraddr %100000000000000000000101 +004620r 1 06 00 80 .faraddr %100000000000000000000110 +004623r 1 07 00 80 .faraddr %100000000000000000000111 +004626r 1 08 00 80 .faraddr %100000000000000000001000 +004629r 1 09 00 80 .faraddr %100000000000000000001001 +00462Cr 1 0A 00 80 .faraddr %100000000000000000001010 +00462Fr 1 0B 00 80 .faraddr %100000000000000000001011 +004632r 1 0C 00 80 .faraddr %100000000000000000001100 +004635r 1 0D 00 80 .faraddr %100000000000000000001101 +004638r 1 0E 00 80 .faraddr %100000000000000000001110 +00463Br 1 0F 00 80 .faraddr %100000000000000000001111 +00463Er 1 E1 FF 9F .faraddr %100111111111111111100001 +004641r 1 E2 FF 9F .faraddr %100111111111111111100010 +004644r 1 E3 FF 9F .faraddr %100111111111111111100011 +004647r 1 E4 FF 9F .faraddr %100111111111111111100100 +00464Ar 1 E5 FF 9F .faraddr %100111111111111111100101 +00464Dr 1 E6 FF 9F .faraddr %100111111111111111100110 +004650r 1 E7 FF 9F .faraddr %100111111111111111100111 +004653r 1 E8 FF 9F .faraddr %100111111111111111101000 +004656r 1 E9 FF 9F .faraddr %100111111111111111101001 +004659r 1 EA FF 9F .faraddr %100111111111111111101010 +00465Cr 1 EB FF 9F .faraddr %100111111111111111101011 +00465Fr 1 EC FF 9F .faraddr %100111111111111111101100 +004662r 1 ED FF 9F .faraddr %100111111111111111101101 +004665r 1 EE FF 9F .faraddr %100111111111111111101110 +004668r 1 EF FF 9F .faraddr %100111111111111111101111 +00466Br 1 F0 FF 9F .faraddr %100111111111111111110000 +00466Er 1 F1 FF 9F .faraddr %100111111111111111110001 +004671r 1 F2 FF 9F .faraddr %100111111111111111110010 +004674r 1 F3 FF 9F .faraddr %100111111111111111110011 +004677r 1 F4 FF 9F .faraddr %100111111111111111110100 +00467Ar 1 F5 FF 9F .faraddr %100111111111111111110101 +00467Dr 1 F6 FF 9F .faraddr %100111111111111111110110 +004680r 1 F7 FF 9F .faraddr %100111111111111111110111 +004683r 1 F8 FF 9F .faraddr %100111111111111111111000 +004686r 1 F9 FF 9F .faraddr %100111111111111111111001 +004689r 1 FA FF 9F .faraddr %100111111111111111111010 +00468Cr 1 FB FF 9F .faraddr %100111111111111111111011 +00468Fr 1 FC FF 9F .faraddr %100111111111111111111100 +004692r 1 FD FF 9F .faraddr %100111111111111111111101 +004695r 1 FE FF 9F .faraddr %100111111111111111111110 +004698r 1 FF FF 9F .faraddr %100111111111111111111111 +00469Br 1 00 00 A0 .faraddr %101000000000000000000000 +00469Er 1 01 00 A0 .faraddr %101000000000000000000001 +0046A1r 1 02 00 A0 .faraddr %101000000000000000000010 +0046A4r 1 03 00 A0 .faraddr %101000000000000000000011 +0046A7r 1 04 00 A0 .faraddr %101000000000000000000100 +0046AAr 1 05 00 A0 .faraddr %101000000000000000000101 +0046ADr 1 06 00 A0 .faraddr %101000000000000000000110 +0046B0r 1 07 00 A0 .faraddr %101000000000000000000111 +0046B3r 1 08 00 A0 .faraddr %101000000000000000001000 +0046B6r 1 09 00 A0 .faraddr %101000000000000000001001 +0046B9r 1 0A 00 A0 .faraddr %101000000000000000001010 +0046BCr 1 0B 00 A0 .faraddr %101000000000000000001011 +0046BFr 1 0C 00 A0 .faraddr %101000000000000000001100 +0046C2r 1 0D 00 A0 .faraddr %101000000000000000001101 +0046C5r 1 0E 00 A0 .faraddr %101000000000000000001110 +0046C8r 1 0F 00 A0 .faraddr %101000000000000000001111 +0046CBr 1 E1 FF FF .faraddr %111111111111111111100001 +0046CEr 1 E2 FF FF .faraddr %111111111111111111100010 +0046D1r 1 E3 FF FF .faraddr %111111111111111111100011 +0046D4r 1 E4 FF FF .faraddr %111111111111111111100100 +0046D7r 1 E5 FF FF .faraddr %111111111111111111100101 +0046DAr 1 E6 FF FF .faraddr %111111111111111111100110 +0046DDr 1 E7 FF FF .faraddr %111111111111111111100111 +0046E0r 1 E8 FF FF .faraddr %111111111111111111101000 +0046E3r 1 E9 FF FF .faraddr %111111111111111111101001 +0046E6r 1 EA FF FF .faraddr %111111111111111111101010 +0046E9r 1 EB FF FF .faraddr %111111111111111111101011 +0046ECr 1 EC FF FF .faraddr %111111111111111111101100 +0046EFr 1 ED FF FF .faraddr %111111111111111111101101 +0046F2r 1 EE FF FF .faraddr %111111111111111111101110 +0046F5r 1 EF FF FF .faraddr %111111111111111111101111 +0046F8r 1 F0 FF FF .faraddr %111111111111111111110000 +0046FBr 1 F1 FF FF .faraddr %111111111111111111110001 +0046FEr 1 F2 FF FF .faraddr %111111111111111111110010 +004701r 1 F3 FF FF .faraddr %111111111111111111110011 +004704r 1 F4 FF FF .faraddr %111111111111111111110100 +004707r 1 F5 FF FF .faraddr %111111111111111111110101 +00470Ar 1 F6 FF FF .faraddr %111111111111111111110110 +00470Dr 1 F7 FF FF .faraddr %111111111111111111110111 +004710r 1 F8 FF FF .faraddr %111111111111111111111000 +004713r 1 F9 FF FF .faraddr %111111111111111111111001 +004716r 1 FA FF FF .faraddr %111111111111111111111010 +004719r 1 FB FF FF .faraddr %111111111111111111111011 +00471Cr 1 FC FF FF .faraddr %111111111111111111111100 +00471Fr 1 FD FF FF .faraddr %111111111111111111111101 +004722r 1 FE FF FF .faraddr %111111111111111111111110 +004725r 1 FF FF FF .faraddr %111111111111111111111111 +004728r 1 +004728r 1 ; binary values, full length +004728r 1 00 00 00 .faraddr %000000000000000000000000 +00472Br 1 01 00 00 .faraddr %000000000000000000000001 +00472Er 1 02 00 00 .faraddr %000000000000000000000010 +004731r 1 03 00 00 .faraddr %000000000000000000000011 +004734r 1 04 00 00 .faraddr %000000000000000000000100 +004737r 1 05 00 00 .faraddr %000000000000000000000101 +00473Ar 1 06 00 00 .faraddr %000000000000000000000110 +00473Dr 1 07 00 00 .faraddr %000000000000000000000111 +004740r 1 08 00 00 .faraddr %000000000000000000001000 +004743r 1 09 00 00 .faraddr %000000000000000000001001 +004746r 1 0A 00 00 .faraddr %000000000000000000001010 +004749r 1 0B 00 00 .faraddr %000000000000000000001011 +00474Cr 1 0C 00 00 .faraddr %000000000000000000001100 +00474Fr 1 0D 00 00 .faraddr %000000000000000000001101 +004752r 1 0E 00 00 .faraddr %000000000000000000001110 +004755r 1 0F 00 00 .faraddr %000000000000000000001111 +004758r 1 10 00 00 .faraddr %000000000000000000010000 +00475Br 1 11 00 00 .faraddr %000000000000000000010001 +00475Er 1 12 00 00 .faraddr %000000000000000000010010 +004761r 1 13 00 00 .faraddr %000000000000000000010011 +004764r 1 70 00 00 .faraddr %000000000000000001110000 +004767r 1 71 00 00 .faraddr %000000000000000001110001 +00476Ar 1 72 00 00 .faraddr %000000000000000001110010 +00476Dr 1 73 00 00 .faraddr %000000000000000001110011 +004770r 1 74 00 00 .faraddr %000000000000000001110100 +004773r 1 75 00 00 .faraddr %000000000000000001110101 +004776r 1 76 00 00 .faraddr %000000000000000001110110 +004779r 1 77 00 00 .faraddr %000000000000000001110111 +00477Cr 1 78 00 00 .faraddr %000000000000000001111000 +00477Fr 1 79 00 00 .faraddr %000000000000000001111001 +004782r 1 7A 00 00 .faraddr %000000000000000001111010 +004785r 1 7B 00 00 .faraddr %000000000000000001111011 +004788r 1 7C 00 00 .faraddr %000000000000000001111100 +00478Br 1 7D 00 00 .faraddr %000000000000000001111101 +00478Er 1 7E 00 00 .faraddr %000000000000000001111110 +004791r 1 7F 00 00 .faraddr %000000000000000001111111 +004794r 1 80 00 00 .faraddr %000000000000000010000000 +004797r 1 81 00 00 .faraddr %000000000000000010000001 +00479Ar 1 82 00 00 .faraddr %000000000000000010000010 +00479Dr 1 83 00 00 .faraddr %000000000000000010000011 +0047A0r 1 84 00 00 .faraddr %000000000000000010000100 +0047A3r 1 85 00 00 .faraddr %000000000000000010000101 +0047A6r 1 86 00 00 .faraddr %000000000000000010000110 +0047A9r 1 F0 00 00 .faraddr %000000000000000011110000 +0047ACr 1 F1 00 00 .faraddr %000000000000000011110001 +0047AFr 1 F2 00 00 .faraddr %000000000000000011110010 +0047B2r 1 F3 00 00 .faraddr %000000000000000011110011 +0047B5r 1 F4 00 00 .faraddr %000000000000000011110100 +0047B8r 1 F5 00 00 .faraddr %000000000000000011110101 +0047BBr 1 F6 00 00 .faraddr %000000000000000011110110 +0047BEr 1 F7 00 00 .faraddr %000000000000000011110111 +0047C1r 1 F8 00 00 .faraddr %000000000000000011111000 +0047C4r 1 F9 00 00 .faraddr %000000000000000011111001 +0047C7r 1 FA 00 00 .faraddr %000000000000000011111010 +0047CAr 1 FB 00 00 .faraddr %000000000000000011111011 +0047CDr 1 FC 00 00 .faraddr %000000000000000011111100 +0047D0r 1 FD 00 00 .faraddr %000000000000000011111101 +0047D3r 1 FE 00 00 .faraddr %000000000000000011111110 +0047D6r 1 FF 00 00 .faraddr %000000000000000011111111 +0047D9r 1 00 01 00 .faraddr %000000000000000100000000 +0047DCr 1 01 01 00 .faraddr %000000000000000100000001 +0047DFr 1 02 01 00 .faraddr %000000000000000100000010 +0047E2r 1 03 01 00 .faraddr %000000000000000100000011 +0047E5r 1 D2 0F 00 .faraddr %000000000000111111010010 +0047E8r 1 D3 0F 00 .faraddr %000000000000111111010011 +0047EBr 1 D4 0F 00 .faraddr %000000000000111111010100 +0047EEr 1 D5 0F 00 .faraddr %000000000000111111010101 +0047F1r 1 D6 0F 00 .faraddr %000000000000111111010110 +0047F4r 1 D7 0F 00 .faraddr %000000000000111111010111 +0047F7r 1 D8 0F 00 .faraddr %000000000000111111011000 +0047FAr 1 D9 0F 00 .faraddr %000000000000111111011001 +0047FDr 1 DA 0F 00 .faraddr %000000000000111111011010 +004800r 1 DB 0F 00 .faraddr %000000000000111111011011 +004803r 1 DC 0F 00 .faraddr %000000000000111111011100 +004806r 1 DD 0F 00 .faraddr %000000000000111111011101 +004809r 1 DE 0F 00 .faraddr %000000000000111111011110 +00480Cr 1 DF 0F 00 .faraddr %000000000000111111011111 +00480Fr 1 E0 0F 00 .faraddr %000000000000111111100000 +004812r 1 E1 0F 00 .faraddr %000000000000111111100001 +004815r 1 E2 0F 00 .faraddr %000000000000111111100010 +004818r 1 E3 0F 00 .faraddr %000000000000111111100011 +00481Br 1 E4 0F 00 .faraddr %000000000000111111100100 +00481Er 1 E5 0F 00 .faraddr %000000000000111111100101 +004821r 1 E6 0F 00 .faraddr %000000000000111111100110 +004824r 1 E7 0F 00 .faraddr %000000000000111111100111 +004827r 1 E8 0F 00 .faraddr %000000000000111111101000 +00482Ar 1 E9 0F 00 .faraddr %000000000000111111101001 +00482Dr 1 EA 0F 00 .faraddr %000000000000111111101010 +004830r 1 EB 0F 00 .faraddr %000000000000111111101011 +004833r 1 EC 0F 00 .faraddr %000000000000111111101100 +004836r 1 ED 0F 00 .faraddr %000000000000111111101101 +004839r 1 EE 0F 00 .faraddr %000000000000111111101110 +00483Cr 1 EF 0F 00 .faraddr %000000000000111111101111 +00483Fr 1 F0 0F 00 .faraddr %000000000000111111110000 +004842r 1 F1 0F 00 .faraddr %000000000000111111110001 +004845r 1 F2 0F 00 .faraddr %000000000000111111110010 +004848r 1 F3 0F 00 .faraddr %000000000000111111110011 +00484Br 1 F4 0F 00 .faraddr %000000000000111111110100 +00484Er 1 F5 0F 00 .faraddr %000000000000111111110101 +004851r 1 F6 0F 00 .faraddr %000000000000111111110110 +004854r 1 F7 0F 00 .faraddr %000000000000111111110111 +004857r 1 F8 0F 00 .faraddr %000000000000111111111000 +00485Ar 1 F9 0F 00 .faraddr %000000000000111111111001 +00485Dr 1 FA 0F 00 .faraddr %000000000000111111111010 +004860r 1 FB 0F 00 .faraddr %000000000000111111111011 +004863r 1 FC 0F 00 .faraddr %000000000000111111111100 +004866r 1 FD 0F 00 .faraddr %000000000000111111111101 +004869r 1 FE 0F 00 .faraddr %000000000000111111111110 +00486Cr 1 FF 0F 00 .faraddr %000000000000111111111111 +00486Fr 1 00 10 00 .faraddr %000000000001000000000000 +004872r 1 01 10 00 .faraddr %000000000001000000000001 +004875r 1 02 10 00 .faraddr %000000000001000000000010 +004878r 1 03 10 00 .faraddr %000000000001000000000011 +00487Br 1 04 10 00 .faraddr %000000000001000000000100 +00487Er 1 05 10 00 .faraddr %000000000001000000000101 +004881r 1 06 10 00 .faraddr %000000000001000000000110 +004884r 1 07 10 00 .faraddr %000000000001000000000111 +004887r 1 08 10 00 .faraddr %000000000001000000001000 +00488Ar 1 F0 7F 00 .faraddr %000000000111111111110000 +00488Dr 1 F1 7F 00 .faraddr %000000000111111111110001 +004890r 1 F2 7F 00 .faraddr %000000000111111111110010 +004893r 1 F3 7F 00 .faraddr %000000000111111111110011 +004896r 1 F4 7F 00 .faraddr %000000000111111111110100 +004899r 1 F5 7F 00 .faraddr %000000000111111111110101 +00489Cr 1 F6 7F 00 .faraddr %000000000111111111110110 +00489Fr 1 F7 7F 00 .faraddr %000000000111111111110111 +0048A2r 1 F8 7F 00 .faraddr %000000000111111111111000 +0048A5r 1 F9 7F 00 .faraddr %000000000111111111111001 +0048A8r 1 FA 7F 00 .faraddr %000000000111111111111010 +0048ABr 1 FB 7F 00 .faraddr %000000000111111111111011 +0048AEr 1 FC 7F 00 .faraddr %000000000111111111111100 +0048B1r 1 FD 7F 00 .faraddr %000000000111111111111101 +0048B4r 1 FE 7F 00 .faraddr %000000000111111111111110 +0048B7r 1 FF 7F 00 .faraddr %000000000111111111111111 +0048BAr 1 00 80 00 .faraddr %000000001000000000000000 +0048BDr 1 01 80 00 .faraddr %000000001000000000000001 +0048C0r 1 02 80 00 .faraddr %000000001000000000000010 +0048C3r 1 03 80 00 .faraddr %000000001000000000000011 +0048C6r 1 04 80 00 .faraddr %000000001000000000000100 +0048C9r 1 05 80 00 .faraddr %000000001000000000000101 +0048CCr 1 06 80 00 .faraddr %000000001000000000000110 +0048CFr 1 07 80 00 .faraddr %000000001000000000000111 +0048D2r 1 08 80 00 .faraddr %000000001000000000001000 +0048D5r 1 09 80 00 .faraddr %000000001000000000001001 +0048D8r 1 0A 80 00 .faraddr %000000001000000000001010 +0048DBr 1 0B 80 00 .faraddr %000000001000000000001011 +0048DEr 1 E1 9F 00 .faraddr %000000001001111111100001 +0048E1r 1 E2 9F 00 .faraddr %000000001001111111100010 +0048E4r 1 E3 9F 00 .faraddr %000000001001111111100011 +0048E7r 1 E4 9F 00 .faraddr %000000001001111111100100 +0048EAr 1 E5 9F 00 .faraddr %000000001001111111100101 +0048EDr 1 E6 9F 00 .faraddr %000000001001111111100110 +0048F0r 1 E7 9F 00 .faraddr %000000001001111111100111 +0048F3r 1 E8 9F 00 .faraddr %000000001001111111101000 +0048F6r 1 E9 9F 00 .faraddr %000000001001111111101001 +0048F9r 1 EA 9F 00 .faraddr %000000001001111111101010 +0048FCr 1 EB 9F 00 .faraddr %000000001001111111101011 +0048FFr 1 EC 9F 00 .faraddr %000000001001111111101100 +004902r 1 ED 9F 00 .faraddr %000000001001111111101101 +004905r 1 EE 9F 00 .faraddr %000000001001111111101110 +004908r 1 EF 9F 00 .faraddr %000000001001111111101111 +00490Br 1 F0 9F 00 .faraddr %000000001001111111110000 +00490Er 1 F1 9F 00 .faraddr %000000001001111111110001 +004911r 1 F2 9F 00 .faraddr %000000001001111111110010 +004914r 1 F3 9F 00 .faraddr %000000001001111111110011 +004917r 1 F4 9F 00 .faraddr %000000001001111111110100 +00491Ar 1 F5 9F 00 .faraddr %000000001001111111110101 +00491Dr 1 F6 9F 00 .faraddr %000000001001111111110110 +004920r 1 F7 9F 00 .faraddr %000000001001111111110111 +004923r 1 F8 9F 00 .faraddr %000000001001111111111000 +004926r 1 F9 9F 00 .faraddr %000000001001111111111001 +004929r 1 FA 9F 00 .faraddr %000000001001111111111010 +00492Cr 1 FB 9F 00 .faraddr %000000001001111111111011 +00492Fr 1 FC 9F 00 .faraddr %000000001001111111111100 +004932r 1 FD 9F 00 .faraddr %000000001001111111111101 +004935r 1 FE 9F 00 .faraddr %000000001001111111111110 +004938r 1 FF 9F 00 .faraddr %000000001001111111111111 +00493Br 1 00 A0 00 .faraddr %000000001010000000000000 +00493Er 1 01 A0 00 .faraddr %000000001010000000000001 +004941r 1 02 A0 00 .faraddr %000000001010000000000010 +004944r 1 03 A0 00 .faraddr %000000001010000000000011 +004947r 1 04 A0 00 .faraddr %000000001010000000000100 +00494Ar 1 05 A0 00 .faraddr %000000001010000000000101 +00494Dr 1 06 A0 00 .faraddr %000000001010000000000110 +004950r 1 07 A0 00 .faraddr %000000001010000000000111 +004953r 1 08 A0 00 .faraddr %000000001010000000001000 +004956r 1 09 A0 00 .faraddr %000000001010000000001001 +004959r 1 0A A0 00 .faraddr %000000001010000000001010 +00495Cr 1 0B A0 00 .faraddr %000000001010000000001011 +00495Fr 1 0C A0 00 .faraddr %000000001010000000001100 +004962r 1 0D A0 00 .faraddr %000000001010000000001101 +004965r 1 0E A0 00 .faraddr %000000001010000000001110 +004968r 1 0F A0 00 .faraddr %000000001010000000001111 +00496Br 1 E1 AF 00 .faraddr %000000001010111111100001 +00496Er 1 E2 AF 00 .faraddr %000000001010111111100010 +004971r 1 E3 AF 00 .faraddr %000000001010111111100011 +004974r 1 E4 AF 00 .faraddr %000000001010111111100100 +004977r 1 E5 AF 00 .faraddr %000000001010111111100101 +00497Ar 1 E6 AF 00 .faraddr %000000001010111111100110 +00497Dr 1 E7 AF 00 .faraddr %000000001010111111100111 +004980r 1 E8 AF 00 .faraddr %000000001010111111101000 +004983r 1 E9 AF 00 .faraddr %000000001010111111101001 +004986r 1 EA AF 00 .faraddr %000000001010111111101010 +004989r 1 EB AF 00 .faraddr %000000001010111111101011 +00498Cr 1 EC AF 00 .faraddr %000000001010111111101100 +00498Fr 1 ED AF 00 .faraddr %000000001010111111101101 +004992r 1 EE AF 00 .faraddr %000000001010111111101110 +004995r 1 EF AF 00 .faraddr %000000001010111111101111 +004998r 1 F0 AF 00 .faraddr %000000001010111111110000 +00499Br 1 F1 AF 00 .faraddr %000000001010111111110001 +00499Er 1 F2 AF 00 .faraddr %000000001010111111110010 +0049A1r 1 F3 AF 00 .faraddr %000000001010111111110011 +0049A4r 1 F4 AF 00 .faraddr %000000001010111111110100 +0049A7r 1 F5 AF 00 .faraddr %000000001010111111110101 +0049AAr 1 F6 AF 00 .faraddr %000000001010111111110110 +0049ADr 1 F7 AF 00 .faraddr %000000001010111111110111 +0049B0r 1 F8 AF 00 .faraddr %000000001010111111111000 +0049B3r 1 F9 AF 00 .faraddr %000000001010111111111001 +0049B6r 1 FA AF 00 .faraddr %000000001010111111111010 +0049B9r 1 FB AF 00 .faraddr %000000001010111111111011 +0049BCr 1 FC AF 00 .faraddr %000000001010111111111100 +0049BFr 1 FD AF 00 .faraddr %000000001010111111111101 +0049C2r 1 FE AF 00 .faraddr %000000001010111111111110 +0049C5r 1 FF AF 00 .faraddr %000000001010111111111111 +0049C8r 1 00 B0 00 .faraddr %000000001011000000000000 +0049CBr 1 01 B0 00 .faraddr %000000001011000000000001 +0049CEr 1 02 B0 00 .faraddr %000000001011000000000010 +0049D1r 1 03 B0 00 .faraddr %000000001011000000000011 +0049D4r 1 04 B0 00 .faraddr %000000001011000000000100 +0049D7r 1 05 B0 00 .faraddr %000000001011000000000101 +0049DAr 1 06 B0 00 .faraddr %000000001011000000000110 +0049DDr 1 07 B0 00 .faraddr %000000001011000000000111 +0049E0r 1 08 B0 00 .faraddr %000000001011000000001000 +0049E3r 1 09 B0 00 .faraddr %000000001011000000001001 +0049E6r 1 0A B0 00 .faraddr %000000001011000000001010 +0049E9r 1 0B B0 00 .faraddr %000000001011000000001011 +0049ECr 1 0C B0 00 .faraddr %000000001011000000001100 +0049EFr 1 0D B0 00 .faraddr %000000001011000000001101 +0049F2r 1 0E B0 00 .faraddr %000000001011000000001110 +0049F5r 1 0F B0 00 .faraddr %000000001011000000001111 +0049F8r 1 E1 FF 00 .faraddr %000000001111111111100001 +0049FBr 1 E2 FF 00 .faraddr %000000001111111111100010 +0049FEr 1 E3 FF 00 .faraddr %000000001111111111100011 +004A01r 1 E4 FF 00 .faraddr %000000001111111111100100 +004A04r 1 E5 FF 00 .faraddr %000000001111111111100101 +004A07r 1 E6 FF 00 .faraddr %000000001111111111100110 +004A0Ar 1 E7 FF 00 .faraddr %000000001111111111100111 +004A0Dr 1 E8 FF 00 .faraddr %000000001111111111101000 +004A10r 1 E9 FF 00 .faraddr %000000001111111111101001 +004A13r 1 EA FF 00 .faraddr %000000001111111111101010 +004A16r 1 EB FF 00 .faraddr %000000001111111111101011 +004A19r 1 EC FF 00 .faraddr %000000001111111111101100 +004A1Cr 1 ED FF 00 .faraddr %000000001111111111101101 +004A1Fr 1 EE FF 00 .faraddr %000000001111111111101110 +004A22r 1 EF FF 00 .faraddr %000000001111111111101111 +004A25r 1 F0 FF 00 .faraddr %000000001111111111110000 +004A28r 1 F1 FF 00 .faraddr %000000001111111111110001 +004A2Br 1 F2 FF 00 .faraddr %000000001111111111110010 +004A2Er 1 F3 FF 00 .faraddr %000000001111111111110011 +004A31r 1 F4 FF 00 .faraddr %000000001111111111110100 +004A34r 1 F5 FF 00 .faraddr %000000001111111111110101 +004A37r 1 F6 FF 00 .faraddr %000000001111111111110110 +004A3Ar 1 F7 FF 00 .faraddr %000000001111111111110111 +004A3Dr 1 F8 FF 00 .faraddr %000000001111111111111000 +004A40r 1 F9 FF 00 .faraddr %000000001111111111111001 +004A43r 1 FA FF 00 .faraddr %000000001111111111111010 +004A46r 1 FB FF 00 .faraddr %000000001111111111111011 +004A49r 1 FC FF 00 .faraddr %000000001111111111111100 +004A4Cr 1 FD FF 00 .faraddr %000000001111111111111101 +004A4Fr 1 FE FF 00 .faraddr %000000001111111111111110 +004A52r 1 FF FF 00 .faraddr %000000001111111111111111 +004A55r 1 00 00 01 .faraddr %000000010000000000000000 +004A58r 1 01 00 01 .faraddr %000000010000000000000001 +004A5Br 1 02 00 01 .faraddr %000000010000000000000010 +004A5Er 1 03 00 01 .faraddr %000000010000000000000011 +004A61r 1 04 00 01 .faraddr %000000010000000000000100 +004A64r 1 05 00 01 .faraddr %000000010000000000000101 +004A67r 1 06 00 01 .faraddr %000000010000000000000110 +004A6Ar 1 07 00 01 .faraddr %000000010000000000000111 +004A6Dr 1 08 00 01 .faraddr %000000010000000000001000 +004A70r 1 09 00 01 .faraddr %000000010000000000001001 +004A73r 1 0A 00 01 .faraddr %000000010000000000001010 +004A76r 1 0B 00 01 .faraddr %000000010000000000001011 +004A79r 1 0C 00 01 .faraddr %000000010000000000001100 +004A7Cr 1 0D 00 01 .faraddr %000000010000000000001101 +004A7Fr 1 0E 00 01 .faraddr %000000010000000000001110 +004A82r 1 0F 00 01 .faraddr %000000010000000000001111 +004A85r 1 E1 FF 10 .faraddr %000100001111111111100001 +004A88r 1 E2 FF 10 .faraddr %000100001111111111100010 +004A8Br 1 E3 FF 10 .faraddr %000100001111111111100011 +004A8Er 1 E4 FF 10 .faraddr %000100001111111111100100 +004A91r 1 E5 FF 10 .faraddr %000100001111111111100101 +004A94r 1 E6 FF 10 .faraddr %000100001111111111100110 +004A97r 1 E7 FF 10 .faraddr %000100001111111111100111 +004A9Ar 1 E8 FF 10 .faraddr %000100001111111111101000 +004A9Dr 1 E9 FF 10 .faraddr %000100001111111111101001 +004AA0r 1 EA FF 10 .faraddr %000100001111111111101010 +004AA3r 1 EB FF 10 .faraddr %000100001111111111101011 +004AA6r 1 EC FF 10 .faraddr %000100001111111111101100 +004AA9r 1 ED FF 10 .faraddr %000100001111111111101101 +004AACr 1 EE FF 10 .faraddr %000100001111111111101110 +004AAFr 1 EF FF 10 .faraddr %000100001111111111101111 +004AB2r 1 F0 FF 10 .faraddr %000100001111111111110000 +004AB5r 1 F1 FF 10 .faraddr %000100001111111111110001 +004AB8r 1 F2 FF 10 .faraddr %000100001111111111110010 +004ABBr 1 F3 FF 10 .faraddr %000100001111111111110011 +004ABEr 1 F4 FF 10 .faraddr %000100001111111111110100 +004AC1r 1 F5 FF 10 .faraddr %000100001111111111110101 +004AC4r 1 F6 FF 10 .faraddr %000100001111111111110110 +004AC7r 1 F7 FF 10 .faraddr %000100001111111111110111 +004ACAr 1 F8 FF 10 .faraddr %000100001111111111111000 +004ACDr 1 F9 FF 10 .faraddr %000100001111111111111001 +004AD0r 1 FA FF 10 .faraddr %000100001111111111111010 +004AD3r 1 FB FF 10 .faraddr %000100001111111111111011 +004AD6r 1 FC FF 10 .faraddr %000100001111111111111100 +004AD9r 1 FD FF 10 .faraddr %000100001111111111111101 +004ADCr 1 FE FF 10 .faraddr %000100001111111111111110 +004ADFr 1 FF FF 10 .faraddr %000100001111111111111111 +004AE2r 1 00 00 11 .faraddr %000100010000000000000000 +004AE5r 1 01 00 11 .faraddr %000100010000000000000001 +004AE8r 1 02 00 11 .faraddr %000100010000000000000010 +004AEBr 1 03 00 11 .faraddr %000100010000000000000011 +004AEEr 1 04 00 11 .faraddr %000100010000000000000100 +004AF1r 1 05 00 11 .faraddr %000100010000000000000101 +004AF4r 1 06 00 11 .faraddr %000100010000000000000110 +004AF7r 1 07 00 11 .faraddr %000100010000000000000111 +004AFAr 1 08 00 11 .faraddr %000100010000000000001000 +004AFDr 1 09 00 11 .faraddr %000100010000000000001001 +004B00r 1 0A 00 11 .faraddr %000100010000000000001010 +004B03r 1 0B 00 11 .faraddr %000100010000000000001011 +004B06r 1 0C 00 11 .faraddr %000100010000000000001100 +004B09r 1 0D 00 11 .faraddr %000100010000000000001101 +004B0Cr 1 0E 00 11 .faraddr %000100010000000000001110 +004B0Fr 1 0F 00 11 .faraddr %000100010000000000001111 +004B12r 1 E1 FF 20 .faraddr %001000001111111111100001 +004B15r 1 E2 FF 20 .faraddr %001000001111111111100010 +004B18r 1 E3 FF 20 .faraddr %001000001111111111100011 +004B1Br 1 E4 FF 20 .faraddr %001000001111111111100100 +004B1Er 1 E5 FF 20 .faraddr %001000001111111111100101 +004B21r 1 E6 FF 20 .faraddr %001000001111111111100110 +004B24r 1 E7 FF 20 .faraddr %001000001111111111100111 +004B27r 1 E8 FF 20 .faraddr %001000001111111111101000 +004B2Ar 1 E9 FF 20 .faraddr %001000001111111111101001 +004B2Dr 1 EA FF 20 .faraddr %001000001111111111101010 +004B30r 1 EB FF 20 .faraddr %001000001111111111101011 +004B33r 1 EC FF 20 .faraddr %001000001111111111101100 +004B36r 1 ED FF 20 .faraddr %001000001111111111101101 +004B39r 1 EE FF 20 .faraddr %001000001111111111101110 +004B3Cr 1 EF FF 20 .faraddr %001000001111111111101111 +004B3Fr 1 F0 FF 20 .faraddr %001000001111111111110000 +004B42r 1 F1 FF 20 .faraddr %001000001111111111110001 +004B45r 1 F2 FF 20 .faraddr %001000001111111111110010 +004B48r 1 F3 FF 20 .faraddr %001000001111111111110011 +004B4Br 1 F4 FF 20 .faraddr %001000001111111111110100 +004B4Er 1 F5 FF 20 .faraddr %001000001111111111110101 +004B51r 1 F6 FF 20 .faraddr %001000001111111111110110 +004B54r 1 F7 FF 20 .faraddr %001000001111111111110111 +004B57r 1 F8 FF 20 .faraddr %001000001111111111111000 +004B5Ar 1 F9 FF 20 .faraddr %001000001111111111111001 +004B5Dr 1 FA FF 20 .faraddr %001000001111111111111010 +004B60r 1 FB FF 20 .faraddr %001000001111111111111011 +004B63r 1 FC FF 20 .faraddr %001000001111111111111100 +004B66r 1 FD FF 20 .faraddr %001000001111111111111101 +004B69r 1 FE FF 20 .faraddr %001000001111111111111110 +004B6Cr 1 FF FF 20 .faraddr %001000001111111111111111 +004B6Fr 1 00 00 21 .faraddr %001000010000000000000000 +004B72r 1 01 00 21 .faraddr %001000010000000000000001 +004B75r 1 02 00 21 .faraddr %001000010000000000000010 +004B78r 1 03 00 21 .faraddr %001000010000000000000011 +004B7Br 1 04 00 21 .faraddr %001000010000000000000100 +004B7Er 1 05 00 21 .faraddr %001000010000000000000101 +004B81r 1 06 00 21 .faraddr %001000010000000000000110 +004B84r 1 07 00 21 .faraddr %001000010000000000000111 +004B87r 1 08 00 21 .faraddr %001000010000000000001000 +004B8Ar 1 09 00 21 .faraddr %001000010000000000001001 +004B8Dr 1 0A 00 21 .faraddr %001000010000000000001010 +004B90r 1 0B 00 21 .faraddr %001000010000000000001011 +004B93r 1 0C 00 21 .faraddr %001000010000000000001100 +004B96r 1 0D 00 21 .faraddr %001000010000000000001101 +004B99r 1 0E 00 21 .faraddr %001000010000000000001110 +004B9Cr 1 0F 00 21 .faraddr %001000010000000000001111 +004B9Fr 1 E1 FF 7F .faraddr %011111111111111111100001 +004BA2r 1 E2 FF 7F .faraddr %011111111111111111100010 +004BA5r 1 E3 FF 7F .faraddr %011111111111111111100011 +004BA8r 1 E4 FF 7F .faraddr %011111111111111111100100 +004BABr 1 E5 FF 7F .faraddr %011111111111111111100101 +004BAEr 1 E6 FF 7F .faraddr %011111111111111111100110 +004BB1r 1 E7 FF 7F .faraddr %011111111111111111100111 +004BB4r 1 E8 FF 7F .faraddr %011111111111111111101000 +004BB7r 1 E9 FF 7F .faraddr %011111111111111111101001 +004BBAr 1 EA FF 7F .faraddr %011111111111111111101010 +004BBDr 1 EB FF 7F .faraddr %011111111111111111101011 +004BC0r 1 EC FF 7F .faraddr %011111111111111111101100 +004BC3r 1 ED FF 7F .faraddr %011111111111111111101101 +004BC6r 1 EE FF 7F .faraddr %011111111111111111101110 +004BC9r 1 EF FF 7F .faraddr %011111111111111111101111 +004BCCr 1 F0 FF 7F .faraddr %011111111111111111110000 +004BCFr 1 F1 FF 7F .faraddr %011111111111111111110001 +004BD2r 1 F2 FF 7F .faraddr %011111111111111111110010 +004BD5r 1 F3 FF 7F .faraddr %011111111111111111110011 +004BD8r 1 F4 FF 7F .faraddr %011111111111111111110100 +004BDBr 1 F5 FF 7F .faraddr %011111111111111111110101 +004BDEr 1 F6 FF 7F .faraddr %011111111111111111110110 +004BE1r 1 F7 FF 7F .faraddr %011111111111111111110111 +004BE4r 1 F8 FF 7F .faraddr %011111111111111111111000 +004BE7r 1 F9 FF 7F .faraddr %011111111111111111111001 +004BEAr 1 FA FF 7F .faraddr %011111111111111111111010 +004BEDr 1 FB FF 7F .faraddr %011111111111111111111011 +004BF0r 1 FC FF 7F .faraddr %011111111111111111111100 +004BF3r 1 FD FF 7F .faraddr %011111111111111111111101 +004BF6r 1 FE FF 7F .faraddr %011111111111111111111110 +004BF9r 1 FF FF 7F .faraddr %011111111111111111111111 +004BFCr 1 00 00 80 .faraddr %100000000000000000000000 +004BFFr 1 01 00 80 .faraddr %100000000000000000000001 +004C02r 1 02 00 80 .faraddr %100000000000000000000010 +004C05r 1 03 00 80 .faraddr %100000000000000000000011 +004C08r 1 04 00 80 .faraddr %100000000000000000000100 +004C0Br 1 05 00 80 .faraddr %100000000000000000000101 +004C0Er 1 06 00 80 .faraddr %100000000000000000000110 +004C11r 1 07 00 80 .faraddr %100000000000000000000111 +004C14r 1 08 00 80 .faraddr %100000000000000000001000 +004C17r 1 09 00 80 .faraddr %100000000000000000001001 +004C1Ar 1 0A 00 80 .faraddr %100000000000000000001010 +004C1Dr 1 0B 00 80 .faraddr %100000000000000000001011 +004C20r 1 0C 00 80 .faraddr %100000000000000000001100 +004C23r 1 0D 00 80 .faraddr %100000000000000000001101 +004C26r 1 0E 00 80 .faraddr %100000000000000000001110 +004C29r 1 0F 00 80 .faraddr %100000000000000000001111 +004C2Cr 1 E1 FF 9F .faraddr %100111111111111111100001 +004C2Fr 1 E2 FF 9F .faraddr %100111111111111111100010 +004C32r 1 E3 FF 9F .faraddr %100111111111111111100011 +004C35r 1 E4 FF 9F .faraddr %100111111111111111100100 +004C38r 1 E5 FF 9F .faraddr %100111111111111111100101 +004C3Br 1 E6 FF 9F .faraddr %100111111111111111100110 +004C3Er 1 E7 FF 9F .faraddr %100111111111111111100111 +004C41r 1 E8 FF 9F .faraddr %100111111111111111101000 +004C44r 1 E9 FF 9F .faraddr %100111111111111111101001 +004C47r 1 EA FF 9F .faraddr %100111111111111111101010 +004C4Ar 1 EB FF 9F .faraddr %100111111111111111101011 +004C4Dr 1 EC FF 9F .faraddr %100111111111111111101100 +004C50r 1 ED FF 9F .faraddr %100111111111111111101101 +004C53r 1 EE FF 9F .faraddr %100111111111111111101110 +004C56r 1 EF FF 9F .faraddr %100111111111111111101111 +004C59r 1 F0 FF 9F .faraddr %100111111111111111110000 +004C5Cr 1 F1 FF 9F .faraddr %100111111111111111110001 +004C5Fr 1 F2 FF 9F .faraddr %100111111111111111110010 +004C62r 1 F3 FF 9F .faraddr %100111111111111111110011 +004C65r 1 F4 FF 9F .faraddr %100111111111111111110100 +004C68r 1 F5 FF 9F .faraddr %100111111111111111110101 +004C6Br 1 F6 FF 9F .faraddr %100111111111111111110110 +004C6Er 1 F7 FF 9F .faraddr %100111111111111111110111 +004C71r 1 F8 FF 9F .faraddr %100111111111111111111000 +004C74r 1 F9 FF 9F .faraddr %100111111111111111111001 +004C77r 1 FA FF 9F .faraddr %100111111111111111111010 +004C7Ar 1 FB FF 9F .faraddr %100111111111111111111011 +004C7Dr 1 FC FF 9F .faraddr %100111111111111111111100 +004C80r 1 FD FF 9F .faraddr %100111111111111111111101 +004C83r 1 FE FF 9F .faraddr %100111111111111111111110 +004C86r 1 FF FF 9F .faraddr %100111111111111111111111 +004C89r 1 00 00 A0 .faraddr %101000000000000000000000 +004C8Cr 1 01 00 A0 .faraddr %101000000000000000000001 +004C8Fr 1 02 00 A0 .faraddr %101000000000000000000010 +004C92r 1 03 00 A0 .faraddr %101000000000000000000011 +004C95r 1 04 00 A0 .faraddr %101000000000000000000100 +004C98r 1 05 00 A0 .faraddr %101000000000000000000101 +004C9Br 1 06 00 A0 .faraddr %101000000000000000000110 +004C9Er 1 07 00 A0 .faraddr %101000000000000000000111 +004CA1r 1 08 00 A0 .faraddr %101000000000000000001000 +004CA4r 1 09 00 A0 .faraddr %101000000000000000001001 +004CA7r 1 0A 00 A0 .faraddr %101000000000000000001010 +004CAAr 1 0B 00 A0 .faraddr %101000000000000000001011 +004CADr 1 0C 00 A0 .faraddr %101000000000000000001100 +004CB0r 1 0D 00 A0 .faraddr %101000000000000000001101 +004CB3r 1 0E 00 A0 .faraddr %101000000000000000001110 +004CB6r 1 0F 00 A0 .faraddr %101000000000000000001111 +004CB9r 1 E1 FF FF .faraddr %111111111111111111100001 +004CBCr 1 E2 FF FF .faraddr %111111111111111111100010 +004CBFr 1 E3 FF FF .faraddr %111111111111111111100011 +004CC2r 1 E4 FF FF .faraddr %111111111111111111100100 +004CC5r 1 E5 FF FF .faraddr %111111111111111111100101 +004CC8r 1 E6 FF FF .faraddr %111111111111111111100110 +004CCBr 1 E7 FF FF .faraddr %111111111111111111100111 +004CCEr 1 E8 FF FF .faraddr %111111111111111111101000 +004CD1r 1 E9 FF FF .faraddr %111111111111111111101001 +004CD4r 1 EA FF FF .faraddr %111111111111111111101010 +004CD7r 1 EB FF FF .faraddr %111111111111111111101011 +004CDAr 1 EC FF FF .faraddr %111111111111111111101100 +004CDDr 1 ED FF FF .faraddr %111111111111111111101101 +004CE0r 1 EE FF FF .faraddr %111111111111111111101110 +004CE3r 1 EF FF FF .faraddr %111111111111111111101111 +004CE6r 1 F0 FF FF .faraddr %111111111111111111110000 +004CE9r 1 F1 FF FF .faraddr %111111111111111111110001 +004CECr 1 F2 FF FF .faraddr %111111111111111111110010 +004CEFr 1 F3 FF FF .faraddr %111111111111111111110011 +004CF2r 1 F4 FF FF .faraddr %111111111111111111110100 +004CF5r 1 F5 FF FF .faraddr %111111111111111111110101 +004CF8r 1 F6 FF FF .faraddr %111111111111111111110110 +004CFBr 1 F7 FF FF .faraddr %111111111111111111110111 +004CFEr 1 F8 FF FF .faraddr %111111111111111111111000 +004D01r 1 F9 FF FF .faraddr %111111111111111111111001 +004D04r 1 FA FF FF .faraddr %111111111111111111111010 +004D07r 1 FB FF FF .faraddr %111111111111111111111011 +004D0Ar 1 FC FF FF .faraddr %111111111111111111111100 +004D0Dr 1 FD FF FF .faraddr %111111111111111111111101 +004D10r 1 FE FF FF .faraddr %111111111111111111111110 +004D13r 1 FF FF FF .faraddr %111111111111111111111111 +004D16r 1 +004D16r 1 ; multiple values on one line, decimal +004D16r 1 00 00 00 01 .faraddr 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 +004D1Ar 1 00 00 02 00 +004D1Er 1 00 03 00 00 +004D46r 1 10 00 00 11 .faraddr 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 +004D4Ar 1 00 00 12 00 +004D4Er 1 00 13 00 00 +004D76r 1 70 00 00 71 .faraddr 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 +004D7Ar 1 00 00 72 00 +004D7Er 1 00 73 00 00 +004DA6r 1 80 00 00 81 .faraddr 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 +004DAAr 1 00 00 82 00 +004DAEr 1 00 83 00 00 +004DD6r 1 F0 00 00 F1 .faraddr 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 +004DDAr 1 00 00 F2 00 +004DDEr 1 00 F3 00 00 +004E06r 1 00 01 00 01 .faraddr 256,257,258,259,260,261,262,263,264,265,266,267,268,269,270,271 +004E0Ar 1 01 00 02 01 +004E0Er 1 00 03 01 00 +004E36r 1 E0 0F 00 E1 .faraddr 4064,4065,4066,4067,4068,4069,4070,4071,4072,4073,4074,4075,4076,4077,4078,4079 +004E3Ar 1 0F 00 E2 0F +004E3Er 1 00 E3 0F 00 +004E66r 1 F0 0F 00 F1 .faraddr 4080,4081,4082,4083,4084,4085,4086,4087,4088,4089,4090,4091,4092,4093,4094,4095 +004E6Ar 1 0F 00 F2 0F +004E6Er 1 00 F3 0F 00 +004E96r 1 00 10 00 01 .faraddr 4096,4097,4098,4099,4100,4101,4102,4103,4104,4105,4106,4107,4108,4109,4110,4111 +004E9Ar 1 10 00 02 10 +004E9Er 1 00 03 10 00 +004EC6r 1 F0 7F 00 F1 .faraddr 32752,32753,32754,32755,32756,32757,32758,32759,32760,32761,32762,32763,32764,32765,32766,32767 +004ECAr 1 7F 00 F2 7F +004ECEr 1 00 F3 7F 00 +004EF6r 1 00 80 00 01 .faraddr 32768,32769,32770,32771,32772,32773,32774,32775,32776,32777,32778,32779,32780,32781,32782,32783 +004EFAr 1 80 00 02 80 +004EFEr 1 00 03 80 00 +004F26r 1 EF 9F 00 F0 .faraddr 40943,40944,40945,40946,40947,40948,40949,40950,40951,40952,40953,40954,40955,40956,40957,40958 +004F2Ar 1 9F 00 F1 9F +004F2Er 1 00 F2 9F 00 +004F56r 1 FF 9F 00 00 .faraddr 40959,40960,40961,40962,40963,40964,40965,40966,40967,40968,40969,40970,40971,40972,40973,40974 +004F5Ar 1 A0 00 01 A0 +004F5Er 1 00 02 A0 00 +004F86r 1 0F A0 00 10 .faraddr 40975,40976,40977,40978,40979,40980,40981,40982,40983,40984,40985,40986,40987,40988,40989,40990 +004F8Ar 1 A0 00 11 A0 +004F8Er 1 00 12 A0 00 +004FB6r 1 EF AF 00 F0 .faraddr 45039,45040,45041,45042,45043,45044,45045,45046,45047,45048,45049,45050,45051,45052,45053,45054 +004FBAr 1 AF 00 F1 AF +004FBEr 1 00 F2 AF 00 +004FE6r 1 FF AF 00 00 .faraddr 45055,45056,45057,45058,45059,45060,45061,45062,45063,45064,45065,45066,45067,45068,45069,45070 +004FEAr 1 B0 00 01 B0 +004FEEr 1 00 02 B0 00 +005016r 1 0F B0 00 10 .faraddr 45071,45072,45073,45074,45075,45076,45077,45078,45079,45080,45081,45082,45083,45084,45085,45086 +00501Ar 1 B0 00 11 B0 +00501Er 1 00 12 B0 00 +005046r 1 EF FF 00 F0 .faraddr 65519,65520,65521,65522,65523,65524,65525,65526,65527,65528,65529,65530,65531,65532,65533,65534 +00504Ar 1 FF 00 F1 FF +00504Er 1 00 F2 FF 00 +005076r 1 FF FF 00 00 .faraddr 65535,65536,65537,65538,65539,65540,65541,65542,65543,65544,65545,65546,65547,65548,65549,65550 +00507Ar 1 00 01 01 00 +00507Er 1 01 02 00 01 +0050A6r 1 0F 00 01 10 .faraddr 65551,65552,65553,65554,65555,65556,65557,65558,65559,65560,65561,65562,65563,65564,65565,65566 +0050AAr 1 00 01 11 00 +0050AEr 1 01 12 00 01 +0050D6r 1 EF FF 10 F0 .faraddr 1114095,1114096,1114097,1114098,1114099,1114100,1114101,1114102,1114103,1114104,1114105,1114106,1114107,1114108,1114109,1114110 +0050DAr 1 FF 10 F1 FF +0050DEr 1 10 F2 FF 10 +005106r 1 FF FF 10 00 .faraddr 1114111,1114112,1114113,1114114,1114115,1114116,1114117,1114118,1114119,1114120,1114121,1114122,1114123,1114124,1114125,1114126 +00510Ar 1 00 11 01 00 +00510Er 1 11 02 00 11 +005136r 1 0F 00 11 10 .faraddr 1114127,1114128,1114129,1114130,1114131,1114132,1114133,1114134,1114135,1114136,1114137,1114138,1114139,1114140,1114141,1114142 +00513Ar 1 00 11 11 00 +00513Er 1 11 12 00 11 +005166r 1 EF FF 20 F0 .faraddr 2162671,2162672,2162673,2162674,2162675,2162676,2162677,2162678,2162679,2162680,2162681,2162682,2162683,2162684,2162685,2162686 +00516Ar 1 FF 20 F1 FF +00516Er 1 20 F2 FF 20 +005196r 1 FF FF 20 00 .faraddr 2162687,2162688,2162689,2162690,2162691,2162692,2162693,2162694,2162695,2162696,2162697,2162698,2162699,2162700,2162701,2162702 +00519Ar 1 00 21 01 00 +00519Er 1 21 02 00 21 +0051C6r 1 0F 00 21 10 .faraddr 2162703,2162704,2162705,2162706,2162707,2162708,2162709,2162710,2162711,2162712,2162713,2162714,2162715,2162716,2162717,2162718 +0051CAr 1 00 21 11 00 +0051CEr 1 21 12 00 21 +0051F6r 1 EF FF 7F F0 .faraddr 8388591,8388592,8388593,8388594,8388595,8388596,8388597,8388598,8388599,8388600,8388601,8388602,8388603,8388604,8388605,8388606 +0051FAr 1 FF 7F F1 FF +0051FEr 1 7F F2 FF 7F +005226r 1 FF FF 7F 00 .faraddr 8388607,8388608,8388609,8388610,8388611,8388612,8388613,8388614,8388615,8388616,8388617,8388618,8388619,8388620,8388621,8388622 +00522Ar 1 00 80 01 00 +00522Er 1 80 02 00 80 +005256r 1 0F 00 80 10 .faraddr 8388623,8388624,8388625,8388626,8388627,8388628,8388629,8388630,8388631,8388632,8388633,8388634,8388635,8388636,8388637,8388638 +00525Ar 1 00 80 11 00 +00525Er 1 80 12 00 80 +005286r 1 EF FF 9F F0 .faraddr 10485743,10485744,10485745,10485746,10485747,10485748,10485749,10485750,10485751,10485752,10485753,10485754,10485755,10485756,10485757,10485758 +00528Ar 1 FF 9F F1 FF +00528Er 1 9F F2 FF 9F +0052B6r 1 FF FF 9F 00 .faraddr 10485759,10485760,10485761,10485762,10485763,10485764,10485765,10485766,10485767,10485768,10485769,10485770,10485771,10485772,10485773,10485774 +0052BAr 1 00 A0 01 00 +0052BEr 1 A0 02 00 A0 +0052E6r 1 0F 00 A0 10 .faraddr 10485775,10485776,10485777,10485778,10485779,10485780,10485781,10485782,10485783,10485784,10485785,10485786,10485787,10485788,10485789,10485790 +0052EAr 1 00 A0 11 00 +0052EEr 1 A0 12 00 A0 +005316r 1 EF FF FF F0 .faraddr 16777199,16777200,16777201,16777202,16777203,16777204,16777205,16777206,16777207,16777208,16777209,16777210,16777211,16777212,16777213,16777214 +00531Ar 1 FF FF F1 FF +00531Er 1 FF F2 FF FF +005346r 1 FF FF FF .faraddr 16777215 +005349r 1 +005349r 1 ; multiple values on one line, hex +005349r 1 00 00 00 01 .faraddr $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f +00534Dr 1 00 00 02 00 +005351r 1 00 03 00 00 +005379r 1 10 00 00 11 .faraddr $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f +00537Dr 1 00 00 12 00 +005381r 1 00 13 00 00 +0053A9r 1 70 00 00 71 .faraddr $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f +0053ADr 1 00 00 72 00 +0053B1r 1 00 73 00 00 +0053D9r 1 80 00 00 81 .faraddr $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f +0053DDr 1 00 00 82 00 +0053E1r 1 00 83 00 00 +005409r 1 F0 00 00 F1 .faraddr $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff +00540Dr 1 00 00 F2 00 +005411r 1 00 F3 00 00 +005439r 1 00 01 00 01 .faraddr $100,$101,$102,$103,$104,$105,$106,$107,$108,$109,$10a,$10b,$10c,$10d,$10e,$10f +00543Dr 1 01 00 02 01 +005441r 1 00 03 01 00 +005469r 1 E0 0F 00 E1 .faraddr $fe0,$fe1,$fe2,$fe3,$fe4,$fe5,$fe6,$fe7,$fe8,$fe9,$fea,$feb,$fec,$fed,$fee,$fef +00546Dr 1 0F 00 E2 0F +005471r 1 00 E3 0F 00 +005499r 1 F0 0F 00 F1 .faraddr $ff0,$ff1,$ff2,$ff3,$ff4,$ff5,$ff6,$ff7,$ff8,$ff9,$ffa,$ffb,$ffc,$ffd,$ffe,$fff +00549Dr 1 0F 00 F2 0F +0054A1r 1 00 F3 0F 00 +0054C9r 1 00 10 00 01 .faraddr $1000,$1001,$1002,$1003,$1004,$1005,$1006,$1007,$1008,$1009,$100a,$100b,$100c,$100d,$100e,$100f +0054CDr 1 10 00 02 10 +0054D1r 1 00 03 10 00 +0054F9r 1 F0 7F 00 F1 .faraddr $7ff0,$7ff1,$7ff2,$7ff3,$7ff4,$7ff5,$7ff6,$7ff7,$7ff8,$7ff9,$7ffa,$7ffb,$7ffc,$7ffd,$7ffe,$7fff +0054FDr 1 7F 00 F2 7F +005501r 1 00 F3 7F 00 +005529r 1 00 80 00 01 .faraddr $8000,$8001,$8002,$8003,$8004,$8005,$8006,$8007,$8008,$8009,$800a,$800b,$800c,$800d,$800e,$800f +00552Dr 1 80 00 02 80 +005531r 1 00 03 80 00 +005559r 1 EF 9F 00 F0 .faraddr $9fef,$9ff0,$9ff1,$9ff2,$9ff3,$9ff4,$9ff5,$9ff6,$9ff7,$9ff8,$9ff9,$9ffa,$9ffb,$9ffc,$9ffd,$9ffe +00555Dr 1 9F 00 F1 9F +005561r 1 00 F2 9F 00 +005589r 1 FF 9F 00 00 .faraddr $9fff,$a000,$a001,$a002,$a003,$a004,$a005,$a006,$a007,$a008,$a009,$a00a,$a00b,$a00c,$a00d,$a00e +00558Dr 1 A0 00 01 A0 +005591r 1 00 02 A0 00 +0055B9r 1 0F A0 00 10 .faraddr $a00f,$a010,$a011,$a012,$a013,$a014,$a015,$a016,$a017,$a018,$a019,$a01a,$a01b,$a01c,$a01d,$a01e +0055BDr 1 A0 00 11 A0 +0055C1r 1 00 12 A0 00 +0055E9r 1 EF AF 00 F0 .faraddr $afef,$aff0,$aff1,$aff2,$aff3,$aff4,$aff5,$aff6,$aff7,$aff8,$aff9,$affa,$affb,$affc,$affd,$affe +0055EDr 1 AF 00 F1 AF +0055F1r 1 00 F2 AF 00 +005619r 1 FF AF 00 00 .faraddr $afff,$b000,$b001,$b002,$b003,$b004,$b005,$b006,$b007,$b008,$b009,$b00a,$b00b,$b00c,$b00d,$b00e +00561Dr 1 B0 00 01 B0 +005621r 1 00 02 B0 00 +005649r 1 0F B0 00 10 .faraddr $b00f,$b010,$b011,$b012,$b013,$b014,$b015,$b016,$b017,$b018,$b019,$b01a,$b01b,$b01c,$b01d,$b01e +00564Dr 1 B0 00 11 B0 +005651r 1 00 12 B0 00 +005679r 1 EF FF 00 F0 .faraddr $ffef,$fff0,$fff1,$fff2,$fff3,$fff4,$fff5,$fff6,$fff7,$fff8,$fff9,$fffa,$fffb,$fffc,$fffd,$fffe +00567Dr 1 FF 00 F1 FF +005681r 1 00 F2 FF 00 +0056A9r 1 FF FF 00 00 .faraddr $ffff,$10000,$10001,$10002,$10003,$10004,$10005,$10006,$10007,$10008,$10009,$1000a,$1000b,$1000c,$1000d,$1000e +0056ADr 1 00 01 01 00 +0056B1r 1 01 02 00 01 +0056D9r 1 0F 00 01 10 .faraddr $1000f,$10010,$10011,$10012,$10013,$10014,$10015,$10016,$10017,$10018,$10019,$1001a,$1001b,$1001c,$1001d,$1001e +0056DDr 1 00 01 11 00 +0056E1r 1 01 12 00 01 +005709r 1 EF FF 10 F0 .faraddr $10ffef,$10fff0,$10fff1,$10fff2,$10fff3,$10fff4,$10fff5,$10fff6,$10fff7,$10fff8,$10fff9,$10fffa,$10fffb,$10fffc,$10fffd,$10fffe +00570Dr 1 FF 10 F1 FF +005711r 1 10 F2 FF 10 +005739r 1 FF FF 10 00 .faraddr $10ffff,$110000,$110001,$110002,$110003,$110004,$110005,$110006,$110007,$110008,$110009,$11000a,$11000b,$11000c,$11000d,$11000e +00573Dr 1 00 11 01 00 +005741r 1 11 02 00 11 +005769r 1 0F 00 11 10 .faraddr $11000f,$110010,$110011,$110012,$110013,$110014,$110015,$110016,$110017,$110018,$110019,$11001a,$11001b,$11001c,$11001d,$11001e +00576Dr 1 00 11 11 00 +005771r 1 11 12 00 11 +005799r 1 EF FF 20 F0 .faraddr $20ffef,$20fff0,$20fff1,$20fff2,$20fff3,$20fff4,$20fff5,$20fff6,$20fff7,$20fff8,$20fff9,$20fffa,$20fffb,$20fffc,$20fffd,$20fffe +00579Dr 1 FF 20 F1 FF +0057A1r 1 20 F2 FF 20 +0057C9r 1 FF FF 20 00 .faraddr $20ffff,$210000,$210001,$210002,$210003,$210004,$210005,$210006,$210007,$210008,$210009,$21000a,$21000b,$21000c,$21000d,$21000e +0057CDr 1 00 21 01 00 +0057D1r 1 21 02 00 21 +0057F9r 1 0F 00 21 10 .faraddr $21000f,$210010,$210011,$210012,$210013,$210014,$210015,$210016,$210017,$210018,$210019,$21001a,$21001b,$21001c,$21001d,$21001e +0057FDr 1 00 21 11 00 +005801r 1 21 12 00 21 +005829r 1 EF FF 7F F0 .faraddr $7fffef,$7ffff0,$7ffff1,$7ffff2,$7ffff3,$7ffff4,$7ffff5,$7ffff6,$7ffff7,$7ffff8,$7ffff9,$7ffffa,$7ffffb,$7ffffc,$7ffffd,$7ffffe +00582Dr 1 FF 7F F1 FF +005831r 1 7F F2 FF 7F +005859r 1 FF FF 7F 00 .faraddr $7fffff,$800000,$800001,$800002,$800003,$800004,$800005,$800006,$800007,$800008,$800009,$80000a,$80000b,$80000c,$80000d,$80000e +00585Dr 1 00 80 01 00 +005861r 1 80 02 00 80 +005889r 1 0F 00 80 10 .faraddr $80000f,$800010,$800011,$800012,$800013,$800014,$800015,$800016,$800017,$800018,$800019,$80001a,$80001b,$80001c,$80001d,$80001e +00588Dr 1 00 80 11 00 +005891r 1 80 12 00 80 +0058B9r 1 EF FF 9F F0 .faraddr $9fffef,$9ffff0,$9ffff1,$9ffff2,$9ffff3,$9ffff4,$9ffff5,$9ffff6,$9ffff7,$9ffff8,$9ffff9,$9ffffa,$9ffffb,$9ffffc,$9ffffd,$9ffffe +0058BDr 1 FF 9F F1 FF +0058C1r 1 9F F2 FF 9F +0058E9r 1 FF FF 9F 00 .faraddr $9fffff,$a00000,$a00001,$a00002,$a00003,$a00004,$a00005,$a00006,$a00007,$a00008,$a00009,$a0000a,$a0000b,$a0000c,$a0000d,$a0000e +0058EDr 1 00 A0 01 00 +0058F1r 1 A0 02 00 A0 +005919r 1 0F 00 A0 10 .faraddr $a0000f,$a00010,$a00011,$a00012,$a00013,$a00014,$a00015,$a00016,$a00017,$a00018,$a00019,$a0001a,$a0001b,$a0001c,$a0001d,$a0001e +00591Dr 1 00 A0 11 00 +005921r 1 A0 12 00 A0 +005949r 1 EF FF FF F0 .faraddr $ffffef,$fffff0,$fffff1,$fffff2,$fffff3,$fffff4,$fffff5,$fffff6,$fffff7,$fffff8,$fffff9,$fffffa,$fffffb,$fffffc,$fffffd,$fffffe +00594Dr 1 FF FF F1 FF +005951r 1 FF F2 FF FF +005979r 1 FF FF FF .faraddr $ffffff +00597Cr 1 +00597Cr 1 ; multiple values on one line, alternative hex +00597Cr 1 00 00 00 01 .faraddr 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh +005980r 1 00 00 02 00 +005984r 1 00 03 00 00 +0059ACr 1 10 00 00 11 .faraddr 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh +0059B0r 1 00 00 12 00 +0059B4r 1 00 13 00 00 +0059DCr 1 70 00 00 71 .faraddr 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh +0059E0r 1 00 00 72 00 +0059E4r 1 00 73 00 00 +005A0Cr 1 80 00 00 81 .faraddr 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh +005A10r 1 00 00 82 00 +005A14r 1 00 83 00 00 +005A3Cr 1 F0 00 00 F1 .faraddr 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh +005A40r 1 00 00 F2 00 +005A44r 1 00 F3 00 00 +005A6Cr 1 00 01 00 01 .faraddr 100h,101h,102h,103h,104h,105h,106h,107h,108h,109h,10ah,10bh,10ch,10dh,10eh,10fh +005A70r 1 01 00 02 01 +005A74r 1 00 03 01 00 +005A9Cr 1 E0 0F 00 E1 .faraddr 0fe0h,0fe1h,0fe2h,0fe3h,0fe4h,0fe5h,0fe6h,0fe7h,0fe8h,0fe9h,0feah,0febh,0fech,0fedh,0feeh,0fefh +005AA0r 1 0F 00 E2 0F +005AA4r 1 00 E3 0F 00 +005ACCr 1 F0 0F 00 F1 .faraddr 0ff0h,0ff1h,0ff2h,0ff3h,0ff4h,0ff5h,0ff6h,0ff7h,0ff8h,0ff9h,0ffah,0ffbh,0ffch,0ffdh,0ffeh,0fffh +005AD0r 1 0F 00 F2 0F +005AD4r 1 00 F3 0F 00 +005AFCr 1 00 10 00 01 .faraddr 1000h,1001h,1002h,1003h,1004h,1005h,1006h,1007h,1008h,1009h,100ah,100bh,100ch,100dh,100eh,100fh +005B00r 1 10 00 02 10 +005B04r 1 00 03 10 00 +005B2Cr 1 F0 7F 00 F1 .faraddr 7ff0h,7ff1h,7ff2h,7ff3h,7ff4h,7ff5h,7ff6h,7ff7h,7ff8h,7ff9h,7ffah,7ffbh,7ffch,7ffdh,7ffeh,7fffh +005B30r 1 7F 00 F2 7F +005B34r 1 00 F3 7F 00 +005B5Cr 1 00 80 00 01 .faraddr 8000h,8001h,8002h,8003h,8004h,8005h,8006h,8007h,8008h,8009h,800ah,800bh,800ch,800dh,800eh,800fh +005B60r 1 80 00 02 80 +005B64r 1 00 03 80 00 +005B8Cr 1 EF 9F 00 F0 .faraddr 9fefh,9ff0h,9ff1h,9ff2h,9ff3h,9ff4h,9ff5h,9ff6h,9ff7h,9ff8h,9ff9h,9ffah,9ffbh,9ffch,9ffdh,9ffeh +005B90r 1 9F 00 F1 9F +005B94r 1 00 F2 9F 00 +005BBCr 1 FF 9F 00 00 .faraddr 9fffh,0a000h,0a001h,0a002h,0a003h,0a004h,0a005h,0a006h,0a007h,0a008h,0a009h,0a00ah,0a00bh,0a00ch,0a00dh,0a00eh +005BC0r 1 A0 00 01 A0 +005BC4r 1 00 02 A0 00 +005BECr 1 0F A0 00 10 .faraddr 0a00fh,0a010h,0a011h,0a012h,0a013h,0a014h,0a015h,0a016h,0a017h,0a018h,0a019h,0a01ah,0a01bh,0a01ch,0a01dh,0a01eh +005BF0r 1 A0 00 11 A0 +005BF4r 1 00 12 A0 00 +005C1Cr 1 EF AF 00 F0 .faraddr 0afefh,0aff0h,0aff1h,0aff2h,0aff3h,0aff4h,0aff5h,0aff6h,0aff7h,0aff8h,0aff9h,0affah,0affbh,0affch,0affdh,0affeh +005C20r 1 AF 00 F1 AF +005C24r 1 00 F2 AF 00 +005C4Cr 1 FF AF 00 00 .faraddr 0afffh,0b000h,0b001h,0b002h,0b003h,0b004h,0b005h,0b006h,0b007h,0b008h,0b009h,0b00ah,0b00bh,0b00ch,0b00dh,0b00eh +005C50r 1 B0 00 01 B0 +005C54r 1 00 02 B0 00 +005C7Cr 1 0F B0 00 10 .faraddr 0b00fh,0b010h,0b011h,0b012h,0b013h,0b014h,0b015h,0b016h,0b017h,0b018h,0b019h,0b01ah,0b01bh,0b01ch,0b01dh,0b01eh +005C80r 1 B0 00 11 B0 +005C84r 1 00 12 B0 00 +005CACr 1 EF FF 00 F0 .faraddr 0ffefh,0fff0h,0fff1h,0fff2h,0fff3h,0fff4h,0fff5h,0fff6h,0fff7h,0fff8h,0fff9h,0fffah,0fffbh,0fffch,0fffdh,0fffeh +005CB0r 1 FF 00 F1 FF +005CB4r 1 00 F2 FF 00 +005CDCr 1 FF FF 00 00 .faraddr 0ffffh,10000h,10001h,10002h,10003h,10004h,10005h,10006h,10007h,10008h,10009h,1000ah,1000bh,1000ch,1000dh,1000eh +005CE0r 1 00 01 01 00 +005CE4r 1 01 02 00 01 +005D0Cr 1 0F 00 01 10 .faraddr 1000fh,10010h,10011h,10012h,10013h,10014h,10015h,10016h,10017h,10018h,10019h,1001ah,1001bh,1001ch,1001dh,1001eh +005D10r 1 00 01 11 00 +005D14r 1 01 12 00 01 +005D3Cr 1 EF FF 10 F0 .faraddr 10ffefh,10fff0h,10fff1h,10fff2h,10fff3h,10fff4h,10fff5h,10fff6h,10fff7h,10fff8h,10fff9h,10fffah,10fffbh,10fffch,10fffdh,10fffeh +005D40r 1 FF 10 F1 FF +005D44r 1 10 F2 FF 10 +005D6Cr 1 FF FF 10 00 .faraddr 10ffffh,110000h,110001h,110002h,110003h,110004h,110005h,110006h,110007h,110008h,110009h,11000ah,11000bh,11000ch,11000dh,11000eh +005D70r 1 00 11 01 00 +005D74r 1 11 02 00 11 +005D9Cr 1 0F 00 11 10 .faraddr 11000fh,110010h,110011h,110012h,110013h,110014h,110015h,110016h,110017h,110018h,110019h,11001ah,11001bh,11001ch,11001dh,11001eh +005DA0r 1 00 11 11 00 +005DA4r 1 11 12 00 11 +005DCCr 1 EF FF 20 F0 .faraddr 20ffefh,20fff0h,20fff1h,20fff2h,20fff3h,20fff4h,20fff5h,20fff6h,20fff7h,20fff8h,20fff9h,20fffah,20fffbh,20fffch,20fffdh,20fffeh +005DD0r 1 FF 20 F1 FF +005DD4r 1 20 F2 FF 20 +005DFCr 1 FF FF 20 00 .faraddr 20ffffh,210000h,210001h,210002h,210003h,210004h,210005h,210006h,210007h,210008h,210009h,21000ah,21000bh,21000ch,21000dh,21000eh +005E00r 1 00 21 01 00 +005E04r 1 21 02 00 21 +005E2Cr 1 0F 00 21 10 .faraddr 21000fh,210010h,210011h,210012h,210013h,210014h,210015h,210016h,210017h,210018h,210019h,21001ah,21001bh,21001ch,21001dh,21001eh +005E30r 1 00 21 11 00 +005E34r 1 21 12 00 21 +005E5Cr 1 EF FF 7F F0 .faraddr 7fffefh,7ffff0h,7ffff1h,7ffff2h,7ffff3h,7ffff4h,7ffff5h,7ffff6h,7ffff7h,7ffff8h,7ffff9h,7ffffah,7ffffbh,7ffffch,7ffffdh,7ffffeh +005E60r 1 FF 7F F1 FF +005E64r 1 7F F2 FF 7F +005E8Cr 1 FF FF 7F 00 .faraddr 7fffffh,800000h,800001h,800002h,800003h,800004h,800005h,800006h,800007h,800008h,800009h,80000ah,80000bh,80000ch,80000dh,80000eh +005E90r 1 00 80 01 00 +005E94r 1 80 02 00 80 +005EBCr 1 0F 00 80 10 .faraddr 80000fh,800010h,800011h,800012h,800013h,800014h,800015h,800016h,800017h,800018h,800019h,80001ah,80001bh,80001ch,80001dh,80001eh +005EC0r 1 00 80 11 00 +005EC4r 1 80 12 00 80 +005EECr 1 EF FF 9F F0 .faraddr 9fffefh,9ffff0h,9ffff1h,9ffff2h,9ffff3h,9ffff4h,9ffff5h,9ffff6h,9ffff7h,9ffff8h,9ffff9h,9ffffah,9ffffbh,9ffffch,9ffffdh,9ffffeh +005EF0r 1 FF 9F F1 FF +005EF4r 1 9F F2 FF 9F +005F1Cr 1 FF FF 9F 00 .faraddr 9fffffh,0a00000h,0a00001h,0a00002h,0a00003h,0a00004h,0a00005h,0a00006h,0a00007h,0a00008h,0a00009h,0a0000ah,0a0000bh,0a0000ch,0a0000dh,0a0000eh +005F20r 1 00 A0 01 00 +005F24r 1 A0 02 00 A0 +005F4Cr 1 0F 00 A0 10 .faraddr 0a0000fh,0a00010h,0a00011h,0a00012h,0a00013h,0a00014h,0a00015h,0a00016h,0a00017h,0a00018h,0a00019h,0a0001ah,0a0001bh,0a0001ch,0a0001dh,0a0001eh +005F50r 1 00 A0 11 00 +005F54r 1 A0 12 00 A0 +005F7Cr 1 EF FF FF F0 .faraddr 0ffffefh,0fffff0h,0fffff1h,0fffff2h,0fffff3h,0fffff4h,0fffff5h,0fffff6h,0fffff7h,0fffff8h,0fffff9h,0fffffah,0fffffbh,0fffffch,0fffffdh,0fffffeh +005F80r 1 FF FF F1 FF +005F84r 1 FF F2 FF FF +005FACr 1 FF FF FF .faraddr 0ffffffh +005FAFr 1 +005FAFr 1 ; mix some variants +005FAFr 1 0B 00 00 11 .faraddr 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh +005FB3r 1 00 00 03 00 +005FB7r 1 00 11 00 00 +005FDCr 1 diff --git a/test/asm/listing/ref/106-hibytes.bin-ref b/test/asm/listing/ref/106-hibytes.bin-ref new file mode 100644 index 000000000..26ce02dd4 Binary files /dev/null and b/test/asm/listing/ref/106-hibytes.bin-ref differ diff --git a/test/asm/listing/ref/106-hibytes.list-ref b/test/asm/listing/ref/106-hibytes.list-ref new file mode 100644 index 000000000..ddd9146de --- /dev/null +++ b/test/asm/listing/ref/106-hibytes.list-ref @@ -0,0 +1,6227 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 106-hibytes.s +Current file: 106-hibytes.s + +000000r 1 ; 2022-06-15 Spiro Trikaliotis +000000r 1 +000000r 1 +000000r 1 ; upper case pseudo-op +000000r 1 00 .HIBYTES 0 +000001r 1 00 .HIBYTES 1 +000002r 1 00 .HIBYTES 2 +000003r 1 00 .HIBYTES 3 +000004r 1 00 .HIBYTES 4 +000005r 1 00 .HIBYTES 5 +000006r 1 00 .HIBYTES 6 +000007r 1 00 .HIBYTES 7 +000008r 1 00 .HIBYTES 8 +000009r 1 00 .HIBYTES 9 +00000Ar 1 00 .HIBYTES 10 +00000Br 1 00 .HIBYTES 11 +00000Cr 1 00 .HIBYTES 12 +00000Dr 1 00 .HIBYTES 13 +00000Er 1 00 .HIBYTES 14 +00000Fr 1 00 .HIBYTES 15 +000010r 1 00 .HIBYTES 16 +000011r 1 00 .HIBYTES 17 +000012r 1 00 .HIBYTES 18 +000013r 1 00 .HIBYTES 19 +000014r 1 00 .HIBYTES 112 +000015r 1 00 .HIBYTES 113 +000016r 1 00 .HIBYTES 114 +000017r 1 00 .HIBYTES 115 +000018r 1 00 .HIBYTES 116 +000019r 1 00 .HIBYTES 117 +00001Ar 1 00 .HIBYTES 118 +00001Br 1 00 .HIBYTES 119 +00001Cr 1 00 .HIBYTES 120 +00001Dr 1 00 .HIBYTES 121 +00001Er 1 00 .HIBYTES 122 +00001Fr 1 00 .HIBYTES 123 +000020r 1 00 .HIBYTES 124 +000021r 1 00 .HIBYTES 125 +000022r 1 00 .HIBYTES 126 +000023r 1 00 .HIBYTES 127 +000024r 1 00 .HIBYTES 128 +000025r 1 00 .HIBYTES 129 +000026r 1 00 .HIBYTES 130 +000027r 1 00 .HIBYTES 131 +000028r 1 00 .HIBYTES 132 +000029r 1 00 .HIBYTES 133 +00002Ar 1 00 .HIBYTES 134 +00002Br 1 00 .HIBYTES 240 +00002Cr 1 00 .HIBYTES 241 +00002Dr 1 00 .HIBYTES 242 +00002Er 1 00 .HIBYTES 243 +00002Fr 1 00 .HIBYTES 244 +000030r 1 00 .HIBYTES 245 +000031r 1 00 .HIBYTES 246 +000032r 1 00 .HIBYTES 247 +000033r 1 00 .HIBYTES 248 +000034r 1 00 .HIBYTES 249 +000035r 1 00 .HIBYTES 250 +000036r 1 00 .HIBYTES 251 +000037r 1 00 .HIBYTES 252 +000038r 1 00 .HIBYTES 253 +000039r 1 00 .HIBYTES 254 +00003Ar 1 00 .HIBYTES 255 +00003Br 1 01 .HIBYTES 256 +00003Cr 1 01 .HIBYTES 257 +00003Dr 1 01 .HIBYTES 258 +00003Er 1 01 .HIBYTES 259 +00003Fr 1 0F .HIBYTES 4050 +000040r 1 0F .HIBYTES 4051 +000041r 1 0F .HIBYTES 4052 +000042r 1 0F .HIBYTES 4053 +000043r 1 0F .HIBYTES 4054 +000044r 1 0F .HIBYTES 4055 +000045r 1 0F .HIBYTES 4056 +000046r 1 0F .HIBYTES 4057 +000047r 1 0F .HIBYTES 4058 +000048r 1 0F .HIBYTES 4059 +000049r 1 0F .HIBYTES 4060 +00004Ar 1 0F .HIBYTES 4061 +00004Br 1 0F .HIBYTES 4062 +00004Cr 1 0F .HIBYTES 4063 +00004Dr 1 0F .HIBYTES 4064 +00004Er 1 0F .HIBYTES 4065 +00004Fr 1 0F .HIBYTES 4066 +000050r 1 0F .HIBYTES 4067 +000051r 1 0F .HIBYTES 4068 +000052r 1 0F .HIBYTES 4069 +000053r 1 0F .HIBYTES 4070 +000054r 1 0F .HIBYTES 4071 +000055r 1 0F .HIBYTES 4072 +000056r 1 0F .HIBYTES 4073 +000057r 1 0F .HIBYTES 4074 +000058r 1 0F .HIBYTES 4075 +000059r 1 0F .HIBYTES 4076 +00005Ar 1 0F .HIBYTES 4077 +00005Br 1 0F .HIBYTES 4078 +00005Cr 1 0F .HIBYTES 4079 +00005Dr 1 0F .HIBYTES 4080 +00005Er 1 0F .HIBYTES 4081 +00005Fr 1 0F .HIBYTES 4082 +000060r 1 0F .HIBYTES 4083 +000061r 1 0F .HIBYTES 4084 +000062r 1 0F .HIBYTES 4085 +000063r 1 0F .HIBYTES 4086 +000064r 1 0F .HIBYTES 4087 +000065r 1 0F .HIBYTES 4088 +000066r 1 0F .HIBYTES 4089 +000067r 1 0F .HIBYTES 4090 +000068r 1 0F .HIBYTES 4091 +000069r 1 0F .HIBYTES 4092 +00006Ar 1 0F .HIBYTES 4093 +00006Br 1 0F .HIBYTES 4094 +00006Cr 1 0F .HIBYTES 4095 +00006Dr 1 10 .HIBYTES 4096 +00006Er 1 10 .HIBYTES 4097 +00006Fr 1 10 .HIBYTES 4098 +000070r 1 10 .HIBYTES 4099 +000071r 1 10 .HIBYTES 4100 +000072r 1 10 .HIBYTES 4101 +000073r 1 10 .HIBYTES 4102 +000074r 1 10 .HIBYTES 4103 +000075r 1 10 .HIBYTES 4104 +000076r 1 7F .HIBYTES 32752 +000077r 1 7F .HIBYTES 32753 +000078r 1 7F .HIBYTES 32754 +000079r 1 7F .HIBYTES 32755 +00007Ar 1 7F .HIBYTES 32756 +00007Br 1 7F .HIBYTES 32757 +00007Cr 1 7F .HIBYTES 32758 +00007Dr 1 7F .HIBYTES 32759 +00007Er 1 7F .HIBYTES 32760 +00007Fr 1 7F .HIBYTES 32761 +000080r 1 7F .HIBYTES 32762 +000081r 1 7F .HIBYTES 32763 +000082r 1 7F .HIBYTES 32764 +000083r 1 7F .HIBYTES 32765 +000084r 1 7F .HIBYTES 32766 +000085r 1 7F .HIBYTES 32767 +000086r 1 80 .HIBYTES 32768 +000087r 1 80 .HIBYTES 32769 +000088r 1 80 .HIBYTES 32770 +000089r 1 80 .HIBYTES 32771 +00008Ar 1 80 .HIBYTES 32772 +00008Br 1 80 .HIBYTES 32773 +00008Cr 1 80 .HIBYTES 32774 +00008Dr 1 80 .HIBYTES 32775 +00008Er 1 80 .HIBYTES 32776 +00008Fr 1 80 .HIBYTES 32777 +000090r 1 80 .HIBYTES 32778 +000091r 1 80 .HIBYTES 32779 +000092r 1 9F .HIBYTES 40929 +000093r 1 9F .HIBYTES 40930 +000094r 1 9F .HIBYTES 40931 +000095r 1 9F .HIBYTES 40932 +000096r 1 9F .HIBYTES 40933 +000097r 1 9F .HIBYTES 40934 +000098r 1 9F .HIBYTES 40935 +000099r 1 9F .HIBYTES 40936 +00009Ar 1 9F .HIBYTES 40937 +00009Br 1 9F .HIBYTES 40938 +00009Cr 1 9F .HIBYTES 40939 +00009Dr 1 9F .HIBYTES 40940 +00009Er 1 9F .HIBYTES 40941 +00009Fr 1 9F .HIBYTES 40942 +0000A0r 1 9F .HIBYTES 40943 +0000A1r 1 9F .HIBYTES 40944 +0000A2r 1 9F .HIBYTES 40945 +0000A3r 1 9F .HIBYTES 40946 +0000A4r 1 9F .HIBYTES 40947 +0000A5r 1 9F .HIBYTES 40948 +0000A6r 1 9F .HIBYTES 40949 +0000A7r 1 9F .HIBYTES 40950 +0000A8r 1 9F .HIBYTES 40951 +0000A9r 1 9F .HIBYTES 40952 +0000AAr 1 9F .HIBYTES 40953 +0000ABr 1 9F .HIBYTES 40954 +0000ACr 1 9F .HIBYTES 40955 +0000ADr 1 9F .HIBYTES 40956 +0000AEr 1 9F .HIBYTES 40957 +0000AFr 1 9F .HIBYTES 40958 +0000B0r 1 9F .HIBYTES 40959 +0000B1r 1 A0 .HIBYTES 40960 +0000B2r 1 A0 .HIBYTES 40961 +0000B3r 1 A0 .HIBYTES 40962 +0000B4r 1 A0 .HIBYTES 40963 +0000B5r 1 A0 .HIBYTES 40964 +0000B6r 1 A0 .HIBYTES 40965 +0000B7r 1 A0 .HIBYTES 40966 +0000B8r 1 A0 .HIBYTES 40967 +0000B9r 1 A0 .HIBYTES 40968 +0000BAr 1 A0 .HIBYTES 40969 +0000BBr 1 A0 .HIBYTES 40970 +0000BCr 1 A0 .HIBYTES 40971 +0000BDr 1 A0 .HIBYTES 40972 +0000BEr 1 A0 .HIBYTES 40973 +0000BFr 1 A0 .HIBYTES 40974 +0000C0r 1 A0 .HIBYTES 40975 +0000C1r 1 AF .HIBYTES 45025 +0000C2r 1 AF .HIBYTES 45026 +0000C3r 1 AF .HIBYTES 45027 +0000C4r 1 AF .HIBYTES 45028 +0000C5r 1 AF .HIBYTES 45029 +0000C6r 1 AF .HIBYTES 45030 +0000C7r 1 AF .HIBYTES 45031 +0000C8r 1 AF .HIBYTES 45032 +0000C9r 1 AF .HIBYTES 45033 +0000CAr 1 AF .HIBYTES 45034 +0000CBr 1 AF .HIBYTES 45035 +0000CCr 1 AF .HIBYTES 45036 +0000CDr 1 AF .HIBYTES 45037 +0000CEr 1 AF .HIBYTES 45038 +0000CFr 1 AF .HIBYTES 45039 +0000D0r 1 AF .HIBYTES 45040 +0000D1r 1 AF .HIBYTES 45041 +0000D2r 1 AF .HIBYTES 45042 +0000D3r 1 AF .HIBYTES 45043 +0000D4r 1 AF .HIBYTES 45044 +0000D5r 1 AF .HIBYTES 45045 +0000D6r 1 AF .HIBYTES 45046 +0000D7r 1 AF .HIBYTES 45047 +0000D8r 1 AF .HIBYTES 45048 +0000D9r 1 AF .HIBYTES 45049 +0000DAr 1 AF .HIBYTES 45050 +0000DBr 1 AF .HIBYTES 45051 +0000DCr 1 AF .HIBYTES 45052 +0000DDr 1 AF .HIBYTES 45053 +0000DEr 1 AF .HIBYTES 45054 +0000DFr 1 AF .HIBYTES 45055 +0000E0r 1 B0 .HIBYTES 45056 +0000E1r 1 B0 .HIBYTES 45057 +0000E2r 1 B0 .HIBYTES 45058 +0000E3r 1 B0 .HIBYTES 45059 +0000E4r 1 B0 .HIBYTES 45060 +0000E5r 1 B0 .HIBYTES 45061 +0000E6r 1 B0 .HIBYTES 45062 +0000E7r 1 B0 .HIBYTES 45063 +0000E8r 1 B0 .HIBYTES 45064 +0000E9r 1 B0 .HIBYTES 45065 +0000EAr 1 B0 .HIBYTES 45066 +0000EBr 1 B0 .HIBYTES 45067 +0000ECr 1 B0 .HIBYTES 45068 +0000EDr 1 B0 .HIBYTES 45069 +0000EEr 1 B0 .HIBYTES 45070 +0000EFr 1 B0 .HIBYTES 45071 +0000F0r 1 BF .HIBYTES 49121 +0000F1r 1 BF .HIBYTES 49122 +0000F2r 1 BF .HIBYTES 49123 +0000F3r 1 BF .HIBYTES 49124 +0000F4r 1 BF .HIBYTES 49125 +0000F5r 1 BF .HIBYTES 49126 +0000F6r 1 BF .HIBYTES 49127 +0000F7r 1 BF .HIBYTES 49128 +0000F8r 1 BF .HIBYTES 49129 +0000F9r 1 BF .HIBYTES 49130 +0000FAr 1 BF .HIBYTES 49131 +0000FBr 1 BF .HIBYTES 49132 +0000FCr 1 BF .HIBYTES 49133 +0000FDr 1 BF .HIBYTES 49134 +0000FEr 1 BF .HIBYTES 49135 +0000FFr 1 BF .HIBYTES 49136 +000100r 1 BF .HIBYTES 49137 +000101r 1 BF .HIBYTES 49138 +000102r 1 BF .HIBYTES 49139 +000103r 1 BF .HIBYTES 49140 +000104r 1 BF .HIBYTES 49141 +000105r 1 BF .HIBYTES 49142 +000106r 1 BF .HIBYTES 49143 +000107r 1 BF .HIBYTES 49144 +000108r 1 BF .HIBYTES 49145 +000109r 1 BF .HIBYTES 49146 +00010Ar 1 BF .HIBYTES 49147 +00010Br 1 BF .HIBYTES 49148 +00010Cr 1 BF .HIBYTES 49149 +00010Dr 1 BF .HIBYTES 49150 +00010Er 1 BF .HIBYTES 49151 +00010Fr 1 C0 .HIBYTES 49152 +000110r 1 C0 .HIBYTES 49153 +000111r 1 C0 .HIBYTES 49154 +000112r 1 C0 .HIBYTES 49155 +000113r 1 C0 .HIBYTES 49156 +000114r 1 C0 .HIBYTES 49157 +000115r 1 C0 .HIBYTES 49158 +000116r 1 C0 .HIBYTES 49159 +000117r 1 C0 .HIBYTES 49160 +000118r 1 C0 .HIBYTES 49161 +000119r 1 C0 .HIBYTES 49162 +00011Ar 1 C0 .HIBYTES 49163 +00011Br 1 C0 .HIBYTES 49164 +00011Cr 1 C0 .HIBYTES 49165 +00011Dr 1 C0 .HIBYTES 49166 +00011Er 1 C0 .HIBYTES 49167 +00011Fr 1 CF .HIBYTES 53217 +000120r 1 CF .HIBYTES 53218 +000121r 1 CF .HIBYTES 53219 +000122r 1 CF .HIBYTES 53220 +000123r 1 CF .HIBYTES 53221 +000124r 1 CF .HIBYTES 53222 +000125r 1 CF .HIBYTES 53223 +000126r 1 CF .HIBYTES 53224 +000127r 1 CF .HIBYTES 53225 +000128r 1 CF .HIBYTES 53226 +000129r 1 CF .HIBYTES 53227 +00012Ar 1 CF .HIBYTES 53228 +00012Br 1 CF .HIBYTES 53229 +00012Cr 1 CF .HIBYTES 53230 +00012Dr 1 CF .HIBYTES 53231 +00012Er 1 CF .HIBYTES 53232 +00012Fr 1 CF .HIBYTES 53233 +000130r 1 CF .HIBYTES 53234 +000131r 1 CF .HIBYTES 53235 +000132r 1 CF .HIBYTES 53236 +000133r 1 CF .HIBYTES 53237 +000134r 1 CF .HIBYTES 53238 +000135r 1 CF .HIBYTES 53239 +000136r 1 CF .HIBYTES 53240 +000137r 1 CF .HIBYTES 53241 +000138r 1 CF .HIBYTES 53242 +000139r 1 CF .HIBYTES 53243 +00013Ar 1 CF .HIBYTES 53244 +00013Br 1 CF .HIBYTES 53245 +00013Cr 1 CF .HIBYTES 53246 +00013Dr 1 CF .HIBYTES 53247 +00013Er 1 D0 .HIBYTES 53248 +00013Fr 1 D0 .HIBYTES 53249 +000140r 1 D0 .HIBYTES 53250 +000141r 1 D0 .HIBYTES 53251 +000142r 1 D0 .HIBYTES 53252 +000143r 1 D0 .HIBYTES 53253 +000144r 1 D0 .HIBYTES 53254 +000145r 1 D0 .HIBYTES 53255 +000146r 1 D0 .HIBYTES 53256 +000147r 1 D0 .HIBYTES 53257 +000148r 1 D0 .HIBYTES 53258 +000149r 1 D0 .HIBYTES 53259 +00014Ar 1 D0 .HIBYTES 53260 +00014Br 1 D0 .HIBYTES 53261 +00014Cr 1 D0 .HIBYTES 53262 +00014Dr 1 D0 .HIBYTES 53263 +00014Er 1 DF .HIBYTES 57313 +00014Fr 1 DF .HIBYTES 57314 +000150r 1 DF .HIBYTES 57315 +000151r 1 DF .HIBYTES 57316 +000152r 1 DF .HIBYTES 57317 +000153r 1 DF .HIBYTES 57318 +000154r 1 DF .HIBYTES 57319 +000155r 1 DF .HIBYTES 57320 +000156r 1 DF .HIBYTES 57321 +000157r 1 DF .HIBYTES 57322 +000158r 1 DF .HIBYTES 57323 +000159r 1 DF .HIBYTES 57324 +00015Ar 1 DF .HIBYTES 57325 +00015Br 1 DF .HIBYTES 57326 +00015Cr 1 DF .HIBYTES 57327 +00015Dr 1 DF .HIBYTES 57328 +00015Er 1 DF .HIBYTES 57329 +00015Fr 1 DF .HIBYTES 57330 +000160r 1 DF .HIBYTES 57331 +000161r 1 DF .HIBYTES 57332 +000162r 1 DF .HIBYTES 57333 +000163r 1 DF .HIBYTES 57334 +000164r 1 DF .HIBYTES 57335 +000165r 1 DF .HIBYTES 57336 +000166r 1 DF .HIBYTES 57337 +000167r 1 DF .HIBYTES 57338 +000168r 1 DF .HIBYTES 57339 +000169r 1 DF .HIBYTES 57340 +00016Ar 1 DF .HIBYTES 57341 +00016Br 1 DF .HIBYTES 57342 +00016Cr 1 DF .HIBYTES 57343 +00016Dr 1 E0 .HIBYTES 57344 +00016Er 1 E0 .HIBYTES 57345 +00016Fr 1 E0 .HIBYTES 57346 +000170r 1 E0 .HIBYTES 57347 +000171r 1 E0 .HIBYTES 57348 +000172r 1 E0 .HIBYTES 57349 +000173r 1 E0 .HIBYTES 57350 +000174r 1 E0 .HIBYTES 57351 +000175r 1 E0 .HIBYTES 57352 +000176r 1 E0 .HIBYTES 57353 +000177r 1 E0 .HIBYTES 57354 +000178r 1 E0 .HIBYTES 57355 +000179r 1 E0 .HIBYTES 57356 +00017Ar 1 E0 .HIBYTES 57357 +00017Br 1 E0 .HIBYTES 57358 +00017Cr 1 E0 .HIBYTES 57359 +00017Dr 1 EF .HIBYTES 61409 +00017Er 1 EF .HIBYTES 61410 +00017Fr 1 EF .HIBYTES 61411 +000180r 1 EF .HIBYTES 61412 +000181r 1 EF .HIBYTES 61413 +000182r 1 EF .HIBYTES 61414 +000183r 1 EF .HIBYTES 61415 +000184r 1 EF .HIBYTES 61416 +000185r 1 EF .HIBYTES 61417 +000186r 1 EF .HIBYTES 61418 +000187r 1 EF .HIBYTES 61419 +000188r 1 EF .HIBYTES 61420 +000189r 1 EF .HIBYTES 61421 +00018Ar 1 EF .HIBYTES 61422 +00018Br 1 EF .HIBYTES 61423 +00018Cr 1 EF .HIBYTES 61424 +00018Dr 1 EF .HIBYTES 61425 +00018Er 1 EF .HIBYTES 61426 +00018Fr 1 EF .HIBYTES 61427 +000190r 1 EF .HIBYTES 61428 +000191r 1 EF .HIBYTES 61429 +000192r 1 EF .HIBYTES 61430 +000193r 1 EF .HIBYTES 61431 +000194r 1 EF .HIBYTES 61432 +000195r 1 EF .HIBYTES 61433 +000196r 1 EF .HIBYTES 61434 +000197r 1 EF .HIBYTES 61435 +000198r 1 EF .HIBYTES 61436 +000199r 1 EF .HIBYTES 61437 +00019Ar 1 EF .HIBYTES 61438 +00019Br 1 EF .HIBYTES 61439 +00019Cr 1 F0 .HIBYTES 61440 +00019Dr 1 F0 .HIBYTES 61441 +00019Er 1 F0 .HIBYTES 61442 +00019Fr 1 F0 .HIBYTES 61443 +0001A0r 1 F0 .HIBYTES 61444 +0001A1r 1 F0 .HIBYTES 61445 +0001A2r 1 F0 .HIBYTES 61446 +0001A3r 1 F0 .HIBYTES 61447 +0001A4r 1 F0 .HIBYTES 61448 +0001A5r 1 F0 .HIBYTES 61449 +0001A6r 1 F0 .HIBYTES 61450 +0001A7r 1 F0 .HIBYTES 61451 +0001A8r 1 F0 .HIBYTES 61452 +0001A9r 1 F0 .HIBYTES 61453 +0001AAr 1 F0 .HIBYTES 61454 +0001ABr 1 F0 .HIBYTES 61455 +0001ACr 1 FF .HIBYTES 65505 +0001ADr 1 FF .HIBYTES 65506 +0001AEr 1 FF .HIBYTES 65507 +0001AFr 1 FF .HIBYTES 65508 +0001B0r 1 FF .HIBYTES 65509 +0001B1r 1 FF .HIBYTES 65510 +0001B2r 1 FF .HIBYTES 65511 +0001B3r 1 FF .HIBYTES 65512 +0001B4r 1 FF .HIBYTES 65513 +0001B5r 1 FF .HIBYTES 65514 +0001B6r 1 FF .HIBYTES 65515 +0001B7r 1 FF .HIBYTES 65516 +0001B8r 1 FF .HIBYTES 65517 +0001B9r 1 FF .HIBYTES 65518 +0001BAr 1 FF .HIBYTES 65519 +0001BBr 1 FF .HIBYTES 65520 +0001BCr 1 FF .HIBYTES 65521 +0001BDr 1 FF .HIBYTES 65522 +0001BEr 1 FF .HIBYTES 65523 +0001BFr 1 FF .HIBYTES 65524 +0001C0r 1 FF .HIBYTES 65525 +0001C1r 1 FF .HIBYTES 65526 +0001C2r 1 FF .HIBYTES 65527 +0001C3r 1 FF .HIBYTES 65528 +0001C4r 1 FF .HIBYTES 65529 +0001C5r 1 FF .HIBYTES 65530 +0001C6r 1 FF .HIBYTES 65531 +0001C7r 1 FF .HIBYTES 65532 +0001C8r 1 FF .HIBYTES 65533 +0001C9r 1 FF .HIBYTES 65534 +0001CAr 1 FF .HIBYTES 65535 +0001CBr 1 +0001CBr 1 ; lower case pseudo-op +0001CBr 1 00 .hibytes 0 +0001CCr 1 00 .hibytes 1 +0001CDr 1 00 .hibytes 2 +0001CEr 1 00 .hibytes 3 +0001CFr 1 00 .hibytes 4 +0001D0r 1 00 .hibytes 5 +0001D1r 1 00 .hibytes 6 +0001D2r 1 00 .hibytes 7 +0001D3r 1 00 .hibytes 8 +0001D4r 1 00 .hibytes 9 +0001D5r 1 00 .hibytes 10 +0001D6r 1 00 .hibytes 11 +0001D7r 1 00 .hibytes 12 +0001D8r 1 00 .hibytes 13 +0001D9r 1 00 .hibytes 14 +0001DAr 1 00 .hibytes 15 +0001DBr 1 00 .hibytes 16 +0001DCr 1 00 .hibytes 17 +0001DDr 1 00 .hibytes 18 +0001DEr 1 00 .hibytes 19 +0001DFr 1 00 .hibytes 112 +0001E0r 1 00 .hibytes 113 +0001E1r 1 00 .hibytes 114 +0001E2r 1 00 .hibytes 115 +0001E3r 1 00 .hibytes 116 +0001E4r 1 00 .hibytes 117 +0001E5r 1 00 .hibytes 118 +0001E6r 1 00 .hibytes 119 +0001E7r 1 00 .hibytes 120 +0001E8r 1 00 .hibytes 121 +0001E9r 1 00 .hibytes 122 +0001EAr 1 00 .hibytes 123 +0001EBr 1 00 .hibytes 124 +0001ECr 1 00 .hibytes 125 +0001EDr 1 00 .hibytes 126 +0001EEr 1 00 .hibytes 127 +0001EFr 1 00 .hibytes 128 +0001F0r 1 00 .hibytes 129 +0001F1r 1 00 .hibytes 130 +0001F2r 1 00 .hibytes 131 +0001F3r 1 00 .hibytes 132 +0001F4r 1 00 .hibytes 133 +0001F5r 1 00 .hibytes 134 +0001F6r 1 00 .hibytes 240 +0001F7r 1 00 .hibytes 241 +0001F8r 1 00 .hibytes 242 +0001F9r 1 00 .hibytes 243 +0001FAr 1 00 .hibytes 244 +0001FBr 1 00 .hibytes 245 +0001FCr 1 00 .hibytes 246 +0001FDr 1 00 .hibytes 247 +0001FEr 1 00 .hibytes 248 +0001FFr 1 00 .hibytes 249 +000200r 1 00 .hibytes 250 +000201r 1 00 .hibytes 251 +000202r 1 00 .hibytes 252 +000203r 1 00 .hibytes 253 +000204r 1 00 .hibytes 254 +000205r 1 00 .hibytes 255 +000206r 1 01 .hibytes 256 +000207r 1 01 .hibytes 257 +000208r 1 01 .hibytes 258 +000209r 1 01 .hibytes 259 +00020Ar 1 0F .hibytes 4050 +00020Br 1 0F .hibytes 4051 +00020Cr 1 0F .hibytes 4052 +00020Dr 1 0F .hibytes 4053 +00020Er 1 0F .hibytes 4054 +00020Fr 1 0F .hibytes 4055 +000210r 1 0F .hibytes 4056 +000211r 1 0F .hibytes 4057 +000212r 1 0F .hibytes 4058 +000213r 1 0F .hibytes 4059 +000214r 1 0F .hibytes 4060 +000215r 1 0F .hibytes 4061 +000216r 1 0F .hibytes 4062 +000217r 1 0F .hibytes 4063 +000218r 1 0F .hibytes 4064 +000219r 1 0F .hibytes 4065 +00021Ar 1 0F .hibytes 4066 +00021Br 1 0F .hibytes 4067 +00021Cr 1 0F .hibytes 4068 +00021Dr 1 0F .hibytes 4069 +00021Er 1 0F .hibytes 4070 +00021Fr 1 0F .hibytes 4071 +000220r 1 0F .hibytes 4072 +000221r 1 0F .hibytes 4073 +000222r 1 0F .hibytes 4074 +000223r 1 0F .hibytes 4075 +000224r 1 0F .hibytes 4076 +000225r 1 0F .hibytes 4077 +000226r 1 0F .hibytes 4078 +000227r 1 0F .hibytes 4079 +000228r 1 0F .hibytes 4080 +000229r 1 0F .hibytes 4081 +00022Ar 1 0F .hibytes 4082 +00022Br 1 0F .hibytes 4083 +00022Cr 1 0F .hibytes 4084 +00022Dr 1 0F .hibytes 4085 +00022Er 1 0F .hibytes 4086 +00022Fr 1 0F .hibytes 4087 +000230r 1 0F .hibytes 4088 +000231r 1 0F .hibytes 4089 +000232r 1 0F .hibytes 4090 +000233r 1 0F .hibytes 4091 +000234r 1 0F .hibytes 4092 +000235r 1 0F .hibytes 4093 +000236r 1 0F .hibytes 4094 +000237r 1 0F .hibytes 4095 +000238r 1 10 .hibytes 4096 +000239r 1 10 .hibytes 4097 +00023Ar 1 10 .hibytes 4098 +00023Br 1 10 .hibytes 4099 +00023Cr 1 10 .hibytes 4100 +00023Dr 1 10 .hibytes 4101 +00023Er 1 10 .hibytes 4102 +00023Fr 1 10 .hibytes 4103 +000240r 1 10 .hibytes 4104 +000241r 1 7F .hibytes 32752 +000242r 1 7F .hibytes 32753 +000243r 1 7F .hibytes 32754 +000244r 1 7F .hibytes 32755 +000245r 1 7F .hibytes 32756 +000246r 1 7F .hibytes 32757 +000247r 1 7F .hibytes 32758 +000248r 1 7F .hibytes 32759 +000249r 1 7F .hibytes 32760 +00024Ar 1 7F .hibytes 32761 +00024Br 1 7F .hibytes 32762 +00024Cr 1 7F .hibytes 32763 +00024Dr 1 7F .hibytes 32764 +00024Er 1 7F .hibytes 32765 +00024Fr 1 7F .hibytes 32766 +000250r 1 7F .hibytes 32767 +000251r 1 80 .hibytes 32768 +000252r 1 80 .hibytes 32769 +000253r 1 80 .hibytes 32770 +000254r 1 80 .hibytes 32771 +000255r 1 80 .hibytes 32772 +000256r 1 80 .hibytes 32773 +000257r 1 80 .hibytes 32774 +000258r 1 80 .hibytes 32775 +000259r 1 80 .hibytes 32776 +00025Ar 1 80 .hibytes 32777 +00025Br 1 80 .hibytes 32778 +00025Cr 1 80 .hibytes 32779 +00025Dr 1 9F .hibytes 40929 +00025Er 1 9F .hibytes 40930 +00025Fr 1 9F .hibytes 40931 +000260r 1 9F .hibytes 40932 +000261r 1 9F .hibytes 40933 +000262r 1 9F .hibytes 40934 +000263r 1 9F .hibytes 40935 +000264r 1 9F .hibytes 40936 +000265r 1 9F .hibytes 40937 +000266r 1 9F .hibytes 40938 +000267r 1 9F .hibytes 40939 +000268r 1 9F .hibytes 40940 +000269r 1 9F .hibytes 40941 +00026Ar 1 9F .hibytes 40942 +00026Br 1 9F .hibytes 40943 +00026Cr 1 9F .hibytes 40944 +00026Dr 1 9F .hibytes 40945 +00026Er 1 9F .hibytes 40946 +00026Fr 1 9F .hibytes 40947 +000270r 1 9F .hibytes 40948 +000271r 1 9F .hibytes 40949 +000272r 1 9F .hibytes 40950 +000273r 1 9F .hibytes 40951 +000274r 1 9F .hibytes 40952 +000275r 1 9F .hibytes 40953 +000276r 1 9F .hibytes 40954 +000277r 1 9F .hibytes 40955 +000278r 1 9F .hibytes 40956 +000279r 1 9F .hibytes 40957 +00027Ar 1 9F .hibytes 40958 +00027Br 1 9F .hibytes 40959 +00027Cr 1 A0 .hibytes 40960 +00027Dr 1 A0 .hibytes 40961 +00027Er 1 A0 .hibytes 40962 +00027Fr 1 A0 .hibytes 40963 +000280r 1 A0 .hibytes 40964 +000281r 1 A0 .hibytes 40965 +000282r 1 A0 .hibytes 40966 +000283r 1 A0 .hibytes 40967 +000284r 1 A0 .hibytes 40968 +000285r 1 A0 .hibytes 40969 +000286r 1 A0 .hibytes 40970 +000287r 1 A0 .hibytes 40971 +000288r 1 A0 .hibytes 40972 +000289r 1 A0 .hibytes 40973 +00028Ar 1 A0 .hibytes 40974 +00028Br 1 A0 .hibytes 40975 +00028Cr 1 AF .hibytes 45025 +00028Dr 1 AF .hibytes 45026 +00028Er 1 AF .hibytes 45027 +00028Fr 1 AF .hibytes 45028 +000290r 1 AF .hibytes 45029 +000291r 1 AF .hibytes 45030 +000292r 1 AF .hibytes 45031 +000293r 1 AF .hibytes 45032 +000294r 1 AF .hibytes 45033 +000295r 1 AF .hibytes 45034 +000296r 1 AF .hibytes 45035 +000297r 1 AF .hibytes 45036 +000298r 1 AF .hibytes 45037 +000299r 1 AF .hibytes 45038 +00029Ar 1 AF .hibytes 45039 +00029Br 1 AF .hibytes 45040 +00029Cr 1 AF .hibytes 45041 +00029Dr 1 AF .hibytes 45042 +00029Er 1 AF .hibytes 45043 +00029Fr 1 AF .hibytes 45044 +0002A0r 1 AF .hibytes 45045 +0002A1r 1 AF .hibytes 45046 +0002A2r 1 AF .hibytes 45047 +0002A3r 1 AF .hibytes 45048 +0002A4r 1 AF .hibytes 45049 +0002A5r 1 AF .hibytes 45050 +0002A6r 1 AF .hibytes 45051 +0002A7r 1 AF .hibytes 45052 +0002A8r 1 AF .hibytes 45053 +0002A9r 1 AF .hibytes 45054 +0002AAr 1 AF .hibytes 45055 +0002ABr 1 B0 .hibytes 45056 +0002ACr 1 B0 .hibytes 45057 +0002ADr 1 B0 .hibytes 45058 +0002AEr 1 B0 .hibytes 45059 +0002AFr 1 B0 .hibytes 45060 +0002B0r 1 B0 .hibytes 45061 +0002B1r 1 B0 .hibytes 45062 +0002B2r 1 B0 .hibytes 45063 +0002B3r 1 B0 .hibytes 45064 +0002B4r 1 B0 .hibytes 45065 +0002B5r 1 B0 .hibytes 45066 +0002B6r 1 B0 .hibytes 45067 +0002B7r 1 B0 .hibytes 45068 +0002B8r 1 B0 .hibytes 45069 +0002B9r 1 B0 .hibytes 45070 +0002BAr 1 B0 .hibytes 45071 +0002BBr 1 BF .hibytes 49121 +0002BCr 1 BF .hibytes 49122 +0002BDr 1 BF .hibytes 49123 +0002BEr 1 BF .hibytes 49124 +0002BFr 1 BF .hibytes 49125 +0002C0r 1 BF .hibytes 49126 +0002C1r 1 BF .hibytes 49127 +0002C2r 1 BF .hibytes 49128 +0002C3r 1 BF .hibytes 49129 +0002C4r 1 BF .hibytes 49130 +0002C5r 1 BF .hibytes 49131 +0002C6r 1 BF .hibytes 49132 +0002C7r 1 BF .hibytes 49133 +0002C8r 1 BF .hibytes 49134 +0002C9r 1 BF .hibytes 49135 +0002CAr 1 BF .hibytes 49136 +0002CBr 1 BF .hibytes 49137 +0002CCr 1 BF .hibytes 49138 +0002CDr 1 BF .hibytes 49139 +0002CEr 1 BF .hibytes 49140 +0002CFr 1 BF .hibytes 49141 +0002D0r 1 BF .hibytes 49142 +0002D1r 1 BF .hibytes 49143 +0002D2r 1 BF .hibytes 49144 +0002D3r 1 BF .hibytes 49145 +0002D4r 1 BF .hibytes 49146 +0002D5r 1 BF .hibytes 49147 +0002D6r 1 BF .hibytes 49148 +0002D7r 1 BF .hibytes 49149 +0002D8r 1 BF .hibytes 49150 +0002D9r 1 BF .hibytes 49151 +0002DAr 1 C0 .hibytes 49152 +0002DBr 1 C0 .hibytes 49153 +0002DCr 1 C0 .hibytes 49154 +0002DDr 1 C0 .hibytes 49155 +0002DEr 1 C0 .hibytes 49156 +0002DFr 1 C0 .hibytes 49157 +0002E0r 1 C0 .hibytes 49158 +0002E1r 1 C0 .hibytes 49159 +0002E2r 1 C0 .hibytes 49160 +0002E3r 1 C0 .hibytes 49161 +0002E4r 1 C0 .hibytes 49162 +0002E5r 1 C0 .hibytes 49163 +0002E6r 1 C0 .hibytes 49164 +0002E7r 1 C0 .hibytes 49165 +0002E8r 1 C0 .hibytes 49166 +0002E9r 1 C0 .hibytes 49167 +0002EAr 1 CF .hibytes 53217 +0002EBr 1 CF .hibytes 53218 +0002ECr 1 CF .hibytes 53219 +0002EDr 1 CF .hibytes 53220 +0002EEr 1 CF .hibytes 53221 +0002EFr 1 CF .hibytes 53222 +0002F0r 1 CF .hibytes 53223 +0002F1r 1 CF .hibytes 53224 +0002F2r 1 CF .hibytes 53225 +0002F3r 1 CF .hibytes 53226 +0002F4r 1 CF .hibytes 53227 +0002F5r 1 CF .hibytes 53228 +0002F6r 1 CF .hibytes 53229 +0002F7r 1 CF .hibytes 53230 +0002F8r 1 CF .hibytes 53231 +0002F9r 1 CF .hibytes 53232 +0002FAr 1 CF .hibytes 53233 +0002FBr 1 CF .hibytes 53234 +0002FCr 1 CF .hibytes 53235 +0002FDr 1 CF .hibytes 53236 +0002FEr 1 CF .hibytes 53237 +0002FFr 1 CF .hibytes 53238 +000300r 1 CF .hibytes 53239 +000301r 1 CF .hibytes 53240 +000302r 1 CF .hibytes 53241 +000303r 1 CF .hibytes 53242 +000304r 1 CF .hibytes 53243 +000305r 1 CF .hibytes 53244 +000306r 1 CF .hibytes 53245 +000307r 1 CF .hibytes 53246 +000308r 1 CF .hibytes 53247 +000309r 1 D0 .hibytes 53248 +00030Ar 1 D0 .hibytes 53249 +00030Br 1 D0 .hibytes 53250 +00030Cr 1 D0 .hibytes 53251 +00030Dr 1 D0 .hibytes 53252 +00030Er 1 D0 .hibytes 53253 +00030Fr 1 D0 .hibytes 53254 +000310r 1 D0 .hibytes 53255 +000311r 1 D0 .hibytes 53256 +000312r 1 D0 .hibytes 53257 +000313r 1 D0 .hibytes 53258 +000314r 1 D0 .hibytes 53259 +000315r 1 D0 .hibytes 53260 +000316r 1 D0 .hibytes 53261 +000317r 1 D0 .hibytes 53262 +000318r 1 D0 .hibytes 53263 +000319r 1 DF .hibytes 57313 +00031Ar 1 DF .hibytes 57314 +00031Br 1 DF .hibytes 57315 +00031Cr 1 DF .hibytes 57316 +00031Dr 1 DF .hibytes 57317 +00031Er 1 DF .hibytes 57318 +00031Fr 1 DF .hibytes 57319 +000320r 1 DF .hibytes 57320 +000321r 1 DF .hibytes 57321 +000322r 1 DF .hibytes 57322 +000323r 1 DF .hibytes 57323 +000324r 1 DF .hibytes 57324 +000325r 1 DF .hibytes 57325 +000326r 1 DF .hibytes 57326 +000327r 1 DF .hibytes 57327 +000328r 1 DF .hibytes 57328 +000329r 1 DF .hibytes 57329 +00032Ar 1 DF .hibytes 57330 +00032Br 1 DF .hibytes 57331 +00032Cr 1 DF .hibytes 57332 +00032Dr 1 DF .hibytes 57333 +00032Er 1 DF .hibytes 57334 +00032Fr 1 DF .hibytes 57335 +000330r 1 DF .hibytes 57336 +000331r 1 DF .hibytes 57337 +000332r 1 DF .hibytes 57338 +000333r 1 DF .hibytes 57339 +000334r 1 DF .hibytes 57340 +000335r 1 DF .hibytes 57341 +000336r 1 DF .hibytes 57342 +000337r 1 DF .hibytes 57343 +000338r 1 E0 .hibytes 57344 +000339r 1 E0 .hibytes 57345 +00033Ar 1 E0 .hibytes 57346 +00033Br 1 E0 .hibytes 57347 +00033Cr 1 E0 .hibytes 57348 +00033Dr 1 E0 .hibytes 57349 +00033Er 1 E0 .hibytes 57350 +00033Fr 1 E0 .hibytes 57351 +000340r 1 E0 .hibytes 57352 +000341r 1 E0 .hibytes 57353 +000342r 1 E0 .hibytes 57354 +000343r 1 E0 .hibytes 57355 +000344r 1 E0 .hibytes 57356 +000345r 1 E0 .hibytes 57357 +000346r 1 E0 .hibytes 57358 +000347r 1 E0 .hibytes 57359 +000348r 1 EF .hibytes 61409 +000349r 1 EF .hibytes 61410 +00034Ar 1 EF .hibytes 61411 +00034Br 1 EF .hibytes 61412 +00034Cr 1 EF .hibytes 61413 +00034Dr 1 EF .hibytes 61414 +00034Er 1 EF .hibytes 61415 +00034Fr 1 EF .hibytes 61416 +000350r 1 EF .hibytes 61417 +000351r 1 EF .hibytes 61418 +000352r 1 EF .hibytes 61419 +000353r 1 EF .hibytes 61420 +000354r 1 EF .hibytes 61421 +000355r 1 EF .hibytes 61422 +000356r 1 EF .hibytes 61423 +000357r 1 EF .hibytes 61424 +000358r 1 EF .hibytes 61425 +000359r 1 EF .hibytes 61426 +00035Ar 1 EF .hibytes 61427 +00035Br 1 EF .hibytes 61428 +00035Cr 1 EF .hibytes 61429 +00035Dr 1 EF .hibytes 61430 +00035Er 1 EF .hibytes 61431 +00035Fr 1 EF .hibytes 61432 +000360r 1 EF .hibytes 61433 +000361r 1 EF .hibytes 61434 +000362r 1 EF .hibytes 61435 +000363r 1 EF .hibytes 61436 +000364r 1 EF .hibytes 61437 +000365r 1 EF .hibytes 61438 +000366r 1 EF .hibytes 61439 +000367r 1 F0 .hibytes 61440 +000368r 1 F0 .hibytes 61441 +000369r 1 F0 .hibytes 61442 +00036Ar 1 F0 .hibytes 61443 +00036Br 1 F0 .hibytes 61444 +00036Cr 1 F0 .hibytes 61445 +00036Dr 1 F0 .hibytes 61446 +00036Er 1 F0 .hibytes 61447 +00036Fr 1 F0 .hibytes 61448 +000370r 1 F0 .hibytes 61449 +000371r 1 F0 .hibytes 61450 +000372r 1 F0 .hibytes 61451 +000373r 1 F0 .hibytes 61452 +000374r 1 F0 .hibytes 61453 +000375r 1 F0 .hibytes 61454 +000376r 1 F0 .hibytes 61455 +000377r 1 FF .hibytes 65505 +000378r 1 FF .hibytes 65506 +000379r 1 FF .hibytes 65507 +00037Ar 1 FF .hibytes 65508 +00037Br 1 FF .hibytes 65509 +00037Cr 1 FF .hibytes 65510 +00037Dr 1 FF .hibytes 65511 +00037Er 1 FF .hibytes 65512 +00037Fr 1 FF .hibytes 65513 +000380r 1 FF .hibytes 65514 +000381r 1 FF .hibytes 65515 +000382r 1 FF .hibytes 65516 +000383r 1 FF .hibytes 65517 +000384r 1 FF .hibytes 65518 +000385r 1 FF .hibytes 65519 +000386r 1 FF .hibytes 65520 +000387r 1 FF .hibytes 65521 +000388r 1 FF .hibytes 65522 +000389r 1 FF .hibytes 65523 +00038Ar 1 FF .hibytes 65524 +00038Br 1 FF .hibytes 65525 +00038Cr 1 FF .hibytes 65526 +00038Dr 1 FF .hibytes 65527 +00038Er 1 FF .hibytes 65528 +00038Fr 1 FF .hibytes 65529 +000390r 1 FF .hibytes 65530 +000391r 1 FF .hibytes 65531 +000392r 1 FF .hibytes 65532 +000393r 1 FF .hibytes 65533 +000394r 1 FF .hibytes 65534 +000395r 1 FF .hibytes 65535 +000396r 1 +000396r 1 ; hex values +000396r 1 00 .hibytes $0 +000397r 1 00 .hibytes $1 +000398r 1 00 .hibytes $2 +000399r 1 00 .hibytes $3 +00039Ar 1 00 .hibytes $4 +00039Br 1 00 .hibytes $5 +00039Cr 1 00 .hibytes $6 +00039Dr 1 00 .hibytes $7 +00039Er 1 00 .hibytes $8 +00039Fr 1 00 .hibytes $9 +0003A0r 1 00 .hibytes $a +0003A1r 1 00 .hibytes $b +0003A2r 1 00 .hibytes $c +0003A3r 1 00 .hibytes $d +0003A4r 1 00 .hibytes $e +0003A5r 1 00 .hibytes $f +0003A6r 1 00 .hibytes $10 +0003A7r 1 00 .hibytes $11 +0003A8r 1 00 .hibytes $12 +0003A9r 1 00 .hibytes $13 +0003AAr 1 00 .hibytes $70 +0003ABr 1 00 .hibytes $71 +0003ACr 1 00 .hibytes $72 +0003ADr 1 00 .hibytes $73 +0003AEr 1 00 .hibytes $74 +0003AFr 1 00 .hibytes $75 +0003B0r 1 00 .hibytes $76 +0003B1r 1 00 .hibytes $77 +0003B2r 1 00 .hibytes $78 +0003B3r 1 00 .hibytes $79 +0003B4r 1 00 .hibytes $7a +0003B5r 1 00 .hibytes $7b +0003B6r 1 00 .hibytes $7c +0003B7r 1 00 .hibytes $7d +0003B8r 1 00 .hibytes $7e +0003B9r 1 00 .hibytes $7f +0003BAr 1 00 .hibytes $80 +0003BBr 1 00 .hibytes $81 +0003BCr 1 00 .hibytes $82 +0003BDr 1 00 .hibytes $83 +0003BEr 1 00 .hibytes $84 +0003BFr 1 00 .hibytes $85 +0003C0r 1 00 .hibytes $86 +0003C1r 1 00 .hibytes $f0 +0003C2r 1 00 .hibytes $f1 +0003C3r 1 00 .hibytes $f2 +0003C4r 1 00 .hibytes $f3 +0003C5r 1 00 .hibytes $f4 +0003C6r 1 00 .hibytes $f5 +0003C7r 1 00 .hibytes $f6 +0003C8r 1 00 .hibytes $f7 +0003C9r 1 00 .hibytes $f8 +0003CAr 1 00 .hibytes $f9 +0003CBr 1 00 .hibytes $fa +0003CCr 1 00 .hibytes $fb +0003CDr 1 00 .hibytes $fc +0003CEr 1 00 .hibytes $fd +0003CFr 1 00 .hibytes $fe +0003D0r 1 00 .hibytes $ff +0003D1r 1 01 .hibytes $100 +0003D2r 1 01 .hibytes $101 +0003D3r 1 01 .hibytes $102 +0003D4r 1 01 .hibytes $103 +0003D5r 1 0F .hibytes $fd2 +0003D6r 1 0F .hibytes $fd3 +0003D7r 1 0F .hibytes $fd4 +0003D8r 1 0F .hibytes $fd5 +0003D9r 1 0F .hibytes $fd6 +0003DAr 1 0F .hibytes $fd7 +0003DBr 1 0F .hibytes $fd8 +0003DCr 1 0F .hibytes $fd9 +0003DDr 1 0F .hibytes $fda +0003DEr 1 0F .hibytes $fdb +0003DFr 1 0F .hibytes $fdc +0003E0r 1 0F .hibytes $fdd +0003E1r 1 0F .hibytes $fde +0003E2r 1 0F .hibytes $fdf +0003E3r 1 0F .hibytes $fe0 +0003E4r 1 0F .hibytes $fe1 +0003E5r 1 0F .hibytes $fe2 +0003E6r 1 0F .hibytes $fe3 +0003E7r 1 0F .hibytes $fe4 +0003E8r 1 0F .hibytes $fe5 +0003E9r 1 0F .hibytes $fe6 +0003EAr 1 0F .hibytes $fe7 +0003EBr 1 0F .hibytes $fe8 +0003ECr 1 0F .hibytes $fe9 +0003EDr 1 0F .hibytes $fea +0003EEr 1 0F .hibytes $feb +0003EFr 1 0F .hibytes $fec +0003F0r 1 0F .hibytes $fed +0003F1r 1 0F .hibytes $fee +0003F2r 1 0F .hibytes $fef +0003F3r 1 0F .hibytes $ff0 +0003F4r 1 0F .hibytes $ff1 +0003F5r 1 0F .hibytes $ff2 +0003F6r 1 0F .hibytes $ff3 +0003F7r 1 0F .hibytes $ff4 +0003F8r 1 0F .hibytes $ff5 +0003F9r 1 0F .hibytes $ff6 +0003FAr 1 0F .hibytes $ff7 +0003FBr 1 0F .hibytes $ff8 +0003FCr 1 0F .hibytes $ff9 +0003FDr 1 0F .hibytes $ffa +0003FEr 1 0F .hibytes $ffb +0003FFr 1 0F .hibytes $ffc +000400r 1 0F .hibytes $ffd +000401r 1 0F .hibytes $ffe +000402r 1 0F .hibytes $fff +000403r 1 10 .hibytes $1000 +000404r 1 10 .hibytes $1001 +000405r 1 10 .hibytes $1002 +000406r 1 10 .hibytes $1003 +000407r 1 10 .hibytes $1004 +000408r 1 10 .hibytes $1005 +000409r 1 10 .hibytes $1006 +00040Ar 1 10 .hibytes $1007 +00040Br 1 10 .hibytes $1008 +00040Cr 1 7F .hibytes $7ff0 +00040Dr 1 7F .hibytes $7ff1 +00040Er 1 7F .hibytes $7ff2 +00040Fr 1 7F .hibytes $7ff3 +000410r 1 7F .hibytes $7ff4 +000411r 1 7F .hibytes $7ff5 +000412r 1 7F .hibytes $7ff6 +000413r 1 7F .hibytes $7ff7 +000414r 1 7F .hibytes $7ff8 +000415r 1 7F .hibytes $7ff9 +000416r 1 7F .hibytes $7ffa +000417r 1 7F .hibytes $7ffb +000418r 1 7F .hibytes $7ffc +000419r 1 7F .hibytes $7ffd +00041Ar 1 7F .hibytes $7ffe +00041Br 1 7F .hibytes $7fff +00041Cr 1 80 .hibytes $8000 +00041Dr 1 80 .hibytes $8001 +00041Er 1 80 .hibytes $8002 +00041Fr 1 80 .hibytes $8003 +000420r 1 80 .hibytes $8004 +000421r 1 80 .hibytes $8005 +000422r 1 80 .hibytes $8006 +000423r 1 80 .hibytes $8007 +000424r 1 80 .hibytes $8008 +000425r 1 80 .hibytes $8009 +000426r 1 80 .hibytes $800a +000427r 1 80 .hibytes $800b +000428r 1 9F .hibytes $9fe1 +000429r 1 9F .hibytes $9fe2 +00042Ar 1 9F .hibytes $9fe3 +00042Br 1 9F .hibytes $9fe4 +00042Cr 1 9F .hibytes $9fe5 +00042Dr 1 9F .hibytes $9fe6 +00042Er 1 9F .hibytes $9fe7 +00042Fr 1 9F .hibytes $9fe8 +000430r 1 9F .hibytes $9fe9 +000431r 1 9F .hibytes $9fea +000432r 1 9F .hibytes $9feb +000433r 1 9F .hibytes $9fec +000434r 1 9F .hibytes $9fed +000435r 1 9F .hibytes $9fee +000436r 1 9F .hibytes $9fef +000437r 1 9F .hibytes $9ff0 +000438r 1 9F .hibytes $9ff1 +000439r 1 9F .hibytes $9ff2 +00043Ar 1 9F .hibytes $9ff3 +00043Br 1 9F .hibytes $9ff4 +00043Cr 1 9F .hibytes $9ff5 +00043Dr 1 9F .hibytes $9ff6 +00043Er 1 9F .hibytes $9ff7 +00043Fr 1 9F .hibytes $9ff8 +000440r 1 9F .hibytes $9ff9 +000441r 1 9F .hibytes $9ffa +000442r 1 9F .hibytes $9ffb +000443r 1 9F .hibytes $9ffc +000444r 1 9F .hibytes $9ffd +000445r 1 9F .hibytes $9ffe +000446r 1 9F .hibytes $9fff +000447r 1 A0 .hibytes $a000 +000448r 1 A0 .hibytes $a001 +000449r 1 A0 .hibytes $a002 +00044Ar 1 A0 .hibytes $a003 +00044Br 1 A0 .hibytes $a004 +00044Cr 1 A0 .hibytes $a005 +00044Dr 1 A0 .hibytes $a006 +00044Er 1 A0 .hibytes $a007 +00044Fr 1 A0 .hibytes $a008 +000450r 1 A0 .hibytes $a009 +000451r 1 A0 .hibytes $a00a +000452r 1 A0 .hibytes $a00b +000453r 1 A0 .hibytes $a00c +000454r 1 A0 .hibytes $a00d +000455r 1 A0 .hibytes $a00e +000456r 1 A0 .hibytes $a00f +000457r 1 AF .hibytes $afe1 +000458r 1 AF .hibytes $afe2 +000459r 1 AF .hibytes $afe3 +00045Ar 1 AF .hibytes $afe4 +00045Br 1 AF .hibytes $afe5 +00045Cr 1 AF .hibytes $afe6 +00045Dr 1 AF .hibytes $afe7 +00045Er 1 AF .hibytes $afe8 +00045Fr 1 AF .hibytes $afe9 +000460r 1 AF .hibytes $afea +000461r 1 AF .hibytes $afeb +000462r 1 AF .hibytes $afec +000463r 1 AF .hibytes $afed +000464r 1 AF .hibytes $afee +000465r 1 AF .hibytes $afef +000466r 1 AF .hibytes $aff0 +000467r 1 AF .hibytes $aff1 +000468r 1 AF .hibytes $aff2 +000469r 1 AF .hibytes $aff3 +00046Ar 1 AF .hibytes $aff4 +00046Br 1 AF .hibytes $aff5 +00046Cr 1 AF .hibytes $aff6 +00046Dr 1 AF .hibytes $aff7 +00046Er 1 AF .hibytes $aff8 +00046Fr 1 AF .hibytes $aff9 +000470r 1 AF .hibytes $affa +000471r 1 AF .hibytes $affb +000472r 1 AF .hibytes $affc +000473r 1 AF .hibytes $affd +000474r 1 AF .hibytes $affe +000475r 1 AF .hibytes $afff +000476r 1 B0 .hibytes $b000 +000477r 1 B0 .hibytes $b001 +000478r 1 B0 .hibytes $b002 +000479r 1 B0 .hibytes $b003 +00047Ar 1 B0 .hibytes $b004 +00047Br 1 B0 .hibytes $b005 +00047Cr 1 B0 .hibytes $b006 +00047Dr 1 B0 .hibytes $b007 +00047Er 1 B0 .hibytes $b008 +00047Fr 1 B0 .hibytes $b009 +000480r 1 B0 .hibytes $b00a +000481r 1 B0 .hibytes $b00b +000482r 1 B0 .hibytes $b00c +000483r 1 B0 .hibytes $b00d +000484r 1 B0 .hibytes $b00e +000485r 1 B0 .hibytes $b00f +000486r 1 BF .hibytes $bfe1 +000487r 1 BF .hibytes $bfe2 +000488r 1 BF .hibytes $bfe3 +000489r 1 BF .hibytes $bfe4 +00048Ar 1 BF .hibytes $bfe5 +00048Br 1 BF .hibytes $bfe6 +00048Cr 1 BF .hibytes $bfe7 +00048Dr 1 BF .hibytes $bfe8 +00048Er 1 BF .hibytes $bfe9 +00048Fr 1 BF .hibytes $bfea +000490r 1 BF .hibytes $bfeb +000491r 1 BF .hibytes $bfec +000492r 1 BF .hibytes $bfed +000493r 1 BF .hibytes $bfee +000494r 1 BF .hibytes $bfef +000495r 1 BF .hibytes $bff0 +000496r 1 BF .hibytes $bff1 +000497r 1 BF .hibytes $bff2 +000498r 1 BF .hibytes $bff3 +000499r 1 BF .hibytes $bff4 +00049Ar 1 BF .hibytes $bff5 +00049Br 1 BF .hibytes $bff6 +00049Cr 1 BF .hibytes $bff7 +00049Dr 1 BF .hibytes $bff8 +00049Er 1 BF .hibytes $bff9 +00049Fr 1 BF .hibytes $bffa +0004A0r 1 BF .hibytes $bffb +0004A1r 1 BF .hibytes $bffc +0004A2r 1 BF .hibytes $bffd +0004A3r 1 BF .hibytes $bffe +0004A4r 1 BF .hibytes $bfff +0004A5r 1 C0 .hibytes $c000 +0004A6r 1 C0 .hibytes $c001 +0004A7r 1 C0 .hibytes $c002 +0004A8r 1 C0 .hibytes $c003 +0004A9r 1 C0 .hibytes $c004 +0004AAr 1 C0 .hibytes $c005 +0004ABr 1 C0 .hibytes $c006 +0004ACr 1 C0 .hibytes $c007 +0004ADr 1 C0 .hibytes $c008 +0004AEr 1 C0 .hibytes $c009 +0004AFr 1 C0 .hibytes $c00a +0004B0r 1 C0 .hibytes $c00b +0004B1r 1 C0 .hibytes $c00c +0004B2r 1 C0 .hibytes $c00d +0004B3r 1 C0 .hibytes $c00e +0004B4r 1 C0 .hibytes $c00f +0004B5r 1 CF .hibytes $cfe1 +0004B6r 1 CF .hibytes $cfe2 +0004B7r 1 CF .hibytes $cfe3 +0004B8r 1 CF .hibytes $cfe4 +0004B9r 1 CF .hibytes $cfe5 +0004BAr 1 CF .hibytes $cfe6 +0004BBr 1 CF .hibytes $cfe7 +0004BCr 1 CF .hibytes $cfe8 +0004BDr 1 CF .hibytes $cfe9 +0004BEr 1 CF .hibytes $cfea +0004BFr 1 CF .hibytes $cfeb +0004C0r 1 CF .hibytes $cfec +0004C1r 1 CF .hibytes $cfed +0004C2r 1 CF .hibytes $cfee +0004C3r 1 CF .hibytes $cfef +0004C4r 1 CF .hibytes $cff0 +0004C5r 1 CF .hibytes $cff1 +0004C6r 1 CF .hibytes $cff2 +0004C7r 1 CF .hibytes $cff3 +0004C8r 1 CF .hibytes $cff4 +0004C9r 1 CF .hibytes $cff5 +0004CAr 1 CF .hibytes $cff6 +0004CBr 1 CF .hibytes $cff7 +0004CCr 1 CF .hibytes $cff8 +0004CDr 1 CF .hibytes $cff9 +0004CEr 1 CF .hibytes $cffa +0004CFr 1 CF .hibytes $cffb +0004D0r 1 CF .hibytes $cffc +0004D1r 1 CF .hibytes $cffd +0004D2r 1 CF .hibytes $cffe +0004D3r 1 CF .hibytes $cfff +0004D4r 1 D0 .hibytes $d000 +0004D5r 1 D0 .hibytes $d001 +0004D6r 1 D0 .hibytes $d002 +0004D7r 1 D0 .hibytes $d003 +0004D8r 1 D0 .hibytes $d004 +0004D9r 1 D0 .hibytes $d005 +0004DAr 1 D0 .hibytes $d006 +0004DBr 1 D0 .hibytes $d007 +0004DCr 1 D0 .hibytes $d008 +0004DDr 1 D0 .hibytes $d009 +0004DEr 1 D0 .hibytes $d00a +0004DFr 1 D0 .hibytes $d00b +0004E0r 1 D0 .hibytes $d00c +0004E1r 1 D0 .hibytes $d00d +0004E2r 1 D0 .hibytes $d00e +0004E3r 1 D0 .hibytes $d00f +0004E4r 1 DF .hibytes $dfe1 +0004E5r 1 DF .hibytes $dfe2 +0004E6r 1 DF .hibytes $dfe3 +0004E7r 1 DF .hibytes $dfe4 +0004E8r 1 DF .hibytes $dfe5 +0004E9r 1 DF .hibytes $dfe6 +0004EAr 1 DF .hibytes $dfe7 +0004EBr 1 DF .hibytes $dfe8 +0004ECr 1 DF .hibytes $dfe9 +0004EDr 1 DF .hibytes $dfea +0004EEr 1 DF .hibytes $dfeb +0004EFr 1 DF .hibytes $dfec +0004F0r 1 DF .hibytes $dfed +0004F1r 1 DF .hibytes $dfee +0004F2r 1 DF .hibytes $dfef +0004F3r 1 DF .hibytes $dff0 +0004F4r 1 DF .hibytes $dff1 +0004F5r 1 DF .hibytes $dff2 +0004F6r 1 DF .hibytes $dff3 +0004F7r 1 DF .hibytes $dff4 +0004F8r 1 DF .hibytes $dff5 +0004F9r 1 DF .hibytes $dff6 +0004FAr 1 DF .hibytes $dff7 +0004FBr 1 DF .hibytes $dff8 +0004FCr 1 DF .hibytes $dff9 +0004FDr 1 DF .hibytes $dffa +0004FEr 1 DF .hibytes $dffb +0004FFr 1 DF .hibytes $dffc +000500r 1 DF .hibytes $dffd +000501r 1 DF .hibytes $dffe +000502r 1 DF .hibytes $dfff +000503r 1 E0 .hibytes $e000 +000504r 1 E0 .hibytes $e001 +000505r 1 E0 .hibytes $e002 +000506r 1 E0 .hibytes $e003 +000507r 1 E0 .hibytes $e004 +000508r 1 E0 .hibytes $e005 +000509r 1 E0 .hibytes $e006 +00050Ar 1 E0 .hibytes $e007 +00050Br 1 E0 .hibytes $e008 +00050Cr 1 E0 .hibytes $e009 +00050Dr 1 E0 .hibytes $e00a +00050Er 1 E0 .hibytes $e00b +00050Fr 1 E0 .hibytes $e00c +000510r 1 E0 .hibytes $e00d +000511r 1 E0 .hibytes $e00e +000512r 1 E0 .hibytes $e00f +000513r 1 EF .hibytes $efe1 +000514r 1 EF .hibytes $efe2 +000515r 1 EF .hibytes $efe3 +000516r 1 EF .hibytes $efe4 +000517r 1 EF .hibytes $efe5 +000518r 1 EF .hibytes $efe6 +000519r 1 EF .hibytes $efe7 +00051Ar 1 EF .hibytes $efe8 +00051Br 1 EF .hibytes $efe9 +00051Cr 1 EF .hibytes $efea +00051Dr 1 EF .hibytes $efeb +00051Er 1 EF .hibytes $efec +00051Fr 1 EF .hibytes $efed +000520r 1 EF .hibytes $efee +000521r 1 EF .hibytes $efef +000522r 1 EF .hibytes $eff0 +000523r 1 EF .hibytes $eff1 +000524r 1 EF .hibytes $eff2 +000525r 1 EF .hibytes $eff3 +000526r 1 EF .hibytes $eff4 +000527r 1 EF .hibytes $eff5 +000528r 1 EF .hibytes $eff6 +000529r 1 EF .hibytes $eff7 +00052Ar 1 EF .hibytes $eff8 +00052Br 1 EF .hibytes $eff9 +00052Cr 1 EF .hibytes $effa +00052Dr 1 EF .hibytes $effb +00052Er 1 EF .hibytes $effc +00052Fr 1 EF .hibytes $effd +000530r 1 EF .hibytes $effe +000531r 1 EF .hibytes $efff +000532r 1 F0 .hibytes $f000 +000533r 1 F0 .hibytes $f001 +000534r 1 F0 .hibytes $f002 +000535r 1 F0 .hibytes $f003 +000536r 1 F0 .hibytes $f004 +000537r 1 F0 .hibytes $f005 +000538r 1 F0 .hibytes $f006 +000539r 1 F0 .hibytes $f007 +00053Ar 1 F0 .hibytes $f008 +00053Br 1 F0 .hibytes $f009 +00053Cr 1 F0 .hibytes $f00a +00053Dr 1 F0 .hibytes $f00b +00053Er 1 F0 .hibytes $f00c +00053Fr 1 F0 .hibytes $f00d +000540r 1 F0 .hibytes $f00e +000541r 1 F0 .hibytes $f00f +000542r 1 FF .hibytes $ffe1 +000543r 1 FF .hibytes $ffe2 +000544r 1 FF .hibytes $ffe3 +000545r 1 FF .hibytes $ffe4 +000546r 1 FF .hibytes $ffe5 +000547r 1 FF .hibytes $ffe6 +000548r 1 FF .hibytes $ffe7 +000549r 1 FF .hibytes $ffe8 +00054Ar 1 FF .hibytes $ffe9 +00054Br 1 FF .hibytes $ffea +00054Cr 1 FF .hibytes $ffeb +00054Dr 1 FF .hibytes $ffec +00054Er 1 FF .hibytes $ffed +00054Fr 1 FF .hibytes $ffee +000550r 1 FF .hibytes $ffef +000551r 1 FF .hibytes $fff0 +000552r 1 FF .hibytes $fff1 +000553r 1 FF .hibytes $fff2 +000554r 1 FF .hibytes $fff3 +000555r 1 FF .hibytes $fff4 +000556r 1 FF .hibytes $fff5 +000557r 1 FF .hibytes $fff6 +000558r 1 FF .hibytes $fff7 +000559r 1 FF .hibytes $fff8 +00055Ar 1 FF .hibytes $fff9 +00055Br 1 FF .hibytes $fffa +00055Cr 1 FF .hibytes $fffb +00055Dr 1 FF .hibytes $fffc +00055Er 1 FF .hibytes $fffd +00055Fr 1 FF .hibytes $fffe +000560r 1 FF .hibytes $ffff +000561r 1 +000561r 1 ; hex values, uppercase +000561r 1 00 .hibytes $0 +000562r 1 00 .hibytes $1 +000563r 1 00 .hibytes $2 +000564r 1 00 .hibytes $3 +000565r 1 00 .hibytes $4 +000566r 1 00 .hibytes $5 +000567r 1 00 .hibytes $6 +000568r 1 00 .hibytes $7 +000569r 1 00 .hibytes $8 +00056Ar 1 00 .hibytes $9 +00056Br 1 00 .hibytes $A +00056Cr 1 00 .hibytes $B +00056Dr 1 00 .hibytes $C +00056Er 1 00 .hibytes $D +00056Fr 1 00 .hibytes $E +000570r 1 00 .hibytes $F +000571r 1 00 .hibytes $10 +000572r 1 00 .hibytes $11 +000573r 1 00 .hibytes $12 +000574r 1 00 .hibytes $13 +000575r 1 00 .hibytes $70 +000576r 1 00 .hibytes $71 +000577r 1 00 .hibytes $72 +000578r 1 00 .hibytes $73 +000579r 1 00 .hibytes $74 +00057Ar 1 00 .hibytes $75 +00057Br 1 00 .hibytes $76 +00057Cr 1 00 .hibytes $77 +00057Dr 1 00 .hibytes $78 +00057Er 1 00 .hibytes $79 +00057Fr 1 00 .hibytes $7A +000580r 1 00 .hibytes $7B +000581r 1 00 .hibytes $7C +000582r 1 00 .hibytes $7D +000583r 1 00 .hibytes $7E +000584r 1 00 .hibytes $7F +000585r 1 00 .hibytes $80 +000586r 1 00 .hibytes $81 +000587r 1 00 .hibytes $82 +000588r 1 00 .hibytes $83 +000589r 1 00 .hibytes $84 +00058Ar 1 00 .hibytes $85 +00058Br 1 00 .hibytes $86 +00058Cr 1 00 .hibytes $F0 +00058Dr 1 00 .hibytes $F1 +00058Er 1 00 .hibytes $F2 +00058Fr 1 00 .hibytes $F3 +000590r 1 00 .hibytes $F4 +000591r 1 00 .hibytes $F5 +000592r 1 00 .hibytes $F6 +000593r 1 00 .hibytes $F7 +000594r 1 00 .hibytes $F8 +000595r 1 00 .hibytes $F9 +000596r 1 00 .hibytes $FA +000597r 1 00 .hibytes $FB +000598r 1 00 .hibytes $FC +000599r 1 00 .hibytes $FD +00059Ar 1 00 .hibytes $FE +00059Br 1 00 .hibytes $FF +00059Cr 1 01 .hibytes $100 +00059Dr 1 01 .hibytes $101 +00059Er 1 01 .hibytes $102 +00059Fr 1 01 .hibytes $103 +0005A0r 1 0F .hibytes $FD2 +0005A1r 1 0F .hibytes $FD3 +0005A2r 1 0F .hibytes $FD4 +0005A3r 1 0F .hibytes $FD5 +0005A4r 1 0F .hibytes $FD6 +0005A5r 1 0F .hibytes $FD7 +0005A6r 1 0F .hibytes $FD8 +0005A7r 1 0F .hibytes $FD9 +0005A8r 1 0F .hibytes $FDA +0005A9r 1 0F .hibytes $FDB +0005AAr 1 0F .hibytes $FDC +0005ABr 1 0F .hibytes $FDD +0005ACr 1 0F .hibytes $FDE +0005ADr 1 0F .hibytes $FDF +0005AEr 1 0F .hibytes $FE0 +0005AFr 1 0F .hibytes $FE1 +0005B0r 1 0F .hibytes $FE2 +0005B1r 1 0F .hibytes $FE3 +0005B2r 1 0F .hibytes $FE4 +0005B3r 1 0F .hibytes $FE5 +0005B4r 1 0F .hibytes $FE6 +0005B5r 1 0F .hibytes $FE7 +0005B6r 1 0F .hibytes $FE8 +0005B7r 1 0F .hibytes $FE9 +0005B8r 1 0F .hibytes $FEA +0005B9r 1 0F .hibytes $FEB +0005BAr 1 0F .hibytes $FEC +0005BBr 1 0F .hibytes $FED +0005BCr 1 0F .hibytes $FEE +0005BDr 1 0F .hibytes $FEF +0005BEr 1 0F .hibytes $FF0 +0005BFr 1 0F .hibytes $FF1 +0005C0r 1 0F .hibytes $FF2 +0005C1r 1 0F .hibytes $FF3 +0005C2r 1 0F .hibytes $FF4 +0005C3r 1 0F .hibytes $FF5 +0005C4r 1 0F .hibytes $FF6 +0005C5r 1 0F .hibytes $FF7 +0005C6r 1 0F .hibytes $FF8 +0005C7r 1 0F .hibytes $FF9 +0005C8r 1 0F .hibytes $FFA +0005C9r 1 0F .hibytes $FFB +0005CAr 1 0F .hibytes $FFC +0005CBr 1 0F .hibytes $FFD +0005CCr 1 0F .hibytes $FFE +0005CDr 1 0F .hibytes $FFF +0005CEr 1 10 .hibytes $1000 +0005CFr 1 10 .hibytes $1001 +0005D0r 1 10 .hibytes $1002 +0005D1r 1 10 .hibytes $1003 +0005D2r 1 10 .hibytes $1004 +0005D3r 1 10 .hibytes $1005 +0005D4r 1 10 .hibytes $1006 +0005D5r 1 10 .hibytes $1007 +0005D6r 1 10 .hibytes $1008 +0005D7r 1 7F .hibytes $7FF0 +0005D8r 1 7F .hibytes $7FF1 +0005D9r 1 7F .hibytes $7FF2 +0005DAr 1 7F .hibytes $7FF3 +0005DBr 1 7F .hibytes $7FF4 +0005DCr 1 7F .hibytes $7FF5 +0005DDr 1 7F .hibytes $7FF6 +0005DEr 1 7F .hibytes $7FF7 +0005DFr 1 7F .hibytes $7FF8 +0005E0r 1 7F .hibytes $7FF9 +0005E1r 1 7F .hibytes $7FFA +0005E2r 1 7F .hibytes $7FFB +0005E3r 1 7F .hibytes $7FFC +0005E4r 1 7F .hibytes $7FFD +0005E5r 1 7F .hibytes $7FFE +0005E6r 1 7F .hibytes $7FFF +0005E7r 1 80 .hibytes $8000 +0005E8r 1 80 .hibytes $8001 +0005E9r 1 80 .hibytes $8002 +0005EAr 1 80 .hibytes $8003 +0005EBr 1 80 .hibytes $8004 +0005ECr 1 80 .hibytes $8005 +0005EDr 1 80 .hibytes $8006 +0005EEr 1 80 .hibytes $8007 +0005EFr 1 80 .hibytes $8008 +0005F0r 1 80 .hibytes $8009 +0005F1r 1 80 .hibytes $800A +0005F2r 1 80 .hibytes $800B +0005F3r 1 9F .hibytes $9FE1 +0005F4r 1 9F .hibytes $9FE2 +0005F5r 1 9F .hibytes $9FE3 +0005F6r 1 9F .hibytes $9FE4 +0005F7r 1 9F .hibytes $9FE5 +0005F8r 1 9F .hibytes $9FE6 +0005F9r 1 9F .hibytes $9FE7 +0005FAr 1 9F .hibytes $9FE8 +0005FBr 1 9F .hibytes $9FE9 +0005FCr 1 9F .hibytes $9FEA +0005FDr 1 9F .hibytes $9FEB +0005FEr 1 9F .hibytes $9FEC +0005FFr 1 9F .hibytes $9FED +000600r 1 9F .hibytes $9FEE +000601r 1 9F .hibytes $9FEF +000602r 1 9F .hibytes $9FF0 +000603r 1 9F .hibytes $9FF1 +000604r 1 9F .hibytes $9FF2 +000605r 1 9F .hibytes $9FF3 +000606r 1 9F .hibytes $9FF4 +000607r 1 9F .hibytes $9FF5 +000608r 1 9F .hibytes $9FF6 +000609r 1 9F .hibytes $9FF7 +00060Ar 1 9F .hibytes $9FF8 +00060Br 1 9F .hibytes $9FF9 +00060Cr 1 9F .hibytes $9FFA +00060Dr 1 9F .hibytes $9FFB +00060Er 1 9F .hibytes $9FFC +00060Fr 1 9F .hibytes $9FFD +000610r 1 9F .hibytes $9FFE +000611r 1 9F .hibytes $9FFF +000612r 1 A0 .hibytes $A000 +000613r 1 A0 .hibytes $A001 +000614r 1 A0 .hibytes $A002 +000615r 1 A0 .hibytes $A003 +000616r 1 A0 .hibytes $A004 +000617r 1 A0 .hibytes $A005 +000618r 1 A0 .hibytes $A006 +000619r 1 A0 .hibytes $A007 +00061Ar 1 A0 .hibytes $A008 +00061Br 1 A0 .hibytes $A009 +00061Cr 1 A0 .hibytes $A00A +00061Dr 1 A0 .hibytes $A00B +00061Er 1 A0 .hibytes $A00C +00061Fr 1 A0 .hibytes $A00D +000620r 1 A0 .hibytes $A00E +000621r 1 A0 .hibytes $A00F +000622r 1 AF .hibytes $AFE1 +000623r 1 AF .hibytes $AFE2 +000624r 1 AF .hibytes $AFE3 +000625r 1 AF .hibytes $AFE4 +000626r 1 AF .hibytes $AFE5 +000627r 1 AF .hibytes $AFE6 +000628r 1 AF .hibytes $AFE7 +000629r 1 AF .hibytes $AFE8 +00062Ar 1 AF .hibytes $AFE9 +00062Br 1 AF .hibytes $AFEA +00062Cr 1 AF .hibytes $AFEB +00062Dr 1 AF .hibytes $AFEC +00062Er 1 AF .hibytes $AFED +00062Fr 1 AF .hibytes $AFEE +000630r 1 AF .hibytes $AFEF +000631r 1 AF .hibytes $AFF0 +000632r 1 AF .hibytes $AFF1 +000633r 1 AF .hibytes $AFF2 +000634r 1 AF .hibytes $AFF3 +000635r 1 AF .hibytes $AFF4 +000636r 1 AF .hibytes $AFF5 +000637r 1 AF .hibytes $AFF6 +000638r 1 AF .hibytes $AFF7 +000639r 1 AF .hibytes $AFF8 +00063Ar 1 AF .hibytes $AFF9 +00063Br 1 AF .hibytes $AFFA +00063Cr 1 AF .hibytes $AFFB +00063Dr 1 AF .hibytes $AFFC +00063Er 1 AF .hibytes $AFFD +00063Fr 1 AF .hibytes $AFFE +000640r 1 AF .hibytes $AFFF +000641r 1 B0 .hibytes $B000 +000642r 1 B0 .hibytes $B001 +000643r 1 B0 .hibytes $B002 +000644r 1 B0 .hibytes $B003 +000645r 1 B0 .hibytes $B004 +000646r 1 B0 .hibytes $B005 +000647r 1 B0 .hibytes $B006 +000648r 1 B0 .hibytes $B007 +000649r 1 B0 .hibytes $B008 +00064Ar 1 B0 .hibytes $B009 +00064Br 1 B0 .hibytes $B00A +00064Cr 1 B0 .hibytes $B00B +00064Dr 1 B0 .hibytes $B00C +00064Er 1 B0 .hibytes $B00D +00064Fr 1 B0 .hibytes $B00E +000650r 1 B0 .hibytes $B00F +000651r 1 BF .hibytes $BFE1 +000652r 1 BF .hibytes $BFE2 +000653r 1 BF .hibytes $BFE3 +000654r 1 BF .hibytes $BFE4 +000655r 1 BF .hibytes $BFE5 +000656r 1 BF .hibytes $BFE6 +000657r 1 BF .hibytes $BFE7 +000658r 1 BF .hibytes $BFE8 +000659r 1 BF .hibytes $BFE9 +00065Ar 1 BF .hibytes $BFEA +00065Br 1 BF .hibytes $BFEB +00065Cr 1 BF .hibytes $BFEC +00065Dr 1 BF .hibytes $BFED +00065Er 1 BF .hibytes $BFEE +00065Fr 1 BF .hibytes $BFEF +000660r 1 BF .hibytes $BFF0 +000661r 1 BF .hibytes $BFF1 +000662r 1 BF .hibytes $BFF2 +000663r 1 BF .hibytes $BFF3 +000664r 1 BF .hibytes $BFF4 +000665r 1 BF .hibytes $BFF5 +000666r 1 BF .hibytes $BFF6 +000667r 1 BF .hibytes $BFF7 +000668r 1 BF .hibytes $BFF8 +000669r 1 BF .hibytes $BFF9 +00066Ar 1 BF .hibytes $BFFA +00066Br 1 BF .hibytes $BFFB +00066Cr 1 BF .hibytes $BFFC +00066Dr 1 BF .hibytes $BFFD +00066Er 1 BF .hibytes $BFFE +00066Fr 1 BF .hibytes $BFFF +000670r 1 C0 .hibytes $C000 +000671r 1 C0 .hibytes $C001 +000672r 1 C0 .hibytes $C002 +000673r 1 C0 .hibytes $C003 +000674r 1 C0 .hibytes $C004 +000675r 1 C0 .hibytes $C005 +000676r 1 C0 .hibytes $C006 +000677r 1 C0 .hibytes $C007 +000678r 1 C0 .hibytes $C008 +000679r 1 C0 .hibytes $C009 +00067Ar 1 C0 .hibytes $C00A +00067Br 1 C0 .hibytes $C00B +00067Cr 1 C0 .hibytes $C00C +00067Dr 1 C0 .hibytes $C00D +00067Er 1 C0 .hibytes $C00E +00067Fr 1 C0 .hibytes $C00F +000680r 1 CF .hibytes $CFE1 +000681r 1 CF .hibytes $CFE2 +000682r 1 CF .hibytes $CFE3 +000683r 1 CF .hibytes $CFE4 +000684r 1 CF .hibytes $CFE5 +000685r 1 CF .hibytes $CFE6 +000686r 1 CF .hibytes $CFE7 +000687r 1 CF .hibytes $CFE8 +000688r 1 CF .hibytes $CFE9 +000689r 1 CF .hibytes $CFEA +00068Ar 1 CF .hibytes $CFEB +00068Br 1 CF .hibytes $CFEC +00068Cr 1 CF .hibytes $CFED +00068Dr 1 CF .hibytes $CFEE +00068Er 1 CF .hibytes $CFEF +00068Fr 1 CF .hibytes $CFF0 +000690r 1 CF .hibytes $CFF1 +000691r 1 CF .hibytes $CFF2 +000692r 1 CF .hibytes $CFF3 +000693r 1 CF .hibytes $CFF4 +000694r 1 CF .hibytes $CFF5 +000695r 1 CF .hibytes $CFF6 +000696r 1 CF .hibytes $CFF7 +000697r 1 CF .hibytes $CFF8 +000698r 1 CF .hibytes $CFF9 +000699r 1 CF .hibytes $CFFA +00069Ar 1 CF .hibytes $CFFB +00069Br 1 CF .hibytes $CFFC +00069Cr 1 CF .hibytes $CFFD +00069Dr 1 CF .hibytes $CFFE +00069Er 1 CF .hibytes $CFFF +00069Fr 1 D0 .hibytes $D000 +0006A0r 1 D0 .hibytes $D001 +0006A1r 1 D0 .hibytes $D002 +0006A2r 1 D0 .hibytes $D003 +0006A3r 1 D0 .hibytes $D004 +0006A4r 1 D0 .hibytes $D005 +0006A5r 1 D0 .hibytes $D006 +0006A6r 1 D0 .hibytes $D007 +0006A7r 1 D0 .hibytes $D008 +0006A8r 1 D0 .hibytes $D009 +0006A9r 1 D0 .hibytes $D00A +0006AAr 1 D0 .hibytes $D00B +0006ABr 1 D0 .hibytes $D00C +0006ACr 1 D0 .hibytes $D00D +0006ADr 1 D0 .hibytes $D00E +0006AEr 1 D0 .hibytes $D00F +0006AFr 1 DF .hibytes $DFE1 +0006B0r 1 DF .hibytes $DFE2 +0006B1r 1 DF .hibytes $DFE3 +0006B2r 1 DF .hibytes $DFE4 +0006B3r 1 DF .hibytes $DFE5 +0006B4r 1 DF .hibytes $DFE6 +0006B5r 1 DF .hibytes $DFE7 +0006B6r 1 DF .hibytes $DFE8 +0006B7r 1 DF .hibytes $DFE9 +0006B8r 1 DF .hibytes $DFEA +0006B9r 1 DF .hibytes $DFEB +0006BAr 1 DF .hibytes $DFEC +0006BBr 1 DF .hibytes $DFED +0006BCr 1 DF .hibytes $DFEE +0006BDr 1 DF .hibytes $DFEF +0006BEr 1 DF .hibytes $DFF0 +0006BFr 1 DF .hibytes $DFF1 +0006C0r 1 DF .hibytes $DFF2 +0006C1r 1 DF .hibytes $DFF3 +0006C2r 1 DF .hibytes $DFF4 +0006C3r 1 DF .hibytes $DFF5 +0006C4r 1 DF .hibytes $DFF6 +0006C5r 1 DF .hibytes $DFF7 +0006C6r 1 DF .hibytes $DFF8 +0006C7r 1 DF .hibytes $DFF9 +0006C8r 1 DF .hibytes $DFFA +0006C9r 1 DF .hibytes $DFFB +0006CAr 1 DF .hibytes $DFFC +0006CBr 1 DF .hibytes $DFFD +0006CCr 1 DF .hibytes $DFFE +0006CDr 1 DF .hibytes $DFFF +0006CEr 1 E0 .hibytes $E000 +0006CFr 1 E0 .hibytes $E001 +0006D0r 1 E0 .hibytes $E002 +0006D1r 1 E0 .hibytes $E003 +0006D2r 1 E0 .hibytes $E004 +0006D3r 1 E0 .hibytes $E005 +0006D4r 1 E0 .hibytes $E006 +0006D5r 1 E0 .hibytes $E007 +0006D6r 1 E0 .hibytes $E008 +0006D7r 1 E0 .hibytes $E009 +0006D8r 1 E0 .hibytes $E00A +0006D9r 1 E0 .hibytes $E00B +0006DAr 1 E0 .hibytes $E00C +0006DBr 1 E0 .hibytes $E00D +0006DCr 1 E0 .hibytes $E00E +0006DDr 1 E0 .hibytes $E00F +0006DEr 1 EF .hibytes $EFE1 +0006DFr 1 EF .hibytes $EFE2 +0006E0r 1 EF .hibytes $EFE3 +0006E1r 1 EF .hibytes $EFE4 +0006E2r 1 EF .hibytes $EFE5 +0006E3r 1 EF .hibytes $EFE6 +0006E4r 1 EF .hibytes $EFE7 +0006E5r 1 EF .hibytes $EFE8 +0006E6r 1 EF .hibytes $EFE9 +0006E7r 1 EF .hibytes $EFEA +0006E8r 1 EF .hibytes $EFEB +0006E9r 1 EF .hibytes $EFEC +0006EAr 1 EF .hibytes $EFED +0006EBr 1 EF .hibytes $EFEE +0006ECr 1 EF .hibytes $EFEF +0006EDr 1 EF .hibytes $EFF0 +0006EEr 1 EF .hibytes $EFF1 +0006EFr 1 EF .hibytes $EFF2 +0006F0r 1 EF .hibytes $EFF3 +0006F1r 1 EF .hibytes $EFF4 +0006F2r 1 EF .hibytes $EFF5 +0006F3r 1 EF .hibytes $EFF6 +0006F4r 1 EF .hibytes $EFF7 +0006F5r 1 EF .hibytes $EFF8 +0006F6r 1 EF .hibytes $EFF9 +0006F7r 1 EF .hibytes $EFFA +0006F8r 1 EF .hibytes $EFFB +0006F9r 1 EF .hibytes $EFFC +0006FAr 1 EF .hibytes $EFFD +0006FBr 1 EF .hibytes $EFFE +0006FCr 1 EF .hibytes $EFFF +0006FDr 1 F0 .hibytes $F000 +0006FEr 1 F0 .hibytes $F001 +0006FFr 1 F0 .hibytes $F002 +000700r 1 F0 .hibytes $F003 +000701r 1 F0 .hibytes $F004 +000702r 1 F0 .hibytes $F005 +000703r 1 F0 .hibytes $F006 +000704r 1 F0 .hibytes $F007 +000705r 1 F0 .hibytes $F008 +000706r 1 F0 .hibytes $F009 +000707r 1 F0 .hibytes $F00A +000708r 1 F0 .hibytes $F00B +000709r 1 F0 .hibytes $F00C +00070Ar 1 F0 .hibytes $F00D +00070Br 1 F0 .hibytes $F00E +00070Cr 1 F0 .hibytes $F00F +00070Dr 1 FF .hibytes $FFE1 +00070Er 1 FF .hibytes $FFE2 +00070Fr 1 FF .hibytes $FFE3 +000710r 1 FF .hibytes $FFE4 +000711r 1 FF .hibytes $FFE5 +000712r 1 FF .hibytes $FFE6 +000713r 1 FF .hibytes $FFE7 +000714r 1 FF .hibytes $FFE8 +000715r 1 FF .hibytes $FFE9 +000716r 1 FF .hibytes $FFEA +000717r 1 FF .hibytes $FFEB +000718r 1 FF .hibytes $FFEC +000719r 1 FF .hibytes $FFED +00071Ar 1 FF .hibytes $FFEE +00071Br 1 FF .hibytes $FFEF +00071Cr 1 FF .hibytes $FFF0 +00071Dr 1 FF .hibytes $FFF1 +00071Er 1 FF .hibytes $FFF2 +00071Fr 1 FF .hibytes $FFF3 +000720r 1 FF .hibytes $FFF4 +000721r 1 FF .hibytes $FFF5 +000722r 1 FF .hibytes $FFF6 +000723r 1 FF .hibytes $FFF7 +000724r 1 FF .hibytes $FFF8 +000725r 1 FF .hibytes $FFF9 +000726r 1 FF .hibytes $FFFA +000727r 1 FF .hibytes $FFFB +000728r 1 FF .hibytes $FFFC +000729r 1 FF .hibytes $FFFD +00072Ar 1 FF .hibytes $FFFE +00072Br 1 FF .hibytes $FFFF +00072Cr 1 +00072Cr 1 ; 4-digit hex values +00072Cr 1 00 .hibytes $0000 +00072Dr 1 00 .hibytes $0001 +00072Er 1 00 .hibytes $0002 +00072Fr 1 00 .hibytes $0003 +000730r 1 00 .hibytes $0004 +000731r 1 00 .hibytes $0005 +000732r 1 00 .hibytes $0006 +000733r 1 00 .hibytes $0007 +000734r 1 00 .hibytes $0008 +000735r 1 00 .hibytes $0009 +000736r 1 00 .hibytes $000a +000737r 1 00 .hibytes $000b +000738r 1 00 .hibytes $000c +000739r 1 00 .hibytes $000d +00073Ar 1 00 .hibytes $000e +00073Br 1 00 .hibytes $000f +00073Cr 1 00 .hibytes $0010 +00073Dr 1 00 .hibytes $0011 +00073Er 1 00 .hibytes $0012 +00073Fr 1 00 .hibytes $0013 +000740r 1 00 .hibytes $0070 +000741r 1 00 .hibytes $0071 +000742r 1 00 .hibytes $0072 +000743r 1 00 .hibytes $0073 +000744r 1 00 .hibytes $0074 +000745r 1 00 .hibytes $0075 +000746r 1 00 .hibytes $0076 +000747r 1 00 .hibytes $0077 +000748r 1 00 .hibytes $0078 +000749r 1 00 .hibytes $0079 +00074Ar 1 00 .hibytes $007a +00074Br 1 00 .hibytes $007b +00074Cr 1 00 .hibytes $007c +00074Dr 1 00 .hibytes $007d +00074Er 1 00 .hibytes $007e +00074Fr 1 00 .hibytes $007f +000750r 1 00 .hibytes $0080 +000751r 1 00 .hibytes $0081 +000752r 1 00 .hibytes $0082 +000753r 1 00 .hibytes $0083 +000754r 1 00 .hibytes $0084 +000755r 1 00 .hibytes $0085 +000756r 1 00 .hibytes $0086 +000757r 1 00 .hibytes $00f0 +000758r 1 00 .hibytes $00f1 +000759r 1 00 .hibytes $00f2 +00075Ar 1 00 .hibytes $00f3 +00075Br 1 00 .hibytes $00f4 +00075Cr 1 00 .hibytes $00f5 +00075Dr 1 00 .hibytes $00f6 +00075Er 1 00 .hibytes $00f7 +00075Fr 1 00 .hibytes $00f8 +000760r 1 00 .hibytes $00f9 +000761r 1 00 .hibytes $00fa +000762r 1 00 .hibytes $00fb +000763r 1 00 .hibytes $00fc +000764r 1 00 .hibytes $00fd +000765r 1 00 .hibytes $00fe +000766r 1 00 .hibytes $00ff +000767r 1 01 .hibytes $0100 +000768r 1 01 .hibytes $0101 +000769r 1 01 .hibytes $0102 +00076Ar 1 01 .hibytes $0103 +00076Br 1 0F .hibytes $0fd2 +00076Cr 1 0F .hibytes $0fd3 +00076Dr 1 0F .hibytes $0fd4 +00076Er 1 0F .hibytes $0fd5 +00076Fr 1 0F .hibytes $0fd6 +000770r 1 0F .hibytes $0fd7 +000771r 1 0F .hibytes $0fd8 +000772r 1 0F .hibytes $0fd9 +000773r 1 0F .hibytes $0fda +000774r 1 0F .hibytes $0fdb +000775r 1 0F .hibytes $0fdc +000776r 1 0F .hibytes $0fdd +000777r 1 0F .hibytes $0fde +000778r 1 0F .hibytes $0fdf +000779r 1 0F .hibytes $0fe0 +00077Ar 1 0F .hibytes $0fe1 +00077Br 1 0F .hibytes $0fe2 +00077Cr 1 0F .hibytes $0fe3 +00077Dr 1 0F .hibytes $0fe4 +00077Er 1 0F .hibytes $0fe5 +00077Fr 1 0F .hibytes $0fe6 +000780r 1 0F .hibytes $0fe7 +000781r 1 0F .hibytes $0fe8 +000782r 1 0F .hibytes $0fe9 +000783r 1 0F .hibytes $0fea +000784r 1 0F .hibytes $0feb +000785r 1 0F .hibytes $0fec +000786r 1 0F .hibytes $0fed +000787r 1 0F .hibytes $0fee +000788r 1 0F .hibytes $0fef +000789r 1 0F .hibytes $0ff0 +00078Ar 1 0F .hibytes $0ff1 +00078Br 1 0F .hibytes $0ff2 +00078Cr 1 0F .hibytes $0ff3 +00078Dr 1 0F .hibytes $0ff4 +00078Er 1 0F .hibytes $0ff5 +00078Fr 1 0F .hibytes $0ff6 +000790r 1 0F .hibytes $0ff7 +000791r 1 0F .hibytes $0ff8 +000792r 1 0F .hibytes $0ff9 +000793r 1 0F .hibytes $0ffa +000794r 1 0F .hibytes $0ffb +000795r 1 0F .hibytes $0ffc +000796r 1 0F .hibytes $0ffd +000797r 1 0F .hibytes $0ffe +000798r 1 0F .hibytes $0fff +000799r 1 10 .hibytes $1000 +00079Ar 1 10 .hibytes $1001 +00079Br 1 10 .hibytes $1002 +00079Cr 1 10 .hibytes $1003 +00079Dr 1 10 .hibytes $1004 +00079Er 1 10 .hibytes $1005 +00079Fr 1 10 .hibytes $1006 +0007A0r 1 10 .hibytes $1007 +0007A1r 1 10 .hibytes $1008 +0007A2r 1 7F .hibytes $7ff0 +0007A3r 1 7F .hibytes $7ff1 +0007A4r 1 7F .hibytes $7ff2 +0007A5r 1 7F .hibytes $7ff3 +0007A6r 1 7F .hibytes $7ff4 +0007A7r 1 7F .hibytes $7ff5 +0007A8r 1 7F .hibytes $7ff6 +0007A9r 1 7F .hibytes $7ff7 +0007AAr 1 7F .hibytes $7ff8 +0007ABr 1 7F .hibytes $7ff9 +0007ACr 1 7F .hibytes $7ffa +0007ADr 1 7F .hibytes $7ffb +0007AEr 1 7F .hibytes $7ffc +0007AFr 1 7F .hibytes $7ffd +0007B0r 1 7F .hibytes $7ffe +0007B1r 1 7F .hibytes $7fff +0007B2r 1 80 .hibytes $8000 +0007B3r 1 80 .hibytes $8001 +0007B4r 1 80 .hibytes $8002 +0007B5r 1 80 .hibytes $8003 +0007B6r 1 80 .hibytes $8004 +0007B7r 1 80 .hibytes $8005 +0007B8r 1 80 .hibytes $8006 +0007B9r 1 80 .hibytes $8007 +0007BAr 1 80 .hibytes $8008 +0007BBr 1 80 .hibytes $8009 +0007BCr 1 80 .hibytes $800a +0007BDr 1 80 .hibytes $800b +0007BEr 1 9F .hibytes $9fe1 +0007BFr 1 9F .hibytes $9fe2 +0007C0r 1 9F .hibytes $9fe3 +0007C1r 1 9F .hibytes $9fe4 +0007C2r 1 9F .hibytes $9fe5 +0007C3r 1 9F .hibytes $9fe6 +0007C4r 1 9F .hibytes $9fe7 +0007C5r 1 9F .hibytes $9fe8 +0007C6r 1 9F .hibytes $9fe9 +0007C7r 1 9F .hibytes $9fea +0007C8r 1 9F .hibytes $9feb +0007C9r 1 9F .hibytes $9fec +0007CAr 1 9F .hibytes $9fed +0007CBr 1 9F .hibytes $9fee +0007CCr 1 9F .hibytes $9fef +0007CDr 1 9F .hibytes $9ff0 +0007CEr 1 9F .hibytes $9ff1 +0007CFr 1 9F .hibytes $9ff2 +0007D0r 1 9F .hibytes $9ff3 +0007D1r 1 9F .hibytes $9ff4 +0007D2r 1 9F .hibytes $9ff5 +0007D3r 1 9F .hibytes $9ff6 +0007D4r 1 9F .hibytes $9ff7 +0007D5r 1 9F .hibytes $9ff8 +0007D6r 1 9F .hibytes $9ff9 +0007D7r 1 9F .hibytes $9ffa +0007D8r 1 9F .hibytes $9ffb +0007D9r 1 9F .hibytes $9ffc +0007DAr 1 9F .hibytes $9ffd +0007DBr 1 9F .hibytes $9ffe +0007DCr 1 9F .hibytes $9fff +0007DDr 1 A0 .hibytes $a000 +0007DEr 1 A0 .hibytes $a001 +0007DFr 1 A0 .hibytes $a002 +0007E0r 1 A0 .hibytes $a003 +0007E1r 1 A0 .hibytes $a004 +0007E2r 1 A0 .hibytes $a005 +0007E3r 1 A0 .hibytes $a006 +0007E4r 1 A0 .hibytes $a007 +0007E5r 1 A0 .hibytes $a008 +0007E6r 1 A0 .hibytes $a009 +0007E7r 1 A0 .hibytes $a00a +0007E8r 1 A0 .hibytes $a00b +0007E9r 1 A0 .hibytes $a00c +0007EAr 1 A0 .hibytes $a00d +0007EBr 1 A0 .hibytes $a00e +0007ECr 1 A0 .hibytes $a00f +0007EDr 1 AF .hibytes $afe1 +0007EEr 1 AF .hibytes $afe2 +0007EFr 1 AF .hibytes $afe3 +0007F0r 1 AF .hibytes $afe4 +0007F1r 1 AF .hibytes $afe5 +0007F2r 1 AF .hibytes $afe6 +0007F3r 1 AF .hibytes $afe7 +0007F4r 1 AF .hibytes $afe8 +0007F5r 1 AF .hibytes $afe9 +0007F6r 1 AF .hibytes $afea +0007F7r 1 AF .hibytes $afeb +0007F8r 1 AF .hibytes $afec +0007F9r 1 AF .hibytes $afed +0007FAr 1 AF .hibytes $afee +0007FBr 1 AF .hibytes $afef +0007FCr 1 AF .hibytes $aff0 +0007FDr 1 AF .hibytes $aff1 +0007FEr 1 AF .hibytes $aff2 +0007FFr 1 AF .hibytes $aff3 +000800r 1 AF .hibytes $aff4 +000801r 1 AF .hibytes $aff5 +000802r 1 AF .hibytes $aff6 +000803r 1 AF .hibytes $aff7 +000804r 1 AF .hibytes $aff8 +000805r 1 AF .hibytes $aff9 +000806r 1 AF .hibytes $affa +000807r 1 AF .hibytes $affb +000808r 1 AF .hibytes $affc +000809r 1 AF .hibytes $affd +00080Ar 1 AF .hibytes $affe +00080Br 1 AF .hibytes $afff +00080Cr 1 B0 .hibytes $b000 +00080Dr 1 B0 .hibytes $b001 +00080Er 1 B0 .hibytes $b002 +00080Fr 1 B0 .hibytes $b003 +000810r 1 B0 .hibytes $b004 +000811r 1 B0 .hibytes $b005 +000812r 1 B0 .hibytes $b006 +000813r 1 B0 .hibytes $b007 +000814r 1 B0 .hibytes $b008 +000815r 1 B0 .hibytes $b009 +000816r 1 B0 .hibytes $b00a +000817r 1 B0 .hibytes $b00b +000818r 1 B0 .hibytes $b00c +000819r 1 B0 .hibytes $b00d +00081Ar 1 B0 .hibytes $b00e +00081Br 1 B0 .hibytes $b00f +00081Cr 1 BF .hibytes $bfe1 +00081Dr 1 BF .hibytes $bfe2 +00081Er 1 BF .hibytes $bfe3 +00081Fr 1 BF .hibytes $bfe4 +000820r 1 BF .hibytes $bfe5 +000821r 1 BF .hibytes $bfe6 +000822r 1 BF .hibytes $bfe7 +000823r 1 BF .hibytes $bfe8 +000824r 1 BF .hibytes $bfe9 +000825r 1 BF .hibytes $bfea +000826r 1 BF .hibytes $bfeb +000827r 1 BF .hibytes $bfec +000828r 1 BF .hibytes $bfed +000829r 1 BF .hibytes $bfee +00082Ar 1 BF .hibytes $bfef +00082Br 1 BF .hibytes $bff0 +00082Cr 1 BF .hibytes $bff1 +00082Dr 1 BF .hibytes $bff2 +00082Er 1 BF .hibytes $bff3 +00082Fr 1 BF .hibytes $bff4 +000830r 1 BF .hibytes $bff5 +000831r 1 BF .hibytes $bff6 +000832r 1 BF .hibytes $bff7 +000833r 1 BF .hibytes $bff8 +000834r 1 BF .hibytes $bff9 +000835r 1 BF .hibytes $bffa +000836r 1 BF .hibytes $bffb +000837r 1 BF .hibytes $bffc +000838r 1 BF .hibytes $bffd +000839r 1 BF .hibytes $bffe +00083Ar 1 BF .hibytes $bfff +00083Br 1 C0 .hibytes $c000 +00083Cr 1 C0 .hibytes $c001 +00083Dr 1 C0 .hibytes $c002 +00083Er 1 C0 .hibytes $c003 +00083Fr 1 C0 .hibytes $c004 +000840r 1 C0 .hibytes $c005 +000841r 1 C0 .hibytes $c006 +000842r 1 C0 .hibytes $c007 +000843r 1 C0 .hibytes $c008 +000844r 1 C0 .hibytes $c009 +000845r 1 C0 .hibytes $c00a +000846r 1 C0 .hibytes $c00b +000847r 1 C0 .hibytes $c00c +000848r 1 C0 .hibytes $c00d +000849r 1 C0 .hibytes $c00e +00084Ar 1 C0 .hibytes $c00f +00084Br 1 CF .hibytes $cfe1 +00084Cr 1 CF .hibytes $cfe2 +00084Dr 1 CF .hibytes $cfe3 +00084Er 1 CF .hibytes $cfe4 +00084Fr 1 CF .hibytes $cfe5 +000850r 1 CF .hibytes $cfe6 +000851r 1 CF .hibytes $cfe7 +000852r 1 CF .hibytes $cfe8 +000853r 1 CF .hibytes $cfe9 +000854r 1 CF .hibytes $cfea +000855r 1 CF .hibytes $cfeb +000856r 1 CF .hibytes $cfec +000857r 1 CF .hibytes $cfed +000858r 1 CF .hibytes $cfee +000859r 1 CF .hibytes $cfef +00085Ar 1 CF .hibytes $cff0 +00085Br 1 CF .hibytes $cff1 +00085Cr 1 CF .hibytes $cff2 +00085Dr 1 CF .hibytes $cff3 +00085Er 1 CF .hibytes $cff4 +00085Fr 1 CF .hibytes $cff5 +000860r 1 CF .hibytes $cff6 +000861r 1 CF .hibytes $cff7 +000862r 1 CF .hibytes $cff8 +000863r 1 CF .hibytes $cff9 +000864r 1 CF .hibytes $cffa +000865r 1 CF .hibytes $cffb +000866r 1 CF .hibytes $cffc +000867r 1 CF .hibytes $cffd +000868r 1 CF .hibytes $cffe +000869r 1 CF .hibytes $cfff +00086Ar 1 D0 .hibytes $d000 +00086Br 1 D0 .hibytes $d001 +00086Cr 1 D0 .hibytes $d002 +00086Dr 1 D0 .hibytes $d003 +00086Er 1 D0 .hibytes $d004 +00086Fr 1 D0 .hibytes $d005 +000870r 1 D0 .hibytes $d006 +000871r 1 D0 .hibytes $d007 +000872r 1 D0 .hibytes $d008 +000873r 1 D0 .hibytes $d009 +000874r 1 D0 .hibytes $d00a +000875r 1 D0 .hibytes $d00b +000876r 1 D0 .hibytes $d00c +000877r 1 D0 .hibytes $d00d +000878r 1 D0 .hibytes $d00e +000879r 1 D0 .hibytes $d00f +00087Ar 1 DF .hibytes $dfe1 +00087Br 1 DF .hibytes $dfe2 +00087Cr 1 DF .hibytes $dfe3 +00087Dr 1 DF .hibytes $dfe4 +00087Er 1 DF .hibytes $dfe5 +00087Fr 1 DF .hibytes $dfe6 +000880r 1 DF .hibytes $dfe7 +000881r 1 DF .hibytes $dfe8 +000882r 1 DF .hibytes $dfe9 +000883r 1 DF .hibytes $dfea +000884r 1 DF .hibytes $dfeb +000885r 1 DF .hibytes $dfec +000886r 1 DF .hibytes $dfed +000887r 1 DF .hibytes $dfee +000888r 1 DF .hibytes $dfef +000889r 1 DF .hibytes $dff0 +00088Ar 1 DF .hibytes $dff1 +00088Br 1 DF .hibytes $dff2 +00088Cr 1 DF .hibytes $dff3 +00088Dr 1 DF .hibytes $dff4 +00088Er 1 DF .hibytes $dff5 +00088Fr 1 DF .hibytes $dff6 +000890r 1 DF .hibytes $dff7 +000891r 1 DF .hibytes $dff8 +000892r 1 DF .hibytes $dff9 +000893r 1 DF .hibytes $dffa +000894r 1 DF .hibytes $dffb +000895r 1 DF .hibytes $dffc +000896r 1 DF .hibytes $dffd +000897r 1 DF .hibytes $dffe +000898r 1 DF .hibytes $dfff +000899r 1 E0 .hibytes $e000 +00089Ar 1 E0 .hibytes $e001 +00089Br 1 E0 .hibytes $e002 +00089Cr 1 E0 .hibytes $e003 +00089Dr 1 E0 .hibytes $e004 +00089Er 1 E0 .hibytes $e005 +00089Fr 1 E0 .hibytes $e006 +0008A0r 1 E0 .hibytes $e007 +0008A1r 1 E0 .hibytes $e008 +0008A2r 1 E0 .hibytes $e009 +0008A3r 1 E0 .hibytes $e00a +0008A4r 1 E0 .hibytes $e00b +0008A5r 1 E0 .hibytes $e00c +0008A6r 1 E0 .hibytes $e00d +0008A7r 1 E0 .hibytes $e00e +0008A8r 1 E0 .hibytes $e00f +0008A9r 1 EF .hibytes $efe1 +0008AAr 1 EF .hibytes $efe2 +0008ABr 1 EF .hibytes $efe3 +0008ACr 1 EF .hibytes $efe4 +0008ADr 1 EF .hibytes $efe5 +0008AEr 1 EF .hibytes $efe6 +0008AFr 1 EF .hibytes $efe7 +0008B0r 1 EF .hibytes $efe8 +0008B1r 1 EF .hibytes $efe9 +0008B2r 1 EF .hibytes $efea +0008B3r 1 EF .hibytes $efeb +0008B4r 1 EF .hibytes $efec +0008B5r 1 EF .hibytes $efed +0008B6r 1 EF .hibytes $efee +0008B7r 1 EF .hibytes $efef +0008B8r 1 EF .hibytes $eff0 +0008B9r 1 EF .hibytes $eff1 +0008BAr 1 EF .hibytes $eff2 +0008BBr 1 EF .hibytes $eff3 +0008BCr 1 EF .hibytes $eff4 +0008BDr 1 EF .hibytes $eff5 +0008BEr 1 EF .hibytes $eff6 +0008BFr 1 EF .hibytes $eff7 +0008C0r 1 EF .hibytes $eff8 +0008C1r 1 EF .hibytes $eff9 +0008C2r 1 EF .hibytes $effa +0008C3r 1 EF .hibytes $effb +0008C4r 1 EF .hibytes $effc +0008C5r 1 EF .hibytes $effd +0008C6r 1 EF .hibytes $effe +0008C7r 1 EF .hibytes $efff +0008C8r 1 F0 .hibytes $f000 +0008C9r 1 F0 .hibytes $f001 +0008CAr 1 F0 .hibytes $f002 +0008CBr 1 F0 .hibytes $f003 +0008CCr 1 F0 .hibytes $f004 +0008CDr 1 F0 .hibytes $f005 +0008CEr 1 F0 .hibytes $f006 +0008CFr 1 F0 .hibytes $f007 +0008D0r 1 F0 .hibytes $f008 +0008D1r 1 F0 .hibytes $f009 +0008D2r 1 F0 .hibytes $f00a +0008D3r 1 F0 .hibytes $f00b +0008D4r 1 F0 .hibytes $f00c +0008D5r 1 F0 .hibytes $f00d +0008D6r 1 F0 .hibytes $f00e +0008D7r 1 F0 .hibytes $f00f +0008D8r 1 FF .hibytes $ffe1 +0008D9r 1 FF .hibytes $ffe2 +0008DAr 1 FF .hibytes $ffe3 +0008DBr 1 FF .hibytes $ffe4 +0008DCr 1 FF .hibytes $ffe5 +0008DDr 1 FF .hibytes $ffe6 +0008DEr 1 FF .hibytes $ffe7 +0008DFr 1 FF .hibytes $ffe8 +0008E0r 1 FF .hibytes $ffe9 +0008E1r 1 FF .hibytes $ffea +0008E2r 1 FF .hibytes $ffeb +0008E3r 1 FF .hibytes $ffec +0008E4r 1 FF .hibytes $ffed +0008E5r 1 FF .hibytes $ffee +0008E6r 1 FF .hibytes $ffef +0008E7r 1 FF .hibytes $fff0 +0008E8r 1 FF .hibytes $fff1 +0008E9r 1 FF .hibytes $fff2 +0008EAr 1 FF .hibytes $fff3 +0008EBr 1 FF .hibytes $fff4 +0008ECr 1 FF .hibytes $fff5 +0008EDr 1 FF .hibytes $fff6 +0008EEr 1 FF .hibytes $fff7 +0008EFr 1 FF .hibytes $fff8 +0008F0r 1 FF .hibytes $fff9 +0008F1r 1 FF .hibytes $fffa +0008F2r 1 FF .hibytes $fffb +0008F3r 1 FF .hibytes $fffc +0008F4r 1 FF .hibytes $fffd +0008F5r 1 FF .hibytes $fffe +0008F6r 1 FF .hibytes $ffff +0008F7r 1 +0008F7r 1 ; 4-digit hex values, uppercase +0008F7r 1 00 .hibytes $0000 +0008F8r 1 00 .hibytes $0001 +0008F9r 1 00 .hibytes $0002 +0008FAr 1 00 .hibytes $0003 +0008FBr 1 00 .hibytes $0004 +0008FCr 1 00 .hibytes $0005 +0008FDr 1 00 .hibytes $0006 +0008FEr 1 00 .hibytes $0007 +0008FFr 1 00 .hibytes $0008 +000900r 1 00 .hibytes $0009 +000901r 1 00 .hibytes $000A +000902r 1 00 .hibytes $000B +000903r 1 00 .hibytes $000C +000904r 1 00 .hibytes $000D +000905r 1 00 .hibytes $000E +000906r 1 00 .hibytes $000F +000907r 1 00 .hibytes $0010 +000908r 1 00 .hibytes $0011 +000909r 1 00 .hibytes $0012 +00090Ar 1 00 .hibytes $0013 +00090Br 1 00 .hibytes $0070 +00090Cr 1 00 .hibytes $0071 +00090Dr 1 00 .hibytes $0072 +00090Er 1 00 .hibytes $0073 +00090Fr 1 00 .hibytes $0074 +000910r 1 00 .hibytes $0075 +000911r 1 00 .hibytes $0076 +000912r 1 00 .hibytes $0077 +000913r 1 00 .hibytes $0078 +000914r 1 00 .hibytes $0079 +000915r 1 00 .hibytes $007A +000916r 1 00 .hibytes $007B +000917r 1 00 .hibytes $007C +000918r 1 00 .hibytes $007D +000919r 1 00 .hibytes $007E +00091Ar 1 00 .hibytes $007F +00091Br 1 00 .hibytes $0080 +00091Cr 1 00 .hibytes $0081 +00091Dr 1 00 .hibytes $0082 +00091Er 1 00 .hibytes $0083 +00091Fr 1 00 .hibytes $0084 +000920r 1 00 .hibytes $0085 +000921r 1 00 .hibytes $0086 +000922r 1 00 .hibytes $00F0 +000923r 1 00 .hibytes $00F1 +000924r 1 00 .hibytes $00F2 +000925r 1 00 .hibytes $00F3 +000926r 1 00 .hibytes $00F4 +000927r 1 00 .hibytes $00F5 +000928r 1 00 .hibytes $00F6 +000929r 1 00 .hibytes $00F7 +00092Ar 1 00 .hibytes $00F8 +00092Br 1 00 .hibytes $00F9 +00092Cr 1 00 .hibytes $00FA +00092Dr 1 00 .hibytes $00FB +00092Er 1 00 .hibytes $00FC +00092Fr 1 00 .hibytes $00FD +000930r 1 00 .hibytes $00FE +000931r 1 00 .hibytes $00FF +000932r 1 01 .hibytes $0100 +000933r 1 01 .hibytes $0101 +000934r 1 01 .hibytes $0102 +000935r 1 01 .hibytes $0103 +000936r 1 0F .hibytes $0FD2 +000937r 1 0F .hibytes $0FD3 +000938r 1 0F .hibytes $0FD4 +000939r 1 0F .hibytes $0FD5 +00093Ar 1 0F .hibytes $0FD6 +00093Br 1 0F .hibytes $0FD7 +00093Cr 1 0F .hibytes $0FD8 +00093Dr 1 0F .hibytes $0FD9 +00093Er 1 0F .hibytes $0FDA +00093Fr 1 0F .hibytes $0FDB +000940r 1 0F .hibytes $0FDC +000941r 1 0F .hibytes $0FDD +000942r 1 0F .hibytes $0FDE +000943r 1 0F .hibytes $0FDF +000944r 1 0F .hibytes $0FE0 +000945r 1 0F .hibytes $0FE1 +000946r 1 0F .hibytes $0FE2 +000947r 1 0F .hibytes $0FE3 +000948r 1 0F .hibytes $0FE4 +000949r 1 0F .hibytes $0FE5 +00094Ar 1 0F .hibytes $0FE6 +00094Br 1 0F .hibytes $0FE7 +00094Cr 1 0F .hibytes $0FE8 +00094Dr 1 0F .hibytes $0FE9 +00094Er 1 0F .hibytes $0FEA +00094Fr 1 0F .hibytes $0FEB +000950r 1 0F .hibytes $0FEC +000951r 1 0F .hibytes $0FED +000952r 1 0F .hibytes $0FEE +000953r 1 0F .hibytes $0FEF +000954r 1 0F .hibytes $0FF0 +000955r 1 0F .hibytes $0FF1 +000956r 1 0F .hibytes $0FF2 +000957r 1 0F .hibytes $0FF3 +000958r 1 0F .hibytes $0FF4 +000959r 1 0F .hibytes $0FF5 +00095Ar 1 0F .hibytes $0FF6 +00095Br 1 0F .hibytes $0FF7 +00095Cr 1 0F .hibytes $0FF8 +00095Dr 1 0F .hibytes $0FF9 +00095Er 1 0F .hibytes $0FFA +00095Fr 1 0F .hibytes $0FFB +000960r 1 0F .hibytes $0FFC +000961r 1 0F .hibytes $0FFD +000962r 1 0F .hibytes $0FFE +000963r 1 0F .hibytes $0FFF +000964r 1 10 .hibytes $1000 +000965r 1 10 .hibytes $1001 +000966r 1 10 .hibytes $1002 +000967r 1 10 .hibytes $1003 +000968r 1 10 .hibytes $1004 +000969r 1 10 .hibytes $1005 +00096Ar 1 10 .hibytes $1006 +00096Br 1 10 .hibytes $1007 +00096Cr 1 10 .hibytes $1008 +00096Dr 1 7F .hibytes $7FF0 +00096Er 1 7F .hibytes $7FF1 +00096Fr 1 7F .hibytes $7FF2 +000970r 1 7F .hibytes $7FF3 +000971r 1 7F .hibytes $7FF4 +000972r 1 7F .hibytes $7FF5 +000973r 1 7F .hibytes $7FF6 +000974r 1 7F .hibytes $7FF7 +000975r 1 7F .hibytes $7FF8 +000976r 1 7F .hibytes $7FF9 +000977r 1 7F .hibytes $7FFA +000978r 1 7F .hibytes $7FFB +000979r 1 7F .hibytes $7FFC +00097Ar 1 7F .hibytes $7FFD +00097Br 1 7F .hibytes $7FFE +00097Cr 1 7F .hibytes $7FFF +00097Dr 1 80 .hibytes $8000 +00097Er 1 80 .hibytes $8001 +00097Fr 1 80 .hibytes $8002 +000980r 1 80 .hibytes $8003 +000981r 1 80 .hibytes $8004 +000982r 1 80 .hibytes $8005 +000983r 1 80 .hibytes $8006 +000984r 1 80 .hibytes $8007 +000985r 1 80 .hibytes $8008 +000986r 1 80 .hibytes $8009 +000987r 1 80 .hibytes $800A +000988r 1 80 .hibytes $800B +000989r 1 9F .hibytes $9FE1 +00098Ar 1 9F .hibytes $9FE2 +00098Br 1 9F .hibytes $9FE3 +00098Cr 1 9F .hibytes $9FE4 +00098Dr 1 9F .hibytes $9FE5 +00098Er 1 9F .hibytes $9FE6 +00098Fr 1 9F .hibytes $9FE7 +000990r 1 9F .hibytes $9FE8 +000991r 1 9F .hibytes $9FE9 +000992r 1 9F .hibytes $9FEA +000993r 1 9F .hibytes $9FEB +000994r 1 9F .hibytes $9FEC +000995r 1 9F .hibytes $9FED +000996r 1 9F .hibytes $9FEE +000997r 1 9F .hibytes $9FEF +000998r 1 9F .hibytes $9FF0 +000999r 1 9F .hibytes $9FF1 +00099Ar 1 9F .hibytes $9FF2 +00099Br 1 9F .hibytes $9FF3 +00099Cr 1 9F .hibytes $9FF4 +00099Dr 1 9F .hibytes $9FF5 +00099Er 1 9F .hibytes $9FF6 +00099Fr 1 9F .hibytes $9FF7 +0009A0r 1 9F .hibytes $9FF8 +0009A1r 1 9F .hibytes $9FF9 +0009A2r 1 9F .hibytes $9FFA +0009A3r 1 9F .hibytes $9FFB +0009A4r 1 9F .hibytes $9FFC +0009A5r 1 9F .hibytes $9FFD +0009A6r 1 9F .hibytes $9FFE +0009A7r 1 9F .hibytes $9FFF +0009A8r 1 A0 .hibytes $A000 +0009A9r 1 A0 .hibytes $A001 +0009AAr 1 A0 .hibytes $A002 +0009ABr 1 A0 .hibytes $A003 +0009ACr 1 A0 .hibytes $A004 +0009ADr 1 A0 .hibytes $A005 +0009AEr 1 A0 .hibytes $A006 +0009AFr 1 A0 .hibytes $A007 +0009B0r 1 A0 .hibytes $A008 +0009B1r 1 A0 .hibytes $A009 +0009B2r 1 A0 .hibytes $A00A +0009B3r 1 A0 .hibytes $A00B +0009B4r 1 A0 .hibytes $A00C +0009B5r 1 A0 .hibytes $A00D +0009B6r 1 A0 .hibytes $A00E +0009B7r 1 A0 .hibytes $A00F +0009B8r 1 AF .hibytes $AFE1 +0009B9r 1 AF .hibytes $AFE2 +0009BAr 1 AF .hibytes $AFE3 +0009BBr 1 AF .hibytes $AFE4 +0009BCr 1 AF .hibytes $AFE5 +0009BDr 1 AF .hibytes $AFE6 +0009BEr 1 AF .hibytes $AFE7 +0009BFr 1 AF .hibytes $AFE8 +0009C0r 1 AF .hibytes $AFE9 +0009C1r 1 AF .hibytes $AFEA +0009C2r 1 AF .hibytes $AFEB +0009C3r 1 AF .hibytes $AFEC +0009C4r 1 AF .hibytes $AFED +0009C5r 1 AF .hibytes $AFEE +0009C6r 1 AF .hibytes $AFEF +0009C7r 1 AF .hibytes $AFF0 +0009C8r 1 AF .hibytes $AFF1 +0009C9r 1 AF .hibytes $AFF2 +0009CAr 1 AF .hibytes $AFF3 +0009CBr 1 AF .hibytes $AFF4 +0009CCr 1 AF .hibytes $AFF5 +0009CDr 1 AF .hibytes $AFF6 +0009CEr 1 AF .hibytes $AFF7 +0009CFr 1 AF .hibytes $AFF8 +0009D0r 1 AF .hibytes $AFF9 +0009D1r 1 AF .hibytes $AFFA +0009D2r 1 AF .hibytes $AFFB +0009D3r 1 AF .hibytes $AFFC +0009D4r 1 AF .hibytes $AFFD +0009D5r 1 AF .hibytes $AFFE +0009D6r 1 AF .hibytes $AFFF +0009D7r 1 B0 .hibytes $B000 +0009D8r 1 B0 .hibytes $B001 +0009D9r 1 B0 .hibytes $B002 +0009DAr 1 B0 .hibytes $B003 +0009DBr 1 B0 .hibytes $B004 +0009DCr 1 B0 .hibytes $B005 +0009DDr 1 B0 .hibytes $B006 +0009DEr 1 B0 .hibytes $B007 +0009DFr 1 B0 .hibytes $B008 +0009E0r 1 B0 .hibytes $B009 +0009E1r 1 B0 .hibytes $B00A +0009E2r 1 B0 .hibytes $B00B +0009E3r 1 B0 .hibytes $B00C +0009E4r 1 B0 .hibytes $B00D +0009E5r 1 B0 .hibytes $B00E +0009E6r 1 B0 .hibytes $B00F +0009E7r 1 BF .hibytes $BFE1 +0009E8r 1 BF .hibytes $BFE2 +0009E9r 1 BF .hibytes $BFE3 +0009EAr 1 BF .hibytes $BFE4 +0009EBr 1 BF .hibytes $BFE5 +0009ECr 1 BF .hibytes $BFE6 +0009EDr 1 BF .hibytes $BFE7 +0009EEr 1 BF .hibytes $BFE8 +0009EFr 1 BF .hibytes $BFE9 +0009F0r 1 BF .hibytes $BFEA +0009F1r 1 BF .hibytes $BFEB +0009F2r 1 BF .hibytes $BFEC +0009F3r 1 BF .hibytes $BFED +0009F4r 1 BF .hibytes $BFEE +0009F5r 1 BF .hibytes $BFEF +0009F6r 1 BF .hibytes $BFF0 +0009F7r 1 BF .hibytes $BFF1 +0009F8r 1 BF .hibytes $BFF2 +0009F9r 1 BF .hibytes $BFF3 +0009FAr 1 BF .hibytes $BFF4 +0009FBr 1 BF .hibytes $BFF5 +0009FCr 1 BF .hibytes $BFF6 +0009FDr 1 BF .hibytes $BFF7 +0009FEr 1 BF .hibytes $BFF8 +0009FFr 1 BF .hibytes $BFF9 +000A00r 1 BF .hibytes $BFFA +000A01r 1 BF .hibytes $BFFB +000A02r 1 BF .hibytes $BFFC +000A03r 1 BF .hibytes $BFFD +000A04r 1 BF .hibytes $BFFE +000A05r 1 BF .hibytes $BFFF +000A06r 1 C0 .hibytes $C000 +000A07r 1 C0 .hibytes $C001 +000A08r 1 C0 .hibytes $C002 +000A09r 1 C0 .hibytes $C003 +000A0Ar 1 C0 .hibytes $C004 +000A0Br 1 C0 .hibytes $C005 +000A0Cr 1 C0 .hibytes $C006 +000A0Dr 1 C0 .hibytes $C007 +000A0Er 1 C0 .hibytes $C008 +000A0Fr 1 C0 .hibytes $C009 +000A10r 1 C0 .hibytes $C00A +000A11r 1 C0 .hibytes $C00B +000A12r 1 C0 .hibytes $C00C +000A13r 1 C0 .hibytes $C00D +000A14r 1 C0 .hibytes $C00E +000A15r 1 C0 .hibytes $C00F +000A16r 1 CF .hibytes $CFE1 +000A17r 1 CF .hibytes $CFE2 +000A18r 1 CF .hibytes $CFE3 +000A19r 1 CF .hibytes $CFE4 +000A1Ar 1 CF .hibytes $CFE5 +000A1Br 1 CF .hibytes $CFE6 +000A1Cr 1 CF .hibytes $CFE7 +000A1Dr 1 CF .hibytes $CFE8 +000A1Er 1 CF .hibytes $CFE9 +000A1Fr 1 CF .hibytes $CFEA +000A20r 1 CF .hibytes $CFEB +000A21r 1 CF .hibytes $CFEC +000A22r 1 CF .hibytes $CFED +000A23r 1 CF .hibytes $CFEE +000A24r 1 CF .hibytes $CFEF +000A25r 1 CF .hibytes $CFF0 +000A26r 1 CF .hibytes $CFF1 +000A27r 1 CF .hibytes $CFF2 +000A28r 1 CF .hibytes $CFF3 +000A29r 1 CF .hibytes $CFF4 +000A2Ar 1 CF .hibytes $CFF5 +000A2Br 1 CF .hibytes $CFF6 +000A2Cr 1 CF .hibytes $CFF7 +000A2Dr 1 CF .hibytes $CFF8 +000A2Er 1 CF .hibytes $CFF9 +000A2Fr 1 CF .hibytes $CFFA +000A30r 1 CF .hibytes $CFFB +000A31r 1 CF .hibytes $CFFC +000A32r 1 CF .hibytes $CFFD +000A33r 1 CF .hibytes $CFFE +000A34r 1 CF .hibytes $CFFF +000A35r 1 D0 .hibytes $D000 +000A36r 1 D0 .hibytes $D001 +000A37r 1 D0 .hibytes $D002 +000A38r 1 D0 .hibytes $D003 +000A39r 1 D0 .hibytes $D004 +000A3Ar 1 D0 .hibytes $D005 +000A3Br 1 D0 .hibytes $D006 +000A3Cr 1 D0 .hibytes $D007 +000A3Dr 1 D0 .hibytes $D008 +000A3Er 1 D0 .hibytes $D009 +000A3Fr 1 D0 .hibytes $D00A +000A40r 1 D0 .hibytes $D00B +000A41r 1 D0 .hibytes $D00C +000A42r 1 D0 .hibytes $D00D +000A43r 1 D0 .hibytes $D00E +000A44r 1 D0 .hibytes $D00F +000A45r 1 DF .hibytes $DFE1 +000A46r 1 DF .hibytes $DFE2 +000A47r 1 DF .hibytes $DFE3 +000A48r 1 DF .hibytes $DFE4 +000A49r 1 DF .hibytes $DFE5 +000A4Ar 1 DF .hibytes $DFE6 +000A4Br 1 DF .hibytes $DFE7 +000A4Cr 1 DF .hibytes $DFE8 +000A4Dr 1 DF .hibytes $DFE9 +000A4Er 1 DF .hibytes $DFEA +000A4Fr 1 DF .hibytes $DFEB +000A50r 1 DF .hibytes $DFEC +000A51r 1 DF .hibytes $DFED +000A52r 1 DF .hibytes $DFEE +000A53r 1 DF .hibytes $DFEF +000A54r 1 DF .hibytes $DFF0 +000A55r 1 DF .hibytes $DFF1 +000A56r 1 DF .hibytes $DFF2 +000A57r 1 DF .hibytes $DFF3 +000A58r 1 DF .hibytes $DFF4 +000A59r 1 DF .hibytes $DFF5 +000A5Ar 1 DF .hibytes $DFF6 +000A5Br 1 DF .hibytes $DFF7 +000A5Cr 1 DF .hibytes $DFF8 +000A5Dr 1 DF .hibytes $DFF9 +000A5Er 1 DF .hibytes $DFFA +000A5Fr 1 DF .hibytes $DFFB +000A60r 1 DF .hibytes $DFFC +000A61r 1 DF .hibytes $DFFD +000A62r 1 DF .hibytes $DFFE +000A63r 1 DF .hibytes $DFFF +000A64r 1 E0 .hibytes $E000 +000A65r 1 E0 .hibytes $E001 +000A66r 1 E0 .hibytes $E002 +000A67r 1 E0 .hibytes $E003 +000A68r 1 E0 .hibytes $E004 +000A69r 1 E0 .hibytes $E005 +000A6Ar 1 E0 .hibytes $E006 +000A6Br 1 E0 .hibytes $E007 +000A6Cr 1 E0 .hibytes $E008 +000A6Dr 1 E0 .hibytes $E009 +000A6Er 1 E0 .hibytes $E00A +000A6Fr 1 E0 .hibytes $E00B +000A70r 1 E0 .hibytes $E00C +000A71r 1 E0 .hibytes $E00D +000A72r 1 E0 .hibytes $E00E +000A73r 1 E0 .hibytes $E00F +000A74r 1 EF .hibytes $EFE1 +000A75r 1 EF .hibytes $EFE2 +000A76r 1 EF .hibytes $EFE3 +000A77r 1 EF .hibytes $EFE4 +000A78r 1 EF .hibytes $EFE5 +000A79r 1 EF .hibytes $EFE6 +000A7Ar 1 EF .hibytes $EFE7 +000A7Br 1 EF .hibytes $EFE8 +000A7Cr 1 EF .hibytes $EFE9 +000A7Dr 1 EF .hibytes $EFEA +000A7Er 1 EF .hibytes $EFEB +000A7Fr 1 EF .hibytes $EFEC +000A80r 1 EF .hibytes $EFED +000A81r 1 EF .hibytes $EFEE +000A82r 1 EF .hibytes $EFEF +000A83r 1 EF .hibytes $EFF0 +000A84r 1 EF .hibytes $EFF1 +000A85r 1 EF .hibytes $EFF2 +000A86r 1 EF .hibytes $EFF3 +000A87r 1 EF .hibytes $EFF4 +000A88r 1 EF .hibytes $EFF5 +000A89r 1 EF .hibytes $EFF6 +000A8Ar 1 EF .hibytes $EFF7 +000A8Br 1 EF .hibytes $EFF8 +000A8Cr 1 EF .hibytes $EFF9 +000A8Dr 1 EF .hibytes $EFFA +000A8Er 1 EF .hibytes $EFFB +000A8Fr 1 EF .hibytes $EFFC +000A90r 1 EF .hibytes $EFFD +000A91r 1 EF .hibytes $EFFE +000A92r 1 EF .hibytes $EFFF +000A93r 1 F0 .hibytes $F000 +000A94r 1 F0 .hibytes $F001 +000A95r 1 F0 .hibytes $F002 +000A96r 1 F0 .hibytes $F003 +000A97r 1 F0 .hibytes $F004 +000A98r 1 F0 .hibytes $F005 +000A99r 1 F0 .hibytes $F006 +000A9Ar 1 F0 .hibytes $F007 +000A9Br 1 F0 .hibytes $F008 +000A9Cr 1 F0 .hibytes $F009 +000A9Dr 1 F0 .hibytes $F00A +000A9Er 1 F0 .hibytes $F00B +000A9Fr 1 F0 .hibytes $F00C +000AA0r 1 F0 .hibytes $F00D +000AA1r 1 F0 .hibytes $F00E +000AA2r 1 F0 .hibytes $F00F +000AA3r 1 FF .hibytes $FFE1 +000AA4r 1 FF .hibytes $FFE2 +000AA5r 1 FF .hibytes $FFE3 +000AA6r 1 FF .hibytes $FFE4 +000AA7r 1 FF .hibytes $FFE5 +000AA8r 1 FF .hibytes $FFE6 +000AA9r 1 FF .hibytes $FFE7 +000AAAr 1 FF .hibytes $FFE8 +000AABr 1 FF .hibytes $FFE9 +000AACr 1 FF .hibytes $FFEA +000AADr 1 FF .hibytes $FFEB +000AAEr 1 FF .hibytes $FFEC +000AAFr 1 FF .hibytes $FFED +000AB0r 1 FF .hibytes $FFEE +000AB1r 1 FF .hibytes $FFEF +000AB2r 1 FF .hibytes $FFF0 +000AB3r 1 FF .hibytes $FFF1 +000AB4r 1 FF .hibytes $FFF2 +000AB5r 1 FF .hibytes $FFF3 +000AB6r 1 FF .hibytes $FFF4 +000AB7r 1 FF .hibytes $FFF5 +000AB8r 1 FF .hibytes $FFF6 +000AB9r 1 FF .hibytes $FFF7 +000ABAr 1 FF .hibytes $FFF8 +000ABBr 1 FF .hibytes $FFF9 +000ABCr 1 FF .hibytes $FFFA +000ABDr 1 FF .hibytes $FFFB +000ABEr 1 FF .hibytes $FFFC +000ABFr 1 FF .hibytes $FFFD +000AC0r 1 FF .hibytes $FFFE +000AC1r 1 FF .hibytes $FFFF +000AC2r 1 +000AC2r 1 ; alternative hex values +000AC2r 1 00 .hibytes 0h +000AC3r 1 00 .hibytes 1h +000AC4r 1 00 .hibytes 2h +000AC5r 1 00 .hibytes 3h +000AC6r 1 00 .hibytes 4h +000AC7r 1 00 .hibytes 5h +000AC8r 1 00 .hibytes 6h +000AC9r 1 00 .hibytes 7h +000ACAr 1 00 .hibytes 8h +000ACBr 1 00 .hibytes 9h +000ACCr 1 00 .hibytes 0ah +000ACDr 1 00 .hibytes 0bh +000ACEr 1 00 .hibytes 0ch +000ACFr 1 00 .hibytes 0dh +000AD0r 1 00 .hibytes 0eh +000AD1r 1 00 .hibytes 0fh +000AD2r 1 00 .hibytes 10h +000AD3r 1 00 .hibytes 11h +000AD4r 1 00 .hibytes 12h +000AD5r 1 00 .hibytes 13h +000AD6r 1 00 .hibytes 70h +000AD7r 1 00 .hibytes 71h +000AD8r 1 00 .hibytes 72h +000AD9r 1 00 .hibytes 73h +000ADAr 1 00 .hibytes 74h +000ADBr 1 00 .hibytes 75h +000ADCr 1 00 .hibytes 76h +000ADDr 1 00 .hibytes 77h +000ADEr 1 00 .hibytes 78h +000ADFr 1 00 .hibytes 79h +000AE0r 1 00 .hibytes 7ah +000AE1r 1 00 .hibytes 7bh +000AE2r 1 00 .hibytes 7ch +000AE3r 1 00 .hibytes 7dh +000AE4r 1 00 .hibytes 7eh +000AE5r 1 00 .hibytes 7fh +000AE6r 1 00 .hibytes 80h +000AE7r 1 00 .hibytes 81h +000AE8r 1 00 .hibytes 82h +000AE9r 1 00 .hibytes 83h +000AEAr 1 00 .hibytes 84h +000AEBr 1 00 .hibytes 85h +000AECr 1 00 .hibytes 86h +000AEDr 1 00 .hibytes 0f0h +000AEEr 1 00 .hibytes 0f1h +000AEFr 1 00 .hibytes 0f2h +000AF0r 1 00 .hibytes 0f3h +000AF1r 1 00 .hibytes 0f4h +000AF2r 1 00 .hibytes 0f5h +000AF3r 1 00 .hibytes 0f6h +000AF4r 1 00 .hibytes 0f7h +000AF5r 1 00 .hibytes 0f8h +000AF6r 1 00 .hibytes 0f9h +000AF7r 1 00 .hibytes 0fah +000AF8r 1 00 .hibytes 0fbh +000AF9r 1 00 .hibytes 0fch +000AFAr 1 00 .hibytes 0fdh +000AFBr 1 00 .hibytes 0feh +000AFCr 1 00 .hibytes 0ffh +000AFDr 1 01 .hibytes 100h +000AFEr 1 01 .hibytes 101h +000AFFr 1 01 .hibytes 102h +000B00r 1 01 .hibytes 103h +000B01r 1 0F .hibytes 0fd2h +000B02r 1 0F .hibytes 0fd3h +000B03r 1 0F .hibytes 0fd4h +000B04r 1 0F .hibytes 0fd5h +000B05r 1 0F .hibytes 0fd6h +000B06r 1 0F .hibytes 0fd7h +000B07r 1 0F .hibytes 0fd8h +000B08r 1 0F .hibytes 0fd9h +000B09r 1 0F .hibytes 0fdah +000B0Ar 1 0F .hibytes 0fdbh +000B0Br 1 0F .hibytes 0fdch +000B0Cr 1 0F .hibytes 0fddh +000B0Dr 1 0F .hibytes 0fdeh +000B0Er 1 0F .hibytes 0fdfh +000B0Fr 1 0F .hibytes 0fe0h +000B10r 1 0F .hibytes 0fe1h +000B11r 1 0F .hibytes 0fe2h +000B12r 1 0F .hibytes 0fe3h +000B13r 1 0F .hibytes 0fe4h +000B14r 1 0F .hibytes 0fe5h +000B15r 1 0F .hibytes 0fe6h +000B16r 1 0F .hibytes 0fe7h +000B17r 1 0F .hibytes 0fe8h +000B18r 1 0F .hibytes 0fe9h +000B19r 1 0F .hibytes 0feah +000B1Ar 1 0F .hibytes 0febh +000B1Br 1 0F .hibytes 0fech +000B1Cr 1 0F .hibytes 0fedh +000B1Dr 1 0F .hibytes 0feeh +000B1Er 1 0F .hibytes 0fefh +000B1Fr 1 0F .hibytes 0ff0h +000B20r 1 0F .hibytes 0ff1h +000B21r 1 0F .hibytes 0ff2h +000B22r 1 0F .hibytes 0ff3h +000B23r 1 0F .hibytes 0ff4h +000B24r 1 0F .hibytes 0ff5h +000B25r 1 0F .hibytes 0ff6h +000B26r 1 0F .hibytes 0ff7h +000B27r 1 0F .hibytes 0ff8h +000B28r 1 0F .hibytes 0ff9h +000B29r 1 0F .hibytes 0ffah +000B2Ar 1 0F .hibytes 0ffbh +000B2Br 1 0F .hibytes 0ffch +000B2Cr 1 0F .hibytes 0ffdh +000B2Dr 1 0F .hibytes 0ffeh +000B2Er 1 0F .hibytes 0fffh +000B2Fr 1 10 .hibytes 1000h +000B30r 1 10 .hibytes 1001h +000B31r 1 10 .hibytes 1002h +000B32r 1 10 .hibytes 1003h +000B33r 1 10 .hibytes 1004h +000B34r 1 10 .hibytes 1005h +000B35r 1 10 .hibytes 1006h +000B36r 1 10 .hibytes 1007h +000B37r 1 10 .hibytes 1008h +000B38r 1 7F .hibytes 7ff0h +000B39r 1 7F .hibytes 7ff1h +000B3Ar 1 7F .hibytes 7ff2h +000B3Br 1 7F .hibytes 7ff3h +000B3Cr 1 7F .hibytes 7ff4h +000B3Dr 1 7F .hibytes 7ff5h +000B3Er 1 7F .hibytes 7ff6h +000B3Fr 1 7F .hibytes 7ff7h +000B40r 1 7F .hibytes 7ff8h +000B41r 1 7F .hibytes 7ff9h +000B42r 1 7F .hibytes 7ffah +000B43r 1 7F .hibytes 7ffbh +000B44r 1 7F .hibytes 7ffch +000B45r 1 7F .hibytes 7ffdh +000B46r 1 7F .hibytes 7ffeh +000B47r 1 7F .hibytes 7fffh +000B48r 1 80 .hibytes 8000h +000B49r 1 80 .hibytes 8001h +000B4Ar 1 80 .hibytes 8002h +000B4Br 1 80 .hibytes 8003h +000B4Cr 1 80 .hibytes 8004h +000B4Dr 1 80 .hibytes 8005h +000B4Er 1 80 .hibytes 8006h +000B4Fr 1 80 .hibytes 8007h +000B50r 1 80 .hibytes 8008h +000B51r 1 80 .hibytes 8009h +000B52r 1 80 .hibytes 800ah +000B53r 1 80 .hibytes 800bh +000B54r 1 9F .hibytes 9fe1h +000B55r 1 9F .hibytes 9fe2h +000B56r 1 9F .hibytes 9fe3h +000B57r 1 9F .hibytes 9fe4h +000B58r 1 9F .hibytes 9fe5h +000B59r 1 9F .hibytes 9fe6h +000B5Ar 1 9F .hibytes 9fe7h +000B5Br 1 9F .hibytes 9fe8h +000B5Cr 1 9F .hibytes 9fe9h +000B5Dr 1 9F .hibytes 9feah +000B5Er 1 9F .hibytes 9febh +000B5Fr 1 9F .hibytes 9fech +000B60r 1 9F .hibytes 9fedh +000B61r 1 9F .hibytes 9feeh +000B62r 1 9F .hibytes 9fefh +000B63r 1 9F .hibytes 9ff0h +000B64r 1 9F .hibytes 9ff1h +000B65r 1 9F .hibytes 9ff2h +000B66r 1 9F .hibytes 9ff3h +000B67r 1 9F .hibytes 9ff4h +000B68r 1 9F .hibytes 9ff5h +000B69r 1 9F .hibytes 9ff6h +000B6Ar 1 9F .hibytes 9ff7h +000B6Br 1 9F .hibytes 9ff8h +000B6Cr 1 9F .hibytes 9ff9h +000B6Dr 1 9F .hibytes 9ffah +000B6Er 1 9F .hibytes 9ffbh +000B6Fr 1 9F .hibytes 9ffch +000B70r 1 9F .hibytes 9ffdh +000B71r 1 9F .hibytes 9ffeh +000B72r 1 9F .hibytes 9fffh +000B73r 1 A0 .hibytes 0a000h +000B74r 1 A0 .hibytes 0a001h +000B75r 1 A0 .hibytes 0a002h +000B76r 1 A0 .hibytes 0a003h +000B77r 1 A0 .hibytes 0a004h +000B78r 1 A0 .hibytes 0a005h +000B79r 1 A0 .hibytes 0a006h +000B7Ar 1 A0 .hibytes 0a007h +000B7Br 1 A0 .hibytes 0a008h +000B7Cr 1 A0 .hibytes 0a009h +000B7Dr 1 A0 .hibytes 0a00ah +000B7Er 1 A0 .hibytes 0a00bh +000B7Fr 1 A0 .hibytes 0a00ch +000B80r 1 A0 .hibytes 0a00dh +000B81r 1 A0 .hibytes 0a00eh +000B82r 1 A0 .hibytes 0a00fh +000B83r 1 AF .hibytes 0afe1h +000B84r 1 AF .hibytes 0afe2h +000B85r 1 AF .hibytes 0afe3h +000B86r 1 AF .hibytes 0afe4h +000B87r 1 AF .hibytes 0afe5h +000B88r 1 AF .hibytes 0afe6h +000B89r 1 AF .hibytes 0afe7h +000B8Ar 1 AF .hibytes 0afe8h +000B8Br 1 AF .hibytes 0afe9h +000B8Cr 1 AF .hibytes 0afeah +000B8Dr 1 AF .hibytes 0afebh +000B8Er 1 AF .hibytes 0afech +000B8Fr 1 AF .hibytes 0afedh +000B90r 1 AF .hibytes 0afeeh +000B91r 1 AF .hibytes 0afefh +000B92r 1 AF .hibytes 0aff0h +000B93r 1 AF .hibytes 0aff1h +000B94r 1 AF .hibytes 0aff2h +000B95r 1 AF .hibytes 0aff3h +000B96r 1 AF .hibytes 0aff4h +000B97r 1 AF .hibytes 0aff5h +000B98r 1 AF .hibytes 0aff6h +000B99r 1 AF .hibytes 0aff7h +000B9Ar 1 AF .hibytes 0aff8h +000B9Br 1 AF .hibytes 0aff9h +000B9Cr 1 AF .hibytes 0affah +000B9Dr 1 AF .hibytes 0affbh +000B9Er 1 AF .hibytes 0affch +000B9Fr 1 AF .hibytes 0affdh +000BA0r 1 AF .hibytes 0affeh +000BA1r 1 AF .hibytes 0afffh +000BA2r 1 B0 .hibytes 0b000h +000BA3r 1 B0 .hibytes 0b001h +000BA4r 1 B0 .hibytes 0b002h +000BA5r 1 B0 .hibytes 0b003h +000BA6r 1 B0 .hibytes 0b004h +000BA7r 1 B0 .hibytes 0b005h +000BA8r 1 B0 .hibytes 0b006h +000BA9r 1 B0 .hibytes 0b007h +000BAAr 1 B0 .hibytes 0b008h +000BABr 1 B0 .hibytes 0b009h +000BACr 1 B0 .hibytes 0b00ah +000BADr 1 B0 .hibytes 0b00bh +000BAEr 1 B0 .hibytes 0b00ch +000BAFr 1 B0 .hibytes 0b00dh +000BB0r 1 B0 .hibytes 0b00eh +000BB1r 1 B0 .hibytes 0b00fh +000BB2r 1 BF .hibytes 0bfe1h +000BB3r 1 BF .hibytes 0bfe2h +000BB4r 1 BF .hibytes 0bfe3h +000BB5r 1 BF .hibytes 0bfe4h +000BB6r 1 BF .hibytes 0bfe5h +000BB7r 1 BF .hibytes 0bfe6h +000BB8r 1 BF .hibytes 0bfe7h +000BB9r 1 BF .hibytes 0bfe8h +000BBAr 1 BF .hibytes 0bfe9h +000BBBr 1 BF .hibytes 0bfeah +000BBCr 1 BF .hibytes 0bfebh +000BBDr 1 BF .hibytes 0bfech +000BBEr 1 BF .hibytes 0bfedh +000BBFr 1 BF .hibytes 0bfeeh +000BC0r 1 BF .hibytes 0bfefh +000BC1r 1 BF .hibytes 0bff0h +000BC2r 1 BF .hibytes 0bff1h +000BC3r 1 BF .hibytes 0bff2h +000BC4r 1 BF .hibytes 0bff3h +000BC5r 1 BF .hibytes 0bff4h +000BC6r 1 BF .hibytes 0bff5h +000BC7r 1 BF .hibytes 0bff6h +000BC8r 1 BF .hibytes 0bff7h +000BC9r 1 BF .hibytes 0bff8h +000BCAr 1 BF .hibytes 0bff9h +000BCBr 1 BF .hibytes 0bffah +000BCCr 1 BF .hibytes 0bffbh +000BCDr 1 BF .hibytes 0bffch +000BCEr 1 BF .hibytes 0bffdh +000BCFr 1 BF .hibytes 0bffeh +000BD0r 1 BF .hibytes 0bfffh +000BD1r 1 C0 .hibytes 0c000h +000BD2r 1 C0 .hibytes 0c001h +000BD3r 1 C0 .hibytes 0c002h +000BD4r 1 C0 .hibytes 0c003h +000BD5r 1 C0 .hibytes 0c004h +000BD6r 1 C0 .hibytes 0c005h +000BD7r 1 C0 .hibytes 0c006h +000BD8r 1 C0 .hibytes 0c007h +000BD9r 1 C0 .hibytes 0c008h +000BDAr 1 C0 .hibytes 0c009h +000BDBr 1 C0 .hibytes 0c00ah +000BDCr 1 C0 .hibytes 0c00bh +000BDDr 1 C0 .hibytes 0c00ch +000BDEr 1 C0 .hibytes 0c00dh +000BDFr 1 C0 .hibytes 0c00eh +000BE0r 1 C0 .hibytes 0c00fh +000BE1r 1 CF .hibytes 0cfe1h +000BE2r 1 CF .hibytes 0cfe2h +000BE3r 1 CF .hibytes 0cfe3h +000BE4r 1 CF .hibytes 0cfe4h +000BE5r 1 CF .hibytes 0cfe5h +000BE6r 1 CF .hibytes 0cfe6h +000BE7r 1 CF .hibytes 0cfe7h +000BE8r 1 CF .hibytes 0cfe8h +000BE9r 1 CF .hibytes 0cfe9h +000BEAr 1 CF .hibytes 0cfeah +000BEBr 1 CF .hibytes 0cfebh +000BECr 1 CF .hibytes 0cfech +000BEDr 1 CF .hibytes 0cfedh +000BEEr 1 CF .hibytes 0cfeeh +000BEFr 1 CF .hibytes 0cfefh +000BF0r 1 CF .hibytes 0cff0h +000BF1r 1 CF .hibytes 0cff1h +000BF2r 1 CF .hibytes 0cff2h +000BF3r 1 CF .hibytes 0cff3h +000BF4r 1 CF .hibytes 0cff4h +000BF5r 1 CF .hibytes 0cff5h +000BF6r 1 CF .hibytes 0cff6h +000BF7r 1 CF .hibytes 0cff7h +000BF8r 1 CF .hibytes 0cff8h +000BF9r 1 CF .hibytes 0cff9h +000BFAr 1 CF .hibytes 0cffah +000BFBr 1 CF .hibytes 0cffbh +000BFCr 1 CF .hibytes 0cffch +000BFDr 1 CF .hibytes 0cffdh +000BFEr 1 CF .hibytes 0cffeh +000BFFr 1 CF .hibytes 0cfffh +000C00r 1 D0 .hibytes 0d000h +000C01r 1 D0 .hibytes 0d001h +000C02r 1 D0 .hibytes 0d002h +000C03r 1 D0 .hibytes 0d003h +000C04r 1 D0 .hibytes 0d004h +000C05r 1 D0 .hibytes 0d005h +000C06r 1 D0 .hibytes 0d006h +000C07r 1 D0 .hibytes 0d007h +000C08r 1 D0 .hibytes 0d008h +000C09r 1 D0 .hibytes 0d009h +000C0Ar 1 D0 .hibytes 0d00ah +000C0Br 1 D0 .hibytes 0d00bh +000C0Cr 1 D0 .hibytes 0d00ch +000C0Dr 1 D0 .hibytes 0d00dh +000C0Er 1 D0 .hibytes 0d00eh +000C0Fr 1 D0 .hibytes 0d00fh +000C10r 1 DF .hibytes 0dfe1h +000C11r 1 DF .hibytes 0dfe2h +000C12r 1 DF .hibytes 0dfe3h +000C13r 1 DF .hibytes 0dfe4h +000C14r 1 DF .hibytes 0dfe5h +000C15r 1 DF .hibytes 0dfe6h +000C16r 1 DF .hibytes 0dfe7h +000C17r 1 DF .hibytes 0dfe8h +000C18r 1 DF .hibytes 0dfe9h +000C19r 1 DF .hibytes 0dfeah +000C1Ar 1 DF .hibytes 0dfebh +000C1Br 1 DF .hibytes 0dfech +000C1Cr 1 DF .hibytes 0dfedh +000C1Dr 1 DF .hibytes 0dfeeh +000C1Er 1 DF .hibytes 0dfefh +000C1Fr 1 DF .hibytes 0dff0h +000C20r 1 DF .hibytes 0dff1h +000C21r 1 DF .hibytes 0dff2h +000C22r 1 DF .hibytes 0dff3h +000C23r 1 DF .hibytes 0dff4h +000C24r 1 DF .hibytes 0dff5h +000C25r 1 DF .hibytes 0dff6h +000C26r 1 DF .hibytes 0dff7h +000C27r 1 DF .hibytes 0dff8h +000C28r 1 DF .hibytes 0dff9h +000C29r 1 DF .hibytes 0dffah +000C2Ar 1 DF .hibytes 0dffbh +000C2Br 1 DF .hibytes 0dffch +000C2Cr 1 DF .hibytes 0dffdh +000C2Dr 1 DF .hibytes 0dffeh +000C2Er 1 DF .hibytes 0dfffh +000C2Fr 1 E0 .hibytes 0e000h +000C30r 1 E0 .hibytes 0e001h +000C31r 1 E0 .hibytes 0e002h +000C32r 1 E0 .hibytes 0e003h +000C33r 1 E0 .hibytes 0e004h +000C34r 1 E0 .hibytes 0e005h +000C35r 1 E0 .hibytes 0e006h +000C36r 1 E0 .hibytes 0e007h +000C37r 1 E0 .hibytes 0e008h +000C38r 1 E0 .hibytes 0e009h +000C39r 1 E0 .hibytes 0e00ah +000C3Ar 1 E0 .hibytes 0e00bh +000C3Br 1 E0 .hibytes 0e00ch +000C3Cr 1 E0 .hibytes 0e00dh +000C3Dr 1 E0 .hibytes 0e00eh +000C3Er 1 E0 .hibytes 0e00fh +000C3Fr 1 EF .hibytes 0efe1h +000C40r 1 EF .hibytes 0efe2h +000C41r 1 EF .hibytes 0efe3h +000C42r 1 EF .hibytes 0efe4h +000C43r 1 EF .hibytes 0efe5h +000C44r 1 EF .hibytes 0efe6h +000C45r 1 EF .hibytes 0efe7h +000C46r 1 EF .hibytes 0efe8h +000C47r 1 EF .hibytes 0efe9h +000C48r 1 EF .hibytes 0efeah +000C49r 1 EF .hibytes 0efebh +000C4Ar 1 EF .hibytes 0efech +000C4Br 1 EF .hibytes 0efedh +000C4Cr 1 EF .hibytes 0efeeh +000C4Dr 1 EF .hibytes 0efefh +000C4Er 1 EF .hibytes 0eff0h +000C4Fr 1 EF .hibytes 0eff1h +000C50r 1 EF .hibytes 0eff2h +000C51r 1 EF .hibytes 0eff3h +000C52r 1 EF .hibytes 0eff4h +000C53r 1 EF .hibytes 0eff5h +000C54r 1 EF .hibytes 0eff6h +000C55r 1 EF .hibytes 0eff7h +000C56r 1 EF .hibytes 0eff8h +000C57r 1 EF .hibytes 0eff9h +000C58r 1 EF .hibytes 0effah +000C59r 1 EF .hibytes 0effbh +000C5Ar 1 EF .hibytes 0effch +000C5Br 1 EF .hibytes 0effdh +000C5Cr 1 EF .hibytes 0effeh +000C5Dr 1 EF .hibytes 0efffh +000C5Er 1 F0 .hibytes 0f000h +000C5Fr 1 F0 .hibytes 0f001h +000C60r 1 F0 .hibytes 0f002h +000C61r 1 F0 .hibytes 0f003h +000C62r 1 F0 .hibytes 0f004h +000C63r 1 F0 .hibytes 0f005h +000C64r 1 F0 .hibytes 0f006h +000C65r 1 F0 .hibytes 0f007h +000C66r 1 F0 .hibytes 0f008h +000C67r 1 F0 .hibytes 0f009h +000C68r 1 F0 .hibytes 0f00ah +000C69r 1 F0 .hibytes 0f00bh +000C6Ar 1 F0 .hibytes 0f00ch +000C6Br 1 F0 .hibytes 0f00dh +000C6Cr 1 F0 .hibytes 0f00eh +000C6Dr 1 F0 .hibytes 0f00fh +000C6Er 1 FF .hibytes 0ffe1h +000C6Fr 1 FF .hibytes 0ffe2h +000C70r 1 FF .hibytes 0ffe3h +000C71r 1 FF .hibytes 0ffe4h +000C72r 1 FF .hibytes 0ffe5h +000C73r 1 FF .hibytes 0ffe6h +000C74r 1 FF .hibytes 0ffe7h +000C75r 1 FF .hibytes 0ffe8h +000C76r 1 FF .hibytes 0ffe9h +000C77r 1 FF .hibytes 0ffeah +000C78r 1 FF .hibytes 0ffebh +000C79r 1 FF .hibytes 0ffech +000C7Ar 1 FF .hibytes 0ffedh +000C7Br 1 FF .hibytes 0ffeeh +000C7Cr 1 FF .hibytes 0ffefh +000C7Dr 1 FF .hibytes 0fff0h +000C7Er 1 FF .hibytes 0fff1h +000C7Fr 1 FF .hibytes 0fff2h +000C80r 1 FF .hibytes 0fff3h +000C81r 1 FF .hibytes 0fff4h +000C82r 1 FF .hibytes 0fff5h +000C83r 1 FF .hibytes 0fff6h +000C84r 1 FF .hibytes 0fff7h +000C85r 1 FF .hibytes 0fff8h +000C86r 1 FF .hibytes 0fff9h +000C87r 1 FF .hibytes 0fffah +000C88r 1 FF .hibytes 0fffbh +000C89r 1 FF .hibytes 0fffch +000C8Ar 1 FF .hibytes 0fffdh +000C8Br 1 FF .hibytes 0fffeh +000C8Cr 1 FF .hibytes 0ffffh +000C8Dr 1 +000C8Dr 1 ; alternative hex values, uppercase +000C8Dr 1 00 .hibytes 0h +000C8Er 1 00 .hibytes 1h +000C8Fr 1 00 .hibytes 2h +000C90r 1 00 .hibytes 3h +000C91r 1 00 .hibytes 4h +000C92r 1 00 .hibytes 5h +000C93r 1 00 .hibytes 6h +000C94r 1 00 .hibytes 7h +000C95r 1 00 .hibytes 8h +000C96r 1 00 .hibytes 9h +000C97r 1 00 .hibytes 0Ah +000C98r 1 00 .hibytes 0Bh +000C99r 1 00 .hibytes 0Ch +000C9Ar 1 00 .hibytes 0Dh +000C9Br 1 00 .hibytes 0Eh +000C9Cr 1 00 .hibytes 0Fh +000C9Dr 1 00 .hibytes 10h +000C9Er 1 00 .hibytes 11h +000C9Fr 1 00 .hibytes 12h +000CA0r 1 00 .hibytes 13h +000CA1r 1 00 .hibytes 70h +000CA2r 1 00 .hibytes 71h +000CA3r 1 00 .hibytes 72h +000CA4r 1 00 .hibytes 73h +000CA5r 1 00 .hibytes 74h +000CA6r 1 00 .hibytes 75h +000CA7r 1 00 .hibytes 76h +000CA8r 1 00 .hibytes 77h +000CA9r 1 00 .hibytes 78h +000CAAr 1 00 .hibytes 79h +000CABr 1 00 .hibytes 7Ah +000CACr 1 00 .hibytes 7Bh +000CADr 1 00 .hibytes 7Ch +000CAEr 1 00 .hibytes 7Dh +000CAFr 1 00 .hibytes 7Eh +000CB0r 1 00 .hibytes 7Fh +000CB1r 1 00 .hibytes 80h +000CB2r 1 00 .hibytes 81h +000CB3r 1 00 .hibytes 82h +000CB4r 1 00 .hibytes 83h +000CB5r 1 00 .hibytes 84h +000CB6r 1 00 .hibytes 85h +000CB7r 1 00 .hibytes 86h +000CB8r 1 00 .hibytes 0F0h +000CB9r 1 00 .hibytes 0F1h +000CBAr 1 00 .hibytes 0F2h +000CBBr 1 00 .hibytes 0F3h +000CBCr 1 00 .hibytes 0F4h +000CBDr 1 00 .hibytes 0F5h +000CBEr 1 00 .hibytes 0F6h +000CBFr 1 00 .hibytes 0F7h +000CC0r 1 00 .hibytes 0F8h +000CC1r 1 00 .hibytes 0F9h +000CC2r 1 00 .hibytes 0FAh +000CC3r 1 00 .hibytes 0FBh +000CC4r 1 00 .hibytes 0FCh +000CC5r 1 00 .hibytes 0FDh +000CC6r 1 00 .hibytes 0FEh +000CC7r 1 00 .hibytes 0FFh +000CC8r 1 01 .hibytes 100h +000CC9r 1 01 .hibytes 101h +000CCAr 1 01 .hibytes 102h +000CCBr 1 01 .hibytes 103h +000CCCr 1 0F .hibytes 0FD2h +000CCDr 1 0F .hibytes 0FD3h +000CCEr 1 0F .hibytes 0FD4h +000CCFr 1 0F .hibytes 0FD5h +000CD0r 1 0F .hibytes 0FD6h +000CD1r 1 0F .hibytes 0FD7h +000CD2r 1 0F .hibytes 0FD8h +000CD3r 1 0F .hibytes 0FD9h +000CD4r 1 0F .hibytes 0FDAh +000CD5r 1 0F .hibytes 0FDBh +000CD6r 1 0F .hibytes 0FDCh +000CD7r 1 0F .hibytes 0FDDh +000CD8r 1 0F .hibytes 0FDEh +000CD9r 1 0F .hibytes 0FDFh +000CDAr 1 0F .hibytes 0FE0h +000CDBr 1 0F .hibytes 0FE1h +000CDCr 1 0F .hibytes 0FE2h +000CDDr 1 0F .hibytes 0FE3h +000CDEr 1 0F .hibytes 0FE4h +000CDFr 1 0F .hibytes 0FE5h +000CE0r 1 0F .hibytes 0FE6h +000CE1r 1 0F .hibytes 0FE7h +000CE2r 1 0F .hibytes 0FE8h +000CE3r 1 0F .hibytes 0FE9h +000CE4r 1 0F .hibytes 0FEAh +000CE5r 1 0F .hibytes 0FEBh +000CE6r 1 0F .hibytes 0FECh +000CE7r 1 0F .hibytes 0FEDh +000CE8r 1 0F .hibytes 0FEEh +000CE9r 1 0F .hibytes 0FEFh +000CEAr 1 0F .hibytes 0FF0h +000CEBr 1 0F .hibytes 0FF1h +000CECr 1 0F .hibytes 0FF2h +000CEDr 1 0F .hibytes 0FF3h +000CEEr 1 0F .hibytes 0FF4h +000CEFr 1 0F .hibytes 0FF5h +000CF0r 1 0F .hibytes 0FF6h +000CF1r 1 0F .hibytes 0FF7h +000CF2r 1 0F .hibytes 0FF8h +000CF3r 1 0F .hibytes 0FF9h +000CF4r 1 0F .hibytes 0FFAh +000CF5r 1 0F .hibytes 0FFBh +000CF6r 1 0F .hibytes 0FFCh +000CF7r 1 0F .hibytes 0FFDh +000CF8r 1 0F .hibytes 0FFEh +000CF9r 1 0F .hibytes 0FFFh +000CFAr 1 10 .hibytes 1000h +000CFBr 1 10 .hibytes 1001h +000CFCr 1 10 .hibytes 1002h +000CFDr 1 10 .hibytes 1003h +000CFEr 1 10 .hibytes 1004h +000CFFr 1 10 .hibytes 1005h +000D00r 1 10 .hibytes 1006h +000D01r 1 10 .hibytes 1007h +000D02r 1 10 .hibytes 1008h +000D03r 1 7F .hibytes 7FF0h +000D04r 1 7F .hibytes 7FF1h +000D05r 1 7F .hibytes 7FF2h +000D06r 1 7F .hibytes 7FF3h +000D07r 1 7F .hibytes 7FF4h +000D08r 1 7F .hibytes 7FF5h +000D09r 1 7F .hibytes 7FF6h +000D0Ar 1 7F .hibytes 7FF7h +000D0Br 1 7F .hibytes 7FF8h +000D0Cr 1 7F .hibytes 7FF9h +000D0Dr 1 7F .hibytes 7FFAh +000D0Er 1 7F .hibytes 7FFBh +000D0Fr 1 7F .hibytes 7FFCh +000D10r 1 7F .hibytes 7FFDh +000D11r 1 7F .hibytes 7FFEh +000D12r 1 7F .hibytes 7FFFh +000D13r 1 80 .hibytes 8000h +000D14r 1 80 .hibytes 8001h +000D15r 1 80 .hibytes 8002h +000D16r 1 80 .hibytes 8003h +000D17r 1 80 .hibytes 8004h +000D18r 1 80 .hibytes 8005h +000D19r 1 80 .hibytes 8006h +000D1Ar 1 80 .hibytes 8007h +000D1Br 1 80 .hibytes 8008h +000D1Cr 1 80 .hibytes 8009h +000D1Dr 1 80 .hibytes 800Ah +000D1Er 1 80 .hibytes 800Bh +000D1Fr 1 9F .hibytes 9FE1h +000D20r 1 9F .hibytes 9FE2h +000D21r 1 9F .hibytes 9FE3h +000D22r 1 9F .hibytes 9FE4h +000D23r 1 9F .hibytes 9FE5h +000D24r 1 9F .hibytes 9FE6h +000D25r 1 9F .hibytes 9FE7h +000D26r 1 9F .hibytes 9FE8h +000D27r 1 9F .hibytes 9FE9h +000D28r 1 9F .hibytes 9FEAh +000D29r 1 9F .hibytes 9FEBh +000D2Ar 1 9F .hibytes 9FECh +000D2Br 1 9F .hibytes 9FEDh +000D2Cr 1 9F .hibytes 9FEEh +000D2Dr 1 9F .hibytes 9FEFh +000D2Er 1 9F .hibytes 9FF0h +000D2Fr 1 9F .hibytes 9FF1h +000D30r 1 9F .hibytes 9FF2h +000D31r 1 9F .hibytes 9FF3h +000D32r 1 9F .hibytes 9FF4h +000D33r 1 9F .hibytes 9FF5h +000D34r 1 9F .hibytes 9FF6h +000D35r 1 9F .hibytes 9FF7h +000D36r 1 9F .hibytes 9FF8h +000D37r 1 9F .hibytes 9FF9h +000D38r 1 9F .hibytes 9FFAh +000D39r 1 9F .hibytes 9FFBh +000D3Ar 1 9F .hibytes 9FFCh +000D3Br 1 9F .hibytes 9FFDh +000D3Cr 1 9F .hibytes 9FFEh +000D3Dr 1 9F .hibytes 9FFFh +000D3Er 1 A0 .hibytes 0A000h +000D3Fr 1 A0 .hibytes 0A001h +000D40r 1 A0 .hibytes 0A002h +000D41r 1 A0 .hibytes 0A003h +000D42r 1 A0 .hibytes 0A004h +000D43r 1 A0 .hibytes 0A005h +000D44r 1 A0 .hibytes 0A006h +000D45r 1 A0 .hibytes 0A007h +000D46r 1 A0 .hibytes 0A008h +000D47r 1 A0 .hibytes 0A009h +000D48r 1 A0 .hibytes 0A00Ah +000D49r 1 A0 .hibytes 0A00Bh +000D4Ar 1 A0 .hibytes 0A00Ch +000D4Br 1 A0 .hibytes 0A00Dh +000D4Cr 1 A0 .hibytes 0A00Eh +000D4Dr 1 A0 .hibytes 0A00Fh +000D4Er 1 AF .hibytes 0AFE1h +000D4Fr 1 AF .hibytes 0AFE2h +000D50r 1 AF .hibytes 0AFE3h +000D51r 1 AF .hibytes 0AFE4h +000D52r 1 AF .hibytes 0AFE5h +000D53r 1 AF .hibytes 0AFE6h +000D54r 1 AF .hibytes 0AFE7h +000D55r 1 AF .hibytes 0AFE8h +000D56r 1 AF .hibytes 0AFE9h +000D57r 1 AF .hibytes 0AFEAh +000D58r 1 AF .hibytes 0AFEBh +000D59r 1 AF .hibytes 0AFECh +000D5Ar 1 AF .hibytes 0AFEDh +000D5Br 1 AF .hibytes 0AFEEh +000D5Cr 1 AF .hibytes 0AFEFh +000D5Dr 1 AF .hibytes 0AFF0h +000D5Er 1 AF .hibytes 0AFF1h +000D5Fr 1 AF .hibytes 0AFF2h +000D60r 1 AF .hibytes 0AFF3h +000D61r 1 AF .hibytes 0AFF4h +000D62r 1 AF .hibytes 0AFF5h +000D63r 1 AF .hibytes 0AFF6h +000D64r 1 AF .hibytes 0AFF7h +000D65r 1 AF .hibytes 0AFF8h +000D66r 1 AF .hibytes 0AFF9h +000D67r 1 AF .hibytes 0AFFAh +000D68r 1 AF .hibytes 0AFFBh +000D69r 1 AF .hibytes 0AFFCh +000D6Ar 1 AF .hibytes 0AFFDh +000D6Br 1 AF .hibytes 0AFFEh +000D6Cr 1 AF .hibytes 0AFFFh +000D6Dr 1 B0 .hibytes 0B000h +000D6Er 1 B0 .hibytes 0B001h +000D6Fr 1 B0 .hibytes 0B002h +000D70r 1 B0 .hibytes 0B003h +000D71r 1 B0 .hibytes 0B004h +000D72r 1 B0 .hibytes 0B005h +000D73r 1 B0 .hibytes 0B006h +000D74r 1 B0 .hibytes 0B007h +000D75r 1 B0 .hibytes 0B008h +000D76r 1 B0 .hibytes 0B009h +000D77r 1 B0 .hibytes 0B00Ah +000D78r 1 B0 .hibytes 0B00Bh +000D79r 1 B0 .hibytes 0B00Ch +000D7Ar 1 B0 .hibytes 0B00Dh +000D7Br 1 B0 .hibytes 0B00Eh +000D7Cr 1 B0 .hibytes 0B00Fh +000D7Dr 1 BF .hibytes 0BFE1h +000D7Er 1 BF .hibytes 0BFE2h +000D7Fr 1 BF .hibytes 0BFE3h +000D80r 1 BF .hibytes 0BFE4h +000D81r 1 BF .hibytes 0BFE5h +000D82r 1 BF .hibytes 0BFE6h +000D83r 1 BF .hibytes 0BFE7h +000D84r 1 BF .hibytes 0BFE8h +000D85r 1 BF .hibytes 0BFE9h +000D86r 1 BF .hibytes 0BFEAh +000D87r 1 BF .hibytes 0BFEBh +000D88r 1 BF .hibytes 0BFECh +000D89r 1 BF .hibytes 0BFEDh +000D8Ar 1 BF .hibytes 0BFEEh +000D8Br 1 BF .hibytes 0BFEFh +000D8Cr 1 BF .hibytes 0BFF0h +000D8Dr 1 BF .hibytes 0BFF1h +000D8Er 1 BF .hibytes 0BFF2h +000D8Fr 1 BF .hibytes 0BFF3h +000D90r 1 BF .hibytes 0BFF4h +000D91r 1 BF .hibytes 0BFF5h +000D92r 1 BF .hibytes 0BFF6h +000D93r 1 BF .hibytes 0BFF7h +000D94r 1 BF .hibytes 0BFF8h +000D95r 1 BF .hibytes 0BFF9h +000D96r 1 BF .hibytes 0BFFAh +000D97r 1 BF .hibytes 0BFFBh +000D98r 1 BF .hibytes 0BFFCh +000D99r 1 BF .hibytes 0BFFDh +000D9Ar 1 BF .hibytes 0BFFEh +000D9Br 1 BF .hibytes 0BFFFh +000D9Cr 1 C0 .hibytes 0C000h +000D9Dr 1 C0 .hibytes 0C001h +000D9Er 1 C0 .hibytes 0C002h +000D9Fr 1 C0 .hibytes 0C003h +000DA0r 1 C0 .hibytes 0C004h +000DA1r 1 C0 .hibytes 0C005h +000DA2r 1 C0 .hibytes 0C006h +000DA3r 1 C0 .hibytes 0C007h +000DA4r 1 C0 .hibytes 0C008h +000DA5r 1 C0 .hibytes 0C009h +000DA6r 1 C0 .hibytes 0C00Ah +000DA7r 1 C0 .hibytes 0C00Bh +000DA8r 1 C0 .hibytes 0C00Ch +000DA9r 1 C0 .hibytes 0C00Dh +000DAAr 1 C0 .hibytes 0C00Eh +000DABr 1 C0 .hibytes 0C00Fh +000DACr 1 CF .hibytes 0CFE1h +000DADr 1 CF .hibytes 0CFE2h +000DAEr 1 CF .hibytes 0CFE3h +000DAFr 1 CF .hibytes 0CFE4h +000DB0r 1 CF .hibytes 0CFE5h +000DB1r 1 CF .hibytes 0CFE6h +000DB2r 1 CF .hibytes 0CFE7h +000DB3r 1 CF .hibytes 0CFE8h +000DB4r 1 CF .hibytes 0CFE9h +000DB5r 1 CF .hibytes 0CFEAh +000DB6r 1 CF .hibytes 0CFEBh +000DB7r 1 CF .hibytes 0CFECh +000DB8r 1 CF .hibytes 0CFEDh +000DB9r 1 CF .hibytes 0CFEEh +000DBAr 1 CF .hibytes 0CFEFh +000DBBr 1 CF .hibytes 0CFF0h +000DBCr 1 CF .hibytes 0CFF1h +000DBDr 1 CF .hibytes 0CFF2h +000DBEr 1 CF .hibytes 0CFF3h +000DBFr 1 CF .hibytes 0CFF4h +000DC0r 1 CF .hibytes 0CFF5h +000DC1r 1 CF .hibytes 0CFF6h +000DC2r 1 CF .hibytes 0CFF7h +000DC3r 1 CF .hibytes 0CFF8h +000DC4r 1 CF .hibytes 0CFF9h +000DC5r 1 CF .hibytes 0CFFAh +000DC6r 1 CF .hibytes 0CFFBh +000DC7r 1 CF .hibytes 0CFFCh +000DC8r 1 CF .hibytes 0CFFDh +000DC9r 1 CF .hibytes 0CFFEh +000DCAr 1 CF .hibytes 0CFFFh +000DCBr 1 D0 .hibytes 0D000h +000DCCr 1 D0 .hibytes 0D001h +000DCDr 1 D0 .hibytes 0D002h +000DCEr 1 D0 .hibytes 0D003h +000DCFr 1 D0 .hibytes 0D004h +000DD0r 1 D0 .hibytes 0D005h +000DD1r 1 D0 .hibytes 0D006h +000DD2r 1 D0 .hibytes 0D007h +000DD3r 1 D0 .hibytes 0D008h +000DD4r 1 D0 .hibytes 0D009h +000DD5r 1 D0 .hibytes 0D00Ah +000DD6r 1 D0 .hibytes 0D00Bh +000DD7r 1 D0 .hibytes 0D00Ch +000DD8r 1 D0 .hibytes 0D00Dh +000DD9r 1 D0 .hibytes 0D00Eh +000DDAr 1 D0 .hibytes 0D00Fh +000DDBr 1 DF .hibytes 0DFE1h +000DDCr 1 DF .hibytes 0DFE2h +000DDDr 1 DF .hibytes 0DFE3h +000DDEr 1 DF .hibytes 0DFE4h +000DDFr 1 DF .hibytes 0DFE5h +000DE0r 1 DF .hibytes 0DFE6h +000DE1r 1 DF .hibytes 0DFE7h +000DE2r 1 DF .hibytes 0DFE8h +000DE3r 1 DF .hibytes 0DFE9h +000DE4r 1 DF .hibytes 0DFEAh +000DE5r 1 DF .hibytes 0DFEBh +000DE6r 1 DF .hibytes 0DFECh +000DE7r 1 DF .hibytes 0DFEDh +000DE8r 1 DF .hibytes 0DFEEh +000DE9r 1 DF .hibytes 0DFEFh +000DEAr 1 DF .hibytes 0DFF0h +000DEBr 1 DF .hibytes 0DFF1h +000DECr 1 DF .hibytes 0DFF2h +000DEDr 1 DF .hibytes 0DFF3h +000DEEr 1 DF .hibytes 0DFF4h +000DEFr 1 DF .hibytes 0DFF5h +000DF0r 1 DF .hibytes 0DFF6h +000DF1r 1 DF .hibytes 0DFF7h +000DF2r 1 DF .hibytes 0DFF8h +000DF3r 1 DF .hibytes 0DFF9h +000DF4r 1 DF .hibytes 0DFFAh +000DF5r 1 DF .hibytes 0DFFBh +000DF6r 1 DF .hibytes 0DFFCh +000DF7r 1 DF .hibytes 0DFFDh +000DF8r 1 DF .hibytes 0DFFEh +000DF9r 1 DF .hibytes 0DFFFh +000DFAr 1 E0 .hibytes 0E000h +000DFBr 1 E0 .hibytes 0E001h +000DFCr 1 E0 .hibytes 0E002h +000DFDr 1 E0 .hibytes 0E003h +000DFEr 1 E0 .hibytes 0E004h +000DFFr 1 E0 .hibytes 0E005h +000E00r 1 E0 .hibytes 0E006h +000E01r 1 E0 .hibytes 0E007h +000E02r 1 E0 .hibytes 0E008h +000E03r 1 E0 .hibytes 0E009h +000E04r 1 E0 .hibytes 0E00Ah +000E05r 1 E0 .hibytes 0E00Bh +000E06r 1 E0 .hibytes 0E00Ch +000E07r 1 E0 .hibytes 0E00Dh +000E08r 1 E0 .hibytes 0E00Eh +000E09r 1 E0 .hibytes 0E00Fh +000E0Ar 1 EF .hibytes 0EFE1h +000E0Br 1 EF .hibytes 0EFE2h +000E0Cr 1 EF .hibytes 0EFE3h +000E0Dr 1 EF .hibytes 0EFE4h +000E0Er 1 EF .hibytes 0EFE5h +000E0Fr 1 EF .hibytes 0EFE6h +000E10r 1 EF .hibytes 0EFE7h +000E11r 1 EF .hibytes 0EFE8h +000E12r 1 EF .hibytes 0EFE9h +000E13r 1 EF .hibytes 0EFEAh +000E14r 1 EF .hibytes 0EFEBh +000E15r 1 EF .hibytes 0EFECh +000E16r 1 EF .hibytes 0EFEDh +000E17r 1 EF .hibytes 0EFEEh +000E18r 1 EF .hibytes 0EFEFh +000E19r 1 EF .hibytes 0EFF0h +000E1Ar 1 EF .hibytes 0EFF1h +000E1Br 1 EF .hibytes 0EFF2h +000E1Cr 1 EF .hibytes 0EFF3h +000E1Dr 1 EF .hibytes 0EFF4h +000E1Er 1 EF .hibytes 0EFF5h +000E1Fr 1 EF .hibytes 0EFF6h +000E20r 1 EF .hibytes 0EFF7h +000E21r 1 EF .hibytes 0EFF8h +000E22r 1 EF .hibytes 0EFF9h +000E23r 1 EF .hibytes 0EFFAh +000E24r 1 EF .hibytes 0EFFBh +000E25r 1 EF .hibytes 0EFFCh +000E26r 1 EF .hibytes 0EFFDh +000E27r 1 EF .hibytes 0EFFEh +000E28r 1 EF .hibytes 0EFFFh +000E29r 1 F0 .hibytes 0F000h +000E2Ar 1 F0 .hibytes 0F001h +000E2Br 1 F0 .hibytes 0F002h +000E2Cr 1 F0 .hibytes 0F003h +000E2Dr 1 F0 .hibytes 0F004h +000E2Er 1 F0 .hibytes 0F005h +000E2Fr 1 F0 .hibytes 0F006h +000E30r 1 F0 .hibytes 0F007h +000E31r 1 F0 .hibytes 0F008h +000E32r 1 F0 .hibytes 0F009h +000E33r 1 F0 .hibytes 0F00Ah +000E34r 1 F0 .hibytes 0F00Bh +000E35r 1 F0 .hibytes 0F00Ch +000E36r 1 F0 .hibytes 0F00Dh +000E37r 1 F0 .hibytes 0F00Eh +000E38r 1 F0 .hibytes 0F00Fh +000E39r 1 FF .hibytes 0FFE1h +000E3Ar 1 FF .hibytes 0FFE2h +000E3Br 1 FF .hibytes 0FFE3h +000E3Cr 1 FF .hibytes 0FFE4h +000E3Dr 1 FF .hibytes 0FFE5h +000E3Er 1 FF .hibytes 0FFE6h +000E3Fr 1 FF .hibytes 0FFE7h +000E40r 1 FF .hibytes 0FFE8h +000E41r 1 FF .hibytes 0FFE9h +000E42r 1 FF .hibytes 0FFEAh +000E43r 1 FF .hibytes 0FFEBh +000E44r 1 FF .hibytes 0FFECh +000E45r 1 FF .hibytes 0FFEDh +000E46r 1 FF .hibytes 0FFEEh +000E47r 1 FF .hibytes 0FFEFh +000E48r 1 FF .hibytes 0FFF0h +000E49r 1 FF .hibytes 0FFF1h +000E4Ar 1 FF .hibytes 0FFF2h +000E4Br 1 FF .hibytes 0FFF3h +000E4Cr 1 FF .hibytes 0FFF4h +000E4Dr 1 FF .hibytes 0FFF5h +000E4Er 1 FF .hibytes 0FFF6h +000E4Fr 1 FF .hibytes 0FFF7h +000E50r 1 FF .hibytes 0FFF8h +000E51r 1 FF .hibytes 0FFF9h +000E52r 1 FF .hibytes 0FFFAh +000E53r 1 FF .hibytes 0FFFBh +000E54r 1 FF .hibytes 0FFFCh +000E55r 1 FF .hibytes 0FFFDh +000E56r 1 FF .hibytes 0FFFEh +000E57r 1 FF .hibytes 0FFFFh +000E58r 1 +000E58r 1 ; alternative 4-digit hex values +000E58r 1 00 .hibytes 0000h +000E59r 1 00 .hibytes 0001h +000E5Ar 1 00 .hibytes 0002h +000E5Br 1 00 .hibytes 0003h +000E5Cr 1 00 .hibytes 0004h +000E5Dr 1 00 .hibytes 0005h +000E5Er 1 00 .hibytes 0006h +000E5Fr 1 00 .hibytes 0007h +000E60r 1 00 .hibytes 0008h +000E61r 1 00 .hibytes 0009h +000E62r 1 00 .hibytes 000ah +000E63r 1 00 .hibytes 000bh +000E64r 1 00 .hibytes 000ch +000E65r 1 00 .hibytes 000dh +000E66r 1 00 .hibytes 000eh +000E67r 1 00 .hibytes 000fh +000E68r 1 00 .hibytes 0010h +000E69r 1 00 .hibytes 0011h +000E6Ar 1 00 .hibytes 0012h +000E6Br 1 00 .hibytes 0013h +000E6Cr 1 00 .hibytes 0070h +000E6Dr 1 00 .hibytes 0071h +000E6Er 1 00 .hibytes 0072h +000E6Fr 1 00 .hibytes 0073h +000E70r 1 00 .hibytes 0074h +000E71r 1 00 .hibytes 0075h +000E72r 1 00 .hibytes 0076h +000E73r 1 00 .hibytes 0077h +000E74r 1 00 .hibytes 0078h +000E75r 1 00 .hibytes 0079h +000E76r 1 00 .hibytes 007ah +000E77r 1 00 .hibytes 007bh +000E78r 1 00 .hibytes 007ch +000E79r 1 00 .hibytes 007dh +000E7Ar 1 00 .hibytes 007eh +000E7Br 1 00 .hibytes 007fh +000E7Cr 1 00 .hibytes 0080h +000E7Dr 1 00 .hibytes 0081h +000E7Er 1 00 .hibytes 0082h +000E7Fr 1 00 .hibytes 0083h +000E80r 1 00 .hibytes 0084h +000E81r 1 00 .hibytes 0085h +000E82r 1 00 .hibytes 0086h +000E83r 1 00 .hibytes 00f0h +000E84r 1 00 .hibytes 00f1h +000E85r 1 00 .hibytes 00f2h +000E86r 1 00 .hibytes 00f3h +000E87r 1 00 .hibytes 00f4h +000E88r 1 00 .hibytes 00f5h +000E89r 1 00 .hibytes 00f6h +000E8Ar 1 00 .hibytes 00f7h +000E8Br 1 00 .hibytes 00f8h +000E8Cr 1 00 .hibytes 00f9h +000E8Dr 1 00 .hibytes 00fah +000E8Er 1 00 .hibytes 00fbh +000E8Fr 1 00 .hibytes 00fch +000E90r 1 00 .hibytes 00fdh +000E91r 1 00 .hibytes 00feh +000E92r 1 00 .hibytes 00ffh +000E93r 1 01 .hibytes 0100h +000E94r 1 01 .hibytes 0101h +000E95r 1 01 .hibytes 0102h +000E96r 1 01 .hibytes 0103h +000E97r 1 0F .hibytes 0fd2h +000E98r 1 0F .hibytes 0fd3h +000E99r 1 0F .hibytes 0fd4h +000E9Ar 1 0F .hibytes 0fd5h +000E9Br 1 0F .hibytes 0fd6h +000E9Cr 1 0F .hibytes 0fd7h +000E9Dr 1 0F .hibytes 0fd8h +000E9Er 1 0F .hibytes 0fd9h +000E9Fr 1 0F .hibytes 0fdah +000EA0r 1 0F .hibytes 0fdbh +000EA1r 1 0F .hibytes 0fdch +000EA2r 1 0F .hibytes 0fddh +000EA3r 1 0F .hibytes 0fdeh +000EA4r 1 0F .hibytes 0fdfh +000EA5r 1 0F .hibytes 0fe0h +000EA6r 1 0F .hibytes 0fe1h +000EA7r 1 0F .hibytes 0fe2h +000EA8r 1 0F .hibytes 0fe3h +000EA9r 1 0F .hibytes 0fe4h +000EAAr 1 0F .hibytes 0fe5h +000EABr 1 0F .hibytes 0fe6h +000EACr 1 0F .hibytes 0fe7h +000EADr 1 0F .hibytes 0fe8h +000EAEr 1 0F .hibytes 0fe9h +000EAFr 1 0F .hibytes 0feah +000EB0r 1 0F .hibytes 0febh +000EB1r 1 0F .hibytes 0fech +000EB2r 1 0F .hibytes 0fedh +000EB3r 1 0F .hibytes 0feeh +000EB4r 1 0F .hibytes 0fefh +000EB5r 1 0F .hibytes 0ff0h +000EB6r 1 0F .hibytes 0ff1h +000EB7r 1 0F .hibytes 0ff2h +000EB8r 1 0F .hibytes 0ff3h +000EB9r 1 0F .hibytes 0ff4h +000EBAr 1 0F .hibytes 0ff5h +000EBBr 1 0F .hibytes 0ff6h +000EBCr 1 0F .hibytes 0ff7h +000EBDr 1 0F .hibytes 0ff8h +000EBEr 1 0F .hibytes 0ff9h +000EBFr 1 0F .hibytes 0ffah +000EC0r 1 0F .hibytes 0ffbh +000EC1r 1 0F .hibytes 0ffch +000EC2r 1 0F .hibytes 0ffdh +000EC3r 1 0F .hibytes 0ffeh +000EC4r 1 0F .hibytes 0fffh +000EC5r 1 10 .hibytes 1000h +000EC6r 1 10 .hibytes 1001h +000EC7r 1 10 .hibytes 1002h +000EC8r 1 10 .hibytes 1003h +000EC9r 1 10 .hibytes 1004h +000ECAr 1 10 .hibytes 1005h +000ECBr 1 10 .hibytes 1006h +000ECCr 1 10 .hibytes 1007h +000ECDr 1 10 .hibytes 1008h +000ECEr 1 7F .hibytes 7ff0h +000ECFr 1 7F .hibytes 7ff1h +000ED0r 1 7F .hibytes 7ff2h +000ED1r 1 7F .hibytes 7ff3h +000ED2r 1 7F .hibytes 7ff4h +000ED3r 1 7F .hibytes 7ff5h +000ED4r 1 7F .hibytes 7ff6h +000ED5r 1 7F .hibytes 7ff7h +000ED6r 1 7F .hibytes 7ff8h +000ED7r 1 7F .hibytes 7ff9h +000ED8r 1 7F .hibytes 7ffah +000ED9r 1 7F .hibytes 7ffbh +000EDAr 1 7F .hibytes 7ffch +000EDBr 1 7F .hibytes 7ffdh +000EDCr 1 7F .hibytes 7ffeh +000EDDr 1 7F .hibytes 7fffh +000EDEr 1 80 .hibytes 8000h +000EDFr 1 80 .hibytes 8001h +000EE0r 1 80 .hibytes 8002h +000EE1r 1 80 .hibytes 8003h +000EE2r 1 80 .hibytes 8004h +000EE3r 1 80 .hibytes 8005h +000EE4r 1 80 .hibytes 8006h +000EE5r 1 80 .hibytes 8007h +000EE6r 1 80 .hibytes 8008h +000EE7r 1 80 .hibytes 8009h +000EE8r 1 80 .hibytes 800ah +000EE9r 1 80 .hibytes 800bh +000EEAr 1 9F .hibytes 9fe1h +000EEBr 1 9F .hibytes 9fe2h +000EECr 1 9F .hibytes 9fe3h +000EEDr 1 9F .hibytes 9fe4h +000EEEr 1 9F .hibytes 9fe5h +000EEFr 1 9F .hibytes 9fe6h +000EF0r 1 9F .hibytes 9fe7h +000EF1r 1 9F .hibytes 9fe8h +000EF2r 1 9F .hibytes 9fe9h +000EF3r 1 9F .hibytes 9feah +000EF4r 1 9F .hibytes 9febh +000EF5r 1 9F .hibytes 9fech +000EF6r 1 9F .hibytes 9fedh +000EF7r 1 9F .hibytes 9feeh +000EF8r 1 9F .hibytes 9fefh +000EF9r 1 9F .hibytes 9ff0h +000EFAr 1 9F .hibytes 9ff1h +000EFBr 1 9F .hibytes 9ff2h +000EFCr 1 9F .hibytes 9ff3h +000EFDr 1 9F .hibytes 9ff4h +000EFEr 1 9F .hibytes 9ff5h +000EFFr 1 9F .hibytes 9ff6h +000F00r 1 9F .hibytes 9ff7h +000F01r 1 9F .hibytes 9ff8h +000F02r 1 9F .hibytes 9ff9h +000F03r 1 9F .hibytes 9ffah +000F04r 1 9F .hibytes 9ffbh +000F05r 1 9F .hibytes 9ffch +000F06r 1 9F .hibytes 9ffdh +000F07r 1 9F .hibytes 9ffeh +000F08r 1 9F .hibytes 9fffh +000F09r 1 A0 .hibytes 0a000h +000F0Ar 1 A0 .hibytes 0a001h +000F0Br 1 A0 .hibytes 0a002h +000F0Cr 1 A0 .hibytes 0a003h +000F0Dr 1 A0 .hibytes 0a004h +000F0Er 1 A0 .hibytes 0a005h +000F0Fr 1 A0 .hibytes 0a006h +000F10r 1 A0 .hibytes 0a007h +000F11r 1 A0 .hibytes 0a008h +000F12r 1 A0 .hibytes 0a009h +000F13r 1 A0 .hibytes 0a00ah +000F14r 1 A0 .hibytes 0a00bh +000F15r 1 A0 .hibytes 0a00ch +000F16r 1 A0 .hibytes 0a00dh +000F17r 1 A0 .hibytes 0a00eh +000F18r 1 A0 .hibytes 0a00fh +000F19r 1 AF .hibytes 0afe1h +000F1Ar 1 AF .hibytes 0afe2h +000F1Br 1 AF .hibytes 0afe3h +000F1Cr 1 AF .hibytes 0afe4h +000F1Dr 1 AF .hibytes 0afe5h +000F1Er 1 AF .hibytes 0afe6h +000F1Fr 1 AF .hibytes 0afe7h +000F20r 1 AF .hibytes 0afe8h +000F21r 1 AF .hibytes 0afe9h +000F22r 1 AF .hibytes 0afeah +000F23r 1 AF .hibytes 0afebh +000F24r 1 AF .hibytes 0afech +000F25r 1 AF .hibytes 0afedh +000F26r 1 AF .hibytes 0afeeh +000F27r 1 AF .hibytes 0afefh +000F28r 1 AF .hibytes 0aff0h +000F29r 1 AF .hibytes 0aff1h +000F2Ar 1 AF .hibytes 0aff2h +000F2Br 1 AF .hibytes 0aff3h +000F2Cr 1 AF .hibytes 0aff4h +000F2Dr 1 AF .hibytes 0aff5h +000F2Er 1 AF .hibytes 0aff6h +000F2Fr 1 AF .hibytes 0aff7h +000F30r 1 AF .hibytes 0aff8h +000F31r 1 AF .hibytes 0aff9h +000F32r 1 AF .hibytes 0affah +000F33r 1 AF .hibytes 0affbh +000F34r 1 AF .hibytes 0affch +000F35r 1 AF .hibytes 0affdh +000F36r 1 AF .hibytes 0affeh +000F37r 1 AF .hibytes 0afffh +000F38r 1 B0 .hibytes 0b000h +000F39r 1 B0 .hibytes 0b001h +000F3Ar 1 B0 .hibytes 0b002h +000F3Br 1 B0 .hibytes 0b003h +000F3Cr 1 B0 .hibytes 0b004h +000F3Dr 1 B0 .hibytes 0b005h +000F3Er 1 B0 .hibytes 0b006h +000F3Fr 1 B0 .hibytes 0b007h +000F40r 1 B0 .hibytes 0b008h +000F41r 1 B0 .hibytes 0b009h +000F42r 1 B0 .hibytes 0b00ah +000F43r 1 B0 .hibytes 0b00bh +000F44r 1 B0 .hibytes 0b00ch +000F45r 1 B0 .hibytes 0b00dh +000F46r 1 B0 .hibytes 0b00eh +000F47r 1 B0 .hibytes 0b00fh +000F48r 1 BF .hibytes 0bfe1h +000F49r 1 BF .hibytes 0bfe2h +000F4Ar 1 BF .hibytes 0bfe3h +000F4Br 1 BF .hibytes 0bfe4h +000F4Cr 1 BF .hibytes 0bfe5h +000F4Dr 1 BF .hibytes 0bfe6h +000F4Er 1 BF .hibytes 0bfe7h +000F4Fr 1 BF .hibytes 0bfe8h +000F50r 1 BF .hibytes 0bfe9h +000F51r 1 BF .hibytes 0bfeah +000F52r 1 BF .hibytes 0bfebh +000F53r 1 BF .hibytes 0bfech +000F54r 1 BF .hibytes 0bfedh +000F55r 1 BF .hibytes 0bfeeh +000F56r 1 BF .hibytes 0bfefh +000F57r 1 BF .hibytes 0bff0h +000F58r 1 BF .hibytes 0bff1h +000F59r 1 BF .hibytes 0bff2h +000F5Ar 1 BF .hibytes 0bff3h +000F5Br 1 BF .hibytes 0bff4h +000F5Cr 1 BF .hibytes 0bff5h +000F5Dr 1 BF .hibytes 0bff6h +000F5Er 1 BF .hibytes 0bff7h +000F5Fr 1 BF .hibytes 0bff8h +000F60r 1 BF .hibytes 0bff9h +000F61r 1 BF .hibytes 0bffah +000F62r 1 BF .hibytes 0bffbh +000F63r 1 BF .hibytes 0bffch +000F64r 1 BF .hibytes 0bffdh +000F65r 1 BF .hibytes 0bffeh +000F66r 1 BF .hibytes 0bfffh +000F67r 1 C0 .hibytes 0c000h +000F68r 1 C0 .hibytes 0c001h +000F69r 1 C0 .hibytes 0c002h +000F6Ar 1 C0 .hibytes 0c003h +000F6Br 1 C0 .hibytes 0c004h +000F6Cr 1 C0 .hibytes 0c005h +000F6Dr 1 C0 .hibytes 0c006h +000F6Er 1 C0 .hibytes 0c007h +000F6Fr 1 C0 .hibytes 0c008h +000F70r 1 C0 .hibytes 0c009h +000F71r 1 C0 .hibytes 0c00ah +000F72r 1 C0 .hibytes 0c00bh +000F73r 1 C0 .hibytes 0c00ch +000F74r 1 C0 .hibytes 0c00dh +000F75r 1 C0 .hibytes 0c00eh +000F76r 1 C0 .hibytes 0c00fh +000F77r 1 CF .hibytes 0cfe1h +000F78r 1 CF .hibytes 0cfe2h +000F79r 1 CF .hibytes 0cfe3h +000F7Ar 1 CF .hibytes 0cfe4h +000F7Br 1 CF .hibytes 0cfe5h +000F7Cr 1 CF .hibytes 0cfe6h +000F7Dr 1 CF .hibytes 0cfe7h +000F7Er 1 CF .hibytes 0cfe8h +000F7Fr 1 CF .hibytes 0cfe9h +000F80r 1 CF .hibytes 0cfeah +000F81r 1 CF .hibytes 0cfebh +000F82r 1 CF .hibytes 0cfech +000F83r 1 CF .hibytes 0cfedh +000F84r 1 CF .hibytes 0cfeeh +000F85r 1 CF .hibytes 0cfefh +000F86r 1 CF .hibytes 0cff0h +000F87r 1 CF .hibytes 0cff1h +000F88r 1 CF .hibytes 0cff2h +000F89r 1 CF .hibytes 0cff3h +000F8Ar 1 CF .hibytes 0cff4h +000F8Br 1 CF .hibytes 0cff5h +000F8Cr 1 CF .hibytes 0cff6h +000F8Dr 1 CF .hibytes 0cff7h +000F8Er 1 CF .hibytes 0cff8h +000F8Fr 1 CF .hibytes 0cff9h +000F90r 1 CF .hibytes 0cffah +000F91r 1 CF .hibytes 0cffbh +000F92r 1 CF .hibytes 0cffch +000F93r 1 CF .hibytes 0cffdh +000F94r 1 CF .hibytes 0cffeh +000F95r 1 CF .hibytes 0cfffh +000F96r 1 D0 .hibytes 0d000h +000F97r 1 D0 .hibytes 0d001h +000F98r 1 D0 .hibytes 0d002h +000F99r 1 D0 .hibytes 0d003h +000F9Ar 1 D0 .hibytes 0d004h +000F9Br 1 D0 .hibytes 0d005h +000F9Cr 1 D0 .hibytes 0d006h +000F9Dr 1 D0 .hibytes 0d007h +000F9Er 1 D0 .hibytes 0d008h +000F9Fr 1 D0 .hibytes 0d009h +000FA0r 1 D0 .hibytes 0d00ah +000FA1r 1 D0 .hibytes 0d00bh +000FA2r 1 D0 .hibytes 0d00ch +000FA3r 1 D0 .hibytes 0d00dh +000FA4r 1 D0 .hibytes 0d00eh +000FA5r 1 D0 .hibytes 0d00fh +000FA6r 1 DF .hibytes 0dfe1h +000FA7r 1 DF .hibytes 0dfe2h +000FA8r 1 DF .hibytes 0dfe3h +000FA9r 1 DF .hibytes 0dfe4h +000FAAr 1 DF .hibytes 0dfe5h +000FABr 1 DF .hibytes 0dfe6h +000FACr 1 DF .hibytes 0dfe7h +000FADr 1 DF .hibytes 0dfe8h +000FAEr 1 DF .hibytes 0dfe9h +000FAFr 1 DF .hibytes 0dfeah +000FB0r 1 DF .hibytes 0dfebh +000FB1r 1 DF .hibytes 0dfech +000FB2r 1 DF .hibytes 0dfedh +000FB3r 1 DF .hibytes 0dfeeh +000FB4r 1 DF .hibytes 0dfefh +000FB5r 1 DF .hibytes 0dff0h +000FB6r 1 DF .hibytes 0dff1h +000FB7r 1 DF .hibytes 0dff2h +000FB8r 1 DF .hibytes 0dff3h +000FB9r 1 DF .hibytes 0dff4h +000FBAr 1 DF .hibytes 0dff5h +000FBBr 1 DF .hibytes 0dff6h +000FBCr 1 DF .hibytes 0dff7h +000FBDr 1 DF .hibytes 0dff8h +000FBEr 1 DF .hibytes 0dff9h +000FBFr 1 DF .hibytes 0dffah +000FC0r 1 DF .hibytes 0dffbh +000FC1r 1 DF .hibytes 0dffch +000FC2r 1 DF .hibytes 0dffdh +000FC3r 1 DF .hibytes 0dffeh +000FC4r 1 DF .hibytes 0dfffh +000FC5r 1 E0 .hibytes 0e000h +000FC6r 1 E0 .hibytes 0e001h +000FC7r 1 E0 .hibytes 0e002h +000FC8r 1 E0 .hibytes 0e003h +000FC9r 1 E0 .hibytes 0e004h +000FCAr 1 E0 .hibytes 0e005h +000FCBr 1 E0 .hibytes 0e006h +000FCCr 1 E0 .hibytes 0e007h +000FCDr 1 E0 .hibytes 0e008h +000FCEr 1 E0 .hibytes 0e009h +000FCFr 1 E0 .hibytes 0e00ah +000FD0r 1 E0 .hibytes 0e00bh +000FD1r 1 E0 .hibytes 0e00ch +000FD2r 1 E0 .hibytes 0e00dh +000FD3r 1 E0 .hibytes 0e00eh +000FD4r 1 E0 .hibytes 0e00fh +000FD5r 1 EF .hibytes 0efe1h +000FD6r 1 EF .hibytes 0efe2h +000FD7r 1 EF .hibytes 0efe3h +000FD8r 1 EF .hibytes 0efe4h +000FD9r 1 EF .hibytes 0efe5h +000FDAr 1 EF .hibytes 0efe6h +000FDBr 1 EF .hibytes 0efe7h +000FDCr 1 EF .hibytes 0efe8h +000FDDr 1 EF .hibytes 0efe9h +000FDEr 1 EF .hibytes 0efeah +000FDFr 1 EF .hibytes 0efebh +000FE0r 1 EF .hibytes 0efech +000FE1r 1 EF .hibytes 0efedh +000FE2r 1 EF .hibytes 0efeeh +000FE3r 1 EF .hibytes 0efefh +000FE4r 1 EF .hibytes 0eff0h +000FE5r 1 EF .hibytes 0eff1h +000FE6r 1 EF .hibytes 0eff2h +000FE7r 1 EF .hibytes 0eff3h +000FE8r 1 EF .hibytes 0eff4h +000FE9r 1 EF .hibytes 0eff5h +000FEAr 1 EF .hibytes 0eff6h +000FEBr 1 EF .hibytes 0eff7h +000FECr 1 EF .hibytes 0eff8h +000FEDr 1 EF .hibytes 0eff9h +000FEEr 1 EF .hibytes 0effah +000FEFr 1 EF .hibytes 0effbh +000FF0r 1 EF .hibytes 0effch +000FF1r 1 EF .hibytes 0effdh +000FF2r 1 EF .hibytes 0effeh +000FF3r 1 EF .hibytes 0efffh +000FF4r 1 F0 .hibytes 0f000h +000FF5r 1 F0 .hibytes 0f001h +000FF6r 1 F0 .hibytes 0f002h +000FF7r 1 F0 .hibytes 0f003h +000FF8r 1 F0 .hibytes 0f004h +000FF9r 1 F0 .hibytes 0f005h +000FFAr 1 F0 .hibytes 0f006h +000FFBr 1 F0 .hibytes 0f007h +000FFCr 1 F0 .hibytes 0f008h +000FFDr 1 F0 .hibytes 0f009h +000FFEr 1 F0 .hibytes 0f00ah +000FFFr 1 F0 .hibytes 0f00bh +001000r 1 F0 .hibytes 0f00ch +001001r 1 F0 .hibytes 0f00dh +001002r 1 F0 .hibytes 0f00eh +001003r 1 F0 .hibytes 0f00fh +001004r 1 FF .hibytes 0ffe1h +001005r 1 FF .hibytes 0ffe2h +001006r 1 FF .hibytes 0ffe3h +001007r 1 FF .hibytes 0ffe4h +001008r 1 FF .hibytes 0ffe5h +001009r 1 FF .hibytes 0ffe6h +00100Ar 1 FF .hibytes 0ffe7h +00100Br 1 FF .hibytes 0ffe8h +00100Cr 1 FF .hibytes 0ffe9h +00100Dr 1 FF .hibytes 0ffeah +00100Er 1 FF .hibytes 0ffebh +00100Fr 1 FF .hibytes 0ffech +001010r 1 FF .hibytes 0ffedh +001011r 1 FF .hibytes 0ffeeh +001012r 1 FF .hibytes 0ffefh +001013r 1 FF .hibytes 0fff0h +001014r 1 FF .hibytes 0fff1h +001015r 1 FF .hibytes 0fff2h +001016r 1 FF .hibytes 0fff3h +001017r 1 FF .hibytes 0fff4h +001018r 1 FF .hibytes 0fff5h +001019r 1 FF .hibytes 0fff6h +00101Ar 1 FF .hibytes 0fff7h +00101Br 1 FF .hibytes 0fff8h +00101Cr 1 FF .hibytes 0fff9h +00101Dr 1 FF .hibytes 0fffah +00101Er 1 FF .hibytes 0fffbh +00101Fr 1 FF .hibytes 0fffch +001020r 1 FF .hibytes 0fffdh +001021r 1 FF .hibytes 0fffeh +001022r 1 FF .hibytes 0ffffh +001023r 1 +001023r 1 ; alternative 4-digit hex values, uppercase +001023r 1 00 .hibytes 0000h +001024r 1 00 .hibytes 0001h +001025r 1 00 .hibytes 0002h +001026r 1 00 .hibytes 0003h +001027r 1 00 .hibytes 0004h +001028r 1 00 .hibytes 0005h +001029r 1 00 .hibytes 0006h +00102Ar 1 00 .hibytes 0007h +00102Br 1 00 .hibytes 0008h +00102Cr 1 00 .hibytes 0009h +00102Dr 1 00 .hibytes 000Ah +00102Er 1 00 .hibytes 000Bh +00102Fr 1 00 .hibytes 000Ch +001030r 1 00 .hibytes 000Dh +001031r 1 00 .hibytes 000Eh +001032r 1 00 .hibytes 000Fh +001033r 1 00 .hibytes 0010h +001034r 1 00 .hibytes 0011h +001035r 1 00 .hibytes 0012h +001036r 1 00 .hibytes 0013h +001037r 1 00 .hibytes 0070h +001038r 1 00 .hibytes 0071h +001039r 1 00 .hibytes 0072h +00103Ar 1 00 .hibytes 0073h +00103Br 1 00 .hibytes 0074h +00103Cr 1 00 .hibytes 0075h +00103Dr 1 00 .hibytes 0076h +00103Er 1 00 .hibytes 0077h +00103Fr 1 00 .hibytes 0078h +001040r 1 00 .hibytes 0079h +001041r 1 00 .hibytes 007Ah +001042r 1 00 .hibytes 007Bh +001043r 1 00 .hibytes 007Ch +001044r 1 00 .hibytes 007Dh +001045r 1 00 .hibytes 007Eh +001046r 1 00 .hibytes 007Fh +001047r 1 00 .hibytes 0080h +001048r 1 00 .hibytes 0081h +001049r 1 00 .hibytes 0082h +00104Ar 1 00 .hibytes 0083h +00104Br 1 00 .hibytes 0084h +00104Cr 1 00 .hibytes 0085h +00104Dr 1 00 .hibytes 0086h +00104Er 1 00 .hibytes 00F0h +00104Fr 1 00 .hibytes 00F1h +001050r 1 00 .hibytes 00F2h +001051r 1 00 .hibytes 00F3h +001052r 1 00 .hibytes 00F4h +001053r 1 00 .hibytes 00F5h +001054r 1 00 .hibytes 00F6h +001055r 1 00 .hibytes 00F7h +001056r 1 00 .hibytes 00F8h +001057r 1 00 .hibytes 00F9h +001058r 1 00 .hibytes 00FAh +001059r 1 00 .hibytes 00FBh +00105Ar 1 00 .hibytes 00FCh +00105Br 1 00 .hibytes 00FDh +00105Cr 1 00 .hibytes 00FEh +00105Dr 1 00 .hibytes 00FFh +00105Er 1 01 .hibytes 0100h +00105Fr 1 01 .hibytes 0101h +001060r 1 01 .hibytes 0102h +001061r 1 01 .hibytes 0103h +001062r 1 0F .hibytes 0FD2h +001063r 1 0F .hibytes 0FD3h +001064r 1 0F .hibytes 0FD4h +001065r 1 0F .hibytes 0FD5h +001066r 1 0F .hibytes 0FD6h +001067r 1 0F .hibytes 0FD7h +001068r 1 0F .hibytes 0FD8h +001069r 1 0F .hibytes 0FD9h +00106Ar 1 0F .hibytes 0FDAh +00106Br 1 0F .hibytes 0FDBh +00106Cr 1 0F .hibytes 0FDCh +00106Dr 1 0F .hibytes 0FDDh +00106Er 1 0F .hibytes 0FDEh +00106Fr 1 0F .hibytes 0FDFh +001070r 1 0F .hibytes 0FE0h +001071r 1 0F .hibytes 0FE1h +001072r 1 0F .hibytes 0FE2h +001073r 1 0F .hibytes 0FE3h +001074r 1 0F .hibytes 0FE4h +001075r 1 0F .hibytes 0FE5h +001076r 1 0F .hibytes 0FE6h +001077r 1 0F .hibytes 0FE7h +001078r 1 0F .hibytes 0FE8h +001079r 1 0F .hibytes 0FE9h +00107Ar 1 0F .hibytes 0FEAh +00107Br 1 0F .hibytes 0FEBh +00107Cr 1 0F .hibytes 0FECh +00107Dr 1 0F .hibytes 0FEDh +00107Er 1 0F .hibytes 0FEEh +00107Fr 1 0F .hibytes 0FEFh +001080r 1 0F .hibytes 0FF0h +001081r 1 0F .hibytes 0FF1h +001082r 1 0F .hibytes 0FF2h +001083r 1 0F .hibytes 0FF3h +001084r 1 0F .hibytes 0FF4h +001085r 1 0F .hibytes 0FF5h +001086r 1 0F .hibytes 0FF6h +001087r 1 0F .hibytes 0FF7h +001088r 1 0F .hibytes 0FF8h +001089r 1 0F .hibytes 0FF9h +00108Ar 1 0F .hibytes 0FFAh +00108Br 1 0F .hibytes 0FFBh +00108Cr 1 0F .hibytes 0FFCh +00108Dr 1 0F .hibytes 0FFDh +00108Er 1 0F .hibytes 0FFEh +00108Fr 1 0F .hibytes 0FFFh +001090r 1 10 .hibytes 1000h +001091r 1 10 .hibytes 1001h +001092r 1 10 .hibytes 1002h +001093r 1 10 .hibytes 1003h +001094r 1 10 .hibytes 1004h +001095r 1 10 .hibytes 1005h +001096r 1 10 .hibytes 1006h +001097r 1 10 .hibytes 1007h +001098r 1 10 .hibytes 1008h +001099r 1 7F .hibytes 7FF0h +00109Ar 1 7F .hibytes 7FF1h +00109Br 1 7F .hibytes 7FF2h +00109Cr 1 7F .hibytes 7FF3h +00109Dr 1 7F .hibytes 7FF4h +00109Er 1 7F .hibytes 7FF5h +00109Fr 1 7F .hibytes 7FF6h +0010A0r 1 7F .hibytes 7FF7h +0010A1r 1 7F .hibytes 7FF8h +0010A2r 1 7F .hibytes 7FF9h +0010A3r 1 7F .hibytes 7FFAh +0010A4r 1 7F .hibytes 7FFBh +0010A5r 1 7F .hibytes 7FFCh +0010A6r 1 7F .hibytes 7FFDh +0010A7r 1 7F .hibytes 7FFEh +0010A8r 1 7F .hibytes 7FFFh +0010A9r 1 80 .hibytes 8000h +0010AAr 1 80 .hibytes 8001h +0010ABr 1 80 .hibytes 8002h +0010ACr 1 80 .hibytes 8003h +0010ADr 1 80 .hibytes 8004h +0010AEr 1 80 .hibytes 8005h +0010AFr 1 80 .hibytes 8006h +0010B0r 1 80 .hibytes 8007h +0010B1r 1 80 .hibytes 8008h +0010B2r 1 80 .hibytes 8009h +0010B3r 1 80 .hibytes 800Ah +0010B4r 1 80 .hibytes 800Bh +0010B5r 1 9F .hibytes 9FE1h +0010B6r 1 9F .hibytes 9FE2h +0010B7r 1 9F .hibytes 9FE3h +0010B8r 1 9F .hibytes 9FE4h +0010B9r 1 9F .hibytes 9FE5h +0010BAr 1 9F .hibytes 9FE6h +0010BBr 1 9F .hibytes 9FE7h +0010BCr 1 9F .hibytes 9FE8h +0010BDr 1 9F .hibytes 9FE9h +0010BEr 1 9F .hibytes 9FEAh +0010BFr 1 9F .hibytes 9FEBh +0010C0r 1 9F .hibytes 9FECh +0010C1r 1 9F .hibytes 9FEDh +0010C2r 1 9F .hibytes 9FEEh +0010C3r 1 9F .hibytes 9FEFh +0010C4r 1 9F .hibytes 9FF0h +0010C5r 1 9F .hibytes 9FF1h +0010C6r 1 9F .hibytes 9FF2h +0010C7r 1 9F .hibytes 9FF3h +0010C8r 1 9F .hibytes 9FF4h +0010C9r 1 9F .hibytes 9FF5h +0010CAr 1 9F .hibytes 9FF6h +0010CBr 1 9F .hibytes 9FF7h +0010CCr 1 9F .hibytes 9FF8h +0010CDr 1 9F .hibytes 9FF9h +0010CEr 1 9F .hibytes 9FFAh +0010CFr 1 9F .hibytes 9FFBh +0010D0r 1 9F .hibytes 9FFCh +0010D1r 1 9F .hibytes 9FFDh +0010D2r 1 9F .hibytes 9FFEh +0010D3r 1 9F .hibytes 9FFFh +0010D4r 1 A0 .hibytes 0A000h +0010D5r 1 A0 .hibytes 0A001h +0010D6r 1 A0 .hibytes 0A002h +0010D7r 1 A0 .hibytes 0A003h +0010D8r 1 A0 .hibytes 0A004h +0010D9r 1 A0 .hibytes 0A005h +0010DAr 1 A0 .hibytes 0A006h +0010DBr 1 A0 .hibytes 0A007h +0010DCr 1 A0 .hibytes 0A008h +0010DDr 1 A0 .hibytes 0A009h +0010DEr 1 A0 .hibytes 0A00Ah +0010DFr 1 A0 .hibytes 0A00Bh +0010E0r 1 A0 .hibytes 0A00Ch +0010E1r 1 A0 .hibytes 0A00Dh +0010E2r 1 A0 .hibytes 0A00Eh +0010E3r 1 A0 .hibytes 0A00Fh +0010E4r 1 AF .hibytes 0AFE1h +0010E5r 1 AF .hibytes 0AFE2h +0010E6r 1 AF .hibytes 0AFE3h +0010E7r 1 AF .hibytes 0AFE4h +0010E8r 1 AF .hibytes 0AFE5h +0010E9r 1 AF .hibytes 0AFE6h +0010EAr 1 AF .hibytes 0AFE7h +0010EBr 1 AF .hibytes 0AFE8h +0010ECr 1 AF .hibytes 0AFE9h +0010EDr 1 AF .hibytes 0AFEAh +0010EEr 1 AF .hibytes 0AFEBh +0010EFr 1 AF .hibytes 0AFECh +0010F0r 1 AF .hibytes 0AFEDh +0010F1r 1 AF .hibytes 0AFEEh +0010F2r 1 AF .hibytes 0AFEFh +0010F3r 1 AF .hibytes 0AFF0h +0010F4r 1 AF .hibytes 0AFF1h +0010F5r 1 AF .hibytes 0AFF2h +0010F6r 1 AF .hibytes 0AFF3h +0010F7r 1 AF .hibytes 0AFF4h +0010F8r 1 AF .hibytes 0AFF5h +0010F9r 1 AF .hibytes 0AFF6h +0010FAr 1 AF .hibytes 0AFF7h +0010FBr 1 AF .hibytes 0AFF8h +0010FCr 1 AF .hibytes 0AFF9h +0010FDr 1 AF .hibytes 0AFFAh +0010FEr 1 AF .hibytes 0AFFBh +0010FFr 1 AF .hibytes 0AFFCh +001100r 1 AF .hibytes 0AFFDh +001101r 1 AF .hibytes 0AFFEh +001102r 1 AF .hibytes 0AFFFh +001103r 1 B0 .hibytes 0B000h +001104r 1 B0 .hibytes 0B001h +001105r 1 B0 .hibytes 0B002h +001106r 1 B0 .hibytes 0B003h +001107r 1 B0 .hibytes 0B004h +001108r 1 B0 .hibytes 0B005h +001109r 1 B0 .hibytes 0B006h +00110Ar 1 B0 .hibytes 0B007h +00110Br 1 B0 .hibytes 0B008h +00110Cr 1 B0 .hibytes 0B009h +00110Dr 1 B0 .hibytes 0B00Ah +00110Er 1 B0 .hibytes 0B00Bh +00110Fr 1 B0 .hibytes 0B00Ch +001110r 1 B0 .hibytes 0B00Dh +001111r 1 B0 .hibytes 0B00Eh +001112r 1 B0 .hibytes 0B00Fh +001113r 1 BF .hibytes 0BFE1h +001114r 1 BF .hibytes 0BFE2h +001115r 1 BF .hibytes 0BFE3h +001116r 1 BF .hibytes 0BFE4h +001117r 1 BF .hibytes 0BFE5h +001118r 1 BF .hibytes 0BFE6h +001119r 1 BF .hibytes 0BFE7h +00111Ar 1 BF .hibytes 0BFE8h +00111Br 1 BF .hibytes 0BFE9h +00111Cr 1 BF .hibytes 0BFEAh +00111Dr 1 BF .hibytes 0BFEBh +00111Er 1 BF .hibytes 0BFECh +00111Fr 1 BF .hibytes 0BFEDh +001120r 1 BF .hibytes 0BFEEh +001121r 1 BF .hibytes 0BFEFh +001122r 1 BF .hibytes 0BFF0h +001123r 1 BF .hibytes 0BFF1h +001124r 1 BF .hibytes 0BFF2h +001125r 1 BF .hibytes 0BFF3h +001126r 1 BF .hibytes 0BFF4h +001127r 1 BF .hibytes 0BFF5h +001128r 1 BF .hibytes 0BFF6h +001129r 1 BF .hibytes 0BFF7h +00112Ar 1 BF .hibytes 0BFF8h +00112Br 1 BF .hibytes 0BFF9h +00112Cr 1 BF .hibytes 0BFFAh +00112Dr 1 BF .hibytes 0BFFBh +00112Er 1 BF .hibytes 0BFFCh +00112Fr 1 BF .hibytes 0BFFDh +001130r 1 BF .hibytes 0BFFEh +001131r 1 BF .hibytes 0BFFFh +001132r 1 C0 .hibytes 0C000h +001133r 1 C0 .hibytes 0C001h +001134r 1 C0 .hibytes 0C002h +001135r 1 C0 .hibytes 0C003h +001136r 1 C0 .hibytes 0C004h +001137r 1 C0 .hibytes 0C005h +001138r 1 C0 .hibytes 0C006h +001139r 1 C0 .hibytes 0C007h +00113Ar 1 C0 .hibytes 0C008h +00113Br 1 C0 .hibytes 0C009h +00113Cr 1 C0 .hibytes 0C00Ah +00113Dr 1 C0 .hibytes 0C00Bh +00113Er 1 C0 .hibytes 0C00Ch +00113Fr 1 C0 .hibytes 0C00Dh +001140r 1 C0 .hibytes 0C00Eh +001141r 1 C0 .hibytes 0C00Fh +001142r 1 CF .hibytes 0CFE1h +001143r 1 CF .hibytes 0CFE2h +001144r 1 CF .hibytes 0CFE3h +001145r 1 CF .hibytes 0CFE4h +001146r 1 CF .hibytes 0CFE5h +001147r 1 CF .hibytes 0CFE6h +001148r 1 CF .hibytes 0CFE7h +001149r 1 CF .hibytes 0CFE8h +00114Ar 1 CF .hibytes 0CFE9h +00114Br 1 CF .hibytes 0CFEAh +00114Cr 1 CF .hibytes 0CFEBh +00114Dr 1 CF .hibytes 0CFECh +00114Er 1 CF .hibytes 0CFEDh +00114Fr 1 CF .hibytes 0CFEEh +001150r 1 CF .hibytes 0CFEFh +001151r 1 CF .hibytes 0CFF0h +001152r 1 CF .hibytes 0CFF1h +001153r 1 CF .hibytes 0CFF2h +001154r 1 CF .hibytes 0CFF3h +001155r 1 CF .hibytes 0CFF4h +001156r 1 CF .hibytes 0CFF5h +001157r 1 CF .hibytes 0CFF6h +001158r 1 CF .hibytes 0CFF7h +001159r 1 CF .hibytes 0CFF8h +00115Ar 1 CF .hibytes 0CFF9h +00115Br 1 CF .hibytes 0CFFAh +00115Cr 1 CF .hibytes 0CFFBh +00115Dr 1 CF .hibytes 0CFFCh +00115Er 1 CF .hibytes 0CFFDh +00115Fr 1 CF .hibytes 0CFFEh +001160r 1 CF .hibytes 0CFFFh +001161r 1 D0 .hibytes 0D000h +001162r 1 D0 .hibytes 0D001h +001163r 1 D0 .hibytes 0D002h +001164r 1 D0 .hibytes 0D003h +001165r 1 D0 .hibytes 0D004h +001166r 1 D0 .hibytes 0D005h +001167r 1 D0 .hibytes 0D006h +001168r 1 D0 .hibytes 0D007h +001169r 1 D0 .hibytes 0D008h +00116Ar 1 D0 .hibytes 0D009h +00116Br 1 D0 .hibytes 0D00Ah +00116Cr 1 D0 .hibytes 0D00Bh +00116Dr 1 D0 .hibytes 0D00Ch +00116Er 1 D0 .hibytes 0D00Dh +00116Fr 1 D0 .hibytes 0D00Eh +001170r 1 D0 .hibytes 0D00Fh +001171r 1 DF .hibytes 0DFE1h +001172r 1 DF .hibytes 0DFE2h +001173r 1 DF .hibytes 0DFE3h +001174r 1 DF .hibytes 0DFE4h +001175r 1 DF .hibytes 0DFE5h +001176r 1 DF .hibytes 0DFE6h +001177r 1 DF .hibytes 0DFE7h +001178r 1 DF .hibytes 0DFE8h +001179r 1 DF .hibytes 0DFE9h +00117Ar 1 DF .hibytes 0DFEAh +00117Br 1 DF .hibytes 0DFEBh +00117Cr 1 DF .hibytes 0DFECh +00117Dr 1 DF .hibytes 0DFEDh +00117Er 1 DF .hibytes 0DFEEh +00117Fr 1 DF .hibytes 0DFEFh +001180r 1 DF .hibytes 0DFF0h +001181r 1 DF .hibytes 0DFF1h +001182r 1 DF .hibytes 0DFF2h +001183r 1 DF .hibytes 0DFF3h +001184r 1 DF .hibytes 0DFF4h +001185r 1 DF .hibytes 0DFF5h +001186r 1 DF .hibytes 0DFF6h +001187r 1 DF .hibytes 0DFF7h +001188r 1 DF .hibytes 0DFF8h +001189r 1 DF .hibytes 0DFF9h +00118Ar 1 DF .hibytes 0DFFAh +00118Br 1 DF .hibytes 0DFFBh +00118Cr 1 DF .hibytes 0DFFCh +00118Dr 1 DF .hibytes 0DFFDh +00118Er 1 DF .hibytes 0DFFEh +00118Fr 1 DF .hibytes 0DFFFh +001190r 1 E0 .hibytes 0E000h +001191r 1 E0 .hibytes 0E001h +001192r 1 E0 .hibytes 0E002h +001193r 1 E0 .hibytes 0E003h +001194r 1 E0 .hibytes 0E004h +001195r 1 E0 .hibytes 0E005h +001196r 1 E0 .hibytes 0E006h +001197r 1 E0 .hibytes 0E007h +001198r 1 E0 .hibytes 0E008h +001199r 1 E0 .hibytes 0E009h +00119Ar 1 E0 .hibytes 0E00Ah +00119Br 1 E0 .hibytes 0E00Bh +00119Cr 1 E0 .hibytes 0E00Ch +00119Dr 1 E0 .hibytes 0E00Dh +00119Er 1 E0 .hibytes 0E00Eh +00119Fr 1 E0 .hibytes 0E00Fh +0011A0r 1 EF .hibytes 0EFE1h +0011A1r 1 EF .hibytes 0EFE2h +0011A2r 1 EF .hibytes 0EFE3h +0011A3r 1 EF .hibytes 0EFE4h +0011A4r 1 EF .hibytes 0EFE5h +0011A5r 1 EF .hibytes 0EFE6h +0011A6r 1 EF .hibytes 0EFE7h +0011A7r 1 EF .hibytes 0EFE8h +0011A8r 1 EF .hibytes 0EFE9h +0011A9r 1 EF .hibytes 0EFEAh +0011AAr 1 EF .hibytes 0EFEBh +0011ABr 1 EF .hibytes 0EFECh +0011ACr 1 EF .hibytes 0EFEDh +0011ADr 1 EF .hibytes 0EFEEh +0011AEr 1 EF .hibytes 0EFEFh +0011AFr 1 EF .hibytes 0EFF0h +0011B0r 1 EF .hibytes 0EFF1h +0011B1r 1 EF .hibytes 0EFF2h +0011B2r 1 EF .hibytes 0EFF3h +0011B3r 1 EF .hibytes 0EFF4h +0011B4r 1 EF .hibytes 0EFF5h +0011B5r 1 EF .hibytes 0EFF6h +0011B6r 1 EF .hibytes 0EFF7h +0011B7r 1 EF .hibytes 0EFF8h +0011B8r 1 EF .hibytes 0EFF9h +0011B9r 1 EF .hibytes 0EFFAh +0011BAr 1 EF .hibytes 0EFFBh +0011BBr 1 EF .hibytes 0EFFCh +0011BCr 1 EF .hibytes 0EFFDh +0011BDr 1 EF .hibytes 0EFFEh +0011BEr 1 EF .hibytes 0EFFFh +0011BFr 1 F0 .hibytes 0F000h +0011C0r 1 F0 .hibytes 0F001h +0011C1r 1 F0 .hibytes 0F002h +0011C2r 1 F0 .hibytes 0F003h +0011C3r 1 F0 .hibytes 0F004h +0011C4r 1 F0 .hibytes 0F005h +0011C5r 1 F0 .hibytes 0F006h +0011C6r 1 F0 .hibytes 0F007h +0011C7r 1 F0 .hibytes 0F008h +0011C8r 1 F0 .hibytes 0F009h +0011C9r 1 F0 .hibytes 0F00Ah +0011CAr 1 F0 .hibytes 0F00Bh +0011CBr 1 F0 .hibytes 0F00Ch +0011CCr 1 F0 .hibytes 0F00Dh +0011CDr 1 F0 .hibytes 0F00Eh +0011CEr 1 F0 .hibytes 0F00Fh +0011CFr 1 FF .hibytes 0FFE1h +0011D0r 1 FF .hibytes 0FFE2h +0011D1r 1 FF .hibytes 0FFE3h +0011D2r 1 FF .hibytes 0FFE4h +0011D3r 1 FF .hibytes 0FFE5h +0011D4r 1 FF .hibytes 0FFE6h +0011D5r 1 FF .hibytes 0FFE7h +0011D6r 1 FF .hibytes 0FFE8h +0011D7r 1 FF .hibytes 0FFE9h +0011D8r 1 FF .hibytes 0FFEAh +0011D9r 1 FF .hibytes 0FFEBh +0011DAr 1 FF .hibytes 0FFECh +0011DBr 1 FF .hibytes 0FFEDh +0011DCr 1 FF .hibytes 0FFEEh +0011DDr 1 FF .hibytes 0FFEFh +0011DEr 1 FF .hibytes 0FFF0h +0011DFr 1 FF .hibytes 0FFF1h +0011E0r 1 FF .hibytes 0FFF2h +0011E1r 1 FF .hibytes 0FFF3h +0011E2r 1 FF .hibytes 0FFF4h +0011E3r 1 FF .hibytes 0FFF5h +0011E4r 1 FF .hibytes 0FFF6h +0011E5r 1 FF .hibytes 0FFF7h +0011E6r 1 FF .hibytes 0FFF8h +0011E7r 1 FF .hibytes 0FFF9h +0011E8r 1 FF .hibytes 0FFFAh +0011E9r 1 FF .hibytes 0FFFBh +0011EAr 1 FF .hibytes 0FFFCh +0011EBr 1 FF .hibytes 0FFFDh +0011ECr 1 FF .hibytes 0FFFEh +0011EDr 1 FF .hibytes 0FFFFh +0011EEr 1 +0011EEr 1 ; alternative hex values, always leading zero +0011EEr 1 00 .hibytes 00h +0011EFr 1 00 .hibytes 01h +0011F0r 1 00 .hibytes 02h +0011F1r 1 00 .hibytes 03h +0011F2r 1 00 .hibytes 04h +0011F3r 1 00 .hibytes 05h +0011F4r 1 00 .hibytes 06h +0011F5r 1 00 .hibytes 07h +0011F6r 1 00 .hibytes 08h +0011F7r 1 00 .hibytes 09h +0011F8r 1 00 .hibytes 0ah +0011F9r 1 00 .hibytes 0bh +0011FAr 1 00 .hibytes 0ch +0011FBr 1 00 .hibytes 0dh +0011FCr 1 00 .hibytes 0eh +0011FDr 1 00 .hibytes 0fh +0011FEr 1 00 .hibytes 010h +0011FFr 1 00 .hibytes 011h +001200r 1 00 .hibytes 012h +001201r 1 00 .hibytes 013h +001202r 1 00 .hibytes 070h +001203r 1 00 .hibytes 071h +001204r 1 00 .hibytes 072h +001205r 1 00 .hibytes 073h +001206r 1 00 .hibytes 074h +001207r 1 00 .hibytes 075h +001208r 1 00 .hibytes 076h +001209r 1 00 .hibytes 077h +00120Ar 1 00 .hibytes 078h +00120Br 1 00 .hibytes 079h +00120Cr 1 00 .hibytes 07ah +00120Dr 1 00 .hibytes 07bh +00120Er 1 00 .hibytes 07ch +00120Fr 1 00 .hibytes 07dh +001210r 1 00 .hibytes 07eh +001211r 1 00 .hibytes 07fh +001212r 1 00 .hibytes 080h +001213r 1 00 .hibytes 081h +001214r 1 00 .hibytes 082h +001215r 1 00 .hibytes 083h +001216r 1 00 .hibytes 084h +001217r 1 00 .hibytes 085h +001218r 1 00 .hibytes 086h +001219r 1 00 .hibytes 0f0h +00121Ar 1 00 .hibytes 0f1h +00121Br 1 00 .hibytes 0f2h +00121Cr 1 00 .hibytes 0f3h +00121Dr 1 00 .hibytes 0f4h +00121Er 1 00 .hibytes 0f5h +00121Fr 1 00 .hibytes 0f6h +001220r 1 00 .hibytes 0f7h +001221r 1 00 .hibytes 0f8h +001222r 1 00 .hibytes 0f9h +001223r 1 00 .hibytes 0fah +001224r 1 00 .hibytes 0fbh +001225r 1 00 .hibytes 0fch +001226r 1 00 .hibytes 0fdh +001227r 1 00 .hibytes 0feh +001228r 1 00 .hibytes 0ffh +001229r 1 01 .hibytes 0100h +00122Ar 1 01 .hibytes 0101h +00122Br 1 01 .hibytes 0102h +00122Cr 1 01 .hibytes 0103h +00122Dr 1 0F .hibytes 0fd2h +00122Er 1 0F .hibytes 0fd3h +00122Fr 1 0F .hibytes 0fd4h +001230r 1 0F .hibytes 0fd5h +001231r 1 0F .hibytes 0fd6h +001232r 1 0F .hibytes 0fd7h +001233r 1 0F .hibytes 0fd8h +001234r 1 0F .hibytes 0fd9h +001235r 1 0F .hibytes 0fdah +001236r 1 0F .hibytes 0fdbh +001237r 1 0F .hibytes 0fdch +001238r 1 0F .hibytes 0fddh +001239r 1 0F .hibytes 0fdeh +00123Ar 1 0F .hibytes 0fdfh +00123Br 1 0F .hibytes 0fe0h +00123Cr 1 0F .hibytes 0fe1h +00123Dr 1 0F .hibytes 0fe2h +00123Er 1 0F .hibytes 0fe3h +00123Fr 1 0F .hibytes 0fe4h +001240r 1 0F .hibytes 0fe5h +001241r 1 0F .hibytes 0fe6h +001242r 1 0F .hibytes 0fe7h +001243r 1 0F .hibytes 0fe8h +001244r 1 0F .hibytes 0fe9h +001245r 1 0F .hibytes 0feah +001246r 1 0F .hibytes 0febh +001247r 1 0F .hibytes 0fech +001248r 1 0F .hibytes 0fedh +001249r 1 0F .hibytes 0feeh +00124Ar 1 0F .hibytes 0fefh +00124Br 1 0F .hibytes 0ff0h +00124Cr 1 0F .hibytes 0ff1h +00124Dr 1 0F .hibytes 0ff2h +00124Er 1 0F .hibytes 0ff3h +00124Fr 1 0F .hibytes 0ff4h +001250r 1 0F .hibytes 0ff5h +001251r 1 0F .hibytes 0ff6h +001252r 1 0F .hibytes 0ff7h +001253r 1 0F .hibytes 0ff8h +001254r 1 0F .hibytes 0ff9h +001255r 1 0F .hibytes 0ffah +001256r 1 0F .hibytes 0ffbh +001257r 1 0F .hibytes 0ffch +001258r 1 0F .hibytes 0ffdh +001259r 1 0F .hibytes 0ffeh +00125Ar 1 0F .hibytes 0fffh +00125Br 1 10 .hibytes 01000h +00125Cr 1 10 .hibytes 01001h +00125Dr 1 10 .hibytes 01002h +00125Er 1 10 .hibytes 01003h +00125Fr 1 10 .hibytes 01004h +001260r 1 10 .hibytes 01005h +001261r 1 10 .hibytes 01006h +001262r 1 10 .hibytes 01007h +001263r 1 10 .hibytes 01008h +001264r 1 7F .hibytes 07ff0h +001265r 1 7F .hibytes 07ff1h +001266r 1 7F .hibytes 07ff2h +001267r 1 7F .hibytes 07ff3h +001268r 1 7F .hibytes 07ff4h +001269r 1 7F .hibytes 07ff5h +00126Ar 1 7F .hibytes 07ff6h +00126Br 1 7F .hibytes 07ff7h +00126Cr 1 7F .hibytes 07ff8h +00126Dr 1 7F .hibytes 07ff9h +00126Er 1 7F .hibytes 07ffah +00126Fr 1 7F .hibytes 07ffbh +001270r 1 7F .hibytes 07ffch +001271r 1 7F .hibytes 07ffdh +001272r 1 7F .hibytes 07ffeh +001273r 1 7F .hibytes 07fffh +001274r 1 80 .hibytes 08000h +001275r 1 80 .hibytes 08001h +001276r 1 80 .hibytes 08002h +001277r 1 80 .hibytes 08003h +001278r 1 80 .hibytes 08004h +001279r 1 80 .hibytes 08005h +00127Ar 1 80 .hibytes 08006h +00127Br 1 80 .hibytes 08007h +00127Cr 1 80 .hibytes 08008h +00127Dr 1 80 .hibytes 08009h +00127Er 1 80 .hibytes 0800ah +00127Fr 1 80 .hibytes 0800bh +001280r 1 9F .hibytes 09fe1h +001281r 1 9F .hibytes 09fe2h +001282r 1 9F .hibytes 09fe3h +001283r 1 9F .hibytes 09fe4h +001284r 1 9F .hibytes 09fe5h +001285r 1 9F .hibytes 09fe6h +001286r 1 9F .hibytes 09fe7h +001287r 1 9F .hibytes 09fe8h +001288r 1 9F .hibytes 09fe9h +001289r 1 9F .hibytes 09feah +00128Ar 1 9F .hibytes 09febh +00128Br 1 9F .hibytes 09fech +00128Cr 1 9F .hibytes 09fedh +00128Dr 1 9F .hibytes 09feeh +00128Er 1 9F .hibytes 09fefh +00128Fr 1 9F .hibytes 09ff0h +001290r 1 9F .hibytes 09ff1h +001291r 1 9F .hibytes 09ff2h +001292r 1 9F .hibytes 09ff3h +001293r 1 9F .hibytes 09ff4h +001294r 1 9F .hibytes 09ff5h +001295r 1 9F .hibytes 09ff6h +001296r 1 9F .hibytes 09ff7h +001297r 1 9F .hibytes 09ff8h +001298r 1 9F .hibytes 09ff9h +001299r 1 9F .hibytes 09ffah +00129Ar 1 9F .hibytes 09ffbh +00129Br 1 9F .hibytes 09ffch +00129Cr 1 9F .hibytes 09ffdh +00129Dr 1 9F .hibytes 09ffeh +00129Er 1 9F .hibytes 09fffh +00129Fr 1 A0 .hibytes 0a000h +0012A0r 1 A0 .hibytes 0a001h +0012A1r 1 A0 .hibytes 0a002h +0012A2r 1 A0 .hibytes 0a003h +0012A3r 1 A0 .hibytes 0a004h +0012A4r 1 A0 .hibytes 0a005h +0012A5r 1 A0 .hibytes 0a006h +0012A6r 1 A0 .hibytes 0a007h +0012A7r 1 A0 .hibytes 0a008h +0012A8r 1 A0 .hibytes 0a009h +0012A9r 1 A0 .hibytes 0a00ah +0012AAr 1 A0 .hibytes 0a00bh +0012ABr 1 A0 .hibytes 0a00ch +0012ACr 1 A0 .hibytes 0a00dh +0012ADr 1 A0 .hibytes 0a00eh +0012AEr 1 A0 .hibytes 0a00fh +0012AFr 1 AF .hibytes 0afe1h +0012B0r 1 AF .hibytes 0afe2h +0012B1r 1 AF .hibytes 0afe3h +0012B2r 1 AF .hibytes 0afe4h +0012B3r 1 AF .hibytes 0afe5h +0012B4r 1 AF .hibytes 0afe6h +0012B5r 1 AF .hibytes 0afe7h +0012B6r 1 AF .hibytes 0afe8h +0012B7r 1 AF .hibytes 0afe9h +0012B8r 1 AF .hibytes 0afeah +0012B9r 1 AF .hibytes 0afebh +0012BAr 1 AF .hibytes 0afech +0012BBr 1 AF .hibytes 0afedh +0012BCr 1 AF .hibytes 0afeeh +0012BDr 1 AF .hibytes 0afefh +0012BEr 1 AF .hibytes 0aff0h +0012BFr 1 AF .hibytes 0aff1h +0012C0r 1 AF .hibytes 0aff2h +0012C1r 1 AF .hibytes 0aff3h +0012C2r 1 AF .hibytes 0aff4h +0012C3r 1 AF .hibytes 0aff5h +0012C4r 1 AF .hibytes 0aff6h +0012C5r 1 AF .hibytes 0aff7h +0012C6r 1 AF .hibytes 0aff8h +0012C7r 1 AF .hibytes 0aff9h +0012C8r 1 AF .hibytes 0affah +0012C9r 1 AF .hibytes 0affbh +0012CAr 1 AF .hibytes 0affch +0012CBr 1 AF .hibytes 0affdh +0012CCr 1 AF .hibytes 0affeh +0012CDr 1 AF .hibytes 0afffh +0012CEr 1 B0 .hibytes 0b000h +0012CFr 1 B0 .hibytes 0b001h +0012D0r 1 B0 .hibytes 0b002h +0012D1r 1 B0 .hibytes 0b003h +0012D2r 1 B0 .hibytes 0b004h +0012D3r 1 B0 .hibytes 0b005h +0012D4r 1 B0 .hibytes 0b006h +0012D5r 1 B0 .hibytes 0b007h +0012D6r 1 B0 .hibytes 0b008h +0012D7r 1 B0 .hibytes 0b009h +0012D8r 1 B0 .hibytes 0b00ah +0012D9r 1 B0 .hibytes 0b00bh +0012DAr 1 B0 .hibytes 0b00ch +0012DBr 1 B0 .hibytes 0b00dh +0012DCr 1 B0 .hibytes 0b00eh +0012DDr 1 B0 .hibytes 0b00fh +0012DEr 1 BF .hibytes 0bfe1h +0012DFr 1 BF .hibytes 0bfe2h +0012E0r 1 BF .hibytes 0bfe3h +0012E1r 1 BF .hibytes 0bfe4h +0012E2r 1 BF .hibytes 0bfe5h +0012E3r 1 BF .hibytes 0bfe6h +0012E4r 1 BF .hibytes 0bfe7h +0012E5r 1 BF .hibytes 0bfe8h +0012E6r 1 BF .hibytes 0bfe9h +0012E7r 1 BF .hibytes 0bfeah +0012E8r 1 BF .hibytes 0bfebh +0012E9r 1 BF .hibytes 0bfech +0012EAr 1 BF .hibytes 0bfedh +0012EBr 1 BF .hibytes 0bfeeh +0012ECr 1 BF .hibytes 0bfefh +0012EDr 1 BF .hibytes 0bff0h +0012EEr 1 BF .hibytes 0bff1h +0012EFr 1 BF .hibytes 0bff2h +0012F0r 1 BF .hibytes 0bff3h +0012F1r 1 BF .hibytes 0bff4h +0012F2r 1 BF .hibytes 0bff5h +0012F3r 1 BF .hibytes 0bff6h +0012F4r 1 BF .hibytes 0bff7h +0012F5r 1 BF .hibytes 0bff8h +0012F6r 1 BF .hibytes 0bff9h +0012F7r 1 BF .hibytes 0bffah +0012F8r 1 BF .hibytes 0bffbh +0012F9r 1 BF .hibytes 0bffch +0012FAr 1 BF .hibytes 0bffdh +0012FBr 1 BF .hibytes 0bffeh +0012FCr 1 BF .hibytes 0bfffh +0012FDr 1 C0 .hibytes 0c000h +0012FEr 1 C0 .hibytes 0c001h +0012FFr 1 C0 .hibytes 0c002h +001300r 1 C0 .hibytes 0c003h +001301r 1 C0 .hibytes 0c004h +001302r 1 C0 .hibytes 0c005h +001303r 1 C0 .hibytes 0c006h +001304r 1 C0 .hibytes 0c007h +001305r 1 C0 .hibytes 0c008h +001306r 1 C0 .hibytes 0c009h +001307r 1 C0 .hibytes 0c00ah +001308r 1 C0 .hibytes 0c00bh +001309r 1 C0 .hibytes 0c00ch +00130Ar 1 C0 .hibytes 0c00dh +00130Br 1 C0 .hibytes 0c00eh +00130Cr 1 C0 .hibytes 0c00fh +00130Dr 1 CF .hibytes 0cfe1h +00130Er 1 CF .hibytes 0cfe2h +00130Fr 1 CF .hibytes 0cfe3h +001310r 1 CF .hibytes 0cfe4h +001311r 1 CF .hibytes 0cfe5h +001312r 1 CF .hibytes 0cfe6h +001313r 1 CF .hibytes 0cfe7h +001314r 1 CF .hibytes 0cfe8h +001315r 1 CF .hibytes 0cfe9h +001316r 1 CF .hibytes 0cfeah +001317r 1 CF .hibytes 0cfebh +001318r 1 CF .hibytes 0cfech +001319r 1 CF .hibytes 0cfedh +00131Ar 1 CF .hibytes 0cfeeh +00131Br 1 CF .hibytes 0cfefh +00131Cr 1 CF .hibytes 0cff0h +00131Dr 1 CF .hibytes 0cff1h +00131Er 1 CF .hibytes 0cff2h +00131Fr 1 CF .hibytes 0cff3h +001320r 1 CF .hibytes 0cff4h +001321r 1 CF .hibytes 0cff5h +001322r 1 CF .hibytes 0cff6h +001323r 1 CF .hibytes 0cff7h +001324r 1 CF .hibytes 0cff8h +001325r 1 CF .hibytes 0cff9h +001326r 1 CF .hibytes 0cffah +001327r 1 CF .hibytes 0cffbh +001328r 1 CF .hibytes 0cffch +001329r 1 CF .hibytes 0cffdh +00132Ar 1 CF .hibytes 0cffeh +00132Br 1 CF .hibytes 0cfffh +00132Cr 1 D0 .hibytes 0d000h +00132Dr 1 D0 .hibytes 0d001h +00132Er 1 D0 .hibytes 0d002h +00132Fr 1 D0 .hibytes 0d003h +001330r 1 D0 .hibytes 0d004h +001331r 1 D0 .hibytes 0d005h +001332r 1 D0 .hibytes 0d006h +001333r 1 D0 .hibytes 0d007h +001334r 1 D0 .hibytes 0d008h +001335r 1 D0 .hibytes 0d009h +001336r 1 D0 .hibytes 0d00ah +001337r 1 D0 .hibytes 0d00bh +001338r 1 D0 .hibytes 0d00ch +001339r 1 D0 .hibytes 0d00dh +00133Ar 1 D0 .hibytes 0d00eh +00133Br 1 D0 .hibytes 0d00fh +00133Cr 1 DF .hibytes 0dfe1h +00133Dr 1 DF .hibytes 0dfe2h +00133Er 1 DF .hibytes 0dfe3h +00133Fr 1 DF .hibytes 0dfe4h +001340r 1 DF .hibytes 0dfe5h +001341r 1 DF .hibytes 0dfe6h +001342r 1 DF .hibytes 0dfe7h +001343r 1 DF .hibytes 0dfe8h +001344r 1 DF .hibytes 0dfe9h +001345r 1 DF .hibytes 0dfeah +001346r 1 DF .hibytes 0dfebh +001347r 1 DF .hibytes 0dfech +001348r 1 DF .hibytes 0dfedh +001349r 1 DF .hibytes 0dfeeh +00134Ar 1 DF .hibytes 0dfefh +00134Br 1 DF .hibytes 0dff0h +00134Cr 1 DF .hibytes 0dff1h +00134Dr 1 DF .hibytes 0dff2h +00134Er 1 DF .hibytes 0dff3h +00134Fr 1 DF .hibytes 0dff4h +001350r 1 DF .hibytes 0dff5h +001351r 1 DF .hibytes 0dff6h +001352r 1 DF .hibytes 0dff7h +001353r 1 DF .hibytes 0dff8h +001354r 1 DF .hibytes 0dff9h +001355r 1 DF .hibytes 0dffah +001356r 1 DF .hibytes 0dffbh +001357r 1 DF .hibytes 0dffch +001358r 1 DF .hibytes 0dffdh +001359r 1 DF .hibytes 0dffeh +00135Ar 1 DF .hibytes 0dfffh +00135Br 1 E0 .hibytes 0e000h +00135Cr 1 E0 .hibytes 0e001h +00135Dr 1 E0 .hibytes 0e002h +00135Er 1 E0 .hibytes 0e003h +00135Fr 1 E0 .hibytes 0e004h +001360r 1 E0 .hibytes 0e005h +001361r 1 E0 .hibytes 0e006h +001362r 1 E0 .hibytes 0e007h +001363r 1 E0 .hibytes 0e008h +001364r 1 E0 .hibytes 0e009h +001365r 1 E0 .hibytes 0e00ah +001366r 1 E0 .hibytes 0e00bh +001367r 1 E0 .hibytes 0e00ch +001368r 1 E0 .hibytes 0e00dh +001369r 1 E0 .hibytes 0e00eh +00136Ar 1 E0 .hibytes 0e00fh +00136Br 1 EF .hibytes 0efe1h +00136Cr 1 EF .hibytes 0efe2h +00136Dr 1 EF .hibytes 0efe3h +00136Er 1 EF .hibytes 0efe4h +00136Fr 1 EF .hibytes 0efe5h +001370r 1 EF .hibytes 0efe6h +001371r 1 EF .hibytes 0efe7h +001372r 1 EF .hibytes 0efe8h +001373r 1 EF .hibytes 0efe9h +001374r 1 EF .hibytes 0efeah +001375r 1 EF .hibytes 0efebh +001376r 1 EF .hibytes 0efech +001377r 1 EF .hibytes 0efedh +001378r 1 EF .hibytes 0efeeh +001379r 1 EF .hibytes 0efefh +00137Ar 1 EF .hibytes 0eff0h +00137Br 1 EF .hibytes 0eff1h +00137Cr 1 EF .hibytes 0eff2h +00137Dr 1 EF .hibytes 0eff3h +00137Er 1 EF .hibytes 0eff4h +00137Fr 1 EF .hibytes 0eff5h +001380r 1 EF .hibytes 0eff6h +001381r 1 EF .hibytes 0eff7h +001382r 1 EF .hibytes 0eff8h +001383r 1 EF .hibytes 0eff9h +001384r 1 EF .hibytes 0effah +001385r 1 EF .hibytes 0effbh +001386r 1 EF .hibytes 0effch +001387r 1 EF .hibytes 0effdh +001388r 1 EF .hibytes 0effeh +001389r 1 EF .hibytes 0efffh +00138Ar 1 F0 .hibytes 0f000h +00138Br 1 F0 .hibytes 0f001h +00138Cr 1 F0 .hibytes 0f002h +00138Dr 1 F0 .hibytes 0f003h +00138Er 1 F0 .hibytes 0f004h +00138Fr 1 F0 .hibytes 0f005h +001390r 1 F0 .hibytes 0f006h +001391r 1 F0 .hibytes 0f007h +001392r 1 F0 .hibytes 0f008h +001393r 1 F0 .hibytes 0f009h +001394r 1 F0 .hibytes 0f00ah +001395r 1 F0 .hibytes 0f00bh +001396r 1 F0 .hibytes 0f00ch +001397r 1 F0 .hibytes 0f00dh +001398r 1 F0 .hibytes 0f00eh +001399r 1 F0 .hibytes 0f00fh +00139Ar 1 FF .hibytes 0ffe1h +00139Br 1 FF .hibytes 0ffe2h +00139Cr 1 FF .hibytes 0ffe3h +00139Dr 1 FF .hibytes 0ffe4h +00139Er 1 FF .hibytes 0ffe5h +00139Fr 1 FF .hibytes 0ffe6h +0013A0r 1 FF .hibytes 0ffe7h +0013A1r 1 FF .hibytes 0ffe8h +0013A2r 1 FF .hibytes 0ffe9h +0013A3r 1 FF .hibytes 0ffeah +0013A4r 1 FF .hibytes 0ffebh +0013A5r 1 FF .hibytes 0ffech +0013A6r 1 FF .hibytes 0ffedh +0013A7r 1 FF .hibytes 0ffeeh +0013A8r 1 FF .hibytes 0ffefh +0013A9r 1 FF .hibytes 0fff0h +0013AAr 1 FF .hibytes 0fff1h +0013ABr 1 FF .hibytes 0fff2h +0013ACr 1 FF .hibytes 0fff3h +0013ADr 1 FF .hibytes 0fff4h +0013AEr 1 FF .hibytes 0fff5h +0013AFr 1 FF .hibytes 0fff6h +0013B0r 1 FF .hibytes 0fff7h +0013B1r 1 FF .hibytes 0fff8h +0013B2r 1 FF .hibytes 0fff9h +0013B3r 1 FF .hibytes 0fffah +0013B4r 1 FF .hibytes 0fffbh +0013B5r 1 FF .hibytes 0fffch +0013B6r 1 FF .hibytes 0fffdh +0013B7r 1 FF .hibytes 0fffeh +0013B8r 1 FF .hibytes 0ffffh +0013B9r 1 +0013B9r 1 ; binary values, variable length +0013B9r 1 00 .hibytes %0 +0013BAr 1 00 .hibytes %01 +0013BBr 1 00 .hibytes %010 +0013BCr 1 00 .hibytes %011 +0013BDr 1 00 .hibytes %0100 +0013BEr 1 00 .hibytes %0101 +0013BFr 1 00 .hibytes %0110 +0013C0r 1 00 .hibytes %0111 +0013C1r 1 00 .hibytes %01000 +0013C2r 1 00 .hibytes %01001 +0013C3r 1 00 .hibytes %01010 +0013C4r 1 00 .hibytes %01011 +0013C5r 1 00 .hibytes %01100 +0013C6r 1 00 .hibytes %01101 +0013C7r 1 00 .hibytes %01110 +0013C8r 1 00 .hibytes %01111 +0013C9r 1 00 .hibytes %010000 +0013CAr 1 00 .hibytes %010001 +0013CBr 1 00 .hibytes %010010 +0013CCr 1 00 .hibytes %010011 +0013CDr 1 00 .hibytes %01110000 +0013CEr 1 00 .hibytes %01110001 +0013CFr 1 00 .hibytes %01110010 +0013D0r 1 00 .hibytes %01110011 +0013D1r 1 00 .hibytes %01110100 +0013D2r 1 00 .hibytes %01110101 +0013D3r 1 00 .hibytes %01110110 +0013D4r 1 00 .hibytes %01110111 +0013D5r 1 00 .hibytes %01111000 +0013D6r 1 00 .hibytes %01111001 +0013D7r 1 00 .hibytes %01111010 +0013D8r 1 00 .hibytes %01111011 +0013D9r 1 00 .hibytes %01111100 +0013DAr 1 00 .hibytes %01111101 +0013DBr 1 00 .hibytes %01111110 +0013DCr 1 00 .hibytes %01111111 +0013DDr 1 00 .hibytes %010000000 +0013DEr 1 00 .hibytes %010000001 +0013DFr 1 00 .hibytes %010000010 +0013E0r 1 00 .hibytes %010000011 +0013E1r 1 00 .hibytes %010000100 +0013E2r 1 00 .hibytes %010000101 +0013E3r 1 00 .hibytes %010000110 +0013E4r 1 00 .hibytes %011110000 +0013E5r 1 00 .hibytes %011110001 +0013E6r 1 00 .hibytes %011110010 +0013E7r 1 00 .hibytes %011110011 +0013E8r 1 00 .hibytes %011110100 +0013E9r 1 00 .hibytes %011110101 +0013EAr 1 00 .hibytes %011110110 +0013EBr 1 00 .hibytes %011110111 +0013ECr 1 00 .hibytes %011111000 +0013EDr 1 00 .hibytes %011111001 +0013EEr 1 00 .hibytes %011111010 +0013EFr 1 00 .hibytes %011111011 +0013F0r 1 00 .hibytes %011111100 +0013F1r 1 00 .hibytes %011111101 +0013F2r 1 00 .hibytes %011111110 +0013F3r 1 00 .hibytes %011111111 +0013F4r 1 01 .hibytes %100000000 +0013F5r 1 01 .hibytes %100000001 +0013F6r 1 01 .hibytes %100000010 +0013F7r 1 01 .hibytes %100000011 +0013F8r 1 0F .hibytes %111111010010 +0013F9r 1 0F .hibytes %111111010011 +0013FAr 1 0F .hibytes %111111010100 +0013FBr 1 0F .hibytes %111111010101 +0013FCr 1 0F .hibytes %111111010110 +0013FDr 1 0F .hibytes %111111010111 +0013FEr 1 0F .hibytes %111111011000 +0013FFr 1 0F .hibytes %111111011001 +001400r 1 0F .hibytes %111111011010 +001401r 1 0F .hibytes %111111011011 +001402r 1 0F .hibytes %111111011100 +001403r 1 0F .hibytes %111111011101 +001404r 1 0F .hibytes %111111011110 +001405r 1 0F .hibytes %111111011111 +001406r 1 0F .hibytes %111111100000 +001407r 1 0F .hibytes %111111100001 +001408r 1 0F .hibytes %111111100010 +001409r 1 0F .hibytes %111111100011 +00140Ar 1 0F .hibytes %111111100100 +00140Br 1 0F .hibytes %111111100101 +00140Cr 1 0F .hibytes %111111100110 +00140Dr 1 0F .hibytes %111111100111 +00140Er 1 0F .hibytes %111111101000 +00140Fr 1 0F .hibytes %111111101001 +001410r 1 0F .hibytes %111111101010 +001411r 1 0F .hibytes %111111101011 +001412r 1 0F .hibytes %111111101100 +001413r 1 0F .hibytes %111111101101 +001414r 1 0F .hibytes %111111101110 +001415r 1 0F .hibytes %111111101111 +001416r 1 0F .hibytes %111111110000 +001417r 1 0F .hibytes %111111110001 +001418r 1 0F .hibytes %111111110010 +001419r 1 0F .hibytes %111111110011 +00141Ar 1 0F .hibytes %111111110100 +00141Br 1 0F .hibytes %111111110101 +00141Cr 1 0F .hibytes %111111110110 +00141Dr 1 0F .hibytes %111111110111 +00141Er 1 0F .hibytes %111111111000 +00141Fr 1 0F .hibytes %111111111001 +001420r 1 0F .hibytes %111111111010 +001421r 1 0F .hibytes %111111111011 +001422r 1 0F .hibytes %111111111100 +001423r 1 0F .hibytes %111111111101 +001424r 1 0F .hibytes %111111111110 +001425r 1 0F .hibytes %111111111111 +001426r 1 10 .hibytes %1000000000000 +001427r 1 10 .hibytes %1000000000001 +001428r 1 10 .hibytes %1000000000010 +001429r 1 10 .hibytes %1000000000011 +00142Ar 1 10 .hibytes %1000000000100 +00142Br 1 10 .hibytes %1000000000101 +00142Cr 1 10 .hibytes %1000000000110 +00142Dr 1 10 .hibytes %1000000000111 +00142Er 1 10 .hibytes %1000000001000 +00142Fr 1 7F .hibytes %111111111110000 +001430r 1 7F .hibytes %111111111110001 +001431r 1 7F .hibytes %111111111110010 +001432r 1 7F .hibytes %111111111110011 +001433r 1 7F .hibytes %111111111110100 +001434r 1 7F .hibytes %111111111110101 +001435r 1 7F .hibytes %111111111110110 +001436r 1 7F .hibytes %111111111110111 +001437r 1 7F .hibytes %111111111111000 +001438r 1 7F .hibytes %111111111111001 +001439r 1 7F .hibytes %111111111111010 +00143Ar 1 7F .hibytes %111111111111011 +00143Br 1 7F .hibytes %111111111111100 +00143Cr 1 7F .hibytes %111111111111101 +00143Dr 1 7F .hibytes %111111111111110 +00143Er 1 7F .hibytes %111111111111111 +00143Fr 1 80 .hibytes %1000000000000000 +001440r 1 80 .hibytes %1000000000000001 +001441r 1 80 .hibytes %1000000000000010 +001442r 1 80 .hibytes %1000000000000011 +001443r 1 80 .hibytes %1000000000000100 +001444r 1 80 .hibytes %1000000000000101 +001445r 1 80 .hibytes %1000000000000110 +001446r 1 80 .hibytes %1000000000000111 +001447r 1 80 .hibytes %1000000000001000 +001448r 1 80 .hibytes %1000000000001001 +001449r 1 80 .hibytes %1000000000001010 +00144Ar 1 80 .hibytes %1000000000001011 +00144Br 1 9F .hibytes %1001111111100001 +00144Cr 1 9F .hibytes %1001111111100010 +00144Dr 1 9F .hibytes %1001111111100011 +00144Er 1 9F .hibytes %1001111111100100 +00144Fr 1 9F .hibytes %1001111111100101 +001450r 1 9F .hibytes %1001111111100110 +001451r 1 9F .hibytes %1001111111100111 +001452r 1 9F .hibytes %1001111111101000 +001453r 1 9F .hibytes %1001111111101001 +001454r 1 9F .hibytes %1001111111101010 +001455r 1 9F .hibytes %1001111111101011 +001456r 1 9F .hibytes %1001111111101100 +001457r 1 9F .hibytes %1001111111101101 +001458r 1 9F .hibytes %1001111111101110 +001459r 1 9F .hibytes %1001111111101111 +00145Ar 1 9F .hibytes %1001111111110000 +00145Br 1 9F .hibytes %1001111111110001 +00145Cr 1 9F .hibytes %1001111111110010 +00145Dr 1 9F .hibytes %1001111111110011 +00145Er 1 9F .hibytes %1001111111110100 +00145Fr 1 9F .hibytes %1001111111110101 +001460r 1 9F .hibytes %1001111111110110 +001461r 1 9F .hibytes %1001111111110111 +001462r 1 9F .hibytes %1001111111111000 +001463r 1 9F .hibytes %1001111111111001 +001464r 1 9F .hibytes %1001111111111010 +001465r 1 9F .hibytes %1001111111111011 +001466r 1 9F .hibytes %1001111111111100 +001467r 1 9F .hibytes %1001111111111101 +001468r 1 9F .hibytes %1001111111111110 +001469r 1 9F .hibytes %1001111111111111 +00146Ar 1 A0 .hibytes %1010000000000000 +00146Br 1 A0 .hibytes %1010000000000001 +00146Cr 1 A0 .hibytes %1010000000000010 +00146Dr 1 A0 .hibytes %1010000000000011 +00146Er 1 A0 .hibytes %1010000000000100 +00146Fr 1 A0 .hibytes %1010000000000101 +001470r 1 A0 .hibytes %1010000000000110 +001471r 1 A0 .hibytes %1010000000000111 +001472r 1 A0 .hibytes %1010000000001000 +001473r 1 A0 .hibytes %1010000000001001 +001474r 1 A0 .hibytes %1010000000001010 +001475r 1 A0 .hibytes %1010000000001011 +001476r 1 A0 .hibytes %1010000000001100 +001477r 1 A0 .hibytes %1010000000001101 +001478r 1 A0 .hibytes %1010000000001110 +001479r 1 A0 .hibytes %1010000000001111 +00147Ar 1 AF .hibytes %1010111111100001 +00147Br 1 AF .hibytes %1010111111100010 +00147Cr 1 AF .hibytes %1010111111100011 +00147Dr 1 AF .hibytes %1010111111100100 +00147Er 1 AF .hibytes %1010111111100101 +00147Fr 1 AF .hibytes %1010111111100110 +001480r 1 AF .hibytes %1010111111100111 +001481r 1 AF .hibytes %1010111111101000 +001482r 1 AF .hibytes %1010111111101001 +001483r 1 AF .hibytes %1010111111101010 +001484r 1 AF .hibytes %1010111111101011 +001485r 1 AF .hibytes %1010111111101100 +001486r 1 AF .hibytes %1010111111101101 +001487r 1 AF .hibytes %1010111111101110 +001488r 1 AF .hibytes %1010111111101111 +001489r 1 AF .hibytes %1010111111110000 +00148Ar 1 AF .hibytes %1010111111110001 +00148Br 1 AF .hibytes %1010111111110010 +00148Cr 1 AF .hibytes %1010111111110011 +00148Dr 1 AF .hibytes %1010111111110100 +00148Er 1 AF .hibytes %1010111111110101 +00148Fr 1 AF .hibytes %1010111111110110 +001490r 1 AF .hibytes %1010111111110111 +001491r 1 AF .hibytes %1010111111111000 +001492r 1 AF .hibytes %1010111111111001 +001493r 1 AF .hibytes %1010111111111010 +001494r 1 AF .hibytes %1010111111111011 +001495r 1 AF .hibytes %1010111111111100 +001496r 1 AF .hibytes %1010111111111101 +001497r 1 AF .hibytes %1010111111111110 +001498r 1 AF .hibytes %1010111111111111 +001499r 1 B0 .hibytes %1011000000000000 +00149Ar 1 B0 .hibytes %1011000000000001 +00149Br 1 B0 .hibytes %1011000000000010 +00149Cr 1 B0 .hibytes %1011000000000011 +00149Dr 1 B0 .hibytes %1011000000000100 +00149Er 1 B0 .hibytes %1011000000000101 +00149Fr 1 B0 .hibytes %1011000000000110 +0014A0r 1 B0 .hibytes %1011000000000111 +0014A1r 1 B0 .hibytes %1011000000001000 +0014A2r 1 B0 .hibytes %1011000000001001 +0014A3r 1 B0 .hibytes %1011000000001010 +0014A4r 1 B0 .hibytes %1011000000001011 +0014A5r 1 B0 .hibytes %1011000000001100 +0014A6r 1 B0 .hibytes %1011000000001101 +0014A7r 1 B0 .hibytes %1011000000001110 +0014A8r 1 B0 .hibytes %1011000000001111 +0014A9r 1 BF .hibytes %1011111111100001 +0014AAr 1 BF .hibytes %1011111111100010 +0014ABr 1 BF .hibytes %1011111111100011 +0014ACr 1 BF .hibytes %1011111111100100 +0014ADr 1 BF .hibytes %1011111111100101 +0014AEr 1 BF .hibytes %1011111111100110 +0014AFr 1 BF .hibytes %1011111111100111 +0014B0r 1 BF .hibytes %1011111111101000 +0014B1r 1 BF .hibytes %1011111111101001 +0014B2r 1 BF .hibytes %1011111111101010 +0014B3r 1 BF .hibytes %1011111111101011 +0014B4r 1 BF .hibytes %1011111111101100 +0014B5r 1 BF .hibytes %1011111111101101 +0014B6r 1 BF .hibytes %1011111111101110 +0014B7r 1 BF .hibytes %1011111111101111 +0014B8r 1 BF .hibytes %1011111111110000 +0014B9r 1 BF .hibytes %1011111111110001 +0014BAr 1 BF .hibytes %1011111111110010 +0014BBr 1 BF .hibytes %1011111111110011 +0014BCr 1 BF .hibytes %1011111111110100 +0014BDr 1 BF .hibytes %1011111111110101 +0014BEr 1 BF .hibytes %1011111111110110 +0014BFr 1 BF .hibytes %1011111111110111 +0014C0r 1 BF .hibytes %1011111111111000 +0014C1r 1 BF .hibytes %1011111111111001 +0014C2r 1 BF .hibytes %1011111111111010 +0014C3r 1 BF .hibytes %1011111111111011 +0014C4r 1 BF .hibytes %1011111111111100 +0014C5r 1 BF .hibytes %1011111111111101 +0014C6r 1 BF .hibytes %1011111111111110 +0014C7r 1 BF .hibytes %1011111111111111 +0014C8r 1 C0 .hibytes %1100000000000000 +0014C9r 1 C0 .hibytes %1100000000000001 +0014CAr 1 C0 .hibytes %1100000000000010 +0014CBr 1 C0 .hibytes %1100000000000011 +0014CCr 1 C0 .hibytes %1100000000000100 +0014CDr 1 C0 .hibytes %1100000000000101 +0014CEr 1 C0 .hibytes %1100000000000110 +0014CFr 1 C0 .hibytes %1100000000000111 +0014D0r 1 C0 .hibytes %1100000000001000 +0014D1r 1 C0 .hibytes %1100000000001001 +0014D2r 1 C0 .hibytes %1100000000001010 +0014D3r 1 C0 .hibytes %1100000000001011 +0014D4r 1 C0 .hibytes %1100000000001100 +0014D5r 1 C0 .hibytes %1100000000001101 +0014D6r 1 C0 .hibytes %1100000000001110 +0014D7r 1 C0 .hibytes %1100000000001111 +0014D8r 1 CF .hibytes %1100111111100001 +0014D9r 1 CF .hibytes %1100111111100010 +0014DAr 1 CF .hibytes %1100111111100011 +0014DBr 1 CF .hibytes %1100111111100100 +0014DCr 1 CF .hibytes %1100111111100101 +0014DDr 1 CF .hibytes %1100111111100110 +0014DEr 1 CF .hibytes %1100111111100111 +0014DFr 1 CF .hibytes %1100111111101000 +0014E0r 1 CF .hibytes %1100111111101001 +0014E1r 1 CF .hibytes %1100111111101010 +0014E2r 1 CF .hibytes %1100111111101011 +0014E3r 1 CF .hibytes %1100111111101100 +0014E4r 1 CF .hibytes %1100111111101101 +0014E5r 1 CF .hibytes %1100111111101110 +0014E6r 1 CF .hibytes %1100111111101111 +0014E7r 1 CF .hibytes %1100111111110000 +0014E8r 1 CF .hibytes %1100111111110001 +0014E9r 1 CF .hibytes %1100111111110010 +0014EAr 1 CF .hibytes %1100111111110011 +0014EBr 1 CF .hibytes %1100111111110100 +0014ECr 1 CF .hibytes %1100111111110101 +0014EDr 1 CF .hibytes %1100111111110110 +0014EEr 1 CF .hibytes %1100111111110111 +0014EFr 1 CF .hibytes %1100111111111000 +0014F0r 1 CF .hibytes %1100111111111001 +0014F1r 1 CF .hibytes %1100111111111010 +0014F2r 1 CF .hibytes %1100111111111011 +0014F3r 1 CF .hibytes %1100111111111100 +0014F4r 1 CF .hibytes %1100111111111101 +0014F5r 1 CF .hibytes %1100111111111110 +0014F6r 1 CF .hibytes %1100111111111111 +0014F7r 1 D0 .hibytes %1101000000000000 +0014F8r 1 D0 .hibytes %1101000000000001 +0014F9r 1 D0 .hibytes %1101000000000010 +0014FAr 1 D0 .hibytes %1101000000000011 +0014FBr 1 D0 .hibytes %1101000000000100 +0014FCr 1 D0 .hibytes %1101000000000101 +0014FDr 1 D0 .hibytes %1101000000000110 +0014FEr 1 D0 .hibytes %1101000000000111 +0014FFr 1 D0 .hibytes %1101000000001000 +001500r 1 D0 .hibytes %1101000000001001 +001501r 1 D0 .hibytes %1101000000001010 +001502r 1 D0 .hibytes %1101000000001011 +001503r 1 D0 .hibytes %1101000000001100 +001504r 1 D0 .hibytes %1101000000001101 +001505r 1 D0 .hibytes %1101000000001110 +001506r 1 D0 .hibytes %1101000000001111 +001507r 1 DF .hibytes %1101111111100001 +001508r 1 DF .hibytes %1101111111100010 +001509r 1 DF .hibytes %1101111111100011 +00150Ar 1 DF .hibytes %1101111111100100 +00150Br 1 DF .hibytes %1101111111100101 +00150Cr 1 DF .hibytes %1101111111100110 +00150Dr 1 DF .hibytes %1101111111100111 +00150Er 1 DF .hibytes %1101111111101000 +00150Fr 1 DF .hibytes %1101111111101001 +001510r 1 DF .hibytes %1101111111101010 +001511r 1 DF .hibytes %1101111111101011 +001512r 1 DF .hibytes %1101111111101100 +001513r 1 DF .hibytes %1101111111101101 +001514r 1 DF .hibytes %1101111111101110 +001515r 1 DF .hibytes %1101111111101111 +001516r 1 DF .hibytes %1101111111110000 +001517r 1 DF .hibytes %1101111111110001 +001518r 1 DF .hibytes %1101111111110010 +001519r 1 DF .hibytes %1101111111110011 +00151Ar 1 DF .hibytes %1101111111110100 +00151Br 1 DF .hibytes %1101111111110101 +00151Cr 1 DF .hibytes %1101111111110110 +00151Dr 1 DF .hibytes %1101111111110111 +00151Er 1 DF .hibytes %1101111111111000 +00151Fr 1 DF .hibytes %1101111111111001 +001520r 1 DF .hibytes %1101111111111010 +001521r 1 DF .hibytes %1101111111111011 +001522r 1 DF .hibytes %1101111111111100 +001523r 1 DF .hibytes %1101111111111101 +001524r 1 DF .hibytes %1101111111111110 +001525r 1 DF .hibytes %1101111111111111 +001526r 1 E0 .hibytes %1110000000000000 +001527r 1 E0 .hibytes %1110000000000001 +001528r 1 E0 .hibytes %1110000000000010 +001529r 1 E0 .hibytes %1110000000000011 +00152Ar 1 E0 .hibytes %1110000000000100 +00152Br 1 E0 .hibytes %1110000000000101 +00152Cr 1 E0 .hibytes %1110000000000110 +00152Dr 1 E0 .hibytes %1110000000000111 +00152Er 1 E0 .hibytes %1110000000001000 +00152Fr 1 E0 .hibytes %1110000000001001 +001530r 1 E0 .hibytes %1110000000001010 +001531r 1 E0 .hibytes %1110000000001011 +001532r 1 E0 .hibytes %1110000000001100 +001533r 1 E0 .hibytes %1110000000001101 +001534r 1 E0 .hibytes %1110000000001110 +001535r 1 E0 .hibytes %1110000000001111 +001536r 1 EF .hibytes %1110111111100001 +001537r 1 EF .hibytes %1110111111100010 +001538r 1 EF .hibytes %1110111111100011 +001539r 1 EF .hibytes %1110111111100100 +00153Ar 1 EF .hibytes %1110111111100101 +00153Br 1 EF .hibytes %1110111111100110 +00153Cr 1 EF .hibytes %1110111111100111 +00153Dr 1 EF .hibytes %1110111111101000 +00153Er 1 EF .hibytes %1110111111101001 +00153Fr 1 EF .hibytes %1110111111101010 +001540r 1 EF .hibytes %1110111111101011 +001541r 1 EF .hibytes %1110111111101100 +001542r 1 EF .hibytes %1110111111101101 +001543r 1 EF .hibytes %1110111111101110 +001544r 1 EF .hibytes %1110111111101111 +001545r 1 EF .hibytes %1110111111110000 +001546r 1 EF .hibytes %1110111111110001 +001547r 1 EF .hibytes %1110111111110010 +001548r 1 EF .hibytes %1110111111110011 +001549r 1 EF .hibytes %1110111111110100 +00154Ar 1 EF .hibytes %1110111111110101 +00154Br 1 EF .hibytes %1110111111110110 +00154Cr 1 EF .hibytes %1110111111110111 +00154Dr 1 EF .hibytes %1110111111111000 +00154Er 1 EF .hibytes %1110111111111001 +00154Fr 1 EF .hibytes %1110111111111010 +001550r 1 EF .hibytes %1110111111111011 +001551r 1 EF .hibytes %1110111111111100 +001552r 1 EF .hibytes %1110111111111101 +001553r 1 EF .hibytes %1110111111111110 +001554r 1 EF .hibytes %1110111111111111 +001555r 1 F0 .hibytes %1111000000000000 +001556r 1 F0 .hibytes %1111000000000001 +001557r 1 F0 .hibytes %1111000000000010 +001558r 1 F0 .hibytes %1111000000000011 +001559r 1 F0 .hibytes %1111000000000100 +00155Ar 1 F0 .hibytes %1111000000000101 +00155Br 1 F0 .hibytes %1111000000000110 +00155Cr 1 F0 .hibytes %1111000000000111 +00155Dr 1 F0 .hibytes %1111000000001000 +00155Er 1 F0 .hibytes %1111000000001001 +00155Fr 1 F0 .hibytes %1111000000001010 +001560r 1 F0 .hibytes %1111000000001011 +001561r 1 F0 .hibytes %1111000000001100 +001562r 1 F0 .hibytes %1111000000001101 +001563r 1 F0 .hibytes %1111000000001110 +001564r 1 F0 .hibytes %1111000000001111 +001565r 1 FF .hibytes %1111111111100001 +001566r 1 FF .hibytes %1111111111100010 +001567r 1 FF .hibytes %1111111111100011 +001568r 1 FF .hibytes %1111111111100100 +001569r 1 FF .hibytes %1111111111100101 +00156Ar 1 FF .hibytes %1111111111100110 +00156Br 1 FF .hibytes %1111111111100111 +00156Cr 1 FF .hibytes %1111111111101000 +00156Dr 1 FF .hibytes %1111111111101001 +00156Er 1 FF .hibytes %1111111111101010 +00156Fr 1 FF .hibytes %1111111111101011 +001570r 1 FF .hibytes %1111111111101100 +001571r 1 FF .hibytes %1111111111101101 +001572r 1 FF .hibytes %1111111111101110 +001573r 1 FF .hibytes %1111111111101111 +001574r 1 FF .hibytes %1111111111110000 +001575r 1 FF .hibytes %1111111111110001 +001576r 1 FF .hibytes %1111111111110010 +001577r 1 FF .hibytes %1111111111110011 +001578r 1 FF .hibytes %1111111111110100 +001579r 1 FF .hibytes %1111111111110101 +00157Ar 1 FF .hibytes %1111111111110110 +00157Br 1 FF .hibytes %1111111111110111 +00157Cr 1 FF .hibytes %1111111111111000 +00157Dr 1 FF .hibytes %1111111111111001 +00157Er 1 FF .hibytes %1111111111111010 +00157Fr 1 FF .hibytes %1111111111111011 +001580r 1 FF .hibytes %1111111111111100 +001581r 1 FF .hibytes %1111111111111101 +001582r 1 FF .hibytes %1111111111111110 +001583r 1 FF .hibytes %1111111111111111 +001584r 1 +001584r 1 ; binary values, full length +001584r 1 00 .hibytes %0000000000000000 +001585r 1 00 .hibytes %0000000000000001 +001586r 1 00 .hibytes %0000000000000010 +001587r 1 00 .hibytes %0000000000000011 +001588r 1 00 .hibytes %0000000000000100 +001589r 1 00 .hibytes %0000000000000101 +00158Ar 1 00 .hibytes %0000000000000110 +00158Br 1 00 .hibytes %0000000000000111 +00158Cr 1 00 .hibytes %0000000000001000 +00158Dr 1 00 .hibytes %0000000000001001 +00158Er 1 00 .hibytes %0000000000001010 +00158Fr 1 00 .hibytes %0000000000001011 +001590r 1 00 .hibytes %0000000000001100 +001591r 1 00 .hibytes %0000000000001101 +001592r 1 00 .hibytes %0000000000001110 +001593r 1 00 .hibytes %0000000000001111 +001594r 1 00 .hibytes %0000000000010000 +001595r 1 00 .hibytes %0000000000010001 +001596r 1 00 .hibytes %0000000000010010 +001597r 1 00 .hibytes %0000000000010011 +001598r 1 00 .hibytes %0000000001110000 +001599r 1 00 .hibytes %0000000001110001 +00159Ar 1 00 .hibytes %0000000001110010 +00159Br 1 00 .hibytes %0000000001110011 +00159Cr 1 00 .hibytes %0000000001110100 +00159Dr 1 00 .hibytes %0000000001110101 +00159Er 1 00 .hibytes %0000000001110110 +00159Fr 1 00 .hibytes %0000000001110111 +0015A0r 1 00 .hibytes %0000000001111000 +0015A1r 1 00 .hibytes %0000000001111001 +0015A2r 1 00 .hibytes %0000000001111010 +0015A3r 1 00 .hibytes %0000000001111011 +0015A4r 1 00 .hibytes %0000000001111100 +0015A5r 1 00 .hibytes %0000000001111101 +0015A6r 1 00 .hibytes %0000000001111110 +0015A7r 1 00 .hibytes %0000000001111111 +0015A8r 1 00 .hibytes %0000000010000000 +0015A9r 1 00 .hibytes %0000000010000001 +0015AAr 1 00 .hibytes %0000000010000010 +0015ABr 1 00 .hibytes %0000000010000011 +0015ACr 1 00 .hibytes %0000000010000100 +0015ADr 1 00 .hibytes %0000000010000101 +0015AEr 1 00 .hibytes %0000000010000110 +0015AFr 1 00 .hibytes %0000000011110000 +0015B0r 1 00 .hibytes %0000000011110001 +0015B1r 1 00 .hibytes %0000000011110010 +0015B2r 1 00 .hibytes %0000000011110011 +0015B3r 1 00 .hibytes %0000000011110100 +0015B4r 1 00 .hibytes %0000000011110101 +0015B5r 1 00 .hibytes %0000000011110110 +0015B6r 1 00 .hibytes %0000000011110111 +0015B7r 1 00 .hibytes %0000000011111000 +0015B8r 1 00 .hibytes %0000000011111001 +0015B9r 1 00 .hibytes %0000000011111010 +0015BAr 1 00 .hibytes %0000000011111011 +0015BBr 1 00 .hibytes %0000000011111100 +0015BCr 1 00 .hibytes %0000000011111101 +0015BDr 1 00 .hibytes %0000000011111110 +0015BEr 1 00 .hibytes %0000000011111111 +0015BFr 1 01 .hibytes %0000000100000000 +0015C0r 1 01 .hibytes %0000000100000001 +0015C1r 1 01 .hibytes %0000000100000010 +0015C2r 1 01 .hibytes %0000000100000011 +0015C3r 1 0F .hibytes %0000111111010010 +0015C4r 1 0F .hibytes %0000111111010011 +0015C5r 1 0F .hibytes %0000111111010100 +0015C6r 1 0F .hibytes %0000111111010101 +0015C7r 1 0F .hibytes %0000111111010110 +0015C8r 1 0F .hibytes %0000111111010111 +0015C9r 1 0F .hibytes %0000111111011000 +0015CAr 1 0F .hibytes %0000111111011001 +0015CBr 1 0F .hibytes %0000111111011010 +0015CCr 1 0F .hibytes %0000111111011011 +0015CDr 1 0F .hibytes %0000111111011100 +0015CEr 1 0F .hibytes %0000111111011101 +0015CFr 1 0F .hibytes %0000111111011110 +0015D0r 1 0F .hibytes %0000111111011111 +0015D1r 1 0F .hibytes %0000111111100000 +0015D2r 1 0F .hibytes %0000111111100001 +0015D3r 1 0F .hibytes %0000111111100010 +0015D4r 1 0F .hibytes %0000111111100011 +0015D5r 1 0F .hibytes %0000111111100100 +0015D6r 1 0F .hibytes %0000111111100101 +0015D7r 1 0F .hibytes %0000111111100110 +0015D8r 1 0F .hibytes %0000111111100111 +0015D9r 1 0F .hibytes %0000111111101000 +0015DAr 1 0F .hibytes %0000111111101001 +0015DBr 1 0F .hibytes %0000111111101010 +0015DCr 1 0F .hibytes %0000111111101011 +0015DDr 1 0F .hibytes %0000111111101100 +0015DEr 1 0F .hibytes %0000111111101101 +0015DFr 1 0F .hibytes %0000111111101110 +0015E0r 1 0F .hibytes %0000111111101111 +0015E1r 1 0F .hibytes %0000111111110000 +0015E2r 1 0F .hibytes %0000111111110001 +0015E3r 1 0F .hibytes %0000111111110010 +0015E4r 1 0F .hibytes %0000111111110011 +0015E5r 1 0F .hibytes %0000111111110100 +0015E6r 1 0F .hibytes %0000111111110101 +0015E7r 1 0F .hibytes %0000111111110110 +0015E8r 1 0F .hibytes %0000111111110111 +0015E9r 1 0F .hibytes %0000111111111000 +0015EAr 1 0F .hibytes %0000111111111001 +0015EBr 1 0F .hibytes %0000111111111010 +0015ECr 1 0F .hibytes %0000111111111011 +0015EDr 1 0F .hibytes %0000111111111100 +0015EEr 1 0F .hibytes %0000111111111101 +0015EFr 1 0F .hibytes %0000111111111110 +0015F0r 1 0F .hibytes %0000111111111111 +0015F1r 1 10 .hibytes %0001000000000000 +0015F2r 1 10 .hibytes %0001000000000001 +0015F3r 1 10 .hibytes %0001000000000010 +0015F4r 1 10 .hibytes %0001000000000011 +0015F5r 1 10 .hibytes %0001000000000100 +0015F6r 1 10 .hibytes %0001000000000101 +0015F7r 1 10 .hibytes %0001000000000110 +0015F8r 1 10 .hibytes %0001000000000111 +0015F9r 1 10 .hibytes %0001000000001000 +0015FAr 1 7F .hibytes %0111111111110000 +0015FBr 1 7F .hibytes %0111111111110001 +0015FCr 1 7F .hibytes %0111111111110010 +0015FDr 1 7F .hibytes %0111111111110011 +0015FEr 1 7F .hibytes %0111111111110100 +0015FFr 1 7F .hibytes %0111111111110101 +001600r 1 7F .hibytes %0111111111110110 +001601r 1 7F .hibytes %0111111111110111 +001602r 1 7F .hibytes %0111111111111000 +001603r 1 7F .hibytes %0111111111111001 +001604r 1 7F .hibytes %0111111111111010 +001605r 1 7F .hibytes %0111111111111011 +001606r 1 7F .hibytes %0111111111111100 +001607r 1 7F .hibytes %0111111111111101 +001608r 1 7F .hibytes %0111111111111110 +001609r 1 7F .hibytes %0111111111111111 +00160Ar 1 80 .hibytes %1000000000000000 +00160Br 1 80 .hibytes %1000000000000001 +00160Cr 1 80 .hibytes %1000000000000010 +00160Dr 1 80 .hibytes %1000000000000011 +00160Er 1 80 .hibytes %1000000000000100 +00160Fr 1 80 .hibytes %1000000000000101 +001610r 1 80 .hibytes %1000000000000110 +001611r 1 80 .hibytes %1000000000000111 +001612r 1 80 .hibytes %1000000000001000 +001613r 1 80 .hibytes %1000000000001001 +001614r 1 80 .hibytes %1000000000001010 +001615r 1 80 .hibytes %1000000000001011 +001616r 1 9F .hibytes %1001111111100001 +001617r 1 9F .hibytes %1001111111100010 +001618r 1 9F .hibytes %1001111111100011 +001619r 1 9F .hibytes %1001111111100100 +00161Ar 1 9F .hibytes %1001111111100101 +00161Br 1 9F .hibytes %1001111111100110 +00161Cr 1 9F .hibytes %1001111111100111 +00161Dr 1 9F .hibytes %1001111111101000 +00161Er 1 9F .hibytes %1001111111101001 +00161Fr 1 9F .hibytes %1001111111101010 +001620r 1 9F .hibytes %1001111111101011 +001621r 1 9F .hibytes %1001111111101100 +001622r 1 9F .hibytes %1001111111101101 +001623r 1 9F .hibytes %1001111111101110 +001624r 1 9F .hibytes %1001111111101111 +001625r 1 9F .hibytes %1001111111110000 +001626r 1 9F .hibytes %1001111111110001 +001627r 1 9F .hibytes %1001111111110010 +001628r 1 9F .hibytes %1001111111110011 +001629r 1 9F .hibytes %1001111111110100 +00162Ar 1 9F .hibytes %1001111111110101 +00162Br 1 9F .hibytes %1001111111110110 +00162Cr 1 9F .hibytes %1001111111110111 +00162Dr 1 9F .hibytes %1001111111111000 +00162Er 1 9F .hibytes %1001111111111001 +00162Fr 1 9F .hibytes %1001111111111010 +001630r 1 9F .hibytes %1001111111111011 +001631r 1 9F .hibytes %1001111111111100 +001632r 1 9F .hibytes %1001111111111101 +001633r 1 9F .hibytes %1001111111111110 +001634r 1 9F .hibytes %1001111111111111 +001635r 1 A0 .hibytes %1010000000000000 +001636r 1 A0 .hibytes %1010000000000001 +001637r 1 A0 .hibytes %1010000000000010 +001638r 1 A0 .hibytes %1010000000000011 +001639r 1 A0 .hibytes %1010000000000100 +00163Ar 1 A0 .hibytes %1010000000000101 +00163Br 1 A0 .hibytes %1010000000000110 +00163Cr 1 A0 .hibytes %1010000000000111 +00163Dr 1 A0 .hibytes %1010000000001000 +00163Er 1 A0 .hibytes %1010000000001001 +00163Fr 1 A0 .hibytes %1010000000001010 +001640r 1 A0 .hibytes %1010000000001011 +001641r 1 A0 .hibytes %1010000000001100 +001642r 1 A0 .hibytes %1010000000001101 +001643r 1 A0 .hibytes %1010000000001110 +001644r 1 A0 .hibytes %1010000000001111 +001645r 1 AF .hibytes %1010111111100001 +001646r 1 AF .hibytes %1010111111100010 +001647r 1 AF .hibytes %1010111111100011 +001648r 1 AF .hibytes %1010111111100100 +001649r 1 AF .hibytes %1010111111100101 +00164Ar 1 AF .hibytes %1010111111100110 +00164Br 1 AF .hibytes %1010111111100111 +00164Cr 1 AF .hibytes %1010111111101000 +00164Dr 1 AF .hibytes %1010111111101001 +00164Er 1 AF .hibytes %1010111111101010 +00164Fr 1 AF .hibytes %1010111111101011 +001650r 1 AF .hibytes %1010111111101100 +001651r 1 AF .hibytes %1010111111101101 +001652r 1 AF .hibytes %1010111111101110 +001653r 1 AF .hibytes %1010111111101111 +001654r 1 AF .hibytes %1010111111110000 +001655r 1 AF .hibytes %1010111111110001 +001656r 1 AF .hibytes %1010111111110010 +001657r 1 AF .hibytes %1010111111110011 +001658r 1 AF .hibytes %1010111111110100 +001659r 1 AF .hibytes %1010111111110101 +00165Ar 1 AF .hibytes %1010111111110110 +00165Br 1 AF .hibytes %1010111111110111 +00165Cr 1 AF .hibytes %1010111111111000 +00165Dr 1 AF .hibytes %1010111111111001 +00165Er 1 AF .hibytes %1010111111111010 +00165Fr 1 AF .hibytes %1010111111111011 +001660r 1 AF .hibytes %1010111111111100 +001661r 1 AF .hibytes %1010111111111101 +001662r 1 AF .hibytes %1010111111111110 +001663r 1 AF .hibytes %1010111111111111 +001664r 1 B0 .hibytes %1011000000000000 +001665r 1 B0 .hibytes %1011000000000001 +001666r 1 B0 .hibytes %1011000000000010 +001667r 1 B0 .hibytes %1011000000000011 +001668r 1 B0 .hibytes %1011000000000100 +001669r 1 B0 .hibytes %1011000000000101 +00166Ar 1 B0 .hibytes %1011000000000110 +00166Br 1 B0 .hibytes %1011000000000111 +00166Cr 1 B0 .hibytes %1011000000001000 +00166Dr 1 B0 .hibytes %1011000000001001 +00166Er 1 B0 .hibytes %1011000000001010 +00166Fr 1 B0 .hibytes %1011000000001011 +001670r 1 B0 .hibytes %1011000000001100 +001671r 1 B0 .hibytes %1011000000001101 +001672r 1 B0 .hibytes %1011000000001110 +001673r 1 B0 .hibytes %1011000000001111 +001674r 1 BF .hibytes %1011111111100001 +001675r 1 BF .hibytes %1011111111100010 +001676r 1 BF .hibytes %1011111111100011 +001677r 1 BF .hibytes %1011111111100100 +001678r 1 BF .hibytes %1011111111100101 +001679r 1 BF .hibytes %1011111111100110 +00167Ar 1 BF .hibytes %1011111111100111 +00167Br 1 BF .hibytes %1011111111101000 +00167Cr 1 BF .hibytes %1011111111101001 +00167Dr 1 BF .hibytes %1011111111101010 +00167Er 1 BF .hibytes %1011111111101011 +00167Fr 1 BF .hibytes %1011111111101100 +001680r 1 BF .hibytes %1011111111101101 +001681r 1 BF .hibytes %1011111111101110 +001682r 1 BF .hibytes %1011111111101111 +001683r 1 BF .hibytes %1011111111110000 +001684r 1 BF .hibytes %1011111111110001 +001685r 1 BF .hibytes %1011111111110010 +001686r 1 BF .hibytes %1011111111110011 +001687r 1 BF .hibytes %1011111111110100 +001688r 1 BF .hibytes %1011111111110101 +001689r 1 BF .hibytes %1011111111110110 +00168Ar 1 BF .hibytes %1011111111110111 +00168Br 1 BF .hibytes %1011111111111000 +00168Cr 1 BF .hibytes %1011111111111001 +00168Dr 1 BF .hibytes %1011111111111010 +00168Er 1 BF .hibytes %1011111111111011 +00168Fr 1 BF .hibytes %1011111111111100 +001690r 1 BF .hibytes %1011111111111101 +001691r 1 BF .hibytes %1011111111111110 +001692r 1 BF .hibytes %1011111111111111 +001693r 1 C0 .hibytes %1100000000000000 +001694r 1 C0 .hibytes %1100000000000001 +001695r 1 C0 .hibytes %1100000000000010 +001696r 1 C0 .hibytes %1100000000000011 +001697r 1 C0 .hibytes %1100000000000100 +001698r 1 C0 .hibytes %1100000000000101 +001699r 1 C0 .hibytes %1100000000000110 +00169Ar 1 C0 .hibytes %1100000000000111 +00169Br 1 C0 .hibytes %1100000000001000 +00169Cr 1 C0 .hibytes %1100000000001001 +00169Dr 1 C0 .hibytes %1100000000001010 +00169Er 1 C0 .hibytes %1100000000001011 +00169Fr 1 C0 .hibytes %1100000000001100 +0016A0r 1 C0 .hibytes %1100000000001101 +0016A1r 1 C0 .hibytes %1100000000001110 +0016A2r 1 C0 .hibytes %1100000000001111 +0016A3r 1 CF .hibytes %1100111111100001 +0016A4r 1 CF .hibytes %1100111111100010 +0016A5r 1 CF .hibytes %1100111111100011 +0016A6r 1 CF .hibytes %1100111111100100 +0016A7r 1 CF .hibytes %1100111111100101 +0016A8r 1 CF .hibytes %1100111111100110 +0016A9r 1 CF .hibytes %1100111111100111 +0016AAr 1 CF .hibytes %1100111111101000 +0016ABr 1 CF .hibytes %1100111111101001 +0016ACr 1 CF .hibytes %1100111111101010 +0016ADr 1 CF .hibytes %1100111111101011 +0016AEr 1 CF .hibytes %1100111111101100 +0016AFr 1 CF .hibytes %1100111111101101 +0016B0r 1 CF .hibytes %1100111111101110 +0016B1r 1 CF .hibytes %1100111111101111 +0016B2r 1 CF .hibytes %1100111111110000 +0016B3r 1 CF .hibytes %1100111111110001 +0016B4r 1 CF .hibytes %1100111111110010 +0016B5r 1 CF .hibytes %1100111111110011 +0016B6r 1 CF .hibytes %1100111111110100 +0016B7r 1 CF .hibytes %1100111111110101 +0016B8r 1 CF .hibytes %1100111111110110 +0016B9r 1 CF .hibytes %1100111111110111 +0016BAr 1 CF .hibytes %1100111111111000 +0016BBr 1 CF .hibytes %1100111111111001 +0016BCr 1 CF .hibytes %1100111111111010 +0016BDr 1 CF .hibytes %1100111111111011 +0016BEr 1 CF .hibytes %1100111111111100 +0016BFr 1 CF .hibytes %1100111111111101 +0016C0r 1 CF .hibytes %1100111111111110 +0016C1r 1 CF .hibytes %1100111111111111 +0016C2r 1 D0 .hibytes %1101000000000000 +0016C3r 1 D0 .hibytes %1101000000000001 +0016C4r 1 D0 .hibytes %1101000000000010 +0016C5r 1 D0 .hibytes %1101000000000011 +0016C6r 1 D0 .hibytes %1101000000000100 +0016C7r 1 D0 .hibytes %1101000000000101 +0016C8r 1 D0 .hibytes %1101000000000110 +0016C9r 1 D0 .hibytes %1101000000000111 +0016CAr 1 D0 .hibytes %1101000000001000 +0016CBr 1 D0 .hibytes %1101000000001001 +0016CCr 1 D0 .hibytes %1101000000001010 +0016CDr 1 D0 .hibytes %1101000000001011 +0016CEr 1 D0 .hibytes %1101000000001100 +0016CFr 1 D0 .hibytes %1101000000001101 +0016D0r 1 D0 .hibytes %1101000000001110 +0016D1r 1 D0 .hibytes %1101000000001111 +0016D2r 1 DF .hibytes %1101111111100001 +0016D3r 1 DF .hibytes %1101111111100010 +0016D4r 1 DF .hibytes %1101111111100011 +0016D5r 1 DF .hibytes %1101111111100100 +0016D6r 1 DF .hibytes %1101111111100101 +0016D7r 1 DF .hibytes %1101111111100110 +0016D8r 1 DF .hibytes %1101111111100111 +0016D9r 1 DF .hibytes %1101111111101000 +0016DAr 1 DF .hibytes %1101111111101001 +0016DBr 1 DF .hibytes %1101111111101010 +0016DCr 1 DF .hibytes %1101111111101011 +0016DDr 1 DF .hibytes %1101111111101100 +0016DEr 1 DF .hibytes %1101111111101101 +0016DFr 1 DF .hibytes %1101111111101110 +0016E0r 1 DF .hibytes %1101111111101111 +0016E1r 1 DF .hibytes %1101111111110000 +0016E2r 1 DF .hibytes %1101111111110001 +0016E3r 1 DF .hibytes %1101111111110010 +0016E4r 1 DF .hibytes %1101111111110011 +0016E5r 1 DF .hibytes %1101111111110100 +0016E6r 1 DF .hibytes %1101111111110101 +0016E7r 1 DF .hibytes %1101111111110110 +0016E8r 1 DF .hibytes %1101111111110111 +0016E9r 1 DF .hibytes %1101111111111000 +0016EAr 1 DF .hibytes %1101111111111001 +0016EBr 1 DF .hibytes %1101111111111010 +0016ECr 1 DF .hibytes %1101111111111011 +0016EDr 1 DF .hibytes %1101111111111100 +0016EEr 1 DF .hibytes %1101111111111101 +0016EFr 1 DF .hibytes %1101111111111110 +0016F0r 1 DF .hibytes %1101111111111111 +0016F1r 1 E0 .hibytes %1110000000000000 +0016F2r 1 E0 .hibytes %1110000000000001 +0016F3r 1 E0 .hibytes %1110000000000010 +0016F4r 1 E0 .hibytes %1110000000000011 +0016F5r 1 E0 .hibytes %1110000000000100 +0016F6r 1 E0 .hibytes %1110000000000101 +0016F7r 1 E0 .hibytes %1110000000000110 +0016F8r 1 E0 .hibytes %1110000000000111 +0016F9r 1 E0 .hibytes %1110000000001000 +0016FAr 1 E0 .hibytes %1110000000001001 +0016FBr 1 E0 .hibytes %1110000000001010 +0016FCr 1 E0 .hibytes %1110000000001011 +0016FDr 1 E0 .hibytes %1110000000001100 +0016FEr 1 E0 .hibytes %1110000000001101 +0016FFr 1 E0 .hibytes %1110000000001110 +001700r 1 E0 .hibytes %1110000000001111 +001701r 1 EF .hibytes %1110111111100001 +001702r 1 EF .hibytes %1110111111100010 +001703r 1 EF .hibytes %1110111111100011 +001704r 1 EF .hibytes %1110111111100100 +001705r 1 EF .hibytes %1110111111100101 +001706r 1 EF .hibytes %1110111111100110 +001707r 1 EF .hibytes %1110111111100111 +001708r 1 EF .hibytes %1110111111101000 +001709r 1 EF .hibytes %1110111111101001 +00170Ar 1 EF .hibytes %1110111111101010 +00170Br 1 EF .hibytes %1110111111101011 +00170Cr 1 EF .hibytes %1110111111101100 +00170Dr 1 EF .hibytes %1110111111101101 +00170Er 1 EF .hibytes %1110111111101110 +00170Fr 1 EF .hibytes %1110111111101111 +001710r 1 EF .hibytes %1110111111110000 +001711r 1 EF .hibytes %1110111111110001 +001712r 1 EF .hibytes %1110111111110010 +001713r 1 EF .hibytes %1110111111110011 +001714r 1 EF .hibytes %1110111111110100 +001715r 1 EF .hibytes %1110111111110101 +001716r 1 EF .hibytes %1110111111110110 +001717r 1 EF .hibytes %1110111111110111 +001718r 1 EF .hibytes %1110111111111000 +001719r 1 EF .hibytes %1110111111111001 +00171Ar 1 EF .hibytes %1110111111111010 +00171Br 1 EF .hibytes %1110111111111011 +00171Cr 1 EF .hibytes %1110111111111100 +00171Dr 1 EF .hibytes %1110111111111101 +00171Er 1 EF .hibytes %1110111111111110 +00171Fr 1 EF .hibytes %1110111111111111 +001720r 1 F0 .hibytes %1111000000000000 +001721r 1 F0 .hibytes %1111000000000001 +001722r 1 F0 .hibytes %1111000000000010 +001723r 1 F0 .hibytes %1111000000000011 +001724r 1 F0 .hibytes %1111000000000100 +001725r 1 F0 .hibytes %1111000000000101 +001726r 1 F0 .hibytes %1111000000000110 +001727r 1 F0 .hibytes %1111000000000111 +001728r 1 F0 .hibytes %1111000000001000 +001729r 1 F0 .hibytes %1111000000001001 +00172Ar 1 F0 .hibytes %1111000000001010 +00172Br 1 F0 .hibytes %1111000000001011 +00172Cr 1 F0 .hibytes %1111000000001100 +00172Dr 1 F0 .hibytes %1111000000001101 +00172Er 1 F0 .hibytes %1111000000001110 +00172Fr 1 F0 .hibytes %1111000000001111 +001730r 1 FF .hibytes %1111111111100001 +001731r 1 FF .hibytes %1111111111100010 +001732r 1 FF .hibytes %1111111111100011 +001733r 1 FF .hibytes %1111111111100100 +001734r 1 FF .hibytes %1111111111100101 +001735r 1 FF .hibytes %1111111111100110 +001736r 1 FF .hibytes %1111111111100111 +001737r 1 FF .hibytes %1111111111101000 +001738r 1 FF .hibytes %1111111111101001 +001739r 1 FF .hibytes %1111111111101010 +00173Ar 1 FF .hibytes %1111111111101011 +00173Br 1 FF .hibytes %1111111111101100 +00173Cr 1 FF .hibytes %1111111111101101 +00173Dr 1 FF .hibytes %1111111111101110 +00173Er 1 FF .hibytes %1111111111101111 +00173Fr 1 FF .hibytes %1111111111110000 +001740r 1 FF .hibytes %1111111111110001 +001741r 1 FF .hibytes %1111111111110010 +001742r 1 FF .hibytes %1111111111110011 +001743r 1 FF .hibytes %1111111111110100 +001744r 1 FF .hibytes %1111111111110101 +001745r 1 FF .hibytes %1111111111110110 +001746r 1 FF .hibytes %1111111111110111 +001747r 1 FF .hibytes %1111111111111000 +001748r 1 FF .hibytes %1111111111111001 +001749r 1 FF .hibytes %1111111111111010 +00174Ar 1 FF .hibytes %1111111111111011 +00174Br 1 FF .hibytes %1111111111111100 +00174Cr 1 FF .hibytes %1111111111111101 +00174Dr 1 FF .hibytes %1111111111111110 +00174Er 1 FF .hibytes %1111111111111111 +00174Fr 1 +00174Fr 1 ; multiple values on one line, decimal +00174Fr 1 00 00 00 00 .hibytes 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 +001753r 1 00 00 00 00 +001757r 1 00 00 00 00 +00175Fr 1 00 00 00 00 .hibytes 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 +001763r 1 00 00 00 00 +001767r 1 00 00 00 00 +00176Fr 1 00 00 00 00 .hibytes 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 +001773r 1 00 00 00 00 +001777r 1 00 00 00 00 +00177Fr 1 00 00 00 00 .hibytes 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 +001783r 1 00 00 00 00 +001787r 1 00 00 00 00 +00178Fr 1 00 00 00 00 .hibytes 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 +001793r 1 00 00 00 00 +001797r 1 00 00 00 00 +00179Fr 1 01 01 01 01 .hibytes 256,257,258,259,260,261,262,263,264,265,266,267,268,269,270,271 +0017A3r 1 01 01 01 01 +0017A7r 1 01 01 01 01 +0017AFr 1 0F 0F 0F 0F .hibytes 4064,4065,4066,4067,4068,4069,4070,4071,4072,4073,4074,4075,4076,4077,4078,4079 +0017B3r 1 0F 0F 0F 0F +0017B7r 1 0F 0F 0F 0F +0017BFr 1 0F 0F 0F 0F .hibytes 4080,4081,4082,4083,4084,4085,4086,4087,4088,4089,4090,4091,4092,4093,4094,4095 +0017C3r 1 0F 0F 0F 0F +0017C7r 1 0F 0F 0F 0F +0017CFr 1 10 10 10 10 .hibytes 4096,4097,4098,4099,4100,4101,4102,4103,4104,4105,4106,4107,4108,4109,4110,4111 +0017D3r 1 10 10 10 10 +0017D7r 1 10 10 10 10 +0017DFr 1 7F 7F 7F 7F .hibytes 32752,32753,32754,32755,32756,32757,32758,32759,32760,32761,32762,32763,32764,32765,32766,32767 +0017E3r 1 7F 7F 7F 7F +0017E7r 1 7F 7F 7F 7F +0017EFr 1 80 80 80 80 .hibytes 32768,32769,32770,32771,32772,32773,32774,32775,32776,32777,32778,32779,32780,32781,32782,32783 +0017F3r 1 80 80 80 80 +0017F7r 1 80 80 80 80 +0017FFr 1 9F 9F 9F 9F .hibytes 40944,40945,40946,40947,40948,40949,40950,40951,40952,40953,40954,40955,40956,40957,40958,40959 +001803r 1 9F 9F 9F 9F +001807r 1 9F 9F 9F 9F +00180Fr 1 A0 A0 A0 A0 .hibytes 40960,40961,40962,40963,40964,40965,40966,40967,40968,40969,40970,40971,40972,40973,40974,40975 +001813r 1 A0 A0 A0 A0 +001817r 1 A0 A0 A0 A0 +00181Fr 1 AF AF AF AF .hibytes 45040,45041,45042,45043,45044,45045,45046,45047,45048,45049,45050,45051,45052,45053,45054,45055 +001823r 1 AF AF AF AF +001827r 1 AF AF AF AF +00182Fr 1 B0 B0 B0 B0 .hibytes 45056,45057,45058,45059,45060,45061,45062,45063,45064,45065,45066,45067,45068,45069,45070,45071 +001833r 1 B0 B0 B0 B0 +001837r 1 B0 B0 B0 B0 +00183Fr 1 BF BF BF BF .hibytes 49136,49137,49138,49139,49140,49141,49142,49143,49144,49145,49146,49147,49148,49149,49150,49151 +001843r 1 BF BF BF BF +001847r 1 BF BF BF BF +00184Fr 1 C0 C0 C0 C0 .hibytes 49152,49153,49154,49155,49156,49157,49158,49159,49160,49161,49162,49163,49164,49165,49166,49167 +001853r 1 C0 C0 C0 C0 +001857r 1 C0 C0 C0 C0 +00185Fr 1 CF CF CF CF .hibytes 53232,53233,53234,53235,53236,53237,53238,53239,53240,53241,53242,53243,53244,53245,53246,53247 +001863r 1 CF CF CF CF +001867r 1 CF CF CF CF +00186Fr 1 D0 D0 D0 D0 .hibytes 53248,53249,53250,53251,53252,53253,53254,53255,53256,53257,53258,53259,53260,53261,53262,53263 +001873r 1 D0 D0 D0 D0 +001877r 1 D0 D0 D0 D0 +00187Fr 1 DF DF DF DF .hibytes 57328,57329,57330,57331,57332,57333,57334,57335,57336,57337,57338,57339,57340,57341,57342,57343 +001883r 1 DF DF DF DF +001887r 1 DF DF DF DF +00188Fr 1 E0 E0 E0 E0 .hibytes 57344,57345,57346,57347,57348,57349,57350,57351,57352,57353,57354,57355,57356,57357,57358,57359 +001893r 1 E0 E0 E0 E0 +001897r 1 E0 E0 E0 E0 +00189Fr 1 EF EF EF EF .hibytes 61424,61425,61426,61427,61428,61429,61430,61431,61432,61433,61434,61435,61436,61437,61438,61439 +0018A3r 1 EF EF EF EF +0018A7r 1 EF EF EF EF +0018AFr 1 F0 F0 F0 F0 .hibytes 61440,61441,61442,61443,61444,61445,61446,61447,61448,61449,61450,61451,61452,61453,61454,61455 +0018B3r 1 F0 F0 F0 F0 +0018B7r 1 F0 F0 F0 F0 +0018BFr 1 FF FF FF FF .hibytes 65520,65521,65522,65523,65524,65525,65526,65527,65528,65529,65530,65531,65532,65533,65534,65535 +0018C3r 1 FF FF FF FF +0018C7r 1 FF FF FF FF +0018CFr 1 +0018CFr 1 ; multiple values on one line, hex +0018CFr 1 00 00 00 00 .hibytes $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f +0018D3r 1 00 00 00 00 +0018D7r 1 00 00 00 00 +0018DFr 1 00 00 00 00 .hibytes $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f +0018E3r 1 00 00 00 00 +0018E7r 1 00 00 00 00 +0018EFr 1 00 00 00 00 .hibytes $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f +0018F3r 1 00 00 00 00 +0018F7r 1 00 00 00 00 +0018FFr 1 00 00 00 00 .hibytes $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f +001903r 1 00 00 00 00 +001907r 1 00 00 00 00 +00190Fr 1 00 00 00 00 .hibytes $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff +001913r 1 00 00 00 00 +001917r 1 00 00 00 00 +00191Fr 1 01 01 01 01 .hibytes $100,$101,$102,$103,$104,$105,$106,$107,$108,$109,$10a,$10b,$10c,$10d,$10e,$10f +001923r 1 01 01 01 01 +001927r 1 01 01 01 01 +00192Fr 1 0F 0F 0F 0F .hibytes $fe0,$fe1,$fe2,$fe3,$fe4,$fe5,$fe6,$fe7,$fe8,$fe9,$fea,$feb,$fec,$fed,$fee,$fef +001933r 1 0F 0F 0F 0F +001937r 1 0F 0F 0F 0F +00193Fr 1 0F 0F 0F 0F .hibytes $ff0,$ff1,$ff2,$ff3,$ff4,$ff5,$ff6,$ff7,$ff8,$ff9,$ffa,$ffb,$ffc,$ffd,$ffe,$fff +001943r 1 0F 0F 0F 0F +001947r 1 0F 0F 0F 0F +00194Fr 1 10 10 10 10 .hibytes $1000,$1001,$1002,$1003,$1004,$1005,$1006,$1007,$1008,$1009,$100a,$100b,$100c,$100d,$100e,$100f +001953r 1 10 10 10 10 +001957r 1 10 10 10 10 +00195Fr 1 7F 7F 7F 7F .hibytes $7ff0,$7ff1,$7ff2,$7ff3,$7ff4,$7ff5,$7ff6,$7ff7,$7ff8,$7ff9,$7ffa,$7ffb,$7ffc,$7ffd,$7ffe,$7fff +001963r 1 7F 7F 7F 7F +001967r 1 7F 7F 7F 7F +00196Fr 1 80 80 80 80 .hibytes $8000,$8001,$8002,$8003,$8004,$8005,$8006,$8007,$8008,$8009,$800a,$800b,$800c,$800d,$800e,$800f +001973r 1 80 80 80 80 +001977r 1 80 80 80 80 +00197Fr 1 9F 9F 9F 9F .hibytes $9ff0,$9ff1,$9ff2,$9ff3,$9ff4,$9ff5,$9ff6,$9ff7,$9ff8,$9ff9,$9ffa,$9ffb,$9ffc,$9ffd,$9ffe,$9fff +001983r 1 9F 9F 9F 9F +001987r 1 9F 9F 9F 9F +00198Fr 1 A0 A0 A0 A0 .hibytes $a000,$a001,$a002,$a003,$a004,$a005,$a006,$a007,$a008,$a009,$a00a,$a00b,$a00c,$a00d,$a00e,$a00f +001993r 1 A0 A0 A0 A0 +001997r 1 A0 A0 A0 A0 +00199Fr 1 AF AF AF AF .hibytes $aff0,$aff1,$aff2,$aff3,$aff4,$aff5,$aff6,$aff7,$aff8,$aff9,$affa,$affb,$affc,$affd,$affe,$afff +0019A3r 1 AF AF AF AF +0019A7r 1 AF AF AF AF +0019AFr 1 B0 B0 B0 B0 .hibytes $b000,$b001,$b002,$b003,$b004,$b005,$b006,$b007,$b008,$b009,$b00a,$b00b,$b00c,$b00d,$b00e,$b00f +0019B3r 1 B0 B0 B0 B0 +0019B7r 1 B0 B0 B0 B0 +0019BFr 1 BF BF BF BF .hibytes $bff0,$bff1,$bff2,$bff3,$bff4,$bff5,$bff6,$bff7,$bff8,$bff9,$bffa,$bffb,$bffc,$bffd,$bffe,$bfff +0019C3r 1 BF BF BF BF +0019C7r 1 BF BF BF BF +0019CFr 1 C0 C0 C0 C0 .hibytes $c000,$c001,$c002,$c003,$c004,$c005,$c006,$c007,$c008,$c009,$c00a,$c00b,$c00c,$c00d,$c00e,$c00f +0019D3r 1 C0 C0 C0 C0 +0019D7r 1 C0 C0 C0 C0 +0019DFr 1 CF CF CF CF .hibytes $cff0,$cff1,$cff2,$cff3,$cff4,$cff5,$cff6,$cff7,$cff8,$cff9,$cffa,$cffb,$cffc,$cffd,$cffe,$cfff +0019E3r 1 CF CF CF CF +0019E7r 1 CF CF CF CF +0019EFr 1 D0 D0 D0 D0 .hibytes $d000,$d001,$d002,$d003,$d004,$d005,$d006,$d007,$d008,$d009,$d00a,$d00b,$d00c,$d00d,$d00e,$d00f +0019F3r 1 D0 D0 D0 D0 +0019F7r 1 D0 D0 D0 D0 +0019FFr 1 DF DF DF DF .hibytes $dff0,$dff1,$dff2,$dff3,$dff4,$dff5,$dff6,$dff7,$dff8,$dff9,$dffa,$dffb,$dffc,$dffd,$dffe,$dfff +001A03r 1 DF DF DF DF +001A07r 1 DF DF DF DF +001A0Fr 1 E0 E0 E0 E0 .hibytes $e000,$e001,$e002,$e003,$e004,$e005,$e006,$e007,$e008,$e009,$e00a,$e00b,$e00c,$e00d,$e00e,$e00f +001A13r 1 E0 E0 E0 E0 +001A17r 1 E0 E0 E0 E0 +001A1Fr 1 EF EF EF EF .hibytes $eff0,$eff1,$eff2,$eff3,$eff4,$eff5,$eff6,$eff7,$eff8,$eff9,$effa,$effb,$effc,$effd,$effe,$efff +001A23r 1 EF EF EF EF +001A27r 1 EF EF EF EF +001A2Fr 1 F0 F0 F0 F0 .hibytes $f000,$f001,$f002,$f003,$f004,$f005,$f006,$f007,$f008,$f009,$f00a,$f00b,$f00c,$f00d,$f00e,$f00f +001A33r 1 F0 F0 F0 F0 +001A37r 1 F0 F0 F0 F0 +001A3Fr 1 FF FF FF FF .hibytes $fff0,$fff1,$fff2,$fff3,$fff4,$fff5,$fff6,$fff7,$fff8,$fff9,$fffa,$fffb,$fffc,$fffd,$fffe,$ffff +001A43r 1 FF FF FF FF +001A47r 1 FF FF FF FF +001A4Fr 1 +001A4Fr 1 ; multiple values on one line, alternative hex +001A4Fr 1 00 00 00 00 .hibytes 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh +001A53r 1 00 00 00 00 +001A57r 1 00 00 00 00 +001A5Fr 1 00 00 00 00 .hibytes 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh +001A63r 1 00 00 00 00 +001A67r 1 00 00 00 00 +001A6Fr 1 00 00 00 00 .hibytes 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh +001A73r 1 00 00 00 00 +001A77r 1 00 00 00 00 +001A7Fr 1 00 00 00 00 .hibytes 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh +001A83r 1 00 00 00 00 +001A87r 1 00 00 00 00 +001A8Fr 1 00 00 00 00 .hibytes 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh +001A93r 1 00 00 00 00 +001A97r 1 00 00 00 00 +001A9Fr 1 01 01 01 01 .hibytes 100h,101h,102h,103h,104h,105h,106h,107h,108h,109h,10ah,10bh,10ch,10dh,10eh,10fh +001AA3r 1 01 01 01 01 +001AA7r 1 01 01 01 01 +001AAFr 1 0F 0F 0F 0F .hibytes 0fe0h,0fe1h,0fe2h,0fe3h,0fe4h,0fe5h,0fe6h,0fe7h,0fe8h,0fe9h,0feah,0febh,0fech,0fedh,0feeh,0fefh +001AB3r 1 0F 0F 0F 0F +001AB7r 1 0F 0F 0F 0F +001ABFr 1 0F 0F 0F 0F .hibytes 0ff0h,0ff1h,0ff2h,0ff3h,0ff4h,0ff5h,0ff6h,0ff7h,0ff8h,0ff9h,0ffah,0ffbh,0ffch,0ffdh,0ffeh,0fffh +001AC3r 1 0F 0F 0F 0F +001AC7r 1 0F 0F 0F 0F +001ACFr 1 10 10 10 10 .hibytes 1000h,1001h,1002h,1003h,1004h,1005h,1006h,1007h,1008h,1009h,100ah,100bh,100ch,100dh,100eh,100fh +001AD3r 1 10 10 10 10 +001AD7r 1 10 10 10 10 +001ADFr 1 7F 7F 7F 7F .hibytes 7ff0h,7ff1h,7ff2h,7ff3h,7ff4h,7ff5h,7ff6h,7ff7h,7ff8h,7ff9h,7ffah,7ffbh,7ffch,7ffdh,7ffeh,7fffh +001AE3r 1 7F 7F 7F 7F +001AE7r 1 7F 7F 7F 7F +001AEFr 1 80 80 80 80 .hibytes 8000h,8001h,8002h,8003h,8004h,8005h,8006h,8007h,8008h,8009h,800ah,800bh,800ch,800dh,800eh,800fh +001AF3r 1 80 80 80 80 +001AF7r 1 80 80 80 80 +001AFFr 1 9F 9F 9F 9F .hibytes 9ff0h,9ff1h,9ff2h,9ff3h,9ff4h,9ff5h,9ff6h,9ff7h,9ff8h,9ff9h,9ffah,9ffbh,9ffch,9ffdh,9ffeh,9fffh +001B03r 1 9F 9F 9F 9F +001B07r 1 9F 9F 9F 9F +001B0Fr 1 A0 A0 A0 A0 .hibytes 0a000h,0a001h,0a002h,0a003h,0a004h,0a005h,0a006h,0a007h,0a008h,0a009h,0a00ah,0a00bh,0a00ch,0a00dh,0a00eh,0a00fh +001B13r 1 A0 A0 A0 A0 +001B17r 1 A0 A0 A0 A0 +001B1Fr 1 AF AF AF AF .hibytes 0aff0h,0aff1h,0aff2h,0aff3h,0aff4h,0aff5h,0aff6h,0aff7h,0aff8h,0aff9h,0affah,0affbh,0affch,0affdh,0affeh,0afffh +001B23r 1 AF AF AF AF +001B27r 1 AF AF AF AF +001B2Fr 1 B0 B0 B0 B0 .hibytes 0b000h,0b001h,0b002h,0b003h,0b004h,0b005h,0b006h,0b007h,0b008h,0b009h,0b00ah,0b00bh,0b00ch,0b00dh,0b00eh,0b00fh +001B33r 1 B0 B0 B0 B0 +001B37r 1 B0 B0 B0 B0 +001B3Fr 1 BF BF BF BF .hibytes 0bff0h,0bff1h,0bff2h,0bff3h,0bff4h,0bff5h,0bff6h,0bff7h,0bff8h,0bff9h,0bffah,0bffbh,0bffch,0bffdh,0bffeh,0bfffh +001B43r 1 BF BF BF BF +001B47r 1 BF BF BF BF +001B4Fr 1 C0 C0 C0 C0 .hibytes 0c000h,0c001h,0c002h,0c003h,0c004h,0c005h,0c006h,0c007h,0c008h,0c009h,0c00ah,0c00bh,0c00ch,0c00dh,0c00eh,0c00fh +001B53r 1 C0 C0 C0 C0 +001B57r 1 C0 C0 C0 C0 +001B5Fr 1 CF CF CF CF .hibytes 0cff0h,0cff1h,0cff2h,0cff3h,0cff4h,0cff5h,0cff6h,0cff7h,0cff8h,0cff9h,0cffah,0cffbh,0cffch,0cffdh,0cffeh,0cfffh +001B63r 1 CF CF CF CF +001B67r 1 CF CF CF CF +001B6Fr 1 D0 D0 D0 D0 .hibytes 0d000h,0d001h,0d002h,0d003h,0d004h,0d005h,0d006h,0d007h,0d008h,0d009h,0d00ah,0d00bh,0d00ch,0d00dh,0d00eh,0d00fh +001B73r 1 D0 D0 D0 D0 +001B77r 1 D0 D0 D0 D0 +001B7Fr 1 DF DF DF DF .hibytes 0dff0h,0dff1h,0dff2h,0dff3h,0dff4h,0dff5h,0dff6h,0dff7h,0dff8h,0dff9h,0dffah,0dffbh,0dffch,0dffdh,0dffeh,0dfffh +001B83r 1 DF DF DF DF +001B87r 1 DF DF DF DF +001B8Fr 1 E0 E0 E0 E0 .hibytes 0e000h,0e001h,0e002h,0e003h,0e004h,0e005h,0e006h,0e007h,0e008h,0e009h,0e00ah,0e00bh,0e00ch,0e00dh,0e00eh,0e00fh +001B93r 1 E0 E0 E0 E0 +001B97r 1 E0 E0 E0 E0 +001B9Fr 1 EF EF EF EF .hibytes 0eff0h,0eff1h,0eff2h,0eff3h,0eff4h,0eff5h,0eff6h,0eff7h,0eff8h,0eff9h,0effah,0effbh,0effch,0effdh,0effeh,0efffh +001BA3r 1 EF EF EF EF +001BA7r 1 EF EF EF EF +001BAFr 1 F0 F0 F0 F0 .hibytes 0f000h,0f001h,0f002h,0f003h,0f004h,0f005h,0f006h,0f007h,0f008h,0f009h,0f00ah,0f00bh,0f00ch,0f00dh,0f00eh,0f00fh +001BB3r 1 F0 F0 F0 F0 +001BB7r 1 F0 F0 F0 F0 +001BBFr 1 FF FF FF FF .hibytes 0fff0h,0fff1h,0fff2h,0fff3h,0fff4h,0fff5h,0fff6h,0fff7h,0fff8h,0fff9h,0fffah,0fffbh,0fffch,0fffdh,0fffeh,0ffffh +001BC3r 1 FF FF FF FF +001BC7r 1 FF FF FF FF +001BCFr 1 +001BCFr 1 ; mix some variants +001BCFr 1 00 00 00 00 .hibytes 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh +001BD3r 1 00 00 00 00 +001BD7r 1 00 00 00 00 +001BDEr 1 diff --git a/test/asm/listing/ref/107-lobytes.bin-ref b/test/asm/listing/ref/107-lobytes.bin-ref new file mode 100644 index 000000000..aa8be919f Binary files /dev/null and b/test/asm/listing/ref/107-lobytes.bin-ref differ diff --git a/test/asm/listing/ref/107-lobytes.list-ref b/test/asm/listing/ref/107-lobytes.list-ref new file mode 100644 index 000000000..c4b5f27d3 --- /dev/null +++ b/test/asm/listing/ref/107-lobytes.list-ref @@ -0,0 +1,6227 @@ +ca65 Vx.xx - Git XXXXXXXXX +Main file : 107-lobytes.s +Current file: 107-lobytes.s + +000000r 1 ; 2022-06-15 Spiro Trikaliotis +000000r 1 +000000r 1 +000000r 1 ; upper case pseudo-op +000000r 1 00 .LOBYTES 0 +000001r 1 01 .LOBYTES 1 +000002r 1 02 .LOBYTES 2 +000003r 1 03 .LOBYTES 3 +000004r 1 04 .LOBYTES 4 +000005r 1 05 .LOBYTES 5 +000006r 1 06 .LOBYTES 6 +000007r 1 07 .LOBYTES 7 +000008r 1 08 .LOBYTES 8 +000009r 1 09 .LOBYTES 9 +00000Ar 1 0A .LOBYTES 10 +00000Br 1 0B .LOBYTES 11 +00000Cr 1 0C .LOBYTES 12 +00000Dr 1 0D .LOBYTES 13 +00000Er 1 0E .LOBYTES 14 +00000Fr 1 0F .LOBYTES 15 +000010r 1 10 .LOBYTES 16 +000011r 1 11 .LOBYTES 17 +000012r 1 12 .LOBYTES 18 +000013r 1 13 .LOBYTES 19 +000014r 1 70 .LOBYTES 112 +000015r 1 71 .LOBYTES 113 +000016r 1 72 .LOBYTES 114 +000017r 1 73 .LOBYTES 115 +000018r 1 74 .LOBYTES 116 +000019r 1 75 .LOBYTES 117 +00001Ar 1 76 .LOBYTES 118 +00001Br 1 77 .LOBYTES 119 +00001Cr 1 78 .LOBYTES 120 +00001Dr 1 79 .LOBYTES 121 +00001Er 1 7A .LOBYTES 122 +00001Fr 1 7B .LOBYTES 123 +000020r 1 7C .LOBYTES 124 +000021r 1 7D .LOBYTES 125 +000022r 1 7E .LOBYTES 126 +000023r 1 7F .LOBYTES 127 +000024r 1 80 .LOBYTES 128 +000025r 1 81 .LOBYTES 129 +000026r 1 82 .LOBYTES 130 +000027r 1 83 .LOBYTES 131 +000028r 1 84 .LOBYTES 132 +000029r 1 85 .LOBYTES 133 +00002Ar 1 86 .LOBYTES 134 +00002Br 1 F0 .LOBYTES 240 +00002Cr 1 F1 .LOBYTES 241 +00002Dr 1 F2 .LOBYTES 242 +00002Er 1 F3 .LOBYTES 243 +00002Fr 1 F4 .LOBYTES 244 +000030r 1 F5 .LOBYTES 245 +000031r 1 F6 .LOBYTES 246 +000032r 1 F7 .LOBYTES 247 +000033r 1 F8 .LOBYTES 248 +000034r 1 F9 .LOBYTES 249 +000035r 1 FA .LOBYTES 250 +000036r 1 FB .LOBYTES 251 +000037r 1 FC .LOBYTES 252 +000038r 1 FD .LOBYTES 253 +000039r 1 FE .LOBYTES 254 +00003Ar 1 FF .LOBYTES 255 +00003Br 1 00 .LOBYTES 256 +00003Cr 1 01 .LOBYTES 257 +00003Dr 1 02 .LOBYTES 258 +00003Er 1 03 .LOBYTES 259 +00003Fr 1 D2 .LOBYTES 4050 +000040r 1 D3 .LOBYTES 4051 +000041r 1 D4 .LOBYTES 4052 +000042r 1 D5 .LOBYTES 4053 +000043r 1 D6 .LOBYTES 4054 +000044r 1 D7 .LOBYTES 4055 +000045r 1 D8 .LOBYTES 4056 +000046r 1 D9 .LOBYTES 4057 +000047r 1 DA .LOBYTES 4058 +000048r 1 DB .LOBYTES 4059 +000049r 1 DC .LOBYTES 4060 +00004Ar 1 DD .LOBYTES 4061 +00004Br 1 DE .LOBYTES 4062 +00004Cr 1 DF .LOBYTES 4063 +00004Dr 1 E0 .LOBYTES 4064 +00004Er 1 E1 .LOBYTES 4065 +00004Fr 1 E2 .LOBYTES 4066 +000050r 1 E3 .LOBYTES 4067 +000051r 1 E4 .LOBYTES 4068 +000052r 1 E5 .LOBYTES 4069 +000053r 1 E6 .LOBYTES 4070 +000054r 1 E7 .LOBYTES 4071 +000055r 1 E8 .LOBYTES 4072 +000056r 1 E9 .LOBYTES 4073 +000057r 1 EA .LOBYTES 4074 +000058r 1 EB .LOBYTES 4075 +000059r 1 EC .LOBYTES 4076 +00005Ar 1 ED .LOBYTES 4077 +00005Br 1 EE .LOBYTES 4078 +00005Cr 1 EF .LOBYTES 4079 +00005Dr 1 F0 .LOBYTES 4080 +00005Er 1 F1 .LOBYTES 4081 +00005Fr 1 F2 .LOBYTES 4082 +000060r 1 F3 .LOBYTES 4083 +000061r 1 F4 .LOBYTES 4084 +000062r 1 F5 .LOBYTES 4085 +000063r 1 F6 .LOBYTES 4086 +000064r 1 F7 .LOBYTES 4087 +000065r 1 F8 .LOBYTES 4088 +000066r 1 F9 .LOBYTES 4089 +000067r 1 FA .LOBYTES 4090 +000068r 1 FB .LOBYTES 4091 +000069r 1 FC .LOBYTES 4092 +00006Ar 1 FD .LOBYTES 4093 +00006Br 1 FE .LOBYTES 4094 +00006Cr 1 FF .LOBYTES 4095 +00006Dr 1 00 .LOBYTES 4096 +00006Er 1 01 .LOBYTES 4097 +00006Fr 1 02 .LOBYTES 4098 +000070r 1 03 .LOBYTES 4099 +000071r 1 04 .LOBYTES 4100 +000072r 1 05 .LOBYTES 4101 +000073r 1 06 .LOBYTES 4102 +000074r 1 07 .LOBYTES 4103 +000075r 1 08 .LOBYTES 4104 +000076r 1 F0 .LOBYTES 32752 +000077r 1 F1 .LOBYTES 32753 +000078r 1 F2 .LOBYTES 32754 +000079r 1 F3 .LOBYTES 32755 +00007Ar 1 F4 .LOBYTES 32756 +00007Br 1 F5 .LOBYTES 32757 +00007Cr 1 F6 .LOBYTES 32758 +00007Dr 1 F7 .LOBYTES 32759 +00007Er 1 F8 .LOBYTES 32760 +00007Fr 1 F9 .LOBYTES 32761 +000080r 1 FA .LOBYTES 32762 +000081r 1 FB .LOBYTES 32763 +000082r 1 FC .LOBYTES 32764 +000083r 1 FD .LOBYTES 32765 +000084r 1 FE .LOBYTES 32766 +000085r 1 FF .LOBYTES 32767 +000086r 1 00 .LOBYTES 32768 +000087r 1 01 .LOBYTES 32769 +000088r 1 02 .LOBYTES 32770 +000089r 1 03 .LOBYTES 32771 +00008Ar 1 04 .LOBYTES 32772 +00008Br 1 05 .LOBYTES 32773 +00008Cr 1 06 .LOBYTES 32774 +00008Dr 1 07 .LOBYTES 32775 +00008Er 1 08 .LOBYTES 32776 +00008Fr 1 09 .LOBYTES 32777 +000090r 1 0A .LOBYTES 32778 +000091r 1 0B .LOBYTES 32779 +000092r 1 E1 .LOBYTES 40929 +000093r 1 E2 .LOBYTES 40930 +000094r 1 E3 .LOBYTES 40931 +000095r 1 E4 .LOBYTES 40932 +000096r 1 E5 .LOBYTES 40933 +000097r 1 E6 .LOBYTES 40934 +000098r 1 E7 .LOBYTES 40935 +000099r 1 E8 .LOBYTES 40936 +00009Ar 1 E9 .LOBYTES 40937 +00009Br 1 EA .LOBYTES 40938 +00009Cr 1 EB .LOBYTES 40939 +00009Dr 1 EC .LOBYTES 40940 +00009Er 1 ED .LOBYTES 40941 +00009Fr 1 EE .LOBYTES 40942 +0000A0r 1 EF .LOBYTES 40943 +0000A1r 1 F0 .LOBYTES 40944 +0000A2r 1 F1 .LOBYTES 40945 +0000A3r 1 F2 .LOBYTES 40946 +0000A4r 1 F3 .LOBYTES 40947 +0000A5r 1 F4 .LOBYTES 40948 +0000A6r 1 F5 .LOBYTES 40949 +0000A7r 1 F6 .LOBYTES 40950 +0000A8r 1 F7 .LOBYTES 40951 +0000A9r 1 F8 .LOBYTES 40952 +0000AAr 1 F9 .LOBYTES 40953 +0000ABr 1 FA .LOBYTES 40954 +0000ACr 1 FB .LOBYTES 40955 +0000ADr 1 FC .LOBYTES 40956 +0000AEr 1 FD .LOBYTES 40957 +0000AFr 1 FE .LOBYTES 40958 +0000B0r 1 FF .LOBYTES 40959 +0000B1r 1 00 .LOBYTES 40960 +0000B2r 1 01 .LOBYTES 40961 +0000B3r 1 02 .LOBYTES 40962 +0000B4r 1 03 .LOBYTES 40963 +0000B5r 1 04 .LOBYTES 40964 +0000B6r 1 05 .LOBYTES 40965 +0000B7r 1 06 .LOBYTES 40966 +0000B8r 1 07 .LOBYTES 40967 +0000B9r 1 08 .LOBYTES 40968 +0000BAr 1 09 .LOBYTES 40969 +0000BBr 1 0A .LOBYTES 40970 +0000BCr 1 0B .LOBYTES 40971 +0000BDr 1 0C .LOBYTES 40972 +0000BEr 1 0D .LOBYTES 40973 +0000BFr 1 0E .LOBYTES 40974 +0000C0r 1 0F .LOBYTES 40975 +0000C1r 1 E1 .LOBYTES 45025 +0000C2r 1 E2 .LOBYTES 45026 +0000C3r 1 E3 .LOBYTES 45027 +0000C4r 1 E4 .LOBYTES 45028 +0000C5r 1 E5 .LOBYTES 45029 +0000C6r 1 E6 .LOBYTES 45030 +0000C7r 1 E7 .LOBYTES 45031 +0000C8r 1 E8 .LOBYTES 45032 +0000C9r 1 E9 .LOBYTES 45033 +0000CAr 1 EA .LOBYTES 45034 +0000CBr 1 EB .LOBYTES 45035 +0000CCr 1 EC .LOBYTES 45036 +0000CDr 1 ED .LOBYTES 45037 +0000CEr 1 EE .LOBYTES 45038 +0000CFr 1 EF .LOBYTES 45039 +0000D0r 1 F0 .LOBYTES 45040 +0000D1r 1 F1 .LOBYTES 45041 +0000D2r 1 F2 .LOBYTES 45042 +0000D3r 1 F3 .LOBYTES 45043 +0000D4r 1 F4 .LOBYTES 45044 +0000D5r 1 F5 .LOBYTES 45045 +0000D6r 1 F6 .LOBYTES 45046 +0000D7r 1 F7 .LOBYTES 45047 +0000D8r 1 F8 .LOBYTES 45048 +0000D9r 1 F9 .LOBYTES 45049 +0000DAr 1 FA .LOBYTES 45050 +0000DBr 1 FB .LOBYTES 45051 +0000DCr 1 FC .LOBYTES 45052 +0000DDr 1 FD .LOBYTES 45053 +0000DEr 1 FE .LOBYTES 45054 +0000DFr 1 FF .LOBYTES 45055 +0000E0r 1 00 .LOBYTES 45056 +0000E1r 1 01 .LOBYTES 45057 +0000E2r 1 02 .LOBYTES 45058 +0000E3r 1 03 .LOBYTES 45059 +0000E4r 1 04 .LOBYTES 45060 +0000E5r 1 05 .LOBYTES 45061 +0000E6r 1 06 .LOBYTES 45062 +0000E7r 1 07 .LOBYTES 45063 +0000E8r 1 08 .LOBYTES 45064 +0000E9r 1 09 .LOBYTES 45065 +0000EAr 1 0A .LOBYTES 45066 +0000EBr 1 0B .LOBYTES 45067 +0000ECr 1 0C .LOBYTES 45068 +0000EDr 1 0D .LOBYTES 45069 +0000EEr 1 0E .LOBYTES 45070 +0000EFr 1 0F .LOBYTES 45071 +0000F0r 1 E1 .LOBYTES 49121 +0000F1r 1 E2 .LOBYTES 49122 +0000F2r 1 E3 .LOBYTES 49123 +0000F3r 1 E4 .LOBYTES 49124 +0000F4r 1 E5 .LOBYTES 49125 +0000F5r 1 E6 .LOBYTES 49126 +0000F6r 1 E7 .LOBYTES 49127 +0000F7r 1 E8 .LOBYTES 49128 +0000F8r 1 E9 .LOBYTES 49129 +0000F9r 1 EA .LOBYTES 49130 +0000FAr 1 EB .LOBYTES 49131 +0000FBr 1 EC .LOBYTES 49132 +0000FCr 1 ED .LOBYTES 49133 +0000FDr 1 EE .LOBYTES 49134 +0000FEr 1 EF .LOBYTES 49135 +0000FFr 1 F0 .LOBYTES 49136 +000100r 1 F1 .LOBYTES 49137 +000101r 1 F2 .LOBYTES 49138 +000102r 1 F3 .LOBYTES 49139 +000103r 1 F4 .LOBYTES 49140 +000104r 1 F5 .LOBYTES 49141 +000105r 1 F6 .LOBYTES 49142 +000106r 1 F7 .LOBYTES 49143 +000107r 1 F8 .LOBYTES 49144 +000108r 1 F9 .LOBYTES 49145 +000109r 1 FA .LOBYTES 49146 +00010Ar 1 FB .LOBYTES 49147 +00010Br 1 FC .LOBYTES 49148 +00010Cr 1 FD .LOBYTES 49149 +00010Dr 1 FE .LOBYTES 49150 +00010Er 1 FF .LOBYTES 49151 +00010Fr 1 00 .LOBYTES 49152 +000110r 1 01 .LOBYTES 49153 +000111r 1 02 .LOBYTES 49154 +000112r 1 03 .LOBYTES 49155 +000113r 1 04 .LOBYTES 49156 +000114r 1 05 .LOBYTES 49157 +000115r 1 06 .LOBYTES 49158 +000116r 1 07 .LOBYTES 49159 +000117r 1 08 .LOBYTES 49160 +000118r 1 09 .LOBYTES 49161 +000119r 1 0A .LOBYTES 49162 +00011Ar 1 0B .LOBYTES 49163 +00011Br 1 0C .LOBYTES 49164 +00011Cr 1 0D .LOBYTES 49165 +00011Dr 1 0E .LOBYTES 49166 +00011Er 1 0F .LOBYTES 49167 +00011Fr 1 E1 .LOBYTES 53217 +000120r 1 E2 .LOBYTES 53218 +000121r 1 E3 .LOBYTES 53219 +000122r 1 E4 .LOBYTES 53220 +000123r 1 E5 .LOBYTES 53221 +000124r 1 E6 .LOBYTES 53222 +000125r 1 E7 .LOBYTES 53223 +000126r 1 E8 .LOBYTES 53224 +000127r 1 E9 .LOBYTES 53225 +000128r 1 EA .LOBYTES 53226 +000129r 1 EB .LOBYTES 53227 +00012Ar 1 EC .LOBYTES 53228 +00012Br 1 ED .LOBYTES 53229 +00012Cr 1 EE .LOBYTES 53230 +00012Dr 1 EF .LOBYTES 53231 +00012Er 1 F0 .LOBYTES 53232 +00012Fr 1 F1 .LOBYTES 53233 +000130r 1 F2 .LOBYTES 53234 +000131r 1 F3 .LOBYTES 53235 +000132r 1 F4 .LOBYTES 53236 +000133r 1 F5 .LOBYTES 53237 +000134r 1 F6 .LOBYTES 53238 +000135r 1 F7 .LOBYTES 53239 +000136r 1 F8 .LOBYTES 53240 +000137r 1 F9 .LOBYTES 53241 +000138r 1 FA .LOBYTES 53242 +000139r 1 FB .LOBYTES 53243 +00013Ar 1 FC .LOBYTES 53244 +00013Br 1 FD .LOBYTES 53245 +00013Cr 1 FE .LOBYTES 53246 +00013Dr 1 FF .LOBYTES 53247 +00013Er 1 00 .LOBYTES 53248 +00013Fr 1 01 .LOBYTES 53249 +000140r 1 02 .LOBYTES 53250 +000141r 1 03 .LOBYTES 53251 +000142r 1 04 .LOBYTES 53252 +000143r 1 05 .LOBYTES 53253 +000144r 1 06 .LOBYTES 53254 +000145r 1 07 .LOBYTES 53255 +000146r 1 08 .LOBYTES 53256 +000147r 1 09 .LOBYTES 53257 +000148r 1 0A .LOBYTES 53258 +000149r 1 0B .LOBYTES 53259 +00014Ar 1 0C .LOBYTES 53260 +00014Br 1 0D .LOBYTES 53261 +00014Cr 1 0E .LOBYTES 53262 +00014Dr 1 0F .LOBYTES 53263 +00014Er 1 E1 .LOBYTES 57313 +00014Fr 1 E2 .LOBYTES 57314 +000150r 1 E3 .LOBYTES 57315 +000151r 1 E4 .LOBYTES 57316 +000152r 1 E5 .LOBYTES 57317 +000153r 1 E6 .LOBYTES 57318 +000154r 1 E7 .LOBYTES 57319 +000155r 1 E8 .LOBYTES 57320 +000156r 1 E9 .LOBYTES 57321 +000157r 1 EA .LOBYTES 57322 +000158r 1 EB .LOBYTES 57323 +000159r 1 EC .LOBYTES 57324 +00015Ar 1 ED .LOBYTES 57325 +00015Br 1 EE .LOBYTES 57326 +00015Cr 1 EF .LOBYTES 57327 +00015Dr 1 F0 .LOBYTES 57328 +00015Er 1 F1 .LOBYTES 57329 +00015Fr 1 F2 .LOBYTES 57330 +000160r 1 F3 .LOBYTES 57331 +000161r 1 F4 .LOBYTES 57332 +000162r 1 F5 .LOBYTES 57333 +000163r 1 F6 .LOBYTES 57334 +000164r 1 F7 .LOBYTES 57335 +000165r 1 F8 .LOBYTES 57336 +000166r 1 F9 .LOBYTES 57337 +000167r 1 FA .LOBYTES 57338 +000168r 1 FB .LOBYTES 57339 +000169r 1 FC .LOBYTES 57340 +00016Ar 1 FD .LOBYTES 57341 +00016Br 1 FE .LOBYTES 57342 +00016Cr 1 FF .LOBYTES 57343 +00016Dr 1 00 .LOBYTES 57344 +00016Er 1 01 .LOBYTES 57345 +00016Fr 1 02 .LOBYTES 57346 +000170r 1 03 .LOBYTES 57347 +000171r 1 04 .LOBYTES 57348 +000172r 1 05 .LOBYTES 57349 +000173r 1 06 .LOBYTES 57350 +000174r 1 07 .LOBYTES 57351 +000175r 1 08 .LOBYTES 57352 +000176r 1 09 .LOBYTES 57353 +000177r 1 0A .LOBYTES 57354 +000178r 1 0B .LOBYTES 57355 +000179r 1 0C .LOBYTES 57356 +00017Ar 1 0D .LOBYTES 57357 +00017Br 1 0E .LOBYTES 57358 +00017Cr 1 0F .LOBYTES 57359 +00017Dr 1 E1 .LOBYTES 61409 +00017Er 1 E2 .LOBYTES 61410 +00017Fr 1 E3 .LOBYTES 61411 +000180r 1 E4 .LOBYTES 61412 +000181r 1 E5 .LOBYTES 61413 +000182r 1 E6 .LOBYTES 61414 +000183r 1 E7 .LOBYTES 61415 +000184r 1 E8 .LOBYTES 61416 +000185r 1 E9 .LOBYTES 61417 +000186r 1 EA .LOBYTES 61418 +000187r 1 EB .LOBYTES 61419 +000188r 1 EC .LOBYTES 61420 +000189r 1 ED .LOBYTES 61421 +00018Ar 1 EE .LOBYTES 61422 +00018Br 1 EF .LOBYTES 61423 +00018Cr 1 F0 .LOBYTES 61424 +00018Dr 1 F1 .LOBYTES 61425 +00018Er 1 F2 .LOBYTES 61426 +00018Fr 1 F3 .LOBYTES 61427 +000190r 1 F4 .LOBYTES 61428 +000191r 1 F5 .LOBYTES 61429 +000192r 1 F6 .LOBYTES 61430 +000193r 1 F7 .LOBYTES 61431 +000194r 1 F8 .LOBYTES 61432 +000195r 1 F9 .LOBYTES 61433 +000196r 1 FA .LOBYTES 61434 +000197r 1 FB .LOBYTES 61435 +000198r 1 FC .LOBYTES 61436 +000199r 1 FD .LOBYTES 61437 +00019Ar 1 FE .LOBYTES 61438 +00019Br 1 FF .LOBYTES 61439 +00019Cr 1 00 .LOBYTES 61440 +00019Dr 1 01 .LOBYTES 61441 +00019Er 1 02 .LOBYTES 61442 +00019Fr 1 03 .LOBYTES 61443 +0001A0r 1 04 .LOBYTES 61444 +0001A1r 1 05 .LOBYTES 61445 +0001A2r 1 06 .LOBYTES 61446 +0001A3r 1 07 .LOBYTES 61447 +0001A4r 1 08 .LOBYTES 61448 +0001A5r 1 09 .LOBYTES 61449 +0001A6r 1 0A .LOBYTES 61450 +0001A7r 1 0B .LOBYTES 61451 +0001A8r 1 0C .LOBYTES 61452 +0001A9r 1 0D .LOBYTES 61453 +0001AAr 1 0E .LOBYTES 61454 +0001ABr 1 0F .LOBYTES 61455 +0001ACr 1 E1 .LOBYTES 65505 +0001ADr 1 E2 .LOBYTES 65506 +0001AEr 1 E3 .LOBYTES 65507 +0001AFr 1 E4 .LOBYTES 65508 +0001B0r 1 E5 .LOBYTES 65509 +0001B1r 1 E6 .LOBYTES 65510 +0001B2r 1 E7 .LOBYTES 65511 +0001B3r 1 E8 .LOBYTES 65512 +0001B4r 1 E9 .LOBYTES 65513 +0001B5r 1 EA .LOBYTES 65514 +0001B6r 1 EB .LOBYTES 65515 +0001B7r 1 EC .LOBYTES 65516 +0001B8r 1 ED .LOBYTES 65517 +0001B9r 1 EE .LOBYTES 65518 +0001BAr 1 EF .LOBYTES 65519 +0001BBr 1 F0 .LOBYTES 65520 +0001BCr 1 F1 .LOBYTES 65521 +0001BDr 1 F2 .LOBYTES 65522 +0001BEr 1 F3 .LOBYTES 65523 +0001BFr 1 F4 .LOBYTES 65524 +0001C0r 1 F5 .LOBYTES 65525 +0001C1r 1 F6 .LOBYTES 65526 +0001C2r 1 F7 .LOBYTES 65527 +0001C3r 1 F8 .LOBYTES 65528 +0001C4r 1 F9 .LOBYTES 65529 +0001C5r 1 FA .LOBYTES 65530 +0001C6r 1 FB .LOBYTES 65531 +0001C7r 1 FC .LOBYTES 65532 +0001C8r 1 FD .LOBYTES 65533 +0001C9r 1 FE .LOBYTES 65534 +0001CAr 1 FF .LOBYTES 65535 +0001CBr 1 +0001CBr 1 ; lower case pseudo-op +0001CBr 1 00 .lobytes 0 +0001CCr 1 01 .lobytes 1 +0001CDr 1 02 .lobytes 2 +0001CEr 1 03 .lobytes 3 +0001CFr 1 04 .lobytes 4 +0001D0r 1 05 .lobytes 5 +0001D1r 1 06 .lobytes 6 +0001D2r 1 07 .lobytes 7 +0001D3r 1 08 .lobytes 8 +0001D4r 1 09 .lobytes 9 +0001D5r 1 0A .lobytes 10 +0001D6r 1 0B .lobytes 11 +0001D7r 1 0C .lobytes 12 +0001D8r 1 0D .lobytes 13 +0001D9r 1 0E .lobytes 14 +0001DAr 1 0F .lobytes 15 +0001DBr 1 10 .lobytes 16 +0001DCr 1 11 .lobytes 17 +0001DDr 1 12 .lobytes 18 +0001DEr 1 13 .lobytes 19 +0001DFr 1 70 .lobytes 112 +0001E0r 1 71 .lobytes 113 +0001E1r 1 72 .lobytes 114 +0001E2r 1 73 .lobytes 115 +0001E3r 1 74 .lobytes 116 +0001E4r 1 75 .lobytes 117 +0001E5r 1 76 .lobytes 118 +0001E6r 1 77 .lobytes 119 +0001E7r 1 78 .lobytes 120 +0001E8r 1 79 .lobytes 121 +0001E9r 1 7A .lobytes 122 +0001EAr 1 7B .lobytes 123 +0001EBr 1 7C .lobytes 124 +0001ECr 1 7D .lobytes 125 +0001EDr 1 7E .lobytes 126 +0001EEr 1 7F .lobytes 127 +0001EFr 1 80 .lobytes 128 +0001F0r 1 81 .lobytes 129 +0001F1r 1 82 .lobytes 130 +0001F2r 1 83 .lobytes 131 +0001F3r 1 84 .lobytes 132 +0001F4r 1 85 .lobytes 133 +0001F5r 1 86 .lobytes 134 +0001F6r 1 F0 .lobytes 240 +0001F7r 1 F1 .lobytes 241 +0001F8r 1 F2 .lobytes 242 +0001F9r 1 F3 .lobytes 243 +0001FAr 1 F4 .lobytes 244 +0001FBr 1 F5 .lobytes 245 +0001FCr 1 F6 .lobytes 246 +0001FDr 1 F7 .lobytes 247 +0001FEr 1 F8 .lobytes 248 +0001FFr 1 F9 .lobytes 249 +000200r 1 FA .lobytes 250 +000201r 1 FB .lobytes 251 +000202r 1 FC .lobytes 252 +000203r 1 FD .lobytes 253 +000204r 1 FE .lobytes 254 +000205r 1 FF .lobytes 255 +000206r 1 00 .lobytes 256 +000207r 1 01 .lobytes 257 +000208r 1 02 .lobytes 258 +000209r 1 03 .lobytes 259 +00020Ar 1 D2 .lobytes 4050 +00020Br 1 D3 .lobytes 4051 +00020Cr 1 D4 .lobytes 4052 +00020Dr 1 D5 .lobytes 4053 +00020Er 1 D6 .lobytes 4054 +00020Fr 1 D7 .lobytes 4055 +000210r 1 D8 .lobytes 4056 +000211r 1 D9 .lobytes 4057 +000212r 1 DA .lobytes 4058 +000213r 1 DB .lobytes 4059 +000214r 1 DC .lobytes 4060 +000215r 1 DD .lobytes 4061 +000216r 1 DE .lobytes 4062 +000217r 1 DF .lobytes 4063 +000218r 1 E0 .lobytes 4064 +000219r 1 E1 .lobytes 4065 +00021Ar 1 E2 .lobytes 4066 +00021Br 1 E3 .lobytes 4067 +00021Cr 1 E4 .lobytes 4068 +00021Dr 1 E5 .lobytes 4069 +00021Er 1 E6 .lobytes 4070 +00021Fr 1 E7 .lobytes 4071 +000220r 1 E8 .lobytes 4072 +000221r 1 E9 .lobytes 4073 +000222r 1 EA .lobytes 4074 +000223r 1 EB .lobytes 4075 +000224r 1 EC .lobytes 4076 +000225r 1 ED .lobytes 4077 +000226r 1 EE .lobytes 4078 +000227r 1 EF .lobytes 4079 +000228r 1 F0 .lobytes 4080 +000229r 1 F1 .lobytes 4081 +00022Ar 1 F2 .lobytes 4082 +00022Br 1 F3 .lobytes 4083 +00022Cr 1 F4 .lobytes 4084 +00022Dr 1 F5 .lobytes 4085 +00022Er 1 F6 .lobytes 4086 +00022Fr 1 F7 .lobytes 4087 +000230r 1 F8 .lobytes 4088 +000231r 1 F9 .lobytes 4089 +000232r 1 FA .lobytes 4090 +000233r 1 FB .lobytes 4091 +000234r 1 FC .lobytes 4092 +000235r 1 FD .lobytes 4093 +000236r 1 FE .lobytes 4094 +000237r 1 FF .lobytes 4095 +000238r 1 00 .lobytes 4096 +000239r 1 01 .lobytes 4097 +00023Ar 1 02 .lobytes 4098 +00023Br 1 03 .lobytes 4099 +00023Cr 1 04 .lobytes 4100 +00023Dr 1 05 .lobytes 4101 +00023Er 1 06 .lobytes 4102 +00023Fr 1 07 .lobytes 4103 +000240r 1 08 .lobytes 4104 +000241r 1 F0 .lobytes 32752 +000242r 1 F1 .lobytes 32753 +000243r 1 F2 .lobytes 32754 +000244r 1 F3 .lobytes 32755 +000245r 1 F4 .lobytes 32756 +000246r 1 F5 .lobytes 32757 +000247r 1 F6 .lobytes 32758 +000248r 1 F7 .lobytes 32759 +000249r 1 F8 .lobytes 32760 +00024Ar 1 F9 .lobytes 32761 +00024Br 1 FA .lobytes 32762 +00024Cr 1 FB .lobytes 32763 +00024Dr 1 FC .lobytes 32764 +00024Er 1 FD .lobytes 32765 +00024Fr 1 FE .lobytes 32766 +000250r 1 FF .lobytes 32767 +000251r 1 00 .lobytes 32768 +000252r 1 01 .lobytes 32769 +000253r 1 02 .lobytes 32770 +000254r 1 03 .lobytes 32771 +000255r 1 04 .lobytes 32772 +000256r 1 05 .lobytes 32773 +000257r 1 06 .lobytes 32774 +000258r 1 07 .lobytes 32775 +000259r 1 08 .lobytes 32776 +00025Ar 1 09 .lobytes 32777 +00025Br 1 0A .lobytes 32778 +00025Cr 1 0B .lobytes 32779 +00025Dr 1 E1 .lobytes 40929 +00025Er 1 E2 .lobytes 40930 +00025Fr 1 E3 .lobytes 40931 +000260r 1 E4 .lobytes 40932 +000261r 1 E5 .lobytes 40933 +000262r 1 E6 .lobytes 40934 +000263r 1 E7 .lobytes 40935 +000264r 1 E8 .lobytes 40936 +000265r 1 E9 .lobytes 40937 +000266r 1 EA .lobytes 40938 +000267r 1 EB .lobytes 40939 +000268r 1 EC .lobytes 40940 +000269r 1 ED .lobytes 40941 +00026Ar 1 EE .lobytes 40942 +00026Br 1 EF .lobytes 40943 +00026Cr 1 F0 .lobytes 40944 +00026Dr 1 F1 .lobytes 40945 +00026Er 1 F2 .lobytes 40946 +00026Fr 1 F3 .lobytes 40947 +000270r 1 F4 .lobytes 40948 +000271r 1 F5 .lobytes 40949 +000272r 1 F6 .lobytes 40950 +000273r 1 F7 .lobytes 40951 +000274r 1 F8 .lobytes 40952 +000275r 1 F9 .lobytes 40953 +000276r 1 FA .lobytes 40954 +000277r 1 FB .lobytes 40955 +000278r 1 FC .lobytes 40956 +000279r 1 FD .lobytes 40957 +00027Ar 1 FE .lobytes 40958 +00027Br 1 FF .lobytes 40959 +00027Cr 1 00 .lobytes 40960 +00027Dr 1 01 .lobytes 40961 +00027Er 1 02 .lobytes 40962 +00027Fr 1 03 .lobytes 40963 +000280r 1 04 .lobytes 40964 +000281r 1 05 .lobytes 40965 +000282r 1 06 .lobytes 40966 +000283r 1 07 .lobytes 40967 +000284r 1 08 .lobytes 40968 +000285r 1 09 .lobytes 40969 +000286r 1 0A .lobytes 40970 +000287r 1 0B .lobytes 40971 +000288r 1 0C .lobytes 40972 +000289r 1 0D .lobytes 40973 +00028Ar 1 0E .lobytes 40974 +00028Br 1 0F .lobytes 40975 +00028Cr 1 E1 .lobytes 45025 +00028Dr 1 E2 .lobytes 45026 +00028Er 1 E3 .lobytes 45027 +00028Fr 1 E4 .lobytes 45028 +000290r 1 E5 .lobytes 45029 +000291r 1 E6 .lobytes 45030 +000292r 1 E7 .lobytes 45031 +000293r 1 E8 .lobytes 45032 +000294r 1 E9 .lobytes 45033 +000295r 1 EA .lobytes 45034 +000296r 1 EB .lobytes 45035 +000297r 1 EC .lobytes 45036 +000298r 1 ED .lobytes 45037 +000299r 1 EE .lobytes 45038 +00029Ar 1 EF .lobytes 45039 +00029Br 1 F0 .lobytes 45040 +00029Cr 1 F1 .lobytes 45041 +00029Dr 1 F2 .lobytes 45042 +00029Er 1 F3 .lobytes 45043 +00029Fr 1 F4 .lobytes 45044 +0002A0r 1 F5 .lobytes 45045 +0002A1r 1 F6 .lobytes 45046 +0002A2r 1 F7 .lobytes 45047 +0002A3r 1 F8 .lobytes 45048 +0002A4r 1 F9 .lobytes 45049 +0002A5r 1 FA .lobytes 45050 +0002A6r 1 FB .lobytes 45051 +0002A7r 1 FC .lobytes 45052 +0002A8r 1 FD .lobytes 45053 +0002A9r 1 FE .lobytes 45054 +0002AAr 1 FF .lobytes 45055 +0002ABr 1 00 .lobytes 45056 +0002ACr 1 01 .lobytes 45057 +0002ADr 1 02 .lobytes 45058 +0002AEr 1 03 .lobytes 45059 +0002AFr 1 04 .lobytes 45060 +0002B0r 1 05 .lobytes 45061 +0002B1r 1 06 .lobytes 45062 +0002B2r 1 07 .lobytes 45063 +0002B3r 1 08 .lobytes 45064 +0002B4r 1 09 .lobytes 45065 +0002B5r 1 0A .lobytes 45066 +0002B6r 1 0B .lobytes 45067 +0002B7r 1 0C .lobytes 45068 +0002B8r 1 0D .lobytes 45069 +0002B9r 1 0E .lobytes 45070 +0002BAr 1 0F .lobytes 45071 +0002BBr 1 E1 .lobytes 49121 +0002BCr 1 E2 .lobytes 49122 +0002BDr 1 E3 .lobytes 49123 +0002BEr 1 E4 .lobytes 49124 +0002BFr 1 E5 .lobytes 49125 +0002C0r 1 E6 .lobytes 49126 +0002C1r 1 E7 .lobytes 49127 +0002C2r 1 E8 .lobytes 49128 +0002C3r 1 E9 .lobytes 49129 +0002C4r 1 EA .lobytes 49130 +0002C5r 1 EB .lobytes 49131 +0002C6r 1 EC .lobytes 49132 +0002C7r 1 ED .lobytes 49133 +0002C8r 1 EE .lobytes 49134 +0002C9r 1 EF .lobytes 49135 +0002CAr 1 F0 .lobytes 49136 +0002CBr 1 F1 .lobytes 49137 +0002CCr 1 F2 .lobytes 49138 +0002CDr 1 F3 .lobytes 49139 +0002CEr 1 F4 .lobytes 49140 +0002CFr 1 F5 .lobytes 49141 +0002D0r 1 F6 .lobytes 49142 +0002D1r 1 F7 .lobytes 49143 +0002D2r 1 F8 .lobytes 49144 +0002D3r 1 F9 .lobytes 49145 +0002D4r 1 FA .lobytes 49146 +0002D5r 1 FB .lobytes 49147 +0002D6r 1 FC .lobytes 49148 +0002D7r 1 FD .lobytes 49149 +0002D8r 1 FE .lobytes 49150 +0002D9r 1 FF .lobytes 49151 +0002DAr 1 00 .lobytes 49152 +0002DBr 1 01 .lobytes 49153 +0002DCr 1 02 .lobytes 49154 +0002DDr 1 03 .lobytes 49155 +0002DEr 1 04 .lobytes 49156 +0002DFr 1 05 .lobytes 49157 +0002E0r 1 06 .lobytes 49158 +0002E1r 1 07 .lobytes 49159 +0002E2r 1 08 .lobytes 49160 +0002E3r 1 09 .lobytes 49161 +0002E4r 1 0A .lobytes 49162 +0002E5r 1 0B .lobytes 49163 +0002E6r 1 0C .lobytes 49164 +0002E7r 1 0D .lobytes 49165 +0002E8r 1 0E .lobytes 49166 +0002E9r 1 0F .lobytes 49167 +0002EAr 1 E1 .lobytes 53217 +0002EBr 1 E2 .lobytes 53218 +0002ECr 1 E3 .lobytes 53219 +0002EDr 1 E4 .lobytes 53220 +0002EEr 1 E5 .lobytes 53221 +0002EFr 1 E6 .lobytes 53222 +0002F0r 1 E7 .lobytes 53223 +0002F1r 1 E8 .lobytes 53224 +0002F2r 1 E9 .lobytes 53225 +0002F3r 1 EA .lobytes 53226 +0002F4r 1 EB .lobytes 53227 +0002F5r 1 EC .lobytes 53228 +0002F6r 1 ED .lobytes 53229 +0002F7r 1 EE .lobytes 53230 +0002F8r 1 EF .lobytes 53231 +0002F9r 1 F0 .lobytes 53232 +0002FAr 1 F1 .lobytes 53233 +0002FBr 1 F2 .lobytes 53234 +0002FCr 1 F3 .lobytes 53235 +0002FDr 1 F4 .lobytes 53236 +0002FEr 1 F5 .lobytes 53237 +0002FFr 1 F6 .lobytes 53238 +000300r 1 F7 .lobytes 53239 +000301r 1 F8 .lobytes 53240 +000302r 1 F9 .lobytes 53241 +000303r 1 FA .lobytes 53242 +000304r 1 FB .lobytes 53243 +000305r 1 FC .lobytes 53244 +000306r 1 FD .lobytes 53245 +000307r 1 FE .lobytes 53246 +000308r 1 FF .lobytes 53247 +000309r 1 00 .lobytes 53248 +00030Ar 1 01 .lobytes 53249 +00030Br 1 02 .lobytes 53250 +00030Cr 1 03 .lobytes 53251 +00030Dr 1 04 .lobytes 53252 +00030Er 1 05 .lobytes 53253 +00030Fr 1 06 .lobytes 53254 +000310r 1 07 .lobytes 53255 +000311r 1 08 .lobytes 53256 +000312r 1 09 .lobytes 53257 +000313r 1 0A .lobytes 53258 +000314r 1 0B .lobytes 53259 +000315r 1 0C .lobytes 53260 +000316r 1 0D .lobytes 53261 +000317r 1 0E .lobytes 53262 +000318r 1 0F .lobytes 53263 +000319r 1 E1 .lobytes 57313 +00031Ar 1 E2 .lobytes 57314 +00031Br 1 E3 .lobytes 57315 +00031Cr 1 E4 .lobytes 57316 +00031Dr 1 E5 .lobytes 57317 +00031Er 1 E6 .lobytes 57318 +00031Fr 1 E7 .lobytes 57319 +000320r 1 E8 .lobytes 57320 +000321r 1 E9 .lobytes 57321 +000322r 1 EA .lobytes 57322 +000323r 1 EB .lobytes 57323 +000324r 1 EC .lobytes 57324 +000325r 1 ED .lobytes 57325 +000326r 1 EE .lobytes 57326 +000327r 1 EF .lobytes 57327 +000328r 1 F0 .lobytes 57328 +000329r 1 F1 .lobytes 57329 +00032Ar 1 F2 .lobytes 57330 +00032Br 1 F3 .lobytes 57331 +00032Cr 1 F4 .lobytes 57332 +00032Dr 1 F5 .lobytes 57333 +00032Er 1 F6 .lobytes 57334 +00032Fr 1 F7 .lobytes 57335 +000330r 1 F8 .lobytes 57336 +000331r 1 F9 .lobytes 57337 +000332r 1 FA .lobytes 57338 +000333r 1 FB .lobytes 57339 +000334r 1 FC .lobytes 57340 +000335r 1 FD .lobytes 57341 +000336r 1 FE .lobytes 57342 +000337r 1 FF .lobytes 57343 +000338r 1 00 .lobytes 57344 +000339r 1 01 .lobytes 57345 +00033Ar 1 02 .lobytes 57346 +00033Br 1 03 .lobytes 57347 +00033Cr 1 04 .lobytes 57348 +00033Dr 1 05 .lobytes 57349 +00033Er 1 06 .lobytes 57350 +00033Fr 1 07 .lobytes 57351 +000340r 1 08 .lobytes 57352 +000341r 1 09 .lobytes 57353 +000342r 1 0A .lobytes 57354 +000343r 1 0B .lobytes 57355 +000344r 1 0C .lobytes 57356 +000345r 1 0D .lobytes 57357 +000346r 1 0E .lobytes 57358 +000347r 1 0F .lobytes 57359 +000348r 1 E1 .lobytes 61409 +000349r 1 E2 .lobytes 61410 +00034Ar 1 E3 .lobytes 61411 +00034Br 1 E4 .lobytes 61412 +00034Cr 1 E5 .lobytes 61413 +00034Dr 1 E6 .lobytes 61414 +00034Er 1 E7 .lobytes 61415 +00034Fr 1 E8 .lobytes 61416 +000350r 1 E9 .lobytes 61417 +000351r 1 EA .lobytes 61418 +000352r 1 EB .lobytes 61419 +000353r 1 EC .lobytes 61420 +000354r 1 ED .lobytes 61421 +000355r 1 EE .lobytes 61422 +000356r 1 EF .lobytes 61423 +000357r 1 F0 .lobytes 61424 +000358r 1 F1 .lobytes 61425 +000359r 1 F2 .lobytes 61426 +00035Ar 1 F3 .lobytes 61427 +00035Br 1 F4 .lobytes 61428 +00035Cr 1 F5 .lobytes 61429 +00035Dr 1 F6 .lobytes 61430 +00035Er 1 F7 .lobytes 61431 +00035Fr 1 F8 .lobytes 61432 +000360r 1 F9 .lobytes 61433 +000361r 1 FA .lobytes 61434 +000362r 1 FB .lobytes 61435 +000363r 1 FC .lobytes 61436 +000364r 1 FD .lobytes 61437 +000365r 1 FE .lobytes 61438 +000366r 1 FF .lobytes 61439 +000367r 1 00 .lobytes 61440 +000368r 1 01 .lobytes 61441 +000369r 1 02 .lobytes 61442 +00036Ar 1 03 .lobytes 61443 +00036Br 1 04 .lobytes 61444 +00036Cr 1 05 .lobytes 61445 +00036Dr 1 06 .lobytes 61446 +00036Er 1 07 .lobytes 61447 +00036Fr 1 08 .lobytes 61448 +000370r 1 09 .lobytes 61449 +000371r 1 0A .lobytes 61450 +000372r 1 0B .lobytes 61451 +000373r 1 0C .lobytes 61452 +000374r 1 0D .lobytes 61453 +000375r 1 0E .lobytes 61454 +000376r 1 0F .lobytes 61455 +000377r 1 E1 .lobytes 65505 +000378r 1 E2 .lobytes 65506 +000379r 1 E3 .lobytes 65507 +00037Ar 1 E4 .lobytes 65508 +00037Br 1 E5 .lobytes 65509 +00037Cr 1 E6 .lobytes 65510 +00037Dr 1 E7 .lobytes 65511 +00037Er 1 E8 .lobytes 65512 +00037Fr 1 E9 .lobytes 65513 +000380r 1 EA .lobytes 65514 +000381r 1 EB .lobytes 65515 +000382r 1 EC .lobytes 65516 +000383r 1 ED .lobytes 65517 +000384r 1 EE .lobytes 65518 +000385r 1 EF .lobytes 65519 +000386r 1 F0 .lobytes 65520 +000387r 1 F1 .lobytes 65521 +000388r 1 F2 .lobytes 65522 +000389r 1 F3 .lobytes 65523 +00038Ar 1 F4 .lobytes 65524 +00038Br 1 F5 .lobytes 65525 +00038Cr 1 F6 .lobytes 65526 +00038Dr 1 F7 .lobytes 65527 +00038Er 1 F8 .lobytes 65528 +00038Fr 1 F9 .lobytes 65529 +000390r 1 FA .lobytes 65530 +000391r 1 FB .lobytes 65531 +000392r 1 FC .lobytes 65532 +000393r 1 FD .lobytes 65533 +000394r 1 FE .lobytes 65534 +000395r 1 FF .lobytes 65535 +000396r 1 +000396r 1 ; hex values +000396r 1 00 .lobytes $0 +000397r 1 01 .lobytes $1 +000398r 1 02 .lobytes $2 +000399r 1 03 .lobytes $3 +00039Ar 1 04 .lobytes $4 +00039Br 1 05 .lobytes $5 +00039Cr 1 06 .lobytes $6 +00039Dr 1 07 .lobytes $7 +00039Er 1 08 .lobytes $8 +00039Fr 1 09 .lobytes $9 +0003A0r 1 0A .lobytes $a +0003A1r 1 0B .lobytes $b +0003A2r 1 0C .lobytes $c +0003A3r 1 0D .lobytes $d +0003A4r 1 0E .lobytes $e +0003A5r 1 0F .lobytes $f +0003A6r 1 10 .lobytes $10 +0003A7r 1 11 .lobytes $11 +0003A8r 1 12 .lobytes $12 +0003A9r 1 13 .lobytes $13 +0003AAr 1 70 .lobytes $70 +0003ABr 1 71 .lobytes $71 +0003ACr 1 72 .lobytes $72 +0003ADr 1 73 .lobytes $73 +0003AEr 1 74 .lobytes $74 +0003AFr 1 75 .lobytes $75 +0003B0r 1 76 .lobytes $76 +0003B1r 1 77 .lobytes $77 +0003B2r 1 78 .lobytes $78 +0003B3r 1 79 .lobytes $79 +0003B4r 1 7A .lobytes $7a +0003B5r 1 7B .lobytes $7b +0003B6r 1 7C .lobytes $7c +0003B7r 1 7D .lobytes $7d +0003B8r 1 7E .lobytes $7e +0003B9r 1 7F .lobytes $7f +0003BAr 1 80 .lobytes $80 +0003BBr 1 81 .lobytes $81 +0003BCr 1 82 .lobytes $82 +0003BDr 1 83 .lobytes $83 +0003BEr 1 84 .lobytes $84 +0003BFr 1 85 .lobytes $85 +0003C0r 1 86 .lobytes $86 +0003C1r 1 F0 .lobytes $f0 +0003C2r 1 F1 .lobytes $f1 +0003C3r 1 F2 .lobytes $f2 +0003C4r 1 F3 .lobytes $f3 +0003C5r 1 F4 .lobytes $f4 +0003C6r 1 F5 .lobytes $f5 +0003C7r 1 F6 .lobytes $f6 +0003C8r 1 F7 .lobytes $f7 +0003C9r 1 F8 .lobytes $f8 +0003CAr 1 F9 .lobytes $f9 +0003CBr 1 FA .lobytes $fa +0003CCr 1 FB .lobytes $fb +0003CDr 1 FC .lobytes $fc +0003CEr 1 FD .lobytes $fd +0003CFr 1 FE .lobytes $fe +0003D0r 1 FF .lobytes $ff +0003D1r 1 00 .lobytes $100 +0003D2r 1 01 .lobytes $101 +0003D3r 1 02 .lobytes $102 +0003D4r 1 03 .lobytes $103 +0003D5r 1 D2 .lobytes $fd2 +0003D6r 1 D3 .lobytes $fd3 +0003D7r 1 D4 .lobytes $fd4 +0003D8r 1 D5 .lobytes $fd5 +0003D9r 1 D6 .lobytes $fd6 +0003DAr 1 D7 .lobytes $fd7 +0003DBr 1 D8 .lobytes $fd8 +0003DCr 1 D9 .lobytes $fd9 +0003DDr 1 DA .lobytes $fda +0003DEr 1 DB .lobytes $fdb +0003DFr 1 DC .lobytes $fdc +0003E0r 1 DD .lobytes $fdd +0003E1r 1 DE .lobytes $fde +0003E2r 1 DF .lobytes $fdf +0003E3r 1 E0 .lobytes $fe0 +0003E4r 1 E1 .lobytes $fe1 +0003E5r 1 E2 .lobytes $fe2 +0003E6r 1 E3 .lobytes $fe3 +0003E7r 1 E4 .lobytes $fe4 +0003E8r 1 E5 .lobytes $fe5 +0003E9r 1 E6 .lobytes $fe6 +0003EAr 1 E7 .lobytes $fe7 +0003EBr 1 E8 .lobytes $fe8 +0003ECr 1 E9 .lobytes $fe9 +0003EDr 1 EA .lobytes $fea +0003EEr 1 EB .lobytes $feb +0003EFr 1 EC .lobytes $fec +0003F0r 1 ED .lobytes $fed +0003F1r 1 EE .lobytes $fee +0003F2r 1 EF .lobytes $fef +0003F3r 1 F0 .lobytes $ff0 +0003F4r 1 F1 .lobytes $ff1 +0003F5r 1 F2 .lobytes $ff2 +0003F6r 1 F3 .lobytes $ff3 +0003F7r 1 F4 .lobytes $ff4 +0003F8r 1 F5 .lobytes $ff5 +0003F9r 1 F6 .lobytes $ff6 +0003FAr 1 F7 .lobytes $ff7 +0003FBr 1 F8 .lobytes $ff8 +0003FCr 1 F9 .lobytes $ff9 +0003FDr 1 FA .lobytes $ffa +0003FEr 1 FB .lobytes $ffb +0003FFr 1 FC .lobytes $ffc +000400r 1 FD .lobytes $ffd +000401r 1 FE .lobytes $ffe +000402r 1 FF .lobytes $fff +000403r 1 00 .lobytes $1000 +000404r 1 01 .lobytes $1001 +000405r 1 02 .lobytes $1002 +000406r 1 03 .lobytes $1003 +000407r 1 04 .lobytes $1004 +000408r 1 05 .lobytes $1005 +000409r 1 06 .lobytes $1006 +00040Ar 1 07 .lobytes $1007 +00040Br 1 08 .lobytes $1008 +00040Cr 1 F0 .lobytes $7ff0 +00040Dr 1 F1 .lobytes $7ff1 +00040Er 1 F2 .lobytes $7ff2 +00040Fr 1 F3 .lobytes $7ff3 +000410r 1 F4 .lobytes $7ff4 +000411r 1 F5 .lobytes $7ff5 +000412r 1 F6 .lobytes $7ff6 +000413r 1 F7 .lobytes $7ff7 +000414r 1 F8 .lobytes $7ff8 +000415r 1 F9 .lobytes $7ff9 +000416r 1 FA .lobytes $7ffa +000417r 1 FB .lobytes $7ffb +000418r 1 FC .lobytes $7ffc +000419r 1 FD .lobytes $7ffd +00041Ar 1 FE .lobytes $7ffe +00041Br 1 FF .lobytes $7fff +00041Cr 1 00 .lobytes $8000 +00041Dr 1 01 .lobytes $8001 +00041Er 1 02 .lobytes $8002 +00041Fr 1 03 .lobytes $8003 +000420r 1 04 .lobytes $8004 +000421r 1 05 .lobytes $8005 +000422r 1 06 .lobytes $8006 +000423r 1 07 .lobytes $8007 +000424r 1 08 .lobytes $8008 +000425r 1 09 .lobytes $8009 +000426r 1 0A .lobytes $800a +000427r 1 0B .lobytes $800b +000428r 1 E1 .lobytes $9fe1 +000429r 1 E2 .lobytes $9fe2 +00042Ar 1 E3 .lobytes $9fe3 +00042Br 1 E4 .lobytes $9fe4 +00042Cr 1 E5 .lobytes $9fe5 +00042Dr 1 E6 .lobytes $9fe6 +00042Er 1 E7 .lobytes $9fe7 +00042Fr 1 E8 .lobytes $9fe8 +000430r 1 E9 .lobytes $9fe9 +000431r 1 EA .lobytes $9fea +000432r 1 EB .lobytes $9feb +000433r 1 EC .lobytes $9fec +000434r 1 ED .lobytes $9fed +000435r 1 EE .lobytes $9fee +000436r 1 EF .lobytes $9fef +000437r 1 F0 .lobytes $9ff0 +000438r 1 F1 .lobytes $9ff1 +000439r 1 F2 .lobytes $9ff2 +00043Ar 1 F3 .lobytes $9ff3 +00043Br 1 F4 .lobytes $9ff4 +00043Cr 1 F5 .lobytes $9ff5 +00043Dr 1 F6 .lobytes $9ff6 +00043Er 1 F7 .lobytes $9ff7 +00043Fr 1 F8 .lobytes $9ff8 +000440r 1 F9 .lobytes $9ff9 +000441r 1 FA .lobytes $9ffa +000442r 1 FB .lobytes $9ffb +000443r 1 FC .lobytes $9ffc +000444r 1 FD .lobytes $9ffd +000445r 1 FE .lobytes $9ffe +000446r 1 FF .lobytes $9fff +000447r 1 00 .lobytes $a000 +000448r 1 01 .lobytes $a001 +000449r 1 02 .lobytes $a002 +00044Ar 1 03 .lobytes $a003 +00044Br 1 04 .lobytes $a004 +00044Cr 1 05 .lobytes $a005 +00044Dr 1 06 .lobytes $a006 +00044Er 1 07 .lobytes $a007 +00044Fr 1 08 .lobytes $a008 +000450r 1 09 .lobytes $a009 +000451r 1 0A .lobytes $a00a +000452r 1 0B .lobytes $a00b +000453r 1 0C .lobytes $a00c +000454r 1 0D .lobytes $a00d +000455r 1 0E .lobytes $a00e +000456r 1 0F .lobytes $a00f +000457r 1 E1 .lobytes $afe1 +000458r 1 E2 .lobytes $afe2 +000459r 1 E3 .lobytes $afe3 +00045Ar 1 E4 .lobytes $afe4 +00045Br 1 E5 .lobytes $afe5 +00045Cr 1 E6 .lobytes $afe6 +00045Dr 1 E7 .lobytes $afe7 +00045Er 1 E8 .lobytes $afe8 +00045Fr 1 E9 .lobytes $afe9 +000460r 1 EA .lobytes $afea +000461r 1 EB .lobytes $afeb +000462r 1 EC .lobytes $afec +000463r 1 ED .lobytes $afed +000464r 1 EE .lobytes $afee +000465r 1 EF .lobytes $afef +000466r 1 F0 .lobytes $aff0 +000467r 1 F1 .lobytes $aff1 +000468r 1 F2 .lobytes $aff2 +000469r 1 F3 .lobytes $aff3 +00046Ar 1 F4 .lobytes $aff4 +00046Br 1 F5 .lobytes $aff5 +00046Cr 1 F6 .lobytes $aff6 +00046Dr 1 F7 .lobytes $aff7 +00046Er 1 F8 .lobytes $aff8 +00046Fr 1 F9 .lobytes $aff9 +000470r 1 FA .lobytes $affa +000471r 1 FB .lobytes $affb +000472r 1 FC .lobytes $affc +000473r 1 FD .lobytes $affd +000474r 1 FE .lobytes $affe +000475r 1 FF .lobytes $afff +000476r 1 00 .lobytes $b000 +000477r 1 01 .lobytes $b001 +000478r 1 02 .lobytes $b002 +000479r 1 03 .lobytes $b003 +00047Ar 1 04 .lobytes $b004 +00047Br 1 05 .lobytes $b005 +00047Cr 1 06 .lobytes $b006 +00047Dr 1 07 .lobytes $b007 +00047Er 1 08 .lobytes $b008 +00047Fr 1 09 .lobytes $b009 +000480r 1 0A .lobytes $b00a +000481r 1 0B .lobytes $b00b +000482r 1 0C .lobytes $b00c +000483r 1 0D .lobytes $b00d +000484r 1 0E .lobytes $b00e +000485r 1 0F .lobytes $b00f +000486r 1 E1 .lobytes $bfe1 +000487r 1 E2 .lobytes $bfe2 +000488r 1 E3 .lobytes $bfe3 +000489r 1 E4 .lobytes $bfe4 +00048Ar 1 E5 .lobytes $bfe5 +00048Br 1 E6 .lobytes $bfe6 +00048Cr 1 E7 .lobytes $bfe7 +00048Dr 1 E8 .lobytes $bfe8 +00048Er 1 E9 .lobytes $bfe9 +00048Fr 1 EA .lobytes $bfea +000490r 1 EB .lobytes $bfeb +000491r 1 EC .lobytes $bfec +000492r 1 ED .lobytes $bfed +000493r 1 EE .lobytes $bfee +000494r 1 EF .lobytes $bfef +000495r 1 F0 .lobytes $bff0 +000496r 1 F1 .lobytes $bff1 +000497r 1 F2 .lobytes $bff2 +000498r 1 F3 .lobytes $bff3 +000499r 1 F4 .lobytes $bff4 +00049Ar 1 F5 .lobytes $bff5 +00049Br 1 F6 .lobytes $bff6 +00049Cr 1 F7 .lobytes $bff7 +00049Dr 1 F8 .lobytes $bff8 +00049Er 1 F9 .lobytes $bff9 +00049Fr 1 FA .lobytes $bffa +0004A0r 1 FB .lobytes $bffb +0004A1r 1 FC .lobytes $bffc +0004A2r 1 FD .lobytes $bffd +0004A3r 1 FE .lobytes $bffe +0004A4r 1 FF .lobytes $bfff +0004A5r 1 00 .lobytes $c000 +0004A6r 1 01 .lobytes $c001 +0004A7r 1 02 .lobytes $c002 +0004A8r 1 03 .lobytes $c003 +0004A9r 1 04 .lobytes $c004 +0004AAr 1 05 .lobytes $c005 +0004ABr 1 06 .lobytes $c006 +0004ACr 1 07 .lobytes $c007 +0004ADr 1 08 .lobytes $c008 +0004AEr 1 09 .lobytes $c009 +0004AFr 1 0A .lobytes $c00a +0004B0r 1 0B .lobytes $c00b +0004B1r 1 0C .lobytes $c00c +0004B2r 1 0D .lobytes $c00d +0004B3r 1 0E .lobytes $c00e +0004B4r 1 0F .lobytes $c00f +0004B5r 1 E1 .lobytes $cfe1 +0004B6r 1 E2 .lobytes $cfe2 +0004B7r 1 E3 .lobytes $cfe3 +0004B8r 1 E4 .lobytes $cfe4 +0004B9r 1 E5 .lobytes $cfe5 +0004BAr 1 E6 .lobytes $cfe6 +0004BBr 1 E7 .lobytes $cfe7 +0004BCr 1 E8 .lobytes $cfe8 +0004BDr 1 E9 .lobytes $cfe9 +0004BEr 1 EA .lobytes $cfea +0004BFr 1 EB .lobytes $cfeb +0004C0r 1 EC .lobytes $cfec +0004C1r 1 ED .lobytes $cfed +0004C2r 1 EE .lobytes $cfee +0004C3r 1 EF .lobytes $cfef +0004C4r 1 F0 .lobytes $cff0 +0004C5r 1 F1 .lobytes $cff1 +0004C6r 1 F2 .lobytes $cff2 +0004C7r 1 F3 .lobytes $cff3 +0004C8r 1 F4 .lobytes $cff4 +0004C9r 1 F5 .lobytes $cff5 +0004CAr 1 F6 .lobytes $cff6 +0004CBr 1 F7 .lobytes $cff7 +0004CCr 1 F8 .lobytes $cff8 +0004CDr 1 F9 .lobytes $cff9 +0004CEr 1 FA .lobytes $cffa +0004CFr 1 FB .lobytes $cffb +0004D0r 1 FC .lobytes $cffc +0004D1r 1 FD .lobytes $cffd +0004D2r 1 FE .lobytes $cffe +0004D3r 1 FF .lobytes $cfff +0004D4r 1 00 .lobytes $d000 +0004D5r 1 01 .lobytes $d001 +0004D6r 1 02 .lobytes $d002 +0004D7r 1 03 .lobytes $d003 +0004D8r 1 04 .lobytes $d004 +0004D9r 1 05 .lobytes $d005 +0004DAr 1 06 .lobytes $d006 +0004DBr 1 07 .lobytes $d007 +0004DCr 1 08 .lobytes $d008 +0004DDr 1 09 .lobytes $d009 +0004DEr 1 0A .lobytes $d00a +0004DFr 1 0B .lobytes $d00b +0004E0r 1 0C .lobytes $d00c +0004E1r 1 0D .lobytes $d00d +0004E2r 1 0E .lobytes $d00e +0004E3r 1 0F .lobytes $d00f +0004E4r 1 E1 .lobytes $dfe1 +0004E5r 1 E2 .lobytes $dfe2 +0004E6r 1 E3 .lobytes $dfe3 +0004E7r 1 E4 .lobytes $dfe4 +0004E8r 1 E5 .lobytes $dfe5 +0004E9r 1 E6 .lobytes $dfe6 +0004EAr 1 E7 .lobytes $dfe7 +0004EBr 1 E8 .lobytes $dfe8 +0004ECr 1 E9 .lobytes $dfe9 +0004EDr 1 EA .lobytes $dfea +0004EEr 1 EB .lobytes $dfeb +0004EFr 1 EC .lobytes $dfec +0004F0r 1 ED .lobytes $dfed +0004F1r 1 EE .lobytes $dfee +0004F2r 1 EF .lobytes $dfef +0004F3r 1 F0 .lobytes $dff0 +0004F4r 1 F1 .lobytes $dff1 +0004F5r 1 F2 .lobytes $dff2 +0004F6r 1 F3 .lobytes $dff3 +0004F7r 1 F4 .lobytes $dff4 +0004F8r 1 F5 .lobytes $dff5 +0004F9r 1 F6 .lobytes $dff6 +0004FAr 1 F7 .lobytes $dff7 +0004FBr 1 F8 .lobytes $dff8 +0004FCr 1 F9 .lobytes $dff9 +0004FDr 1 FA .lobytes $dffa +0004FEr 1 FB .lobytes $dffb +0004FFr 1 FC .lobytes $dffc +000500r 1 FD .lobytes $dffd +000501r 1 FE .lobytes $dffe +000502r 1 FF .lobytes $dfff +000503r 1 00 .lobytes $e000 +000504r 1 01 .lobytes $e001 +000505r 1 02 .lobytes $e002 +000506r 1 03 .lobytes $e003 +000507r 1 04 .lobytes $e004 +000508r 1 05 .lobytes $e005 +000509r 1 06 .lobytes $e006 +00050Ar 1 07 .lobytes $e007 +00050Br 1 08 .lobytes $e008 +00050Cr 1 09 .lobytes $e009 +00050Dr 1 0A .lobytes $e00a +00050Er 1 0B .lobytes $e00b +00050Fr 1 0C .lobytes $e00c +000510r 1 0D .lobytes $e00d +000511r 1 0E .lobytes $e00e +000512r 1 0F .lobytes $e00f +000513r 1 E1 .lobytes $efe1 +000514r 1 E2 .lobytes $efe2 +000515r 1 E3 .lobytes $efe3 +000516r 1 E4 .lobytes $efe4 +000517r 1 E5 .lobytes $efe5 +000518r 1 E6 .lobytes $efe6 +000519r 1 E7 .lobytes $efe7 +00051Ar 1 E8 .lobytes $efe8 +00051Br 1 E9 .lobytes $efe9 +00051Cr 1 EA .lobytes $efea +00051Dr 1 EB .lobytes $efeb +00051Er 1 EC .lobytes $efec +00051Fr 1 ED .lobytes $efed +000520r 1 EE .lobytes $efee +000521r 1 EF .lobytes $efef +000522r 1 F0 .lobytes $eff0 +000523r 1 F1 .lobytes $eff1 +000524r 1 F2 .lobytes $eff2 +000525r 1 F3 .lobytes $eff3 +000526r 1 F4 .lobytes $eff4 +000527r 1 F5 .lobytes $eff5 +000528r 1 F6 .lobytes $eff6 +000529r 1 F7 .lobytes $eff7 +00052Ar 1 F8 .lobytes $eff8 +00052Br 1 F9 .lobytes $eff9 +00052Cr 1 FA .lobytes $effa +00052Dr 1 FB .lobytes $effb +00052Er 1 FC .lobytes $effc +00052Fr 1 FD .lobytes $effd +000530r 1 FE .lobytes $effe +000531r 1 FF .lobytes $efff +000532r 1 00 .lobytes $f000 +000533r 1 01 .lobytes $f001 +000534r 1 02 .lobytes $f002 +000535r 1 03 .lobytes $f003 +000536r 1 04 .lobytes $f004 +000537r 1 05 .lobytes $f005 +000538r 1 06 .lobytes $f006 +000539r 1 07 .lobytes $f007 +00053Ar 1 08 .lobytes $f008 +00053Br 1 09 .lobytes $f009 +00053Cr 1 0A .lobytes $f00a +00053Dr 1 0B .lobytes $f00b +00053Er 1 0C .lobytes $f00c +00053Fr 1 0D .lobytes $f00d +000540r 1 0E .lobytes $f00e +000541r 1 0F .lobytes $f00f +000542r 1 E1 .lobytes $ffe1 +000543r 1 E2 .lobytes $ffe2 +000544r 1 E3 .lobytes $ffe3 +000545r 1 E4 .lobytes $ffe4 +000546r 1 E5 .lobytes $ffe5 +000547r 1 E6 .lobytes $ffe6 +000548r 1 E7 .lobytes $ffe7 +000549r 1 E8 .lobytes $ffe8 +00054Ar 1 E9 .lobytes $ffe9 +00054Br 1 EA .lobytes $ffea +00054Cr 1 EB .lobytes $ffeb +00054Dr 1 EC .lobytes $ffec +00054Er 1 ED .lobytes $ffed +00054Fr 1 EE .lobytes $ffee +000550r 1 EF .lobytes $ffef +000551r 1 F0 .lobytes $fff0 +000552r 1 F1 .lobytes $fff1 +000553r 1 F2 .lobytes $fff2 +000554r 1 F3 .lobytes $fff3 +000555r 1 F4 .lobytes $fff4 +000556r 1 F5 .lobytes $fff5 +000557r 1 F6 .lobytes $fff6 +000558r 1 F7 .lobytes $fff7 +000559r 1 F8 .lobytes $fff8 +00055Ar 1 F9 .lobytes $fff9 +00055Br 1 FA .lobytes $fffa +00055Cr 1 FB .lobytes $fffb +00055Dr 1 FC .lobytes $fffc +00055Er 1 FD .lobytes $fffd +00055Fr 1 FE .lobytes $fffe +000560r 1 FF .lobytes $ffff +000561r 1 +000561r 1 ; hex values, uppercase +000561r 1 00 .lobytes $0 +000562r 1 01 .lobytes $1 +000563r 1 02 .lobytes $2 +000564r 1 03 .lobytes $3 +000565r 1 04 .lobytes $4 +000566r 1 05 .lobytes $5 +000567r 1 06 .lobytes $6 +000568r 1 07 .lobytes $7 +000569r 1 08 .lobytes $8 +00056Ar 1 09 .lobytes $9 +00056Br 1 0A .lobytes $A +00056Cr 1 0B .lobytes $B +00056Dr 1 0C .lobytes $C +00056Er 1 0D .lobytes $D +00056Fr 1 0E .lobytes $E +000570r 1 0F .lobytes $F +000571r 1 10 .lobytes $10 +000572r 1 11 .lobytes $11 +000573r 1 12 .lobytes $12 +000574r 1 13 .lobytes $13 +000575r 1 70 .lobytes $70 +000576r 1 71 .lobytes $71 +000577r 1 72 .lobytes $72 +000578r 1 73 .lobytes $73 +000579r 1 74 .lobytes $74 +00057Ar 1 75 .lobytes $75 +00057Br 1 76 .lobytes $76 +00057Cr 1 77 .lobytes $77 +00057Dr 1 78 .lobytes $78 +00057Er 1 79 .lobytes $79 +00057Fr 1 7A .lobytes $7A +000580r 1 7B .lobytes $7B +000581r 1 7C .lobytes $7C +000582r 1 7D .lobytes $7D +000583r 1 7E .lobytes $7E +000584r 1 7F .lobytes $7F +000585r 1 80 .lobytes $80 +000586r 1 81 .lobytes $81 +000587r 1 82 .lobytes $82 +000588r 1 83 .lobytes $83 +000589r 1 84 .lobytes $84 +00058Ar 1 85 .lobytes $85 +00058Br 1 86 .lobytes $86 +00058Cr 1 F0 .lobytes $F0 +00058Dr 1 F1 .lobytes $F1 +00058Er 1 F2 .lobytes $F2 +00058Fr 1 F3 .lobytes $F3 +000590r 1 F4 .lobytes $F4 +000591r 1 F5 .lobytes $F5 +000592r 1 F6 .lobytes $F6 +000593r 1 F7 .lobytes $F7 +000594r 1 F8 .lobytes $F8 +000595r 1 F9 .lobytes $F9 +000596r 1 FA .lobytes $FA +000597r 1 FB .lobytes $FB +000598r 1 FC .lobytes $FC +000599r 1 FD .lobytes $FD +00059Ar 1 FE .lobytes $FE +00059Br 1 FF .lobytes $FF +00059Cr 1 00 .lobytes $100 +00059Dr 1 01 .lobytes $101 +00059Er 1 02 .lobytes $102 +00059Fr 1 03 .lobytes $103 +0005A0r 1 D2 .lobytes $FD2 +0005A1r 1 D3 .lobytes $FD3 +0005A2r 1 D4 .lobytes $FD4 +0005A3r 1 D5 .lobytes $FD5 +0005A4r 1 D6 .lobytes $FD6 +0005A5r 1 D7 .lobytes $FD7 +0005A6r 1 D8 .lobytes $FD8 +0005A7r 1 D9 .lobytes $FD9 +0005A8r 1 DA .lobytes $FDA +0005A9r 1 DB .lobytes $FDB +0005AAr 1 DC .lobytes $FDC +0005ABr 1 DD .lobytes $FDD +0005ACr 1 DE .lobytes $FDE +0005ADr 1 DF .lobytes $FDF +0005AEr 1 E0 .lobytes $FE0 +0005AFr 1 E1 .lobytes $FE1 +0005B0r 1 E2 .lobytes $FE2 +0005B1r 1 E3 .lobytes $FE3 +0005B2r 1 E4 .lobytes $FE4 +0005B3r 1 E5 .lobytes $FE5 +0005B4r 1 E6 .lobytes $FE6 +0005B5r 1 E7 .lobytes $FE7 +0005B6r 1 E8 .lobytes $FE8 +0005B7r 1 E9 .lobytes $FE9 +0005B8r 1 EA .lobytes $FEA +0005B9r 1 EB .lobytes $FEB +0005BAr 1 EC .lobytes $FEC +0005BBr 1 ED .lobytes $FED +0005BCr 1 EE .lobytes $FEE +0005BDr 1 EF .lobytes $FEF +0005BEr 1 F0 .lobytes $FF0 +0005BFr 1 F1 .lobytes $FF1 +0005C0r 1 F2 .lobytes $FF2 +0005C1r 1 F3 .lobytes $FF3 +0005C2r 1 F4 .lobytes $FF4 +0005C3r 1 F5 .lobytes $FF5 +0005C4r 1 F6 .lobytes $FF6 +0005C5r 1 F7 .lobytes $FF7 +0005C6r 1 F8 .lobytes $FF8 +0005C7r 1 F9 .lobytes $FF9 +0005C8r 1 FA .lobytes $FFA +0005C9r 1 FB .lobytes $FFB +0005CAr 1 FC .lobytes $FFC +0005CBr 1 FD .lobytes $FFD +0005CCr 1 FE .lobytes $FFE +0005CDr 1 FF .lobytes $FFF +0005CEr 1 00 .lobytes $1000 +0005CFr 1 01 .lobytes $1001 +0005D0r 1 02 .lobytes $1002 +0005D1r 1 03 .lobytes $1003 +0005D2r 1 04 .lobytes $1004 +0005D3r 1 05 .lobytes $1005 +0005D4r 1 06 .lobytes $1006 +0005D5r 1 07 .lobytes $1007 +0005D6r 1 08 .lobytes $1008 +0005D7r 1 F0 .lobytes $7FF0 +0005D8r 1 F1 .lobytes $7FF1 +0005D9r 1 F2 .lobytes $7FF2 +0005DAr 1 F3 .lobytes $7FF3 +0005DBr 1 F4 .lobytes $7FF4 +0005DCr 1 F5 .lobytes $7FF5 +0005DDr 1 F6 .lobytes $7FF6 +0005DEr 1 F7 .lobytes $7FF7 +0005DFr 1 F8 .lobytes $7FF8 +0005E0r 1 F9 .lobytes $7FF9 +0005E1r 1 FA .lobytes $7FFA +0005E2r 1 FB .lobytes $7FFB +0005E3r 1 FC .lobytes $7FFC +0005E4r 1 FD .lobytes $7FFD +0005E5r 1 FE .lobytes $7FFE +0005E6r 1 FF .lobytes $7FFF +0005E7r 1 00 .lobytes $8000 +0005E8r 1 01 .lobytes $8001 +0005E9r 1 02 .lobytes $8002 +0005EAr 1 03 .lobytes $8003 +0005EBr 1 04 .lobytes $8004 +0005ECr 1 05 .lobytes $8005 +0005EDr 1 06 .lobytes $8006 +0005EEr 1 07 .lobytes $8007 +0005EFr 1 08 .lobytes $8008 +0005F0r 1 09 .lobytes $8009 +0005F1r 1 0A .lobytes $800A +0005F2r 1 0B .lobytes $800B +0005F3r 1 E1 .lobytes $9FE1 +0005F4r 1 E2 .lobytes $9FE2 +0005F5r 1 E3 .lobytes $9FE3 +0005F6r 1 E4 .lobytes $9FE4 +0005F7r 1 E5 .lobytes $9FE5 +0005F8r 1 E6 .lobytes $9FE6 +0005F9r 1 E7 .lobytes $9FE7 +0005FAr 1 E8 .lobytes $9FE8 +0005FBr 1 E9 .lobytes $9FE9 +0005FCr 1 EA .lobytes $9FEA +0005FDr 1 EB .lobytes $9FEB +0005FEr 1 EC .lobytes $9FEC +0005FFr 1 ED .lobytes $9FED +000600r 1 EE .lobytes $9FEE +000601r 1 EF .lobytes $9FEF +000602r 1 F0 .lobytes $9FF0 +000603r 1 F1 .lobytes $9FF1 +000604r 1 F2 .lobytes $9FF2 +000605r 1 F3 .lobytes $9FF3 +000606r 1 F4 .lobytes $9FF4 +000607r 1 F5 .lobytes $9FF5 +000608r 1 F6 .lobytes $9FF6 +000609r 1 F7 .lobytes $9FF7 +00060Ar 1 F8 .lobytes $9FF8 +00060Br 1 F9 .lobytes $9FF9 +00060Cr 1 FA .lobytes $9FFA +00060Dr 1 FB .lobytes $9FFB +00060Er 1 FC .lobytes $9FFC +00060Fr 1 FD .lobytes $9FFD +000610r 1 FE .lobytes $9FFE +000611r 1 FF .lobytes $9FFF +000612r 1 00 .lobytes $A000 +000613r 1 01 .lobytes $A001 +000614r 1 02 .lobytes $A002 +000615r 1 03 .lobytes $A003 +000616r 1 04 .lobytes $A004 +000617r 1 05 .lobytes $A005 +000618r 1 06 .lobytes $A006 +000619r 1 07 .lobytes $A007 +00061Ar 1 08 .lobytes $A008 +00061Br 1 09 .lobytes $A009 +00061Cr 1 0A .lobytes $A00A +00061Dr 1 0B .lobytes $A00B +00061Er 1 0C .lobytes $A00C +00061Fr 1 0D .lobytes $A00D +000620r 1 0E .lobytes $A00E +000621r 1 0F .lobytes $A00F +000622r 1 E1 .lobytes $AFE1 +000623r 1 E2 .lobytes $AFE2 +000624r 1 E3 .lobytes $AFE3 +000625r 1 E4 .lobytes $AFE4 +000626r 1 E5 .lobytes $AFE5 +000627r 1 E6 .lobytes $AFE6 +000628r 1 E7 .lobytes $AFE7 +000629r 1 E8 .lobytes $AFE8 +00062Ar 1 E9 .lobytes $AFE9 +00062Br 1 EA .lobytes $AFEA +00062Cr 1 EB .lobytes $AFEB +00062Dr 1 EC .lobytes $AFEC +00062Er 1 ED .lobytes $AFED +00062Fr 1 EE .lobytes $AFEE +000630r 1 EF .lobytes $AFEF +000631r 1 F0 .lobytes $AFF0 +000632r 1 F1 .lobytes $AFF1 +000633r 1 F2 .lobytes $AFF2 +000634r 1 F3 .lobytes $AFF3 +000635r 1 F4 .lobytes $AFF4 +000636r 1 F5 .lobytes $AFF5 +000637r 1 F6 .lobytes $AFF6 +000638r 1 F7 .lobytes $AFF7 +000639r 1 F8 .lobytes $AFF8 +00063Ar 1 F9 .lobytes $AFF9 +00063Br 1 FA .lobytes $AFFA +00063Cr 1 FB .lobytes $AFFB +00063Dr 1 FC .lobytes $AFFC +00063Er 1 FD .lobytes $AFFD +00063Fr 1 FE .lobytes $AFFE +000640r 1 FF .lobytes $AFFF +000641r 1 00 .lobytes $B000 +000642r 1 01 .lobytes $B001 +000643r 1 02 .lobytes $B002 +000644r 1 03 .lobytes $B003 +000645r 1 04 .lobytes $B004 +000646r 1 05 .lobytes $B005 +000647r 1 06 .lobytes $B006 +000648r 1 07 .lobytes $B007 +000649r 1 08 .lobytes $B008 +00064Ar 1 09 .lobytes $B009 +00064Br 1 0A .lobytes $B00A +00064Cr 1 0B .lobytes $B00B +00064Dr 1 0C .lobytes $B00C +00064Er 1 0D .lobytes $B00D +00064Fr 1 0E .lobytes $B00E +000650r 1 0F .lobytes $B00F +000651r 1 E1 .lobytes $BFE1 +000652r 1 E2 .lobytes $BFE2 +000653r 1 E3 .lobytes $BFE3 +000654r 1 E4 .lobytes $BFE4 +000655r 1 E5 .lobytes $BFE5 +000656r 1 E6 .lobytes $BFE6 +000657r 1 E7 .lobytes $BFE7 +000658r 1 E8 .lobytes $BFE8 +000659r 1 E9 .lobytes $BFE9 +00065Ar 1 EA .lobytes $BFEA +00065Br 1 EB .lobytes $BFEB +00065Cr 1 EC .lobytes $BFEC +00065Dr 1 ED .lobytes $BFED +00065Er 1 EE .lobytes $BFEE +00065Fr 1 EF .lobytes $BFEF +000660r 1 F0 .lobytes $BFF0 +000661r 1 F1 .lobytes $BFF1 +000662r 1 F2 .lobytes $BFF2 +000663r 1 F3 .lobytes $BFF3 +000664r 1 F4 .lobytes $BFF4 +000665r 1 F5 .lobytes $BFF5 +000666r 1 F6 .lobytes $BFF6 +000667r 1 F7 .lobytes $BFF7 +000668r 1 F8 .lobytes $BFF8 +000669r 1 F9 .lobytes $BFF9 +00066Ar 1 FA .lobytes $BFFA +00066Br 1 FB .lobytes $BFFB +00066Cr 1 FC .lobytes $BFFC +00066Dr 1 FD .lobytes $BFFD +00066Er 1 FE .lobytes $BFFE +00066Fr 1 FF .lobytes $BFFF +000670r 1 00 .lobytes $C000 +000671r 1 01 .lobytes $C001 +000672r 1 02 .lobytes $C002 +000673r 1 03 .lobytes $C003 +000674r 1 04 .lobytes $C004 +000675r 1 05 .lobytes $C005 +000676r 1 06 .lobytes $C006 +000677r 1 07 .lobytes $C007 +000678r 1 08 .lobytes $C008 +000679r 1 09 .lobytes $C009 +00067Ar 1 0A .lobytes $C00A +00067Br 1 0B .lobytes $C00B +00067Cr 1 0C .lobytes $C00C +00067Dr 1 0D .lobytes $C00D +00067Er 1 0E .lobytes $C00E +00067Fr 1 0F .lobytes $C00F +000680r 1 E1 .lobytes $CFE1 +000681r 1 E2 .lobytes $CFE2 +000682r 1 E3 .lobytes $CFE3 +000683r 1 E4 .lobytes $CFE4 +000684r 1 E5 .lobytes $CFE5 +000685r 1 E6 .lobytes $CFE6 +000686r 1 E7 .lobytes $CFE7 +000687r 1 E8 .lobytes $CFE8 +000688r 1 E9 .lobytes $CFE9 +000689r 1 EA .lobytes $CFEA +00068Ar 1 EB .lobytes $CFEB +00068Br 1 EC .lobytes $CFEC +00068Cr 1 ED .lobytes $CFED +00068Dr 1 EE .lobytes $CFEE +00068Er 1 EF .lobytes $CFEF +00068Fr 1 F0 .lobytes $CFF0 +000690r 1 F1 .lobytes $CFF1 +000691r 1 F2 .lobytes $CFF2 +000692r 1 F3 .lobytes $CFF3 +000693r 1 F4 .lobytes $CFF4 +000694r 1 F5 .lobytes $CFF5 +000695r 1 F6 .lobytes $CFF6 +000696r 1 F7 .lobytes $CFF7 +000697r 1 F8 .lobytes $CFF8 +000698r 1 F9 .lobytes $CFF9 +000699r 1 FA .lobytes $CFFA +00069Ar 1 FB .lobytes $CFFB +00069Br 1 FC .lobytes $CFFC +00069Cr 1 FD .lobytes $CFFD +00069Dr 1 FE .lobytes $CFFE +00069Er 1 FF .lobytes $CFFF +00069Fr 1 00 .lobytes $D000 +0006A0r 1 01 .lobytes $D001 +0006A1r 1 02 .lobytes $D002 +0006A2r 1 03 .lobytes $D003 +0006A3r 1 04 .lobytes $D004 +0006A4r 1 05 .lobytes $D005 +0006A5r 1 06 .lobytes $D006 +0006A6r 1 07 .lobytes $D007 +0006A7r 1 08 .lobytes $D008 +0006A8r 1 09 .lobytes $D009 +0006A9r 1 0A .lobytes $D00A +0006AAr 1 0B .lobytes $D00B +0006ABr 1 0C .lobytes $D00C +0006ACr 1 0D .lobytes $D00D +0006ADr 1 0E .lobytes $D00E +0006AEr 1 0F .lobytes $D00F +0006AFr 1 E1 .lobytes $DFE1 +0006B0r 1 E2 .lobytes $DFE2 +0006B1r 1 E3 .lobytes $DFE3 +0006B2r 1 E4 .lobytes $DFE4 +0006B3r 1 E5 .lobytes $DFE5 +0006B4r 1 E6 .lobytes $DFE6 +0006B5r 1 E7 .lobytes $DFE7 +0006B6r 1 E8 .lobytes $DFE8 +0006B7r 1 E9 .lobytes $DFE9 +0006B8r 1 EA .lobytes $DFEA +0006B9r 1 EB .lobytes $DFEB +0006BAr 1 EC .lobytes $DFEC +0006BBr 1 ED .lobytes $DFED +0006BCr 1 EE .lobytes $DFEE +0006BDr 1 EF .lobytes $DFEF +0006BEr 1 F0 .lobytes $DFF0 +0006BFr 1 F1 .lobytes $DFF1 +0006C0r 1 F2 .lobytes $DFF2 +0006C1r 1 F3 .lobytes $DFF3 +0006C2r 1 F4 .lobytes $DFF4 +0006C3r 1 F5 .lobytes $DFF5 +0006C4r 1 F6 .lobytes $DFF6 +0006C5r 1 F7 .lobytes $DFF7 +0006C6r 1 F8 .lobytes $DFF8 +0006C7r 1 F9 .lobytes $DFF9 +0006C8r 1 FA .lobytes $DFFA +0006C9r 1 FB .lobytes $DFFB +0006CAr 1 FC .lobytes $DFFC +0006CBr 1 FD .lobytes $DFFD +0006CCr 1 FE .lobytes $DFFE +0006CDr 1 FF .lobytes $DFFF +0006CEr 1 00 .lobytes $E000 +0006CFr 1 01 .lobytes $E001 +0006D0r 1 02 .lobytes $E002 +0006D1r 1 03 .lobytes $E003 +0006D2r 1 04 .lobytes $E004 +0006D3r 1 05 .lobytes $E005 +0006D4r 1 06 .lobytes $E006 +0006D5r 1 07 .lobytes $E007 +0006D6r 1 08 .lobytes $E008 +0006D7r 1 09 .lobytes $E009 +0006D8r 1 0A .lobytes $E00A +0006D9r 1 0B .lobytes $E00B +0006DAr 1 0C .lobytes $E00C +0006DBr 1 0D .lobytes $E00D +0006DCr 1 0E .lobytes $E00E +0006DDr 1 0F .lobytes $E00F +0006DEr 1 E1 .lobytes $EFE1 +0006DFr 1 E2 .lobytes $EFE2 +0006E0r 1 E3 .lobytes $EFE3 +0006E1r 1 E4 .lobytes $EFE4 +0006E2r 1 E5 .lobytes $EFE5 +0006E3r 1 E6 .lobytes $EFE6 +0006E4r 1 E7 .lobytes $EFE7 +0006E5r 1 E8 .lobytes $EFE8 +0006E6r 1 E9 .lobytes $EFE9 +0006E7r 1 EA .lobytes $EFEA +0006E8r 1 EB .lobytes $EFEB +0006E9r 1 EC .lobytes $EFEC +0006EAr 1 ED .lobytes $EFED +0006EBr 1 EE .lobytes $EFEE +0006ECr 1 EF .lobytes $EFEF +0006EDr 1 F0 .lobytes $EFF0 +0006EEr 1 F1 .lobytes $EFF1 +0006EFr 1 F2 .lobytes $EFF2 +0006F0r 1 F3 .lobytes $EFF3 +0006F1r 1 F4 .lobytes $EFF4 +0006F2r 1 F5 .lobytes $EFF5 +0006F3r 1 F6 .lobytes $EFF6 +0006F4r 1 F7 .lobytes $EFF7 +0006F5r 1 F8 .lobytes $EFF8 +0006F6r 1 F9 .lobytes $EFF9 +0006F7r 1 FA .lobytes $EFFA +0006F8r 1 FB .lobytes $EFFB +0006F9r 1 FC .lobytes $EFFC +0006FAr 1 FD .lobytes $EFFD +0006FBr 1 FE .lobytes $EFFE +0006FCr 1 FF .lobytes $EFFF +0006FDr 1 00 .lobytes $F000 +0006FEr 1 01 .lobytes $F001 +0006FFr 1 02 .lobytes $F002 +000700r 1 03 .lobytes $F003 +000701r 1 04 .lobytes $F004 +000702r 1 05 .lobytes $F005 +000703r 1 06 .lobytes $F006 +000704r 1 07 .lobytes $F007 +000705r 1 08 .lobytes $F008 +000706r 1 09 .lobytes $F009 +000707r 1 0A .lobytes $F00A +000708r 1 0B .lobytes $F00B +000709r 1 0C .lobytes $F00C +00070Ar 1 0D .lobytes $F00D +00070Br 1 0E .lobytes $F00E +00070Cr 1 0F .lobytes $F00F +00070Dr 1 E1 .lobytes $FFE1 +00070Er 1 E2 .lobytes $FFE2 +00070Fr 1 E3 .lobytes $FFE3 +000710r 1 E4 .lobytes $FFE4 +000711r 1 E5 .lobytes $FFE5 +000712r 1 E6 .lobytes $FFE6 +000713r 1 E7 .lobytes $FFE7 +000714r 1 E8 .lobytes $FFE8 +000715r 1 E9 .lobytes $FFE9 +000716r 1 EA .lobytes $FFEA +000717r 1 EB .lobytes $FFEB +000718r 1 EC .lobytes $FFEC +000719r 1 ED .lobytes $FFED +00071Ar 1 EE .lobytes $FFEE +00071Br 1 EF .lobytes $FFEF +00071Cr 1 F0 .lobytes $FFF0 +00071Dr 1 F1 .lobytes $FFF1 +00071Er 1 F2 .lobytes $FFF2 +00071Fr 1 F3 .lobytes $FFF3 +000720r 1 F4 .lobytes $FFF4 +000721r 1 F5 .lobytes $FFF5 +000722r 1 F6 .lobytes $FFF6 +000723r 1 F7 .lobytes $FFF7 +000724r 1 F8 .lobytes $FFF8 +000725r 1 F9 .lobytes $FFF9 +000726r 1 FA .lobytes $FFFA +000727r 1 FB .lobytes $FFFB +000728r 1 FC .lobytes $FFFC +000729r 1 FD .lobytes $FFFD +00072Ar 1 FE .lobytes $FFFE +00072Br 1 FF .lobytes $FFFF +00072Cr 1 +00072Cr 1 ; 4-digit hex values +00072Cr 1 00 .lobytes $0000 +00072Dr 1 01 .lobytes $0001 +00072Er 1 02 .lobytes $0002 +00072Fr 1 03 .lobytes $0003 +000730r 1 04 .lobytes $0004 +000731r 1 05 .lobytes $0005 +000732r 1 06 .lobytes $0006 +000733r 1 07 .lobytes $0007 +000734r 1 08 .lobytes $0008 +000735r 1 09 .lobytes $0009 +000736r 1 0A .lobytes $000a +000737r 1 0B .lobytes $000b +000738r 1 0C .lobytes $000c +000739r 1 0D .lobytes $000d +00073Ar 1 0E .lobytes $000e +00073Br 1 0F .lobytes $000f +00073Cr 1 10 .lobytes $0010 +00073Dr 1 11 .lobytes $0011 +00073Er 1 12 .lobytes $0012 +00073Fr 1 13 .lobytes $0013 +000740r 1 70 .lobytes $0070 +000741r 1 71 .lobytes $0071 +000742r 1 72 .lobytes $0072 +000743r 1 73 .lobytes $0073 +000744r 1 74 .lobytes $0074 +000745r 1 75 .lobytes $0075 +000746r 1 76 .lobytes $0076 +000747r 1 77 .lobytes $0077 +000748r 1 78 .lobytes $0078 +000749r 1 79 .lobytes $0079 +00074Ar 1 7A .lobytes $007a +00074Br 1 7B .lobytes $007b +00074Cr 1 7C .lobytes $007c +00074Dr 1 7D .lobytes $007d +00074Er 1 7E .lobytes $007e +00074Fr 1 7F .lobytes $007f +000750r 1 80 .lobytes $0080 +000751r 1 81 .lobytes $0081 +000752r 1 82 .lobytes $0082 +000753r 1 83 .lobytes $0083 +000754r 1 84 .lobytes $0084 +000755r 1 85 .lobytes $0085 +000756r 1 86 .lobytes $0086 +000757r 1 F0 .lobytes $00f0 +000758r 1 F1 .lobytes $00f1 +000759r 1 F2 .lobytes $00f2 +00075Ar 1 F3 .lobytes $00f3 +00075Br 1 F4 .lobytes $00f4 +00075Cr 1 F5 .lobytes $00f5 +00075Dr 1 F6 .lobytes $00f6 +00075Er 1 F7 .lobytes $00f7 +00075Fr 1 F8 .lobytes $00f8 +000760r 1 F9 .lobytes $00f9 +000761r 1 FA .lobytes $00fa +000762r 1 FB .lobytes $00fb +000763r 1 FC .lobytes $00fc +000764r 1 FD .lobytes $00fd +000765r 1 FE .lobytes $00fe +000766r 1 FF .lobytes $00ff +000767r 1 00 .lobytes $0100 +000768r 1 01 .lobytes $0101 +000769r 1 02 .lobytes $0102 +00076Ar 1 03 .lobytes $0103 +00076Br 1 D2 .lobytes $0fd2 +00076Cr 1 D3 .lobytes $0fd3 +00076Dr 1 D4 .lobytes $0fd4 +00076Er 1 D5 .lobytes $0fd5 +00076Fr 1 D6 .lobytes $0fd6 +000770r 1 D7 .lobytes $0fd7 +000771r 1 D8 .lobytes $0fd8 +000772r 1 D9 .lobytes $0fd9 +000773r 1 DA .lobytes $0fda +000774r 1 DB .lobytes $0fdb +000775r 1 DC .lobytes $0fdc +000776r 1 DD .lobytes $0fdd +000777r 1 DE .lobytes $0fde +000778r 1 DF .lobytes $0fdf +000779r 1 E0 .lobytes $0fe0 +00077Ar 1 E1 .lobytes $0fe1 +00077Br 1 E2 .lobytes $0fe2 +00077Cr 1 E3 .lobytes $0fe3 +00077Dr 1 E4 .lobytes $0fe4 +00077Er 1 E5 .lobytes $0fe5 +00077Fr 1 E6 .lobytes $0fe6 +000780r 1 E7 .lobytes $0fe7 +000781r 1 E8 .lobytes $0fe8 +000782r 1 E9 .lobytes $0fe9 +000783r 1 EA .lobytes $0fea +000784r 1 EB .lobytes $0feb +000785r 1 EC .lobytes $0fec +000786r 1 ED .lobytes $0fed +000787r 1 EE .lobytes $0fee +000788r 1 EF .lobytes $0fef +000789r 1 F0 .lobytes $0ff0 +00078Ar 1 F1 .lobytes $0ff1 +00078Br 1 F2 .lobytes $0ff2 +00078Cr 1 F3 .lobytes $0ff3 +00078Dr 1 F4 .lobytes $0ff4 +00078Er 1 F5 .lobytes $0ff5 +00078Fr 1 F6 .lobytes $0ff6 +000790r 1 F7 .lobytes $0ff7 +000791r 1 F8 .lobytes $0ff8 +000792r 1 F9 .lobytes $0ff9 +000793r 1 FA .lobytes $0ffa +000794r 1 FB .lobytes $0ffb +000795r 1 FC .lobytes $0ffc +000796r 1 FD .lobytes $0ffd +000797r 1 FE .lobytes $0ffe +000798r 1 FF .lobytes $0fff +000799r 1 00 .lobytes $1000 +00079Ar 1 01 .lobytes $1001 +00079Br 1 02 .lobytes $1002 +00079Cr 1 03 .lobytes $1003 +00079Dr 1 04 .lobytes $1004 +00079Er 1 05 .lobytes $1005 +00079Fr 1 06 .lobytes $1006 +0007A0r 1 07 .lobytes $1007 +0007A1r 1 08 .lobytes $1008 +0007A2r 1 F0 .lobytes $7ff0 +0007A3r 1 F1 .lobytes $7ff1 +0007A4r 1 F2 .lobytes $7ff2 +0007A5r 1 F3 .lobytes $7ff3 +0007A6r 1 F4 .lobytes $7ff4 +0007A7r 1 F5 .lobytes $7ff5 +0007A8r 1 F6 .lobytes $7ff6 +0007A9r 1 F7 .lobytes $7ff7 +0007AAr 1 F8 .lobytes $7ff8 +0007ABr 1 F9 .lobytes $7ff9 +0007ACr 1 FA .lobytes $7ffa +0007ADr 1 FB .lobytes $7ffb +0007AEr 1 FC .lobytes $7ffc +0007AFr 1 FD .lobytes $7ffd +0007B0r 1 FE .lobytes $7ffe +0007B1r 1 FF .lobytes $7fff +0007B2r 1 00 .lobytes $8000 +0007B3r 1 01 .lobytes $8001 +0007B4r 1 02 .lobytes $8002 +0007B5r 1 03 .lobytes $8003 +0007B6r 1 04 .lobytes $8004 +0007B7r 1 05 .lobytes $8005 +0007B8r 1 06 .lobytes $8006 +0007B9r 1 07 .lobytes $8007 +0007BAr 1 08 .lobytes $8008 +0007BBr 1 09 .lobytes $8009 +0007BCr 1 0A .lobytes $800a +0007BDr 1 0B .lobytes $800b +0007BEr 1 E1 .lobytes $9fe1 +0007BFr 1 E2 .lobytes $9fe2 +0007C0r 1 E3 .lobytes $9fe3 +0007C1r 1 E4 .lobytes $9fe4 +0007C2r 1 E5 .lobytes $9fe5 +0007C3r 1 E6 .lobytes $9fe6 +0007C4r 1 E7 .lobytes $9fe7 +0007C5r 1 E8 .lobytes $9fe8 +0007C6r 1 E9 .lobytes $9fe9 +0007C7r 1 EA .lobytes $9fea +0007C8r 1 EB .lobytes $9feb +0007C9r 1 EC .lobytes $9fec +0007CAr 1 ED .lobytes $9fed +0007CBr 1 EE .lobytes $9fee +0007CCr 1 EF .lobytes $9fef +0007CDr 1 F0 .lobytes $9ff0 +0007CEr 1 F1 .lobytes $9ff1 +0007CFr 1 F2 .lobytes $9ff2 +0007D0r 1 F3 .lobytes $9ff3 +0007D1r 1 F4 .lobytes $9ff4 +0007D2r 1 F5 .lobytes $9ff5 +0007D3r 1 F6 .lobytes $9ff6 +0007D4r 1 F7 .lobytes $9ff7 +0007D5r 1 F8 .lobytes $9ff8 +0007D6r 1 F9 .lobytes $9ff9 +0007D7r 1 FA .lobytes $9ffa +0007D8r 1 FB .lobytes $9ffb +0007D9r 1 FC .lobytes $9ffc +0007DAr 1 FD .lobytes $9ffd +0007DBr 1 FE .lobytes $9ffe +0007DCr 1 FF .lobytes $9fff +0007DDr 1 00 .lobytes $a000 +0007DEr 1 01 .lobytes $a001 +0007DFr 1 02 .lobytes $a002 +0007E0r 1 03 .lobytes $a003 +0007E1r 1 04 .lobytes $a004 +0007E2r 1 05 .lobytes $a005 +0007E3r 1 06 .lobytes $a006 +0007E4r 1 07 .lobytes $a007 +0007E5r 1 08 .lobytes $a008 +0007E6r 1 09 .lobytes $a009 +0007E7r 1 0A .lobytes $a00a +0007E8r 1 0B .lobytes $a00b +0007E9r 1 0C .lobytes $a00c +0007EAr 1 0D .lobytes $a00d +0007EBr 1 0E .lobytes $a00e +0007ECr 1 0F .lobytes $a00f +0007EDr 1 E1 .lobytes $afe1 +0007EEr 1 E2 .lobytes $afe2 +0007EFr 1 E3 .lobytes $afe3 +0007F0r 1 E4 .lobytes $afe4 +0007F1r 1 E5 .lobytes $afe5 +0007F2r 1 E6 .lobytes $afe6 +0007F3r 1 E7 .lobytes $afe7 +0007F4r 1 E8 .lobytes $afe8 +0007F5r 1 E9 .lobytes $afe9 +0007F6r 1 EA .lobytes $afea +0007F7r 1 EB .lobytes $afeb +0007F8r 1 EC .lobytes $afec +0007F9r 1 ED .lobytes $afed +0007FAr 1 EE .lobytes $afee +0007FBr 1 EF .lobytes $afef +0007FCr 1 F0 .lobytes $aff0 +0007FDr 1 F1 .lobytes $aff1 +0007FEr 1 F2 .lobytes $aff2 +0007FFr 1 F3 .lobytes $aff3 +000800r 1 F4 .lobytes $aff4 +000801r 1 F5 .lobytes $aff5 +000802r 1 F6 .lobytes $aff6 +000803r 1 F7 .lobytes $aff7 +000804r 1 F8 .lobytes $aff8 +000805r 1 F9 .lobytes $aff9 +000806r 1 FA .lobytes $affa +000807r 1 FB .lobytes $affb +000808r 1 FC .lobytes $affc +000809r 1 FD .lobytes $affd +00080Ar 1 FE .lobytes $affe +00080Br 1 FF .lobytes $afff +00080Cr 1 00 .lobytes $b000 +00080Dr 1 01 .lobytes $b001 +00080Er 1 02 .lobytes $b002 +00080Fr 1 03 .lobytes $b003 +000810r 1 04 .lobytes $b004 +000811r 1 05 .lobytes $b005 +000812r 1 06 .lobytes $b006 +000813r 1 07 .lobytes $b007 +000814r 1 08 .lobytes $b008 +000815r 1 09 .lobytes $b009 +000816r 1 0A .lobytes $b00a +000817r 1 0B .lobytes $b00b +000818r 1 0C .lobytes $b00c +000819r 1 0D .lobytes $b00d +00081Ar 1 0E .lobytes $b00e +00081Br 1 0F .lobytes $b00f +00081Cr 1 E1 .lobytes $bfe1 +00081Dr 1 E2 .lobytes $bfe2 +00081Er 1 E3 .lobytes $bfe3 +00081Fr 1 E4 .lobytes $bfe4 +000820r 1 E5 .lobytes $bfe5 +000821r 1 E6 .lobytes $bfe6 +000822r 1 E7 .lobytes $bfe7 +000823r 1 E8 .lobytes $bfe8 +000824r 1 E9 .lobytes $bfe9 +000825r 1 EA .lobytes $bfea +000826r 1 EB .lobytes $bfeb +000827r 1 EC .lobytes $bfec +000828r 1 ED .lobytes $bfed +000829r 1 EE .lobytes $bfee +00082Ar 1 EF .lobytes $bfef +00082Br 1 F0 .lobytes $bff0 +00082Cr 1 F1 .lobytes $bff1 +00082Dr 1 F2 .lobytes $bff2 +00082Er 1 F3 .lobytes $bff3 +00082Fr 1 F4 .lobytes $bff4 +000830r 1 F5 .lobytes $bff5 +000831r 1 F6 .lobytes $bff6 +000832r 1 F7 .lobytes $bff7 +000833r 1 F8 .lobytes $bff8 +000834r 1 F9 .lobytes $bff9 +000835r 1 FA .lobytes $bffa +000836r 1 FB .lobytes $bffb +000837r 1 FC .lobytes $bffc +000838r 1 FD .lobytes $bffd +000839r 1 FE .lobytes $bffe +00083Ar 1 FF .lobytes $bfff +00083Br 1 00 .lobytes $c000 +00083Cr 1 01 .lobytes $c001 +00083Dr 1 02 .lobytes $c002 +00083Er 1 03 .lobytes $c003 +00083Fr 1 04 .lobytes $c004 +000840r 1 05 .lobytes $c005 +000841r 1 06 .lobytes $c006 +000842r 1 07 .lobytes $c007 +000843r 1 08 .lobytes $c008 +000844r 1 09 .lobytes $c009 +000845r 1 0A .lobytes $c00a +000846r 1 0B .lobytes $c00b +000847r 1 0C .lobytes $c00c +000848r 1 0D .lobytes $c00d +000849r 1 0E .lobytes $c00e +00084Ar 1 0F .lobytes $c00f +00084Br 1 E1 .lobytes $cfe1 +00084Cr 1 E2 .lobytes $cfe2 +00084Dr 1 E3 .lobytes $cfe3 +00084Er 1 E4 .lobytes $cfe4 +00084Fr 1 E5 .lobytes $cfe5 +000850r 1 E6 .lobytes $cfe6 +000851r 1 E7 .lobytes $cfe7 +000852r 1 E8 .lobytes $cfe8 +000853r 1 E9 .lobytes $cfe9 +000854r 1 EA .lobytes $cfea +000855r 1 EB .lobytes $cfeb +000856r 1 EC .lobytes $cfec +000857r 1 ED .lobytes $cfed +000858r 1 EE .lobytes $cfee +000859r 1 EF .lobytes $cfef +00085Ar 1 F0 .lobytes $cff0 +00085Br 1 F1 .lobytes $cff1 +00085Cr 1 F2 .lobytes $cff2 +00085Dr 1 F3 .lobytes $cff3 +00085Er 1 F4 .lobytes $cff4 +00085Fr 1 F5 .lobytes $cff5 +000860r 1 F6 .lobytes $cff6 +000861r 1 F7 .lobytes $cff7 +000862r 1 F8 .lobytes $cff8 +000863r 1 F9 .lobytes $cff9 +000864r 1 FA .lobytes $cffa +000865r 1 FB .lobytes $cffb +000866r 1 FC .lobytes $cffc +000867r 1 FD .lobytes $cffd +000868r 1 FE .lobytes $cffe +000869r 1 FF .lobytes $cfff +00086Ar 1 00 .lobytes $d000 +00086Br 1 01 .lobytes $d001 +00086Cr 1 02 .lobytes $d002 +00086Dr 1 03 .lobytes $d003 +00086Er 1 04 .lobytes $d004 +00086Fr 1 05 .lobytes $d005 +000870r 1 06 .lobytes $d006 +000871r 1 07 .lobytes $d007 +000872r 1 08 .lobytes $d008 +000873r 1 09 .lobytes $d009 +000874r 1 0A .lobytes $d00a +000875r 1 0B .lobytes $d00b +000876r 1 0C .lobytes $d00c +000877r 1 0D .lobytes $d00d +000878r 1 0E .lobytes $d00e +000879r 1 0F .lobytes $d00f +00087Ar 1 E1 .lobytes $dfe1 +00087Br 1 E2 .lobytes $dfe2 +00087Cr 1 E3 .lobytes $dfe3 +00087Dr 1 E4 .lobytes $dfe4 +00087Er 1 E5 .lobytes $dfe5 +00087Fr 1 E6 .lobytes $dfe6 +000880r 1 E7 .lobytes $dfe7 +000881r 1 E8 .lobytes $dfe8 +000882r 1 E9 .lobytes $dfe9 +000883r 1 EA .lobytes $dfea +000884r 1 EB .lobytes $dfeb +000885r 1 EC .lobytes $dfec +000886r 1 ED .lobytes $dfed +000887r 1 EE .lobytes $dfee +000888r 1 EF .lobytes $dfef +000889r 1 F0 .lobytes $dff0 +00088Ar 1 F1 .lobytes $dff1 +00088Br 1 F2 .lobytes $dff2 +00088Cr 1 F3 .lobytes $dff3 +00088Dr 1 F4 .lobytes $dff4 +00088Er 1 F5 .lobytes $dff5 +00088Fr 1 F6 .lobytes $dff6 +000890r 1 F7 .lobytes $dff7 +000891r 1 F8 .lobytes $dff8 +000892r 1 F9 .lobytes $dff9 +000893r 1 FA .lobytes $dffa +000894r 1 FB .lobytes $dffb +000895r 1 FC .lobytes $dffc +000896r 1 FD .lobytes $dffd +000897r 1 FE .lobytes $dffe +000898r 1 FF .lobytes $dfff +000899r 1 00 .lobytes $e000 +00089Ar 1 01 .lobytes $e001 +00089Br 1 02 .lobytes $e002 +00089Cr 1 03 .lobytes $e003 +00089Dr 1 04 .lobytes $e004 +00089Er 1 05 .lobytes $e005 +00089Fr 1 06 .lobytes $e006 +0008A0r 1 07 .lobytes $e007 +0008A1r 1 08 .lobytes $e008 +0008A2r 1 09 .lobytes $e009 +0008A3r 1 0A .lobytes $e00a +0008A4r 1 0B .lobytes $e00b +0008A5r 1 0C .lobytes $e00c +0008A6r 1 0D .lobytes $e00d +0008A7r 1 0E .lobytes $e00e +0008A8r 1 0F .lobytes $e00f +0008A9r 1 E1 .lobytes $efe1 +0008AAr 1 E2 .lobytes $efe2 +0008ABr 1 E3 .lobytes $efe3 +0008ACr 1 E4 .lobytes $efe4 +0008ADr 1 E5 .lobytes $efe5 +0008AEr 1 E6 .lobytes $efe6 +0008AFr 1 E7 .lobytes $efe7 +0008B0r 1 E8 .lobytes $efe8 +0008B1r 1 E9 .lobytes $efe9 +0008B2r 1 EA .lobytes $efea +0008B3r 1 EB .lobytes $efeb +0008B4r 1 EC .lobytes $efec +0008B5r 1 ED .lobytes $efed +0008B6r 1 EE .lobytes $efee +0008B7r 1 EF .lobytes $efef +0008B8r 1 F0 .lobytes $eff0 +0008B9r 1 F1 .lobytes $eff1 +0008BAr 1 F2 .lobytes $eff2 +0008BBr 1 F3 .lobytes $eff3 +0008BCr 1 F4 .lobytes $eff4 +0008BDr 1 F5 .lobytes $eff5 +0008BEr 1 F6 .lobytes $eff6 +0008BFr 1 F7 .lobytes $eff7 +0008C0r 1 F8 .lobytes $eff8 +0008C1r 1 F9 .lobytes $eff9 +0008C2r 1 FA .lobytes $effa +0008C3r 1 FB .lobytes $effb +0008C4r 1 FC .lobytes $effc +0008C5r 1 FD .lobytes $effd +0008C6r 1 FE .lobytes $effe +0008C7r 1 FF .lobytes $efff +0008C8r 1 00 .lobytes $f000 +0008C9r 1 01 .lobytes $f001 +0008CAr 1 02 .lobytes $f002 +0008CBr 1 03 .lobytes $f003 +0008CCr 1 04 .lobytes $f004 +0008CDr 1 05 .lobytes $f005 +0008CEr 1 06 .lobytes $f006 +0008CFr 1 07 .lobytes $f007 +0008D0r 1 08 .lobytes $f008 +0008D1r 1 09 .lobytes $f009 +0008D2r 1 0A .lobytes $f00a +0008D3r 1 0B .lobytes $f00b +0008D4r 1 0C .lobytes $f00c +0008D5r 1 0D .lobytes $f00d +0008D6r 1 0E .lobytes $f00e +0008D7r 1 0F .lobytes $f00f +0008D8r 1 E1 .lobytes $ffe1 +0008D9r 1 E2 .lobytes $ffe2 +0008DAr 1 E3 .lobytes $ffe3 +0008DBr 1 E4 .lobytes $ffe4 +0008DCr 1 E5 .lobytes $ffe5 +0008DDr 1 E6 .lobytes $ffe6 +0008DEr 1 E7 .lobytes $ffe7 +0008DFr 1 E8 .lobytes $ffe8 +0008E0r 1 E9 .lobytes $ffe9 +0008E1r 1 EA .lobytes $ffea +0008E2r 1 EB .lobytes $ffeb +0008E3r 1 EC .lobytes $ffec +0008E4r 1 ED .lobytes $ffed +0008E5r 1 EE .lobytes $ffee +0008E6r 1 EF .lobytes $ffef +0008E7r 1 F0 .lobytes $fff0 +0008E8r 1 F1 .lobytes $fff1 +0008E9r 1 F2 .lobytes $fff2 +0008EAr 1 F3 .lobytes $fff3 +0008EBr 1 F4 .lobytes $fff4 +0008ECr 1 F5 .lobytes $fff5 +0008EDr 1 F6 .lobytes $fff6 +0008EEr 1 F7 .lobytes $fff7 +0008EFr 1 F8 .lobytes $fff8 +0008F0r 1 F9 .lobytes $fff9 +0008F1r 1 FA .lobytes $fffa +0008F2r 1 FB .lobytes $fffb +0008F3r 1 FC .lobytes $fffc +0008F4r 1 FD .lobytes $fffd +0008F5r 1 FE .lobytes $fffe +0008F6r 1 FF .lobytes $ffff +0008F7r 1 +0008F7r 1 ; 4-digit hex values, uppercase +0008F7r 1 00 .lobytes $0000 +0008F8r 1 01 .lobytes $0001 +0008F9r 1 02 .lobytes $0002 +0008FAr 1 03 .lobytes $0003 +0008FBr 1 04 .lobytes $0004 +0008FCr 1 05 .lobytes $0005 +0008FDr 1 06 .lobytes $0006 +0008FEr 1 07 .lobytes $0007 +0008FFr 1 08 .lobytes $0008 +000900r 1 09 .lobytes $0009 +000901r 1 0A .lobytes $000A +000902r 1 0B .lobytes $000B +000903r 1 0C .lobytes $000C +000904r 1 0D .lobytes $000D +000905r 1 0E .lobytes $000E +000906r 1 0F .lobytes $000F +000907r 1 10 .lobytes $0010 +000908r 1 11 .lobytes $0011 +000909r 1 12 .lobytes $0012 +00090Ar 1 13 .lobytes $0013 +00090Br 1 70 .lobytes $0070 +00090Cr 1 71 .lobytes $0071 +00090Dr 1 72 .lobytes $0072 +00090Er 1 73 .lobytes $0073 +00090Fr 1 74 .lobytes $0074 +000910r 1 75 .lobytes $0075 +000911r 1 76 .lobytes $0076 +000912r 1 77 .lobytes $0077 +000913r 1 78 .lobytes $0078 +000914r 1 79 .lobytes $0079 +000915r 1 7A .lobytes $007A +000916r 1 7B .lobytes $007B +000917r 1 7C .lobytes $007C +000918r 1 7D .lobytes $007D +000919r 1 7E .lobytes $007E +00091Ar 1 7F .lobytes $007F +00091Br 1 80 .lobytes $0080 +00091Cr 1 81 .lobytes $0081 +00091Dr 1 82 .lobytes $0082 +00091Er 1 83 .lobytes $0083 +00091Fr 1 84 .lobytes $0084 +000920r 1 85 .lobytes $0085 +000921r 1 86 .lobytes $0086 +000922r 1 F0 .lobytes $00F0 +000923r 1 F1 .lobytes $00F1 +000924r 1 F2 .lobytes $00F2 +000925r 1 F3 .lobytes $00F3 +000926r 1 F4 .lobytes $00F4 +000927r 1 F5 .lobytes $00F5 +000928r 1 F6 .lobytes $00F6 +000929r 1 F7 .lobytes $00F7 +00092Ar 1 F8 .lobytes $00F8 +00092Br 1 F9 .lobytes $00F9 +00092Cr 1 FA .lobytes $00FA +00092Dr 1 FB .lobytes $00FB +00092Er 1 FC .lobytes $00FC +00092Fr 1 FD .lobytes $00FD +000930r 1 FE .lobytes $00FE +000931r 1 FF .lobytes $00FF +000932r 1 00 .lobytes $0100 +000933r 1 01 .lobytes $0101 +000934r 1 02 .lobytes $0102 +000935r 1 03 .lobytes $0103 +000936r 1 D2 .lobytes $0FD2 +000937r 1 D3 .lobytes $0FD3 +000938r 1 D4 .lobytes $0FD4 +000939r 1 D5 .lobytes $0FD5 +00093Ar 1 D6 .lobytes $0FD6 +00093Br 1 D7 .lobytes $0FD7 +00093Cr 1 D8 .lobytes $0FD8 +00093Dr 1 D9 .lobytes $0FD9 +00093Er 1 DA .lobytes $0FDA +00093Fr 1 DB .lobytes $0FDB +000940r 1 DC .lobytes $0FDC +000941r 1 DD .lobytes $0FDD +000942r 1 DE .lobytes $0FDE +000943r 1 DF .lobytes $0FDF +000944r 1 E0 .lobytes $0FE0 +000945r 1 E1 .lobytes $0FE1 +000946r 1 E2 .lobytes $0FE2 +000947r 1 E3 .lobytes $0FE3 +000948r 1 E4 .lobytes $0FE4 +000949r 1 E5 .lobytes $0FE5 +00094Ar 1 E6 .lobytes $0FE6 +00094Br 1 E7 .lobytes $0FE7 +00094Cr 1 E8 .lobytes $0FE8 +00094Dr 1 E9 .lobytes $0FE9 +00094Er 1 EA .lobytes $0FEA +00094Fr 1 EB .lobytes $0FEB +000950r 1 EC .lobytes $0FEC +000951r 1 ED .lobytes $0FED +000952r 1 EE .lobytes $0FEE +000953r 1 EF .lobytes $0FEF +000954r 1 F0 .lobytes $0FF0 +000955r 1 F1 .lobytes $0FF1 +000956r 1 F2 .lobytes $0FF2 +000957r 1 F3 .lobytes $0FF3 +000958r 1 F4 .lobytes $0FF4 +000959r 1 F5 .lobytes $0FF5 +00095Ar 1 F6 .lobytes $0FF6 +00095Br 1 F7 .lobytes $0FF7 +00095Cr 1 F8 .lobytes $0FF8 +00095Dr 1 F9 .lobytes $0FF9 +00095Er 1 FA .lobytes $0FFA +00095Fr 1 FB .lobytes $0FFB +000960r 1 FC .lobytes $0FFC +000961r 1 FD .lobytes $0FFD +000962r 1 FE .lobytes $0FFE +000963r 1 FF .lobytes $0FFF +000964r 1 00 .lobytes $1000 +000965r 1 01 .lobytes $1001 +000966r 1 02 .lobytes $1002 +000967r 1 03 .lobytes $1003 +000968r 1 04 .lobytes $1004 +000969r 1 05 .lobytes $1005 +00096Ar 1 06 .lobytes $1006 +00096Br 1 07 .lobytes $1007 +00096Cr 1 08 .lobytes $1008 +00096Dr 1 F0 .lobytes $7FF0 +00096Er 1 F1 .lobytes $7FF1 +00096Fr 1 F2 .lobytes $7FF2 +000970r 1 F3 .lobytes $7FF3 +000971r 1 F4 .lobytes $7FF4 +000972r 1 F5 .lobytes $7FF5 +000973r 1 F6 .lobytes $7FF6 +000974r 1 F7 .lobytes $7FF7 +000975r 1 F8 .lobytes $7FF8 +000976r 1 F9 .lobytes $7FF9 +000977r 1 FA .lobytes $7FFA +000978r 1 FB .lobytes $7FFB +000979r 1 FC .lobytes $7FFC +00097Ar 1 FD .lobytes $7FFD +00097Br 1 FE .lobytes $7FFE +00097Cr 1 FF .lobytes $7FFF +00097Dr 1 00 .lobytes $8000 +00097Er 1 01 .lobytes $8001 +00097Fr 1 02 .lobytes $8002 +000980r 1 03 .lobytes $8003 +000981r 1 04 .lobytes $8004 +000982r 1 05 .lobytes $8005 +000983r 1 06 .lobytes $8006 +000984r 1 07 .lobytes $8007 +000985r 1 08 .lobytes $8008 +000986r 1 09 .lobytes $8009 +000987r 1 0A .lobytes $800A +000988r 1 0B .lobytes $800B +000989r 1 E1 .lobytes $9FE1 +00098Ar 1 E2 .lobytes $9FE2 +00098Br 1 E3 .lobytes $9FE3 +00098Cr 1 E4 .lobytes $9FE4 +00098Dr 1 E5 .lobytes $9FE5 +00098Er 1 E6 .lobytes $9FE6 +00098Fr 1 E7 .lobytes $9FE7 +000990r 1 E8 .lobytes $9FE8 +000991r 1 E9 .lobytes $9FE9 +000992r 1 EA .lobytes $9FEA +000993r 1 EB .lobytes $9FEB +000994r 1 EC .lobytes $9FEC +000995r 1 ED .lobytes $9FED +000996r 1 EE .lobytes $9FEE +000997r 1 EF .lobytes $9FEF +000998r 1 F0 .lobytes $9FF0 +000999r 1 F1 .lobytes $9FF1 +00099Ar 1 F2 .lobytes $9FF2 +00099Br 1 F3 .lobytes $9FF3 +00099Cr 1 F4 .lobytes $9FF4 +00099Dr 1 F5 .lobytes $9FF5 +00099Er 1 F6 .lobytes $9FF6 +00099Fr 1 F7 .lobytes $9FF7 +0009A0r 1 F8 .lobytes $9FF8 +0009A1r 1 F9 .lobytes $9FF9 +0009A2r 1 FA .lobytes $9FFA +0009A3r 1 FB .lobytes $9FFB +0009A4r 1 FC .lobytes $9FFC +0009A5r 1 FD .lobytes $9FFD +0009A6r 1 FE .lobytes $9FFE +0009A7r 1 FF .lobytes $9FFF +0009A8r 1 00 .lobytes $A000 +0009A9r 1 01 .lobytes $A001 +0009AAr 1 02 .lobytes $A002 +0009ABr 1 03 .lobytes $A003 +0009ACr 1 04 .lobytes $A004 +0009ADr 1 05 .lobytes $A005 +0009AEr 1 06 .lobytes $A006 +0009AFr 1 07 .lobytes $A007 +0009B0r 1 08 .lobytes $A008 +0009B1r 1 09 .lobytes $A009 +0009B2r 1 0A .lobytes $A00A +0009B3r 1 0B .lobytes $A00B +0009B4r 1 0C .lobytes $A00C +0009B5r 1 0D .lobytes $A00D +0009B6r 1 0E .lobytes $A00E +0009B7r 1 0F .lobytes $A00F +0009B8r 1 E1 .lobytes $AFE1 +0009B9r 1 E2 .lobytes $AFE2 +0009BAr 1 E3 .lobytes $AFE3 +0009BBr 1 E4 .lobytes $AFE4 +0009BCr 1 E5 .lobytes $AFE5 +0009BDr 1 E6 .lobytes $AFE6 +0009BEr 1 E7 .lobytes $AFE7 +0009BFr 1 E8 .lobytes $AFE8 +0009C0r 1 E9 .lobytes $AFE9 +0009C1r 1 EA .lobytes $AFEA +0009C2r 1 EB .lobytes $AFEB +0009C3r 1 EC .lobytes $AFEC +0009C4r 1 ED .lobytes $AFED +0009C5r 1 EE .lobytes $AFEE +0009C6r 1 EF .lobytes $AFEF +0009C7r 1 F0 .lobytes $AFF0 +0009C8r 1 F1 .lobytes $AFF1 +0009C9r 1 F2 .lobytes $AFF2 +0009CAr 1 F3 .lobytes $AFF3 +0009CBr 1 F4 .lobytes $AFF4 +0009CCr 1 F5 .lobytes $AFF5 +0009CDr 1 F6 .lobytes $AFF6 +0009CEr 1 F7 .lobytes $AFF7 +0009CFr 1 F8 .lobytes $AFF8 +0009D0r 1 F9 .lobytes $AFF9 +0009D1r 1 FA .lobytes $AFFA +0009D2r 1 FB .lobytes $AFFB +0009D3r 1 FC .lobytes $AFFC +0009D4r 1 FD .lobytes $AFFD +0009D5r 1 FE .lobytes $AFFE +0009D6r 1 FF .lobytes $AFFF +0009D7r 1 00 .lobytes $B000 +0009D8r 1 01 .lobytes $B001 +0009D9r 1 02 .lobytes $B002 +0009DAr 1 03 .lobytes $B003 +0009DBr 1 04 .lobytes $B004 +0009DCr 1 05 .lobytes $B005 +0009DDr 1 06 .lobytes $B006 +0009DEr 1 07 .lobytes $B007 +0009DFr 1 08 .lobytes $B008 +0009E0r 1 09 .lobytes $B009 +0009E1r 1 0A .lobytes $B00A +0009E2r 1 0B .lobytes $B00B +0009E3r 1 0C .lobytes $B00C +0009E4r 1 0D .lobytes $B00D +0009E5r 1 0E .lobytes $B00E +0009E6r 1 0F .lobytes $B00F +0009E7r 1 E1 .lobytes $BFE1 +0009E8r 1 E2 .lobytes $BFE2 +0009E9r 1 E3 .lobytes $BFE3 +0009EAr 1 E4 .lobytes $BFE4 +0009EBr 1 E5 .lobytes $BFE5 +0009ECr 1 E6 .lobytes $BFE6 +0009EDr 1 E7 .lobytes $BFE7 +0009EEr 1 E8 .lobytes $BFE8 +0009EFr 1 E9 .lobytes $BFE9 +0009F0r 1 EA .lobytes $BFEA +0009F1r 1 EB .lobytes $BFEB +0009F2r 1 EC .lobytes $BFEC +0009F3r 1 ED .lobytes $BFED +0009F4r 1 EE .lobytes $BFEE +0009F5r 1 EF .lobytes $BFEF +0009F6r 1 F0 .lobytes $BFF0 +0009F7r 1 F1 .lobytes $BFF1 +0009F8r 1 F2 .lobytes $BFF2 +0009F9r 1 F3 .lobytes $BFF3 +0009FAr 1 F4 .lobytes $BFF4 +0009FBr 1 F5 .lobytes $BFF5 +0009FCr 1 F6 .lobytes $BFF6 +0009FDr 1 F7 .lobytes $BFF7 +0009FEr 1 F8 .lobytes $BFF8 +0009FFr 1 F9 .lobytes $BFF9 +000A00r 1 FA .lobytes $BFFA +000A01r 1 FB .lobytes $BFFB +000A02r 1 FC .lobytes $BFFC +000A03r 1 FD .lobytes $BFFD +000A04r 1 FE .lobytes $BFFE +000A05r 1 FF .lobytes $BFFF +000A06r 1 00 .lobytes $C000 +000A07r 1 01 .lobytes $C001 +000A08r 1 02 .lobytes $C002 +000A09r 1 03 .lobytes $C003 +000A0Ar 1 04 .lobytes $C004 +000A0Br 1 05 .lobytes $C005 +000A0Cr 1 06 .lobytes $C006 +000A0Dr 1 07 .lobytes $C007 +000A0Er 1 08 .lobytes $C008 +000A0Fr 1 09 .lobytes $C009 +000A10r 1 0A .lobytes $C00A +000A11r 1 0B .lobytes $C00B +000A12r 1 0C .lobytes $C00C +000A13r 1 0D .lobytes $C00D +000A14r 1 0E .lobytes $C00E +000A15r 1 0F .lobytes $C00F +000A16r 1 E1 .lobytes $CFE1 +000A17r 1 E2 .lobytes $CFE2 +000A18r 1 E3 .lobytes $CFE3 +000A19r 1 E4 .lobytes $CFE4 +000A1Ar 1 E5 .lobytes $CFE5 +000A1Br 1 E6 .lobytes $CFE6 +000A1Cr 1 E7 .lobytes $CFE7 +000A1Dr 1 E8 .lobytes $CFE8 +000A1Er 1 E9 .lobytes $CFE9 +000A1Fr 1 EA .lobytes $CFEA +000A20r 1 EB .lobytes $CFEB +000A21r 1 EC .lobytes $CFEC +000A22r 1 ED .lobytes $CFED +000A23r 1 EE .lobytes $CFEE +000A24r 1 EF .lobytes $CFEF +000A25r 1 F0 .lobytes $CFF0 +000A26r 1 F1 .lobytes $CFF1 +000A27r 1 F2 .lobytes $CFF2 +000A28r 1 F3 .lobytes $CFF3 +000A29r 1 F4 .lobytes $CFF4 +000A2Ar 1 F5 .lobytes $CFF5 +000A2Br 1 F6 .lobytes $CFF6 +000A2Cr 1 F7 .lobytes $CFF7 +000A2Dr 1 F8 .lobytes $CFF8 +000A2Er 1 F9 .lobytes $CFF9 +000A2Fr 1 FA .lobytes $CFFA +000A30r 1 FB .lobytes $CFFB +000A31r 1 FC .lobytes $CFFC +000A32r 1 FD .lobytes $CFFD +000A33r 1 FE .lobytes $CFFE +000A34r 1 FF .lobytes $CFFF +000A35r 1 00 .lobytes $D000 +000A36r 1 01 .lobytes $D001 +000A37r 1 02 .lobytes $D002 +000A38r 1 03 .lobytes $D003 +000A39r 1 04 .lobytes $D004 +000A3Ar 1 05 .lobytes $D005 +000A3Br 1 06 .lobytes $D006 +000A3Cr 1 07 .lobytes $D007 +000A3Dr 1 08 .lobytes $D008 +000A3Er 1 09 .lobytes $D009 +000A3Fr 1 0A .lobytes $D00A +000A40r 1 0B .lobytes $D00B +000A41r 1 0C .lobytes $D00C +000A42r 1 0D .lobytes $D00D +000A43r 1 0E .lobytes $D00E +000A44r 1 0F .lobytes $D00F +000A45r 1 E1 .lobytes $DFE1 +000A46r 1 E2 .lobytes $DFE2 +000A47r 1 E3 .lobytes $DFE3 +000A48r 1 E4 .lobytes $DFE4 +000A49r 1 E5 .lobytes $DFE5 +000A4Ar 1 E6 .lobytes $DFE6 +000A4Br 1 E7 .lobytes $DFE7 +000A4Cr 1 E8 .lobytes $DFE8 +000A4Dr 1 E9 .lobytes $DFE9 +000A4Er 1 EA .lobytes $DFEA +000A4Fr 1 EB .lobytes $DFEB +000A50r 1 EC .lobytes $DFEC +000A51r 1 ED .lobytes $DFED +000A52r 1 EE .lobytes $DFEE +000A53r 1 EF .lobytes $DFEF +000A54r 1 F0 .lobytes $DFF0 +000A55r 1 F1 .lobytes $DFF1 +000A56r 1 F2 .lobytes $DFF2 +000A57r 1 F3 .lobytes $DFF3 +000A58r 1 F4 .lobytes $DFF4 +000A59r 1 F5 .lobytes $DFF5 +000A5Ar 1 F6 .lobytes $DFF6 +000A5Br 1 F7 .lobytes $DFF7 +000A5Cr 1 F8 .lobytes $DFF8 +000A5Dr 1 F9 .lobytes $DFF9 +000A5Er 1 FA .lobytes $DFFA +000A5Fr 1 FB .lobytes $DFFB +000A60r 1 FC .lobytes $DFFC +000A61r 1 FD .lobytes $DFFD +000A62r 1 FE .lobytes $DFFE +000A63r 1 FF .lobytes $DFFF +000A64r 1 00 .lobytes $E000 +000A65r 1 01 .lobytes $E001 +000A66r 1 02 .lobytes $E002 +000A67r 1 03 .lobytes $E003 +000A68r 1 04 .lobytes $E004 +000A69r 1 05 .lobytes $E005 +000A6Ar 1 06 .lobytes $E006 +000A6Br 1 07 .lobytes $E007 +000A6Cr 1 08 .lobytes $E008 +000A6Dr 1 09 .lobytes $E009 +000A6Er 1 0A .lobytes $E00A +000A6Fr 1 0B .lobytes $E00B +000A70r 1 0C .lobytes $E00C +000A71r 1 0D .lobytes $E00D +000A72r 1 0E .lobytes $E00E +000A73r 1 0F .lobytes $E00F +000A74r 1 E1 .lobytes $EFE1 +000A75r 1 E2 .lobytes $EFE2 +000A76r 1 E3 .lobytes $EFE3 +000A77r 1 E4 .lobytes $EFE4 +000A78r 1 E5 .lobytes $EFE5 +000A79r 1 E6 .lobytes $EFE6 +000A7Ar 1 E7 .lobytes $EFE7 +000A7Br 1 E8 .lobytes $EFE8 +000A7Cr 1 E9 .lobytes $EFE9 +000A7Dr 1 EA .lobytes $EFEA +000A7Er 1 EB .lobytes $EFEB +000A7Fr 1 EC .lobytes $EFEC +000A80r 1 ED .lobytes $EFED +000A81r 1 EE .lobytes $EFEE +000A82r 1 EF .lobytes $EFEF +000A83r 1 F0 .lobytes $EFF0 +000A84r 1 F1 .lobytes $EFF1 +000A85r 1 F2 .lobytes $EFF2 +000A86r 1 F3 .lobytes $EFF3 +000A87r 1 F4 .lobytes $EFF4 +000A88r 1 F5 .lobytes $EFF5 +000A89r 1 F6 .lobytes $EFF6 +000A8Ar 1 F7 .lobytes $EFF7 +000A8Br 1 F8 .lobytes $EFF8 +000A8Cr 1 F9 .lobytes $EFF9 +000A8Dr 1 FA .lobytes $EFFA +000A8Er 1 FB .lobytes $EFFB +000A8Fr 1 FC .lobytes $EFFC +000A90r 1 FD .lobytes $EFFD +000A91r 1 FE .lobytes $EFFE +000A92r 1 FF .lobytes $EFFF +000A93r 1 00 .lobytes $F000 +000A94r 1 01 .lobytes $F001 +000A95r 1 02 .lobytes $F002 +000A96r 1 03 .lobytes $F003 +000A97r 1 04 .lobytes $F004 +000A98r 1 05 .lobytes $F005 +000A99r 1 06 .lobytes $F006 +000A9Ar 1 07 .lobytes $F007 +000A9Br 1 08 .lobytes $F008 +000A9Cr 1 09 .lobytes $F009 +000A9Dr 1 0A .lobytes $F00A +000A9Er 1 0B .lobytes $F00B +000A9Fr 1 0C .lobytes $F00C +000AA0r 1 0D .lobytes $F00D +000AA1r 1 0E .lobytes $F00E +000AA2r 1 0F .lobytes $F00F +000AA3r 1 E1 .lobytes $FFE1 +000AA4r 1 E2 .lobytes $FFE2 +000AA5r 1 E3 .lobytes $FFE3 +000AA6r 1 E4 .lobytes $FFE4 +000AA7r 1 E5 .lobytes $FFE5 +000AA8r 1 E6 .lobytes $FFE6 +000AA9r 1 E7 .lobytes $FFE7 +000AAAr 1 E8 .lobytes $FFE8 +000AABr 1 E9 .lobytes $FFE9 +000AACr 1 EA .lobytes $FFEA +000AADr 1 EB .lobytes $FFEB +000AAEr 1 EC .lobytes $FFEC +000AAFr 1 ED .lobytes $FFED +000AB0r 1 EE .lobytes $FFEE +000AB1r 1 EF .lobytes $FFEF +000AB2r 1 F0 .lobytes $FFF0 +000AB3r 1 F1 .lobytes $FFF1 +000AB4r 1 F2 .lobytes $FFF2 +000AB5r 1 F3 .lobytes $FFF3 +000AB6r 1 F4 .lobytes $FFF4 +000AB7r 1 F5 .lobytes $FFF5 +000AB8r 1 F6 .lobytes $FFF6 +000AB9r 1 F7 .lobytes $FFF7 +000ABAr 1 F8 .lobytes $FFF8 +000ABBr 1 F9 .lobytes $FFF9 +000ABCr 1 FA .lobytes $FFFA +000ABDr 1 FB .lobytes $FFFB +000ABEr 1 FC .lobytes $FFFC +000ABFr 1 FD .lobytes $FFFD +000AC0r 1 FE .lobytes $FFFE +000AC1r 1 FF .lobytes $FFFF +000AC2r 1 +000AC2r 1 ; alternative hex values +000AC2r 1 00 .lobytes 0h +000AC3r 1 01 .lobytes 1h +000AC4r 1 02 .lobytes 2h +000AC5r 1 03 .lobytes 3h +000AC6r 1 04 .lobytes 4h +000AC7r 1 05 .lobytes 5h +000AC8r 1 06 .lobytes 6h +000AC9r 1 07 .lobytes 7h +000ACAr 1 08 .lobytes 8h +000ACBr 1 09 .lobytes 9h +000ACCr 1 0A .lobytes 0ah +000ACDr 1 0B .lobytes 0bh +000ACEr 1 0C .lobytes 0ch +000ACFr 1 0D .lobytes 0dh +000AD0r 1 0E .lobytes 0eh +000AD1r 1 0F .lobytes 0fh +000AD2r 1 10 .lobytes 10h +000AD3r 1 11 .lobytes 11h +000AD4r 1 12 .lobytes 12h +000AD5r 1 13 .lobytes 13h +000AD6r 1 70 .lobytes 70h +000AD7r 1 71 .lobytes 71h +000AD8r 1 72 .lobytes 72h +000AD9r 1 73 .lobytes 73h +000ADAr 1 74 .lobytes 74h +000ADBr 1 75 .lobytes 75h +000ADCr 1 76 .lobytes 76h +000ADDr 1 77 .lobytes 77h +000ADEr 1 78 .lobytes 78h +000ADFr 1 79 .lobytes 79h +000AE0r 1 7A .lobytes 7ah +000AE1r 1 7B .lobytes 7bh +000AE2r 1 7C .lobytes 7ch +000AE3r 1 7D .lobytes 7dh +000AE4r 1 7E .lobytes 7eh +000AE5r 1 7F .lobytes 7fh +000AE6r 1 80 .lobytes 80h +000AE7r 1 81 .lobytes 81h +000AE8r 1 82 .lobytes 82h +000AE9r 1 83 .lobytes 83h +000AEAr 1 84 .lobytes 84h +000AEBr 1 85 .lobytes 85h +000AECr 1 86 .lobytes 86h +000AEDr 1 F0 .lobytes 0f0h +000AEEr 1 F1 .lobytes 0f1h +000AEFr 1 F2 .lobytes 0f2h +000AF0r 1 F3 .lobytes 0f3h +000AF1r 1 F4 .lobytes 0f4h +000AF2r 1 F5 .lobytes 0f5h +000AF3r 1 F6 .lobytes 0f6h +000AF4r 1 F7 .lobytes 0f7h +000AF5r 1 F8 .lobytes 0f8h +000AF6r 1 F9 .lobytes 0f9h +000AF7r 1 FA .lobytes 0fah +000AF8r 1 FB .lobytes 0fbh +000AF9r 1 FC .lobytes 0fch +000AFAr 1 FD .lobytes 0fdh +000AFBr 1 FE .lobytes 0feh +000AFCr 1 FF .lobytes 0ffh +000AFDr 1 00 .lobytes 100h +000AFEr 1 01 .lobytes 101h +000AFFr 1 02 .lobytes 102h +000B00r 1 03 .lobytes 103h +000B01r 1 D2 .lobytes 0fd2h +000B02r 1 D3 .lobytes 0fd3h +000B03r 1 D4 .lobytes 0fd4h +000B04r 1 D5 .lobytes 0fd5h +000B05r 1 D6 .lobytes 0fd6h +000B06r 1 D7 .lobytes 0fd7h +000B07r 1 D8 .lobytes 0fd8h +000B08r 1 D9 .lobytes 0fd9h +000B09r 1 DA .lobytes 0fdah +000B0Ar 1 DB .lobytes 0fdbh +000B0Br 1 DC .lobytes 0fdch +000B0Cr 1 DD .lobytes 0fddh +000B0Dr 1 DE .lobytes 0fdeh +000B0Er 1 DF .lobytes 0fdfh +000B0Fr 1 E0 .lobytes 0fe0h +000B10r 1 E1 .lobytes 0fe1h +000B11r 1 E2 .lobytes 0fe2h +000B12r 1 E3 .lobytes 0fe3h +000B13r 1 E4 .lobytes 0fe4h +000B14r 1 E5 .lobytes 0fe5h +000B15r 1 E6 .lobytes 0fe6h +000B16r 1 E7 .lobytes 0fe7h +000B17r 1 E8 .lobytes 0fe8h +000B18r 1 E9 .lobytes 0fe9h +000B19r 1 EA .lobytes 0feah +000B1Ar 1 EB .lobytes 0febh +000B1Br 1 EC .lobytes 0fech +000B1Cr 1 ED .lobytes 0fedh +000B1Dr 1 EE .lobytes 0feeh +000B1Er 1 EF .lobytes 0fefh +000B1Fr 1 F0 .lobytes 0ff0h +000B20r 1 F1 .lobytes 0ff1h +000B21r 1 F2 .lobytes 0ff2h +000B22r 1 F3 .lobytes 0ff3h +000B23r 1 F4 .lobytes 0ff4h +000B24r 1 F5 .lobytes 0ff5h +000B25r 1 F6 .lobytes 0ff6h +000B26r 1 F7 .lobytes 0ff7h +000B27r 1 F8 .lobytes 0ff8h +000B28r 1 F9 .lobytes 0ff9h +000B29r 1 FA .lobytes 0ffah +000B2Ar 1 FB .lobytes 0ffbh +000B2Br 1 FC .lobytes 0ffch +000B2Cr 1 FD .lobytes 0ffdh +000B2Dr 1 FE .lobytes 0ffeh +000B2Er 1 FF .lobytes 0fffh +000B2Fr 1 00 .lobytes 1000h +000B30r 1 01 .lobytes 1001h +000B31r 1 02 .lobytes 1002h +000B32r 1 03 .lobytes 1003h +000B33r 1 04 .lobytes 1004h +000B34r 1 05 .lobytes 1005h +000B35r 1 06 .lobytes 1006h +000B36r 1 07 .lobytes 1007h +000B37r 1 08 .lobytes 1008h +000B38r 1 F0 .lobytes 7ff0h +000B39r 1 F1 .lobytes 7ff1h +000B3Ar 1 F2 .lobytes 7ff2h +000B3Br 1 F3 .lobytes 7ff3h +000B3Cr 1 F4 .lobytes 7ff4h +000B3Dr 1 F5 .lobytes 7ff5h +000B3Er 1 F6 .lobytes 7ff6h +000B3Fr 1 F7 .lobytes 7ff7h +000B40r 1 F8 .lobytes 7ff8h +000B41r 1 F9 .lobytes 7ff9h +000B42r 1 FA .lobytes 7ffah +000B43r 1 FB .lobytes 7ffbh +000B44r 1 FC .lobytes 7ffch +000B45r 1 FD .lobytes 7ffdh +000B46r 1 FE .lobytes 7ffeh +000B47r 1 FF .lobytes 7fffh +000B48r 1 00 .lobytes 8000h +000B49r 1 01 .lobytes 8001h +000B4Ar 1 02 .lobytes 8002h +000B4Br 1 03 .lobytes 8003h +000B4Cr 1 04 .lobytes 8004h +000B4Dr 1 05 .lobytes 8005h +000B4Er 1 06 .lobytes 8006h +000B4Fr 1 07 .lobytes 8007h +000B50r 1 08 .lobytes 8008h +000B51r 1 09 .lobytes 8009h +000B52r 1 0A .lobytes 800ah +000B53r 1 0B .lobytes 800bh +000B54r 1 E1 .lobytes 9fe1h +000B55r 1 E2 .lobytes 9fe2h +000B56r 1 E3 .lobytes 9fe3h +000B57r 1 E4 .lobytes 9fe4h +000B58r 1 E5 .lobytes 9fe5h +000B59r 1 E6 .lobytes 9fe6h +000B5Ar 1 E7 .lobytes 9fe7h +000B5Br 1 E8 .lobytes 9fe8h +000B5Cr 1 E9 .lobytes 9fe9h +000B5Dr 1 EA .lobytes 9feah +000B5Er 1 EB .lobytes 9febh +000B5Fr 1 EC .lobytes 9fech +000B60r 1 ED .lobytes 9fedh +000B61r 1 EE .lobytes 9feeh +000B62r 1 EF .lobytes 9fefh +000B63r 1 F0 .lobytes 9ff0h +000B64r 1 F1 .lobytes 9ff1h +000B65r 1 F2 .lobytes 9ff2h +000B66r 1 F3 .lobytes 9ff3h +000B67r 1 F4 .lobytes 9ff4h +000B68r 1 F5 .lobytes 9ff5h +000B69r 1 F6 .lobytes 9ff6h +000B6Ar 1 F7 .lobytes 9ff7h +000B6Br 1 F8 .lobytes 9ff8h +000B6Cr 1 F9 .lobytes 9ff9h +000B6Dr 1 FA .lobytes 9ffah +000B6Er 1 FB .lobytes 9ffbh +000B6Fr 1 FC .lobytes 9ffch +000B70r 1 FD .lobytes 9ffdh +000B71r 1 FE .lobytes 9ffeh +000B72r 1 FF .lobytes 9fffh +000B73r 1 00 .lobytes 0a000h +000B74r 1 01 .lobytes 0a001h +000B75r 1 02 .lobytes 0a002h +000B76r 1 03 .lobytes 0a003h +000B77r 1 04 .lobytes 0a004h +000B78r 1 05 .lobytes 0a005h +000B79r 1 06 .lobytes 0a006h +000B7Ar 1 07 .lobytes 0a007h +000B7Br 1 08 .lobytes 0a008h +000B7Cr 1 09 .lobytes 0a009h +000B7Dr 1 0A .lobytes 0a00ah +000B7Er 1 0B .lobytes 0a00bh +000B7Fr 1 0C .lobytes 0a00ch +000B80r 1 0D .lobytes 0a00dh +000B81r 1 0E .lobytes 0a00eh +000B82r 1 0F .lobytes 0a00fh +000B83r 1 E1 .lobytes 0afe1h +000B84r 1 E2 .lobytes 0afe2h +000B85r 1 E3 .lobytes 0afe3h +000B86r 1 E4 .lobytes 0afe4h +000B87r 1 E5 .lobytes 0afe5h +000B88r 1 E6 .lobytes 0afe6h +000B89r 1 E7 .lobytes 0afe7h +000B8Ar 1 E8 .lobytes 0afe8h +000B8Br 1 E9 .lobytes 0afe9h +000B8Cr 1 EA .lobytes 0afeah +000B8Dr 1 EB .lobytes 0afebh +000B8Er 1 EC .lobytes 0afech +000B8Fr 1 ED .lobytes 0afedh +000B90r 1 EE .lobytes 0afeeh +000B91r 1 EF .lobytes 0afefh +000B92r 1 F0 .lobytes 0aff0h +000B93r 1 F1 .lobytes 0aff1h +000B94r 1 F2 .lobytes 0aff2h +000B95r 1 F3 .lobytes 0aff3h +000B96r 1 F4 .lobytes 0aff4h +000B97r 1 F5 .lobytes 0aff5h +000B98r 1 F6 .lobytes 0aff6h +000B99r 1 F7 .lobytes 0aff7h +000B9Ar 1 F8 .lobytes 0aff8h +000B9Br 1 F9 .lobytes 0aff9h +000B9Cr 1 FA .lobytes 0affah +000B9Dr 1 FB .lobytes 0affbh +000B9Er 1 FC .lobytes 0affch +000B9Fr 1 FD .lobytes 0affdh +000BA0r 1 FE .lobytes 0affeh +000BA1r 1 FF .lobytes 0afffh +000BA2r 1 00 .lobytes 0b000h +000BA3r 1 01 .lobytes 0b001h +000BA4r 1 02 .lobytes 0b002h +000BA5r 1 03 .lobytes 0b003h +000BA6r 1 04 .lobytes 0b004h +000BA7r 1 05 .lobytes 0b005h +000BA8r 1 06 .lobytes 0b006h +000BA9r 1 07 .lobytes 0b007h +000BAAr 1 08 .lobytes 0b008h +000BABr 1 09 .lobytes 0b009h +000BACr 1 0A .lobytes 0b00ah +000BADr 1 0B .lobytes 0b00bh +000BAEr 1 0C .lobytes 0b00ch +000BAFr 1 0D .lobytes 0b00dh +000BB0r 1 0E .lobytes 0b00eh +000BB1r 1 0F .lobytes 0b00fh +000BB2r 1 E1 .lobytes 0bfe1h +000BB3r 1 E2 .lobytes 0bfe2h +000BB4r 1 E3 .lobytes 0bfe3h +000BB5r 1 E4 .lobytes 0bfe4h +000BB6r 1 E5 .lobytes 0bfe5h +000BB7r 1 E6 .lobytes 0bfe6h +000BB8r 1 E7 .lobytes 0bfe7h +000BB9r 1 E8 .lobytes 0bfe8h +000BBAr 1 E9 .lobytes 0bfe9h +000BBBr 1 EA .lobytes 0bfeah +000BBCr 1 EB .lobytes 0bfebh +000BBDr 1 EC .lobytes 0bfech +000BBEr 1 ED .lobytes 0bfedh +000BBFr 1 EE .lobytes 0bfeeh +000BC0r 1 EF .lobytes 0bfefh +000BC1r 1 F0 .lobytes 0bff0h +000BC2r 1 F1 .lobytes 0bff1h +000BC3r 1 F2 .lobytes 0bff2h +000BC4r 1 F3 .lobytes 0bff3h +000BC5r 1 F4 .lobytes 0bff4h +000BC6r 1 F5 .lobytes 0bff5h +000BC7r 1 F6 .lobytes 0bff6h +000BC8r 1 F7 .lobytes 0bff7h +000BC9r 1 F8 .lobytes 0bff8h +000BCAr 1 F9 .lobytes 0bff9h +000BCBr 1 FA .lobytes 0bffah +000BCCr 1 FB .lobytes 0bffbh +000BCDr 1 FC .lobytes 0bffch +000BCEr 1 FD .lobytes 0bffdh +000BCFr 1 FE .lobytes 0bffeh +000BD0r 1 FF .lobytes 0bfffh +000BD1r 1 00 .lobytes 0c000h +000BD2r 1 01 .lobytes 0c001h +000BD3r 1 02 .lobytes 0c002h +000BD4r 1 03 .lobytes 0c003h +000BD5r 1 04 .lobytes 0c004h +000BD6r 1 05 .lobytes 0c005h +000BD7r 1 06 .lobytes 0c006h +000BD8r 1 07 .lobytes 0c007h +000BD9r 1 08 .lobytes 0c008h +000BDAr 1 09 .lobytes 0c009h +000BDBr 1 0A .lobytes 0c00ah +000BDCr 1 0B .lobytes 0c00bh +000BDDr 1 0C .lobytes 0c00ch +000BDEr 1 0D .lobytes 0c00dh +000BDFr 1 0E .lobytes 0c00eh +000BE0r 1 0F .lobytes 0c00fh +000BE1r 1 E1 .lobytes 0cfe1h +000BE2r 1 E2 .lobytes 0cfe2h +000BE3r 1 E3 .lobytes 0cfe3h +000BE4r 1 E4 .lobytes 0cfe4h +000BE5r 1 E5 .lobytes 0cfe5h +000BE6r 1 E6 .lobytes 0cfe6h +000BE7r 1 E7 .lobytes 0cfe7h +000BE8r 1 E8 .lobytes 0cfe8h +000BE9r 1 E9 .lobytes 0cfe9h +000BEAr 1 EA .lobytes 0cfeah +000BEBr 1 EB .lobytes 0cfebh +000BECr 1 EC .lobytes 0cfech +000BEDr 1 ED .lobytes 0cfedh +000BEEr 1 EE .lobytes 0cfeeh +000BEFr 1 EF .lobytes 0cfefh +000BF0r 1 F0 .lobytes 0cff0h +000BF1r 1 F1 .lobytes 0cff1h +000BF2r 1 F2 .lobytes 0cff2h +000BF3r 1 F3 .lobytes 0cff3h +000BF4r 1 F4 .lobytes 0cff4h +000BF5r 1 F5 .lobytes 0cff5h +000BF6r 1 F6 .lobytes 0cff6h +000BF7r 1 F7 .lobytes 0cff7h +000BF8r 1 F8 .lobytes 0cff8h +000BF9r 1 F9 .lobytes 0cff9h +000BFAr 1 FA .lobytes 0cffah +000BFBr 1 FB .lobytes 0cffbh +000BFCr 1 FC .lobytes 0cffch +000BFDr 1 FD .lobytes 0cffdh +000BFEr 1 FE .lobytes 0cffeh +000BFFr 1 FF .lobytes 0cfffh +000C00r 1 00 .lobytes 0d000h +000C01r 1 01 .lobytes 0d001h +000C02r 1 02 .lobytes 0d002h +000C03r 1 03 .lobytes 0d003h +000C04r 1 04 .lobytes 0d004h +000C05r 1 05 .lobytes 0d005h +000C06r 1 06 .lobytes 0d006h +000C07r 1 07 .lobytes 0d007h +000C08r 1 08 .lobytes 0d008h +000C09r 1 09 .lobytes 0d009h +000C0Ar 1 0A .lobytes 0d00ah +000C0Br 1 0B .lobytes 0d00bh +000C0Cr 1 0C .lobytes 0d00ch +000C0Dr 1 0D .lobytes 0d00dh +000C0Er 1 0E .lobytes 0d00eh +000C0Fr 1 0F .lobytes 0d00fh +000C10r 1 E1 .lobytes 0dfe1h +000C11r 1 E2 .lobytes 0dfe2h +000C12r 1 E3 .lobytes 0dfe3h +000C13r 1 E4 .lobytes 0dfe4h +000C14r 1 E5 .lobytes 0dfe5h +000C15r 1 E6 .lobytes 0dfe6h +000C16r 1 E7 .lobytes 0dfe7h +000C17r 1 E8 .lobytes 0dfe8h +000C18r 1 E9 .lobytes 0dfe9h +000C19r 1 EA .lobytes 0dfeah +000C1Ar 1 EB .lobytes 0dfebh +000C1Br 1 EC .lobytes 0dfech +000C1Cr 1 ED .lobytes 0dfedh +000C1Dr 1 EE .lobytes 0dfeeh +000C1Er 1 EF .lobytes 0dfefh +000C1Fr 1 F0 .lobytes 0dff0h +000C20r 1 F1 .lobytes 0dff1h +000C21r 1 F2 .lobytes 0dff2h +000C22r 1 F3 .lobytes 0dff3h +000C23r 1 F4 .lobytes 0dff4h +000C24r 1 F5 .lobytes 0dff5h +000C25r 1 F6 .lobytes 0dff6h +000C26r 1 F7 .lobytes 0dff7h +000C27r 1 F8 .lobytes 0dff8h +000C28r 1 F9 .lobytes 0dff9h +000C29r 1 FA .lobytes 0dffah +000C2Ar 1 FB .lobytes 0dffbh +000C2Br 1 FC .lobytes 0dffch +000C2Cr 1 FD .lobytes 0dffdh +000C2Dr 1 FE .lobytes 0dffeh +000C2Er 1 FF .lobytes 0dfffh +000C2Fr 1 00 .lobytes 0e000h +000C30r 1 01 .lobytes 0e001h +000C31r 1 02 .lobytes 0e002h +000C32r 1 03 .lobytes 0e003h +000C33r 1 04 .lobytes 0e004h +000C34r 1 05 .lobytes 0e005h +000C35r 1 06 .lobytes 0e006h +000C36r 1 07 .lobytes 0e007h +000C37r 1 08 .lobytes 0e008h +000C38r 1 09 .lobytes 0e009h +000C39r 1 0A .lobytes 0e00ah +000C3Ar 1 0B .lobytes 0e00bh +000C3Br 1 0C .lobytes 0e00ch +000C3Cr 1 0D .lobytes 0e00dh +000C3Dr 1 0E .lobytes 0e00eh +000C3Er 1 0F .lobytes 0e00fh +000C3Fr 1 E1 .lobytes 0efe1h +000C40r 1 E2 .lobytes 0efe2h +000C41r 1 E3 .lobytes 0efe3h +000C42r 1 E4 .lobytes 0efe4h +000C43r 1 E5 .lobytes 0efe5h +000C44r 1 E6 .lobytes 0efe6h +000C45r 1 E7 .lobytes 0efe7h +000C46r 1 E8 .lobytes 0efe8h +000C47r 1 E9 .lobytes 0efe9h +000C48r 1 EA .lobytes 0efeah +000C49r 1 EB .lobytes 0efebh +000C4Ar 1 EC .lobytes 0efech +000C4Br 1 ED .lobytes 0efedh +000C4Cr 1 EE .lobytes 0efeeh +000C4Dr 1 EF .lobytes 0efefh +000C4Er 1 F0 .lobytes 0eff0h +000C4Fr 1 F1 .lobytes 0eff1h +000C50r 1 F2 .lobytes 0eff2h +000C51r 1 F3 .lobytes 0eff3h +000C52r 1 F4 .lobytes 0eff4h +000C53r 1 F5 .lobytes 0eff5h +000C54r 1 F6 .lobytes 0eff6h +000C55r 1 F7 .lobytes 0eff7h +000C56r 1 F8 .lobytes 0eff8h +000C57r 1 F9 .lobytes 0eff9h +000C58r 1 FA .lobytes 0effah +000C59r 1 FB .lobytes 0effbh +000C5Ar 1 FC .lobytes 0effch +000C5Br 1 FD .lobytes 0effdh +000C5Cr 1 FE .lobytes 0effeh +000C5Dr 1 FF .lobytes 0efffh +000C5Er 1 00 .lobytes 0f000h +000C5Fr 1 01 .lobytes 0f001h +000C60r 1 02 .lobytes 0f002h +000C61r 1 03 .lobytes 0f003h +000C62r 1 04 .lobytes 0f004h +000C63r 1 05 .lobytes 0f005h +000C64r 1 06 .lobytes 0f006h +000C65r 1 07 .lobytes 0f007h +000C66r 1 08 .lobytes 0f008h +000C67r 1 09 .lobytes 0f009h +000C68r 1 0A .lobytes 0f00ah +000C69r 1 0B .lobytes 0f00bh +000C6Ar 1 0C .lobytes 0f00ch +000C6Br 1 0D .lobytes 0f00dh +000C6Cr 1 0E .lobytes 0f00eh +000C6Dr 1 0F .lobytes 0f00fh +000C6Er 1 E1 .lobytes 0ffe1h +000C6Fr 1 E2 .lobytes 0ffe2h +000C70r 1 E3 .lobytes 0ffe3h +000C71r 1 E4 .lobytes 0ffe4h +000C72r 1 E5 .lobytes 0ffe5h +000C73r 1 E6 .lobytes 0ffe6h +000C74r 1 E7 .lobytes 0ffe7h +000C75r 1 E8 .lobytes 0ffe8h +000C76r 1 E9 .lobytes 0ffe9h +000C77r 1 EA .lobytes 0ffeah +000C78r 1 EB .lobytes 0ffebh +000C79r 1 EC .lobytes 0ffech +000C7Ar 1 ED .lobytes 0ffedh +000C7Br 1 EE .lobytes 0ffeeh +000C7Cr 1 EF .lobytes 0ffefh +000C7Dr 1 F0 .lobytes 0fff0h +000C7Er 1 F1 .lobytes 0fff1h +000C7Fr 1 F2 .lobytes 0fff2h +000C80r 1 F3 .lobytes 0fff3h +000C81r 1 F4 .lobytes 0fff4h +000C82r 1 F5 .lobytes 0fff5h +000C83r 1 F6 .lobytes 0fff6h +000C84r 1 F7 .lobytes 0fff7h +000C85r 1 F8 .lobytes 0fff8h +000C86r 1 F9 .lobytes 0fff9h +000C87r 1 FA .lobytes 0fffah +000C88r 1 FB .lobytes 0fffbh +000C89r 1 FC .lobytes 0fffch +000C8Ar 1 FD .lobytes 0fffdh +000C8Br 1 FE .lobytes 0fffeh +000C8Cr 1 FF .lobytes 0ffffh +000C8Dr 1 +000C8Dr 1 ; alternative hex values, uppercase +000C8Dr 1 00 .lobytes 0h +000C8Er 1 01 .lobytes 1h +000C8Fr 1 02 .lobytes 2h +000C90r 1 03 .lobytes 3h +000C91r 1 04 .lobytes 4h +000C92r 1 05 .lobytes 5h +000C93r 1 06 .lobytes 6h +000C94r 1 07 .lobytes 7h +000C95r 1 08 .lobytes 8h +000C96r 1 09 .lobytes 9h +000C97r 1 0A .lobytes 0Ah +000C98r 1 0B .lobytes 0Bh +000C99r 1 0C .lobytes 0Ch +000C9Ar 1 0D .lobytes 0Dh +000C9Br 1 0E .lobytes 0Eh +000C9Cr 1 0F .lobytes 0Fh +000C9Dr 1 10 .lobytes 10h +000C9Er 1 11 .lobytes 11h +000C9Fr 1 12 .lobytes 12h +000CA0r 1 13 .lobytes 13h +000CA1r 1 70 .lobytes 70h +000CA2r 1 71 .lobytes 71h +000CA3r 1 72 .lobytes 72h +000CA4r 1 73 .lobytes 73h +000CA5r 1 74 .lobytes 74h +000CA6r 1 75 .lobytes 75h +000CA7r 1 76 .lobytes 76h +000CA8r 1 77 .lobytes 77h +000CA9r 1 78 .lobytes 78h +000CAAr 1 79 .lobytes 79h +000CABr 1 7A .lobytes 7Ah +000CACr 1 7B .lobytes 7Bh +000CADr 1 7C .lobytes 7Ch +000CAEr 1 7D .lobytes 7Dh +000CAFr 1 7E .lobytes 7Eh +000CB0r 1 7F .lobytes 7Fh +000CB1r 1 80 .lobytes 80h +000CB2r 1 81 .lobytes 81h +000CB3r 1 82 .lobytes 82h +000CB4r 1 83 .lobytes 83h +000CB5r 1 84 .lobytes 84h +000CB6r 1 85 .lobytes 85h +000CB7r 1 86 .lobytes 86h +000CB8r 1 F0 .lobytes 0F0h +000CB9r 1 F1 .lobytes 0F1h +000CBAr 1 F2 .lobytes 0F2h +000CBBr 1 F3 .lobytes 0F3h +000CBCr 1 F4 .lobytes 0F4h +000CBDr 1 F5 .lobytes 0F5h +000CBEr 1 F6 .lobytes 0F6h +000CBFr 1 F7 .lobytes 0F7h +000CC0r 1 F8 .lobytes 0F8h +000CC1r 1 F9 .lobytes 0F9h +000CC2r 1 FA .lobytes 0FAh +000CC3r 1 FB .lobytes 0FBh +000CC4r 1 FC .lobytes 0FCh +000CC5r 1 FD .lobytes 0FDh +000CC6r 1 FE .lobytes 0FEh +000CC7r 1 FF .lobytes 0FFh +000CC8r 1 00 .lobytes 100h +000CC9r 1 01 .lobytes 101h +000CCAr 1 02 .lobytes 102h +000CCBr 1 03 .lobytes 103h +000CCCr 1 D2 .lobytes 0FD2h +000CCDr 1 D3 .lobytes 0FD3h +000CCEr 1 D4 .lobytes 0FD4h +000CCFr 1 D5 .lobytes 0FD5h +000CD0r 1 D6 .lobytes 0FD6h +000CD1r 1 D7 .lobytes 0FD7h +000CD2r 1 D8 .lobytes 0FD8h +000CD3r 1 D9 .lobytes 0FD9h +000CD4r 1 DA .lobytes 0FDAh +000CD5r 1 DB .lobytes 0FDBh +000CD6r 1 DC .lobytes 0FDCh +000CD7r 1 DD .lobytes 0FDDh +000CD8r 1 DE .lobytes 0FDEh +000CD9r 1 DF .lobytes 0FDFh +000CDAr 1 E0 .lobytes 0FE0h +000CDBr 1 E1 .lobytes 0FE1h +000CDCr 1 E2 .lobytes 0FE2h +000CDDr 1 E3 .lobytes 0FE3h +000CDEr 1 E4 .lobytes 0FE4h +000CDFr 1 E5 .lobytes 0FE5h +000CE0r 1 E6 .lobytes 0FE6h +000CE1r 1 E7 .lobytes 0FE7h +000CE2r 1 E8 .lobytes 0FE8h +000CE3r 1 E9 .lobytes 0FE9h +000CE4r 1 EA .lobytes 0FEAh +000CE5r 1 EB .lobytes 0FEBh +000CE6r 1 EC .lobytes 0FECh +000CE7r 1 ED .lobytes 0FEDh +000CE8r 1 EE .lobytes 0FEEh +000CE9r 1 EF .lobytes 0FEFh +000CEAr 1 F0 .lobytes 0FF0h +000CEBr 1 F1 .lobytes 0FF1h +000CECr 1 F2 .lobytes 0FF2h +000CEDr 1 F3 .lobytes 0FF3h +000CEEr 1 F4 .lobytes 0FF4h +000CEFr 1 F5 .lobytes 0FF5h +000CF0r 1 F6 .lobytes 0FF6h +000CF1r 1 F7 .lobytes 0FF7h +000CF2r 1 F8 .lobytes 0FF8h +000CF3r 1 F9 .lobytes 0FF9h +000CF4r 1 FA .lobytes 0FFAh +000CF5r 1 FB .lobytes 0FFBh +000CF6r 1 FC .lobytes 0FFCh +000CF7r 1 FD .lobytes 0FFDh +000CF8r 1 FE .lobytes 0FFEh +000CF9r 1 FF .lobytes 0FFFh +000CFAr 1 00 .lobytes 1000h +000CFBr 1 01 .lobytes 1001h +000CFCr 1 02 .lobytes 1002h +000CFDr 1 03 .lobytes 1003h +000CFEr 1 04 .lobytes 1004h +000CFFr 1 05 .lobytes 1005h +000D00r 1 06 .lobytes 1006h +000D01r 1 07 .lobytes 1007h +000D02r 1 08 .lobytes 1008h +000D03r 1 F0 .lobytes 7FF0h +000D04r 1 F1 .lobytes 7FF1h +000D05r 1 F2 .lobytes 7FF2h +000D06r 1 F3 .lobytes 7FF3h +000D07r 1 F4 .lobytes 7FF4h +000D08r 1 F5 .lobytes 7FF5h +000D09r 1 F6 .lobytes 7FF6h +000D0Ar 1 F7 .lobytes 7FF7h +000D0Br 1 F8 .lobytes 7FF8h +000D0Cr 1 F9 .lobytes 7FF9h +000D0Dr 1 FA .lobytes 7FFAh +000D0Er 1 FB .lobytes 7FFBh +000D0Fr 1 FC .lobytes 7FFCh +000D10r 1 FD .lobytes 7FFDh +000D11r 1 FE .lobytes 7FFEh +000D12r 1 FF .lobytes 7FFFh +000D13r 1 00 .lobytes 8000h +000D14r 1 01 .lobytes 8001h +000D15r 1 02 .lobytes 8002h +000D16r 1 03 .lobytes 8003h +000D17r 1 04 .lobytes 8004h +000D18r 1 05 .lobytes 8005h +000D19r 1 06 .lobytes 8006h +000D1Ar 1 07 .lobytes 8007h +000D1Br 1 08 .lobytes 8008h +000D1Cr 1 09 .lobytes 8009h +000D1Dr 1 0A .lobytes 800Ah +000D1Er 1 0B .lobytes 800Bh +000D1Fr 1 E1 .lobytes 9FE1h +000D20r 1 E2 .lobytes 9FE2h +000D21r 1 E3 .lobytes 9FE3h +000D22r 1 E4 .lobytes 9FE4h +000D23r 1 E5 .lobytes 9FE5h +000D24r 1 E6 .lobytes 9FE6h +000D25r 1 E7 .lobytes 9FE7h +000D26r 1 E8 .lobytes 9FE8h +000D27r 1 E9 .lobytes 9FE9h +000D28r 1 EA .lobytes 9FEAh +000D29r 1 EB .lobytes 9FEBh +000D2Ar 1 EC .lobytes 9FECh +000D2Br 1 ED .lobytes 9FEDh +000D2Cr 1 EE .lobytes 9FEEh +000D2Dr 1 EF .lobytes 9FEFh +000D2Er 1 F0 .lobytes 9FF0h +000D2Fr 1 F1 .lobytes 9FF1h +000D30r 1 F2 .lobytes 9FF2h +000D31r 1 F3 .lobytes 9FF3h +000D32r 1 F4 .lobytes 9FF4h +000D33r 1 F5 .lobytes 9FF5h +000D34r 1 F6 .lobytes 9FF6h +000D35r 1 F7 .lobytes 9FF7h +000D36r 1 F8 .lobytes 9FF8h +000D37r 1 F9 .lobytes 9FF9h +000D38r 1 FA .lobytes 9FFAh +000D39r 1 FB .lobytes 9FFBh +000D3Ar 1 FC .lobytes 9FFCh +000D3Br 1 FD .lobytes 9FFDh +000D3Cr 1 FE .lobytes 9FFEh +000D3Dr 1 FF .lobytes 9FFFh +000D3Er 1 00 .lobytes 0A000h +000D3Fr 1 01 .lobytes 0A001h +000D40r 1 02 .lobytes 0A002h +000D41r 1 03 .lobytes 0A003h +000D42r 1 04 .lobytes 0A004h +000D43r 1 05 .lobytes 0A005h +000D44r 1 06 .lobytes 0A006h +000D45r 1 07 .lobytes 0A007h +000D46r 1 08 .lobytes 0A008h +000D47r 1 09 .lobytes 0A009h +000D48r 1 0A .lobytes 0A00Ah +000D49r 1 0B .lobytes 0A00Bh +000D4Ar 1 0C .lobytes 0A00Ch +000D4Br 1 0D .lobytes 0A00Dh +000D4Cr 1 0E .lobytes 0A00Eh +000D4Dr 1 0F .lobytes 0A00Fh +000D4Er 1 E1 .lobytes 0AFE1h +000D4Fr 1 E2 .lobytes 0AFE2h +000D50r 1 E3 .lobytes 0AFE3h +000D51r 1 E4 .lobytes 0AFE4h +000D52r 1 E5 .lobytes 0AFE5h +000D53r 1 E6 .lobytes 0AFE6h +000D54r 1 E7 .lobytes 0AFE7h +000D55r 1 E8 .lobytes 0AFE8h +000D56r 1 E9 .lobytes 0AFE9h +000D57r 1 EA .lobytes 0AFEAh +000D58r 1 EB .lobytes 0AFEBh +000D59r 1 EC .lobytes 0AFECh +000D5Ar 1 ED .lobytes 0AFEDh +000D5Br 1 EE .lobytes 0AFEEh +000D5Cr 1 EF .lobytes 0AFEFh +000D5Dr 1 F0 .lobytes 0AFF0h +000D5Er 1 F1 .lobytes 0AFF1h +000D5Fr 1 F2 .lobytes 0AFF2h +000D60r 1 F3 .lobytes 0AFF3h +000D61r 1 F4 .lobytes 0AFF4h +000D62r 1 F5 .lobytes 0AFF5h +000D63r 1 F6 .lobytes 0AFF6h +000D64r 1 F7 .lobytes 0AFF7h +000D65r 1 F8 .lobytes 0AFF8h +000D66r 1 F9 .lobytes 0AFF9h +000D67r 1 FA .lobytes 0AFFAh +000D68r 1 FB .lobytes 0AFFBh +000D69r 1 FC .lobytes 0AFFCh +000D6Ar 1 FD .lobytes 0AFFDh +000D6Br 1 FE .lobytes 0AFFEh +000D6Cr 1 FF .lobytes 0AFFFh +000D6Dr 1 00 .lobytes 0B000h +000D6Er 1 01 .lobytes 0B001h +000D6Fr 1 02 .lobytes 0B002h +000D70r 1 03 .lobytes 0B003h +000D71r 1 04 .lobytes 0B004h +000D72r 1 05 .lobytes 0B005h +000D73r 1 06 .lobytes 0B006h +000D74r 1 07 .lobytes 0B007h +000D75r 1 08 .lobytes 0B008h +000D76r 1 09 .lobytes 0B009h +000D77r 1 0A .lobytes 0B00Ah +000D78r 1 0B .lobytes 0B00Bh +000D79r 1 0C .lobytes 0B00Ch +000D7Ar 1 0D .lobytes 0B00Dh +000D7Br 1 0E .lobytes 0B00Eh +000D7Cr 1 0F .lobytes 0B00Fh +000D7Dr 1 E1 .lobytes 0BFE1h +000D7Er 1 E2 .lobytes 0BFE2h +000D7Fr 1 E3 .lobytes 0BFE3h +000D80r 1 E4 .lobytes 0BFE4h +000D81r 1 E5 .lobytes 0BFE5h +000D82r 1 E6 .lobytes 0BFE6h +000D83r 1 E7 .lobytes 0BFE7h +000D84r 1 E8 .lobytes 0BFE8h +000D85r 1 E9 .lobytes 0BFE9h +000D86r 1 EA .lobytes 0BFEAh +000D87r 1 EB .lobytes 0BFEBh +000D88r 1 EC .lobytes 0BFECh +000D89r 1 ED .lobytes 0BFEDh +000D8Ar 1 EE .lobytes 0BFEEh +000D8Br 1 EF .lobytes 0BFEFh +000D8Cr 1 F0 .lobytes 0BFF0h +000D8Dr 1 F1 .lobytes 0BFF1h +000D8Er 1 F2 .lobytes 0BFF2h +000D8Fr 1 F3 .lobytes 0BFF3h +000D90r 1 F4 .lobytes 0BFF4h +000D91r 1 F5 .lobytes 0BFF5h +000D92r 1 F6 .lobytes 0BFF6h +000D93r 1 F7 .lobytes 0BFF7h +000D94r 1 F8 .lobytes 0BFF8h +000D95r 1 F9 .lobytes 0BFF9h +000D96r 1 FA .lobytes 0BFFAh +000D97r 1 FB .lobytes 0BFFBh +000D98r 1 FC .lobytes 0BFFCh +000D99r 1 FD .lobytes 0BFFDh +000D9Ar 1 FE .lobytes 0BFFEh +000D9Br 1 FF .lobytes 0BFFFh +000D9Cr 1 00 .lobytes 0C000h +000D9Dr 1 01 .lobytes 0C001h +000D9Er 1 02 .lobytes 0C002h +000D9Fr 1 03 .lobytes 0C003h +000DA0r 1 04 .lobytes 0C004h +000DA1r 1 05 .lobytes 0C005h +000DA2r 1 06 .lobytes 0C006h +000DA3r 1 07 .lobytes 0C007h +000DA4r 1 08 .lobytes 0C008h +000DA5r 1 09 .lobytes 0C009h +000DA6r 1 0A .lobytes 0C00Ah +000DA7r 1 0B .lobytes 0C00Bh +000DA8r 1 0C .lobytes 0C00Ch +000DA9r 1 0D .lobytes 0C00Dh +000DAAr 1 0E .lobytes 0C00Eh +000DABr 1 0F .lobytes 0C00Fh +000DACr 1 E1 .lobytes 0CFE1h +000DADr 1 E2 .lobytes 0CFE2h +000DAEr 1 E3 .lobytes 0CFE3h +000DAFr 1 E4 .lobytes 0CFE4h +000DB0r 1 E5 .lobytes 0CFE5h +000DB1r 1 E6 .lobytes 0CFE6h +000DB2r 1 E7 .lobytes 0CFE7h +000DB3r 1 E8 .lobytes 0CFE8h +000DB4r 1 E9 .lobytes 0CFE9h +000DB5r 1 EA .lobytes 0CFEAh +000DB6r 1 EB .lobytes 0CFEBh +000DB7r 1 EC .lobytes 0CFECh +000DB8r 1 ED .lobytes 0CFEDh +000DB9r 1 EE .lobytes 0CFEEh +000DBAr 1 EF .lobytes 0CFEFh +000DBBr 1 F0 .lobytes 0CFF0h +000DBCr 1 F1 .lobytes 0CFF1h +000DBDr 1 F2 .lobytes 0CFF2h +000DBEr 1 F3 .lobytes 0CFF3h +000DBFr 1 F4 .lobytes 0CFF4h +000DC0r 1 F5 .lobytes 0CFF5h +000DC1r 1 F6 .lobytes 0CFF6h +000DC2r 1 F7 .lobytes 0CFF7h +000DC3r 1 F8 .lobytes 0CFF8h +000DC4r 1 F9 .lobytes 0CFF9h +000DC5r 1 FA .lobytes 0CFFAh +000DC6r 1 FB .lobytes 0CFFBh +000DC7r 1 FC .lobytes 0CFFCh +000DC8r 1 FD .lobytes 0CFFDh +000DC9r 1 FE .lobytes 0CFFEh +000DCAr 1 FF .lobytes 0CFFFh +000DCBr 1 00 .lobytes 0D000h +000DCCr 1 01 .lobytes 0D001h +000DCDr 1 02 .lobytes 0D002h +000DCEr 1 03 .lobytes 0D003h +000DCFr 1 04 .lobytes 0D004h +000DD0r 1 05 .lobytes 0D005h +000DD1r 1 06 .lobytes 0D006h +000DD2r 1 07 .lobytes 0D007h +000DD3r 1 08 .lobytes 0D008h +000DD4r 1 09 .lobytes 0D009h +000DD5r 1 0A .lobytes 0D00Ah +000DD6r 1 0B .lobytes 0D00Bh +000DD7r 1 0C .lobytes 0D00Ch +000DD8r 1 0D .lobytes 0D00Dh +000DD9r 1 0E .lobytes 0D00Eh +000DDAr 1 0F .lobytes 0D00Fh +000DDBr 1 E1 .lobytes 0DFE1h +000DDCr 1 E2 .lobytes 0DFE2h +000DDDr 1 E3 .lobytes 0DFE3h +000DDEr 1 E4 .lobytes 0DFE4h +000DDFr 1 E5 .lobytes 0DFE5h +000DE0r 1 E6 .lobytes 0DFE6h +000DE1r 1 E7 .lobytes 0DFE7h +000DE2r 1 E8 .lobytes 0DFE8h +000DE3r 1 E9 .lobytes 0DFE9h +000DE4r 1 EA .lobytes 0DFEAh +000DE5r 1 EB .lobytes 0DFEBh +000DE6r 1 EC .lobytes 0DFECh +000DE7r 1 ED .lobytes 0DFEDh +000DE8r 1 EE .lobytes 0DFEEh +000DE9r 1 EF .lobytes 0DFEFh +000DEAr 1 F0 .lobytes 0DFF0h +000DEBr 1 F1 .lobytes 0DFF1h +000DECr 1 F2 .lobytes 0DFF2h +000DEDr 1 F3 .lobytes 0DFF3h +000DEEr 1 F4 .lobytes 0DFF4h +000DEFr 1 F5 .lobytes 0DFF5h +000DF0r 1 F6 .lobytes 0DFF6h +000DF1r 1 F7 .lobytes 0DFF7h +000DF2r 1 F8 .lobytes 0DFF8h +000DF3r 1 F9 .lobytes 0DFF9h +000DF4r 1 FA .lobytes 0DFFAh +000DF5r 1 FB .lobytes 0DFFBh +000DF6r 1 FC .lobytes 0DFFCh +000DF7r 1 FD .lobytes 0DFFDh +000DF8r 1 FE .lobytes 0DFFEh +000DF9r 1 FF .lobytes 0DFFFh +000DFAr 1 00 .lobytes 0E000h +000DFBr 1 01 .lobytes 0E001h +000DFCr 1 02 .lobytes 0E002h +000DFDr 1 03 .lobytes 0E003h +000DFEr 1 04 .lobytes 0E004h +000DFFr 1 05 .lobytes 0E005h +000E00r 1 06 .lobytes 0E006h +000E01r 1 07 .lobytes 0E007h +000E02r 1 08 .lobytes 0E008h +000E03r 1 09 .lobytes 0E009h +000E04r 1 0A .lobytes 0E00Ah +000E05r 1 0B .lobytes 0E00Bh +000E06r 1 0C .lobytes 0E00Ch +000E07r 1 0D .lobytes 0E00Dh +000E08r 1 0E .lobytes 0E00Eh +000E09r 1 0F .lobytes 0E00Fh +000E0Ar 1 E1 .lobytes 0EFE1h +000E0Br 1 E2 .lobytes 0EFE2h +000E0Cr 1 E3 .lobytes 0EFE3h +000E0Dr 1 E4 .lobytes 0EFE4h +000E0Er 1 E5 .lobytes 0EFE5h +000E0Fr 1 E6 .lobytes 0EFE6h +000E10r 1 E7 .lobytes 0EFE7h +000E11r 1 E8 .lobytes 0EFE8h +000E12r 1 E9 .lobytes 0EFE9h +000E13r 1 EA .lobytes 0EFEAh +000E14r 1 EB .lobytes 0EFEBh +000E15r 1 EC .lobytes 0EFECh +000E16r 1 ED .lobytes 0EFEDh +000E17r 1 EE .lobytes 0EFEEh +000E18r 1 EF .lobytes 0EFEFh +000E19r 1 F0 .lobytes 0EFF0h +000E1Ar 1 F1 .lobytes 0EFF1h +000E1Br 1 F2 .lobytes 0EFF2h +000E1Cr 1 F3 .lobytes 0EFF3h +000E1Dr 1 F4 .lobytes 0EFF4h +000E1Er 1 F5 .lobytes 0EFF5h +000E1Fr 1 F6 .lobytes 0EFF6h +000E20r 1 F7 .lobytes 0EFF7h +000E21r 1 F8 .lobytes 0EFF8h +000E22r 1 F9 .lobytes 0EFF9h +000E23r 1 FA .lobytes 0EFFAh +000E24r 1 FB .lobytes 0EFFBh +000E25r 1 FC .lobytes 0EFFCh +000E26r 1 FD .lobytes 0EFFDh +000E27r 1 FE .lobytes 0EFFEh +000E28r 1 FF .lobytes 0EFFFh +000E29r 1 00 .lobytes 0F000h +000E2Ar 1 01 .lobytes 0F001h +000E2Br 1 02 .lobytes 0F002h +000E2Cr 1 03 .lobytes 0F003h +000E2Dr 1 04 .lobytes 0F004h +000E2Er 1 05 .lobytes 0F005h +000E2Fr 1 06 .lobytes 0F006h +000E30r 1 07 .lobytes 0F007h +000E31r 1 08 .lobytes 0F008h +000E32r 1 09 .lobytes 0F009h +000E33r 1 0A .lobytes 0F00Ah +000E34r 1 0B .lobytes 0F00Bh +000E35r 1 0C .lobytes 0F00Ch +000E36r 1 0D .lobytes 0F00Dh +000E37r 1 0E .lobytes 0F00Eh +000E38r 1 0F .lobytes 0F00Fh +000E39r 1 E1 .lobytes 0FFE1h +000E3Ar 1 E2 .lobytes 0FFE2h +000E3Br 1 E3 .lobytes 0FFE3h +000E3Cr 1 E4 .lobytes 0FFE4h +000E3Dr 1 E5 .lobytes 0FFE5h +000E3Er 1 E6 .lobytes 0FFE6h +000E3Fr 1 E7 .lobytes 0FFE7h +000E40r 1 E8 .lobytes 0FFE8h +000E41r 1 E9 .lobytes 0FFE9h +000E42r 1 EA .lobytes 0FFEAh +000E43r 1 EB .lobytes 0FFEBh +000E44r 1 EC .lobytes 0FFECh +000E45r 1 ED .lobytes 0FFEDh +000E46r 1 EE .lobytes 0FFEEh +000E47r 1 EF .lobytes 0FFEFh +000E48r 1 F0 .lobytes 0FFF0h +000E49r 1 F1 .lobytes 0FFF1h +000E4Ar 1 F2 .lobytes 0FFF2h +000E4Br 1 F3 .lobytes 0FFF3h +000E4Cr 1 F4 .lobytes 0FFF4h +000E4Dr 1 F5 .lobytes 0FFF5h +000E4Er 1 F6 .lobytes 0FFF6h +000E4Fr 1 F7 .lobytes 0FFF7h +000E50r 1 F8 .lobytes 0FFF8h +000E51r 1 F9 .lobytes 0FFF9h +000E52r 1 FA .lobytes 0FFFAh +000E53r 1 FB .lobytes 0FFFBh +000E54r 1 FC .lobytes 0FFFCh +000E55r 1 FD .lobytes 0FFFDh +000E56r 1 FE .lobytes 0FFFEh +000E57r 1 FF .lobytes 0FFFFh +000E58r 1 +000E58r 1 ; alternative 4-digit hex values +000E58r 1 00 .lobytes 0000h +000E59r 1 01 .lobytes 0001h +000E5Ar 1 02 .lobytes 0002h +000E5Br 1 03 .lobytes 0003h +000E5Cr 1 04 .lobytes 0004h +000E5Dr 1 05 .lobytes 0005h +000E5Er 1 06 .lobytes 0006h +000E5Fr 1 07 .lobytes 0007h +000E60r 1 08 .lobytes 0008h +000E61r 1 09 .lobytes 0009h +000E62r 1 0A .lobytes 000ah +000E63r 1 0B .lobytes 000bh +000E64r 1 0C .lobytes 000ch +000E65r 1 0D .lobytes 000dh +000E66r 1 0E .lobytes 000eh +000E67r 1 0F .lobytes 000fh +000E68r 1 10 .lobytes 0010h +000E69r 1 11 .lobytes 0011h +000E6Ar 1 12 .lobytes 0012h +000E6Br 1 13 .lobytes 0013h +000E6Cr 1 70 .lobytes 0070h +000E6Dr 1 71 .lobytes 0071h +000E6Er 1 72 .lobytes 0072h +000E6Fr 1 73 .lobytes 0073h +000E70r 1 74 .lobytes 0074h +000E71r 1 75 .lobytes 0075h +000E72r 1 76 .lobytes 0076h +000E73r 1 77 .lobytes 0077h +000E74r 1 78 .lobytes 0078h +000E75r 1 79 .lobytes 0079h +000E76r 1 7A .lobytes 007ah +000E77r 1 7B .lobytes 007bh +000E78r 1 7C .lobytes 007ch +000E79r 1 7D .lobytes 007dh +000E7Ar 1 7E .lobytes 007eh +000E7Br 1 7F .lobytes 007fh +000E7Cr 1 80 .lobytes 0080h +000E7Dr 1 81 .lobytes 0081h +000E7Er 1 82 .lobytes 0082h +000E7Fr 1 83 .lobytes 0083h +000E80r 1 84 .lobytes 0084h +000E81r 1 85 .lobytes 0085h +000E82r 1 86 .lobytes 0086h +000E83r 1 F0 .lobytes 00f0h +000E84r 1 F1 .lobytes 00f1h +000E85r 1 F2 .lobytes 00f2h +000E86r 1 F3 .lobytes 00f3h +000E87r 1 F4 .lobytes 00f4h +000E88r 1 F5 .lobytes 00f5h +000E89r 1 F6 .lobytes 00f6h +000E8Ar 1 F7 .lobytes 00f7h +000E8Br 1 F8 .lobytes 00f8h +000E8Cr 1 F9 .lobytes 00f9h +000E8Dr 1 FA .lobytes 00fah +000E8Er 1 FB .lobytes 00fbh +000E8Fr 1 FC .lobytes 00fch +000E90r 1 FD .lobytes 00fdh +000E91r 1 FE .lobytes 00feh +000E92r 1 FF .lobytes 00ffh +000E93r 1 00 .lobytes 0100h +000E94r 1 01 .lobytes 0101h +000E95r 1 02 .lobytes 0102h +000E96r 1 03 .lobytes 0103h +000E97r 1 D2 .lobytes 0fd2h +000E98r 1 D3 .lobytes 0fd3h +000E99r 1 D4 .lobytes 0fd4h +000E9Ar 1 D5 .lobytes 0fd5h +000E9Br 1 D6 .lobytes 0fd6h +000E9Cr 1 D7 .lobytes 0fd7h +000E9Dr 1 D8 .lobytes 0fd8h +000E9Er 1 D9 .lobytes 0fd9h +000E9Fr 1 DA .lobytes 0fdah +000EA0r 1 DB .lobytes 0fdbh +000EA1r 1 DC .lobytes 0fdch +000EA2r 1 DD .lobytes 0fddh +000EA3r 1 DE .lobytes 0fdeh +000EA4r 1 DF .lobytes 0fdfh +000EA5r 1 E0 .lobytes 0fe0h +000EA6r 1 E1 .lobytes 0fe1h +000EA7r 1 E2 .lobytes 0fe2h +000EA8r 1 E3 .lobytes 0fe3h +000EA9r 1 E4 .lobytes 0fe4h +000EAAr 1 E5 .lobytes 0fe5h +000EABr 1 E6 .lobytes 0fe6h +000EACr 1 E7 .lobytes 0fe7h +000EADr 1 E8 .lobytes 0fe8h +000EAEr 1 E9 .lobytes 0fe9h +000EAFr 1 EA .lobytes 0feah +000EB0r 1 EB .lobytes 0febh +000EB1r 1 EC .lobytes 0fech +000EB2r 1 ED .lobytes 0fedh +000EB3r 1 EE .lobytes 0feeh +000EB4r 1 EF .lobytes 0fefh +000EB5r 1 F0 .lobytes 0ff0h +000EB6r 1 F1 .lobytes 0ff1h +000EB7r 1 F2 .lobytes 0ff2h +000EB8r 1 F3 .lobytes 0ff3h +000EB9r 1 F4 .lobytes 0ff4h +000EBAr 1 F5 .lobytes 0ff5h +000EBBr 1 F6 .lobytes 0ff6h +000EBCr 1 F7 .lobytes 0ff7h +000EBDr 1 F8 .lobytes 0ff8h +000EBEr 1 F9 .lobytes 0ff9h +000EBFr 1 FA .lobytes 0ffah +000EC0r 1 FB .lobytes 0ffbh +000EC1r 1 FC .lobytes 0ffch +000EC2r 1 FD .lobytes 0ffdh +000EC3r 1 FE .lobytes 0ffeh +000EC4r 1 FF .lobytes 0fffh +000EC5r 1 00 .lobytes 1000h +000EC6r 1 01 .lobytes 1001h +000EC7r 1 02 .lobytes 1002h +000EC8r 1 03 .lobytes 1003h +000EC9r 1 04 .lobytes 1004h +000ECAr 1 05 .lobytes 1005h +000ECBr 1 06 .lobytes 1006h +000ECCr 1 07 .lobytes 1007h +000ECDr 1 08 .lobytes 1008h +000ECEr 1 F0 .lobytes 7ff0h +000ECFr 1 F1 .lobytes 7ff1h +000ED0r 1 F2 .lobytes 7ff2h +000ED1r 1 F3 .lobytes 7ff3h +000ED2r 1 F4 .lobytes 7ff4h +000ED3r 1 F5 .lobytes 7ff5h +000ED4r 1 F6 .lobytes 7ff6h +000ED5r 1 F7 .lobytes 7ff7h +000ED6r 1 F8 .lobytes 7ff8h +000ED7r 1 F9 .lobytes 7ff9h +000ED8r 1 FA .lobytes 7ffah +000ED9r 1 FB .lobytes 7ffbh +000EDAr 1 FC .lobytes 7ffch +000EDBr 1 FD .lobytes 7ffdh +000EDCr 1 FE .lobytes 7ffeh +000EDDr 1 FF .lobytes 7fffh +000EDEr 1 00 .lobytes 8000h +000EDFr 1 01 .lobytes 8001h +000EE0r 1 02 .lobytes 8002h +000EE1r 1 03 .lobytes 8003h +000EE2r 1 04 .lobytes 8004h +000EE3r 1 05 .lobytes 8005h +000EE4r 1 06 .lobytes 8006h +000EE5r 1 07 .lobytes 8007h +000EE6r 1 08 .lobytes 8008h +000EE7r 1 09 .lobytes 8009h +000EE8r 1 0A .lobytes 800ah +000EE9r 1 0B .lobytes 800bh +000EEAr 1 E1 .lobytes 9fe1h +000EEBr 1 E2 .lobytes 9fe2h +000EECr 1 E3 .lobytes 9fe3h +000EEDr 1 E4 .lobytes 9fe4h +000EEEr 1 E5 .lobytes 9fe5h +000EEFr 1 E6 .lobytes 9fe6h +000EF0r 1 E7 .lobytes 9fe7h +000EF1r 1 E8 .lobytes 9fe8h +000EF2r 1 E9 .lobytes 9fe9h +000EF3r 1 EA .lobytes 9feah +000EF4r 1 EB .lobytes 9febh +000EF5r 1 EC .lobytes 9fech +000EF6r 1 ED .lobytes 9fedh +000EF7r 1 EE .lobytes 9feeh +000EF8r 1 EF .lobytes 9fefh +000EF9r 1 F0 .lobytes 9ff0h +000EFAr 1 F1 .lobytes 9ff1h +000EFBr 1 F2 .lobytes 9ff2h +000EFCr 1 F3 .lobytes 9ff3h +000EFDr 1 F4 .lobytes 9ff4h +000EFEr 1 F5 .lobytes 9ff5h +000EFFr 1 F6 .lobytes 9ff6h +000F00r 1 F7 .lobytes 9ff7h +000F01r 1 F8 .lobytes 9ff8h +000F02r 1 F9 .lobytes 9ff9h +000F03r 1 FA .lobytes 9ffah +000F04r 1 FB .lobytes 9ffbh +000F05r 1 FC .lobytes 9ffch +000F06r 1 FD .lobytes 9ffdh +000F07r 1 FE .lobytes 9ffeh +000F08r 1 FF .lobytes 9fffh +000F09r 1 00 .lobytes 0a000h +000F0Ar 1 01 .lobytes 0a001h +000F0Br 1 02 .lobytes 0a002h +000F0Cr 1 03 .lobytes 0a003h +000F0Dr 1 04 .lobytes 0a004h +000F0Er 1 05 .lobytes 0a005h +000F0Fr 1 06 .lobytes 0a006h +000F10r 1 07 .lobytes 0a007h +000F11r 1 08 .lobytes 0a008h +000F12r 1 09 .lobytes 0a009h +000F13r 1 0A .lobytes 0a00ah +000F14r 1 0B .lobytes 0a00bh +000F15r 1 0C .lobytes 0a00ch +000F16r 1 0D .lobytes 0a00dh +000F17r 1 0E .lobytes 0a00eh +000F18r 1 0F .lobytes 0a00fh +000F19r 1 E1 .lobytes 0afe1h +000F1Ar 1 E2 .lobytes 0afe2h +000F1Br 1 E3 .lobytes 0afe3h +000F1Cr 1 E4 .lobytes 0afe4h +000F1Dr 1 E5 .lobytes 0afe5h +000F1Er 1 E6 .lobytes 0afe6h +000F1Fr 1 E7 .lobytes 0afe7h +000F20r 1 E8 .lobytes 0afe8h +000F21r 1 E9 .lobytes 0afe9h +000F22r 1 EA .lobytes 0afeah +000F23r 1 EB .lobytes 0afebh +000F24r 1 EC .lobytes 0afech +000F25r 1 ED .lobytes 0afedh +000F26r 1 EE .lobytes 0afeeh +000F27r 1 EF .lobytes 0afefh +000F28r 1 F0 .lobytes 0aff0h +000F29r 1 F1 .lobytes 0aff1h +000F2Ar 1 F2 .lobytes 0aff2h +000F2Br 1 F3 .lobytes 0aff3h +000F2Cr 1 F4 .lobytes 0aff4h +000F2Dr 1 F5 .lobytes 0aff5h +000F2Er 1 F6 .lobytes 0aff6h +000F2Fr 1 F7 .lobytes 0aff7h +000F30r 1 F8 .lobytes 0aff8h +000F31r 1 F9 .lobytes 0aff9h +000F32r 1 FA .lobytes 0affah +000F33r 1 FB .lobytes 0affbh +000F34r 1 FC .lobytes 0affch +000F35r 1 FD .lobytes 0affdh +000F36r 1 FE .lobytes 0affeh +000F37r 1 FF .lobytes 0afffh +000F38r 1 00 .lobytes 0b000h +000F39r 1 01 .lobytes 0b001h +000F3Ar 1 02 .lobytes 0b002h +000F3Br 1 03 .lobytes 0b003h +000F3Cr 1 04 .lobytes 0b004h +000F3Dr 1 05 .lobytes 0b005h +000F3Er 1 06 .lobytes 0b006h +000F3Fr 1 07 .lobytes 0b007h +000F40r 1 08 .lobytes 0b008h +000F41r 1 09 .lobytes 0b009h +000F42r 1 0A .lobytes 0b00ah +000F43r 1 0B .lobytes 0b00bh +000F44r 1 0C .lobytes 0b00ch +000F45r 1 0D .lobytes 0b00dh +000F46r 1 0E .lobytes 0b00eh +000F47r 1 0F .lobytes 0b00fh +000F48r 1 E1 .lobytes 0bfe1h +000F49r 1 E2 .lobytes 0bfe2h +000F4Ar 1 E3 .lobytes 0bfe3h +000F4Br 1 E4 .lobytes 0bfe4h +000F4Cr 1 E5 .lobytes 0bfe5h +000F4Dr 1 E6 .lobytes 0bfe6h +000F4Er 1 E7 .lobytes 0bfe7h +000F4Fr 1 E8 .lobytes 0bfe8h +000F50r 1 E9 .lobytes 0bfe9h +000F51r 1 EA .lobytes 0bfeah +000F52r 1 EB .lobytes 0bfebh +000F53r 1 EC .lobytes 0bfech +000F54r 1 ED .lobytes 0bfedh +000F55r 1 EE .lobytes 0bfeeh +000F56r 1 EF .lobytes 0bfefh +000F57r 1 F0 .lobytes 0bff0h +000F58r 1 F1 .lobytes 0bff1h +000F59r 1 F2 .lobytes 0bff2h +000F5Ar 1 F3 .lobytes 0bff3h +000F5Br 1 F4 .lobytes 0bff4h +000F5Cr 1 F5 .lobytes 0bff5h +000F5Dr 1 F6 .lobytes 0bff6h +000F5Er 1 F7 .lobytes 0bff7h +000F5Fr 1 F8 .lobytes 0bff8h +000F60r 1 F9 .lobytes 0bff9h +000F61r 1 FA .lobytes 0bffah +000F62r 1 FB .lobytes 0bffbh +000F63r 1 FC .lobytes 0bffch +000F64r 1 FD .lobytes 0bffdh +000F65r 1 FE .lobytes 0bffeh +000F66r 1 FF .lobytes 0bfffh +000F67r 1 00 .lobytes 0c000h +000F68r 1 01 .lobytes 0c001h +000F69r 1 02 .lobytes 0c002h +000F6Ar 1 03 .lobytes 0c003h +000F6Br 1 04 .lobytes 0c004h +000F6Cr 1 05 .lobytes 0c005h +000F6Dr 1 06 .lobytes 0c006h +000F6Er 1 07 .lobytes 0c007h +000F6Fr 1 08 .lobytes 0c008h +000F70r 1 09 .lobytes 0c009h +000F71r 1 0A .lobytes 0c00ah +000F72r 1 0B .lobytes 0c00bh +000F73r 1 0C .lobytes 0c00ch +000F74r 1 0D .lobytes 0c00dh +000F75r 1 0E .lobytes 0c00eh +000F76r 1 0F .lobytes 0c00fh +000F77r 1 E1 .lobytes 0cfe1h +000F78r 1 E2 .lobytes 0cfe2h +000F79r 1 E3 .lobytes 0cfe3h +000F7Ar 1 E4 .lobytes 0cfe4h +000F7Br 1 E5 .lobytes 0cfe5h +000F7Cr 1 E6 .lobytes 0cfe6h +000F7Dr 1 E7 .lobytes 0cfe7h +000F7Er 1 E8 .lobytes 0cfe8h +000F7Fr 1 E9 .lobytes 0cfe9h +000F80r 1 EA .lobytes 0cfeah +000F81r 1 EB .lobytes 0cfebh +000F82r 1 EC .lobytes 0cfech +000F83r 1 ED .lobytes 0cfedh +000F84r 1 EE .lobytes 0cfeeh +000F85r 1 EF .lobytes 0cfefh +000F86r 1 F0 .lobytes 0cff0h +000F87r 1 F1 .lobytes 0cff1h +000F88r 1 F2 .lobytes 0cff2h +000F89r 1 F3 .lobytes 0cff3h +000F8Ar 1 F4 .lobytes 0cff4h +000F8Br 1 F5 .lobytes 0cff5h +000F8Cr 1 F6 .lobytes 0cff6h +000F8Dr 1 F7 .lobytes 0cff7h +000F8Er 1 F8 .lobytes 0cff8h +000F8Fr 1 F9 .lobytes 0cff9h +000F90r 1 FA .lobytes 0cffah +000F91r 1 FB .lobytes 0cffbh +000F92r 1 FC .lobytes 0cffch +000F93r 1 FD .lobytes 0cffdh +000F94r 1 FE .lobytes 0cffeh +000F95r 1 FF .lobytes 0cfffh +000F96r 1 00 .lobytes 0d000h +000F97r 1 01 .lobytes 0d001h +000F98r 1 02 .lobytes 0d002h +000F99r 1 03 .lobytes 0d003h +000F9Ar 1 04 .lobytes 0d004h +000F9Br 1 05 .lobytes 0d005h +000F9Cr 1 06 .lobytes 0d006h +000F9Dr 1 07 .lobytes 0d007h +000F9Er 1 08 .lobytes 0d008h +000F9Fr 1 09 .lobytes 0d009h +000FA0r 1 0A .lobytes 0d00ah +000FA1r 1 0B .lobytes 0d00bh +000FA2r 1 0C .lobytes 0d00ch +000FA3r 1 0D .lobytes 0d00dh +000FA4r 1 0E .lobytes 0d00eh +000FA5r 1 0F .lobytes 0d00fh +000FA6r 1 E1 .lobytes 0dfe1h +000FA7r 1 E2 .lobytes 0dfe2h +000FA8r 1 E3 .lobytes 0dfe3h +000FA9r 1 E4 .lobytes 0dfe4h +000FAAr 1 E5 .lobytes 0dfe5h +000FABr 1 E6 .lobytes 0dfe6h +000FACr 1 E7 .lobytes 0dfe7h +000FADr 1 E8 .lobytes 0dfe8h +000FAEr 1 E9 .lobytes 0dfe9h +000FAFr 1 EA .lobytes 0dfeah +000FB0r 1 EB .lobytes 0dfebh +000FB1r 1 EC .lobytes 0dfech +000FB2r 1 ED .lobytes 0dfedh +000FB3r 1 EE .lobytes 0dfeeh +000FB4r 1 EF .lobytes 0dfefh +000FB5r 1 F0 .lobytes 0dff0h +000FB6r 1 F1 .lobytes 0dff1h +000FB7r 1 F2 .lobytes 0dff2h +000FB8r 1 F3 .lobytes 0dff3h +000FB9r 1 F4 .lobytes 0dff4h +000FBAr 1 F5 .lobytes 0dff5h +000FBBr 1 F6 .lobytes 0dff6h +000FBCr 1 F7 .lobytes 0dff7h +000FBDr 1 F8 .lobytes 0dff8h +000FBEr 1 F9 .lobytes 0dff9h +000FBFr 1 FA .lobytes 0dffah +000FC0r 1 FB .lobytes 0dffbh +000FC1r 1 FC .lobytes 0dffch +000FC2r 1 FD .lobytes 0dffdh +000FC3r 1 FE .lobytes 0dffeh +000FC4r 1 FF .lobytes 0dfffh +000FC5r 1 00 .lobytes 0e000h +000FC6r 1 01 .lobytes 0e001h +000FC7r 1 02 .lobytes 0e002h +000FC8r 1 03 .lobytes 0e003h +000FC9r 1 04 .lobytes 0e004h +000FCAr 1 05 .lobytes 0e005h +000FCBr 1 06 .lobytes 0e006h +000FCCr 1 07 .lobytes 0e007h +000FCDr 1 08 .lobytes 0e008h +000FCEr 1 09 .lobytes 0e009h +000FCFr 1 0A .lobytes 0e00ah +000FD0r 1 0B .lobytes 0e00bh +000FD1r 1 0C .lobytes 0e00ch +000FD2r 1 0D .lobytes 0e00dh +000FD3r 1 0E .lobytes 0e00eh +000FD4r 1 0F .lobytes 0e00fh +000FD5r 1 E1 .lobytes 0efe1h +000FD6r 1 E2 .lobytes 0efe2h +000FD7r 1 E3 .lobytes 0efe3h +000FD8r 1 E4 .lobytes 0efe4h +000FD9r 1 E5 .lobytes 0efe5h +000FDAr 1 E6 .lobytes 0efe6h +000FDBr 1 E7 .lobytes 0efe7h +000FDCr 1 E8 .lobytes 0efe8h +000FDDr 1 E9 .lobytes 0efe9h +000FDEr 1 EA .lobytes 0efeah +000FDFr 1 EB .lobytes 0efebh +000FE0r 1 EC .lobytes 0efech +000FE1r 1 ED .lobytes 0efedh +000FE2r 1 EE .lobytes 0efeeh +000FE3r 1 EF .lobytes 0efefh +000FE4r 1 F0 .lobytes 0eff0h +000FE5r 1 F1 .lobytes 0eff1h +000FE6r 1 F2 .lobytes 0eff2h +000FE7r 1 F3 .lobytes 0eff3h +000FE8r 1 F4 .lobytes 0eff4h +000FE9r 1 F5 .lobytes 0eff5h +000FEAr 1 F6 .lobytes 0eff6h +000FEBr 1 F7 .lobytes 0eff7h +000FECr 1 F8 .lobytes 0eff8h +000FEDr 1 F9 .lobytes 0eff9h +000FEEr 1 FA .lobytes 0effah +000FEFr 1 FB .lobytes 0effbh +000FF0r 1 FC .lobytes 0effch +000FF1r 1 FD .lobytes 0effdh +000FF2r 1 FE .lobytes 0effeh +000FF3r 1 FF .lobytes 0efffh +000FF4r 1 00 .lobytes 0f000h +000FF5r 1 01 .lobytes 0f001h +000FF6r 1 02 .lobytes 0f002h +000FF7r 1 03 .lobytes 0f003h +000FF8r 1 04 .lobytes 0f004h +000FF9r 1 05 .lobytes 0f005h +000FFAr 1 06 .lobytes 0f006h +000FFBr 1 07 .lobytes 0f007h +000FFCr 1 08 .lobytes 0f008h +000FFDr 1 09 .lobytes 0f009h +000FFEr 1 0A .lobytes 0f00ah +000FFFr 1 0B .lobytes 0f00bh +001000r 1 0C .lobytes 0f00ch +001001r 1 0D .lobytes 0f00dh +001002r 1 0E .lobytes 0f00eh +001003r 1 0F .lobytes 0f00fh +001004r 1 E1 .lobytes 0ffe1h +001005r 1 E2 .lobytes 0ffe2h +001006r 1 E3 .lobytes 0ffe3h +001007r 1 E4 .lobytes 0ffe4h +001008r 1 E5 .lobytes 0ffe5h +001009r 1 E6 .lobytes 0ffe6h +00100Ar 1 E7 .lobytes 0ffe7h +00100Br 1 E8 .lobytes 0ffe8h +00100Cr 1 E9 .lobytes 0ffe9h +00100Dr 1 EA .lobytes 0ffeah +00100Er 1 EB .lobytes 0ffebh +00100Fr 1 EC .lobytes 0ffech +001010r 1 ED .lobytes 0ffedh +001011r 1 EE .lobytes 0ffeeh +001012r 1 EF .lobytes 0ffefh +001013r 1 F0 .lobytes 0fff0h +001014r 1 F1 .lobytes 0fff1h +001015r 1 F2 .lobytes 0fff2h +001016r 1 F3 .lobytes 0fff3h +001017r 1 F4 .lobytes 0fff4h +001018r 1 F5 .lobytes 0fff5h +001019r 1 F6 .lobytes 0fff6h +00101Ar 1 F7 .lobytes 0fff7h +00101Br 1 F8 .lobytes 0fff8h +00101Cr 1 F9 .lobytes 0fff9h +00101Dr 1 FA .lobytes 0fffah +00101Er 1 FB .lobytes 0fffbh +00101Fr 1 FC .lobytes 0fffch +001020r 1 FD .lobytes 0fffdh +001021r 1 FE .lobytes 0fffeh +001022r 1 FF .lobytes 0ffffh +001023r 1 +001023r 1 ; alternative 4-digit hex values, uppercase +001023r 1 00 .lobytes 0000h +001024r 1 01 .lobytes 0001h +001025r 1 02 .lobytes 0002h +001026r 1 03 .lobytes 0003h +001027r 1 04 .lobytes 0004h +001028r 1 05 .lobytes 0005h +001029r 1 06 .lobytes 0006h +00102Ar 1 07 .lobytes 0007h +00102Br 1 08 .lobytes 0008h +00102Cr 1 09 .lobytes 0009h +00102Dr 1 0A .lobytes 000Ah +00102Er 1 0B .lobytes 000Bh +00102Fr 1 0C .lobytes 000Ch +001030r 1 0D .lobytes 000Dh +001031r 1 0E .lobytes 000Eh +001032r 1 0F .lobytes 000Fh +001033r 1 10 .lobytes 0010h +001034r 1 11 .lobytes 0011h +001035r 1 12 .lobytes 0012h +001036r 1 13 .lobytes 0013h +001037r 1 70 .lobytes 0070h +001038r 1 71 .lobytes 0071h +001039r 1 72 .lobytes 0072h +00103Ar 1 73 .lobytes 0073h +00103Br 1 74 .lobytes 0074h +00103Cr 1 75 .lobytes 0075h +00103Dr 1 76 .lobytes 0076h +00103Er 1 77 .lobytes 0077h +00103Fr 1 78 .lobytes 0078h +001040r 1 79 .lobytes 0079h +001041r 1 7A .lobytes 007Ah +001042r 1 7B .lobytes 007Bh +001043r 1 7C .lobytes 007Ch +001044r 1 7D .lobytes 007Dh +001045r 1 7E .lobytes 007Eh +001046r 1 7F .lobytes 007Fh +001047r 1 80 .lobytes 0080h +001048r 1 81 .lobytes 0081h +001049r 1 82 .lobytes 0082h +00104Ar 1 83 .lobytes 0083h +00104Br 1 84 .lobytes 0084h +00104Cr 1 85 .lobytes 0085h +00104Dr 1 86 .lobytes 0086h +00104Er 1 F0 .lobytes 00F0h +00104Fr 1 F1 .lobytes 00F1h +001050r 1 F2 .lobytes 00F2h +001051r 1 F3 .lobytes 00F3h +001052r 1 F4 .lobytes 00F4h +001053r 1 F5 .lobytes 00F5h +001054r 1 F6 .lobytes 00F6h +001055r 1 F7 .lobytes 00F7h +001056r 1 F8 .lobytes 00F8h +001057r 1 F9 .lobytes 00F9h +001058r 1 FA .lobytes 00FAh +001059r 1 FB .lobytes 00FBh +00105Ar 1 FC .lobytes 00FCh +00105Br 1 FD .lobytes 00FDh +00105Cr 1 FE .lobytes 00FEh +00105Dr 1 FF .lobytes 00FFh +00105Er 1 00 .lobytes 0100h +00105Fr 1 01 .lobytes 0101h +001060r 1 02 .lobytes 0102h +001061r 1 03 .lobytes 0103h +001062r 1 D2 .lobytes 0FD2h +001063r 1 D3 .lobytes 0FD3h +001064r 1 D4 .lobytes 0FD4h +001065r 1 D5 .lobytes 0FD5h +001066r 1 D6 .lobytes 0FD6h +001067r 1 D7 .lobytes 0FD7h +001068r 1 D8 .lobytes 0FD8h +001069r 1 D9 .lobytes 0FD9h +00106Ar 1 DA .lobytes 0FDAh +00106Br 1 DB .lobytes 0FDBh +00106Cr 1 DC .lobytes 0FDCh +00106Dr 1 DD .lobytes 0FDDh +00106Er 1 DE .lobytes 0FDEh +00106Fr 1 DF .lobytes 0FDFh +001070r 1 E0 .lobytes 0FE0h +001071r 1 E1 .lobytes 0FE1h +001072r 1 E2 .lobytes 0FE2h +001073r 1 E3 .lobytes 0FE3h +001074r 1 E4 .lobytes 0FE4h +001075r 1 E5 .lobytes 0FE5h +001076r 1 E6 .lobytes 0FE6h +001077r 1 E7 .lobytes 0FE7h +001078r 1 E8 .lobytes 0FE8h +001079r 1 E9 .lobytes 0FE9h +00107Ar 1 EA .lobytes 0FEAh +00107Br 1 EB .lobytes 0FEBh +00107Cr 1 EC .lobytes 0FECh +00107Dr 1 ED .lobytes 0FEDh +00107Er 1 EE .lobytes 0FEEh +00107Fr 1 EF .lobytes 0FEFh +001080r 1 F0 .lobytes 0FF0h +001081r 1 F1 .lobytes 0FF1h +001082r 1 F2 .lobytes 0FF2h +001083r 1 F3 .lobytes 0FF3h +001084r 1 F4 .lobytes 0FF4h +001085r 1 F5 .lobytes 0FF5h +001086r 1 F6 .lobytes 0FF6h +001087r 1 F7 .lobytes 0FF7h +001088r 1 F8 .lobytes 0FF8h +001089r 1 F9 .lobytes 0FF9h +00108Ar 1 FA .lobytes 0FFAh +00108Br 1 FB .lobytes 0FFBh +00108Cr 1 FC .lobytes 0FFCh +00108Dr 1 FD .lobytes 0FFDh +00108Er 1 FE .lobytes 0FFEh +00108Fr 1 FF .lobytes 0FFFh +001090r 1 00 .lobytes 1000h +001091r 1 01 .lobytes 1001h +001092r 1 02 .lobytes 1002h +001093r 1 03 .lobytes 1003h +001094r 1 04 .lobytes 1004h +001095r 1 05 .lobytes 1005h +001096r 1 06 .lobytes 1006h +001097r 1 07 .lobytes 1007h +001098r 1 08 .lobytes 1008h +001099r 1 F0 .lobytes 7FF0h +00109Ar 1 F1 .lobytes 7FF1h +00109Br 1 F2 .lobytes 7FF2h +00109Cr 1 F3 .lobytes 7FF3h +00109Dr 1 F4 .lobytes 7FF4h +00109Er 1 F5 .lobytes 7FF5h +00109Fr 1 F6 .lobytes 7FF6h +0010A0r 1 F7 .lobytes 7FF7h +0010A1r 1 F8 .lobytes 7FF8h +0010A2r 1 F9 .lobytes 7FF9h +0010A3r 1 FA .lobytes 7FFAh +0010A4r 1 FB .lobytes 7FFBh +0010A5r 1 FC .lobytes 7FFCh +0010A6r 1 FD .lobytes 7FFDh +0010A7r 1 FE .lobytes 7FFEh +0010A8r 1 FF .lobytes 7FFFh +0010A9r 1 00 .lobytes 8000h +0010AAr 1 01 .lobytes 8001h +0010ABr 1 02 .lobytes 8002h +0010ACr 1 03 .lobytes 8003h +0010ADr 1 04 .lobytes 8004h +0010AEr 1 05 .lobytes 8005h +0010AFr 1 06 .lobytes 8006h +0010B0r 1 07 .lobytes 8007h +0010B1r 1 08 .lobytes 8008h +0010B2r 1 09 .lobytes 8009h +0010B3r 1 0A .lobytes 800Ah +0010B4r 1 0B .lobytes 800Bh +0010B5r 1 E1 .lobytes 9FE1h +0010B6r 1 E2 .lobytes 9FE2h +0010B7r 1 E3 .lobytes 9FE3h +0010B8r 1 E4 .lobytes 9FE4h +0010B9r 1 E5 .lobytes 9FE5h +0010BAr 1 E6 .lobytes 9FE6h +0010BBr 1 E7 .lobytes 9FE7h +0010BCr 1 E8 .lobytes 9FE8h +0010BDr 1 E9 .lobytes 9FE9h +0010BEr 1 EA .lobytes 9FEAh +0010BFr 1 EB .lobytes 9FEBh +0010C0r 1 EC .lobytes 9FECh +0010C1r 1 ED .lobytes 9FEDh +0010C2r 1 EE .lobytes 9FEEh +0010C3r 1 EF .lobytes 9FEFh +0010C4r 1 F0 .lobytes 9FF0h +0010C5r 1 F1 .lobytes 9FF1h +0010C6r 1 F2 .lobytes 9FF2h +0010C7r 1 F3 .lobytes 9FF3h +0010C8r 1 F4 .lobytes 9FF4h +0010C9r 1 F5 .lobytes 9FF5h +0010CAr 1 F6 .lobytes 9FF6h +0010CBr 1 F7 .lobytes 9FF7h +0010CCr 1 F8 .lobytes 9FF8h +0010CDr 1 F9 .lobytes 9FF9h +0010CEr 1 FA .lobytes 9FFAh +0010CFr 1 FB .lobytes 9FFBh +0010D0r 1 FC .lobytes 9FFCh +0010D1r 1 FD .lobytes 9FFDh +0010D2r 1 FE .lobytes 9FFEh +0010D3r 1 FF .lobytes 9FFFh +0010D4r 1 00 .lobytes 0A000h +0010D5r 1 01 .lobytes 0A001h +0010D6r 1 02 .lobytes 0A002h +0010D7r 1 03 .lobytes 0A003h +0010D8r 1 04 .lobytes 0A004h +0010D9r 1 05 .lobytes 0A005h +0010DAr 1 06 .lobytes 0A006h +0010DBr 1 07 .lobytes 0A007h +0010DCr 1 08 .lobytes 0A008h +0010DDr 1 09 .lobytes 0A009h +0010DEr 1 0A .lobytes 0A00Ah +0010DFr 1 0B .lobytes 0A00Bh +0010E0r 1 0C .lobytes 0A00Ch +0010E1r 1 0D .lobytes 0A00Dh +0010E2r 1 0E .lobytes 0A00Eh +0010E3r 1 0F .lobytes 0A00Fh +0010E4r 1 E1 .lobytes 0AFE1h +0010E5r 1 E2 .lobytes 0AFE2h +0010E6r 1 E3 .lobytes 0AFE3h +0010E7r 1 E4 .lobytes 0AFE4h +0010E8r 1 E5 .lobytes 0AFE5h +0010E9r 1 E6 .lobytes 0AFE6h +0010EAr 1 E7 .lobytes 0AFE7h +0010EBr 1 E8 .lobytes 0AFE8h +0010ECr 1 E9 .lobytes 0AFE9h +0010EDr 1 EA .lobytes 0AFEAh +0010EEr 1 EB .lobytes 0AFEBh +0010EFr 1 EC .lobytes 0AFECh +0010F0r 1 ED .lobytes 0AFEDh +0010F1r 1 EE .lobytes 0AFEEh +0010F2r 1 EF .lobytes 0AFEFh +0010F3r 1 F0 .lobytes 0AFF0h +0010F4r 1 F1 .lobytes 0AFF1h +0010F5r 1 F2 .lobytes 0AFF2h +0010F6r 1 F3 .lobytes 0AFF3h +0010F7r 1 F4 .lobytes 0AFF4h +0010F8r 1 F5 .lobytes 0AFF5h +0010F9r 1 F6 .lobytes 0AFF6h +0010FAr 1 F7 .lobytes 0AFF7h +0010FBr 1 F8 .lobytes 0AFF8h +0010FCr 1 F9 .lobytes 0AFF9h +0010FDr 1 FA .lobytes 0AFFAh +0010FEr 1 FB .lobytes 0AFFBh +0010FFr 1 FC .lobytes 0AFFCh +001100r 1 FD .lobytes 0AFFDh +001101r 1 FE .lobytes 0AFFEh +001102r 1 FF .lobytes 0AFFFh +001103r 1 00 .lobytes 0B000h +001104r 1 01 .lobytes 0B001h +001105r 1 02 .lobytes 0B002h +001106r 1 03 .lobytes 0B003h +001107r 1 04 .lobytes 0B004h +001108r 1 05 .lobytes 0B005h +001109r 1 06 .lobytes 0B006h +00110Ar 1 07 .lobytes 0B007h +00110Br 1 08 .lobytes 0B008h +00110Cr 1 09 .lobytes 0B009h +00110Dr 1 0A .lobytes 0B00Ah +00110Er 1 0B .lobytes 0B00Bh +00110Fr 1 0C .lobytes 0B00Ch +001110r 1 0D .lobytes 0B00Dh +001111r 1 0E .lobytes 0B00Eh +001112r 1 0F .lobytes 0B00Fh +001113r 1 E1 .lobytes 0BFE1h +001114r 1 E2 .lobytes 0BFE2h +001115r 1 E3 .lobytes 0BFE3h +001116r 1 E4 .lobytes 0BFE4h +001117r 1 E5 .lobytes 0BFE5h +001118r 1 E6 .lobytes 0BFE6h +001119r 1 E7 .lobytes 0BFE7h +00111Ar 1 E8 .lobytes 0BFE8h +00111Br 1 E9 .lobytes 0BFE9h +00111Cr 1 EA .lobytes 0BFEAh +00111Dr 1 EB .lobytes 0BFEBh +00111Er 1 EC .lobytes 0BFECh +00111Fr 1 ED .lobytes 0BFEDh +001120r 1 EE .lobytes 0BFEEh +001121r 1 EF .lobytes 0BFEFh +001122r 1 F0 .lobytes 0BFF0h +001123r 1 F1 .lobytes 0BFF1h +001124r 1 F2 .lobytes 0BFF2h +001125r 1 F3 .lobytes 0BFF3h +001126r 1 F4 .lobytes 0BFF4h +001127r 1 F5 .lobytes 0BFF5h +001128r 1 F6 .lobytes 0BFF6h +001129r 1 F7 .lobytes 0BFF7h +00112Ar 1 F8 .lobytes 0BFF8h +00112Br 1 F9 .lobytes 0BFF9h +00112Cr 1 FA .lobytes 0BFFAh +00112Dr 1 FB .lobytes 0BFFBh +00112Er 1 FC .lobytes 0BFFCh +00112Fr 1 FD .lobytes 0BFFDh +001130r 1 FE .lobytes 0BFFEh +001131r 1 FF .lobytes 0BFFFh +001132r 1 00 .lobytes 0C000h +001133r 1 01 .lobytes 0C001h +001134r 1 02 .lobytes 0C002h +001135r 1 03 .lobytes 0C003h +001136r 1 04 .lobytes 0C004h +001137r 1 05 .lobytes 0C005h +001138r 1 06 .lobytes 0C006h +001139r 1 07 .lobytes 0C007h +00113Ar 1 08 .lobytes 0C008h +00113Br 1 09 .lobytes 0C009h +00113Cr 1 0A .lobytes 0C00Ah +00113Dr 1 0B .lobytes 0C00Bh +00113Er 1 0C .lobytes 0C00Ch +00113Fr 1 0D .lobytes 0C00Dh +001140r 1 0E .lobytes 0C00Eh +001141r 1 0F .lobytes 0C00Fh +001142r 1 E1 .lobytes 0CFE1h +001143r 1 E2 .lobytes 0CFE2h +001144r 1 E3 .lobytes 0CFE3h +001145r 1 E4 .lobytes 0CFE4h +001146r 1 E5 .lobytes 0CFE5h +001147r 1 E6 .lobytes 0CFE6h +001148r 1 E7 .lobytes 0CFE7h +001149r 1 E8 .lobytes 0CFE8h +00114Ar 1 E9 .lobytes 0CFE9h +00114Br 1 EA .lobytes 0CFEAh +00114Cr 1 EB .lobytes 0CFEBh +00114Dr 1 EC .lobytes 0CFECh +00114Er 1 ED .lobytes 0CFEDh +00114Fr 1 EE .lobytes 0CFEEh +001150r 1 EF .lobytes 0CFEFh +001151r 1 F0 .lobytes 0CFF0h +001152r 1 F1 .lobytes 0CFF1h +001153r 1 F2 .lobytes 0CFF2h +001154r 1 F3 .lobytes 0CFF3h +001155r 1 F4 .lobytes 0CFF4h +001156r 1 F5 .lobytes 0CFF5h +001157r 1 F6 .lobytes 0CFF6h +001158r 1 F7 .lobytes 0CFF7h +001159r 1 F8 .lobytes 0CFF8h +00115Ar 1 F9 .lobytes 0CFF9h +00115Br 1 FA .lobytes 0CFFAh +00115Cr 1 FB .lobytes 0CFFBh +00115Dr 1 FC .lobytes 0CFFCh +00115Er 1 FD .lobytes 0CFFDh +00115Fr 1 FE .lobytes 0CFFEh +001160r 1 FF .lobytes 0CFFFh +001161r 1 00 .lobytes 0D000h +001162r 1 01 .lobytes 0D001h +001163r 1 02 .lobytes 0D002h +001164r 1 03 .lobytes 0D003h +001165r 1 04 .lobytes 0D004h +001166r 1 05 .lobytes 0D005h +001167r 1 06 .lobytes 0D006h +001168r 1 07 .lobytes 0D007h +001169r 1 08 .lobytes 0D008h +00116Ar 1 09 .lobytes 0D009h +00116Br 1 0A .lobytes 0D00Ah +00116Cr 1 0B .lobytes 0D00Bh +00116Dr 1 0C .lobytes 0D00Ch +00116Er 1 0D .lobytes 0D00Dh +00116Fr 1 0E .lobytes 0D00Eh +001170r 1 0F .lobytes 0D00Fh +001171r 1 E1 .lobytes 0DFE1h +001172r 1 E2 .lobytes 0DFE2h +001173r 1 E3 .lobytes 0DFE3h +001174r 1 E4 .lobytes 0DFE4h +001175r 1 E5 .lobytes 0DFE5h +001176r 1 E6 .lobytes 0DFE6h +001177r 1 E7 .lobytes 0DFE7h +001178r 1 E8 .lobytes 0DFE8h +001179r 1 E9 .lobytes 0DFE9h +00117Ar 1 EA .lobytes 0DFEAh +00117Br 1 EB .lobytes 0DFEBh +00117Cr 1 EC .lobytes 0DFECh +00117Dr 1 ED .lobytes 0DFEDh +00117Er 1 EE .lobytes 0DFEEh +00117Fr 1 EF .lobytes 0DFEFh +001180r 1 F0 .lobytes 0DFF0h +001181r 1 F1 .lobytes 0DFF1h +001182r 1 F2 .lobytes 0DFF2h +001183r 1 F3 .lobytes 0DFF3h +001184r 1 F4 .lobytes 0DFF4h +001185r 1 F5 .lobytes 0DFF5h +001186r 1 F6 .lobytes 0DFF6h +001187r 1 F7 .lobytes 0DFF7h +001188r 1 F8 .lobytes 0DFF8h +001189r 1 F9 .lobytes 0DFF9h +00118Ar 1 FA .lobytes 0DFFAh +00118Br 1 FB .lobytes 0DFFBh +00118Cr 1 FC .lobytes 0DFFCh +00118Dr 1 FD .lobytes 0DFFDh +00118Er 1 FE .lobytes 0DFFEh +00118Fr 1 FF .lobytes 0DFFFh +001190r 1 00 .lobytes 0E000h +001191r 1 01 .lobytes 0E001h +001192r 1 02 .lobytes 0E002h +001193r 1 03 .lobytes 0E003h +001194r 1 04 .lobytes 0E004h +001195r 1 05 .lobytes 0E005h +001196r 1 06 .lobytes 0E006h +001197r 1 07 .lobytes 0E007h +001198r 1 08 .lobytes 0E008h +001199r 1 09 .lobytes 0E009h +00119Ar 1 0A .lobytes 0E00Ah +00119Br 1 0B .lobytes 0E00Bh +00119Cr 1 0C .lobytes 0E00Ch +00119Dr 1 0D .lobytes 0E00Dh +00119Er 1 0E .lobytes 0E00Eh +00119Fr 1 0F .lobytes 0E00Fh +0011A0r 1 E1 .lobytes 0EFE1h +0011A1r 1 E2 .lobytes 0EFE2h +0011A2r 1 E3 .lobytes 0EFE3h +0011A3r 1 E4 .lobytes 0EFE4h +0011A4r 1 E5 .lobytes 0EFE5h +0011A5r 1 E6 .lobytes 0EFE6h +0011A6r 1 E7 .lobytes 0EFE7h +0011A7r 1 E8 .lobytes 0EFE8h +0011A8r 1 E9 .lobytes 0EFE9h +0011A9r 1 EA .lobytes 0EFEAh +0011AAr 1 EB .lobytes 0EFEBh +0011ABr 1 EC .lobytes 0EFECh +0011ACr 1 ED .lobytes 0EFEDh +0011ADr 1 EE .lobytes 0EFEEh +0011AEr 1 EF .lobytes 0EFEFh +0011AFr 1 F0 .lobytes 0EFF0h +0011B0r 1 F1 .lobytes 0EFF1h +0011B1r 1 F2 .lobytes 0EFF2h +0011B2r 1 F3 .lobytes 0EFF3h +0011B3r 1 F4 .lobytes 0EFF4h +0011B4r 1 F5 .lobytes 0EFF5h +0011B5r 1 F6 .lobytes 0EFF6h +0011B6r 1 F7 .lobytes 0EFF7h +0011B7r 1 F8 .lobytes 0EFF8h +0011B8r 1 F9 .lobytes 0EFF9h +0011B9r 1 FA .lobytes 0EFFAh +0011BAr 1 FB .lobytes 0EFFBh +0011BBr 1 FC .lobytes 0EFFCh +0011BCr 1 FD .lobytes 0EFFDh +0011BDr 1 FE .lobytes 0EFFEh +0011BEr 1 FF .lobytes 0EFFFh +0011BFr 1 00 .lobytes 0F000h +0011C0r 1 01 .lobytes 0F001h +0011C1r 1 02 .lobytes 0F002h +0011C2r 1 03 .lobytes 0F003h +0011C3r 1 04 .lobytes 0F004h +0011C4r 1 05 .lobytes 0F005h +0011C5r 1 06 .lobytes 0F006h +0011C6r 1 07 .lobytes 0F007h +0011C7r 1 08 .lobytes 0F008h +0011C8r 1 09 .lobytes 0F009h +0011C9r 1 0A .lobytes 0F00Ah +0011CAr 1 0B .lobytes 0F00Bh +0011CBr 1 0C .lobytes 0F00Ch +0011CCr 1 0D .lobytes 0F00Dh +0011CDr 1 0E .lobytes 0F00Eh +0011CEr 1 0F .lobytes 0F00Fh +0011CFr 1 E1 .lobytes 0FFE1h +0011D0r 1 E2 .lobytes 0FFE2h +0011D1r 1 E3 .lobytes 0FFE3h +0011D2r 1 E4 .lobytes 0FFE4h +0011D3r 1 E5 .lobytes 0FFE5h +0011D4r 1 E6 .lobytes 0FFE6h +0011D5r 1 E7 .lobytes 0FFE7h +0011D6r 1 E8 .lobytes 0FFE8h +0011D7r 1 E9 .lobytes 0FFE9h +0011D8r 1 EA .lobytes 0FFEAh +0011D9r 1 EB .lobytes 0FFEBh +0011DAr 1 EC .lobytes 0FFECh +0011DBr 1 ED .lobytes 0FFEDh +0011DCr 1 EE .lobytes 0FFEEh +0011DDr 1 EF .lobytes 0FFEFh +0011DEr 1 F0 .lobytes 0FFF0h +0011DFr 1 F1 .lobytes 0FFF1h +0011E0r 1 F2 .lobytes 0FFF2h +0011E1r 1 F3 .lobytes 0FFF3h +0011E2r 1 F4 .lobytes 0FFF4h +0011E3r 1 F5 .lobytes 0FFF5h +0011E4r 1 F6 .lobytes 0FFF6h +0011E5r 1 F7 .lobytes 0FFF7h +0011E6r 1 F8 .lobytes 0FFF8h +0011E7r 1 F9 .lobytes 0FFF9h +0011E8r 1 FA .lobytes 0FFFAh +0011E9r 1 FB .lobytes 0FFFBh +0011EAr 1 FC .lobytes 0FFFCh +0011EBr 1 FD .lobytes 0FFFDh +0011ECr 1 FE .lobytes 0FFFEh +0011EDr 1 FF .lobytes 0FFFFh +0011EEr 1 +0011EEr 1 ; alternative hex values, always leading zero +0011EEr 1 00 .lobytes 00h +0011EFr 1 01 .lobytes 01h +0011F0r 1 02 .lobytes 02h +0011F1r 1 03 .lobytes 03h +0011F2r 1 04 .lobytes 04h +0011F3r 1 05 .lobytes 05h +0011F4r 1 06 .lobytes 06h +0011F5r 1 07 .lobytes 07h +0011F6r 1 08 .lobytes 08h +0011F7r 1 09 .lobytes 09h +0011F8r 1 0A .lobytes 0ah +0011F9r 1 0B .lobytes 0bh +0011FAr 1 0C .lobytes 0ch +0011FBr 1 0D .lobytes 0dh +0011FCr 1 0E .lobytes 0eh +0011FDr 1 0F .lobytes 0fh +0011FEr 1 10 .lobytes 010h +0011FFr 1 11 .lobytes 011h +001200r 1 12 .lobytes 012h +001201r 1 13 .lobytes 013h +001202r 1 70 .lobytes 070h +001203r 1 71 .lobytes 071h +001204r 1 72 .lobytes 072h +001205r 1 73 .lobytes 073h +001206r 1 74 .lobytes 074h +001207r 1 75 .lobytes 075h +001208r 1 76 .lobytes 076h +001209r 1 77 .lobytes 077h +00120Ar 1 78 .lobytes 078h +00120Br 1 79 .lobytes 079h +00120Cr 1 7A .lobytes 07ah +00120Dr 1 7B .lobytes 07bh +00120Er 1 7C .lobytes 07ch +00120Fr 1 7D .lobytes 07dh +001210r 1 7E .lobytes 07eh +001211r 1 7F .lobytes 07fh +001212r 1 80 .lobytes 080h +001213r 1 81 .lobytes 081h +001214r 1 82 .lobytes 082h +001215r 1 83 .lobytes 083h +001216r 1 84 .lobytes 084h +001217r 1 85 .lobytes 085h +001218r 1 86 .lobytes 086h +001219r 1 F0 .lobytes 0f0h +00121Ar 1 F1 .lobytes 0f1h +00121Br 1 F2 .lobytes 0f2h +00121Cr 1 F3 .lobytes 0f3h +00121Dr 1 F4 .lobytes 0f4h +00121Er 1 F5 .lobytes 0f5h +00121Fr 1 F6 .lobytes 0f6h +001220r 1 F7 .lobytes 0f7h +001221r 1 F8 .lobytes 0f8h +001222r 1 F9 .lobytes 0f9h +001223r 1 FA .lobytes 0fah +001224r 1 FB .lobytes 0fbh +001225r 1 FC .lobytes 0fch +001226r 1 FD .lobytes 0fdh +001227r 1 FE .lobytes 0feh +001228r 1 FF .lobytes 0ffh +001229r 1 00 .lobytes 0100h +00122Ar 1 01 .lobytes 0101h +00122Br 1 02 .lobytes 0102h +00122Cr 1 03 .lobytes 0103h +00122Dr 1 D2 .lobytes 0fd2h +00122Er 1 D3 .lobytes 0fd3h +00122Fr 1 D4 .lobytes 0fd4h +001230r 1 D5 .lobytes 0fd5h +001231r 1 D6 .lobytes 0fd6h +001232r 1 D7 .lobytes 0fd7h +001233r 1 D8 .lobytes 0fd8h +001234r 1 D9 .lobytes 0fd9h +001235r 1 DA .lobytes 0fdah +001236r 1 DB .lobytes 0fdbh +001237r 1 DC .lobytes 0fdch +001238r 1 DD .lobytes 0fddh +001239r 1 DE .lobytes 0fdeh +00123Ar 1 DF .lobytes 0fdfh +00123Br 1 E0 .lobytes 0fe0h +00123Cr 1 E1 .lobytes 0fe1h +00123Dr 1 E2 .lobytes 0fe2h +00123Er 1 E3 .lobytes 0fe3h +00123Fr 1 E4 .lobytes 0fe4h +001240r 1 E5 .lobytes 0fe5h +001241r 1 E6 .lobytes 0fe6h +001242r 1 E7 .lobytes 0fe7h +001243r 1 E8 .lobytes 0fe8h +001244r 1 E9 .lobytes 0fe9h +001245r 1 EA .lobytes 0feah +001246r 1 EB .lobytes 0febh +001247r 1 EC .lobytes 0fech +001248r 1 ED .lobytes 0fedh +001249r 1 EE .lobytes 0feeh +00124Ar 1 EF .lobytes 0fefh +00124Br 1 F0 .lobytes 0ff0h +00124Cr 1 F1 .lobytes 0ff1h +00124Dr 1 F2 .lobytes 0ff2h +00124Er 1 F3 .lobytes 0ff3h +00124Fr 1 F4 .lobytes 0ff4h +001250r 1 F5 .lobytes 0ff5h +001251r 1 F6 .lobytes 0ff6h +001252r 1 F7 .lobytes 0ff7h +001253r 1 F8 .lobytes 0ff8h +001254r 1 F9 .lobytes 0ff9h +001255r 1 FA .lobytes 0ffah +001256r 1 FB .lobytes 0ffbh +001257r 1 FC .lobytes 0ffch +001258r 1 FD .lobytes 0ffdh +001259r 1 FE .lobytes 0ffeh +00125Ar 1 FF .lobytes 0fffh +00125Br 1 00 .lobytes 01000h +00125Cr 1 01 .lobytes 01001h +00125Dr 1 02 .lobytes 01002h +00125Er 1 03 .lobytes 01003h +00125Fr 1 04 .lobytes 01004h +001260r 1 05 .lobytes 01005h +001261r 1 06 .lobytes 01006h +001262r 1 07 .lobytes 01007h +001263r 1 08 .lobytes 01008h +001264r 1 F0 .lobytes 07ff0h +001265r 1 F1 .lobytes 07ff1h +001266r 1 F2 .lobytes 07ff2h +001267r 1 F3 .lobytes 07ff3h +001268r 1 F4 .lobytes 07ff4h +001269r 1 F5 .lobytes 07ff5h +00126Ar 1 F6 .lobytes 07ff6h +00126Br 1 F7 .lobytes 07ff7h +00126Cr 1 F8 .lobytes 07ff8h +00126Dr 1 F9 .lobytes 07ff9h +00126Er 1 FA .lobytes 07ffah +00126Fr 1 FB .lobytes 07ffbh +001270r 1 FC .lobytes 07ffch +001271r 1 FD .lobytes 07ffdh +001272r 1 FE .lobytes 07ffeh +001273r 1 FF .lobytes 07fffh +001274r 1 00 .lobytes 08000h +001275r 1 01 .lobytes 08001h +001276r 1 02 .lobytes 08002h +001277r 1 03 .lobytes 08003h +001278r 1 04 .lobytes 08004h +001279r 1 05 .lobytes 08005h +00127Ar 1 06 .lobytes 08006h +00127Br 1 07 .lobytes 08007h +00127Cr 1 08 .lobytes 08008h +00127Dr 1 09 .lobytes 08009h +00127Er 1 0A .lobytes 0800ah +00127Fr 1 0B .lobytes 0800bh +001280r 1 E1 .lobytes 09fe1h +001281r 1 E2 .lobytes 09fe2h +001282r 1 E3 .lobytes 09fe3h +001283r 1 E4 .lobytes 09fe4h +001284r 1 E5 .lobytes 09fe5h +001285r 1 E6 .lobytes 09fe6h +001286r 1 E7 .lobytes 09fe7h +001287r 1 E8 .lobytes 09fe8h +001288r 1 E9 .lobytes 09fe9h +001289r 1 EA .lobytes 09feah +00128Ar 1 EB .lobytes 09febh +00128Br 1 EC .lobytes 09fech +00128Cr 1 ED .lobytes 09fedh +00128Dr 1 EE .lobytes 09feeh +00128Er 1 EF .lobytes 09fefh +00128Fr 1 F0 .lobytes 09ff0h +001290r 1 F1 .lobytes 09ff1h +001291r 1 F2 .lobytes 09ff2h +001292r 1 F3 .lobytes 09ff3h +001293r 1 F4 .lobytes 09ff4h +001294r 1 F5 .lobytes 09ff5h +001295r 1 F6 .lobytes 09ff6h +001296r 1 F7 .lobytes 09ff7h +001297r 1 F8 .lobytes 09ff8h +001298r 1 F9 .lobytes 09ff9h +001299r 1 FA .lobytes 09ffah +00129Ar 1 FB .lobytes 09ffbh +00129Br 1 FC .lobytes 09ffch +00129Cr 1 FD .lobytes 09ffdh +00129Dr 1 FE .lobytes 09ffeh +00129Er 1 FF .lobytes 09fffh +00129Fr 1 00 .lobytes 0a000h +0012A0r 1 01 .lobytes 0a001h +0012A1r 1 02 .lobytes 0a002h +0012A2r 1 03 .lobytes 0a003h +0012A3r 1 04 .lobytes 0a004h +0012A4r 1 05 .lobytes 0a005h +0012A5r 1 06 .lobytes 0a006h +0012A6r 1 07 .lobytes 0a007h +0012A7r 1 08 .lobytes 0a008h +0012A8r 1 09 .lobytes 0a009h +0012A9r 1 0A .lobytes 0a00ah +0012AAr 1 0B .lobytes 0a00bh +0012ABr 1 0C .lobytes 0a00ch +0012ACr 1 0D .lobytes 0a00dh +0012ADr 1 0E .lobytes 0a00eh +0012AEr 1 0F .lobytes 0a00fh +0012AFr 1 E1 .lobytes 0afe1h +0012B0r 1 E2 .lobytes 0afe2h +0012B1r 1 E3 .lobytes 0afe3h +0012B2r 1 E4 .lobytes 0afe4h +0012B3r 1 E5 .lobytes 0afe5h +0012B4r 1 E6 .lobytes 0afe6h +0012B5r 1 E7 .lobytes 0afe7h +0012B6r 1 E8 .lobytes 0afe8h +0012B7r 1 E9 .lobytes 0afe9h +0012B8r 1 EA .lobytes 0afeah +0012B9r 1 EB .lobytes 0afebh +0012BAr 1 EC .lobytes 0afech +0012BBr 1 ED .lobytes 0afedh +0012BCr 1 EE .lobytes 0afeeh +0012BDr 1 EF .lobytes 0afefh +0012BEr 1 F0 .lobytes 0aff0h +0012BFr 1 F1 .lobytes 0aff1h +0012C0r 1 F2 .lobytes 0aff2h +0012C1r 1 F3 .lobytes 0aff3h +0012C2r 1 F4 .lobytes 0aff4h +0012C3r 1 F5 .lobytes 0aff5h +0012C4r 1 F6 .lobytes 0aff6h +0012C5r 1 F7 .lobytes 0aff7h +0012C6r 1 F8 .lobytes 0aff8h +0012C7r 1 F9 .lobytes 0aff9h +0012C8r 1 FA .lobytes 0affah +0012C9r 1 FB .lobytes 0affbh +0012CAr 1 FC .lobytes 0affch +0012CBr 1 FD .lobytes 0affdh +0012CCr 1 FE .lobytes 0affeh +0012CDr 1 FF .lobytes 0afffh +0012CEr 1 00 .lobytes 0b000h +0012CFr 1 01 .lobytes 0b001h +0012D0r 1 02 .lobytes 0b002h +0012D1r 1 03 .lobytes 0b003h +0012D2r 1 04 .lobytes 0b004h +0012D3r 1 05 .lobytes 0b005h +0012D4r 1 06 .lobytes 0b006h +0012D5r 1 07 .lobytes 0b007h +0012D6r 1 08 .lobytes 0b008h +0012D7r 1 09 .lobytes 0b009h +0012D8r 1 0A .lobytes 0b00ah +0012D9r 1 0B .lobytes 0b00bh +0012DAr 1 0C .lobytes 0b00ch +0012DBr 1 0D .lobytes 0b00dh +0012DCr 1 0E .lobytes 0b00eh +0012DDr 1 0F .lobytes 0b00fh +0012DEr 1 E1 .lobytes 0bfe1h +0012DFr 1 E2 .lobytes 0bfe2h +0012E0r 1 E3 .lobytes 0bfe3h +0012E1r 1 E4 .lobytes 0bfe4h +0012E2r 1 E5 .lobytes 0bfe5h +0012E3r 1 E6 .lobytes 0bfe6h +0012E4r 1 E7 .lobytes 0bfe7h +0012E5r 1 E8 .lobytes 0bfe8h +0012E6r 1 E9 .lobytes 0bfe9h +0012E7r 1 EA .lobytes 0bfeah +0012E8r 1 EB .lobytes 0bfebh +0012E9r 1 EC .lobytes 0bfech +0012EAr 1 ED .lobytes 0bfedh +0012EBr 1 EE .lobytes 0bfeeh +0012ECr 1 EF .lobytes 0bfefh +0012EDr 1 F0 .lobytes 0bff0h +0012EEr 1 F1 .lobytes 0bff1h +0012EFr 1 F2 .lobytes 0bff2h +0012F0r 1 F3 .lobytes 0bff3h +0012F1r 1 F4 .lobytes 0bff4h +0012F2r 1 F5 .lobytes 0bff5h +0012F3r 1 F6 .lobytes 0bff6h +0012F4r 1 F7 .lobytes 0bff7h +0012F5r 1 F8 .lobytes 0bff8h +0012F6r 1 F9 .lobytes 0bff9h +0012F7r 1 FA .lobytes 0bffah +0012F8r 1 FB .lobytes 0bffbh +0012F9r 1 FC .lobytes 0bffch +0012FAr 1 FD .lobytes 0bffdh +0012FBr 1 FE .lobytes 0bffeh +0012FCr 1 FF .lobytes 0bfffh +0012FDr 1 00 .lobytes 0c000h +0012FEr 1 01 .lobytes 0c001h +0012FFr 1 02 .lobytes 0c002h +001300r 1 03 .lobytes 0c003h +001301r 1 04 .lobytes 0c004h +001302r 1 05 .lobytes 0c005h +001303r 1 06 .lobytes 0c006h +001304r 1 07 .lobytes 0c007h +001305r 1 08 .lobytes 0c008h +001306r 1 09 .lobytes 0c009h +001307r 1 0A .lobytes 0c00ah +001308r 1 0B .lobytes 0c00bh +001309r 1 0C .lobytes 0c00ch +00130Ar 1 0D .lobytes 0c00dh +00130Br 1 0E .lobytes 0c00eh +00130Cr 1 0F .lobytes 0c00fh +00130Dr 1 E1 .lobytes 0cfe1h +00130Er 1 E2 .lobytes 0cfe2h +00130Fr 1 E3 .lobytes 0cfe3h +001310r 1 E4 .lobytes 0cfe4h +001311r 1 E5 .lobytes 0cfe5h +001312r 1 E6 .lobytes 0cfe6h +001313r 1 E7 .lobytes 0cfe7h +001314r 1 E8 .lobytes 0cfe8h +001315r 1 E9 .lobytes 0cfe9h +001316r 1 EA .lobytes 0cfeah +001317r 1 EB .lobytes 0cfebh +001318r 1 EC .lobytes 0cfech +001319r 1 ED .lobytes 0cfedh +00131Ar 1 EE .lobytes 0cfeeh +00131Br 1 EF .lobytes 0cfefh +00131Cr 1 F0 .lobytes 0cff0h +00131Dr 1 F1 .lobytes 0cff1h +00131Er 1 F2 .lobytes 0cff2h +00131Fr 1 F3 .lobytes 0cff3h +001320r 1 F4 .lobytes 0cff4h +001321r 1 F5 .lobytes 0cff5h +001322r 1 F6 .lobytes 0cff6h +001323r 1 F7 .lobytes 0cff7h +001324r 1 F8 .lobytes 0cff8h +001325r 1 F9 .lobytes 0cff9h +001326r 1 FA .lobytes 0cffah +001327r 1 FB .lobytes 0cffbh +001328r 1 FC .lobytes 0cffch +001329r 1 FD .lobytes 0cffdh +00132Ar 1 FE .lobytes 0cffeh +00132Br 1 FF .lobytes 0cfffh +00132Cr 1 00 .lobytes 0d000h +00132Dr 1 01 .lobytes 0d001h +00132Er 1 02 .lobytes 0d002h +00132Fr 1 03 .lobytes 0d003h +001330r 1 04 .lobytes 0d004h +001331r 1 05 .lobytes 0d005h +001332r 1 06 .lobytes 0d006h +001333r 1 07 .lobytes 0d007h +001334r 1 08 .lobytes 0d008h +001335r 1 09 .lobytes 0d009h +001336r 1 0A .lobytes 0d00ah +001337r 1 0B .lobytes 0d00bh +001338r 1 0C .lobytes 0d00ch +001339r 1 0D .lobytes 0d00dh +00133Ar 1 0E .lobytes 0d00eh +00133Br 1 0F .lobytes 0d00fh +00133Cr 1 E1 .lobytes 0dfe1h +00133Dr 1 E2 .lobytes 0dfe2h +00133Er 1 E3 .lobytes 0dfe3h +00133Fr 1 E4 .lobytes 0dfe4h +001340r 1 E5 .lobytes 0dfe5h +001341r 1 E6 .lobytes 0dfe6h +001342r 1 E7 .lobytes 0dfe7h +001343r 1 E8 .lobytes 0dfe8h +001344r 1 E9 .lobytes 0dfe9h +001345r 1 EA .lobytes 0dfeah +001346r 1 EB .lobytes 0dfebh +001347r 1 EC .lobytes 0dfech +001348r 1 ED .lobytes 0dfedh +001349r 1 EE .lobytes 0dfeeh +00134Ar 1 EF .lobytes 0dfefh +00134Br 1 F0 .lobytes 0dff0h +00134Cr 1 F1 .lobytes 0dff1h +00134Dr 1 F2 .lobytes 0dff2h +00134Er 1 F3 .lobytes 0dff3h +00134Fr 1 F4 .lobytes 0dff4h +001350r 1 F5 .lobytes 0dff5h +001351r 1 F6 .lobytes 0dff6h +001352r 1 F7 .lobytes 0dff7h +001353r 1 F8 .lobytes 0dff8h +001354r 1 F9 .lobytes 0dff9h +001355r 1 FA .lobytes 0dffah +001356r 1 FB .lobytes 0dffbh +001357r 1 FC .lobytes 0dffch +001358r 1 FD .lobytes 0dffdh +001359r 1 FE .lobytes 0dffeh +00135Ar 1 FF .lobytes 0dfffh +00135Br 1 00 .lobytes 0e000h +00135Cr 1 01 .lobytes 0e001h +00135Dr 1 02 .lobytes 0e002h +00135Er 1 03 .lobytes 0e003h +00135Fr 1 04 .lobytes 0e004h +001360r 1 05 .lobytes 0e005h +001361r 1 06 .lobytes 0e006h +001362r 1 07 .lobytes 0e007h +001363r 1 08 .lobytes 0e008h +001364r 1 09 .lobytes 0e009h +001365r 1 0A .lobytes 0e00ah +001366r 1 0B .lobytes 0e00bh +001367r 1 0C .lobytes 0e00ch +001368r 1 0D .lobytes 0e00dh +001369r 1 0E .lobytes 0e00eh +00136Ar 1 0F .lobytes 0e00fh +00136Br 1 E1 .lobytes 0efe1h +00136Cr 1 E2 .lobytes 0efe2h +00136Dr 1 E3 .lobytes 0efe3h +00136Er 1 E4 .lobytes 0efe4h +00136Fr 1 E5 .lobytes 0efe5h +001370r 1 E6 .lobytes 0efe6h +001371r 1 E7 .lobytes 0efe7h +001372r 1 E8 .lobytes 0efe8h +001373r 1 E9 .lobytes 0efe9h +001374r 1 EA .lobytes 0efeah +001375r 1 EB .lobytes 0efebh +001376r 1 EC .lobytes 0efech +001377r 1 ED .lobytes 0efedh +001378r 1 EE .lobytes 0efeeh +001379r 1 EF .lobytes 0efefh +00137Ar 1 F0 .lobytes 0eff0h +00137Br 1 F1 .lobytes 0eff1h +00137Cr 1 F2 .lobytes 0eff2h +00137Dr 1 F3 .lobytes 0eff3h +00137Er 1 F4 .lobytes 0eff4h +00137Fr 1 F5 .lobytes 0eff5h +001380r 1 F6 .lobytes 0eff6h +001381r 1 F7 .lobytes 0eff7h +001382r 1 F8 .lobytes 0eff8h +001383r 1 F9 .lobytes 0eff9h +001384r 1 FA .lobytes 0effah +001385r 1 FB .lobytes 0effbh +001386r 1 FC .lobytes 0effch +001387r 1 FD .lobytes 0effdh +001388r 1 FE .lobytes 0effeh +001389r 1 FF .lobytes 0efffh +00138Ar 1 00 .lobytes 0f000h +00138Br 1 01 .lobytes 0f001h +00138Cr 1 02 .lobytes 0f002h +00138Dr 1 03 .lobytes 0f003h +00138Er 1 04 .lobytes 0f004h +00138Fr 1 05 .lobytes 0f005h +001390r 1 06 .lobytes 0f006h +001391r 1 07 .lobytes 0f007h +001392r 1 08 .lobytes 0f008h +001393r 1 09 .lobytes 0f009h +001394r 1 0A .lobytes 0f00ah +001395r 1 0B .lobytes 0f00bh +001396r 1 0C .lobytes 0f00ch +001397r 1 0D .lobytes 0f00dh +001398r 1 0E .lobytes 0f00eh +001399r 1 0F .lobytes 0f00fh +00139Ar 1 E1 .lobytes 0ffe1h +00139Br 1 E2 .lobytes 0ffe2h +00139Cr 1 E3 .lobytes 0ffe3h +00139Dr 1 E4 .lobytes 0ffe4h +00139Er 1 E5 .lobytes 0ffe5h +00139Fr 1 E6 .lobytes 0ffe6h +0013A0r 1 E7 .lobytes 0ffe7h +0013A1r 1 E8 .lobytes 0ffe8h +0013A2r 1 E9 .lobytes 0ffe9h +0013A3r 1 EA .lobytes 0ffeah +0013A4r 1 EB .lobytes 0ffebh +0013A5r 1 EC .lobytes 0ffech +0013A6r 1 ED .lobytes 0ffedh +0013A7r 1 EE .lobytes 0ffeeh +0013A8r 1 EF .lobytes 0ffefh +0013A9r 1 F0 .lobytes 0fff0h +0013AAr 1 F1 .lobytes 0fff1h +0013ABr 1 F2 .lobytes 0fff2h +0013ACr 1 F3 .lobytes 0fff3h +0013ADr 1 F4 .lobytes 0fff4h +0013AEr 1 F5 .lobytes 0fff5h +0013AFr 1 F6 .lobytes 0fff6h +0013B0r 1 F7 .lobytes 0fff7h +0013B1r 1 F8 .lobytes 0fff8h +0013B2r 1 F9 .lobytes 0fff9h +0013B3r 1 FA .lobytes 0fffah +0013B4r 1 FB .lobytes 0fffbh +0013B5r 1 FC .lobytes 0fffch +0013B6r 1 FD .lobytes 0fffdh +0013B7r 1 FE .lobytes 0fffeh +0013B8r 1 FF .lobytes 0ffffh +0013B9r 1 +0013B9r 1 ; binary values, variable length +0013B9r 1 00 .lobytes %0 +0013BAr 1 01 .lobytes %01 +0013BBr 1 02 .lobytes %010 +0013BCr 1 03 .lobytes %011 +0013BDr 1 04 .lobytes %0100 +0013BEr 1 05 .lobytes %0101 +0013BFr 1 06 .lobytes %0110 +0013C0r 1 07 .lobytes %0111 +0013C1r 1 08 .lobytes %01000 +0013C2r 1 09 .lobytes %01001 +0013C3r 1 0A .lobytes %01010 +0013C4r 1 0B .lobytes %01011 +0013C5r 1 0C .lobytes %01100 +0013C6r 1 0D .lobytes %01101 +0013C7r 1 0E .lobytes %01110 +0013C8r 1 0F .lobytes %01111 +0013C9r 1 10 .lobytes %010000 +0013CAr 1 11 .lobytes %010001 +0013CBr 1 12 .lobytes %010010 +0013CCr 1 13 .lobytes %010011 +0013CDr 1 70 .lobytes %01110000 +0013CEr 1 71 .lobytes %01110001 +0013CFr 1 72 .lobytes %01110010 +0013D0r 1 73 .lobytes %01110011 +0013D1r 1 74 .lobytes %01110100 +0013D2r 1 75 .lobytes %01110101 +0013D3r 1 76 .lobytes %01110110 +0013D4r 1 77 .lobytes %01110111 +0013D5r 1 78 .lobytes %01111000 +0013D6r 1 79 .lobytes %01111001 +0013D7r 1 7A .lobytes %01111010 +0013D8r 1 7B .lobytes %01111011 +0013D9r 1 7C .lobytes %01111100 +0013DAr 1 7D .lobytes %01111101 +0013DBr 1 7E .lobytes %01111110 +0013DCr 1 7F .lobytes %01111111 +0013DDr 1 80 .lobytes %010000000 +0013DEr 1 81 .lobytes %010000001 +0013DFr 1 82 .lobytes %010000010 +0013E0r 1 83 .lobytes %010000011 +0013E1r 1 84 .lobytes %010000100 +0013E2r 1 85 .lobytes %010000101 +0013E3r 1 86 .lobytes %010000110 +0013E4r 1 F0 .lobytes %011110000 +0013E5r 1 F1 .lobytes %011110001 +0013E6r 1 F2 .lobytes %011110010 +0013E7r 1 F3 .lobytes %011110011 +0013E8r 1 F4 .lobytes %011110100 +0013E9r 1 F5 .lobytes %011110101 +0013EAr 1 F6 .lobytes %011110110 +0013EBr 1 F7 .lobytes %011110111 +0013ECr 1 F8 .lobytes %011111000 +0013EDr 1 F9 .lobytes %011111001 +0013EEr 1 FA .lobytes %011111010 +0013EFr 1 FB .lobytes %011111011 +0013F0r 1 FC .lobytes %011111100 +0013F1r 1 FD .lobytes %011111101 +0013F2r 1 FE .lobytes %011111110 +0013F3r 1 FF .lobytes %011111111 +0013F4r 1 00 .lobytes %100000000 +0013F5r 1 01 .lobytes %100000001 +0013F6r 1 02 .lobytes %100000010 +0013F7r 1 03 .lobytes %100000011 +0013F8r 1 D2 .lobytes %111111010010 +0013F9r 1 D3 .lobytes %111111010011 +0013FAr 1 D4 .lobytes %111111010100 +0013FBr 1 D5 .lobytes %111111010101 +0013FCr 1 D6 .lobytes %111111010110 +0013FDr 1 D7 .lobytes %111111010111 +0013FEr 1 D8 .lobytes %111111011000 +0013FFr 1 D9 .lobytes %111111011001 +001400r 1 DA .lobytes %111111011010 +001401r 1 DB .lobytes %111111011011 +001402r 1 DC .lobytes %111111011100 +001403r 1 DD .lobytes %111111011101 +001404r 1 DE .lobytes %111111011110 +001405r 1 DF .lobytes %111111011111 +001406r 1 E0 .lobytes %111111100000 +001407r 1 E1 .lobytes %111111100001 +001408r 1 E2 .lobytes %111111100010 +001409r 1 E3 .lobytes %111111100011 +00140Ar 1 E4 .lobytes %111111100100 +00140Br 1 E5 .lobytes %111111100101 +00140Cr 1 E6 .lobytes %111111100110 +00140Dr 1 E7 .lobytes %111111100111 +00140Er 1 E8 .lobytes %111111101000 +00140Fr 1 E9 .lobytes %111111101001 +001410r 1 EA .lobytes %111111101010 +001411r 1 EB .lobytes %111111101011 +001412r 1 EC .lobytes %111111101100 +001413r 1 ED .lobytes %111111101101 +001414r 1 EE .lobytes %111111101110 +001415r 1 EF .lobytes %111111101111 +001416r 1 F0 .lobytes %111111110000 +001417r 1 F1 .lobytes %111111110001 +001418r 1 F2 .lobytes %111111110010 +001419r 1 F3 .lobytes %111111110011 +00141Ar 1 F4 .lobytes %111111110100 +00141Br 1 F5 .lobytes %111111110101 +00141Cr 1 F6 .lobytes %111111110110 +00141Dr 1 F7 .lobytes %111111110111 +00141Er 1 F8 .lobytes %111111111000 +00141Fr 1 F9 .lobytes %111111111001 +001420r 1 FA .lobytes %111111111010 +001421r 1 FB .lobytes %111111111011 +001422r 1 FC .lobytes %111111111100 +001423r 1 FD .lobytes %111111111101 +001424r 1 FE .lobytes %111111111110 +001425r 1 FF .lobytes %111111111111 +001426r 1 00 .lobytes %1000000000000 +001427r 1 01 .lobytes %1000000000001 +001428r 1 02 .lobytes %1000000000010 +001429r 1 03 .lobytes %1000000000011 +00142Ar 1 04 .lobytes %1000000000100 +00142Br 1 05 .lobytes %1000000000101 +00142Cr 1 06 .lobytes %1000000000110 +00142Dr 1 07 .lobytes %1000000000111 +00142Er 1 08 .lobytes %1000000001000 +00142Fr 1 F0 .lobytes %111111111110000 +001430r 1 F1 .lobytes %111111111110001 +001431r 1 F2 .lobytes %111111111110010 +001432r 1 F3 .lobytes %111111111110011 +001433r 1 F4 .lobytes %111111111110100 +001434r 1 F5 .lobytes %111111111110101 +001435r 1 F6 .lobytes %111111111110110 +001436r 1 F7 .lobytes %111111111110111 +001437r 1 F8 .lobytes %111111111111000 +001438r 1 F9 .lobytes %111111111111001 +001439r 1 FA .lobytes %111111111111010 +00143Ar 1 FB .lobytes %111111111111011 +00143Br 1 FC .lobytes %111111111111100 +00143Cr 1 FD .lobytes %111111111111101 +00143Dr 1 FE .lobytes %111111111111110 +00143Er 1 FF .lobytes %111111111111111 +00143Fr 1 00 .lobytes %1000000000000000 +001440r 1 01 .lobytes %1000000000000001 +001441r 1 02 .lobytes %1000000000000010 +001442r 1 03 .lobytes %1000000000000011 +001443r 1 04 .lobytes %1000000000000100 +001444r 1 05 .lobytes %1000000000000101 +001445r 1 06 .lobytes %1000000000000110 +001446r 1 07 .lobytes %1000000000000111 +001447r 1 08 .lobytes %1000000000001000 +001448r 1 09 .lobytes %1000000000001001 +001449r 1 0A .lobytes %1000000000001010 +00144Ar 1 0B .lobytes %1000000000001011 +00144Br 1 E1 .lobytes %1001111111100001 +00144Cr 1 E2 .lobytes %1001111111100010 +00144Dr 1 E3 .lobytes %1001111111100011 +00144Er 1 E4 .lobytes %1001111111100100 +00144Fr 1 E5 .lobytes %1001111111100101 +001450r 1 E6 .lobytes %1001111111100110 +001451r 1 E7 .lobytes %1001111111100111 +001452r 1 E8 .lobytes %1001111111101000 +001453r 1 E9 .lobytes %1001111111101001 +001454r 1 EA .lobytes %1001111111101010 +001455r 1 EB .lobytes %1001111111101011 +001456r 1 EC .lobytes %1001111111101100 +001457r 1 ED .lobytes %1001111111101101 +001458r 1 EE .lobytes %1001111111101110 +001459r 1 EF .lobytes %1001111111101111 +00145Ar 1 F0 .lobytes %1001111111110000 +00145Br 1 F1 .lobytes %1001111111110001 +00145Cr 1 F2 .lobytes %1001111111110010 +00145Dr 1 F3 .lobytes %1001111111110011 +00145Er 1 F4 .lobytes %1001111111110100 +00145Fr 1 F5 .lobytes %1001111111110101 +001460r 1 F6 .lobytes %1001111111110110 +001461r 1 F7 .lobytes %1001111111110111 +001462r 1 F8 .lobytes %1001111111111000 +001463r 1 F9 .lobytes %1001111111111001 +001464r 1 FA .lobytes %1001111111111010 +001465r 1 FB .lobytes %1001111111111011 +001466r 1 FC .lobytes %1001111111111100 +001467r 1 FD .lobytes %1001111111111101 +001468r 1 FE .lobytes %1001111111111110 +001469r 1 FF .lobytes %1001111111111111 +00146Ar 1 00 .lobytes %1010000000000000 +00146Br 1 01 .lobytes %1010000000000001 +00146Cr 1 02 .lobytes %1010000000000010 +00146Dr 1 03 .lobytes %1010000000000011 +00146Er 1 04 .lobytes %1010000000000100 +00146Fr 1 05 .lobytes %1010000000000101 +001470r 1 06 .lobytes %1010000000000110 +001471r 1 07 .lobytes %1010000000000111 +001472r 1 08 .lobytes %1010000000001000 +001473r 1 09 .lobytes %1010000000001001 +001474r 1 0A .lobytes %1010000000001010 +001475r 1 0B .lobytes %1010000000001011 +001476r 1 0C .lobytes %1010000000001100 +001477r 1 0D .lobytes %1010000000001101 +001478r 1 0E .lobytes %1010000000001110 +001479r 1 0F .lobytes %1010000000001111 +00147Ar 1 E1 .lobytes %1010111111100001 +00147Br 1 E2 .lobytes %1010111111100010 +00147Cr 1 E3 .lobytes %1010111111100011 +00147Dr 1 E4 .lobytes %1010111111100100 +00147Er 1 E5 .lobytes %1010111111100101 +00147Fr 1 E6 .lobytes %1010111111100110 +001480r 1 E7 .lobytes %1010111111100111 +001481r 1 E8 .lobytes %1010111111101000 +001482r 1 E9 .lobytes %1010111111101001 +001483r 1 EA .lobytes %1010111111101010 +001484r 1 EB .lobytes %1010111111101011 +001485r 1 EC .lobytes %1010111111101100 +001486r 1 ED .lobytes %1010111111101101 +001487r 1 EE .lobytes %1010111111101110 +001488r 1 EF .lobytes %1010111111101111 +001489r 1 F0 .lobytes %1010111111110000 +00148Ar 1 F1 .lobytes %1010111111110001 +00148Br 1 F2 .lobytes %1010111111110010 +00148Cr 1 F3 .lobytes %1010111111110011 +00148Dr 1 F4 .lobytes %1010111111110100 +00148Er 1 F5 .lobytes %1010111111110101 +00148Fr 1 F6 .lobytes %1010111111110110 +001490r 1 F7 .lobytes %1010111111110111 +001491r 1 F8 .lobytes %1010111111111000 +001492r 1 F9 .lobytes %1010111111111001 +001493r 1 FA .lobytes %1010111111111010 +001494r 1 FB .lobytes %1010111111111011 +001495r 1 FC .lobytes %1010111111111100 +001496r 1 FD .lobytes %1010111111111101 +001497r 1 FE .lobytes %1010111111111110 +001498r 1 FF .lobytes %1010111111111111 +001499r 1 00 .lobytes %1011000000000000 +00149Ar 1 01 .lobytes %1011000000000001 +00149Br 1 02 .lobytes %1011000000000010 +00149Cr 1 03 .lobytes %1011000000000011 +00149Dr 1 04 .lobytes %1011000000000100 +00149Er 1 05 .lobytes %1011000000000101 +00149Fr 1 06 .lobytes %1011000000000110 +0014A0r 1 07 .lobytes %1011000000000111 +0014A1r 1 08 .lobytes %1011000000001000 +0014A2r 1 09 .lobytes %1011000000001001 +0014A3r 1 0A .lobytes %1011000000001010 +0014A4r 1 0B .lobytes %1011000000001011 +0014A5r 1 0C .lobytes %1011000000001100 +0014A6r 1 0D .lobytes %1011000000001101 +0014A7r 1 0E .lobytes %1011000000001110 +0014A8r 1 0F .lobytes %1011000000001111 +0014A9r 1 E1 .lobytes %1011111111100001 +0014AAr 1 E2 .lobytes %1011111111100010 +0014ABr 1 E3 .lobytes %1011111111100011 +0014ACr 1 E4 .lobytes %1011111111100100 +0014ADr 1 E5 .lobytes %1011111111100101 +0014AEr 1 E6 .lobytes %1011111111100110 +0014AFr 1 E7 .lobytes %1011111111100111 +0014B0r 1 E8 .lobytes %1011111111101000 +0014B1r 1 E9 .lobytes %1011111111101001 +0014B2r 1 EA .lobytes %1011111111101010 +0014B3r 1 EB .lobytes %1011111111101011 +0014B4r 1 EC .lobytes %1011111111101100 +0014B5r 1 ED .lobytes %1011111111101101 +0014B6r 1 EE .lobytes %1011111111101110 +0014B7r 1 EF .lobytes %1011111111101111 +0014B8r 1 F0 .lobytes %1011111111110000 +0014B9r 1 F1 .lobytes %1011111111110001 +0014BAr 1 F2 .lobytes %1011111111110010 +0014BBr 1 F3 .lobytes %1011111111110011 +0014BCr 1 F4 .lobytes %1011111111110100 +0014BDr 1 F5 .lobytes %1011111111110101 +0014BEr 1 F6 .lobytes %1011111111110110 +0014BFr 1 F7 .lobytes %1011111111110111 +0014C0r 1 F8 .lobytes %1011111111111000 +0014C1r 1 F9 .lobytes %1011111111111001 +0014C2r 1 FA .lobytes %1011111111111010 +0014C3r 1 FB .lobytes %1011111111111011 +0014C4r 1 FC .lobytes %1011111111111100 +0014C5r 1 FD .lobytes %1011111111111101 +0014C6r 1 FE .lobytes %1011111111111110 +0014C7r 1 FF .lobytes %1011111111111111 +0014C8r 1 00 .lobytes %1100000000000000 +0014C9r 1 01 .lobytes %1100000000000001 +0014CAr 1 02 .lobytes %1100000000000010 +0014CBr 1 03 .lobytes %1100000000000011 +0014CCr 1 04 .lobytes %1100000000000100 +0014CDr 1 05 .lobytes %1100000000000101 +0014CEr 1 06 .lobytes %1100000000000110 +0014CFr 1 07 .lobytes %1100000000000111 +0014D0r 1 08 .lobytes %1100000000001000 +0014D1r 1 09 .lobytes %1100000000001001 +0014D2r 1 0A .lobytes %1100000000001010 +0014D3r 1 0B .lobytes %1100000000001011 +0014D4r 1 0C .lobytes %1100000000001100 +0014D5r 1 0D .lobytes %1100000000001101 +0014D6r 1 0E .lobytes %1100000000001110 +0014D7r 1 0F .lobytes %1100000000001111 +0014D8r 1 E1 .lobytes %1100111111100001 +0014D9r 1 E2 .lobytes %1100111111100010 +0014DAr 1 E3 .lobytes %1100111111100011 +0014DBr 1 E4 .lobytes %1100111111100100 +0014DCr 1 E5 .lobytes %1100111111100101 +0014DDr 1 E6 .lobytes %1100111111100110 +0014DEr 1 E7 .lobytes %1100111111100111 +0014DFr 1 E8 .lobytes %1100111111101000 +0014E0r 1 E9 .lobytes %1100111111101001 +0014E1r 1 EA .lobytes %1100111111101010 +0014E2r 1 EB .lobytes %1100111111101011 +0014E3r 1 EC .lobytes %1100111111101100 +0014E4r 1 ED .lobytes %1100111111101101 +0014E5r 1 EE .lobytes %1100111111101110 +0014E6r 1 EF .lobytes %1100111111101111 +0014E7r 1 F0 .lobytes %1100111111110000 +0014E8r 1 F1 .lobytes %1100111111110001 +0014E9r 1 F2 .lobytes %1100111111110010 +0014EAr 1 F3 .lobytes %1100111111110011 +0014EBr 1 F4 .lobytes %1100111111110100 +0014ECr 1 F5 .lobytes %1100111111110101 +0014EDr 1 F6 .lobytes %1100111111110110 +0014EEr 1 F7 .lobytes %1100111111110111 +0014EFr 1 F8 .lobytes %1100111111111000 +0014F0r 1 F9 .lobytes %1100111111111001 +0014F1r 1 FA .lobytes %1100111111111010 +0014F2r 1 FB .lobytes %1100111111111011 +0014F3r 1 FC .lobytes %1100111111111100 +0014F4r 1 FD .lobytes %1100111111111101 +0014F5r 1 FE .lobytes %1100111111111110 +0014F6r 1 FF .lobytes %1100111111111111 +0014F7r 1 00 .lobytes %1101000000000000 +0014F8r 1 01 .lobytes %1101000000000001 +0014F9r 1 02 .lobytes %1101000000000010 +0014FAr 1 03 .lobytes %1101000000000011 +0014FBr 1 04 .lobytes %1101000000000100 +0014FCr 1 05 .lobytes %1101000000000101 +0014FDr 1 06 .lobytes %1101000000000110 +0014FEr 1 07 .lobytes %1101000000000111 +0014FFr 1 08 .lobytes %1101000000001000 +001500r 1 09 .lobytes %1101000000001001 +001501r 1 0A .lobytes %1101000000001010 +001502r 1 0B .lobytes %1101000000001011 +001503r 1 0C .lobytes %1101000000001100 +001504r 1 0D .lobytes %1101000000001101 +001505r 1 0E .lobytes %1101000000001110 +001506r 1 0F .lobytes %1101000000001111 +001507r 1 E1 .lobytes %1101111111100001 +001508r 1 E2 .lobytes %1101111111100010 +001509r 1 E3 .lobytes %1101111111100011 +00150Ar 1 E4 .lobytes %1101111111100100 +00150Br 1 E5 .lobytes %1101111111100101 +00150Cr 1 E6 .lobytes %1101111111100110 +00150Dr 1 E7 .lobytes %1101111111100111 +00150Er 1 E8 .lobytes %1101111111101000 +00150Fr 1 E9 .lobytes %1101111111101001 +001510r 1 EA .lobytes %1101111111101010 +001511r 1 EB .lobytes %1101111111101011 +001512r 1 EC .lobytes %1101111111101100 +001513r 1 ED .lobytes %1101111111101101 +001514r 1 EE .lobytes %1101111111101110 +001515r 1 EF .lobytes %1101111111101111 +001516r 1 F0 .lobytes %1101111111110000 +001517r 1 F1 .lobytes %1101111111110001 +001518r 1 F2 .lobytes %1101111111110010 +001519r 1 F3 .lobytes %1101111111110011 +00151Ar 1 F4 .lobytes %1101111111110100 +00151Br 1 F5 .lobytes %1101111111110101 +00151Cr 1 F6 .lobytes %1101111111110110 +00151Dr 1 F7 .lobytes %1101111111110111 +00151Er 1 F8 .lobytes %1101111111111000 +00151Fr 1 F9 .lobytes %1101111111111001 +001520r 1 FA .lobytes %1101111111111010 +001521r 1 FB .lobytes %1101111111111011 +001522r 1 FC .lobytes %1101111111111100 +001523r 1 FD .lobytes %1101111111111101 +001524r 1 FE .lobytes %1101111111111110 +001525r 1 FF .lobytes %1101111111111111 +001526r 1 00 .lobytes %1110000000000000 +001527r 1 01 .lobytes %1110000000000001 +001528r 1 02 .lobytes %1110000000000010 +001529r 1 03 .lobytes %1110000000000011 +00152Ar 1 04 .lobytes %1110000000000100 +00152Br 1 05 .lobytes %1110000000000101 +00152Cr 1 06 .lobytes %1110000000000110 +00152Dr 1 07 .lobytes %1110000000000111 +00152Er 1 08 .lobytes %1110000000001000 +00152Fr 1 09 .lobytes %1110000000001001 +001530r 1 0A .lobytes %1110000000001010 +001531r 1 0B .lobytes %1110000000001011 +001532r 1 0C .lobytes %1110000000001100 +001533r 1 0D .lobytes %1110000000001101 +001534r 1 0E .lobytes %1110000000001110 +001535r 1 0F .lobytes %1110000000001111 +001536r 1 E1 .lobytes %1110111111100001 +001537r 1 E2 .lobytes %1110111111100010 +001538r 1 E3 .lobytes %1110111111100011 +001539r 1 E4 .lobytes %1110111111100100 +00153Ar 1 E5 .lobytes %1110111111100101 +00153Br 1 E6 .lobytes %1110111111100110 +00153Cr 1 E7 .lobytes %1110111111100111 +00153Dr 1 E8 .lobytes %1110111111101000 +00153Er 1 E9 .lobytes %1110111111101001 +00153Fr 1 EA .lobytes %1110111111101010 +001540r 1 EB .lobytes %1110111111101011 +001541r 1 EC .lobytes %1110111111101100 +001542r 1 ED .lobytes %1110111111101101 +001543r 1 EE .lobytes %1110111111101110 +001544r 1 EF .lobytes %1110111111101111 +001545r 1 F0 .lobytes %1110111111110000 +001546r 1 F1 .lobytes %1110111111110001 +001547r 1 F2 .lobytes %1110111111110010 +001548r 1 F3 .lobytes %1110111111110011 +001549r 1 F4 .lobytes %1110111111110100 +00154Ar 1 F5 .lobytes %1110111111110101 +00154Br 1 F6 .lobytes %1110111111110110 +00154Cr 1 F7 .lobytes %1110111111110111 +00154Dr 1 F8 .lobytes %1110111111111000 +00154Er 1 F9 .lobytes %1110111111111001 +00154Fr 1 FA .lobytes %1110111111111010 +001550r 1 FB .lobytes %1110111111111011 +001551r 1 FC .lobytes %1110111111111100 +001552r 1 FD .lobytes %1110111111111101 +001553r 1 FE .lobytes %1110111111111110 +001554r 1 FF .lobytes %1110111111111111 +001555r 1 00 .lobytes %1111000000000000 +001556r 1 01 .lobytes %1111000000000001 +001557r 1 02 .lobytes %1111000000000010 +001558r 1 03 .lobytes %1111000000000011 +001559r 1 04 .lobytes %1111000000000100 +00155Ar 1 05 .lobytes %1111000000000101 +00155Br 1 06 .lobytes %1111000000000110 +00155Cr 1 07 .lobytes %1111000000000111 +00155Dr 1 08 .lobytes %1111000000001000 +00155Er 1 09 .lobytes %1111000000001001 +00155Fr 1 0A .lobytes %1111000000001010 +001560r 1 0B .lobytes %1111000000001011 +001561r 1 0C .lobytes %1111000000001100 +001562r 1 0D .lobytes %1111000000001101 +001563r 1 0E .lobytes %1111000000001110 +001564r 1 0F .lobytes %1111000000001111 +001565r 1 E1 .lobytes %1111111111100001 +001566r 1 E2 .lobytes %1111111111100010 +001567r 1 E3 .lobytes %1111111111100011 +001568r 1 E4 .lobytes %1111111111100100 +001569r 1 E5 .lobytes %1111111111100101 +00156Ar 1 E6 .lobytes %1111111111100110 +00156Br 1 E7 .lobytes %1111111111100111 +00156Cr 1 E8 .lobytes %1111111111101000 +00156Dr 1 E9 .lobytes %1111111111101001 +00156Er 1 EA .lobytes %1111111111101010 +00156Fr 1 EB .lobytes %1111111111101011 +001570r 1 EC .lobytes %1111111111101100 +001571r 1 ED .lobytes %1111111111101101 +001572r 1 EE .lobytes %1111111111101110 +001573r 1 EF .lobytes %1111111111101111 +001574r 1 F0 .lobytes %1111111111110000 +001575r 1 F1 .lobytes %1111111111110001 +001576r 1 F2 .lobytes %1111111111110010 +001577r 1 F3 .lobytes %1111111111110011 +001578r 1 F4 .lobytes %1111111111110100 +001579r 1 F5 .lobytes %1111111111110101 +00157Ar 1 F6 .lobytes %1111111111110110 +00157Br 1 F7 .lobytes %1111111111110111 +00157Cr 1 F8 .lobytes %1111111111111000 +00157Dr 1 F9 .lobytes %1111111111111001 +00157Er 1 FA .lobytes %1111111111111010 +00157Fr 1 FB .lobytes %1111111111111011 +001580r 1 FC .lobytes %1111111111111100 +001581r 1 FD .lobytes %1111111111111101 +001582r 1 FE .lobytes %1111111111111110 +001583r 1 FF .lobytes %1111111111111111 +001584r 1 +001584r 1 ; binary values, full length +001584r 1 00 .lobytes %0000000000000000 +001585r 1 01 .lobytes %0000000000000001 +001586r 1 02 .lobytes %0000000000000010 +001587r 1 03 .lobytes %0000000000000011 +001588r 1 04 .lobytes %0000000000000100 +001589r 1 05 .lobytes %0000000000000101 +00158Ar 1 06 .lobytes %0000000000000110 +00158Br 1 07 .lobytes %0000000000000111 +00158Cr 1 08 .lobytes %0000000000001000 +00158Dr 1 09 .lobytes %0000000000001001 +00158Er 1 0A .lobytes %0000000000001010 +00158Fr 1 0B .lobytes %0000000000001011 +001590r 1 0C .lobytes %0000000000001100 +001591r 1 0D .lobytes %0000000000001101 +001592r 1 0E .lobytes %0000000000001110 +001593r 1 0F .lobytes %0000000000001111 +001594r 1 10 .lobytes %0000000000010000 +001595r 1 11 .lobytes %0000000000010001 +001596r 1 12 .lobytes %0000000000010010 +001597r 1 13 .lobytes %0000000000010011 +001598r 1 70 .lobytes %0000000001110000 +001599r 1 71 .lobytes %0000000001110001 +00159Ar 1 72 .lobytes %0000000001110010 +00159Br 1 73 .lobytes %0000000001110011 +00159Cr 1 74 .lobytes %0000000001110100 +00159Dr 1 75 .lobytes %0000000001110101 +00159Er 1 76 .lobytes %0000000001110110 +00159Fr 1 77 .lobytes %0000000001110111 +0015A0r 1 78 .lobytes %0000000001111000 +0015A1r 1 79 .lobytes %0000000001111001 +0015A2r 1 7A .lobytes %0000000001111010 +0015A3r 1 7B .lobytes %0000000001111011 +0015A4r 1 7C .lobytes %0000000001111100 +0015A5r 1 7D .lobytes %0000000001111101 +0015A6r 1 7E .lobytes %0000000001111110 +0015A7r 1 7F .lobytes %0000000001111111 +0015A8r 1 80 .lobytes %0000000010000000 +0015A9r 1 81 .lobytes %0000000010000001 +0015AAr 1 82 .lobytes %0000000010000010 +0015ABr 1 83 .lobytes %0000000010000011 +0015ACr 1 84 .lobytes %0000000010000100 +0015ADr 1 85 .lobytes %0000000010000101 +0015AEr 1 86 .lobytes %0000000010000110 +0015AFr 1 F0 .lobytes %0000000011110000 +0015B0r 1 F1 .lobytes %0000000011110001 +0015B1r 1 F2 .lobytes %0000000011110010 +0015B2r 1 F3 .lobytes %0000000011110011 +0015B3r 1 F4 .lobytes %0000000011110100 +0015B4r 1 F5 .lobytes %0000000011110101 +0015B5r 1 F6 .lobytes %0000000011110110 +0015B6r 1 F7 .lobytes %0000000011110111 +0015B7r 1 F8 .lobytes %0000000011111000 +0015B8r 1 F9 .lobytes %0000000011111001 +0015B9r 1 FA .lobytes %0000000011111010 +0015BAr 1 FB .lobytes %0000000011111011 +0015BBr 1 FC .lobytes %0000000011111100 +0015BCr 1 FD .lobytes %0000000011111101 +0015BDr 1 FE .lobytes %0000000011111110 +0015BEr 1 FF .lobytes %0000000011111111 +0015BFr 1 00 .lobytes %0000000100000000 +0015C0r 1 01 .lobytes %0000000100000001 +0015C1r 1 02 .lobytes %0000000100000010 +0015C2r 1 03 .lobytes %0000000100000011 +0015C3r 1 D2 .lobytes %0000111111010010 +0015C4r 1 D3 .lobytes %0000111111010011 +0015C5r 1 D4 .lobytes %0000111111010100 +0015C6r 1 D5 .lobytes %0000111111010101 +0015C7r 1 D6 .lobytes %0000111111010110 +0015C8r 1 D7 .lobytes %0000111111010111 +0015C9r 1 D8 .lobytes %0000111111011000 +0015CAr 1 D9 .lobytes %0000111111011001 +0015CBr 1 DA .lobytes %0000111111011010 +0015CCr 1 DB .lobytes %0000111111011011 +0015CDr 1 DC .lobytes %0000111111011100 +0015CEr 1 DD .lobytes %0000111111011101 +0015CFr 1 DE .lobytes %0000111111011110 +0015D0r 1 DF .lobytes %0000111111011111 +0015D1r 1 E0 .lobytes %0000111111100000 +0015D2r 1 E1 .lobytes %0000111111100001 +0015D3r 1 E2 .lobytes %0000111111100010 +0015D4r 1 E3 .lobytes %0000111111100011 +0015D5r 1 E4 .lobytes %0000111111100100 +0015D6r 1 E5 .lobytes %0000111111100101 +0015D7r 1 E6 .lobytes %0000111111100110 +0015D8r 1 E7 .lobytes %0000111111100111 +0015D9r 1 E8 .lobytes %0000111111101000 +0015DAr 1 E9 .lobytes %0000111111101001 +0015DBr 1 EA .lobytes %0000111111101010 +0015DCr 1 EB .lobytes %0000111111101011 +0015DDr 1 EC .lobytes %0000111111101100 +0015DEr 1 ED .lobytes %0000111111101101 +0015DFr 1 EE .lobytes %0000111111101110 +0015E0r 1 EF .lobytes %0000111111101111 +0015E1r 1 F0 .lobytes %0000111111110000 +0015E2r 1 F1 .lobytes %0000111111110001 +0015E3r 1 F2 .lobytes %0000111111110010 +0015E4r 1 F3 .lobytes %0000111111110011 +0015E5r 1 F4 .lobytes %0000111111110100 +0015E6r 1 F5 .lobytes %0000111111110101 +0015E7r 1 F6 .lobytes %0000111111110110 +0015E8r 1 F7 .lobytes %0000111111110111 +0015E9r 1 F8 .lobytes %0000111111111000 +0015EAr 1 F9 .lobytes %0000111111111001 +0015EBr 1 FA .lobytes %0000111111111010 +0015ECr 1 FB .lobytes %0000111111111011 +0015EDr 1 FC .lobytes %0000111111111100 +0015EEr 1 FD .lobytes %0000111111111101 +0015EFr 1 FE .lobytes %0000111111111110 +0015F0r 1 FF .lobytes %0000111111111111 +0015F1r 1 00 .lobytes %0001000000000000 +0015F2r 1 01 .lobytes %0001000000000001 +0015F3r 1 02 .lobytes %0001000000000010 +0015F4r 1 03 .lobytes %0001000000000011 +0015F5r 1 04 .lobytes %0001000000000100 +0015F6r 1 05 .lobytes %0001000000000101 +0015F7r 1 06 .lobytes %0001000000000110 +0015F8r 1 07 .lobytes %0001000000000111 +0015F9r 1 08 .lobytes %0001000000001000 +0015FAr 1 F0 .lobytes %0111111111110000 +0015FBr 1 F1 .lobytes %0111111111110001 +0015FCr 1 F2 .lobytes %0111111111110010 +0015FDr 1 F3 .lobytes %0111111111110011 +0015FEr 1 F4 .lobytes %0111111111110100 +0015FFr 1 F5 .lobytes %0111111111110101 +001600r 1 F6 .lobytes %0111111111110110 +001601r 1 F7 .lobytes %0111111111110111 +001602r 1 F8 .lobytes %0111111111111000 +001603r 1 F9 .lobytes %0111111111111001 +001604r 1 FA .lobytes %0111111111111010 +001605r 1 FB .lobytes %0111111111111011 +001606r 1 FC .lobytes %0111111111111100 +001607r 1 FD .lobytes %0111111111111101 +001608r 1 FE .lobytes %0111111111111110 +001609r 1 FF .lobytes %0111111111111111 +00160Ar 1 00 .lobytes %1000000000000000 +00160Br 1 01 .lobytes %1000000000000001 +00160Cr 1 02 .lobytes %1000000000000010 +00160Dr 1 03 .lobytes %1000000000000011 +00160Er 1 04 .lobytes %1000000000000100 +00160Fr 1 05 .lobytes %1000000000000101 +001610r 1 06 .lobytes %1000000000000110 +001611r 1 07 .lobytes %1000000000000111 +001612r 1 08 .lobytes %1000000000001000 +001613r 1 09 .lobytes %1000000000001001 +001614r 1 0A .lobytes %1000000000001010 +001615r 1 0B .lobytes %1000000000001011 +001616r 1 E1 .lobytes %1001111111100001 +001617r 1 E2 .lobytes %1001111111100010 +001618r 1 E3 .lobytes %1001111111100011 +001619r 1 E4 .lobytes %1001111111100100 +00161Ar 1 E5 .lobytes %1001111111100101 +00161Br 1 E6 .lobytes %1001111111100110 +00161Cr 1 E7 .lobytes %1001111111100111 +00161Dr 1 E8 .lobytes %1001111111101000 +00161Er 1 E9 .lobytes %1001111111101001 +00161Fr 1 EA .lobytes %1001111111101010 +001620r 1 EB .lobytes %1001111111101011 +001621r 1 EC .lobytes %1001111111101100 +001622r 1 ED .lobytes %1001111111101101 +001623r 1 EE .lobytes %1001111111101110 +001624r 1 EF .lobytes %1001111111101111 +001625r 1 F0 .lobytes %1001111111110000 +001626r 1 F1 .lobytes %1001111111110001 +001627r 1 F2 .lobytes %1001111111110010 +001628r 1 F3 .lobytes %1001111111110011 +001629r 1 F4 .lobytes %1001111111110100 +00162Ar 1 F5 .lobytes %1001111111110101 +00162Br 1 F6 .lobytes %1001111111110110 +00162Cr 1 F7 .lobytes %1001111111110111 +00162Dr 1 F8 .lobytes %1001111111111000 +00162Er 1 F9 .lobytes %1001111111111001 +00162Fr 1 FA .lobytes %1001111111111010 +001630r 1 FB .lobytes %1001111111111011 +001631r 1 FC .lobytes %1001111111111100 +001632r 1 FD .lobytes %1001111111111101 +001633r 1 FE .lobytes %1001111111111110 +001634r 1 FF .lobytes %1001111111111111 +001635r 1 00 .lobytes %1010000000000000 +001636r 1 01 .lobytes %1010000000000001 +001637r 1 02 .lobytes %1010000000000010 +001638r 1 03 .lobytes %1010000000000011 +001639r 1 04 .lobytes %1010000000000100 +00163Ar 1 05 .lobytes %1010000000000101 +00163Br 1 06 .lobytes %1010000000000110 +00163Cr 1 07 .lobytes %1010000000000111 +00163Dr 1 08 .lobytes %1010000000001000 +00163Er 1 09 .lobytes %1010000000001001 +00163Fr 1 0A .lobytes %1010000000001010 +001640r 1 0B .lobytes %1010000000001011 +001641r 1 0C .lobytes %1010000000001100 +001642r 1 0D .lobytes %1010000000001101 +001643r 1 0E .lobytes %1010000000001110 +001644r 1 0F .lobytes %1010000000001111 +001645r 1 E1 .lobytes %1010111111100001 +001646r 1 E2 .lobytes %1010111111100010 +001647r 1 E3 .lobytes %1010111111100011 +001648r 1 E4 .lobytes %1010111111100100 +001649r 1 E5 .lobytes %1010111111100101 +00164Ar 1 E6 .lobytes %1010111111100110 +00164Br 1 E7 .lobytes %1010111111100111 +00164Cr 1 E8 .lobytes %1010111111101000 +00164Dr 1 E9 .lobytes %1010111111101001 +00164Er 1 EA .lobytes %1010111111101010 +00164Fr 1 EB .lobytes %1010111111101011 +001650r 1 EC .lobytes %1010111111101100 +001651r 1 ED .lobytes %1010111111101101 +001652r 1 EE .lobytes %1010111111101110 +001653r 1 EF .lobytes %1010111111101111 +001654r 1 F0 .lobytes %1010111111110000 +001655r 1 F1 .lobytes %1010111111110001 +001656r 1 F2 .lobytes %1010111111110010 +001657r 1 F3 .lobytes %1010111111110011 +001658r 1 F4 .lobytes %1010111111110100 +001659r 1 F5 .lobytes %1010111111110101 +00165Ar 1 F6 .lobytes %1010111111110110 +00165Br 1 F7 .lobytes %1010111111110111 +00165Cr 1 F8 .lobytes %1010111111111000 +00165Dr 1 F9 .lobytes %1010111111111001 +00165Er 1 FA .lobytes %1010111111111010 +00165Fr 1 FB .lobytes %1010111111111011 +001660r 1 FC .lobytes %1010111111111100 +001661r 1 FD .lobytes %1010111111111101 +001662r 1 FE .lobytes %1010111111111110 +001663r 1 FF .lobytes %1010111111111111 +001664r 1 00 .lobytes %1011000000000000 +001665r 1 01 .lobytes %1011000000000001 +001666r 1 02 .lobytes %1011000000000010 +001667r 1 03 .lobytes %1011000000000011 +001668r 1 04 .lobytes %1011000000000100 +001669r 1 05 .lobytes %1011000000000101 +00166Ar 1 06 .lobytes %1011000000000110 +00166Br 1 07 .lobytes %1011000000000111 +00166Cr 1 08 .lobytes %1011000000001000 +00166Dr 1 09 .lobytes %1011000000001001 +00166Er 1 0A .lobytes %1011000000001010 +00166Fr 1 0B .lobytes %1011000000001011 +001670r 1 0C .lobytes %1011000000001100 +001671r 1 0D .lobytes %1011000000001101 +001672r 1 0E .lobytes %1011000000001110 +001673r 1 0F .lobytes %1011000000001111 +001674r 1 E1 .lobytes %1011111111100001 +001675r 1 E2 .lobytes %1011111111100010 +001676r 1 E3 .lobytes %1011111111100011 +001677r 1 E4 .lobytes %1011111111100100 +001678r 1 E5 .lobytes %1011111111100101 +001679r 1 E6 .lobytes %1011111111100110 +00167Ar 1 E7 .lobytes %1011111111100111 +00167Br 1 E8 .lobytes %1011111111101000 +00167Cr 1 E9 .lobytes %1011111111101001 +00167Dr 1 EA .lobytes %1011111111101010 +00167Er 1 EB .lobytes %1011111111101011 +00167Fr 1 EC .lobytes %1011111111101100 +001680r 1 ED .lobytes %1011111111101101 +001681r 1 EE .lobytes %1011111111101110 +001682r 1 EF .lobytes %1011111111101111 +001683r 1 F0 .lobytes %1011111111110000 +001684r 1 F1 .lobytes %1011111111110001 +001685r 1 F2 .lobytes %1011111111110010 +001686r 1 F3 .lobytes %1011111111110011 +001687r 1 F4 .lobytes %1011111111110100 +001688r 1 F5 .lobytes %1011111111110101 +001689r 1 F6 .lobytes %1011111111110110 +00168Ar 1 F7 .lobytes %1011111111110111 +00168Br 1 F8 .lobytes %1011111111111000 +00168Cr 1 F9 .lobytes %1011111111111001 +00168Dr 1 FA .lobytes %1011111111111010 +00168Er 1 FB .lobytes %1011111111111011 +00168Fr 1 FC .lobytes %1011111111111100 +001690r 1 FD .lobytes %1011111111111101 +001691r 1 FE .lobytes %1011111111111110 +001692r 1 FF .lobytes %1011111111111111 +001693r 1 00 .lobytes %1100000000000000 +001694r 1 01 .lobytes %1100000000000001 +001695r 1 02 .lobytes %1100000000000010 +001696r 1 03 .lobytes %1100000000000011 +001697r 1 04 .lobytes %1100000000000100 +001698r 1 05 .lobytes %1100000000000101 +001699r 1 06 .lobytes %1100000000000110 +00169Ar 1 07 .lobytes %1100000000000111 +00169Br 1 08 .lobytes %1100000000001000 +00169Cr 1 09 .lobytes %1100000000001001 +00169Dr 1 0A .lobytes %1100000000001010 +00169Er 1 0B .lobytes %1100000000001011 +00169Fr 1 0C .lobytes %1100000000001100 +0016A0r 1 0D .lobytes %1100000000001101 +0016A1r 1 0E .lobytes %1100000000001110 +0016A2r 1 0F .lobytes %1100000000001111 +0016A3r 1 E1 .lobytes %1100111111100001 +0016A4r 1 E2 .lobytes %1100111111100010 +0016A5r 1 E3 .lobytes %1100111111100011 +0016A6r 1 E4 .lobytes %1100111111100100 +0016A7r 1 E5 .lobytes %1100111111100101 +0016A8r 1 E6 .lobytes %1100111111100110 +0016A9r 1 E7 .lobytes %1100111111100111 +0016AAr 1 E8 .lobytes %1100111111101000 +0016ABr 1 E9 .lobytes %1100111111101001 +0016ACr 1 EA .lobytes %1100111111101010 +0016ADr 1 EB .lobytes %1100111111101011 +0016AEr 1 EC .lobytes %1100111111101100 +0016AFr 1 ED .lobytes %1100111111101101 +0016B0r 1 EE .lobytes %1100111111101110 +0016B1r 1 EF .lobytes %1100111111101111 +0016B2r 1 F0 .lobytes %1100111111110000 +0016B3r 1 F1 .lobytes %1100111111110001 +0016B4r 1 F2 .lobytes %1100111111110010 +0016B5r 1 F3 .lobytes %1100111111110011 +0016B6r 1 F4 .lobytes %1100111111110100 +0016B7r 1 F5 .lobytes %1100111111110101 +0016B8r 1 F6 .lobytes %1100111111110110 +0016B9r 1 F7 .lobytes %1100111111110111 +0016BAr 1 F8 .lobytes %1100111111111000 +0016BBr 1 F9 .lobytes %1100111111111001 +0016BCr 1 FA .lobytes %1100111111111010 +0016BDr 1 FB .lobytes %1100111111111011 +0016BEr 1 FC .lobytes %1100111111111100 +0016BFr 1 FD .lobytes %1100111111111101 +0016C0r 1 FE .lobytes %1100111111111110 +0016C1r 1 FF .lobytes %1100111111111111 +0016C2r 1 00 .lobytes %1101000000000000 +0016C3r 1 01 .lobytes %1101000000000001 +0016C4r 1 02 .lobytes %1101000000000010 +0016C5r 1 03 .lobytes %1101000000000011 +0016C6r 1 04 .lobytes %1101000000000100 +0016C7r 1 05 .lobytes %1101000000000101 +0016C8r 1 06 .lobytes %1101000000000110 +0016C9r 1 07 .lobytes %1101000000000111 +0016CAr 1 08 .lobytes %1101000000001000 +0016CBr 1 09 .lobytes %1101000000001001 +0016CCr 1 0A .lobytes %1101000000001010 +0016CDr 1 0B .lobytes %1101000000001011 +0016CEr 1 0C .lobytes %1101000000001100 +0016CFr 1 0D .lobytes %1101000000001101 +0016D0r 1 0E .lobytes %1101000000001110 +0016D1r 1 0F .lobytes %1101000000001111 +0016D2r 1 E1 .lobytes %1101111111100001 +0016D3r 1 E2 .lobytes %1101111111100010 +0016D4r 1 E3 .lobytes %1101111111100011 +0016D5r 1 E4 .lobytes %1101111111100100 +0016D6r 1 E5 .lobytes %1101111111100101 +0016D7r 1 E6 .lobytes %1101111111100110 +0016D8r 1 E7 .lobytes %1101111111100111 +0016D9r 1 E8 .lobytes %1101111111101000 +0016DAr 1 E9 .lobytes %1101111111101001 +0016DBr 1 EA .lobytes %1101111111101010 +0016DCr 1 EB .lobytes %1101111111101011 +0016DDr 1 EC .lobytes %1101111111101100 +0016DEr 1 ED .lobytes %1101111111101101 +0016DFr 1 EE .lobytes %1101111111101110 +0016E0r 1 EF .lobytes %1101111111101111 +0016E1r 1 F0 .lobytes %1101111111110000 +0016E2r 1 F1 .lobytes %1101111111110001 +0016E3r 1 F2 .lobytes %1101111111110010 +0016E4r 1 F3 .lobytes %1101111111110011 +0016E5r 1 F4 .lobytes %1101111111110100 +0016E6r 1 F5 .lobytes %1101111111110101 +0016E7r 1 F6 .lobytes %1101111111110110 +0016E8r 1 F7 .lobytes %1101111111110111 +0016E9r 1 F8 .lobytes %1101111111111000 +0016EAr 1 F9 .lobytes %1101111111111001 +0016EBr 1 FA .lobytes %1101111111111010 +0016ECr 1 FB .lobytes %1101111111111011 +0016EDr 1 FC .lobytes %1101111111111100 +0016EEr 1 FD .lobytes %1101111111111101 +0016EFr 1 FE .lobytes %1101111111111110 +0016F0r 1 FF .lobytes %1101111111111111 +0016F1r 1 00 .lobytes %1110000000000000 +0016F2r 1 01 .lobytes %1110000000000001 +0016F3r 1 02 .lobytes %1110000000000010 +0016F4r 1 03 .lobytes %1110000000000011 +0016F5r 1 04 .lobytes %1110000000000100 +0016F6r 1 05 .lobytes %1110000000000101 +0016F7r 1 06 .lobytes %1110000000000110 +0016F8r 1 07 .lobytes %1110000000000111 +0016F9r 1 08 .lobytes %1110000000001000 +0016FAr 1 09 .lobytes %1110000000001001 +0016FBr 1 0A .lobytes %1110000000001010 +0016FCr 1 0B .lobytes %1110000000001011 +0016FDr 1 0C .lobytes %1110000000001100 +0016FEr 1 0D .lobytes %1110000000001101 +0016FFr 1 0E .lobytes %1110000000001110 +001700r 1 0F .lobytes %1110000000001111 +001701r 1 E1 .lobytes %1110111111100001 +001702r 1 E2 .lobytes %1110111111100010 +001703r 1 E3 .lobytes %1110111111100011 +001704r 1 E4 .lobytes %1110111111100100 +001705r 1 E5 .lobytes %1110111111100101 +001706r 1 E6 .lobytes %1110111111100110 +001707r 1 E7 .lobytes %1110111111100111 +001708r 1 E8 .lobytes %1110111111101000 +001709r 1 E9 .lobytes %1110111111101001 +00170Ar 1 EA .lobytes %1110111111101010 +00170Br 1 EB .lobytes %1110111111101011 +00170Cr 1 EC .lobytes %1110111111101100 +00170Dr 1 ED .lobytes %1110111111101101 +00170Er 1 EE .lobytes %1110111111101110 +00170Fr 1 EF .lobytes %1110111111101111 +001710r 1 F0 .lobytes %1110111111110000 +001711r 1 F1 .lobytes %1110111111110001 +001712r 1 F2 .lobytes %1110111111110010 +001713r 1 F3 .lobytes %1110111111110011 +001714r 1 F4 .lobytes %1110111111110100 +001715r 1 F5 .lobytes %1110111111110101 +001716r 1 F6 .lobytes %1110111111110110 +001717r 1 F7 .lobytes %1110111111110111 +001718r 1 F8 .lobytes %1110111111111000 +001719r 1 F9 .lobytes %1110111111111001 +00171Ar 1 FA .lobytes %1110111111111010 +00171Br 1 FB .lobytes %1110111111111011 +00171Cr 1 FC .lobytes %1110111111111100 +00171Dr 1 FD .lobytes %1110111111111101 +00171Er 1 FE .lobytes %1110111111111110 +00171Fr 1 FF .lobytes %1110111111111111 +001720r 1 00 .lobytes %1111000000000000 +001721r 1 01 .lobytes %1111000000000001 +001722r 1 02 .lobytes %1111000000000010 +001723r 1 03 .lobytes %1111000000000011 +001724r 1 04 .lobytes %1111000000000100 +001725r 1 05 .lobytes %1111000000000101 +001726r 1 06 .lobytes %1111000000000110 +001727r 1 07 .lobytes %1111000000000111 +001728r 1 08 .lobytes %1111000000001000 +001729r 1 09 .lobytes %1111000000001001 +00172Ar 1 0A .lobytes %1111000000001010 +00172Br 1 0B .lobytes %1111000000001011 +00172Cr 1 0C .lobytes %1111000000001100 +00172Dr 1 0D .lobytes %1111000000001101 +00172Er 1 0E .lobytes %1111000000001110 +00172Fr 1 0F .lobytes %1111000000001111 +001730r 1 E1 .lobytes %1111111111100001 +001731r 1 E2 .lobytes %1111111111100010 +001732r 1 E3 .lobytes %1111111111100011 +001733r 1 E4 .lobytes %1111111111100100 +001734r 1 E5 .lobytes %1111111111100101 +001735r 1 E6 .lobytes %1111111111100110 +001736r 1 E7 .lobytes %1111111111100111 +001737r 1 E8 .lobytes %1111111111101000 +001738r 1 E9 .lobytes %1111111111101001 +001739r 1 EA .lobytes %1111111111101010 +00173Ar 1 EB .lobytes %1111111111101011 +00173Br 1 EC .lobytes %1111111111101100 +00173Cr 1 ED .lobytes %1111111111101101 +00173Dr 1 EE .lobytes %1111111111101110 +00173Er 1 EF .lobytes %1111111111101111 +00173Fr 1 F0 .lobytes %1111111111110000 +001740r 1 F1 .lobytes %1111111111110001 +001741r 1 F2 .lobytes %1111111111110010 +001742r 1 F3 .lobytes %1111111111110011 +001743r 1 F4 .lobytes %1111111111110100 +001744r 1 F5 .lobytes %1111111111110101 +001745r 1 F6 .lobytes %1111111111110110 +001746r 1 F7 .lobytes %1111111111110111 +001747r 1 F8 .lobytes %1111111111111000 +001748r 1 F9 .lobytes %1111111111111001 +001749r 1 FA .lobytes %1111111111111010 +00174Ar 1 FB .lobytes %1111111111111011 +00174Br 1 FC .lobytes %1111111111111100 +00174Cr 1 FD .lobytes %1111111111111101 +00174Dr 1 FE .lobytes %1111111111111110 +00174Er 1 FF .lobytes %1111111111111111 +00174Fr 1 +00174Fr 1 ; multiple values on one line, decimal +00174Fr 1 00 01 02 03 .lobytes 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15 +001753r 1 04 05 06 07 +001757r 1 08 09 0A 0B +00175Fr 1 10 11 12 13 .lobytes 16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31 +001763r 1 14 15 16 17 +001767r 1 18 19 1A 1B +00176Fr 1 70 71 72 73 .lobytes 112,113,114,115,116,117,118,119,120,121,122,123,124,125,126,127 +001773r 1 74 75 76 77 +001777r 1 78 79 7A 7B +00177Fr 1 80 81 82 83 .lobytes 128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143 +001783r 1 84 85 86 87 +001787r 1 88 89 8A 8B +00178Fr 1 F0 F1 F2 F3 .lobytes 240,241,242,243,244,245,246,247,248,249,250,251,252,253,254,255 +001793r 1 F4 F5 F6 F7 +001797r 1 F8 F9 FA FB +00179Fr 1 00 01 02 03 .lobytes 256,257,258,259,260,261,262,263,264,265,266,267,268,269,270,271 +0017A3r 1 04 05 06 07 +0017A7r 1 08 09 0A 0B +0017AFr 1 E0 E1 E2 E3 .lobytes 4064,4065,4066,4067,4068,4069,4070,4071,4072,4073,4074,4075,4076,4077,4078,4079 +0017B3r 1 E4 E5 E6 E7 +0017B7r 1 E8 E9 EA EB +0017BFr 1 F0 F1 F2 F3 .lobytes 4080,4081,4082,4083,4084,4085,4086,4087,4088,4089,4090,4091,4092,4093,4094,4095 +0017C3r 1 F4 F5 F6 F7 +0017C7r 1 F8 F9 FA FB +0017CFr 1 00 01 02 03 .lobytes 4096,4097,4098,4099,4100,4101,4102,4103,4104,4105,4106,4107,4108,4109,4110,4111 +0017D3r 1 04 05 06 07 +0017D7r 1 08 09 0A 0B +0017DFr 1 F0 F1 F2 F3 .lobytes 32752,32753,32754,32755,32756,32757,32758,32759,32760,32761,32762,32763,32764,32765,32766,32767 +0017E3r 1 F4 F5 F6 F7 +0017E7r 1 F8 F9 FA FB +0017EFr 1 00 01 02 03 .lobytes 32768,32769,32770,32771,32772,32773,32774,32775,32776,32777,32778,32779,32780,32781,32782,32783 +0017F3r 1 04 05 06 07 +0017F7r 1 08 09 0A 0B +0017FFr 1 F0 F1 F2 F3 .lobytes 40944,40945,40946,40947,40948,40949,40950,40951,40952,40953,40954,40955,40956,40957,40958,40959 +001803r 1 F4 F5 F6 F7 +001807r 1 F8 F9 FA FB +00180Fr 1 00 01 02 03 .lobytes 40960,40961,40962,40963,40964,40965,40966,40967,40968,40969,40970,40971,40972,40973,40974,40975 +001813r 1 04 05 06 07 +001817r 1 08 09 0A 0B +00181Fr 1 F0 F1 F2 F3 .lobytes 45040,45041,45042,45043,45044,45045,45046,45047,45048,45049,45050,45051,45052,45053,45054,45055 +001823r 1 F4 F5 F6 F7 +001827r 1 F8 F9 FA FB +00182Fr 1 00 01 02 03 .lobytes 45056,45057,45058,45059,45060,45061,45062,45063,45064,45065,45066,45067,45068,45069,45070,45071 +001833r 1 04 05 06 07 +001837r 1 08 09 0A 0B +00183Fr 1 F0 F1 F2 F3 .lobytes 49136,49137,49138,49139,49140,49141,49142,49143,49144,49145,49146,49147,49148,49149,49150,49151 +001843r 1 F4 F5 F6 F7 +001847r 1 F8 F9 FA FB +00184Fr 1 00 01 02 03 .lobytes 49152,49153,49154,49155,49156,49157,49158,49159,49160,49161,49162,49163,49164,49165,49166,49167 +001853r 1 04 05 06 07 +001857r 1 08 09 0A 0B +00185Fr 1 F0 F1 F2 F3 .lobytes 53232,53233,53234,53235,53236,53237,53238,53239,53240,53241,53242,53243,53244,53245,53246,53247 +001863r 1 F4 F5 F6 F7 +001867r 1 F8 F9 FA FB +00186Fr 1 00 01 02 03 .lobytes 53248,53249,53250,53251,53252,53253,53254,53255,53256,53257,53258,53259,53260,53261,53262,53263 +001873r 1 04 05 06 07 +001877r 1 08 09 0A 0B +00187Fr 1 F0 F1 F2 F3 .lobytes 57328,57329,57330,57331,57332,57333,57334,57335,57336,57337,57338,57339,57340,57341,57342,57343 +001883r 1 F4 F5 F6 F7 +001887r 1 F8 F9 FA FB +00188Fr 1 00 01 02 03 .lobytes 57344,57345,57346,57347,57348,57349,57350,57351,57352,57353,57354,57355,57356,57357,57358,57359 +001893r 1 04 05 06 07 +001897r 1 08 09 0A 0B +00189Fr 1 F0 F1 F2 F3 .lobytes 61424,61425,61426,61427,61428,61429,61430,61431,61432,61433,61434,61435,61436,61437,61438,61439 +0018A3r 1 F4 F5 F6 F7 +0018A7r 1 F8 F9 FA FB +0018AFr 1 00 01 02 03 .lobytes 61440,61441,61442,61443,61444,61445,61446,61447,61448,61449,61450,61451,61452,61453,61454,61455 +0018B3r 1 04 05 06 07 +0018B7r 1 08 09 0A 0B +0018BFr 1 F0 F1 F2 F3 .lobytes 65520,65521,65522,65523,65524,65525,65526,65527,65528,65529,65530,65531,65532,65533,65534,65535 +0018C3r 1 F4 F5 F6 F7 +0018C7r 1 F8 F9 FA FB +0018CFr 1 +0018CFr 1 ; multiple values on one line, hex +0018CFr 1 00 01 02 03 .lobytes $0,$1,$2,$3,$4,$5,$6,$7,$8,$9,$a,$b,$c,$d,$e,$f +0018D3r 1 04 05 06 07 +0018D7r 1 08 09 0A 0B +0018DFr 1 10 11 12 13 .lobytes $10,$11,$12,$13,$14,$15,$16,$17,$18,$19,$1a,$1b,$1c,$1d,$1e,$1f +0018E3r 1 14 15 16 17 +0018E7r 1 18 19 1A 1B +0018EFr 1 70 71 72 73 .lobytes $70,$71,$72,$73,$74,$75,$76,$77,$78,$79,$7a,$7b,$7c,$7d,$7e,$7f +0018F3r 1 74 75 76 77 +0018F7r 1 78 79 7A 7B +0018FFr 1 80 81 82 83 .lobytes $80,$81,$82,$83,$84,$85,$86,$87,$88,$89,$8a,$8b,$8c,$8d,$8e,$8f +001903r 1 84 85 86 87 +001907r 1 88 89 8A 8B +00190Fr 1 F0 F1 F2 F3 .lobytes $f0,$f1,$f2,$f3,$f4,$f5,$f6,$f7,$f8,$f9,$fa,$fb,$fc,$fd,$fe,$ff +001913r 1 F4 F5 F6 F7 +001917r 1 F8 F9 FA FB +00191Fr 1 00 01 02 03 .lobytes $100,$101,$102,$103,$104,$105,$106,$107,$108,$109,$10a,$10b,$10c,$10d,$10e,$10f +001923r 1 04 05 06 07 +001927r 1 08 09 0A 0B +00192Fr 1 E0 E1 E2 E3 .lobytes $fe0,$fe1,$fe2,$fe3,$fe4,$fe5,$fe6,$fe7,$fe8,$fe9,$fea,$feb,$fec,$fed,$fee,$fef +001933r 1 E4 E5 E6 E7 +001937r 1 E8 E9 EA EB +00193Fr 1 F0 F1 F2 F3 .lobytes $ff0,$ff1,$ff2,$ff3,$ff4,$ff5,$ff6,$ff7,$ff8,$ff9,$ffa,$ffb,$ffc,$ffd,$ffe,$fff +001943r 1 F4 F5 F6 F7 +001947r 1 F8 F9 FA FB +00194Fr 1 00 01 02 03 .lobytes $1000,$1001,$1002,$1003,$1004,$1005,$1006,$1007,$1008,$1009,$100a,$100b,$100c,$100d,$100e,$100f +001953r 1 04 05 06 07 +001957r 1 08 09 0A 0B +00195Fr 1 F0 F1 F2 F3 .lobytes $7ff0,$7ff1,$7ff2,$7ff3,$7ff4,$7ff5,$7ff6,$7ff7,$7ff8,$7ff9,$7ffa,$7ffb,$7ffc,$7ffd,$7ffe,$7fff +001963r 1 F4 F5 F6 F7 +001967r 1 F8 F9 FA FB +00196Fr 1 00 01 02 03 .lobytes $8000,$8001,$8002,$8003,$8004,$8005,$8006,$8007,$8008,$8009,$800a,$800b,$800c,$800d,$800e,$800f +001973r 1 04 05 06 07 +001977r 1 08 09 0A 0B +00197Fr 1 F0 F1 F2 F3 .lobytes $9ff0,$9ff1,$9ff2,$9ff3,$9ff4,$9ff5,$9ff6,$9ff7,$9ff8,$9ff9,$9ffa,$9ffb,$9ffc,$9ffd,$9ffe,$9fff +001983r 1 F4 F5 F6 F7 +001987r 1 F8 F9 FA FB +00198Fr 1 00 01 02 03 .lobytes $a000,$a001,$a002,$a003,$a004,$a005,$a006,$a007,$a008,$a009,$a00a,$a00b,$a00c,$a00d,$a00e,$a00f +001993r 1 04 05 06 07 +001997r 1 08 09 0A 0B +00199Fr 1 F0 F1 F2 F3 .lobytes $aff0,$aff1,$aff2,$aff3,$aff4,$aff5,$aff6,$aff7,$aff8,$aff9,$affa,$affb,$affc,$affd,$affe,$afff +0019A3r 1 F4 F5 F6 F7 +0019A7r 1 F8 F9 FA FB +0019AFr 1 00 01 02 03 .lobytes $b000,$b001,$b002,$b003,$b004,$b005,$b006,$b007,$b008,$b009,$b00a,$b00b,$b00c,$b00d,$b00e,$b00f +0019B3r 1 04 05 06 07 +0019B7r 1 08 09 0A 0B +0019BFr 1 F0 F1 F2 F3 .lobytes $bff0,$bff1,$bff2,$bff3,$bff4,$bff5,$bff6,$bff7,$bff8,$bff9,$bffa,$bffb,$bffc,$bffd,$bffe,$bfff +0019C3r 1 F4 F5 F6 F7 +0019C7r 1 F8 F9 FA FB +0019CFr 1 00 01 02 03 .lobytes $c000,$c001,$c002,$c003,$c004,$c005,$c006,$c007,$c008,$c009,$c00a,$c00b,$c00c,$c00d,$c00e,$c00f +0019D3r 1 04 05 06 07 +0019D7r 1 08 09 0A 0B +0019DFr 1 F0 F1 F2 F3 .lobytes $cff0,$cff1,$cff2,$cff3,$cff4,$cff5,$cff6,$cff7,$cff8,$cff9,$cffa,$cffb,$cffc,$cffd,$cffe,$cfff +0019E3r 1 F4 F5 F6 F7 +0019E7r 1 F8 F9 FA FB +0019EFr 1 00 01 02 03 .lobytes $d000,$d001,$d002,$d003,$d004,$d005,$d006,$d007,$d008,$d009,$d00a,$d00b,$d00c,$d00d,$d00e,$d00f +0019F3r 1 04 05 06 07 +0019F7r 1 08 09 0A 0B +0019FFr 1 F0 F1 F2 F3 .lobytes $dff0,$dff1,$dff2,$dff3,$dff4,$dff5,$dff6,$dff7,$dff8,$dff9,$dffa,$dffb,$dffc,$dffd,$dffe,$dfff +001A03r 1 F4 F5 F6 F7 +001A07r 1 F8 F9 FA FB +001A0Fr 1 00 01 02 03 .lobytes $e000,$e001,$e002,$e003,$e004,$e005,$e006,$e007,$e008,$e009,$e00a,$e00b,$e00c,$e00d,$e00e,$e00f +001A13r 1 04 05 06 07 +001A17r 1 08 09 0A 0B +001A1Fr 1 F0 F1 F2 F3 .lobytes $eff0,$eff1,$eff2,$eff3,$eff4,$eff5,$eff6,$eff7,$eff8,$eff9,$effa,$effb,$effc,$effd,$effe,$efff +001A23r 1 F4 F5 F6 F7 +001A27r 1 F8 F9 FA FB +001A2Fr 1 00 01 02 03 .lobytes $f000,$f001,$f002,$f003,$f004,$f005,$f006,$f007,$f008,$f009,$f00a,$f00b,$f00c,$f00d,$f00e,$f00f +001A33r 1 04 05 06 07 +001A37r 1 08 09 0A 0B +001A3Fr 1 F0 F1 F2 F3 .lobytes $fff0,$fff1,$fff2,$fff3,$fff4,$fff5,$fff6,$fff7,$fff8,$fff9,$fffa,$fffb,$fffc,$fffd,$fffe,$ffff +001A43r 1 F4 F5 F6 F7 +001A47r 1 F8 F9 FA FB +001A4Fr 1 +001A4Fr 1 ; multiple values on one line, alternative hex +001A4Fr 1 00 01 02 03 .lobytes 0h,1h,2h,3h,4h,5h,6h,7h,8h,9h,0ah,0bh,0ch,0dh,0eh,0fh +001A53r 1 04 05 06 07 +001A57r 1 08 09 0A 0B +001A5Fr 1 10 11 12 13 .lobytes 10h,11h,12h,13h,14h,15h,16h,17h,18h,19h,1ah,1bh,1ch,1dh,1eh,1fh +001A63r 1 14 15 16 17 +001A67r 1 18 19 1A 1B +001A6Fr 1 70 71 72 73 .lobytes 70h,71h,72h,73h,74h,75h,76h,77h,78h,79h,7ah,7bh,7ch,7dh,7eh,7fh +001A73r 1 74 75 76 77 +001A77r 1 78 79 7A 7B +001A7Fr 1 80 81 82 83 .lobytes 80h,81h,82h,83h,84h,85h,86h,87h,88h,89h,8ah,8bh,8ch,8dh,8eh,8fh +001A83r 1 84 85 86 87 +001A87r 1 88 89 8A 8B +001A8Fr 1 F0 F1 F2 F3 .lobytes 0f0h,0f1h,0f2h,0f3h,0f4h,0f5h,0f6h,0f7h,0f8h,0f9h,0fah,0fbh,0fch,0fdh,0feh,0ffh +001A93r 1 F4 F5 F6 F7 +001A97r 1 F8 F9 FA FB +001A9Fr 1 00 01 02 03 .lobytes 100h,101h,102h,103h,104h,105h,106h,107h,108h,109h,10ah,10bh,10ch,10dh,10eh,10fh +001AA3r 1 04 05 06 07 +001AA7r 1 08 09 0A 0B +001AAFr 1 E0 E1 E2 E3 .lobytes 0fe0h,0fe1h,0fe2h,0fe3h,0fe4h,0fe5h,0fe6h,0fe7h,0fe8h,0fe9h,0feah,0febh,0fech,0fedh,0feeh,0fefh +001AB3r 1 E4 E5 E6 E7 +001AB7r 1 E8 E9 EA EB +001ABFr 1 F0 F1 F2 F3 .lobytes 0ff0h,0ff1h,0ff2h,0ff3h,0ff4h,0ff5h,0ff6h,0ff7h,0ff8h,0ff9h,0ffah,0ffbh,0ffch,0ffdh,0ffeh,0fffh +001AC3r 1 F4 F5 F6 F7 +001AC7r 1 F8 F9 FA FB +001ACFr 1 00 01 02 03 .lobytes 1000h,1001h,1002h,1003h,1004h,1005h,1006h,1007h,1008h,1009h,100ah,100bh,100ch,100dh,100eh,100fh +001AD3r 1 04 05 06 07 +001AD7r 1 08 09 0A 0B +001ADFr 1 F0 F1 F2 F3 .lobytes 7ff0h,7ff1h,7ff2h,7ff3h,7ff4h,7ff5h,7ff6h,7ff7h,7ff8h,7ff9h,7ffah,7ffbh,7ffch,7ffdh,7ffeh,7fffh +001AE3r 1 F4 F5 F6 F7 +001AE7r 1 F8 F9 FA FB +001AEFr 1 00 01 02 03 .lobytes 8000h,8001h,8002h,8003h,8004h,8005h,8006h,8007h,8008h,8009h,800ah,800bh,800ch,800dh,800eh,800fh +001AF3r 1 04 05 06 07 +001AF7r 1 08 09 0A 0B +001AFFr 1 F0 F1 F2 F3 .lobytes 9ff0h,9ff1h,9ff2h,9ff3h,9ff4h,9ff5h,9ff6h,9ff7h,9ff8h,9ff9h,9ffah,9ffbh,9ffch,9ffdh,9ffeh,9fffh +001B03r 1 F4 F5 F6 F7 +001B07r 1 F8 F9 FA FB +001B0Fr 1 00 01 02 03 .lobytes 0a000h,0a001h,0a002h,0a003h,0a004h,0a005h,0a006h,0a007h,0a008h,0a009h,0a00ah,0a00bh,0a00ch,0a00dh,0a00eh,0a00fh +001B13r 1 04 05 06 07 +001B17r 1 08 09 0A 0B +001B1Fr 1 F0 F1 F2 F3 .lobytes 0aff0h,0aff1h,0aff2h,0aff3h,0aff4h,0aff5h,0aff6h,0aff7h,0aff8h,0aff9h,0affah,0affbh,0affch,0affdh,0affeh,0afffh +001B23r 1 F4 F5 F6 F7 +001B27r 1 F8 F9 FA FB +001B2Fr 1 00 01 02 03 .lobytes 0b000h,0b001h,0b002h,0b003h,0b004h,0b005h,0b006h,0b007h,0b008h,0b009h,0b00ah,0b00bh,0b00ch,0b00dh,0b00eh,0b00fh +001B33r 1 04 05 06 07 +001B37r 1 08 09 0A 0B +001B3Fr 1 F0 F1 F2 F3 .lobytes 0bff0h,0bff1h,0bff2h,0bff3h,0bff4h,0bff5h,0bff6h,0bff7h,0bff8h,0bff9h,0bffah,0bffbh,0bffch,0bffdh,0bffeh,0bfffh +001B43r 1 F4 F5 F6 F7 +001B47r 1 F8 F9 FA FB +001B4Fr 1 00 01 02 03 .lobytes 0c000h,0c001h,0c002h,0c003h,0c004h,0c005h,0c006h,0c007h,0c008h,0c009h,0c00ah,0c00bh,0c00ch,0c00dh,0c00eh,0c00fh +001B53r 1 04 05 06 07 +001B57r 1 08 09 0A 0B +001B5Fr 1 F0 F1 F2 F3 .lobytes 0cff0h,0cff1h,0cff2h,0cff3h,0cff4h,0cff5h,0cff6h,0cff7h,0cff8h,0cff9h,0cffah,0cffbh,0cffch,0cffdh,0cffeh,0cfffh +001B63r 1 F4 F5 F6 F7 +001B67r 1 F8 F9 FA FB +001B6Fr 1 00 01 02 03 .lobytes 0d000h,0d001h,0d002h,0d003h,0d004h,0d005h,0d006h,0d007h,0d008h,0d009h,0d00ah,0d00bh,0d00ch,0d00dh,0d00eh,0d00fh +001B73r 1 04 05 06 07 +001B77r 1 08 09 0A 0B +001B7Fr 1 F0 F1 F2 F3 .lobytes 0dff0h,0dff1h,0dff2h,0dff3h,0dff4h,0dff5h,0dff6h,0dff7h,0dff8h,0dff9h,0dffah,0dffbh,0dffch,0dffdh,0dffeh,0dfffh +001B83r 1 F4 F5 F6 F7 +001B87r 1 F8 F9 FA FB +001B8Fr 1 00 01 02 03 .lobytes 0e000h,0e001h,0e002h,0e003h,0e004h,0e005h,0e006h,0e007h,0e008h,0e009h,0e00ah,0e00bh,0e00ch,0e00dh,0e00eh,0e00fh +001B93r 1 04 05 06 07 +001B97r 1 08 09 0A 0B +001B9Fr 1 F0 F1 F2 F3 .lobytes 0eff0h,0eff1h,0eff2h,0eff3h,0eff4h,0eff5h,0eff6h,0eff7h,0eff8h,0eff9h,0effah,0effbh,0effch,0effdh,0effeh,0efffh +001BA3r 1 F4 F5 F6 F7 +001BA7r 1 F8 F9 FA FB +001BAFr 1 00 01 02 03 .lobytes 0f000h,0f001h,0f002h,0f003h,0f004h,0f005h,0f006h,0f007h,0f008h,0f009h,0f00ah,0f00bh,0f00ch,0f00dh,0f00eh,0f00fh +001BB3r 1 04 05 06 07 +001BB7r 1 08 09 0A 0B +001BBFr 1 F0 F1 F2 F3 .lobytes 0fff0h,0fff1h,0fff2h,0fff3h,0fff4h,0fff5h,0fff6h,0fff7h,0fff8h,0fff9h,0fffah,0fffbh,0fffch,0fffdh,0fffeh,0ffffh +001BC3r 1 F4 F5 F6 F7 +001BC7r 1 F8 F9 FA FB +001BCFr 1 +001BCFr 1 ; mix some variants +001BCFr 1 0B 11 03 11 .lobytes 11,$11,%11,11h,'a','b','z','A','Z','0','9',0aah,$aa,$aA,$aB,0fEh +001BD3r 1 61 62 7A 41 +001BD7r 1 5A 30 39 AA +001BDEr 1 diff --git a/test/asm/opcodes/4510-opcodes.ref b/test/asm/opcodes/4510-opcodes.ref new file mode 100644 index 000000000..b65b12e61 Binary files /dev/null and b/test/asm/opcodes/4510-opcodes.ref differ diff --git a/test/asm/opcodes/4510-opcodes.s b/test/asm/opcodes/4510-opcodes.s new file mode 100644 index 000000000..3d6805674 --- /dev/null +++ b/test/asm/opcodes/4510-opcodes.s @@ -0,0 +1,278 @@ +.setcpu "4510" + + brk + ora ($05,x) + cle + see + tsb $02 + ora $02 + asl $02 + rmb0 $02 + php + ora #$01 + asl + tsy + tsb $1234 + ora $1234 + asl $1234 + bbr0 $02,*+$34 + + bpl *+$32 + ora ($06),y + ora ($07),z + lbpl *+$3133 ; bpl *+$3133 + trb $02 + ora $03,x + asl $03,x + rmb1 $02 + clc + ora $1456,y + inc + inz + trb $1234 + ora $1345,x + asl $1345,x + bbr1 $02,*+$34 + + jsr $1234 + and ($05,x) + jsr ($2345) + jsr ($2456,x) + bit $02 + and $02 + rol $02 + rmb2 $02 + plp + and #$01 + rol + tys + bit $1234 + and $1234 + rol $1234 + bbr2 $02,*+$34 + + bmi *+$32 + and ($06),y + and ($07),z + lbmi *+$3133 ; bmi *+$3133 + bit $03,x + and $03,x + rol $03,x + rmb3 $02 + sec + and $1456,y + dec + dez + bit $1345,x + and $1345,x + rol $1345,x + bbr3 $02,*+$34 + + rti + eor ($05,x) + neg + asr + asr $02 + eor $02 + lsr $02 + rmb4 $02 + pha + eor #$01 + lsr + taz + jmp $1234 + eor $1234 + lsr $1234 + bbr4 $02,*+$34 + + bvc *+$32 + eor ($06),y + eor ($07),z + lbvc *+$3133 ; bvc *+$3133 + asr $03,x + eor $03,x + lsr $03,x + rmb5 $02 + cli + eor $1456,y + phy + tab + map + eor $1345,x + lsr $1345,x + bbr5 $02,*+$34 + + rts + adc ($05,x) + rtn #$09 + bsr *+$3133 + stz $02 + adc $02 + ror $02 + rmb6 $02 + pla + adc #$01 + ror + tza + jmp ($2345) + adc $1234 + ror $1234 + bbr6 $02,*+$34 + + bvs *+$32 + adc ($06),y + adc ($07),z + lbvs *+$3133 ; bvs *+$3133 + stz $03,x + adc $03,x + ror $03,x + rmb7 $02 + sei + adc $1456,y + ply + tba + jmp ($2456,x) + adc $1345,x + ror $1345,x + bbr7 $02,*+$34 + + bra *+$32 + sta ($05,x) + sta ($0f,s),y + sta ($0f,sp),y + lbra *+$3133 ; bra *+$3133 + sty $02 + sta $02 + stx $02 + smb0 $02 + dey + bit #$01 + txa + sty $1345,x + sty $1234 + sta $1234 + stx $1234 + bbs0 $02,*+$34 + + bcc *+$32 + sta ($06),y + sta ($07),z + lbcc *+$3133 ; bcc *+$3133 + sty $03,x + sta $03,x + stx $04,y + smb1 $02 + tya + sta $1456,y + txs + stx $1456,y + stz $1234 + sta $1345,x + stz $1345,x + bbs1 $02,*+$34 + + ldy #$01 + lda ($05,x) + ldx #$01 + ldz #$01 + ldy $02 + lda $02 + ldx $02 + smb2 $02 + tay + lda #$01 + tax + ldz $1234 + ldy $1234 + lda $1234 + ldx $1234 + bbs2 $02,*+$34 + + bcs *+$32 + lda ($06),y + lda ($07),z + lbcs *+$3133 ; bcs *+$3133 + ldy $03,x + lda $03,x + ldx $04,y + smb3 $02 + clv + lda $1456,y + tsx + ldz $1345,x + ldy $1345,x + lda $1345,x + ldx $1456,y + bbs3 $02,*+$34 + + cpy #$01 + cmp ($05,x) + cpz #$01 + dew $02 + cpy $02 + cmp $02 + dec $02 + smb4 $02 + iny + cmp #$01 + dex + asw $1234 + cpy $1234 + cmp $1234 + dec $1234 + bbs4 $02,*+$34 + + bne *+$32 + cmp ($06),y + cmp ($07),z + lbne *+$3133 ; bne *+$3133 + cpz $02 + cmp $03,x + dec $03,x + smb5 $02 + cld + cmp $1456,y + phx + phz + cpz $1234 + cmp $1345,x + dec $1345,x + bbs5 $02,*+$34 + + cpx #$01 + sbc ($05,x) + lda ($0f,s),y + lda ($0f,sp),y + inw $02 + cpx $02 + sbc $02 + inc $02 + smb6 $02 + inx + sbc #$01 + eom + nop + row $1234 + cpx $1234 + sbc $1234 + inc $1234 + bbs6 $02,*+$34 + + beq *+$32 + sbc ($06),y + sbc ($07),z + lbeq *+$3133 ; beq *+$3133 + phd #$089a + phw #$089a + sbc $03,x + inc $03,x + smb7 $02 + sed + sbc $1456,y + plx + plz + phd $1234 + phw $1234 + sbc $1345,x + inc $1345,x + bbs7 $02,*+$34 diff --git a/test/asm/opcodes/6502-opcodes.ref b/test/asm/opcodes/6502-opcodes.ref new file mode 100644 index 000000000..c12fa8fd6 Binary files /dev/null and b/test/asm/opcodes/6502-opcodes.ref differ diff --git a/test/asm/opcodes/6502-opcodes.s b/test/asm/opcodes/6502-opcodes.s new file mode 100644 index 000000000..5cb94c29f --- /dev/null +++ b/test/asm/opcodes/6502-opcodes.s @@ -0,0 +1,257 @@ +.setcpu "6502" + + brk + ora ($12,x) + .byte $02 + .byte $03 + .byte $04 + ora $12 + asl $12 + .byte $07 + php + ora #$12 + asl a + .byte $0B + .byte $0C + ora $3456 + asl $3456 + .byte $0F + bpl *+122 + ora ($12),y + .byte $12 + .byte $13 + .byte $14 + ora $12,x + asl $12,x + .byte $17 + clc + ora $3456,y + .byte $1A + .byte $1B + .byte $1C + ora $3456,x + asl $3456,x + .byte $1F + jsr $3456 + and ($12,x) + .byte $22 + .byte $23 + bit $12 + and $12 + rol $12 + .byte $27 + plp + and #$12 + rol a + .byte $2B + bit $3456 + and $3456 + rol $3456 + .byte $2F + bmi *+122 + and ($12),y + .byte $32 + .byte $33 + .byte $34 + and $12,x + rol $12,x + .byte $37 + sec + and $3456,y + .byte $3A + .byte $3B + .byte $3C + and $3456,x + rol $3456,x + .byte $3F + rti + eor ($12,x) + .byte $42 + .byte $43 + .byte $44 + eor $12 + lsr $12 + .byte $47 + pha + eor #$12 + lsr a + .byte $4B + jmp $3456 + eor $3456 + lsr $3456 + .byte $4F + bvc *+122 + eor ($12),y + .byte $52 + .byte $53 + .byte $54 + eor $12,x + lsr $12,x + .byte $57 + cli + eor $3456,y + .byte $5A + .byte $5B + .byte $5C + eor $3456,x + lsr $3456,x + .byte $5F + rts + adc ($12,x) + .byte $62 + .byte $63 + .byte $64 + adc $12 + ror $12 + .byte $67 + pla + adc #$12 + ror a + .byte $6B + jmp ($3456) + adc $3456 + ror $3456 + .byte $6F + bvs *+122 + adc ($12),y + .byte $72 + .byte $73 + .byte $74 + adc $12,x + ror $12,x + .byte $77 + sei + adc $3456,y + .byte $7A + .byte $7B + .byte $7C + adc $3456,x + ror $3456,x + .byte $7F + .byte $80 + sta ($12,x) + .byte $82 + .byte $83 + sty $12 + sta $12 + stx $12 + .byte $87 + dey + .byte $89 + txa + .byte $8B + sty $3456 + sta $3456 + stx $3456 + .byte $8F + bcc *+122 + sta ($12),y + .byte $92 + .byte $93 + sty $12,x + sta $12,x + stx $12,y + .byte $97 + tya + sta $3456,y + txs + .byte $9B + .byte $9C + sta $3456,x + .byte $9E + .byte $9F + ldy #$12 + lda ($12,x) + ldx #$12 + .byte $A3 + ldy $12 + lda $12 + ldx $12 + .byte $A7 + tay + lda #$12 + tax + .byte $AB + ldy $3456 + lda $3456 + ldx $3456 + .byte $AF + bcs *+122 + lda ($12),y + .byte $B2 + .byte $B3 + ldy $12,x + lda $12,x + ldx $12,y + .byte $B7 + clv + lda $3456,y + tsx + .byte $BB + ldy $3456,x + lda $3456,x + ldx $3456,y + .byte $BF + cpy #$12 + cmp ($12,x) + .byte $C2 + .byte $C3 + cpy $12 + cmp $12 + dec $12 + .byte $C7 + iny + cmp #$12 + dex + .byte $CB + cpy $3456 + cmp $3456 + dec $3456 + .byte $CF + bne *+122 + cmp ($12),y + .byte $D2 + .byte $D3 + .byte $D4 + cmp $12,x + dec $12,x + .byte $D7 + cld + cmp $3456,y + .byte $DA + .byte $DB + .byte $DC + cmp $3456,x + dec $3456,x + .byte $DF + cpx #$12 + sbc ($12,x) + .byte $E2 + .byte $E3 + cpx $12 + sbc $12 + inc $12 + .byte $E7 + inx + sbc #$12 + .byte $EB + cpx $3456 + sbc $3456 + inc $3456 + .byte $EF + beq *+122 + sbc ($12),y + .byte $F2 + .byte $F3 + .byte $F4 + sbc $12,x + inc $12,x + .byte $F7 + sed + sbc $3456,y + .byte $FA + .byte $FB + .byte $FC + sbc $3456,x + inc $3456,x + .byte $FF diff --git a/test/asm/opcodes/6502dtv-opcodes.ref b/test/asm/opcodes/6502dtv-opcodes.ref new file mode 100644 index 000000000..408d89be2 Binary files /dev/null and b/test/asm/opcodes/6502dtv-opcodes.ref differ diff --git a/test/asm/opcodes/6502dtv-opcodes.s b/test/asm/opcodes/6502dtv-opcodes.s new file mode 100644 index 000000000..f2446cbe0 --- /dev/null +++ b/test/asm/opcodes/6502dtv-opcodes.s @@ -0,0 +1,258 @@ +.setcpu "6502DTV" + + brk + ora ($12,x) + .byte $02 + .byte $03 + nop $12 + ora $12 + asl $12 + .byte $07 + php + ora #$12 + asl a + anc #$12 + nop $3456 + ora $3456 + asl $3456 + .byte $0f + bpl *+122 + ora ($12),y + bra *+122 + .byte $13 + nop $12,x + ora $12,x + asl $12,x + .byte $17 + clc + ora $3456,y + .byte $1a ; nop + .byte $1b + nop $3456,x + ora $3456,x + asl $3456,x + .byte $1f + jsr $3456 + and ($12,x) + .byte $22 + rla ($12,x) + bit $12 + and $12 + rol $12 + rla $12 + plp + and #$12 + rol a + .byte $2b,$12 ; anc #$12 + bit $3456 + and $3456 + rol $3456 + rla $3456 + bmi *+122 + and ($12),y + sac #$12 + rla ($12),y + .byte $34,$12 ; nop $12,x + and $12,x + rol $12,x + rla $12,x + sec + and $3456,y + .byte $3a ; nop + rla $3456,y + .byte $3c,$56,$34 ; nop $3456,x + and $3456,x + rol $3456,x + rla $3456,x + rti + eor ($12,x) + sir #$12 + .byte $43 + .byte $44,$12 ; nop $12 + eor $12 + lsr $12 + .byte $47 + pha + eor #$12 + lsr a + alr #$12 + jmp $3456 + eor $3456 + lsr $3456 + .byte $4f + bvc *+122 + eor ($12),y + .byte $52 + .byte $53 + .byte $54,$12 ; nop $12,x + eor $12,x + lsr $12,x + .byte $57 + cli + eor $3456,y + .byte $5a ; nop + .byte $5b + .byte $5c,$56,$34 ; nop $3456,x + eor $3456,x + lsr $3456,x + .byte $5f + rts + adc ($12,x) + .byte $62 + rra ($12,x) + .byte $64,$12 ; nop $12 + adc $12 + ror $12 + rra $12 + pla + adc #$12 + ror a + arr #$12 + jmp ($3456) + adc $3456 + ror $3456 + rra $3456 + bvs *+122 + adc ($12),y + .byte $72 + rra ($12),y + .byte $74,$12 ; nop $12,x + adc $12,x + ror $12,x + rra $12,x + sei + adc $3456,y + .byte $7a ; nop + rra $3456,y + .byte $7c,$56,$34 ; nop $3456,x + adc $3456,x + ror $3456,x + rra $3456,x + nop #$12 + sta ($12,x) + .byte $82,$12 ; nop #$12 + .byte $83 + sty $12 + sta $12 + stx $12 + .byte $87 + dey + .byte $89,$12 ; nop #$12 + txa + .byte $8b + sty $3456 + sta $3456 + stx $3456 + .byte $8f + bcc *+122 + sta ($12),y + .byte $92 + .byte $93 + sty $12,x + sta $12,x + stx $12,y + .byte $97 + tya + sta $3456,y + txs + .byte $9b + shy $3456,x + sta $3456,x + shx $3456,y + .byte $9f + ldy #$12 + lda ($12,x) + ldx #$12 + lax ($12,x) + ldy $12 + lda $12 + ldx $12 + lax $12 + tay + lda #$12 + tax + lax #$12 + ldy $3456 + lda $3456 + ldx $3456 + lax $3456 + bcs *+122 + lda ($12),y + .byte $b2 + lax ($12),y + ldy $12,x + lda $12,x + ldx $12,y + lax $12,y + clv + lda $3456,y + tsx + las $3456,y + ldy $3456,x + lda $3456,x + ldx $3456,y + lax $3456,y + cpy #$12 + cmp ($12,x) + .byte $c2,$12 ; nop #$12 + .byte $c3 + cpy $12 + cmp $12 + dec $12 + .byte $c7 + iny + cmp #$12 + dex + axs #$12 + cpy $3456 + cmp $3456 + dec $3456 + .byte $cf + bne *+122 + cmp ($12),y + .byte $d2 + .byte $d3 + .byte $d4,$12 ; nop $12,x + cmp $12,x + dec $12,x + .byte $d7 + cld + cmp $3456,y + .byte $da ; nop + .byte $db + .byte $dc,$56,$34 ; nop $3456,x + cmp $3456,x + dec $3456,x + .byte $df + cpx #$12 + sbc ($12,x) + .byte $e2,$12 ; nop #$12 + .byte $e3 + cpx $12 + sbc $12 + inc $12 + .byte $e7 + inx + sbc #$12 + nop + .byte $eb,$12 ; sbc #$12 + cpx $3456 + sbc $3456 + inc $3456 + .byte $ef + beq *+122 + sbc ($12),y + .byte $f2 + .byte $f3 + .byte $f4,$12 ; nop $12,x + sbc $12,x + inc $12,x + .byte $f7 + sed + sbc $3456,y + .byte $fa ; nop + .byte $fb + .byte $fc,$56,$34 ; nop $3456,x + sbc $3456,x + inc $3456,x + .byte $ff diff --git a/test/asm/opcodes/6502x-opcodes.ref b/test/asm/opcodes/6502x-opcodes.ref new file mode 100644 index 000000000..f942bec76 Binary files /dev/null and b/test/asm/opcodes/6502x-opcodes.ref differ diff --git a/test/asm/opcodes/6502x-opcodes.s b/test/asm/opcodes/6502x-opcodes.s new file mode 100644 index 000000000..5f21aeb9f --- /dev/null +++ b/test/asm/opcodes/6502x-opcodes.s @@ -0,0 +1,258 @@ +.setcpu "6502X" + + brk + ora ($12,x) + jam + slo ($12,x) + nop $12 + ora $12 + asl $12 + slo $12 + php + ora #$12 + asl a + anc #$12 + nop $3456 + ora $3456 + asl $3456 + slo $3456 + bpl *+122 + ora ($12),y + .byte $12 ; jam + slo ($12),y + nop $12,x + ora $12,x + asl $12,x + slo $12,x + clc + ora $3456,y + .byte $1a ; nop + slo $3456,y + nop $3456,x + ora $3456,x + asl $3456,x + slo $3456,x + jsr $3456 + and ($12,x) + .byte $22 ; jam + rla ($12,x) + bit $12 + and $12 + rol $12 + rla $12 + plp + and #$12 + rol a + .byte $2b ; anc #$12 + bit $3456 + and $3456 + rol $3456 + rla $3456 + bmi *+122 + and ($12),y + .byte $32 ; jam + rla ($12),y + .byte $34,$12 ; nop $12,x + and $12,x + rol $12,x + rla $12,x + sec + and $3456,y + .byte $3a ; nop + rla $3456,y + .byte $3c,$56,$34 ; nop $3456,x + and $3456,x + rol $3456,x + rla $3456,x + rti + eor ($12,x) + .byte $42 ; jam + sre ($12,x) + .byte $44,$12 ; nop $12 + eor $12 + lsr $12 + sre $12 + pha + eor #$12 + lsr a + alr #$12 + jmp $3456 + eor $3456 + lsr $3456 + sre $3456 + bvc *+122 + eor ($12),y + .byte $52 ; jam + sre ($12),y + .byte $54,$12 ; nop $12,x + eor $12,x + lsr $12,x + sre $12,x + cli + eor $3456,y + .byte $5a ; nop + sre $3456,y + nop $3456,x + eor $3456,x + lsr $3456,x + sre $3456,x + rts + adc ($12,x) + .byte $62 ; jam + rra ($12,x) + .byte $64,$12 ; nop $12 + adc $12 + ror $12 + rra $12 + pla + adc #$12 + ror a + arr #$12 + jmp ($3456) + adc $3456 + ror $3456 + rra $3456 + bvs *+122 + adc ($12),y + .byte $72 ; jam + rra ($12),y + .byte $74,$12 ; nop $12,x + adc $12,x + ror $12,x + rra $12,x + sei + adc $3456,y + .byte $7a ; nop + rra $3456,y + .byte $7c,$56,$34 ; nop $3456,x + adc $3456,x + ror $3456,x + rra $3456,x + nop #$12 + sta ($12,x) + .byte $82,$12 ; nop #$12 + sax ($12,x) + sty $12 + sta $12 + stx $12 + sax $12 + dey + .byte $89,$12 ; nop #$12 + txa + .byte $8b,$12 ; xaa #$12 + sty $3456 + sta $3456 + stx $3456 + sax $3456 + bcc *+122 + sta ($12),y + .byte $92 ; jam + .byte $93,$12 ; ahx ($12),y + sty $12,x + sta $12,x + stx $12,y + sax $12,y + tya + sta $3456,y + txs + tas $3456,y + shy $3456,x + sta $3456,x + shx $3456,y + .byte $9f,$56,$34 ; ahx $3456,y + ldy #$12 + lda ($12,x) + ldx #$12 + lax ($12,x) + ldy $12 + lda $12 + ldx $12 + lax $12 + tay + lda #$12 + tax + lax #$12 + ldy $3456 + lda $3456 + ldx $3456 + lax $3456 + bcs *+122 + lda ($12),y + .byte $b2 ; jam + lax ($12),y + ldy $12,x + lda $12,x + ldx $12,y + lax $12,y + clv + lda $3456,y + tsx + las $3456,y + ldy $3456,x + lda $3456,x + ldx $3456,y + lax $3456,y + cpy #$12 + cmp ($12,x) + .byte $c2,$12 ; nop #$12 + dcp ($12,x) + cpy $12 + cmp $12 + dec $12 + dcp $12 + iny + cmp #$12 + dex + axs #$12 + cpy $3456 + cmp $3456 + dec $3456 + dcp $3456 + bne *+122 + cmp ($12),y + .byte $d2 ; jam + dcp ($12),y + .byte $d4,$12 ; nop $12,x + cmp $12,x + dec $12,x + dcp $12,x + cld + cmp $3456,y + .byte $da ; nop + dcp $3456,y + .byte $dc,$56,$34 ; nop $3456,x + cmp $3456,x + dec $3456,x + dcp $3456,x + cpx #$12 + sbc ($12,x) + .byte $e2,$12 ; nop #$12 + isc ($12,x) + cpx $12 + sbc $12 + inc $12 + isc $12 + inx + sbc #$12 + nop + .byte $eb ; nop + cpx $3456 + sbc $3456 + inc $3456 + isc $3456 + beq *+122 + sbc ($12),y + .byte $f2 ; jam + isc ($12),y + .byte $f4,$12 ; nop $12,x + sbc $12,x + inc $12,x + isc $12,x + sed + sbc $3456,y + .byte $fa ; nop + isc $3456,y + .byte $fc,$56,$34 ; nop $3456,x + sbc $3456,x + inc $3456,x + isc $3456,x diff --git a/test/asm/opcodes/65c02-opcodes.ref b/test/asm/opcodes/65c02-opcodes.ref new file mode 100644 index 000000000..2d44045cb Binary files /dev/null and b/test/asm/opcodes/65c02-opcodes.ref differ diff --git a/test/asm/opcodes/65c02-opcodes.s b/test/asm/opcodes/65c02-opcodes.s new file mode 100644 index 000000000..09c3f04f2 --- /dev/null +++ b/test/asm/opcodes/65c02-opcodes.s @@ -0,0 +1,258 @@ +.setcpu "65C02" + + brk + ora ($12,x) + .byte $02 + .byte $03 + tsb $12 + ora $12 + asl $12 + rmb0 $12 + php + ora #$12 + asl a + .byte $0B + tsb $3456 + ora $3456 + asl $3456 + bbr0 $12,*+122 + bpl *+122 + ora ($12),y + ora ($12) + .byte $13 + trb $12 + ora $12,x + asl $12,x + rmb1 $12 + clc + ora $3456,y + inc a + .byte $1B + trb $3456 + ora $3456,x + asl $3456,x + bbr1 $12,*+122 + jsr $3456 + and ($12,x) + .byte $22 + .byte $23 + bit $12 + and $12 + rol $12 + rmb2 $12 + plp + and #$12 + rol a + .byte $2B + bit $3456 + and $3456 + rol $3456 + bbr2 $12,*+122 + bmi *+122 + and ($12),y + and ($12) + .byte $33 + bit $12,x + and $12,x + rol $12,x + rmb3 $12 + sec + and $3456,y + dec a + .byte $3B + bit $3456,x + and $3456,x + rol $3456,x + bbr3 $12,*+122 + rti + eor ($12,x) + .byte $42 + .byte $43 + .byte $44 + eor $12 + lsr $12 + rmb4 $12 + pha + eor #$12 + lsr a + .byte $4B + jmp $3456 + eor $3456 + lsr $3456 + bbr4 $12,*+122 + bvc *+122 + eor ($12),y + eor ($12) + .byte $53 + .byte $54 + eor $12,x + lsr $12,x + rmb5 $12 + cli + eor $3456,y + phy + .byte $5B + .byte $5C + eor $3456,x + lsr $3456,x + bbr5 $12,*+122 + rts + adc ($12,x) + .byte $62 + .byte $63 + stz $12 + adc $12 + ror $12 + rmb6 $12 + pla + adc #$12 + ror a + .byte $6B + jmp ($3456) + adc $3456 + ror $3456 + bbr6 $12,*+122 + bvs *+122 + adc ($12),y + adc ($12) + .byte $73 + stz $12,x + adc $12,x + ror $12,x + rmb7 $12 + sei + adc $3456,y + ply + .byte $7B + jmp ($3456,x) + adc $3456,x + ror $3456,x + bbr7 $12,*+122 + bra *+122 + sta ($12,x) + .byte $82 + .byte $83 + sty $12 + sta $12 + stx $12 + smb0 $12 + dey + bit #$12 + txa + .byte $8B + sty $3456 + sta $3456 + stx $3456 + bbs0 $12,*+122 + bcc *+122 + sta ($12),y + sta ($12) + .byte $93 + sty $12,x + sta $12,x + stx $12,y + smb1 $12 + tya + sta $3456,y + txs + .byte $9B + stz $3456 + sta $3456,x + stz $3456,x + bbs1 $12,*+122 + ldy #$12 + lda ($12,x) + ldx #$12 + .byte $A3 + ldy $12 + lda $12 + ldx $12 + smb2 $12 + tay + lda #$12 + tax + .byte $AB + ldy $3456 + lda $3456 + ldx $3456 + bbs2 $12,*+122 + bcs *+122 + lda ($12),y + lda ($12) + .byte $B3 + ldy $12,x + lda $12,x + ldx $12,y + smb3 $12 + clv + lda $3456,y + tsx + .byte $BB + ldy $3456,x + lda $3456,x + ldx $3456,y + bbs3 $12,*+122 + cpy #$12 + cmp ($12,x) + .byte $C2 + .byte $C3 + cpy $12 + cmp $12 + dec $12 + smb4 $12 + iny + cmp #$12 + dex + .byte $CB + cpy $3456 + cmp $3456 + dec $3456 + bbs4 $12,*+122 + bne *+122 + cmp ($12),y + cmp ($12) + .byte $D3 + .byte $D4 + cmp $12,x + dec $12,x + smb5 $12 + cld + cmp $3456,y + phx + .byte $DB + .byte $DC + cmp $3456,x + dec $3456,x + bbs5 $12,*+122 + cpx #$12 + sbc ($12,x) + .byte $E2 + .byte $E3 + cpx $12 + sbc $12 + inc $12 + smb6 $12 + inx + sbc #$12 + nop + .byte $EB + cpx $3456 + sbc $3456 + inc $3456 + bbs6 $12,*+122 + beq *+122 + sbc ($12),y + sbc ($12) + .byte $F3 + .byte $F4 + sbc $12,x + inc $12,x + smb7 $12 + sed + sbc $3456,y + plx + .byte $FB + .byte $FC + sbc $3456,x + inc $3456,x + bbs7 $12,*+122 diff --git a/test/asm/opcodes/65sc02-opcodes.ref b/test/asm/opcodes/65sc02-opcodes.ref new file mode 100644 index 000000000..d22fe6688 Binary files /dev/null and b/test/asm/opcodes/65sc02-opcodes.ref differ diff --git a/test/asm/opcodes/65sc02-opcodes.s b/test/asm/opcodes/65sc02-opcodes.s new file mode 100644 index 000000000..aa539913a --- /dev/null +++ b/test/asm/opcodes/65sc02-opcodes.s @@ -0,0 +1,258 @@ +.setcpu "65SC02" + + brk + ora ($12,x) + .byte $02 + .byte $03 + tsb $12 + ora $12 + asl $12 + .byte $07 + php + ora #$12 + asl a + .byte $0B + tsb $3456 + ora $3456 + asl $3456 + .byte $0F + bpl *+122 + ora ($12),y + ora ($12) + .byte $13 + trb $12 + ora $12,x + asl $12,x + .byte $17 + clc + ora $3456,y + inc a + .byte $1B + trb $3456 + ora $3456,x + asl $3456,x + .byte $1F + jsr $3456 + and ($12,x) + .byte $22 + .byte $23 + bit $12 + and $12 + rol $12 + .byte $27 + plp + and #$12 + rol a + .byte $2B + bit $3456 + and $3456 + rol $3456 + .byte $2F + bmi *+122 + and ($12),y + and ($12) + .byte $33 + bit $12,x + and $12,x + rol $12,x + .byte $37 + sec + and $3456,y + dec a + .byte $3B + bit $3456,x + and $3456,x + rol $3456,x + .byte $3F + rti + eor ($12,x) + .byte $42 + .byte $43 + .byte $44 + eor $12 + lsr $12 + .byte $47 + pha + eor #$12 + lsr a + .byte $4B + jmp $3456 + eor $3456 + lsr $3456 + .byte $4F + bvc *+122 + eor ($12),y + eor ($12) + .byte $53 + .byte $54 + eor $12,x + lsr $12,x + .byte $57 + cli + eor $3456,y + phy + .byte $5B + .byte $5C + eor $3456,x + lsr $3456,x + .byte $5F + rts + adc ($12,x) + .byte $62 + .byte $63 + stz $12 + adc $12 + ror $12 + .byte $67 + pla + adc #$12 + ror a + .byte $6B + jmp ($3456) + adc $3456 + ror $3456 + .byte $6F + bvs *+122 + adc ($12),y + adc ($12) + .byte $73 + stz $12,x + adc $12,x + ror $12,x + .byte $77 + sei + adc $3456,y + ply + .byte $7B + jmp ($3456,x) + adc $3456,x + ror $3456,x + .byte $7F + bra *+122 + sta ($12,x) + .byte $82 + .byte $83 + sty $12 + sta $12 + stx $12 + .byte $87 + dey + bit #$12 + txa + .byte $8B + sty $3456 + sta $3456 + stx $3456 + .byte $8F + bcc *+122 + sta ($12),y + sta ($12) + .byte $93 + sty $12,x + sta $12,x + stx $12,y + .byte $97 + tya + sta $3456,y + txs + .byte $9B + stz $3456 + sta $3456,x + stz $3456,x + .byte $9F + ldy #$12 + lda ($12,x) + ldx #$12 + .byte $A3 + ldy $12 + lda $12 + ldx $12 + .byte $A7 + tay + lda #$12 + tax + .byte $AB + ldy $3456 + lda $3456 + ldx $3456 + .byte $AF + bcs *+122 + lda ($12),y + lda ($12) + .byte $B3 + ldy $12,x + lda $12,x + ldx $12,y + .byte $B7 + clv + lda $3456,y + tsx + .byte $BB + ldy $3456,x + lda $3456,x + ldx $3456,y + .byte $BF + cpy #$12 + cmp ($12,x) + .byte $C2 + .byte $C3 + cpy $12 + cmp $12 + dec $12 + .byte $C7 + iny + cmp #$12 + dex + .byte $CB + cpy $3456 + cmp $3456 + dec $3456 + .byte $CF + bne *+122 + cmp ($12),y + cmp ($12) + .byte $D3 + .byte $D4 + cmp $12,x + dec $12,x + .byte $D7 + cld + cmp $3456,y + phx + .byte $DB + .byte $DC + cmp $3456,x + dec $3456,x + .byte $DF + cpx #$12 + sbc ($12,x) + .byte $E2 + .byte $E3 + cpx $12 + sbc $12 + inc $12 + .byte $E7 + inx + sbc #$12 + nop + .byte $EB + cpx $3456 + sbc $3456 + inc $3456 + .byte $EF + beq *+122 + sbc ($12),y + sbc ($12) + .byte $F3 + .byte $F4 + sbc $12,x + inc $12,x + .byte $F7 + sed + sbc $3456,y + plx + .byte $FB + .byte $FC + sbc $3456,x + inc $3456,x + .byte $FF diff --git a/test/asm/opcodes/Makefile b/test/asm/opcodes/Makefile new file mode 100644 index 000000000..00be96d91 --- /dev/null +++ b/test/asm/opcodes/Makefile @@ -0,0 +1,61 @@ +# Makefile for the assembler regression tests + +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + EXE = .exe + MKDIR = mkdir $(subst /,\,$1) + RMDIR = -rmdir /q /s $(subst /,\,$1) +else + EXE = + MKDIR = mkdir -p $1 + RMDIR = $(RM) -r $1 +endif + +ifdef QUIET + .SILENT: +endif + +CA65 := $(if $(wildcard ../../../bin/ca65*),../../../bin/ca65,ca65) +LD65 := $(if $(wildcard ../../../bin/ld65*),../../../bin/ld65,ld65) + +WORKDIR = ../../../testwrk/asm/opcodes + +ISEQUAL = ../../../testwrk/isequal$(EXE) + +CC = gcc +CFLAGS = -O2 + +.PHONY: all clean + +OPCODE_REFS := $(wildcard *-opcodes.ref) +OPCODE_BINS = $(OPCODE_REFS:%.ref=$(WORKDIR)/%.bin) +OPCODE_CPUS = $(OPCODE_REFS:%-opcodes.ref=%) + +all: $(OPCODE_BINS) + +$(WORKDIR): + $(call MKDIR,$(WORKDIR)) + +$(ISEQUAL): ../../isequal.c | $(WORKDIR) + $(CC) $(CFLAGS) -o $@ $< + +define OPCODE_template + +$(WORKDIR)/$1-opcodes.bin: $1-opcodes.s $(ISEQUAL) + $(if $(QUIET),echo asm/$1-opcodes.bin) + $(CA65) -t none --cpu $1 -l $$(@:.bin=.lst) -o $$(@:.bin=.o) $$< + $(LD65) -t none -o $$@ $$(@:.bin=.o) none.lib + $(ISEQUAL) $1-opcodes.ref $$@ + +endef # OPCODE_template + +$(foreach cpu,$(OPCODE_CPUS),$(eval $(call OPCODE_template,$(cpu)))) + +$(WORKDIR)/%.o: %.s | $(WORKDIR) + $(CA65) -l $(@:.o=.lst) -o $@ $< + +clean: + @$(call RMDIR,$(WORKDIR)) diff --git a/test/asm/opcodes/huc6280-opcodes.ref b/test/asm/opcodes/huc6280-opcodes.ref new file mode 100644 index 000000000..33f5b297f Binary files /dev/null and b/test/asm/opcodes/huc6280-opcodes.ref differ diff --git a/test/asm/opcodes/huc6280-opcodes.s b/test/asm/opcodes/huc6280-opcodes.s new file mode 100644 index 000000000..bd3ad5c79 --- /dev/null +++ b/test/asm/opcodes/huc6280-opcodes.s @@ -0,0 +1,258 @@ +.setcpu "huc6280" + + brk + ora ($12,x) + sxy + st0 #$12 + tsb $12 + ora $12 + asl $12 + rmb0 $12 + php + ora #$12 + asl a + .byte $0B + tsb $3456 + ora $3456 + asl $3456 + bbr0 $12,*+122 + bpl *+122 + ora ($12),y + ora ($12) + st1 #$12 + trb $12 + ora $12,x + asl $12,x + rmb1 $12 + clc + ora $3456,y + inc a + .byte $1B + trb $3456 + ora $3456,x + asl $3456,x + bbr1 $12,*+122 + jsr $3456 + and ($12,x) + sax + st2 #$12 + bit $12 + and $12 + rol $12 + rmb2 $12 + plp + and #$12 + rol a + .byte $2B + bit $3456 + and $3456 + rol $3456 + bbr2 $12,*+122 + bmi *+122 + and ($12),y + and ($12) + .byte $33 + bit $12,x + and $12,x + rol $12,x + rmb3 $12 + sec + and $3456,y + dec a + .byte $3B + bit $3456,x + and $3456,x + rol $3456,x + bbr3 $12,*+122 + rti + eor ($12,x) + say + tma #$02 + bsr *+122 + eor $12 + lsr $12 + rmb4 $12 + pha + eor #$12 + lsr a + .byte $4B + jmp $3456 + eor $3456 + lsr $3456 + bbr4 $12,*+122 + bvc *+122 + eor ($12),y + eor ($12) + tam #$12 + csl + eor $12,x + lsr $12,x + rmb5 $12 + cli + eor $3456,y + phy + .byte $5B + .byte $5C + eor $3456,x + lsr $3456,x + bbr5 $12,*+122 + rts + adc ($12,x) + cla + .byte $63 + stz $12 + adc $12 + ror $12 + rmb6 $12 + pla + adc #$12 + ror a + .byte $6B + jmp ($3456) + adc $3456 + ror $3456 + bbr6 $12,*+122 + bvs *+122 + adc ($12),y + adc ($12) + tii $3333,$7373,$1111 + stz $12,x + adc $12,x + ror $12,x + rmb7 $12 + sei + adc $3456,y + ply + .byte $7B + jmp ($3456,x) + adc $3456,x + ror $3456,x + bbr7 $12,*+122 + bra *+122 + sta ($12,x) + clx + tst #$12,$EA + sty $12 + sta $12 + stx $12 + smb0 $12 + dey + bit #$12 + txa + .byte $8B + sty $3456 + sta $3456 + stx $3456 + bbs0 $12,*+122 + bcc *+122 + sta ($12),y + sta ($12) + tst #$12,$EAEA + sty $12,x + sta $12,x + stx $12,y + smb1 $12 + tya + sta $3456,y + txs + .byte $9B + stz $3456 + sta $3456,x + stz $3456,x + bbs1 $12,*+122 + ldy #$12 + lda ($12,x) + ldx #$12 + tst #$12,$EA,x + ldy $12 + lda $12 + ldx $12 + smb2 $12 + tay + lda #$12 + tax + .byte $AB + ldy $3456 + lda $3456 + ldx $3456 + bbs2 $12,*+122 + bcs *+122 + lda ($12),y + lda ($12) + tst #$12,$EAEA,x + ldy $12,x + lda $12,x + ldx $12,y + smb3 $12 + clv + lda $3456,y + tsx + .byte $BB + ldy $3456,x + lda $3456,x + ldx $3456,y + bbs3 $12,*+122 + cpy #$12 + cmp ($12,x) + cly + tdd $3333,$C3C3,$1111 + cpy $12 + cmp $12 + dec $12 + smb4 $12 + iny + cmp #$12 + dex + .byte $CB + cpy $3456 + cmp $3456 + dec $3456 + bbs4 $12,*+122 + bne *+122 + cmp ($12),y + cmp ($12) + tin $3333,$D3D3,$1111 + .byte $D4 + cmp $12,x + dec $12,x + smb5 $12 + cld + cmp $3456,y + phx + .byte $DB + .byte $DC + cmp $3456,x + dec $3456,x + bbs5 $12,*+122 + cpx #$12 + sbc ($12,x) + .byte $E2 + tia $3333,$E3E3,$1111 + cpx $12 + sbc $12 + inc $12 + smb6 $12 + inx + sbc #$12 + nop + .byte $EB + cpx $3456 + sbc $3456 + inc $3456 + bbs6 $12,*+122 + beq *+122 + sbc ($12),y + sbc ($12) + tai $3333,$F3F3,$1111 + .byte $F4 + sbc $12,x + inc $12,x + smb7 $12 + sed + sbc $3456,y + plx + .byte $FB + .byte $FC + sbc $3456,x + inc $3456,x + bbs7 $12,*+122 diff --git a/test/asm/opcodes/m740-opcodes.s b/test/asm/opcodes/m740-opcodes.s new file mode 100644 index 000000000..df6d71488 --- /dev/null +++ b/test/asm/opcodes/m740-opcodes.s @@ -0,0 +1,260 @@ +.setcpu "65C02" +; copy of 65c02, comments note changes to the m740 according to +; http://documentation.renesas.com/doc/products/mpumcu/rej09b0322_740sm.pdf + + brk + ora ($12,x) + .byte $02,$00,$00 ; jsr zp,ind + .byte $03,$00,$00 ; bbs 0,a + tsb $12 ; .byte $04 + ora $12 + asl $12 + rmb0 $12 ; bbs 0,zp + php + ora #$12 + asl a + .byte $0B,$00,$00 ; seb 0,a + tsb $3456 ; .byte $0c + ora $3456 + asl $3456 + bbr0 $12,*+122 ; seb 0,zp + bpl *+122 + ora ($12),y + ora ($12) ; clt + .byte $13,$00,$00 ; bbc 0,a + trb $12 ; .byte $14 + ora $12,x + asl $12,x + rmb1 $12 ; bbc 0,zp + clc + ora $3456,y + inc a + .byte $1B,$00,$00 ; clb 0,a + trb $3456 ; .byte $1c + ora $3456,x + asl $3456,x + bbr1 $12,*+122 ; clb 0,zp + jsr $3456 + and ($12,x) + .byte $22,$00,$00 ; jsr sp + .byte $23,$00,$00 ; bbs 1,a + bit $12 + and $12 + rol $12 + rmb2 $12 ; bbs 1,zp + plp + and #$12 + rol a + .byte $2B,$00,$00 ; seb 1,a + bit $3456 + and $3456 + rol $3456 + bbr2 $12,*+122 ; seb 1,zp + bmi *+122 + and ($12),y + and ($12) ; set + .byte $33,$00,$00 ; bbc 1,a + bit $12,x ; .byte $34 + and $12,x + rol $12,x + rmb3 $12 ; bbc 1,zp + sec + and $3456,y + dec a + .byte $3B,$00,$00 ; clb 1,a + bit $3456,x ; ldm zp + and $3456,x + rol $3456,x + bbr3 $12,*+122 ; clb 1,zp + rti + eor ($12,x) + .byte $42,$00,$00 ; stp + .byte $43,$00,$00 ; bbs 2,a + .byte $44,$00,$00 ; com zp + eor $12 + lsr $12 + rmb4 $12 ; bbs 2,zp + pha + eor #$12 + lsr a + .byte $4B,$00,$00 ; seb 2,a + jmp $3456 + eor $3456 + lsr $3456 + bbr4 $12,*+122 ; seb 2,zp + bvc *+122 + eor ($12),y + eor ($12) ; .byte $52 + .byte $53,$00,$00 ; bbc 2,a + .byte $54,$00,$00 + eor $12,x + lsr $12,x + rmb5 $12 ; bbc 2,zp + cli + eor $3456,y + phy + .byte $5B,$00,$00 ; clb 2,a + .byte $5C,$00,$00 + eor $3456,x + lsr $3456,x + bbr5 $12,*+122 ; clb 2,zp + rts + adc ($12,x) + .byte $62,$00,$00 ; mul zp,x + .byte $63,$00,$00 ; bbs 3,a + stz $12 ; tst zp + adc $12 + ror $12 + rmb6 $12 ; bbs 3,zp + pla + adc #$12 + ror a + .byte $6B,$00,$00 ; seb 3,a + jmp ($3456) + adc $3456 + ror $3456 + bbr6 $12,*+122 ; seb 3,zp + bvs *+122 + adc ($12),y + adc ($12) ; .byte $72 + .byte $73,$00,$00 ; bbc 3,a + stz $12,x ; .byte $74 + adc $12,x + ror $12,x + rmb7 $12 ; bbc 3,zp + sei + adc $3456,y + ply + .byte $7B,$00,$00 ; clb 3,a + jmp ($3456,x) ; .byte $7c + adc $3456,x + ror $3456,x + bbr7 $12,*+122 ; clb 3,zp + bra *+122 + sta ($12,x) + .byte $82,$00,$00 ; rrf zp + .byte $83,$00,$00 ; bbs 4,a + sty $12 + sta $12 + stx $12 + smb0 $12 ; bbs 4,zp + dey + bit #$12 + txa + .byte $8B,$00,$00 ; seb 4,a + sty $3456 + sta $3456 + stx $3456 + bbs0 $12,*+122 ; seb 4,zp + bcc *+122 + sta ($12),y + sta ($12) ; .byte $92 + .byte $93,$00,$00 ; bbc 4,a + sty $12,x + sta $12,x + stx $12,y + smb1 $12 ; bbc 4,zp + tya + sta $3456,y + txs + .byte $9B,$00,$00 ; clb 4,a + stz $3456 ; .byte $9c + sta $3456,x + stz $3456,x ; .byte $9e + bbs1 $12,*+122 ; clb 4,zp + ldy #$12 + lda ($12,x) + ldx #$12 + .byte $A3,$00,$00 ; bbs 5,a + ldy $12 + lda $12 + ldx $12 + smb2 $12 ; bbs 5,zp + tay + lda #$12 + tax + .byte $AB,$00,$00 ; seb 5,a + ldy $3456 + lda $3456 + ldx $3456 + bbs2 $12,*+122 ; seb 5,zp + bcs *+122 + lda ($12),y + lda ($12) ; .byte $b2 + .byte $B3,$00,$00 ; bbc 5,a + ldy $12,x + lda $12,x + ldx $12,y + smb3 $12 ; bbc 5,zp + clv + lda $3456,y + tsx + .byte $BB,$00,$00 ; clb 5,a + ldy $3456,x + lda $3456,x + ldx $3456,y + bbs3 $12,*+122 ; clb 5,zp + cpy #$12 + cmp ($12,x) + .byte $C2,$00,$00 ; wit + .byte $C3,$00,$00 ; bbs 6,a + cpy $12 + cmp $12 + dec $12 + smb4 $12 ; bbs 6,zp + iny + cmp #$12 + dex + .byte $CB,$00,$00 ; seb 6,a + cpy $3456 + cmp $3456 + dec $3456 + bbs4 $12,*+122 ; seb 6,zp + bne *+122 + cmp ($12),y + cmp ($12) ; .byte $d2 + .byte $D3,$00,$00 ; bbc 6,a + .byte $D4,$00,$00 + cmp $12,x + dec $12,x + smb5 $12 ; bbc 6,zp + cld + cmp $3456,y + phx + .byte $DB,$00,$00 ; clb 6,a + .byte $DC,$00,$00 + cmp $3456,x + dec $3456,x + bbs5 $12,*+122 ; clb 6,zp + cpx #$12 + sbc ($12,x) + .byte $E2,$00,$00 ; div zp,x + .byte $E3,$00,$00 ; bbs 7,a + cpx $12 + sbc $12 + inc $12 + smb6 $12 ; bbs 7,zp + inx + sbc #$12 + nop + .byte $EB,$00,$00 ; seb 7,a + cpx $3456 + sbc $3456 + inc $3456 + bbs6 $12,*+122 ; seb 7,zp + beq *+122 + sbc ($12),y + sbc ($12) ; .byte $f2 + .byte $F3,$00,$00 ; bbc 7,a + .byte $F4,$00,$00 + sbc $12,x + inc $12,x + smb7 $12 ; bbc 7,zp + sed + sbc $3456,y + plx + .byte $FB,$00,$00 ; clb 7,a + .byte $FC,$00,$00 + sbc $3456,x + inc $3456,x + bbs7 $12,*+122 ; clb 7,zp diff --git a/test/asm/opcodes/readme.txt b/test/asm/opcodes/readme.txt new file mode 100644 index 000000000..098dd549a --- /dev/null +++ b/test/asm/opcodes/readme.txt @@ -0,0 +1,29 @@ +Opcode Tests: +------------- + +These testcases are inspired by the ones now removed from test/assembler. +The main purpose is to have each possible opcode generated at least once, +either by an Assembly instruction or a ".byte"-placeholder. Typically +generated by disassembling a binary dump that contains data in the form +of the pattern that each opcode is stated once in order followed by easy +to recognise: + +00 00 EA 00 +01 00 EA 00 +02 00 EA 00 +[...] +fe 00 EA 00 +ff 00 EA 00 + +The disassembly is then put in a better readable form by replacing the +leftover dummy opcode parameters with something more recognizable. + +The testcases for 6502, 6502x, 65sc02, 65c02, 4510, and huc6280 have been +put together by Sven Oliver ("SvOlli") Moll, as well as a template for the +m740 instructions set. Later 6502dtv support was also added. + +Still to do is to find a way to implement an opcode testcase for the 65816 +processor, since it's capable of executing instructions with an 8-bit and +a 16-bit operator alike, distinguished by only one processor flag. + + diff --git a/test/asm/readme.txt b/test/asm/readme.txt new file mode 100644 index 000000000..c3198c12a --- /dev/null +++ b/test/asm/readme.txt @@ -0,0 +1,32 @@ +Assembler Testcases +=================== + +Opcode Tests: +------------- + +these go into opcodes/. Refer to opcodes/readme.txt + + +CPU Detect Tests +---------------- + +these go into cpudetect/. Refer to cpudetect/readme.txt + + +Overall tests: +-------------- + +These go into listing/. Refer to listing/readme.txt + +val: +---- + +Works very much like the /val directory used to test the compiler - individual +tests are run in the simulator and should exit with an exit code of 0 when they +pass, or either -1 or a number indicating what part of the test failed on error. + +err: +---- + +Works very much like the /err directory used to test the compiler - individual +tests are assembled and MUST NOT assemble without error. diff --git a/test/asm/val/Makefile b/test/asm/val/Makefile new file mode 100644 index 000000000..91dae9afd --- /dev/null +++ b/test/asm/val/Makefile @@ -0,0 +1,58 @@ +# Makefile for the regression tests that return an error code on failure + +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + S = $(subst /,\,/) + NULLDEV = nul: + MKDIR = mkdir $(subst /,\,$1) + RMDIR = -rmdir /s /q $(subst /,\,$1) +else + S = / + NULLDEV = /dev/null + MKDIR = mkdir -p $1 + RMDIR = $(RM) -r $1 +endif + +ifdef QUIET + .SILENT: + NULLOUT = >$(NULLDEV) + NULLERR = 2>$(NULLDEV) +endif + +SIM65FLAGS = -x 5000000000 + +CA65 := $(if $(wildcard ../../../bin/ca65*),..$S..$S..$Sbin$Sca65,ca65) +LD65 := $(if $(wildcard ../../../bin/ld65*),..$S..$S..$Sbin$Sld65,ld65) +SIM65 := $(if $(wildcard ../../../bin/sim65*),..$S..$S..$Sbin$Ssim65,sim65) + +WORKDIR = ../../../testwrk/asm/val + +.PHONY: all clean + +SOURCES := $(wildcard *.s) +TESTS = $(SOURCES:%.s=$(WORKDIR)/%.6502.prg) +TESTS += $(SOURCES:%.s=$(WORKDIR)/%.65c02.prg) + +all: $(TESTS) + +$(WORKDIR): + $(call MKDIR,$(WORKDIR)) + +define PRG_template + +$(WORKDIR)/%.$1.prg: %.s | $(WORKDIR) + $(if $(QUIET),echo asm/val/$$*.$1.prg) + $(CA65) -t sim$1 -o $$(@:.prg=.o) $$< $(NULLERR) + $(LD65) -C sim6502-asmtest.cfg -o $$@ $$(@:.prg=.o) sim$1.lib $(NULLERR) + $(SIM65) $(SIM65FLAGS) $$@ $(NULLOUT) + +endef # PRG_template + +$(eval $(call PRG_template,6502)) +$(eval $(call PRG_template,65c02)) + +clean: + @$(call RMDIR,$(WORKDIR)) diff --git a/test/asm/val/bug1538.s b/test/asm/val/bug1538.s new file mode 100644 index 000000000..95aa89e34 --- /dev/null +++ b/test/asm/val/bug1538.s @@ -0,0 +1,122 @@ + + .macpack longbranch + + .import _exit + .export _main + +offset1 = ($123456 + ((.bank(_main)) * $2345)) ; should produce $123456 + ($23 * $2345) = 1706c5 + +_main: + ldx #1 ; test counter + + ;--------------------------------------------------------------------- + ; first check if we can still force an 16bit address although we are + ; ANDing with a 8bit value +test1: +test1a: bit a:$1234 & $ff ; should produce 00 34 + lda test1a+1 + cmp #$34 + jne exiterror + + inx + lda test1a+2 + cmp #$00 + jne exiterror + + inx +test1b: bit a:$34 & $ff ; should produce 00 34 + lda test1b+1 + cmp #$34 + jne exiterror + + inx + lda test1b+2 + cmp #$00 + jne exiterror + + ;--------------------------------------------------------------------- + ; the original bug report, use an expression that contains a non constant + ; part (.bank(_main)) and limit it to 8bit size by ANDing with $ff +test2: + inx + lda #(offset1 >> 0) & $ff + cmp #$c5 + jne exiterror + + inx + lda #(offset1 >> 8) & $ff + cmp #$06 + jne exiterror + + inx + lda #(offset1 >> 16) & $ff + cmp #$17 + jne exiterror + + ;--------------------------------------------------------------------- + ; import a zeropage symbol (1 byte size) and then AND with a constant + ; 16bit value - it should not turn into a 16bit address +test3: + jmp test3chk + .importzp tmp1 +test3a: .byte tmp1 ; verify its 8bit +test3b: .byte tmp1 & $ff ; AND with $ff should work of course +test3c: .byte tmp1 & $ffff ; AND with $ffff should not change size +test3d: .byte tmp1 & $ffffff ; AND with $ffffff should not change size +test3e: .byte tmp1 & $ffffffff ; AND with $ffffffff should not change size +test3f: .word tmp1 & $ffffff ; AND with $ffffff should not change size +test3g: .word tmp1 & $ffffffff ; AND with $ffffffff should not change size +test3chk: + inx + lda test3a + cmp #tmp1 + jne exiterror + + inx + lda test3b + cmp #tmp1 + jne exiterror + + inx + lda test3c + cmp #tmp1 + jne exiterror + + inx + lda test3d + cmp #tmp1 + jne exiterror + + inx + lda test3e + cmp #tmp1 + jne exiterror + + inx + lda test3f + cmp #tmp1 + jne exiterror + + inx + lda test3f+1 + cmp #$00 + jne exiterror + + inx + lda test3g + cmp #tmp1 + jne exiterror + + inx + lda test3g+1 + cmp #$00 + jne exiterror + + ;--------------------------------------------------------------------- + ; exit OK + ldx #0 +exiterror: + txa + ldx #0 + jmp _exit + diff --git a/test/asm/val/sim6502-asmtest.cfg b/test/asm/val/sim6502-asmtest.cfg new file mode 100644 index 000000000..a969fb044 --- /dev/null +++ b/test/asm/val/sim6502-asmtest.cfg @@ -0,0 +1,35 @@ +SYMBOLS { + __EXEHDR__: type = import; + __STACKSIZE__: type = weak, value = $0800; # 2k stack +} +MEMORY { + ZP: file = "", start = $0000, size = $0100; + HEADER: file = %O, start = $0000, size = $000C; + MAIN: file = %O, define = yes, start = $0200, size = $FDF0 - __STACKSIZE__, BANK = $23; +} +SEGMENTS { + ZEROPAGE: load = ZP, type = zp; + EXEHDR: load = HEADER, type = ro; + STARTUP: load = MAIN, type = ro; + LOWCODE: load = MAIN, type = ro, optional = yes; + ONCE: load = MAIN, type = ro, optional = yes; + CODE: load = MAIN, type = ro; + RODATA: load = MAIN, type = ro; + DATA: load = MAIN, type = rw; + BSS: load = MAIN, type = bss, define = yes; +} +FEATURES { + CONDES: type = constructor, + label = __CONSTRUCTOR_TABLE__, + count = __CONSTRUCTOR_COUNT__, + segment = ONCE; + CONDES: type = destructor, + label = __DESTRUCTOR_TABLE__, + count = __DESTRUCTOR_COUNT__, + segment = RODATA; + CONDES: type = interruptor, + label = __INTERRUPTOR_TABLE__, + count = __INTERRUPTOR_COUNT__, + segment = RODATA, + import = __CALLIRQ__; +} diff --git a/test/bdiff.c b/test/bdiff.c deleted file mode 100644 index 797ba4302..000000000 --- a/test/bdiff.c +++ /dev/null @@ -1,28 +0,0 @@ - -// minimal tool to compare two binaries - -#include <stdlib.h> -#include <stdio.h> - -int main(int argc, char *argv[]) -{ - FILE *f1, *f2; - if (argc < 3) { - return EXIT_FAILURE; - } - f1 = fopen(argv[1], "rb"); - f2 = fopen(argv[2], "rb"); - if ((f1 == NULL) || (f2 == NULL)) { - return EXIT_FAILURE; - } - for(;;) { - if (feof(f1) && feof(f2)) { - return EXIT_SUCCESS; - } else if (feof(f1) || feof(f2)) { - return EXIT_FAILURE; - } - if (fgetc(f1) != fgetc(f2)) { - return EXIT_FAILURE; - } - } -} diff --git a/test/dasm/4510-disass.s b/test/dasm/4510-disass.s new file mode 100644 index 000000000..96ed6419d --- /dev/null +++ b/test/dasm/4510-disass.s @@ -0,0 +1,298 @@ +.setcpu "4510" + +ZP = $12 +ABS = $2345 + +start: + brk + ora (ZP,x) + cle + see + tsb ZP + ora ZP + asl ZP + rmb0 ZP + php + ora #$01 + asl + tsy + tsb ABS + ora ABS + asl ABS + bbr0 ZP,label1 + +label1: + bpl label2 + ora (ZP),y + ora (ZP),z + lbpl start ; bpl start + trb ZP + ora ZP,x + asl ZP,x + rmb1 ZP + clc + ora ABS,y + inc + inz + trb ABS + ora ABS,x + asl ABS,x + bbr1 ZP,label2 + +label2: + jsr ABS + and (ZP,x) + jsr ($2345) + jsr ($2456,x) + bit ZP + and ZP + rol ZP + rmb2 ZP + plp + and #$01 + rol + tys + bit ABS + and ABS + rol ABS + bbr2 ZP,label3 + +label3: + bmi label4 + and (ZP),y + and (ZP),z + lbmi start ; bmi start + bit ZP,x + and ZP,x + rol ZP,x + rmb3 ZP + sec + and ABS,y + dec + dez + bit ABS,x + and ABS,x + rol ABS,x + bbr3 ZP,label4 + +label4: + rti + eor (ZP,x) + neg + asr + asr ZP + eor ZP + lsr ZP + rmb4 ZP + pha + eor #$01 + lsr + taz + jmp ABS + eor ABS + lsr ABS + bbr4 ZP,label5 + +label5: + bvc label6 + eor (ZP),y + eor (ZP),z + lbvc start ; bvc start + asr ZP,x + eor ZP,x + lsr ZP,x + rmb5 ZP + cli + eor ABS,y + phy + tab + map + eor ABS,x + lsr ABS,x + bbr5 ZP,label6 + +label6: + rts + adc (ZP,x) + rtn #$09 + bsr start + stz ZP + adc ZP + ror ZP + rmb6 ZP + pla + adc #$01 + ror + tza + jmp ($2345) + adc ABS + ror ABS + bbr6 ZP,label7 + +label7: + bvs label8 + adc (ZP),y + adc (ZP),z + lbvs start ; bvs start + stz ZP,x + adc ZP,x + ror ZP,x + rmb7 ZP + sei + adc ABS,y + ply + tba + jmp ($2456,x) + adc ABS,x + ror ABS,x + bbr7 ZP,label8 + +label8: + bra label9 + sta (ZP,x) + sta ($0f,sp),y + lbra start ; bra start + sty ZP + sta ZP + stx ZP + smb0 ZP + dey + bit #$01 + txa + sty ABS,x + sty ABS + sta ABS + stx ABS + bbs0 ZP,label9 + +label9: + bcc labelA + sta (ZP),y + sta (ZP),z + lbcc start ; bcc start + sty ZP,x + sta ZP,x + stx ZP,y + smb1 ZP + tya + sta ABS,y + txs + stx ABS,y + stz ABS + sta ABS,x + stz ABS,x + bbs1 ZP,labelA + +labelA: + ldy #$01 + lda (ZP,x) + ldx #$01 + ldz #$01 + ldy ZP + lda ZP + ldx ZP + smb2 ZP + tay + lda #$01 + tax + ldz ABS + ldy ABS + lda ABS + ldx ABS + bbs2 ZP,labelB + +labelB: + bcs labelC + lda (ZP),y + lda (ZP),z + lbcs start ; bcs start + ldy ZP,x + lda ZP,x + ldx ZP,y + smb3 ZP + clv + lda ABS,y + tsx + ldz ABS,x + ldy ABS,x + lda ABS,x + ldx ABS,y + bbs3 ZP,labelC + +labelC: + cpy #$01 + cmp (ZP,x) + cpz #$01 + dew ZP + cpy ZP + cmp ZP + dec ZP + smb4 ZP + iny + cmp #$01 + dex + asw ABS + cpy ABS + cmp ABS + dec ABS + bbs4 ZP,labelD + +labelD: + bne labelE + cmp (ZP),y + cmp (ZP),z + lbne start ; bne start + cpz ZP + cmp ZP,x + dec ZP,x + smb5 ZP + cld + cmp ABS,y + phx + phz + cpz ABS + cmp ABS,x + dec ABS,x + bbs5 ZP,labelE + +labelE: + cpx #$01 + sbc (ZP,x) + lda ($0f,sp),y + inw ZP + cpx ZP + sbc ZP + inc ZP + smb6 ZP + inx + sbc #$01 + eom + nop + row ABS + cpx ABS + sbc ABS + inc ABS + bbs6 ZP,labelF + +labelF: + beq labelG + sbc (ZP),y + sbc (ZP),z + lbeq start ; beq start + phw #$089a + sbc ZP,x + inc ZP,x + smb7 ZP + sed + sbc ABS,y + plx + plz + phd ABS + phw ABS + sbc ABS,x + inc ABS,x + bbs7 ZP,labelG + +labelG: + brk + diff --git a/test/dasm/Makefile b/test/dasm/Makefile new file mode 100644 index 000000000..542ce7d5e --- /dev/null +++ b/test/dasm/Makefile @@ -0,0 +1,65 @@ +# Makefile for the disassembler regression tests + +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + EXE = .exe + MKDIR = mkdir $(subst /,\,$1) + RMDIR = -rmdir /q /s $(subst /,\,$1) +else + EXE = + MKDIR = mkdir -p $1 + RMDIR = $(RM) -r $1 +endif + +ifdef QUIET + .SILENT: +endif + +CL65 := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) +DA65 := $(if $(wildcard ../../bin/da65*),../../bin/da65,da65) + +WORKDIR = ../../testwrk/dasm + +ISEQUAL = ../../testwrk/isequal$(EXE) + +CC = gcc +CFLAGS = -O2 + +START = --start-addr 0x8000 + +.PHONY: all clean + +SOURCES := $(wildcard *.s) +BINS = $(SOURCES:%disass.s=$(WORKDIR)/%reass.bin) +CPUS = $(SOURCES:%-disass.s=%) + +all: $(BINS) + +$(WORKDIR): + $(call MKDIR,$(WORKDIR)) + +$(ISEQUAL): ../isequal.c | $(WORKDIR) + $(CC) $(CFLAGS) -o $@ $< + +define DISASS_template + +$(WORKDIR)/$1-disass.bin: $1-disass.s | $(WORKDIR) + $(CL65) --cpu $1 -t none $(START) -o $$@ $$< + +$(WORKDIR)/$1-reass.s: $(WORKDIR)/$1-disass.bin + $(DA65) --cpu $1 $(START) -o $$@ $$< + +$(WORKDIR)/$1-reass.bin: $(WORKDIR)/$1-reass.s $(ISEQUAL) + $(if $(QUIET),echo dasm/$1-reass.bin) + $(CL65) --cpu $1 -t none $(START) -o $$@ $$< + $(ISEQUAL) $(WORKDIR)/$1-disass.bin $$@ + +endef # DISASS_template + +$(foreach cpu,$(CPUS),$(eval $(call DISASS_template,$(cpu)))) + +clean: + @$(call RMDIR,$(WORKDIR)) diff --git a/test/err/Makefile b/test/err/Makefile index bc4226acb..1273bbb2c 100644 --- a/test/err/Makefile +++ b/test/err/Makefile @@ -1,29 +1,45 @@ -# makefile for the tests that MUST NOT compile +# Makefile for the tests that MUST NOT compile ifneq ($(shell echo),) - CMD_EXE := 1 + CMD_EXE = 1 endif ifdef CMD_EXE - NOT := - # Hack - DEL = -del /f $(subst /,\,$1) + S = $(subst /,\,/) + NOT = - # Hack + NULLDEV = nul: + MKDIR = mkdir $(subst /,\,$1) + RMDIR = -rmdir /s /q $(subst /,\,$1) else - NOT := ! - DEL = $(RM) $1 + S = / + NOT = ! + NULLDEV = /dev/null + MKDIR = mkdir -p $1 + RMDIR = $(RM) -r $1 endif -CC65 := $(if $(wildcard ../../bin/cc65*),../../bin/cc65,cc65) +ifdef QUIET + .SILENT: + NULLERR = 2>$(NULLDEV) +endif -WORKDIR := ../../testwrk +CC65 := $(if $(wildcard ../../bin/cc65*),..$S..$Sbin$Scc65,cc65) + +WORKDIR = ../../testwrk/err .PHONY: all clean -TESTS := $(patsubst %.c,$(WORKDIR)/%.s,$(wildcard *.c)) +SOURCES := $(wildcard *.c) +TESTS = $(patsubst %.c,$(WORKDIR)/%.s,$(SOURCES)) all: $(TESTS) -$(WORKDIR)/%.s: %.c - $(NOT) $(CC65) -o $@ $< +$(WORKDIR): + $(call MKDIR,$(WORKDIR)) + +$(WORKDIR)/%.s: %.c | $(WORKDIR) + $(if $(QUIET),echo err/$*.s) + $(NOT) $(CC65) -o $@ $< $(NULLERR) clean: - @$(call DEL,$(TESTS)) + @$(call RMDIR,$(WORKDIR)) diff --git a/test/err/bitfield-named-zero-width.c b/test/err/bitfield-named-zero-width.c new file mode 100644 index 000000000..108b195d0 --- /dev/null +++ b/test/err/bitfield-named-zero-width.c @@ -0,0 +1,29 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Test of bit-field with zero-width named field +*/ + +struct s { + unsigned int x : 4; + unsigned int y : 0; + unsigned int z : 4; +}; diff --git a/test/err/bitfield-negative-width.c b/test/err/bitfield-negative-width.c new file mode 100644 index 000000000..a90199f38 --- /dev/null +++ b/test/err/bitfield-negative-width.c @@ -0,0 +1,27 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Test of bit-field with negative width. +*/ + +struct s { + unsigned int x : -1; +}; diff --git a/test/err/bitfield-too-wide.c b/test/err/bitfield-too-wide.c new file mode 100644 index 000000000..424cf9c05 --- /dev/null +++ b/test/err/bitfield-too-wide.c @@ -0,0 +1,27 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Test of bit-field with too large width. +*/ + +struct s { + unsigned int x : 17; +}; diff --git a/test/err/bss-name-conflict.c b/test/err/bss-name-conflict.c new file mode 100644 index 000000000..1d6cd5066 --- /dev/null +++ b/test/err/bss-name-conflict.c @@ -0,0 +1,20 @@ +/* + !!DESCRIPTION!! conflicting bss-name pragmas + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Piotr Fusik +*/ + +/* + see: https://github.com/cc65/cc65/issues/409 +*/ + +char oam_off; +#pragma bss-name (push,"ZEROPAGE") +char oam_off; +#pragma bss-name (pop) + +int main(void) +{ + return 0; +} diff --git a/test/err/bug1001.c b/test/err/bug1001.c new file mode 100644 index 000000000..62737c178 --- /dev/null +++ b/test/err/bug1001.c @@ -0,0 +1,10 @@ + +/* https://github.com/cc65/cc65/issues/1001 */ + +#include <stdio.h> + +int main(void) +{ + printf("test",); /* should be an error */ + return 0; +} diff --git a/test/err/bug1048.c b/test/err/bug1048.c new file mode 100644 index 000000000..d022474d6 --- /dev/null +++ b/test/err/bug1048.c @@ -0,0 +1,15 @@ +/* bug #1048: The following code has two errors: a redeclared enum type and an + undeclared enum type: */ + +#include <stdlib.h> + +// this should NOT compile - but with cc65 it does +enum e { x }; +enum e { y }; + +int f() { return sizeof(enum undeclared); } + +int main(void) +{ + return EXIT_SUCCESS; +} diff --git a/test/err/bug1098.c b/test/err/bug1098.c new file mode 100644 index 000000000..eddbce3f1 --- /dev/null +++ b/test/err/bug1098.c @@ -0,0 +1,13 @@ + +/* bug #1098 Empty enumerator-list */ + +/* The C Standard requires that something exists between the braces for + * enum, struct, and union. */ + +enum { +}; + +int main(void) +{ + return 0; +} diff --git a/test/err/bug1098a.c b/test/err/bug1098a.c new file mode 100644 index 000000000..aed750267 --- /dev/null +++ b/test/err/bug1098a.c @@ -0,0 +1,13 @@ + +/* bug #1098 Empty enumerator-list */ + +/* The C Standard requires that something exists between the braces for + * enum, struct, and union. */ + +struct { +}; + +int main(void) +{ + return 0; +} diff --git a/test/err/bug1098b.c b/test/err/bug1098b.c new file mode 100644 index 000000000..5f6d8b0f2 --- /dev/null +++ b/test/err/bug1098b.c @@ -0,0 +1,13 @@ + +/* bug #1098 Empty enumerator-list */ + +/* The C Standard requires that something exists between the braces for + * enum, struct, and union. */ + +union { +}; + +int main(void) +{ + return 0; +} diff --git a/test/err/bug1113.c b/test/err/bug1113.c new file mode 100644 index 000000000..d1aecaa0b --- /dev/null +++ b/test/err/bug1113.c @@ -0,0 +1,12 @@ + +/* bug #1113 - Compiler crashes when calling functions "redefined" as other types */ + +void f() {} + +int f; + +int main(void) +{ + f(); + return 0; +} diff --git a/test/err/bug1143err.c b/test/err/bug1143err.c new file mode 100644 index 000000000..03a6e6d35 --- /dev/null +++ b/test/err/bug1143err.c @@ -0,0 +1,11 @@ + +/* bug #1143 - Multiple storage class specifiers in one declaration? */ + +static static void* y[1]; /* warning */ +extern static int a; /* error */ +extern typedef int A; /* error */ + +int main(void) +{ + return 0; +} diff --git a/test/err/bug1145.c b/test/err/bug1145.c new file mode 100644 index 000000000..23401f91b --- /dev/null +++ b/test/err/bug1145.c @@ -0,0 +1,13 @@ + +/* bug #1145 - Internal error with function type object */ + +void f() +{ + f = 0; /* internal error */ +} + +int main(void) +{ + f(); + return 0; +} diff --git a/test/err/bug264.c b/test/err/bug264.c new file mode 100644 index 000000000..6898f3790 --- /dev/null +++ b/test/err/bug264.c @@ -0,0 +1,62 @@ +/* bug #264 - cc65 fails to warn about a function returning struct */ + +#include <stdio.h> +#include <stdlib.h> +#include <stdint.h> + +typedef uint32_t u32; +typedef uint16_t u16; + +/* this struct is too large, we can only handle max 4 bytes right now */ +typedef struct { + u32 quot; + u32 rem; +} udiv_t; + +udiv_t div3(u32 in) { + + udiv_t u; + u32 q = 0; + + while (in >= 300) { + in -= 300; + q += 100; + } + + while (in >= 30) { + in -= 30; + q += 10; + } + + while (in >= 3) { + in -= 3; + ++q; + } + + u.quot = q; + u.rem = in; + + return u; /* error */ +} + +int res = 0; + +int main(void) { + + u32 i; + div_t d; + udiv_t u; + + for (i = 1024; i; i--) { + d = div((u16)i, 3); + u = div3(i); + + if (d.quot != u.quot || d.rem != u.rem) { + printf("Mismatch at %u/3, div %u %u, div3 %u %u\n", i, + d.quot, d.rem, u.quot, u.rem); + res++; + } + } + + return res; +} diff --git a/test/err/cc65091001.c b/test/err/cc65091001.c index 65ce6ec83..8bcf158ac 100644 --- a/test/err/cc65091001.c +++ b/test/err/cc65091001.c @@ -27,4 +27,4 @@ int main() { printf("it works :)\n"); return 0; -} \ No newline at end of file +} diff --git a/test/err/duplicate-global-static.c b/test/err/duplicate-global-static.c new file mode 100644 index 000000000..6aa27f5b7 --- /dev/null +++ b/test/err/duplicate-global-static.c @@ -0,0 +1,18 @@ +/* + !!DESCRIPTION!! global duplicated with static variable + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Piotr Fusik +*/ + +/* + see: https://github.com/cc65/cc65/issues/191 +*/ + +int n = 0; +static int n = 0; /* should give an error */ + +int main(void) +{ + return n; +} diff --git a/test/err/duplicate-global.c b/test/err/duplicate-global.c new file mode 100644 index 000000000..bd4fcc24a --- /dev/null +++ b/test/err/duplicate-global.c @@ -0,0 +1,20 @@ +/* + !!DESCRIPTION!! duplicate globals + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Piotr Fusik +*/ + +/* + see: https://github.com/cc65/cc65/issues/191 +*/ + +#pragma warn(error, on) + +int n = 0; +int n = 0; /* should give an error */ + +int main(void) +{ + return n; +} diff --git a/test/err/duplicate-static-global.c b/test/err/duplicate-static-global.c new file mode 100644 index 000000000..6e5e70a37 --- /dev/null +++ b/test/err/duplicate-static-global.c @@ -0,0 +1,18 @@ +/* + !!DESCRIPTION!! static duplicated with global variable + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Piotr Fusik +*/ + +/* + see: https://github.com/cc65/cc65/issues/191 +*/ + +static int n = 0; +int n = 0; /* should give an error */ + +int main(void) +{ + return n; +} diff --git a/test/err/duplicate-static.c b/test/err/duplicate-static.c new file mode 100644 index 000000000..394cc1e09 --- /dev/null +++ b/test/err/duplicate-static.c @@ -0,0 +1,20 @@ +/* + !!DESCRIPTION!! duplicate static variables + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Piotr Fusik +*/ + +/* + see: https://github.com/cc65/cc65/issues/191 +*/ + +#pragma warn(error, on) + +static int n = 0; +static int n = 0; /* should give an error */ + +int main(void) +{ + return n; +} diff --git a/test/err/front.c b/test/err/front.c index dde8d47ec..af59209b7 100644 --- a/test/err/front.c +++ b/test/err/front.c @@ -5,25 +5,25 @@ */ main() { - return 0; + return 0; } nested(a,b) { - if ((a<4 && b == 'r') - || (a == 1 && (b == 'h' || b == 'i')) - || (a == 2 && (b == 'o' || b == 'y')) - ) a=b; + if ((a<4 && b == 'r') + || (a == 1 && (b == 'h' || b == 'i')) + || (a == 2 && (b == 'o' || b == 'y')) + ) a=b; } /* type name scope */ -void s(struct D *d) {} /* this struct D differs from the one below */ +void s(struct D *d) {} /* this struct D differs from the one below */ typedef struct D D; struct D {int x, y;} Dy={0}; D Dz={1}; Dfunc(){ - D a; a.y=1; - s(&Dy); /* error */ + D a; a.y=1; + s(&Dy); /* error */ } /* qualifiers */ @@ -33,39 +33,39 @@ const int a, *x; int b, *y; volatile unsigned z; f() { - x = y; - z = z + z; /* should be 2 references to z's r-value */ + x = y; + z = z + z; /* should be 2 references to z's r-value */ } f1() { - x = &a; - x = &b; - y = &a; /* error */ - y = &b; + x = &a; + x = &b; + y = &a; /* error */ + y = &b; } f2(int **a, int **b) { - f(&x, &y); - **a = 0; - return **b; + f(&x, &y); + **a = 0; + return **b; } g(const int *p) { - g(&a); - g(&b); - return *p; + g(&a); + g(&b); + return *p; } h(int *p) { - f(&a); - f(&b); - return *p; + f(&a); + f(&b); + return *p; } h1(const int x, int y) { - h1(a,b); - h1(b,a); - return x + y; + h1(a,b); + h1(b,a); + return x + y; } h2() { - char *b; const void *p; - p = b; - b = p; /* error (incompatible pointer type) */ + char *b; const void *p; + p = b; + b = p; /* error (incompatible pointer type) */ } /* static naming */ @@ -120,14 +120,14 @@ extern int strcmp(const char*, const char*); extern void qsort(void*, int, int, int (*)(const void*, const void*)); extern int cmp(char**a, char**b) { return strcmp(*a,*b); } sort() { - int n; char *a[100]; - qsort(a, n, sizeof(char*), (int (*)(const void*, const void*))cmp); + int n; char *a[100]; + qsort(a, n, sizeof(char*), (int (*)(const void*, const void*))cmp); qsort(a, n, sizeof(char*), cmp); /* error (incompatible pointer type) */ } /* nasty calls */ onearg(){ - int a,b,c,d; - f( ( (a? (b = 1): (c = 2)), (d ? 3 : 4) ) ); /* 1 argument */ + int a,b,c,d; + f( ( (a? (b = 1): (c = 2)), (d ? 3 : 4) ) ); /* 1 argument */ } diff --git a/test/err/pr1110.c b/test/err/pr1110.c new file mode 100644 index 000000000..671abf9a4 --- /dev/null +++ b/test/err/pr1110.c @@ -0,0 +1,15 @@ + +/* pr #1110 - not only should the current test case for #975 compile and work, + * but also the code piece below fail to compile and generate errors like commented: */ + +static const unsigned char array[3]; /* OK */ +static const unsigned char array[] = { 0, 1, 2 }; /* OK - complete definition*/ +static const unsigned char array[3]; /* OK */ +static const unsigned char array[]; /* OK */ +static const unsigned char array[] = { 1, 2, 3 }; /* Error - redefinition */ +static const unsigned char array[4]; /* Error - conflicting size */ + +int main(void) +{ + return 0; +} diff --git a/test/err/pr1135.c b/test/err/pr1135.c new file mode 100644 index 000000000..01eff7d93 --- /dev/null +++ b/test/err/pr1135.c @@ -0,0 +1,8 @@ + +void f(void) {} +void f(int); /* Should fail */ + +int main(void) +{ + return 0; +} diff --git a/test/err/pr1189.c b/test/err/pr1189.c new file mode 100644 index 000000000..af1d237f1 --- /dev/null +++ b/test/err/pr1189.c @@ -0,0 +1,12 @@ +/* pr #1189 - Fixed compiler CHECK failure when calling functions defined with duplicate param names */ + +void f(int a, int a) +{ + +} + +int main(void) +{ + f(0, 1); /* Check failed: (Param->Flags & SC_PARAM) != 0 */ + return 0; +} diff --git a/test/err/staticassert-nomsg.c b/test/err/staticassert-nomsg.c new file mode 100644 index 000000000..8cdcb09a4 --- /dev/null +++ b/test/err/staticassert-nomsg.c @@ -0,0 +1,26 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* +** Test of failing _Static_assert. +**/ + + +_Static_assert(0 == 1); diff --git a/test/err/staticassert.c b/test/err/staticassert.c new file mode 100644 index 000000000..60cb37529 --- /dev/null +++ b/test/err/staticassert.c @@ -0,0 +1,26 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* +** Test of failing _Static_assert. +**/ + + +_Static_assert(0, "0 should be false."); diff --git a/test/err/void-empty.c b/test/err/void-empty.c new file mode 100644 index 000000000..900918222 --- /dev/null +++ b/test/err/void-empty.c @@ -0,0 +1,9 @@ +/* + !!DESCRIPTION!! Uninitialized void variables + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Greg King +*/ + +void test; +const void list; diff --git a/test/err/void-size2.c b/test/err/void-size2.c new file mode 100644 index 000000000..3d4f13322 --- /dev/null +++ b/test/err/void-size2.c @@ -0,0 +1,11 @@ +/* + !!DESCRIPTION!! Size of void cast + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Greg King +*/ + +unsigned test (void) +{ + return sizeof ((void)12345); +} diff --git a/test/isequal.c b/test/isequal.c new file mode 100644 index 000000000..1add62412 --- /dev/null +++ b/test/isequal.c @@ -0,0 +1,480 @@ + +// minimal tool to compare two text files + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> + +#define ARRAYSIZE(_x) (sizeof _x / sizeof _x[0]) + +typedef int wildcardfunc(FILE * f2); + +struct wildcardtype { + char * name; + wildcardfunc * func; +}; + + +static int wildcard_path(FILE * f1); +static int wildcard_integer(FILE * f1); + +struct wildcardtype wildcards[] = { + { "PATH", wildcard_path }, + { "INTEGER", wildcard_integer } +}; + +static wildcardfunc * currentwildcardfunc = 0; + +static int binary = 0; +static int empty = 0; +static int skiplines_left = 0; +static int skiplines_right = 0; +static int use_wildcards = 0; +static char * filename_left = 0; +static char * filename_right = 0; + +/* LOOKAHEADBUFFERSIZE must be a power of 2, because the wrap-around for the + indices requires this! +*/ +#define LOOKAHEADBUFFERSIZE 0x80 +#define WILDCARDCHAR_OPEN '<' +#define WILDCARDCHAR_INTERNAL '#' +#define WILDCARDCHAR_CLOSE '>' + +#define WILDCARDCHAR_OPEN_CLOSE_COUNT 3 +#define WILDCARDNAME_MAXLENGTH 20 + +static char lookaheadbuffer[LOOKAHEADBUFFERSIZE] = { 0 }; +static int lookaheadindexread = 0; +static int lookaheadindexwrite = 0; + +static int wildcardendchar; + +wildcardfunc * findwildcardfunc(char * wildcardname) +{ + wildcardfunc * func = NULL; + + unsigned int i; + + for (i = 0; i < ARRAYSIZE(wildcards); ++i) { + if (strcmp(wildcards[i].name, wildcardname) == 0) { + func = wildcards[i].func; + } + } + + return func; +} + +static int handleargparameter(int offset, char * parameter) +{ + long number = -1; + char * endptr = NULL; + + if (parameter[offset++] != '=') { + return -1; + } + + number = strtol(parameter + offset, &endptr, 10); + + if (endptr == NULL || *endptr != 0) { + return -1; + + } + return number; +} + +static int handleparameter(int argc, char *argv[]) +{ + static const char opt_binary[] = "--binary"; + static const char opt_empty[] = "--empty"; + static const char opt_skipleft[] = "--skipleft"; + static const char opt_skipright[] = "--skipright"; + static const char opt_skip[] = "--skip"; + static const char opt_wildcards[] = "--wildcards"; + + static const char len_skipleft = sizeof opt_skipleft - 1; + static const char len_skipright = sizeof opt_skipright - 1; + static const char len_skip = sizeof opt_skip - 1; + + int argindex = 1; + + if (argc < 2) { + return -1; + } + + while (argindex < argc && argv[argindex] && argv[argindex][0] == '-') { + if (strcmp(argv[argindex], opt_binary) == 0) { + if (empty || skiplines_left || skiplines_right) { + fprintf(stderr, "--empty cannot go with other options.\n"); + exit(1); + } + binary = 1; + } + else if (strcmp(argv[argindex], opt_empty) == 0) { + if (binary || skiplines_left || skiplines_right || use_wildcards) { + fprintf(stderr, "--binary cannot go with other options.\n"); + exit(1); + } + empty = 1; + } + else if (strncmp(argv[argindex], opt_skipleft, len_skipleft) == 0) { + if (binary || empty) { + fprintf(stderr, "%s cannot go with other options.\n", opt_skipleft); + exit(1); + } + skiplines_left = handleargparameter(len_skipleft, argv[argindex]); + if (skiplines_left < 0) { + fprintf(stderr, "%s: you must specify the number of lines\n", opt_skipleft); + } + } + else if (strncmp(argv[argindex], opt_skipright, len_skipright) == 0) { + if (binary || empty) { + fprintf(stderr, "%s cannot go with other options.\n", opt_skipright); + exit(1); + } + skiplines_right = handleargparameter(len_skipright, argv[argindex]); + if (skiplines_right < 0) { + fprintf(stderr, "%s: you must specify the number of lines\n", opt_skipright); + } + } + else if (strncmp(argv[argindex], opt_skip, len_skip) == 0) { + if (binary || empty) { + fprintf(stderr, "%s cannot go with other options.\n", opt_skipright); + exit(1); + } + skiplines_left = skiplines_right = handleargparameter(len_skip, argv[argindex]); + if (skiplines_left < 0) { + fprintf(stderr, "%s: you must specify the number of lines\n", opt_skip); + } + } + else if (strcmp(argv[argindex], opt_wildcards) == 0) { + if (binary) { + fprintf(stderr, "--wildcards cannot go with --binary.\n"); + exit(1); + } + use_wildcards = 1; + } + ++argindex; + } + + if (argc + empty - argindex != 2) { + fprintf(stderr, "filenames are missing!\n"); + return -1; + } + + filename_left = argv[argindex++]; + filename_right = argv[argindex++]; + + return 0; +} + +/* get the next character from FILE and convert commonly used line-endings all + into the same value (0x0a, as used on *nix systems) + + recognized values/pairs: + + 0x0a (LF) Linux, macOS + 0x0d, 0x0a (CR, LF) Windows, MSDOS, OS/2 + 0x0d (CR) classic MacOS +*/ + +static int getnext(FILE *f) +{ + int c = fgetc(f); + if (!binary && c == 0x0d) { + if (!feof(f)) { + int n = fgetc(f); + if (n != 0x0a) { + ungetc(n, f); + } + clearerr(f); /* clears EOF when we did not push back */ + } + return 0x0a; + } + return c; +} + +static void skiplines(FILE *f, int skipcount) +{ + int c; + + while (skipcount > 0) { + c = getnext(f); + if (feof(f)) { + return; + } + + if (c == 0x0a) { + --skipcount; + } + } +} + +static int comparefiles(FILE *f1, FILE *f2) +{ + for(;;) { + if (feof(f1) && feof(f2)) { + return EXIT_SUCCESS; + } else if (feof(f1) || feof(f2)) { + return EXIT_FAILURE; + } + if (getnext(f1) != getnext(f2)) { + return EXIT_FAILURE; + } + } +} + +static int lookaheadbufferisempty(void) +{ + return lookaheadindexread == lookaheadindexwrite; +} + +static char lookaheadbufferread(void) +{ + char ch; + + if (lookaheadbufferisempty()) { + fprintf(stderr, "### want to take from lookahead buffer, but it is empty --> aborting!\n"); + exit(EXIT_FAILURE); + } + + ch = lookaheadbuffer[lookaheadindexread]; + + /* advance read pointer, with wrap-around */ + lookaheadindexread = (lookaheadindexread + 1) & (sizeof lookaheadbuffer - 1); + + return ch; +} + +static void lookaheadbufferwrite(char ch) +{ + lookaheadbuffer[lookaheadindexwrite] = ch; + + /* advance write pointer, with wrap-around */ + lookaheadindexwrite = (lookaheadindexwrite + 1) & (sizeof lookaheadbuffer - 1); + + if (lookaheadbufferisempty()) { + fprintf(stderr, "### lookahead buffer ovrrun, aborting!\n"); + exit(EXIT_FAILURE); + } +} + +static int processwildcardchar(FILE *f1) +{ + int countwildcardchar = 1; + int foundwildcard = 0; + int ch; + + static char wildcardname[WILDCARDNAME_MAXLENGTH + 1]; + unsigned int wildcardnamenextindex; + + while ((ch = getnext(f1)) == WILDCARDCHAR_OPEN) { + ++countwildcardchar; + if (feof(f1)) { + break; + } + } + + if (countwildcardchar == WILDCARDCHAR_OPEN_CLOSE_COUNT) { + if (ch == WILDCARDCHAR_INTERNAL) { + /* we found a wildcard! */ + foundwildcard = 1; + } + } + else { + if (ch == WILDCARDCHAR_OPEN) { + ch = -1; + } + } + + if (foundwildcard) { + char c; + + /* we found a wildcard init sequence; now check which wildcard it is */ + + wildcardnamenextindex = 0; + wildcardname[WILDCARDNAME_MAXLENGTH] = 0; + + c = getnext(f1); + while (c != WILDCARDCHAR_INTERNAL && c != 0x0a && !feof(f1)) { + wildcardname[wildcardnamenextindex] = c; + if (++wildcardnamenextindex >= WILDCARDNAME_MAXLENGTH) { + wildcardname[WILDCARDNAME_MAXLENGTH] = 0; + fprintf(stderr, "wildcard '%s' is too long!\n", wildcardname); + exit(EXIT_FAILURE); + } + c = getnext(f1); + } + + wildcardname[wildcardnamenextindex] = 0; + + if (c == WILDCARDCHAR_INTERNAL) { + int countwildcardcharclose = 0; + + fprintf(stderr, "Found wildcard '%s'\n", wildcardname); + + while ((c = getnext(f1)) == WILDCARDCHAR_CLOSE && !feof(f1)) { + ++countwildcardcharclose; + } + + wildcardendchar = c; /* remember next char */ + + currentwildcardfunc = findwildcardfunc(wildcardname); + if (currentwildcardfunc == NULL) { + fprintf(stderr, "Wildcard '%s' is unknown!\n", wildcardname); + exit(EXIT_FAILURE); + } + } + else { + fprintf(stderr, "Thought I found wildcard '%s', but it does not end.\n", wildcardname); + } + } + + if (!foundwildcard) { + int i; + + /* no wildcard; restore the chars */ + for (i = 0; i < countwildcardchar; ++i) { + lookaheadbufferwrite(WILDCARDCHAR_OPEN); + } + + if (ch >= 0) { + lookaheadbufferwrite(ch); + } + } + + return foundwildcard; +} + +static int wildcard_path(FILE * f2) +{ + int isstillwildcard = 1; + static int allowedcolonin = 2; + + int ch = getnext(f2); + + if (allowedcolonin >= 0) { + --allowedcolonin; + } + + if ((ch == wildcardendchar) || ch < ' ' || ch > 126) { + /* this is not a path char anymore, abort the wildcard processing */ + + /* first of all, ignore a colon at position 2 if it is the wildcardendchar. + * This is needed for windows path specifications, which can begin with + * a drive specifier and a colon. + */ + + if ( (allowedcolonin >= 0) && (ch == ':') ) { + fprintf(stderr, "Ignoring ':' at drive specifier, do not end the path here!\n"); + } + else { + isstillwildcard = 0; + + allowedcolonin = 2; + + if (ch != wildcardendchar) { + exit(EXIT_FAILURE); + } + } + } + + + return isstillwildcard; +} + +static int wildcard_integer(FILE * f2) +{ + int isstillwildcard = 1; + int ch = getnext(f2); + + if ((ch == wildcardendchar) || ch < '0' || ch > '9') { + /* this is not a digit anymore, abort the wildcard processing */ + isstillwildcard = 0; + + if (ch != wildcardendchar) { + exit(EXIT_FAILURE); + } + } + + return isstillwildcard; +} + +static int comparefileswithwildcards(FILE *f1, FILE *f2) +{ + static int iswildcard = 0; + + for(;;) { + int c1; + + if (lookaheadbufferisempty() && !iswildcard && feof(f1) && feof(f2)) { + return EXIT_SUCCESS; + } else if (((lookaheadbufferisempty() && !iswildcard && feof(f1))) || feof(f2)) { + return EXIT_FAILURE; + } + + if (iswildcard) { + /* f1 has a wildcard; process that */ + iswildcard = currentwildcardfunc(f2); + } + else { + /* f1 does not have a wildcard; process the next char (unless it starts a wildcard) */ + if (lookaheadbufferisempty()) { + c1 = getnext(f1); + if (c1 == WILDCARDCHAR_OPEN) { + iswildcard = processwildcardchar(f1); + continue; + } + } + else { + c1 = lookaheadbufferread(); + } + if (c1 != getnext(f2)) { + return EXIT_FAILURE; + } + } + } +} + +int main(int argc, char *argv[]) +{ + FILE *f1, *f2; + + if (handleparameter(argc, argv) < 0) { + return EXIT_FAILURE; + } + + f1 = fopen(filename_left, "rb"); + if (f1 == NULL) { + return EXIT_FAILURE; + } + + if (empty) { + fseek(f1, 0, SEEK_END); + if (ftell(f1) != 0) { + return EXIT_FAILURE; + } + else { + return EXIT_SUCCESS; + } + } + else { + if (skiplines_left) { + skiplines(f1, skiplines_left); + } + + f2 = fopen(filename_right, "rb"); + if (f2 == NULL) { + return EXIT_FAILURE; + } + if (skiplines_right) { + skiplines(f2, skiplines_right); + } + if (use_wildcards) { + return comparefileswithwildcards(f1, f2); + } + else { + return comparefiles(f1, f2); + } + } +} diff --git a/test/misc/Makefile b/test/misc/Makefile index 918316c6c..e6c58c5a4 100644 --- a/test/misc/Makefile +++ b/test/misc/Makefile @@ -1,63 +1,164 @@ - -# makefile for the remaining tests that need special care in one way or another +# Makefile for the remaining tests that need special care in one way or another ifneq ($(shell echo),) - CMD_EXE := 1 + CMD_EXE = 1 endif ifdef CMD_EXE - S := $(subst /,\,/) - NOT := - # Hack - DEL = -del /f $(subst /,\,$1) + S = $(subst /,\,/) + NOT = - # Hack + EXE = .exe + NULLDEV = nul: + MKDIR = mkdir $(subst /,\,$1) + RMDIR = -rmdir /s /q $(subst /,\,$1) else - S := / - NOT := ! - DEL = $(RM) $1 + S = / + NOT = ! + EXE = + NULLDEV = /dev/null + MKDIR = mkdir -p $1 + RMDIR = $(RM) -r $1 endif -CC65FLAGS := -t sim6502 -SIM65FLAGS := -x 200000000 +ifdef QUIET + .SILENT: + NULLOUT = >$(NULLDEV) + NULLERR = 2>$(NULLDEV) +endif -CL65 := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) +SIM65FLAGS = -x 200000000 + +CC65 := $(if $(wildcard ../../bin/cc65*),..$S..$Sbin$Scc65,cc65) +CA65 := $(if $(wildcard ../../bin/ca65*),..$S..$Sbin$Sca65,ca65) +LD65 := $(if $(wildcard ../../bin/ld65*),..$S..$Sbin$Sld65,ld65) SIM65 := $(if $(wildcard ../../bin/sim65*),..$S..$Sbin$Ssim65,sim65) -WORKDIR := ..$S..$Stestwrk -DIFF := $(WORKDIR)/bdiff +WORKDIR = ..$S..$Stestwrk$Smisc + +OPTIONS = g O Os Osi Osir Osr Oi Oir Or + +ISEQUAL = ..$S..$Stestwrk$Sisequal$(EXE) + +CC = gcc +CFLAGS = -O2 .PHONY: all clean SOURCES := $(wildcard *.c) -TESTS := $(foreach option,. .o. .os. .osi. .osir. .oi. .oir. .or.,$(SOURCES:%.c=$(WORKDIR)/%$(option)prg)) +TESTS = $(foreach option,$(OPTIONS),$(SOURCES:%.c=$(WORKDIR)/%.$(option).6502.prg)) +TESTS += $(foreach option,$(OPTIONS),$(SOURCES:%.c=$(WORKDIR)/%.$(option).65c02.prg)) all: $(TESTS) +$(WORKDIR): + $(call MKDIR,$(WORKDIR)) + +$(ISEQUAL): ../isequal.c | $(WORKDIR) + $(CC) $(CFLAGS) -o $@ $< + +define PRG_template + +# should compile, but gives an error +$(WORKDIR)/bug760.$1.$2.prg: bug760.c | $(WORKDIR) + @echo "FIXME: " $$@ "currently does not compile." + $(if $(QUIET),echo misc/bug760.$1.$2.prg) + $(NOT) $(CC65) -t sim$2 -$1 -o $$@ $$< $(NULLERR) + +# should compile, but gives an error +$(WORKDIR)/bug1437.$1.$2.prg: bug1437.c | $(WORKDIR) + @echo "FIXME: " $$@ "currently does not compile." + $(if $(QUIET),echo misc/bug1437.$1.$2.prg) + $(NOT) $(CC65) -t sim$2 -$1 -o $$@ $$< $(NULLERR) + +# should compile, but gives an error +$(WORKDIR)/bug1209-ind-goto-rev.$1.$2.prg: bug1209-ind-goto-rev.c | $(WORKDIR) + @echo "FIXME: " $$@ "currently does not compile." + $(if $(QUIET),echo misc/bug1209-ind-goto-rev.$1.$2.prg) + $(CC65) -t sim$2 -$1 -o $$(@:.prg=.s) $$< $(NULLERR) + $(CA65) -t sim$2 -o $$(@:.prg=.o) $$(@:.prg=.s) $(NULLERR) + $(NOT) $(LD65) -t sim$2 -o $$@ $$(@:.prg=.o) sim$2.lib $(NULLERR) + +# should compile, but gives an error +$(WORKDIR)/bug1209-ind-goto-rev-2.$1.$2.prg: bug1209-ind-goto-rev-2.c | $(WORKDIR) + @echo "FIXME: " $$@ "currently does not compile." + $(if $(QUIET),echo misc/bug1209-ind-goto-rev-2.$1.$2.prg) + $(CC65) -t sim$2 -$1 -o $$(@:.prg=.s) $$< $(NULLERR) + $(CA65) -t sim$2 -o $$(@:.prg=.o) $$(@:.prg=.s) $(NULLERR) + $(NOT) $(LD65) -t sim$2 -o $$@ $$(@:.prg=.o) sim$2.lib $(NULLERR) + +# should compile, but gives an error +$(WORKDIR)/bug1209-ind-goto-rev-3.$1.$2.prg: bug1209-ind-goto-rev-3.c | $(WORKDIR) + @echo "FIXME: " $$@ "currently does not compile." + $(if $(QUIET),echo misc/bug1209-ind-goto-rev-3.$1.$2.prg) + $(CC65) -t sim$2 -$1 -o $$(@:.prg=.s) $$< $(NULLERR) + $(CA65) -t sim$2 -o $$(@:.prg=.o) $$(@:.prg=.s) $(NULLERR) + $(NOT) $(LD65) -t sim$2 -o $$@ $$(@:.prg=.o) sim$2.lib $(NULLERR) + +# should compile, but gives an error +$(WORKDIR)/pptest2.$1.$2.prg: pptest2.c | $(WORKDIR) + @echo "FIXME: " $$@ "currently does not compile." + $(if $(QUIET),echo misc/pptest2.$1.$2.prg) + $(NOT) $(CC65) -t sim$2 -$1 -o $$@ $$< $(NULLERR) + +# should compile, but gives an error +$(WORKDIR)/bug1263.$1.$2.prg: bug1263.c | $(WORKDIR) + @echo "FIXME: " $$@ "currently does not compile." + $(if $(QUIET),echo misc/bug1263.$1.$2.prg) + $(NOT) $(CC65) -t sim$2 -$1 -o $$@ $$< $(NULLERR) + +# should compile, but gives an error +$(WORKDIR)/bug1357.$1.$2.prg: bug1357.c | $(WORKDIR) + @echo "FIXME: " $$@ "currently does not compile." + $(if $(QUIET),echo misc/bug1357.$1.$2.prg) + $(NOT) $(CC65) -t sim$2 -$1 -o $$@ $$< $(NULLERR) + +# should compile, but compiler exits with internal error +$(WORKDIR)/bug1211-ice-move-refs-2.$1.$2.prg: bug1211-ice-move-refs-2.c | $(WORKDIR) + @echo "FIXME: " $$@ "currently does not compile." + $(if $(QUIET),echo misc/bug1211-ice-move-refs-2.$1.$2.prg) + $(NOT) $(CC65) -t sim$2 -$1 -o $$@ $$< $(NULLERR) + +# this one requires --std=c89, it fails with --std=c99 +$(WORKDIR)/bug1265.$1.$2.prg: bug1265.c | $(WORKDIR) + $(if $(QUIET),echo misc/bug1265.$1.$2.prg) + $(CC65) --standard c89 -t sim$2 -$1 -o $$(@:.prg=.s) $$< $(NULLERR) + $(CA65) -t sim$2 -o $$(@:.prg=.o) $$(@:.prg=.s) $(NULLERR) + $(LD65) -t sim$2 -o $$@ $$(@:.prg=.o) sim$2.lib $(NULLERR) + $(SIM65) $(SIM65FLAGS) $$@ $(NULLOUT) $(NULLERR) + # should compile, but then hangs in an endless loop -$(WORKDIR)/endless%prg: endless.c - $(CL65) $(subst .,,$(*:.o%=-O%)) $(CC65FLAGS) $< -o $@ - $(NOT) $(SIM65) $(SIM65FLAGS) $@ +$(WORKDIR)/endless.$1.$2.prg: endless.c | $(WORKDIR) + $(if $(QUIET),echo misc/endless.$1.$2.prg) + $(CC65) -t sim$2 -$1 -o $$(@:.prg=.s) $$< $(NULLERR) + $(CA65) -t sim$2 -o $$(@:.prg=.o) $$(@:.prg=.s) $(NULLERR) + $(LD65) -t sim$2 -o $$@ $$(@:.prg=.o) sim$2.lib $(NULLERR) + $(NOT) $(SIM65) $(SIM65FLAGS) $$@ $(NULLOUT) $(NULLERR) # these need reference data that can't be generated by a host-compiled program, # in a useful way -$(WORKDIR)/limits%prg: limits.c - $(CL65) $(subst .,,$(*:.o%=-O%)) $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ > $(WORKDIR)/limits.out - $(DIFF) $(WORKDIR)/limits.out limits.ref +$(WORKDIR)/limits.$1.$2.prg: limits.c $(ISEQUAL) | $(WORKDIR) + $(if $(QUIET),echo misc/limits.$1.$2.prg) + $(CC65) -t sim$2 -$1 -o $$(@:.prg=.s) $$< $(NULLERR) + $(CA65) -t sim$2 -o $$(@:.prg=.o) $$(@:.prg=.s) $(NULLERR) + $(LD65) -t sim$2 -o $$@ $$(@:.prg=.o) sim$2.lib $(NULLERR) + $(SIM65) $(SIM65FLAGS) $$@ > $(WORKDIR)/limits.$1.$2.out + $(ISEQUAL) $(WORKDIR)/limits.$1.$2.out limits.ref + +$(WORKDIR)/goto.$1.$2.prg: goto.c $(ISEQUAL) | $(WORKDIR) + $(if $(QUIET),echo misc/goto.$1.$2.prg) + $(CC65) -t sim$2 -$1 -o $$@ $$< 2>$(WORKDIR)/goto.$1.$2.out + $(ISEQUAL) $(WORKDIR)/goto.$1.$2.out goto.ref # the rest are tests that fail currently for one reason or another -$(WORKDIR)/fields%prg: fields.c - @echo "FIXME: " $@ "currently will fail." - $(CL65) $(subst .,,$(*:.o%=-O%)) $(CC65FLAGS) $< -o $@ - -$(SIM65) $(SIM65FLAGS) $@ -$(WORKDIR)/sitest%prg: sitest.c - @echo "FIXME: " $@ "currently will fail." - -$(CL65) $(subst .,,$(*:.o%=-O%)) $(CC65FLAGS) $< -o $@ -# -$(SIM65) $(SIM65FLAGS) $@ -$(WORKDIR)/cc65141011%prg: cc65141011.c - @echo "FIXME: " $@ "currently can fail." - $(CL65) $(subst .,,$(*:.o%=-O%)) $(CC65FLAGS) $< -o $@ - -$(SIM65) $(SIM65FLAGS) $@ +$(WORKDIR)/sitest.$1.$2.prg: sitest.c | $(WORKDIR) + @echo "FIXME: " $$@ "currently does not compile." + $(NOT) $(CC65) -t sim$2 -$1 -o $$@ $$< $(NULLERR) +# $(SIM65) $(SIM65FLAGS) $$@ $(NULLOUT) + +endef # PRG_template + +$(foreach option,$(OPTIONS),$(eval $(call PRG_template,$(option),6502))) +$(foreach option,$(OPTIONS),$(eval $(call PRG_template,$(option),65c02))) clean: - @$(call DEL,$(TESTS)) - @$(call DEL,$(SOURCES:.c=.o)) - @$(call DEL,$(SOURCES:%.c=$(WORKDIR)/%.out)) + @$(call RMDIR,$(WORKDIR)) diff --git a/test/misc/bug1209-ind-goto-rev-2.c b/test/misc/bug1209-ind-goto-rev-2.c new file mode 100644 index 000000000..8918e5878 --- /dev/null +++ b/test/misc/bug1209-ind-goto-rev-2.c @@ -0,0 +1,54 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Test of indirect goto without dynamic labels and order label def, label ref, goto. + https://github.com/cc65/cc65/issues/1209 + This should compile and should be moved to tests/val/ when the bug is fixed. +*/ + +#include <stdio.h> +#include <stdlib.h> + +/* When operating correctly, this returns 0. */ +static unsigned char y = 0; +int f (void) { +L: if (y) return 0; + { + static const void *const x[1] = {&&L}; + y = 1; + goto *x[0]; + } +} + +static unsigned char failures = 0; + +int main (void) +{ + if (f () != 0) failures++; + + if (failures == 0) { + printf ("PASS\n"); + } else { + printf ("FAIL\n"); + } + + return failures; +} diff --git a/test/misc/bug1209-ind-goto-rev-3.c b/test/misc/bug1209-ind-goto-rev-3.c new file mode 100644 index 000000000..4c3268c9a --- /dev/null +++ b/test/misc/bug1209-ind-goto-rev-3.c @@ -0,0 +1,52 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Test of indirect goto without dynamic labels and order label ref, label def, goto. + https://github.com/cc65/cc65/issues/1209 + This should compile and should be moved to tests/val/ when the bug is fixed. +*/ + +#include <stdio.h> +#include <stdlib.h> + +/* When operating correctly, this returns 0. */ +static unsigned char y = 0; +int f (void) { + static const void *const x[1] = {&&L}; +L: if (y) return 0; + y = 1; + goto *x[0]; +} + +static unsigned char failures = 0; + +int main (void) +{ + if (f () != 0) failures++; + + if (failures == 0) { + printf ("PASS\n"); + } else { + printf ("FAIL\n"); + } + + return failures; +} diff --git a/test/misc/bug1211-ice-move-refs-2.c b/test/misc/bug1211-ice-move-refs-2.c new file mode 100644 index 000000000..504433f45 --- /dev/null +++ b/test/misc/bug1211-ice-move-refs-2.c @@ -0,0 +1,51 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Test of indirect goto with label merge ICE. + https://github.com/cc65/cc65/issues/1211 + This should compile and should be moved to tests/val/ when the bug is fixed. +*/ + +#include <stdio.h> + +/* When operating correctly, this returns 0. */ +int f (void) +{ + static const void *const x[2] = {&&L0, &&L1}; + goto *x[0]; +L0: +L1: return 0; +} + +static unsigned char failures = 0; + +int main (void) +{ + if (f () != 0) failures++; + + if (failures == 0) { + printf ("PASS\n"); + } else { + printf ("FAIL\n"); + } + + return failures; +} diff --git a/test/misc/bug1265.c b/test/misc/bug1265.c new file mode 100644 index 000000000..7c34a25b7 --- /dev/null +++ b/test/misc/bug1265.c @@ -0,0 +1,47 @@ +/* bug #1265 - misadjusted stack from unprototyped function call */ + +#include <stdio.h> +#include <string.h> + +int failures = 0; + +char str1[10]; +char str2[10]; + +int f2 (int x) { return x == 2345 ? 23 : -1; } + +int main (void) { + int x, n; + + sprintf (str1, "%p\n", &x); + x = 1234; + n = f1 (x); + sprintf (str2, "%p\n", &x); + + if (strcmp(str1, str2)) { + puts("not equal"); + failures++; + } + if (n != 42) { + puts("f1 returns wrong value"); + failures++; + } + + sprintf (str1, "%p\n", &x); + x = 2345; + n = f2 (x); + sprintf (str2, "%p\n", &x); + + if (strcmp(str1, str2)) { + puts("not equal"); + failures++; + } + if (n != 23) { + puts("f2 returns wrong value"); + failures++; + } + + return failures; +} + +int f1 (int x) { return x == 1234 ? 42 : -1; } diff --git a/test/misc/bug1357.c b/test/misc/bug1357.c new file mode 100644 index 000000000..40415f868 --- /dev/null +++ b/test/misc/bug1357.c @@ -0,0 +1,30 @@ + +/* issue #1357 - X Macros don't work with C preprocessor */ + +#define OPCODES(X) \ + X(PUSHNIL) \ + X(PUSHTRUE) \ + X(PUSHFALSE) + +enum { +#define X(op) op, +OPCODES(X) +#undef X + N_OPS +}; + +/* cc65 -E bug1357.c -o bug1357.c.pre + should produce something like this: + +enum { +PUSHNIL, +PUSHTRUE, +PUSHFALSE, + N_OPS +}; +*/ + +int main(void) +{ + return 0; +} diff --git a/test/misc/bug760.c b/test/misc/bug760.c new file mode 100644 index 000000000..dc8573b6d --- /dev/null +++ b/test/misc/bug760.c @@ -0,0 +1,12 @@ +/* bug#760 - Error when using macros as pragma arguments */ + +#include <stdlib.h> + +#define BANK "PRG0" + +#pragma rodata-name(push, BANK) + +int main(void) +{ + return EXIT_SUCCESS; +} diff --git a/test/misc/common.h b/test/misc/common.h deleted file mode 100644 index dada61a14..000000000 --- a/test/misc/common.h +++ /dev/null @@ -1,22 +0,0 @@ - -#include <stdio.h> -#include <stdlib.h> - -#define NO_OLD_FUNC_DECL -#define NO_TYPELESS_INT -#define NO_TYPELESS_INT_PTR -#define MAIN_RETURNS_INT -#define NO_IMPLICIT_FUNC_PROTOTYPES -#define NO_FLOATS -#define NO_WCHAR -#define NO_EMPTY_FUNC_ARGS -#define NO_SLOPPY_STRUCT_INIT -#define NO_FUNCS_TAKE_STRUCTS -#define NO_FUNCS_RETURN_STRUCTS -#define CAST_STRUCT_PTR -#define NO_TYPELESS_STRUCT_PTR -#define NO_IMPLICIT_FUNCPTR_CONV -#define SIZEOF_INT_16BIT -#define SIZEOF_LONG_32BIT -#define UNSIGNED_CHARS -#define UNSIGNED_BITFIELDS diff --git a/test/misc/endless.c b/test/misc/endless.c index fe0782941..f637d1f22 100644 --- a/test/misc/endless.c +++ b/test/misc/endless.c @@ -9,5 +9,5 @@ int main(void) ; } printf("error: should not come here\n"); - return EXIT_FAILURE; + return EXIT_SUCCESS; /* test verifies failure, not success */ } diff --git a/test/misc/fields.c b/test/misc/fields.c deleted file mode 100644 index 83bee82b7..000000000 --- a/test/misc/fields.c +++ /dev/null @@ -1,94 +0,0 @@ -/* - !!DESCRIPTION!! bitfield test - !!ORIGIN!! LCC 4.1 Testsuite - !!LICENCE!! own, freely distributeable for non-profit. read CPYRIGHT.LCC -*/ - -#include "common.h" - -#ifdef NO_BITFIELDS - -main() -{ - printf("NO_BITFIELDS\n\r"); -} - -#else - -#ifdef SIZEOF_INT_16BIT - -#ifdef REFCC -#include <stdint.h> -struct foo { - int16_t a; - char b; - int16_t x : 12, y : 4; - int16_t zz : 1, : 0, : 4, z : 3; - char c; -} x = { 1, 2, 3, 4, 5, 6 }; - -struct baz { uint16_t a:2, b:4, c:16;} y = { 7, 8, 9}; -int16_t i = 8; - -#else - -struct foo { - int a; - char b; - int x : 12, y : 4; - int zz : 1, : 0, : 4, z : 3; - char c; -} x = { 1, 2, 3, 4, 5, 6 }; - -struct baz { unsigned int a:2, b:4, c:16;} y = { 7, 8, 9}; -int i = 8; -#endif - -#else -struct foo { - int a; - char b; - int x : 12, y : 4, : 0, : 4, z : 3; - char c; -} x = { 1, 2, 3, 4, 5, 6 }; - -struct baz { unsigned int a:2, b:4, c:32;} y = { 7, 8, 9}; -int i = 16; -#endif - -#ifdef NO_IMPLICIT_FUNC_PROTOTYPES -f1(struct baz *p); -f2(struct baz *p); -#endif - -main() -{ - printf("x = %d b:%d %d %d %d c:%d\n", x.a, x.b, x.x, x.y, x.z, x.c); - printf("y = %d b:%d c:%d\n", y.a, y.b, y.c); - x.y = i; - x.z = 070; - printf("x = %d b:%d %d %d %d c:%d\n", x.a, x.b, x.x, x.y, x.z, x.c); - y.a = 2; - y.c = i; - printf("y = %d b:%d c:%d\n", y.a, y.b, y.c); -#ifdef CAST_STRUCT_PTR - f2((struct baz *)&x); -#else - f2(&x); -#endif - return 0; -} - -f1(struct baz *p) { - p->a = p->b = 0; - if (p->b) - printf("p->b != 0!\n"); - p->a = 0x3; p->b = 0xf; - printf("p->a = 0x%x, p->b = 0x%x\n", p->a, p->b); -} -f2(struct baz *p) { - p->a = (i==0); - p->b = (f1(p),0); -} - -#endif diff --git a/test/misc/goto.c b/test/misc/goto.c new file mode 100644 index 000000000..69247a4df --- /dev/null +++ b/test/misc/goto.c @@ -0,0 +1,437 @@ +void main () { + goto end; + { + int a = 1; +start: + goto end; + } + goto start; +end:; +} + +void f2 () { + int a = 2; + +l1: + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + { + int a; + l2:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + { + int a; + l3:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + { + int a; + l4:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + } + l5:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + } + l6:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + } +l7:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + { + int a = 1; + l8:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + { + int a = 1; + l9:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + { + int a = 1; + la:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + } + lb:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + } + lc:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + } + { + int a = 1; + ld:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + { + int a = 1; + le:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + { + int a = 1; + lf:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + } + lg:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + } + lh:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; + } +li:; + goto l1; + goto l2; + goto l3; + goto l4; + goto l5; + goto l6; + goto l7; + goto l8; + goto l9; + goto la; + goto lb; + goto lc; + goto ld; + goto le; + goto lf; + goto lg; + goto lh; + goto li; +} + +/* Structure of the above function. + +void f2 () { + int a = 2; + +l1: + { + int a; + l2:; + { + int a; + l3:; + { + int a; + l4:; + } + l5:; + } + l6:; + } +l7:; + { + int a = 1; + l8:; + { + int a = 1; + l9:; + { + int a = 1; + la:; + } + lb:; + } + lc:; + } + { + int a = 1; + ld:; + { + int a = 1; + le:; + { + int a = 1; + lf:; + } + lg:; + } + lh:; + } +li:; +} +*/ diff --git a/test/misc/goto.ref b/test/misc/goto.ref new file mode 100644 index 000000000..2e0819887 --- /dev/null +++ b/test/misc/goto.ref @@ -0,0 +1,150 @@ +goto.c:8: Warning: Goto at line 8 to label start jumps into a block with initialization of an object that has automatic storage duration +goto.c:97: Warning: Variable 'a' is defined but never used +goto.c:117: Warning: Variable 'a' is defined but never used +goto.c:137: Warning: Variable 'a' is defined but never used +goto.c:159: Warning: Goto at line 23 to label l8 jumps into a block with initialization of an object that has automatic storage duration +goto.c:159: Warning: Goto at line 44 to label l8 jumps into a block with initialization of an object that has automatic storage duration +goto.c:159: Warning: Goto at line 65 to label l8 jumps into a block with initialization of an object that has automatic storage duration +goto.c:159: Warning: Goto at line 86 to label l8 jumps into a block with initialization of an object that has automatic storage duration +goto.c:159: Warning: Goto at line 106 to label l8 jumps into a block with initialization of an object that has automatic storage duration +goto.c:159: Warning: Goto at line 126 to label l8 jumps into a block with initialization of an object that has automatic storage duration +goto.c:159: Warning: Goto at line 146 to label l8 jumps into a block with initialization of an object that has automatic storage duration +goto.c:180: Warning: Goto at line 24 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:180: Warning: Goto at line 45 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:180: Warning: Goto at line 66 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:180: Warning: Goto at line 87 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:180: Warning: Goto at line 107 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:180: Warning: Goto at line 127 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:180: Warning: Goto at line 147 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:180: Warning: Goto at line 168 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:201: Warning: Goto at line 25 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:201: Warning: Goto at line 46 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:201: Warning: Goto at line 67 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:201: Warning: Goto at line 88 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:201: Warning: Goto at line 108 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:201: Warning: Goto at line 128 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:201: Warning: Goto at line 148 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:201: Warning: Goto at line 169 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:201: Warning: Goto at line 190 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:221: Warning: Goto at line 26 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:221: Warning: Goto at line 47 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:221: Warning: Goto at line 68 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:221: Warning: Goto at line 89 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:221: Warning: Goto at line 109 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:221: Warning: Goto at line 129 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:221: Warning: Goto at line 149 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:221: Warning: Goto at line 170 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:231: Warning: Goto at line 231 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:241: Warning: Goto at line 27 to label lc jumps into a block with initialization of an object that has automatic storage duration +goto.c:241: Warning: Goto at line 48 to label lc jumps into a block with initialization of an object that has automatic storage duration +goto.c:241: Warning: Goto at line 69 to label lc jumps into a block with initialization of an object that has automatic storage duration +goto.c:241: Warning: Goto at line 90 to label lc jumps into a block with initialization of an object that has automatic storage duration +goto.c:241: Warning: Goto at line 110 to label lc jumps into a block with initialization of an object that has automatic storage duration +goto.c:241: Warning: Goto at line 130 to label lc jumps into a block with initialization of an object that has automatic storage duration +goto.c:241: Warning: Goto at line 150 to label lc jumps into a block with initialization of an object that has automatic storage duration +goto.c:250: Warning: Goto at line 250 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:251: Warning: Goto at line 251 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:252: Warning: Goto at line 252 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:263: Warning: Goto at line 28 to label ld jumps into a block with initialization of an object that has automatic storage duration +goto.c:263: Warning: Goto at line 49 to label ld jumps into a block with initialization of an object that has automatic storage duration +goto.c:263: Warning: Goto at line 70 to label ld jumps into a block with initialization of an object that has automatic storage duration +goto.c:263: Warning: Goto at line 91 to label ld jumps into a block with initialization of an object that has automatic storage duration +goto.c:263: Warning: Goto at line 111 to label ld jumps into a block with initialization of an object that has automatic storage duration +goto.c:263: Warning: Goto at line 131 to label ld jumps into a block with initialization of an object that has automatic storage duration +goto.c:263: Warning: Goto at line 151 to label ld jumps into a block with initialization of an object that has automatic storage duration +goto.c:263: Warning: Goto at line 172 to label ld jumps into a block with initialization of an object that has automatic storage duration +goto.c:263: Warning: Goto at line 193 to label ld jumps into a block with initialization of an object that has automatic storage duration +goto.c:263: Warning: Goto at line 214 to label ld jumps into a block with initialization of an object that has automatic storage duration +goto.c:263: Warning: Goto at line 234 to label ld jumps into a block with initialization of an object that has automatic storage duration +goto.c:263: Warning: Goto at line 254 to label ld jumps into a block with initialization of an object that has automatic storage duration +goto.c:271: Warning: Goto at line 271 to label l8 jumps into a block with initialization of an object that has automatic storage duration +goto.c:272: Warning: Goto at line 272 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:273: Warning: Goto at line 273 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:274: Warning: Goto at line 274 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:275: Warning: Goto at line 275 to label lc jumps into a block with initialization of an object that has automatic storage duration +goto.c:284: Warning: Goto at line 29 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:284: Warning: Goto at line 50 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:284: Warning: Goto at line 71 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:284: Warning: Goto at line 92 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:284: Warning: Goto at line 112 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:284: Warning: Goto at line 132 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:284: Warning: Goto at line 152 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:284: Warning: Goto at line 173 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:284: Warning: Goto at line 194 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:284: Warning: Goto at line 215 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:284: Warning: Goto at line 235 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:284: Warning: Goto at line 255 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:284: Warning: Goto at line 277 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:292: Warning: Goto at line 292 to label l8 jumps into a block with initialization of an object that has automatic storage duration +goto.c:293: Warning: Goto at line 293 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:294: Warning: Goto at line 294 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:295: Warning: Goto at line 295 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:296: Warning: Goto at line 296 to label lc jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 30 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 51 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 72 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 93 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 113 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 133 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 153 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 174 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 195 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 216 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 236 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 256 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 278 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:305: Warning: Goto at line 299 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:313: Warning: Goto at line 313 to label l8 jumps into a block with initialization of an object that has automatic storage duration +goto.c:314: Warning: Goto at line 314 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:315: Warning: Goto at line 315 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:316: Warning: Goto at line 316 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:317: Warning: Goto at line 317 to label lc jumps into a block with initialization of an object that has automatic storage duration +goto.c:325: Warning: Goto at line 31 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:325: Warning: Goto at line 52 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:325: Warning: Goto at line 73 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:325: Warning: Goto at line 94 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:325: Warning: Goto at line 114 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:325: Warning: Goto at line 134 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:325: Warning: Goto at line 154 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:325: Warning: Goto at line 175 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:325: Warning: Goto at line 196 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:325: Warning: Goto at line 217 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:325: Warning: Goto at line 237 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:325: Warning: Goto at line 257 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:325: Warning: Goto at line 279 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:333: Warning: Goto at line 333 to label l8 jumps into a block with initialization of an object that has automatic storage duration +goto.c:334: Warning: Goto at line 334 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:335: Warning: Goto at line 335 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:336: Warning: Goto at line 336 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:337: Warning: Goto at line 337 to label lc jumps into a block with initialization of an object that has automatic storage duration +goto.c:340: Warning: Goto at line 340 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:345: Warning: Goto at line 32 to label lh jumps into a block with initialization of an object that has automatic storage duration +goto.c:345: Warning: Goto at line 53 to label lh jumps into a block with initialization of an object that has automatic storage duration +goto.c:345: Warning: Goto at line 74 to label lh jumps into a block with initialization of an object that has automatic storage duration +goto.c:345: Warning: Goto at line 95 to label lh jumps into a block with initialization of an object that has automatic storage duration +goto.c:345: Warning: Goto at line 115 to label lh jumps into a block with initialization of an object that has automatic storage duration +goto.c:345: Warning: Goto at line 135 to label lh jumps into a block with initialization of an object that has automatic storage duration +goto.c:345: Warning: Goto at line 155 to label lh jumps into a block with initialization of an object that has automatic storage duration +goto.c:345: Warning: Goto at line 176 to label lh jumps into a block with initialization of an object that has automatic storage duration +goto.c:345: Warning: Goto at line 197 to label lh jumps into a block with initialization of an object that has automatic storage duration +goto.c:345: Warning: Goto at line 218 to label lh jumps into a block with initialization of an object that has automatic storage duration +goto.c:345: Warning: Goto at line 238 to label lh jumps into a block with initialization of an object that has automatic storage duration +goto.c:345: Warning: Goto at line 258 to label lh jumps into a block with initialization of an object that has automatic storage duration +goto.c:353: Warning: Goto at line 353 to label l8 jumps into a block with initialization of an object that has automatic storage duration +goto.c:354: Warning: Goto at line 354 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:355: Warning: Goto at line 355 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:356: Warning: Goto at line 356 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:357: Warning: Goto at line 357 to label lc jumps into a block with initialization of an object that has automatic storage duration +goto.c:359: Warning: Goto at line 359 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:360: Warning: Goto at line 360 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:361: Warning: Goto at line 361 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:373: Warning: Goto at line 373 to label l8 jumps into a block with initialization of an object that has automatic storage duration +goto.c:374: Warning: Goto at line 374 to label l9 jumps into a block with initialization of an object that has automatic storage duration +goto.c:375: Warning: Goto at line 375 to label la jumps into a block with initialization of an object that has automatic storage duration +goto.c:376: Warning: Goto at line 376 to label lb jumps into a block with initialization of an object that has automatic storage duration +goto.c:377: Warning: Goto at line 377 to label lc jumps into a block with initialization of an object that has automatic storage duration +goto.c:378: Warning: Goto at line 378 to label ld jumps into a block with initialization of an object that has automatic storage duration +goto.c:379: Warning: Goto at line 379 to label le jumps into a block with initialization of an object that has automatic storage duration +goto.c:380: Warning: Goto at line 380 to label lf jumps into a block with initialization of an object that has automatic storage duration +goto.c:381: Warning: Goto at line 381 to label lg jumps into a block with initialization of an object that has automatic storage duration +goto.c:382: Warning: Goto at line 382 to label lh jumps into a block with initialization of an object that has automatic storage duration diff --git a/test/misc/limits.c b/test/misc/limits.c index 613d6bd09..427c54d23 100644 --- a/test/misc/limits.c +++ b/test/misc/limits.c @@ -7,9 +7,9 @@ #include <stdio.h> #include <limits.h> -#define SSHRT_MAX SHRT_MAX -#define SINT_MAX INT_MAX -#define SLONG_MAX LONG_MAX +#define SSHRT_MAX SHRT_MAX +#define SINT_MAX INT_MAX +#define SLONG_MAX LONG_MAX #define UCHAR_MIN 0 #define USHRT_MIN 0 diff --git a/test/misc/pptest2.c b/test/misc/pptest2.c new file mode 100644 index 000000000..7857c67b2 --- /dev/null +++ b/test/misc/pptest2.c @@ -0,0 +1,73 @@ + +/* preprocessor test #2 */ + +#include <string.h> +#include <stdlib.h> +#include <stdio.h> + +int y = 7; +int z[] = {1, 2, 3}; +int res; + +int f(int i) { + printf("f: %d\n", i); + return i + 1; +} +int t(int i) { + printf("t: %d\n", i); + return i + 1; +} +int m(int i, int j) { + printf("m: %d %d\n", i, j); + return i + j + 1; +} + +#define x 3 +#define f(a) f(x * (a)) +#undef x +#define x 2 +#define g f +#define z z[0] +#define h g(~ +#define m(a) a(w) +#define w 0,1 +#define t(a) a +#define p() int +#define q(x) x +#define r(x,y) x ## y +#define str(x) # x + +int main(void) +{ + res = f(y+1) + f(f(z)) % t(t(g) (0) + t)(1); + printf("res: %d expected: 19\n", res); + if (res != 19) { + return EXIT_FAILURE; + } + + res = g(x+(3,4)-w) | h 5) & m(f)^m(m); + printf("res: %d expected: 3\n", res); + if (res != 3) { + return EXIT_FAILURE; + } + + p() i[q()] = { q(1), r(2,3), r(4,), r(,5), r(,) }; + printf("i[]: %d %d %d %d\n", i[0], i[1], i[2], i[3]); + printf("expected: %d %d %d %d\n", 1, 23, 4, 5); + if ((i[0] != 1) || (i[1] != 23) || (i[2] != 4) || (i[3] != 5)) { + return EXIT_FAILURE; + } + + char c[2][6] = { str(hello), str() }; + printf ("c[0]: %s expected: %s\n", c[0], "hello"); + printf ("c[1]: %s expected: %s\n", c[1], ""); + if (strcmp(c[0], "hello") != 0) { + return EXIT_FAILURE; + } + if (strcmp(c[1], "") != 0) { + return EXIT_FAILURE; + } + + printf("all fine\n"); + return EXIT_SUCCESS; +} diff --git a/test/misc/sitest.c b/test/misc/sitest.c index 9570f4989..6c8a6f1e2 100644 --- a/test/misc/sitest.c +++ b/test/misc/sitest.c @@ -5,29 +5,30 @@ */ /* - sitest -- exercise features of C99 <stdint.h> and <inttypes.h> + sitest -- exercise features of C99 <stdint.h> and <inttypes.h> - This source code has been placed into the PUBLIC DOMAIN by its author. + This source code has been placed into the PUBLIC DOMAIN by its author. - last edit: 1999/11/05 gwyn@arl.mil + last edit: 1999/11/05 gwyn@arl.mil - Tries to accommodate pre-C99 versions of <inttypes.h>. + Tries to accommodate pre-C99 versions of <inttypes.h>. - Takes advantage of __Q8_* symbols defined by a particular - implementation of <stdint.h>, but doesn't require them. + Takes advantage of __Q8_* symbols defined by a particular + implementation of <stdint.h>, but doesn't require them. - NOTE: This is not a thorough validation test of the facilities. + NOTE: This is not a thorough validation test of the facilities. */ +#define STANDARD_CC65 +#define NO_WCHAR #define NO_INTERNAL_WCHAR -/*#define STANDALONE*/ -#include <errno.h> -#include <limits.h> /* for CHAR_BIT */ -#include <stdio.h> -#include <stddef.h> /* for ptrdiff_t */ -#include <stdlib.h> -#include <string.h> +#include <errno.h> +#include <limits.h> /* for CHAR_BIT */ +#include <stdio.h> +#include <stddef.h> /* for ptrdiff_t */ +#include <stdlib.h> +#include <string.h> #if !defined(STANDARD_C99) && !defined(STANDARD_CC65) @@ -37,1555 +38,1545 @@ #ifdef NO_WCHAR -#warn "this test checks C99 features, but NO_WCHAR is defined so the test will most definetly fails." +#warning "this test checks C99 features, but NO_WCHAR is defined so the test will most definitely fail." #endif -#include <inttypes.h> /* embeds <stdint.h> */ +#include <inttypes.h> /* embeds <stdint.h> */ -#include <signal.h> /* for sig_atomic_t */ +#include <signal.h> /* for sig_atomic_t */ -#if defined(INTMAX_MAX) /* <inttypes.h> has C99 features */ -#include <wchar.h> +#if defined(INTMAX_MAX) /* <inttypes.h> has C99 features */ +#include <wchar.h> #endif -#include <inttypes.h> /* test idempotency */ +#include <inttypes.h> /* test idempotency */ -#ifdef STANDALONE - -FILE *outfile=NULL; -#define opentest(x) outfile=stdout; -#define closetest(x) - -#else - -#endif - -#if __STDC_VERSION__ >= 199901 -#ifndef __Q8_QT -#define __Q8_QT long long +#if __STDC_VERSION__ >= 199901 +#ifndef __Q8_QT +#define __Q8_QT long long #endif #endif -#ifdef PRIdMAX -#define HAVE_PRIdMAX -#ifndef __Q8_MT -#define __Q8_MT intmax_t +#ifdef PRIdMAX +#define HAVE_PRIdMAX +#ifndef __Q8_MT +#define __Q8_MT intmax_t #endif #else -#ifdef PRIdLEAST64 -#ifndef __Q8_MT -#define __Q8_MT int_least64_t +#ifdef PRIdLEAST64 +#ifndef __Q8_MT +#define __Q8_MT int_least64_t #endif -#define PRIdMAX PRIdLEAST64 +#define PRIdMAX PRIdLEAST64 #else -#ifndef __Q8_MT -#define __Q8_MT long +#ifndef __Q8_MT +#define __Q8_MT long #endif -#define PRIdMAX "ld" +#define PRIdMAX "ld" #endif #endif -#ifdef PRIuMAX -#define HAVE_PRIuMAX -#define U__Q8_MT uintmax_t +#ifdef PRIuMAX +#define HAVE_PRIuMAX +#define U__Q8_MT uintmax_t #else -#ifdef PRIuLEAST64 -#define U__Q8_MT uint_least64_t -#define PRIuMAX PRIuLEAST64 +#ifdef PRIuLEAST64 +#define U__Q8_MT uint_least64_t +#define PRIuMAX PRIuLEAST64 #else -#define U__Q8_MT unsigned long -#define PRIuMAX "lu" +#define U__Q8_MT unsigned long +#define PRIuMAX "lu" #endif #endif -#define STR_SUB(s) # s -#define STRINGIZE(s) STR_SUB(s) /* extra level to expand argument */ +#define STR_SUB(s) # s +#define STRINGIZE(s) STR_SUB(s) /* extra level to expand argument */ -#if defined(SCNo32) || defined(PRIo32) -static int32_t int32; +#if defined(SCNo32) || defined(PRIo32) +static int32_t int32; #endif -static int_least16_t intl16; -static uint_least16_t uintl16; -static uint_fast16_t uintf16; -static intmax_t intmax; -static uintmax_t uintmax; +static int_least16_t intl16; +static uint_least16_t uintl16; +static uint_fast16_t uintf16; +static intmax_t intmax; +static uintmax_t uintmax; int -main() { - int status = 0; /* exit status to be returned */ +main() { + int status = 0; /* exit status to be returned */ - - /* <stdint.h> features: */ - printf("CHAR_BIT=%u\n", (unsigned)CHAR_BIT ); - printf("sizeof(char)=%u\n", (unsigned)sizeof(char)); /* s.b. 1 */ - printf("sizeof(short)=%u\n", (unsigned)sizeof(short)); - printf("sizeof(int)=%u\n", (unsigned)sizeof(int)); - printf("sizeof(long)=%u\n", (unsigned)sizeof(long)); -#ifdef __Q8_QT - printf("sizeof(long long)=%u\n", (unsigned)sizeof(__Q8_QT)); + /* <stdint.h> features: */ + + printf("CHAR_BIT=%u\n", (unsigned)CHAR_BIT ); + printf("sizeof(char)=%u\n", (unsigned)sizeof(char)); /* s.b. 1 */ + printf("sizeof(short)=%u\n", (unsigned)sizeof(short)); + printf("sizeof(int)=%u\n", (unsigned)sizeof(int)); + printf("sizeof(long)=%u\n", (unsigned)sizeof(long)); +#ifdef __Q8_QT + printf("sizeof(long long)=%u\n", (unsigned)sizeof(__Q8_QT)); #else - printf("*** long long isn't defined ***\n"); + printf("*** long long isn't defined ***\n"); #endif - printf("sizeof(intmax_t)=%u\n", (unsigned)sizeof(intmax_t)); - printf("sizeof(ptrdiff_t)=%u\n", (unsigned)sizeof(ptrdiff_t)); - printf("sizeof(size_t)=%u\n", (unsigned)sizeof(size_t)); - printf("sizeof(sig_atomic_t)=%u\n", (unsigned)sizeof(sig_atomic_t)); - printf("sizeof(wchar_t)=%u\n", (unsigned)sizeof(wchar_t)); -#if defined(WINT_MAX) || __STDC_VERSION__ >= 199901 - printf("sizeof(wint_t)=%u\n", (unsigned)sizeof(wint_t)); + printf("sizeof(intmax_t)=%u\n", (unsigned)sizeof(intmax_t)); + printf("sizeof(ptrdiff_t)=%u\n", (unsigned)sizeof(ptrdiff_t)); + printf("sizeof(size_t)=%u\n", (unsigned)sizeof(size_t)); + printf("sizeof(sig_atomic_t)=%u\n", (unsigned)sizeof(sig_atomic_t)); + printf("sizeof(wchar_t)=%u\n", (unsigned)sizeof(wchar_t)); +#if defined(WINT_MAX) || __STDC_VERSION__ >= 199901 + printf("sizeof(wint_t)=%u\n", (unsigned)sizeof(wint_t)); #else - printf("*** wint_t isn't defined ***\n"); - status = EXIT_FAILURE; + printf("*** wint_t isn't defined ***\n"); + status = EXIT_FAILURE; #endif -#ifdef INT8_MAX - printf("sizeof(int8_t)=%u\n", (unsigned)sizeof(int8_t)); - printf("sizeof(uint8_t)=%u\n", (unsigned)sizeof(uint8_t)); +#ifdef INT8_MAX + printf("sizeof(int8_t)=%u\n", (unsigned)sizeof(int8_t)); + printf("sizeof(uint8_t)=%u\n", (unsigned)sizeof(uint8_t)); #endif -#ifdef INT9_MAX - printf("sizeof(int9_t)=%u\n", (unsigned)sizeof(int9_t)); - printf("sizeof(uint9_t)=%u\n", (unsigned)sizeof(uint9_t)); +#ifdef INT9_MAX + printf("sizeof(int9_t)=%u\n", (unsigned)sizeof(int9_t)); + printf("sizeof(uint9_t)=%u\n", (unsigned)sizeof(uint9_t)); #endif -#ifdef INT12_MAX - printf("sizeof(int12_t)=%u\n", (unsigned)sizeof(int12_t)); - printf("sizeof(uint12_t)=%u\n", (unsigned)sizeof(uint12_t)); +#ifdef INT12_MAX + printf("sizeof(int12_t)=%u\n", (unsigned)sizeof(int12_t)); + printf("sizeof(uint12_t)=%u\n", (unsigned)sizeof(uint12_t)); #endif -#ifdef INT16_MAX - printf("sizeof(int16_t)=%u\n", (unsigned)sizeof(int16_t)); - printf("sizeof(uint16_t)=%u\n", (unsigned)sizeof(uint16_t)); +#ifdef INT16_MAX + printf("sizeof(int16_t)=%u\n", (unsigned)sizeof(int16_t)); + printf("sizeof(uint16_t)=%u\n", (unsigned)sizeof(uint16_t)); #endif -#ifdef INT18_MAX - printf("sizeof(int18_t)=%u\n", (unsigned)sizeof(int18_t)); - printf("sizeof(uint18_t)=%u\n", (unsigned)sizeof(uint18_t)); +#ifdef INT18_MAX + printf("sizeof(int18_t)=%u\n", (unsigned)sizeof(int18_t)); + printf("sizeof(uint18_t)=%u\n", (unsigned)sizeof(uint18_t)); #endif -#ifdef INT24_MAX - printf("sizeof(int24_t)=%u\n", (unsigned)sizeof(int24_t)); - printf("sizeof(uint24_t)=%u\n", (unsigned)sizeof(uint24_t)); +#ifdef INT24_MAX + printf("sizeof(int24_t)=%u\n", (unsigned)sizeof(int24_t)); + printf("sizeof(uint24_t)=%u\n", (unsigned)sizeof(uint24_t)); #endif -#ifdef INT32_MAX - printf("sizeof(int32_t)=%u\n", (unsigned)sizeof(int32_t)); - printf("sizeof(uint32_t)=%u\n", (unsigned)sizeof(uint32_t)); +#ifdef INT32_MAX + printf("sizeof(int32_t)=%u\n", (unsigned)sizeof(int32_t)); + printf("sizeof(uint32_t)=%u\n", (unsigned)sizeof(uint32_t)); #endif -#ifdef INT36_MAX - printf("sizeof(int36_t)=%u\n", (unsigned)sizeof(int36_t)); - printf("sizeof(uint36_t)=%u\n", (unsigned)sizeof(uint36_t)); +#ifdef INT36_MAX + printf("sizeof(int36_t)=%u\n", (unsigned)sizeof(int36_t)); + printf("sizeof(uint36_t)=%u\n", (unsigned)sizeof(uint36_t)); #endif -#ifdef INT40_MAX - printf("sizeof(int40_t)=%u\n", (unsigned)sizeof(int40_t)); - printf("sizeof(uint40_t)=%u\n", (unsigned)sizeof(uint40_t)); +#ifdef INT40_MAX + printf("sizeof(int40_t)=%u\n", (unsigned)sizeof(int40_t)); + printf("sizeof(uint40_t)=%u\n", (unsigned)sizeof(uint40_t)); #endif -#ifdef INT48_MAX - printf("sizeof(int48_t)=%u\n", (unsigned)sizeof(int48_t)); - printf("sizeof(uint48_t)=%u\n", (unsigned)sizeof(uint48_t)); +#ifdef INT48_MAX + printf("sizeof(int48_t)=%u\n", (unsigned)sizeof(int48_t)); + printf("sizeof(uint48_t)=%u\n", (unsigned)sizeof(uint48_t)); #endif -#ifdef INT60_MAX - printf("sizeof(int60_t)=%u\n", (unsigned)sizeof(int60_t)); - printf("sizeof(uint60_t)=%u\n", (unsigned)sizeof(uint60_t)); +#ifdef INT60_MAX + printf("sizeof(int60_t)=%u\n", (unsigned)sizeof(int60_t)); + printf("sizeof(uint60_t)=%u\n", (unsigned)sizeof(uint60_t)); #endif -#ifdef INT64_MAX - printf("sizeof(int64_t)=%u\n", (unsigned)sizeof(int64_t)); - printf("sizeof(uint64_t)=%u\n", (unsigned)sizeof(uint64_t)); +#ifdef INT64_MAX + printf("sizeof(int64_t)=%u\n", (unsigned)sizeof(int64_t)); + printf("sizeof(uint64_t)=%u\n", (unsigned)sizeof(uint64_t)); #endif -#ifdef INT72_MAX - printf("sizeof(int72_t)=%u\n", (unsigned)sizeof(int72_t)); - printf("sizeof(uint72_t)=%u\n", (unsigned)sizeof(uint72_t)); +#ifdef INT72_MAX + printf("sizeof(int72_t)=%u\n", (unsigned)sizeof(int72_t)); + printf("sizeof(uint72_t)=%u\n", (unsigned)sizeof(uint72_t)); #endif -#ifdef INT128_MAX - printf("sizeof(int128_t)=%u\n", (unsigned)sizeof(int128_t)); - printf("sizeof(uint128_t)=%u\n", (unsigned)sizeof(uint128_t)); +#ifdef INT128_MAX + printf("sizeof(int128_t)=%u\n", (unsigned)sizeof(int128_t)); + printf("sizeof(uint128_t)=%u\n", (unsigned)sizeof(uint128_t)); #endif - printf("sizeof(int_least8_t)=%u\n", (unsigned)sizeof(int_least8_t)); - printf("sizeof(uint_least8_t)=%u\n", (unsigned)sizeof(uint_least8_t)); - printf("sizeof(int_least16_t)=%u\n", (unsigned)sizeof(int_least16_t)); - printf("sizeof(uint_least16_t)=%u\n", (unsigned)sizeof(uint_least16_t)); - printf("sizeof(int_least32_t)=%u\n", (unsigned)sizeof(int_least32_t)); - printf("sizeof(uint_least32_t)=%u\n", (unsigned)sizeof(uint_least32_t)); -#ifdef INT_LEAST64_MAX - printf("sizeof(int_least64_t)=%u\n", (unsigned)sizeof(int_least64_t)); - printf("sizeof(uint_least64_t)=%u\n", (unsigned)sizeof(uint_least64_t)); + printf("sizeof(int_least8_t)=%u\n", (unsigned)sizeof(int_least8_t)); + printf("sizeof(uint_least8_t)=%u\n", (unsigned)sizeof(uint_least8_t)); + printf("sizeof(int_least16_t)=%u\n", (unsigned)sizeof(int_least16_t)); + printf("sizeof(uint_least16_t)=%u\n", (unsigned)sizeof(uint_least16_t)); + printf("sizeof(int_least32_t)=%u\n", (unsigned)sizeof(int_least32_t)); + printf("sizeof(uint_least32_t)=%u\n", (unsigned)sizeof(uint_least32_t)); +#ifdef INT_LEAST64_MAX + printf("sizeof(int_least64_t)=%u\n", (unsigned)sizeof(int_least64_t)); + printf("sizeof(uint_least64_t)=%u\n", (unsigned)sizeof(uint_least64_t)); #else - printf("*** uint_least64_t isn't defined ***\n"); - status = EXIT_FAILURE; + printf("*** uint_least64_t isn't defined ***\n"); + status = EXIT_FAILURE; #endif -#ifdef INT_LEAST128_MAX - printf("sizeof(int_least128_t)=%u\n", (unsigned)sizeof(int_least128_t)); - printf("sizeof(uint_least128_t)=%u\n", - (unsigned)sizeof(uint_least128_t)); +#ifdef INT_LEAST128_MAX + printf("sizeof(int_least128_t)=%u\n", (unsigned)sizeof(int_least128_t)); + printf("sizeof(uint_least128_t)=%u\n", + (unsigned)sizeof(uint_least128_t)); #endif - printf("sizeof(int_fast8_t)=%u\n", (unsigned)sizeof(int_fast8_t)); - printf("sizeof(uint_fast8_t)=%u\n", (unsigned)sizeof(uint_fast8_t)); - printf("sizeof(int_fast16_t)=%u\n", (unsigned)sizeof(int_fast16_t)); - printf("sizeof(uint_fast16_t)=%u\n", (unsigned)sizeof(uint_fast16_t)); - printf("sizeof(int_fast32_t)=%u\n", (unsigned)sizeof(int_fast32_t)); - printf("sizeof(uint_fast32_t)=%u\n", (unsigned)sizeof(uint_fast32_t)); -#ifdef INT_FAST64_MAX - printf("sizeof(int_fast64_t)=%u\n", (unsigned)sizeof(int_fast64_t)); - printf("sizeof(uint_fast64_t)=%u\n", (unsigned)sizeof(uint_fast64_t)); + printf("sizeof(int_fast8_t)=%u\n", (unsigned)sizeof(int_fast8_t)); + printf("sizeof(uint_fast8_t)=%u\n", (unsigned)sizeof(uint_fast8_t)); + printf("sizeof(int_fast16_t)=%u\n", (unsigned)sizeof(int_fast16_t)); + printf("sizeof(uint_fast16_t)=%u\n", (unsigned)sizeof(uint_fast16_t)); + printf("sizeof(int_fast32_t)=%u\n", (unsigned)sizeof(int_fast32_t)); + printf("sizeof(uint_fast32_t)=%u\n", (unsigned)sizeof(uint_fast32_t)); +#ifdef INT_FAST64_MAX + printf("sizeof(int_fast64_t)=%u\n", (unsigned)sizeof(int_fast64_t)); + printf("sizeof(uint_fast64_t)=%u\n", (unsigned)sizeof(uint_fast64_t)); #else - printf("*** int_fast64_t isn't defined ***\n"); - status = EXIT_FAILURE; + printf("*** int_fast64_t isn't defined ***\n"); + status = EXIT_FAILURE; #endif -#ifdef INT_FAST128_MAX - printf("sizeof(int_fast128_t)=%u\n", (unsigned)sizeof(int_fast128_t)); - printf("sizeof(uint_fast128_t)=%u\n", (unsigned)sizeof(uint_fast128_t)); +#ifdef INT_FAST128_MAX + printf("sizeof(int_fast128_t)=%u\n", (unsigned)sizeof(int_fast128_t)); + printf("sizeof(uint_fast128_t)=%u\n", (unsigned)sizeof(uint_fast128_t)); #endif -#if defined(INTPTR_MAX) - printf("sizeof(intptr_t)=%u\n", (unsigned)sizeof(intptr_t)); -#if defined(UINTPTR_MAX) - printf("sizeof(uintptr_t)=%u\n", (unsigned)sizeof(uintptr_t)); +#if defined(INTPTR_MAX) + printf("sizeof(intptr_t)=%u\n", (unsigned)sizeof(intptr_t)); +#if defined(UINTPTR_MAX) + printf("sizeof(uintptr_t)=%u\n", (unsigned)sizeof(uintptr_t)); #else - printf("*** intptr_t is defined but uintptr_t isn't ***\n"); - status = EXIT_FAILURE; + printf("*** intptr_t is defined but uintptr_t isn't ***\n"); + status = EXIT_FAILURE; #endif -#elif defined(UINTPTR_MAX) - printf("sizeof(uintptr_t)=%u\n", (unsigned)sizeof(uintptr_t)); - printf("*** uintptr_t is defined but intptr_t isn't ***\n"); - status = EXIT_FAILURE; +#elif defined(UINTPTR_MAX) + printf("sizeof(uintptr_t)=%u\n", (unsigned)sizeof(uintptr_t)); + printf("*** uintptr_t is defined but intptr_t isn't ***\n"); + status = EXIT_FAILURE; #else - printf("*** neither intptr_t nor uintptr_t is defined ***\n"); - status = EXIT_FAILURE; + printf("*** neither intptr_t nor uintptr_t is defined ***\n"); + status = EXIT_FAILURE; #endif -#ifdef INTMAX_MAX - printf("sizeof(intmax_t)=%u\n", (unsigned)sizeof(intmax_t)); - printf("sizeof(uintmax_t)=%u\n", (unsigned)sizeof(uintmax_t)); +#ifdef INTMAX_MAX + printf("sizeof(intmax_t)=%u\n", (unsigned)sizeof(intmax_t)); + printf("sizeof(uintmax_t)=%u\n", (unsigned)sizeof(uintmax_t)); #else - printf("*** intmax_t isn't defined ***\n"); - status = EXIT_FAILURE; + printf("*** intmax_t isn't defined ***\n"); + status = EXIT_FAILURE; #endif -#ifdef INT8_MAX - printf("INT8_MIN=%"PRIdMAX"\n", (__Q8_MT)INT8_MIN); - printf("INT8_MAX=%"PRIdMAX"\n", (__Q8_MT)INT8_MAX); - printf("UINT8_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT8_MAX); +#ifdef INT8_MAX + printf("INT8_MIN=%"PRIdMAX"\n", (__Q8_MT)INT8_MIN); + printf("INT8_MAX=%"PRIdMAX"\n", (__Q8_MT)INT8_MAX); + printf("UINT8_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT8_MAX); #endif -#ifdef INT9_MAX - printf("INT9_MIN=%"PRIdMAX"\n", (__Q8_MT)INT9_MIN); - printf("INT9_MAX=%"PRIdMAX"\n", (__Q8_MT)INT9_MAX); - printf("UINT9_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT9_MAX); +#ifdef INT9_MAX + printf("INT9_MIN=%"PRIdMAX"\n", (__Q8_MT)INT9_MIN); + printf("INT9_MAX=%"PRIdMAX"\n", (__Q8_MT)INT9_MAX); + printf("UINT9_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT9_MAX); #endif -#ifdef INT12_MAX - printf("INT12_MIN=%"PRIdMAX"\n", (__Q8_MT)INT12_MIN); - printf("INT12_MAX=%"PRIdMAX"\n", (__Q8_MT)INT12_MAX); - printf("UINT12_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT12_MAX); +#ifdef INT12_MAX + printf("INT12_MIN=%"PRIdMAX"\n", (__Q8_MT)INT12_MIN); + printf("INT12_MAX=%"PRIdMAX"\n", (__Q8_MT)INT12_MAX); + printf("UINT12_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT12_MAX); #endif -#ifdef INT16_MAX - printf("INT16_MIN=%"PRIdMAX"\n", (__Q8_MT)INT16_MIN); - printf("INT16_MAX=%"PRIdMAX"\n", (__Q8_MT)INT16_MAX); - printf("UINT16_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT16_MAX); +#ifdef INT16_MAX + printf("INT16_MIN=%"PRIdMAX"\n", (__Q8_MT)INT16_MIN); + printf("INT16_MAX=%"PRIdMAX"\n", (__Q8_MT)INT16_MAX); + printf("UINT16_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT16_MAX); #endif -#ifdef INT18_MAX - printf("INT18_MIN=%"PRIdMAX"\n", (__Q8_MT)INT18_MIN); - printf("INT18_MAX=%"PRIdMAX"\n", (__Q8_MT)INT18_MAX); - printf("UINT18_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT18_MAX); +#ifdef INT18_MAX + printf("INT18_MIN=%"PRIdMAX"\n", (__Q8_MT)INT18_MIN); + printf("INT18_MAX=%"PRIdMAX"\n", (__Q8_MT)INT18_MAX); + printf("UINT18_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT18_MAX); #endif -#ifdef INT24_MAX - printf("INT24_MIN=%"PRIdMAX"\n", (__Q8_MT)INT24_MIN); - printf("INT24_MAX=%"PRIdMAX"\n", (__Q8_MT)INT24_MAX); - printf("UINT24_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT24_MAX); +#ifdef INT24_MAX + printf("INT24_MIN=%"PRIdMAX"\n", (__Q8_MT)INT24_MIN); + printf("INT24_MAX=%"PRIdMAX"\n", (__Q8_MT)INT24_MAX); + printf("UINT24_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT24_MAX); #endif -#ifdef INT32_MAX - printf("INT32_MIN=%"PRIdMAX"\n", (__Q8_MT)INT32_MIN); - printf("INT32_MAX=%"PRIdMAX"\n", (__Q8_MT)INT32_MAX); - printf("UINT32_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT32_MAX); +#ifdef INT32_MAX + printf("INT32_MIN=%"PRIdMAX"\n", (__Q8_MT)INT32_MIN); + printf("INT32_MAX=%"PRIdMAX"\n", (__Q8_MT)INT32_MAX); + printf("UINT32_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT32_MAX); #endif -#ifdef INT36_MAX - printf("INT36_MIN=%"PRIdMAX"\n", (__Q8_MT)INT36_MIN); - printf("INT36_MAX=%"PRIdMAX"\n", (__Q8_MT)INT36_MAX); - printf("UINT36_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT36_MAX); +#ifdef INT36_MAX + printf("INT36_MIN=%"PRIdMAX"\n", (__Q8_MT)INT36_MIN); + printf("INT36_MAX=%"PRIdMAX"\n", (__Q8_MT)INT36_MAX); + printf("UINT36_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT36_MAX); #endif -#ifdef INT40_MAX - printf("INT40_MIN=%"PRIdMAX"\n", (__Q8_MT)INT40_MIN); - printf("INT40_MAX=%"PRIdMAX"\n", (__Q8_MT)INT40_MAX); - printf("UINT40_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT40_MAX); +#ifdef INT40_MAX + printf("INT40_MIN=%"PRIdMAX"\n", (__Q8_MT)INT40_MIN); + printf("INT40_MAX=%"PRIdMAX"\n", (__Q8_MT)INT40_MAX); + printf("UINT40_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT40_MAX); #endif -#ifdef INT48_MAX - printf("INT48_MIN=%"PRIdMAX"\n", (__Q8_MT)INT48_MIN); - printf("INT48_MAX=%"PRIdMAX"\n", (__Q8_MT)INT48_MAX); - printf("UINT48_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT48_MAX); +#ifdef INT48_MAX + printf("INT48_MIN=%"PRIdMAX"\n", (__Q8_MT)INT48_MIN); + printf("INT48_MAX=%"PRIdMAX"\n", (__Q8_MT)INT48_MAX); + printf("UINT48_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT48_MAX); #endif -#ifdef INT60_MAX - printf("INT60_MIN=%"PRIdMAX"\n", (__Q8_MT)INT60_MIN); - printf("INT60_MAX=%"PRIdMAX"\n", (__Q8_MT)INT60_MAX); - printf("UINT60_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT60_MAX); +#ifdef INT60_MAX + printf("INT60_MIN=%"PRIdMAX"\n", (__Q8_MT)INT60_MIN); + printf("INT60_MAX=%"PRIdMAX"\n", (__Q8_MT)INT60_MAX); + printf("UINT60_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT60_MAX); #endif -#ifdef INT64_MAX - printf("INT64_MIN=%"PRIdMAX"\n", (__Q8_MT)INT64_MIN); - printf("INT64_MAX=%"PRIdMAX"\n", (__Q8_MT)INT64_MAX); - printf("UINT64_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT64_MAX); +#ifdef INT64_MAX + printf("INT64_MIN=%"PRIdMAX"\n", (__Q8_MT)INT64_MIN); + printf("INT64_MAX=%"PRIdMAX"\n", (__Q8_MT)INT64_MAX); + printf("UINT64_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT64_MAX); #endif -#ifdef INT72_MAX - printf("INT72_MIN=%"PRIdMAX"\n", (__Q8_MT)INT72_MIN); - printf("INT72_MAX=%"PRIdMAX"\n", (__Q8_MT)INT72_MAX); - printf("UINT72_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT72_MAX); +#ifdef INT72_MAX + printf("INT72_MIN=%"PRIdMAX"\n", (__Q8_MT)INT72_MIN); + printf("INT72_MAX=%"PRIdMAX"\n", (__Q8_MT)INT72_MAX); + printf("UINT72_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT72_MAX); #endif -#ifdef INT128_MAX - printf("INT128_MIN=%"PRIdMAX"\n", (__Q8_MT)INT128_MIN); - printf("INT128_MAX=%"PRIdMAX"\n", (__Q8_MT)INT128_MAX); - printf("UINT128_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT128_MAX); +#ifdef INT128_MAX + printf("INT128_MIN=%"PRIdMAX"\n", (__Q8_MT)INT128_MIN); + printf("INT128_MAX=%"PRIdMAX"\n", (__Q8_MT)INT128_MAX); + printf("UINT128_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT128_MAX); #endif - printf("INT_LEAST8_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST8_MIN); - printf("INT_LEAST8_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST8_MAX); - printf("UINT_LEAST8_MAX=%"PRIuMAX"\n", - (U__Q8_MT)UINT_LEAST8_MAX); - printf("INT_LEAST16_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST16_MIN); - printf("INT_LEAST16_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST16_MAX); - printf("UINT_LEAST16_MAX=%"PRIuMAX"\n", - (U__Q8_MT)UINT_LEAST16_MAX); - printf("INT_LEAST32_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST32_MIN); - printf("INT_LEAST32_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST32_MAX); - printf("UINT_LEAST32_MAX=%"PRIuMAX"\n", - (U__Q8_MT)UINT_LEAST32_MAX); -#ifdef INT_LEAST64_MAX - printf("INT_LEAST64_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST64_MIN); - printf("INT_LEAST64_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST64_MAX); - printf("UINT_LEAST64_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT_LEAST64_MAX); + printf("INT_LEAST8_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST8_MIN); + printf("INT_LEAST8_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST8_MAX); + printf("UINT_LEAST8_MAX=%"PRIuMAX"\n", + (U__Q8_MT)UINT_LEAST8_MAX); + printf("INT_LEAST16_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST16_MIN); + printf("INT_LEAST16_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST16_MAX); + printf("UINT_LEAST16_MAX=%"PRIuMAX"\n", + (U__Q8_MT)UINT_LEAST16_MAX); + printf("INT_LEAST32_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST32_MIN); + printf("INT_LEAST32_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST32_MAX); + printf("UINT_LEAST32_MAX=%"PRIuMAX"\n", + (U__Q8_MT)UINT_LEAST32_MAX); +#ifdef INT_LEAST64_MAX + printf("INT_LEAST64_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST64_MIN); + printf("INT_LEAST64_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST64_MAX); + printf("UINT_LEAST64_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT_LEAST64_MAX); #endif -#ifdef INT_LEAST128_MAX - printf("INT_LEAST128_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST128_MIN); - printf("INT_LEAST128_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST128_MAX); - printf("UINT_LEAST128_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT_LEAST128_MAX); +#ifdef INT_LEAST128_MAX + printf("INT_LEAST128_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST128_MIN); + printf("INT_LEAST128_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_LEAST128_MAX); + printf("UINT_LEAST128_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT_LEAST128_MAX); #endif - printf("INT_FAST8_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_FAST8_MIN); - printf("INT_FAST8_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_FAST8_MAX); - printf("UINT_FAST8_MAX=%"PRIuMAX"\n", - (U__Q8_MT)UINT_FAST8_MAX); - printf("INT_FAST16_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_FAST16_MIN); - printf("INT_FAST16_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_FAST16_MAX); - printf("UINT_FAST16_MAX=%"PRIuMAX"\n", - (U__Q8_MT)UINT_FAST16_MAX); - printf("INT_FAST32_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_FAST32_MIN); - printf("INT_FAST32_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_FAST32_MAX); - printf("UINT_FAST32_MAX=%"PRIuMAX"\n", - (U__Q8_MT)UINT_FAST32_MAX); -#ifdef INT_FAST64_MAX - printf("INT_FAST64_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_FAST64_MIN); - printf("INT_FAST64_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_FAST64_MAX); - printf("UINT_FAST64_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT_FAST64_MAX); + printf("INT_FAST8_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_FAST8_MIN); + printf("INT_FAST8_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_FAST8_MAX); + printf("UINT_FAST8_MAX=%"PRIuMAX"\n", + (U__Q8_MT)UINT_FAST8_MAX); + printf("INT_FAST16_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_FAST16_MIN); + printf("INT_FAST16_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_FAST16_MAX); + printf("UINT_FAST16_MAX=%"PRIuMAX"\n", + (U__Q8_MT)UINT_FAST16_MAX); + printf("INT_FAST32_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_FAST32_MIN); + printf("INT_FAST32_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_FAST32_MAX); + printf("UINT_FAST32_MAX=%"PRIuMAX"\n", + (U__Q8_MT)UINT_FAST32_MAX); +#ifdef INT_FAST64_MAX + printf("INT_FAST64_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_FAST64_MIN); + printf("INT_FAST64_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_FAST64_MAX); + printf("UINT_FAST64_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT_FAST64_MAX); #endif -#ifdef INT_FAST128_MAX - printf("INT_FAST128_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_FAST128_MIN); - printf("INT_FAST128_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_FAST128_MAX); - printf("UINT_FAST128_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT_FAST128_MAX); +#ifdef INT_FAST128_MAX + printf("INT_FAST128_MIN=%"PRIdMAX"\n", (__Q8_MT)INT_FAST128_MIN); + printf("INT_FAST128_MAX=%"PRIdMAX"\n", (__Q8_MT)INT_FAST128_MAX); + printf("UINT_FAST128_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINT_FAST128_MAX); #endif -#ifdef INTPTR_MAX - printf("INTPTR_MIN=%"PRIdMAX"\n", (__Q8_MT)INTPTR_MIN); - printf("INTPTR_MAX=%"PRIdMAX"\n", (__Q8_MT)INTPTR_MAX); +#ifdef INTPTR_MAX + printf("INTPTR_MIN=%"PRIdMAX"\n", (__Q8_MT)INTPTR_MIN); + printf("INTPTR_MAX=%"PRIdMAX"\n", (__Q8_MT)INTPTR_MAX); #endif -#ifdef UINTPTR_MAX - printf("UINTPTR_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINTPTR_MAX); +#ifdef UINTPTR_MAX + printf("UINTPTR_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINTPTR_MAX); #endif -#ifdef INTMAX_MAX - printf("INTMAX_MIN=%"PRIdMAX"\n", (__Q8_MT)INTMAX_MIN); - printf("INTMAX_MAX=%"PRIdMAX"\n", (__Q8_MT)INTMAX_MAX); - printf("UINTMAX_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINTMAX_MAX); +#ifdef INTMAX_MAX + printf("INTMAX_MIN=%"PRIdMAX"\n", (__Q8_MT)INTMAX_MIN); + printf("INTMAX_MAX=%"PRIdMAX"\n", (__Q8_MT)INTMAX_MAX); + printf("UINTMAX_MAX=%"PRIuMAX"\n", (U__Q8_MT)UINTMAX_MAX); #endif -#ifdef PTRDIFF_MAX - printf("PTRDIFF_MIN=%"PRIdMAX"\n", (__Q8_MT)PTRDIFF_MIN); - printf("PTRDIFF_MAX=%"PRIdMAX"\n", (__Q8_MT)PTRDIFF_MAX); +#ifdef PTRDIFF_MAX + printf("PTRDIFF_MIN=%"PRIdMAX"\n", (__Q8_MT)PTRDIFF_MIN); + printf("PTRDIFF_MAX=%"PRIdMAX"\n", (__Q8_MT)PTRDIFF_MAX); #endif -#ifdef SIG_ATOMIC_MAX -#if SIG_ATOMIC_MIN < 0 - printf("SIG_ATOMIC_MIN=%"PRIdMAX"\n", (__Q8_MT)SIG_ATOMIC_MIN); - printf("SIG_ATOMIC_MAX=%"PRIdMAX"\n", (__Q8_MT)SIG_ATOMIC_MAX); +#ifdef SIG_ATOMIC_MAX +#if SIG_ATOMIC_MIN < 0 + printf("SIG_ATOMIC_MIN=%"PRIdMAX"\n", (__Q8_MT)SIG_ATOMIC_MIN); + printf("SIG_ATOMIC_MAX=%"PRIdMAX"\n", (__Q8_MT)SIG_ATOMIC_MAX); #else - printf("SIG_ATOMIC_MIN=%"PRIuMAX"\n", (U__Q8_MT)SIG_ATOMIC_MIN); - printf("SIG_ATOMIC_MAX=%"PRIuMAX"\n", (U__Q8_MT)SIG_ATOMIC_MAX); + printf("SIG_ATOMIC_MIN=%"PRIuMAX"\n", (U__Q8_MT)SIG_ATOMIC_MIN); + printf("SIG_ATOMIC_MAX=%"PRIuMAX"\n", (U__Q8_MT)SIG_ATOMIC_MAX); #endif #endif -#ifdef SIZE_MAX - printf("SIZE_MAX=%"PRIuMAX"\n", (U__Q8_MT)SIZE_MAX); +#ifdef SIZE_MAX + printf("SIZE_MAX=%"PRIuMAX"\n", (U__Q8_MT)SIZE_MAX); #endif -#ifdef WCHAR_MAX -#if WCHAR_MIN < 0 - printf("WCHAR_MIN=%"PRIdMAX"\n", (__Q8_MT)WCHAR_MIN); - printf("WCHAR_MAX=%"PRIdMAX"\n", (__Q8_MT)WCHAR_MAX); +#ifdef WCHAR_MAX +#if WCHAR_MIN < 0 + printf("WCHAR_MIN=%"PRIdMAX"\n", (__Q8_MT)WCHAR_MIN); + printf("WCHAR_MAX=%"PRIdMAX"\n", (__Q8_MT)WCHAR_MAX); #else - printf("WCHAR_MIN=%"PRIuMAX"\n", (U__Q8_MT)WCHAR_MIN); - printf("WCHAR_MAX=%"PRIuMAX"\n", (U__Q8_MT)WCHAR_MAX); + printf("WCHAR_MIN=%"PRIuMAX"\n", (U__Q8_MT)WCHAR_MIN); + printf("WCHAR_MAX=%"PRIuMAX"\n", (U__Q8_MT)WCHAR_MAX); #endif #endif -#ifdef WINT_MAX -#if WINT_MIN < 0 - printf("WINT_MIN=%"PRIdMAX"\n", (__Q8_MT)WINT_MIN); - printf("WINT_MAX=%"PRIdMAX"\n", (__Q8_MT)WINT_MAX); +#ifdef WINT_MAX +#if WINT_MIN < 0 + printf("WINT_MIN=%"PRIdMAX"\n", (__Q8_MT)WINT_MIN); + printf("WINT_MAX=%"PRIdMAX"\n", (__Q8_MT)WINT_MAX); #else - printf("WINT_MIN=%"PRIuMAX"\n", (U__Q8_MT)WINT_MIN); - printf("WINT_MAX=%"PRIuMAX"\n", (U__Q8_MT)WINT_MAX); + printf("WINT_MIN=%"PRIuMAX"\n", (U__Q8_MT)WINT_MIN); + printf("WINT_MAX=%"PRIuMAX"\n", (U__Q8_MT)WINT_MAX); #endif #endif - /* - 7.18.4 Macros for integer constants - */ + /* + 7.18.4 Macros for integer constants + */ - /* INTn_C for n=8 and 16 were at one point unimplementable - on most platforms, so they're treated as "optional": */ -#ifdef INT8_C - if ( INT8_C(-123) != -123 ) - printf("*** INT8_C(-123) produced %"PRIdMAX" ***\n", - (__Q8_MT)INT8_C(-123) - ); - if ( UINT8_C(123) != 123 ) - printf("*** UINT8_C(123) produced %"PRIuMAX" ***\n", - (U__Q8_MT)UINT8_C(123) - ); + /* INTn_C for n=8 and 16 were at one point unimplementable + on most platforms, so they're treated as "optional": */ +#ifdef INT8_C + if ( INT8_C(-123) != -123 ) + printf("*** INT8_C(-123) produced %"PRIdMAX" ***\n", + (__Q8_MT)INT8_C(-123) + ); + if ( UINT8_C(123) != 123 ) + printf("*** UINT8_C(123) produced %"PRIuMAX" ***\n", + (U__Q8_MT)UINT8_C(123) + ); #endif -#ifdef INT16_C - if ( INT16_C(-12345) != -12345 ) - printf("*** INT16_C(-12345) produced %"PRIdMAX" ***\n", - (__Q8_MT)INT16_C(-12345) - ); - if ( UINT16_C(12345) != 12345 ) - printf("*** UINT16_C(12345) produced %"PRIuMAX" ***\n", - (U__Q8_MT)UINT16_C(12345) - ); +#ifdef INT16_C + if ( INT16_C(-12345) != -12345 ) + printf("*** INT16_C(-12345) produced %"PRIdMAX" ***\n", + (__Q8_MT)INT16_C(-12345) + ); + if ( UINT16_C(12345) != 12345 ) + printf("*** UINT16_C(12345) produced %"PRIuMAX" ***\n", + (U__Q8_MT)UINT16_C(12345) + ); #endif - if ( INT32_C(-123456789) != -123456789 ) - printf("*** INT32_C(-123456789) produced %"PRIdMAX" ***\n", - (__Q8_MT)INT32_C(-123456789) - ); - if ( UINT32_C(123456789) != 123456789 ) - printf("*** UINT32_C(123456789) produced %"PRIuMAX" ***\n", - (U__Q8_MT)UINT32_C(123456789) - ); -#ifdef INT_LEAST64_MAX - if ( INT64_C(-1234567890123456789) != -1234567890123456789 ) - printf("*** INT64_C(-1234567890123456789) produced %"PRIdMAX - " ***\n", - (__Q8_MT)INT64_C(-1234567890123456789) - ); - if ( UINT64_C(1234567890123456789) != 1234567890123456789 ) - printf("*** UINT64_C(1234567890123456789) produced %"PRIuMAX - " ***\n", - (U__Q8_MT)UINT64_C(1234567890123456789) - ); + if ( INT32_C(-123456789) != -123456789 ) + printf("*** INT32_C(-123456789) produced %"PRIdMAX" ***\n", + (__Q8_MT)INT32_C(-123456789) + ); + if ( UINT32_C(123456789) != 123456789 ) + printf("*** UINT32_C(123456789) produced %"PRIuMAX" ***\n", + (U__Q8_MT)UINT32_C(123456789) + ); +#ifdef INT_LEAST64_MAX + if ( INT64_C(-1234567890123456789) != -1234567890123456789 ) + printf("*** INT64_C(-1234567890123456789) produced %"PRIdMAX + " ***\n", + (__Q8_MT)INT64_C(-1234567890123456789) + ); + if ( UINT64_C(1234567890123456789) != 1234567890123456789 ) + printf("*** UINT64_C(1234567890123456789) produced %"PRIuMAX + " ***\n", + (U__Q8_MT)UINT64_C(1234567890123456789) + ); #endif -#ifdef INTMAX_MAX - if ( INTMAX_C(-1234567890123456789) != -1234567890123456789 ) - printf("*** INTMAX_C(-1234567890123456789) produced %"PRIdMAX - " ***\n", - (__Q8_MT)INTMAX_C(-1234567890123456789) - ); - if ( UINTMAX_C(1234567890123456789) != 1234567890123456789 ) - printf("*** UINTMAX_C(1234567890123456789) produced %"PRIuMAX - " ***\n", - (U__Q8_MT)UINTMAX_C(1234567890123456789) - ); +#ifdef INTMAX_MAX + if ( INTMAX_C(-1234567890123456789) != -1234567890123456789 ) + printf("*** INTMAX_C(-1234567890123456789) produced %"PRIdMAX + " ***\n", + (__Q8_MT)INTMAX_C(-1234567890123456789) + ); + if ( UINTMAX_C(1234567890123456789) != 1234567890123456789 ) + printf("*** UINTMAX_C(1234567890123456789) produced %"PRIuMAX + " ***\n", + (U__Q8_MT)UINTMAX_C(1234567890123456789) + ); #endif - /* <inttypes.h> features: */ + /* <inttypes.h> features: */ -#if __STDC_VERSION__ >= 199901 - printf("sizeof(imaxdiv_t)=%u\n", (unsigned)sizeof(imaxdiv_t)); +#if __STDC_VERSION__ >= 199901 + printf("sizeof(imaxdiv_t)=%u\n", (unsigned)sizeof(imaxdiv_t)); #endif - /* - 7.8.1 Macros for format specifiers - */ + /* + 7.8.1 Macros for format specifiers + */ - { - /* scanf these strings */ - static const char in_dn[] = "Z119bZ"; - static const char in_dmo[] = "Z-0119bZ"; - static const char in_dspx[] = "Z \t\n +0X119bZ"; - static const char in_dsmx[] = "Z \t\n -0x119bZ"; - static const char in_dsn[] = "Z \t\n 119bZ"; - static const char in_dp[] = "Z+119bZ"; - static const char in_dpx[] = "Z+0X119bz"; + { + /* scanf these strings */ + static const char in_dn[] = "Z119bZ"; + static const char in_dmo[] = "Z-0119bZ"; + static const char in_dspx[] = "Z \t\n +0X119bZ"; + static const char in_dsmx[] = "Z \t\n -0x119bZ"; + static const char in_dsn[] = "Z \t\n 119bZ"; + static const char in_dp[] = "Z+119bZ"; + static const char in_dpx[] = "Z+0X119bz"; - /* sprintf into this */ - static char buffer[1024]; + /* sprintf into this */ + static char buffer[1024]; #if 1 -#define SCAN(buf,fs,var,exp) if ( sscanf(buf, "Z%" fs, &var) != 1 ) \ - { \ - printf("***%s=",fs, STR_SUB(fs) \ - " failed ***\n" \ - ); \ - status = EXIT_FAILURE; \ - } \ - else if ( var != (exp) ) \ - { \ - printf("***%s=",fs, STR_SUB(fs) \ - " should be: " STR_SUB(exp) \ - ", was: %" fs " ***\n", var \ - ); \ - status = EXIT_FAILURE; \ - } \ - else /* for trailing semicolon */ +#define SCAN(buf,fs,var,exp) if ( sscanf(buf, "Z%" fs, &var) != 1 ) \ + { \ + printf("***%s=",fs, STR_SUB(fs) \ + " failed ***\n" \ + ); \ + status = EXIT_FAILURE; \ + } \ + else if ( var != (exp) ) \ + { \ + printf("***%s=",fs, STR_SUB(fs) \ + " should be: " STR_SUB(exp) \ + ", was: %" fs " ***\n", var \ + ); \ + status = EXIT_FAILURE; \ + } \ + else /* for trailing semicolon */ -#define PRINT(fs,var,exp) if ( sprintf(buffer, "%" fs, var ) <= 0 ) \ - { \ - printf("***%s=",fs, STR_SUB(fs) \ - " failed ***\n" \ - ); \ - status = EXIT_FAILURE; \ - } \ - else if ( strcmp(buffer, STR_SUB(exp)) != 0 ) \ - { \ - printf("***%s=",fs, STR_SUB(fs) \ - " should be: " STR_SUB(exp) \ - ", was: %s ***\n", buffer \ - ); \ - status = EXIT_FAILURE; \ - } \ - else /* for trailing semicolon */ +#define PRINT(fs,var,exp) if ( sprintf(buffer, "%" fs, var ) <= 0 ) \ + { \ + printf("***%s=",fs, STR_SUB(fs) \ + " failed ***\n" \ + ); \ + status = EXIT_FAILURE; \ + } \ + else if ( strcmp(buffer, STR_SUB(exp)) != 0 ) \ + { \ + printf("***%s=",fs, STR_SUB(fs) \ + " should be: " STR_SUB(exp) \ + ", was: %s ***\n", buffer \ + ); \ + status = EXIT_FAILURE; \ + } \ + else /* for trailing semicolon */ #else - -#define SCAN(buf,fs,var,exp) -#define PRINT(fs,var,exp) + +#define SCAN(buf,fs,var,exp) +#define PRINT(fs,var,exp) #endif - -#ifdef SCNo32 - SCAN(in_dn, SCNo32, int32, 9); +#ifdef SCNo32 + + SCAN(in_dn, SCNo32, int32, 9); #endif -#ifdef PRIo32 - PRINT(PRIo32, int32, 11); +#ifdef PRIo32 + PRINT(PRIo32, int32, 11); #endif - SCAN(in_dmo, SCNiLEAST16, intl16, -9); - SCAN(in_dspx, SCNdLEAST16, intl16, 0); - SCAN(in_dsmx, SCNiLEAST16, intl16, -4507); - PRINT(PRIdLEAST16, intl16, -4507); - PRINT(PRIiLEAST16, intl16, -4507); - SCAN(in_dsn, SCNxLEAST16, uintl16, 4507); - PRINT(PRIoLEAST16, uintl16, 10633); - PRINT(PRIuLEAST16, uintl16, 4507); - PRINT(PRIxLEAST16, uintl16, 119b); - PRINT(PRIXLEAST16, uintl16, 119B); - SCAN(in_dp, SCNxFAST16, uintf16, 4507); - PRINT(PRIxFAST16, uintf16, 119b); -#ifdef SCNdMAX - SCAN(in_dp, SCNdMAX, intmax, 119); + SCAN(in_dmo, SCNiLEAST16, intl16, -9); + SCAN(in_dspx, SCNdLEAST16, intl16, 0); + SCAN(in_dsmx, SCNiLEAST16, intl16, -4507); + PRINT(PRIdLEAST16, intl16, -4507); + PRINT(PRIiLEAST16, intl16, -4507); + SCAN(in_dsn, SCNxLEAST16, uintl16, 4507); + PRINT(PRIoLEAST16, uintl16, 10633); + PRINT(PRIuLEAST16, uintl16, 4507); + PRINT(PRIxLEAST16, uintl16, 119b); + PRINT(PRIXLEAST16, uintl16, 119B); + SCAN(in_dp, SCNxFAST16, uintf16, 4507); + PRINT(PRIxFAST16, uintf16, 119b); +#ifdef SCNdMAX + SCAN(in_dp, SCNdMAX, intmax, 119); #endif -#ifdef PRIiMAX - PRINT(PRIiMAX, intmax, 119); +#ifdef PRIiMAX + PRINT(PRIiMAX, intmax, 119); #endif -#ifdef SCNoMAX - SCAN(in_dpx, SCNoMAX, uintmax, 0); +#ifdef SCNoMAX + SCAN(in_dpx, SCNoMAX, uintmax, 0); #endif -#ifdef PRIxMAX - PRINT(PRIxMAX, uintmax, 0); +#ifdef PRIxMAX + PRINT(PRIxMAX, uintmax, 0); #endif - /* Obviously there should be a much larger battery of such tests. */ - } + /* Obviously there should be a much larger battery of such tests. */ + } -#if defined(INTMAX_MAX) /* <inttypes.h> has C99 features */ - /* - 7.8.2 Functions for greatest-width integer types - */ +#if defined(INTMAX_MAX) /* <inttypes.h> has C99 features */ + /* + 7.8.2 Functions for greatest-width integer types + */ - { - static struct - { - intmax_t input; - intmax_t expect; - } abs_data[] = - { -#ifdef INT8_MAX - { INT8_MAX, INT8_MAX, }, - { -INT8_MAX, INT8_MAX, }, - { UINT8_MAX, UINT8_MAX, }, + { + static struct + { + intmax_t input; + intmax_t expect; + } abs_data[] = + { +#ifdef INT8_MAX + { INT8_MAX, INT8_MAX, }, + { -INT8_MAX, INT8_MAX, }, + { UINT8_MAX, UINT8_MAX, }, #endif #if 0 - -#ifdef INT16_MAX - { INT16_MAX, INT16_MAX, }, - { -INT16_MAX, INT16_MAX, }, - { UINT16_MAX, UINT16_MAX, }, -#endif -#ifdef INT32_MAX - { INT32_MAX, INT32_MAX, }, - { -INT32_MAX, INT32_MAX, }, -#ifdef INT_LEAST64_MAX /* else might support only 32 bits */ - { UINT32_MAX, UINT32_MAX, }, -#endif -#endif -#ifdef INT64_MAX - { INT64_MAX, INT64_MAX, }, - { -INT64_MAX, INT64_MAX, }, -#endif - { INT_LEAST8_MAX, INT_LEAST8_MAX, }, - { -INT_LEAST8_MAX, INT_LEAST8_MAX, }, - { UINT_LEAST8_MAX, UINT_LEAST8_MAX, }, - { INT_LEAST16_MAX, INT_LEAST16_MAX, }, - { -INT_LEAST16_MAX, INT_LEAST16_MAX, }, - { UINT_LEAST16_MAX, UINT_LEAST16_MAX, }, - { INT_LEAST32_MAX, INT_LEAST32_MAX, }, - { -INT_LEAST32_MAX, INT_LEAST32_MAX, }, -#ifdef INT_LEAST64_MAX - { UINT_LEAST32_MAX, UINT_LEAST32_MAX, }, - { INT_LEAST64_MAX, INT_LEAST64_MAX, }, - { -INT_LEAST64_MAX, INT_LEAST64_MAX, }, -#endif - { INT_FAST8_MAX, INT_FAST8_MAX, }, - { -INT_FAST8_MAX, INT_FAST8_MAX, }, - { UINT_FAST8_MAX, UINT_FAST8_MAX, }, - { INT_FAST16_MAX, INT_FAST16_MAX, }, - { -INT_FAST16_MAX, INT_FAST16_MAX, }, - { UINT_FAST16_MAX, UINT_FAST16_MAX, }, - { INT_FAST32_MAX, INT_FAST32_MAX, }, - { -INT_FAST32_MAX, INT_FAST32_MAX, }, -#ifdef INT_FAST64_MAX - { UINT_FAST32_MAX, UINT_FAST32_MAX, }, - { INT_FAST64_MAX, INT_FAST64_MAX, }, - { -INT_FAST64_MAX, INT_FAST64_MAX, }, -#endif -#ifdef INTPTR_MAX - { INTPTR_MAX, INTPTR_MAX, }, - { -INTPTR_MAX, INTPTR_MAX, }, -#endif -#ifdef UINTPTR_MAX - { UINTPTR_MAX, UINTPTR_MAX, }, -#endif - { INTMAX_MAX, INTMAX_MAX, }, -#ifdef PTRDIFF_MAX - { PTRDIFF_MAX, PTRDIFF_MAX, }, -#endif -#ifdef SIG_ATOMIC_MAX - { SIG_ATOMIC_MAX, SIG_ATOMIC_MAX, }, -#if SIG_ATOMIC_MIN < 0 - { -SIG_ATOMIC_MAX, SIG_ATOMIC_MAX, }, -#endif -#endif -#ifdef SIZE_MAX - { SIZE_MAX, SIZE_MAX, }, -#endif -#ifdef WCHAR_MAX - { WCHAR_MAX, WCHAR_MAX, }, -#if WCHAR_MIN < 0 - { -WCHAR_MAX, WCHAR_MAX, }, -#endif -#endif -#ifdef WINT_MAX - { WINT_MAX, WINT_MAX, }, -#if WINT_MIN < 0 - { -WINT_MAX, WINT_MAX, }, -#endif -#endif - { 127, 127, }, - { -127, 127, }, - { 128, 128, }, - { -127-1, 128, }, - { 255, 255, }, - { -256+1, 255, }, - { 256, 256, }, - { -256, 256, }, - { 32767, 32767, }, - { -32767, 32767, }, - { 32768, 32768, }, - { -32767-1, 32768, }, - { 65535, 65535, }, - { -65536+1, 65535, }, - { 65536, 65536, }, - { -65536, 65536, }, - { 2147483647, 2147483647, }, - { -2147483647, 2147483647, }, - { 2147483648, 2147483648, }, - { -2147483647-1, 2147483648, }, -#ifdef INT_LEAST64_MAX /* else might support only 32 bits */ - { 4294967295, 4294967295, }, - { -4294967296+1, 4294967295, }, - { 4294967296, 4294967296, }, - { -4294967296, 4294967296, }, - { 9223372036854775807, 9223372036854775807, }, - { -9223372036854775807, 9223372036854775807, }, - { 1234567890123456789, 1234567890123456789, }, - { -1234567890123456789, 1234567890123456789, }, -#endif - { 1, 1, }, - { -1, 1, }, - { 2, 2, }, - { -2, 2, }, - { 10, 10, }, - { -10, 10, }, - { 16, 16, }, - { -16, 16, }, -#endif - /* Other test cases can be added here. */ - { 0, 0 /* terminates the list */ }, - }, *adp = abs_data; - do { - if ( (intmax = imaxabs(adp->input)) != adp->expect ) - { - printf("*** imaxabs(%"PRIdMAX") failed; should be: %" - PRIdMAX", was: %"PRIdMAX" ***\n", - adp->input, adp->expect, intmax - ); - status = EXIT_FAILURE; - } -// } while ( adp++->input != 0 ); - } while ( (adp++)->input != 0 ); - } +#ifdef INT16_MAX + { INT16_MAX, INT16_MAX, }, + { -INT16_MAX, INT16_MAX, }, + { UINT16_MAX, UINT16_MAX, }, +#endif +#ifdef INT32_MAX + { INT32_MAX, INT32_MAX, }, + { -INT32_MAX, INT32_MAX, }, +#ifdef INT_LEAST64_MAX /* else might support only 32 bits */ + { UINT32_MAX, UINT32_MAX, }, +#endif +#endif +#ifdef INT64_MAX + { INT64_MAX, INT64_MAX, }, + { -INT64_MAX, INT64_MAX, }, +#endif + { INT_LEAST8_MAX, INT_LEAST8_MAX, }, + { -INT_LEAST8_MAX, INT_LEAST8_MAX, }, + { UINT_LEAST8_MAX, UINT_LEAST8_MAX, }, + { INT_LEAST16_MAX, INT_LEAST16_MAX, }, + { -INT_LEAST16_MAX, INT_LEAST16_MAX, }, + { UINT_LEAST16_MAX, UINT_LEAST16_MAX, }, + { INT_LEAST32_MAX, INT_LEAST32_MAX, }, + { -INT_LEAST32_MAX, INT_LEAST32_MAX, }, +#ifdef INT_LEAST64_MAX + { UINT_LEAST32_MAX, UINT_LEAST32_MAX, }, + { INT_LEAST64_MAX, INT_LEAST64_MAX, }, + { -INT_LEAST64_MAX, INT_LEAST64_MAX, }, +#endif + { INT_FAST8_MAX, INT_FAST8_MAX, }, + { -INT_FAST8_MAX, INT_FAST8_MAX, }, + { UINT_FAST8_MAX, UINT_FAST8_MAX, }, + { INT_FAST16_MAX, INT_FAST16_MAX, }, + { -INT_FAST16_MAX, INT_FAST16_MAX, }, + { UINT_FAST16_MAX, UINT_FAST16_MAX, }, + { INT_FAST32_MAX, INT_FAST32_MAX, }, + { -INT_FAST32_MAX, INT_FAST32_MAX, }, +#ifdef INT_FAST64_MAX + { UINT_FAST32_MAX, UINT_FAST32_MAX, }, + { INT_FAST64_MAX, INT_FAST64_MAX, }, + { -INT_FAST64_MAX, INT_FAST64_MAX, }, +#endif +#ifdef INTPTR_MAX + { INTPTR_MAX, INTPTR_MAX, }, + { -INTPTR_MAX, INTPTR_MAX, }, +#endif +#ifdef UINTPTR_MAX + { UINTPTR_MAX, UINTPTR_MAX, }, +#endif + { INTMAX_MAX, INTMAX_MAX, }, +#ifdef PTRDIFF_MAX + { PTRDIFF_MAX, PTRDIFF_MAX, }, +#endif +#ifdef SIG_ATOMIC_MAX + { SIG_ATOMIC_MAX, SIG_ATOMIC_MAX, }, +#if SIG_ATOMIC_MIN < 0 + { -SIG_ATOMIC_MAX, SIG_ATOMIC_MAX, }, +#endif +#endif +#ifdef SIZE_MAX + { SIZE_MAX, SIZE_MAX, }, +#endif +#ifdef WCHAR_MAX + { WCHAR_MAX, WCHAR_MAX, }, +#if WCHAR_MIN < 0 + { -WCHAR_MAX, WCHAR_MAX, }, +#endif +#endif +#ifdef WINT_MAX + { WINT_MAX, WINT_MAX, }, +#if WINT_MIN < 0 + { -WINT_MAX, WINT_MAX, }, +#endif +#endif + { 127, 127, }, + { -127, 127, }, + { 128, 128, }, + { -127-1, 128, }, + { 255, 255, }, + { -256+1, 255, }, + { 256, 256, }, + { -256, 256, }, + { 32767, 32767, }, + { -32767, 32767, }, + { 32768, 32768, }, + { -32767-1, 32768, }, + { 65535, 65535, }, + { -65536+1, 65535, }, + { 65536, 65536, }, + { -65536, 65536, }, + { 2147483647, 2147483647, }, + { -2147483647, 2147483647, }, + { 2147483648, 2147483648, }, + { -2147483647-1, 2147483648, }, +#ifdef INT_LEAST64_MAX /* else might support only 32 bits */ + { 4294967295, 4294967295, }, + { -4294967296+1, 4294967295, }, + { 4294967296, 4294967296, }, + { -4294967296, 4294967296, }, + { 9223372036854775807, 9223372036854775807, }, + { -9223372036854775807, 9223372036854775807, }, + { 1234567890123456789, 1234567890123456789, }, + { -1234567890123456789, 1234567890123456789, }, +#endif + { 1, 1, }, + { -1, 1, }, + { 2, 2, }, + { -2, 2, }, + { 10, 10, }, + { -10, 10, }, + { 16, 16, }, + { -16, 16, }, +#endif + /* Other test cases can be added here. */ + { 0, 0 /* terminates the list */ }, + }, *adp = abs_data; - { - imaxdiv_t result; - static struct - { - intmax_t numer; - intmax_t denom; - intmax_t exp_quot; - intmax_t exp_rem; - } div_data[] = - { - { 0, 1, 0, 0, }, + do { + if ( (intmax = imaxabs(adp->input)) != adp->expect ) + { + printf("*** imaxabs(%"PRIdMAX") failed; should be: %" + PRIdMAX", was: %"PRIdMAX" ***\n", + adp->input, adp->expect, intmax + ); + status = EXIT_FAILURE; + } +// } while ( adp++->input != 0 ); + } while ( (adp++)->input != 0 ); + } + + { + imaxdiv_t result; + static struct + { + intmax_t numer; + intmax_t denom; + intmax_t exp_quot; + intmax_t exp_rem; + } div_data[] = + { + { 0, 1, 0, 0, }, #if 0 - { 0, -1, 0, 0, }, - { 0, 2, 0, 0, }, - { 0, -2, 0, 0, }, - { 0, 5, 0, 0, }, - { 0, -5, 0, 0, }, - { 1, 1, 1, 0, }, - { 1, -1, -1, 0, }, - { 1, 2, 0, 1, }, - { 1, -2, 0, 1, }, - { 1, 5, 0, 1, }, - { 1, -5, 0, 1, }, - { -1, 1, -1, 0, }, - { -1, -1, 1, 0, }, - { -1, 2, 0, -1, }, - { -1, -2, 0, -1, }, - { -1, 5, 0, -1, }, - { -1, -5, 0, -1, }, - { 2, 1, 2, 0, }, - { 2, -1, -2, 0, }, - { 2, 2, 1, 0, }, - { 2, -2, -1, 0, }, - { 2, 5, 0, 2, }, - { 2, -5, 0, 2, }, - { -2, 1, -2, 0, }, - { -2, -1, 2, 0, }, - { -2, 2, -1, 0, }, - { -2, -2, 1, 0, }, - { -2, 5, 0, -2, }, - { -2, -5, 0, -2, }, - { 17, 5, 3, 2, }, - { -17, -5, 3, -2, }, - { 17, -5, -3, 2, }, - { -17, 5, -3, -2, }, - { 2147483647, 1, 2147483647, 0, }, - { -2147483647, 1, -2147483647, 0, }, - { 2147483648, 1, 2147483648, 0, }, - { -2147483647-1, 1, -2147483647-1, 0, }, - { 2147483647, 2, 1073741823, 1, }, - { -2147483647, 2, -1073741823, -1, }, - { 2147483648, 2, 1073741824, 0, }, - { -2147483647-1, 2, -1073741824, 0, }, -#ifdef INT_LEAST64_MAX /* else might support only 32 bits */ - { 4294967295, 1, 4294967295, 0, }, - { -4294967296+1, 1, -4294967296+1, 0, }, - { 4294967296, 1, 4294967296, 0, }, - { -4294967296, 1, -4294967296, 0, }, - { 4294967295, -1, -4294967296+1, 0, }, - { -4294967296+1, -1, 4294967295, 0, }, - { 4294967296, -1, -4294967296, 0, }, - { -4294967296, -1, 4294967296, 0, }, - { 4294967295, 2, 2147483647, 1, }, - { -4294967296+1, 2, -2147483647, -1, }, - { 4294967296, 2, 2147483648, 0, }, - { -4294967296, 2, -2147483647-1, 0, }, - { 4294967295, 2147483647, 2, 1, }, - { -4294967296+1, 2147483647, -2, -1, }, - { 4294967296, 2147483647, 2, 2, }, - { -4294967296, 2147483647, -2, -2, }, - { 4294967295, -2147483647, -2, 1, }, - { -4294967296+1, -2147483647, 2, -1, }, - { 4294967296, -2147483647, -2, 2, }, - { -4294967296, -2147483647, 2, -2, }, - { 4294967295, 2147483648, 1, 2147483647, }, - { -4294967296+1, 2147483648, -1, -2147483647, }, - { 4294967296, 2147483648, 2, 0, }, - { -4294967296, 2147483648, -2, 0, }, - { 4294967295, -2147483647-1, -1, 2147483647, }, - { -4294967296+1, -2147483647-1, 1, -2147483647,}, - { 4294967296, -2147483647-1, -2, 0, }, - { -4294967296, -2147483647-1, 2, 0, }, - { 9223372036854775807, 1, 9223372036854775807, 0, }, - { -9223372036854775807, 1, -9223372036854775807, 0, }, - { 9223372036854775807, 2, 4611686018427387903, 1, }, - { -9223372036854775807, 2, -4611686018427387903, -1, }, + { 0, -1, 0, 0, }, + { 0, 2, 0, 0, }, + { 0, -2, 0, 0, }, + { 0, 5, 0, 0, }, + { 0, -5, 0, 0, }, + { 1, 1, 1, 0, }, + { 1, -1, -1, 0, }, + { 1, 2, 0, 1, }, + { 1, -2, 0, 1, }, + { 1, 5, 0, 1, }, + { 1, -5, 0, 1, }, + { -1, 1, -1, 0, }, + { -1, -1, 1, 0, }, + { -1, 2, 0, -1, }, + { -1, -2, 0, -1, }, + { -1, 5, 0, -1, }, + { -1, -5, 0, -1, }, + { 2, 1, 2, 0, }, + { 2, -1, -2, 0, }, + { 2, 2, 1, 0, }, + { 2, -2, -1, 0, }, + { 2, 5, 0, 2, }, + { 2, -5, 0, 2, }, + { -2, 1, -2, 0, }, + { -2, -1, 2, 0, }, + { -2, 2, -1, 0, }, + { -2, -2, 1, 0, }, + { -2, 5, 0, -2, }, + { -2, -5, 0, -2, }, + { 17, 5, 3, 2, }, + { -17, -5, 3, -2, }, + { 17, -5, -3, 2, }, + { -17, 5, -3, -2, }, + { 2147483647, 1, 2147483647, 0, }, + { -2147483647, 1, -2147483647, 0, }, + { 2147483648, 1, 2147483648, 0, }, + { -2147483647-1, 1, -2147483647-1, 0, }, + { 2147483647, 2, 1073741823, 1, }, + { -2147483647, 2, -1073741823, -1, }, + { 2147483648, 2, 1073741824, 0, }, + { -2147483647-1, 2, -1073741824, 0, }, +#ifdef INT_LEAST64_MAX /* else might support only 32 bits */ + { 4294967295, 1, 4294967295, 0, }, + { -4294967296+1, 1, -4294967296+1, 0, }, + { 4294967296, 1, 4294967296, 0, }, + { -4294967296, 1, -4294967296, 0, }, + { 4294967295, -1, -4294967296+1, 0, }, + { -4294967296+1, -1, 4294967295, 0, }, + { 4294967296, -1, -4294967296, 0, }, + { -4294967296, -1, 4294967296, 0, }, + { 4294967295, 2, 2147483647, 1, }, + { -4294967296+1, 2, -2147483647, -1, }, + { 4294967296, 2, 2147483648, 0, }, + { -4294967296, 2, -2147483647-1, 0, }, + { 4294967295, 2147483647, 2, 1, }, + { -4294967296+1, 2147483647, -2, -1, }, + { 4294967296, 2147483647, 2, 2, }, + { -4294967296, 2147483647, -2, -2, }, + { 4294967295, -2147483647, -2, 1, }, + { -4294967296+1, -2147483647, 2, -1, }, + { 4294967296, -2147483647, -2, 2, }, + { -4294967296, -2147483647, 2, -2, }, + { 4294967295, 2147483648, 1, 2147483647, }, + { -4294967296+1, 2147483648, -1, -2147483647, }, + { 4294967296, 2147483648, 2, 0, }, + { -4294967296, 2147483648, -2, 0, }, + { 4294967295, -2147483647-1, -1, 2147483647, }, + { -4294967296+1, -2147483647-1, 1, -2147483647,}, + { 4294967296, -2147483647-1, -2, 0, }, + { -4294967296, -2147483647-1, 2, 0, }, + { 9223372036854775807, 1, 9223372036854775807, 0, }, + { -9223372036854775807, 1, -9223372036854775807, 0, }, + { 9223372036854775807, 2, 4611686018427387903, 1, }, + { -9223372036854775807, 2, -4611686018427387903, -1, }, #endif #endif - /* There should be a much larger battery of such tests. */ - { 0, 0, 0, 0 }, /* 0 denom terminates the list */ - }, *ddp; + /* There should be a much larger battery of such tests. */ + { 0, 0, 0, 0 }, /* 0 denom terminates the list */ + }, *ddp; #if 0 - for ( ddp = div_data; ddp->denom != 0; ++ddp ) - if ( (result = imaxdiv(ddp->numer, ddp->denom)).quot - != ddp->exp_quot || result.rem != ddp->exp_rem - ) { -// printf("*** imaxdiv(%"PRIdMAX",%"PRIdMAX -// ") failed; should be: (%"PRIdMAX",%"PRIdMAX -// "), was: (%"PRIdMAX",%"PRIdMAX") ***\n", -// ddp->numer, ddp->denom, ddp->exp_quot, -// ddp->exp_rem, result.quot, result.rem -// ); - printf("err:imaxdiv(%"PRIdMAX",%"PRIdMAX - ") = (%"PRIdMAX",%"PRIdMAX - "), is: (%"PRIdMAX",%"PRIdMAX")\n", - ddp->numer, ddp->denom, ddp->exp_quot, - ddp->exp_rem, result.quot, result.rem - ); - status = EXIT_FAILURE; - } + for ( ddp = div_data; ddp->denom != 0; ++ddp ) + if ( (result = imaxdiv(ddp->numer, ddp->denom)).quot + != ddp->exp_quot || result.rem != ddp->exp_rem + ) { +// printf("*** imaxdiv(%"PRIdMAX",%"PRIdMAX +// ") failed; should be: (%"PRIdMAX",%"PRIdMAX +// "), was: (%"PRIdMAX",%"PRIdMAX") ***\n", +// ddp->numer, ddp->denom, ddp->exp_quot, +// ddp->exp_rem, result.quot, result.rem +// ); + printf("err:imaxdiv(%"PRIdMAX",%"PRIdMAX + ") = (%"PRIdMAX",%"PRIdMAX + "), is: (%"PRIdMAX",%"PRIdMAX")\n", + ddp->numer, ddp->denom, ddp->exp_quot, + ddp->exp_rem, result.quot, result.rem + ); + status = EXIT_FAILURE; + } #endif - } - - { - char *endptr; - wchar_t *wendptr; - static char saved[64]; /* holds copy of input string */ - static wchar_t wnptr[64]; /* holds wide copy of test string */ - static int warned; /* "warned for null endptr" flag */ - register int i; - static struct - { - char * nptr; - int base; - intmax_t exp_val; - int exp_len; - } str_data[] = - { - { "", 0, 0, 0, }, - { "", 2, 0, 0, }, - { "", 8, 0, 0, }, - { "", 9, 0, 0, }, - { "", 10, 0, 0, }, - { "", 16, 0, 0, }, - { "", 36, 0, 0, }, - { "0", 0, 0, 1, }, - { "0", 2, 0, 1, }, - { "0", 8, 0, 1, }, - { "0", 9, 0, 1, }, - { "0", 10, 0, 1, }, - { "0", 16, 0, 1, }, - { "0", 36, 0, 1, }, - { "+0", 0, 0, 2, }, - { "+0", 2, 0, 2, }, - { "+0", 8, 0, 2, }, - { "+0", 9, 0, 2, }, - { "+0", 10, 0, 2, }, - { "+0", 16, 0, 2, }, - { "+0", 36, 0, 2, }, - { "-0", 0, 0, 2, }, - { "-0", 2, 0, 2, }, - { "-0", 8, 0, 2, }, - { "-0", 9, 0, 2, }, - { "-0", 10, 0, 2, }, - { "-0", 16, 0, 2, }, - { "-0", 36, 0, 2, }, - { "Inf", 0, 0, 0, }, - { "Inf", 2, 0, 0, }, - { "Inf", 8, 0, 0, }, - { "Inf", 9, 0, 0, }, - { "Inf", 10, 0, 0, }, - { "Inf", 16, 0, 0, }, - { "Inf", 36, 24171, 3, }, - { "+Inf", 0, 0, 0, }, - { "+Inf", 2, 0, 0, }, - { "+Inf", 8, 0, 0, }, - { "+Inf", 9, 0, 0, }, - { "+Inf", 10, 0, 0, }, - { "+Inf", 16, 0, 0, }, - { "+Inf", 36, 24171, 4, }, - { "-Inf", 0, 0, 0, }, - { "-Inf", 2, 0, 0, }, - { "-Inf", 8, 0, 0, }, - { "-Inf", 9, 0, 0, }, - { "-Inf", 10, 0, 0, }, - { "-Inf", 16, 0, 0, }, - { "-Inf", 36, -24171, 4, }, - { "inf", 0, 0, 0, }, - { "inf", 2, 0, 0, }, - { "inf", 8, 0, 0, }, - { "inf", 9, 0, 0, }, - { "inf", 10, 0, 0, }, - { "inf", 16, 0, 0, }, - { "inf", 36, 24171, 3, }, - { "+inf", 0, 0, 0, }, - { "+inf", 2, 0, 0, }, - { "+inf", 8, 0, 0, }, - { "+inf", 9, 0, 0, }, - { "+inf", 10, 0, 0, }, - { "+inf", 16, 0, 0, }, - { "+inf", 36, 24171, 4, }, - { "-inf", 0, 0, 0, }, - { "-inf", 2, 0, 0, }, - { "-inf", 8, 0, 0, }, - { "-inf", 9, 0, 0, }, - { "-inf", 10, 0, 0, }, - { "-inf", 16, 0, 0, }, - { "-inf", 36, -24171, 4, }, - { "119b8Z", 0, 119, 3, }, - { "119bZ", 0, 119, 3, }, - { "-0119bZ", 0, -9, 4, }, - { " \t\n 0X119bZ", 0, 4507, 10, }, - { " \t\n +0X119bZ", 0, 4507, 11, }, - { " \t\n -0x119bZ", 0, -4507, 11, }, - { " \t\n 119bZ", 0, 119, 7, }, - { "+119bZ", 0, 119, 4, }, - { "+0X119bz", 0, 4507, 7, }, - { "119b8Z", 2, 3, 2, }, - { "119bZ", 2, 3, 2, }, - { "-0119bZ", 2, -3, 4, }, - { " \t\n 0X119bZ", 2, 0, 5, }, - { " \t\n +0X119bZ", 2, 0, 6, }, - { " \t\n -0x119bZ", 2, 0, 6, }, - { " \t\n 119bZ", 2, 3, 6, }, - { "+119bZ", 2, 3, 3, }, - { "+0X119bz", 2, 0, 2, }, - { "119b8Z", 8, 9, 2, }, - { "119bZ", 8, 9, 2, }, - { "-0119bZ", 8, -9, 4, }, - { " \t\n 0X119bZ", 8, 0, 5, }, - { " \t\n +0X119bZ", 8, 0, 6, }, - { " \t\n -0x119bZ", 8, 0, 6, }, - { " \t\n 119bZ", 8, 9, 6, }, - { "+119bZ", 8, 9, 3, }, - { "+0X119bz", 8, 0, 2, }, - { "119b8Z", 9, 10, 2, }, - { "119bZ", 9, 10, 2, }, - { "-0119bZ", 9, -10, 4, }, - { " \t\n 0X119bZ", 9, 0, 5, }, - { " \t\n +0X119bZ", 9, 0, 6, }, - { " \t\n -0x119bZ", 9, 0, 6, }, - { " \t\n 119bZ", 9, 10, 6, }, - { "+119bZ", 9, 10, 3, }, - { "+0X119bz", 9, 0, 2, }, - { "119b8Z", 10, 119, 3, }, - { "119bZ", 10, 119, 3, }, - { "-0119bZ", 10, -119, 5, }, - { " \t\n 0X119bZ", 10, 0, 5, }, - { " \t\n +0X119bZ", 10, 0, 6, }, - { " \t\n -0x119bZ", 10, 0, 6, }, - { " \t\n 119bZ", 10, 119, 7, }, - { "+119bZ", 10, 119, 4, }, - { "+0X119bz", 10, 0, 2, }, - { "119b8Z", 16, 72120, 5, }, - { "119bZ", 16, 4507, 4, }, - { "-0119bZ", 16, -4507, 6, }, - { " \t\n 0X119bZ", 16, 4507, 10, }, - { " \t\n +0X119bZ", 16, 4507, 11, }, - { " \t\n -0x119bZ", 16, -4507, 11, }, - { " \t\n 119bZ", 16, 4507,8, }, - { "+119bZ", 16, 4507, 5, }, - { "+0X119bz", 16, 4507, 7, }, - { "119b8Z", 36, 62580275, 6, }, - { "119bZ", 36, 1738367, 5, }, - { "-0119bZ", 36, -1738367, 7, }, - { " \t\n 0X119bZ", 36, 1997122175, 11, }, - { " \t\n +0X119bZ", 36, 1997122175, 12, }, - { " \t\n -0x119bZ", 36, -1997122175, 12, }, - { " \t\n 119bZ", 36, 1738367, 9, }, - { "+119bZ", 36, 1738367, 6, }, - { "+0X119bz", 36, 1997122175, 8, }, - /* There should be a much larger battery of such tests. */ - { "127", 0, 127, 3, }, - { "-127", 0, -127, 4, }, - { "128", 0, 128, 3, }, - { "-128", 0, -127-1, 4, }, - { "255", 0, 255, 3, }, - { "-255", 0, -255, 4, }, - { "256", 0, 256, 3, }, - { "-256", 0, -255-1, 4, }, - { "32767", 0, 32767, 5, }, - { "-32767", 0, -32767, 6, }, - { "32768", 0, 32768, 5, }, - { "-32768", 0, -32767-1, 6, }, - { "65535", 0, 65535, 5, }, - { "-65535", 0, -65536+1, 6, }, - { "65536", 0, 65536, 5, }, - { "-65536", 0, -65536, 6, }, - { "2147483647", 0, 2147483647, 10, }, - { "-2147483647", 0, -2147483647, 11, }, - { "2147483648", 0, 2147483648, 10, }, - { "-2147483648", 0, -2147483647-1, 11, }, - { "4294967295", 0, 4294967295, 10, }, - { "-4294967295", 0, -4294967296+1, 11, }, - { "4294967296", 0, 4294967296, 10, }, - { "-4294967296", 0, -4294967296, 11, }, - { "9223372036854775807", 0, 9223372036854775807, 19, }, - { "-9223372036854775807", 0, -9223372036854775807, 20, }, - { "1234567890123456789", 0, 1234567890123456789, 19, }, - { "-1234567890123456789", 0, -1234567890123456789, 20, }, - { "1", 0, 1, 1, }, - { "-1", 0, -1, 2, }, - { "2", 0, 2, 1, }, - { "-2", 0, -2, 2, }, - { "10", 0, 10, 2, }, - { "-10", 0, -10, 3, }, - { "16", 0, 16, 2, }, - { "-16", 0, -16, 3, }, - /* Other test cases can be added here. */ - { NULL, 0, 0, 0 }, /* terminates the list */ - }, *sdp; - - for ( sdp = str_data; sdp->nptr != NULL ; ++sdp ) - { - /* - 7.8.2.3 The strtoimax and strtoumax functions - */ - - strcpy(saved, sdp->nptr); - - errno = 0; /* shouldn't be changed */ - - if ( (intmax = strtoimax(sdp->nptr, &endptr, sdp->base)) - != sdp->exp_val - ) { - int save = errno; - - printf("*** strtoimax(%s,,%d) failed; should be: %" - PRIdMAX", was: %"PRIdMAX" ***\n", sdp->nptr, - sdp->base, sdp->exp_val, intmax - ); - status = EXIT_FAILURE; - errno = save; - } - else if ( endptr != sdp->nptr + sdp->exp_len ) - { - int save = errno; - - printf("*** strtoimax(%s,,%d) returned wrong endptr" - " ***\n", sdp->nptr, sdp->base - ); - status = EXIT_FAILURE; - errno = save; - } - - if ( errno != 0 ) - { - printf("*** strtoimax modified errno ***\n"); - status = EXIT_FAILURE; - } - - if ( strcmp(sdp->nptr, saved) != 0 ) - { - printf("*** strtoimax modified its input ***\n"); - status = EXIT_FAILURE; - strcpy(saved, sdp->nptr); - } - - if ( sdp->exp_val >= 0 ) /* else some sign extension */ - { - errno = 0; /* shouldn't be changed */ - - if ( (uintmax = strtoumax(sdp->nptr, &endptr, sdp->base - ) - ) != sdp->exp_val - ) { - int save = errno; - - printf("*** strtoumax(%s,,%d) failed; " - "should be: %"PRIuMAX", was: %"PRIuMAX - " ***\n", sdp->nptr, sdp->base, - sdp->exp_val, uintmax - ); - status = EXIT_FAILURE; - errno = save; - } - else if ( endptr != sdp->nptr + sdp->exp_len ) - { - int save = errno; - - printf("*** strtoumax(%s,,%d) returned wrong " - "endptr ***\n", sdp->nptr, sdp->base - ); - status = EXIT_FAILURE; - errno = save; - } - - if ( errno != 0 ) - { - printf("*** strtoumax modified errno ***\n"); - status = EXIT_FAILURE; - } - - if ( strcmp(sdp->nptr, saved) != 0 ) - { - printf("*** strtoumax" - " modified its input ***\n" - ); - status = EXIT_FAILURE; - strcpy(saved, sdp->nptr); - } - } - - /* tests for null endptr */ - -#define WARN() if (!warned) warned = 1, printf("*** Using null endptr: ***\n") - - warned = 0; - errno = 0; /* shouldn't be changed */ - - if ( (intmax = strtoimax(sdp->nptr, (char **)NULL, sdp->base)) - != sdp->exp_val - ) { - int save = errno; - - WARN(); - printf("*** strtoimax(%s,NULL,%d) failed; " - "should be: %"PRIdMAX", was: %"PRIdMAX" ***\n", - sdp->nptr, sdp->base, sdp->exp_val, intmax - ); - status = EXIT_FAILURE; - errno = save; - } - - if ( errno != 0 ) - { - WARN(); - printf("*** strtoimax modified errno ***\n"); - status = EXIT_FAILURE; - } - - if ( strcmp(sdp->nptr, saved) != 0 ) - { - WARN(); - printf("*** strtoimax modified its input ***\n"); - status = EXIT_FAILURE; - strcpy(saved, sdp->nptr); - } - - if ( sdp->exp_val >= 0 ) /* else some sign extension */ - { - errno = 0; /* shouldn't be changed */ - - if ( (uintmax = strtoumax(sdp->nptr, (char **)NULL, - sdp->base - ) - ) != sdp->exp_val - ) { - int save = errno; - - WARN(); - printf("*** strtoumax(%s,NULL,%d) failed; " - "should be: %"PRIuMAX", was: %"PRIuMAX - " ***\n", sdp->nptr, sdp->base, - sdp->exp_val, uintmax - ); - status = EXIT_FAILURE; - errno = save; - } - - if ( errno != 0 ) - { - WARN(); - printf("*** strtoumax modified errno ***\n"); - status = EXIT_FAILURE; - } - - if ( strcmp(sdp->nptr, saved) != 0 ) - { - WARN(); - printf("*** strtoumax" - " modified its input ***\n" - ); - status = EXIT_FAILURE; - strcpy(saved, sdp->nptr); - } - } - - /* - 7.8.2.4 The wcstoimax and wcstoumax functions - */ - - for ( i = 0; i < 64; ++i ) - if ( (wnptr[i] = sdp->nptr[i]) == '\0' ) - break; - - errno = 0; /* shouldn't be changed */ - - if ( (intmax = wcstoimax(wnptr, &wendptr, sdp->base)) - != sdp->exp_val - ) { - int save = errno; - - printf("*** wcstoimax(%s,,%d) failed; should be: %" - PRIdMAX", was: %"PRIdMAX" ***\n", sdp->nptr, - sdp->base, sdp->exp_val, intmax - ); - status = EXIT_FAILURE; - errno = save; - } - else if ( wendptr != wnptr + sdp->exp_len ) - { - int save = errno; - - printf("*** wcstoimax(%s,,%d) returned wrong endptr" - " ***\n", sdp->nptr, sdp->base - ); - status = EXIT_FAILURE; - errno = save; - } - - if ( errno != 0 ) - { - printf("*** wcstoimax modified errno ***\n"); - status = EXIT_FAILURE; - } - - for ( i = 0; i < 64; ++i ) - if ( wnptr[i] != sdp->nptr[i] ) - { - printf("*** wcstoimax modified its input ***\n" - ); - status = EXIT_FAILURE; - - for ( ; i < 64; ++i ) - if ( (wnptr[i] = sdp->nptr[i]) == '\0' ) - break; - - break; - } - else if ( wnptr[i] == '\0' ) - break; - - if ( sdp->exp_val >= 0 ) /* else some sign extension */ - { - errno = 0; /* shouldn't be changed */ - - if ( (uintmax = wcstoumax(wnptr, &wendptr, sdp->base) - ) != sdp->exp_val - ) { - int save = errno; - - printf("*** wcstoumax(%s,,%d) failed; " - "should be: %"PRIuMAX", was: %"PRIuMAX - " ***\n", sdp->nptr, sdp->base, - sdp->exp_val, uintmax - ); - status = EXIT_FAILURE; - errno = save; - } - else if ( wendptr != wnptr + sdp->exp_len ) - { - int save = errno; - - printf("*** wcstoumax(%s,,%d) returned wrong " - "endptr ***\n", sdp->nptr, sdp->base - ); - status = EXIT_FAILURE; - errno = save; - } - - if ( errno != 0 ) - { - printf("*** wcstoumax modified errno ***\n"); - status = EXIT_FAILURE; - } - - for ( i = 0; i < 64; ++i ) - if ( wnptr[i] != sdp->nptr[i] ) - { - printf("*** wcstoumax" - " modified its input ***\n" - ); - status = EXIT_FAILURE; - - for ( ; i < 64; ++i ) - if ( (wnptr[i] = sdp->nptr[i]) - == '\0' - ) - break; - - break; - } - else if ( wnptr[i] == '\0' ) - break; - } - - /* tests for null endptr */ - - warned = 0; - errno = 0; /* shouldn't be changed */ - - if ( (intmax = wcstoimax(wnptr, (wchar_t **)NULL, sdp->base)) - != sdp->exp_val - ) { - int save = errno; - - WARN(); - printf("*** wcstoimax(%s,NULL,%d) failed; should be: %" - PRIdMAX", was: %"PRIdMAX" ***\n", sdp->nptr, - sdp->base, sdp->exp_val, intmax - ); - status = EXIT_FAILURE; - errno = save; - } - - if ( errno != 0 ) - { - WARN(); - printf("*** wcstoimax modified errno ***\n"); - status = EXIT_FAILURE; - } - - for ( i = 0; i < 64; ++i ) - if ( wnptr[i] != sdp->nptr[i] ) - { - WARN(); - printf("*** wcstoimax modified its input ***\n" - ); - status = EXIT_FAILURE; - - for ( ; i < 64; ++i ) - if ( (wnptr[i] = sdp->nptr[i]) - == '\0' - ) - break; - - break; - } - else if ( wnptr[i] == '\0' ) - break; - - if ( sdp->exp_val >= 0 ) /* else some sign extension */ - { - errno = 0; /* shouldn't be changed */ - - if ( (uintmax = wcstoumax(wnptr, (wchar_t **)NULL, - sdp->base - ) - ) != sdp->exp_val - ) { - int save = errno; - - WARN(); - printf("*** wcstoumax(%s,NULL,%d) failed; " - "should be: %"PRIuMAX", was: %"PRIuMAX - " ***\n", sdp->nptr, sdp->base, - sdp->exp_val, uintmax - ); - status = EXIT_FAILURE; - errno = save; - } - - if ( errno != 0 ) - { - WARN(); - printf("*** wcstoumax modified errno ***\n"); - status = EXIT_FAILURE; - } - - for ( i = 0; i < 64; ++i ) - if ( wnptr[i] != sdp->nptr[i] ) - { - WARN(); - printf("*** wcstoumax" - " modified its input ***\n" - ); - status = EXIT_FAILURE; - - for ( ; i < 64; ++i ) - if ( (wnptr[i] = sdp->nptr[i]) - == '\0' - ) - break; - - break; - } - else if ( wnptr[i] == '\0' ) - break; - } - } - - /* - 7.8.2.3 The strtoimax and strtoumax functions (continued) - */ - - if ( (intmax = strtoimax("1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890", - &endptr, 0 - ) - ) != INTMAX_MAX || errno != ERANGE - ) { - printf("*** strtoimax failed overflow test ***\n"); - status = EXIT_FAILURE; - } - - if ( (intmax = strtoimax("+1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890", - &endptr, 0 - ) - ) != INTMAX_MAX || errno != ERANGE - ) { - printf("*** strtoimax failed +overflow test ***\n"); - status = EXIT_FAILURE; - } - - if ( (intmax = strtoimax("-1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890", - &endptr, 0 - ) - ) != INTMAX_MIN || errno != ERANGE - ) { - printf("*** strtoimax failed -overflow test ***\n"); - status = EXIT_FAILURE; - } - - if ( (uintmax = strtoumax("1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890", - &endptr, 0 - ) - ) != UINTMAX_MAX || errno != ERANGE - ) { - printf("*** strtoumax failed overflow test ***\n"); - status = EXIT_FAILURE; - } - - if ( (uintmax = strtoumax("+1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890", - &endptr, 0 - ) - ) != UINTMAX_MAX || errno != ERANGE - ) { - printf("*** strtoumax failed +overflow test ***\n"); - status = EXIT_FAILURE; - } - - if ( (uintmax = strtoumax("-1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890" - "1234567890123456789012345678901234567890", - &endptr, 0 - ) - ) != UINTMAX_MAX || errno != ERANGE - ) { - printf("*** strtoumax failed -overflow test ***\n"); - status = EXIT_FAILURE; - } - - /* - 7.8.2.4 The wcstoimax and wcstoumax functions (continued) - */ + } + + { + char *endptr; + wchar_t *wendptr; + static char saved[64]; /* holds copy of input string */ + static wchar_t wnptr[64]; /* holds wide copy of test string */ + static int warned; /* "warned for null endptr" flag */ + register int i; + static struct + { + char * nptr; + int base; + intmax_t exp_val; + int exp_len; + } str_data[] = + { + { "", 0, 0, 0, }, + { "", 2, 0, 0, }, + { "", 8, 0, 0, }, + { "", 9, 0, 0, }, + { "", 10, 0, 0, }, + { "", 16, 0, 0, }, + { "", 36, 0, 0, }, + { "0", 0, 0, 1, }, + { "0", 2, 0, 1, }, + { "0", 8, 0, 1, }, + { "0", 9, 0, 1, }, + { "0", 10, 0, 1, }, + { "0", 16, 0, 1, }, + { "0", 36, 0, 1, }, + { "+0", 0, 0, 2, }, + { "+0", 2, 0, 2, }, + { "+0", 8, 0, 2, }, + { "+0", 9, 0, 2, }, + { "+0", 10, 0, 2, }, + { "+0", 16, 0, 2, }, + { "+0", 36, 0, 2, }, + { "-0", 0, 0, 2, }, + { "-0", 2, 0, 2, }, + { "-0", 8, 0, 2, }, + { "-0", 9, 0, 2, }, + { "-0", 10, 0, 2, }, + { "-0", 16, 0, 2, }, + { "-0", 36, 0, 2, }, + { "Inf", 0, 0, 0, }, + { "Inf", 2, 0, 0, }, + { "Inf", 8, 0, 0, }, + { "Inf", 9, 0, 0, }, + { "Inf", 10, 0, 0, }, + { "Inf", 16, 0, 0, }, + { "Inf", 36, 24171, 3, }, + { "+Inf", 0, 0, 0, }, + { "+Inf", 2, 0, 0, }, + { "+Inf", 8, 0, 0, }, + { "+Inf", 9, 0, 0, }, + { "+Inf", 10, 0, 0, }, + { "+Inf", 16, 0, 0, }, + { "+Inf", 36, 24171, 4, }, + { "-Inf", 0, 0, 0, }, + { "-Inf", 2, 0, 0, }, + { "-Inf", 8, 0, 0, }, + { "-Inf", 9, 0, 0, }, + { "-Inf", 10, 0, 0, }, + { "-Inf", 16, 0, 0, }, + { "-Inf", 36, -24171, 4, }, + { "inf", 0, 0, 0, }, + { "inf", 2, 0, 0, }, + { "inf", 8, 0, 0, }, + { "inf", 9, 0, 0, }, + { "inf", 10, 0, 0, }, + { "inf", 16, 0, 0, }, + { "inf", 36, 24171, 3, }, + { "+inf", 0, 0, 0, }, + { "+inf", 2, 0, 0, }, + { "+inf", 8, 0, 0, }, + { "+inf", 9, 0, 0, }, + { "+inf", 10, 0, 0, }, + { "+inf", 16, 0, 0, }, + { "+inf", 36, 24171, 4, }, + { "-inf", 0, 0, 0, }, + { "-inf", 2, 0, 0, }, + { "-inf", 8, 0, 0, }, + { "-inf", 9, 0, 0, }, + { "-inf", 10, 0, 0, }, + { "-inf", 16, 0, 0, }, + { "-inf", 36, -24171, 4, }, + { "119b8Z", 0, 119, 3, }, + { "119bZ", 0, 119, 3, }, + { "-0119bZ", 0, -9, 4, }, + { " \t\n 0X119bZ", 0, 4507, 10, }, + { " \t\n +0X119bZ", 0, 4507, 11, }, + { " \t\n -0x119bZ", 0, -4507, 11, }, + { " \t\n 119bZ", 0, 119, 7, }, + { "+119bZ", 0, 119, 4, }, + { "+0X119bz", 0, 4507, 7, }, + { "119b8Z", 2, 3, 2, }, + { "119bZ", 2, 3, 2, }, + { "-0119bZ", 2, -3, 4, }, + { " \t\n 0X119bZ", 2, 0, 5, }, + { " \t\n +0X119bZ", 2, 0, 6, }, + { " \t\n -0x119bZ", 2, 0, 6, }, + { " \t\n 119bZ", 2, 3, 6, }, + { "+119bZ", 2, 3, 3, }, + { "+0X119bz", 2, 0, 2, }, + { "119b8Z", 8, 9, 2, }, + { "119bZ", 8, 9, 2, }, + { "-0119bZ", 8, -9, 4, }, + { " \t\n 0X119bZ", 8, 0, 5, }, + { " \t\n +0X119bZ", 8, 0, 6, }, + { " \t\n -0x119bZ", 8, 0, 6, }, + { " \t\n 119bZ", 8, 9, 6, }, + { "+119bZ", 8, 9, 3, }, + { "+0X119bz", 8, 0, 2, }, + { "119b8Z", 9, 10, 2, }, + { "119bZ", 9, 10, 2, }, + { "-0119bZ", 9, -10, 4, }, + { " \t\n 0X119bZ", 9, 0, 5, }, + { " \t\n +0X119bZ", 9, 0, 6, }, + { " \t\n -0x119bZ", 9, 0, 6, }, + { " \t\n 119bZ", 9, 10, 6, }, + { "+119bZ", 9, 10, 3, }, + { "+0X119bz", 9, 0, 2, }, + { "119b8Z", 10, 119, 3, }, + { "119bZ", 10, 119, 3, }, + { "-0119bZ", 10, -119, 5, }, + { " \t\n 0X119bZ", 10, 0, 5, }, + { " \t\n +0X119bZ", 10, 0, 6, }, + { " \t\n -0x119bZ", 10, 0, 6, }, + { " \t\n 119bZ", 10, 119, 7, }, + { "+119bZ", 10, 119, 4, }, + { "+0X119bz", 10, 0, 2, }, + { "119b8Z", 16, 72120, 5, }, + { "119bZ", 16, 4507, 4, }, + { "-0119bZ", 16, -4507, 6, }, + { " \t\n 0X119bZ", 16, 4507, 10, }, + { " \t\n +0X119bZ", 16, 4507, 11, }, + { " \t\n -0x119bZ", 16, -4507, 11, }, + { " \t\n 119bZ", 16, 4507,8, }, + { "+119bZ", 16, 4507, 5, }, + { "+0X119bz", 16, 4507, 7, }, + { "119b8Z", 36, 62580275, 6, }, + { "119bZ", 36, 1738367, 5, }, + { "-0119bZ", 36, -1738367, 7, }, + { " \t\n 0X119bZ", 36, 1997122175, 11, }, + { " \t\n +0X119bZ", 36, 1997122175, 12, }, + { " \t\n -0x119bZ", 36, -1997122175, 12, }, + { " \t\n 119bZ", 36, 1738367, 9, }, + { "+119bZ", 36, 1738367, 6, }, + { "+0X119bz", 36, 1997122175, 8, }, + /* There should be a much larger battery of such tests. */ + { "127", 0, 127, 3, }, + { "-127", 0, -127, 4, }, + { "128", 0, 128, 3, }, + { "-128", 0, -127-1, 4, }, + { "255", 0, 255, 3, }, + { "-255", 0, -255, 4, }, + { "256", 0, 256, 3, }, + { "-256", 0, -255-1, 4, }, + { "32767", 0, 32767, 5, }, + { "-32767", 0, -32767, 6, }, + { "32768", 0, 32768, 5, }, + { "-32768", 0, -32767-1, 6, }, + { "65535", 0, 65535, 5, }, + { "-65535", 0, -65536+1, 6, }, + { "65536", 0, 65536, 5, }, + { "-65536", 0, -65536, 6, }, + { "2147483647", 0, 2147483647, 10, }, + { "-2147483647", 0, -2147483647, 11, }, + { "2147483648", 0, 2147483648, 10, }, + { "-2147483648", 0, -2147483647-1, 11, }, + { "4294967295", 0, 4294967295, 10, }, + { "-4294967295", 0, -4294967296+1, 11, }, + { "4294967296", 0, 4294967296, 10, }, + { "-4294967296", 0, -4294967296, 11, }, + { "9223372036854775807", 0, 9223372036854775807, 19, }, + { "-9223372036854775807", 0, -9223372036854775807, 20, }, + { "1234567890123456789", 0, 1234567890123456789, 19, }, + { "-1234567890123456789", 0, -1234567890123456789, 20, }, + { "1", 0, 1, 1, }, + { "-1", 0, -1, 2, }, + { "2", 0, 2, 1, }, + { "-2", 0, -2, 2, }, + { "10", 0, 10, 2, }, + { "-10", 0, -10, 3, }, + { "16", 0, 16, 2, }, + { "-16", 0, -16, 3, }, + /* Other test cases can be added here. */ + { NULL, 0, 0, 0 }, /* terminates the list */ + }, *sdp; + + for ( sdp = str_data; sdp->nptr != NULL ; ++sdp ) + { + /* + 7.8.2.3 The strtoimax and strtoumax functions + */ + + strcpy(saved, sdp->nptr); + + errno = 0; /* shouldn't be changed */ + + if ( (intmax = strtoimax(sdp->nptr, &endptr, sdp->base)) + != sdp->exp_val + ) { + int save = errno; + + printf("*** strtoimax(%s,,%d) failed; should be: %" + PRIdMAX", was: %"PRIdMAX" ***\n", sdp->nptr, + sdp->base, sdp->exp_val, intmax + ); + status = EXIT_FAILURE; + errno = save; + } + else if ( endptr != sdp->nptr + sdp->exp_len ) + { + int save = errno; + + printf("*** strtoimax(%s,,%d) returned wrong endptr" + " ***\n", sdp->nptr, sdp->base + ); + status = EXIT_FAILURE; + errno = save; + } + + if ( errno != 0 ) + { + printf("*** strtoimax modified errno ***\n"); + status = EXIT_FAILURE; + } + + if ( strcmp(sdp->nptr, saved) != 0 ) + { + printf("*** strtoimax modified its input ***\n"); + status = EXIT_FAILURE; + strcpy(saved, sdp->nptr); + } + + if ( sdp->exp_val >= 0 ) /* else some sign extension */ + { + errno = 0; /* shouldn't be changed */ + + if ( (uintmax = strtoumax(sdp->nptr, &endptr, sdp->base + ) + ) != sdp->exp_val + ) { + int save = errno; + + printf("*** strtoumax(%s,,%d) failed; " + "should be: %"PRIuMAX", was: %"PRIuMAX + " ***\n", sdp->nptr, sdp->base, + sdp->exp_val, uintmax + ); + status = EXIT_FAILURE; + errno = save; + } + else if ( endptr != sdp->nptr + sdp->exp_len ) + { + int save = errno; + + printf("*** strtoumax(%s,,%d) returned wrong " + "endptr ***\n", sdp->nptr, sdp->base + ); + status = EXIT_FAILURE; + errno = save; + } + + if ( errno != 0 ) + { + printf("*** strtoumax modified errno ***\n"); + status = EXIT_FAILURE; + } + + if ( strcmp(sdp->nptr, saved) != 0 ) + { + printf("*** strtoumax" + " modified its input ***\n" + ); + status = EXIT_FAILURE; + strcpy(saved, sdp->nptr); + } + } + + /* tests for null endptr */ + +#define WARN() if (!warned) warned = 1, printf("*** Using null endptr: ***\n") + + warned = 0; + errno = 0; /* shouldn't be changed */ + + if ( (intmax = strtoimax(sdp->nptr, (char **)NULL, sdp->base)) + != sdp->exp_val + ) { + int save = errno; + + WARN(); + printf("*** strtoimax(%s,NULL,%d) failed; " + "should be: %"PRIdMAX", was: %"PRIdMAX" ***\n", + sdp->nptr, sdp->base, sdp->exp_val, intmax + ); + status = EXIT_FAILURE; + errno = save; + } + + if ( errno != 0 ) + { + WARN(); + printf("*** strtoimax modified errno ***\n"); + status = EXIT_FAILURE; + } + + if ( strcmp(sdp->nptr, saved) != 0 ) + { + WARN(); + printf("*** strtoimax modified its input ***\n"); + status = EXIT_FAILURE; + strcpy(saved, sdp->nptr); + } + + if ( sdp->exp_val >= 0 ) /* else some sign extension */ + { + errno = 0; /* shouldn't be changed */ + + if ( (uintmax = strtoumax(sdp->nptr, (char **)NULL, + sdp->base + ) + ) != sdp->exp_val + ) { + int save = errno; + + WARN(); + printf("*** strtoumax(%s,NULL,%d) failed; " + "should be: %"PRIuMAX", was: %"PRIuMAX + " ***\n", sdp->nptr, sdp->base, + sdp->exp_val, uintmax + ); + status = EXIT_FAILURE; + errno = save; + } + + if ( errno != 0 ) + { + WARN(); + printf("*** strtoumax modified errno ***\n"); + status = EXIT_FAILURE; + } + + if ( strcmp(sdp->nptr, saved) != 0 ) + { + WARN(); + printf("*** strtoumax" + " modified its input ***\n" + ); + status = EXIT_FAILURE; + strcpy(saved, sdp->nptr); + } + } + + /* + 7.8.2.4 The wcstoimax and wcstoumax functions + */ + + for ( i = 0; i < 64; ++i ) + if ( (wnptr[i] = sdp->nptr[i]) == '\0' ) + break; + + errno = 0; /* shouldn't be changed */ + + if ( (intmax = wcstoimax(wnptr, &wendptr, sdp->base)) + != sdp->exp_val + ) { + int save = errno; + + printf("*** wcstoimax(%s,,%d) failed; should be: %" + PRIdMAX", was: %"PRIdMAX" ***\n", sdp->nptr, + sdp->base, sdp->exp_val, intmax + ); + status = EXIT_FAILURE; + errno = save; + } + else if ( wendptr != wnptr + sdp->exp_len ) + { + int save = errno; + + printf("*** wcstoimax(%s,,%d) returned wrong endptr" + " ***\n", sdp->nptr, sdp->base + ); + status = EXIT_FAILURE; + errno = save; + } + + if ( errno != 0 ) + { + printf("*** wcstoimax modified errno ***\n"); + status = EXIT_FAILURE; + } + + for ( i = 0; i < 64; ++i ) + if ( wnptr[i] != sdp->nptr[i] ) + { + printf("*** wcstoimax modified its input ***\n" + ); + status = EXIT_FAILURE; + + for ( ; i < 64; ++i ) + if ( (wnptr[i] = sdp->nptr[i]) == '\0' ) + break; + + break; + } + else if ( wnptr[i] == '\0' ) + break; + + if ( sdp->exp_val >= 0 ) /* else some sign extension */ + { + errno = 0; /* shouldn't be changed */ + + if ( (uintmax = wcstoumax(wnptr, &wendptr, sdp->base) + ) != sdp->exp_val + ) { + int save = errno; + + printf("*** wcstoumax(%s,,%d) failed; " + "should be: %"PRIuMAX", was: %"PRIuMAX + " ***\n", sdp->nptr, sdp->base, + sdp->exp_val, uintmax + ); + status = EXIT_FAILURE; + errno = save; + } + else if ( wendptr != wnptr + sdp->exp_len ) + { + int save = errno; + + printf("*** wcstoumax(%s,,%d) returned wrong " + "endptr ***\n", sdp->nptr, sdp->base + ); + status = EXIT_FAILURE; + errno = save; + } + + if ( errno != 0 ) + { + printf("*** wcstoumax modified errno ***\n"); + status = EXIT_FAILURE; + } + + for ( i = 0; i < 64; ++i ) + if ( wnptr[i] != sdp->nptr[i] ) + { + printf("*** wcstoumax" + " modified its input ***\n" + ); + status = EXIT_FAILURE; + + for ( ; i < 64; ++i ) + if ( (wnptr[i] = sdp->nptr[i]) + == '\0' + ) + break; + + break; + } + else if ( wnptr[i] == '\0' ) + break; + } + + /* tests for null endptr */ + + warned = 0; + errno = 0; /* shouldn't be changed */ + + if ( (intmax = wcstoimax(wnptr, (wchar_t **)NULL, sdp->base)) + != sdp->exp_val + ) { + int save = errno; + + WARN(); + printf("*** wcstoimax(%s,NULL,%d) failed; should be: %" + PRIdMAX", was: %"PRIdMAX" ***\n", sdp->nptr, + sdp->base, sdp->exp_val, intmax + ); + status = EXIT_FAILURE; + errno = save; + } + + if ( errno != 0 ) + { + WARN(); + printf("*** wcstoimax modified errno ***\n"); + status = EXIT_FAILURE; + } + + for ( i = 0; i < 64; ++i ) + if ( wnptr[i] != sdp->nptr[i] ) + { + WARN(); + printf("*** wcstoimax modified its input ***\n" + ); + status = EXIT_FAILURE; + + for ( ; i < 64; ++i ) + if ( (wnptr[i] = sdp->nptr[i]) + == '\0' + ) + break; + + break; + } + else if ( wnptr[i] == '\0' ) + break; + + if ( sdp->exp_val >= 0 ) /* else some sign extension */ + { + errno = 0; /* shouldn't be changed */ + + if ( (uintmax = wcstoumax(wnptr, (wchar_t **)NULL, + sdp->base + ) + ) != sdp->exp_val + ) { + int save = errno; + + WARN(); + printf("*** wcstoumax(%s,NULL,%d) failed; " + "should be: %"PRIuMAX", was: %"PRIuMAX + " ***\n", sdp->nptr, sdp->base, + sdp->exp_val, uintmax + ); + status = EXIT_FAILURE; + errno = save; + } + + if ( errno != 0 ) + { + WARN(); + printf("*** wcstoumax modified errno ***\n"); + status = EXIT_FAILURE; + } + + for ( i = 0; i < 64; ++i ) + if ( wnptr[i] != sdp->nptr[i] ) + { + WARN(); + printf("*** wcstoumax" + " modified its input ***\n" + ); + status = EXIT_FAILURE; + + for ( ; i < 64; ++i ) + if ( (wnptr[i] = sdp->nptr[i]) + == '\0' + ) + break; + + break; + } + else if ( wnptr[i] == '\0' ) + break; + } + } + + /* + 7.8.2.3 The strtoimax and strtoumax functions (continued) + */ + + if ( (intmax = strtoimax("1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890", + &endptr, 0 + ) + ) != INTMAX_MAX || errno != ERANGE + ) { + printf("*** strtoimax failed overflow test ***\n"); + status = EXIT_FAILURE; + } + + if ( (intmax = strtoimax("+1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890", + &endptr, 0 + ) + ) != INTMAX_MAX || errno != ERANGE + ) { + printf("*** strtoimax failed +overflow test ***\n"); + status = EXIT_FAILURE; + } + + if ( (intmax = strtoimax("-1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890", + &endptr, 0 + ) + ) != INTMAX_MIN || errno != ERANGE + ) { + printf("*** strtoimax failed -overflow test ***\n"); + status = EXIT_FAILURE; + } + + if ( (uintmax = strtoumax("1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890", + &endptr, 0 + ) + ) != UINTMAX_MAX || errno != ERANGE + ) { + printf("*** strtoumax failed overflow test ***\n"); + status = EXIT_FAILURE; + } + + if ( (uintmax = strtoumax("+1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890", + &endptr, 0 + ) + ) != UINTMAX_MAX || errno != ERANGE + ) { + printf("*** strtoumax failed +overflow test ***\n"); + status = EXIT_FAILURE; + } + + if ( (uintmax = strtoumax("-1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890" + "1234567890123456789012345678901234567890", + &endptr, 0 + ) + ) != UINTMAX_MAX || errno != ERANGE + ) { + printf("*** strtoumax failed -overflow test ***\n"); + status = EXIT_FAILURE; + } + + /* + 7.8.2.4 The wcstoimax and wcstoumax functions (continued) + */ #ifdef NO_INTERNAL_WCHAR - printf("NO_INTERNAL_WCHAR\n"); + printf("NO_INTERNAL_WCHAR\n"); #else - if ( (intmax = wcstoimax(L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890", - &wendptr, 0 - ) - ) != INTMAX_MAX || errno != ERANGE - ) { - printf("*** wcstoimax failed overflow test ***\n"); - status = EXIT_FAILURE; - } + if ( (intmax = wcstoimax(L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890", + &wendptr, 0 + ) + ) != INTMAX_MAX || errno != ERANGE + ) { + printf("*** wcstoimax failed overflow test ***\n"); + status = EXIT_FAILURE; + } - if ( (intmax = wcstoimax(L"+1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890", - &wendptr, 0 - ) - ) != INTMAX_MAX || errno != ERANGE - ) { - printf("*** wcstoimax failed +overflow test ***\n"); - status = EXIT_FAILURE; - } + if ( (intmax = wcstoimax(L"+1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890", + &wendptr, 0 + ) + ) != INTMAX_MAX || errno != ERANGE + ) { + printf("*** wcstoimax failed +overflow test ***\n"); + status = EXIT_FAILURE; + } - if ( (intmax = wcstoimax(L"-1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890", - &wendptr, 0 - ) - ) != INTMAX_MIN || errno != ERANGE - ) { - printf("*** wcstoimax failed -overflow test ***\n"); - status = EXIT_FAILURE; - } + if ( (intmax = wcstoimax(L"-1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890", + &wendptr, 0 + ) + ) != INTMAX_MIN || errno != ERANGE + ) { + printf("*** wcstoimax failed -overflow test ***\n"); + status = EXIT_FAILURE; + } - if ( (uintmax = wcstoumax(L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890", - &wendptr, 0 - ) - ) != UINTMAX_MAX || errno != ERANGE - ) { - printf("*** wcstoumax failed overflow test ***\n"); - status = EXIT_FAILURE; - } + if ( (uintmax = wcstoumax(L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890", + &wendptr, 0 + ) + ) != UINTMAX_MAX || errno != ERANGE + ) { + printf("*** wcstoumax failed overflow test ***\n"); + status = EXIT_FAILURE; + } - if ( (uintmax = wcstoumax(L"+1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890", - &wendptr, 0 - ) - ) != UINTMAX_MAX || errno != ERANGE - ) { - printf("*** wcstoumax failed +overflow test ***\n"); - status = EXIT_FAILURE; - } + if ( (uintmax = wcstoumax(L"+1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890", + &wendptr, 0 + ) + ) != UINTMAX_MAX || errno != ERANGE + ) { + printf("*** wcstoumax failed +overflow test ***\n"); + status = EXIT_FAILURE; + } - if ( (uintmax = wcstoumax(L"-1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890" - L"1234567890123456789012345678901234567890", - &wendptr, 0 - ) - ) != UINTMAX_MAX || errno != ERANGE - ) { - printf("*** wcstoumax failed -overflow test ***\n"); - status = EXIT_FAILURE; - } + if ( (uintmax = wcstoumax(L"-1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890" + L"1234567890123456789012345678901234567890", + &wendptr, 0 + ) + ) != UINTMAX_MAX || errno != ERANGE + ) { + printf("*** wcstoumax failed -overflow test ***\n"); + status = EXIT_FAILURE; + } #endif // NO_INTERNAL_WCHAR - } -#endif /* defined(INTMAX_MAX) */ + } +#endif /* defined(INTMAX_MAX) */ - if ( status != 0 ) - printf("sitest failed.\n"); + if ( status != 0 ) + printf("sitest failed.\n"); - return status; + return status; } -#endif \ No newline at end of file +#endif diff --git a/test/readme.txt b/test/readme.txt index cd3b7501a..dd87ea9df 100644 --- a/test/readme.txt +++ b/test/readme.txt @@ -1,21 +1,55 @@ This directory contains test code for automatic regression testing of the CC65 -compiler. +compiler and tools. + +/asm - contains the assembler regression tests + +/dasm - contains the disassembler regression tests -/val - the bulk of tests are contained here, individual tests should exit with - an exit code of EXIT_SUCCESS when they pass, or EXIT_FAILURE on error +/val, /ref and /err generally contain the tests that are used to verify that the +compiler is working as expected (when the tests behave as described): -/ref - these tests produce output that must be compared with reference output +/val - The bulk of tests are contained here, individual tests should exit with + an exit code of EXIT_SUCCESS when they pass, or EXIT_FAILURE on error. + +/standard - like the tests in /val, the tests must exit with EXIT_SUCCESS on + success. Unlike the tests in /val these are not compiled for every + combination of optimizer options, but instead always with -Osir and then + for each supported C-standard (C89, C99, CC65). The goal is to use these + to check for regressions in standard conformance of the compiler and the + library. + +/ref - These tests produce output that must be compared with reference output. /err - contains tests that MUST NOT compile + +/todo and /misc generally contain the tests that fail because of known bugs: + +/todo - These tests fail due to open compiler issues. + + The makefile in this directory _expects_ the tests to fail, because of + that when an issue was fixed it will break the CI. The test should get + moved to /val in the PR fixing the issue, which will make CI pass again. + No changes to makefiles are required! + + /misc - a few tests that need special care of some sort + Tests that (incorrectly) fail to compile and other tests that fail and + do NOT return an exit code are collected here. The makefile _expects_ + those tests to fail, so when an issue is fixed it will break the CI. + When this happens, the PR fixing the issue should also "invert" the + failing condition in the makefile by adding a $(NOT) before the + offending line (or removing it when it is already there), which will + make the CI pass again. The test should then be moved elsewhere later, + which will require additional changes to the makefile(s). -to run the tests use "make" in this (top) directory, the makefile should exit + +To run the tests use "make" in this (top) directory, the makefile should exit with no error. -when a test failed you can use "make continue" to run further tests +When a test failed you can use "make continue" to run further tests. -------------------------------------------------------------------------------- diff --git a/test/ref/8q.c b/test/ref/8q.c index e8bd1ca2e..2055b5fd5 100644 --- a/test/ref/8q.c +++ b/test/ref/8q.c @@ -12,38 +12,38 @@ void print(void); int main(void) { - int i; - for (i = 0; i < 15; i++) - up[i] = down[i] = 1; - for (i = 0; i < 8; i++) - rows[i] = 1; - queens(0); - return 0; + int i; + for (i = 0; i < 15; i++) + up[i] = down[i] = 1; + for (i = 0; i < 8; i++) + rows[i] = 1; + queens(0); + return 0; } void queens(int c) { - int r; + int r; - for (r = 0; r < 8; r++) - if (rows[r] && up[r-c+7] && down[r+c]) { - rows[r] = up[r-c+7] = down[r+c] = 0; - x[c] = r; - if (c == 7) - print(); - else - queens(c + 1); - rows[r] = up[r-c+7] = down[r+c] = 1; - } + for (r = 0; r < 8; r++) + if (rows[r] && up[r-c+7] && down[r+c]) { + rows[r] = up[r-c+7] = down[r+c] = 0; + x[c] = r; + if (c == 7) + print(); + else + queens(c + 1); + rows[r] = up[r-c+7] = down[r+c] = 1; + } } void print(void) { - int k; + int k; - for (k = 0; k < 8; k++) { - printf("%c", x[k]+'1'); - if(k<7) printf(" "); - } - printf("\n"); + for (k = 0; k < 8; k++) { + printf("%c", x[k]+'1'); + if(k<7) printf(" "); + } + printf("\n"); } diff --git a/test/ref/Makefile b/test/ref/Makefile index 09dd96d44..d9c9817ee 100644 --- a/test/ref/Makefile +++ b/test/ref/Makefile @@ -1,96 +1,85 @@ - -# makefile for the regression tests that generate output which has to be +# Makefile for the regression tests that generate output which has to be # compared with reference output ifneq ($(shell echo),) - CMD_EXE := 1 + CMD_EXE = 1 endif ifdef CMD_EXE - S := $(subst /,\,/) - DEL = -del /f $(subst /,\,$1) + S = $(subst /,\,/) + EXE = .exe + NULLDEV = nul: + MKDIR = mkdir $(subst /,\,$1) + RMDIR = -rmdir /s /q $(subst /,\,$1) else - S := / - DEL = $(RM) $1 + S = / + EXE = + NULLDEV = /dev/null + MKDIR = mkdir -p $1 + RMDIR = $(RM) -r $1 endif -CC65FLAGS := -t sim6502 -SIM65FLAGS := -x 200000000 +ifdef QUIET + .SILENT: + NULLERR = 2>$(NULLDEV) +endif -CL65 := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) +SIM65FLAGS = -x 200000000 + +CC65 := $(if $(wildcard ../../bin/cc65*),..$S..$Sbin$Scc65,cc65) +CA65 := $(if $(wildcard ../../bin/ca65*),..$S..$Sbin$Sca65,ca65) +LD65 := $(if $(wildcard ../../bin/ld65*),..$S..$Sbin$Sld65,ld65) SIM65 := $(if $(wildcard ../../bin/sim65*),..$S..$Sbin$Ssim65,sim65) -WORKDIR := ..$S..$Stestwrk -DIFF := $(WORKDIR)/bdiff +WORKDIR = ..$S..$Stestwrk$Sref -CC := gcc -CFLAGS := -O2 -Wall -W -Wextra -fwrapv -fno-strict-overflow +OPTIONS = g O Os Osi Osir Osr Oi Oir Or + +ISEQUAL = ..$S..$Stestwrk$Sisequal$(EXE) + +CC = gcc +CFLAGS = -O2 -Wall -W -Wextra -funsigned-char -fwrapv -fno-strict-overflow .PHONY: all clean SOURCES := $(wildcard *.c) -REFS := $(SOURCES:%.c=$(WORKDIR)/%.ref) -TESTS := $(foreach option,. .o. .os. .osi. .osir. .oi. .oir. .or.,$(SOURCES:%.c=$(WORKDIR)/%$(option)prg)) +REFS = $(SOURCES:%.c=$(WORKDIR)/%.ref) +TESTS = $(foreach option,$(OPTIONS),$(SOURCES:%.c=$(WORKDIR)/%.$(option).6502.prg)) +TESTS += $(foreach option,$(OPTIONS),$(SOURCES:%.c=$(WORKDIR)/%.$(option).65c02.prg)) all: $(REFS) $(TESTS) -$(WORKDIR)/%.ref: %.c - $(CC) $(CFLAGS) $< -o $(WORKDIR)/$*.host +$(WORKDIR): + $(call MKDIR,$(WORKDIR)) + +$(WORKDIR)/%.ref: %.c | $(WORKDIR) + $(if $(QUIET),echo ref/$*.host) + $(CC) $(CFLAGS) -o $(WORKDIR)/$*.host $< $(NULLERR) $(WORKDIR)$S$*.host > $@ -# Some files have "K & R"-style syntax. Therefore, some forward -# function-declarations don't match the later function definitions. -# Those programs fail when fastcall is used; but, the cdecl calling convention -# tolerates those conflicts. Therefore, make their functions default to cdecl. +$(ISEQUAL): ../isequal.c | $(WORKDIR) + $(CC) $(CFLAGS) -o $@ $< + +# "yaccdbg.c" includes "yacc.c". +# yaccdbg's built files must depend on both of them. # -$(WORKDIR)/init%prg: CC65FLAGS += -Wc --all-cdecl -$(WORKDIR)/switch.%rg: CC65FLAGS += -Wc --all-cdecl -$(WORKDIR)/yacc.%rg: CC65FLAGS += -Wc --all-cdecl -$(WORKDIR)/yaccdbg%prg: CC65FLAGS += -Wc --all-cdecl +$(WORKDIR)/yaccdbg.ref: yacc.c +$(WORKDIR)/yaccdbg.%.prg: yacc.c -$(WORKDIR)/%.prg: %.c $(WORKDIR)/%.ref - $(CL65) $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ > $(WORKDIR)/$*.out - $(DIFF) $(WORKDIR)/$*.out $(WORKDIR)/$*.ref +define PRG_template -$(WORKDIR)/%.o.prg: %.c $(WORKDIR)/%.ref - $(CL65) -O $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ > $(WORKDIR)/$*.out - $(DIFF) $(WORKDIR)/$*.out $(WORKDIR)/$*.ref +$(WORKDIR)/%.$1.$2.prg: %.c $(WORKDIR)/%.ref $(ISEQUAL) + $(if $(QUIET),echo ref/$$*.$1.$2.prg) + $(CC65) -t sim$2 $$(CC65FLAGS) -$1 -o $$(@:.prg=.s) $$< $(NULLERR) + $(CA65) -t sim$2 -o $$(@:.prg=.o) $$(@:.prg=.s) $(NULLERR) + $(LD65) -t sim$2 -o $$@ $$(@:.prg=.o) sim$2.lib $(NULLERR) + $(SIM65) $(SIM65FLAGS) $$@ > $(WORKDIR)/$$*.$1.$2.out + $(ISEQUAL) $(WORKDIR)/$$*.$1.$2.out $(WORKDIR)/$$*.ref -$(WORKDIR)/%.os.prg: %.c $(WORKDIR)/%.ref - $(CL65) -Os $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ > $(WORKDIR)/$*.out - $(DIFF) $(WORKDIR)/$*.out $(WORKDIR)/$*.ref +endef # PRG_template -$(WORKDIR)/%.osi.prg: %.c $(WORKDIR)/%.ref - $(CL65) -Osi $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ > $(WORKDIR)/$*.out - $(DIFF) $(WORKDIR)/$*.out $(WORKDIR)/$*.ref - -$(WORKDIR)/%.osir.prg: %.c $(WORKDIR)/%.ref - $(CL65) -Osir $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ > $(WORKDIR)/$*.out - $(DIFF) $(WORKDIR)/$*.out $(WORKDIR)/$*.ref - -$(WORKDIR)/%.oi.prg: %.c $(WORKDIR)/%.ref - $(CL65) -Oi $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ > $(WORKDIR)/$*.out - $(DIFF) $(WORKDIR)/$*.out $(WORKDIR)/$*.ref - -$(WORKDIR)/%.oir.prg: %.c $(WORKDIR)/%.ref - $(CL65) -Oir $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ > $(WORKDIR)/$*.out - $(DIFF) $(WORKDIR)/$*.out $(WORKDIR)/$*.ref - -$(WORKDIR)/%.or.prg: %.c $(WORKDIR)/%.ref - $(CL65) -Or $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ > $(WORKDIR)/$*.out - $(DIFF) $(WORKDIR)/$*.out $(WORKDIR)/$*.ref +$(foreach option,$(OPTIONS),$(eval $(call PRG_template,$(option),6502))) +$(foreach option,$(OPTIONS),$(eval $(call PRG_template,$(option),65c02))) clean: - @$(call DEL,$(TESTS)) - @$(call DEL,$(SOURCES:.c=.o)) - @$(call DEL,$(SOURCES:%.c=$(WORKDIR)/%.out)) - @$(call DEL,$(SOURCES:%.c=$(WORKDIR)/%.ref)) - @$(call DEL,$(SOURCES:%.c=$(WORKDIR)/%.host)) + @$(call RMDIR,$(WORKDIR)) diff --git a/test/ref/array.c b/test/ref/array.c index 9d170aaa9..19265ef90 100644 --- a/test/ref/array.c +++ b/test/ref/array.c @@ -14,49 +14,49 @@ int g(int x[][4],int *y[]); int x[3][4], *y[3]; main() { - int z[3][4]; - int i, j, *p; + int z[3][4]; + int i, j, *p; - for (i = 0; i < 3; i++) { - for (j = 0; j < 4; j++) - x[i][j] = 1000*i + j; - y[i] = x[i]; - } - f(); - for (i = 0; i < 3; i++) { - y[i] = p = &z[i][0]; - for (j = 0; j < 4; j++) - p[j] = x[i][j]; - } - g(z, y); - - return 0; + for (i = 0; i < 3; i++) { + for (j = 0; j < 4; j++) + x[i][j] = 1000*i + j; + y[i] = x[i]; + } + f(); + for (i = 0; i < 3; i++) { + y[i] = p = &z[i][0]; + for (j = 0; j < 4; j++) + p[j] = x[i][j]; + } + g(z, y); + + return 0; } f() { - int i, j; + int i, j; - for (i = 0; i < 3; i++) - for (j = 0; j < 4; j++) - printf(" %d", x[i][j]); - printf("\n"); - for (i = 0; i < 3; i++) - for (j = 0; j < 4; j++) - printf(" %d", y[i][j]); - printf("\n"); + for (i = 0; i < 3; i++) + for (j = 0; j < 4; j++) + printf(" %d", x[i][j]); + printf("\n"); + for (i = 0; i < 3; i++) + for (j = 0; j < 4; j++) + printf(" %d", y[i][j]); + printf("\n"); } g(x, y) int x[][4], *y[]; { - int i, j; + int i, j; - for (i = 0; i < 3; i++) - for (j = 0; j < 4; j++) - printf(" %d", x[i][j]); - printf("\n"); - for (i = 0; i < 3; i++) - for (j = 0; j < 4; j++) - printf(" %d", y[i][j]); - printf("\n"); + for (i = 0; i < 3; i++) + for (j = 0; j < 4; j++) + printf(" %d", x[i][j]); + printf("\n"); + for (i = 0; i < 3; i++) + for (j = 0; j < 4; j++) + printf(" %d", y[i][j]); + printf("\n"); } diff --git a/test/ref/cc65070303.c b/test/ref/cc65070303.c index c0404dab8..6cf2e9dc7 100644 --- a/test/ref/cc65070303.c +++ b/test/ref/cc65070303.c @@ -9,17 +9,17 @@ typedef signed int TypA[3]; typedef struct TypB { - TypA Data[2]; + TypA Data[2]; } sTypB; sTypB Bs[10]; TypA * APtr; int main(int argc, char* argv[]) { - Bs[7].Data[1][2]=11; - APtr=&(Bs[7].Data[1]); - printf("Hallo Welt! %i = %i \n",Bs[7].Data[1][2], (*APtr)[2] ); - return 0; + Bs[7].Data[1][2]=11; + APtr=&(Bs[7].Data[1]); + printf("Hallo Welt! %i = %i \n",Bs[7].Data[1][2], (*APtr)[2] ); + return 0; } /* @@ -27,7 +27,7 @@ int main(int argc, char* argv[]) test.c(20): Error: Incompatible pointer types for APtr=&(Bs[7].Data[1]); -My experience in C is very limited, but as this works both in MSVC and +My experience in C is very limited, but as this works both in MSVC and the 8 bit Z80 compiler i originally used, i guess its an bug in CC65. As a workaround, an typecast via APtr=(TypA*)&(Bs[7].Data[1]); @@ -35,4 +35,4 @@ seems to work. greetings, Andreas -*/ \ No newline at end of file +*/ diff --git a/test/ref/cc65080227.c b/test/ref/cc65080227.c index 78afbb2c2..86d5ee331 100644 --- a/test/ref/cc65080227.c +++ b/test/ref/cc65080227.c @@ -1,5 +1,5 @@ /* - !!DESCRIPTION!! + !!DESCRIPTION!! !!ORIGIN!! testsuite !!LICENCE!! Public Domain !!AUTHOR!! @@ -36,4 +36,4 @@ int main(void) 000023r 1 A4 rr ldy sreg 000025r 1 8C rr rr sty _b+2 000028r 1 8C rr rr sty _b+3 ; lost 4th BYTE ! -*/ \ No newline at end of file +*/ diff --git a/test/ref/cc65080328.c b/test/ref/cc65080328.c index 630638f3d..7e26ea20a 100644 --- a/test/ref/cc65080328.c +++ b/test/ref/cc65080328.c @@ -1,5 +1,5 @@ /* - !!DESCRIPTION!! + !!DESCRIPTION!! !!ORIGIN!! testsuite !!LICENCE!! Public Domain !!AUTHOR!! diff --git a/test/ref/cc65090111.c b/test/ref/cc65090111.c index be889a608..30b2b3cd0 100644 --- a/test/ref/cc65090111.c +++ b/test/ref/cc65090111.c @@ -1,5 +1,5 @@ /* - !!DESCRIPTION!! + !!DESCRIPTION!! !!ORIGIN!! testsuite !!LICENCE!! Public Domain !!AUTHOR!! diff --git a/test/ref/cc65090124.c b/test/ref/cc65090124.c index 3f8279b27..910dc1195 100644 --- a/test/ref/cc65090124.c +++ b/test/ref/cc65090124.c @@ -1,5 +1,5 @@ /* - !!DESCRIPTION!! + !!DESCRIPTION!! !!ORIGIN!! testsuite !!LICENCE!! Public Domain !!AUTHOR!! @@ -8,7 +8,7 @@ #include <stdio.h> /* -there is a bug in the preprocessor (i think) ... the following works +there is a bug in the preprocessor (i think) ... the following works (compiles) correctly: unsigned long fs,fd,a; @@ -32,7 +32,7 @@ int main(void) fs=(func((fd/a),(func(2,0x0082c90f)))); } -i get "Error: `)' expected" on that line. (this is with the snapshot, freshly +i get "Error: ')' expected" on that line. (this is with the snapshot, freshly compiled 5 minutes ago) */ diff --git a/test/ref/cc65090726.c b/test/ref/cc65090726.c index b260f0afd..f22b9c203 100644 --- a/test/ref/cc65090726.c +++ b/test/ref/cc65090726.c @@ -1,5 +1,5 @@ /* - !!DESCRIPTION!! + !!DESCRIPTION!! !!ORIGIN!! testsuite !!LICENCE!! Public Domain !!AUTHOR!! @@ -17,26 +17,26 @@ typedef RecordType *RecordPtr; void Proc3(RecordPtr *PtrParOut) { - /* whatever */ + /* whatever */ } void Proc1(RecordPtr PtrParIn) { #define NextRecord (*(PtrParIn->PtrComp)) - Proc3((RecordPtr *)NextRecord.PtrComp); - Proc3(&NextRecord.PtrComp); - Proc3(&PtrParIn->PtrComp->PtrComp); + Proc3((RecordPtr *)NextRecord.PtrComp); + Proc3(&NextRecord.PtrComp); + Proc3(&PtrParIn->PtrComp->PtrComp); #ifdef CAST_STRUCT_PTR - Proc3((RecordPtr *) PtrParIn->PtrComp->PtrComp); - Proc3((RecordPtr *) (*(PtrParIn->PtrComp)).PtrComp); - Proc3((RecordPtr *) NextRecord.PtrComp); + Proc3((RecordPtr *) PtrParIn->PtrComp->PtrComp); + Proc3((RecordPtr *) (*(PtrParIn->PtrComp)).PtrComp); + Proc3((RecordPtr *) NextRecord.PtrComp); #else - Proc3(PtrParIn->PtrComp->PtrComp); - Proc3((*(PtrParIn->PtrComp)).PtrComp); - Proc3(NextRecord.PtrComp); + Proc3(PtrParIn->PtrComp->PtrComp); + Proc3((*(PtrParIn->PtrComp)).PtrComp); + Proc3(NextRecord.PtrComp); #endif - + #undef NextRecord } diff --git a/test/ref/cc65090910.c b/test/ref/cc65090910.c index 6ac5d9dcb..d68c2b8e6 100644 --- a/test/ref/cc65090910.c +++ b/test/ref/cc65090910.c @@ -17,7 +17,7 @@ with compiler option -O but does _not_ show up with -Oi. unsigned htons(unsigned val) { - return (((unsigned) (val)) << 8) | (((unsigned) (val)) >> 8); + return (((unsigned) (val)) << 8) | (((unsigned) (val)) >> 8); } int main(void) diff --git a/test/ref/cc65090913.c b/test/ref/cc65090913.c index da6e37ef3..3a92dc6ec 100644 --- a/test/ref/cc65090913.c +++ b/test/ref/cc65090913.c @@ -25,7 +25,7 @@ int foo=0,bar=2; int main(void) { while(foo<bar) - label: ++foo; + label: ++foo; printf("foo: %d bar: %d\n",foo,bar); diff --git a/test/ref/cc65091022.c b/test/ref/cc65091022.c index 25d197c11..ea19afe43 100644 --- a/test/ref/cc65091022.c +++ b/test/ref/cc65091022.c @@ -8,7 +8,7 @@ #include <stdio.h> /* -...gives "test.c(2): Error: Variable `foo' has unknown size" using -Cl. +...gives "test.c(2): Error: Variable 'foo' has unknown size" using -Cl. Is it really unknown? cc65 V2.13.0, SVN version: 4384 diff --git a/test/ref/cc65101102.c b/test/ref/cc65101102.c index 4faa7c12b..1f87f65b5 100644 --- a/test/ref/cc65101102.c +++ b/test/ref/cc65101102.c @@ -11,12 +11,12 @@ Compiler is build from cc65-snapshot-2.13.9.20101031 sources. Expected results and also what I get from this without any optimisations are: 48663 and 49218 -When I turn on ``-O``: 58096 and 58096. After swapping the two variable -declaration lines in `calculate_checksum()` the results are correct -with ``-O``. +When I turn on ''-O'': 58096 and 58096. After swapping the two variable +declaration lines in 'calculate_checksum()' the results are correct +with ''-O''. -But with ``--O --static-locals`` the results are incorrect again (31757 -and 15408). ``--static-locals`` alone works though. +But with ''--O --static-locals'' the results are incorrect again (31757 +and 15408). ''--static-locals'' alone works though. */ #include <stdio.h> diff --git a/test/ref/cc65101209.c b/test/ref/cc65101209.c index c14543640..eba209d1d 100644 --- a/test/ref/cc65101209.c +++ b/test/ref/cc65101209.c @@ -34,5 +34,5 @@ So testing with 999 gives: 231 mod 999 is 0 999 mod 999 is 0 -This seems to be systematic. -*/ \ No newline at end of file +This seems to be systematic. +*/ diff --git a/test/ref/cc65101216.c b/test/ref/cc65101216.c index eaaf0b3e4..1f6101afa 100644 --- a/test/ref/cc65101216.c +++ b/test/ref/cc65101216.c @@ -24,4 +24,4 @@ int main() printf("a / b = %d", c); return 0; -} \ No newline at end of file +} diff --git a/test/ref/cc65110210.c b/test/ref/cc65110210.c index 2c7853556..319b2c529 100644 --- a/test/ref/cc65110210.c +++ b/test/ref/cc65110210.c @@ -8,39 +8,22 @@ with SVN version: 4973M $ cl65 -v -o test.prg tests/cc65110210.c -Opened include file `/usr/local/lib/cc65/include/stdio.h' -Opened include file `/usr/local/lib/cc65/include/stddef.h' -Opened include file `/usr/local/lib/cc65/include/stdarg.h' -Opened include file `/usr/local/lib/cc65/include/limits.h' +Opened include file '/usr/local/lib/cc65/include/stdio.h' +Opened include file '/usr/local/lib/cc65/include/stddef.h' +Opened include file '/usr/local/lib/cc65/include/stdarg.h' +Opened include file '/usr/local/lib/cc65/include/limits.h' 0 errors, 0 warnings -Opened output file `tests/cc65110210.s' -Wrote output to `tests/cc65110210.s' -Closed output file `tests/cc65110210.s' -cl65: Subprocess `ld65' aborted by signal 11 +Opened output file 'tests/cc65110210.s' +Wrote output to 'tests/cc65110210.s' +Closed output file 'tests/cc65110210.s' +cl65: Subprocess 'ld65' aborted by signal 11 */ -/* #define STANDALONE */ - #include <stdio.h> #include <limits.h> -#ifdef STANDALONE - -#define NO_IMPLICIT_FUNCPTR_CONV - -#define OPENTEST() -#define CLOSETEST() - -#else - -#endif - -#ifdef NO_IMPLICIT_FUNCPTR_CONV -void (*p1func)(void); -#else void (*p1func)(); -#endif void func(void) { diff --git a/test/ref/cf.c b/test/ref/cf.c index 66fb42b10..6001009ce 100644 --- a/test/ref/cf.c +++ b/test/ref/cf.c @@ -33,9 +33,9 @@ int argc; char *argv[]; #endif { - int i, c, nc; + int i, c, nc; #ifndef NO_FLOATS - float cutoff, atof(); + float cutoff, atof(); #else signed cutoff; #endif @@ -45,29 +45,29 @@ char *argv[]; return EXIT_FAILURE; } - if (argc <= 1) + if (argc <= 1) #ifndef NO_FLOATS - cutoff = 0.0; + cutoff = 0.0; #else cutoff = 0; #endif - else + else #ifndef NO_FLOATS - cutoff = atof(argv[1])/100; + cutoff = atof(argv[1])/100; #else cutoff = atoi(argv[1])/100; #endif - for (i = 0; i < 0x100; ) + for (i = 0; i < 0x100; ) { #ifndef NO_FLOATS - f[i++] = 0.0; + f[i++] = 0.0; #else f[i++] = 0; #endif } printf("input:\n\n"); - + nc = 0; while ((c = GETCHAR()) != -1) { @@ -87,13 +87,13 @@ char *argv[]; printf("a-z char:freq\n\n"); /* first round ... lowercase characters */ - for (i = 0; i < 0x100; ++i) + for (i = 0; i < 0x100; ++i) { - if ((f[i]) && ((f[i]/nc) >= cutoff)) + if ((f[i]) && ((f[i]/nc) >= cutoff)) { - if ((i >= 'a') && (i <= 'z')) + if ((i >= 'a') && (i <= 'z')) { - printf("%c", i); + printf("%c", i); #ifndef NO_FLOATS printf(":%.1f\n", 100*f[i]/nc); #else @@ -101,19 +101,19 @@ char *argv[]; #endif f[i]=0; } - } + } } printf("A-Z char:freq\n\n"); /* second round ... uppercase characters */ - for (i = 0; i < 0x100; ++i) + for (i = 0; i < 0x100; ++i) { - if ((f[i]) && ((f[i]/nc) >= cutoff)) + if ((f[i]) && ((f[i]/nc) >= cutoff)) { - if ((i >= 'A') && (i <= 'Z')) + if ((i >= 'A') && (i <= 'Z')) { - printf("%c", i); + printf("%c", i); #ifndef NO_FLOATS printf(":%.1f\n", 100*f[i]/nc); #else @@ -121,19 +121,19 @@ char *argv[]; #endif f[i]=0; } - } + } } printf("0-9 char:freq\n\n"); /* third round ... numbers */ - for (i = 0; i < 0x100; ++i) + for (i = 0; i < 0x100; ++i) { - if ((f[i]) && ((f[i]/nc) >= cutoff)) + if ((f[i]) && ((f[i]/nc) >= cutoff)) { - if ((i >= '0') && (i <= '9')) + if ((i >= '0') && (i <= '9')) { - printf("%c", i); + printf("%c", i); #ifndef NO_FLOATS printf(":%.1f\n", 100*f[i]/nc); #else @@ -141,19 +141,19 @@ char *argv[]; #endif f[i]=0; } - } + } } printf("isprint char:freq\n\n"); /* second last round ... remaining printable characters */ - for (i = 0; i < 0x100; ++i) + for (i = 0; i < 0x100; ++i) { - if ((f[i]) && ((f[i]/nc) >= cutoff)) + if ((f[i]) && ((f[i]/nc) >= cutoff)) { - if(isprint(i)) + if(isprint(i)) { - printf("%c", i); + printf("%c", i); #ifndef NO_FLOATS printf(":%.1f\n", 100*f[i]/nc); #else @@ -161,30 +161,30 @@ char *argv[]; #endif f[i]=0; } - } + } } printf("rest char:freq\n\n"); /* last round ... remaining non printable characters */ - for (i = 0; i < 0x100; ++i) + for (i = 0; i < 0x100; ++i) { - if ((f[i]) && ((f[i]/nc) >= cutoff)) + if ((f[i]) && ((f[i]/nc) >= cutoff)) { if(i=='\n') { - printf("newline"); + printf("newline"); } else { - printf("%03o", i); + printf("%03o", i); } #ifndef NO_FLOATS printf(":%.1f\n", 100*f[i]/nc); #else printf(":%d\n", 100*f[i]/nc); #endif - } + } } fclose(in); return 0; diff --git a/test/ref/cf.in b/test/ref/cf.in old mode 100755 new mode 100644 diff --git a/test/ref/charconst.c b/test/ref/charconst.c index 65ebc70be..1a2f5303d 100644 --- a/test/ref/charconst.c +++ b/test/ref/charconst.c @@ -14,23 +14,23 @@ void backslash(unsigned char c) switch (c) { - case 'b': - c = '\b'; - case 'f': - c = '\f'; - case 'n': - c = '\n'; - case 'r': - c = '\r'; - case 't': - c = '\t'; - case 'v': + case 'b': + c = '\b'; + case 'f': + c = '\f'; + case 'n': + c = '\n'; + case 'r': + c = '\r'; + case 't': + c = '\t'; + case 'v': #ifndef NO_BACKSLASH_V c = '\v'; #else c = 0x0b; #endif - } + } if(!isprint(c)) { @@ -54,7 +54,7 @@ void testbackslash(void) int main(void) { - testbackslash(); + testbackslash(); - return 0; + return 0; } diff --git a/test/ref/charset.c b/test/ref/charset.c index 59b7c4c54..8bd1675c8 100644 --- a/test/ref/charset.c +++ b/test/ref/charset.c @@ -12,82 +12,82 @@ /* this kind of line-continuation for strings doesnt work properly for cc65 */ const unsigned char characters[]={ - /*0123456789abcdef0123456789abcdef*/ - /* iso646-us control-characters */ - " " /* 00-1f */ - /* iso646-us printable characters */ - " !\"#$%&'()*+,-./" /* 20-2f !"#$%&'()*+,-./ */ - "0123456789" /* 30-39 0123456789 */ - ":;<=>?@" /* 3a-40 :;<=>?@ */ - "ABCDEFGHIJKLMNOPQRSTUVWXYZ" /* 41-5a A-Z */ - "[\\]^_`" /* 5b-60 [\]^_` */ - "abcdefghijklmnopqrstuvwxyz" /* 61-7a a-z */ - "{|}~ " /* 7b-7f {|}~ */ - /* iso8859-15 extended characters */ + /*0123456789abcdef0123456789abcdef*/ + /* iso646-us control-characters */ + " " /* 00-1f */ + /* iso646-us printable characters */ + " !\"#$%&'()*+,-./" /* 20-2f !"#$%&'()*+,-./ */ + "0123456789" /* 30-39 0123456789 */ + ":;<=>?@" /* 3a-40 :;<=>?@ */ + "ABCDEFGHIJKLMNOPQRSTUVWXYZ" /* 41-5a A-Z */ + "[\\]^_`" /* 5b-60 [\]^_` */ + "abcdefghijklmnopqrstuvwxyz" /* 61-7a a-z */ + "{|}~ " /* 7b-7f {|}~ */ + /* iso8859-15 extended characters */ }; #endif const unsigned char characters[]={ - /*0123456789abcdef0123456789abcdef*/ - /* iso646-us control-characters */ - /* 00-1f */ - 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, - 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, - 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, - 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, - /* iso646-us printable characters */ - /* 20-2f !"#$%&'()*+,-./ */ - ' ','!','"','#','$','%','&','\'','(',')','*','+',',','-','.','/', - /* 30-39 0123456789 */ - '0','1','2','3','4','5','6','7','8','9', - /* 3a-40 :;<=>?@ */ - ':',';','<','=','>','?','@', - /* 41-5a A-Z */ - 'A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z', - /* 5b-60 [\]^_` */ - '[','\\',']','^','_','`', - /* 61-7a a-z */ - 'a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z', - /* 7b-7f {|}~ */ - '{','|','}','~',' ' - /* iso8859-15 extended characters */ + /*0123456789abcdef0123456789abcdef*/ + /* iso646-us control-characters */ + /* 00-1f */ + 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, + 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, + 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, + 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00, + /* iso646-us printable characters */ + /* 20-2f !"#$%&'()*+,-./ */ + ' ','!','"','#','$','%','&','\'','(',')','*','+',',','-','.','/', + /* 30-39 0123456789 */ + '0','1','2','3','4','5','6','7','8','9', + /* 3a-40 :;<=>?@ */ + ':',';','<','=','>','?','@', + /* 41-5a A-Z */ + 'A','B','C','D','E','F','G','H','I','J','K','L','M','N','O','P','Q','R','S','T','U','V','W','X','Y','Z', + /* 5b-60 [\]^_` */ + '[','\\',']','^','_','`', + /* 61-7a a-z */ + 'a','b','c','d','e','f','g','h','i','j','k','l','m','n','o','p','q','r','s','t','u','v','w','x','y','z', + /* 7b-7f {|}~ */ + '{','|','}','~',' ' + /* iso8859-15 extended characters */ }; void printchars(unsigned char a,unsigned char b){ - for(b++;a!=b;a++) + for(b++;a!=b;a++) /* printf("%02x ",a); */ /* printf("%02x ",characters[a]); */ - printf("%c",characters[a]); - printf("\n"); + printf("%c",characters[a]); + printf("\n"); } int main(void) { - printf("characters:\n\n"); - printchars(0x61,0x7a); - printchars(0x41,0x5a); - printf("numbers:\n\n"); - printchars(0x30,0x39); - printf("other:\n\n"); - printchars(0x20,0x2f); - /*printchars(0x3a,0x40);*/ - printchars(0x3a,0x3f); - /*printchars(0x5b,0x60);*/ - /*printchars(0x7b,0x7f);*/ - printf("\n\n"); - printf("slash: '%c'\n",'/'); - printf("backslash: '%c'\n",'\\'); - printf("curly braces open: '%c'\n",'{'); - printf("curly braces close: '%c'\n",'}'); - printf("square braces open: '%c'\n",'['); - printf("square braces close: '%c'\n",']'); - printf("underscore: '%c'\n",'_'); - printf("tilde: '%c'\n",'~'); - printf("pipe: '%c'\n",'|'); - printf("apostroph: '%c'\n",'\''); - printf("single quote '%c'\n",'`'); - printf("xor '%c'\n",'^'); - printf("at '%c'\n",'@'); + printf("characters:\n\n"); + printchars(0x61,0x7a); + printchars(0x41,0x5a); + printf("numbers:\n\n"); + printchars(0x30,0x39); + printf("other:\n\n"); + printchars(0x20,0x2f); + /*printchars(0x3a,0x40);*/ + printchars(0x3a,0x3f); + /*printchars(0x5b,0x60);*/ + /*printchars(0x7b,0x7f);*/ + printf("\n\n"); + printf("slash: '%c'\n",'/'); + printf("backslash: '%c'\n",'\\'); + printf("curly braces open: '%c'\n",'{'); + printf("curly braces close: '%c'\n",'}'); + printf("square braces open: '%c'\n",'['); + printf("square braces close: '%c'\n",']'); + printf("underscore: '%c'\n",'_'); + printf("tilde: '%c'\n",'~'); + printf("pipe: '%c'\n",'|'); + printf("apostroph: '%c'\n",'\''); + printf("single quote '%c'\n",'`'); + printf("xor '%c'\n",'^'); + printf("at '%c'\n",'@'); - return 0; + return 0; } diff --git a/test/ref/divmod.c b/test/ref/divmod.c index 68a0198e1..e5535ebc4 100644 --- a/test/ref/divmod.c +++ b/test/ref/divmod.c @@ -1,38 +1,38 @@ -/* - !!DESCRIPTION!! div/mod test - !!ORIGIN!! - !!LICENCE!! public domain -*/ - -#include <stdio.h> - -void printc(signed char a,signed char b){ -signed char x=a/b,y=a%b,z=a*b; - printf("%3d,%3d is %3d,%3d,%3d\n",a,b,x,y,z); -} -void prints(short a,short b){ -short x=a/b,y=a%b,z=a*b; - printf("%3d,%3d is %3d,%3d,%3d\n",a,b,x,y,z); -} -void printl(long a,long b){ -long x=a/b,y=a%b,z=a*b; - printf("%3ld,%3ld is %3ld,%3ld,%3ld\n",a,b,x,y,z); -} - -int main(void) { - printl( 3,-2); - printl(-3,-2); - printl(-3, 2); - printl( 3, 2); - printf("-\n"); - prints( 3,-2); - prints(-3,-2); - prints(-3, 2); - prints( 3, 2); - printf("-\n"); - printc( 3,-2); - printc(-3,-2); - printc(-3, 2); - printc( 3, 2); - return 0; -} +/* + !!DESCRIPTION!! div/mod test + !!ORIGIN!! + !!LICENCE!! public domain +*/ + +#include <stdio.h> + +void printc(signed char a,signed char b){ +signed char x=a/b,y=a%b,z=a*b; + printf("%3d,%3d is %3d,%3d,%3d\n",a,b,x,y,z); +} +void prints(short a,short b){ +short x=a/b,y=a%b,z=a*b; + printf("%3d,%3d is %3d,%3d,%3d\n",a,b,x,y,z); +} +void printl(long a,long b){ +long x=a/b,y=a%b,z=a*b; + printf("%3ld,%3ld is %3ld,%3ld,%3ld\n",a,b,x,y,z); +} + +int main(void) { + printl( 3,-2); + printl(-3,-2); + printl(-3, 2); + printl( 3, 2); + printf("-\n"); + prints( 3,-2); + prints(-3,-2); + prints(-3, 2); + prints( 3, 2); + printf("-\n"); + printc( 3,-2); + printc(-3,-2); + printc(-3, 2); + printc( 3, 2); + return 0; +} diff --git a/test/ref/goto.c b/test/ref/goto.c new file mode 100644 index 000000000..3a445e647 --- /dev/null +++ b/test/ref/goto.c @@ -0,0 +1,35 @@ +#include <stdio.h> + +int main () { + char a[200] = "xyz"; + int ctr = 0; +start: + a[ctr] = ctr + 65; + goto second; + + { + char b[64] = "xxx"; + first: + b[0] = ctr + 97; + goto safe; + b[0] = 'Z'; + safe: + printf ("%c%c", a[0], b[0]); + if (ctr++ > 20) + goto end; + else + goto second; + } + { + char c[100] = "aaa"; + second:; + c[0] = '1'; + c[99] = '2'; + goto first; + } +end: + a[ctr] = '\n'; + printf ("\n%s\n", a); + + return 0; +} diff --git a/test/ref/hanoi.c b/test/ref/hanoi.c index 234ac41e4..14bc60fa6 100644 --- a/test/ref/hanoi.c +++ b/test/ref/hanoi.c @@ -11,8 +11,8 @@ ******************************************************************************* * Bug reports, patches, comments, suggestions should be sent to: * - * Ben Smith, Rick Grehan or Tom Yager - * ben@bytepb.byte.com rick_g@bytepb.byte.com tyager@bytepb.byte.com + * Ben Smith, Rick Grehan or Tom Yager + * ben@bytepb.byte.com rick_g@bytepb.byte.com tyager@bytepb.byte.com * ******************************************************************************* * Modification Log: @@ -38,53 +38,53 @@ void mov(unsigned char n,unsigned char f,unsigned char t) { char o; - if(n == 1) - { - num[f]--; - num[t]++; - } - else - { - o = (6-(f+t)); - mov(n-1,f,o); - mov(1,f,t); - mov(n-1,o,t); - } + if(n == 1) + { + num[f]--; + num[t]++; + } + else + { + o = (6-(f+t)); + mov(n-1,f,o); + mov(1,f,t); + mov(n-1,o,t); + } - #ifdef VERBOSE - printf("%2d: %2d %2d %2d %2d\n", - (int)iter,(int)num[0],(int)num[1],(int)num[2],(int)num[3]); - #endif + #ifdef VERBOSE + printf("%2d: %2d %2d %2d %2d\n", + (int)iter,(int)num[0],(int)num[1],(int)num[2],(int)num[3]); + #endif } int main(int argc,char **argv) { - #ifdef USECMDLINE - if (argc < 2) { - printf("Usage: %s [duration] [disks]\n", argv[0]); - exit(1); - } - else - { - if(argc > 1) duration = atoi(argv[1]); - if(argc > 2) disk = atoi(argv[2]); - } - #endif + #ifdef USECMDLINE + if (argc < 2) { + printf("Usage: %s [duration] [disks]\n", argv[0]); + exit(EXIT_FAILURE); + } + else + { + if(argc > 1) duration = atoi(argv[1]); + if(argc > 2) disk = atoi(argv[2]); + } + #endif - printf("towers of hanoi\ndisks: %d\n\n",disk); + printf("towers of hanoi\ndisks: %d\n\n",disk); - num[1] = disk; + num[1] = disk; - #ifdef VERBOSE - printf("%2d: %2d %2d %2d %2d\n", - (int)iter,(int)num[0],(int)num[1],(int)num[2],(int)num[3]); - #endif + #ifdef VERBOSE + printf("%2d: %2d %2d %2d %2d\n", + (int)iter,(int)num[0],(int)num[1],(int)num[2],(int)num[3]); + #endif - while(num[3]<disk) - { - mov(disk,1,3); - ++iter; - } + while(num[3]<disk) + { + mov(disk,1,3); + ++iter; + } - return 0; + return 0; } diff --git a/test/ref/incr.c b/test/ref/incr.c index adce0e1c0..5e2a78764 100644 --- a/test/ref/incr.c +++ b/test/ref/incr.c @@ -13,39 +13,39 @@ int main(void) } memchar() { - char x, *p; + char x, *p; - &x, &p; - x = *p++; - x = *++p; - x = *p--; - x = *--p; + &x, &p; + x = *p++; + x = *++p; + x = *p--; + x = *--p; } memint() { - int x, *p; + int x, *p; - &x, &p; - x = *p++; - x = *++p; - x = *p--; - x = *--p; + &x, &p; + x = *p++; + x = *++p; + x = *p--; + x = *--p; } regchar() { - register char x, *p; + register char x, *p; - x = *p++; - x = *++p; - x = *p--; - x = *--p; + x = *p++; + x = *++p; + x = *p--; + x = *--p; } regint() { - register int x, *p; + register int x, *p; - x = *p++; - x = *++p; - x = *p--; - x = *--p; + x = *p++; + x = *++p; + x = *p--; + x = *--p; } diff --git a/test/ref/init.c b/test/ref/init.c index 5a5816753..3742446d6 100644 --- a/test/ref/init.c +++ b/test/ref/init.c @@ -1,95 +1,95 @@ -/* - !!DESCRIPTION!! variable initialization - !!ORIGIN!! LCC 4.1 Testsuite - !!LICENCE!! own, freely distributeable for non-profit. read CPYRIGHT.LCC -*/ - -#include "common.h" -/* todo: add back conditional stuff here ! */ - -typedef struct { int codes[3]; char name[6]; } Word; - -#ifdef NO_IMPLICIT_FUNC_PROTOTYPES - -#ifdef NO_OLD_FUNC_DECL -f(); -void g(Word *p); -h(); -#else -f(); -g(); -h(); -#endif - -#endif - -/* -Word words[] = { - 1, 2, 3,"if", - { { 4, 5 }, { 'f', 'o', 'r' } }, - 6, 7, 8, {"else"}, - { { 9, 10, 11,}, 'w', 'h', 'i', 'l', 'e', }, - { 0 }, -}, *wordlist = words; -*/ - -Word words[] = { - {{1, 2, 3},"if"}, - { { 4, 5 }, { 'f', 'o', 'r' } }, - {{6, 7, 8}, "else"}, - { { 9, 10, 11}, {'w', 'h', 'i', 'l', 'e', }}, - {{ 0 }}, -}, *wordlist = words; - -/*int x[][5] = { 1, 2, 3, 4, 0, { 5, 6 }, { 7 } };*/ -int x[][5] = { {1, 2, 3, 4, 0 }, { 5, 6 }, { 7 } }; -int *y[] = { x[0], x[1], x[2], 0 }; - -main() -{ - int i, j; - - for (i = 0; y[i]; i++) { - for (j = 0; y[i][j]; j++) - printf(" %d", y[i][j]); - printf("\n"); - } - f(); - g(wordlist); - return 0; -} - -f() { - static char *keywords[] = {"if", "for", "else", "while", 0, }; - char **p; - - for (p = keywords; *p; p++) - printf("%s\n", *p); -} - -#ifdef NO_OLD_FUNC_DECL -void g(Word *p) -#else -g(p) -Word *p; -#endif -{ - int i; - - for ( ; p->codes[0]; p++) { - for (i = 0; i < sizeof p->codes/sizeof(p->codes[0]); i++) - printf("%d ", p->codes[i]); - printf("%s\n", p->name); - } - h(); -} - -h() -{ - int i; - - for (i = 0; i < sizeof(words)/sizeof(Word); i++) - printf("%d %d %d %s\n", words[i].codes[0], - words[i].codes[1], words[i].codes[2], - &words[i].name[0]); -} +/* + !!DESCRIPTION!! variable initialization + !!ORIGIN!! LCC 4.1 Testsuite + !!LICENCE!! own, freely distributeable for non-profit. read CPYRIGHT.LCC +*/ + +#include "common.h" +/* todo: add back conditional stuff here ! */ + +typedef struct { int codes[3]; char name[6]; } Word; + +#ifdef NO_IMPLICIT_FUNC_PROTOTYPES + +#ifdef NO_OLD_FUNC_DECL +f(); +void g(Word *p); +h(); +#else +f(); +g(); +h(); +#endif + +#endif + +/* +Word words[] = { + 1, 2, 3,"if", + { { 4, 5 }, { 'f', 'o', 'r' } }, + 6, 7, 8, {"else"}, + { { 9, 10, 11,}, 'w', 'h', 'i', 'l', 'e', }, + { 0 }, +}, *wordlist = words; +*/ + +Word words[] = { + {{1, 2, 3},"if"}, + { { 4, 5 }, { 'f', 'o', 'r' } }, + {{6, 7, 8}, "else"}, + { { 9, 10, 11}, {'w', 'h', 'i', 'l', 'e', }}, + {{ 0 }}, +}, *wordlist = words; + +/*int x[][5] = { 1, 2, 3, 4, 0, { 5, 6 }, { 7 } };*/ +int x[][5] = { {1, 2, 3, 4, 0 }, { 5, 6 }, { 7 } }; +int *y[] = { x[0], x[1], x[2], 0 }; + +main() +{ + int i, j; + + for (i = 0; y[i]; i++) { + for (j = 0; y[i][j]; j++) + printf(" %d", y[i][j]); + printf("\n"); + } + f(); + g(wordlist); + return 0; +} + +f() { + static char *keywords[] = {"if", "for", "else", "while", 0, }; + char **p; + + for (p = keywords; *p; p++) + printf("%s\n", *p); +} + +#ifdef NO_OLD_FUNC_DECL +void g(Word *p) +#else +g(p) +Word *p; +#endif +{ + int i; + + for ( ; p->codes[0]; p++) { + for (i = 0; i < sizeof p->codes/sizeof(p->codes[0]); i++) + printf("%d ", p->codes[i]); + printf("%s\n", p->name); + } + h(); +} + +h() +{ + int i; + + for (i = 0; i < sizeof(words)/sizeof(Word); i++) + printf("%d %d %d %s\n", words[i].codes[0], + words[i].codes[1], words[i].codes[2], + &words[i].name[0]); +} diff --git a/test/ref/macro.c b/test/ref/macro.c index 1650b98db..c1346b939 100644 --- a/test/ref/macro.c +++ b/test/ref/macro.c @@ -14,17 +14,17 @@ unsigned long a=3; unsigned long _func(unsigned long x,unsigned long y) { - printf("x:%ld y:%ld\n",x,y); - return 0; + printf("x:%ld y:%ld\n",x,y); + return 0; } -#define func(x,y) _func(x,y) +#define func(x,y) _func(x,y) int main(void) { - fs= func( (fd/a) , func(2,0x0082c90f) ); - printf("fs:%ld\n",fs); - fs=_func( (fd/a) , _func(2,0x0082c90f) ); - printf("fs:%ld\n",fs); - return 0; + fs= func( (fd/a) , func(2,0x0082c90f) ); + printf("fs:%ld\n",fs); + fs=_func( (fd/a) , _func(2,0x0082c90f) ); + printf("fs:%ld\n",fs); + return 0; } diff --git a/test/ref/otccex.c b/test/ref/otccex.c index aa5df158f..12a8b9bfc 100644 --- a/test/ref/otccex.c +++ b/test/ref/otccex.c @@ -8,31 +8,31 @@ /* * Sample OTCC C example. You can uncomment the first line and install - * otcc in /usr/local/bin to make otcc scripts ! + * otcc in /usr/local/bin to make otcc scripts ! */ /* Any preprocessor directive except #define are ignored. We put this include so that a standard C compiler can compile this code too. */ #include <stdio.h> -#include <limits.h> /* defines are handled, but macro arguments cannot be given. No recursive defines are tolerated */ #define DEFAULT_BASE 10 #ifdef NO_IMPLICIT_FUNC_PROTOTYPES -help(char *name); +void help(char *name); #endif /* - * Only old style K&R prototypes are parsed. Only int arguments are + * Only old-style K&R prototypes are parsed. Only int arguments are * allowed (implicit types). - * + * * By benchmarking the execution time of this function (for example * for fib(35)), you'll notice that OTCC is quite fast because it - * generates native i386 machine code. + * generates native i386 machine code. */ -fib(n) +int fib(n) + int n; { printf("[fib(%d)]", n); if (n <= 2) @@ -42,12 +42,14 @@ fib(n) } /* Identifiers are parsed the same way as C: begins with letter or - '_', and then letters, '_' or digits */ + '_', and then letters, '_', or digits. */ long fact(n) + int n; { /* local variables can be declared. Only 'int' type is supported */ int i; long r; + r = 1; /* 'while' and 'for' loops are supported */ for(i=2;i<=n;i++) @@ -56,13 +58,15 @@ long fact(n) } /* Well, we could use printf, but it would be too easy */ -print_num(long n,int b) +void print_num(n, b) + long n; int b; { - int tab, p, c; - /* Numbers can be entered in decimal, hexadecimal ('0x' prefix) and - octal ('0' prefix) */ - /* more complex programs use malloc */ - tab = malloc(0x100); + char *tab, *p, c; + + /* Numbers can be entered in decimal, hexadecimal ('0x' prefix), and + octal ('0' prefix). */ + /* More complex programs use malloc(). */ + tab = malloc(0x100); p = tab; while (1) { c = n % b; @@ -71,7 +75,7 @@ print_num(long n,int b) c = c + 'a' - 10; else c = c + '0'; - *(char *)p = c; + *p = c; p++; n = n / b; /* 'break' is supported */ @@ -80,29 +84,30 @@ print_num(long n,int b) } while (p != tab) { p--; - printf("%c", *(char *)p); + printf("%c", *p); } free(tab); } /* 'main' takes standard 'argc' and 'argv' parameters */ -mymain(int argc,char **argv) +int mymain(argc, argv) + int argc; char **argv; { - /* no local name space is supported, but local variables ARE + /* No local name space is supported, but local variables ARE supported. As long as you do not use a globally defined - variable name as local variable (which is a bad habbit), you - won't have any problem */ - int s, n, f, base; - - + variable name as a local variable (which is a bad habit), you + won't have any problems. */ + size_t s, f; + int n, base; + /* && and || operator have the same semantics as C (left to right evaluation and early exit) */ if (argc != 2 && argc != 3) { /* '*' operator is supported with explicit casting to 'int *', - 'char *' or 'int (*)()' (function pointer). Of course, 'int' - are supposed to be used as pointers too. */ - s = *(int *)argv; - help(s); + 'char *', or 'int (*)()' (function pointer). Of course, 'int' + are supposed to be used as pointers, too. */ + s = *(size_t *)argv; + help((char *)s); return 1; } /* Any libc function can be used because OTCC uses dynamic linking */ @@ -125,15 +130,15 @@ mymain(int argc,char **argv) printf("Overflow"); } else { /* why not using a function pointer ? */ - f = &fact; - print_num((*(long (*)(int))f)(n), base); + f = (size_t)&fact; + print_num((*(long (*)())f)(n), base); } printf("\n"); return 0; } /* functions can be used before being defined */ -help(char *name) +void help(char *name) { printf("usage: %s n [base]\n", name); printf("Compute fib(n) and fact(n) and output the result in base 'base'\n"); @@ -142,9 +147,9 @@ help(char *name) int main(void) { char *argv[3]; - argv[0]=""; + + argv[0]="otccex"; argv[1]="10"; /* n */ argv[2]="8"; /* base */ - mymain(3, argv); - return 0; -} \ No newline at end of file + return mymain(3, argv); +} diff --git a/test/ref/paranoia.c b/test/ref/paranoia.c index e9a47dd71..1021264a5 100644 --- a/test/ref/paranoia.c +++ b/test/ref/paranoia.c @@ -18,39 +18,39 @@ main() #undef V9 #define NOPAUSE -/* A C version of Kahan's Floating Point Test "Paranoia" +/* A C version of Kahan's Floating Point Test "Paranoia" - Thos Sumner, UCSF, Feb. 1985 - David Gay, BTL, Jan. 1986 + Thos Sumner, UCSF, Feb. 1985 + David Gay, BTL, Jan. 1986 - This is a rewrite from the Pascal version by + This is a rewrite from the Pascal version by - B. A. Wichmann, 18 Jan. 1985 + B. A. Wichmann, 18 Jan. 1985 - (and does NOT exhibit good C programming style). + (and does NOT exhibit good C programming style). (C) Apr 19 1983 in BASIC version by: - Professor W. M. Kahan, - 567 Evans Hall - Electrical Engineering & Computer Science Dept. - University of California - Berkeley, California 94720 - USA + Professor W. M. Kahan, + 567 Evans Hall + Electrical Engineering & Computer Science Dept. + University of California + Berkeley, California 94720 + USA converted to Pascal by: - B. A. Wichmann - National Physical Laboratory - Teddington Middx - TW11 OLW - UK + B. A. Wichmann + National Physical Laboratory + Teddington Middx + TW11 OLW + UK converted to C by: - David M. Gay and Thos Sumner - AT&T Bell Labs Computer Center, Rm. U-76 - 600 Mountain Avenue University of California - Murray Hill, NJ 07974 San Francisco, CA 94143 - USA USA + David M. Gay and Thos Sumner + AT&T Bell Labs Computer Center, Rm. U-76 + 600 Mountain Avenue University of California + Murray Hill, NJ 07974 San Francisco, CA 94143 + USA USA with simultaneous corrections to the Pascal source (reflected in the Pascal source available over netlib). @@ -282,11 +282,11 @@ int NoTrials = 20; /*Number of tests for commutativity. */ #define True 1 /* Definitions for declared types - Guard == (Yes, No); - Rounding == (Chopped, Rounded, Other); - Message == packed array [1..40] of char; - Class == (Flaw, Defect, Serious, Failure); - */ + Guard == (Yes, No); + Rounding == (Chopped, Rounded, Other); + Message == packed array [1..40] of char; + Class == (Flaw, Defect, Serious, Failure); + */ #define Yes 1 #define No 0 #define Chopped 2 @@ -331,7 +331,7 @@ int M, N, N1; Guard GMult, GDiv, GAddSub; Rounding RMult, RDiv, RAddSub, RSqrt; int Break, Done, NotMonot, Monot, Anomaly, IEEE, - SqRWrng, UfNGrad; + SqRWrng, UfNGrad; /* Computed constants. */ /*U1 gap below 1.0, i.e, 1.0-U1 is next number below 1.0 */ /*U2 gap above 1.0, i.e, 1.0+U2 is next number above 1.0 */ @@ -340,1518 +340,1518 @@ int Break, Done, NotMonot, Monot, Anomaly, IEEE, void sigfpe(i) { - fpecount++; - printf("\n* * * FLOATING-POINT ERROR * * *\n"); - fflush(stdout); - if (sigsave) { + fpecount++; + printf("\n* * * FLOATING-POINT ERROR * * *\n"); + fflush(stdout); + if (sigsave) { #ifndef NOSIGNAL - signal(SIGFPE, sigsave); + signal(SIGFPE, sigsave); #endif - sigsave = 0; - longjmp(ovfl_buf, 1); - } - abort(); + sigsave = 0; + longjmp(ovfl_buf, 1); + } + abort(); } main() { #ifdef mc - char *out; - ieee_flags("set", "precision", "double", &out); + char *out; + ieee_flags("set", "precision", "double", &out); #endif - /* First two assignments use integer right-hand sides. */ - Zero = 0; - One = 1; - Two = One + One; - Three = Two + One; - Four = Three + One; - Five = Four + One; - Eight = Four + Four; - Nine = Three * Three; - TwentySeven = Nine * Three; - ThirtyTwo = Four * Eight; - TwoForty = Four * Five * Three * Four; - MinusOne = -One; - Half = One / Two; - OneAndHalf = One + Half; - ErrCnt[Failure] = 0; - ErrCnt[Serious] = 0; - ErrCnt[Defect] = 0; - ErrCnt[Flaw] = 0; - PageNo = 1; - /*=============================================*/ - Milestone = 0; - /*=============================================*/ + /* First two assignments use integer right-hand sides. */ + Zero = 0; + One = 1; + Two = One + One; + Three = Two + One; + Four = Three + One; + Five = Four + One; + Eight = Four + Four; + Nine = Three * Three; + TwentySeven = Nine * Three; + ThirtyTwo = Four * Eight; + TwoForty = Four * Five * Three * Four; + MinusOne = -One; + Half = One / Two; + OneAndHalf = One + Half; + ErrCnt[Failure] = 0; + ErrCnt[Serious] = 0; + ErrCnt[Defect] = 0; + ErrCnt[Flaw] = 0; + PageNo = 1; + /*=============================================*/ + Milestone = 0; + /*=============================================*/ #ifndef NOSIGNAL - signal(SIGFPE, sigfpe); + signal(SIGFPE, sigfpe); #endif - Instructions(); - Pause(); - Heading(); - Pause(); - Characteristics(); - Pause(); - History(); - Pause(); - /*=============================================*/ - Milestone = 7; - /*=============================================*/ - printf("Program is now RUNNING tests on small integers:\n"); + Instructions(); + Pause(); + Heading(); + Pause(); + Characteristics(); + Pause(); + History(); + Pause(); + /*=============================================*/ + Milestone = 7; + /*=============================================*/ + printf("Program is now RUNNING tests on small integers:\n"); - TstCond (Failure, (Zero + Zero == Zero) && (One - One == Zero) - && (One > Zero) && (One + One == Two), - "0+0 != 0, 1-1 != 0, 1 <= 0, or 1+1 != 2"); - Z = - Zero; - if (Z != 0.0) { - ErrCnt[Failure] = ErrCnt[Failure] + 1; - printf("Comparison alleges that -0.0 is Non-zero!\n"); - U1 = 0.001; - Radix = 1; - TstPtUf(); - } - TstCond (Failure, (Three == Two + One) && (Four == Three + One) - && (Four + Two * (- Two) == Zero) - && (Four - Three - One == Zero), - "3 != 2+1, 4 != 3+1, 4+2*(-2) != 0, or 4-3-1 != 0"); - TstCond (Failure, (MinusOne == (0 - One)) - && (MinusOne + One == Zero ) && (One + MinusOne == Zero) - && (MinusOne + FABS(One) == Zero) - && (MinusOne + MinusOne * MinusOne == Zero), - "-1+1 != 0, (-1)+abs(1) != 0, or -1+(-1)*(-1) != 0"); - TstCond (Failure, Half + MinusOne + Half == Zero, - "1/2 + (-1) + 1/2 != 0"); - /*=============================================*/ - /*SPLIT - part2(); - part3(); - part4(); - part5(); - part6(); - part7(); - part8(); - } + TstCond (Failure, (Zero + Zero == Zero) && (One - One == Zero) + && (One > Zero) && (One + One == Two), + "0+0 != 0, 1-1 != 0, 1 <= 0, or 1+1 != 2"); + Z = - Zero; + if (Z != 0.0) { + ErrCnt[Failure] = ErrCnt[Failure] + 1; + printf("Comparison alleges that -0.0 is Non-zero!\n"); + U1 = 0.001; + Radix = 1; + TstPtUf(); + } + TstCond (Failure, (Three == Two + One) && (Four == Three + One) + && (Four + Two * (- Two) == Zero) + && (Four - Three - One == Zero), + "3 != 2+1, 4 != 3+1, 4+2*(-2) != 0, or 4-3-1 != 0"); + TstCond (Failure, (MinusOne == (0 - One)) + && (MinusOne + One == Zero ) && (One + MinusOne == Zero) + && (MinusOne + FABS(One) == Zero) + && (MinusOne + MinusOne * MinusOne == Zero), + "-1+1 != 0, (-1)+abs(1) != 0, or -1+(-1)*(-1) != 0"); + TstCond (Failure, Half + MinusOne + Half == Zero, + "1/2 + (-1) + 1/2 != 0"); + /*=============================================*/ + /*SPLIT + part2(); + part3(); + part4(); + part5(); + part6(); + part7(); + part8(); + } #include "paranoia.h" part2(){ */ - Milestone = 10; - /*=============================================*/ - TstCond (Failure, (Nine == Three * Three) - && (TwentySeven == Nine * Three) && (Eight == Four + Four) - && (ThirtyTwo == Eight * Four) - && (ThirtyTwo - TwentySeven - Four - One == Zero), - "9 != 3*3, 27 != 9*3, 32 != 8*4, or 32-27-4-1 != 0"); - TstCond (Failure, (Five == Four + One) && - (TwoForty == Four * Five * Three * Four) - && (TwoForty / Three - Four * Four * Five == Zero) - && ( TwoForty / Four - Five * Three * Four == Zero) - && ( TwoForty / Five - Four * Three * Four == Zero), - "5 != 4+1, 240/3 != 80, 240/4 != 60, or 240/5 != 48"); - if (ErrCnt[Failure] == 0) { - printf("-1, 0, 1/2, 1, 2, 3, 4, 5, 9, 27, 32 & 240 are O.K.\n"); - printf("\n"); - } - printf("Searching for Radix and Precision.\n"); - W = One; - do { - W = W + W; - Y = W + One; - Z = Y - W; - Y = Z - One; - } while (MinusOne + FABS(Y) < Zero); - /*.. now W is just big enough that |((W+1)-W)-1| >= 1 ...*/ - Precision = Zero; - Y = One; - do { - Radix = W + Y; - Y = Y + Y; - Radix = Radix - W; - } while ( Radix == Zero); - if (Radix < Two) Radix = One; - printf("Radix = %f .\n", Radix); - if (Radix != 1) { - W = One; - do { - Precision = Precision + One; - W = W * Radix; - Y = W + One; - } while ((Y - W) == One); - } - /*... now W == Radix^Precision is barely too big to satisfy (W+1)-W == 1 - ...*/ - U1 = One / W; - U2 = Radix * U1; - printf("Closest relative separation found is U1 = %.7e .\n\n", U1); - printf("Recalculating radix and precision\n "); + Milestone = 10; + /*=============================================*/ + TstCond (Failure, (Nine == Three * Three) + && (TwentySeven == Nine * Three) && (Eight == Four + Four) + && (ThirtyTwo == Eight * Four) + && (ThirtyTwo - TwentySeven - Four - One == Zero), + "9 != 3*3, 27 != 9*3, 32 != 8*4, or 32-27-4-1 != 0"); + TstCond (Failure, (Five == Four + One) && + (TwoForty == Four * Five * Three * Four) + && (TwoForty / Three - Four * Four * Five == Zero) + && ( TwoForty / Four - Five * Three * Four == Zero) + && ( TwoForty / Five - Four * Three * Four == Zero), + "5 != 4+1, 240/3 != 80, 240/4 != 60, or 240/5 != 48"); + if (ErrCnt[Failure] == 0) { + printf("-1, 0, 1/2, 1, 2, 3, 4, 5, 9, 27, 32 & 240 are O.K.\n"); + printf("\n"); + } + printf("Searching for Radix and Precision.\n"); + W = One; + do { + W = W + W; + Y = W + One; + Z = Y - W; + Y = Z - One; + } while (MinusOne + FABS(Y) < Zero); + /*.. now W is just big enough that |((W+1)-W)-1| >= 1 ...*/ + Precision = Zero; + Y = One; + do { + Radix = W + Y; + Y = Y + Y; + Radix = Radix - W; + } while ( Radix == Zero); + if (Radix < Two) Radix = One; + printf("Radix = %f .\n", Radix); + if (Radix != 1) { + W = One; + do { + Precision = Precision + One; + W = W * Radix; + Y = W + One; + } while ((Y - W) == One); + } + /*... now W == Radix^Precision is barely too big to satisfy (W+1)-W == 1 + ...*/ + U1 = One / W; + U2 = Radix * U1; + printf("Closest relative separation found is U1 = %.7e .\n\n", U1); + printf("Recalculating radix and precision\n "); - /*save old values*/ - E0 = Radix; - E1 = U1; - E9 = U2; - E3 = Precision; + /*save old values*/ + E0 = Radix; + E1 = U1; + E9 = U2; + E3 = Precision; - X = Four / Three; - Third = X - One; - F6 = Half - Third; - X = F6 + F6; - X = FABS(X - Third); - if (X < U2) X = U2; + X = Four / Three; + Third = X - One; + F6 = Half - Third; + X = F6 + F6; + X = FABS(X - Third); + if (X < U2) X = U2; - /*... now X = (unknown no.) ulps of 1+...*/ - do { - U2 = X; - Y = Half * U2 + ThirtyTwo * U2 * U2; - Y = One + Y; - X = Y - One; - } while ( ! ((U2 <= X) || (X <= Zero))); + /*... now X = (unknown no.) ulps of 1+...*/ + do { + U2 = X; + Y = Half * U2 + ThirtyTwo * U2 * U2; + Y = One + Y; + X = Y - One; + } while ( ! ((U2 <= X) || (X <= Zero))); - /*... now U2 == 1 ulp of 1 + ... */ - X = Two / Three; - F6 = X - Half; - Third = F6 + F6; - X = Third - Half; - X = FABS(X + F6); - if (X < U1) X = U1; + /*... now U2 == 1 ulp of 1 + ... */ + X = Two / Three; + F6 = X - Half; + Third = F6 + F6; + X = Third - Half; + X = FABS(X + F6); + if (X < U1) X = U1; - /*... now X == (unknown no.) ulps of 1 -... */ - do { - U1 = X; - Y = Half * U1 + ThirtyTwo * U1 * U1; - Y = Half - Y; - X = Half + Y; - Y = Half - X; - X = Half + Y; - } while ( ! ((U1 <= X) || (X <= Zero))); - /*... now U1 == 1 ulp of 1 - ... */ - if (U1 == E1) printf("confirms closest relative separation U1 .\n"); - else printf("gets better closest relative separation U1 = %.7e .\n", U1); - W = One / U1; - F9 = (Half - U1) + Half; - Radix = FLOOR(0.01 + U2 / U1); - if (Radix == E0) printf("Radix confirmed.\n"); - else printf("MYSTERY: recalculated Radix = %.7e .\n", Radix); - TstCond (Defect, Radix <= Eight + Eight, - "Radix is too big: roundoff problems"); - TstCond (Flaw, (Radix == Two) || (Radix == 10) - || (Radix == One), "Radix is not as good as 2 or 10"); - /*=============================================*/ - Milestone = 20; - /*=============================================*/ - TstCond (Failure, F9 - Half < Half, - "(1-U1)-1/2 < 1/2 is FALSE, prog. fails?"); - X = F9; - I = 1; - Y = X - Half; - Z = Y - Half; - TstCond (Failure, (X != One) - || (Z == Zero), "Comparison is fuzzy,X=1 but X-1/2-1/2 != 0"); - X = One + U2; - I = 0; - /*=============================================*/ - Milestone = 25; - /*=============================================*/ - /*... BMinusU2 = nextafter(Radix, 0) */ - BMinusU2 = Radix - One; - BMinusU2 = (BMinusU2 - U2) + One; - /* Purify Integers */ - if (Radix != One) { - X = - TwoForty * LOG(U1) / LOG(Radix); - Y = FLOOR(Half + X); - if (FABS(X - Y) * Four < One) X = Y; - Precision = X / TwoForty; - Y = FLOOR(Half + Precision); - if (FABS(Precision - Y) * TwoForty < Half) Precision = Y; - } - if ((Precision != FLOOR(Precision)) || (Radix == One)) { - printf("Precision cannot be characterized by an Integer number\n"); - printf("of significant digits but, by itself, this is a minor flaw.\n"); - } - if (Radix == One) - printf("logarithmic encoding has precision characterized solely by U1.\n"); - else printf("The number of significant digits of the Radix is %f .\n", - Precision); - TstCond (Serious, U2 * Nine * Nine * TwoForty < One, - "Precision worse than 5 decimal figures "); - /*=============================================*/ - Milestone = 30; - /*=============================================*/ - /* Test for extra-precise subepressions */ - X = FABS(((Four / Three - One) - One / Four) * Three - One / Four); - do { - Z2 = X; - X = (One + (Half * Z2 + ThirtyTwo * Z2 * Z2)) - One; - } while ( ! ((Z2 <= X) || (X <= Zero))); - X = Y = Z = FABS((Three / Four - Two / Three) * Three - One / Four); - do { - Z1 = Z; - Z = (One / Two - ((One / Two - (Half * Z1 + ThirtyTwo * Z1 * Z1)) - + One / Two)) + One / Two; - } while ( ! ((Z1 <= Z) || (Z <= Zero))); - do { - do { - Y1 = Y; - Y = (Half - ((Half - (Half * Y1 + ThirtyTwo * Y1 * Y1)) + Half - )) + Half; - } while ( ! ((Y1 <= Y) || (Y <= Zero))); - X1 = X; - X = ((Half * X1 + ThirtyTwo * X1 * X1) - F9) + F9; - } while ( ! ((X1 <= X) || (X <= Zero))); - if ((X1 != Y1) || (X1 != Z1)) { - BadCond(Serious, "Disagreements among the values X1, Y1, Z1,\n"); - printf("respectively %.7e, %.7e, %.7e,\n", X1, Y1, Z1); - printf("are symptoms of inconsistencies introduced\n"); - printf("by extra-precise evaluation of arithmetic subexpressions.\n"); - notify("Possibly some part of this"); - if ((X1 == U1) || (Y1 == U1) || (Z1 == U1)) printf( - "That feature is not tested further by this program.\n") ; - } - else { - if ((Z1 != U1) || (Z2 != U2)) { - if ((Z1 >= U1) || (Z2 >= U2)) { - BadCond(Failure, ""); - notify("Precision"); - printf("\tU1 = %.7e, Z1 - U1 = %.7e\n",U1,Z1-U1); - printf("\tU2 = %.7e, Z2 - U2 = %.7e\n",U2,Z2-U2); - } - else { - if ((Z1 <= Zero) || (Z2 <= Zero)) { - printf("Because of unusual Radix = %f", Radix); - printf(", or exact rational arithmetic a result\n"); - printf("Z1 = %.7e, or Z2 = %.7e ", Z1, Z2); - notify("of an\nextra-precision"); - } - if (Z1 != Z2 || Z1 > Zero) { - X = Z1 / U1; - Y = Z2 / U2; - if (Y > X) X = Y; - Q = - LOG(X); - printf("Some subexpressions appear to be calculated extra\n"); - printf("precisely with about %g extra B-digits, i.e.\n", - (Q / LOG(Radix))); - printf("roughly %g extra significant decimals.\n", - Q / LOG(10.)); - } - printf("That feature is not tested further by this program.\n"); - } - } - } - Pause(); - /*=============================================*/ - /*SPLIT - } + /*... now X == (unknown no.) ulps of 1 -... */ + do { + U1 = X; + Y = Half * U1 + ThirtyTwo * U1 * U1; + Y = Half - Y; + X = Half + Y; + Y = Half - X; + X = Half + Y; + } while ( ! ((U1 <= X) || (X <= Zero))); + /*... now U1 == 1 ulp of 1 - ... */ + if (U1 == E1) printf("confirms closest relative separation U1 .\n"); + else printf("gets better closest relative separation U1 = %.7e .\n", U1); + W = One / U1; + F9 = (Half - U1) + Half; + Radix = FLOOR(0.01 + U2 / U1); + if (Radix == E0) printf("Radix confirmed.\n"); + else printf("MYSTERY: recalculated Radix = %.7e .\n", Radix); + TstCond (Defect, Radix <= Eight + Eight, + "Radix is too big: roundoff problems"); + TstCond (Flaw, (Radix == Two) || (Radix == 10) + || (Radix == One), "Radix is not as good as 2 or 10"); + /*=============================================*/ + Milestone = 20; + /*=============================================*/ + TstCond (Failure, F9 - Half < Half, + "(1-U1)-1/2 < 1/2 is FALSE, prog. fails?"); + X = F9; + I = 1; + Y = X - Half; + Z = Y - Half; + TstCond (Failure, (X != One) + || (Z == Zero), "Comparison is fuzzy,X=1 but X-1/2-1/2 != 0"); + X = One + U2; + I = 0; + /*=============================================*/ + Milestone = 25; + /*=============================================*/ + /*... BMinusU2 = nextafter(Radix, 0) */ + BMinusU2 = Radix - One; + BMinusU2 = (BMinusU2 - U2) + One; + /* Purify Integers */ + if (Radix != One) { + X = - TwoForty * LOG(U1) / LOG(Radix); + Y = FLOOR(Half + X); + if (FABS(X - Y) * Four < One) X = Y; + Precision = X / TwoForty; + Y = FLOOR(Half + Precision); + if (FABS(Precision - Y) * TwoForty < Half) Precision = Y; + } + if ((Precision != FLOOR(Precision)) || (Radix == One)) { + printf("Precision cannot be characterized by an Integer number\n"); + printf("of significant digits but, by itself, this is a minor flaw.\n"); + } + if (Radix == One) + printf("logarithmic encoding has precision characterized solely by U1.\n"); + else printf("The number of significant digits of the Radix is %f .\n", + Precision); + TstCond (Serious, U2 * Nine * Nine * TwoForty < One, + "Precision worse than 5 decimal figures "); + /*=============================================*/ + Milestone = 30; + /*=============================================*/ + /* Test for extra-precise subepressions */ + X = FABS(((Four / Three - One) - One / Four) * Three - One / Four); + do { + Z2 = X; + X = (One + (Half * Z2 + ThirtyTwo * Z2 * Z2)) - One; + } while ( ! ((Z2 <= X) || (X <= Zero))); + X = Y = Z = FABS((Three / Four - Two / Three) * Three - One / Four); + do { + Z1 = Z; + Z = (One / Two - ((One / Two - (Half * Z1 + ThirtyTwo * Z1 * Z1)) + + One / Two)) + One / Two; + } while ( ! ((Z1 <= Z) || (Z <= Zero))); + do { + do { + Y1 = Y; + Y = (Half - ((Half - (Half * Y1 + ThirtyTwo * Y1 * Y1)) + Half + )) + Half; + } while ( ! ((Y1 <= Y) || (Y <= Zero))); + X1 = X; + X = ((Half * X1 + ThirtyTwo * X1 * X1) - F9) + F9; + } while ( ! ((X1 <= X) || (X <= Zero))); + if ((X1 != Y1) || (X1 != Z1)) { + BadCond(Serious, "Disagreements among the values X1, Y1, Z1,\n"); + printf("respectively %.7e, %.7e, %.7e,\n", X1, Y1, Z1); + printf("are symptoms of inconsistencies introduced\n"); + printf("by extra-precise evaluation of arithmetic subexpressions.\n"); + notify("Possibly some part of this"); + if ((X1 == U1) || (Y1 == U1) || (Z1 == U1)) printf( + "That feature is not tested further by this program.\n") ; + } + else { + if ((Z1 != U1) || (Z2 != U2)) { + if ((Z1 >= U1) || (Z2 >= U2)) { + BadCond(Failure, ""); + notify("Precision"); + printf("\tU1 = %.7e, Z1 - U1 = %.7e\n",U1,Z1-U1); + printf("\tU2 = %.7e, Z2 - U2 = %.7e\n",U2,Z2-U2); + } + else { + if ((Z1 <= Zero) || (Z2 <= Zero)) { + printf("Because of unusual Radix = %f", Radix); + printf(", or exact rational arithmetic a result\n"); + printf("Z1 = %.7e, or Z2 = %.7e ", Z1, Z2); + notify("of an\nextra-precision"); + } + if (Z1 != Z2 || Z1 > Zero) { + X = Z1 / U1; + Y = Z2 / U2; + if (Y > X) X = Y; + Q = - LOG(X); + printf("Some subexpressions appear to be calculated extra\n"); + printf("precisely with about %g extra B-digits, i.e.\n", + (Q / LOG(Radix))); + printf("roughly %g extra significant decimals.\n", + Q / LOG(10.)); + } + printf("That feature is not tested further by this program.\n"); + } + } + } + Pause(); + /*=============================================*/ + /*SPLIT + } #include "paranoia.h" part3(){ */ - Milestone = 35; - /*=============================================*/ - if (Radix >= Two) { - X = W / (Radix * Radix); - Y = X + One; - Z = Y - X; - T = Z + U2; - X = T - Z; - TstCond (Failure, X == U2, - "Subtraction is not normalized X=Y,X+Z != Y+Z!"); - if (X == U2) printf( - "Subtraction appears to be normalized, as it should be."); - } - printf("\nChecking for guard digit in *, /, and -.\n"); - Y = F9 * One; - Z = One * F9; - X = F9 - Half; - Y = (Y - Half) - X; - Z = (Z - Half) - X; - X = One + U2; - T = X * Radix; - R = Radix * X; - X = T - Radix; - X = X - Radix * U2; - T = R - Radix; - T = T - Radix * U2; - X = X * (Radix - One); - T = T * (Radix - One); - if ((X == Zero) && (Y == Zero) && (Z == Zero) && (T == Zero)) GMult = Yes; - else { - GMult = No; - TstCond (Serious, False, - "* lacks a Guard Digit, so 1*X != X"); - } - Z = Radix * U2; - X = One + Z; - Y = FABS((X + Z) - X * X) - U2; - X = One - U2; - Z = FABS((X - U2) - X * X) - U1; - TstCond (Failure, (Y <= Zero) - && (Z <= Zero), "* gets too many final digits wrong.\n"); - Y = One - U2; - X = One + U2; - Z = One / Y; - Y = Z - X; - X = One / Three; - Z = Three / Nine; - X = X - Z; - T = Nine / TwentySeven; - Z = Z - T; - TstCond(Defect, X == Zero && Y == Zero && Z == Zero, - "Division lacks a Guard Digit, so error can exceed 1 ulp\nor 1/3 and 3/9 and 9/27 may disagree"); - Y = F9 / One; - X = F9 - Half; - Y = (Y - Half) - X; - X = One + U2; - T = X / One; - X = T - X; - if ((X == Zero) && (Y == Zero) && (Z == Zero)) GDiv = Yes; - else { - GDiv = No; - TstCond (Serious, False, - "Division lacks a Guard Digit, so X/1 != X"); - } - X = One / (One + U2); - Y = X - Half - Half; - TstCond (Serious, Y < Zero, - "Computed value of 1/1.000..1 >= 1"); - X = One - U2; - Y = One + Radix * U2; - Z = X * Radix; - T = Y * Radix; - R = Z / Radix; - StickyBit = T / Radix; - X = R - X; - Y = StickyBit - Y; - TstCond (Failure, X == Zero && Y == Zero, - "* and/or / gets too many last digits wrong"); - Y = One - U1; - X = One - F9; - Y = One - Y; - T = Radix - U2; - Z = Radix - BMinusU2; - T = Radix - T; - if ((X == U1) && (Y == U1) && (Z == U2) && (T == U2)) GAddSub = Yes; - else { - GAddSub = No; - TstCond (Serious, False, - "- lacks Guard Digit, so cancellation is obscured"); - } - if (F9 != One && F9 - One >= Zero) { - BadCond(Serious, "comparison alleges (1-U1) < 1 although\n"); - printf(" subtraction yields (1-U1) - 1 = 0 , thereby vitiating\n"); - printf(" such precautions against division by zero as\n"); - printf(" ... if (X == 1.0) {.....} else {.../(X-1.0)...}\n"); - } - if (GMult == Yes && GDiv == Yes && GAddSub == Yes) printf( - " *, /, and - appear to have guard digits, as they should.\n"); - /*=============================================*/ - Milestone = 40; - /*=============================================*/ - Pause(); - printf("Checking rounding on multiply, divide and add/subtract.\n"); - RMult = Other; - RDiv = Other; - RAddSub = Other; - RadixD2 = Radix / Two; - A1 = Two; - Done = False; - do { - AInvrse = Radix; - do { - X = AInvrse; - AInvrse = AInvrse / A1; - } while ( ! (FLOOR(AInvrse) != AInvrse)); - Done = (X == One) || (A1 > Three); - if (! Done) A1 = Nine + One; - } while ( ! (Done)); - if (X == One) A1 = Radix; - AInvrse = One / A1; - X = A1; - Y = AInvrse; - Done = False; - do { - Z = X * Y - Half; - TstCond (Failure, Z == Half, - "X * (1/X) differs from 1"); - Done = X == Radix; - X = Radix; - Y = One / X; - } while ( ! (Done)); - Y2 = One + U2; - Y1 = One - U2; - X = OneAndHalf - U2; - Y = OneAndHalf + U2; - Z = (X - U2) * Y2; - T = Y * Y1; - Z = Z - X; - T = T - X; - X = X * Y2; - Y = (Y + U2) * Y1; - X = X - OneAndHalf; - Y = Y - OneAndHalf; - if ((X == Zero) && (Y == Zero) && (Z == Zero) && (T <= Zero)) { - X = (OneAndHalf + U2) * Y2; - Y = OneAndHalf - U2 - U2; - Z = OneAndHalf + U2 + U2; - T = (OneAndHalf - U2) * Y1; - X = X - (Z + U2); - StickyBit = Y * Y1; - S = Z * Y2; - T = T - Y; - Y = (U2 - Y) + StickyBit; - Z = S - (Z + U2 + U2); - StickyBit = (Y2 + U2) * Y1; - Y1 = Y2 * Y1; - StickyBit = StickyBit - Y2; - Y1 = Y1 - Half; - if ((X == Zero) && (Y == Zero) && (Z == Zero) && (T == Zero) - && ( StickyBit == Zero) && (Y1 == Half)) { - RMult = Rounded; - printf("Multiplication appears to round correctly.\n"); - } - else if ((X + U2 == Zero) && (Y < Zero) && (Z + U2 == Zero) - && (T < Zero) && (StickyBit + U2 == Zero) - && (Y1 < Half)) { - RMult = Chopped; - printf("Multiplication appears to chop.\n"); - } - else printf("* is neither chopped nor correctly rounded.\n"); - if ((RMult == Rounded) && (GMult == No)) notify("Multiplication"); - } - else printf("* is neither chopped nor correctly rounded.\n"); - /*=============================================*/ - Milestone = 45; - /*=============================================*/ - Y2 = One + U2; - Y1 = One - U2; - Z = OneAndHalf + U2 + U2; - X = Z / Y2; - T = OneAndHalf - U2 - U2; - Y = (T - U2) / Y1; - Z = (Z + U2) / Y2; - X = X - OneAndHalf; - Y = Y - T; - T = T / Y1; - Z = Z - (OneAndHalf + U2); - T = (U2 - OneAndHalf) + T; - if (! ((X > Zero) || (Y > Zero) || (Z > Zero) || (T > Zero))) { - X = OneAndHalf / Y2; - Y = OneAndHalf - U2; - Z = OneAndHalf + U2; - X = X - Y; - T = OneAndHalf / Y1; - Y = Y / Y1; - T = T - (Z + U2); - Y = Y - Z; - Z = Z / Y2; - Y1 = (Y2 + U2) / Y2; - Z = Z - OneAndHalf; - Y2 = Y1 - Y2; - Y1 = (F9 - U1) / F9; - if ((X == Zero) && (Y == Zero) && (Z == Zero) && (T == Zero) - && (Y2 == Zero) && (Y2 == Zero) - && (Y1 - Half == F9 - Half )) { - RDiv = Rounded; - printf("Division appears to round correctly.\n"); - if (GDiv == No) notify("Division"); - } - else if ((X < Zero) && (Y < Zero) && (Z < Zero) && (T < Zero) - && (Y2 < Zero) && (Y1 - Half < F9 - Half)) { - RDiv = Chopped; - printf("Division appears to chop.\n"); - } - } - if (RDiv == Other) printf("/ is neither chopped nor correctly rounded.\n"); - BInvrse = One / Radix; - TstCond (Failure, (BInvrse * Radix - Half == Half), - "Radix * ( 1 / Radix ) differs from 1"); - /*=============================================*/ - /*SPLIT - } + Milestone = 35; + /*=============================================*/ + if (Radix >= Two) { + X = W / (Radix * Radix); + Y = X + One; + Z = Y - X; + T = Z + U2; + X = T - Z; + TstCond (Failure, X == U2, + "Subtraction is not normalized X=Y,X+Z != Y+Z!"); + if (X == U2) printf( + "Subtraction appears to be normalized, as it should be."); + } + printf("\nChecking for guard digit in *, /, and -.\n"); + Y = F9 * One; + Z = One * F9; + X = F9 - Half; + Y = (Y - Half) - X; + Z = (Z - Half) - X; + X = One + U2; + T = X * Radix; + R = Radix * X; + X = T - Radix; + X = X - Radix * U2; + T = R - Radix; + T = T - Radix * U2; + X = X * (Radix - One); + T = T * (Radix - One); + if ((X == Zero) && (Y == Zero) && (Z == Zero) && (T == Zero)) GMult = Yes; + else { + GMult = No; + TstCond (Serious, False, + "* lacks a Guard Digit, so 1*X != X"); + } + Z = Radix * U2; + X = One + Z; + Y = FABS((X + Z) - X * X) - U2; + X = One - U2; + Z = FABS((X - U2) - X * X) - U1; + TstCond (Failure, (Y <= Zero) + && (Z <= Zero), "* gets too many final digits wrong.\n"); + Y = One - U2; + X = One + U2; + Z = One / Y; + Y = Z - X; + X = One / Three; + Z = Three / Nine; + X = X - Z; + T = Nine / TwentySeven; + Z = Z - T; + TstCond(Defect, X == Zero && Y == Zero && Z == Zero, + "Division lacks a Guard Digit, so error can exceed 1 ulp\nor 1/3 and 3/9 and 9/27 may disagree"); + Y = F9 / One; + X = F9 - Half; + Y = (Y - Half) - X; + X = One + U2; + T = X / One; + X = T - X; + if ((X == Zero) && (Y == Zero) && (Z == Zero)) GDiv = Yes; + else { + GDiv = No; + TstCond (Serious, False, + "Division lacks a Guard Digit, so X/1 != X"); + } + X = One / (One + U2); + Y = X - Half - Half; + TstCond (Serious, Y < Zero, + "Computed value of 1/1.000..1 >= 1"); + X = One - U2; + Y = One + Radix * U2; + Z = X * Radix; + T = Y * Radix; + R = Z / Radix; + StickyBit = T / Radix; + X = R - X; + Y = StickyBit - Y; + TstCond (Failure, X == Zero && Y == Zero, + "* and/or / gets too many last digits wrong"); + Y = One - U1; + X = One - F9; + Y = One - Y; + T = Radix - U2; + Z = Radix - BMinusU2; + T = Radix - T; + if ((X == U1) && (Y == U1) && (Z == U2) && (T == U2)) GAddSub = Yes; + else { + GAddSub = No; + TstCond (Serious, False, + "- lacks Guard Digit, so cancellation is obscured"); + } + if (F9 != One && F9 - One >= Zero) { + BadCond(Serious, "comparison alleges (1-U1) < 1 although\n"); + printf(" subtraction yields (1-U1) - 1 = 0 , thereby vitiating\n"); + printf(" such precautions against division by zero as\n"); + printf(" ... if (X == 1.0) {.....} else {.../(X-1.0)...}\n"); + } + if (GMult == Yes && GDiv == Yes && GAddSub == Yes) printf( + " *, /, and - appear to have guard digits, as they should.\n"); + /*=============================================*/ + Milestone = 40; + /*=============================================*/ + Pause(); + printf("Checking rounding on multiply, divide and add/subtract.\n"); + RMult = Other; + RDiv = Other; + RAddSub = Other; + RadixD2 = Radix / Two; + A1 = Two; + Done = False; + do { + AInvrse = Radix; + do { + X = AInvrse; + AInvrse = AInvrse / A1; + } while ( ! (FLOOR(AInvrse) != AInvrse)); + Done = (X == One) || (A1 > Three); + if (! Done) A1 = Nine + One; + } while ( ! (Done)); + if (X == One) A1 = Radix; + AInvrse = One / A1; + X = A1; + Y = AInvrse; + Done = False; + do { + Z = X * Y - Half; + TstCond (Failure, Z == Half, + "X * (1/X) differs from 1"); + Done = X == Radix; + X = Radix; + Y = One / X; + } while ( ! (Done)); + Y2 = One + U2; + Y1 = One - U2; + X = OneAndHalf - U2; + Y = OneAndHalf + U2; + Z = (X - U2) * Y2; + T = Y * Y1; + Z = Z - X; + T = T - X; + X = X * Y2; + Y = (Y + U2) * Y1; + X = X - OneAndHalf; + Y = Y - OneAndHalf; + if ((X == Zero) && (Y == Zero) && (Z == Zero) && (T <= Zero)) { + X = (OneAndHalf + U2) * Y2; + Y = OneAndHalf - U2 - U2; + Z = OneAndHalf + U2 + U2; + T = (OneAndHalf - U2) * Y1; + X = X - (Z + U2); + StickyBit = Y * Y1; + S = Z * Y2; + T = T - Y; + Y = (U2 - Y) + StickyBit; + Z = S - (Z + U2 + U2); + StickyBit = (Y2 + U2) * Y1; + Y1 = Y2 * Y1; + StickyBit = StickyBit - Y2; + Y1 = Y1 - Half; + if ((X == Zero) && (Y == Zero) && (Z == Zero) && (T == Zero) + && ( StickyBit == Zero) && (Y1 == Half)) { + RMult = Rounded; + printf("Multiplication appears to round correctly.\n"); + } + else if ((X + U2 == Zero) && (Y < Zero) && (Z + U2 == Zero) + && (T < Zero) && (StickyBit + U2 == Zero) + && (Y1 < Half)) { + RMult = Chopped; + printf("Multiplication appears to chop.\n"); + } + else printf("* is neither chopped nor correctly rounded.\n"); + if ((RMult == Rounded) && (GMult == No)) notify("Multiplication"); + } + else printf("* is neither chopped nor correctly rounded.\n"); + /*=============================================*/ + Milestone = 45; + /*=============================================*/ + Y2 = One + U2; + Y1 = One - U2; + Z = OneAndHalf + U2 + U2; + X = Z / Y2; + T = OneAndHalf - U2 - U2; + Y = (T - U2) / Y1; + Z = (Z + U2) / Y2; + X = X - OneAndHalf; + Y = Y - T; + T = T / Y1; + Z = Z - (OneAndHalf + U2); + T = (U2 - OneAndHalf) + T; + if (! ((X > Zero) || (Y > Zero) || (Z > Zero) || (T > Zero))) { + X = OneAndHalf / Y2; + Y = OneAndHalf - U2; + Z = OneAndHalf + U2; + X = X - Y; + T = OneAndHalf / Y1; + Y = Y / Y1; + T = T - (Z + U2); + Y = Y - Z; + Z = Z / Y2; + Y1 = (Y2 + U2) / Y2; + Z = Z - OneAndHalf; + Y2 = Y1 - Y2; + Y1 = (F9 - U1) / F9; + if ((X == Zero) && (Y == Zero) && (Z == Zero) && (T == Zero) + && (Y2 == Zero) && (Y2 == Zero) + && (Y1 - Half == F9 - Half )) { + RDiv = Rounded; + printf("Division appears to round correctly.\n"); + if (GDiv == No) notify("Division"); + } + else if ((X < Zero) && (Y < Zero) && (Z < Zero) && (T < Zero) + && (Y2 < Zero) && (Y1 - Half < F9 - Half)) { + RDiv = Chopped; + printf("Division appears to chop.\n"); + } + } + if (RDiv == Other) printf("/ is neither chopped nor correctly rounded.\n"); + BInvrse = One / Radix; + TstCond (Failure, (BInvrse * Radix - Half == Half), + "Radix * ( 1 / Radix ) differs from 1"); + /*=============================================*/ + /*SPLIT + } #include "paranoia.h" part4(){ */ - Milestone = 50; - /*=============================================*/ - TstCond (Failure, ((F9 + U1) - Half == Half) - && ((BMinusU2 + U2 ) - One == Radix - One), - "Incomplete carry-propagation in Addition"); - X = One - U1 * U1; - Y = One + U2 * (One - U2); - Z = F9 - Half; - X = (X - Half) - Z; - Y = Y - One; - if ((X == Zero) && (Y == Zero)) { - RAddSub = Chopped; - printf("Add/Subtract appears to be chopped.\n"); - } - if (GAddSub == Yes) { - X = (Half + U2) * U2; - Y = (Half - U2) * U2; - X = One + X; - Y = One + Y; - X = (One + U2) - X; - Y = One - Y; - if ((X == Zero) && (Y == Zero)) { - X = (Half + U2) * U1; - Y = (Half - U2) * U1; - X = One - X; - Y = One - Y; - X = F9 - X; - Y = One - Y; - if ((X == Zero) && (Y == Zero)) { - RAddSub = Rounded; - printf("Addition/Subtraction appears to round correctly.\n"); - if (GAddSub == No) notify("Add/Subtract"); - } - else printf("Addition/Subtraction neither rounds nor chops.\n"); - } - else printf("Addition/Subtraction neither rounds nor chops.\n"); - } - else printf("Addition/Subtraction neither rounds nor chops.\n"); - S = One; - X = One + Half * (One + Half); - Y = (One + U2) * Half; - Z = X - Y; - T = Y - X; - StickyBit = Z + T; - if (StickyBit != Zero) { - S = Zero; - BadCond(Flaw, "(X - Y) + (Y - X) is non zero!\n"); - } - StickyBit = Zero; - if ((GMult == Yes) && (GDiv == Yes) && (GAddSub == Yes) - && (RMult == Rounded) && (RDiv == Rounded) - && (RAddSub == Rounded) && (FLOOR(RadixD2) == RadixD2)) { - printf("Checking for sticky bit.\n"); - X = (Half + U1) * U2; - Y = Half * U2; - Z = One + Y; - T = One + X; - if ((Z - One <= Zero) && (T - One >= U2)) { - Z = T + Y; - Y = Z - X; - if ((Z - T >= U2) && (Y - T == Zero)) { - X = (Half + U1) * U1; - Y = Half * U1; - Z = One - Y; - T = One - X; - if ((Z - One == Zero) && (T - F9 == Zero)) { - Z = (Half - U1) * U1; - T = F9 - Z; - Q = F9 - Y; - if ((T - F9 == Zero) && (F9 - U1 - Q == Zero)) { - Z = (One + U2) * OneAndHalf; - T = (OneAndHalf + U2) - Z + U2; - X = One + Half / Radix; - Y = One + Radix * U2; - Z = X * Y; - if (T == Zero && X + Radix * U2 - Z == Zero) { - if (Radix != Two) { - X = Two + U2; - Y = X / Two; - if ((Y - One == Zero)) StickyBit = S; - } - else StickyBit = S; - } - } - } - } - } - } - if (StickyBit == One) printf("Sticky bit apparently used correctly.\n"); - else printf("Sticky bit used incorrectly or not at all.\n"); - TstCond (Flaw, !(GMult == No || GDiv == No || GAddSub == No || - RMult == Other || RDiv == Other || RAddSub == Other), - "lack(s) of guard digits or failure(s) to correctly round or chop\n(noted above) count as one flaw in the final tally below"); - /*=============================================*/ - Milestone = 60; - /*=============================================*/ - printf("\n"); - printf("Does Multiplication commute? "); - printf("Testing on %d random pairs.\n", NoTrials); - Random9 = SQRT(3.0); - Random1 = Third; - I = 1; - do { - X = Random(); - Y = Random(); - Z9 = Y * X; - Z = X * Y; - Z9 = Z - Z9; - I = I + 1; - } while ( ! ((I > NoTrials) || (Z9 != Zero))); - if (I == NoTrials) { - Random1 = One + Half / Three; - Random2 = (U2 + U1) + One; - Z = Random1 * Random2; - Y = Random2 * Random1; - Z9 = (One + Half / Three) * ((U2 + U1) + One) - (One + Half / - Three) * ((U2 + U1) + One); - } - if (! ((I == NoTrials) || (Z9 == Zero))) - BadCond(Defect, "X * Y == Y * X trial fails.\n"); - else printf(" No failures found in %d integer pairs.\n", NoTrials); - /*=============================================*/ - Milestone = 70; - /*=============================================*/ - printf("\nRunning test of square root(x).\n"); - TstCond (Failure, (Zero == SQRT(Zero)) - && (- Zero == SQRT(- Zero)) - && (One == SQRT(One)), "Square root of 0.0, -0.0 or 1.0 wrong"); - MinSqEr = Zero; - MaxSqEr = Zero; - J = Zero; - X = Radix; - OneUlp = U2; - SqXMinX (Serious); - X = BInvrse; - OneUlp = BInvrse * U1; - SqXMinX (Serious); - X = U1; - OneUlp = U1 * U1; - SqXMinX (Serious); - if (J != Zero) Pause(); - printf("Testing if sqrt(X * X) == X for %d Integers X.\n", NoTrials); - J = Zero; - X = Two; - Y = Radix; - if ((Radix != One)) do { - X = Y; - Y = Radix * Y; - } while ( ! ((Y - X >= NoTrials))); - OneUlp = X * U2; - I = 1; - while (I <= NoTrials) { - X = X + One; - SqXMinX (Defect); - if (J > Zero) break; - I = I + 1; - } - printf("Test for sqrt monotonicity.\n"); - I = - 1; - X = BMinusU2; - Y = Radix; - Z = Radix + Radix * U2; - NotMonot = False; - Monot = False; - while ( ! (NotMonot || Monot)) { - I = I + 1; - X = SQRT(X); - Q = SQRT(Y); - Z = SQRT(Z); - if ((X > Q) || (Q > Z)) NotMonot = True; - else { - Q = FLOOR(Q + Half); - if ((I > 0) || (Radix == Q * Q)) Monot = True; - else if (I > 0) { - if (I > 1) Monot = True; - else { - Y = Y * BInvrse; - X = Y - U1; - Z = Y + U1; - } - } - else { - Y = Q; - X = Y - U2; - Z = Y + U2; - } - } - } - if (Monot) printf("sqrt has passed a test for Monotonicity.\n"); - else { - BadCond(Defect, ""); - printf("sqrt(X) is non-monotonic for X near %.7e .\n", Y); - } - /*=============================================*/ - /*SPLIT - } + Milestone = 50; + /*=============================================*/ + TstCond (Failure, ((F9 + U1) - Half == Half) + && ((BMinusU2 + U2 ) - One == Radix - One), + "Incomplete carry-propagation in Addition"); + X = One - U1 * U1; + Y = One + U2 * (One - U2); + Z = F9 - Half; + X = (X - Half) - Z; + Y = Y - One; + if ((X == Zero) && (Y == Zero)) { + RAddSub = Chopped; + printf("Add/Subtract appears to be chopped.\n"); + } + if (GAddSub == Yes) { + X = (Half + U2) * U2; + Y = (Half - U2) * U2; + X = One + X; + Y = One + Y; + X = (One + U2) - X; + Y = One - Y; + if ((X == Zero) && (Y == Zero)) { + X = (Half + U2) * U1; + Y = (Half - U2) * U1; + X = One - X; + Y = One - Y; + X = F9 - X; + Y = One - Y; + if ((X == Zero) && (Y == Zero)) { + RAddSub = Rounded; + printf("Addition/Subtraction appears to round correctly.\n"); + if (GAddSub == No) notify("Add/Subtract"); + } + else printf("Addition/Subtraction neither rounds nor chops.\n"); + } + else printf("Addition/Subtraction neither rounds nor chops.\n"); + } + else printf("Addition/Subtraction neither rounds nor chops.\n"); + S = One; + X = One + Half * (One + Half); + Y = (One + U2) * Half; + Z = X - Y; + T = Y - X; + StickyBit = Z + T; + if (StickyBit != Zero) { + S = Zero; + BadCond(Flaw, "(X - Y) + (Y - X) is non zero!\n"); + } + StickyBit = Zero; + if ((GMult == Yes) && (GDiv == Yes) && (GAddSub == Yes) + && (RMult == Rounded) && (RDiv == Rounded) + && (RAddSub == Rounded) && (FLOOR(RadixD2) == RadixD2)) { + printf("Checking for sticky bit.\n"); + X = (Half + U1) * U2; + Y = Half * U2; + Z = One + Y; + T = One + X; + if ((Z - One <= Zero) && (T - One >= U2)) { + Z = T + Y; + Y = Z - X; + if ((Z - T >= U2) && (Y - T == Zero)) { + X = (Half + U1) * U1; + Y = Half * U1; + Z = One - Y; + T = One - X; + if ((Z - One == Zero) && (T - F9 == Zero)) { + Z = (Half - U1) * U1; + T = F9 - Z; + Q = F9 - Y; + if ((T - F9 == Zero) && (F9 - U1 - Q == Zero)) { + Z = (One + U2) * OneAndHalf; + T = (OneAndHalf + U2) - Z + U2; + X = One + Half / Radix; + Y = One + Radix * U2; + Z = X * Y; + if (T == Zero && X + Radix * U2 - Z == Zero) { + if (Radix != Two) { + X = Two + U2; + Y = X / Two; + if ((Y - One == Zero)) StickyBit = S; + } + else StickyBit = S; + } + } + } + } + } + } + if (StickyBit == One) printf("Sticky bit apparently used correctly.\n"); + else printf("Sticky bit used incorrectly or not at all.\n"); + TstCond (Flaw, !(GMult == No || GDiv == No || GAddSub == No || + RMult == Other || RDiv == Other || RAddSub == Other), + "lack(s) of guard digits or failure(s) to correctly round or chop\n(noted above) count as one flaw in the final tally below"); + /*=============================================*/ + Milestone = 60; + /*=============================================*/ + printf("\n"); + printf("Does Multiplication commute? "); + printf("Testing on %d random pairs.\n", NoTrials); + Random9 = SQRT(3.0); + Random1 = Third; + I = 1; + do { + X = Random(); + Y = Random(); + Z9 = Y * X; + Z = X * Y; + Z9 = Z - Z9; + I = I + 1; + } while ( ! ((I > NoTrials) || (Z9 != Zero))); + if (I == NoTrials) { + Random1 = One + Half / Three; + Random2 = (U2 + U1) + One; + Z = Random1 * Random2; + Y = Random2 * Random1; + Z9 = (One + Half / Three) * ((U2 + U1) + One) - (One + Half / + Three) * ((U2 + U1) + One); + } + if (! ((I == NoTrials) || (Z9 == Zero))) + BadCond(Defect, "X * Y == Y * X trial fails.\n"); + else printf(" No failures found in %d integer pairs.\n", NoTrials); + /*=============================================*/ + Milestone = 70; + /*=============================================*/ + printf("\nRunning test of square root(x).\n"); + TstCond (Failure, (Zero == SQRT(Zero)) + && (- Zero == SQRT(- Zero)) + && (One == SQRT(One)), "Square root of 0.0, -0.0 or 1.0 wrong"); + MinSqEr = Zero; + MaxSqEr = Zero; + J = Zero; + X = Radix; + OneUlp = U2; + SqXMinX (Serious); + X = BInvrse; + OneUlp = BInvrse * U1; + SqXMinX (Serious); + X = U1; + OneUlp = U1 * U1; + SqXMinX (Serious); + if (J != Zero) Pause(); + printf("Testing if sqrt(X * X) == X for %d Integers X.\n", NoTrials); + J = Zero; + X = Two; + Y = Radix; + if ((Radix != One)) do { + X = Y; + Y = Radix * Y; + } while ( ! ((Y - X >= NoTrials))); + OneUlp = X * U2; + I = 1; + while (I <= NoTrials) { + X = X + One; + SqXMinX (Defect); + if (J > Zero) break; + I = I + 1; + } + printf("Test for sqrt monotonicity.\n"); + I = - 1; + X = BMinusU2; + Y = Radix; + Z = Radix + Radix * U2; + NotMonot = False; + Monot = False; + while ( ! (NotMonot || Monot)) { + I = I + 1; + X = SQRT(X); + Q = SQRT(Y); + Z = SQRT(Z); + if ((X > Q) || (Q > Z)) NotMonot = True; + else { + Q = FLOOR(Q + Half); + if ((I > 0) || (Radix == Q * Q)) Monot = True; + else if (I > 0) { + if (I > 1) Monot = True; + else { + Y = Y * BInvrse; + X = Y - U1; + Z = Y + U1; + } + } + else { + Y = Q; + X = Y - U2; + Z = Y + U2; + } + } + } + if (Monot) printf("sqrt has passed a test for Monotonicity.\n"); + else { + BadCond(Defect, ""); + printf("sqrt(X) is non-monotonic for X near %.7e .\n", Y); + } + /*=============================================*/ + /*SPLIT + } #include "paranoia.h" part5(){ */ - Milestone = 80; - /*=============================================*/ - MinSqEr = MinSqEr + Half; - MaxSqEr = MaxSqEr - Half; - Y = (SQRT(One + U2) - One) / U2; - SqEr = (Y - One) + U2 / Eight; - if (SqEr > MaxSqEr) MaxSqEr = SqEr; - SqEr = Y + U2 / Eight; - if (SqEr < MinSqEr) MinSqEr = SqEr; - Y = ((SQRT(F9) - U2) - (One - U2)) / U1; - SqEr = Y + U1 / Eight; - if (SqEr > MaxSqEr) MaxSqEr = SqEr; - SqEr = (Y + One) + U1 / Eight; - if (SqEr < MinSqEr) MinSqEr = SqEr; - OneUlp = U2; - X = OneUlp; - for( Indx = 1; Indx <= 3; ++Indx) { - Y = SQRT((X + U1 + X) + F9); - Y = ((Y - U2) - ((One - U2) + X)) / OneUlp; - Z = ((U1 - X) + F9) * Half * X * X / OneUlp; - SqEr = (Y + Half) + Z; - if (SqEr < MinSqEr) MinSqEr = SqEr; - SqEr = (Y - Half) + Z; - if (SqEr > MaxSqEr) MaxSqEr = SqEr; - if (((Indx == 1) || (Indx == 3))) - X = OneUlp * Sign (X) * FLOOR(Eight / (Nine * SQRT(OneUlp))); - else { - OneUlp = U1; - X = - OneUlp; - } - } - /*=============================================*/ - Milestone = 85; - /*=============================================*/ - SqRWrng = False; - Anomaly = False; - RSqrt = Other; /* ~dgh */ - if (Radix != One) { - printf("Testing whether sqrt is rounded or chopped.\n"); - D = FLOOR(Half + POW(Radix, One + Precision - FLOOR(Precision))); - /* ... == Radix^(1 + fract) if (Precision == Integer + fract. */ - X = D / Radix; - Y = D / A1; - if ((X != FLOOR(X)) || (Y != FLOOR(Y))) { - Anomaly = True; - } - else { - X = Zero; - Z2 = X; - Y = One; - Y2 = Y; - Z1 = Radix - One; - FourD = Four * D; - do { - if (Y2 > Z2) { - Q = Radix; - Y1 = Y; - do { - X1 = FABS(Q + FLOOR(Half - Q / Y1) * Y1); - Q = Y1; - Y1 = X1; - } while ( ! (X1 <= Zero)); - if (Q <= One) { - Z2 = Y2; - Z = Y; - } - } - Y = Y + Two; - X = X + Eight; - Y2 = Y2 + X; - if (Y2 >= FourD) Y2 = Y2 - FourD; - } while ( ! (Y >= D)); - X8 = FourD - Z2; - Q = (X8 + Z * Z) / FourD; - X8 = X8 / Eight; - if (Q != FLOOR(Q)) Anomaly = True; - else { - Break = False; - do { - X = Z1 * Z; - X = X - FLOOR(X / Radix) * Radix; - if (X == One) - Break = True; - else - Z1 = Z1 - One; - } while ( ! (Break || (Z1 <= Zero))); - if ((Z1 <= Zero) && (! Break)) Anomaly = True; - else { - if (Z1 > RadixD2) Z1 = Z1 - Radix; - do { - NewD(); - } while ( ! (U2 * D >= F9)); - if (D * Radix - D != W - D) Anomaly = True; - else { - Z2 = D; - I = 0; - Y = D + (One + Z) * Half; - X = D + Z + Q; - SR3750(); - Y = D + (One - Z) * Half + D; - X = D - Z + D; - X = X + Q + X; - SR3750(); - NewD(); - if (D - Z2 != W - Z2) Anomaly = True; - else { - Y = (D - Z2) + (Z2 + (One - Z) * Half); - X = (D - Z2) + (Z2 - Z + Q); - SR3750(); - Y = (One + Z) * Half; - X = Q; - SR3750(); - if (I == 0) Anomaly = True; - } - } - } - } - } - if ((I == 0) || Anomaly) { - BadCond(Failure, "Anomalous arithmetic with Integer < "); - printf("Radix^Precision = %.7e\n", W); - printf(" fails test whether sqrt rounds or chops.\n"); - SqRWrng = True; - } - } - if (! Anomaly) { - if (! ((MinSqEr < Zero) || (MaxSqEr > Zero))) { - RSqrt = Rounded; - printf("Square root appears to be correctly rounded.\n"); - } - else { - if ((MaxSqEr + U2 > U2 - Half) || (MinSqEr > Half) - || (MinSqEr + Radix < Half)) SqRWrng = True; - else { - RSqrt = Chopped; - printf("Square root appears to be chopped.\n"); - } - } - } - if (SqRWrng) { - printf("Square root is neither chopped nor correctly rounded.\n"); - printf("Observed errors run from %.7e ", MinSqEr - Half); - printf("to %.7e ulps.\n", Half + MaxSqEr); - TstCond (Serious, MaxSqEr - MinSqEr < Radix * Radix, - "sqrt gets too many last digits wrong"); - } - /*=============================================*/ - Milestone = 90; - /*=============================================*/ - Pause(); - printf("Testing powers Z^i for small Integers Z and i.\n"); - N = 0; - /* ... test powers of zero. */ - I = 0; - Z = -Zero; - M = 3.0; - Break = False; - do { - X = One; - SR3980(); - if (I <= 10) { - I = 1023; - SR3980(); - } - if (Z == MinusOne) Break = True; - else { - Z = MinusOne; - PrintIfNPositive(); - N = 0; - /* .. if(-1)^N is invalid, replace MinusOne by One. */ - I = - 4; - } - } while ( ! Break); - PrintIfNPositive(); - N1 = N; - N = 0; - Z = A1; - M = FLOOR(Two * LOG(W) / LOG(A1)); - Break = False; - do { - X = Z; - I = 1; - SR3980(); - if (Z == AInvrse) Break = True; - else Z = AInvrse; - } while ( ! (Break)); - /*=============================================*/ - Milestone = 100; - /*=============================================*/ - /* Powers of Radix have been tested, */ - /* next try a few primes */ - M = NoTrials; - Z = Three; - do { - X = Z; - I = 1; - SR3980(); - do { - Z = Z + Two; - } while ( Three * FLOOR(Z / Three) == Z ); - } while ( Z < Eight * Three ); - if (N > 0) { - printf("Errors like this may invalidate financial calculations\n"); - printf("\tinvolving interest rates.\n"); - } - PrintIfNPositive(); - N += N1; - if (N == 0) printf("... no discrepancis found.\n"); - if (N > 0) Pause(); - else printf("\n"); - /*=============================================*/ - /*SPLIT - } + Milestone = 80; + /*=============================================*/ + MinSqEr = MinSqEr + Half; + MaxSqEr = MaxSqEr - Half; + Y = (SQRT(One + U2) - One) / U2; + SqEr = (Y - One) + U2 / Eight; + if (SqEr > MaxSqEr) MaxSqEr = SqEr; + SqEr = Y + U2 / Eight; + if (SqEr < MinSqEr) MinSqEr = SqEr; + Y = ((SQRT(F9) - U2) - (One - U2)) / U1; + SqEr = Y + U1 / Eight; + if (SqEr > MaxSqEr) MaxSqEr = SqEr; + SqEr = (Y + One) + U1 / Eight; + if (SqEr < MinSqEr) MinSqEr = SqEr; + OneUlp = U2; + X = OneUlp; + for( Indx = 1; Indx <= 3; ++Indx) { + Y = SQRT((X + U1 + X) + F9); + Y = ((Y - U2) - ((One - U2) + X)) / OneUlp; + Z = ((U1 - X) + F9) * Half * X * X / OneUlp; + SqEr = (Y + Half) + Z; + if (SqEr < MinSqEr) MinSqEr = SqEr; + SqEr = (Y - Half) + Z; + if (SqEr > MaxSqEr) MaxSqEr = SqEr; + if (((Indx == 1) || (Indx == 3))) + X = OneUlp * Sign (X) * FLOOR(Eight / (Nine * SQRT(OneUlp))); + else { + OneUlp = U1; + X = - OneUlp; + } + } + /*=============================================*/ + Milestone = 85; + /*=============================================*/ + SqRWrng = False; + Anomaly = False; + RSqrt = Other; /* ~dgh */ + if (Radix != One) { + printf("Testing whether sqrt is rounded or chopped.\n"); + D = FLOOR(Half + POW(Radix, One + Precision - FLOOR(Precision))); + /* ... == Radix^(1 + fract) if (Precision == Integer + fract. */ + X = D / Radix; + Y = D / A1; + if ((X != FLOOR(X)) || (Y != FLOOR(Y))) { + Anomaly = True; + } + else { + X = Zero; + Z2 = X; + Y = One; + Y2 = Y; + Z1 = Radix - One; + FourD = Four * D; + do { + if (Y2 > Z2) { + Q = Radix; + Y1 = Y; + do { + X1 = FABS(Q + FLOOR(Half - Q / Y1) * Y1); + Q = Y1; + Y1 = X1; + } while ( ! (X1 <= Zero)); + if (Q <= One) { + Z2 = Y2; + Z = Y; + } + } + Y = Y + Two; + X = X + Eight; + Y2 = Y2 + X; + if (Y2 >= FourD) Y2 = Y2 - FourD; + } while ( ! (Y >= D)); + X8 = FourD - Z2; + Q = (X8 + Z * Z) / FourD; + X8 = X8 / Eight; + if (Q != FLOOR(Q)) Anomaly = True; + else { + Break = False; + do { + X = Z1 * Z; + X = X - FLOOR(X / Radix) * Radix; + if (X == One) + Break = True; + else + Z1 = Z1 - One; + } while ( ! (Break || (Z1 <= Zero))); + if ((Z1 <= Zero) && (! Break)) Anomaly = True; + else { + if (Z1 > RadixD2) Z1 = Z1 - Radix; + do { + NewD(); + } while ( ! (U2 * D >= F9)); + if (D * Radix - D != W - D) Anomaly = True; + else { + Z2 = D; + I = 0; + Y = D + (One + Z) * Half; + X = D + Z + Q; + SR3750(); + Y = D + (One - Z) * Half + D; + X = D - Z + D; + X = X + Q + X; + SR3750(); + NewD(); + if (D - Z2 != W - Z2) Anomaly = True; + else { + Y = (D - Z2) + (Z2 + (One - Z) * Half); + X = (D - Z2) + (Z2 - Z + Q); + SR3750(); + Y = (One + Z) * Half; + X = Q; + SR3750(); + if (I == 0) Anomaly = True; + } + } + } + } + } + if ((I == 0) || Anomaly) { + BadCond(Failure, "Anomalous arithmetic with Integer < "); + printf("Radix^Precision = %.7e\n", W); + printf(" fails test whether sqrt rounds or chops.\n"); + SqRWrng = True; + } + } + if (! Anomaly) { + if (! ((MinSqEr < Zero) || (MaxSqEr > Zero))) { + RSqrt = Rounded; + printf("Square root appears to be correctly rounded.\n"); + } + else { + if ((MaxSqEr + U2 > U2 - Half) || (MinSqEr > Half) + || (MinSqEr + Radix < Half)) SqRWrng = True; + else { + RSqrt = Chopped; + printf("Square root appears to be chopped.\n"); + } + } + } + if (SqRWrng) { + printf("Square root is neither chopped nor correctly rounded.\n"); + printf("Observed errors run from %.7e ", MinSqEr - Half); + printf("to %.7e ulps.\n", Half + MaxSqEr); + TstCond (Serious, MaxSqEr - MinSqEr < Radix * Radix, + "sqrt gets too many last digits wrong"); + } + /*=============================================*/ + Milestone = 90; + /*=============================================*/ + Pause(); + printf("Testing powers Z^i for small Integers Z and i.\n"); + N = 0; + /* ... test powers of zero. */ + I = 0; + Z = -Zero; + M = 3.0; + Break = False; + do { + X = One; + SR3980(); + if (I <= 10) { + I = 1023; + SR3980(); + } + if (Z == MinusOne) Break = True; + else { + Z = MinusOne; + PrintIfNPositive(); + N = 0; + /* .. if(-1)^N is invalid, replace MinusOne by One. */ + I = - 4; + } + } while ( ! Break); + PrintIfNPositive(); + N1 = N; + N = 0; + Z = A1; + M = FLOOR(Two * LOG(W) / LOG(A1)); + Break = False; + do { + X = Z; + I = 1; + SR3980(); + if (Z == AInvrse) Break = True; + else Z = AInvrse; + } while ( ! (Break)); + /*=============================================*/ + Milestone = 100; + /*=============================================*/ + /* Powers of Radix have been tested, */ + /* next try a few primes */ + M = NoTrials; + Z = Three; + do { + X = Z; + I = 1; + SR3980(); + do { + Z = Z + Two; + } while ( Three * FLOOR(Z / Three) == Z ); + } while ( Z < Eight * Three ); + if (N > 0) { + printf("Errors like this may invalidate financial calculations\n"); + printf("\tinvolving interest rates.\n"); + } + PrintIfNPositive(); + N += N1; + if (N == 0) printf("... no discrepancis found.\n"); + if (N > 0) Pause(); + else printf("\n"); + /*=============================================*/ + /*SPLIT + } #include "paranoia.h" part6(){ */ - Milestone = 110; - /*=============================================*/ - printf("Seeking Underflow thresholds UfThold and E0.\n"); - D = U1; - if (Precision != FLOOR(Precision)) { - D = BInvrse; - X = Precision; - do { - D = D * BInvrse; - X = X - One; - } while ( X > Zero); - } - Y = One; - Z = D; - /* ... D is power of 1/Radix < 1. */ - do { - C = Y; - Y = Z; - Z = Y * Y; - } while ((Y > Z) && (Z + Z > Z)); - Y = C; - Z = Y * D; - do { - C = Y; - Y = Z; - Z = Y * D; - } while ((Y > Z) && (Z + Z > Z)); - if (Radix < Two) HInvrse = Two; - else HInvrse = Radix; - H = One / HInvrse; - /* ... 1/HInvrse == H == Min(1/Radix, 1/2) */ - CInvrse = One / C; - E0 = C; - Z = E0 * H; - /* ...1/Radix^(BIG Integer) << 1 << CInvrse == 1/C */ - do { - Y = E0; - E0 = Z; - Z = E0 * H; - } while ((E0 > Z) && (Z + Z > Z)); - UfThold = E0; - E1 = Zero; - Q = Zero; - E9 = U2; - S = One + E9; - D = C * S; - if (D <= C) { - E9 = Radix * U2; - S = One + E9; - D = C * S; - if (D <= C) { - BadCond(Failure, "multiplication gets too many last digits wrong.\n"); - Underflow = E0; - Y1 = Zero; - PseudoZero = Z; - Pause(); - } - } - else { - Underflow = D; - PseudoZero = Underflow * H; - UfThold = Zero; - do { - Y1 = Underflow; - Underflow = PseudoZero; - if (E1 + E1 <= E1) { - Y2 = Underflow * HInvrse; - E1 = FABS(Y1 - Y2); - Q = Y1; - if ((UfThold == Zero) && (Y1 != Y2)) UfThold = Y1; - } - PseudoZero = PseudoZero * H; - } while ((Underflow > PseudoZero) - && (PseudoZero + PseudoZero > PseudoZero)); - } - /* Comment line 4530 .. 4560 */ - if (PseudoZero != Zero) { - printf("\n"); - Z = PseudoZero; - /* ... Test PseudoZero for "phoney- zero" violates */ - /* ... PseudoZero < Underflow or PseudoZero < PseudoZero + PseudoZero - ... */ - if (PseudoZero <= Zero) { - BadCond(Failure, "Positive expressions can underflow to an\n"); - printf("allegedly negative value\n"); - printf("PseudoZero that prints out as: %g .\n", PseudoZero); - X = - PseudoZero; - if (X <= Zero) { - printf("But -PseudoZero, which should be\n"); - printf("positive, isn't; it prints out as %g .\n", X); - } - } - else { - BadCond(Flaw, "Underflow can stick at an allegedly positive\n"); - printf("value PseudoZero that prints out as %g .\n", PseudoZero); - } - TstPtUf(); - } - /*=============================================*/ - Milestone = 120; - /*=============================================*/ - if (CInvrse * Y > CInvrse * Y1) { - S = H * S; - E0 = Underflow; - } - if (! ((E1 == Zero) || (E1 == E0))) { - BadCond(Defect, ""); - if (E1 < E0) { - printf("Products underflow at a higher"); - printf(" threshold than differences.\n"); - if (PseudoZero == Zero) - E0 = E1; - } - else { - printf("Difference underflows at a higher"); - printf(" threshold than products.\n"); - } - } - printf("Smallest strictly positive number found is E0 = %g .\n", E0); - Z = E0; - TstPtUf(); - Underflow = E0; - if (N == 1) Underflow = Y; - I = 4; - if (E1 == Zero) I = 3; - if (UfThold == Zero) I = I - 2; - UfNGrad = True; - switch (I) { - case 1: - UfThold = Underflow; - if ((CInvrse * Q) != ((CInvrse * Y) * S)) { - UfThold = Y; - BadCond(Failure, "Either accuracy deteriorates as numbers\n"); - printf("approach a threshold = %.17e\n", UfThold);; - printf(" coming down from %.17e\n", C); - printf(" or else multiplication gets too many last digits wrong.\n"); - } - Pause(); - break; + Milestone = 110; + /*=============================================*/ + printf("Seeking Underflow thresholds UfThold and E0.\n"); + D = U1; + if (Precision != FLOOR(Precision)) { + D = BInvrse; + X = Precision; + do { + D = D * BInvrse; + X = X - One; + } while ( X > Zero); + } + Y = One; + Z = D; + /* ... D is power of 1/Radix < 1. */ + do { + C = Y; + Y = Z; + Z = Y * Y; + } while ((Y > Z) && (Z + Z > Z)); + Y = C; + Z = Y * D; + do { + C = Y; + Y = Z; + Z = Y * D; + } while ((Y > Z) && (Z + Z > Z)); + if (Radix < Two) HInvrse = Two; + else HInvrse = Radix; + H = One / HInvrse; + /* ... 1/HInvrse == H == Min(1/Radix, 1/2) */ + CInvrse = One / C; + E0 = C; + Z = E0 * H; + /* ...1/Radix^(BIG Integer) << 1 << CInvrse == 1/C */ + do { + Y = E0; + E0 = Z; + Z = E0 * H; + } while ((E0 > Z) && (Z + Z > Z)); + UfThold = E0; + E1 = Zero; + Q = Zero; + E9 = U2; + S = One + E9; + D = C * S; + if (D <= C) { + E9 = Radix * U2; + S = One + E9; + D = C * S; + if (D <= C) { + BadCond(Failure, "multiplication gets too many last digits wrong.\n"); + Underflow = E0; + Y1 = Zero; + PseudoZero = Z; + Pause(); + } + } + else { + Underflow = D; + PseudoZero = Underflow * H; + UfThold = Zero; + do { + Y1 = Underflow; + Underflow = PseudoZero; + if (E1 + E1 <= E1) { + Y2 = Underflow * HInvrse; + E1 = FABS(Y1 - Y2); + Q = Y1; + if ((UfThold == Zero) && (Y1 != Y2)) UfThold = Y1; + } + PseudoZero = PseudoZero * H; + } while ((Underflow > PseudoZero) + && (PseudoZero + PseudoZero > PseudoZero)); + } + /* Comment line 4530 .. 4560 */ + if (PseudoZero != Zero) { + printf("\n"); + Z = PseudoZero; + /* ... Test PseudoZero for "phoney- zero" violates */ + /* ... PseudoZero < Underflow or PseudoZero < PseudoZero + PseudoZero + ... */ + if (PseudoZero <= Zero) { + BadCond(Failure, "Positive expressions can underflow to an\n"); + printf("allegedly negative value\n"); + printf("PseudoZero that prints out as: %g .\n", PseudoZero); + X = - PseudoZero; + if (X <= Zero) { + printf("But -PseudoZero, which should be\n"); + printf("positive, isn't; it prints out as %g .\n", X); + } + } + else { + BadCond(Flaw, "Underflow can stick at an allegedly positive\n"); + printf("value PseudoZero that prints out as %g .\n", PseudoZero); + } + TstPtUf(); + } + /*=============================================*/ + Milestone = 120; + /*=============================================*/ + if (CInvrse * Y > CInvrse * Y1) { + S = H * S; + E0 = Underflow; + } + if (! ((E1 == Zero) || (E1 == E0))) { + BadCond(Defect, ""); + if (E1 < E0) { + printf("Products underflow at a higher"); + printf(" threshold than differences.\n"); + if (PseudoZero == Zero) + E0 = E1; + } + else { + printf("Difference underflows at a higher"); + printf(" threshold than products.\n"); + } + } + printf("Smallest strictly positive number found is E0 = %g .\n", E0); + Z = E0; + TstPtUf(); + Underflow = E0; + if (N == 1) Underflow = Y; + I = 4; + if (E1 == Zero) I = 3; + if (UfThold == Zero) I = I - 2; + UfNGrad = True; + switch (I) { + case 1: + UfThold = Underflow; + if ((CInvrse * Q) != ((CInvrse * Y) * S)) { + UfThold = Y; + BadCond(Failure, "Either accuracy deteriorates as numbers\n"); + printf("approach a threshold = %.17e\n", UfThold);; + printf(" coming down from %.17e\n", C); + printf(" or else multiplication gets too many last digits wrong.\n"); + } + Pause(); + break; - case 2: - BadCond(Failure, "Underflow confuses Comparison, which alleges that\n"); - printf("Q == Y while denying that |Q - Y| == 0; these values\n"); - printf("print out as Q = %.17e, Y = %.17e .\n", Q, Y2); - printf ("|Q - Y| = %.17e .\n" , FABS(Q - Y2)); - UfThold = Q; - break; + case 2: + BadCond(Failure, "Underflow confuses Comparison, which alleges that\n"); + printf("Q == Y while denying that |Q - Y| == 0; these values\n"); + printf("print out as Q = %.17e, Y = %.17e .\n", Q, Y2); + printf ("|Q - Y| = %.17e .\n" , FABS(Q - Y2)); + UfThold = Q; + break; - case 3: - X = X; - break; + case 3: + X = X; + break; - case 4: - if ((Q == UfThold) && (E1 == E0) - && (FABS( UfThold - E1 / E9) <= E1)) { - UfNGrad = False; - printf("Underflow is gradual; it incurs Absolute Error =\n"); - printf("(roundoff in UfThold) < E0.\n"); - Y = E0 * CInvrse; - Y = Y * (OneAndHalf + U2); - X = CInvrse * (One + U2); - Y = Y / X; - IEEE = (Y == E0); - } - } - if (UfNGrad) { - printf("\n"); - sigsave = sigfpe; - if (setjmp(ovfl_buf)) { - printf("Underflow / UfThold failed!\n"); - R = H + H; - } - else R = SQRT(Underflow / UfThold); - sigsave = 0; - if (R <= H) { - Z = R * UfThold; - X = Z * (One + R * H * (One + H)); - } - else { - Z = UfThold; - X = Z * (One + H * H * (One + H)); - } - if (! ((X == Z) || (X - Z != Zero))) { - BadCond(Flaw, ""); - printf("X = %.17e\n\tis not equal to Z = %.17e .\n", X, Z); - Z9 = X - Z; - printf("yet X - Z yields %.17e .\n", Z9); - printf(" Should this NOT signal Underflow, "); - printf("this is a SERIOUS DEFECT\nthat causes "); - printf("confusion when innocent statements like\n");; - printf(" if (X == Z) ... else"); - printf(" ... (f(X) - f(Z)) / (X - Z) ...\n"); - printf("encounter Division by Zero although actually\n"); - sigsave = sigfpe; - if (setjmp(ovfl_buf)) printf("X / Z fails!\n"); - else printf("X / Z = 1 + %g .\n", (X / Z - Half) - Half); - sigsave = 0; - } - } - printf("The Underflow threshold is %.17e, %s\n", UfThold, - " below which"); - printf("calculation may suffer larger Relative error than "); - printf("merely roundoff.\n"); - Y2 = U1 * U1; - Y = Y2 * Y2; - Y2 = Y * U1; - if (Y2 <= UfThold) { - if (Y > E0) { - BadCond(Defect, ""); - I = 5; - } - else { - BadCond(Serious, ""); - I = 4; - } - printf("Range is too narrow; U1^%d Underflows.\n", I); - } - /*=============================================*/ - /*SPLIT - } + case 4: + if ((Q == UfThold) && (E1 == E0) + && (FABS( UfThold - E1 / E9) <= E1)) { + UfNGrad = False; + printf("Underflow is gradual; it incurs Absolute Error =\n"); + printf("(roundoff in UfThold) < E0.\n"); + Y = E0 * CInvrse; + Y = Y * (OneAndHalf + U2); + X = CInvrse * (One + U2); + Y = Y / X; + IEEE = (Y == E0); + } + } + if (UfNGrad) { + printf("\n"); + sigsave = sigfpe; + if (setjmp(ovfl_buf)) { + printf("Underflow / UfThold failed!\n"); + R = H + H; + } + else R = SQRT(Underflow / UfThold); + sigsave = 0; + if (R <= H) { + Z = R * UfThold; + X = Z * (One + R * H * (One + H)); + } + else { + Z = UfThold; + X = Z * (One + H * H * (One + H)); + } + if (! ((X == Z) || (X - Z != Zero))) { + BadCond(Flaw, ""); + printf("X = %.17e\n\tis not equal to Z = %.17e .\n", X, Z); + Z9 = X - Z; + printf("yet X - Z yields %.17e .\n", Z9); + printf(" Should this NOT signal Underflow, "); + printf("this is a SERIOUS DEFECT\nthat causes "); + printf("confusion when innocent statements like\n");; + printf(" if (X == Z) ... else"); + printf(" ... (f(X) - f(Z)) / (X - Z) ...\n"); + printf("encounter Division by Zero although actually\n"); + sigsave = sigfpe; + if (setjmp(ovfl_buf)) printf("X / Z fails!\n"); + else printf("X / Z = 1 + %g .\n", (X / Z - Half) - Half); + sigsave = 0; + } + } + printf("The Underflow threshold is %.17e, %s\n", UfThold, + " below which"); + printf("calculation may suffer larger Relative error than "); + printf("merely roundoff.\n"); + Y2 = U1 * U1; + Y = Y2 * Y2; + Y2 = Y * U1; + if (Y2 <= UfThold) { + if (Y > E0) { + BadCond(Defect, ""); + I = 5; + } + else { + BadCond(Serious, ""); + I = 4; + } + printf("Range is too narrow; U1^%d Underflows.\n", I); + } + /*=============================================*/ + /*SPLIT + } #include "paranoia.h" part7(){ */ - Milestone = 130; - /*=============================================*/ - Y = - FLOOR(Half - TwoForty * LOG(UfThold) / LOG(HInvrse)) / TwoForty; - Y2 = Y + Y; - printf("Since underflow occurs below the threshold\n"); - printf("UfThold = (%.17e) ^ (%.17e)\nonly underflow ", HInvrse, Y); - printf("should afflict the expression\n\t(%.17e) ^ (%.17e);\n", HInvrse, Y); - V9 = POW(HInvrse, Y2); - printf("actually calculating yields: %.17e .\n", V9); - if (! ((V9 >= Zero) && (V9 <= (Radix + Radix + E9) * UfThold))) { - BadCond(Serious, "this is not between 0 and underflow\n"); - printf(" threshold = %.17e .\n", UfThold); - } - else if (! (V9 > UfThold * (One + E9))) - printf("This computed value is O.K.\n"); - else { - BadCond(Defect, "this is not between 0 and underflow\n"); - printf(" threshold = %.17e .\n", UfThold); - } - /*=============================================*/ - Milestone = 140; - /*=============================================*/ - printf("\n"); - /* ...calculate Exp2 == exp(2) == 7.389056099... */ - X = Zero; - I = 2; - Y = Two * Three; - Q = Zero; - N = 0; - do { - Z = X; - I = I + 1; - Y = Y / (I + I); - R = Y + Q; - X = Z + R; - Q = (Z - X) + R; - } while(X > Z); - Z = (OneAndHalf + One / Eight) + X / (OneAndHalf * ThirtyTwo); - X = Z * Z; - Exp2 = X * X; - X = F9; - Y = X - U1; - printf("Testing X^((X + 1) / (X - 1)) vs. exp(2) = %.17e as X -> 1.\n", - Exp2); - for(I = 1;;) { - Z = X - BInvrse; - Z = (X + One) / (Z - (One - BInvrse)); - Q = POW(X, Z) - Exp2; - if (FABS(Q) > TwoForty * U2) { - N = 1; - V9 = (X - BInvrse) - (One - BInvrse); - BadCond(Defect, "Calculated"); - printf(" %.17e for\n", POW(X,Z)); - printf("\t(1 + (%.17e) ^ (%.17e);\n", V9, Z); - printf("\tdiffers from correct value by %.17e .\n", Q); - printf("\tThis much error may spoil financial\n"); - printf("\tcalculations involving tiny interest rates.\n"); - break; - } - else { - Z = (Y - X) * Two + Y; - X = Y; - Y = Z; - Z = One + (X - F9)*(X - F9); - if (Z > One && I < NoTrials) I++; - else { - if (X > One) { - if (N == 0) - printf("Accuracy seems adequate.\n"); - break; - } - else { - X = One + U2; - Y = U2 + U2; - Y += X; - I = 1; - } - } - } - } - /*=============================================*/ - Milestone = 150; - /*=============================================*/ - printf("Testing powers Z^Q at four nearly extreme values.\n"); - N = 0; - Z = A1; - Q = FLOOR(Half - LOG(C) / LOG(A1)); - Break = False; - do { - X = CInvrse; - Y = POW(Z, Q); - IsYeqX(); - Q = - Q; - X = C; - Y = POW(Z, Q); - IsYeqX(); - if (Z < One) Break = True; - else Z = AInvrse; - } while ( ! (Break)); - PrintIfNPositive(); - if (N == 0) printf(" ... no discrepancies found.\n"); - printf("\n"); + Milestone = 130; + /*=============================================*/ + Y = - FLOOR(Half - TwoForty * LOG(UfThold) / LOG(HInvrse)) / TwoForty; + Y2 = Y + Y; + printf("Since underflow occurs below the threshold\n"); + printf("UfThold = (%.17e) ^ (%.17e)\nonly underflow ", HInvrse, Y); + printf("should afflict the expression\n\t(%.17e) ^ (%.17e);\n", HInvrse, Y); + V9 = POW(HInvrse, Y2); + printf("actually calculating yields: %.17e .\n", V9); + if (! ((V9 >= Zero) && (V9 <= (Radix + Radix + E9) * UfThold))) { + BadCond(Serious, "this is not between 0 and underflow\n"); + printf(" threshold = %.17e .\n", UfThold); + } + else if (! (V9 > UfThold * (One + E9))) + printf("This computed value is O.K.\n"); + else { + BadCond(Defect, "this is not between 0 and underflow\n"); + printf(" threshold = %.17e .\n", UfThold); + } + /*=============================================*/ + Milestone = 140; + /*=============================================*/ + printf("\n"); + /* ...calculate Exp2 == exp(2) == 7.389056099... */ + X = Zero; + I = 2; + Y = Two * Three; + Q = Zero; + N = 0; + do { + Z = X; + I = I + 1; + Y = Y / (I + I); + R = Y + Q; + X = Z + R; + Q = (Z - X) + R; + } while(X > Z); + Z = (OneAndHalf + One / Eight) + X / (OneAndHalf * ThirtyTwo); + X = Z * Z; + Exp2 = X * X; + X = F9; + Y = X - U1; + printf("Testing X^((X + 1) / (X - 1)) vs. exp(2) = %.17e as X -> 1.\n", + Exp2); + for(I = 1;;) { + Z = X - BInvrse; + Z = (X + One) / (Z - (One - BInvrse)); + Q = POW(X, Z) - Exp2; + if (FABS(Q) > TwoForty * U2) { + N = 1; + V9 = (X - BInvrse) - (One - BInvrse); + BadCond(Defect, "Calculated"); + printf(" %.17e for\n", POW(X,Z)); + printf("\t(1 + (%.17e) ^ (%.17e);\n", V9, Z); + printf("\tdiffers from correct value by %.17e .\n", Q); + printf("\tThis much error may spoil financial\n"); + printf("\tcalculations involving tiny interest rates.\n"); + break; + } + else { + Z = (Y - X) * Two + Y; + X = Y; + Y = Z; + Z = One + (X - F9)*(X - F9); + if (Z > One && I < NoTrials) I++; + else { + if (X > One) { + if (N == 0) + printf("Accuracy seems adequate.\n"); + break; + } + else { + X = One + U2; + Y = U2 + U2; + Y += X; + I = 1; + } + } + } + } + /*=============================================*/ + Milestone = 150; + /*=============================================*/ + printf("Testing powers Z^Q at four nearly extreme values.\n"); + N = 0; + Z = A1; + Q = FLOOR(Half - LOG(C) / LOG(A1)); + Break = False; + do { + X = CInvrse; + Y = POW(Z, Q); + IsYeqX(); + Q = - Q; + X = C; + Y = POW(Z, Q); + IsYeqX(); + if (Z < One) Break = True; + else Z = AInvrse; + } while ( ! (Break)); + PrintIfNPositive(); + if (N == 0) printf(" ... no discrepancies found.\n"); + printf("\n"); - /*=============================================*/ - Milestone = 160; - /*=============================================*/ - Pause(); - printf("Searching for Overflow threshold:\n"); - printf("This may generate an error.\n"); - Y = - CInvrse; - V9 = HInvrse * Y; - sigsave = sigfpe; - if (setjmp(ovfl_buf)) { I = 0; V9 = Y; goto overflow; } - do { - V = Y; - Y = V9; - V9 = HInvrse * Y; - } while(V9 < Y); - I = 1; + /*=============================================*/ + Milestone = 160; + /*=============================================*/ + Pause(); + printf("Searching for Overflow threshold:\n"); + printf("This may generate an error.\n"); + Y = - CInvrse; + V9 = HInvrse * Y; + sigsave = sigfpe; + if (setjmp(ovfl_buf)) { I = 0; V9 = Y; goto overflow; } + do { + V = Y; + Y = V9; + V9 = HInvrse * Y; + } while(V9 < Y); + I = 1; overflow: - sigsave = 0; - Z = V9; - printf("Can `Z = -Y' overflow?\n"); - printf("Trying it on Y = %.17e .\n", Y); - V9 = - Y; - V0 = V9; - if (V - Y == V + V0) printf("Seems O.K.\n"); - else { - printf("finds a "); - BadCond(Flaw, "-(-Y) differs from Y.\n"); - } - if (Z != Y) { - BadCond(Serious, ""); - printf("overflow past %.17e\n\tshrinks to %.17e .\n", Y, Z); - } - if (I) { - Y = V * (HInvrse * U2 - HInvrse); - Z = Y + ((One - HInvrse) * U2) * V; - if (Z < V0) Y = Z; - if (Y < V0) V = Y; - if (V0 - V < V0) V = V0; - } - else { - V = Y * (HInvrse * U2 - HInvrse); - V = V + ((One - HInvrse) * U2) * Y; - } - printf("Overflow threshold is V = %.17e .\n", V); - if (I) printf("Overflow saturates at V0 = %.17e .\n", V0); - else printf("There is no saturation value because the system traps on overflow.\n"); - V9 = V * One; - printf("No Overflow should be signaled for V * 1 = %.17e\n", V9); - V9 = V / One; - printf(" nor for V / 1 = %.17e .\n", V9); - printf("Any overflow signal separating this * from the one\n"); - printf("above is a DEFECT.\n"); - /*=============================================*/ - Milestone = 170; - /*=============================================*/ - if (!(-V < V && -V0 < V0 && -UfThold < V && UfThold < V)) { - BadCond(Failure, "Comparisons involving "); - printf("+-%g, +-%g\nand +-%g are confused by Overflow.", - V, V0, UfThold); - } - /*=============================================*/ - Milestone = 175; - /*=============================================*/ - printf("\n"); - for(Indx = 1; Indx <= 3; ++Indx) { - switch (Indx) { - case 1: Z = UfThold; break; - case 2: Z = E0; break; - case 3: Z = PseudoZero; break; - } - if (Z != Zero) { - V9 = SQRT(Z); - Y = V9 * V9; - if (Y / (One - Radix * E9) < Z - || Y > (One + Radix * E9) * Z) { /* dgh: + E9 --> * E9 */ - if (V9 > U1) BadCond(Serious, ""); - else BadCond(Defect, ""); - printf("Comparison alleges that what prints as Z = %.17e\n", Z); - printf(" is too far from sqrt(Z) ^ 2 = %.17e .\n", Y); - } - } - } - /*=============================================*/ - Milestone = 180; - /*=============================================*/ - for(Indx = 1; Indx <= 2; ++Indx) { - if (Indx == 1) Z = V; - else Z = V0; - V9 = SQRT(Z); - X = (One - Radix * E9) * V9; - V9 = V9 * X; - if (((V9 < (One - Two * Radix * E9) * Z) || (V9 > Z))) { - Y = V9; - if (X < W) BadCond(Serious, ""); - else BadCond(Defect, ""); - printf("Comparison alleges that Z = %17e\n", Z); - printf(" is too far from sqrt(Z) ^ 2 (%.17e) .\n", Y); - } - } - /*=============================================*/ - /*SPLIT - } + sigsave = 0; + Z = V9; + printf("Can 'Z = -Y' overflow?\n"); + printf("Trying it on Y = %.17e .\n", Y); + V9 = - Y; + V0 = V9; + if (V - Y == V + V0) printf("Seems O.K.\n"); + else { + printf("finds a "); + BadCond(Flaw, "-(-Y) differs from Y.\n"); + } + if (Z != Y) { + BadCond(Serious, ""); + printf("overflow past %.17e\n\tshrinks to %.17e .\n", Y, Z); + } + if (I) { + Y = V * (HInvrse * U2 - HInvrse); + Z = Y + ((One - HInvrse) * U2) * V; + if (Z < V0) Y = Z; + if (Y < V0) V = Y; + if (V0 - V < V0) V = V0; + } + else { + V = Y * (HInvrse * U2 - HInvrse); + V = V + ((One - HInvrse) * U2) * Y; + } + printf("Overflow threshold is V = %.17e .\n", V); + if (I) printf("Overflow saturates at V0 = %.17e .\n", V0); + else printf("There is no saturation value because the system traps on overflow.\n"); + V9 = V * One; + printf("No Overflow should be signaled for V * 1 = %.17e\n", V9); + V9 = V / One; + printf(" nor for V / 1 = %.17e .\n", V9); + printf("Any overflow signal separating this * from the one\n"); + printf("above is a DEFECT.\n"); + /*=============================================*/ + Milestone = 170; + /*=============================================*/ + if (!(-V < V && -V0 < V0 && -UfThold < V && UfThold < V)) { + BadCond(Failure, "Comparisons involving "); + printf("+-%g, +-%g\nand +-%g are confused by Overflow.", + V, V0, UfThold); + } + /*=============================================*/ + Milestone = 175; + /*=============================================*/ + printf("\n"); + for(Indx = 1; Indx <= 3; ++Indx) { + switch (Indx) { + case 1: Z = UfThold; break; + case 2: Z = E0; break; + case 3: Z = PseudoZero; break; + } + if (Z != Zero) { + V9 = SQRT(Z); + Y = V9 * V9; + if (Y / (One - Radix * E9) < Z + || Y > (One + Radix * E9) * Z) { /* dgh: + E9 --> * E9 */ + if (V9 > U1) BadCond(Serious, ""); + else BadCond(Defect, ""); + printf("Comparison alleges that what prints as Z = %.17e\n", Z); + printf(" is too far from sqrt(Z) ^ 2 = %.17e .\n", Y); + } + } + } + /*=============================================*/ + Milestone = 180; + /*=============================================*/ + for(Indx = 1; Indx <= 2; ++Indx) { + if (Indx == 1) Z = V; + else Z = V0; + V9 = SQRT(Z); + X = (One - Radix * E9) * V9; + V9 = V9 * X; + if (((V9 < (One - Two * Radix * E9) * Z) || (V9 > Z))) { + Y = V9; + if (X < W) BadCond(Serious, ""); + else BadCond(Defect, ""); + printf("Comparison alleges that Z = %17e\n", Z); + printf(" is too far from sqrt(Z) ^ 2 (%.17e) .\n", Y); + } + } + /*=============================================*/ + /*SPLIT + } #include "paranoia.h" part8(){ */ - Milestone = 190; - /*=============================================*/ - Pause(); - X = UfThold * V; - Y = Radix * Radix; - if (X*Y < One || X > Y) { - if (X * Y < U1 || X > Y/U1) BadCond(Defect, "Badly"); - else BadCond(Flaw, ""); + Milestone = 190; + /*=============================================*/ + Pause(); + X = UfThold * V; + Y = Radix * Radix; + if (X*Y < One || X > Y) { + if (X * Y < U1 || X > Y/U1) BadCond(Defect, "Badly"); + else BadCond(Flaw, ""); - printf(" unbalanced range; UfThold * V = %.17e\n\t%s\n", - X, "is too far from 1.\n"); - } - /*=============================================*/ - Milestone = 200; - /*=============================================*/ - for (Indx = 1; Indx <= 5; ++Indx) { - X = F9; - switch (Indx) { - case 2: X = One + U2; break; - case 3: X = V; break; - case 4: X = UfThold; break; - case 5: X = Radix; - } - Y = X; - sigsave = sigfpe; - if (setjmp(ovfl_buf)) - printf(" X / X traps when X = %g\n", X); - else { - V9 = (Y / X - Half) - Half; - if (V9 == Zero) continue; - if (V9 == - U1 && Indx < 5) BadCond(Flaw, ""); - else BadCond(Serious, ""); - printf(" X / X differs from 1 when X = %.17e\n", X); - printf(" instead, X / X - 1/2 - 1/2 = %.17e .\n", V9); - } - sigsave = 0; - } - /*=============================================*/ - Milestone = 210; - /*=============================================*/ - MyZero = Zero; - printf("\n"); - printf("What message and/or values does Division by Zero produce?\n") ; + printf(" unbalanced range; UfThold * V = %.17e\n\t%s\n", + X, "is too far from 1.\n"); + } + /*=============================================*/ + Milestone = 200; + /*=============================================*/ + for (Indx = 1; Indx <= 5; ++Indx) { + X = F9; + switch (Indx) { + case 2: X = One + U2; break; + case 3: X = V; break; + case 4: X = UfThold; break; + case 5: X = Radix; + } + Y = X; + sigsave = sigfpe; + if (setjmp(ovfl_buf)) + printf(" X / X traps when X = %g\n", X); + else { + V9 = (Y / X - Half) - Half; + if (V9 == Zero) continue; + if (V9 == - U1 && Indx < 5) BadCond(Flaw, ""); + else BadCond(Serious, ""); + printf(" X / X differs from 1 when X = %.17e\n", X); + printf(" instead, X / X - 1/2 - 1/2 = %.17e .\n", V9); + } + sigsave = 0; + } + /*=============================================*/ + Milestone = 210; + /*=============================================*/ + MyZero = Zero; + printf("\n"); + printf("What message and/or values does Division by Zero produce?\n") ; #ifndef NOPAUSE - printf("This can interupt your program. You can "); - printf("skip this part if you wish.\n"); - printf("Do you wish to compute 1 / 0? "); - fflush(stdout); - read (KEYBOARD, ch, 8); - if ((ch[0] == 'Y') || (ch[0] == 'y')) { + printf("This can interupt your program. You can "); + printf("skip this part if you wish.\n"); + printf("Do you wish to compute 1 / 0? "); + fflush(stdout); + read (KEYBOARD, ch, 8); + if ((ch[0] == 'Y') || (ch[0] == 'y')) { #endif - sigsave = sigfpe; - printf(" Trying to compute 1 / 0 produces ..."); - if (!setjmp(ovfl_buf)) printf(" %.7e .\n", One / MyZero); - sigsave = 0; + sigsave = sigfpe; + printf(" Trying to compute 1 / 0 produces ..."); + if (!setjmp(ovfl_buf)) printf(" %.7e .\n", One / MyZero); + sigsave = 0; #ifndef NOPAUSE - } - else printf("O.K.\n"); - printf("\nDo you wish to compute 0 / 0? "); - fflush(stdout); - read (KEYBOARD, ch, 80); - if ((ch[0] == 'Y') || (ch[0] == 'y')) { + } + else printf("O.K.\n"); + printf("\nDo you wish to compute 0 / 0? "); + fflush(stdout); + read (KEYBOARD, ch, 80); + if ((ch[0] == 'Y') || (ch[0] == 'y')) { #endif - sigsave = sigfpe; - printf("\n Trying to compute 0 / 0 produces ..."); - if (!setjmp(ovfl_buf)) printf(" %.7e .\n", Zero / MyZero); - sigsave = 0; + sigsave = sigfpe; + printf("\n Trying to compute 0 / 0 produces ..."); + if (!setjmp(ovfl_buf)) printf(" %.7e .\n", Zero / MyZero); + sigsave = 0; #ifndef NOPAUSE - } - else printf("O.K.\n"); + } + else printf("O.K.\n"); #endif - /*=============================================*/ - Milestone = 220; - /*=============================================*/ - Pause(); - printf("\n"); - { - static char *msg[] = { - "FAILUREs encountered =", - "SERIOUS DEFECTs discovered =", - "DEFECTs discovered =", - "FLAWs discovered =" }; - int i; - for(i = 0; i < 4; i++) if (ErrCnt[i]) - printf("The number of %-29s %d.\n", - msg[i], ErrCnt[i]); - } - printf("\n"); - if ((ErrCnt[Failure] + ErrCnt[Serious] + ErrCnt[Defect] - + ErrCnt[Flaw]) > 0) { - if ((ErrCnt[Failure] + ErrCnt[Serious] + ErrCnt[ - Defect] == 0) && (ErrCnt[Flaw] > 0)) { - printf("The arithmetic diagnosed seems "); - printf("Satisfactory though flawed.\n"); - } - if ((ErrCnt[Failure] + ErrCnt[Serious] == 0) - && ( ErrCnt[Defect] > 0)) { - printf("The arithmetic diagnosed may be Acceptable\n"); - printf("despite inconvenient Defects.\n"); - } - if ((ErrCnt[Failure] + ErrCnt[Serious]) > 0) { - printf("The arithmetic diagnosed has "); - printf("unacceptable Serious Defects.\n"); - } - if (ErrCnt[Failure] > 0) { - printf("Potentially fatal FAILURE may have spoiled this"); - printf(" program's subsequent diagnoses.\n"); - } - } - else { - printf("No failures, defects nor flaws have been discovered.\n"); - if (! ((RMult == Rounded) && (RDiv == Rounded) - && (RAddSub == Rounded) && (RSqrt == Rounded))) - printf("The arithmetic diagnosed seems Satisfactory.\n"); - else { - if (StickyBit >= One && - (Radix - Two) * (Radix - Nine - One) == Zero) { - printf("Rounding appears to conform to "); - printf("the proposed IEEE standard P"); - if ((Radix == Two) && - ((Precision - Four * Three * Two) * - ( Precision - TwentySeven - - TwentySeven + One) == Zero)) - printf("754"); - else printf("854"); - if (IEEE) printf(".\n"); - else { - printf(",\nexcept for possibly Double Rounding"); - printf(" during Gradual Underflow.\n"); - } - } - printf("The arithmetic diagnosed appears to be Excellent!\n"); - } - } - if (fpecount) - printf("\nA total of %d floating point exceptions were registered.\n", - fpecount); - printf("END OF TEST.\n"); - return 0; - } + /*=============================================*/ + Milestone = 220; + /*=============================================*/ + Pause(); + printf("\n"); + { + static char *msg[] = { + "FAILUREs encountered =", + "SERIOUS DEFECTs discovered =", + "DEFECTs discovered =", + "FLAWs discovered =" }; + int i; + for(i = 0; i < 4; i++) if (ErrCnt[i]) + printf("The number of %-29s %d.\n", + msg[i], ErrCnt[i]); + } + printf("\n"); + if ((ErrCnt[Failure] + ErrCnt[Serious] + ErrCnt[Defect] + + ErrCnt[Flaw]) > 0) { + if ((ErrCnt[Failure] + ErrCnt[Serious] + ErrCnt[ + Defect] == 0) && (ErrCnt[Flaw] > 0)) { + printf("The arithmetic diagnosed seems "); + printf("Satisfactory though flawed.\n"); + } + if ((ErrCnt[Failure] + ErrCnt[Serious] == 0) + && ( ErrCnt[Defect] > 0)) { + printf("The arithmetic diagnosed may be Acceptable\n"); + printf("despite inconvenient Defects.\n"); + } + if ((ErrCnt[Failure] + ErrCnt[Serious]) > 0) { + printf("The arithmetic diagnosed has "); + printf("unacceptable Serious Defects.\n"); + } + if (ErrCnt[Failure] > 0) { + printf("Potentially fatal FAILURE may have spoiled this"); + printf(" program's subsequent diagnoses.\n"); + } + } + else { + printf("No failures, defects nor flaws have been discovered.\n"); + if (! ((RMult == Rounded) && (RDiv == Rounded) + && (RAddSub == Rounded) && (RSqrt == Rounded))) + printf("The arithmetic diagnosed seems Satisfactory.\n"); + else { + if (StickyBit >= One && + (Radix - Two) * (Radix - Nine - One) == Zero) { + printf("Rounding appears to conform to "); + printf("the proposed IEEE standard P"); + if ((Radix == Two) && + ((Precision - Four * Three * Two) * + ( Precision - TwentySeven - + TwentySeven + One) == Zero)) + printf("754"); + else printf("854"); + if (IEEE) printf(".\n"); + else { + printf(",\nexcept for possibly Double Rounding"); + printf(" during Gradual Underflow.\n"); + } + } + printf("The arithmetic diagnosed appears to be Excellent!\n"); + } + } + if (fpecount) + printf("\nA total of %d floating point exceptions were registered.\n", + fpecount); + printf("END OF TEST.\n"); + return 0; + } /*SPLIT subs.c #include "paranoia.h" @@ -1868,17 +1868,17 @@ FLOAT X; Pause() { #ifndef NOPAUSE - char ch[8]; + char ch[8]; - printf("\nTo continue, press RETURN"); - fflush(stdout); - read(KEYBOARD, ch, 8); + printf("\nTo continue, press RETURN"); + fflush(stdout); + read(KEYBOARD, ch, 8); #endif - printf("\nDiagnosis resumes after milestone Number %d", Milestone); - printf(" Page: %d\n\n", PageNo); - ++Milestone; - ++PageNo; - } + printf("\nDiagnosis resumes after milestone Number %d", Milestone); + printf(" Page: %d\n\n", PageNo); + ++Milestone; + ++PageNo; + } /* TstCond */ @@ -1891,11 +1891,11 @@ BadCond(K, T) int K; char *T; { - static char *msg[] = { "FAILURE", "SERIOUS DEFECT", "DEFECT", "FLAW" }; + static char *msg[] = { "FAILURE", "SERIOUS DEFECT", "DEFECT", "FLAW" }; - ErrCnt [K] = ErrCnt [K] + 1; - printf("%s: %s", msg[K], T); - } + ErrCnt [K] = ErrCnt [K] + 1; + printf("%s: %s", msg[K], T); + } /* Random */ /* Random computes @@ -1906,174 +1906,174 @@ char *T; FLOAT Random() { - FLOAT X, Y; + FLOAT X, Y; - X = Random1 + Random9; - Y = X * X; - Y = Y * Y; - X = X * Y; - Y = X - FLOOR(X); - Random1 = Y + X * 0.000005; - return(Random1); - } + X = Random1 + Random9; + Y = X * X; + Y = Y * Y; + X = X * Y; + Y = X - FLOOR(X); + Random1 = Y + X * 0.000005; + return(Random1); + } /* SqXMinX */ SqXMinX (ErrKind) int ErrKind; { - FLOAT XA, XB; + FLOAT XA, XB; - XB = X * BInvrse; - XA = X - XB; - SqEr = ((SQRT(X * X) - XB) - XA) / OneUlp; - if (SqEr != Zero) { - if (SqEr < MinSqEr) MinSqEr = SqEr; - if (SqEr > MaxSqEr) MaxSqEr = SqEr; - J = J + 1.0; - BadCond(ErrKind, "\n"); - printf("sqrt( %.17e) - %.17e = %.17e\n", X * X, X, OneUlp * SqEr); - printf("\tinstead of correct value 0 .\n"); - } - } + XB = X * BInvrse; + XA = X - XB; + SqEr = ((SQRT(X * X) - XB) - XA) / OneUlp; + if (SqEr != Zero) { + if (SqEr < MinSqEr) MinSqEr = SqEr; + if (SqEr > MaxSqEr) MaxSqEr = SqEr; + J = J + 1.0; + BadCond(ErrKind, "\n"); + printf("sqrt( %.17e) - %.17e = %.17e\n", X * X, X, OneUlp * SqEr); + printf("\tinstead of correct value 0 .\n"); + } + } /* NewD */ NewD() { - X = Z1 * Q; - X = FLOOR(Half - X / Radix) * Radix + X; - Q = (Q - X * Z) / Radix + X * X * (D / Radix); - Z = Z - Two * X * D; - if (Z <= Zero) { - Z = - Z; - Z1 = - Z1; - } - D = Radix * D; - } + X = Z1 * Q; + X = FLOOR(Half - X / Radix) * Radix + X; + Q = (Q - X * Z) / Radix + X * X * (D / Radix); + Z = Z - Two * X * D; + if (Z <= Zero) { + Z = - Z; + Z1 = - Z1; + } + D = Radix * D; + } /* SR3750 */ SR3750() { - if (! ((X - Radix < Z2 - Radix) || (X - Z2 > W - Z2))) { - I = I + 1; - X2 = SQRT(X * D); - Y2 = (X2 - Z2) - (Y - Z2); - X2 = X8 / (Y - Half); - X2 = X2 - Half * X2 * X2; - SqEr = (Y2 + Half) + (Half - X2); - if (SqEr < MinSqEr) MinSqEr = SqEr; - SqEr = Y2 - X2; - if (SqEr > MaxSqEr) MaxSqEr = SqEr; - } - } + if (! ((X - Radix < Z2 - Radix) || (X - Z2 > W - Z2))) { + I = I + 1; + X2 = SQRT(X * D); + Y2 = (X2 - Z2) - (Y - Z2); + X2 = X8 / (Y - Half); + X2 = X2 - Half * X2 * X2; + SqEr = (Y2 + Half) + (Half - X2); + if (SqEr < MinSqEr) MinSqEr = SqEr; + SqEr = Y2 - X2; + if (SqEr > MaxSqEr) MaxSqEr = SqEr; + } + } /* IsYeqX */ IsYeqX() { - if (Y != X) { - if (N <= 0) { - if (Z == Zero && Q <= Zero) - printf("WARNING: computing\n"); - else BadCond(Defect, "computing\n"); - printf("\t(%.17e) ^ (%.17e)\n", Z, Q); - printf("\tyielded %.17e;\n", Y); - printf("\twhich compared unequal to correct %.17e ;\n", - X); - printf("\t\tthey differ by %.17e .\n", Y - X); - } - N = N + 1; /* ... count discrepancies. */ - } - } + if (Y != X) { + if (N <= 0) { + if (Z == Zero && Q <= Zero) + printf("WARNING: computing\n"); + else BadCond(Defect, "computing\n"); + printf("\t(%.17e) ^ (%.17e)\n", Z, Q); + printf("\tyielded %.17e;\n", Y); + printf("\twhich compared unequal to correct %.17e ;\n", + X); + printf("\t\tthey differ by %.17e .\n", Y - X); + } + N = N + 1; /* ... count discrepancies. */ + } + } /* SR3980 */ SR3980() { - do { - Q = (FLOAT) I; - Y = POW(Z, Q); - IsYeqX(); - if (++I > M) break; - X = Z * X; - } while ( X < W ); - } + do { + Q = (FLOAT) I; + Y = POW(Z, Q); + IsYeqX(); + if (++I > M) break; + X = Z * X; + } while ( X < W ); + } /* PrintIfNPositive */ PrintIfNPositive() { - if (N > 0) printf("Similar discrepancies have occurred %d times.\n", N); - } + if (N > 0) printf("Similar discrepancies have occurred %d times.\n", N); + } /* TstPtUf */ TstPtUf() { - N = 0; - if (Z != Zero) { - printf("Since comparison denies Z = 0, evaluating "); - printf("(Z + Z) / Z should be safe.\n"); - sigsave = sigfpe; - if (setjmp(ovfl_buf)) goto very_serious; - Q9 = (Z + Z) / Z; - printf("What the machine gets for (Z + Z) / Z is %.17e .\n", - Q9); - if (FABS(Q9 - Two) < Radix * U2) { - printf("This is O.K., provided Over/Underflow"); - printf(" has NOT just been signaled.\n"); - } - else { - if ((Q9 < One) || (Q9 > Two)) { + N = 0; + if (Z != Zero) { + printf("Since comparison denies Z = 0, evaluating "); + printf("(Z + Z) / Z should be safe.\n"); + sigsave = sigfpe; + if (setjmp(ovfl_buf)) goto very_serious; + Q9 = (Z + Z) / Z; + printf("What the machine gets for (Z + Z) / Z is %.17e .\n", + Q9); + if (FABS(Q9 - Two) < Radix * U2) { + printf("This is O.K., provided Over/Underflow"); + printf(" has NOT just been signaled.\n"); + } + else { + if ((Q9 < One) || (Q9 > Two)) { very_serious: - N = 1; - ErrCnt [Serious] = ErrCnt [Serious] + 1; - printf("This is a VERY SERIOUS DEFECT!\n"); - } - else { - N = 1; - ErrCnt [Defect] = ErrCnt [Defect] + 1; - printf("This is a DEFECT!\n"); - } - } - sigsave = 0; - V9 = Z * One; - Random1 = V9; - V9 = One * Z; - Random2 = V9; - V9 = Z / One; - if ((Z == Random1) && (Z == Random2) && (Z == V9)) { - if (N > 0) Pause(); - } - else { - N = 1; - BadCond(Defect, "What prints as Z = "); - printf("%.17e\n\tcompares different from ", Z); - if (Z != Random1) printf("Z * 1 = %.17e ", Random1); - if (! ((Z == Random2) - || (Random2 == Random1))) - printf("1 * Z == %g\n", Random2); - if (! (Z == V9)) printf("Z / 1 = %.17e\n", V9); - if (Random2 != Random1) { - ErrCnt [Defect] = ErrCnt [Defect] + 1; - BadCond(Defect, "Multiplication does not commute!\n"); - printf("\tComparison alleges that 1 * Z = %.17e\n", - Random2); - printf("\tdiffers from Z * 1 = %.17e\n", Random1); - } - Pause(); - } - } - } + N = 1; + ErrCnt [Serious] = ErrCnt [Serious] + 1; + printf("This is a VERY SERIOUS DEFECT!\n"); + } + else { + N = 1; + ErrCnt [Defect] = ErrCnt [Defect] + 1; + printf("This is a DEFECT!\n"); + } + } + sigsave = 0; + V9 = Z * One; + Random1 = V9; + V9 = One * Z; + Random2 = V9; + V9 = Z / One; + if ((Z == Random1) && (Z == Random2) && (Z == V9)) { + if (N > 0) Pause(); + } + else { + N = 1; + BadCond(Defect, "What prints as Z = "); + printf("%.17e\n\tcompares different from ", Z); + if (Z != Random1) printf("Z * 1 = %.17e ", Random1); + if (! ((Z == Random2) + || (Random2 == Random1))) + printf("1 * Z == %g\n", Random2); + if (! (Z == V9)) printf("Z / 1 = %.17e\n", V9); + if (Random2 != Random1) { + ErrCnt [Defect] = ErrCnt [Defect] + 1; + BadCond(Defect, "Multiplication does not commute!\n"); + printf("\tComparison alleges that 1 * Z = %.17e\n", + Random2); + printf("\tdiffers from Z * 1 = %.17e\n", Random1); + } + Pause(); + } + } + } notify(s) char *s; { - printf("%s test appears to be inconsistent...\n", s); - printf(" PLEASE NOTIFY KARPINKSI!\n"); - } + printf("%s test appears to be inconsistent...\n", s); + printf(" PLEASE NOTIFY KARPINKSI!\n"); + } /*SPLIT msgs.c */ @@ -2086,134 +2086,134 @@ char **s; Instructions() { static char *instr[] = { - "Lest this program stop prematurely, i.e. before displaying\n", - " `END OF TEST',\n", - "try to persuade the computer NOT to terminate execution when an", - "error like Over/Underflow or Division by Zero occurs, but rather", - "to persevere with a surrogate value after, perhaps, displaying some", - "warning. If persuasion avails naught, don't despair but run this", - "program anyway to see how many milestones it passes, and then", - "amend it to make further progress.\n", - "Answer questions with Y, y, N or n (unless otherwise indicated).\n", - 0}; + "Lest this program stop prematurely, i.e. before displaying\n", + " 'END OF TEST',\n", + "try to persuade the computer NOT to terminate execution when an", + "error like Over/Underflow or Division by Zero occurs, but rather", + "to persevere with a surrogate value after, perhaps, displaying some", + "warning. If persuasion avails naught, don't despair but run this", + "program anyway to see how many milestones it passes, and then", + "amend it to make further progress.\n", + "Answer questions with Y, y, N or n (unless otherwise indicated).\n", + 0}; - msglist(instr); - } + msglist(instr); + } /* Heading */ Heading() { static char *head[] = { - "Users are invited to help debug and augment this program so it will", - "cope with unanticipated and newly uncovered arithmetic pathologies.\n", - "Please send suggestions and interesting results to", - "\tRichard Karpinski", - "\tComputer Center U-76", - "\tUniversity of California", - "\tSan Francisco, CA 94143-0704, USA\n", - "In doing so, please include the following information:", + "Users are invited to help debug and augment this program so it will", + "cope with unanticipated and newly uncovered arithmetic pathologies.\n", + "Please send suggestions and interesting results to", + "\tRichard Karpinski", + "\tComputer Center U-76", + "\tUniversity of California", + "\tSan Francisco, CA 94143-0704, USA\n", + "In doing so, please include the following information:", #ifdef Single - "\tPrecision:\tsingle;", + "\tPrecision:\tsingle;", #else - "\tPrecision:\tdouble;", + "\tPrecision:\tdouble;", #endif - "\tVersion:\t10 February 1989;", - "\tComputer:\n", - "\tCompiler:\n", - "\tOptimization level:\n", - "\tOther relevant compiler options:", - 0}; + "\tVersion:\t10 February 1989;", + "\tComputer:\n", + "\tCompiler:\n", + "\tOptimization level:\n", + "\tOther relevant compiler options:", + 0}; - msglist(head); - } + msglist(head); + } /* Characteristics */ Characteristics() { - static char *chars[] = { - "Running this program should reveal these characteristics:", - " Radix = 1, 2, 4, 8, 10, 16, 100, 256 ...", - " Precision = number of significant digits carried.", - " U2 = Radix/Radix^Precision = One Ulp", - "\t(OneUlpnit in the Last Place) of 1.000xxx .", - " U1 = 1/Radix^Precision = One Ulp of numbers a little less than 1.0 .", - " Adequacy of guard digits for Mult., Div. and Subt.", - " Whether arithmetic is chopped, correctly rounded, or something else", - "\tfor Mult., Div., Add/Subt. and Sqrt.", - " Whether a Sticky Bit used correctly for rounding.", - " UnderflowThreshold = an underflow threshold.", - " E0 and PseudoZero tell whether underflow is abrupt, gradual, or fuzzy.", - " V = an overflow threshold, roughly.", - " V0 tells, roughly, whether Infinity is represented.", - " Comparisions are checked for consistency with subtraction", - "\tand for contamination with pseudo-zeros.", - " Sqrt is tested. Y^X is not tested.", - " Extra-precise subexpressions are revealed but NOT YET tested.", - " Decimal-Binary conversion is NOT YET tested for accuracy.", - 0}; + static char *chars[] = { + "Running this program should reveal these characteristics:", + " Radix = 1, 2, 4, 8, 10, 16, 100, 256 ...", + " Precision = number of significant digits carried.", + " U2 = Radix/Radix^Precision = One Ulp", + "\t(OneUlpnit in the Last Place) of 1.000xxx .", + " U1 = 1/Radix^Precision = One Ulp of numbers a little less than 1.0 .", + " Adequacy of guard digits for Mult., Div. and Subt.", + " Whether arithmetic is chopped, correctly rounded, or something else", + "\tfor Mult., Div., Add/Subt. and Sqrt.", + " Whether a Sticky Bit used correctly for rounding.", + " UnderflowThreshold = an underflow threshold.", + " E0 and PseudoZero tell whether underflow is abrupt, gradual, or fuzzy.", + " V = an overflow threshold, roughly.", + " V0 tells, roughly, whether Infinity is represented.", + " Comparisions are checked for consistency with subtraction", + "\tand for contamination with pseudo-zeros.", + " Sqrt is tested. Y^X is not tested.", + " Extra-precise subexpressions are revealed but NOT YET tested.", + " Decimal-Binary conversion is NOT YET tested for accuracy.", + 0}; - msglist(chars); - } + msglist(chars); + } History() { /* History */ /* Converted from Brian Wichmann's Pascal version to C by Thos Sumner, - with further massaging by David M. Gay. */ + with further massaging by David M. Gay. */ static char *hist[] = { - "The program attempts to discriminate among", - " FLAWs, like lack of a sticky bit,", - " Serious DEFECTs, like lack of a guard digit, and", - " FAILUREs, like 2+2 == 5 .", - "Failures may confound subsequent diagnoses.\n", - "The diagnostic capabilities of this program go beyond an earlier", - "program called `MACHAR', which can be found at the end of the", - "book `Software Manual for the Elementary Functions' (1980) by", - "W. J. Cody and W. Waite. Although both programs try to discover", - "the Radix, Precision and range (over/underflow thresholds)", - "of the arithmetic, this program tries to cope with a wider variety", - "of pathologies, and to say how well the arithmetic is implemented.", - "\nThe program is based upon a conventional radix representation for", - "floating-point numbers, but also allows logarithmic encoding", - "as used by certain early WANG machines.\n", - "BASIC version of this program (C) 1983 by Prof. W. M. Kahan;", - "see source comments for more history.", - 0}; + "The program attempts to discriminate among", + " FLAWs, like lack of a sticky bit,", + " Serious DEFECTs, like lack of a guard digit, and", + " FAILUREs, like 2+2 == 5 .", + "Failures may confound subsequent diagnoses.\n", + "The diagnostic capabilities of this program go beyond an earlier", + "program called 'MACHAR', which can be found at the end of the", + "book 'Software Manual for the Elementary Functions' (1980) by", + "W. J. Cody and W. Waite. Although both programs try to discover", + "the Radix, Precision and range (over/underflow thresholds)", + "of the arithmetic, this program tries to cope with a wider variety", + "of pathologies, and to say how well the arithmetic is implemented.", + "\nThe program is based upon a conventional radix representation for", + "floating-point numbers, but also allows logarithmic encoding", + "as used by certain early WANG machines.\n", + "BASIC version of this program (C) 1983 by Prof. W. M. Kahan;", + "see source comments for more history.", + 0}; - msglist(hist); - } + msglist(hist); + } double pow(x, y) /* return x ^ y (exponentiation) */ double x, y; { - extern double exp(), frexp(), ldexp(), log(), modf(); - double xy, ye; - long i; - int ex, ey = 0, flip = 0; + extern double exp(), frexp(), ldexp(), log(), modf(); + double xy, ye; + long i; + int ex, ey = 0, flip = 0; - if (!y) return 1.0; + if (!y) return 1.0; - if ((y < -1100. || y > 1100.) && x != -1.) return exp(y * log(x)); + if ((y < -1100. || y > 1100.) && x != -1.) return exp(y * log(x)); - if (y < 0.) { y = -y; flip = 1; } - y = modf(y, &ye); - if (y) xy = exp(y * log(x)); - else xy = 1.0; - /* next several lines assume >= 32 bit integers */ - x = frexp(x, &ex); - if (i = ye) for(;;) { - if (i & 1) { xy *= x; ey += ex; } - if (!(i >>= 1)) break; - x *= x; - ex *= 2; - if (x < .5) { x *= 2.; ex -= 1; } - } - if (flip) { xy = 1. / xy; ey = -ey; } - return ldexp(xy, ey); + if (y < 0.) { y = -y; flip = 1; } + y = modf(y, &ye); + if (y) xy = exp(y * log(x)); + else xy = 1.0; + /* next several lines assume >= 32 bit integers */ + x = frexp(x, &ex); + if (i = ye) for(;;) { + if (i & 1) { xy *= x; ey += ex; } + if (!(i >>= 1)) break; + x *= x; + ex *= 2; + if (x < .5) { x *= 2.; ex -= 1; } + } + if (flip) { xy = 1. / xy; ey = -ey; } + return ldexp(xy, ey); } #endif /* NO_FLOATS */ diff --git a/test/ref/pointer2.c b/test/ref/pointer2.c index d8c064ef3..cfa384268 100644 --- a/test/ref/pointer2.c +++ b/test/ref/pointer2.c @@ -1,112 +1,112 @@ -/* - !!DESCRIPTION!! pointer test - !!ORIGIN!! - !!LICENCE!! public domain -*/ - -#include "common.h" -#include <stdio.h> - -/* - check behaviour on incompletely declared arrays -*/ - -char i1[]; - -void test1(void) { -int a; - - a=sizeof(i1[0]); - printf("%04x - ",a); - if(sizeof(i1[0])==sizeof(char)) { - /* gcc gives size of element */ - printf("sizeof(i1[0]) gives size of element\n"); - } - if(sizeof(i1[0])==sizeof(char*)) { - printf("sizeof(i1[0]) gives size of pointer to element\n"); - } -} - -/* - check behaviour on string init -*/ - -char t1[]="abcde"; -char t2[]={"abcde"}; - -char *t3="abcde"; -char *t4={"abcde"}; - -void test2(void) { -char c1,c2,c3,c4; -int i,e=0; - for(i=0;i<5;i++){ - c1=t1[i];c2=t2[i];c3=t3[i];c4=t4[i]; -/* printf("%02x %02x %02x %02x\n",c1,c2,c3,c4); */ - printf("%c %c %c %c\n",c1,c2,c3,c4); - if(!((c1==c2)&(c1==c3)&(c1==c4))) e=1; - } - if(e) printf("test2 failed.\n"); - else printf("test2 ok.\n"); -} - -/* - check behaviour on extern-declarations inside functions -*/ - -typedef struct { - char *name; - void *func; -} A3; - -#ifdef NO_SLOPPY_STRUCT_INIT -A3 a3[] = { - { "test3", (void*) NULL }, - { "test3", (void*) NULL }, -}; -#else -/*gcc warning: missing braces around initializer (near initialization for `a3[0]') - this type of struct-initialization seems to be kinda common */ -A3 a3[] = { - "test3", (void*) NULL , - "test3", (void*) NULL , -}; -#endif - -void test3a(A3 *list, int number){ - printf("%s %d\n",list->name,number); -} - -static void test31(void) -{ - extern A3 a3[]; - test3a(a3, -1); -} - -#if 0 -/* this variation compiles and works with cc65, but gives an error with gcc :=P */ -static void test32(void) -{ - extern A3 *a3; - test3a(a3, -1); -} -#endif - -static void test30(void) -{ - test3a(a3, -1); -} - -/* - todo: add test on function pointers in the form of (*func)(arg) ... - cc65 seems to have problems here aswell ;/ -*/ - -int main(void) { - test1(); - test2(); - test30(); - test31(); -/* test32(); */ - return 0; -} +/* + !!DESCRIPTION!! pointer test + !!ORIGIN!! + !!LICENCE!! public domain +*/ + +#include "common.h" +#include <stdio.h> + +/* + check behaviour on incompletely declared arrays +*/ + +char i1[]; + +void test1(void) { +int a; + + a=sizeof(i1[0]); + printf("%04x - ",a); + if(sizeof(i1[0])==sizeof(char)) { + /* gcc gives size of element */ + printf("sizeof(i1[0]) gives size of element\n"); + } + if(sizeof(i1[0])==sizeof(char*)) { + printf("sizeof(i1[0]) gives size of pointer to element\n"); + } +} + +/* + check behaviour on string init +*/ + +char t1[]="abcde"; +char t2[]={"abcde"}; + +char *t3="abcde"; +char *t4={"abcde"}; + +void test2(void) { +char c1,c2,c3,c4; +int i,e=0; + for(i=0;i<5;i++){ + c1=t1[i];c2=t2[i];c3=t3[i];c4=t4[i]; +/* printf("%02x %02x %02x %02x\n",c1,c2,c3,c4); */ + printf("%c %c %c %c\n",c1,c2,c3,c4); + if(!((c1==c2)&(c1==c3)&(c1==c4))) e=1; + } + if(e) printf("test2 failed.\n"); + else printf("test2 ok.\n"); +} + +/* + check behaviour on extern-declarations inside functions +*/ + +typedef struct { + char *name; + void *func; +} A3; + +#ifdef NO_SLOPPY_STRUCT_INIT +A3 a3[] = { + { "test3", (void*) NULL }, + { "test3", (void*) NULL }, +}; +#else +/*gcc warning: missing braces around initializer (near initialization for `a3[0]') + this type of struct-initialization seems to be kinda common */ +A3 a3[] = { + "test3", (void*) NULL , + "test3", (void*) NULL , +}; +#endif + +void test3a(A3 *list, int number){ + printf("%s %d\n",list->name,number); +} + +static void test31(void) +{ + extern A3 a3[]; + test3a(a3, -1); +} + +#if 0 +/* this variation compiles and works with cc65, but gives an error with gcc :=P */ +static void test32(void) +{ + extern A3 *a3; + test3a(a3, -1); +} +#endif + +static void test30(void) +{ + test3a(a3, -1); +} + +/* + todo: add test on function pointers in the form of (*func)(arg) ... + cc65 seems to have problems here aswell ;/ +*/ + +int main(void) { + test1(); + test2(); + test30(); + test31(); +/* test32(); */ + return 0; +} diff --git a/test/ref/pr1220.c b/test/ref/pr1220.c new file mode 100644 index 000000000..0d5c1d800 --- /dev/null +++ b/test/ref/pr1220.c @@ -0,0 +1,360 @@ +/* PR #1220 - test constant ternary, AND and OR */ + +#include <stdio.h> + +/* test AND/OR, results as integers */ +#define CONTEXT_A(x) do {\ + s = 0, flags = 0, t = (x),\ + printf("%3d %2X: %d\n", s, flags, t);\ + } while (0) + +/* test AND/OR in ternary context */ +#define CONTEXT_B(x) do {\ + s = 0, flags = 0, t = (x ? 42 : -42),\ + printf("%3d %2X: %d\n", s, flags, t);\ + } while (0) + +int s, t; +unsigned flags; + +int f(int x) +/* The call to this function should be and only be skipped strictly according to +** the short-circuit evaluation rule. +*/ +{ + flags |= (x != 0) << s; + ++s; + return x; +} + +#define _A f(a) +#define _B f(b) +#define _C f(c) +#define _D f(d) +#define _T (f(0), 256) +#define _F (f(256), 0) + +void f0() +/* constant short-circuit */ +{ + printf("f0()\n"); + + CONTEXT_A(_T && _T && _T); + CONTEXT_A(_F && _F && _F); + + CONTEXT_A(_T || _T || _T); + CONTEXT_A(_F || _F || _F); + + CONTEXT_A(_T && _T || _T && _T); + CONTEXT_A(_F && _F || _F && _F); + CONTEXT_A(_T && _F || _T && _F); + CONTEXT_A(_F && _T || _F && _T); + + CONTEXT_A((_T && _T) || (_T && _T)); + CONTEXT_A((_F && _F) || (_F && _F)); + CONTEXT_A((_T && _F) || (_T && _F)); + CONTEXT_A((_F && _T) || (_F && _T)); + + CONTEXT_A((_T || _T) && (_T || _T)); + CONTEXT_A((_F || _F) && (_F || _F)); + CONTEXT_A((_T || _F) && (_T || _F)); + CONTEXT_A((_F || _T) && (_F || _T)); + + printf("\n"); +} + +void f1(int a, int b, int c) +/* AND */ +{ + printf("f1(%d, %d, %d)\n", a, b, c); + + CONTEXT_A(_A && _B && _C); + + CONTEXT_A(_T && _B && _C); + CONTEXT_A(_A && _T && _C); + CONTEXT_A(_A && _B && _T); + + CONTEXT_A(_F && _B && _C); + CONTEXT_A(_A && _F && _C); + CONTEXT_A(_A && _B && _F); + + CONTEXT_A(_T && _T && _C); + CONTEXT_A(_A && _T && _T); + CONTEXT_A(_T && _B && _T); + + printf("\n"); +} + +void f2(int a, int b, int c) +/* OR */ +{ + printf("f2(%d, %d, %d)\n", a, b, c); + + CONTEXT_A(_A || _B || _C); + + CONTEXT_A(_T || _B || _C); + CONTEXT_A(_A || _T || _C); + CONTEXT_A(_A || _B || _T); + + CONTEXT_A(_F || _B || _C); + CONTEXT_A(_A || _F || _C); + CONTEXT_A(_A || _B || _F); + + CONTEXT_A(_F || _F || _C); + CONTEXT_A(_A || _F || _F); + CONTEXT_A(_F || _B || _F); + + printf("\n"); +} + +void f3(int a, int b, int c, int d) +/* AND and OR */ +{ + printf("f3(%d, %d, %d, %d)\n", a, b, c, d); + + CONTEXT_A(_A && _B || _C && _D); + CONTEXT_A(_T && _T || _C && _D); + CONTEXT_A(_A && _B || _T && _T); + + CONTEXT_A(_T && _B || _C && _D); + CONTEXT_A(_A && _T || _C && _D); + CONTEXT_A(_A && _B || _T && _D); + CONTEXT_A(_A && _B || _C && _T); + + CONTEXT_A(_F && _B || _C && _D); + CONTEXT_A(_A && _F || _C && _D); + CONTEXT_A(_A && _B || _F && _D); + CONTEXT_A(_A && _B || _C && _F); + + printf("\n"); +} + +void f4(int a, int b, int c, int d) +/* AND as top-level expression inside OR context */ +{ + printf("f4(%d, %d, %d, %d)\n", a, b, c, d); + + CONTEXT_A((_A && _B) || (_C && _D)); + CONTEXT_A((_T && _T) || (_C && _D)); + CONTEXT_A((_A && _B) || (_T && _T)); + + CONTEXT_A((_T && _B) || (_C && _D)); + CONTEXT_A((_A && _T) || (_C && _D)); + CONTEXT_A((_A && _B) || (_T && _D)); + CONTEXT_A((_A && _B) || (_C && _T)); + + CONTEXT_A((_F && _B) || (_C && _D)); + CONTEXT_A((_A && _F) || (_C && _D)); + CONTEXT_A((_A && _B) || (_F && _D)); + CONTEXT_A((_A && _B) || (_C && _F)); + + printf("\n"); +} + +void f5(int a, int b, int c, int d) +/* OR as top-level expression inside AND context */ +{ + printf("f5(%d, %d, %d, %d)\n", a, b, c, d); + + CONTEXT_A((_A || _B) && (_C || _D)); + CONTEXT_A((_F || _F) && (_C || _D)); + CONTEXT_A((_A || _B) && (_F || _F)); + + CONTEXT_A((_T || _B) && (_C || _D)); + CONTEXT_A((_A || _T) && (_C || _D)); + CONTEXT_A((_A || _B) && (_T || _D)); + CONTEXT_A((_A || _B) && (_C || _T)); + + CONTEXT_A((_F || _B) && (_C || _D)); + CONTEXT_A((_A || _F) && (_C || _D)); + CONTEXT_A((_A || _B) && (_F || _D)); + CONTEXT_A((_A || _B) && (_C || _F)); + + printf("\n"); +} + +void f0_B() +/* constant short-circuit */ +{ + printf("f0_B()\n"); + + CONTEXT_B(_T && _T && _T); + CONTEXT_B(_F && _F && _F); + + CONTEXT_B(_T || _T || _T); + CONTEXT_B(_F || _F || _F); + + CONTEXT_B(_T && _T || _T && _T); + CONTEXT_B(_F && _F || _F && _F); + CONTEXT_B(_T && _F || _T && _F); + CONTEXT_B(_F && _T || _F && _T); + + CONTEXT_B((_T && _T) || (_T && _T)); + CONTEXT_B((_F && _F) || (_F && _F)); + CONTEXT_B((_T && _F) || (_T && _F)); + CONTEXT_B((_F && _T) || (_F && _T)); + + CONTEXT_B((_T || _T) && (_T || _T)); + CONTEXT_B((_F || _F) && (_F || _F)); + CONTEXT_B((_T || _F) && (_T || _F)); + CONTEXT_B((_F || _T) && (_F || _T)); + + printf("\n"); +} + +void f1_B(int a, int b, int c) +/* AND */ +{ + printf("f1_B(%d, %d, %d)\n", a, b, c); + + CONTEXT_B(_A && _B && _C); + + CONTEXT_B(_T && _B && _C); + CONTEXT_B(_A && _T && _C); + CONTEXT_B(_A && _B && _T); + + CONTEXT_B(_F && _B && _C); + CONTEXT_B(_A && _F && _C); + CONTEXT_B(_A && _B && _F); + + CONTEXT_B(_T && _T && _C); + CONTEXT_B(_A && _T && _T); + CONTEXT_B(_T && _B && _T); + + printf("\n"); +} + +void f2_B(int a, int b, int c) +/* OR */ +{ + printf("f2_B(%d, %d, %d)\n", a, b, c); + + CONTEXT_B(_A || _B || _C); + + CONTEXT_B(_T || _B || _C); + CONTEXT_B(_A || _T || _C); + CONTEXT_B(_A || _B || _T); + + CONTEXT_B(_F || _B || _C); + CONTEXT_B(_A || _F || _C); + CONTEXT_B(_A || _B || _F); + + CONTEXT_B(_F || _F || _C); + CONTEXT_B(_A || _F || _F); + CONTEXT_B(_F || _B || _F); + + printf("\n"); +} + +void f3_B(int a, int b, int c, int d) +/* AND and OR */ +{ + printf("f3_B(%d, %d, %d, %d)\n", a, b, c, d); + + CONTEXT_B(_A && _B || _C && _D); + CONTEXT_B(_T && _T || _C && _D); + CONTEXT_B(_A && _B || _T && _T); + + CONTEXT_B(_T && _B || _C && _D); + CONTEXT_B(_A && _T || _C && _D); + CONTEXT_B(_A && _B || _T && _D); + CONTEXT_B(_A && _B || _C && _T); + + CONTEXT_B(_F && _B || _C && _D); + CONTEXT_B(_A && _F || _C && _D); + CONTEXT_B(_A && _B || _F && _D); + CONTEXT_B(_A && _B || _C && _F); + + printf("\n"); +} + +void f4_B(int a, int b, int c, int d) +/* AND as top-level expression inside OR context */ +{ + printf("f4_B(%d, %d, %d, %d)\n", a, b, c, d); + + CONTEXT_B((_A && _B) || (_C && _D)); + CONTEXT_B((_T && _T) || (_C && _D)); + CONTEXT_B((_A && _B) || (_T && _T)); + + CONTEXT_B((_T && _B) || (_C && _D)); + CONTEXT_B((_A && _T) || (_C && _D)); + CONTEXT_B((_A && _B) || (_T && _D)); + CONTEXT_B((_A && _B) || (_C && _T)); + + CONTEXT_B((_F && _B) || (_C && _D)); + CONTEXT_B((_A && _F) || (_C && _D)); + CONTEXT_B((_A && _B) || (_F && _D)); + CONTEXT_B((_A && _B) || (_C && _F)); + + printf("\n"); +} + +void f5_B(int a, int b, int c, int d) +/* OR as top-level expression inside AND context */ +{ + printf("f5_B(%d, %d, %d, %d)\n", a, b, c, d); + + CONTEXT_B((_A || _B) && (_C || _D)); + CONTEXT_B((_F || _F) && (_C || _D)); + CONTEXT_B((_A || _B) && (_F || _F)); + + CONTEXT_B((_T || _B) && (_C || _D)); + CONTEXT_B((_A || _T) && (_C || _D)); + CONTEXT_B((_A || _B) && (_T || _D)); + CONTEXT_B((_A || _B) && (_C || _T)); + + CONTEXT_B((_F || _B) && (_C || _D)); + CONTEXT_B((_A || _F) && (_C || _D)); + CONTEXT_B((_A || _B) && (_F || _D)); + CONTEXT_B((_A || _B) && (_C || _F)); + + printf("\n"); +} + +int main() +{ + f0(); + + f1(0, 0, 0); + f2(0, 0, 0); + f3(0, 0, 0, 0); + f4(0, 0, 0, 0); + f5(0, 0, 0, 0); + + f1(1, 1, 1); + f2(1, 1, 1); + f3(1, 1, 1, 1); + f4(1, 1, 1, 1); + f5(1, 1, 1, 1); + + f3(1, 0, 1, 0); + f4(1, 0, 1, 0); + f5(1, 0, 1, 0); + f3(0, 1, 0, 1); + f4(0, 1, 0, 1); + f5(0, 1, 0, 1); + + f0_B(); + + f1_B(0, 0, 0); + f2_B(0, 0, 0); + f3_B(0, 0, 0, 0); + f4_B(0, 0, 0, 0); + f5_B(0, 0, 0, 0); + + f1_B(1, 1, 1); + f2_B(1, 1, 1); + f3_B(1, 1, 1, 1); + f4_B(1, 1, 1, 1); + f5_B(1, 1, 1, 1); + + f3_B(1, 0, 1, 0); + f4_B(1, 0, 1, 0); + f5_B(1, 0, 1, 0); + f3_B(0, 1, 0, 1); + f4_B(0, 1, 0, 1); + f5_B(0, 1, 0, 1); + + return 0; +} diff --git a/test/ref/sort.c b/test/ref/sort.c index 5db5cf01b..b4dee8734 100644 --- a/test/ref/sort.c +++ b/test/ref/sort.c @@ -14,62 +14,62 @@ int *xx; exchange(int *x,int *y) { int t; - printf("exchange(%d,%d)\n", x - xx, y - xx); - t = *x; *x = *y; *y = t; + printf("exchange(%d,%d)\n", x - xx, y - xx); + t = *x; *x = *y; *y = t; } /* partition - partition a[i..j] */ int partition(int a[], int i, int j) { int v, k; - j++; - k = i; - v = a[k]; - while (i < j) { - i++; while (a[i] < v) i++; - j--; while (a[j] > v) j--; - if (i < j) exchange(&a[i], &a[j]); - } - exchange(&a[k], &a[j]); - return j; + j++; + k = i; + v = a[k]; + while (i < j) { + i++; while (a[i] < v) i++; + j--; while (a[j] > v) j--; + if (i < j) exchange(&a[i], &a[j]); + } + exchange(&a[k], &a[j]); + return j; } /* quick - quicksort a[lb..ub] */ void quick(int a[], int lb, int ub) { int k; - if (lb >= ub) - return; - k = partition(a, lb, ub); - quick(a, lb, k - 1); - quick(a, k + 1, ub); + if (lb >= ub) + return; + k = partition(a, lb, ub); + quick(a, lb, k - 1); + quick(a, k + 1, ub); } /* sort - sort a[0..n-1] into increasing order */ sort(int a[], int n) { - quick(xx = a, 0, --n); + quick(xx = a, 0, --n); } /* putd - output decimal number */ void putd(int n) { - if (n < 0) { - putchar('-'); - n = -n; - } - if (n/10) - putd(n/10); - putchar(n%10 + '0'); + if (n < 0) { + putchar('-'); + n = -n; + } + if (n/10) + putd(n/10); + putchar(n%10 + '0'); } int main(void) { - int i; + int i; - sort(in, (sizeof in)/(sizeof in[0])); - for (i = 0; i < (sizeof in)/(sizeof in[0]); i++) { - putd(in[i]); - putchar('\n'); - } + sort(in, (sizeof in)/(sizeof in[0])); + for (i = 0; i < (sizeof in)/(sizeof in[0]); i++) { + putd(in[i]); + putchar('\n'); + } - return 0; + return 0; } diff --git a/test/ref/spill.c b/test/ref/spill.c index 56b03d6a7..316928ab3 100644 --- a/test/ref/spill.c +++ b/test/ref/spill.c @@ -51,6 +51,6 @@ int j, k, m, n; #endif f5(){ - x=A[k*m]*A[j*m]+B[k*n]*B[j*n]; - x=A[k*m]*B[j*n]-B[k*n]*A[j*m]; + x=A[k*m]*A[j*m]+B[k*n]*B[j*n]; + x=A[k*m]*B[j*n]-B[k*n]*A[j*m]; } diff --git a/test/ref/stdarg.c b/test/ref/stdarg.c index 295a2ccad..b88fcaafe 100644 --- a/test/ref/stdarg.c +++ b/test/ref/stdarg.c @@ -10,15 +10,15 @@ #ifndef NO_FUNCS_TAKE_STRUCTS struct node { - int a[4]; + int a[4]; } x = { #ifdef NO_SLOPPY_STRUCT_INIT - { + { #endif - 1,2,3,4 + 1,2,3,4 #ifdef NO_SLOPPY_STRUCT_INIT - } + } #endif }; #endif @@ -27,68 +27,68 @@ print(char *fmt, ...); main() { - print("test 1\n"); - print("test %s\n", "2"); - print("test %d%c", 3, '\n'); - print("%s%s %w%c", "te", "st", 4, '\n'); + print("test 1\n"); + print("test %s\n", "2"); + print("test %d%c", 3, '\n'); + print("%s%s %w%c", "te", "st", 4, '\n'); #ifdef NO_FLOATS - print("%s%s %f%c", "te", "st", (signed long) 5, '\n'); - #else - print("%s%s %f%c", "te", "st", 5.0, '\n'); + print("%s%s %f%c", "te", "st", (signed long) 5, '\n'); + #else + print("%s%s %f%c", "te", "st", 5.0, '\n'); #endif - #ifndef NO_FUNCS_TAKE_STRUCTS + #ifndef NO_FUNCS_TAKE_STRUCTS print("%b %b %b %b %b %b\n", x, x, x, x, x, x); - #endif - return 0; + #endif + return 0; } print(char *fmt, ...) { - va_list ap; - va_start(ap, fmt); - for (; *fmt; fmt++) - { - if (*fmt == '%') - switch (*++fmt) { + va_list ap; + va_start(ap, fmt); + for (; *fmt; fmt++) + { + if (*fmt == '%') + switch (*++fmt) { case 'b': { - #ifdef NO_FUNCS_TAKE_STRUCTS - printf("(1 2 3 4)"); - #else - struct node x = - va_arg( - ap, - struct node - ); - printf("(%d %d %d %d)", x.a[0], x.a[1], x.a[2], x.a[3]); - #endif + #ifdef NO_FUNCS_TAKE_STRUCTS + printf("(1 2 3 4)"); + #else + struct node x = + va_arg( + ap, + struct node + ); + printf("(%d %d %d %d)", x.a[0], x.a[1], x.a[2], x.a[3]); + #endif break; } - case 'c': - /* printf("%c", va_arg(ap, char)); */ - printf("%c", va_arg(ap, int)); - break; - case 'd': - printf("%d", va_arg(ap, int)); - break; - case 'w': - /* printf("%x", va_arg(ap, short)); */ - printf("%x", va_arg(ap, int)); - break; - case 's': - printf("%s", va_arg(ap, char *)); - break; - case 'f': - #ifdef NO_FLOATS - printf("%ld.000000", va_arg(ap, signed long)); - #else - printf("%f", va_arg(ap, double)); - #endif - break; - default: - printf("%c", *fmt); - break; - } - else - printf("%c", *fmt); - } - va_end(ap); + case 'c': + /* printf("%c", va_arg(ap, char)); */ + printf("%c", va_arg(ap, int)); + break; + case 'd': + printf("%d", va_arg(ap, int)); + break; + case 'w': + /* printf("%x", va_arg(ap, short)); */ + printf("%x", va_arg(ap, int)); + break; + case 's': + printf("%s", va_arg(ap, char *)); + break; + case 'f': + #ifdef NO_FLOATS + printf("%ld.000000", va_arg(ap, signed long)); + #else + printf("%f", va_arg(ap, double)); + #endif + break; + default: + printf("%c", *fmt); + break; + } + else + printf("%c", *fmt); + } + va_end(ap); } diff --git a/test/ref/strptr.c b/test/ref/strptr.c index 8bfa983a8..d596e19d1 100644 --- a/test/ref/strptr.c +++ b/test/ref/strptr.c @@ -1,5 +1,5 @@ /* - !!DESCRIPTION!! + !!DESCRIPTION!! !!ORIGIN!! testsuite !!LICENCE!! Public Domain !!AUTHOR!! Groepaz/Hitmen @@ -24,7 +24,7 @@ FILE *outfile=NULL; #else #endif - + #include <stdio.h> #include <stdlib.h> #include <fcntl.h> @@ -34,18 +34,18 @@ FILE *outfile=NULL; struct Xdirent { - char d_name[XNAME_MAX+1]; - unsigned short d_off; - unsigned short d_reclen; - unsigned char d_type; - unsigned char d_namlen; + char d_name[XNAME_MAX+1]; + unsigned short d_off; + unsigned short d_reclen; + unsigned char d_type; + unsigned char d_namlen; }; typedef struct { - unsigned char fd; - unsigned short off; - char name[XNAME_MAX+1]; + unsigned char fd; + unsigned short off; + char name[XNAME_MAX+1]; } XDIR; unsigned char b1[4]; @@ -61,51 +61,51 @@ static struct Xdirent entry; unsigned char fd; static unsigned char ch; - entry.d_off=dir->off; + entry.d_off=dir->off; - /* basic line-link / file-length */ - memcpy(buffer,b1,4); - - dir->off=dir->off+4; - entry.d_reclen=254*(buffer[2]+(buffer[3]<<8)); + /* basic line-link / file-length */ + memcpy(buffer,b1,4); - /* read file entry */ - memcpy(buffer,b2,0x10); - - dir->off=dir->off+i; + dir->off=dir->off+4; + entry.d_reclen=254*(buffer[2]+(buffer[3]<<8)); - printf("Xreaddir: '%s'\n",buffer); - - /* skip until either quote (file) or b (blocks free => end) */ - i=0;ii=0; - while(i==0){ - temp=buffer[ii];ii++; - if(ii>16){ - /* something went wrong...this shouldnt happen! */ - return(NULL); - } - else if(temp=='\"') i++; - else if(temp=='b') { - /* "blocks free" */ - return(NULL); - } - } - printf("Xreaddir: '%s'\n",buffer); + /* read file entry */ + memcpy(buffer,b2,0x10); - /* process file entry */ + dir->off=dir->off+i; - i=0; temp=buffer[ii];ii++; - while(temp!='\"'){ - entry.d_name[i]=temp; - i++; - temp=buffer[ii];ii++; - } - entry.d_name[i]=0; - entry.d_namlen=i; + printf("Xreaddir: '%s'\n",buffer); - /* set type flag */ + /* skip until either quote (file) or b (blocks free => end) */ + i=0;ii=0; + while(i==0){ + temp=buffer[ii];ii++; + if(ii>16){ + /* something went wrong...this shouldnt happen! */ + return(NULL); + } + else if(temp=='\"') i++; + else if(temp=='b') { + /* "blocks free" */ + return(NULL); + } + } + printf("Xreaddir: '%s'\n",buffer); - return(&entry); + /* process file entry */ + + i=0; temp=buffer[ii];ii++; + while(temp!='\"'){ + entry.d_name[i]=temp; + i++; + temp=buffer[ii];ii++; + } + entry.d_name[i]=0; + entry.d_namlen=i; + + /* set type flag */ + + return(&entry); } int main(void) @@ -113,16 +113,16 @@ int main(void) char mydirname[XNAME_MAX+1]="."; XDIR mydir; struct Xdirent *mydirent; - + printf("start\n"); - + if((mydirent=Xreaddir(&mydir))==NULL) { - printf("NULL\n"); + printf("NULL\n"); } else { - printf("=%s\n",mydirent->d_name); + printf("=%s\n",mydirent->d_name); } printf("done\n"); diff --git a/test/ref/struct.c b/test/ref/struct.c index a0f181e96..e5957f265 100644 --- a/test/ref/struct.c +++ b/test/ref/struct.c @@ -74,8 +74,8 @@ void makepoint(point *p,int x, int y) { /* make a rectangle from two points */ void makerect(rect *d,point p1, point p2) { rect r; - r.pt1 = p1; - r.pt2 = p2; + r.pt1 = p1; + r.pt2 = p2; canonrect(d,r); } @@ -97,53 +97,53 @@ odd(struct odd y) { /* add two points */ point addpoint(point p1, point p2) { - p1.x += p2.x; - p1.y += p2.y; - return p1; + p1.x += p2.x; + p1.y += p2.y; + return p1; } /* canonicalize rectangle coordinates */ rect canonrect(rect r) { - rect temp; + rect temp; - temp.pt1.x = min(r.pt1.x, r.pt2.x); - temp.pt1.y = min(r.pt1.y, r.pt2.y); - temp.pt2.x = max(r.pt1.x, r.pt2.x); - temp.pt2.y = max(r.pt1.y, r.pt2.y); - return temp; + temp.pt1.x = min(r.pt1.x, r.pt2.x); + temp.pt1.y = min(r.pt1.y, r.pt2.y); + temp.pt2.x = max(r.pt1.x, r.pt2.x); + temp.pt2.y = max(r.pt1.y, r.pt2.y); + return temp; } /* make a point from x and y components */ point makepoint(int x, int y) { - point p; + point p; - p.x = x; - p.y = y; - return p; + p.x = x; + p.y = y; + return p; } /* make a rectangle from two points */ rect makerect(point p1, point p2) { - rect r; + rect r; - r.pt1 = p1; - r.pt2 = p2; - return canonrect(r); + r.pt1 = p1; + r.pt2 = p2; + return canonrect(r); } struct odd {char a[3]; } y = { #ifdef NO_SLOPPY_STRUCT_INIT - { + { #endif - 'a', 'b', 0 + 'a', 'b', 0 #ifdef NO_SLOPPY_STRUCT_INIT - } + } #endif }; odd(struct odd y) { - struct odd x - = y; + struct odd x + = y; printf("%s\n\r", x.a); } @@ -157,8 +157,8 @@ int ptinrect(point *p, rect *r) { } #else int ptinrect(point p, rect r) { - return p.x >= r.pt1.x && p.x < r.pt2.x - && p.y >= r.pt1.y && p.y < r.pt2.y; + return p.x >= r.pt1.x && p.x < r.pt2.x + && p.y >= r.pt1.y && p.y < r.pt2.y; } #endif @@ -212,9 +212,9 @@ point pts[] = { -1, -1, 1, 1, 20, 300, 500, 400 }; #else if (ptinrect(x, screen) == 0) #endif - { + { printf("not "); - } + } printf("within (%d,%d; %d,%d)\n\r", screen.pt1.x, screen.pt1.y, screen.pt2.x, screen.pt2.y); } @@ -240,24 +240,24 @@ point pts[] = { -1, -1, 1, 1, 20, 300, 500, 400 }; #endif rect screen = - makerect( - addpoint(maxpt, makepoint(-10, -10)), - addpoint(origin, makepoint(10, 10)) - ); + makerect( + addpoint(maxpt, makepoint(-10, -10)), + addpoint(origin, makepoint(10, 10)) + ); - test1(); - - for (i = 0; i < sizeof pts/sizeof pts[0]; i++) { - printf("(%d,%d) is ", pts[i].x, - (x = makepoint(pts[i].x, pts[i].y)).y); - if (ptinrect(x, screen) == 0) - printf("not "); + test1(); + + for (i = 0; i < sizeof pts/sizeof pts[0]; i++) { + printf("(%d,%d) is ", pts[i].x, + (x = makepoint(pts[i].x, pts[i].y)).y); + if (ptinrect(x, screen) == 0) + printf("not "); printf("within (%d,%d; %d,%d)\n\r", screen.pt1.x, screen.pt1.y, - screen.pt2.x, screen.pt2.y); - } - odd(y); + screen.pt2.x, screen.pt2.y); + } + odd(y); - return 0; + return 0; } #endif /* FUNCS_RETURN_STRUCTS */ diff --git a/test/ref/switch.c b/test/ref/switch.c index 0821d29ee..dc7fdc8ce 100644 --- a/test/ref/switch.c +++ b/test/ref/switch.c @@ -18,9 +18,9 @@ limit(); big( # ifdef ASSUME_32BIT_UNSIGNED - unsigned + unsigned # else - unsigned long + unsigned long # endif x); @@ -28,28 +28,28 @@ x); main() { - testbackslash(); - f(); - g(); - h(); - testbig(); /* ! broken long int compare (?) */ - limit(); /* ! broken long int compare (?) */ + testbackslash(); + f(); + g(); + h(); + testbig(); /* ! broken long int compare (?) */ + limit(); /* ! broken long int compare (?) */ - return 0; + return 0; } testbig() { - #ifdef ASSUME_32BIT_INT - int i; - #else - signed long i; - #endif - /* 2341234 2341234 2341234 */ - for (i = 0x1000000; i&0x7000000; i += 0x1000000) { -/* printf("i = 0x%lx\n", i); */ - big(i); - } + #ifdef ASSUME_32BIT_INT + int i; + #else + signed long i; + #endif + /* 2341234 2341234 2341234 */ + for (i = 0x1000000; i&0x7000000; i += 0x1000000) { +/* printf("i = 0x%lx\n", i); */ + big(i); + } } #ifdef NO_LOCAL_STRING_INIT @@ -69,93 +69,93 @@ testbackslash() #else for (s = "bfnrtvx"; *s; s++) { #endif - printf("%c = %c\n", *s, backslash(*s)); + printf("%c = %c\n", *s, backslash(*s)); } } backslash(c) { - switch (c) + switch (c) { - case 'b': - return 'b'; - case 'f': - return 'f'; - case 'n': - return 'n'; - case 'r': - return 'r'; - case 't': - return 't'; - case 'v': + case 'b': + return 'b'; + case 'f': + return 'f'; + case 'n': + return 'n'; + case 'r': + return 'r'; + case 't': + return 't'; + case 'v': return 'v'; - } + } - return 'x'; + return 'x'; } f() { - int i, x = 0, y; + int i, x = 0, y; - printf("f:\n"); - for (i = 0; i <= 20; i++) { - y = i; - switch (i) { - case 1: x = i; break; - case 2: x = i; break; - case 7: x = i; break; - case 8: x = i; break; - case 9: x = i; break; - case 16: x = i; break; - case 17: x = i; break; - case 18: x = i; break; - case 19: x = i; break; - case 20: x = i; break; - } - printf("x = %d\n", x); - } + printf("f:\n"); + for (i = 0; i <= 20; i++) { + y = i; + switch (i) { + case 1: x = i; break; + case 2: x = i; break; + case 7: x = i; break; + case 8: x = i; break; + case 9: x = i; break; + case 16: x = i; break; + case 17: x = i; break; + case 18: x = i; break; + case 19: x = i; break; + case 20: x = i; break; + } + printf("x = %d\n", x); + } } g() { - int i; + int i; - printf("g:\n"); - for (i = 1; i <= 10; i++) - switch (i) { - case 1: case 2: printf("1 %d\n", i); break; - case 3: case 4: case 5: printf("2 %d\n", i); break; - case 6: case 7: case 8: printf("3 %d\n", i); - default: - printf("d %d\n", i); break; - case 1001: case 1002: case 1003: case 1004: - printf("5 %d\n", i); break; - case 3001: case 3002: case 3003: case 3004: - printf("6 %d\n", i); break; - } + printf("g:\n"); + for (i = 1; i <= 10; i++) + switch (i) { + case 1: case 2: printf("1 %d\n", i); break; + case 3: case 4: case 5: printf("2 %d\n", i); break; + case 6: case 7: case 8: printf("3 %d\n", i); + default: + printf("d %d\n", i); break; + case 1001: case 1002: case 1003: case 1004: + printf("5 %d\n", i); break; + case 3001: case 3002: case 3003: case 3004: + printf("6 %d\n", i); break; + } } h() { - int i, n=0; + int i, n=0; - printf("h:\n"); - for (i = 1; i <= 500; i++) - switch (i) { - default: n++; continue; - case 128: printf("i = %d\n", i); break; - case 16: printf("i = %d\n", i); break; - case 8: printf("i = %d\n", i); break; - case 120: printf("i = %d\n", i); break; - case 280: printf("i = %d\n", i); break; - case 264: printf("i = %d\n", i); break; - case 248: printf("i = %d\n", i); break; - case 272: printf("i = %d\n", i); break; - case 304: printf("i = %d\n", i); break; - case 296: printf("i = %d\n", i); break; - case 288: printf("i = %d\n", i); break; - case 312: printf("i = %d\n", i); break; - } - printf("%d defaults\n", n); + printf("h:\n"); + for (i = 1; i <= 500; i++) + switch (i) { + default: n++; continue; + case 128: printf("i = %d\n", i); break; + case 16: printf("i = %d\n", i); break; + case 8: printf("i = %d\n", i); break; + case 120: printf("i = %d\n", i); break; + case 280: printf("i = %d\n", i); break; + case 264: printf("i = %d\n", i); break; + case 248: printf("i = %d\n", i); break; + case 272: printf("i = %d\n", i); break; + case 304: printf("i = %d\n", i); break; + case 296: printf("i = %d\n", i); break; + case 288: printf("i = %d\n", i); break; + case 312: printf("i = %d\n", i); break; + } + printf("%d defaults\n", n); } #ifdef NO_OLD_FUNC_DECL @@ -165,9 +165,9 @@ h() #endif # ifdef ASSUME_32BIT_UNSIGNED - unsigned + unsigned # else - unsigned long + unsigned long # endif #ifdef NO_OLD_FUNC_DECL @@ -176,42 +176,42 @@ h() x; { #endif -/* printf("x = 0x%x\n", x); */ +/* printf("x = 0x%x\n", x); */ - switch(x&0x6000000){ - case -1: - case -2: - case 0x0000000: - printf("x = 0x%lx\n", x); break; - case 0x2000000: - printf("x = 0x%lx\n", x); break; - case 0x4000000: - printf("x = 0x%lx\n", x); break; - default: - printf("x = 0x%lx (default)\n", x); break; - } + switch(x&0x6000000){ + case -1: + case -2: + case 0x0000000: + printf("x = 0x%lx\n", x); break; + case 0x2000000: + printf("x = 0x%lx\n", x); break; + case 0x4000000: + printf("x = 0x%lx\n", x); break; + default: + printf("x = 0x%lx (default)\n", x); break; + } } limit() { - int i; + int i; - for (i = INT_MIN; i <= INT_MIN+5; i++) -/* for (i = INT_MIN; i < INT_MIN+6; i++) */ - switch (i) { - case INT_MIN: printf("0\n"); break; - case INT_MIN+1: printf("1\n"); break; - case INT_MIN+2: printf("2\n"); break; - case INT_MIN+3: printf("3\n"); break; - case INT_MIN+4: printf("4\n"); break; - default: printf("5\n"); break; - } - for (i = INT_MAX; i >= INT_MAX-5; i--) - switch (i) { - case INT_MAX: printf("0\n"); break; - case INT_MAX-1: printf("1\n"); break; - case INT_MAX-2: printf("2\n"); break; - case INT_MAX-3: printf("3\n"); break; - case INT_MAX-4: printf("4\n"); break; - default: printf("5\n"); break; - } + for (i = INT_MIN; i <= INT_MIN+5; i++) +/* for (i = INT_MIN; i < INT_MIN+6; i++) */ + switch (i) { + case INT_MIN: printf("0\n"); break; + case INT_MIN+1: printf("1\n"); break; + case INT_MIN+2: printf("2\n"); break; + case INT_MIN+3: printf("3\n"); break; + case INT_MIN+4: printf("4\n"); break; + default: printf("5\n"); break; + } + for (i = INT_MAX; i >= INT_MAX-5; i--) + switch (i) { + case INT_MAX: printf("0\n"); break; + case INT_MAX-1: printf("1\n"); break; + case INT_MAX-2: printf("2\n"); break; + case INT_MAX-3: printf("3\n"); break; + case INT_MAX-4: printf("4\n"); break; + default: printf("5\n"); break; + } } diff --git a/test/ref/switch2.c b/test/ref/switch2.c index e75cfe71e..0e52775e4 100644 --- a/test/ref/switch2.c +++ b/test/ref/switch2.c @@ -1,262 +1,230 @@ -/* - !!DESCRIPTION!! switch test - !!ORIGIN!! - !!LICENCE!! public domain -*/ - -/*#define STANDALONE*/ - -#include <stdio.h> - +/* + !!DESCRIPTION!! switch test + !!ORIGIN!! + !!LICENCE!! public domain +*/ + +/*#define STANDALONE*/ + +#include <stdio.h> + void testlimits(int i) { - printf("%d:",i); - - switch(i) { - case -1: /* works */ - /* case 0xffff: */ /* 'range error' (-1) */ - - printf("-1\n"); - break; - /* max int */ - -/* case 0x7fff: */ /* works */ - case 32767: /* works */ - /* case 32768: */ /* 'range error' (correct for that one!) */ - - printf("max\n"); - break; - /* min int */ - - case -32768: /* 'warning. constant is long' */ - /* case 0x8000: */ /* 'range error' */ - /* case -32769: */ /* 'range error' (correct for that one!) */ - printf("min\n"); - break; - } - printf("\n"); -} - -void testdefault1(unsigned char i) { -/* we want a signed char */ -#ifdef REFCC - -#ifdef REFCC_UNSIGNED_CHARS -signed char k; -#else -char k; -#endif - -#else - -#ifdef UNSIGNED_CHARS -signed char k; -#else -char k; -#endif - -#endif - - for(;i<254;) { - k = i; - printf(">%d\n",i);i++; - switch(k) { - case 1: - break; - case 2: - break; - case 3: - break; - case 4: - break; - case 5: - break; - case 6: - break; - case 7: - break; - case 8: - break; - case 9: - break; - case 10: - break; - case 11: - break; - case 12: - break; - case 13: - break; - case 14: - break; - case 15: - break; - case 17: - break; - /* triggers bug ? */ - /* gcc warning: case label value exceeds maximum value for type */ - /* cc65 error: range error */ - - /* - case 170: - break; - */ - case 18: - break; - case 19: - break; - case 20: - break; - case 21: - break; - case 22: - break; - case 23: - break; - case 24: - switch(k) { - case 1: - break; - case 2: - break; - case 3: - break; - case 4: - case 5: - break; - case 6: - case 7: - break; - case 8: - case 9: - break; - } - break; - case 100: - break; - default: - printf(">>>default\n"); - /* triggers bug if this break; is missing? */ - /* break; */ - } - } -} - -void testdefault2(unsigned char i) { -/* we want a unsigned char */ -#ifdef REFCC - -#ifdef REFCC_UNSIGNED_CHARS -char k; -#else -unsigned char k; -#endif - -#else - -#ifdef UNSIGNED_CHARS -char k; -#else -unsigned char k; -#endif - -#endif - - for(;i<254;) { - k = i; - printf(">%d\n",i);i++; - switch(k) { - case 1: - break; - case 2: - break; - case 3: - break; - case 4: - break; - case 5: - break; - case 6: - break; - case 7: - break; - case 8: - break; - case 9: - break; - case 10: - break; - case 11: - break; - case 12: - break; - case 13: - break; - case 14: - break; - case 15: - break; - case 17: - break; - /* triggers bug ? */ - - case 170: - break; - - case 18: - break; - case 19: - break; - case 20: - break; - case 21: - break; - case 22: - break; - case 23: - break; - case 24: - switch(k) { - case 1: - break; - case 2: - break; - case 3: - break; - case 4: - case 5: - break; - case 6: - case 7: - break; - case 8: - case 9: - break; - } - break; - case 100: - break; - default: - printf(">>>default\n"); - /* triggers bug if this break; is missing? */ - /* break; */ - } - } + printf("%d:",i); + + switch(i) { + case -1: /* works */ + /* case 0xffff: */ /* 'range error' (-1) */ + + printf("-1\n"); + break; + /* max int */ + +/* case 0x7fff: */ /* works */ + case 32767: /* works */ + /* case 32768: */ /* 'range error' (correct for that one!) */ + + printf("max\n"); + break; + /* min int */ + + case -32768: /* 'warning. constant is long' */ + /* case 0x8000: */ /* 'range error' */ + /* case -32769: */ /* 'range error' (correct for that one!) */ + printf("min\n"); + break; + } + printf("\n"); +} + +void testdefault1(unsigned char i) { + + signed char k; + + for(;i<254;) { + k = i; + printf(">%d\n",i);i++; + switch(k) { + case 1: + break; + case 2: + break; + case 3: + break; + case 4: + break; + case 5: + break; + case 6: + break; + case 7: + break; + case 8: + break; + case 9: + break; + case 10: + break; + case 11: + break; + case 12: + break; + case 13: + break; + case 14: + break; + case 15: + break; + case 17: + break; + /* triggers bug ? */ + /* gcc warning: case label value exceeds maximum value for type */ + /* cc65 error: range error */ + + /* + case 170: + break; + */ + case 18: + break; + case 19: + break; + case 20: + break; + case 21: + break; + case 22: + break; + case 23: + break; + case 24: + switch(k) { + case 1: + break; + case 2: + break; + case 3: + break; + case 4: + case 5: + break; + case 6: + case 7: + break; + case 8: + case 9: + break; + } + break; + case 100: + break; + default: + printf(">>>default\n"); + /* triggers bug if this break; is missing? */ + /* break; */ + } + } +} + +void testdefault2(unsigned char i) { + + unsigned char k; + + for(;i<254;) { + k = i; + printf(">%d\n",i);i++; + switch(k) { + case 1: + break; + case 2: + break; + case 3: + break; + case 4: + break; + case 5: + break; + case 6: + break; + case 7: + break; + case 8: + break; + case 9: + break; + case 10: + break; + case 11: + break; + case 12: + break; + case 13: + break; + case 14: + break; + case 15: + break; + case 17: + break; + /* triggers bug ? */ + + case 170: + break; + + case 18: + break; + case 19: + break; + case 20: + break; + case 21: + break; + case 22: + break; + case 23: + break; + case 24: + switch(k) { + case 1: + break; + case 2: + break; + case 3: + break; + case 4: + case 5: + break; + case 6: + case 7: + break; + case 8: + case 9: + break; + } + break; + case 100: + break; + default: + printf(">>>default\n"); + /* triggers bug if this break; is missing? */ + /* break; */ + } + } } int main(void) { - testlimits(32767); - testlimits(-32768); - testlimits(-1); - - testdefault1(1); - testdefault1(2); - testdefault1(3); - testdefault1(4); - - testdefault2(1); - testdefault2(2); - testdefault2(3); - testdefault2(4); - - return 0; -} + testlimits(32767); + testlimits(-32768); + testlimits(-1); + + testdefault1(1); + testdefault1(2); + testdefault1(3); + testdefault1(4); + + testdefault2(1); + testdefault2(2); + testdefault2(3); + testdefault2(4); + + return 0; +} diff --git a/test/ref/varargs.c b/test/ref/varargs.c index 11fd33b38..c3e89aaa5 100644 --- a/test/ref/varargs.c +++ b/test/ref/varargs.c @@ -1,105 +1,105 @@ /* - !!DESCRIPTION!! varargs test - !!ORIGIN!! - !!LICENCE!! public domain -*/ - -#include <stdlib.h> -#include <stdio.h> -#include <stdarg.h> - -void chk0(char *format,...); -void chk1(int fd,char *format,...); - -#if 0 -// old workaround for broken varargs - -void chk0(char *format,...){ - __asm__ ("pha"); // save argument size - { -//va_list ap; -char *ap; -char *_format; -static char string[0x100]; - -// va_start(ap,format); - __asm__ ("pla"); // restore argument size - __asm__ ("ldx #$00"); // clear hibyte of AX - ap=__AX__; - ap+=(char*)&format; - // get value of format - ap-=2; - _format=*((char**)ap); - -// vsprintf(string,format,ap); - vsprintf(&string[0],_format,ap); - printf("format:%s,string:%s\n",_format,string); -// va_end(ap); - - } -} - -void chk1(int fd,char *format,...){ - __asm__ ("pha"); // save argument size - { -//va_list ap; -char *ap; -char *_format; -int _fd; -static char string[0x100]; - -// va_start(ap,format); - __asm__ ("pla"); // restore argument size - __asm__ ("ldx #$00"); // clear hibyte of AX - ap=__AX__; - ap+=(char*)&format; - // get value of fd - ap-=2; - _fd=*((int*)ap); - // get value of format - ap-=2; - _format=*((char**)ap); - -// vsprintf(string,format,ap); - vsprintf(&string[0],_format,ap); - printf("fd:%d,format:%s,string:%s\n",_fd,_format,string); -// va_end(ap); - - } -} - -#endif - -void chk0(char *format,...){ -va_list ap; -static char string[0x100]; - va_start(ap,format); - vsprintf(string,format,ap); - printf("format:%s,string:%s\n",format,string); - va_end(ap); -} - -void chk1(int fd,char *format,...){ -va_list ap; -static char string[0x100]; - - va_start(ap,format); - - vsprintf(string,format,ap); - printf("fd:%d,format:%s,string:%s\n",fd,format,string); - va_end(ap); + !!DESCRIPTION!! varargs test + !!ORIGIN!! + !!LICENCE!! public domain +*/ + +#include <stdlib.h> +#include <stdio.h> +#include <stdarg.h> + +void chk0(char *format,...); +void chk1(int fd,char *format,...); + +#if 0 +// old workaround for broken varargs + +void chk0(char *format,...){ + __asm__ ("pha"); // save argument size + { +//va_list ap; +char *ap; +char *_format; +static char string[0x100]; + +// va_start(ap,format); + __asm__ ("pla"); // restore argument size + __asm__ ("ldx #$00"); // clear hibyte of AX + ap=__AX__; + ap+=(char*)&format; + // get value of format + ap-=2; + _format=*((char**)ap); + +// vsprintf(string,format,ap); + vsprintf(&string[0],_format,ap); + printf("format:%s,string:%s\n",_format,string); +// va_end(ap); + + } } -int main(int argc,char **argv) { - printf("varargs test\n"); - - printf("\nchk0/0:\n");chk0("chk0 %s","arg0"); - printf("\nchk0/1:\n");chk0("chk0 %s %s","arg0","arg1"); - printf("\nchk0/2:\n");chk0("chk0 %s %s %s","arg0","arg1","arg2"); - - printf("\nchk1/0:\n");chk1(0xfd,"chk1 %s","arg0"); - printf("\nchk1/1:\n");chk1(0xfd,"chk1 %s %s","arg0","arg1"); - printf("\nchk1/2:\n");chk1(0xfd,"chk1 %s %s %s","arg0","arg1","arg2"); - +void chk1(int fd,char *format,...){ + __asm__ ("pha"); // save argument size + { +//va_list ap; +char *ap; +char *_format; +int _fd; +static char string[0x100]; + +// va_start(ap,format); + __asm__ ("pla"); // restore argument size + __asm__ ("ldx #$00"); // clear hibyte of AX + ap=__AX__; + ap+=(char*)&format; + // get value of fd + ap-=2; + _fd=*((int*)ap); + // get value of format + ap-=2; + _format=*((char**)ap); + +// vsprintf(string,format,ap); + vsprintf(&string[0],_format,ap); + printf("fd:%d,format:%s,string:%s\n",_fd,_format,string); +// va_end(ap); + + } +} + +#endif + +void chk0(char *format,...){ +va_list ap; +static char string[0x100]; + va_start(ap,format); + vsprintf(string,format,ap); + printf("format:%s,string:%s\n",format,string); + va_end(ap); +} + +void chk1(int fd,char *format,...){ +va_list ap; +static char string[0x100]; + + va_start(ap,format); + + vsprintf(string,format,ap); + printf("fd:%d,format:%s,string:%s\n",fd,format,string); + va_end(ap); +} + +int main(int argc,char **argv) { + printf("varargs test\n"); + + printf("\nchk0/0:\n");chk0("chk0 %s","arg0"); + printf("\nchk0/1:\n");chk0("chk0 %s %s","arg0","arg1"); + printf("\nchk0/2:\n");chk0("chk0 %s %s %s","arg0","arg1","arg2"); + + printf("\nchk1/0:\n");chk1(0xfd,"chk1 %s","arg0"); + printf("\nchk1/1:\n");chk1(0xfd,"chk1 %s %s","arg0","arg1"); + printf("\nchk1/2:\n");chk1(0xfd,"chk1 %s %s %s","arg0","arg1","arg2"); + return 0; -} +} diff --git a/test/ref/wf1.c b/test/ref/wf1.c index 0539d8398..574e7205f 100644 --- a/test/ref/wf1.c +++ b/test/ref/wf1.c @@ -16,125 +16,103 @@ FILE *in; struct node { - int count; /* frequency count */ - struct node *left; /* left subtree */ - struct node *right; /* right subtree */ - char *word; /* word itself */ + int count; /* frequency count */ + struct node *left; /* left subtree */ + struct node *right; /* right subtree */ + char *word; /* word itself */ } words[MAXWORDS]; -int next; /* index of next free entry in words */ +int next; /* index of next free entry in words */ /*struct node *lookup();*/ -#if defined(NO_NEW_PROTOTYPES_FOR_OLD_FUNC_DECL) && !defined(NO_OLD_FUNC_DECL) - -#else - int err(char *s); int getword(char *buf); void tprint(struct node *tree); struct node *lookup(char *word, struct node **p); -#endif - int isletter(char c); -/* err - print error message s and die */ -#ifndef NO_OLD_FUNC_DECL +/* err - print error message s and die */ err(s) char *s; { -#else -int err(char *s) { -#endif - printf("? %s\n", s); - exit(1); + printf("? %s\n", s); + exit(EXIT_FAILURE); } /* getword - get next input word into buf, return 0 on EOF */ -#ifndef NO_OLD_FUNC_DECL int getword(buf) char *buf; -#else -int getword(char *buf) -#endif { - char *s; - int c; + char *s; + int c; while (((c = getchar()) != -1) && (isletter(c) == 0)) - ; + ; for (s = buf; (c = isletter(c)); c = getchar()) - *s++ = c; - *s = 0; - if (s > buf) - return 1; - return 0; + *s++ = c; + *s = 0; + if (s > buf) + return 1; + return 0; } /* isletter - return folded version of c if it is a letter, 0 otherwise */ int isletter(char c) { - if ((c >= 'A') && (c <= 'Z')) c += 'a' - 'A'; - if ((c >= 'a') && (c <= 'z')) return c; - return 0; + if ((c >= 'A') && (c <= 'Z')) c += 'a' - 'A'; + if ((c >= 'a') && (c <= 'z')) return c; + return 0; } /* lookup - lookup word in tree; install if necessary */ -#ifndef NO_OLD_FUNC_DECL struct node *lookup(word, p) char *word; struct node **p; -#else -struct node *lookup(char *word, struct node **p) -#endif { - int cond; -/* char *malloc(); */ + int cond; +/* char *malloc(); */ - if (*p) { - cond = strcmp(word, (*p)->word); - if (cond < 0) - return lookup(word, &(*p)->left); - else if (cond > 0) - return lookup(word, &(*p)->right); - else - return *p; - } - if (next >= MAXWORDS) - err("out of node storage"); - words[next].count = 0; - words[next].left = words[next].right = 0; - words[next].word = malloc(strlen(word) + 1); - if (words[next].word == 0) - err("out of word storage"); - strcpy(words[next].word, word); - return *p = &words[next++]; + if (*p) { + cond = strcmp(word, (*p)->word); + if (cond < 0) + return lookup(word, &(*p)->left); + else if (cond > 0) + return lookup(word, &(*p)->right); + else + return *p; + } + if (next >= MAXWORDS) + err("out of node storage"); + words[next].count = 0; + words[next].left = words[next].right = 0; + words[next].word = malloc(strlen(word) + 1); + if (words[next].word == 0) + err("out of word storage"); + strcpy(words[next].word, word); + return *p = &words[next++]; } /* tprint - print tree */ -#ifndef NO_OLD_FUNC_DECL void tprint(tree) struct node *tree; { -#else -void tprint(struct node *tree) { -#endif - if (tree) { - tprint(tree->left); - printf("%d:%s\n", tree->count, tree->word); - tprint(tree->right); - } + if (tree) { + tprint(tree->left); + printf("%d:%s\n", tree->count, tree->word); + tprint(tree->right); + } } int main(void) { - struct node *root; - char word[20]; + struct node *root; + char word[20]; in = fopen("wf1.in","rb"); if (in == NULL) { return EXIT_FAILURE; } - root = 0; - next = 0; - while (getword(word)) - lookup(word, &root)->count++; - tprint(root); + root = 0; + next = 0; + while (getword(word)) + lookup(word, &root)->count++; + tprint(root); fclose(in); return 0; diff --git a/test/ref/yacc.c b/test/ref/yacc.c index 5768f80d0..3831b67fd 100644 --- a/test/ref/yacc.c +++ b/test/ref/yacc.c @@ -70,11 +70,11 @@ int yytchar; #define yyout outfile extern int yylineno; -struct yysvf +struct yysvf { - struct yywork *yystoff; - struct yysvf *yyother; - int *yystops; + struct yywork *yystoff; + struct yysvf *yyother; + int *yystops; }; struct yysvf *yyestate; extern struct yysvf yysvec[], *yybgin; @@ -96,18 +96,18 @@ yyback(int *p,int m); #ifdef YYDEBUG void printchar(char *name,int ch) { - if((ch==YYNEWLINE)) - { - fprintf(yyout," %s=YYNEWLINE\n",name); - } - else if((ch<0)||(ch>0xf0)||(!isprint(ch))) - { - fprintf(yyout," %s=%04x\n",name,ch &0xffff); - } - else - { - fprintf(yyout," %s='%c'\n",name,ch); - } + if((ch==YYNEWLINE)) + { + fprintf(yyout," %s=YYNEWLINE\n",name); + } + else if((ch<0)||(ch>0xf0)||(!isprint(ch))) + { + fprintf(yyout," %s=%04x\n",name,ch &0xffff); + } + else + { + fprintf(yyout," %s='%c'\n",name,ch); + } } #endif @@ -117,148 +117,148 @@ int nstr; extern int yyprevious; #ifdef YYDEBUG - fprintf(yyout,"yylex()\n"); + fprintf(yyout,"yylex()\n"); #endif - while((nstr = yylook()) >= 0) - { + while((nstr = yylook()) >= 0) + { #ifdef YYDEBUG - fprintf(yyout,"yylex: nstr=%d\n",nstr); + fprintf(yyout,"yylex: nstr=%d\n",nstr); #endif yyfussy: - switch(nstr) - { - case 0: - if(yywrap()) return(0); - break; - case 1: - return ID; - break; - case 2: - return CON; - break; - case 3: - ; - break; - case 4: - return yytext[0]; - break; - case -1: - break; - default: - fprintf(yyout,"yylex: bad switch yylook %d\n",nstr); - } + switch(nstr) + { + case 0: + if(yywrap()) return(0); + break; + case 1: + return ID; + break; + case 2: + return CON; + break; + case 3: + ; + break; + case 4: + return yytext[0]; + break; + case -1: + break; + default: + fprintf(yyout,"yylex: bad switch yylook %d\n",nstr); + } + + } - } - #ifdef YYDEBUG - fprintf(yyout,"yylex: return 0\n"); + fprintf(yyout,"yylex: return 0\n"); #endif - return(0); + return(0); } /* end of yylex */ int yyvstop[] = { - 0,4,0,3,4,0,2,4,0,1,4,0,2,0,1,0,0 + 0,4,0,3,4,0,2,4,0,1,4,0,2,0,1,0,0 }; # define YYTYPE char -struct yywork -{ - YYTYPE verify, advance; +struct yywork +{ + YYTYPE verify, advance; } yycrank[] = { - {0,0}, {0,0}, {1,3}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {1,4}, {1,3}, - {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {1,3}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {1,4}, {1,3}, + {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - - {0,0}, {1,5}, {5,7}, {5,7}, - {5,7}, {5,7}, {5,7}, {5,7}, - {5,7}, {5,7}, {5,7}, {5,7}, - {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + + {0,0}, {1,5}, {5,7}, {5,7}, + {5,7}, {5,7}, {5,7}, {5,7}, + {5,7}, {5,7}, {5,7}, {5,7}, + {0,0}, {0,0}, {0,0}, {0,0}, /* 0x40 */ - {0,0}, {0,0}, {1,6}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {0,0}, {0,0}, {0,0}, - - {0,0}, {0,0}, {0,0}, {0,0}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {0,0}, {0,0}, - - {0,0}, {0,0}, {6,8}, {0,0}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, + {0,0}, {0,0}, {1,6}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {0,0}, {0,0}, {0,0}, + + {0,0}, {0,0}, {0,0}, {0,0}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {0,0}, {0,0}, + + {0,0}, {0,0}, {6,8}, {0,0}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, /* 0x80 */ - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {0,0}, {0,0}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {0,0}, {0,0}, #ifdef CHARSETHACK - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, /* 0xc0 */ - {0,0}, {0,0}, {1,6}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {1,6}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {0,0}, {0,0}, {0,0}, #endif - {0,0} + {0,0} }; /* -struct yysvf +struct yysvf { - struct yywork *yystoff; - struct yysvf *yyother; - int *yystops; + struct yywork *yystoff; + struct yysvf *yyother; + int *yystops; }; */ struct yysvf yysvec[] = { - {0, 0, 0}, - {yycrank+-1, 0, 0}, - {yycrank+0, yysvec+1, 0}, - {yycrank+0, 0, yyvstop+1}, - {yycrank+0, 0, yyvstop+3}, - {yycrank+2, 0, yyvstop+6}, - {yycrank+19, 0, yyvstop+9}, - {yycrank+0, yysvec+5, yyvstop+12}, - {yycrank+0, yysvec+6, yyvstop+14}, - {0, 0, 0} + {0, 0, 0}, + {yycrank+-1, 0, 0}, + {yycrank+0, yysvec+1, 0}, + {yycrank+0, 0, yyvstop+1}, + {yycrank+0, 0, yyvstop+3}, + {yycrank+2, 0, yyvstop+6}, + {yycrank+19, 0, yyvstop+9}, + {yycrank+0, yysvec+5, yyvstop+12}, + {yycrank+0, yysvec+6, yyvstop+14}, + {0, 0, 0} }; /* 0x8d */ /* struct yywork *yytop = yycrank+141; */ @@ -268,66 +268,66 @@ struct yywork *yytop = yycrank+255; struct yysvf *yybgin = yysvec+1; /* - WARNING: this table contains one entry per character - in the execution character set and must match it. + WARNING: this table contains one entry per character + in the execution character set and must match it. */ char yymatch[] = { - 00 ,01 ,01 ,01 ,01 ,01 ,01 ,01 , + 00 ,01 ,01 ,01 ,01 ,01 ,01 ,01 , #ifdef CHARSETHACK - 01 ,011 ,012 ,01 ,01 ,012 ,01 ,01 , + 01 ,011 ,012 ,01 ,01 ,012 ,01 ,01 , #else - 01 ,011 ,012 ,01 ,01 ,01 ,01 ,01 , + 01 ,011 ,012 ,01 ,01 ,01 ,01 ,01 , #endif - 01 ,01 ,01 ,01 ,01 ,01 ,01 ,01 , - 01 ,01 ,01 ,01 ,01 ,01 ,01 ,01 , - - 011 ,01 ,01 ,01 ,01 ,01 ,01 ,01 , - 01 ,01 ,01 ,01 ,01 ,01 ,01 ,01 , - - '0' ,'0' ,'0' ,'0' ,'0' ,'0' ,'0' ,'0' , - '0' ,'0' ,01 ,01 ,01 ,01 ,01 ,01 , - + 01 ,01 ,01 ,01 ,01 ,01 ,01 ,01 , + 01 ,01 ,01 ,01 ,01 ,01 ,01 ,01 , + + 011 ,01 ,01 ,01 ,01 ,01 ,01 ,01 , + 01 ,01 ,01 ,01 ,01 ,01 ,01 ,01 , + + '0' ,'0' ,'0' ,'0' ,'0' ,'0' ,'0' ,'0' , + '0' ,'0' ,01 ,01 ,01 ,01 ,01 ,01 , + /* 0x40 (ascii) @A... (petscii) @a... */ - 01 ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , - 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , - - 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , - 'A' ,'A' ,'A' ,01 ,01 ,01 ,01 ,'A' , - + 01 ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , + 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , + + 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , + 'A' ,'A' ,'A' ,01 ,01 ,01 ,01 ,'A' , + /* 0x60 (ascii) @a... */ - 01 ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , - 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , - - 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , - 'A' ,'A' ,'A' ,01 ,01 ,01 ,01 ,01 , - + 01 ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , + 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , + + 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , + 'A' ,'A' ,'A' ,01 ,01 ,01 ,01 ,01 , + #ifdef CHARSETHACK /* 0x80 */ - 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, - 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, - 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, - 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, + 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, + 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, + 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, + 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, /* 0xc0 (petcii) @A... */ - 01 ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , - 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , - - 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , - 'A' ,'A' ,'A' ,01 ,01 ,01 ,01 ,01 , - - 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, - 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, - 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, + 01 ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , + 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , + + 'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' ,'A' , + 'A' ,'A' ,'A' ,01 ,01 ,01 ,01 ,01 , + + 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, + 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, + 0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0, #endif - 0 + 0 }; char yyextra[] = { - 0,0,0,0,0,0,0,0,0 + 0,0,0,0,0,0,0,0,0 }; -/* ncform 4.1 83/08/11 */ +/* ncform 4.1 83/08/11 */ int yylineno =1; # define YYU(x) x @@ -344,26 +344,26 @@ unsigned char testbreak=0; yylook() { - register struct yysvf *yystate, **lsp; - register struct yywork *yyt; - struct yysvf *yyz; - int yych; - struct yywork *yyr; + register struct yysvf *yystate, **lsp; + register struct yywork *yyt; + struct yysvf *yyz; + int yych; + struct yywork *yyr; /* # ifdef LEXDEBUG - int debug; + int debug; # endif */ - - char *yylastch; - - /* start off machines */ + + char *yylastch; + + /* start off machines */ /* # ifdef LEXDEBUG - debug = 1; + debug = 1; # else - debug = 0; + debug = 0; # endif */ @@ -372,301 +372,301 @@ yylook() # else #define debug 0 #endif - -#ifdef YYDEBUG - fprintf(yyout,"yylook()\n"); -# endif - - if (!yymorfg) - yylastch = yytext; - else - { - yymorfg=0; - yylastch = yytext+yyleng; - } #ifdef YYDEBUG - fprintf(yyout,"yylook: yymorfg=%d\n",yymorfg); + fprintf(yyout,"yylook()\n"); # endif - - for(;;) - { + + if (!yymorfg) + yylastch = yytext; + else + { + yymorfg=0; + yylastch = yytext+yyleng; + } + #ifdef YYDEBUG - fprintf(yyout,"yylook: (outer loop)"); - printchar("yyprevious",yyprevious); + fprintf(yyout,"yylook: yymorfg=%d\n",yymorfg); # endif - lsp = yylstate; - yyestate = yystate = yybgin; - if (yyprevious==YYNEWLINE) yystate++; - testbreak=0; - - for (;;) - { + for(;;) + { +#ifdef YYDEBUG + fprintf(yyout,"yylook: (outer loop)"); + printchar("yyprevious",yyprevious); +# endif + lsp = yylstate; + yyestate = yystate = yybgin; + if (yyprevious==YYNEWLINE) yystate++; + + testbreak=0; + + for (;;) + { # ifdef LEXDEBUG - fprintf(yyout,"yylook: (inner loop) state %d\n",yystate-yysvec-1); + fprintf(yyout,"yylook: (inner loop) state %d\n",yystate-yysvec-1); # endif - if(testbreak==5) - { - fprintf(yyout,"yylook: error, aborted after 5 loops\n"); - exit(0); - } - testbreak++; - - yyt = yystate->yystoff; + if(testbreak==5) + { + fprintf(yyout,"yylook: error, aborted after 5 loops\n"); + exit(EXIT_FAILURE); + } + testbreak++; -/* fprintf(yyout,"yylook: yyt offs: %02x\n",yyt-yycrank); */ + yyt = yystate->yystoff; - - if(yyt == yycrank) - { /* may not be any transitions */ - yyz = yystate->yyother; - if(yyz == 0)break; - if(yyz->yystoff == yycrank)break; - } - *yylastch++ = yych = input(); +/* fprintf(yyout,"yylook: yyt offs: %02x\n",yyt-yycrank); */ + + + if(yyt == yycrank) + { /* may not be any transitions */ + yyz = yystate->yyother; + if(yyz == 0)break; + if(yyz->yystoff == yycrank)break; + } + *yylastch++ = yych = input(); # ifdef LEXDEBUG - fprintf(yyout,"yylook: input "); - printchar("yych",yych); + fprintf(yyout,"yylook: input "); + printchar("yych",yych); # endif - - tryagain: + + tryagain: # ifdef LEXDEBUG -/* fprintf(yyout,"yylook: yych=%02x yymatch[yych]=%02x\n",yych,yymatch[yych]); */ - fprintf(yyout,"yylook: tryagain\n"); +/* fprintf(yyout,"yylook: yych=%02x yymatch[yych]=%02x\n",yych,yymatch[yych]); */ + fprintf(yyout,"yylook: tryagain\n"); # endif - yyr = yyt; + yyr = yyt; -/* fprintf(yyout,"yylook: yyr offs: %02x\n",yyr-yycrank); */ - - if ( yyt > yycrank) - { - yyt = yyr + yych; - if (yyt <= yytop && yyt->verify+yysvec == yystate) - { - if(yyt->advance+yysvec == YYLERR) /* error transitions */ - { +/* fprintf(yyout,"yylook: yyr offs: %02x\n",yyr-yycrank); */ + + if ( yyt > yycrank) + { + yyt = yyr + yych; + if (yyt <= yytop && yyt->verify+yysvec == yystate) + { + if(yyt->advance+yysvec == YYLERR) /* error transitions */ + { # ifdef LEXDEBUG - fprintf(yyout,"yylook: unput (1) "); - printchar("*yylastch",*yylastch); + fprintf(yyout,"yylook: unput (1) "); + printchar("*yylastch",*yylastch); # endif - unput(*--yylastch); - break; - } - *lsp++ = yystate = yyt->advance+yysvec; + unput(*--yylastch); + break; + } + *lsp++ = yystate = yyt->advance+yysvec; # ifdef LEXDEBUG - fprintf(yyout,"yylook: continue (1)\n"); + fprintf(yyout,"yylook: continue (1)\n"); # endif - goto contin; - } + goto contin; + } # ifdef LEXDEBUG - fprintf(yyout,"yylook: ( yyt > yycrank)\n"); + fprintf(yyout,"yylook: ( yyt > yycrank)\n"); # endif - } + } # ifdef YYOPTIM - else if(yyt < yycrank) /* r < yycrank */ - { - yyt = yyr = yycrank+(yycrank-yyt); + else if(yyt < yycrank) /* r < yycrank */ + { + yyt = yyr = yycrank+(yycrank-yyt); # ifdef LEXDEBUG - fprintf(yyout,"yylook: compressed state\n"); + fprintf(yyout,"yylook: compressed state\n"); # endif - yyt = yyt + yych; - if(yyt <= yytop && yyt->verify+yysvec == yystate) - { + yyt = yyt + yych; + if(yyt <= yytop && yyt->verify+yysvec == yystate) + { # ifdef LEXDEBUG - fprintf(yyout,"yylook: (1)\n"); + fprintf(yyout,"yylook: (1)\n"); # endif - if(yyt->advance+yysvec == YYLERR) /* error transitions */ - { + if(yyt->advance+yysvec == YYLERR) /* error transitions */ + { # ifdef LEXDEBUG - fprintf(yyout,"yylook: unput (2) "); - printchar("*yylastch",*yylastch); + fprintf(yyout,"yylook: unput (2) "); + printchar("*yylastch",*yylastch); # endif - unput(*--yylastch); - break; - } - *lsp++ = yystate = yyt->advance+yysvec; + unput(*--yylastch); + break; + } + *lsp++ = yystate = yyt->advance+yysvec; # ifdef LEXDEBUG - fprintf(yyout,"yylook: continue (2)\n"); + fprintf(yyout,"yylook: continue (2)\n"); # endif - goto contin; - - } + goto contin; + + } # ifdef LEXDEBUG /* - fprintf(yyout,"yylook: yych=%02x yymatch[yych]=%02x\n",yych,yymatch[yych]); - fprintf(yyout,"yylook: yyt offs: %02x\n",yyt-yycrank); - fprintf(yyout,"yylook: yyr offs: %02x\n",yyr-yycrank); + fprintf(yyout,"yylook: yych=%02x yymatch[yych]=%02x\n",yych,yymatch[yych]); + fprintf(yyout,"yylook: yyt offs: %02x\n",yyt-yycrank); + fprintf(yyout,"yylook: yyr offs: %02x\n",yyr-yycrank); */ # endif - yyt = yyr + YYU(yymatch[yych]); + yyt = yyr + YYU(yymatch[yych]); # ifdef LEXDEBUG /* - fprintf(yyout,"yylook: yyt offs: %02x <= yytop offs: %02x\n",yyt-yycrank,yytop-yycrank); - fprintf(yyout,"yylook: yyt->verify=%04x yysvec=%04x (yyt->verify+yysvec)=%04x == yystate=%04x\n",yyt->verify,yysvec,(yyt->verify+yysvec),yystate); + fprintf(yyout,"yylook: yyt offs: %02x <= yytop offs: %02x\n",yyt-yycrank,yytop-yycrank); + fprintf(yyout,"yylook: yyt->verify=%04x yysvec=%04x (yyt->verify+yysvec)=%04x == yystate=%04x\n",yyt->verify,yysvec,(yyt->verify+yysvec),yystate); */ - fprintf(yyout,"yylook: try fall back character\n"); + fprintf(yyout,"yylook: try fall back character\n"); # endif - if(yyt <= yytop && yyt->verify+yysvec == yystate) - { + if(yyt <= yytop && yyt->verify+yysvec == yystate) + { # ifdef LEXDEBUG - fprintf(yyout,"yylook: (2a)\n"); -# endif - - if(yyt->advance+yysvec == YYLERR) /* error transition */ - { -# ifdef LEXDEBUG -/* cc65 compiles this ?! fprintf(yyout,"yylook: unput (3) ",); */ - fprintf(yyout,"yylook: unput (3) "); - printchar("*yylastch",*yylastch); -# endif - unput(*--yylastch); - break; - } - *lsp++ = yystate = yyt->advance+yysvec; -# ifdef LEXDEBUG -/* fprintf(yyout,"yylook: yyt offs: %02x yyt->advance=%d\n",yyt-yycrank,yyt->advance); */ - fprintf(yyout,"yylook: continue (3)\n"); -# endif - goto contin; - - } -# ifdef LEXDEBUG - fprintf(yyout,"yylook: (2)\n"); -# endif - } - if ((yystate = yystate->yyother) && (yyt= yystate->yystoff) != yycrank) - { -# ifdef LEXDEBUG - fprintf(yyout,"yylook: fall back to state %d\n",yystate-yysvec-1); -# endif - goto tryagain; - } -# endif - else - { -# ifdef LEXDEBUG - fprintf(yyout,"yylook: unput (4) "); - printchar("*yylastch",*yylastch); -# endif - unput(*--yylastch); - break; - } - contin: -# ifdef LEXDEBUG - fprintf(yyout,"yylook: contin state=%d\n",yystate-yysvec-1); -# endif - ; - } - -# ifdef LEXDEBUG - if((*(lsp-1)-yysvec-1)<0) - { - fprintf(yyout,"yylook: stopped (end)\n"); - } - else - { - fprintf(yyout,"yylook: stopped at %d with\n",*(lsp-1)-yysvec-1); - } -# endif - while (lsp-- > yylstate) - { - *yylastch-- = 0; - if (*lsp != 0 && (yyfnd= (*lsp)->yystops) && *yyfnd > 0) - { - yyolsp = lsp; - if(yyextra[*yyfnd]) /* must backup */ - { - while(yyback((*lsp)->yystops,-*yyfnd) != 1 && lsp > yylstate) - { - lsp--; -# ifdef LEXDEBUG - fprintf(yyout,"yylook: unput (5) "); - printchar("*yylastch",*yylastch); -# endif - unput(*yylastch--); - } - } - yyprevious = YYU(*yylastch); - yylsp = lsp; - yyleng = yylastch-yytext+1; - yytext[yyleng] = 0; -# ifdef LEXDEBUG - fprintf(yyout,"\nyylook: match action %d\n",*yyfnd); - fprintf(yyout,"yylook: done loops: %d\n",testbreak); -# endif - return(*yyfnd++); - } - unput(*yylastch); - } - if (yytext[0] == 0 /* && feof(yyin) */) - { - yysptr=yysbuf; -# ifdef LEXDEBUG - fprintf(yyout,"yylook: done loops: %d\n",testbreak); -# endif - return(0); - } - yyprevious = yytext[0] = input(); - -# ifdef LEXDEBUG - fprintf(yyout,"yylook: input "); - printchar("yyprevious",yyprevious); + fprintf(yyout,"yylook: (2a)\n"); # endif - if (yyprevious>0) - output(yyprevious); - yylastch=yytext; + if(yyt->advance+yysvec == YYLERR) /* error transition */ + { # ifdef LEXDEBUG -/* if(debug)putchar('\n'); */ +/* cc65 compiles this ?! fprintf(yyout,"yylook: unput (3) ",); */ + fprintf(yyout,"yylook: unput (3) "); + printchar("*yylastch",*yylastch); # endif - } + unput(*--yylastch); + break; + } + *lsp++ = yystate = yyt->advance+yysvec; +# ifdef LEXDEBUG +/* fprintf(yyout,"yylook: yyt offs: %02x yyt->advance=%d\n",yyt-yycrank,yyt->advance); */ + fprintf(yyout,"yylook: continue (3)\n"); +# endif + goto contin; + + } +# ifdef LEXDEBUG + fprintf(yyout,"yylook: (2)\n"); +# endif + } + if ((yystate = yystate->yyother) && (yyt= yystate->yystoff) != yycrank) + { +# ifdef LEXDEBUG + fprintf(yyout,"yylook: fall back to state %d\n",yystate-yysvec-1); +# endif + goto tryagain; + } +# endif + else + { +# ifdef LEXDEBUG + fprintf(yyout,"yylook: unput (4) "); + printchar("*yylastch",*yylastch); +# endif + unput(*--yylastch); + break; + } + contin: +# ifdef LEXDEBUG + fprintf(yyout,"yylook: contin state=%d\n",yystate-yysvec-1); +# endif + ; + } # ifdef LEXDEBUG - fprintf(yyout,"yylook: done loops: %d\n",testbreak); - fprintf(yyout,"yylook: return <void>\n"); + if (lsp == yylstate) + { + fprintf(yyout,"yylook: stopped (end)\n"); + } + else + { + fprintf(yyout,"yylook: stopped at %d with:\n",*(lsp-1)-(yysvec+1)); + } +# endif + while (lsp-- > yylstate) + { + *yylastch-- = 0; + if (*lsp != 0 && (yyfnd= (*lsp)->yystops) && *yyfnd > 0) + { + yyolsp = lsp; + if(yyextra[*yyfnd]) /* must backup */ + { + while(yyback((*lsp)->yystops,-*yyfnd) != 1 && lsp > yylstate) + { + lsp--; +# ifdef LEXDEBUG + fprintf(yyout,"yylook: unput (5) "); + printchar("*yylastch",*yylastch); +# endif + unput(*yylastch--); + } + } + yyprevious = YYU(*yylastch); + yylsp = lsp; + yyleng = yylastch-yytext+1; + yytext[yyleng] = 0; +# ifdef LEXDEBUG + fprintf(yyout,"yylook: match action %d\n",*yyfnd); + fprintf(yyout,"yylook: done loops: %d\n",testbreak); +# endif + return(*yyfnd++); + } + unput(*yylastch); + } + if (yytext[0] == 0 /* && feof(yyin) */) + { + yysptr=yysbuf; +# ifdef LEXDEBUG + fprintf(yyout,"yylook: done loops: %d\n",testbreak); +# endif + return(0); + } + yyprevious = yytext[0] = input(); + +# ifdef LEXDEBUG + fprintf(yyout,"yylook: input "); + printchar("yyprevious",yyprevious); +# endif + + if (yyprevious>0) + output(yyprevious); + yylastch=yytext; +# ifdef LEXDEBUG +/* if(debug)putchar('\n'); */ +# endif + } + +# ifdef LEXDEBUG + fprintf(yyout,"yylook: done loops: %d\n",testbreak); + fprintf(yyout,"yylook: return <void>\n"); # endif } - + yyback(p, m) - int *p; + int *p; { - if (p==0) return(0); - while (*p) - { - if (*p++ == m) - { - return(1); - } - } - return(0); + if (p==0) return(0); + while (*p) + { + if (*p++ == m) + { + return(1); + } + } + return(0); } - /* the following are only used in the lex library */ + /* the following are only used in the lex library */ yyinput() { - int out=input(); - + int out=input(); + #ifdef YYDEBUG - fprintf(yyout,"yylook: input "); - printchar("out",out); -#endif - return(out); + fprintf(yyout,"yylook: input "); + printchar("out",out); +#endif + return(out); } yyoutput(c) - int c; + int c; { - output(c); + output(c); } yyunput(c) - int c; + int c; { - unput(c); + unput(c); } -main() +main() { printf("main start\n"); infile = fopen("yacc.in","rb"); @@ -681,16 +681,16 @@ main() } /* yyerror - issue error message */ -yyerror(s) -char *s; +yyerror(s) +char *s; { printf("[%s]\n", s); } short yyexca[] = { -1, 1, - 0, -1, - -2, 0, + 0, -1, + -2, 0, }; # define YYNPROD 15 @@ -722,39 +722,39 @@ short yyact[]= 0, 0, 0, 0, 0, 0, 0, 6, 14, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, - 0, 0, 0, 0, 0, 0, 0, 4, 6 + 0, 0, 0, 0, 0, 0, 0, 4, 6 }; short yypact[]= { -1000, -9,-1000, 5, -7, -59,-1000,-1000,-1000, -40, -29, -40, -40,-1000,-1000, -40, -40, -40, -40, -38, - -35, -38, -38,-1000,-1000,-1000 + -35, -38, -38,-1000,-1000,-1000 }; short yypgo[]= { - 0, 21, 20, 17, 11 + 0, 21, 20, 17, 11 }; short yyr1[]= { 0, 1, 1, 1, 1, 2, 4, 4, 4, 4, - 4, 4, 4, 4, 3 + 4, 4, 4, 4, 3 }; short yyr2[]= { 0, 0, 2, 3, 3, 3, 3, 3, 3, 3, - 2, 3, 1, 1, 1 + 2, 3, 1, 1, 1 }; short yychk[]= { -1000, -1, 10, -2, 256, -3, 257, 10, 10, 61, -4, 45, 40, -3, 258, 43, 45, 42, 47, -4, - -4, -4, -4, -4, -4, 41 + -4, -4, -4, -4, -4, 41 }; short yydef[]= { 1, -2, 2, 0, 0, 0, 14, 3, 4, 0, 5, 0, 0, 12, 13, 0, 0, 0, 0, 10, - 0, 6, 7, 8, 9, 11 + 0, 6, 7, 8, 9, 11 }; # define YYFLAG -1000 @@ -762,7 +762,7 @@ short yydef[]= # define YYACCEPT return(0) # define YYABORT return(1) -/* parser for yacc output */ +/* parser for yacc output */ #ifdef YYDEBUG int yydebug = 1; /* 1 for debugging */ @@ -774,233 +774,233 @@ int yychar = -1; /* current input token number */ int yynerrs = 0; /* number of errors */ short yyerrflag = 0; /* error recovery flag */ -yyparse() +yyparse() { - short yys[YYMAXDEPTH]; - short yyj, yym; - register YYSTYPE *yypvt; - register short yystate, *yyps, yyn; - register YYSTYPE *yypv; - register short *yyxi; + short yys[YYMAXDEPTH]; + short yyj, yym; + register YYSTYPE *yypvt; + register short yystate, *yyps, yyn; + register YYSTYPE *yypv; + register short *yyxi; - yystate = 0; - yychar = -1; - yynerrs = 0; - yyerrflag = 0; - yyps= &yys[-1]; - yypv= &yyv[-1]; + yystate = 0; + yychar = -1; + yynerrs = 0; + yyerrflag = 0; + yyps= &yys[-1]; + yypv= &yyv[-1]; yystack: /* put a state and value onto the stack */ #ifdef YYDEBUG - printf("yyparse: yystack\n"); + printf("yyparse: yystack\n"); #endif #ifdef YYDEBUG - printf("yyparse: yystate=%d, ", yystate); - printchar("yychar",yychar); + printf("yyparse: yystate=%d, ", yystate); + printchar("yychar",yychar); #endif - if( ++yyps> &yys[YYMAXDEPTH] ) - { - yyerror( "yyparse: yacc stack overflow" ); - return(1); - } - *yyps = yystate; - ++yypv; - *yypv = yyval; + if( ++yyps> &yys[YYMAXDEPTH] ) + { + yyerror( "yyparse: yacc stack overflow" ); + return(1); + } + *yyps = yystate; + ++yypv; + *yypv = yyval; yynewstate: #ifdef YYDEBUG - printf("yyparse: yynewstate\n"); + printf("yyparse: yynewstate\n"); #endif - yyn = yypact[yystate]; + yyn = yypact[yystate]; - if( yyn<= YYFLAG ) goto yydefault; /* simple state */ + if( yyn<= YYFLAG ) goto yydefault; /* simple state */ #ifdef YYDEBUG - printf("yyparse: yynewstate (1)\n"); + printf("yyparse: yynewstate (1)\n"); #endif - - if( yychar<0 ) if( (yychar=yylex())<0 ) yychar=0; + + if( yychar<0 ) if( (yychar=yylex())<0 ) yychar=0; #ifdef YYDEBUG - - printf("yyparse: yynewstate yyn=%d ",yyn); - printchar("yychar",yychar); + + printf("yyparse: yynewstate yyn=%d ",yyn); + printchar("yychar",yychar); #endif - - if( (yyn += yychar)<0 || yyn >= YYLAST ) goto yydefault; + + if( (yyn += yychar)<0 || yyn >= YYLAST ) goto yydefault; #ifdef YYDEBUG - printf("yyparse: yynewstate (2)\n"); + printf("yyparse: yynewstate (2)\n"); #endif - - if( yychk[ yyn=yyact[ yyn ] ] == yychar ) /* valid shift */ - { - yychar = -1; - yyval = yylval; - yystate = yyn; + + if( yychk[ yyn=yyact[ yyn ] ] == yychar ) /* valid shift */ + { + yychar = -1; + yyval = yylval; + yystate = yyn; #ifdef YYDEBUG - printf("yyparse: yynewstate (3)\n"); + printf("yyparse: yynewstate (3)\n"); #endif - if( yyerrflag > 0 ) --yyerrflag; - goto yystack; - } + if( yyerrflag > 0 ) --yyerrflag; + goto yystack; + } yydefault: #ifdef YYDEBUG - printf("yyparse: yydefault yystate=%d\n",yystate); + printf("yyparse: yydefault yystate=%d\n",yystate); #endif - /* default state action */ + /* default state action */ - if( (yyn=yydef[yystate]) == -2 ) - { - if( yychar<0 ) if( (yychar=yylex())<0 ) yychar = 0; - /* look through exception table */ + if( (yyn=yydef[yystate]) == -2 ) + { + if( yychar<0 ) if( (yychar=yylex())<0 ) yychar = 0; + /* look through exception table */ - for( yyxi=yyexca; (*yyxi!= (-1)) || (yyxi[1]!=yystate) ; yyxi += 2 ) ; /* VOID */ + for( yyxi=yyexca; (*yyxi!= (-1)) || (yyxi[1]!=yystate) ; yyxi += 2 ) ; /* VOID */ - while( *(yyxi+=2) >= 0 ) - { - if( *yyxi == yychar ) break; - } - if( (yyn = yyxi[1]) < 0 ) return(0); /* accept */ - } + while( *(yyxi+=2) >= 0 ) + { + if( *yyxi == yychar ) break; + } + if( (yyn = yyxi[1]) < 0 ) return(0); /* accept */ + } #ifdef YYDEBUG - printf("yyparse: yyn=%d yyerrflag=%d\n",yyn,yyerrflag); + printf("yyparse: yyn=%d yyerrflag=%d\n",yyn,yyerrflag); #endif - - if( yyn == 0 ) /* error */ - { - /* error ... attempt to resume parsing */ - switch( yyerrflag ){ - case 0: /* brand new error */ + if( yyn == 0 ) /* error */ + { + /* error ... attempt to resume parsing */ - yyerror( "yyparse: syntax error" ); - yyerrlab: - ++yynerrs; + switch( yyerrflag ){ + case 0: /* brand new error */ - case 1: - case 2: /* incompletely recovered error ... try again */ + yyerror( "yyparse: syntax error" ); + yyerrlab: + ++yynerrs; - yyerrflag = 3; + case 1: + case 2: /* incompletely recovered error ... try again */ - /* find a state where "error" is a legal shift action */ + yyerrflag = 3; - while ( yyps >= yys ) { - yyn = yypact[*yyps] + YYERRCODE; - if( yyn>= 0 && yyn < YYLAST && yychk[yyact[yyn]] == YYERRCODE ){ - yystate = yyact[yyn]; /* simulate a shift of "error" */ - goto yystack; - } - yyn = yypact[*yyps]; + /* find a state where "error" is a legal shift action */ - /* the current yyps has no shift onn "error", pop stack */ + while ( yyps >= yys ) { + yyn = yypact[*yyps] + YYERRCODE; + if( yyn>= 0 && yyn < YYLAST && yychk[yyact[yyn]] == YYERRCODE ){ + yystate = yyact[yyn]; /* simulate a shift of "error" */ + goto yystack; + } + yyn = yypact[*yyps]; + + /* the current yyps has no shift onn "error", pop stack */ #ifdef YYDEBUG - printf("yyparse: error recovery pops state %d, uncovers %d\n", *yyps, yyps[-1] ); + printf("yyparse: error recovery pops state %d, uncovers %d\n", *yyps, yyps[-1] ); #endif - --yyps; - --yypv; - } + --yyps; + --yypv; + } - /* there is no state on the stack with an error shift ... abort */ + /* there is no state on the stack with an error shift ... abort */ - yyabort: - return(1); + yyabort: + return(1); - case 3: /* no shift yet; clobber input char */ + case 3: /* no shift yet; clobber input char */ #ifdef YYDEBUG - printf("yyparse: error recovery discards char "); - printchar("yychar",yychar); + printf("yyparse: error recovery discards char "); + printchar("yychar",yychar); #endif - if( yychar == 0 ) goto yyabort; /* don't discard EOF, quit */ - yychar = -1; - goto yynewstate; /* try again in the same state */ + if( yychar == 0 ) goto yyabort; /* don't discard EOF, quit */ + yychar = -1; + goto yynewstate; /* try again in the same state */ - } + } - } + } - /* reduction by production yyn */ + /* reduction by production yyn */ #ifdef YYDEBUG - printf("yyparse: reduce %d\n",yyn); + printf("yyparse: reduce %d\n",yyn); #endif - yyps -= yyr2[yyn]; - yypvt = yypv; - yypv -= yyr2[yyn]; - yyval = yypv[1]; - yym=yyn; - /* consult goto table to find next state */ - yyn = yyr1[yyn]; - yyj = yypgo[yyn] + *yyps + 1; - if( yyj>=YYLAST || yychk[ yystate = yyact[yyj] ] != -yyn ) yystate = yyact[yypgo[yyn]]; - - switch(yym) - { - case 4: - { - yyerrok; - } - break; - case 5: - { - printf("[STORE]\n"); - } - break; - case 6: - { - printf("[ADD]\n"); - } - break; - case 7: - { - printf("[NEG]\n[ADD]\n"); - } - break; - case 8: - { - printf("[MUL]\n"); - } - break; - case 9: - { - printf("[DIV]\n"); - } - break; - case 10: - { - printf("[NEG]\n"); - } - break; - case 12: - { - printf("[LOAD]\n"); - } - break; - case 13: - { - printf("[PUSH %s]\n", yytext); - } - break; - case 14: - { - printf("[%s]\n", yytext); - } - break; - } - - goto yystack; /* stack new state and value */ + yyps -= yyr2[yyn]; + yypvt = yypv; + yypv -= yyr2[yyn]; + yyval = yypv[1]; + yym=yyn; + /* consult goto table to find next state */ + yyn = yyr1[yyn]; + yyj = yypgo[yyn] + *yyps + 1; + if( yyj>=YYLAST || yychk[ yystate = yyact[yyj] ] != -yyn ) yystate = yyact[yypgo[yyn]]; + + switch(yym) + { + case 4: + { + yyerrok; + } + break; + case 5: + { + printf("[STORE]\n"); + } + break; + case 6: + { + printf("[ADD]\n"); + } + break; + case 7: + { + printf("[NEG]\n[ADD]\n"); + } + break; + case 8: + { + printf("[MUL]\n"); + } + break; + case 9: + { + printf("[DIV]\n"); + } + break; + case 10: + { + printf("[NEG]\n"); + } + break; + case 12: + { + printf("[LOAD]\n"); + } + break; + case 13: + { + printf("[PUSH %s]\n", yytext); + } + break; + case 14: + { + printf("[%s]\n", yytext); + } + break; + } + + goto yystack; /* stack new state and value */ } - -int yywrap() -{ - return 1; + +int yywrap() +{ + return 1; } diff --git a/test/ref/yacc.in b/test/ref/yacc.in old mode 100755 new mode 100644 diff --git a/test/ref/yacc2.c b/test/ref/yacc2.c index 78d654ded..33288b25d 100644 --- a/test/ref/yacc2.c +++ b/test/ref/yacc2.c @@ -8,107 +8,107 @@ #include <stdio.h> # define YYTYPE char -struct yywork -{ - YYTYPE verify, advance; +struct yywork +{ + YYTYPE verify, advance; } yycrank[] = { - {0,0}, {0,0}, {1,3}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {1,4}, {1,3}, - {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {1,3}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {1,4}, {1,3}, + {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - - {0,0}, {1,5}, {5,7}, {5,7}, - {5,7}, {5,7}, {5,7}, {5,7}, - {5,7}, {5,7}, {5,7}, {5,7}, - {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + + {0,0}, {1,5}, {5,7}, {5,7}, + {5,7}, {5,7}, {5,7}, {5,7}, + {5,7}, {5,7}, {5,7}, {5,7}, + {0,0}, {0,0}, {0,0}, {0,0}, /* 0x40 */ - {0,0}, {0,0}, {1,6}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {0,0}, {0,0}, {0,0}, - - {0,0}, {0,0}, {0,0}, {0,0}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {0,0}, {0,0}, - - {0,0}, {0,0}, {6,8}, {0,0}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, + {0,0}, {0,0}, {1,6}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {0,0}, {0,0}, {0,0}, + + {0,0}, {0,0}, {0,0}, {0,0}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {0,0}, {0,0}, + + {0,0}, {0,0}, {6,8}, {0,0}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, /* 0x80 */ - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {0,0}, {0,0}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {0,0}, {0,0}, #ifdef CHARSETHACK - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, - {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {0,0}, {0,0}, /* 0xc0 */ - {0,0}, {0,0}, {1,6}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {6,8}, {6,8}, {6,8}, - {6,8}, {0,0}, {0,0}, {0,0}, + {0,0}, {0,0}, {1,6}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {6,8}, {6,8}, {6,8}, + {6,8}, {0,0}, {0,0}, {0,0}, #endif - {0,0} + {0,0} }; struct yywork *yytop = yycrank+255; int yyvstop[] = { - 0,4,0,3,4,0,2,4,0,1,4,0,2,0,1,0,0 + 0,4,0,3,4,0,2,4,0,1,4,0,2,0,1,0,0 }; -struct yysvf +struct yysvf { - struct yywork *yystoff; - struct yysvf *yyother; - int *yystops; + struct yywork *yystoff; + struct yysvf *yyother; + int *yystops; }; struct yysvf yysvec[] = { - {0, 0, 0}, - {yycrank+-1, 0, 0}, - {yycrank+0, yysvec+1, 0}, - {yycrank+0, 0, yyvstop+1}, - {yycrank+0, 0, yyvstop+3}, - {yycrank+2, 0, yyvstop+6}, - {yycrank+19, 0, yyvstop+9}, - {yycrank+0, yysvec+5, yyvstop+12}, - {yycrank+0, yysvec+6, yyvstop+14}, - {0, 0, 0} + {0, 0, 0}, + {yycrank+-1, 0, 0}, + {yycrank+0, yysvec+1, 0}, + {yycrank+0, 0, yyvstop+1}, + {yycrank+0, 0, yyvstop+3}, + {yycrank+2, 0, yyvstop+6}, + {yycrank+19, 0, yyvstop+9}, + {yycrank+0, yysvec+5, yyvstop+12}, + {yycrank+0, yysvec+6, yyvstop+14}, + {0, 0, 0} }; #if 0 @@ -116,7 +116,7 @@ struct yysvf yysvec[] = // *yylastch++ = yych = input(); void subtest1(void) { - *yylastch++ = yych = input(); + *yylastch++ = yych = input(); } #endif @@ -125,26 +125,26 @@ static int bog=1234; #if 0 void bogus(void) { - bog*=0x1234; + bog*=0x1234; } #else -#define bogus() bog+=0x1234 +#define bogus() bog+=0x1234 #endif #if 1 // yyt = yyt + yych; void subtest2(void) { - register struct yywork *yyt; - int yych; + register struct yywork *yyt; + int yych; - yyt=yycrank; - yych=10; + yyt=yycrank; + yych=10; - bogus(); - yyt = yyt + yych; + bogus(); + yyt = yyt + yych; - printf("yyt: %d %d\n",yyt->verify,yyt->advance); + printf("yyt: %d %d\n",yyt->verify,yyt->advance); } #endif @@ -152,46 +152,46 @@ void subtest2(void) // if(yyt <= yytop && yyt->verify+yysvec == yystate) void subtest3(void) { - register struct yywork *yyt; - register struct yysvf *yystate; + register struct yywork *yyt; + register struct yysvf *yystate; - yyt=yycrank; - yystate=yysvec; - - bogus(); - if(yyt <= yytop && yyt->verify+yysvec == yystate) - { - printf("if ok %d %d\n",yyt->verify,yyt->advance); - } - else - { - printf("if not ok %d %d\n",yyt->verify,yyt->advance); - } + yyt=yycrank; + yystate=yysvec; + + bogus(); + if(yyt <= yytop && yyt->verify+yysvec == yystate) + { + printf("if ok %d %d\n",yyt->verify,yyt->advance); + } + else + { + printf("if not ok %d %d\n",yyt->verify,yyt->advance); + } } #endif short yyr2[]= { 0, 0, 2, 3, 3, 3, 3, 3, 3, 3, - 2, 3, 1, 1, 1 + 2, 3, 1, 1, 1 }; // yyps -= yyr2[yyn]; void subtest4(void) { - register short *yyps, yyn; + register short *yyps, yyn; - yyps=0x8004; - yyn=0; + yyps=0x8004; + yyn=0; - while(yyn<14) - { - bogus(); - yyps -= yyr2[yyn]; + while(yyn<14) + { + bogus(); + yyps -= yyr2[yyn]; - yyn++; - } - printf("yyps: %04x\n",yyps); + yyn++; + } + printf("yyps: %04x\n",yyps); } #if 1 @@ -199,21 +199,21 @@ void subtest4(void) int yylookret=10; yylook() { - yylookret--; - return yylookret; + yylookret--; + return yylookret; } // while((nstr = yylook()) >= 0) void subtest5(void) { - int nstr; + int nstr; - bogus(); - while((nstr = yylook()) >= 0) - { - printf("nstr: %04x\n",nstr); - bogus(); - } + bogus(); + while((nstr = yylook()) >= 0) + { + printf("nstr: %04x\n",nstr); + bogus(); + } } #endif diff --git a/test/standard/Makefile b/test/standard/Makefile new file mode 100644 index 000000000..054623b79 --- /dev/null +++ b/test/standard/Makefile @@ -0,0 +1,63 @@ +# Makefile for the regression tests that return an error code on failure + +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + S = $(subst /,\,/) + NULLDEV = nul: + MKDIR = mkdir $(subst /,\,$1) + RMDIR = -rmdir /s /q $(subst /,\,$1) +else + S = / + NULLDEV = /dev/null + MKDIR = mkdir -p $1 + RMDIR = $(RM) -r $1 +endif + +ifdef QUIET + .SILENT: + NULLOUT = >$(NULLDEV) + NULLERR = 2>$(NULLDEV) +endif + +SIM65FLAGS = -x 5000000000 -c + +CC65 := $(if $(wildcard ../../bin/cc65*),..$S..$Sbin$Scc65,cc65) +CA65 := $(if $(wildcard ../../bin/ca65*),..$S..$Sbin$Sca65,ca65) +LD65 := $(if $(wildcard ../../bin/ld65*),..$S..$Sbin$Sld65,ld65) +SIM65 := $(if $(wildcard ../../bin/sim65*),..$S..$Sbin$Ssim65,sim65) + +WORKDIR = ../../testwrk/standard + +OPTIONS = c89 c99 cc65 + +.PHONY: all clean + +SOURCES := $(wildcard *.c) +TESTS = $(foreach option,$(OPTIONS),$(SOURCES:%.c=$(WORKDIR)/%.$(option).6502.prg)) +#TESTS += $(foreach option,$(OPTIONS),$(SOURCES:%.c=$(WORKDIR)/%.$(option).65c02.prg)) + +all: $(TESTS) + +$(WORKDIR): + $(call MKDIR,$(WORKDIR)) + +define PRG_template + +$(WORKDIR)/%.$1.$2.prg: %.c | $(WORKDIR) + $(if $(QUIET),echo standard/$$*.$1.$2.prg) + $(CC65) -t sim$2 $$(CC65FLAGS) -Osir --add-source --standard $1 -o $$(@:.prg=.s) $$< $(NULLERR) + $(CA65) -t sim$2 -o $$(@:.prg=.o) $$(@:.prg=.s) $(NULLERR) + $(LD65) -t sim$2 -o $$@ $$(@:.prg=.o) sim$2.lib $(NULLERR) + $(SIM65) $(SIM65FLAGS) $$@ > $(WORKDIR)/$$@.out + +endef # PRG_template + +$(foreach option,$(OPTIONS),$(eval $(call PRG_template,$(option),6502))) + +#$(foreach option,$(OPTIONS),$(eval $(call PRG_template,$(option),65c02))) + +clean: + @$(call RMDIR,$(WORKDIR)) diff --git a/test/standard/bug1670.c b/test/standard/bug1670.c new file mode 100644 index 000000000..038b40067 --- /dev/null +++ b/test/standard/bug1670.c @@ -0,0 +1,33 @@ + +/* #1670 - Standard headers contain non standard identifiers in C89/C99 mode */ + +#include <stdlib.h> +#include <stdio.h> +#include <time.h> + +#if __CC65_STD__ != __CC65_STD_CC65__ +/* implement our own clock_gettime, using a different signature than the POSIX one */ +const char* clock_gettime(void) +{ + static char buf[32]; + struct tm *my_tm; +#if 0 + /* FIXME: this will not work in the simulator */ + time_t t = time(NULL); +#else + time_t t = 0x12345678; +#endif + my_tm = localtime(&t); + printf("%2d:%2d:%2d\n", my_tm->tm_hour, my_tm->tm_min, my_tm->tm_sec); + strftime(buf, sizeof(buf), "<%H:%M:%S>", my_tm); + return buf; +} +#endif + +int main(void) +{ +#if __CC65_STD__ != __CC65_STD_CC65__ + printf("The time is %s\n", clock_gettime()); +#endif + return EXIT_SUCCESS; +} diff --git a/test/todo/Makefile b/test/todo/Makefile new file mode 100644 index 000000000..17561f8f4 --- /dev/null +++ b/test/todo/Makefile @@ -0,0 +1,64 @@ +# Makefile for the currently failing regression tests that return an error code on failure + +ifneq ($(shell echo),) + CMD_EXE = 1 +endif + +ifdef CMD_EXE + S = $(subst /,\,/) + NOT = - # Hack + NULLDEV = nul: + MKDIR = mkdir $(subst /,\,$1) + RMDIR = -rmdir /s /q $(subst /,\,$1) +else + S = / + NOT = ! + NULLDEV = /dev/null + MKDIR = mkdir -p $1 + RMDIR = $(RM) -r $1 +endif + +ifdef QUIET + .SILENT: + NULLOUT = >$(NULLDEV) + NULLERR = 2>$(NULLDEV) +endif + +SIM65FLAGS = -x 200000000 + +CC65 := $(if $(wildcard ../../bin/cc65*),..$S..$Sbin$Scc65,cc65) +CA65 := $(if $(wildcard ../../bin/ca65*),..$S..$Sbin$Sca65,ca65) +LD65 := $(if $(wildcard ../../bin/ld65*),..$S..$Sbin$Sld65,ld65) +SIM65 := $(if $(wildcard ../../bin/sim65*),..$S..$Sbin$Ssim65,sim65) + +WORKDIR = ../../testwrk/val + +OPTIONS = g O Os Osi Osir Osr Oi Oir Or + +.PHONY: all clean + +SOURCES := $(wildcard *.c) +TESTS = $(foreach option,$(OPTIONS),$(SOURCES:%.c=$(WORKDIR)/%.$(option).6502.prg)) +TESTS += $(foreach option,$(OPTIONS),$(SOURCES:%.c=$(WORKDIR)/%.$(option).65c02.prg)) + +all: $(TESTS) + +$(WORKDIR): + $(call MKDIR,$(WORKDIR)) + +define PRG_template + +$(WORKDIR)/%.$1.$2.prg: %.c | $(WORKDIR) + $(if $(QUIET),echo val/$$*.$1.$2.prg) + $(CC65) -t sim$2 $$(CC65FLAGS) -$1 -o $$(@:.prg=.s) $$< $(NULLERR) + $(CA65) -t sim$2 -o $$(@:.prg=.o) $$(@:.prg=.s) $(NULLERR) + $(LD65) -t sim$2 -o $$@ $$(@:.prg=.o) sim$2.lib $(NULLERR) + $(NOT) $(SIM65) $(SIM65FLAGS) $$@ $(NULLOUT) + +endef # PRG_template + +$(foreach option,$(OPTIONS),$(eval $(call PRG_template,$(option),6502))) +$(foreach option,$(OPTIONS),$(eval $(call PRG_template,$(option),65c02))) + +clean: + @$(call RMDIR,$(WORKDIR)) diff --git a/test/todo/bug927.c b/test/todo/bug927.c new file mode 100644 index 000000000..e0f916e66 --- /dev/null +++ b/test/todo/bug927.c @@ -0,0 +1,47 @@ + +/* bug #927: format specifiers related to leading zeros do not work as expected */ + +/* expected output: +0023 +0023 +-0023 +-023 +*/ + +#include <stdio.h> +#include <stdlib.h> +#include <string.h> + +char b1[10]; +char b2[10]; +char b3[10]; +char b4[10]; + +int main(void) { + printf("%.4d\n", 23); + printf("%04d\n", 23); + printf("%.4d\n", -23); + printf("%04d\n\n", -23); + + sprintf(b1, "%.4d", 23); + sprintf(b2, "%04d", 23); + sprintf(b3, "%.4d", -23); + sprintf(b4, "%04d", -23); + + printf("%s\n", b1); + printf("%s\n", b2); + printf("%s\n", b3); + printf("%s\n\n", b4); + + printf("%d\n", strcmp(b1, "0023")); + printf("%d\n", strcmp(b2, "0023")); + printf("%d\n", strcmp(b3, "-0023")); + printf("%d\n", strcmp(b4, "-023")); + + if(strcmp(b1, "0023") != 0) return EXIT_FAILURE; + if(strcmp(b2, "0023") != 0) return EXIT_FAILURE; + if(strcmp(b3, "-0023") != 0) return EXIT_FAILURE; + if(strcmp(b4, "-023") != 0) return EXIT_FAILURE; + + return EXIT_SUCCESS; +} diff --git a/testcode/lib/sprintf-test.c b/test/todo/sprintf-test.c similarity index 99% rename from testcode/lib/sprintf-test.c rename to test/todo/sprintf-test.c index 55354be20..bd5de44b4 100644 --- a/testcode/lib/sprintf-test.c +++ b/test/todo/sprintf-test.c @@ -1,13 +1,13 @@ #include <stdio.h> #include <string.h> #include <stdarg.h> -#if defined(__CC65__) +#if defined(__CC65__) && !defined(__SIM6502__) && !defined(__SIM65C02__) #include <conio.h> #endif /* Flag to #ifdef the tests out that crash the old implementation */ -/*#define NOCRASH 1 */ +#define NOCRASH 1 @@ -532,9 +532,9 @@ int main (void) /* Alternative form with zero value */ #ifndef NOCRASH OneTest (__LINE__, "0", 1, "%#o", 0U); +#endif OneTest (__LINE__, "0", 1, "%#x", 0U); OneTest (__LINE__, "0", 1, "%#X", 0U); -#endif /* Alternative form with zero value and precision 1 */ OneTest (__LINE__, "0", 1, "%#.1o", 0U); @@ -570,8 +570,8 @@ int main (void) } /* Wait for a key so we can read the result */ -#if defined(__CC65__) +#if defined(__CC65__) && !defined(__SIM6502__) && !defined(__SIM65C02__) cgetc (); #endif - return 0; + return Failures; } diff --git a/test/val/Makefile b/test/val/Makefile index 4ad8160ef..acac670cb 100644 --- a/test/val/Makefile +++ b/test/val/Makefile @@ -1,70 +1,62 @@ - -# makefile for the regression tests that return an error code on failure +# Makefile for the regression tests that return an error code on failure ifneq ($(shell echo),) - CMD_EXE := 1 + CMD_EXE = 1 endif ifdef CMD_EXE - DEL = -del /f $(subst /,\,$1) + S = $(subst /,\,/) + NULLDEV = nul: + MKDIR = mkdir $(subst /,\,$1) + RMDIR = -rmdir /s /q $(subst /,\,$1) else - DEL = $(RM) $1 + S = / + NULLDEV = /dev/null + MKDIR = mkdir -p $1 + RMDIR = $(RM) -r $1 endif -CC65FLAGS := -t sim6502 -SIM65FLAGS := -x 200000000 +ifdef QUIET + .SILENT: + NULLOUT = >$(NULLDEV) + NULLERR = 2>$(NULLDEV) +endif -CL65 := $(if $(wildcard ../../bin/cl65*),../../bin/cl65,cl65) -SIM65 := $(if $(wildcard ../../bin/sim65*),../../bin/sim65,sim65) +SIM65FLAGS = -x 5000000000 -c -WORKDIR := ../../testwrk +CC65 := $(if $(wildcard ../../bin/cc65*),..$S..$Sbin$Scc65,cc65) +CA65 := $(if $(wildcard ../../bin/ca65*),..$S..$Sbin$Sca65,ca65) +LD65 := $(if $(wildcard ../../bin/ld65*),..$S..$Sbin$Sld65,ld65) +SIM65 := $(if $(wildcard ../../bin/sim65*),..$S..$Sbin$Ssim65,sim65) + +WORKDIR = ../../testwrk/val + +OPTIONS = g O Os Osi Osir Osr Oi Oir Or .PHONY: all clean SOURCES := $(wildcard *.c) -TESTS := $(foreach option,. .o. .os. .osi. .osir. .oi. .oir. .or.,$(SOURCES:%.c=$(WORKDIR)/%$(option)prg)) +TESTS = $(foreach option,$(OPTIONS),$(SOURCES:%.c=$(WORKDIR)/%.$(option).6502.prg)) +TESTS += $(foreach option,$(OPTIONS),$(SOURCES:%.c=$(WORKDIR)/%.$(option).65c02.prg)) all: $(TESTS) -# Some files have "K & R"-style syntax. Therefore, some forward -# function-declarations don't match the later function definitions. -# Those programs fail when fastcall is used; but, the cdecl calling convention -# tolerates those conflicts. Therefore, make their functions default to cdecl. -# -$(WORKDIR)/cq4%prg $(WORKDIR)/cq71.%rg $(WORKDIR)/cq81%prg $(WORKDIR)/cq84%prg: CC65FLAGS += -Wc --all-cdecl +$(WORKDIR): + $(call MKDIR,$(WORKDIR)) -$(WORKDIR)/%.prg: %.c - $(CL65) $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ +define PRG_template -$(WORKDIR)/%.o.prg: %.c - $(CL65) -O $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ +$(WORKDIR)/%.$1.$2.prg: %.c | $(WORKDIR) + $(if $(QUIET),echo val/$$*.$1.$2.prg) + $(CC65) -t sim$2 $$(CC65FLAGS) --add-source -$1 -o $$(@:.prg=.s) $$< $(NULLERR) + $(CA65) -t sim$2 -o $$(@:.prg=.o) $$(@:.prg=.s) $(NULLERR) + $(LD65) -t sim$2 -o $$@ $$(@:.prg=.o) sim$2.lib $(NULLERR) + $(SIM65) $(SIM65FLAGS) $$@ > $(WORKDIR)/$$@.out -$(WORKDIR)/%.os.prg: %.c - $(CL65) -Os $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ +endef # PRG_template -$(WORKDIR)/%.osi.prg: %.c - $(CL65) -Osi $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ - -$(WORKDIR)/%.osir.prg: %.c - $(CL65) -Osir $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ - -$(WORKDIR)/%.oi.prg: %.c - $(CL65) -Oi $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ - -$(WORKDIR)/%.oir.prg: %.c - $(CL65) -Oir $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ - -$(WORKDIR)/%.or.prg: %.c - $(CL65) -Or $(CC65FLAGS) $< -o $@ - $(SIM65) $(SIM65FLAGS) $@ +$(foreach option,$(OPTIONS),$(eval $(call PRG_template,$(option),6502))) +$(foreach option,$(OPTIONS),$(eval $(call PRG_template,$(option),65c02))) clean: - @$(call DEL,$(TESTS)) - @$(call DEL,$(SOURCES:.c=.o)) + @$(call RMDIR,$(WORKDIR)) diff --git a/test/val/add2.c b/test/val/add2.c index 90f0f4175..6fc23e5da 100644 --- a/test/val/add2.c +++ b/test/val/add2.c @@ -6,33 +6,18 @@ #include <stdio.h> #include <limits.h> +#include <stdint.h> + +/* #define SUPPORT_BIT_TYPES */ unsigned char success=0; unsigned char failures=0; unsigned char dummy=0; -#ifdef SIZEOF_INT_16BIT -#if defined(__LINUX__) || defined(LINUX) -unsigned short aint0 = 0; -unsigned short aint1 = 0; -unsigned short aint2 = 0; -unsigned short aint3 = 0; - -#else -unsigned int aint0 = 0; -unsigned int aint1 = 0; -unsigned int aint2 = 0; -unsigned int aint3 = 0; - -#endif - -#else -unsigned int aint0 = 0; -unsigned int aint1 = 0; -unsigned int aint2 = 0; -unsigned int aint3 = 0; - -#endif +uint16_t aint0 = 0; +uint16_t aint1 = 0; +uint16_t aint2 = 0; +uint16_t aint3 = 0; unsigned char achar0 = 0; unsigned char achar1 = 0; diff --git a/test/val/add3a.c b/test/val/add3a.c old mode 100755 new mode 100644 diff --git a/test/val/anon-struct1.c b/test/val/anon-struct1.c new file mode 100644 index 000000000..9a737adca --- /dev/null +++ b/test/val/anon-struct1.c @@ -0,0 +1,111 @@ +/* + !!DESCRIPTION!! Make sure that structs/unions know the sizes of anonymous struct/union members + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Greg King +*/ + +/* + see https://github.com/cc65/cc65/issues/641 +*/ + +#include <stdio.h> + +static unsigned char fails = 0; + +typedef struct { + short s1; + struct { + int i1; + long l1; + char c1; + }; + char c2; +} s1_t; + +typedef struct { + short s1; + union { + int i1; + long l1; + char c1; + }; + char c2; +} s2_t; + +typedef union { + short s1; + struct { + int i1; + long l1; + char c1; + }; + char c2; +} u1_t; + +typedef union { + short s1; + union { + int i1; + long l1; + char c1; + }; + char c2; +} u2_t; + +static s1_t s1; +static s2_t s2; +static u1_t u1; +static u2_t u2; + +/* We use "variables" in the comparisons, so that we can avoid "constant +** comparison" and "Unreachable code" warnings (the second one currently +** can't be suppressed). +*/ + +static size_t const four = 4; +static size_t const seven = 7; +static size_t const ten = 10; + +int main(void) +{ + /* Check the types' sizes. */ + + if (sizeof (s1_t) != ten) { + printf("s1_t size is %u; it should be 10.\n", sizeof (s1_t)); + ++fails; + } + if (sizeof (s2_t) != seven) { + printf("s2_t size is %u; it should be 7.\n", sizeof (s2_t)); + ++fails; + } + if (sizeof (u1_t) != seven) { + printf("u1_t size is %u; it should be 7.\n", sizeof (u1_t)); + ++fails; + } + if (sizeof (u2_t) != four) { + printf("u2_t size is %u; it should be 4.\n", sizeof (u2_t)); + ++fails; + } + + /* Check the variables' sizes. */ + + if (sizeof s1 != ten) { + printf("s1 size is %u; it should be 10.\n", sizeof s1); + ++fails; + } + if (sizeof s2 != seven) { + printf("s2 size is %u; it should be 7.\n", sizeof s2); + ++fails; + } + if (sizeof u1 != seven) { + printf("u1 size is %u; it should be 7.\n", sizeof u1); + ++fails; + } + if (sizeof u2 != four) { + printf("u2 size is %u; it should be 4.\n", sizeof u2); + ++fails; + } + + return fails; +} diff --git a/test/val/anon-struct2.c b/test/val/anon-struct2.c new file mode 100644 index 000000000..bdaddc823 --- /dev/null +++ b/test/val/anon-struct2.c @@ -0,0 +1,152 @@ +/* + !!DESCRIPTION!! Make sure that the fields of anonymous structs/unions can be reached properly. + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Greg King +*/ + +#include <stddef.h> +#include <stdio.h> + +static unsigned char fails = 0; + +typedef struct { + short s1; + struct { + char c1; + int i1; + long l1; + }; + char c2; +} s1_t; + +typedef struct { + char c2; + union { + int i1; + char c1; + long l1; + }; + short s1; +} s2_t; + +typedef union { + short s1; + struct { + int i1; + long l1; + char c1; + }; + char c2; +} u1_t; + +typedef union { + short s1; + union { + long l1; + char c1; + int i1; + }; + char c2; +} u2_t; + +typedef struct { + union { + short s1; + struct { + int i1; + long l1; + char c1; + }; + char c2; + }; + short s2; +} s3_t; + +static s1_t s1; +static s2_t s2; +static u1_t u1; +static u2_t u2; + +static long l2; +static int i2; + +/* We use "variables" in the comparisons, so that we can avoid "constant +** comparison" and "Unreachable code" warnings (the second one currently +** can't be suppressed). +*/ + +static size_t const zero = 0; +static size_t const one = 1; +static size_t const three = 3; +static size_t const five = 5; +static size_t const six = 6; +static size_t const seven = 7; +static size_t const nine = 9; + +int main(void) +{ + /* Can cc65 see the names of members of anonymous structs/unions? */ + + l2 = s1.l1; + l2 = s2.l1; + l2 = u1.l1; + l2 = u2.l1; + + i2 = s1.c1; + i2 = s1.c2; + i2 = s2.c1; + i2 = s2.c2; + i2 = u1.c1; + i2 = u1.c2; + i2 = u2.c1; + i2 = u2.c2; + + /* Does cc65 use the correct offsets of + ** the members of anonymous structs/unions? + */ + + if (offsetof(s1_t, i1) != three) { + printf("The offset of s1.i1 is %u; it should be 3.\n", offsetof(s1_t, i1)); + ++fails; + } + if (offsetof(s2_t, l1) != one) { + printf("The offset of s2.l1 is %u; it should be 1.\n", offsetof(s2_t, l1)); + ++fails; + } + if (offsetof(u1_t, c1) != six) { + printf("The offset of u1.c1 is %u; it should be 6.\n", offsetof(u1_t, c1)); + ++fails; + } + if (offsetof(u2_t, i1) != zero) { + printf("The offset of u2.i1 is %u; it should be 0.\n", offsetof(u2_t, i1)); + ++fails; + } + + /* Does cc65 use the correct offset of a member + ** that's later than an anonymous struct/union? + */ + + if (offsetof(s1_t, c2) != nine) { + printf("The offset of s1.c2 is %u; it should be 9.\n", offsetof(s1_t, c2)); + ++fails; + } + if (offsetof(s2_t, s1) != five) { + printf("The offset of s2.s1 is %u; it should be 5.\n", offsetof(s2_t, s1)); + ++fails; + } + if (offsetof(u1_t, c2) != zero) { + printf("The offset of u1.c2 is %u; it should be 0.\n", offsetof(u1_t, c2)); + ++fails; + } + if (offsetof(u2_t, c2) != zero) { + printf("The offset of u2.c2 is %u; it should be 0.\n", offsetof(u2_t, c2)); + ++fails; + } + if (offsetof(s3_t, s2) != seven) { + printf("The offset of s3.s2 is %u; it should be 7.\n", offsetof(s3_t, s2)); + ++fails; + } + + return fails; +} diff --git a/test/val/assign-use1.c b/test/val/assign-use1.c new file mode 100644 index 000000000..744023530 --- /dev/null +++ b/test/val/assign-use1.c @@ -0,0 +1,36 @@ +/* + !!DESCRIPTION!! Assign an int; then, do an operation that depends directly on that assignment. + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Greg King +*/ + +#include <stdio.h> + +static unsigned char failures = 0; + +static unsigned int result; +static const unsigned int buffer = 0xABCD; + +int main(void) +{ + result = buffer; + + /* Shift doesn't use high byte (X register); previous assignment should be optimized. */ + result <<= 8; + if (result != 0xCD00) { + ++failures; + printf("assign-use1: left shift is $%X, not $CD00.\n", result); + } + + result = buffer; + + /* Shift does use high byte; previous assignment shouldn't be optimized by OptStore5(). */ + result >>= 8; + if (result != 0x00AB) { + ++failures; + printf("assign-use1: right shift is $%X, not $00AB.\n", result); + } + + return failures; +} diff --git a/test/val/atoi-test.c b/test/val/atoi-test.c index 5f5fa65e7..8bc77d488 100644 --- a/test/val/atoi-test.c +++ b/test/val/atoi-test.c @@ -1,28 +1,32 @@ -/* - !!DESCRIPTION!! A small test for atoi. Assumes twos complement - !!ORIGIN!! - !!LICENCE!! - !!AUTHOR!! -*/ - +/* A small test for atoi. Assumes twos complement */ #include <stdio.h> #include <stdlib.h> #include <string.h> #include <limits.h> #include <errno.h> + + +#define outfile stderr + + + static unsigned int Failures = 0; + + static void CheckAtoi (const char* Str, int Val) { int Res = atoi (Str); if (Res != Val) { - printf ("atoi error in \"%s\":\n" - " result = %d, should be %d\n", Str, Res, Val); + fprintf (outfile, "atoi error in \"%s\":\n" + " result = %d, should be %d\n", Str, Res, Val); ++Failures; } } + + int main (void) { CheckAtoi ("\t +0A", 0); @@ -36,7 +40,6 @@ int main (void) CheckAtoi ("0x7FFF", 0); CheckAtoi (" +0x7FFF", 0); CheckAtoi (" -0x7FFF", 0); - printf ("Failures: %u\n", Failures); - - return Failures; + fprintf (outfile, "Failures: %u\n", Failures); + return (Failures != 0); } diff --git a/test/val/binlit.c b/test/val/binlit.c new file mode 100644 index 000000000..f89ca60fc --- /dev/null +++ b/test/val/binlit.c @@ -0,0 +1,533 @@ +static unsigned char small[256]; +static unsigned big[256]; + +int main() { + + unsigned i; + + small[0] = 0b0; + small[1] = 0b1; + small[2] = 0b10; + small[3] = 0b11; + small[4] = 0b100; + small[5] = 0b101; + small[6] = 0b110; + small[7] = 0b000111; + small[8] = 0b1000; + small[9] = 0b1001; + small[10] = 0b0001010; + small[11] = 0b0001011; + small[12] = 0b1100; + small[13] = 0b1101; + small[14] = 0b1110; + small[15] = 0b1111; + small[16] = 0b10000; + small[17] = 0b10001; + small[18] = 0b00010010; + small[19] = 0b00010011; + small[20] = 0b00010100; + small[21] = 0b00010101; + small[22] = 0b10110; + small[23] = 0b10111; + small[24] = 0b11000; + small[25] = 0b11001; + small[26] = 0b11010; + small[27] = 0b11011; + small[28] = 0b11100; + small[29] = 0b11101; + small[30] = 0b11110; + small[31] = 0b11111; + small[32] = 0b00000000100000; + small[33] = 0b00000000100001; + small[34] = 0b100010; + small[35] = 0b100011; + small[36] = 0b100100; + small[37] = 0b100101; + small[38] = 0b100110; + small[39] = 0b100111; + small[40] = 0b101000; + small[41] = 0b101001; + small[42] = 0b101010; + small[43] = 0b101011; + small[44] = 0b101100; + small[45] = 0b101101; + small[46] = 0b101110; + small[47] = 0b101111; + small[48] = 0b110000; + small[49] = 0b110001; + small[50] = 0b110010; + small[51] = 0b110011; + small[52] = 0b110100; + small[53] = 0b110101; + small[54] = 0b110110; + small[55] = 0b110111; + small[56] = 0b111000; + small[57] = 0b111001; + small[58] = 0b111010; + small[59] = 0b111011; + small[60] = 0b111100; + small[61] = 0b111101; + small[62] = 0b111110; + small[63] = 0b111111; + small[64] = 0b1000000; + small[65] = 0b1000001; + small[66] = 0b1000010; + small[67] = 0b1000011; + small[68] = 0b1000100; + small[69] = 0b1000101; + small[70] = 0b1000110; + small[71] = 0b1000111; + small[72] = 0b1001000; + small[73] = 0b1001001; + small[74] = 0b1001010; + small[75] = 0b1001011; + small[76] = 0b1001100; + small[77] = 0b1001101; + small[78] = 0b1001110; + small[79] = 0b1001111; + small[80] = 0b1010000; + small[81] = 0b1010001; + small[82] = 0b1010010; + small[83] = 0b1010011; + small[84] = 0b1010100; + small[85] = 0b1010101; + small[86] = 0b1010110; + small[87] = 0b1010111; + small[88] = 0b1011000; + small[89] = 0b1011001; + small[90] = 0b1011010; + small[91] = 0b1011011; + small[92] = 0b1011100; + small[93] = 0b1011101; + small[94] = 0b1011110; + small[95] = 0b1011111; + small[96] = 0b1100000; + small[97] = 0b1100001; + small[98] = 0b1100010; + small[99] = 0b1100011; + small[100] = 0b1100100; + small[101] = 0b1100101; + small[102] = 0b1100110; + small[103] = 0b1100111; + small[104] = 0b1101000; + small[105] = 0b1101001; + small[106] = 0b1101010; + small[107] = 0b1101011; + small[108] = 0b1101100; + small[109] = 0b1101101; + small[110] = 0b1101110; + small[111] = 0b1101111; + small[112] = 0b1110000; + small[113] = 0b1110001; + small[114] = 0b1110010; + small[115] = 0b1110011; + small[116] = 0b1110100; + small[117] = 0b1110101; + small[118] = 0b1110110; + small[119] = 0b1110111; + small[120] = 0b1111000; + small[121] = 0b1111001; + small[122] = 0b1111010; + small[123] = 0b1111011; + small[124] = 0b1111100; + small[125] = 0b1111101; + small[126] = 0b1111110; + small[127] = 0b1111111; + small[128] = 0b10000000; + small[129] = 0b10000001; + small[130] = 0b10000010; + small[131] = 0b10000011; + small[132] = 0b10000100; + small[133] = 0b10000101; + small[134] = 0b10000110; + small[135] = 0b10000111; + small[136] = 0b10001000; + small[137] = 0b10001001; + small[138] = 0b10001010; + small[139] = 0b10001011; + small[140] = 0b10001100; + small[141] = 0b10001101; + small[142] = 0b10001110; + small[143] = 0b10001111; + small[144] = 0b10010000; + small[145] = 0b10010001; + small[146] = 0b10010010; + small[147] = 0b10010011; + small[148] = 0b10010100; + small[149] = 0b10010101; + small[150] = 0b10010110; + small[151] = 0b10010111; + small[152] = 0b10011000; + small[153] = 0b10011001; + small[154] = 0b10011010; + small[155] = 0b10011011; + small[156] = 0b10011100; + small[157] = 0b10011101; + small[158] = 0b10011110; + small[159] = 0b10011111; + small[160] = 0b10100000; + small[161] = 0b10100001; + small[162] = 0b10100010; + small[163] = 0b10100011; + small[164] = 0b10100100; + small[165] = 0b10100101; + small[166] = 0b10100110; + small[167] = 0b10100111; + small[168] = 0b10101000; + small[169] = 0b10101001; + small[170] = 0b10101010; + small[171] = 0b10101011; + small[172] = 0b10101100; + small[173] = 0b10101101; + small[174] = 0b10101110; + small[175] = 0b10101111; + small[176] = 0b10110000; + small[177] = 0b10110001; + small[178] = 0b10110010; + small[179] = 0b10110011; + small[180] = 0b10110100; + small[181] = 0b10110101; + small[182] = 0b10110110; + small[183] = 0b10110111; + small[184] = 0b10111000; + small[185] = 0b10111001; + small[186] = 0b10111010; + small[187] = 0b10111011; + small[188] = 0b10111100; + small[189] = 0b10111101; + small[190] = 0b10111110; + small[191] = 0b10111111; + small[192] = 0b11000000; + small[193] = 0b11000001; + small[194] = 0b11000010; + small[195] = 0b11000011; + small[196] = 0b11000100; + small[197] = 0b11000101; + small[198] = 0b11000110; + small[199] = 0b11000111; + small[200] = 0b11001000; + small[201] = 0b11001001; + small[202] = 0b11001010; + small[203] = 0b11001011; + small[204] = 0b11001100; + small[205] = 0b11001101; + small[206] = 0b11001110; + small[207] = 0b11001111; + small[208] = 0b11010000; + small[209] = 0b11010001; + small[210] = 0b11010010; + small[211] = 0b11010011; + small[212] = 0b11010100; + small[213] = 0b11010101; + small[214] = 0b11010110; + small[215] = 0b11010111; + small[216] = 0b11011000; + small[217] = 0b11011001; + small[218] = 0b11011010; + small[219] = 0b11011011; + small[220] = 0b11011100; + small[221] = 0b11011101; + small[222] = 0b11011110; + small[223] = 0b11011111; + small[224] = 0b11100000; + small[225] = 0b11100001; + small[226] = 0b11100010; + small[227] = 0b11100011; + small[228] = 0b11100100; + small[229] = 0b11100101; + small[230] = 0b11100110; + small[231] = 0b11100111; + small[232] = 0b11101000; + small[233] = 0b11101001; + small[234] = 0b11101010; + small[235] = 0b11101011; + small[236] = 0b11101100; + small[237] = 0b11101101; + small[238] = 0b11101110; + small[239] = 0b11101111; + small[240] = 0b11110000; + small[241] = 0b11110001; + small[242] = 0b11110010; + small[243] = 0b11110011; + small[244] = 0b11110100; + small[245] = 0b11110101; + small[246] = 0b11110110; + small[247] = 0b11110111; + small[248] = 0b11111000; + small[249] = 0b11111001; + small[250] = 0b11111010; + small[251] = 0b11111011; + small[252] = 0b11111100; + small[253] = 0b11111101; + small[254] = 0b11111110; + small[255] = 0b11111111; + + for (i = 0; i < 256; i++) { + if (small[i] != i) + return 1; + } + + big[0] = 0b1111111100000000; + big[1] = 0b1111111100000001; + big[2] = 0b1111111100000010; + big[3] = 0b1111111100000011; + big[4] = 0b1111111100000100; + big[5] = 0b1111111100000101; + big[6] = 0b1111111100000110; + big[7] = 0b1111111100000111; + big[8] = 0b1111111100001000; + big[9] = 0b1111111100001001; + big[10] = 0b1111111100001010; + big[11] = 0b1111111100001011; + big[12] = 0b1111111100001100; + big[13] = 0b1111111100001101; + big[14] = 0b1111111100001110; + big[15] = 0b1111111100001111; + big[16] = 0b1111111100010000; + big[17] = 0b1111111100010001; + big[18] = 0b1111111100010010; + big[19] = 0b1111111100010011; + big[20] = 0b1111111100010100; + big[21] = 0b1111111100010101; + big[22] = 0b1111111100010110; + big[23] = 0b1111111100010111; + big[24] = 0b1111111100011000; + big[25] = 0b1111111100011001; + big[26] = 0b1111111100011010; + big[27] = 0b1111111100011011; + big[28] = 0b1111111100011100; + big[29] = 0b1111111100011101; + big[30] = 0b1111111100011110; + big[31] = 0b1111111100011111; + big[32] = 0b1111111100100000; + big[33] = 0b1111111100100001; + big[34] = 0b1111111100100010; + big[35] = 0b1111111100100011; + big[36] = 0b1111111100100100; + big[37] = 0b1111111100100101; + big[38] = 0b1111111100100110; + big[39] = 0b1111111100100111; + big[40] = 0b1111111100101000; + big[41] = 0b1111111100101001; + big[42] = 0b1111111100101010; + big[43] = 0b1111111100101011; + big[44] = 0b1111111100101100; + big[45] = 0b1111111100101101; + big[46] = 0b1111111100101110; + big[47] = 0b1111111100101111; + big[48] = 0b1111111100110000; + big[49] = 0b1111111100110001; + big[50] = 0b1111111100110010; + big[51] = 0b1111111100110011; + big[52] = 0b1111111100110100; + big[53] = 0b1111111100110101; + big[54] = 0b1111111100110110; + big[55] = 0b1111111100110111; + big[56] = 0b1111111100111000; + big[57] = 0b1111111100111001; + big[58] = 0b1111111100111010; + big[59] = 0b1111111100111011; + big[60] = 0b1111111100111100; + big[61] = 0b1111111100111101; + big[62] = 0b1111111100111110; + big[63] = 0b1111111100111111; + big[64] = 0b1111111101000000; + big[65] = 0b1111111101000001; + big[66] = 0b1111111101000010; + big[67] = 0b1111111101000011; + big[68] = 0b1111111101000100; + big[69] = 0b1111111101000101; + big[70] = 0b1111111101000110; + big[71] = 0b1111111101000111; + big[72] = 0b1111111101001000; + big[73] = 0b1111111101001001; + big[74] = 0b1111111101001010; + big[75] = 0b1111111101001011; + big[76] = 0b1111111101001100; + big[77] = 0b1111111101001101; + big[78] = 0b1111111101001110; + big[79] = 0b1111111101001111; + big[80] = 0b1111111101010000; + big[81] = 0b1111111101010001; + big[82] = 0b1111111101010010; + big[83] = 0b1111111101010011; + big[84] = 0b1111111101010100; + big[85] = 0b1111111101010101; + big[86] = 0b1111111101010110; + big[87] = 0b1111111101010111; + big[88] = 0b1111111101011000; + big[89] = 0b1111111101011001; + big[90] = 0b1111111101011010; + big[91] = 0b1111111101011011; + big[92] = 0b1111111101011100; + big[93] = 0b1111111101011101; + big[94] = 0b1111111101011110; + big[95] = 0b1111111101011111; + big[96] = 0b1111111101100000; + big[97] = 0b1111111101100001; + big[98] = 0b1111111101100010; + big[99] = 0b1111111101100011; + big[100] = 0b1111111101100100; + big[101] = 0b1111111101100101; + big[102] = 0b1111111101100110; + big[103] = 0b1111111101100111; + big[104] = 0b1111111101101000; + big[105] = 0b1111111101101001; + big[106] = 0b1111111101101010; + big[107] = 0b1111111101101011; + big[108] = 0b1111111101101100; + big[109] = 0b1111111101101101; + big[110] = 0b1111111101101110; + big[111] = 0b1111111101101111; + big[112] = 0b1111111101110000; + big[113] = 0b1111111101110001; + big[114] = 0b1111111101110010; + big[115] = 0b1111111101110011; + big[116] = 0b1111111101110100; + big[117] = 0b1111111101110101; + big[118] = 0b1111111101110110; + big[119] = 0b1111111101110111; + big[120] = 0b1111111101111000; + big[121] = 0b1111111101111001; + big[122] = 0b1111111101111010; + big[123] = 0b1111111101111011; + big[124] = 0b1111111101111100; + big[125] = 0b1111111101111101; + big[126] = 0b1111111101111110; + big[127] = 0b1111111101111111; + big[128] = 0b1111111110000000; + big[129] = 0b1111111110000001; + big[130] = 0b1111111110000010; + big[131] = 0b1111111110000011; + big[132] = 0b1111111110000100; + big[133] = 0b1111111110000101; + big[134] = 0b1111111110000110; + big[135] = 0b1111111110000111; + big[136] = 0b1111111110001000; + big[137] = 0b1111111110001001; + big[138] = 0b1111111110001010; + big[139] = 0b1111111110001011; + big[140] = 0b1111111110001100; + big[141] = 0b1111111110001101; + big[142] = 0b1111111110001110; + big[143] = 0b1111111110001111; + big[144] = 0b1111111110010000; + big[145] = 0b1111111110010001; + big[146] = 0b1111111110010010; + big[147] = 0b1111111110010011; + big[148] = 0b1111111110010100; + big[149] = 0b1111111110010101; + big[150] = 0b1111111110010110; + big[151] = 0b1111111110010111; + big[152] = 0b1111111110011000; + big[153] = 0b1111111110011001; + big[154] = 0b1111111110011010; + big[155] = 0b1111111110011011; + big[156] = 0b1111111110011100; + big[157] = 0b1111111110011101; + big[158] = 0b1111111110011110; + big[159] = 0b1111111110011111; + big[160] = 0b1111111110100000; + big[161] = 0b1111111110100001; + big[162] = 0b1111111110100010; + big[163] = 0b1111111110100011; + big[164] = 0b1111111110100100; + big[165] = 0b1111111110100101; + big[166] = 0b1111111110100110; + big[167] = 0b1111111110100111; + big[168] = 0b1111111110101000; + big[169] = 0b1111111110101001; + big[170] = 0b1111111110101010; + big[171] = 0b1111111110101011; + big[172] = 0b1111111110101100; + big[173] = 0b1111111110101101; + big[174] = 0b1111111110101110; + big[175] = 0b1111111110101111; + big[176] = 0b1111111110110000; + big[177] = 0b1111111110110001; + big[178] = 0b1111111110110010; + big[179] = 0b1111111110110011; + big[180] = 0b1111111110110100; + big[181] = 0b1111111110110101; + big[182] = 0b1111111110110110; + big[183] = 0b1111111110110111; + big[184] = 0b1111111110111000; + big[185] = 0b1111111110111001; + big[186] = 0b1111111110111010; + big[187] = 0b1111111110111011; + big[188] = 0b1111111110111100; + big[189] = 0b1111111110111101; + big[190] = 0b1111111110111110; + big[191] = 0b1111111110111111; + big[192] = 0b1111111111000000; + big[193] = 0b1111111111000001; + big[194] = 0b1111111111000010; + big[195] = 0b1111111111000011; + big[196] = 0b1111111111000100; + big[197] = 0b1111111111000101; + big[198] = 0b1111111111000110; + big[199] = 0b1111111111000111; + big[200] = 0b1111111111001000; + big[201] = 0b1111111111001001; + big[202] = 0b1111111111001010; + big[203] = 0b1111111111001011; + big[204] = 0b1111111111001100; + big[205] = 0b1111111111001101; + big[206] = 0b1111111111001110; + big[207] = 0b1111111111001111; + big[208] = 0b1111111111010000; + big[209] = 0b1111111111010001; + big[210] = 0b1111111111010010; + big[211] = 0b1111111111010011; + big[212] = 0b1111111111010100; + big[213] = 0b1111111111010101; + big[214] = 0b1111111111010110; + big[215] = 0b1111111111010111; + big[216] = 0b1111111111011000; + big[217] = 0b1111111111011001; + big[218] = 0b1111111111011010; + big[219] = 0b1111111111011011; + big[220] = 0b1111111111011100; + big[221] = 0b1111111111011101; + big[222] = 0b1111111111011110; + big[223] = 0b1111111111011111; + big[224] = 0b1111111111100000; + big[225] = 0b1111111111100001; + big[226] = 0b1111111111100010; + big[227] = 0b1111111111100011; + big[228] = 0b1111111111100100; + big[229] = 0b1111111111100101; + big[230] = 0b1111111111100110; + big[231] = 0b1111111111100111; + big[232] = 0b1111111111101000; + big[233] = 0b1111111111101001; + big[234] = 0b1111111111101010; + big[235] = 0b1111111111101011; + big[236] = 0b1111111111101100; + big[237] = 0b1111111111101101; + big[238] = 0b1111111111101110; + big[239] = 0b1111111111101111; + big[240] = 0b1111111111110000; + big[241] = 0b1111111111110001; + big[242] = 0b1111111111110010; + big[243] = 0b1111111111110011; + big[244] = 0b1111111111110100; + big[245] = 0b1111111111110101; + big[246] = 0b1111111111110110; + big[247] = 0b1111111111110111; + big[248] = 0b1111111111111000; + big[249] = 0b1111111111111001; + big[250] = 0b1111111111111010; + big[251] = 0b1111111111111011; + big[252] = 0b1111111111111100; + big[253] = 0b1111111111111101; + big[254] = 0b1111111111111110; + big[255] = 0b1111111111111111; + + for (i = 0; i < 256; i++) { + if (big[i] != i + 65280U) + return 1; + } + + return 0; +} diff --git a/test/val/bitfield-enum.c b/test/val/bitfield-enum.c new file mode 100644 index 000000000..ce74b062e --- /dev/null +++ b/test/val/bitfield-enum.c @@ -0,0 +1,442 @@ +/* + Copyright 2020-2022 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests of enum bit-fields; see https://github.com/cc65/cc65/issues/1244 +*/ + +#include <stdio.h> +#include <limits.h> + +static unsigned char failures = 0; + +/* Enum with underlying type unsigned int. */ +enum e10u { + E10U_200 = 200, + E10U_1000 = 1000, +}; + +static struct enum_bitfield_uint { + enum e10u x : 1; + enum e10u y : 8; + enum e10u z : CHAR_BIT * sizeof (enum e10u); +} e10ubf = {0, E10U_200, E10U_1000}; + +static void test_enum_bitfield_uint(void) +{ + if (sizeof (struct enum_bitfield_uint) != 4) { + printf ("Got sizeof(struct enum_bitfield_uint) = %zu, expected 4.\n", + sizeof(struct enum_bitfield_uint)); + failures++; + } + + if (e10ubf.x != 0) { + printf ("Got e10ubf.x = %u, expected 0.\n", e10ubf.x); + failures++; + } + if (e10ubf.y != 200) { + printf ("Got e10ubf.y = %u, expected 200.\n", e10ubf.y); + failures++; + } + if (e10ubf.z != 1000) { + printf ("Got e10ubf.z = %u, expected 1000.\n", e10ubf.z); + failures++; + } + + e10ubf.x = 1; + e10ubf.y = 17; + e10ubf.z = 1023; + + if (e10ubf.x != 1) { + printf ("Got e10ubf.x = %u, expected 1.\n", e10ubf.x); + failures++; + } + + /* Check signedness, should be signed. */ + { + long v = e10ubf.x - 2; + if (v >= 0) { + printf ("Got non-negative v (= e10ubf.x - 2) = %ld, expected negative.\n", v); + failures++; + } + } + + if (e10ubf.y != 17) { + printf ("Got e10ubf.y = %u, expected 17.\n", e10ubf.y); + failures++; + } + if (e10ubf.z != 1023) { + printf ("Got e10ubf.z = %u, expected 1023.\n", e10ubf.z); + failures++; + } + + /* Check signedness, should be unsigned. */ + { + long v = e10ubf.z - 1024; + if (v < 0) { + printf ("Got negative v (= e10ubf.z - 1024) = %ld, expected positive.\n", v); + failures++; + } + } +} + +/* Enum with underlying type signed int. */ +enum e11i { + E11I_M1 = -1, + E11I_100 = 100, + E11I_1000 = 1000, +}; + +static struct enum_bitfield_int { + enum e11i x : 2; + enum e11i y : 8; + enum e11i z : CHAR_BIT * sizeof (enum e11i); +} e11ibf = {E11I_M1, E11I_100, E11I_1000}; + +static void test_enum_bitfield_int(void) +{ + if (sizeof (struct enum_bitfield_int) != 4) { + printf ("Got sizeof(struct enum_bitfield_int) = %zu, expected 4.\n", + sizeof(struct enum_bitfield_int)); + failures++; + } + + if (e11ibf.x != -1) { + printf ("Got e11ibf.x = %d, expected -1.\n", e11ibf.x); + failures++; + } + if (e11ibf.y != 100) { + printf ("Got e11ibf.y = %d, expected 100.\n", e11ibf.y); + failures++; + } + if (e11ibf.z != 1000) { + printf ("Got e11ibf.z = %d, expected 1000.\n", e11ibf.z); + failures++; + } + + e11ibf.x = 1; + e11ibf.y = 17; + e11ibf.z = 1023; + + if (e11ibf.x != 1) { + printf ("Got e11ibf.x = %d, expected 1.\n", e11ibf.x); + failures++; + } + + /* Check signedness, should be signed. */ + { + long v = e11ibf.x - 2; + if (v >= 0) { + printf ("Got non-negative v (= e11ibf.x - 2) = %ld, expected negative.\n", v); + failures++; + } + } + + if (e11ibf.y != 17) { + printf ("Got e11ibf.y = %d, expected 17.\n", e11ibf.y); + failures++; + } + if (e11ibf.z != 1023) { + printf ("Got e11ibf.z = %d, expected 1023.\n", e11ibf.z); + failures++; + } + + /* Check signedness, should be signed. */ + { + long v = e11ibf.z - 1024; + if (v >= 0) { + printf ("Got non-negative v (= e11ibf.z - 1024) = %ld, expected negative.\n", v); + failures++; + } + } +} + +/* Enum with underlying type unsigned char. */ +enum e7uc { + E7UC_100 = 100, +}; + +static struct enum_bitfield_uchar { + enum e7uc x : 1; + enum e7uc y : 4; + enum e7uc z : CHAR_BIT; +} e7ucbf = {0, 10, E7UC_100}; + +static void test_enum_bitfield_uchar(void) +{ + if (sizeof (struct enum_bitfield_uchar) != 2) { + printf ("Got sizeof(struct enum_bitfield_uchar) = %zu, expected 2.\n", + sizeof(struct enum_bitfield_uchar)); + failures++; + } + + if (e7ucbf.x != 0) { + printf ("Got e7ucbf.x = %u, expected 0.\n", e7ucbf.x); + failures++; + } + if (e7ucbf.y != 10) { + printf ("Got e7ucbf.y = %u, expected 10.\n", e7ucbf.y); + failures++; + } + if (e7ucbf.z != 100) { + printf ("Got e7ucbf.z = %u, expected 100.\n", e7ucbf.z); + failures++; + } + + e7ucbf.x = -1; /* Will store 1. */ + e7ucbf.y = -1; /* Will store 15. */ + e7ucbf.z = 127; + + /* Both signed char and unsigned char are converted to int in arithmetic expressions, + ** so we write this test differently to enum_bitfield_int. + */ + if (e7ucbf.x != 1) { + printf ("Got e7ucbf.x = %u, expected 1.\n", e7ucbf.x); + failures++; + } + + if (e7ucbf.y != 15) { + printf ("Got e7ucbf.y = %u, expected 15.\n", e7ucbf.y); + failures++; + } + if (e7ucbf.z != 127) { + printf ("Got e7ucbf.z = %u, expected 127.\n", e7ucbf.z); + failures++; + } +} + +/* Enum with underlying type signed char. */ +enum e8sc { + E8SC_M1 = -1, + E8SC_100 = 100, +}; + +static struct enum_bitfield_char { + enum e8sc x : 1; + enum e8sc y : 4; + enum e8sc z : CHAR_BIT; +} e8scbf = {0, 5, E8SC_100}; + +static void test_enum_bitfield_char(void) +{ + if (sizeof (struct enum_bitfield_char) != 2) { + printf ("Got sizeof(struct enum_bitfield_char) = %zu, expected 2.\n", + sizeof(struct enum_bitfield_char)); + failures++; + } + + if (e8scbf.x != 0) { + printf ("Got e8scbf.x = %d, expected 0.\n", e8scbf.x); + failures++; + } + if (e8scbf.y != 5) { + printf ("Got e8scbf.y = %d, expected 5.\n", e8scbf.y); + failures++; + } + if (e8scbf.z != 100) { + printf ("Got e8scbf.z = %d, expected 100.\n", e8scbf.z); + failures++; + } + + e8scbf.x = -1; + e8scbf.y = -3; + e8scbf.z = 127; + + if (e8scbf.x != -1) { + printf ("Got e8scbf.x = %d, expected -1.\n", e8scbf.x); + failures++; + } + if (e8scbf.y != -3) { + printf ("Got e8scbf.y = %d, expected -3.\n", e8scbf.y); + failures++; + } + if (e8scbf.z != 127) { + printf ("Got e8scbf.z = %d, expected 127.\n", e8scbf.z); + failures++; + } +} + +/* Enum with underlying type unsigned long. */ +enum e20ul { + E20UL_10 = 10, + E20UL_1000 = 1000, + E20UL_1000000000 = 1000000000L, +}; + +static struct enum_bitfield_ulong { + enum e20ul x : 4; + enum e20ul y : 16; + enum e20ul z : CHAR_BIT * sizeof (enum e20ul); +} e20ulbf = {E20UL_10, E20UL_1000, E20UL_1000000000}; + +static void test_enum_bitfield_ulong(void) +{ + if (sizeof (struct enum_bitfield_ulong) != 7) { + printf ("Got sizeof(struct enum_bitfield_ulong) = %zu, expected 7.\n", + sizeof(struct enum_bitfield_ulong)); + failures++; + } + + if (e20ulbf.x != 10) { + printf ("Got e20ulbf.x = %u, expected 10.\n", e20ulbf.x); + failures++; + } + if (e20ulbf.y != 1000) { + printf ("Got e20ulbf.y = %u, expected 1000.\n", e20ulbf.y); + failures++; + } + if (e20ulbf.z != 1000000000L) { + printf ("Got e20ulbf.z = %ul, expected 1000000000.\n", e20ulbf.z); + failures++; + } + + e20ulbf.x = 8; + e20ulbf.y = -1; /* Will store 65535. */ + e20ulbf.z = 1048575L; + + if (e20ulbf.x != 8) { + printf ("Got e20ulbf.x = %ld, expected 8.\n", (long)e20ulbf.x); + failures++; + } + + /* Check signedness, should be signed. */ + { + if (e20ulbf.x - 9 >= 0) { + printf ("Got non-negative e20ulbf.x - 9 = %lu, expected negative.\n", (unsigned long)(e20ulbf.x - 9)); + failures++; + } + } + + if (e20ulbf.y != 65535L) { + printf ("Got e20ulbf.y = %ld, expected 65535.\n", (long)e20ulbf.y); + failures++; + } + + /* Check signedness, should be signed. */ + { + if (e20ulbf.y - 65536L >= 0) { + printf ("Got non-negative e20ulbf.y - 65536L = %lu, expected negative.\n", (unsigned long)(e20ulbf.y - 65536L)); + failures++; + } + } + + if (e20ulbf.z != 1048575L) { + printf ("Got e20ulbf.z = %lu, expected 1048575.\n", (unsigned long)e20ulbf.z); + failures++; + } + + /* Check signedness, should be unsigned. */ + { + if (e20ulbf.z - 1048576L < 0) { + printf ("Got negative e20ulbf.z - 1048576 = %ld, expected positive.\n", (long)(e20ulbf.z - 1048576L)); + failures++; + } + } +} + +/* Enum with underlying type signed long. */ +enum e20sl { + E20SL_M1 = -1, + E20SL_1000 = 1000, + E20SL_1000000000 = 1000000000L, +}; + +static struct enum_bitfield_long { + enum e20sl x : 2; + enum e20sl y : 16; + enum e20sl z : CHAR_BIT * sizeof (enum e20sl); +} e20slbf = {E20SL_M1, E20SL_1000, E20SL_1000000000}; + +static void test_enum_bitfield_long(void) +{ + if (sizeof (struct enum_bitfield_long) != 7) { + printf ("Got sizeof(struct enum_bitfield_long) = %zu, expected 8.\n", + sizeof(struct enum_bitfield_long)); + failures++; + } + + if (e20slbf.x != -1) { + printf ("Got e20slbf.x = %ld, expected -1.\n", (long)e20slbf.x); + failures++; + } + if (e20slbf.y != 1000) { + printf ("Got e20slbf.y = %ld, expected 1000.\n", (long)e20slbf.y); + failures++; + } + if (e20slbf.z != 1000000000L) { + printf ("Got e20slbf.z = %ld, expected 1000000000.\n", (long)e20slbf.z); + failures++; + } + + e20slbf.x = 1; + e20slbf.y = 257; + e20slbf.z = 1048575L; + + if (e20slbf.x != 1) { + printf ("Got e20slbf.x = %d, expected 1.\n", e20slbf.x); + failures++; + } + + /* Check signedness, should be signed. */ + { + if (e20slbf.x - 2 >= 0) { + printf ("Got non-negative e20slbf.x - 2 = %lu, expected negative.\n", (unsigned long)(e20slbf.x - 2)); + failures++; + } + } + + if (e20slbf.y != 257) { + printf ("Got e20slbf.y = %ld, expected 257.\n", (long)e20slbf.y); + failures++; + } + + /* Check signedness, should be signed. */ + { + if (e20slbf.y - 258 >= 0) { + printf ("Got non-negative e20slbf.y - 258 = %lu, expected negative.\n", (unsigned long)(e20slbf.y - 258)); + failures++; + } + } + + if (e20slbf.z != 1048575L) { + printf ("Got e20slbf.z = %ld, expected 1048575.\n", (long)e20slbf.z); + failures++; + } + + /* Check signedness, should be signed. */ + { + if (e20slbf.z - 1048576L >= 0) { + printf ("Got non-negative e20slbf.z - 1048576L = %ld, expected negative.\n", (long)(e20slbf.z - 1048576L)); + failures++; + } + } +} + +int main(void) +{ + test_enum_bitfield_uint(); + test_enum_bitfield_int(); + test_enum_bitfield_uchar(); + test_enum_bitfield_char(); + test_enum_bitfield_ulong(); + test_enum_bitfield_long(); + printf("failures: %u\n", failures); + return failures; +} diff --git a/test/val/bitfield-packing-char.c b/test/val/bitfield-packing-char.c new file mode 100644 index 000000000..18621e0eb --- /dev/null +++ b/test/val/bitfield-packing-char.c @@ -0,0 +1,278 @@ +/* + Copyright 2020-2022 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests of char bit-field packing and typedef works with them; see issues below + - packing issue: https://github.com/cc65/cc65/issues/1054 + - typedef issue: https://github.com/cc65/cc65/pull/1662 + - char bit-field support: https://github.com/cc65/cc65/issues/1047 +*/ + +#include <stdio.h> + +static unsigned char failures = 0; + +typedef unsigned char field_type; + +static struct four_bits { + field_type x : 4; +} fb = {1}; + +static void test_four_bits(void) +{ + if (sizeof(struct four_bits) != 1) { + printf("Got sizeof(struct four_bits) = %zu, expected 1.\n", + sizeof(struct four_bits)); + failures++; + } + + if (fb.x != 1) { + printf("Got fb.x = %u, expected 1.\n", fb.x); + failures++; + } + + fb.x = 3; + + if (fb.x != 3) { + printf("Got fb.x = %u, expected 3.\n", fb.x); + failures++; + } +} + +/* + Logic is somewhat diferent for bit-fields that end a struct vs + having additional fields. +*/ + +static struct four_bits_with_char { + field_type x : 4; + field_type y; +} fbi = {1, 2}; + +static void test_four_bits_with_char(void) +{ + /* The first 4-bit bit-field just takes one byte, so the size is 2. */ + if (sizeof(struct four_bits_with_char) != 2) { + printf("Got sizeof(struct four_bits_with_char) = %zu, expected 2.\n", + sizeof(struct four_bits_with_char)); + failures++; + } + + if (fbi.x != 1) { + printf("Got fbi.x = %u, expected 1.\n", fbi.x); + failures++; + } + + if (fbi.y != 2) { + printf("Got fbi.y = %u, expected 2.\n", fbi.y); + failures++; + } + + fbi.x = 3; + fbi.y = 17; + + if (fbi.x != 3) { + printf("Got fbi.x = %u, expected 3.\n", fbi.x); + failures++; + } + + if (fbi.y != 17) { + printf("Got fbi.y = %u, expected 17.\n", fbi.y); + failures++; + } +} + +static struct overlap { + field_type x : 6; + field_type y : 6; +} o = {11, 22}; + +/* Tests that bit-fields can share allocation units. */ +static void test_overlap(void) +{ + if (sizeof(struct overlap) != 2) { + printf("Got sizeof(struct overlap) = %zu, expected 2.\n", + sizeof(struct overlap)); + failures++; + } + + if (o.x != 11) { + printf("Got o.x = %u, expected 11.\n", o.x); + failures++; + } + + if (o.y != 22) { + printf("Got o.y = %u, expected 22.\n", o.y); + failures++; + } + + o.x = 33; + o.y = 44; + + if (o.x != 33) { + printf("Got o.x = %u, expected 33.\n", o.x); + failures++; + } + + if (o.y != 44) { + printf("Got o.y = %u, expected 44.\n", o.y); + failures++; + } +} + +static struct overlap_with_char { + field_type x : 6; + field_type y : 6; + field_type z; +} oi = {11, 22, 33}; + +static void test_overlap_with_char(void) +{ + /* First two fields in 2 bytes, then another 1 byte. */ + if (sizeof(struct overlap_with_char) != 3) { + printf("Got sizeof(struct overlap_with_char) = %zu, expected 3.\n", + sizeof(struct overlap_with_char)); + failures++; + } + + if (oi.x != 11) { + printf("Got oi.x = %u, expected 11.\n", oi.x); + failures++; + } + + if (oi.y != 22) { + printf("Got oi.y = %u, expected 22.\n", oi.y); + failures++; + } + + if (oi.z != 33) { + printf("Got oi.z = %u, expected 33.\n", oi.z); + failures++; + } + + oi.x = 44; + oi.y = 55; + oi.z = 66; + + if (oi.x != 44) { + printf("Got oi.x = %u, expected 44.\n", oi.x); + failures++; + } + + if (oi.y != 55) { + printf("Got oi.y = %u, expected 55.\n", oi.y); + failures++; + } + + if (oi.z != 66) { + printf("Got oi.z = %u, expected 66.\n", oi.z); + failures++; + } +} + +static struct full_width { + field_type x : 8; + field_type y : 8; +} fw = {255, 17}; + +static void test_full_width(void) +{ + if (sizeof(struct full_width) != 2) { + printf("Got sizeof(struct full_width) = %zu, expected 2.\n", + sizeof(struct full_width)); + failures++; + } + + if (fw.x != 255) { + printf("Got fw.x = %u, expected 255.\n", fw.x); + failures++; + } + + if (fw.y != 17) { + printf("Got fw.y = %u, expected 17.\n", fw.y); + failures++; + } + + fw.x = 42; + fw.y = 255; + + if (fw.x != 42) { + printf("Got fw.x = %u, expected 42.\n", fw.x); + failures++; + } + + if (fw.y != 255) { + printf("Got fw.y = %u, expected 255.\n", fw.y); + failures++; + } +} + +static struct aligned_end { + field_type : 2; + field_type x : 6; + /* y crosses a byte boundary, but fits in a byte when shifted. */ + field_type : 6; + field_type y : 7; +} ae = {63, 17}; + +static void test_aligned_end(void) +{ + if (sizeof(struct aligned_end) != 3) { + printf("Got sizeof(struct aligned_end) = %zu, expected 3.\n", + sizeof(struct aligned_end)); + failures++; + } + + if (ae.x != 63) { + printf("Got ae.x = %u, expected 63.\n", ae.x); + failures++; + } + + if (ae.y != 17) { + printf("Got ae.y = %u, expected 17.\n", ae.y); + failures++; + } + + ae.x = 42; + ae.y = 127; + + if (ae.x != 42) { + printf("Got ae.x = %u, expected 42.\n", ae.x); + failures++; + } + + if (ae.y != 127) { + printf("Got ae.y = %u, expected 127.\n", ae.y); + failures++; + } + +} + +int main(void) +{ + test_four_bits(); + test_four_bits_with_char(); + test_overlap(); + test_overlap_with_char(); + test_full_width(); + test_aligned_end(); + printf("failures: %u\n", failures); + return failures; +} diff --git a/test/val/bitfield-packing-long.c b/test/val/bitfield-packing-long.c new file mode 100644 index 000000000..fcc8eb7fe --- /dev/null +++ b/test/val/bitfield-packing-long.c @@ -0,0 +1,315 @@ +/* + Copyright 2020-2022 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests of long bit-field packing and typedef works with them; see issues below + - packing: https://github.com/cc65/cc65/issues/1054 + - typedef: https://github.com/cc65/cc65/pull/1662 + - long bit-field support: https://github.com/cc65/cc65/issues/1131 +*/ + +#include <stdio.h> + +static unsigned char failures = 0; + +typedef unsigned long field_type; + +static struct four_bits { + field_type x : 4; +} fb = {1}; + +static void test_four_bits(void) +{ + if (sizeof(struct four_bits) != 1) { + printf("Got sizeof(struct four_bits) = %zu, expected 1.\n", + sizeof(struct four_bits)); + failures++; + } + + if (fb.x != 1) { + printf("Got fb.x = %u, expected 1.\n", fb.x); + failures++; + } + + fb.x = 3; + + if (fb.x != 3) { + printf("Got fb.x = %u, expected 3.\n", fb.x); + failures++; + } +} + +/* + Logic is somewhat diferent for bit-fields that end a struct vs + having additional fields. +*/ + +static struct four_bits_with_long { + field_type x : 4; + field_type y; +} fbi = {1, 2}; + +static void test_four_bits_with_long(void) +{ + /* The first 4-bit bit-field just takes one byte, so the size is 5. */ + if (sizeof(struct four_bits_with_long) != 5) { + printf("Got sizeof(struct four_bits_with_long) = %zu, expected 5.\n", + sizeof(struct four_bits_with_long)); + failures++; + } + + if (fbi.x != 1) { + printf("Got fbi.x = %u, expected 1.\n", fbi.x); + failures++; + } + + if (fbi.y != 2) { + printf("Got fbi.y = %lu, expected 2.\n", fbi.y); + failures++; + } + + fbi.x = 3; + fbi.y = 65537; + + if (fbi.x != 3) { + printf("Got fbi.x = %u, expected 3.\n", fbi.x); + failures++; + } + + if (fbi.y != 65537) { + printf("Got fbi.y = %lu, expected 65537.\n", fbi.y); + failures++; + } +} + +static struct overlap { + field_type x : 10; + field_type y : 10; +} o = {11, 22}; + +/* Tests that bit-fields can share allocation units. */ +static void test_overlap(void) +{ + if (sizeof(struct overlap) != 3) { + printf("Got sizeof(struct overlap) = %zu, expected 3.\n", + sizeof(struct overlap)); + failures++; + } + + if (o.x != 11) { + printf("Got o.x = %u, expected 11.\n", o.x); + failures++; + } + + if (o.y != 22) { + printf("Got o.y = %u, expected 22.\n", o.y); + failures++; + } + + o.x = 33; + o.y = 44; + + if (o.x != 33) { + printf("Got o.x = %u, expected 33.\n", o.x); + failures++; + } + + if (o.y != 44) { + printf("Got o.y = %u, expected 44.\n", o.y); + failures++; + } +} + +static struct overlap_with_long { + field_type x : 10; + field_type y : 10; + field_type z; +} oi = {111, 222, 333}; + +static void test_overlap_with_long(void) +{ + /* First two fields in 3 bytes, then another 4 bytes. */ + if (sizeof(struct overlap_with_long) != 7) { + printf("Got sizeof(struct overlap_with_long) = %zu, expected 7.\n", + sizeof(struct overlap_with_long)); + failures++; + } + + if (oi.x != 111) { + printf("Got oi.x = %u, expected 111.\n", oi.x); + failures++; + } + + if (oi.y != 222) { + printf("Got oi.y = %u, expected 222.\n", oi.y); + failures++; + } + + if (oi.z != 333) { + printf("Got oi.z = %u, expected 333.\n", oi.z); + failures++; + } + + oi.x = 444; + oi.y = 555; + oi.z = 4294967295; + + if (oi.x != 444) { + printf("Got oi.x = %u, expected 444.\n", oi.x); + failures++; + } + + if (oi.y != 555) { + printf("Got oi.y = %u, expected 555.\n", oi.y); + failures++; + } + + if (oi.z != 4294967295) { + printf("Got oi.z = %lu, expected 4294967295.\n", oi.z); + failures++; + } +} + +static struct full_width { + field_type x : 8; + field_type y : 16; + field_type z : 32; +} fw = {255, 17, 1}; + +static void test_full_width(void) +{ + if (sizeof(struct full_width) != 7) { + printf("Got sizeof(struct full_width) = %zu, expected 7.\n", + sizeof(struct full_width)); + failures++; + } + + if (fw.x != 255) { + printf("Got fw.x = %u, expected 255.\n", fw.x); + failures++; + } + + if (fw.y != 17) { + printf("Got fw.y = %u, expected 17.\n", fw.y); + failures++; + } + + if (fw.z != 1) { + printf("Got fw.z = %lu, expected 1.\n", fw.z); + failures++; + } + + fw.x = 42; + fw.y = 1023; + fw.z = 65537; + + if (fw.x != 42) { + printf("Got fw.x = %u, expected 42.\n", fw.x); + failures++; + } + + if (fw.y != 1023) { + printf("Got fw.y = %u, expected 1023.\n", fw.y); + failures++; + } + + if (fw.z != 65537) { + printf("Got fw.z = %lu, expected 65537.\n", fw.z); + failures++; + } +} + +static struct aligned_end { + field_type : 2; + field_type x : 6; + field_type : 3; + field_type y : 13; + field_type : 14; + field_type z : 18; + /* w crosses a byte boundary, but fits in a byte when shifted. */ + field_type : 6; + field_type w : 7; +} ae = {63, 17, 1, 100}; + +static void test_aligned_end(void) +{ + if (sizeof(struct aligned_end) != 9) { + printf("Got sizeof(struct aligned_end) = %zu, expected 9.\n", + sizeof(struct aligned_end)); + failures++; + } + + if (ae.x != 63) { + printf("Got ae.x = %u, expected 63.\n", ae.x); + failures++; + } + + if (ae.y != 17) { + printf("Got ae.y = %u, expected 17.\n", ae.y); + failures++; + } + + if (ae.z != 1) { + printf("Got ae.z = %lu, expected 1.\n", ae.z); + failures++; + } + + if (ae.w != 100) { + printf("Got ae.w = %u, expected 100.\n", ae.w); + failures++; + } + + ae.x = 42; + ae.y = 1023; + ae.z = 262143; + ae.w = 66; + + if (ae.x != 42) { + printf("Got ae.x = %u, expected 42.\n", ae.x); + failures++; + } + + if (ae.y != 1023) { + printf("Got ae.y = %u, expected 1023.\n", ae.y); + failures++; + } + + if (ae.z != 262143) { + printf("Got ae.z = %lu, expected 262143.\n", ae.z); + failures++; + } + + if (ae.w != 66) { + printf("Got ae.w = %u, expected 66.\n", ae.w); + failures++; + } +} + +int main(void) +{ + test_four_bits(); + test_four_bits_with_long(); + test_overlap(); + test_overlap_with_long(); + test_full_width(); + test_aligned_end(); + printf("failures: %u\n", failures); + return failures; +} diff --git a/test/val/bitfield-packing.c b/test/val/bitfield-packing.c new file mode 100644 index 000000000..5786d6906 --- /dev/null +++ b/test/val/bitfield-packing.c @@ -0,0 +1,289 @@ +/* + Copyright 2020-2022 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests of int bit-field packing and typedef works with them; see issues below + - packing issue: https://github.com/cc65/cc65/issues/1054 + - typedef issue: https://github.com/cc65/cc65/pull/1662 +*/ + +#include <stdio.h> + +static unsigned char failures = 0; + +typedef unsigned int field_type; + +static struct four_bits { + field_type x : 4; +} fb = {1}; + +static void test_four_bits(void) +{ + if (sizeof(struct four_bits) != 1) { + printf("Got sizeof(struct four_bits) = %zu, expected 1.\n", + sizeof(struct four_bits)); + failures++; + } + + if (fb.x != 1) { + printf("Got fb.x = %u, expected 1.\n", fb.x); + failures++; + } + + fb.x = 3; + + if (fb.x != 3) { + printf("Got fb.x = %u, expected 3.\n", fb.x); + failures++; + } +} + +/* + Logic is somewhat diferent for bit-fields that end a struct vs + having additional fields. +*/ + +static struct four_bits_with_int { + field_type x : 4; + field_type y; +} fbi = {1, 2}; + +static void test_four_bits_with_int(void) +{ + /* The first 4-bit bit-field just takes one byte, so the size is 3. */ + if (sizeof(struct four_bits_with_int) != 3) { + printf("Got sizeof(struct four_bits_with_int) = %zu, expected 3.\n", + sizeof(struct four_bits_with_int)); + failures++; + } + + if (fbi.x != 1) { + printf("Got fbi.x = %u, expected 1.\n", fbi.x); + failures++; + } + + if (fbi.y != 2) { + printf("Got fbi.y = %u, expected 2.\n", fbi.y); + failures++; + } + + fbi.x = 3; + fbi.y = 257; + + if (fbi.x != 3) { + printf("Got fbi.x = %u, expected 3.\n", fbi.x); + failures++; + } + + if (fbi.y != 257) { + printf("Got fbi.y = %u, expected 257.\n", fbi.y); + failures++; + } +} + +static struct overlap { + field_type x : 10; + field_type y : 10; +} o = {11, 22}; + +/* Tests that bit-fields can share allocation units. */ +static void test_overlap(void) +{ + if (sizeof(struct overlap) != 3) { + printf("Got sizeof(struct overlap) = %zu, expected 3.\n", + sizeof(struct overlap)); + failures++; + } + + if (o.x != 11) { + printf("Got o.x = %u, expected 11.\n", o.x); + failures++; + } + + if (o.y != 22) { + printf("Got o.y = %u, expected 22.\n", o.y); + failures++; + } + + o.x = 33; + o.y = 44; + + if (o.x != 33) { + printf("Got o.x = %u, expected 33.\n", o.x); + failures++; + } + + if (o.y != 44) { + printf("Got o.y = %u, expected 44.\n", o.y); + failures++; + } +} + +static struct overlap_with_int { + field_type x : 10; + field_type y : 10; + field_type z; +} oi = {111, 222, 333}; + +static void test_overlap_with_int(void) +{ + /* First two fields in 3 bytes, then another 2 bytes. */ + if (sizeof(struct overlap_with_int) != 5) { + printf("Got sizeof(struct overlap_with_int) = %zu, expected 5.\n", + sizeof(struct overlap_with_int)); + failures++; + } + + if (oi.x != 111) { + printf("Got oi.x = %u, expected 111.\n", oi.x); + failures++; + } + + if (oi.y != 222) { + printf("Got oi.y = %u, expected 222.\n", oi.y); + failures++; + } + + if (oi.z != 333) { + printf("Got oi.z = %u, expected 333.\n", oi.z); + failures++; + } + + oi.x = 444; + oi.y = 555; + oi.z = 65535; + + if (oi.x != 444) { + printf("Got oi.x = %u, expected 444.\n", oi.x); + failures++; + } + + if (oi.y != 555) { + printf("Got oi.y = %u, expected 555.\n", oi.y); + failures++; + } + + if (oi.z != 65535) { + printf("Got oi.z = %u, expected 65535.\n", oi.z); + failures++; + } +} + +static struct full_width { + field_type x : 8; + field_type y : 16; +} fw = {255, 17}; + +static void test_full_width(void) +{ + if (sizeof(struct full_width) != 3) { + printf("Got sizeof(struct full_width) = %zu, expected 3.\n", + sizeof(struct full_width)); + failures++; + } + + if (fw.x != 255) { + printf("Got fw.x = %u, expected 255.\n", fw.x); + failures++; + } + + if (fw.y != 17) { + printf("Got fw.y = %u, expected 17.\n", fw.y); + failures++; + } + + fw.x = 42; + fw.y = 1023; + + if (fw.x != 42) { + printf("Got fw.x = %u, expected 42.\n", fw.x); + failures++; + } + + if (fw.y != 1023) { + printf("Got fw.y = %u, expected 1023.\n", fw.y); + failures++; + } +} + +static struct aligned_end { + field_type : 2; + field_type x : 6; + field_type : 3; + field_type y : 13; + /* z crosses a byte boundary, but fits in a byte when shifted. */ + field_type : 6; + field_type z : 7; +} ae = {63, 17, 100}; + +static void test_aligned_end(void) +{ + if (sizeof(struct aligned_end) != 5) { + printf("Got sizeof(struct aligned_end) = %zu, expected 5.\n", + sizeof(struct aligned_end)); + failures++; + } + + if (ae.x != 63) { + printf("Got ae.x = %u, expected 63.\n", ae.x); + failures++; + } + + if (ae.y != 17) { + printf("Got ae.y = %u, expected 17.\n", ae.y); + failures++; + } + + if (ae.z != 100) { + printf("Got ae.z = %u, expected 100.\n", ae.z); + failures++; + } + + ae.x = 42; + ae.y = 1023; + ae.z = 66; + + if (ae.x != 42) { + printf("Got ae.x = %u, expected 42.\n", ae.x); + failures++; + } + + if (ae.y != 1023) { + printf("Got ae.y = %u, expected 1023.\n", ae.y); + failures++; + } + + if (ae.z != 66) { + printf("Got ae.z = %u, expected 66.\n", ae.z); + failures++; + } +} + +int main(void) +{ + test_four_bits(); + test_four_bits_with_int(); + test_overlap(); + test_overlap_with_int(); + test_full_width(); + test_aligned_end(); + printf("failures: %u\n", failures); + return failures; +} diff --git a/test/val/bitfield-plain.c b/test/val/bitfield-plain.c new file mode 100644 index 000000000..735f3dc87 --- /dev/null +++ b/test/val/bitfield-plain.c @@ -0,0 +1,180 @@ +/* + Copyright 2020-2022 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests that plain bit-fields are unsigned; see issues below + - unsigned integer types by default: https://github.com/cc65/cc65/issues/1095 + - char bit-field support: https://github.com/cc65/cc65/issues/1047 + - long bit-field support: https://github.com/cc65/cc65/issues/1131 +*/ + +#include <stdio.h> + +static unsigned char failures = 0; + +static struct plain_ints { + int x : 4; + int y : 10; +} pi = {15, 700}; + +static void test_plain_int_bitfields (void) +{ + if (pi.x != 15) { + printf ("Got pi.x = %ld, expected 15.\n", (long)pi.x); + failures++; + } + if (pi.y != 700) { + printf ("Got pi.y = %ld, expected 700.\n", (long)pi.y); + failures++; + } + + pi.x = 3; + pi.y = 1023; + + if (pi.x != 3) { + printf ("Got pi.x = %ld, expected 3.\n", (long)pi.x); + failures++; + } + if (pi.y != 1023) { + printf ("Got pi.y = %ld, expected 1023.\n", (long)pi.y); + failures++; + } +} + +static struct plain_shorts { + short x : 4; + short y : 10; +} ps = {15, 700}; + +static void test_plain_short_bitfields (void) +{ + if (ps.x != 15) { + printf ("Got ps.x = %ld, expected 15.\n", (long)ps.x); + failures++; + } + if (ps.y != 700) { + printf ("Got ps.y = %ld, expected 700.\n", (long)ps.y); + failures++; + } + + ps.x = 3; + ps.y = 1023; + + if (ps.x != 3) { + printf ("Got ps.x = %ld, expected 3.\n", (long)ps.x); + failures++; + } + if (ps.y != 1023) { + printf ("Got ps.y = %ld, expected 1023.\n", (long)ps.y); + failures++; + } +} + +static struct plain_chars { + char x : 4; +} pc = {15}; + +static void test_plain_char_bitfields (void) +{ + if (pc.x != 15) { + printf ("Got pc.x = %ld, expected 15.\n", (long)pc.x); + failures++; + } + + pc.x = 3; + + if (pc.x != 3) { + printf ("Got pc.x = %ld, expected 3.\n", (long)pc.x); + failures++; + } +} + +static struct plain_longs { + long x : 4; + long y : 10; + long z : 18; +} pl = {15, 700, 200000}; + +static void test_plain_long_bitfields (void) +{ + if (pl.x != 15) { + if (pl.x < 0) { + printf ("Got pl.x = %ld, expected 15.\n", (long)pl.x); + } else { + printf ("Got pl.x = %lu, expected 15.\n", (unsigned long)pl.x); + } + failures++; + } + if (pl.y != 700) { + if (pl.y < 0) { + printf ("Got pl.y = %ld, expected 700.\n", (long)pl.y); + } else { + printf ("Got pl.y = %lu, expected 700.\n", (unsigned long)pl.y); + } + failures++; + } + if (pl.z != 200000) { + if (pl.z < 0) { + printf ("Got pl.z = %ld, expected 200000.\n", (long)pl.z); + } else { + printf ("Got pl.z = %lu, expected 200000.\n", (unsigned long)pl.z); + } + failures++; + } + + pl.x = 3; + pl.y = 1023; + pl.z = 262143; + + if (pl.x != 3) { + if (pl.x < 0) { + printf ("Got pl.x = %ld, expected 3.\n", (long)pl.x); + } else { + printf ("Got pl.x = %lu, expected 3.\n", (unsigned long)pl.x); + } + failures++; + } + if (pl.y != 1023) { + if (pl.y < 0) { + printf ("Got pl.y = %ld, expected 1023.\n", (long)pl.y); + } else { + printf ("Got pl.y = %lu, expected 1023.\n", (unsigned long)pl.y); + } + failures++; + } + if (pl.z != 262143) { + if (pl.z < 0) { + printf ("Got pl.z = %ld, expected 262143.\n", (long)pl.z); + } else { + printf ("Got pl.z = %lu, expected 262143.\n", (unsigned long)pl.z); + } + failures++; + } +} + +int main (void) +{ + test_plain_int_bitfields (); + test_plain_short_bitfields (); + test_plain_char_bitfields (); + test_plain_long_bitfields (); + printf ("failures: %u\n", failures); + return failures; +} diff --git a/test/val/bitfield-signed.c b/test/val/bitfield-signed.c new file mode 100644 index 000000000..68f36f92a --- /dev/null +++ b/test/val/bitfield-signed.c @@ -0,0 +1,180 @@ +/* + Copyright 2020-2022 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be signedly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests that signed bit-fields are indeed signed; see issues below + - unsigned integer types by default: https://github.com/cc65/cc65/issues/1095 + - char bit-field support: https://github.com/cc65/cc65/issues/1047 + - long bit-field support: https://github.com/cc65/cc65/issues/1131 +*/ + +#include <stdio.h> + +static unsigned char failures = 0; + +static struct signed_ints { + signed int x : 4; + signed int y : 10; +} pi = {-8, -500}; + +static void test_signed_int_bitfields (void) +{ + if (pi.x != -8) { + printf ("Got pi.x = %ld, expected -8.\n", (long)pi.x); + failures++; + } + if (pi.y != -500) { + printf ("Got pi.y = %ld, expected -500.\n", (long)pi.y); + failures++; + } + + pi.x = -3; + pi.y = -512; + + if (pi.x != -3) { + printf ("Got pi.x = %ld, expected -3.\n", (long)pi.x); + failures++; + } + if (pi.y != -512) { + printf ("Got pi.y = %ld, expected -512.\n", (long)pi.y); + failures++; + } +} + +static struct signed_shorts { + signed short x : 4; + signed short y : 10; +} ps = {-8, -500}; + +static void test_signed_short_bitfields (void) +{ + if (ps.x != -8) { + printf ("Got ps.x = %ld, expected -8.\n", (long)ps.x); + failures++; + } + if (ps.y != -500) { + printf ("Got ps.y = %ld, expected -500.\n", (long)ps.y); + failures++; + } + + ps.x = -3; + ps.y = -512; + + if (ps.x != -3) { + printf ("Got ps.x = %ld, expected -3.\n", (long)ps.x); + failures++; + } + if (ps.y != -512) { + printf ("Got ps.y = %ld, expected -512.\n", (long)ps.y); + failures++; + } +} + +static struct signed_chars { + signed char x : 4; +} pc = {-8}; + +static void test_signed_char_bitfields (void) +{ + if (pc.x != -8) { + printf ("Got pc.x = %ld, expected -8.\n", (long)pc.x); + failures++; + } + + pc.x = -3; + + if (pc.x != -3) { + printf ("Got pc.x = %ld, expected -3.\n", (long)pc.x); + failures++; + } +} + +static struct signed_longs { + signed long x : 4; + signed long y : 10; + signed long z : 18; +} pl = {-8, -500, -70000}; + +static void test_signed_long_bitfields (void) +{ + if (pl.x != -8) { + if (pl.x < 0) { + printf ("Got pl.x = %ld, expected -8.\n", (long)pl.x); + } else { + printf ("Got pl.x = %lu, expected -8.\n", (unsigned long)pl.x); + } + failures++; + } + if (pl.y != -500) { + if (pl.y < 0) { + printf ("Got pl.y = %ld, expected -500.\n", (long)pl.y); + } else { + printf ("Got pl.y = %lu, expected -500.\n", (unsigned long)pl.y); + } + failures++; + } + if (pl.z != -70000) { + if (pl.z < 0) { + printf ("Got pl.z = %ld, expected -70000.\n", (long)pl.z); + } else { + printf ("Got pl.z = %lu, expected -70000.\n", (unsigned long)pl.z); + } + failures++; + } + + pl.x = -3; + pl.y = -512; + pl.z = -131072; + + if (pl.x != -3) { + if (pl.x < 0) { + printf ("Got pl.x = %ld, expected -3.\n", (long)pl.x); + } else { + printf ("Got pl.x = %lu, expected -3.\n", (unsigned long)pl.x); + } + failures++; + } + if (pl.y != -512) { + if (pl.y < 0) { + printf ("Got pl.y = %ld, expected -512.\n", (long)pl.y); + } else { + printf ("Got pl.y = %lu, expected -512.\n", (unsigned long)pl.y); + } + failures++; + } + if (pl.z != -131072) { + if (pl.z < 0) { + printf ("Got pl.z = %ld, expected -131072.\n", (long)pl.z); + } else { + printf ("Got pl.z = %lu, expected -131072.\n", (unsigned long)pl.z); + } + failures++; + } +} + +int main (void) +{ + test_signed_int_bitfields (); + test_signed_short_bitfields (); + test_signed_char_bitfields (); + test_signed_long_bitfields (); + printf ("failures: %u\n", failures); + return failures; +} diff --git a/test/val/bitfield-union.c b/test/val/bitfield-union.c new file mode 100644 index 000000000..1fd201456 --- /dev/null +++ b/test/val/bitfield-union.c @@ -0,0 +1,71 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests of union of bit-fields; see https://sourceforge.net/p/cc65/mailman/message/36152700/ +*/ + +#include <stdio.h> + +typedef union { + unsigned int bf; + + struct { + unsigned int a : 1; + unsigned int b : 1; + unsigned int c : 1; + }; +} bitfield_t; + +static unsigned char failures = 0; + +int main (void) +{ + bitfield_t bitfield = {0}; + + printf ("Bitfield: %u\n", bitfield.bf); + if (bitfield.bf != 0) failures++; + + bitfield.a = bitfield.a ^ 1; + printf ("a=1: %u\n", bitfield.bf); + if (bitfield.bf != 1) failures++; + + bitfield.a = bitfield.a ^ 1; + printf ("a=0: %u\n\n", bitfield.bf); + if (bitfield.bf != 0) failures++; + + bitfield.b = bitfield.b ^ 1; + printf ("b=1: %u\n", bitfield.bf); + if (bitfield.bf != 2) failures++; + + bitfield.b = bitfield.b ^ 1; + printf ("b=0: %u\n\n", bitfield.bf); + if (bitfield.bf != 0) failures++; + + bitfield.c = bitfield.c ^ 1; + printf ("c=1: %u\n", bitfield.bf); + if (bitfield.bf != 4) failures++; + + bitfield.c = bitfield.c ^ 1; + printf ("c=0: %u\n\n", bitfield.bf); + if (bitfield.bf != 0) failures++; + + return failures; +} diff --git a/test/val/bss-name-decl.c b/test/val/bss-name-decl.c new file mode 100644 index 000000000..9a535844e --- /dev/null +++ b/test/val/bss-name-decl.c @@ -0,0 +1,22 @@ +/* + !!DESCRIPTION!! bss-name pragma not affecting declarations + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Piotr Fusik +*/ + +/* + see: https://github.com/cc65/cc65/issues/409 +*/ + +#pragma bss-name (push,"ZEROPAGE") + +char n; /* only a declaration because followed by definition */ +char n = 1; /* not BSS */ + +#pragma bss-name (pop) + +int main(void) +{ + return (unsigned) &n >= 0x100 ? 0 : 1; +} diff --git a/test/val/bss-name.c b/test/val/bss-name.c new file mode 100644 index 000000000..f0ad7111e --- /dev/null +++ b/test/val/bss-name.c @@ -0,0 +1,21 @@ +/* + !!DESCRIPTION!! bss-name pragma + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Piotr Fusik +*/ + +/* + see: https://github.com/cc65/cc65/issues/409 +*/ + +#pragma bss-name (push,"ZEROPAGE") + +char zp_var; + +#pragma bss-name (pop) + +int main(void) +{ + return (unsigned) &zp_var < 0x100 ? 0 : 1; +} diff --git a/test/val/bug1047.c b/test/val/bug1047.c new file mode 100644 index 000000000..3f1d3cf63 --- /dev/null +++ b/test/val/bug1047.c @@ -0,0 +1,82 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests of char bit-fields; see https://github.com/cc65/cc65/issues/1047 +*/ + +#include <stdio.h> + +static unsigned char failures = 0; + +static struct chars { + unsigned char a : 3; + unsigned char b : 3; + unsigned char c : 3; +} cs = {4, 1, 3}; + +static void test_char_bitfield(void) +{ + if (sizeof (cs) != 2) { + printf("Got sizeof (cs) = %zu, expected 2.\n", sizeof (cs)); + failures++; + } + + if (cs.a != 4) { + printf("Got cs.a = %u, expected 4.\n", cs.a); + failures++; + } + + if (cs.b != 1) { + printf("Got cs.b = %u, expected 1.\n", cs.b); + failures++; + } + + if (cs.c != 3) { + printf("Got cs.c = %u, expected 3.\n", cs.c); + failures++; + } + + cs.a = -1; + cs.b = 6; + cs.c = 1; + + if (cs.a != 7) { + printf("Got cs.a = %u, expected 7.\n", cs.a); + failures++; + } + + if (cs.b != 6) { + printf("Got cs.b = %u, expected 6.\n", cs.b); + failures++; + } + + if (cs.c != 1) { + printf("Got cs.c = %u, expected 1.\n", cs.c); + failures++; + } +} + +int main(void) +{ + test_char_bitfield(); + printf("failures: %u\n", failures); + return failures; +} diff --git a/test/val/bug1050.c b/test/val/bug1050.c new file mode 100644 index 000000000..af9e4f6b2 --- /dev/null +++ b/test/val/bug1050.c @@ -0,0 +1,32 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests enum sizes; see https://github.com/cc65/cc65/issues/1050 +*/ + +enum e { k }; +_Static_assert(sizeof(enum e) == 1, "This should fit in a byte."); +_Static_assert(sizeof(k) == 2, "Enumerators are still ints."); + +int main (void) +{ + return 0; +} diff --git a/test/val/bug1071.c b/test/val/bug1071.c new file mode 100644 index 000000000..66e298b25 --- /dev/null +++ b/test/val/bug1071.c @@ -0,0 +1,87 @@ + +/* test related to issue #1071 */ + +#include <stdlib.h> +#include <stdio.h> +#include <stdint.h> + +struct ImageStruct +{ + uint8_t _imageData; + #if !defined(NO_COLOR) + uint8_t _color; + #endif +}; + +typedef struct ImageStruct Image; + +struct CharacterStruct +{ + // character coordinates + uint8_t _x; + uint8_t _y; + + // _status decides whether the character is active + uint8_t _status; + + Image* _imagePtr; +}; + +typedef struct CharacterStruct Character; + +uint16_t ghostLevel; +uint8_t level; +uint16_t loop; + +#define GHOSTS_NUMBER 10 +#define BOMBS_NUMBER 3 + +#define MAX_GHOST_LEVEL_SCALE 3 +#define MAX_GHOST_LEVEL (1400/MAX_GHOST_LEVEL_SCALE) + +#define MAX_GHOST_LOOP_SCALE 3 +#define MAX_GHOST_LOOP (1800/MAX_GHOST_LOOP_SCALE) + +#define INITIAL_GHOST_SLOWDOWN 16000 + +#define ACTION_GHOST_MIN_SLOWDOWN_SCALE 1 +#define GHOST_MIN_SLOWDOWN_SCALE ACTION_GHOST_MIN_SLOWDOWN_SCALE +#define GHOST_MIN_SLOWDOWN (3000/GHOST_MIN_SLOWDOWN_SCALE) + +Character ghosts[GHOSTS_NUMBER]; +Character bombs[BOMBS_NUMBER]; + +uint16_t test1(void) +{ + if((loop<MAX_GHOST_LOOP) && (ghostLevel<MAX_GHOST_LEVEL)) + { + return INITIAL_GHOST_SLOWDOWN-(uint16_t)level*256-ghostLevel*8; + } + return GHOST_MIN_SLOWDOWN; +} + +uint16_t test2(void) +{ + if((loop<MAX_GHOST_LOOP) && (ghostLevel<MAX_GHOST_LEVEL)) + { + return INITIAL_GHOST_SLOWDOWN-(uint16_t)level*256-ghostLevel*16; + } + return GHOST_MIN_SLOWDOWN; +} + +uint16_t res = 0; + +int main(void) +{ + loop = 7; + ghostLevel = 13; + level = 3; + + res = test1(); + printf("test1 res: %d\n", res); + if (res != 15128) return -1; + res = test2(); + printf("test2 res: %d\n", res); + if (res != 15024) return -1; + return 0; +} diff --git a/test/val/bug1075.c b/test/val/bug1075.c new file mode 100644 index 000000000..3e259fd22 --- /dev/null +++ b/test/val/bug1075.c @@ -0,0 +1,31 @@ +/* bug #1075 Internal compiler error */ + +#include <stdio.h> +#include <stdlib.h> +#include <string.h> + +long rhs; + +int test(void) +{ + /* the whole lhs is errorneously treated as an absolute address (integer + constant) neglecting its dereference */ + return *(char *)0xD77C + rhs; +} + +int res; + +int main(void) +{ + memset(*(char *)0xD76C, 11, 0x80); + rhs = 0x10; + *(char *)(0xD77C + rhs) = 13; + *(char *)0xD77C = 23; + *(char *)0xD78C = 42; + res = test(); + printf("res: %d\n", res); + if (res != (23 + 0x10)) { + return EXIT_FAILURE; + } + return EXIT_SUCCESS; +} diff --git a/test/val/bug1077.c b/test/val/bug1077.c new file mode 100644 index 000000000..2fb3ef168 --- /dev/null +++ b/test/val/bug1077.c @@ -0,0 +1,31 @@ +/* bug #1077 - Wrong code: a non-array constant address with a non-constant subscript */ + +#include <stdlib.h> +#include <stdio.h> + +int test1(void) +{ + int a = 0; + (&a)[a] = 42; + return a; +} +int test2(void) +{ + int a = 0; + int b = 0; + (&a)[b] = 42; + return a; +} + +int main(void) +{ + int res, ret = EXIT_SUCCESS; + res = test1(); + printf("%d\n", res); + if (res != 42) ret = EXIT_FAILURE; + res = test2(); + printf("%d\n", res); + if (res != 42) ret = EXIT_FAILURE; + + return ret; +} diff --git a/test/val/bug1094.c b/test/val/bug1094.c new file mode 100644 index 000000000..05e3e6430 --- /dev/null +++ b/test/val/bug1094.c @@ -0,0 +1,99 @@ + +/* bug #1094 - Nested struct/union initializers don't compile */ + +#include <stdio.h> +#include <stddef.h> +#include <stdlib.h> +#include <stdint.h> + +typedef uint16_t u16; +typedef uint8_t u8; + +struct WW { + int a : 4; + struct { + unsigned int b : 4; + unsigned int c : 8; + } x[2]; +} wwqq = { 0, {2, 5, {3, 4}}, }; + +typedef struct { + u16 quot; + u16 rem; +} udiv_t; + +typedef struct { + u16 quot; + u16 rem; + char m[8]; +} big_t; + +union U { + struct { + signed int a : 3; + signed int b : 3; + signed int c : 3; + }; + int u; +}; + +union U g = { 5, 3, 1 }; + +struct S { + struct { + unsigned int a : 3; + unsigned int b : 3; + unsigned int c : 3; + }; +}; + +struct S h = { 5, 3, 1 }; + +union X { + struct { + uint16_t a : 3; + union { + struct { + uint16_t b : 3; + uint16_t c : 3; + }; + uint16_t d; + }; + }; + uint16_t e; +} x = { 4, {5, 6} }; + + +udiv_t div3(udiv_t u) +{ + udiv_t v = {}; + + u.quot = 341 + u.quot; + u.rem = 1 + u.rem; + + v = u; + + return v; +} + +int main(void) +{ + udiv_t v = { 141, 32 }; + big_t b = { 141, 32 }; + + v = div3(*(udiv_t*)&b); + + printf("%d %d %d\n", (int)wwqq.a, wwqq.x[0].b, wwqq.x[0].c); + printf("%d %d %d\n", (int)wwqq.a, wwqq.x[1].b, wwqq.x[1].c); + printf("quot = %u, rem = %u\n", div3(v).quot, div3(v).rem); + printf("quot = %u, rem = %u\n", v.quot, v.rem); + printf("quot = %u, rem = %u\n", b.quot, b.rem); + printf("g.a = %u, g.b = %u, g.c = %d\n", g.a, g.b, g.c); + x.e = 1467; + printf("x.a = %d, x.b = %d, x.c = %d\n", x.a, x.b, x.c); + printf("(long)x.b = %ld, sizeof(x) = %u, sizeof((long)x.a) = %u\n", (long)x.b, sizeof(x), sizeof((long)x.a)); + printf("-x.d = %d, (long)(-x.c + 1) = %ld\n", -x.d, (long)(-x.c + 1)); + printf("h.a = %u, h.b = %u, h.c = %u\n", h.a, h.b, h.c); + + return 0; +} diff --git a/test/val/bug1095.c b/test/val/bug1095.c new file mode 100644 index 000000000..cecbf0329 --- /dev/null +++ b/test/val/bug1095.c @@ -0,0 +1,162 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests of signed bit-fields; see https://github.com/cc65/cc65/issues/1095 +*/ + +#include <stdio.h> + +static unsigned char failures = 0; + +static struct signed_ints { + signed int a : 3; + signed int b : 3; + signed int c : 3; + signed int d : 10; + signed int : 0; + signed int e : 8; + signed int f : 16; +} si = {-4, -1, 3, -500, -100, -5000}; + +static void test_signed_bitfield(void) +{ + if (si.a >= 0) { + printf("Got si.a = %d, expected negative.\n", si.a); + failures++; + } + if (si.a != -4) { + printf("Got si.a = %d, expected -4.\n", si.a); + failures++; + } + + if (si.b >= 0) { + printf("Got si.b = %d, expected negative.\n", si.b); + failures++; + } + if (si.b != -1) { + printf("Got si.b = %d, expected -1.\n", si.b); + failures++; + } + + if (si.c <= 0) { + printf("Got si.c = %d, expected positive.\n", si.c); + failures++; + } + if (si.c != 3) { + printf("Got si.c = %d, expected 3.\n", si.c); + failures++; + } + + if (si.d >= 0) { + printf("Got si.d = %d, expected negative.\n", si.d); + failures++; + } + if (si.d != -500) { + printf("Got si.d = %d, expected -500.\n", si.d); + failures++; + } + + if (si.e >= 0) { + printf("Got si.e = %d, expected negative.\n", si.e); + failures++; + } + if (si.e != -100) { + printf("Got si.e = %d, expected -100.\n", si.e); + failures++; + } + + if (si.f >= 0) { + printf("Got si.f = %d, expected negative.\n", si.f); + failures++; + } + if (si.f != -5000) { + printf("Got si.f = %d, expected -5000.\n", si.f); + failures++; + } + + si.a = -3; + si.b = 1; + si.c = -2; + si.d = 500; + si.e = 100; + si.f = 5000; + + if (si.a >= 0) { + printf("Got si.a = %d, expected negative.\n", si.a); + failures++; + } + if (si.a != -3) { + printf("Got si.a = %d, expected -3.\n", si.a); + failures++; + } + + if (si.b <= 0) { + printf("Got si.b = %d, expected positive.\n", si.b); + failures++; + } + if (si.b != 1) { + printf("Got si.b = %d, expected 1.\n", si.b); + failures++; + } + + if (si.c >= 0) { + printf("Got si.c = %d, expected negative.\n", si.c); + failures++; + } + if (si.c != -2) { + printf("Got si.c = %d, expected -2.\n", si.c); + failures++; + } + + if (si.d <= 0) { + printf("Got si.d = %d, expected positive.\n", si.d); + failures++; + } + if (si.d != 500) { + printf("Got si.d = %d, expected 500.\n", si.d); + failures++; + } + + if (si.e <= 0) { + printf("Got si.e = %d, expected positive.\n", si.e); + failures++; + } + if (si.e != 100) { + printf("Got si.e = %d, expected 100.\n", si.e); + failures++; + } + + if (si.f <= 0) { + printf("Got si.f = %d, expected positive.\n", si.f); + failures++; + } + if (si.f != 5000) { + printf("Got si.f = %d, expected 5000.\n", si.f); + failures++; + } +} + +int main(void) +{ + test_signed_bitfield(); + printf("failures: %u\n", failures); + return failures; +} diff --git a/test/val/bug1108.c b/test/val/bug1108.c new file mode 100644 index 000000000..1cd23c8e5 --- /dev/null +++ b/test/val/bug1108.c @@ -0,0 +1,37 @@ + +/* bug #1108 - Problem with static locals? */ + +#include <stdio.h> + +#pragma static-locals (on) + +unsigned char x = 0; + +static unsigned char PrintVar1(void) +{ + unsigned char cx = x + 1; + + printf("cx:%d x:%d\n", cx, x); + return cx == 0; +} + +static unsigned char PrintVar2(void) +{ + unsigned char cx = x + 1; + unsigned char cy; + + cy = x + 1; + printf("cx:%d cy:%d x:%d\n", cx, cy, x); + return cx != cy; +} + +static unsigned char ret = 0; + +int main(void) +{ + do { + ret |= PrintVar1(); + ret |= PrintVar2(); + } while (++x < 10); + return ret; +} diff --git a/test/val/bug1139.c b/test/val/bug1139.c new file mode 100644 index 000000000..5aef3924d --- /dev/null +++ b/test/val/bug1139.c @@ -0,0 +1,353 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests bit-field in if condition; see https://github.com/cc65/cc65/issues/1139 +*/ + +#include <stdio.h> + +static unsigned char failures = 0; + +static struct four_bits { + unsigned int x : 4; +} fb = {1}; + +static struct overlap { + unsigned int x : 10; + unsigned int y : 10; +} o = {11, 22}; + +static struct full_width { + unsigned int x : 8; + unsigned int y : 16; +} fw = {255, 17}; + +static struct aligned_end { + unsigned int : 2; + unsigned int x : 6; + unsigned int : 3; + unsigned int y : 13; + /* z crosses a byte boundary, but fits in a byte when shifted. */ + unsigned int : 6; + unsigned int z : 7; +} ae = {63, 17, 100}; + +/* Test using bit-fields in if conditions. */ +static void test_if(void) +{ + /* Original test case for the bug. */ + o.x = 0; + o.y = 44; + if (o.x) { + printf("Bad, o.x is false\n"); + failures++; + } else { + printf("Good\n"); + } + + /* Additionally, test most fields from bitfield.c to try to cover all start/end situations. */ + /* four_bits */ + fb.x = 1; + if (fb.x) { + printf("Good\n"); + } else { + printf("Bad, fb.x is true (1)\n"); + failures++; + } + + fb.x = 0; + if (fb.x) { + printf("Bad, fb.x is false\n"); + failures++; + } else { + printf("Good\n"); + } + + /* overlap */ + o.x = 123; + if (o.x) { + printf("Good\n"); + } else { + printf("Bad, o.x is true (123)\n"); + failures++; + } + + o.x = 0; + if (o.x) { + printf("Bad, o.x is false\n"); + failures++; + } else { + printf("Good\n"); + } + + o.y = 321; + if (o.y) { + printf("Good\n"); + } else { + printf("Bad, o.y is true (321)\n"); + failures++; + } + + o.y = 0; + if (o.y) { + printf("Bad, o.y is false\n"); + failures++; + } else { + printf("Good\n"); + } + + /* full_width */ + fw.x = 117; + if (fw.x) { + printf("Good\n"); + } else { + printf("Bad, fw.x is true (117)\n"); + failures++; + } + + fw.x = 0; + if (fw.x) { + printf("Bad, fw.x is false\n"); + failures++; + } else { + printf("Good\n"); + } + + fw.y = 32123; + if (fw.y) { + printf("Good\n"); + } else { + printf("Bad, fw.y is true (32123)\n"); + failures++; + } + + fw.y = 0; + if (fw.y) { + printf("Bad, fw.y is false\n"); + failures++; + } else { + printf("Good\n"); + } + + /* aligned_end */ + ae.x = 2; + if (ae.x) { + printf("Good\n"); + } else { + printf("Bad, ae.x is true (2)\n"); + failures++; + } + + ae.x = 0; + if (ae.x) { + printf("Bad, ae.x is false\n"); + failures++; + } else { + printf("Good\n"); + } + + ae.y = 2222; + if (ae.y) { + printf("Good\n"); + } else { + printf("Bad, ae.y is true (2222)\n"); + failures++; + } + + ae.y = 0; + if (ae.y) { + printf("Bad, ae.y is false\n"); + failures++; + } else { + printf("Good\n"); + } + + ae.z = 111; + if (ae.z) { + printf("Good\n"); + } else { + printf("Bad, ae.z is true (111)\n"); + failures++; + } + + ae.z = 0; + if (ae.z) { + printf("Bad, ae.z is false\n"); + failures++; + } else { + printf("Good\n"); + } +} + +/* Test using bit-fields in inverted if conditions. */ +static void test_if_not(void) +{ + /* Original test case for the bug, inverted. */ + o.x = 0; + o.y = 44; + if (!o.x) { + printf("Good\n"); + } else { + printf("Bad, o.x is false\n"); + failures++; + } + + /* Additionally, test most fields from bitfield.c to try to cover all start/end situations. */ + /* four_bits */ + fb.x = 1; + if (!fb.x) { + printf("Bad, fb.x is true (1)\n"); + failures++; + } else { + printf("Good\n"); + } + + fb.x = 0; + if (!fb.x) { + printf("Good\n"); + } else { + printf("Bad, fb.x is false\n"); + failures++; + } + + /* overlap */ + o.x = 123; + if (!o.x) { + printf("Bad, o.x is true (123)\n"); + failures++; + } else { + printf("Good\n"); + } + + o.x = 0; + if (!o.x) { + printf("Good\n"); + } else { + printf("Bad, o.x is false\n"); + failures++; + } + + o.y = 321; + if (!o.y) { + printf("Bad, o.y is true (321)\n"); + failures++; + } else { + printf("Good\n"); + } + + o.y = 0; + if (!o.y) { + printf("Good\n"); + } else { + printf("Bad, o.y is false\n"); + failures++; + } + + /* full_width */ + fw.x = 117; + if (!fw.x) { + printf("Bad, fw.x is true (117)\n"); + failures++; + } else { + printf("Good\n"); + } + + fw.x = 0; + if (!fw.x) { + printf("Good\n"); + } else { + printf("Bad, fw.x is false\n"); + failures++; + } + + fw.y = 32123; + if (!fw.y) { + printf("Bad, fw.y is true (32123)\n"); + failures++; + } else { + printf("Good\n"); + } + + fw.y = 0; + if (!fw.y) { + printf("Good\n"); + } else { + printf("Bad, fw.y is false\n"); + failures++; + } + + /* aligned_end */ + ae.x = 2; + if (!ae.x) { + printf("Bad, ae.x is true (2)\n"); + failures++; + } else { + printf("Good\n"); + } + + ae.x = 0; + if (!ae.x) { + printf("Good\n"); + } else { + printf("Bad, ae.x is false\n"); + failures++; + } + + ae.y = 2222; + if (!ae.y) { + printf("Bad, ae.y is true (2222)\n"); + failures++; + } else { + printf("Good\n"); + } + + ae.y = 0; + if (!ae.y) { + printf("Good\n"); + } else { + printf("Bad, ae.y is false\n"); + failures++; + } + + ae.z = 111; + if (!ae.z) { + printf("Bad, ae.z is true (111)\n"); + failures++; + } else { + printf("Good\n"); + } + + ae.z = 0; + if (!ae.z) { + printf("Good\n"); + } else { + printf("Bad, ae.z is false\n"); + failures++; + } +} + +int main(void) +{ + test_if(); + test_if_not(); + printf("failures: %u\n", failures); + return failures; +} diff --git a/test/val/bug1143warn.c b/test/val/bug1143warn.c new file mode 100644 index 000000000..9bbc8ea8b --- /dev/null +++ b/test/val/bug1143warn.c @@ -0,0 +1,9 @@ + +/* bug #1143 - Multiple storage class specifiers in one declaration? */ + +static static void* y[1]; /* warning */ + +int main(void) +{ + return 0; +} diff --git a/test/val/bug1178.c b/test/val/bug1178.c new file mode 100644 index 000000000..7fb7e7803 --- /dev/null +++ b/test/val/bug1178.c @@ -0,0 +1,81 @@ + +/* bug #1178 - copying structs/unions > 4 bytes is broken */ + +#include <stdio.h> +#include <stdlib.h> + +typedef struct +{ + unsigned char a; + unsigned char b; + unsigned char c; + unsigned char d; + unsigned char e; +} +TestStruct1; + +TestStruct1 StructArray1[2]; +TestStruct1 test1; + +typedef struct +{ + unsigned char a; + unsigned char b; + unsigned char c; + unsigned char d; +} +TestStruct2; + +TestStruct2 StructArray2[2]; +TestStruct2 test2; + +int res = EXIT_SUCCESS; + +void dotest1(void) +{ + test1.a = 42; + test1.b = 11; + test1.c = 23; + test1.d = 47; + test1.e = 13; + + StructArray1[0] = test1; + + printf ("test1: %d, %d, %d, %d, %d\n", + (int)StructArray1[0].a, (int)StructArray1[0].b, (int)StructArray1[0].c, + (int)StructArray1[0].d, (int)StructArray1[0].e); + if ((StructArray1[0].a != 42) || + (StructArray1[0].b != 11) || + (StructArray1[0].c != 23) || + (StructArray1[0].d != 47) || + (StructArray1[0].e != 13)) { + res = EXIT_FAILURE; + } +} + +void dotest2(void) +{ + test2.a = 42; + test2.b = 11; + test2.c = 23; + test2.d = 47; + + StructArray2[0] = test2; + + printf ("test2: %d, %d, %d, %d, %d\n", + (int)StructArray2[0].a, (int)StructArray2[0].b, + (int)StructArray2[0].c, (int)StructArray2[0].d); + if ((StructArray2[0].a != 42) || + (StructArray2[0].b != 11) || + (StructArray2[0].c != 23) || + (StructArray2[0].d != 47)) { + res = EXIT_FAILURE; + } +} + +int main(void) +{ + dotest1(); + dotest2(); + return res; +} diff --git a/test/val/bug1181.c b/test/val/bug1181.c new file mode 100644 index 000000000..077707d94 --- /dev/null +++ b/test/val/bug1181.c @@ -0,0 +1,86 @@ + +/* bug #1181 - Testing struct member against NULL is broken */ + +#include <stdio.h> +#include <stdlib.h> + +struct { + int a; +} s = { 256 }, *ps = &s; + +int res = EXIT_SUCCESS; + +void test1(void) +{ + if (ps->a) { + printf("OK\n"); + } else { + printf("ERROR: %d\n", ps->a); + res = EXIT_FAILURE; + } +} + +typedef struct _MENUITEM +{ + char *name; +} MENUITEM; + +typedef struct _MENU +{ + struct _MENUITEM *items; +} MENU; + +/* note: the behaviour changes when these strings are changed! */ +static unsigned char oi31[] = {"Browser Exec Setup"}; +static unsigned char oi36[] = {"Browser auto sort"}; +static unsigned char oi47[] = {"Browser startup"}; +static unsigned char oi49[] = {"Browser charset"}; +static unsigned char oi55[] = {"Menu color scheme"}; +static unsigned char oi63[] = {"Menu input scheme"}; +static unsigned char oi35[] = {"back"}; + +MENUITEM optionsitems_menu[] = { + {oi31}, + {oi36}, + {oi47}, + {oi49}, + {oi55}, + {oi63}, + {oi35}, + {NULL} +}; + +static MENU optionsmenu_menu = { + &optionsitems_menu[0], +}; + +unsigned char __fastcall__ menu_getnumitems(MENU *menu) +{ +static unsigned char numitems; +MENUITEM *items; + numitems = 0; + items = menu->items; + while(items->name) + { + ++numitems; + ++items; + } + return numitems; +} + +int main(void) +{ + unsigned char i = 0; + + i = menu_getnumitems(&optionsmenu_menu); + printf("numitems (expected 7): %d\n", i); + + if (i != 7) { + printf("failed\n"); + res = EXIT_FAILURE; + } + printf("passed\n"); + + test1(); + return res; +} diff --git a/test/val/bug1201.c b/test/val/bug1201.c new file mode 100644 index 000000000..6d194fbee --- /dev/null +++ b/test/val/bug1201.c @@ -0,0 +1,25 @@ + +/* bug #1201 - The unary operators +, - and ~ should do integer promote on the result types. */ + +char a; +short b; +int c; +long d; +enum E { + Z +} e; +struct S { + int a : 1; +} f; + +_Static_assert(sizeof(+a) == sizeof(int), "Result type should be int"); +_Static_assert(sizeof(+b) == sizeof(int), "Result type should be int"); +_Static_assert(sizeof(+c) == sizeof(int), "Result type should be int"); +_Static_assert(sizeof(+d) == sizeof(long), "Result type should be long"); +_Static_assert(sizeof(+e) == sizeof(int), "Result type should be int"); +_Static_assert(sizeof(+f.a) == sizeof(int), "Result type should be int"); + +int main(void) +{ + return 0; +} diff --git a/test/val/bug1209-ind-goto-rev.c b/test/val/bug1209-ind-goto-rev.c new file mode 100644 index 000000000..ab8213a30 --- /dev/null +++ b/test/val/bug1209-ind-goto-rev.c @@ -0,0 +1,53 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Test of indirect goto with dynamic labels and order label def, label ref, goto. + https://github.com/cc65/cc65/issues/1209 + This should compile and should be moved to tests/val/ when the bug is fixed. +*/ + +#include <stdio.h> +#include <stdlib.h> + +/* When operating correctly, this returns 0. */ +int f (void) +{ + static void *x[1]; + /* Define the label before referencing it with indirect label syntax. */ +L: if (x[0] != 0) return 0; + x[0] = &&L; + goto *x[0]; +} + +static unsigned char failures = 0; + +int main (void) +{ + if (f () != 0) failures++; + + if (failures == 0) { + printf ("PASS\n"); + } else { + printf ("FAIL\n"); + } + + return failures; +} diff --git a/test/val/bug1211-ice-move-refs-1.c b/test/val/bug1211-ice-move-refs-1.c new file mode 100644 index 000000000..9be1696ee --- /dev/null +++ b/test/val/bug1211-ice-move-refs-1.c @@ -0,0 +1,53 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Test of indirect goto with label merge ICE. + https://github.com/cc65/cc65/issues/1211 + This test case works because CS_MergeLabels has a hack to keep the "unreferenced" label + (i.e. the one referenced in a data segment). +*/ + +#include <stdio.h> + +/* When operating correctly, f(0) = 31 and f(1) = 41. */ +int f (int x) +{ + static const void *const labels[] = {&&L0, &&L1}; + goto *labels[x]; +L0: if (labels[0] != labels[1]) return 31; + else return 13; +L1: return 41; +} + +static unsigned char failures = 0; + +int main (void) +{ + if (f (0) != 31) failures++; + + if (failures == 0) { + printf ("PASS\n"); + } else { + printf ("FAIL\n"); + } + + return failures; +} diff --git a/test/val/bug1221.c b/test/val/bug1221.c new file mode 100644 index 000000000..360a71162 --- /dev/null +++ b/test/val/bug1221.c @@ -0,0 +1,12 @@ +/* bug #1221 - Structs/unions as ternary operands */ + +int a; +struct S { int a; } s1, s2; +struct U { int a; } u1, u2; + +int main() +{ + a ? s1 : s2; /* BUG: should be OK */ + a ? u1 : u2; /* BUG: should be OK */ + return 0; +} diff --git a/test/val/bug1222.c b/test/val/bug1222.c new file mode 100644 index 000000000..5e47e452e --- /dev/null +++ b/test/val/bug1222.c @@ -0,0 +1,12 @@ +/* bug #1222 - 'sizeof' issues */ + +#include <stdlib.h> + +int a[1]; +int b[sizeof ++a[42]]; /* should work as '++a[42]' is actually unevaluated */ + +int main(void) +{ + return EXIT_SUCCESS; +} + diff --git a/test/val/bug1244.c b/test/val/bug1244.c new file mode 100644 index 000000000..fb499a0c8 --- /dev/null +++ b/test/val/bug1244.c @@ -0,0 +1,18 @@ + +/* bug #1244 - ICE for enum bit-fields */ + +#include <stdlib.h> + +enum E { + L = 65535L /* or U = 65535U */ +}; + +struct S { + enum E a : 16; +} s; + +int main(void) +{ + return EXIT_SUCCESS; +} + diff --git a/test/val/bug1245.c b/test/val/bug1245.c new file mode 100644 index 000000000..2dda93790 --- /dev/null +++ b/test/val/bug1245.c @@ -0,0 +1,12 @@ +/* bug #1245 - ICE for enums with int initializers */ + +#include <stdlib.h> + +enum E { + X = 1000, +} e = 3; + +int main(void) +{ + return EXIT_SUCCESS; +} diff --git a/test/val/bug1263.c b/test/val/bug1263.c new file mode 100644 index 000000000..740b19250 --- /dev/null +++ b/test/val/bug1263.c @@ -0,0 +1,22 @@ +/* bug #1263 - erroneous error for K & R function declaration */ + +enum E { I = 0 }; + +extern int f(); +int f(e) + enum E e; +{ + return e; +} + +extern int g(int); +int g(e) + enum E e; +{ + return e; +} + +int main(void) +{ + return f(I) + g(I); +} diff --git a/test/val/bug1267.c b/test/val/bug1267.c new file mode 100644 index 000000000..382903594 --- /dev/null +++ b/test/val/bug1267.c @@ -0,0 +1,79 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests of bit-field signedness with typedefs; see https://github.com/cc65/cc65/issues/1267 +*/ + +#include <stdio.h> + +static unsigned char failures = 0; + +typedef int i16; +typedef unsigned int u16; +typedef signed int s16; + +static struct ints { + i16 i : 4; + u16 u : 4; + s16 s : 4; +} si = {1, 2, 3}; + +static void test_bitfield_typedefs (void) +{ + if (si.i != 1) { + /* Note that this is another bug that i is signed. */ + printf ("Got si.a = %d, expected 1.\n", si.i); + failures++; + } + if (si.u != 2) { + printf ("Got si.u = %u, expected 2.\n", si.u); + failures++; + } + if (si.s != 3) { + printf ("Got si.s = %d, expected 3.\n", si.s); + failures++; + } + + si.i = -1; + si.u = -2; + si.s = -3; + + /* Note that this is another bug that i is signed. */ + if (si.i != -1) { + printf ("Got si.a = %d, expected -1.\n", si.i); + failures++; + } + if (si.u != 14) { + printf ("Got si.u = %u, expected 14.\n", si.u); + failures++; + } + if (si.s != -3) { + printf ("Got si.s = %d, expected -3.\n", si.s); + failures++; + } +} + +int main (void) +{ + test_bitfield_typedefs (); + printf ("failures: %u\n", failures); + return failures; +} diff --git a/test/val/bug1310.c b/test/val/bug1310.c new file mode 100644 index 000000000..306c91fb6 --- /dev/null +++ b/test/val/bug1310.c @@ -0,0 +1,87 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests of constant expressions. https://github.com/cc65/cc65/issues/1310 +*/ + +#include <stdio.h> + +static unsigned char failures = 0; + +int main (void) +{ + /* 255 * 255 is signed integer overflow, so UB, but it would be nice if + ** (1) there were a warning, and (2) it did the "obvious" thing. + */ + const int two_fifty_five = 255; + const int two_fifty_five_squared = 255 * 255; + + /* Unsigned overflow is not UB, but has similar problems with comparison. */ + const int two_fifty_six = 256U; + const int two_fifty_six_squared = 256U * 256U; + + if (255 * 255 != -511) { + fprintf (stderr, "Expected 255 * 255 == -511, got: %d\n", 255 * 255); + failures++; + } + if (two_fifty_five * two_fifty_five != -511) { + fprintf (stderr, "Expected two_fifty_five * two_fifty_five == -511, got: %d\n", + two_fifty_five * two_fifty_five); + failures++; + } + if (two_fifty_five_squared != -511) { + fprintf (stderr, "Expected two_fifty_five_squared == -511, got: %d\n", + two_fifty_five_squared); + failures++; + } + + if (256U * 256U != 0) { + fprintf (stderr, "Expected 256U * 256U == 0, got: %d\n", 256U * 256U); + failures++; + } + if (two_fifty_six * two_fifty_six != 0) { + fprintf (stderr, "Expected two_fifty_six * two_fifty_six == 0, got: %d\n", + two_fifty_six * two_fifty_six); + failures++; + } + if (two_fifty_six_squared != 0) { + fprintf (stderr, "Expected two_fifty_six_squared == 0, got: %d\n", + two_fifty_six_squared); + failures++; + } + + if (-32768U != 32768U) { + fprintf (stderr, "Expected -32768U == 32768U, got: %ld\n", (long)-32768U); + failures++; + } + if (~32767U != 32768U) { + fprintf (stderr, "Expected ~32767U == 32768U, got: %ld\n", (long)~32767U); + failures++; + } + + if ((long*)0x1000 - (long*)0x2000 >= 0) { + fprintf (stderr, "Expected (long*)0x1000 - (long*)0x2000 < 0, got: %ld\n", (long*)0x1000 - (long*)0x2000); + failures++; + } + printf ("failures: %u\n", failures); + + return failures; +} diff --git a/test/val/bug1320.c b/test/val/bug1320.c new file mode 100644 index 000000000..824b50071 --- /dev/null +++ b/test/val/bug1320.c @@ -0,0 +1,44 @@ +/* + Copyright 2020, The cc65 Authors + + This software is provided "as-is", without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications; and, to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated, but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Test of a post-counted pointer argument, + followed by a (nested) function-call argument. + Test that compiling it doesn't cause a seg-fault. + + https://github.com/cc65/cc65/issues/1320 +*/ + +static char *var; + +static void foo (char *, char) +{ +} + +static char bar (void) +{ + return 'b'; +} + +int main (void) +{ + foo (var++, bar ()); + return 0; +} diff --git a/test/val/bug1332.c b/test/val/bug1332.c new file mode 100644 index 000000000..9714e0782 --- /dev/null +++ b/test/val/bug1332.c @@ -0,0 +1,72 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests bit-field bug. https://github.com/cc65/cc65/issues/1332 +*/ + +#include <stdio.h> +#include <string.h> + +static unsigned char failures = 0; + +static const struct bitfield { + unsigned lsb : 1; + unsigned pad : 14; + unsigned msb : 1; +} b = {1, 0, 1}; + +static unsigned v; + +void test_if_val (void) +{ + /* Gets appropriate garbage (0x12) into .X so the test fails. */ + v = 0x1234; + + if (b.msb == 1) { + fprintf (stderr, "if (msb == 1) OK\n"); + } else { + fprintf (stderr, "if (msb == 1) FAILED\n"); + failures++; + } +} + +void test_sprintf (void) +/* This test case is similar to the original bug report. */ +{ + char buf[10]; + snprintf (buf, sizeof (buf), "%u", b.msb); + + if (strcmp (buf, "1") != 0) { + fprintf (stderr, "Expected: sprintf (msb) == \"1\", got: %s\n", buf); + failures++; + } else { + fprintf (stderr, "sprintf (msb) OK\n"); + } +} + +int main (void) +{ + test_if_val (); + test_sprintf (); + + printf ("failures: %u\n", failures); + return failures; +} diff --git a/test/val/bug1348.c b/test/val/bug1348.c new file mode 100644 index 000000000..c40d9ac84 --- /dev/null +++ b/test/val/bug1348.c @@ -0,0 +1,54 @@ +/* bug #1348, wrongly optimized integer promotion in comparison */ + +#include <stdio.h> + +static const int notrandtab[] = { + 0xffff, 0x7fff, 0x3fff, 0x1fff, + 0x0fff, 0x07ff, 0x03ff, 0x01ff, + 0x00ff, 0x007f, 0x003f, 0x001f, + 0x000f, 0x0007, 0x0003, 0x0001 +}; + +static unsigned char notrandcount = 0; + +static int notrand(void) +{ + return notrandtab[notrandcount & 0x0f]; +} + +static unsigned char n1, n2; +static unsigned char i, ii, s; +static unsigned char err = 0; + +static const unsigned char cmptab[] = { + 0xff, 0x7f, 0x3f, 0x1f, + 0x0f, 0x07, 0x03, 0x01, + 0x80, 0x40, 0x20, 0x10, + 0x08, 0x04, 0x02, 0x01 +}; + +int main(void) +{ + for (ii = 0; ii < 16; ++ii) { + s = cmptab[ii]; + for (i = 0; i < 16; ++i) { + n1 = n2 = 0; + if ((notrand() & 0xff) > s) { + n1 = 1; + } + if ((notrand() & 0xffu) > s) { + n2 = 1; + } + printf("%5d > %3d %u(%02x) %u(%02x) %s\n", + notrandtab[i], s, + n1, (notrand() & 0xff), + n2, (notrand() & 0xffu), + n1 == n2 ? "=" : "!="); + if (n1 != n2) { + err = 1; + } + notrandcount++; + } + } + return err; +} diff --git a/test/val/bug1374.c b/test/val/bug1374.c new file mode 100644 index 000000000..b55e75fee --- /dev/null +++ b/test/val/bug1374.c @@ -0,0 +1,83 @@ + +/* test for bug#1374 */ + +#include <stdint.h> +#include <stdio.h> + +static int res = 0; + +int test1(void) +{ + uint8_t x = 0x89; + uint8_t y = 0xab; + uint16_t z = (x << 8) | y; + printf("%x\n", z); + return (z == 0x89ab) ? 0 : 1; +} + +int test1b(void) +{ + uint8_t x = 0x89; + uint8_t y = 0xab; + uint16_t z = (x * 256) | y; + printf("%x\n", z); + return (z == 0x89ab) ? 0 : 1; +} + +int test2(void) +{ + uint16_t x = 0x8900; + uint8_t y = 0xab; + uint16_t z = x | y; + printf("%x\n", z); + return (z == 0x89ab) ? 0 : 1; +} + +int test3(void) +{ + uint16_t x = 0x89; + uint8_t y = 0xab; + uint16_t z = (x << 8) | y; + printf("%x\n", z); + return (z == 0x89ab) ? 0 : 1; +} + +int test3b(void) +{ + uint16_t x = 0x89; + uint8_t y = 0xab; + uint16_t z = (x * 256) | y; + printf("%x\n", z); + return (z == 0x89ab) ? 0 : 1; +} + +int test4(void) +{ + uint8_t x = 0x89; + uint16_t y = 0xab; + uint16_t z = (x << 8) | y; + printf("%x\n", z); + return (z == 0x89ab) ? 0 : 1; +} + +int test4b(void) +{ + uint8_t x = 0x89; + uint16_t y = 0xab; + uint16_t z = (x * 256) | y; + printf("%x\n", z); + return (z == 0x89ab) ? 0 : 1; +} + +int main(void) +{ + res |= test1(); + res |= test2(); + res |= test3(); + res |= test4(); + res |= test1b(); + res |= test3b(); + res |= test4b(); + printf("res: %d\n", res); + return res; +} diff --git a/test/val/bug1397.c b/test/val/bug1397.c new file mode 100644 index 000000000..191093efa --- /dev/null +++ b/test/val/bug1397.c @@ -0,0 +1,54 @@ + +/* bug #1937 - Incorrect Behavior Related to OptBoolTrans */ + +#include <stdio.h> + +unsigned char c; +int *p; + +void f1(void) { + int i = 1; + int *pa = (int *)0xaaaa; + int *pb = (int *)0xbbbb; + + p = (i == 0) ? pa : pb; + c = 0x5a; +} + + +struct data_t { + unsigned char c; + int *p; +}; + +struct data_t data; + +void f2(void) { + int i = 1; + int *pa = (int *)0xcccc; + int *pb = (int *)0xdddd; + struct data_t *po = &data; + + po->p = (i == 0) ? pa : pb; + po->c = 0xa5; +} + +int ret = 0; + +int main(void) { + f1(); + if (c != 0x5a) { + ret++; + } + printf("c: %hhx\n", c); + printf("p: %p\n", p); + f2(); + if (data.c != 0xa5) { + ret++; + } + printf("c: %hhx\n", data.c); + printf("p: %p\n", data.p); + + printf("failures: %d\n", ret); + return ret; +} diff --git a/test/val/bug1408.c b/test/val/bug1408.c new file mode 100644 index 000000000..8ecc1be68 --- /dev/null +++ b/test/val/bug1408.c @@ -0,0 +1,41 @@ +/* Bug #1408: Signed char type comparisons with unsigned numeric constants */ + +#include <stdio.h> + +static int failures = 0; +static signed char x = -1; + +int main(void) +{ + if (!(x > -2u)) { + printf("x > -2u should be true\n"); + ++failures; + } + if (!(x > 0u)) { + printf("x > 0u should be true\n"); + ++failures; + } + if (!(x > 255u)) { + printf("x > 255u should be true\n"); + ++failures; + } + + if (!(-2u < x)) { + printf("-2u < x should be true\n"); + ++failures; + } + if (!(0u < x)) { + printf("0u < x should be true\n"); + ++failures; + } + if (!(255u < x)) { + printf("255u < x should be true\n"); + ++failures; + } + + if (failures != 0) { + printf("Failures: %d\n", failures); + } + + return failures; +} diff --git a/test/val/bug1431.c b/test/val/bug1431.c new file mode 100644 index 000000000..9eae3bdbd --- /dev/null +++ b/test/val/bug1431.c @@ -0,0 +1,33 @@ +/* +$ cl65 -Osir --codesize 180 -S -o main.s main.c +main.c(9): Internal compiler error: +Code generation messed up: StackPtr is -2, should be -4 + +Input: if (wcnt > btw) { + +$ git bisect bad +aa6fdf58b8a17b747090fb521f3d9106e0c56d1c is the first bad commit +commit aa6fdf58b8a17b747090fb521f3d9106e0c56d1c +Author: acqn <acqn163@outlook.com> +Date: Mon Feb 8 09:03:19 2021 +0800 + + Addresses in constant subtraction expressions now work. + Fixed codegen for cast type subtraction in constant expressions. +*/ + +unsigned long fptr = 0x40001; + +int main(void) +{ + unsigned int btw = 500; + unsigned int wcnt; + + wcnt = 512U - (fptr % 512U); + + if (wcnt > btw) { + wcnt = btw; + } + + return wcnt == 500 ? 0 : 1; +} + diff --git a/test/val/bug1437.c b/test/val/bug1437.c new file mode 100644 index 000000000..3424079e1 --- /dev/null +++ b/test/val/bug1437.c @@ -0,0 +1,35 @@ + +/* bug #1437 enum declaration in a struct/union is invisible in the scope where the struct/union is declared */ + +struct nodelist1 { + struct { + enum { DEAD1, LIVE1, ONCE1, TWICE1 } live1; + } s; +} firstnode1 = {ONCE1}; + +enum nodestate2 { DEAD2, LIVE2, ONCE2, TWICE2 } live2; + +union nodelist2 { + enum nodestate2 live2; +} firstnode2 = { {TWICE2} }; + +struct T { + int I; + int; + enum E { + I + }; +}; + +int failures = 0; + +int main (void) +{ + if (firstnode1.s.live1 != ONCE1) { + ++failures; + } + if (firstnode2.live2 != TWICE2) { + ++failures; + } + return failures; +} diff --git a/test/val/bug1438.c b/test/val/bug1438.c new file mode 100644 index 000000000..9c8f7a8ce --- /dev/null +++ b/test/val/bug1438.c @@ -0,0 +1,35 @@ + +/* Issue #1438 fix #1439 - crash in cc65, related to delayed post-counting + + this is an odd issue, the compile would crash *sometimes*, perhaps in one + of ten compilation runs. +*/ + +/* #define __fastcall__ */ + +unsigned short a[10] = {0,1,2,3,4,5,6,7,8,9}; + +unsigned short __fastcall__ func2(void) +{ + return 42; +} + +void func1(unsigned short *wp) +{ + *wp++ = func2(); +} + +int main(void) +{ + func1(&a[3]); + if (a[2] != 2) { + return 1; + } + if (a[3] != 42) { + return 1; + } + if (a[4] != 4) { + return 1; + } + return 0; +} diff --git a/test/val/bug1451.c b/test/val/bug1451.c new file mode 100644 index 000000000..f9cca2561 --- /dev/null +++ b/test/val/bug1451.c @@ -0,0 +1,39 @@ +/* Bug #1451 - local struct field access via the address of the struct */ + +#include <stdio.h> + +typedef struct { + int a; + int b; +} S; + +int failures = 0; + +int main(void) +{ + S a = {2, 5}; + S b = {1, 4}; + S m[1] = {{6, 3}}; + S *p = &a; + + (&a)->a += b.a; + p->b += b.b; + m->a += b.a; + + if ((&a)->a != 3) { + ++failures; + printf("Expected 3, got %d\n", (&a)->a); + } + + if (p->b != 9) { + ++failures; + printf("Expected 9, got %d\n", p->b); + } + + if (m->a != 7) { + ++failures; + printf("Expected 7, got %d\n", m->a); + } + + return failures; +} diff --git a/test/val/bug1462-2.c b/test/val/bug1462-2.c new file mode 100644 index 000000000..df94cfc59 --- /dev/null +++ b/test/val/bug1462-2.c @@ -0,0 +1,51 @@ + +/* issue #1462 - Bit-fields are still broken */ +/* even the = operation is buggy in certain ways */ + +#include <stdio.h> + +typedef struct { + signed int a : 3; + signed int b : 3; + signed int c : 3; +} T; + +int failures = 0; + +T *f(T *t) +{ + t->a = 0; + t->c = 0; + return t; +} + +void test(void) +{ + T a = { 7, 0, 7 }; + T *p = &a; + + a.b = f(p)->a; + + if (a.a != 0) { + ++failures; + } + printf("%d\n", a.a); + + if (p->b != 0) { + ++failures; + } + printf("%d\n", p->b); + + if ((&a)->c != 0) { + ++failures; + } + printf("%d\n", (&a)->c); + + printf("Failures: %d\n", failures); +} + +int main(void) +{ + test(); + return failures; +} diff --git a/test/val/bug1462-3.c b/test/val/bug1462-3.c new file mode 100644 index 000000000..12559b94f --- /dev/null +++ b/test/val/bug1462-3.c @@ -0,0 +1,95 @@ + +/* issue #1462 - Bit-fields are still broken */ +/* More tests on "op= expression result value" that a naive fix might fail with */ + +#include <stdio.h> + +typedef struct { + signed int a : 3; + unsigned int b : 3; + signed int c : 3; + unsigned int d : 3; +} T1; + +typedef struct { + signed int a : 3; + signed int b : 3; + signed int c : 3; + signed int d : 3; +} T2; + + +int failures1 = 0; +int failures2 = 0; + +void test1(void) +{ + T1 a = { 3, 3, 3, 3 }; + int i; + + i = a.a -= a.b + a.c; + if (i != -3 || a.a != -3) { + ++failures1; + } + printf("i = %d, a.a = %d\n", i, a.a); + + a.b = i = a.b / -1; + if (i != -3 || a.b != 5) { + ++failures1; + } + printf("i = %d, a.b = %d\n", i, a.b); + + i = a.c = 0; + if (i != 0 || a.c != 0) { + ++failures1; + } + printf("i = %d, a.c = %d\n", i, a.c); + + i = a.d /= -1; + if (i != 5 || a.d != 5) { + ++failures1; + } + printf("i = %d, a.d = %d\n", i, a.d); + + printf("Failures: %d\n", failures1); +} + +void test2(void) +{ + T2 b = { 3, 3, 4, 4 }; + int i; + + i = b.a++; + if (i != 3 || b.a != -4) { + ++failures2; + } + printf("i = %d, b.a = %d\n", i, b.a); + + i = ++b.b; + if (i != -4 || b.b != -4) { + ++failures2; + } + printf("i = %d, b.b = %d\n", i, b.b); + + i = b.c--; + if (i != -4 || b.c != 3) { + ++failures2; + } + printf("i = %d, b.c = %d\n", i, b.c); + + i = --b.d; + if (i != 3 || b.d != 3) { + ++failures2; + } + printf("i = %d, b.d = %d\n", i, b.d); + + printf("Failures: %d\n", failures2); +} + +int main(void) +{ + test1(); + test2(); + return failures1 + failures2; +} + diff --git a/test/val/bug1462-4.c b/test/val/bug1462-4.c new file mode 100644 index 000000000..f811ddbd6 --- /dev/null +++ b/test/val/bug1462-4.c @@ -0,0 +1,85 @@ + +/* issue #1462 - Bit-fields are still broken */ +/* More tests on "op= expression result value" that a naive fix might fail with */ + +#include <stdio.h> +#include <limits.h> + +#define SMALL_WIDTH 4 +#define LARGE_WIDTH (CHAR_BIT * sizeof (unsigned int)) + +typedef struct { + unsigned int a : SMALL_WIDTH; + unsigned int b : SMALL_WIDTH; + unsigned int c : SMALL_WIDTH; + unsigned int d : SMALL_WIDTH; +} T1; + +typedef struct { + unsigned int a : LARGE_WIDTH; + unsigned int b : LARGE_WIDTH; + unsigned int c : LARGE_WIDTH; + unsigned int d : LARGE_WIDTH; +} T2; + + +int failures1 = 0; +int failures2 = 0; + +void test1(void) +{ + T1 a = { 0, 0, 0, 0 }; + + printf("\nunsigned int : %d\n", SMALL_WIDTH); + if (!(~a.a < 0)) { + ++failures1; + } + printf("~a.a < 0 : %d\n", ~a.a < 0); + if (!(0 > ~a.b)) { + ++failures1; + } + printf("0 > ~a.b : %d\n",0 > ~a.b); + if (!(a.c > -1)) { + ++failures1; + } + printf("a.c > -1 : %d\n", a.c > -1); + if (!(-1 < a.d)) { + ++failures1; + } + printf("-1 < a.d : %d\n", -1 < a.d); + + printf("Failures: %d\n", failures1); +} + +void test2(void) +{ + T1 b = { 0, 0, 0, 0 }; + + printf("\nunsigned int : %d\n", LARGE_WIDTH); + if (!(~b.a < 0)) { + ++failures2; + } + printf("~b.a < 0 : %d\n", ~b.a < 0); + if (!(0 > ~b.b)) { + ++failures2; + } + printf("0 > ~b.b : %d\n", 0 > ~b.b); + if (!(b.c > -1)) { + ++failures2; + } + printf("b.c > -1 : %d\n", b.c > -1); + if (!(-1 < b.d)) { + ++failures2; + } + printf("-1 < b.d : %d\n", -1 < b.d); + + printf("Failures: %d\n", failures2); +} + +int main(void) +{ + test1(); + test2(); + return failures1 + failures2; +} + diff --git a/test/val/bug1462.c b/test/val/bug1462.c new file mode 100644 index 000000000..aec990cde --- /dev/null +++ b/test/val/bug1462.c @@ -0,0 +1,67 @@ + +/* issue #1462 - Bit-fields are still broken */ + +#include <stdio.h> + +typedef struct { + signed int a : 3; + signed int b : 3; + signed int c : 3; +} T; + +int failures = 0; + +void test() +{ + T a = {2, 5, -1}; + T b = {1, 4, -1}; + T m[1] = {{6, 3, -1}}; + T *p = &a; + + a.c += b.a; + p->c += b.b; + m->c += b.c; + + if (a.c != -4) { + ++failures; + } + printf("%d\n", a.c); + + if (p->c != -4) { + ++failures; + } + printf("%d\n", p->c); + + if (m->c != -2) { + ++failures; + } + printf("%d\n", m->c); + + ++a.a; + p->b++; + m->c--; + + if (a.a != 3) { + ++failures; + } + printf("%d\n", a.a); + + if (p->b != -2) { + ++failures; + } + printf("%d\n", p->b); + + if (m->c != -3) { + ++failures; + } + printf("%d\n", m->c); + + printf("Failures: %d\n", failures); +} + +int main(void) +{ + test(); + return failures; +} + diff --git a/test/val/bug1504.c b/test/val/bug1504.c new file mode 100644 index 000000000..bd93c7387 --- /dev/null +++ b/test/val/bug1504.c @@ -0,0 +1,13 @@ + +/* bug #1504 - Some compilation failures */ + +#include <stdio.h> + +int main(void) +{ + int i = 0, *p = &i; + switch (i) case 0: case 1: i = 21; /* Should be OK but fails */ + p++[0] += 21; /* Should be OK but fails */ + printf("%d\n", i); + return i != 42; +} diff --git a/test/val/bug1552.c b/test/val/bug1552.c new file mode 100644 index 000000000..92ad902bd --- /dev/null +++ b/test/val/bug1552.c @@ -0,0 +1,42 @@ + +/* + bug #1552 - crash in fuzix xec.c + + cc65 -t none -O bug1552.c +*/ + +#include <stdio.h> + +typedef struct trenod *TREPTR; +typedef struct whnod *WHPTR; + +struct trenod { + int tretyp; +}; + +struct whnod { + int whtyp; + TREPTR whtre; +}; + +int execute(TREPTR argt, int execflg, int *pf1, int *pf2) +{ + register TREPTR t; + int type; + switch (type) + { + case 6: + { + while ((execute(((WHPTR) t)->whtre, 0, NULL, NULL) == 0) == (type == 5)) { + + } + break; + } + } + return 0; +} + +int main(void) +{ + return execute((TREPTR)42, 2, (int *)3, (int *)4); +} diff --git a/test/val/bug1562.c b/test/val/bug1562.c new file mode 100644 index 000000000..7e6c1751e --- /dev/null +++ b/test/val/bug1562.c @@ -0,0 +1,30 @@ + +/* bug 1562: cc65 generates incorrect code for logical expression with -O */ + +#include <stdio.h> +#include <string.h> + +int failures = 0; + +char input[256]; + +#define DEBUGTRUE(x) printf("%s=%d\n", #x, (x)); failures += (x) ? 0 : 1 + +#define DEBUGFALSE(x) printf("%s=%d\n", #x, (x)); failures += (x) ? 1 : 0 + +int main(void) { + char* r; + strcpy(input, "\"XYZ\""); + r = input+4; + DEBUGFALSE(*r != '"'); // = false + DEBUGTRUE(*r == '"'); // = true + DEBUGFALSE(*(r+1) == '"'); // = false + // Next answer should be false because + // (false || true && false) is false, but it is true with -O. + DEBUGFALSE(*r != '"' || *r == '"' && *(r+1) == '"'); + // Adding parens fixes it even with -O. + DEBUGFALSE(*r != '"' || (*r == '"' && *(r+1) == '"')); + + printf("failures: %d\n", failures); + return failures; +} diff --git a/test/val/bug1652-optimizer.c b/test/val/bug1652-optimizer.c new file mode 100644 index 000000000..7926ef770 --- /dev/null +++ b/test/val/bug1652-optimizer.c @@ -0,0 +1,122 @@ + +/* #1652 - Regression in code optimization */ + +#include <stdlib.h> + +/* better before pr#1231 + +before: + + jsr pusha + ldy #$01 + ldx #$00 + lda (sp),y + beq L0005 + lda (sp,x) + beq L0005 + txa + jmp incsp2 ; <-- +L0005: tya + jmp incsp2 + +after: + + jsr pusha + ldy #$01 + ldx #$00 + lda (sp),y + beq L0004 + lda (sp,x) + beq L0004 + txa + jmp L0001 ; <-- +L0004: tya +L0001: jmp incsp2 + +*/ + +int foo(unsigned char bar, unsigned char baz) +{ + return (bar == 0 || baz == 0); +} + +/* worse before pr#1231 + +before: +; +; y = 1; +; + lda #$01 + sta _y +; +; (*tablePtr)[y][x] = 83; +; + ldx #$00 + lda _y + jsr aslax2 + clc + adc _tablePtr + pha + txa + adc _tablePtr+1 + tax + pla + clc + adc _x + bcc L0019 + inx +L0019: + sta ptr1 + stx ptr1+1 + lda #$53 + ldy #$00 + sta (ptr1),y + +after: + +; +; y = 1; +; + lda #$01 + sta _y +; +; (*tablePtr)[y][x] = 83; +; + ldx #$00 + lda _y + jsr aslax2 + clc + adc _tablePtr + sta ptr1 + txa + adc _tablePtr+1 + sta ptr1+1 + ldy _x + lda #$53 + sta (ptr1),y +*/ + +typedef unsigned char array_t[4][4]; + +static array_t table = { + {12, 13, 14, 15}, + { 8, 9, 10, 11}, + { 4, 5, 6, 7}, + { 0, 1, 2, 3} +}; +static array_t *tablePtr = &table; + +static unsigned char y = 0, x; + +void pointed_array(void) +{ + x = 3; + y = 1; + (*tablePtr)[y][x] = 83; +} + +int main(void) +{ + pointed_array(); + return foo(2, 0) ? EXIT_SUCCESS : EXIT_FAILURE; +} diff --git a/test/val/bug1675-ub.c b/test/val/bug1675-ub.c new file mode 100644 index 000000000..72e372308 --- /dev/null +++ b/test/val/bug1675-ub.c @@ -0,0 +1,60 @@ +/* #1675 - Some UB cases of bit-shifts */ + +#include <stdio.h> + +int unexpected = 0; + +void Test_UB(void) +{ + { + /* UB per standard, lhs expected in cc65: (int)-32768 */ + if (!((0x4000 << 1) < 0)) { + ++unexpected; + printf("Expected: (0x4000 << 1) < 0, got lhs: %ld\n", (long)(0x4000 << 1)); + } + } + + { + /* UB per standard, lhs expected in cc65: (long)-2147483648L */ + if (!((0x40000000 << 1) < 0)) { + ++unexpected; + printf("Expected: (0x40000000 << 1) < 0, got lhs: %ld\n", (long)(0x40000000 << 1)); + } + } + + { + /* UB per standard, lhs expected in cc65: (int)-32768 */ + if (!(((unsigned char)0x80 << 8) < 0)) { + ++unexpected; + printf("Expected: ((unsigned char)0x80 << 8) < 0, got lhs: %ld\n", (long)((unsigned char)0x80 << 8)); + } + } + + { + /* UB per standard, lhs expected in cc65: (int)-32768 */ + if (!(((short)0x4000L << 1) < 0)) { + ++unexpected; + printf("Expected: ((short)0x4000L << 1) < 0, got lhs: %ld\n", (long)((short)0x4000L << 1)); + } + } + + { + const signed short x = 0x4000; + /* UB per standard, lhs expected in cc65: (int)-32768 */ + if (!((x << 1) < 0)) { + ++unexpected; + printf("Expected: (x << 1) < 0, got lhs: %ld\n", (long)(x << 1)); + } + } +} + +int main(void) +{ + Test_UB(); + + if (unexpected != 0) { + printf("Unexpected: %d\n", unexpected); + } + + return unexpected; +} diff --git a/test/val/bug1675.c b/test/val/bug1675.c new file mode 100644 index 000000000..ee24425df --- /dev/null +++ b/test/val/bug1675.c @@ -0,0 +1,101 @@ +/* #1675 - Some corner cases of bit-shifts */ + +#include <stdio.h> + +int failures = 0; + +void Test_Defined(void) +{ + { + /* Well-defined per standard, lhs expected in cc65: (int)-256 */ + if (!(((signed char)0x80 << 1) < 0)) { + ++failures; + printf("Expected: ((signed char)0x80 << 1) < 0, got lhs: %ld\n", (long)((signed char)0x80 << 1)); + } + } + + { + /* Implementation-defined per standard, lhs expected in cc65: (int)-128 */ + if (!(((signed char)0x80 >> 1 << 1) < 0)) { + ++failures; + printf("Expected: ((signed char)0x80 >> 1 << 1) < 0, got lhs: %ld\n", (long)((signed char)0x80 >> 1 << 1)); + } + } + + { + int x = 0; + /* Well-defined per standard, lhs expected in cc65: (int)1 */ + if (!((1 << (x++, 0)) == 1)) { + ++failures; + x = 0; + printf("Expected: (1 << (x++, 0)) == 1, got lhs: %ld\n", (long)(1 << (x++, 0))); + } + + /* Well-defined per standard, lhs expected in cc65: (int)1 */ + if (!(x == 1)) { + ++failures; + printf("Expected: (1 << (x++, 0)) == 1 && x == 1, got x: %d\n", x); + } + } + + { + int x = 0, y = 0x100; + /* Well-defined per standard, lhs expected in cc65: (int)128 */ + if (!((y >> (x++, 0) >> 1) == 0x80)) { + ++failures; + x = 0; + printf("Expected: (y >> (x++, 0) >> 1) == 0x80, got lhs: %ld\n", (long)(y >> (x++, 0) >> 1)); + } + + /* Well-defined per standard, lhs expected in cc65: (int)1 */ + if (!(x == 1)) { + ++failures; + printf("Expected: (y >> (x++, 0) >> 1) == 0x80 && x == 1, got x: %d\n", x); + } + } + + { + int x = 0, y = 0x100; + /* Well-defined per standard, lhs expected in cc65: (int)1 */ + if (!((y >> (x++, 8)) == 1)) { + ++failures; + x = 0; + printf("Expected: (y >> (x++, 8)) == 1, got lhs: %ld\n", (long)(y >> (x++, 8))); + } + + /* Well-defined per standard, lhs expected in cc65: (int)1 */ + if (!(x == 1)) { + ++failures; + printf("Expected: (y >> (x++, 8)) == 1 && x == 1, got x: %d\n", x); + } + } + + { + const signed char x = 0x80; + /* Well-defined per standard, lhs expected in cc65: (int)-256 */ + if (!((x << 1) < 0)) { + ++failures; + printf("Expected: (x << 1) < 0, got lhs: %ld\n", (long)(x << 1)); + } + } + + { + const signed char x = 0x40; + /* Well-defined per standard, lhs expected in cc65: (int)128 */ + if (!((x << 1) >= 0)) { + ++failures; + printf("Expected: (x << 1) >= 0, got lhs: %ld\n", (long)(x << 1)); + } + } +} + +int main(void) +{ + Test_Defined(); + + if (failures != 0) { + printf("Failures: %d\n", failures); + } + + return failures; +} diff --git a/test/val/bug1690.c b/test/val/bug1690.c new file mode 100644 index 000000000..499dc6b35 --- /dev/null +++ b/test/val/bug1690.c @@ -0,0 +1,30 @@ +/* OptCmp1 messed up with labels */ + +#include <stdio.h> + +static int failures = 0; +static unsigned int z = 0xFF23; + +int main(void) +{ + register unsigned int x = 0x200; + register unsigned int y = 0; + + do { + ++y; + } while (--x); + if (y != 0x200) { + printf("y should be 0x200, not 0x%X.\n", y); + ++failures;; + } + + if ((z -= 0x23)) { + /* Passed -- non-zero z looks like non-zero. */ + } else { + /* Failed -- only the low byte of z was tested. */ + printf("Test thinks non-zero z is zero.\n"); + ++failures; + } + + return failures; +} diff --git a/test/val/bug1696.c b/test/val/bug1696.c new file mode 100644 index 000000000..72cf9cc7e --- /dev/null +++ b/test/val/bug1696.c @@ -0,0 +1,44 @@ +/* + Copyright 2022 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests of unsigned short/unsigned int vs signed long comparisons; + see https://github.com/cc65/cc65/issues/1696 +*/ + +#include <stdio.h> + +static unsigned char failures = 0; + +int main(void) +{ + unsigned int x = 65535; + unsigned short y = 65535; + if (!(x > 1L)) { + printf("x = %ld but x > 1L failed\n", (long)x); + ++failures; + } + if (!(y == 65535L)) { + printf("y = %ld but y == 65535L failed\n", (long)y); + ++failures; + } + printf("failures: %u\n", failures); + return failures; +} diff --git a/test/val/bug170.c b/test/val/bug170.c new file mode 100644 index 000000000..ac54d54d8 --- /dev/null +++ b/test/val/bug170.c @@ -0,0 +1,40 @@ +/* bug #170 - Wrong implicit conversion of integers */ + +#include <stdlib.h> +#include <stdio.h> +#include <stdint.h> + +int main(void) +{ + uint8_t c = 2; + uint32_t u = 2; + int16_t a = -2; + int32_t l = -2; + + /* Generated code should use tosmulax but uses tosumulax */ + int16_t r = c * a; + /* Generated code should use tosmuleax but uses tosumuleax */ + int32_t lr = u * l; + + int32_t n = -95; + uint16_t d = 3; + int16_t r1 = n / d; // produces 21813 instead of -31 + + int16_t r2 = n / (int32_t) d; // workaround + + printf("r: %d (-4)\n", r); +#ifdef REFERENCE + printf("lr: %d (-4)\n", lr); +#else + printf("lr: %ld (-4)\n", lr); +#endif + printf("r1: %d (-31)\n", r1); + printf("r2: %d (-31)\n", r2); + + if (r != -4) { return EXIT_FAILURE; } + if (lr != -4) { return EXIT_FAILURE; } + if (r1 != -31) { return EXIT_FAILURE; } + if (r2 != -31) { return EXIT_FAILURE; } + + return EXIT_SUCCESS; +} diff --git a/test/val/bug250.c b/test/val/bug250.c new file mode 100644 index 000000000..60f3c633d --- /dev/null +++ b/test/val/bug250.c @@ -0,0 +1,13 @@ +/* bug #250 - Array size compile-time optimization stops halfway */ + +#include <stdlib.h> + +#define LZO_MAX(a,b) ((a) >= (b) ? (a) : (b)) +unsigned char c[2*4]; +unsigned char b[2*LZO_MAX(8,sizeof(int))]; // this will not compile + +int main(void) +{ + /* FIXME: add some runtime check */ + return EXIT_SUCCESS; +} diff --git a/test/val/bug263.c b/test/val/bug263.c new file mode 100644 index 000000000..6f3f8f57e --- /dev/null +++ b/test/val/bug263.c @@ -0,0 +1,49 @@ + +/* issue #263 - cc65 miscompiles w/ a static variable and -O */ + +#include <stdint.h> +#include <stdio.h> + +int failures = 0; + +void __fastcall__ set_vram_update(unsigned char *ptr) +{ + printf("set_vram_update: %04x\n", ptr); + if (ptr != NULL) { + failures++; + } +} + +unsigned char __fastcall__ ppu_wait_nmi(void) +{ + // we need to make sure somehow the akku is not zero before the break + return 0x1234; +} + +unsigned char ctrl, ret, i; + +unsigned char gameloop (void) +{ + ctrl = 0; + ret = 0; + while(1) { + if (ctrl & 1) { + while (--i) { + ppu_wait_nmi(); + } + break; + } + ctrl = 1; + } + // This will pass garbage, not NULL. + set_vram_update(NULL); + return ret; +} + +int main(void) +{ + gameloop(); + printf("failures: %d\n", failures); + return failures; +} + diff --git a/test/val/bug327.c b/test/val/bug327.c new file mode 100644 index 000000000..f6a79962b --- /dev/null +++ b/test/val/bug327.c @@ -0,0 +1,34 @@ +/* bug #327 - Promoting u8 to s16 gives wrong result */ + +#include <stdio.h> +#include <stdint.h> + +static const uint8_t arr[2] = { + 0, + 255 +}; + +static int16_t get16() { + return -arr[1]; +} + +static int16_t get16_2() { + return -(int16_t) arr[1]; +} + +char res = 0; + +int main() { + + printf("Value %d, should be -255\n", get16()); + printf("Value %d, should be -255\n", get16_2()); + + if (get16() != -255) { + res++; + } + if (get16_2() != -255) { + res++; + } + + return res; +} diff --git a/test/val/bug367.c b/test/val/bug367.c new file mode 100644 index 000000000..affe6b88e --- /dev/null +++ b/test/val/bug367.c @@ -0,0 +1,12 @@ +#include "unittest.h" + +TEST +{ + unsigned int y=192; + unsigned int d=y&0xFFF8; + unsigned int e=d*32+d*8; + unsigned int f=d*40; + + ASSERT_AreEqual(f, e, "%u", "Multiplication results differ (should be 7680)!"); +} +ENDTEST diff --git a/test/val/bug735.c b/test/val/bug735.c new file mode 100644 index 000000000..7bcc8d9cc --- /dev/null +++ b/test/val/bug735.c @@ -0,0 +1,17 @@ +#include <stdio.h> + +unsigned char failures = 0; + +int main(void) +{ + int i; + + i = 0; + if ((i > 1) && (i < 3)) { + failures++; + } + + printf("failures: %u\n", failures); + return failures; +} + diff --git a/test/val/bug830.c b/test/val/bug830.c new file mode 100644 index 000000000..05080e263 --- /dev/null +++ b/test/val/bug830.c @@ -0,0 +1,13 @@ +#include "unittest.h" + +char test[1]; +char *dst = &test[0]; + +TEST +{ + char src = 0; + *dst = (src == 0) ? 42 : src; + + ASSERT_AreEqual(42, *dst, "%u", "Incorrect ternary expression evaluation!"); +} +ENDTEST diff --git a/test/val/bug895.c b/test/val/bug895.c new file mode 100644 index 000000000..c4892d7b1 --- /dev/null +++ b/test/val/bug895.c @@ -0,0 +1,106 @@ +/** This test is related to GitHub issue 895 + ** https://github.com/cc65/cc65/issues/895 + ** + ** The OptCmp8 optimization attempted to eliminate an unnecessary + ** comparison and branch when the operands of the comparison are + ** known to be constant at compile time. + ** + ** For 8-bit types it worked well, but for 16-bit types it failed + ** to generate correct code for some cases. The bug manifest as a + ** branch on an uninitialized carry flag. + */ + +#include "unittest.h" + +signed char sca, scb; +signed int sia, sib; +signed long sla, slb; + +unsigned char uca, ucb; +unsigned int uia, uib; +unsigned long ula, ulb; + +#define OPTCMP8TEST_SINGLE(num,cmpop,asmprefix,vara,varb,b0,b1,a0,a1,typename,name) \ + typename name ## _ ## num ## (void) { \ + varb = b0; \ + asm( asmprefix ); \ + vara = a0; \ + if (vara cmpop a1) varb = b1; \ + return varb; \ + } + +#define OPTCMP8TEST_VERIFY(num,b,desc,printterm,name) \ + ASSERT_AreEqual(name ## _ ## num ##(),b,printterm,"Incorrect optimization of const comparison (" #name "_" #num ": " desc ")."); + +/* Generates a set of comparison tests for one type and set of test values. +** name = a name for this test (no spaces) +** typename = the type used +** b0 = result if comparison is false +** b1 = result if comparison is true +** a0 = a low value to use for the comparison tests (a0 < a1) +** a1 = a high value to use for the comparison tests (a0 < a1) +** vara = temporary variable of the type to be examined +** varb = temporary variable of the type to be examined +** printterm = printf term to display the variable type +*/ +#define OPTCMP8TEST(name,typename,b0,b1,a0,a1,vara,varb,printterm) \ + OPTCMP8TEST_SINGLE(1,<,"clc",vara,varb,b0,b1,a0,a1,typename,name); \ + OPTCMP8TEST_SINGLE(2,<,"sec",vara,varb,b0,b1,a0,a1,typename,name); \ + OPTCMP8TEST_SINGLE(3,<,"clc",vara,varb,b0,b1,a1,a0,typename,name); \ + OPTCMP8TEST_SINGLE(4,<,"sec",vara,varb,b0,b1,a1,a0,typename,name); \ + OPTCMP8TEST_SINGLE(5,>,"clc",vara,varb,b0,b1,a0,a1,typename,name); \ + OPTCMP8TEST_SINGLE(6,>,"sec",vara,varb,b0,b1,a0,a1,typename,name); \ + OPTCMP8TEST_SINGLE(7,>,"clc",vara,varb,b0,b1,a1,a0,typename,name); \ + OPTCMP8TEST_SINGLE(8,>,"sec",vara,varb,b0,b1,a1,a0,typename,name); \ + OPTCMP8TEST_SINGLE(9,<=,"clc",vara,varb,b0,b1,a0,a1,typename,name); \ + OPTCMP8TEST_SINGLE(10,<=,"sec",vara,varb,b0,b1,a0,a1,typename,name); \ + OPTCMP8TEST_SINGLE(11,<=,"clc",vara,varb,b0,b1,a1,a0,typename,name); \ + OPTCMP8TEST_SINGLE(12,<=,"sec",vara,varb,b0,b1,a1,a0,typename,name); \ + OPTCMP8TEST_SINGLE(13,>=,"clc",vara,varb,b0,b1,a0,a1,typename,name); \ + OPTCMP8TEST_SINGLE(14,>=,"sec",vara,varb,b0,b1,a0,a1,typename,name); \ + OPTCMP8TEST_SINGLE(15,>=,"clc",vara,varb,b0,b1,a1,a0,typename,name); \ + OPTCMP8TEST_SINGLE(16,>=,"sec",vara,varb,b0,b1,a1,a0,typename,name); \ + OPTCMP8TEST_SINGLE(17,==,"nop",vara,varb,b0,b1,a0,a1,typename,name); \ + OPTCMP8TEST_SINGLE(18,==,"nop",vara,varb,b0,b1,a1,a1,typename,name); \ + OPTCMP8TEST_SINGLE(19,!=,"nop",vara,varb,b0,b1,a0,a1,typename,name); \ + OPTCMP8TEST_SINGLE(20,!=,"nop",vara,varb,b0,b1,a1,a1,typename,name); \ + void name ## _ ## test(void) { \ + OPTCMP8TEST_VERIFY(1,b1,"low < high, clc",printterm,name); \ + OPTCMP8TEST_VERIFY(2,b1,"low < high, sec",printterm,name); \ + OPTCMP8TEST_VERIFY(3,b0,"high < low, clc",printterm,name); \ + OPTCMP8TEST_VERIFY(4,b0,"high < low, sec",printterm,name); \ + OPTCMP8TEST_VERIFY(5,b0,"low > high, clc",printterm,name); \ + OPTCMP8TEST_VERIFY(6,b0,"low > high, sec",printterm,name); \ + OPTCMP8TEST_VERIFY(7,b1,"high > low, clc",printterm,name); \ + OPTCMP8TEST_VERIFY(8,b1,"high > low, sec",printterm,name); \ + OPTCMP8TEST_VERIFY(9,b1,"low <= high, clc",printterm,name); \ + OPTCMP8TEST_VERIFY(10,b1,"low <= high, sec",printterm,name); \ + OPTCMP8TEST_VERIFY(11,b0,"high <= low, clc",printterm,name); \ + OPTCMP8TEST_VERIFY(12,b0,"high <= low, sec",printterm,name); \ + OPTCMP8TEST_VERIFY(13,b0,"low >= high, clc",printterm,name); \ + OPTCMP8TEST_VERIFY(14,b0,"low >= high, sec",printterm,name); \ + OPTCMP8TEST_VERIFY(15,b1,"high >= low, clc",printterm,name); \ + OPTCMP8TEST_VERIFY(16,b1,"high >= low, sec",printterm,name); \ + OPTCMP8TEST_VERIFY(17,b0,"low == high, nop",printterm,name); \ + OPTCMP8TEST_VERIFY(18,b1,"high == high, nop",printterm,name); \ + OPTCMP8TEST_VERIFY(19,b1,"low != high, nop",printterm,name); \ + OPTCMP8TEST_VERIFY(20,b0,"high != high, nop",printterm,name); \ + } + +OPTCMP8TEST(signed_char,signed char,-20,5,60,100,sca,scb,"%d"); +OPTCMP8TEST(unsigned_char,unsigned char,20,5,60,100,uca,ucb,"%u"); +OPTCMP8TEST(signed_int,signed int,-2000,50,600,1000,sia,sib,"%d"); +OPTCMP8TEST(unsigned_int,unsigned int,2000,50,600,1000,uia,uib,"%u"); +OPTCMP8TEST(signed_long,signed long,-200000L,5000L,60000L,100000L,sla,slb,"%d"); +OPTCMP8TEST(unsigned_long,unsigned long,200000UL,5000UL,60000UL,100000UL,ula,ulb,"%u"); + +TEST +{ + signed_char_test(); + unsigned_char_test(); + signed_int_test(); + unsigned_int_test(); + signed_long_test(); + unsigned_long_test(); +} +ENDTEST diff --git a/test/val/bug897.c b/test/val/bug897.c new file mode 100644 index 000000000..eaf751441 --- /dev/null +++ b/test/val/bug897.c @@ -0,0 +1,52 @@ + +/* issue #897 - __asm__()-referenced code-labels are generated for only branches and jumps */ + +#include <stdlib.h> +#include <stdio.h> + +static unsigned char *srcptr, *dstptr; + +#define COPY_LEN 16 + +void test(void) +{ + asm("lda %v", srcptr); + asm("sta %g+1", s2b_copy_from); + asm("lda %v+1", srcptr); + asm("sta %g+2", s2b_copy_from); + + asm("lda %v", dstptr); + asm("sta %g+1", s2b_copy_to); + asm("lda %v+1", dstptr); + asm("sta %g+2", s2b_copy_to); + + asm("ldy #%b", COPY_LEN-1); +s2b_copy_from: + asm("lda $FFFF,y"); +s2b_copy_to: + asm("sta $FFFF,y"); + asm("dey"); + asm("bpl %g", s2b_copy_from); +} + +unsigned char src[16] = "0123456789abcdef"; +unsigned char dest[16]; + +int failures = 0; + +unsigned char i; + +int main(void) +{ + srcptr = src; + dstptr = dest; + test(); + for (i = 0; i < COPY_LEN; i++) { + printf("%d %02x %02x\n", i, src[i], dest[i]); + if (src[i] != dest[i]) { + failures++; + } + } + printf("failures: %d\n", failures); + return failures; +} diff --git a/test/val/bug975.c b/test/val/bug975.c new file mode 100644 index 000000000..458524a5a --- /dev/null +++ b/test/val/bug975.c @@ -0,0 +1,18 @@ +/* bug #975 - Forward array reference fails to compile */ + +#include <stdlib.h> + +// this works +static const unsigned char array2[3]; +int test2(void) { + return array2[0]; +} +static const unsigned char array2[] = { 0, 1, 2 }; + +// this should work, but does not compile +static const unsigned char array[]; +int main() { + if (test2() != 0) return EXIT_FAILURE; + return array[0]; +} +static const unsigned char array[] = { 0, 1, 2 }; diff --git a/test/val/call1.c b/test/val/call1.c index c7ac920b3..d09ae0dec 100644 --- a/test/val/call1.c +++ b/test/val/call1.c @@ -70,7 +70,7 @@ call5 (unsigned int k) return (k); } -unsigned char +unsigned char call6a(unsigned char uc) { if(uc>uchar1) @@ -85,7 +85,7 @@ call6(unsigned char uc) return(call6a(uc)); } -unsigned int +unsigned int call7a(unsigned int ui) { if(ui) diff --git a/test/val/casttochar.c b/test/val/casttochar.c old mode 100755 new mode 100644 diff --git a/test/val/cc65091020.c b/test/val/cc65091020.c index d23b70a06..8f6b11761 100644 --- a/test/val/cc65091020.c +++ b/test/val/cc65091020.c @@ -24,4 +24,4 @@ int main() { return 0; } -/* Assert fails. (SVN rev 4381) */ \ No newline at end of file +/* Assert fails. (SVN rev 4381) */ diff --git a/test/val/cc65141002.c b/test/val/cc65141002.c old mode 100755 new mode 100644 diff --git a/test/misc/cc65141011.c b/test/val/cc65141011.c old mode 100755 new mode 100644 similarity index 100% rename from test/misc/cc65141011.c rename to test/val/cc65141011.c diff --git a/test/val/cc65141022.c b/test/val/cc65141022.c old mode 100755 new mode 100644 diff --git a/test/val/cc65150311.c b/test/val/cc65150311.c index cd644f491..10676d679 100644 --- a/test/val/cc65150311.c +++ b/test/val/cc65150311.c @@ -20,7 +20,7 @@ int main(void) { n = (p == &func); n = (p == func); -/* the following are not valid C and should go into seperate tests that MUST fail */ +/* the following are not valid C and should go into separate tests that MUST fail */ /* ++p; n = (p > &func); diff --git a/test/val/char-bitfield.c b/test/val/char-bitfield.c new file mode 100644 index 000000000..0d611f127 --- /dev/null +++ b/test/val/char-bitfield.c @@ -0,0 +1,280 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests of char bit-fields; see https://github.com/cc65/cc65/issues/1047 +*/ + +#include <stdio.h> + +static unsigned char failures = 0; + +static struct four_bits { + unsigned char x : 4; +} fb = {1}; + +static void test_four_bits (void) +{ + if (sizeof (struct four_bits) != 1) { + printf ("Got sizeof (struct four_bits) = %zu, expected 1.\n", + sizeof (struct four_bits)); + failures++; + } + + if (fb.x != 1) { + printf ("Got fb.x = %u, expected 1.\n", fb.x); + failures++; + } + + fb.x = 3; + + if (fb.x != 3) { + printf ("Got fb.x = %u, expected 3.\n", fb.x); + failures++; + } +} + +static struct four_bits_signed { + signed char x : 4; +} fbs = {1}; + +static void test_four_bits_signed (void) +{ + if (sizeof (struct four_bits_signed) != 1) { + printf ("Got sizeof (struct four_bits_signed) = %zu, expected 1.\n", + sizeof (struct four_bits)); + failures++; + } + + if (fbs.x != 1) { + printf ("Got fbs.x = %d, expected 1.\n", fbs.x); + failures++; + } + + fbs.x = 3; + + if (fbs.x != 3) { + printf ("Got fbs.x = %d, expected 3.\n", fbs.x); + failures++; + } +} + +static struct four_bits_plain { + char x : 4; +} fbp = {1}; + +static void test_four_bits_plain (void) +{ + if (sizeof (struct four_bits_plain) != 1) { + printf ("Got sizeof (struct four_bits_plain) = %zu, expected 1.\n", + sizeof (struct four_bits)); + failures++; + } + + if (fbp.x != 1) { + printf ("Got fbp.x = %d, expected 1.\n", fbp.x); + failures++; + } + + fbp.x = 3; + + if (fbp.x != 3) { + printf ("Got fbp.x = %d, expected 3.\n", fbp.x); + failures++; + } +} + +/* + Logic is somewhat diferent for bit-fields that end a struct vs + having additional fields. +*/ + +static struct four_bits_with_char { + unsigned char x : 4; + unsigned char y; +} fbi = {1, 2}; + +static void test_four_bits_with_char (void) +{ + if (sizeof (struct four_bits_with_char) != 2) { + printf ("Got sizeof (struct four_bits_with_char) = %zu, expected 2.\n", + sizeof (struct four_bits_with_char)); + failures++; + } + + if (fbi.x != 1) { + printf ("Got fbi.x = %u, expected 1.\n", fbi.x); + failures++; + } + + if (fbi.y != 2) { + printf ("Got fbi.y = %u, expected 2.\n", fbi.y); + failures++; + } + + fbi.x = 3; + fbi.y = 17; + + if (fbi.x != 3) { + printf ("Got fbi.x = %u, expected 3.\n", fbi.x); + failures++; + } + + if (fbi.y != 17) { + printf ("Got fbi.y = %u, expected 17.\n", fbi.y); + failures++; + } +} + +static struct two_chars { + unsigned char x : 4; + unsigned char y : 4; +} o = {11, 7}; + +/* Tests that bit-fields can share allocation units. */ +static void test_two_chars (void) +{ + if (sizeof (struct two_chars) != 1) { + printf ("Got sizeof (struct two_chars) = %zu, expected 1.\n", + sizeof (struct two_chars)); + failures++; + } + + if (o.x != 11) { + printf ("Got o.x = %u, expected 11.\n", o.x); + failures++; + } + + if (o.y != 7) { + printf ("Got o.y = %u, expected 7.\n", o.y); + failures++; + } + + o.x = 3; + o.y = 4; + + if (o.x != 3) { + printf ("Got o.x = %u, expected 3.\n", o.x); + failures++; + } + + if (o.y != 4) { + printf ("Got o.y = %u, expected 4.\n", o.y); + failures++; + } +} + +static struct full_width { + unsigned char x : 8; +} fw = {255}; + +static void test_full_width (void) +{ + if (sizeof (struct full_width) != 1) { + printf ("Got sizeof (struct full_width) = %zu, expected 1.\n", + sizeof (struct full_width)); + failures++; + } + + if (fw.x != 255) { + printf ("Got fw.x = %u, expected 255.\n", fw.x); + failures++; + } + + fw.x = 42; + + if (fw.x != 42) { + printf ("Got fw.x = %u, expected 42.\n", fw.x); + failures++; + } +} + +static struct aligned_end { + unsigned char : 2; + unsigned char x : 6; + unsigned char : 3; + unsigned char y : 5; +} ae = {63, 17}; + +static void test_aligned_end (void) +{ + if (sizeof (struct aligned_end) != 2) { + printf ("Got sizeof (struct aligned_end) = %zu, expected 2.\n", + sizeof (struct aligned_end)); + failures++; + } + + if (ae.x != 63) { + printf ("Got ae.x = %u, expected 63.\n", ae.x); + failures++; + } + + if (ae.y != 17) { + printf ("Got ae.y = %u, expected 17.\n", ae.y); + failures++; + } + + ae.x = 42; + ae.y = 15; + + if (ae.x != 42) { + printf ("Got ae.x = %u, expected 42.\n", ae.x); + failures++; + } + + if (ae.y != 15) { + printf ("Got ae.y = %u, expected 15.\n", ae.y); + failures++; + } +} + +struct { signed char x : 1; } sc = {-1}; +struct { unsigned char x : 1; } uc = {1}; +struct { char x : 1; } pc = {1}; + +static void test_signedness (void) +{ + if (sc.x != -1) { + printf ("Got sc.x = %d, expected -1.\n", sc.x); + failures++; + } + + if (uc.x != 1) { + printf ("Got uc.x = %u, expected 1.\n", uc.x); + failures++; + } + + if (pc.x != 1) { + printf ("Got pc.x = %u, expected 1.\n", pc.x); + failures++; + } +} + +int main (void) +{ + test_four_bits (); + test_four_bits_with_char (); + test_two_chars (); + test_full_width (); + test_aligned_end (); + test_signedness (); + printf ("failures: %u\n", failures); + return failures; +} diff --git a/test/val/char-promote.c b/test/val/char-promote.c new file mode 100644 index 000000000..0d2dad04e --- /dev/null +++ b/test/val/char-promote.c @@ -0,0 +1,176 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Tests of promotions of character types. +*/ + +#include <stdio.h> + +typedef unsigned char u8; + +static unsigned char failures = 0; + +void test_sub (void) +{ + const u8 one = 1, two = 2; + + /* For any unsigned type other than unsigned char, (T) 1 - (T) 2 > 0. */ + if (1U - 2U < 0) { + fprintf (stderr, "Expected 1U - 2U > 0\n"); + failures++; + } + + /* The unsigned chars get promoted to int, so this is negative. */ + if (one - two > 0) { + fprintf (stderr, "Expected one - two < 0\n"); + failures++; + } + + /* Test the constant expression code paths. */ + if ((u8) 1 - (u8) 2 > 0) { + fprintf (stderr, "Expected (u8) 1 - (u8) 2 < 0\n"); + failures++; + } +} + +void test_mul (void) +{ + const u8 two_fifty_five = 255; + const u8 sixteen = 16; + int x; + + if (255U * 255U != 65025U) { + fprintf (stderr, "Expected 255U * 255U == 65025U\n"); + failures++; + } +#if 0 + /* Disabled pending fix of #1310. */ + if (255 * 255 != -511) { + fprintf (stderr, "Expected 255 * 255 == -511, got: %d\n", 255 * 255); + failures++; + } +#endif + + /* The unsigned chars get promoted to int, so this is -511. + ** We should also be able to observe that, due to optimizations from #1315, the generated code + ** uses umul, not mul. + */ + if (two_fifty_five * two_fifty_five != -511) { + fprintf (stderr, "Expected two_fifty_five * two_fifty_five == -511\n"); + failures++; + } +#if 0 + /* Disabled pending fix of #1310. */ + if ((u8) 255 * (u8) 255 != -511) { + fprintf (stderr, "Expected (u8) 255 * (u8) 255 == -511, got: %d\n", + (u8) 255 * (u8) 255); + failures++; + } +#endif + + /* This should compile to a shift. */ + x = sixteen * 4; + if (x != 64) { + fprintf (stderr, "Expected sixteen * 4 == 64, got: %d\n", x); + failures++; + } +} + +void test_div (void) +{ + const u8 seventeen = 17; + const u8 three = 3; + int x; + + /* We should also be able to observe that, due to optimizations from #1315, the generated code + ** uses udiv, not div. + */ + if (seventeen / three != 5) { + fprintf (stderr, "Expected seventeen / three == 5, got: %d\n", seventeen / three); + failures++; + } + if ((u8) 17 / (u8) 3 != 5) { + fprintf (stderr, "Expected (u8) 17 / (u8) 3 == 5, got: %d\n", (u8) 17 / (u8) 3); + failures++; + } + + /* Ideally, this would compile to a logical shift, but that does not happen currently. */ + x = seventeen / 4; + if (x != 4) { + fprintf (stderr, "Expected seventeen / 4 == 4, got: %d\n", x); + failures++; + } +} + +void test_mod (void) +{ + const u8 seventeen = 17; + /* Ideally, this would compile to a bitwise and, but that does not happen currently. */ + int x = seventeen % 4; + if (x != 1) { + fprintf (stderr, "Expected seventeen %% 4 == 1, got: %d\n", x); + failures++; + } +} + +void test_shr (void) +{ + const unsigned int forty_two = 42; + const unsigned int two = 2; + int x; + + /* We should also be able to observe that, due to optimizations from #1315, the generated code + ** uses shr, not asr. + */ + if (forty_two >> two != 10) { + fprintf (stderr, "Expected forty_two >> two == 10, got: %d\n", forty_two >> two); + failures++; + } + if ((u8) 42 >> (u8) 2 != 10) { + fprintf (stderr, "Expected (u8) 42 >> (u8) 2 == 10, got: %d\n", (u8) 42 >> (u8) 3); + failures++; + } + + /* Ideally, this would compile to a logical shift, but that does not happen currently. */ + x = forty_two >> 2; + if (x != 10) { + fprintf (stderr, "Expected forty_two >> 2 == 10, got: %d\n", x); + failures++; + } + + /* Ideally, this would compile to a logical shift, but that does not happen currently. */ + x = 42 >> two; + if (x != 10) { + fprintf (stderr, "Expected 42 >> two == 10, got: %d\n", x); + failures++; + } +} + +int main (void) +{ + test_sub (); + test_mul (); + test_div (); + test_mod (); + test_shr (); + printf ("failures: %u\n", failures); + return failures; +} diff --git a/test/val/compare1.c b/test/val/compare1.c index 0127e3b1b..e9d2f7d4a 100644 --- a/test/val/compare1.c +++ b/test/val/compare1.c @@ -52,7 +52,7 @@ compare_char_to_lits1 (void) failures++; } -/* achar0 should be `5' */ +/* achar0 should be '5' */ void compare_char_to_lits2 (void) { @@ -106,7 +106,7 @@ compare_int_to_lits1 (void) failures++; } -/* aint0 should be `5' */ +/* aint0 should be '5' */ void compare_int_to_lits2 (void) { @@ -123,7 +123,7 @@ compare_int_to_lits2 (void) failures++; } -/* aint0 should be `0x1234' */ +/* aint0 should be '0x1234' */ void compare_int_to_lits3 (void) { diff --git a/test/val/compare10.c b/test/val/compare10.c index 861a02d64..742213851 100644 --- a/test/val/compare10.c +++ b/test/val/compare10.c @@ -59,7 +59,7 @@ void c_char_gte_lit1(unsigned char expected_result) if(char0 >= 0x7e) result |= 0x10; - + if(char0 >= 0x7f) result |= 0x20; @@ -138,10 +138,10 @@ void c_int_gte_lit1(unsigned char expected_result) if(int0 >= 0x0101) result |= 0x10; - + if(int0 >= 0x01ff) result |= 0x20; - + if(int0 >= 0x0200) result |= 0x40; @@ -226,10 +226,10 @@ void c_int_gte_lit2(unsigned char expected_result) if(int0 >= -0x0101) result |= 0x10; - + if(int0 >= -0x0100) result |= 0x20; - + if(int0 >= -0xff) result |= 0x40; diff --git a/test/val/compare4.c b/test/val/compare4.c index 47948c3a3..8e3baad5d 100644 --- a/test/val/compare4.c +++ b/test/val/compare4.c @@ -6,11 +6,14 @@ #include <stdio.h> #include <limits.h> +#include <stdint.h> /* compare4.c */ +/*#define SUPPORT_BIT_TYPES */ + /*#define COMPARE_OUT_OF_RANGE 1*/ unsigned char success = 0; @@ -20,22 +23,9 @@ unsigned char dummy = 0; #ifdef SUPPORT_BIT_TYPES bit bit0 = 0; #endif -#ifdef SIZEOF_INT_16BIT -#if defined(__LINUX__) || defined(LINUX) -short int0 = 0; -short int1 = 0; -#else -int int0 = 0; -int int1 = 0; - -#endif - -#else -int int0 = 0; -int int1 = 0; - -#endif +int16_t int0 = 0; +int16_t int1 = 0; signed char char0 = 0; signed char char1 = 0; diff --git a/test/val/compare5.c b/test/val/compare5.c index 9e0c97a63..cf51fac89 100644 --- a/test/val/compare5.c +++ b/test/val/compare5.c @@ -284,21 +284,21 @@ void c_ifelse1(void) void c_minus1(void) { printf("long0:%ld long1:%ld\n",long0,long1); - + printf("(long0 != -1)\n"); if(long0 != -1) { - failures++; + failures++; } printf("(long0 > 0)\n"); if(long0 > 0) { - failures++; + failures++; } printf("(long1 < 0)\n"); if(long1 < 0) { - failures++; + failures++; } /* if(long1 < 2) @@ -432,7 +432,7 @@ main (void) success = failures; done (); - + printf("failures: %d\n",failures); return failures; diff --git a/test/val/compare6.c b/test/val/compare6.c index 85f16a1c4..bad411c0c 100644 --- a/test/val/compare6.c +++ b/test/val/compare6.c @@ -60,7 +60,7 @@ void c_char(void) if(char1 || !char0) failures++; - if((char0 >5 ) && (char0 < 10)) + if((char0 >5 ) && (char0 < 10)) failures++; char0 +=5; /* char0 = 6 now */ @@ -100,7 +100,7 @@ void c_int(void) if(int1 || !int0) failures++; - if((int0 >5 ) && (int0 < 10)) + if((int0 >5 ) && (int0 < 10)) failures++; int0 +=5; /* int0 = 6 now */ @@ -140,7 +140,7 @@ void c_long(void) if(long1 || !long0) failures++; - if((long0 >5 ) && (long0 < 10)) + if((long0 >5 ) && (long0 < 10)) failures++; long0 +=5; /* long0 = 6 now */ diff --git a/test/val/compare7.c b/test/val/compare7.c index 6c9636dec..d88952f62 100644 --- a/test/val/compare7.c +++ b/test/val/compare7.c @@ -129,10 +129,10 @@ void c_int_lt_lit1(unsigned char expected_result) if(int0 < 0x0101) result |= 0x10; - + if(int0 < 0x01ff) result |= 0x20; - + if(int0 < 0x0200) result |= 0x40; @@ -214,10 +214,10 @@ void c_int_lt_lit2(unsigned char expected_result) if(int0 < -0x0101) result |= 0x10; - + if(int0 < -0x0100) result |= 0x20; - + if(int0 < -0xff) result |= 0x40; diff --git a/test/val/compare8.c b/test/val/compare8.c index 0abff8c69..2621dad1d 100644 --- a/test/val/compare8.c +++ b/test/val/compare8.c @@ -59,10 +59,10 @@ void c_char_gt_lit1(unsigned char expected_result) if(char0 > 0x7e) result |= 0x10; - + if(char0 > 0x7f) result |= 0x20; - + if(result != expected_result) failures++; } @@ -132,10 +132,10 @@ void c_int_gt_lit1(unsigned char expected_result) if(int0 > 0x0101) result |= 0x10; - + if(int0 > 0x01ff) result |= 0x20; - + if(int0 > 0x0200) result |= 0x40; @@ -220,10 +220,10 @@ void c_int_gt_lit2(unsigned char expected_result) if(int0 > -0x0101) result |= 0x10; - + if(int0 > -0x0100) result |= 0x20; - + if(int0 > -0xff) result |= 0x40; diff --git a/test/val/compare9.c b/test/val/compare9.c index 4a3714199..a498c15cb 100644 --- a/test/val/compare9.c +++ b/test/val/compare9.c @@ -54,7 +54,7 @@ void c_char_lte_lit1(unsigned char expected_result) if(char0 <= 0x7f) result |= 0x10; - + if(result != expected_result) failures++; } @@ -124,10 +124,10 @@ void c_int_lte_lit1(unsigned char expected_result) if(int0 <= 0x0101) result |= 0x10; - + if(int0 <= 0x01ff) result |= 0x20; - + if(int0 <= 0x0200) result |= 0x40; @@ -209,10 +209,10 @@ void c_int_lte_lit2(unsigned char expected_result) if(int0 <= -0x0101) result |= 0x10; - + if(int0 <= -0x0100) result |= 0x20; - + if(int0 <= -0xff) result |= 0x40; diff --git a/test/val/computedgoto.c b/test/val/computedgoto.c new file mode 100644 index 000000000..9f9404941 --- /dev/null +++ b/test/val/computedgoto.c @@ -0,0 +1,55 @@ +static unsigned char val, val2; + +static void act(const unsigned char op) { + + static const void * const arr[] = { + &&op0, + &&op1, + &&op2, + &&op3, + &&op4, + &&op5, + &&op6, + }; + + goto *arr[op]; + + op0: + val += 1; + return; + + op1: + val += 2; + return; + + op2: + val += 3; + return; + + op3: + val2 += 1; + return; + + op4: + val2 += 5; + return; + + op5: + val2 += 7; + return; + + op6: + val2 += 9; + return; +} + +int main(void) { + + val = val2 = 0; + + act(1); + act(3); + act(5); + + return val == 2 && val2 == 8 ? 0 : 1; +} diff --git a/test/val/constexpr.c b/test/val/constexpr.c new file mode 100644 index 000000000..c66946a19 --- /dev/null +++ b/test/val/constexpr.c @@ -0,0 +1,111 @@ + +/* + +This tests a couple of expressions which yield constant results. While we cant +really check if the compiler figures out they are constant, we can still check +if they are being compiled/evaluated correctly. + +related: + +pr #1424 - More compile-time constant expressions regarding object addresses +issue #1196 - Constant expressions in general + +*/ + +#include <stdio.h> + +int fails = 0; + +#define TESTEXPR(expr) \ + if (!(expr)) { \ + printf("fail line %d\n", __LINE__); \ + fails++; \ + } + +#define TESTEXPRFALSE(expr) \ + if (expr) { \ + printf("fail line %d\n", __LINE__); \ + fails++; \ + } + +int a; +volatile int b; +const int c = 1; +#define d 1 +enum { e = 1 }; +int f() { return 1; } + +/* we cant really test these at runtime (because the result is constant, but not + * compile-time known), so compile only */ +void test0(void) +{ + TESTEXPR(a); /* Pure: Yes; Static: No; Immutable: No; Compile-Time-Known: No */ + TESTEXPR(b); /* Pure: No?; Static: No; Immutable: No; Compile-Time-Known: No */ + TESTEXPR(&a > &b); /* Pure: Yes; Static: Yes; Immutable: Yes; Compile-Time-Known: No */ +} + +void test1(void) +{ + TESTEXPR(1); /* Pure: Yes; Static: Yes; Immutable: Yes; Compile-Time-Known: Yes */ + TESTEXPR(c); /* Pure: Yes; Static: ???; Immutable: ???; Compile-Time-Known: ??? */ + TESTEXPR(d); /* Pure: Yes; Static: Yes; Immutable: Yes; Compile-Time-Known: Yes */ + TESTEXPR(e); /* Pure: Yes; Static: Yes; Immutable: Yes; Compile-Time-Known: Yes */ + TESTEXPR(c == c); /* Pure: Yes; Static: Yes; Immutable: Yes; Compile-Time-Known: Yes */ + TESTEXPRFALSE(c != c); + TESTEXPR(f() == f()); /* Pure: Yes; Static: Yes?; Immutable: Yes; Compile-Time-Known: Yes? */ + TESTEXPRFALSE(f() != f()); + TESTEXPR(&a == &a); /* Pure: Yes; Static: Yes; Immutable: Yes; Compile-Time-Known: Yes */ + TESTEXPRFALSE(&a != &a); + TESTEXPR(&a != 0); /* Pure: Yes; Static: Yes; Immutable: Yes; Compile-Time-Known: Yes* */ + TESTEXPRFALSE(&a == 0); +/* in a real program we cant rely on these, but in this test we can */ + TESTEXPR(&a); /* Pure: Yes; Static: Yes; Immutable: Yes; Compile-Time-Known: No */ + TESTEXPR((int)&a != 0); /* Pure: Yes; Static: Yes; Immutable: Yes; Compile-Time-Known: No */ + TESTEXPRFALSE((int)&a == 0); + TESTEXPR(&a != &b); /* Pure: Yes; Static: Yes; Immutable: Yes; Compile-Time-Known: ??** */ + TESTEXPRFALSE(&a == &b); +/* this may fail in a real world program, but here we can rely on it anyway */ + TESTEXPR(b == b); /* Pure: No?; Static: No; Immutable: No; Compile-Time-Known: No */ + TESTEXPRFALSE(b != b); +/* NOT detected by the compiler as constant */ + TESTEXPR(a == a); /* Pure: Yes; Static: Yes; Immutable: Yes; Compile-Time-Known: Yes */ + TESTEXPRFALSE(a != a); + TESTEXPR(f()); /* Pure: Yes; Static: Yes?; Immutable: Yes; Compile-Time-Known: Yes? */ +} + +/* Taken from #1196 reply */ +struct S { + int a; + int b; +} s[2]; + +void test2(void) +{ + TESTEXPR((void*)&s == (void*)&s[0]); + TESTEXPRFALSE((void*)&s != (void*)&s[0]); + TESTEXPR(&s[0] < &s[1]); + TESTEXPR(&s[0].b > &s[0].a); + TESTEXPR(&s[0].b < &s[1].a); +} + +/* we abuse the close function here, close(-1) will return -1 */ +extern int close(int fd); + +void test3(void) +{ + TESTEXPR(close(-1)); /* Pure: No; Static: No; Immutable: No; Compile-Time-Known: No */ + TESTEXPR((close(-1), 1)) /* Pure: No; Static: No; Immutable: Yes; Compile-Time-Known: Yes */ +/* Error: Scalar expression expected */ +// TESTEXPR((void)close(-1)); /* Pure: No; Static: No; Immutable: Yes; Compile-Time-Known: Yes */ + TESTEXPR(sizeof(close(-1))); /* Pure: Yes; Static: Yes; Immutable: Yes; Compile-Time-Known: Yes */ + /* NOT detected by the compiler as constant */ + TESTEXPRFALSE(close(-1) * 0); /* Pure: No; Static: No; Immutable: Yes; Compile-Time-Known: Yes */ +} + +int main(void) +{ + test1(); + test2(); + test3(); + return fails; +} diff --git a/test/val/cq22.c b/test/val/cq22.c index bcd1570c8..20048fa2c 100644 --- a/test/val/cq22.c +++ b/test/val/cq22.c @@ -101,9 +101,9 @@ int s22(struct defs *pd0) #define cq_sections 1 #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s22(pd0); @@ -125,7 +125,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq241.c b/test/val/cq241.c index 76f437e0c..611b5a376 100644 --- a/test/val/cq241.c +++ b/test/val/cq241.c @@ -243,9 +243,9 @@ int s241(struct defs *pd0) { #define cq_sections 1 #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s241(pd0); @@ -267,7 +267,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq243.c b/test/val/cq243.c index 676c73182..8aba7dfe8 100644 --- a/test/val/cq243.c +++ b/test/val/cq243.c @@ -176,21 +176,21 @@ int s243(struct defs *pd0) { by a more failproof version if( - '\0' != 0 || - '\01' != 1 || - '\02' != 2 || - '\03' != 3 || - '\04' != 4 || - '\05' != 5 || - '\06' != 6 || - '\07' != 7 || - '\10' != 8 || - '\17' != 15 || - '\20' != 16 || - '\77' != 63 || - '\100' != 64 || - '\177' != 127 - ) + '\0' != 0 || + '\01' != 1 || + '\02' != 2 || + '\03' != 3 || + '\04' != 4 || + '\05' != 5 || + '\06' != 6 || + '\07' != 7 || + '\10' != 8 || + '\17' != 15 || + '\20' != 16 || + '\77' != 63 || + '\100' != 64 || + '\177' != 127 + ) */ if( ('0' != '\60') || @@ -201,7 +201,7 @@ int s243(struct defs *pd0) { ('z' != '\172') ) - { + { rc = rc+8; if(pd0->flgd != 0) { @@ -221,9 +221,9 @@ int s243(struct defs *pd0) { #define cq_sections 1 #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s243(pd0); @@ -245,7 +245,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq244.c b/test/val/cq244.c index bedf51e95..896ddb75b 100644 --- a/test/val/cq244.c +++ b/test/val/cq244.c @@ -116,9 +116,9 @@ s244(struct defs *pd0) { #define cq_sections 1 #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s244(pd0); @@ -140,7 +140,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq25.c b/test/val/cq25.c index 9cb2f61c8..7cacebf0a 100644 --- a/test/val/cq25.c +++ b/test/val/cq25.c @@ -128,9 +128,9 @@ int s25(struct defs *pd0) { #define cq_sections 1 #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s25(pd0); @@ -152,7 +152,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq26.c b/test/val/cq26.c index 399f0a45e..1c88dfed6 100644 --- a/test/val/cq26.c +++ b/test/val/cq26.c @@ -171,9 +171,9 @@ s26(struct defs *pd0) { *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s26(pd0); @@ -197,7 +197,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq4.c b/test/val/cq4.c index 8a8125c52..205f62c88 100644 --- a/test/val/cq4.c +++ b/test/val/cq4.c @@ -317,9 +317,9 @@ setev(){ *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s26(pd0); @@ -344,7 +344,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq61.c b/test/val/cq61.c index 3dcca6454..c16b64066 100644 --- a/test/val/cq61.c +++ b/test/val/cq61.c @@ -140,9 +140,9 @@ simply discarded. */ *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ /*case 0: return s26(pd0);*/ @@ -167,7 +167,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq626.c b/test/val/cq626.c index 166d3a95b..b7c592d58 100644 --- a/test/val/cq626.c +++ b/test/val/cq626.c @@ -291,9 +291,9 @@ int s626(struct defs *pd0){ *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s26(pd0); @@ -318,7 +318,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq71.c b/test/val/cq71.c index 7bf0d9e1e..725a40e88 100644 --- a/test/val/cq71.c +++ b/test/val/cq71.c @@ -194,9 +194,9 @@ int *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ /*case 0: return s26(pd0);*/ @@ -221,7 +221,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq714.c b/test/val/cq714.c index f4c58801f..c36c992aa 100644 --- a/test/val/cq714.c +++ b/test/val/cq714.c @@ -1507,175 +1507,175 @@ initial (5,2) | (5,2) | (12,10) } #ifdef NO_FLOATS - fl = 5; cr = 2; - fl /= cr; - if(fl != 2){ - lrc = 232; - if(prlc) printf(f,lrc); - } - fl = 5; sr = 2; - fl /= sr; - if(fl != 2){ - lrc = 233; - if(prlc) printf(f,lrc); - } - fl = 5; ir = 2; - fl /= ir; - if(fl != 2){ - lrc = 234; - if(prlc) printf(f,lrc); - } - fl = 5; lr = 2; - fl /= lr; - if(fl != 2){ - lrc = 235; - if(prlc) printf(f,lrc); - } - fl = 5; ur = 2; - fl /= ur; - if(fl != 2){ - lrc = 236; - if(prlc) printf(f,lrc); - } - fl = 5; fr = 2; - fl /= fr; - if(fl != 2){ - lrc = 237; - if(prlc) printf(f,lrc); - } - fl = 5; dr = 2; - fl /= dr; - if(fl != 2){ - lrc = 238; - if(prlc) printf(f,lrc); - } - dl = 5; cr = 2; - dl /= cr; - if(dl != 2){ - lrc = 239; - if(prlc) printf(f,lrc); - } - dl = 5; sr = 2; - dl /= sr; - if(dl != 2){ - lrc = 240; - if(prlc) printf(f,lrc); - } - dl = 5; ir = 2; - dl /= ir; - if(dl != 2){ - lrc = 241; - if(prlc) printf(f,lrc); - } - dl = 5; lr = 2; - dl /= lr; - if(dl != 2){ - lrc = 242; - if(prlc) printf(f,lrc); - } - dl = 5; ur = 2; - dl /= ur; - if(dl != 2){ - lrc = 243; - if(prlc) printf(f,lrc); - } - dl = 5; fr = 2; - dl /= fr; - if(dl != 2){ - lrc = 244; - if(prlc) printf(f,lrc); - } - dl = 5; dr = 2; - dl /= dr; - if(dl != 2){ - lrc = 245; - if(prlc) printf(f,lrc); - } + fl = 5; cr = 2; + fl /= cr; + if(fl != 2){ + lrc = 232; + if(prlc) printf(f,lrc); + } + fl = 5; sr = 2; + fl /= sr; + if(fl != 2){ + lrc = 233; + if(prlc) printf(f,lrc); + } + fl = 5; ir = 2; + fl /= ir; + if(fl != 2){ + lrc = 234; + if(prlc) printf(f,lrc); + } + fl = 5; lr = 2; + fl /= lr; + if(fl != 2){ + lrc = 235; + if(prlc) printf(f,lrc); + } + fl = 5; ur = 2; + fl /= ur; + if(fl != 2){ + lrc = 236; + if(prlc) printf(f,lrc); + } + fl = 5; fr = 2; + fl /= fr; + if(fl != 2){ + lrc = 237; + if(prlc) printf(f,lrc); + } + fl = 5; dr = 2; + fl /= dr; + if(fl != 2){ + lrc = 238; + if(prlc) printf(f,lrc); + } + dl = 5; cr = 2; + dl /= cr; + if(dl != 2){ + lrc = 239; + if(prlc) printf(f,lrc); + } + dl = 5; sr = 2; + dl /= sr; + if(dl != 2){ + lrc = 240; + if(prlc) printf(f,lrc); + } + dl = 5; ir = 2; + dl /= ir; + if(dl != 2){ + lrc = 241; + if(prlc) printf(f,lrc); + } + dl = 5; lr = 2; + dl /= lr; + if(dl != 2){ + lrc = 242; + if(prlc) printf(f,lrc); + } + dl = 5; ur = 2; + dl /= ur; + if(dl != 2){ + lrc = 243; + if(prlc) printf(f,lrc); + } + dl = 5; fr = 2; + dl /= fr; + if(dl != 2){ + lrc = 244; + if(prlc) printf(f,lrc); + } + dl = 5; dr = 2; + dl /= dr; + if(dl != 2){ + lrc = 245; + if(prlc) printf(f,lrc); + } #else - fl = 5; cr = 2; - fl /= cr; - if(fl != 2.5){ - lrc = 232; - if(prlc) printf(f,lrc); - } - fl = 5; sr = 2; - fl /= sr; - if(fl != 2.5){ - lrc = 233; - if(prlc) printf(f,lrc); - } - fl = 5; ir = 2; - fl /= ir; - if(fl != 2.5){ - lrc = 234; - if(prlc) printf(f,lrc); - } - fl = 5; lr = 2; - fl /= lr; - if(fl != 2.5){ - lrc = 235; - if(prlc) printf(f,lrc); - } - fl = 5; ur = 2; - fl /= ur; - if(fl != 2.5){ - lrc = 236; - if(prlc) printf(f,lrc); - } - fl = 5; fr = 2; - fl /= fr; - if(fl != 2.5){ - lrc = 237; - if(prlc) printf(f,lrc); - } - fl = 5; dr = 2; - fl /= dr; - if(fl != 2.5){ - lrc = 238; - if(prlc) printf(f,lrc); - } - dl = 5; cr = 2; - dl /= cr; - if(dl != 2.5){ - lrc = 239; - if(prlc) printf(f,lrc); - } - dl = 5; sr = 2; - dl /= sr; - if(dl != 2.5){ - lrc = 240; - if(prlc) printf(f,lrc); - } - dl = 5; ir = 2; - dl /= ir; - if(dl != 2.5){ - lrc = 241; - if(prlc) printf(f,lrc); - } - dl = 5; lr = 2; - dl /= lr; - if(dl != 2.5){ - lrc = 242; - if(prlc) printf(f,lrc); - } - dl = 5; ur = 2; - dl /= ur; - if(dl != 2.5){ - lrc = 243; - if(prlc) printf(f,lrc); - } - dl = 5; fr = 2; - dl /= fr; - if(dl != 2.5){ - lrc = 244; - if(prlc) printf(f,lrc); - } - dl = 5; dr = 2; - dl /= dr; - if(dl != 2.5){ - lrc = 245; - if(prlc) printf(f,lrc); - } + fl = 5; cr = 2; + fl /= cr; + if(fl != 2.5){ + lrc = 232; + if(prlc) printf(f,lrc); + } + fl = 5; sr = 2; + fl /= sr; + if(fl != 2.5){ + lrc = 233; + if(prlc) printf(f,lrc); + } + fl = 5; ir = 2; + fl /= ir; + if(fl != 2.5){ + lrc = 234; + if(prlc) printf(f,lrc); + } + fl = 5; lr = 2; + fl /= lr; + if(fl != 2.5){ + lrc = 235; + if(prlc) printf(f,lrc); + } + fl = 5; ur = 2; + fl /= ur; + if(fl != 2.5){ + lrc = 236; + if(prlc) printf(f,lrc); + } + fl = 5; fr = 2; + fl /= fr; + if(fl != 2.5){ + lrc = 237; + if(prlc) printf(f,lrc); + } + fl = 5; dr = 2; + fl /= dr; + if(fl != 2.5){ + lrc = 238; + if(prlc) printf(f,lrc); + } + dl = 5; cr = 2; + dl /= cr; + if(dl != 2.5){ + lrc = 239; + if(prlc) printf(f,lrc); + } + dl = 5; sr = 2; + dl /= sr; + if(dl != 2.5){ + lrc = 240; + if(prlc) printf(f,lrc); + } + dl = 5; ir = 2; + dl /= ir; + if(dl != 2.5){ + lrc = 241; + if(prlc) printf(f,lrc); + } + dl = 5; lr = 2; + dl /= lr; + if(dl != 2.5){ + lrc = 242; + if(prlc) printf(f,lrc); + } + dl = 5; ur = 2; + dl /= ur; + if(dl != 2.5){ + lrc = 243; + if(prlc) printf(f,lrc); + } + dl = 5; fr = 2; + dl /= fr; + if(dl != 2.5){ + lrc = 244; + if(prlc) printf(f,lrc); + } + dl = 5; dr = 2; + dl /= dr; + if(dl != 2.5){ + lrc = 245; + if(prlc) printf(f,lrc); + } #endif cl = 5; cr = 2; cl %= cr; @@ -1750,9 +1750,9 @@ initial (5,2) | (5,2) | (12,10) *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s714(pd0); @@ -1776,7 +1776,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq714b.c b/test/val/cq714b.c index b4908f4cb..19b58628c 100644 --- a/test/val/cq714b.c +++ b/test/val/cq714b.c @@ -971,9 +971,9 @@ initial (5,2) | (5,2) | (12,10) *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s714(pd0); @@ -997,7 +997,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq715.c b/test/val/cq715.c index fec9c6170..2e7e22d85 100644 --- a/test/val/cq715.c +++ b/test/val/cq715.c @@ -105,9 +105,9 @@ int x, y, z; *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ /*case 0: return s26(pd0);*/ @@ -132,7 +132,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq72.c b/test/val/cq72.c index 2f956e59d..6b8026576 100644 --- a/test/val/cq72.c +++ b/test/val/cq72.c @@ -299,9 +299,9 @@ int s72(struct defs *pd0){ *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s26(pd0); @@ -326,7 +326,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq757.c b/test/val/cq757.c index 60b588555..cf28f79e3 100644 --- a/test/val/cq757.c +++ b/test/val/cq757.c @@ -289,9 +289,9 @@ int s757(struct defs *pd0){ *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s26(pd0); diff --git a/test/val/cq7813.c b/test/val/cq7813.c index 0e743abcd..d6c9b445f 100644 --- a/test/val/cq7813.c +++ b/test/val/cq7813.c @@ -336,9 +336,9 @@ int s7813(struct defs *pd0){ *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s7813(pd0); @@ -362,7 +362,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq81.c b/test/val/cq81.c index 0271cae5d..1e83a2e04 100644 --- a/test/val/cq81.c +++ b/test/val/cq81.c @@ -682,9 +682,9 @@ test is unreliable. */ *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s81(pd0); @@ -708,7 +708,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq84.c b/test/val/cq84.c index d37c82f29..c1f62913e 100644 --- a/test/val/cq84.c +++ b/test/val/cq84.c @@ -101,13 +101,13 @@ int s84(struct defs *pd0){ if(pd0->flgd != 0) printf(s84er,2); rc = rc+2; } - #else + #else pfi = glork; if((*pfi)(4) != 4){ if(pd0->flgd != 0) printf(s84er,2); rc = rc+2; } - #endif + #endif /* Float fa[17] declares an array of floating point numbers, and *afp[17] declares an array of pointers @@ -223,9 +223,9 @@ return x;} *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s84(pd0); @@ -249,7 +249,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq85.c b/test/val/cq85.c index 15b055b20..81a99c960 100644 --- a/test/val/cq85.c +++ b/test/val/cq85.c @@ -118,10 +118,10 @@ int s85(struct defs *pd0){ #ifdef NO_FLOATS "signed", "signed", - #else + #else "float", "double" - #endif + #endif }; static char aln[] = " alignment: "; @@ -205,12 +205,12 @@ int s85(struct defs *pd0){ if(pd0->flgm != 0) printf("Sign extension in fields\n"); } else{ - #ifdef NO_BITFIELDS - if(pd0->flgd != 0) printf("NO_BITFIELDS\n"); - #else - if(pd0->flgd != 0) printf(s85er,2); - rc = rc+2; - #endif + #ifdef NO_BITFIELDS + if(pd0->flgd != 0) printf("NO_BITFIELDS\n"); + #else + if(pd0->flgd != 0) printf(s85er,2); + rc = rc+2; + #endif } } @@ -268,9 +268,9 @@ int one(); *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s85(pd0); @@ -294,7 +294,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq86.c b/test/val/cq86.c index 9f2409e7a..90cfa0b7c 100644 --- a/test/val/cq86.c +++ b/test/val/cq86.c @@ -183,9 +183,9 @@ int *metricp; *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s86(pd0); @@ -209,7 +209,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq88.c b/test/val/cq88.c index a15f75110..a9af7bef7 100644 --- a/test/val/cq88.c +++ b/test/val/cq88.c @@ -139,9 +139,9 @@ int s88(struct defs *pd0){ *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s88(pd0); @@ -165,7 +165,7 @@ int main(int n,char **args) { int j; static struct defs d0, *pd0; - + d0.flgs = 1; /* These flags dictate */ d0.flgm = 1; /* the verbosity of */ d0.flgd = 1; /* the program. */ diff --git a/test/val/cq9.c b/test/val/cq9.c index 228ac9e77..c0f1f45ff 100644 --- a/test/val/cq9.c +++ b/test/val/cq9.c @@ -109,9 +109,9 @@ int s9(struct defs *pd0){ *********************************************************************************************/ #ifndef NO_TYPELESS_STRUCT_PTR - int section(int j,struct* pd0){ + int section(int j,struct* pd0){ #else - int section(int j,void* pd0){ + int section(int j,void* pd0){ #endif switch(j){ case 0: return s9(pd0); diff --git a/test/val/div-char-char.c b/test/val/div-char-char.c new file mode 100644 index 000000000..aa86bcd19 --- /dev/null +++ b/test/val/div-char-char.c @@ -0,0 +1,86 @@ +#include <stdint.h> +#include <stdio.h> +#include "div-common.h" + +int res = 0; + +/* we check A_8 and B_8 signed */ +#define TEST(_n,_a,_b,_r) TEST_AB_8(_n,_a,_b,_r) + +#define DO_TEST_A(_n) res += test##_n##a() +#define DO_TEST_B(_n) res += test##_n##b() + +/* arbitrary values */ +TEST(1, 1, 8, 0) +TEST(2, -1, 8, 0) +TEST(3, 1, -8, 0) +TEST(4, -1, -8, 0) +TEST(5, 8, 1, 8) +TEST(6, -8, 1, -8) +TEST(7, 8, -1, -8) +TEST(8, -8, -1, 8) + +TEST(11, 32, 64, 0) +TEST(12, -32, 64, 0) +TEST(13, 32, -64, 0) +TEST(14, -32, -64, 0) +TEST(15, 64, 32, 2) +TEST(16, -64, 32, -2) +TEST(17, 64, -32, -2) +TEST(18, -64, -32, 2) + +/* +128 can't be tested for 8-bit signed char */ +TEST(101, 127, -128, 0) +TEST(102, -127, -128, 0) +TEST(103, -128, -128, 1) + +int main(void) +{ + /* check if the result is correct */ + DO_TEST_A(1); + DO_TEST_A(2); + DO_TEST_A(3); + DO_TEST_A(4); + DO_TEST_A(5); + DO_TEST_A(6); + DO_TEST_A(7); + DO_TEST_A(8); + + DO_TEST_A(11); + DO_TEST_A(12); + DO_TEST_A(13); + DO_TEST_A(14); + DO_TEST_A(15); + DO_TEST_A(16); + DO_TEST_A(17); + DO_TEST_A(18); + + DO_TEST_A(101); + DO_TEST_A(102); + DO_TEST_A(103); + + /* check if the results are equal */ + DO_TEST_B(1); + DO_TEST_B(2); + DO_TEST_B(3); + DO_TEST_B(4); + DO_TEST_B(5); + DO_TEST_B(6); + DO_TEST_B(7); + DO_TEST_B(8); + + DO_TEST_B(11); + DO_TEST_B(12); + DO_TEST_B(13); + DO_TEST_B(14); + DO_TEST_B(15); + DO_TEST_B(16); + DO_TEST_B(17); + DO_TEST_B(18); + + DO_TEST_B(101); + DO_TEST_B(102); + DO_TEST_B(103); + + return res; +} diff --git a/test/val/div-common.h b/test/val/div-common.h new file mode 100644 index 000000000..b67de54dc --- /dev/null +++ b/test/val/div-common.h @@ -0,0 +1,52 @@ +#ifndef DIV_COMMON_H +#define DIV_COMMON_H + +/* check if the result is correct */ +#define TEST_A_T(type, _n,_a,_b,_r) \ + int test##_n##a(void) { \ + typedef type int_t; \ + int_t a = ((int_t)_a), b = ((int_t)_b); \ + if (((a/((int_t)_b)) == ((int_t)_r)) && ((a/b) == ((int_t)_r))) { \ + return 0; \ + } else { \ + printf("%d\tincorrect: a/%ld = %ld, a/b = %ld\n\texpected: %ld/%ld = %ld\n", \ + (_n), (long)((int_t)_b), (long)(a/((int_t)_b)), (long)(a/b), (long)((int_t)_a), (long)((int_t)_b), (long)((int_t)_r)); \ + return 1; \ + } \ + } + +/* check if the results are equal */ +#define TEST_B_T(type, _n,_a,_b,_r) \ + int test##_n##b(void) { \ + typedef type int_t; \ + int_t a = ((int_t)_a), b = ((int_t)_b); \ + if (((a/((int_t)_b)) == (a/b))) { \ + return 0; \ + } else { \ + printf("%d\tnot equal: %ld != %ld, a = %ld, b = %ld\n\texpected: %ld/%ld = %ld\n", \ + (_n), (long)(a/((int_t)_b)), (long)(a/b), (long)(a), (long)(b), (long)((int_t)_a), (long)((int_t)_b), (long)((int_t)_r)); \ + return 1; \ + } \ + } + +#define TEST_A_8(_n,_a,_b,_r) TEST_A_T(int8_t, _n,_a,_b,_r) +#define TEST_B_8(_n,_a,_b,_r) TEST_B_T(int8_t, _n,_a,_b,_r) +#define TEST_A_16(_n,_a,_b,_r) TEST_A_T(int16_t, _n,_a,_b,_r) +#define TEST_B_16(_n,_a,_b,_r) TEST_B_T(int16_t, _n,_a,_b,_r) +#define TEST_A_32(_n,_a,_b,_r) TEST_A_T(int32_t, _n,_a,_b,_r) +#define TEST_B_32(_n,_a,_b,_r) TEST_B_T(int32_t, _n,_a,_b,_r) + +/* A and B */ +#define TEST_AB_8(_n,_a,_b,_r) \ + TEST_A_8(_n,_a,_b,_r) \ + TEST_B_8(_n,_a,_b,_r) + +#define TEST_AB_16(_n,_a,_b,_r) \ + TEST_A_16(_n,_a,_b,_r) \ + TEST_B_16(_n,_a,_b,_r) + +#define TEST_AB_32(_n,_a,_b,_r) \ + TEST_A_32(_n,_a,_b,_r) \ + TEST_B_32(_n,_a,_b,_r) + +#endif diff --git a/test/val/div-int-int.c b/test/val/div-int-int.c new file mode 100644 index 000000000..efcb12a48 --- /dev/null +++ b/test/val/div-int-int.c @@ -0,0 +1,114 @@ +#include <stdint.h> +#include <stdio.h> +#include "div-common.h" + +int res = 0; + +/* we check A_16 and B_16 signed */ +#define TEST(_n,_a,_b,_r) TEST_AB_16(_n,_a,_b,_r) + +#define DO_TEST_A(_n) res += test##_n##a() +#define DO_TEST_B(_n) res += test##_n##b() + +/* arbitrary values */ +TEST(1, 1, 8, 0) +TEST(2, -1, 8, 0) +TEST(3, 1, -8, 0) +TEST(4, -1, -8, 0) +TEST(5, 8, 1, 8) +TEST(6, -8, 1, -8) +TEST(7, 8, -1, -8) +TEST(8, -8, -1, 8) + +TEST(11, 2048, 512, 4) +TEST(12, -2048, 512, -4) +TEST(13, 2048, -512, -4) +TEST(14, -2048, -512, 4) +TEST(15, 512, 2048, 0) +TEST(16, -512, 2048, 0) +TEST(17, 512, -2048, 0) +TEST(18, -512, -2048, 0) + +/* values that are around min/max of the type(s) */ +TEST(101, 127, 128, 0) +TEST(102, -127, 128, 0) +TEST(103, 127, -128, 0) +TEST(104, -127, -128, 0) +TEST(105, 128, 128, 1) +TEST(106, 128, -128, -1) +TEST(107, -128, 128, -1) +TEST(108, -128, -128, 1) + +/* +32768 can't be tested for 16-bit signed short */ +TEST(201, 32767L, -32768L, 0) +TEST(202, 32767L, -32768L, 0) +TEST(203, -32768L, -32768L, 1) + +int main(void) +{ + /* check if the result is correct */ + DO_TEST_A(1); + DO_TEST_A(2); + DO_TEST_A(3); + DO_TEST_A(4); + DO_TEST_A(5); + DO_TEST_A(6); + DO_TEST_A(7); + DO_TEST_A(8); + + DO_TEST_A(11); + DO_TEST_A(12); + DO_TEST_A(13); + DO_TEST_A(14); + DO_TEST_A(15); + DO_TEST_A(16); + DO_TEST_A(17); + DO_TEST_A(18); + + DO_TEST_A(101); + DO_TEST_A(102); + DO_TEST_A(103); + DO_TEST_A(104); + DO_TEST_A(105); + DO_TEST_A(106); + DO_TEST_A(107); + DO_TEST_A(108); + + DO_TEST_A(201); + DO_TEST_A(202); + DO_TEST_A(203); + + /* check if the results are equal */ + DO_TEST_B(1); + DO_TEST_B(2); + DO_TEST_B(3); + DO_TEST_B(4); + DO_TEST_B(5); + DO_TEST_B(6); + DO_TEST_B(7); + DO_TEST_B(8); + + DO_TEST_B(11); + DO_TEST_B(12); + DO_TEST_B(13); + DO_TEST_B(14); + DO_TEST_B(15); + DO_TEST_B(16); + DO_TEST_B(17); + DO_TEST_B(18); + + DO_TEST_B(101); + DO_TEST_B(102); + DO_TEST_B(103); + DO_TEST_B(104); + DO_TEST_B(105); + DO_TEST_B(106); + DO_TEST_B(107); + DO_TEST_B(108); + + DO_TEST_B(201); + DO_TEST_B(202); + DO_TEST_B(203); + + return res; +} diff --git a/test/val/div-long-long.c b/test/val/div-long-long.c new file mode 100644 index 000000000..d2553e3c3 --- /dev/null +++ b/test/val/div-long-long.c @@ -0,0 +1,141 @@ +#include <stdint.h> +#include <stdio.h> +#include "div-common.h" + +int res = 0; + +/* we check A_32 and B_32 signed */ +#define TEST(_n,_a,_b,_r) TEST_AB_32(_n,_a,_b,_r) + +#define DO_TEST_A(_n) res += test##_n##a() +#define DO_TEST_B(_n) res += test##_n##b() + +/* arbitrary values */ +TEST(1, 1, 8, 0) +TEST(2, -1, 8, 0) +TEST(3, 1, -8, 0) +TEST(4, -1, -8, 0) +TEST(5, 8, 1, 8) +TEST(6, -8, 1, -8) +TEST(7, 8, -1, -8) +TEST(8, -8, -1, 8) + +TEST(11, 2048, 512, 4) +TEST(12, -2048, 512, -4) +TEST(13, 2048, -512, -4) +TEST(14, -2048, -512, 4) +TEST(15, 512, 2048, 0) +TEST(16, -512, 2048, 0) +TEST(17, 512, -2048, 0) +TEST(18, -512, -2048, 0) + +/* values that are around min/max of the type(s) */ +TEST(101, 127, 128, 0) +TEST(102, -127, 128, 0) +TEST(103, 127, -128, 0) +TEST(104, -127, -128, 0) +TEST(105, 128, 128, 1) +TEST(106, 128, -128, -1) +TEST(107, -128, 128, -1) +TEST(108, -128, -128, 1) + +TEST(201, 32767L, 32768L, 0) +TEST(202, -32767L, 32768L, 0) +TEST(203, 32767L, -32768L, 0) +TEST(204, 32767L, -32768L, 0) +TEST(205, 32768L, 32768L, 1) +TEST(206, 32768L, -32768L, -1) +TEST(207, -32768L, 32768L, -1) +TEST(208, -32768L, -32768L, 1) + +/* +2147483648 can't be tested for 32-bit signed long */ +TEST(401, 2147483647UL, -2147483648UL, 0) +TEST(402, -2147483647UL, -2147483648UL, 0) +TEST(403, -2147483648UL, -2147483648UL, 1) + +int main(void) +{ + /* check if the result is correct */ + DO_TEST_A(1); + DO_TEST_A(2); + DO_TEST_A(3); + DO_TEST_A(4); + DO_TEST_A(5); + DO_TEST_A(6); + DO_TEST_A(7); + DO_TEST_A(8); + + DO_TEST_A(11); + DO_TEST_A(12); + DO_TEST_A(13); + DO_TEST_A(14); + DO_TEST_A(15); + DO_TEST_A(16); + DO_TEST_A(17); + DO_TEST_A(18); + + DO_TEST_A(101); + DO_TEST_A(102); + DO_TEST_A(103); + DO_TEST_A(104); + DO_TEST_A(105); + DO_TEST_A(106); + DO_TEST_A(107); + DO_TEST_A(108); + + DO_TEST_A(201); + DO_TEST_A(202); + DO_TEST_A(203); + DO_TEST_A(204); + DO_TEST_A(205); + DO_TEST_A(206); + DO_TEST_A(207); + DO_TEST_A(208); + + DO_TEST_A(401); + DO_TEST_A(402); + DO_TEST_A(403); + + /* check if the results are equal */ + DO_TEST_B(1); + DO_TEST_B(2); + DO_TEST_B(3); + DO_TEST_B(4); + DO_TEST_B(5); + DO_TEST_B(6); + DO_TEST_B(7); + DO_TEST_B(8); + + DO_TEST_B(11); + DO_TEST_B(12); + DO_TEST_B(13); + DO_TEST_B(14); + DO_TEST_B(15); + DO_TEST_B(16); + DO_TEST_B(17); + DO_TEST_B(18); + + DO_TEST_B(101); + DO_TEST_B(102); + DO_TEST_B(103); + DO_TEST_B(104); + DO_TEST_B(105); + DO_TEST_B(106); + DO_TEST_B(107); + DO_TEST_B(108); + + DO_TEST_B(201); + DO_TEST_B(202); + DO_TEST_B(203); + DO_TEST_B(204); + DO_TEST_B(205); + DO_TEST_B(206); + DO_TEST_B(207); + DO_TEST_B(208); + + DO_TEST_B(401); + DO_TEST_B(402); + DO_TEST_B(403); + + return res; +} diff --git a/test/val/duffs-device.c b/test/val/duffs-device.c new file mode 100644 index 000000000..eb91e244f --- /dev/null +++ b/test/val/duffs-device.c @@ -0,0 +1,76 @@ +/* + !!DESCRIPTION!! Implementation of Duff's device (loop unrolling). + !!ORIGIN!! + !!LICENCE!! GPL, read COPYING.GPL +*/ + +#include <stdio.h> +#include <limits.h> + +#define ASIZE (100) + +unsigned char success=0; +unsigned char failures=0; +unsigned char dummy=0; + +#ifdef SUPPORT_BIT_TYPES +bit bit0 = 0; +#endif + +void done() +{ + dummy++; +} + +int acmp(char* a, char* b, int count) +{ + int i; + + for(i = 0; i < count; i++) { + if(a[i] != b[i]) { + return 1; + } + } + return 0; +} + +void duffit (char* to, char* from, int count) +{ + int n = (count + 7) / 8; + + switch(count % 8) { + case 0: do { *to++ = *from++; + case 7: *to++ = *from++; + case 6: *to++ = *from++; + case 5: *to++ = *from++; + case 4: *to++ = *from++; + case 3: *to++ = *from++; + case 2: *to++ = *from++; + case 1: *to++ = *from++; + } while(--n > 0); + } +} + +int main(void) +{ + char a[ASIZE] = {1}; + char b[ASIZE] = {2}; + + /* a and b should be different */ + if(!acmp(a, b, ASIZE)) { + failures++; + } + + duffit(a, b, ASIZE); + + /* a and b should be the same */ + if(acmp(a, b, ASIZE)) { + failures++; + } + + success=failures; + done(); + printf("failures: %d\n",failures); + + return failures; +} diff --git a/test/val/fields.c b/test/val/fields.c new file mode 100644 index 000000000..acc561ce7 --- /dev/null +++ b/test/val/fields.c @@ -0,0 +1,94 @@ +/* + !!DESCRIPTION!! bitfield test + !!ORIGIN!! LCC 4.1 Testsuite + !!LICENCE!! own, freely distributeable for non-profit. read CPYRIGHT.LCC +*/ + +#include "common.h" + +#ifdef NO_BITFIELDS + +main() +{ + printf("NO_BITFIELDS\n\r"); +} + +#else + +#ifdef SIZEOF_INT_16BIT + +#ifdef REFCC +#include <stdint.h> +struct foo { + int16_t a; + char b; + int16_t x : 12, y : 4; + int16_t zz : 1, : 0, : 4, z : 3; + char c; +} x = { 1, 2, 3, 4, 5, 6 }; + +struct baz { uint16_t a:2, b:4, c:16;} y = { 7, 8, 9}; +int16_t i = 8; + +#else + +struct foo { + int a; + char b; + int x : 12, y : 4; + int zz : 1, : 0, : 4, z : 3; + char c; +} x = { 1, 2, 3, 4, 5, 6 }; + +struct baz { unsigned int a:2, b:4, c:16;} y = { 7, 8, 9}; +int i = 8; +#endif + +#else +struct foo { + int a; + char b; + int x : 12, y : 4, : 0, : 4, z : 3; + char c; +} x = { 1, 2, 3, 4, 5, 6 }; + +struct baz { unsigned int a:2, b:4, c:32;} y = { 7, 8, 9}; +int i = 16; +#endif + +#ifdef NO_IMPLICIT_FUNC_PROTOTYPES +f1(struct baz *p); +f2(struct baz *p); +#endif + +main() +{ + printf("x = %d b:%d %d %d %d c:%d\n", x.a, x.b, x.x, x.y, x.z, x.c); + printf("y = %d b:%d c:%d\n", y.a, y.b, y.c); + x.y = i; + x.z = 070; + printf("x = %d b:%d %d %d %d c:%d\n", x.a, x.b, x.x, x.y, x.z, x.c); + y.a = 2; + y.c = i; + printf("y = %d b:%d c:%d\n", y.a, y.b, y.c); +#ifdef CAST_STRUCT_PTR + f2((struct baz *)&x); +#else + f2(&x); +#endif + return 0; +} + +f1(struct baz *p) { + p->a = p->b = 0; + if (p->b) + printf("p->b != 0!\n"); + p->a = 0x3; p->b = 0xf; + printf("p->a = 0x%x, p->b = 0x%x\n", p->a, p->b); +} +f2(struct baz *p) { + p->a = (i==0); + p->b = (f1(p),0); +} + +#endif diff --git a/test/val/jmp-callax.c b/test/val/jmp-callax.c new file mode 100644 index 000000000..eb0cb271a --- /dev/null +++ b/test/val/jmp-callax.c @@ -0,0 +1,21 @@ +static unsigned char val; + +static void foo(void) { + val = 5; +} + +static void wrap(void) { + + asm("lda #<%v", foo); + asm("ldx #>%v", foo); + asm("jmp callax"); + +} + +int main(void) { + + val = 0; + wrap(); + + return val == 5 ? 0 : 1; +} diff --git a/testcode/lib/atoi-test.c b/test/val/lib_common_atoi.c similarity index 68% rename from testcode/lib/atoi-test.c rename to test/val/lib_common_atoi.c index 8bc77d488..5f5fa65e7 100644 --- a/testcode/lib/atoi-test.c +++ b/test/val/lib_common_atoi.c @@ -1,32 +1,28 @@ -/* A small test for atoi. Assumes twos complement */ +/* + !!DESCRIPTION!! A small test for atoi. Assumes twos complement + !!ORIGIN!! + !!LICENCE!! + !!AUTHOR!! +*/ + #include <stdio.h> #include <stdlib.h> #include <string.h> #include <limits.h> #include <errno.h> - - -#define outfile stderr - - - static unsigned int Failures = 0; - - static void CheckAtoi (const char* Str, int Val) { int Res = atoi (Str); if (Res != Val) { - fprintf (outfile, "atoi error in \"%s\":\n" - " result = %d, should be %d\n", Str, Res, Val); + printf ("atoi error in \"%s\":\n" + " result = %d, should be %d\n", Str, Res, Val); ++Failures; } } - - int main (void) { CheckAtoi ("\t +0A", 0); @@ -40,6 +36,7 @@ int main (void) CheckAtoi ("0x7FFF", 0); CheckAtoi (" +0x7FFF", 0); CheckAtoi (" -0x7FFF", 0); - fprintf (outfile, "Failures: %u\n", Failures); - return (Failures != 0); + printf ("Failures: %u\n", Failures); + + return Failures; } diff --git a/test/val/lib_common_ctype.c b/test/val/lib_common_ctype.c new file mode 100644 index 000000000..281ee454e --- /dev/null +++ b/test/val/lib_common_ctype.c @@ -0,0 +1,368 @@ +// lib_common_ctype.c +// +// This file is part of +// cc65 - a freeware C compiler for 6502 based systems +// +// https://cc65.github.io +// +// See "LICENSE" file for legal information. +// +// Unit test for character classification functions ("is..") +// + +#include <ctype.h> +#include <stdbool.h> +#include "unittest.h" + +#define NUMTESTS 257 + +typedef struct +{ + bool isalnum; + bool isalpha; + bool isascii; + bool iscntrl; + bool isdigit; + bool isgraph; + bool islower; + bool isprint; + bool ispunct; + bool isspace; + bool isupper; + bool isxdigit; + bool isblank; + +} CTypeClassifications; + + +CTypeClassifications testSet[NUMTESTS] = +{ + //alnum, alpha, ascii, cntrl, digit, graph, lower, print, punct, space, upper, xdigit,blank + + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 00 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 01 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 02 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 03 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 04 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 05 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 06 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 07 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 08 + {false, false, true, true, false, false, false, false, false, true, false, false, true }, // 09 + {false, false, true, true, false, false, false, false, false, true, false, false, false}, // 0A + {false, false, true, true, false, false, false, false, false, true, false, false, false}, // 0B + {false, false, true, true, false, false, false, false, false, true, false, false, false}, // 0C + {false, false, true, true, false, false, false, false, false, true, false, false, false}, // 0D + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 0E + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 0F + + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 10 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 11 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 12 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 13 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 14 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 15 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 16 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 17 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 18 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 19 + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 1A + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 1B + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 1C + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 1D + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 1E + {false, false, true, true, false, false, false, false, false, false, false, false, false}, // 1F + + {false, false, true, false, false, false, false, true, false, true, false, false, true }, // 20 + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 21 + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 22 + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 23 + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 24 + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 25 + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 26 + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 27 + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 28 + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 29 + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 2A + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 2B + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 2C + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 2D + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 2E + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 2F + + {true, false, true, false, true, true, false, true, false, false, false, true, false}, // 30 + {true, false, true, false, true, true, false, true, false, false, false, true, false}, // 31 + {true, false, true, false, true, true, false, true, false, false, false, true, false}, // 32 + {true, false, true, false, true, true, false, true, false, false, false, true, false}, // 33 + {true, false, true, false, true, true, false, true, false, false, false, true, false}, // 34 + {true, false, true, false, true, true, false, true, false, false, false, true, false}, // 35 + {true, false, true, false, true, true, false, true, false, false, false, true, false}, // 36 + {true, false, true, false, true, true, false, true, false, false, false, true, false}, // 37 + {true, false, true, false, true, true, false, true, false, false, false, true, false}, // 38 + {true, false, true, false, true, true, false, true, false, false, false, true, false}, // 39 + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 3A + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 3B + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 3C + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 3D + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 3E + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 3F + + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 40 + {true, true, true, false, false, true, false, true, false, false, true, true, false}, // 41 + {true, true, true, false, false, true, false, true, false, false, true, true, false}, // 42 + {true, true, true, false, false, true, false, true, false, false, true, true, false}, // 43 + {true, true, true, false, false, true, false, true, false, false, true, true, false}, // 44 + {true, true, true, false, false, true, false, true, false, false, true, true, false}, // 45 + {true, true, true, false, false, true, false, true, false, false, true, true, false}, // 46 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 47 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 48 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 49 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 4A + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 4B + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 4C + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 4D + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 4E + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 4F + + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 50 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 51 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 52 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 53 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 54 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 55 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 56 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 57 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 58 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 59 + {true, true, true, false, false, true, false, true, false, false, true, false, false}, // 5A + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 5B + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 5C + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 5D + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 5E + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 5F + + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 60 + {true, true, true, false, false, true, true, true, false, false, false, true, false}, // 61 + {true, true, true, false, false, true, true, true, false, false, false, true, false}, // 62 + {true, true, true, false, false, true, true, true, false, false, false, true, false}, // 63 + {true, true, true, false, false, true, true, true, false, false, false, true, false}, // 64 + {true, true, true, false, false, true, true, true, false, false, false, true, false}, // 65 + {true, true, true, false, false, true, true, true, false, false, false, true, false}, // 66 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 67 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 68 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 69 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 6A + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 6B + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 6C + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 6D + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 6E + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 6F + + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 70 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 71 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 72 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 73 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 74 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 75 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 76 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 77 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 78 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 79 + {true, true, true, false, false, true, true, true, false, false, false, false, false}, // 7A + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 7B + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 7C + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 7D + {false, false, true, false, false, true, false, true, true, false, false, false, false}, // 7E + {false, false, true, false, false, true, false, true, true, true, false, false, false}, // 7F + + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 80 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 81 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 82 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 83 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 84 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 85 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 86 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 87 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 88 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 89 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 8A + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 8B + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 8C + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 8D + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 8E + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 8F + + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 90 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 91 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 92 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 93 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 94 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 95 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 96 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 97 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 98 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 99 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 9A + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 9B + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 9C + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 9D + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 9E + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // 9F + + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // A0 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // A1 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // A2 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // A3 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // A4 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // A5 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // A6 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // A7 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // A8 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // A9 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // AA + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // AB + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // AC + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // AD + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // AE + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // AF + + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // B0 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // B1 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // B2 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // B3 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // B4 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // B5 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // B6 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // B7 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // B8 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // B9 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // BA + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // BB + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // BC + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // BD + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // BE + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // BF + + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // C0 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // C1 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // C2 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // C3 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // C4 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // C5 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // C6 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // C7 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // C8 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // C9 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // CA + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // CB + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // CC + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // CD + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // CE + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // CF + + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // D0 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // D1 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // D2 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // D3 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // D4 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // D5 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // D6 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // D7 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // D8 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // D9 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // DA + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // DB + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // DC + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // DD + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // DE + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // DF + + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // E0 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // E1 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // E2 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // E3 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // E4 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // E5 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // E6 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // E7 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // E8 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // E9 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // EA + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // EB + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // EC + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // ED + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // EE + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // EF + + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // F0 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // F1 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // F2 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // F3 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // F4 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // F5 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // F6 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // F7 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // F8 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // F9 + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // FA + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // FB + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // FC + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // FD + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // FE + {false, false, false, false, false, true, false, true, true, false, false, false, false}, // FF + + // out of range test + {false, false, false, false, false, false, false, false, false, false, false, false, false} // 100 +}; + + +TEST +{ + int i = 0; + + while (i<NUMTESTS) + { + // isalnum() + ASSERT_AreEqual(testSet[i].isalnum, (isalnum(i) ? true : false), "%d", "Invalid 'isalnum(%d)' classification!" COMMA i); + + // isalpha() + ASSERT_AreEqual(testSet[i].isalpha, (isalpha(i) ? true : false), "%d", "Invalid 'isalpha(%d)' classification!" COMMA i); + + // isascii() + ASSERT_AreEqual(testSet[i].isascii, (isascii(i) ? true : false), "%d", "Invalid 'isascii(%d)' classification!" COMMA i); + + // iscntrl() + ASSERT_AreEqual(testSet[i].iscntrl, (iscntrl(i) ? true : false), "%d", "Invalid 'iscntrl(%d)' classification!" COMMA i); + + // isdigit() + ASSERT_AreEqual(testSet[i].isdigit, (isdigit(i) ? true : false), "%d", "Invalid 'isdigit(%d)' classification!" COMMA i); + + // isgraph() + ASSERT_AreEqual(testSet[i].isgraph, (isgraph(i) ? true : false), "%d", "Invalid 'isgraph(%d)' classification!" COMMA i); + + // islower() + ASSERT_AreEqual(testSet[i].islower, (islower(i) ? true : false), "%d", "Invalid 'islower(%d)' classification!" COMMA i); + + // isprint() + ASSERT_AreEqual(testSet[i].isprint, (isprint(i) ? true : false), "%d", "Invalid 'isprint(%d)' classification!" COMMA i); + + // ispunct() + ASSERT_AreEqual(testSet[i].ispunct, (ispunct(i) ? true : false), "%d", "Invalid 'ispunct(%d)' classification!" COMMA i); + + // isspace() + ASSERT_AreEqual(testSet[i].isspace, (isspace(i) ? true : false), "%d", "Invalid 'isspace(%d)' classification!" COMMA i); + + // isupper() + ASSERT_AreEqual(testSet[i].isupper, (isupper(i) ? true : false), "%d", "Invalid 'isupper(%d)' classification!" COMMA i); + + // isxdigit() + ASSERT_AreEqual(testSet[i].isxdigit, (isxdigit(i) ? true : false), "%d", "Invalid 'isxdigit(%d)' classification!" COMMA i); + +#if __CC65_STD__ >= __CC65_STD_C99__ + // isblank() + ASSERT_AreEqual(testSet[i].isblank, (isblank(i) ? true : false), "%d", "Invalid 'isblank(%d)' classification!" COMMA i); +#endif + ++i; + } +} +ENDTEST diff --git a/test/val/lib_common_memmove.c b/test/val/lib_common_memmove.c new file mode 100644 index 000000000..cf81bc404 --- /dev/null +++ b/test/val/lib_common_memmove.c @@ -0,0 +1,58 @@ +#include <string.h> +#include "unittest.h" + +#define BufferSize 384 // test correct page passing (>256, multiple of 128 here) + +static char Buffer[BufferSize+3]; // +1 to move up (and down) + + +TEST +{ + unsigned i, v; + char* p; + + for (i=0; i < BufferSize; ++i) + Buffer[i+1] = (i%128); + + Buffer[0] = 255; // to check if start position is untouched + Buffer[BufferSize+2] = 255; // to check if end position is untouched + + // copy upwards + p = memmove(Buffer+2, Buffer+1, BufferSize); + + // check buffer consistency before target + ASSERT_AreEqual(255, (unsigned)Buffer[0], "%u", "Unexpected value before range!"); + + // check buffer consistency at starting point + ASSERT_AreEqual(0, (unsigned)Buffer[1], "%u", "Unexpected value at range start!"); + + // check buffer consistency after range + ASSERT_AreEqual(255, (unsigned)Buffer[BufferSize+2], "%u", "Unexpected value after range!"); + + // check buffer values + for (i=0; i < BufferSize; ++i) + { + ASSERT_AreEqual(i%128, (unsigned)Buffer[i+2], "%u", "Unexpected value in buffer at position %u!" COMMA i+2); + } + + v = Buffer[BufferSize+1]; // rember value of first untouched end-byte + + // copy downwards + p = memmove(Buffer+1, Buffer+2, BufferSize); + + // check buffer consistency before target + ASSERT_AreEqual(255, (unsigned)Buffer[0], "%u", "Unexpected value before range!"); + + // check buffer consistency at end point + ASSERT_AreEqual(v, (unsigned)Buffer[BufferSize+1], "%u", "Unexpected value at range end!"); + + // check buffer consistency after range + ASSERT_AreEqual(255, (unsigned)Buffer[BufferSize+2], "%u", "Unexpected value after range!"); + + // check buffer values + for (i=0; i < BufferSize; ++i) + { + ASSERT_AreEqual(i%128, (unsigned)Buffer[i+1], "%u", "Unexpected value in buffer at position %u!" COMMA i+1); + } +} +ENDTEST diff --git a/test/val/lib_common_mulxx.c b/test/val/lib_common_mulxx.c new file mode 100644 index 000000000..e5afb3f0e --- /dev/null +++ b/test/val/lib_common_mulxx.c @@ -0,0 +1,18 @@ +#include <cc65.h> +#include "unittest.h" + +TEST +{ + unsigned i; + + for (i=0; i < 256; ++i) + { + ASSERT_AreEqual(i*20, mul20(i), "%u", "Invalid 'mul20(%u)' calculation!" COMMA i); + } + + for (i=0; i < 256; ++i) + { + ASSERT_AreEqual(i*40, mul40(i), "%u", "Invalid 'mul40(%u)' calculation!" COMMA i); + } +} +ENDTEST diff --git a/test/val/lib_common_strcat.c b/test/val/lib_common_strcat.c new file mode 100644 index 000000000..3947c5130 --- /dev/null +++ b/test/val/lib_common_strcat.c @@ -0,0 +1,54 @@ +#include <string.h> +#include "unittest.h" + +#define SourceStringSize 257 // test correct page passing (>256) + +static char SourceString[SourceStringSize+1]; // +1 room for terminating null +static char DestinationString[2*SourceStringSize+1]; // will contain two times the source buffer + + +TEST +{ + unsigned i,j; + char* p; + + for (i=0; i < SourceStringSize; ++i) + SourceString[i] = (i%128)+1; + + SourceString[i] = 0; + + ASSERT_AreEqual(SourceStringSize, strlen(SourceString), "%u", "Source string initialization or 'strlen()' problem!"); + + /* Ensure empty destination string */ + DestinationString[0] = 0; + + ASSERT_AreEqual(0, strlen(DestinationString), "%u", "Destination string initialization or 'strlen()' problem!"); + + /* Test concatenation to empty buffer */ + + strcat(DestinationString, SourceString); + + ASSERT_AreEqual(SourceStringSize, strlen(DestinationString), "%u", "Unexpected string length while string concatenation to empty buffer!"); + + /* Test concatenation to non empty buffer */ + + p = strcat(DestinationString, SourceString); + + ASSERT_AreEqual(2*SourceStringSize, strlen(DestinationString), "%u", "Unexpected string length while string concatenation to non-empty buffer!"); + + /* Test return value */ + + ASSERT_IsTrue(p == DestinationString,"Invalid return value!"); + + /* Test contents */ + + for(j=0; j <2; ++j) + for(i=0; i < SourceStringSize; ++i) + { + unsigned position = j*SourceStringSize+i; + unsigned current = DestinationString[position]; + unsigned expected = (i%128)+1; + ASSERT_AreEqual(expected, current, "%u", "Unexpected destination buffer contents at position %u!\n" COMMA position); + } +} +ENDTEST diff --git a/test/val/lib_common_strchr.c b/test/val/lib_common_strchr.c new file mode 100644 index 000000000..6f2db258a --- /dev/null +++ b/test/val/lib_common_strchr.c @@ -0,0 +1,42 @@ +#include <string.h> +#include "unittest.h" + + +/* Test string. Must NOT have duplicate characters! */ +static char S[] = "Helo wrd!\n"; + +static char Found[256]; + + + +TEST +{ + unsigned Len; + unsigned I; + char* P; + + /* Get the length of the string */ + Len = strlen (S); + + /* Search for all characters in the string, including the terminator */ + for (I = 0; I < Len+1; ++I) + { + /* Search for this char */ + P = strchr (S, S[I]); + + /* Check if we found it */ + ASSERT_IsFalse(P == 0 || (P - S) != I, "For code 0x%02X, offset %u!\nP = %04X offset = %04X\n" COMMA S[I] COMMA I COMMA P COMMA P-S); + /* Mark the char as checked */ + Found[S[I]] = 1; + } + + /* Search for all other characters and make sure they aren't found */ + for (I = 0; I < 256; ++I) + { + if (Found[I] == 0) + { + ASSERT_IsFalse(strchr (S, (char)I), "Failed for code 0x%02X\n" COMMA I); + } + } +} +ENDTEST diff --git a/test/val/lib_common_strcspn.c b/test/val/lib_common_strcspn.c new file mode 100644 index 000000000..1adb19671 --- /dev/null +++ b/test/val/lib_common_strcspn.c @@ -0,0 +1,25 @@ +#include <string.h> +#include "unittest.h" + +#define EstimatedStringSize 384 // test correct page passing (>256) + +static char EstimatedString[EstimatedStringSize+1]; // +1 room for terminating null +static char* EmptyTestChars=""; // strlen equivalent... +static char* TestChars="1234567890"; // we like to find numbers + + +TEST +{ + unsigned i; + + for (i=0; i < EstimatedStringSize; ++i) + EstimatedString[i] = (i%26)+'A'; // put ABCD... into the string to be estimated + + ASSERT_AreEqual(strlen(EstimatedString), strcspn(EstimatedString, TestChars), "%u", "Unxpected position returned for non-participant case!"); + + EstimatedString[EstimatedStringSize/2] = TestChars[strlen(TestChars-1)]; + ASSERT_AreEqual(EstimatedStringSize/2, strcspn(EstimatedString, TestChars), "%u", "Unxpected position returned for participant case!"); + + ASSERT_AreEqual(strlen(EstimatedString), strcspn(EstimatedString, EmptyTestChars), "%u", "Unxpected position returned for empty test case!"); +} +ENDTEST diff --git a/test/val/lib_common_strncat.c b/test/val/lib_common_strncat.c new file mode 100644 index 000000000..54cf0e3e5 --- /dev/null +++ b/test/val/lib_common_strncat.c @@ -0,0 +1,52 @@ +#include <string.h> +#include "unittest.h" + +#define SourceStringSize 384 // test correct page passing (>256, multiple of 128 here) + +static char SourceString[SourceStringSize+1]; // +1 room for terminating null +static char DestinationString[2*SourceStringSize+1]; // will contain two times the source buffer + + +TEST +{ + unsigned i; + char* p; + + for (i=0; i < SourceStringSize; ++i) + SourceString[i] = (i%128)+1; + + SourceString[i] = 0; + + ASSERT_AreEqual(SourceStringSize, strlen(SourceString), "%u", "Source string initialization or 'strlen()' problem!"); + + /* Ensure empty destination string */ + DestinationString[0] = 0; + + ASSERT_AreEqual(0, strlen(DestinationString), "%u", "Destination string initialization or 'strlen()' problem!"); + + /* Test "unlimted" concatenation to empty buffer */ + + strncat(DestinationString, SourceString, 1024); + + ASSERT_AreEqual(SourceStringSize, strlen(DestinationString), "%u", "Unexpected string length while string concatenation to empty buffer!"); + + /* Test limited concatenation to non empty buffer */ + + p = strncat(DestinationString, SourceString, 128); + + ASSERT_AreEqual(SourceStringSize+128, strlen(DestinationString), "%u", "Unexpected string length while string concatenation to non-empty buffer!"); + + /* Test return value */ + + ASSERT_IsTrue(p == DestinationString, "Invalid return value!"); + + /* Test contents */ + + for(i=0; i < strlen(DestinationString); ++i) + { + unsigned current = DestinationString[i]; + unsigned expected = (i%128)+1; + ASSERT_AreEqual(expected, current, "%u", "Unexpected destination buffer contents at position %u!\n" COMMA i); + } +} +ENDTEST diff --git a/testcode/lib/strtol-test.c b/test/val/lib_common_strol.c similarity index 79% rename from testcode/lib/strtol-test.c rename to test/val/lib_common_strol.c index 86c56d4db..76daef791 100644 --- a/testcode/lib/strtol-test.c +++ b/test/val/lib_common_strol.c @@ -1,29 +1,25 @@ -/* A small test for strtol. Assumes twos complement */ +/* + !!DESCRIPTION!! A small test for atoi/strtol. Assumes twos complement + !!ORIGIN!! + !!LICENCE!! + !!AUTHOR!! +*/ + #include <stdio.h> #include <stdlib.h> #include <string.h> #include <limits.h> #include <errno.h> - - -#define outfile stderr - - - #define ERROR 0 #define OK 1 - - static unsigned int Failures = 0; - - static void IncStr (char* Buf) /* Increment a number represented as a string by one. The string MUST not -** start with a '9', we cannot handle overflow in this case. -*/ + * start with a '9', we cannot handle overflow in this case. + */ { int Len = strlen (Buf); @@ -40,40 +36,33 @@ static void IncStr (char* Buf) } } - - static void CheckStrToL (const char* Str, int Base, long Val, unsigned char Ok) { char* EndPtr; long Res = strtol (Str, &EndPtr, Base); if (Ok) { if (Res != Val) { - fprintf (outfile, - "strtol error in \"%s\":\n" - " result = %ld, should be %ld, chars = %d\n", - Str, Res, Val, EndPtr - Str); + printf ("strtol error in \"%s\":\n" + " result = %ld, should be %ld, chars = %d\n", + Str, Res, Val, EndPtr - Str); ++Failures; } } else { if (errno != ERANGE) { - fprintf (outfile, - "strtol error in \"%s\":\n" - " should not convert, but errno = %d\n", - Str, errno); + printf ("strtol error in \"%s\":\n" + " should not convert, but errno = %d\n", + Str, errno); ++Failures; } if (Res != Val) { - fprintf (outfile, - "strtol error in \"%s\":\n" - " result = %ld, should be %ld, chars = %d\n", - Str, Res, Val, EndPtr - Str); + printf ("strtol error in \"%s\":\n" + " result = %ld, should be %ld, chars = %d\n", + Str, Res, Val, EndPtr - Str); ++Failures; } } } - - int main (void) { char Buf[80]; @@ -140,6 +129,7 @@ int main (void) CheckStrToL ("zyaB", 35, 0L, ERROR); CheckStrToL ("zyaB", 36, 1677395L, ERROR); - fprintf (outfile, "Failures: %u\n", Failures); - return (Failures != 0); + printf ("Failures: %u\n", Failures); + + return Failures; } diff --git a/test/val/lib_common_strrchr.c b/test/val/lib_common_strrchr.c new file mode 100644 index 000000000..840ec2b7c --- /dev/null +++ b/test/val/lib_common_strrchr.c @@ -0,0 +1,38 @@ +#include <string.h> +#include "unittest.h" + +static char TestString[] = "01234567890123456789"; // two times the same string +static char Found[256]; + +TEST +{ + unsigned len; + unsigned i; + char* p; + + len = strlen(TestString)/2; // test only one half of the string, to find last appearance + + /* Search for all characters in the string, including the terminator */ + for (i = 0; i < len; ++i) + { + /* Search for this char */ + p = strrchr (TestString, TestString[i]); + ASSERT_AreEqual(i+len, p-TestString, "%u", "Unexpected location of character '%c' found!" COMMA TestString[i]); + + /* Mark the char as checked */ + Found[TestString[i]] = 1; + } + + /* Search for all other characters and make sure they aren't found */ + for (i = 0; i < 256; ++i) + { + if (!Found[i]) + { + p = strrchr (TestString, i); + ASSERT_IsFalse(p, "Unexpected location of character '%c' found!" COMMA TestString[i]); + } + } +} +ENDTEST + + diff --git a/test/val/lib_common_strspn.c b/test/val/lib_common_strspn.c new file mode 100644 index 000000000..b7b4c1d85 --- /dev/null +++ b/test/val/lib_common_strspn.c @@ -0,0 +1,24 @@ +#include <string.h> +#include "unittest.h" + +#define EstimatedStringSize 384 // test correct page passing (>256) + +static char EstimatedString[EstimatedStringSize+1]; // +1 room for terminating null +static char* EmptyTestChars=""; // empty test case... +static char* TestChars="1234567890"; // we like to find numbers + +TEST +{ + unsigned i; + + for (i=0; i < EstimatedStringSize; ++i) + EstimatedString[i] = (i%10)+'0'; // put 0123... into the string to be estimated + + ASSERT_AreEqual(strlen(EstimatedString), strspn(EstimatedString, TestChars), "%u", "Unxpected position returned for all participant case!"); + + EstimatedString[EstimatedStringSize/2] = 'X'; + ASSERT_AreEqual(EstimatedStringSize/2, strspn(EstimatedString, TestChars), "%u", "Unxpected position returned for breaking case!"); + + ASSERT_AreEqual(0, strspn(EstimatedString, EmptyTestChars), "%u", "Unxpected position returned for empty test case!"); +} +ENDTEST diff --git a/testcode/lib/strtoul-test.c b/test/val/lib_common_strtoul.c similarity index 78% rename from testcode/lib/strtoul-test.c rename to test/val/lib_common_strtoul.c index cc37d1dd4..803fd452c 100644 --- a/testcode/lib/strtoul-test.c +++ b/test/val/lib_common_strtoul.c @@ -1,29 +1,25 @@ -/* A small test for strtuol. Assumes twos complement */ +/* + !!DESCRIPTION!! A small test for strtuol. Assumes twos complement + !!ORIGIN!! + !!LICENCE!! + !!AUTHOR!! +*/ + #include <stdio.h> #include <stdlib.h> #include <string.h> #include <limits.h> #include <errno.h> - - -#define outfile stderr - - - #define ERROR 0 #define OK 1 - - static unsigned int Failures = 0; - - static void IncStr (char* Buf) /* Increment a number represented as a string by one. The string MUST not -** start with a '9', we cannot handle overflow in this case. -*/ + * start with a '9', we cannot handle overflow in this case. + */ { int Len = strlen (Buf); @@ -40,40 +36,33 @@ static void IncStr (char* Buf) } } - - static void CheckStrToUL (const char* Str, int Base, unsigned long Val, unsigned char Ok) { char* EndPtr; unsigned long Res = strtoul (Str, &EndPtr, Base); if (Ok) { if (Res != Val) { - fprintf (outfile, - "strtol error in \"%s\":\n" - " result = %lu, should be %lu, chars = %d\n", - Str, Res, Val, EndPtr - Str); + printf ("strtol error in \"%s\":\n" + " result = %lu, should be %lu, chars = %d\n", + Str, Res, Val, EndPtr - Str); ++Failures; } } else { if (errno != ERANGE) { - fprintf (outfile, - "strtol error in \"%s\":\n" - " should not convert, but errno = %d\n", - Str, errno); + printf ("strtol error in \"%s\":\n" + " should not convert, but errno = %d\n", + Str, errno); ++Failures; } if (Res != Val) { - fprintf (outfile, - "strtol error in \"%s\":\n" - " result = %lu, should be %lu, chars = %d\n", - Str, Res, Val, EndPtr - Str); + printf ("strtol error in \"%s\":\n" + " result = %lu, should be %lu, chars = %d\n", + Str, Res, Val, EndPtr - Str); ++Failures; } } } - - int main (void) { char Buf[80]; @@ -126,7 +115,7 @@ int main (void) CheckStrToUL ("zyaB", 35, 0UL, ERROR); CheckStrToUL ("zyaB", 36, 1677395UL, ERROR); - fprintf (outfile, "Failures: %u\n", Failures); - return (Failures != 0); -} + printf ("Failures: %u\n", Failures); + return Failures; +} diff --git a/test/val/lz4.c b/test/val/lz4.c new file mode 100644 index 000000000..6fe72e72d --- /dev/null +++ b/test/val/lz4.c @@ -0,0 +1,669 @@ +/* + !!DESCRIPTION!! lz4 decompression + !!ORIGIN!! cc65 regression tests + !!LICENCE!! BSD 2-clause + !!AUTHOR!! Lauri Kasanen +*/ + +#include <zlib.h> +#include <stdio.h> +#include <lz4.h> + +/* The sample data is the original lz4.h, compressed with lz4 hc */ +static const unsigned char compressed[] = { +0xf0, 0x1a, 0x2f, 0x2a, 0x0a, 0x20, 0x20, 0x20, 0x4c, 0x5a, 0x34, 0x20, +0x2d, 0x20, 0x46, 0x61, 0x73, 0x74, 0x20, 0x4c, 0x5a, 0x20, 0x63, 0x6f, +0x6d, 0x70, 0x72, 0x65, 0x73, 0x73, 0x69, 0x6f, 0x6e, 0x20, 0x61, 0x6c, +0x67, 0x6f, 0x72, 0x69, 0x74, 0x68, 0x6d, 0x27, 0x00, 0xb0, 0x48, 0x65, +0x61, 0x64, 0x65, 0x72, 0x20, 0x46, 0x69, 0x6c, 0x65, 0x0f, 0x00, 0xf0, +0x17, 0x43, 0x6f, 0x70, 0x79, 0x72, 0x69, 0x67, 0x68, 0x74, 0x20, 0x28, +0x43, 0x29, 0x20, 0x32, 0x30, 0x31, 0x31, 0x2d, 0x32, 0x30, 0x31, 0x35, +0x2c, 0x20, 0x59, 0x61, 0x6e, 0x6e, 0x20, 0x43, 0x6f, 0x6c, 0x6c, 0x65, +0x74, 0x2e, 0x0a, 0x2a, 0x00, 0xf2, 0x22, 0x42, 0x53, 0x44, 0x20, 0x32, +0x2d, 0x43, 0x6c, 0x61, 0x75, 0x73, 0x65, 0x20, 0x4c, 0x69, 0x63, 0x65, +0x6e, 0x73, 0x65, 0x20, 0x28, 0x68, 0x74, 0x74, 0x70, 0x3a, 0x2f, 0x2f, +0x77, 0x77, 0x77, 0x2e, 0x6f, 0x70, 0x65, 0x6e, 0x73, 0x6f, 0x75, 0x72, +0x63, 0x65, 0x2e, 0x6f, 0x72, 0x67, 0x2f, 0x6c, 0x23, 0x00, 0x63, 0x73, +0x2f, 0x62, 0x73, 0x64, 0x2d, 0x0d, 0x00, 0x51, 0x2e, 0x70, 0x68, 0x70, +0x29, 0x4e, 0x00, 0xb1, 0x52, 0x65, 0x64, 0x69, 0x73, 0x74, 0x72, 0x69, +0x62, 0x75, 0x74, 0xa3, 0x00, 0x30, 0x6e, 0x64, 0x20, 0x58, 0x00, 0x32, +0x69, 0x6e, 0x20, 0x43, 0x00, 0x01, 0x12, 0x00, 0xf1, 0x06, 0x62, 0x69, +0x6e, 0x61, 0x72, 0x79, 0x20, 0x66, 0x6f, 0x72, 0x6d, 0x73, 0x2c, 0x20, +0x77, 0x69, 0x74, 0x68, 0x20, 0x6f, 0x72, 0x08, 0x00, 0x30, 0x6f, 0x75, +0x74, 0x46, 0x00, 0x80, 0x6d, 0x6f, 0x64, 0x69, 0x66, 0x69, 0x63, 0x61, +0x44, 0x00, 0xf0, 0x22, 0x2c, 0x20, 0x61, 0x72, 0x65, 0x20, 0x70, 0x65, +0x72, 0x6d, 0x69, 0x74, 0x74, 0x65, 0x64, 0x20, 0x70, 0x72, 0x6f, 0x76, +0x69, 0x64, 0x65, 0x64, 0x20, 0x74, 0x68, 0x61, 0x74, 0x20, 0x74, 0x68, +0x65, 0x20, 0x66, 0x6f, 0x6c, 0x6c, 0x6f, 0x77, 0x69, 0x6e, 0x67, 0x20, +0x63, 0x6f, 0x6e, 0x64, 0x69, 0x35, 0x00, 0x10, 0x73, 0x35, 0x00, 0x01, +0x4a, 0x00, 0x31, 0x65, 0x74, 0x3a, 0x99, 0x00, 0x00, 0x01, 0x00, 0x1b, +0x2a, 0x9f, 0x00, 0x44, 0x73, 0x20, 0x6f, 0x66, 0x98, 0x00, 0xf1, 0x01, +0x63, 0x6f, 0x64, 0x65, 0x20, 0x6d, 0x75, 0x73, 0x74, 0x20, 0x72, 0x65, +0x74, 0x61, 0x69, 0x6e, 0x5a, 0x00, 0x40, 0x61, 0x62, 0x6f, 0x76, 0x1b, +0x00, 0x03, 0x4c, 0x01, 0x00, 0x48, 0x00, 0xf0, 0x02, 0x6e, 0x6f, 0x74, +0x69, 0x63, 0x65, 0x2c, 0x20, 0x74, 0x68, 0x69, 0x73, 0x20, 0x6c, 0x69, +0x73, 0x74, 0x44, 0x00, 0x08, 0x78, 0x00, 0x2b, 0x6e, 0x64, 0x95, 0x00, +0xbf, 0x64, 0x69, 0x73, 0x63, 0x6c, 0x61, 0x69, 0x6d, 0x65, 0x72, 0x2e, +0x89, 0x00, 0x07, 0x28, 0x69, 0x6e, 0x16, 0x01, 0x04, 0x89, 0x00, 0x76, +0x70, 0x72, 0x6f, 0x64, 0x75, 0x63, 0x65, 0x8c, 0x00, 0x00, 0x41, 0x00, +0x05, 0x8f, 0x00, 0x0f, 0x8c, 0x00, 0x2a, 0x00, 0x4a, 0x00, 0x03, 0xe6, +0x00, 0x94, 0x64, 0x6f, 0x63, 0x75, 0x6d, 0x65, 0x6e, 0x74, 0x61, 0xb3, +0x01, 0xf6, 0x04, 0x2f, 0x6f, 0x72, 0x20, 0x6f, 0x74, 0x68, 0x65, 0x72, +0x20, 0x6d, 0x61, 0x74, 0x65, 0x72, 0x69, 0x61, 0x6c, 0x73, 0x77, 0x01, +0x01, 0xaf, 0x01, 0x21, 0x74, 0x68, 0x8b, 0x00, 0x08, 0xc4, 0x00, 0x02, +0x4e, 0x02, 0xf0, 0x34, 0x54, 0x48, 0x49, 0x53, 0x20, 0x53, 0x4f, 0x46, +0x54, 0x57, 0x41, 0x52, 0x45, 0x20, 0x49, 0x53, 0x20, 0x50, 0x52, 0x4f, +0x56, 0x49, 0x44, 0x45, 0x44, 0x20, 0x42, 0x59, 0x20, 0x54, 0x48, 0x45, +0x20, 0x43, 0x4f, 0x50, 0x59, 0x52, 0x49, 0x47, 0x48, 0x54, 0x20, 0x48, +0x4f, 0x4c, 0x44, 0x45, 0x52, 0x53, 0x20, 0x41, 0x4e, 0x44, 0x20, 0x43, +0x4f, 0x4e, 0x54, 0x52, 0x49, 0x42, 0x55, 0x54, 0x4f, 0x52, 0x53, 0x47, +0x00, 0x71, 0x22, 0x41, 0x53, 0x20, 0x49, 0x53, 0x22, 0x1c, 0x00, 0xf1, +0x26, 0x41, 0x4e, 0x59, 0x20, 0x45, 0x58, 0x50, 0x52, 0x45, 0x53, 0x53, +0x20, 0x4f, 0x52, 0x20, 0x49, 0x4d, 0x50, 0x4c, 0x49, 0x45, 0x44, 0x20, +0x57, 0x41, 0x52, 0x52, 0x41, 0x4e, 0x54, 0x49, 0x45, 0x53, 0x2c, 0x20, +0x49, 0x4e, 0x43, 0x4c, 0x55, 0x44, 0x49, 0x4e, 0x47, 0x2c, 0x20, 0x42, +0x55, 0x54, 0x20, 0x4e, 0x4f, 0x54, 0x3a, 0x03, 0xa1, 0x49, 0x4d, 0x49, +0x54, 0x45, 0x44, 0x20, 0x54, 0x4f, 0x2c, 0x7b, 0x00, 0x0e, 0x3a, 0x00, +0xf1, 0x04, 0x20, 0x4f, 0x46, 0x20, 0x4d, 0x45, 0x52, 0x43, 0x48, 0x41, +0x4e, 0x54, 0x41, 0x42, 0x49, 0x4c, 0x49, 0x54, 0x59, 0x73, 0x00, 0x40, +0x46, 0x49, 0x54, 0x4e, 0x6f, 0x00, 0x30, 0x46, 0x4f, 0x52, 0x49, 0x00, +0xf0, 0x06, 0x41, 0x20, 0x50, 0x41, 0x52, 0x54, 0x49, 0x43, 0x55, 0x4c, +0x41, 0x52, 0x20, 0x50, 0x55, 0x52, 0x50, 0x4f, 0x53, 0x45, 0x20, 0xe0, +0x00, 0xfa, 0x0e, 0x44, 0x49, 0x53, 0x43, 0x4c, 0x41, 0x49, 0x4d, 0x45, +0x44, 0x2e, 0x20, 0x49, 0x4e, 0x20, 0x4e, 0x4f, 0x20, 0x45, 0x56, 0x45, +0x4e, 0x54, 0x20, 0x53, 0x48, 0x41, 0x4c, 0x4c, 0xef, 0x00, 0x00, 0x48, +0x00, 0x50, 0x4f, 0x57, 0x4e, 0x45, 0x52, 0xc4, 0x00, 0x08, 0xef, 0x00, +0xa0, 0x20, 0x42, 0x45, 0x20, 0x4c, 0x49, 0x41, 0x42, 0x4c, 0x45, 0x6f, +0x00, 0x01, 0xee, 0x00, 0x60, 0x44, 0x49, 0x52, 0x45, 0x43, 0x54, 0xd7, +0x00, 0x06, 0x0a, 0x00, 0x90, 0x43, 0x49, 0x44, 0x45, 0x4e, 0x54, 0x41, +0x4c, 0x2c, 0x49, 0x00, 0xf3, 0x04, 0x53, 0x50, 0x45, 0x43, 0x49, 0x41, +0x4c, 0x2c, 0x20, 0x45, 0x58, 0x45, 0x4d, 0x50, 0x4c, 0x41, 0x52, 0x59, +0x2c, 0x57, 0x00, 0xff, 0x05, 0x53, 0x45, 0x51, 0x55, 0x45, 0x4e, 0x54, +0x49, 0x41, 0x4c, 0x20, 0x44, 0x41, 0x4d, 0x41, 0x47, 0x45, 0x53, 0x20, +0x28, 0x1e, 0x01, 0x0f, 0x80, 0x50, 0x52, 0x4f, 0x43, 0x55, 0x52, 0x45, +0x4d, 0xbc, 0x00, 0xf1, 0x03, 0x4f, 0x46, 0x20, 0x53, 0x55, 0x42, 0x53, +0x54, 0x49, 0x54, 0x55, 0x54, 0x45, 0x20, 0x47, 0x4f, 0x4f, 0x44, 0x77, +0x01, 0xd1, 0x53, 0x45, 0x52, 0x56, 0x49, 0x43, 0x45, 0x53, 0x3b, 0x20, +0x4c, 0x4f, 0x53, 0x39, 0x01, 0x31, 0x55, 0x53, 0x45, 0x8d, 0x00, 0x41, +0x44, 0x41, 0x54, 0x41, 0x7f, 0x00, 0x80, 0x50, 0x52, 0x4f, 0x46, 0x49, +0x54, 0x53, 0x3b, 0x0c, 0x00, 0x41, 0x42, 0x55, 0x53, 0x49, 0x43, 0x01, +0xf1, 0x0d, 0x49, 0x4e, 0x54, 0x45, 0x52, 0x52, 0x55, 0x50, 0x54, 0x49, +0x4f, 0x4e, 0x29, 0x20, 0x48, 0x4f, 0x57, 0x45, 0x56, 0x45, 0x52, 0x20, +0x43, 0x41, 0x55, 0x53, 0x45, 0x44, 0x6c, 0x01, 0x20, 0x4f, 0x4e, 0xf4, +0x00, 0x02, 0x3c, 0x02, 0x40, 0x45, 0x4f, 0x52, 0x59, 0x5b, 0x00, 0x23, +0x4c, 0x49, 0x8e, 0x01, 0x90, 0x2c, 0x20, 0x57, 0x48, 0x45, 0x54, 0x48, +0x45, 0x52, 0x5f, 0x01, 0x01, 0x36, 0x01, 0x10, 0x41, 0x0f, 0x01, 0x68, +0x53, 0x54, 0x52, 0x49, 0x43, 0x54, 0x27, 0x00, 0x61, 0x4f, 0x52, 0x20, +0x54, 0x4f, 0x52, 0xd9, 0x00, 0x06, 0xf0, 0x00, 0xb0, 0x20, 0x4e, 0x45, +0x47, 0x4c, 0x49, 0x47, 0x45, 0x4e, 0x43, 0x45, 0x21, 0x00, 0x10, 0x4f, +0x49, 0x00, 0xa0, 0x57, 0x49, 0x53, 0x45, 0x29, 0x20, 0x41, 0x52, 0x49, +0x53, 0x21, 0x00, 0x11, 0x49, 0x7d, 0x00, 0x71, 0x20, 0x57, 0x41, 0x59, +0x20, 0x4f, 0x55, 0xfc, 0x00, 0x00, 0xb5, 0x01, 0x31, 0x55, 0x53, 0x45, +0xaf, 0x01, 0x1a, 0x46, 0xcf, 0x02, 0x11, 0x2c, 0xde, 0x01, 0x80, 0x20, +0x49, 0x46, 0x20, 0x41, 0x44, 0x56, 0x49, 0xc0, 0x00, 0x03, 0x30, 0x00, +0x53, 0x50, 0x4f, 0x53, 0x53, 0x49, 0x3f, 0x02, 0x01, 0x3f, 0x01, 0x23, +0x43, 0x48, 0x7e, 0x01, 0x02, 0x15, 0x03, 0x70, 0x59, 0x6f, 0x75, 0x20, +0x63, 0x61, 0x6e, 0x9b, 0x03, 0x32, 0x74, 0x61, 0x63, 0xb5, 0x04, 0xb0, +0x61, 0x75, 0x74, 0x68, 0x6f, 0x72, 0x20, 0x61, 0x74, 0x20, 0x3a, 0x23, +0x00, 0x11, 0x2d, 0xe8, 0x05, 0x03, 0x8c, 0x04, 0xd0, 0x72, 0x65, 0x70, +0x6f, 0x73, 0x69, 0x74, 0x6f, 0x72, 0x79, 0x20, 0x3a, 0x20, 0x8a, 0x05, +0xf6, 0x0c, 0x73, 0x3a, 0x2f, 0x2f, 0x67, 0x69, 0x74, 0x68, 0x75, 0x62, +0x2e, 0x63, 0x6f, 0x6d, 0x2f, 0x43, 0x79, 0x61, 0x6e, 0x34, 0x39, 0x37, +0x33, 0x2f, 0x6c, 0x7a, 0x34, 0x3d, 0x00, 0x60, 0x70, 0x75, 0x62, 0x6c, +0x69, 0x63, 0x40, 0x04, 0x28, 0x75, 0x6d, 0x38, 0x00, 0xc1, 0x72, 0x6f, +0x75, 0x70, 0x73, 0x2e, 0x67, 0x6f, 0x6f, 0x67, 0x6c, 0x65, 0x3f, 0x00, +0x01, 0x22, 0x00, 0x32, 0x2f, 0x23, 0x21, 0x08, 0x00, 0xf0, 0x1b, 0x6c, +0x7a, 0x34, 0x63, 0x0a, 0x2a, 0x2f, 0x0a, 0x23, 0x70, 0x72, 0x61, 0x67, +0x6d, 0x61, 0x20, 0x6f, 0x6e, 0x63, 0x65, 0x0a, 0x0a, 0x23, 0x69, 0x66, +0x20, 0x64, 0x65, 0x66, 0x69, 0x6e, 0x65, 0x64, 0x20, 0x28, 0x5f, 0x5f, +0x63, 0x70, 0x6c, 0x75, 0x73, 0x04, 0x00, 0xf0, 0x08, 0x29, 0x0a, 0x65, +0x78, 0x74, 0x65, 0x72, 0x6e, 0x20, 0x22, 0x43, 0x22, 0x20, 0x7b, 0x0a, +0x23, 0x65, 0x6e, 0x64, 0x69, 0x66, 0x0a, 0x0a, 0xab, 0x06, 0x74, 0x2a, +0x20, 0x6c, 0x7a, 0x34, 0x2e, 0x68, 0x2a, 0x04, 0x79, 0x73, 0x20, 0x62, +0x6c, 0x6f, 0x63, 0x6b, 0xb2, 0x06, 0x41, 0x66, 0x75, 0x6e, 0x63, 0x9b, +0x04, 0x11, 0x2c, 0x9c, 0x04, 0xf1, 0x02, 0x67, 0x69, 0x76, 0x65, 0x73, +0x20, 0x66, 0x75, 0x6c, 0x6c, 0x20, 0x62, 0x75, 0x66, 0x66, 0x65, 0x72, +0x22, 0x01, 0x60, 0x72, 0x6f, 0x6c, 0x20, 0x74, 0x6f, 0x47, 0x00, 0x42, +0x67, 0x72, 0x61, 0x6d, 0x37, 0x05, 0xb0, 0x2a, 0x20, 0x49, 0x66, 0x20, +0x79, 0x6f, 0x75, 0x20, 0x6e, 0x65, 0xfa, 0x05, 0x90, 0x6f, 0x20, 0x67, +0x65, 0x6e, 0x65, 0x72, 0x61, 0x74, 0x5a, 0x06, 0xc5, 0x74, 0x65, 0x72, +0x2d, 0x6f, 0x70, 0x65, 0x72, 0x61, 0x62, 0x6c, 0x65, 0x6e, 0x00, 0xf0, +0x01, 0x65, 0x64, 0x20, 0x64, 0x61, 0x74, 0x61, 0x20, 0x28, 0x72, 0x65, +0x73, 0x70, 0x65, 0x63, 0x74, 0xfd, 0x04, 0x00, 0x25, 0x01, 0x60, 0x66, +0x72, 0x61, 0x6d, 0x65, 0x20, 0x13, 0x00, 0x05, 0x61, 0x06, 0x20, 0x29, +0x2c, 0x60, 0x00, 0x00, 0x90, 0x00, 0x00, 0xa4, 0x01, 0x22, 0x6c, 0x65, +0xa0, 0x01, 0x40, 0x6c, 0x69, 0x62, 0x72, 0x8f, 0x05, 0xf1, 0x0e, 0x68, +0x61, 0x6e, 0x64, 0x6c, 0x65, 0x20, 0x69, 0x74, 0x73, 0x20, 0x6f, 0x77, +0x6e, 0x20, 0x6d, 0x65, 0x6d, 0x6f, 0x72, 0x79, 0x2c, 0x20, 0x70, 0x6c, +0x65, 0x61, 0x73, 0x65, 0xdc, 0x06, 0x31, 0x6c, 0x7a, 0x34, 0x56, 0x00, +0xb0, 0x2e, 0x68, 0x20, 0x69, 0x6e, 0x73, 0x74, 0x65, 0x61, 0x64, 0x2e, +0x50, 0x01, 0x3f, 0x0a, 0x2f, 0x2a, 0x01, 0x00, 0x12, 0x70, 0x0a, 0x2a, +0x20, 0x20, 0x56, 0x65, 0x72, 0x20, 0x01, 0x1f, 0x0a, 0x32, 0x00, 0x13, +0x32, 0x2f, 0x0a, 0x23, 0x9b, 0x01, 0x00, 0xd2, 0x00, 0xe0, 0x5f, 0x56, +0x45, 0x52, 0x53, 0x49, 0x4f, 0x4e, 0x5f, 0x4d, 0x41, 0x4a, 0x4f, 0x52, +0x5d, 0x06, 0x10, 0x31, 0x05, 0x00, 0x20, 0x2f, 0x2a, 0x09, 0x02, 0x60, +0x20, 0x62, 0x72, 0x65, 0x61, 0x6b, 0xfc, 0x00, 0x01, 0x27, 0x01, 0x20, +0x66, 0x61, 0xe9, 0x06, 0x8f, 0x68, 0x61, 0x6e, 0x67, 0x65, 0x73, 0x20, +0x20, 0x48, 0x00, 0x05, 0x22, 0x49, 0x4e, 0x48, 0x00, 0x17, 0x37, 0x48, +0x00, 0x94, 0x6e, 0x65, 0x77, 0x20, 0x28, 0x6e, 0x6f, 0x6e, 0x2d, 0x51, +0x00, 0x18, 0x29, 0x52, 0x00, 0xbf, 0x61, 0x70, 0x61, 0x62, 0x69, 0x6c, +0x69, 0x74, 0x69, 0x65, 0x73, 0x56, 0x00, 0x05, 0x7a, 0x52, 0x45, 0x4c, +0x45, 0x41, 0x53, 0x45, 0x9e, 0x00, 0xf0, 0x03, 0x74, 0x77, 0x65, 0x61, +0x6b, 0x73, 0x2c, 0x20, 0x62, 0x75, 0x67, 0x2d, 0x66, 0x69, 0x78, 0x65, +0x73, 0x2c, 0x08, 0x08, 0x70, 0x64, 0x65, 0x76, 0x65, 0x6c, 0x6f, 0x70, +0x92, 0x06, 0x0f, 0x4e, 0x00, 0x05, 0x8e, 0x4e, 0x55, 0x4d, 0x42, 0x45, +0x52, 0x20, 0x28, 0x00, 0x01, 0x40, 0x2a, 0x31, 0x30, 0x30, 0x04, 0x00, +0x2f, 0x20, 0x2b, 0xd5, 0x00, 0x00, 0x0e, 0x19, 0x00, 0x04, 0x98, 0x00, +0x51, 0x29, 0x0a, 0x69, 0x6e, 0x74, 0x19, 0x00, 0x12, 0x76, 0x8b, 0x01, +0xef, 0x4e, 0x75, 0x6d, 0x62, 0x65, 0x72, 0x20, 0x28, 0x76, 0x6f, 0x69, +0x64, 0x29, 0x3b, 0xcd, 0x01, 0x1a, 0x30, 0x54, 0x75, 0x6e, 0x72, 0x01, +0x20, 0x70, 0x61, 0x15, 0x02, 0x3f, 0x74, 0x65, 0x72, 0xd6, 0x01, 0x16, +0x02, 0x45, 0x03, 0x00, 0x85, 0x00, 0xc0, 0x4d, 0x45, 0x4d, 0x4f, 0x52, +0x59, 0x5f, 0x55, 0x53, 0x41, 0x47, 0x45, 0x20, 0x04, 0x31, 0x2a, 0x20, +0x4d, 0x78, 0x02, 0x61, 0x20, 0x75, 0x73, 0x61, 0x67, 0x65, 0x23, 0x08, +0xf0, 0x1d, 0x75, 0x6c, 0x61, 0x20, 0x3a, 0x20, 0x4e, 0x2d, 0x3e, 0x32, +0x5e, 0x4e, 0x20, 0x42, 0x79, 0x74, 0x65, 0x73, 0x20, 0x28, 0x65, 0x78, +0x61, 0x6d, 0x70, 0x6c, 0x65, 0x73, 0x20, 0x3a, 0x20, 0x31, 0x30, 0x20, +0x2d, 0x3e, 0x20, 0x31, 0x4b, 0x42, 0x3b, 0x20, 0x31, 0x32, 0x0b, 0x00, +0x80, 0x34, 0x4b, 0x42, 0x20, 0x3b, 0x20, 0x31, 0x36, 0x0c, 0x00, 0x20, +0x36, 0x34, 0x18, 0x00, 0x12, 0x32, 0x23, 0x00, 0x91, 0x4d, 0x42, 0x3b, +0x20, 0x65, 0x74, 0x63, 0x2e, 0x29, 0x66, 0x03, 0x60, 0x6e, 0x63, 0x72, +0x65, 0x61, 0x73, 0xc0, 0x00, 0x18, 0x6d, 0x72, 0x00, 0x20, 0x69, 0x6d, +0xd6, 0x03, 0x29, 0x65, 0x73, 0xce, 0x03, 0x10, 0x72, 0x3f, 0x03, 0x12, +0x0a, 0xcd, 0x08, 0x4a, 0x75, 0x63, 0x65, 0x64, 0x33, 0x00, 0x00, 0x4d, +0x03, 0x03, 0x37, 0x00, 0x00, 0x70, 0x03, 0x70, 0x65, 0x64, 0x2c, 0x20, +0x64, 0x75, 0x65, 0xbc, 0x03, 0xc0, 0x63, 0x61, 0x63, 0x68, 0x65, 0x20, +0x65, 0x66, 0x66, 0x65, 0x63, 0x74, 0x3f, 0x00, 0xf1, 0x05, 0x44, 0x65, +0x66, 0x61, 0x75, 0x6c, 0x74, 0x20, 0x76, 0x61, 0x6c, 0x75, 0x65, 0x20, +0x69, 0x73, 0x20, 0x31, 0x34, 0x2c, 0x20, 0x02, 0xf0, 0x05, 0x31, 0x36, +0x4b, 0x42, 0x2c, 0x20, 0x77, 0x68, 0x69, 0x63, 0x68, 0x20, 0x6e, 0x69, +0x63, 0x65, 0x6c, 0x79, 0x20, 0x66, 0x89, 0x03, 0xf2, 0x02, 0x69, 0x6e, +0x74, 0x6f, 0x20, 0x49, 0x6e, 0x74, 0x65, 0x6c, 0x20, 0x78, 0x38, 0x36, +0x20, 0x4c, 0x31, 0x53, 0x00, 0x1c, 0x0a, 0x2f, 0x02, 0x09, 0x47, 0x01, +0x3f, 0x31, 0x34, 0x0a, 0xc7, 0x01, 0x1a, 0x20, 0x53, 0x69, 0x4c, 0x01, +0x24, 0x20, 0x46, 0xb3, 0x04, 0x0f, 0xc7, 0x01, 0x16, 0x05, 0x4b, 0x02, +0x04, 0x2c, 0x01, 0x22, 0x5f, 0x64, 0xe1, 0x00, 0x60, 0x28, 0x63, 0x6f, +0x6e, 0x73, 0x74, 0x81, 0x03, 0x23, 0x72, 0x2a, 0xeb, 0x05, 0x13, 0x2c, +0x0e, 0x00, 0x50, 0x64, 0x65, 0x73, 0x74, 0x2c, 0xd8, 0x00, 0x03, 0x18, +0x00, 0x42, 0x53, 0x69, 0x7a, 0x65, 0x10, 0x00, 0x70, 0x6d, 0x61, 0x78, +0x44, 0x65, 0x73, 0x74, 0x11, 0x00, 0x25, 0x29, 0x3b, 0x5b, 0x00, 0x25, +0x64, 0x65, 0x5d, 0x00, 0x5f, 0x73, 0x61, 0x66, 0x65, 0x20, 0x5b, 0x00, +0x12, 0x06, 0x1c, 0x05, 0x0b, 0x5f, 0x00, 0x0a, 0x19, 0x00, 0x02, 0xef, +0x02, 0x1f, 0x0a, 0xc2, 0x00, 0x02, 0x12, 0x29, 0xae, 0x06, 0x24, 0x20, +0x43, 0x32, 0x00, 0x36, 0x73, 0x20, 0x27, 0xb2, 0x00, 0x31, 0x27, 0x20, +0x62, 0x89, 0x02, 0x44, 0x66, 0x72, 0x6f, 0x6d, 0xd2, 0x05, 0x03, 0x1f, +0x00, 0x11, 0x27, 0x37, 0x00, 0x01, 0xb9, 0x01, 0xe0, 0x61, 0x6c, 0x72, +0x65, 0x61, 0x64, 0x79, 0x20, 0x61, 0x6c, 0x6c, 0x6f, 0x63, 0x61, 0xd3, +0x0b, 0x10, 0x27, 0xa4, 0x00, 0x14, 0x27, 0x32, 0x00, 0x00, 0x94, 0x0b, +0x57, 0x69, 0x7a, 0x65, 0x20, 0x27, 0xfb, 0x00, 0x29, 0x27, 0x2e, 0x77, +0x00, 0x00, 0x7e, 0x02, 0xa3, 0x69, 0x73, 0x20, 0x67, 0x75, 0x61, 0x72, +0x61, 0x6e, 0x74, 0x13, 0x06, 0x40, 0x73, 0x75, 0x63, 0x63, 0x0b, 0x00, +0x2a, 0x69, 0x66, 0x3b, 0x00, 0x39, 0x20, 0x3e, 0x3d, 0x8f, 0x01, 0x66, +0x42, 0x6f, 0x75, 0x6e, 0x64, 0x28, 0xb6, 0x00, 0x12, 0x29, 0x5c, 0x00, +0xf0, 0x11, 0x49, 0x74, 0x20, 0x61, 0x6c, 0x73, 0x6f, 0x20, 0x72, 0x75, +0x6e, 0x73, 0x20, 0x66, 0x61, 0x73, 0x74, 0x65, 0x72, 0x2c, 0x20, 0x73, +0x6f, 0x20, 0x69, 0x74, 0x27, 0x73, 0x20, 0x61, 0x20, 0x72, 0x26, 0x01, +0x30, 0x6d, 0x65, 0x6e, 0x03, 0x0b, 0x30, 0x73, 0x65, 0x74, 0x51, 0x06, +0x03, 0x38, 0x00, 0x12, 0x66, 0x64, 0x0b, 0x03, 0xdb, 0x06, 0x00, 0xf8, +0x02, 0x26, 0x6e, 0x6f, 0x6d, 0x01, 0x05, 0x01, 0x01, 0x03, 0xfd, 0x00, +0x40, 0x20, 0x6d, 0x6f, 0x72, 0x5e, 0x06, 0x29, 0x6d, 0x69, 0xfa, 0x00, +0x41, 0x64, 0x67, 0x65, 0x74, 0x4e, 0x09, 0x09, 0x62, 0x03, 0xf2, 0x04, +0x73, 0x74, 0x6f, 0x70, 0x73, 0x20, 0x2a, 0x69, 0x6d, 0x6d, 0x65, 0x64, +0x69, 0x61, 0x74, 0x65, 0x6c, 0x79, 0x2a, 0x3a, 0x07, 0x09, 0x72, 0x00, +0x30, 0x72, 0x65, 0x73, 0x3f, 0x03, 0x72, 0x69, 0x73, 0x20, 0x7a, 0x65, +0x72, 0x6f, 0x96, 0x00, 0x10, 0x41, 0xb4, 0x00, 0x00, 0x15, 0x02, 0x50, +0x65, 0x71, 0x75, 0x65, 0x6e, 0x0e, 0x02, 0x03, 0x6b, 0x00, 0x00, 0x62, +0x07, 0x21, 0x65, 0x6e, 0x2e, 0x00, 0x21, 0x6e, 0x6f, 0x74, 0x03, 0x22, +0x69, 0x64, 0x33, 0x00, 0x10, 0x54, 0x46, 0x0c, 0x05, 0x55, 0x00, 0x90, +0x6e, 0x65, 0x76, 0x65, 0x72, 0x20, 0x77, 0x72, 0x69, 0xd1, 0x01, 0x7a, +0x6f, 0x75, 0x74, 0x73, 0x69, 0x64, 0x65, 0xa9, 0x01, 0x60, 0x2c, 0x20, +0x6e, 0x6f, 0x72, 0x20, 0xcc, 0x01, 0x06, 0x20, 0x00, 0x04, 0xec, 0x00, +0x02, 0x22, 0x00, 0x05, 0xf0, 0x0c, 0x07, 0xd6, 0x02, 0xe0, 0x20, 0x20, +0x3a, 0x20, 0x4d, 0x61, 0x78, 0x20, 0x73, 0x75, 0x70, 0x70, 0x6f, 0x72, +0x04, 0x01, 0x05, 0xf7, 0x03, 0x01, 0xb3, 0x03, 0xe5, 0x41, 0x58, 0x5f, +0x49, 0x4e, 0x50, 0x55, 0x54, 0x5f, 0x56, 0x41, 0x4c, 0x55, 0x45, 0x41, +0x00, 0x07, 0xd1, 0x01, 0x22, 0x20, 0x3a, 0x33, 0x08, 0x20, 0x6f, 0x72, +0x64, 0x05, 0x42, 0x74, 0x69, 0x61, 0x6c, 0x30, 0x02, 0x25, 0x6f, 0x66, +0x74, 0x02, 0x02, 0xa7, 0x00, 0x12, 0x28, 0x3a, 0x04, 0x01, 0x4c, 0x0d, +0x2e, 0x62, 0x65, 0x78, 0x02, 0x15, 0x29, 0x5e, 0x00, 0x81, 0x72, 0x65, +0x74, 0x75, 0x72, 0x6e, 0x20, 0x3a, 0x58, 0x01, 0x12, 0x6e, 0xfb, 0x05, +0x23, 0x6f, 0x66, 0xce, 0x02, 0x00, 0x04, 0x01, 0x32, 0x74, 0x65, 0x6e, +0xc0, 0x01, 0x0b, 0x62, 0x00, 0xe0, 0x6e, 0x65, 0x63, 0x65, 0x73, 0x73, +0x61, 0x72, 0x69, 0x6c, 0x79, 0x20, 0x3c, 0x3d, 0xa6, 0x00, 0x52, 0x4f, +0x75, 0x74, 0x70, 0x75, 0xaf, 0x03, 0x29, 0x0a, 0x20, 0x01, 0x00, 0x40, +0x6f, 0x72, 0x20, 0x30, 0x9d, 0x02, 0x09, 0x11, 0x09, 0x6f, 0x61, 0x69, +0x6c, 0x73, 0x0a, 0x0a, 0xd3, 0x03, 0x00, 0x05, 0x6b, 0x03, 0x0a, 0x9d, +0x03, 0x20, 0x20, 0x3a, 0x2a, 0x01, 0x00, 0xa7, 0x00, 0x72, 0x70, 0x72, +0x65, 0x63, 0x69, 0x73, 0x65, 0x0c, 0x01, 0x04, 0x01, 0x01, 0x29, 0x74, +0x68, 0x03, 0x09, 0x01, 0x82, 0x09, 0x02, 0x86, 0x01, 0x0e, 0xe9, 0x03, +0x07, 0x4c, 0x00, 0x04, 0x3f, 0x00, 0x00, 0xd6, 0x00, 0x22, 0x69, 0x6e, +0x08, 0x0e, 0x04, 0xe5, 0x01, 0x0f, 0x45, 0x01, 0x0c, 0x2f, 0x2e, 0x0a, +0x41, 0x01, 0x0e, 0x17, 0x64, 0x78, 0x00, 0x02, 0x46, 0x01, 0x0e, 0x68, +0x00, 0x0e, 0x4b, 0x01, 0x0f, 0x99, 0x04, 0x00, 0x0a, 0x51, 0x01, 0x1f, +0x49, 0xb0, 0x00, 0x01, 0x04, 0xd8, 0x02, 0xd1, 0x6c, 0x61, 0x72, 0x67, +0x65, 0x20, 0x65, 0x6e, 0x6f, 0x75, 0x67, 0x68, 0x2c, 0x82, 0x00, 0x10, +0x64, 0xd5, 0x06, 0x41, 0x77, 0x69, 0x6c, 0x6c, 0x56, 0x03, 0x01, 0x46, +0x03, 0x11, 0x6f, 0xac, 0x01, 0x92, 0x20, 0x61, 0x6e, 0x20, 0x65, 0x72, +0x72, 0x6f, 0x72, 0x04, 0x10, 0x5d, 0x28, 0x3c, 0x30, 0x29, 0x2e, 0x6a, +0x00, 0x01, 0x26, 0x01, 0x02, 0x9e, 0x0b, 0x60, 0x73, 0x74, 0x72, 0x65, +0x61, 0x6d, 0x69, 0x00, 0x50, 0x64, 0x65, 0x74, 0x65, 0x63, 0xc3, 0x02, +0x30, 0x6d, 0x61, 0x6c, 0x94, 0x07, 0x00, 0xe4, 0x06, 0x09, 0x9a, 0x03, +0x06, 0x6f, 0x00, 0x05, 0x82, 0x00, 0x00, 0x78, 0x00, 0x03, 0x2e, 0x01, +0xa3, 0x61, 0x20, 0x6e, 0x65, 0x67, 0x61, 0x74, 0x69, 0x76, 0x65, 0xc3, +0x03, 0x0b, 0x77, 0x00, 0x0a, 0x91, 0x03, 0x11, 0x69, 0x84, 0x0f, 0x03, +0x71, 0x00, 0x30, 0x61, 0x67, 0x61, 0x6c, 0x0a, 0x05, 0x33, 0x05, 0xf0, +0x01, 0x76, 0x65, 0x72, 0x66, 0x6c, 0x6f, 0x77, 0x20, 0x65, 0x78, 0x70, +0x6c, 0x6f, 0x69, 0x74, 0x73, 0xdd, 0x05, 0x31, 0x63, 0x6c, 0x75, 0x72, +0x00, 0x92, 0x6d, 0x61, 0x6c, 0x69, 0x63, 0x69, 0x6f, 0x75, 0x73, 0x12, +0x0b, 0x7c, 0x70, 0x61, 0x63, 0x6b, 0x65, 0x74, 0x73, 0xe3, 0x00, 0x1f, +0x74, 0xf2, 0x03, 0x03, 0x03, 0x23, 0x01, 0x0c, 0xf2, 0x03, 0x06, 0x21, +0x00, 0x26, 0x69, 0x6e, 0x20, 0x00, 0x02, 0xf8, 0x0a, 0x0f, 0x65, 0x07, +0x19, 0x50, 0x41, 0x64, 0x76, 0x61, 0x6e, 0x3b, 0x08, 0x0e, 0x67, 0x07, +0x0f, 0x04, 0x0b, 0x19, 0x06, 0x36, 0x04, 0x44, 0x53, 0x49, 0x5a, 0x45, +0xd4, 0x00, 0x51, 0x30, 0x78, 0x37, 0x45, 0x30, 0x01, 0x00, 0x02, 0x73, +0x0a, 0xd3, 0x32, 0x20, 0x31, 0x31, 0x33, 0x20, 0x39, 0x32, 0x39, 0x20, +0x32, 0x31, 0x36, 0x9c, 0x02, 0x0b, 0xaf, 0x0a, 0x31, 0x43, 0x4f, 0x4d, +0x69, 0x10, 0x70, 0x42, 0x4f, 0x55, 0x4e, 0x44, 0x28, 0x69, 0x18, 0x03, +0xe4, 0x29, 0x20, 0x20, 0x28, 0x28, 0x75, 0x6e, 0x73, 0x69, 0x67, 0x6e, +0x65, 0x64, 0x29, 0x14, 0x00, 0x26, 0x3e, 0x20, 0x14, 0x00, 0x0f, 0x82, +0x00, 0x00, 0x64, 0x3f, 0x20, 0x30, 0x20, 0x3a, 0x20, 0x2d, 0x00, 0x33, +0x2b, 0x20, 0x28, 0x0b, 0x00, 0x40, 0x2f, 0x32, 0x35, 0x35, 0x10, 0x00, +0x3d, 0x31, 0x36, 0x29, 0x65, 0x07, 0x02, 0x98, 0x06, 0x04, 0xf7, 0x03, +0x14, 0x50, 0x46, 0x0d, 0x00, 0x51, 0x02, 0x72, 0x6d, 0x61, 0x78, 0x69, +0x6d, 0x75, 0x6d, 0xa8, 0x03, 0x01, 0xf8, 0x12, 0x00, 0xcc, 0x0c, 0x08, +0x49, 0x04, 0x34, 0x6d, 0x61, 0x79, 0xac, 0x01, 0x10, 0x69, 0x5a, 0x02, +0x40, 0x22, 0x77, 0x6f, 0x72, 0x11, 0x08, 0xf2, 0x00, 0x61, 0x73, 0x65, +0x22, 0x20, 0x73, 0x63, 0x65, 0x6e, 0x61, 0x72, 0x69, 0x6f, 0x20, 0x28, +0xae, 0x01, 0x01, 0x08, 0x02, 0x08, 0xa5, 0x06, 0x33, 0x69, 0x62, 0x6c, +0x5e, 0x03, 0x0f, 0x74, 0x02, 0x00, 0x22, 0x69, 0x6d, 0x95, 0x03, 0x61, +0x75, 0x73, 0x65, 0x66, 0x75, 0x6c, 0x99, 0x09, 0x03, 0xe9, 0x09, 0x03, +0x05, 0x04, 0x00, 0x2a, 0x00, 0x50, 0x70, 0x75, 0x72, 0x70, 0x6f, 0x0f, +0x08, 0x1f, 0x28, 0x94, 0x03, 0x00, 0x16, 0x73, 0x66, 0x07, 0x5f, 0x4d, +0x61, 0x63, 0x72, 0x6f, 0x6b, 0x01, 0x00, 0x10, 0x29, 0x6c, 0x00, 0x01, +0x80, 0x07, 0x05, 0x69, 0x12, 0x11, 0x66, 0x92, 0x03, 0x41, 0x6d, 0x70, +0x69, 0x6c, 0x4d, 0x00, 0x70, 0x2d, 0x74, 0x69, 0x6d, 0x65, 0x20, 0x65, +0x2e, 0x06, 0x02, 0x5d, 0x00, 0x6f, 0x28, 0x73, 0x74, 0x61, 0x63, 0x6b, +0x8c, 0x00, 0x00, 0x00, 0x39, 0x00, 0x03, 0x0b, 0x0b, 0x03, 0x76, 0x00, +0x36, 0x4e, 0x6f, 0x74, 0x38, 0x01, 0x0f, 0xd6, 0x08, 0x01, 0x05, 0xae, +0x07, 0x02, 0xf9, 0x07, 0x51, 0x20, 0x77, 0x68, 0x65, 0x6e, 0x5e, 0x04, +0x08, 0xc3, 0x00, 0x00, 0xa3, 0x00, 0x0f, 0x4c, 0x08, 0x03, 0x2a, 0x72, +0x63, 0xa0, 0x04, 0x01, 0x67, 0x01, 0x04, 0xee, 0x06, 0x1f, 0x6d, 0xee, +0x06, 0x11, 0x00, 0x36, 0x02, 0x0e, 0x8f, 0x06, 0x04, 0xf8, 0x01, 0x03, +0xda, 0x01, 0x02, 0x85, 0x00, 0x0f, 0xdf, 0x01, 0x06, 0x0f, 0x70, 0x06, +0x00, 0x10, 0x2c, 0x71, 0x06, 0x26, 0x69, 0x6e, 0x3d, 0x00, 0x53, 0x73, +0x20, 0x74, 0x6f, 0x6f, 0x1e, 0x05, 0x3f, 0x28, 0x20, 0x3e, 0x86, 0x00, +0x00, 0x10, 0x29, 0xc5, 0x03, 0x0c, 0xc3, 0x0a, 0x02, 0xe8, 0x00, 0x00, +0x16, 0x00, 0x05, 0xdb, 0x00, 0x0f, 0x27, 0x0a, 0x01, 0x00, 0x3e, 0x01, +0x05, 0xc2, 0x02, 0x10, 0x53, 0x6a, 0x0f, 0x2f, 0x61, 0x73, 0x73, 0x01, +0x04, 0x00, 0xf6, 0x0d, 0x11, 0x74, 0xb6, 0x01, 0x21, 0x77, 0x73, 0xbe, +0x09, 0x41, 0x65, 0x6c, 0x65, 0x63, 0x8c, 0x05, 0x81, 0x22, 0x61, 0x63, +0x63, 0x65, 0x6c, 0x65, 0x72, 0xcd, 0x01, 0x84, 0x22, 0x20, 0x66, 0x61, +0x63, 0x74, 0x6f, 0x72, 0xa3, 0x08, 0x12, 0x65, 0xbc, 0x00, 0x12, 0x72, +0x44, 0x11, 0x07, 0x29, 0x00, 0x02, 0x59, 0x01, 0x03, 0x80, 0x05, 0x02, +0xc5, 0x01, 0x01, 0x23, 0x00, 0x04, 0x24, 0x17, 0x04, 0x70, 0x00, 0x22, +0x73, 0x6f, 0xdf, 0x0f, 0x00, 0x56, 0x06, 0x19, 0x72, 0x30, 0x07, 0x01, +0xc4, 0x14, 0x02, 0x0a, 0x0a, 0x01, 0xf2, 0x09, 0xa0, 0x74, 0x72, 0x61, +0x64, 0x65, 0x2d, 0x6f, 0x66, 0x66, 0x2e, 0x1e, 0x05, 0x00, 0xcf, 0x0c, +0x31, 0x62, 0x65, 0x20, 0x2a, 0x04, 0x53, 0x74, 0x75, 0x6e, 0x65, 0x64, +0xb9, 0x16, 0x42, 0x65, 0x61, 0x63, 0x68, 0x7b, 0x0a, 0x20, 0x73, 0x73, +0xca, 0x05, 0x02, 0xe0, 0x01, 0x02, 0xc5, 0x02, 0x00, 0x7e, 0x05, 0x10, +0x72, 0x82, 0x06, 0x71, 0x6c, 0x79, 0x20, 0x2b, 0x7e, 0x33, 0x25, 0xe8, +0x00, 0x00, 0x0b, 0x0d, 0x03, 0xa4, 0x09, 0x1f, 0x6e, 0xc2, 0x00, 0x00, +0x00, 0x37, 0x07, 0x35, 0x22, 0x31, 0x22, 0x9a, 0x07, 0x03, 0x45, 0x01, +0x7f, 0x72, 0x65, 0x67, 0x75, 0x6c, 0x61, 0x72, 0x4d, 0x01, 0x04, 0x01, +0x4f, 0x00, 0x10, 0x56, 0x3f, 0x00, 0x10, 0x73, 0x3c, 0x07, 0x12, 0x30, +0x79, 0x06, 0x11, 0x62, 0x4a, 0x12, 0x20, 0x6c, 0x61, 0x60, 0x05, 0xb0, +0x62, 0x79, 0x20, 0x41, 0x43, 0x43, 0x45, 0x4c, 0x45, 0x52, 0x41, 0x8a, +0x13, 0xc1, 0x5f, 0x44, 0x45, 0x46, 0x41, 0x55, 0x4c, 0x54, 0x20, 0x28, +0x73, 0x65, 0xc2, 0x10, 0x34, 0x2e, 0x63, 0x29, 0xeb, 0x07, 0x00, 0x81, +0x0d, 0x1f, 0x2e, 0x05, 0x02, 0x01, 0x01, 0xdf, 0x01, 0x1f, 0x20, 0xc6, +0x0c, 0x2d, 0x02, 0x11, 0x00, 0x08, 0xf9, 0x00, 0x00, 0x4a, 0x02, 0x0f, +0x4b, 0x02, 0x02, 0x9a, 0x5f, 0x65, 0x78, 0x74, 0x53, 0x74, 0x61, 0x74, +0x65, 0x54, 0x02, 0x0f, 0x52, 0x12, 0x01, 0x30, 0x2c, 0x20, 0x6a, 0xa2, +0x08, 0x22, 0x75, 0x73, 0x64, 0x07, 0x12, 0x20, 0xa6, 0x12, 0x38, 0x61, +0x6c, 0x6c, 0x68, 0x0c, 0x03, 0x2b, 0x04, 0x41, 0x73, 0x70, 0x61, 0x63, +0x89, 0x0e, 0x20, 0x73, 0x74, 0x8c, 0x0b, 0x0a, 0x71, 0x0b, 0x32, 0x61, +0x74, 0x65, 0x9e, 0x01, 0x22, 0x55, 0x73, 0x13, 0x06, 0x00, 0x38, 0x03, +0x24, 0x6f, 0x66, 0x87, 0x00, 0xf4, 0x01, 0x74, 0x6f, 0x20, 0x6b, 0x6e, +0x6f, 0x77, 0x20, 0x68, 0x6f, 0x77, 0x20, 0x6d, 0x75, 0x63, 0x68, 0x54, +0x00, 0x06, 0x20, 0x09, 0x03, 0x6d, 0x00, 0x02, 0xcd, 0x0b, 0x00, 0xee, +0x07, 0x04, 0x13, 0x00, 0x92, 0x20, 0x69, 0x74, 0x20, 0x6f, 0x6e, 0x20, +0x38, 0x2d, 0x7a, 0x06, 0x10, 0x62, 0x53, 0x03, 0x20, 0x61, 0x72, 0x34, +0x11, 0x33, 0x28, 0x75, 0x73, 0xa9, 0x07, 0x30, 0x6c, 0x6f, 0x63, 0x65, +0x00, 0x40, 0x79, 0x70, 0x69, 0x63, 0xbc, 0x00, 0x15, 0x29, 0xf7, 0x02, +0x24, 0x6e, 0x2c, 0x19, 0x05, 0x00, 0x47, 0x00, 0x40, 0x61, 0x73, 0x20, +0x27, 0x9a, 0x10, 0x12, 0x2a, 0xb1, 0x00, 0x11, 0x27, 0x56, 0x0f, 0x0f, +0x16, 0x01, 0x00, 0x09, 0xc7, 0x01, 0x08, 0xc9, 0x00, 0x03, 0xd7, 0x10, +0x04, 0x4f, 0x0e, 0x0f, 0x76, 0x01, 0x03, 0x27, 0x20, 0x28, 0x64, 0x00, +0x2f, 0x2c, 0x20, 0xf8, 0x01, 0x11, 0x05, 0x1e, 0x04, 0x0f, 0xf7, 0x01, +0x25, 0x13, 0x64, 0x2f, 0x00, 0x05, 0xf2, 0x01, 0x10, 0x52, 0x96, 0x08, +0x12, 0x73, 0x03, 0x19, 0x60, 0x6c, 0x6f, 0x67, 0x69, 0x63, 0x2c, 0xcc, +0x02, 0x05, 0xed, 0x00, 0x00, 0xee, 0x01, 0x12, 0x73, 0x8a, 0x01, 0x01, +0xd6, 0x06, 0x52, 0x61, 0x73, 0x20, 0x70, 0x6f, 0xd1, 0x06, 0x02, 0x87, +0x0e, 0x0b, 0x93, 0x0c, 0x0f, 0x87, 0x0e, 0x09, 0x0a, 0xdc, 0x0b, 0x05, +0x87, 0x0e, 0x10, 0x74, 0x71, 0x04, 0x1b, 0x74, 0x8a, 0x0e, 0x0a, 0x2d, +0x0d, 0x21, 0x65, 0x69, 0x2e, 0x19, 0x16, 0x63, 0x16, 0x0f, 0x00, 0xaf, +0x00, 0x57, 0x65, 0x6e, 0x74, 0x69, 0x72, 0x15, 0x0d, 0x05, 0x7b, 0x0d, +0x00, 0x7f, 0x00, 0x03, 0x66, 0x00, 0x22, 0x69, 0x66, 0x61, 0x0e, 0x09, +0xb0, 0x0a, 0x13, 0x0a, 0xbf, 0x05, 0x10, 0x66, 0xc6, 0x03, 0x0a, 0x1d, +0x0f, 0x00, 0x63, 0x00, 0x20, 0x6c, 0x65, 0x0a, 0x0e, 0x02, 0x7f, 0x04, +0x0f, 0xfd, 0x00, 0x13, 0x06, 0xed, 0x09, 0x16, 0x2a, 0x9a, 0x03, 0x55, +0x50, 0x74, 0x72, 0x20, 0x3a, 0x2a, 0x04, 0x02, 0x73, 0x1b, 0x02, 0x4a, +0x0f, 0x41, 0x69, 0x6e, 0x64, 0x69, 0xb2, 0x02, 0x01, 0xe6, 0x02, 0x34, +0x61, 0x6e, 0x79, 0x0a, 0x0d, 0x42, 0x68, 0x65, 0x72, 0x65, 0xf2, 0x0d, +0x0a, 0x5c, 0x01, 0x28, 0x74, 0x6f, 0xac, 0x00, 0x0b, 0x5b, 0x0a, 0x08, +0x01, 0x00, 0x36, 0x4e, 0x65, 0x77, 0x02, 0x07, 0x0b, 0xf2, 0x0b, 0x23, +0x6f, 0x6c, 0x1e, 0x07, 0x1e, 0x2e, 0x09, 0x07, 0x2f, 0x4e, 0x62, 0x8d, +0x0d, 0x01, 0x0f, 0x86, 0x0d, 0x04, 0x0a, 0xb1, 0x01, 0x0f, 0x87, 0x0d, +0x17, 0x0e, 0xf3, 0x04, 0x06, 0x90, 0x02, 0x0f, 0xf7, 0x04, 0x12, 0x29, +0x2a, 0x20, 0x5e, 0x01, 0x02, 0xf3, 0x02, 0x0b, 0x8e, 0x00, 0x07, 0xf5, +0x02, 0x2f, 0x64, 0x65, 0x39, 0x07, 0x03, 0x8a, 0x6f, 0x72, 0x69, 0x67, +0x69, 0x6e, 0x61, 0x6c, 0xa4, 0x0d, 0x04, 0x16, 0x00, 0x04, 0x00, 0x10, +0x30, 0x72, 0x65, 0x66, 0xbe, 0x04, 0x27, 0x75, 0x6e, 0x5d, 0x0d, 0x00, +0xb1, 0x02, 0x0f, 0x90, 0x0d, 0x0f, 0x06, 0xc1, 0x01, 0x07, 0xd6, 0x0c, +0x04, 0x87, 0x0d, 0x23, 0x69, 0x6e, 0xfb, 0x1b, 0x6c, 0x77, 0x6f, 0x72, +0x64, 0x73, 0x2c, 0x52, 0x0e, 0x01, 0xcb, 0x09, 0x0f, 0x1e, 0x0d, 0x72, +0x1e, 0x44, 0x68, 0x0a, 0x0f, 0xa5, 0x0e, 0x07, 0x42, 0x20, 0x49, 0x74, +0x73, 0xcf, 0x03, 0x05, 0x24, 0x00, 0x42, 0x20, 0x6d, 0x69, 0x6e, 0x5d, +0x09, 0x38, 0x66, 0x20, 0x27, 0x73, 0x01, 0x03, 0xc6, 0x12, 0x02, 0x6f, +0x00, 0x10, 0x6e, 0x3a, 0x0a, 0x1b, 0x3a, 0xef, 0x03, 0x00, 0x73, 0x0f, +0x23, 0x79, 0x20, 0x5a, 0x18, 0x04, 0x02, 0x06, 0x07, 0xd0, 0x05, 0x00, +0x81, 0x0a, 0x20, 0x70, 0x72, 0x94, 0x18, 0x12, 0x6c, 0xd0, 0x1d, 0x2c, +0x65, 0x64, 0x99, 0x18, 0x2a, 0x2e, 0x0a, 0x7d, 0x0d, 0x00, 0xfe, 0x0a, +0x46, 0x20, 0x62, 0x69, 0x74, 0xbc, 0x08, 0x3f, 0x61, 0x6e, 0x20, 0x17, +0x10, 0x02, 0x09, 0x3a, 0x00, 0x30, 0x48, 0x6f, 0x77, 0x20, 0x05, 0x10, +0x2c, 0x15, 0x06, 0x32, 0x64, 0x6f, 0x65, 0xfc, 0x0e, 0x04, 0x29, 0x06, +0x00, 0xb9, 0x03, 0x03, 0x33, 0x0e, 0x01, 0xd9, 0x1d, 0x03, 0x34, 0x0e, +0x11, 0x69, 0x86, 0x04, 0x22, 0x69, 0x6f, 0x1e, 0x07, 0x05, 0xf8, 0x03, +0x01, 0x42, 0x04, 0x03, 0xbe, 0x01, 0x16, 0x28, 0x34, 0x0e, 0x01, 0xd2, +0x05, 0x0a, 0x75, 0x00, 0x00, 0x1a, 0x07, 0x1a, 0x74, 0x28, 0x0c, 0x60, +0x6e, 0x20, 0x74, 0x72, 0x75, 0x73, 0xed, 0x01, 0x71, 0x65, 0x6e, 0x76, +0x69, 0x72, 0x6f, 0x6e, 0xbe, 0x17, 0x61, 0x6f, 0x6e, 0x6c, 0x79, 0x20, +0x28, 0x59, 0x00, 0x22, 0x74, 0x6f, 0xe5, 0x01, 0x01, 0x4d, 0x02, 0x04, +0x23, 0x14, 0x15, 0x61, 0x36, 0x00, 0x02, 0x3d, 0x02, 0x19, 0x29, 0xb0, +0x06, 0x2f, 0x64, 0x65, 0x79, 0x08, 0x20, 0x08, 0xc9, 0x01, 0x2f, 0x29, +0x3b, 0x6b, 0x03, 0x01, 0x00, 0x46, 0x01, 0x13, 0x5f, 0x39, 0x12, 0x05, +0x73, 0x03, 0x0a, 0xcf, 0x05, 0x06, 0x2e, 0x00, 0x2d, 0x20, 0x61, 0x4f, +0x11, 0x06, 0x19, 0x06, 0x0a, 0x9e, 0x10, 0x10, 0x27, 0xcc, 0x1b, 0x01, +0xb8, 0x1b, 0x00, 0x43, 0x00, 0x0e, 0xf7, 0x14, 0x0e, 0xf4, 0x10, 0x0d, +0x6a, 0x06, 0x0f, 0xf4, 0x10, 0x00, 0x05, 0x6f, 0x06, 0x07, 0x38, 0x03, +0x11, 0x74, 0x65, 0x02, 0x26, 0x74, 0x6f, 0x3c, 0x03, 0x06, 0x0d, 0x07, +0x24, 0x6f, 0x70, 0x4e, 0x0a, 0x52, 0x61, 0x73, 0x20, 0x73, 0x6f, 0x08, +0x00, 0x03, 0xc3, 0x06, 0x06, 0x9b, 0x12, 0x90, 0x27, 0x20, 0x68, 0x61, +0x73, 0x20, 0x62, 0x65, 0x65, 0x3d, 0x14, 0x00, 0x3b, 0x17, 0x03, 0xaf, +0x08, 0x10, 0x72, 0xc9, 0x17, 0x01, 0x28, 0x20, 0x18, 0x65, 0x1f, 0x05, +0x00, 0x7a, 0x0d, 0x0f, 0xe8, 0x11, 0x14, 0x00, 0xb9, 0x0d, 0x04, 0x57, +0x20, 0x0f, 0xe5, 0x11, 0x2b, 0x12, 0x4e, 0x7a, 0x03, 0x01, 0x69, 0x02, +0x03, 0x6a, 0x00, 0x03, 0x84, 0x0b, 0x1f, 0x3c, 0xd1, 0x00, 0x01, 0x6f, +0x73, 0x68, 0x6f, 0x75, 0x6c, 0x64, 0x01, 0x13, 0x02, 0x07, 0x7d, 0x02, +0x40, 0x62, 0x65, 0x20, 0x73, 0x67, 0x09, 0x2b, 0x65, 0x72, 0x4e, 0x04, +0x65, 0x41, 0x6c, 0x77, 0x61, 0x79, 0x73, 0x80, 0x1c, 0x0c, 0xf9, 0x06, +0x00, 0xf8, 0x06, 0x03, 0xdf, 0x00, 0x0f, 0x1c, 0x12, 0x81, 0x0f, 0xbb, +0x11, 0x03, 0x1c, 0x66, 0xbe, 0x11, 0x00, 0x60, 0x00, 0x02, 0x2b, 0x00, +0x0a, 0xc4, 0x11, 0x2a, 0x6f, 0x66, 0xc7, 0x11, 0x03, 0x91, 0x04, 0x06, +0x65, 0x06, 0x0e, 0x79, 0x12, 0x0f, 0x55, 0x12, 0x03, 0x0e, 0xbf, 0x03, +0x0d, 0x73, 0x03, 0x0f, 0xab, 0x18, 0x27, 0x0c, 0xf4, 0x01, 0x0f, 0xc1, +0x18, 0x0a, 0x0e, 0x85, 0x12, 0x0f, 0xf3, 0x19, 0x11, 0x01, 0xbe, 0x01, +0x00, 0x8a, 0x01, 0x08, 0x69, 0x18, 0x0f, 0x9b, 0x12, 0x00, 0x0f, 0xa4, +0x12, 0x21, 0x60, 0x53, 0x54, 0x52, 0x45, 0x41, 0x4d, 0x62, 0x0f, 0xdc, +0x5f, 0x55, 0x36, 0x34, 0x20, 0x28, 0x28, 0x31, 0x20, 0x3c, 0x3c, 0x20, +0x28, 0xa8, 0x1a, 0x30, 0x2d, 0x33, 0x29, 0x21, 0x12, 0x2f, 0x34, 0x29, +0x3d, 0x00, 0x04, 0x01, 0xfe, 0x01, 0x1f, 0x28, 0x51, 0x00, 0x00, 0x22, +0x2a, 0x20, 0xe1, 0x0b, 0x60, 0x28, 0x6c, 0x6f, 0x6e, 0x67, 0x20, 0x05, +0x00, 0x27, 0x29, 0x29, 0x53, 0x1c, 0x02, 0x9a, 0x02, 0x11, 0x5f, 0x71, +0x1b, 0x20, 0x69, 0x6e, 0x92, 0x02, 0x02, 0x9a, 0x03, 0x81, 0x73, 0x74, +0x72, 0x75, 0x63, 0x74, 0x75, 0x72, 0x11, 0x0d, 0x20, 0x74, 0x72, 0x52, +0x11, 0x02, 0x7a, 0x06, 0x03, 0xcc, 0x02, 0x01, 0x7d, 0x1f, 0x20, 0x69, +0x6d, 0xbe, 0x10, 0x30, 0x61, 0x6e, 0x74, 0x8f, 0x08, 0x32, 0x6e, 0x69, +0x74, 0x96, 0x03, 0x06, 0x3b, 0x00, 0x04, 0xda, 0x0a, 0x12, 0x62, 0x2f, +0x02, 0x31, 0x66, 0x69, 0x72, 0x8c, 0x0d, 0x30, 0x65, 0x20, 0x21, 0x3e, +0x00, 0x03, 0x44, 0x07, 0x29, 0x6f, 0x6e, 0x8d, 0x0d, 0x82, 0x64, 0x69, +0x72, 0x65, 0x63, 0x74, 0x6c, 0x79, 0x3f, 0x03, 0x05, 0x4b, 0x00, 0x12, +0x69, 0xe8, 0x1f, 0x00, 0xf4, 0x25, 0x00, 0x78, 0x0c, 0x02, 0x08, 0x0d, +0x53, 0x20, 0x6c, 0x69, 0x6e, 0x6b, 0xc3, 0x1f, 0x00, 0x52, 0x00, 0x06, +0x7c, 0x03, 0x04, 0x2c, 0x00, 0x02, 0x42, 0x0d, 0x60, 0x6c, 0x69, 0x62, +0x6c, 0x7a, 0x34, 0xf3, 0x04, 0x59, 0x61, 0x20, 0x44, 0x4c, 0x4c, 0xa7, +0x1f, 0x20, 0x62, 0x65, 0x21, 0x15, 0x01, 0x7d, 0x02, 0x00, 0x6c, 0x00, +0x01, 0x35, 0x13, 0x66, 0x65, 0x74, 0x68, 0x6f, 0x64, 0x73, 0xb7, 0x1f, +0x00, 0x0f, 0x14, 0x73, 0x74, 0x79, 0x70, 0x65, 0x64, 0x65, 0x66, 0x93, +0x00, 0x35, 0x20, 0x7b, 0x20, 0x50, 0x01, 0x20, 0x20, 0x74, 0x63, 0x20, +0x1e, 0x5b, 0x7c, 0x01, 0x49, 0x5d, 0x3b, 0x20, 0x7d, 0x65, 0x01, 0x27, +0x3b, 0x0a, 0x7a, 0x01, 0x52, 0x72, 0x65, 0x73, 0x65, 0x74, 0x5b, 0x02, +0x00, 0x13, 0x00, 0x0e, 0x3e, 0x07, 0x22, 0x74, 0x6f, 0x55, 0x01, 0x27, +0x61, 0x6e, 0x1f, 0x01, 0x08, 0x4f, 0x00, 0x06, 0x1f, 0x01, 0x01, 0xa2, +0x00, 0x00, 0x96, 0x0d, 0x0c, 0x5a, 0x00, 0x28, 0x20, 0x28, 0x31, 0x00, +0x13, 0x2a, 0xbd, 0x01, 0x49, 0x50, 0x74, 0x72, 0x29, 0x8c, 0x00, 0x00, +0xde, 0x1d, 0x23, 0x74, 0x65, 0x33, 0x00, 0x01, 0x82, 0x04, 0x05, 0x9e, +0x0e, 0x00, 0x1d, 0x04, 0x00, 0x87, 0x00, 0x30, 0x69, 0x61, 0x6c, 0x8d, +0x06, 0x2f, 0x61, 0x6e, 0x83, 0x00, 0x07, 0x01, 0x1a, 0x00, 0x34, 0x66, +0x72, 0x65, 0x49, 0x00, 0x21, 0x72, 0x65, 0x67, 0x01, 0x11, 0x73, 0x26, +0x21, 0x02, 0x0f, 0x09, 0x02, 0xb4, 0x21, 0x02, 0x09, 0x06, 0x01, 0x1e, +0x02, 0x11, 0x78, 0x9d, 0x26, 0x01, 0x97, 0x01, 0x22, 0x20, 0x28, 0xa8, +0x01, 0x19, 0x29, 0xa0, 0x01, 0x55, 0x74, 0x68, 0x65, 0x73, 0x65, 0x93, +0x01, 0x44, 0x72, 0x61, 0x74, 0x68, 0x07, 0x09, 0x24, 0x74, 0x68, 0x0c, +0x02, 0x03, 0x86, 0x00, 0x01, 0x5d, 0x00, 0x41, 0x54, 0x68, 0x65, 0x79, +0xfb, 0x01, 0x01, 0x51, 0x1b, 0x42, 0x66, 0x75, 0x74, 0x75, 0xa9, 0x04, +0x20, 0x6f, 0x66, 0x19, 0x04, 0x01, 0x1b, 0x13, 0x02, 0x72, 0x00, 0x02, +0xf1, 0x20, 0x00, 0x0c, 0x00, 0x0a, 0xd1, 0x00, 0x32, 0x69, 0x7a, 0x65, +0xf2, 0x01, 0x0a, 0x3a, 0x01, 0x0c, 0x27, 0x01, 0x08, 0x2c, 0x0f, 0x06, +0x01, 0x00, 0x0b, 0x02, 0x01, 0x0f, 0x7e, 0x01, 0x13, 0x8f, 0x6c, 0x6f, +0x61, 0x64, 0x44, 0x69, 0x63, 0x74, 0x07, 0x02, 0x06, 0x00, 0x21, 0x00, +0x24, 0x20, 0x61, 0xed, 0x00, 0x21, 0x64, 0x69, 0x19, 0x00, 0x00, 0x86, +0x22, 0x01, 0x42, 0x08, 0x06, 0x64, 0x00, 0x01, 0x95, 0x03, 0x11, 0x41, +0xdf, 0x09, 0x26, 0x65, 0x76, 0x86, 0x05, 0x04, 0xcc, 0x0d, 0x50, 0x66, +0x6f, 0x72, 0x67, 0x6f, 0x27, 0x0d, 0x12, 0x2c, 0x75, 0x03, 0x16, 0x27, +0x4a, 0x00, 0x12, 0x27, 0x25, 0x00, 0x30, 0x72, 0x65, 0x6d, 0xe4, 0x28, +0x28, 0x69, 0x6e, 0xaf, 0x01, 0x32, 0x4c, 0x6f, 0x61, 0x87, 0x06, 0x05, +0x10, 0x1a, 0x12, 0x30, 0x96, 0x15, 0x31, 0x6c, 0x6f, 0x77, 0xf8, 0x06, +0x00, 0xea, 0x1f, 0x03, 0x00, 0x08, 0x07, 0x9c, 0x00, 0x13, 0x73, 0x8c, +0x05, 0x03, 0x2c, 0x07, 0x0c, 0xe4, 0x07, 0x50, 0x36, 0x34, 0x20, 0x4b, +0x42, 0x5d, 0x20, 0x06, 0x1b, 0x06, 0x04, 0x08, 0x01, 0x0f, 0x37, 0x01, +0x06, 0x0a, 0x6d, 0x10, 0x06, 0x6c, 0x00, 0x02, 0xf3, 0x05, 0x00, 0x10, +0x00, 0x07, 0xe0, 0x09, 0x2f, 0x20, 0x2a, 0xc4, 0x10, 0x00, 0x00, 0x74, +0x02, 0x31, 0x69, 0x6e, 0x75, 0xae, 0x02, 0x04, 0xcd, 0x05, 0x08, 0x65, +0x24, 0x00, 0xae, 0x04, 0x63, 0x27, 0x73, 0x72, 0x63, 0x27, 0x2c, 0x3b, +0x04, 0x01, 0x41, 0x01, 0x01, 0x96, 0x0a, 0x04, 0x54, 0x01, 0x2d, 0x6c, +0x79, 0x4a, 0x08, 0x10, 0x73, 0x5b, 0x04, 0x07, 0xfb, 0x00, 0x25, 0x74, +0x6f, 0xe3, 0x20, 0x0d, 0x19, 0x21, 0x02, 0x02, 0x03, 0x07, 0x39, 0x05, +0x19, 0x50, 0xac, 0x01, 0x04, 0x50, 0x00, 0x10, 0x72, 0xdf, 0x13, 0x33, +0x73, 0x75, 0x6d, 0xc4, 0x1e, 0x13, 0x74, 0xc3, 0x01, 0x00, 0x4c, 0x00, +0x00, 0xa4, 0x00, 0x01, 0x41, 0x2b, 0x15, 0x6e, 0xa5, 0x0b, 0x01, 0x50, +0x05, 0x27, 0x27, 0x64, 0x11, 0x10, 0x0f, 0x99, 0x1b, 0x09, 0x01, 0x36, +0x25, 0x00, 0x21, 0x07, 0x03, 0xc4, 0x0e, 0x0f, 0xbd, 0x16, 0x0a, 0x00, +0x74, 0x01, 0x0f, 0x5e, 0x1f, 0x0f, 0x02, 0x45, 0x08, 0x07, 0x24, 0x1f, +0x04, 0x67, 0x00, 0x32, 0x6e, 0x6f, 0x74, 0x1c, 0x00, 0x2d, 0x69, 0x66, +0x85, 0x25, 0x03, 0x13, 0x1f, 0x25, 0x66, 0x69, 0xfc, 0x10, 0x07, 0xc1, +0x00, 0x02, 0x3f, 0x02, 0x0d, 0xf6, 0x1e, 0x02, 0x4d, 0x00, 0x07, 0xe4, +0x1e, 0x00, 0x79, 0x02, 0x00, 0xd8, 0x05, 0x03, 0xe4, 0x1e, 0x07, 0x4f, +0x02, 0x0f, 0xfa, 0x01, 0x03, 0x0f, 0x5d, 0x02, 0x14, 0x35, 0x73, 0x72, +0x63, 0x7f, 0x08, 0x05, 0xbe, 0x14, 0x2a, 0x72, 0x63, 0x61, 0x08, 0x0f, +0xc3, 0x12, 0x09, 0x07, 0x63, 0x07, 0x34, 0x61, 0x76, 0x65, 0xdf, 0x03, +0x2f, 0x49, 0x66, 0x48, 0x02, 0x04, 0x06, 0xfd, 0x01, 0x04, 0xab, 0x1c, +0x0a, 0x68, 0x01, 0x03, 0x9a, 0x03, 0x51, 0x61, 0x76, 0x61, 0x69, 0x6c, +0xd2, 0x26, 0x27, 0x61, 0x74, 0x57, 0x05, 0x14, 0x20, 0xe5, 0x18, 0x00, +0x64, 0x00, 0x00, 0x70, 0x00, 0x14, 0x20, 0x54, 0x01, 0x20, 0x61, 0x20, +0x66, 0x09, 0x21, 0x72, 0x20, 0xf0, 0x15, 0x23, 0x20, 0x28, 0xdd, 0x00, +0x41, 0x61, 0x66, 0x65, 0x42, 0x67, 0x01, 0x01, 0xde, 0x23, 0x03, 0x53, +0x0b, 0x00, 0x34, 0x07, 0x55, 0x64, 0x6f, 0x6e, 0x27, 0x74, 0x4e, 0x27, +0x00, 0x65, 0x07, 0x09, 0x9a, 0x03, 0xa0, 0x28, 0x29, 0x20, 0x61, 0x66, +0x74, 0x65, 0x72, 0x77, 0x61, 0x05, 0x10, 0x07, 0x73, 0x07, 0x08, 0x94, +0x04, 0x27, 0x73, 0x20, 0x99, 0x20, 0x00, 0xf6, 0x23, 0x63, 0x62, 0x6c, +0x65, 0x2c, 0x20, 0x79, 0xed, 0x28, 0x06, 0x3e, 0x0a, 0x05, 0x5e, 0x00, +0x0f, 0xa9, 0x01, 0x03, 0x29, 0x28, 0x29, 0x5a, 0x04, 0x00, 0xd6, 0x00, +0x1c, 0x64, 0x60, 0x04, 0x0f, 0x5f, 0x04, 0x07, 0x05, 0x0d, 0x04, 0x15, +0x2c, 0xda, 0x11, 0x01, 0xcd, 0x1d, 0x09, 0x22, 0x02, 0x04, 0x9a, 0x01, +0x0f, 0x71, 0x04, 0x09, 0x0b, 0x31, 0x01, 0x0e, 0x6b, 0x04, 0x0e, 0x53, +0x0a, 0x0f, 0x54, 0x0a, 0x1b, 0x06, 0xa7, 0x0a, 0x0f, 0x56, 0x0a, 0x2a, +0x00, 0x63, 0x1d, 0x0e, 0x1b, 0x0a, 0x65, 0x44, 0x45, 0x43, 0x4f, 0x44, +0x45, 0x0d, 0x0a, 0x2f, 0x20, 0x34, 0x24, 0x00, 0x0a, 0x0c, 0x45, 0x0a, +0x0b, 0x3e, 0x00, 0x05, 0x4b, 0x0a, 0x04, 0xe3, 0x1c, 0x18, 0x20, 0x54, +0x0a, 0x0d, 0x21, 0x09, 0x0e, 0x26, 0x00, 0x0d, 0x2a, 0x09, 0x0a, 0x61, +0x00, 0x0b, 0x30, 0x09, 0x11, 0x44, 0x59, 0x0d, 0x00, 0x36, 0x09, 0x0c, +0xaf, 0x0a, 0x04, 0x1a, 0x00, 0x0f, 0xb5, 0x0a, 0x23, 0x0f, 0xa9, 0x0a, +0x08, 0x23, 0x75, 0x73, 0x4e, 0x0a, 0x15, 0x5f, 0x42, 0x09, 0x02, 0x6c, +0x00, 0x12, 0x20, 0xde, 0x1c, 0x20, 0x73, 0x65, 0x03, 0x03, 0x0f, 0xcf, +0x0a, 0x02, 0x0f, 0xd9, 0x08, 0x11, 0x04, 0xd8, 0x08, 0x30, 0x70, 0x72, +0x65, 0x94, 0x03, 0x02, 0x11, 0x27, 0x2f, 0x6f, 0x66, 0x7e, 0x0a, 0x03, +0x01, 0x99, 0x0a, 0x0f, 0xd3, 0x08, 0x2f, 0x04, 0x2c, 0x01, 0x05, 0x30, +0x03, 0x24, 0x74, 0x68, 0x44, 0x00, 0x1f, 0x2e, 0xff, 0x09, 0x01, 0x03, +0xf0, 0x00, 0x0f, 0x05, 0x0a, 0x17, 0x06, 0x61, 0x00, 0x0f, 0x0b, 0x0a, +0x07, 0x03, 0x55, 0x00, 0x0f, 0x11, 0x0a, 0x04, 0x2e, 0x2f, 0x0a, 0x4e, +0x00, 0x0f, 0x99, 0x00, 0x05, 0x0e, 0x77, 0x09, 0x0f, 0x7d, 0x09, 0x05, +0x03, 0x74, 0x00, 0x1f, 0x28, 0x5c, 0x00, 0x05, 0x02, 0x14, 0x00, 0x0b, +0xab, 0x05, 0x0a, 0xf6, 0x01, 0x0f, 0x98, 0x0b, 0x08, 0x03, 0xe6, 0x02, +0x02, 0xfb, 0x16, 0x01, 0xe8, 0x16, 0x03, 0x7f, 0x25, 0x06, 0xa2, 0x04, +0x01, 0x5f, 0x01, 0x12, 0x53, 0x14, 0x26, 0x0f, 0x3d, 0x09, 0x04, 0x21, +0x20, 0x28, 0xc9, 0x1b, 0x02, 0xf4, 0x28, 0x02, 0xd0, 0x1b, 0x4a, 0x73, +0x65, 0x74, 0x29, 0x54, 0x09, 0x10, 0x31, 0xbd, 0x04, 0x3f, 0x4f, 0x4b, +0x2c, 0xc6, 0x04, 0x06, 0x2f, 0x65, 0x74, 0xf2, 0x00, 0x19, 0x02, 0x14, +0x00, 0x0f, 0x4b, 0x09, 0x1a, 0x17, 0x2a, 0x95, 0x05, 0x05, 0x1a, 0x13, +0x00, 0x97, 0x0b, 0x05, 0xa3, 0x10, 0x05, 0xc2, 0x2d, 0x02, 0xda, 0x00, +0x0b, 0x29, 0x12, 0x80, 0x6f, 0x66, 0x20, 0x6d, 0x75, 0x6c, 0x74, 0x69, +0x39, 0x29, 0x03, 0xe1, 0x08, 0x54, 0x69, 0x6e, 0x20, 0x22, 0x73, 0x04, +0x05, 0x10, 0x22, 0x6f, 0x14, 0x03, 0x4b, 0x12, 0x16, 0x50, 0x1f, 0x07, +0x04, 0x39, 0x12, 0x03, 0x64, 0x09, 0x10, 0x2a, 0xd4, 0x08, 0x1f, 0x2a, +0x0a, 0x07, 0x02, 0x01, 0x0d, 0x21, 0x02, 0x0a, 0x07, 0x05, 0x6b, 0x13, +0x03, 0x9b, 0x01, 0x00, 0x3c, 0x03, 0x08, 0xa8, 0x11, 0x40, 0x20, 0x28, +0x75, 0x70, 0xb1, 0x01, 0x04, 0x80, 0x0a, 0x25, 0x20, 0x20, 0xb7, 0x03, +0x05, 0x48, 0x03, 0x10, 0x72, 0xd3, 0x00, 0x02, 0x88, 0x08, 0x17, 0x73, +0x26, 0x24, 0x0b, 0x5b, 0x09, 0x03, 0xde, 0x19, 0x02, 0x10, 0x01, 0x51, +0x2d, 0x20, 0x45, 0x78, 0x61, 0xb8, 0x0e, 0x01, 0xd2, 0x01, 0x01, 0x3a, +0x25, 0x59, 0x61, 0x73, 0x20, 0x65, 0x6e, 0x3c, 0x00, 0x03, 0x1d, 0x1e, +0x01, 0x23, 0x00, 0x30, 0x75, 0x70, 0x64, 0x5b, 0x03, 0x62, 0x72, 0x75, +0x6c, 0x65, 0x20, 0x28, 0xfa, 0x07, 0x07, 0x2c, 0x16, 0x22, 0x61, 0x74, +0x26, 0x00, 0x04, 0xcf, 0x00, 0x14, 0x73, 0x01, 0x13, 0x23, 0x49, 0x6e, +0x90, 0x1d, 0x00, 0xaf, 0x00, 0x02, 0x3c, 0x12, 0x05, 0x86, 0x01, 0x16, +0x26, 0x70, 0x00, 0x07, 0xc3, 0x00, 0x01, 0x77, 0x07, 0x32, 0x68, 0x61, +0x76, 0xfa, 0x15, 0x04, 0x97, 0x0b, 0x04, 0x07, 0x24, 0x42, 0x76, 0x65, +0x72, 0x79, 0xfd, 0x12, 0x30, 0x20, 0x6f, 0x6e, 0x49, 0x07, 0x23, 0x20, +0x3c, 0x1c, 0x01, 0x13, 0x2e, 0xd9, 0x00, 0x14, 0x4c, 0x5a, 0x1f, 0x2e, +0x61, 0x6e, 0xd0, 0x00, 0x2a, 0x62, 0x79, 0x33, 0x17, 0x40, 0x6d, 0x61, +0x78, 0x42, 0xcc, 0x00, 0x01, 0x59, 0x0a, 0x01, 0xb0, 0x04, 0x07, 0x36, +0x17, 0x1a, 0x20, 0x1f, 0x00, 0x01, 0x2a, 0x08, 0x36, 0x70, 0x6c, 0x65, +0x65, 0x34, 0x30, 0x64, 0x65, 0x70, 0x4b, 0x29, 0x32, 0x6e, 0x74, 0x2e, +0x6e, 0x1f, 0x0d, 0xe5, 0x22, 0x00, 0x46, 0x08, 0x01, 0xa9, 0x16, 0x18, +0x64, 0xdc, 0x1c, 0x05, 0xeb, 0x08, 0x34, 0x69, 0x6e, 0x67, 0x63, 0x02, +0x1f, 0x2e, 0x30, 0x01, 0x03, 0x27, 0x65, 0x6e, 0x55, 0x13, 0x0b, 0xda, +0x01, 0x41, 0x73, 0x20, 0x64, 0x6f, 0x7b, 0x09, 0x04, 0x00, 0x09, 0x00, +0x17, 0x14, 0x94, 0x79, 0x6e, 0x63, 0x68, 0x72, 0x6f, 0x6e, 0x69, 0x7a, +0x0d, 0x15, 0x02, 0xbe, 0x1d, 0x0f, 0x69, 0x01, 0x1f, 0x0f, 0x64, 0x01, +0x0a, 0x40, 0x5f, 0x41, 0x74, 0x20, 0x1c, 0x05, 0x22, 0x74, 0x5f, 0x19, +0x00, 0x43, 0x20, 0x2b, 0x20, 0x38, 0xda, 0x08, 0x19, 0x2b, 0x35, 0x01, +0x0f, 0xd7, 0x00, 0x7e, 0x17, 0x6c, 0x1e, 0x02, 0x0b, 0x79, 0x00, 0x02, +0xac, 0x00, 0x32, 0x57, 0x68, 0x65, 0x5d, 0x14, 0x02, 0xca, 0x0f, 0x0a, +0x8c, 0x37, 0x02, 0x99, 0x18, 0x03, 0x9d, 0x1c, 0x12, 0x2c, 0xbb, 0x0a, +0x01, 0xd3, 0x1d, 0x00, 0xda, 0x17, 0x00, 0x90, 0x2e, 0x02, 0x7f, 0x28, +0x02, 0xba, 0x03, 0x01, 0x24, 0x0b, 0x07, 0xd6, 0x0a, 0x04, 0x85, 0x02, +0x05, 0x53, 0x1f, 0x05, 0xa1, 0x1c, 0x02, 0xfc, 0x03, 0x11, 0x69, 0xaf, +0x14, 0x02, 0x39, 0x0a, 0x0f, 0xda, 0x07, 0x06, 0x2f, 0x28, 0x29, 0x9e, +0x14, 0x09, 0x0e, 0x36, 0x0c, 0x0f, 0x55, 0x05, 0x0b, 0x0f, 0x70, 0x2d, +0x3b, 0x0f, 0xf3, 0x18, 0x04, 0x0f, 0x96, 0x00, 0x42, 0x0c, 0x22, 0x19, +0x00, 0xf8, 0x05, 0x05, 0x87, 0x27, 0x0f, 0xe8, 0x05, 0x00, 0x41, 0x3a, +0x0a, 0x2a, 0x5f, 0x55, 0x01, 0x03, 0x18, 0x0c, 0x0f, 0x17, 0x06, 0x0c, +0x48, 0x77, 0x6f, 0x72, 0x6b, 0xba, 0x22, 0x02, 0xb4, 0x01, 0x00, 0x0c, +0x01, 0x14, 0x62, 0x0d, 0x18, 0x2f, 0x6f, 0x66, 0xa0, 0x01, 0x03, 0x03, +0xa8, 0x38, 0x02, 0xae, 0x22, 0x0b, 0x0f, 0x01, 0x19, 0x78, 0x2f, 0x0c, +0x26, 0x20, 0x20, 0x2c, 0x09, 0xc2, 0x73, 0x74, 0x61, 0x6e, 0x64, 0x2d, +0x61, 0x6c, 0x6f, 0x6e, 0x65, 0x2e, 0x16, 0x00, 0x07, 0xdc, 0x0c, 0x00, +0xb0, 0x28, 0x03, 0x80, 0x05, 0x0f, 0xcc, 0x08, 0x0c, 0x1f, 0x2e, 0x1e, +0x02, 0x09, 0x05, 0x00, 0x01, 0x0f, 0x69, 0x2f, 0x3a, 0x0e, 0x9b, 0x07, +0x5d, 0x53, 0x74, 0x61, 0x72, 0x74, 0x9a, 0x07, 0x0f, 0x1e, 0x02, 0x05, +0x0e, 0x96, 0x00, 0x0f, 0x1b, 0x1b, 0x12, 0x0f, 0x7b, 0x00, 0x19, 0x0f, +0xce, 0x29, 0x1b, 0x40, 0x4f, 0x62, 0x73, 0x6f, 0x9d, 0x20, 0x0f, 0xce, +0x29, 0x20, 0x10, 0x2f, 0x07, 0x32, 0x00, 0xd3, 0x2c, 0x00, 0xab, 0x01, +0x30, 0x57, 0x61, 0x72, 0x43, 0x33, 0x22, 0x73, 0x20, 0x19, 0x00, 0x15, +0x53, 0xdb, 0x19, 0x44, 0x73, 0x65, 0x20, 0x77, 0x1c, 0x00, 0x10, 0x6d, +0x06, 0x0e, 0x00, 0xc9, 0x34, 0x01, 0xcd, 0x1d, 0x71, 0x70, 0x72, 0x6f, +0x62, 0x6c, 0x65, 0x6d, 0x23, 0x04, 0x02, 0x0f, 0x04, 0x02, 0x22, 0x36, +0x00, 0x3d, 0x16, 0x05, 0x14, 0x21, 0x00, 0x08, 0x1a, 0x11, 0x69, 0xa7, +0x0e, 0x00, 0x4d, 0x00, 0x02, 0x2d, 0x00, 0x01, 0xa8, 0x07, 0x64, 0x2d, +0x57, 0x6e, 0x6f, 0x2d, 0x64, 0x80, 0x00, 0x72, 0x64, 0x2d, 0x64, 0x65, +0x63, 0x6c, 0x61, 0xe3, 0x0f, 0x02, 0xce, 0x1d, 0x42, 0x67, 0x63, 0x63, +0x0a, 0x3c, 0x20, 0x70, 0x5f, 0x43, 0x52, 0x54, 0x5f, 0x53, 0x45, 0x2f, +0x39, 0xc0, 0x5f, 0x4e, 0x4f, 0x5f, 0x57, 0x41, 0x52, 0x4e, 0x49, 0x4e, +0x47, 0x53, 0xe8, 0x08, 0x68, 0x56, 0x69, 0x73, 0x75, 0x61, 0x6c, 0x7f, +0x28, 0x18, 0x2e, 0xfe, 0x37, 0x01, 0x7c, 0x26, 0x07, 0x95, 0x0d, 0x94, +0x44, 0x45, 0x50, 0x52, 0x45, 0x43, 0x41, 0x54, 0x45, 0x45, 0x00, 0x00, +0x95, 0x25, 0x61, 0x42, 0x4c, 0x4f, 0x43, 0x4b, 0x2e, 0x97, 0x2a, 0x30, +0x69, 0x66, 0x6e, 0x67, 0x0d, 0x0f, 0x2b, 0x00, 0x0b, 0x3e, 0x0a, 0x23, +0x20, 0x54, 0x00, 0x0f, 0x29, 0x00, 0x10, 0x34, 0x47, 0x43, 0x43, 0x04, +0x35, 0x00, 0xe0, 0x37, 0x92, 0x47, 0x4e, 0x55, 0x43, 0x5f, 0x5f, 0x20, +0x2a, 0x20, 0x22, 0x35, 0x03, 0x11, 0x00, 0x01, 0x36, 0x35, 0x30, 0x5f, +0x5f, 0x29, 0x3c, 0x00, 0x4c, 0x69, 0x66, 0x20, 0x28, 0x39, 0x00, 0xa4, +0x3e, 0x3d, 0x20, 0x34, 0x30, 0x35, 0x29, 0x20, 0x7c, 0x7c, 0x2c, 0x38, +0x00, 0x2b, 0x38, 0x43, 0x6c, 0x61, 0x6e, 0x67, 0x35, 0x00, 0x0f, 0x9c, +0x00, 0x03, 0x23, 0x44, 0x28, 0xbc, 0x01, 0x62, 0x29, 0x20, 0x5f, 0x5f, +0x61, 0x74, 0x42, 0x3c, 0x56, 0x65, 0x5f, 0x5f, 0x28, 0x28, 0x83, 0x01, +0x05, 0x23, 0x00, 0x11, 0x29, 0x49, 0x00, 0x2f, 0x65, 0x6c, 0x80, 0x00, +0x04, 0x3f, 0x33, 0x30, 0x31, 0x6a, 0x00, 0x2c, 0x07, 0x61, 0x00, 0x05, +0xc5, 0x00, 0x21, 0x4d, 0x53, 0x65, 0x00, 0x0f, 0x5a, 0x00, 0x15, 0x00, +0x2f, 0x02, 0x00, 0x0c, 0x20, 0x0f, 0xc0, 0x00, 0x02, 0x02, 0x5e, 0x00, +0x22, 0x73, 0x65, 0x4c, 0x00, 0x03, 0x65, 0x39, 0x03, 0x1e, 0x00, 0x23, +0x28, 0x22, 0xa7, 0x01, 0x37, 0x3a, 0x20, 0x59, 0xdd, 0x38, 0x05, 0x2d, +0x09, 0x0b, 0x74, 0x00, 0x02, 0x35, 0x37, 0x00, 0xa4, 0x0c, 0x02, 0x18, +0x2b, 0x3f, 0x65, 0x72, 0x22, 0xa3, 0x00, 0x12, 0x01, 0x83, 0x00, 0x01, +0xa9, 0x39, 0x02, 0xb0, 0x39, 0x00, 0x0d, 0x2d, 0x0f, 0x2e, 0x02, 0x0b, +0x12, 0x20, 0xc1, 0x38, 0x06, 0xd2, 0x03, 0x0f, 0xc6, 0x39, 0x02, 0x03, +0xa0, 0x03, 0x02, 0x0c, 0x06, 0x07, 0x1a, 0x0c, 0x00, 0xb6, 0x0e, 0x44, +0x6c, 0x61, 0x6e, 0x6e, 0xd4, 0x14, 0x36, 0x61, 0x72, 0x74, 0xb1, 0x39, +0x05, 0xc1, 0x03, 0xf2, 0x01, 0x62, 0x79, 0x20, 0x72, 0x31, 0x33, 0x31, +0x20, 0x61, 0x70, 0x70, 0x72, 0x6f, 0x78, 0x69, 0x6d, 0x47, 0x12, 0x0f, +0xd8, 0x13, 0x00, 0x0b, 0xfe, 0x0d, 0x0f, 0x81, 0x28, 0x1c, 0x0f, 0xe7, +0x26, 0x01, 0x03, 0x7f, 0x33, 0x02, 0x4c, 0x1c, 0x0f, 0xd2, 0x28, 0x26, +0x07, 0xeb, 0x31, 0x0f, 0x64, 0x00, 0x00, 0x00, 0x59, 0x04, 0x02, 0x47, +0x27, 0x0b, 0xbf, 0x00, 0x0f, 0x55, 0x27, 0x27, 0x0f, 0xcb, 0x00, 0x0e, +0x07, 0x75, 0x00, 0x0f, 0xbc, 0x27, 0x31, 0x0f, 0xe1, 0x00, 0x0b, 0x05, +0x9d, 0x08, 0x0c, 0xe1, 0x00, 0x0e, 0x50, 0x19, 0x0e, 0x7c, 0x15, 0x0f, +0xf1, 0x00, 0x35, 0x06, 0x85, 0x00, 0x0f, 0x77, 0x00, 0x38, 0x0f, 0x01, +0x01, 0x03, 0x09, 0x10, 0x03, 0x2f, 0x64, 0x65, 0x12, 0x03, 0x17, 0x30, +0x20, 0x6e, 0x61, 0xf3, 0x22, 0x13, 0x61, 0x6c, 0x2a, 0x03, 0xbf, 0x27, +0x06, 0x2c, 0x04, 0x01, 0xd3, 0x0a, 0x01, 0x6d, 0x0e, 0x21, 0x6e, 0x6f, +0x3f, 0x13, 0x41, 0x65, 0x72, 0x20, 0x62, 0x15, 0x1b, 0x02, 0x6d, 0x20, +0x05, 0xeb, 0x08, 0x01, 0xcd, 0x19, 0x05, 0x20, 0x2f, 0x01, 0xfb, 0x0a, +0x04, 0x25, 0x2f, 0x31, 0x61, 0x74, 0x69, 0x83, 0x3b, 0x03, 0x17, 0x28, +0x20, 0x6f, 0x6c, 0x0d, 0x44, 0x03, 0x43, 0x3d, 0x15, 0x73, 0xe1, 0x0d, +0x36, 0x5a, 0x34, 0x5f, 0x30, 0x26, 0x0c, 0x63, 0x2c, 0x0f, 0x63, 0x08, +0x00, 0x0f, 0x38, 0x00, 0x02, 0x30, 0x5f, 0x75, 0x6e, 0x03, 0x2b, 0x16, +0x6e, 0x1d, 0x01, 0x0f, 0x4a, 0x00, 0x0c, 0x00, 0x43, 0x09, 0x03, 0xc8, +0x00, 0x08, 0x16, 0x01, 0x00, 0x55, 0x20, 0x10, 0x6f, 0x4d, 0x14, 0x04, +0x21, 0x0c, 0x14, 0x77, 0x9e, 0x07, 0x22, 0x64, 0x3b, 0xd7, 0x26, 0x01, +0x03, 0x05, 0x00, 0xaa, 0x07, 0x02, 0xfa, 0x00, 0x03, 0x1b, 0x1e, 0x21, +0x72, 0x65, 0xd6, 0x07, 0x02, 0x2d, 0x05, 0x20, 0x68, 0x65, 0xed, 0x13, +0x04, 0x43, 0x25, 0x21, 0x68, 0x69, 0x6c, 0x2d, 0x08, 0xac, 0x37, 0x04, +0x27, 0x23, 0x02, 0x18, 0x0c, 0x02, 0x44, 0x08, 0x08, 0x7a, 0x00, 0x00, +0x7b, 0x01, 0x21, 0x69, 0x67, 0x9a, 0x04, 0x30, 0x74, 0x6f, 0x20, 0x72, +0x10, 0x21, 0x74, 0x61, 0xf6, 0x3e, 0x01, 0xc1, 0x0d, 0x02, 0xcf, 0x01, +0x04, 0x84, 0x02, 0x07, 0x3c, 0x01, 0x0f, 0x72, 0x09, 0x13, 0x07, 0x3f, +0x02, 0x0e, 0x4b, 0x00, 0x0f, 0x4f, 0x01, 0x01, 0x0f, 0x6c, 0x28, 0x17, +0x3f, 0x20, 0x69, 0x73, 0xaa, 0x02, 0x05, 0x0d, 0xbd, 0x05, 0x05, 0x80, +0x11, 0x06, 0xa8, 0x0b, 0x11, 0x3b, 0xd0, 0x14, 0x00, 0xd7, 0x3d, 0x06, +0x1d, 0x00, 0x06, 0x24, 0x3e, 0x14, 0x77, 0xcb, 0x0d, 0x05, 0x3b, 0x09, +0x03, 0xbc, 0x13, 0x07, 0x5d, 0x06, 0x11, 0x22, 0x30, 0x46, 0x0c, 0x2d, +0x1d, 0x14, 0x29, 0x4d, 0x1f, 0x32, 0x22, 0x29, 0x20, 0x82, 0x04, 0x06, +0xdf, 0x13, 0x04, 0x96, 0x18, 0x01, 0x68, 0x03, 0x03, 0x97, 0x18, 0x1f, +0x3b, 0x57, 0x00, 0x1f, 0x02, 0x12, 0x14, 0x08, 0xd2, 0x2c, 0x00, 0x23, +0x00, 0x09, 0xd8, 0x2c, 0x0f, 0x54, 0x00, 0x05, 0x07, 0x31, 0x1f, 0x09, +0x53, 0x00, 0x07, 0x54, 0x00, 0x07, 0x23, 0x00, 0x06, 0x53, 0x00, 0x06, +0x48, 0x05, 0x0f, 0xc1, 0x00, 0x18, 0x04, 0x75, 0x18, 0x0a, 0x6a, 0x00, +0x23, 0x20, 0x20, 0x45, 0x00, 0x01, 0x23, 0x00, 0x56, 0x6c, 0x69, 0x64, +0x65, 0x49, 0x4e, 0x00, 0x09, 0xb6, 0x05, 0x2f, 0x29, 0x3b, 0xc6, 0x01, +0x05, 0x0f, 0x77, 0x0d, 0x00, 0x0f, 0xa0, 0x01, 0x03, 0x0f, 0xcd, 0x0c, +0x0b, 0x0d, 0x56, 0x01, 0x0f, 0xfb, 0x0c, 0x01, 0x00, 0x4f, 0x04, 0xbf, +0x50, 0x72, 0x65, 0x66, 0x69, 0x78, 0x36, 0x34, 0x6b, 0x20, 0x28, 0x3b, +0x1b, 0x0d, 0x0f, 0xfb, 0x0c, 0x05, 0x05, 0xfe, 0x2a, 0x0f, 0xa6, 0x00, +0x10, 0x0a, 0xdd, 0x0c, 0x0f, 0xa6, 0x00, 0x0d, 0x01, 0x2e, 0x00, 0x0f, +0xa6, 0x00, 0x1c, 0x0d, 0x04, 0x0f, 0x0f, 0xef, 0x42, 0x07, 0x90, 0x7d, +0x0a, 0x23, 0x65, 0x6e, 0x64, 0x69, 0x66, 0x0a, +}; + +static unsigned char buf[18830]; + +int main() { + + unsigned long cksum = adler32(0, NULL, 0); + + decompress_lz4(compressed, buf, 18830); + cksum = adler32(cksum, buf, 18830); + + return cksum == 0xf748269d ? 0 : 1; +} diff --git a/test/val/mult1.c b/test/val/mult1.c index 831bde7ec..6d491a427 100644 --- a/test/val/mult1.c +++ b/test/val/mult1.c @@ -48,23 +48,23 @@ void m2(unsigned char uc) void m3(unsigned char uc) { volatile unsigned char vuc; - + /* uchar = uchar * lit */ /* testing literal multiply with same source and destination */ vuc = uc; - uc2 = 0; - uc1 = vuc; uc1 = uc1*1; if( uc1 != (uc2+=TESTLIT) ) failures++; - uc1 = vuc; uc1 = uc1*2; if( uc1 != (uc2+=TESTLIT) ) failures++; - uc1 = vuc; uc1 = uc1*3; if( uc1 != (uc2+=TESTLIT) ) failures++; - uc1 = vuc; uc1 = uc1*4; if( uc1 != (uc2+=TESTLIT) ) failures++; + uc2 = 0; + uc1 = vuc; uc1 = uc1*1; if( uc1 != (uc2+=TESTLIT) ) failures++; + uc1 = vuc; uc1 = uc1*2; if( uc1 != (uc2+=TESTLIT) ) failures++; + uc1 = vuc; uc1 = uc1*3; if( uc1 != (uc2+=TESTLIT) ) failures++; + uc1 = vuc; uc1 = uc1*4; if( uc1 != (uc2+=TESTLIT) ) failures++; uc1 = vuc; uc1 = uc1*5; if( uc1 != (uc2+=TESTLIT) ) failures++; - uc1 = vuc; uc1 = uc1*6; if( uc1 != (uc2+=TESTLIT) ) failures++; - uc1 = vuc; uc1 = uc1*7; if( uc1 != (uc2+=TESTLIT) ) failures++; - uc1 = vuc; uc1 = uc1*8; if( uc1 != (uc2+=TESTLIT) ) failures++; + uc1 = vuc; uc1 = uc1*6; if( uc1 != (uc2+=TESTLIT) ) failures++; + uc1 = vuc; uc1 = uc1*7; if( uc1 != (uc2+=TESTLIT) ) failures++; + uc1 = vuc; uc1 = uc1*8; if( uc1 != (uc2+=TESTLIT) ) failures++; uc1 = vuc; uc1 = uc1*9; if( uc1 != (uc2+=TESTLIT) ) failures++; - uc1 = vuc; uc1 = uc1*10; if( uc1 != (uc2+=TESTLIT) ) failures++; - uc1 = vuc; uc1 = uc1*11; if( uc1 != (uc2+=TESTLIT) ) failures++; - uc1 = vuc; uc1 = uc1*12; if( uc1 != (uc2+=TESTLIT) ) failures++; + uc1 = vuc; uc1 = uc1*10; if( uc1 != (uc2+=TESTLIT) ) failures++; + uc1 = vuc; uc1 = uc1*11; if( uc1 != (uc2+=TESTLIT) ) failures++; + uc1 = vuc; uc1 = uc1*12; if( uc1 != (uc2+=TESTLIT) ) failures++; uc1 = vuc; uc1 = uc1*13; if( uc1 != (uc2+=TESTLIT) ) failures++; uc1 = vuc; uc1 = uc1*14; if( uc1 != (uc2+=TESTLIT) ) failures++; uc1 = vuc; uc1 = uc1*15; if( uc1 != (uc2+=TESTLIT) ) failures++; @@ -75,17 +75,17 @@ void m3(unsigned char uc) uc1 = vuc; uc1 = uc1*20; if( uc1 != (uc2+=TESTLIT) ) failures++; uc1 = vuc; uc1 = uc1*21; if( uc1 != (uc2+=TESTLIT) ) failures++; uc1 = vuc; uc1 = uc1*22; if( uc1 != (uc2+=TESTLIT) ) failures++; - uc1 = vuc; uc1 = uc1*23; if( uc1 != (uc2+=TESTLIT) ) failures++; + uc1 = vuc; uc1 = uc1*23; if( uc1 != (uc2+=TESTLIT) ) failures++; uc1 = vuc; uc1 = uc1*24; if( uc1 != (uc2+=TESTLIT) ) failures++; - + uc1 = vuc; uc1 = uc1*31; if( uc1 != ((31*TESTLIT) & 0xff) ) failures++; uc1 = vuc; uc1 = uc1*32; if( uc1 != ((32*TESTLIT) & 0xff) ) failures++; uc1 = vuc; uc1 = uc1*64; if( uc1 != ((64*TESTLIT) & 0xff) ) failures++; uc1 = vuc; uc1 = uc1*128;if( uc1 != ((128*TESTLIT)& 0xff) ) failures++; /* testing literal multiply with different source and destination */ - uc1 = vuc*1; if( uc1 != ((1*TESTLIT) & 0xff) ) failures++; - uc1 = vuc*2; if( uc1 != ((2*TESTLIT) & 0xff) ) failures++; + uc1 = vuc*1; if( uc1 != ((1*TESTLIT) & 0xff) ) failures++; + uc1 = vuc*2; if( uc1 != ((2*TESTLIT) & 0xff) ) failures++; uc1 = vuc*4; if( uc1 != ((4*TESTLIT) & 0xff) ) failures++; } diff --git a/test/val/nestfor.c b/test/val/nestfor.c index 735da21de..09f9d093d 100644 --- a/test/val/nestfor.c +++ b/test/val/nestfor.c @@ -21,10 +21,10 @@ unsigned char uchar1 = 0; void dput(unsigned char val) { - /*PORTB = val; - PORTA = 0x01; - PORTA = 0x00; - */ + /*PORTB = val; + PORTA = 0x01; + PORTA = 0x00; + */ } void done() @@ -35,104 +35,104 @@ void done() /* both loops use the loop variable inside the inner loop */ void for1(void) { - unsigned char i, j; + unsigned char i, j; - uchar0 = 0; - uchar1 = 0; - for(i = 0; i < 3; i++) { - uchar0++; - for(j = 0; j < 4; j++) { - uchar1++; - dput(i); - dput(j); - } - } - if(uchar0 != 3) - failures++; - if(uchar1 != 12) - failures++; + uchar0 = 0; + uchar1 = 0; + for(i = 0; i < 3; i++) { + uchar0++; + for(j = 0; j < 4; j++) { + uchar1++; + dput(i); + dput(j); + } + } + if(uchar0 != 3) + failures++; + if(uchar1 != 12) + failures++; } /* only the outer loop's variable is used inside, inner can be optimized into a repeat-loop */ void for2(void) { - unsigned char i, j; + unsigned char i, j; - uchar0 = 0; - uchar1 = 0; - for(i = 0; i < 3; i++) { - uchar0++; - for(j = 0; j < 4; j++) { - uchar1++; - dput(i); - } - } - if(uchar0 != 3) - failures++; - if(uchar1 != 12) - failures++; + uchar0 = 0; + uchar1 = 0; + for(i = 0; i < 3; i++) { + uchar0++; + for(j = 0; j < 4; j++) { + uchar1++; + dput(i); + } + } + if(uchar0 != 3) + failures++; + if(uchar1 != 12) + failures++; } /* only the inner loop's variable is used inside */ void for3(void) { - unsigned char i, j; + unsigned char i, j; - uchar0 = 0; - uchar1 = 0; - for(i = 0; i < 3; i++) { - uchar0++; - for(j = 0; j < 4; j++) { - uchar1++; - dput(j); - } - } - if(uchar0 != 3) - failures++; - if(uchar1 != 12) - failures++; + uchar0 = 0; + uchar1 = 0; + for(i = 0; i < 3; i++) { + uchar0++; + for(j = 0; j < 4; j++) { + uchar1++; + dput(j); + } + } + if(uchar0 != 3) + failures++; + if(uchar1 != 12) + failures++; } /* neither loop variable used inside the loops */ void for4(void) { - unsigned char i, j; + unsigned char i, j; - uchar0 = 0; - uchar1 = 0; - for(i = 0; i < 3; i++) { - uchar0++; - for(j = 0; j < 4; j++) { - uchar1++; - dput(uchar0); - dput(uchar1); - } - } - if(uchar0 != 3) - failures++; - if(uchar1 != 12) - failures++; + uchar0 = 0; + uchar1 = 0; + for(i = 0; i < 3; i++) { + uchar0++; + for(j = 0; j < 4; j++) { + uchar1++; + dput(uchar0); + dput(uchar1); + } + } + if(uchar0 != 3) + failures++; + if(uchar1 != 12) + failures++; } /* like for1 but different condition in inner loop */ void for5(void) { - unsigned char i, j; + unsigned char i, j; - uchar0 = 0; - uchar1 = 0; - for(i = 0; i < 3; i++) { - uchar0++; - for(j = 10; j >= 5; j--) { - uchar1++; - dput(i); - dput(j); - } - } - if(uchar0 != 3) - failures++; - if(uchar1 != 18) - failures++; + uchar0 = 0; + uchar1 = 0; + for(i = 0; i < 3; i++) { + uchar0++; + for(j = 10; j >= 5; j--) { + uchar1++; + dput(i); + dput(j); + } + } + if(uchar0 != 3) + failures++; + if(uchar1 != 18) + failures++; } int main(void) diff --git a/test/val/opsize.c b/test/val/opsize.c new file mode 100644 index 000000000..20c7f0511 --- /dev/null +++ b/test/val/opsize.c @@ -0,0 +1,33 @@ + +/* Test for result types of certain unary operations */ + +#include <stdio.h> + +signed char x; +struct S { + unsigned char a : 3; + unsigned int b : 3; +} s; + +int main(void) +{ + _Static_assert(sizeof (++x) == sizeof (char), "++x result should not have promoted type"); + _Static_assert(sizeof (--x) == sizeof (char), "--x result should not have promoted type"); + _Static_assert(sizeof (x++) == sizeof (char), "x++ result should not have promoted type"); + _Static_assert(sizeof (x--) == sizeof (char), "x-- result should not have promoted type"); + _Static_assert(sizeof (x=0) == sizeof (char), "x=0 result should not have promoted type"); + + _Static_assert(sizeof (+x) == sizeof (int), "+x result should have promoted type"); + _Static_assert(sizeof (-x) == sizeof (int), "-x result should have promoted type"); + _Static_assert(sizeof (~x) == sizeof (int), "~x result should have promoted type"); + + _Static_assert(sizeof (+s.a) == sizeof (int), "+s.a result should have promoted type"); + _Static_assert(sizeof (-s.a) == sizeof (int), "-s.a result should have promoted type"); + _Static_assert(sizeof (~s.a) == sizeof (int), "~s.a result should have promoted type"); + + _Static_assert(sizeof (+s.b) == sizeof (int), "+s.b result should have promoted type"); + _Static_assert(sizeof (-s.b) == sizeof (int), "-s.b result should have promoted type"); + _Static_assert(sizeof (~s.b) == sizeof (int), "~s.b result should have promoted type"); + + return 0; +} diff --git a/test/val/or1.c b/test/val/or1.c index 9e41d7a39..b5f550331 100644 --- a/test/val/or1.c +++ b/test/val/or1.c @@ -57,23 +57,23 @@ void or_lit2uint(void) failures++; uint0 |= 1; - if(uint0 != 1) + if(uint0 != 1) failures++; uint0 |= 2; - if(uint0 != 3) + if(uint0 != 3) failures++; uint0 |= 0x100; - if(uint0 != 0x103) + if(uint0 != 0x103) failures++; uint0 |= 0x102; - if(uint0 != 0x103) + if(uint0 != 0x103) failures++; uint0 |= 0x303; - if(uint0 != 0x303) + if(uint0 != 0x303) failures++; } @@ -83,27 +83,27 @@ void or_lit2ulong(void) failures++; ulong0 |= 1; - if(ulong0 != 1) + if(ulong0 != 1) failures++; ulong0 |= 2; - if(ulong0 != 3) + if(ulong0 != 3) failures++; ulong0 |= 0x100; - if(ulong0 != 0x103) + if(ulong0 != 0x103) failures++; ulong0 |= 0x102; - if(ulong0 != 0x103) + if(ulong0 != 0x103) failures++; ulong0 |= 0x303; - if(ulong0 != 0x303) + if(ulong0 != 0x303) failures++; ulong0 |= 0x80000000; - if(ulong0 != 0x80000303) + if(ulong0 != 0x80000303) failures++; } diff --git a/test/val/postdec-16-16.c b/test/val/postdec-16-16.c new file mode 100644 index 000000000..bb4475959 --- /dev/null +++ b/test/val/postdec-16-16.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned short u16w = 3; +static unsigned short u16r = 5; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0x1, 0xc, 0xd, 0x4, 0x5, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[u16w--] = ((unsigned char*)SOURCEMEM)[u16r--]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u16w: %d\n\r", u16w); + printf("u16r: %d\n\r", u16r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u16w != 1) { + err = EXIT_FAILURE; + } + if (u16r != 3) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/postdec-16-8.c b/test/val/postdec-16-8.c new file mode 100644 index 000000000..d2a5bab3b --- /dev/null +++ b/test/val/postdec-16-8.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned short u16w = 3; +static unsigned char u8r = 5; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0x1, 0xc, 0xd, 0x4, 0x5, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[u16w--] = ((unsigned char*)SOURCEMEM)[u8r--]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u16w: %d\n\r", u16w); + printf("u8r: %d\n\r", u8r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u16w != 1) { + err = EXIT_FAILURE; + } + if (u8r != 3) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/postdec-8-16.c b/test/val/postdec-8-16.c new file mode 100644 index 000000000..7eeda2dcc --- /dev/null +++ b/test/val/postdec-8-16.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned char u8w = 3; +static unsigned short u16r = 5; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0x1, 0xc, 0xd, 0x4, 0x5, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[u8w--] = ((unsigned char*)SOURCEMEM)[u16r--]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u8w: %d\n\r", u8w); + printf("u16r: %d\n\r", u16r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u8w != 1) { + err = EXIT_FAILURE; + } + if (u16r != 3) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/postdec-8-8.c b/test/val/postdec-8-8.c new file mode 100644 index 000000000..38470cb14 --- /dev/null +++ b/test/val/postdec-8-8.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned char u8w = 3; +static unsigned char u8r = 5; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0x1, 0xc, 0xd, 0x4, 0x5, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[u8w--] = ((unsigned char*)SOURCEMEM)[u8r--]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u8w: %d\n\r", u8w); + printf("u8r: %d\n\r", u8r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u8w != 1) { + err = EXIT_FAILURE; + } + if (u8r != 3) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/postinc-16-16.c b/test/val/postinc-16-16.c new file mode 100644 index 000000000..4a122e51f --- /dev/null +++ b/test/val/postinc-16-16.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned short u16w = 1; +static unsigned short u16r = 3; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0xb, 0xc, 0x3, 0x4, 0x5, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[u16w++] = ((unsigned char*)SOURCEMEM)[u16r++]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u16w: %d\n\r", u16w); + printf("u16r: %d\n\r", u16r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u16w != 3) { + err = EXIT_FAILURE; + } + if (u16r != 5) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/postinc-16-8.c b/test/val/postinc-16-8.c new file mode 100644 index 000000000..a604ab34c --- /dev/null +++ b/test/val/postinc-16-8.c @@ -0,0 +1,85 @@ + +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned short u16w = 1; +static unsigned char u8r = 3; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0xb, 0xc, 0x3, 0x4, 0x5, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = 0; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[u16w++] = ((unsigned char*)SOURCEMEM)[u8r++]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u16w: %d\n\r", u16w); + printf("u8r: %d\n\r", u8r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = 1; + } + if (u16w != 3) { + err = 1; + } + if (u8r != 5) { + err = 1; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/postinc-8-16.c b/test/val/postinc-8-16.c new file mode 100644 index 000000000..7ac57e9da --- /dev/null +++ b/test/val/postinc-8-16.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned char u8w = 1; +static unsigned short u16r = 3; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0xb, 0xc, 0x3, 0x4, 0x5, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[u8w++] = ((unsigned char*)SOURCEMEM)[u16r++]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u8w: %d\n\r", u8w); + printf("u16r: %d\n\r", u16r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u8w != 3) { + err = EXIT_FAILURE; + } + if (u16r != 5) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/postinc-8-8.c b/test/val/postinc-8-8.c new file mode 100644 index 000000000..97c8aa9f7 --- /dev/null +++ b/test/val/postinc-8-8.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned char u8w = 1; +static unsigned char u8r = 3; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0xb, 0xc, 0x3, 0x4, 0x5, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[u8w++] = ((unsigned char*)SOURCEMEM)[u8r++]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u8w: %d\n\r", u8w); + printf("u8r: %d\n\r", u8r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u8w != 3) { + err = EXIT_FAILURE; + } + if (u8r != 5) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/postincdec.c b/test/val/postincdec.c new file mode 100644 index 000000000..9a4f06183 --- /dev/null +++ b/test/val/postincdec.c @@ -0,0 +1,23 @@ +/* + !!DESCRIPTION!! char-sized post-increment and -decrement + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Lauri Kasanen +*/ + + +static unsigned char val, array[2]; + +int main() { + + val = 0; + array[0] = array[1] = 10; + + array[val++] = 2; + array[val++] = 2; + --val; + array[val--] = 0; + array[val--] = 0; + + return (array[0] == array[1] && array[0] == 0 && val == 0xff) ? 0 : 1; +} diff --git a/test/val/pptest1.c b/test/val/pptest1.c new file mode 100644 index 000000000..52b381b0b --- /dev/null +++ b/test/val/pptest1.c @@ -0,0 +1,27 @@ + +/* preprocessor test #1 */ + +#define hash_hash # ## # +#define mkstr(a) # a +#define in_between(a) mkstr(a) +#define join(c, d) in_between(c hash_hash d) + +#define x "first" +#define y "second" + +char p[] = join(x, y); // Comment + +#include <string.h> +#include <stdlib.h> +#include <stdio.h> + +int main(void) +{ + printf("expected: %s\n", "\"first\" ## \"second\""); + printf("p: %s\n", p); + if (!strcmp(p, "\"first\" ## \"second\"")) { + return EXIT_SUCCESS; + } + printf("all fine\n"); + return EXIT_FAILURE; +} diff --git a/test/val/pptest3.c b/test/val/pptest3.c new file mode 100644 index 000000000..b48677703 --- /dev/null +++ b/test/val/pptest3.c @@ -0,0 +1,44 @@ + +/* preprocessor test #3 */ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> + +char *x1 = "123"; +char *x2 = "456"; +FILE *s; +char *str = "789"; + +#define str(s) # s +#define xstr(s) str(s) +#define debug(s, t) printf("x" # s "= %d, x" # t "= %s", \ + x ## s, x ## t) +#define INCFILE(n) vers ## n // Comment +#define glue(a,b) a ## b +#define xglue(a,b) glue(a,b) +#define HIGHLOW "hello" +#define LOW LOW ", world" + +int main(void) { + s = stdout; + + debug (1, 2); + + fputs (str (strncmp("abc\0d", "abc", '\4') // Comment + == 0) str (: @\n), s); + + str = glue (HIGH, LOW); + printf("str: %s\n", str); + if (strcmp(str, "hello") != 0) { + return EXIT_FAILURE; + } + + str = xglue (HIGH, LOW); + printf("str: %s\n", str); + if (strcmp(str, "hello, world") != 0) { + return EXIT_FAILURE; + } + + return EXIT_SUCCESS; +} diff --git a/test/val/pptest4.c b/test/val/pptest4.c new file mode 100644 index 000000000..6c0891661 --- /dev/null +++ b/test/val/pptest4.c @@ -0,0 +1,24 @@ + +/* preprocessor test #4 */ + +#define t(x,y,z) x ## y ## z +int j[] = { t(1,2,3), t(,4,5), t(6,,7), t(8,9,), + t(10,,), t(,11,), t(,,12), t(,,) }; + +int e[] = { 123, 45, 67, 89, 10, 11, 12, }; + +#include <string.h> +#include <stdlib.h> +#include <stdio.h> + +unsigned char i; + +int main(void) +{ + for (i = 0; i < 7; ++i) { + printf("j: %d expect: %d\n", j[i], e[i]); + if (j[i] != e[i]) return EXIT_FAILURE; + } + printf("all fine\n"); + return EXIT_SUCCESS; +} diff --git a/test/val/pptest5.c b/test/val/pptest5.c new file mode 100644 index 000000000..0b9db291d --- /dev/null +++ b/test/val/pptest5.c @@ -0,0 +1,24 @@ + +/* preprocessor test #5 */ + +#define t(x,y,z) x ## y ## z +int j[] = { t(1,2,3), t(,4,5), t(6,,7), t(8,9,), + t(10,,), t(,11,), t(,,12), t(,,) }; + +int e[] = { 123, 45, 67, 89, 10, 11, 12, }; + +#include <string.h> +#include <stdlib.h> +#include <stdio.h> + +unsigned char i; + +int main(void) +{ + for (i = 0; i < 7; ++i) { + printf("j: %d expect: %d\n", j[i], e[i]); + if (j[i] != e[i]) return EXIT_FAILURE; + } + printf("all fine\n"); + return EXIT_SUCCESS; +} diff --git a/test/val/pr1102.c b/test/val/pr1102.c new file mode 100644 index 000000000..2a78e997b --- /dev/null +++ b/test/val/pr1102.c @@ -0,0 +1,77 @@ + +/* pr#1102 - Passing structs/unions <= 4 bytes to/from functions */ + +#include <stdlib.h> +#include <stdio.h> + +typedef struct test1_s { + char a; + int b; + char c; +} test1_t; + +test1_t test1(int a, int b, int c) +{ + test1_t res; + res.a = a; + res.b = b; + res.c = c; + return res; +} + +int test2(test1_t s) +{ + printf("a: %d b: %d c: %d\n", s.a, s.b, s.c); + if ((s.a != 13) || (s.b != 4711) || (s.c != 99)) { + return 0; + } + return 1; +} + +typedef struct test2_s { + char a; + char b; + char c; + char d; +} test2_t; + +test2_t test3(test1_t s) +{ + test2_t ret; + printf("a: %d b: %d c: %d\n", s.a, s.b, s.c); + ret.a = s.c; + ret.b = s.b & 0xff; + ret.c = s.b >> 8; + ret.d = s.a; + return ret; +} + +int main(void) { + test1_t t1; + test2_t t2; + + t1 = test1(12, 1842, 23); + printf("a: %d b: %d c: %d\n", t1.a, t1.b, t1.c); + if ((t1.a != 12) || (t1.b != 1842) || (t1.c != 23)) { + return EXIT_FAILURE; + } + + t1.a = 13; + t1.b = 4711; + t1.c = 99; + if (test2(t1) != 1) { + return EXIT_FAILURE; + } + + t1.a = 66; + t1.b = 0x7788; + t1.c = 22; + t2 = test3(t1); + printf("a: %d b: %d c: %d d: %d\n", t2.a, t2.b, t2.c, t2.d); + if ((t2.a != 22) || (t2.b != 0x88) || (t2.c != 0x77) || (t2.d != 66)) { + return EXIT_FAILURE; + } + + printf("all fine\n"); + return EXIT_SUCCESS; +} diff --git a/test/val/pr1110a.c b/test/val/pr1110a.c new file mode 100644 index 000000000..0e0d91f85 --- /dev/null +++ b/test/val/pr1110a.c @@ -0,0 +1,19 @@ + +/* pr #1110 - the part of the redefinition that should compile */ + +static const unsigned char array[3]; /* OK */ +static const unsigned char array[] = { 0, 1, 2 }; /* OK - complete definition*/ +static const unsigned char array[3]; /* OK */ +static const unsigned char array[]; /* OK */ + +#include <stdlib.h> +#include <stdio.h> + +int main(void) +{ + printf("%u %u %u\n", array[0], array[1], array[2]); + if ((array[0] != 0) || (array[1] != 1) || (array[2] != 2)) { + return EXIT_FAILURE; + } + return EXIT_SUCCESS; +} diff --git a/test/val/pr1423.c b/test/val/pr1423.c new file mode 100644 index 000000000..47f0f0610 --- /dev/null +++ b/test/val/pr1423.c @@ -0,0 +1,41 @@ +/* pr #1423 - Codegen fix for certain cases of object addresses as boolean */ + +unsigned char fails = 0; + +void test1(void) +{ + int a; + while (&a) { + return; + } + fails++; + return; +} + +void test2(void) +{ + int a; + do { + return; + } while (&a); + fails++; + return; +} + +void test3(void) +{ + int a; + for (;&a;) { + return; + } + fails++; + return; +} + +int main(void) +{ + test1(); + test2(); + test3(); + return fails; +} diff --git a/test/val/pr1425.c b/test/val/pr1425.c new file mode 100644 index 000000000..e3ae23ba3 --- /dev/null +++ b/test/val/pr1425.c @@ -0,0 +1,45 @@ + +/* pr #1425 - Ternary fixes */ + +unsigned char fails = 0; + +void test1(void) +{ + int x = 0; + x ? (void)x-- : (void)1; + if (x != 0) { + fails++; + } +} + +int test2(void) +{ + int x = 0, y = 0; + x ? (void)x--, (void)y++ : (void)1; + if (x != 0) { + fails++; + } + if (y != 0) { + fails++; + } +} + +void test3(void) +{ + int x = 0, y = 0; + x ? ((void)x--, (void)y++) : (void)1; + if (x != 0) { + fails++; + } + if (y != 0) { + fails++; + } +} + +int main(void) +{ + test1(); + test2(); + test3(); + return fails; +} diff --git a/test/val/pr1461.c b/test/val/pr1461.c new file mode 100644 index 000000000..dae6b2999 --- /dev/null +++ b/test/val/pr1461.c @@ -0,0 +1,53 @@ + +/* pr#1461 Fixed pointer subtraction in certain very rare cases */ + +#include <stdlib.h> +#include <stdio.h> + +static int err = 0; + +static int a[1], *p; +static unsigned int i1, i2; + +int test1(void) +{ + p = a - (int)a; + printf("a: %p - (int)a: 0x%x = p: %p\n", a, (int)a, p); + printf("i1: 0x%x - i2: 0x%x = p: %p\n", i1, i2, i1 - i2); + if ((int)p != (i1 - i2)) { + printf("-> failed\n"); + return 1; + } + return 0; +} + +int test2(void) +{ + p = p - (int)a; + printf("p: %p - (int)a: 0x%x = p: %p\n", p, (int)a, p); + printf("p: %p - i2: 0x%x = p: %p\n", p, i2, 0x1234 - i2); + if ((int)p != (0x1234 - i2)) { + printf("-> failed\n"); + return 1; + } + return 0; +} + +int main(void) +{ + a[0] = 0x4711; + i1 = (int)a; + i2 = i1 << 1; + + p = (int*)0x1234; + printf("p: %p &a[0]: %p a: %p (int)a: 0x%x i1: 0x%x i2: 0x%x\n", p, &a[0], a, (int)a, i1, i2); + + err += test1(); + + p = (int*)0x1234; + printf("p: %p &a[0]: %p a: %p (int)a: 0x%x i1: 0x%x i2: 0x%x\n", p, &a[0], a, (int)a, i1, i2); + + err += test2(); + + return err; +} diff --git a/test/val/predec-16-16.c b/test/val/predec-16-16.c new file mode 100644 index 000000000..a8c1658e4 --- /dev/null +++ b/test/val/predec-16-16.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned short u16w = 3; +static unsigned short u16r = 5; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0xb, 0xc, 0x3, 0x4, 0x5, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[--u16w] = ((unsigned char*)SOURCEMEM)[--u16r]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u16w: %d\n\r", u16w); + printf("u16r: %d\n\r", u16r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u16w != 1) { + err = EXIT_FAILURE; + } + if (u16r != 3) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/predec-16-8.c b/test/val/predec-16-8.c new file mode 100644 index 000000000..a0e77da89 --- /dev/null +++ b/test/val/predec-16-8.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned short u16w = 3; +static unsigned char u8r = 5; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0xb, 0xc, 0x3, 0x4, 0x5, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[--u16w] = ((unsigned char*)SOURCEMEM)[--u8r]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u16w: %d\n\r", u16w); + printf("u8r: %d\n\r", u8r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u16w != 1) { + err = EXIT_FAILURE; + } + if (u8r != 3) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/predec-8-16.c b/test/val/predec-8-16.c new file mode 100644 index 000000000..353f819d2 --- /dev/null +++ b/test/val/predec-8-16.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned char u8w = 3; +static unsigned short u16r = 5; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0xb, 0xc, 0x3, 0x4, 0x5, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[--u8w] = ((unsigned char*)SOURCEMEM)[--u16r]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u8w: %d\n\r", u8w); + printf("u16r: %d\n\r", u16r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u8w != 1) { + err = EXIT_FAILURE; + } + if (u16r != 3) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/predec-8-8.c b/test/val/predec-8-8.c new file mode 100644 index 000000000..e468c9426 --- /dev/null +++ b/test/val/predec-8-8.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned char u8w = 3; +static unsigned char u8r = 5; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0xb, 0xc, 0x3, 0x4, 0x5, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[--u8w] = ((unsigned char*)SOURCEMEM)[--u8r]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u8w: %d\n\r", u8w); + printf("u8r: %d\n\r", u8r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u8w != 1) { + err = EXIT_FAILURE; + } + if (u8r != 3) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/preinc-16-16.c b/test/val/preinc-16-16.c new file mode 100644 index 000000000..b600b6533 --- /dev/null +++ b/test/val/preinc-16-16.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned short u16w = 3; +static unsigned short u16r = 5; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0x1, 0x2, 0x3, 0xe, 0xf, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[++u16w] = ((unsigned char*)SOURCEMEM)[++u16r]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u16w: %d\n\r", u16w); + printf("u16r: %d\n\r", u16r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u16w != 5) { + err = EXIT_FAILURE; + } + if (u16r != 7) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/preinc-16-8.c b/test/val/preinc-16-8.c new file mode 100644 index 000000000..a7bc5d53a --- /dev/null +++ b/test/val/preinc-16-8.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned short u16w = 3; +static unsigned char u8r = 5; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0x1, 0x2, 0x3, 0xe, 0xf, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[++u16w] = ((unsigned char*)SOURCEMEM)[++u8r]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u16w: %d\n\r", u16w); + printf("u8r: %d\n\r", u8r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u16w != 5) { + err = EXIT_FAILURE; + } + if (u8r != 7) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/preinc-8-16.c b/test/val/preinc-8-16.c new file mode 100644 index 000000000..2b4104df5 --- /dev/null +++ b/test/val/preinc-8-16.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned char u8w = 3; +static unsigned short u16r = 5; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0x1, 0x2, 0x3, 0xe, 0xf, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[++u8w] = ((unsigned char*)SOURCEMEM)[++u16r]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u8w: %d\n\r", u8w); + printf("u16r: %d\n\r", u16r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u8w != 5) { + err = EXIT_FAILURE; + } + if (u16r != 7) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/preinc-8-8.c b/test/val/preinc-8-8.c new file mode 100644 index 000000000..9f6ec35a9 --- /dev/null +++ b/test/val/preinc-8-8.c @@ -0,0 +1,86 @@ + +#include <stdlib.h> +#include <stdio.h> +#include <string.h> +#ifdef __C64__ +#include <conio.h> +#endif + +/* apparently we dont trigger the bug when not using absolute addresses? */ +#ifdef __C64__ +#define TARGETMEM 0x4c8 +#define SOURCEMEM 0x702 +#elif __SIM6502__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#elif __SIM65C02__ +#define TARGETMEM 0xc4c8 +#define SOURCEMEM 0xc702 +#else +static unsigned char mem[0x10]; +#define TARGETMEM &mem[0] +#define SOURCEMEM &mem[8] +#endif + +/* do not put at pos. 1, and 1 byte apart - so we can eventually notice + off-by-one errors */ +static unsigned char u8w = 3; +static unsigned char u8r = 5; + +static unsigned char target[8] = { 0x0, 0x1, 0x2, 0x3, 0x4, 0x5, 0x6, 0x7 }; +static unsigned char source[8] = { 0x8, 0x9, 0xa, 0xb, 0xc, 0xd, 0xe, 0xf }; +static unsigned char expect[8] = { 0x0, 0x1, 0x2, 0x3, 0xe, 0xf, 0x6, 0x7 }; + +static unsigned char i; +static unsigned char err = EXIT_SUCCESS; + +void test1(void) +{ + ((unsigned char*)TARGETMEM)[++u8w] = ((unsigned char*)SOURCEMEM)[++u8r]; +} + +void dotest(void) +{ + + memcpy(TARGETMEM, target, 8); + memcpy(SOURCEMEM, source, 8); + + test1(); + + memcpy(target, TARGETMEM, 8); + memcpy(source, SOURCEMEM, 8); +#ifdef __C64__ + clrscr(); +#endif + printf("source:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", source[i]); + } + printf("\n\rtarget:"); + for(i = 0; i < 8; ++i) { + printf("%0x ", target[i]); + } + printf("\n\r"); + + printf("u8w: %d\n\r", u8w); + printf("u8r: %d\n\r", u8r); + +} + +int main(void) +{ + dotest(); + dotest(); + if (memcmp(target, expect, 8) != 0) { + printf("buffer data error\n\r"); + err = EXIT_FAILURE; + } + if (u8w != 5) { + err = EXIT_FAILURE; + } + if (u8r != 7) { + err = EXIT_FAILURE; + } + printf("return: %d\n\r", err); + return err; +} diff --git a/test/val/ptrfunc.c b/test/val/ptrfunc.c index 55503e176..78e53e254 100644 --- a/test/val/ptrfunc.c +++ b/test/val/ptrfunc.c @@ -6,7 +6,7 @@ #include <stdio.h> -#define NO_IMPLICIT_FUNCPTR_CONV +/* #define SUPPORT_BIT_TYPES */ unsigned char success=0; unsigned char failures=0; @@ -33,15 +33,9 @@ volatile unsigned char uchar1 = 0; volatile unsigned char uchar2 = 0; #endif -#ifdef NO_IMPLICIT_FUNCPTR_CONV void (*pfunc)(void); void (*p1func)(void); unsigned char (*pcfunc)(void); -#else -void (*pfunc)(); -void (*p1func)(); -unsigned char (*pcfunc)(); -#endif void done() { @@ -50,88 +44,84 @@ void done() void call0(void) { - uchar0++; + uchar0++; } void call1(void) { - uchar1++; + uchar1++; } unsigned char call2(void) { - return uchar0 + 9; + return uchar0 + 9; } void docall0(void) { - pfunc = call0; - (pfunc)(); - if(uchar0 != 1) - failures++; + pfunc = call0; + (pfunc)(); + if(uchar0 != 1) + failures++; } void docall1() { - unsigned char i; - for(i = 0; i < 3; i++) { - (*p1func)(); - } + unsigned char i; + for(i = 0; i < 3; i++) { + (*p1func)(); + } } -#ifdef NO_IMPLICIT_FUNCPTR_CONV -void docall2( void(*pf)(void) ) -#else void docall2( void(*pf)() ) -#endif { - unsigned char i; - for(i = 0; i < 2; i++) { - pf(); - } + unsigned char i; + for(i = 0; i < 2; i++) { + pf(); + } } int main(void) { docall0(); - p1func = call1; - docall1(); - if(uchar1 != 3) - failures++; - if(uchar0 != 1) - failures++; + p1func = call1; + docall1(); + if(uchar1 != 3) + failures++; + if(uchar0 != 1) + failures++; - p1func = call0; - docall1(); - if(uchar1 != 3) - failures++; - if(uchar0 != 4) - failures++; + p1func = call0; + docall1(); + if(uchar1 != 3) + failures++; + if(uchar0 != 4) + failures++; - docall2(call0); - if(uchar1 != 3) - failures++; - if(uchar0 != 6) - failures++; + docall2(call0); + if(uchar1 != 3) + failures++; + if(uchar0 != 6) + failures++; - docall2(call1); - if(uchar1 != 5) - failures++; - if(uchar0 != 6) - failures++; + docall2(call1); + if(uchar1 != 5) + failures++; + if(uchar0 != 6) + failures++; - pcfunc = call2; - uchar2 = (*pcfunc)(); - if(uchar2 != 15) - failures++; + pcfunc = call2; + uchar2 = (*pcfunc)(); + if(uchar2 != 15) + failures++; - uchar2 += (pcfunc)(); - uchar2 += pcfunc(); + uchar2 += (pcfunc)(); + uchar2 += pcfunc(); - success = failures; - done(); - printf("failures: %d\n",failures); + success = failures; + done(); + printf("failures: %d\n",failures); - return failures; + return failures; } diff --git a/test/val/rand.c b/test/val/rand.c new file mode 100644 index 000000000..ac2ab0d17 --- /dev/null +++ b/test/val/rand.c @@ -0,0 +1,110 @@ +/* This test verifies that the assembly implementation of rand() matches its + * theoretical high level equivalent. + * + * This does about 3000 tests from various starting srand() seeds. + * A more thorough test might visit the entire sequence with 2^32 tests, but + * that takes hours to simulate, and this should be a sufficient sampling. + * + * This will also fail if rand() is ever altered, which might be a warning to + * tread carefully. Some past discussion of RNG here: + * https://github.com/cc65/cc65/pull/951 + */ + +#include <stdlib.h> +#include <stdio.h> +#include <stdint.h> + +/* for faster execution */ +#pragma static-locals (on) + +/* values tested per seed */ +#define SUBTESTS 50 + +/* increments used between tested seeds */ +/* 653 is prime and divides 32768 by ~50 */ +#define TESTINC 653 + +static uint32_t seed; + +int ref_rand() +{ + uint16_t output; + /* seed follows the LCG sequence * 0x01010101 + 0xB3B3B3B3 */ + seed = seed * 0x01010101UL + 0xB3B3B3B3UL; + /* output uses the top two bytes (reversed) XOR with bottom two bytes */ + { + uint16_t s0 = (seed >> 0) & 0xFF; + uint16_t s1 = (seed >> 8) & 0xFF; + uint16_t s2 = (seed >> 16) & 0xFF; + uint16_t s3 = (seed >> 24) & 0xFF; + uint16_t o0 = s3 ^ s1; + uint16_t o1 = s2 ^ s0; + output = o0 | (o1 << 8); + } + return (int)(output & 0x7FFF); +} + +void ref_srand(int ax) +{ + uint32_t s = (unsigned int)ax; + seed = s | (s << 16); /* low 16 bits is convenient filler for high 16 bits */ + ref_rand(); /* one pre-call "shuffles" the first rand() result so it isn't too predictable */ +} + +int main(void) +{ + unsigned int i,j; + int a,b; + + /* test that startup state is equivalent to srand(1) */ + { + //srand(1); // implied + ref_srand(1); + for (j=0; j<SUBTESTS; ++j) + { + a = rand(); + b = ref_rand(); + if (a != b) + { + printf("failed startup seed at test %d. rand()=%d reference=%d\n",j,a,b); + return EXIT_FAILURE; + } + } + } + + /* test every power of 2 seed */ + for (i = 0; i < 16; ++i) + { + srand(1<<i); + ref_srand(1<<i); + for (j=0; j<SUBTESTS; ++j) + { + a = rand(); + b = ref_rand(); + if (a != b) + { + printf("failed seed %d at test %d. rand()=%d reference=%d\n",(1<<i),j,a,b); + return EXIT_FAILURE; + } + } + } + + /* test a sampling of seeds*/ + for (i = 0; i < 32768UL; i += TESTINC) + { + srand(i); + ref_srand(i); + for (j=0; j<SUBTESTS; ++j) + { + a = rand(); + b = ref_rand(); + if (a != b) + { + printf("failed seed %d at test %d. rand()=%d reference=%d\n",(1<<i),j,a,b); + return EXIT_FAILURE; + } + } + } + + return EXIT_SUCCESS; +} diff --git a/test/val/return-struct.c b/test/val/return-struct.c new file mode 100644 index 000000000..a114939a4 --- /dev/null +++ b/test/val/return-struct.c @@ -0,0 +1,62 @@ +/* bug #264 - cc65 fails to warn about a function returning struct */ + +#include <stdio.h> +#include <stdlib.h> +#include <stdint.h> + +typedef uint16_t u16; +typedef uint8_t u8; + +typedef struct { + u16 quot; + u16 rem; +} udiv_t; + +udiv_t div3(u16 in) { + + udiv_t u; + u16 q = 0; + + while (in >= 300) { + in -= 300; + q += 100; + } + + while (in >= 30) { + in -= 30; + q += 10; + } + + while (in >= 3) { + in -= 3; + ++q; + } + + u.quot = q; + u.rem = in; + + return u; +} + +int res = 0; + +int main(void) { + + u16 i; + div_t d; + udiv_t u; + + for (i = 1024; i; i--) { + d = div(i, 3); + u = div3(i); + + if (d.quot != u.quot || d.rem != u.rem) { + printf("Mismatch at %u/3, div %u %u, div3 %u %u\n", i, + d.quot, d.rem, u.quot, u.rem); + res++; + } + } + + return res; +} + diff --git a/test/val/rotate3.c b/test/val/rotate3.c index 21b2dc370..8ac2581e9 100644 --- a/test/val/rotate3.c +++ b/test/val/rotate3.c @@ -6,6 +6,9 @@ #include <stdio.h> #include <limits.h> +#include <stdint.h> + +/* #define SUPPORT_BIT_TYPES */ unsigned char success=0; unsigned char failures=0; @@ -14,22 +17,10 @@ unsigned char dummy=0; #ifdef SUPPORT_BIT_TYPES bit bit0 = 0; #endif -#ifdef SIZEOF_INT_16BIT -#if defined(__LINUX__) || defined(LINUX) -unsigned short aint0 = 0; -unsigned short aint1 = 0; -#else -unsigned int aint0 = 0; -unsigned int aint1 = 0; +uint16_t aint0 = 0; +uint16_t aint1 = 0; -#endif - -#else -unsigned int aint0 = 0; -unsigned int aint1 = 0; - -#endif unsigned char achar0 = 0; unsigned char achar1 = 0; unsigned char achar2 = 0; diff --git a/test/val/rotate4.c b/test/val/rotate4.c index 09b1ebf4c..4b50b0d1c 100644 --- a/test/val/rotate4.c +++ b/test/val/rotate4.c @@ -6,6 +6,9 @@ #include <stdio.h> #include <limits.h> +#include <stdint.h> + +/* #define SUPPORT_BIT_TYPES */ unsigned char success=0; unsigned char failures=0; @@ -14,22 +17,10 @@ unsigned char dummy=0; #ifdef SUPPORT_BIT_TYPES bit bit0 = 0; #endif -#ifdef SIZEOF_INT_16BIT -#if defined(__LINUX__) || defined(LINUX) -unsigned short aint0 = 0; -unsigned short aint1 = 0; -#else -unsigned int aint0 = 0; -unsigned int aint1 = 0; +uint16_t aint0 = 0; +uint16_t aint1 = 0; -#endif - -#else -unsigned int aint0 = 0; -unsigned int aint1 = 0; - -#endif unsigned char uchar0 = 0; unsigned char uchar1 = 0; unsigned char uchar2 = 0; diff --git a/test/val/rotate5.c b/test/val/rotate5.c index 501e2e567..9de897321 100644 --- a/test/val/rotate5.c +++ b/test/val/rotate5.c @@ -6,6 +6,9 @@ #include <stdio.h> #include <limits.h> +#include <stdint.h> + +/* #define SUPPORT_BIT_TYPES */ unsigned char success=0; unsigned char failures=0; @@ -14,22 +17,10 @@ unsigned char dummy=0; #ifdef SUPPORT_BIT_TYPES bit bit0 = 0; #endif -#ifdef SIZEOF_INT_16BIT -#if defined(__LINUX__) || defined(LINUX) -signed short aint0 = 0; -signed short aint1 = 0; -#else -signed int aint0 = 0; -signed int aint1 = 0; +int16_t aint0 = 0; +int16_t aint1 = 0; -#endif - -#else -signed int aint0 = 0; -signed int aint1 = 0; - -#endif signed char achar0 = 0; signed char achar1 = 0; signed char achar2 = 0; diff --git a/test/val/rotate6.c b/test/val/rotate6.c index 9109e124e..93a770d99 100644 --- a/test/val/rotate6.c +++ b/test/val/rotate6.c @@ -6,6 +6,9 @@ #include <stdio.h> #include <limits.h> +#include <stdint.h> + +/* #define SUPPORT_BIT_TYPES */ unsigned char success=0; unsigned char failures=0; @@ -14,22 +17,10 @@ unsigned char dummy=0; #ifdef SUPPORT_BIT_TYPES bit bit0 = 0; #endif -#ifdef SIZEOF_INT_16BIT -#if defined(__LINUX__) || defined(LINUX) -signed short aint0 = 0; -signed short aint1 = 0; -#else -signed int aint0 = 0; -signed int aint1 = 0; +int16_t aint0 = 0; +int16_t aint1 = 0; -#endif - -#else -signed int aint0 = 0; -signed int aint1 = 0; - -#endif signed char achar0 = 0; signed char achar1 = 0; signed char achar2 = 0; diff --git a/test/val/rotate7.c b/test/val/rotate7.c index 2b30b86dd..4a044c16a 100644 --- a/test/val/rotate7.c +++ b/test/val/rotate7.c @@ -6,27 +6,14 @@ #include <stdio.h> #include <limits.h> +#include <stdint.h> unsigned char success=0; unsigned char failures=0; unsigned char dummy=0; -#ifdef SIZEOF_INT_16BIT -#if defined(__LINUX__) || defined(LINUX) -signed short aint0 = 0; -signed short aint1 = 0; - -#else -signed int aint0 = 0; -signed int aint1 = 0; - -#endif - -#else -signed int aint0 = 0; -signed int aint1 = 0; - -#endif +int16_t aint0 = 0; +int16_t aint1 = 0; /* signed char achar0 = 0; diff --git a/testcode/lib/shift-test.c b/test/val/shift-test.c similarity index 95% rename from testcode/lib/shift-test.c rename to test/val/shift-test.c index 5712f4534..27c7d88a7 100644 --- a/testcode/lib/shift-test.c +++ b/test/val/shift-test.c @@ -58,7 +58,7 @@ static void TestUnsignedLeftShift (void) fprintf (stderr, "Failed: %u << %u != %u (%u)\n", L, R, V, L << R); - exit (1); + exit (EXIT_FAILURE); } V = UnsignedShiftLeft1 (V); } @@ -85,7 +85,7 @@ static void TestUnsignedRightShift (void) fprintf (stderr, "Failed: %u >> %u != %u (%u)\n", L, R, V, L >> R); - exit (1); + exit (EXIT_FAILURE); } V = UnsignedShiftRight1 (V); } @@ -112,7 +112,7 @@ static void TestSignedRightShift (void) fprintf (stderr, "Failed: %d >> %d != %d (%d)\n", L, R, V, L >> R); - exit (1); + exit (EXIT_FAILURE); } V = SignedShiftRight1 (V); } diff --git a/testcode/lib/signal-test.c b/test/val/signal-test.c similarity index 64% rename from testcode/lib/signal-test.c rename to test/val/signal-test.c index 4e34a281d..31dd8ed5c 100644 --- a/testcode/lib/signal-test.c +++ b/test/val/signal-test.c @@ -1,12 +1,16 @@ #include <stdio.h> +#include <stdlib.h> #include <string.h> #include <errno.h> #include <signal.h> +int signalcounter = 0; + void __fastcall__ sighandler (int sig) { printf ("Got signal #%d\n", sig); + signalcounter++; } @@ -15,15 +19,18 @@ int main (void) { if (signal (SIGSEGV, sighandler) == SIG_ERR) { printf ("signal failure %d: %s\n", errno, strerror (errno)); - return 1; + return EXIT_FAILURE; } printf ("About to raise SIGSEGV...\n"); raise (SIGSEGV); printf ("Back from signal handler\n"); printf ("About to raise SIGILL...\n"); raise (SIGILL); - printf ("Back from signal handler\n"); - return 0; + printf ("Back from signal handler, signalcounter = %d\n", signalcounter); + if (signalcounter != 1) { + return EXIT_FAILURE; + } + return EXIT_SUCCESS; } diff --git a/testcode/lib/snprintf-test.c b/test/val/snprintf-test.c similarity index 97% rename from testcode/lib/snprintf-test.c rename to test/val/snprintf-test.c index d3af47d78..e3a60d99b 100644 --- a/testcode/lib/snprintf-test.c +++ b/test/val/snprintf-test.c @@ -137,8 +137,9 @@ unsigned char main(void) } else { printf("There were no"); } - printf(" failures.\nTap a key. "); + printf(" failures.\nTap a key.\n"); +#if defined(__CC65__) && !defined(__SIM6502__) && !defined(__SIM65C02__) cgetc(); - +#endif return failures; } diff --git a/test/val/static-1.c b/test/val/static-1.c index ae2ba6289..6918e0033 100644 --- a/test/val/static-1.c +++ b/test/val/static-1.c @@ -13,6 +13,7 @@ static int n = 0; extern int n; /* should not give an error */ +static int n; /* should not give an error */ int main(void) { diff --git a/test/val/static-fwd-decl.c b/test/val/static-fwd-decl.c new file mode 100644 index 000000000..a133e930f --- /dev/null +++ b/test/val/static-fwd-decl.c @@ -0,0 +1,35 @@ +/* + !!DESCRIPTION!! static forward declarations + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Bob Andrews +*/ + +/* + see: https://github.com/cc65/cc65/issues/204 +*/ + +#pragma warn(error, on) + +typedef struct _DIRMENU +{ + const char *name; + struct _DIRMENU *dest; +} DIRMENU; + +static DIRMENU rmenu; + +static DIRMENU lmenu = { + "left", + &rmenu +}; + +static DIRMENU rmenu = { + "right", + &lmenu +}; + +int main(void) +{ + return lmenu.dest == &rmenu && rmenu.dest == &lmenu ? 0 : 1; +} diff --git a/test/val/staticassert.c b/test/val/staticassert.c new file mode 100644 index 000000000..e43eeec8d --- /dev/null +++ b/test/val/staticassert.c @@ -0,0 +1,72 @@ +/* + Copyright 2020 The cc65 Authors + + This software is provided 'as-is', without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications, and to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* +** Tests of passing _Static_asserts. +**/ + + + +#include <assert.h> + +_Static_assert (1, "1 should be true."); +_Static_assert (1); /* Support C2x syntax with no message. */ +_Static_assert (!0, "!0 should be true."); +_Static_assert (1 == 1, "1 == 1 should be true."); +_Static_assert (1 == 1L, "1 == 1L should be true."); +_Static_assert (1 != 0, "1 != 0 should be true."); +_Static_assert (sizeof (char) == 1, "sizeof (char) should be 1."); +_Static_assert (sizeof (int) == 2, "sizeof (int) should be 2."); + +/* Make sure we can also do structs. */ +struct sc { char a; }; +_Static_assert (sizeof (struct sc) == 1, "sizeof (struct sc) should be 1."); +struct si { int a; }; +_Static_assert (sizeof (struct si) == 2, "sizeof (struct si) should be 2."); + +/* Try enums. */ +enum { k = 1 }; +_Static_assert (k == 1, "k should be 1."); + +/* Just test the macro version once. */ +static_assert (1, "1 should be true."); +static_assert (1); + +/* _Static_assert can appear anywhere a declaration can. */ +void f (void) +{ + _Static_assert (1, "1 should still be true."); + if (1) { + _Static_assert (1, "1 should still be true."); + } +} + +/* _Static_assert can also appear in structs. */ +struct S { + int a; + _Static_assert (1, "1 should still be true."); + int b; +}; + + +int main (void) +{ + return 0; +} diff --git a/testcode/lib/strncmp-test.c b/test/val/strncmp-test.c similarity index 59% rename from testcode/lib/strncmp-test.c rename to test/val/strncmp-test.c index b15565036..7dbbb4b8c 100644 --- a/testcode/lib/strncmp-test.c +++ b/test/val/strncmp-test.c @@ -10,15 +10,19 @@ static const char S2[] = { 'h', 'e', 'l', 'l', 'o', ' ', 'w', 'o', 'r', 'l', 'd', '\0', 'B' }; - - +int fails = 0; int main (void) { char I; + int ret; for (I = 0; I < 20; ++I) { - printf ("%02d: %d\n", I, strncmp (S1, S2, I)); + ret = strncmp (S1, S2, I); + printf ("%02d: %d\n", I, ret); + if ((ret != 0) && (I < 7)) { + fails++; + } } - return 0; + printf("fails: %d\n", fails); + return fails; } - diff --git a/testcode/lib/strnicmp-test.c b/test/val/strnicmp-test.c similarity index 56% rename from testcode/lib/strnicmp-test.c rename to test/val/strnicmp-test.c index b2d942a97..e6e5a3b04 100644 --- a/testcode/lib/strnicmp-test.c +++ b/test/val/strnicmp-test.c @@ -3,70 +3,79 @@ #include <string.h> #include <conio.h> +int fails = 0; + static int do_test(const char *s1, const char *s2, size_t n) { printf("strnicmp(\"%s\", \"%s\", %d): ", s1, s2, (int)n); return strncasecmp(s1, s2, n); } +static void printresult(int ret) +{ + if (ret) { + printf("fail (%d)\n", ret); + fails++; + } else { + printf("OK (%d)\n", ret); + } +} + +static void printresultgt(int ret) +{ + if (ret >= 0) { + printf("fail (%d)\n", ret); + fails++; + } else { + printf("OK (%d)\n", ret); + } +} + +static void printresultlt(int ret) +{ + if (ret <= 0) { + printf("fail (%d)\n", ret); + fails++; + } else { + printf("OK (%d)\n", ret); + } +} + int main(void) { int ret; ret = do_test("Wurzl", "wURZL", 5); - if (ret) - printf("fail (%d)\n", ret); - else - printf("OK (%d)\n", ret); + printresult(ret); ret = do_test("Wurzl", "wURZL", 6); - if (ret) - printf("fail (%d)\n", ret); - else - printf("OK (%d)\n", ret); + printresult(ret); ret = do_test("Wurzl", "wURZL", 10); - if (ret) - printf("fail (%d)\n", ret); - else - printf("OK (%d)\n", ret); + printresult(ret); ret = do_test("Wurzla", "wURZLB", 10); - if (ret >= 0) - printf("fail (%d)\n", ret); - else - printf("OK (%d)\n", ret); + printresultgt(ret); ret = do_test("Wurzla", "wURZLb", 5); - if (ret) - printf("fail (%d)\n", ret); - else - printf("OK (%d)\n", ret); + printresult(ret); ret = do_test("BLI", "bla", 5); - if (ret <= 0) - printf("fail (%d)\n", ret); - else - printf("OK (%d)\n", ret); + printresultlt(ret); ret = do_test("", "bla", 5); - if (ret >= 0) - printf("fail (%d)\n", ret); - else - printf("OK (%d)\n", ret); + printresultgt(ret); ret = do_test("BLI", "", 5); - if (ret <= 0) - printf("fail (%d)\n", ret); - else - printf("OK (%d)\n", ret); + printresultlt(ret); ret = do_test("", "", 5); - if (ret) - printf("fail (%d)\n", ret); - else - printf("OK (%d)\n", ret); + printresult(ret); + printf("fails: %d\n", fails); + +#if defined(__CC65__) && !defined(__SIM6502__) && !defined(__SIM65C02__) cgetc(); - return 0; +#endif + return fails; } diff --git a/test/val/strpbrk-test.c b/test/val/strpbrk-test.c new file mode 100644 index 000000000..6a688732d --- /dev/null +++ b/test/val/strpbrk-test.c @@ -0,0 +1,34 @@ +#include <stdio.h> +#include <string.h> + +static const char fox[] = "The quick brown fox jumped over the lazy dogs."; + +int fails = 0; + +int main (void) +{ + printf ("Testing strpbrk():\n"); + if (strpbrk (fox, "qwerty") != &fox[2]) { + printf ("\nThe first 'e' wasn't found.\n"); + fails++; + } + if (strpbrk (fox, "QWERTY") != &fox[0]) { + printf ("The 'T' wasn't found.\n"); + fails++; + } + if (strpbrk (fox, "asdfg") != &fox[16]) { + printf ("The 'f' wasn't found.\n"); + fails++; + } + if (strpbrk (fox, "nxv,zmb") != &fox[10]) { + printf ("The 'b' wasn't found.\n"); + fails++; + } + if (strpbrk (fox, "!@#$%^&*()-+=[];:',/?<>.") != &fox[45]) { + printf ("The '.' wasn't found.\n"); + fails++; + } + + printf ("\nFinished. fails = %d\n", fails); + return fails; +} diff --git a/test/val/strtol-test.c b/test/val/strtol-test.c index 76daef791..86c56d4db 100644 --- a/test/val/strtol-test.c +++ b/test/val/strtol-test.c @@ -1,25 +1,29 @@ -/* - !!DESCRIPTION!! A small test for atoi/strtol. Assumes twos complement - !!ORIGIN!! - !!LICENCE!! - !!AUTHOR!! -*/ - +/* A small test for strtol. Assumes twos complement */ #include <stdio.h> #include <stdlib.h> #include <string.h> #include <limits.h> #include <errno.h> + + +#define outfile stderr + + + #define ERROR 0 #define OK 1 + + static unsigned int Failures = 0; + + static void IncStr (char* Buf) /* Increment a number represented as a string by one. The string MUST not - * start with a '9', we cannot handle overflow in this case. - */ +** start with a '9', we cannot handle overflow in this case. +*/ { int Len = strlen (Buf); @@ -36,33 +40,40 @@ static void IncStr (char* Buf) } } + + static void CheckStrToL (const char* Str, int Base, long Val, unsigned char Ok) { char* EndPtr; long Res = strtol (Str, &EndPtr, Base); if (Ok) { if (Res != Val) { - printf ("strtol error in \"%s\":\n" - " result = %ld, should be %ld, chars = %d\n", - Str, Res, Val, EndPtr - Str); + fprintf (outfile, + "strtol error in \"%s\":\n" + " result = %ld, should be %ld, chars = %d\n", + Str, Res, Val, EndPtr - Str); ++Failures; } } else { if (errno != ERANGE) { - printf ("strtol error in \"%s\":\n" - " should not convert, but errno = %d\n", - Str, errno); + fprintf (outfile, + "strtol error in \"%s\":\n" + " should not convert, but errno = %d\n", + Str, errno); ++Failures; } if (Res != Val) { - printf ("strtol error in \"%s\":\n" - " result = %ld, should be %ld, chars = %d\n", - Str, Res, Val, EndPtr - Str); + fprintf (outfile, + "strtol error in \"%s\":\n" + " result = %ld, should be %ld, chars = %d\n", + Str, Res, Val, EndPtr - Str); ++Failures; } } } + + int main (void) { char Buf[80]; @@ -129,7 +140,6 @@ int main (void) CheckStrToL ("zyaB", 35, 0L, ERROR); CheckStrToL ("zyaB", 36, 1677395L, ERROR); - printf ("Failures: %u\n", Failures); - - return Failures; + fprintf (outfile, "Failures: %u\n", Failures); + return (Failures != 0); } diff --git a/test/val/strtoul-test.c b/test/val/strtoul-test.c index 803fd452c..cc37d1dd4 100644 --- a/test/val/strtoul-test.c +++ b/test/val/strtoul-test.c @@ -1,25 +1,29 @@ -/* - !!DESCRIPTION!! A small test for strtuol. Assumes twos complement - !!ORIGIN!! - !!LICENCE!! - !!AUTHOR!! -*/ - +/* A small test for strtuol. Assumes twos complement */ #include <stdio.h> #include <stdlib.h> #include <string.h> #include <limits.h> #include <errno.h> + + +#define outfile stderr + + + #define ERROR 0 #define OK 1 + + static unsigned int Failures = 0; + + static void IncStr (char* Buf) /* Increment a number represented as a string by one. The string MUST not - * start with a '9', we cannot handle overflow in this case. - */ +** start with a '9', we cannot handle overflow in this case. +*/ { int Len = strlen (Buf); @@ -36,33 +40,40 @@ static void IncStr (char* Buf) } } + + static void CheckStrToUL (const char* Str, int Base, unsigned long Val, unsigned char Ok) { char* EndPtr; unsigned long Res = strtoul (Str, &EndPtr, Base); if (Ok) { if (Res != Val) { - printf ("strtol error in \"%s\":\n" - " result = %lu, should be %lu, chars = %d\n", - Str, Res, Val, EndPtr - Str); + fprintf (outfile, + "strtol error in \"%s\":\n" + " result = %lu, should be %lu, chars = %d\n", + Str, Res, Val, EndPtr - Str); ++Failures; } } else { if (errno != ERANGE) { - printf ("strtol error in \"%s\":\n" - " should not convert, but errno = %d\n", - Str, errno); + fprintf (outfile, + "strtol error in \"%s\":\n" + " should not convert, but errno = %d\n", + Str, errno); ++Failures; } if (Res != Val) { - printf ("strtol error in \"%s\":\n" - " result = %lu, should be %lu, chars = %d\n", - Str, Res, Val, EndPtr - Str); + fprintf (outfile, + "strtol error in \"%s\":\n" + " result = %lu, should be %lu, chars = %d\n", + Str, Res, Val, EndPtr - Str); ++Failures; } } } + + int main (void) { char Buf[80]; @@ -115,7 +126,7 @@ int main (void) CheckStrToUL ("zyaB", 35, 0UL, ERROR); CheckStrToUL ("zyaB", 36, 1677395UL, ERROR); - printf ("Failures: %u\n", Failures); - - return Failures; + fprintf (outfile, "Failures: %u\n", Failures); + return (Failures != 0); } + diff --git a/test/val/sub1.c b/test/val/sub1.c index f1ae9394f..06e5cf463 100644 --- a/test/val/sub1.c +++ b/test/val/sub1.c @@ -1,11 +1,15 @@ /* - !!DESCRIPTION!! Substraction Test + !!DESCRIPTION!! Subtraction Test !!ORIGIN!! SDCC regression tests !!LICENCE!! GPL, read COPYING.GPL */ #include <stdio.h> #include <limits.h> +#include <stdint.h> + +/* #define SUPPORT_BIT_TYPES */ +/* #define SUPPORT_BIT_ARITHMETIC */ unsigned char success=0; unsigned char failures=0; @@ -28,19 +32,9 @@ bit bit11 = 0; #endif -#ifdef SIZEOF_INT_16BIT -#if defined(__LINUX__) || defined(LINUX) -unsigned short aint0 = 0; -unsigned short aint1 = 0; -#else -unsigned int aint0 = 0; -unsigned int aint1 = 0; -#endif +uint16_t aint0 = 0; +uint16_t aint1 = 0; -#else -unsigned int aint0 = 0; -unsigned int aint1 = 0; -#endif unsigned char achar0 = 0; unsigned char achar1 = 0; unsigned char achar2 = 0; diff --git a/test/val/sub2.c b/test/val/sub2.c index 835e65733..d3ea2a05b 100644 --- a/test/val/sub2.c +++ b/test/val/sub2.c @@ -1,5 +1,5 @@ /* - !!DESCRIPTION!! Substraction Test + !!DESCRIPTION!! Subtraction Test !!ORIGIN!! SDCC regression tests !!LICENCE!! GPL, read COPYING.GPL */ diff --git a/test/val/switch2.c b/test/val/switch2.c new file mode 100644 index 000000000..eff06ce12 --- /dev/null +++ b/test/val/switch2.c @@ -0,0 +1,39 @@ +/* + !!DESCRIPTION!! Testing empty bodied switch statements. + !!ORIGIN!! + !!LICENCE!! GPL, read COPYING.GPL +*/ + +#include <stdio.h> + +unsigned char success=0; +unsigned char failures=0; +unsigned char dummy=0; + +void done() +{ + dummy++; +} + +void switch_no_body(void) +{ + switch(0); +} + +void switch_empty_body(void) +{ + switch(0) {} +} + +/* only worried about this file compiling successfully */ +int main(void) +{ + switch_no_body(); + switch_empty_body(); + + success=failures; + done(); + printf("failures: %d\n",failures); + + return failures; +} diff --git a/test/val/time-test.c b/test/val/time-test.c new file mode 100644 index 000000000..db086410d --- /dev/null +++ b/test/val/time-test.c @@ -0,0 +1,53 @@ +#include <stdio.h> +#include <string.h> +#include <time.h> + +#define EXPECTSTR "3DD173D1 - Tue Nov 12 21:34:09 2002\n" +char result[0x100]; + +int fails = 0; + +int main (void) +{ + struct tm tm; + time_t t; + char buf[64]; + + + tm.tm_sec = 9; + tm.tm_min = 34; + tm.tm_hour = 21; + tm.tm_mday = 12; + tm.tm_mon = 10; /* 0..11, so this is november */ + tm.tm_year = 102; /* year - 1900, so this is 2002 */ + tm.tm_wday = 2; /* Tuesday */ + tm.tm_isdst = 0; + + /* Convert this broken down time into a time_t and back */ + t = mktime (&tm); + printf ("Test passes if the following lines are\n" + "all identical:\n"); + printf (EXPECTSTR); + + sprintf (result, "%08lX - %s", t, asctime (&tm)); + printf (result); + if (strcmp(result, EXPECTSTR) != 0) { fails++; } + + sprintf (result, "%08lX - %s", t, asctime (gmtime (&t))); + printf (result); + if (strcmp(result, EXPECTSTR) != 0) { fails++; } + + strftime (buf, sizeof (buf), "%c", &tm); + sprintf (result, "%08lX - %s\n", t, buf); + printf (result); + if (strcmp(result, EXPECTSTR) != 0) { fails++; } + + strftime (buf, sizeof (buf), "%a %b %d %H:%M:%S %Y", &tm); + sprintf (result, "%08lX - %s\n", t, buf); + printf (result); + if (strcmp(result, EXPECTSTR) != 0) { fails++; } + + printf("fails: %d\n", fails); + + return fails; +} diff --git a/test/val/time.c b/test/val/time.c new file mode 100644 index 000000000..e1c33495a --- /dev/null +++ b/test/val/time.c @@ -0,0 +1,36 @@ +#include <time.h> +#include <stdio.h> + +int main(void) +{ + int failures = 0; + + struct tm timeinfo; + time_t rawtime; + struct tm *p_timeinfo; + + timeinfo.tm_year = 2020 - 1900; + timeinfo.tm_mon = 12 - 1; + timeinfo.tm_mday = 24; + timeinfo.tm_hour = 10; + timeinfo.tm_min = 30; + timeinfo.tm_sec = 50; + timeinfo.tm_isdst = 0; + + rawtime = mktime(&timeinfo); + + failures += !(rawtime == 1608805850); + + p_timeinfo = localtime(&rawtime); + + failures += !(p_timeinfo->tm_year == timeinfo.tm_year); + failures += !(p_timeinfo->tm_mon == timeinfo.tm_mon); + failures += !(p_timeinfo->tm_mday == timeinfo.tm_mday); + failures += !(p_timeinfo->tm_hour == timeinfo.tm_hour); + failures += !(p_timeinfo->tm_min == timeinfo.tm_min); + failures += !(p_timeinfo->tm_sec == timeinfo.tm_sec); + + printf("%lu\n%s%d\n", rawtime, asctime(p_timeinfo), failures); + + return failures; +} diff --git a/test/val/trampoline-params.c b/test/val/trampoline-params.c new file mode 100644 index 000000000..9dbbba077 --- /dev/null +++ b/test/val/trampoline-params.c @@ -0,0 +1,32 @@ +/* + !!DESCRIPTION!! wrapped-call pragma w/ many params + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Lauri Kasanen +*/ + +#include <stdarg.h> + +static unsigned char flag; + +static void trampoline_set(void) { + asm("ldy tmp4"); + asm("sty %v", flag); + asm("jsr callptr4"); +} + +#pragma wrapped-call(push, trampoline_set, 4) +long adder(long in); +#pragma wrapped-call(pop) + +long adder(long in) { + + return in + 7; +} + +int main() { + + flag = 0; + + return adder(70436) == 70436 + 7 && flag == 4 ? 0 : 1; +} diff --git a/test/val/trampoline-varargs.c b/test/val/trampoline-varargs.c new file mode 100644 index 000000000..0e6be49c3 --- /dev/null +++ b/test/val/trampoline-varargs.c @@ -0,0 +1,48 @@ +/* + !!DESCRIPTION!! wrapped-call pragma w/ variadic function + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Lauri Kasanen +*/ + +#include <stdarg.h> + +static unsigned char flag; + +static void trampoline_set(void) { + // The Y register is used for variadics - save and restore + asm("sty tmp3"); + + asm("ldy tmp4"); + asm("sty %v", flag); + + asm("ldy tmp3"); + asm("jsr callptr4"); +} + +#pragma wrapped-call(push, trampoline_set, 4) +unsigned adder(unsigned char num, ...); +#pragma wrapped-call(pop) + +unsigned adder(unsigned char num, ...) { + + unsigned char i; + unsigned sum = 0; + va_list ap; + va_start(ap, num); + + for (i = 0; i < num; i++) { + sum += va_arg(ap, unsigned); + } + + va_end(ap); + + return sum; +} + +int main() { + + flag = 0; + + return adder(3, 0, 5, 500) == 505 && flag == 4 ? 0 : 1; +} diff --git a/test/val/trampoline.c b/test/val/trampoline.c new file mode 100644 index 000000000..8f1e1547c --- /dev/null +++ b/test/val/trampoline.c @@ -0,0 +1,49 @@ +/* + !!DESCRIPTION!! wrapped-call pragma used for trampolines + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Lauri Kasanen +*/ + +static unsigned char flag; + +static void trampoline_set(void) { + asm("ldy tmp4"); + asm("sty %v", flag); + asm("jsr callptr4"); +} + +void trampoline_inc(void) { + asm("inc %v", flag); + asm("jsr callptr4"); +} + +void func3() { + +} + +#pragma wrapped-call(push, trampoline_inc, 0) + +void func2() { + func3(); +} + +#pragma wrapped-call(push, trampoline_set, 4) + +void func1(void); + +#pragma wrapped-call(pop) +#pragma wrapped-call(pop) + +void func1(void) { + func2(); +} + +int main(void) +{ + flag = 0; + + func1(); + + return flag == 5 ? 0 : 1; +} diff --git a/test/val/uneval.c b/test/val/uneval.c new file mode 100644 index 000000000..50e00973a --- /dev/null +++ b/test/val/uneval.c @@ -0,0 +1,46 @@ +/* + Copyright 2021, The cc65 Authors + + This software is provided "as-is", without any express or implied + warranty. In no event will the authors be held liable for any damages + arising from the use of this software. + + Permission is granted to anyone to use this software for any purpose, + including commercial applications; and, to alter it and redistribute it + freely, subject to the following restrictions: + + 1. The origin of this software must not be misrepresented; you must not + claim that you wrote the original software. If you use this software + in a product, an acknowledgment in the product documentation would be + appreciated, but is not required. + 2. Altered source versions must be plainly marked as such, and must not be + misrepresented as being the original software. + 3. This notice may not be removed or altered from any source distribution. +*/ + +/* + Test of deferred operations in unevaluated context resulted from 'sizeof' and + short-circuited code-paths in AND, OR and tenary operations. + + https://github.com/cc65/cc65/issues/1406 +*/ + +#include <stdio.h> + +int main(void) +{ + int i = 0; + int j = 0; + + sizeof(i++ | j--); + 0 && (i++ | j--); + 1 || (i++ | j--); + 0 ? i++ | j-- : 0; + 1 ? 0 : i++ | j--; + + if (i != 0 || j != 0) { + printf("i = %d, j = %d\n", i, j); + printf("Failures: %d\n", i - j); + } + return i - j; +} diff --git a/test/val/unittest.h b/test/val/unittest.h new file mode 100644 index 000000000..bd355bb0c --- /dev/null +++ b/test/val/unittest.h @@ -0,0 +1,89 @@ +/*****************************************************************************/ +/* */ +/* unittest.h */ +/* */ +/* Unit test helper macros */ +/* */ +/* */ +/* */ +/* (C) 2017 Christian Krueger */ +/* */ +/* This software is provided 'as-is', without any expressed or implied */ +/* warranty. In no event will the authors be held liable for any damages */ +/* arising from the use of this software. */ +/* */ +/* Permission is granted to anyone to use this software for any purpose, */ +/* including commercial applications, and to alter it and redistribute it */ +/* freely, subject to the following restrictions: */ +/* */ +/* 1. The origin of this software must not be misrepresented; you must not */ +/* claim that you wrote the original software. If you use this software */ +/* in a product, an acknowledgment in the product documentation would be */ +/* appreciated but is not required. */ +/* 2. Altered source versions must be plainly marked as such, and must not */ +/* be misrepresented as being the original software. */ +/* 3. This notice may not be removed or altered from any source */ +/* distribution. */ +/* */ +/*****************************************************************************/ + +#ifndef _UNITTEST_H +#define _UNITTEST_H + +#include <stdio.h> +#include <stdlib.h> + +#ifndef COMMA +#define COMMA , +#endif + +#define TEST int main(void) \ + {\ + printf("%s: ",__FILE__); + +#define ENDTEST printf("Passed\n"); \ + return EXIT_SUCCESS; \ + } + +#define ASSERT_IsTrue(a,b) if (!(a)) \ + {\ + printf("Fail at line %d:\n",__LINE__);\ + printf(b);\ + printf("\n");\ + printf("Expected status should be true but wasn't!\n");\ + exit(EXIT_FAILURE);\ + } + +#define ASSERT_IsFalse(a,b) if ((a)) \ + {\ + printf("Fail at line %d:\n",__LINE__);\ + printf(b);\ + printf("\n");\ + printf("Expected status should be false but wasn't!\n");\ + exit(EXIT_FAILURE);\ + } + +#define ASSERT_AreEqual(a,b,c,d) if ((a) != (b)) \ + {\ + printf("Fail at line %d:\n",__LINE__);\ + printf(d);\ + printf("\n");\ + printf("Expected value: "c", but is "c"!\n", (a), (b));\ + exit(EXIT_FAILURE);\ + } + +#define ASSERT_AreNotEqual(a,b,c,d) if ((a) == (b)) \ + {\ + printf("Fail at line %d:\n",__LINE__);\ + printf(d);\ + printf("\n");\ + printf("Expected value not: "c", but is "c"!\n", (a), (b));\ + exit(EXIT_FAILURE);\ + } + +/* End of unittest.h */ +#endif + + + + diff --git a/test/val/void-size1.c b/test/val/void-size1.c new file mode 100644 index 000000000..0c2dccaa7 --- /dev/null +++ b/test/val/void-size1.c @@ -0,0 +1,56 @@ +/* + !!DESCRIPTION!! Getting the size of a void-type variable (cc65 extension) + !!ORIGIN!! cc65 regression tests + !!LICENCE!! Public Domain + !!AUTHOR!! Greg King +*/ + +static const void list1 = { + (char)1, + (char)2, + (char)3, + (char)4, + (char)5, + (char)6, + (char)7, + (char)8, + (char)9, + (char)0 +}; + +static void list2 = { + 1, + 2, + 3, + 4, + 5, + 6, + 7, + 8, + 9, + 0 +}; + +void list3 = { + (char)1, + (char)2, + (char)3, + (char)4, + &list1, + (char)6, + (char)7, + (char)8, + (char)9, + &list2 +}; + +/* We know that the expression is constant; don't tell us. */ + +#pragma warn (const-comparison, off) + +int main (void) +{ + return sizeof list1 != 10 + || sizeof list2 != 20 + || sizeof list3 != 12; +} diff --git a/test/val/while.c b/test/val/while.c index cf2147052..b86b1fba5 100644 --- a/test/val/while.c +++ b/test/val/while.c @@ -1,53 +1,107 @@ /* - !!DESCRIPTION!! + !!DESCRIPTION!! while-condition tests !!ORIGIN!! SDCC regression tests !!LICENCE!! GPL, read COPYING.GPL */ #include <stdio.h> -#include <limits.h> -unsigned char success = 0; -unsigned char failures = 0; -unsigned char dummy = 0; +static unsigned char failures = 0x00; +static unsigned char achar0 = 0; -#ifdef SUPPORT_BIT_TYPES -bit bit0 = 0; -#endif -unsigned int aint0 = 0; -unsigned int aint1 = 0; -unsigned char achar0 = 0; -unsigned char achar1 = 0; - -void -done () -{ - dummy++; -} - -void +static void while1 (void) { unsigned char i = 10; - do - { - achar0++; - } - while (--i); + do { + ++achar0; + } while (--i); - if (achar0 != 10) - failures++; + if (achar0 != 10) { + failures |= 0x01; + } +} + +static void +while2 (void) +{ + unsigned char i = 10; + + achar0 = 0; + while (--i) { + ++achar0; + } + + if (achar0 != 10 - 1) { + failures |= 0x02; + } +} + +static void +while3 (void) +{ + achar0 = 0; + do { + if (++achar0 == (unsigned char)0) { + return; + } + } while (1); + + failures |= 0x04; +} + +static void +while4 (void) +{ + achar0 = 0; + while (1) { + if (++achar0 == (unsigned char)0) { + return; + } + } + + failures |= 0x08; +} + +static void +while5 (void) +{ + achar0 = 0; + do { + ++achar0; + } while (0); + + if (achar0 != 1) { + failures |= 0x10; + } +} + +static void +while6 (void) +{ + achar0 = 0; + while (0) { + ++achar0; + } + + if (achar0 != 1 - 1) { + failures |= 0x20; + } } int main (void) { while1 (); + while2 (); + while3 (); + while4 (); + while5 (); + while6 (); - success = failures; - done (); - printf("failures: %d\n",failures); - + if (failures) { + printf("failures: 0x%02X\n", failures); + } return failures; } diff --git a/test/val/xor.c b/test/val/xor.c index 2a346023e..98bd5faf1 100644 --- a/test/val/xor.c +++ b/test/val/xor.c @@ -31,12 +31,12 @@ void xor_chars_0_1(void) void xor_if(void) { - if(achar0 ^ achar1) + if(achar0 ^ achar1) failures++; achar0 ^= 0xff; - if( !(achar0 ^ achar1) ) + if( !(achar0 ^ achar1) ) failures++; } diff --git a/testcode/assembler/.gitignore b/testcode/assembler/.gitignore deleted file mode 100644 index de179f4f3..000000000 --- a/testcode/assembler/.gitignore +++ /dev/null @@ -1,6 +0,0 @@ -chkillegal.bin -chklegal.bin -chkall.bin -legal.o -illegal.o -all.o diff --git a/testcode/assembler/Makefile b/testcode/assembler/Makefile deleted file mode 100644 index a9257ce75..000000000 --- a/testcode/assembler/Makefile +++ /dev/null @@ -1,25 +0,0 @@ - -all: chklegal.bin chkillegal.bin chkall.bin - @# - -.PHONY: chklegal.bin chkillegal.bin chkall.bin - -chklegal.bin: legal.s - ../../bin/cl65 --target none --cpu 6502X -o chklegal.bin legal.s - diff -q legal.ref chklegal.bin || hex chklegal.bin - -chkillegal.bin: illegal.s - ../../bin/cl65 --target none --cpu 6502X -o chkillegal.bin illegal.s - diff -q illegal.ref chkillegal.bin || hex chkillegal.bin - -chkall.bin: all.s - ../../bin/cl65 --target none --cpu 6502X -o chkall.bin all.s - -ref: legal.s illegal.s - ../../bin/cl65 --target none --cpu 6502X -o legal.ref legal.s - ../../bin/cl65 --target none --cpu 6502X -o illegal.ref illegal.s - -clean: - rm -f legal.o chklegal.bin - rm -f illegal.o chkillegal.bin - rm -f all.o chkall.bin diff --git a/testcode/assembler/all.s b/testcode/assembler/all.s deleted file mode 100644 index 2e8f55ec7..000000000 --- a/testcode/assembler/all.s +++ /dev/null @@ -1,260 +0,0 @@ - .setcpu "6502X" - -; all legal and illegal opcodes as they would be disassembled by da65 -; note that this would not assemble into the exact same binary - - brk ; 00 - ora ($12,x) ; 01 12 - jam ; 02 - slo ($12,x) ; 03 12 - nop $12 ; 04 12 - ora $12 ; 05 12 - asl $12 ; 06 12 - slo $12 ; 07 12 - php ; 08 - ora #$12 ; 09 12 - asl a ; 0a - anc #$12 ; 0b 12 - nop $1234 ; 0c 34 12 - ora $1234 ; 0d 34 12 - asl $1234 ; 0e 34 12 - slo $1234 ; 0f 34 12 - bpl *+$14 ; 10 12 - ora ($12),y ; 11 12 - jam ; 12 - slo ($12),y ; 13 12 - nop $12,x ; 14 12 - ora $12,x ; 15 12 - asl $12,x ; 16 12 - slo $12,x ; 17 12 - clc ; 18 - ora $1234,y ; 19 34 12 - nop ; 1a - slo $1234,y ; 1b 34 12 - nop $1234,x ; 1c 34 12 - ora $1234,x ; 1d 34 12 - asl $1234,x ; 1e 34 12 - slo $1234,x ; 1f 34 12 - jsr $1234 ; 20 34 12 - and ($12,x) ; 21 12 - jam ; 22 - rla ($12,x) ; 23 12 - bit $12 ; 24 12 - and $12 ; 25 12 - rol $12 ; 26 12 - rla $12 ; 27 12 - plp ; 28 - and #$12 ; 29 12 - rol a ; 2a - anc #$12 ; 2b 12 - bit $1234 ; 2c 34 12 - and $1234 ; 2d 34 12 - rol $1234 ; 2e 34 12 - rla $1234 ; 2f 34 12 - bmi *+$14 ; 30 12 - and ($12),y ; 31 12 - jam ; 32 - rla ($12),y ; 33 12 - nop $12,x ; 34 12 - and $12,x ; 35 12 - rol $12,x ; 36 12 - rla $12,x ; 37 12 - sec ; 38 - and $1234,y ; 39 34 12 - nop ; 3a - rla $1234,y ; 3b 34 12 - nop $1234,x ; 3c 34 12 - and $1234,x ; 3d 34 12 - rol $1234,x ; 3e 34 12 - rla $1234,x ; 3f 34 12 - rti ; 40 - eor ($12,x) ; 41 12 - jam ; 42 - sre ($12,x) ; 43 12 - nop $12 ; 44 12 - eor $12 ; 45 12 - lsr $12 ; 46 12 - sre $12 ; 47 12 - pha ; 48 - eor #$12 ; 49 12 - lsr a ; 4a - alr #$12 ; 4b 12 - jmp $1234 ; 4c 34 12 - eor $1234 ; 4d 34 12 - lsr $1234 ; 4e 34 12 - sre $1234 ; 4f 34 12 - bvc *+$14 ; 50 12 - eor ($12),y ; 51 12 - jam ; 52 - sre ($12),y ; 53 12 - nop $12,x ; 54 12 - eor $12,x ; 55 12 - lsr $12,x ; 56 12 - sre $12,x ; 57 12 - cli ; 58 - eor $1234,y ; 59 34 12 - nop ; 5a - sre $1234,y ; 5b 34 12 - nop $1234,x ; 5c 34 12 - eor $1234,x ; 5d 34 12 - lsr $1234,x ; 5e 34 12 - sre $1234,x ; 5f 34 12 - rts ; 60 - adc ($12,x) ; 61 12 - jam ; 62 - rra ($12,x) ; 63 12 - nop $12 ; 64 12 - adc $12 ; 65 12 - ror $12 ; 66 12 - rra $12 ; 67 12 - pla ; 68 - adc #$12 ; 69 12 - ror a ; 6a - arr #$12 ; 6b 12 - jmp ($1234) ; 6c 34 12 - adc $1234 ; 6d 34 12 - ror $1234 ; 6e 34 12 - rra $1234 ; 6f 34 12 - bvs *+$14 ; 70 12 - adc ($12),y ; 71 12 - jam ; 72 - rra ($12),y ; 73 12 - nop $12,x ; 74 12 - adc $12,x ; 75 12 - ror $12,x ; 76 12 - rra $12,x ; 77 12 - sei ; 78 - adc $1234,y ; 79 34 12 - nop ; 7a - rra $1234,y ; 7b 34 12 - nop $1234,x ; 7c 34 12 - adc $1234,x ; 7d 34 12 - ror $1234,x ; 7e 34 12 - rra $1234,x ; 7f 34 12 - nop #$12 ; 80 12 - sta ($12,x) ; 81 12 - nop #$12 ; 82 12 - sax ($12,x) ; 83 12 - sty $12 ; 84 12 - sta $12 ; 85 12 - stx $12 ; 86 12 - sax $12 ; 87 12 - dey ; 88 - nop #$12 ; 89 12 - txa ; 8a - ane #$12 ; 8b 12 - sty $1234 ; 8c 34 12 - sta $1234 ; 8d 34 12 - stx $1234 ; 8e 34 12 - sax $1234 ; 8f 34 12 - bcc *+$14 ; 90 12 - sta ($12),y ; 91 12 - jam ; 92 - sha ($12),y ; 93 12 - sty $12,x ; 94 12 - sta $12,x ; 95 12 - stx $12,y ; 96 12 - sax $12,y ; 97 12 - tya ; 98 - sta $1234,y ; 99 34 12 - txs ; 9a - tas $1234,y ; 9b 34 12 - shy $1234,x ; 9c 34 12 - sta $1234,x ; 9d 34 12 - shx $1234,y ; 9e 34 12 - sha $1234,y ; 9f 34 12 - ldy #$12 ; a0 12 - lda ($12,x) ; a1 12 - ldx #$12 ; a2 12 - lax ($12,x) ; a3 12 - ldy $12 ; a4 12 - lda $12 ; a5 12 - ldx $12 ; a6 12 - lax $12 ; a7 12 - tay ; a8 - lda #$12 ; a9 12 - tax ; aa - lax #$12 ; ab 12 - ldy $1234 ; ac 34 12 - lda $1234 ; ad 34 12 - ldx $1234 ; ae 34 12 - lax $1234 ; af 34 12 - bcs *+$14 ; b0 12 - lda ($12),y ; b1 12 - jam ; b2 - lax ($12),y ; b3 12 - ldy $12,x ; b4 12 - lda $12,x ; b5 12 - ldx $12,y ; b6 12 - lax $12,y ; b7 12 - clv ; b8 - lda $1234,y ; b9 34 12 - tsx ; ba - las $1234,y ; bb 34 12 - ldy $1234,x ; bc 34 12 - lda $1234,x ; bd 34 12 - ldx $1234,y ; be 34 12 - lax $1234,y ; bf 34 12 - cpy #$12 ; c0 12 - cmp ($12,x) ; c1 12 - nop #$12 ; c2 12 - dcp ($12,x) ; c3 12 - cpy $12 ; c4 12 - cmp $12 ; c5 12 - dec $12 ; c6 12 - dcp $12 ; c7 12 - iny ; c8 - cmp #$12 ; c9 12 - dex ; ca - axs #$12 ; cb 12 - cpy $1234 ; cc 34 12 - cmp $1234 ; cd 34 12 - dec $1234 ; ce 34 12 - dcp $1234 ; cf 34 12 - bne *+$14 ; d0 12 - cmp ($12),y ; d1 12 - jam ; d2 - dcp ($12),y ; d3 12 - nop $12,x ; d4 12 - cmp $12,x ; d5 12 - dec $12,x ; d6 12 - dcp $12,x ; d7 12 - cld ; d8 - cmp $1234,y ; d9 34 12 - nop ; da - dcp $1234,y ; db 34 12 - nop $1234,x ; dc 34 12 - cmp $1234,x ; dd 34 12 - dec $1234,x ; de 34 12 - dcp $1234,x ; df 34 12 - cpx #$12 ; e0 12 - sbc ($12,x) ; e1 12 - nop #$12 ; e2 12 - isc ($12,x) ; e3 12 - cpx $12 ; e4 12 - sbc $12 ; e5 12 - inc $12 ; e6 12 - isc $12 ; e7 12 - inx ; e8 - sbc #$12 ; e9 12 - nop ; ea - sbc #$12 ; eb 12 - cpx $1234 ; ec 34 12 - sbc $1234 ; ed 34 12 - inc $1234 ; ee 34 12 - isc $1234 ; ef 34 12 - beq *+$14 ; f0 12 - sbc ($12),y ; f1 12 - jam ; f2 - isc ($12),y ; f3 12 - nop $12,x ; f4 12 - sbc $12,x ; f5 12 - inc $12,x ; f6 12 - isc $12,x ; f7 12 - sed ; f8 - sbc $1234,y ; f9 34 12 - isc $1234,y ; fb 34 12 - nop $1234,x ; fc 34 12 - sbc $1234,x ; fd 34 12 - inc $1234,x ; fe 34 12 - isc $1234,x ; ff 34 12 diff --git a/testcode/assembler/illegal.ref b/testcode/assembler/illegal.ref deleted file mode 100644 index c8dc208b4..000000000 --- a/testcode/assembler/illegal.ref +++ /dev/null @@ -1 +0,0 @@ -444'/4?4;4#73O4_4[4GCWSo44{4gcws444444444 kK 4444444 \ No newline at end of file diff --git a/testcode/assembler/illegal.s b/testcode/assembler/illegal.s deleted file mode 100644 index b49b88761..000000000 --- a/testcode/assembler/illegal.s +++ /dev/null @@ -1,135 +0,0 @@ - - .setcpu "6502X" - -; all so called "illegal" opcodes. duplicated (functionally identical) ones -; are commented out - -; first all totally stable undocs: - - slo $12 ; 07 12 - slo $1234 ; 0f 34 12 - slo $1234,x ; 1f 34 12 - slo $1234,y ; 1b 34 12 - slo ($12,x) ; 03 12 - slo $12,x ; 17 12 - slo ($12),y ; 13 12 - - rla $12 ; 27 12 - rla $1234 ; 2f 34 12 - rla $1234,x ; 3f 34 12 - rla $1234,y ; 3b 34 12 - rla ($12,x) ; 23 12 - rla $12,x ; 37 12 - rla ($12),y ; 33 12 - - sre $1234 ; 4f 34 12 - sre $1234,x ; 5f 34 12 - sre $1234,y ; 5b 34 12 - sre $12 ; 47 12 - sre ($12,x) ; 43 12 - sre $12,x ; 57 12 - sre ($12),y ; 53 12 - - rra $1234 ; 6f 34 12 - rra $1234,x ; 7f 34 12 - rra $1234,y ; 7b 34 12 - rra $12 ; 67 12 - rra ($12,x) ; 63 12 - rra $12,x ; 77 12 - rra ($12),y ; 73 12 - - dcp $1234 ; cf 34 12 - dcp $1234,x ; df 34 12 - dcp $1234,y ; db 34 12 - dcp $12 ; c7 12 - dcp ($12,x) ; c3 12 - dcp $12,x ; d7 12 - dcp ($12),y ; d3 12 - - isc $1234 ; ef 34 12 - isc $1234,x ; ff 34 12 - isc $1234,y ; fb 34 12 - isc $12 ; e7 12 - isc ($12,x) ; e3 12 - isc $12,x ; f7 12 - isc ($12),y ; f3 12 - - sax $1234 ; 8f 34 12 - sax $12 ; 87 12 - sax ($12,x) ; 83 12 - sax $12,y ; 97 12 - - lax $1234 ; af 34 12 - lax $1234,y ; bf 34 12 - lax $12 ; a7 12 - lax ($12,x) ; a3 12 - lax ($12),y ; b3 12 - lax $12,y ; b7 12 - - anc #$12 ; 0b 12 - ;anc #$12 ; 2b 12 - - arr #$12 ; 6b 12 - - alr #$12 ; 4b 12 - - axs #$12 ; cb 12 - - nop $1234 ; 0c 34 12 - nop $1234,x ; 1c 34 12 - nop $12 ; 04 12 - nop $12,x ; 14 12 - nop #$12 ; 80 12 - ;nop $1234,x ; 3c 34 12 - ;nop $1234,x ; 5c 34 12 - ;nop $1234,x ; 7c 34 12 - ;nop $1234,x ; dc 34 12 - ;nop $1234,x ; fc 34 12 - ;nop $12 ; 44 12 - ;nop $12 ; 64 12 - ;nop #$12 ; 82 12 - ;nop #$12 ; 89 12 - ;nop #$12 ; c2 12 - ;nop #$12 ; e2 12 - ;nop $12,x ; 34 12 - ;nop $12,x ; 54 12 - ;nop $12,x ; 74 12 - ;nop $12,x ; d4 12 - ;nop $12,x ; f4 12 - ;nop ; 1a - ;nop ; 3a - ;nop ; 5a - ;nop ; 7a - ;nop ; da - - jam ; 02 - ;jam ; 12 - ;jam ; 22 - ;jam ; 32 - ;jam ; 42 - ;jam ; 52 - ;jam ; 62 - ;jam ; 72 - ;jam ; 92 - ;jam ; b2 - ;jam ; d2 - ;jam ; f2 - - ;sbc #$12 ; eb 12 - -; the so-called "unstable" ones: - - sha ($12),y ; 93 12 - sha $1234,y ; 9f 34 12 - - shx $1234,y ; 9e 34 12 - shy $1234,x ; 9c 34 12 - - tas $1234,y ; 9b 34 12 - las $1234,y ; bb 34 12 - -; the two so-called "highly unstable" ones: - - lax #$12 ; ab 12 - - ane #$12 ; 8b 12 diff --git a/testcode/assembler/legal.ref b/testcode/assembler/legal.ref deleted file mode 100644 index c38f29014..000000000 Binary files a/testcode/assembler/legal.ref and /dev/null differ diff --git a/testcode/assembler/legal.s b/testcode/assembler/legal.s deleted file mode 100644 index 1de43b98b..000000000 --- a/testcode/assembler/legal.s +++ /dev/null @@ -1,185 +0,0 @@ - - .setcpu "6502" - - adc $1234 ; 6d 34 12 - adc $1234,x ; 7d 34 12 - adc $1234,y ; 79 34 12 - adc $12 ; 65 12 - adc #$12 ; 69 12 - adc ($12,x) ; 61 12 - adc $12,x ; 75 12 - adc ($12),y ; 71 12 - - and $12 ; 25 12 - and #$12 ; 29 12 - and $1234 ; 2d 34 12 - and $1234,x ; 3d 34 12 - and $1234,y ; 39 34 12 - and ($12,x) ; 21 12 - and $12,x ; 35 12 - and ($12),y ; 31 12 - - asl $12 ; 06 12 - asl $1234 ; 0e 34 12 - asl $1234,x ; 1e 34 12 - asl $12,x ; 16 12 - asl a ; 0a - - bcc *+$14 ; 90 12 - bcs *+$14 ; b0 12 - beq *+$14 ; f0 12 - bmi *+$14 ; 30 12 - bne *+$14 ; d0 12 - bpl *+$14 ; 10 12 - bvc *+$14 ; 50 12 - bvs *+$14 ; 70 12 - - bit $12 ; 24 12 - bit $1234 ; 2c 34 12 - - brk ; 00 - - clc ; 18 - cld ; d8 - cli ; 58 - clv ; b8 - - cmp $1234 ; cd 34 12 - cmp $1234,x ; dd 34 12 - cmp $1234,y ; d9 34 12 - cmp $12 ; c5 12 - cmp #$12 ; c9 12 - cmp ($12,x) ; c1 12 - cmp $12,x ; d5 12 - cmp ($12),y ; d1 12 - - cpx $1234 ; ec 34 12 - cpx #$12 ; e0 12 - cpx $12 ; e4 12 - - cpy $1234 ; cc 34 12 - cpy #$12 ; c0 12 - cpy $12 ; c4 12 - - dec $1234 ; ce 34 12 - dec $1234,x ; de 34 12 - dec $12 ; c6 12 - dec $12,x ; d6 12 - - dex ; ca - dey ; 88 - - eor $1234 ; 4d 34 12 - eor $1234,x ; 5d 34 12 - eor $1234,y ; 59 34 12 - eor $12 ; 45 12 - eor #$12 ; 49 12 - eor ($12,x) ; 41 12 - eor $12,x ; 55 12 - eor ($12),y ; 51 12 - - inc $1234 ; ee 34 12 - inc $1234,x ; fe 34 12 - inc $12 ; e6 12 - inc $12,x ; f6 12 - - inx ; e8 - iny ; c8 - - jmp $1234 ; 4c 34 12 - jmp ($1234) ; 6c 34 12 - - jsr $1234 ; 20 34 12 - - lda $1234 ; ad 34 12 - lda $1234,x ; bd 34 12 - lda $1234,y ; b9 34 12 - lda $12 ; a5 12 - lda #$12 ; a9 12 - lda ($12,x) ; a1 12 - lda $12,x ; b5 12 - lda ($12),y ; b1 12 - - ldx $1234 ; ae 34 12 - ldx $1234,y ; be 34 12 - ldx #$12 ; a2 12 - ldx $12 ; a6 12 - ldx $12,y ; b6 12 - - ldy $1234 ; ac 34 12 - ldy $1234,x ; bc 34 12 - ldy #$12 ; a0 12 - ldy $12 ; a4 12 - ldy $12,x ; b4 12 - - lsr $1234 ; 4e 34 12 - lsr $1234,x ; 5e 34 12 - lsr $12 ; 46 12 - lsr $12,x ; 56 12 - lsr a ; 4a - - nop ; ea - - ora $12 ; 05 12 - ora #$12 ; 09 12 - ora $1234 ; 0d 34 12 - ora $1234,x ; 1d 34 12 - ora $1234,y ; 19 34 12 - ora ($12,x) ; 01 12 - ora $12,x ; 15 12 - ora ($12),y ; 11 12 - - pha ; 48 - php ; 08 - pla ; 68 - plp ; 28 - - rol $12 ; 26 12 - rol $1234 ; 2e 34 12 - rol $1234,x ; 3e 34 12 - rol $12,x ; 36 12 - rol a ; 2a - ror $1234 ; 6e 34 12 - ror $1234,x ; 7e 34 12 - ror $12 ; 66 12 - ror $12,x ; 76 12 - ror a ; 6a - - rti ; 40 - rts ; 60 - - sbc $1234 ; ed 34 12 - sbc $1234,x ; fd 34 12 - sbc $1234,y ; f9 34 12 - sbc $12 ; e5 12 - sbc #$12 ; e9 12 - sbc ($12,x) ; e1 12 - sbc $12,x ; f5 12 - sbc ($12),y ; f1 12 - - sec ; 38 - sed ; f8 - sei ; 78 - - sta $1234 ; 8d 34 12 - sta $1234,x ; 9d 34 12 - sta $1234,y ; 99 34 12 - sta $12 ; 85 12 - sta ($12,x) ; 81 12 - sta $12,x ; 95 12 - sta ($12),y ; 91 12 - - stx $1234 ; 8e 34 12 - stx $12 ; 86 12 - stx $12,y ; 96 12 - - sty $1234 ; 8c 34 12 - sty $12 ; 84 12 - sty $12,x ; 94 12 - - tax ; aa - tay ; a8 - tsx ; ba - txa ; 8a - txs ; 9a - tya ; 98 diff --git a/testcode/compiler/pptest1.c b/testcode/compiler/pptest1.c deleted file mode 100644 index e42135688..000000000 --- a/testcode/compiler/pptest1.c +++ /dev/null @@ -1,6 +0,0 @@ -#define hash_hash # ## # -#define mkstr(a) # a -#define in_between(a) mkstr(a) -#define join(c, d) in_between(c hash_hash d) - -char p[] = join(x, y); // Comment diff --git a/testcode/compiler/pptest2.c b/testcode/compiler/pptest2.c deleted file mode 100644 index e127d53fb..000000000 --- a/testcode/compiler/pptest2.c +++ /dev/null @@ -1,19 +0,0 @@ -#define x 3 -#define f(a) f(x * (a)) -#undef x -#define x 2 -#define g f -#define z z[0] -#define h g(~ -#define m(a) a(w) -#define w 0,1 -#define t(a) a -#define p() int -#define q(x) x -#define r(x,y) x ## y -#define str(x) # x - -f(y+1) + f(f(z)) % t(t(g) (0) + t)(1); -g(x+(3,4)-w) | h 5) & m(f)^m(m); -p() i[q()] = { q(1), r(2,3), r(4,), r(,5), r(,) }; -char c[2][6] = { str(hello), str() }; diff --git a/testcode/compiler/pptest3.c b/testcode/compiler/pptest3.c deleted file mode 100644 index 62aa7f705..000000000 --- a/testcode/compiler/pptest3.c +++ /dev/null @@ -1,16 +0,0 @@ -#define str(s) # s -#define xstr(s) str(s) -#define debug(s, t) printf("x" # s "= %d, x" # t "= %s", \ - x ## s, x ## t) -#define INCFILE(n) vers ## n // Comment -#define glue(a,b) a ## b -#define xglue(a,b) glue(a,b) -#define HIGHLOW "hello" -#define LOW LOW ", world" - -debug (1, 2); -fputs (str (strncmp("abc\0d", "abc", '\4') // Comment - == 0) str (: @\n), s); -glue (HIGH, LOW); -xglue (HIGH, LOW); - diff --git a/testcode/compiler/pptest4.c b/testcode/compiler/pptest4.c deleted file mode 100644 index b8540b5c5..000000000 --- a/testcode/compiler/pptest4.c +++ /dev/null @@ -1,3 +0,0 @@ -#define t(x,y,z) x ## y ## z -int j[] = { t(1,2,3), t(,4,5), t(6,,7), t(8,9,), - t(10,,), t(,11,), t(,,12), t(,,) }; diff --git a/testcode/compiler/pptest5.c b/testcode/compiler/pptest5.c deleted file mode 100644 index 1f0bd4328..000000000 --- a/testcode/compiler/pptest5.c +++ /dev/null @@ -1,3 +0,0 @@ -#define t(x,y,z) x ## y ## z -int j[] = { t(1,2,3), t(,4,5), t(6,,7), t(8,9,), - t(10,,), t(,11,), t(,,12), t(,,) }; diff --git a/testcode/lib/.gitignore b/testcode/lib/.gitignore deleted file mode 100644 index 9bb8eaa3e..000000000 --- a/testcode/lib/.gitignore +++ /dev/null @@ -1,2 +0,0 @@ -*.o -em-test-* diff --git a/testcode/lib/conio.c b/testcode/lib/conio.c deleted file mode 100644 index fe977ec08..000000000 --- a/testcode/lib/conio.c +++ /dev/null @@ -1,153 +0,0 @@ -/* - * conio api test program - * - * keys: - * - * 1...0 change text color - * F5/F6 change border color - * F7/F8 change background color - * - */ - - -#include <conio.h> -#include <string.h> -#include <stdlib.h> -#include <joystick.h> - -#if defined(__GAMATE__) -/* there is not enough screen space to show all 256 characters at the bottom */ -#define NUMCHARS 128 -#define NUMCOLS 4 -#else -#define NUMCHARS 256 -#define NUMCOLS 16 -#endif - -static char grid[5][5] = { - { CH_ULCORNER, CH_HLINE, CH_TTEE, CH_HLINE, CH_URCORNER }, - { CH_VLINE, ' ', CH_VLINE, ' ', CH_VLINE }, - { CH_LTEE, CH_HLINE, CH_CROSS, CH_HLINE, CH_RTEE }, - { CH_VLINE, ' ', CH_VLINE, ' ', CH_VLINE }, - { CH_LLCORNER, CH_HLINE, CH_BTEE, CH_HLINE, CH_LRCORNER }, -}; - -void main(void) -{ - int i, j, n; - unsigned char xsize, ysize, tcol, bgcol, bcol, inpos = 0; -#if defined(__NES__) || defined(__PCE__) || defined(__GAMATE__) - unsigned char joy; - - joy_install(joy_static_stddrv); -#endif - clrscr(); - screensize(&xsize, &ysize); - cputs("cc65 conio test\n\r"); - cputs("Input:[ ]"); - - cputsxy(0, 2, "Colors:" ); - tcol = textcolor(0); /* remember original textcolor */ - bgcol = bgcolor(0); /* remember original background color */ - bcol = bordercolor(0); /* remember original border color */ - bgcolor(bgcol);bordercolor(bcol); - for (i = 0; i < 3; ++i) { - gotoxy(i,3 + i); - for (j = 0; j < NUMCOLS; ++j) { - textcolor(j); - cputc('X'); - } - } - textcolor(tcol); - - cprintf("\n\n\r Screensize: %dx%d", xsize, ysize ); - - chlinexy(0,6,xsize); - cvlinexy(0,6,3); - chlinexy(0,8,xsize); - cvlinexy(xsize-1,6,3); - cputcxy(0,6,CH_ULCORNER); - cputcxy(xsize-1,6,CH_URCORNER); - cputcxy(0,8,CH_LLCORNER); - cputcxy(xsize-1,8,CH_LRCORNER); - - for (i = 0; i < 5; ++i) { - gotoxy(xsize - 5,i); - for (j = 0; j < 5; ++j) { - cputc(grid[i][j]); - } - } - - gotoxy(0,ysize - 2 - ((NUMCHARS + xsize) / xsize)); - revers(1); - for (i = 0; i < xsize; ++i) { - cputc('0' + i % 10); - } - revers(0); - for (i = 0; i < NUMCHARS; ++i) { - if ((i != '\n') && (i != '\r')) { - cputc(i); - } else { - cputc(' '); - } - } - while(wherex() > 0) { - cputc('#'); - } - revers(1); - for (i = 0; i < xsize; ++i) { - cputc('0' + i % 10); - } - revers(0); - - cursor(1); - for (;;) { - - /* do the "rvs" blinking */ - i = textcolor(COLOR_BLACK); - gotoxy(8, 2); - j = n >> 4 & 1; - revers(j); - cputc(j ? 'R' : ' '); - revers(j ^ 1); - cputs(" rvs"); - revers(0); - textcolor(i); - - gotoxy(7 + inpos,1); - -#if defined(__NES__) || defined(__PCE__) || defined(__GAMATE__) - /* not all targets have waitvblank */ - waitvblank(); - /* for targets that do not have a keyboard, read the first - joystick */ - joy = joy_read(JOY_1); - cprintf("%02x", joy); -#else - i = cgetc(); - if ((i >= '0') && (i<='9')) { - textcolor(i - '0'); - } else if (i == CH_CURS_LEFT) { - inpos = (inpos - 1) & 7; - } else if (i == CH_CURS_RIGHT) { - inpos = (inpos + 1) & 7; - } else if (i == CH_F5) { - bgcol = (bgcol + 1) & 0x0f; - bordercolor(bgcol); - } else if (i == CH_F6) { - bgcol = (bgcol - 1) & 0x0f; - bordercolor(bgcol); - } else if (i == CH_F7) { - bgcol = (bgcol + 1) & 0x0f; - bgcolor(bgcol); - } else if (i == CH_F8) { - bgcol = (bgcol - 1) & 0x0f; - bgcolor(bgcol); - } else { - cputc(i); - inpos = (inpos + 1) & 7; - } -#endif - ++n; - } -} diff --git a/testcode/lib/div-test.c b/testcode/lib/div-test.c deleted file mode 100644 index 2d5c2541e..000000000 --- a/testcode/lib/div-test.c +++ /dev/null @@ -1,38 +0,0 @@ -/* div-test.c -** -** This program tests the division and modulo operators -** and the div() library function. -** -** 2002-10-24, Greg King -*/ - -#include <stdio.h> -#include <stdlib.h> -#include <stdbool.h> - -static bool test(int dividend, int divisor) { - div_t result; - - result = div(dividend, divisor); - printf("%+d/%+d= %+d, %+d%%%+d= %+d, div()= %+d, %+d\n", - dividend, divisor, dividend / divisor, - dividend, divisor, dividend % divisor, - result.quot, result.rem); - return result.quot * divisor + result.rem != dividend; - } - -int main(void) { - bool t; - - printf("\nTest of division and modulus operations:\n\n"); - t = test(+40, +3) || - test(+40, -3) || - test(-40, +3) || - test(-40, -3); - if (t) - printf("\nThe div() function made a wrong result!\n"); - - printf("\nTap a key, to exit. "); - getchar(); - return (int)t; - } diff --git a/testcode/lib/gamate/Makefile b/testcode/lib/gamate/Makefile deleted file mode 100644 index 2cf98d189..000000000 --- a/testcode/lib/gamate/Makefile +++ /dev/null @@ -1,25 +0,0 @@ - -all: audiotest.bin lcdtest.bin ctest.bin - -audiotest.bin: audiotest.s - ../../../bin/cl65 -l audiotest.lst -t gamate -o audiotest.bin audiotest.s -lcdtest.bin: lcdtest.s - ../../../bin/cl65 -l lcdtest.lst -t gamate -o lcdtest.bin lcdtest.s -ctest.bin: ctest.c - ../../../bin/cl65 -l ctest.lst -t gamate -o ctest.bin ctest.c -nachtm.bin: nachtm.c - ../../../bin/cl65 -Os -l nachtm.lst -t gamate -o nachtm.bin nachtm.c - gamate-fixcart nachtm.bin - -test1: lcdtest.bin - cd ~/Desktop/mame/winmess/ && wine mess.exe gamate -window -skip_gameinfo -cart ~/Desktop/cc65/github/cc65/testcode/lib/gamate/lcdtest.bin -test2: audiotest.bin - cd ~/Desktop/mame/winmess/ && wine mess.exe gamate -window -skip_gameinfo -cart ~/Desktop/cc65/github/cc65/testcode/lib/gamate/audiotest.bin -testc: ctest.bin - cd ~/Desktop/mame/winmess/ && wine mess.exe gamate -window -skip_gameinfo -cart ~/Desktop/cc65/github/cc65/testcode/lib/gamate/ctest.bin -testn: nachtm.bin - cd ~/Desktop/mame/winmess/ && wine mess.exe gamate -window -skip_gameinfo -cart ~/Desktop/cc65/github/cc65/testcode/lib/gamate/nachtm.bin - -clean: - rm -f lcdtest.o audiotest.o ctest.o - rm -f lcdtest.bin audiotest.bin ctest.bin nachtm.bin diff --git a/testcode/lib/joy-test.c b/testcode/lib/joy-test.c deleted file mode 100644 index 0a5c80902..000000000 --- a/testcode/lib/joy-test.c +++ /dev/null @@ -1,80 +0,0 @@ -#include <stdio.h> -#include <stdlib.h> -#include <string.h> -#include <errno.h> -#include <conio.h> -#include <joystick.h> - - -#ifdef JOYSTICK_DRIVER - -/* A statically linked driver was named on the compiler's command line. -** Make sure that it is used instead of a dynamic one. -*/ -# undef DYN_DRV -# define DYN_DRV 0 -#else - -/* Use a dynamically loaded driver, by default. */ -# ifndef DYN_DRV -# define DYN_DRV 1 -# endif -#endif - - -int main (void) -{ - unsigned char j; - unsigned char count; - unsigned char i; - -#if DYN_DRV - unsigned char Res = joy_load_driver (joy_stddrv); -#elif defined(JOYSTICK_DRIVER) - unsigned char Res = joy_install (&JOYSTICK_DRIVER); -#else - unsigned char Res = joy_install (&joy_static_stddrv); -#endif - - if (Res != JOY_ERR_OK) { - cprintf ("Error in joy_load_driver: %u\r\n", Res); -#if DYN_DRV - cprintf ("os: %u, %s\r\n", _oserror, _stroserror (_oserror)); -#endif - exit (EXIT_FAILURE); - } - - clrscr (); - count = joy_count (); -#ifdef __ATARI5200__ - cprintf ("JOYSTICKS: %d", count); -#else - cprintf ("Driver supports %d joystick(s)", count); -#endif - while (1) { - for (i = 0; i < count; ++i) { - gotoxy (0, i+1); - j = joy_read (i); -#ifdef __ATARI5200__ - cprintf ("%1d:%-3s%-3s%-3s%-3s%-3s%-3s", - i, - (j & joy_masks[JOY_UP])? " U " : " u ", - (j & joy_masks[JOY_DOWN])? " D " : " d ", - (j & joy_masks[JOY_LEFT])? " L " : " l ", - (j & joy_masks[JOY_RIGHT])? " R " : " r ", - (j & joy_masks[JOY_FIRE])? " 1 " : " ", - (j & joy_masks[JOY_FIRE2])? " 2 " : " "); -#else - cprintf ("%2d: %-6s%-6s%-6s%-6s%-6s%-6s", - i, - (j & joy_masks[JOY_UP])? " up " : " ---- ", - (j & joy_masks[JOY_DOWN])? " down " : " ---- ", - (j & joy_masks[JOY_LEFT])? " left " : " ---- ", - (j & joy_masks[JOY_RIGHT])? "right " : " ---- ", - (j & joy_masks[JOY_FIRE])? " fire " : " ---- ", - (j & joy_masks[JOY_FIRE2])? "fire2 " : " ---- "); -#endif - } - } - return 0; -} diff --git a/testcode/lib/pce/Makefile b/testcode/lib/pce/Makefile deleted file mode 100644 index 9a4dd7506..000000000 --- a/testcode/lib/pce/Makefile +++ /dev/null @@ -1,12 +0,0 @@ -.PHONY: all clean test - -all: conio.pce - -conio.pce: conio.c - ../../../bin/cl65 -t pce conio.c --mapfile conio.map -o conio.pce - -clean: - $(RM) conio.o conio.pce conio.map - -test: conio.pce - mednafen -force_module pce conio.pce diff --git a/testcode/lib/strchr-test.c b/testcode/lib/strchr-test.c deleted file mode 100644 index 7aba1de1e..000000000 --- a/testcode/lib/strchr-test.c +++ /dev/null @@ -1,59 +0,0 @@ -#include <stdio.h> -#include <stdlib.h> -#include <string.h> - - - -/* Test string. Must NOT have duplicate characters! */ -static char S[] = "Helo wrd!\n"; - -static char Found[256]; - - - -int main (void) -{ - unsigned Len; - unsigned I; - char* P; - - /* Print a header */ - printf ("strchr(): "); - - /* Get the length of the string */ - Len = strlen (S); - - /* Search for all characters in the string, including the terminator */ - for (I = 0; I < Len+1; ++I) { - - /* Search for this char */ - P = strchr (S, S[I]); - - /* Check if we found it */ - if (P == 0 || (P - S) != I) { - printf ("Failed for code 0x%02X, offset %u!\n", S[I], I); - printf ("P = %04X offset = %04X\n", P, P-S); - exit (EXIT_FAILURE); - } - - /* Mark the char as checked */ - Found[S[I]] = 1; - } - - /* Search for all other characters and make sure they aren't found */ - for (I = 0; I < 256; ++I) { - if (Found[I] == 0) { - if (strchr (S, (char)I) != 0) { - printf ("Failed for code 0x%02X\n", I); - exit (EXIT_FAILURE); - } - } - } - - /* Test passed */ - printf ("Passed\n"); - return EXIT_SUCCESS; -} - - - diff --git a/testcode/lib/time-test.c b/testcode/lib/time-test.c deleted file mode 100644 index 99d16be01..000000000 --- a/testcode/lib/time-test.c +++ /dev/null @@ -1,38 +0,0 @@ -#include <stdio.h> -#include <time.h> - - - -int main (void) -{ - struct tm tm; - time_t t; - char buf[64]; - - - tm.tm_sec = 9; - tm.tm_min = 34; - tm.tm_hour = 21; - tm.tm_mday = 12; - tm.tm_mon = 10; /* 0..11, so this is november */ - tm.tm_year = 102; /* year - 1900, so this is 2002 */ - tm.tm_wday = 2; /* Tuesday */ - tm.tm_isdst = 0; - - /* Convert this broken down time into a time_t and back */ - t = mktime (&tm); - printf ("Test passes if the following lines are\n" - "all identical:\n"); - printf ("3DD173D1 - Tue Nov 12 21:34:09 2002\n"); - printf ("%08lX - %s", t, asctime (&tm)); - printf ("%08lX - %s", t, asctime (gmtime (&t))); - strftime (buf, sizeof (buf), "%c", &tm); - printf ("%08lX - %s\n", t, buf); - strftime (buf, sizeof (buf), "%a %b %d %H:%M:%S %Y", &tm); - printf ("%08lX - %s\n", t, buf); - - return 0; -} - - - diff --git a/util/.gitignore b/util/.gitignore new file mode 100644 index 000000000..4da436acb --- /dev/null +++ b/util/.gitignore @@ -0,0 +1,3 @@ +/atari/ataricvt +/gamate/gamate-fixcart +/zlib/deflater diff --git a/util/Makefile b/util/Makefile new file mode 100644 index 000000000..6d960abf6 --- /dev/null +++ b/util/Makefile @@ -0,0 +1,22 @@ + +.PHONY: atari gamate zlib + +util: atari gamate zlib + +all: util + +atari: + @$(MAKE) -C atari --no-print-directory $@ +gamate: + @$(MAKE) -C gamate --no-print-directory $@ +zlib: + @$(MAKE) -C zlib --no-print-directory $@ + +mostlyclean clean: + @$(MAKE) -C atari --no-print-directory $@ + @$(MAKE) -C gamate --no-print-directory $@ + @$(MAKE) -C zlib --no-print-directory $@ + +install zip: + + diff --git a/util/atari/Makefile b/util/atari/Makefile new file mode 100644 index 000000000..db4226f69 --- /dev/null +++ b/util/atari/Makefile @@ -0,0 +1,20 @@ + +CC = $(CROSS_COMPILE)gcc + +ifdef CROSS_COMPILE + $(info CC: $(CC)) +endif + +CFLAGS += -O3 -Wall -Wextra -Wno-char-subscripts $(USER_CFLAGS) + +.PHONY: mostlyclean clean + +atari: ataricvt + +ataricvt: ataricvt.c + $(CC) $(CFLAGS) -o ataricvt ataricvt.c + +mostlyclean clean: + $(RM) ataricvt + +install zip: diff --git a/util/atari/ataricvt.c b/util/atari/ataricvt.c index 104d4f6de..23ad5a24a 100644 --- a/util/atari/ataricvt.c +++ b/util/atari/ataricvt.c @@ -8,7 +8,7 @@ int main (void) putchar ('\n'); } else if (C == 0x7F) { putchar ('\t'); - } else { + } else { putchar (C); } } diff --git a/util/cbm/cbmcvt.c b/util/cbm/cbmcvt.c deleted file mode 100644 index 11c0325e4..000000000 --- a/util/cbm/cbmcvt.c +++ /dev/null @@ -1,55 +0,0 @@ -/* cbmcvt.c -- PetSCII <--> ISO-8859-1 Conversion Filter Tool */ -/* 2010-09-06, Greg King */ - -#include <stdio.h> -#include <unistd.h> - -/* Translation table ISO-8859-1 -> PetSCII */ -static const unsigned char CTPET[256] = { - 0x00,0x01,0x02,0x03,0x04,0x05,0x06,0x07,0x14,0x09,0x0D,0x11,0x93,0x0A,0x0E,0x0F, - 0x10,0x0B,0x12,0x13,0x08,0x15,0x16,0x17,0x18,0x19,0x1A,0x1B,0x1C,0x1D,0x1E,0x1F, - 0x20,0x21,0x22,0x23,0x24,0x25,0x26,0x27,0x28,0x29,0x2A,0x2B,0x2C,0x2D,0x2E,0x2F, - 0x30,0x31,0x32,0x33,0x34,0x35,0x36,0x37,0x38,0x39,0x3A,0x3B,0x3C,0x3D,0x3E,0x3F, - 0x40,0xC1,0xC2,0xC3,0xC4,0xC5,0xC6,0xC7,0xC8,0xC9,0xCA,0xCB,0xCC,0xCD,0xCE,0xCF, - 0xD0,0xD1,0xD2,0xD3,0xD4,0xD5,0xD6,0xD7,0xD8,0xD9,0xDA,0x5B,0xBF,0x5D,0x5E,0xA4, - 0xAD,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4A,0x4B,0x4C,0x4D,0x4E,0x4F, - 0x50,0x51,0x52,0x53,0x54,0x55,0x56,0x57,0x58,0x59,0x5A,0xB3,0xDD,0xAB,0xB1,0xDF, - 0x80,0x81,0x82,0x83,0x84,0x85,0x86,0x87,0x88,0x89,0x8A,0x8B,0x8C,0x8D,0x8E,0x8F, - 0x90,0x91,0x92,0x0C,0x94,0x95,0x96,0x97,0x98,0x99,0x9A,0x9B,0x9C,0x9D,0x9E,0x9F, - 0xA0,0xA1,0xA2,0xA3,0x5F,0xA5,0xA6,0xA7,0xA8,0xA9,0xAA,0x7D,0xAC,0x60,0xAE,0xAF, - 0xB0,0x7E,0xB2,0x7B,0xB4,0xB5,0xB6,0xB7,0xB8,0xB9,0xBA,0xBB,0xBC,0xBD,0xBE,0x5C, - 0x60,0x61,0x62,0x63,0x64,0x65,0x66,0x67,0x68,0x69,0x6A,0x6B,0x6C,0x6D,0x6E,0x6F, - 0x70,0x71,0x72,0x73,0x74,0x75,0x76,0x77,0x78,0x79,0x7A,0x7B,0xDC,0x7C,0xDE,0x7F, - 0xE0,0xE1,0xE2,0xE3,0xE4,0xE5,0xE6,0xE7,0xE8,0xE9,0xEA,0xEB,0xEC,0xED,0xEE,0xEF, - 0xF0,0xF1,0xF2,0xF3,0xF4,0xF5,0xF6,0xF7,0xF8,0xF9,0xFA,0xFB,0xFC,0xFD,0xFE,0xFF -}; - -static unsigned char CTISO[256]; - - -int main (int argc, char *argv[]) { - int C; - size_t I = 0u; - - if (isatty(fileno(stdin))) { - fputs("cbmcvt v2.1 -- Conversion Filter (stdin --> stdout)\n" - " -p converts ISO-8859-1 to PetSCII\n" - " else, converts in other direction.\n", stderr); - return 0; - } - if (argc > 1 && argv[1][0] == '-' && argv[1][1] == 'p') { - while ((C = fgetc (stdin)) != EOF) { - fputc (CTPET[C], stdout); - } - } else { - /* Create translation table PetSCII -> ISO-8859-1 */ - for (; I < sizeof CTPET; ++I) { - CTISO[CTPET[I]] = I; - } - - while ((C = fgetc (stdin)) != EOF) { - fputc (CTISO[C], stdout); - } - } - return 0; -} diff --git a/util/gamate/Makefile b/util/gamate/Makefile new file mode 100644 index 000000000..db2a1f059 --- /dev/null +++ b/util/gamate/Makefile @@ -0,0 +1,20 @@ + +CC = $(CROSS_COMPILE)gcc + +ifdef CROSS_COMPILE + $(info CC: $(CC)) +endif + +CFLAGS += -O3 -Wall -Wextra -Wno-char-subscripts $(USER_CFLAGS) + +.PHONY: mostlyclean clean + +gamate: gamate-fixcart + +gamate-fixcart: gamate-fixcart.c + $(CC) $(CFLAGS) -o gamate-fixcart gamate-fixcart.c + +mostlyclean clean: + $(RM) gamate-fixcart + +install zip: diff --git a/util/gamate/gamate-fixcart.c b/util/gamate/gamate-fixcart.c index ba09ac083..65c0c5311 100644 --- a/util/gamate/gamate-fixcart.c +++ b/util/gamate/gamate-fixcart.c @@ -1,4 +1,3 @@ - #include <stdlib.h> #include <stdio.h> @@ -7,8 +6,7 @@ unsigned int n, i, c; void usage(char *arg) { - printf("usage: %s [file]\n", arg); - exit(-1); + printf("usage: %s file\n", arg); } int main(int argc, char *argv[]) { @@ -33,5 +31,5 @@ int main(int argc, char *argv[]) { fputc((n >> 8) & 0xff, in); fclose(in); - return (0); + return 0; } diff --git a/util/zlib/Makefile b/util/zlib/Makefile new file mode 100644 index 000000000..3770e1f3c --- /dev/null +++ b/util/zlib/Makefile @@ -0,0 +1,25 @@ + +CC = $(CROSS_COMPILE)gcc + +ifdef CROSS_COMPILE + $(info CC: $(CC)) +endif + +CFLAGS += -O3 -Wall -Wextra -Wno-char-subscripts $(USER_CFLAGS) + +.PHONY: mostlyclean clean + +zlib: warning +#zlib: deflater + +warning: + @echo "deflater needs zlib installed, use 'make deflater' to build" + +deflater: deflater.c + $(CC) $(CFLAGS) -o deflater deflater.c -lz + +mostlyclean clean: + $(RM) deflater + +install zip: + diff --git a/util/zlib/deflater.c b/util/zlib/deflater.c index 32d01a36e..7e13600ad 100644 --- a/util/zlib/deflater.c +++ b/util/zlib/deflater.c @@ -16,8 +16,8 @@ int main(int argc, char* argv[]) { FILE* fp; - char* inbuf; - char* outbuf; + unsigned char* inbuf; + unsigned char* outbuf; size_t inlen; size_t outlen; z_stream stream; @@ -84,7 +84,7 @@ int main(int argc, char* argv[]) } /* display summary */ - printf("Compressed %s (%d bytes) to %s (%d bytes)\n", + printf("Compressed %s (%zu bytes) to %s (%zu bytes)\n", argv[1], inlen, argv[2], outlen); return 0; }