!Kısmet Oyunu Cinsiyet Bazlı Erkek/Bayan

; Cinsiyet listeleri için değişkenler
var %erkekler
var %bayanlar


; Yetkilendirilmiş kullanıcı listesi
var %yetkililer = founder1 founder2 sop1 sop2


; !bayanekle komutu
on *:TEXT:!bayanekle*:#kanal: {
 if ($nick isin %yetkililer) && ($2 != $null) {
   set %bayanlar $addtok(%bayanlar,$2,32)
   msg $chan Nick $2 artık bayan listesine eklendi!
 }
}


; !erkekekle komutu
on *:TEXT:!erkekekle*:#kanal: {
 if ($nick isin %yetkililer) && ($2 != $null) {
   set %erkekler $addtok(%erkekler,$2,32)
   msg $chan Nick $2 artık erkek listesine eklendi!
 }
}


; !kısmet komutu
on *:TEXT:!kısmet:#kanal: {
 var %kisiler = $nick($chan,0)
 if (%kisiler >= 4000) { ; En az 4000 kişi olmalı, 2000'erkek 2000 bayan için
   var %erkekler = $nick($chan, erkek, 0)
   var %bayanlar = $nick($chan, bayan, 0)

   if (%erkekler >= 2000 && %bayanlar >= 2000) {
     var %rastgele1 = $rand(1,%erkekler)
     var %rastgele2 = $rand(1,%bayanlar)
     var %rastgele3 = $rand(1,%erkekler)
     var %rastgele4 = $rand(1,%bayanlar)

     var %erkek1 = $nick($chan, erkek, %rastgele1)
     var %bayan1 = $nick($chan, bayan, %rastgele2)
     var %erkek2 = $nick($chan, erkek, %rastgele3)
     var %bayan2 = $nick($chan, bayan, %rastgele4)

     msg $chan Kısmet kısmet! $nick(%erkek1) ile $nick(%bayan1) birbirine, $nick(%erkek2) ile $nick(%bayan2) birbirine denk geliyor! :)
   }
 }
}