Özel kabul sistemi sorun.
Merhaba;
[script]
n0=#ozelkabul on
n1=alias ozelkabul {
n2= set %ozelkabul.nick $1
n3= set %ozelkabul.address $2
n4= set %ozelkabul.msg $3-
n5= if ($dialog($1) != $null) { goto son }
n6= dialog -m $1 ozelkabul
n7= :son
n8=}
n9=
n10=dialog ozelkabul {
n11= title "Özel Konuşma İsteği"
n12= size -1 -1 164 61
n13= option dbu
n14= edit "", 1, 40 4 120 10, read
n15= text "Nick :", 2, 4 7 27 8
n16= text "Adres :", 3, 4 19 28 8
n17= text "Mesaj :", 4, 4 31 28 8
n18= edit "", 5, 40 18 121 10, read
n19= edit "", 6, 40 30 121 10, read
n20= button "Kabul ET", 7, 13 44 67 12, flat ok
n21= button "Red ET", 8, 86 44 66 12, flat cancel
n22=}
n23=
n24=on *:dialog:*:init:*:{
n25= if (Özel Konuşma İsteği == $dialog($dname).title ) {
n26= set %ozelkabul.dialog $dname
n27= did -a $dname 1 %ozelkabul.nick
n28= did -a $dname 5 %ozelkabul.address
n29= did -a $dname 6 %ozelkabul.msg
n30= }
n31=}
n32=
n33=on *:dialog:*:sclick:*:{
n34= if (Özel Konuşma İsteği == $dialog($dname).title ) {
n35= if ($did == 7) {
n36= .window -w $dname
n37= .msg $dname 2Özel Konuşma İsteğiniz Kabul Edilmiştir. %Mirc
n38= .set %ozelkabul.gorusme. [ $+ [ $dname ] ] ok
n39= }
n40= if ($did == 8) {
n41= .msg $dname 2Özel Konuşma İsteğiniz Kabul Edilmedi! %Mirc
n42= .ignore -pu300 $dname
n43= .closemsg $dname
n44= }
n45= }
n46=}
n47=
n48=on *:TEXT:*:?:{
n49= if ($nick == $me) { goto son }
n50= if (%ozelkabul.gorusme. [ $+ [ $nick ] ] == $null) {
n51= .ozelkabul $nick $address($nick,2) $1-
n52= .msg $nick 2Özel görüşme isteğiniz değerlendiriliyor. Lütfen bekleyin. %Mirc
n53= .window -h $nick
n54= }
n55=}
n56=
n57=on *:CLOSE:?:{
n58= if (%ozelkabul.gorusme. [ $+ [ $target ] ] != $null) { unset %ozelkabul.gorusme. [ $+ [ $target ] ] }
n59=}
n60=#ozelkabul end
Diye bir özel kabul sistemim var fakat bir nick karşındakine selam diyince karşıdaki de selam verince ilk selam verende karşıdakine "Özel görüşme isteğiniz değerlendiriliyor. Lütfen bekleyin." mesajını veriyor. Bunun nedeni ne olabilir.? |