… | |
… | |
146 | open my $fh, "<", $RUNTIMEFILE |
146 | open my $fh, "<", $RUNTIMEFILE |
147 | or die "unable to read $RUNTIMEFILE file: $!"; |
147 | or die "unable to read $RUNTIMEFILE file: $!"; |
148 | $RUNTIME = <$fh> + 0.; |
148 | $RUNTIME = <$fh> + 0.; |
149 | } |
149 | } |
150 | |
150 | |
|
|
151 | eval "sub TICK() { $TICK } 1" or die; |
|
|
152 | |
151 | mkdir $_ |
153 | mkdir $_ |
152 | for $LOCALDIR, $TMPDIR, $UNIQUEDIR, $PLAYERDIR, $RANDOMDIR, $BDBDIR; |
154 | for $LOCALDIR, $TMPDIR, $UNIQUEDIR, $PLAYERDIR, $RANDOMDIR, $BDBDIR; |
153 | |
155 | |
154 | our $EMERGENCY_POSITION; |
156 | our $EMERGENCY_POSITION; |
155 | |
157 | |
… | |
… | |
2386 | |
2388 | |
2387 | our $SAY_CHANNEL = { |
2389 | our $SAY_CHANNEL = { |
2388 | id => "say", |
2390 | id => "say", |
2389 | title => "Map", |
2391 | title => "Map", |
2390 | reply => "say ", |
2392 | reply => "say ", |
2391 | tooltip => "Things said to and replied from npcs near you and other players on the same map only.", |
2393 | tooltip => "Things said to and replied from NPCs near you and other players on the same map only.", |
2392 | }; |
2394 | }; |
2393 | |
2395 | |
2394 | our $CHAT_CHANNEL = { |
2396 | our $CHAT_CHANNEL = { |
2395 | id => "chat", |
2397 | id => "chat", |
2396 | title => "Chat", |
2398 | title => "Chat", |
… | |
… | |
3925 | LOG llevInfo, "[ABT] [suppressed]\n"; |
3927 | LOG llevInfo, "[ABT] [suppressed]\n"; |
3926 | } |
3928 | } |
3927 | } |
3929 | } |
3928 | |
3930 | |
3929 | # load additional modules |
3931 | # load additional modules |
3930 | eval "use cf::$_" for @EXTRA_MODULES; |
3932 | require "cf/$_.pm" for @EXTRA_MODULES; |
3931 | |
3933 | |
3932 | END { cf::emergency_save } |
3934 | END { cf::emergency_save } |
3933 | |
3935 | |
3934 | 1 |
3936 | 1 |
3935 | |
3937 | |