Nicks aleatoire

Commenter

Contenu du snippet

Mon premier script, soyez indulgent.
sans pretentions, juste un exercice de randomiser des tokens.
pas vraiment d'interet.
___________________________________________________________
a mettre dans remote, pour le faire fonctionner : click droit dans la nicklist
vous choississez dans le dialog le nick qui vous plait.

Source / Exemple : 


dialog aleanick {
  title "Nicks Aléatoire"
  size -1 -1 104 225
  option pixels notheme
  list 1, 3 34 100 154
  text "Double clicker pour choisir le nick", 2, 6 2 92 30, center
  button "Renouveler", 3, 4 185 97 33
}
on *:dialog:aleanick:init:0:{
  aleanick
}
alias -l aleanick {
  var %v = a,A,e,E,i,I,o,O,u,U,y,Y 
  var %c = b,B,c,C,d,D,f,F,g,G,h,H,j,J,k,K,l,L,m,M,n,N,p,P,q,Q,r,R,s,S,t,T,v,V,w,W,x,X,z,Z 
  var %z = 1
  while (%z <= 10) {
    var %rdnick
    var %n = $rand(4,9) 
    var %i = 1
    while (%i <= %n) { 
      if ($isbit(%i,1) == 1) { 
        var %rdnick = $+(%rdnick,$gettok(%c,$rand(1,40),44)) 
        var %n1 $rand(1,9) 
        if (%n1 == %i) { 
          var %rdnick = $+(%rdnick,$gettok(%c,$rand(1,40),44)) 
        } 
      } 
      if ($isbit(%i,1) == 0) { 
        var %rdnick = $+(%rdnick,$gettok(%v,$rand(1,12),44)) 
        var %n2 $rand(1,9) 
        if (%n2 == %i) { 
          var %rdnick = $+(%rdnick,$gettok(%v,$rand(1,12),44)) 
        } 
      } 
      inc %i 
    } 
    did -a  $dname 1 %rdnick
    inc %z
  }
}
on *:dialog:aleanick:dclick:1:{
  nick $did(aleanick,1,$did(aleanick,1).sel)
}
on *:dialog:aleanick:sclick:3:{
  var %g = 1
  while (%g <= 10) {
    did -d  $dname 1 1
    inc %g  
  }
  aleanick
}
menu channel,nicklist {
  Nick Aléatoire:dialog -m aleanick aleanick
}

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 (ennery)