線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:3633
推到 Plurk!
推到 Facebook!

站長出個題目給大家練功:電腦智能黑白棋

 
領航天使
站長


發表:12216
回覆:4186
積分:4084
註冊:2001-07-25

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-03-12 17:47:23 IP:211.76.xxx.xxx 未訂閱
站長出個題目給大家練功:電腦智能黑白棋 自從上一次 "站長出個題目給大家寫寫:無限位數的加減乘除" 之後 獲得大家的熱烈迴響! 這一次站長對各位高手/新手下戰帖 題目:修改站長發表的黑白棋智能程式,並且打敗站長的程式智能! 遊戲規格: 1.請先下載站長發表的黑白棋原始程式 http://delphi.ktop.com.tw/topic.php?topic_id=42603 2.參考站長的"KTop首場研討會現場影音檔案下載" 電腦棋類遊戲程式設計簡介(時間總共1小時) http://delphi.ktop.com.tw/topic.php?topic_id=44435 3.改寫站長的程式,變得更聰明,利用"電腦對戰"的功能打敗站長的黑白棋軟體! 4.獲勝者成為擂台盟主優勝者,其他會員可以再度挑戰成為新盟主! 5.修正後的程式請上傳到"會員作品發表區(限本人創作發表)" http://delphi.ktop.com.tw/FORUM.asp?FORUM_ID=79 並在此發表一篇通知回覆,由站長下載程式對打測試, 挑戰成功後站長會回覆告知! 6.遊戲規則: 電腦的搜尋層數不限,但是每次電腦出手思考時間不可超過10秒鐘! 比兩場,先下後下各一場,各贏一場時,以贏子數多的贏! 比賽盤面:6 x 6 (比賽測試電腦規格:P4 1.8G RAM 256M) 參考資料: 黑白棋簡體版(含原始碼) http://delphi.ktop.com.tw/topic.php?topic_id=39149 遺傳演算法用於黑白棋 http://delphi.ktop.com.tw/topic.php?topic_id=20686 黑白棋運用的相關多種演算法(演化式計算) http://delphi.ktop.com.tw/topic.php?topic_id=20684 請大家踴躍參加武林擂台盛會喔! ~~~
------
~~~Delphi K.Top討論區站長~~~
領航天使
站長


發表:12216
回覆:4186
積分:4084
註冊:2001-07-25

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-03-14 09:03:50 IP:192.168.xxx.xxx 未訂閱
簡體版的原始程式在此 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=46474 感謝deity會員修改 ~~~Delphi K.Top討論區站長~~~
------
~~~Delphi K.Top討論區站長~~~
領航天使
站長


發表:12216
回覆:4186
積分:4084
註冊:2001-07-25

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-03-16 16:24:27 IP:211.76.xxx.xxx 未訂閱
這裡面的黑白棋智能相當高,而且電腦下子又快 可以打敗站長的程式智能 大家可以來研究看看他如何寫的 http://delphi.ktop.com.tw/topic.php?topic_id=46548 有Delphi原始程式(簡體版) ~~~Delphi K.Top討論區站長~~~
------
~~~Delphi K.Top討論區站長~~~
bruce0211
版主


發表:157
回覆:668
積分:279
註冊:2002-06-13

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-03-16 17:31:06 IP:211.21.xxx.xxx 未訂閱
好玩耶(我是說有這種機會,不是指玩黑白棋) ~ 不過我覺得是否這類的程式應該有個軟體 I/O 介面(或通信協定) 讓對手下棋的決定值可由 I/O 介面輸入 換句話說 , 我寫我的對戰程式 , 將目前盤面及對策或棋步藉由 I/O 介面讀出或寫入,不用直接去改站長的黑白棋程式....
領航天使
站長


