IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
Sayfa 2 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   Oto Nick İdentine İnce Ayar (https://www.ircforumlari.net/mirc-scripting-sorunlari/178950-oto-nick-identine-ince-ayar.html)

RapStar 11 Şubat 2009 13:36
Cevap: Oto Nick İdentine İnce Ayar
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Resimle Belirtmek İstedim. Otomatik Nick Tanıtım Yazan Yerin Altındaki Nickin Yanında Nick Yazıyorsa O Nicki Dikkate Alsın ve Otomatik Olarak O Nicke Geçsin İstiyorm. Ama Bağlantı Yapınca Bağlantı Menüsü Yazan Yerin Altındaki Nick : i Dikkate Alıyor. ve o nickle server a bağlanıyor

uFuK 11 Şubat 2009 18:11
Cevap: Oto Nick İdentine İnce Ayar
 
Alıntı:
#baglanti on
on 1:start:{ .bagLanti }
aLias bagLanti { .diaLog -m bagLanti bagLanti }
diaLog bagLanti {
titLe " RapStar mIRC Bağlantı Menüsü© "
size -1 -1 203 133
option dbu
text "Nick:", 1, 3 12 25 8
text "YedekNick:", 2, 3 21 26 8
text "E-mail:", 3, 3 30 25 8
box "Bağlantı Menüsü", 4, 1 1 129 54
edit "", 5, 37 9 90 10
edit "", 6, 37 29 90 10
edit "", 7, 37 19 90 10
text "Fullname: ", 10, 3 39 25 8
edit "", 11, 37 39 90 10, autohs
box "Otomatik Tanımlar", 12, 131 1 68 85
text "Otomatik Giris", 13, 134 8 38 8
text "1.Kanal", 14, 134 18 25 8
edit "", 15, 162 17 33 10
text "2.Kanal", 16, 134 27 25 8
edit "", 17, 162 27 33 10
text "3.Kanal", 18, 134 37 25 8
edit "", 19, 162 37 33 10
text "Otomatik Nick Tanıtım", 20, 134 50 61 8
text "Nick", 21, 134 60 25 8
edit "", 22, 161 59 31 10, autohs
text "Sifre", 23, 135 70 25 8
edit "", 24, 161 69 31 10, pass autohs
box "Server", 26, 2 58 127 28
edit "MyNet", 30, 8 69 117 12, disable
button "Sohbete Gir", 34, 50 110 107 15
button "Kaydet ve Kapat", 35, 25 90 67 15, ok
button "İptal", 36, 110 90 62 15, canceL
}
on 1:diaLog:bagLanti:init:*:{
did -a bagLanti 5 $me
did -a bagLanti 7 $anick
did -a bagLanti 6 $emaiL
did -a bagLanti 11 $fuLLname
}
on 1:diaLog:bagLanti:scLick:34:{
if ($did(22) != $null) { /nick $did(22) }
else { /nick $did(5) }
.set %one $did(15)
.set %two $did(17)
.set %three $did(19)
.set %nick $did(22)
.set %sifre $did(24)
.set %AnaNick $did(5)
.diaLog -x bagLanti bagLanti
.server %server
}
on 1:diaLog:bagLanti:scLick:27:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mircalem.com }
on 1:diaLog:bagLanti:scLick:28:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mircalem.com }
on 1:diaLog:bagLanti:scLick:29:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mircalem.com }
on 1:diaLog:bagLanti:scLick:30:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mircalem.com }
on 1:diaLog:bagLanti:scLick:31:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mircalem.com }
on 1:diaLog:bagLanti:scLick:32:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mircalem.com }
on 1:dialog:baglanti:sclick:34: { set %ufuk $did(22) }
on *:connect:{
if (%sifre == $null) { haltdef }
else {
.timer 1 2 .ns identify %sifre | echo -a 10Nick Sifreniz giriLiyor
}
if (%one != $null) { /j %one }
if (%two != $null) { /j %two }
if (%three != $null) { /j %three }
}
on *:disconnect:{ .unset %sifre | unset %one | unset %two | unset %three }



Kırmızı bölgedeki düzenlemeyle, Otomatik Nick Tanımında eğer nick verisi varsa o nicke göre hareket edicek, yoksa bağlantı menüsündeki nicki kullanıcaktır.

İyi forumlar.

RapStar 12 Şubat 2009 02:40
Cevap: Oto Nick İdentine İnce Ayar
 
Kod:

#baglanti on
on 1:start:{ .bagLanti }
aLias bagLanti { .diaLog -m bagLanti bagLanti }
diaLog bagLanti {
  titLe " RapStar mIRC Bağlantı Menüsü© "
  size -1 -1 203 133
  option dbu
  text "Nick:", 1, 3 12 25 8
  text "YedekNick:", 2, 3 21 26 8
  text "E-mail:", 3, 3 30 25 8
  box "Bağlantı Menüsü", 4, 1 1 129 54
  edit "", 5, 37 9 90 10
  edit "", 6, 37 29 90 10
  edit "", 7, 37 19 90 10
  text "Fullname: ", 10, 3 39 25 8
  edit "", 11, 37 39 90 10, autohs
  box "Otomatik Tanımlar", 12, 131 1 68 85
  text "Otomatik Giris", 13, 134 8 38 8
  text "1.Kanal", 14, 134 18 25 8
  edit "", 15, 162 17 33 10
  text "2.Kanal", 16, 134 27 25 8
  edit "", 17, 162 27 33 10
  text "3.Kanal", 18, 134 37 25 8
  edit "", 19, 162 37 33 10
  text "Otomatik Nick Tanıtım", 20, 134 50 61 8
  text "Nick", 21, 134 60 25 8
  edit "", 22, 161 59 31 10, autohs
  text "Sifre", 23, 135 70 25 8
  edit "", 24, 161 69 31 10, pass autohs
  box "Server", 26, 2 58 127 28
  edit "MyNet", 30, 8 69 117 12, disable
  button "Sohbete Gir", 34, 50 110 107 15
  button "Kaydet ve Kapat", 35, 25 90 67 15, ok
  button "İptal", 36, 110 90 62 15, canceL
}
on 1:diaLog:bagLanti:init:*:{
  did -a bagLanti 5 $me
  did -a bagLanti 7 $anick
  did -a bagLanti 6 $emaiL
  did -a bagLanti 11 $fuLLname
}
on 1:diaLog:bagLanti:scLick:34:{
  if ($did(22) != $null) { /nick $did(22) }
  else { /nick $did(5) }
  .set %one $did(15)
  .set %two $did(17)
  .set %three $did(19)
  .set %nick $did(22)
  .set %sifre $did(24)
  .set %AnaNick $did(5)
  .diaLog -x bagLanti bagLanti
  .server %server
}
on 1:diaLog:bagLanti:scLick:27:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:28:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:29:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:30:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:31:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:32:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:dialog:baglanti:sclick:34: { set %ufuk $did(22) }
on *:connect:{
  .timer 1 1 .nick %ananick
  if (%sifre == $null) { haltdef }
  else {
    .timer 1 2 .ns identify %sifre | echo -a 10Nick Sifreniz giriLiyor
  }
  if (%one != $null) { /j %one }
  if (%two != $null) { /j %two }
  if (%three != $null) { /j %three }
}
on *:disconnect:{ .unset %sifre | unset %one | unset %two | unset %three }
#baglanti end
Kodun Bitmiş Hali Budur. Emeklerinize Sağlık. Bu Hale Geleceğini Tahmin Bile Edemiyordum..

Fenomens Ben Beceremedim Bunun Oto İdent Kısmına Beni Unut Beni Hatırla Gibi Bir Şey Yapmaya Çalıştım çalışmadı.. Bir İlgilenseniz ? Servera Bağlandıktan sonra hemen siliniyor. eğer beni hatırla yı işaretlediysek hem kanalları hem nicki hem şifreyi hafızasında tutturabilirmiyiz ?

uFuK 12 Şubat 2009 12:07
Cevap: Oto Nick İdentine İnce Ayar
 
