Le voici ENFIN ! Cet utilitaire révolutionnaire, incroyable, le Notice Messenger ! Avec le Notice Messenger vous pourrez vous envoyer des messages, gérer votre liste de messages et votre liste de contacts. Vous pourrez vérifier si un contact est connecté et avec son Notice Messenger juste en cliauqnt sur un bouton, biper le contact, l'inviter etc... Vous pourrez également bloquer un contact de manière qu'il ne puisse plus vous envoyer de messages, vous biper ou vérifier si vous êtes connecté. Avec sa simplicité d'utilisation, son sender très réussi, sa liste de bannis, le Notice Messenger devient l'outil de communication que toute personne qui de respecte devrait avoir.
Maintenant, pour vous laisser profiter de la merveille, je vais vous expliquer comment le configurer pour qu'il fonctionne. Ne vous inquitétez pas, c'est tres facile. Une fois le code chargé dans mIRC, tapez /noticemessenger et il s'ouvre. Allez dans options > configuration, et définissez votre fichier de stockage des messages et le son que vous voulez entendre si l'on vous bipe. Une fois ces paramàtres définis, c'est parti ! Vous êtes pret à recevoir des messages des autres utilisateurs du Notice Messenger et d'envoyer, etc... Profiter pleinement de ce magnifique outil quoi :)
Parlez-en à vos amis, vos proches pour qu'il y ait de plus en plus de monde à avoir ce logiciel.
Source / Exemple :
alias noticemessenger {
/dialog -md noticemessenger noticemessenger
}
dialog noticemessenger {
title "Notice messenger"
size 310 235 279 285
option dbu
menu "Fichier", 1
item "Effacer tous les messages", 4, 1
item "Liste de contacts", 5, 1
item "Liste des bannis", 6, 1
item "Rédiger messages", 15, 1
item "Quitter", 20, 1
menu "Options", 18
item "Configuration", 19, 18
box "", 10, 0 190 279 75
list 7, 1 0 276 186, hsbar vsbar size
text "Je désire...", 8, 3 195 28 6
button "Effacer le message selectionné", 9, 1 204 276 9
button "Effacer tous les messages", 11, 1 213 276 9
button "Voir ma liste des bannis", 12, 1 222 276 9
button "Voir ma liste de contacts", 13, 1 231 276 9
button "Quitter Notice Messenger", 14, 1 249 276 9, cancel
text "Créé par G-FACTION", 3, 63 267 52 6
link "inutile@yahoo.fr", 16, 174 267 90 13
text ":)", 17, 139 267 9 6
button "Rédiger messages", 21, 1 240 276 9
}
alias actualiser {
did -a noticemessenger 7 $read(%liste,1)
did -a noticemessenger 7 $read(%liste,2)
did -a noticemessenger 7 $read(%liste,3)
did -a noticemessenger 7 $read(%liste,4)
did -a noticemessenger 7 $read(%liste,5)
did -a noticemessenger 7 $read(%liste,6)
did -a noticemessenger 7 $read(%liste,7)
did -a noticemessenger 7 $read(%liste,8)
did -a noticemessenger 7 $read(%liste,9)
did -a noticemessenger 7 $read(%liste,10)
did -a noticemessenger 7 $read(%liste,11)
did -a noticemessenger 7 $read(%liste,12)
did -a noticemessenger 7 $read(%liste,13)
did -a noticemessenger 7 $read(%liste,14)
did -a noticemessenger 7 $read(%liste,15)
did -a noticemessenger 7 $read(%liste,16)
did -a noticemessenger 7 $read(%liste,17)
did -a noticemessenger 7 $read(%liste,18)
did -a noticemessenger 7 $read(%liste,19)
did -a noticemessenger 7 $read(%liste,20)
did -a noticemessenger 7 $read(%liste,21)
did -a noticemessenger 7 $read(%liste,22)
did -a noticemessenger 7 $read(%liste,23)
did -a noticemessenger 7 $read(%liste,24)
did -a noticemessenger 7 $read(%liste,25)
did -a noticemessenger 7 $read(%liste,26)
did -a noticemessenger 7 $read(%liste,27)
did -a noticemessenger 7 $read(%liste,28)
did -a noticemessenger 7 $read(%liste,29)
did -a noticemessenger 7 $read(%liste,30)
did -a noticemessenger 7 $read(%liste,31)
did -a noticemessenger 7 $read(%liste,32)
did -a noticemessenger 7 $read(%liste,33)
did -a noticemessenger 7 $read(%liste,34)
did -a noticemessenger 7 $read(%liste,35)
did -a noticemessenger 7 $read(%liste,36)
did -a noticemessenger 7 $read(%liste,37)
did -a noticemessenger 7 $read(%liste,38)
did -a noticemessenger 7 $read(%liste,39)
did -a noticemessenger 7 $read(%liste,40)
did -a noticemessenger 7 $read(%liste,41)
did -a noticemessenger 7 $read(%liste,42)
did -a noticemessenger 7 $read(%liste,43)
did -a noticemessenger 7 $read(%liste,44)
did -a noticemessenger 7 $read(%liste,45)
did -a noticemessenger 7 $read(%liste,46)
did -a noticemessenger 7 $read(%liste,47)
did -a noticemessenger 7 $read(%liste,48)
did -a noticemessenger 7 $read(%liste,49)
did -a noticemessenger 7 $read(%liste,50)
did -a noticemessenger 7 $read(%liste,51)
did -a noticemessenger 7 $read(%liste,52)
did -a noticemessenger 7 $read(%liste,53)
did -a noticemessenger 7 $read(%liste,54)
did -a noticemessenger 7 $read(%liste,55)
did -a noticemessenger 7 $read(%liste,56)
did -a noticemessenger 7 $read(%liste,57)
did -a noticemessenger 7 $read(%liste,58)
did -a noticemessenger 7 $read(%liste,59)
did -a noticemessenger 7 $read(%liste,60)
did -a noticemessenger 7 $read(%liste,61)
did -a noticemessenger 7 $read(%liste,62)
did -a noticemessenger 7 $read(%liste,63)
did -a noticemessenger 7 $read(%liste,64)
did -a noticemessenger 7 $read(%liste,65)
did -a noticemessenger 7 $read(%liste,66)
did -a noticemessenger 7 $read(%liste,67)
did -a noticemessenger 7 $read(%liste,68)
did -a noticemessenger 7 $read(%liste,69)
did -a noticemessenger 7 $read(%liste,70)
did -a noticemessenger 7 $read(%liste,71)
did -a noticemessenger 7 $read(%liste,72)
did -a noticemessenger 7 $read(%liste,73)
did -a noticemessenger 7 $read(%liste,74)
did -a noticemessenger 7 $read(%liste,75)
did -a noticemessenger 7 $read(%liste,76)
did -a noticemessenger 7 $read(%liste,77)
did -a noticemessenger 7 $read(%liste,78)
did -a noticemessenger 7 $read(%liste,79)
did -a noticemessenger 7 $read(%liste,80)
did -a noticemessenger 7 $read(%liste,81)
did -a noticemessenger 7 $read(%liste,82)
did -a noticemessenger 7 $read(%liste,83)
did -a noticemessenger 7 $read(%liste,84)
did -a noticemessenger 7 $read(%liste,85)
did -a noticemessenger 7 $read(%liste,86)
did -a noticemessenger 7 $read(%liste,87)
did -a noticemessenger 7 $read(%liste,88)
did -a noticemessenger 7 $read(%liste,89)
did -a noticemessenger 7 $read(%liste,90)
did -a noticemessenger 7 $read(%liste,91)
did -a noticemessenger 7 $read(%liste,92)
did -a noticemessenger 7 $read(%liste,93)
did -a noticemessenger 7 $read(%liste,94)
did -a noticemessenger 7 $read(%liste,95)
did -a noticemessenger 7 $read(%liste,96)
did -a noticemessenger 7 $read(%liste,97)
did -a noticemessenger 7 $read(%liste,98)
did -a noticemessenger 7 $read(%liste,99)
did -a noticemessenger 7 $read(%liste,100)
}
alias bannedlist {
//echo $dialog(noticemsgrbanned,noticemsgrbanned,-4)
}
alias contactlist {
//echo $dialog(noticemsgrcontacts,noticemsgrcontacts,-4)
}
alias msgrconfig {
//echo $dialog(noticemsgrconfig,noticemsgrconfig,-4)
}
alias redigmsg {
//echo $dialog(noticemsgrredig,noticemsgrredig,-4)
}
on *:dialog:noticemessenger:init:0:{
did -a noticemessenger 7 $read(%liste,1)
did -a noticemessenger 7 $read(%liste,2)
did -a noticemessenger 7 $read(%liste,3)
did -a noticemessenger 7 $read(%liste,4)
did -a noticemessenger 7 $read(%liste,5)
did -a noticemessenger 7 $read(%liste,6)
did -a noticemessenger 7 $read(%liste,7)
did -a noticemessenger 7 $read(%liste,8)
did -a noticemessenger 7 $read(%liste,9)
did -a noticemessenger 7 $read(%liste,10)
did -a noticemessenger 7 $read(%liste,11)
did -a noticemessenger 7 $read(%liste,12)
did -a noticemessenger 7 $read(%liste,13)
did -a noticemessenger 7 $read(%liste,14)
did -a noticemessenger 7 $read(%liste,15)
did -a noticemessenger 7 $read(%liste,16)
did -a noticemessenger 7 $read(%liste,17)
did -a noticemessenger 7 $read(%liste,18)
did -a noticemessenger 7 $read(%liste,19)
did -a noticemessenger 7 $read(%liste,20)
did -a noticemessenger 7 $read(%liste,21)
did -a noticemessenger 7 $read(%liste,22)
did -a noticemessenger 7 $read(%liste,23)
did -a noticemessenger 7 $read(%liste,24)
did -a noticemessenger 7 $read(%liste,25)
did -a noticemessenger 7 $read(%liste,26)
did -a noticemessenger 7 $read(%liste,27)
did -a noticemessenger 7 $read(%liste,28)
did -a noticemessenger 7 $read(%liste,29)
did -a noticemessenger 7 $read(%liste,30)
did -a noticemessenger 7 $read(%liste,31)
did -a noticemessenger 7 $read(%liste,32)
did -a noticemessenger 7 $read(%liste,33)
did -a noticemessenger 7 $read(%liste,34)
did -a noticemessenger 7 $read(%liste,35)
did -a noticemessenger 7 $read(%liste,36)
did -a noticemessenger 7 $read(%liste,37)
did -a noticemessenger 7 $read(%liste,38)
did -a noticemessenger 7 $read(%liste,39)
did -a noticemessenger 7 $read(%liste,40)
did -a noticemessenger 7 $read(%liste,41)
did -a noticemessenger 7 $read(%liste,42)
did -a noticemessenger 7 $read(%liste,43)
did -a noticemessenger 7 $read(%liste,44)
did -a noticemessenger 7 $read(%liste,45)
did -a noticemessenger 7 $read(%liste,46)
did -a noticemessenger 7 $read(%liste,47)
did -a noticemessenger 7 $read(%liste,48)
did -a noticemessenger 7 $read(%liste,49)
did -a noticemessenger 7 $read(%liste,50)
did -a noticemessenger 7 $read(%liste,51)
did -a noticemessenger 7 $read(%liste,52)
did -a noticemessenger 7 $read(%liste,53)
did -a noticemessenger 7 $read(%liste,54)
did -a noticemessenger 7 $read(%liste,55)
did -a noticemessenger 7 $read(%liste,56)
did -a noticemessenger 7 $read(%liste,57)
did -a noticemessenger 7 $read(%liste,58)
did -a noticemessenger 7 $read(%liste,59)
did -a noticemessenger 7 $read(%liste,60)
did -a noticemessenger 7 $read(%liste,61)
did -a noticemessenger 7 $read(%liste,62)
did -a noticemessenger 7 $read(%liste,63)
did -a noticemessenger 7 $read(%liste,64)
did -a noticemessenger 7 $read(%liste,65)
did -a noticemessenger 7 $read(%liste,66)
did -a noticemessenger 7 $read(%liste,67)
did -a noticemessenger 7 $read(%liste,68)
did -a noticemessenger 7 $read(%liste,69)
did -a noticemessenger 7 $read(%liste,70)
did -a noticemessenger 7 $read(%liste,71)
did -a noticemessenger 7 $read(%liste,72)
did -a noticemessenger 7 $read(%liste,73)
did -a noticemessenger 7 $read(%liste,74)
did -a noticemessenger 7 $read(%liste,75)
did -a noticemessenger 7 $read(%liste,76)
did -a noticemessenger 7 $read(%liste,77)
did -a noticemessenger 7 $read(%liste,78)
did -a noticemessenger 7 $read(%liste,79)
did -a noticemessenger 7 $read(%liste,80)
did -a noticemessenger 7 $read(%liste,81)
did -a noticemessenger 7 $read(%liste,82)
did -a noticemessenger 7 $read(%liste,83)
did -a noticemessenger 7 $read(%liste,84)
did -a noticemessenger 7 $read(%liste,85)
did -a noticemessenger 7 $read(%liste,86)
did -a noticemessenger 7 $read(%liste,87)
did -a noticemessenger 7 $read(%liste,88)
did -a noticemessenger 7 $read(%liste,89)
did -a noticemessenger 7 $read(%liste,90)
did -a noticemessenger 7 $read(%liste,91)
did -a noticemessenger 7 $read(%liste,92)
did -a noticemessenger 7 $read(%liste,93)
did -a noticemessenger 7 $read(%liste,94)
did -a noticemessenger 7 $read(%liste,95)
did -a noticemessenger 7 $read(%liste,96)
did -a noticemessenger 7 $read(%liste,97)
did -a noticemessenger 7 $read(%liste,98)
did -a noticemessenger 7 $read(%liste,99)
did -a noticemessenger 7 $read(%liste,100)
did -z noticemessenger 7
/did -a noticemessenger 7 $read(%liste)
}
on *:dialog:noticemessenger:menu:4: {
/remove %liste
/did -a noticemessenger 7 $read(%liste)
/did -r noticemessenger 7
/actualiser
}
on *:dialog:noticemessenger:menu:5: { /contactlist }
on *:dialog:noticemessenger:menu:6: { /bannedlist }
on *:dialog:noticemessenger:menu:15: { /redigmsg }
on *:dialog:noticemessenger:menu:19: { /msgrconfig }
on *:dialog:noticemessenger:sclick:9: {
write $+(-dl,$did(noticemessenger,7).sel) %liste
did -di noticemessenger 7 $did(noticemessenger,7).sel
}
on *:dialog:noticemessenger:sclick:11: {
/remove %liste
/did -a noticemessenger 7 $read(%liste)
/did -r noticemessenger 7
/actualiser
}
on *:dialog:noticemessenger:sclick:12: { /bannedlist }
on *:dialog:noticemessenger:sclick:13: { /contactlist }
on *:dialog:noticemessenger:sclick:21: { /redigmsg }
dialog noticemsgrbanned {
title "Notice Messenger : Liste des bannis"
size 177 106 292 80
option dbu
text "Liste des bannis (personnes que ne pourront pas vous envoyer de messages)", 1, 4 3 186 7
edit "", 2, 4 13 283 40, multi read return vsbar
button "OK", 3, 121 58 37 11, cancel
button "Ajouter", 4, 33 58 49 11
button "Supprimer", 5, 196 58 49 11
text "Par G-FACTION", 6, 27 72 42 6
text ":)", 7, 130 72 16 6
link "inutile@yahoo.fr", 8, 186 72 96 13
}
on *:dialog:noticemsgrbanned:init:0:{
/did -a noticemsgrbanned 2 %bannis
}
on *:dialog:noticemsgrbanned:sclick:4: {
set %bannis $addtok(%bannis,$$?="Qui rajouter ?",32)
/did -r noticemsgrbanned 2
/did -a noticemsgrbanned 2 %bannis
}
on *:dialog:noticemsgrbanned:sclick:5: {
set %bantemp $$?="Qui supprimer ?"
if ($istok(%bannis,%bantemp,32)) {
set %bannis $deltok(%bannis,$findtok(%bannis,%bantemp,1,32),32)
/did -r noticemsgrbanned 2
/did -a noticemsgrbanned 2 %bannis
}
else $input(%bantemp n'est pas dans la liste des bannis,308,Warning)
halt
}
dialog noticemsgrconfig {
title "Notice Messenger : Configuration"
size 438 317 194 78
option dbu
text "Définissez le fichier de stockage des messages", 1, 7 4 115 6
text "Définissez votre son de Bip", 2, 9 39 69 6
edit "", 3, 9 19 178 10, multi return
edit "", 4, 9 54 178 10, multi return
button "...", 5, 132 4 13 11
button "...", 6, 132 39 13 11
button "OK", 7, 78 66 37 11, ok
}
on *:dialog:noticemsgrconfig:init:0:{
if (%liste == $null) {
set %first on
/did -a noticemsgrconfig 3 Définir...
/did -a noticemsgrconfig 4 Définir...
}
else /did -a noticemsgrconfig 3 %liste
/did -a noticemsgrconfig 4 %son
}
on *:dialog:noticemsgrconfig:sclick:5: {
/did -r noticemsgrconfig 3
set %liste $sfile(dir,Choisissez votre fichier de stockage des messages,OK)
/did -a noticemsgrconfig 3 %liste
}
on *:dialog:noticemsgrconfig:sclick:6: {
/did -r noticemsgrconfig 4
set %son $sfile(dir,Choisissez votre fichier sonore de Bip,OK)
/did -a noticemsgrconfig 4 %son
}
dialog noticemsgrcontacts {
title "Notice Messenger : Liste de contacts"
size 177 106 281 176
option dbu
list 1, 115 3 165 150, vsbar size
box "Connecté ?", 2, 1 0 112 43
button "Vérifier", 3, 9 10 99 11
box "Je désire...", 4, 1 41 112 57
button "Biper cette personne", 5, 9 49 99 11
button "Inviter cette personne", 6, 9 67 99 11
button "Bloquer cette personne", 7, 9 84 99 11
box "", 8, 1 97 112 55
button "Ajouter un contact", 9, 9 112 99 11
button "Supprimer un contact", 10, 9 132 99 12
text "Statut :", 11, 9 28 19 6
text "", 12, 31 28 75 6
button "Fermer", 13, 120 156 37 11, cancel
text "Par G-FACTION", 14, 24 168 42 6
text ":)", 15, 132 169 13 6
link "inutile@yahoo.fr", 16, 199 168 90 13
}
alias actualisercontacts {
did -a noticemsgrcontacts 1 $read(contacts.txt,1)
did -a noticemsgrcontacts 1 $read(contacts.txt,2)
did -a noticemsgrcontacts 1 $read(contacts.txt,3)
did -a noticemsgrcontacts 1 $read(contacts.txt,4)
did -a noticemsgrcontacts 1 $read(contacts.txt,5)
did -a noticemsgrcontacts 1 $read(contacts.txt,6)
did -a noticemsgrcontacts 1 $read(contacts.txt,7)
did -a noticemsgrcontacts 1 $read(contacts.txt,8)
did -a noticemsgrcontacts 1 $read(contacts.txt,9)
did -a noticemsgrcontacts 1 $read(contacts.txt,10)
did -a noticemsgrcontacts 1 $read(contacts.txt,11)
did -a noticemsgrcontacts 1 $read(contacts.txt,12)
did -a noticemsgrcontacts 1 $read(contacts.txt,13)
did -a noticemsgrcontacts 1 $read(contacts.txt,14)
did -a noticemsgrcontacts 1 $read(contacts.txt,15)
did -a noticemsgrcontacts 1 $read(contacts.txt,16)
did -a noticemsgrcontacts 1 $read(contacts.txt,17)
did -a noticemsgrcontacts 1 $read(contacts.txt,18)
did -a noticemsgrcontacts 1 $read(contacts.txt,19)
did -a noticemsgrcontacts 1 $read(contacts.txt,20)
did -a noticemsgrcontacts 1 $read(contacts.txt,21)
did -a noticemsgrcontacts 1 $read(contacts.txt,22)
did -a noticemsgrcontacts 1 $read(contacts.txt,23)
did -a noticemsgrcontacts 1 $read(contacts.txt,24)
did -a noticemsgrcontacts 1 $read(contacts.txt,25)
did -a noticemsgrcontacts 1 $read(contacts.txt,26)
did -a noticemsgrcontacts 1 $read(contacts.txt,27)
did -a noticemsgrcontacts 1 $read(contacts.txt,28)
did -a noticemsgrcontacts 1 $read(contacts.txt,29)
did -a noticemsgrcontacts 1 $read(contacts.txt,30)
did -a noticemsgrcontacts 1 $read(contacts.txt,31)
did -a noticemsgrcontacts 1 $read(contacts.txt,32)
did -a noticemsgrcontacts 1 $read(contacts.txt,33)
did -a noticemsgrcontacts 1 $read(contacts.txt,34)
did -a noticemsgrcontacts 1 $read(contacts.txt,35)
did -a noticemsgrcontacts 1 $read(contacts.txt,36)
did -a noticemsgrcontacts 1 $read(contacts.txt,37)
did -a noticemsgrcontacts 1 $read(contacts.txt,38)
did -a noticemsgrcontacts 1 $read(contacts.txt,39)
did -a noticemsgrcontacts 1 $read(contacts.txt,40)
did -a noticemsgrcontacts 1 $read(contacts.txt,41)
did -a noticemsgrcontacts 1 $read(contacts.txt,42)
did -a noticemsgrcontacts 1 $read(contacts.txt,43)
did -a noticemsgrcontacts 1 $read(contacts.txt,44)
did -a noticemsgrcontacts 1 $read(contacts.txt,45)
did -a noticemsgrcontacts 1 $read(contacts.txt,46)
did -a noticemsgrcontacts 1 $read(contacts.txt,47)
did -a noticemsgrcontacts 1 $read(contacts.txt,48)
did -a noticemsgrcontacts 1 $read(contacts.txt,49)
did -a noticemsgrcontacts 1 $read(contacts.txt,50)
did -a noticemsgrcontacts 1 $read(contacts.txt,51)
did -a noticemsgrcontacts 1 $read(contacts.txt,52)
did -a noticemsgrcontacts 1 $read(contacts.txt,53)
did -a noticemsgrcontacts 1 $read(contacts.txt,54)
did -a noticemsgrcontacts 1 $read(contacts.txt,55)
did -a noticemsgrcontacts 1 $read(contacts.txt,56)
did -a noticemsgrcontacts 1 $read(contacts.txt,57)
did -a noticemsgrcontacts 1 $read(contacts.txt,58)
did -a noticemsgrcontacts 1 $read(contacts.txt,59)
did -a noticemsgrcontacts 1 $read(contacts.txt,60)
did -a noticemsgrcontacts 1 $read(contacts.txt,61)
did -a noticemsgrcontacts 1 $read(contacts.txt,62)
did -a noticemsgrcontacts 1 $read(contacts.txt,63)
did -a noticemsgrcontacts 1 $read(contacts.txt,64)
did -a noticemsgrcontacts 1 $read(contacts.txt,65)
did -a noticemsgrcontacts 1 $read(contacts.txt,66)
did -a noticemsgrcontacts 1 $read(contacts.txt,67)
did -a noticemsgrcontacts 1 $read(contacts.txt,68)
did -a noticemsgrcontacts 1 $read(contacts.txt,69)
did -a noticemsgrcontacts 1 $read(contacts.txt,70)
did -a noticemsgrcontacts 1 $read(contacts.txt,71)
did -a noticemsgrcontacts 1 $read(contacts.txt,72)
did -a noticemsgrcontacts 1 $read(contacts.txt,73)
did -a noticemsgrcontacts 1 $read(contacts.txt,74)
did -a noticemsgrcontacts 1 $read(contacts.txt,75)
did -a noticemsgrcontacts 1 $read(contacts.txt,76)
did -a noticemsgrcontacts 1 $read(contacts.txt,77)
did -a noticemsgrcontacts 1 $read(contacts.txt,78)
did -a noticemsgrcontacts 1 $read(contacts.txt,79)
did -a noticemsgrcontacts 1 $read(contacts.txt,80)
did -a noticemsgrcontacts 1 $read(contacts.txt,81)
did -a noticemsgrcontacts 1 $read(contacts.txt,82)
did -a noticemsgrcontacts 1 $read(contacts.txt,83)
did -a noticemsgrcontacts 1 $read(contacts.txt,84)
did -a noticemsgrcontacts 1 $read(contacts.txt,85)
did -a noticemsgrcontacts 1 $read(contacts.txt,86)
did -a noticemsgrcontacts 1 $read(contacts.txt,87)
did -a noticemsgrcontacts 1 $read(contacts.txt,88)
did -a noticemsgrcontacts 1 $read(contacts.txt,89)
did -a noticemsgrcontacts 1 $read(contacts.txt,90)
did -a noticemsgrcontacts 1 $read(contacts.txt,91)
did -a noticemsgrcontacts 1 $read(contacts.txt,92)
did -a noticemsgrcontacts 1 $read(contacts.txt,93)
did -a noticemsgrcontacts 1 $read(contacts.txt,94)
did -a noticemsgrcontacts 1 $read(contacts.txt,95)
did -a noticemsgrcontacts 1 $read(contacts.txt,96)
did -a noticemsgrcontacts 1 $read(contacts.txt,97)
did -a noticemsgrcontacts 1 $read(contacts.txt,98)
did -a noticemsgrcontacts 1 $read(contacts.txt,99)
did -a noticemsgrcontacts 1 $read(contacts.txt,100)
did -a noticemsgrcontacts 12 Je ne fais rien actuellement
}
on *:dialog:noticemsgrcontacts:init:0:{
did -z noticemsgrcontacts 1
/actualisercontacts
}
on *:dialog:noticemsgrcontacts:sclick:3: {
set %user $read(contacts.txt,$did(noticemsgrcontacts,1).sel)
/isconnected
}
on *:dialog:noticemsgrcontacts:sclick:5: {
/ctcp $read(contacts.txt,$did(noticemsgrcontacts,1).sel) [bip]
//echo $input($read(contacts.txt,$did(noticemsgrcontacts,1).sel) a été bipé si il est online et possède Notice Messenger,308,Warning)
}
on *:dialog:noticemsgrcontacts:sclick:6: {
set %user $read(contacts.txt,$did(noticemsgrcontacts,1).sel)
/invite %user $$?="Sur quel canal ? (ne pas oublier le #)"
//echo $input(%user a été invité si il est online et possède Notice Messenger,308,Warning)
}
on *:dialog:noticemsgrcontacts:sclick:7: {
set %bannis $addtok(%bannis,$read(contacts.txt,$did(noticemsgrcontacts,1).sel),32)
set %user $read(contacts.txt,$did(noticemsgrcontacts,1).sel
//echo $input(%user est désormais banni il ne pourra plus voir si vous êtes online et ne pourra plus vous envoyer de messages ni vous biper,308,Warning)
}
on *:dialog:noticemsgrcontacts:sclick:9: {
/write contacts.txt $$?="Qui ajouter ?"
/did -r noticemsgrcontacts 1
/actualisercontacts
}
on *:dialog:noticemsgrcontacts:sclick:10: {
write $+(-dl,$did(noticemsgrcontacts,1).sel) contacts.txt
did -di noticemsgrcontacts 1 $did(noticemsgrcontacts,1).sel
}
dialog noticemsgrredig {
title "Notice Messenger : Rédiger un message"
size 445 218 225 84
option dbu
edit "", 1, 4 16 216 12, limit 1000 multi return autohs
edit "", 2, 48 36 16 10, multi read return
text "Lettres inscrites :", 3, 4 40 40 6
text "/1000", 4, 68 40 16 6
text "Lettres restantes avant impossiblilité d'écrire :", 5, 92 40 108 6
edit "", 6, 204 36 16 10, multi read return
text "Message", 7, 4 4 24 6
combo 8, 36 56 100 44, drop edit size
text "Envoyer à", 9, 4 60 28 6
button "Envoyer", 10, 156 56 48 11
button "&Hide", 11, 0 0 0 0, hide Ok
}
alias actucontactsredig {
did -a noticemsgrredig 8 $read(contacts.txt,1)
did -a noticemsgrredig 8 $read(contacts.txt,2)
did -a noticemsgrredig 8 $read(contacts.txt,3)
did -a noticemsgrredig 8 $read(contacts.txt,4)
did -a noticemsgrredig 8 $read(contacts.txt,5)
did -a noticemsgrredig 8 $read(contacts.txt,6)
did -a noticemsgrredig 8 $read(contacts.txt,7)
did -a noticemsgrredig 8 $read(contacts.txt,8)
did -a noticemsgrredig 8 $read(contacts.txt,9)
did -a noticemsgrredig 8 $read(contacts.txt,10)
did -a noticemsgrredig 8 $read(contacts.txt,11)
did -a noticemsgrredig 8 $read(contacts.txt,12)
did -a noticemsgrredig 8 $read(contacts.txt,13)
did -a noticemsgrredig 8 $read(contacts.txt,14)
did -a noticemsgrredig 8 $read(contacts.txt,15)
did -a noticemsgrredig 8 $read(contacts.txt,16)
did -a noticemsgrredig 8 $read(contacts.txt,17)
did -a noticemsgrredig 8 $read(contacts.txt,18)
did -a noticemsgrredig 8 $read(contacts.txt,19)
did -a noticemsgrredig 8 $read(contacts.txt,20)
did -a noticemsgrredig 8 $read(contacts.txt,21)
did -a noticemsgrredig 8 $read(contacts.txt,22)
did -a noticemsgrredig 8 $read(contacts.txt,23)
did -a noticemsgrredig 8 $read(contacts.txt,24)
did -a noticemsgrredig 8 $read(contacts.txt,25)
did -a noticemsgrredig 8 $read(contacts.txt,26)
did -a noticemsgrredig 8 $read(contacts.txt,27)
did -a noticemsgrredig 8 $read(contacts.txt,28)
did -a noticemsgrredig 8 $read(contacts.txt,29)
did -a noticemsgrredig 8 $read(contacts.txt,30)
did -a noticemsgrredig 8 $read(contacts.txt,31)
did -a noticemsgrredig 8 $read(contacts.txt,32)
did -a noticemsgrredig 8 $read(contacts.txt,33)
did -a noticemsgrredig 8 $read(contacts.txt,34)
did -a noticemsgrredig 8 $read(contacts.txt,35)
did -a noticemsgrredig 8 $read(contacts.txt,36)
did -a noticemsgrredig 8 $read(contacts.txt,37)
did -a noticemsgrredig 8 $read(contacts.txt,38)
did -a noticemsgrredig 8 $read(contacts.txt,39)
did -a noticemsgrredig 8 $read(contacts.txt,40)
did -a noticemsgrredig 8 $read(contacts.txt,41)
did -a noticemsgrredig 8 $read(contacts.txt,42)
did -a noticemsgrredig 8 $read(contacts.txt,43)
did -a noticemsgrredig 8 $read(contacts.txt,44)
did -a noticemsgrredig 8 $read(contacts.txt,45)
did -a noticemsgrredig 8 $read(contacts.txt,46)
did -a noticemsgrredig 8 $read(contacts.txt,47)
did -a noticemsgrredig 8 $read(contacts.txt,48)
did -a noticemsgrredig 8 $read(contacts.txt,49)
did -a noticemsgrredig 8 $read(contacts.txt,50)
did -a noticemsgrredig 8 $read(contacts.txt,51)
did -a noticemsgrredig 8 $read(contacts.txt,52)
did -a noticemsgrredig 8 $read(contacts.txt,53)
did -a noticemsgrredig 8 $read(contacts.txt,54)
did -a noticemsgrredig 8 $read(contacts.txt,55)
did -a noticemsgrredig 8 $read(contacts.txt,56)
did -a noticemsgrredig 8 $read(contacts.txt,57)
did -a noticemsgrredig 8 $read(contacts.txt,58)
did -a noticemsgrredig 8 $read(contacts.txt,59)
did -a noticemsgrredig 8 $read(contacts.txt,60)
did -a noticemsgrredig 8 $read(contacts.txt,61)
did -a noticemsgrredig 8 $read(contacts.txt,62)
did -a noticemsgrredig 8 $read(contacts.txt,63)
did -a noticemsgrredig 8 $read(contacts.txt,64)
did -a noticemsgrredig 8 $read(contacts.txt,65)
did -a noticemsgrredig 8 $read(contacts.txt,66)
did -a noticemsgrredig 8 $read(contacts.txt,67)
did -a noticemsgrredig 8 $read(contacts.txt,68)
did -a noticemsgrredig 8 $read(contacts.txt,69)
did -a noticemsgrredig 8 $read(contacts.txt,70)
did -a noticemsgrredig 8 $read(contacts.txt,71)
did -a noticemsgrredig 8 $read(contacts.txt,72)
did -a noticemsgrredig 8 $read(contacts.txt,73)
did -a noticemsgrredig 8 $read(contacts.txt,74)
did -a noticemsgrredig 8 $read(contacts.txt,75)
did -a noticemsgrredig 8 $read(contacts.txt,76)
did -a noticemsgrredig 8 $read(contacts.txt,77)
did -a noticemsgrredig 8 $read(contacts.txt,78)
did -a noticemsgrredig 8 $read(contacts.txt,79)
did -a noticemsgrredig 8 $read(contacts.txt,80)
did -a noticemsgrredig 8 $read(contacts.txt,81)
did -a noticemsgrredig 8 $read(contacts.txt,82)
did -a noticemsgrredig 8 $read(contacts.txt,83)
did -a noticemsgrredig 8 $read(contacts.txt,84)
did -a noticemsgrredig 8 $read(contacts.txt,85)
did -a noticemsgrredig 8 $read(contacts.txt,86)
did -a noticemsgrredig 8 $read(contacts.txt,87)
did -a noticemsgrredig 8 $read(contacts.txt,88)
did -a noticemsgrredig 8 $read(contacts.txt,89)
did -a noticemsgrredig 8 $read(contacts.txt,90)
did -a noticemsgrredig 8 $read(contacts.txt,91)
did -a noticemsgrredig 8 $read(contacts.txt,92)
did -a noticemsgrredig 8 $read(contacts.txt,93)
did -a noticemsgrredig 8 $read(contacts.txt,94)
did -a noticemsgrredig 8 $read(contacts.txt,95)
did -a noticemsgrredig 8 $read(contacts.txt,96)
did -a noticemsgrredig 8 $read(contacts.txt,97)
did -a noticemsgrredig 8 $read(contacts.txt,98)
did -a noticemsgrredig 8 $read(contacts.txt,99)
did -a noticemsgrredig 8 $read(contacts.txt,100)
}
on *:dialog:noticemsgrredig:init:0:{
did -z noticemsgrredig 8
did -c noticemsgrredig 8 1
/actucontactsredig
}
on *:dialog:noticemsgrredig:edit:1: {
/did -r noticemsgrredig 2
/did -a noticemsgrredig 2 $len($did(noticemsgrredig,1))
/did -r noticemsgrredig 6
/did -a noticemsgrredig 6 $calc(400 - $did(noticemsgrredig,2))
}
on *:dialog:noticemsgrredig:sclick:10: {
set %usersend $did(noticemsgrredig,8)
/notice %usersend [noticemessenger] $did(noticemsgrredig,1)
$input(Un message vient d'être envoyé à %usersend $+ . Cependant si %usersend n'était pas connecté au moment ou vous avez envoyé ce message il ne le recevra pas.,308,Warning)
}
ctcp ^*:*[isconnected]*:*: {
if ($istok(%bannis,$nick,32)) {
halt
}
else /ctcp $nick [connected]
}
ctcp ^*:*[connected]*:*: {
set %connectedtemp on
}
alias isconnected {
/ctcp %user [isconnected]
/did -a noticemsgrcontacts 12 Je suis en train de vérifier...
/timer1 1 5 /isco2
}
alias isco2 {
if (%connectedtemp == on) {
//echo $input(%user est connecté !,308,Warning)
set %connectedtemp off
/did -a noticemsgrcontacts 12 Je ne fais rien actuellement
halt
}
else //echo $input(%user n'est pas connecté ou n'a pas de Notice Messenger !,308,Warning)
/did -a noticemsgrcontacts 12 Je ne fais rien actuellement
halt
}
ctcp ^*:*[bip]*:*: {
if ($istok(%bannis,$nick,32)) {
halt
}
else //echo 4,8 $+ $nick vous bippe !
/splay %son
}
on 1:notice:[noticemessenger]*:*:{
if ($istok(%bannis,$nick,32)) {
/halt
}
else set %lastnotice $1-
/write %liste Message de $nick : $1-
}
Conclusion :
Voila, essayez-le vous ne serez pas décus.
Et, une derniere chose, si vous pouvez me dire ce que vous pensez de ma création, ca serait sympa :)
++
××× G-FACTION ×××
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.