--- M6502/Orao.pm 2007/08/02 21:55:06 105 +++ M6502/Orao.pm 2007/08/03 08:44:45 106 @@ -63,8 +63,10 @@ 0x1000 => 'dump/SCRINV.BIN', # should be 0x6000, but oraoemu has 2 byte prefix 0x5FFE => 'dump/screen.dmp', - 0xC000 => 'rom/BAS12.ROM', - 0xE000 => 'rom/CRT12.ROM', +# 0xC000 => 'rom/BAS12.ROM', +# 0xE000 => 'rom/CRT12.ROM', + 0xC000 => 'rom/BAS13.ROM', + 0xE000 => 'rom/CRT13.ROM', }); # $PC = 0xDD11; # BC @@ -132,8 +134,6 @@ sub run { my $self = shift; - $self->show_mem( 1 ); - $self->boot if ( ! $self->booted ); $self->loop; }; @@ -468,7 +468,7 @@ warn sprintf("# Orao::write(%04x,%02x)\n", $addr, $byte) if $self->trace; if ( $addr >= 0x6000 && $addr < 0x8000 ) { - $self->vram( $addr - 0x6000 , $byte ); +# $self->vram( $addr - 0x6000 , $byte ); } if ( $addr == 0x8800 ) {