;/*********************************/
; Menu Sysop 0.4 (du 04/03/2021)
; https://www.wiki-irc.com/Sysop
;/*********************************/

alias readlang return $readini(Sysop\raisons.ini,n,$$1,$$2)

;#### Fonction retournant alatoirement des raisons de kicks
alias kick_off {
  var %read = $readlang(fr,$$1)
  return $gettok(%read,$rand(1,$numtok(%read,124)),124)
}

Menu Nicklist,channel,query {
  .-
  $iif($network == Discussionner,Sysop - Menu pour Globop/Admin (v0.3) ( $+ $1 $+ ) )
  ..Ajouter / Supprimer un Gline ou Shun
  ;Kill
  ...$iif($menu == nicklist,Dconnexion d'un pseudo (kill)  ):/Sysop GLOBOP KILL $$1 $$?="Entrer la raison"
  ...$iif($menu == channel || $menu == query ,Dconnecter un pseudo (kill)  ):/Sysop GLOBOP KILL $$?="Entrer le pseudo :" $$?="Entrer la raison :"
  ...-
  ;gline 15s
  ...$iif($menu == nicklist,Ajouter un gline (30s) ):/Sysop GLOBOP GLINE $$1 15s $$?="Entrer la raison"
  ...$iif($menu == channel || $menu == query ,Ajouter un gline (30s)  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" 15s $$?="Entrer la raison :"
  ;gline 10m
  ...$iif($menu == nicklist,Ajouter un gline (1h) ):/Sysop GLOBOP GLINE $$1 1h $+ $$?="Entrer la raison"
  ...$iif($menu == channel || $menu == query ,Ajouter un gline (1h)  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" 10m $$?="Entrer la raison :"
  ;gline 1h
  ...$iif($menu == nicklist,Ajouter un gline (4h) ):/Sysop GLOBOP GLINE $$1 1h $$?="Entrer la raison"
  ...$iif($menu == channel || $menu == query ,Ajouter un gline (4h)  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" 1h $$?="Entrer la raison :"
  ;gline 4h
  ...$iif($menu == nicklist,Ajouter un gline (12h) ):/Sysop GLOBOP GLINE $$1 4h $$?="Entrer la raison"
  ...$iif($menu == channel || $menu == query ,Ajouter un gline (12h)  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" 4h $$?="Entrer la raison :"
  ;gline 1d
  ...$iif($menu == nicklist,Ajouter un gline (1d) ):/Sysop GLOBOP GLINE $$1 1d : $+ $$?="Entrer la raison"
  ...$iif($menu == channel || $menu == query ,Ajouter un gline (1d)  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" 1d $$?="Entrer la raison :"
  ;gline 2d
  ...$iif($menu == nicklist,Ajouter un gline (2d) ):/Sysop GLOBOP GLINE $$1 2d $$?="Entrer la raison"
  ...$iif($menu == channel || $menu == query ,Ajouter un gline (2d)  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" 2d $$?="Entrer la raison :"
  ;UNGLINE
  ...$iif($menu == channel || $menu == query || $menu == nicklist ,Supprimer un gline avec l'IP  ):/Sysop GLOBOP UNGLINE $$?="IP :"
  ...-
  ;shun 15s
  ...$iif($menu == nicklist,Ajouter un shun (30s) ):/Sysop GLOBOP SHUN $$1 15s : $+ $$?="Entrer la raison"
  ...$iif($menu == channel || $menu == query ,Ajouter un shun (30s)  ):/Sysop GLOBOP SHUN $$?="Entrer le pseudo :" 15s $$?="Entrer la raison :"
  ;shun 10m
  ...$iif($menu == nicklist,Ajouter un shun (1h) ):/Sysop GLOBOP SHUN $$1 1h : $+ $$?="Entrer la raison"
  ...$iif($menu == channel || $menu == query ,Ajouter un shun (1h)  ):/Sysop GLOBOP SHUN $$?="Entrer le pseudo :" 10m $$?="Entrer la raison :"
  ;shun 1h
  ...$iif($menu == nicklist,Ajouter un shun (4h) ):/Sysop GLOBOP SHUN $$1 4h : $+ $$?="Entrer la raison"
  ...$iif($menu == channel || $menu == query ,Ajouter un shun (4h)  ):/Sysop GLOBOP SHUN $$?="Entrer le pseudo :" 1h $$?="Entrer la raison :"
  ;shun 4h
  ...$iif($menu == nicklist,Ajouter un shun (12h) ):/Sysop GLOBOP SHUN $$1 12h : $+ $$?="Entrer la raison"
  ...$iif($menu == channel || $menu == query ,Ajouter un shun (12h)  ):/Sysop GLOBOP SHUN $$?="Entrer le pseudo :" 4h $$?="Entrer la raison :"
  ;shun 1d
  ...$iif($menu == nicklist,Ajouter un shun (1d) ):/Sysop GLOBOP SHUN $$1 1d : $+ $$?="Entrer la raison"
  ...$iif($menu == channel || $menu == query ,Ajouter un shun (1d)  ):/Sysop GLOBOP SHUN $$?="Entrer le pseudo :" 1d $$?="Entrer la raison :"
  ;UNSHUN
  ...$iif($menu == channel || $menu == query || $menu == nicklist ,Supprimer un shun avec l'IP  ):/Sysop GLOBOP UNSHUN $$?="IP :"
  .-
  ;Ajouter un gline manuel
  .==>  Ajouter un Gline avec motif prdfini <==
  ..$iif($menu == nicklist,Pour du flood ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-flood)
  ..$iif($menu == channel || $menu == query ,Pour du flood ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-flood)

  ..$iif($menu == nicklist,Pour majuscules ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-majuscules)
  ..$iif($menu == channel || $menu == query ,Pour des majuscules ? ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-majuscules)

  ..$iif($menu == nicklist,Gnral - Comportement inadapt):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-general)
  ..$iif($menu == channel || $menu == query ,Gnral - Comportement inadapt):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-general)

  ..$iif($menu == nicklist,Comportement  revoir ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-comportement)
  ..$iif($menu == channel || $menu == query ,Comportement  revoir ?   ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-comportement)

  ..$iif($menu == nicklist,Contournement ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-contournement)
  ..$iif($menu == channel || $menu == query ,Contournement   ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-contournement)

  ..$iif($menu == nicklist,Pour insulte ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-insultes)
  ..$iif($menu == channel || $menu == query ,Pour insulte ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-insultes)

  ..$iif($menu == nicklist,Incitation - Incitation ou demande interdite ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-incitation)
  ..$iif($menu == channel || $menu == query ,Incitation - Incitation ou demande interdite ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-incitation)

  ..$iif($menu == nicklist,Sexe 1 - Pas sur YouPorn ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-sexe)
  ..$iif($menu == channel || $menu == query ,Sexe 1 - Pas sur YouPorn ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-sexe)

  ..$iif($menu == nicklist,Sexe 2 - Pas sur un site porno ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-sexe2)
  ..$iif($menu == channel || $menu == query ,Sexe 2 - Pas sur un site porno ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-sexe2)

  ..$iif($menu == nicklist,Pour pseudo incorrect ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-pseudo)
  ..$iif($menu == channel || $menu == query ,Pour pseudo incorrect ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-pseudo)

  ..$iif($menu == nicklist,Pour pseudo sexe ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-pseudo-sexe)
  ..$iif($menu == channel || $menu == query ,Pour pseudo sexe ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-pseudo-sexe)

  ..$iif($menu == nicklist,Pour faux sexe ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-faux-sexe)
  ..$iif($menu == channel || $menu == query ,Pour faux sexe ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-faux-sexe)

  ..$iif($menu == nicklist,Pour infos persos en salon ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-infos-persos)
  ..$iif($menu == channel || $menu == query ,Pour infos persos en salon ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-infos-persos)

  ..$iif($menu == nicklist,Pour spam ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-spam)
  ..$iif($menu == channel || $menu == query ,Pour spam ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-spam)

  ..$iif($menu == nicklist,Pour faux profil ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-profil)
  ..$iif($menu == channel || $menu == query ,Pour faux profil ? ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-profil)

  ..$iif($menu == nicklist,Pour clones ?):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-clonage)
  ..$iif($menu == channel || $menu == query ,Pour clones ?):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-clonage)

  ..$iif($menu == nicklist,Pour demande interdite de PV ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-demandepv)
  ..$iif($menu == channel || $menu == query ,Pour demande interdite de PV ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-demandepv)

  ..$iif($menu == nicklist,Pour sujet interdit ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-sujetrefuse)
  ..$iif($menu == channel || $menu == query, Pour sujet interdit ?):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-sujetrefuse)

  ..$iif($menu == nicklist,Pour message public personnel ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-message-public-personnel)
  ..$iif($menu == channel || $menu == query ,Pour message public personnel ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-message-public-personnel)

  ..$iif($menu == nicklist,Pour dtraqu sexuel ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-detraque-sexuel)
  ..$iif($menu == channel || $menu == query ,Pour dtraqu sexuel ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo ou IP :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-detraque-sexuel)
  
  ..$iif($menu == nicklist,Drange les filles ou mecs ? ):/Sysop GLOBOP GLINE $$1 $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-derange-join)
  ..$iif($menu == channel || $menu == query ,Drange les filles ou mecs ?  ):/Sysop GLOBOP GLINE $$?="Entrer le pseudo ou IP :" $$?="Entrer le temps : (15s , 1h , 4h , 12h , 1d , 2d)" $kick_off(c-derange-join)


  .-
  ..Aide :/Sysop HELP
  ..$iif($menu == nicklist || $menu == query,Whois $$1 ):/Sysop UWHOIS $$1
  ..$iif($menu == channel ,Whois un utilisateur ):/Sysop UWHOIS $$?="Entrer le pseudo :"
  .Voir la liste des Global-oprateurs (les levels 6 et suprieur):/CS ACCESS #!staff! LIST
  ..Voir le log des Glines:/Sysop GLOBOP GLINELIST
  ..Voir le log des Glines d'un oprateur:/Sysop GLOBOP GLINELIST $$?="Entrer le pseudo :"
  ..Voir le log des Shun:/Sysop GLOBOP SHUNLIST
  ..Voir le log des Shun d'un oprateur:/Sysop GLOBOP SHUNLIST $$?="Entrer le pseudo :"
  .-
  .Editer le fichier des motifs://run $mircdir $+ /Sysop/raisons.ini
}

;fin 

; Sysop pour les Administrateurs
Menu Nicklist,channel,query {
  .-
  $iif($network == Discussionner && o isin $usermode,Sysop pour Administrateur (v0.3) ( $+ $1 $+ ) )
  .Ajouter un Global-oprateur (ChanServ #!staff!):/CS ACCESS #!staff! ADD 6 $$?="Entrer le pseudo :"
  .Supprimer un Global-oprateur (ChanServ #!staff!):/CS ACCESS #!staff! DEL $$?="Entrer le pseudo :"
  .Voir la liste des Global-oprateurs (les levels 6 et suprieur):/CS ACCESS #!staff! LIST
  .-
  .BADNICK ( la connexion)
  ..Ajouter un pseudo:/Sysop ADMIN BADNICK ADD $$?="Entrer un pseudo ou Regex :" $$?="Entrer la dure :"
  ..Supprimer un pseudo:/Sysop ADMIN BADNICK DEL $$?="Entrer un pseudo ou Regex :"
  ..-
  .BLACKLIST ( la connexion)
  ..Ajouter une IPv4/Host/IPv6:/Sysop ADMIN BLACKLIST IP ADD $$?="Entrer l'IPv4/Host/IPv6 ou Regex :" $$?="Entrer la raison :"
  ..Supprimer une IPv4/Host/IPv6:/Sysop ADMIN BLACKLIST IP DEL $$?="Entrer l'IPv4/Host/IPv6 ou Regex :"
  ..-
  ..Ajouter un Ident:/Sysop ADMIN BLACKLIST IDENT ADD $$?="Entrer l'ident ou Regex6 :" $$?="Entrer la raison :"
  ..Supprimer un Ident:/Sysop ADMIN BLACKLIST IDENT DEL $$?="Entrer l'ident ou Regex :"
  ..-
  ..Ajouter un Ident ET AUSSI une IPv4/Host/IPv6:/Sysop ADMIN BLACKLIST BOTH ADD $$?="Entrer l'ident ou Regex :" $$?="Entrer l'IPv4/Host/IPv6 ou Regex :" $$?="Entrer la raison :"
  ..Supprimer un Ident ET AUSSI une IPv4/Host/IPv6:/Sysop ADMIN BLACKLIST BOTH DEL $$?="Entrer l'ident ou Regex :" $$?="Entrer l'IPv4/Host/IPv6 ou Regex :"
    ..-
  ..Voir la liste:/Sysop ADMIN BLACKLIST LIST
  ..-
  .BLACKLISTV2 ( la connexion)
  ..Ajouter une blackliste:/Sysop ADMIN BLACKLISTV2 ADD IDENT= $+ $$?="Entrer un ident ou son regex ou mettre * pour aucun :" IP= $+ $$?="Entrer une ipv4/ipv6/host ou son regex ou mettre * pour aucun :" ASN= $+ $$?="Entrer un ASN (sans AS)  ou mettre * pour aucun :" LISTAGE= $+ $$?="Entrer un age ou une plage d'ages comme 12:17 ou mettre * pour aucun :" SEX= $+ $$?="Entrer le sexe :" SASL= $+ $$?="Entrer * ou false ou true pour surveiller que les account ou pas account ou les 2 :" REASON= $+ $$?="Entrer le motif ou mettre * pour aucun :" CAUSE= $+ $$?="Entrer une note ou son pseudo d'origine ou mettre * pour aucun :" UA= $+ $$?="Entrer un UA ou son regex ou * pour aucun :"
  ..Supprimer une blackliste par numro:/Sysop ADMIN BLACKLISTV2 DEL $$?="Numro de la ligne  effacer :"
 ..-
  ..Voir la liste et les numros:/Sysop ADMIN BLACKLISTV2 LIST
.-
  .DROPGROUPACCOUNT (Supprimer groupe complet NickServ)
  ..Supprimer un pseudo et ses aliases:/fermercompte $$?="Entrer le pseudo (sans se tromper) :"
  ;/Sysop NETADMIN DROPGROUPACCOUNT $$?="Entrer le pseudo (sans se tromper) :"
  .-
  .Aide:/Sysop HELP
}
;fin


