IRCALEM.Com Genel Forum, IRC Forumu IF - mIRC Scripting mIRC Scripting Hazır Kodlar mIRC Parça Kodlar $rr(N.N) Verilen Sayı Aralıklarını Yansıtmak
irc

$rr(N.N) Verilen Sayı Aralıklarını Yansıtmak
Aytac
$rr(N.N) Verilen Sayı Aralıklarını Yansıtmak
0
289
  • 0 Oy - 0 Ortalama
  • 1
  • 2
  • 3
  • 4
  • 5

[-]
Etiketler
aralıklarını rr n yansıtmak sayı verilen

Bu konuyu görüntüleyen kullanıcı(lar):1 Ziyaretçi
Şuan Offine!
Şuan Offine!
Aytac Administrator
********
Proje Sorumlusu

  • Üyelik tarihi    04.02.2020
  • Konum  78 Karabük
  • Konular337
  • Mesajlar349
  • Verilen beğeni7 in 4 posts
  • Alınan beğeni5
  • Rep puanı 6

  • Para: 94.7₺

Parça kodlarla uğraşırken ortaya çıkan bir kombinasyonu paylaşmak istedim. Bunları yapmak için; "uğraşırken keyif alıyor olmak" yeterli diye düşünüyorum. Kod'un illa önemli bir amacı olması gerekmiyor, keyifli ve eğlenceli yanları olması yeterli bence. (Ayrıca: düzgün bir işlevi olan her kod bana göre anlamlı/öğretici/faydalıdır.)

Amaç:
1- mS'ye renk katması.
2- Eğlenmek/Yapım aşamasında keyif almak.
3- İlham verici bazı yönleri olması ümidi.

Kullanımı: $rr(Sayı1.Sayı2)
Örnek: //echo -a $rr(10.20) veya //echo -a $rr(20.10)

Açıklama: 1. Sayı ile 2. Sayı arasındaki sayıları sıralar.
- Eğer 1. Sayı küçük ve 2. Sayı büyük ise; Küçükten büyüğe doğru sıralar.
- Eğer 1. Sayı büyük ve 2. Sayı küçük ise; Büyükten küçüğe doğru sıralar.

Test1:
1. Sayı küçük 2. Sayı büyük;

Kod :
//echo -a $rr(10.20)

Sonuç: 10 11 12 13 14 15 16 17 18 19 20

Test2:
1. Sayı büyük 2. Sayı küçük;

Kod :
//echo -a $rr(20.10)

Sonuç: 20 19 18 17 16 15 14 13 12 11 10

Kod :
alias rr {
  if $regex($$1,^\d+\.\d+$) {
    var %b = $gettok($1,1,46), %c = $gettok($1,2,46),%v,%z
    %v = $iif(%b > %c, $abs($calc(%b - %c)), $abs($calc(%c - %b)))
    %z = $regsubex(x,$str(*,%v),/./g,$calc($iif(%b > %c, %c, %b) + \n) $chr(32))
    return $iif(%b > %c, $sorttok(%z,32,nr) %c, %b %z)
  }
  else { return Format Hatası! - Doğru format: $!rr(rakam(N.N) - Örnek: $!rr(10.15) }
}

Not: Çok büyük sayı aralıkları verirseniz kod hata verecektir. Ayrıca kod pek çok farklı (kısa veya uzun) yolla da yapılabilir..
İyi forumlar.
“İnsanların en hayırlısı, insanlara faydalı olandır”. H.Ş.



Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Random (Rastgele) sayı türetimi $rnum Aytac 0 337 19.03.2020, 23:54
Son Mesaj: Aytac

Foruma Git: