**************************
*** ESTIENNE Sebastien ***
***        2004        ***
**************************

******************************
***   Function drawEmpty   ***
******************************
drawEmpty
		move.l		#twhite,-(A7)	; empile coul texte
		move.l		#fblue,-(A7)	; empile coul fond
		bsr		setColor	; appel de setColor
		add.l		#8,A7		; on depile
		move.b		#' ',-(A7)	; empile char ' '
		bsr		putChar		; appel de putChar
		add.l		#2,A7		; depile
		rts
fdrawEmpty



******************************
***   Function DrawGhost   ***
******************************
drawGhost
		move.l		#tred,-(A7)	; empile coul texte
		move.l		#fblue,-(A7)	; empile coul fond
		bsr		setColor	; appel de setColor
		add.l		#8,A7		; on depile
		move.b		#'@',-(A7)	; empile char '@'
		bsr		putChar		; appel de putChar
		add.l		#2,A7		; depile
		rts
fdrawGhost



*****************************
***   Function DrawHero   ***
*****************************
drawHero
		move.l		#twhite,-(A7)	; empile coul texte
		move.l		#fblue,-(A7)	; empile coul fond
		bsr		setColor	; appel de setColor
		add.l		#8,A7		; on depile
		move.b		#'o',-(A7)	; empile char 'o'
		bsr		putChar		; appel de putChar
		add.l		#2,A7		; depile
		rts
fdrawHero



*****************************
***   Function DrawWall   ***
*****************************
drawWall
		move.l		#tmagenta,-(A7)	; empile coul texte
		move.l		#fblue,-(A7)	; empile coul fond
		bsr		setColor	; appel de setColor
		add.l		#8,A7		; on depile
		move.b		#'#',-(A7)	; empile char '#'
		bsr		putChar		; appel de putChar
		add.l		#2,A7		; depile
		rts
fdrawWall



*****************************
***   Function DrawTrap   ***
*****************************
drawTrap
		move.l		#tred,-(A7)	; empile coul texte
		move.l		#fblue,-(A7)	; empile coul fond
		bsr		setColor	; appel de setColor
		add.l		#8,A7		; on depile
		move.b		#'+',-(A7)	; empile char '+'
		bsr		putChar		; appel de putChar
		add.l		#2,A7		; depile
		rts
fdrawTrap



*****************************
***   Function DrawLife   ***
*****************************
drawLife
		move.l		#tgreen,-(A7)	; empile coul texte
		move.l		#fblue,-(A7)	; empile coul fond
		bsr		setColor	; appel de setColor
		add.l		#8,A7		; on depile
		move.b		#'%',-(A7)	; empile char '%'
		bsr		putChar		; appel de putChar
		add.l		#2,A7		; depile
		rts
fdrawLife



****************************
***   Function DrawKey   ***
****************************
drawKey
		move.l		#tgreen,-(A7)	; empile coul texte
		move.l		#fblue,-(A7)	; empile coul fond
		bsr		setColor	; appel de setColor
		add.l		#8,A7		; on depile
		move.b		#'$',-(A7)	; empile char '$'
		bsr		putChar		; appel de putChar
		add.l		#2,A7		; depile
		rts
fdrawKey



****************************
***   Function DrawSand   ***
****************************
drawSand
		move.l		#tgreen,-(A7)	; empile coul texte
		move.l		#fblue,-(A7)	; empile coul fond
		bsr		setColor	; appel de setColor
		add.l		#8,A7		; on depile
		move.b		#'&',-(A7)	; empile char '&'
		bsr		putChar		; appel de putChar
		add.l		#2,A7		; depile
		rts
fdrawSand