Klasor Ekleme Komutu Bot a Uygulatma - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Cybersoft · 27 Nisan 2008, 19:14

S.a. arkadaşlar bir istegim oLacak benim ßir Koruma Script botum var ve ben Koruma Script ßotuma Örnegin 3 tane Lise Hazırladım Root.txt , Admin.txt ve Oper.txt Listesinde Adı Geçenler Kullanabilsin ve ßu Komut Sadece #yönetim Kanalında ve ßotun Özelinde uygulansın istiyorum

Örnegin !klasorekle Global Dedigimde aşagıdaki Gibi istedigim klasor u eklesin

/as client klasör-adı add

ßurda klasor adını ne vermişsem onu uygulasın

ve birde

!identekle Global@ 123456

yaptıgımda önce ;

/as client klasor-adı mask add identadı@*

Komutunu uygulayarak identi eklesin ve ardından şifreyi koysun

/as client identadı set password 123456

Ve ßundan sonra

/as client identadı set mode +inex (nicklerin modelerini ayarlarsın)

Ve Ardından identi Aktif Etsin

/as client identadı enable (clienti aktif hala getirirsin)

Tabi ikisinide aynı anda uygulasın ve ßu istedigim komutları

Root.txt , Admin.txt ve Oper.txt Listesinde Adı Geçenler ßotun Özelinde ve #yönetim kanalında uygulayabilsinler onun haricinde uygulamak isteyenlere Erişiminiz Yok desin.

Şimdiden Teşekkürler Arkadaşlar.

27 Nisan 2008, 20:11

on *:text:*:#yönetim:{
if !klasorekle* iswm $1- {
if $read(root.txt,w,$nick) || $read(admin.txt,w,$nick) || $read(oper.txt,w,$nick) {
.as client $2 add
msg $chan $2 Klasörü eklendi
}
}
else {
msg $nick yetkiniz yok
}
if !identekle* iswm $1- {
if $read(root.txt,w,$nick) || $read(admin.txt,w,$nick) || $read(oper.txt,w,$nick) {
.as client admin mask add $+($2,*)
.as client $2 set password $3
.as client soplar set mode +inex
.as client $2 enable
msg $chan $2 Nicki $3 Şifresiyle eklendi
}
else {
msg $nick yetkiniz yok
}
}
}

Cybersoft · 28 Nisan 2008, 18:03

S.a.

Kardeş klasor eklemek kısmı oldu fakat şunu yazmayı unutmuşum

!identekle kısmında identi Eklemek için Klasor ismi ßelirtmem Gerekiyor yani şöyle diyim

!identekle Klasor-adı ident@ identşifresi

ßu şekilde uyguladıgımda klasor-adı ve açmak istedigim ident@ ve ident e verecegim şifre yi eklesin istiyorum?

28 Nisan 2008, 18:34

