이것저것 할일이 많아져서 뭘할까 고민중에 결국 스크립트를 만들어서 골라보기로 했다.
뭐 예전에 IRC상에서 한번 본 스크립트인 choice랑 똑같은 기능인가..;; ————————————————————
; | Made by Xeriars                                                               |
; | (변경해서 쓰는건 니맘대로지만 이 부분은 지우지 말아주세요.)  |
; ————————————————————

on *:text:*:#: {
if ($1 == @골라줘) {
if (!$2) { msg $chan “@골라줘 항목1 항목2 … 항목n”와 같은 형식으로 입력하셔야 합니다. (최대 10개) | halt }
if ($0 > 11) { msg $chan 고를수있는 최대치를 넘어섰습니다. (최대 10개) | halt }
var %result $rand(2,$0)
var %randchoice $replacecs(%result,2,$2,3,$3,4,$4,5,$5,6,$6,7,$7,8,$8,9,$9,10,$10,11,$11)
msg $chan %randchoice $+ 을(를) 골랐습니다.
halt
}
}

결과
[10:21:04] <@[Kage]> @골라줘 갈비 양념통닭 회 피자 프라이드치킨
[10:21:05] <@[Kagebot^MKII]> ＊ KageBot – ㄴ(º皿 ºㆀ)ㄱ 피자을(를) 골랐습니다.

p.s 지나치게 봇에 의존하는것은 건강에 해롭습니다.

; ————————————————————

; | Made by Xeriars                                                               |

; | (변경해서 쓰는건 니맘대로지만 이 부분은 지우지 말아주세요.)  |

; ————————————————————

on *:text:*:#: {

if ($1 == @자반검색) {

if (!$2) { msg $chan “@자반검색 이름”과 같은 형식으로 입력하셔야 합니다. 리스트를 검색시에는 “@자반검색 리스트”로 검색해주시기 바랍니다. | halt }

else {

if ($2 == 리스트) {

var %i 1

while (%i <= $ini(automsg.ini,0)) {

var %amsglist %amsglist $+ $ini(automsg.ini, $+ %i $+ ) $+ $chr(44)

inc %i

}

msg $chan 현재 검색가능한 자동반응은 %amsglist 입니다.

halt

}

if (!$readini(automsg.ini,$2,1)) { msg $chan $2 $+ (은)는 아직 추가된 자동반응이 아닙니다. | halt }

var %i 1

while (%i <= $ini(automsg.ini,$2,0)) {

msg $chan $readini(automsg.ini,$2,%i)

inc %i

}

halt

}

}

}

; automsg.ini의 내용

; [블로그]

; 1=카게의 블로그입니다. 가끔 놀러오세요. http://xeriars.tistory.com

; ————————————————————

; | Made by Xeriars                                                               |

; | (변경해서 쓰는건 니맘대로지만 이 부분은 지우지 말아주세요.)  |

; ————————————————————

alias timenow {

var %timenow $asctime(hh:nn:ss tt)

var %timenow1 $replace(%timenow,0,┏┓,1,┫,2,┏┓,3,┏┓,4,┃┃,5,┏┓,6,┏┓,7,┏┓,8,┏┓,9,┏┓,p,┏┓,m,┏┳┓,a,┏┓,$chr(58),○)

var %timenow2 $replace(%timenow,0,┃┃,1,　┃,2,┏┛,3,　┫,4,┗╋,5,┗┓,6,┣┓,7,　┃,8,┣┫,9,┗┫,p,┣┛,m,┃┃┃,a,┣┫,$chr(58),　)

var %timenow3 $replace(%timenow,0,┗┛,1,　┻,2,┗┛,3,┗┛,4,　┃,5,┗┛,6,┗┛,7,┃,8,┗┛,9,┗┛,p,　　,m,　　　,a,　　,$chr(58),○)

say 현재시간은 %timenow1

say 　　　　　 %timenow2

say 　　　　　 %timenow3

}

on *:input:*: {

if ($1 == @현재시간) {

timenow

halt

}

}

결과 :

[08:46:20] <@[Kage]> @현재시간

[08:46:20] <@[Kagebot^MKII]> 현재시간은 ┏┓┏┓○┃┃┏┓○┏┓┏┓ ┏┓┏┳┓

[08:46:21] <@[Kagebot^MKII]> 　　 　       ┃┃┣┫　┗╋┣┓　┏┛┃┃ ┣┫┃┃┃

[08:46:21] <@[Kagebot^MKII]> 　　  　      ┗┛┗┛○　┃┗┛○┗┛┗┛