… | |
… | |
59 | return;#d# |
59 | return;#d# |
60 | #return unless defined $^S && !$^S; |
60 | #return unless defined $^S && !$^S; |
61 | $Event::DIED->(undef, $_[0]); |
61 | $Event::DIED->(undef, $_[0]); |
62 | }; |
62 | }; |
63 | |
63 | |
64 | our $VERSION = '0.1'; |
64 | our $VERSION = '0.9'; |
65 | |
65 | |
66 | my $MAX_FPS = 60; |
66 | my $MAX_FPS = 60; |
67 | my $MIN_FPS = 5; # unused as of yet |
67 | my $MIN_FPS = 5; # unused as of yet |
68 | |
68 | |
69 | our $META_SERVER = "crossfire.real-time.com:13326"; |
69 | our $META_SERVER = "crossfire.real-time.com:13326"; |
… | |
… | |
366 | port => $port || 13327, |
366 | port => $port || 13327, |
367 | user => $CFG->{profile}{default}{user}, |
367 | user => $CFG->{profile}{default}{user}, |
368 | pass => $CFG->{profile}{default}{password}, |
368 | pass => $CFG->{profile}{default}{password}, |
369 | mapw => $mapsize, |
369 | mapw => $mapsize, |
370 | maph => $mapsize, |
370 | maph => $mapsize, |
|
|
371 | |
|
|
372 | client => "cfplus $VERSION $] $^O", |
371 | |
373 | |
372 | map_widget => $MAPWIDGET, |
374 | map_widget => $MAPWIDGET, |
373 | logview => $LOGVIEW, |
375 | logview => $LOGVIEW, |
374 | statusbox => $STATUSBOX, |
376 | statusbox => $STATUSBOX, |
375 | map => $MAP, |
377 | map => $MAP, |