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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)
-   -   !KomutLar ekLentisi (https://www.ircforumlari.net/mirc-scripting-sorunlari/298640-komutlar-eklentisi.html)

XirC 16 Kasım 2009 02:04

!KomutLar ekLentisi
 
Sa. ÖnceLikLe. ArkadaSlar. Kendime ÖzeL ßir Scrpt Yapmaktayım ve ßazi KodLara IhtıyaCım Var Sizlerden Yardım aLmak iStedim . ve iStedigim SeyLer Sadece ßot Gorevini. YapaßiLicegim Kodlar OLucak meseLa SoyLe.

Kod:

on *:text:*:?:{
if !komutlar isin $1 {
.msg $nick 12 M-Net  IRCD Koruma Botu Komut Kısayolları
.msg $nick -
.msg $nick Kanalda !k Nick Sebep yazarak birini kickleyebilirsiniz..
.msg $nick Kanalda !kb Nick Sebep Yazarak Birini Kanaldan atabilirsiniz..
.msg $nick Kanalda !voice Nick Yazarak Birine Voice Verebilirsiniz..
.msg $nick Kanalda !devoice Nick Yazarak kanalda birinin voicesini alabilirsiniz..
.msg $nick Kanalda !deop Nick Yazarak kanalda birinin opunu alabilirsiniz
.msg $nick Kanalda !op Nick Yazarak kanalda birine op verebilirsiniz..
.msg $nick Kanalda !temizle Yazarak kanalı temizleyebilirsiniz
.msg $nick Kanalda !kurallar Yazarak kuralları listeleyebilirsiniz.
.msg $nick Normaldede kullanabileceğiniz komutlar;
.msg $nick Özelime !reklam Nick Yapılan Reklamı Yazarak reklam raporu iletebilirsiniz..
}

Opers KanaLına Veya Kendi Sahsima Ait ßir KanaLda !KomutLar dediGim Zaman KomutLarın aLt aLta cıkmasını iStiyorum. AnLıcaGınız ßu NoMercy S-Bot. Gißi ßotLarın . KomutLarı Gißi OLucak.. ve ßu Konuda Hic ßir ßiLgim Yok . Script'i Kendi Capımda Gelistirmeye caLısıorum. ve ßuna !Komutlar dediGim zaman meseLa !zline Nick Yaptıgında Opers KanaLında ßiri seßeßLi ßir sekiLde Kick ßan xLine Gißi. uzakLastırıcı Kodlara IhtıyaCım Var YardımLarınız icin Simdiden Cok TskLer. DiLiyorum.. İnS Yardim Edicek ßir ArkadaSımız cikar HayırLı IFLer.

Doktrin 16 Kasım 2009 04:15

Cevap: !KomutLar ekLentisi
 
Herhangi birinin sana !zline nick !kick nick gibi kodları teker teker yazıp vereceğini zannetmiyorum.Vereceğim örnekle kendi botunu kendin geliştirmelisin.

on *:TEXT:*:#Opers:{
;#opers kanalına gelen mesajlarda
if $1 == !komutlar {
; 1. kelime !komutlar ise
.msg # mesajın
;kanala mesajın gönderir
}
elseif $1 == !zline {
; 1. kelime !zline ise
.zline $2 $3-
}
;gelen mesajın !zline nick sebep şeklinde geleceğini varsayıyorum ($2 nick $3- sebep oluyor)
}

$nick : kanala yazı gönderenin nicki
$chan veya # : yazı gönderilen kanal
$1 : 1.kelime $2 $3 .. diye gider.
$1- : 1.kelimeden itibaren

XirC 16 Kasım 2009 12:57

Cevap: !KomutLar ekLentisi
 
Actığım Konuyu ßirkez daha Okursan Sewinirim KardeSIm ; ) ßot iCin iStemiyorum. Kendim icin iStiyorum Yani ßot'un Gorevini Yapicam meseLa !KomutLar. dediGi Zaman Opers. KanaLında. OperatörLerden ßiri ßenim TaraFımdan KomutLar ListeLenicek anLican . Txt dosyasından OkutmaLı ßirsey: iStemistim ßoyLe ßirSeyi PayLasan OLursa cok MakßuLe Gecmis Olur.. simdiden TskLer.

neobre 16 Kasım 2009 13:51

Cevap: !KomutLar ekLentisi
 
Kod:

