Cara Membuat Game Poker Sederhana

Dikirim Oleh: Unknown on Jumat, 09 Maret 2012

Ketemu lagi dengan kami di blog ini. Setelah ada kesempatan, akhirnya penulis bisa posting lagi  ^_^

Siapa sih yang gak tahu game ini? Yups, game poker kian menjamur saat ini. Masalahnya, apakah kita bisa bermain poker tanpa harus terkoneksi internet atau bagaimana caranya membuat game ini? Ha ha ha,... Langsung aja ke TKP,.........

Buka notepad anda dan ketikkan kode berikut!


:<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="content-type" content="text/html; charset=utf-8" />

<style type="text/css">
a{text-decoration:none} a:hover{color:red}
.txtblu{color=blue;} .txtblk{color=black;} .txtwht{color=white;}
.bgwht{background=white;} .bgblk{background=black;} .bgred{background=red;}
</style>

<SCRIPT LANGUAGE="JavaScript">

<!-- Begin
var deck=new Array; var hand=new Array(5); var hcrd=new Array(5); var hsut=new Array(5);
var isPlaying=-1; var betn=1; var dpos=0; var crdts;
/* ----------------------------------------------------------------------------------------- */
function initdeck(){
crd=0;
for(i=0;i<4;i++){
if(i==0){st="club";} else if(i==1){st="heart";} else if(i==2){st="diamond";}else{st="spade";}
for(c=1;c<14;c++){
if(c==1){num="ace";}else if(c==11){num="jack";}
else if(c==12){num="queen";}else if(c==13){num="king";}else{num=c;}
deck[crd++]=st+"|"+num;
} //for c
} //for i
}
function Bet(num){
if(isPlaying<0){
crdts=document.all.crd.innerText * 1;
if(num==5){
if(crdts>=5){betn=5;}
else{betn=crdts;}
}else{betn=betn+num;}
if((betn>5)||(betn>crdts)){betn=1;}
document.all.pbet.innerText=betn;
document.all.col1.className="txtblk";document.all.col2.className="txtblk"; document.all.col3.className="txtblk";
document.all.col4.className="txtblk"; document.all.col5.className="txtblk";
document.all.col11.className="txtblk";document.all.col21.className="txtblk";document.all.col31.className="txtblk";
document.all.col41.className="txtblk";document.all.col51.className="txtblk";
document.all.col12.className="txtwht";document.all.col22.className="txtwht";document.all.col32.className="txtwht";
document.all.col42.className="txtwht";document.all.col52.className="txtwht";
document.all.col13.className="txtblk";document.all.col23.className="txtblk";document.all.col33.className="txtblk";
document.all.col43.className="txtblk";document.all.col53.className="txtblk";
document.all.col14.className="txtwht";document.all.col24.className="txtwht";document.all.col34.className="txtwht";
document.all.col44.className="txtwht";document.all.col54.className="txtwht";
document.all.col15.className="txtblk";document.all.col25.className="txtblk";document.all.col35.className="txtblk";
document.all.col45.className="txtblk";document.all.col55.className="txtblk";
document.all.col16.className="txtwht";document.all.col26.className="txtwht";document.all.col36.className="txtwht";
document.all.col46.className="txtwht";document.all.col56.className="txtwht";
document.all.col17.className="txtblk";document.all.col27.className="txtblk";document.all.col37.className="txtblk";
document.all.col47.className="txtblk";document.all.col57.className="txtblk";
document.all.col18.className="txtwht";document.all.col28.className="txtwht";document.all.col38.className="txtwht";
document.all.col48.className="txtwht";document.all.col58.className="txtwht";
document.all.col19.className="txtblk";document.all.col29.className="txtblk";document.all.col39.className="txtblk";
document.all.col49.className="txtblk";document.all.col59.className="txtblk";
if(betn==1){document.all.col1.className="txtblu";
document.all.col11.className="txtblu";document.all.col12.className="txtblu";document.all.col13.className="txtblu";
document.all.col14.className="txtblu";document.all.col15.className="txtblu";document.all.col16.className="txtblu";
document.all.col17.className="txtblu";document.all.col18.className="txtblu";document.all.col19.className="txtblu";
}else if(betn==2){document.all.col2.className="txtblu";
document.all.col21.className="txtblu";document.all.col22.className="txtblu";document.all.col23.className="txtblu";
document.all.col24.className="txtblu";document.all.col25.className="txtblu";document.all.col26.className="txtblu";
document.all.col27.className="txtblu";document.all.col28.className="txtblu";document.all.col29.className="txtblu";
}else if(betn==3){document.all.col3.className="txtblu";
document.all.col31.className="txtblu";document.all.col32.className="txtblu";document.all.col33.className="txtblu";
document.all.col34.className="txtblu";document.all.col35.className="txtblu";document.all.col36.className="txtblu";
document.all.col37.className="txtblu";document.all.col38.className="txtblu";document.all.col39.className="txtblu";
}else if(betn==4){document.all.col4.className="txtblu";
document.all.col41.className="txtblu";document.all.col42.className="txtblu";document.all.col43.className="txtblu";
document.all.col44.className="txtblu";document.all.col45.className="txtblu";document.all.col46.className="txtblu";
document.all.col47.className="txtblu";document.all.col48.className="txtblu";document.all.col49.className="txtblu";
}else {document.all.col5.className="txtblu";
document.all.col51.className="txtblu";document.all.col52.className="txtblu";document.all.col53.className="txtblu";
document.all.col54.className="txtblu";document.all.col55.className="txtblu";document.all.col56.className="txtblu";
document.all.col57.className="txtblu";document.all.col58.className="txtblu";document.all.col59.className="txtblu";
}
}
}
function evalhand(num){
isFlush=-1; isStrt=1; isTrips=-1; isFours=-1; Pair=-1; Pair2=-1; isFull=-1;
mtch1=0;mtch2=0;mtch3=0;mtch4=0;mtch5=0;
document.all.row1.className="bgwht";document.all.row3.className="bgwht";document.all.row5.className="bgwht";
document.all.row2.className="bgblk";document.all.row4.className="bgblk";document.all.row6.className="bgblk";
document.all.row7.className="bgwht";document.all.row8.className="bgblk";document.all.row9.className="bgwht";
document.drwcrd.hold1.checked = false; document.drwcrd.hold2.checked = false;
document.drwcrd.hold3.checked = false; document.drwcrd.hold4.checked = false;
document.drwcrd.hold5.checked = false;
for(i=0;i<5;i++){
p = hand[i].indexOf("|");
s = hand[i].substring(0,p);
c = hand[i].substring(p+1,hand[i].length);
hcrd[i]=c; hsut[i]=s;
if(hcrd[i]=="ace"){hcrd[i]=14;} else if(hcrd[i]=="jack"){hcrd[i]=11;} else if(hcrd[i]=="queen"){hcrd[i]=12;}
else if(hcrd[i]=="king"){hcrd[i]=13;} else {hcrd[i]=hcrd[i]*1;}
}
for(i=4;i>=0;i--){ // bubble sort
for(j=0;j<4;j++){
if(hcrd[j]>=hcrd[j+1]){
tmp=hcrd[j]; tmp2=hsut[j];
hcrd[j]=hcrd[j+1]; hsut[j]=hsut[j+1];
hcrd[j+1]=tmp; hsut[j+1]=tmp2;
}
}
}
for(i=4;i>0;i--){ if(hcrd[i]!=hcrd[0]+i){isStrt=-1;} }
if((hcrd[0]==2)&&(hcrd[1]==3)&&(hcrd[2]==4)&&(hcrd[3]==5)&&(hcrd[4]==14)){isStrt=1;}
if((hsut[0]==hsut[1])&&(hsut[0]==hsut[2])&&(hsut[0]==hsut[3])&&(hsut[0]==hsut[4])){isFlush=1;}
if((isStrt<0)&&(isFlush<0)){
mtch1=0;
for(i=0;i<5;i++){ if(i!=0){if(hcrd[0]==hcrd[i]){mtch1++;}}}
mtch2=0;
for(i=0;i<5;i++){ if(i!=1){if(hcrd[1]==hcrd[i]){mtch2++;}}}
mtch3=0;
for(i=0;i<5;i++){ if(i!=2){if(hcrd[2]==hcrd[i]){mtch3++;}}}
mtch4=0;
for(i=0;i<5;i++){ if(i!=3){if(hcrd[3]==hcrd[i]){mtch4++;}}}
mtch5=0;
for(i=0;i<5;i++){ if(i!=4){if(hcrd[4]==hcrd[i]){mtch5++;}}}
if((mtch1==3)||(mtch2==3)||(mtch3==3)||(mtch4==3)||(mtch5==3)){isFours=1;}
if((mtch1==2)||(mtch2==2)||(mtch3==2)||(mtch4==2)||(mtch5==2)){isTrips=1;}
if((mtch1+mtch2+mtch3+mtch4+mtch5)==8){isFull=1; isTrips=-1;}
if((mtch1+mtch2+mtch3+mtch4+mtch5)==4){Pair2=1;}
if((mtch1+mtch2+mtch3+mtch4+mtch5)==2){
cval=0;
if(mtch1==1){cval=hcrd[0];} if(mtch2==1){cval=hcrd[1];}
if(mtch3==1){cval=hcrd[2];} if(mtch4==1){cval=hcrd[3];}
if(cval>=10){Pair=1;}
}
} //end if(isStrt && isFlush)
tmp=0;
if(isFlush>0){tmp=5;}
if(isStrt>0){tmp=6;}
if((isFlush>0)&&(isStrt>0)){
if(hcrd[0]==10){tmp=1;}
else{tmp=2;}
}
if(isFull>0){tmp=4}
if(isFours>0){tmp=3;}
if(isTrips>0){tmp=7;}
if(Pair2>0){tmp=8;}
if(Pair>0){tmp=9;}
if(tmp==1){document.all.row1.className="bgred";} if(tmp==2){document.all.row2.className="bgred";}
if(tmp==3){document.all.row3.className="bgred";} if(tmp==4){document.all.row4.className="bgred";}
if(tmp==5){document.all.row5.className="bgred";} if(tmp==6){document.all.row6.className="bgred";}
if(tmp==7){document.all.row7.className="bgred";} if(tmp==8){document.all.row8.className="bgred";}
if(tmp==9){document.all.row9.className="bgred";}
if(num>0){endgame(tmp);}
}
/* ----------------------------------------------------------------------------------------- */
function showcard(cnum){
p = hand[cnum].indexOf("|");
s = hand[cnum].substring(0,p);
c = hand[cnum].substring(p+1,hand[cnum].length);
if(cnum==0){document.images.card1.src="http://javascript.internet.com/img/video-poker/"+s+c+".gif";}
else if(cnum==1){document.images.card2.src="http://javascript.internet.com/img/video-poker/"+s+c+".gif";}
else if(cnum==2){document.images.card3.src="http://javascript.internet.com/img/video-poker/"+s+c+".gif";}
else if(cnum==3){document.images.card4.src="http://javascript.internet.com/img/video-poker/"+s+c+".gif";}
else{document.images.card5.src="http://javascript.internet.com/img/video-poker/"+s+c+".gif";}
}
function deal(){
if(isPlaying < 0){ // new game
dpos = 0; isPlaying=1;
crdts=document.all.crd.innerText * 1;
crdts=crdts-betn;
document.all.crd.innerText = crdts;
for(i=0;i<500;i++){ //shuffle the cards(mix up the deck)
tmp = Math.round(Math.random()*51); tmp2= Math.round(Math.random()*51);
stmp = deck[tmp]; deck[tmp] = deck[tmp2]; deck[tmp2] = stmp;
}
//deck[0]="diamond|ace"; deck[1]="spade|ace"; deck[2]="heart|ace"; deck[3]="club|ace"; deck[4]="club|4";
for(i=0;i<5;i++){hand[i]=deck[dpos++];showcard(i);}
evalhand(-1);
document.all.msgs.innerText="Choose which cards to hold & hit 'Deal'";
}else{ // draw
if(!document.drwcrd.hold1.checked){hand[0]=deck[dpos++];showcard(0);}
if(!document.drwcrd.hold2.checked){hand[1]=deck[dpos++];showcard(1);}
if(!document.drwcrd.hold3.checked){hand[2]=deck[dpos++];showcard(2);}
if(!document.drwcrd.hold4.checked){hand[3]=deck[dpos++];showcard(3);}
if(!document.drwcrd.hold5.checked){hand[4]=deck[dpos++];showcard(4);}
evalhand(1);
}
}
function endgame(hndval){
isPlaying=-1;
if (hndval==0){ win=0; msg="Losing Hand.";}
else if(hndval==9){ win=betn; msg="Pair of 10's or better";}
else if(hndval==8){ win=2*betn; msg="Two Pairs";}
else if(hndval==7){ win=3*betn; msg="Three of a Kind";}
else if(hndval==6){ win=4*betn; msg="Straight";}
else if(hndval==5){ win=5*betn; msg="Flush";}
else if(hndval==4){ win=6*betn; msg="Full House";}
else if(hndval==3){ win=8*betn; msg="Four of a Kind";}
else if(hndval==2){ win=10*betn; msg="Straight Flush";}
else if(hndval==1){ win=50*betn; msg="Royal Straight Flush"; }
crdts=crdts+win;
document.all.msgs.innerText=msg;
if(crdts==0){
alert("You are what we call Broke.");
alert("Here's a loan so you can lose some more...");
crdts=50;
}
document.all.crd.innerText = crdts;
betn=0;Bet(1);
}
function Clickit(num){
if(isPlaying>0){
if(num==1){document.drwcrd.hold1.checked=!document.drwcrd.hold1.checked;}
if(num==2){document.drwcrd.hold2.checked=!document.drwcrd.hold2.checked;}
if(num==3){document.drwcrd.hold3.checked=!document.drwcrd.hold3.checked;}
if(num==4){document.drwcrd.hold4.checked=!document.drwcrd.hold4.checked;}
if(num==5){document.drwcrd.hold5.checked=!document.drwcrd.hold5.checked;}
}
}
function quit(){window.close();}
/* ----------------------------------------------------------------------------------------- */
initdeck();
// End -->
</script>

