HLMOD.HU Forrás Megtekintés - www.hlmod.hu
  1. /* Plugin generated by AMXX-Studio */
  2.  
  3. #include <amxmodx>
  4. #include <amxmisc>
  5.  
  6. #define PLUGIN "Bind menu"
  7. #define VERSION "1.0"
  8. #define AUTHOR "crazyboy"
  9.  
  10. #define FILE_NAME "bind.ini"
  11.  
  12. new szoveg[192]
  13. new cim[191]
  14. new szTempid[10];
  15. new configsDir[64]
  16. new linetext[255], linetextlength
  17. new valasztott
  18. new line = 0
  19. public plugin_init() {
  20. register_plugin(PLUGIN, VERSION, AUTHOR)
  21. get_configsdir(configsDir, 63)
  22. format(configsDir, 63, "%s/%s", configsDir, FILE_NAME)
  23. register_clcmd("BETU", "bind_betu")
  24. register_clcmd("say /bind", "ShowMenu")
  25. }
  26. public ShowMenu(id)
  27. {
  28. new menu = menu_create("\yBind menu", "mh_MyMenu");
  29.  
  30.  
  31. if(file_exists(configsDir))
  32. {
  33. while((line = read_file(configsDir, line, linetext, 256, linetextlength)))
  34. {
  35. if(linetext[0] == ';')
  36. continue
  37.  
  38. parse(linetext, cim, 191, szoveg, 191)
  39. num_to_str(line, szTempid, 9)
  40. menu_additem(menu, cim, szTempid, 0);
  41. }
  42. }
  43.  
  44.  
  45. menu_setprop(menu, MPROP_EXIT, MEXIT_ALL);
  46.  
  47. menu_display(id, menu, 0);
  48.  
  49. return PLUGIN_HANDLED;
  50. }
  51.  
  52. public mh_MyMenu(id, menu, item)
  53. {
  54. if(item == MENU_EXIT)
  55. {
  56. menu_cancel(id);
  57. return PLUGIN_HANDLED;
  58. }
  59.  
  60. new data[6], szName[64];
  61.  
  62. new access, callback;
  63.  
  64. menu_item_getinfo(menu, item, access, data,charsmax(data), szName,charsmax(szName), callback);
  65.  
  66. valasztott = str_to_num(data)
  67.  
  68. read_file(configsDir, valasztott - 1, linetext, 256, linetextlength)
  69. parse(linetext, cim, 191, szoveg, 191)
  70.  
  71. client_cmd(id, "messagemode BETU")
  72.  
  73.  
  74.  
  75. menu_destroy(menu);
  76.  
  77. return PLUGIN_HANDLED;
  78. }
  79. public bind_betu(id)
  80. {
  81. new uzenet[121];
  82. read_args(uzenet, charsmax(uzenet))
  83. remove_quotes(uzenet)
  84. client_cmd(id, "bind ^"%s^" ^"%s^"", uzenet, szoveg)
  85. }
  86.