MIRCX IRC Network
Would you like to react to this message? Create an account in a few clicks or log in to continue.
Search
 
 

Display results as :
 


Rechercher Advanced Search

Web Applications
install Joomla Wordpress Phpbb Drupal FluxBB PunBB osCommerce simple-machines MYBB moodle vBulletin Dolphin-v.7.1.1 PHPNUKE XOOPS
Services
install BorkNet Services X3 Services Anope Atheme Services Srvx IRC Srervices
IRCD
install Snircd IRCU INSPIRCD UNREAL Nefarious Bircd Bahamut Asuka Charybdis
TCL SCRIPT
TCL SCRIPT FOR EGGDROP Allprotection4.7 Antiproxy
Bots
Bots install FishBot bobot++ Eggdrop janus Omega Security Services Botnix Bopm SupyBot PyLink Hopm
Latest topics
» מדריך גירסה INSPIRCD V4
Mix Bot v0.2 By Sw1ft EmptySat Aug 05, 2023 2:09 am by Chief

» mIRCx IRC Network Config
Mix Bot v0.2 By Sw1ft EmptySat Jul 15, 2023 9:51 pm by Chief

» ircu2.10.12-pk with dnsbl
Mix Bot v0.2 By Sw1ft EmptyFri Mar 10, 2023 2:22 pm by Admin

» Guide install PyLink on New version FreeBSD
Mix Bot v0.2 By Sw1ft EmptyThu Dec 15, 2022 9:39 pm by Chief

» מדריך התקנה PBot על מערכת הפעלה FreeBsd-12
Mix Bot v0.2 By Sw1ft EmptyMon Dec 05, 2022 5:44 am by Chief

» install Nefarious2 && X3 IRC Services in FreeBsd
Mix Bot v0.2 By Sw1ft EmptySat Nov 12, 2022 3:12 pm by Chief

» help problem with adduser in Freebsd 12
Mix Bot v0.2 By Sw1ft EmptyFri Nov 11, 2022 9:06 pm by Chief

» מדריך פקודות והתקנה בסרביס X3
Mix Bot v0.2 By Sw1ft EmptyFri Oct 28, 2022 1:43 pm by Chief

» מדריך הגדרות WebIRC in Nefarious2
Mix Bot v0.2 By Sw1ft EmptyThu Apr 07, 2022 4:45 am by Chief

April 2024
MonTueWedThuFriSatSun
1234567
891011121314
15161718192021
22232425262728
2930     

Calendar Calendar

Affiliates
free forum

Affiliates
free forum


Mix Bot v0.2 By Sw1ft

Go down

Mix Bot v0.2 By Sw1ft Empty Mix Bot v0.2 By Sw1ft

Post  Chief Thu Sep 13, 2012 4:55 am

mIRCx
Mix Bot v0.2 By Sw1ft MIRC
Mix Bot v0.2 By Sw1ft
credit and thanks to Sw1ft
take code and put in you mirc remote
Code:

; Mix Bot v0.2 By Sw1ft
; Date: 24/05/05
; Copright(c) @ #UK.Mix

;;Commands
;;$start
;;$stop
;;$access owner/remove/give

;; owner = owner
;;give = mix admin
;;remove == remove there admin/owner

;; HF !



on 1:LOAD:{
  set %mix.channel $$?="Enter you Mix Channel"
  set %mix.Server $$?="Enter Mix Server IP"
  set %owner $$?="Enter Owners Nick"
  writeini owner.ini %mix.channel $address(%owner,1) owner
  unset %team
  unset %mix.count
  set %mix.map None
  set %mix.server None
  set %mix.players 5
}

on 1:TEXT:$($!access*):%mix.channel:{
  if ($readini(owner.ini,%mix.channel,$address($nick,1) == owner)) {
    if ($2 == Give) {
      writeini mix-admins.ini $chan $address($3,1) admin
      msg # Done.
      mode $chan +v $3
      notice $3 You Are now A Mix Admin
      halt
    }
    if ($2 == remove) {
      remini mix-admins.ini %mix.channel $address($3,1)
      msg # done.
      mode $chan -v $3
      notice $3 You Are no Longer A Mix Admin.
      halt
    }
    if ($2 == owner) {
      writeini owner.ini %mix.channel $address($nick,1) owner
      mode $chan +o $3
      msg # done.
      notice $3 you Are Now A Mix Admin !
      halt
    }
  }
}




on 1:JOIN:%mix.channel:{
  if ($readini(mix-admins.ini,$chan,$address($nick,1) == admin)) {
  mode $chan +v $nick
    msg # [- $nick Is A Mix Admin. -]
  }
}

on 1:TEXT:$($!Start):%mix.channel:{
  if ($readini(mix-admins.ini,$chan,$address($nick,1) == admin)) {
    if (%mix == on) { notice $nick Mix Allready Active $nick $+ .
    }
    else {
      amsg [- Mix Has Started @ $chan , Type !add To Play! -]
      inc %mix.total
      set %mix on
      set %mix.admin $nick
      topic $chan 7[- Mix Sarted 7][ !add 7/ !remove 7][ Map: %mix.map 7][ Game Type: %mix.game 7][ Team: %team 7][ Total Mixes: %mix.total -7]
      notice $nick [- Setup commands: $chr(36) $+ map < Map> ][ $chr(36) $+ game <Game Type> ][ $chr(36) $+ Stop To Stop The Mix! -]
      notice $nick /msg $me password <password>
      notice $nick [- Commands To Be done In Channel! -]
      halt
    }
  }
}
on 1:TEXT:$($!map*):%mix.channel:{
  if ($nick == %mix.admin) {
    set %mix.map $2
    topic $chan 7[- Mix Sarted 7][ !add 7/ !remove 7][ Map: %mix.map 7][ Game Type: %mix.game 7][ Team: %team 7][ Total Mixes: %mix.total -7]
    notice $nick Map Is Set To $2
    halt
  }
}

on 1:TEXT:$($!game*):%mix.channel:{
  if ($nick == %mix.admin) {
    set %mix.game $2
    topic $chan 7[- Mix Sarted 7][ !add 7/ !remove 7][ Map: %mix.map 7][ Game Type: %mix.game 7][ Team: %team 7][ Total Mixes: %mix.total -7]
    notice $nick Game Type Is Set To $2
    halt
  }
}

