Difference between revisions of "Z80 Routines:Sound:Beep"

From WikiTI
Jump to: navigation, search
 
(categories)
Line 1: Line 1:
By Joe Wingbermuehle (joewing@calc.org). This routine was written for the ZLib library for the SOS shell.
+
[[Category:Z80 Routines:Sound|beep]]
 +
[[Category:Z80 Routines|beep]]
 +
 
 +
By Joe Wingbermuehle (joewing@calc.org). This routine was written for the ZLib library for the SOS  
 +
shell.
  
 
  <nowiki>
 
  <nowiki>

Revision as of 05:37, 13 July 2005


By Joe Wingbermuehle (joewing@calc.org). This routine was written for the ZLib library for the SOS shell.

;---------= Make a sound =---------
; c=frequency, b=duration
beep:	di
	ld	e,$D0
beepl1:	ld	a,c
beepl2:	dec	a
	jr	nz,beepl2
	ld	a,e
	xor	%00000011
	ld	e,a
	out	(0),a
	djnz	beepl1
	ei
error:	ret