Parent Directory | Revision Log | Patch
revision 38 by dpavlin, Mon Jul 30 23:28:25 2007 UTC | revision 40 by dpavlin, Tue Jul 31 08:41:06 2007 UTC | |
---|---|---|
# | Line 6 use warnings; | Line 6 use warnings; |
6 | use Data::Dump qw/dump/; | use Data::Dump qw/dump/; |
7 | use Carp qw/confess/; | use Carp qw/confess/; |
8 | use Exporter 'import'; | use Exporter 'import'; |
9 | our @EXPORT = qw'@mem $PC $A $P $X $Y $S $IPeriod'; | our @EXPORT = qw'@mem $PC $A $P $X $Y $S $IPeriod $run_for'; |
10 | ||
11 | =head1 NAME | =head1 NAME |
12 | ||
# | Line 26 our $PC = 0xbeef; | Line 26 our $PC = 0xbeef; |
26 | our ( $A, $P, $X, $Y, $S ) = (0) x 5; | our ( $A, $P, $X, $Y, $S ) = (0) x 5; |
27 | # Set IPeriod to number of CPU cycles between calls to Loop6502 | # Set IPeriod to number of CPU cycles between calls to Loop6502 |
28 | our $IPeriod = 1; | our $IPeriod = 1; |
29 | # Exec6502 cycles | |
30 | our $run_for = 1; | |
31 | $run_for = 0x42; | |
32 | ||
33 | =head1 init | =head1 init |
34 |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |