IRCForumu.NET - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum muhabbet


ircforumu reklam ircforumu reklamdamlasu bizimkiler sihirlisohbet sohbetelit


Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 21 Mart 2018, 15:18   #1
Çevrimiçi
Gelme, burası çok derin.

immortaL - ait Kullanıcı Resmi (Avatar)
!bomba Socket


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if $regex($2,353) && (%sorgunick || %sorgu2nick) { var %x 1, %komut sockwrite -nt $sockname while $token($6-,%x,32) { var %v1 $v1 if %sorgunick isin %v1 { %komut privmsg $5 $chr(2) $+ %komutcu $+ $chr(2) $+ , $chr(3) $+ 5 $+ Bombayı Aldı. $+ $chr(3) $chr(2) $+ %sorgunick $+ $chr(2) $+ $chr(3) $+ 5 $+ 'e Doğru Attı Ya Rengi Bil TeLi Kes, Ya At Kurtul. %komut privmsg $5 $chr(3) $+ 5 $+ Bomba Aktif. Son $+ $chr(3) $+ 4 30 $chr(3) $+ 5 $+ Saniye. $chr(3) $+ 4 $+ Zaman İşLiyor... Tik Tak Tik Tak... %komut privmsg $5 $chr(3) $+ 7 $+ $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ at nick $+ $chr(93) $chr(3) $+ 7 $+ Birine Atıp KurtuL. $chr(41) - $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ kes renk $+ $chr(93) $chr(3) $+ 7 $+ Rengi BiL TeLi Kes KurtuL. $chr(41) %komut privmsg $5 - %komut privmsg $5 $chr(3) $+ 5 $+ Bombanın Üzerindeki TeL RenkLeri : $chr(3) $+ 7 $+ altin $chr(3) $+ 14 $+ gri $chr(3) $+ 12 $+ mavi $chr(3) $+ 1 $+ siyah $chr(3) $+ 3 $+ yesil $chr(3) $+ 4 $+ kirmizi .set %dinchan $5 .timerbomba 1 30 patlat set %bomba_nick %sorgunick set %bombaci_nick %komutcu set %bombaci_nick $addtok(%bombaci_nick,$+(%sorgunick),32) unset %sorgunick return } if %sorgu2nick isin %v1 { if (%sorgu2nick isin %bombaci_nick) { %komut privmsg $5 $chr(2) $+ $2 $+ $chr(2) $chr(3) $+ 4 $+ Daha Önce Bombadan Kurtulmuş. Başkasına Doğru At $chr(2) $+ $nick $+ $chr(2) unset %sorgu2nick return } %komut privmsg $5 $chr(2) $+ %komutcu $+ $chr(2) $+ , $chr(3) $+ 5 $+ Bombayı Aldı. $+ $chr(3) $chr(2) $+ %sorgu2nick $+ $chr(2) $+ $chr(3) $+ 5 $+ 'e Doğru Attı Ya Rengi Bil TeLi Kes, Ya At Kurtul. %komut privmsg $5 $chr(3) $+ 7 $+ $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ at nick $+ $chr(93) $chr(3) $+ 7 $+ Birine Atıp KurtuL. $chr(41) - $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ kes renk $+ $chr(93) $chr(3) $+ 7 $+ Rengi BiL TeLi Kes KurtuL. $chr(41) %komut privmsg $5 - %komut privmsg $5 $chr(3) $+ 5 $+ Bombanın Üzerindeki TeL RenkLeri : $chr(3) $+ 7 $+ altin $chr(3) $+ 14 $+ gri $chr(3) $+ 12 $+ mavi $chr(3) $+ 1 $+ siyah $chr(3) $+ 3 $+ yesil $chr(3) $+ 4 $+ kirmizi set %bomba_nick %sorgu2nick set %bombaci_nick $addtok(%bombaci_nick,$+(%sorgu2nick),32) unset %sorgu2nick return } inc %x } %komut privmsg $5 $chr(3) $+ 4 $+ Belirtilen Nick KanaLda Bulunmuyor. $+ $chr(3) unset %sorgunick unset %sorgu2nick } if $regex($2,/privmsg/i) { var %nick $right($token($1,1,33),-1), %ident $token($token($1,1,64),2,33), %host $token($1,2,64), %chan $3, %komut sockwrite -nt $sockname tokenize 32 $right($4-,-1) if $regex($1,/([.!]bomba)/Si) { if %bombaci_nick { %komut privmsg %chan $chr(3) $+ 4 $+ Bomba Şuanda Aktif Durumda. return } set %bomba_renkler altin gri mavi siyah yesil kirmizi set %bomba_renk $token(%bomba_renkler,$rand(1,6),32) if $istok($botnick %nick,$2,32) { %komut privmsg %chan $chr(3) $+ 4 $+ Bana Veya Kendinize Bomba Atamazsınız. $chr(2) $+ %nick $+ $chr(2) return } if !$2 { %komut privmsg %chan $chr(2) $+ %nick $+ $chr(2) $chr(3) $+ 4 $+ Lütfen Nick Belirtin. $+ $chr(3) return } set %sorgunick $2 set %komutcu %nick %komut names %chan } if $regex($1,/([.!]at)/Si) { if (%nick == %bomba_nick) { if $istok($botnick %nick,$2,32) { %komut privmsg %chan $chr(3) $+ 4 $+ Bana Veya Kendinize Bomba Atamazsınız. $chr(2) $+ %nick $+ $chr(2) return } if !$2 { %komut privmsg %chan $chr(2) $+ %nick $+ $chr(2) $chr(3) $+ 4 $+ Lütfen Nick Belirtin. $+ $chr(3) return } set %sorgu2nick $2 set %komutcu %nick %komut names %chan } else { %komut privmsg %chan $chr(3) $+ 4 $+ Bomba Şuan Sizde Değil. } } if $regex($1,/([.!]kes)/Si) { if (%nick == %bomba_nick) { if ($2 == %bomba_renk) { .timerbomba off %komut privmsg %chan - %komut privmsg %chan $chr(3) $+ 5 $+ Kanalın Kahramanı $+ $chr(3) $chr(2) $+ %nick $+ $chr(2) $+ . $chr(3) $+ 5 $+ Kendini Bombadan Kurtardı. Tebrikler, $+ $chr(3) $chr(2) $+ %nick $+ $chr(2) $+ . :) %komut privmsg %chan - unset %bomba_* unset %bombaci_* unset %dinchan } elseif $istok($remtok(%bomba_renkler,%bomba_renk,32),$2,32) { %komut privmsg %chan $chr(2) $+ %nick $+ $chr(2) $+ . $chr(3) $+ 4 $+ Yanlış Renk! %komut privmsg %chan $chr(3) $+ 5 $+ Bombanın PatLamasına Saniyeler Kaldı.! } } else { %komut privmsg %chan $chr(3) $+ 4 $+ Bomba Şuan Sizde Değil. } } } alias botnick return Secure alias -l patlat { sockwrite -nt ajangiris kick %dinchan %bomba_nick Seni Uyardım, Bomba Elinde PatLadı. $chr(2) $+ BOOOOM! .unset %bomba_* .unset %bombaci_* .unset %dinchan }

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
if $regex($2,353) && (%sorgunick || %sorgu2nick) { var %x 1, %komut sockwrite -nt $sockname while $token($6-,%x,32) { var %v1 $v1 if %sorgunick isin %v1 { %komut privmsg $5 $chr(2) $+ %komutcu $+ $chr(2) $+ , $chr(3) $+ 5 $+ Bombayı Aldı. $+ $chr(3) $chr(2) $+ %sorgunick $+ $chr(2) $+ $chr(3) $+ 5 $+ 'e Doğru Attı Ya Rengi Bil TeLi Kes, Ya At Kurtul. %komut privmsg $5 $chr(3) $+ 5 $+ Bomba Aktif. Son $+ $chr(3) $+ 4 30 $chr(3) $+ 5 $+ Saniye. $chr(3) $+ 4 $+ Zaman İşLiyor... Tik Tak Tik Tak... %komut privmsg $5 $chr(3) $+ 7 $+ $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ at nick $+ $chr(93) $chr(3) $+ 7 $+ Birine Atıp KurtuL. $chr(41) - $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ kes renk $+ $chr(93) $chr(3) $+ 7 $+ Rengi BiL TeLi Kes KurtuL. $chr(41) %komut privmsg $5 - %komut privmsg $5 $chr(3) $+ 5 $+ Bombanın Üzerindeki TeL RenkLeri : $chr(3) $+ 7 $+ altin $chr(3) $+ 14 $+ gri $chr(3) $+ 12 $+ mavi $chr(3) $+ 1 $+ siyah $chr(3) $+ 3 $+ yesil $chr(3) $+ 4 $+ kirmizi .set %dinchan $5 .timerbomba 1 30 patlat set %bomba_nick %sorgunick set %bombaci_nick %komutcu set %bombaci_nick $addtok(%bombaci_nick,$+(%sorgunick),32) unset %sorgunick return } if %sorgu2nick isin %v1 { if (%sorgu2nick isin %bombaci_nick) { %komut privmsg $5 $chr(2) $+ $2 $+ $chr(2) $chr(3) $+ 4 $+ Daha Önce Bombadan Kurtulmuş. Başkasına Doğru At $chr(2) $+ $nick $+ $chr(2) unset %sorgu2nick return } %komut privmsg $5 $chr(2) $+ %komutcu $+ $chr(2) $+ , $chr(3) $+ 5 $+ Bombayı Aldı. $+ $chr(3) $chr(2) $+ %sorgu2nick $+ $chr(2) $+ $chr(3) $+ 5 $+ 'e Doğru Attı Ya Rengi Bil TeLi Kes, Ya At Kurtul. %komut privmsg $5 $chr(3) $+ 7 $+ $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ at nick $+ $chr(93) $chr(3) $+ 7 $+ Birine Atıp KurtuL. $chr(41) - $chr(40) $chr(3) $+ 2 $+ $chr(91) $+ $chr(33) $+ kes renk $+ $chr(93) $chr(3) $+ 7 $+ Rengi BiL TeLi Kes KurtuL. $chr(41) %komut privmsg $5 - %komut privmsg $5 $chr(3) $+ 5 $+ Bombanın Üzerindeki TeL RenkLeri : $chr(3) $+ 7 $+ altin $chr(3) $+ 14 $+ gri $chr(3) $+ 12 $+ mavi $chr(3) $+ 1 $+ siyah $chr(3) $+ 3 $+ yesil $chr(3) $+ 4 $+ kirmizi set %bomba_nick %sorgu2nick set %bombaci_nick $addtok(%bombaci_nick,$+(%sorgu2nick),32) unset %sorgu2nick return } inc %x } %komut privmsg $5 $chr(3) $+ 4 $+ Belirtilen Nick KanaLda Bulunmuyor. $+ $chr(3) unset %sorgunick unset %sorgu2nick } if $regex($2,/privmsg/i) { var %nick $right($token($1,1,33),-1), %ident $token($token($1,1,64),2,33), %host $token($1,2,64), %chan $3, %komut sockwrite -nt $sockname tokenize 32 $right($4-,-1) if $regex($1,/([.!]bomba)/Si) { if %bombaci_nick { %komut privmsg %chan $chr(3) $+ 4 $+ Bomba Şuanda Aktif Durumda. return } set %bomba_renkler altin gri mavi siyah yesil kirmizi set %bomba_renk $token(%bomba_renkler,$rand(1,6),32) if $istok($botnick %nick,$2,32) { %komut privmsg %chan $chr(3) $+ 4 $+ Bana Veya Kendinize Bomba Atamazsınız. $chr(2) $+ %nick $+ $chr(2) return } if !$2 { %komut privmsg %chan $chr(2) $+ %nick $+ $chr(2) $chr(3) $+ 4 $+ Lütfen Nick Belirtin. $+ $chr(3) return } set %sorgunick $2 set %komutcu %nick %komut names %chan } if $regex($1,/([.!]at)/Si) { if (%nick == %bomba_nick) { if $istok($botnick %nick,$2,32) { %komut privmsg %chan $chr(3) $+ 4 $+ Bana Veya Kendinize Bomba Atamazsınız. $chr(2) $+ %nick $+ $chr(2) return } if !$2 { %komut privmsg %chan $chr(2) $+ %nick $+ $chr(2) $chr(3) $+ 4 $+ Lütfen Nick Belirtin. $+ $chr(3) return } set %sorgu2nick $2 set %komutcu %nick %komut names %chan } else { %komut privmsg %chan $chr(3) $+ 4 $+ Bomba Şuan Sizde Değil. } } if $regex($1,/([.!]kes)/Si) { if (%nick == %bomba_nick) { if ($2 == %bomba_renk) { .timerbomba off %komut privmsg %chan - %komut privmsg %chan $chr(3) $+ 5 $+ Kanalın Kahramanı $+ $chr(3) $chr(2) $+ %nick $+ $chr(2) $+ . $chr(3) $+ 5 $+ Kendini Bombadan Kurtardı. Tebrikler, $+ $chr(3) $chr(2) $+ %nick $+ $chr(2) $+ . :) %komut privmsg %chan - unset %bomba_* unset %bombaci_* unset %dinchan } elseif $istok($remtok(%bomba_renkler,%bomba_renk,32),$2,32) { %komut privmsg %chan $chr(2) $+ %nick $+ $chr(2) $+ . $chr(3) $+ 4 $+ Yanlış Renk! %komut privmsg %chan $chr(3) $+ 5 $+ Bombanın PatLamasına Saniyeler Kaldı.! } } else { %komut privmsg %chan $chr(3) $+ 4 $+ Bomba Şuan Sizde Değil. } } } alias botnick return Secure alias -l patlat { sockwrite -nt ajangiris kick %dinchan %bomba_nick Seni Uyardım, Bomba Elinde PatLadı. $chr(2) $+ BOOOOM! .unset %bomba_* .unset %bombaci_* .unset %dinchan }

  Alıntı ile Cevapla

IRCForumu.Net - Reklam Alanı

Cevapla

Etiketler
bomba, socket
IRCForumu.Net - Sponsor Bağlantılar



Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Açık
Pingbacks are Açık
Refbacks are Açık