home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
ftp.madoka.org
/
2014.12.ftp.madoka.org.tar
/
ftp.madoka.org
/
pub
/
irchat-pj
/
irchat-pj-2.4.24.22.tar.gz
/
irchat-pj-2.4.24.22.tar
/
irchat-pj-2.4.24.22
/
doc
/
README.irchat-pj
< prev
Wrap
Lisp/Scheme
|
2002-07-20
|
21KB
|
503 lines
-*- Text -*-
Subject: irchat-pj $B$NMxMQJ}K!(B
Author: $B$7$^$@(B $B$_$D$N$V(B <simm@irc.fan.gr.jp>
Date: 2002$BG/(B7$B7n(B21$BF|(B($BF|(B)
Organization: irchat-PJ Project
----------------
0.$B$3$NJ8=q$N35MW(B
$B$3$3$G$O(B, irchat-pj $B$NMxMQJ}K!$r@bL@$7$^$9(B. $BK\Mh$J$i(B, $BC`0lMxMQJ}(B
$BK!$r@bL@$9$Y$-$J$N$G$7$g$&$,(B, $B;d$K$O@bL@$9$kG=NO$*$h$S;~4V$,$4$6(B
$B$$$^$;$s$N$G(B, irchat-pj $B$G$N3HD%ItJ,$K$D$$$F$N@bL@$K8B$i$;$F$$$?(B
$B$@$-$^$9(B.
$B$J$*(B, irchat-2.4jp24* $B$+$i0\9T$9$k>l9g(B, irchat-pj $B$N3HD%5!G=$r(B
$BMxMQ$7$J$$>l9g$O2?$NJQ99$bI,MW$"$j$^$;$s(B. $BJQ99$7$J$/$H$b(B, $B0J2<$N(B
$BJ8=q$N$&$A(B, 1 $B$*$h$S(B 2 $B$N5!G=$OM-8z$H$J$j$^$9(B.
$B=g=x(B : $B<!$N=g$G@bL@$7$^$9(B
0. $B$3$NJ8>O$N35MW(B
1. $BF|K\8l%3!<%I$N@_Dj(B
2. $BH>3Q%+%J$N07$$(B
3. $B5/F0;~$N(B nickname $B$NJ#?t;XDj(B
4. $B%b!<%I%i%$%s(B
5. Sound $B5!G=(B
6. $BN,8lE83+5!G=(B
7. $B%a%C%;!<%80l@FAw?.(B
8. $B%9%/%m!<%k4XO"(B
9. JOIN/PART/QUIT$B$7$??M$,$I$3$N%[%9%H$+$i@\B3$7$F$$$k$N$+$rI=<((B
10. $B<+F0E*$K(B channel oper $B8"8B$rG[$k(B ($B$$$o$f$k$*!<$H$J$k$?!<(B)
11. CTCP CAESAR
12. CTCP VERSION $B;~$KJV$9(B Mule $BEy$N%3!<%I%M!<%`$NF|K\8l2=(B
13. $B%m%0J]B85!G=(B
14. $B=*N;;~4XO"%P%C%U%!:o=|5!G=(B
--. $B$,$,LdBj(B (Obsolete)
$B!g(B. $B:G8e$K(B
----------------
1.$BF|K\8l%3!<%I$N@_Dj(B
$BF|K\8l%3!<%I$N@_Dj$O(B, $B<!$NJQ?t$K$h$C$F9T$$$^$9(B
irchat-pj-string-in-code : $B%5!<%P$+$i$NF~NO%3!<%I$N;XDj(B
irchat-pj-string-out-code : $B%5!<%P$X=PNO$9$k%3!<%I$N;XDj(B
$B<!$NCf$+$i(B, $B$$$:$l$+$R$H$D$rA*$s$G$/$@$5$$(B.
'iso-2022-7bit-ss2
: ISO-2022-7BIT-SS2 (RFC1554) $B%3!<%I(B
'iso-2022-jp : ISO-2022-JP (JIS) $B%3!<%I(B
'jis : ($BF~NO(B) ISO-2022-7BIT-SS2 (RFC1554) $B%3!<%I(B
($B=PNO(B) ISO-2022-JP (JIS) $B%3!<%I(B
'euc-jp : $BF|K\8l(B EUC $B%3!<%I(B
'euc-japan : $BF|K\8l(B EUC $B%3!<%I(B
'sjis : MS $B4A;z%3!<%I(B
'shift-jis : MS $B4A;z%3!<%I(B
'ms-kanji : MS $B4A;z%3!<%I(B
'noconv : $BL5JQ49(B
$B$J$*(B, irchat-pj-string-in-code $B$K4X$7$F$O(B, $B<u$1<h$C$?%3!<%I$,$I(B
$B$N%3!<%I$+$r<+F0E*$KH=CG$9$k;XDj$b2DG=$G$9(B.
'non-euc : ISO-2022-7BIT-SS2 $B$b$7$/$O(B MS $B4A;z%3!<%I$+$r(B
$B<+F0E*$KH=Dj$9$k(B
'auto-detect : ISO-2022-7BIT-SS2, MS $B4A;z(B, $BF|K\8l(B EUC $B%3!<%I(B
$B$N<+F0H=Dj$r9T$&(B
$B$3$l$i$rA*$s$G$*$1$P(B, $B<u$1<h$C$?F~NO%3!<%I$r<+F0E*$KH=JL$7(B, $B3:Ev(B
$B%3!<%I$KJQ49$7$?$&$($G<u$1<h$k$3$H$,$G$-$^$9(B.
$B%G%U%)%k%H$O(B,
(setq irchat-pj-string-in-code 'auto-detect)
(setq irchat-pj-string-out-code 'iso-2022-7bit-ss2)
$B$G$9(B.
$B$^$?(B irchat-pj-string-in-code $B$,(B 'auto-detect $B$N$H$-(B, $BJQ?t(B
irchat-pj-code-verbose $B$r(B t $B$K$7$F$*$/$H(B, ISO-2022-7BIT-SS2
$B0J30$N%3!<%I$r<u$1<h$C$?$H$-$K$=$N;]$r(B minibuffer $B$KI=<($5$l$^$9(B.
----------------
2.$BH>3Q%+%J$N07$$(B
irchat-pj $B$O(B, jisx0201$B%+%J(B($B$$$o$f$kH>3Q%+%J(B)$B$rAw?.$7$h$&$H$9$l$P(B,
$B$=$l$r(B jisx0208($B$$$o$f$kA43Q%+%J(B)$B$KJQ49$7$FAw?.$7$h$&$H$7$^$9(B.
$B$=$l$r@)8f$9$k$?$a$K(B, $BJQ?t(B irchat-pj-katakana-convert $B$rMQ0U$7$F(B
$B$"$j$^$9(B. $B$3$l$r(B nil $B$K$9$k$H(B, $B<+F0JQ49$O9T$J$o$l$J$/$J$j$^$9(B.
$B$J$*(B, $B%G%U%)%k%H$O(B t $B$G$9(B.
----------------
3.$B5/F0;~$N(B nickname $B$NJ#?t;XDj(B
irchat-pj $B$G$O(B, $B5/F0;~$N(B nickname $B8uJd$rJ#?t;XDj$9$k$3$H$,$G$-$^$9(B.
$BJQ?t(B irchat-pj-startup-nickname-list $B$K(B, nickname $B$NJ8;zNs%j%9%H$r(B
$B$D$/$C$F$*$/$H(B, $B@\B3;~(B, $BA0$+$i=g$K(B nickname $B$H$7$FJ8;zNs$rMxMQ$7$^$9(B.
$BNc(B:
(setq irchat-pj-startup-nickname-list '("nick1" "nick2" "nick3"))
$B$3$N>l9g(B, $B$^$:(B nick1 $B$H$$$&(B nickname $B$G@\B3$r;n$_$^$9(B. $B@\B32DG=$G(B
$B$"$l$P$=$N$^$^MxMQ$7$^$9(B. $B@\B3IT2D$N>l9g(B, nick2 $B$H$$$&(B nickname
$B$G@\B3$r;n$_$^$9(B. $B0J2<F1$8$h$&$K(B, $B$3$N%j%9%H$K$"$k(B nickname $B$r(B
$B=g$K;n$_(B, $B@\B3$G$-$?$i$=$N;~E@$GBG$A@Z$j$^$9(B. $B$b$7(B, $B$I$N(B nickname
$B$G$b@\B3$G$-$J$$>l9g$O(B, nickname $B$NF~NO$rB%$5$l$^$9(B.
$B$J$*(B, irchat-nickname $B$H(B irchat-pj-startup-nickname-list $B$NAPJ}$r(B
$B;XDj$7$?>l9g$O(B, irchat-pj-startup-nickname-list $B$,M%@h$5$l$^$9(B.
----------------
4.$B%b!<%I%i%$%s(B
irchat-2.4jp24g $B$G$O(B, $BF|K\8lF~NO<jCJ$H$7$F(B Canna $B$d(B SKK10 $B$rMxMQ(B
$B$9$k$H(B, $BF~NO%P%C%U%!$N%b!<%I%i%$%s$r8+$F$b(B, $BF|K\8lF~NO%b!<%I$J$N(B
$B$+$I$&$+$NH=JL$,$D$-$^$;$s(B. $B$3$l$O(B, irchat$BB&$GFH<+$K%b!<%I%i%$%s(B
$B$rDj5A$7$F$*$j(B, $BF|K\8lF~NO%b!<%II=<(@_Dj$,>e=q$-$7$F$7$^$&$?$a$K(B
$B5/$3$kLdBj$G$9(B.
$B=>Mh$N(B irchat-pj $B$G$O(B, irchat $B$N%b!<%I%i%$%s$KF|K\8lF~NO%b!<%I$r(B
$BDI2C$9$k$3$H$GBP1~$7$F$*$j$^$7$?$,(B, $B$3$NJ}K!$@$H(B, $BF|K\8lF~NO%7%9(B
$B%F%`$4$H$K8DJLBP1~$9$kI,MW$,$"$j(B, $B%a%s%F%J%s%9%3%9%H$bGO</$K$J$j(B
$B$^$;$s(B. $B$^$?(B, $B;~9o$d%P%C%F%jMFNLEy(B, $BI8=`0J30$N>pJs$r%b!<%I%i%$%s(B
$B$KI=<($5$;$F$$$F$b(B, irchat-pj $B$@$1$OL58z$K$J$k$H$$$&LdBj$b$"$j$^(B
$B$7$?(B.
irchat-pj-2.4.24.22 $B0J9_$G$O(B, $BI,MWItJ,$N$_%b!<%I%i%$%s$rJQ99$9$k(B
$B$3$H$K$h$j(B, $B>e5-LdBj$r2r7h$7$^$7$?(B. $B@_Dj$O$H$/$K$9$kI,MW$"$j$^$;(B
$B$s$,(B, $B%b!<%I%i%$%s$rJQ99$7$?$$>l9g$O(B, $BJQ?t(B
irchat-pj-modeline-Command-buffer
irchat-pj-modeline-Dialogue-buffer
irchat-pj-modeline-Others-buffer
irchat-pj-modeline-Channel-buffer
$B$r3F<+@_Dj$7$F$/$@$5$$(B. $B3F%P%C%U%!$KBP1~$7$?JQ?t$G(B, $B$3$l$i$NCM$O(B
mode-line-buffer-identification
$B$H$7$FMxMQ$5$l$^$9(B.
----------------
5.Sound $B5!G=(B
irchat-pj $B$G$O(B, $B<!$N>u67$K$*$$$F(B, $B2;$rLD$i$9$3$H$,$G$-$^$9(B.
$B%G%U%)%k%H$G$O2;$,LD$i$J$$$h$&$K@_Dj$5$l$F$$$^$9(B.
5-1. $BFCDj$NI=8=$r<u$1<h$C$?$H$-(B
5-2. $B%P%C%U%!L$:n@.$N?M$+$i(B private message $B$r<u$1<h$C$?$H$-(B
5-3. invite $B$5$l$?$H$-(B
5-4. $BC/$+$,(B join $B$7$?$H$-(B
5-5. CTCP message $B$r<u$1<h$C$?$H$-(B
5-6. error $BH/@8;~(B
$B0J2<(B, $B$=$l$>$l$K$D$$$F@bL@$7$^$9(B.
$B$^$?!"(Birchat-pj 2.4.24.14 $B0J9_$N%P!<%8%g%s$G$O(B, Beep $B$@$1$G$O(B
$B$J$/(B, $B30It%W%m%;%9$r8F$s$G%5%&%s%I%U%!%$%k$r:F@8$9$k$3$H$b$G$-(B
$B$^$9(B. $B$3$l$O(B
5-7. $B%5%&%s%I%U%!%$%k$N:F@8(B
$B$G@bL@$7$^$9(B. $B%5%&%s%I%U%!%$%k$r@_Dj$;$:$K(B, $B2;$rLD$i$9@_Dj$@$1$7(B
$B$?>l9g$O(B, $B30It%W%m%;%9$r8F$V$3$H$J$/(B Beep $B$,LD$j$^$9(B.
5-1.$BFCDj$NI=8=$r<u$1<h$C$?$H$-(B
irchat-pj-sound-words-list $B$K(B, $B2;$rLD$i$7$?$$@55,I=8=$N%j%9%H(B
$B$r5-=R$7$^$9(B. $B$?$H$($P2<$N$h$&$K=q$$$F$*$/$H(B, $B!V$,$,(B1$B!W!V$,$,(B4$B!W(B
$B!V(Bircpa$B!W!V(Birchat-PJ$B!WEy$NJ8;zNs$r<u$1<h$C$?$H$-$K2;$,LD$j$^$9(B.
(setq irchat-pj-sound-words-list '("$B$,$,(B[1-5]" "irc.*[Pp]"))
$B$J$*(B, $B%G%U%)%k%H$O(B nil $B$G(B, $B$3$N$H$-$O(B, $BFCDj$NI=8=$KBP$7$F2;$,(B
$BLD$k$3$H$O$"$j$^$;$s(B.
$B$3$N$H$-$KLD$i$9%5%&%s%I%U%!%$%k$r(B irchat-pj-sound-words-file $B$G(B
$B@_Dj$9$k$3$H$,$G$-$^$9!#(B
5-2.$B%P%C%U%!L$:n@.$N?M$+$i(B private message $B$r<u$1<h$C$?$H$-(B
irchat-pj-sound-when-private $B$r(B t $B$K$7$F$*$/$3$H$G(B, $B%P%C%U%!L$:n(B
$B@.$N?M$+$i(B private message $B$r<u$1<h$C$?$H$-$K2;$rLD$i$9$3$H$,$G(B
$B$-$^$9(B. $B%G%U%)%k%H$O(B nil $B$G$9(B.
$B$3$N$H$-$KLD$i$9%5%&%s%I%U%!%$%k$r(B irchat-pj-sound-private-file
$B$G@_Dj$9$k$3$H$,$G$-$^$9(B.
5-3.invite $B$5$l$?$H$-(B
irchat-pj-sound-when-invited $B$r(B t $B$K$7$F$*$/$3$H$G(B, invite $B$5$l$?(B
$B$H$-$K2;$rLD$i$9$3$H$,$G$-$^$9(B. $B%G%U%)%k%H$O(B nil $B$G$9(B.
$B$3$N$H$-$KLD$i$9%5%&%s%I%U%!%$%k$r(B irchat-pj-sound-invite-file
$B$G@_Dj$9$k$3$H$,$G$-$^$9(B.
5-4.$BC/$+$,(B join $B$7$?$H$-(B
irchat-pj-sound-when-join $B$r(B t $B$K$7$F$*$/$3$H$G(B, $B<+J,$N(B join $B$7$F(B
$B$$$k(B channel $B$KC/$+$,(B join $B$7$?$H$-$K2;$rLD$i$9$3$H$,$G$-$^$9(B.
$B%G%U%)%k%H$O(B nil $B$G$9(B.
$B$3$N$H$-$KLD$i$9%5%&%s%I%U%!%$%k$r(B irchat-pj-sound-join-file $B$G(B
$B@_Dj$9$k$3$H$,$G$-$^$9(B.
5-5.CTCP message $B$r<u$1<h$C$?$H$-(B
irchat-pj-sound-when-ctcp $B$r(B t $B$K$7$F$*$/$3$H$G(B, $B<+J,<+?H$b$7$/$O(B
$B<+J,$N(B join $B$7$F$$$k(B channel $B$KC/$+$,(B CTCP message $B$r<u$1<h$C$?(B
$B$H$-$K2;$rLD$i$9$3$H$,$G$-$^$9(B.
$B$3$N$H$-$KLD$i$9%5%&%s%I%U%!%$%k$r(B irchat-pj-sound-ctcp-file $B$G(B
$B@_Dj$9$k$3$H$,$G$-$^$9(B.
5-6.error $BH/@8;~(B
irchat-pj-sound-when-error $B$r(B t $B$K$7$F$*$/$3$H$G(B, server $B$+$i(B
error message $B$r<u$1<h$C$?$H$-$K2;$rLD$i$9$3$H$,$G$-$^$9(B.
$B$3$N$H$-$KLD$i$9%5%&%s%I%U%!%$%k$r(B irchat-pj-sound-error-file $B$G(B
$B@_Dj$9$k$3$H$,$G$-$^$9(B.
5-7.$B%5%&%s%I%U%!%$%k$N:F@8(B
Beep $B$N$+$o$j$K(B, $B30It%W%m%;%9$r8F$s$GG$0U$N%5%&%s%I%U%!%$%k$r:F(B
$B@8$9$k$3$H$b$G$-$^$9(B. $B%G%U%)%k%H$G$O(B wav, au $B$r%5%]!<%H$7$F$$$^(B
$B$9!#I,MW$J$i(B irchat-pj-sound-player-alist $B$KDI2C$7$F$/$@$5$$!#(B
$B$^$:!"%5%&%s%I%U%!%$%k$N:F@8$N$?$a$K$O:F@8MQ$N%W%m%0%i%`$r@_Dj$9(B
$B$kI,MW$,$"$j$^$9!#%G%U%)%k%H$G$O0J2<$N$h$&$K@_Dj$5$l$F$$$^$9!#(B
(defvar irchat-pj-sound-au-player "play")
(defvar irchat-pj-sound-wav-player "showaudio")
$B0J2<$O(B .wav $B$r(B xplay $B$G:F@8$5$;$k@_Dj$NNc$G$9!#(B
(setq irchat-pj-sound-wav-player "xplay")
$B%j%9%H$r;XDj$7$?>l9g$K$O!"%7%s%\%k(B file $B$O%U%!%$%kL>$KE83+$5$l$^$9!#(B
$BJ#;($J0z?t$r;XDj$7$?$$>l9g$O%j%9%H$G@_Dj$7$F$/$@$5$$!#(B
$B0J2<$O(B .au $B$r(B cp hogehoge.au /dev/audio $B$N$h$&$K$7$F:F@8$5$;$k@_(B
$BDj$NNc$G$9!#(B
(setq irchat-pj-sound-wav-player '("cp" file "/dev/audio"))
$B<!$K!"(Birchat-pj-sound-directory $B$K%5%&%s%I%U%!%$%k$rCV$/%G%#%l%/(B
$B%H%j$r@_Dj$7$F$/$@$5$$(B.
(setq irchat-pj-sound-directory "~/lib/au")
$B8e$O0J2<$N$h$&$K3FJQ?t$K(B, $B:F@8$7$?$$%5%&%s%I%U%!%$%k$N%U%!%$%kL>(B
$B$r@_Dj$9$k$@$1$G$9(B. $B%7%s%\%k$r@_Dj$9$k$H(B, $B4X?t$H$7$F8F$S=P$9$3$H(B
$B$,$G$-$^$9(B.
(setq irchat-pj-sound-words-file "hogehoge.au")
(setq irchat-pj-sound-private-file "fugafuga.au")
(setq irchat-pj-sound-invited-file 'ding)
(setq irchat-pj-sound-join-file 'ding)
(setq irchat-pj-sound-bell-file "buzz.au")
$B%G%U%)%k%H$O$9$Y$F(B 'ding $B$G$9(B.$B!J(Bding $B$O(B beep $B$rLD$i$94X?t$G$9!K(B
irchat-pj-sound-bell-file $B$rJQ99$9$k$3$H$G(B, $BK\Mh$J$i(B beep $B$,LD$k(B
$B$Y$-(B bell code $B$r<u$1<h$C$?$H$-$N2;$bJQ99$9$k$3$H$,$G$-$^$9(B.
(irchat-pj 2.4.24.14 $B$G$NJQ99E@(B)
$B$b$H$b$H(B
irchat-pj-beep-words-alist
irchat-pj-beep-when-invited
irchat-pj-beep-when-private
$B$H$$$&JQ?t$,$"$j(B, $B$3$l$i$G(B beep $B$rLD$i$9$+$I$&$+@)8f$7$F$*$j$^$7(B
$B$?$,(B, $B$3$l$i$NJQ?t$OGQ;_$7$^$7$?(B. $B$=$l$>$l(B
irchat-pj-sound-words-alist
irchat-pj-sound-when-invited
irchat-pj-sound-when-private
$B$r$4MxMQ$/$@$5$$(B. $B%U%!%$%k$r@_Dj$7$J$1$l$P(B, $B:#$^$GF1MM(B beep $B$,LD(B
$B$j$^$9(B.
----------------
6.$BN,8lE83+5!G=(B
irchat-pj-abbrev-table $B$rMQ0U$9$k$3$H$G(B, irchat-pj $B$GFH<+$KN,8l(B
$BE83+%F!<%V%k$r$b$?$;$k$h$&$K$7$^$7$?(B. $B$3$l$G(B, $B8m$C$F(B IRC $B$G$NN,(B
$B8l$rB>$N>u67$G;H$C$FCQ$:$+$7$$L\$K$"$C$?(B, $B$H$$$&$3$H$O8:$k$3$H(B
$B$G$7$g$&(B :-)
$B$J$*(B, abbrev$B$K$D$$$F$N>\:Y$O(B, Emacs $BIUB0$N(B info $BEy$r;2>H$N$3$H(B.
----------------
7.$B%a%C%;!<%80l@FAw?.(B
irchat-pj $B$G$O(B, join$B$7$F$$$k%A%c%M%k$9$Y$F$KF1$8%a%C%;!<%8$r(B
$B4JC1$KN.$9$3$H$,$G$-$^$9(B. $BJ}K!$O(B2$B$H$*$j$"$j$^$9(B.
1. Commands $B%P%C%U%!$KN.$7$?$$%a%C%;!<%8$r%?%$%W$7(B, C-c z $B$H$9$k(B.
2. C-c M $B$H$9$k$H(B minibuffer $B$K%W%m%s%W%H$,$G$k$N$G(B,
$B$=$3$KN.$7$?$$%a%C%;!<%8$r%?%$%W$9$k(B.
$B$=$l$>$l(B, $B%P%C%U%!$N$J$$?M$K(B priv $B%a%C%;!<%8$rN.$9>l9g$N(B
C-c p, C-c m $B$KBP1~$7$F$*$j$^$9(B. $B$J$*(B, $BBP1~$9$k4X?t$O(B
C-c z : irchat-pj-Command-broadcast-message
C-c M : irchat-pj-Command-broadcast-minibuffer
$B$G$9(B.
$B>u67$K$h$C$F$O(B, $B!V$3$N%A%c%M%k$K$@$1$ON.$7$?$/$J$$!W$H$+(B,
$B!V$3$N?M$K$O(Bpriv$B$GN.$7$?$$!W$H$$$&>l9g$b$"$k$H;W$$$^$9(B.
$B$=$N>l9g(B, $BJQ?t(B irchat-pj-broadcast-accept-list $B$*$h$S(B
irchat-pj-broadcast-ignore-list $B$K%j%9%H7A<0$G%A%c%M%k$*$h$S(B
$B%K%C%/$rDI2C$7$^$9(B. $B$?$H$($P(B, hoge $B$5$s$H(B fuga $B$5$s$KI,$:(B
$BN.$7$?$$>l9g$O(B
(setq irchat-pj-broadcast-accept-list '("hoge" "fuga"))
$B$H$J$j$^$9(B. $B$^$?(B, "#gaga" $B$K$ON.$7$?$/$J$$>l9g$O(B
(setq irchat-pj-broadcast-ignore-list '("#gaga"))
$B$H$7$^$9(B. $B$^$?(B, $B%P%C%U%!$N$"$k?MA40w$K$b(Bpriv$B$GN.$7$?$$>l9g$O(B
$BJQ?t(B irchat-pj-broadcast-private $B$r(B t $B$K$7$^$9(B.
$B5U$K(B, $B0l@F$KN.$9%A%c%M%k$r<+J,$G40A4$K@)8f$7$?$$?M$O(B
$BJQ?t(B irchat-pj-broadcast-channel $B$r(B nil $B$K$7(B,
irchat-pj-broadcast-accept-list $B$K(B, $B%A%c%M%k%j%9%H$rDI2C$7$F$/$@$5$$(B.
$B$J$*(B, $BJQ?t(B irchat-pj-broadcast-* $B$NM%@h=g0L$O(B
1. irchat-pj-broadcast-accept-list $B$K$"$k%A%c%M%k!&%K%C%/$KN.$9(B
2. irchat-pj-broadcast-ignore-list $B$K$"$k%A%c%M%k!&%K%C%/$KN.$5$J$$(B
3. irchat-pj-broadcast-channel $B$,(B t $B$J$i(B join $B$7$F$$$k%A%c%M%k$KN.$9(B.
irchat-pj-broadcast-private $B$,(B t $B$J$i(B, $B%P%C%U%!$,$"$k?M$KN.$9(B.
$B$G$9(B.
($BCm0U(B) $B$3$N5!G=$rMQ$$$k>l9g(B, Flood $B$K$O$/$l$0$l$bCm0U$7$^$7$g$&(B.
----------------
8.$B%9%/%m!<%k4XO"(B
$BJ#?t%U%l!<%`$N$&$A$N$$$:$l$+$G(B irchat-pj $B$,F0$$$F$$$k$H$-(B,
irchat-pj 2.4.24.05 $B0JA0$G$O(B, $B$[$+$N%U%l!<%`$,(B active $B$K(B
$B$J$C$F$$$?>l9g(B, irchat-pj $B$N%9%/%m!<%k$,$H$^$k;EMM$G$7$?(B.
irchat-pj 2.4.24.05 $B0J9_$G$O(B, $BJQ?t(B irchat-pj-scroll-condition
$B$rJQ99$9$k$3$H$G(B, $B$3$N5sF0$rJQ99$9$k$3$H$,$G$-$^$9(B.
t : $B%9%/%m!<%k$9$k(B
nil: $B%9%/%m!<%k$7$J$$(B
$B%G%U%)%k%H$O(B, irchat-pj 2.4.24.05 $B0JA0$N5sF0$G$"$k(B nil $B$G$9(B.
----------------
9.JOIN/PART/QUIT$B$7$??M$,$I$3$N%[%9%H$+$i@\B3$7$F$$$k$N$+$rI=<((B
irchat-pj 2.4.24.04 $B0J9_$G$O(B, JOIN $B$d(B PART $B$7$??M$,$I$3$N%[%9%H$+$i(B
$B@\B3$7$F$$$k$+I=<($9$k5!G=$r$D$1$^$7$?(B.
2.4.24.08 $B0J9_$G$O(B, 2.4.24.03 $B0JA0$NI=<(%U%)!<%^%C%H$H(B
2.4.24.04 $B0J9_$NI=<(%U%)!<%^%C%H$rA*Br$9$k$3$H$,$G$-$^$9(B.
JOIN: irchat-pj-handle-join-verbose
NICK: irchat-pj-handle-nick-verbose
PART: irchat-pj-handle-part-verbose
QUIT: irchat-pj-handle-quit-verbose
$B$3$l$i$N3FJQ?t$r(B t $B$K$9$l$P(B, $B$=$l$>$l$K$*$$$F(B 2.4.24.04 $B0J9_$N(B
$B%U%)!<%^%C%H$GI=<($7(B, nil $B$K$7$F$*$1$P(B 2.4.24.03 $B0JA0$N(B
$B%U%)!<%^%C%H$GI=<($7$^$9(B.
$B%G%U%)%k%H$G$O$9$Y$F(B t $B$K$7$F$*$j$^$9$,(B, $B!V>iD9$G$&$C$H$*$7$$!W$H(B
$B$$$&J}$O(B, nil $B$K$7$F$/$@$5$$(B.
----------------
10.$B<+F0E*$K(B channel oper $B8"8B$rG[$k(B ($B$$$o$f$k$*!<$H$J$k$?!<(B)
irchat-pj 2.4.24.14 $B0J9_$G$O(B, $B<+$i$,(B channel oper $B$N>l9g(B, $BB>$N?M$,(B
join $B$7$F$-$?$H$-$K<+F0E*$K(B channel oper $B8"8B$rG[$k$3$H$,$G$-$^$9(B.
$BJQ?t(B irchat-pj-auto-oper-list $B$K@_Dj$r=q$/$3$H$G(B, $B$3$l$K$7$?$,$C$F(B
$B<+F0E*$K(B channel oper $B8"8B$,G[$i$l$^$9(B. irchat-pj-auto-oper-list $B$N(B
$B3FMWAG$O(B
a. "nick!user@host.domain"
b. ("nick!user@host.domain" . "#channel1,#channel2,...")
c. ("nick!user@host.domain" "#channel1" "#channel2" ...)
$B$N$$$:$l$+$N7A<0$G(B, a.$B$N>l9g$O(B "nick!user@host.domain" $B$K%^%C%A$9$k(B
$B>l9g$K(B channel oper $B8"8B$,G[$i$l$^$9(B. b.$B$*$h$S(Bc.$B$O(B, $B;XDj$7$?(B channel
$B$N>l9g$N$_(B, "nick!user@host.domain" $B$K%^%C%A$9$l$P(B channel oper $B$,(B
$BG[$i$l$^$9(B.
$B$J$*(B, "nick!user@host.domain" $BItJ,$O@55,I=8=(B, $B3F%A%c%M%k$O40A40lCW(B
$B$9$kJ8;zNs$G5-=R$7$^$9(B. +b $BEy$N(B mode $B$GMQ$$$k7A<0$d(B pirc $B$N7A<0$H$O(B
$B0[$J$j$^$9$N$G(B, $B$4Cm0U$/$@$5$$(B.
----------------
11. CTCP CAESAR
irchat-pj 2.4.24.09 $B$G(B, irchat-caesar-region $B$rA4LLE*$K=q$-D>$7(B,
$B?7$?$K(B irchat-pj-caesar-region $B4X?t$rMQ0U$7$^$7$?(B.
($B4pK\E*$K$O(B APEL $B$N(B mule-caesar-region $B$r%Q%/$C$?$b$N$G$9(B :-)
$B$3$l$O(B, region $B$H$7$F(B $B;XDj$7$?ItJ,$r(B, irchat-caesar-region $B$N(B
ROT13 / ROT13-47 $B$d(B mule-caesar-region $B$N(B ROT13-47-48 $B$K<c43(B
$B<j$r2C$($?(B ROT5-13-47-48 $BId9f2=$K$h$jJQ49$r;\$9$b$N$G$9(B.
$B$J$*(B, ROT5-13-47-48 $B$H$$$&L>>N$O<+>N$G$9(B. (^^;
$B$^$?(B, $B$3$l$rMxMQ$7$F(B, $B?7$?$K(B CTCP CAESAR $B$rMQ0U$7$^$7$?(B
($BAw?.(B: irchat-Command-ctcp-caesar / $B<u?.(B: irchat-ctcp-caesar-msg).
CTCP ACTION $B$HF1$8MWNN$G;HMQ$9$k$3$H$G(B, ROT5-13-47-48 $BId9f$K$h$k(B
IRC $B$r9T$&$3$H$,$G$-$k$h$&$K$J$j$^$9(B.
($BCm(B) CTCP $B$G$9$N$G(B FLOOD $B$K$O$/$l$0$l$bCm0U$7$^$7$g$&(B.
----------------
12.CTCP VERSION $B;~$KJV$9(B Mule $BEy$N%3!<%I%M!<%`$NF|K\8l2=(B
$B$3$l$O(B irchat-pj $B$N5!G=$G$O$"$j$^$;$s$,(B, irchat-pj $B$O(B, $B%3!<%I%M!<%`(B
$BF|K\8l2=%i%$%V%i%j(B rail ( ftp://ftp.fan.gr.jp/pub/elisp/rail/ ) $B$K(B
$BBP1~$7$F$*$j$^$9(B. rail $B$r%$%s%9%H!<%k$7(B, .emacs $B$K(B
(require 'rail)
$B$H5-=R$7$F$*$/$3$H$G(B, Mule / Meadow / XEmacs $B$N%3!<%I%M!<%`(B($B0lIt(B)$B$,(B
$BF|K\8l2=$5$l$^$9(B.
$B$J$*(B, rail $B$N%$%s%9%H!<%kJ}K!$O(B irchat-pj $B$HA4$/F1$8$G$9(B :-)
# irchat-pj $B$N%$%s%9%H!<%i$r$=$N$^$^(B rail $B$K$b$C$F$$$C$?$@$1@b(B :-)
----------------
13.$B%m%0J]B85!G=(B
irchat-pj $B$G$O(B, $B$4$/4JC1$J%m%0J]B85!G=$rMQ0U$7$F$*$j$^$9(B.
$B4X?t(B irchat-pj-save-log $B$r8F$V$H(B, $B$=$N;~E@$G$N3F%A%c%M%k%P%C%U%!(B
$B$N$&$A;XDj$7$?$b$N$r%m%0%U%!%$%k$KDI2C$7$^$9(B. $B;XDjJ}K!$G$9$,(B,
$BJQ?t(B irchat-pj-save-log-directory $B$K%m%0J]B8%G%#%l%/%H%j$r;XDj(B
$B$7(B, $BJQ?t(B irchat-pj-save-log-channel-alist $B$K(B
'(("#channel1" . "prefix1")
("#channel2" . "prefix2")
...)
$B$N7A$G=q$$$F$*$/$H(B, irchat-pj-save-log-directory$B$G;XDj$7$?%G%#(B
$B%l%/%H%j$K(B, #channel1 $B$N%m%0$O(B prefix1-mmdd $B$H$$$&%U%!%$%kL>$G(B,
#channel2 $B$N%m%0$O(B prefix2-mmdd $B$N7A$GJ]B8$5$l$^$9(B(mmdd $B$OF|IU(B).
private$B%P%C%U%!$N%m%0$O(B (" Private" . "private") $B$N$h$&$K$7$^$9(B.
$B$^$?(B, $BA4%A%c%M%k$r$R$H$D$N%U%!%$%k$KJ]B8$7$?$$>l9g$O(B
(" Dialogue" . "all") $B$H(B, $B%A%c%M%kL>$N@hF,$K(B " " $B$r$D$1$^$9(B.
irchat-pj-save-log $B$N5sF0$O(B, $BC1=c$K(B, "IRC:(channel)" $B$N7A$N%P%C(B
$B%U%!$r(B, "(prefix)-mmdd" $B$H$$$&%U%!%$%k$KDI2C$9$k$@$1$G$9$N$G(B,
$B2?EY$b<B9T$9$k$HF1$8FbMF$,2?EY$bJ]B8$5$l$k$3$H$K$J$j$^$9(B.
$B$7$?$,$C$F(B, $B$"$^$j(B interactive $B$K<B9T$9$k$N$G$O$J$/$F(B, irchat-pj
$B=*N;;~$N$_$K<B9T$9$k$[$&$,8-L@$G$9(B.
$B$J$*(B, irchat-pj-save-log-channel-alist $B$,Dj5A$5$l$F$*$l$P(B,
$B=*N;;~$K(B irchat-pj-save-log $B$r8F$S$^$9(B.
----------------
14.$B=*N;;~4XO"%P%C%U%!:o=|5!G=(B
irchat-pj $B$r=*N;$9$k$H$-(B, irchat-pj $B$,$D$/$C$?%P%C%U%!$r40A4$K(B
$B:o=|$9$k$3$H$,$G$-$^$9(B. $BJQ?t(B irchat-pj-quit-with-kill-buffer $B$r(B
non-nil $B$K$7$F$*$/$H(B, $B=*N;;~$K%P%C%U%!$r:o=|$7$^$9(B. $B:#$^$G<jF0(B
$B$G:o=|$r$7(B, $B<!$K(B irchat-pj $B$r5/F0$7$h$&$H$7$F$b$G$-$J$+$C$??M$O(B
$B$3$l$r$*;H$$$/$@$5$$(B.
----------------
(Obsolete).$B$,$,LdBj(B
$B!V$,$,LdBj!W$H$O(B, $B!V$,!WEy(B ISO-2022-JP $B%3!<%I$H$7$F(B, `,' $B$N%3!<(B
$B%I$r4^$`J8;z$r%A%c%M%kL>$K4^$a$k$3$H$,$G$-$J$$LdBj$N$3$H$G$9(B.
($BCm(B)$B$3$NLdBj$O(B, jp6 $B%Q%C%A(B, $B$b$7$/$O(B fc $B%Q%C%A$,$"$?$C$?(B
irc2.10.3 $B$G$O2r7h$5$l$F$*$j$^$9(B. IRCnet $B$K@\B3$5$l$F$$$k(B
$BF|K\9qFb$N%5!<%P$*$h$S(B Friend Chat $B$N%5!<%P$G$O!V$,!WEy$r(B
$B4^$s$@%A%c%M%kL>$bLdBj$"$j$^$;$s$N$G(B, $B%G%U%)%k%H$G$O(B, $B0J2<(B
$B$NM^@)5!G=$O%*%U$K$7$F$"$j$^$9(B.
irchat-2.4jp24g $B$G$O(B, join$B$9$k$H$-(B, $B%A%c%M%kL>$KL5>r7o$G(Bjoin$B$9(B
$B$k$N$G(B, $BBP:v:Q$G$J$$(Bircd$B$@$H(B, $B2?$NCG$j$b$J$/J8;z2=$1$7$?%A%c%M(B
$B%k$r:n$C$F$7$^$&$3$H$K$J$j$^$9(B. $B5sF0$H$7$F$b$h$m$7$/$"$j$^$;$s(B
$B$7(B, $B%f!<%6$N5$J,$b$"$^$j$h$m$7$/$J$$$3$H$G$7$g$&(B.
irchat-pj $B$G$O(B, irchat-pj-fix-gaga-problem $B$r(B t $B$K$7$F$*$/$H(B,
$BLdBj$"$kJ8;z$r4^$`%A%c%M%k$K(Bjoin$B$7$h$&$H$9$k$H(B, minibuffer $B$K(B
Invalid channel name (GAGA problem occured). Cannot join #$B$,$,(B
$B$N$h$&$KI=<($7(B, $BJ8;z2=$1%A%c%M%k$r:n@.$9$k$3$H$,$"$j$^$;$s(B.
----------------
$B!g(B.$B:G8e$K(B
$B:G8e$K(B, irchat-pj $B$N@_Dj$O(B, $BIUB0$N(B irchat-pj.emacs $B$r;29M$K$7$F(B
$B$/$@$5$$(B.
$B$40U8+!&$4MWK>!&<ALd!&%P%0Js9pEy$4$6$$$^$7$?$i(B, IRC $B>e$G$NJs9p(B,
$B$b$7$/$O%a!<%k$G$NJs9p$r$*4j$$$7$^$9(B.
IRC $B>e$G$O(B, $B;~4V$,8B$i$l$^$9$,(B($B<g$K%F%l%[!<%@%$;~4V(B), simm[0-9]*
$B$K%^%C%A$9$k(B nick $B$G(B Friend Chat $B$*$h$S(B IRCnet $B$K$*$j$^$9$N$G(B,
$B$*5$7Z$K$*@<$r$*$+$1$/$@$5$$(B. Friend Chat $B$N(B #irchat-pj $B$,8x<0(B
$B%5%]!<%H%A%c%M%k$G$9$N$G(B, $B$J$k$Y$/$O$3$3$G$*4j$$$7$^$9$,(B, IRCnet
$B$N(B #KU3G $BEy$GJs9p$7$F$$$?$@$$$F$b7k9=$G$9(B.
$B$J$*(B, Friend Chat $B$K4X$7$F$O(B, http://www.friend.td.nu/ $B$r;2>H$/(B
$B$@$5$$(B. irc.friend.td.nu:6667 $B$K@\B3$$$?$@$1$l$P(B, $B$$$:$l$+$N%5!<(B
$B%P$K@\B3$9$k$h$&$K$J$C$F$*$j$^$9(B.
$B%a!<%k$G$NJs9p$O(B, simm@irc.fan.gr.jp $B$^$G$*4j$$$7$^$9(B.