[Conq29]

Merhaba...
Elimde şöyle bir kod var, ben bunu bir türlü çalıştıramadım. Sanırım raw kısmında hata yaptım.
Kod şu;

[BOX="PHP Kod:"]
menu * {
.Ident Event
..Açık:/enable #gecosh | /echo -a 4*** Ident Koruma Açık
..Kapalı:/disable #gecosh | /echo -a 4*** Ident Koruma Kapalı
..Listeyi Düzenle:/sps
..Şimdi Tara:/fns
}

#gecosh off
alias fns {
var %< $lines(reklams.txt)
while (0 < %<) {
if ($read(reklams.txt,%<) iswm $strip($2-)) { halt }
else {
/soyadin $1 | /echo -a 4*** 12 $1 4nickli kullanıcının IDENT bilgileri değiştirildi...
}
dec %<
}
}
on *:snotice:*client connect*: { .timer 1 1 /who $9 }
raw 352:*:{ fns $4- $9- | halt }
alias sps { if (!$dialog(spams)) { dialog -m spams spams } }
dialog spams {
title "Ident Change Menu Muaflar"
size -1 -1 113 175
option dbu
button "Çıkar", 1, 6 14 37 12, flat
button "Ekle", 2, 6 1 37 12, flat
combo 3, 51 1 60 170, size sort
button "KAPAT", 4, 6 27 37 12, flat ok
}
on *:dialog:spams:init:0: {
loadbuf -o $dname 3 reklams.txt }
on *:dialog:spams:sclick:2: {
if (!$did(spams,3).text) {
echo 2 -a Muaf Eklenecek reklamsı yazmalısınız. | halt }
elseif $read(reklams.txt,w,$did(3).text) {
echo 2 -a $did(spams,3).text Listede zaten var. }
else {
write reklams.txt $did(spams,3).text
did -a $dname 3 $did(spams,3).text }
}
on *:dialog:spams:sclick:1: {
if (!$did(spams,3).text) {
echo 2 -a Muaf Silinecek reklamı seçmelisiniz. | halt }
elseif !$read(reklams.txt,w,$did(3).text) {
echo 2 -a $did(3).text reklam listesinde zaten yok. }
else { write $+(-dw,",$did(3).text,") reklams.txt
did -d $dname 3 $did(3).sel }
}
alias soyadin {
/chgident $1 Skalite
}
#gecosh end

[/BOX]
Burada sunucuya nick girdiği zaman eğer muaf listede yoksa otomatik olarak chgident uygulasın istiyorum. ircservices, unreal server. Ama bir türlü başaramadım tutup IP adresini veya fullname kısmını değiştirmeye çalışıyor. Yardım edebilecek var mı?