Code:
routine:addcom slap pub:slap 1020 504 |v 1
routine:addcom fute pub:fute 1020 504 |v 1
routine:addcom pupa pub:pupa 1019 505 |v 1
proc pub:slap {hand chan args x mix} {
set target [lindex $args 0]
if {$args == ""} {
puthelp "PRIVMSG $chan :USAGE: slap <nick>"
return 1 }
puthelp "PRIVMSG $chan :\001ACTION loveste pe \002$target\002 cu ciocanul peste degetul mic de la picior\001"
return "$target" }
proc pub:fute {hand chan args x mix} {
set target [lindex $args 0]
if {$args == ""} {
puthelp "PRIVMSG $chan :USAGE: fute <nick>"
return 1 }
puthelp "PRIVMSG $chan :\001ACTION Il fute tare de tot pe \002$target\002 exact in ga0z!\001"
return "$target" }
proc pub:pupa {hand chan args x mix} {
set target [lindex $args 0]
if {$args == ""} {
puthelp "PRIVMSG $chan : USAGE: kiss <nick>"
return 1 }
puthelp "PRIVMSG $chan :\001ACTION pupa duuuulce pe \002$target\002 pe botic :D \001"
return "$target" }
asta poate fi folosit ca script asa ?