Kod
menu channel,menubar,status {
-
Oto Nick/Oper Şifre Ayarla
.Ana Ayarlar: {
if ($dialog(nickchgr)) dialog -c nickchgr nickchgr
else dialog -m nickchgr nickchgr
}
.-
.Yeni Oper Ekle: {
if ( %opernick === $null ) { set %opernick $$*="Oper Nickiniz" | if (%operpass === $null ) { set %operpass $$?*="Oper Şifreniz" | if (%operserver === $null ) { set %operserver $$?*="Enter the Server You have an Oline On" | goto end } } }
else { echo -la Sık Sık Ayni Oper Giriyorsunuz ! | halt }
:end
echo -a Operiniz Eklenmiştir !
}
.Oper Kaldir:unset %opernick | unset %operpass | unset %operserver
.-
.Yeni Nick Ekle: {
if ( %cnick1 == $null ) { set %cnick1 $$?="Nick Ekle" | notify %cnick1 | if ( %cpass1 === $null ) { set %cpass1 $$?*="Şifreniz" | goto end } }
if ( %cnick2 == $null ) { set %cnick2 $$?="nick Ekle" | if (%cpass2 === $null ) { set %cpass2 $$?*="Enter a Password" | goto end } }
if ( %cnick3 == $null ) { set %cnick3 $$?="Nick Ekle" | if (%cpass3 === $null ) { set %cpass3 $$?*="Enter a Password" | goto end } }
if ( %cnick4 == $null ) { set %cnick4 $$?="Nick Ekle" | if (%cpass4 === $null ) { set %cpass4 $$?*="Enter a Password" | goto end } }
else { echo -la Çok Fazla Sayida Nick var | halt }
:end
echo -a Nick Listeniz Eklenmiştir : =)
}
.Yeni Şifre:
..%cnick1:nick %cnick1 | ns identify %cpass1
..%cnick2:nick %cnick2 | ns identify %cpass2
..%cnick3:nick %cnick3 | ns identify %cpass3
..%cnick4:nick %cnick4 | ns identify %cpass4
.Nick Kaldir
..%cnick1:notify -r %cnick1 | unset %cnick1 | unset %cpass1
..%cnick2:unset %cnick2 | unset %cpass2
..%cnick3:unset %cnick3 | unset %cpass3
..%cnick4:unset %cnick4 | unset %cpass4
-
}
; ====================
; Nickchanger Dialog
; ====================
dialog nickchgr {
title "Oto Nick İdentify Oto Oper Gir"
size 125 75 300 105
option dbu
icon $scriptdir\01.ico, 0
box "Nickler", 6, 6 1 130 58
radio "Nick 1:", 10, 9 10 25 10, group push
radio "Nick 2:", 11, 9 22 25 10, push
radio "Nick 3:", 12, 9 34 25 10, push
radio "Nick 4:", 13, 9 46 25 10, push
edit "", 20, 36 10 94 10
edit "", 21, 36 22 94 10
edit "", 22, 36 34 94 10
edit "", 23, 36 46 94 10
edit "", 24, 40 72 65 10, pass
button "Kyt", 30, 255 10 15 10
button "Kyt", 31, 255 22 15 10
button "Kyt", 32, 255 35 15 10
button "Kyt", 33, 255 47 15 10
button "Kyt", 34, 255 72 15 10
button "Sil", 40, 275 10 15 10
button "Sil", 41, 275 22 15 10
button "Sil", 42, 275 35 15 10
button "Sil", 43, 275 47 15 10
button "Sil", 44, 275 72 15 10
button "Kapat", 101, 187 89 52 12, ok
button "Change Nick", 102, 5 89 46 12
button "Tümünü Sil", 113, 243 89 52 12
box "Şifreniz", 3, 137 1 158 58
edit "", 51, 165 10 85 10, pass
edit "", 52, 165 22 85 10, pass
edit "", 53, 165 35 85 10, pass
edit "", 54, 165 47 85 10, pass
edit "", 55, 105 72 65 10, pass
edit "", 5, 170 72 82 10
text "Pass 1", 81, 140 10 22 8, center
text "Pass 2", 82, 140 22 22 8, center
text "Pass 3", 83, 140 35 22 8, center
text "Pass 4", 84, 140 47 22 8, center
text "Oper Pass:", 85, 108 63 28 8, center
text "irc.trsohbet.com", 4, 170 63 43 8, center
box "Keep Nick 1", 1, 53 85 64 17
radio "Aç", 92, 55 93 29 8, group push
radio "Kapat", 93, 86 93 29 8, push
box "Auto Identify", 1777, 121 85 64 17
radio "Aç", 90, 123 93 29 8, group push
radio "Kapat", 91, 154 93 29 8, push
box "Auto-Oper", 2, 6 59 289 26
radio "Aç", 14, 8 66 29 8, group push
radio "Kapat", 15, 8 75 29 8, push
text "Oper Nick:", 9, 41 63 25 9
}
on *:dialog:nickchgr:init:*: {
if (%cnick1 != $null) { did -a nickchgr 20 %cnick1 } | if (%cnick2 != $null) { did -a nickchgr 21 %cnick2 }
if (%cnick3 != $null) { did -a nickchgr 22 %cnick3 } | if (%cnick4 != $null) { did -a nickchgr 23 %cnick4 }
if (%opernick != $null) { did -a nickchgr 24 %opernick } | did -c nickchgr 10
if (%cpass1 != $null) { did -a nickchgr 51 %cpass1 } | if (%cpass2 != $null) { did -a nickchgr 52 %cpass2 }
if (%cpass3 != $null) { did -a nickchgr 53 %cpass3 } | if (%cpass4 != $null) { did -a nickchgr 54 %cpass4 }
if (%operpass != $null) { did -a nickchgr 55 %operpass } | if (%operserver != $null) { did -a nickchgr 5 %operserver }
if (%autoid.enable = true) { did -c nickchgr 90 }
if (%autoid.disable = true) { did -c nickchgr 91 }
if (%keepnick.enable = true) { did -c nickchgr 92 }
if (%keepnick.disable = true) { did -c nickchgr 93 }
if (%autooper.on = true) { did -c nickchgr 14 }
if (%autooper.off = true) { did -c nickchgr 15 }
}
on *:dialog:nickchgr:sclick:*: {
if ($did == 30) { set %cnick1 $did(nickchgr,20).text } | If ($did == 30) { notify %cnick1 } | if ($did == 31) { set %cnick2 $did(nickchgr,21).text }
if ($did == 32) { set %cnick3 $did(nickchgr,22).text } | if ($did == 33) { set %cnick4 $did(nickchgr,23).text }
if ($did === 34) { set %opernick $did(nickchgr,24).text | set %operpass $did(nickchgr,55).text | set %operserver $did(nickchgr,5).text }
if ($did == 40) { did -r nickchgr 20 | set %cnick1 $did(nickchgr,20).text } | if ($did == 41) { did -r nickchgr 21 | set %cnick2 $did(nickchgr,21).text }
if ($did == 42) { did -r nickchgr 22 | set %cnick3 $did(nickchgr,22).text } | if ($did == 43) { did -r nickchgr 23 | set %cnick4 $did(nickchgr,23).text }
if ($did === 30) { set %cpass1 $did(nickchgr,51).text } | if ($did === 31) { set %cpass2 $did(nickchgr,52).text }
if ($did === 32) { set %cpass3 $did(nickchgr,53).text } | if ($did === 33) { set %cpass4 $did(nickchgr,54).text }
if ($did == 44) { unset %opernick | unset %operpass | unset %operserver | dialog -x nickchgr nickchgr | dialog -m nickchgr nickchgr }
if ($did == 40) { did -r nickchgr 51 | set %cpass1 $did(nickchgr,51).text } | if ($did == 41) { did -r nickchgr 52 | set %cpass2 $did(nickchgr,52).text }
if ($did == 42) { did -r nickchgr 53 | set %cpass3 $did(nickchgr,53).text } | if ($did == 43) { did -r nickchgr 54 | set %cpass4 $did(nickchgr,54).text }
if ($did == 90) { did -c nickchgr 90 | set %autoid on | set %autoid.enable true | set %autoid.disable false }
if ($did == 91) { did -c nickchgr 91 | set %autoid off | set %autoid.disable true | set %autoid.enable false }
if ($did == 92) { did -c nickchgr 92 | set %keepnick on | set %keepnick.enable true | set %keepnick.disable false }
if ($did == 93) { did -c nickchgr 93 | set %keepnick off | set %keepnick.disable true | set %keepnick.enable false }
if ($did == 14) { did -c nickchgr 14 | set %autooper on | set %autooper.on true | set %autooper.off false }
if ($did == 15) { did -c nickchgr 15 | set %autooper off | set %autooper.off true | set %autooper.on false }
if ($did = 113) { if ($input(Addondaki Tüm Sifreleri Silmek istediginden Emin misin ?,yw,Uyariyorum Seni,,) == $true) {
notify -r %cnick1 | unset %cnick1 | unset %cnick2 | unset %cnick3 | unset %cnick4 | unset %cpass1 | unset %cpass2 | unset %cpass3 | unset %cpass4 | unset %opernick | unset %operpass | unset %operserver | dialog -x nickchgr nickchgr | dialog -m nickchgr nickchgr
echo -a 4......Trbkler Tüm şifreleri Sildin :) Bilmiyorsan Npancan şimdi :P }
}
if ($did == 102) {
if ($did(nickchgr,10).state == 1) { if ($did(nickchgr,20).text != $null) { nick $did(nickchgr,20).text { if ($did(nickchgr,51).text != $null) { ns identify $did(nickchgr,51).text } } } }
if ($did(nickchgr,11).state == 1) { if ($did(nickchgr,21).text != $null) { nick $did(nickchgr,21).text { if ($did(nickchgr,52).text != $null) { ns identify $did(nickchgr,52).text } } } }
if ($did(nickchgr,12).state == 1) { if ($did(nickchgr,22).text != $null) { nick $did(nickchgr,22).text { if ($did(nickchgr,53).text != $null) { ns identify $did(nickchgr,53).text } } } }
if ($did(nickchgr,13).state == 1) { if ($did(nickchgr,23).text != $null) { nick $did(nickchgr,23).text { if ($did(nickchgr,54).text != $null) { ns identify $did(nickchgr,54).text } } } }
}
}
on 1:notice:*identify*:*: {
if ( %autoid = on ) {
If $nick = nickserv {
if ( $me = %cnick1 ) { ns identify %cpass1 }
if ( $me = %cnick2 ) { ns identify %cpass2 }
if ( $me = %cnick3 ) { ns identify %cpass3 }
if ( $me = %cnick4 ) { ns identify %cpass4 }
}
}
}
on 1:unotify: {
if ( %keepnick = on ) {
if ($nick == %cnick1) { nick $nick ) }
else halt
}
}
on 1:CONNECT: {
if ( %autooper = on ) {
if $server = %operserver { oper %opernick %operpass | nick %cnick1 }
else halt
}
Bulundugunuz Kanalda Sağ Tıklama ile Ana Menüye Gelmektedir.Ekstra işlem gerektirmez.
Kendinize Göre Uyarlamayı Unutmayınız.
Klavyeniz den Alt + R Tuşlarına Basarak Acılan Pencere de REMOTE Kısmına Basıyoruz
Ardından DOSYA Kısmına Basarak Yeni Bir Sayfa acarak içine atıyoruz ve kapatıyoruz