mirror of
https://github.com/nobuh/napple1.git
synced 2024-12-26 09:29:35 +00:00
add all source from sourceforge napple1 2.2.1
This commit is contained in:
parent
5586a6403d
commit
17857df982
6
AUTHORS
Executable file
6
AUTHORS
Executable file
@ -0,0 +1,6 @@
|
||||
napple1:
|
||||
Nobu Hatano <nobuhatano@gmail.com>
|
||||
|
||||
Pom1:
|
||||
John D. Corrado <jdcorrado@gmail.com>
|
||||
Verhille Arnaud
|
81
CHANGELOG
Executable file
81
CHANGELOG
Executable file
@ -0,0 +1,81 @@
|
||||
CHANGELOG
|
||||
=========
|
||||
|
||||
2.2.1
|
||||
- Fix leaking memory on fd of loadBasic() function
|
||||
- Fix some coding style issue in memory.c and msgbuf.c
|
||||
|
||||
2.2
|
||||
- Add Cygwin (with cygwin base, make, gcc4 and libncurses-dev) support
|
||||
- Fix Hung after Hardreset.
|
||||
|
||||
2.1
|
||||
- If a loading core has a value on the 0xF000 area, the mode
|
||||
should be better change to 32K mode.
|
||||
- Update SAMPLE_PROGRAMS file.
|
||||
|
||||
2.0
|
||||
- Remove TODO list.
|
||||
- Synchronize video output for ideal 60 Hz screen refresh.
|
||||
- Remove terminalSpeed configuration. Now it is 60Hz only.
|
||||
- Remove replica1 config in napple1.cfg and No more napple1.cfg.
|
||||
- Mode change command filp 8K memory mode & 32K memory mode
|
||||
- Delete unused charmap.rom
|
||||
- Rename core/STARTREK to core/startrek
|
||||
|
||||
1.0
|
||||
- Filename input for Load core.
|
||||
- Confirmation to load basic to ram.
|
||||
- Command list on the message buffer.
|
||||
- Remove default core and basic.rom loading function.
|
||||
- TODO file added.
|
||||
|
||||
0.6
|
||||
- March 29, 2010
|
||||
- Modify makefile as using macros for common options.
|
||||
- Add #define _XOPEN_SOURCE 500 to prevent compile warning of usleep.
|
||||
- Add filename input feature for 'D'ump core.
|
||||
|
||||
0.5
|
||||
- March 25, 2010
|
||||
- Fix time tic in m6502. To get milli sec current time, use gettimeofday.
|
||||
- Wall option at compile. So, several fix in m6502.c to get rid of warnings.
|
||||
|
||||
0.4
|
||||
- March 25, 2010
|
||||
- Fix some descriptions in READE and SAMPLE_PROGRAMS
|
||||
- Use independant ncurses windows for main screen and message buffer,
|
||||
instead of a single stdscr. The new screen layoht is following.
|
||||
During loading rom and core, printing some messages to the buffer.
|
||||
|
||||
+-----------------------------+
|
||||
|(0,0) (0, 40)|
|
||||
| screen |
|
||||
| |
|
||||
|(23,0) (23,40)|
|
||||
+-----------------------------+
|
||||
|(24,0) message buffer (24,40)|
|
||||
+-----------------------------+
|
||||
|
||||
0.3
|
||||
- March 21, 2010
|
||||
- Update README
|
||||
- Allow smaller lines/colums terminal
|
||||
|
||||
0.2
|
||||
- March 18, 2010
|
||||
- Delete automatic save memory function during quit.
|
||||
- Shift + D "Dump core"
|
||||
- Dump & Load core on file core/dumped
|
||||
- Add sample core file in core directory
|
||||
|
||||
0.1
|
||||
- March 16, 2010
|
||||
- Fixed old program name nPom1 to napple1.
|
||||
- napple1 now includes Pom1 rom.
|
||||
- if napple1 started with normal mode, and if core file
|
||||
isn't existing, load rom/basic.rom to ram 0xE000.
|
||||
|
||||
0.0
|
||||
- March 15, 2010
|
||||
- Derived from Pom1. First alpha release
|
340
COPYING
Executable file
340
COPYING
Executable file
@ -0,0 +1,340 @@
|
||||
GNU GENERAL PUBLIC LICENSE
|
||||
Version 2, June 1991
|
||||
|
||||
Copyright (C) 1989, 1991 Free Software Foundation, Inc.
|
||||
59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
Everyone is permitted to copy and distribute verbatim copies
|
||||
of this license document, but changing it is not allowed.
|
||||
|
||||
Preamble
|
||||
|
||||
The licenses for most software are designed to take away your
|
||||
freedom to share and change it. By contrast, the GNU General Public
|
||||
License is intended to guarantee your freedom to share and change free
|
||||
software--to make sure the software is free for all its users. This
|
||||
General Public License applies to most of the Free Software
|
||||
Foundation's software and to any other program whose authors commit to
|
||||
using it. (Some other Free Software Foundation software is covered by
|
||||
the GNU Library General Public License instead.) You can apply it to
|
||||
your programs, too.
|
||||
|
||||
When we speak of free software, we are referring to freedom, not
|
||||
price. Our General Public Licenses are designed to make sure that you
|
||||
have the freedom to distribute copies of free software (and charge for
|
||||
this service if you wish), that you receive source code or can get it
|
||||
if you want it, that you can change the software or use pieces of it
|
||||
in new free programs; and that you know you can do these things.
|
||||
|
||||
To protect your rights, we need to make restrictions that forbid
|
||||
anyone to deny you these rights or to ask you to surrender the rights.
|
||||
These restrictions translate to certain responsibilities for you if you
|
||||
distribute copies of the software, or if you modify it.
|
||||
|
||||
For example, if you distribute copies of such a program, whether
|
||||
gratis or for a fee, you must give the recipients all the rights that
|
||||
you have. You must make sure that they, too, receive or can get the
|
||||
source code. And you must show them these terms so they know their
|
||||
rights.
|
||||
|
||||
We protect your rights with two steps: (1) copyright the software, and
|
||||
(2) offer you this license which gives you legal permission to copy,
|
||||
distribute and/or modify the software.
|
||||
|
||||
Also, for each author's protection and ours, we want to make certain
|
||||
that everyone understands that there is no warranty for this free
|
||||
software. If the software is modified by someone else and passed on, we
|
||||
want its recipients to know that what they have is not the original, so
|
||||
that any problems introduced by others will not reflect on the original
|
||||
authors' reputations.
|
||||
|
||||
Finally, any free program is threatened constantly by software
|
||||
patents. We wish to avoid the danger that redistributors of a free
|
||||
program will individually obtain patent licenses, in effect making the
|
||||
program proprietary. To prevent this, we have made it clear that any
|
||||
patent must be licensed for everyone's free use or not licensed at all.
|
||||
|
||||
The precise terms and conditions for copying, distribution and
|
||||
modification follow.
|
||||
|
||||
GNU GENERAL PUBLIC LICENSE
|
||||
TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
|
||||
|
||||
0. This License applies to any program or other work which contains
|
||||
a notice placed by the copyright holder saying it may be distributed
|
||||
under the terms of this General Public License. The "Program", below,
|
||||
refers to any such program or work, and a "work based on the Program"
|
||||
means either the Program or any derivative work under copyright law:
|
||||
that is to say, a work containing the Program or a portion of it,
|
||||
either verbatim or with modifications and/or translated into another
|
||||
language. (Hereinafter, translation is included without limitation in
|
||||
the term "modification".) Each licensee is addressed as "you".
|
||||
|
||||
Activities other than copying, distribution and modification are not
|
||||
covered by this License; they are outside its scope. The act of
|
||||
running the Program is not restricted, and the output from the Program
|
||||
is covered only if its contents constitute a work based on the
|
||||
Program (independent of having been made by running the Program).
|
||||
Whether that is true depends on what the Program does.
|
||||
|
||||
1. You may copy and distribute verbatim copies of the Program's
|
||||
source code as you receive it, in any medium, provided that you
|
||||
conspicuously and appropriately publish on each copy an appropriate
|
||||
copyright notice and disclaimer of warranty; keep intact all the
|
||||
notices that refer to this License and to the absence of any warranty;
|
||||
and give any other recipients of the Program a copy of this License
|
||||
along with the Program.
|
||||
|
||||
You may charge a fee for the physical act of transferring a copy, and
|
||||
you may at your option offer warranty protection in exchange for a fee.
|
||||
|
||||
2. You may modify your copy or copies of the Program or any portion
|
||||
of it, thus forming a work based on the Program, and copy and
|
||||
distribute such modifications or work under the terms of Section 1
|
||||
above, provided that you also meet all of these conditions:
|
||||
|
||||
a) You must cause the modified files to carry prominent notices
|
||||
stating that you changed the files and the date of any change.
|
||||
|
||||
b) You must cause any work that you distribute or publish, that in
|
||||
whole or in part contains or is derived from the Program or any
|
||||
part thereof, to be licensed as a whole at no charge to all third
|
||||
parties under the terms of this License.
|
||||
|
||||
c) If the modified program normally reads commands interactively
|
||||
when run, you must cause it, when started running for such
|
||||
interactive use in the most ordinary way, to print or display an
|
||||
announcement including an appropriate copyright notice and a
|
||||
notice that there is no warranty (or else, saying that you provide
|
||||
a warranty) and that users may redistribute the program under
|
||||
these conditions, and telling the user how to view a copy of this
|
||||
License. (Exception: if the Program itself is interactive but
|
||||
does not normally print such an announcement, your work based on
|
||||
the Program is not required to print an announcement.)
|
||||
|
||||
These requirements apply to the modified work as a whole. If
|
||||
identifiable sections of that work are not derived from the Program,
|
||||
and can be reasonably considered independent and separate works in
|
||||
themselves, then this License, and its terms, do not apply to those
|
||||
sections when you distribute them as separate works. But when you
|
||||
distribute the same sections as part of a whole which is a work based
|
||||
on the Program, the distribution of the whole must be on the terms of
|
||||
this License, whose permissions for other licensees extend to the
|
||||
entire whole, and thus to each and every part regardless of who wrote it.
|
||||
|
||||
Thus, it is not the intent of this section to claim rights or contest
|
||||
your rights to work written entirely by you; rather, the intent is to
|
||||
exercise the right to control the distribution of derivative or
|
||||
collective works based on the Program.
|
||||
|
||||
In addition, mere aggregation of another work not based on the Program
|
||||
with the Program (or with a work based on the Program) on a volume of
|
||||
a storage or distribution medium does not bring the other work under
|
||||
the scope of this License.
|
||||
|
||||
3. You may copy and distribute the Program (or a work based on it,
|
||||
under Section 2) in object code or executable form under the terms of
|
||||
Sections 1 and 2 above provided that you also do one of the following:
|
||||
|
||||
a) Accompany it with the complete corresponding machine-readable
|
||||
source code, which must be distributed under the terms of Sections
|
||||
1 and 2 above on a medium customarily used for software interchange; or,
|
||||
|
||||
b) Accompany it with a written offer, valid for at least three
|
||||
years, to give any third party, for a charge no more than your
|
||||
cost of physically performing source distribution, a complete
|
||||
machine-readable copy of the corresponding source code, to be
|
||||
distributed under the terms of Sections 1 and 2 above on a medium
|
||||
customarily used for software interchange; or,
|
||||
|
||||
c) Accompany it with the information you received as to the offer
|
||||
to distribute corresponding source code. (This alternative is
|
||||
allowed only for noncommercial distribution and only if you
|
||||
received the program in object code or executable form with such
|
||||
an offer, in accord with Subsection b above.)
|
||||
|
||||
The source code for a work means the preferred form of the work for
|
||||
making modifications to it. For an executable work, complete source
|
||||
code means all the source code for all modules it contains, plus any
|
||||
associated interface definition files, plus the scripts used to
|
||||
control compilation and installation of the executable. However, as a
|
||||
special exception, the source code distributed need not include
|
||||
anything that is normally distributed (in either source or binary
|
||||
form) with the major components (compiler, kernel, and so on) of the
|
||||
operating system on which the executable runs, unless that component
|
||||
itself accompanies the executable.
|
||||
|
||||
If distribution of executable or object code is made by offering
|
||||
access to copy from a designated place, then offering equivalent
|
||||
access to copy the source code from the same place counts as
|
||||
distribution of the source code, even though third parties are not
|
||||
compelled to copy the source along with the object code.
|
||||
|
||||
4. You may not copy, modify, sublicense, or distribute the Program
|
||||
except as expressly provided under this License. Any attempt
|
||||
otherwise to copy, modify, sublicense or distribute the Program is
|
||||
void, and will automatically terminate your rights under this License.
|
||||
However, parties who have received copies, or rights, from you under
|
||||
this License will not have their licenses terminated so long as such
|
||||
parties remain in full compliance.
|
||||
|
||||
5. You are not required to accept this License, since you have not
|
||||
signed it. However, nothing else grants you permission to modify or
|
||||
distribute the Program or its derivative works. These actions are
|
||||
prohibited by law if you do not accept this License. Therefore, by
|
||||
modifying or distributing the Program (or any work based on the
|
||||
Program), you indicate your acceptance of this License to do so, and
|
||||
all its terms and conditions for copying, distributing or modifying
|
||||
the Program or works based on it.
|
||||
|
||||
6. Each time you redistribute the Program (or any work based on the
|
||||
Program), the recipient automatically receives a license from the
|
||||
original licensor to copy, distribute or modify the Program subject to
|
||||
these terms and conditions. You may not impose any further
|
||||
restrictions on the recipients' exercise of the rights granted herein.
|
||||
You are not responsible for enforcing compliance by third parties to
|
||||
this License.
|
||||
|
||||
7. If, as a consequence of a court judgment or allegation of patent
|
||||
infringement or for any other reason (not limited to patent issues),
|
||||
conditions are imposed on you (whether by court order, agreement or
|
||||
otherwise) that contradict the conditions of this License, they do not
|
||||
excuse you from the conditions of this License. If you cannot
|
||||
distribute so as to satisfy simultaneously your obligations under this
|
||||
License and any other pertinent obligations, then as a consequence you
|
||||
may not distribute the Program at all. For example, if a patent
|
||||
license would not permit royalty-free redistribution of the Program by
|
||||
all those who receive copies directly or indirectly through you, then
|
||||
the only way you could satisfy both it and this License would be to
|
||||
refrain entirely from distribution of the Program.
|
||||
|
||||
If any portion of this section is held invalid or unenforceable under
|
||||
any particular circumstance, the balance of the section is intended to
|
||||
apply and the section as a whole is intended to apply in other
|
||||
circumstances.
|
||||
|
||||
It is not the purpose of this section to induce you to infringe any
|
||||
patents or other property right claims or to contest validity of any
|
||||
such claims; this section has the sole purpose of protecting the
|
||||
integrity of the free software distribution system, which is
|
||||
implemented by public license practices. Many people have made
|
||||
generous contributions to the wide range of software distributed
|
||||
through that system in reliance on consistent application of that
|
||||
system; it is up to the author/donor to decide if he or she is willing
|
||||
to distribute software through any other system and a licensee cannot
|
||||
impose that choice.
|
||||
|
||||
This section is intended to make thoroughly clear what is believed to
|
||||
be a consequence of the rest of this License.
|
||||
|
||||
8. If the distribution and/or use of the Program is restricted in
|
||||
certain countries either by patents or by copyrighted interfaces, the
|
||||
original copyright holder who places the Program under this License
|
||||
may add an explicit geographical distribution limitation excluding
|
||||
those countries, so that distribution is permitted only in or among
|
||||
countries not thus excluded. In such case, this License incorporates
|
||||
the limitation as if written in the body of this License.
|
||||
|
||||
9. The Free Software Foundation may publish revised and/or new versions
|
||||
of the General Public License from time to time. Such new versions will
|
||||
be similar in spirit to the present version, but may differ in detail to
|
||||
address new problems or concerns.
|
||||
|
||||
Each version is given a distinguishing version number. If the Program
|
||||
specifies a version number of this License which applies to it and "any
|
||||
later version", you have the option of following the terms and conditions
|
||||
either of that version or of any later version published by the Free
|
||||
Software Foundation. If the Program does not specify a version number of
|
||||
this License, you may choose any version ever published by the Free Software
|
||||
Foundation.
|
||||
|
||||
10. If you wish to incorporate parts of the Program into other free
|
||||
programs whose distribution conditions are different, write to the author
|
||||
to ask for permission. For software which is copyrighted by the Free
|
||||
Software Foundation, write to the Free Software Foundation; we sometimes
|
||||
make exceptions for this. Our decision will be guided by the two goals
|
||||
of preserving the free status of all derivatives of our free software and
|
||||
of promoting the sharing and reuse of software generally.
|
||||
|
||||
NO WARRANTY
|
||||
|
||||
11. BECAUSE THE PROGRAM IS LICENSED FREE OF CHARGE, THERE IS NO WARRANTY
|
||||
FOR THE PROGRAM, TO THE EXTENT PERMITTED BY APPLICABLE LAW. EXCEPT WHEN
|
||||
OTHERWISE STATED IN WRITING THE COPYRIGHT HOLDERS AND/OR OTHER PARTIES
|
||||
PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY OF ANY KIND, EITHER EXPRESSED
|
||||
OR IMPLIED, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
|
||||
MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. THE ENTIRE RISK AS
|
||||
TO THE QUALITY AND PERFORMANCE OF THE PROGRAM IS WITH YOU. SHOULD THE
|
||||
PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF ALL NECESSARY SERVICING,
|
||||
REPAIR OR CORRECTION.
|
||||
|
||||
12. IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
|
||||
WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MAY MODIFY AND/OR
|
||||
REDISTRIBUTE THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES,
|
||||
INCLUDING ANY GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING
|
||||
OUT OF THE USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED
|
||||
TO LOSS OF DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY
|
||||
YOU OR THIRD PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER
|
||||
PROGRAMS), EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE
|
||||
POSSIBILITY OF SUCH DAMAGES.
|
||||
|
||||
END OF TERMS AND CONDITIONS
|
||||
|
||||
How to Apply These Terms to Your New Programs
|
||||
|
||||
If you develop a new program, and you want it to be of the greatest
|
||||
possible use to the public, the best way to achieve this is to make it
|
||||
free software which everyone can redistribute and change under these terms.
|
||||
|
||||
To do so, attach the following notices to the program. It is safest
|
||||
to attach them to the start of each source file to most effectively
|
||||
convey the exclusion of warranty; and each file should have at least
|
||||
the "copyright" line and a pointer to where the full notice is found.
|
||||
|
||||
<one line to give the program's name and a brief idea of what it does.>
|
||||
Copyright (C) <year> <name of author>
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
|
||||
|
||||
Also add information on how to contact you by electronic and paper mail.
|
||||
|
||||
If the program is interactive, make it output a short notice like this
|
||||
when it starts in an interactive mode:
|
||||
|
||||
Gnomovision version 69, Copyright (C) year name of author
|
||||
Gnomovision comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
|
||||
This is free software, and you are welcome to redistribute it
|
||||
under certain conditions; type `show c' for details.
|
||||
|
||||
The hypothetical commands `show w' and `show c' should show the appropriate
|
||||
parts of the General Public License. Of course, the commands you use may
|
||||
be called something other than `show w' and `show c'; they could even be
|
||||
mouse-clicks or menu items--whatever suits your program.
|
||||
|
||||
You should also get your employer (if you work as a programmer) or your
|
||||
school, if any, to sign a "copyright disclaimer" for the program, if
|
||||
necessary. Here is a sample; alter the names:
|
||||
|
||||
Yoyodyne, Inc., hereby disclaims all copyright interest in the program
|
||||
`Gnomovision' (which makes passes at compilers) written by James Hacker.
|
||||
|
||||
<signature of Ty Coon>, 1 April 1989
|
||||
Ty Coon, President of Vice
|
||||
|
||||
This General Public License does not permit incorporating your program into
|
||||
proprietary programs. If your program is a subroutine library, you may
|
||||
consider it more useful to permit linking proprietary applications with the
|
||||
library. If this is what you want to do, use the GNU Library General
|
||||
Public License instead of this License.
|
22
SAMPLE_PROGRAMS
Executable file
22
SAMPLE_PROGRAMS
Executable file
@ -0,0 +1,22 @@
|
||||
SAMPLE PROGRAMS
|
||||
===============
|
||||
|
||||
STARTREK
|
||||
--------
|
||||
Original code is downloaded from http://www.brielcomputers.com/files/games.zip
|
||||
How to start it.
|
||||
|
||||
./napple1
|
||||
Shift + L (Load core)
|
||||
Load core. Filename: startrek (core/startrek)
|
||||
E2B3R (re-entry to BASIC)
|
||||
RUN (start program in BASIC)
|
||||
|
||||
KRUSADER
|
||||
--------
|
||||
Replica1's assembler. It is in startrek rom also.
|
||||
|
||||
./napple1
|
||||
Shift + L (Load core)
|
||||
Load core. Filename: startrek (core/startrek)
|
||||
F000R (cold start KRUSADER)
|
BIN
core/startrek
Executable file
BIN
core/startrek
Executable file
Binary file not shown.
BIN
rom/basic.rom
Executable file
BIN
rom/basic.rom
Executable file
Binary file not shown.
BIN
rom/monitor.rom
Executable file
BIN
rom/monitor.rom
Executable file
Binary file not shown.
79
src/keyboard.c
Executable file
79
src/keyboard.c
Executable file
@ -0,0 +1,79 @@
|
||||
/* napple1 ncurses Apple 1 emulator
|
||||
* Copyright (C) 2008 Nobu Hatano
|
||||
*
|
||||
* Pom1 Apple 1 Emulator
|
||||
* Copyright (C) 2000 Verhille Arnaud
|
||||
* Copyright (C) 2006 John D. Corrado
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU General Public License
|
||||
* as published by the Free Software Foundation; either version 2
|
||||
* of the License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
||||
*/
|
||||
#include "m6502.h"
|
||||
#include "pia6820.h"
|
||||
#include "memory.h"
|
||||
#include "keyboard.h"
|
||||
#include "screen.h"
|
||||
|
||||
int handleInput(void)
|
||||
{
|
||||
char tmp;
|
||||
|
||||
tmp = '\0';
|
||||
while ( (tmp = getch_screen()) == '\0' )
|
||||
;
|
||||
if (tmp == 'B') {
|
||||
loadBasic();
|
||||
resetPia6820();
|
||||
resetM6502();
|
||||
return 1;
|
||||
} else if (tmp == 'L') {
|
||||
loadCore();
|
||||
resetPia6820();
|
||||
resetM6502();
|
||||
return 1;
|
||||
} else if (tmp == 'D') {
|
||||
dumpCore();
|
||||
resetPia6820();
|
||||
resetM6502();
|
||||
return 1;
|
||||
} else if (tmp == 'R') {
|
||||
resetPia6820();
|
||||
resetM6502();
|
||||
return 1;
|
||||
} else if (tmp == 'H') {
|
||||
resetScreen();
|
||||
resetPia6820();
|
||||
resetMemory();
|
||||
resetM6502();
|
||||
return 1;
|
||||
} else if (tmp == 'Q') {
|
||||
return 0;
|
||||
} else if (tmp == 'M') {
|
||||
flipMode();
|
||||
resetPia6820();
|
||||
resetM6502();
|
||||
return 1;
|
||||
} else if (tmp == '\n') {
|
||||
tmp = '\r';
|
||||
} else if (tmp == '\b') {
|
||||
tmp = 0x5f;
|
||||
} else if (tmp >= 'a' && tmp <= 'z') {
|
||||
tmp = tmp - 'a' + 'A';
|
||||
}
|
||||
|
||||
writeKbd((unsigned char)(tmp + 0x80));
|
||||
writeKbdCr(0xA7);
|
||||
|
||||
return 1;
|
||||
}
|
22
src/keyboard.h
Executable file
22
src/keyboard.h
Executable file
@ -0,0 +1,22 @@
|
||||
/* napple1 ncurses Apple 1 emulator
|
||||
* Copyright (C) 2008 Nobu Hatano
|
||||
*
|
||||
* Pom1 Apple 1 Emulator
|
||||
* Copyright (C) 2000 Verhille Arnaud
|
||||
* Copyright (C) 2006 John D. Corrado
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU General Public License
|
||||
* as published by the Free Software Foundation; either version 2
|
||||
* of the License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
||||
*/
|
||||
int handleInput(void);
|
1829
src/m6502.c
Executable file
1829
src/m6502.c
Executable file
File diff suppressed because it is too large
Load Diff
27
src/m6502.h
Executable file
27
src/m6502.h
Executable file
@ -0,0 +1,27 @@
|
||||
/* napple1 ncurses Apple 1 emulator
|
||||
* Copyright (C) 2008 Nobu Hatano
|
||||
*
|
||||
* Pom1 Apple 1 Emulator
|
||||
* Copyright (C) 2000 Verhille Arnaud
|
||||
* Copyright (C) 2006 John D. Corrado
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU General Public License
|
||||
* as published by the Free Software Foundation; either version 2
|
||||
* of the License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
||||
*/
|
||||
void startM6502(void);
|
||||
void stopM6502(void);
|
||||
void resetM6502(void);
|
||||
void setSpeed(int freq, int synchroMillis);
|
||||
void setIRQ(int state);
|
||||
void setNMI(void);
|
63
src/main.c
Executable file
63
src/main.c
Executable file
@ -0,0 +1,63 @@
|
||||
/* napple1 ncurses Apple 1 emulator
|
||||
* Copyright (C) 2008 Nobu Hatano
|
||||
*
|
||||
* Pom1 Apple 1 Emulator
|
||||
* Copyright (C) 2000 Verhille Arnaud
|
||||
* Copyright (C) 2006 John D. Corrado
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU General Public License
|
||||
* as published by the Free Software Foundation; either version 2
|
||||
* of the License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
||||
*/
|
||||
#include <ncurses.h>
|
||||
#include <stdlib.h>
|
||||
|
||||
#include "m6502.h"
|
||||
#include "memory.h"
|
||||
#include "keyboard.h"
|
||||
#include "screen.h"
|
||||
#include "msgbuf.h"
|
||||
|
||||
int main()
|
||||
{
|
||||
/* initialize ncurse */
|
||||
initscr();
|
||||
noecho();
|
||||
cbreak();
|
||||
attron(A_REVERSE);
|
||||
init_screen();
|
||||
init_msgbuf();
|
||||
|
||||
/* initialize apple1 screen */
|
||||
resetScreen();
|
||||
setSpeed(1000000, 50); /* 1M Hz. Sync emulation every 50 msec */
|
||||
|
||||
/* Load monitor rom */
|
||||
if (!loadMonitor()) {
|
||||
print_msgbuf("Failed loading rom/monitor.rom");
|
||||
endwin();
|
||||
return 0;
|
||||
}
|
||||
resetMemory();
|
||||
|
||||
/* start processor */
|
||||
resetM6502();
|
||||
startM6502();
|
||||
atexit(stopM6502);
|
||||
|
||||
while (handleInput());
|
||||
|
||||
/* ending */
|
||||
endwin();
|
||||
return 0;
|
||||
}
|
36
src/makefile
Executable file
36
src/makefile
Executable file
@ -0,0 +1,36 @@
|
||||
# napple1 makefile
|
||||
# Nobu Hatano <nobuhatano@gmail.com>
|
||||
CC = gcc
|
||||
CFLAGS = -Wall -ansi
|
||||
THREAD = -lpthread
|
||||
|
||||
# Support Linux and Cygwin
|
||||
OS = ${shell uname -o}
|
||||
ifeq ($(OS), Cygwin)
|
||||
CURSES = -lncurses -I/usr/include/ncurses
|
||||
else
|
||||
CURSES = -lncurses
|
||||
endif
|
||||
|
||||
all: napple1
|
||||
|
||||
napple1: m6502.o memory.o pia6820.o screen.o keyboard.o main.o msgbuf.o
|
||||
$(CC) $(CFLAGS) -o ../napple1 m6502.o memory.o pia6820.o screen.o msgbuf.o keyboard.o main.o $(THREAD) $(CURSES)
|
||||
m6502.o: m6502.c m6502.h pia6820.h memory.h
|
||||
$(CC) $(CFLAGS) -o m6502.o -c m6502.c $(THREAD)
|
||||
memory.o: memory.c pia6820.h memory.h pia6820.h screen.h
|
||||
$(CC) $(CFLAGS) -o memory.o -c memory.c
|
||||
pia6820.o: pia6820.c pia6820.h screen.h
|
||||
$(CC) $(CFLAGS) -o pia6820.o -c pia6820.c
|
||||
screen.o: screen.c
|
||||
$(CC) $(CFLAGS) -o screen.o -c screen.c $(CURSES)
|
||||
msgbuf.o: msgbuf.c screen.h memory.h
|
||||
$(CC) $(CFLAGS) -o msgbuf.o -c msgbuf.c $(CURSES)
|
||||
keyboard.o: keyboard.c keyboard.h m6502.h pia6820.h memory.h screen.h
|
||||
$(CC) $(CFLAGS) -o keyboard.o -c keyboard.c
|
||||
main.o: main.c keyboard.h m6502.h screen.h msgbuf.h memory.h
|
||||
$(CC) $(CFLAGS) -o main.o -c main.c $(CURSES)
|
||||
clean:
|
||||
-rm *.o
|
||||
-rm ../napple1
|
||||
|
248
src/memory.c
Executable file
248
src/memory.c
Executable file
@ -0,0 +1,248 @@
|
||||
/* napple1 ncurses Apple 1 emulator
|
||||
* Copyright (C) 2008 Nobu Hatano
|
||||
*
|
||||
* Pom1 Apple 1 Emulator
|
||||
* Copyright (C) 2000 Verhille Arnaud
|
||||
* Copyright (C) 2006 John D. Corrado
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU General Public License
|
||||
* as published by the Free Software Foundation; either version 2
|
||||
* of the License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
||||
*/
|
||||
/*
|
||||
* Memory maap of napple1
|
||||
*
|
||||
* Apple I 8K mode & napple1 64K mode, common usage
|
||||
* -----------------------------------------------------------------------
|
||||
* $0000 Ststem & User Space
|
||||
* $0200 - $027F Input Buffer used by monitor
|
||||
* $0FFF
|
||||
* -----------------------------------------------------------------------
|
||||
* $D010 KBD Keyboard input register. b7 is always 1 by hardware.
|
||||
* Read KBD will automatcically clear KBDCR's b7.
|
||||
* $D011 KBDCR When key is pressed, b7 is set by hardware.
|
||||
* $D012 DSP Bit b6..b0 is output character for the terminal.
|
||||
* Writing to DSP will set b7 by hardware.
|
||||
* The termianl clear b7 after the character is accepted.
|
||||
* $D013 DSPCR Unused.
|
||||
* -----------------------------------------------------------------------
|
||||
* $E000 Apple I Integer BASIC
|
||||
* $E2B3 Re-entry address
|
||||
* $EFFF
|
||||
* -----------------------------------------------------------------------
|
||||
* $FF00 Monitor
|
||||
* $FFEF Echo
|
||||
* $FFFF
|
||||
* -----------------------------------------------------------------------
|
||||
*/
|
||||
/* Apple I 8K mode memory map
|
||||
* ---------------------------------
|
||||
* Start Type
|
||||
* addr
|
||||
* ---------------------------------
|
||||
* $0000 4KB RAM
|
||||
* $1000 unused
|
||||
* $D010 Display and Keyboard I/O
|
||||
* $D014 unused
|
||||
* $E000 4KB RAM
|
||||
* $F000 unused
|
||||
* $FF00 256B ROM^ (Woz Monitor)
|
||||
* ---------------------------------
|
||||
* ^ ROM can be written by Load core
|
||||
*/
|
||||
/* napple I 32K mode memory map
|
||||
* ---------------------------------
|
||||
* Start Type
|
||||
* addr
|
||||
* ---------------------------------
|
||||
* $0000 32K RAM
|
||||
* $8000 unused
|
||||
* $D010 Display and Keyboard I/O
|
||||
* $D014 unused
|
||||
* $E000 8K ROM^
|
||||
* ---------------------------------
|
||||
* ^ ROM can be written by Load core
|
||||
*/
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <string.h>
|
||||
|
||||
#include "pia6820.h"
|
||||
#include "memory.h"
|
||||
#include "screen.h"
|
||||
#include "msgbuf.h"
|
||||
|
||||
#define MEMMAX 0xFFFF
|
||||
|
||||
static unsigned char mem[65536];
|
||||
static int mode = 8; /* 8 = Apple I 8K mode, 32 = napple1 32K mode */
|
||||
|
||||
void flipMode(void)
|
||||
{
|
||||
if (mode == 8)
|
||||
mode = 32;
|
||||
else
|
||||
mode = 8;
|
||||
|
||||
/* update message buffer */
|
||||
print_msgbuf("");
|
||||
}
|
||||
|
||||
int memMode(void)
|
||||
{
|
||||
return mode;
|
||||
}
|
||||
|
||||
void loadBasic(void)
|
||||
{
|
||||
FILE *fd = fopen("rom/basic.rom", "rb");
|
||||
char input[MSG_LEN_MAX +1];
|
||||
|
||||
if (!fd) {
|
||||
gets_msgbuf("Failed to open rom/basic.rom: ", input);
|
||||
return;
|
||||
}
|
||||
|
||||
gets_msgbuf("Load basic.rom to ram? y/n: ", input);
|
||||
if (input[0] == 'y') {
|
||||
size_t s = fread(&mem[0xE000], 1, 4096, fd);
|
||||
if (s) {
|
||||
gets_msgbuf("Load completed: ", input);
|
||||
} else {
|
||||
gets_msgbuf("Load failed: ", input);
|
||||
}
|
||||
}
|
||||
|
||||
fclose(fd);
|
||||
return;
|
||||
}
|
||||
|
||||
int loadMonitor(void)
|
||||
{
|
||||
FILE *fd = fopen("rom/monitor.rom", "rb");
|
||||
|
||||
if (fd) {
|
||||
fread(&mem[0xFF00], 1, 256, fd);
|
||||
fclose(fd);
|
||||
}
|
||||
else{
|
||||
return 0;
|
||||
}
|
||||
|
||||
return 1;
|
||||
}
|
||||
|
||||
void resetMemory(void)
|
||||
{
|
||||
if (memMode() > 8)
|
||||
memset(mem, 0, 0xE000); /* rom is starting from 0xE000 */
|
||||
else
|
||||
memset(mem, 0, 0x10000 - 256); /* rom is within tail 256b */
|
||||
}
|
||||
|
||||
unsigned char memRead(unsigned short address)
|
||||
{
|
||||
if (address == 0xD013)
|
||||
return readDspCr();
|
||||
if (address == 0xD012)
|
||||
return readDsp();
|
||||
if (address == 0xD011)
|
||||
return readKbdCr();
|
||||
if (address == 0xD010)
|
||||
return readKbd();
|
||||
|
||||
return mem[address];
|
||||
}
|
||||
|
||||
void memWrite(unsigned short address, unsigned char value)
|
||||
{
|
||||
if (address < 0x1000)
|
||||
mem[address] = value;
|
||||
else if (address < 0x8000 && (memMode() > 8) )
|
||||
mem[address] = value;
|
||||
else if (address == 0xD013)
|
||||
writeDspCr(value);
|
||||
else if (address == 0xD012)
|
||||
writeDsp(value);
|
||||
else if (address == 0xD011)
|
||||
writeKbdCr(value);
|
||||
else if (address == 0xD010)
|
||||
writeKbd(value);
|
||||
else if (address >= 0xE000 && address < 0xF000 && memMode() == 8)
|
||||
mem[address] = value;
|
||||
else
|
||||
;
|
||||
|
||||
return;
|
||||
}
|
||||
|
||||
void dumpCore(void)
|
||||
{
|
||||
int i;
|
||||
FILE *fd;
|
||||
char input[MSG_LEN_MAX +1];
|
||||
char corename[5 + MSG_LEN_MAX +1]; /* 'core/' + input string */
|
||||
|
||||
gets_msgbuf("Dump core. Filename: ", input);
|
||||
sprintf(corename, "core/%s", input);
|
||||
|
||||
fd = fopen(corename, "w");
|
||||
for (i = 0; i <= MEMMAX; i++)
|
||||
fputc(mem[i], fd);
|
||||
fclose(fd);
|
||||
gets_msgbuf("Dump core completed: ", input);
|
||||
}
|
||||
|
||||
int loadCore(void)
|
||||
{
|
||||
FILE *fd;
|
||||
char input[MSG_LEN_MAX +1];
|
||||
char corename[5 + MSG_LEN_MAX +1]; /* 'core/' + input string */
|
||||
size_t s = 0;
|
||||
unsigned char buf[65536];
|
||||
int i;
|
||||
|
||||
gets_msgbuf("Load core. Filename: ", input);
|
||||
sprintf(corename, "core/%s", input);
|
||||
|
||||
fd = fopen(corename, "r");
|
||||
if (fd) {
|
||||
s = fread(&buf[0], 1, MEMMAX+1, fd);
|
||||
fclose(fd);
|
||||
}
|
||||
if (s) {
|
||||
gets_msgbuf("Load core completed: ", input);
|
||||
} else {
|
||||
gets_msgbuf("Failed to open core file: ", input);
|
||||
return 0;
|
||||
}
|
||||
|
||||
/* 0xF000 is unused area of 8K mode or
|
||||
* ROM area of 32K mode. So, if 0xF000 has a value,
|
||||
* The mode should better change to 32K mode.
|
||||
*/
|
||||
if ((buf[0xF000] != 0) && (memMode() == 8)) {
|
||||
flipMode();
|
||||
}
|
||||
|
||||
if (memMode() == 8) {
|
||||
for (i = 0; i <= 0x0FFF; i++) mem[i] = buf[i];
|
||||
for (i = 0xE000; i <= 0xEFFF; i++) mem[i] = buf[i];
|
||||
for (i = 0xFF00; i <= 0xFFFF; i++) mem[i] = buf[i];
|
||||
} else {
|
||||
for (i = 0; i <= 0x7FFF; i++) mem[i] = buf[i];
|
||||
for (i = 0xE000; i <= 0xFFFF; i++) mem[i] = buf[i];
|
||||
}
|
||||
return 1;
|
||||
}
|
27
src/memory.h
Executable file
27
src/memory.h
Executable file
@ -0,0 +1,27 @@
|
||||
/* Pom1 Apple 1 Emulator
|
||||
* Copyright (C) 2000 Verhille Arnaud
|
||||
* Copyright (C) 2006 John D. Corrado
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU General Public License
|
||||
* as published by the Free Software Foundation; either version 2
|
||||
* of the License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
||||
*/
|
||||
void loadBasic(void);
|
||||
int loadMonitor(void);
|
||||
void resetMemory(void);
|
||||
unsigned char memRead(unsigned short address);
|
||||
void memWrite(unsigned short address, unsigned char value);
|
||||
void dumpCore(void);
|
||||
int loadCore(void);
|
||||
int memMode(void);
|
||||
void flipMode(void);
|
73
src/msgbuf.c
Executable file
73
src/msgbuf.c
Executable file
@ -0,0 +1,73 @@
|
||||
/* napple1 ncurses Apple 1 emulator
|
||||
* Copyright (C) 2008 Nobu Hatano
|
||||
*
|
||||
* Pom1 Apple 1 Emulator
|
||||
* Copyright (C) 2000 Verhille Arnaud
|
||||
* Copyright (C) 2006 John D. Corrado
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU General Public License
|
||||
* as published by the Free Software Foundation; either version 2
|
||||
* of the License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
|
||||
* USA.
|
||||
*/
|
||||
/*
|
||||
* Message buffer is a 1 line display of napple 1 system.
|
||||
*/
|
||||
#include <ncurses.h>
|
||||
#include <string.h>
|
||||
|
||||
#include "screen.h"
|
||||
#include "msgbuf.h"
|
||||
#include "memory.h"
|
||||
|
||||
static WINDOW *msgbuf;
|
||||
|
||||
void print_msgbuf(char *s)
|
||||
{
|
||||
char msg[MSG_LEN_MAX + 1];
|
||||
|
||||
if ((int)strlen(s) < 1)
|
||||
sprintf(msg,
|
||||
"Basic Dump Load Reset Hard Quit Mode %2dK",
|
||||
memMode());
|
||||
else
|
||||
sprintf(msg,
|
||||
"%-40s",
|
||||
s);
|
||||
werase(msgbuf);
|
||||
wprintw(msgbuf, msg);
|
||||
wrefresh(msgbuf);
|
||||
}
|
||||
|
||||
void init_msgbuf(void)
|
||||
{
|
||||
msgbuf = newwin(1, ncol, nrow, 0);
|
||||
wattron(msgbuf, COLOR_PAIR(1) | A_REVERSE); /* 2 is black on green */
|
||||
|
||||
print_msgbuf("");
|
||||
}
|
||||
|
||||
void gets_msgbuf(char *prompt, char *typed)
|
||||
{
|
||||
werase(msgbuf);
|
||||
echo();
|
||||
nocbreak();
|
||||
wprintw(msgbuf, "%s", prompt);
|
||||
wrefresh(msgbuf);
|
||||
wgetnstr(msgbuf, typed, MSG_LEN_MAX);
|
||||
noecho();
|
||||
cbreak();
|
||||
print_msgbuf("");
|
||||
select_screen();
|
||||
}
|
||||
|
27
src/msgbuf.h
Executable file
27
src/msgbuf.h
Executable file
@ -0,0 +1,27 @@
|
||||
/* napple1 ncurses Apple 1 emulator
|
||||
* Copyright (C) 2008 Nobu Hatano
|
||||
*
|
||||
* Pom1 Apple 1 Emulator
|
||||
* Copyright (C) 2000 Verhille Arnaud
|
||||
* Copyright (C) 2006 John D. Corrado
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU General Public License
|
||||
* as published by the Free Software Foundation; either version 2
|
||||
* of the License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
|
||||
* USA.
|
||||
*/
|
||||
void init_msgbuf(void);
|
||||
void print_msgbuf(char *string);
|
||||
void gets_msgbuf(char *prompt, char *typed);
|
||||
|
||||
#define MSG_LEN_MAX 40
|
104
src/pia6820.c
Executable file
104
src/pia6820.c
Executable file
@ -0,0 +1,104 @@
|
||||
/* napple1 ncurses Apple 1 emulator
|
||||
* Copyright (C) 2008 Nobu Hatano
|
||||
*
|
||||
* Pom1 Apple 1 Emulator
|
||||
* Copyright (C) 2000 Verhille Arnaud
|
||||
* Copyright (C) 2006 John D. Corrado
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU General Public License
|
||||
* as published by the Free Software Foundation; either version 2
|
||||
* of the License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
||||
*/
|
||||
#include "pia6820.h"
|
||||
#include "screen.h"
|
||||
|
||||
static unsigned char _dspCr = 0, _dsp = 0, _kbdCr = 0, _kbd = 0;
|
||||
static int kbdInterrups = 0, dspOutput = 0;
|
||||
|
||||
void resetPia6820(void)
|
||||
{
|
||||
kbdInterrups = dspOutput = 0;
|
||||
_kbdCr = _dspCr = 0;
|
||||
}
|
||||
|
||||
void setKdbInterrups(int b)
|
||||
{
|
||||
kbdInterrups = b;
|
||||
}
|
||||
|
||||
int getKbdInterrups(void)
|
||||
{
|
||||
return kbdInterrups;
|
||||
}
|
||||
|
||||
int getDspOutput(void)
|
||||
{
|
||||
return dspOutput;
|
||||
}
|
||||
|
||||
void writeDspCr(unsigned char dspCr)
|
||||
{
|
||||
if (!dspOutput && dspCr >= 0x80)
|
||||
dspOutput = 1;
|
||||
else
|
||||
_dspCr = dspCr;
|
||||
}
|
||||
|
||||
void writeDsp(unsigned char dsp)
|
||||
{
|
||||
if (dsp >= 0x80)
|
||||
dsp -= 0x80;
|
||||
|
||||
outputDsp(dsp);
|
||||
_dsp = dsp;
|
||||
}
|
||||
|
||||
void writeKbdCr(unsigned char kbdCr)
|
||||
{
|
||||
if (!kbdInterrups && kbdCr >= 0x80)
|
||||
kbdInterrups = 1;
|
||||
else
|
||||
_kbdCr = kbdCr;
|
||||
}
|
||||
|
||||
void writeKbd(unsigned char kbd)
|
||||
{
|
||||
_kbd = kbd;
|
||||
}
|
||||
|
||||
unsigned char readDspCr(void)
|
||||
{
|
||||
return _dspCr;
|
||||
}
|
||||
|
||||
unsigned char readDsp(void)
|
||||
{
|
||||
return _dsp;
|
||||
}
|
||||
|
||||
unsigned char readKbdCr(void)
|
||||
{
|
||||
if (kbdInterrups && _kbdCr >= 0x80)
|
||||
{
|
||||
_kbdCr = 0;
|
||||
|
||||
return 0xA7;
|
||||
}
|
||||
|
||||
return _kbdCr;
|
||||
}
|
||||
|
||||
unsigned char readKbd(void)
|
||||
{
|
||||
return _kbd;
|
||||
}
|
33
src/pia6820.h
Executable file
33
src/pia6820.h
Executable file
@ -0,0 +1,33 @@
|
||||
/* napple1 ncurses Apple 1 emulator
|
||||
* Copyright (C) 2008 Nobu Hatano
|
||||
*
|
||||
* Pom1 Apple 1 Emulator
|
||||
* Copyright (C) 2000 Verhille Arnaud
|
||||
* Copyright (C) 2006 John D. Corrado
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU General Public License
|
||||
* as published by the Free Software Foundation; either version 2
|
||||
* of the License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
||||
*/
|
||||
void resetPia6820(void);
|
||||
void setKdbInterrups(int b);
|
||||
int getKbdInterrups(void);
|
||||
int getDspOutput(void);
|
||||
void writeDspCr(unsigned char dspCr);
|
||||
void writeDsp(unsigned char dsp);
|
||||
void writeKbdCr(unsigned char kbdCr);
|
||||
void writeKbd(unsigned char kbd);
|
||||
unsigned char readDspCr(void);
|
||||
unsigned char readDsp(void);
|
||||
unsigned char readKbdCr(void);
|
||||
unsigned char readKbd(void);
|
183
src/screen.c
Executable file
183
src/screen.c
Executable file
@ -0,0 +1,183 @@
|
||||
/* napple1 ncurses Apple 1 emulator
|
||||
* Copyright (C) 2008 Nobu Hatano
|
||||
*
|
||||
* Pom1 Apple 1 Emulator
|
||||
* Copyright (C) 2000 Verhille Arnaud
|
||||
* Copyright (C) 2006 John D. Corrado
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU General Public License
|
||||
* as published by the Free Software Foundation; either version 2
|
||||
* of the License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301,
|
||||
* USA.
|
||||
*/
|
||||
/** screen.c
|
||||
* Screen is a vitrual display of Apple I
|
||||
*/
|
||||
#define _XOPEN_SOURCE 500
|
||||
#include <unistd.h>
|
||||
#include <string.h>
|
||||
#include <ncurses.h>
|
||||
#include <sys/time.h>
|
||||
|
||||
#include "screen.h"
|
||||
|
||||
static unsigned char screenTbl[40 * 24];
|
||||
static int indexX, indexY;
|
||||
static WINDOW *screen;
|
||||
static long long interval_start; /* interval start time in u sec */
|
||||
|
||||
char getch_screen(void)
|
||||
{
|
||||
return (char)wgetch(screen);
|
||||
}
|
||||
|
||||
void init_screen(void)
|
||||
{
|
||||
/* Determine main screen window size.
|
||||
* To reserve bottom 1 line for the message buffer,
|
||||
* -1 from $LINES
|
||||
*/
|
||||
if ((nrow = (LINES - 1)) > 24 || nrow < 1)
|
||||
nrow = 24;
|
||||
if ((ncol = COLS) > 40 || ncol < 1)
|
||||
ncol = 40;
|
||||
|
||||
/* Create 'screen' window */
|
||||
screen = newwin(nrow, ncol, 0, 0);
|
||||
|
||||
/* Set screen window color as Green On Black */
|
||||
if (has_colors())
|
||||
{
|
||||
start_color();
|
||||
init_pair(1, COLOR_GREEN, COLOR_BLACK);
|
||||
wattron(screen, COLOR_PAIR(1));
|
||||
}
|
||||
}
|
||||
|
||||
void updateScreen(void)
|
||||
{
|
||||
int i, j;
|
||||
unsigned char c;
|
||||
|
||||
werase(screen);
|
||||
|
||||
for (j = 0; j < nrow; ++j)
|
||||
{
|
||||
for (i = 0; i < ncol; ++i)
|
||||
{
|
||||
wmove(screen, j, i);
|
||||
c = screenTbl[j * ncol + i];
|
||||
if (c < '!')
|
||||
c = ' ';
|
||||
wprintw(screen, "%c", c);
|
||||
}
|
||||
}
|
||||
|
||||
wmove(screen, indexY, indexX); /* put cursor */
|
||||
wrefresh(screen);
|
||||
}
|
||||
|
||||
void resetScreen(void)
|
||||
{
|
||||
indexX = indexY = 0;
|
||||
memset(screenTbl, 0, nrow * ncol);
|
||||
updateScreen();
|
||||
}
|
||||
|
||||
static void synchronizeOutput(void)
|
||||
{
|
||||
int processed; /* processed real time in u sec */
|
||||
int delay; /* delay u sec to be added to real time */
|
||||
struct timeval t;
|
||||
|
||||
gettimeofday(&t, NULL);
|
||||
processed = (int)(t.tv_usec + t.tv_sec * 1000000
|
||||
- interval_start);
|
||||
if (processed < 0)
|
||||
processed = 0;
|
||||
|
||||
/* Video output refreshes screen by 60 Hz.
|
||||
* In real time, it takes 1 sec / 60 hz.
|
||||
* So, 1000000 usec / 60 hz.
|
||||
*/
|
||||
delay = 1000000 / 60 - processed;
|
||||
if (delay < 0)
|
||||
delay = 0;
|
||||
usleep((unsigned int)delay);
|
||||
|
||||
gettimeofday(&t, NULL);
|
||||
interval_start = (long long)(t.tv_usec + t.tv_sec * 1000000);
|
||||
}
|
||||
|
||||
static void newLine(void)
|
||||
{
|
||||
int i;
|
||||
|
||||
for (i = 0; i < (nrow-1) ; ++i)
|
||||
memcpy(&screenTbl[i * ncol],
|
||||
&screenTbl[(i + 1) * ncol],
|
||||
ncol);
|
||||
|
||||
memset(&screenTbl[ncol * (nrow-1)], 0, ncol);
|
||||
}
|
||||
|
||||
void outputDsp(unsigned char dsp)
|
||||
{
|
||||
switch (dsp)
|
||||
{
|
||||
case 0x5F:
|
||||
if (indexX == 0)
|
||||
{
|
||||
indexY--;
|
||||
indexX = ncol-1;
|
||||
}
|
||||
else
|
||||
indexX--;
|
||||
|
||||
screenTbl[indexY * ncol + indexX] = 0;
|
||||
break;
|
||||
case 0x0A:
|
||||
case 0x0D:
|
||||
indexX = 0;
|
||||
indexY++;
|
||||
break;
|
||||
case 0x00:
|
||||
case 0x7F:
|
||||
break;
|
||||
default:
|
||||
screenTbl[indexY * ncol + indexX] = dsp;
|
||||
indexX++;
|
||||
break;
|
||||
}
|
||||
|
||||
if (indexX == ncol)
|
||||
{
|
||||
indexX = 0;
|
||||
indexY++;
|
||||
}
|
||||
if (indexY == nrow)
|
||||
{
|
||||
newLine();
|
||||
indexY--;
|
||||
}
|
||||
|
||||
updateScreen();
|
||||
|
||||
synchronizeOutput();
|
||||
}
|
||||
|
||||
void select_screen(void)
|
||||
{
|
||||
touchwin(screen);
|
||||
wrefresh(screen);
|
||||
}
|
29
src/screen.h
Executable file
29
src/screen.h
Executable file
@ -0,0 +1,29 @@
|
||||
/* napple1 ncurses Apple 1 emulator
|
||||
* Copyright (C) 2008 Nobu Hatano
|
||||
*
|
||||
* Pom1 Apple 1 Emulator
|
||||
* Copyright (C) 2000 Verhille Arnaud
|
||||
* Copyright (C) 2006 John D. Corrado
|
||||
*
|
||||
* This program is free software; you can redistribute it and/or
|
||||
* modify it under the terms of the GNU General Public License
|
||||
* as published by the Free Software Foundation; either version 2
|
||||
* of the License, or (at your option) any later version.
|
||||
*
|
||||
* This program is distributed in the hope that it will be useful,
|
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
* GNU General Public License for more details.
|
||||
*
|
||||
* You should have received a copy of the GNU General Public License
|
||||
* along with this program; if not, write to the Free Software
|
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
||||
*/
|
||||
void init_screen(void);
|
||||
void resetScreen(void);
|
||||
void outputDsp(unsigned char dsp);
|
||||
char getch_screen(void);
|
||||
void select_screen(void);
|
||||
|
||||
int nrow, ncol;
|
||||
|
Loading…
Reference in New Issue
Block a user