Computer Chess Club Archives


Search

Terms

Messages

Subject: Re: Delphi version of TSCP

Author: Dann Corbit

Date: 13:25:45 12/18/00

Go up one level in this thread


On December 18, 2000 at 04:14:30, Steve Maughan wrote:

>You may be interested to know that Robert Lee has converted TSCP v 1.62 into
>Object Pascal.  You will find the code and some discussion at:
>
>http://www.optimalcode.com
>
>This came as a result of me asking, "is VC 6 faster than Delphi 5 for Chess" in
>a Delphi forum (my chess program is a Delphi app).  Robert Lee interest is in
>high performance Delphi code as opposed to computer chess but his results are
>encouraging to those, like myself, who have written Delphi chess apps.
E:\pgn\WINBOA~1\tscpPas>allpas

Tom Kerrigan's Simple Chess Program (TSCP)
version 1.6, 7/17/00
Copyright 1997 Tom Kerrigan

"help" displays a list of commands.

tscp> bench
ply      nodes  score  pv
  1       127    21 c1e3
  2      3413     6 g5e4 d6c7
  3      8861    31 g5e4 d6c7 c1e3
  4    131417    11 g5e4 d6c7 c1e3 c8d7
  5    534460    26 c2a4 d6c7 g2d5 e6d5 c1e3
Time: 3865 ms
ply      nodes  score  pv
  1       127    21 c1e3
  2      3413     6 g5e4 d6c7
  3      8861    31 g5e4 d6c7 c1e3
  4    131417    11 g5e4 d6c7 c1e3 c8d7
  5    534460    26 c2a4 d6c7 g2d5 e6d5 c1e3
Time: 3846 ms
ply      nodes  score  pv
  1       127    21 c1e3
  2      3413     6 g5e4 d6c7
  3      8861    31 g5e4 d6c7 c1e3
  4    131417    11 g5e4 d6c7 c1e3 c8d7
  5    534460    26 c2a4 d6c7 g2d5 e6d5 c1e3
Time: 3856 ms

Nodes: 534460
Best time: 3846 ms
Nodes per second: 138965
tscp> quit
Illegal move.
tscp>
Exception EAccessViolation in module AllPas.exe at 0000B288.
Access violation at address 0040B288 in module 'AllPas.exe'. Read of address
00000000.
 {oops, forgot it's 'bye'}

Tom Kerrigan's Simple Chess Program (TSCP)
version 1.71, 11/30/00
Copyright 1997 Tom Kerrigan

"help" displays a list of commands.

Here is his current version, with the code "factory fresh (IOW -- no changes)":
tscp> bench

8  . r b . . r k .
7  p . . . . p p p
6  . p . q p . n .
5  . . . n . . N .
4  . . p P . . . .
3  . . P . . . P .
2  P P Q . . P B P
1  R . B . R . K .

   a b c d e f g h

ply      nodes  score  pv
  1        130     20  c1e3
  2       3441      5  g5e4 d6c7
  3       8911     30  g5e4 d6c7 c1e3
  4     141367     10  g5e4 d6c7 c1e3 c8d7
  5     550822     26  c2a4 d6c7 g2d5 e6d5 c1e3
Time: 3375 ms
ply      nodes  score  pv
  1        130     20  c1e3
  2       3441      5  g5e4 d6c7
  3       8911     30  g5e4 d6c7 c1e3
  4     141367     10  g5e4 d6c7 c1e3 c8d7
  5     550822     26  c2a4 d6c7 g2d5 e6d5 c1e3
Time: 3365 ms
ply      nodes  score  pv
  1        130     20  c1e3
  2       3441      5  g5e4 d6c7
  3       8911     30  g5e4 d6c7 c1e3
  4     141367     10  g5e4 d6c7 c1e3 c8d7
  5     550822     26  c2a4 d6c7 g2d5 e6d5 c1e3
Time: 3355 ms

Nodes: 550822
Best time: 3355 ms
Nodes per second: 164179 (1116.1 MIPS)
tscp>

So, indeed, there seems to be very little difference between C and Pascal as far
as the generated binaries.

He may have done some changes.  I have not poured over the code to see if he
tweaked anything for speed.



This page took 0 seconds to execute

Last modified: Thu, 15 Apr 21 08:11:13 -0700

Current Computer Chess Club Forums at Talkchess. This site by Sean Mintz.