Ranomize Problem - GameCreators Forum

Author

Message

cguy

16

Years of Service

User Offline

Joined: 3rd Nov 2007

Location: In my Computer!

Posted: 8th Jul 2008 07:37

Link

I am trying to make it so that one of the letters A, B, or C appear on the screen and it differs each time the program is run.

+ Code Snippet

randomize timer()
rnd(2) = x
if x = 0 then print "A"
if x = 1 then print "B"
if x = 2 then print "C"

Only "A" ever apears on the screen! Any help?

Back to top

Profile PM

pcRaider

17

Years of Service

User Offline

Joined: 30th May 2007

Location:

Posted: 8th Jul 2008 10:08

Link

Try this

+ Code Snippet


randomize timer()
x = rnd(2)
if x = 0 then print "A"
if x = 1 then print "B"
if x = 2 then print "C"

Back to top

Profile PM

cguy

16

Years of Service

User Offline

Joined: 3rd Nov 2007

Location: In my Computer!

Posted: 8th Jul 2008 10:15

Link

wow...I think I tried everyhting except that! Thanks!

Back to top

Profile PM

Moe

18

Years of Service

User Offline

Joined: 1st Apr 2006

Location: Sunny California

Posted: 8th Jul 2008 22:55

Link

The variable on the left of the equal sign gets set to the variable on the right. So you were trying to set rnd(2) to x, whose default value was zero, so rnd(2) was getting set to zero, and x, staying at zero, made it so only A was printed.

parrot

Back to top

Profile PM Email

cguy

16

Years of Service

User Offline

Joined: 3rd Nov 2007

Location: In my Computer!

Posted: 9th Jul 2008 20:28

Link

I created a program (idea from a tutorial by TDK) that generates a random number and a random range on which to pick it and lets you guess a the number.

rem numbergame
rem 8 july 2008

rem set window specifics
set window size 1280, 800
set window title "Number Game"

rem input your name for use later in the game
print "Your Name Here: ";
input name$
cls
wait 2000

POINTA:
rem set random ranges by variables of 10
randomize timer ()
r = rnd(9)
if r = 0 then a = x; v = 100
if r = 1 then b = x; v = 90
if r = 2 then c = x; v = 80
if r = 3 then d = x; v = 70
if r = 4 then e = x; v = 60
if r = 5 then f = x; v = 50
if r = 6 then g = x; v = 40
if r = 7 then h = x; v = 30
if r = 8 then i = x; v = 20
if r = 9 then j = x; v = 10

rem generate random number within specific range
randomize timer ()
a = rnd(99) + 1
b = rnd(89) + 1
c = rnd(79) + 1
d = rnd(69) + 1
e = rnd(59) + 1
f = rnd(49) + 1
g = rnd(39) + 1
h = rnd(29) + 1
i = rnd(19) + 1
j = rnd(9) + 1

rem main loop
print name$;", I'm thinking of a number between 1 and ";v
wait 2000
do
print "Your Guess: ";
input guess
inc guesscount
cls
if guess > x then print "Too High"
if guess < x then print "Too Low"
if guess = x
   print "Good Job, ";name$;"! You Win!"
   wait 3000
   print "It took you ";guesscount;" tries!"
   wait 5000
   cls
   goto pointa:
endif
loop

+ Code Snippet

rem numbergame
rem 8 july 2008

rem set window specifics
set window size 1280, 800
set window title "Number Game"

rem input your name for use later in the game
print "Your Name Here: ";
input name$
cls
wait 2000

POINTA:
rem set random ranges by variables of 10
randomize timer ()
r = rnd(9)
if r = 0 then a = x; v = 100
if r = 1 then b = x; v = 90
if r = 2 then c = x; v = 80
if r = 3 then d = x; v = 70
if r = 4 then e = x; v = 60
if r = 5 then f = x; v = 50
if r = 6 then g = x; v = 40
if r = 7 then h = x; v = 30
if r = 8 then i = x; v = 20
if r = 9 then j = x; v = 10

rem generate random number within specific range
randomize timer ()
a = rnd(99) + 1
b = rnd(89) + 1
c = rnd(79) + 1
d = rnd(69) + 1
e = rnd(59) + 1
f = rnd(49) + 1
g = rnd(39) + 1
h = rnd(29) + 1
i = rnd(19) + 1
j = rnd(9) + 1

rem main loop
print name$;", I'm thinking of a number between 1 and ";v
wait 2000
do
print "Your Guess: ";
input guess
inc guesscount
cls
if guess > x then print "Too High"
if guess < x then print "Too Low"
if guess = x
   print "Good Job, ";name$;"! You Win!"
   wait 3000
   print "It took you ";guesscount;" tries!"
   wait 5000
   cls
   goto pointa:
endif
loop

The problem seems to be the same one as before! Only the default value zero is ever the random number. I don't think it's the same problem as before, because all the variables seem to be on the correct side of the equel sign.

Back to top

Profile PM

cguy

16

Years of Service

User Offline

Joined: 3rd Nov 2007

Location: In my Computer!

Posted: 9th Jul 2008 23:31

Link

I changed it to "y", but it still stayed zero.

Back to top

Profile PM

nackidno

17

Years of Service

User Offline

Joined: 3rd Feb 2007

Location: Där solen aldrig skiner

Posted: 9th Jul 2008 23:57 Edited at: 9th Jul 2008 23:59

Link

Just a quick tip, though it has nothing to do with the issue you are having. Instead of this :

print "Your Name Here: ";
input name$

you can write this :

input$, "Your name here: ", name$

It's easier and spare you one line in your program.

- Elias, Damezean, Nackidno, Wonderboy

AntocGames - http://antocgames.se.nu/

Back to top

Profile PM Email Website

cguy

16

Years of Service

User Offline

Joined: 3rd Nov 2007

Location: In my Computer!

Posted: 10th Jul 2008 02:07

Link

Just an update, my program does works sometimes, though it is no comfort

Back to top

Profile PM

Sixty Squares

18

Years of Service

User Offline

Joined: 7th Jun 2006

Location: Somewhere in the world

Posted: 10th Jul 2008 03:27 Edited at: 10th Jul 2008 03:28

Link

Quote: "You never assign any value to 'x'. It stays zero all the time."

^correct

Quote: "I changed it to "y", but it still stayed zero. "

The name of the variable wasn't the problem.

What is the number for the person to guess? It's "x", right? Well, what is "x" equal to? You need to set x equal to something. For example, x=5 would set x equal to 5. The number to guess would be 5. x=rnd(50) would set x equal to any number from 0 to 50, and the player would have to guess that number. Right now, because you never give "x" a value, it is equal to 0 because that is the default behavior for that type of variable.

Bottom line, write "x= (insert number here)" somewhere in your program before the player starts guessing!

Metal Runner
Snow Demo

Back to top

Profile PM Email

Sorry your browser is not supported!

Newcomers DBPro Corner / Ranomize Problem