IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet

 Kayıt ol  Topluluk
1Beğeni(ler)
  • 1 Post By Lucifer

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 08 Ocak 2012, 13:48   #1
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Soru botu gibi ama değil




Arkadaşlar konuyu buraya actım , yeri doğru değilse moderatörlerden özür dilerim, sorum

Kanalımda her 3 veya 4 dakikada soru soracak bir bot veya addon varmıdır, cevap olmıyacak
bot 4 dakikada bir değişik bir soru soracak kullanıcı cvp verecek veya vermiyecek ( orası kullanıcıya kalmış )

Örnek : bot : En sevdiğiniz yemekler nedir ?
kullanıcı cvp verir vermez fark etmez 4 dk sonra başka soru
bot : ikizler bucundan olanlar kanala evet yazsın
falan gibi umarım doğru anlatabildim , soruları kendim değiştirme de yapmak istiyorum offf
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
çok uzun oldu galiba

böle bir şey varmı ? yaptırsak pahalımı olur ?

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları reklam ver Benimmekan Mobil Sohbet
Alt 09 Ocak 2012, 05:01   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (4)
IF Ticaret Yüzdesi:(%)
Cevap: Soru botu gibi ama değil




Kardes benim sahsi fikrim bunu basit bir tcl kodu ile yapabilirsin. Yani bi eggdrop botuna kod ekliyerek yapabilirsin ve kalici olur yani sen yokken bile kanalda sorar. Arsivimde bi kod wardi bulmam lazim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 
Alıntı ile Cevapla

Alt 09 Ocak 2012, 05:09   #3
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Bot mu ?




CooLerR Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Arkadaşlar konuyu buraya actım , yeri doğru değilse moderatörlerden özür dilerim, sorum

Kanalımda her 3 veya 4 dakikada soru soracak bir bot veya addon varmıdır, cevap olmıyacak
bot 4 dakikada bir değişik bir soru soracak kullanıcı cvp verecek veya vermiyecek ( orası kullanıcıya kalmış )

Örnek : bot : En sevdiğiniz yemekler nedir ?
kullanıcı cvp verir vermez fark etmez 4 dk sonra başka soru
bot : ikizler bucundan olanlar kanala evet yazsın
falan gibi umarım doğru anlatabildim , soruları kendim değiştirme de yapmak istiyorum offf
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
çok uzun oldu galiba

böle bir şey varmı ? yaptırsak pahalımı olur ?



Şimdi ben size daha önce'den forum içerisinde paylaşılmış kodlardan ikisini vereceğim ve çalışma mantığınıda anlayacaksınız..

Birincisi botun özeline yazılanları Kişi veya kanal'a yansıtması için.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#: { if $nick isop $chan { if $1 == !özel-aç { if $2 == $null { msg $chan Bir nick ya da bir kanal adı yazınız. halt } if #* iswm $2 { set %azulin $2 enable #okubeni1 msg $chan Özelime yazılanlar %azulin kanalına yansıtılacaktır.. } else { set %azulon $2 enable #okubeni2 msg $chan Özelime yazılanlar %azulon nickinin özeline yansıtılacaktır.. } } if $1 == !özel-kapat { if $group(#okubeni1) == on { disable #okubeni1 msg $chan Şu an kanala yansıtma açık, kapatılıyor.. halt } if $group(#okubeni2) == on { disable #okubeni2 msg $chan Şu an özele yansıtma açık, kapatılıyor.. halt } if $group(#okubeni2) == on && $group(#okubeni1) == on { disable #okubeni1 disable #okubeni2 msg $chan Şu an hem özele hem de kanala yansıtma açık, ikisi de kapatılıyor.. Tekrar açmak için !özel-aç nick ya da !özel-aç #kanal yazınız.. halt } } } else { if !özel-* iswm $1 { msg $chan Bu komutu kullanabilmeniz için $chan kanalında Op konumunda olmanız gerekmektedir. } } } #okubeni1 on on *:TEXT:*:?: { msg %azulin Mesaj Yazan Nick; $nick Mesajı; $1- } #okubeni1 end #okubeni2 off on *:TEXT:*:?: { msg %azulon Mesaj Yazan Nick; $nick Mesajı; $1- } #okubeni2 end

Kullanım:
!özel-aç nick : Belirtilen nickin özeline yansıtır.
!özel-aç #kanal : Belirtilen kanala yansıtır.
!özel-kapat : Hangi mod açık ise onu kapatır.



