new file mode 100644

@@ -0,0 +1,43 @@

+; Author: Pawel Jablonski

+; E-mail: pj@xirx.net

+; WWW: xirx.net

+; GIT: git.xirx.net

+;

+; License: You can use this code however you like

+; but leave information about the original author.

+; Code is free for non-commercial and commercial use.

+

+map ../../../bin/rom/rom.map

+

+; Start message

+const messageArgs "Typed arguments:"

+

+; First label is the entry point

+.entry:

+	call .main

+	ret

+

+; Arguments

+;	X - Arguments address low

+;	Y - Arguments address high

+; No return

+.main:

+	push A

+	push X

+	push Y

+	; Load address to start message

+	mov low(*messageArgs), X

+	mov high(*messageArgs), Y

+	; Print start message

+	call .xStringPrint

+	pop Y

+	pop X

+	call .xStringNewLine

+	call .xStringNewLine

+	mov '"', A

+	call .xStringPrintChar

+	; Print arguments

+	call .xStringPrint

+	call .xStringPrintChar

+	pop A

+	ret