Commit: 4c547bef9a12ede7e267a07247c8d6ed79716cb2
Author: Vi Grey
Date: 2018-09-27 20:09 UTC
Summary: DC26-6502 Second Print Edition Initial Commit

 .gitignore                 |    1 +
 CHANGELOG.md               |   21 +
 LICENSE                    |   24 +
 Makefile                   |   44 ++
 README.md                  |  102 ++++
 SHA256SUMS.txt             |   13 +
 resources/asm6.zip         |  Bin 0 -> 47675 bytes
 resources/screenshot-1.png |  Bin 0 -> 5825 bytes
 resources/screenshot-2.png |  Bin 0 -> 11510 bytes
 resources/screenshot-3.png |  Bin 0 -> 4944 bytes
 src/dc26-6502.asm          | 2043 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 src/dc26.bf                |    1 +
 src/dc26.zip               |  Bin 0 -> 3345 bytes
 src/graphics/tileset.chr   |  Bin 0 -> 8192 bytes
 14 files changed, 2249 insertions(+)


diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..ba077a4
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1 @@
+bin
diff --git a/CHANGELOG.md b/CHANGELOG.md
new file mode 100644
index 0000000..694af99
--- /dev/null
+++ b/CHANGELOG.md
@@ -0,0 +1,21 @@
+# Change Log
+All notable changes to this project will be documented in this file.
+
+## 2.0.0 - 2018-09-27
+### Added
+- ascii2bf.py file for creating bf programs from files
+- --help/-h flag information for ascii2bf.py and bfinterpreter.py
+- Ability for dc26-6502.nes to be played as an NROM-256 or NROM-128 NES ROM file
+
+### Changed
+- Released ROM file source code available under the BSD 2-Clause license
+- Bf program output
+- Edition value to #$02
+- PPU Data
+
+### Fixed
+- Graphical bug when interpreting bf file on real NES hardware
+
+## 1.0.0 - 2018-08-03
+### Added
+- Initial release
diff --git a/LICENSE b/LICENSE
new file mode 100644
index 0000000..d1a09f3
--- /dev/null
+++ b/LICENSE
@@ -0,0 +1,24 @@
+Copyright (C) 2018, Vi Grey
+All rights reserved.
+
+Redistribution and use in source and binary forms, with or without
+modification, are permitted provided that the following conditions
+are met:
+
+    1. Redistributions of source code must retain the above copyright
+       notice, this list of conditions and the following disclaimer.
+    2. Redistributions in binary form must reproduce the above copyright
+       notice, this list of conditions and the following disclaimer in the
+       documentation and/or other materials provided with the distribution.
+
+THIS SOFTWARE IS PROVIDED BY AUTHOR AND CONTRIBUTORS "AS IS" AND
+ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+ARE DISCLAIMED. IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE
+FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+SUCH DAMAGE.
diff --git a/Makefile b/Makefile
new file mode 100644
index 0000000..e2b1a00
--- /dev/null
+++ b/Makefile
@@ -0,0 +1,44 @@
+# Copyright (C) 2018, Vi Grey
+# All rights reserved.
+#
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions
+# are met:
+#
+# 1. Redistributions of source code must retain the above copyright
+#    notice, this list of conditions and the following disclaimer.
+# 2. Redistributions in binary form must reproduce the above copyright
+#    notice, this list of conditions and the following disclaimer in the
+#    documentation and/or other materials provided with the distribution.
+#
+# THIS SOFTWARE IS PROVIDED BY AUTHOR AND CONTRIBUTORS ``AS IS'' AND
+# ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE
+# FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+# DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+# OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+# HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+# LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+# OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+# SUCH DAMAGE.
+
+PKG_NAME := dc26-6502
+CURRENTDIR := $(dir $(realpath $(firstword $(MAKEFILE_LIST))))
+DIRNAME := $(shell basename $(CURRENTDIR))
+
+all:
+	mkdir -p $(CURRENTDIR)bin; \
+  cd $(CURRENTDIR)src; \
+  asm $(PKG_NAME).asm ../bin/$(PKG_NAME).nes; \
+  cd ../bin; \
+  zip -F dc26-6502.nes --out new.zip; \
+  tail -c $$(expr $$(wc -c < dc26-6502.nes) - \
+                  $$(wc -c < new.zip)) dc26-6502.nes >> new.zip; \
+  mv new.zip dc26-6502.nes; \
+  cd ..; \
+  echo ""; \
+  echo "NES ROM SUCCESSFULLY COMPILED"; \
+
+clean:
+	rm -rf $(CURRENTDIR)bin
diff --git a/README.md b/README.md
new file mode 100644
index 0000000..52bbffe
--- /dev/null
+++ b/README.md
@@ -0,0 +1,102 @@
+# DC26-6502 (Brainf--k Interpreter NES Cartridge)
+
+A brainf--k interpreter written for NES cartridge to be played on real NES hardware.
+
+**_DC26-6502 was created by Vi Grey and is licensed under the BSD 2-Clause License._**
+
+### Description:
+This NES game is an interpreter for the brainf--k programming language, a programming language that uses only 8 symbols.  The standard NES controller is used to create and run programs using only the power of the NES hardware CPU.
+
+### Platforms:
+- GNU/Linux
+
+### Build Dependencies:
+- asm6 _(You'll probably have to build asm6 from source.  Make sure the asm6 binary is named **asm** and that the binary is executable and accessible in your PATH. The source code can be found at **http://3dscapture.com/NES/asm6.zip** or in the included directory **resources/asm6.zip**)_
+- zip
+
+### Build NES ROM:
+From a terminal, go to the the main directory of this project (the directory this README.md file exists in), you can then build the NES ROM with the following command.
+
+    $ make
+
+The resulting NES ROM will be located at **bin/dc26-6502.nes** and should have the SHA-256 hash of `85816790f8f77f071890498db6b8e68f0b7c1f564f039cea05b30eef8d0bcc42`
+
+### Cleaning Build Environment:
+If you used `make` to build the NES ROM, you can run the following command to clean up the build environment.
+
+    $ make clean
+
+### Controls:
+- A + Up: `+`
+- A + Down: `-`
+- A + Left: `<`
+- A + Right: `>`
+- B + Up: `.`
+- B + Down: `,`
+- B + Left: `[`
+- B + Right: `]`
+- Start: `Run`
+- Select: `Backspace`
+
+### Specifications:
+- 1024 Byte Instruction Buffer _($0200-$05FF)_
+- 512 Byte Memory Tape _($0600-$0FFF)_
+- 28 x 19 Print Screen Size _(7 bit ASCII Characters)_
+
+### Screenshots:
+![DC26-6502 "READY" Screenshot](resources/screenshot-1.png)
+
+(_READY Screen_)
+
+![DC26-6502 Brainf--k Code Written Screenshot](resources/screenshot-2.png)
+
+(_Brainf--k Code Written Out_)
+
+![DC26-6502 "Finished Interpreting" Screenshot](resources/screenshot-3.png)
+
+(_FINISHED Interpreting Screen_)
+
+### Extras:
+- #### Unzipping the ROM:
+
+  The compiled NES ROM file at **bin/dc26-6502.nes** will also be a functioning ZIP file that contains 2 files, **bfinterpreter.py** and **ascii2bf.py**.
+
+- #### Interpreting the ROM:
+
+  This NES ROM is also a functional brainf--k file.  Using `python3 bfinterpreter.py dc26-6502.nes` will allow you to interpret the brainf--k file content of the NES ROM.
+
+- #### Creating Brainf--k Programs:  
+
+  An included tool, **ascii2bf.py** allows you to create a brainf--k program for any file that is a multiple of 8 bits long.  To create a brainf--k program, use `python3 ascii2bf.py filename` where _filename_ is the path to the file you want to create a brainf--k program for.
+
+- #### NES Mapper:
+
+  This NES ROM runs as an NROM-256 ROM, but can also work as an NROM-128 ROM.
+
+- #### **^ ^ v v < > < > B A**
+
+### License:
+    Copyright (C) 2018, Vi Grey
+    All rights reserved.
+
+    Redistribution and use in source and binary forms, with or without
+    modification, are permitted provided that the following conditions
+    are met:
+
+        1. Redistributions of source code must retain the above copyright
+           notice, this list of conditions and the following disclaimer.
+        2. Redistributions in binary form must reproduce the above copyright
+           notice, this list of conditions and the following disclaimer in the
+           documentation and/or other materials provided with the distribution.
+
+    THIS SOFTWARE IS PROVIDED BY AUTHOR AND CONTRIBUTORS \`\`AS IS'' AND
+    ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+    IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+    ARE DISCLAIMED. IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE
+    FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+    DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+    OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+    HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+    LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+    OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+    SUCH DAMAGE.
diff --git a/SHA256SUMS.txt b/SHA256SUMS.txt
new file mode 100644
index 0000000..dbf9e97
--- /dev/null
+++ b/SHA256SUMS.txt
@@ -0,0 +1,13 @@
+47de97e16916cd2d895d58e6406cf39c7aec6f4b29a114d53f1d1d8a652c625b  .gitignore
+753e68f9c9c056e89b1f712740b3cc2e18ae70016243a24d5c047f22088f493e  CHANGELOG.md
+887e1b994f19ba3c4f159ea1e904d8e4785ef63a4fd4a4702956b85e61421c13  LICENSE
+3d6438d7313ce09fa86ab49be62fe9d1f9e556782b3b76b4bfeb0cf4d5ccac0a  Makefile
+9b0126457474c373775bad5d0a61d7c8d0caabc12d2ebf5a312a422c1d4141ff  README.md
+91935235fe8a839beb79d436e960ad16594faa79de916675f789c6e00771c5f4  src/dc26-6502.asm
+aeaf09657527d558dd2631a9a5140557806ba1fa8f13853dde0db3c85df9f078  src/dc26.bf
+bd81a12779c53decece4ad44feb10831242fea45e1bdefe9311e875f2b4c3c0c  src/dc26.zip
+35153b34868f09e2a4bcccb8612a88740e616c9dead64d73a0963aeac5bacae6  src/graphics/tileset.chr
+b37956f37815a75a6712c0d1f8eea06d1207411921c2e7ff46a133f35f0b3e1d  resources/asm6.zip
+7fd9e5e072992e0dd78213239798cd9cfad052815cfe4faf878a86140c9cff84  resources/screenshot-1.png
+1b50c7d4dcaf0e5c08c3782929a8930ad5337331ecf552bc379931f9970e9fcd  resources/screenshot-2.png
+9f7d0a37962ceb44200d9da942199174614a6529ed21e5df27b0f203548cc956  resources/screenshot-3.png
diff --git a/resources/asm6.zip b/resources/asm6.zip
new file mode 100644
index 0000000..c983b54
Binary files /dev/null and b/resources/asm6.zip differ
diff --git a/resources/screenshot-1.png b/resources/screenshot-1.png
new file mode 100644
index 0000000..b08a8cd
Binary files /dev/null and b/resources/screenshot-1.png differ
diff --git a/resources/screenshot-2.png b/resources/screenshot-2.png
new file mode 100644
index 0000000..193cfba
Binary files /dev/null and b/resources/screenshot-2.png differ
diff --git a/resources/screenshot-3.png b/resources/screenshot-3.png
new file mode 100644
index 0000000..a9ba8a8
Binary files /dev/null and b/resources/screenshot-3.png differ
diff --git a/src/dc26-6502.asm b/src/dc26-6502.asm
new file mode 100644
index 0000000..68b8b89
--- /dev/null
+++ b/src/dc26-6502.asm
@@ -0,0 +1,2043 @@
+;; Copyright (C) 2018, Vi Grey
+;; All rights reserved.
+;;
+;; Redistribution and use in source and binary forms, with or without
+;; modification, are permitted provided that the following conditions
+;; are met:
+;;
+;; 1. Redistributions of source code must retain the above copyright
+;;    notice, this list of conditions and the following disclaimer.
+;; 2. Redistributions in binary form must reproduce the above copyright
+;;    notice, this list of conditions and the following disclaimer in the
+;;    documentation and/or other materials provided with the distribution.
+;;
+;; THIS SOFTWARE IS PROVIDED BY AUTHOR AND CONTRIBUTORS ``AS IS'' AND
+;; ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+;; IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+;; ARE DISCLAIMED. IN NO EVENT SHALL AUTHOR OR CONTRIBUTORS BE LIABLE
+;; FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
+;; DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
+;; OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
+;; HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
+;; LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
+;; OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
+;; SUCH DAMAGE.
+
+
+
+;; NOTE - Pardon how few comments there are in this 6502 assembly code.
+;; I was a bit rushed to get this done on time for DEFCON and haven't
+;; had the motivation to go in and add comments, even when updating this
+;; code.
+
+;; Square brackets in this file MUST be correct in number and value
+;; to allow the .nes file to run as a functioning brainf--k file.
+;; This project will not go into what makes the square bracket amounts
+;; and values correct.
+
+
+;; INES header setup
+  .db "NES", $1A
+  .db $02 ; $01 will also work for this particular rom
+  .db $01
+  .db $00
+  .db $00
+  .db 0, 0, 0, 0, 0, 0, 0, 0 ; pad header to 16 bytes
+
+;; Initialize Variables
+  enum $00
+powered dsb 4
+edition dsb 1
+background dsb 1
+foreground dsb 1
+reset dsb 1
+addr dsb 2
+cursorframe dsb 1
+cursoraddr dsb 2
+textaddr dsb 2
+printaddr dsb 2
+fps dsb 1
+drawAllowed dsb 1
+tmp dsb 1
+screen dsb 1
+input dsb 1
+inputpointer dsb 1
+code dsb 1
+controller1 dsb 1
+controller2 dsb 1
+controller1LastFrame dsb 1
+frames dsb 1
+del dsb 1
+
+twoCt dsb 1
+twoSt dsb 1
+width dsb 1
+widthOffset dsb 1
+height dsb 1
+framelocation dsb 2
+drawAddr dsb 2
+
+instAddr dsb 2
+instAddrOffset dsb 2
+instScreenAddr dsb 2
+row dsb 1
+rowadjusted dsb 1
+col dsb 1
+memoffset dsb 2
+square dsb 2
+interpret dsb 1
+err dsb 1
+
+  ende
+
+BUTTON_A         = 1 << 7
+BUTTON_B         = 1 << 6
+BUTTON_SELECT    = 1 << 5
+BUTTON_START     = 1 << 4
+BUTTON_UP        = 1 << 3
+BUTTON_DOWN      = 1 << 2
+BUTTON_LEFT      = 1 << 1
+BUTTON_RIGHT     = 1 << 0
+BACKGROUND       = $0F
+FOREGROUND       = $10
+EDITION          = $02
+
+  .base $8000
+
+  .incbin "dc26.bf" ;; Insert bf file
+
+  .byte "[-]["
+
+  .pad $9000
+
+;; Run upon power on or reset
+RESET:
+  sei          ; disable IRQs
+  cld          ; disable decimal mode, meant to make decimal arithmetic "easier"
+  ldx #$40
+  stx $4017    ; disable APU frame IRQ
+  ldx #$FF
+  txs          ; Set up stack
+  inx          ; X overflows back to 0
+  jsr Blank
+  stx $4010    ; disable DMC IRQs
+  ldx #$00 ;reset x back to 0
+  ldy #$00 ;reset y back to 0
+
+;; First vblank wait to make sure PPU is ready
+vwait1:
+  lda $2002 ; wait
+  bpl vwait1
+
+;; Second vblank wait, PPU is ready after this
+;; Region detection code inspired by Damian Yerrick's code,
+;; although his code has better documentation as to why it works
+vwait2:
+  inx
+  bne DoNotIncY
+  iny
+DoNotIncY:
+  lda $2002 ; wait
+  bpl vwait2
+  tya
+  cmp #$10
+  bcc DoNotDiv2
+  lsr
+DoNotDiv2:
+  clc
+  adc #<-$09
+  ldx #50
+  cmp #$00
+  bne Not60fps
+  ldx #60
+Not60fps:
+  stx fps
+
+;; Initialize memory and APU
+Initialize:
+  ldx #$00
+InitializeLoop:
+  ; reset values of $0000 - $01FF and $0300 - $07FF back to 0
+  lda #$00
+  cpx #fps
+  beq InitializeSkipDone
+  cpx #powered
+  beq InitializeSkipDone
+  cpx #(powered + 1)
+  beq InitializeSkipDone
+  cpx #(powered + 2)
+  beq InitializeSkipDone
+  cpx #(powered + 3)
+  beq InitializeSkipDone
+  cpx #background
+  beq InitializeSkipDone
+  cpx #foreground
+  beq InitializeSkipDone
+  sta $0000, x
+InitializeSkipDone:
+  sta $0100, x
+  sta $0200, x
+  sta $0300, x
+  sta $0400, x
+  sta $0500, x
+  sta $0600, x
+  sta $0700, x
+  inx
+  bne InitializeLoop ;repeat until x rolls back to 0
+  ldx #$FF
+  stx controller1
+InitializeDone:
+  jsr ResetCheck
+  ldx #$DC
+  stx powered
+  ldx #$26
+  stx (powered + 1)
+  ldx #$65
+  stx (powered + 2)
+  ldx #$02
+  stx (powered + 3)
+  lda #$00 ;reset A value
+  ldx #$00 ;reset X value
+  ldy #$00 ;reset Y value
+
+;; Load initial palette data and background
+  ldx background
+  cpx #$00
+  bne ForegroundBackgroundSame
+  ldx #BACKGROUND
+  stx background
+  ldy #FOREGROUND
+  sty foreground
+ForegroundBackgroundSame:  
+  ldx background
+  ldy foreground
+  jsr SetPalette
+
+  jsr Blank
+
+  lda #<(BlankMap)
+  sta addr
+  lda #>(BlankMap)
+  sta (addr + 1)
+  jsr NamDecompress
+
+  lda #<(TopData)
+  sta addr
+  lda #>(TopData)
+  sta (addr + 1)
+  jsr NamDecompress
+
+  lda #<(InstructionData)
+  sta addr
+  lda #>(InstructionData)
+  sta (addr + 1)
+  jsr NamDecompress
+
+  lda #<(ReadyText)
+  sta addr
+  lda #>(ReadyText)
+  sta (addr + 1)
+  jsr NamDecompress
+
+  lda #<(GreyBadgeComData)
+  sta addr
+  lda #>(GreyBadgeComData)
+  sta (addr + 1)
+  jsr NamDecompress
+
+  jsr ResetCursor
+
+  lda #EDITION
+  sta edition
+
+  jsr InitializeInstAddrOffset
+  jsr ResetScroll
+
+;; Loop forever
+Forever:
+  jmp Forever
+
+;; Game NMI loop
+NMI:
+  inc frames
+  ldx drawAllowed
+  cpx #$01
+  bne DrawFinished ; continue if drawAllowed is 1
+  lda $2002 ; wait
+  lda #$00
+  sta $2005
+  sta $2005
+  jsr EnableNMI
+  jsr Draw
+  ldx interpret
+  cpx #$00
+  beq DrawFinished
+  ldx #$00
+  stx err
+  jsr DisableNMI
+  jsr Interpret
+DrawFinished:
+  jsr Update
+  lda frames
+  clc
+  asl
+  cmp fps
+  bne NMIDone
+  jsr BlinkCursor
+  jsr ResetScroll
+  ldx #$00
+  stx frames
+NMIDone:
+  rti ;return from interrupt
+
+;; Check if Reset was hit
+ResetCheck:
+  lda #$01
+  sta reset
+  lda powered
+  cmp #$DC
+  bne NotPowered
+  lda (powered + 1)
+  cmp #$26
+  bne NotPowered
+  lda (powered + 2)
+  cmp #$65
+  bne NotPowered
+  lda (powered + 3)
+  cmp #$02
+  beq ResetCheckDone
+NotPowered:
+  lda #$00
+  sta reset
+  lda #FOREGROUND
+  sta foreground
+  lda #BACKGROUND
+  sta background
+ResetCheckDone:
+  rts
+
+;; Tell both controllers to latch buttons
+LatchController:
+  lda #$01
+  sta $4016
+  lda #$00
+  sta $4016 ; Sending 01 then 00 to $4016 strobes the controllers for input values
+  rts
+
+;;Get button presses from both controllers
+PollController:
+  ldx controller1
+  stx controller1LastFrame
+  ldx #$08 ; 8 buttons total
+PollControllerLoop:
+  lda $4016 ; player 1
+PollController1:
+  lsr A ; shift right
+  rol controller1 ; rotate left button vector in controller1 mem location
+  lda $4017 ; player 2
+PollControllerL2:
+  lsr A
+  rol controller2
+PollControllerEnd:
+  dex
+  bne PollControllerLoop ; repeat loop if x != 0
+  lda controller1
+  cmp #$00
+  bne Controller1Press ; Continue if nothing was pressed on controller 1
+  lda controller2
+  sta controller1 ; Put controller 2's button input into controller1
+Controller1Press:
+  rts
+
+CheckUp:
+  lda controller1
+  cmp #(BUTTON_UP)
+  beq CheckUpProcessStart
+  jsr CheckBlank
+  rts
+CheckUpProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckUpDone
+  cmp #(BUTTON_UP)
+  bne CheckUpContinue
+  rts
+CheckUpContinue:
+  ldx screen
+  cpx #$02
+  bne CheckUpNot2
+  jsr FlipBit
+CheckUpNot2:
+  ldx code
+  cpx #$01
+  beq CheckUpIncCode
+  ldx #$01
+  stx code
+  jmp CheckUpDone
+CheckUpIncCode:
+  inc code
+CheckUpDone:
+  rts
+
+CheckDown:
+  lda controller1
+  cmp #(BUTTON_DOWN)
+  beq CheckDownProcessStart
+  jsr CheckBlank
+  rts
+CheckDownProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckDownDone
+  cmp #(BUTTON_DOWN)
+  bne CheckDownContinue
+  rts
+CheckDownContinue:
+  ldx screen
+  cpx #$02
+  bne CheckDownNot2
+  jsr FlipBit
+CheckDownNot2:
+  ldx code
+  cpx #$02
+  beq CheckDownIncCode
+  cpx #$03
+  bne CheckDownDone
+CheckDownIncCode:
+  inc code
+  rts
+CheckDownDone:
+  ldx #$00
+  stx code
+  rts
+
+CheckLeft:
+  lda controller1
+  cmp #(BUTTON_LEFT)
+  beq CheckLeftProcessStart
+  jsr CheckBlank
+  rts
+CheckLeftProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckLeftDone
+  cmp #(BUTTON_LEFT)
+  bne CheckLeftContinue
+  rts
+CheckLeftContinue:
+  ldx screen
+  cpx #$02
+  bne CheckLeftNot2
+  ldx #$00
+  jsr MoveBit
+CheckLeftNot2:
+  ldx code
+  cpx #$04
+  beq CheckLeftIncCode
+  cpx #$06
+  bne CheckLeftDone
+CheckLeftIncCode:
+  inc code
+  rts
+CheckLeftDone:
+  ldx #$00
+  stx code
+  rts
+
+CheckRight:
+  lda controller1
+  cmp #(BUTTON_RIGHT)
+  beq CheckRightProcessStart
+  jsr CheckBlank
+  rts
+CheckRightProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckRightDone
+  cmp #(BUTTON_RIGHT)
+  bne CheckRightContinue
+  rts
+CheckRightContinue:
+  ldx screen
+  cpx #$02
+  bne CheckRightNot2
+  ldx #$01
+  jsr MoveBit
+CheckRightNot2:
+  ldx code
+  cpx #$05
+  beq CheckRightIncCode
+  cpx #$07
+  bne CheckRightDone
+CheckRightIncCode:
+  inc code
+  rts
+CheckRightDone:
+  ldx #$00
+  stx code
+  rts
+
+CheckB:
+  lda controller1
+  cmp #(BUTTON_B)
+  beq CheckBProcessStart
+  jsr CheckBlank
+  rts
+CheckBProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckBDone
+  cmp #(BUTTON_B)
+  bne CheckBContinue
+  rts
+CheckBContinue:
+  ldx code
+  cpx #$08
+  bne CheckBDone
+CheckBIncCode
+  inc code
+  rts
+CheckBDone:
+  ldx #$00
+  stx code
+  rts
+
+CheckA:
+  lda controller1
+  cmp #(BUTTON_A)
+  beq CheckAProcessStart
+  jsr CheckBlank
+  rts
+CheckAProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckADone
+  cmp #(BUTTON_A)
+  bne CheckAContinue
+  rts
+CheckAContinue:
+  cmp #$00
+  bne CheckADone:
+  ldx code
+  cpx #$09
+  bne CheckADone
+  jsr SwitchColors
+CheckADone:
+  ldx #$00
+  stx code
+  rts
+
+CheckAUp:
+  lda controller1
+  cmp #(BUTTON_A + BUTTON_UP)
+  beq CheckAUpProcessStart
+  jmp CheckAUpDone
+CheckAUpProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckAUpDone
+  cmp #(BUTTON_A + BUTTON_UP)
+  beq CheckAUpDone
+  lda #$2B ; +
+  ldx #$00
+  jsr WriteInstruction
+  jsr Inc16InstAddrOffset
+CheckAUpDone:
+  rts
+
+CheckADown:
+  lda controller1
+  cmp #(BUTTON_A + BUTTON_DOWN)
+  beq CheckADownProcessStart
+  jmp CheckADownDone
+CheckADownProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckADownDone
+  cmp #(BUTTON_A + BUTTON_DOWN)
+  beq CheckADownDone
+  lda #$2D ; -
+  ldx #$00
+  jsr WriteInstruction
+  jsr Inc16InstAddrOffset
+CheckADownDone:
+  rts
+
+CheckALeft:
+  lda controller1
+  cmp #(BUTTON_A + BUTTON_LEFT)
+  beq CheckALeftProcessStart
+  jmp CheckALeftDone
+CheckALeftProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckALeftDone
+  cmp #(BUTTON_A + BUTTON_LEFT)
+  beq CheckALeftDone
+  lda #$3C ; <
+  ldx #$00
+  jsr WriteInstruction
+  jsr Inc16InstAddrOffset
+CheckALeftDone:
+  rts
+
+CheckARight:
+  lda controller1
+  cmp #(BUTTON_A + BUTTON_RIGHT)
+  beq CheckARightProcessStart
+  jmp CheckARightDone
+CheckARightProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckARightDone
+  cmp #(BUTTON_A + BUTTON_RIGHT)
+  beq CheckARightDone
+  lda #$3E ; >
+  ldx #$00
+  jsr WriteInstruction
+  jsr Inc16InstAddrOffset
+CheckARightDone:
+  rts
+
+CheckBUp:
+  lda controller1
+  cmp #(BUTTON_B + BUTTON_UP)
+  beq CheckBUpProcessStart
+  jmp CheckBUpDone
+CheckBUpProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckBUpDone
+  cmp #(BUTTON_B + BUTTON_UP)
+  beq CheckBUpDone
+  lda #$2E ; .
+  ldx #$00
+  jsr WriteInstruction
+  jsr Inc16InstAddrOffset
+CheckBUpDone:
+  rts
+
+CheckBDown:
+  lda controller1
+  cmp #(BUTTON_B + BUTTON_DOWN)
+  beq CheckBDownProcessStart
+  jmp CheckBDownDone
+CheckBDownProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckBDownDone
+  cmp #(BUTTON_B + BUTTON_DOWN)
+  beq CheckBDownDone
+  lda #$2C ; ,
+  ldx #$00
+  jsr WriteInstruction
+  jsr Inc16InstAddrOffset
+CheckBDownDone:
+  rts
+
+CheckBLeft:
+  lda controller1
+  cmp #(BUTTON_B + BUTTON_LEFT)
+  beq CheckBLeftProcessStart
+  jmp CheckBLeftDone
+CheckBLeftProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckBLeftDone
+  cmp #(BUTTON_B + BUTTON_LEFT)
+  beq CheckBLeftDone
+  lda #$5B ; [
+  ldx #$00
+  jsr WriteInstruction
+  jsr Inc16InstAddrOffset
+CheckBLeftDone:
+  rts
+
+CheckBRight:
+  lda controller1
+  cmp #(BUTTON_B + BUTTON_RIGHT)
+  beq CheckBRightProcessStart
+  jmp CheckBRightDone
+CheckBRightProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckBRightDone
+  cmp #(BUTTON_B + BUTTON_RIGHT)
+  beq CheckBRightDone
+  lda #$5D ; ]
+  ldx #$00
+  jsr WriteInstruction
+  jsr Inc16InstAddrOffset
+CheckBRightDone:
+  rts
+
+CheckStart:
+  lda controller1
+  cmp #(BUTTON_START)
+  beq CheckStartProcessStart
+  jmp CheckStartDone
+CheckStartProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  bne CheckStartProcessContinue
+  jmp CheckStartDone
+CheckStartProcessContinue:
+  cmp #$00
+  beq CheckStartProcessContinue2
+  jmp CheckStartDone
+CheckStartProcessContinue2:
+  ldx screen
+  cpx #$02
+  bne CheckStartNot2
+  ldx #$00
+  stx screen
+  lda input
+  ldy #$00
+  sta (memoffset), Y
+  jsr Blank
+  lda #<(ProcessingText)
+  sta addr
+  lda #>(ProcessingText)
+  sta (addr + 1)
+  jsr NamDecompress
+  lda #<(InstructionBlank)
+  sta addr
+  lda #>(InstructionBlank)
+  sta (addr + 1)
+  jsr NamDecompress
+  jsr Blank
+  sta (addr + 1)
+  jsr NamDecompress
+  jsr ResetScroll
+  ldx #$01
+  stx screen
+  ldx #$02
+  stx interpret
+  jmp CheckStartDone
+CheckStartNot2:
+  cpx #$01
+  bne CheckStartNot1
+  ldx #$00
+  stx screen
+  jsr Blank
+  jsr ClearInstructions
+  lda #<(InstructionData)
+  sta addr
+  lda #>(InstructionData)
+  sta (addr + 1)
+  jsr NamDecompress
+  lda #<(ReadyText)
+  sta addr
+  lda #>(ReadyText)
+  sta (addr + 1)
+  jsr NamDecompress
+  jsr ResetScroll
+  jmp CheckStartDone
+CheckStartNot1:
+  cpx #$00
+  bne CheckStartDone
+  jsr Blank
+  lda #<(ScreenBlankData)
+  sta addr
+  lda #>(ScreenBlankData)
+  sta (addr + 1)
+  jsr NamDecompress
+  lda #<(ProcessingText)
+  sta addr
+  lda #>(ProcessingText)
+  sta (addr + 1)
+  jsr NamDecompress
+  jsr ResetScroll
+  ldx #$01
+  stx interpret
+  stx screen
+CheckStartDone:
+  rts
+
+CheckSelect:
+  lda controller1
+  cmp #(BUTTON_SELECT)
+  beq CheckSelectProcessStart
+  ldx #$00
+  stx del
+  jmp CheckSelectDone
+CheckSelectProcessStart:
+  lda controller1LastFrame
+  cmp #$FF
+  beq CheckSelectDone
+  cmp #$00
+  bne CheckSelectLastSelect
+  ldx #$01
+  stx del
+  sta frames
+  jmp CheckSelectLastBlank
+CheckSelectLastSelect:
+  cmp #(BUTTON_SELECT)
+  bne CheckSelectDone
+  ldx del
+  cpx #$01
+  bne CheckSelectDone
+  lda frames
+  clc
+  asl
+  cmp fps
+  bne CheckSelectDone
+  ldx #$01
+  stx cursorframe
+  lda fps
+  clc
+  lsr
+  lsr
+  lsr
+  lsr
+  sta tmp
+  lda frames
+  sec
+  sbc tmp
+  sta frames
+CheckSelectLastBlank:
+  lda #$00
+  ldx #$01
+  jsr WriteInstruction
+  jsr Dec16InstAddrOffset
+  ldx #$00
+  stx cursorframe
+  jsr BlinkCursor
+  jsr ResetScroll
+  lda #$00
+  tay ; Subscribe to @SwiftOnSecurity for Corn Facts
+  sta (instAddrOffset), Y
+CheckSelectDone:
+  rts
+
+CheckBlank:
+  ldx screen
+  cpx #$00
+  bne CheckBlankResetCode
+  ldx controller1
+  cpx #$00
+  beq CheckBlankDone
+CheckBlankUp:
+  cpx #(BUTTON_UP)
+  beq CheckBlankDone
+CheckBlankDown:
+  cpx #(BUTTON_DOWN)
+  beq CheckBlankDone
+CheckBlankLeft:
+  cpx #(BUTTON_LEFT)
+  beq CheckBlankDone
+CheckBlankRight:
+  cpx #(BUTTON_RIGHT)
+  beq CheckBlankDone
+CheckBlankB:
+  cpx #(BUTTON_B)
+  beq CheckBlankDone
+CheckBlankA:
+  cpx #(BUTTON_A)
+  beq CheckBlankDone
+CheckBlankResetCode:
+  ldx #$00
+  stx code
+CheckBlankDone:
+  rts
+
+DrawInput:
+  lda $2002
+  lda #$20
+  sta $2006
+  lda #$A9
+  sta $2006
+  ldx #$00
+  ldy input
+DrawInputLoop:
+  tya
+  and #%10000000
+  beq DrawInputLoopZero:
+  lda #$31
+  jmp DrawInputLoopEnd
+DrawInputLoopZero:
+  lda #$30
+DrawInputLoopEnd:
+  cpx inputpointer
+  bne DrawInputLoopNotSelected
+  clc
+  adc #$C0
+DrawInputLoopNotSelected:
+  sta $2007
+  inx
+  tya
+  asl
+  tay ; Subscribe to @SwiftOnSecurity for Corn Facts
+  cpx #$08
+  bne DrawInputLoop
+DrawInputDone:
+  jsr ResetScroll
+  rts
+
+FlipBit:
+  lda #%10000000
+  ldx #$00
+FlipBitLoop:
+  cpx inputpointer
+  beq FlipBitDone
+  inx
+  clc
+  lsr
+  jmp FlipBitLoop
+FlipBitDone:
+  eor input
+  sta input
+  jsr DrawInput
+  rts
+
+MoveBit:
+  cpx #$00
+  bne MoveBitRight
+  ldx inputpointer
+  cpx #$00
+  beq MoveBitDone
+  dec inputpointer
+  jmp MoveBitDraw
+MoveBitRight:
+  ldx inputpointer
+  cpx #$07
+  beq MoveBitDone
+  inc inputpointer
+MoveBitDraw:
+  jsr DrawInput
+MoveBitDone:
+  rts
+
+SwitchColors:
+  ldx background
+  cpx #$0F
+  beq SwitchColorsBlack
+  ldx #$0F
+  stx background
+  ldy #$10
+  sty foreground
+  jsr SetPalette
+  jmp SwitchColorsDone
+SwitchColorsBlack:
+  ldx #$30
+  stx background
+  ldy #$00
+  sty foreground
+  jsr SetPalette
+SwitchColorsDone:
+  rts
+
+WriteInstruction:
+  cpx #$01
+  beq WriteInstructionContinue
+  ldx (instAddrOffset + 1)
+  cpx #$06
+  bne WriteInstructionContinue
+  ldx instAddrOffset
+  cpx #$00
+  bne WriteInstructionContinue
+  jmp WriteInstructionDone
+WriteInstructionContinue:
+  ldy #$00
+  sta (instAddrOffset), Y
+  ldx $2002 ;read PPU to reset write toggle
+  ldx (cursoraddr + 1)
+  stx $2006
+  ldx cursoraddr
+  stx $2006
+  sta $2007
+  jsr ResetScroll
+WriteInstructionDone:
+  rts
+
+InitializeInstAddrOffset:
+  lda #$00
+  sta instAddrOffset
+  lda #$02
+  sta (instAddrOffset + 1)
+  rts
+
+Inc16InstAddrOffset:
+  ldx (instAddrOffset + 1)
+  cpx #$06
+  bne Inc16InstAddrOffsetContinue
+  ldx instAddrOffset
+  cpx #$00
+  beq Inc16InstAddrOffsetDone
+Inc16InstAddrOffsetContinue:
+  jsr IncColRow
+  lda instAddrOffset
+  clc
+  adc #$01
+  sta instAddrOffset
+  lda (instAddrOffset + 1)
+  adc #$00
+  sta (instAddrOffset + 1)
+Inc16InstAddrOffsetDone:
+  ldx #$00
+  stx cursorframe
+  stx frames
+  jsr BlinkCursor
+  jsr ResetScroll
+  rts
+
+AdjustCursorAddr:
+  lda col
+  clc
+  adc #$C2
+  sta cursoraddr
+  lda rowadjusted
+  asl
+  asl
+  asl
+  asl
+  asl
+  clc
+  adc cursoraddr
+  sta cursoraddr
+  lda #$00
+  adc #$00
+  tax
+  lda rowadjusted
+  lsr
+  lsr
+  lsr
+  clc
+  adc #$20
+  sta (cursoraddr + 1)
+  txa
+  adc (cursoraddr + 1)
+  sta (cursoraddr + 1)
+  rts
+
+IncColRow:
+  inc col
+  ldx col
+  cpx #$1C
+  bne IncColRowDone
+  ldx #$00
+  stx col
+  inc row
+  inc rowadjusted
+  ldx interpret
+  cpx #$01
+  beq IncColRowDone
+  ldx row
+  cpx #$13
+  bcc IncColRowDone
+  ldx #$F7
+  ldy #$01
+  jsr RedrawInstructions:
+  ldx #$12
+  stx rowadjusted
+IncColRowDone:
+  jsr AdjustCursorAddr
+  rts
+
+DecColRow:
+  dec col
+  ldx col
+  cpx #$FF
+  bne DecColRowDone
+  ldx #$1B
+  stx col
+  dec row
+  ldx row
+  stx rowadjusted
+  cpx #$12
+  bcc DecColRowDone
+  ldx #$14
+  ldy #$02
+  jsr RedrawInstructions
+  ldx #$12
+  stx rowadjusted
+DecColRowDone:
+  jsr AdjustCursorAddr
+  rts
+
+RedrawInstructions:
+  jsr Blank
+  stx tmp
+  lda instAddrOffset
+  sec
+  sbc tmp
+  sta instAddr
+  sty tmp
+  lda (instAddrOffset + 1)
+  sbc tmp
+  sta (instAddr + 1)
+  lda #$20
+  sta instScreenAddr
+  lda #$C2
+  sta (instScreenAddr + 1)
+  ldx #$1C
+RedrawInstructionsLoop:
+  lda $2002 ;read PPU to reset write toggle
+  lda instScreenAddr
+  sta $2006
+  lda (instScreenAddr + 1)
+  sta $2006
+RedrawInstructionsRowLoop:
+  lda instAddr 
+  cmp instAddrOffset
+  bne RedrawInstructionsContinue
+  lda (instAddr + 1)
+  cmp (instAddrOffset + 1)
+  beq RedrawInstructionsCleanLine
+RedrawInstructionsContinue:
+  ldy #$00
+  lda (instAddr), Y
+  sta $2007
+  lda instAddr
+  clc
+  adc #$01
+  sta instAddr
+  lda (instAddr + 1)
+  adc #$00
+  sta (instAddr + 1)
+  dex
+  cpx #$00
+  bne RedrawInstructionsRowLoop
+  ldx #$1C
+  lda (instScreenAddr + 1)
+  clc
+  adc #$20
+  sta (instScreenAddr + 1)
+  lda instScreenAddr
+  adc #$00
+  sta instScreenAddr
+  jmp RedrawInstructionsLoop
+RedrawInstructionsCleanLine:
+  lda instScreenAddr
+  cmp #$23
+  beq RedrawInstructionsDone
+  lda $2002
+  lda #$23
+  sta $2006
+  lda #$02
+  sta $2006
+  ldx #$1C
+  lda #$00
+RedrawInstructionsCleanLineLoop:
+  sta $2007
+  dex
+  cpx #$00
+  bne RedrawInstructionsCleanLineLoop
+RedrawInstructionsDone:
+  jsr ResetScroll
+  rts
+
+Dec16InstAddrOffset:
+  ldx (instAddrOffset + 1)
+  cpx #$02
+  bne Dec16InstAddrOffsetContinue
+  ldx instAddrOffset
+  cpx #$00
+  beq Dec16InstAddrOffsetDone
+Dec16InstAddrOffsetContinue:
+  jsr DecColRow
+  lda instAddrOffset
+  sec
+  sbc #$01
+  sta instAddrOffset
+  lda (instAddrOffset + 1)
+  sbc #$00
+  sta (instAddrOffset + 1)
+  lda #$00
+  ldx #$00
+  jsr WriteInstruction
+Dec16InstAddrOffsetDone:
+  rts
+
+ClearMemory:
+  ldx #00
+  txa
+ClearMemoryLoop:
+  sta $0600, x
+  sta $0700, x
+  inx
+  bne ClearMemoryLoop ;repeat until x rolls back to 0
+ClearMemoryDone:
+  rts
+
+ClearInstructions:
+  ldx #00
+  txa
+ClearInstructionsLoop:
+  sta $0200, x
+  sta $0300, x
+  sta $0400, x
+  sta $0500, x
+  inxuu
+  bne ClearInstructionsLoop ;repeat until x rolls back to 0
+ClearInstructionsDone:
+  rts
+
+Interpret:
+  lda interpret
+  cmp #$02
+  beq InterpretLoop
+  lda #$00
+  sta col
+  sta row
+  sta rowadjusted
+  sta instAddrOffset
+  sta memoffset
+  lda #$02
+  sta (instAddrOffset + 1)
+  lda #$06
+  sta (memoffset + 1)
+  jsr ClearMemory
+InterpretLoop:
+  ldy #$00
+  lda (instAddrOffset), Y
+  cmp #$00
+  bne InterpretLoopNotZero
+  jmp InterpretLoopDone
+InterpretLoopNotZero:
+  cmp #$2B
+  bne InterpretNotPlus
+  jsr InterpretPlus
+  jmp InterpretLoopEnd
+InterpretNotPlus:
+  cmp #$2D
+  bne InterpretNotMinus
+  jsr InterpretMinus
+  jmp InterpretLoopEnd
+InterpretNotMinus:
+  cmp #$3C
+  bne InterpretNotLeftAngle
+  jsr InterpretLeftAngle
+  jmp InterpretLoopEnd
+InterpretNotLeftAngle:
+  cmp #$3E
+  bne InterpretNotRightAngle
+  jsr InterpretRightAngle
+  jmp InterpretLoopEnd
+InterpretNotRightAngle:
+  cmp #$5B
+  bne InterpretNotOpen
+  jsr InterpretOpen
+  jmp InterpretLoopEnd
+InterpretNotOpen:
+  cmp #$5D
+  bne InterpretNotClose
+  jsr InterpretClose
+  jmp InterpretLoopEnd
+InterpretNotClose:
+  cmp #$2E
+  bne InterpretNotOutput
+  jsr InterpretOutput
+  jmp InterpretLoopEnd
+InterpretNotOutput
+  cmp #$2C
+  bne InterpretLoopEnd
+  jsr InterpretInput
+  lda instAddrOffset
+  clc
+  adc #$01
+  sta instAddrOffset
+  lda (instAddrOffset + 1)
+  adc #$00
+  sta (instAddrOffset + 1)
+  jmp InterpretDone
+InterpretLoopEnd:
+  ldx err
+  cpx #$01
+  beq InterpretLoopDone
+  lda instAddrOffset
+  clc
+  adc #$01
+  sta instAddrOffset
+  lda (instAddrOffset + 1)
+  adc #$00
+  sta (instAddrOffset + 1)
+  jmp InterpretLoop
+InterpretLoopDone:
+  ldx #$00
+  stx instAddrOffset
+  stx col
+  stx row
+  stx rowadjusted
+  ldx #$02
+  stx (instAddrOffset + 1)
+  ldx err
+  cpx #$01
+  beq InterpretDone
+  ldx #$00
+  stx interpret
+  jsr Blank
+  lda #<(FinishedText)
+  sta addr
+  lda #>(FinishedText)
+  sta (addr + 1)
+  jsr NamDecompress
+  lda #<(ContinueText)
+  sta addr
+  lda #>(ContinueText)
+  sta (addr + 1)
+  jsr NamDecompress
+  jsr ResetCursor
+  jsr ResetScroll
+InterpretDone:
+  rts
+
+InterpretPlus:
+  ldy #$00
+  lda (memoffset), Y
+  tax
+  inx
+  txa
+  sta (memoffset), Y
+  rts
+
+InterpretMinus:
+  ldy #$00
+  lda (memoffset), Y
+  tax
+  dex
+  txa
+  sta (memoffset), Y
+  rts
+
+InterpretLeftAngle:
+  lda memoffset
+  sec
+  sbc #$01
+  sta memoffset
+  lda (memoffset + 1)
+  sbc #$00
+  sta (memoffset + 1)
+  cmp #$05
+  bne InterpretLeftDone
+  ldx #$00
+  stx interpret
+  stx instAddrOffset
+  stx col
+  stx row
+  stx rowadjusted
+  ldx #$02
+  stx (instAddrOffset + 1)
+  ldx #$01
+  stx err
+  jsr Blank
+  lda #<(ErrorText)
+  sta addr
+  lda #>(ErrorText)
+  sta (addr + 1)
+  jsr NamDecompress
+  lda #<(MemPtrUnderflowText)
+  sta addr
+  lda #>(MemPtrUnderflowText)
+  sta (addr + 1)
+  jsr NamDecompress
+  lda #<(ContinueText)
+  sta addr
+  lda #>(ContinueText)
+  sta (addr + 1)
+  jsr NamDecompress
+  jsr ResetCursor
+  jsr ResetScroll
+InterpretLeftDone
+  rts
+
+InterpretRightAngle:
+  lda memoffset
+  clc
+  adc #$01
+  sta memoffset
+  lda (memoffset + 1)
+  adc #$00
+  sta (memoffset + 1)
+  cmp #$08
+  bne InterpretRightDone
+
+  ldx #$00
+  stx interpret
+  stx instAddrOffset
+  stx col
+  stx row
+  stx rowadjusted
+  ldx #$02
+  stx (instAddrOffset + 1)
+  ldx #01
+  stx err
+  jsr Blank
+  lda #<(ErrorText)
+  sta addr
+  lda #>(ErrorText)
+  sta (addr + 1)
+  jsr NamDecompress
+  lda #<(MemPtrOverflowText)
+  sta addr
+  lda #>(MemPtrOverflowText)
+  sta (addr + 1)
+  jsr NamDecompress
+  lda #<(ContinueText)
+  sta addr
+  lda #>(ContinueText)
+  sta (addr + 1)
+  jsr NamDecompress
+  jsr ResetCursor
+  jsr ResetScroll
+InterpretRightDone
+  rts
+
+InterpretOutput:
+  ldy row
+  cpy #$13
+  beq InterpretOutputDone
+  ldy #$00
+  lda (memoffset), Y
+  clc
+  cmp #$20
+  bcc InterpretOutputLessThan32
+  clc
+  cmp #$7F
+  bcs InterpretOutputGreaterThanEqual127
+  tay ; Subscribe to @SwiftOnSecurity for Corn Facts
+  jmp InterpretOutputPrintChar
+InterpretOutputLessThan32:
+  cmp #$0A
+  bne InterpretOutputNotNL
+  inc row
+  inc rowadjusted
+  lda #$00
+  sta col
+InterpretOutputIncRowDone:
+  jmp InterpretOutputDone
+InterpretOutputNotNL
+  cmp #$0D
+  bne InterpretOutputDone
+  lda #$00
+  sta col
+  jmp InterpretOutputDone
+InterpretOutputGreaterThanEqual127:
+  ldy #$7F
+InterpretOutputPrintChar:
+  jsr AdjustPrintAddr
+  jsr Blank
+  sta $2002
+  lda (printaddr + 1)
+  sta $2006
+  lda (printaddr)
+  sta $2006
+  sty $2007
+  jsr IncColRow
+InterpretOutputDone:
+  rts
+
+InterpretInput:
+  lda #$00
+  sta input
+  sta inputpointer
+  sta interpret
+  lda #$02
+  sta screen
+  jsr Blank
+  lda #<(InputText)
+  sta addr
+  lda #>(InputText)
+  sta (addr + 1)
+  jsr NamDecompress
+  lda #<(InputInstructionData)
+  sta addr
+  lda #>(InputInstructionData)
+  sta (addr + 1)
+  jsr NamDecompress
+  jsr DrawInput
+  jsr ResetScroll
+  rts 
+
+InterpretOpen:
+  lda #$00
+  sta square
+  sta (square + 1)
+  tay ; Subscribe to @SwiftOnSecurity for Corn Facts
+  lda (memoffset), Y
+  cmp #$00
+  bne InterpretOpenDone
+InterpretOpenLoop:
+  lda instAddrOffset
+  clc
+  adc #$01
+  sta instAddrOffset
+  lda (instAddrOffset + 1)
+  adc #$00
+  sta (instAddrOffset + 1)
+  cmp #$06
+  bne InterpretOpenLoopContinue
+
+  ldx #$00
+  stx interpret
+  stx instAddrOffset
+  stx col
+  stx row
+  stx rowadjusted
+  ldx #$02
+  stx (instAddrOffset + 1)
+  ldx #01
+  stx err
+  jsr Blank
+  lda #<(ErrorText)
+  sta addr
+  lda #>(ErrorText)
+  sta (addr + 1)
+  jsr NamDecompress
+  lda #<(NoMatchingRightText)
+  sta addr
+  lda #>(NoMatchingRightText)
+  sta (addr + 1)
+  jsr NamDecompress
+  lda #<(ContinueText)
+  sta addr
+  lda #>(ContinueText)
+  sta (addr + 1)
+  jsr NamDecompress
+  jsr ResetCursor
+  jsr ResetScroll
+  jmp InterpretOpenDone
+InterpretOpenLoopContinue:
+  ldy #$00
+  lda (instAddrOffset), Y
+  cmp #$5B
+  bne InterpretOpenLoopNotOpen
+  lda (square + 1)
+  clc
+  adc #$01
+  sta (square + 1)
+  lda square
+  adc #$00
+  sta square
+InterpretOpenLoopNotOpen:
+  cmp #$5D
+  bne InterpretOpenLoop
+  lda (square + 1)
+  sec
+  sbc #$01
+  sta (square + 1)
+  lda square
+  sbc #$00
+  sta square
+  cmp #$FF
+  bne InterpretOpenLoop
+InterpretOpenDone:
+  rts
+
+InterpretClose:
+  lda #$00
+  sta square
+  sta (square + 1)
+InterpretCloseLoop:
+  lda instAddrOffset
+  sec
+  sbc #$01
+  sta instAddrOffset
+  lda (instAddrOffset + 1)
+  sbc #$00
+  sta (instAddrOffset + 1)
+  cmp #$01
+  bne InterpretCloseLoopContinue
+
+  ldx #$00
+  stx interpret
+  stx instAddrOffset
+  stx col
+  stx row
+  stx rowadjusted
+  ldx #$02
+  stx (instAddrOffset + 1)
+  ldx #01
+  stx err
+  jsr Blank
+  lda #<(ErrorText)
+  sta addr
+  lda #>(ErrorText)
+  sta (addr + 1)
+  jsr NamDecompress
+  lda #<(NoMatchingLeftText)
+  sta addr
+  lda #>(NoMatchingLeftText)
+  sta (addr + 1)
+  jsr NamDecompress
+  lda #<(ContinueText)
+  sta addr
+  lda #>(ContinueText)
+  sta (addr + 1)
+  jsr NamDecompress
+  jsr ResetCursor
+  jsr ResetScroll
+  jmp InterpretCloseDone
+InterpretCloseLoopContinue:
+  ldy #$00
+  lda (instAddrOffset), Y
+  cmp #$5D
+  bne InterpretCloseLoopNotClose
+  lda (square + 1)
+  clc
+  adc #$01
+  sta (square + 1)
+  lda square
+  adc #$00
+  sta square
+InterpretCloseLoopNotClose:
+  cmp #$5B
+  bne InterpretCloseLoop
+  lda (square + 1)
+  sec
+  sbc #$01
+  sta (square + 1)
+  lda square
+  sbc #$00
+  sta square
+  cmp #$FF
+  bne InterpretCloseLoop
+  lda instAddrOffset
+  sec
+  sbc #$01
+  sta instAddrOffset
+  lda (instAddrOffset + 1)
+  sbc #$00
+  sta (instAddrOffset + 1)
+InterpretCloseDone:
+  rts
+
+AdjustPrintAddr:
+  lda col
+  clc
+  adc #$C2
+  sta printaddr
+  lda rowadjusted
+  asl
+  asl
+  asl
+  asl
+  asl
+  clc
+  adc printaddr
+  sta printaddr
+  lda #$00
+  adc #$00
+  tax
+  lda row
+  lsr
+  lsr
+  lsr
+  clc
+  adc #$20
+  sta (printaddr + 1)
+  txa
+  adc (printaddr + 1)
+  sta (printaddr + 1)
+  rts
+
+;set up and enable NMI
+EnableNMI:
+  lda #%10001000
+  sta $2000
+  rts
+
+;set up the PPU
+Draw:
+  lda #%00001010 ; Disabled sprites
+  sta $2001
+  rts
+
+AllowDraw:
+  lda #$01
+  sta drawAllowed
+  jsr EnableNMI
+  rts
+
+DisableNMI:
+  lda #$00
+  sta drawAllowed
+  sta $2000
+  rts
+
+Blank:
+  lda #$00
+  sta $2001    ; disable rendering
+  sta drawAllowed
+  jsr DisableNMI
+  rts
+
+;Update controller input and chack controller values
+Update:
+  jsr LatchController
+  jsr PollController
+  jsr CheckUp
+  jsr CheckDown
+  jsr CheckLeft
+  jsr CheckRight
+  jsr CheckA
+  jsr CheckB
+  jsr CheckStart
+  ldx screen
+  cpx #$00
+  bne UpdateDone
+  jsr CheckAUp
+  jsr CheckADown
+  jsr CheckALeft
+  jsr CheckARight
+  jsr CheckBUp
+  jsr CheckBDown
+  jsr CheckBLeft
+  jsr CheckBRight
+  jsr CheckSelect
+UpdateDone:
+  rts
+
+;; Load palette data
+LoadPalettes:
+  lda $2002 ;read PPU to reset write toggle
+  lda #$3f
+  sta $2006
+  lda #$00 ;point $2006 to the nametable (0x3F00)
+  sta $2006
+  ldx #$00 ;set to start of palette
+LoadPalettesLoop:
+  lda PaletteData, x ;loads a 32 byte palette
+  sta $2007
+  inx
+  cpx #$20
+  bne LoadPalettesLoop
+  rts
+
+ResetScroll:
+  lda #$00
+  sta $2005
+  sta $2005 ;Reset scroll by passing #$0000 to $2005
+  jsr AllowDraw
+  rts
+
+ResetCursor:
+  lda #$C2
+  sta cursoraddr
+  lda #$20
+  sta (cursoraddr) + 1
+  rts
+
+BlinkCursor:
+  ldx screen
+  cpx #$00
+  beq BlinkCursorContinue
+  dec frames
+  jmp BlinkCursorDone
+BlinkCursorContinue
+  lda $2002 ;read PPU to reset write toggle
+  lda (cursoraddr + 1)
+  sta $2006
+  lda cursoraddr
+  sta $2006
+  lda cursorframe
+  cmp #$00
+  bne BlinkCursorNot0
+  lda #$01
+  sta cursorframe
+  jmp BlinkCursorDraw
+BlinkCursorNot0:
+  lda #$00
+  sta cursorframe
+BlinkCursorDraw:
+  sta $2007
+BlinkCursorDone:
+  rts
+
+PaletteData:
+  .byte $0F, $0C, $30, $30
+  .byte $0F, $10, $30, $30
+  .byte $0F, $0C, $30, $30
+  .byte $0F, $0C, $30, $30
+  .byte $0F, $0C, $30, $30
+  .byte $0F, $0C, $30, $30
+  .byte $0F, $0C, $30, $30
+  .byte $0F, $0C, $30, $30
+
+DrawNewLine:
+  ldx widthOffset
+DrawNewLineLoop:
+  cpx width
+  beq DrawNewLineDone
+  ;; Continue if widthOffset is not width
+  inx
+  lda #$00
+  sta $2007
+  jmp DrawNewLineLoop
+DrawNewLineDone:
+  dex
+  stx widthOffset
+  rts
+
+;; Nametable decompression algorithm
+NamDecompress:
+  lda $2002 ;read PPU to reset write toggle
+  ldy #$00
+  ;; Reinitialize two/Ct/St to 0
+  sty twoCt
+  sty twoSt
+  sty widthOffset
+  lda (addr), y
+  sta width
+  iny
+  lda (addr), y
+  sta height
+  iny
+  lda (addr), y
+  sta drawAddr
+  sta $2006
+  iny
+  lda (addr), y
+  sta (drawAddr + 1)
+  sta $2006
+  iny
+  tya
+  clc
+  adc addr
+  sta addr
+  lda (addr + 1)
+  adc #$00
+  sta (addr + 1)
+NamDecompressLoop:
+  ;; Load instruction pointer to y
+  ldy #$00
+  ;; Load addr[y] to A
+  lda (addr), y
+  cmp #$02
+  bne NamDecompressNot2
+  ;; Continue if A is 2
+  ldx twoSt
+  cpx #$00
+  bne NamDecompress2Back
+  ;; Continue if twoSt is 0
+  iny
+  lda (addr), y
+  cmp #$02
+  bne NamDecompress2Init
+  sta $2007 ;; Print 2
+  jmp NamDecompress2Done
+NamDecompress2Init:
+  dec widthOffset
+  ldx #$01
+  stx twoSt ;; Start two loop
+  lda (addr), y
+  sta twoCt ;; Set two count
+  jmp NamDecompress2Done
+NamDecompress2Back:
+  dec widthOffset
+  dec twoCt
+  ldx twoCt
+  cpx #$00
+  bne NamDecompress2BackLoop
+  ;; Continue if twoCt is 0
+  ldx #$00
+  stx twoSt
+  jmp NamDecompress2Done
+NamDecompress2BackLoop:
+  sec
+  lda addr
+  sbc #$01
+  sta addr
+  lda (addr + 1)
+  sbc #$00
+  sta (addr + 1)
+  lda (addr), y
+  cmp #$02
+  bne NamDecompress2BackLoop
+  ;; Continue if addr[y] is 02
+  iny
+  lda (addr), y
+  jmp NamDecompress2Done
+NamDecompress2Done:
+  jmp NamLoopDone
+NamDecompressNot2:
+  cmp #$00
+  bne NamDecompressPrintValue
+  jsr DrawNewLine
+  jmp NamLoopDone
+NamDecompressPrintValue:
+  sta $2007
+NamLoopDone:
+  iny
+  tya
+  clc
+  adc addr
+  sta addr
+  lda (addr + 1)
+  adc #$00
+  sta (addr + 1)
+  inc widthOffset
+  ldx widthOffset
+  cpx width
+  beq NamDecompressEndOfLine
+  ;; Continue if widthOffset is not width
+  jmp NamDecompressLoop
+NamDecompressEndOfLine:
+  ;; Continue if widthOffset is width
+  lda $2002 ;read PPU to reset write toggle
+  ldx #$00
+  stx widthOffset
+  clc
+  lda (drawAddr + 1)
+  adc #$20
+  sta (drawAddr + 1)
+  lda drawAddr
+  adc #$00
+  sta drawAddr
+  sta $2006
+  lda (drawAddr + 1)
+  sta $2006
+  dec height
+  ldx height
+  cpx #$00
+  beq NamDecompressDone
+  ;; Continue if height is not 0
+  jmp NamDecompressLoop
+NamDecompressDone:
+  rts
+
+SetAttribute:
+  lda $2002 ;read PPU to reset write toggle
+  lda #$23
+  sta $2006
+  lda #$C0
+  sta $2006
+  lda #$00
+  tax
+SetAttributeLoop:
+  sta $2007
+  inx
+  cpx #$20
+  bne SetAttributeLoop
+  rts
+
+SetPalette:
+  lda $2002 ;read PPU to reset write toggle
+  lda #$3f
+  sta $2006
+  lda #$00 ;point $2006 to the nametable (0x3F00)
+  sta $2006
+  txa
+  ldx #$08
+SetPaletteLoop:
+  sta $2007
+  sty $2007
+  sty $2007
+  sty $2007
+  dex
+  cpx #$00
+  bne SetPaletteLoop
+  jsr ResetScroll
+  rts
+  
+AttributesSlides:
+  .byte $00, $00, $00, $00, $00, $00, $00, $00
+  .byte $00, $55, $55, $55, $55, $55, $55, $00
+  .byte $00, $55, $55, $55, $55, $55, $55, $00
+  .byte $00, $55, $55, $55, $55, $55, $55, $00
+  .byte $00, $55, $55, $55, $55, $55, $55, $00
+  .byte $00, $55, $55, $55, $55, $55, $55, $00
+  .byte $00, $00, $00, $00, $00, $00, $00, $00
+  .byte $00, $00, $00, $00, $00, $00, $00, $00
+
+BlankMap:
+  .byte $20, $1E, $20, $00
+  .byte $02, $1E, $00, $02
+
+TopData:
+  .byte $1C, $01, $20, $42
+  .byte $10, $11, $12, $13, $14, $A0, $A1, $A2, $A3, $A4, $A5, $A6, $A7, $A8, $A9
+  .byte $02, $05, " ", $02
+  .byte $18, $19, $1A, $1B, $1C, $1D, $1E, $1F
+
+GreyBadgeComData:
+  .byte $07, $01, $20, $77
+  .byte $09, $0A, $0B, $0C, $0D, $0E, $0F
+
+InstructionData:
+  .byte $1A, $02, $23, $43
+  .byte $80, $82, ":+ ", $80, $83, ":- ", $80, $84, ":< ", $80, $85, ":>"
+  .byte " ", $86, $87, $88, ":", $90, $91
+  .byte $81, $82, ":. ", $81, $83, ":, ", $81, $84, ":[ ", $81, $85, ":]"
+  .byte " ", $89, $8A, $8B, ":", $92, $93
+
+InputInstructionData:
+  .byte $1A, $02, $23, $43
+  .byte $82, "/", $83, ":", $8C, $8D, $8E, $8F
+  .byte $02, $0A, " ", $02, $86, $87, $88, ":", $94, $95, $96, $97
+  .byte $84, "/", $85, ":", $9C, $9D, $8E, $8F, $00
+
+ReadyText:
+  .byte $1C, $14, $20, $A2
+  .byte "READY", $02, $14, $00, $02
+
+InputText:
+  .byte $1C, $01, $20, $A2
+  .byte "INPUT:", $00
+
+FinishedText:
+  .byte $1C, $01, $20, $A2
+  .byte "FINISHED", $00
+
+ContinueText:
+  .byte $1C, $02, $23, $42
+  .byte $02, $13, " ", $02
+  .byte $86, $87, $88, ":", $94, $98, $99, $9A, " ", $00
+
+ScreenBlankData:
+  .byte $1C, $16, $20, $C2
+  .byte $02, $16, $00, $02
+
+InstructionBlank:
+  .byte $1A, $02, $23, $43
+  .byte $00, $00
+
+ProcessingText:
+  .byte $1C, $01, $20, $A2
+  .byte "PROCESSING", $02, $17, $00, $02
+
+ErrorText:
+  .byte $1C, $01, $20, $A2
+  .byte "ERROR", $00
+
+NoMatchingLeftText:
+  .byte $1C, $13, $20, $C2
+  .byte "NO MATCHING [ INSTRUCTION", $02, $13, $00, $02
+
+NoMatchingRightText:
+  .byte $1C, $13, $20, $C2
+  .byte "NO MATCHING ] INSTRUCTION", $02, $13, $00, $02
+
+MemPtrUnderflowText:
+  .byte $1C, $13, $20, $C2
+  .byte "MEMORY POINTER OUT OF BOUNDS"
+  .byte "(-1)", $02, $12, $00, $02
+
+MemPtrOverflowText:
+  .byte $1C, $13, $20, $C2
+  .byte "MEMORY POINTER OUT OF BOUNDS"
+  .byte "(513)", $02, $12, $00, $02
+
+  ; Create special PRG interrupt vectors for NROM-128
+  .pad  $BFF9
+  .dw   NMI
+  .dw   RESET
+  .dw   0
+
+  ; Set 8KB CHR to $C000-$DFFF to allow the ROM to work as NROM-128 ROM as well
+  .incbin "graphics/tileset.chr"
+
+  .byte "["
+  .pad $E010
+  .incbin "dc26.zip"
+
+  .byte "]]]]]]]["
+
+  ; Create PRG interrupt vectors for NROM-256
+  .org  $FFFA
+  .dw   NMI ;(NMI_Routine)
+  .dw   RESET ;(Reset_Routine)
+  .dw   0 ;(IRQ_Routine)
+
+  .base $0000
+  .incbin "graphics/tileset.chr"
diff --git a/src/dc26.bf b/src/dc26.bf
new file mode 100644
index 0000000..e813bee
--- /dev/null
+++ b/src/dc26.bf
@@ -0,0 +1 @@
+>++[-<+>>++<]>[-<+>>++<]>[-<+>>++<]>[-<+>>++<]>[-<+>>++<]>[-<+>>++<]>[-<+>>++<]>[-]<<[-]<[->>>+>+>>+>>+>+>+>+>>>+>+>+>+>>>>>+>+>+>+>+>+>+>+>+>+>+>+>>>>>>+>+>+>+>+>+>+>+>+<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<]<[->>>+>>+>+>>>>+>>+>+>+>>+>+>+>+>+>+>+>>>>>>>>>+>+>+>+>+>+>+>+>+>>>>>>+>+>+>+<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<]<[->>>>>+>+>>+>>>>>>>+>>>>+>>>+>+>>>>>>+>+>+>>>+>+>>>+>+>+>>>+>+>+<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<]<[->>>>>>+>+>+>+>+>>>>+>+>>>>+>>+>+>>>>>>+>+>>>+>>+>>+>>+>>>+>>+>>>>>>>+<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<]<[->>>>>>>+>+>+>+>>+>+>+>>+>>>+>+>>>+>>+>>>+>+>+>>+>>>+>+>>+>>>+>>>>>>+>>>+<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<]<[->>>>>>>>+>>+>>+>+>>>>+>+>+>>+>+>>>>+>>+>>>+>+>+>>+>+>>>+>>>>>>>>+>>>>+<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<]>>>>>>>>+>>+>>>+>+>+>+>>>+>>>>+>+>>>>>>+>+>>>+>+>+>>+>+>>+>+>>+>+>>+>>>+>+<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<..>.....<..>......<.>......<.>.....<.>....<..>.<...>.<.>...<...>..>>>>.<<<<<.>>.<<..>..<.>>>>.<<.<<..>....>.<<..>....>>.<<<.>....>>.<<<.>..<.>>>>.<<.<<.>>>>.<<<<.>>.<<.>>.<..<.>>>>.<<<<.>>>.<<<.>>>.>>.<<<<<.>>.<<.>>.<<..>>.<<.>>.<<.>>.<..<..>>.<<.>>.<..<.>>.<<.>>.<<...>>.<<.>>.<<..>>.<<.>>.<<..>>>>.<<.<<.>>.<<..>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<.>>>.<<<.>>>.<<.>>>>.<<<<<.>>.<<.>>.<<..>>.<<.>>.<<..>..>.<<.>>.<<..>..>..<<.>>.<<...>>.<<.>>.<<..>>.<<.>>.<<.>>>>>>>>>>.<<<<<<<<<<.>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<.>>.<<.>>>.<<<.>>>.<<<.>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<.<.>>>>.>.<<<<<.>>.<<.>>.<..>.<<.>>.<<.>>.<....>.<<.>>.<<...>>.<<.>>.<...>.<<.>>.<..>.<<.>>.<<.>>.>>.<<<<..>>.>.<<<.>>>.<.<<.>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<.>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<.>>.>>>.<<<<<.>>.<.....>>.<.<......>.<.>.<<....>>>>.<<<.....>>>.<<<....>>.<.<.>.<<.>>>>.<<<.>.<....>>>.<<<...>>.>>.<<<<<.>>>>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<.<.>>>>>>>>.<<.>>.>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<.<<<<<<<.<<<<<<<<<<<.>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<.>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<.>>>>>>>>>>>>>>>>>>>>>.>.<<<<<<<<<<<<<<<.<.<<<<<<<<<<<<<.>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<<<<<<<<.<<<<<<.>>>>>.>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<.>>>>>>>>.>>>>>.<<<<.>>>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<<<<<.>>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<.<<<<<<<<<<<<<<..............>>>>>>>>>>>.>>>>>>>.>>>>>>>>>>>>>>>>.>>.<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<.<<<<<.>>>>>>.>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<.>>>>>>>>>>>>>>>>>>>.<<<<<<.>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<.<<<<<<<<<<<<<<<<.>>.>>.>>.>>>>>>>>>>>>.<.<<<<<<<<<<<<<<<<<<<<<<<...........................>>>>>>>>>>>>>>>>>>>>>>>>>>.>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<.>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<.>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<.>>.>>>>>>>>>>>>.<.<<<<<<<<<<<<<<<<<<.<<<<<.>>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<.>>>>>>>>>.<<<<<<<<.>>>>>>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<.>>>>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<.>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>.<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<.<<<<<<<.............................>>>>>>>>>>>>>>>>>>>>.>>>>>>.<<<<<<<<<<<<<<<<<.<<<.>>>>>>>>>.<<<<<<<<.>>>>>>>>>>>>>>>>>>>>>>>>.>>>>>>>>>>.<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<.>>>>>>>>>>>>>>>>>>>>>.>>>>>>>>>>>>>>>>>.
diff --git a/src/dc26.zip b/src/dc26.zip
new file mode 100644
index 0000000..563c017
Binary files /dev/null and b/src/dc26.zip differ
diff --git a/src/graphics/tileset.chr b/src/graphics/tileset.chr
new file mode 100644
index 0000000..1986a6b
Binary files /dev/null and b/src/graphics/tileset.chr differ