Bilginin Adresi Homepage
Forum Home Forum Home > Bilgisayar > Chat & Msn Programları > MIRC Genel
  New Posts New Posts RSS Feed - Identify kutucuğu
  FAQ FAQ  Forum Search   Events   Register Register  Login Login

 

 


Identify kutucuğu

 Post Reply Post Reply
Author
Message
invertor View Drop Down
Security Professional
Security Professional
Avatar
İnventor

Joined: 18-01-2008
Status: Offline
Points: 3363
Post Options Post Options   Thanks (0) Thanks(0)   Quote invertor Quote  Post ReplyReply Direct Link To This Post Topic: Identify kutucuğu
    Posted: 26-12-2008 at 11:39
Basit bir nick identify sorgulayıcısı.

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 "Şifre Paneli"
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)
edit "", 6, 45 20 60 10
button "Uygula", 1, 10 35 40 15, ok
button "I&ptal", 2, 60 35 40 15, cancel
}
| xxxx identify xxxx
on 1ialog: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)
Back to Top
 Post Reply Post Reply
  Share Topic   

Forum Jump Forum Permissions View Drop Down



This page was generated in 0.328 seconds.

Bilgineferi.com