summaryrefslogtreecommitdiffstatshomepage
path: root/src/lib
diff options
context:
space:
mode:
author Miodrag Milanovic <mmicko@gmail.com>2012-07-07 07:38:07 +0000
committer Miodrag Milanovic <mmicko@gmail.com>2012-07-07 07:38:07 +0000
commitf7a125b8eaf3d345efb2d5756af158d25f60ce0b (patch)
treeddda4d4c5977dcdb52012982805872c676bcdb1c /src/lib
parent330fd72c4e0acec9abc94f2ec92f599c3526a9c6 (diff)
Sync with MESS (no whatsnew)
Diffstat (limited to 'src/lib')
-rw-r--r--src/lib/formats/sc3000_bit.c102
-rw-r--r--src/lib/formats/sc3000_bit.h18
-rw-r--r--src/lib/lib.mak1
3 files changed, 121 insertions, 0 deletions
diff --git a/src/lib/formats/sc3000_bit.c b/src/lib/formats/sc3000_bit.c
new file mode 100644
index 00000000000..79f1290181c
--- /dev/null
+++ b/src/lib/formats/sc3000_bit.c
@@ -0,0 +1,102 @@
+/*********************************************************************
+
+ formats/sc3000_bit.c
+
+ Cassette code for Sega SC-3000 *.bit files
+
+*********************************************************************/
+
+#include "sc3000_bit.h"
+
+/***************************************************************************
+ PARAMETERS
+***************************************************************************/
+
+#define LOG 0
+
+/***************************************************************************
+ IMPLEMENTATION
+***************************************************************************/
+
+/*-------------------------------------------------
+ CassetteModulation sc3000_bit_modulation
+-------------------------------------------------*/
+
+static const struct CassetteModulation sc3000_bit_modulation =
+{
+ CASSETTE_MODULATION_SINEWAVE,
+ 1200.0 - 300, 1200.0, 1200.0 + 300,
+ 2400.0 - 600, 2400.0, 2400.0 + 600
+};
+
+/*-------------------------------------------------
+ sc3000_bit_identify - identify cassette
+-------------------------------------------------*/
+
+static casserr_t sc3000_bit_identify(cassette_image *cassette, struct CassetteOptions *opts)
+{
+ return cassette_modulation_identify( cassette, &sc3000_bit_modulation, opts);
+}
+
+/*-------------------------------------------------
+ sc3000_bit_load - load cassette
+-------------------------------------------------*/
+
+#define MODULATE(_value) \
+ for (int i = 0; i < (_value ? 2 : 1); i++) { \
+ err = cassette_put_modulated_data_bit(cassette, 0, time_index, _value, &sc3000_bit_modulation, &time_displacement);\
+ if (err) return err;\
+ time_index += time_displacement;\
+ }
+
+static casserr_t sc3000_bit_load(cassette_image *cassette)
+{
+ casserr_t err;
+ UINT64 image_size = cassette_image_size(cassette);
+ UINT64 image_pos = 0;
+ double time_index = 0.0;
+ double time_displacement;
+ UINT8 data;
+
+ while (image_pos < image_size)
+ {
+ cassette_image_read(cassette, &data, image_pos, 1);
+
+ switch (data)
+ {
+ case '1':
+ MODULATE(1);
+ break;
+
+ case '0':
+ MODULATE(0);
+ break;
+
+ case ' ':
+ err = cassette_put_sample( cassette, 0, time_index, 1/1200.0, 0);
+ if (err) return err;
+ time_index += 1/1200.0;
+ break;
+ }
+
+ image_pos++;
+ }
+
+ return CASSETTE_ERROR_SUCCESS;
+}
+
+/*-------------------------------------------------
+ CassetteFormat sc3000_bit_cassette_format
+-------------------------------------------------*/
+
+const struct CassetteFormat sc3000_bit_format =
+{
+ "bit",
+ sc3000_bit_identify,
+ sc3000_bit_load,
+ NULL
+};
+
+CASSETTE_FORMATLIST_START( sc3000_cassette_formats )
+ CASSETTE_FORMAT(sc3000_bit_format)
+CASSETTE_FORMATLIST_END
diff --git a/src/lib/formats/sc3000_bit.h b/src/lib/formats/sc3000_bit.h
new file mode 100644
index 00000000000..8950c187837
--- /dev/null
+++ b/src/lib/formats/sc3000_bit.h
@@ -0,0 +1,18 @@
+/*********************************************************************
+
+ formats/sc3000_bit.h
+
+ Cassette code for Sega SC-3000 *.bit files
+
+*********************************************************************/
+
+#pragma once
+
+#ifndef __SC3000_BIT__
+#define __SC3000_BIT__
+
+#include "cassimg.h"
+
+CASSETTE_FORMATLIST_EXTERN( sc3000_cassette_formats );
+
+#endif
diff --git a/src/lib/lib.mak b/src/lib/lib.mak
index f464f076ffa..d8144552206 100644
--- a/src/lib/lib.mak
+++ b/src/lib/lib.mak
@@ -144,6 +144,7 @@ FORMATSOBJS = \
$(LIBOBJ)/formats/pmd_cas.o \
$(LIBOBJ)/formats/primoptp.o \
$(LIBOBJ)/formats/rk_cas.o \
+ $(LIBOBJ)/formats/sc3000_bit.o \
$(LIBOBJ)/formats/smx_dsk.o \
$(LIBOBJ)/formats/sorc_dsk.o \
$(LIBOBJ)/formats/sord_cas.o \