Alıntı:
dialog bagLanti {
title " RapStar mIRC Bağlantı Menüsü© "
size -1 -1 214 144
option dbu
text "Nick:", 1, 3 12 25 8
text "YedekNick:", 2, 3 21 26 8
text "E-mail:", 3, 3 30 25 8
box "Bağlantı Menüsü", 4, 1 1 129 54
edit "", 5, 37 9 90 10
edit "", 6, 37 29 90 10
edit "", 7, 37 19 90 10
text "Fullname: ", 10, 3 39 25 8
edit "", 11, 37 39 90 10, autohs
box "Otomatik Tanımlar", 12, 131 1 68 99
text "Otomatik Giris", 13, 134 8 38 8
text "1.Kanal", 14, 134 18 25 8
edit "", 15, 162 17 33 10
text "2.Kanal", 16, 134 27 25 8
edit "", 17, 162 27 33 10
text "3.Kanal", 18, 134 37 25 8
edit "", 19, 162 37 33 10
text "Otomatik Nick Tanıtım", 20, 134 50 61 8
text "Nick", 21, 134 60 25 8
edit "", 22, 161 59 31 10, autohs
text "Sifre", 23, 135 70 25 8
edit "", 24, 161 69 31 10, pass autohs
box "Server", 26, 2 58 127 28
edit "MyNet", 30, 8 69 117 12, disable
button "Sohbete Gir", 34, 52 126 107 15
button "Kaydet ve Kapat", 35, 27 106 67 15, ok
button "İptal", 36, 112 106 62 15,cancel
check "Beni Hatırla", 8, 143 80 50 10
check "Beni Unut", 9, 143 89 50 10
}

on 1:diaLog:bagLanti:init:*:{
did -a bagLanti 5 $me
did -a bagLanti 7 $anick
did -a bagLanti 6 $emaiL
did -a bagLanti 11 $fuLLname
did -a baglanti 22 %mynet
did -a baglanti 24 %mynet2
did -a baglanti 15 %kanal1
did -a baglanti 17 %kanal2
did -a baglanti 19 %kanal3
}
on 1:diaLog:bagLanti:scLick:34:{
if ($did(22) != $null) { /nick $did(22) }
else { /nick $did(5) }
.set %one $did(15)
.set %two $did(17)
.set %three $did(19)
.set %nick $did(22)
.set %sifre $did(24)
.set %AnaNick $did(5)
.diaLog -x bagLanti bagLanti
.server %server
}
on 1:diaLog:bagLanti:scLick:27:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:28:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:29:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:30:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:31:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:32:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:dialog:baglanti:sclick:34: { set %ufuk $did(22) }
on 1:dialog:baglanti:sclick:35: {
set %mynet $did(22)
set %mynet2 $did(24)
set %kanal1 $did(15)
set %kanal2 $did(17)
set %kanal3 $did(19)
}
on 1:dialog:baglanti:sclick:9: {
did -r baglanti 22
did -r baglanti 24
did -r baglanti 15
did -r baglanti 17
did -r baglanti 19
}
on *:connect:{
.timer 1 1 .nick %ananick
if (%sifre == $null) { haltdef }
else {
.timer 1 2 .ns identify %sifre | echo -a 10Nick Sifreniz giriLiyor
}
if (%one != $null) { /j %one }
if (%two != $null) { /j %two }
if (%three != $null) { /j %three }
}
on *:disconnect:{ .unset %sifre | unset %one | unset %two | unset %three }
#baglanti end
İstediğin olayı "Check" kullanarak hallettim.
Ek olarak kanallarıda kaydedip, silme özelliği koydum.
Beni Hatırla veya Beni Unut butonlarına tıklayıp Kaydet Kapat'a basınca işlemi tamamlıyor. Unutma;
Checkleri seçtikten sonra "kaydet ve kapat" butonunu kullan.

Ayrıca İPTAL kısmınada "cancel" ekledim.

İyi kullanımlar Mynet'ci :)

RapStar 13 Şubat 2009 02:45
Cevap: Oto Nick İdentine İnce Ayar
 
check de her ikisinide seçebiliyordun bende radio yaptım:) ama olmuş istediğim gibi hemde. eline sağlık.

RapStar 17 Mart 2009 12:03
Cevap: Oto Nick İdentine İnce Ayar
 
