falso
/
z80
mirror of https://github.com/falsovsky/z80.git
1
0
Fork 0
Code Issues Releases Wiki Activity

Better example

This commit is contained in:
Pedro de Oliveira 2014-08-14 06:42:02 +01:00
parent 40308c5200
commit ca7f9fce8c
2 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
zx-brainfuck/main.asm
View File

@ -39,7 +39,9 @@ tbl_routines dw F_INC_DP, F_DEC_DP, F_INC_VAL, F_DEC_VAL, F_OUT, F_IN, F_JMP
; To test the "," operator
;src db "++++++++++>+[,<.>.]", 0
; Bad Boy Hello world - crashes most interpreters
src db ">++++++++[<+++++++++>-]<.>>+>+>++>[-]+<[>[->+<<++++>]<<]>.+++++++..+++.>>+++++++.<<<[[-]<[-]>]<+++++++++++++++.>>.+++.------.--------.>>+.>++++.", 0
;src db ">++++++++[<+++++++++>-]<.>>+>+>++>[-]+<[>[->+<<++++>]<<]>.+++++++..+++.>>+++++++.<<<[[-]<[-]>]<+++++++++++++++.>>.+++.------.--------.>>+.>++++.", 0
; Fibonacci numbers
src db ">++++++++++>+>+[[+++++[>++++++++<-]>.<++++++[>--------<-]+<<<]>.>>[[-]<[>+<-]>>[<<+>+>-]<[>+<-[>+<-[>+<-[>+<-[>+<-[>+<-[>+<-[>+<-[>+<-[>[-]>+>+<<<-[>+<-]]]]]]]]]]]+>>>]<<<]", 0
start

BIN
zx-brainfuck/main.tap
View File

Binary file not shown.