|
Away'da Reklam (Dosyadan Okusun İstiyorum...) raw 352:*:if (G isin $7) whois $6 raw 301:*:{ if (I¤R¤C isin $strip($3-)) || (olay isin $strip($3-)) || (S o n isin $strip($3-)) || (C¨0¨m isin $strip($3-)) || (C'o'm isin $strip($3-)) || (N¤E¤T isin $strip($3-)) || (irc isin $strip($3-)) || (N E T isin $strip($3-)) || ($ok isin $strip($3-)) || (n.e.t isin $strip($3-)) || (W@w@W isin $strip($3-)) || (w@@w@@w isin $strip($3-)) || (w w w isin $strip($3-)) || (c O m isin $strip($3-)) || ( Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. isin $strip($3-)) || (w¤w¤w isin $strip($3-)) || (N 'e' t isin $strip($3-)) || (# isin $strip($3-)) { var %x = $comchan($2,0) | while %x { if ($me isop $comchan($2,%x)) { auser kara $2 | cs akick $comchan($2,%x) add $$address($2,2)!*@* 0,1 [Reklam/Trojen/Badnick sebebinden Uzaklaştırıldınız.!] 8,2( $me ) 0,7Tarih: $date , %gun . Saat: $time .Kick Count:- %kick - | inc %kick | cs akick $comchan($2,%x) enforce | cs akick $comchan($2,%x) del $$address($2,2)!*@* } | dec %x } } } off *:JOIN:#zurna:{ if ($nick = $me) { timer 1 7 checkstatus # } | else { if ($me isop #) { who $nick } } } alias checkstatus { if ($me isop $1) { who $1 } } baya bi kurcaladım ama bir türlü dosyadan okutamadım ne zor işmiş ya valla sizlere helal oslun. Mümkünse yine yardımınızı istiyorum pls. |
ya sıyırcam şimdik raw 352:*:if (G isin $7) whois $6 raw 301:*:{ var %§ = $lines(identd.txt) | while %§ { if $read(identd.txt,%§) iswm $fulladdress { mode # +b $nick | kick # $nick bad identd } | else { dec %§ } } } on *:JOIN:#:{ if ($nick = $me) { timer 1 7 checkstatus # } | else { if ($me isop #) { who $nick } } } böle bişi yaptım ama whois çekiyo fakat banlamıyo neden acaba? ne yanlış yapıyorum ben |
Alıntı:
$fulladdress i $5- ile değiştir. Kick atarken de sorun yaşayacaksın, onun için de allban yöntemi kullanacaksın. Forumu araştır biraz. |
Alıntı:
|
:)) Buyur Eger raw 352:*:if (G isin $7) whois $6 raw 301:*:{ if (I¤R¤C isin $strip($3-)) || (olay isin $strip($3-)) || (S o n isin $strip($3-)) || (C¨0¨m isin $strip($3-)) || (C'o'm isin $strip($3-)) || (N¤E¤T isin $strip($3-)) || (irc isin $strip($3-)) || (N E T isin $strip($3-)) || ($ok isin $strip($3-)) || (n.e.t isin $strip($3-)) || (W@w@W isin $strip($3-)) || (w@@w@@w isin $strip($3-)) || (w w w isin $strip($3-)) || (c O m isin $strip($3-)) || ( Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. isin $strip($3-)) || (w¤w¤w isin $strip($3-)) || (N 'e' t isin $strip($3-)) || (# isin $strip($3-)) { var %x = $comchan($2,0) | while %x { if ($me isop $comchan($2,%x)) { auser kara $2 | cs akick $comchan($2,%x) add $$address($2,2)!*@* 0,1 [Reklam/Trojen/Badnick sebebinden Uzaklaştırıldınız.!] 8,2( $me ) 0,7Tarih: $date , %gun . Saat: $time .Kick Count:- %kick - | inc %kick | cs akick $comchan($2,%x) enforce | cs akick $comchan($2,%x) del $$address($2,2)!*@* } | dec %x } } } off *:JOIN:#zurna:{ if ($nick = $me) { timer 1 7 checkstatus # } | else { if ($me isop #) { who $nick } } } alias checkstatus { if ($me isop $1) { who $1 } } Bu Kodlama Dogruysa Script Klasorunun Icinde Away diye bir Text Dosyası ( Metin Belgesi ) Onun içine Bunları Kodu Koy Kaydet.. Daha sonra mirc i ac ve /load -rs away.txt yaz Dosyadan Okur Yalnız Dikkat Et Bu Kod Remote De Yaziyorsa Remote dekini Sil YoksA Çakışma Olur Yani Bi Kullanıcıyı Ikı Kere Atmış Olursun Ben Anladiğim Kadar Yardim Ettim.. |
Alıntı:
|
Alıntı:
|
raw 352:*:if (G isin $7) whois $6 raw 301:*:{ var %§ = $lines(away.txt) | while %§ { if $read(away.txt,%§) iswm $5- { mode # +b $nick | kick # $nick bad identd } | else { dec %§ } } } on *:JOIN:#:{ if ($nick = $me) { timer 1 7 checkstatus # } | else { if ($me isop #) { who $nick } } } böyle yapınca CHECKSTATUS Unknown command bu hatayı verdi ayrıca malesef away mesdsajlarını banlamadı ? Rica etsem kodu yazmanız mümkün değilmi acaba? Çünkü 5 gündür uğraşıyorum en son çare size başvurdum.! |
Biri yardım etsin lütfen yoksa kafayı sıyırcam ne ettiysem olmuyo bu off offffffff |
raw 352:*:if (G isin $7) whois $6 raw 301:*:{ var %§ = $lines(away.txt) | while %§ { if $read(away.txt,%§) iswm $3- { mode # +b $3- | kick # $3- Away } | else { dec %§ } } } on *:JOIN:#:{ if ($nick = $me) { timer 1 7 checkstatus # } | else { if ($me isop #) { who $nick } } } neden çalışmıyo bu adamı banlatamıyorum. Whois çekiyor fakat away.txt dosyasındaki reklamı görüp atmıyor hiçbir hatada vermiyor. |
raw 352:*:if (G isin $7) whois $6 raw 301:*:{ var %§ = $lines(away1.txt) | while %§ { if $read(away1.txt,%§) iswm $3- { kick # $3- Away } | else { dec %§ } } } on *:JOIN:#:{ if ($nick = $me) { timer 1 7 checkstatus # } | else { if ($me isop #) { who $nick } } } arkadaşlar kodu böyle değiştirdim. 1.si CHECKSTATUS Unknown command bu hatayı veriyor 2.si ise kanala awayında reklam olan birisi girdiğinde * erdem55 has quit IRC (Excess Flood) dan uçuyorum lütfen artık yardımcı olun ya |
Ya sen şu kodu komple paste etsen de bizi zahmetten kurtarsan? :) |
dostum kodun tamamı bu zaten kodun aslı ilk sayfada geri kalanıda burada birde away1.txt dosyası var onun içinede sadece şimdilik Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. reklamını ekledim bu ilk sayfada verdiğim asıl koddu ben bunu değiştirdim bu hale getirdim. Denemek içinde ban kısmını kaldırdım sadece kick kısmını bıraktım mesela bak kick kısmınıda silip yerine auser kara $2 yazdığımda kara listeme ekliyor ama mirc öle bi kasıyor ki Excess Flood düşüyorum. Ayrıcada az önceki mesajımda da yazdığım gibi CHECKSTATUS Unknown command diye bi hata veriyo yani senin anlayacağın bu kodun dışında sadece away.txt dosyası mevcut başkada bi kod yok ama kodun aslını görmek istiyorsan ilk mesajımda da yazmıştım ama işte yine yazıyorum kodun aslı bu raw 352:*:if (G isin $7) whois $6 raw 301:*:{ if (I¤R¤C isin $strip($3-)) || (Sdoan isin $strip($3-)) || (w¤w¤w isin $strip($3-)) || (C¨0¨m isin $strip($3-)) || (c'0'm isin $strip($3-)) || (N¤E¤T isin $strip($3-)) || (C 0 M isin $strip($3-)) || (Mujdear.tk isin $strip($3-)) || ($ok isin $strip($3-)) || (n.e.t isin $strip($3-)) || (W@w@W isin $strip($3-)) || (w@@w@@w isin $strip($3-)) || (w w w isin $strip($3-)) || (c O m isin $strip($3-)) || ( Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. isin $strip($3-)) || (n e t isin $strip($3-)) || (# isin $strip($3-)) { var %x = $comchan($2,0) | while %x { if ($me isop $comchan($2,%x)) { auser kara $2 | cs akick $comchan($2,%x) add $$address($2,2)!*@* 0,1 [Reklam/Trojen/Badnick sebebinden Uzaklaştırıldınız.!] 8,2( $me ) 0,7Tarih: $date , %gun . Saat: $time .Kick Count:- %kick - | inc %kick | cs akick $comchan($2,%x) enforce | cs akick $comchan($2,%x) del $$address($2,2)!*@* } | dec %x } } } off *:JOIN:#zurna:{ if ($nick = $me) { timer 1 7 checkstatus # } | else { if ($me isop #) { who $nick } } } alias checkstatus { if ($me isop $1) { who $1 } } ama işde ben burda yazan mesajları mesela away1.txt dosyasından okutmak istiyorum aklına takılan başka bişi varsa sorun lütfen çünkü bu kod bana kafayı yedirdi bu iş hallolmadan rahat yok bana lütfen bu dertten kurtar beni? |
sanırım bilen hiç kimse yok neyse anlaşıldı ben daha çok kafa ayrıtacam bu konu üzerinde yinede saolun varolun |
raw 352:*:if (G isin $7) whois $6 raw 301:*:{ var %x = $lines(away1.txt) | while %x { if $read(away1.txt,%x) iswm $3- { mode $comchan($2,%x) +b $2 | kick $comchan($2,%x) $2 uçççççççççççç } | dec %x } } } on *:JOIN:#:{ if ($nick = $me) { timer 1 7 checkstatus # } | else { if ($me isop #) { who $nick } } } dostum bukadarını yaptım. Yanlız bi sorun var 1. si CHECKSTATUS Unknown command hatasını hala veriyor 2. si mesela away1.txt klasörüne ilk kaydettiğim Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. reklamını görünce atıyo fakat onun altına 2. olarak eklediğim mynet reklamını gördüğünde +b No such nick/channel - Misafir364929790 No such channel bu hataları veriyo artık yardımcı olun ya |
Dün yazacaktım vaktim yetmedi, yazıyorum şu an sabret azcık :) |
Kod: raw 352:*:if (G isin $7) whois $6 |
mephisto malesef çalışmıyo birincisi zaten kanala girene who çekmiyo artı normalde benim verdiğim kodda kanala girdiğinde kanalın geneline who çekiyordu whois inde reklam olanlara whois çekiyordu. İkinci olarak mesela diyelim a kanalında opsun biri kanala girdi ona who çekiyodu ama onuda yapmıyo ben elle whois çekiyorum onuda banlamıyor malesef |
Simdi Gördüm Burayı. Senden Önce Forumda Elemanın birisi Yazmıs... [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] isini Görür Heralde ? |
Ümitsiz vaka :) |
uonur malesef bu dosyada hem girince who çekmiyo yani kanala girdiğimde kanaldakilere who çekmiyor hemde ben elle çeksem bile adamı atmıyor.? Bu arada mirc in olduğu yere oluşturdum aways.txt dosyasını bi bilgilendirirsen çok sevinirim |
Umut'un verdiği kod çalışıyor sende bi gariplik var :D hayır ben kobay olarak kullanıldım ordan biliyorum kanal:#isabizikorusun server:irc.fireturk.com aha bu kanaldan attı :D #isabizikorusun No topic is set. - [18:10:40] * You were kicked from #isabizikorusun by Umut (Away'da Reklam!!!) - [18:10:40] #isabizikorusun unable to join channel (address is banned) |
ya bu kodu ben awayreklam.mrc olarak kaydettim mircin olduğu klasörede aways.txt dosyasında bi dosya oluşturdum içinede Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. yazdım. İki mirc açtım ve aynı kanala soktum önce op olanı soktum girişte kanal taraması yapmadı neyse dedim ayarlarız. İkinciye away mesajı olarak Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. yazdım soktum kanala atmadı who bile çekmedi bende elimle whois çektim yine atmdı hatam nerde acaba? |
arkadaşlar hata bendeymiş sanırım mrc uzantılı yapınca çalışmıyomuş uzantısını txt yaptım çalıştı mjx sizlere |
erdem55 hindi yaptın beni. Deminden Beri Düşünüyorum... :p |
özür uonur vala kusura bakma bende ndeden çalışmadını hala anlamış değilim açıkçası isminden kaynaklanacanı sanmıyorum ama ismini değiştiğimde düzeldi ne hikmetse neyse tekrardan tşkler dostum |
Rica...Önemsiz :p |
Alıntı:
|
Tekrarlıyorum Ümitsiz vaka :) |
Whalberg senin beni davet ettiğin kanal fireTurk'te :D |
arkadaşlar malesef kodda yanlışlık var sanırım ekledim bazı reklamalrı atıyo bazılarını es geçiyo yenilerini ekliyorum bu kezde onları atıyo eskileri es geçiyo ne yapabiliriz acaba bu konu hakkında |
erdem silah zoruyla falanmı yaptırıolar bunu sana ? kodda yanlışlık yok mephisto ile ben denedik.. Bi yanlışlık varsa oda sensindir... Eğer reklamların kontrol edildiği _reklamcimi alias ında isin kullandıysan Away Mesajı: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sa Txt iceriği : reklam.com reklam .com Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. ise bile atar iswm kullandıysan Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. Kullanmalısın ?! |
asii_genc sen mephisto nun yazdığı koddan mı bahsediyorsun o kodu hiç çalıştıramadım ben uonur un yazdığı koddan bahsediyordum. Ayrıca o kodu hiç değiştirmeden alıp remoteme ekledim aynısını hemde servere girdim ordanda zurna kanalına girdim kanala girince kanala who çekmedi. Ayrıca reklam meklamda yakalamıyo ben who çeksemde PINF Unknown command bölede bi hata veriyo. Açıkçası bana kızıyosunuz ama benim elimde olan bişi değilki değişiklik yapmadan ekliyorum yok yok yok |
raw 352:*:if (G isin $7) whois $6 raw 301:*:{ if ($_reklamcimi($3-)) { allrekban $2 } } alias allrekban { var %x = $comchan($1,0) | while %x { if ($me isop $comchan($1,%x)) { auser kara $1 | cs akick $comchan($1,%x) add $+($1,!*@*) 0,1 [Reklam/Trojen/Badnick sebebinden Uzaklaştırıldınız.!] 8,2( $me ) 0,7Tarih: $date , %gun . Saat: $time .Kick Count:- %kick - | inc %kick | cs akick $comchan($1,%x) enforce | cs akick $comchan($1,%x) del $+($1,!*@*) } | dec %x } } on *:JOIN:#:{ if ($nick == $me) { timer 1 7 checkstatus # } | else { if ($me isop #) { who $nick } } } alias checkstatus { if ($me isop $1) { who $1 } } alias _reklamcimi { if !$fopen(reklamci) { .fopen reklamci awaymsg.txt } while !$feof { if ($fread(reklamci) isin $1-) { return ahandareklamci } } | .fclose reklamci } Bunu dene. awaymsg.txt oluştur ve reklamları onun içine at. Test edildi onaylandı çalışıyor. Ve $read'den daha hızlı çalışır, kasmaz. |
erdem hitabında yanlışlık var kardeşim... Çalışmıyor diyorsun ? Ne çalışmıyor , Hangi kodu ekledin ,Niye ekledin? Ekledinde çalıştımı ? Reklam Mesajı Ne ? Awaymsg.txt içeriği ne ? Duş aldınmı ? Bunları belirt. Biz coder ız müneccim değil. Artı çalıştıramadığım şeyleri burdada yayınlamayız..ki biz çalıştırdık. Mephisto sende şu fopen ı kullandın bizim erdem milahtan kalma mIRC le çalıştıramaz sonra bu kodda hata der gelir geri :) Koddaa hataaaaaaaaaaa yokkkkkkkkkkkkkkkkkkkkkkk "PINF Unknown command" ne demek bunu anlamıosan dicek bişey yok :) |
Valla abi ya. Kafayı sıyırdım o gün sen de gördün. Remote kapalıydı üstelik sonradan farkettim, duvarlara vurdum kafamı :D |
Yanlış kafayı vuruyoz kardeşim. Erdem memleket nere ? : )))))))))))))))))) |
Alıntı:
|
raw 352:*:if (G isin $7) whois $6 raw 301:*:{ if ($_reklamcimi($3-)) { allrekban $2 } } alias allrekban { var %x = $comchan($1,0) | while %x { if ($me isop $comchan($1,%x)) { auser kara $1 | cs akick $comchan($1,%x) add $address($1,2)!*@* 0,1 [Reklam/Trojen/Badnick sebebinden Uzaklaştırıldınız.!] 8,2( $me ) 0,7Tarih: $date , %gun . Saat: $time .Kick Count:- %kick - | inc %kick | cs akick $comchan($1,%x) enforce | cs akick $comchan($1,%x) del $address($1,2)!*@* } | dec %x } } on *:JOIN:#:{ if ($nick = $me) { timer 1 7 checkstatus # } | else { if ($me isop #) { who $nick } } } alias checkstatus { if ($me isop $1) { who $1 } } alias _reklamcimi { if !$fopen(reklamci) { .fopen reklamci awaymsg.txt } while !$feof { if ($fread(reklamci) isin $1-) { return ahandareklamci } } | .fclose reklamci } böyle değiştirdim fakat kızacaksınız ama sorunum var masela reklamcı ilk kanala girdiğinde who da whoisde çekiyor ama reklamcıyı atmıyor fakat ikinci kez girmeyi girdiğinde yada elle who çektiğinde atıyo yani iki kez whis çekmem gerekiyo neyse uzun lafın kısası siz bana kızıyosunuz ama :( deniyorum deniyorum işde bir sorun çıkıyo bu kod nick ban olarak mükemmel çalışıyor ama ben ip ban a çevirince işde böle bi sorun çıkıyo acaba ben kodda bi hatamı yapıyorum ip bana çevirirken |
| Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 07:20. |
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