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



Instagram takipçi satın al
7Beğeni(ler)
  • 3 Post By BlackForce
  • 1 Post By Che
  • 1 Post By kEmAncI
  • 1 Post By kL
  • 1 Post By Subzero

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 12 Eylül 2021, 21:47   #1
Çevrimiçi
Sosyal Medya (Profil) Sistemi / Bot kontrollü




Merhaba, fazla uzatmadan direkt dosya bilgilerine geçeceğim,
Sistem Sunucunuzdaki kullanıcılar için bot ile yönetilebilir bir sosyal medya içeriğidir.

Sisteme girerken sunucudaki nick ve şifreleriniz ile giriş yapmalısınız. Eğer nick şifrenizi unuttuysanız, siteden nick ve email vererek mail adresinize şifre hatırlatıcı bir eposta alacaksınız.

#Hashtag, @-etiket, kullanıcı engelleme, kullanıcı bildirme, takip isteği, beğeni, yorum, repost gibi özellikler mevcuttur. İstediğiniz kadar sunucuyu aynı çatı altında toplayabilirsiniz.
Kullanıcılar, açıklama gibi web üzerinde gösterilen bilgileri sunucu üzerinden de değiştirebilir.

Sistemde sesli bildirim mevcuttur, Mobil uyumludur.

Sunucuya giriş yapan bir kişi eğer sitede görmediği bir bildirimi varsa özel mesajla uyarılır.
Mysql 5x ile uyumludur, mysqli local olarak kurarsanız hızlandırırsınız,
Bot mysql phpye ihtiyac duymadan mysql islemleri gerçekleştirebilmektedir.
Bot ile mail gönderebilirsiniz. (Bunu php tarafında nick şifremi unuttum kısmında kullanıyorum. Bu da mIRC kodlarıyla)


Kullanıcılar sunucunuzdaki nick ve şifresiyle giriş yapabilir.

PHP kısmı %98 Türkçeye çevrilmiştir. Çevrilmeyen kısımlar zaten gereksiz yerler.

Bot Komutları:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
.yasakla nick AÇIKLAMA: Sistemden banlar. .yasakac nick AÇIKLAMA: Sistem banını açar. .raporlar AÇIKLAMA: Kullanıcıların gönderdiği raporları (post, fotoğraflar vs.) listeler. .onayla nick AÇIKLAMA: Nick'e Orjinal nick tagı ekler. .adminekle nick AÇIKLAMA: Nick'e tam erişim verir. .adminsil nick AÇIKLAMA: Nick'i admin listesinden siler. .yetkiliekle nick AÇIKLAMA: Nick'e moderatör yetkisi verir. .yetkilisil nick AÇIKLAMA: Nick'in moderatör yetkisini alır. .adminlist AÇIKLAMA: Admin listesini listeler. .yetkililist AÇIKLAMA: Yetkili listesini listeler. .ozelkapa nick AÇIKLAMA: Nick'in profilini gizler. .ozelac nick AÇIKLAMA: Nick'in profilini tekrar açar. .baslik cümle AÇIKLAMA: Sosyal Medya ismini değiştirir. .kelimebanla kelime,kelime,kelime AÇIKLAMA: Belirtilen kelimeyi/kelimeleri yasaklar. Çoklu eklemelerde virgül kullanılmalıdır. .kelimebanac kelime AÇIKLAMA: Yasaklı kelimeyi siler. .puanver nick puan AÇIKLAMA: Nick'e puan verir. .isimdegistir nick isim soyisim AÇIKLAMA: Nick'in profil ve görüntülenen ismini değiştirir. Normalde bütün isimler sadece nick olarak görülür. Bunu yaparsanız, profil linki ve adresi değişmez, sadece görünen isim değişir. .hakkindadegistir nick aciklama AÇIKLAMA: Nick'in profilindeki hakkında açıklamasını değiştirir.

Görseller:


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


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


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


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


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


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


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


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


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


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


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


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


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


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


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


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


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


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


PHP'de değiştirilecek yerler:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
[*]core\classes\Database.php

SQL'de değiştirilecek yerler:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
[*]settings --> url (Tam URL girin.)

social_bot.mrc'de değiştirilecek yerler:

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias bot_nick return BFServices
alias bot_pass 
return SIFRE
alias bot_oper_pass 
return OPER_ADI OPER_SIFRESI
alias bot_full_name 
return BF Services tarafindan saglanmistir
alias sunucu 
return 185.114.23.187 6667
alias owner 
return BlackForce
alias kanal 
return #bf
alias _site_ return https://mircsystem.com/bf
alias mysql_sunucu return localhost
alias mysql_kullanici 
return MYSQL_K_ADI
alias mysql_sifre 
return MYSQL_SIFRE
alias db 
return DB_ADI
alias email_sunucusu 
return mircsystem.com 
alias email_portu 
return 465 
alias e_ssl 
return evet
alias email_kullanici 
return destek[MENTION=8176]MirC[/MENTION]system.com
alias email_sifre 
return email_sifre 
alias email_sunucu_adi 
return BFServices
alias email_baslik 
return Nick Sifreniz $email_sunucusu

];Port Bilgileri

alias dinlenecek_port 
return 5002
;burayı değiştirirseniz,
core\classes\user.php --> 43. ve 62. satırları ve pages\lost_password.php --> 15. satırı da değiştirin

