<?pax Dim num_tries, num_to_guess = 40, Message = "" If HasProperty("number_tries") Then num_tries = number_tries + 1 Else num_tries = 0 End If If Not HasProperty("guess") Then Message = "Welcome to the guessing machine !" ElseIf toInteger(guess) > num_to_guess Then Message = guess + " is to big. Try a smaller number" ElseIf toInteger(guess) < num_to_guess Then Message = guess + " is too small. Try a large number" Else Message = "Well done!" End If ?> <html> <head><title>Guessing machine</title></head> <body> \%s=Message <br> Guess number: <?pax print num_tries : ?> <form action="<?pax print PAX_SELF : ?>" method="POST"> type your guess here: <input type="text" name="guess"> <input type="hidden" name="number_tries" value="<?pax print num_tries; ?>"> </form> </body> </html>
<?pax var num_tries, num_to_guess = 40, Message = ""; if (HasProperty("number_tries")) num_tries = number_tries + 1; else num_tries = 0; if (!HasProperty("guess")) Message = "Welcome to the guessing machine !"; else if (toInteger(guess) > num_to_guess) Message = guess + " is to big. Try a smaller number"; else if (toInteger(guess) < num_to_guess) Message = guess + " is too small. Try a large number"; else Message = "Well done!"; ?> <html> <head><title>Guessing machine</title></head> <body> \%s=Message <br> Guess number: <?pax print num_tries; ?> <form action="<?pax print PAX_SELF; ?>" method="POST"> type your guess here: <input type="text" name="guess"> <input type="hidden" name="number_tries" value="<?pax print num_tries; ?>"> </form> </body> </html>
<?pax var num_tries, num_to_guess = 40, Message = ''; if HasProperty('number_tries') then num_tries := number_tries + 1 else num_tries := 0; if not HasProperty('guess') then Message := 'Welcome to the guessing machine !' else if toInteger(guess) > num_to_guess then Message := guess + ' is to big. Try a smaller number' else if toInteger(guess) < num_to_guess then Message := guess + ' is too small. Try a large number' else Message := 'Well done!'; ?> <html> <head><title>Guessing machine</title></head> <body> \%s=Message <br> Guess number: <?pax print num_tries; ?> <form action="<?pax print PAX_SELF; ?>" method="POST"> type your guess here: <input type="text" name="guess"> <input type="hidden" name="number_tries" value="<?pax print num_tries; ?>"> </form> </body> </html>