PDA

View Full Version : [DIS] Cờ Caro



Zero
16-11-2002, 20:00
Hôm trước mình đọc một bài của anh real_time và thấy anh ấy nói về việc đưa ra ct lớn để mọi người cùng làm, mình đã suy nghĩ về việc này và nhân tiện mình và 1 thằng bạn đang làm một chương trình cờ caro nên mình đề nghị chúng ta cùng pt chương trình này ? về cơ bản chương trình đã khá ổn. Mình dự định sẽ post mã nguồn về thuật toán cùng giao diện text của ct lên đây đồng thời mình cũng cung cấp cả các thuật toán dùng trong cờ caro nữa để mọi người có thể nghiên cứu và pt. Chúng ta sẽ cùng nhau pt chương trình này cho nó thật hay các bạn thấy thế nào ?

namtuocbongtoi
16-11-2002, 20:34
bạn cứ post đi,cho mình học hỏi chút

New Star
22-11-2002, 15:19
Cái vụ này hay đấy, bạn post lên đi

phoenix
24-11-2002, 23:28
chờ đến dài cổ rồi, hic...

New Star
28-11-2002, 17:21
đả đảo lần thứ hai, sao dạo này trên diễn đàn nhiều vị chơi trò hứa léo quá hen. chắc tui cũng phải chơi trò này wá

Mach2
28-11-2002, 18:02
Chè chè, cậu Zero này đi thi gì nữa đây? Đợi lâu wé rùi đó nghe...

Rongnuocviet
30-11-2002, 00:32
Zoro định đùa anh em đấy à? Định để anh em đợi đén bao giờ đây. Mà đây lại là bài tôi đang cần đấy nhé. Nhanh lên nào.

vantoan10
01-12-2002, 01:10
Các bạn muốn có thuật toán cờ caro? mình có thể cung cấp cho các bạn một chương trình mình đã lập hoàn chỉnh đây,các bạn có thể tuỳ ý sáng tác thêm:o

Zero
02-12-2002, 11:39
Hic xin lỗi mọi người nhé mai mình sẽ port lên ngay. Mấy hôm nay cái ổ mềm hỏng nên có làm ăn được gì đâu.
Hết sức xin lỗi.

hiensmart
04-12-2002, 14:14
Vantoan xem lai bai gui cua minh di nhe, tui nhin so thi thay cung dc nhung ma thieu 1 so unit day
Zero, where R U?

Zero
04-12-2002, 18:49
Rùi đây là phiên bản AI gần mới nhất ngày 30/11/2002 giao diện là text, phần giao diện đồ hoạ hiện đã làm xong nhưng mình sẽ đưa nó ra cùng với phiên bản AI mới hơn.
Còn về mã nguồn mình sẽ gửi sau một bộ mã nguồn trên nền Turbo Pascal vì bản này được viết trên nền của Free Pascal.

Zero
04-12-2002, 18:52
Độ sâu lượng giá của chương trình là 5 ngoài ra ở một số nước chương trình có thể lượng giá đến độ sâu là 19.

danceswithwolves
04-12-2002, 20:33
heuristic evaluating algorithm của u khá thiệt, độ sâu có thể lên đến 19 cơ á... good job.

nếu có thể, đề nghị Zero@ post tutorial (phân tích ý tưởng thôi) cho mọi người học tập.

vantoan10
06-12-2002, 22:44
Xin lỗi các bạn,mình thiếu một Unit,các bạn thử Download lại nhé!!!lol

lovely
18-12-2002, 20:23
Tôi không download được mod ơi !

msn
17-02-2003, 17:35
Chương trình cờ cảo này vẫn còn kém lắm.
Tôi có một chương trình giao diện kém hơn nhưng thuật toán hơi bị
đỉnh chương trình này thua xa.

vantoan10
17-02-2003, 23:50
Một chương trình dùng để giải trí và để cho người chưa biết khám phá thôi bạn ạ ! còn để cho nó thông minh thì phải sửa sang nhiều......Nói đúng ra đây là bài thực hành Tiếng Việt trong đồ hoạ Pascal của mình chứ không phải là ý định lập một Game.

