Özelinize gelen kullanıcılara şifre sorun
Kod: Kodu kopyalamak için üzerine çift tıklayın! on *:open:?:*:{
if ($nick != $me) {
$+(timer,ozelretmesaj;) 1 29 msg $nick 2Belirlenen sürede şifrenizi girmediniz. 4Özel pencereniz kapatılıyor.
$+(timer,ozelkabul) 1 30 close -m $nick
ozelsifre $nick
}
}
alias ozelsifre {
set -e %gelennick $1
set %ozkabul $(,$str($!r(1000,9999) $chr(32) , 1))
msg %gelennick 2Özelime yazmak için size belirlenmiş şifre olan 4 $+(",%ozkabul,") 2şifresini 4 $+(30 saniye) 2içinde girmeniz gerekiyor. 4!şifre <şifreniz> 2şeklinde şifrenizi girebilirsiniz. Aksi takdirde özel penceresi kapatılacaktır. | halt
}
on *:text:*:?:{
if $regex($1,/[!.](s|ş)ifre/i) {
if !$2 { msg $nick Şifreyi yazmadın. | return }
if $2 == %ozkabul {
timerozelretmesaj off
timerozelkabul off
msg $nick Şifreniz Kabul Edildi.
}
else { .msg $nick şifrenizi yanlış girdiniz. | return }
}
} Özelinize gelen kullanıcıya random olarak 1000 ile 9999 arasında belirlenen şifreyi gönderir. 30 saniye içinde şifre girilmezse özel penceresi kapatılır.
Geliştirilebilir.
__________________ Kahpeliğin bahanesi, İhanetin telafisi olmaz.
Konu Nokta tarafından (31 Ocak 2023 Saat 13:30 ) değiştirilmiştir.
|