Kod:
#baglanti on
on 1:start:{ .bagLanti }
aLias bagLanti { .diaLog -m bagLanti bagLanti }
dialog bagLanti {
  title " RapStar mIRC Bağlantı Menüsü© "
  size -1 -1 204 144
  option dbu
  text "Nick:", 1, 3 12 25 8
  text "YedekNick:", 2, 3 21 26 8
  text "E-mail:", 3, 3 30 25 8
  box "Bağlantı Menüsü", 4, 1 1 129 54
  edit "", 5, 37 9 90 10
  edit "", 6, 37 29 90 10
  edit "", 7, 37 19 90 10
  text "Fullname: ", 10, 3 39 25 8
  edit "", 11, 37 39 90 10, autohs
  box "Otomatik Tanımlar", 12, 131 1 68 92
  text "Otomatik Giris", 13, 134 8 38 8
  text "1.Kanal", 14, 134 18 25 8
  edit "", 15, 162 17 33 10
  text "2.Kanal", 16, 134 27 25 8
  edit "", 17, 162 27 33 10
  text "3.Kanal", 18, 134 37 25 8
  edit "", 19, 162 37 33 10
  text "Otomatik Nick Tanıtım", 20, 134 50 61 8
  text "Nick", 21, 134 60 25 8
  edit "", 22, 161 59 31 10, autohs
  text "Sifre", 23, 135 70 25 8
  edit "", 24, 161 69 31 10, pass autohs
  box "Server", 26, 2 58 127 28
  edit "MyNet", 30, 8 69 117 12, disable
  button "Sohbete Gir", 34, 52 126 107 15
  button "Kaydet ve Kapat", 35, 27 110 67 15, ok
  button "İptal", 36, 112 110 62 15,cancel
  box "Oto Giriş ve Oto Nick Tanıtım İçin Önemli Açıklama! ",46, 2 88 199 20
  text "Ayarlarınızı Yaptıktan Sonra Kalıcı Olmasını İstiyorsanız Kaydet ve Kapatı Tıklamalısınız",45, 5 95 199 15
  button "Beni Unut", 9, 143 81 50 10
}
on 1:diaLog:bagLanti:init:*:{
  did -a bagLanti 5 $me
  did -a bagLanti 7 $anick
  did -a bagLanti 6 $emaiL
  did -a bagLanti 11 $fuLLname
  did -a baglanti 22 %mynet
  did -a baglanti 24 %mynet2
  did -a baglanti 15 %kanal1
  did -a baglanti 17 %kanal2
  did -a baglanti 19 %kanal3
}
on 1:diaLog:bagLanti:scLick:34:{
  if ($did(22) != $null) { /nick $did(22) }
  else { /nick $did(5) }
  .set %one $did(15)
  .set %two $did(17)
  .set %three $did(19)
  .set %nick $did(22)
  .set %sifre $did(24)
  .set %AnaNick $did(5)
  .diaLog -x bagLanti bagLanti
  .server %server
}
on 1:diaLog:bagLanti:scLick:27:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:28:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:29:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:30:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:31:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:32:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:dialog:baglanti:sclick:34: { set %ufuk $did(22) }
on 1:dialog:baglanti:sclick:35: {
  set %mynet $did(22)
  set %mynet2 $did(24)
  set %kanal1 $did(15)
  set %kanal2 $did(17)
  set %kanal3 $did(19)
}
on 1:dialog:baglanti:sclick:9: {
  did -r baglanti 22
  did -r baglanti 24
  did -r baglanti 15
  did -r baglanti 17
  did -r baglanti 19
}
on *:connect:{
  if (%mynet isin $me) { /ns IDENTIFY %sifre | halt }
  else if {
    .timer 1 1 .nick %ananick
    if (%sifre == $null) { haltdef }
    else {
      .timer 1 2 .ns identify %sifre | echo -a 10Nick Sifreniz giriLiyor
    }
  }
  if (%one != $null) { /j %one }
  if (%two != $null) { /j %two }
  if (%three != $null) { /j %three }
}
on *:disconnect:{ .unset %sifre | unset %one | unset %two | unset %three | }
#baglanti end
Şuanda Bunu Kullanıyorm FenomenS ve CesuryureK Saolsun Tam İstediğim Şekle Geldi. Eğer Oto Nick İdentinde Nick ve Şifre Varsa Onu Dikkate Alıyor. Yoksa Nick Kısmındaki Nicki Dikkate Alıyor.

ama Şöyle Bir Sıkıntım Var İdenti ve Fullname yi Panelde Değiştiğim Halde Dikkate Almıyor. Daha Öncede Böyle Bir Problem Yoktu Daha Dün Dikkatimi Çekti..

Difuzyon 17 Mart 2009 15:09
Cevap: Oto Nick İdentine İnce Ayar
 