msn
19-02-2003, 11:54
Đã làm thì phải làm cho hoàn chỉnh chứ.

bpmtri
19-02-2003, 14:41
Tui lang thang trên mạng tìm được cái source Caro viết bằng Delphi, chơi thử thấy nó đánh cũng tạm tạm, hỏng ngu lắm mà cũng hỏng good lắm. Ai muốn tham khảo thì download về mà ngâm cứu nha!

Download here (http://members.fortunecity.com/pew/zip/src/gomoku_004_src.zip)

msn
20-02-2003, 20:49
Sao không down được

btkiet
22-02-2003, 09:26
to bpmtri không down được, hình như bị firewall rồi. nếu bạn đã down rồi thì attack lại dùm đi.

BlueStar
23-02-2003, 09:47
Chương trình của Zero đánh tồi quá,đánh với chương trình của tôi nó ko thắng được ván nào(!)...mà cũng ko phải của bạn ko thôi đâu, tôi down mấy cái ở bách khoa và hầu hết chúng cũng đều thua....
Khi nào rảnh tôi Up lên cho .

BlueStar
23-02-2003, 09:50
Chương trình của Zero đánh tồi quá,đánh với chương trình của tôi nó ko thắng được ván nào(!)...mà cũng ko phải của bạn ko thôi đâu, tôi down mấy cái ở bách khoa và hầu hết chúng cũng đều thua....
Sao tìm nhiều thế,chương trình của tôi chỉ có độ sâu là 2 (!),thuật toán cực kì đơn giản, chạy vèo vèo.
Khi nào rảnh tôi Up lên cho .

msn
24-02-2003, 17:00
Thử up lên xem tôi cũng có thuật toán ổn lắm đang muốn thử đây

bpmtri
25-02-2003, 17:46
Hic, sorry mấy bạn nha. Tại tui download cái này trong SSP nên không bị firewall. Forum hiện thời không upload lên được nên không có attach source lên cho các bạn được. Bạn nào cần thì liên hệ với tui, tui sẽ gửi qua mail cho các bạn!

E-mail: minhtri@pyramid-consulting.com

Zero
27-02-2003, 11:30
Sao lại so sánh như vậy nhỉ ? ct kia tử năm ngoái mất rồi bạn ơi mà bạn dùng ct nào của tôi ? bạn có chọn cấp độ tốt nhất không ? hay thử với cấp độ Crazy rồi tự hào ? chắc thế quá vì trình đó tôi chọn độ sâu 1 đó (:D) , tôi đang có trong tay 1 ct mới hơn nhiều độ sâu lượng giá của nó ~ 20 (100 %).

saito_hajime
27-02-2003, 12:16
Mấy cái dzụ này để tui, post lên cho bà con thưởng thức và online đấu với nhau hén, hehehe, đố mấy bác thắng được tui đó, mà computer chơi cũng dữ lắm đó. Cho tui thời gian 3 ngày nhé.:)

BlueStar
27-02-2003, 16:27
BS chấp nhận lời thách thức !!!
Hãy gửi những phiên bản hay nhất của các bạn lên nhé !

saito_hajime
01-03-2003, 19:13
Đây nè click ==> http://www.atomax.com/download.stm#gomoku
hì hì...không biết dowloands được không nữa.

saito_hajime
01-03-2003, 19:14
Đây nè click==> http://www.atomax.com/download.stm#gomoku
hì hì...không biết dowloands được không nữa:D :D

msn
02-03-2003, 09:10
Gomoku của Atomax đểu lắm.

saito_hajime
02-03-2003, 11:33
Tui thấy hay bỏ xừ , chơi như dzậy mà chê à, như dzậy mới đáng là đối thủ của tui chứ:rolleyes: :rolleyes:

del_gate
31-03-2003, 14:22
Hicx, tui chẳng down được cái nào cả, bác nào có trình nguồn của caro thì gửi cho mình nhé (the_limit17@yahoo.com).
Em xin cảm ơn trước.

del_gate
05-04-2003, 14:22
Bác Zero ơi, gửi cho em trình nguồn caro của bác đi , em cần lắm nhưng lại không có thời gian.
Em cảm ơn trước nhe.

bpmtri
29-04-2003, 18:01
Caro source code:

