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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)
-   mIRC Scripting Hazır Kodlar (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/)
-   -   Namaz vakitleri (https://www.ircforumlari.net/mirc-scripting-hazir-kodlar/898503-namaz-vakitleri.html)

SuLh 31 Ocak 2021 17:37

Namaz vakitleri
 
Kod:

on *:input:#:if $1 = !namaz && $2 { nmzid $tkarakter($2) $chan }
alias -l turkish return $replace($1,\u015f,ş,\u015e,Ş,\u00e7,ç,\u00c7,Ç,\u0131,ı,\u0130,İ,\u00f6,ö,\u00d6,Ö,\u011f,ğ,\u011e,Ğ,\u00fc,ü,\u00dc,Ü)
alias -l tkarakter { return $replace($1-,ı,i,İ,I,ğ,g,Ğ,G,ş,s,Ş,S,ö,o,Ö,O,ç,c,Ç,C,ü,u,Ü,U) }
alias -l nmzid { var %s $+(as,$r(1,999)) | sockopen  %s api.fazilettakvimi.com 80 | sockmark %s $1- }
on *:sockopen:as*: {
  if $sockerr { echo -a Hata! }
  var %s sockwrite -n $sockname
  %s GET /api/v3/gunluk/index/79 HTTP/1.1
  %s Host: $sock($sockname).addr
  %s $crlf
}
on *:sockread:as*: {
  var %s | sockread -f %s
  if $regex($tkarakter($turkish(%s)),/\{\"id\"\:(\d+) $+ $chr(44) $+ \"adi\"\:\" $+ $token($sock($sockname).mark,1,32) $+ \"/gi) {
    nmzbak $regml(1) $sock($sockname).mark
  }
}
alias -l nmzbak { var %s $+(nmz,$r(1,999)) | sockopen %s api.fazilettakvimi.com 80 | sockmark %s $1- }
on *:sockopen:nmz*: {
  var %s sockwrite -n $sockname
  %s GET $+(/api/v3/gunluk/index/,$token($sock($sockname).mark,1,32)) HTTP/1.1
  %s Host: $sock($sockname).addr
  %s $crlf
}
on *:sockread:nmz*: {
  var %s | sockread -f %s | if $regex($tkarakter($turkish(%s)),/\{\"tarih\"\:\" $+ $date(yyyy-mm-dd) $+ \" $+ $chr(44) $+ \"(imsak|sabah|gunes|ogle|ikindi|aksam|yatsi)\"\:(.*?)\"\}/gi) {
    msg $token($sock($sockname).mark,3,32) $upper($token($sock($sockname).mark,2,32)) için vakitler: $regsubex($regsubex($regsubex($regsubex($regsubex($token($regml(2),2-,44),/(")/g,$chr(32)),/(T|Z)/g,$chr(32)),/(:\s+| $+($chr(44),|,$date(yyyy-mm-dd)) $+ )/g,),/([a-z]+)/g,$+($chr(3),6,$upper($left(\1,1)),$right(\1,-1),$chr(3),$chr(32))),/(\d+\:\d+\:\d+)/g,$time($duration(\1)))
  }
}

Kullanım: !namaz SehirAdi

Örnek:
Kod:

[14:26:06] <Deneme2> !namaz ankara
[14:26:08] <Deneme2> ANKARA için vakitler: 6Sabah 06:29:00 6Gunes 07:49:00 6Ogle 13:12:00 6Ikindi 15:55:00 6Aksam 18:15:00 6Yatsi 19:45:00
[17:36:21] <Deneme2> !namaz ankara
[17:36:22] <Deneme2> ANKARA için vakitler: 6Sabah 06:29:00 6Gunes 07:49:00 6Ogle 13:12:00 6Ikindi 15:55:00 6Aksam 18:15:00 6Yatsi 19:45:00
[17:36:25] <Deneme2> !namaz istanbul
[17:36:26] <Deneme2> ISTANBUL için vakitler: 6Sabah 06:46:00 6Gunes 08:07:00 6Ogle 13:28:00 6Ikindi 16:08:00 6Aksam 18:28:00 6Yatsi 19:59:00
[17:36:28] <Deneme2> !namaz denizli
[17:36:28] <Deneme2> DENIZLI için vakitler: 6Sabah 06:43:00 6Gunes 08:00:00 6Ogle 13:27:00 6Ikindi 16:15:00 6Aksam 18:35:00 6Yatsi 20:01:00


Subzero 31 Ocak 2021 18:49

Cevap: Namaz vakitleri
 
Alıntı:

SuLh Nickli Üyeden Alıntı (Mesaj 1042432795)
Kod:

on *:input:#:if $1 = !namaz && $2 { nmzid $tkarakter($2) $chan }
alias -l turkish return $replace($1,\u015f,ş,\u015e,Ş,\u00e7,ç,\u00c7,Ç,\u0131,ı,\u0130,İ,\u00f6,ö,\u00d6,Ö,\u011f,ğ,\u011e,Ğ,\u00fc,ü,\u00dc,Ü)
alias -l tkarakter { return $replace($1-,ı,i,İ,I,ğ,g,Ğ,G,ş,s,Ş,S,ö,o,Ö,O,ç,c,Ç,C,ü,u,Ü,U) }
alias -l nmzid { var %s $+(as,$r(1,999)) | sockopen  %s api.fazilettakvimi.com 80 | sockmark %s $1- }
on *:sockopen:as*: {
  if $sockerr { echo -a Hata! }
  var %s sockwrite -n $sockname
  %s GET /api/v3/gunluk/index/79 HTTP/1.1
  %s Host: $sock($sockname).addr
  %s $crlf
}
on *:sockread:as*: {
  var %s | sockread -f %s
  if $regex($tkarakter($turkish(%s)),/\{\"id\"\:(\d+) $+ $chr(44) $+ \"adi\"\:\" $+ $token($sock($sockname).mark,1,32) $+ \"/gi) {
    nmzbak $regml(1) $sock($sockname).mark
  }
}
alias -l nmzbak { var %s $+(nmz,$r(1,999)) | sockopen %s api.fazilettakvimi.com 80 | sockmark %s $1- }
on *:sockopen:nmz*: {
  var %s sockwrite -n $sockname
  %s GET $+(/api/v3/gunluk/index/,$token($sock($sockname).mark,1,32)) HTTP/1.1
  %s Host: $sock($sockname).addr
  %s $crlf
}
on *:sockread:nmz*: {
  var %s | sockread -f %s | if $regex($tkarakter($turkish(%s)),/\{\"tarih\"\:\" $+ $date(yyyy-mm-dd) $+ \" $+ $chr(44) $+ \"(imsak|sabah|gunes|ogle|ikindi|aksam|yatsi)\"\:(.*?)\"\}/gi) {
    msg $token($sock($sockname).mark,3,32) $upper($token($sock($sockname).mark,2,32)) için vakitler: $regsubex($regsubex($regsubex($regsubex($regsubex($token($regml(2),2-,44),/(")/g,$chr(32)),/(T|Z)/g,$chr(32)),/(:\s+| $+($chr(44),|,$date(yyyy-mm-dd)) $+ )/g,),/([a-z]+)/g,$+($chr(3),6,$upper($left(\1,1)),$right(\1,-1),$chr(3),$chr(32))),/(\d+\:\d+\:\d+)/g,$time($duration(\1)))
  }
}

Kullanım: !namaz SehirAdi

Örnek:
Kod:

[14:26:06] <Deneme2> !namaz ankara
[14:26:08] <Deneme2> ANKARA için vakitler: 6Sabah 06:29:00 6Gunes 07:49:00 6Ogle 13:12:00 6Ikindi 15:55:00 6Aksam 18:15:00 6Yatsi 19:45:00
[17:36:21] <Deneme2> !namaz ankara
[17:36:22] <Deneme2> ANKARA için vakitler: 6Sabah 06:29:00 6Gunes 07:49:00 6Ogle 13:12:00 6Ikindi 15:55:00 6Aksam 18:15:00 6Yatsi 19:45:00
[17:36:25] <Deneme2> !namaz istanbul
[17:36:26] <Deneme2> ISTANBUL için vakitler: 6Sabah 06:46:00 6Gunes 08:07:00 6Ogle 13:28:00 6Ikindi 16:08:00 6Aksam 18:28:00 6Yatsi 19:59:00
[17:36:28] <Deneme2> !namaz denizli
[17:36:28] <Deneme2> DENIZLI için vakitler: 6Sabah 06:43:00 6Gunes 08:00:00 6Ogle 13:27:00 6Ikindi 16:15:00 6Aksam 18:35:00 6Yatsi 20:01:00




[18:47]» <Subzero> !namaz istanbul
[18:47]» <Subzero> ISTANBUL için vakitler: Sabah 06:46:00 Gunes 08:07:00 Ogle 13:28:00 Ikindi 16:08:00 Aksam 18:28:00 Yatsi 19:59:00
[18:47]» <Subzero> !namaz mardin
[18:47]» <Subzero> MARDIN için vakitler: Sabah 05:56:00 Gunes 07:13:00 Ogle 12:41:00 Ikindi 15:29:00 Aksam 17:49:00 Yatsi 19:15:00

Allah Razı Olsun. Çok Makbule Geçti Yemin Ediyorum.

cinaryigit 10 Şubat 2021 12:41

Cevap: Namaz vakitleri
 
Can sıkıntısı işte...
Kanalda da çalışsın diyen çıkar belki diye.

Kod:

on *:text:*:#kanal:if $1 = !namaz && $2 { nmzid $tkarakter($2) $chan }
alias -l turkish return $replace($1,\u015f,ş,\u015e,Ş,\u00e7,ç,\u00c7,Ç,\u0131,ı,\u0130,İ,\u00f6,ö,\u00d6,Ö,\u011f,ğ,\u011e,Ğ,\u00fc,ü,\u00dc,Ü)
alias -l tkarakter { return $replace($1-,ı,i,İ,I,ğ,g,Ğ,G,ş,s,Ş,S,ö,o,Ö,O,ç,c,Ç,C,ü,u,Ü,U) }
alias -l nmzid { var %s $+(as,$r(1,999)) | sockopen  %s api.fazilettakvimi.com 80 | sockmark %s $1- }
on *:sockopen:as*: {
  if $sockerr { echo -a Hata! }
  var %s sockwrite -n $sockname
  %s GET /api/v3/gunluk/index/79 HTTP/1.1
  %s Host: $sock($sockname).addr
  %s $crlf
}
on *:sockread:as*: {
  var %s | sockread -f %s
  if $regex($tkarakter($turkish(%s)),/\{\"id\"\:(\d+) $+ $chr(44) $+ \"adi\"\:\" $+ $token($sock($sockname).mark,1,32) $+ \"/gi) {
    nmzbak $regml(1) $sock($sockname).mark
  }
}
alias -l nmzbak { var %s $+(nmz,$r(1,999)) | sockopen %s api.fazilettakvimi.com 80 | sockmark %s $1- }
on *:sockopen:nmz*: {
  var %s sockwrite -n $sockname
  %s GET $+(/api/v3/gunluk/index/,$token($sock($sockname).mark,1,32)) HTTP/1.1
  %s Host: $sock($sockname).addr
  %s $crlf
}
on *:sockread:nmz*: {
  var %s | sockread -f %s | if $regex($tkarakter($turkish(%s)),/\{\"tarih\"\:\" $+ $date(yyyy-mm-dd) $+ \" $+ $chr(44) $+ \"(imsak|sabah|gunes|ogle|ikindi|aksam|yatsi)\"\:(.*?)\"\}/gi) {
    msg $token($sock($sockname).mark,3,32) $upper($token($sock($sockname).mark,2,32)) için vakitler: $regsubex($regsubex($regsubex($regsubex($regsubex($token($regml(2),2-,44),/(")/g,$chr(32)),/(T|Z)/g,$chr(32)),/(:\s+| $+($chr(44),|,$date(yyyy-mm-dd)) $+ )/g,),/([a-z]+)/g,$+($chr(3),6,$upper($left(\1,1)),$right(\1,-1),$chr(3),$chr(32))),/(\d+\:\d+\:\d+)/g,$time($duration(\1)))
  }
}

Kanalda !namaz Şehir yazınca kanal geneline saatler çıkar.
Keyifli İF'ler

Ece 10 Şubat 2021 17:21

Cevap: Namaz vakitleri
 
Emeginize saglik


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 02:20.

Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2025 IRCForumlari.Net Sparhawk