on 1:TEXT:$($!stop):%mix.channel:{
  if ($readini(owner.ini,%mix.channel,$address($nick,1) == owner)) {
    if ($nick == %mix.admin) {
      dec %mix.total
      topic $chan 7[- Welcome To #UK.Mix 7][ Supported By #United-Kingdom 7][ Total Mixes: %mix.total 7][ News: %news -7]
      set %mix.map None
    unset %mix.count
    unset %team
    unset %mix.admin
    set %mix off
      set %team
      set %mix.game 0
      set %mix.map 0 
      set %password 0
      notice $nick Mix Has Been Stopped.
      halt
    }
  }
}
on *:text:!add*:%mix.channel:{
  if (%mix != on) { halt
  }
  else {
    inc %mix.count
    if ($istok(%team, $nick, 32)) { notice $nick You're already In The Mix.
      return
    }
    else {   
      if (%mix.count == %mix.players) {
        mode %mix.channel +m
        topic %mix.channel 7[- Welcome To #UK.Mix 7][ Supported By #United-Kingdom 7][ Total Mixes: %mix.total 7][ News: %news -7]
        getip
        msg %mix.channel [- Supported By: #United-Kingdom ][ Sponsored By: you? and You? -]
        msg %mix.channel [- If you didnt get pass contact the admin: %mix.admin -]
        set %mix off
        set %team
        set %mix.game 0
        set %mix.map 0 
        set %password 0
        unset %mix.admin
        mode %mix.channel -m
      }
      else {
        set %team $addtok(%team, $nick, 32)
        topic $chan 7[- Mix Sarted 7][ !add 7/ !remove 7][ Map: %mix.map 7][ Game Type: %mix.game 7][ Team: %team 7][ Total Mixes: %mix.total -7]
        halt
      }
    }
  }
}
on 1:TEXT:!remove:%mix.channel:{
  if ($istok(%team, $nick, 32)) {
    dec %mix.count
    set %team $remtok(%team, $nick, 32)
    topic $chan 7[- Mix Sarted 7][ !add 7/ !remove 7][ Map: %mix.map 7][ Game Type: %mix.game 7][ Team: %team 7][ Total Mixes: %mix.total -7]
    notice $nick Done.
    halt
  }
  else { notice $nick You Are Not In The Team.
  }
}

on 1:TEXT:!mixes:%mix.channel:{
  msg # Total Mixes: %mix.total
}

on 1:TEXT:!team:%mix.channel:{
  if (%mix) {
    msg $chan Current Mix Team: %team
    halt
  }
  else { halt
  }
}

alias getip {
  var %d = 1
  while (%d <= $numtok(%team,32)) {
    msg $gettok(%team, %d, 32) [- Mix Has Now Started ][Server: %mix.server ][IP: %password ][ If There Is No Details Here, Please Conatct: %mix.admin ][ Please Join Server Now, Thx ]
    inc %d
  }
}
on 1:TEXT:password*:?:{
  if ($readini(owner.ini,%mix.channel,$address($nick,1) == OWNER)) {
    if ($readini(mix-admins.ini,$chan,$address($nick,1) == admin)) {
      if ($nick isop %mix.channel) {
        set %password $2
        notice $nick Password Has Been Set.
      }
    }
  }
}

on 1:TEXT:$($!news*):#uk.mix:{
  if ($readini(owner.ini,%mix.channel,$address($nick,1) == OWNER)) {
    if (%mix == on) {
      /set %news $2-
      /topic %mix.channel 7[- Mix Sarted 7][ !add 7/ !remove 7][ Map: %mix.map 7][ Game Type: %mix.game 7][ Team: %team 7][ Total Mixes: %mix.total -7]
      halt
    }
    elseif (%mix == off) {
      /set %news $2-
      /topic %mix.channel 7[- Welcome To #UK.Mix 7][ Supported By #United-Kingdom 7][ Total Mixes: %mix.total 7][ News: %news -7]
    }
  }
}


on 1:PART:%mix.channel:{
  if ($istok(%team, $nick, 32)) {
    /set %team $remtok(%team, $nick, 32)
    /topic $chan 7[- Mix Sarted 7][ !add 7/ !remove 7][ Map: %mix.map 7][ Game Type: %mix.game 7][ Team: %team 7][ Total Mixes: %mix.total -7]
    halt
  }
}

on 1:KICK:%mix.channel:{
  if ($istok(%team, $nick, 32)) {
    /set %team $remtok(%team, $nick, 32)
  / topic $chan 7[- Mix Sarted 7][ !add 7/ !remove 7][ Map: %mix.map 7][ Game Type: %mix.game 7][ Team: %team 7][ Total Mixes: %mix.total -7]
    halt
  }
}


on 1:BAN:%mix.channel:{
  if ($istok(%team, $nick, 32)) {
    /set %team $remtok(%team, $nick, 32)
    /topic $chan 7[- Mix Sarted 7][ !add 7/ !remove 7][ Map: %mix.map 7][ Game Type: %mix.game 7][ Team: %team 7][ Total Mixes: %mix.total -7]
    halt
  }
}

on 1:QUIT:{
  if ($istok(%team, $nick, 32)) {
    /set %team $remtok(%team, $nick, 32)
    /topic $chan 7[- Mix Sarted 7][ !add 7/ !remove 7][ Map: %mix.map 7][ Game Type: %mix.game 7][ Team: %team 7][ Total Mixes: %mix.total -7]
    halt
  }
}

we have more code to mix bot but you need fix this this two codes
Code:

alias themix {
  while ($numtok(%tmp1,32) < $calc(%pplsnum / 2) {
  var %g = $gettok(%mixreg,$r(1,$numtok(%mixreg,32)),32) | var %tmp1 = $addtok(%tmp1,%g,32) | var %mixreg = $remtok(%mixreg,%g,1,32) } | msg # %tmp1 vs %mixreg
}
on *:text:*!gomix*:#: {
  if ( $nick isin %gomix ) {
    msg # already started mix
  }
  elseif ( $nick isop # ) {
    /enable #gomix
    /set %gomix $nick
    timer 1 1 mode # +m
    timer 1 3 msg # you may write 2 sec's more !inmix
timer 1 5 mode # -m
  }
}
on *:text:*!offmix*:#: {
  if ( $nick isin %offmix ) {
    msg # mix is already off
  }
  elseif ( $nick isop # ) {
    notice # mix is off
    set %offmix $nick
    mode # +b-b * *
    unset %mixreg , %mixalready , %gomix , %offmix
    /disable #gomix
  }
}
#gomix off
on *:text:*!inmix*:#:{
  if ($nick isin %mixalready || $nick isin %mixreg ) {
    halt
  }
  elseif ($1 == !inmix) && ($nick !isin %mixreg) && ( $nick !isin %mixalready ) && ($numtok(%mixreg,32) < %pplsnum) {
    /set %mixalready %mixalready $nick
    /set %mixreg %mixreg $nick
    msg # øùåîéí : $+($numtok(%mixreg,32),/,%pplsnum)
  }
  elseif ($numtok(%mixreg,32) == %pplsnum) {
    /disable #gomix
    timer 1 2 mode # +m
    timer 1 5 msg # wait for mix :........
    timer 1 9 mix msg # teams : $themix
    timer 1 12 mode # -m
  }
}
#gomix end
on *:text:*!teamix*:#: {
  if ( $nick isin %mixnc ) {
    halt
  }
  elseif (%mixreg == $null) {
    msg # mix is off
  }
  else {
    set %mixnc %mixnc $nick
    //msg # teams : $replace(%mixreg,$chr(32),$+($chr(44)))
  }
 
}
menu channel {
  äâãøåú
  .äâãø îñôø ùç÷ðéí://set %pplsnum $?=\"?\"
  .äâãø òøåõ:/set %channel $chan
}
Code:

;#######Mix Script V.01################
;###Made By Sw1ft @ 9:49PM##############
;###On Monday, Map 09 2005##############
;##Copyright(c) 2005 @ #United-Kingdom######
;###Have Fun With It, Commands Below.#######



;commands
;OPS ONLY
;$start to start it
;$stop to stop it
;!map <map>
;!server <ip>
;msg <bot> password <password>
;
;Normal Users
;!add
;!remove
;!team


on 1:LOAD:{
  set %mix.channel $$?="Enter you Mix Channel"
  set %mix.Default $$?="Enter Your Defualt Topic"
  set %mix.vent $$?="Enter Vent IP:PORT I.E: 234.56.32.34:2345"
  unset %team
  unset %mix.count
  set %mix.map None
  set %mix.server None
  set %mix.players 5
}
on 1:TEXT:$($!Start):%mix.channel:{
  if ($nick isop $chan) {
    if (%mix == on) { notice $nick Mix Allready Active $nick $+ .
    }
    else {
      set %mix on
      set %mix.admin $nick
      topic $chan 1,0[Mix Started ][ Map: %mix.map ][ Server: %mix.server ][ Team: %team ][ Vent: %mix.vent ]
      notice $nick You Now Need To Set Map And Server And Server PASSWORD
      notice $nick !map <Map Name> To Set Map.
      notice $nick !server <Server IP>  To Set The Server IP.
      notice $nick Use, /msg $me password <password> To set the password to the server.
      halt
    }
  }
}
on 1:TEXT:!map *:%mix.channel:{
  if ($nick == %mix.admin) {
    set %mix.map $2
    topic $chan 1,0[Mix Started ][ Map: %mix.map ][ Server: %mix.server ][ Team: %team ][ Vent: %mix.vent ]
    notice $nick Map Is Set To $2
    halt
  }
}
on 1:TEXT:!Server *:%mix.channel:{
  if ($nick == %mix.admin) {
    set %mix.server $2
    topic $chan 1,0[Mix Started ][ Map: %mix.map ][ Server: %mix.server ][ Team: %team ][ Vent: %mix.vent ]
    notice $nick Server Is Set To $2
    halt
  }
}
on 1:TEXT:$($!stop):%mix.channel:{
  if ($nick == %mix.admin) {
    topic $chan %mix.default
    set %mix.map None
    set %mix.server None
    unset %mix.count
    unset %team
    unset %mix.admin
    set %mix OFF
    notice $nick Mix Has Been Stopped.
    halt
  }
}
on *:text:!add*:%mix.channel:{
  if (%mix != on) { halt
  }
  else {
    inc %mix.count
    if ($istok(%team, $nick, 32)) { notice $nick You're already In Th Mix.
      return
    }
    else {   
      if (%mix.count == %mix.players) {
        timer 1 1 mode %mix.channel +m
        timer 1 2 topic %mix.channel %mix.default
        getip
        timer 1 3 msg %mix.channel If you didnt get pass contact the admin: %mix.admin
        set %mix off
        set %team 0
        set %mix.map 0 
        set %mix.server 0
        set %mix.password 0
        timer 1 5 mode %mix.channel -m
      }
      else {
        set %team $addtok(%team, $nick, 32)
        topic $chan 1,0[Mix Started ][ Map: %mix.map ][ Server: %mix.server ][ Team: %team ][ Vent: %mix.vent ]
        halt
      }
    }
  }
}
on 1:TEXT:!remove:%mix.channel:{
  if ($istok(%team, $nick, 32)) {
    dec %mix.count
    set %team $remtok(%team, $nick, 32)
    topic $chan 1,0[Mix Started ][ Map: %mix.map ][ Server: %mix.server ][ Team: %team ][ Vent: %mix.vent ]
    notice $nick Done.
    halt
  }
  else { notice $nick You Are Not In The Team.
  }
}
on 1:TEXT:!team:%mix.channel:{
  if (%mix) {
    msg $chan Current Mix Team: %team
    halt
  }
  else { halt
  }
}
alias getip {
  var %d = 1
  while (%d <= $numtok(%team,32)) {
    msg $gettok(%team, %d, 32) [- Mix Has Now Started ][Server: %mix.server ][IP: password ][ If There Is No Details Here, Please Conatct: %mix.admin ][ Please Join Server Now, Thx ]
    inc %d
  }
}
on 1:TEXT:password*:?:{
  if (%mix.admin == $nick) {
    if ($nick isop %mix.channel) {
      set %password $2
      notice $nick Password Has Been Set.
    }
  }
}