Kodda bi hata vardı düzelttim tekrar alabilirsin.. Şimdi bahsettiğin şeyden bi tek şey anlamadım bana açıklama yapıyorsun ama komutu vermiyorsun (: komutu ver hatalı olan yeri kırmızıyla göster yardımcı olayım

Cybersoft · 28 Nisan 2008, 18:42

!identekle klasoradı identadı 123456

yaptıgımda önce ;

/as client klasor-adı mask add identadı@* (burda istedigim klasor e istedigim identi açıcak )

Komutunu uygulayarak identi eklesin ve ardından şifreyi koysun

/as client identadı set password 123456 (burda belirttigim ident ' e şifre belirleyecek )

Ve ßundan sonra

/as client identadı set mode +inex (burda belirttigim ident in modelerini ayarlarsın)

Ve Ardından identi Aktif Etsin

/as client identadı enable (burda ise belirttigim identin clienti aktif hala getirirsin)

umarım bu defa olmustur.

28 Nisan 2008, 19:06

on *:text:*:#yönetim:{
if !klasorekle* iswm $1- {
if $read(root.txt,w,$nick) || $read(admin.txt,w,$nick) || $read(oper.txt,w,$nick) {
.as client $2 add
msg $chan $2 Klasörü eklendi
}
}
else {
msg $nick yetkiniz yok
}
if !identekle* iswm $1- {
if $read(root.txt,w,$nick) || $read(admin.txt,w,$nick) || $read(oper.txt,w,$nick) {
.as client $2 mask add $+($3,*)
.as client $3 set password $4
.as client $3 set mode +inex
.as client $3 enable
msg $chan $2 Nicki $3 Şifresiyle eklendi
}
else {
msg $nick yetkiniz yok
}
}
}

!ident.. muhabbeti için;

$2 = klasör adı
$3 = identd adı
$4 = Şifre

Olarak değişgen kazanır hata varsa komutlarda bak düzeltirsin hata yok gibi gözüküyor.. Kırmızı olan yere dikkat et önceden soplar diye göstermiştin şimdi böylemi olacak bak bakalım

Cybersoft · 28 Nisan 2008, 19:19

[18:17] <@Security> !klasorekle sevda
[18:17] <Pamela> sevda Klasörü eklendi

ßu Kısım Çalışıyor.

[18:19] <@Security> !identekle sevda deneme 123456
[18:20] <Pamela> sevda klasoru deneme identi Şifresiyle eklendi

Diyor Fakat Eklemiyor Status te ßakın ßunları Diyor ;

-irc.edasohbet.com- Failure -- A client mask must be of the form <user_mask>@<host_mask>
-
-irc.edasohbet.com- Failure -- Client "deneme" does not exist
-
-irc.edasohbet.com- Failure -- Client "deneme" does not exist
-
-irc.edasohbet.com- Failure -- Client "deneme" does not exist

+ bide : root.txt te nickim oLmasına Ragmen Özelimde yetkiniz yok Diyor.

28 Nisan 2008, 20:19

şimdi dene $3 yerine $32 yazmışım komutları kontrol et

XcLusive · 30 Nisan 2008, 01:06

Kod: Kodu kopyalamak için üzerine çift tıklayın!

alias iekle writeini klasor.ini $1-
alias isil remini klasor.ini $1-
alias klasor return $ini(klasor.ini,$1-)
on *:text:*:?:{
  if ($1 == !rootekle) && ($2) { 
    if (!$istok(MasterNick,$nick,32)) { msg $nick bu komutu kullanmaya yetkili değilsiniz | halt }
    if ($read(root.txt,w,$2)) { msg $nick $2 Daha önceden eklenmiş | halt }
    write root.txt $2 | msg $nick $2 Root listesine eklendi
  }
  if ($1 == !rootsil) && ($2) {
    if (!$istok(MasterNick,$nick,32)) { msg $nick bu komutu kullanmaya yetkili değilsiniz | halt }
    if (!$read(root.txt,w,$2)) { msg $nick $2 Daha önceden silinmiş | halt }
    write $+(-ds,$2) root.txt | msg $nick $2 Root listesinden silindi
  }
  if ($1 == !klasorekle) {
    if (!$read(root.txt,w,$nick)) { msg $nick bu komutu kullanmaya yetkili değilsiniz | return }
    if !$2 && !$3 && !$3 { msg $nick komut kullanımı : !identekle klasör ident@* şifre | return }
    if ($chr(64) !isin $3) { msg $nick ident maskı " ident@* " gibi olmalıdır | return }
    if ($klasor($2) != 0) { msg $nick $2 Klasörü daha önceden eklenmiş | return }
    $iekle($2,klasor,$2)
    $iekle($2,ident,$3)
    $iekle($2,ipass,$4)
    /as client $2 mask add $3
    /as client ident-adı set password $4
    /as client $3 enable
    msg $nick klasör : $2 - ident : $3 - şifre : $4 , olarak eklendi..
  }
  if ($1 == !klasorsil) {
    if (!$read(root.txt,w,$nick)) { msg $nick bu komutu kullanmaya yetkili değilsiniz | return }
    if !$2 { msg $nick komut kullanımı : !idensil klasöradı | return }
    if ($klasor($2) == 0) { msg $nick $2 Klasörü ekli değil. | return }
    $isil($2)
    msg $nick $2 klasörü başarıyla silindi..
    /as client $2 del
  }
}
on *:text:*:#kanal:{
  if ($1 == !ident) {
    if (!$read(root.txt,w,$nick)) { msg $nick bu komutu kullanmaya yetkili değilsiniz | return }
    if !$2 || ($chr(64) isin $3) { msg $chan komut kullanımı : !ident identadı - mask (@*) kullanmayınız | return }
    var %v = 1,%w = $ini(klasor.ini,0)
    set %ident $2
    while (%v <= %w) {
      if (%ident isin $readini(klasor.ini,$klasor(%v),ident)) {
        set %identd var
        msg $chan Klasör : $klasor(%v)
        msg $chan İdent Maskı : $readini(klasor.ini,$klasor(%v),ident)
        msg $chan İdent Şifresi : $readini(klasor.ini,$klasor(%v),ipass)
      }
      elseif (%v == %w) && (%identd != var) { msg $chan %ident herhangi bir klasörde ekli değil }
      inc %v 1
    }
    unset %identd
  }
}

