Asiforum.Net

Asiforum.Net (https://asiforum.net/)
-   mIRC Hazır Kodlar ~ (https://asiforum.net/mirc-hazir-kodlar-.html)
-   -   mIRC Sayısal Loto Addonu (https://asiforum.net/167-mirc-sayisal-loto-addonu.html)

Sindy 04-22-2017 05:35 AM

mIRC Sayısal Loto Addonu
 
Kod:

on *:text:*:#: {
  if ($regex($1,/^[.!](basla)$/Si)) {
    msg # Sayısal loto başlıyor.
    msg # 6 adet numara girin (1'den 49'a kadar)
    msg # Örnek kullanım; !loto 11 23 33 41 23 07
  }
  if ($regex($1,/^[.!](loto)$/Si)) {
    if ($2 !isnum) { msg # Hatalı kullanım. }
    else {
      write loto.txt $2- $nick
      msg # Kayıt edildi.
      msg # Başka tahmin yoksa, ( .kazanan )
    }
  } 
  if ($regex($1-,/^[.!](Kazanan)$/Si)) && ($nick isop #) || ($nick ishop #) {
    var %:loto $rand(1,49)
    var %:loto2 $rand(1,49)
    var %:loto3 $rand(1,49)
    var %:loto4 $rand(1,49)
    var %:loto5 $rand(1,49)
    var %:loto6 $rand(1,49)
    timer 1 0 msg # Lütfen bekleyin...
    timer 1 1 msg # 5
    timer 1 2 msg # 4
    timer 1 3 msg # 3
    timer 1 4 msg # 2
    timer 1 5 msg # 1
    .timer 1 6 msg # Kazanan numaralar: %:loto %:loto2 %:loto3 %:loto4 %:loto5 %:loto6
    .timer 1 8 msg # Tahminde bulunanlar;
    var %:Mylife 1
    while %:Mylife <= $lines(loto.txt) {
      .timer 1 10  msg # $read(loto.txt,%:Mylife)
      inc %:Mylife
    }
  }
  .timer 1 15 .remove loto.txt
}

Bota eklenmelidir kendinize eklerseniz çalışmıcaktır.
.kazanan komutunu uygulamak için kanalda @(OP) veya halfop(%) olmalısınız.
Birden fazla tahminde bulunmamalısınız.

Not: Alıntıdır.


Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 11:57 AM.

Powered by vBulletin® Version 3.8.5
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Search Engine Optimisation provided by DragonByte SEO v2.0.37 (Lite) - vBulletin Mods & Addons Copyright © 2025 DragonByte Technologies Ltd.