Parent Directory | Revision Log | Patch
revision 41 by dpavlin, Tue Jul 31 08:49:22 2007 UTC | revision 45 by dpavlin, Tue Jul 31 09:43:50 2007 UTC | |
---|---|---|
# | Line 107 sub vram { | Line 107 sub vram { |
107 | my $mask = 1; | my $mask = 1; |
108 | my $scale = $self->scale; | my $scale = $self->scale; |
109 | ||
110 | # printf "## vram %04x %02x*%02x %02x\n", $offset, $x, $y, $byte if $self->trace; | printf "## vram %04x %02x*%02x %02x\n", $offset, $x, $y, $byte if $self->trace; |
111 | ||
112 | foreach ( 0 .. 7 ) { | foreach ( 0 .. 7 ) { |
113 | my $on = $byte & $mask; | my $on = $byte & $mask; |
|
ViewVC Help | |
Powered by ViewVC 1.1.26 |