Exchange Forum > AutoCAD Games
Classic Poker Game
Classic Poker Game

#1
AVLISP
Join Date:
09-28-2007
 Here is a classic poker game on Lisp
 
Hopefully you make a lot of money.
 
The game is played with one deck. When the deck is down to 10 cards it will shuffle a new deck.
There is also a variable to play Jack -or-Better mode.
Set variable to 1 for Jack or better
Set variable to 0 for all pairs to win.
 
Enjoy
 
AVLISP

Attachments  PokerGame.zip  
Classic Poker Game

#2
Adesu
Join Date:
10-03-2007
 Hi AVLISP,
It's interest and cool, but I can not ply it.
 
Quote: 
Here is a classic poker game on Lisp 
  
Hopefully you make a lot of money. 
  
The game is played with one deck. When the deck is down to 10 cards it will shuffle a new deck. 
There is also a variable to play Jack -or-Better mode. 
Set variable to 1 for Jack or better 
Set variable to 0 for all pairs to win. 
  
Enjoy 
  
AVLISP
Classic Poker Game

#3
AVLISP
Join Date:
09-28-2007
Quote: 
Hi AVLISP, 
It's interest and cool, but I can not ply it.
 
Hello Adesu,
 
I tried that this game could run in Acad 2000+. Actually I made it in Acad 2007.
Once you have the drawing opened, load the game and enter (c:poker).
 
You must first place your bet, by either clicking on the [Bet One] button or the [Max Bet] button. then click on [DEAL]. the game is programmed to use only the left button on the mouse. If you want to quit click on the [EXIT] button. So try not to click the right button on the mouse.
 
When you click the [DEAL] button, it will give you five cards. If you believe you could use some of those cards, click the [HOLD] button. If a card is on HOLD, and you don't want it any more, click it again.
 
The poker will only pay after the second hand is dealt and a winning hand is obtained. So you must select [HOLD] your cards on the first hand only, so choose wisely.
 
Hope this helps.
Avlisp