Sohbet muhabbet sohbet, sohbet odası
Sohbet, Sohbet Odası Okey Oyna
mircx mircx

!iftar Şehir Kodu

[mIRCX] Konu Bilgileri

Konu Hakkında Merhaba, tarihinde mIRC Scripting Hazır Kodlar kategorisinde admin tarafından oluşturulan !iftar Şehir Kodu başlıklı konuyu okuyorsunuz. Bu konu şimdiye dek 332 kez görüntülenmiş, 0 yorum ve 0 tepki puanı almıştır...
Kategori Adı mIRC Scripting Hazır Kodlar
Konu Başlığı !iftar Şehir Kodu
Konbuyu başlatan admin
Başlangıç tarihi
Cevaplar
Görüntüleme
İlk mesaj tepki puanı
Son Mesaj Yazan admin

admin

Mustafa Kemal ATATÜRK
Administrator
Katılım
16 Kas 2019
Mesajlar
506
Tepkime puanı
0
Puanları
16
Konum
public_html
Cinsiyet
Erkek
İlgi Alanı
Xenforo
IRC
irc.superalem.org

İtibar:

KULLANIM BİLGİSİ

* Kodu KENDİNİZ kullanacaksanız herhangi bir kanalda !xiftar şehir yazmanız yeterlidir.
* Kodu bir bota entegre edecekseniz bota kodu ekledikten sonra herhangi bir kanalda !iftar şehir yazmanız yeterli olacaktır.
* Eğer ki botun ilgili şehrin iftar vakti geldiğinde amsg olarak kanallara "Falanca şehrin iftar vakti geldi. Saat: falanca" yazmasını istiyorsanız kodu ekledikten sonra /iftarsaat komutunu yapmanız yeterli olacaktır. (Bot sunucudan çıkartılıp tekrar sokulursa /iftarsaat komutunu kullanması gerek veya start eventine eklenebilir.)
* Eğer ki amsg çekmesini istemiyor sadece bir kanala mesajın gitmesini istiyorsanız kodda 2 yerde geçen /amsg mesajı yerine /msg #kanalismi şeklinde değiştirmeniz gerekmektedir.
Yazar: CesuryureK
------------------------

Kod:
on *:TEXT:*:#: {
  if $regex($strip($1),/(^[.!\-*][iİı]ftar)$/i) && $2 && (%iftarsehri) { msg $chan Şu an komut meşgul lütfen 5 saniye sonra deneyiniz. | halt  }
  if $regex($strip($1),/(^[.!\-*][iİı]ftar)$/i) && $2 && (!%iftarsehri) && (%iftarsehiruyari) { msg $chan Veri tabanı güncelleniyor. Lütfen 5 dakika sonra deneyiniz. | halt }
  if $regex($strip($1),/(^[.!\-*][iİı]ftar)$/i) && $2 && (!%iftarsehri) && (!%iftarsehiruyari) { set -u6 %iftarkanal $chan | .iftarx $strip($2) }
}

