From 849d35c4ad88ad734ec7a6270a32c686c1281c2a Mon Sep 17 00:00:00 2001 From: Bartek Stalewski Date: Fri, 8 Nov 2013 22:25:47 +0100 Subject: [PATCH] Nowa poczta. --- common/mail.tf | 86 ++++++++++++++++++++++++-------------------------- 1 file changed, 41 insertions(+), 45 deletions(-) diff --git a/common/mail.tf b/common/mail.tf index 9c2ea97..a88033c 100644 --- a/common/mail.tf +++ b/common/mail.tf @@ -1,53 +1,49 @@ /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 %;\ - /status_edit -r1 poczta_show:5:C%{c_main} %;\ - /set poczta_show=none %;\ - /endif + /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 %;\ + /status_edit -r1 poczta_show:5:C%{c_main} %;\ + /set poczta_show=none %;\ + /endif -/def -mglob -p2 -t'*Nie otrzymales zadnych nowych listow*' poczta_off0 = /poczta clear -/def -mglob -p2 -t'*Kasuje listy*' poczta_off1 = /poczta clear -/def -mglob -p2 -t'*Wszystkie listy w twej skrzynce*' poczta_off2 = /poczta clear -/def -mglob -p2 -t'*Zjadasz*wiadomosc*' poczta_off3 = /poczta clear -/def -mglob -p2 -t'*Odkladasz*wiadomosc*' poczta_off4 = /poczta clear +/def -mregexp -p2 -t'((Nie otrzymales|Nie masz) zadnych|Kasuje listy|(Zjadasz|Odkladasz) .*wiadomosc)' poczta_off0 = /poczta clear /def -mregexp -Fp2 -t'^Czeka na ciebie (.*) poczta' _poczta_0 = \ - /set ogolne_poczta=$[strcat(ftime("%H:%M",time()),"Kogos lub Czegos (", {P1}, ")|")] %;\ - /beep 1 %;\ - /if ({poczta_show} !~ 'none' ) \ - /set poczta_show=MULTI%;\ - /else \ - /set poczta_show=MAIL%;\ - /endif %;\ - /status_edit -r1 poczta_show:5:C%{c_alarm} + /set ogolne_poczta=$[strcat(ftime("%H:%M",time()),"Kogos lub Czegos (", {P1}, ")|")] %;\ + /beep 1 %;\ + /if ({poczta_show} !~ 'none' ) \ + /set poczta_show=MULTI%;\ + /else \ + /set poczta_show=MAIL%;\ + /endif %;\ + /status_edit -r1 poczta_show:5: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} !~ 'none' ) \ - /set poczta_show=MULTI%;\ - /else \ - /set poczta_show=MAIL%;\ - /endif %;\ - /status_edit -r1 poczta_show:5:C%{c_alarm} + /set ogolne_poczta=$[strcat({ogolne_poczta},ftime("%H:%M",time()),{P1},"|")] %;\ + /beep 1 %;\ + /if ({poczta_show} !~ 'none' ) \ + /set poczta_show=MULTI%;\ + /else \ + /set poczta_show=MAIL%;\ + /endif %;\ + /status_edit -r1 poczta_show:5: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} !~ 'none' ) \ - /set poczta_show=MULTI%;\ - /else \ - /set poczta_show=MAIL%;\ - /endif %;\ - /status_edit -r1 poczta_show:5:C%{c_alarm} + /set ogolne_poczta=$[strcat({ogolne_poczta},ftime("%H:%M",time()),{P1}," zatytulowany '",{P2},"'|")] %;\ + /beep 1 %;\ + /if ({poczta_show} !~ 'none' ) \ + /set poczta_show=MULTI%;\ + /else \ + /set poczta_show=MAIL%;\ + /endif %;\ + /status_edit -r1 poczta_show:5:C%{c_alarm}