1. Accueil
  2. Tous les snippets
  3. Snippets IRC
  4. Fonction $replace (ecriture lamer)

Fonction $replace (ecriture lamer)

1/5 (11 avis)

Snippet vu 6 922 fois - Téléchargée 27 fois

Commenter

Contenu du snippet

Ce code vous permettre d'ecrire en lamer et vous apprend la fonction $replace (tres simple)

Source / Exemple : 


;Section aliase
/lamer {
  set %btext %s1
  %btext = $replace( %btext ,a,å)
  %btext = $replace( %btext ,b,ß)
  %btext = $replace( %btext ,C,©)
  %btext = $replace( %btext ,d,Ð)
  %btext = $replace( %btext ,e,£)
  %btext = $replace( %btext ,f,f)
  %btext = $replace( %btext ,g,g)
  %btext = $replace( %btext ,h,H)
  %btext = $replace( %btext ,i,ï)
  %btext = $replace( %btext ,j,j)
  %btext = $replace( %btext ,k,K)
  %btext = $replace( %btext ,l,L)
  %btext = $replace( %btext ,m,M)
  %btext = $replace( %btext ,n,ñ)
  %btext = $replace( %btext ,o,ø)
  %btext = $replace( %btext ,p,þ)
  %btext = $replace( %btext ,q,Q)
  %btext = $replace( %btext ,r,®)
  %btext = $replace( %btext ,s,$)
  %btext = $replace( %btext ,t,T)
  %btext = $replace( %btext ,u,µ)
  %btext = $replace( %btext ,v,V)
  %btext = $replace( %btext ,w,W)
  %btext = $replace( %btext ,x,×)
  %btext = $replace( %btext ,y,¥)
  %btext = $replace( %btext ,z,z)
  %btext = $replace( %btext ,?,¿)
  %btext = $replace( %btext ,!,¡)
  %btext = $replace( %btext ,ks,%ks)
  say %btext
  unset %btext
}

;Remote
on *:INPUT:#:{
      If ($left($1,1) = !) { msg $chan $1- | halt }
      Else { set %s1 $1- | lamer | halt }
}

Conclusion :


Bonne programmation !

A voir également

Ajouter un commentaire Commentaires
juki_webmaster
Messages postés
947
Date d'inscription
mercredi 19 novembre 2003
Statut
Membre
Dernière intervention
5 avril 2008
 3
27 mars 2004 à 22:59
A oué pas mal !
Sans trop enfenser Youl je prefere la version de WinWarrior.
winwarrior
Messages postés
654
Date d'inscription
jeudi 3 avril 2003
Statut
Membre
Dernière intervention
10 février 2009
 1
15 mars 2004 à 22:44
J'allai oublier, por désactiver/activer le script:
menu channel {
Ecriture lamer
.$iif(!%elamer,Activer):set %elamer 1
.$iif(%elamer,Désactiver):unset %elamer
}
on *:INPUT:#:{
if ($left($1,1) = /) / $+ $1-
elseif (%elamer) {
msg # $replace($1-,a,å,b,ß,c,©,d,Ð,e,£,h,H,i,ï,k,K,l,L,m,M,n,ñ,o,ø,p,þ,q,Q,r,®,s,$,t,T,u,µ,v,V,w,W,x,×,y,¥,?,¿,!,¡)
halt
}
}
winwarrior
Messages postés
654
Date d'inscription
jeudi 3 avril 2003
Statut
Membre
Dernière intervention
10 février 2009
 1
15 mars 2004 à 22:37
Version courte et améliorée:

on *:INPUT:#:{
if ($left($1,1) = /) / $+ $1-
else { msg # $replace($1-,a,å,b,ß,c,©,d,Ð,e,£,h,H,i,ï,k,K,l,L,m,M,n,ñ,o,ø,p,þ,q,Q,r,®,s,$,t,T,u,µ,v,V,w,W,x,×,y,¥,?,¿,!,¡) | halt }
}
NitriX
Messages postés
21
Date d'inscription
mercredi 12 mars 2003
Statut
Membre
Dernière intervention
9 avril 2003
2 avril 2003 à 13:06
hum...c'est bien mais seulement tou foire quand j'ecrit avec des couleur (sa ecrit double).
zuckyz
Messages postés
3
Date d'inscription
lundi 4 novembre 2002
Statut
Membre
Dernière intervention
4 novembre 2002
4 nov. 2002 à 20:44
Trop de variable pour rien bordel !
Afficher les 11 commentaires
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 (youl46)