ライブジャックブラックジャック

おそらく、「XXXの30行」などの見出しにはすでに多くの人が飽きていますが、別の投稿を書くリスクがあります。 どういうわけか個々のhabralyの人々の怒りを軽減するために、このスクリプトの各行が何をするかを説明します。





ゲームとして、私はBlackjackを選びました。 ルールを思い出させてください：

• プレーヤーはディーラーと対戦します。
• まず、プレーヤーには2枚のカードが配られ、ディーラーには1枚すべてのカードが見えます
• 各カードは、一定のポイント数を与えます（価値に応じた数値、写真-10、エース-11または1、より収益性が高い）
• タスクはより多くのポイントを獲得することですが、21以下
• ポイントを増やすには、追加のカードを取る必要があります

jsfiddleへのリンク。

コード自体：

cards = [['\ud83c\udca1', '\ud83c\udca2', '\ud83c\udca3', '\ud83c\udca4', '\ud83c\udca5', '\ud83c\udca6', '\ud83c\udca7', '\ud83c\udca8', '\ud83c\udca9', '\ud83c\udcaa', '\ud83c\udcab', '\ud83c\udcad', '\ud83c\udcae',] ['\ud83c\udcb1', '\ud83c\udcb2', '\ud83c\udcb3', '\ud83c\udcb4', '\ud83c\udcb5', '\ud83c\udcb6', '\ud83c\udcb7', '\ud83c\udcb8', '\ud83c\udcb9', '\ud83c\udcba', '\ud83c\udcbb', '\ud83c\udcbd', '\ud83c\udcbe',] ['\ud83c\udcc1', '\ud83c\udcc2', '\ud83c\udcc3', '\ud83c\udcc4', '\ud83c\udcc5', '\ud83c\udcc6', '\ud83c\udcc7', '\ud83c\udcc8', '\ud83c\udcc9', '\ud83c\udcca', '\ud83c\udccb', '\ud83c\udccd', '\ud83c\udcce',] ['\ud83c\udcd1', '\ud83c\udcd2', '\ud83c\udcd3', '\ud83c\udcd4', '\ud83c\udcd5', '\ud83c\udcd6', '\ud83c\udcd7', '\ud83c\udcd8', '\ud83c\udcd9', '\ud83c\udcda', '\ud83c\udcdb', '\ud83c\udcdd', '\ud83c\udcde']] 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)
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

だから、彼の各行を検討してください。



最初の行は、カードの「イメージ」で配列を初期化します。

 cards = [['\ud83c\udca1', '\ud83c\udca2', '\ud83c\udca3', '\ud83c\udca4', '\ud83c\udca5', '\ud83c\udca6', '\ud83c\udca7', '\ud83c\udca8', '\ud83c\udca9', '\ud83c\udcaa', '\ud83c\udcab', '\ud83c\udcad', '\ud83c\udcae',] ['\ud83c\udcb1', '\ud83c\udcb2', '\ud83c\udcb3', '\ud83c\udcb4', '\ud83c\udcb5', '\ud83c\udcb6', '\ud83c\udcb7', '\ud83c\udcb8', '\ud83c\udcb9', '\ud83c\udcba', '\ud83c\udcbb', '\ud83c\udcbd', '\ud83c\udcbe',] ['\ud83c\udcc1', '\ud83c\udcc2', '\ud83c\udcc3', '\ud83c\udcc4', '\ud83c\udcc5', '\ud83c\udcc6', '\ud83c\udcc7', '\ud83c\udcc8', '\ud83c\udcc9', '\ud83c\udcca', '\ud83c\udccb', '\ud83c\udccd', '\ud83c\udcce',] ['\ud83c\udcd1', '\ud83c\udcd2', '\ud83c\udcd3', '\ud83c\udcd4', '\ud83c\udcd5', '\ud83c\udcd6', '\ud83c\udcd7', '\ud83c\udcd8', '\ud83c\udcd9', '\ud83c\udcda', '\ud83c\udcdb', '\ud83c\udcdd', '\ud83c\udcde']]
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

2行目では、マップを持つ配列が初期化され、各マップは3つの要素（マップイメージの座標とそのコスト）を持つ配列を表します。 同時に、個別に処理されるため、エースに対してfalseが格納されます。

 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] ]
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

3行目では、さらにアクションを実行すると最初の配列が破損するため、マップ配列が別の配列にコピーされます。

 sdeck=JSON.parse JSON.stringify deck
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

4行目と5行目は、デッキを混合する機能を宣言しています。

 shuffle = !-> for x,i in deck when (x=Math.floor(Math.random() * (i + 1));true) [deck[i],deck[x]] = [deck[x],deck[i]]
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

6行目は、長いdocument.getElementByIdを置き換える短い関数を宣言しています。

 gid=(id) -> document.getElementById(id)
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

7行目は、プレーヤーとディーラーのカードセット、ベットのサイズ、プレーヤーのお金の量、現在の詐欺、プレーヤーとディーラーのカードの入ったコンテナ、メッセージを表示する場所へのリンクを通知します。

 window.mca=mc=[];window.dca=dc=[];defbet=gid("defbet");m=gid("money");bet=gid("bet");mch=gid("mcards");dch=gid("dcards");l=gid("log")
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

8行目。 ディーラーにカードを追加する機能。

 tod = !-> dc.push (c=deck.pop!); dch.innerHTML+=cards[c[0]][c[1]]
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

9行目。 メッセージ出力機能。

 log = (msg)!-> l.innerHTML=msg
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

10行目では、プレーヤーにカードを追加する機能が宣言され、グローバルスコープに配置されます。

 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)
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

11〜12行。 新しいconのリセット機能。 ディーラーとプレイヤーはカードを受け取り、新しいデッキを作成してミックスし、メッセージボックスをクリアします。

 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!
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

13〜19行。 金額を計算する機能。 すべてのカードを要約し、エースの数を数え、最後にそれらを数え、21以内に保とうとします。

 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
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

20ライン。 賭け、十分なお金があることを確認してください。

 betbet = -> if +m.innerHTML<+defbet.value then log "    !"; false else bet.innerHTML=+defbet.value;m.innerHTML-=+defbet.value;true
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

21行目。 入札単価を2倍にします。

 window.dub = !-> if +m.innerHTML<+bet.innerHTML then log "    !" else m.innerHTML-=+bet.innerHTML;bet.innerHTML*=2;tom!
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

22行。 最初のカードを配ります。

 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)
      
      

        
        
        
      

    
        
        
        
      
      

        
        
        
      

    
     

23-30。 十分なカードがある場合、ディーラーは自分のためにカードを収集し、その後ポイントが比較されます。

 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)