DELTA 29 0 762
SVN ЛpНZВ, Й+ АБB Б;ЙАh JЛ&В*write_chunk

  $emu->write_chunk( $address, $chunk_of_data );

=cut

sub write_chunk {
	my ($self, $addr, $chunk) = @_;
	my $len = length($chunk);
	splice @mem, $addr, $len, unpack('C*', $chunk)printf "ram %04x - %04x\n", $from, $to;
		return $mem[$from .. $to - 1];
	}
	printf "ram %04x\n", $from;ENDREP
DELTA 29 1960 1670
SVN Ш}Ъ`Бe Б З БtБАБU ДГЗ ОЗ& ГRХ+Бc Screen=head2 init

Start emulator

=cut

sub init {
	my $self = shift;
	warn "call upstream init\n";
	$self->SUPER::init( @_ );

	warn "staring Orao $Orao::VERSION emulation\n";

	$self->open_screen;
	$self->load_rom;
}confessENDREP
DELTA 29 3643 996
SVN О`ПLБ9 В АБ7 МВYБ7open_screen

Open simulated screen

=cut

our $app;

sub open_screen {
	my $self = shift;

	if ( ! $self->scale ) {
		$self->scale( 1 );
		warn "using default unscaled display\n";
	}
ENDREP
DELTA 30 835 121
SVN ЯЯ&
 Ы Ы ГzЫ initial: %s\n", EMU_START ENDREP
id: n.0.r31/959
type: file
pred: n.0.r30/1305
count: 7
text: 31 885 50 4006 3c69725fbdd87240ecbfb48c01b55e69
cpath: /M6502/perl.c
copyroot: 0 /

id: k.0.r31/1104
type: file
pred: k.0.r30/1982
count: 6
text: 31 0 331 1754 5148650f6d7a37a4a57746fa78c4167c
cpath: /M6502/M6502.pm
copyroot: 0 /

id: r.0.r31/1251
type: file
pred: r.0.r30/2281
count: 2
text: 31 650 210 1996 d5484094db3d302e881c463f691c2d87
cpath: /M6502/Screen.pm
copyroot: 0 /

id: q.0.r31/1401
type: file
pred: q.0.r30/2430
count: 2
text: 31 353 271 3424 3209f4e2b919969acef34397272374c7
cpath: /M6502/Orao.pm
copyroot: 0 /

PLAIN
K 7
Codes.h
V 18
file e.0.r23/16303
K 10
ConDebug.c
V 18
file f.0.r23/16433
K 7
Debug.c
V 18
file g.0.r23/16568
K 7
M6502.c
V 18
file h.0.r23/16701
K 7
M6502.h
V 18
file i.0.r23/16037
K 8
M6502.pm
V 17
file k.0.r31/1104
K 8
MANIFEST
V 17
file o.0.r29/6383
K 11
Makefile.PL
V 17
file p.0.r30/2129
K 7
Orao.pm
V 17
file q.0.r31/1401
K 9
Screen.pm
V 17
file r.0.r31/1251
K 8
Tables.h
V 18
file j.0.r23/16170
K 8
config.h
V 17
file m.0.r30/2578
K 6
perl.c
V 16
file n.0.r31/959
K 9
perlxsi.c
V 17
file s.0.r29/6646
K 1
t
V 16
dir t.0.r30/1841
END
ENDREP
id: d.0.r31/2105
type: dir
pred: d.0.r30/3282
count: 8
text: 31 1549 543 543 2e6e6d209b06e9eb880b19e4a37e0ecc
cpath: /M6502
copyroot: 0 /

PLAIN
K 5
M6502
V 16
dir d.0.r31/2105
K 11
Makefile.PL
V 17
file 2.0.r21/4556
K 3
lib
V 15
dir 9.0.r22/804
K 7
orao.pl
V 16
file 1.0.r22/940
K 1
t
V 16
dir 4.0.r21/3495
END
ENDREP
id: 0.0.r31/2424
type: dir
pred: 0.0.r30/3601
count: 31
text: 31 2244 167 167 e8ccedac61bd59254e474ff2eb9481bb
cpath: /
copyroot: 0 /

r.0.t30-1 modify true false /M6502/Screen.pm

q.0.t30-1 modify true false /M6502/Orao.pm

n.0.t30-1 modify true false /M6502/perl.c

k.0.t30-1 modify true false /M6502/M6502.pm


2424 2559