Accueil > > > VIP SCRIPT
VIP SCRIPT
Information sur la source
Description
Ce script scan le whois lord d'un join et si la personne est op sur un chan que vous avez définit "vip" alors le bot opera cette personne.
Source
- on *:join:#: {
- if ($nick != $me) {
- set %chan $chan
- set %cmd join
- whois $nick
- }
- }
-
- on *:load:{
- echo 1VIP Script loaded.
- set %owner $?="Entrez ici le hostmask du owner (Par exemple: *!*@auth.users.quakenet.org)"
- echo 1Owner: %owner
- }
-
- on @*:text:.vip*:#: {
- var %adresse $address($nick,2)
- if (%adresse !isin %owner) {
- notice $nick 1,0—7» 7S1orry $nick $+ , but you're not admin in $chan
- }
- else {
- if ($2 == on) {
- set %vip on
- timer 1 1 msg $chan 1,0—7» 1V7i1p 1mode is now %vip
- }
- elseif ($2 == off) {
- set %vip off
- timer 1 1 msg $chan 1,0—7» 1V7i1p 1mode is now %vip
-
- }
- elseif (!$2) {
- msg $chan 1,0—7» 1V7i1p 1mode is %vip
- }
- else {
- msg $chan 1,0—7» 1V7i1p 1mode is %vip
- }
- }
- }
-
- on @*:text:.list-vip*:#: {
- var %adresse $address($nick,2)
- if (%adresse !isin %owner) {
- notice $nick 1,0—7» 7S1orry $nick, but you're not admin in $chan
- }
- else {
- notice $nick - 1,0—7» 7L1iste des chans vip: %listevip
- }
- }
-
-
- on @*:text:.add-vip*:#: {
- if (!$2 ) {
- msg $chan 1,0—7» S1yntaxe: .add-vip #chan
- halt
- }
- elseif ($left($2,1) != $chr(35)) {
- msg $chan 1,0—7» S1yntaxe: .add-vip #chan
- halt
- }
- var %adresse $address($nick,2)
- if (%adresse isin %owner) {
- var %nbrchan = $numtok(%listevip,32)
- var %i = 0
- while (%i <= %nbrchan) {
- if ($2 == $gettok(%listevip,%i,32)) {
- notice $nick 1,0—7» T1he channel $2 is already a vip.
- halt
- }
- inc %i
- }
- set %listevip %listevip $2
- notice $nick 1,0—7» T1he chan $2 have been added to the vip list.
- }
- else {
- notice $nick 1,0—7» 7S1orry $nick, but you're not admin in $chan
- }
- }
-
- on @*:text:.del-vip*:#: {
- if (!$2 ) {
- msg $chan 1,0—7» S1yntaxe: .del-vip #chan
- halt
- }
- elseif ($left($2,1) != $chr(35)) {
- msg $chan 1,0—7» S1yntaxe: .del-vip #chan
- halt
- }
- var %adresse $address($nick,2)
- if (%adresse isin %owner) {
- var %nbrchan = $numtok(%listevip,32)
- var %i = 0
- while (%i <= %nbrchan) {
- if ($2 == $gettok(%listevip,%i,32)) {
- set %listevip $remove(%listevip,$2)
- notice $nick 1,0—7» T1he chan $2 have been deleted from the vip list.
- halt
- }
- inc %i
- }
- notice $nick 1,0—7» T1he chan $2 isn't in the vip list.
- }
- else {
- 1,0—7» 7S1orry $nick, but you're not admin in $chan
- }
- }
-
- raw 319:* {
- if ((%vip == on) && (%cmd == join)) {
- unset %cmd
- var %nbrchan = $numtok(%listevip,32)
- var %nbrchan2 = $numtok($3-,32)
- var %i = 1
- while (%i <= %nbrchan) {
- var %j = 1
- while (%j <= %nbrchan2) {
- if ($gettok($3-,%j,32) == @ $+ $gettok(%listevip,%i,32)) {
- msg %chan 7,0—1» kikoo7,0 $2 1[7,0¤1,0] you're vip from $gettok(%listevip,%i,32), so you get +7,0o1,0 on %chan [7,0¤1,0] enj7,0O1,0y
- mode %chan +o $2
- goto end
- }
- inc %j
- }
- inc %i
- }
- }
- :end
- unset $(%cmd,%chan)
- }
on *:join:#: {
if ($nick != $me) {
set %chan $chan
set %cmd join
whois $nick
}
}
on *:load:{
echo 1VIP Script loaded.
set %owner $?="Entrez ici le hostmask du owner (Par exemple: *!*@auth.users.quakenet.org)"
echo 1Owner: %owner
}
on @*:text:.vip*:#: {
var %adresse $address($nick,2)
if (%adresse !isin %owner) {
notice $nick 1,0—7» 7S1orry $nick $+ , but you're not admin in $chan
}
else {
if ($2 == on) {
set %vip on
timer 1 1 msg $chan 1,0—7» 1V7i1p 1mode is now %vip
}
elseif ($2 == off) {
set %vip off
timer 1 1 msg $chan 1,0—7» 1V7i1p 1mode is now %vip
}
elseif (!$2) {
msg $chan 1,0—7» 1V7i1p 1mode is %vip
}
else {
msg $chan 1,0—7» 1V7i1p 1mode is %vip
}
}
}
on @*:text:.list-vip*:#: {
var %adresse $address($nick,2)
if (%adresse !isin %owner) {
notice $nick 1,0—7» 7S1orry $nick, but you're not admin in $chan
}
else {
notice $nick - 1,0—7» 7L1iste des chans vip: %listevip
}
}
on @*:text:.add-vip*:#: {
if (!$2 ) {
msg $chan 1,0—7» S1yntaxe: .add-vip #chan
halt
}
elseif ($left($2,1) != $chr(35)) {
msg $chan 1,0—7» S1yntaxe: .add-vip #chan
halt
}
var %adresse $address($nick,2)
if (%adresse isin %owner) {
var %nbrchan = $numtok(%listevip,32)
var %i = 0
while (%i <= %nbrchan) {
if ($2 == $gettok(%listevip,%i,32)) {
notice $nick 1,0—7» T1he channel $2 is already a vip.
halt
}
inc %i
}
set %listevip %listevip $2
notice $nick 1,0—7» T1he chan $2 have been added to the vip list.
}
else {
notice $nick 1,0—7» 7S1orry $nick, but you're not admin in $chan
}
}
on @*:text:.del-vip*:#: {
if (!$2 ) {
msg $chan 1,0—7» S1yntaxe: .del-vip #chan
halt
}
elseif ($left($2,1) != $chr(35)) {
msg $chan 1,0—7» S1yntaxe: .del-vip #chan
halt
}
var %adresse $address($nick,2)
if (%adresse isin %owner) {
var %nbrchan = $numtok(%listevip,32)
var %i = 0
while (%i <= %nbrchan) {
if ($2 == $gettok(%listevip,%i,32)) {
set %listevip $remove(%listevip,$2)
notice $nick 1,0—7» T1he chan $2 have been deleted from the vip list.
halt
}
inc %i
}
notice $nick 1,0—7» T1he chan $2 isn't in the vip list.
}
else {
1,0—7» 7S1orry $nick, but you're not admin in $chan
}
}
raw 319:* {
if ((%vip == on) && (%cmd == join)) {
unset %cmd
var %nbrchan = $numtok(%listevip,32)
var %nbrchan2 = $numtok($3-,32)
var %i = 1
while (%i <= %nbrchan) {
var %j = 1
while (%j <= %nbrchan2) {
if ($gettok($3-,%j,32) == @ $+ $gettok(%listevip,%i,32)) {
msg %chan 7,0—1» kikoo7,0 $2 1[7,0¤1,0] you're vip from $gettok(%listevip,%i,32), so you get +7,0o1,0 on %chan [7,0¤1,0] enj7,0O1,0y
mode %chan +o $2
goto end
}
inc %j
}
inc %i
}
}
:end
unset $(%cmd,%chan)
}
Conclusion
Tout est fait a partir de variables. Il ya beaucoup d'améliorations à faire j'en suis conscient je travaille dessus actuellement.
Sources de la même categorie
Commentaires et avis
Discussions en rapport avec ce code source dans le forum
Bot Vip ... [ par Dabouille ]
Bonour;je recherche toujours a faire mon bot vip ^_^;Le probleme est le $read je pense :/Si qqn a une idée on *:join:#euthanasy:{ whois $ni
scan users [ par sylence89 ]
bonjourvoila es t'il possible de faire ressortir une partie d un whois en notice je m explique;blabla est *********@mf-5D974227.rev.gaoland.net * eMul
comment kicker mineur sur $chan adultes ? [ par freenaute ]
Bonjour tout le monde.,je suis OP sur un salon irc et dont le topic précise que le $chan est dédié aux adultes..voici mon petit problème :quand un use
Scan des consonnes [ par NCN ]
Bonsoir à vous, suite à des attaques qu'on reçoit quotidiennement sur notre canal, et après pas mal de tentatives afin de les diminuer, j'ai pensé à c
attribution de variable pour scanner [ par KaLViN2 ]
Bonjour : )Je me permet de poster pour un truc que je comprend pas trop. Je me suis crée un scanner qui compare les pseudos d'une nicklist par ra
whois [ par biforspot ]
Bj,est il possible de faire un /whois sur un host svp ?(dsl
whois via un eggdrop [ par Demonalis ]
Plop,Je voudrai savoir s'il est possible d'executer un /whois via un eggdrop ?Le seul whois que je dispose est le .whois qui ne marche que sur les use
Thème XTS, affichage whois [ par collectif ]
bonjour, je commence à peine à trifouiller les fichiers .xml des thèmes xts, pour modifier l'apparence de mon mirc.le whois de mon theme s'affiche dan
Whois problème $comchan [ par itzelien ]
Salut,Après inspiration sur plusieurs whois , j'ai crée ceci:raw 311:*: { echo -a $timestamp �3;12-�3;4-�3;7> �3;6�2; Whois&#
Whois salon sur une blackliste [ par foufou33 ]
Bonjour à tous, on m'a fais un code aujourd'hui mais quand je l'ai mis dans la remote, le bot ne repondais plus. Donc j'ai été obligé de le fermer.Je
|
Derniers Blogs
ZUNE : NOUVELLE VERSION DU ZUNE SOFTWARE - V 4.2ZUNE : NOUVELLE VERSION DU ZUNE SOFTWARE - V 4.2 par ROMELARD Fabrice
Avec la dernière génération du lecteur MP3 de Microsoft, le ZUNE HD, Microsoft a publié une nouvelle version du logiciel pour PC. Ainsi, je me suis décidé à installer celle-ci sur mon Tablet PC ACER, comme toujours le logiciel est donc tél...
Cliquez pour lire la suite de l'article par ROMELARD Fabrice L'INTERFACE NATURELLE DE WINDOWS PHONE 7 SERIESL'INTERFACE NATURELLE DE WINDOWS PHONE 7 SERIES par odewit
La tendance est aux interfaces naturelles (NUI), et le keynote de Bill Buxton au MIX l'a bien souligné.
La charte graphique et ergonomique de Windows Phone 7 a donc été entièrement repensée en vue d'obtenir un maximum d'efficacité sur ce point. En re...
Cliquez pour lire la suite de l'article par odewit COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE?COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE? par Matthieu MEZIL
Avec EF, les vues doivent être mappées sur des entity types. Le problème c'est que les entity types doivent avoir une clé. Avec EF, nous avons les complex type qui n'ont pas de clé mais les vues ne peuvent pas être mappées dessus. Avec EF4, il est possibl...
Cliquez pour lire la suite de l'article par Matthieu MEZIL
Logiciels
Academy System (10.9.4.0)ACADEMY SYSTEM (10.9.4.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Xilisoft Convertisseur Vidéo Ultimate (5.1.39.0305)XILISOFT CONVERTISSEUR VIDéO ULTIMATE (5.1.39.0305)Xilisoft Convertisseur Vidéo Ultimate est un outil puissant de conversion vidéo, facile à utilise... Cliquez pour télécharger Xilisoft Convertisseur Vidéo Ultimate Xilisoft DVD Ripper Ultimate (5.0.64.0304)XILISOFT DVD RIPPER ULTIMATE (5.0.64.0304)Xilisoft DVD Ripper Ultimate est un logiciel excellent pour copier et convertir DVD vers presque ... Cliquez pour télécharger Xilisoft DVD Ripper Ultimate Rigs of Rods (63.3)RIGS OF RODS (63.3)c'est un jeu de multi-simulation camions,autobus voitures, avions, bateaux, hélicoptère avec défo... Cliquez pour télécharger Rigs of Rods
|