Hilo game

[Doug101]

heres my Hilo game

[repsoccer16]

pretty good game...could use more specifics on how far away you are from the number. For example warm,hot, cold, etc.

[repsoccer16]

so try to make a revised version if you have time and repost it and i'll give you more feedback.

[Doug101]

k ill work on it. it might take a while cause ive got other stuff to do thanks for the feedback repsoccer16.

[repsoccer16]

your welcome and just msg me when you are done fixing it.

[Doug101]

it might take a month or so.

[petree08]

If it takes a month to make the guess a number game there is something wrong

[Doug101]

no it will take a month because i have other stuff to do and im not being graded on this one anymore.

[Doug101]

if you have been having trouble downloading the game ill post it again as text.

[Doug101]

/***********************************************************/
/* Title: HiLo game */
/* Date: March 04/08 */
/* Name: Douglas Mick */
/* Description: The computer chooses a random */
/* number and ask you to guess it. */
/* */
/***********************************************************/


%Variables
randomize
var num : int
var num1 : int
var answer : string
var count : int:=0
var key : string (1)
var name:string

%Instructions
put"Enter your name"
get name
put"Welcome ",name," to my HiLo game."
delay(2000)

drawfillbox(0,0,639,399,12)
colorback(12)
put"HiLo Game"
put""
put"Instructions"
put"Guess a number in between 1 and 100"
put"If your number is too high it will tell you"
put"If your number is too low it will tell you"
put""
put"Press any key to continue"
getch(key)
cls



%Program
drawfillbox(0,0,639,399,46)
colorback(46)
loop
randint (num, 1, 100)
loop
put "Pick a number between 1 and 100"
get num1
count:=count+1
if num1 < 1 or num1 > 100 then
cls
put "The number you have entered is out of range."
elsif num1 > num then
cls
put "Im sorry ",name," that number is too high."
elsif num1 < num then
cls
put "Im sorry ",name,"that number is too low."
end if
exit when num1 = num
end loop
cls
put "congratulations ",name," you have guessed correctly."
put "you guessed ",count," numbers."
put name," would you like to try again?"
put "(y/n)"
get answer
count:=count-count
cls
exit when answer = "n" or answer ="N"
end loop

[Michael516]

i also have one

[Doug101]

micheal its my hilo game not yours but ok u can post

[2qwerty]

hey

[2qwerty]

hello

[2qwerty]

spam