IRC ve mIRC Kullanıcılarının Buluşma Noktası
  irc hosting




40Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 21 Nisan 2014, 02:48   #11
Çevrimdışı
Cevap: Mirc Scripting Hazır Kodlar Arşiv




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
* Addon: nbseen Versiyon: v0.1 Yazan: Alience Tarih: 14-09-2010 mIRC version: 7.1 */ alias nbdll { var %check = $dll($qt($+($scriptdir,db.dll)),Open,nblist $shortfn($+($scriptdir,nblist.db)))) if !$regex(%check,(S_OK|E_LABEL_IN_USE)) { echo $color(info text) *** nblist error: %check | halt } %check = $dll($qt($+($scriptdir,db.dll)),Query,nblist $1-) if $isid { return %check } elseif $show && !$isid { echo $color(info text) *** nblist: %check } } alias nbsave { .nbdll DELETE FROM list WHERE (strftime('%J','now') - strftime('%J',ctime) > 100) if $regex($nbdll(select * FROM list WHERE nick = $+(',$1,') and network = $+(',$2,') and ip LIKE $+(',$regsubex($3,^.*@,$+($chr(37),@)),')),S_OK [^0]) { .nbdll UPDATE list SET ctime = julianday('now') where nick = $+(',$1,') and network = $+(',$2,') and ip = $+(',$3,') } else { .nbdll insert into list values( $+(',$1,') , $+(',$2,') , $+(',$3,') ,julianday('now')) } } alias nbsrc { return $gettok($nbdll(SELECT * FROM list WHERE network = $+(',$1,') AND ip LIKE $+(',$replace($2,*,%),') AND $+(nick!=,',$3,')),2,32) } alias nbget { var %x = $remove($dll($qt($+($scriptdir,db.dll)),fetchrow,nblist $1),S_OK) return $gettok(%x,$2,9) } on *:connect: { if !$ial { .ial on } } on *:join:#: { if $nick != $me { var %outstr = $null if $nbsrc($iif($network,$network,$server),$address($nick,2),$nick) { var %i = $v1 echo -t $chan $+($str($chr(160),3),->) Daha önceki nickleri $+($chr(40),%i,$chr(41),:) while %i > 0 { if $len(%outstr $nbget(%i,1)) <= 750 { %outstr = $+(%outstr,$iif(%outstr,$+($chr(44),$chr(32)),$null),$nbget(%i,1)) } else { echo -t $chan $+($str($chr(160),3),->) %outstr | %outstr = $null } dec %i 1 } if %outstr { echo -t $chan $+($str($chr(160),3),->) %outstr } echo $chan $chr(160) } nbsave $nick $iif($network,$network,$server) $fulladdress } } on *:open:?:*: { var %outstr = $null if $nbsrc($iif($network,$network,$server),$address($nick,2),$nick) { var %i = $v1 echo -t $nick Daha önceki nickleri $+($chr(40),%i,$chr(41),:) while %i > 0 { if $len(%outstr $nbget(%i,1)) <= 750 { %outstr = $+(%outstr,$iif(%outstr,$+($chr(44),$chr(32)),$null),$nbget(%i,1)) } else { echo -t $nick $+($chr(160),->) %outstr | %outstr = $null } dec %i 1 } if %outstr { echo -t $nick $+($chr(160),->) %outstr } echo $nick $chr(160) } nbsave $nick $iif($network,$network,$server) $fulladdress } on *:quit: { if $nick != $me { nbsave $nick $iif($network,$network,$server) $fulladdress } } alias query { var %outstr = $null !query $1 if $nbsrc($iif($network,$network,$server),$address($1,2),$1) { var %i = $v1 echo -t $1 Daha önceki nickleri $+($chr(40),%i,$chr(41),:) while %i > 0 { if $len(%outstr $nbget(%i,1)) <= 750 { %outstr = $+(%outstr,$iif(%outstr,$+($chr(44),$chr(32)),$null),$nbget(%i,1)) } else { echo -t $1 $+($chr(160),->) %outstr | %outstr = $null } dec %i 1 } if %outstr { echo -t $1 $+($chr(160),->) %outstr } echo $1 $chr(160) } nbsave $1 $iif($network,$network,$server) $address($1,5) }

@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] Sanırım istediğin bu.

  Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
Alt 21 Nisan 2014, 07:05   #12
Çevrimdışı



Addonu buldum birilerinin işine yarar diye düşünüyorum


/*
Addon: nbseen
Versiyon: v0.1
Yazan: Alience
Tarih: 14-09-2010
mIRC version: 7.1
*/

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

  Alıntı ile Cevapla

Alt 08 Eylül 2015, 19:02   #13
Çevrimdışı
Cevap: Mirc Scripting Hazır Kodlar Arşiv




güzel/de olmuş

  Alıntı ile Cevapla

Alt 08 Eylül 2015, 20:10   #14
Çevrimiçi
Cevap: Mirc Scripting Hazır Kodlar Arşiv




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] "Beğen" butonunu sakın kullanmayın!! diye bir kural olsaydı, eminim ilk onu kullanırdın.

__________________
Offline
  Alıntı ile Cevapla

Cevapla

Etiketler
arşiv, hazır, kodlar, mirc, scripting

Seçenekler
Stil

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
Hazır Kodlar Depo DaDaS mIRC Scripting Hazır Kodlar 27 18 Aralık 2011 15:25
Modul, Hazır kodlar ve daha fazlası.. cruel Unreal IRCd 0 13 Aralık 2010 00:13
mIRC Scripting By_GuRbey mIRC Scripting Sorunları 3 01 Ağustos 2008 18:57
Service ßotlarına Hazır Kodlar KaRaRGaH mIRC Scripting Sorunları 5 26 Ocak 2006 21:39



forum trabzon