duc178
14-02-2004, 11:04
Ban oi minh dang hoc mon Tri tue nhan tao, dang can chuong trinh caro de hoc tap va nghien cuu. Neu ban da lam hoan chinh mail cho minh di. Muon van hau ta dia chi cua minh la duc478@hotmail.com
Chao ban chuc mot ngay tot dep

lee_huynh306
23-04-2004, 00:30
grừ,down down mấy lị load load,mẹ ôi có khỉ gì đâu mà download

bpmtri
23-04-2004, 00:34
Mấy cái download này bị mất hết qua mấy lần Vikhoa dời Server. Bạn có thể đọc các bài về Caro kèm source code ở đây nè:
http://www.hoclaptrinh.com

Godbloc
25-04-2004, 03:06
He eh , Co ca ro cua thang Zero , tao chi thich choi voi thang "Stupid" thoi , may` co phian ban moi a` , anh thinh thoang van choi cai Version 1.0 cua ma`y. A` , Zero oi ,
Hom nao` anh len nha` may` nha', co di hoc on thi chua , thoi de he` , len chi giao anh vai` chieu ve` 3d nha' .]

sao lại nói vậy??? với lại ông làm ơn viết tiếng việt có dấu giúp tôi
lần sau ông viết thế này là tôi xóa đó.
Tiện đây tôi cũng đang học về 3D ông liên hệ tôi cho tôi học với
hungphuong0813@yahoo.com

lee_huynh306
30-04-2004, 01:18
mèn ơi,có làm gì được đâu.Upload lên chỗ nào đó rồi cho tụi tui cái URL để download đi(yahoo briefcase chẳng hạn).

