Tic-Tac-Toe using Pascal

  • July 24, 2010
  • James Skemp
The following is a really old program (November 2003) written in Pacal using Bloodshed Dev-Pascal (which seems to no longer be updated). This is the code in main.pas, which it seems is the only file really necessary. This code is covered by a Creative Commons Attribution-NonCommercial 3.0 license. program TicTacToe (input, output); label begingame, picknumber, checkmove, checkforwin, compmove, winner, nobodywon, playagain, illegalmove, compcrash, endgame; var playmove, turn, points : integer; place1, place2, place3, place4, place5, place6, place7, place8, place9 : char; currentplayer, ynagain, lastwinner : char; begin writeln; writeln('JRSs Tic-Tac-Toe v1.

Read More

Pascal Programming: JRSs Tic-Tac-Toe

  • November 9, 2003
  • James Skemp

JRSs Tic-Tac-Toe is a simple game of Tic-Tac-Toe programmed with Dev-Pascal. It even keeps a tally of your points (win = +1, loss = -1).

Read More

Search
Links of Note
Recent Posts
categories
Support This Site

If my blog was helpful to you, then please consider visiting my Amazon Wishlist.