Hook up a +40-60db microphone pre-amp to your stereo (If your TV you are using as a monitor has a good amp built in you may hear something on max volume) or use a bass guitar or PA amp like I am, though I tested my DYNEX 15" TV on max volume and can hear it.
Then type in the following program....
1 REM TWINKLE TWINKLE LITTLE STAR
2 REM FOR THE APPLE I BY COREY COHEN
10 GOSUB 10010
40 POKE 768,255: POKE 769,127: CALL 770
41 POKE 768,255: POKE 769,127: CALL 770
42 POKE 768,170: POKE 769,127: CALL 770
43 POKE 768,170: POKE 769,127: CALL 770
44 POKE 768,152: POKE 769,127: CALL 770
45 POKE 768,152: POKE 769,127: CALL 770
46 POKE 768,170: POKE 769,255: CALL 770
50 POKE 768,191: POKE 769,127: CALL 770
51 POKE 768,191: POKE 769,127: CALL 770
52 POKE 768,202: POKE 769,127: CALL 770
53 POKE 768,202: POKE 769,127: CALL 770
54 POKE 768,227: POKE 769,127: CALL 770
55 POKE 768,227: POKE 769,127: CALL 770
56 POKE 768,255: POKE 769,255: CALL 770
60 POKE 768,170: POKE 769,127: CALL 770
61 POKE 768,170: POKE 769,127: CALL 770
62 POKE 768,191: POKE 769,127: CALL 770
63 POKE 768,191: POKE 769,127: CALL 770
64 POKE 768,202: POKE 769,127: CALL 770
65 POKE 768,202: POKE 769,127: CALL 770
66 POKE 768,227: POKE 769,255: CALL 770
70 POKE 768,170: POKE 769,127: CALL 770
71 POKE 768,170: POKE 769,127: CALL 770
72 POKE 768,191: POKE 769,127: CALL 770
73 POKE 768,191: POKE 769,127: CALL 770
74 POKE 768,202: POKE 769,127: CALL 770
75 POKE 768,202: POKE 769,127: CALL 770
76 POKE 768,227: POKE 769,255: CALL 770
80 POKE 768,255: POKE 769,127: CALL 770
81 POKE 768,255: POKE 769,127: CALL 770
82 POKE 768,170: POKE 769,127: CALL 770
83 POKE 768,170: POKE 769,127: CALL 770
84 POKE 768,152: POKE 769,127: CALL 770
85 POKE 768,152: POKE 769,127: CALL 770
86 POKE 768,170: POKE 769,255: CALL 770
90 POKE 768,191: POKE 769,127: CALL 770
91 POKE 768,191: POKE 769,127: CALL 770
92 POKE 768,202: POKE 769,127: CALL 770
93 POKE 768,202: POKE 769,127: CALL 770
94 POKE 768,227: POKE 769,127: CALL 770
95 POKE 768,227: POKE 769,127: CALL 770
96 POKE 768,255: POKE 769,255: CALL 770
1000 END
10000 REM DURATION POKE BETWEEN 0 AND 255 TO 769
10001 REM NOTES POKE BELOW VALUE TO 768
10002 REM NOTE LOW MED HIGH
10003 REM =====================
10004 REM C 255 128 64
10005 REM C# 241 121 60
10006 REM D 227 114 57
10007 REM D# 214 108 54
10008 REM E 202 102 51
10009 REM F 191 96 48
10010 REM F# 180 91 45
10011 REM G 170 85 43
10012 REM G# 161 81 40
10013 REM A 152 76 38
10014 REM A# 143 72 36
10015 REM B 135 68 34
10016 REM =====================
10020 POKE 770,173
10021 POKE 771,00
10022 POKE 772,192
10023 POKE 773,136
10024 POKE 774,208
10025 POKE 775,5
10026 POKE 776,206
10027 POKE 777,1
10028 POKE 778,3
10029 POKE 779,240
10030 POKE 780,9
10031 POKE 781,202
10032 POKE 782,208
10033 POKE 783,245
10034 POKE 784,174
10035 POKE 785,0
10036 POKE 786,3
10037 POKE 787,76
10038 POKE 788,2
10039 POKE 789,3
10040 POKE 790,96
10050 RETURN
Oh and if all you need to do is make a beep like the "BELL" on an Apple II, simply reuse the header code in the ACI ROM, but change it's duration to really really short.
POKE 768,169:POKE 769,01:POKE 770,32:POKE 771,204:POKE 772,193:POKE 773,96:CALL 768
This simple preamp I built some time ago will provide line level compatible output, if connected to the cassette output.
http://www.willegal.net/preamp/preamp.htm
Also note that any single bit apple II sound programs should be easily ported to the apple 1.
Regards,
Mike Willegal
Yep any Apple II sound program just needs the "Speaker" address changed from $C030 to $C000, and maybe a little timing tweak if you mind it being a little off key.
The big part of the discovery was even thinking to use the cassette output as a "sound card".
Mike, I thank you for the inspiration to add sound to one of my Apple II to Apple I code conversions and my own laziness for not wanting to build a sound card.
Cheers,
Corey