Godbloc
30-04-2004, 02:30
Thich xoa thi` cu tu nhien , tui ghet viet tieng viet kieu Á lam' ,

aiviet
22-06-2004, 04:03
http://www.aiviet.com/images/CaroCap1.gif (http://www.aiviet.com)

Cờ caro của bạn có phải là đệ nhất thiên hạ không?
Bạn có thể chứng minh với cả thế giới điều ấy tại nơi đây:

www.aiviet.com

Trong quá trình xây dựng sân chơi này, mình cần sự đóng góp của các bạn. Đặc biệt là mình cần vài con AI ca rô cài mặt định dưới nhiều ngôn ngữ khác nhau:
C#
VB.NET
VC.NET
Delphi 8
J#
Java và C (trong tương lai gần)

Mong các bạn ủng hộ. YahooID của mình là "aivietcom".

attilathehun
07-07-2004, 15:32
Chỉ mới đọc qua bài của các bác chứ chưa xem source. Nhưng tôi đoán các bác chỉ dùng alpha-beta search thôi??
Nhân tiện tôi muốn cung cấp một số thông tin cho các bác tham khảo :
Trong trò chơi cờ Carô (còn gọi là Gomoku) đã được khẳng định là: người đi trước chắc chắn thắng (tuy nhiên trong Gomoku 5 con chặn 2 đầu vẫn ăn). Điều này đã được giáo sư Victor L. Allis người Hà Lan và các đồng nghiệp giải quyết cách đây hơn 10 năm. Ông đã tìm ra các kỹ thuật tìm kiếm mới tỏ ra hiệu qủa hơn hẳn alpha-beta search hay minimax,
Bác nên nhớ là depth search của bác là 19 hay hơn chăng nữa thì vẫn chưa thể là một chương trình hoàn hảo được. Bác có thể thêm transposition table để cải thiện tốc độ.
Các kỹ thuật tìm kiếm đó là threat-space search và proof-number search. Để minh họa Allis đã viết chương trình cờ gomoku Victoria, chương trình này luôn luôn thắng trong tất cả các trận đấu (nếu đi trước), và thắng qúa nửa số trận đấu (nếu đi sau). Rất tiếc là chương trình này ông chỉ viết để thử chứ không phân phối hay bán. Tuy nhiên bạn có thể gửi mail cho ông ta để xin so tài với chương trình (không xin được source hay program đâu).
Các bác vào google search từ khóa threat-space search sẽ thấy một bài viết của ông ta (file .pdf) nói về kỹ thuật tìm kiếm này. Ngoài ra còn có một số bài viết về proof-number search, các bác chịu khó tìm. Gõ từ khóa Victor Allis cũng cho nhiều kết qủa.
Nếu muốn test thử chương trình gomoku (carô) của mình so với chương trình mạnh trên thế giới thì hãy thử một vài chương trình (không có source):
fiver6.8: vào google search từ fiver6.8 nó hiện ra một trang tiếng Trung, vô đó down
solver: (rất tốt) của một bác người Nga, hình như tôi down ở một trang tiếng tiệp khắc, bác search từ khóa gomoku và chọn ngôn ngữ là czech republic, hình như vậy?
Đảm bảo AI của bạn bị nó đánh te tua luôn? ^_^

Có lẽ xem source không có tác dụng đâu, vì nhiều khi nó viết ẩu không có comment, xem cũng chẳng hiểu gì. Tốt nhất hãy nghiên cứu algôrít và tự viết.

lpduy86
06-02-2007, 11:35
Ai share cho tui cái cái link download cờ caro mạnh nhất được ko?. Cám ơn nhiều nhé.

NothingToLost
06-02-2007, 17:43
Mọi người có thể chỉ cho em thuật toán của cờ caro được ko .... em cũng đang định tìm hiểu về nó, đang tìm xem có chương trình nào có thể đánh ngang với mình

chercercer
05-03-2007, 17:57
Phần mềm của mình nè :

Anitsoft ExCaro

http://ddth.com/showthread.php?t=111681

Các bạn xem qua nhé !

cao_thu
18-07-2007, 17:23
sao lại lừa người vậy hả?

tran_ngocviet
19-07-2007, 23:27
I'm BlueStar :D
Ko hiểu sao hôm nay lại mò vào thấy mấy bài viết của mình trước kia, thấy hay hay :D Cũng ko nhớ trước kia sao ko upload cái caro lên cho mọi người. Đến bây giờ thì mấy năm rồi ko sờ đến pascal, chả nhớ tí nào :D

Chỉ nhớ qua qua cái thuật toán của mình là: liệt kê các trường hợp có thể sảy ra và cho điểm các ô liên quan(VD như có trường hợp: 0011100, 1: có quân ta, 0: ko có gì, thì cho điểm 2 ô 0 liền kề là x, 2 ô 2 đầu là y.....). Cụ thể xem trong code :D

Nó mới tìm đến cấp 2 thôi mà đánh đã... kinh phết :D khối thằng thua :D Có giao diện đồ họa, cái trong thư mục MYCARO.PAS là cũ hơn, còn NEW_CARO.PAS là bản mới, nhớ mang máng là viết dễ xem hơn, dễ nâng cấp hơn ...

Chúc vui vẻ!

homesweethome
20-07-2007, 10:17
Cũng được đấy .
Nhưng trình độ không ổn định, code quá dài so với level.

ngtrhieu0011
25-07-2007, 17:35
mấy cái file đính kèm tui ko mở dc bằng WinRAR

ngtrhieu0011
25-07-2007, 17:36
chercercer giỏi wá ha

ngtrhieu0011
25-07-2007, 17:36
chương trình chạy rất tuyệt

ngtrhieu0011
25-07-2007, 17:36
cho xin mã nguồn nha

ngtrhieu0011
25-07-2007, 21:01
chercercer ơi, bạn có thể nâng cấp AI của máy ko???

ngtrhieu0011
25-07-2007, 21:02
chương trìng đó chơi dễ thắng lắm, chừng 10 nước

mickeyit2005
15-10-2007, 13:55
Hic! Mình đang tìm hiểu chương trình này để làm đề tài của AI. Mà chẳng biết bắt đầu từ đâu, mấy thuật toán Mã - Min, Alpha - Beta thì hiểu, mà viết gì giờ :((. Phải bắt đầu viết bằng C# (thầy yêu cầu hu hu)
Bạn nào có ý tưởng góp ý cho mình với nhé!
Thanks nhiều nhiều!

trongduc219
15-10-2007, 20:51
co ca ro la loai cờ gi` thế.tớ ko biết chơi loại cò này.ai biết chỉ tớ với

