Browse Source

Miscellaneous

- Add hardware detect and initialization code to Centronics driver.
- Fix .gitignore to reflect subdirectory name changes under Tools/cpm/.
- Bump version number in TUNE to reflect Dan's changes.
- Detect Centronics hardware in MBC configuration by default.
pull/287/head v3.1.1-pre.165
Wayne Warthen 4 years ago
parent
commit
4f25cf1366
  1. 2
      .gitignore
  2. 3
      Source/Apps/Tune/tune.asm
  3. 34
      Source/HBIOS/cen.asm
  4. 6
      Source/HBIOS/cfg_mbc.asm
  5. 2
      Source/ver.inc
  6. 2
      Source/ver.lib
  7. BIN
      Tools/cpm/bin80/ASM.COM

2
.gitignore

@ -96,7 +96,7 @@ Tools/unix/zx/zx
!Source/ZRC/*.bin !Source/ZRC/*.bin
!Source/ZZR/*.bin !Source/ZZR/*.bin
!Source/ZZR/*.hex !Source/ZZR/*.hex
!Tools/cpm/bin/*
!Tools/cpm/**
!Tools/unix/zx/* !Tools/unix/zx/*
!Tools/zx/* !Tools/zx/*

3
Source/Apps/Tune/tune.asm

@ -44,6 +44,7 @@
; 2020-09-03 [E?B] Add support for Ed Brindley YM/AY Sound Card v6 ; 2020-09-03 [E?B] Add support for Ed Brindley YM/AY Sound Card v6
; 2021-08-13 [WBW] Add support for LiNC Z50 Sound Card ; 2021-08-13 [WBW] Add support for LiNC Z50 Sound Card
; 2021-08-17 [WBW] When playing via HBIOS, call BF_SNDRESET at end ; 2021-08-17 [WBW] When playing via HBIOS, call BF_SNDRESET at end
; 2022-03-20 [DDW] Add support for MBC PSG module
;_______________________________________________________________________________ ;_______________________________________________________________________________
; ;
; ToDo: ; ToDo:
@ -653,7 +654,7 @@ TMP .DB 0 ; work around use of undocumented Z80
HBIOSMD .DB 0 ; NON-ZERO IF USING HBIOS SOUND DRIVER, ZERO OTHERWISE HBIOSMD .DB 0 ; NON-ZERO IF USING HBIOS SOUND DRIVER, ZERO OTHERWISE
OCTAVEADJ .DB 0 ; AMOUNT TO ADJUST OCTAVE UP OR DOWN OCTAVEADJ .DB 0 ; AMOUNT TO ADJUST OCTAVE UP OR DOWN
MSGBAN .DB "Tune Player for RomWBW v3.4, 17-Aug-2021",0
MSGBAN .DB "Tune Player for RomWBW v3.5, 20-Mar-2022",0
MSGUSE .DB "Copyright (C) 2021, Wayne Warthen, GNU GPL v3",13,10 MSGUSE .DB "Copyright (C) 2021, Wayne Warthen, GNU GPL v3",13,10
.DB "PTxPlayer Copyright (C) 2004-2007 S.V.Bulba",13,10 .DB "PTxPlayer Copyright (C) 2004-2007 S.V.Bulba",13,10
.DB "MYMPlay by Marq/Lieves!Tuore",13,10,13,10 .DB "MYMPlay by Marq/Lieves!Tuore",13,10,13,10

34
Source/HBIOS/cen.asm

@ -134,7 +134,7 @@ CEN_IN:
; BYTE OUTPUT ; BYTE OUTPUT
; ;
CEN_OUT: CEN_OUT:
CALL CEN_OST ; READY FOR CHAR?
CALL CEN_OST ; READY TO SEND?
JR Z,CEN_OUT ; LOOP IF NOT JR Z,CEN_OUT ; LOOP IF NOT
; *** ADD CODE TO OUTPUT BYTE *** ; *** ADD CODE TO OUTPUT BYTE ***
XOR A ; SIGNAL SUCCESS XOR A ; SIGNAL SUCCESS
@ -166,9 +166,15 @@ CEN_INITDEV:
; PREINIT ABOVE. PREINIT IS NOT ALLOWED TO ENABLE INTS! ; PREINIT ABOVE. PREINIT IS NOT ALLOWED TO ENABLE INTS!
; ;
CEN_INITDEVX: CEN_INITDEVX:
;
; *** ADD CODE TO INITIALIZE DEVICE ***
;
; *** NOT SURE THIS IS RIGHT ***
LD A,(IY+3)
LD C,A ; PORT 0 (DATA)
XOR A ; CLEAR ACCUM
OUT (C),A ; SEND IT
INC C ; BUMP TO
INC C ; ... PORT 2
LD A,%11000000 ; RESET, LEDS OFF
OUT (C),A ; SEND IT
XOR A ; SIGNAL SUCCESS XOR A ; SIGNAL SUCCESS
RET ; RETURN RET ; RETURN
; ;
@ -195,6 +201,7 @@ CEN_DEVICE:
; ;
CEN_DETECT: CEN_DETECT:
LD A,(IY+3) ; BASE PORT ADDRESS LD A,(IY+3) ; BASE PORT ADDRESS
ADD A,2 ; USE PORT 2 FOR DETECT
LD C,A ; PUT IN C FOR I/O LD C,A ; PUT IN C FOR I/O
CALL CEN_DETECT2 ; CHECK IT CALL CEN_DETECT2 ; CHECK IT
JR Z,CEN_DETECT1 ; FOUND IT, RECORD IT JR Z,CEN_DETECT1 ; FOUND IT, RECORD IT
@ -208,9 +215,18 @@ CEN_DETECT1:
; ;
CEN_DETECT2: CEN_DETECT2:
; LOOK FOR CEN AT PORT ADDRESS IN C ; LOOK FOR CEN AT PORT ADDRESS IN C
; *** ADD CODE TO DETECT DEVICE ***
OR $FF ; TEMP SET TO NOT PRESENT
RET ; RETURN RESULT, Z = CHIP FOUND
XOR A ; DEFAULT VALUE
OUT (C),A ; SEND IT
IN A,(C) ; READ IT
AND %11000000 ; ISOLATE STATUS BITS
CP %00000000 ; CORRECT VALUE?
RET NZ ; IF NOT, RETURN
LD A,%11000000 ; STATUS BITS ON (LEDS OFF)
OUT (C),A ; SEND IT
IN A,(C) ; READ IT
AND %11000000 ; ISOLATE STATUS BITS
CP %11000000 ; CORRECT VALUE?
RET ; RETURN (ZF SET CORRECTLY)
; ;
; ;
; ;
@ -249,10 +265,10 @@ CEN_PRTCFG:
; ;
CEN_TYPE_MAP: CEN_TYPE_MAP:
.DW CEN_STR_NONE .DW CEN_STR_NONE
.DW CEN_STR_CEN
.DW CEN_STR_MBC
; ;
CEN_STR_NONE .DB "<NOT PRESENT>$" CEN_STR_NONE .DB "<NOT PRESENT>$"
CEN_STR_CEN .DB "MBC$"
CEN_STR_MBC .DB "MBC$"
; ;
; WORKING VARIABLES ; WORKING VARIABLES
; ;

6
Source/HBIOS/cfg_mbc.asm

@ -243,9 +243,9 @@ AUDIOTRACE .EQU FALSE ; ENABLE TRACING TO CONSOLE OF SOUND DRIVER
SN7CLK .EQU CPUOSC / 4 ; DEFAULT TO CPUOSC / 4 SN7CLK .EQU CPUOSC / 4 ; DEFAULT TO CPUOSC / 4
SNMODE .EQU SNMODE_NONE ; DRIVER MODE: SNMODE_[NONE|RC2014|VGM] SNMODE .EQU SNMODE_NONE ; DRIVER MODE: SNMODE_[NONE|RC2014|VGM]
; ;
AY38910ENABLE .EQU FALSE ; AY: AY-3-8910 / YM2149 SOUND DRIVER
AY_CLK .EQU CPUOSC / 4 ; DEFAULT TO CPUOSC / 4
AYMODE .EQU AYMODE_NONE ; AY: DRIVER MODE: AYMODE_[SCG|N8|RCZ80|RCZ180|MSX|LINC|MBC]
AY38910ENABLE .EQU TRUE ; AY: AY-3-8910 / YM2149 SOUND DRIVER
AY_CLK .EQU 3579545 / 2 ; DEFAULT TO CPUOSC / 4
AYMODE .EQU AYMODE_MBC ; AY: DRIVER MODE: AYMODE_[SCG|N8|RCZ80|RCZ180|MSX|LINC|MBC]
; ;
SPKENABLE .EQU TRUE ; SPK: ENABLE RTC LATCH IOBIT SOUND DRIVER (SPK.ASM) SPKENABLE .EQU TRUE ; SPK: ENABLE RTC LATCH IOBIT SOUND DRIVER (SPK.ASM)
; ;

2
Source/ver.inc

@ -2,4 +2,4 @@
#DEFINE RMN 1 #DEFINE RMN 1
#DEFINE RUP 1 #DEFINE RUP 1
#DEFINE RTP 0 #DEFINE RTP 0
#DEFINE BIOSVER "3.1.1-pre.164"
#DEFINE BIOSVER "3.1.1-pre.165"

2
Source/ver.lib

@ -3,5 +3,5 @@ rmn equ 1
rup equ 1 rup equ 1
rtp equ 0 rtp equ 0
biosver macro biosver macro
db "3.1.1-pre.164"
db "3.1.1-pre.165"
endm endm

BIN
Tools/cpm/bin80/ASM.COM

Binary file not shown.
Loading…
Cancel
Save