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
Keywords

Latest topics
» מדריך התקנה WORDPRESS על FREEBSD11
Mon Jul 17, 2017 2:50 am by Chief

» מדריך התקנה postgreSQL && phpPgAdmin על FREEBSD11
Sun Jul 16, 2017 4:23 pm by Chief

» מדריך התקנה PHPMYADMIN על FREEBSD11
Sat Jul 15, 2017 5:44 am by Chief

» mIRCx IRC Network Config
Fri Jul 07, 2017 12:57 pm by Chief

» מדריך איך מתקינים DESKTOP על FREEBSD
Fri Jul 07, 2017 12:44 pm by Chief

» מדריך התקנה FTP SERVER על FREEBSD
Mon Jul 03, 2017 3:52 am by Chief

» install inspircd in freebsd 11
Sat Jul 01, 2017 11:57 pm by Chief

» מדריך התקנה FEDORA 25
Sat Jul 01, 2017 7:59 pm by Chief

» מדריך התקנה מערכת הפעלה FREEBSD
Sat Jun 24, 2017 12:59 am by Chief

July 2017
MonTueWedThuFriSatSun
     12
3456789
10111213141516
17181920212223
24252627282930
31      

Calendar Calendar

Affiliates
free forum

Affiliates
free forum


Gather commands

View previous topic View next topic Go down

Gather commands

Post  Chief on Sat Sep 08, 2012 11:28 pm

Gather commands
Credit to someone is build this
this code you can put in you remote and you have in options all command
pictures Script

the code
Code:

