Advertisement
Guest User

QuestionBot (by AzkarGames)

a guest
May 2nd, 2012
253
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.51 KB | None | 0 0
  1. ///////////////QuestionBot Filterscript//////////////////
  2. //| Made by AzkarGames Reallife |//
  3. //| Credits bitte nicht entfernen |//
  4. /////////////////////////////////////////////////////////
  5.  
  6. #include <a_samp>
  7. #define DIALOG_ASKBOT 20 // Dialog-Definition für die Inputbox (Wichtig: Kann sich mit dem Gamemode Schneiden. Unbedingt abgleichen!)
  8. #define DIALOG_BOTANSWER 21 // Dialog-Definition für die möglichen Antworten (Wichtig: Kann sich ebenfalls schneiden!)
  9.  
  10. #define COLOR_BOT 0xFFC100FF
  11.  
  12. #define MAX_TOPICS 10 // Hier wird die maximale Anzahl an 'Themen' definiert
  13.  
  14. enum row_settings
  15. {
  16. title[64],
  17. keywords[128],
  18. information[256]
  19. }
  20. new Bot_R_Info[MAX_TOPICS][row_settings];
  21.  
  22.  
  23. stock CreateABotTopic(tnumber,ttitle[64],tkeywords[128],tinformation[256])
  24. {
  25. if(!strlen(ttitle)) return print("Fehler: Es kann kein Thema ohne Titel erstellt werden."); //Fehlerausgabe falls kein Titel vorhanden ist
  26. if(!strlen(tkeywords)) return print("Fehler: Es Kann kein Thema ohne Schluesselwoerter erstellt werden."); //Fehlerausgabe falls kein Schlüsselwort vorhanden ist
  27. if(!strlen(tinformation)) return print("Fehler: Es kann kein Thema ohne Textwiedergabe erstellt werden."); //Fehlerausgabe falls keine Infos vorhanden sind
  28. Bot_R_Info[tnumber][title] = ttitle; // Zuordnung zum jeweiligen 'Topic' unter der Sparte 'title'
  29. Bot_R_Info[tnumber][keywords]= tkeywords; //Zuordnung zum jeweiligen 'Topic' unter der Sparte 'keywords'
  30. Bot_R_Info[tnumber][information] = tinformation; //Zuordnung zum jweiligen 'Topic' unter der Sparte 'information'
  31. new pInfo[512];
  32. format(pInfo,sizeof(pInfo),"Neues Thema erstellt. \n Titel: %s \n Schluesselwoerter: %s \n Infotext: %s",ttitle,tkeywords,tinformation); //Info für die Serverkonsole!
  33. print(pInfo);
  34. return 1;
  35. }
  36.  
  37. public OnFilterScriptInit()
  38. {
  39. print("\n--------------------------------------");
  40. print(" Bothilfe-Script by AzkarGames");
  41. print("--------------------------------------\n");
  42.  
  43. CreateABotTopic(0,"Testnummer 0","finde mich","Dies ist das Thema mit der Nummer 0! Du hast mich gefunden."); // Erstellt den BotTopic mit der Nummer 0.
  44. CreateABotTopic(1,"Testnummer 1","finde mich auch","Dies ist das Thema mit der Nummer 1! Du hast mich gefunden."); //Erstellt den BotTopic mit der Nummer 1.
  45. return 1;
  46. }
  47.  
  48. public OnFilterScriptExit()
  49. {
  50. return 1;
  51. }
  52.  
  53. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[])
  54. {
  55. if(dialogid == DIALOG_ASKBOT)
  56. {
  57. if(response == 0) return 1;
  58. if(!strlen(inputtext)) return SendClientMessage(playerid,COLOR_BOT,"Du musst ein Stichwort angeben");
  59. new answer[1028];
  60. for(new n = 0; n < MAX_TOPICS; n++)
  61. {
  62. if(strfind(Bot_R_Info[n][keywords],inputtext,true) != -1)
  63. {
  64. new add[512];
  65. format(add,sizeof(add),"{FFC100}Ergebnis %d:{FFFFFF} \n Titel: %s \n Information: \n %s \n Stichpunkte: \n %s \n",n,Bot_R_Info[n][title],Bot_R_Info[n][information],Bot_R_Info[n][keywords]);
  66. format(answer,sizeof(answer),"%s \n %s",answer,add);
  67. }
  68. }
  69. if(!strlen(answer)) format(answer,sizeof(answer),"Kein Ergebnis gefunden");
  70. ShowPlayerDialog(playerid,DIALOG_BOTANSWER,DIALOG_STYLE_MSGBOX,"Antworten",answer,"Ok","");
  71. }
  72. return 1;
  73. }
  74. public OnPlayerCommandText(playerid, cmdtext[])
  75. {
  76. if(strcmp("/bothilfe",cmdtext, true, 10) == 0)
  77. {
  78. ShowPlayerDialog(playerid,DIALOG_ASKBOT,DIALOG_STYLE_INPUT,"Hilfe-System","Gib bitte ein Stichwort ein!","Suchen","Abbrechen");
  79. return 1;
  80. }
  81. return 0;
  82. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement