digital-library-project-2.solution.txt

PB016
FIRST TRY
GRAB 300
MARK LOOKUP
COPY F X
REPL SPAWN
JUMP LOOKUP
MARK SPAWN
DIVI X 100 T
SWIZ X 0021 X
ADDI X 200 X
ADDI T 1 T
MARK INDEX
LINK 800
SUBI T 1 T
TJMP INDEX
REPL BURNER
GRAB X
MARK READER
TEST EOF
TJMP ENDFILE
COPY F M
JUMP READER
MARK ENDFILE
COPY 0 M
HALT
MARK BURNER
MAKE
MARK BYTE
COPY M T
FJMP GTDO
COPY T F
JUMP BYTE
MARK GTDO
LINK -1
JUMP GTDO