new file mode 100644

@@ -0,0 +1,63 @@

+; 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.

+

+include io.asm

+

+; No arguments

+; No return

+external .xLedRunOff:

+	push A

+	; Set led register

+	mov 1, A

+	call .xIOSetRegister

+	; Write run led off command

+	mov 0, A

+	call .xIOWriteLowHalf

+	pop A

+	ret

+	

+; No arguments

+; No return

+external .xLedRunOn:

+	push A

+	; Set led register

+	mov 1, A

+	call .xIOSetRegister

+	; Write run led on command

+	mov 1, A

+	call .xIOWriteLowHalf

+	pop A

+	ret

+

+; No arguments

+; No return

+external .xLedErrorOff:

+	push A

+	; Set led register

+	mov 1, A

+	call .xIOSetRegister

+	; Write error led off command

+	mov 2, A

+	call .xIOWriteLowHalf

+	pop A

+	ret

+	

+; No arguments

+; No return

+external .xLedErrorOn:

+	push A

+	; Set led register

+	mov 1, A

+	call .xIOSetRegister

+	; Write error led on command

+	mov 3, A

+	call .xIOWriteLowHalf

+	pop A

+	ret

+