jrenaud/hello-world
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge pull request #84 from Bevilacqua/master

Browse Source 
DCPU-16
This commit is contained in:
Mike Donaghy
2014-06-20 02:11:11 -04:00
parent 436ead1e34 c7bb593b23
commit bc0638eb01
2 changed files with 46 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

45
DCPU16.dasm16 Normal file
View File

@@ -0,0 +1,45 @@
;;;;;;;;;;;;;;;;;;;
jsr init_devices
jsr Hello_World
set PC,end
;;;;;;;;;;;;;;;;;;;
:dev_screen dat 0
:device_count dat 0
;;;;;;;;;;;;;;;;;;;
:find_devices
hwn [device_count]
set I,0
:find_devices_loop
hwq i
ife A,0xf615
set [dev_screen],1
add I,1
ifn I,device_count
set PC,find_devices_loop
set PC,pop
:init_devices
jsr find_devices
;set up display
set A,0
set B,0x8000
hwi [dev_screen]
set PC,pop
:Hello_World
set [0x8000],0x1048
set [0x8001],0x1065
set [0x8002],0x106c
set [0x8003],0x106c
set [0x8004],0x106f
set [0x8005],0x102c
set [0x8006],0
set [0x8007],0x1077
set [0x8008],0x106f
set [0x8009],0x1072
set [0x800a],0x106c
set [0x800b],0x1064
set [0x800c],0x1021
set PC,pop
:end
set PC,end

1
brainfck.bf Normal file
View File

@@ -0,0 +1 @@
++++++++++[>+++++++>++++++++++>+++>+<<<<-]>++.>+.+++++++..+++.>++.<<+++++++++++++++.>.+++.------.--------.>+.>.