清單 1.簡單的擲骰器
許多游戲和游戲系統都需要骰子。讓我們先從簡單的部分入手:擲一個六面骰子。實際上,滾動一個六面骰子就是從 1 到 6 之間選擇一個隨機數字。在 PHP 中,這十分簡單:echo rand(1,6);。
在許多情況下,這基本上很簡單。但是在處理機率游戲時,我們需要一些更好的實現。PHP 提供了更好的隨機數字生成器:mt_rand()。在不深入研究兩者差別的情況下,可以認為 mt_rand 是一個更快、更好的隨機數字生成器:echo mt_rand(1,6);。如果把該隨機數字生成器放入函數中,則效果會更好。
清單 1. 使用 mt_rand() 隨機數字生成器函數
return mt_rand(1,6);
}
echo roll();
然后可以把需要滾動的骰子類型作為參數傳遞給函數。
清單 2. 將骰子類型作為參數傳遞
return mt_rand(1,$sides);
}
echo roll(6); // roll a six-sided die
echo roll(10); // roll a ten-sided die
echo roll(20); // roll a twenty-sided die
從這里開始,我們可以繼續根據需要一次滾動多個骰子,返回結果數組;也可以一次性滾動多個不同類型的骰子。但是大多數任務都可以使用這個簡單的腳本。
隨機名稱生成器
如果正在運行游戲、編寫故事或者一次性創建大批字符,有時會疲於應付不斷出現的新名字。讓我們看一看可用於解決此問題的一個簡單隨機名稱生成器。首先,讓我們創建兩個簡單數組 一個用於名字,一個用於姓氏。 清單 3. 名字和姓氏的兩個簡單數組
"William",
"Henry",
"Filbert",
"John",
"Pat",
);
$last = array(
"Smith",
"Jones",
"Winkler",
"Cooper",
"Cline",
);
然后就可以從每個數組中選擇一個隨機元素:echo $male[array_rand($male)] . ' ' . $last[array_rand($last)];。要一次性提取多個名稱,只需混合數組並根據需要提取。
清單 4. 混合名稱數組
shuffle($last);
for ($i = 0; $i = 3; $i++) {
echo $male[$i] . ' ' . $last[$i];
}
基於此基本概念,我們可以創建保存名字和姓氏的文本文件。如果在文本文件的每一行中存放一個名字,則可以輕松地用換行符分隔文件內容以構建源代碼數組。
清單 5. 創建名稱的文本文件
$last = explode('\n', file_get_contents('names.last.txt'));
構建或查找一些好的名字文件(代碼歸檔 中附帶了一些文件),此后我們絕不再需要為名字煩惱。
場景生成器
利用構建名字生成器使用的相同基本原理,我們可以構建場景生成器。此生成器不但在角色扮演游戲中十分有用,而且在需要用到偽隨機環境集合(可用於角色扮演、即興創作、寫作等情況)的情況下也十分有用。我最喜歡的游戲之一,Paranoia 在其 GM Pack 中包括了 任務混合器(mission blender)。任務混合器可用於在快速滾動骰子時整合完整任務。讓我們整合自己的場景生成器。
考慮以下場景:您醒來后發現自己迷失於叢林中。您知道自己必須趕去紐約,但是不知道原因。您可以聽到附近的狗叫聲及清晰的敵方搜尋者的聲音。您渾身發冷、不住顫抖,而且沒有武器。該場景中的每一句話都介紹場景的特定方面:您醒來后發現自己迷失於叢林中 這句話將建立設置。您知道自己必須趕去紐約 這句話將描述目標。您可以聽到狗叫聲 這句話將介紹敵人。您渾身發冷、不住顫抖,而且沒有武器 這句話將添加復雜度。
就像創建名字和姓氏的文本文件一樣,首先分別創建設置、目標、敵人和復雜度的文本文件。代碼歸檔中附帶了樣例文件。在擁有這些文件后,生成場景的代碼與生成名稱的代碼基本相同。
清單 6. 生成場景
$objectives = explode("\n", file_get_contents('scenario.objectives.txt'));
$antagonists = explode("\n", file_get_contents('scenario.antagonists.txt'));
$complicati**** = explode("\n", file_get_contents('scenario.complicati****.txt'));
shuffle($settings);
shuffle($objectives);
shuffle($antagonists);
shuffle($complicati****);
echo $settings[0] . ' ' . $objectives[0] . ' ' . $antagonists[0] . ' '
. $complicati****[0] . "br /\n";
我們可以通過添加新文本文件向場景中添加元素,也可能希望添加多重復雜度。添加到基本文本文件中的內容越多,場景隨時間的變化就越多。
牌組創建器(Deck builder)和裝備(shuffler)
如果您要玩紙牌並且要處理與紙牌相關的腳本,我們需要用裝備中的工具整合一副牌組構建器。首先,讓我們構建一副標准紙牌。需要構建兩個數組 一個用於保存同花色的組牌,而另一個用於保存牌面。如果稍后需要添加新組牌或牌類型,則這樣做將獲得很好的靈活性。
清單 7. 構建一副標准撲克牌
"Spades", "Hearts", "Clubs", "Diamonds"
);
$faces = array (
"Two", "Three", "Four", "Five", "Six", "Seven", "Eight",
"Nine", "Ten", "Jack", "Queen", "King", "Ace" );
然后構建一副牌數組來保存所有紙牌值。只需使用一對 foreach 循環即可完成此操作。
清單 8. 構建一副牌數組
foreach ($suits as $suit) {
foreach ($faces as $face) {
$deck[] = array ("face"=$face, "suit"=$suit);
}
}
在構建了一副撲克牌數組后,我們可以輕松地洗牌並隨機抽出一張牌。
清單 9. 洗牌並隨機抽出一張牌
$card = array_shift($deck);
echo $card['face'] . ' of ' . $card['suit'];
現在,我們就獲得了抽取多副牌或構建多層牌盒(multideck shoe)的捷徑。
勝率計算器:發牌
由於構建撲克牌時會分別跟蹤每張牌的牌面和花色,因此可以通過編程方式利用這副牌來計算得到特定牌的幾率。首先每只手分別抽出五張牌。
清單 10. 每只手抽出五張牌
for ($i = 0; $i 5; $i++) {
$hands[1][] = implode(" of ", array_shift($deck));
$hands[2][] = implode(" of ", array_shift($deck));
}
然后可以查看這副牌,看看剩余多少張牌以及抽到特定牌的機率是多少。查看剩余的牌數十分簡單。只需要計算 $deck 數組中包含的元素數。要獲得抽到特定牌的機率,我們需要一個函數來遍歷整副牌並估算其余牌以查看是否匹配。清單 11. 計算抽到特定牌的幾率
$remaining = count($deck);
$odds = 0;
foreach ($deck as $card) {
if ( ($draw['face'] == $card['face'] && $draw['suit'] ==
$card['suit'] ) ||
($draw['face'] == '' && $draw['suit'] == $card['suit'] ) ||
($draw['face'] == $card['face'] && $draw['suit'] == '' ) ) {
$odds++;
}
}
return $odds . ' in ' $remaining;
}
現在可以選出嘗試抽出的牌。為了簡單起見,傳入看上去類似某張牌的數組。我們可以查找特定的一張牌。
清單 12. 查找指定的一張牌
echo implode(" of ", $draw) . ' : ' . calculate_odds($draw, $deck);
或者可以查找指定牌面或花色的牌。
清單 13. 查找指定牌面或花色的牌
$draw = array('face' = 'Ace', 'suit' = '');
簡單的撲克發牌器
現在已經得到牌組構建器和一些工具,可以幫助計算出抽出特定卡的機率,我們可以整合一個真正簡單的發牌器來進行發牌。出於本例的目的,我們將構建一個可以抽出五張牌的發牌器。發牌器將從整副牌中提供五張牌。使用數字指定需要放棄哪些牌,並且發牌器將用一副牌中的其他牌替換這些牌。我們無需指定發牌限制或特殊規則,但是您可能會發現這些是非常有益的個人經驗。 如上一節所示,生成並洗牌,然后每只手五張牌。按數組索引顯示這些牌,以便可以指定返回哪些牌。您可以使用表示要替換哪些牌的復選框來完成此操作。
清單 14. 使用復選框表示要替換的牌
echo "input type='checkbox' name='card[" . $index . "]'
" . $card['face'] . ' of ' . $card['suit'] . "br /";
}
然后,計算輸入 array $_POST['card'],查看哪些牌已被選擇用於替換。
清單 15. 計算輸入
while ($i 5) {
if (isset($_POST['card'][$i])) {
$hand[$i] = array_shift($deck);
}
}
使用此腳本,您可以嘗試找到處理特定一組牌的最佳方法。
Hangman 游戲
Hangman 實質上是一款猜字游戲。給定單詞的長度,我們使用有限的幾次機會猜這個單詞。如果猜出了出現在該單詞中的一個字母,則填充該字母出現的所有位置。在猜錯若干次(通常為六次)后,您就輸了比賽。要構建一個簡陋的 hangman 游戲,我們需要從單詞列表開始。現在,讓我們把單詞列表制作成一個簡單的數組。
清單 16. 創建單詞列表
"giants",
"triangle",
"particle",
"birdhouse",
"minimum",
"flood"
);
使用前面介紹的技術,我們可以把這些單詞移動到外部單詞列表文本文件中,然后根據需要導入。
在得到單詞列表后,需要隨機選出一個單詞,將每個字母顯示為空,然后開始猜測。我們需要在每次進行猜測時跟蹤正確和錯誤的猜測。只需序列化猜測數組並在每次猜測時傳遞它們,就可實現跟蹤目的。如果需要阻止人們通過查看頁面源代碼僥幸猜對,則需要執行一些更安全的操作。
構建數組以保存字母和正確/錯誤的猜測。對於正確的猜測,我們將用字母作為鍵並用句點作為值填充數組。
清單 17. 構建保存字母和猜測結果的數組
'p','q','r','s','t','u','v','w','x','y','z');
$right = array_fill_keys($letters, '.');
$wrong = array();
現在需要一些代碼來評估猜測並在完成猜字游戲的過程中顯示該單詞。
清單 18. 評估猜測並顯示進度
$show = '';
$right[$guess] = $guess;
$wordletters = str_split($word);
foreach ($wordletters as $letter) {
$show .= $right[$letter];
}
} else {
$show = '';
$wrong[$guess] = $guess;
if (count($wrong) == 6) {
$show = $word;
} else {
foreach ($wordletters as $letter) {
$show .= $right[$letter];
}
}
}
在源代碼歸檔 中,可以看到如何序列化猜測數組並將該數組從一次猜測傳遞到另一次猜測中。
縱橫字謎助手
我知道這樣做不合適,但是有時在玩縱橫拼字謎時,您不得不費勁地找出以 C 開頭並以 T 結尾、包含五個字母的單詞。使用為 Hangman 游戲構建的相同單詞列表,我們可以輕松地搜索符合某個模式的單詞。首先,找到一種傳輸單詞的方法。為了簡單起見,用句點替換缺少的字母:$guess = "c...t";。由於正則表達式將把句點處理為單個字符,因此我們可以輕松地遍歷單詞列表以查找匹配。
清單 19. 遍歷單詞列表
if (preg_match("/^" . $_POST['guess'] . "$/",$word)) {
echo $word . "br /\n";
}
}
根據單詞列表的質量及猜測的准確度,我們應當能夠得到合理的單詞列表以用於可能的匹配。您必須自己決定 表示 不按規則玩 的由五個字母組成的單詞 的謎底是 chest 還是 cheat。
米德里比斯
米德里比斯是一款文字游戲,玩家在游戲中得到一個簡短的故事並用同一類型的不同單詞替換主要類型的單詞,從而創建同一個故事的更無聊的新版本。閱讀以下文本:I was walking in the park when I found a lake. I jumped in and swallowed too much water. I had to go to the hospital. 開始用其他單詞標記替換單詞類型。開始和結束標記帶有下划線用於阻止意外的字符串匹配。
清單 20. 用單詞標記替換單詞類型
I _VERB_ed in, and _VERB_ed too much _NOUN_. I had to go to the _PLACE_.";
接下來,創建幾個基本單詞列表。對於本例,我們也不會做得太復雜。
清單 21. 創建幾個基本單詞列表
$places = array('park', 'hospital', 'arctic', 'ocean', 'grocery', 'basement',
'attic', 'sewer');
$nouns = array('water', 'lake', 'spit', 'foot', 'worm',
'dirt', 'river', 'wankel rotary engine');
現在可以重復地評估文本來根據需要替換標記。
清單 22. 評估文本
switch ($matches[0]) {
case '_VERB_' :
shuffle($verbs);
$text = preg_replace($matches[0], current($verbs), $text, 1);
break;
case '_PLACE_' :
shuffle($places);
$text = preg_replace($matches[0], current($places), $text, 1);
break;
case '_NOUN_' :
shuffle($nouns);
$text = preg_replace($matches[0], current($nouns), $text, 1);
break;
}
}
echo $text;
很明顯,這是一個簡單而粗糙的示例。單詞列表越精確,並且花在基本文本上的時間越多,結果就越好。我們已經使用了文本文件創建名稱列表及基本單詞列表。使用相同原則,我們可以創建按類型划分的單詞列表並使用這些單詞列表創建更加變化多端的米德里比斯游戲。
樂透機
全部選中樂透的六個正確號碼 退一步說 在統計學上是不可能的。不過,許多人仍然花錢去玩,而且如果您喜歡號碼,則查看趨勢圖可能很有趣。讓我們構建一個腳本,該腳本將允許跟蹤贏獎號碼並在列表中提供選擇次數最少的 6 個號碼。
(免責聲明:這不會幫助您中樂透獎,因此請不要花錢購買獎券。這只是為了娛樂)。
把贏獎的樂透選擇保存到文本文件中。用逗號分隔各個號碼並把每組號碼放在單獨一行中。使用換行符分隔文件內容並使用逗號分隔行后,可以得到類似清單 23 的內容。
清單 23. 把選擇的贏獎樂透保存到文本文件中
array('6', '10', '18', '21', '34', '40'),
array('2', '8', '13', '22', '30', '39'),
array('3', '9', '14', '25', '31', '35'),
array('11', '12', '16', '24', '36', '37'),
array('4', '7', '17', '26', '32', '33')
);
很明顯,這不足以成為繪制統計數據的基本文件。但是它是一個開端,並且足以演示基本原理。
設置一個基本數組以保存選擇范圍。例如,如果選擇 1 到 40 之間(例如,$numbers = array_fill(1,40,0);)的號碼,則遍歷我們的選擇,遞增相應的匹配值。
清單 24. 遍歷選擇
foreach ($pick as $number) {
$numbers[$number]++;
}
}
最后,根據值將號碼排序。此操作應當會把最少選擇的號碼放在數組的前部。
清單 25. 根據值將號碼排序
$pick = array_slice($numbers,0,6,true);
echo implode(',', array_keys($pick));
通過有規律地向包含中獎號碼列表的文本文件添加實際的樂透中獎號碼,可以發現選號的長期趨勢。查看某些號碼的出現頻率十分有趣。