發表:12216
回覆:4186
積分:4084
註冊:2001-07-25

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-03-16 18:03:28 IP:192.168.xxx.xxx 未訂閱
引言: 好玩耶(我是說有這種機會,不是指玩黑白棋) ~ 不過我覺得是否這類的程式應該有個軟體 I/O 介面(或通信協定) 讓對手下棋的決定值可由 I/O 介面輸入 換句話說 , 我寫我的對戰程式 , 將目前盤面及對策或棋步藉由 I/O 介面讀出或寫入,不用直接去改站長的黑白棋程式....
也可以,這樣BCB的人士也可以加入對站 通訊協定: 採用UDP Port 1000 Server端啟動後等Client端連上來 OnConnect事件中寫上: socket.SendText(format('INIT M %s',[CellNum,combobox1.text])); 123456789012 INIT 0006 黑 INIT代表遊戲開始 0006代表盤面為6*6 黑代表Server端為黑方 電腦下子後需傳送以下指令到對方 socket.SendText('AIGO' side format('M M',[ax,ay])); 12345678901234 AIGOB0001 0002 AIGO代表電腦下子 B代表黑方走(W代表白方走) 0001 0002代表 X,Y的座標(從0,0開始到n-1,n-1) 有問題的話再提出來討論 ~~~Delphi K.Top討論區站長~~~
------
~~~Delphi K.Top討論區站長~~~
sos_admin
版主


發表:121
回覆:697
積分:768
註冊:2003-07-23

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-03-17 13:03:12 IP:218.94.xxx.xxx 未訂閱
站长你这个黑白棋到底是什么规则哦? 我以前没玩过也没听说过,是五子棋吗?还是围棋?    不会玩!您要是下中国象棋或80分之类的我还可以玩玩 呵呵~~
領航天使
站長


發表:12216
回覆:4186
積分:4084
註冊:2001-07-25

發送簡訊給我
#7 引用回覆 回覆 發表時間:2004-03-17 21:57:53 IP:192.168.xxx.xxx 未訂閱
引言: 站长你这个黑白棋到底是什么规则哦? 我以前没玩过也没听说过,是五子棋吗?还是围棋? 不会玩!您要是下中国象棋或80分之类的我还可以玩玩 呵呵~~ < face="Verdana, Arial, Helvetica"> 下子一定要將對手的棋子一條直線(或是斜線)的頭尾包住 包住的棋子會換成自己的顏色 很多手機遊戲中都有黑白棋啊 ~~~Delphi K.Top討論區站長~~~
------
~~~Delphi K.Top討論區站長~~~
sos_admin
版主


發表:121
回覆:697
積分:768
註冊:2003-07-23

發送簡訊給我
#8 引用回覆 回覆 發表時間:2004-03-18 10:08:21 IP:61.155.xxx.xxx 未訂閱
大陆上的手机好像没有这个游戏,我用的nokia手机上也没这个游戏;
領航天使
站長


發表:12216
回覆:4186
積分:4084
註冊:2001-07-25

發送簡訊給我
#9 引用回覆 回覆 發表時間:2004-06-08 18:32:56 IP:192.168.xxx.xxx 未訂閱
在本站電子報的49-53期有詳細介紹 黑白棋Step-by-Step程式教學(一)~(五) http://delphi.ktop.com.tw/topic.php?TOPIC_ID=46496 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=46843 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=47227 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=47650 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=48045
------
~~~Delphi K.Top討論區站長~~~
pcboy
版主


發表:177
回覆:1838
積分:1463
註冊:2004-01-13

發送簡訊給我
#10 引用回覆 回覆 發表時間:2007-01-22 14:04:13 IP:61.219.xxx.xxx 未訂閱
連結好像陣亡了
===================引 用 文 章===================
在本站電子報的49-53期有詳細介紹黑白棋Step-by-Step程式教學(一)~(五)
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=46496
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=46843
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=47227
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=47650
http://delphi.ktop.com.tw/topic.php?TOPIC_ID=48045
------
能力不足,求助於人;有能力時,幫幫別人;如果您滿意答覆,請適時結案!

子曰:問有三種,不懂則問,雖懂有疑則問,雖懂而想知更多則問!
系統時間:2024-05-06 20:36:29
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!