2 BEEPs in one
ZXNet echo conference «code.zx»
From Kirill Frolov → To All 2 July 1998
├┤!, All !
Here's a small squeaker. She beeps 2 sounds at once.
Someone here was interested in touch tone dialing
numbers - I think they can be adapted to XTR and Wikomnik.
How it works (squeaker) I have no idea! Because torn out
seems to be from WHAM and a very long time ago. If necessary, tone frequencies
I can give you a set.
D.I.
LD BC,#10FE ; this is port and bit
LD IX,#2030 ; frequencies
LD HL,0
PUSH IX: POP DE
L1 LD A,H : AND L
OUT(C),A
DEC E : JP NZ,L2
LD E,XL : LD A,H
XOR B : LD H,A
L2 DEC D : JP NZ,L3
LD D,XH : LD A,L
XOR B : LD L,A
L3 LD A,H : OR L
OUT(C),A
IN A,(C) ; waiting for the button
RRA : JP C,L1
EI: RET
Viz best vischez, FK0.