İkinci sorun içinse
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:!duyuru*:#KANAL:{ if $nick isreg $chan { msg $chan Komutu kullanabilecek yetkiye sahip değilsiniz. Üzgünüm $nick | halt } | milleta $chan $1- } alias milleta { var %x = $nick($1,0) | var %y | while %x { if $nick($1,%x) != $me { %y = $addtok(%y,$nick($1,%x),32) } | dec %x } | msg $nick %y $3- }

!duyuru mesaj yazdığında botun olduğu odalarda soruyu özelle sorar ve cevap geldiğinde üstteki koddaki gibi özele veya odaya yansıtır.

Kodlar tamamen IRCForumlari.Net'den alınmıştır.

__________________
Lucifer dediler bana, kötülüğü anlatmak için. Halbuki, ışık ve güzelliği anlatırdı Lucifer. Ben kötüyüm bu düzen için; ama değilim asla kötülük.
 
Alıntı ile Cevapla

Alt 09 Ocak 2012, 06:40   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (4)
IF Ticaret Yüzdesi:(%)
Cevap: Soru botu gibi ama değil




## ----------------------------------------------------------------#
# bawel.tcl Editing by hadie #
# [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] #
#
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
#
## ----------------------------------------------------------------#

## ----------------------------------------------------------------
## Set global variables and specificic
## ----------------------------------------------------------------

## -=[ SPEAK ]=- Set the next line as the channels you want to run in
## for all channel just type "*" if only for 1 channel or 2 chnnel just
## type "#Sohbet"
set speaks_chans "*"

# Set you want in XXX seconds you bot always talk
set speaks_time 700

## ----------------------------------------------------------------
## --- Don't change anything below here if you don't know how ! ---
## ----------------------------------------------------------------

