BLaCkShaDoW 5 лет назад
Родитель
Сommit
ab216ba563
1 измененных файлов с 10 добавлено и 0 удалено
  1. 10 0
      BlackTools/Commands/BT.ForCmds.tcl

+ 10 - 0
BlackTools/Commands/BT.ForCmds.tcl

@@ -24,6 +24,16 @@ global botnick wordsdir sdir black seendir count server uptime {server-online} v
 if {[isbotnick $nick]} { return }
 if {[isbotnick $nick]} { return }
 if {[string equal -nocase $for "for"] && ([lsearch -exact -nocase $split_bots $botnick] > -1)} {
 if {[string equal -nocase $for "for"] && ([lsearch -exact -nocase $split_bots $botnick] > -1)} {
 switch [string tolower $the_cmd] {
 switch [string tolower $the_cmd] {
+vote {
+	set type 1
+	set word [lindex [split $arg] 3]
+    set text [join [lrange [split $arg] 4 end]]
+    set id [lindex [split $arg] 4]
+	set opt [lindex [split $arg] 5]
+	set vote_next [lindex [split $arg] 6]
+	vote:process $nick $host $host $hand $chan $chan $type [list $word $text $id $opt $vote_next]
+}
+
 alias {
 alias {
 if {[matchattr $hand mno|MAO $chan]} {
 if {[matchattr $hand mno|MAO $chan]} {
 	set chan1 $chan
 	set chan1 $chan