Sorry your browser is not supported!

if spacekey()=1 then gosub _shoot_gun

_shoot_gun:
rem coding here for the shooting sequence

MissleposY = Jetposy-1. Missleposz = Jetposz + 1

 
   Load object "jet.x",1
   Load object "missle.x",2
     Function Position Missiles()
        JetPosX# = Object Position X(1) Rem # = Float thus we can get a bit more accurate we realyl dont need it
        Rem Make a JetPosY# and JetPosZ#
        MissilePosY# = JetPosY# - 3 Rem Position Missle Under Plane
        MissilePosZ# = JetPosZ# 
        MisslePosX# = JetPosX# + 3  Rem Position Missle to the side
        Position Object 2,MissilePosX#,MisslePosY#,MissilePosZ#
 endfunction 

  1. Find Planes X,Y,Z
  2. Subtract from the Y because you want the missiles under
  3. Add to the X to get the missiles to the right of the plane.
  4. Add or subract to the Z to get the missiles forward or back
  <experiment to find the best position>
  5. Position the Missiles in the position that you determined above. You need to do that once every loop so that missiles are allways positioned at the right place.
  6. Rotate the Missiles (Point Object) to be the same as the planes.

   crosshairX,crosshairY,crosshairZ - Position of the hidden box.
   missileX,missileY,MissileZ - Position of the missile
   once the missile is launched :
    NewX = Curveangle(crosshairX,missileX,13) - 13 is the speed.
    NewY = Curveangle(crosshairY,missileY,13) - 13 is the speed.
    NewZ = Curveangle(crosshairZ,missileZ,13) - 13 is the speed.
    point object <missle's number>,NewX,NewY,NewZ

input "1 - Timer Routine, 2 - Spacekey Tap Routine) ",x
while escapekey() = 0
cls `clears the screen every loop
Set Cursor 10,10 `sets the cursor
if x = 1 `if you wanna run the Timer version do this
Print "Hey Press Space to Activate Firing Routine Press ",press," timer ",timer() `just prints out some stuff (press which is time started) and (timer which is time now)
press = fire(press)  `Sends press into the function, and then sends press into the function, messes with it and then sends it back out so we can save the value and send it back in the next loop
endif

if x = 2 `if you wanna run the spacekey tap version do this one
Print "Hey press space to activate firing routine" `write out some stuff
space = spacefire(space) `call the spacefire function send in the space variable and take it back out when the function is done
endif

endwhile


Function fire(press)

    If press = 0 and spacekey() = 1 `if press it at 0 and they hit space
         Print "Fire!!" `Shoot a bullet...(theoretically) you wont see it on the screen since its only there for a milisecond and then we are reloading
         press = timer() `then set press to the time right now
    endif
    if press > 0 `because when they shoot press gets set to the time (in miliseconds) at the moment, they cant shoot again
         Print "Reloading!" `print out reloading because we are reloading...(theoretically)
         if timer()-press > 3000 then press=0 `by subtracting press (the time when they hit space) and timer (the time right now) we can find how much time has passed between
         `when they hit the space button and right now..if 3 seconds have passed we are done reloading and we can set press back to 0 to fire another shot
    endif
endfunction press  `end the function and send press back so that we can save the value
`(we need to when we are reloading as press contains the time when they hit space) if you dont send it back it automatically becomes 0



Function spacefire(space) `spacefire..recive space to edit
   if space = 0 and spacekey() = 1`if they hit spacekey and we are ready to fire (space)
      Print "FIRE!!!" `fire...(theoretically)
      space = 1 `set space to 1 so we cant shoot again untill we are ready
   endif
   if space = 1 `if space = 1 (we fired)
     Print "Release Space to fire again"
     if spacekey() = 0 then space = 0
   endif

endfunction space `send out space since all variables that are inside the function are destroyed when the function ends

  1. If you are at the point where you want to create a missile (they hit spacebar and its time to make a missile) 
    - x = 200 (start there, so the first missile you make will be object 200)
    while object exist(x) (if there is another missile out there that is of that number...)
    Inc x (increase x by one and check again)
    endwhile
    clone object x,2 (2 or what ever number your limb missile is)
    position object where ever it needs to start at
    point the object at the crosshair (hidden little cube)
    hide the limb until you are ready to fire a new missile
 2. When you want to move all the missiles that are fired towards where they need to go
    For x = 200 to 300 (im guessing you wont make over 100 missiles at one time)
      if object exist(x) (remember we started at 200 so we are checking if there is that missile and going up just incase they created more)
           move object x,2 move the missile forward
      endif
    next x `move through all the objects that could be missles and chcek if one exists. If it does move that one forward

If you are at the point where you want to create a missile (they hit spacebar and its time to make a missile) 
    - x = 200 (start there, so the first missile you make will be object 200)
    while object exist(x) (if there is another missile out there that is of that number...)
    Inc x (increase x by one and check again)
    endwhile
    clone object x,2 (2 or what ever number your limb missile is)
    position object where ever it needs to start at
    point the object at the crosshair (hidden little cube)
    hide the limb until you are ready to fire a new missile
 2. When you want to move all the missiles that are fired towards where they need to go
    For x = 200 to 300 (im guessing you wont make over 100 missiles at one time)
      if object exist(x) (remember we started at 200 so we are checking if there is that missile and going up just incase they created more)
           move object x,2 move the missile forward
      endif
    next x `move through all the objects that could be missles and chcek if one exists. If it does move that one forward