I stole (borrowed) some of Jim’s Klondike code, and made what I thought a general template might be. The code is very inefficient, but it gets the job done.

I also looked at your plan
1. Determine what type of hand a player has.
Well, if you understand the code that the BASIC version used, you should just be able to transcribe this. Otherwise, just compare the seven cards, and return the rank of the hand (1 for straight flush, 2 for four of a kind, ect) and the highest card of that set (1 for ace, 2 for king) and compare the ranks, and if the same, the highest card

I made a general template that shows two random (and I believe never the same) cards, and then the five cards one at a time. If I remember how to play the game.

Maybe, but I’m not very good at thinking of different ways of programming or making a program more efficient. All the lua programs that I have ever made have all had only one paint section , and I would just program it with if this screen, then paint this, if this screen, then paint this, ect.

Okay, I changed it a little to get it to work, but a big problem was that you were trying to compare a number and a string.
However, I noticed that if you multiply the string of a number by one, it makes it that number.
Also, I moved the congrats and correcting strings into the function on.paint(gc) section
My changes are probably w=quite ugly and inefficient, but it gets all the way to the “lets get rolling” string

Code: [Select]

--[[TI-nspire Hold 'em - A Lua Remake
History:
v0.01 Created 2012/09/23 really started working 2012/10/07
Buggy can hardly do anything, currently can change Chips, Big Blind, Small Blind]]--

function init_variables()
  cc=0
  bb=0
  sb=0
  gopt=1
  scrn=1
  message=""
end

init_variables()
 
 function on.paint(gc)
    gc:setFont("sansserif","r",10)
    gc:setColorRGB(0,0,0)
  -- gc:setPen("thin","smooth")  Is this necessary?
  if scrn==1 then
   gc:drawString("[c] Chips        " .. cc,10,10,"top")
   gc:drawString("[b] Big Blind    " .. bb,10,25,"top")
   gc:drawString("[s] Small Blind  " .. sb,10,40,"top")
   gc:drawRect(10,70,20,20)
   if message=="wrong" then
       gc:drawString("Check these conditions",10,70,"top")
    gc:drawString("Chips between 100 and 10 million",10,85,"top")
    gc:drawString("Big blind between 0.001 and 0.1 Chips",10,100,"top")
    gc:drawString("Small blind between 0.01 and 0.5 Big Blind",10,115,"top")
    end
  elseif scrn==3 then
   gc:drawString("Right let's get rolling!",10,10,"top")
  end
  if scrn==2 then
   if message=="congrats" then
    gc:drawString("Congrats! Settings set up correctly",10,70,"top")
   end
   end
 end

function on.charIn(ch)
  if ch >= "0" and ch <= "9" then    -- checking for digit inputs
   if scrn==1 then
    if gopt==1 then
     if string.len(cc) <= 7 then   -- limit string length
      cc = cc .. ch            -- concatenate
      platform.window:invalidate()   -- screen refresh
     end
    elseif gopt==2 then
     if string.len(bb) <= 6 then -- and sb <= 0.1bb then   -- limit string length and bb to <= 0.1cc (now moved)
      bb = bb .. ch            -- concatenate
      platform.window:invalidate()   -- screen refresh
     end
    elseif gopt==3 then
     if string.len(sb) <= 6 then -- and sb <= 0.1bb then   -- limit string length and sb to <= 0.1bb (now moved)
      sb = sb .. ch            -- concatenate
      platform.window:invalidate()   -- screen refresh
     end
    end
   end
  end
--Game settings keys
  if scrn==1 then
   if ch=="c" then     --Ok there must be a way to optimise this block
    gopt = 1   
  elseif ch=="b" then
    gopt = 2
   elseif ch=="s" then
    gopt = 3
   end
   platform.window:invalidate()
  end
end

function on.enterKey()
cc=1*cc
bb=1*bb
sb=1*sb
  if scrn==2 then
   scrn=3
  end
  if scrn==1 and cc >= 100 and cc <= 10000000 and bb >= 0.001*cc and bb <= 0.1*cc and sb >= 0.01*bb and sb <= 0.5*bb then
    message="congrats"
    scrn=2
    gopt=0
   else
    message="wrong"
   end
   
end

function on.backspaceKey()
  if gopt==1 then     --Ok there must be a way to optimise this block. Again.
   cc = string.usub(cc,0,-2)  -- deleting last char
    elseif gopt==2 then
   bb = string.usub(bb,0,-2)  -- deleting last char
 elseif gopt==3 then
   sb = string.usub(sb,0,-2)  -- deleting last char
 end
    platform.window:invalidate() 
end

platform.window:invalidate()


OMG Thank you. I didn't realise before all the work you did into fixing it (how do you do it so quickly and efficiently?) but yes I detected the problem comparing the number with the string but I didn't know how to fix that.
I'll probably remove the congrats setup messages as I move on. That was just a visual indication to test if it worked (which it obviously didn't). Also will change the c b s keys to just moving up and down with arrow keys or something.

My Klondike game is one of the first things I made, my code isn't that good. But if it helps you, go ahead and dig through it

That would help, thanks.

Yep. I programmed the original TI-nspire Hold 'em Basic, and started working on this Lua version. The winner detection process and increasing blinds haven't been implemented in the Basic version yet however.

Yes that's a good idea, I'll see what I can do with that, though programming arrow keys to move up and down the menu would still be useful.

EDIT: 1700 posts!

I am going to try continuing this... AGAIN.
Still that piece of code up there took close to over 7 hours?

Sorry I meant my own code, vaguely, it took me many hours just to get to that stage. And it's not even 10% complete.

Hope to get back into this soon. And Lua Programming in general.
Also I didn't realise my v1.2.4 didn't release on ticalc.org or on here either.