/def poczta = \ /if ({*}=~NULL | {*}=~'check') \ /if ({ogolne_poczta}=~NULL ) \ /echo -p #@{C%c_info}#@{n}# Brak poczty. %;\ /else \ /let _poczta=%{ogolne_poczta} %;\ /echo -p #@{C%c_info}#@{n}# Listy: %;\ /while /let i=$[strstr({_poczta},"|")] %; /@test i>-1 %; /do \ /echo -p #@{C%c_info}#@{n}# Od: @{C%c_info}$[substr({_poczta},5,i-5)] @{n}($[substr({_poczta},0,5)]). %;\ /let _poczta=$[substr({_poczta},i+1)] %;\ /done %;\ /endif %;\ /elseif ({*} =~ 'clear') \ /unset ogolne_poczta %;\ /set poczta_show=none%;\ /status_edit -r1 poczta_show:4:C%c_main %;\ /endif /def -mregexp -Fp2 -t'^Czeka na ciebie (.*) poczta' _poczta_0 = \ /set ogolne_poczta=$[strcat(ftime("%H:%M",time()),"Kogos lub Czegos (", {P1}, ")|")] %;\ /beep 1 %;\ /set poczta_show=NEW%;\ /status_edit -r1 poczta_show:4:C%c_alarm /def -mregexp -Fp2 -t'^Masz nowa poczte od (.*).' _poczta_1 = \ /set ogolne_poczta=$[strcat({ogolne_poczta},ftime("%H:%M",time()),{P1},"|")] %;\ /beep 1 %;\ /if ({poczta_show} =~ 'NEW' )\ /set poczta_show=NEW+%;\ /elseif ({poczta_show} =~ 'NEW+' )\ \ /elseif ({poczta_show} =~ 'BOTH' )\ \ /elseif ({poczta_show} =~ 'SYNC' )\ \ /elseif ({poczta_show} =~ 'MSG' )\ /set poczta_show=BOTH%;\ /else \ /set poczta_show=NEW%;\ /endif %;\ /status_edit -r1 poczta_show:4:C%c_alarm /def -mregexp -Fp2 -t'^Masz nowy list.*od ([^ ]*), zatytulowany \'(.*)(\'|[^.]$)' _poczta_2 = \ /set ogolne_poczta=$[strcat({ogolne_poczta},ftime("%H:%M",time()),{P1}," zatytulowany '",{P2},"'|")] %;\ /beep 1 %;\ /if ({poczta_show} =~ 'NEW' )\ /set poczta_show=NEW+%;\ /elseif ({poczta_show} =~ 'NEW+' )\ \ /elseif ({poczta_show} =~ 'BOTH' )\ \ /elseif ({poczta_show} =~ 'SYNC' )\ \ /elseif ({poczta_show} =~ 'MSG' )\ /set poczta_show=BOTH%;\ /else \ /set poczta_show=NEW%;\ /endif %;\ /status_edit -r1 poczta_show:4:C%c_alarm /def -mregexp -Fp2 -t'Nagle, tuz przed toba, z chmury dymu' _wizmsg = /beep 3