Kod:
#baglanti on
on 1:start:{ .bagLanti }
aLias bagLanti { .diaLog -m bagLanti bagLanti }
dialog bagLanti {
  title " RapStar mIRC Bağlantı Menüsü© "
  size -1 -1 204 144
  option dbu
  text "Nick:", 1, 3 12 25 8
  text "YedekNick:", 2, 3 21 26 8
  text "E-mail:", 3, 3 30 25 8
  box "Bağlantı Menüsü", 4, 1 1 129 54
  edit "", 5, 37 9 90 10
  edit "", 6, 37 29 90 10
  edit "", 7, 37 19 90 10
  text "Fullname: ", 10, 3 39 25 8
  edit "", 11, 37 39 90 10, autohs
  box "Otomatik Tanımlar", 12, 131 1 68 92
  text "Otomatik Giris", 13, 134 8 38 8
  text "1.Kanal", 14, 134 18 25 8
  edit "", 15, 162 17 33 10
  text "2.Kanal", 16, 134 27 25 8
  edit "", 17, 162 27 33 10
  text "3.Kanal", 18, 134 37 25 8
  edit "", 19, 162 37 33 10
  text "Otomatik Nick Tanıtım", 20, 134 50 61 8
  text "Nick", 21, 134 60 25 8
  edit "", 22, 161 59 31 10, autohs
  text "Sifre", 23, 135 70 25 8
  edit "", 24, 161 69 31 10, pass autohs
  box "Server", 26, 2 58 127 28
  edit "MyNet", 30, 8 69 117 12, disable
  button "Sohbete Gir", 34, 52 126 107 15
  button "Kaydet ve Kapat", 35, 27 110 67 15, ok
  button "İptal", 36, 112 110 62 15,cancel
  box "Oto Giriş ve Oto Nick Tanıtım İçin Önemli Açıklama! ",46, 2 88 199 20
  text "Ayarlarınızı Yaptıktan Sonra Kalıcı Olmasını İstiyorsanız Kaydet ve Kapatı Tıklamalısınız",45, 5 95 199 15
  button "Beni Unut", 9, 143 81 50 10
}
on 1:diaLog:bagLanti:init:*:{
  did -a bagLanti 5 $me
  did -a bagLanti 7 $anick
  did -a bagLanti 6 $emaiL
  did -a bagLanti 11 $fuLLname
  did -a baglanti 22 %mynet
  did -a baglanti 24 %mynet2
  did -a baglanti 15 %kanal1
  did -a baglanti 17 %kanal2
  did -a baglanti 19 %kanal3
}
on 1:diaLog:bagLanti:scLick:34:{
  if ($did(22) != $null) { nick $did(22) }
  else { nick $did(5) }
  .identd off
  if (*@* iswm $did(6)) { emailaddr $token($did(6),1,64) $+ @ }
  else { emailaddr $did(6) $+ @ }
  fullname $did(11)
  anick $did(7)
  set %one $did(15)
  set %two $did(17)
  set %three $did(19)
  set %nick $did(22)
  set %sifre $did(24)
  set %AnaNick $did(5)
  .diaLog -x bagLanti bagLanti
  .server %server
}
on 1:diaLog:bagLanti:scLick:27:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:28:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:29:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:30:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:31:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:diaLog:bagLanti:scLick:32:{ .nick $did(5) | .anick $did(6) | .diaLog -x bagLanti bagLanti | .server irc.mynet.com }
on 1:dialog:baglanti:sclick:34: { set %ufuk $did(22) }
on 1:dialog:baglanti:sclick:35: {
  set %mynet $did(22)
  set %mynet2 $did(24)
  set %kanal1 $did(15)
  set %kanal2 $did(17)
  set %kanal3 $did(19)
  set %email $did(6)
  set %fullname $did(11)
  .identd off
  if (*@* iswm $did(6)) { emailaddr $token($did(6),1,64) $+ @ }
  else { emailaddr $did(6) $+ @ }
  fullname $did(11)
  anick $did(7)
  if ($did(22) != $null) { nick $did(22) }
  else { nick $did(5) }
}
on 1:dialog:baglanti:sclick:9: {
  did -r baglanti 22
  did -r baglanti 24
  did -r baglanti 15
  did -r baglanti 17
  did -r baglanti 19
}
on *:connect:{
  if (%mynet isin $me) { /ns IDENTIFY %sifre | halt }
  elseif %ananick {
    .timer 1 1 .nick %ananick
    if (%sifre == $null) { haltdef }
    else { .timer 1 2 .ns identify %sifre | echo -a 10Nick Sifreniz giriLiyor }
  }
  if (%one != $null) { /j %one }
  if (%two != $null) { /j %two }
  if (%three != $null) { /j %three }
}
on *:disconnect:unset %sifre %one %two %three
#baglanti end


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 07:37.
Sayfa 2 Toplam 2 Sayfadan 1 2
Konuya ait 40 Mesajı başka Sayfada göster

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk