MESSAGES TRANSLATOR ( ECHOS ) POUR UN CHAT PLUS AGRÉABLE

bussonnais Messages postés 24 Date d'inscription vendredi 21 février 2003 Statut Membre Dernière intervention 23 avril 2004 - 11 févr. 2004 à 20:08
bussonnais Messages postés 24 Date d'inscription vendredi 21 février 2003 Statut Membre Dernière intervention 23 avril 2004 - 11 févr. 2004 à 20:08
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/14464-messages-translator-echos-pour-un-chat-plus-agreable

bussonnais Messages postés 24 Date d'inscription vendredi 21 février 2003 Statut Membre Dernière intervention 23 avril 2004
11 févr. 2004 à 20:08
#########################
# Traduction en Francais #
# #
# Networks Asp2p.net #
# bussonnais@wanadoo.fr #
# #
# Ps: je me suis permis de faire #
# faire une petite modif du code #
# en laissant les droits d'auteur #
#########################

;#######################################
; IRC's messages translator by i0Lo
;#######################################

;###########################
; TextChan Colors
;###########################

on ^1:text:*:#:{
if ($nick isop $chan) { echo $chan $+ 14|15| 4@2 $+ $nick $+ 15 >14>1> $1- }
elseif ($nick isvo $chan) { echo $chan $+ 14|15| 3+2 $+ $nick $+ 15 >14>1> $1- }
elseif ($nick ishelp $chan) { echo $chan $+ 14|15| 5%2 $+ $nick $+ 15 >14>1> $1- }
else { echo $chan $+ 14|15| 2 $+ $nick $+ 15 >14>1> $1- }
halt
}
on ^1:action:*:#:{
if ($nick isop $chan) { echo $chan 14|15| 3 4@2 $+ $nick  $1- }
elseif ($nick isvo $chan) { echo $chan 14|15| 3 3+2 $+ $nick  $1- }
elseif ($nick ishelp $chan) { echo $chan14|15| 3 5%2 $+ $nick  $1- }
else { echo $chan 14|15| 3 2 $+ $nick  $1- }
halt
}
For security reasons your own text can't be changed

;###########################
; Nicklist Colors
;###########################

#colornicklist on
on *:OP:#: { .set %colorn.chan $chan | .colornicks }
on *:DEOP:#: { .set %colorn.chan $chan | .colornicks }
on *:VOICE:#: { .set %colorn.chan $chan | .colornicks }
on *:DEVOICE:#: { .set %colorn.chan $chan | .colornicks }
on 1:JOIN:#: { .set %colorn.chan $chan | .colornicks }

alias colornicks {
if ($1 !$null && $left($active, 1) $chr(35)) { .set %colorn.chan $1 }
.set %colorn.i 1
.set %colorn.nbnick $nick(%colorn.chan,0)
:loop
if ( %colorn.i > %colorn.nbnick ) { .cline -l 1 %colorn.chan $me | .unset %colorn* | .halt }
if ( $nick(%colorn.chan,%i) isignore ) { .cline 14 %colorn.chan $nick(%colorn.chan,%colorn.i) | .goto end }
if ( $nick(%colorn.chan,%colorn.i) isnotify ) { .cline 11 %colorn.chan $nick(%colorn.chan,%colorn.i) .goto end }
if ( $nick(%colorn.chan,%colorn.i) isop %colorn.chan ) { .cline 4 %colorn.chan $nick(%colorn.chan,%colorn.i) | .goto end }
if ( $nick(%colorn.chan,%colorn.i) ishop %colorn.chan ) { .cline 5 %colorn.chan $nick(%colorn.chan,%colorn.i) | .goto end }
if ( $nick(%colorn.chan,%colorn.i) isvoice %colorn.chan ) { .cline 3 %colorn.chan $nick(%colorn.chan,%colorn.i) | .goto end }
.cline 2 %colorn.chan $nick(%colorn.chan,%colorn.i)
:end
.inc %colorn.i
.goto loop
}
#colornicklist end

