|
:: 게시판
:: 이전 게시판
|
이전 질문 게시판은 새 글 쓰기를 막았습니다. [질문 게시판]을 이용바랍니다.
통합규정 1.3 이용안내 인용"Pgr은 '명문화된 삭제규정'이 반드시 필요하지 않은 분을 환영합니다.법 없이도 사는 사람, 남에게 상처를 주지 않으면서 같이 이야기 나눌 수 있는 분이면 좋겠습니다."
07/07/28 10:05
on 1:text:*:#:
set %send_nick $nick if ( %chans == on && %send_nick == %chan_to ) { msg $chan 1[ $+ $asctime(hh:nn) $+ ] < 2 $+ $nick $+ 1> $1- } on 1:input:#: if ($1 == !따라하기) { if ($2 == on) || (%chans == off) { set %chans on set %chan_to $?="Who?" msg $chan 7 %chans -> %chan_to 님을 따라합니다! halt elseif ($2 == off) || (%chans == on) set %chans off msg $chan 7따라하기 해제 halt elseif ($2== $null) set %chans off } } 워낙 오랜만에 짠.. 아니 짜집기한거라-_-a 맞는지는 모르겠습니..
07/07/28 11:25
on *:input:*:
if (($1 == !따라하기)) { if (($2 == 추가)) && (($3)) { if ((*!*@ isin $address($3,2))) { if (($read(따라하기.txt,s,$address($3,2)) != $null)) { say $1- | say $logo 이미 $3 님을 따라하는 시스템이 가동돼고있습니다. | halt say $1- /write 따라하기.txt $address($3,2) $chan say $Logo $3 님을 따라합니다 :) halt } else say $1- | say $logo 사용자를 찾을수 없습니다. | halt }
if (($2 == 삭제)) && (($3)) if (($read(따라하기.txt,s,$address($3,2)) != $null)) { say $1- write -ds $address($3,2) 따라하기.txt say $logo $3 님을 따라하기를 중지합니다. halt else say $1- | say $logo $3 님이 따라한 흔적을 찾을수 없습니다. | halt
} } } on *:text:*:#: if (($read(따라하기.txt,s,$address($nick,2)) == $chan)) { msg $read(따라하기.txt,s,$address($nick,2)) $1- halt } 이건 약간 다른 소스 ㅎㅎ !따라하기 추가 닉네임 !따라하기 삭제 닉네임
|
||||||||||