fork download

copy

; Assembler test for DCPU
; by Markus Persson
 
             set a, 0xbeef                        ; Assign 0xbeef to register a
             set (0x1000), a                      ; Assign memory at 0x1000 to value of register a
             ifn a, (0x1000)                      ; Compare value of register a to memory at 0x1000 ..
                 set PC, end                      ; .. and jump to end if they don't match
 
             set i, 0                             ; Init loop counter, for clarity
:nextchar    ife (data+i), 0                      ; If the character is 0 ..
                 set PC, end                      ; .. jump to the end
             set (0x8000+i), (data+i)             ; Video ram starts at 0x8000, copy char there
             add i, 1                             ; Increase loop counter
             set PC, nextchar                     ; Loop
 
:data        dat "Hello_world!", 0                ; Zero terminated string
 
:end         sub PC, 1                            ; Freeze the CPU forever

prog.asm:4: error: parser: instruction expected
prog.asm:5: error: symbol `set' redefined
prog.asm:5: error: parser: instruction expected
prog.asm:6: error: parser: instruction expected
prog.asm:7: error: symbol `set' redefined
prog.asm:7: error: parser: instruction expected
prog.asm:9: error: symbol `set' redefined
prog.asm:9: error: parser: instruction expected
prog.asm:10: error: label or instruction expected at start of line
prog.asm:11: error: symbol `set' redefined
prog.asm:11: error: parser: instruction expected
prog.asm:12: error: symbol `set' redefined
prog.asm:12: error: parser: instruction expected
prog.asm:14: error: symbol `set' redefined
prog.asm:14: error: parser: instruction expected
prog.asm:16: error: label or instruction expected at start of line
prog.asm:18: error: label or instruction expected at start of line

Standard output is empty