Accueil > > > THE CHANNEL SIMULATOR
THE CHANNEL SIMULATOR
Information sur la source
Description
Ce petit programme permet de simuler le rejoignement d'un canal.
Il stock toutes les informations nécéssaires, puis ouvre un port, se connecte en local sur celui-ci, et simule un petit IRCd, où le /join sera reproduite.
J'ai surtout créé ça pour certaines personnes qui joignent et partent des canaux comme ça, par curiosité... ça saoule -_-
Source
;Simulation de canal :o
;The channel simulation
;by G-FACTION
alias simulate {
if ($2) {
set %simulation $true
set %simulation.chan $1
;Recherche des informations avant la connexion en local
set %names_lists 0
set %who 0
set %simulation.port $2
mode $1
who $1
names $1
topic $1
}
}
alias simulation {
if ($1 == close) {
set %simulation $false
sockclose chan_simulation
sockclose %tsn
unset %who*
unset %names*
unset %simulation*
}
}
raw 324:*: {
set %simulation.modes $3-
}
raw 329:*: {
set %simulation.time $3-
}
raw 352:*: {
inc %who
set %who $+ %who $2-
}
raw 353:*: {
inc %names_lists
set %names $+ %names_lists $4-
}
raw 332:*: {
set %simulation.topic $3-
halt
}
raw 333:*: {
set %simulation.user $3
set %simulation.time $gettok($1-,4-,32)
if (%simulation) {
set %simulation $false
socklisten chan_simulation %simulation.port
server -m 127.0.0.1 %simulation.port
}
halt
}
raw 403:*: {
if (%simulation) {
set %simulation $false
echo -a 2The channel12 %simulation.chan 2cannot be simulated, it doesn't exists
halt
}
}
on *:socklisten:chan_simulation: {
set %tsn $sockname $+ $ctime
sockaccept %tsn
set %s %simulation.chan $+ .channel_simulation
set %c %simulation.chan
set %zz channel_simulation!user@channel_simulation
}
on 1:sockread:chan_simulation*: {
sockread %sr
tokenize 32 %sr
if ($1 == NICK) {
set %n $2
set %f %n $+ !user@channel_simulation
}
elseif ($1 == USER) {
sockwrite -tn $sockname : $+ %s NOTICE AUTH :*** You are connecting to Channel Simulation 1.0
sockwrite -tn $sockname : $+ %s NOTICE AUTH :*** This program was made by G-FACTION
sockwrite -tn $sockname : $+ %s NOTICE AUTH :*** Let's simulate %simulation.chan !
sockwrite -tn $sockname : $+ %s 001 %n :Welcome to the chan_simulation IRC Network %f
sockwrite -tn $sockname : $+ %f JOIN : $+ %c
giveinfos $sockname
}
}
alias giveinfos {
if ($1) {
sockwrite -tn $1 : $+ %s 332 %n %c : $+ %simulation.topic
sockwrite -tn $1 : $+ %s 333 %n %c %simulation.user %simulation.time
var %i 1
while (%i <= %names_lists) {
sockwrite -tn $1 : $+ %s 353 %n = %c : $+ %names [ $+ [ %names_lists ] ]
inc %i
}
sockwrite -tn $1 : $+ %s 366 %n %c :End of /NAMES list.
var %o 1
while (%i <= %who) {
sockwrite -tn $1 : $+ %s 352 %n %who [ $+ [ %i ] ]
inc %i
}
sockwrite -tn $1 : $+ %s 315 %n %c :End of /WHO list.
sockwrite -tn $1 : $+ %s 324 %n %c %simulation.modes
sockwrite -tn $1 : $+ %s 329 %n %c %simulation.time
sockwrite -tn $1 : $+ %zz PRIVMSG %c :Channel simulation finished
sockwrite -tn $1 : $+ %zz PRIVMSG %c :This was made by G-FACTION (2qdeme@yahoo.fr)
sockwrite -tn $1 : $+ %zz PRIVMSG %c :To close the channel simulation, type /simulation close
sockwrite -tn $1 : $+ %zz PRIVMSG %c :Hope you enjoyed ;)
}
}
Conclusion
Tapez /simulate #channel, pour commencer la simulation
Une fois le canal simulé, tapez /simulation close
×××G-FACTION×××
Historique
- 28 juillet 2004 14:09:18 :
- J'ai amélioré quelques défauts du code.
Sources du même auteur
Sources de la même categorie
Commentaires et avis
|
Derniers Blogs
SIMULER FACILEMENT L'ENVOI DE MAILSIMULER FACILEMENT L'ENVOI DE MAIL par JeremyJeanson
il m'a été demandé, à plusieurs reprises, comment je faisais pour simuler l'envoi de mail lors de mes démos de Workflow Foundation. Ma solution est plutôt simple : j'utilise la configuration par défaut du SmtpClient et j'oriente les mails vers un dossier ...
Cliquez pour lire la suite de l'article par JeremyJeanson VOTEZ POUR LE TOP 10 DES INFLUENCEURS SHAREPOINT FRANCOPHONES !VOTEZ POUR LE TOP 10 DES INFLUENCEURS SHAREPOINT FRANCOPHONES ! par Patrick Guimonet
Si ce n'est déjà fait (comme plus de 600 personnes déjà), il est encore temps de voter pour le concours TOP 10 des influenceurs SharePoint francophones ! Il est organisé par harmon.ie et accessible ici : http://harmon.ie/top-...
Cliquez pour lire la suite de l'article par Patrick Guimonet [CONF'SHAREPOINT] DERNIER RAPPEL ! :-)[CONF'SHAREPOINT] DERNIER RAPPEL ! :-) par Patrick Guimonet
La Conf'SharePoint en chiffres c'est : 3 jours de SharePoint ! 4 parcours et 60 sessions 17 partenaires représentant toutes les fac...
Cliquez pour lire la suite de l'article par Patrick Guimonet [ #SHAREPOINT 2013 ] LES MODèLES DE SITES STANDARDS.[ #SHAREPOINT 2013 ] LES MODèLES DE SITES STANDARDS. par Patrick Guimonet
C'est un point peu mis en avant mais SharePoint 2013 a été l'occasion de remettre de l'ordre dans les modèles de sites. Tout d'abord, un certain nombre de modèles ont été tout simplement rendus obsolètes (cf. Fonctionnalités déco...
Cliquez pour lire la suite de l'article par Patrick Guimonet
Forum
LANGAGE 4DLANGAGE 4D par wvalter
Cliquez pour lire la suite par wvalter PROBLEME MIRCPROBLEME MIRC par PaTaTe
Cliquez pour lire la suite par PaTaTe PERFECTIONPERFECTION par gorby10
Cliquez pour lire la suite par gorby10
Logiciels
Easy-Planning (4.5.0.11)EASY-PLANNING (4.5.0.11)Easy-Planning permet de créer des plannings sous la représentation de diagrammes et est adapté a... Cliquez pour télécharger Easy-Planning CVEasy (3.1.0.51)CVEASY (3.1.0.51)PHMSD-CVEasy est un logiciel d'aide à la rédaction de CV d'une simplicité déconcertante.
PHMSD-C... Cliquez pour télécharger CVEasy LettresFaciles 2011 (8.6.0.31)LETTRESFACILES 2011 (8.6.0.31)LettresFaciles est un logiciel facilitant la création et la rédaction de lettres types.
Son inte... Cliquez pour télécharger LettresFaciles 2011 sDEVIS-FACTURES vlPRO (8.4.2.62)SDEVIS-FACTURES VLPRO (8.4.2.62)sDEVIS-FACTURES vlPRO a été mis au point pour les particuliers, créateurs, entrepreneurs, artisa... Cliquez pour télécharger sDEVIS-FACTURES vlPRO Devis-Factures PHMSD (2.1.0.11)DEVIS-FACTURES PHMSD (2.1.0.11)Configuration minimale
Nécessite Windows™ 2000, XP, Windows 7, 8, Vista (Service Pack à... Cliquez pour télécharger Devis-Factures PHMSD
|