… | |
… | |
112 | } |
112 | } |
113 | |
113 | |
114 | $self->map_update (\@dirty); |
114 | $self->map_update (\@dirty); |
115 | } |
115 | } |
116 | |
116 | |
117 | sub feed_map_scroll { |
|
|
118 | my ($self, $data) = @_; |
|
|
119 | |
|
|
120 | my ($dx, $dy) = split / /, $data; |
|
|
121 | |
|
|
122 | $self->{delayed_scroll_x} += $dx; |
|
|
123 | $self->{delayed_scroll_y} += $dy; |
|
|
124 | |
|
|
125 | $self->map_scroll ($dx, $dy); |
|
|
126 | } |
|
|
127 | |
|
|
128 | sub feed_newmap { |
117 | sub feed_newmap { |
129 | my ($self) = @_; |
118 | my ($self) = @_; |
130 | |
119 | |
131 | $self->{map} = []; |
120 | $self->{map} = []; |
132 | $self->{mapx} = 0; |
121 | $self->{mapx} = 0; |