| emektar | 06 - 10 - 2024 13:23 |
BlackJack
Kod:
on *:TEXT:!oyun:#: {
var %oyuncu = $nick
var %krupiye = Krupiye
var %deste = As 2 3 4 5 6 7 8 9 10 Vale Kız Papaz Joker As 2 3 4 5 6 7 8 9 10 Vale Kız Papaz Joker As 2 3 4 5 6 7 8 9 10 Vale Kız Papaz Joker As 2 3 4 5 6 7 8 9 10 Vale Kız Papaz Joker
var %deste = $shuffle(%deste)
var %oyuncuEl = $gettok(%deste, 1, 32)
var %krupiyeEl = $gettok(%deste, 2, 32)
var %bahis = $rand(10, 100)
if ($nick == %krupiye) {
msg $chan %oyuncu Oyunun krupiyesi sensin! Bekleme yapabilirsin.
}
else {
if ($numtok(%oyuncuEl, 32) >= 5) {
msg $chan %oyuncu En fazla 5 kişi oynayabiliriz. Başka bir oyun odası deneyin.
}
else {
msg $chan %oyuncu Senin kartların: %oyuncuEl. Toplam: $calc($cardval(%oyuncuEl))
msg $chan %krupiye Krupiye'nin kartları: %krupiyeEl. Toplam: $calc($cardval(%krupiyeEl))
msg $chan %oyuncu Bahis: $%bahis. !kartal veya !kapan de.
}
}
}
on *:TEXT:!kartal:#: {
var %oyuncu = $nick
var %deste = As 2 3 4 5 6 7 8 9 10 Vale Kız Papaz Joker As 2 3 4 5 6 7 8 9 10 Vale Kız Papaz Joker As 2 3 4 5 6 7 8 9 10 Vale Kız Papaz Joker As 2 3 4 5 6 7 8 9 10 Vale Kız Papaz Joker
var %deste = $shuffle(%deste)
var %oyuncuEl = $gettok(%deste, 1, 32)
var %yeniKart = $gettok(%deste, 1, 32)
if ($nick == Krupiye) {
msg $chan %oyuncu Sen krupiyesin. Oyuncu olarak oyna!
}
else {
if ($calc($cardval(%oyuncuEl)) > 21) {
msg $chan %oyuncu Senin kartların: %oyuncuEl. Toplam: $calc($cardval(%oyuncuEl)). Battın!
}
else {
set %oyuncuEl %oyuncuEl %yeniKart
msg $chan %oyuncu Senin kartların: %oyuncuEl. Toplam: $calc($cardval(%oyuncuEl)). !kartal veya !kapan de.
}
}
}
on *:TEXT:!kapan:#: {
var %oyuncu = $nick
var %krupiye = Krupiye
var %deste = As 2 3 4 5 6 7 8 9 10 Vale Kız Papaz Joker As 2 3 4 5 6 7 8 9 10 Vale Kız Papaz Joker As 2 3 4 5 6 7 8 9 10 Vale Kız Papaz Joker As 2 3 4 5 6 7 8 9 10 Vale Kız Papaz Joker
var %deste = $shuffle(%deste)
var %oyuncuEl = $gettok(%deste, 1, 32)
var %krupiyeEl = $gettok(%deste, 2, 32)
if ($nick == %krupiye) {
msg $chan %oyuncu Sen krupiyesin. Oyuncu olarak oyna!
}
else {
while ($calc($cardval(%krupiyeEl)) < 17) {
var %yeniKart = $gettok(%deste, 1, 32)
set %krupiyeEl %krupiyeEl %yeniKart
}
msg $chan %krupiye Krupiye'nin kartları: %krupiyeEl. Toplam: $calc($cardval(%krupiyeEl))
var %oyuncuToplam = $calc($cardval(%oyuncuEl))
var %krupiyeToplam = $calc($cardval(%krupiyeEl))
if (%oyuncuToplam > 21) {
msg $chan %oyuncu Battın! Krupiye kazanır.
}
else if (%krupiyeToplam > 21) {
msg $chan %oyuncu Krupiye battı! Sen kazanırsın.
}
else if (%oyuncuToplam > %krupiyeToplam) {
msg $chan %oyuncu Sen kazanırsın!
}
else if (%oyuncuToplam == %krupiyeToplam) {
msg $chan %oyuncu Berabere!
}
else {
msg $chan %oyuncu Krupiye kazanır.
}
}
}
BlackJack 21 sevenler için !oyun !kartal !kapan komutları ile oynanir. | 