Guest User

Untitled

a guest
Mar 12th, 2015
244
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 9.55 KB | None | 0 0
  1. CMD:objektas(playerid, params[])
  2. {
  3. if( ADMIN[ playerid ] == 4 )
  4. {
  5. SendClientMessage( playerid, -1,"/newobject - sukurti objektą.");
  6. SendClientMessage( playerid, -1,"/deleteobject - sunaikinti objektą.");
  7. SendClientMessage( playerid, -1,"/judinimas - objekto judinimas.");
  8. SendClientMessage( playerid, -1,"/change - pakeisti objekto tekstą.");
  9. SendClientMessage( playerid, -1,"/ocolor - pakeisti objekto spalvą.");
  10. }
  11. return 1;
  12. }
  13. CMD:judinimas(playerid, params[])
  14. {
  15. if( ADMIN[ playerid ] == 4 )
  16. {
  17. for(CikleSaveEx[ playerid ] = 0; CikleSaveEx[ playerid ]<MAX_STREAMED_OBJECT; CikleSaveEx[ playerid ]++)
  18. {
  19. if( myobject[ CikleSaveEx[ playerid ] ] != -1 )
  20. {
  21. if( IsPlayerInRangeOfPoint( playerid, 2.0,OBJECTX[ myobject[CikleSaveEx[ playerid ]] ] ,OBJECTY[ myobject[CikleSaveEx[ playerid ]] ],OBJECTZ[ myobject[CikleSaveEx[ playerid ]] ] ) )
  22. {
  23. EditDynamicObject(playerid, myobject[CikleSaveEx[ playerid ]]);
  24. return 1;
  25. }
  26. }
  27. }
  28. }
  29. return 1;
  30. }
  31. CMD:newobject(playerid, params[])
  32. {
  33. if( ADMIN[ playerid ] == 4 )
  34. {
  35. new OBJECTID;
  36. if(sscanf(params, "d", OBJECTID))
  37. {
  38. SendClientMessage(playerid, COLOR_RED,"* Sukurti naują objektą: /newobject [objectid]");
  39. return 1;
  40. }
  41. for(CikleSaveEx[ playerid ] = 0; CikleSaveEx[ playerid ]<MAX_STREAMED_OBJECT; CikleSaveEx[ playerid ]++)
  42. {
  43. if( myobject[ CikleSaveEx[ playerid ] ] == -1 )
  44. {
  45. GetPlayerPos(playerid, SavePos[ playerid ][ 0 ], SavePos[ playerid ][ 1 ], SavePos[ playerid ][ 2 ]);
  46. myobject[CikleSaveEx[ playerid ] ] = CreateDynamicObject(OBJECTID, SavePos[ playerid ][ 0 ], SavePos[ playerid ][ 1 ]+2, SavePos[ playerid ][ 2 ], 0.0, 0.0, 90.0); //create the object
  47. SendClientMessage( playerid, COLOR_RED,"* Objekto komandos /objektas.");
  48.  
  49. format(String[ playerid ], 500,"INSERT INTO OBJEKTAI (objectid,modelid,x,y,z,rx,ry,rz,Tekstas,Sriftas,Dydis,Lygiavimas,Bold,Spalva,Spalva1,Spalva2,mdydis) VALUES ('%d','%d','%f','%f','%f','%f','%f','%f','%s','%s','%d','%d','%d','%d','%d','%d','%d')",
  50. myobject[CikleSaveEx[ playerid ]],
  51. OBJECTID,
  52. SavePos[ playerid ][ 0 ],
  53. SavePos[ playerid ][ 1 ]+2,
  54. SavePos[ playerid ][ 2 ],
  55. 0.0,
  56. 0.0,
  57. 90.0,
  58. TEKSTASMATERIAL[myobject[CikleSaveEx[ playerid ]]],
  59. FONTASKOKS[myobject[CikleSaveEx[ playerid ]]],
  60. FONTODYDIS[myobject[CikleSaveEx[ playerid ]]],
  61. TEKSTOLYGIAVIMAS[myobject[CikleSaveEx[ playerid ]]],
  62. PARYSKINIMAS[myobject[CikleSaveEx[ playerid ]]],
  63. OBJEKTOSPALVASAVE[myobject[CikleSaveEx[ playerid ]]],
  64. SPALVAOB1[myobject[CikleSaveEx[ playerid ]]],
  65. SPALVAOB2[myobject[CikleSaveEx[ playerid ]]],
  66. DYDISMATERIAL[myobject[CikleSaveEx[ playerid ]]] );
  67.  
  68. mysql_query(String[ playerid ]);
  69.  
  70. OBJECTX[ myobject[CikleSaveEx[ playerid ]]] = SavePos[ playerid ][ 0 ];
  71. OBJECTY[ myobject[CikleSaveEx[ playerid ]]] = SavePos[ playerid ][ 1 ]+2;
  72. OBJECTZ[ myobject[CikleSaveEx[ playerid ]]] = SavePos[ playerid ][ 2 ];
  73. return 1;
  74. }
  75. }
  76. }
  77. return 1;
  78. }
  79. CMD:deleteobject(playerid, params[])
  80. {
  81. if( ADMIN[ playerid ] == 4 )
  82. {
  83. for(CikleSaveEx[ playerid ] = 0; CikleSaveEx[ playerid ]<MAX_STREAMED_OBJECT; CikleSaveEx[ playerid ]++)
  84. {
  85. if( myobject[ CikleSaveEx[ playerid ] ] != -1 )
  86. {
  87. if( IsPlayerInRangeOfPoint( playerid, 2.0,OBJECTX[ myobject[CikleSaveEx[ playerid ]] ] ,OBJECTY[ myobject[CikleSaveEx[ playerid ]] ],OBJECTZ[ myobject[CikleSaveEx[ playerid ]] ] ) )
  88. {
  89. strmid(TEKSTASMATERIAL[ myobject[CikleSaveEx[ playerid ]]],"no",0,128,128);
  90. DestroyDynamicObject( myobject[CikleSaveEx[ playerid ]] );
  91. myobject[CikleSaveEx[ playerid ] ] = -1;
  92. SendClientMessage( playerid, COLOR_RED,"* OBJEKTAS BUVO SUNAIKINTAS.");
  93. format(String[ playerid ],150,"DELETE FROM OBJEKTAI WHERE objectid = '%d'", myobject[CikleSaveEx[ playerid ]] );
  94. mysql_query(String[ playerid ]);
  95. return 1;
  96. }
  97. }
  98. }
  99. }
  100. return 1;
  101. }
  102. CMD:change(playerid, params[])
  103. {
  104. if( ADMIN[ playerid ] == 4 )
  105. {
  106. for(CikleSaveEx[ playerid ] = 0; CikleSaveEx[ playerid ]<MAX_STREAMED_OBJECT; CikleSaveEx[ playerid ]++)
  107. {
  108. if( myobject[ CikleSaveEx[ playerid ] ] != -1 )
  109. {
  110. if( IsPlayerInRangeOfPoint( playerid, 2.0,OBJECTX[ myobject[CikleSaveEx[ playerid ]] ] ,OBJECTY[ myobject[CikleSaveEx[ playerid ]] ],OBJECTZ[ myobject[CikleSaveEx[ playerid ]] ] ) )
  111. {
  112.  
  113. new TEKSTAS[ 128 ];
  114. new IDAS;
  115. new TEKSTAS2[ 128 ];
  116. new TEKSTAS3;
  117. new SPALVA1TEXT;
  118. new SPALVA2FONAS;
  119. new MATERIALDYDISNEW;
  120. new BOLDUSE;
  121. SendClientMessage( playerid,-1,"Sriftas pradinis \"Arial\".");
  122. SendClientMessage( playerid,-1,"Align - teksto lygiavimas. Kairė - 0.Dešnė - 2.\nVidurys - 1.");
  123. SendClientMessage( playerid,-1,"PRADINE SPALVA: 0xFFFF8200, 0xFF000000.");
  124. SendClientMessage( playerid,-1,"MATERIAL SIZE: 10,20,30,40,50,60,70,80,90,100,110,120,130,140.");
  125. if(sscanf(params, "s[128]ds[128]ddxxd", TEKSTAS,IDAS,TEKSTAS2,BOLDUSE,TEKSTAS3,SPALVA1TEXT,SPALVA2FONAS,MATERIALDYDISNEW))
  126. {
  127. SendClientMessage(playerid, COLOR_RED,"* Pakeisti objekto tekstą: /lenta [tekstas] [dydis] [sriftas] [bold] [align] [teksto spalva] [fono spalva] [size/material]");
  128. return 1;
  129. }
  130. SPALVAOB1[ myobject[CikleSaveEx[ playerid ]]] = SPALVA1TEXT;
  131. SPALVAOB2[ myobject[CikleSaveEx[ playerid ]]] = SPALVA2FONAS;
  132. DYDISMATERIAL[ myobject[CikleSaveEx[ playerid ]]] = MATERIALDYDISNEW;
  133. OBJEKTOSPALVASAVE[ CikleSaveEx[ playerid ] ] = 0;
  134. strmid(TEKSTASMATERIAL[ myobject[CikleSaveEx[ playerid ]]],TEKSTAS,0,128,128);
  135. strmid(FONTASKOKS[ myobject[CikleSaveEx[ playerid ]]],TEKSTAS2,0,128,128);
  136. FONTODYDIS[ myobject[CikleSaveEx[ playerid ]]] = IDAS;
  137. PARYSKINIMAS[ myobject[CikleSaveEx[ playerid ]]] = BOLDUSE;
  138. TEKSTOLYGIAVIMAS[ myobject[CikleSaveEx[ playerid ]]] = TEKSTAS3;
  139. SetDynamicObjectMaterialText( myobject[CikleSaveEx[ playerid ]], 0,TEKSTAS, MATERIALDYDISNEW,TEKSTAS2, IDAS, BOLDUSE, SPALVA1TEXT, SPALVA2FONAS, TEKSTAS3);// SPALVA1TEXT, SPALVA2FONAS
  140.  
  141. format(String[ playerid ], 500,"UPDATE OBJEKTAI SET objectid='%d',Tekstas='%s',Sriftas='%s',Dydis='%d',Lygiavimas='%d',Bold='%d',Spalva='%d',Spalva1='%d',Spalva2='%d',mdydis='%d' WHERE objectid = '%d'",myobject[CikleSaveEx[ playerid ]],
  142. TEKSTASMATERIAL[myobject[CikleSaveEx[ playerid ]]],FONTASKOKS[myobject[CikleSaveEx[ playerid ]]],FONTODYDIS[myobject[CikleSaveEx[ playerid ]]],TEKSTOLYGIAVIMAS[myobject[CikleSaveEx[ playerid ]]],PARYSKINIMAS[myobject[CikleSaveEx[ playerid ]]],OBJEKTOSPALVASAVE[myobject[CikleSaveEx[ playerid ]]],SPALVAOB1[myobject[CikleSaveEx[ playerid ]]],SPALVAOB2[myobject[CikleSaveEx[ playerid ]]],DYDISMATERIAL[myobject[CikleSaveEx[ playerid ]]],myobject[CikleSaveEx[ playerid ]] );
  143. mysql_query(String[ playerid ]);
  144. return 1;
  145. }
  146. }
  147. }
  148. }
  149. return 1;
  150. }
  151. CMD:ocolor(playerid, params[])
  152. {
  153. if( ADMIN[ playerid ] == 4 )
  154. {
  155. for(CikleSaveEx[ playerid ] = 0; CikleSaveEx[ playerid ]<MAX_STREAMED_OBJECT; CikleSaveEx[ playerid ]++)
  156. {
  157. if( myobject[ CikleSaveEx[ playerid ] ] != -1 )
  158. {
  159. if( IsPlayerInRangeOfPoint( playerid, 2.0,OBJECTX[ myobject[CikleSaveEx[ playerid ]] ] ,OBJECTY[ myobject[CikleSaveEx[ playerid ]] ],OBJECTZ[ myobject[CikleSaveEx[ playerid ]] ] ) )
  160. {
  161. SendClientMessage( playerid, -1,"RAUDONA: ID 1, JUODA: ID 2, BALTA: ID 3, GELTONA: ID 4, MELYNA: ID 5, ZALIA: ID 6.");
  162. new SPALVA;
  163. if(sscanf(params, "d", SPALVA))
  164. {
  165. SendClientMessage(playerid, COLOR_RED,"* Pakeisti objekto spalvą: /ocolor [ID]");
  166. return 1;
  167. }
  168. if( SPALVA == 1 )
  169. {
  170. SetDynamicObjectMaterial(myobject[CikleSaveEx[ playerid ]], 0, 19341, "none", "none", COLOR_RED);
  171. }
  172. if( SPALVA == 2 )
  173. {
  174. SetDynamicObjectMaterial(myobject[CikleSaveEx[ playerid ]], 0, 19341, "none", "none", COLOR_BLACK);
  175. }
  176. if( SPALVA == 3 )
  177. {
  178. SetDynamicObjectMaterial(myobject[CikleSaveEx[ playerid ]], 0, 19341, "none", "none", COLOR_WHITE);
  179. }
  180. if( SPALVA == 4 )
  181. {
  182. SetDynamicObjectMaterial(myobject[CikleSaveEx[ playerid ]], 0, 19341, "none", "none", COLOR_YELLOW);
  183. }
  184. if( SPALVA == 5 )
  185. {
  186. SetDynamicObjectMaterial(myobject[CikleSaveEx[ playerid ]], 0, 19341, "none", "none", COLOR_BLUE);
  187. }
  188. if( SPALVA == 6 )
  189. {
  190. SetDynamicObjectMaterial(myobject[CikleSaveEx[ playerid ]], 0, 19341, "none", "none", COLOR_GREEN);
  191. }
  192. OBJEKTOSPALVASAVE[ CikleSaveEx[ playerid ] ] = SPALVA;
  193. format(String[ playerid ], 500,"UPDATE OBJEKTAI SET objectid='%d',Tekstas='%s',Sriftas='%s',Dydis='%d',Lygiavimas='%d',Bold='%d',Spalva='%d',Spalva1='%d',Spalva2='%d',mdydis='%d' WHERE objectid = '%d'",myobject[CikleSaveEx[ playerid ]],
  194. TEKSTASMATERIAL[myobject[CikleSaveEx[ playerid ]]],FONTASKOKS[myobject[CikleSaveEx[ playerid ]]],FONTODYDIS[myobject[CikleSaveEx[ playerid ]]],TEKSTOLYGIAVIMAS[myobject[CikleSaveEx[ playerid ]]],PARYSKINIMAS[myobject[CikleSaveEx[ playerid ]]],OBJEKTOSPALVASAVE[myobject[CikleSaveEx[ playerid ]]],SPALVAOB1[myobject[CikleSaveEx[ playerid ]]],SPALVAOB2[myobject[CikleSaveEx[ playerid ]]],DYDISMATERIAL[myobject[CikleSaveEx[ playerid ]]],myobject[CikleSaveEx[ playerid ]] );
  195. mysql_query(String[ playerid ]);
  196.  
  197. return 1;
  198. }
  199. }
  200. }
  201. }
  202. return 1;
  203. }
Advertisement
Add Comment
Please, Sign In to add comment