follow me commands ai - GameCreators Forum

Author

Message

Jon wu

12

Years of Service

User Offline

Joined: 4th Nov 2013

Location:

Posted: 8th Nov 2013 17:10

Link

can some one help me with this ai code so that the object can follow my player heres the code

make object cube 89898, 100 : Rem Cone
color object 89898,rgb(255,0,255)
position object 89898, 300,object size(89898)*.75,500
show object bounds 89898
make object collision box 89898, -30,-30,-30, 30,30,30, 1
set object collision on 89898 : Rem Check the Player Cube
if object collision(89898,1)=1 then delete object 1

Hasty

Back to top

Profile PM Email

Derek Darkly

14

Years of Service

User Offline

Joined: 22nd Sep 2011

Location: Whats Our Vector, Victor?

Posted: 8th Nov 2013 19:29 Edited at: 8th Nov 2013 19:29

Link

Is your "player" the camera or another object?

If it's the camera then use something like:
POINT OBJECT 89898,camera position x(),camera position y(),camera position z()
MOVE OBJECT 89898,1

D.D.

Back to top

Profile PM

Jon wu

12

Years of Service

User Offline

Joined: 4th Nov 2013

Location:

Posted: 9th Nov 2013 00:32

Link

The player is an object that the gamer moves around with and im tryin to make a randomly generated object follow it

Hasty

Back to top

Profile PM Email

chafari

Valued Member

20

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 9th Nov 2013 12:16

Link

@Jon we
Take a look to this piece of code.

+ Code Snippet

autocam off
sync on
`texture
ink rgb(255,255,0),0
box 0,0,20,20
ink 0
box 0,10,20,12
get image 1,0,0,20,20

floo_r=100
player=1
enemy=2


`floor
make object box floo_r,50,0,50
color object floo_r,rgb(0,255,0)

` player
make object box player,1,1,1
color object player,rgb(255,0,0)
position object player,-15,1,10
`enemy
make object sphere enemy,2
texture object enemy,1
position object enemy,-20,1,-20


position camera -30,30,-30
point camera 0,0,0

do
set cursor 0,0
print "use arrowkeys"

if upkey() then move object player,0.02
if downkey() then move object player,-0.02
if rightkey() then turn object right player,0.5
if leftkey() then turn object left player,0.5

`enemy points and folow the player
point object enemy,object position x(player),object position y(player),object position z(player)
move object enemy,0.01
scroll object texture enemy,0,0.002
if object collision(player,enemy)>0 then set cursor 300,200:print "I GOT YOU "

sync
loop

Cheers.

I'm not a grumpy grandpa

Back to top

Profile PM Email

Jon wu

12

Years of Service

User Offline

Joined: 4th Nov 2013

Location:

Posted: 12th Nov 2013 17:37

Link

heres the code i put
follow the player
do
point object 89898,object position x(1),object position y(1),object position z(1)
move object 89898,0.01
scroll object texture 89898,0,0.002
if object collision(player,enemy)>0 then gosub endsection
sync
loop
but it says it cannot understand the command

Hasty

Back to top

Profile PM Email

chafari

Valued Member

20

Years of Service

User Offline

Joined: 2nd May 2006

Location: Canary Islands

Posted: 12th Nov 2013 18:52

Link

At the top of that example, I defined floor_ as object 100 , player as object 1, and enemy as object 2...let say:
if object collision(player,enemy) is exactly the same as if I put:
if object collision(1,2) then.....

in your case would be:
if object collision(89898,1)....if this is your object to collide with, and of course , you will have to create first the label endsection

The label is a part of the code where you continue the program...something like a function and then comes back to the same point

Take a look to this example:

+ Code Snippet

autocam off
sync on
make object box 1,20,0,20

position camera -30,30,-30
point camera 0,0,0
ob=2
do
set cursor 0,0:print "press SPACE"
if ob>2 then print  "Total spheres ",ob-2
if spacekey() then gosub my_label :sleep 300

sync
loop


my_label:
make object sphere ob,2
position object ob,-10+rnd(20),1,-10+rnd(20)
color object ob,rgb(rnd(255),rnd(255),rnd(255))
inc ob
return

I'm not a grumpy grandpa

Back to top

Profile PM Email

Jon wu

12

Years of Service

User Offline

Joined: 4th Nov 2013

Location:

Posted: 13th Nov 2013 17:09

Link

i managed to fix the command problem but whenever i put it into a do loop the whole game crashes but the cube still moves heres waht i put

point object 89898,object position x(1),object position y(1),object position z(1)
move object 89898,10
scroll object texture 1,0,0.002

ps. i already got the collision box working in another part of my code.

Hasty

Back to top

Profile PM Email

Jon wu

12

Years of Service

User Offline

Joined: 4th Nov 2013

Location:

Posted: 14th Nov 2013 05:14

Link

Actually I got it to work cause I put it near the end of my game but the problem is that I can't move

Hasty

Back to top

Profile PM Email

Sph!nx

17

Years of Service

User Offline

Joined: 3rd Dec 2008

Location: The Netherlands

Posted: 14th Nov 2013 15:26 Edited at: 14th Nov 2013 15:27

Link

Quote: "i managed to fix the command problem but whenever i put it into a do loop the whole game crashes but the cube still moves heres waht i put

point object 89898,object position x(1),object position y(1),object position z(1)
move object 89898,10
scroll object texture 1,0,0.002"

Everything that you 'let happen' in your game, must be inside your loop, or called from within your loop (through function, subroutine, coroutine, etc.)...

Quote: "point object 89898,object position x(1),object position y(1),object position z(1)
move object 89898,10
scroll object texture 1,0,0.002"

This must be in your loop, or called from you loop. Why the scroll command? Has nothing to do with moving the actual object.

Regards Sph!nx
www.mental-image.net

Back to top

Profile PM

Sorry your browser is not supported!

DarkBASIC Professional Discussion / follow me commands ai