IRCForumu.NET - Türkiye'nin IRC ve mIRC Kullanıcılarının Buluştuğu Forum muhabbet


ircforumu reklam ircforumu reklamdamlasu bizimkiler sihirlisohbet sohbetelit


Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 08 Kasım 2024, 10:17   #1
Çevrimdışı
SohbetElit.Com
 
Brain - ait Kullanıcı Resmi (Avatar)
 
Üyelik Tarihi: 09 Ekim 2024
Üye No: 10252
Şehir: Eskişehir
WebSite: Sohbetelit.com
IRC: irc.Sohbetelit.com
İlgi Alanım: C++
Mesaj Sayısı: 11
Aldığı Beğeni: 4
Beğendikleri: 5
@Brain
!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!
}
}
}

Bu kodda %yetkililer listesi, !bayanekle ve !erkekekle komutlarını kullanabilen kişilerin listesini içerir. İlgili komutları yalnızca bu listeye dahil olan kişiler kullanabilir. Siz yetkilendirilmiş kişilerin nicklerini %yetkililer değişkenine eklemelisiniz. Bu şekilde, belirli yetkilendirilmiş kişilerin !bayanekle ve !erkekekle komutlarını kullanabilmesini sağlamış olursunuz. Kendinize göre ayarlayabilirsiniz
NOT : ALINTIDIR
Cod Sahibi : Operserv
; 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!
}
}
}

Bu kodda %yetkililer listesi, !bayanekle ve !erkekekle komutlarını kullanabilen kişilerin listesini içerir. İlgili komutları yalnızca bu listeye dahil olan kişiler kullanabilir. Siz yetkilendirilmiş kişilerin nicklerini %yetkililer değişkenine eklemelisiniz. Bu şekilde, belirli yetkilendirilmiş kişilerin !bayanekle ve !erkekekle komutlarını kullanabilmesini sağlamış olursunuz. Kendinize göre ayarlayabilirsiniz
NOT : ALINTIDIR
Cod Sahibi : Operserv
__________________
cesareti olmayan kaybeder
her gun bir seyini
bir gun her seyini...
  Alıntı ile Cevapla

IRCForumu.Net - Reklam Alanı

Cevapla

Etiketler
bazlı, cinsiyet, erkek or bayan, kısmet, oyunu
IRCForumu.Net - Sponsor Bağlantılar


Seçenekler
Stil

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 Açık
Pingbacks are Açık
Refbacks are Açık