Advertisement
Guest User

Object Loader

a guest
Jun 4th, 2012
210
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.42 KB | None | 0 0
  1. //
  2. // SANADY OBJECT LOADER!
  3. //
  4.  
  5. #include <a_samp>
  6. #include <dini>
  7. #include <zcmd>
  8.  
  9. new Text:Textdraw0;
  10. new Text:Textdraw1;
  11. new TimerLoader;
  12.  
  13. forward Int(playerid);
  14.  
  15. #define embed_blue "{375FFF}"
  16. #define embed_red "{FF0000}"
  17. #define embed_white "{FFFFFF}"
  18. #define embed_green "{33FF33}"
  19. #define embed_yellow "{E8D04C}"
  20. #define embed_grey "{C0C0C0}"
  21. #define embed_orange "{FF9900}"
  22. #define embed_pink "{FF66FF}"
  23. #define embed_lblue "{00AFFF}"
  24. #define embed_sw "{ED136A}"
  25.  
  26. enum LoaderPanel
  27. {
  28. LoaderO
  29. }
  30. new lPanel[LoaderPanel];
  31.  
  32. public OnFilterScriptInit()
  33. {
  34. print("\n--------------------------------------");
  35. print(" Sanady Objects Loader");
  36. print("--------------------------------------\n");
  37.  
  38. Textdraw0 = TextDrawCreate(260.000000, 210.000000, "_");
  39. TextDrawBackgroundColor(Textdraw0, 255);
  40. TextDrawFont(Textdraw0, 1);
  41. TextDrawLetterSize(Textdraw0, 0.500000, 8.000000);
  42. TextDrawColor(Textdraw0, -1);
  43. TextDrawSetOutline(Textdraw0, 0);
  44. TextDrawSetProportional(Textdraw0, 1);
  45. TextDrawSetShadow(Textdraw0, 1);
  46. TextDrawUseBox(Textdraw0, 1);
  47. TextDrawBoxColor(Textdraw0, 170);
  48. TextDrawTextSize(Textdraw0, 390.000000, 0.000000);
  49.  
  50. Textdraw1 = TextDrawCreate(264.000000, 230.000000, "Loading Objects");
  51. TextDrawBackgroundColor(Textdraw1, 255);
  52. TextDrawFont(Textdraw1, 2);
  53. TextDrawLetterSize(Textdraw1, 0.329999, 3.000000);
  54. TextDrawColor(Textdraw1, -1);
  55. TextDrawSetOutline(Textdraw1, 0);
  56. TextDrawSetProportional(Textdraw1, 1);
  57. TextDrawSetShadow(Textdraw1, 1);
  58.  
  59. LoadServerCfg();
  60.  
  61. return 1;
  62. }
  63.  
  64. public OnFilterScriptExit()
  65. {
  66. dini_IntSet("SanadyLoad/Loader.cfg", "ObjectsLoader", lPanel[LoaderO]);
  67. return 1;
  68. }
  69.  
  70. LoadServerCfg()
  71. {
  72. if(!dini_Exists("SanadyLoad/Loader.cfg"))
  73. {
  74. print("Server.cfg file not found...server creating one...");
  75. dini_Create("SanadyLoad/Loader.cfg");
  76. dini_IntSet("SanadyLoad/Loader.cfg", "ObjectsLoader", 1);
  77. lPanel[LoaderO] = 1;
  78. print("Server.cfg file created!");
  79. }
  80. else
  81. {
  82. lPanel[LoaderO] = dini_Int("SanadyLoad/Loader.cfg", "ObjectsLoader");
  83. }
  84. }
  85.  
  86. cPanel()
  87. {
  88. new ServerStats[1024];
  89. format(ServerStats,sizeof(ServerStats), embed_white"Object-Loader\t%s",
  90. lPanel[LoaderO] ? (""embed_green"Enabled") : (""embed_orange"Disabled"));
  91. return ServerStats;
  92. }
  93. CMD:panel(playerid,params[])
  94. {
  95. if(!IsPlayerAdmin(playerid)) return 0;
  96. ShowPlayerDialog(playerid,1337,DIALOG_STYLE_LIST,"{FFFFFF}Panel",cPanel(),"Select","Cancel");
  97. return 1;
  98. }
  99.  
  100. public OnPlayerInteriorChange(playerid, newinteriorid, oldinteriorid)
  101. {
  102. if(lPanel[LoaderO] == 1)
  103. {
  104. TextDrawShowForPlayer(playerid,Textdraw0);
  105. TextDrawShowForPlayer(playerid,Textdraw1);
  106. TogglePlayerControllable(playerid, 0);
  107. TimerLoader = SetTimer("Int",5000,0);
  108. }
  109. if(lPanel[LoaderO] == 0)
  110. {
  111. KillTimer(TimerLoader);
  112. }
  113. return 1;
  114. }
  115. public Int(playerid)
  116. {
  117. TextDrawHideForPlayer(playerid,Textdraw0);
  118. TextDrawHideForPlayer(playerid,Textdraw1);
  119. TogglePlayerControllable(playerid, 1);
  120. }
  121.  
  122. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  123. {
  124. if(dialogid == 1337)
  125. {
  126. if(!response) return 1;
  127. switch(listitem)
  128. {
  129. case 0:
  130. {
  131. if(lPanel[LoaderO] == 1)
  132. {
  133. lPanel[LoaderO] = 0;
  134. }
  135. else
  136. {
  137. lPanel[LoaderO] = 1;
  138. }
  139. dini_IntSet("SanadLoad/Loader.cfg","ObjectsLoader",lPanel[LoaderO]);
  140. }
  141. }
  142. }
  143. return 1;
  144. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement