Apple-2-SW/emailler
1
0
Fork 0
mirror of https://github.com/bobbimanners/emailler.git synced 2024-11-17 15:07:30 +00:00
Code Issues Projects Releases Wiki Activity

EDIT: Corrected beep() sound to be more reasonable

Browse Source
This commit is contained in:
Bobbi Webber-Manners 2020-08-05 00:58:30 -04:00
parent 29acbd680e
commit 56a9b9b187
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
apps/edit.c
View File

@ -5,7 +5,6 @@
// Note: Use my fork of cc65 to get a flashing cursor!! // Note: Use my fork of cc65 to get a flashing cursor!!
// TODO: Adjust beep() sound
// TODO: Make use of aux mem // TODO: Make use of aux mem
#include <conio.h> #include <conio.h>
@ -86,9 +85,9 @@ void beep(void) {
uint8_t *p = (uint8_t*)0xc030; // Speaker uint8_t *p = (uint8_t*)0xc030; // Speaker
uint8_t junk; uint8_t junk;
uint16_t i; uint16_t i;
for (i = 0; i < 1000; ++i) { for (i = 0; i < 200; ++i) {
junk = *p; junk = *p;
for (junk = 0; junk < 10; ++junk); // Reduce pitch for (junk = 0; junk < 50; ++junk); // Reduce pitch
} }
} }