mIRC Sayısal Loto Kodu

Aytac

nicktag
Yönetici
Developer
Katılım
4 Şub 2020
Mesajlar
379
Tepkime puanı
50
Puanları
28
Konum
ircland
Web sitesi
www.ircalem.net
mIRC Sayısal loto oynamak için yapılan bir koddur.

Kod:
alias sayisalloto {
  var %sylr = 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49, $&
    %loto = $token(%sylr,$r(1,$token(%sylr,0,32)),32), %sylr = $remtok(%sylr,%loto,32), %loto2 = $token(%sylr,$r(1,$token(%sylr,0,32)),32), %sylr = $remtok(%sylr,%loto2,32), $&
    %loto3 = $token(%sylr,$r(1,$token(%sylr,0,32)),32), %sylr = $remtok(%sylr,%loto3,32), %loto4 = $token(%sylr,$r(1,$token(%sylr,0,32)),32), %sylr = $remtok(%sylr,%loto4,32), %loto5 = $token(%sylr,$r(1,$token(%sylr,0,32)),32), $&
    %sylr = $remtok(%sylr,%loto5,32), %loto6 = $token(%sylr,$r(1,$token(%sylr,0,32)),32)
  echo -a Kazanan numaralar:04 $replace($sorttok(%loto %loto2 %loto3 %loto4 %loto5 %loto6,32,n),$chr(32),$+($chr(32),-,$chr(32)))
}
 
Üst