2007-06-05

我要做一個和電腦做石頭剪子布的游戲的小程

已經編寫完畢。由于我的全部代碼較為復雜且文件總和十分龐大,又考慮到版權問題,故不上傳源代碼(換作是你也許同樣吧),不過,作為回答,可以提示你幾點編程技巧。這個游戲的規則簡單但"石頭,剪刀,布"是一個首尾互接的環狀元素列,對它們任兩個元素之間的大小比較就比較復雜。 不過算法是有許多種的,樓上那位盡管算法可能不錯,但他的游戲每玩一次就要輸入中文,那就不算是真正的游戲了。游戲的理念是算法簡單,操作方便,所以我選擇使用按鈕和鍵盤并用的輸入方式。比較"石頭,剪刀,布"的大小可以這樣實現:記:石頭=1,剪刀=0,布=-2對包含0的兩個數,直接比較;否則通過取絕對值比較。 以下函數實現文...全部

已經編寫完畢。由于我的全部代碼較為復雜且文件總和十分龐大,又考慮到版權問題,故不上傳源代碼(換作是你也許同樣吧),不過,作為回答,可以提示你幾點編程技巧。這個游戲的規則簡單但"石頭,剪刀,布"是一個首尾互接的環狀元素列,對它們任兩個元素之間的大小比較就比較復雜。

不過算法是有許多種的,樓上那位盡管算法可能不錯,但他的游戲每玩一次就要輸入中文,那就不算是真正的游戲了。游戲的理念是算法簡單,操作方便,所以我選擇使用按鈕和鍵盤并用的輸入方式。比較"石頭,剪刀,布"的大小可以這樣實現:記:石頭=1,剪刀=0,布=-2對包含0的兩個數,直接比較;否則通過取絕對值比較。

以下函數實現文字和數字的轉換,可以用于判斷后的結果翻譯:Public Function StScCl(Gesture As Integer) As StringSelect Case GestureCase 1StScCl = "石頭"Case 0StScCl = "剪刀"Case -2StScCl = "布"End SelectEnd Function用法:Object。

Caption=StScCl(數字)算法代碼:假設獲得手勢數字代碼a,bIf a = b Then '平手代碼ElseIf a * b = 0 Then If a > b Then 'a 獲勝 Else 'b 獲勝 End IfElse If Abs(a) > Abs(b) Then 'a 獲勝 Else 'b 獲勝 End IfEnd If這是比較快捷的算法,盡管我沒有采用。

另外,分類討論法也可以考慮使用,樓上那位的即是。對于獲勝率或其他百分率,為了使顯示簡潔,以免被別人當作數學計算器,還要使用四舍五入法則來顯示數字。函數如下:Public Function Percent(Num As Single) As StringDim a As Singlea = Num * 100If Int(a) = a Then Percent = Replace(Str(Int(a)) + "%", " ", "")ElseIf Int(a) + 0。

5 a Then Percent = Replace(Str(Int(a)) + "%", " ", "")End IfEnd Function用法:Object。Caption=Percent(小數,如 0。

92)該函數將把小數轉化為百分數(%)同時,我還要說,對鍵盤事件的運用也很關鍵。你可以使用附件中的"鍵盤代碼測試程序"來了解鍵盤的定義(KeyCode 和 KeyAscii)。使控件響應鍵盤的關鍵是維持控件的焦點(即Object。

hWnd句柄)。不過,不使用 Windows API 函數也是能夠實現的,即:Private Sub Object_MouseMove(。。。)Object。SetFocusEnd Sub其中,過程名中的Object必須是過程中的Object。

注意:Object必須是有焦點的控件,如 Form,Picture,Command 等,不能是 Label,Image,Line,Shape 等。使用Object的KeyPress事件用KeyAscii(對字母鍵有大小寫之分,并且不包含系統鍵);使用Object的KeyDown或KeyUp事件用KeyCode,它只是大多數鍵的直接定義(包括大多數系統鍵如 Shift,Ctrl 等)最后,對程序界面的設計方法也是需要積累的。

我承認我做得還不夠好,但我仍在努力。再說幾句,美術處理也很有用。對圖形既可以使用先處理再引用的方法,也可以直接用代碼處理。不過我對一些軟件的圖形處理速度感到驚嘆,也許是充分利用了 CPU 吧!末了,祝你進步!啊,差點忘了!本游戲編寫的重要一環是電腦出手的編寫。

首先,你必須了解隨機樹種子的初始化命令:Randomize其次,你必須了解在整數區間[m,n]上隨機取整的代碼:x=Int(Rnd*(n-m+1)+m),m,n為整數,由隨機數范圍[0,1)可以證明其正確性。

例如本例:m=1,n=3,則x=Int(Rnd*3+1),令"石頭=1,剪刀=2,布=3",再轉化到"石頭=1,剪刀=0,布=-2",最后比較電腦和玩家的勝負。代碼示例:Randomizepc = Int(Rnd * 3 + 1)Select Case pcCase 1 pc = 1Case 2 pc = 0Case 3 pc = -2End Select'下面是比較,見上文提示附:1。

最終試用版游戲"石頭,剪刀,布"(要扣5分,請原諒:)) 2。KeyCode。exe應用程序。收起

總結

以上是生活随笔為你收集整理的java源文件怎么发送给别人_自己的java程序怎么给别人用的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。