Poker Game

Previous topic - Next topic

shadok85

Hi there!
I just completed my first small game. It's a variation of the poker game (five card draw poker), common in places like casinos. Currently, a system of doubling your winnings is missing, and the graphics is far from be jaw-dropping. I hope you like it. Feel free to storm me with feedback, criticism and bug reports! =D



[attachment deleted by admin]

Kitty Hello

I don't really understand the thing. There's only one button "Deal" and there's no real message when each round is won/over. Also no message if you've won/lost.

It works pretty good and recognizes the matches fine for my quick tests.

shadok85

Quote from: Kitty Hello on 2011-Mar-03
I don't really understand the thing. There's only one button "Deal" and there's no real message when each round is won/over. Also no message if you've won/lost.

What do you mean? Can you read the messages (You got a Jack or high, You got three of a kind, You won 1, etc) in the middle of the screen when you have a winning hand? Is this method to visualize winnings too uncomfortable?

Kitty Hello

I'm just not familiar with this type of game I think.

shadok85

Eheh, I just know this variant of the poker... I don't like to play with money, following the rule of the other variant like, say, Texas Hold'em, and stuff like that. This is just a conversion of a videopoker that my father made about fifteen years ago. It was coded first in AMOS (on Amiga platform), then in Blitz Basic (again on Amiga) and finally in Visual Basic 6.0 on Windows.
Ok, in the next release I will attach a guide for those who have never seen this kind of poker.

shadok85

Hi,
a friend of mine has a HP pavillon dv6000, and the game doesn't run at all. All that we can see is a black window, then the computer hangs itself up and we have to restart manually. Here are the specs:

Windows Vista Home Premium SP2 32bit
Intel Core 2 Duo processor T5600 (1.83 GHz)
NVIDIA GeForce 8400M GS
4 GB RAM
300 GB Harddisk

The .dat file is in the same directory of the .exe file, it is the only computer where the game doesn't run, as far I know. What could be the problem?

Slydog

I haven't looked at your project, but I would suggest adding logging at various points in your program.
This way you can track if your program reaches a certain routine and such.

When your program crashes, you can narrow down searching for your problem by checking the log and see the last section the code was in.  Your culprit is most likely very close.

Create a function such as
FUNCTION Log: message$
   ... open a file (on C drive? or wherever the user has write access, or pass this function a file name)
   ... write 'message$' to the file (optionally prefix with current date / time)
ENDFUNCTION

My current project (WIP) :: TwistedMaze <<  [Updated: 2015-11-25]

shadok85

Ok, I will try this way. Thx for the help!

shadok85

I did as Slydog suggested me and my friend had the same results: the application didn't start at all! On my computer I can view the log file, while on my friend's computer no log file is created.
I did like this:

Code (glbasic) Select

// --------------------------------- //
// Project: PokerGame
// Start: Tuesday, February 22, 2011
// IDE Version: 9.018

OPENFILE(0, "log.txt", 0)

SYSTEMPOINTER TRUE
LogMessage("SYSTEMPOINTER set on TRUE")

SETSHOEBOX "Data.sbx", ""
LogMessage("SHOEBOX set with parameters \"Data.sbx\" and \"\"")

SETTRANSPARENCY RGB(255,0,128)
LogMessage("Transparency set with RGB(255,0,128)")

LIMITFPS 60
LogMessage("FPS limited at 60")

LOADBMP "background.bmp"
LogMessage("\"background.bmp\" loaded")

LOADFONT "Cambria12x14.png", 0
LogMessage("Font \"Cambria12x14.png\" loaded")

SETFONT 0
LogMessage("Font set on 0")

LOCAL game AS TGame

GETFONTSIZE game.fontW, game.fontH
LogMessage("Font size got")

GETSCREENSIZE game.screenW, game.screenH
LogMessage("Screen size got")

game.initAll()

WHILE game.gameOver% = FALSE
game.updateGame()
game.renderGame()
SHOWSCREEN
WEND

// ------------------------------------------------------------- //
// ---  LOGMESSAGE  ---
// ------------------------------------------------------------- //
FUNCTION LogMessage: message$
OPENFILE(0, "log.txt", -1)
WRITELINE 0, message$
CLOSEFILE 0
ENDFUNCTION // LOGMESSAGE


So, I passed a simple application to my friend, like this:

Code (glbasic) Select

CLEARSCREEN RGB(0,0,0)
PRINT "This is a test", 0, 0
SHOWSCREEN
KEYWAIT // or MOUSEWAIT


Well, a black window with the "This is a test" string is showed, after that the application hangs itself and my friend is forced to restart the PC.

shadok85

So, no ideas, no help? O_O

Kitty Hello

No. What OS is this?
It's really strange. Update the drivers for the gfx card, maybe? But it sounds really weird. You have SHOIWSCREEN in the loop, right?

shadok85

He runs Vista Home Premium Edition 32bit , with Service Pack 2 and, yes, the last call in the main loop is SHOWSCREEN, of course. I posted the infos in the previous posts.
Perhaps he should update the gfx drivers... Well, I will let you know about progresses.

shadok85

Ok, so my friend updated the gfx drivers. He told me the game started and he played at it, but it is very slow and when he close the game window, it takes minutes because it hangs itself, after that the window go away. The log.txt that I instructed to write is not saved.