on 1:PART:%mix.channel:{
  if ($nick isin $istok(%team, $nick, 32)) {
    set %team $remtok(%team, $nick, 32)
    topic $chan 1,0[Mix Started ][ Map: %mix.map ][ Server: %mix.server ][ Team: %team ][ Vent: %mix.vent ]
    halt
  }
}

on 1:KICK:%mix.channel:{
  if ($nick isin $istok(%team, $nick, 32)) {
    set %team $remtok(%team, $nick, 32)
    topic $chan 1,0[Mix Started ][ Map: %mix.map ][ Server: %mix.server ][ Team: %team ][ Vent: %mix.vent ]
    halt
  }
}


on 1:BAN:%mix.channel:{
  if ($nick isin $istok(%team, $nick, 32)) {
    set %team $remtok(%team, $nick, 32)
    topic $chan 1,0[Mix Started ][ Map: %mix.map ][ Server: %mix.server ][ Team: %team ][ Vent: %mix.vent ]
    halt
  }
}

on 1:QUIT:{
  if ($nick isin $istok(%team, $nick, 32)) {
    set %team $remtok(%team, $nick, 32)
    topic $chan 1,0[Mix Started ][ Map: %mix.map ][ Server: %mix.server ][ Team: %team ][ Vent: %mix.vent ]
    halt
  }
}
Enjoy
www.mIRCx.co.il
the old Community mIRCx
Chief Or Dor
Chief
Chief
Admin

מספר הודעות : 268
Join date : 2011-12-09
מיקום : mIRCx IRC Network

Back to top Go down

Back to top


 
Permissions in this forum:
You cannot reply to topics in this forum