;/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