25 lines
721 B
HCL
25 lines
721 B
HCL
/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} =~ 'SYNC' )\
|
|
\
|
|
/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
|