PHP klasörünü istediğiniz FTP dizinine atın. .Sql dosyasını databaseye boşaltın.
mIRC klasörünün içindeki dosyaları mIRC klasörünüze atın. .Mrc dosyalarını mIRC'inize tanımlayın.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
/* Yazan: <BlackForce> | Test eden: <Subzero> (:*) Açıklama: Selam kardeşim, bu işleyiş sadece bir ön çalışmadır. Açıkcası benim ilk serverside-clientside çalışmamdı. O yüzden, şimdi tekrar incelesem büyük ihtimal 'bunu niye böyle yapmışım yaw' diyeceğim pek çok satır barındırıyordur. Ama yine de, umarım ihtiyaçlarını karşılar, kullanıcılarına başka bir platform sunabilir ve daha da geliştirirsin. Emin ol, IRC topluluğu için içerik ürettikçe insanlar sana bir teşekkürü çok görmezler(!) Keyifli kullanımlar bro, soru(n)'lar için: live:.cid.ae2f3bd6c3a66ba9 adresini ekleyebilirsin. */ /* Bilgiler */ ;Bot Bilgileri alias bot_nick return BFServices alias bot_pass return SIFRE alias bot_oper_pass return OPER_ADI OPER_SIFRESI alias bot_full_name return BF Services tarafindan saglanmistir alias sunucu return 185.114.23.187 6667 alias owner return BlackForce alias kanal return #bf ;MySQL Bilgileri alias _site_ return https://mircsystem.com/bf alias mysql_sunucu return localhost alias mysql_kullanici return MYSQL_K_ADI alias mysql_sifre return MYSQL_SIFRE alias db return DB_ADI ;Email Bilgileri alias email_sunucusu return mircsystem.com alias email_portu return 465 alias e_ssl return evet alias email_kullanici return destek@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]system.com alias email_sifre return email_sifre alias email_sunucu_adi return BFServices alias email_baslik return Nick Sifreniz - $email_sunucusu ;Port Bilgileri alias dinlenecek_port return 5002 ;burayı değiştirirseniz, core\classes\user.php --> 43. ve 62. satırları ve pages\lost_password.php --> 15. satırı da değiştirin. /* Bilgiler Sonu - Bu satırdan sonrası keyfe girer aga :D */ on *:START:{ set %baglanti $mysql_connect($mysql_sunucu, $mysql_kullanici, $mysql_sifre) | if (!%baglanti) { echo -st MySQL bağlantısı başarısız. | echo -st - %mysql_errstr | halt } | elseif ($mysql_select_db(%baglanti, $db)) { mysql_set_charset %baglanti utf8 } | sosyal.medya } menu * { MySQL Baglanti &Bilgisi:echo -at Bağlantı $iif($mysql_is_valid_connection(%baglanti),başarılı.,başarısız.) } alias sifre_hatirlat { if !%kontrol.dur. [ $+ [ $1 ] ] { set -u3 %kontrol.dur. [ $+ [ $1 ] ] 1 | if $hget(email) { hfree email } | mail_sw_bilgi $email_kullanici $email_sunucu_adi | mail_gd_bilgi $1 | email.baslik $email_baslik | email.icerik Merhaba! nick sifreniz $+($2,'dir.) Lutfen kayip etmeyiniz. | email.icerik Eger bu E-Posta spama dustuyse lutfen spam degil olarak isaretleyiniz. | email.icerik Iyi sohbetler dileriz! | email.icerik . | mail_gonder hts } } alias social_bot $iif($sock($+(social_bot)).status == active,sockwrite -nt $+(social_bot) $1-) alias cevirbkm { if $1 == NEW_FOLLOWER { return Yeni Takipçi } | elseif $1 == NEW_MESSAGE { return Yeni Mesaj } | elseif $1 == FOLLOWER_REQUEST { return Yeni Takip İsteği } | elseif $1 == REPOST { return Yeni İçerik Paylaşımı } | elseif $1 == PHOTO_LIKE { return Yeni Fotoğraf Beğenisi } | elseif $1 == PHOTO_COMMENT { return Yeni Fotoğraf Yorumu } } alias hts { if ($0) echo -b $1- | else { echo -b Mail gönderildi! } } alias site { return $_site_ $+ $1 } alias mail_gd_bilgi { if ($regex($1,/^(.*?)@(.*?)$/)) { hadd -m email gd_mail $1 | hadd -m email gd_host $regml(2) | hadd -m email gd_isim $2- } } alias mail_sw_bilgi { if ($regex($1,/^(.*?)@(.*?)$/)) { hadd -m email mailim $1 | hadd -m email mail_host $regml(2) | hadd -m email mail_isim $2- } } alias email.baslik { hadd -m email baslik $1- } alias email.icerik { hadd -m email icerik_ $+ $calc($hfind(email,icerik_*,0,w) + 1) $1- } alias mail_gonder { hadd -m email hata $1 | mail_baglan | .timeremail 1 5 sockclose BF_SERVICES_MAIL } alias mail_baglan { if (!$sock(email)) { sockopen $iif($e_ssl == evet,-e,) BF_SERVICES_MAIL $email_sunucusu $email_portu } | else { email_hata Sistem kullanımda. } } alias mail_yazdir { sockwrite -n BF_SERVICES_MAIL $iif($1 == -bf_services, $2-, $1-) } alias email_hata { if ($hget(email,hata)) $v1 $1- } alias msgat { if !%bilgi. [ $+ [ $strip($gettok($1-,10,32)) ] ] { social_bot privmsg $kanal $1- | inc -u5 %bilgi. [ $+ [ $strip($gettok($1-,10,32)) ] ] 1 } } alias msgat2 { if !%bilgi. [ $+ [ $strip($gettok($1-,12,32)) ] ] { social_bot privmsg $kanal $1- | inc -u5 %bilgi. [ $+ [ $strip($gettok($1-,12,32)) ] ] 1 } } alias msgat22 { if !%bilgi. [ $+ [ $strip($gettok($1-,10,32)) ] ] { social_bot privmsg $kanal $1- | inc -u5 %bilgi. [ $+ [ $strip($gettok($1-,10,32)) ] ] 1 } } alias sc.temiz return $mysql_escape_string($1-) alias sc.tirnak return $+($chr(39),$1-,$chr(39)) alias sosyal.medya { if (!$sock(sosyal.medya)) socklisten sosyal.medya $dinlenecek_port } on *:socklisten:sosyal.medya:{ sockaccept sosyal.medya.gelen. $+ $ticks } on *:sockclose:social_bot:{ timer 1 2 sockopen social_bot $sunucu } on *:sockclose:BF_SERVICES_MAIL:{ .timeremail off } on *:sockopen:social_bot:{ if ($sockerr) { timer 1 2 sockopen social_bot $sunucu } | social_bot NICK $+($bot_nick,$r(10,99999)) | social_bot USER $bot_nick "" " $+ $iif($host,$host,$ip) $bot_full_name } on *:sockopen:BF_SERVICES_MAIL:{ if ($sockerr) { email_hata Mail sunucusunda hata. } | else { hadd -m email email_adim 1 } } on *:sockread:social_bot:{ if ($sockerr) { sockclose $sockname | return } var %:<gln> | sockread %:<gln> | tokenize 32 %:<gln> if ($1 = ping) social_bot pong $remove($2,:) elseif $regex($2,/(001|433)/) { social_bot join 0,0 | social_bot oper $bot_oper_pass | social_bot ns ghost $bot_nick $bot_pass | social_bot ns release $bot_nick $bot_pass | $+(.timer,botnck,$r(1,232)) 1 2 social_bot nick $bot_nick } elseif $1 == error && $2 == :closing { sockclose $sockname | timer 1 2 sockopen social_bot $sunucu } elseif $regex($2,/(473|475|471|474)/) { social_bot sajoin $bot_nick $4 } elseif $2 = 307 { var %slqmrb = SELECT user_id FROM `users` WHERE `username` = ? var %sonucssssss = $mysql_fetch_single($mysql_query(%baglanti, %slqmrb, $strip($4))) if %sonucssssss { var %SqlBFa = SELECT * FROM `notifications` WHERE `to_user_id` = ? AND `botbildirim` = ? AND `status` = ? var %datam = $mysql_query(%baglanti, %SqlBFa, %sonucssssss, 0, 0) while ($mysql_fetch_row(%datam, sonucamk)) { dll $qt($mircdirwhilefix.dll) WhileFix . var %SqlBFaa = UPDATE `notifications` SET `botbildirim` = 1 WHERE `notification_id` = $hget(sonucamk, notification_id) noop $mysql_query(%baglanti, %SqlBFaa) social_bot privmsg $strip($4) Merhaba $strip($4) $+ , $cevirbkm($hget(sonucamk, type)) bildiriminiz var. Hemen profilinize girerek bildirimi görebilirsiniz -->> Profil link'iniz: $site($strip($4)) } mysql_free %datam } } elseif ($2 == NOTICE) { if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) { social_bot who +I $regml(3) } if *changed his/her nickname* iswm $1- { if $timer(111 $+ $7) { $+(.timer,111,$7) off | $+(.timer,111,$14) 1 5 social_bot whois $14 } } if $remove($gettok($1,1,33),:) == NickServ { if @ isin $1- && $gettok(%sock. [ $+ [ $5 ] ],2,32) == $5 && $6 == $gettok(%sock. [ $+ [ $5 ] ],3,32) { set -u2 %sifrehatirlatici [ $+ [ $5 ] ] $6 | set -u2 %sifrehatirlatici $5 | social_bot nickserv getpass $5 } elseif @ isin $1- && $gettok(%sock. [ $+ [ $5 ] ],2,32) == $5 && $6 != $gettok(%sock. [ $+ [ $5 ] ],3,32) { if !%bilgi.hatirlatici. [ $+ [ %sifrehatirlatici ] ] { social_bot privmsg $kanal 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Şifre Hatırlatma Talebi - Nick: %sifrehatirlatici  - Sebep: Yanlış Email Adresi Verildi. | inc -u5 %bilgi.hatirlatici. [ $+ [ %sifrehatirlatici ] ] 1 } | sockwrite %socks YE | unset %socks } elseif *Uyan veri bulunamadi* iswm $1- { if !%bilgi.hatirlatici. [ $+ [ %sifrehatirlatici ] ] { social_bot privmsg $kanal 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Şifre Hatırlatma Talebi - Nick: %sifrehatirlatici  - Sebep: Email bulunamadı. | inc -u5 %bilgi.hatirlatici. [ $+ [ %sifrehatirlatici ] ] 1 } | sockwrite %socks KO | unset %socks } elseif *Kullanimi* iswm $1- { sockwrite $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],1,32) YK HesapYok | unset %sock. [ $+ [ $removecs($4,:,) ] ] $+ * | msgat2 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Giriş Denemesi - Nick: $removecs($4,:,)  - Sebep: Nick Şifreli Değil. } elseif kayitli bir nick degil. isin $strip($remove($1-,:)) { sockwrite $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],1,32) YK HesapYok | unset %sock. [ $+ [ $removecs($4,:,) ] ] $+ * | msgat2 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Giriş Denemesi - Nick: $removecs($4,:,)  - Sebep: Nick Şifreli Değil. } elseif *nick'inin sifresi* iswm $strip($remove($1-,:)) { if %sifrehatirlatici [ $+ [ $removecs($4,:,) ] ] { sockwrite %socks TM %sifrehatirlatici [ $+ [ $removecs($4,:,) ] ] | sifre_hatirlat %sifrehatirlatici [ $+ [ $removecs($4,:,) ] ] $removecs($8,,.) | if !%bilgi.hatirlatici. [ $+ [ $gettok(%gelen,1,32) ] ] { social_bot privmsg $kanal 2BILGI: - Sosyal Medya (Profil Sistemi) Şifre Hatırlatma Talebi - Nick: $removecs($4,:,) - Mail: %sifrehatirlatici [ $+ [ $removecs($4,:,) ] ] | inc -u5 %bilgi.hatirlatici. [ $+ [ $gettok(%gelen,1,32) ] ] 1 } | return } var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $removecs($4,:,))) if !%sonucs { var %SqlBF2 = INSERT INTO `users` (`username`,`password`,`email`,`email_activation_code`,`name`,`active`,`ip`,`date`) VALUES (?,?,?,?,?,?,?,SYSDATE()) noop $mysql_query(%baglanti, %SqlBF2, $removecs($4,:,),$removecs($8,,.),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
,123,$removecs($4,:,),1,31.31.31.31) if $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],3,32) == $removecs($8,,.) { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? | var %sonucsa = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $removecs($4,:,))) | sockwrite $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],1,32) OK %sonucsa | unset %sock. [ $+ [ $removecs($4,:,) ] ] $+ * | msgat 2BILGI: - Sosyal Medya (Profil Sistemi) Girişi - Nick: $removecs($4,:,)  Kisi ilk defa giris yapti. } else { sockwrite $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],1,32) YOK | unset %sock. [ $+ [ $removecs($4,:,) ] ] $+ * | msgat2 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Giriş Denemesi - Nick: $removecs($4,:,)  - Sebep: Nick Şifresi Yanlış Girildi } } elseif %sonucs { if $strip($gettok(%sock. [ $+ [ $removecs($4,:,) ] ],3,32)) == $removecs($8,.,) { sockwrite $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],1,32) OK %sonucs | unset %sock. [ $+ [ $removecs($4,:,) ] ] $+ * | msgat 2BILGI: - Sosyal Medya (Profil Sistemi) Girişi - Nick: $removecs($4,:,)  } | else { sockwrite $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],1,32) YOK | unset %sock. [ $+ [ $removecs($4,:,) ] ] $+ * | msgat2 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Giriş Denemesi - Nick: $removecs($4,:,)  - Sebep: Nick Şifresi Yanlış Girildi } } } } } elseif ($2 == NICK) { if ($remove($gettok($1,1,33),:) == $bot_nick) { social_bot ns ghost $bot_nick $bot_pass | social_bot ns release $bot_nick $bot_pass | $+(.timer,botnck,$r(1,232)) 1 3 social_bot nick $bot_nick } | elseif ($right($3,-1) == $bot_nick) { social_bot nickserv identify $bot_pass | social_bot oper $bot_oper_pass } } elseif $regex($2,/(PRIVMSG)/Si) { if $3 == $kanal && $remove($gettok($1,1,33),:) == $owner { if ($regex($remove($4,:),/^([!.&]yasakla)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `active` = 0 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]yasakac)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `active` = 1 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]raporlar)$/Si)) { var %SqlBFads SELECT * FROM `reports` var %counfat = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFads)) if %counfat { var %SqlBFaf = SELECT * FROM `reports` var %datam = $mysql_query(%baglanti, %SqlBFaf, %counfat) while ($mysql_fetch_row(%datam, sonucamkq)) { dll $qt($mircdirwhilefix.dll) WhileFix . var %bildiren = SELECT username FROM `users` WHERE `user_id` = $hget(sonucamkq, user_id) var %user_nicki = $mysql_fetch_single($mysql_query(%baglanti, %bildiren)) social_bot privmsg $3 Rapor Tarihi: $hget(sonucamkq, date)  Rapor ID: $hget(sonucamkq, id) Bildiren: %user_nicki Raporlanan ID: $hget(sonucamkq, reported_id) Rapor Mesajı: $hget(sonucamkq, message)  } mysql_free %datam } else { social_bot privmsg $3 Hiç yeni rapor yok. } } if ($regex($remove($4,:),/^([!.&]onayla)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `verified` = 1 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]adminekle)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `verified` = 2 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]adminsil)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `verified` = 0 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } elseif ($regex($remove($4,:),/^([!.&]sosyalkomutlar)$/Si)) { var %iOzel 1 while %iOzel <= $lines(sosyalkomutlar.txt) { dll $qt($mircdirwhilefix.dll) WhileFix . social_bot privmsg $3 $read(sosyalkomutlar.txt,%iOzel) inc %iOzel } } if ($regex($remove($4,:),/^([!.&]yetkiliekle)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `verified` = 1 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]yetkilisil)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `verified` = 0 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]adminlist)$/Si)) { var %SqlBF = SELECT * FROM `users` WHERE `type` = ? var %data = $mysql_query(%baglanti, %SqlBF, 2) var %SqlBFadsada = SELECT type FROM users WHERE type = ? if !$mysql_fetch_single($mysql_query(%baglanti, %SqlBFadsada, 1)) { social_bot privmsg $3 Hiç yetkili yok! } else { while ($mysql_fetch_row(%data, getiramk)) { var %songiris $datebilgi($hget(getiramk, last_activity),ayinkaci) $datebilgi($hget(getiramk, last_activity),aysöyle) $datebilgi($hget(getiramk, last_activity),hangiyil) $datebilgi($hget(getiramk, last_activity),günsöyle) if !%songiris { var %songiris = Henüz giriş yapmamış. } dll $qt($mircdirwhilefix.dll) WhileFix . social_bot privmsg $3 Nick: $hget(getiramk, username)  -- İsim: $hget(getiramk, name)  -- Hakkında: $iif($hget(getiramk, about),$hget(getiramk, about),Açıklaması yok.)  -- Son Görülme: %songiris  } mysql_free %data } } if ($regex($remove($4,:),/^([!.&]yetkililist)$/Si)) { var %SqlBF = SELECT * FROM `users` WHERE `type` = ? var %data = $mysql_query(%baglanti, %SqlBF, 1) var %SqlBFadsada = SELECT type FROM users WHERE type = ? if !$mysql_fetch_single($mysql_query(%baglanti, %SqlBFadsada, 1)) { social_bot privmsg $3 Hiç yetkili yok! } else { while ($mysql_fetch_row(%data, getiramk)) { var %songiris $datebilgi($hget(getiramk, last_activity),ayinkaci) $datebilgi($hget(getiramk, last_activity),aysöyle) $datebilgi($hget(getiramk, last_activity),hangiyil) $datebilgi($hget(getiramk, last_activity),günsöyle) if !%songiris { var %songiris = Henüz giriş yapmamış. } dll $qt($mircdirwhilefix.dll) WhileFix . social_bot privmsg $3 Nick: $hget(getiramk, username)  -- İsim: $hget(getiramk, name)  -- Hakkında: $iif($hget(getiramk, about),$hget(getiramk, about),Açıklaması yok.)  -- Son Görülme: %songiris  } mysql_free %data } } if ($regex($remove($4,:),/^([!.&]ozelac)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `private` = 1 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]ozelkapat)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `private` = 0 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]baslik)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen mesajinizi belirtin. } elseif $5 { var %SqlBFBF = UPDATE `settings` SET `title` = $sc.tirnak($sc.temiz($strip($5-))) WHERE `id` = ? noop $mysql_query(%baglanti, %SqlBFBF, 1) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } if ($regex($remove($4,:),/^([!.&]kelimebanla)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen mesajinizi belirtin. } elseif $5 && $6 { social_bot privmsg $3 Yanlis ekleme yapiyorsunuz. Coklu kelime ekleyecekseniz, virgul ile ayirin. Mesela: kelime,kelime2,kelime3 gibi.. | return } elseif $5 { var %SqlBF = SELECT banned_words FROM `settings` WHERE `id` = ? var %sonucssds = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, 1)) var %say = 1 var %eklenmekistenen $strip($5) while (%say <= $gettok($strip($5),0,44)) { if $findtok(%sonucssds,$gettok($strip($5),%say,44),44) { social_bot privmsg $3 Eklemek istediginiz $gettok($strip($5),%say,44) kelimesi zaten banlı. | var %eklenmekistenen = $remtok(%eklenmekistenen,$gettok($strip($5),%say,44),44) } else { social_bot privmsg $3  $+ $gettok($strip($5),%say,44) kelimesi ekleniyor. } inc %say } if !%eklenmekistenen { social_bot privmsg $3 İşlem tamamlanamadı! return } var %kelime_bani = $addtok(%sonucssds,%eklenmekistenen,44) var %SqlBFBF = UPDATE `settings` SET `banned_words` = $sc.tirnak($sc.temiz(%kelime_bani)) WHERE `id` = ? noop $mysql_query(%baglanti, %SqlBFBF, 1) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } if ($regex($remove($4,:),/^([!.&]kelimebanac)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen mesajinizi belirtin. } elseif $5 { var %SqlBF = SELECT banned_words FROM `settings` WHERE `id` = ? var %sonucssds = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, 1)) if !$findtok(%sonucssds,$strip($5),44) { social_bot privmsg $3 Eklemek istediginiz kelime zaten banlı degil. | return } var %kelime_bani = $remtok(%sonucssds,$strip($5),44) var %SqlBFBF = UPDATE `settings` SET `banned_words` = $sc.tirnak($sc.temiz(%kelime_bani)) WHERE `id` = ? noop $mysql_query(%baglanti, %SqlBFBF, 1) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } if ($regex($remove($4,:),/^([!.&]puanver)$/Si)) { if !$5 || !$6 { social_bot privmsg $3 Lutfen nick ve puan belirtin. -->> $remove($4,:) $remove($gettok($1,1,33),:) 100 } elseif $5 && $6 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFdfdfdm = SELECT points FROM `users` WHERE `user_id` = ? var %sonucsdfdfdt = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFdfdfdm, %sonucs)) var %SqlBFBF = UPDATE `users` SET `points` = $calc(%sonucsdfdfdt + $strip($6)) WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. Kisinin toplam puani: $calc(%sonucsdfdfdt + $strip($6)) } } } if ($regex($remove($4,:),/^([!.&]isimdegistir)$/Si)) { if !$5 || !$6 { social_bot privmsg $3 Lutfen nick ve isim belirtin. -->> $remove($4,:) $remove($gettok($1,1,33),:) Gökhan ÇARKACI } elseif $5 && $6 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `name` = $sc.tirnak($sc.temiz($strip($6-))) WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. Kisinin guncel ismi: $strip($6-) } } } if ($regex($remove($4,:),/^([!.&]hakkindadegistir)$/Si)) { if !$5 || !$6 { social_bot privmsg $3 Lutfen nick ve isim belirtin. -->> $remove($4,:) $remove($gettok($1,1,33),:) Gökhan ÇARKACI } elseif $5 && $6 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `about` = $sc.tirnak($sc.temiz($strip($6-))) WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. Kisinin guncel aciklamasi: $strip($6-) } } } } } } on *:sockread:BF_SERVICES_MAIL:{ var %;<email_gelen> | var %email_adim $hget(email,email_adim) | sockread %;<email_gelen> if $regex(%;<email_gelen>,/^(\d\d\d)([ -])(.*)$/) && $regml(2) != - { var %;<kod> $regml(1) | var %;<cvp> $regml(3) if %email_adim == 1 && %;<kod> == 220 { mail_yazdir $+($chr(69),$chr(72),$chr(76),$chr(79)) | hinc email email_adim 1 } elseif %email_adim == 2 && %;<kod> == 250 { mail_yazdir $+($chr(65),$chr(85),$chr(84),$chr(72)) $+($chr(76),$chr(79),$chr(71),$chr(73),$chr(78)) | hinc email email_adim 1 } elseif %email_adim == 3 && %;<kod> == 334 && %;<cvp> == VXNlcm5hbWU6 { mail_yazdir -bf_services $encode($email_kullanici,m) | hinc email email_adim 1 } elseif %email_adim == 4 && %;<kod> == 334 && %;<cvp> == UGFzc3dvcmQ6 { mail_yazdir -bf_services $encode($email_sifre,m) | hinc email email_adim 1 } elseif %email_adim == 5 && %;<kod> == 235 { mail_yazdir $+($chr(77),$chr(65),$chr(73),$chr(76)) $+($chr(70),$chr(82),$chr(79),$chr(77),$chr(58)) $+(<,$hget(email,mailim),>) | hinc email email_adim 1 } elseif %email_adim == 6 && %;<kod> == 250 { mail_yazdir $+($chr(82),$chr(67),$chr(80),$chr(84)) $+($chr(84),$chr(79),$chr(58)) $+(<,$hget(email,gd_mail),>) | hinc email email_adim 1 } elseif %email_adim == 7 && %;<kod> == 250 { mail_yazdir $+($chr(68),$chr(65),$chr(84),$chr(65)) | hinc email email_adim 1 } elseif %email_adim == 8 && %;<kod> == 354 { mail_yazdir $+($chr(70),$chr(114),$chr(111),$chr(109),$chr(58)) $iif($hget(email,mail_isim),$qt($v1),) $+(<,$hget(email,mailim),>) | mail_yazdir $+($chr(84),$chr(111),$chr(58)) $iif($hget(email,gd_isim),$qt($v1),) $+(<,$hget(email,gd_mail),>) | mail_yazdir $+($chr(83),$chr(117),$chr(98),$chr(106),$chr(101),$chr(99),$chr(116),$chr(58)) $hget(email,baslik) | mail_yazdir | var %;<toplam> = $hfind(email,icerik_*,0,w), %i = 1 | while (%i <= %;<toplam>) { mail_yazdir $hget(email,$+(icerik_,%i)) | inc %i 1 } | mail_yazdir . | hinc email email_adim 1 } elseif %email_adim == 9 && %;<kod> == 250 { mail_yazdir $+($chr(81),$chr(85),$chr(73),$chr(84)) | hinc email email_adim 1 } | elseif %email_adim == 10 && %;<kod> == 221 { } | else { email_hata %;<email_gelen> } } } on *:sockread:sosyal.medya.gelen.*:{ sockread %gelen if GRS isin %gelen { set %sock. [ $+ [ $gettok(%gelen,1,32) ] ] $sockname $gettok(%gelen,1,32) $gettok(%gelen,2,32) | social_bot nickserv getpass $gettok(%gelen,1,32) } elseif CKS isin %gelen { var %SqlBFm = SELECT username FROM `users` WHERE `user_id` = ? | var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, $gettok(%gelen,1,32))) | msgat 2BILGI: - Sosyal Medya (Profil Sistemi) Çıkış - Nick: %sonuc  } elseif UNTT isin %gelen { if $sock(BF_SERVICES_MAIL) { sockwrite $sockname SD | if !%bilgi.hatirlatici. [ $+ [ $gettok(%gelen,1,32) ] ] { social_bot privmsg $kanal 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Şifre Hatırlatıma Talebi - Nick: $gettok(%gelen,1,32)  - Sebep: Sistem Kullanımda. | inc -u5 %bilgi.hatirlatici. [ $+ [ $gettok(%gelen,1,32) ] ] 1 } | return } | set %sock. [ $+ [ $gettok(%gelen,1,32) ] ] $sockname $gettok(%gelen,1,32) $gettok(%gelen,2,32) | set -u2 %socks $sockname | set -u2 %sifrehatirlatici $gettok(%gelen,1,32) | social_bot nickserv listemail $gettok(%gelen,1,32) } }

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias MYSQL_OK return 0 alias MYSQL_BOTH return 1 alias MYSQL_NUM return 2 alias MYSQL_ASSOC return 3 alias MYSQL_ALL return 1 alias MYSQL_BOUND return 2 alias MYSQL_ERROR_OK return 0 alias MYSQL_ERROR_INVALIDARG return 3000 alias MYSQL_ERROR_BIND return 3001 alias MYSQL_ERROR_NOMOREROWS return 3002 alias MYSQL_ERROR_FETCH return 3003 alias MYSQL_ERROR_NOMOREFIELDS return 3004 on *:LOAD:{ echo 3 -a mIRC MySQL yüklendi. } alias mysql_dll return $qt($+($scriptdir,mmysql.dll)) alias -l mysql_param return $qt($replace($1, \, \\, ", \")) alias mysql_help { run $+($scriptdir,mmysql.chm) } alias mysql_version { return $dll($mysql_dll, mmysql_version,) } alias mysql_qt { return $+(',$1-,') } alias mysql_connect { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) if ($0 >= 3) %params = %params $mysql_param($3) if ($0 >= 4) %params = %params $mysql_param($4) return $dll($mysql_dll, mmysql_connect, %params) } alias mysql_close { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_close, %params) } alias mysql_select_db { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_select_db, %params) } alias mysql_ping { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_ping, %params) } alias mysql_set_charset { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($1) return $dll($mysql_dll, mmysql_set_charset, %params) } alias mysql_autocommit { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($1) return $dll($mysql_dll, mmysql_autocommit, %params) } alias mysql_get_client_info { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_get_client_info, %params) } alias mysql_get_host_info { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_get_host_info, %params) } alias mysql_get_proto_info { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_get_proto_info, %params) } alias mysql_get_server_info { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_get_server_info, %params) } alias mysql_client_encoding { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_client_encoding, %params) } alias mysql_escape_string { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_escape_string, %params) } alias mysql_real_escape_string { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_real_escape_string, %params) } alias mysql_query { var %params if ($0 >= 1) { %params = $mysql_param($1) 1 if (!$mysql_is_valid_statement($1)) { %params = %params $iif($isid && $prop == file, 1, 0) if (!$isid) { var %query, %i = 2 while (%i <= $0) { %query = %query $ [ $+ [ %i ] ] inc %i } %params = %params $mysql_param(%query) } } if ($isid) { var %i = 2 while (%i <= $0) { %params = %params $mysql_param($ [ $+ [ %i ] ]) inc %i } } } return $dll($mysql_dll, mmysql_query, %params) } alias mysql_unbuffered_query { var %params if ($0 >= 1) { %params = $mysql_param($1) 2 if (!$mysql_is_valid_statement($1)) { %params = %params $iif($isid && $prop == file, 1, 0) if (!$isid) { var %query, %i = 2 while (%i <= $0) { %query = %query $ [ $+ [ %i ] ] inc %i } %params = %params $mysql_param(%query) } } if ($isid) { var %i = 2 while (%i <= $0) { %params = %params $mysql_param($ [ $+ [ %i ] ]) inc %i } } } return $dll($mysql_dll, mmysql_query, %params) } alias mysql_exec { var %params if ($0 >= 1) { %params = $mysql_param($1) 3 if (!$mysql_is_valid_statement($1)) { %params = %params $iif($isid && $prop == file, 1, 0) if (!$isid) { var %query, %i = 2 while (%i <= $0) { %query = %query $ [ $+ [ %i ] ] inc %i } %params = %params $mysql_param(%query) } } if ($isid) { var %i = 2 while (%i <= $0) { %params = %params $mysql_param($ [ $+ [ %i ] ]) inc %i } } } return $dll($mysql_dll, mmysql_query, %params) } alias mysql_exec_file { if ($isid) { var %params, %i = 1 while (%i <= $0) { %params = $+(%params,$iif(%params,$chr(44)),$ $+ %i) inc %i } var %cmd = $!mysql_exec( $+ %params $+ ).file return [ [ %cmd ] ] } return $mysql_exec($1, $2).file } alias mysql_free { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_free, %params) } alias mysql_free_result { return $mysql_free($1) } alias mysql_num_rows { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_num_rows, %params) } alias mysql_num_fields { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_num_fields , %params) } alias mysql_affected_rows { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_affected_rows, %params) } alias mysql_insert_id { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_insert_id, %params) } alias mysql_fetch_row { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($gettok($2,1,32)) if ($0 >= 3) %params = %params $mysql_param($3) return $dll($mysql_dll, mmysql_fetch_row, %params) } alias mysql_fetch_num { return $mysql_fetch_row($1, $2, $MYSQL_NUM) } alias mysql_fetch_assoc { return $mysql_fetch_row($1, $2, $MYSQL_ASSOC) } alias mysql_fetch_bound { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) tokenize 32 $dll($mysql_dll, mmysql_fetch_bound, %params) if ($0 == 1) { return $1 } if ($0 == 3) { var %file = $1, %i = 1, %total = $numtok($2, 124), %offset = 0 while (%i <= %total) { var %size = $gettok($2, %i, 124), %bvar = $gettok($3, %i, 124) bread %file %offset %size %bvar inc %offset %size inc %i } return 1 } return $null } alias mysql_fetch_single { if ($0 < 2) { return $dll($mysql_dll, mmysql_fetch_single, $iif($0 >= 1, $mysql_param($1))) } else { tokenize 32 $dll($mysql_dll, mmysql_fetch_single, $mysql_param($1) $mysql_param($2)) if ($0 == 3) { bread $1 0 $2 $3 return $bvar($3, 0) } return $null } } alias mysql_fetch_field { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) { var %name = $iif($2 !isnum || $prop == name, 1, 0) %params = %params %name $mysql_param($2) 0 } if ($0 < 3) { return $dll($mysql_dll, mmysql_fetch_field, %params) } else { %params = %params $mysql_param($3) tokenize 32 $dll($mysql_dll, mmysql_fetch_field, %params) if ($0 == 3) { bread $1 0 $2 $3 return $bvar($3, 0) } return $null } } alias mysql_fetch_all { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) if ($0 >= 3) %params = %params $mysql_param($3) return $dll($mysql_dll, mmysql_fetch_all, %params) } alias mysql_result { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) { var %name = $iif($2 !isnum || $prop == name, 1, 0) %params = %params %name $mysql_param($2) 1 } if ($0 < 3) { return $dll($mysql_dll, mmysql_fetch_field, %params) } else { %params = %params $mysql_param($3) tokenize 32 $dll($mysql_dll, mmysql_fetch_field, %params) if ($0 == 3) { bread $1 0 $2 $3 return $bvar($3, 0) } return $null } } alias mysql_data_seek { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_data_seek, %params) } alias mysql_is_valid_connection { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_is_valid_connection, %params) } alias mysql_is_valid_result { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_is_valid_result, %params) } alias mysql_is_valid_statement { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_is_valid_statement, %params) } alias mysql_begin { return $mysql_exec($mysql_param($1), BEGIN) } alias mysql_commit { return $mysql_exec($mysql_param($1), COMMIT) } alias mysql_rollback { return $mysql_exec($mysql_param($1), ROLLBACK) } alias mysql_prepare { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $iif($isid && $prop == file, 1, 0) $mysql_param($2) return $dll($mysql_dll, mmysql_prepare, %params) } alias mysql_bind_field { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) { var %name = $iif($2 !isnum || $prop == name, 1, 0) %params = %params %name $mysql_param($2) } if ($0 >= 3) { %params = %params $mysql_param($3) } return $dll($mysql_dll, mmysql_bind_field, %params) } alias mysql_bind_column { return $mysql_bind_field($1, $2, $3) } alias mysql_bind_param { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) if ($0 >= 3) %params = %params $mysql_param($3) return $dll($mysql_dll, mmysql_bind_param, %params) } alias mysql_bind_value { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) if ($0 >= 3) { var %value, %i = 3 while (%i <= $0) { %value = %value $ [ $+ [ %i ] ] inc %i } %params = %params $mysql_param(%value) } return $dll($mysql_dll, mmysql_bind_value, %params) } alias mysql_bind_null { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_bind_null, %params) } alias mysql_clear_bindings { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_bind_null, %params) } alias mysql_fetch_field_info { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($gettok($2,1,32)) if ($0 >= 3) %params = %params $mysql_param($3) return $dll($mysql_dll, mmysql_fetch_field_info, %params) } alias mysql_field_info_seek { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_field_info_seek, %params) } alias mysql_field_name { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_field_name, %params) } alias mysql_field_type { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_field_type, %params) } alias mysql_field_len { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_field_len, %params) } alias mysql_field_table { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_field_table, %params) } alias mysql_field_flags { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_field_flags, %params) } alias mysql_safe_encode { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_safe_encode, %params) } alias mysql_safe_decode { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_safe_decode, %params) }

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
Merhaba, fazla uzatmadan direkt dosya bilgilerine geçeceğim,
Sistem Sunucunuzdaki kullanıcılar için bot ile yönetilebilir bir sosyal medya içeriğidir.

Sisteme girerken sunucudaki nick ve şifreleriniz ile giriş yapmalısınız. Eğer nick şifrenizi unuttuysanız, siteden nick ve email vererek mail adresinize şifre hatırlatıcı bir eposta alacaksınız.

#Hashtag, @-etiket, kullanıcı engelleme, kullanıcı bildirme, takip isteği, beğeni, yorum, repost gibi özellikler mevcuttur. İstediğiniz kadar sunucuyu aynı çatı altında toplayabilirsiniz.
Kullanıcılar, açıklama gibi web üzerinde gösterilen bilgileri sunucu üzerinden de değiştirebilir.

Sistemde sesli bildirim mevcuttur, Mobil uyumludur.

Sunucuya giriş yapan bir kişi eğer sitede görmediği bir bildirimi varsa özel mesajla uyarılır.
Mysql 5x ile uyumludur, mysqli local olarak kurarsanız hızlandırırsınız,
Bot mysql phpye ihtiyac duymadan mysql islemleri gerçekleştirebilmektedir.
Bot ile mail gönderebilirsiniz. (Bunu php tarafında nick şifremi unuttum kısmında kullanıyorum. Bu da mIRC kodlarıyla)


Kullanıcılar sunucunuzdaki nick ve şifresiyle giriş yapabilir.

PHP kısmı %98 Türkçeye çevrilmiştir. Çevrilmeyen kısımlar zaten gereksiz yerler.

Bot Komutları:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
.yasakla nick AÇIKLAMA: Sistemden banlar. .yasakac nick AÇIKLAMA: Sistem banını açar. .raporlar AÇIKLAMA: Kullanıcıların gönderdiği raporları (post, fotoğraflar vs.) listeler. .onayla nick AÇIKLAMA: Nick'e Orjinal nick tagı ekler. .adminekle nick AÇIKLAMA: Nick'e tam erişim verir. .adminsil nick AÇIKLAMA: Nick'i admin listesinden siler. .yetkiliekle nick AÇIKLAMA: Nick'e moderatör yetkisi verir. .yetkilisil nick AÇIKLAMA: Nick'in moderatör yetkisini alır. .adminlist AÇIKLAMA: Admin listesini listeler. .yetkililist AÇIKLAMA: Yetkili listesini listeler. .ozelkapa nick AÇIKLAMA: Nick'in profilini gizler. .ozelac nick AÇIKLAMA: Nick'in profilini tekrar açar. .baslik cümle AÇIKLAMA: Sosyal Medya ismini değiştirir. .kelimebanla kelime,kelime,kelime AÇIKLAMA: Belirtilen kelimeyi/kelimeleri yasaklar. Çoklu eklemelerde virgül kullanılmalıdır. .kelimebanac kelime AÇIKLAMA: Yasaklı kelimeyi siler. .puanver nick puan AÇIKLAMA: Nick'e puan verir. .isimdegistir nick isim soyisim AÇIKLAMA: Nick'in profil ve görüntülenen ismini değiştirir. Normalde bütün isimler sadece nick olarak görülür. Bunu yaparsanız, profil linki ve adresi değişmez, sadece görünen isim değişir. .hakkindadegistir nick aciklama AÇIKLAMA: Nick'in profilindeki hakkında açıklamasını değiştirir.

Görseller:


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


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


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


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


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


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


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


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


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


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


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


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


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


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


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


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


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


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


PHP'de değiştirilecek yerler:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
[*]core\classes\Database.php

SQL'de değiştirilecek yerler:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
[*]settings --> url (Tam URL girin.)

social_bot.mrc'de değiştirilecek yerler:

PHP Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias bot_nick return BFServices
alias bot_pass 
return SIFRE
alias bot_oper_pass 
return OPER_ADI OPER_SIFRESI
alias bot_full_name 
return BF Services tarafindan saglanmistir
alias sunucu 
return 185.114.23.187 6667
alias owner 
return BlackForce
alias kanal 
return #bf
alias _site_ return https://mircsystem.com/bf
alias mysql_sunucu return localhost
alias mysql_kullanici 
return MYSQL_K_ADI
alias mysql_sifre 
return MYSQL_SIFRE
alias db 
return DB_ADI
alias email_sunucusu 
return mircsystem.com 
alias email_portu 
return 465 
alias e_ssl 
return evet
alias email_kullanici 
return destek[MENTION=8176]MirC[/MENTION]system.com
alias email_sifre 
return email_sifre 
alias email_sunucu_adi 
return BFServices
alias email_baslik 
return Nick Sifreniz $email_sunucusu

];Port Bilgileri

alias dinlenecek_port 
return 5002
;burayı değiştirirseniz,
core\classes\user.php --> 43. ve 62. satırları ve pages\lost_password.php --> 15. satırı da değiştirin

PHP klasörünü istediğiniz FTP dizinine atın. .Sql dosyasını databaseye boşaltın.
mIRC klasörünün içindeki dosyaları mIRC klasörünüze atın. .Mrc dosyalarını mIRC'inize tanımlayın.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
/* Yazan: <BlackForce> | Test eden: <Subzero> (:*) Açıklama: Selam kardeşim, bu işleyiş sadece bir ön çalışmadır. Açıkcası benim ilk serverside-clientside çalışmamdı. O yüzden, şimdi tekrar incelesem büyük ihtimal 'bunu niye böyle yapmışım yaw' diyeceğim pek çok satır barındırıyordur. Ama yine de, umarım ihtiyaçlarını karşılar, kullanıcılarına başka bir platform sunabilir ve daha da geliştirirsin. Emin ol, IRC topluluğu için içerik ürettikçe insanlar sana bir teşekkürü çok görmezler(!) Keyifli kullanımlar bro, soru(n)'lar için: live:.cid.ae2f3bd6c3a66ba9 adresini ekleyebilirsin. */ /* Bilgiler */ ;Bot Bilgileri alias bot_nick return BFServices alias bot_pass return SIFRE alias bot_oper_pass return OPER_ADI OPER_SIFRESI alias bot_full_name return BF Services tarafindan saglanmistir alias sunucu return 185.114.23.187 6667 alias owner return BlackForce alias kanal return #bf ;MySQL Bilgileri alias _site_ return https://mircsystem.com/bf alias mysql_sunucu return localhost alias mysql_kullanici return MYSQL_K_ADI alias mysql_sifre return MYSQL_SIFRE alias db return DB_ADI ;Email Bilgileri alias email_sunucusu return mircsystem.com alias email_portu return 465 alias e_ssl return evet alias email_kullanici return destek@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]system.com alias email_sifre return email_sifre alias email_sunucu_adi return BFServices alias email_baslik return Nick Sifreniz - $email_sunucusu ;Port Bilgileri alias dinlenecek_port return 5002 ;burayı değiştirirseniz, core\classes\user.php --> 43. ve 62. satırları ve pages\lost_password.php --> 15. satırı da değiştirin. /* Bilgiler Sonu - Bu satırdan sonrası keyfe girer aga :D */ on *:START:{ set %baglanti $mysql_connect($mysql_sunucu, $mysql_kullanici, $mysql_sifre) | if (!%baglanti) { echo -st MySQL bağlantısı başarısız. | echo -st - %mysql_errstr | halt } | elseif ($mysql_select_db(%baglanti, $db)) { mysql_set_charset %baglanti utf8 } | sosyal.medya } menu * { MySQL Baglanti &Bilgisi:echo -at Bağlantı $iif($mysql_is_valid_connection(%baglanti),başarılı.,başarısız.) } alias sifre_hatirlat { if !%kontrol.dur. [ $+ [ $1 ] ] { set -u3 %kontrol.dur. [ $+ [ $1 ] ] 1 | if $hget(email) { hfree email } | mail_sw_bilgi $email_kullanici $email_sunucu_adi | mail_gd_bilgi $1 | email.baslik $email_baslik | email.icerik Merhaba! nick sifreniz $+($2,'dir.) Lutfen kayip etmeyiniz. | email.icerik Eger bu E-Posta spama dustuyse lutfen spam degil olarak isaretleyiniz. | email.icerik Iyi sohbetler dileriz! | email.icerik . | mail_gonder hts } } alias social_bot $iif($sock($+(social_bot)).status == active,sockwrite -nt $+(social_bot) $1-) alias cevirbkm { if $1 == NEW_FOLLOWER { return Yeni Takipçi } | elseif $1 == NEW_MESSAGE { return Yeni Mesaj } | elseif $1 == FOLLOWER_REQUEST { return Yeni Takip İsteği } | elseif $1 == REPOST { return Yeni İçerik Paylaşımı } | elseif $1 == PHOTO_LIKE { return Yeni Fotoğraf Beğenisi } | elseif $1 == PHOTO_COMMENT { return Yeni Fotoğraf Yorumu } } alias hts { if ($0) echo -b $1- | else { echo -b Mail gönderildi! } } alias site { return $_site_ $+ $1 } alias mail_gd_bilgi { if ($regex($1,/^(.*?)@(.*?)$/)) { hadd -m email gd_mail $1 | hadd -m email gd_host $regml(2) | hadd -m email gd_isim $2- } } alias mail_sw_bilgi { if ($regex($1,/^(.*?)@(.*?)$/)) { hadd -m email mailim $1 | hadd -m email mail_host $regml(2) | hadd -m email mail_isim $2- } } alias email.baslik { hadd -m email baslik $1- } alias email.icerik { hadd -m email icerik_ $+ $calc($hfind(email,icerik_*,0,w) + 1) $1- } alias mail_gonder { hadd -m email hata $1 | mail_baglan | .timeremail 1 5 sockclose BF_SERVICES_MAIL } alias mail_baglan { if (!$sock(email)) { sockopen $iif($e_ssl == evet,-e,) BF_SERVICES_MAIL $email_sunucusu $email_portu } | else { email_hata Sistem kullanımda. } } alias mail_yazdir { sockwrite -n BF_SERVICES_MAIL $iif($1 == -bf_services, $2-, $1-) } alias email_hata { if ($hget(email,hata)) $v1 $1- } alias msgat { if !%bilgi. [ $+ [ $strip($gettok($1-,10,32)) ] ] { social_bot privmsg $kanal $1- | inc -u5 %bilgi. [ $+ [ $strip($gettok($1-,10,32)) ] ] 1 } } alias msgat2 { if !%bilgi. [ $+ [ $strip($gettok($1-,12,32)) ] ] { social_bot privmsg $kanal $1- | inc -u5 %bilgi. [ $+ [ $strip($gettok($1-,12,32)) ] ] 1 } } alias msgat22 { if !%bilgi. [ $+ [ $strip($gettok($1-,10,32)) ] ] { social_bot privmsg $kanal $1- | inc -u5 %bilgi. [ $+ [ $strip($gettok($1-,10,32)) ] ] 1 } } alias sc.temiz return $mysql_escape_string($1-) alias sc.tirnak return $+($chr(39),$1-,$chr(39)) alias sosyal.medya { if (!$sock(sosyal.medya)) socklisten sosyal.medya $dinlenecek_port } on *:socklisten:sosyal.medya:{ sockaccept sosyal.medya.gelen. $+ $ticks } on *:sockclose:social_bot:{ timer 1 2 sockopen social_bot $sunucu } on *:sockclose:BF_SERVICES_MAIL:{ .timeremail off } on *:sockopen:social_bot:{ if ($sockerr) { timer 1 2 sockopen social_bot $sunucu } | social_bot NICK $+($bot_nick,$r(10,99999)) | social_bot USER $bot_nick "" " $+ $iif($host,$host,$ip) $bot_full_name } on *:sockopen:BF_SERVICES_MAIL:{ if ($sockerr) { email_hata Mail sunucusunda hata. } | else { hadd -m email email_adim 1 } } on *:sockread:social_bot:{ if ($sockerr) { sockclose $sockname | return } var %:<gln> | sockread %:<gln> | tokenize 32 %:<gln> if ($1 = ping) social_bot pong $remove($2,:) elseif $regex($2,/(001|433)/) { social_bot join 0,0 | social_bot oper $bot_oper_pass | social_bot ns ghost $bot_nick $bot_pass | social_bot ns release $bot_nick $bot_pass | $+(.timer,botnck,$r(1,232)) 1 2 social_bot nick $bot_nick } elseif $1 == error && $2 == :closing { sockclose $sockname | timer 1 2 sockopen social_bot $sunucu } elseif $regex($2,/(473|475|471|474)/) { social_bot sajoin $bot_nick $4 } elseif $2 = 307 { var %slqmrb = SELECT user_id FROM `users` WHERE `username` = ? var %sonucssssss = $mysql_fetch_single($mysql_query(%baglanti, %slqmrb, $strip($4))) if %sonucssssss { var %SqlBFa = SELECT * FROM `notifications` WHERE `to_user_id` = ? AND `botbildirim` = ? AND `status` = ? var %datam = $mysql_query(%baglanti, %SqlBFa, %sonucssssss, 0, 0) while ($mysql_fetch_row(%datam, sonucamk)) { dll $qt($mircdirwhilefix.dll) WhileFix . var %SqlBFaa = UPDATE `notifications` SET `botbildirim` = 1 WHERE `notification_id` = $hget(sonucamk, notification_id) noop $mysql_query(%baglanti, %SqlBFaa) social_bot privmsg $strip($4) Merhaba $strip($4) $+ , $cevirbkm($hget(sonucamk, type)) bildiriminiz var. Hemen profilinize girerek bildirimi görebilirsiniz -->> Profil link'iniz: $site($strip($4)) } mysql_free %datam } } elseif ($2 == NOTICE) { if $regex($1-,/Client connecting (on port|at) (.+)\: (.+) \((.+)@(.+)\)/Si) { social_bot who +I $regml(3) } if *changed his/her nickname* iswm $1- { if $timer(111 $+ $7) { $+(.timer,111,$7) off | $+(.timer,111,$14) 1 5 social_bot whois $14 } } if $remove($gettok($1,1,33),:) == NickServ { if @ isin $1- && $gettok(%sock. [ $+ [ $5 ] ],2,32) == $5 && $6 == $gettok(%sock. [ $+ [ $5 ] ],3,32) { set -u2 %sifrehatirlatici [ $+ [ $5 ] ] $6 | set -u2 %sifrehatirlatici $5 | social_bot nickserv getpass $5 } elseif @ isin $1- && $gettok(%sock. [ $+ [ $5 ] ],2,32) == $5 && $6 != $gettok(%sock. [ $+ [ $5 ] ],3,32) { if !%bilgi.hatirlatici. [ $+ [ %sifrehatirlatici ] ] { social_bot privmsg $kanal 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Şifre Hatırlatma Talebi - Nick: %sifrehatirlatici  - Sebep: Yanlış Email Adresi Verildi. | inc -u5 %bilgi.hatirlatici. [ $+ [ %sifrehatirlatici ] ] 1 } | sockwrite %socks YE | unset %socks } elseif *Uyan veri bulunamadi* iswm $1- { if !%bilgi.hatirlatici. [ $+ [ %sifrehatirlatici ] ] { social_bot privmsg $kanal 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Şifre Hatırlatma Talebi - Nick: %sifrehatirlatici  - Sebep: Email bulunamadı. | inc -u5 %bilgi.hatirlatici. [ $+ [ %sifrehatirlatici ] ] 1 } | sockwrite %socks KO | unset %socks } elseif *Kullanimi* iswm $1- { sockwrite $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],1,32) YK HesapYok | unset %sock. [ $+ [ $removecs($4,:,) ] ] $+ * | msgat2 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Giriş Denemesi - Nick: $removecs($4,:,)  - Sebep: Nick Şifreli Değil. } elseif kayitli bir nick degil. isin $strip($remove($1-,:)) { sockwrite $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],1,32) YK HesapYok | unset %sock. [ $+ [ $removecs($4,:,) ] ] $+ * | msgat2 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Giriş Denemesi - Nick: $removecs($4,:,)  - Sebep: Nick Şifreli Değil. } elseif *nick'inin sifresi* iswm $strip($remove($1-,:)) { if %sifrehatirlatici [ $+ [ $removecs($4,:,) ] ] { sockwrite %socks TM %sifrehatirlatici [ $+ [ $removecs($4,:,) ] ] | sifre_hatirlat %sifrehatirlatici [ $+ [ $removecs($4,:,) ] ] $removecs($8,,.) | if !%bilgi.hatirlatici. [ $+ [ $gettok(%gelen,1,32) ] ] { social_bot privmsg $kanal 2BILGI: - Sosyal Medya (Profil Sistemi) Şifre Hatırlatma Talebi - Nick: $removecs($4,:,) - Mail: %sifrehatirlatici [ $+ [ $removecs($4,:,) ] ] | inc -u5 %bilgi.hatirlatici. [ $+ [ $gettok(%gelen,1,32) ] ] 1 } | return } var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $removecs($4,:,))) if !%sonucs { var %SqlBF2 = INSERT INTO `users` (`username`,`password`,`email`,`email_activation_code`,`name`,`active`,`ip`,`date`) VALUES (?,?,?,?,?,?,?,SYSDATE()) noop $mysql_query(%baglanti, %SqlBF2, $removecs($4,:,),$removecs($8,,.),
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
,123,$removecs($4,:,),1,31.31.31.31) if $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],3,32) == $removecs($8,,.) { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? | var %sonucsa = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $removecs($4,:,))) | sockwrite $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],1,32) OK %sonucsa | unset %sock. [ $+ [ $removecs($4,:,) ] ] $+ * | msgat 2BILGI: - Sosyal Medya (Profil Sistemi) Girişi - Nick: $removecs($4,:,)  Kisi ilk defa giris yapti. } else { sockwrite $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],1,32) YOK | unset %sock. [ $+ [ $removecs($4,:,) ] ] $+ * | msgat2 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Giriş Denemesi - Nick: $removecs($4,:,)  - Sebep: Nick Şifresi Yanlış Girildi } } elseif %sonucs { if $strip($gettok(%sock. [ $+ [ $removecs($4,:,) ] ],3,32)) == $removecs($8,.,) { sockwrite $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],1,32) OK %sonucs | unset %sock. [ $+ [ $removecs($4,:,) ] ] $+ * | msgat 2BILGI: - Sosyal Medya (Profil Sistemi) Girişi - Nick: $removecs($4,:,)  } | else { sockwrite $gettok(%sock. [ $+ [ $removecs($4,:,) ] ],1,32) YOK | unset %sock. [ $+ [ $removecs($4,:,) ] ] $+ * | msgat2 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Giriş Denemesi - Nick: $removecs($4,:,)  - Sebep: Nick Şifresi Yanlış Girildi } } } } } elseif ($2 == NICK) { if ($remove($gettok($1,1,33),:) == $bot_nick) { social_bot ns ghost $bot_nick $bot_pass | social_bot ns release $bot_nick $bot_pass | $+(.timer,botnck,$r(1,232)) 1 3 social_bot nick $bot_nick } | elseif ($right($3,-1) == $bot_nick) { social_bot nickserv identify $bot_pass | social_bot oper $bot_oper_pass } } elseif $regex($2,/(PRIVMSG)/Si) { if $3 == $kanal && $remove($gettok($1,1,33),:) == $owner { if ($regex($remove($4,:),/^([!.&]yasakla)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `active` = 0 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]yasakac)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `active` = 1 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]raporlar)$/Si)) { var %SqlBFads SELECT * FROM `reports` var %counfat = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFads)) if %counfat { var %SqlBFaf = SELECT * FROM `reports` var %datam = $mysql_query(%baglanti, %SqlBFaf, %counfat) while ($mysql_fetch_row(%datam, sonucamkq)) { dll $qt($mircdirwhilefix.dll) WhileFix . var %bildiren = SELECT username FROM `users` WHERE `user_id` = $hget(sonucamkq, user_id) var %user_nicki = $mysql_fetch_single($mysql_query(%baglanti, %bildiren)) social_bot privmsg $3 Rapor Tarihi: $hget(sonucamkq, date)  Rapor ID: $hget(sonucamkq, id) Bildiren: %user_nicki Raporlanan ID: $hget(sonucamkq, reported_id) Rapor Mesajı: $hget(sonucamkq, message)  } mysql_free %datam } else { social_bot privmsg $3 Hiç yeni rapor yok. } } if ($regex($remove($4,:),/^([!.&]onayla)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `verified` = 1 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]adminekle)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `verified` = 2 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]adminsil)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `verified` = 0 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } elseif ($regex($remove($4,:),/^([!.&]sosyalkomutlar)$/Si)) { var %iOzel 1 while %iOzel <= $lines(sosyalkomutlar.txt) { dll $qt($mircdirwhilefix.dll) WhileFix . social_bot privmsg $3 $read(sosyalkomutlar.txt,%iOzel) inc %iOzel } } if ($regex($remove($4,:),/^([!.&]yetkiliekle)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `verified` = 1 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]yetkilisil)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `verified` = 0 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]adminlist)$/Si)) { var %SqlBF = SELECT * FROM `users` WHERE `type` = ? var %data = $mysql_query(%baglanti, %SqlBF, 2) var %SqlBFadsada = SELECT type FROM users WHERE type = ? if !$mysql_fetch_single($mysql_query(%baglanti, %SqlBFadsada, 1)) { social_bot privmsg $3 Hiç yetkili yok! } else { while ($mysql_fetch_row(%data, getiramk)) { var %songiris $datebilgi($hget(getiramk, last_activity),ayinkaci) $datebilgi($hget(getiramk, last_activity),aysöyle) $datebilgi($hget(getiramk, last_activity),hangiyil) $datebilgi($hget(getiramk, last_activity),günsöyle) if !%songiris { var %songiris = Henüz giriş yapmamış. } dll $qt($mircdirwhilefix.dll) WhileFix . social_bot privmsg $3 Nick: $hget(getiramk, username)  -- İsim: $hget(getiramk, name)  -- Hakkında: $iif($hget(getiramk, about),$hget(getiramk, about),Açıklaması yok.)  -- Son Görülme: %songiris  } mysql_free %data } } if ($regex($remove($4,:),/^([!.&]yetkililist)$/Si)) { var %SqlBF = SELECT * FROM `users` WHERE `type` = ? var %data = $mysql_query(%baglanti, %SqlBF, 1) var %SqlBFadsada = SELECT type FROM users WHERE type = ? if !$mysql_fetch_single($mysql_query(%baglanti, %SqlBFadsada, 1)) { social_bot privmsg $3 Hiç yetkili yok! } else { while ($mysql_fetch_row(%data, getiramk)) { var %songiris $datebilgi($hget(getiramk, last_activity),ayinkaci) $datebilgi($hget(getiramk, last_activity),aysöyle) $datebilgi($hget(getiramk, last_activity),hangiyil) $datebilgi($hget(getiramk, last_activity),günsöyle) if !%songiris { var %songiris = Henüz giriş yapmamış. } dll $qt($mircdirwhilefix.dll) WhileFix . social_bot privmsg $3 Nick: $hget(getiramk, username)  -- İsim: $hget(getiramk, name)  -- Hakkında: $iif($hget(getiramk, about),$hget(getiramk, about),Açıklaması yok.)  -- Son Görülme: %songiris  } mysql_free %data } } if ($regex($remove($4,:),/^([!.&]ozelac)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `private` = 1 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]ozelkapat)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen nick belirtin. } elseif $5 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `private` = 0 WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } } if ($regex($remove($4,:),/^([!.&]baslik)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen mesajinizi belirtin. } elseif $5 { var %SqlBFBF = UPDATE `settings` SET `title` = $sc.tirnak($sc.temiz($strip($5-))) WHERE `id` = ? noop $mysql_query(%baglanti, %SqlBFBF, 1) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } if ($regex($remove($4,:),/^([!.&]kelimebanla)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen mesajinizi belirtin. } elseif $5 && $6 { social_bot privmsg $3 Yanlis ekleme yapiyorsunuz. Coklu kelime ekleyecekseniz, virgul ile ayirin. Mesela: kelime,kelime2,kelime3 gibi.. | return } elseif $5 { var %SqlBF = SELECT banned_words FROM `settings` WHERE `id` = ? var %sonucssds = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, 1)) var %say = 1 var %eklenmekistenen $strip($5) while (%say <= $gettok($strip($5),0,44)) { if $findtok(%sonucssds,$gettok($strip($5),%say,44),44) { social_bot privmsg $3 Eklemek istediginiz $gettok($strip($5),%say,44) kelimesi zaten banlı. | var %eklenmekistenen = $remtok(%eklenmekistenen,$gettok($strip($5),%say,44),44) } else { social_bot privmsg $3  $+ $gettok($strip($5),%say,44) kelimesi ekleniyor. } inc %say } if !%eklenmekistenen { social_bot privmsg $3 İşlem tamamlanamadı! return } var %kelime_bani = $addtok(%sonucssds,%eklenmekistenen,44) var %SqlBFBF = UPDATE `settings` SET `banned_words` = $sc.tirnak($sc.temiz(%kelime_bani)) WHERE `id` = ? noop $mysql_query(%baglanti, %SqlBFBF, 1) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } if ($regex($remove($4,:),/^([!.&]kelimebanac)$/Si)) { if !$5 { social_bot privmsg $3 Lutfen mesajinizi belirtin. } elseif $5 { var %SqlBF = SELECT banned_words FROM `settings` WHERE `id` = ? var %sonucssds = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, 1)) if !$findtok(%sonucssds,$strip($5),44) { social_bot privmsg $3 Eklemek istediginiz kelime zaten banlı degil. | return } var %kelime_bani = $remtok(%sonucssds,$strip($5),44) var %SqlBFBF = UPDATE `settings` SET `banned_words` = $sc.tirnak($sc.temiz(%kelime_bani)) WHERE `id` = ? noop $mysql_query(%baglanti, %SqlBFBF, 1) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. } } if ($regex($remove($4,:),/^([!.&]puanver)$/Si)) { if !$5 || !$6 { social_bot privmsg $3 Lutfen nick ve puan belirtin. -->> $remove($4,:) $remove($gettok($1,1,33),:) 100 } elseif $5 && $6 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFdfdfdm = SELECT points FROM `users` WHERE `user_id` = ? var %sonucsdfdfdt = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFdfdfdm, %sonucs)) var %SqlBFBF = UPDATE `users` SET `points` = $calc(%sonucsdfdfdt + $strip($6)) WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. Kisinin toplam puani: $calc(%sonucsdfdfdt + $strip($6)) } } } if ($regex($remove($4,:),/^([!.&]isimdegistir)$/Si)) { if !$5 || !$6 { social_bot privmsg $3 Lutfen nick ve isim belirtin. -->> $remove($4,:) $remove($gettok($1,1,33),:) Gökhan ÇARKACI } elseif $5 && $6 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `name` = $sc.tirnak($sc.temiz($strip($6-))) WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. Kisinin guncel ismi: $strip($6-) } } } if ($regex($remove($4,:),/^([!.&]hakkindadegistir)$/Si)) { if !$5 || !$6 { social_bot privmsg $3 Lutfen nick ve isim belirtin. -->> $remove($4,:) $remove($gettok($1,1,33),:) Gökhan ÇARKACI } elseif $5 && $6 { var %SqlBF = SELECT user_id FROM `users` WHERE `username` = ? var %sonucs = $mysql_fetch_single($mysql_query(%baglanti, %SqlBF, $strip($5))) if !%sonucs { social_bot privmsg $3 Bu kişi henüz sisteme giriş yapmamış, haliyle mysql tablosunda görünmediği için işlem yapılamıyor. } else { var %SqlBFm = SELECT last_activity FROM `users` WHERE `user_id` = ? var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, %sonucs)) var %songiris $datebilgi(%sonuc,ayinkaci) $datebilgi(%sonuc,aysöyle) $datebilgi(%sonuc,hangiyil) $datebilgi(%sonuc,günsöyle) if !%songiris { var %songiris = henüz giriş yapmamış. } social_bot privmsg $3 $5 son görülme günü: %songiris var %SqlBFBF = UPDATE `users` SET `about` = $sc.tirnak($sc.temiz($strip($6-))) WHERE `user_id` = ? noop $mysql_query(%baglanti, %SqlBFBF, %sonucs) social_bot privmsg $3 İşleminiz başarıyla tamamlanmıştır. Kisinin guncel aciklamasi: $strip($6-) } } } } } } on *:sockread:BF_SERVICES_MAIL:{ var %;<email_gelen> | var %email_adim $hget(email,email_adim) | sockread %;<email_gelen> if $regex(%;<email_gelen>,/^(\d\d\d)([ -])(.*)$/) && $regml(2) != - { var %;<kod> $regml(1) | var %;<cvp> $regml(3) if %email_adim == 1 && %;<kod> == 220 { mail_yazdir $+($chr(69),$chr(72),$chr(76),$chr(79)) | hinc email email_adim 1 } elseif %email_adim == 2 && %;<kod> == 250 { mail_yazdir $+($chr(65),$chr(85),$chr(84),$chr(72)) $+($chr(76),$chr(79),$chr(71),$chr(73),$chr(78)) | hinc email email_adim 1 } elseif %email_adim == 3 && %;<kod> == 334 && %;<cvp> == VXNlcm5hbWU6 { mail_yazdir -bf_services $encode($email_kullanici,m) | hinc email email_adim 1 } elseif %email_adim == 4 && %;<kod> == 334 && %;<cvp> == UGFzc3dvcmQ6 { mail_yazdir -bf_services $encode($email_sifre,m) | hinc email email_adim 1 } elseif %email_adim == 5 && %;<kod> == 235 { mail_yazdir $+($chr(77),$chr(65),$chr(73),$chr(76)) $+($chr(70),$chr(82),$chr(79),$chr(77),$chr(58)) $+(<,$hget(email,mailim),>) | hinc email email_adim 1 } elseif %email_adim == 6 && %;<kod> == 250 { mail_yazdir $+($chr(82),$chr(67),$chr(80),$chr(84)) $+($chr(84),$chr(79),$chr(58)) $+(<,$hget(email,gd_mail),>) | hinc email email_adim 1 } elseif %email_adim == 7 && %;<kod> == 250 { mail_yazdir $+($chr(68),$chr(65),$chr(84),$chr(65)) | hinc email email_adim 1 } elseif %email_adim == 8 && %;<kod> == 354 { mail_yazdir $+($chr(70),$chr(114),$chr(111),$chr(109),$chr(58)) $iif($hget(email,mail_isim),$qt($v1),) $+(<,$hget(email,mailim),>) | mail_yazdir $+($chr(84),$chr(111),$chr(58)) $iif($hget(email,gd_isim),$qt($v1),) $+(<,$hget(email,gd_mail),>) | mail_yazdir $+($chr(83),$chr(117),$chr(98),$chr(106),$chr(101),$chr(99),$chr(116),$chr(58)) $hget(email,baslik) | mail_yazdir | var %;<toplam> = $hfind(email,icerik_*,0,w), %i = 1 | while (%i <= %;<toplam>) { mail_yazdir $hget(email,$+(icerik_,%i)) | inc %i 1 } | mail_yazdir . | hinc email email_adim 1 } elseif %email_adim == 9 && %;<kod> == 250 { mail_yazdir $+($chr(81),$chr(85),$chr(73),$chr(84)) | hinc email email_adim 1 } | elseif %email_adim == 10 && %;<kod> == 221 { } | else { email_hata %;<email_gelen> } } } on *:sockread:sosyal.medya.gelen.*:{ sockread %gelen if GRS isin %gelen { set %sock. [ $+ [ $gettok(%gelen,1,32) ] ] $sockname $gettok(%gelen,1,32) $gettok(%gelen,2,32) | social_bot nickserv getpass $gettok(%gelen,1,32) } elseif CKS isin %gelen { var %SqlBFm = SELECT username FROM `users` WHERE `user_id` = ? | var %sonuc = $mysql_fetch_single($mysql_query(%baglanti, %SqlBFm, $gettok(%gelen,1,32))) | msgat 2BILGI: - Sosyal Medya (Profil Sistemi) Çıkış - Nick: %sonuc  } elseif UNTT isin %gelen { if $sock(BF_SERVICES_MAIL) { sockwrite $sockname SD | if !%bilgi.hatirlatici. [ $+ [ $gettok(%gelen,1,32) ] ] { social_bot privmsg $kanal 4BILGI: - Sosyal Medya (Profil Sistemi) Başarısız Şifre Hatırlatıma Talebi - Nick: $gettok(%gelen,1,32)  - Sebep: Sistem Kullanımda. | inc -u5 %bilgi.hatirlatici. [ $+ [ $gettok(%gelen,1,32) ] ] 1 } | return } | set %sock. [ $+ [ $gettok(%gelen,1,32) ] ] $sockname $gettok(%gelen,1,32) $gettok(%gelen,2,32) | set -u2 %socks $sockname | set -u2 %sifrehatirlatici $gettok(%gelen,1,32) | social_bot nickserv listemail $gettok(%gelen,1,32) } }

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias MYSQL_OK return 0 alias MYSQL_BOTH return 1 alias MYSQL_NUM return 2 alias MYSQL_ASSOC return 3 alias MYSQL_ALL return 1 alias MYSQL_BOUND return 2 alias MYSQL_ERROR_OK return 0 alias MYSQL_ERROR_INVALIDARG return 3000 alias MYSQL_ERROR_BIND return 3001 alias MYSQL_ERROR_NOMOREROWS return 3002 alias MYSQL_ERROR_FETCH return 3003 alias MYSQL_ERROR_NOMOREFIELDS return 3004 on *:LOAD:{ echo 3 -a mIRC MySQL yüklendi. } alias mysql_dll return $qt($+($scriptdir,mmysql.dll)) alias -l mysql_param return $qt($replace($1, \, \\, ", \")) alias mysql_help { run $+($scriptdir,mmysql.chm) } alias mysql_version { return $dll($mysql_dll, mmysql_version,) } alias mysql_qt { return $+(',$1-,') } alias mysql_connect { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) if ($0 >= 3) %params = %params $mysql_param($3) if ($0 >= 4) %params = %params $mysql_param($4) return $dll($mysql_dll, mmysql_connect, %params) } alias mysql_close { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_close, %params) } alias mysql_select_db { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_select_db, %params) } alias mysql_ping { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_ping, %params) } alias mysql_set_charset { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($1) return $dll($mysql_dll, mmysql_set_charset, %params) } alias mysql_autocommit { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($1) return $dll($mysql_dll, mmysql_autocommit, %params) } alias mysql_get_client_info { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_get_client_info, %params) } alias mysql_get_host_info { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_get_host_info, %params) } alias mysql_get_proto_info { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_get_proto_info, %params) } alias mysql_get_server_info { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_get_server_info, %params) } alias mysql_client_encoding { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_client_encoding, %params) } alias mysql_escape_string { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_escape_string, %params) } alias mysql_real_escape_string { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_real_escape_string, %params) } alias mysql_query { var %params if ($0 >= 1) { %params = $mysql_param($1) 1 if (!$mysql_is_valid_statement($1)) { %params = %params $iif($isid && $prop == file, 1, 0) if (!$isid) { var %query, %i = 2 while (%i <= $0) { %query = %query $ [ $+ [ %i ] ] inc %i } %params = %params $mysql_param(%query) } } if ($isid) { var %i = 2 while (%i <= $0) { %params = %params $mysql_param($ [ $+ [ %i ] ]) inc %i } } } return $dll($mysql_dll, mmysql_query, %params) } alias mysql_unbuffered_query { var %params if ($0 >= 1) { %params = $mysql_param($1) 2 if (!$mysql_is_valid_statement($1)) { %params = %params $iif($isid && $prop == file, 1, 0) if (!$isid) { var %query, %i = 2 while (%i <= $0) { %query = %query $ [ $+ [ %i ] ] inc %i } %params = %params $mysql_param(%query) } } if ($isid) { var %i = 2 while (%i <= $0) { %params = %params $mysql_param($ [ $+ [ %i ] ]) inc %i } } } return $dll($mysql_dll, mmysql_query, %params) } alias mysql_exec { var %params if ($0 >= 1) { %params = $mysql_param($1) 3 if (!$mysql_is_valid_statement($1)) { %params = %params $iif($isid && $prop == file, 1, 0) if (!$isid) { var %query, %i = 2 while (%i <= $0) { %query = %query $ [ $+ [ %i ] ] inc %i } %params = %params $mysql_param(%query) } } if ($isid) { var %i = 2 while (%i <= $0) { %params = %params $mysql_param($ [ $+ [ %i ] ]) inc %i } } } return $dll($mysql_dll, mmysql_query, %params) } alias mysql_exec_file { if ($isid) { var %params, %i = 1 while (%i <= $0) { %params = $+(%params,$iif(%params,$chr(44)),$ $+ %i) inc %i } var %cmd = $!mysql_exec( $+ %params $+ ).file return [ [ %cmd ] ] } return $mysql_exec($1, $2).file } alias mysql_free { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_free, %params) } alias mysql_free_result { return $mysql_free($1) } alias mysql_num_rows { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_num_rows, %params) } alias mysql_num_fields { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_num_fields , %params) } alias mysql_affected_rows { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_affected_rows, %params) } alias mysql_insert_id { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_insert_id, %params) } alias mysql_fetch_row { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($gettok($2,1,32)) if ($0 >= 3) %params = %params $mysql_param($3) return $dll($mysql_dll, mmysql_fetch_row, %params) } alias mysql_fetch_num { return $mysql_fetch_row($1, $2, $MYSQL_NUM) } alias mysql_fetch_assoc { return $mysql_fetch_row($1, $2, $MYSQL_ASSOC) } alias mysql_fetch_bound { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) tokenize 32 $dll($mysql_dll, mmysql_fetch_bound, %params) if ($0 == 1) { return $1 } if ($0 == 3) { var %file = $1, %i = 1, %total = $numtok($2, 124), %offset = 0 while (%i <= %total) { var %size = $gettok($2, %i, 124), %bvar = $gettok($3, %i, 124) bread %file %offset %size %bvar inc %offset %size inc %i } return 1 } return $null } alias mysql_fetch_single { if ($0 < 2) { return $dll($mysql_dll, mmysql_fetch_single, $iif($0 >= 1, $mysql_param($1))) } else { tokenize 32 $dll($mysql_dll, mmysql_fetch_single, $mysql_param($1) $mysql_param($2)) if ($0 == 3) { bread $1 0 $2 $3 return $bvar($3, 0) } return $null } } alias mysql_fetch_field { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) { var %name = $iif($2 !isnum || $prop == name, 1, 0) %params = %params %name $mysql_param($2) 0 } if ($0 < 3) { return $dll($mysql_dll, mmysql_fetch_field, %params) } else { %params = %params $mysql_param($3) tokenize 32 $dll($mysql_dll, mmysql_fetch_field, %params) if ($0 == 3) { bread $1 0 $2 $3 return $bvar($3, 0) } return $null } } alias mysql_fetch_all { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) if ($0 >= 3) %params = %params $mysql_param($3) return $dll($mysql_dll, mmysql_fetch_all, %params) } alias mysql_result { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) { var %name = $iif($2 !isnum || $prop == name, 1, 0) %params = %params %name $mysql_param($2) 1 } if ($0 < 3) { return $dll($mysql_dll, mmysql_fetch_field, %params) } else { %params = %params $mysql_param($3) tokenize 32 $dll($mysql_dll, mmysql_fetch_field, %params) if ($0 == 3) { bread $1 0 $2 $3 return $bvar($3, 0) } return $null } } alias mysql_data_seek { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_data_seek, %params) } alias mysql_is_valid_connection { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_is_valid_connection, %params) } alias mysql_is_valid_result { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_is_valid_result, %params) } alias mysql_is_valid_statement { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_is_valid_statement, %params) } alias mysql_begin { return $mysql_exec($mysql_param($1), BEGIN) } alias mysql_commit { return $mysql_exec($mysql_param($1), COMMIT) } alias mysql_rollback { return $mysql_exec($mysql_param($1), ROLLBACK) } alias mysql_prepare { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $iif($isid && $prop == file, 1, 0) $mysql_param($2) return $dll($mysql_dll, mmysql_prepare, %params) } alias mysql_bind_field { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) { var %name = $iif($2 !isnum || $prop == name, 1, 0) %params = %params %name $mysql_param($2) } if ($0 >= 3) { %params = %params $mysql_param($3) } return $dll($mysql_dll, mmysql_bind_field, %params) } alias mysql_bind_column { return $mysql_bind_field($1, $2, $3) } alias mysql_bind_param { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) if ($0 >= 3) %params = %params $mysql_param($3) return $dll($mysql_dll, mmysql_bind_param, %params) } alias mysql_bind_value { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) if ($0 >= 3) { var %value, %i = 3 while (%i <= $0) { %value = %value $ [ $+ [ %i ] ] inc %i } %params = %params $mysql_param(%value) } return $dll($mysql_dll, mmysql_bind_value, %params) } alias mysql_bind_null { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_bind_null, %params) } alias mysql_clear_bindings { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_bind_null, %params) } alias mysql_fetch_field_info { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($gettok($2,1,32)) if ($0 >= 3) %params = %params $mysql_param($3) return $dll($mysql_dll, mmysql_fetch_field_info, %params) } alias mysql_field_info_seek { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_field_info_seek, %params) } alias mysql_field_name { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_field_name, %params) } alias mysql_field_type { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_field_type, %params) } alias mysql_field_len { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_field_len, %params) } alias mysql_field_table { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_field_table, %params) } alias mysql_field_flags { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_field_flags, %params) } alias mysql_safe_encode { var %params = $iif($0 >= 1, $mysql_param($1)) if ($0 >= 2) %params = %params $mysql_param($2) return $dll($mysql_dll, mmysql_safe_encode, %params) } alias mysql_safe_decode { var %params = $iif($0 >= 1, $mysql_param($1)) return $dll($mysql_dll, mmysql_safe_decode, %params) }

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]
__________________
Bu saatten sonra acın acıkırsa, anca ekmek olur koşarım sana.
  Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
radyo44.com.tr
Alt 12 Eylül 2021, 22:09   #2
Çevrimiçi
Che
Che - ait Kullanıcı Resmi (Avatar)
Cevap: Sosyal Medya (Profil) Sistemi / Bot kontrollü




Emeğine sağlık emek kokan bir çalışma olmuş çalışmalarının devamını diliyorum.

__________________
char *adres = [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] for(int i = 0; *(adres + i); i++) { putchar(toupper(adres[i])); }
  Alıntı ile Cevapla

Alt 12 Eylül 2021, 22:50   #3
Çevrimiçi
Cevap: Sosyal Medya (Profil) Sistemi / Bot kontrollü




Che Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
Emeğine sağlık emek kokan bir çalışma olmuş çalışmalarının devamını diliyorum.

Çok sağ ol Che

Düzeltme:

core\classes\user.php --> 43. ve 62. satır
pages\lost_password.php --> 15. satır
Makinanın ip adresinin girilmesi gerekiyor. (Dinlenen port, 5002)

__________________
Bu saatten sonra acın acıkırsa, anca ekmek olur koşarım sana.
  Alıntı ile Cevapla

Alt 13 Eylül 2021, 20:04   #4
Çevrimiçi
Cevap: Sosyal Medya (Profil) Sistemi / Bot kontrollü




Yeni Test Server: Sistem ön izlemesi için, 185.114.23.187 6667 [#bf kanalı] sunucusuna girerek inceleyebilirsiniz. Site: [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

__________________
Bu saatten sonra acın acıkırsa, anca ekmek olur koşarım sana.
  Alıntı ile Cevapla

Alt 15 Eylül 2021, 10:37   #5
Çevrimiçi
Cevap: Sosyal Medya (Profil) Sistemi / Bot kontrollü




Emeğine sağlık güzel ve başarılı bir çalışma olmuş

  Alıntı ile Cevapla

Alt 15 Eylül 2021, 10:44   #6
Çevrimdışı
kL
kL - ait Kullanıcı Resmi (Avatar)
Cevap: Sosyal Medya (Profil) Sistemi / Bot kontrollü




Emeğinize Sağlık Güzel bi çalışma olmus başarılarınızın devamını dilerim.

  Alıntı ile Cevapla

Alt 16 Eylül 2021, 01:20   #7
Çevrimiçi
Cevap: Sosyal Medya (Profil) Sistemi / Bot kontrollü




kardeşim emeğine sağlık harika bir sitem.

  Alıntı ile Cevapla

Cevapla

Etiketler
bf services, mirc, mysql, social_bot

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
BF Services - Sosyal Medya (Profil) Sistemi BlackForce Ar-Ge Faaliyetler 4 25 Ağustos 2021 17:34
Soyle.net Profil Sistemi Syst3m Ar-Ge Faaliyetler 55 18 Mayıs 2020 17:28
TRSohbet.Com Profil Sistemi pixel Sunuculardan Son Haberler 39 03 Aralık 2018 15:23
Web-IRC Profil Sistemi Feragat Extra IRC 32 13 Mart 2017 10:14
EsOkey - Puan ve Profil sistemi ysfm Unreal IRCd 3 26 Mart 2015 17:14