TGC Codebase Backup



Basic Guessing game with added name memory by Sherikanman

18th Dec 2009 22:21
Summary

I jsut figured out how to make it with tutorials and a mix of something i learned earliar



Description



Code
                                    ` This code was downloaded from The Game Creators
                                    ` It is reproduced here with full permission
                                    ` http://www.thegamecreators.com
                                    
                                    Print "hello! welcome to my game! what's your name?"
input "enter name here: ";Name$
Print "Your name is: " ;Name$

Print "Well, ";Name$
Print " Welcome..i hope you have alot of fun here in my game!"


Print " wanna play a game of guess me number? well too bad, you opened this file..you have to ";Name$


Randomize (Timer())
MyRandomNumber = RND (10)

Print "My guess is between 1 and 10"

Repeat

Input "Your guess: ";MyGuess

     If MyGuess = MyRandomNumber
        GuessedRight = 1
        Print "Cool you found it ";Name$
     Else
        GuessedRight = 0
        Print "Try again ";Name$
     EndIf

 Until GuessedRight = 1

wait key
end