Apple-1-HW/RC-Project-Board
1
0
Fork 0
mirror of https://github.com/tebl/RC-Project-Board.git synced 2025-02-19 09:30:54 +00:00
Code Issues Projects Releases Wiki Activity

Make a tone

Browse Source
This commit is contained in:
Tor-Eirik Bakke Lunde 2020-01-25 23:32:25 +01:00
parent a99e4aafa4
commit 8be58c6c1b
7 changed files with 91 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
projects/PB-002 Covox Sound/kicad/Covox Sound.pro
View File

@ -1,4 +1,4 @@
update=10/01/2020 23:36:06
update=15/01/2020 19:42:40
version=1
last_client=kicad
[pcbnew]
@ -23,16 +23,6 @@ ModuleOutlineThickness=0.150000000000
[cvpcb]
version=1
NetIExt=net
[schematic_editor]
version=1
PageLayoutDescrFile=
PlotDirectoryName=export/
SubpartIdSeparator=0
SubpartFirstId=65
NetFmtName=Pcbnew
SpiceForceRefPrefix=0
SpiceUseNetNumbers=0
LabSize=60
[eeschema]
version=1
LibDir=../../../common/library
@ -71,3 +61,13 @@ LibName31=rc1_backplane
LibName32=mounting
[general]
version=1
[schematic_editor]
version=1
PageLayoutDescrFile=
PlotDirectoryName=export/
SubpartIdSeparator=0
SubpartFirstId=65
NetFmtName=Pcbnew
SpiceForceRefPrefix=0
SpiceUseNetNumbers=0
LabSize=60

5
projects/PB-002 Covox Sound/kicad/Covox Sound.sch
View File

@ -28,8 +28,9 @@ LIBS:opto
LIBS:atmel
LIBS:contrib
LIBS:valves
LIBS:mounting
LIBS:trs_3.5mm
LIBS:rc1_backplane
LIBS:mounting
LIBS:Covox Sound-cache
EELAYER 25 0
EELAYER END
@ -106,8 +107,6 @@ F 3 "" H 4575 3300 50 0001 C CNN
1 4575 3300
1 0 0 -1
$EndComp
Text Notes 11825 10550 0 60 ~ 0
A 4x4 LED Cube with integrated template, created for slotting on top of the RC-ONE\nProject Board. As a cube it's rather small, but given that it already contains 64 individual\nLEDs I believe it's a manageable yet fun project.\n\nEach layer is constructed separately on the reverse side with 0.5mm diameter metal bars\nfor the anodes. Layers are then moved to the front and stacked.
$Comp
L Conn_01x10 J1
U 1 1 5DE736F3

BIN
projects/PB-002 Covox Sound/kicad/export/Covox Sound.pdf Normal file
View File

Binary file not shown.

3
projects/PB-002 Covox Sound/software/RC-ONE/001-Beep/assemble.bat Normal file
View File

@ -0,0 +1,3 @@
sbasm.py beep.asm
type beep.list
pause

37
projects/PB-002 Covox Sound/software/RC-ONE/001-Beep/beep.asm Normal file
View File

@ -0,0 +1,37 @@
.CR 6502
.TF beep.hex,INT
.LF beep.list
* ----------------------------------------------------------------------
* SAMPLE PROGRAM AS FOUND IN THE BOOK "6502 APPLICATIONS BOOK" BY RODNEY
* ZAKS, IT IS A SOFTWARE METHOD OF CONTROLLING SOUND DURATION.ADAPTED FOR
* THE KIM-1 WITH THE 6502 PROJECT PLATFORM BOARD / COVOX PROJECT BOARD.
*
DELAY .EQ $04
VIA .EQ $1700
IRB .EQ VIA
ORA .EQ VIA+1
DDRB .EQ VIA+2
DDRA .EQ VIA+3
.OR $0200
.TA $0200
START LDA #$80 LOAD A DEFAULT VALUE, START PROGRAM AT
STA DELAY BSCSPK TO JUST USE ZP $04 AS IN THE BOOK.
BSCSPK LDA #$FF SET PORT A
STA DDRA AS OUTPUTS
AGAIN LDA #$20 DEFAULT VOLUME
STA ORA SET SPEAKER DRIVER HIGH
JSR DLYB CALL DELAY
LDA #$00
STA ORA SET SPEAKER DRIVER LOW
JSR DLYB CALL DELAY
JMP AGAIN
DLYB LDX DELAY LOAD DELAY VALUE INTO X
LPXB INX INCREMENT X
CPX #$00
BMI LPXB LOOP TILL (X)=0
RTS

4
projects/PB-002 Covox Sound/software/RC-ONE/001-Beep/beep.hex Normal file
View File

@ -0,0 +1,4 @@
:10020000A9808504A9FF8D0317A9208D0117201C43
:1002100002A9008D0117201C024C0902A604E8E087
:040220000030FB604F
:00000001FF

34
projects/PB-002 Covox Sound/software/RC-ONE/001-Beep/beep.list Normal file
View File

@ -0,0 +1,34 @@
0000- 4
0000- 5 * ----------------------------------------------------------------------
0000- 6 * SAMPLE PROGRAM AS FOUND IN THE BOOK "6502 APPLICATIONS BOOK" BY RODNEY
0000- 7 * ZAKS, IT IS A SOFTWARE METHOD OF CONTROLLING SOUND DURATION.ADAPTED FOR
0000- 8 * THE KIM-1 WITH THE 6502 PROJECT PLATFORM BOARD / COVOX PROJECT BOARD.
0000- 9 *
0004- 10 DELAY .EQ $04
0000- 11
1700- 12 VIA .EQ $1700
1700- 13 IRB .EQ VIA
1701- 14 ORA .EQ VIA+1
1702- 15 DDRB .EQ VIA+2
1703- 16 DDRA .EQ VIA+3
0000- 17
0200- 18 .OR $0200
0200- 19 .TA $0200
0200-A9 80 20 ( 2) START LDA #$80 LOAD A DEFAULT VALUE, START PROGRAM AT
0202-85 04 21 ( 2) STA DELAY BSCSPK TO JUST USE ZP $04 AS IN THE BOOK.
0204-A9 FF 22 ( 2) BSCSPK LDA #$FF SET PORT A
0206-8D 03 17 23 ( 4) STA DDRA AS OUTPUTS
0209- 24
0209-A9 20 25 ( 2) AGAIN LDA #$20 DEFAULT VOLUME
020B-8D 01 17 26 ( 4) STA ORA SET SPEAKER DRIVER HIGH
020E-20 1C 02 27 ( 6) JSR DLYB CALL DELAY
0211-A9 00 28 ( 2) LDA #$00
0213-8D 01 17 29 ( 4) STA ORA SET SPEAKER DRIVER LOW
0216-20 1C 02 30 ( 6) JSR DLYB CALL DELAY
0219-4C 09 02 31 ( 3) JMP AGAIN
021C- 32
021C-A6 04 33 ( 3) DLYB LDX DELAY LOAD DELAY VALUE INTO X
021E-E8 34 ( 2) LPXB INX INCREMENT X
021F-E0 00 35 ( 2) CPX #$00
0221-30 FB 36 (2**) BMI LPXB LOOP TILL (X)=0
0223-60 37 ( 6) RTS