trongduc219
15-10-2007, 21:13
co ca ro la loai cờ gi` thế.tớ ko biết chơi loại cò này.ai biết chỉ tớ với

binhinfo
16-09-2008, 09:03
Tui thật là chán cái diễn đàn này mà tìm down về mà chẵn dc cái gì hết thật là chán wa'
Còn đây la code caro nè
///////////////////////////
#include <iostream.h>
#include <string.h>
#include <conio.h>
#include <stdio.h>
#include <stdlib.h>
#include <dos.h>
#include <graphics.h>

int M[22][23];
int Col=240, Row=220, I=10, J=11;
int Play=1,cont=1;
char Player1[10],Player2[10];

void Win(char name[]);
void Choi();
int Thang(int , int , int );
void XuatVT(int , int , int );
void Chu(int , int , int );
void Khung(int , int , int );
void Khoidau();
void Nen();
void Phien(char st[], int ,int );
void KTDH(void);

void main(void)
{ Khoidau();
KTDH();
do{ Play=1;Col=240; Row=220; I=10; J=11;
for(int i=0; i<22; i++)
for(int j=0; j<23; j++)
M[i][j]=0;
cleardevice();
Nen();
Choi();
}while(cont==1);
closegraph();
}

void Win(char name[])
{
settextstyle(1,0,9);
setcolor(15);
outtextxy(10,10,name);
outtextxy(10,100," won");
}

void Choi()
{ char key;
Khung(Col,Row,1);
XuatVT(I,J,3);
char Chuoi[236]=" This is program demo CARO game between two players. Press F2 to new game, F10 to quit game and when you finish a game, press any key to a new game. This program was written by................................";
int l=strlen(Chuoi);
Phien(Player1,170,15+BLINK);
do{ do{ settextstyle(2,0,5);
setcolor(15);
outtextxy(1,460,Chuoi);
delay(200);
setcolor(1);
outtextxy(1,460,Chuoi);
char st=Chuoi[0];
for(int i=0; i<l; i++)
Chuoi[i]=Chuoi[i+1];
Chuoi[l]=st;
}while(!kbhit());
key=getch();
if(key==0) key=getch();
if(key==77)
{ Khung(Col,Row,3);
XuatVT(I,J,1);
Col=Col+20; J++;
if(Col==480) {Col=20; J=0;}
Khung(Col,Row,1);
XuatVT(I,J,3);
}
if(key==75)
{ Khung(Col,Row,3);
XuatVT(I,J,1);
Col=Col-20; J--;
if(Col==0) {Col=460;J=22;}
Khung(Col,Row,1);
XuatVT(I,J,3);
}
if(key==80)
{ Khung(Col,Row,3);
XuatVT(I,J,1);
Row=Row+20; I++;
if(Row==460) {Row=20; I=0;}
Khung(Col,Row,1);
XuatVT(I,J,3);
}
if(key==72)
{ Khung(Col,Row,3);
XuatVT(I,J,1);

Row=Row-20; I--;
if(Row==0) {Row=440; I=21;}
Khung(Col,Row,1);
XuatVT(I,J,3);
}
if(key==13)
if(M[i][J]==0)
{ Chu(Col,Row,Play);
if(Play==1)
{ M[i][J]=1;
if(Thang(I,J,Play)==Play)
{ Win(Player1);getch();
Play=-1;return;
}
Play=-1;
Phien(Player1,170,5);
Phien(Player2,270,15+BLINK);
}
else
{ M[i][J]=-1;
if(Thang(I,J,Play)==Play)
{ Win(Player2);getch();
Play=1;return;
}
Play=1;
Phien(Player2,270,5);
Phien(Player1,170,15+BLINK);
}
}
if(key==60) break;
if(key==68) {cont=0;return;}
}while(key!=68);
}

int Thang(int x, int y, int s)
{ if(M[x][y-4]!=-s&&M[x][y-3]==s&&M[x][y-2]==s&&M[x][y-1]==s&&M[x][y]==s&&M[x][y+1]!=-s)
return(s);
if(M[x][y-3]!=-s&&M[x][y-2]==s&&M[x][y-1]==s&&M[x][y]==s&&M[x][y+1]==s&&M[x][y+2]!=-s)
return(s);
if(M[x][y-2]!=-s&&M[x][y-1]==s&&M[x][y]==s&&M[x][y+1]==s&&M[x][y+2]==s&&M[x][y+3]!=-s)
return(s);
if(M[x][y-1]!=-s&&M[x][y]==s&&M[x][y+1]==s&&M[x][y+2]==s&&M[x][y+3]==s&&M[x][y+4]!=-s)
return(s);

if(M[x-4][y]!=-s&&M[x-3][y]==s&&M[x-2][y]==s&&M[x-1][y]==s&&M[x][y]==s&&M[x+1][y]!=-s)
return(s);
if(M[x-3][y]!=-s&&M[x-2][y]==s&&M[x-1][y]==s&&M[x][y]==s&&M[x+1][y]==s&&M[x+2][y]!=-s)
return(s);
if(M[x-2][y]!=-s&&M[x-1][y]==s&&M[x][y]==s&&M[x+1][y]==s&&M[x+2][y]==s&&M[x+3][y]!=-s)
return(s);
if(M[x-1][y]!=-s&&M[x][y]==s&&M[x+1][y]==s&&M[x+2][y]==s&&M[x+3][y]==s&&M[x+4][y]!=-s)
return(s);

if(M[x-4][y-4]!=-s&&M[x-3][y-3]==s&&M[x-2][y-2]==s&&M[x-1][y-1]==s&&M[x][y]==s&&M[x+1][y+1]!=-s)
return(s);
if(M[x-3][y-3]!=-s&&M[x-2][y-2]==s&&M[x-1][y-1]==s&&M[x][y]==s&&M[x+1][y+1]==s&&M[x+2][y+2]!=-s)
return(s);
if(M[x-2][y-2]!=-s&&M[x-1][y-1]==s&&M[x][y]==s&&M[x+1][y+1]==s&&M[x+2][y+2]==s&&M[x+3][y+3]!=-s)
return(s);
if(M[x-1][y-1]!=-s&&M[x][y]==s&&M[x+1][y+1]==s&&M[x+2][y+2]==s&&M[x+3][y+3]==s&&M[x+4][y+4]!=-s)
return(s);

if(M[x-4][y+4]!=-s&&M[x-3][y+3]==s&&M[x-2][y+2]==s&&M[x-1][y+1]==s&&M[x][y]==s&&M[x+1][y-1]!=-s)
return(s);
if(M[x-3][y+3]!=-s&&M[x-2][y+2]==s&&M[x-1][y+1]==s&&M[x][y]==s&&M[x+1][y-1]==s&&M[x+2][y-2]!=-s)
return(s);
if(M[x-2][y+2]!=-s&&M[x-1][y+1]==s&&M[x][y]==s&&M[x+1][y-1]==s&&M[x+2][y-2]==s&&M[x+3][y-3]!=-s)
return(s);
if(M[x-1][y+1]!=-s&&M[x][y]==s&&M[x+1][y-1]==s&&M[x+2][y-2]==s&&M[x+3][y-3]==s&&M[x+4][y-4]!=-s)
return(s);

return(0);
}

void XuatVT(int x, int y, int color)
{ settextstyle(1,0,1);
setcolor(color);
char c1[3],c2[3],c3[3];
itoa(x+1,c1,10);
itoa(y+1,c2,10);
outtextxy(580,30,c1);
outtextxy(580,60,c2);
}

void Chu(int x, int y, int status)
{ settextstyle(1,0,1);
if(status==1)
{ setcolor(14);
outtextxy(x-5,y-13,"O");
}
if(status==-1)
{ setcolor(5);
outtextxy(x-5,y-13,"X");
}
}
void Khung(int x, int y, int color)
{ setcolor(color);
line(x-3,y-10,x-7,y-10);
line(x-7,y-10,x-7,y-3);
line(x-7,y+3,x-7,y+8);
line(x-7,y+8,x-3,y+8);
line(x+3,y+8,x+7,y+8);
line(x+7,y+8,x+7,y+3);
line(x+7,y-3,x+7,y-10);
line(x+7,y-10,x+3,y-10);
}

void Khoidau()
{ window(1,1,80,25);textbackground(0);textcolor(15); clrscr();
gotoxy(40-5,2);cout<<"CARO GAME";
window(10,4,26,4);textbackground(1);textcolor(14); clrscr();
cout<<" Player 1's name ";
do{ window(14,6,50,6);textbackground(0);clrscr();
window(14,6,22,6);textbackground(3);textcolor(5);c lrscr();
fflush(stdin);gets(Player1);
}while(strlen(Player1)>8);
if(strlen(Player1)==0) strcpy(Player1,"Player 1");
window(54,4,70,4);textbackground(1);textcolor(14); clrscr();
cout<<" Player 2's name ";
do{ window(58,6,79,6);textbackground(0);clrscr();
window(58,6,66,6);textbackground(3);textcolor(5);c lrscr();
fflush(stdin);gets(Player2);
}while(strlen(Player2)>8);
if(strlen(Player2)==0) strcpy(Player2,"Player 2");
return;
}

void Nen()
{
setcolor(1);
setfillstyle(1,1);
rectangle(480,1,640,480);
rectangle(1,460,480,480);
floodfill(500,200,1);
floodfill(200,470,1);
setbkcolor(3);
setcolor(6);
for(int i=0; i<24; i++)
line(1,20*i,480,20*i);
for(i=0; i<25; i++)
line(20*i,1,20*i,460);
settextstyle(1,0,1);
setcolor(3);
outtextxy(500,30,"Hang = ");
outtextxy(500,60,"Cot = ");
settextstyle(2,0,5);
setcolor(15);
outtextxy(500,150,"Player 1's name");
outtextxy(500,250,"Player 2's name");
settextstyle(1,0,3);
setcolor(5);
outtextxy(510,170,Player1);
outtextxy(510,270,Player2);
}

void Phien(char st[], int col,int mau)
{ settextstyle(1,0,3);
setcolor(mau);
outtextxy(510,col,st);
}

void KTDH(void)
{ int L;
char* grPats = "C:\borlandc\BGI";
do{ int grDR = DETECT;
int grMD;
initgraph(&grDR,&grMD,grPats);
L = graphresult();
if(L!=grOk)
{ cout<<"\n Loi Khoi tao do hoa: "<<grapherrormsg(L);
if(L==grFileNotFound) // neu co loi duong dan thi nhap lai
{ cout<<"\n Cho duong dan toi BGI hoac an <Ctrl-Break> de dung Chuong trinh\n";
cout<<" Duong dan la: ";
fflush(stdin);
gets(grPats);
}
else exit(0);
}
} while(L!=grOk);
return;
}
////////////////
Các bạn về tham khảo và phát triển thêm

thuonghcm
17-09-2008, 00:43
trời ạ, đọc code muốn lòi con mắt luôn...hic
Bạn có thể cho xin THUAT TOAN hôn
thanks you

echoArray
18-09-2008, 01:00
mấy ông làm kinh qua. chi tui cai co ban di

hung06061995
21-09-2008, 21:34
phần mềm của mình nè :

anitsoft excaro

http://ddth.com/showthread.php?t=111681

các bạn xem qua nhé !
phẦn mỀm nÀy mÌnh ĐÃ dÙng thỬ. Hay ĐẤy nhƯng cÓ 1 ĐiỂm ĐÁng lƯu Ý lÀ tỚ ĐÃ tÌm ra cÁch ĐÁnh thẮng mÁy. 10 trẬn thẮng 10. NẾu chƯƠng trÌnh biẾt tỰ lƯu lẠi nƯỚc Đi cỦa ngỪoi chƠi vÀ tÌm ĐƯỢc cÁch xỬ lÝ thÌ hay quÁ

bld
22-09-2008, 20:24
máy tính phải biết rút kinh nghiệm , đó là ưu điểm của 1 chương trình hay !
nhưng ai không tìm ra con đường dẫn dến chiến thắng thì phần mềm này cũng không phải là dễ dàng đâu (như mình nè) vì máy tính có cái cẩn thận nhưng rất nhanh và chính xác ( thấy nó đánh mà chắc quá à ) :)

neiht1992
24-09-2008, 13:00
tui cũng không down được