mirror of
https://github.com/coding-horror/basic-computer-games.git
synced 2025-12-21 23:00:43 -08:00
MAINT: Apply 'pre-commit run --all' and fix issues
This commit is contained in:
@@ -2,4 +2,3 @@
|
|||||||
20 PRINT "You entered: ";A;B;C
|
20 PRINT "You entered: ";A;B;C
|
||||||
30 PRINT "--------------------------"
|
30 PRINT "--------------------------"
|
||||||
40 GOTO 10
|
40 GOTO 10
|
||||||
|
|
||||||
|
|||||||
@@ -1,4 +1,2 @@
|
|||||||
10 A=1: B=-2: C=0.7: D=123456789: E=-0.0000000001
|
10 A=1: B=-2: C=0.7: D=123456789: E=-0.0000000001
|
||||||
20 PRINT "|";A;"|";B;"|";C;"|";D;"|";E;"|"
|
20 PRINT "|";A;"|";B;"|";C;"|";D;"|";E;"|"
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@@ -2,5 +2,3 @@
|
|||||||
20 PRINT "2: ";RND(-2);RND(1);RND(1);RND(1)
|
20 PRINT "2: ";RND(-2);RND(1);RND(1);RND(1)
|
||||||
30 PRINT "3: ";RND(-5);RND(1);RND(1);RND(1)
|
30 PRINT "3: ";RND(-5);RND(1);RND(1);RND(1)
|
||||||
40 PRINT "4: ";RND(-2);RND(1);RND(1);RND(1)
|
40 PRINT "4: ";RND(-2);RND(1);RND(1);RND(1)
|
||||||
|
|
||||||
|
|
||||||
|
|||||||
@@ -243,4 +243,3 @@ fn _list_files(vec: &mut Vec<PathBuf>, path: &Path) {
|
|||||||
}
|
}
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@@ -4,4 +4,3 @@ As published in Basic Computer Games (1978), as found at Annarchive:
|
|||||||
|
|
||||||
Conversion to Lua
|
Conversion to Lua
|
||||||
- [Lua.org](https://www.lua.org)
|
- [Lua.org](https://www.lua.org)
|
||||||
|
|
||||||
|
|||||||
@@ -6,85 +6,69 @@ An ancient African game (see also Kalah, Mancala).
|
|||||||
Ported by Dave LeCompte
|
Ported by Dave LeCompte
|
||||||
"""
|
"""
|
||||||
|
|
||||||
"""
|
# PORTING NOTES
|
||||||
|
#
|
||||||
PORTING NOTES
|
# This game started out as 70 lines of BASIC, and I have ported it
|
||||||
|
# before. I find it somewhat amazing how efficient (densely packed) the
|
||||||
This game started out as 70 lines of BASIC, and I have ported it
|
# original code is. Of course, the original code has fairly cryptic
|
||||||
before. I find it somewhat amazing how efficient (densely packed) the
|
# variable names (as was forced by BASIC's limitation on long (2+
|
||||||
original code is. Of course, the original code has fairly cryptic
|
# character) variable names). I have done my best here to interpret what
|
||||||
variable names (as was forced by BASIC's limitation on long (2+
|
# each variable is doing in context, and rename them appropriately.
|
||||||
character) variable names). I have done my best here to interpret what
|
#
|
||||||
each variable is doing in context, and rename them appropriately.
|
# I have endeavored to leave the logic of the code in place, as it's
|
||||||
|
# interesting to see a 2-ply game tree evaluation written in BASIC,
|
||||||
I have endeavored to leave the logic of the code in place, as it's
|
# along with what a reader in 2021 would call "machine learning".
|
||||||
interesting to see a 2-ply game tree evaluation written in BASIC,
|
#
|
||||||
along with what a reader in 2021 would call "machine learning".
|
# As each game is played, the move history is stored as base-6
|
||||||
|
# digits stored losing_book[game_number]. If the human player wins or
|
||||||
As each game is played, the move history is stored as base-6
|
# draws, the computer increments game_number, effectively "recording"
|
||||||
digits stored losing_book[game_number]. If the human player wins or
|
# that loss to be referred to later. As the computer evaluates moves, it
|
||||||
draws, the computer increments game_number, effectively "recording"
|
# checks the potential game state against these losing game records, and
|
||||||
that loss to be referred to later. As the computer evaluates moves, it
|
# if the potential move matches with the losing game (up to the current
|
||||||
checks the potential game state against these losing game records, and
|
# number of moves), that move is evaluated at a two point penalty.
|
||||||
if the potential move matches with the losing game (up to the current
|
#
|
||||||
number of moves), that move is evaluated at a two point penalty.
|
# Compare this, for example with MENACE, a mechanical device for
|
||||||
|
# "learning" tic-tac-toe:
|
||||||
Compare this, for example with MENACE, a mechanical device for
|
# https://en.wikipedia.org/wiki/Matchbox_Educable_Noughts_and_Crosses_Engine
|
||||||
"learning" tic-tac-toe:
|
#
|
||||||
https://en.wikipedia.org/wiki/Matchbox_Educable_Noughts_and_Crosses_Engine
|
# The base-6 representation allows game history to be VERY efficiently
|
||||||
|
# represented. I considered whether to rewrite this representation to be
|
||||||
The base-6 representation allows game history to be VERY efficiently
|
# easier to read, but I elected to TRY to document it, instead.
|
||||||
represented. I considered whether to rewrite this representation to be
|
#
|
||||||
easier to read, but I elected to TRY to document it, instead.
|
# Another place where I have made a difficult decision between accuracy
|
||||||
|
# and correctness is inside the "wrapping" code where it considers
|
||||||
Another place where I have made a difficult decision between accuracy
|
# "while human_move_end > 13". The original BASIC code reads:
|
||||||
and correctness is inside the "wrapping" code where it considers
|
#
|
||||||
"while human_move_end > 13". The original BASIC code reads:
|
# 830 IF L>13 THEN L=L-14:R=1:GOTO 830
|
||||||
|
#
|
||||||
830 IF L>13 THEN L=L-14:R=1:GOTO 830
|
# I suspect that the intention is not to assign 1 to R, but to increment
|
||||||
|
# R. I discuss this more in a porting note comment next to the
|
||||||
I suspect that the intention is not to assign 1 to R, but to increment
|
# translated code. If you wish to play a more accurate version of the
|
||||||
R. I discuss this more in a porting note comment next to the
|
# game as written in the book, you can convert the increment back to an
|
||||||
translated code. If you wish to play a more accurate version of the
|
# assignment.
|
||||||
game as written in the book, you can convert the increment back to an
|
#
|
||||||
assignment.
|
# I continue to be impressed with this jewel of a game; as soon as I had
|
||||||
|
# the AI playing against me, it was beating me. I've been able to score
|
||||||
|
# a few wins against the computer, but even at its 2-ply lookahead, it
|
||||||
I continue to be impressed with this jewel of a game; as soon as I had
|
# beats me nearly always. I would like to become better at this game to
|
||||||
the AI playing against me, it was beating me. I've been able to score
|
# explore the effectiveness of the "losing book" machine learning.
|
||||||
a few wins against the computer, but even at its 2-ply lookahead, it
|
#
|
||||||
beats me nearly always. I would like to become better at this game to
|
#
|
||||||
explore the effectiveness of the "losing book" machine learning.
|
# EXERCISES FOR THE READER
|
||||||
|
# One could go many directions with this game:
|
||||||
|
# - change the initial number of stones in each pit
|
||||||
EXERCISES FOR THE READER
|
# - change the number of pits
|
||||||
One could go many directions with this game:
|
# - only allow capturing if you end on your side of the board
|
||||||
|
# - don't allow capturing at all
|
||||||
- change the initial number of stones in each pit
|
# - don't drop a stone into the enemy "home"
|
||||||
|
# - go clockwise, instead
|
||||||
- change the number of pits
|
# - allow the player to choose to go clockwise or counterclockwise
|
||||||
|
# - instead of a maximum of two moves, allow each move that ends on the
|
||||||
- only allow capturing if you end on your side of the board
|
# "home" to be followed by a free move.
|
||||||
|
# - increase the AI lookahead
|
||||||
- don't allow capturing at all
|
# - make the scoring heuristic a little more nuanced
|
||||||
|
# - store history to a file on disk (or in the cloud!) to allow the AI
|
||||||
- don't drop a stone into the enemy "home"
|
# to learn over more than a single session
|
||||||
|
|
||||||
- go clockwise, instead
|
|
||||||
|
|
||||||
- allow the player to choose to go clockwise or counterclockwise
|
|
||||||
|
|
||||||
- instead of a maximum of two moves, allow each move that ends on the
|
|
||||||
"home" to be followed by a free move.
|
|
||||||
|
|
||||||
- increase the AI lookahead
|
|
||||||
|
|
||||||
- make the scoring heuristic a little more nuanced
|
|
||||||
|
|
||||||
- store history to a file on disk (or in the cloud!) to allow the AI
|
|
||||||
to learn over more than a single session
|
|
||||||
|
|
||||||
"""
|
|
||||||
|
|
||||||
|
|
||||||
game_number = 0
|
game_number = 0
|
||||||
|
|||||||
0
20_Buzzword/java/src/Buzzword.java
Executable file → Normal file
0
20_Buzzword/java/src/Buzzword.java
Executable file → Normal file
1
38_Fur_Trader/c/furtrader.c
Executable file → Normal file
1
38_Fur_Trader/c/furtrader.c
Executable file → Normal file
@@ -472,4 +472,3 @@ int main( void )
|
|||||||
|
|
||||||
return 0; /* exit OK */
|
return 0; /* exit OK */
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@@ -14,37 +14,35 @@ Conversion to MITS BASIC by Steve North
|
|||||||
Port to Python by Dave LeCompte
|
Port to Python by Dave LeCompte
|
||||||
"""
|
"""
|
||||||
|
|
||||||
"""
|
# PORTING NOTES:
|
||||||
PORTING NOTES:
|
#
|
||||||
|
# I printed out the BASIC code and hand-annotated what each little block
|
||||||
I printed out the BASIC code and hand-annotated what each little block
|
# of code did, which feels amazingly retro.
|
||||||
of code did, which feels amazingly retro.
|
#
|
||||||
|
# I encourage other porters that have a complex knot of GOTOs and
|
||||||
I encourage other porters that have a complex knot of GOTOs and
|
# semi-nested subroutines to do hard-copy hacking, it might be a
|
||||||
semi-nested subroutines to do hard-copy hacking, it might be a
|
# different perspective that helps.
|
||||||
different perspective that helps.
|
#
|
||||||
|
# A spoiler - the objective of the game is not documented, ostensibly to
|
||||||
A spoiler - the objective of the game is not documented, ostensibly to
|
# give the human player a challenge. If a player (human or computer)
|
||||||
give the human player a challenge. If a player (human or computer)
|
# advances a pawn across the board to the far row, that player wins. If
|
||||||
advances a pawn across the board to the far row, that player wins. If
|
# a player has no legal moves (either by being blocked, or all their
|
||||||
a player has no legal moves (either by being blocked, or all their
|
# pieces having been captured), that player loses.
|
||||||
pieces having been captured), that player loses.
|
#
|
||||||
|
# The original BASIC had 2 2-dimensional tables stored in DATA at the
|
||||||
The original BASIC had 2 2-dimensional tables stored in DATA at the
|
# end of the program. This encoded all 19 different board configurations
|
||||||
end of the program. This encoded all 19 different board configurations
|
# (Hexapawn is a small game), with reflections in one table, and then in
|
||||||
(Hexapawn is a small game), with reflections in one table, and then in
|
# a parallel table, for each of the 19 rows, a list of legal moves was
|
||||||
a parallel table, for each of the 19 rows, a list of legal moves was
|
# encoded by turning them into 2-digit decimal numbers. As gameplay
|
||||||
encoded by turning them into 2-digit decimal numbers. As gameplay
|
# continued, the AI would overwrite losing moves with 0 in the second
|
||||||
continued, the AI would overwrite losing moves with 0 in the second
|
# array.
|
||||||
array.
|
#
|
||||||
|
# My port takes this "parallel array" structure and turns that
|
||||||
My port takes this "parallel array" structure and turns that
|
# information into a small Python class, BoardLayout. BoardLayout stores
|
||||||
information into a small Python class, BoardLayout. BoardLayout stores
|
# the board description and legal moves, but stores the moves as (row,
|
||||||
the board description and legal moves, but stores the moves as (row,
|
# column) 2-tuples, which is easier to read. The logic for checking if a
|
||||||
column) 2-tuples, which is easier to read. The logic for checking if a
|
# BoardLayout matches the current board, as well as removing losing move
|
||||||
BoardLayout matches the current board, as well as removing losing move
|
# have been moved into methods of this class.
|
||||||
have been moved into methods of this class.
|
|
||||||
"""
|
|
||||||
|
|
||||||
import collections
|
import collections
|
||||||
import random
|
import random
|
||||||
@@ -238,7 +236,7 @@ def get_coordinates():
|
|||||||
try:
|
try:
|
||||||
print("YOUR MOVE?")
|
print("YOUR MOVE?")
|
||||||
response = input()
|
response = input()
|
||||||
m1, m2 = [int(c) for c in response.split(",")]
|
m1, m2 = (int(c) for c in response.split(","))
|
||||||
return m1, m2
|
return m1, m2
|
||||||
except ValueError as ve:
|
except ValueError as ve:
|
||||||
print_illegal()
|
print_illegal()
|
||||||
|
|||||||
@@ -6,13 +6,11 @@ Math exercise/demonstration
|
|||||||
Ported by Dave LeCompte
|
Ported by Dave LeCompte
|
||||||
"""
|
"""
|
||||||
|
|
||||||
"""
|
# PORTING NOTE
|
||||||
PORTING NOTE
|
#
|
||||||
|
# The title, as printed ingame, is "NICOMA", hinting at a time when
|
||||||
The title, as printed ingame, is "NICOMA", hinting at a time when
|
# filesystems weren't even 8.3, but could only support 6 character
|
||||||
filesystems weren't even 8.3, but could only support 6 character
|
# filenames.
|
||||||
filenames.
|
|
||||||
"""
|
|
||||||
|
|
||||||
import time
|
import time
|
||||||
|
|
||||||
|
|||||||
@@ -60,4 +60,3 @@ fn welcome() {
|
|||||||
|
|
||||||
");
|
");
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|||||||
@@ -6,14 +6,12 @@ A poetry generator
|
|||||||
Ported by Dave LeCompte
|
Ported by Dave LeCompte
|
||||||
"""
|
"""
|
||||||
|
|
||||||
"""
|
# PORTING EDITORIAL NOTE:
|
||||||
PORTING EDITORIAL NOTE:
|
#
|
||||||
|
# The original code is a pretty convoluted mesh of GOTOs and global
|
||||||
The original code is a pretty convoluted mesh of GOTOs and global
|
# state. This adaptation pulls things apart into phrases, but I have
|
||||||
state. This adaptation pulls things apart into phrases, but I have
|
# left the variables as globals, which makes goes against decades of
|
||||||
left the variables as globals, which makes goes against decades of
|
# wisdom that global state is bad.
|
||||||
wisdom that global state is bad.
|
|
||||||
"""
|
|
||||||
|
|
||||||
PAGE_WIDTH = 64
|
PAGE_WIDTH = 64
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user