how do you link two commands? - GameCreators Forum

Author

Message

foozle my moose

19

Years of Service

User Offline

Joined: 23rd Jun 2005

Location:

Posted: 24th Jun 2005 05:56

Link

How do you check two IF statements together, and then both being true print a result. Can you do this to ELSE statements as well?

Back to top

Profile PM

NanoBrain

19

Years of Service

User Offline

Joined: 20th Jan 2005

Location: Portland, OR

Posted: 24th Jun 2005 10:25

Link

foozle my moose,

There are a few ways, depending on exactly what you are needing. To simply check two IF statements together, just nest one statement in the other.

Psuedo:

+ Code Snippet

if statement is true
   if statement is true
      run specified code
   endif
endif

Also, an IF statement with a nested IF THEN statement within it is possible.

Psuedo:

+ Code Snippet

if statement is true
   if statement is true then run specified code
endif

Now, an example of an IF ELSE statement with a nested IF THEN and IF statement within it.

Psuedo:

+ Code Snippet

if statement is true
   if statement is true then tun specified code
else
   if statement is true
      run specified code
   endif
endif

Without experimentation, I believe you can even nest IF THEN statements within side eachother.

Psuedo:

+ Code Snippet

if statement is true then if statement is true then run specified code

Don't forget the AND and OR logical operators.

Psuedo:

+ Code Snippet

if statement is true or statement is true and statement is true
   run specified code
endif

Simply, learn the concept of the ability to nest statements within statements. There are many more ways to nest if statements within eachother, and how you use them will depend on your programs' needs. If you have an if statement, which will hold within itself(master) another if statement(slave), remember that the 'master' statement's endif command must be the 'closer', the one at the bottom of the entire if statement.

+NanoBrain+

Back to top

Profile PM Email

gpex

19

Years of Service

User Offline

Joined: 29th May 2005

Location:

Posted: 24th Jun 2005 10:32

Link

i hope this helps...

+ Code Snippet

x = rnd(60) + 1
y = rnd(60) + 1

if x < 30
   if y < 30
      print " x and y are both less than 30!!!"
   endif
endif

this should get the job done...

-gpex-

PS: for the ELSE commands you would just put another if statement under the else...reply if you dont understand.

Your signature has been erased by a mod because it is larger than 600x120...

Back to top

Profile PM Email Website

Oneka

20

Years of Service

User Offline

Joined: 24th Apr 2004

Location: Hampton,VA

Posted: 24th Jun 2005 11:30

Link

or this for a shorter method

+ Code Snippet

x = rnd(60) + 1
y = rnd(60) + 1

if x < 30 and y < 30
   print " x and y are both less than 30!!!"
endif

Making better games everday!
Oh yeah and just so you know its Oh-nek-a not One-ka!

Back to top

Profile PM Email Website

foozle my moose

19

Years of Service

User Offline

Joined: 23rd Jun 2005

Location:

Posted: 25th Jun 2005 05:22

Link

Doing as NanoBrain said, I now get a nesting error. Here is my code:

rem a$ is a verb that the user inputs
rem b$ is a noun that the user inputs
deadhand:
Print "there is a dead hand here!"
input a$
input b$
if a$= "examine"
if b$= "hand" then Print "its a dead hand!"

Whats up?

Back to top

Profile PM

RUCCUS

19

Years of Service

User Offline

Joined: 11th Dec 2004

Location: Canada

Posted: 1st Jul 2005 14:05

Link

Gona need more than that, the ifs and endifs else statements, maybe the whole section of code would help.

Current Projects: SHADE - Game Maker | Mecho - TGC Puzzle Entry | Halo Physics Engine | COLD - Polygonal Collision Detection

Back to top

Profile PM Email Website

NanoBrain

19

Years of Service

User Offline

Joined: 20th Jan 2005

Location: Portland, OR

Posted: 1st Jul 2005 17:01 Edited at: 1st Jul 2005 17:01

Link

foozle my moose

The code below, of yours, is missing the endif part of the if statement. Therefore, the if a$ = "examine" if statement never closes, or ends.

+ Code Snippet

if a$= "examine"
if b$= "hand" then Print "its a dead hand!"

It should be:

+ Code Snippet

if a$= "examine"
if b$= "hand" then Print "its a dead hand!"
endif

+NanoBrain+

Back to top

Profile PM Email

Grog Grueslayer

Valued Member

19

Years of Service

User Offline

Joined: 30th May 2005

Playing: Green Hell

Posted: 2nd Jul 2005 06:33 Edited at: 2nd Jul 2005 06:42

Link

I hate to tell you this foozle my moose... but if your making a text adventure game like the old Infocom text adventures you'd be better off using arrays for everything and select case statements... not 10,000 if statements and gotos for every item. I haven't made a text adventure for Darkbasic yet but i'm going to soon. I threw this code together to give you an idea of how to do it. It's better to load all the data from files (but again I just threw this together). Hope this helps ya.