;This is version 06082009
on 1:UNLOAD:unset %fr*
on 1:LOAD:frreset all
on 1:CONNECT:frreset
on 1:JOIN:%frchan:if (%frcommence == on) frnotice $frstatus
on 1:PART:%frchan:frdel $nick
on 1:QUIT:frdel $nick
on 1:KICK:%frchan:frdel $knick
on 1:TEXT:!game *:%frchan:if ($nick isop #) { set %frgame $strip($2-) | frsay Game set to ' $+ %frgame $+ ' }
on 1:TEXT:!game:%frchan:frsay Game is ' $+ %frgame $+ '
on 1:TEXT:!on *:%frchan:if (%frcommence == off && $2 < 20 && $2 > 1) frcommence $2
on 1:TEXT:!on:%frchan:if (%frcommence == off) frcommence 10
on 1:TEXT:!ready:%frchan:if (%frcommence == on && $nick isop # && %frplayers != 0) frready
on 1:TEXT:!status:%frchan:if (%frcommence == on) frnotice $frstatus | else frsay No game going on
on 1:TEXT:!status *:%frchan:if ($2 == -c && $nick isop # && %frcommence == on) frsay $frstatus | elseif (%frcommence == off) frsay No game going on
on 1:TEXT:!off:%frchan:if ($nick isop # && %frcommence == on) { frterminate | frsay Terminated }
on 1:TEXT:!wsw:%frchan:if ($nick isop #) frnotice connect %frwswip $+ ;password %frwswpw | else frnotice %frwswip Ask an op about password
on 1:TEXT:!dota:%frchan:frnotice DotA channel information: ' $+ %frdota $+ '
on 1:TEXT:!vent:%frchan:frnotice Vent information: ' $+ %frvent $+ '
on 1:TEXT:!ruspatch:%frchan:frnotice http://boro.dcmembers.com/
on 1:TEXT:!frsee:%frchan:frnotice http://boro.dcmembers.com/frsee/
on 1:TEXT:!frgather:%frchan:frnotice http://boro.dcmembers.com/gatherbot.html
on 1:TEXT:!roll:%frchan:frsay You rolled $rand(1,100) - 100
on 1:TEXT:!roll *:%frchan:frsay You rolled $rand(1, $2) - $2
on 1:TEXT:!crc:%frchan:if ($nick isop #) frnotice $crc($script)
on 1:TEXT:!add*:%frchan:if (%frcommence == on && $1 == !add) { if ($2 && $nick isop $chan) fradd $2 | elseif (!$2) fradd $nick }
on 1:TEXT:!del*:%frchan:if (%frcommence == on && $1 == !del) { if ($2 && $nick isop $chan) frdel $2 | elseif (!$2) frdel $nick }
on 1:TEXT:!set *:%frchan:if ($nick isop $chan) { if ($2 == wsw && $4) { set %frwswip $strip($3) | set %frwswpw $strip($4) | frsay Done. } | elseif ($2 == dota && $3) { set %frdota $strip($3-) | frsay Done. } | elseif ($2 == vent && $3) { set %frvent $strip($3-) | frsay Done. } }
alias frreset {
  if ($1 == all) {
    unset %fr* | set %frwswip 85.236.101.63:44500 | set %frwswpw fukrog | set %frdota Garena / Hunters Arena Room
    set %frvent Version: 3.0 / IP: 69.12.71.203 / Port: 2552 / Server PW: p4ssw0rd9 / Room: #roguechannel / Room PW: fukrog
    set %frchan #fuk-rog | set %frgame HoN
  }
  .flood 400 96 24 180 | frterminate
}
alias -l frsay msg # FR-Gather: $1-
alias -l frnotice .notice $nick FR-Gather: $1-
alias -l frready frsay The game is ready! $frstatus | frterminate | frsay Terminated
alias -l frstat return $chr(91) $+ %frcurrent $+ / $+ %frplayers $+ $chr(93)
alias -l frcommence {
  set %frplayers $int($1) | var %frcounter 0
  while (%frcounter < %frplayers) { set %fr $+ $calc(%frcounter +1) x | inc %frcounter }
  frsay Starting a game with %frplayers players. Starter:7 $nick | Playing:7 %frgame
  frsay Use 7!add/7!del/7!status or write 7!help for more information
  set %frstarter $nick | set %frcommence on | set %frcurrent 0
}
alias -l frterminate {
  var %frcounter 0
  while (%frcounter < %frplayers) { unset %fr $+ $calc(%frcounter +1) | inc %frcounter }
  unset %frplayers %frcurrent %frstarter | set %frcommence off
}
alias -l frstatus {
  var %frcounter 0
  while (%frcounter < %frplayers) { var %frtemp %frtemp $eval($+(%,fr,$calc(%frcounter + 1)),2) - | inc %frcounter }
  return $frstat Playing:7 %frgame | Starter:7 %frstarter  $+ $chr(91) 7 $+ $left(%frtemp,-1)  $+ $chr(93)
}
alias -l fradd {
  var %frcounter 0
  while (%frcounter < %frplayers) { if ($eval($+(%,fr,$calc(%frcounter +1)),2) == $strip($1)) return | inc %frcounter }
  %frcounter = 0
  while (%frcounter < %frplayers) {
    if ($eval($+(%,fr,$calc(%frcounter +1)),2) == x) { set $eval($+(%,fr,$calc(%frcounter +1)),1) $strip($1) | inc %frcurrent | break }
    inc %frcounter
  }
  if (%frcurrent == %frplayers) frready
  else frsay $frstat
}
alias -l frdel {
  if ($1 == x) return
  var %frcounter 0
  while (%frcounter < %frplayers) {
    if ($eval($+(%,fr,$calc(%frcounter +1)),2) == $1) { set $eval($+(%,fr,$calc(%frcounter +1)),1) x | dec %frcurrent | msg %frchan FR-Gather: $frstat | break }
    inc %frcounter
  }
}
on 1:TEXT:!list*:%frchan:{
  if ($1 == !list && $nick isop #) {
    if ($2 == add) {
      if (!$3) frsay Please specify someone to add to the highlight list
      else { write -ds $+ $3 frlist.txt | write frlist.txt $3 | frsay [Highlight] $3 added. }
    }
    elseif ($2 == del) {
      if (!$3) frsay Please specify someone to remove from the highlight list
      elseif ($3 == all) write -c frlist.txt
      else { write -ds $+ $3 frlist.txt | frsay [Highlight] $3 removed. }
    }
    elseif (!$2) {
      var %frlistcount 0
      while (%frlistcount < $lines(frlist.txt)) {
        inc %frlistcount | var %frcounter 0 | var %frinlist 0 | set %frtemp $read(frlist.txt, %frlistcount)
        while (%frcounter < %frplayers) { if ($eval($+(%,fr,$calc(%frcounter + 1)),2) == %frtemp) { %frinlist = 1 | break } | inc %frcounter }
        if (!%frinlist && (%frtemp ison #)) var %frnames %frnames %frtemp
      }
      frsay [Highlight] %frnames
      unset %frtemp
    }
  }
}
on 1:TEXT:!help:%frchan:{
  frnotice Bot written by 7FR (@ in front of something means that you have to be an op)
  frnotice 7!help [option]: Displays some information. Option being game, info, set or list (or displays this if not specified)
  frnotice 7!about: Display information about the bot
  frnotice 7!roll [number]: Rolls between 1 and 100 (or 1 and number, if specified)
  frnotice 7@!crc: Shows the CRC checksum of the script in PM (used for devs to check versions)
}
on 1:TEXT:!help *:%frchan:{
  frnotice Bot written by 7FR (@ in front of something means that you have to be an op)
  if ($2 == game) {
    frnotice 7!game [@game]: Set the game that is being played (or show what's playing if param is not specified)
    frnotice 7!on [p]: Start a game with p players (or 10 if not specified)
    frnotice 7@!off: Turn off the game
    frnotice 7@!ready: Just like !off except that it will show the players playing before turning off
    frnotice 7!add [@nick]: Add yourself (or nick, if specified) to the bot
    frnotice 7!del [@nick]: Remove yourself (or nick, if specified) from the bot
    frnotice 7!status [@-c]: Shows the status of the current game as a PM (status) and in the channel (ministatus). If -c is specified, it will show status in the channel only
  }
  elseif ($2 == info) {
    frnotice 7!dota: Display DotA information
    frnotice 7!wsw: Display warsow information
    frnotice 7!vent: Display ventrillo information
    frnotice 7!frsee: Display FRsee information
    frnotice 7!ruspatch: Display RUSpatch information
    frnotice 7!frgather: Display information about FRgather
  }
  elseif ($2 == set) {
    frnotice 7@!set dota <frdota>: Set the channel which is being played on
    frnotice 7@!set wsw <frwswip> <frwswpw>: Set wsw to show ip and password
    frnotice 7@!set vent <frventinfo> [frventver] [frventip] [frventport] [frventservpw] [frventroom] [frventroompw]: Set ventrilo version, IP, port, password, room, roompassword respectively
  }
  elseif ($2 == list) {
    frnotice 7@!list add <name>: Adds someone to the list
    frnotice 7@!list del <name>: Removes someone from the list
    frnotice 7@!list: Highlights everyone on the player list in the channel
  }
}
on 1:TEXT:!about:%frchan:{
  frnotice Bot is written by FR team that includes:
  frnotice 7Depressed, 7Mezmor (General programmers)
  frnotice 7Goldmember, 7slashi (General testers and idea-givers :P)
}
Enjoy
avatar
Chief
Admin

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

View user profile

Back to top Go down

View previous topic View next topic Back to top

- Similar topics

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