| … | |
… | |
| 352 | |
352 | |
| 353 | my $res = 0; |
353 | my $res = 0; |
| 354 | my $mod = $ev->{mod}; |
354 | my $mod = $ev->{mod}; |
| 355 | my $sym = $ev->{sym}; |
355 | my $sym = $ev->{sym}; |
| 356 | |
356 | |
|
|
357 | delete $self->{last_mod}; |
|
|
358 | delete $self->{last_sym}; |
|
|
359 | |
| 357 | if ($::CFG->{shift_fire_stop}) { |
360 | if ($::CFG->{shift_fire_stop}) { |
| 358 | if (!($mod & DC::KMOD_SHIFT) && delete $self->{shft}) { |
361 | if (!($mod & DC::KMOD_SHIFT) && delete $self->{shft}) { |
| 359 | $::CONN->user_send ("fire_stop"); |
362 | $::CONN->user_send ("fire_stop"); |
| 360 | delete $self->{fire_dir}; |
363 | delete $self->{fire_dir}; |
| 361 | $res = 1; |
364 | $res = 1; |
| … | |
… | |
| 436 | |
439 | |
| 437 | glPushMatrix; |
440 | glPushMatrix; |
| 438 | glTranslate $sx0, $sy0; |
441 | glTranslate $sx0, $sy0; |
| 439 | glScale $::CFG->{map_scale}, $::CFG->{map_scale}; |
442 | glScale $::CFG->{map_scale}, $::CFG->{map_scale}; |
| 440 | |
443 | |
| 441 | $::MAP->draw ($dx, $dy, $sw, $sh, $self->{tilesize}); |
444 | $::MAP->draw ($dx, $dy, $sw, $sh, |
|
|
445 | $self->{tilesize}, |
|
|
446 | $::CONN->{player}{tag}, 0, 0); |
| 442 | |
447 | |
| 443 | glScale $self->{tilesize}, $self->{tilesize}; |
448 | glScale $self->{tilesize}, $self->{tilesize}; |
| 444 | |
449 | |
| 445 | if (my $tex = $self->{fow_texture}) { |
450 | if (my $tex = $self->{fow_texture}) { |
| 446 | glPushMatrix; |
451 | glPushMatrix; |
