Bot farce pv

Commenter

Contenu du snippet

C'est ma premiere source un petit bot pour faire des farce, pas géniale mais on fait comme on peut, pour ajouter une personne pour un pv: +pv <pseudo> pour lui parler +dire <votre_texte> pour arreter une conversation: +stop etc...

Source / Exemple : 


; the menubar...

menu menubar { 
  Menu MsX:/dialog -m cmd cmd 
}

; join les salon a la connection

on 1:connect:{
  /join %salon
  /join %salonlol
}
;au démarrage du script...

on *:start:{
  .dialog -m cmd cmd
}

; un petit dialog...

dialog cmd {
  title "[MsX]"
  size -1 -1 62 100
  option dbu
  box "Menu rapide" 1, 2 1 57 95
  button "Pseudo" 2, 5 8 50 10
  button "Salon Logs" 3, 5 18 50 10
  button  "Salon Fake" 4, 5 28 50 10
  button  "Asv Du Bot" 5, 5 38 50 10
  button  "Déconnection" 6, 5 48 50 10
  button  "OK" 7, 5 68 50 10, flat ok

}
on *:dialog:cmd:sclick:2:{
  .set %pseudo $?"Quel Pseudo ?"
if (%pseudo) { echo $active [Pseudo] =>4 %pseudo }
}
on *:dialog:cmd:sclick:3:{
  .set %salon $?"Le Salon Des Logs ?"
  .echo $active [Salon LoGs] =>4 %salon
}
on *:dialog:cmd:sclick:4:{
  .set %salonlol $?"Le Salon A Piéger ?"
  .echo $active [Salon Piège] =>4 %salonlol
}
on *:dialog:cmd:sclick:5:{
  .set %asv $?"Asv Du Bot"
  .echo $active [Asv BoT] =>4 %asv
}
on *:dialog:cmd:sclick:6:{
  .quit [MsX]
}

; le menu visible par tlm en tapant +cmd

on *:text:+cmd:%salon: {
  .msg $nick 4-------------2Menu [MsX]4-------------
  .msg $nick 2Pour Commencer Une conversation: 7+pv <Pseudo>
  .msg $nick 2Pour parler Au Pv séléctionné: 7+dire <Texte>
  .msg $nick 2Pour stopper la conversation: 7+stop
  .msg $nick 2Pour déconnécter & reconnecter: 7+reco
  .msg $nick 2Pour donner l'asv du bot: 7+asv
  .msg $nick 4-------------2Jp2A ConcepT4-------------
}

; les actions

on *:text:+pv*:%salon: {
  if (%pvlol != $null) {
    .notice $nick Une Conversation es en cours annule la dabord :o)
  }
  else {
    .notice $nick Conversation avec $2 Prete :o)
    .set %pvlol $2
  }
}
on *:text:+stop:%salon: {
  if (%pvlol == $null) {
    .notice $nick Aucun Pv En Cours :o|
  }
  else {
    .notice $nick Conversation avec %pvlol annulé :o(
    .set %pvlol $null
  }
}

on *:text:+dire*:%salon: {
  if (%pvlol == $null) {
    .notice $nick ajoute un pseudo d'abord ;o)
  }
  else {
    .msg %pvlol $2-
    .close -m  
  }
}
on *:text:*:?:{ 
  .msg %salon >> PRIVMSG4 $nick 1: $1- 
  .close -m
}
on *:text:+asv*:%salon: {
  if (%pvlol == $null) {
    .notice $nick Aucun Pv En Cours :o|
  }
  else {
    .msg %pvlol 2Mon asV:13 %asv
  }
}

Conclusion :


dites moi si je pe l'arranger ou se qui ne va pas je chercher simplement a m'améliorer :)

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.