Tekil Mesaj gösterimi
Alt 08 Ağustos 2011, 02:02   #3
Çevrimdışı
Set
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Ramazan İmsakiyesi [2011]




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on $*:text:/([*!.]iftar)/i:#iftar:{ var %ulke hollanda isvicre avusturya almanya turkiye fransa belcika if ($regex($2,/ulke/i)) { msg # Ulkeler: $replace(%ulke,$chr(32),$+($chr(32),-,$chr(32))) | halt } if (!$2) { msg # Lutfen komutu duzgun yaziniz! Ornek: !iftar ulke sehir | halt } if (!$3) { msg # Lutfen komutu duzgun yaziniz! Ornek: !iftar ulke sehir | halt } if (!$istok(%ulke,$2,32)) { msg # Belirtiginiz ulke listemde bulunmamaktadir! | halt } var %1 $lower($replace($2,ı,i,İ,i,ş,s,Ş,s,Ö,o,ö,o,Ü,u,ü,u,ç,c,Ç,c,ğ,g,Ğ,g)) var %2 $lower($replace($3,ı,i,İ,i,ş,s,Ş,s,Ö,o,ö,o,Ü,u,ü,u,ç,c,Ç,c,ğ,g,Ğ,g)) if ($sock($+(ramazan,*,%1))) { msg #  $3 zaten kontrol ediliyor.. | halt } sockopen $+(ramazan,*,%2)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 sockmark $+(ramazan,*,%2) $+(%1,*,%2) msg # 6 $upper($2) 2ulkesi 6 $upper($3) 2 bilgileri alinyor.. } on *:sockopen:ramazan*: { sockwrite -nt $sockname GET $+(/,$gettok($sock($sockname).mark,1,42),/,$gettok($sock($sockname).mark,2,42),-ezan-vakti.html) HTTP/1.1 sockwrite -nt $sockname HOST:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname $crlf } on *:sockread:ramazan*: { var %63 | sockread %63 if ($regex(%63,Sayfama hosgeldiniz)) { msg #iftar 2Belirtiginiz $(6,$gettok($sock($sockname).mark,1,42),2) ulkesinden $(6,$gettok($sock($sockname).mark,2,42),2) adresi ile ilgili bilgi bulunamamistir. | halt } if ($regex(%63,onmouseout=)) && ($regex($gettok($date,1,47),$gettok($free($gettok(%63,5,34)),1,32))) { $iif($free($gettok(%63,5,34)),msg #iftar 6 $qt(Tarih) 2 $replace($free($gettok(%63,5,34)),pa,Pazar,pt,Pazartesi,sa,Salı,ca,Çarşamba,pe,Perşembe,cu,Cuma,Ct,Cumartesi)) $iif($free($gettok(%63,7,34)),msg #iftar 6 $qt(Imsak) 2 $free($gettok(%63,7,34))) $iif($free($gettok(%63,9,34)),msg #iftar 6 $qt(Gunes) 2 $free($gettok(%63,9,34))) $iif($free($gettok(%63,11,34)),msg #iftar 6 $qt(Ogle) 2 $free($gettok(%63,11,34))) $iif($free($gettok(%63,13,34)),msg #iftar 6 $qt(Ikindi) 2 $free($gettok(%63,13,34))) $iif($free($gettok(%63,15,34)),msg #iftar 6 $qt(Aksam) 2 $free($gettok(%63,15,34)) 6 $qt(Iftar) 2 $iif($regex($duration($calc(($duration($+($free($gettok(%63,15,34)),:00)))-($duration($time(HH:nn:ss))))),/(^[^-].+)/),Kalan Sure: $replace($regml(1),mins,dakika,secs,saniye,hr,saat))) $iif($free($gettok(%63,17,34)),msg #iftar 6 $qt(Yatsi) 2 $free($gettok(%63,17,34))) } } on !*:join:#iftar:{ .notice $nick Bulunduğunuz ulkenin imsakiye bilgileri için kanala !iftar Ulke Sehir yazınız notice $nick Örnek: !iftar almanya altena notice $nick Ulke listesini gormek icin: !iftar ulke .notice $nick Hoşca vakitler.. } alias free { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/gi,$null,%x), %x = $remove(%x,&nbsp;, ) return %x }

Sunum:

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
[01:53] <Set> !iftar [01:53] <@Aeg> Lutfen komutu duzgun yaziniz! Ornek: !iftar ulke sehir [01:53] <Set> !iftar ulke [01:53] <@Aeg> Ulkeler: hollanda - isvicre - avusturya - almanya - turkiye [01:53] <Set> !iftar almanya altena [01:53] <@Aeg> ALMANYA ulkesi ALTENA bilgileri alinyor.. [01:53] <@Aeg> "Tarih" 08 Agustos 2011 Pazartesi [01:53] <@Aeg> "Imsak" 04:28 [01:53] <@Aeg> "Gunes" 05:58 [01:53] <@Aeg> "Ogle" 13:42 [01:53] <@Aeg> "Ikindi" 17:45 [01:53] <@Aeg> "Aksam" 21:13 "Iftar" Kalan Sure: 19saats 19dakika 32saniye [01:53] <@Aeg> "Yatsi" 22:33



Konu Set tarafından (08 Ağustos 2011 Saat 16:26 ) değiştirilmiştir.
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Benimmekan Mobil Sohbet