Moderatör Olmak İçin Tıklayın Editör Olmak İçin Tıklayın Forum Kuralları IF Görüntülü Röportajlar IF Helper Grubu
IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  sohbet odaları

>
+
 Kayıt ol
Etiketlenen Kullanıcılar

10Beğeni(ler)
  • 9 Post By Toprak
  • 1 Post By Toprak

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 06 Ekim 2014, 00:30   #1
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (1)
IF Ticaret Yüzdesi:(%)
Döviz Kurları



İyi akşamlar,
Bir arkadaşın isteği üzerine yapıldı biraz basit oldu ama işinize yarar diye paylaşmak istedim;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } 
on *:input:#:if ($1 == !doviz) { set %:kanal # | sockclose kurx | sockopen kurx 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 }
on *:sockopen:kurx:{
  sockwrite -nt $sockname GET / 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
  unset %:dolar | unset %:euro | unset %:sterlin
}
on *:sockread:kurx:{
  var %:kur | sockread %:kur | tokenize 32 %:kur
  if (*<li class="midrow alis" title="Dolar Alış"*  iswm %:kur) || (*<li class="midrow satis" title="Dolar Satış"* iswm %:kur) { set %:dolar $addtok($htmlfree(%:kur),%:dolar,32) }
  if (*<li class="midrow capraz" title="Çapraz Kur: 1 USD*  iswm %:kur) {
    msg %:kanal 4Dolar ($) Alış(TL) =4 $token(%:dolar,2,32)  -   Satış(TL) =4 $token(%:dolar,1,32)  -  Çapraz Kur =4 $htmlfree(%:kur) € ( 1$ = $+($htmlfree(%:kur),€) ) 
  }
  if (*<li class="midrow alis" title="Euro Alış">*  iswm %:kur) || (*<li class="midrow satis" title="Euro Satış"* iswm %:kur) { set %:euro $addtok($htmlfree(%:kur),%:euro,32) }  
  if (*<li class="midrow capraz" title="Çapraz Kur: 1 EUR*  iswm %:kur) {
    msg %:kanal 4Euro (€) Alış(TL) =4 $token(%:euro,2,32)  -   Satış(TL) =4 $token(%:euro,1,32)  -  Çapraz Kur =4 $htmlfree(%:kur) $ ( 1€ = $+($htmlfree(%:kur),$) ) 
  }
  if (*<li class="midrow alis" title="Sterlin Alış">*  iswm %:kur) || (*<li class="midrow satis" title="Sterlin Satış"* iswm %:kur) { set %:sterlin $addtok($htmlfree(%:kur),%:sterlin,32) }  
  if (*<li class="midrow capraz" title="Çapraz Kur: 1 GBP *  iswm %:kur) {  
    msg %:kanal 4Sterlin (£) Alış(TL) =4 $token(%:sterlin,2,32)  -   Satış(TL) =4 $token(%:sterlin,1,32)  -  Çapraz Kur =4 $htmlfree(%:kur) $ ( 1£ = $+($htmlfree(%:kur),$) ) 
  }
}

Ekran Görüntüsü;


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

__________________
Dünyanın en güzel yeri neresi biliyor musun? Biraz kenara kaysana...
 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet bizimmekan
Alt 06 Ekim 2014, 11:13   #2
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Döviz Kurları



Ellerine sağlık hocam peki Bunu Botumuza Ekleyebilirmiyiz Sunucudaki arkadaşlarda kullanabilsin.

 
Alıntı ile Cevapla

Alt 06 Ekim 2014, 11:19   #3
Çevrimiçi
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (1)
IF Ticaret Yüzdesi:(%)
Cevap: Döviz Kurları



Tabiki sadece şu kısmı;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:input:#:if ($1 == !doviz) { set %:kanal # | sockclose kurx | sockopen kurx 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 }

Böyle degiştir;
Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#:if ($1 == !doviz) { set %:kanal # | sockclose kurx | sockopen kurx 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 }


__________________
Dünyanın en güzel yeri neresi biliyor musun? Biraz kenara kaysana...
 
Alıntı ile Cevapla

Alt 06 Ekim 2014, 11:34   #4
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Döviz Kurları



Bir yerden tanıdık geliyor ama
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
 
Alıntı ile Cevapla

Alt 12 Aralık 2018, 17:10   #5
Çevrimdışı
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: Döviz Kurları



