Guest User

Untitled

a guest
Sep 21st, 2012
361
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 3.85 KB | None | 0 0
  1. /*All By XtremeR
  2. ==========================================
  3. *        *
  4.  *      *
  5.   *    *
  6.    *  *
  7.     ** - Pickup
  8.    *  * - by
  9.   *    * tremeR
  10.  *      *
  11. *        *
  12. ==========================================*/
  13. //includes
  14. #include <a_samp>
  15. #include <zcmd>
  16. //defines
  17. #define GREEN 0x21DD00FF
  18. #define RED 0xE60000FF
  19. #define WHITE 0xFFFFFFAA
  20. #define DIALOGXYZ 1000
  21. //command
  22. new string[128],Float:X,Float:Y,Float:Z,File:pos;
  23. CMD:takexyz(playerid,params[])
  24. {
  25. if(IsPlayerAdmin(playerid))
  26. {
  27. //pickup dialog
  28. ShowPlayerDialog(playerid, DIALOGXYZ, DIALOG_STYLE_LIST,"XtremeR's XYZ Taking FS","Take Simple XYZ\nSetPlayerPos\nAddPlayerClass","Select","Cancel");
  29. }
  30. return 1;
  31. }
  32. CMD:xcredits(playerid,params[])
  33. {
  34. SendClientMessage(playerid, -1 ,"XtremeR for The xyz Taker ");
  35. SendClientMessage(playerid, -1 ,"Zeex for ZCMD");
  36. SendClientMessage(playerid, -1 ,"SAMP Team For <a_samp>");
  37. return 1;
  38. }
  39. CMD:xcommands(playerid,params[])
  40. {
  41. SendClientMessage(playerid, -1 ,"/xsxyz - Take Simple XYZ");
  42. SendClientMessage(playerid, -1 ,"/xsetplayerpos - SetPlayerPos");
  43. SendClientMessage(playerid, -1 ,"/xaddpclass - Adding Player's Class");
  44. SendClientMessage(playerid, -1 ,"/xcredits - To see the credits");
  45. return 1;
  46. }
  47. CMD:xsxyz(playerid,params[])
  48. {
  49. GetPlayerPos(playerid, X,Y,Z);
  50. pos = fopen("xSimpleXYZ.pwn", io_append);
  51. format(string, 256, "XYZ:%f,%f,%f);//By XtremeR\n", X, Y, Z);
  52. fwrite(pos, string), fclose(pos);
  53. SendClientMessage(playerid, -1 ,"xSimpleXYZ Created And Saved To Script Files >> xSimpleXYZ");
  54. return 1;
  55. }
  56. CMD:xsetplayerpos(playerid,params[])
  57. {
  58. GetPlayerPos(playerid, X,Y,Z);
  59. pos = fopen("xSetPlayerPos.pwn", io_append);
  60. format(string, 256, "SetPlayerPos(playerid,%f, %f, %f);//By XtremeR\n", X, Y, Z);
  61. fwrite(pos, string), fclose(pos);
  62. SendClientMessage(playerid, -1 ,"xSetPlayerPos Created And Saved To Script Files >> xSetPlayerPos");
  63. return 1;
  64. }
  65. CMD:xaddpclass(playerid,params[])
  66. {
  67. GetPlayerPos(playerid, X,Y,Z);
  68. pos = fopen("xAddPlayerClass.pwn", io_append);
  69. format(string, 256, "AddPlayerClass(1,%f, %f, %f, 0, 0, 0, 0, 0, 0, 0);//By XtremeR\n",X, Y, Z);
  70. fwrite(pos, string), fclose(pos);
  71. SendClientMessage(playerid, -1 ,"xAddPlayerClass Created And Saved To Script Files >> xAddPlayerClass With Skin ID 1");
  72. return 1;
  73. }
  74.  
  75. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  76. {
  77.     if(dialogid == DIALOGXYZ)
  78.     {
  79.         if(response == 1)
  80.         {
  81.             if(listitem == 0)
  82.             {
  83.                 GetPlayerPos(playerid, X,Y,Z);
  84.                 pos = fopen("xSimpleXYZ.pwn", io_append);
  85.                 format(string, 256, "XYZ:%f,%f,%f);//By XtremeR\n", X, Y, Z);
  86.                 fwrite(pos, string), fclose(pos);
  87.                 SendClientMessage(playerid, -1 ,"xSimpleXYZ Created And Saved To Script Files >> xSimpleXYZ");
  88.             }
  89.             if(listitem == 1){
  90.                 GetPlayerPos(playerid, X,Y,Z);
  91.                 pos = fopen("xSetPlayerPos.pwn", io_append);
  92.                 format(string, 256, "SetPlayerPos(playerid,%f, %f, %f);//By XtremeR\n", X, Y, Z);
  93.                 fwrite(pos, string), fclose(pos);
  94.                 SendClientMessage(playerid, -1 ,"xSetPlayerPos Created And Saved To Script Files >> xSetPlayerPos");
  95.             }
  96.             if(listitem == 2)
  97.             {
  98.                 GetPlayerPos(playerid, X,Y,Z);
  99.                 pos = fopen("xAddPlayerClass.pwn", io_append);
  100.                 format(string, 256, "AddPlayerClass(%s,%f, %f, %f, 0, 0, 0, 0, 0, 0, 0);//By XtremeR\n",GetPlayerSkin(playerid),X, Y, Z);
  101.                 fwrite(pos, string), fclose(pos);
  102.                 SendClientMessage(playerid, -1 ,"xAddPlayerClass Created And Saved To Script Files >> xAddPlayerClass With Your Skin ID.");
  103.             }
  104.             return 0;
  105.         }
  106.  
  107.     }
  108.     return 0;
  109. }
  110. stock strtok(const string[], &index,seperator=' ')
  111. {
  112. new length = strlen(string);
  113. new offset = index;
  114. new result[128];
  115. while ((index < length) && (string[index] != seperator) && ((index - offset) < (sizeof(result) - 1)))
  116. {
  117. result[index - offset] = string[index];
  118. index++;
  119. }
  120. result[index - offset] = EOS;
  121. if ((index < length) && (string[index] == seperator))
  122. {
  123. index++;
  124. }
Advertisement
Add Comment
Please, Sign In to add comment