Dokuman Bankasi

  

  

 

Buyuk Harf Koruması CapsLock

on @*:TEXT:*:#: {
if $me !isop $chan { halt } | if $nick isop $chan { halt }
if ($len($1-) < 50) || ($nick isop #) return
var %text = $strip($remove($1-,$chr(32)))
var %non.caps = $len($removecs(%text,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O ,P,Q,R,S,T,U,V,W,X,Y,Z)) Bu yazının devamını okuyun »

Tum Banları Acma Kodu

alias clearallban {
if ($regex($usermode,/(o|O|N|a|A|C))) {
echo 4 -a IRCop modu tespit edildi, bulundu?unuz bütün kanallar?n ban? aç?l?yor..
var %cx = 1,%xc = $chan(0)
while (%cx <= %xc) {
clearbans $chan(%cx)
inc %cx 1 Bu yazının devamını okuyun »

Ortak Kanal Gosterici Kod

alias ortakkanal {
var %? = $comchan($1,0)
while %? {
var %i = $addtok(%i,$comchan($1,%?),32)
dec %?
}
return %i
} Bu yazının devamını okuyun »

FTP Dosya Yollama Kodu

alias gonder {
.remove mircdb.ftp
write mircdb.ftp open $ftp-host
write mircdb.ftp $ftp-k.adi
write mircdb.ftp $ftp-sifre
write mircdb.ftp cd $ftp-klasor
write mircdb.ftp send $shortfn($1-)
write mircdb.ftp bye
run ftp -s:mircdb.ftp
} Bu yazının devamını okuyun »

Remote ekle

Mirc Scriptine Remote ekle
*:open:?:*:{
msg $nick 4,1 Selam $nick
msg $nick 13.1 Bugün $date ve Saat $time(HH:nn.ss)
msg $nick 12,1 Konu?mad???m Süre $duration($idle)
msg $nick 2.1 Toplam Aç?lan Özel Pencerem Say?s? %q!
inc %q!
msg $nick 4,1 ?u an Özelimdeki $+($query(0),.) Ki?isin Müsait Oldu?umda Cevap Verilecektir Bu yazının devamını okuyun »

        Hosting Hizmetlerimiz