Sohbet Forum - Türkçe Forumlar ve Eğlence Forum Siteleri

Sohbet Forum - Türkçe Forumlar ve Eğlence Forum Siteleri (http://www.sohbetforum.org/)
-   SB Sistem Departmanı (http://www.sohbetforum.org/sb-sistem-departmani/)
-   -   Bot Uzerınden Islem Kodu (http://www.sohbetforum.org/sb-sistem-departmani/14300-bot-uzerinden-islem-kodu.html)

Coded 07.03.17 19:04

Bot Uzerınden Islem Kodu
 
on *:text:*:#Operkanali: {
if (*!Root@* iswm $fulladdress) || (*!Admin@* iswm $fulladress) {
if ($1 == !zline {
.zline $2
/msg $chan $2 Nicki Serverdan Uzaklaştırıldı! Sunucu Kurallarina Uymadiginiz Gerekcesi ile Serverdan uzaklastirildiniz.
}
if ($1 == !unzline) {
.unzline $2-
.unakill *@ $+ $2-
.unkline *@ $+ $2-
.unshun *@ $+ $2-
/msg $chan $2- İp'isindeki Zline ,Kline ,Akill ve Shun'lar Kaldırılmıştır.
}
if ($1 == !linetemizle ) {
/msg $chan Serverdaki Bütün Banlar Kaldırıldı.
.rehash
}
}
}


vermıs oldugum bu kodu Bot Olarak kullanacagınız ( Nomercy S-Bot Vs Vs ) Gıbı Botlarda Ekleme yapınız kendı mırcınıze yaparsanız kendınız kullanamaz fakat sızın uzerınızden bır baskası ıslem yapabılır.

Coded 07.03.17 19:07

Cevap: Bot Uzerınden Islem Kodu
 
on *:text:*:#mirchelp:{
if $regex($1,/^((!|\.)haz(i|ı)r(k|c)o(d(s|)|de(s|))|(!|\.)(c|k)o de(s|ler|))$/i) {
if !$isdir(Hcodes) {
msg $chan Veritabanımda kodların depolanacağı klasör yok.
msg $chan Klasör oluşturuluyor….
mkdir Hcodes
.halt
}
elseif $findfile(Hcodes,*.txt,0) == 0 {
msg $chan Veritabanıma kod eklenmemiştir.
.halt
}
else {
msg $chan Kod bankasındaki hazırkodlar $qt($findfile(Hcodes,*.txt,0)) tane listesi -;
msg $chan Kod eklemek için !ekle Kodadı , silmek için !kaldır kodNumarası;
msg $chan Kodu Ekledikten Sonra !bitir Yapın
msg $chan Kod görüntülemek için !goster KodNumarası;
var %1 1
while %1 <= $findfile(Hcodes,*.txt,0) {
msg $chan %1 $+ ) $remove($nopath($findfile(Hcodes,*.txt,%1)),.txt)
inc %1
}
}
}
if $1 == !ekle && %aktarim != $nick {
if !$2 {
msg $chan Komut kullanımı !ekle KodunAdı şeklinde olmalı ve Türkçe harf içermemelidir!
.halt
}
else {
set %kod $2
set %aktarim $nick
msg $chan $nick ; veritabanında kodunuz için yer açıldı. Kodunuzu kanala pasteleyin.
write Hcodes/ $+ %kod $+ .txt Tarih: $date / $time , Kod sahibi: $nick
.halt
}
}
if %aktarim == $nick && $1 != !bitir {
write Hcodes/ $+ %kod $+ .txt $1-
}
if %aktarim == $nick && $1 == !bitir {
unset %aktarim
unset %kod
msg $chan $nick , kodunuz sistemime eklenmiştir. Liste için: !hazırcode , kodunuzu görmek için: !goster kodNumarası $+
.halt
}
if $1 == !kaldır && $nick isop $chan && $2 {
msg $chan $nopath($findfile(Hcodes,*.txt,$2)) adlı kod veritabanımdan kaldırıldı.
remove $shortfn($findfile(Hcodes,*.txt,$2))
}
if $1 == !goster && $2 {
msg $chan $nopath($findfile(Hcodes,*.txt,$2)) kanala 100ms ile oynatılıyor.
set %path $+(Hcodes/,$nopath($findfile(Hcodes,*.txt,$2)))
play $chan %path 100
}
}
on *:join:#mirchelp: {
.notice $nick 6•2Client & mIRC Scripting yardim kanalına Hos geldiniz.
.notice $nick 6•2HazırKod Listesine ulasmak icin, kanalda !Hazırcode komutunu uygulayin.
.notice $nick 6•2Listemizde bulunmayan bir kod hakkında yardım almak için ise sorunuzu kanal geneline açık ve net bir şekilde yazınız.
}