</HEAD>

<!-- STEP TWO: Insert the onLoad event handler into your BODY tag -->

<BODY link=blue vlink=blue text=black>

<!-- STEP THREE: Copy this code into the BODY of your HTML document -->

<table align=center border=1>
<tr bgcolor="#FFFFD0">
<td colspan=5>
<table align=center border=0 cellpadding=2 cellspacing=0 width=95%>
<tr bgcolor="#FFFFD0">
<td valign=bottom align=center>Hand</td>
<td align=center id="col1" class="txtblu">Bet<br>1</td>
<td align=center id="col2" class="txtblk">Bet<br>2</td>
<td align=center id="col3" class="txtblk">Bet<br>3</td>
<td align=center id="col4" class="txtblk">Bet<br>4</td>
<td align=center id="col5" class="txtblk">Bet<br>5</td>
</tr><tr id="row1" class="bgwht">
<td>Royal Straight Flush</td>
<td align=center id="col11" class="txtblu">50</td>
<td align=center id="col21" class="txtblk">100</td>
<td align=center id="col31" class="txtblk">150</td>
<td align=center id="col41" class="txtblk">200</td>
<td align=center id="col51" class="txtblk">250</td>
</tr><tr id="row2" class="bgblk">
<td><font color=white>Straight Flush</font></td>
<td align=center id="col12" class="txtblu">10</td>
<td align=center id="col22" class="txtwht">20</td>
<td align=center id="col32" class="txtwht">30</td>
<td align=center id="col42" class="txtwht">40</td>
<td align=center id="col52" class="txtwht">50</td>
</tr><tr id="row3" class="bgwht">
<td>4 of a Kind</td>
<td align=center id="col13" class="txtblu">8</td>
<td align=center id="col23" class="txtblk">16</td>
<td align=center id="col33" class="txtblk">24</td>
<td align=center id="col43" class="txtblk">32</td>
<td align=center id="col53" class="txtblk">40</td>
</tr><tr id="row4" class="bgblk">
<td><font color=white>Full House</font></td>
<td align=center id="col14" class="txtblu">6</td>
<td align=center id="col24" class="txtwht">12</td>
<td align=center id="col34" class="txtwht">18</td>
<td align=center id="col44" class="txtwht">24</td>
<td align=center id="col54" class="txtwht">30</td>
</tr><tr id="row5" class="bgwht">
<td>Flush</td>
<td align=center id="col15" class="txtblu">5</td>
<td align=center id="col25" class="txtblk">10</td>
<td align=center id="col35" class="txtblk">15</td>
<td align=center id="col45" class="txtblk">20</td>
<td align=center id="col55" class="txtblk">25</td>
</tr><tr id="row6" class="bgblk">
<td><font color=white>Straight</font></td>
<td align=center id="col16" class="txtblu">4</td>
<td align=center id="col26" class="txtwht">8</td>
<td align=center id="col36" class="txtwht">12</td>
<td align=center id="col46" class="txtwht">16</td>
<td align=center id="col56" class="txtwht">20</td>
</tr><tr id="row7" class="bgwht">
<td>3 of a Kind</td>
<td align=center id="col17" class="txtblu">3</td>
<td align=center id="col27" class="txtblk">6</td>
<td align=center id="col37" class="txtblk">9</td>
<td align=center id="col47" class="txtblk">12</td>
<td align=center id="col57" class="txtblk">15</td>
</tr><tr id="row8" class="bgblk">
<td><font color=white>2 Pair</font></td>
<td align=center id="col18" class="txtblu">2</td>
<td align=center id="col28" class="txtwht">4</td>
<td align=center id="col38" class="txtwht">6</td>
<td align=center id="col48" class="txtwht">8</td>
<td align=center id="col58" class="txtwht">10</td>
</tr><tr id="row9" class="bgwht">
<td>Pair 10's +</td>
<td align=center id="col19" class="txtblu">1</td>
<td align=center id="col29" class="txtblk">2</td>
<td align=center id="col39" class="txtblk">3</td>
<td align=center id="col49" class="txtblk">4</td>
<td align=center id="col59" class="txtblk">5</td>
</tr><tr><td colspan=5 height=10></td>
</tr>
</table>
</td>
</tr><tr><form name="drwcrd">
<td width=80 align=center bgcolor="#FFF000"><img name="card1" src="http://javascript.internet.com/img/video-poker/cardback.gif" border=0 onClick="Clickit(1);"><br><input type=checkbox name="hold1"><b>Hold</b></td>
<td width=80 align=center bgcolor="#FFF000"><img name="card2" src="http://javascript.internet.com/img/video-poker/cardback.gif" border=0 onClick="Clickit(2);"><br><input type=checkbox name="hold2"><b>Hold</b></td>
<td width=80 align=center bgcolor="#FFF000"><img name="card3" src="http://javascript.internet.com/img/video-poker/cardback.gif" border=0 onClick="Clickit(3);"><br><input type=checkbox name="hold3"><b>Hold</b></td>
<td width=80 align=center bgcolor="#FFF000"><img name="card4" src="http://javascript.internet.com/img/video-poker/cardback.gif" border=0 onClick="Clickit(4);"><br><input type=checkbox name="hold4"><b>Hold</b></td>
<td width=80 align=center bgcolor="#FFF000"><img name="card5" src="http://javascript.internet.com/img/video-poker/cardback.gif" border=0 onClick="Clickit(5);"><br><input type=checkbox name="hold5"><b>Hold</b></td>
</tr><tr></form>
<td colspan=5 align=center bgcolor="#FFFFD0"><div id="msgs"><b>Hit 'DEAL' to begin</b></div></td>
</tr><tr>
<td width=80 align=center bgcolor="#FFFFD0"><a href="javascript:Bet(1);"><b>BET:</b></a> <div id="pbet">1<div></td>
<td width=80 align=center bgcolor="#FFFFD0"><a href="javascript:Bet(5);"><b>MAX BET</b></a><br>(5)</td>
<td width=80 align=center bgcolor="#FFFFD0"><a href="javascript:deal();"><b>DEAL</b></a></td>
<td width=80 align=center bgcolor="#FFFFD0"><a href="javascript:quit();"><b>CASH</b><br><b>OUT</b></a></td>
<td width=80 align=center bgcolor="#FFFFD0"><b>Credits:</b><div id="crd">100</div></td>
</tr>
<table>
</body>
</html>

Kemudian save dengan format save as pilih all format pilih HTML. Misalnya disini disave dangan nama poker_game.html . Close. Sekarang buka program tersebut dan lihat hasilnya ^_^

Selamat mencoba,.... :-D

Info Page Load Timer

Share on :


Related Post:

Anda sedang membaca artikel tentang Cara Membuat Game Poker Sederhana dan anda bisa menemukan artikel Cara Membuat Game Poker Sederhana ini dengan url http://info-aktual-komputer.blogspot.com/2012/03/cara-membuat-game-poker-sederhana.html, anda boleh menyebar luaskannya jika artikel Cara Membuat Game Poker Sederhana ini sangat bermanfaat bagi teman-teman anda, namun jangan lupa untuk meletakkan link Cara Membuat Game Poker Sederhana ini dan mengganti bahasa, dan judul dari artikel ini.

{ 0 komentar... read them below or add one }

Posting Komentar