Canola
0.8.D001
|
00001 // 00002 // canola - canon canola 1614p emulator 00003 // Copyright (C) 2011, 2012 Peter Miller 00004 // 00005 // This program is free software; you can redistribute it and/or modify 00006 // it under the terms of the GNU General Public License, version 3, as 00007 // published by the Free Software Foundation. 00008 // 00009 // This program is distributed in the hope that it will be useful, 00010 // but WITHOUT ANY WARRANTY; without even the implied warranty of 00011 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU 00012 // General Public License for more details. 00013 // 00014 // You should have received a copy of the GNU General Public License along 00015 // with this program. If not, see <http://www.gnu.org/licenses/>. 00016 // 00017 00018 #include <lib/calculator.h> 00019 #include <lib/lexer.h> 00020 00021 00022 void 00023 calculator::clear_program(void) 00024 { 00025 unsigned lo = 1; 00026 unsigned hi = 241; 00027 switch (program_selector) 00028 { 00029 default: 00030 case program_selector_i_ii: 00031 break; 00032 00033 case program_selector_i: 00034 hi = 121; 00035 break; 00036 00037 case program_selector_ii: 00038 lo = 121; 00039 break; 00040 } 00041 00042 for (size_t j = lo; j < hi; ++j) 00043 { 00044 programme[j] = 0; 00045 programme_location[j].reset(); 00046 } 00047 00048 address = 0; 00049 } 00050 00051 00052 bool 00053 calculator::load_program(const std::string &filename, bool binary) 00054 { 00055 lexer slurp(filename, *this); 00056 if (binary) 00057 return slurp.read_binary_and_execute(); 00058 return slurp.read_and_execute(); 00059 }