Aide - Recherche - Membres - Calendrier
Version complète : Aide Sur Un Code Anti Pv
CCS Forums > Scripting mIRC > Scripting mIRC
darckaut
bon voila mon probe j'ai un code pour un anti pv il marche super bien sur un de mes script mais sur un autre il me dit ( * /dialog: 'antipv' no such table ) donc voila le code



dialog antipv {
title "Anti-Privés"
size -1 -1 400 430
option dbu
text "",1,5 5 390 190
button "",8,5 240 390 120,ok
text "",2,20 20 360 60
button "Activé",3,30 30 150 40,ok
button "Désactivé",4,220 30 150 40,ok
text " Message à envoyer lorsque l'antipv est activé",5,20 90 360 90
edit %antipv.msg,6,30 120 340 20,autohs
button "Enregistrer",7,30 150 150 20,ok
text "",10,5 200 390 40
text "Messages reçus quand l'anti-pv était actif",9,20 210 360 15
text "",11,5 360 390 60
button "Rafraichir la liste",12,100 375 200 30,ok
button "",99,0 0 0 0,ok hide


merci a tout seu qui von me répondre biggrin.gif
C•Dryk™
Là il n'y a que le dialogue (la fenêtre), sans le reste du code alors c'est pas trop clair... Tu peux tenter d'ajouter à quelque part (hors du dialog, par exemple tout en haut du script dans le remote) la ligne:

CODE
alias antipv { dialog -m antipv antipv }


Normalement la commande /antipv devrait alors ouvrir le dialog.
Orus
salut

et si ton dialog est complet, il manque une accolade pour le fermer, peut être que ton message vient de là
darckaut
voila tou le remote



dialog antipv {
title "Anti-Privés"
size -1 -1 400 430
option dbu
text "",1,5 5 390 190
button "",8,5 240 390 120,ok
text "",2,20 20 360 60
button "Activé",3,30 30 150 40,ok
button "Désactivé",4,220 30 150 40,ok
text " Message à envoyer lorsque l'antipv est activé",5,20 90 360 90
edit %antipv.msg,6,30 120 340 20,autohs
button "Enregistrer",7,30 150 150 20,ok
text "",10,5 200 390 40
text "Messages reçus quand l'anti-pv était actif",9,20 210 360 15
text "",11,5 360 390 60
button "Rafraichir la liste",12,100 375 200 30,ok
button "",99,0 0 0 0,ok hide
}
on *:dialog:antipv:sclick:12:{
write -c db/log.antipv.db
clear @antipv
aline -p @antipv 4Liste des Messages reçus effacés !
sline @antipv 3
}
on *:dialog:antipv:sclick:3:{
set %antipv.etat on
did -b antipv 3
did -e antipv 4
echo -a 4AntiPv activé , plus aucun message des privés ne vous parviendra !
set %pv.queue.etat off
var %at = 0
while (%at < $lines(db/liste.pv.db)) {
inc %at
.ignore -rp $read(db/liste.pv.db,%at) $+ *!*@*
}
write -c db/liste.pv.db
}
on *:dialog:antipv:sclick:4:{
set %antipv.etat off
did -b antipv 4
did -e antipv 3
var %at = 0
while (%at < $lines(db/ignore.antipv.db)) {
inc %at
.ignore -rp $read(db/ignore.antipv.db,%at) $+ *!*@*
}
write -c db/ignore.antipv.db
}


on *:dialog:antipv:sclick:7:{
set %antipv.msg $did(6)
write -l1 db/antipv.msg.db $did(6)
}
on 1:open:?:{
if (%antispam.etat == on) {
set %antispam.nick. $+ $nick 1
.timerantispam. $+ $nick 1 %antispam.out unset %antispam.nick. [ $+ [ $nick ] ]
}
if (%pv.queue.etat == on) {
.close -m $nick
write db/liste.pv.db $nick
echo -a $time.style 6[Pv-Queue] $nick à était mit en liste d'attente des privés !
.ignore -pu100 $nick $+ *!*@*
if ($dialog(pv.queue)) pv.queue.r
msg . $nick $read(db/msg.pv.queue.db,1)
}
if (%antipv.etat == on) {
.close -m $nick
if ($exists(db/log.antipv.db)) write db/log.antipv.db
write db/log.antipv.db [Le $date à $time(HH:nn:ss) $+ ]4 $nick : $1-
if ($exists(db/ignore.antipv.db)) write db/ignore.antipv.db
.ignore -p $nick $+ *!*@*
write db/ignore.antipv.db $nick
echo -a $time.style 6[Anti-Pv] Privée de $nick fermer !
msg . $nick $read(db/antipv.msg.db,1)
}
}



et j'ai sur mon popups sa comme lign pour ouvrir mon anti pv
n26= .Anti-Privés:/dialog -m antipv antipv

donc je ne comprends pas
Orus
salut,
bah ecoute ton dialog fonctionne très bien...
regarde le post de c-dryk et ajoute cet alias à un bouton. ça devrait le faire
je viens de le tester,, il est "moche" mais il est bien present tongue.gif

tu devrais à la rigueur te faire un bouton du genre :
CODE
;ici le bouton apparait dans statut dans la menu barre et channel
menu status,menubar,channel {
  .antipv : {
;si le dialog est ouvert message d'erreur
;sinon tu lance l'alias antipv
if  (%antipv == on) { echo 4 -a Le dialog est déja ouvert | halt }
    else { antipv  }
  }
}
;tu ouvres le dialog antipv et tu set une variable qui marque que le dialog est ouvert
alias antipv { dialog -m antipv antipv | set %antipv on }
;tu l'unset à la fermeture du dialog
on *:dialog:antipv:close:*: { if (%antipv == on) { unset %antipv } }
par la même occasion tu peux virer ton n26 blah blah

enfin c'est juste une petite idée wink.gif

à plus
darckaut
euhh en faite mon anti pv se trouve dans un volet on vas dit qui se trouve dans mon popups donc je ne sais pas lajouté a un bouton comme tu dit
darckaut
super la table safiche mais toujours un probe mad.gif il me dit sa * /format: not connected to server (line 221, antipv.mrc) et la ligne qu'il me donne commance par format
ЯЄβЄ££€
CITATION(darckaut @ 07/12/2006, 03:57) *
super la table safiche mais toujours un probe mad.gif il me dit sa * /format: not connected to server (line 221, antipv.mrc) et la ligne qu'il me donne commance par format


Il te dit: format ... donc formatte ou fais ccmd :blink:
Orus
CITATION(darckaut @ 07/12/2006, 03:57) *
super la table safiche mais toujours un probe mad.gif il me dit sa * /format: not connected to server (line 221, antipv.mrc) et la ligne qu'il me donne commance par format


Tu peux nous marquer cette ligne 221?

l'anti pv tu ele prends d'où pour le mettre où?
darckaut
désoler je pensait vous avoir donné tout le code donc le voila au total et sais la fin du code qui pausse prob


menu status,menubar,channel {
.antipv : {
;si le dialog est ouvert message d'erreur
;sinon tu lance l'alias antipv
if (%antipv == on) { echo 4 -a Le dialog est déja ouvert | halt }
else { antipv }
}
}
;tu ouvres le dialog antipv et tu set une variable qui marque que le dialog est ouvert
alias antipv { dialog -m antipv antipv | set %antipv on }
;tu l'unset à la fermeture du dialog
on *:dialog:antipv:close:*: { if (%antipv == on) { unset %antipv } }
alias antipv { dialog -m antipv antipv }
dialog antipv {
title "Anti-Privés"
size -1 -1 400 430
text "",1,5 5 390 190
button "",8,5 240 390 120,ok
text "",2,20 20 360 60
button "Activé",3,30 30 150 40,ok
button "Désactivé",4,220 30 150 40,ok
text " Message à envoyer lorsque l'antipv est activé",5,20 90 360 90
edit %antipv.msg,6,30 120 340 20,autohs
button "Enregistrer",7,30 150 150 20,ok
text "",10,5 200 390 40
text "Messages reçus quand l'anti-pv était actif",9,20 210 360 15
text "",11,5 360 390 60
button "Rafraichir la liste",12,100 375 200 30,ok
button "",99,0 0 0 0,ok hide
}
on *:dialog:antipv:sclick:12:{
write -c db/log.antipv.db
clear @antipv
aline -p @antipv 4Liste des Messages reçus effacés !
sline @antipv 3
}
on *:dialog:antipv:sclick:3:{
set %antipv.etat on
did -b antipv 3
did -e antipv 4
echo -a 4AntiPv activé , plus aucun message des privés ne vous parviendra !
set %pv.queue.etat off
var %at = 0
while (%at < $lines(db/liste.pv.db)) {
inc %at
.ignore -rp $read(db/liste.pv.db,%at) $+ *!*@*
}
write -c db/liste.pv.db
}
on *:dialog:antipv:sclick:4:{
set %antipv.etat off
did -b antipv 4
did -e antipv 3
var %at = 0
while (%at < $lines(db/ignore.antipv.db)) {
inc %at
.ignore -rp $read(db/ignore.antipv.db,%at) $+ *!*@*
}
write -c db/ignore.antipv.db
}


on *:dialog:antipv:sclick:7:{
set %antipv.msg $did(6)
write -l1 db/antipv.msg.db $did(6)
}
on 1:open:?:{
if (%antispam.etat == on) {
set %antispam.nick. $+ $nick 1
.timerantispam. $+ $nick 1 %antispam.out unset %antispam.nick. [ $+ [ $nick ] ]
}
if (%pv.queue.etat == on) {
.close -m $nick
write db/liste.pv.db $nick
echo -a $time.style 6[Pv-Queue] $nick à était mit en liste d'attente des privés !
.ignore -pu100 $nick $+ *!*@*
if ($dialog(pv.queue)) pv.queue.r
msg . $nick $read(db/msg.pv.queue.db,1)
}
if (%antipv.etat == on) {
.close -m $nick
if ($exists(db/log.antipv.db)) write db/log.antipv.db
write db/log.antipv.db [Le $date à $time(HH:nn:ss) $+ ]4 $nick : $1-
if ($exists(db/ignore.antipv.db)) write db/ignore.antipv.db
.ignore -p $nick $+ *!*@*
write db/ignore.antipv.db $nick
echo -a $time.style 6[Anti-Pv] Privée de $nick fermer !
msg . $nick $read(db/antipv.msg.db,1)
}
}

on *:dialog:antipv:init:0:{
window -h @antipv 0 0 600 500
format make $dname
format global $dname
format back 1,3,4,7,12
format text 1,2,5,6,9,10,11
format border 1,2,5,10,11
if (%antipv.etat == on) did -b antipv 3
if (%antipv.etat == off) did -b antipv 4
did -a $dname 8 grab $window(@antipv).hwnd @antipv
dll dll/mdx.dll SetControlMDX $dname 8 window > dll/dialog.mdx
if (!$exists(db/antipv.msg.db)) write db/antipv.msg.db
aline -p @antipv 4Liste des Messages reçus quand l'Anti-Privée était Actif
loadbuf -p @antipv $shortfn(db/log.antipv.db)
sline @antipv 3
}
Orus
en fait, je connais pas cette commande : format , j'ai regardé l'aide de mirc et elle n'est pas mentionnée... autrement ça mets ce message juste à l'init
popur le reste a a l'air "normal"
darckaut
bas en faite juste sais quelque ligne fon merder tout le code parce que il safiche bien mais ne marche pas du tout mad.gif rien n marche de la commande en elle même
Orus
CITATION(darckaut @ 07/12/2006, 18:44) *
bas en faite juste sais quelque ligne fon merder tout le code parce que il safiche bien mais ne marche pas du tout mad.gif rien n marche de la commande en elle même


à mon avis, tu as pris ce code sur un script, et dans ce script il y a un alias nommé format et c'est ce qu'il te manque.
regarde dans le script ou tout va bien et cherche l'alias format
darckaut
yep je vient vous dire que j'ai trouver donc merci a vous tous biggrin.gif biggrin.gif biggrin.gif
Orus
CITATION(darckaut @ 07/12/2006, 23:47) *
yep je vient vous dire que j'ai trouver donc merci a vous tous biggrin.gif biggrin.gif biggrin.gif


Et ça venait de?
Ceci une version "bas débit" de notre forum. Pour voir la version complète avec plus d'information, la mise en page et les images, veuillez cliquez ici.
Invision Power Board © 2001-2012 Invision Power Services, Inc.