| Hoşgeldin, Ziyaretçi |
Sitemizden yararlanabilmek için Kayıt olmalısınız.
|
| Kimler Çevrimiçi |
Toplam: 142 kullanıcı aktif
» 0 Kayıtlı
» 141 Ziyaretçi
Google
|
|
|
İdentify Şifre Kutucugu |
|
Yazar: Admin - 06-01-2020, 10:16 PM - Forum: mIRC Scripting Hazır Kodlar
- Yorum Yok
|
 |
İndirme linklerini görebilmek için sitemize üye ol manız veya giriş yapmanız gerekiyor.Sitemize üyelikler ücretsizdir!
Kod: on *:notice:*NickServ*IDENTIFY*:*: { if ( $nick == nickserv ) /dialog -m sifre sifre }
on *:notice:*Kayıt*Nick*:*: { if ( $nick == nickserv ) /dialog -m sifre sifre }
dialog sifre {
title "Şifre Paneli"
size -1 -1 110 60
option dbu
box $me Kayitli Bir Nicktir.., 20, 0 0 110 60
text "Nick Degistir:", 4, 10 22 33 10
text "Sifre Gir: ", 3, 10 10 23 13
edit "", 5, 45 8 60 10, style(pass)
edit "", 6, 45 20 60 10
button "Uygula", 1, 10 35 40 15, ok
button "I&ptal", 2, 60 35 40 15, cancel
}
on 1:dialog:sifre:sclick:1: {
if ($did(sifre,6)) && ($did(sifre,5)) .nickserv identify $did(sifre,6) $did(sifre,5)
if ($did(sifre,5)) .nickserv identify $did(sifre,5)
if ($did(sifre,6)) .nick $did(sifre,6)
}
|
|
|
|
Büyük Harf Koruması Kodları |
|
Yazar: Admin - 06-01-2020, 10:13 PM - Forum: mIRC Scripting Hazır Kodlar
- Yorum Yok
|
|
2020 lamerler.com forum sitesi Bu hazır kod ile op olduğunuz kanallarda, yazılan satırlar içinde aşırı derecede büyük harf yazımı yapan kullanıcıları banlayıp atmış olursunuz. Bu kod kanalda op olan kullanıcılara işlem yapmayacaktır. Kanalda yazılan satır karakter uzunluğu 15 den büyük olması durumunda çalışır. Bu karakter uzunluğunu, Hazır kod içinde ” if ($len($1-) < 15) ” kısmıda oynama yaparak kendinize göre ayarlayabilirsiniz. Ayrıca yazılan satırda, büyük harf kullanımı ” yüzde 70 ” in üzerinde olan metin yazılarına işlem yaptırmış olursunuz. Bu kısımda kendinize göre düzenleme için kod içinde ” if (%nsohbet >= 0.7) { ” satırında ” 0.7 ” bölümü ile yapabilirsiniz. Bu şekilde ” %70 ” üzeri büyük harf kullanımı yapan kullanıcılar atılmış olacaktır. Mevcut hazır kodu mirc remote kısımına kopyalayınız. Ayrıca büyük harf koruma görüntüsü, uygulamalı olarak kodun altında görebilirsiniz
Kod: on @*:TEXT:*:#: {
if $nick isop $chan { halt }
if ($len($1-) < 15) || ($nick isop #) return
var %text = $strip($remove($1-,$chr(32)))
var %ncs = $len($removecs(%text,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O ,P,Q,R,S,T,U,V,W,X,Y,Z))
var %ns = $len($strip($remove(%text,$chr(32))))
var %nsohbet = $calc(1 - (%ncs / %ns))
if (%nsohbet >= 0.7) {
ban -k $chan $nick 2 2Büyük Harf Kullanımı Yasaktır.Yazmış olduğunuz satırlarda yüzde - $calc(%nsohbet * 100) - oranında büyük harf kullanımı yaptınız.
unset %buyuk. $+ $nick
}
REgex ile yazılmış büyük harf korumasi kod’udur.
Kod: on @*:text:*:#: {
if ($len($1-) >= 20 ) {
if ($int($calc($regex($1,/[A-ZÁ-ÙÄ]/g)/$len($1)*100)) >= 40 ) {
ban -ku600 $chan $nick Büyük Harf Koruması…! )
}
}
}
ircforumları - ircforumlari
Kod: alias capsban { if (%ipban == on) { //Ban -u $+ 900 # $nick 2 } | mode # +b $$1 }
#caps on
on @*:TEXT:*:#: {
if $me !isop $chan { halt } | if $nick isop $chan { halt }
if ($len($1-) < 50) || ($nick isop #) return
var %text = $strip($remove($1-,$chr(32)))
var %non.caps = $len($removecs(%text,A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P,Q,R,S,T,U,V,W,X,Y,Z))
var %full.line = $len($strip($remove(%text,$chr(32))))
var %percent = $calc(1 - (%non.caps / %full.line))
if (%percent >= 0.8) {
/mode $chan +b $address($nick,2) | /kick $chan $nick CAPS LOCK/OFF ( $+ % $+ $calc(%percent * 100) $+ )
unset %CAPS. $+ $nick
}
}
#caps end
|
|
|
|
| Sock Reklam Botu |
|
Yazar: Admin - 06-01-2020, 10:04 PM - Forum: mIRC Scripting Hazır Kodlar
- Yorum Yok
|
|
Sock Reklam Botu
Kod: alias bot { sockopen bot irc.sunucuadı.com 6668 }
on *:sockopen:bot:{
if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. | return }
swbot NICK K9
swbot USER mIRC * * :Kontrol.
sockmark $sockname axwd
.timer 1 10 /sockwrite -nt $SocknAme JOIN #Spam
.timer 0 60 /sockwrite -nt $SocknAme JOIN #kelime
.timer 0 59 /sockwrite -nt $SocknAme part #kelime
.timer 0 80 /sockwrite -nt $SocknAme JOIN #yarisma
.timer 0 79 /sockwrite -nt $SocknAme PART #yarisma
.timer 0 60 /sockwrite -nt $SocknAme JOIN #sohbet
.timer 0 59 /sockwrite -nt $SocknAme part #sohbet
}
on *:sockread:bot:{
if ($sockerr) { echo $color(info) -st Socket botun bağlantısı kesildi. | return }
var %; | sockread %; | tokenize 32 %;
swalias $1-
}
alias swbot { if $sock(bot) { sockwrite -n bot $1- } }
alias swalias {
if $sock(bot) {
var %: = echo $color(info) -st > Socket bot:
if :VERSION iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ VERSION IRC Security $+ $chr(1) }
if :FINGER iswm $4- { swbot NOTICE $gettok($gettok($1,1,33),1,58) : $+ $chr(1) $+ FINGER IRC Security $+ $chr(1) }
if $1 == PING { swbot PONG $2- }
if $2 == KICK && $4 == $sock(bot).mark { %: $3 kanalından %n tarafından kicklendi. $+($chr(40),$right($5-,-1),$chr(41)) | swbot JOIN $3 }
if $2 == PRIVMSG {
var %n = $gettok($gettok($1,1,33),1,58), %m = $right($4-,-1), %k = $3
if $istok(admin1 admin2,%n,32) {
if .hop == $gettok(%m,1,32) { var %< = $iif($gettok(%m,2,32),$v1,%k) | swbot PART %< | swbot JOIN %< }
if .part == $gettok(%m,1,32) { var %< = $iif($gettok(%m,2,32),$v1,%k) | swbot PART %< }
if .join #* iswm %m { swbot JOIN $gettok(%m,2-,32) }
if *irc.* iswm %m { swbot PRIVMSG #spam reklam, $nick }
}
if * iswm %m { swbot PRIVMSG #spam Reklam < $+ $nick $+ >: $remove($4-,:) }
}
}
}
|
|
|
|
|
Oto Nick ve Oper Şifresi Girme |
|
Yazar: Admin - 06-01-2020, 09:58 PM - Forum: mIRC Scripting Hazır Kodlar
- Yorum Yok
|
|
Otomatik olarak nick şifremi girilsin istiyorsanız. Aşağıdaki kodu mirc’inizin remotesine ekleyiniz.
Kod: on *:CONNECT: {
.ns ghost Nickiniz nickpass
.nick kullandiginizrumuz
.msg NickServ IDENTIFY nickpass
}
Otomatik olarak nick şifremi ve oper şifremi girsin diyorsanız gerekli yerleri düzenleyerek aşağıdaki kodu mircinize ekleyiniz.
Kod: on *:CONNECT: {
.oper Opernicki OperPass
.ns ghost Nickiniz nickpass
.nick kullandiginizrumuz
.msg NickServ IDENTIFY nickpass
}
Servera girdiğinizde otomatik olarak ayarladığım kanallara girebileyim diyorsanız gerekli yerleri düzenleyip aşağıdaki kodları mircinize ekleyiniz.
Kod: on *:CONNECT: {
.oper Opernicki OperPass
.ns ghost Nickiniz nickpass
.nick kullandiginizrumuz
.msg NickServ IDENTIFY nickpass
.join #Kanal1,#kanal2,#kanal3
}
Servera girdiğimde otomatik olarak memo listemi görmek istiyorum diyorsanız aşağıdaki kodları mircinize ekleyiniz.
Kod: on *:CONNECT: {
.ns ghost Nickiniz nickpass
.nick kullandiginizrumuz
.msg NickServ IDENTIFY nickpass
.ms list
}
oto Nick şifresi ve oper girmek için kod
Kod: on *:CONNECT: {
.oper nick şifre
.msg NickServ IDENTIFY Şifre
}
|
|
|
|
|
Birden Fazla Sunucuya Baglanma Addonu |
|
Yazar: Admin - 06-01-2020, 09:50 PM - Forum: mIRC Scripting Hazır Kodlar
- Yorum Yok
|
|
Birden Fazla Sunucuya Baglanma Addonu
Kod: on *:start: {
server irc.sunucu.com
server -m irc.sunucu.com
server -m irc.sunucu.com
server -m irc.sunucu.com
}
on *:connect: {
if ($network == Domain.com) {
msg nickserv identify Nick-şifresi
join #kanal-adı,#kanal-adı1,#kanal-adı2
}
elseif ($network == Domain.com1) {
msg nickserv identify PASSWORD HERE!
join #kanal-adı,#kanal-adı1,#kanal-adı2
}
elseif ($network == Domain.com2) {
msg nickserv identify Nick-şifresi
join #kanal-adı,#kanal-adı1,#kanal-adı2
}
elseif ($network == Domain.com3) {
msg nickserv identify Nick-şifresi
join #kanal-adı,#kanal-adı1,#kanal-adı2
}
}
Kod: on *:connect: {
.identify SİFRE
if ($server == irc.SUNUCU1.com) {
.timer 1 18 /close -m
.server -m irc.SUNUCU2.org
}
if ($server == irc.SUNUCU2.org) {
.timer 2 16 /part #Oyun,#Yarisma,#Mobil,#oxm
.timer 1 18 /close -m
.timer 1 19 /amsg S.a
.server -m irc.SUNUCU3.COM
}
if ($server == irc.SUNUCU3.COM) {
.timer 2 16 /part #Kelime,#Oyun,#Yarisma
.timer 1 18 /close -m
.timer 1 19 /amsg S.a
.server -m irc.SUNUCU4.net
}
if ($server == irc.SUNUCU4.net) {
.timer 2 65 /part #Kelime,#Oyun,#Yarisma,#Oxm,#islam
.timer 1 67 /close -m
.timer 1 68 /amsg S.a
.timer 0 300 ams
}
}
on *:kullanimda: {
.ns ghost Joop SİFRE
.nick Joop
.identify SİFRE
}
Kod: on *:start:{
server irc.sunucu.com
server irc.sunucu1.com
}
on *:connect:{
if $server == irc.sunucu.com {
1komut
2komut
3komut
vs.
}
elseif $server == irc.sunucu1.com {
1komut
2komut
3komut
vs.
}
}
|
|
|
|
| Seaside Multi Skype 1.31 |
|
Yazar: Lamer - 06-01-2020, 03:19 PM - Forum: Genel Program Bölümü
- Yorum Yok
|
 |
Seaside Multi Skype 1.31
Selam İrc Forum Ve lamer Ailesi Skype günümüzde popüler bir iletişim araçı olmaktadır.Herkesin en az 2 3 skype adresi bulunmaktadır.Aynı anda iletişime gecmek için Seaside Programını indirip 2 3 4 Skype hesabinizi aynı anda acıp kulana bilirsiniz.
Seaside ile birden çok Skype ve Microsoft / MSN hesabı ile Skype'a giriş yapabilirsiniz. Aynı anda birden fazla Skype ve Microsoft / MSN hesabı ile oturum açabilirsiniz. Windows başladığında, yapılandırılmış hesapların her biri için bir Skype uygulaması başlatılır ve otomatik olarak oturum açılır.
İndirme linklerini görebilmek için sitemize üye ol manız veya giriş yapmanız gerekiyor.Sitemize üyelikler ücretsizdir!
|
|
|
|
Sosyal Medya |
|
Yazar: Lamer - 06-01-2020, 09:11 AM - Forum: Sosyal Ağlardan Son Haberler
- Yorum Yok
|
|
Sosyal medya
2020 Sosyal medya, Web 2.0'ın kullanıcı hizmetine sunulmasıyla birlikte, tek yönlü bilgi paylaşımından, çift taraflı ve eş zamanlı bilgi paylaşımına ulaşılmasını sağlayan medya sistemidir. Ayrıca sosyal medya; kişilerin internet üzerinde birbirleriyle yaptığı diyaloglar ve paylaşımların bütünüdür. Sosyal ağlar, insanların birbiriyle içerik ve bilgi paylaşmasını sağlayan internet siteleri ve uygulamalar sayesinde, herkes aradığı, ilgilendiği içeriklere ulaşabilmektedır. Küçük gruplar arasında gerçekleşen diyaloglar ve paylaşımlar giderek, kullanıcı bazlı içerik (İngilizce: UGC-User Generated Content) üretimini giderek arttırmakta, amatör içerikleri dijital dünyada birer değere dönüştürmektedir.
Zaman ve mekân sınırlaması olmadan (mobil tabanlı), paylaşımın, tartışmanın esas olduğu bir insanî iletişim şeklidir. Sosyal medya platformlarında insanlarla buluşur ve iletişimde bulunursunuz. İnsanlara yardım eder, yardım alır, sorularına cevap verir ve kendi sorularınızı sorarsınız. Bu bakımdan sosyal medya resmi olmayan eğitim yollarından da bir tanesidir.
Teknoloji, telekomünikasyon, sosyal iletişimin kelimeler, görseller, ses dosyaları yolu ile sağlandığı bir yapıya sahiptir. İnsanlar hikâyelerini ve tecrübelerini bu bağlamda paylaştığı bir çerçeveye de sahiptir.
İndirme linklerini görebilmek için sitemize üye ol manız veya giriş yapmanız gerekiyor.Sitemize üyelikler ücretsizdir! aynı zamanda "Kullanıcıların Ürettiği İçerik" ve "Müşterilerin Ürettiği Medya" kavramlarını da ortaya çıkarmış, bu yapısıyla da ticari plandaki anlamını kazanmıştır.
Ama Andreas Kaplan ve Michael Haenlein’in 2010’daki tespitine göre Sosyal Medya; “İndirme linklerini görebilmek için sitemize üye ol manız veya giriş yapmanız gerekiyor.Sitemize üyelikler ücretsizdir! üzerinde ideolojik ve teknolojik içeriklerin, yapılanmaların kullanıcı merkezli bir şekilde üretilmesine ve geliştirilmesine izin veren internet tabanlı uygulamaların bütününe” denilmekte.
Günümüzde en yayın olarak kullanılan sosyal medya uygulamaların başında twitter, instagram, facebook gelmektedir.
|
|
|
|
|
Coderler - Kod Yazarları |
|
Yazar: Admin - 06-01-2020, 12:13 AM - Forum: mIRC Scripting Hazır Kodlar
- Yorumlar (3)
|
|
Cümleten Merhabalar LAMERLER.COM FORUM KULLANICILARIMIZ
Bu Bölümü Açma Sebebim Kod Yazarlarına Tşk Etmek Amaçı iledir. Kod Yazıyorlar Emek Veriyorlar
Kodları Paylaşıyorum Burada Ama Yazarları Bazen Unutuyorum Burada Aklıma Gelenleri veya
Encok Gordügüm Coderlerin Nicklerini Yazıcam Bu Şekildede Lamerler.Com Forum Sitesi Olarak Tşk Etmiş Oluruz
******************************************************************
CoCoRiCo - CesuryureK - h4pp3n - Alience - L4roXyL - SerDaR406 - UOnuR - XcLusive - NucLeaR - Difuzyon - LeadeR - Feragat - IrCbaStarD - UfuK - RebeL- el33t - WingmaN - LauReLL - IrCDancer - Point - Goemon - Doktrin - Med Cezir
diEfoRyou Toprak - Set - Alper - Emrehan - YouMyCure - Mecnun -
******************************************************************
FORUMDA BU SIRA ENCOK PAYLAŞIM YAPAN VE YARDIMCI OLAN CODERLER
Toprak - Set - Feragat - Alper - YouMyCure - Emrehan
|
|
|
|
|
Yurtdışı Koruması |
|
Yazar: Admin - 05-31-2020, 10:48 PM - Forum: mIRC Scripting Hazır Kodlar
- Yorumlar (1)
|
|
Yeni Yurtdışı Koruması 2020 #opers kanalında !yip on !yip off yazıldığında harekete geçer ve sadece 6667 6668 portundan bağlanan kullanıcıları kapsar.
.yip pas Yazıldğında da kod pasif kalır.
.yip on yurt dışından girişler SERBEST
.yip off yurt dışından girişler YASAK
.yip pas yurt dışından girişler PASİF
kırmızı alanda belirttiğim gibi yurt dışı girişleri yasak konumunda ise girenlere gzline uygulanır.
Kod aktif olduktan sonra @G-kontrol penceresinde bilgi verilir.2020
Kod: on *:text:*:#opers:{
if $regex($1-,/[.!]yip\s(on|off|pas)$/i) { set %yurtdisi $regml(1)
msg # Yurt dışı girişleri $iif($regml(1) = off,4KAPATILDI,$iif($regml(1) = on,3AÇILDI,$iif($regml(1) = pas,2PASİF)))
}
}
alias G-kontrol {
if !$sock($+(G-kontrol@,$1)) {
sockopen $+(G-kontrol@,$1) ipinfo.io 80
sockmark $+(G-kontrol@,$1) $+(/,$1,/json?token=bdbdb82ae05b96)
}
}
on *:snotice:*: {
if $regex(gk,$1-,/Client\sconnecting(.+)666(7|8):\s(.*)\(((.*)@(.*))\)(.*)/i) {
if %yurtdisi = pas { return }
G-kontrol $regml(gk,6)
}
}
on *:sockopen:G-kontrol@*:{
var %sw sockwrite -tn $sockname
%sw GET $sock($sockname).mark HTTP/1.1
%sw Host: ipinfo.io
%sw $crlf }
on *:sockread:G-kontrol@*:{
var %d_G-kontrol
sockread %d_G-kontrol
if $regex(ig,%d_G-kontrol,/("country": "(.*)")/i) {
if $regml(ig,2) !== TR && %yurtdisi = off {
if !$window(@G-kontol) { window -en @G-kontol }
gzline $+(*@,$gettok($sockname,2,64)) 1h Sunucumuzun girişi şimdilik yurt dışına kapalıdır.
echo -m @G-kontol $time(d/m/yyyy HH:nn) 5GİRİŞ[4Yurt Dışı] 2İP-ADRES: $gettok($sockname,2,64)
}
else { echo -m @G-kontol $time(d/m/yyyy HH:nn) $iif($regml(ig,2) = TR,5GİRİŞ[3Yurt İçi],5GİRİŞ[4Yurt Dışı]) 2İP-ADRES: $gettok($sockname,2,64) }
}
if *"org":* iswm %d_G-kontrol { sockclose $sockname }
}
|
|
|
|
|