Toprak Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
İyi akşamlar,
Bir arkadaşın isteği üzerine yapıldı biraz basit oldu ama işinize yarar diye paylaşmak istedim;

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias htmlfree { if ($len($1-) <= 900) { var %x, %i = $regsub($1,/(^[^<]*>|<[^>]*>|<[^>]*$)/g,$null,%x), %x = $remove(%x, ,$chr(9)) | return %x } } 
on *:input:#:if ($1 == !doviz) { set %:kanal # | sockclose kurx | sockopen kurx 
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
80 }
on *:sockopen:kurx:{
  sockwrite -nt $sockname GET / 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
  unset %:dolar | unset %:euro | unset %:sterlin
}
on *:sockread:kurx:{
  var %:kur | sockread %:kur | tokenize 32 %:kur
  if (*<li class="midrow alis" title="Dolar Alış"*  iswm %:kur) || (*<li class="midrow satis" title="Dolar Satış"* iswm %:kur) { set %:dolar $addtok($htmlfree(%:kur),%:dolar,32) }
  if (*<li class="midrow capraz" title="Çapraz Kur: 1 USD*  iswm %:kur) {
    msg %:kanal 4Dolar ($) Alış(TL) =4 $token(%:dolar,2,32)  -   Satış(TL) =4 $token(%:dolar,1,32)  -  Çapraz Kur =4 $htmlfree(%:kur) € ( 1$ = $+($htmlfree(%:kur),€) ) 
  }
  if (*<li class="midrow alis" title="Euro Alış">*  iswm %:kur) || (*<li class="midrow satis" title="Euro Satış"* iswm %:kur) { set %:euro $addtok($htmlfree(%:kur),%:euro,32) }  
  if (*<li class="midrow capraz" title="Çapraz Kur: 1 EUR*  iswm %:kur) {
    msg %:kanal 4Euro (€) Alış(TL) =4 $token(%:euro,2,32)  -   Satış(TL) =4 $token(%:euro,1,32)  -  Çapraz Kur =4 $htmlfree(%:kur) $ ( 1€ = $+($htmlfree(%:kur),$) ) 
  }
  if (*<li class="midrow alis" title="Sterlin Alış">*  iswm %:kur) || (*<li class="midrow satis" title="Sterlin Satış"* iswm %:kur) { set %:sterlin $addtok($htmlfree(%:kur),%:sterlin,32) }  
  if (*<li class="midrow capraz" title="Çapraz Kur: 1 GBP *  iswm %:kur) {  
    msg %:kanal 4Sterlin (£) Alış(TL) =4 $token(%:sterlin,2,32)  -   Satış(TL) =4 $token(%:sterlin,1,32)  -  Çapraz Kur =4 $htmlfree(%:kur) $ ( 1£ = $+($htmlfree(%:kur),$) ) 
  }
}

Ekran Görüntüsü;


Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Bu koda çeyrek altın eklenebilir mi?

 
Alıntı ile Cevapla

Cevapla

Etiketler
döviz, kurları

« önceki Konu | sonraki Konu »

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

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
Döviz işlemleri Burce Ödev ve Tezler 0 13 Mayıs 2014 17:54
Kapalıçarşı'da döviz Cemalizim Haber Arşivi 0 07 Ekim 2008 13:41




Sitemiz bir " paylaşım " sitesidir. Bu yüzden sitemize kayıt olan herkes kontrol edilmeksizin mesaj/konu/resim paylaşabilmektedir.
Bu sebepten ötürü, sitemiz üzerinden paylaşılan mesajlar, konular ve resimlerden doğabilecek olan yasal sorumluluklar paylaşan kullanıcıya aittir. IRCForumlari.Net hiçbir yasal sorumluluk kabul etmemektedir. İllegal herhangi bir faaliyet görülmesi durumunda İletişim sayfası üzerinden ulaşıldığı taktirde mesaj, konu ya da resim en fazla 24 saat içerisinde silinecektir.
5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.
İletişim Arşiv Gizlilik Sözleşmesi Yukarı git
trsikayet.com ferizli haber kaynarca haber yavru köpek sohbet instagram takipçi sohbet teması
Powered by vBulletin® Version 3.8.8 Beta 3
Copyright ©2000 - 2025, vBulletin Solutions, Inc.
Search Engine Friendly URLs by vBSEO
Copyright ©2004 - 2024 IRCForumlari.Net