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

11Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 17 Ocak 2012, 21:45   #11
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod hakinda




hasan arkadaşın kodunun çalışma mantığı
km il ordu samsun
km ilce ordu fatsa
km il ordu-fatsa ankara-mamak gibidir

sunucu güncellemeleri nedeniyle yanıt vermiyor sanıyorum

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias iller { sockclose aziz set %sd $1- sockopen aziz [Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 80 } on *:sockopen:aziz: { sockwrite -n aziz GET / $+ %sd $+ / HTTP/1.1 sockwrite -n aziz Host: illerarasimesafe.com sockwrite -n aziz $crlf } on *:SOCKREAD:aziz: { var %a sockread %a if (Km'dir. isin %a) { echo -a $htmlfree(%a) } if (iline bağlıdır isin %a) { echo -a $htmlfree(%a) } if (Kaç Saat? isin %a) { echo -a $htmlfree(%a) } if (ortalama isin %a) { echo -a $htmlfree(%a) } } alias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;) return %x }

siteye girip baktım bi göz kabaca birşeyler karaladım görünüm renk düzenini veya :text: bot kısımlarını kendinize göre ayarlayabilirsiniz
kullanımı
/iller ordu_samsun
/iller ankara_samsun gibi
il ilçe için
/iller ordu-fatsa
ilçeler arası sorgulama ise
/iller ordu-fatsa_samsun-terme

gibi kullanımlara ayarlıdır

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları sohbet odaları Yazgulu Sohbet
Alt 18 Ocak 2012, 08:24   #12
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod hakinda




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
;Yazan/Written by: L4roXyL - (Hasan AYDENİZ) alias -l _ch { if ($1 = _km_lo) { return $replace($lower($2-),ü,u,ı,i,İ,i,I,i,ö,o,ş,s,ğ,g,ç,c) } if ($1 = _km_up) { return $upper($replace($2-,ı,I,i,İ)) } } alias km { if ($regex($1,/^(ilçe|il)$/i) && $2-3) { %_km_wrng = Uygun sonuç bulunamadı. İl/ilçe isimlerini doğru girdiğinizden emin olun. %_km_let = ( $+ $regsubex($2,-,/) - $regsubex($3,-,/) $+ ) | $iif(sock(_km),sockclose _km) sockopen _km
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 if ($regex($1,/^ilçe$/i)) %_get_link = $+(/,$2,-,$3,/) if ($regex($1,/^il$/i)) %_get_link = $+(/,$2,_,$3,/) } else msg %kmchan Hatalı kullanım. Örnek: /km <il> il'ismi il'ismi - /km <il> il-ilçe'ismi il-ilçe'ismi - /km <ilçe> il'ismi ilçe'ismi } on *:sockopen:_km: { var %_km = $sockname,%_c = sockwrite -n %_c %_km GET %_get_link HTTP/1.1 %_c %_km Host: illerarasimesafe.com %_c %_km $crlf } on *:sockread:_km: { var %_k | sockread %_k if ($regex(_km,%_k,/^<div id="sonuc"><span id="sonuc-km">(.+)</span><br />$/)) { var %_l = $regml(_km,1) %_km_locc = $iif($token(%_l,2,32),%_l) if (!%_km_locc) { msg %kmchan %_km_wrng | sockclose _km } } if ($regex(_time,%_k,/<span id="sonuc-saat">Ortalama <font style="color:#F60;">(.+)</font></span>(</div>|<br />)/)) { var %_time = $regml(_time,1) if (%_km_locc) { msg %kmchan $_ch(_km_up,%_km_let) arası: %_km_locc olup, saat'de 100 km hızla $iif(%_time,$iif($v1 != 0 saat 0 dakika,$v1)) $+ 'dır. } } } on *:text:*:#:{ if ($1 == !km) { set %kmchan $chan | km $2- } }

Bot için editlenmiş Halidir.
Orjinalinde Yapılan Değişiklikler Anlaşılması İçin Kırmızı Renktedir.

Denem Görüntüsü

Alıntı:
<siLuet> !km il sinop samsun
<Bot> (SİNOP - SAMSUN) arası: 165 Km olup, saat'de 100 km hızla 1 saat 39 dakika'dır.
<siLuet> !km il sinop-gerze samsun-bafra
<Bot> (SİNOP/GERZE - SAMSUN/BAFRA) arası: 78 Km olup, saat'de 100 km hızla 1 saat 16 dakika'dır.
<siLuet> !km ilçe sinop gerze
<Bot> (SİNOP - GERZE) arası: 37 Km olup, saat'de 100 km hızla 22 dakika'dır.


 
Alıntı ile Cevapla

Alt 13 Ocak 2013, 13:37   #13
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod hakinda




Calismiyor.

__________________
Herkes bir, İş için yaratılmıştır.
 
Alıntı ile Cevapla

Alt 13 Ocak 2013, 20:57   #14
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod hakinda




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias htmlfree { var %x, %i = $regsub($1-,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x,&nbsp;) return %x } alias hesap { sockclose yolbul sockopen yolbul
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 } on *:sockopen:yolbul: { sockwrite -n $sockname GET / $+ %mbul $+ / HTTP/1.1 sockwrite -n $sockname host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -n $sockname $crlf } on *:sockread:yolbul: { var %yolbul sockread %yolbul if (*<strong>*</strong></font>* iswm %yolbul) { /msg %pencere $remove($htmlfree(%yolbul),Kaç Km?,Kaç Saat?) } } on *:input:*: { if ($1 == !km) && ($2) && ($3) { .set %pencere $chan | .set %mbul $replacecs($lower($2),ı,i,ğ,g,ç,c,ö,o,ü,u,ş,s,Ü,u,Ö,o,Ğ,g,Ç,c,I,i,İ,i,Ş,s) $+ _ $+ $replacecs($lower($3),ı,i,ğ,g,ç,c,ö,o,ü,u,ş,s,Ü,u,Ö,o,Ğ,g,Ç,c,I,i,İ,i,Ş,s) .hesap $2- } }

Sadece iller arası mesafeyi ve zamanı gösteriyor. Ekte bulunan resimdeki gibi.
Kullanımı: !km ŞehirAdı ŞehirAdı
Eğer kodu diğer kullanıcılar kullansın istersen
Bu satırı;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:input:*: {

Bununla değiştir;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#: {


Eklenen Resim Ön İzlemesi Bu forumdaki ekleri görübilmek için 25 mesaja sahip olmanız gerekir. Sizin 0 Mesajınız var.
__________________
The Ghost of Christmas Past...

i'm here sometimes
 
Alıntı ile Cevapla

Alt 06 Mart 2013, 19:59   #15
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod hakinda




Calismiyor

__________________
Herkes bir, İş için yaratılmıştır.
 
Alıntı ile Cevapla

Alt 06 Mart 2013, 20:41   #16
Goemon
Guest
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Yüzdesi:(%)
Cevap: Kod hakinda




feragat ın verdiği kod çalışıyor sende sorun var galiba?

 
Alıntı ile Cevapla

Alt 06 Mart 2013, 21:31   #17
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod hakinda




Feragat 'in verdiği kodeyi bende ekledim kodede sorun yok.

LOG :


Alıntı:
21:31] <04&Coldman> !km ankara istanbul
[21:31] <04&Coldman> Ankara ile İstanbul arası 454 Km'dir.
[21:31] <04&Coldman> Bu mesafe, 4 saat 36 dakika sürecektir.


 
Alıntı ile Cevapla

Alt 07 Mart 2013, 17:04   #18
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod hakinda




Evet simdi farkina vardim net yavasti calismiyor sandim
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
Herkes bir, İş için yaratılmıştır.
 
Alıntı ile Cevapla

Alt 04 Aralık 2013, 22:38   #19
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod hakinda




Artık calısmamakta kod.

 
Alıntı ile Cevapla

Alt 14 Mart 2014, 20:20   #20
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Kod hakinda




+güncel

 
Alıntı ile Cevapla

Cevapla

Etiketler
hakinda, kod


Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)
 
Seçenekler
Stil

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 Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
hava durumu hakinda OperServ mIRC Scripting Sorunları 3 01 Kasım 2009 19:18
burc hakinda OperServ mIRC Scripting Sorunları 15 11 Mart 2009 05:56
Operator Hakinda OperServ mIRC Scripting Sorunları 1 10 Mart 2009 10:36
unotify hakinda OperServ mIRC Scripting Sorunları 12 08 Mart 2009 01:43
radyo hakinda ? foxmd mIRC Scripting Sorunları 6 23 Nisan 2007 19:57