!rootekle nick
!rootsil nick
komutlarını kullanabilmek için

Kod: Kodu kopyalamak için üzerine çift tıklayın!

    if (!$istok(MasterNick,$nick,32)) { msg $nick bu komutu kullanmaya yetkili değilsiniz | halt }

satırındaki MasterNick kısmını değişerek botta yetkili olacak nick'i girin..

(root.txt dosyasına eklenmiş nickler için geçerlidir MasterNick'i bunada ekleyin)

!klasorekle klasor identd@* şifre
!klasorsil klasor

sadece kanalda geçerli olan komut
!ident ident
komutudur..

[00:42:47] <XcLusive> !kLasorekLe haLiL xcLusive@* 123456
[00:42:47] <Guest38343> haLiL Klasörü daha önceden eklenmiş
[00:42:53] <XcLusive> !klasorsil halil
[00:42:53] <Guest38343> halil klasörü başarıyla silindi..
[00:42:57] <XcLusive> !kLasorekLe haLiL xcLusive@* 123456
[00:42:58] <Guest38343> klasör : haLiL - ident : xcLusive@* - şifre : 123456 , olarak eklendi..

#kanalda..
[00:45:53] <XcLusive> !ident xclusive
[00:45:53] <Guest38343> Klasör : haLiL
[00:45:54] <Guest38343> İdent Maskı : xcLusive@*
[00:45:54] <Guest38343> İdent Şifresi : 123456

---------------------------------------
ident için eklenmiş şifreyi göstermemek istiyorsanız

Kod: Kodu kopyalamak için üzerine çift tıklayın!

msg $chan İdent Şifresi : $readini(klasor.ini,$klasor(%v),ipass)

satırını silin..

not : sanırım bu sistem cr için yapılmış bir paralı bota ait, para konusunu pek sevmediğim için yayınlamak istedim..

SessizKaLp · 07 Ekim 2009, 09:53

IF 'te aradım ama bulamadım, bende yapmaya çalıştım aslında ama olmadı.
Bot bu konu başlığında ki klasor ident vs gibi eklemeler yaptığımız gibi.

!identd klasor-adı eski şifre yeni şifre

şeklinde uygulama yaptırabilirmiyiz?

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
f1 komutu ile kara liste ekleme	XDie	mIRC Scripting Sorunları	13	24 Haziran 2019 18:37
!ekle komutu ile access ekleme.	AntepLi	mIRC Parça Kodlar	15	23 Kasım 2018 22:26
Java ile klasor, alt klasor ve dosyalari yeni bir klasore kopyalamak	YazılımMimarı	Java	0	12 Haziran 2012 20:22
&temizle bu komutu chanserv uygulatma [istek]	RmX78	IRCServices	3	19 Eylül 2011 04:56
belirli açılışta komutu uygulatma	fener1907	mIRC Scripting Sorunları	9	19 Şubat 2010 18:41

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.