SDL sound, compile against MINGW (VK, fopen binary files, menu key calls FBZX Wii menu, return key active on KEYUP), 2 bugs in 128k snap format, turbo N in line command, separated code for normal and precise emulation, toggle full screen in FBZX menu, removed snow effect in normal emulation, changed save tape routine, fixed 2 bugs in z80, changed SP call in z80
This commit is contained in:
fabio.olimpieri
parent
bd14dbb56b
commit
24c37cf1ac
|
|
@ -0,0 +1,188 @@
|
|||
#
|
||||
# Make file for windows version of FBZX Wii
|
||||
#
|
||||
#---------------------------------------------------------------------------------
|
||||
# Clear the implicit built in rules
|
||||
#---------------------------------------------------------------------------------
|
||||
.SUFFIXES:
|
||||
#---------------------------------------------------------------------------------
|
||||
|
||||
export PATH := /c/devkitPro/MinGW/bin:$(PATH)
|
||||
export CC := gcc
|
||||
export SHELL=/bin/bash
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
%.o: %.c
|
||||
@echo $(notdir $<)
|
||||
@$(CC) $(CFLAGS) -c $< -o $@
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
%.exe:
|
||||
@echo linking ... $(notdir $@)
|
||||
@$(LD) $^ $(LDFLAGS) $(LIBPATHS) $(LIBS) -o $@
|
||||
|
||||
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
# TARGET is the name of the output
|
||||
# BUILD is the directory where object files & intermediate files will be placed
|
||||
# SOURCES is a list of directories containing source code
|
||||
# INCLUDES is a list of directories containing extra header files
|
||||
#---------------------------------------------------------------------------------
|
||||
TARGET := fbzx-wii
|
||||
BUILD := build
|
||||
SOURCES := src src/z80free src/minizip
|
||||
DATA :=
|
||||
INCLUDES :=
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
# options for code generation
|
||||
#---------------------------------------------------------------------------------
|
||||
|
||||
CFLAGS = -g -O2 -Wall $(INCLUDE) -Wno-pointer-sign -DBYTE_ORDER=LITTLE_ENDIAN -DMINGW
|
||||
CXXFLAGS = $(CFLAGS)
|
||||
|
||||
LDFLAGS = -g -Wl,-Map,$(notdir $@).map
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
# any extra libraries we wish to link with the project
|
||||
#---------------------------------------------------------------------------------
|
||||
LIBS := -lmingw32 -lSDLmain -lSDL -lSDL_image -lSDL_ttf -lz
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
# list of directories containing libraries, this must be the top level containing
|
||||
# include and lib
|
||||
#---------------------------------------------------------------------------------
|
||||
LIBDIRS :=
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
# no real need to edit anything past this point unless you need to add additional
|
||||
# rules for different file extensions
|
||||
#---------------------------------------------------------------------------------
|
||||
ifneq ($(BUILD),$(notdir $(CURDIR)))
|
||||
#---------------------------------------------------------------------------------
|
||||
|
||||
export OUTPUT := $(CURDIR)/$(TARGET)
|
||||
|
||||
export VPATH := $(foreach dir,$(SOURCES),$(CURDIR)/$(dir)) \
|
||||
$(foreach dir,$(DATA),$(CURDIR)/$(dir))
|
||||
|
||||
export DEPSDIR := $(CURDIR)/$(BUILD)
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
# automatically build a list of object files for our project
|
||||
#---------------------------------------------------------------------------------
|
||||
CFILES := $(foreach dir,$(SOURCES),$(notdir $(wildcard $(dir)/*.c)))
|
||||
CFILES := $(filter-out z80free_tester.c, $(CFILES))
|
||||
CPPFILES := $(foreach dir,$(SOURCES),$(notdir $(wildcard $(dir)/*.cpp)))
|
||||
sFILES := $(foreach dir,$(SOURCES),$(notdir $(wildcard $(dir)/*.s)))
|
||||
SFILES := $(foreach dir,$(SOURCES),$(notdir $(wildcard $(dir)/*.S)))
|
||||
BINFILES := $(foreach dir,$(DATA),$(notdir $(wildcard $(dir)/*.*)))
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
# use CXX for linking C++ projects, CC for standard C
|
||||
#---------------------------------------------------------------------------------
|
||||
ifeq ($(strip $(CPPFILES)),)
|
||||
export LD := $(CC)
|
||||
else
|
||||
export LD := $(CXX)
|
||||
endif
|
||||
|
||||
export OFILES := $(addsuffix .o,$(BINFILES)) \
|
||||
$(CPPFILES:.cpp=.o) $(CFILES:.c=.o) \
|
||||
$(sFILES:.s=.o) $(SFILES:.S=.o)
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
# build a list of include paths
|
||||
#---------------------------------------------------------------------------------
|
||||
export INCLUDE := $(foreach dir,$(INCLUDES), -iquote $(CURDIR)/$(dir)) \
|
||||
$(foreach dir,$(LIBDIRS),-I$(dir)/include) \
|
||||
-I$(CURDIR)/$(BUILD)
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
# build a list of library paths
|
||||
#---------------------------------------------------------------------------------
|
||||
export LIBPATHS := $(foreach dir,$(LIBDIRS),-L$(dir)/lib) -L
|
||||
|
||||
export OUTPUT := $(CURDIR)/$(TARGET)
|
||||
.PHONY: $(BUILD) clean
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
$(BUILD):
|
||||
@[ -d $@ ] || mkdir -p $@
|
||||
@make --no-print-directory -C $(BUILD) -f $(CURDIR)/Makefile
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
clean:
|
||||
@echo clean ...
|
||||
@rm -fr $(BUILD) $(OUTPUT).exe dist
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
|
||||
|
||||
dist: $(BUILD)
|
||||
rm -fr $@
|
||||
mkdir -p $@/fbzx-wii/fbzx
|
||||
mkdir -p $@/fbzx-wii/spectrum-roms
|
||||
mkdir -p $@/fbzx-wii/tapes
|
||||
mkdir -p $@/fbzx-wii/snapshots
|
||||
mkdir -p $@/fbzx-wii/microdrives
|
||||
mkdir -p $@/fbzx-wii/scr
|
||||
mkdir -p $@/fbzx-wii/scr2
|
||||
mkdir -p $@/fbzx-wii/configurations
|
||||
mkdir -p $@/fbzx-wii/poke
|
||||
mkdir -p $@/fbzx-wii/doc
|
||||
cp fbzx.exe $@/fbzx-wii/fbzx.exe
|
||||
cp meta.xml $@/fbzx-wii/meta.xml
|
||||
cp spectrum-roms/* $@/fbzx-wii/spectrum-roms
|
||||
cp dll/* $@/fbzx-wii
|
||||
cp images/keymap.bmp $@/fbzx-wii/fbzx
|
||||
cp images/Spectrum_keyboard.png $@/fbzx-wii/fbzx
|
||||
cp images/symbol_shift.png $@/fbzx-wii/fbzx
|
||||
cp images/caps_shift.png $@/fbzx-wii/fbzx
|
||||
cp images/Spectrum_keyboard_small.png $@/fbzx-wii/fbzx
|
||||
cp images/symbol_shift_small.png $@/fbzx-wii/fbzx
|
||||
cp images/caps_shift_small.png $@/fbzx-wii/fbzx
|
||||
cp images/ZXSpectrum48k.png $@/fbzx-wii/fbzx
|
||||
cp images/FreeMono.ttf $@/fbzx-wii/fbzx
|
||||
cp fbzx.net $@/fbzx-wii
|
||||
cp AMSTRAD CAPABILITIES COPYING FAQ README README.TZX VERSIONS VERSIONS.wii $@/fbzx-wii/doc
|
||||
touch $@/fbzx-wii/tapes/dummy
|
||||
touch $@/fbzx-wii/snapshots/dummy
|
||||
touch $@/fbzx-wii/microdrives/dummy
|
||||
touch $@/fbzx-wii/scr/dummy
|
||||
touch $@/fbzx-wii/scr2/dummy
|
||||
touch $@/fbzx-wii/configurations/dummy
|
||||
touch $@/fbzx-wii/poke/dummy
|
||||
cd $@ && tar -czf ../fbzx-wii-windows-v-bin.tar.gz *
|
||||
|
||||
distsource:
|
||||
cd .. && cp -r fbzx-wii fbzx-wii-v
|
||||
cd ../fbzx-wii-v && find . -name ".svn" | xargs rm -rf
|
||||
cd .. && tar -czf fbzx-wii-v.tar.gz fbzx-wii-v
|
||||
cd .. && rm -fr fbzx-wii-v
|
||||
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
else
|
||||
|
||||
DEPENDS := $(OFILES:.o=.d)
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
# main targets
|
||||
#---------------------------------------------------------------------------------
|
||||
$(OUTPUT).exe: $(OFILES)
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
# This rule links in binary data with the .jpg extension
|
||||
#---------------------------------------------------------------------------------
|
||||
%.jpg.o : %.jpg
|
||||
#---------------------------------------------------------------------------------
|
||||
@echo $(notdir $<)
|
||||
$(bin2o)
|
||||
|
||||
-include $(DEPENDS)
|
||||
|
||||
#---------------------------------------------------------------------------------
|
||||
endif
|
||||
#---------------------------------------------------------------------------------
|
||||
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
Binary file not shown.
|
Before Width: | Height: | Size: 271 KiB After Width: | Height: | Size: 308 KiB |
|
|
@ -30,8 +30,10 @@
|
|||
#include "VirtualKeyboard.h"
|
||||
#include "menu_sdl.h"
|
||||
#include<SDL/SDL_image.h>
|
||||
#include <wiiuse/wpad.h>
|
||||
|
||||
#ifdef GEKKO
|
||||
#include <wiiuse/wpad.h>
|
||||
#endif
|
||||
|
||||
#define K(name, sdl_code) \
|
||||
{ name, sdl_code, 0 ,0, 0}
|
||||
|
|
@ -210,7 +212,7 @@ void virtkey_ir_run(void)
|
|||
int border_y = VirtualKeyboard.sel_y/RATIO;
|
||||
int key_sel = 0;
|
||||
SDL_Joystick *joy;
|
||||
static int joy_bottons_last[4];
|
||||
static int joy_bottons_last[5];
|
||||
static char countdown_rumble=0;
|
||||
|
||||
#ifdef GEKKO
|
||||
|
|
@ -222,21 +224,31 @@ void virtkey_ir_run(void)
|
|||
if ((SDL_JoystickGetButton(joy, 0) && !joy_bottons_last[0]) || /* A */
|
||||
(SDL_JoystickGetButton(joy, 3) && !joy_bottons_last[1]) || /* 2 */
|
||||
(SDL_JoystickGetButton(joy, 9) && !joy_bottons_last[2]) || /* CA */
|
||||
(SDL_JoystickGetButton(joy, 10) && !joy_bottons_last[3])) /* CB */
|
||||
key_sel = KEY_SELECT;
|
||||
(SDL_JoystickGetButton(joy, 10) && !joy_bottons_last[3]) /* CB */
|
||||
#ifndef GEKKO
|
||||
||((SDL_GetMouseState(NULL, NULL)&SDL_BUTTON(1))&& !joy_bottons_last[4])//mouse left button
|
||||
#endif
|
||||
) key_sel = KEY_SELECT;
|
||||
|
||||
|
||||
if ((!SDL_JoystickGetButton(joy, 0) && joy_bottons_last[0]) || /* A */
|
||||
(!SDL_JoystickGetButton(joy, 3) && joy_bottons_last[1]) || /* 2 */
|
||||
(!SDL_JoystickGetButton(joy, 9) && joy_bottons_last[2]) || /* CA */
|
||||
(!SDL_JoystickGetButton(joy, 10) && joy_bottons_last[3])) /* CB */
|
||||
key_sel = KEY_DESELECT;
|
||||
(!SDL_JoystickGetButton(joy, 10) && joy_bottons_last[3]) /* CB */
|
||||
#ifndef GEKKO
|
||||
||(!(SDL_GetMouseState(NULL, NULL)&SDL_BUTTON(1)) && joy_bottons_last[4]) //mouse left button
|
||||
#endif
|
||||
) key_sel = KEY_DESELECT;
|
||||
|
||||
|
||||
|
||||
joy_bottons_last[0]=SDL_JoystickGetButton(joy, 0) ; /* A */
|
||||
joy_bottons_last[1] =SDL_JoystickGetButton(joy, 3) ; /* 2 */
|
||||
joy_bottons_last[2] =SDL_JoystickGetButton(joy, 9) ; /* CA */
|
||||
joy_bottons_last[3] =SDL_JoystickGetButton(joy, 10) ; /* CB */
|
||||
|
||||
#ifndef GEKKO
|
||||
joy_bottons_last[4] =SDL_GetMouseState(NULL, NULL)&SDL_BUTTON(1); //mouse left button
|
||||
#endif
|
||||
|
||||
if (key_sel==KEY_SELECT)
|
||||
{
|
||||
|
|
|
|||
|
|
@ -83,13 +83,13 @@ int save_z80(char *filename, int overwrite) {
|
|||
unsigned char value,bucle;
|
||||
int retval;
|
||||
|
||||
fichero=fopen(filename,"r");
|
||||
fichero=fopen(filename,"rb");
|
||||
if((fichero!=NULL)&&(!overwrite)) {
|
||||
fclose(fichero);
|
||||
return -1; // file already exists
|
||||
}
|
||||
|
||||
fichero=fopen(filename,"w");
|
||||
fichero=fopen(filename,"wb");
|
||||
|
||||
if(fichero==NULL)
|
||||
return -2; // can't create file
|
||||
|
|
@ -182,7 +182,7 @@ int load_z80(char *filename) {
|
|||
for(bucle=0;bucle<16;bucle++)
|
||||
snap->ay_regs[bucle]=0;
|
||||
|
||||
fichero=fopen(filename,"r");
|
||||
fichero=fopen(filename,"rb");
|
||||
if(fichero==NULL) {
|
||||
free(memo);
|
||||
free(snap);
|
||||
|
|
@ -461,7 +461,7 @@ int load_sna(char *filename) {
|
|||
|
||||
printf("Loading SNA file\n");
|
||||
|
||||
fichero=fopen(filename,"r");
|
||||
fichero=fopen(filename,"rb");
|
||||
if(fichero==NULL) {
|
||||
free(tempo);
|
||||
free(tempo2);
|
||||
|
|
@ -547,12 +547,12 @@ int load_sna(char *filename) {
|
|||
snap->PC=((word)tempo2[0])+256*((word)tempo2[1]);
|
||||
memcpy(snap->page[5],tempo+27,16384);
|
||||
memcpy(snap->page[2],tempo+16411,16384);
|
||||
v1=tempo[2];
|
||||
v1=tempo2[2];
|
||||
snap->pager=v1;
|
||||
v1&=0x07;
|
||||
memcpy(snap->page[v1],tempo+32795,16384);
|
||||
addr=4;
|
||||
for (loop=0;loop<7;loop++) {
|
||||
for (loop=0;loop<8;loop++) {
|
||||
if ((loop==2)||(loop==5)||(loop==((int)v1))) {
|
||||
continue;
|
||||
}
|
||||
|
|
|
|||
174
src/computer.c
174
src/computer.c
|
|
@ -28,7 +28,7 @@
|
|||
#include <string.h>
|
||||
#include <sys/types.h>
|
||||
#include <signal.h>
|
||||
#include <sys/wait.h>
|
||||
//#include <sys/wait.h>
|
||||
#include "tape.h"
|
||||
#include "microdrive.h"
|
||||
#include "Virtualkeyboard.h"
|
||||
|
|
@ -73,16 +73,6 @@ inline byte bus_empty () {
|
|||
/* calls all the routines that emulates the computer, runing them for 'tstados'
|
||||
tstates */
|
||||
|
||||
inline void emulate_screen (int tstados) {
|
||||
|
||||
if(((procesador.I & 0xC0) == 0x40)&&(ordenador.mode128k!=3)) { // (procesador.I>=0x40)&&(procesador.I<=0x7F)
|
||||
ordenador.screen_snow=1;
|
||||
} else
|
||||
ordenador.screen_snow=0;
|
||||
|
||||
if (ordenador.precision) show_screen_precision (tstados);
|
||||
else show_screen(tstados);
|
||||
}
|
||||
|
||||
inline void emulate (int tstados) {
|
||||
|
||||
|
|
@ -132,8 +122,6 @@ void computer_init () { //Called only on start-up
|
|||
ordenador.osd_text[0] = 0;
|
||||
ordenador.osd_time = 0;
|
||||
|
||||
ordenador.other_ret = 0;
|
||||
|
||||
ordenador.s8 = ordenador.s9 = ordenador.s10 = ordenador.s11 =
|
||||
ordenador.s12 = ordenador.s13 = ordenador.s14 =
|
||||
ordenador.s15 = 0xFF;
|
||||
|
|
@ -468,7 +456,7 @@ void register_screen (SDL_Surface * pantalla) {
|
|||
ordenador.contador_flash = 0;
|
||||
ordenador.readed = 0;
|
||||
|
||||
//ordenador.contended_zone=0;
|
||||
ordenador.contended_zone=0;
|
||||
ordenador.cicles_counter=0;
|
||||
|
||||
ordenador.tstados_counter_sound = 0;
|
||||
|
|
@ -591,6 +579,8 @@ inline void show_screen (int tstados) {
|
|||
|| (ordenador.currpix < 48) || (ordenador.currpix > 303)) {
|
||||
|
||||
// is border
|
||||
|
||||
ordenador.contended_zone=0;
|
||||
|
||||
if (ordenador.ulaplus) {
|
||||
paint_pixels (255, ordenador.border+24, 0,1); // paint 8 pixels with BORDER color
|
||||
|
|
@ -604,6 +594,8 @@ inline void show_screen (int tstados) {
|
|||
|
||||
// is user area. We search for ink and paper colours
|
||||
|
||||
ordenador.contended_zone=1;
|
||||
|
||||
temporal = ordenador.memoria[(*ordenador.p_translt2) + ordenador.video_offset]; // attributes
|
||||
ordenador.bus_value = temporal;
|
||||
|
||||
|
|
@ -621,13 +613,7 @@ inline void show_screen (int tstados) {
|
|||
fflash = temporal & 0x80; // flash flag
|
||||
}
|
||||
|
||||
// Snow Effect
|
||||
|
||||
if(ordenador.screen_snow) {
|
||||
temporal3 = ordenador.memoria[(((*ordenador.p_translt) + (ordenador.video_offset))&0xFFFFFF80)+(procesador.R&0x7F)]; // data with snow
|
||||
ordenador.screen_snow=0; // no more snow for now
|
||||
} else
|
||||
temporal3 = ordenador.memoria[(*ordenador.p_translt) + ordenador.video_offset]; // bitmap
|
||||
temporal3 = ordenador.memoria[(*ordenador.p_translt) + ordenador.video_offset]; // bitmap
|
||||
|
||||
ordenador.p_translt++;
|
||||
ordenador.p_translt2++;
|
||||
|
|
@ -1127,7 +1113,8 @@ inline void read_keyboard () {
|
|||
SDL_PollEvent (&evento);
|
||||
|
||||
if (pevento->type==SDL_QUIT) {
|
||||
salir = 0;
|
||||
printf("SDL_QUIT event\n");
|
||||
salir = 0;
|
||||
return;
|
||||
}
|
||||
|
||||
|
|
@ -1334,8 +1321,16 @@ inline void read_keyboard () {
|
|||
sprintf (ordenador.osd_text, " Volume: %d ",ordenador.volume);
|
||||
ordenador.osd_time = 50;
|
||||
break;
|
||||
case SDLK_MENU: //Call FBZX wii menu
|
||||
if (ordenador.vk_is_active) virtkey_ir_deactivate();
|
||||
main_menu();
|
||||
break;
|
||||
case SDLK_RCTRL: //Activate virtual keyboard
|
||||
if (!ordenador.vk_auto)
|
||||
{if (!ordenador.vk_is_active) virtkey_ir_activate(); else virtkey_ir_deactivate();}
|
||||
break;
|
||||
}
|
||||
|
||||
|
||||
// reorder joystick if screen is rotated
|
||||
|
||||
if(ordenador.zaurus_mini==2) {
|
||||
|
|
@ -1489,7 +1484,7 @@ inline void read_keyboard () {
|
|||
#endif
|
||||
|
||||
if (ordenador.key[SDLK_SPACE]|| joybutton_matrix[0][SDLK_SPACE] || joybutton_matrix[1][SDLK_SPACE]) ordenador.k15|=1;
|
||||
if (ordenador.key[SDLK_RCTRL]||ordenador.key[SDLK_LCTRL]|| joybutton_matrix[0][SDLK_LCTRL] || joybutton_matrix[1][SDLK_LCTRL]) ordenador.k15|=2; //Symbol shift
|
||||
if (ordenador.key[SDLK_LCTRL]|| joybutton_matrix[0][SDLK_LCTRL] || joybutton_matrix[1][SDLK_LCTRL]) ordenador.k15|=2; //Symbol shift
|
||||
if (ordenador.key[SDLK_m] || joybutton_matrix[0][SDLK_m] || joybutton_matrix[1][SDLK_m]) ordenador.k15|=4;
|
||||
if (ordenador.key[SDLK_n] || joybutton_matrix[0][SDLK_n] || joybutton_matrix[1][SDLK_n]) ordenador.k15|=8;
|
||||
if (ordenador.key[SDLK_b] || joybutton_matrix[0][SDLK_b] || joybutton_matrix[1][SDLK_b]) ordenador.k15|=16;
|
||||
|
|
@ -1756,27 +1751,50 @@ void do_contention() {
|
|||
|
||||
static int ccicles;
|
||||
|
||||
if (ordenador.contended_zone==0) return;
|
||||
|
||||
if (ordenador.mode128k==3) //+3
|
||||
{
|
||||
ccicles=(ordenador.cicles_counter-ordenador.start_contention)%8;
|
||||
|
||||
if (ccicles>6) return;
|
||||
ordenador.contention+=7-ccicles;
|
||||
show_screen(7-ccicles);
|
||||
}
|
||||
else //64k/128k/+2
|
||||
{
|
||||
ccicles=(ordenador.cicles_counter-ordenador.start_contention)%8;
|
||||
|
||||
if (ccicles>5) return;
|
||||
ordenador.contention+=6-ccicles;
|
||||
show_screen(6-ccicles);
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
void do_contention_precision() {
|
||||
|
||||
static int ccicles;
|
||||
|
||||
if ((ordenador.currline < ordenador.upper_border_line ) || (ordenador.currline >= ordenador.lower_border_line)
|
||||
|| (ordenador.currpix < 40) || (ordenador.currpix > 295)) return;
|
||||
|
||||
|
||||
if (ordenador.mode128k==3) //+3
|
||||
{
|
||||
if (ordenador.precision) ccicles=((ordenador.currpix-28)/2)%8; //44-16
|
||||
else ccicles=(ordenador.cicles_counter-ordenador.start_contention)%8;
|
||||
ccicles=((ordenador.currpix-28)/2)%8; //44-16
|
||||
|
||||
if (ccicles>6) return;
|
||||
ordenador.contention+=7-ccicles;
|
||||
emulate_screen(7-ccicles);
|
||||
show_screen_precision(7-ccicles);
|
||||
}
|
||||
else //64k/128k/+2
|
||||
{
|
||||
if (ordenador.precision) ccicles=((ordenador.currpix-40)/2)%8;
|
||||
else ccicles=(ordenador.cicles_counter-ordenador.start_contention)%8;
|
||||
ccicles=((ordenador.currpix-40)/2)%8;
|
||||
|
||||
if (ccicles>5) return;
|
||||
ordenador.contention+=6-ccicles;
|
||||
emulate_screen(6-ccicles);
|
||||
show_screen_precision(6-ccicles);
|
||||
}
|
||||
|
||||
}
|
||||
|
|
@ -1788,26 +1806,26 @@ void Z80free_Wr (register word Addr, register byte Value) {
|
|||
switch (Addr & 0xC000) {
|
||||
case 0x0000:
|
||||
// only writes in the first 16K if we are in +3 mode and bit0 of mport2 is 1
|
||||
if (ordenador.precision) emulate_screen(3);
|
||||
if (ordenador.precision) show_screen_precision(3);
|
||||
if ((ordenador.mode128k == 3) && (1 == (ordenador.mport2 & 0x01)))
|
||||
*(ordenador.block0 + Addr) = (unsigned char) Value;
|
||||
break;
|
||||
|
||||
case 0x4000:
|
||||
do_contention();
|
||||
if (ordenador.precision) emulate_screen(3);
|
||||
if (ordenador.precision) {do_contention_precision();show_screen_precision(3); }
|
||||
else do_contention();
|
||||
*(ordenador.block1 + Addr) = (unsigned char) Value;
|
||||
break;
|
||||
|
||||
case 0x8000:
|
||||
if (ordenador.precision) emulate_screen(3);
|
||||
if (ordenador.precision) show_screen_precision(3);
|
||||
*(ordenador.block2 + Addr) = (unsigned char) Value;
|
||||
break;
|
||||
|
||||
case 0xC000:
|
||||
if (ordenador.precision) {
|
||||
if (((ordenador.mode128k==1)||(ordenador.mode128k==2)||(ordenador.mode128k==4))&&(ordenador.mport1 & 0x01)) do_contention();
|
||||
emulate_screen(3);
|
||||
if (((ordenador.mode128k==1)||(ordenador.mode128k==2)||(ordenador.mode128k==4))&&(ordenador.mport1 & 0x01)) do_contention_precision();
|
||||
show_screen_precision(3);
|
||||
}
|
||||
*(ordenador.block3 + Addr) = (unsigned char) Value;
|
||||
break;
|
||||
|
|
@ -1845,36 +1863,29 @@ byte Z80free_Rd_fetch (register word Addr) {
|
|||
if((ordenador.mdr_active)&&(ordenador.mdr_paged)&&(Addr<8192)) // Interface I
|
||||
return((byte)ordenador.shadowrom[Addr]);
|
||||
|
||||
switch (ordenador.other_ret) {
|
||||
case 1:
|
||||
ordenador.other_ret = 0;
|
||||
return (201); // RET instruction
|
||||
break;
|
||||
|
||||
default:
|
||||
ordenador.r_fetch+=4;
|
||||
switch (Addr & 0xC000) {
|
||||
case 0x0000:
|
||||
if (ordenador.precision) {ordenador.fetch_state=4;emulate_screen (4);}
|
||||
if (ordenador.precision) {ordenador.fetch_state=4;show_screen_precision (4);}
|
||||
return ((byte) (*(ordenador.block0 + Addr)));
|
||||
break;
|
||||
|
||||
case 0x4000:
|
||||
do_contention();
|
||||
if (ordenador.precision) {ordenador.fetch_state=4;emulate_screen (4);}
|
||||
if (ordenador.precision) {do_contention_precision();ordenador.fetch_state=4;show_screen_precision (4);}
|
||||
else do_contention();
|
||||
return ((byte) (*(ordenador.block1 + Addr)));
|
||||
break;
|
||||
|
||||
case 0x8000:
|
||||
if (ordenador.precision) {ordenador.fetch_state=4;emulate_screen (4);}
|
||||
if (ordenador.precision) {ordenador.fetch_state=4;show_screen_precision (4);}
|
||||
return ((byte) (*(ordenador.block2 + Addr)));
|
||||
break;
|
||||
|
||||
case 0xC000:
|
||||
if (ordenador.precision) {
|
||||
if (((ordenador.mode128k==1)||(ordenador.mode128k==2)||(ordenador.mode128k==4))&&(ordenador.mport1 & 0x01)) do_contention();
|
||||
if (((ordenador.mode128k==1)||(ordenador.mode128k==2)||(ordenador.mode128k==4))&&(ordenador.mport1 & 0x01)) do_contention_precision();
|
||||
ordenador.fetch_state=4;
|
||||
emulate_screen (4);
|
||||
show_screen_precision (4);
|
||||
}
|
||||
return ((byte) (*(ordenador.block3 + Addr)));
|
||||
break;
|
||||
|
|
@ -1884,9 +1895,6 @@ byte Z80free_Rd_fetch (register word Addr) {
|
|||
exit (1);
|
||||
return 0;
|
||||
}
|
||||
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
byte Z80free_Rd (register word Addr) {
|
||||
|
|
@ -1894,35 +1902,28 @@ byte Z80free_Rd (register word Addr) {
|
|||
if((ordenador.mdr_active)&&(ordenador.mdr_paged)&&(Addr<8192)) // Interface I
|
||||
return((byte)ordenador.shadowrom[Addr]);
|
||||
|
||||
switch (ordenador.other_ret) {
|
||||
case 1:
|
||||
ordenador.other_ret = 0;
|
||||
return (201); // RET instruction
|
||||
break;
|
||||
|
||||
default:
|
||||
ordenador.wr+=3;
|
||||
switch (Addr & 0xC000) {
|
||||
case 0x0000:
|
||||
if (ordenador.precision) emulate_screen (3);
|
||||
if (ordenador.precision) show_screen_precision (3);
|
||||
return ((byte) (*(ordenador.block0 + Addr)));
|
||||
break;
|
||||
|
||||
case 0x4000:
|
||||
do_contention();
|
||||
if (ordenador.precision) emulate_screen (3);
|
||||
if (ordenador.precision) {do_contention_precision();show_screen_precision (3);}
|
||||
else do_contention();
|
||||
return ((byte) (*(ordenador.block1 + Addr)));
|
||||
break;
|
||||
|
||||
case 0x8000:
|
||||
if (ordenador.precision) emulate_screen (3);
|
||||
if (ordenador.precision) show_screen_precision (3);
|
||||
return ((byte) (*(ordenador.block2 + Addr)));
|
||||
break;
|
||||
|
||||
case 0xC000:
|
||||
if (ordenador.precision) {
|
||||
if (((ordenador.mode128k==1)||(ordenador.mode128k==2)||(ordenador.mode128k==4))&&(ordenador.mport1 & 0x01)) do_contention();
|
||||
emulate_screen (3);
|
||||
if (((ordenador.mode128k==1)||(ordenador.mode128k==2)||(ordenador.mode128k==4))&&(ordenador.mport1 & 0x01)) do_contention_precision();
|
||||
show_screen_precision (3);
|
||||
}
|
||||
return ((byte) (*(ordenador.block3 + Addr)));
|
||||
break;
|
||||
|
|
@ -1932,19 +1933,11 @@ byte Z80free_Rd (register word Addr) {
|
|||
exit (1);
|
||||
return 0;
|
||||
}
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
byte Z80free_Rd_fake (register word Addr) {
|
||||
|
||||
switch (ordenador.other_ret) {
|
||||
case 1:
|
||||
ordenador.other_ret = 0;
|
||||
return (201); // RET instruction
|
||||
break;
|
||||
|
||||
default:
|
||||
switch (Addr & 0xC000) {
|
||||
case 0x0000:
|
||||
return ((byte) (*(ordenador.block0 + Addr)));
|
||||
|
|
@ -1967,9 +1960,6 @@ switch (ordenador.other_ret) {
|
|||
exit (1);
|
||||
return 0;
|
||||
}
|
||||
break;
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
void set_palete_entry(unsigned char entry, byte Value) {
|
||||
|
|
@ -2007,21 +1997,21 @@ void Z80free_Out (register word Port, register byte Value) {
|
|||
{
|
||||
case 0:
|
||||
if ((Port & 0xC000) == 0x4000) // (Port>=0x4000)&&(Port<0x8000)
|
||||
{if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {do_contention();emulate_screen(1);do_contention();ordenador.io+=1;}
|
||||
else {do_contention();emulate_screen(1);do_contention();emulate_screen(1);do_contention();emulate_screen(1);do_contention();ordenador.io+=3;}
|
||||
{if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {do_contention_precision();show_screen_precision(1);do_contention_precision();ordenador.io+=1;}
|
||||
else {do_contention_precision();show_screen_precision(1);do_contention_precision();show_screen_precision(1);do_contention_precision();show_screen_precision(1);do_contention_precision();ordenador.io+=3;}
|
||||
}
|
||||
else
|
||||
if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {emulate_screen(1);do_contention();ordenador.io+=1;}
|
||||
if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {show_screen_precision(1);do_contention_precision();ordenador.io+=1;}
|
||||
break;
|
||||
case 1:
|
||||
case 2:
|
||||
case 4:
|
||||
if (((Port & 0xC000) == 0x4000)||((ordenador.mport1 & 0x01)&&((Port & 0xC000) == 0xC000))) // (Port>=0xc000)&&(Port<=0xffff)
|
||||
{if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {do_contention();emulate_screen(1);do_contention();ordenador.io+=1;}
|
||||
else {do_contention();emulate_screen(1);do_contention();emulate_screen(1);do_contention();emulate_screen(1);do_contention();ordenador.io+=3;}
|
||||
{if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {do_contention_precision();show_screen_precision(1);do_contention_precision();ordenador.io+=1;}
|
||||
else {do_contention_precision();show_screen_precision(1);do_contention_precision();show_screen_precision(1);do_contention_precision();show_screen_precision(1);do_contention_precision();ordenador.io+=3;}
|
||||
}
|
||||
else
|
||||
if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {emulate_screen(1);do_contention();ordenador.io+=1;}
|
||||
if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {show_screen_precision(1);do_contention_precision();ordenador.io+=1;}
|
||||
break;
|
||||
case 3:
|
||||
break; //no io contention in +3
|
||||
|
|
@ -2151,29 +2141,29 @@ byte Z80free_In (register word Port) {
|
|||
{
|
||||
case 0:
|
||||
if ((Port & 0xC000) == 0x4000) // (Port>=0x4000)&&(Port<0x8000)
|
||||
{if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {do_contention();emulate_screen(1);do_contention();emulate_screen(3);}
|
||||
else {do_contention();emulate_screen(1);do_contention();emulate_screen(1);do_contention();emulate_screen(1);do_contention();emulate_screen(1);}
|
||||
{if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {do_contention_precision();show_screen_precision(1);do_contention_precision();show_screen_precision(3);}
|
||||
else {do_contention_precision();show_screen_precision(1);do_contention_precision();show_screen_precision(1);do_contention_precision();show_screen_precision(1);do_contention_precision();show_screen_precision(1);}
|
||||
}
|
||||
else
|
||||
if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {emulate_screen(1);do_contention();emulate_screen(3);}
|
||||
else emulate_screen(4);
|
||||
if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {show_screen_precision(1);do_contention_precision();show_screen_precision(3);}
|
||||
else show_screen_precision(4);
|
||||
break;
|
||||
case 1:
|
||||
case 2:
|
||||
case 4:
|
||||
if (((Port & 0xC000) == 0x4000)||((ordenador.mport1 & 0x01)&&((Port & 0xC000) == 0xC000))) // (Port>=0xc000)&&(Port<=0xffff)
|
||||
{if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {do_contention();emulate_screen(1);do_contention();emulate_screen(3);}
|
||||
else {do_contention();emulate_screen(1);do_contention();emulate_screen(1);do_contention();emulate_screen(1);do_contention();emulate_screen(1);}
|
||||
{if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {do_contention_precision();show_screen_precision(1);do_contention_precision();show_screen_precision(3);}
|
||||
else {do_contention_precision();show_screen_precision(1);do_contention_precision();show_screen_precision(1);do_contention_precision();show_screen_precision(1);do_contention_precision();show_screen_precision(1);}
|
||||
}
|
||||
else
|
||||
if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {emulate_screen(1);do_contention();emulate_screen(3);}
|
||||
else emulate_screen(4);
|
||||
if ((Port&0x0001)==0 ||(Port == 0xBF3B)||(Port == 0xFF3B)) {show_screen_precision(1);do_contention_precision();show_screen_precision(3);}
|
||||
else show_screen_precision(4);
|
||||
break;
|
||||
case 3:
|
||||
emulate_screen(4);//no io contention in +3
|
||||
show_screen_precision(4);//no io contention in +3
|
||||
break;
|
||||
default:
|
||||
emulate_screen(4);
|
||||
show_screen_precision(4);
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
|
|
|||
|
|
@ -90,9 +90,9 @@ struct computer {
|
|||
int start_contention; //start tstados for contention
|
||||
//int end_contention; //end tstados for contention
|
||||
|
||||
unsigned char screen_snow; // 0-> no emulate snow; 1-> emulate snow
|
||||
//unsigned char screen_snow; // 0-> no emulate snow; 1-> emulate snow
|
||||
unsigned char fetch_state;
|
||||
//unsigned char contended_zone; // 0-> no contention; 1-> contention possible
|
||||
unsigned char contended_zone; // 0-> no contention; 1-> contention possible
|
||||
int cicles_counter; // counts how many pixel clock cicles passed since las interrupt
|
||||
|
||||
char ulaplus; // 0 = inactive; 1 = active
|
||||
|
|
@ -237,7 +237,7 @@ struct computer {
|
|||
unsigned char interr;
|
||||
unsigned char readkeyboard;
|
||||
unsigned char mustlock;
|
||||
unsigned char other_ret; // 0=no change; 1=memory returns RET (201)
|
||||
//unsigned char other_ret; // 0=no change; 1=memory returns RET (201)
|
||||
|
||||
unsigned char turbo;
|
||||
unsigned char turbo_state;
|
||||
|
|
|
|||
123
src/emulator.c
123
src/emulator.c
|
|
@ -48,8 +48,6 @@
|
|||
#include <ogc/usbstorage.h>
|
||||
#include <network.h>
|
||||
#include <smb.h>
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include "tinyFTP/ftp_devoptab.h"
|
||||
#endif
|
||||
|
||||
|
|
@ -82,7 +80,7 @@ char load_path_scr1[MAX_PATH_LENGTH];
|
|||
char load_path_poke[MAX_PATH_LENGTH];
|
||||
|
||||
unsigned int colors[80];
|
||||
unsigned int jump_frames,curr_frames;
|
||||
unsigned int jump_frames,curr_frames, turbo_n;
|
||||
|
||||
static SDL_Surface *image;
|
||||
|
||||
|
|
@ -97,6 +95,10 @@ extern int FULL_DISPLAY_X; //640
|
|||
extern int FULL_DISPLAY_Y; //480
|
||||
extern int RATIO;
|
||||
|
||||
#ifdef MINGW
|
||||
#define mkdir(name, mode) mkdir(name)
|
||||
#endif
|
||||
|
||||
#if defined(GEKKO)
|
||||
|
||||
|
||||
|
|
@ -322,13 +324,11 @@ FILE *myfopen(char *filename,char *mode) {
|
|||
if (fichero!=NULL) {
|
||||
return (fichero);
|
||||
}
|
||||
#ifdef GEKKO
|
||||
sprintf(tmp,"/fbzx-wii/%s",filename);
|
||||
fichero=fopen(tmp,mode);
|
||||
if (fichero!=NULL) {
|
||||
return (fichero);
|
||||
}
|
||||
#endif
|
||||
|
||||
return (NULL);
|
||||
}
|
||||
|
|
@ -341,7 +341,7 @@ char *load_a_rom(char **filenames) {
|
|||
int size;
|
||||
|
||||
for(pointer=filenames;*pointer!=NULL;pointer++) {
|
||||
fichero=myfopen(*pointer,"r");
|
||||
fichero=myfopen(*pointer,"rb");
|
||||
if(fichero==NULL) {
|
||||
return (*pointer);
|
||||
}
|
||||
|
|
@ -433,10 +433,10 @@ void load_rom(char type) {
|
|||
break;
|
||||
}
|
||||
|
||||
fichero=myfopen("spectrum-roms/if1-2.rom","r"); // load Interface1 ROM
|
||||
fichero=myfopen("spectrum-roms/if1-2.rom","rb"); // load Interface1 ROM
|
||||
if(fichero==NULL) {
|
||||
// try legacy name
|
||||
fichero=myfopen("spectrum-roms/if1-v2.rom","r");
|
||||
fichero=myfopen("spectrum-roms/if1-v2.rom","rb");
|
||||
if(fichero==NULL) {
|
||||
printf("Can't open Interface1 ROM file\n");
|
||||
exit(1);
|
||||
|
|
@ -471,21 +471,18 @@ int set_video_mode()
|
|||
VIDEO_Configure(rmode);
|
||||
VIDEO_Flush();
|
||||
VIDEO_WaitVSync();
|
||||
|
||||
#endif
|
||||
return 0;
|
||||
|
||||
|
||||
#endif
|
||||
}
|
||||
|
||||
void init_sdl()
|
||||
{
|
||||
int retorno, bucle;
|
||||
|
||||
//if (sound_type!=3)
|
||||
retorno=SDL_Init(SDL_INIT_VIDEO);
|
||||
/*else
|
||||
retorno=SDL_Init(SDL_INIT_VIDEO|SDL_INIT_AUDIO);*/
|
||||
if (sound_type==SOUND_SDL)
|
||||
retorno=SDL_Init(SDL_INIT_VIDEO|SDL_INIT_AUDIO);
|
||||
else
|
||||
retorno=SDL_Init(SDL_INIT_VIDEO);
|
||||
if(retorno!=0) {
|
||||
printf("Can't initialize SDL library. Exiting\n");
|
||||
exit(1);
|
||||
|
|
@ -558,16 +555,13 @@ void init_sound()
|
|||
int bucle, bucle2,ret2;
|
||||
// sound initialization
|
||||
|
||||
if (sound_type==SOUND_AUTOMATIC) {
|
||||
ret2=sound_init(1); // check all sound systems
|
||||
} else {
|
||||
ret2=sound_init(0); // try with the one specified in command line
|
||||
}
|
||||
ret2=sound_init(); // check all sound systems or the selected sound
|
||||
|
||||
if(ret2==0) {
|
||||
sound_aborted=0;
|
||||
} else { // if fails, run without sound
|
||||
sound_type=SOUND_NO;
|
||||
sound_init(0);
|
||||
sound_init();
|
||||
sound_aborted=1;
|
||||
}
|
||||
printf("Init sound\n");
|
||||
|
|
@ -578,17 +572,24 @@ int bucle, bucle2,ret2;
|
|||
|
||||
for(bucle2=0;bucle2<NUM_SNDBUF;bucle2++) {
|
||||
//ASND Required alligned memory with padding
|
||||
#ifdef GEKKO
|
||||
sound[bucle2]=(unsigned int *)memalign(32,ordenador.buffer_len*ordenador.increment+32);
|
||||
for(bucle=0;bucle<ordenador.buffer_len+8;bucle++)
|
||||
sound[bucle2][bucle]=0;
|
||||
#else
|
||||
sound[bucle2]=(unsigned int *) calloc(ordenador.buffer_len+1,ordenador.increment);
|
||||
for(bucle=0;bucle<ordenador.buffer_len;bucle++)
|
||||
sound[bucle2][bucle]=0;
|
||||
#endif
|
||||
}
|
||||
|
||||
printf("Init sound 2\n");
|
||||
ordenador.tst_sample=(ordenador.cpufreq + (ordenador.freq*N_SAMPLES/2))/(ordenador.freq*N_SAMPLES);
|
||||
}
|
||||
|
||||
void end_system() {
|
||||
|
||||
printf("Quitting...\n");
|
||||
|
||||
sound_close();
|
||||
|
||||
if(ordenador.mustlock)
|
||||
|
|
@ -598,6 +599,17 @@ void end_system() {
|
|||
fclose(ordenador.tap_file);
|
||||
|
||||
SDL_Quit();
|
||||
|
||||
if (!chdir(path_tmp)) {chdir("/"); remove_dir(path_tmp);} //remove the tmp directory if it exists
|
||||
|
||||
#ifdef GEKKO
|
||||
if (smbismount) CloseShare();
|
||||
if (ftpismount) CloseFTP();
|
||||
DeInitUSB();
|
||||
fatUnmount(0);
|
||||
#endif
|
||||
|
||||
free_browser();
|
||||
}
|
||||
|
||||
void load_main_game(char *nombre) {
|
||||
|
|
@ -618,7 +630,7 @@ void load_main_game(char *nombre) {
|
|||
if ((0==strcasecmp(".tap",puntero))||(0==strcasecmp(".tzx",puntero))) {
|
||||
char char_id[10];
|
||||
ordenador.tape_write = 0; // by default, can't record
|
||||
ordenador.tap_file=fopen(nombre,"r+"); // read and write
|
||||
ordenador.tap_file=fopen(nombre,"r+b"); // read and write
|
||||
if(ordenador.tap_file==NULL)
|
||||
return;
|
||||
|
||||
|
|
@ -738,7 +750,7 @@ int save_config_game(struct computer *object, char *filename, int overwrite) {
|
|||
unsigned char key, joy_n;
|
||||
FILE *fconfig;
|
||||
|
||||
fconfig=fopen(filename,"r");
|
||||
fconfig=fopen(filename,"rb");
|
||||
if((fconfig!=NULL)&&(!overwrite)) {
|
||||
fclose(fconfig);
|
||||
return -1; // file already exists
|
||||
|
|
@ -774,7 +786,7 @@ void load_config_network(struct computer *object) {
|
|||
unsigned char smb_enable=0, ftp_enable=0, FTPPassive=0;
|
||||
unsigned int FTPPort=21;
|
||||
|
||||
fconfig = fopen("/fbzx-wii/fbzx.net","r");
|
||||
fconfig = fopen("/fbzx-wii/fbzx.net","rb");
|
||||
if (fconfig==NULL) {
|
||||
return;
|
||||
}
|
||||
|
|
@ -1135,7 +1147,16 @@ int load_config(struct computer *object, char *filename) {
|
|||
return 0;
|
||||
}
|
||||
|
||||
int main(int argc,char *argv[]) {
|
||||
#ifdef MINGW
|
||||
int WinMain()
|
||||
{
|
||||
int argc=__argc;
|
||||
char **argv=__argv;
|
||||
|
||||
#else
|
||||
int main(int argc,char *argv[])
|
||||
{
|
||||
#endif
|
||||
|
||||
int bucle,tstados,tstados_screen, argumento,fullscreen,dblbuffer,hwsurface,length;
|
||||
char gamefile[MAX_PATH_LENGTH],config_path[MAX_PATH_LENGTH] ;
|
||||
|
|
@ -1159,15 +1180,23 @@ int main(int argc,char *argv[]) {
|
|||
curr_frames=0;
|
||||
ordenador.dblscan=1;
|
||||
ordenador.bw=0;
|
||||
turbo_n=1;
|
||||
|
||||
#ifdef DEBUG
|
||||
fatInitDefault();
|
||||
#ifdef GEKKO
|
||||
fatInitDefault();
|
||||
#endif
|
||||
fdebug = fopen("/fbzx-wii/logfile.txt","w");
|
||||
#endif
|
||||
|
||||
#ifdef MINGW
|
||||
if(!getenv("HOME")) putenv("HOME=/fbzx-wii");
|
||||
#endif
|
||||
|
||||
#ifdef GEKKO
|
||||
dblbuffer=1;
|
||||
hwsurface=1;
|
||||
sound_type=SOUND_ASND;
|
||||
setenv("HOME", "/fbzx-wii", 1);
|
||||
|
||||
//initialize libfat library
|
||||
|
|
@ -1248,7 +1277,8 @@ int main(int argc,char *argv[]) {
|
|||
printf(" -ss: force singlescan (emulate TV black stripes)\n");
|
||||
printf(" -bw: emulate black&white TV set\n");
|
||||
printf(" -color: emulate a color TV set\n");
|
||||
printf(" -jump N: show one TV refresh and jump over N refreshes (for slow systems)\n");
|
||||
printf(" -jumpN: show one TV refresh and jump over N refreshes (for slow systems)\n");
|
||||
printf(" -turboN: accelerate the tape loading by N (2-9)\n");
|
||||
printf(" gamefile: an optional .Z80 snapshot or .TAP/.TZX tape file\n\n");
|
||||
exit(0);
|
||||
} else if(0==strcmp(argv[argumento],"-nosound")) {
|
||||
|
|
@ -1302,9 +1332,16 @@ int main(int argc,char *argv[]) {
|
|||
argumento++;
|
||||
} else if(0==strncmp(argv[argumento],"-jump",5)) {
|
||||
jump_frames=(int)(argv[argumento][5]);
|
||||
jump_frames-=48;//???
|
||||
jump_frames-=48;
|
||||
if ((jump_frames<0)||(jump_frames>9)) jump_frames = 0;
|
||||
argumento++;
|
||||
printf ("Jump %d\n",jump_frames);
|
||||
} else if(0==strncmp(argv[argumento],"-turbo",6)) {
|
||||
turbo_n=(int)(argv[argumento][6]);
|
||||
turbo_n-=48;
|
||||
if ((turbo_n<1)||(turbo_n>9)) turbo_n = 1;
|
||||
argumento++;
|
||||
printf ("turbo %d\n",turbo_n);
|
||||
} else {
|
||||
strcpy(gamefile,argv[argumento]);
|
||||
argumento++;
|
||||
|
|
@ -1338,7 +1375,7 @@ int main(int argc,char *argv[]) {
|
|||
if(fullscreen) {
|
||||
SDL_Fullscreen_Switch();
|
||||
}
|
||||
SDL_WM_SetCaption("FBZX","");
|
||||
SDL_WM_SetCaption("FBZX Wii","");
|
||||
#endif
|
||||
ordenador.interr=0;
|
||||
ordenador.readkeyboard = 0;
|
||||
|
|
@ -1393,7 +1430,7 @@ int main(int argc,char *argv[]) {
|
|||
|
||||
//Remove and make tmp dir
|
||||
|
||||
if (!chdir(path_tmp)) remove_dir(path_tmp); //remove the tmp directory if it exists
|
||||
if (!chdir(path_tmp)) {chdir("/"); remove_dir(path_tmp);} //remove the tmp directory if it exists
|
||||
|
||||
int write_protection=0;
|
||||
|
||||
|
|
@ -1489,6 +1526,9 @@ int main(int argc,char *argv[]) {
|
|||
SDL_EventState(SDL_SYSWMEVENT,SDL_IGNORE);
|
||||
SDL_EventState(SDL_VIDEORESIZE,SDL_IGNORE);
|
||||
SDL_EventState(SDL_USEREVENT,SDL_IGNORE);
|
||||
#ifndef GEKKO
|
||||
SDL_EventState(SDL_MOUSEBUTTONDOWN,SDL_ENABLE);
|
||||
#endif
|
||||
|
||||
SDL_ShowCursor(SDL_DISABLE);
|
||||
salir=1;
|
||||
|
|
@ -1499,7 +1539,7 @@ int main(int argc,char *argv[]) {
|
|||
printf("Reset computer\n");
|
||||
ResetComputer();
|
||||
|
||||
sleep(1);
|
||||
SDL_Delay(1000);
|
||||
|
||||
printf("Reset screen\n");
|
||||
clean_screen();
|
||||
|
|
@ -1526,7 +1566,7 @@ int main(int argc,char *argv[]) {
|
|||
if (ordenador.precision)
|
||||
{
|
||||
tstados_screen=tstados-ordenador.r_fetch -ordenador.wr -ordenador.io;
|
||||
if(tstados_screen>0) emulate_screen(tstados_screen);
|
||||
if(tstados_screen>0) show_screen_precision(tstados_screen);
|
||||
ordenador.wr=0;
|
||||
ordenador.r_fetch=0;
|
||||
ordenador.io=0;
|
||||
|
|
@ -1535,7 +1575,7 @@ int main(int argc,char *argv[]) {
|
|||
}
|
||||
else
|
||||
if (tstados>0) {
|
||||
emulate_screen(tstados);
|
||||
show_screen(tstados);
|
||||
emulate(tstados+ordenador.contention);
|
||||
ordenador.contention=0;
|
||||
}
|
||||
|
|
@ -1604,19 +1644,8 @@ int main(int argc,char *argv[]) {
|
|||
if(ordenador.interr==1) {
|
||||
Z80free_INT(&procesador,bus_empty());
|
||||
if ((ordenador.precision==0)||(jump_frames>0)) ordenador.interr=0;
|
||||
}
|
||||
} //else if (ordenador.precision==1) Z80free_INT_reset(&procesador);
|
||||
}
|
||||
|
||||
if (!chdir(path_tmp)) remove_dir(path_tmp); //remove the tmp directory if it exists
|
||||
|
||||
#ifdef GEKKO
|
||||
if (smbismount) CloseShare();
|
||||
if (ftpismount) CloseFTP();
|
||||
DeInitUSB();
|
||||
fatUnmount(0);
|
||||
#endif
|
||||
|
||||
free_browser();
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
|
|
|||
|
|
@ -46,7 +46,7 @@ extern char load_path_scr1[MAX_PATH_LENGTH];
|
|||
extern char load_path_poke[MAX_PATH_LENGTH];
|
||||
|
||||
extern unsigned int colors[80];
|
||||
extern unsigned int jump_frames,curr_frames;
|
||||
extern unsigned int jump_frames,curr_frames, turbo_n;
|
||||
extern unsigned char sdismount, usbismount, smbismount, tmpismade, ftpismount,networkisinit;
|
||||
|
||||
void SDL_Fullscreen_Switch(void);
|
||||
|
|
|
|||
|
|
@ -236,7 +236,7 @@ static void tape_browser()
|
|||
const char *row_selected;
|
||||
char block_n[5];
|
||||
|
||||
if (browser_list[0]==NULL) {msgInfo("No tape inserted",3000,NULL);return;}
|
||||
if (browser_list[0]==NULL) {msgInfo("No tape inserted or empty",3000,NULL);return;}
|
||||
|
||||
row_selected = menu_select_browser(ordenador.tape_position);
|
||||
|
||||
|
|
@ -297,7 +297,7 @@ static void insert_tape()
|
|||
}
|
||||
|
||||
if (!strncmp(filename,"smb:",4)) ordenador.tap_file=fopen(filename,"r"); //tinysmb does not work with r+
|
||||
else ordenador.tap_file=fopen(filename,"r+"); // read and write
|
||||
else ordenador.tap_file=fopen(filename,"r+b"); // read and write
|
||||
|
||||
ordenador.tape_write = 1; // by default, can record
|
||||
|
||||
|
|
@ -325,12 +325,10 @@ static void insert_tape()
|
|||
retval=fread(char_id,10,1,ordenador.tap_file); // read the (maybe) TZX header
|
||||
if((!strncmp(char_id,"ZXTape!",7)) && (char_id[7]==0x1A)&&(char_id[8]==1)) {
|
||||
ordenador.tape_file_type = TAP_TZX;
|
||||
rewind_tape(ordenador.tap_file,1);
|
||||
browser_tzx(ordenador.tap_file);
|
||||
create_browser_tzx(ordenador.tap_file);
|
||||
} else {
|
||||
ordenador.tape_file_type = TAP_TAP;
|
||||
rewind_tape(ordenador.tap_file,1);
|
||||
browser_tap(ordenador.tap_file);
|
||||
create_browser_tap(ordenador.tap_file);
|
||||
}
|
||||
|
||||
}
|
||||
|
|
@ -376,14 +374,14 @@ void create_tapfile_sdl() {
|
|||
if(ordenador.tap_file!=NULL)
|
||||
fclose(ordenador.tap_file);
|
||||
|
||||
ordenador.tap_file=fopen(nombre2,"r"); // test if it exists
|
||||
ordenador.tap_file=fopen(nombre2,"rb"); // test if it exists
|
||||
if(ordenador.tap_file==NULL)
|
||||
retorno=0;
|
||||
else
|
||||
retorno=-1;
|
||||
|
||||
if(!retorno) {
|
||||
ordenador.tap_file=fopen(nombre2,"a+"); // create for read and write
|
||||
ordenador.tap_file=fopen(nombre2,"a+b"); // create for read and write
|
||||
if(ordenador.tap_file==NULL)
|
||||
retorno=-2;
|
||||
else
|
||||
|
|
@ -395,6 +393,7 @@ void create_tapfile_sdl() {
|
|||
switch(retorno) {
|
||||
case 0:
|
||||
strcpy(ordenador.last_selected_file,nombre2);
|
||||
create_browser_tap(ordenador.tap_file);
|
||||
break;
|
||||
case -1:
|
||||
msgInfo("File already exists",3000,NULL);
|
||||
|
|
@ -942,7 +941,7 @@ void create_mdrfile_sdl() {
|
|||
if(retorno==2) // abort
|
||||
return;
|
||||
|
||||
ordenador.mdr_file=fopen(nombre2,"r"); // test if it exists
|
||||
ordenador.mdr_file=fopen(nombre2,"rb"); // test if it exists
|
||||
if(ordenador.mdr_file==NULL)
|
||||
retorno=0;
|
||||
else
|
||||
|
|
@ -1139,7 +1138,7 @@ static int save_scr(int i)
|
|||
snprintf(db, MAX_PATH_LENGTH-1, "%s/%s.scr", dir, fb);
|
||||
|
||||
|
||||
fichero=fopen(db,"r");
|
||||
fichero=fopen(db,"rb");
|
||||
|
||||
if(fichero!=NULL)
|
||||
{
|
||||
|
|
@ -1195,6 +1194,7 @@ static void set_port(int which)
|
|||
strcat(load_path_poke,"poke");
|
||||
ordenador.port = which;
|
||||
break;
|
||||
#ifdef GEKKO
|
||||
case 1: //PORT_SD
|
||||
if (sdismount) {
|
||||
strcpy(load_path_snaps,"sd:/");
|
||||
|
|
@ -1249,7 +1249,8 @@ static void set_port(int which)
|
|||
ordenador.port = which;}
|
||||
else
|
||||
msgInfo("FTP is not mounted",3000,NULL);
|
||||
break;
|
||||
break;
|
||||
#endif
|
||||
default:
|
||||
break;
|
||||
}
|
||||
|
|
@ -1371,7 +1372,7 @@ int parse_poke (const char *filename)
|
|||
|
||||
trainer=0;
|
||||
|
||||
fpoke = fopen(filename,"r");
|
||||
fpoke = fopen(filename,"rb");
|
||||
|
||||
if (fpoke==NULL)
|
||||
{
|
||||
|
|
@ -1809,7 +1810,7 @@ static void save_load_general_configurations(int which)
|
|||
case 2:
|
||||
case 0: // Load or delete file
|
||||
{
|
||||
fconfig = fopen(config_path,"r");
|
||||
fconfig = fopen(config_path,"rb");
|
||||
if (fconfig==NULL)
|
||||
{
|
||||
msgInfo("Can not access the file",3000,NULL);
|
||||
|
|
|
|||
|
|
@ -86,14 +86,10 @@ static SDL_Surface *real_screen;
|
|||
#define IS_SUBMENU(p_msg) ( (p_msg)[0] == '^' )
|
||||
#define IS_TEXT(p_msg) ( (p_msg)[0] == '#' || (p_msg)[0] == ' ' )
|
||||
#define IS_MARKER(p_msg) ( (p_msg)[0] == '@' )
|
||||
#define FONT_PATH "/fbzx-wii/fbzx/FreeMono.ttf"
|
||||
|
||||
static int is_inited = 0;
|
||||
static TTF_Font *menu_font16, *menu_font20, *menu_font8, *menu_font10;
|
||||
#if defined(GEKKO)
|
||||
#define FONT_PATH "/fbzx-wii/fbzx/FreeMono.ttf"
|
||||
#else
|
||||
#define FONT_PATH "FreeMono.ttf"
|
||||
#endif
|
||||
|
||||
int fh, fw;
|
||||
|
||||
|
|
@ -1035,10 +1031,6 @@ uint32_t menu_wait_key_press()
|
|||
case SDLK_PAGEUP:
|
||||
keys |= KEY_PAGEUP;
|
||||
break;
|
||||
case SDLK_RETURN:
|
||||
case SDLK_SPACE:
|
||||
keys |= KEY_SELECT;
|
||||
break;
|
||||
case SDLK_HOME:
|
||||
case SDLK_ESCAPE:
|
||||
keys |= KEY_ESCAPE;
|
||||
|
|
@ -1047,14 +1039,28 @@ uint32_t menu_wait_key_press()
|
|||
break;
|
||||
}
|
||||
break;
|
||||
case SDL_QUIT:
|
||||
exit(0);
|
||||
case SDL_KEYUP:
|
||||
switch (ev.key.keysym.sym)
|
||||
{
|
||||
case SDLK_RETURN:
|
||||
case SDLK_SPACE:
|
||||
keys |= KEY_SELECT;
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
|
||||
}
|
||||
}
|
||||
break;
|
||||
case SDL_QUIT:
|
||||
exit(0);
|
||||
break;
|
||||
#ifndef GEKKO
|
||||
case SDL_MOUSEBUTTONDOWN:
|
||||
if (ev.button.button==SDL_BUTTON_LEFT) keys |= KEY_SELECT;
|
||||
break;
|
||||
#endif
|
||||
default:
|
||||
break;
|
||||
}
|
||||
}
|
||||
|
||||
if (keys != 0)
|
||||
|
|
@ -1456,7 +1462,7 @@ static TTF_Font *read_font(const char *path, int font_size)
|
|||
TTF_Font *out;
|
||||
SDL_RWops *rw;
|
||||
Uint8 *data = (Uint8*)malloc(1 * 1024*1024);
|
||||
FILE *fp = fopen(path, "r");
|
||||
FILE *fp = fopen(path, "rb");
|
||||
|
||||
if (!data) {
|
||||
fprintf(stderr, "Malloc failed\n");
|
||||
|
|
|
|||
30
src/menus.c
30
src/menus.c
|
|
@ -208,7 +208,12 @@ void settings_menu() {
|
|||
|
||||
print_string(fbuffer,"V:",30,400,12,0,ancho);
|
||||
print_string(fbuffer,"TV Set mode",78,400,15,0,ancho);
|
||||
|
||||
|
||||
#ifndef GEKKO
|
||||
print_string(fbuffer,"F:",350,400,12,0,ancho);
|
||||
print_string(fbuffer,"Full screen",398,400,15,0,ancho);
|
||||
#endif
|
||||
|
||||
print_string(fbuffer,"ESC:",168,450,12,0,ancho);
|
||||
print_string(fbuffer,"return emulator",232,450,15,0,ancho);
|
||||
|
||||
|
|
@ -297,7 +302,12 @@ void settings_menu() {
|
|||
} else {
|
||||
ordenador.turbo = 1; //Auto mode
|
||||
}
|
||||
break;
|
||||
break;
|
||||
#ifndef GEKKO
|
||||
case SDLK_f:
|
||||
SDL_Fullscreen_Switch();
|
||||
break;
|
||||
#endif
|
||||
}
|
||||
} while(fin);
|
||||
|
||||
|
|
@ -706,7 +716,7 @@ void select_tapfile() {
|
|||
}
|
||||
|
||||
if (!strncmp(filename,"smb:",4)) ordenador.tap_file=fopen(filename,"r"); //tinysmb does not work with r+
|
||||
else ordenador.tap_file=fopen(filename,"r+"); // read and write
|
||||
else ordenador.tap_file=fopen(filename,"r+b"); // read and write
|
||||
ordenador.tape_write = 0; // by default, can't record
|
||||
|
||||
if(ordenador.tap_file==NULL)
|
||||
|
|
@ -734,12 +744,10 @@ void select_tapfile() {
|
|||
retval=fread(char_id,10,1,ordenador.tap_file); // read the (maybe) TZX header
|
||||
if((!strncmp(char_id,"ZXTape!",7)) && (char_id[7]==0x1A)&&(char_id[8]==1)) {
|
||||
ordenador.tape_file_type = TAP_TZX;
|
||||
rewind_tape(ordenador.tap_file,1);
|
||||
browser_tzx(ordenador.tap_file);
|
||||
create_browser_tzx(ordenador.tap_file);
|
||||
} else {
|
||||
ordenador.tape_file_type = TAP_TAP;
|
||||
rewind_tape(ordenador.tap_file,1);
|
||||
browser_tap(ordenador.tap_file);
|
||||
create_browser_tap(ordenador.tap_file);
|
||||
}
|
||||
|
||||
clean_screen();
|
||||
|
|
@ -780,7 +788,7 @@ void create_tapfile() {
|
|||
retorno=-1;
|
||||
|
||||
if(!retorno) {
|
||||
ordenador.tap_file=fopen(nombre2,"a+"); // create for read and write
|
||||
ordenador.tap_file=fopen(nombre2,"a+b"); // create for read and write
|
||||
if(ordenador.tap_file==NULL)
|
||||
retorno=-2;
|
||||
else
|
||||
|
|
@ -791,6 +799,8 @@ void create_tapfile() {
|
|||
ordenador.tape_file_type = TAP_TAP;
|
||||
switch(retorno) {
|
||||
case 0:
|
||||
strcpy(ordenador.last_selected_file,nombre2);
|
||||
create_browser_tap(ordenador.tap_file);
|
||||
break;
|
||||
case -1:
|
||||
print_string(videomem,"File already exists",-1,80,10,0,ancho);
|
||||
|
|
@ -1872,7 +1882,7 @@ void keyboard_menu() {
|
|||
buffer=screen->pixels;
|
||||
|
||||
clean_screen();
|
||||
fichero=myfopen("fbzx/keymap.bmp","r");
|
||||
fichero=myfopen("fbzx/keymap.bmp","rb");
|
||||
if (fichero==NULL) {
|
||||
strcpy(ordenador.osd_text,"Keymap picture not found");
|
||||
ordenador.osd_time=100;
|
||||
|
|
@ -2019,7 +2029,7 @@ if (freq == 0)
|
|||
ordenador.cpufreq = 3500000;
|
||||
break;
|
||||
}
|
||||
else ordenador.cpufreq = freq;
|
||||
else ordenador.cpufreq = freq*turbo_n;
|
||||
|
||||
ordenador.tst_sample=(ordenador.cpufreq + (ordenador.freq*N_SAMPLES/2))/(ordenador.freq*N_SAMPLES);
|
||||
|
||||
|
|
|
|||
103
src/sound.c
103
src/sound.c
|
|
@ -24,12 +24,14 @@
|
|||
#include <sys/types.h>
|
||||
#include <sys/stat.h>
|
||||
#include <unistd.h>
|
||||
#include <SDL/SDL_audio.h>
|
||||
|
||||
|
||||
//char tabla[1024];
|
||||
|
||||
#include <fcntl.h>
|
||||
#ifndef GEKKO
|
||||
#include <sys/ioctl.h>
|
||||
//#include <sys/ioctl.h>
|
||||
#endif
|
||||
|
||||
#ifdef DEBUG
|
||||
|
|
@ -70,6 +72,11 @@ pa_simple *pulse_s;
|
|||
int started_sound_asnd;
|
||||
#endif
|
||||
|
||||
unsigned char started_sound_sdl;
|
||||
unsigned char buffer0_occupied;
|
||||
unsigned char buffer1_occupied;
|
||||
unsigned char buffer_reading;
|
||||
|
||||
enum e_soundtype sound_type;
|
||||
|
||||
int sound_init() {
|
||||
|
|
@ -79,12 +86,22 @@ int sound_init() {
|
|||
case SOUND_NO: // No sound; simulate 8bits mono
|
||||
printf("No Sound\n");
|
||||
ordenador.sign=0;
|
||||
ordenador.format=0;
|
||||
ordenador.channels=1;
|
||||
ordenador.format=1;
|
||||
ordenador.channels=2;
|
||||
ordenador.freq=48000;
|
||||
ordenador.buffer_len=4800; // will wait 1/10 second
|
||||
return (0);
|
||||
break;
|
||||
case SOUND_SDL:
|
||||
printf("Trying SDL sound\n");
|
||||
if(0==sound_init_sdl()) {
|
||||
sound_type=SOUND_SDL;
|
||||
return 0;
|
||||
} else {
|
||||
printf("Failed\n");
|
||||
return -1;
|
||||
}
|
||||
break;
|
||||
#ifdef D_SOUND_PULSE
|
||||
case SOUND_PULSEAUDIO:
|
||||
printf("Trying PulseAudio\n");
|
||||
|
|
@ -138,6 +155,13 @@ int sound_init() {
|
|||
break;
|
||||
}
|
||||
}
|
||||
|
||||
printf("Trying SDL sound\n");
|
||||
if(0==sound_init_sdl()) {
|
||||
sound_type=SOUND_SDL;
|
||||
return 0;
|
||||
}
|
||||
|
||||
#ifdef D_SOUND_PULSE
|
||||
printf("Trying PulseAudio\n");
|
||||
if(0==sound_init_pulse()) {
|
||||
|
|
@ -172,6 +196,58 @@ int sound_init() {
|
|||
return -1;
|
||||
}
|
||||
|
||||
void sdlcallback(void *unused, Uint8 *stream, int len)
|
||||
{
|
||||
int i;
|
||||
len=len/4;
|
||||
|
||||
for(i=0;i<len;i++) //len = ordenador.buffer_len
|
||||
{
|
||||
if (buffer_reading==0)
|
||||
{
|
||||
*((unsigned int *)stream) =sound[0][i];
|
||||
sound[0][i]=0;
|
||||
}
|
||||
else
|
||||
{
|
||||
*((unsigned int *)stream) =sound[1][i];
|
||||
sound[1][i]=0;
|
||||
}
|
||||
stream=stream+4;
|
||||
}
|
||||
|
||||
//change reading buffer
|
||||
if (buffer_reading==0) {buffer0_occupied=0;if (buffer1_occupied) buffer_reading=1;}
|
||||
else {buffer1_occupied=0;if (buffer0_occupied) buffer_reading=0;}
|
||||
|
||||
}
|
||||
|
||||
int sound_init_sdl() {
|
||||
|
||||
SDL_AudioSpec fmt;
|
||||
|
||||
ordenador.sign=0;
|
||||
ordenador.format=1; //16 bit
|
||||
ordenador.channels=2; //stereo
|
||||
ordenador.freq=48000;
|
||||
ordenador.buffer_len=4096;
|
||||
|
||||
/* Set 16-bit stereo audio at 48Khz */
|
||||
fmt.freq = ordenador.freq;
|
||||
fmt.format = AUDIO_U16LSB; //unsigned Little endian
|
||||
fmt.channels = ordenador.channels;
|
||||
fmt.samples = ordenador.buffer_len; //number of samples
|
||||
fmt.callback = sdlcallback;
|
||||
fmt.userdata = NULL;
|
||||
|
||||
started_sound_sdl=0;
|
||||
|
||||
/* Open the audio device and start playing sound! */
|
||||
if (SDL_OpenAudio(&fmt, NULL) < 0 ) return -1;
|
||||
|
||||
return 0;
|
||||
}
|
||||
|
||||
#ifdef GEKKO
|
||||
int voice;
|
||||
void callback(voice)
|
||||
|
|
@ -465,6 +541,24 @@ void sound_play() {
|
|||
usleep(75000); // wait 1/20 second
|
||||
return;
|
||||
break;
|
||||
case SOUND_SDL: // SDL
|
||||
if (!started_sound_sdl) {
|
||||
SDL_PauseAudio(0);
|
||||
ordenador.current_buffer = sound[0];
|
||||
buffer0_occupied=1;
|
||||
started_sound_sdl = 1;
|
||||
buffer_reading=0;
|
||||
}
|
||||
//Double buffer
|
||||
while ((buffer0_occupied)&&(buffer1_occupied)){usleep(1000);}; //Wait for one buffer to be free
|
||||
if (!buffer0_occupied) //Buffer 0 is now free
|
||||
{buffer0_occupied=1;
|
||||
ordenador.current_buffer = sound[0]; }
|
||||
else //Buffer 1 is now free
|
||||
{buffer1_occupied=1;
|
||||
ordenador.current_buffer = sound[1]; }
|
||||
return;
|
||||
break;
|
||||
#ifdef D_SOUND_OSS
|
||||
case SOUND_OSS: // OSS
|
||||
retval=write(audio_fd,ordenador.current_buffer,ordenador.buffer_len*ordenador.increment);
|
||||
|
|
@ -523,6 +617,9 @@ void sound_close() {
|
|||
switch(sound_type) {
|
||||
case SOUND_NO:
|
||||
break;
|
||||
case SOUND_SDL:
|
||||
SDL_CloseAudio();
|
||||
break;
|
||||
#ifdef D_SOUND_OSS
|
||||
case SOUND_OSS:
|
||||
close(audio_fd);
|
||||
|
|
|
|||
|
|
@ -21,7 +21,7 @@
|
|||
#ifndef SOUND_H
|
||||
#define SOUND_H
|
||||
|
||||
enum e_soundtype {SOUND_NO, SOUND_OSS, SOUND_ALSA, SOUND_PULSEAUDIO, SOUND_AUTOMATIC, SOUND_ASND};
|
||||
enum e_soundtype {SOUND_NO, SOUND_OSS, SOUND_ALSA, SOUND_PULSEAUDIO, SOUND_AUTOMATIC, SOUND_ASND,SOUND_SDL};
|
||||
|
||||
extern enum e_soundtype sound_type;
|
||||
|
||||
|
|
@ -35,6 +35,7 @@ int sound_init_oss();
|
|||
int sound_init_alsa();
|
||||
int sound_init_pulse();
|
||||
int sound_init_asnd();
|
||||
int sound_init_sdl();
|
||||
|
||||
//void sdlcallback(void *userdata, Uint8 *stream, int len);
|
||||
|
||||
|
|
|
|||
20
src/tape.c
20
src/tape.c
|
|
@ -76,8 +76,9 @@ inline void tape_read(FILE *fichero, int tstados) {
|
|||
|
||||
inline void tape_read_tap (FILE * fichero, int tstados) {
|
||||
|
||||
static unsigned char value, value2;
|
||||
int retval;
|
||||
static unsigned char value;
|
||||
static unsigned char value2;
|
||||
static int retval;
|
||||
|
||||
if (fichero == NULL)
|
||||
{
|
||||
|
|
@ -206,8 +207,8 @@ inline void tape_read_tzx (FILE * fichero, int tstados) {
|
|||
|
||||
static unsigned char value, value2,value3,value4,done;
|
||||
static unsigned int bucle,bucle2, byte_position;
|
||||
int retval;
|
||||
char block_jump[2];
|
||||
static int retval;
|
||||
static char block_jump[2];
|
||||
|
||||
if (fichero == NULL)
|
||||
{
|
||||
|
|
@ -249,7 +250,6 @@ inline void tape_read_tzx (FILE * fichero, int tstados) {
|
|||
ordenador.tape_pause_at_end=10; // to avoid problems
|
||||
ordenador.tape_pause_at_end *= 3500;
|
||||
retval=fread (&value, 1, 1, fichero);
|
||||
|
||||
retval=fread (&value2, 1, 1, fichero); // read block longitude
|
||||
if (feof (fichero)) {
|
||||
rewind_tape(fichero,1);
|
||||
|
|
@ -722,12 +722,10 @@ unsigned char file_empty(FILE *fichero) {
|
|||
|
||||
void save_file(FILE *fichero) {
|
||||
|
||||
long position;
|
||||
unsigned char xor,salir_s;
|
||||
byte dato;
|
||||
int longitud;
|
||||
|
||||
position=ftell(fichero); // store current position
|
||||
fseek(fichero,0,SEEK_END); // put position at end
|
||||
xor=0;
|
||||
|
||||
|
|
@ -758,12 +756,11 @@ void save_file(FILE *fichero) {
|
|||
fprintf(fichero,"%c",xor);
|
||||
procesador.Rm.wr.IX++;
|
||||
procesador.Rm.wr.IX++;
|
||||
fseek(fichero,position,SEEK_SET); // put position at end
|
||||
ordenador.tape_position = position;
|
||||
|
||||
if(ordenador.tape_fast_load==1) //if we want fast load, we assume we want fast save too
|
||||
ordenador.other_ret = 1; // next instruction must be RET
|
||||
create_browser_tap(ordenador.tap_file);
|
||||
|
||||
if(ordenador.tape_fast_load==1) //if we want fast load, we assume we want fast save too
|
||||
procesador.PC=0x555; // next instruction must be RET
|
||||
return;
|
||||
}
|
||||
|
||||
|
|
@ -794,7 +791,6 @@ void fastload_block_tap (FILE * fichero) {
|
|||
unsigned char value[65536], empty, parity;
|
||||
int retval;
|
||||
|
||||
//ordenador.other_ret = 1; // next instruction must be RET
|
||||
procesador.PC=0x5e2;
|
||||
|
||||
if (!(procesador.Ra.br.F & F_C)) { // if Carry=0, is VERIFY, so return OK
|
||||
|
|
|
|||
|
|
@ -37,7 +37,7 @@ extern FILE *fdebug;
|
|||
struct browser *browser_list[MAX_BROWSER_ITEM+1];
|
||||
struct tape_select *block_select_list[MAX_SELECT_ITEM+1];
|
||||
|
||||
void browser_tzx (FILE * fichero) {
|
||||
void create_browser_tzx (FILE * fichero) {
|
||||
|
||||
unsigned int longitud, len, bucle, byte_position, retorno, block_number;
|
||||
unsigned char value[65536], empty, blockid, pause[2], flag_byte;
|
||||
|
|
@ -49,21 +49,7 @@ void browser_tzx (FILE * fichero) {
|
|||
|
||||
blockid=0;
|
||||
flag_byte=0;
|
||||
empty=file_empty(fichero);
|
||||
|
||||
if (fichero == NULL)
|
||||
{
|
||||
sprintf (ordenador.osd_text, "No tape selected");
|
||||
ordenador.osd_time = 100;
|
||||
return;
|
||||
}
|
||||
|
||||
if(empty)
|
||||
{
|
||||
sprintf (ordenador.osd_text, "Tape file empty");
|
||||
return;
|
||||
}
|
||||
|
||||
//Free the browser list
|
||||
for(bucle=0; ((browser_list[bucle]!=NULL)&&(bucle<MAX_BROWSER_ITEM)); bucle++)
|
||||
{
|
||||
|
|
@ -71,6 +57,14 @@ void browser_tzx (FILE * fichero) {
|
|||
browser_list[bucle]=NULL;
|
||||
}
|
||||
|
||||
if (fichero == NULL) return;
|
||||
|
||||
empty=file_empty(fichero);
|
||||
|
||||
if (empty) return;
|
||||
|
||||
rewind_tape(fichero,1);
|
||||
|
||||
retorno=0;
|
||||
block_number=0;
|
||||
do {
|
||||
|
|
@ -321,27 +315,11 @@ browser_list[block_number]=NULL;
|
|||
}
|
||||
|
||||
|
||||
void browser_tap (FILE * fichero) {
|
||||
void create_browser_tap (FILE * fichero) {
|
||||
|
||||
unsigned int longitud, bucle, block_number, byte_position ;
|
||||
unsigned char value[65536], empty, flag_byte;
|
||||
int retval, retorno;
|
||||
|
||||
empty=file_empty(fichero);
|
||||
|
||||
|
||||
if (fichero == NULL)
|
||||
{
|
||||
sprintf (ordenador.osd_text, "No tape selected");
|
||||
ordenador.osd_time = 100;
|
||||
return;
|
||||
}
|
||||
|
||||
if(empty)
|
||||
{
|
||||
sprintf (ordenador.osd_text, "Tape file empty");
|
||||
return;
|
||||
}
|
||||
|
||||
//Free the browser list
|
||||
for(bucle=0; ((browser_list[bucle]!=NULL)&&(bucle<MAX_BROWSER_ITEM)); bucle++)
|
||||
|
|
@ -350,6 +328,14 @@ void browser_tap (FILE * fichero) {
|
|||
browser_list[bucle]=NULL;
|
||||
}
|
||||
|
||||
if (fichero == NULL) return;
|
||||
|
||||
empty=file_empty(fichero);
|
||||
|
||||
if (empty) return;
|
||||
|
||||
rewind_tape(fichero,1);
|
||||
|
||||
flag_byte=0;
|
||||
retorno=0;
|
||||
block_number=0;
|
||||
|
|
|
|||
|
|
@ -37,8 +37,8 @@ struct tape_select {
|
|||
extern struct tape_select *block_select_list[MAX_SELECT_ITEM+1];
|
||||
extern struct browser *browser_list[MAX_BROWSER_ITEM+1];
|
||||
|
||||
void browser_tap (FILE *);
|
||||
void browser_tzx (FILE *);
|
||||
void create_browser_tap (FILE *);
|
||||
void create_browser_tzx (FILE *);
|
||||
int select_block(FILE * fichero);
|
||||
int jump_to_block(FILE * fichero, int blocks_to_jump);
|
||||
void free_browser();
|
||||
|
|
|
|||
|
|
@ -52,6 +52,12 @@ void Z80free_INT(Z80FREE *processor,byte value) {
|
|||
|
||||
}
|
||||
|
||||
void Z80free_INT_reset(Z80FREE *processor) {
|
||||
|
||||
processor->INT_P=0;
|
||||
|
||||
}
|
||||
|
||||
int Z80free_step(Z80FREE *processor) {
|
||||
|
||||
int retval=0;
|
||||
|
|
@ -77,7 +83,6 @@ int Z80free_ustep(Z80FREE *processor) {
|
|||
Z80free_doPush(processor,processor->PC);
|
||||
processor->PC=0x0066;
|
||||
processor->IFF1=0; // disable INTs
|
||||
processor->Status=Z80INT;
|
||||
return(11); // we use 11 tstates for attending a NMI
|
||||
}
|
||||
if (processor->INT_P) {
|
||||
|
|
@ -87,7 +92,6 @@ int Z80free_ustep(Z80FREE *processor) {
|
|||
processor->HALT=0;
|
||||
processor->PC++;
|
||||
}
|
||||
processor->Status=Z80INT;
|
||||
processor->IFF1=0;
|
||||
processor->IFF2=0;
|
||||
Z80free_doPush(processor,processor->PC);
|
||||
|
|
@ -143,9 +147,13 @@ int Z80free_ustep(Z80FREE *processor) {
|
|||
processor->Status=Z80FD;
|
||||
return 4;
|
||||
}
|
||||
if (opcode==0xED) {
|
||||
processor->Status=Z80ED;
|
||||
return 4;
|
||||
}
|
||||
processor->Status=Z80XX;
|
||||
if (opcode==0xCB) {
|
||||
d1=Z80free_Rd_fetch(processor->PC++);
|
||||
d1=Z80free_Rd(processor->PC++);
|
||||
retval+=Z80free_codesDDCB(processor,d1);
|
||||
} else {
|
||||
retval+=Z80free_codesDD(processor,opcode);
|
||||
|
|
@ -161,9 +169,13 @@ int Z80free_ustep(Z80FREE *processor) {
|
|||
if (opcode==0xFD) {
|
||||
return 4;
|
||||
}
|
||||
if (opcode==0xED) {
|
||||
processor->Status=Z80ED;
|
||||
return 4;
|
||||
}
|
||||
processor->Status=Z80XX;
|
||||
if (opcode==0xCB) {
|
||||
d1=Z80free_Rd_fetch(processor->PC++);
|
||||
d1=Z80free_Rd(processor->PC++);
|
||||
retval+=Z80free_codesFDCB(processor,d1);
|
||||
} else {
|
||||
retval+=Z80free_codesFD(processor,opcode);
|
||||
|
|
@ -582,8 +594,10 @@ void Z80free_doRRD(Z80FREE *processor) {
|
|||
|
||||
void Z80free_doPush (Z80FREE *processor, word val) {
|
||||
|
||||
processor->Rm.wr.SP-=2;
|
||||
Z80free_write16(processor->Rm.wr.SP, val);
|
||||
processor->Rm.wr.SP-=1;
|
||||
Z80free_Wr(processor->Rm.wr.SP, (byte)((val >> 8) & 0xFF));
|
||||
processor->Rm.wr.SP-=1;
|
||||
Z80free_Wr(processor->Rm.wr.SP, (byte)(val & 0xFF));
|
||||
}
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -137,6 +137,7 @@ void Z80free_reset(Z80FREE *);
|
|||
int Z80free_step(Z80FREE *);
|
||||
int Z80free_ustep(Z80FREE *);
|
||||
void Z80free_INT(Z80FREE *,byte);
|
||||
void Z80free_INT_reset(Z80FREE *);
|
||||
|
||||
byte Z80free_Rd (register word Addr);
|
||||
byte Z80free_Rd_fake (register word Addr);
|
||||
|
|
|
|||
|
|
@ -23,7 +23,7 @@ int Z80free_codesDDCB (Z80FREE *processor,byte d1) {
|
|||
static byte tmp1;
|
||||
static word tmp2;
|
||||
static byte opcode;
|
||||
opcode=Z80free_Rd_fetch(processor->PC++);
|
||||
opcode=Z80free_Rd(processor->PC++);
|
||||
|
||||
switch(opcode) {
|
||||
case 0: // LD_RLC B,(IX+d)
|
||||
|
|
|
|||
|
|
@ -23,7 +23,7 @@ int Z80free_codesFDCB (Z80FREE *processor,byte d1) {
|
|||
static byte tmp1;
|
||||
static word tmp2;
|
||||
static byte opcode;
|
||||
opcode=Z80free_Rd_fetch(processor->PC++);
|
||||
opcode=Z80free_Rd(processor->PC++);
|
||||
|
||||
switch(opcode) {
|
||||
case 0: // LD_RLC B,(IY+d)
|
||||
|
|
|
|||
Loading…
Reference in New Issue