Advertisement
Guest User

Tor Verbesserung (c) by Kaliber

a guest
Jan 2nd, 2013
60
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C++ 1.27 KB | None | 0 0
  1. /* Sa-Mp Include Tor Verbesserung
  2.  *
  3.  * (c) by Kaliber, 2013
  4.  *
  5.  */
  6. #include <a_samp>
  7. #if !defined MAX_GATES
  8.     #define MAX_GATES 20
  9. #endif
  10. enum Tor_Enum {
  11.     t_modelid,Float:t_X,Float:t_Y,Float:t_Z,Float:t_r1,Float:t_r2,Float:t_r3
  12. };
  13. static TorInfo[MAX_GATES][Tor_Enum];
  14.  
  15. stock CreateTor(modelid,Float:X,Float:Y,Float:Z,Float:r1,Float:r2,Float:r3,dis=300) {
  16.     new obj = CreateObject(modelid,X,Y,Z,r1,r2,r3,dis);
  17.     TorInfo[obj][t_modelid]=modelid,TorInfo[obj][t_X]=X,TorInfo[obj][t_Y]=Y,TorInfo[obj][t_Z]=Z,TorInfo[obj][t_r1]=r1,TorInfo[obj][t_r2]=r2,TorInfo[obj][t_r3]=r3;
  18.     return obj;
  19. }
  20.  
  21. stock GetGate(playerid) {
  22.     for(new o; o<MAX_GATES; o++) {
  23.         if(IsPlayerInRangeOfPoint(playerid,10.0,TorInfo[o][t_X],TorInfo[o][t_Y],TorInfo[o][t_Z])) return o;
  24.     }
  25.     return -1;
  26. }
  27.  
  28. stock MoveGate(obj,id) {
  29.     switch(id) {
  30.         case 0: MoveObject(obj,TorInfo[obj][t_X],TorInfo[obj][t_Y],TorInfo[obj][t_Z]+10,4.0);
  31.         case 1: MoveObject(obj,TorInfo[obj][t_X],TorInfo[obj][t_Y],TorInfo[obj][t_Z]-10,4.0);
  32.         case 2: MoveObject(obj,TorInfo[obj][t_X],TorInfo[obj][t_Y],TorInfo[obj][t_Z]-10,4.0),SetTimerEx("Gate_Closed",1000*5,0,"i",obj);
  33.     }
  34.     return 1;
  35. }
  36. forward Gate_Closed(x);
  37. public Gate_Closed(x) {
  38.     MoveObject(x,TorInfo[x][t_X],TorInfo[x][t_Y],TorInfo[x][t_Z],4.0);
  39.     return 1;
  40. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement