;; File: putchar.s
;; Modified to suit execution on the Amstrad CPC
;; by H. Hansen 2003
;; Original lines has been marked out!

		.area _CODE
_putchar::       
_putchar_rr_s:: 
        ld      hl,#2
        add     hl,sp
        
        ld      a,(hl)
;;      ld      a,#1
;;      rst     0x08
        call	0xBB5A
        ret
           
_putchar_rr_dbs::

;;      ld      l,e
;;		ld		a,#1
;;      rst     0x08

        ld		a,e
        call	0xBB5A
        ret