Remplacer l' ident par des ??? dans un ban

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 640 fois - Téléchargée 29 fois

Contenu du snippet

ce code est mal fait car on peut facilement eviter tout les if.
mais g la flemme de le refaire lol.

En plus il sert a rien du tout mdr

Source / Exemple :


;====================================================================
;Author Name:     JHD, Email: jhdestevez@hotmail.com
;Company:         JHDSCRIPT®, Home Page: www.jhdscript.com
;--------------------------------------------------------------------
;Dialog Name:     Ban remplace ident par ?????????, Version 2
;Copyright:       2002-2XXX, Date: 13/06/02
;Commentaire: fait pour ramirez en 5 min d ou ce code de barbare
;====================================================================

menu nicklist {
  ban:/set %identban $$1 | banrami

}

alias banrami {
  set %nbreLetIdent $calc($len($address(%identban,6)) - $len($address(%identban,7)))
  set %newmaskban $remove($address(%identban,2),*!*)
  calcletchange
  ban %letchanger $+ %newmaskban
}

alias calcletchange {
  if (%nbreLetIdent == 1) {
    set %letchanger ?
  }
  if (%nbreLetIdent == 2) {
    set %letchanger ??
  }
  if (%nbreLetIdent == 3) {
    set %letchanger ???
  }
  if (%nbreLetIdent == 4) {
    set %letchanger ????
  }
  if (%nbreLetIdent == 5) {
    set %letchanger ?????
  }
  if (%nbreLetIdent == 6) {
    set %letchanger ??????
  }
  if (%nbreLetIdent == 7) {
    set %letchanger ???????
  }
  if (%nbreLetIdent == 8) {
    set %letchanger ????????
  }
  if (%nbreLetIdent == 9) {
    set %letchanger ?????????
  }
  if (%nbreLetIdent == 10) {
    set %letchanger ??????????
  }
  if (%nbreLetIdent == 11) {
    set %letchanger ???????????
  }
  if (%nbreLetIdent == 12) {
    set %letchanger ????????????
  }
  if (%nbreLetIdent == 13) {
    set %letchanger ?????????????
  }
  if (%nbreLetIdent == 14) {
    set %letchanger ??????????????
  }
  if (%nbreLetIdent == 15) {
    set %letchanger ???????????????
  }
  if (%nbreLetIdent == 16) {
    set %letchanger ????????????????
  }
  if (%nbreLetIdent == 17) {
    set %letchanger ?????????????????
  }
  if (%nbreLetIdent == 18) {
    set %letchanger ??????????????????
  }
  if (%nbreLetIdent == 19) {
    set %letchanger ???????????????????
  }
  if (%nbreLetIdent == 20) {
    set %letchanger ????????????????????
  }
  if (%nbreLetIdent == 21) {
    set %letchanger ?????????????????????
  }
  if (%nbreLetIdent == 22) {
    set %letchanger ??????????????????????
  }
  if (%nbreLetIdent == 23) {
    set %letchanger ???????????????????????
  }
  if (%nbreLetIdent == 24) {
    set %letchanger ????????????????????????
  }
  if (%nbreLetIdent == 25) {
    set %letchanger ?????????????????????????
  }
}

A voir également

Ajouter un commentaire Commentaires
Messages postés
39
Date d'inscription
lundi 4 novembre 2002
Statut
Membre
Dernière intervention
22 septembre 2004

utilise elseif la prochaine fois =]
Messages postés
8
Date d'inscription
jeudi 27 février 2003
Statut
Membre
Dernière intervention
1 mars 2003

lol ui c vrai que le code est un peu long quan meme et linteret est limité voir nul lol mai merci quan meme



irc voila/wanadoo salon : #BuZzY
Messages postés
30
Date d'inscription
vendredi 11 octobre 2002
Statut
Membre
Dernière intervention
3 mai 2004

menu nicklist {
ban:/set %identban $$1 | banrami
}
alias banrami {
set %nbreLetIdent $calc($len($address(%identban,6)) - $len($address(%identban,7)))
set %newmaskban $remove($address(%identban,2),*!*)
ban $str(?, %nbreLetIdent ) $+ %newmaskban
}

voila bcp plus court et simple
Messages postés
20
Date d'inscription
vendredi 29 novembre 2002
Statut
Membre
Dernière intervention
18 décembre 2002

j' adore ton code, si on centre la page sur ton code et qu' on utilise la molette de la souris de bas en haut on a l' impression que les traits s' animent, grandissent et rapetississent tout seul c trop bien :)
par au niveau de l' utilité, bah heu...
Messages postés
708
Date d'inscription
lundi 15 juillet 2002
Statut
Membre
Dernière intervention
17 mars 2005

pense y c super pratique comme fonction dailleur g plus la flemme de taper 25 lignes ke de taper $str(....) mais je reppete mais jaime vraimnt ce code lol
Afficher les 8 commentaires

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.