basm 0.5.0

z80 assembler relying on cpclib-asm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

	;;
	; The function `name` takes 2 arguments arg1 and arg2, 
	; uses a local variable
	; and returns a value (the sum of the two arguments)
	FUNCTION name, arg1, arg2, arg3

		IF {arg3} > 0
                  local1 = {arg1} + {arg2}
		ELSE
                  local1 = {arg1} - {arg2}
		ENDIF

		IF {arg1} > 2
			return local1
		ENDIF

		
	ENDFUNCTION
	
	; Use the function name XXX Fail because of no return
	ld a, name(0, 1, 2)