19 lines
633 B
HCL
19 lines
633 B
HCL
/def -mregexp -p2 -t'Listy nieprzeczytane:' _poczta_read = \
|
|
/beep 1%;\
|
|
/set poczta_show=READ%;\
|
|
/status_edit -r1 poczta_show:5:C%c_alarm
|
|
|
|
/def -mregexp -p2 -t'List jest gotowy do wyslania.' _poczta_wait = \
|
|
/beep 1%;\
|
|
/set poczta_show=WAIT%;\
|
|
/status_edit -r1 poczta_show:5:C%c_alarm
|
|
|
|
/def -mregexp -p2 -t'((Nie otrzymales|Nie masz) zadnych|Kasuje listy|(Zjadasz|Odkladasz) .*wiadomosc|zostal pomyslnie)' poczta_off0 = \
|
|
/if ({poczta_show} !~ 'WAIT' )\
|
|
/poczta clear%;\
|
|
/endif
|
|
|
|
/def -mregexp -Fp2 -t'Wysylasz .* na poczte.' _poczta_check = \
|
|
/set poczta_show=CHECK%;\
|
|
/status_edit -r1 poczta_show:5:C%_alarm
|