Türkiye'nin IRCd ve LaMeR Forumu Sitesi
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5

[-]
Tags
mircaddon mirckodları iftaraddon mirckodu iftaraddonu mircaddonlari şehir iftarkodu scriptkod iftar mircaddonları iftarkod kodu scriptaddon mirckod

!iftar Şehir Kodu
Admin
#1
Lightbulb 
!iftar Şehir RemoteSi

Merhabalar. Malum ramazan ayı ve sokağa çıkma yasaklarının olduğu, sosyal izolasyonun yaşandığı olağanüstü bir dönemdeyiz. Bu yüzden çoğumuz vakti bilgisayar başında geçirmekte ve haliyle ilgisi olan arkadaşlar da sohbet sunucularında vakit geçirmektedir. Bu yüzden can sıkıntısından !iftar şehir kodunu yazdım..

Yazar: CesuryureK

----------------------
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 [b]!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.[/b]




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) }
}

Cevapla


Bu Konudaki Yorumlar
!iftar Şehir Kodu - Yazar: Admin - 11-15-2020, 09:13 PM

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Lightbulb !Degis Nick MIRC Hazir Kodu Admin 2 5,654 11-28-2020, 10:49 AM
Son Yorum: Admin
Lightbulb Fullname Reklam takip kodu 2020 Admin 0 5,682 08-20-2020, 05:58 PM
Son Yorum: Admin
Star Mirc Web Radyo Dinleme Kodu Lamer 0 3,602 07-04-2020, 08:50 PM
Son Yorum: Lamer
  Mirc Fullname Takip Kodu Admin 0 6,429 06-01-2020, 10:53 PM
Son Yorum: Admin
Heart Mirc Kolay Komutlar Kodu Admin 0 5,614 06-01-2020, 10:39 PM
Son Yorum: Admin

Hızlı Menü:


Konuyu Okuyanlar: 1 Ziyaretçi