Uncommitted changes
This commit is contained in:
@ -40,7 +40,7 @@ Snd_beep:
|
||||
ld a,%00001000
|
||||
out (SND_DATA_REG),a
|
||||
; wait
|
||||
ld bc, (TIME_DUR_MILLIS * 100)
|
||||
ld bc, (TIME_DUR_MILLIS * 10)
|
||||
call Time_delay55
|
||||
; silence ch1
|
||||
ld a,%10011111
|
||||
|
@ -1,14 +1,16 @@
|
||||
; Time library
|
||||
; @author Daniele Verducci
|
||||
|
||||
|
||||
; Duration in cpu cycles / 55 (change these values based on CPU frequency)
|
||||
TIME_DUR_SECOND: EQU 2545
|
||||
TIME_DUR_MILLIS: EQU 3
|
||||
TIME_DUR_SECOND: EQU 1818
|
||||
TIME_DUR_MILLIS: EQU 2
|
||||
|
||||
; Wait bc * 55 states
|
||||
; Use 1 iteration as delay between I/O bus writes
|
||||
; @param bc The number of iterations. Each iteration is 55 states long.
|
||||
Time_delay55:
|
||||
ret
|
||||
bit 0,a ; 8
|
||||
bit 0,a ; 8
|
||||
bit 0,a ; 8
|
||||
|
Reference in New Issue
Block a user