cards=[[ \🂡 \🂢 \🂣 \🂤 \🂥 \🂦 \🂧 \🂨 \🂩 \🂪 \🂫 \🂭 \🂮] [ \🂱 \🂲 \🂳 \🂴 \🂵 \🂶 \🂷 \🂸 \🂹 \🂺 \🂻 \🂽 \🂾] [ \🃁 \🃂 \🃃 \🃄 \🃅 \🃆 \🃇 \🃈 \🃉 \🃊 \🃋 \🃍 \🃎] [ \🃑 \🃒 \🃓 \🃔 \🃕 \🃖 \🃗 \🃘 \🃙 \🃚 \🃛 \🃝 \🃞]]
deck=[[0 0 false ] [0 1 2] [0 2 3]  [0 3 4] [0 4 5] [0 5 6] [0 6 7] [0 7 8] [0 8 9] [0 9 10] [0 10 10] [0 11 10] [0 12 10]  [1 0 false ] [1 1 2] [1 2 3]  [1 3 4] [1 4 5] [1 5 6] [1 6 7] [1 7 8] [1 8 9] [1 9 10] [1 10 10] [1 11 10] [1 12 10]  [2 0 false ] [2 1 2] [2 2 3]  [2 3 4] [2 4 5] [2 5 6] [2 6 7] [2 7 8] [2 8 9] [2 9 10] [2 10 10] [2 11 10] [2 12 10]  [3 0 false ] [3 1 2] [3 2 3] [3 3 4] [3 4 5] [3 5 6] [3 6 7] [3 7 8] [3 8 9] [3 9 10] [3 10 10] [3 11 10] [3 12 10]  ]
sdeck=JSON.parse JSON.stringify deck
shuffle = !->  for x,i in deck when (x=Math.floor(Math.random() * (i + 1));true)
        [deck[i],deck[x]] = [deck[x],deck[i]]
gid=(id) -> document.getElementById(id)
window.mca=mc=[];window.dca=dc=[];defbet=gid("defbet");m=gid("money");bet=gid("bet");mch=gid("mcards");dch=gid("dcards");l=gid("log")
tod = !-> dc.push (c=deck.pop!); dch.innerHTML+=cards[c[0]][c[1]]
log = (msg)!-> l.innerHTML=msg
window.more = tom = !->  mc.push (c=deck.pop!); mch.innerHTML+=cards[c[0]][c[1]]; summ(mc)>21 and (log "Перебор";gid("d").disabled=gid("m").disabled=gid("e").disabled=true;gid("g").disabled=false)
clear = !->
    gid("g").disabled=!(gid("d").disabled=gid("m").disabled=gid("e").disabled=false);log "";bet.innerHTML=0;mch.innerHTML=dch.innerHTML="";mc.length=0;dc.length=0;deck:=JSON.parse JSON.stringify sdeck;shuffle!
window.s=summ = (ar)->
    sum=0;tzs=0
    for c in ar 
        (c[2] and sum+=c[2]) or tzs++
    for i in [1 to tzs] 
        (sum+11>21 and sum+=1) or sum+=11
    sum
betbet = -> if +m.innerHTML<+defbet.value then log "У вас нет столько денег!"; false else bet.innerHTML=+defbet.value;m.innerHTML-=+defbet.value;true
window.dub = !-> if +m.innerHTML<+bet.innerHTML then log "У вас нет столько денег!" else m.innerHTML-=+bet.innerHTML;bet.innerHTML*=2;tom!
window.give = !-> (clear!; betbet!) and (tom!;tom!;tod!;true) or gid("g").disabled=false;!mc[0][2] and !mc[1][2] and (log "Вы выиграли!"; m.innerHTML = +m.innerHTML + +bet.innerHTML*3;gid("e").disabled=true;gid("g").disabled=false)
window.enough = !-> 
    win=true;nothing=false
    while summ(dc) < 17
        tod!
    log if summ(dc)>21 or summ(dc)<summ(mc)  then "Вы выиграли!" else if summ(dc)==summ(mc) then (nothing=true; "Ничья") else (win=false; "Вы проиграли")
    gid("g").disabled=false
    gid("e").disabled=true
    m.innerHTML = +m.innerHTML + (+bet.innerHTML)*(if nothing then 1 else if win then 2 else 0)

Y2FyZHM9W1sgXPCfgqEgXPCfgqIgXPCfgqMgXPCfgqQgXPCfgqUgXPCfgqYgXPCfgqcgXPCfgqggXPCfgqkgXPCfgqogXPCfgqsgXPCfgq0gXPCfgq5dIFsgXPCfgrEgXPCfgrIgXPCfgrMgXPCfgrQgXPCfgrUgXPCfgrYgXPCfgrcgXPCfgrggXPCfgrkgXPCfgrogXPCfgrsgXPCfgr0gXPCfgr5dIFsgXPCfg4EgXPCfg4IgXPCfg4MgXPCfg4QgXPCfg4UgXPCfg4YgXPCfg4cgXPCfg4ggXPCfg4kgXPCfg4ogXPCfg4sgXPCfg40gXPCfg45dIFsgXPCfg5EgXPCfg5IgXPCfg5MgXPCfg5QgXPCfg5UgXPCfg5YgXPCfg5cgXPCfg5ggXPCfg5kgXPCfg5ogXPCfg5sgXPCfg50gXPCfg55dXQpkZWNrPVtbMCAwIGZhbHNlIF0gWzAgMSAyXSBbMCAyIDNdICBbMCAzIDRdIFswIDQgNV0gWzAgNSA2XSBbMCA2IDddIFswIDcgOF0gWzAgOCA5XSBbMCA5IDEwXSBbMCAxMCAxMF0gWzAgMTEgMTBdIFswIDEyIDEwXSAgWzEgMCBmYWxzZSBdIFsxIDEgMl0gWzEgMiAzXSAgWzEgMyA0XSBbMSA0IDVdIFsxIDUgNl0gWzEgNiA3XSBbMSA3IDhdIFsxIDggOV0gWzEgOSAxMF0gWzEgMTAgMTBdIFsxIDExIDEwXSBbMSAxMiAxMF0gIFsyIDAgZmFsc2UgXSBbMiAxIDJdIFsyIDIgM10gIFsyIDMgNF0gWzIgNCA1XSBbMiA1IDZdIFsyIDYgN10gWzIgNyA4XSBbMiA4IDldIFsyIDkgMTBdIFsyIDEwIDEwXSBbMiAxMSAxMF0gWzIgMTIgMTBdICBbMyAwIGZhbHNlIF0gWzMgMSAyXSBbMyAyIDNdIFszIDMgNF0gWzMgNCA1XSBbMyA1IDZdIFszIDYgN10gWzMgNyA4XSBbMyA4IDldIFszIDkgMTBdIFszIDEwIDEwXSBbMyAxMSAxMF0gWzMgMTIgMTBdICBdCnNkZWNrPUpTT04ucGFyc2UgSlNPTi5zdHJpbmdpZnkgZGVjawpzaHVmZmxlID0gIS0+ICBmb3IgeCxpIGluIGRlY2sgd2hlbiAoeD1NYXRoLmZsb29yKE1hdGgucmFuZG9tKCkgKiAoaSArIDEpKTt0cnVlKQogICAgICAgIFtkZWNrW2ldLGRlY2tbeF1dID0gW2RlY2tbeF0sZGVja1tpXV0KZ2lkPShpZCkgLT4gZG9jdW1lbnQuZ2V0RWxlbWVudEJ5SWQoaWQpCndpbmRvdy5tY2E9bWM9W107d2luZG93LmRjYT1kYz1bXTtkZWZiZXQ9Z2lkKCJkZWZiZXQiKTttPWdpZCgibW9uZXkiKTtiZXQ9Z2lkKCJiZXQiKTttY2g9Z2lkKCJtY2FyZHMiKTtkY2g9Z2lkKCJkY2FyZHMiKTtsPWdpZCgibG9nIikKdG9kID0gIS0+IGRjLnB1c2ggKGM9ZGVjay5wb3AhKTsgZGNoLmlubmVySFRNTCs9Y2FyZHNbY1swXV1bY1sxXV0KbG9nID0gKG1zZykhLT4gbC5pbm5lckhUTUw9bXNnCndpbmRvdy5tb3JlID0gdG9tID0gIS0+ICBtYy5wdXNoIChjPWRlY2sucG9wISk7IG1jaC5pbm5lckhUTUwrPWNhcmRzW2NbMF1dW2NbMV1dOyBzdW1tKG1jKT4yMSBhbmQgKGxvZyAi0J/QtdGA0LXQsdC+0YAiO2dpZCgiZCIpLmRpc2FibGVkPWdpZCgibSIpLmRpc2FibGVkPWdpZCgiZSIpLmRpc2FibGVkPXRydWU7Z2lkKCJnIikuZGlzYWJsZWQ9ZmFsc2UpCmNsZWFyID0gIS0+CiAgICBnaWQoImciKS5kaXNhYmxlZD0hKGdpZCgiZCIpLmRpc2FibGVkPWdpZCgibSIpLmRpc2FibGVkPWdpZCgiZSIpLmRpc2FibGVkPWZhbHNlKTtsb2cgIiI7YmV0LmlubmVySFRNTD0wO21jaC5pbm5lckhUTUw9ZGNoLmlubmVySFRNTD0iIjttYy5sZW5ndGg9MDtkYy5sZW5ndGg9MDtkZWNrOj1KU09OLnBhcnNlIEpTT04uc3RyaW5naWZ5IHNkZWNrO3NodWZmbGUhCndpbmRvdy5zPXN1bW0gPSAoYXIpLT4KICAgIHN1bT0wO3R6cz0wCiAgICBmb3IgYyBpbiBhciAKICAgICAgICAoY1syXSBhbmQgc3VtKz1jWzJdKSBvciB0enMrKwogICAgZm9yIGkgaW4gWzEgdG8gdHpzXSAKICAgICAgICAoc3VtKzExPjIxIGFuZCBzdW0rPTEpIG9yIHN1bSs9MTEKICAgIHN1bQpiZXRiZXQgPSAtPiBpZiArbS5pbm5lckhUTUw8K2RlZmJldC52YWx1ZSB0aGVuIGxvZyAi0KMg0LLQsNGBINC90LXRgiDRgdGC0L7Qu9GM0LrQviDQtNC10L3QtdCzISI7IGZhbHNlIGVsc2UgYmV0LmlubmVySFRNTD0rZGVmYmV0LnZhbHVlO20uaW5uZXJIVE1MLT0rZGVmYmV0LnZhbHVlO3RydWUKd2luZG93LmR1YiA9ICEtPiBpZiArbS5pbm5lckhUTUw8K2JldC5pbm5lckhUTUwgdGhlbiBsb2cgItCjINCy0LDRgSDQvdC10YIg0YHRgtC+0LvRjNC60L4g0LTQtdC90LXQsyEiIGVsc2UgbS5pbm5lckhUTUwtPStiZXQuaW5uZXJIVE1MO2JldC5pbm5lckhUTUwqPTI7dG9tIQp3aW5kb3cuZ2l2ZSA9ICEtPiAoY2xlYXIhOyBiZXRiZXQhKSBhbmQgKHRvbSE7dG9tITt0b2QhO3RydWUpIG9yIGdpZCgiZyIpLmRpc2FibGVkPWZhbHNlOyFtY1swXVsyXSBhbmQgIW1jWzFdWzJdIGFuZCAobG9nICLQktGLINCy0YvQuNCz0YDQsNC70LghIjsgbS5pbm5lckhUTUwgPSArbS5pbm5lckhUTUwgKyArYmV0LmlubmVySFRNTCozO2dpZCgiZSIpLmRpc2FibGVkPXRydWU7Z2lkKCJnIikuZGlzYWJsZWQ9ZmFsc2UpCndpbmRvdy5lbm91Z2ggPSAhLT4gCiAgICB3aW49dHJ1ZTtub3RoaW5nPWZhbHNlCiAgICB3aGlsZSBzdW1tKGRjKSA8IDE3CiAgICAgICAgdG9kIQogICAgbG9nIGlmIHN1bW0oZGMpPjIxIG9yIHN1bW0oZGMpPHN1bW0obWMpICB0aGVuICLQktGLINCy0YvQuNCz0YDQsNC70LghIiBlbHNlIGlmIHN1bW0oZGMpPT1zdW1tKG1jKSB0aGVuIChub3RoaW5nPXRydWU7ICLQndC40YfRjNGPIikgZWxzZSAod2luPWZhbHNlOyAi0JLRiyDQv9GA0L7QuNCz0YDQsNC70LgiKQogICAgZ2lkKCJnIikuZGlzYWJsZWQ9ZmFsc2UKICAgIGdpZCgiZSIpLmRpc2FibGVkPXRydWUKICAgIG0uaW5uZXJIVE1MID0gK20uaW5uZXJIVE1MICsgKCtiZXQuaW5uZXJIVE1MKSooaWYgbm90aGluZyB0aGVuIDEgZWxzZSBpZiB3aW4gdGhlbiAyIGVsc2UgMCk=