47 lines
1.8 KiB
HCL
47 lines
1.8 KiB
HCL
;/def -p20 -q -h'PROMPT *Aby zalogowac sie na istniejaca postac*' login_hook0 = \
|
|
/def -mregexp -Fp2 -t'Aby zalogowac sie na istniejaca postac' login_hook0 = \
|
|
/purge login_hook* %;\
|
|
/def -mregexp -1 -F -h'SEND ([^ ]*)' login_hook1 = \
|
|
/send %%{P0} %%;\
|
|
/set player=$$[tolower({P0})] %%;\
|
|
/set mudworld=$${world_name} %%;\
|
|
/eval /cd %%{main_dir}/common %%;\
|
|
/_login_sprawdz %%;\
|
|
/load colorscheme.tf %%;\
|
|
/load sets.tf %%;\
|
|
/load start.tf %%;\
|
|
/load init.tf %%;\
|
|
/eval /cd %%{main_dir}/$${world_name} %%;\
|
|
/load sets.tf %%;\
|
|
/load start.tf %%;\
|
|
/eval /load %%{priv_dir}/%%{mudworld}/players/%%{player}/%%{player}.tf %%;\
|
|
/eval /load %%{priv_dir}/%%{mudworld}/imiona.tf
|
|
|
|
/def -p20 -q -h'PROMPT *Podaj swoje imie*' nightal_login_hook0 = \
|
|
/purge login_hook* %;\
|
|
/def -mregexp -1 -F -h'SEND ([^ ]*)' login_hook1 = \
|
|
/send %%{P0} %%;\
|
|
/set player=$$[tolower({P0})] %%;\
|
|
/set mudworld=$${world_name} %%;\
|
|
/eval /cd %%{main_dir}/common %%;\
|
|
/_login_sprawdz %%;\
|
|
/load colorscheme.tf %%;\
|
|
/load sets.tf %%;\
|
|
/load start.tf %%;\
|
|
/load init.tf %%;\
|
|
/eval /cd %%{main_dir}/$${world_name} %%;\
|
|
/load sets.tf %%;\
|
|
/load start.tf %%;\
|
|
/eval /load %%{priv_dir}/%%{mudworld}/players/%%{player}/%%{player}.tf %%;\
|
|
/eval /load %%{priv_dir}/%%{mudworld}/players/%%{player}/imiona.tf
|
|
|
|
/def _login_sprawdz = \
|
|
/quote -S -dexec !\
|
|
if [ ! -d %{priv_dir}/%{mudworld}/players/%{player} ]; then \
|
|
mkdir -p %{priv_dir}/%{mudworld}/players/%{player}; \
|
|
cp ../common/stdplayer.tf %{priv_dir}/%{mudworld}/players/%{player}/%{player}.tf; \
|
|
touch %{priv_dir}/%{mudworld}/players/%{player}/lista.tf; \
|
|
fi
|
|
|
|
;/def -mregexp -Fp2 -t'Aby zalogowac sie na istniejaca postac - podaj jej imie.' autoimie = /send
|