alias iftarsaat {  //Timerifx -o 18:00 1 1 /iftarsehiruyari }

alias iftarx {
  if $regex($1,/(^[iİ]stanbul|[iİı]zm[iİı]r$)/i) {
    set -u5 %iftarsehri $replace($lower($1),İ,i,ı,i,I,i)
    if $sock(iftar) { sockclose iftar }
    sockopen iftar www.namazzamani.net 80
    .halt
  }
  if $regex($1,/(^afyon|afyonkarah[iİı]sar$)/i) {
    set -u5 %iftarsehri Afyonkarahisar
    if $sock(iftar) { sockclose iftar }
    sockopen iftar www.namazzamani.net 80
    .halt
  }
  if $regex($1,/(^[ıIiİ][Ğğg]d[ıIiİ]r$)/i) {
    set -u5 %iftarsehri Igdir
    if $sock(iftar) { sockclose iftar }
    sockopen iftar www.namazzamani.net 80
    .halt
  }
  if $regex($1,/(^[ıIiİ]sparta$)/i) {
    set -u5 %iftarsehri Isparta
    if $sock(iftar) { sockclose iftar }
    sockopen iftar www.namazzamani.net 80
    .halt
  }
  if $regex($1,/(^kocael[iİı]|[iİı]zm[iİı]t$)/i) {
    set -u5 %iftarsehri Kocaeli_(izmit)
    if $sock(iftar) { sockclose iftar }
    sockopen iftar www.namazzamani.net 80
    .halt
  }
  if $regex($1,/(^sakarya|adapazar[iİı]$)/i) {
   set -u5 %iftarsehri Sakarya_(Adapazari)
    if $sock(iftar) { sockclose iftar }
    sockopen iftar www.namazzamani.net 80
    .halt
  }
  set -u5 %iftarsehri $replace($+($upper($left($1,1)),$right($lower($1),-1)),ı,i,ü,u,Ş,S,ş,s,Ü,U,ğ,g,Ğ,G,Ö,O,ö,o,ç,c,Ç,C)
  if $sock(iftar) { sockclose iftar }
  sockopen iftar www.namazzamani.net 80
}

on *:sockopen:iftar:{
  sockwrite -n $sockname GET $+(/,%iftarsehri,-namaz-vakitleri-m.tr) HTTP/1.1
  sockwrite -n $sockname Host: namazzamani.net
  sockwrite -n $sockname Connection: keep-alive
  sockwrite -n $sockname Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/webp,*/*;q=0.8
  sockwrite -n $sockname User-Agent: Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/40.0.2214.111 Safari/537.36
  sockwrite -n $sockname $crlf
}

on *:sockread:iftar: {
  var %iftar
  sockread %iftar
  if ("aksam" isin %iftar) && (!%iftarsehiruyari) {
    $iif($regex($replace($gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),2,58),09,9),/(^0[123456780]$)/i),msg %iftarkanal $+($+($chr(3),4,$replace(%iftarsehri,_,$chr(32)),$chr(3)) için İftar Saati:,$chr(3),4,$chr(32),$gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),1,58),:0,$calc($gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),2,58)+1),$chr(3),$chr(32),-,$chr(32),Tarih:,$chr(32),$chr(3),4,$+([,$date,]),$chr(3)),msg %iftarkanal $+($+($chr(3),4,$replace(%iftarsehri,_,$chr(32)),$chr(3)) için İftar Saati:,$chr(3),4,$chr(32),$gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),1,58),:,$calc($gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),2,58)+1),$chr(3),$chr(32),-,$chr(32),Tarih:,$chr(32),$chr(3),4,$+([,$date,]),$chr(3)))
    sockclose iftar
  }
  if ("aksam" isin %iftar) && (%iftarsehiruyari) {
    $iif($regex($replace($gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),2,58),09,9),/(0[123456780])/i),.Timer -o $+($gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),1,58),$chr(58),$chr(48),$calc($gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),2,58)+1)) 1 1 /amsg $+($chr(3),4,$replace(%iftarsehri,_,$chr(32)),$chr(3)) için İftar Vakti Geldi. $+(SAAT:,$chr(3),4,$chr(32),$gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),1,58),$chr(58),$chr(48),$calc($replace($gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),2,58),09,9)+1),$chr(3)),.Timer -o $+($gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),1,58),:,$calc($gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),2,58)+1)) 1  1 /amsg $+($chr(3),4,$replace(%iftarsehri,_,$chr(32)),$chr(3)) için İftar Vakti Geldi. $+(SAAT:,$chr(3),4,$chr(32),$gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),1,58),:,$calc($gettok($remove($gettok(%iftar,2-,34),</li>,aksam">),2,58)+1)))
  }
}

alias iftarsehiruyari {
  .set -u415 %iftarsehiruyari 1
  .timeriftar5 1 5 .iftarx Adana
  .timeriftar10 1 10 .iftarx Adiyaman
  .timeriftar15 1 15 .iftarx Afyonkarahisar
  .timeriftar20 1 20 .iftarx Agri
  .timeriftar25 1 25 .iftarx Aksaray
  .timeriftar30 1 30 .iftarx Amasya
  .timeriftar35 1 35 .iftarx Ankara
  .timeriftar40 1 40 .iftarx Antalya
  .timeriftar45 1 45 .iftarx Ardahan
  .timeriftar50 1 50 .iftarx Artvin
  .timeriftar55 1 55 .iftarx Aydin
  .timeriftar60 1 60 .iftarx Balikesir
  .timeriftar65 1 65 .iftarx Bartin
  .timeriftar70 1 70 .iftarx Batman
  .timeriftar75 1 75 .iftarx Bayburt
  .timeriftar80 1 80 .iftarx Bilecik
  .timeriftar85 1 85 .iftarx Bingol
  .timeriftar90 1 90 .iftarx Bitlis
  .timeriftar95 1 95 .iftarx Bolu
  .timeriftar100 1 100 .iftarx Burdur
  .timeriftar105 1 105 .iftarx Bursa
  .timeriftar110 1 110 .iftarx Canakkale
  .timeriftar115 1 115 .iftarx Cankiri
  .timeriftar120 1 120 .iftarx Corum
  .timeriftar125 1 125 .iftarx Denizli
  .timeriftar130 1 130 .iftarx Diyarbakir
  .timeriftar135 1 135 .iftarx Duzce
  .timeriftar140 1 140 .iftarx Edirne
  .timeriftar145 1 145 .iftarx Elazig
  .timeriftar150 1 150 .iftarx Erzincan
  .timeriftar155 1 155 .iftarx Erzurum
  .timeriftar160 1 160 .iftarx EskiSehir
  .timeriftar165 1 165 .iftarx Gaziantep
  .timeriftar170 1 170 .iftarx Giresun
  .timeriftar175 1 175 .iftarx GumuShane
  .timeriftar180 1 180 .iftarx Hakkari
  .timeriftar185 1 185 .iftarx Hatay
  .timeriftar190 1 190 .iftarx Igdir
  .timeriftar195 1 195 .iftarx Isparta
  .timeriftar200 1 200 .iftarx istanbul
  .timeriftar205 1 205 .iftarx izmir
  .timeriftar210 1 210 .iftarx KahramanmaraS
  .timeriftar215 1 215 .iftarx Karabuk
  .timeriftar220 1 220 .iftarx Karaman
  .timeriftar225 1 225 .iftarx Kars
  .timeriftar230 1 230 .iftarx Kastamonu
  .timeriftar235 1 235 .iftarx Kayseri
  .timeriftar240 1 240 .iftarx Kilis
  .timeriftar245 1 245 .iftarx Kirikkale
  .timeriftar250 1 250 .iftarx Kirklareli
  .timeriftar255 1 255 .iftarx KirSehir
  .timeriftar260 1 260 .iftarx Kocaeli
  .timeriftar265 1 265 .iftarx Konya
  .timeriftar270 1 270 .iftarx Kutahya
  .timeriftar275 1 275 .iftarx Malatya
  .timeriftar280 1 280 .iftarx Manisa
  .timeriftar285 1 285 .iftarx Mardin
  .timeriftar290 1 290 .iftarx Mersin
  .timeriftar295 1 295 .iftarx Mugla
  .timeriftar300 1 300 .iftarx MuS
  .timeriftar305 1 305 .iftarx NevSehir
  .timeriftar310 1 310 .iftarx Nigde
  .timeriftar315 1 315 .iftarx Ordu
  .timeriftar320 1 320 .iftarx Osmaniye
  .timeriftar325 1 325 .iftarx Rize
  .timeriftar330 1 330 .iftarx Sakarya
  .timeriftar335 1 335 .iftarx Samsun
  .timeriftar340 1 340 .iftarx Sanliurfa
  .timeriftar345 1 345 .iftarx Siirt
  .timeriftar350 1 350 .iftarx Sinop
  .timeriftar355 1 355 .iftarx Sivas
  .timeriftar360 1 360 .iftarx Sirnak
  .timeriftar365 1 365 .iftarx Tekirdag
  .timeriftar370 1 370 .iftarx Tokat
  .timeriftar375 1 375 .iftarx Trabzon
  .timeriftar380 1 380 .iftarx Tunceli
  .timeriftar385 1 385 .iftarx USak
  .timeriftar390 1 390 .iftarx Van
  .timeriftar395 1 395 .iftarx Yalova
  .timeriftar400 1 400 .iftarx Yozgat
  .timeriftar405 1 405 .iftarx Zonguldak
  timer -o 18:10 1 1 /iftarsaat
}

on *:input:#:{
  if $regex($strip($1),/(^[.!\-*]x[iİı]ftar)$/i) && !$2  { msg $chan $nick Şehir ismi yazmadınız. Kullanımı: $+($chr(3),4,!iftar istanbul,$hr(3)) | halt }
  if $regex($strip($1),/(^[.!\-*]x[iİı]ftar)$/i) && $2 && (%iftarsehri) { msg $chan Şu an komut meşgul lütfen 5 saniye sonra deneyiniz. | halt  }
  if $regex($strip($1),/(^[.!\-*]x[iİı]ftar)$/i) && $2 && (!%iftarsehri) && (%iftarsehiruyari) { msg $chan Veri tabanı güncelleniyor. Lütfen 5 dakika sonra deneyiniz. | halt }
  if $regex($strip($1),/(^[.!\-*]x[iİı]ftar)$/i) && $2 && (!%iftarsehri) && (!%iftarsehiruyari) { set -u6 %iftarkanal $chan | .iftarx $strip($2) }
}
 
Üst Alt