ПРивет всем возможно ли сделать скрипт что бы тебя например засосавало...
X3 Terran Conflict / X3 Земной конфликт
 
X3 Terran conflict  
 

На сайте онлайн (человек): 70



 



ПРивет всем возможно ли сделать скрипт что бы тебя например засосавало...

Terran Conflict (X3TC) / Форум / Скрипты и моды для X3 Terran Conflict / Все мелкие вопросы по скриптам и модам задаем тут! (Не загрязняйте форум мелкими темами)

Все мелкие вопросы по скриптам и модам задаем тут! (Не загрязняйте форум мелкими темами)
(http://x3tc.net/x3_forum/?tid=234)
Автор: Seruif
(16.06.2011 11:07:36)

 artyr13rus писал(а):
ПРивет всем возможно ли сделать скрипт что бы тебя например засосавало в одну точку в одном из неизвестных секторов ? просто у меня мечта зделать типо чёрной дыры в x3
 

 Код:
  1. $speed=скорость засасывания
  2. $x=точка х
  3. $y=точка у
  4. $z=точка z
  5. $sector=сектор
  6. while [TRUE]
  7.   $ships = find ship: sector=$sector class or type=null race=null flags=[Find.Multiple] refobj=null maxdist=null maxnum=9999 refpos=null
  8.   $size=size of array $ships
  9.   $n=0
  10.   while $n<$size
  11.     $ship=$ships[$n]
  12.     $sx=$ship->get x position
  13.     $sy=$ship->get y position
  14.     $sz=$ship->get z position
  15.     $dx=$x-$sx
  16.     $dy=$y-$sy
  17.     $dz=$z-$sz
  18.     $d=$dx*$dx+$dy*$dy
  19.     $dist=square root of $d
  20.     $cos=$dx/$dist
  21.     $sin=$dy/$dist
  22.     $speedx=$cos*$speed
  23.     $speedy=$sin*$speed
  24.     $d=$dx*$dx+$dz*$dz
  25.     $dist=square root of $d
  26.     $sin=$dz/$dist
  27.     $speedz=$sin*$speed
  28.     $sx=$sx+$speedx
  29.     $sy=$sy+$speedy
  30.     $sz=$sz+$speedz
  31.     $ship->set position: x=$sx y=$sy z=$sz
  32.     = wait сколько-то ms //иначе зависнит
  33.     inc $n=
  34.   end
  35. end
  36. return null
 

Типа того

дерево темы → Все мелкие вопросы по скриптам и модам задаем тут! (Не загрязняйте форум мелкими темами) Все мелкие вопросы по скриптам и модам задаем тут! (Не загрязняйте форум мелкими темами) »
Список игр