/[VRac]/Orao.pm
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /Orao.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 171 by dpavlin, Mon Aug 6 11:40:21 2007 UTC revision 179 by dpavlin, Sun Sep 30 17:48:59 2007 UTC
# Line 54  sub run { Line 54  sub run {
54          warn "emulating ", $#mem, " bytes of memory\n";          warn "emulating ", $#mem, " bytes of memory\n";
55    
56  #       $self->scale( 2 );  #       $self->scale( 2 );
57  #       $self->show_mem( 1 );          $self->show_mem( 1 );
58          $self->load_session( 'sess/current' );          $self->load_session( 'sess/current' );
59    
60          $self->open_screen;          $self->open_screen;
# Line 226  my $keyboard = { Line 226  my $keyboard = {
226          0x87FD => sub {          0x87FD => sub {
227                  my $self = shift;                  my $self = shift;
228                  if ( $self->key_active('return') ) {                  if ( $self->key_active('return') ) {
229                          M6502::_write( 0xfc, 13 );  #                       M6502::_write( 0xfc, 13 );
230                          warn "return\n";                          warn "return\n";
231                          return 0;                          return 0;
232                  } elsif ( $self->key_active('left ctrl','right ctrl') ) {                  } elsif ( $self->key_active('left ctrl','right ctrl') ) {
Legend:
Removed from v.171  
changed lines
  Added in v.179
  ViewVC Help
Powered by ViewVC 1.1.26