who can make this script for me

[whiteshark]

when i typ !pcw 5on5 have server skill high
then relay the bot this
[ pcw 5on5 etc etc etc ] [ time ] [ /msg $nick ] in every channel where the bot is

thanks

[Dizzle]

Thats a pretty easy script, found will i was googling TRY IT

Code: Select all

set available(maps) {
   "de_dust" "de_dust2" "de_aztec" "de_nuke" "de_inferno"
   "de_cbble" "de_cpl_mill" "de_cpl_fire" "de_any" "de_?"
   "de_only" "de_prodigy" "de_train" "de_storm"
   "de_piranesi" de_cpl_strike"
}

set available(serverstatus) {
   "on" "off" "serveron" "serveroff" "yes" "no"
}

set except(channels) {
   ""
}

set available(skill) {
   "low" "low/med" "med"  "med/high" "high" 
}

bind PUB -|- "!pcw" create:newgame
proc create:newgame { nickname hostname handle channel arguments } {
   global lastbind available except
   set arguments [split $arguments " "]
   set team        [lindex $arguments 0]
   set map         [string tolower [lindex $arguments 1]]
   set server      [string tolower [lindex $arguments 2]]
   set skill       [string tolower [lindex $arguments 3]]
   set information [join [lrange $arguments 4 end]]
   if {[llength $information] == "0"} {
      set information n/a
   }
   if {[llength $arguments] < 3} {
      putserv "NOTICE $nickname :Wrong Syntax, please use: $lastbind  \037team\037 \037map\037 \037server status\037 \037Skill\037 \037information?\037"
   } elseif {[lsearch [string tolower $available(maps)] $map] == "-1"} {
      putserv "NOTICE $nickname :Unkwown Counterstrike Map, Plz use one of the maps in the list"
      putserv "NOTICE $nickname :[join [string tolower $available(maps)] ", "]"
   } elseif {[lsearch [string tolower $available(serverstatus)] $server] == "-1"} {
      putserv "NOTICE $nickname :Invalid server status specified, use: [join $available(serverstatus) ", "]"
   } elseif {[lsearch [string tolower $available(skill)] $skill] == "-1"} {
      putserv "NOTICE $nickname : Unkwown Skills : try these [join $available(skill) ", "]"
   } else {
      set nopost ""
      set post   ""
      foreach post-channel [channels] {
         if {[lsearch [string tolower $except(channels)] [string tolower ${post-channel}]] == "-1"} {
            lappend post ${post-channel}
         } else {
            lappend nopost ${post-channel}
         }
      }
      if {[llength $nopost] == "0"} {
         set nopost n/a
      }
      putserv "NOTICE $nickname :Done. Message was relayed succesfully, have a nice day"
      putquick "PRIVMSG [join $post ","] PCW !! Team : $team Map : $map $server : Skill : $skill : Extra info : $information :.: /q $nickname"
   } 
}
putlog "PCW Script Loaded"

i recall this script was already made by someone, i found it in this status, i know there is a author. Butt the author wasnt written in the script

[whiteshark]

Thnx

[whiteshark]

when i typ this !pcw 4on4 de_nuke serveron high TESTTEST
the bot answer this ^Triv-Security^ 4on4 Map : de_nuke serveron : Skill : high : Extra info : TESTTEST :.: /q Amstelbier
thats work good.
But he must show de channel to like this ^Triv-Security^ 4on4 Map : de_nuke serveron : Skill : high : Extra info : TESTTEST :.: /q Amstelbier #trivia.nl
can somebody fix it thnx

[Sir_Fz]

Replace

Code: Select all

putquick "PRIVMSG [join $post ","] PCW !! Team : $team Map : $map $server : Skill : $skill : Extra info : $information :.: /q $nickname"

with

Code: Select all

putquick "PRIVMSG [join $post ","] PCW !! Team : $team Map : $map $server : Skill : $skill : Extra info : $information :.: /q $nickname $channel"

[whiteshark]

thnx its work