Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

NICKS ALEATOIRE


Information sur la source

Description

Cliquez pour voir la capture en taille normale
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

  • 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
  • }
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
}

Commentaires et avis

signaler à un administrateur
Commentaire de Kolibot le 16/11/2003 10:56:57

Pour un premier script, tu maîtrises dèjà qqs petits trucs symâ tel que  les dialogs et les variables, c'est bien. Bonne Continuation

signaler à un administrateur
Commentaire de vesparo le 16/11/2003 12:06:37

klr ke c pas mal pr un premier script c cours, fun et puis voila c'est cool !

@+

signaler à un administrateur
Commentaire de abdoulax le 16/11/2003 12:33:54

:-) ...

signaler à un administrateur
Commentaire de Eiffel le 16/11/2003 19:13:52

Mignon .. ;p

signaler à un administrateur
Commentaire de SornDrixer le 17/11/2003 17:47:25 administrateur CS

Pas vraiment utile, mais très bonne source pour un début !
bonne continuation

signaler à un administrateur
Commentaire de SnJaS le 11/09/2005 21:08:30

c'est pas mal quand même :)
Continue comme ça c'est tout ce que je te souaite

Ajouter un commentaire



Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Comparez les prix Nouvelle version

Photothèque Nouveau !



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,312 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.