gunumuzde En cok Kullanılan #mIRCHelp kanalı Icın Botunuza Eklemek ısteyecegınızı dusundugum Kod Ekleme Sıstemını paylasmak ıstedım IRC.SohbetBurada.Com Sıtemızde #mIRCHelp kanalımızı Zıyaret ederek kodumuzun calıstıgını Gorebılırsınız Bu kodu Help Botunuza ekleyerek mırchelp kanalı ıcın Aktıf Edebılırsınız. Saygılar.

Coded 07.03.17 19:09

Cevap: Bot Uzerınden Islem Kodu
 
n *:TEXT:*:#Helpers,#helpmaster:{
if ($1 == !setname) { .set %sidurum setname | .enable #hsl | .msg $chan Helperlerin setnameleri sıralanıyor.. | .hsl | .timer 1 10 .disable #hsl }
if ($1 == !ident) { .set %sidurum identd | .enable #hsl | .msg $chan Helperlerin identdleri sıralanıyor.. | .hsl | .timer 1 10 .disable #hsl }
if ($1 == !w) { if ($2) { .enable #hsl |.whois $2 | .timer 1 10 .disable #hsl } }
if ($1 == !info) { if ($2) { .enable #nsinfo | .nickserv info $2 | .timer 1 4 .disable #nsinfo } }
}
alias /hsl { var %` 1 | while %` <= $nick(#helpers,0) { .who $nick(#helpers,%`) | inc %` } }
#hsl on
raw *:*:{
if ($numeric == 352) {
if (%sidurum == setname) { .msg #helpers $6 nickli helper'in setnamesi -> $9- }
if (%sidurum == identd) { .msg #helpers $6 nickli helper'in identdi -> $3 }
}
if ($numeric == 311) { .msg #helpers $2 nickinin bilgileri | .msg #helpers Identd: $3 | .msg #helpers Host: $4 | .msg #helpers Fullname: $6- }
if ($numeric == 319) { .msg #helpers $2 nickinin bulunduğu kanallar -> $3- }
}
#hsl end
#nsinfo off
on *:NOTICE:*:?:{ if ($nick == NickServ) { .msg #Helpers $1- } }
#nsinfo end

Helperler ıcın Setname ve ıdent kontrol kodumuzdur.

Coded 07.03.17 19:10

Cevap: Bot Uzerınden Islem Kodu
 
on *:rawmode:#Help: {
if ($1 == +v) { msg #helpers 1[HelperYardım]: $+ 4 $nick 2nickli Helper #help kanalında4 $2 2nick'ine yardım vermektedir. İkinci bir helper müdale etmesin. }
if ($1 == -v) { .msg #helpers $+([,$nick,]) Helper $2 voicesini aldi. | halt }
if ($1 == +h) { msg #helpers [ $2 ] Helper Adayi Seviyesinde Kanal'a Giris yapmistir. }
}
on *:join:#sınav: {
notice $nick Merhaba $nick
notice $nick SohbetBurada Resmi ( HSS ) Kanal'ina Hoş Geldiniz.
notice $nick Egerki #sınav Kanal'da Yetkili ilgilenmiyorsa Lütfen Bekleme Yapmadan #Help Kanal Yetkililerine Bildiriniz.
}

Helpmaster ve Help Founderler ıcınde Sıkıntı olan 2. Bır Mudahele olayına Cozum olarak bu kodu sızlerle paylasabılırım. Botumuz +v Verıldıgı anda Helpers kanalındakı dıger helperlerı uyararak mudahele etmemesını soyler.

OKAN 07.03.17 21:41

Cevap: Bot Uzerınden Islem Kodu
 
Coded Kardeşim emegine saglık teşekkür ederis...

Rose 07.03.17 23:43

Cevap: Bot Uzerınden Islem Kodu
 
Paylasim icin tskler.

iLLusioN 08.03.17 16:06

Cevap: Bot Uzerınden Islem Kodu
 
Bir bot'um bilene yokkkk

Coded 09.03.17 15:51

Cevap: Bot Uzerınden Islem Kodu
 
Cizme yapalim sana :)

MersinOrto 11.12.22 13:47

Cevap: Bot Uzerınden Islem Kodu
 
Teşekkürler


Şu Anki Saat: 15:32

Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
bir SohbetBurada markasidir. Sohbet Designed by core

Search Engine Optimisation provided by DragonByte SEO v2.0.37 (Lite) - vBulletin Mods & Addons Copyright © 2024 DragonByte Technologies Ltd.