turing choice

[starcraft]

Im trying to create a numbers choices into a "chain". This is what I have so far.




setscreen ("graphics:v256")
setscreen ("graphics:640,480")


%Set variable choice.
var choice: string
var choice2: string
var leave: string


%OUTPUT TITLE
%Set variable and font.
var font : int
font := Font.New ("timesroman:30")
var height, ascent, descent, internalLeading : int
Draw.Text ("Title Page", 10, 280, font, green)
Draw.Text ("Choose 1 or 2:", 10, 240, font, green)
%Add anything else you want to the title page.


%SET UP CONSTRUCT FOR OUTPUT OF CHOICE 1 OR 2.
%Set the prompt at x,y.
locatexy(270,250)
get choice:*

%Clear screen.
cls

%Set up if/elsif/else contruct for output.
if choice = "1" then
put "You choose 1. Hit 'enter' to exit!"
locatexy(280,480)
get choice2:*

elsif choice="2" then
put"You choose 2. Hit 'enter' to exit!"
locatexy(280,480)
get choice2:*
else
%When the answer to the condition is not one of the choices, the execution
%transfers here.
put "Try Again"

end if





var font2 : int
font2 := Font.New ("timesroman:30")
var height2, ascent2, descent2, internalLeading2 : int
Draw.Text ("Title Page", 10, 280, font2, brightred)
Draw.Text ("Choose 1 or 2:", 10, 240, font2, brightred)


%Set the prompt at x,y.
locatexy(270,250)
get choice2:*

%Clear screen.
cls

%Set up if/elsif/else contruct for output.
if choice2 = "1" then
put "You choose 1. Hit 'enter' to exit!"
locatexy(280,480)
get choice:*

elsif choice="2" then
put"You choose 2. Hit 'enter' to exit!"
locatexy(280,480)
get leave:*
else
%When the answer to the condition is not one of the choices, the execution
%transfers here.
put "Try Again"

end if

%OUTPUT END STATEMENT
%--------------------------------------------------------------------
cls
%Output end statement.
locatexy(200,300)
put"The end."

[starcraft]

this just let you to acces a title page, got to one choice selection, and then goto another choice selection, then the end page.

Im trying to figure out, like would it be possible to go to choice2, then come back to choice 1 from choice 2, without accessing the end page.

I tried to change the,


if choice2 = "1" then
%Drawn out outputs here including moving object for first choice.
put "You choose 1. Hit 'enter' to exit!"
locatexy(280,480)
get choice:*

elsif choice="2" then
%Drawn out outputs here including moving object for first choice.
put"You choose 2. Hit 'enter' to exit!"
locatexy(280,480)
get leave:*


the get leave to get choice, but it doesn't work, can someone help out?

[jamonathin]

First and foremost, please use code tags.

code:

[code] {Put Code Here} [/code]

Secondly, welcome to the forums. Now what you're going to want to do is learn loops - you can go to the Turing Walkthrough and there will be a tutorial for you in there.

Your coding is setup in a linear manner, meaning it runs from top to bottom and that's it.


Here is a quick example:

Turing:

var choice : int %Our variable loop     cls     put "Enter your choice (0 exits): " ..     get choice  %Getting choice     exit when choice = 0 %Telling loop to end when choice = 0     cls     put "You have selected choice ", choice, "!"     put "\n Press Any Key to Continue"     Input.Pause %Wait's for an input to continue end loop

Everything in the loop keeps going over and over (looping) until CHOICE = 0. Loop's are fairly easy to work with once you understand them, just read up that loop tutorial and you should do fine .

[Clayton]

actually another (no offense jamon) is to use procedures (procs) these are little compartments of code that you can call on from your main line and are very useful in reducing redundant code, check the Turing Walkthrough for the tut on them

[starcraft]

thx, because I'm try to create pacman using this method, So it's like you move down 1 square, you hit S key, move up you hit W key. etc, So it's just like a huge chain of choices.

[HellblazerX]

If you're using that for keyboard input, then you might as well use the Input.KeyDown method. There's a nice tutorial for it here.