Commande rapide ( kick , kickban , ban , avertissement )

Commenter

Contenu du snippet

Voila commande rapide de moderation juste fait en 2 dialog pour
Flood , majs , sexe , language , pub , psuedo , racisme , script , clone netiquette , foot , ban 30min , 1heure et 2heure
Voila message kick et avertissement configurable ^^

Source / Exemple : 


;-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_
;-_- Commande rapide de moderation -_-
;-_-                By Jujuquatre               -_-
;-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_-_

menu channel {
  $chr(32) Commande rapide:/set %channick $chan | /dialog -m cmdr cmdr
}

dialog cmdr {
  title "Controle Rapide By Jujuquatre"
  size -1 -1 291 90
  option dbu
  text "selectionner le nick ici :", 3, 155 66 56 8
  list 4, 217 5 67 71, size
  box "", 5, 135 58 80 21
  box "", 6, 214 0 74 89
  button "Autre", 7, 4 5 38 12, flat
  button "Flood", 8, 47 5 40 12, flat
  button "Majs", 9, 92 5 37 12, flat
  button "Sexe", 10, 134 5 37 12, flat
  button "Language", 11, 176 5 37 12, flat
  button "Pub", 12, 4 26 38 12, flat
  button "pseudo", 13, 47 26 40 12, flat
  box "", 14, 91 18 124 4
  box "", 15, 91 19 1 17
  box "", 16, 1 58 90 4
  box "", 17, 1 2 1 59
  box "", 18, 2 0 213 4
  button "Bannir 30min", 19, 94 26 37 12, flat
  button "Bannir 1Heure", 20, 134 26 37 12, flat
  button "Bannir 2Heure", 21, 174 26 37 12, flat
  box "", 22, 91 39 123 4
  box "", 23, 91 32 1 10
  button "Racisme", 24, 5 47 37 12, flat
  button "Test Script", 25, 47 47 40 12, flat
  button "Clone", 26, 92 47 37 12, flat
  button "Netiquette", 27, 135 47 37 12, flat
  button "Foot", 28, 176 47 37 12, flat
  button "ok!", 29, 1 61 135 17, flat cancel
  button "Actualisez", 30, 234 77 37 9, flat
}
on *:dialog:cmdr:init:*:{
  kbinit
}
on *:dialog:cmdr:sclick:*:{
  if ($did == 30) { did -r cmdr 4 | kbinit }
  if ($did == 8) {
    if ( $did(4).sel != $null) { set %statuscmdr flood | set %nickcmdr $did(4).seltext | dialog -m cmdr2 cmdr2 }
    else { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
  if ($did == 9) {
    if ( $did(4).sel != $null) { set %statuscmdr majs | set %nickcmdr $did(4).seltext | dialog -m cmdr2 cmdr2 }
    else { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
  if ($did == 10) {
    if ( $did(4).sel != $null) { set %statuscmdr sexe | set %nickcmdr $did(4).seltext | dialog -m cmdr2 cmdr2 }
    else { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
  if ($did == 11) {
    if ( $did(4).sel != $null) { set %statuscmdr mot | set %nickcmdr $did(4).seltext | dialog -m cmdr2 cmdr2 }
    else { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
  if ($did == 12) {
    if ( $did(4).sel != $null) { set %statuscmdr pub | set %nickcmdr $did(4).seltext | dialog -m cmdr2 cmdr2 }
    else { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
  if ($did == 13) {
    if ( $did(4).sel != $null) { set %statuscmdr nick | set %nickcmdr $did(4).seltext | dialog -m cmdr2 cmdr2 }
    else { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
  if ($did == 24) {
    if ( $did(4).sel != $null) { set %statuscmdr racs | set %nickcmdr $did(4).seltext | dialog -m cmdr2 cmdr2 }
    else { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
  if ($did == 25) {
    if ( $did(4).sel != $null) { set %statuscmdr test | set %nickcmdr $did(4).seltext | dialog -m cmdr2 cmdr2 }
    else { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
  if ($did == 26) {
    if ( $did(4).sel != $null) { set %statuscmdr clon | set %nickcmdr $did(4).seltext | dialog -m cmdr2 cmdr2 }
    else { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
  if ($did == 27) {
    if ( $did(4).sel != $null) { set %statuscmdr net | set %nickcmdr $did(4).seltext | dialog -m cmdr2 cmdr2 }
    else { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }

  if ($did == 28) {
    if ( $did(4).sel != $null) { set %statuscmdr foot | set %nickcmdr $did(4).seltext | dialog -m cmdr2 cmdr2 }
    else { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
  if ($did == 7) {
    if ( $did(4).sel != $null) { set %statuscmdr autre | set %nickcmdr $did(4).seltext | dialog -m cmdr2 cmdr2 }
    else { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
  if ($did == 19) { 
    if ( $did(4).sel != $null) { ban -u [ $+ [ $calc(30 * 60) ] ] %channick %nickcmdr 1 }
    else  { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
  if ($did == 20) { 
    if ( $did(4).sel != $null) { ban -u [ $+ [ $calc(120 * 60) ] ] %channick %nickcmdr 1 }
    else  { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
  if ($did == 21) { 
    if ( $did(4).sel != $null) { ban -u [ $+ [ $calc(240 * 60) ] ] %channick %nickcmdr 1 }
    else  { var %grr = $input(Slectionne Un nick !!!!,300,Avertissement) }
  }
}

alias kbinit {
  var %lollol = 1
  did -r cmdr 4
  while %lollol <= $nick(%channick,0) {
    did -a cmdr 4 $nick(%channick,%lollol)
    inc %lollol
  }
}
dialog cmdr2 {
  title "Que faire ?"
  size -1 -1 142 51
  option dbu
  edit ,1, 1 23 138 10, autohs
  button "Kick", 2, 8 6 37 12, flat
  button "KickBan", 3, 52 6 37 12, flat
  button "Avertir", 4, 98 6 37 12, flat
  button "Go !", 5, 1 37 37 12, flat
  text "Status : ", 6, 45 38 95 8
}

on *:dialog:cmdr2:init:*:{
  if ( %statuscmdr == flood ) { did -ar cmdr2 1 4-Flood- 12 J'aime pas le flood ! | set %msgcmdr $did(1).text }
  if ( %statuscmdr == majs ) { did -ar cmdr2 1 4-Majuscule- 12 Nous somme pas sourd !! | set %msgcmdr $did(1).text }
  if ( %statuscmdr == sexe ) { did -ar cmdr2 1 4-Sexe- 12 Va sur le canal sexe pour parler de sa !!! | set %msgcmdr $did(1).text }
  if ( %statuscmdr == mot ) { did -ar cmdr2 1 4-Language- 12 Parle pas comme sa ! | set %msgcmdr $did(1).text }
  if ( %statuscmdr == pub ) { did -ar cmdr2 1 4-Pub- 12 Pas de pub ici ! ^^ | set %msgcmdr $did(1).text }
  if ( %statuscmdr == nick ) { did -ar cmdr2 1 4-Pseudo- 12 Change ton pseudo ou revien pas ! | set %msgcmdr $did(1).text }
  if ( %statuscmdr == racs ) { did -ar cmdr2 1 4-Racisme- 12 Sale raciste ! | set %msgcmdr $did(1).text }
  if ( %statuscmdr == test ) { did -ar cmdr2 1 4-Script- 12 Va tester ton script ailleurs ! | set %msgcmdr $did(1).text }
  if ( %statuscmdr == clon ) { did -ar cmdr2 1 4-Clone- 12 Nous n'avons pas besoin de clone ! | set %msgcmdr $did(1).text }
  if ( %statuscmdr == net ) { did -ar cmdr2 1 4-Netiquette- 12 Il faut respecter la netiquette ! | set %msgcmdr $did(1).text }
  if ( %statuscmdr == foot ) { did -ar cmdr2 1 4-Foot- 12 Pas de Foot ici !!!  | set %msgcmdr $did(1).text }
}

on *:dialog:cmdr2:edit:*:{
  if ($did == 1) { set %msgcmdr $did(1).text }
}
on *:dialog:cmdr2:sclick:*:{
  if ($did == 2) && (%statuscmdr == flood) { set %statuscmdr2 kick | did -ar cmdr2 6 Status : Kick ! | did -ar cmdr2 1 4-Flood- 12 J'aime pas le flood ! | set %msgcmdr $did(1).text  }
  elseif ($did == 3) && (%statuscmdr == flood) { set %statuscmdr2 kickban | did -ar cmdr2 6 Status : KickBan ! | did -ar cmdr2 1 4-Flood- 12 J'aime pas le flood ! | set %msgcmdr $did(1).text  }
  elseif ($did == 4) && (%statuscmdr == flood) { set %statuscmdr2 avert | did -ar cmdr2 6 Status : Avertissement ! | did -ar cmdr2 1 4Dernier avertissement %nickcmdr Tu recommence a Flooder j'te tue ! | set %msgcmdr $did(1).text  }
  if ($did == 2) && (%statuscmdr == majs) { set %statuscmdr2 kick | did -ar cmdr2 6 Status : Kick ! | did -ar cmdr2 1 4-Majuscule- 12 Nous sommes pas sourd ! | set %msgcmdr $did(1).text  }
  elseif ($did == 3) && (%statuscmdr == majs) { set %statuscmdr2 kickban | did -ar cmdr2 6 Status : KickBan ! | did -ar cmdr2 1 4-Majuscule- 12 Nous sommes pas sourd ! | set %msgcmdr $did(1).text  }
  elseif ($did == 4) && (%statuscmdr == majs) { set %statuscmdr2 avert | did -ar cmdr2 6 Status : Avertissement ! | did -ar cmdr2 1 4Dernier avertissement %nickcmdr On est pas sourd Oki !? alors enleve ton doigt de la touche majs ! | set %msgcmdr $did(1).text  }
  if ($did == 2) && (%statuscmdr == sexe) { set %statuscmdr2 kick | did -ar cmdr2 6 Status : Kick ! | did -ar cmdr2 1 4-Sexe- 12 Va sur le canal sexe pour parler de sa !!! | set %msgcmdr $did(1).text  }
  elseif ($did == 3) && (%statuscmdr == sexe) { set %statuscmdr2 kickban | did -ar cmdr2 6 Status : KickBan ! | did -ar cmdr2 1 4-Sexe- 12 Va sur le canal sexe pour parler de sa !!! | set %msgcmdr $did(1).text  }
  elseif ($did == 4) && (%statuscmdr == sexe) { set %statuscmdr2 avert | did -ar cmdr2 6 Status : Avertissement ! | did -ar cmdr2 1 4Dernier avertissement %nickcmdr nous ne parlons pas de sexe ici !!!! | set %msgcmdr $did(1).text  }
  if ($did == 2) && (%statuscmdr == mot) { set %statuscmdr2 kick | did -ar cmdr2 6 Status : Kick ! | did -ar cmdr2 1 4-Language- 12 Parle pas comme sa ! | set %msgcmdr $did(1).text  }
  elseif ($did == 3) && (%statuscmdr == mot) { set %statuscmdr2 kickban | did -ar cmdr2 6 Status : KickBan ! | did -ar cmdr2 1 4-Language- 12 Parle pas comme sa ! | set %msgcmdr $did(1).text  }
  elseif ($did == 4) && (%statuscmdr == mot) { set %statuscmdr2 avert | did -ar cmdr2 6 Status : Avertissement ! | did -ar cmdr2 1 4Dernier avertissement %nickcmdr Parle mieu la prochaine fois :) | set %msgcmdr $did(1).text  }
  if ($did == 2) && (%statuscmdr == pub) { set %statuscmdr2 kick | did -ar cmdr2 6 Status : Kick ! | did -ar cmdr2 1 4-Pub- 12 Pas de pub ici ! | set %msgcmdr $did(1).text  }
  elseif ($did == 3) && (%statuscmdr == pub) { set %statuscmdr2 kickban | did -ar cmdr2 6 Status : KickBan ! | did -ar cmdr2 1 4-Pub- 12 Pas de pub ici ! | set %msgcmdr $did(1).text  }
  elseif ($did == 4) && (%statuscmdr == pub) { set %statuscmdr2 avert | did -ar cmdr2 6 Status : Avertissement ! | did -ar cmdr2 1 4Dernier avertissement %nickcmdr Encore une pub est T mort ^^ | set %msgcmdr $did(1).text  }
  if ($did == 2) && (%statuscmdr == nick) { set %statuscmdr2 kick | did -ar cmdr2 6 Status : Kick ! | did -ar cmdr2 1 4-Pseudo- 12 Change de pseudo ou revien pas ! | set %msgcmdr $did(1).text  }
  elseif ($did == 3) && (%statuscmdr == nick) { set %statuscmdr2 kickban | did -ar cmdr2 6 Status : KickBan ! | did -ar cmdr2 1 4-Pseudo- 12 Change de pseudo ou revien pas ! | set %msgcmdr $did(1).text  }
  elseif ($did == 4) && (%statuscmdr == nick) { set %statuscmdr2 avert | did -ar cmdr2 6 Status : Avertissement ! | did -ar cmdr2 1 4Dernier avertissement %nickcmdr Change de pseudo vite fait car sinon .... | set %msgcmdr $did(1).text  }
  if ($did == 2) && (%statuscmdr == racs) { set %statuscmdr2 kick | did -ar cmdr2 6 Status : Kick ! | did -ar cmdr2 1 4-Racisme- 12 Sale raciste ! | set %msgcmdr $did(1).text  }
  elseif ($did == 3) && (%statuscmdr == racs) { set %statuscmdr2 kickban | did -ar cmdr2 6 Status : KickBan ! | did -ar cmdr2 1 4-Racisme- 12 Sale raciste ! | set %msgcmdr $did(1).text  }
  elseif ($did == 4) && (%statuscmdr == racs) { set %statuscmdr2 avert | did -ar cmdr2 6 Status : Avertissement ! | did -ar cmdr2 1 4Dernier avertissement %nickcmdr arrete tes propos raciste est vite ! | set %msgcmdr $did(1).text  }
  if ($did == 2) && (%statuscmdr == test) { set %statuscmdr2 kick | did -ar cmdr2 6 Status : Kick ! | did -ar cmdr2 1 4-Script- 12 Va tester ton script ailleurs ! | set %msgcmdr $did(1).text  }
  elseif ($did == 3) && (%statuscmdr == test) { set %statuscmdr2 kickban | did -ar cmdr2 6 Status : KickBan ! | did -ar cmdr2 1 4-Script- 12 Va tester ton script aileurs ! | set %msgcmdr $did(1).text  }
  elseif ($did == 4) && (%statuscmdr == test) { set %statuscmdr2 avert | did -ar cmdr2 6 Status : Avertissement ! | did -ar cmdr2 1 4Dernier avertissement %nickcmdr test ton script autre part ! | set %msgcmdr $did(1).text  }
  if ($did == 2) && (%statuscmdr == clon) { set %statuscmdr2 kick | did -ar cmdr2 6 Status : Kick ! | did -ar cmdr2 1 4-Clone- 12 Nous n'avons pas besoin de clone ici ! | set %msgcmdr $did(1).text  }
  elseif ($did == 3) && (%statuscmdr == clon) { set %statuscmdr2 kickban | did -ar cmdr2 6 Status : KickBan ! | did -ar cmdr2 1 4-Clone- 12  Nous n'avons pas besoin de clone ici ! | set %msgcmdr $did(1).text  }
  elseif ($did == 4) && (%statuscmdr == clon) { set %statuscmdr2 avert | did -ar cmdr2 6 Status : Avertissement ! | did -ar cmdr2 1 4Dernier avertissement %nickcmdr Enleve tes clone ! | set %msgcmdr $did(1).text  }
  if ($did == 2) && (%statuscmdr == net) { set %statuscmdr2 kick | did -ar cmdr2 6 Status : Kick ! | did -ar cmdr2 1 4-Netiquette- 12 Il faut respecter la netiquette ! | set %msgcmdr $did(1).text  }
  elseif ($did == 3) && (%statuscmdr == net) { set %statuscmdr2 kickban | did -ar cmdr2 6 Status : KickBan ! | did -ar cmdr2 1 4-Netiquette- 12  Il faut respecter la netiquette ! | set %msgcmdr $did(1).text  }
  elseif ($did == 4) && (%statuscmdr == net) { set %statuscmdr2 avert | did -ar cmdr2 6 Status : Avertissement ! | did -ar cmdr2 1 4Dernier avertissement %nickcmdr Respecte la netiquette stp ! | set %msgcmdr $did(1).text  }
  if ($did == 2) && (%statuscmdr == foot) { set %statuscmdr2 kick | did -ar cmdr2 6 Status : Kick ! | did -ar cmdr2 1 4-Foot- 12 Pas de foot ici !!! | set %msgcmdr $did(1).text  }
  elseif ($did == 3) && (%statuscmdr == foot) { set %statuscmdr2 kickban | did -ar cmdr2 6 Status : KickBan ! | did -ar cmdr2 1 4-Foot- 12  Pas de foot ici !!! | set %msgcmdr $did(1).text  }
  elseif ($did == 4) && (%statuscmdr == foot) { set %statuscmdr2 avert | did -ar cmdr2 6 Status : Avertissement ! | did -ar cmdr2 1 4Dernier avertissement %nickcmdr Pas de foot ici si c'est pour vous insulter entre supporter ! | set %msgcmdr $did(1).text  }
  if ($did == 2) && (%statuscmdr == autre) { set %statuscmdr2 kick | did -ar cmdr2 6 Status : Kick !  }
  elseif ($did == 3) && (%statuscmdr == autre) { set %statuscmdr2 kickban | did -ar cmdr2 6 Status : KickBan ! }
  elseif ($did == 4) && (%statuscmdr == autre) { set %statuscmdr2 avert | did -ar cmdr2 6 Status : Avertissement !  }
  elseif ($did == 5) { kbkinit }
}

alias kbkinit {
  if (%statuscmdr2 == kick) { /kick %channick %nickcmdr  %msgcmdr }
  if (%statuscmdr2 == kickban) { /ban %channick %nickcmdr 1 | /kick %channick %nickcmdr  %msgcmdr  }
  if (%statuscmdr2 == avert) { /notice %nickcmdr  %msgcmdr }
}

Conclusion :


Merci de laisser le by Jujuquatre ou de ne pas le ripper ! ^^

Bon scripting :D

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (jujuquatre)