/def -mregexp -p2 -t'Listy nieprzeczytane:' _poczta_read = \
  /beep 1%;\
  /set poczta_show=READ%;\
  /status_edit -r1 poczta_show:4:C%c_alarm

/def -mregexp -p2 -t'List jest gotowy do wyslania.' _poczta_wait = \
  /beep 1%;\
  /set poczta_show=SEND%;\
  /status_edit -r1 poczta_show:4:C%c_alarm

/def -mregexp -p2 -t'((Nie otrzymales|Nie masz) zadnych|Kasuje listy|zostal.* pomyslnie wyslan|List : )' poczta_off0 = \
  /if ({poczta_show} =~ 'NEW' )\
    \
  /elseif ({poczta_show} =~ 'NEW+' )\
    \
  /elseif ({poczta_show} =~ 'SEND' )\
    \
  /else \
    /poczta clear%;\
  /endif

/def -mregexp -Fp2 -t'Wysylasz .* na poczte.' _poczta_check = \
  /set poczta_show=SYNC%;\
  /status_edit -r1 poczta_show:4:C%c_alarm