Also its better to put EXAMINE in the same area as LOOK (as in LOOK AT HAND")... but I didn't do that here because there's no "look" code yet.

dim Word$(15)   ` Words the game knows
dim Word(15)    ` Word numbers (the number is what case to select) Same meaning = same number
dim ItemW$(5)   ` Item word
dim ItemR$(5)   ` Item text for room description
dim ItemL1$(5)  ` Look at text for item  (first line)
dim ItemL2$(5)  ` Look at text for item  (second line)

ItemW$(0)="HAND":ItemR$(0)="there is a dead hand here!"
ItemL1$(0)="The hand reaks of dead flesh.  You can see a gold ring on its finger."

ItemW$(1)="LAMP":ItemR$(1)="a brass lantern is on the floor"
ItemL1$(1)="The lamp has seen better days.  It might still work if you can find fuel."

ItemW$(2)="MATCHBOOK":ItemR$(2)="a matchbook is on the ground"
ItemL1$(2)="On the matchbook is a picture of a horrible creature drinking beer."
ItemL2$(2)="Under the picture is the words Grogs Grotto.  There are 3 matches left."

Word$(0)="N":Word(0)=1       ` Notice all the direction movements have 1 by them?
Word$(1)="S":Word(1)=1       ` Any movement should be taken care of in one area.
Word$(2)="E":Word(2)=1
Word$(3)="W":Word(3)=1
Word$(4)="NE":Word(4)=1
Word$(5)="NW":Word(5)=1
Word$(6)="SE":Word(6)=1
Word$(7)="SW":Word(7)=1
Word$(8)="U":Word(8)=1
Word$(9)="D":Word(9)=1
Word$(10)="IN":Word(10)=1
Word$(11)="OUT":Word(11)=1
Word$(12)="LOOK":Word(12)=2    ` Look and L mean the same so they both have 2 for
Word$(13)="L":Word(13)=2       ` Word()
Word$(14)="EXAMINE":Word(14)=3

a$="EXAMINE"
b$="HAND"
`b$="LAMP"
`b$="MATCHBOOK"

for t=0 to 15
 if a$=Word$(t) then c=Word(t)
next t

select c

` Movement 
 case 1
 endcase
 
 ` Look at room
 case 2
 endcase

` Look at objects
 case 3
 for t=0 to 5
  if ItemW$(t)=b$ then print ItemL1$(t):print ItemL2$(t)
 next t
 endcase

endselect

suspend for key

+ Code Snippet

dim Word$(15)   ` Words the game knows
dim Word(15)    ` Word numbers (the number is what case to select) Same meaning = same number
dim ItemW$(5)   ` Item word
dim ItemR$(5)   ` Item text for room description
dim ItemL1$(5)  ` Look at text for item  (first line)
dim ItemL2$(5)  ` Look at text for item  (second line)

ItemW$(0)="HAND":ItemR$(0)="there is a dead hand here!"
ItemL1$(0)="The hand reaks of dead flesh.  You can see a gold ring on its finger."

ItemW$(1)="LAMP":ItemR$(1)="a brass lantern is on the floor"
ItemL1$(1)="The lamp has seen better days.  It might still work if you can find fuel."

ItemW$(2)="MATCHBOOK":ItemR$(2)="a matchbook is on the ground"
ItemL1$(2)="On the matchbook is a picture of a horrible creature drinking beer."
ItemL2$(2)="Under the picture is the words Grogs Grotto.  There are 3 matches left."

Word$(0)="N":Word(0)=1       ` Notice all the direction movements have 1 by them?
Word$(1)="S":Word(1)=1       ` Any movement should be taken care of in one area.
Word$(2)="E":Word(2)=1
Word$(3)="W":Word(3)=1
Word$(4)="NE":Word(4)=1
Word$(5)="NW":Word(5)=1
Word$(6)="SE":Word(6)=1
Word$(7)="SW":Word(7)=1
Word$(8)="U":Word(8)=1
Word$(9)="D":Word(9)=1
Word$(10)="IN":Word(10)=1
Word$(11)="OUT":Word(11)=1
Word$(12)="LOOK":Word(12)=2    ` Look and L mean the same so they both have 2 for
Word$(13)="L":Word(13)=2       ` Word()
Word$(14)="EXAMINE":Word(14)=3 

a$="EXAMINE"
b$="HAND"
`b$="LAMP"
`b$="MATCHBOOK"

for t=0 to 15
 if a$=Word$(t) then c=Word(t)
next t

select c

 ` Movement 
 case 1
 endcase
 
 ` Look at room
 case 2
 endcase

 ` Look at objects
 case 3
 for t=0 to 5
  if ItemW$(t)=b$ then print ItemL1$(t):print ItemL2$(t)
 next t
 endcase

endselect

suspend for key

Back to top

Profile PM Email

Sorry your browser is not supported!

Newcomers DBPro Corner / how do you link two commands?