Figure out (and maybe finish) this program
» > >
»
» View previous topic :: View next topic  
Once upon a time I decided to make a casino war program. I haven't looked at in a while, and I'm quite confused about the flow of the program.
Here's the code:

Code:
:"Casino War
:DCS6
7E4E814181418141814181419D5D914591458141814181418141814181417E3E
ClrDraw:FnOff :AxesOff:PlotsOff :ClrHome:0→Xmin:94→Xmax:0→Ymin:62→Ymax
If 1337=det([[42
real(9,0
Lbl RD
ClrDraw
Text(-1,0,39,"WAR
For(X,0,94
For(Y,0,7
Pxl-Change(X,Y
End
Pxl-Change(15,X
End
For(X,8,15
Pxl-On(x,0
Pxl-On(X,94
End
Text(8,2,"Place your bet.
Text(16,10,"Dealer
Text(16,70,"You
Text(57,10,"Bank:
4→dim(ʟWAR
If ʟWAR(1)≤0
100→ʟWAR(1
Text(57,28,ʟWAR(1
Lbl B
0→ʟWAR(2
"                                 "
Text(57,50,"Bet:"+Ans
63→P
Text(57,P,0
Lbl PB
Repeat K≠0
getKey→K
End
If P≥93 or K=105
Goto CB
IF K=92:Then
1+ʟWAR(2)→ʟWAR(2
Text(57,P,1
End
If K=1-2:Then
Text(57,P,2

I must finish the code block later.
[/url]
Well, I am also somewhat confused. It could use some optimization, as I am a little concerned about this last line:

Code:

If K=1-2:Then
Text(57,P,2


In addition to this:

Code:

"                                 "
Text(57,50,"Bet:"+Ans

Other than that, I feel that it might be a good idea to try and complete your own programs, as it will help to teach you many things, and will give you a program that you can distribute as your own. Many people are working on their own projects right now, and some are not ready to tackle a new problem and try and figure out what someone else did. I wish you the best of luck in finding a way to complete your program, and believe that this could be quite a good game once it was complete.
  
Register to Join the Conversation
Have your own thoughts to add to this or any other topic? Want to ask a question, offer a suggestion, share your own programs and projects, upload a file to the file archives, get help with calculator and computer programming, or simply chat with like-minded coders and tech and calculator enthusiasts via the site-wide AJAX SAX widget? Registration for a free Cemetech account only takes a minute.

» Go to Registration page
Figure out (and maybe finish) this program
»
» View previous topic :: View next topic  
Page 1 of 1
» All times are UTC - 5 Hours
 
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum

 

Advertisement