2 CASIO FP-200 Emulator 'eFP-200'
4 Author : Takeda.Toshiya
11 #include "../../emu.h"
12 #include "../device.h"
15 #include "../datarec.h"
17 #include "../memory.h"
19 #include "../rp5c01.h"
22 #include "../debugger.h"
27 // ----------------------------------------------------------------------------
29 // ----------------------------------------------------------------------------
31 VM::VM(EMU* parent_emu) : VM_TEMPLATE(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
37 dummy->set_device_name(_T("1st Dummy"));
39 drec = new DATAREC(this, emu);
40 drec->set_context_noise_play(new NOISE(this, emu));
41 drec->set_context_noise_stop(new NOISE(this, emu));
42 drec->set_context_noise_fast(new NOISE(this, emu));
43 cpu = new I8080(this, emu); // i8085
44 memory = new MEMORY(this, emu);
45 rtc = new RP5C01(this, emu);
47 io = new IO(this, emu);
49 event->set_context_cpu(cpu);
50 event->set_context_sound(drec);
51 event->set_context_sound(drec->get_context_noise_play());
52 event->set_context_sound(drec->get_context_noise_stop());
53 event->set_context_sound(drec->get_context_noise_fast());
55 drec->set_context_ear(io, SIG_IO_CMT, 1);
56 cpu->set_context_sod(io, SIG_IO_SOD, 1);
58 io->set_context_cpu(cpu);
59 io->set_context_drec(drec);
60 io->set_context_rtc(rtc);
63 cpu->set_context_mem(memory);
64 cpu->set_context_io(io);
65 cpu->set_context_intr(io);
67 cpu->set_context_debugger(new DEBUGGER(this, emu));
71 memset(rom, 0xff, sizeof(rom));
72 memset(ram, 0, sizeof(ram));
74 memory->read_bios(_T("BIOS.ROM"), rom, sizeof(rom));
76 FILEIO* fio = new FILEIO();
77 if(fio->Fopen(create_local_path(_T("RAM.BIN")), FILEIO_READ_BINARY)) {
78 fio->Fread(ram, sizeof(ram), 1);
83 memory->set_memory_r(0x0000, 0x7fff, rom);
84 memory->set_memory_rw(0x8000, 0xffff, ram);
85 memory->set_wait_rw(0x0000, 0xffff, 1);
87 // initialize all devices
88 for(DEVICE* device = first_device; device; device = device->next_device) {
96 FILEIO* fio = new FILEIO();
97 if(fio->Fopen(create_local_path(_T("RAM.BIN")), FILEIO_WRITE_BINARY)) {
98 fio->Fwrite(ram, sizeof(ram), 1);
103 // delete all devices
104 for(DEVICE* device = first_device; device;) {
105 DEVICE *next_device = device->next_device;
108 device = next_device;
112 DEVICE* VM::get_device(int id)
114 for(DEVICE* device = first_device; device; device = device->next_device) {
115 if(device->this_device_id == id) {
122 // ----------------------------------------------------------------------------
123 // drive virtual machine
124 // ----------------------------------------------------------------------------
129 for(DEVICE* device = first_device; device; device = device->next_device) {
139 // ----------------------------------------------------------------------------
141 // ----------------------------------------------------------------------------
144 DEVICE *VM::get_cpu(int index)
153 // ----------------------------------------------------------------------------
155 // ----------------------------------------------------------------------------
157 void VM::draw_screen()
162 // ----------------------------------------------------------------------------
164 // ----------------------------------------------------------------------------
166 void VM::initialize_sound(int rate, int samples)
168 // init sound manager
169 event->initialize_sound(rate, samples);
172 uint16_t* VM::create_sound(int* extra_frames)
174 return event->create_sound(extra_frames);
177 int VM::get_sound_buffer_ptr()
179 return event->get_sound_buffer_ptr();
182 #ifdef USE_SOUND_VOLUME
183 void VM::set_sound_device_volume(int ch, int decibel_l, int decibel_r)
186 drec->set_volume(0, decibel_l, decibel_r);
188 drec->get_context_noise_play()->set_volume(0, decibel_l, decibel_r);
189 drec->get_context_noise_stop()->set_volume(0, decibel_l, decibel_r);
190 drec->get_context_noise_fast()->set_volume(0, decibel_l, decibel_r);
195 // ----------------------------------------------------------------------------
197 // ----------------------------------------------------------------------------
199 void VM::key_down(int code, bool repeat)
206 void VM::key_up(int code)
211 // ----------------------------------------------------------------------------
213 // ----------------------------------------------------------------------------
215 void VM::play_tape(int drv, const _TCHAR* file_path)
218 drec->play_tape(file_path);
219 // drec->set_remote(true);
222 void VM::rec_tape(int drv, const _TCHAR* file_path)
227 // drec->set_remote(false);
228 io->rec_tape(file_path);
231 void VM::close_tape(int drv)
236 // drec->set_remote(false);
240 bool VM::is_tape_inserted(int drv)
242 return drec->is_tape_inserted() || io->is_tape_inserted();
245 bool VM::is_tape_playing(int drv)
247 if(drec->is_tape_inserted()) {
248 return drec->is_tape_playing();
250 return io->is_tape_playing();
254 bool VM::is_tape_recording(int drv)
256 if(drec->is_tape_inserted()) {
257 return drec->is_tape_recording();
259 return io->is_tape_recording();
263 int VM::get_tape_position(int drv)
265 if(drec->is_tape_inserted()) {
266 return drec->get_tape_position();
268 return io->get_tape_position();
272 const _TCHAR* VM::get_tape_message(int drv)
274 if(drec->is_tape_inserted()) {
275 return drec->get_message();
281 void VM::push_play(int drv)
283 if(drec->is_tape_inserted()) {
285 drec->set_remote(true);
289 void VM::push_stop(int drv)
291 if(drec->is_tape_inserted()) {
292 drec->set_remote(false);
296 void VM::push_fast_forward(int drv)
298 if(drec->is_tape_inserted()) {
300 drec->set_remote(true);
304 void VM::push_fast_rewind(int drv)
306 if(drec->is_tape_inserted()) {
307 drec->set_ff_rew(-1);
308 drec->set_remote(true);
312 bool VM::is_frame_skippable()
314 return event->is_frame_skippable();
317 void VM::update_config()
319 for(DEVICE* device = first_device; device; device = device->next_device) {
320 device->update_config();
324 #define STATE_VERSION 3
326 #include "../../statesub.h"
327 #include "../../qt/gui/csp_logger.h"
328 extern CSP_Logger DLL_PREFIX_I *csp_logger;
330 void VM::decl_state(void)
332 state_entry = new csp_state_utils(STATE_VERSION, 0, (_TCHAR *)(_T("CSP::FP_200_HEAD")), csp_logger);
333 DECL_STATE_ENTRY_MULTI(void, ram, sizeof(ram));
334 for(DEVICE* device = first_device; device; device = device->next_device) {
335 device->decl_state();
338 void VM::save_state(FILEIO* state_fio)
340 //state_fio->FputUint32(STATE_VERSION);
342 if(state_entry != NULL) {
343 state_entry->save_state(state_fio);
345 for(DEVICE* device = first_device; device; device = device->next_device) {
346 device->save_state(state_fio);
348 //state_fio->Fwrite(ram, sizeof(ram), 1);
351 bool VM::load_state(FILEIO* state_fio)
353 //if(state_fio->FgetUint32() != STATE_VERSION) {
357 if(state_entry != NULL) {
358 mb = state_entry->load_state(state_fio);
361 emu->out_debug_log("INFO: HEADER DATA ERROR");
364 for(DEVICE* device = first_device; device; device = device->next_device) {
365 if(!device->load_state(state_fio)) {
369 //state_fio->Fread(ram, sizeof(ram), 1);