Eternal Blue Sky永遠の蒼い空: [網設]Black Jack ver.last

這個版本是CJ拿去交作業的版本...

和RC版做了幾個修正...

●Ace判定1或11完成

●電腦AI補強

●新洗牌功能錯亂問題解決

以下為展示:

21點~Black Jack~
莊家: 0
玩家: 0
玩家籌碼:	1000
0/52	↑輸入籌碼，按"下注"開始

程式碼部分:

var cards = new Array(52);//整疊牌組的存放
var player_cards =new Array(5); //玩家的手牌存放
var com_cards =new Array(5);//電腦莊家手牌存放
var player_waste =0;//玩家下注的籌碼(浪費錢的意思)
var player_sent=0;//玩家已發牌數
var com_sent=0;//電腦已發牌數
var card_sent=0;//總牌組已經發出的牌數
var chip=1000;//玩家初始籌瑪本金
var click_time=0;//給牌次數
var player_score=0;//玩家點數(要想辦法湊到21點的那個數值)
var com_score=0;//電腦點數(要比玩家大且盡量等於21的數值)
var cheat_window;//觀看牌堆的新視窗變數

for(var i=1;i<=52;i++)//這一段迴圈再把初始的牌組填值
 cards[i-1]=i;
shuffle(cards);//洗牌

function play2()//第二條遊戲函式，這就是電腦使用的
{
    give_card(com_sent,com_cards);//發牌給電腦
    show_dealer_card(com_sent,com_cards);//顯示調腦的牌至界面
    com_score=com_score+(card_point(com_cards[com_sent],com_score));//計算調腦得點
    document.getElementById("com_score").innerHTML=com_score;//顯示至界面
    com_sent++;
    click_time++; 
    document.getElementById("deck").innerHTML=card_sent+"/52";//刷新牌組已使用數至界面
    judge2(com_score,click_time);//判斷電腦是否得點爆，或是過五關
    com_judge();//判斷勝負和電腦是否繼續要排
}

function judge2(point,round)//判斷莊家是否爆或過五關
{
    if(point>21)
    {
        window.alert("莊家爆了!!!");    
    }
    else if((point<=21)&&(round==5))
    {
        window.alert("莊家過五關!!!");
    }
}

function show_dealer_card(order,who)//把電腦牌更新顯示至界面
{
    var slot;
    switch(order)
    {
        case 0:
            slot=document.getElementById("ch0");
            break;
        case 1:
            slot=document.getElementById("ch1");
            break;
        case 2:
            slot=document.getElementById("ch2");
            break;
        case 3:
            slot=document.getElementById("ch3");
            break;
        case 4:
            slot=document.getElementById("ch4");
            break;
    } 
    slot.innerHTML="<img src=\""+who[order]+".png\"/>";
}

function give_card(order,who)//給牌 引數為 第幾張手牌 與 對象
{
    who[order]=cards[card_sent];
    card_sent++;
}

function show_all(pokers)//顯示所有牌組(不過後來沒用到…)
{
 for(var i=0;i<52;i++)
 document.write("<img src=\""+pokers[i]+".png\"/>");
}

function quick_suffle()//按新洗牌會執行的函式
{
    shuffle_small(cards,card_sent);
    
}

function shuffle_small(pokers,order)//執行未發出牌的洗牌函式
{
    var x;
    var temp;
    for(var i=order;i<52;i++)
    {
        x=Math.floor(Math.random()*(52-order-1)+order);
  temp=pokers[i];
  pokers[i]=pokers[x];
  pokers[x]=temp;
    }
}

function shuffle(pokers)//全部牌組洗牌函式
{
 var x;
 var temp;
 for(var i=0;i<52;i++)
 {
  x=Math.floor(Math.random()*52);
  temp=pokers[i];
  pokers[i]=pokers[x];
  pokers[x]=temp;
 }
}

function reset_small()//重置單局的函式
{
    player_sent=0;
    com_sent=0;
    click_time=0;
    player_waste=0;
    player_score=0;
    com_score=0;
    document.getElementById("ch0").innerHTML="<img src=\"NA.png\"/>";
    document.getElementById("ch1").innerHTML="<img src=\"NA.png\"/>";
    document.getElementById("ch2").innerHTML="<img src=\"NA.png\"/>";
    document.getElementById("ch3").innerHTML="<img src=\"NA.png\"/>";
    document.getElementById("ch4").innerHTML="<img src=\"NA.png\"/>";
    document.getElementById("ph0").innerHTML="<img src=\"NA.png\"/>";
    document.getElementById("ph1").innerHTML="<img src=\"NA.png\"/>";
    document.getElementById("ph2").innerHTML="<img src=\"NA.png\"/>";
    document.getElementById("ph3").innerHTML="<img src=\"NA.png\"/>";
    document.getElementById("ph4").innerHTML="<img src=\"NA.png\"/>";
    document.getElementById("bet").disabled=false;
    document.getElementById("pass").disabled=true;
    document.getElementById("send").disabled=true;
    document.getElementById("com_score").innerHTML="0";
    document.getElementById("player_score").innerHTML="0";
    document.getElementById("status").innerHTML="↑輸入籌碼，按\"下注\"開始";
}

function reset_big()//按下新遊戲，重置”所有所有””數據的函式
{
    reset_small();
    chip=1000;
    document.getElementById("chip").innerHTML="1000";
    shuffle(cards);
    card_sent=0;
    document.getElementById("deck").innerHTML="0/52";
}

function check_deck(deckused)//檢查牌組剩餘量函式
{
    if(deckused>42)
    {
        window.alert("剩餘牌數不足，自動重新開局");
        reset_small();
        card_sent=0;
        document.getElementById("deck").innerHTML="0/52";
        shuffle(cards);
    }
}

function open_cheat()//開啟檢視牌堆的函式
{
    cheat_window=window.open();
    cheat_window.document.write("<center><table border=1>");
    for(var i=0;i<52;i++)
 {
     if(i==0||i==13||i==26||i==39)
     cheat_window.document.write("<tr>");
     cheat_window.document.write("<td>"+(i+1)+"<br/><img src=\""+cards[i]+".png\"/></td>");
     if(i==12||i==25||i==38)
     cheat_window.document.write("</tr>");
     
 }
 cheat_window.document.write("</table></center>");
}
</script>
<br/><center>
<table border=0>
<tr><th colspan=6>21點~Black Jack~</th></tr>
<tr> <td>莊家:<div id="com_score">0</div></td>
 <td><div id=ch0><img src="NA.png"/></div></td> 
<td><div id=ch1><img src="NA.png"/></div></td>
 <td><div id=ch2><img src="NA.png"/></div></td>
 <td><div id=ch3><img src="NA.png"/></div></td>
 <td><div id=ch4><img src="NA.png"/></div></td>
</tr>
<tr><td>玩家:<div id="player_score">0</div></td>
 <td><div id=ph0><img src="NA.png"/></div></td>
 <td><div id=ph1><img src="NA.png"/></div></td>
 <td><div id=ph2><img src="NA.png"/></div></td>
 <td><div id=ph3><img src="NA.png"/></div></td>
 <td><div id=ph4><img src="NA.png"/></div></td>
</tr>
<tr>
 <td>玩家籌碼:</td>
 <td><div id="chip" >1000</div></td>
 <td><input id="waste" type="text" size="8" style="direction:rtl"value="0"/>
 <td colspan=3>
  <input id="bet" type="button" value="下注" onclick="bet()"/>
  <input id="send"type="button" value="發牌"disabled="disabled"onclick="play1()"/>
  <input id="pass" type="button" value="過"disabled="disabled" onclick="player_pass()"/>
  <input id="restart"type="button" value="新局" onclick="reset_small()"/>
  <input type="button" value="新遊戲" onclick="reset_big()"/>
  <input type="button" value="新洗牌" onclick="quick_suffle()"/>
 <td/>
</tr>
<tr><td><div id="deck">0/52</div></td>
    <td colspan=4><div id="status" align="center">↑輸入籌碼，按"下注"開始</div></td>
    <td align="right"><input type="button" value="觀看牌堆"onclick="open_cheat()"/></td>
</tr>
</table></center>

這篇文章發的有點晚...
作業交出去就忘了發完整版上來XD
有機會的話再加入一些比較正統的規則到這個程式裡面好了XD

那麼，下次...

以上 by CJ