健保IC卡上线后问答说明-DelphiKTop讨论区-国泰电脑有限公司.PPT

K.Top首場研討會 研討會時間表 13:30~14:00 站長李信宏 集合/開場白/網站簡介 14:00~14:50 ERP開發工具簡介(資識科技) 14:50~15:00 休息 15:00~15:50 電腦棋類遊戲程式設計簡介(國泰電腦) 15:50~16:30 會員聯誼Talking 16:30 圓滿散會 資識科技公司簡介 資識科技股份有限公司 管理資訊系統(ERP) 產品資料管 理(PDM) 客服管理系統(CSM) 供應鏈管理(SCM) 系統整合服務(SI) 決策支援系統(EIS) 公司簡介公司理念為服務／創新／成長／人本，為替客戶建置整合性塵用資訊系統。從系統分析／產業知 識／軟體開發／系統導入皆具專業素養。目前成員 70％ 以上為碩士，未來發展潛力無窮。 公司重視顧客的服務，人員的養成與文化的融合，為生涯規劃的好地方，歡迎年青有衝勁的朋友一起來打拼。 國泰電腦公司簡介 國泰電腦有限公司成立於1992年4月專業醫療系統規劃主力產品:中醫系統/檢驗系統公司成員:15人 全省服務經銷點:8家公司 電腦棋類遊戲程式設計簡介 各類棋類遊戲:圍棋/象棋/西洋棋/五子棋/黑白棋…… 電腦如何思考下棋 遊戲規則 / 遊戲特性 價值評分法(Value) 棋譜比對法 / 棋形比對法 遊戲樹(Min/Max Tree) Alpha Beta Cut 棋子價值評分法(數量) 棋子價值評分法(叫吃) 棋子價值評分法(加值) 棋譜比對法 棋形比對法 遊戲特性 遊戲特性 遊戲樹(Min/Max) MIN/MAX Game Tree演算法 // Side=‘O’ ‘X‘ x,y:最佳下子點 Result:評分 function MinMax(Side:char;var x,y:integer):integer; begin for 所有可以下的棋子 do begin if 遊戲尚未結束 then begin v:=MinMax(side2,x2,y2); // side2為side的反向 x2,x2為傳回的最佳下子點 end else begin v:=ValueBoard; // ValueBoard為評分值 end; if side=O then begin if v最大 then x,y回傳下子點 result=v end else if side=X then begin if v最小 then x,y回傳下子點 result=v end; end; end; 針對每個可下點的評分 Alpha Beta Cut 實戰黑白棋 簡報結束 期待下次相會 * 台中場研討會 2003/12/20(六)下午 13:30 - 16:30 象棋 象棋 黑白棋 九路圍棋 圍棋 圍棋(真眼/假眼) 圍棋(塊/群/氣 ) // Side=‘O’ ‘X‘ x,y:最佳下子點 A,B:Alpha/Beta值 Result:評分 function ABCUT(Side:char;var x,y:integer;A,B:integer):integer; begin for 所有可以下的棋子 do begin if 遊戲尚未結束 then begin v:=MinMax(side2,x2,y2,B,M); // side2為side的反向 x2,x2為傳回的最佳下子點 // M為目前評分值 end else begin v:=ValueBoard; // ValueBoard為評分值 end; if side=O then begin if v最大 then x,y回傳下子點 result=v end else if side=X then begin if v最小 then x,y回傳下子點 result=v end; if (side=‘O’) AND (va) then 跳出for迴圈; if (side=‘X’) AND (va) then 跳出for迴圈; end; end; ALPHA/BETA CUT 演算法 *