~Hakurei Shrine~ > Rika and Nitori's Garage Experiments

a little problem with a script...

Pages: (1/1)

Dynast:

Hello, like the title said, I have a little problem with a script...


--- Code: --- task Explode_(speed,deceleration,angle,delay,type)
{
      let obj=Obj_Create(OBJ_SHOT);
      Obj_SetPosition(obj, GetX, GetY);
      Obj_SetAngle(obj, angle);
      Obj_SetSpeed(obj, speed);
      ObjShot_SetGraphic(obj, type);
      ObjShot_SetDelay  (obj, delay);
      ObjShot_SetBombResist (obj, true);
      while(Obj_BeDeleted(obj)==false)
      {
while(Obj_GetSpeed(obj)>=0)
{
            speed+=deceleration;
            Obj_SetSpeed(obj, speed);
            yield;
}
speed=0.5;
Obj_SetSpeed(obj, speed);
Obj_SetAngle(obj, atan2(GetPlayerY - Obj_GetY(obj), GetPlayerX - Obj_GetX(obj)));     
yield;
      }
}

--- End code ---

I would like to create a shot, who slow down until the stop, and will reach the last player position...

It dosen't work. The shot won't slow down. Can you give me a hand please ?

I'm sorry if my english are poor :(
I'm French.

Drake:

Essayez cela.


--- Code: ---   task Explode_(speed,deceleration,angle,delay,type)
   {
            let obj=Obj_Create(OBJ_SHOT);
            let s = speed;
            let a = angle;
            Obj_SetPosition(obj, GetX, GetY);
            Obj_SetAngle(obj, angle);
            Obj_SetSpeed(obj, speed);
            ObjShot_SetGraphic(obj, type);
            ObjShot_SetDelay  (obj, delay);
            ObjShot_SetBombResist (obj, true);
            while(Obj_BeDeleted(obj)==false)
            {
               if(Obj_GetSpeed(obj)>0)
               {
                           s-=deceleration;
               }else if(Obj_GetSpeed(obj)<=0)
               {
                           s=0.5;
                           a=atan2(GetPlayerY - Obj_GetY(obj), GetPlayerX - Obj_GetX(obj))
               }
               Obj_SetSpeed(obj, s);
               Obj_SetAngle(obj, a);       
               yield;
            }
   }   

--- End code ---
Si je l'ai mal interpreter vous pouvez expliquer en fran?ais.

Dynast:

--- Quote from: Drake on August 06, 2009, 05:54:46 PM ---Si je l'ai mal interpreter vous pouvez expliquer en fran?ais.

--- End quote ---

Ce ne sera pas la peine, merci beaucoup :D

Pages: (1/1)

Go to full version