Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- /*
- * ## LEASE ATENTAMENTE PARA NO CONVERTIRSE EN LAMMER!!.: :D ##
- *
- * Estè Simple FILTERSCRIPT esta hecho especialmente para www.forum.sa-mp.com
- * NO Publicar estè FILTERSCRIPT en Otros foros de SA-MP y hacerse pasar por el creador del CODE.
- *
- * Codigo Creado Por OTACON
- *
- * CREDITOS:
- * OTACON: Realizacion y Idea de creacion del code.
- * TÙ: Modificacion libremente respetando lo mencionado ;).
- *
- * NOTA: Menos Creditos para los que me los critican.. JO'PUTAS! :D xD ;)
- *
- * Prohibido TOTALMENTE el Robo de Créditos o la
- * Publicación de este FILTERSCRIPT sin Mi Permiso.
- */
- #include <a_samp>
- #include <sscanf2>
- #include <zcmd>
- #include <streamer>
- #define FUNCTION:%0(%1) forward%0(%1); public%0(%1)
- #define VELOCIDAD_MUERTITO 1.0
- #define DISTANCIA_MUERTITO 10.0
- #define MENU_MUERTITO (8)
- #define R "{FF0000}" //rojo
- #define G "{B5B5BC}" //gris
- #define B "{FFFFFF}" //blanco
- #define M "{A88022}" //marron
- static ObjetosMuertito[30],
- Text3D:TextoMuertito,
- GuardarTextoMuertito[4][100],
- bool:MuertitoSepultado;
- FUNCTION: OnFilterScriptInit() {
- // ###### TESTING ######
- AddPlayerClass(186,901.7302,-1072.1143,24.3440,201.7583,0,0,0,0,0,0); //
- // ###### TESTING ######
- new data[400];
- TextoMuertito=CreateDynamic3DTextLabel("",-1,883.4880,-1077.4363,24.2969,DISTANCIA_MUERTITO);
- format(GuardarTextoMuertito[0],24, "N/A", GuardarTextoMuertito[0]);
- format(GuardarTextoMuertito[1],24, "N/A", GuardarTextoMuertito[1]);
- format(GuardarTextoMuertito[2],24, "N/A", GuardarTextoMuertito[2]);
- format(GuardarTextoMuertito[3],24, "N/A", GuardarTextoMuertito[3]);
- format(data,sizeof(data),"\
- "G"["M"LAPIDA DEL FALLECIDO:"G"] \n\
- "G"Nombre: "B"%s \n\
- "G"Fecha del Fallecimiento: "B"%s \n\
- "G"Epitafio: "B"%s \n\
- "G"Autopsia: "B"%s \
- ",GuardarTextoMuertito[0],GuardarTextoMuertito[1],GuardarTextoMuertito[2],GuardarTextoMuertito[3]);
- UpdateDynamic3DTextLabelText(TextoMuertito, -1, data);
- ObjetosMuertito[0]=CreateDynamicObject(19339, 885.84589, -1077.37817, 23.71510, 0.00000, 0.00000, 0.00000);
- ObjetosMuertito[1]=CreateDynamicObject(325, 887.33032, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[2]=CreateDynamicObject(325, 887.07019, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[3]=CreateDynamicObject(325, 886.77032, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[4]=CreateDynamicObject(325, 886.49017, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[5]=CreateDynamicObject(325, 886.20996, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[6]=CreateDynamicObject(325, 885.90973, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[7]=CreateDynamicObject(325, 885.62964, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[8]=CreateDynamicObject(325, 885.34949, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[9]=CreateDynamicObject(325, 885.06940, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[10]=CreateDynamicObject(325, 884.82861, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[11]=CreateDynamicObject(325, 884.56714, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[12]=CreateDynamicObject(325, 884.28760, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[13]=CreateDynamicObject(325, 884.02759, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[14]=CreateDynamicObject(325, 887.60980, -1078.64441, 23.46310, 0.00000, 90.00000, 90.00000);
- ObjetosMuertito[15]=CreateDynamicObject(325, 887.33032, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- ObjetosMuertito[16]=CreateDynamicObject(325, 887.07019, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- ObjetosMuertito[17]=CreateDynamicObject(325, 886.77032, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- ObjetosMuertito[18]=CreateDynamicObject(325, 886.49017, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- ObjetosMuertito[19]=CreateDynamicObject(325, 886.20996, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- ObjetosMuertito[20]=CreateDynamicObject(325, 885.90973, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- ObjetosMuertito[21]=CreateDynamicObject(325, 885.62964, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- ObjetosMuertito[22]=CreateDynamicObject(325, 885.34949, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- ObjetosMuertito[23]=CreateDynamicObject(325, 885.06940, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- ObjetosMuertito[24]=CreateDynamicObject(325, 884.82861, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- ObjetosMuertito[25]=CreateDynamicObject(325, 884.56714, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- ObjetosMuertito[26]=CreateDynamicObject(325, 884.28760, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- ObjetosMuertito[27]=CreateDynamicObject(325, 884.02759, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- ObjetosMuertito[28]=CreateDynamicObject(325, 887.60980, -1076.21228, 23.46310, 0.00000, 90.00000, -90.00000);
- return true;
- }
- FUNCTION: OnDialogResponse(playerid, dialogid, response, listitem, inputtext[]) {
- new data[400];
- switch(dialogid) {
- case MENU_MUERTITO+0: { //Nombre
- if(response) {
- if(sscanf(inputtext, "s[20]", inputtext[0])) return ShowPlayerDialog(playerid, MENU_MUERTITO+0, DIALOG_STYLE_INPUT, ""M"INFO: "B"lapida del Fallecido:", ""B"Escriba el nombre del Fallecido: \n"R" No haz escrito nada aun!.", "Escribir", "Cancelar");
- if(strlen(inputtext[0])<6 || strlen(inputtext[0])>20) return ShowPlayerDialog(playerid, MENU_MUERTITO+0, DIALOG_STYLE_INPUT, ""M"INFO: "B"lapida del Fallecido:", ""B"Escriba la fecha del fallecimiento del Fallecido: \n"R" No ir por debajo de 6 o encima de 20 caracteres!.", "Escribir", "Cancelar");
- format(GuardarTextoMuertito[0],24, "%s", inputtext[0]);
- ShowPlayerDialog(playerid, MENU_MUERTITO+1, DIALOG_STYLE_INPUT, ""M"INFO: "B"lapida del Fallecido:", ""B"Escriba la fecha del fallecimiento del Fallecido:", "Escribir", "Cancelar");
- format(data,sizeof(data),""B" [ ! ] "M"Haz colocado el siguiente nombre en la lapida del Fallecido: "B"%s"B"!.",GuardarTextoMuertito[0]);
- SendClientMessage(playerid,-1,data);
- }
- }
- case MENU_MUERTITO+1: { //Fecha
- if(response) {
- if(sscanf(inputtext, "s[70]", inputtext[0])) return ShowPlayerDialog(playerid, MENU_MUERTITO+1, DIALOG_STYLE_INPUT, ""M"INFO: "B"lapida del Fallecido:", ""B"Escriba la fecha del fallecimiento del Fallecido: \n"R" No haz escrito nada aun!.", "Escribir", "Cancelar");
- if(strlen(inputtext[0])<6 || strlen(inputtext[0])>70) return ShowPlayerDialog(playerid, MENU_MUERTITO+1, DIALOG_STYLE_INPUT, ""M"INFO: "B"lapida del Fallecido:", ""B"Escriba la fecha del fallecimiento del Fallecido: \n"R" No ir por debajo de 6 o encima de 70 caracteres!.", "Escribir", "Cancelar");
- format(GuardarTextoMuertito[1],70, "%s", inputtext[0]);
- ShowPlayerDialog(playerid, MENU_MUERTITO+2, DIALOG_STYLE_INPUT, ""M"INFO: "B"lapida del Fallecido:", ""B"Escriba un epitafio para el Fallecido:", "Escribir", "Cancelar");
- format(data,sizeof(data),""B" [ ! ] "M"Haz colocado la siguiente fecha del fallecimiento en la lapida del Fallecido: "B"%s"B"!.",GuardarTextoMuertito[1]);
- SendClientMessage(playerid,-1,data);
- }
- }
- case MENU_MUERTITO+2: { //Epitafio
- if(response) {
- if(sscanf(inputtext, "s[70]", inputtext[0])) return ShowPlayerDialog(playerid, MENU_MUERTITO+2, DIALOG_STYLE_INPUT, ""M"INFO: "B"lapida del Fallecido:", ""B"Escriba un epitafio para el Fallecido: \n"R" No haz escrito nada aun!.", "Escribir", "Cancelar");
- if(strlen(inputtext[0])<6 || strlen(inputtext[0])>70) return ShowPlayerDialog(playerid, MENU_MUERTITO+2, DIALOG_STYLE_INPUT, ""M"INFO: "B"lapida del Fallecido:", ""B"Escriba un epitafio para el Fallecido: \n"R" No ir por debajo de 6 o encima de 70 caracteres!.", "Escribir", "Cancelar");
- format(GuardarTextoMuertito[2],70, "%s", inputtext[0]);
- ShowPlayerDialog(playerid, MENU_MUERTITO+3, DIALOG_STYLE_INPUT, ""M"INFO: "B"lapida del Fallecido:", ""B"Escriba una Autopsia para el Fallecido:", "Escribir", "Cancelar");
- format(data,sizeof(data),""B" [ ! ] "M"Haz colocado el siguiente epitafio en la lapida del Fallecido: "B"%s"B"!.",GuardarTextoMuertito[2]);
- SendClientMessage(playerid,-1,data);
- }
- }
- case MENU_MUERTITO+3: { //Autopsia
- if(response) {
- if(sscanf(inputtext,"s[70]",inputtext[0])) return ShowPlayerDialog(playerid, MENU_MUERTITO+3, DIALOG_STYLE_INPUT, ""M"INFO: "B"lapida del Fallecido:", ""B"Escriba una Autopsia para el Fallecido: \n"R" No haz escrito nada aun", "Escribir", "Cancelar");
- if(strlen(inputtext[0])<6 || strlen(inputtext[0])>70) return ShowPlayerDialog(playerid, MENU_MUERTITO+3, DIALOG_STYLE_INPUT, ""M"INFO: "B"lapida del Fallecido:", ""B"Escriba una Autopsia para el Fallecido: \n"R" No ir por debajo de 6 o encima de 70 caracteres!.", "Escribir", "Cancelar");
- format(GuardarTextoMuertito[3],70, "%s", inputtext[0]);
- format(data,sizeof(data),""B" [ ! ] "M"Haz colocado la siguiente Autopsia en la lapida del Fallecido: "B"%s"B"!.",GuardarTextoMuertito[3]);
- SendClientMessage(playerid,-1,data);
- format(data,sizeof(data),"\
- "G"["M"LAPIDA DEL FALLECIDO:"G"] \n\
- "G"Nombre: "B"%s \n\
- "G"Fecha del Fallecimiento: "B"%s \n\
- "G"Epitafio: "B"%s \n\
- "G"Autopsia: "B"%s \
- ",GuardarTextoMuertito[0],GuardarTextoMuertito[1],GuardarTextoMuertito[2],GuardarTextoMuertito[3]);
- UpdateDynamic3DTextLabelText(TextoMuertito, -1, data);
- }
- }
- } return true;
- }
- FUNCTION: OnDynamicObjectMoved(objectid) {
- if(objectid==ObjetosMuertito[0] && MuertitoSepultado==true) {
- DestroyDynamicObject(ObjetosMuertito[29]);
- ObjetosMuertito[29]=CreateDynamicObject(19380, 885.71631, -1077.49146, 23.05920, 0.00000, 90.00000, 0.00000);
- SetDynamicObjectMaterial(ObjetosMuertito[29], 0, 5871, "cemetery_law", "desmud", 0);
- } return true;
- }
- COMMAND:muerto(playerid, params[]) {
- if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid,-1,""B" [ ! ] "M"Usted No esta Autorizado a Utilizar este Comando"B"!.");
- if(MuertitoSepultado!=false) return SendClientMessage(playerid,-1,""B" [ ! ] "M"El Ataud se encuentra sepultado"B"!.");
- ShowPlayerDialog(playerid, MENU_MUERTITO+0, DIALOG_STYLE_INPUT, ""M"INFO: "B"lapida del Fallecido:", ""B"Escriba el nombre del Fallecido:", "Escribir", "Cancelar");
- return true;
- }
- COMMAND:sepultar(playerid, params[]) {
- if(!IsPlayerAdmin(playerid)) return SendClientMessage(playerid,-1,""B" [ ! ] "M"Usted No esta Autorizado a Utilizar este Comando"B"!.");
- if(!MuertitoSepultado) {
- MuertitoSepultado=true;
- MoveDynamicObject(ObjetosMuertito[0], 885.84595, -1077.37817, 22.35510, VELOCIDAD_MUERTITO);
- } else {
- MuertitoSepultado=false;
- DestroyDynamicObject(ObjetosMuertito[29]);
- MoveDynamicObject(ObjetosMuertito[0], 885.84589, -1077.37817, 23.71510, VELOCIDAD_MUERTITO);
- } return true;
- }
- /*
- * ## LEASE ATENTAMENTE PARA NO CONVERTIRSE EN LAMMER!!.: :D ##
- *
- * Estè Simple FILTERSCRIPT esta hecho especialmente para www.forum.sa-mp.com
- * NO Publicar estè FILTERSCRIPT en Otros foros de SA-MP y hacerse pasar por el creador del CODE.
- *
- * Codigo Creado Por OTACON
- *
- * CREDITOS:
- * OTACON: Realizacion y Idea de creacion del code.
- * TÙ: Modificacion libremente respetando lo mencionado ;).
- *
- * NOTA: Menos Creditos para los que me los critican.. JO'PUTAS! :D xD ;)
- *
- * Prohibido TOTALMENTE el Robo de Créditos o la
- * Publicación de este FILTERSCRIPT sin Mi Permiso.
- */
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement