ftpd/tf-scripts
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Nowa poczta.

Browse Source
This commit is contained in:
Bartek Stalewski 2013-11-08 22:25:47 +01:00
parent d2e389f1af
commit 849d35c4ad
1 changed files with 41 additions and 45 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

86
common/mail.tf
View File

@ -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}