Küfür Koruması (hatası)
 

Merhaba arkadasLar Küfür korumasına kelime eklemeye calıştıgımda hata veriyor..

verdiği hata:

* /dialog: 'yasak' Isim kullanılıyor (Satır 41, script20.ini)


kod bu
on *:text:*:#: {
if $istok(%muaf1,#,32) == $true { halt }
if $istok(%muafn,$nick,32) == $true { halt }
if $istok(%muafall,#,32) == $true { halt }
if (%kufur == 1) && ($me isop $chan) && ($nick isreg $chan) && ($nick !isop #) {
if $hfind(kufur,$1-,1,W).data {
if (%kuf1kick == 1) { .kick # $nick 4 %Kufursebeb | ban -u $+ %bantime # $nick 5 }
if {%kuf1kill == 1} { kill $nick 4Küfür Etmeyiniz Kanalda! }
if {%kuf1kline == 1} { kline $nick 4Küfür Etmeyiniz Kanalda! }
inc %istaKufur
inc %istabutun
}
}
}
alias k_start {
hmake $1 $2
hload $1 $+(Remote\Save\,$1,.save)
}
alias kstart {
k_start kufur 1000
}
on *:start: { kstart }


alias kekle {
hadd -m kufur $calc($hget(kufur,0).item + 1) $1-
hsave kufur remote\Save\kufur.save
}

alias yasak { dialog -m yasak yasak }

dialog yasak {
title "Küfür Koruması"
size -1 -1 141 185
option dbu
edit "", 2, 67 62 69 12, multi return
list 1, 5 48 59 132, size
box "", 7, 2 41 137 143
list 3, 74 87 57 9, size
list 4, 74 102 57 9, size
list 5, 72 140 63 8, size
box "", 6, 2 -1 137 43
radio "Kick + Ban", 8, 6 6 88 8
radio "Opersem Kill", 9, 6 18 86 8
radio "Opersem Kline", 10, 6 30 87 8
}


on *:dialog:yasak:sclick:*:{
if ($did = 4) {
hdel -s kufur $hfind(kufur,$did($dname,1).seltext,1,W).data
hsave kufur remote\Save\kufur.save
deneme $dname
}
if ($did = 3) { kekle $did($dname,2) | deneme $dname }
if ($did = 5) { .timer 1 0 dialog -x $dname $dname }
if ($did = 8) { if ($did($dname,8).state == 1) { unset %kuf1* | set %kuf1kick 1 } | else { set %kuf1kick 0 } }
if ($did = 9) { if ($did($dname,9).state == 1) { unset %kuf1* | set %kuf1kill 1 } | else { set %kuf1kill 0 } }
if ($did = 10) { if ($did($dname,10).state == 1) { unset %kuf1* | set %kuf1kline 1 } | else { set %kuf1kline 0 } }
}

alias deneme .timer 1 0 .dialog -x $1 $1 | .timer 2 0 .dialog -m $1 $1
on *:dialog:yasak:init:0: {
var %x = 1
while (%x <= $hget(kufur,0).item) {
did -ac yasak 1 $hget(kufur,%x).data
inc %x
}
mdx SetMircVersion $version
mdx MarkDialog $dname
mdx SetFont 1,2,3,4,5,6,7,8,9,10 -12 700 Tahoma
mdx SetControlMDX $dname 3,4,5 ToolBar flat wrap arrows nodivider list > $bars
mdx SetBorderStyle 3,4,5
did -i $dname 5 1 setscheme $rgb(163,163,163) $rgb(163,163,163)
did -i $dname 5 1 bmpsize 16 16
did -i $dname 5 1 setimage icon large remote\dll\Kick.ico
did -a $dname 5 +a 1 Tamam \ Kapat $chr(9) $+ Tamam
did -i $dname 4 1 setscheme $rgb(163,163,163) $rgb(163,163,163)
did -i $dname 4 1 bmpsize 16 16
did -i $dname 4 1 setimage icon large remote\dll\del.ico
did -a $dname 4 +a 1 Listeden Sil $chr(9) $+ Sil
did -i $dname 3 1 setscheme $rgb(163,163,163) $rgb(163,163,163)
did -i $dname 3 1 bmpsize 16 16
did -i $dname 3 1 setimage icon large remote\dll\add.ico
did -a $dname 3 +a 1 Listeye Ekle $chr(9) $+ Ekle
if (%kuf1kick == 1) { did -c $dname 8 }
if (%kuf1kill == 1) { did -c $dname 9 }
if (%kuf1kline == 1) { did -c $dname 10 }
}


hatayı bulamadım.. bu konuda yardımcı olurmusunuz

Cevap: Küfür Koruması (hatası)
 

on *:dialog:yasak:init:0: {

bu ID de başka bir dialog daha var, yada aynı kod iki remote'da ekli.

Cevap: Küfür Koruması (hatası)
 

CoCoRiCo Hocam bende o şekilde düşündüm scriptte tüm dosyalara baktım fakat o şekilde birşey bulamadım. şu var birde küfür paneline kelimeyi yazıyorum ekle butununa bastıgımda panel gidip geliyor..

tekrar bi gözden geciriyim ben CoCoRiCo cok tşk ederim ilgin için

Cevap: Küfür Koruması (hatası)
 

C:\Documents and Settings\User\Application Data\mIRC\Remote\Save\kufur.save

bunu oluşturup Load ettim

bende hmake hatası verdi.

" /hmake: table 'kufur' exists (line 16, script8.ini)"

Belirtilen 16. satırda onu Disable ettim çalıştı bir hata vermedi.

Kufur.save dosyası içeriği

1

2
gygyg
3
123456789098765432345678765432234567876543
4
Deneme
5
Deneme1
6
Deneme2
7
Deneme
8
Deneme3
9
Deneme4
12
Deneme7
13
Deneme7
10
Deneme5
11
Deneme6
14
Deneme8
15
Deneme9

Cevap: Küfür Koruması (hatası)
 

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] yani cözüm olarak ne öneriyorsunuz ?

başka 2ci bir remote yok, baska bir dialogta da kullanılmıyor bu ID

Cevap: Küfür Koruması (hatası)
 

Sanırım dialog acıkken tekrar yasak komutunu kullanmıssın. Bende yukledim herhangi bi sorun yok.

Cevap: Küfür Koruması (hatası)
 

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 'nunda belirttiği üzere ve seninde scriptten gelen hatada gördüğün gibi aynı
ID veya isimle bir diyalog penceren mevcut. İsim değiştirdiğinde aynı hatayı alıcağını sanmıyorum. Aynı şekilde açık diyalog varken yeniden komutu kullnırsan açık olan diyalog olduğu için bu hatayı alabilirsin.