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
Besoin D'aide SVP [ par bux945 ]
Bonjour à tous, Je souhaiterais solliciter votre aide sur un probleme que je rencontre avec MIRC. Je suis habitué a me connecter sur Linknet, un ser
whois [ par jouvence ]
bonjour j'aimerais savoir quel est la formule pour savoir qui me fait whois merci
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
|
Derniers Blogs
ENUMERABLECOLLECTIONENUMERABLECOLLECTION par Matthieu MEZIL
Prenons le scénario suivant. On utilise MVVM. On a les deux classes suivantes dans le model : public class Child { } public class Parent { private ObservableCollection < Child > _children; public ObservableCollection < Child > Children { get {...
Cliquez pour lire la suite de l'article par Matthieu MEZIL [HS] CHROME 6 + MOI = COUP DE GUEULE ![HS] CHROME 6 + MOI = COUP DE GUEULE ! par JeremyJeanson
Attention, le poste qui suit n'est pas la complainte d'une personne : Qui n'aime pas Chrome. D'un anti Google. D'un développeur qui a un poil énorme dans la main. Ceux qui me fréquentent savent que je change de navigateur favori tous les 2 ou 3 mois afin ...
Cliquez pour lire la suite de l'article par JeremyJeanson [WP7] UTILISER UN WRAPPANEL DANS UNE APPLICATION WINDOWS PHONE 7[WP7] UTILISER UN WRAPPANEL DANS UNE APPLICATION WINDOWS PHONE 7 par Audrey
Lors de la réalisation de ma 2ème application Windows Phone 7, j'ai souhaité utiliser un WrapPanel pour afficher plusieurs photos. Mais le contrôle WrapPanel ne fait pas parti de la liste des contrôles inclus dans le SDK de la version Beta des outils pour...
Cliquez pour lire la suite de l'article par Audrey [WP7] BESOIN D'AVOIR DES DONNéES EN CACHE[WP7] BESOIN D'AVOIR DES DONNéES EN CACHE par Nicolas
Les développeurs ASP.NET ont l'habitude de mettre des données en cache pour éviter de requêter a chaque fois la base de données. Et il est toujours utilie de penser que vos utilisateurs mobiles n'ont pas troujours une super connexion 3G/WIFI et un for...
Cliquez pour lire la suite de l'article par Nicolas [TFS] COMMENT FORCER LA SAISIE D'UN AREA OU ITERATION[TFS] COMMENT FORCER LA SAISIE D'UN AREA OU ITERATION par cyril
Lorsque l'on créé un Work Item dans TFS, il est possible de le classer dans un "area" et dans une "iteration". Dans la plupart des types de projet, un "area" correspond à une catégorie, une "iteration" à un numéro de version. Il est possible de cré...
Cliquez pour lire la suite de l'article par cyril
Logiciels
Bureau de Gestion - ERP Devis Facturation (2.02)BUREAU DE GESTION - ERP DEVIS FACTURATION (2.02)
- Version gratuite du 10/06/2010
Le Bureau de Gestion est un logiciel dédié à la gestion de l'en...
Cliquez pour télécharger Bureau de Gestion - ERP Devis Facturation sDEVIS-FACTURES vlPRO (3.8.0)SDEVIS-FACTURES VLPRO (3.8.0)sDEVIS-FACTURES vlPRO a été mis au point pour permettre besoins des particuliers, créateurs, entr... Cliquez pour télécharger sDEVIS-FACTURES vlPRO LettresFaciles (5.6.0)LETTRESFACILES (5.6.0)LettresFaciles est un logiciel facilitant la création et la rédaction de lettres types.
Son inte... Cliquez pour télécharger LettresFaciles MyPlanning 2010 (5.6.0)MYPLANNING 2010 (5.6.0)MyPlanning 2010 permet de créer des plannings sous la représentation de diagrammes. Plannings pré... Cliquez pour télécharger MyPlanning 2010 Emicsoft Mac DVD en iPad Convertisseur (3.1.16)EMICSOFT MAC DVD EN IPAD CONVERTISSEUR (3.1.16)Emicsoft Mac DVD en iPad Convertisseur, logiciel professionnel de convertir les fichiers DVD en i... Cliquez pour télécharger Emicsoft Mac DVD en iPad Convertisseur
|