;###########################
; Join Colors
;###########################

on ^1:JOIN:*:{
if ($nick == $me) {
//echo $chan 2Bienvenue 1[2 $chan 1]
if ( %automessage2 = activé ) { .timer 1 1 msg $chan %automsg2
}
}
else {
//echo $chan 3 $nick ( $+ $address $+ ) 2a rejoin 1[2 $chan 1]
if ( %automessage = activé ) { msg $chan %automsg
}
}
haltdef
}

;###########################
; Part Colors
;###########################

on ^1:part:#:{
if ( $nick == $me ) {
/set %raisonpart $1-
if ( %raisonpart == $null ) { /set %raisonpart 2Aucune Raison | //echo -s $chan 3 $nick ( $+ $address $+ ) 2est parti 1[2 $chan 1] 1(2 %raisonpart 1) }
elseif ( %raisonpart != $null ) { //echo -s $chan 3 $nick ( $+ $address $+ ) 2est parti 1[2 $chan 1] 1(2 %raisonpart 1) }
haltdef
}
else {
/set %raisonpart $1-
if ( %raisonpart == $null ) { /set %raisonpart 2Aucune Raison | //echo $chan 3 $nick ( $+ $address $+ ) 2est parti 1[2 $chan 1] 1(2 %raisonpart 1) }
elseif ( %raisonpart != $null ) { //echo $chan 3 $nick ( $+ $address $+ ) 2est parti 1[2 $chan 1] 1(2 %raisonpart 1) }
haltdef
}
}

;###########################
; Quit Colors
;###########################

on ^*:quit:{
var %i = $comchan($nick,0)
if (%i > 0) {
:next
echo $comchan($nick,%i) 3 $nick 2 ( $+ $address $+ )2 a quitter IRC 1(2 $1- 1)
dec %i
if (%i > 0) goto next
}
else echo -s 3 $nick 2 ( $+ $address $+ )2 a quitter IRC 1(2 $1- 1)
haltdef
}

;###########################
; Op Colors
;###########################

on ^1:OP:*:{
if ($opnick = $me) {
//echo $chan 3 $nick 2change le mode 4+op 3 $me 2on 1[2 $chan 1]
}
elseif ($nick == $me) {
//echo $chan 2 Vous avez changer le mode en 4+o 3 $opnick 2on 1[2 $chan 1]
}
else {
//echo $chan 3 $nick 2change le mode 4+op 3 $opnick 2on 1[2 $chan 1]
}
haltdef
}
on ^1:SERVEROP:*:{
if ($opnick = $me) {
//echo $chan 3 $nick 2change le mode 4+op 3 $me 2on 1[2 $chan 1]
}
elseif ($nick == $me) {
//echo $chan 2 Vous avez changer le mode en 4+op 3 $opnick 2on 1[2 $chan 1]
}
else {
//echo $chan 3 $nick 2change le mode 4+op 3 $opnick 2on 1[2 $chan 1]
}
haltdef
}


;###########################
; Deop Colors
;###########################

on ^1:DEOP:*:{
if ($opnick = $me) {
//echo $chan 3 $nick 2change mode 4-op 3 $me 2on 1[2 $chan 1]
}
else {
//echo $chan 3 $nick 2change mode 4-op 3 $opnick 2on 1[2 $chan 1]
}
haltdef
}

;###########################
; Voice Colors
;###########################

on ^1:VOICE:*:{
if ($vnick = $me) {
//echo $chan 3 $nick 2change le mode 3+voice 3 $me 2on 1[2 $chan 1]
}
else {
//echo $chan 3 $nick 2change le mode 3+voice 3 $vnick 2on 1[2 $chan 1]
}
haltdef
}

;###########################
; Devoice Colors
;###########################

on ^1:DEVOICE:*:{
if ($vnick = $me) {
//echo $chan 3 $nick 2change le mode 3-voice 3 $me 2on 1[2 $chan 1]
}
else {
//echo $chan 3 $nick 2change le mode 3-voice 3 $vnick 2on 1[2 $chan 1]
}
haltdef
}

;###########################
; Topic Colors
;###########################

on ^1:TOPIC:*:{
//echo $chan 3 $nick 2change le topic 3 ' $+ $1- $+ ' 2on 1[2 $chan 1]
haltdef
}

;###########################
; Mode Colors
;###########################

on ^1:MODE:*:{
/echo $chan 3 $nick 2change le mode 3 $1- 2on 1[2 $chan 1] | halt
}

;###########################
; Usermode Colors
;###########################

on ^1:USERMODE:{
if ($active != Status Window && $active != $null) {
echo -a 2 Votre mode a changé en 3 $1-
}
echo -se 2 Votre mode a changé en 3 $1-
haltdef
}

;###########################
; Nick Colors
;###########################

on ^*:nick:{
if ($nick != $me) {
var %i = $comchan($newnick,0)
:next
echo $comchan($newnick,%i) 3 $nick 2 change sont pseudo en 3 $newnick
dec %i
if (%i > 0) goto next
}
else echo -a 2 Votre pseudo a changer pour 2 $newnick
haltdef
}

;###########################
; Notice Colors
;###########################

on &^*:NOTICE:*:?:{ haltdef
if ( ($nick == $nick ) ) { goto end }
:end
/echo -a 3 $+ $nick $+ -2 $1-
}
on &^*:NOTICE:*:#:{ haltdef
if ( ($nick == $nick ) ) { goto end }
:end
/echo -a $+ 1[2 $chan 1] 3 $+ $nick $+ -2 $1-
}


;###########################
; Halfop Colors
;###########################

on ^1:HELP:*:{
if ($hnick = $me) {
//echo $chan 3 $nick 2change le mode 5+halfop 3 $me 2on 1[2 $chan 1]
}
elseif ($nick == $me) {
//echo $chan 2 Vous avez changer le mode en 5+halfop 3 $hnick 2on 1[2 $chan 1]
}
else {
//echo $chan 3 $nick 2change le mode 5+halfop 3 $hnick 2on 1[2 $chan 1]
}
haltdef
}

;###########################
; Dehalfop Colors
;###########################

on ^1:DEHelp:*:{
if ($vnick = $me) {
//echo $chan 3 $nick 2change le mode 5-halfop 3 $me 2on 1[2 $chan 1]
}
else {
//echo $chan 3 $nick 2change le mode 5-halfop 3 $hnick 2on 1[2 $chan 1]
}
haltdef
}
;###########################
; Kick Colors
;###########################

on ^1:Kick:*:{
if ($knick = $me) {
//echo $chan 3 $knick 2a été kicker par3 $nick 2on 1[2 $chan 1] 2Reason 1[2 $1- 1]
}
else {
//echo $chan 3 $knick 2a été kicker par3 $nick 2on 1[2 $chan 1] 2Reason 1[2 $1- 1]
}
haltdef
}

;###########################
; Ban Colors
;###########################

on ^1:Ban:*:{
if ($knick = $me) {
//echo $chan 3 $banmask 2a été banni par3 $nick 2on 1[2 $chan 1]
}
else {
//echo $chan 3 $banmask 2a été banni par3 $nick 2on 1[2 $chan 1]
}
haltdef
}
on ^1:Unban:*:{
if ($nick = $me) {
//echo $chan 3 $banmask 2a été débanni par3 $nick 2on 1[2 $chan 1]
}
else {
//echo $chan 3 $banmask 2a été débanni par3 $nick 2on 1[2 $chan 1]
}
haltdef
}


;###########################
; Invite Colors
;###########################

on ^1:invite:#:{
if ( $nick == $me ) {
//echo-a 3 $nick 2vous invite à joindre 1[2 $chan 1]
}
else {
//echo -a 3 $nick 2vous invite à joindre 1[2 $chan 1]
}
haltdef
}
Rejoignez-nous