Guest User

Untitled

a guest
Jan 15th, 2019
75
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 5.91 KB | None | 0 0
  1. #include <a_samp>
  2. #include <sscanf>
  3. #include < zcmd >
  4.  
  5. #define C_WHITE 0xFFFFFFFF
  6. #define C_RED 0xFF0000FF
  7. #define SCM SendClientMessage
  8. #define GTFP GameTextForPlayer
  9. #define GPW GivePlayerWeapon
  10.  
  11. new Float:x,
  12. Float:y,
  13. Float:z;
  14.  
  15. new string2[111];
  16.  
  17. #pragma tabsize 0
  18.  
  19. //==============================================================================
  20. //==============================================================================
  21. CMD:ejectme( playerid, params[] )
  22. {
  23. if ( IsPlayerInAnyVehicle ( playerid ) )
  24. {
  25. GetPlayerPos ( playerid, x, y, z );
  26. SetPlayerPos ( playerid, x, y, z + 10 );
  27. SCM ( playerid, C_WHITE, "You have ejected yourself !");
  28. }
  29. else
  30. {
  31. SCM ( playerid, C_RED, "[ERROR]: You're not in a vehicle !");
  32. }
  33. return ( 1 );
  34. }
  35. //==============================================================================
  36. //==============================================================================
  37. CMD:eme( playerid, params[] )
  38. {
  39. SetPlayerHealth ( playerid, 50.0 );
  40. GetPlayerPos ( playerid, x, y, z );
  41. CreateExplosion ( x,y,z-3,7,100 );
  42. CreateExplosion ( x,y,z-3,7,100 );
  43. GTFP ( playerid, "~r~BOOOOOOOOOOM~b~!!!!!!!!!!!",2200,15 );
  44. return ( 1 );
  45. }
  46.  
  47. CMD:explodeme(playerid,params[]){ return cmd_eme(playerid,params); }
  48. //==============================================================================
  49. //==============================================================================
  50. CMD:flip(playerid,params[])
  51. {
  52. if ( IsPlayerInAnyVehicle ( playerid ))
  53. {
  54. new Float:angle;
  55. new car = GetPlayerVehicleID ( playerid );
  56. GetVehiclePos ( car, x, y, z );
  57. GetVehicleZAngle ( car, angle );
  58. SetVehiclePos ( car, x, y, z );
  59. SetVehicleZAngle ( car, angle );
  60. } else {
  61. {
  62. SCM ( playerid, C_RED,"[ERROR]: You need to be into a vehicle !");
  63. }
  64. }
  65. return ( 1 );
  66. }
  67.  
  68. CMD:f(playerid,params[]){ return cmd_flip(playerid,params); }
  69. //==============================================================================
  70. //==============================================================================
  71. CMD:jetpack(playerid,params[])
  72. {
  73. SetPlayerSpecialAction ( playerid, SPECIAL_ACTION_USEJETPACK );
  74. return ( 1 );
  75. }
  76. //==============================================================================
  77. //==============================================================================
  78. CMD:up(playerid,params[])
  79. {
  80. new upm;
  81. new vehicleid = GetPlayerVehicleID ( playerid );
  82. if(sscanf(params,"d",upm))
  83. {
  84. SCM(playerid,C_RED,"Usage : /up [height]");
  85. }
  86. else
  87. {
  88. if ( IsPlayerInAnyVehicle ( playerid ))
  89. {
  90. GetVehiclePos ( vehicleid, x, y, z );
  91. SetVehiclePos ( vehicleid, x, y, z +upm );
  92. }
  93. else
  94. {
  95. GetPlayerPos ( playerid, x, y, z );
  96. SetPlayerPos ( playerid, x, y, z +upm );
  97. GivePlayerWeapon( playerid, 46, 1 );
  98. }
  99. }
  100. return ( 1 );
  101. }
  102. //==============================================================================
  103. //==============================================================================
  104. CMD:pm( playerid, params[ ] )
  105. {
  106. new gMessage[ 128 ], Message[ 128 ];
  107. new pNames[MAX_PLAYER_NAME], iName[ MAX_PLAYER_NAME ];
  108.  
  109. if( sscanf( params, "us[128]", params[ 0 ], params[ 1 ] ) ) return SCM( playerid, C_RED, "Usage: /pm (id) (message)" );
  110.  
  111. if( !IsPlayerConnected( params[ 0 ] ) ) return SCM( playerid,C_RED,"[ERROR]: Bad player ID !" );
  112. if( playerid == params[ 0 ] ) return SCM( playerid,C_RED,"[ERROR]: You cannot PM yourself !" );
  113.  
  114. GetPlayerName( params[ 0 ], iName, MAX_PLAYER_NAME );
  115. GetPlayerName( playerid, pNames, MAX_PLAYER_NAME );
  116. format( Message, 128,"PM To %s[%d]: %s", iName, params[ 0 ], gMessage );
  117. SCM( playerid, C_RED, Message );
  118.  
  119. format( Message, 128,"PM From %s[%d]: %s", pNames, playerid, gMessage );
  120. SCM( params[ 0 ], C_WHITE, Message );
  121. PlayerPlaySound( params[ 0 ], 1085, 0.0, 0.0, 0.0 );
  122. return ( 1 );
  123. }
  124. //==============================================================================
  125. //==============================================================================
  126. CMD:givecash(playerid,params[])
  127. {
  128. new id,cash;
  129. if(sscanf(params,"ud",id,cash))
  130. {
  131. {
  132. SCM ( playerid,C_RED,"Usage /givecash[id][amount]");
  133. }
  134. }
  135. else if(id == playerid)
  136. {
  137. {
  138. SCM ( playerid,C_RED,"[ERROR]: {FFFFFF}You cannot send {94ED40}money to yourself {FFFFFF}!");
  139. }
  140. }
  141. else if(id == INVALID_PLAYER_ID)
  142. {
  143. {
  144. SCM ( playerid,C_RED,"[ERROR]: {FFFFFF}Player is not {94ED40}connected {FFFFFF}!");
  145. }
  146. }
  147. else if(cash > GetPlayerMoney( playerid ))
  148. {
  149. {
  150. SCM ( playerid,C_RED,"[ERROR]: {FFFFFF}You don't have enough {94ED40}money {FFFFFF}!");
  151. }
  152. }
  153. else
  154. {
  155. new name[MAX_PLAYER_NAME],ename[MAX_PLAYER_NAME];
  156. GetPlayerName ( playerid, name, sizeof ( name ) );
  157. GetPlayerName ( id,ename, sizeof ( ename ) );
  158. GivePlayerMoney ( playerid, -cash );
  159. GivePlayerMoney ( id, cash );
  160. {
  161. format( string2,sizeof( string2 ),"You send {94ED40}%d money {FFFFFF}to {94ED40}%s",cash,ename);
  162. SCM ( playerid,C_WHITE,string2 );
  163. format( string2,sizeof( string2 ),"{94ED40}%s {ffffff}send {94ED40}%d money {FFFFFFto you",name,cash);
  164. SCM ( playerid,C_WHITE,string2 );
  165. }
  166. }
  167. return ( 1 );
  168. }
  169. //==============================================================================
  170. //==============================================================================
  171. CMD:dive( playerid, params[] )
  172. {
  173. SetPlayerInterior ( playerid, 0 );
  174. GetPlayerPos ( playerid, x, y, z );
  175. SetPlayerPos ( playerid, x, y, 1000 );
  176. GPW ( playerid, 46, 10 );
  177. GTFP ( playerid, "~w~Dive ~r~1000 Feet ~w~From your Location", 4000, 4);
  178. return ( 1 );
  179. }
Add Comment
Please, Sign In to add comment