Dark AI Waypoints - Follow once and stop?

Author

Message

Veron

17

Years of Service

User Offline

Joined: 22nd Nov 2006

Location:

Posted: 30th Mar 2008 15:40

Link

I've just gotten Dark AI, and it seems to be working pretty nicely for the most of the time, but what i'm trying to do is make an object (loaded previously in DBP) follow a waypoint, and then after it follows that waypoint, it should STOP. Not begin to follow the waypoint again.

Some code I tried:

+ Code Snippet

AI ADD NEUTRAL 10,training_plane,0
AI ADD WAYPOINT 0,OBJECT POSITION X(player),OBJECT POSITION Z(player)
AI SET ENTITY SPEED 10,8

I also tried using paths, like this:

+ Code Snippet

AI MAKE PATH 100
AI ADD NEUTRAL 10,training_plane
AI PATH ADD POINT 100,1750,0
AI ENTITY ASSIGN PATROL PATH 10,100
AI SET ENTITY SPEED 10,8

But it didn't work at all either.

For each code snippet i'm updating the AI using AI UPDATE in the main DO-LOOP.

Any help is appreciated.

Back to top

Profile PM

kaedroho

16

Years of Service

User Offline

Joined: 21st Aug 2007

Location: Oxford,UK

Posted: 30th Mar 2008 16:08 Edited at: 30th Mar 2008 17:02

Link

Ive made this code really quickly so you will have to adapt it a little to work with multiple entitys.

type waypoint
x as float
z as float
endtype

`Setup Screen
      sync on : sync rate 30

`Setup Camera
      make camera 1
      rotate camera 1,45,45,0
      move camera 1,-100

`Start AI
      ai start
      ai debug show paths 0

`Make globals
      global waypointnumber `Required for adding waypoints
      global player `Player AI Entity
      global waypointnum `Current waypoint which the player is heading to
      waypointnum=1

`Make array
      dim waypoint(255) as waypoint

`Make Player
      player=1
      make object box player,10,10,10
      ai add friendly player
      ai set entity speed player,50

`Add Waypoints
      for i=1 to 255
         addwaypoint(rnd(200)-100,rnd(200)-100)
      next i

ai entity go to position player,waypoint(waypointnum).x,waypoint(waypointnum).z

`loop
      do

`Update Waypoints

`Get Distance To next waypoint
         distance#=abs(sqrt((waypoint(waypointnum).x-ai get entity x(player))^2+(waypoint(waypointnum).z-ai get entity z(player))^2))
         text 10,10,str$(distance#)
         text 10,20,str$(waypointnum)
         if distance#<1
            inc waypointnum,1
            ai entity go to position player,waypoint(waypointnum).x,waypoint(waypointnum).z
         endif

`Update AI
         ai update

`Update Screen
         sync

`Endloop
      loop

function addwaypoint(x#,z#)
waypointnumber=waypointnumber+1
waypoint(waypointnumber).x=x#
waypoint(waypointnumber).z=z#
endfunction

+ Code Snippet

type waypoint
x as float
z as float
endtype

   `Setup Screen
      sync on : sync rate 30

   `Setup Camera
      make camera 1
      rotate camera 1,45,45,0
      move camera 1,-100

   `Start AI
      ai start
      ai debug show paths 0

   `Make globals
      global waypointnumber `Required for adding waypoints
      global player `Player AI Entity
      global waypointnum `Current waypoint which the player is heading to
      waypointnum=1

   `Make array
      dim waypoint(255) as waypoint

   `Make Player
      player=1
      make object box player,10,10,10
      ai add friendly player
      ai set entity speed player,50

   `Add Waypoints
      for i=1 to 255
         addwaypoint(rnd(200)-100,rnd(200)-100)
      next i


      ai entity go to position player,waypoint(waypointnum).x,waypoint(waypointnum).z


   `loop
      do


      `Update Waypoints

      `Get Distance To next waypoint
         distance#=abs(sqrt((waypoint(waypointnum).x-ai get entity x(player))^2+(waypoint(waypointnum).z-ai get entity z(player))^2))
         text 10,10,str$(distance#)
         text 10,20,str$(waypointnum)
         if distance#<1
            inc waypointnum,1
            ai entity go to position player,waypoint(waypointnum).x,waypoint(waypointnum).z
         endif

      `Update AI
         ai update


      `Update Screen
         sync

   `Endloop
      loop


function addwaypoint(x#,z#)
waypointnumber=waypointnumber+1
waypoint(waypointnumber).x=x#
waypoint(waypointnumber).z=z#
endfunction

I hope it helps!

Back to top

Profile PM Email Website

Veron

17

Years of Service

User Offline

Joined: 22nd Nov 2006

Location:

Posted: 31st Mar 2008 07:37

Link

Thanks! I've integrated your code into mine, but when I run the program I get:

Friendly Object (0) Does Not Exist.

The code for the friendly object creation is:

+ Code Snippet

   `Make Player
      ai add friendly training_plane
      ai set entity speed training_plane,50

training_plane is a .X model which has been loaded, rotated, scaled and positioned previously in the program.

Back to top

Profile PM

kaedroho

16

Years of Service

User Offline

Joined: 21st Aug 2007

Location: Oxford,UK

Posted: 31st Mar 2008 19:46

Link

Start your entitys off at 1 instead of 0. I do and it works fine.

Back to top

Profile PM Email Website

Veron

17

Years of Service

User Offline

Joined: 22nd Nov 2006

Location:

Posted: 3rd Apr 2008 09:27

Link

Hmm, still no luck. For the moment i've cut the code out of the game, i'll probably add it back in eventually and play around with it some more. Thanks for the help tho0ugh!

Back to top

Profile PM

Sorry your browser is not supported!

Dark Physics & Dark A.I. & Dark Dynamix / Dark AI Waypoints - Follow once and stop?