Identify kutusu

mIRC sorun, ders, addon ve script paylaşım bölümü..
Post Reply
qafLet
Posts: 211
Joined: 08 Mar 2010, 20:39
Location: Cyprus / Famagusta / DhavLos
Contact:

Identify kutusu

Post by qafLet » 01 Nov 2010, 17:32

Code: Select all

on *:notice:*NickServ*IDENTIFY*:*: { if ( $nick == nickserv ) /dialog -m sifre sifre } 
on *:notice:*Kayıt*Nick*:*: { if ( $nick == nickserv ) /dialog -m sifre sifre } 

dialog sifre { 
  title "Sohbetc Şifre Asistanı" 
  size -1 -1 110 60 
  option dbu 
  box $me Kayitli Bir Nicktir.., 20, 0 0 110 60 
  text "Nick Degistir:", 4, 10 22 33 10 
  text "Sifre Gir: ", 3, 10 10 23 13 
  edit "", 5, 45 8 60 10, style(pass),autohs 
  edit "", 6, 45 20 60 10 

  button "Uygula", 1, 10 35 40 15, ok 
  button "I&ptal", 2, 60 35 40 15, cancel 

} 
on 1:dialog:sifre:sclick:1: { 
  if ($did(sifre,6)) && ($did(sifre,5)) .nickserv identify $did(sifre,6) $did(sifre,5) 
  if ($did(sifre,5)) .nickserv identify $did(sifre,5) 
  if ($did(sifre,6)) .nick $did(sifre,6) 
}

Post Reply

Who is online

Users browsing this forum: No registered users and 1 guest