RE: A83: Beep routine >> TI82

To: assembly-83@lists.ticalc.org
Subject: RE: A83: Beep routine >> TI82
From: Sebastiaan Roodenburg <sebastiaan@rimsystems.nl>
Date: Sun, 3 Sep 2000 21:24:34 +0200
Reply-To: assembly-83@lists.ticalc.org


Well i don't have a Ti82... The only part of the routine what i'm not 100%
sure about is the port-number of the link port ("out (0),a")... the rest
sould work.... 

BTW. why are those pop's there??????

-----Oorspronkelijk bericht-----
Van: D Weiss [mailto:dwedit@hotmail.com]
Verzonden: zondag 3 september 2000 19:05
Aan: assembly-83@lists.ticalc.org
Onderwerp: A83: Beep routine >> TI82



Does this code need to be changed for the TI82:

;---------= 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
	pop hl
	pop de
	pop bc
	ret

_________________________________________________________________________
Get Your Private, Free E-mail from MSN Hotmail at http://www.hotmail.com.

Share information about yourself, create your own public profile at 
http://profiles.msn.com.