Alıntı:
Billy Nickli Üyeden Alıntı
|
Merhaba Bu Set'in yapmış olduğu Remote. Bunu Deneyebilirsiniz.
Benim Tüm dosyaların ve arşivim eski bilgisayarım ile çöp oldu. Ve bunlarıda deneme fırsatım olmadı. mIRC 6.35 üstü sürümde çalışır aşağı da vermiş olduğum remote.
İlerleyen zamanlarda Deneyipte eski Usul paylaşırım ancak dediğim gibi şuan da bilgisayarımda hiç bir bilgi mevcut değil. ^_^
Kod
on *:text:*:#: {
if $me !== Set { return }
var %rand $rand(1,10), %sonuc $iif(%rand >= 10,buyuk,$iif(%rand == 5,esit,kucuk)), %secimler buyuk esit kucuk, %rands $rand(1,3), %secimi $token(%secimler,%rands,32)
if $regex($1,^&[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]!.]b&[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]uüÜ]y&[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]uüÜ]k$) { var %regml buyuk }
if $regex($1,^&[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]!.]k&[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]uüÜ]c&[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]uüÜ]k$) { var %regml kucuk }
if $regex($1,^&[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]!.]e&[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]şsŞ]&[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]ıiİ]t$) { var %regml esit }
if %regml && %sonuc {
var %sonucs $iif(%regml == %sonuc && %secimi == %sonuc ,Oyun Berabere,$iif(%regml !== %sonuc,$me,$nick))
if %sonucs == $nick { writeini sayiskor.63 $nick skor $calc($sayiskor($nick,skor) + 1) }
if %sonucs == $me { writeini sayiskor.63 $nick bot $calc($sayiskor($nick,bot) + 1) }
var %skorlar $+($chr(40),2Skor:14 $nick 10 $sayiskor($nick,skor) 4-14 $me 10 $sayiskor($nick,bot),$chr(41))
msg $chan -
msg $chan Seciminiz10 $upper(%regml) Botun secimi10 $upper(%secimi) (Sonuc: $upper(%sonuc) $+ $chr(41) $+($chr(40),$iif(%sonucs !== oyun berabere,4Kazanan: %sonucs,4Oyun Berabere),$chr(41)) %skorlar
msg $chan -
}
}
alias sayiskor {
return $iif($readini(sayiskor.63,$1,$2),$v1,0)
}
Komut ;
Kod
!buyuk – !kucuk – !esit (mIRC Eglence)