--- M6502/M6502.pm	2007/07/30 23:28:25	38
+++ M6502/M6502.pm	2007/07/31 08:41:06	40
@@ -6,7 +6,7 @@
 use Data::Dump qw/dump/;
 use Carp qw/confess/;
 use Exporter 'import';
-our @EXPORT = qw'@mem $PC $A $P $X $Y $S $IPeriod';
+our @EXPORT = qw'@mem $PC $A $P $X $Y $S $IPeriod $run_for';
 
 =head1 NAME
 
@@ -26,6 +26,9 @@
 our ( $A, $P, $X, $Y, $S ) = (0) x 5;
 # Set IPeriod to number of CPU cycles between calls to Loop6502
 our $IPeriod = 1;
+# Exec6502 cycles
+our $run_for = 1;
+$run_for = 0x42;
 
 =head1 init