################################################## ####################
##--------------------------------------------------------------------
##--- F O R --- E N T E R T A I N M E N T --- CHANNEL ----
##--------------------------------------------------------------------
################################################## ####################
### SPEAK ###
set spoken.v "Auto talk"
# Set the next lines as the random speaks msgs you want to say
set speaks_msg {

{"nikmati hidup selagi bisa,,jgn merasa terbebani"}
{"tinggalah sebuah kenangan"}
{"ku ingin terbang bersamamu,menggapai semua angan dan mimpi yang blum terwujud,,"}
{"biar ku sendiri dahulu,tanpamu disisiku,tenangkan hatiku yang keluh"}
{"kamulah satu2nya yang ternyata mengerti aku,,maafkan aku slama ini yang tak pernah memikirkan kamu"}
{"butuh penyegaran pikiran,,refreshing dlo akh,,,"}
{"what's wrong with you !!!!!!!!!!"}
{"ku putuskan ntuk melangkah pergi jauh dari dirimu,,,"}
{"usai sudah semua rasa yang ku punya,hilang terkikis oleh luka"}
{"seiring berlalu,bergulirnya waktu,,membuka rahasia di antara kita,,,"}
{"ku mencoba bertahan,,meskipun menyakitkan,,tak menyisakan sebuah sesal di hatiku,"}
{"masih menunggumu bicara,,menantikan sebuah jawaban di hatimu"}
{"belajarlah merenung jgn melemparkan kesalahan ke orang lain"}
{"mungkin ku relakan,untuk kau tinggalkan,,diriku disni harus mengakhiri kisah ini,,,"}
{"apakah engkau merasa,aku bukan manusia,,yang luput dari rasa amarah"}
{"mari kita ber dan ska ria"}
{"gw kagak peduli dah orang laen mau bilang apa,"}
{"suatu saat kebenaran bakal terungkap walau itu terlambat"}
{"hanya mengikuti ego masing2 yg ada masalah akan tambah rumit"}
{"tak pantas kah aku ngedapetin ketenangan dan kesenangan walau cuma sesaat"}
{"suatu saat nnt kita bru menyadari,,org yg slama ini tidak pernah kita anggap kebradaannya,akan sangat berharga bagi kita disaat org tersebut prg meninggalkan kita"}
{"masa indah saat bersamamu takkan pernah terlupakan"}
{"seharusnya kau berada disisiku,,mengusir sepi yang menyelimutiku"}
{"penyesalan memang slalu menakutkan,tapi itu kenyataan"}
{"ku hanya ingin menjadi matahari yang slalu menghangatkan hari2mu"}
{"berbahagialah,"}
{"kau ada tak ku anggap,,dan kini ku sadari setelah kau pergi,,kau begitu berarti bagiku"}
{"jangan mudah percaya dengan sesuatu yg blum tentu benar,,,carilah terlebih dahulu kebenrannya,,,"}
{"terbayang slalu,,masa lalu yang silam,,yang penuh penderitaan"}
{"baikk dan buruk kelakuan kita,,suatu saat kita juga yg terima akibatnya"}
{"mungkin di matamu,,aku tak pantas untuk dirimu"}
{"bila dya jodohku,,satukanlah,,,bila bukan,,,jauhkan dya dari pikiranku"}
{"apa sebenarnya yg ada dibenakku,,yg menjadi impian"}
{"tak ada yang tak mungkin,,,tetap optimis,,masalah pasti bisa terselesaikan"}
{"akhir dri sebuah cerita yg menyakitkan"}
{"kehidupan memang keras..perlu perjuangan penuh mencapai makna hdup yg sesungguhnya"}
{"ketika smua tlah dah berakhir..masi sja ada permaslahan yg tmbul..antara penyeselan,kekesalan,kekecewaan yg membuat terjdinya pertikaian yg tak berkesudahan"}
{"kepandaian digunakan untuk hal yg slah demi ego..sma aja dgn blajar menjadi org yg bdoh"}
{"masih tdk mengerti arti hidup yg sesungguhnya"}
{"cahaya matamu menghiasi seluruh hatiku"}
{"I Miss You 4ever"}
{"aku masih menunggumu sampai akhir waktuku"}
{"masihkah ku bisa terus tertawa terbahak ???"}
{"Bersabar dan mengalah,langkah yg terbaik..buat menciptakan perdamaian"}
{"Sdar akan prilaku yg bruk di masa lalu..jadikanlah suatu pengalaman yg berharga"}
{"Let me free..to take the choice..thanx"}
{"Terjadi ksalahan dalam penyampaian pesan..dgn cra yg slah,berakibat kacau"}
{"berusaha keras untuk hasil yg lebih,,namun,di saat hasil telah di gapai,,lupa akan hal yg di inginkan karena kesenangan sesaat"}
{"kadang jalan yang terbaik membuat seseorang merasa tersakiti,,hanya waktu yg bisa menyelesaikan sebuah masalah"}
{"kesabaran dan kemapuan orang ada batasnya,,ng ada yang sempurna"}
{"presence has now graced my dreams, when I opened my eyes from my sleep and wish you were by my side, but it was a dream that has not been achieved"}
{"maybe I'm not the best, but I will do my best for you"}
{"can only wait and hope that all can become better, more, amien"}
{"hanya berusaha melakukan yang terbaik tanpa takut akan datang kegagalan,,terus berjuang"}
{"memulai langkah baru
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
"}
{"ku coba terus melangkah ntuk melupakanmu,,membuang semua bayang2mu yang slalu menggangu pikiranku"}
{"semua takkan berubah,,inilah jalan hidupku aku yang jalanin aku pula yang rasakan"}
{"don't disturb me n' don't make me destroy"}
{"ku ingin terbang tinggi melayang ntuk tinggalkan semua kebisingan yg ada"}
{"jangan dengar sebelah telinga,jangan melihat sebelah mata,lihat bukti nyata"}
}

if {![string match "*time_speaks*" [timers]]} {
utimer $speaks_time time_speaks
}

proc time_speaks {} {
global speaks_msg speaks_chans speaks_time
if {$speaks_chans == "*"} {
set speaks_temp [channels]
} else {
set speaks_temp $speaks_chans
}
foreach chan $speaks_temp {
set speaks_rmsg [lindex $speaks_msg [rand [llength $speaks_msg]]]
foreach msgline $speaks_rmsg {
puthelp "PRIVMSG $chan :[subst $msgline]"
}
}
if {![string match "*time_speaks*" [timers]]} {
utimer $speaks_time time_speaks
}
}




##------------------------------------------------------------------------
## *** E N D OF ENT3.1.TCL ***
## -----------------------------------------------------------------------

 
Alıntı ile Cevapla

Alt 09 Ocak 2012, 07:27   #5
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Bot mu ?




Hocam pek bise anlasilmadi
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
Herkes bir, İş için yaratılmıştır.
 
Alıntı ile Cevapla

Cevapla

Etiketler
ama, bot, botu, değil, deäÿil, gibi, mu, soru


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

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Help Soru BOtu Nokta IRCd Botlar 11 09 Ağustos 2020 10:49
Oyun botu soru dosyasindaki soru|cevap duzenini tersine çevirme (Çözüm) Weise Eggdrop, NeoStats, BNC 0 24 Ocak 2011 14:04
soru botu gibi birşey yapabilirmiyiz kurugaddere mIRC Scripting Sorunları 8 20 Mart 2009 01:21
Help Soru Botu incubus Eggdrop, NeoStats, BNC 10 09 Eylül 2007 02:44