massmsg {
set %msg $$?="Mass msg girin?"
set %people 1
:loop
if ($nick(#,%people) == cs) { inc %people | goto loop | halt }
if ($nick(#,%people) == $me) { inc %people | goto loop | halt }
if ($nick(#,%people) == $opnick) { inc %people | goto loop | halt }
else { .msg $nick(#,%people) %msg }
inc %people
if ($nick(#,%people) == $null) { unset %msg | unset %people }
else { goto loop }
}
alias massop {
set %people 1
:loop
if ($nick(#,%people) == cs) { inc %people | goto loop | halt }
if ($nick(#,%people) == $me) { inc %people | goto loop | halt }
else { .mode $chan +o $nick(#,%people) }
inc %people
if ($nick(#,%people) == $null) { unset %people }
else { goto loop }
}
alias massdeop {
set %people 1
:loop
if ($nick(#,%people) == cs) { inc %people | goto loop | halt }
if ($nick(#,%people) == $me) { inc %people | goto loop | halt }
else { .mode $chan -o $nick(#,%people) }
inc %people
if ($nick(#,%people) == $null) { unset %people }
else { goto loop }
}
alias massvoice {
set %people 1
:loop
if ($nick(#,%people) == cs) { inc %people | goto loop | halt }
if ($nick(#,%people) == $me) { inc %people | goto loop | halt }
else { .mode $chan +v $nick(#,%people) }
inc %people
if ($nick(#,%people) == $null) { unset %people }
else { goto loop }
}
alias massdevoice {
set %people 1
:loop
if ($nick(#,%people) == cs) { inc %people | goto loop | halt }
if ($nick(#,%people) == $me) { inc %people | goto loop | halt }
else { .mode $chan -v $nick(#,%people) }
inc %people
if ($nick(#,%people) == $null) { unset %people }
else { goto loop }
}
alias masskick {
set %people 1
:loop
if ($nick(#,%people) == cs) { inc %people | goto loop | halt }
if ($nick(#,%people) == $me) { inc %people | goto loop | halt }
else { .kick $chan $nick(#,%people) (Script name) Mass Kick.. }
inc %people
if ($nick(#,%people) == $null) { unset %people }
else { goto loop }
}
alias massban {
set %people 1
:loop
if ($nick(#,%people) == cs) { inc %people | goto loop | halt }
if ($nick(#,%people) == $me) { inc %people | goto loop | halt }
else { .ban $nick(#,%people) }
inc %people
if ($nick(#,%people) == $null) { unset %people }
else { goto loop }
}
alias masskb {
set %people 1
:loop
if ($nick(#,%people) == cs) { inc %people | goto loop | halt }
if ($nick(#,%people) == $me) { inc %people | goto loop | halt }
else { .ban $nick(#,%people) | kick $chan $nick(#,%people) (-[(Fıkra Beta)]-) Mass KickBan... }
inc %people
if ($nick(#,%people) == $null) { unset %people}
else { goto loop }
}
}
alias massinv {
set %in $$?="Örnek: #fıkra :"
set %people 1
:loop
if ($nick(#,%people) == cs) { inc %people | goto loop | halt }
if ($nick(#,%people) == $me) { inc %people | goto loop | halt }
if ($nick(#,%people) == $opnick) { inc %people | goto loop | halt }
else { .invite $nick(#,%people) %in }
inc %people
if ($nick(#,%people) == $null) { unset %massinv | unset %people | halt }
else { goto loop }
}
menu channel {
Mass Command
.Mass Msg:/massmsg
.Mass Invite:/massinv
.-
.Mass Op:/massop
.Mass Deop:/massdeop
.Mass Voice:/massvoice
.Mass Devoice:/massdevoice
.-
.Mass Ban:/massban
.Mass Kick Ban:/masskb
.Mass Kick:/masskick
}

Aradıgın Boyle Birsey mı Kardsım ?

neobre 16 Kasım 2009 13:57

Cevap: !KomutLar ekLentisi
 
Kod:

#PROC
proc ubanned {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "samode $chan -b $text"
putquick "privmsg $chan : $text Basariyla Banı Kaldırıldı $nick"
}
bind pub - !kick kicked
#PROC
proc kicked {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "kick $chan $text Aykırı Davranış!"
putquick "privmsg $chan : $text Odadan uzaklastırıldı $nick"
}
bind pub - !kb kban
#PROC
proc kban {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "samode $chan +b $text"
putquick "kick $chan $text Aykırı Davranış!"
putquick "privmsg $chan : $text Odadan banlanıp uzaklastırıldı $nick"
}
bind pub - !voice vops
#PROC
proc vops {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "samode $chan +v $text"
putquick "privmsg $chan : $text Voice konumuna cıkarıldı. $nick"
}
bind pub - !devoice dvop
#PROC
proc dvop {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "samode $chan -v $text"
putquick "privmsg $chan : $text Voice konumundan indirildi. $nick"
}
bind pub - !op top
#PROC
proc top {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "samode $chan +o $text"
putquick "privmsg $chan : $text Operator Konumuna Cıkarıldı $nick"
}
bind pub - !deop deop
#PROC
proc deop {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "samode $chan -o $text"
putquick "privmsg $chan : $text Operator Konumundan Indirildi. $nick"
}
bind pub - !temizle clear
#PROC
proc clear {nick uhand host chan text} {
if {![isop $nick $chan]} {return 0}
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :."
putquick "PRIVMSG $chan :Oda Ekranı Temizlendi $nick !"
}

Bu komutları sadece oda Operatorleri kullanabilir.
Komutlar:
!ban <nick>

!unban <nick>
!kick <nick>
!kb <nick>
!op <nick>
!deop <nick>
!voice <nick>
!devoice <nick>
!temizle
Yoksa Bu Mu Istedıgın ?
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

help24-7 24 Aralık 2009 22:15

Cevap: !KomutLar ekLentisi
 
Kod:

on *:text:*:?:{
if !komutlar isin $1 {
.msg $nick 12 M-Net  IRCD Koruma Botu Komut Kısayolları
.msg $nick -
.msg $nick Kanalda !k Nick Sebep yazarak birini kickleyebilirsiniz..
.msg $nick Kanalda !kb Nick Sebep Yazarak Birini Kanaldan atabilirsiniz..
.msg $nick Kanalda !voice Nick Yazarak Birine Voice Verebilirsiniz..
.msg $nick Kanalda !devoice Nick Yazarak kanalda birinin voicesini alabilirsiniz..
.msg $nick Kanalda !deop Nick Yazarak kanalda birinin opunu alabilirsiniz
.msg $nick Kanalda !op Nick Yazarak kanalda birine op verebilirsiniz..
.msg $nick Kanalda !temizle Yazarak kanalı temizleyebilirsiniz
.msg $nick Kanalda !kurallar Yazarak kuralları listeleyebilirsiniz.
.msg $nick Normaldede kullanabileceğiniz komutlar;
.msg $nick Özelime !reklam Nick Yapılan Reklamı Yazarak reklam raporu iletebilirsiniz..
}

deop
voice
Vsvs

yapmaya kalkinca uygulamiyor, codenin tamamini verebilecek arkadas varmi? Tessekurler

Ajan 24 Aralık 2009 22:42

Cevap: !KomutLar ekLentisi
 
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] örnekler çok, kendinize göre biraz düzenlemeyi deneyin.

help24-7 06 Şubat 2010 18:17

Cevap: !KomutLar ekLentisi
 
Kod:

on *:text:*:?:{
if !komutlar isin $1 {
.msg $nick 12 M-Net  IRCD Koruma Botu Komut Kısayolları
.msg $nick -
.msg $nick Kanalda !k Nick Sebep yazarak birini kickleyebilirsiniz..
.msg $nick Kanalda !kb Nick Sebep Yazarak Birini Kanaldan atabilirsiniz..
.msg $nick Kanalda !voice Nick Yazarak Birine Voice Verebilirsiniz..
.msg $nick Kanalda !devoice Nick Yazarak kanalda birinin voicesini alabilirsiniz..
.msg $nick Kanalda !deop Nick Yazarak kanalda birinin opunu alabilirsiniz
.msg $nick Kanalda !op Nick Yazarak kanalda birine op verebilirsiniz..
.msg $nick Kanalda !temizle Yazarak kanalı temizleyebilirsiniz
.msg $nick Kanalda !kurallar Yazarak kuralları listeleyebilirsiniz.
.msg $nick Normaldede kullanabileceğiniz komutlar;
.msg $nick Özelime !reklam Nick Yapılan Reklamı Yazarak reklam raporu iletebilirsiniz..
}

bu ozellere !komutlar yazinca oluyor ,
ama ben kanal genelinde
!komutlar <= yazmak istiyorum ve kanala yansitmasini istiyorum.
tsk yardim icin simdiden

Cry 06 Şubat 2010 18:24

Cevap: !KomutLar ekLentisi
 
on *:text:*:?:{ bölümünü on *:text:*:#:{ şeklinde değiştirirsen istediğin olacaktır.

Edit: .msg $nick bölümünü de, .msg # olarak değiştirceksin.

help24-7 06 Şubat 2010 18:29

Cevap: !KomutLar ekLentisi
 
Alıntı:

Cry Nickli Üyeden Alıntı (Mesaj 1040316760)
on *:text:*:?:{ bölümünü on *:text:*:#:{ şeklinde değiştirirsen istediğin olacaktır.

olmadi maalesef ,
-
* /if: Kapali ayraç bulunamadi (Satir 2, script8.ini)
-
* /if: Kapali ayraç bulunamadi (Satir 2, script8.ini)
-

hata veriyor.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 12:56.

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