lookjapan.COM - IRC ve mIRC dünyasının forumu!   buy vps


  lookjapan.COM - IRC ve mIRC dünyasının forumu! IF - mIRC Scripting Hazır Kodlar


Yeni Konu   Cevap Yaz

 
LinkBack Seçenekler Stil
Alt 18 Haziran 2018, 02:10   #1
 
pCkOpAt - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 03 Kasım 2016
Bulunduğu yer: Rize
Mesajlar: 139
WEB Sitesi: www.sohbetciyiz.net
IRC Sunucusu: irc.sohbetciyiz.net
İlgi Alanı: mIRC Scripting
Alınan Beğeni: 63
Standart mIRC Socket !burc Kodu (Güncel)

Merhabalar, Mirc botları için !burc kodu. En güncel halidir.

Kullanımı: !burc burcunuz

Örnek:!burc Oğlak



Kod:
alias burc {
  if $sock(burc) { sockclose burc }
  sockopen burc mahmure.hurriyet.com.tr 80
  set %brcs $1 
}
alias duzlt return $replace($1-,•, ,ç,$chr(231),ö,$chr(246),ü,$chr(252),ı,$chr(253),ş,$chr(254),ğ,$chr(240),Ä°,$chr(221),Å,$chr(222),Ç,$chr(199),ç,$chr(231),Ü,$chr(220),ö,$chr(246),Ö,$chr(214),ü,$chr(252),Ü,$chr(220),’,$chr(146),â,$chr(226))
alias htmlfree { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } 
on *:sockopen:burc:{
  var %burc = sockwrite -n burc
  %burc GET /astroloji/burclar/ $+ %brcs $+ -burcu-gunluk-yorum HTTP/1.1
  %burc Host: mahmure.hurriyet.com.tr
  %burc User-Agent: Mozilla/5.0 (Windows NT 6.1; Win64; x64; rv:48.0) Gecko/20100101 Firefox/48.0
  %burc Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
  %burc Accept-Language: tr-TR,tr;q=0.8,en-US;q=0.5,en;q=0.3
  ;%burc Accept-Encoding: gzip, deflate
  %burc Cookie: hcatFrom=astroloji; _sgf_user_id=gb.636240726995469550-dfbd235b-ab04-4914-a4bc-2ff0f7878eee; hrp_gb=gb.636240726995469550-dfbd235b-ab04-4914-a4bc-2ff0f7878eee; __atuvc=6%7C10; ASP.NET_SessionId=4a4giokhxmtt1wa2hbiqfpqs; __atuvs=58bc94ec413b9cfb000; semPageCounter=2
  %burc Connection: keep-alive
  %burc Upgrade-Insecure-Requests: 1
  %burc $crlf
}

on *:sockread:burc:{
  var %burcc
  sockread %burcc
  ;echo -a %burcc
  var %text $htmlfree(%burcc)
  var %rtext $remove($replace(%text,&bull;, ,&ccedil;,$chr(231),&ouml;,$chr(246),&uuml;,$chr(252),ı,$chr(253),ş,$chr(254),ğ,$chr(240),Ä°,$chr(221),Å,$chr(222),Ç,$chr(199),ç,$chr(231),Ü,$chr(220),ö,$chr(246),Ö,$chr(214),ü,$chr(252),Ü,$chr(220),&rsquo;,$chr(146),&acirc;,$chr(226),Ä,$chr(208),&nbsp;,$chr(32)),Günün Emojisi:)
  if (*<p>*</p>* iswm %burcc) || (*<p><strong>*</strong>*</p>* iswm %burcc) { .msg %:chan $+($chr(3),02,%rtext) | .unset %:chan | sockclose burc }
}

