2 CASIO PV-1000 Emulator 'ePV-1000'
4 Author : Takeda.Toshiya
11 #include "../../emu.h"
12 #include "../device.h"
16 #include "../memory.h"
20 #include "../debugger.h"
27 // ----------------------------------------------------------------------------
29 // ----------------------------------------------------------------------------
31 VM::VM(EMU* parent_emu) : emu(parent_emu)
34 first_device = last_device = NULL;
35 dummy = new DEVICE(this, emu); // must be 1st device
36 event = new EVENT(this, emu); // must be 2nd device
38 io = new IO(this, emu);
39 memory = new MEMORY(this, emu);
40 cpu = new Z80(this, emu);
42 joystick = new JOYSTICK(this, emu);
43 psg = new PSG(this, emu);
44 vdp = new VDP(this, emu);
47 event->set_context_cpu(cpu);
48 event->set_context_sound(psg);
50 vdp->set_context_cpu(cpu);
51 vdp->set_memory_ptr(mem);
54 cpu->set_context_mem(memory);
55 cpu->set_context_io(io);
56 cpu->set_context_intr(dummy);
58 cpu->set_context_debugger(new DEBUGGER(this, emu));
62 memset(mem, 0xff, 0x8000);
63 memset(mem + 0x8000, 0, 0x8000);
65 memory->set_memory_r(0x0000, 0x7fff, mem);
66 memory->set_memory_rw(0xb800, 0xbfff, mem + 0xb800);
69 io->set_iomap_range_w(0xf8, 0xfa, psg);
70 io->set_iomap_range_rw(0xfc, 0xfd, joystick);
71 io->set_iomap_range_w(0xfe, 0xff, vdp);
73 // initialize all devices
74 for(DEVICE* device = first_device; device; device = device->next_device) {
83 for(DEVICE* device = first_device; device;) {
84 DEVICE *next_device = device->next_device;
91 DEVICE* VM::get_device(int id)
93 for(DEVICE* device = first_device; device; device = device->next_device) {
94 if(device->this_device_id == id) {
101 // ----------------------------------------------------------------------------
102 // drive virtual machine
103 // ----------------------------------------------------------------------------
108 for(DEVICE* device = first_device; device; device = device->next_device) {
118 // ----------------------------------------------------------------------------
120 // ----------------------------------------------------------------------------
123 DEVICE *VM::get_cpu(int index)
132 // ----------------------------------------------------------------------------
134 // ----------------------------------------------------------------------------
136 void VM::draw_screen()
141 // ----------------------------------------------------------------------------
143 // ----------------------------------------------------------------------------
145 void VM::initialize_sound(int rate, int samples)
147 // init sound manager
148 event->initialize_sound(rate, samples);
154 uint16* VM::create_sound(int* extra_frames)
156 return event->create_sound(extra_frames);
159 int VM::sound_buffer_ptr()
161 return event->sound_buffer_ptr();
164 #ifdef USE_SOUND_VOLUME
165 void VM::set_sound_device_volume(int ch, int decibel_l, int decibel_r)
168 psg->set_volume(0, decibel_l, decibel_r);
173 // ----------------------------------------------------------------------------
175 // ----------------------------------------------------------------------------
177 void VM::open_cart(int drv, const _TCHAR* file_path)
180 memset(mem, 0xff, 0x8000);
181 inserted = memory->read_image(file_path, mem, 0x8000);
186 void VM::close_cart(int drv)
189 memset(mem, 0xff, 0x8000);
195 bool VM::cart_inserted(int drv)
206 return event->now_skip();
209 void VM::update_config()
211 for(DEVICE* device = first_device; device; device = device->next_device) {
212 device->update_config();
216 #define STATE_VERSION 1
218 void VM::save_state(FILEIO* state_fio)
220 state_fio->FputUint32(STATE_VERSION);
222 for(DEVICE* device = first_device; device; device = device->next_device) {
223 device->save_state(state_fio);
225 state_fio->Fwrite(mem, sizeof(mem), 1);
226 state_fio->FputBool(inserted);
229 bool VM::load_state(FILEIO* state_fio)
231 if(state_fio->FgetUint32() != STATE_VERSION) {
234 for(DEVICE* device = first_device; device; device = device->next_device) {
235 if(!device->load_state(state_fio)) {
239 state_fio->Fread(mem, sizeof(mem), 1);
240 inserted = state_fio->FgetBool();