資源簡介
52張牌 1張鬼牌
洗牌後平均發(fā)給4位玩家
手中有一對的牌即可消除
順或逆時鐘方向抽下家一張牌
直至有人手牌歸零即為勝者
洗牌
int i, put; for (i = 0; i < 53; i ) // 牌庫歸零 card[i] = 0; // 從梅花A開始隨機(jī)放入牌庫 for (i = 11; i <= 141;) { put = rd.Next(53); if (card[put] == 0) { card[put] = i; switch (i % 10) { case 1: case 2: case 3: i ; break; case 4: i = 7; break; } } } // 玩家手牌歸零 for (i = 0; i < 14; i ) { p1[i] = 0; p2[i] = 0; p3[i] = 0; p4[i] = 0; }發(fā)牌
clkwide = rd.Next(2); // 順逆時針 if (clkwide == 0) { chk2 = true; chk4 = false; } else { chk4 = true; chk2 = false; } startP = rd.Next(1, 5); // 發(fā)牌起始點 string way = ""; if (clkwide == 0) way = "順時針"; else way = "逆時針"; MessageBox.Show("命運決定從 " startP.ToString() " 號玩家" way "開始"); int i, j; actnow = startP; // i控制牌庫位置 j控制玩家手牌位置 for (i = 0, j = 0; i < 53;) { // 順時針發(fā)牌,else為逆時針 if (clkwide == 0) { switch (actnow) { case 1: p1[j] = card[i]; actnow ; i ; if (i % 4 == 0) j ; break; case 2: p2[j] = card[i]; i ; actnow ; if (i % 4 == 0) j ; break; case 3: p3[j] = card[i]; i ; actnow ; if (i % 4 == 0) j ; break; case 4: p4[j] = card[i]; i ; actnow = 1; if (i % 4 == 0) j ; break; } } else { switch (actnow) { case 1: p1[j] = card[i]; actnow = 4; i ; if (i % 4 == 0) j ; break; case 2: p2[j] = card[i]; i ; actnow--; if (i % 4 == 0) j ; break; case 3: p3[j] = card[i]; i ; actnow--; if (i % 4 == 0) j ; break; case 4: p4[j] = card[i]; i ; actnow--; if (i % 4 == 0) j ; break; } } }
代碼片段和文件信息
using?System;
using?System.Collections.Generic;
using?System.ComponentModel;
using?System.Data;
using?System.Drawing;
using?System.Linq;
using?System.Text;
using?System.Threading.Tasks;
using?System.Windows.Forms;
namespace?GetJoker
{
????public?partial?class?GetJoker?:?Form
????{
????????public?GetJoker()
????????{
????????????InitializeComponent();
????????}
????????int[]?card?=?new?int[53];
????????int[]?p1?=?new?int[14];
????????int[]?p2?=?new?int[14];
????????int[]?p3?=?new?int[14];
????????int[]?p4?=?new?int[14];
????????Button[]?p1card?=?new?Button[14];
????????Button[]?p2card?=?new?Button[14];
????????Button[]?p3card?=?new?Button[14];
????????Button[]?p4card?=?new?Button[14];
????????Random?rd?=?new?Random();
????????int?startP?clkwide?actnow;
??
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
????..A..H.?????26624??2018-07-10?15:28??GetJoker\.vs\GetJoker\v15\.suo
?????文件??????????0??2018-07-10?13:53??GetJoker\.vs\GetJoker\v15\Server\sqlite3\db.lock
?????文件?????602112??2018-07-10?14:43??GetJoker\.vs\GetJoker\v15\Server\sqlite3\storage.ide
?????文件??????32768??2018-07-10?13:53??GetJoker\.vs\GetJoker\v15\Server\sqlite3\storage.ide-shm
?????文件????4124152??2018-07-10?15:28??GetJoker\.vs\GetJoker\v15\Server\sqlite3\storage.ide-wal
?????文件????????189??2018-07-10?13:53??GetJoker\GetJoker\App.config
?????文件??????36220??2009-03-10?03:02??GetJoker\GetJoker\bin\Debug\101.jpg
?????文件??????35851??2009-03-10?03:13??GetJoker\GetJoker\bin\Debug\102.jpg
?????文件??????37478??2009-03-10?03:08??GetJoker\GetJoker\bin\Debug\103.jpg
?????文件??????35047??2009-03-10?03:10??GetJoker\GetJoker\bin\Debug\104.jpg
?????文件??????26642??2009-03-10?03:01??GetJoker\GetJoker\bin\Debug\11.jpg
?????文件??????42234??2009-03-10?03:00??GetJoker\GetJoker\bin\Debug\111.jpg
?????文件??????42978??2009-03-10?03:13??GetJoker\GetJoker\bin\Debug\112.jpg
?????文件??????44147??2009-03-10?03:05??GetJoker\GetJoker\bin\Debug\113.jpg
?????文件??????43042??2009-03-10?03:11??GetJoker\GetJoker\bin\Debug\114.jpg
?????文件??????26832??2009-03-10?03:13??GetJoker\GetJoker\bin\Debug\12.jpg
?????文件??????45499??2009-03-10?02:59??GetJoker\GetJoker\bin\Debug\121.jpg
?????文件??????45890??2009-03-10?03:13??GetJoker\GetJoker\bin\Debug\122.jpg
?????文件??????45801??2009-03-10?03:05??GetJoker\GetJoker\bin\Debug\123.jpg
?????文件??????45321??2009-03-10?03:11??GetJoker\GetJoker\bin\Debug\124.jpg
?????文件??????27362??2009-03-10?03:05??GetJoker\GetJoker\bin\Debug\13.jpg
?????文件??????41754??2009-03-10?03:00??GetJoker\GetJoker\bin\Debug\131.jpg
?????文件??????44088??2009-03-10?03:13??GetJoker\GetJoker\bin\Debug\132.jpg
?????文件??????44583??2009-03-10?03:05??GetJoker\GetJoker\bin\Debug\133.jpg
?????文件??????37029??2009-03-10?03:11??GetJoker\GetJoker\bin\Debug\134.jpg
?????文件??????30525??2009-03-10?03:10??GetJoker\GetJoker\bin\Debug\14.jpg
?????文件??????39504??2009-03-10?03:12??GetJoker\GetJoker\bin\Debug\141.jpg
?????文件??????27669??2009-03-10?03:04??GetJoker\GetJoker\bin\Debug\21.jpg
?????文件??????27648??2009-03-10?03:12??GetJoker\GetJoker\bin\Debug\22.jpg
?????文件??????28630??2009-03-10?03:07??GetJoker\GetJoker\bin\Debug\23.jpg
............此處省略74個文件信息
評論
共有 條評論