on $*:text:/^[.!]bur[cç]/Si:#:{
  if $istok(%yasakknick,$nick,32) { return }
  if !$regex($2,/(ko[Ççc]|bo[Ğğg]a|[İiı]k[İiı]zler|yenge[Ççc]|aslan|ba[Şşs]ak|teraz[İiı]|akrep|yay|o[Ğğg]lak|kova|bal[İiı]k)/Si) { msg $chan $+($chr(3),4,$nick) 2Aaaa yeni burç türedi sanırım... Adam gibi burcunu yaz ;) | return }
  if (!$2) { msg $chan $+($chr(3),4,$nick) 2Burç belirtmediniz }
  elseif $hget(burc,$nick) && ($nick != pC`kOpAt) { .notice $nick $hget(burc,$nick).unset saniye içersinde, Yalnız 1 defa [!]burc Komutunu Kullanabilirsiniz. }
  else {
    .set %:chan $chan
    .timer -h 1 500 burc $replace($lower($2),İ,i,I,i,Ğ,g,ğ,g,Ş,s,ş,s,Ü,u,ü,u,ö,o,Ö,o,ı,i,ç,c,Ç,c)
    .hinc -mu30 burc $nick
  }
}
 pCkOpAt isimli Üye şimdilik offline konumundadır   Alıntı
Alt 28 Temmuz 2018, 11:02   #2
 
pCkOpAt - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 03 Kasım 2016
Bulunduğu yer: Rize
Mesajlar: 139
WEB Sitesi: www.sohbetciyiz.net
IRC Sunucusu: irc.sohbetciyiz.net
İlgi Alanı: mIRC Scripting
Alınan Beğeni: 63
Standart Cevap: mIRC Socket !burc Kodu (Güncel)

28.07.2018
Güncel
 pCkOpAt isimli Üye şimdilik offline konumundadır   Alıntı
Alt 28 Temmuz 2018, 15:45   #3
 
KiN_BLaDe - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 27 Temmuz 2018
Bulunduğu yer: WORLD
Mesajlar: 20
WEB Sitesi: yok
IRC Sunucusu: yok
İlgi Alanı: Linux
Alınan Beğeni: 3
Standart Cevap: mIRC Socket !burc Kodu (Güncel)

Emeğinize sağlık hocam. Sizin tarafınızdanmı kodlandı?
 KiN_BLaDe isimli Üye şimdilik offline konumundadır   Alıntı
Alt 28 Temmuz 2018, 19:30   #4
 
pCkOpAt - ait Kullanıcı Resmi (Avatar)
 
Üyelik tarihi: 03 Kasım 2016
Bulunduğu yer: Rize
Mesajlar: 139
WEB Sitesi: www.sohbetciyiz.net
IRC Sunucusu: irc.sohbetciyiz.net
İlgi Alanı: mIRC Scripting
Alınan Beğeni: 63
Standart Cevap: mIRC Socket !burc Kodu (Güncel)

KiN_BLaDe Nickli Üyeden Alıntı Mesajı göster
Emeğinize sağlık hocam. Sizin tarafınızdanmı kodlandı?



Evet. Yine değişmişti güncelledim tekrardan.
 pCkOpAt isimli Üye şimdilik offline konumundadır   Alıntı

Yeni Konu   Cevap Yaz

Etiketler
burç, güncel, kodu, mirc, socket


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
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 Açık
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Mirc Küfür Koruması ( Socket Kullanarak ) AntepLi Hazır Kodlar 0 03 Mart 2019 12:29
mIRC Socket BNC v2 Code mIRC/Socket Botlar 0 21 Ağustos 2016 17:19
mIRC Socket Web Sitesinden Veri Videolu Anlatım! Code mIRC Scripting Dersleri 0 13 Temmuz 2016 10:36
OXM Socket(mirc) Oyun Botu.. No_FeaR mIRC/Socket Botlar 4 31 Mart 2016 20:48
Google Trend Kodu(Socket) Code Hazır Kodlar 0 21 Mart 2016 23:46

web hosting web hosting
 buy vds
 vps buy

Powered by vBulletin®
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.