User typing in programs.

[Bhaliar]

Okay, so I am trying to make a hangman game, and started with trying to make something that lets the user type in a letter. The word is then searched, and the letter is put at a spot in the screen.

I ran into a problem though. When I execute my program, no matter what letter I type, A comes out. Below is the program. Can anyone tell me what I did wrong and how I can fix it?

:0->B
:Lbl 1
:" "->Str2 // One space.
:0->K
:While K=0
:getkey->K
:End
:K-(K-1)->K
:sub("ABCDEFGHIJKLMNOPQRSTUVWXYZ",K,1)->Str2
:Output(1,B+1,Str2
:Goto 1

My idea was, when you hit the letter, It is stored to K. K is then subtracted by one less then itself, so if K was 41, then it would be 41-(41-1)->K. It then uses sub to retrieve the right letter nd output the letter, But whenever I use it, it outputs a for every letter, and then wont put out anymore letters.

[Ed H]

Take a closer look at the expression K-(K-1). What does that simplify to?


You have the right idea! Perhaps you could get a few ideas from this routine.

[GloryMXE7]

your math is wrong
k-(k-1) will always output 1
and even if you math was right it still wouldn't work
because the getkey codes dont go 1,2,3,4,5...,n

darn too late

[Bhaliar]

[Ed H]

One thing you should notice and take advantage of is that the getkey pattern for letters follows a fairly regular pattern. The only problem is, the line with A, B, and C only has 3 letters, while the rest of the lines have 5 letters. The clever thing to do is to use dummy characters, like sub("ABC**DEFGHIJKLMNOPQR....

Then, the only thing that remains is to somehow get the getkey values 41, 42, 43, 44, 45, 51, 52, 53, 54, 55, 61, etc. to increase linearly. Some clever int( and fPart(ing should do the trick.

Spoiler: [whiteout]K-15-5int(.1K[/whiteout] works with my string.

[GloryMXE7]

some alternatives
input "Guess:",Str1
or
1->x
"ABCDEFGHIJKLMNOPQRSTUVWXYZ->Str1
DelVar kwhile k≠105
getkey->k
x+(k=26)-(k=24
if (26-ans)(ans-1)<0
27-ans-Not(ans
ans->x
output (1,1,sub(Str1,ans,1
end
sub(Str1,x,1->Str2

[Bhaliar]

[GloryMXE7]

it didnt work because you did k-(k-1 again but coded it different
k-(K-1)=k-k+1=1

[Bhaliar]

[Bhaliar]

In theory could I use instring for String of "31,32,33,41,42 etc?
Then the number it returns is stored to K and then k is used for sub(abcdef etc.

[Bhaliar]

ahah got it. Use instring of string "414243515253545561626364657172737475768182838485919293" stored to C. Then C+ (B+1) The B will be -1 first and then progress.

[Weregoose]

Now that's what programming is all about.

[kinkoa]

hangman... used to play that on a dry erase board but never on a calculator

[Bhaliar]

Ugh. ran into a diffrent problem. I can't get instring to serch for the numbner related to a variable. trying someother things, but not really working. Took a break for a maze game.

[kinkoa]

i feel stupid now i actually looked at the keys to see what was on the lines 4-9 for your instring and after trying to figure it out for about three minutes i realized it was the letter keys

[Ed H]

You had the right idea earlier. Here's one way to go from a getKey value to a letter:

[ztrumpet]

Also, a great way to check if a word is in a String:

Inputs:
Str1 contains everything seperated with spaces. Ex of Str1: " HI THIS COULD BE USEFULL IN YOUR GAME RANDOM WORDS MAKE SURE OF THE SPACE "
Str2 contains the word you want to know if it's in the string. Ex of Str2: "RANDOM"

not(not(inString(Str1," "+Str2+" "

Output:
1: It's in there
2: It's not in there.

[Bhaliar]

Well I was trying not to use the exact codes, but im gonna try using Ans-15-5int(.1K) Etc.

I already knew how I was gonna do word selection. String 4 and 5 will contain a list of five lettered words and four lettered words. I will Take one out and store it to string 3. Then because the letter is in string 2 use instring to get the number and store it to a variable. This number controls where on the screen the letter is output.