| immortaL | 31 Mart 2017 23:21 |
Basit !zar oyunu
Kodu $mircdir yani, mirc ana klasörüne hediye.txt ve dalga.txt metin belgeleri olusturarak alt alta hediyeleri ve dalgaları sıralayın. Tekrardan iyi eğlenceler.
Komutlar ; !basla - !bitir Kod:
on *:text:*:#: {
if $regex($1,/^([.!]ba[sŞş]la)/Si) {
.timer 1 1 mode $chan +vm $nick
.timer 1 4 msg $chan $+($nick,.) Oyunu sadece hayatını kazanmak için oyna.
.timer 1 5 msg $chan !zar yazarak zarı sallayabilirsin..
}
if $regex($1,/^([.!]zar)/Si) {
.timer 1 1 $chan Attığın zarı tarif et $+($nick,...)
var %dice $rand(1,6)
.timer 1 3 msg $chan 2Senin sayın $+(%dice,...)
if (%dice == 6) {
.timer 1 4 msg $chan Kazandın! Tebrikler $+($nick,!)
.timer 1 5 msg $chan 4Hediyen: $+(2,$read(hediye.txt))
.timer 1 6 mode $chan -vm $nick
}
elseif (%dice != 6) {
.timer 1 4 msg $chan Üzgünüm $+($nick,$chr(32)) kazanamadın. Tekrar dene!
.timer 1 5 msg $chan Bu şansızlıkla ancak $read(dalga.txt)
}
}
if $regex($1,/^([.!]bitir)/Si) {
.timer 1 1 mode $chan -vm $nick
.timer 1 2 msg $chan Teşekkürler, tekrar oynamak için !zar yazınız.
}
}
Code : Mecnun | 