finalizo mc

This commit is contained in:
antoniovillena 2022-09-19 22:29:03 +02:00
parent 285beea478
commit b2c2bcd55d
12 changed files with 36 additions and 108 deletions

View File

@ -1,18 +0,0 @@
; rst28.mac - macros definition for `rst28.inc'.
;
; SPDX-FileCopyrightText: Copyright (C) 2019, 2021 Antonio Villena
;
; SPDX-License-Identifier: GPL-3.0-only
; Compatible compilers:
; SJAsmPlus, <https://github.com/sjasmplus/sjasmplus/>
ifndef rst28_mac_included
define rst28_mac_included
macro wreg dir, dato
call rst28
defb dir, dato
endm
endif ; !rst28_mac_included

View File

@ -70,3 +70,13 @@ RADASCTRL: equ radas_ctrl
define specdrum_port $ffdf ; Specdrum I/O port in 16-bit format for DMA destination
endif ; !zxuno_def_included
ifndef rst28_mac_included
define rst28_mac_included
macro wreg dir, dato
call rst28
defb dir, dato
endm
endif ; !rst28_mac_included

BIN
utils/MC

Binary file not shown.

View File

@ -22,21 +22,13 @@
; You should have received a copy of the GNU General Public License
; along with this program. If not, see <https://www.gnu.org/licenses/>.
;
; SPDX-FileCopyrightText: Copyright (C) 2019, 2021 Antonio Villena
;
; SPDX-FileContributor: 2021 kounch
; SPDX-FileContributor: 2021 Ivan Tatarinov <ivan-tat@ya.ru>
;
; SPDX-License-Identifier: GPL-3.0-only
; Compatible compilers:
; SJAsmPlus, <https://github.com/sjasmplus/sjasmplus/>
; SjAsmPlus, <https://github.com/z00m128/sjasmplus>
; output BACK16M
include zxuno.def
include esxdos.def
include rst28.mac
define VERSION "0.1"
define FLASH_FILE "FLASH.ZX1"

View File

@ -16,14 +16,8 @@
; You should have received a copy of the GNU General Public License
; along with this program. If not, see <https://www.gnu.org/licenses/>.
;
; SPDX-FileCopyrightText: Copyright (C) 2019, 2021 Antonio Villena
;
; SPDX-FileContributor: 2021 Ivan Tatarinov <ivan-tat@ya.ru>
;
; SPDX-License-Identifier: GPL-3.0-only
; Compatible compilers:
; SJAsmPlus, <https://github.com/sjasmplus/sjasmplus/>
; SjAsmPlus, <https://github.com/z00m128/sjasmplus>
; output CORCLEAN

View File

@ -16,20 +16,13 @@
; You should have received a copy of the GNU General Public License
; along with this program. If not, see <https://www.gnu.org/licenses/>.
;
; SPDX-FileCopyrightText: Copyright (C) 2019, 2021 Antonio Villena
;
; SPDX-FileContributor: 2021 Ivan Tatarinov <ivan-tat@ya.ru>
;
; SPDX-License-Identifier: GPL-3.0-only
; Compatible compilers:
; SJAsmPlus, <https://github.com/sjasmplus/sjasmplus/>
; SjAsmPlus, <https://github.com/z00m128/sjasmplus>
; output COREBIOS
include zxuno.def
include esxdos.def
include rst28.mac
define VERSION "0.1"
define CORE_FILE "SPECTRUM.ZX1"

View File

@ -18,20 +18,17 @@
; Compatible compilers:
; SjAsmPlus, <https://github.com/z00m128/sjasmplus>
output MC
; output MC
include zxuno.def
include esxdos.def
include rst28.mac
define VERSION "0.1"
org $2000 ; comienzo de la ejecución de los comandos ESXDOS
Main ld a, h
or l
jr nz, NoPrint ; si no se ha especificado nombre de fichero, imprimir uso
call Print;567890123456789012345678901
call Print
dz '.mc corefile.zx1', 13, 13, 'Loads and executes a core'
ret
NoPrint ld de, FileName
@ -59,7 +56,7 @@ Nonlock wreg flash_cs, 0 ; activamos spi, enviando un 0
in a, (c)
in a, (c)
wreg flash_cs, 1 ; desactivamos spi, enviando un 1
sub $19
sub $18
jr z, Goodflsh
call Print
dz 'Incorrect flash IC'
@ -80,21 +77,7 @@ Goodflsh ld a, scandbl_ctrl
inc b
normal ld a, 0
out (c), a
ld bc, zxuno_port
out (c), a
ld bc, zxuno_port
ld a, core_addr
ld hl, $2f80
ld de, core_boot
out (c), a
inc b
out (c), h
out (c), l
out (c), d
dec b
out (c), e
inc b
out (c), a
ret
init xor a
esxdos M_GETSETDRV ; A = unidad actual
jr nc, SDCard
@ -111,7 +94,7 @@ SDCard ld b, FA_READ ; B = modo de apertura
ret
FileFound call Print
db 'Writing SPI flash', 13
dz '[', 6, ' ]', 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8
dz '[', 6, ' ]', 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8
ld ixl, $15
ld de, $2f80
exx
@ -137,11 +120,19 @@ ReadOK ld a, $40
exx
dec ixl
jr nz, Bucle
ld a, (handle+1)
esxdos F_CLOSE
call Print
dz 13, 'Launching core'
ret
ld bc, zxuno_port
ld hl, $2f80
ld a, core_addr
out (c), a
inc a
inc b
out (c), h
out (c), l
out (c), 0
dec b
out (c), a
inc b
out (c), a
include Print.inc
include wrflsh.inc
include rst28.inc

View File

@ -24,19 +24,13 @@
;
; SPDX-FileCopyrightText: Copyright (C) 2019, 2021 Antonio Villena
;
; SPDX-FileContributor: 2021 Ivan Tatarinov <ivan-tat@ya.ru>
; SPDX-FileContributor: 2021 kounch
;
; SPDX-License-Identifier: GPL-3.0-only
; Compatible compilers:
; SJAsmPlus, <https://github.com/sjasmplus/sjasmplus/>
; SjAsmPlus, <https://github.com/z00m128/sjasmplus>
; output ROMSBACK
include zxuno.def
include esxdos.def
include rst28.mac
define VERSION "0.1"
define ROMS_FILE "ROMS.ZX1"

View File

@ -20,20 +20,13 @@
; You should have received a copy of the GNU General Public License
; along with this program. If not, see <https://www.gnu.org/licenses/>.
;
; SPDX-FileCopyrightText: Copyright (C) 2019, 2021 Antonio Villena
;
; SPDX-FileContributor: 2021 Ivan Tatarinov <ivan-tat@ya.ru>
;
; SPDX-License-Identifier: GPL-3.0-only
; Compatible compilers:
; SJAsmPlus, <https://github.com/sjasmplus/sjasmplus/>
; SjAsmPlus, <https://github.com/z00m128/sjasmplus>
; output ROMSUPGR
include zxuno.def
include esxdos.def
include rst28.mac
define VERSION "0.1"
define ROMS_FILE "ROMS.ZX1"

View File

@ -19,20 +19,13 @@
; You should have received a copy of the GNU General Public License
; along with this program. If not, see <https://www.gnu.org/licenses/>.
;
; SPDX-FileCopyrightText: Copyright (C) 2019, 2021 Antonio Villena
;
; SPDX-FileContributor: 2021 Ivan Tatarinov <ivan-tat@ya.ru>
;
; SPDX-License-Identifier: GPL-3.0-only
; Compatible compilers:
; SJAsmPlus, <https://github.com/sjasmplus/sjasmplus/>
; SjAsmPlus, <https://github.com/z00m128/sjasmplus>
; output UPGR16M
include zxuno.def
include esxdos.def
include rst28.mac
define VERSION "0.1"
define FLASH_FILE "FLASH.ZX1"

View File

@ -20,15 +20,8 @@
; You should have received a copy of the GNU General Public License
; along with this program. If not, see <https://www.gnu.org/licenses/>.
;
; SPDX-FileCopyrightText: Copyright (C) 2019, 2021 Antonio Villena
;
; SPDX-FileContributor: 2021 Ivan Tatarinov <ivan-tat@ya.ru>
; SPDX-FileContributor: 2021 kounch
;
; SPDX-License-Identifier: GPL-3.0-only
; Compatible compilers:
; SJAsmPlus, <https://github.com/sjasmplus/sjasmplus/>
; SjAsmPlus, <https://github.com/z00m128/sjasmplus>
; definition of "zxdos" flag
include upgr32m.def
@ -41,7 +34,6 @@
include zxuno.def
include esxdos.def
include rst28.mac
define VERSION "0.1.1"
IF zxdos=1

View File

@ -16,14 +16,8 @@
; You should have received a copy of the GNU General Public License
; along with this program. If not, see <https://www.gnu.org/licenses/>.
;
; SPDX-FileCopyrightText: Copyright (C) 2019, 2021 Antonio Villena
;
; SPDX-FileContributor: 2021 Ivan Tatarinov <ivan-tat@ya.ru>
;
; SPDX-License-Identifier: GPL-3.0-only
; Compatible compilers:
; SJAsmPlus, <https://github.com/sjasmplus/sjasmplus/>
; SjAsmPlus, <https://github.com/z00m128/sjasmplus>
; output UPGRADE