API tools faq
paste
OtaconEvil

[FS] Simple Sistema de Pizarras v0.1 Beta By OTACON

OtaconEvil
Jul 9th, 2013
346
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Pawn 27.77 KB | None | 0 0
raw download clone embed print report
  1. /*
  2.     ..:::: CREADO POR OTACON ::::..
  3.                   - 2013 -
  4.     - Simple Sistema de Pizarras -
  5.              Version: 0.1 Beta
  6. */
  7. /*
  8. DDDDDDDDDDDDttDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDkk                    
  9. DDDDDDDDtt    DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDtt                    
  10. DDDDtt        kkDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDkkttkkkk                  
  11. DDtt    tt    ttDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDttttttkkkkkkttkkkkkkkkkkkkkk
  12. DD            ttDDDDDDDDDDDDMMMMMMkkMMDDDDDDDDDDDDMMDDDDDDttttkkkkkkkkkkDDDDDDDDDDDDDDDD
  13. DDtt      ttkkDDDDDDMMMMMMMMMMDDMMttMMMMkkkkkkkkkkDDMMMMkkttkkkkkkkkkkkkDDDDDDDDDDDDDDDD
  14. DDkk  ttDDDDDDMMkkkkDDMMMMkk  DDMMMMMMDDkkkkkkkkkkkkMMMMttkkkkkkkkkkkkkkDDDDDDDDDDDDDDMM
  15. DDDDttDDDDMMMMMMkkkkkkMMkk    kkDDMMDDkkkkttttttttttMMMMttkkkkkkkkkkkkkkDDDDDDDDDDDDMMDD
  16. DDDDDDDDMMDDMMMMkkkkkkkkkktt      tt    kkttttttttttDDMMkkkkkkkkttkkttkkDDDDDDDDDDMMDDtt
  17. DDDDDDMMttkkMMMMDDttttttttkk        ttkkttttttttttttDDMMttkkttttttttttDDDDDDDDDDMMkk    
  18. DDDDDDkkkkttDDMMDDttttttttttkkttkkkkttttttttttttttttkkMMtttt        kkDDDDDDMMDD        
  19. DDDDDDkkkk  ttkkkkttttttttttttttttttttttttttttttttttkkMMtttt        ttkkDDDDtt          
  20. ttMMMMDDttkk    kkttttttttttttttttttttttttttttttttttkkMMttkk          kktt              
  21.   DDDDDDkkkkkkttkkttttttttkkttttttttttttttttttttttttDDMM  tttt        tt                
  22. ttttttttkkttttkkttttttttkkkkkkkkttttttttttttttttttttMMMMkk  kk        kk                
  23.   ttttttkkttttkkttttkkkkkkkkkkkkkkttttttttttttttttkkMMMMMM    kkttttttkk                
  24.   kkttttkkttttkkkkkkkkkkkkkkkkkkttttttttttttttttttMMMMMM        tttttt                  
  25.     kkkkkkttttkkkkkkkkkkkkkkttttttttttttttttttttkkMMMMMMDD    tt      tt  MMtt          
  26.       ttkkkkttttkkkkkkkkkkttttttttttttttttttttttMMMMMMMMMMMMMMMMMMMMMM    MMMM        tt
  27.           ttttttttttttkkkkkkkkkkkkkkkkkkttttttMMMMMMMMMMMMMMMMMMMMMMDDttDDMMMMttkkDDDDDD
  28.             kkttttttkkkkttttttttttttttttttttDDMMkkMMMMMMMMMMMMMMMMMMMMMMMMMMMMDDDDDDDDDD
  29.               kktttttttt  ttttkkkkttttttttkkMMkkkkMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMDDDDDDDD
  30.               ttkkttttttttkkDDMMttttttttttMMDDkkkkMMMMMMMMMMMMMMDDDDDDDDMMMMMMMMDDDDDDDD
  31.                 ttkkttDDMMMMMMttttttttttMMDDkkkkkkDDMMMMDDMMDDDDDDDDDDDDDDDDMMMMDDDDDDDD
  32.                     kkttttkkttttttttttMMMMkkkkkkkkkkkkkk  DDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
  33.                     ttDDttttMMMMMMMMMMMMkkkkkkkkkkkkkkttkkDDDDDDDDDDMMDDDDDDDDDDDDDDDDDD
  34.                     MMMMkkDDMMMMMMMMMMkkkkkkkkkkkkkkttttDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
  35.                     MMDDMMMMMMMMMMMMkkkkkkkkkkkkkkkk  DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
  36.                     ttttMMMMDDDDDDDDDDkkkkkktttttt    DDDDDDDDDDDDDDDDDDMMttttDDDDDDDDDD
  37.                         MMDDDDDDMMkktttttttttttttt  kkDDDDDDDDDDDDDDDDkk    ttDDDDDDDDDD
  38.                           DDDDDDMM  ttttttttkkkk    DDkkDDMMDDDDDDkk      kkDDDDDDDDDDtt
  39.                           DDDDDDkk    ttttkkttttkk        tt          kkDDDDDDDDDDDDDDtt
  40.                         kkDDDDDDkktttt    ttttttkk  kkDDDDDDDDkkttDDDDDDDDDDDDDDMMDDDDDD
  41.                         MMDDDDDDkkttkkkkkkttttttkkkkDDDDDDDDDDDDDDDDDDDDDDDDMMMMMMMMDDDD
  42.                       DDDDDDDDkkttttttttttkkttttttDDDDDDDDDDDDDDDDDDDDDDMMMMMMMMMMMMMMDD
  43.                     ttDDDDDDttkkttttttttttttkkkkttttDDDDDDDDDDDDDDDDDDMMMMMMMMDDDDDDDDDD
  44.                     kkDDDDtt  kkttttttttttttttttkkttttDDDDDDDDDDDDMMMMMMMMDDDDDDDDDDDDDD
  45.                             DDkkttttttttttttttttttkkttttDDDDDDMMMMMMMMMMDDDDDDDDDDDDDDDD
  46.                   ttDDDDDDDDDDkkkkttttttttttttttttttttttttMMMMMMMMMMMMDDDDDDDDDDDDDDDDDD
  47.                   ttDDDDDDDDkkttttkkttttttttttttttttttttttMMMMMMMMDDDDDDDDDDDDDDkkkkkkkk
  48.                   ttDDDDDDDDttttttttttttttttttttttttttttttDDMMDDDDDDDDDDDDDDkktt  tttttt
  49.  
  50. BBBBBBBBBBBB                          OOOOOO        TTTTTTTTTTTT          AA              CCCCCCCC        OOOOOO      NNNNNN      NNNNNN
  51.   BBBB    BBBB                      OOOO  OOOO      TT  TTTT  TT        AAAAAA          CCCC    CC      OOOO  OOOO      NNNNNN      NN  
  52.   BBBB    BBBB                    OOOO      OOOO        TTTT            AAAAAA        CCCC            OOOO      OOOO    NNNNNNNN    NN  
  53.   BBBBBBBBBB  yyyyyy  yyyy        OOOO      OOOO        TTTT          AA    AAAA      CCCC            OOOO      OOOO    NN  NNNN    NN  
  54.   BBBB    BBBB  yyyy  yy          OOOO      OOOO        TTTT          AA    AAAA      CCCC            OOOO      OOOO    NN    NNNN  NN  
  55.   BBBB    BBBB  yyyyyyyy          OOOO      OOOO        TTTT        AAAAAAAAAAAAAA    CCCC            OOOO      OOOO    NN    NNNNNNNN  
  56.   BBBB    BBBB    yyyy              OOOO  OOOO          TTTT        AA        AAAA      CCCC    CC      OOOO  OOOO      NN      NNNNNN  
  57. BBBBBBBBBBBB      yyyy                OOOOOO          TTTTTTTT    AAAAAA    AAAAAAAA      CCCCCC          OOOOOO      NNNNNN      NNNN  
  58.                     yy                                                                                                                  
  59.                   yy                                                                                                                    
  60.                 yyyy                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                          
  61. */
  62.  
  63. #include <a_samp>
  64. #include <zcmd>
  65. #include <sscanf2>
  66.  
  67. #define CREDITS "CREDITOS: By OTACON (No Remover)"
  68. #define BLANCO  "{FFFFFF}" //Blanco
  69. #define AMARILLO  "{FFB000}" //Amarillo
  70. #define IDS_PIZARRA (7)
  71. #define MAX_PIZARRA (200)
  72. #define MIN_PIZARRA (0)
  73. #define OBJ_PIZARRA (3077)
  74. #define DIS_PIZARRA 2.0
  75. new
  76.     PizarraObject[MAX_PIZARRA],
  77.     PizarraBorde[MAX_PIZARRA],
  78.     PizarraFondo[MAX_PIZARRA],
  79.     PizarraTexto[MAX_PIZARRA],
  80.     PizarraCarac[MAX_PIZARRA][26],
  81.     PizarraObjectCant=0;
  82.  
  83. public OnDialogResponse(playerid, dialogid, response, listitem, inputtext[]) {
  84.     new Float:pos[6], Float:postemp[2];
  85.     switch(dialogid) {
  86.         case IDS_PIZARRA+0: {
  87.             if(response) {
  88.                 switch(listitem) {
  89.                     case 1: {
  90.                         if(PizarraObjectCant >= MAX_PIZARRA) return SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"Haz Llegado al Limite de Pizarras Creadas Permitidas"BLANCO"!. "BLANCO""CREDITS"");
  91.                         for(new objectid=0; objectid<PizarraObjectCant+1; objectid++) GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  92.                         if(IsPlayerInRangeOfPoint(playerid, DIS_PIZARRA, pos[0], pos[1], pos[2])) return SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"Ya Hay una Pizarra En Esta Posicion"BLANCO"!. "BLANCO""CREDITS"");
  93.                         ShowPlayerDialog(playerid, IDS_PIZARRA+1, DIALOG_STYLE_MSGBOX, ""BLANCO">> "AMARILLO"Sistema de Pizarras:", ""BLANCO"¿Desea Crear una Pizarra? \n"AMARILLO""CREDITS"", "Crear", "Cancelar");
  94.                     }
  95.                     case 2: {
  96.                         if(PizarraObjectCant <= MIN_PIZARRA) return SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"No Hay Ninguna Pizarra Creada"BLANCO"!. "BLANCO""CREDITS"");
  97.                         for(new objectid=0; objectid<PizarraObjectCant+1; objectid++) GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  98.                         if(!IsPlayerInRangeOfPoint(playerid, DIS_PIZARRA, pos[0], pos[1], pos[2])) return SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"No Hay una Pizarra Cerca Tuyo"BLANCO"!. "BLANCO""CREDITS"");
  99.                         ShowPlayerDialog(playerid, IDS_PIZARRA+2, DIALOG_STYLE_MSGBOX, ""BLANCO">> "AMARILLO"Sistema de Pizarras:", ""BLANCO"¿Desea Borrar una Pizarra? \n"AMARILLO""CREDITS"", "Borrar", "Cancelar");
  100.                     }
  101.                     case 3: {
  102.                         if(PizarraObjectCant <= MIN_PIZARRA) return SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"No Hay Ninguna Pizarra Creada"BLANCO"!. "BLANCO""CREDITS"");
  103.                         for(new objectid=0; objectid<PizarraObjectCant+1; objectid++) GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  104.                         if(!IsPlayerInRangeOfPoint(playerid, DIS_PIZARRA, pos[0], pos[1], pos[2])) return SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"No Hay una Pizarra Cerca Tuyo"BLANCO"!. "BLANCO""CREDITS"");
  105.                         ShowPlayerDialog(playerid, IDS_PIZARRA+3, DIALOG_STYLE_INPUT, ""BLANCO">> "AMARILLO"Sistema de Pizarras:", ""BLANCO"Escriba un Texto Para La Pizarra: \n"AMARILLO""CREDITS"", "Escribir", "Cancelar");
  106.                     }
  107.                     case 4: {
  108.                         if(PizarraObjectCant <= MIN_PIZARRA) return SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"No Hay Ninguna Pizarra Creada"BLANCO"!. "BLANCO""CREDITS"");
  109.                         for(new objectid=0; objectid<PizarraObjectCant+1; objectid++) GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  110.                         if(!IsPlayerInRangeOfPoint(playerid, DIS_PIZARRA, pos[0], pos[1], pos[2])) return SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"No Hay una Pizarra Cerca Tuyo"BLANCO"!. "BLANCO""CREDITS"");
  111.                         ShowPlayerDialog(playerid, IDS_PIZARRA+4, DIALOG_STYLE_INPUT, ""BLANCO">> "AMARILLO"Sistema de Pizarras:", ""BLANCO"Coloca el Color "AMARILLO"''ARGB''"BLANCO" del Fondo Para La Pizarra: \n"AMARILLO""CREDITS"", "Cambiar", "Cancelar");
  112.                     }
  113.                     case 5: {
  114.                         if(PizarraObjectCant <= MIN_PIZARRA) return SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"No Hay Ninguna Pizarra Creada"BLANCO"!. "BLANCO""CREDITS"");
  115.                         for(new objectid=0; objectid<PizarraObjectCant+1; objectid++) GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  116.                         if(!IsPlayerInRangeOfPoint(playerid, DIS_PIZARRA, pos[0], pos[1], pos[2])) return SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"No Hay una Pizarra Cerca Tuyo"BLANCO"!. "BLANCO""CREDITS"");
  117.                         ShowPlayerDialog(playerid, IDS_PIZARRA+5, DIALOG_STYLE_INPUT, ""BLANCO">> "AMARILLO"Sistema de Pizarras:", ""BLANCO"Coloca el Color "AMARILLO"''ARGB''"BLANCO" del Borde Para La Pizarra: \n"AMARILLO""CREDITS"", "Cambiar", "Cancelar");
  118.                     }
  119.                     case 6: {
  120.                         if(PizarraObjectCant <= MIN_PIZARRA) return SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"No Hay Ninguna Pizarra Creada"BLANCO"!. "BLANCO""CREDITS"");
  121.                         for(new objectid=0; objectid<PizarraObjectCant+1; objectid++) GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  122.                         if(!IsPlayerInRangeOfPoint(playerid, DIS_PIZARRA, pos[0], pos[1], pos[2])) return SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"No Hay una Pizarra Cerca Tuyo"BLANCO"!. "BLANCO""CREDITS"");
  123.                         ShowPlayerDialog(playerid, IDS_PIZARRA+5, DIALOG_STYLE_INPUT, ""BLANCO">> "AMARILLO"Sistema de Pizarras:", ""BLANCO"Coloca el Color "AMARILLO"''ARGB''"BLANCO" del Texto Para La Pizarra: \n"AMARILLO""CREDITS"", "Cambiar", "Cancelar");
  124.                     }
  125.                 }
  126.             }
  127.         }
  128.         case IDS_PIZARRA+1: { //crear
  129.             if(response) {
  130.                 GetPlayerPos(playerid, pos[0], pos[1], pos[2]);
  131.                 GetPlayerFacingAngle(playerid, pos[3]);
  132.                 PlayerPlaySound(playerid, 1057, 0.0, 0.0, 0.0);
  133.                 postemp[0]=pos[0]+(DIS_PIZARRA*floatsin(-pos[3], degrees));
  134.                 postemp[1]=pos[1]+(DIS_PIZARRA*floatcos(-pos[3], degrees));
  135.                 PizarraObjectCant++;
  136.                 PizarraObject[PizarraObjectCant]=CreateObject(OBJ_PIZARRA, postemp[0], postemp[1], pos[2]-1, 0.00000, 0.00000, pos[3]-180);
  137.                 PizarraBorde[PizarraObjectCant] = HexToInt("0xFFFF0000"); //Rojo
  138.                 PizarraFondo[PizarraObjectCant] = HexToInt("0xFF000000"); //Negro
  139.                 PizarraTexto[PizarraObjectCant] = HexToInt("0xFFFFFFFF"); //Blanco
  140.                 SetObjectMaterial(PizarraObject[PizarraObjectCant], 0, OBJ_PIZARRA, "blkbrdx", "nf_blackbrd", PizarraFondo[PizarraObjectCant]);
  141.                 SetObjectMaterial(PizarraObject[PizarraObjectCant], 1, OBJ_PIZARRA, "blkbrdx", "nf_blackbrd", PizarraBorde[PizarraObjectCant]);
  142.                 SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"Haz Creado una Pizarra"BLANCO"!. "BLANCO""CREDITS"");
  143.                 MenuPizarras(playerid);
  144.             }
  145.             if(!response) return MenuPizarras(playerid);
  146.         }
  147.         case IDS_PIZARRA+2: { //borrar
  148.             if(response) {
  149.                 for(new objectid=0; objectid<PizarraObjectCant+1; objectid++) {
  150.                     GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  151.                     if(IsPlayerInRangeOfPoint(playerid, DIS_PIZARRA, pos[0], pos[1], pos[2])) {
  152.                         PlayerPlaySound(playerid, 1057, 0.0, 0.0, 0.0);
  153.                         DestroyObject(PizarraObject[objectid]);
  154.                         PizarraObjectCant--;
  155.                         SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"Haz Eliminado una Pizarra"BLANCO"!. "BLANCO""CREDITS"");
  156.                         MenuPizarras(playerid);
  157.                     }
  158.                 }
  159.             }
  160.             if(!response) return MenuPizarras(playerid);
  161.         }
  162.         case IDS_PIZARRA+3: { //texto
  163.             if(response) {
  164.                 for(new objectid=0; objectid<PizarraObjectCant+1; objectid++) {
  165.                     GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  166.                     if(IsPlayerInRangeOfPoint(playerid, DIS_PIZARRA, pos[0], pos[1], pos[2])) {
  167.                         if(sscanf(inputtext[0], "s[26]", inputtext[0])) return ShowPlayerDialog(playerid, IDS_PIZARRA+3, DIALOG_STYLE_INPUT, ""BLANCO"> "AMARILLO"Sistema de Pizarras:", ""BLANCO"Escriba un Texto Para La Pizarra: \n "BLANCO"[ ! ] "AMARILLO"No Haz Escrito Nada aun"BLANCO"!. \n"AMARILLO""CREDITS"", "Escribir", "Cancelar");
  168.                         if(strlen(inputtext[0]) < 1 || strlen(inputtext[0]) > 25) return ShowPlayerDialog(playerid, IDS_PIZARRA+3, DIALOG_STYLE_INPUT, ""BLANCO"> "AMARILLO"Sistema de Pizarras:", ""BLANCO"Escriba un Texto Para La Pizarra: \n "BLANCO"[ ! ] "AMARILLO"No ir Por Abajo de 1 ni por Arriba de 128"BLANCO"!. \n"AMARILLO""CREDITS"", "Escribir", "Cancelar");
  169.                         GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  170.                         GetObjectRot(PizarraObject[objectid], pos[3], pos[4], pos[5]);
  171.                         PlayerPlaySound(playerid, 1057, 0.0, 0.0, 0.0);
  172.                         format(PizarraCarac[objectid],128, "%s",inputtext[0]);
  173.                         DestroyObject(PizarraObject[objectid]);
  174.                         PizarraObject[objectid]=CreateObject(OBJ_PIZARRA, pos[0], pos[1], pos[2], pos[3], pos[4], pos[5]);
  175.                         SetObjectMaterial(PizarraObject[objectid], 0, OBJ_PIZARRA, "blkbrdx", "nf_blackbrd", PizarraFondo[objectid]);
  176.                         SetObjectMaterial(PizarraObject[objectid], 1, OBJ_PIZARRA, "blkbrdx", "nf_blackbrd", PizarraBorde[objectid]);
  177.                         SetObjectMaterialText(PizarraObject[objectid], PizarraCarac[objectid], 0, 100, "Arial", 24, 1, PizarraTexto[objectid], PizarraFondo[objectid], 1);
  178.                         SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"Haz Colocado/Cambiado el Texto de La Pizarra"BLANCO"!. "BLANCO""CREDITS"");
  179.                         ShowPlayerDialog(playerid, IDS_PIZARRA+3, DIALOG_STYLE_INPUT, ""BLANCO">> "AMARILLO"Sistema de Pizarras:", ""BLANCO"Escriba un Texto Para La Pizarra: \n"AMARILLO""CREDITS"", "Escribir", "Cancelar");
  180.                     }
  181.                 }
  182.             }
  183.             if(!response) return MenuPizarras(playerid);
  184.         }
  185.         case IDS_PIZARRA+4: { //Color Fondo
  186.             if(response) {
  187.                 for(new objectid=0; objectid<PizarraObjectCant+1; objectid++) {
  188.                     GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  189.                     if(IsPlayerInRangeOfPoint(playerid, DIS_PIZARRA, pos[0], pos[1], pos[2])) {
  190.                         if(sscanf(inputtext[0], "d", inputtext[0])) return ShowPlayerDialog(playerid, IDS_PIZARRA+4, DIALOG_STYLE_INPUT, ""BLANCO"> "AMARILLO"Sistema de Pizarras:", ""BLANCO"Coloca el Color "AMARILLO"''ARGB''"BLANCO" del Fondo Para La Pizarra: \n "BLANCO"[ ! ] "AMARILLO"No Haz Colocado Nada aun"BLANCO"!. \n"AMARILLO""CREDITS"", "Cambiar", "Cancelar");
  191.                         GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  192.                         GetObjectRot(PizarraObject[objectid], pos[3], pos[4], pos[5]);
  193.                         PlayerPlaySound(playerid, 1057, 0.0, 0.0, 0.0);
  194.                         PizarraFondo[objectid] = HexToInt(inputtext[0]);
  195.                         DestroyObject(PizarraObject[objectid]);
  196.                         PizarraObject[objectid]=CreateObject(OBJ_PIZARRA, pos[0], pos[1], pos[2], pos[3], pos[4], pos[5]);
  197.                         SetObjectMaterial(PizarraObject[objectid], 0, OBJ_PIZARRA, "blkbrdx", "nf_blackbrd", PizarraFondo[objectid]);
  198.                         SetObjectMaterial(PizarraObject[objectid], 1, OBJ_PIZARRA, "blkbrdx", "nf_blackbrd", PizarraBorde[objectid]);
  199.                         SetObjectMaterialText(PizarraObject[objectid], PizarraCarac[objectid], 0, 100, "Arial", 24, 1, PizarraTexto[objectid], PizarraFondo[objectid], 1);
  200.                         SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"Haz Colocado/Cambiado el Color del Fondo de La Pizarra"BLANCO"!. "BLANCO""CREDITS"");
  201.                         ShowPlayerDialog(playerid, IDS_PIZARRA+4, DIALOG_STYLE_INPUT, ""BLANCO">> "AMARILLO"Sistema de Pizarras:", ""BLANCO"Coloca el Color "AMARILLO"''ARGB''"BLANCO" del Fondo Para La Pizarra: \n"AMARILLO""CREDITS"", "Cambiar", "Cancelar");
  202.                     }
  203.                 }
  204.             }
  205.             if(!response) return MenuPizarras(playerid);
  206.         }
  207.         case IDS_PIZARRA+5: { //Color Borde
  208.             if(response) {
  209.                 for(new objectid=0; objectid<PizarraObjectCant+1; objectid++) {
  210.                     GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  211.                     if(IsPlayerInRangeOfPoint(playerid, DIS_PIZARRA, pos[0], pos[1], pos[2])) {
  212.                         if(sscanf(inputtext[0], "d", inputtext[0])) return ShowPlayerDialog(playerid, IDS_PIZARRA+5, DIALOG_STYLE_INPUT, ""BLANCO"> "AMARILLO"Sistema de Pizarras:", ""BLANCO"Coloca el Color del Borde "AMARILLO"''ARGB''"BLANCO" Para La Pizarra: \n "BLANCO"[ ! ] "AMARILLO"No Haz Colocado Nada aun"BLANCO"!. \n"AMARILLO""CREDITS"", "Cambiar", "Cancelar");
  213.                         GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  214.                         GetObjectRot(PizarraObject[objectid], pos[3], pos[4], pos[5]);
  215.                         PlayerPlaySound(playerid, 1057, 0.0, 0.0, 0.0);
  216.                         PizarraBorde[objectid] = HexToInt(inputtext[0]);
  217.                         DestroyObject(PizarraObject[objectid]);
  218.                         PizarraObject[objectid]=CreateObject(OBJ_PIZARRA, pos[0], pos[1], pos[2], pos[3], pos[4], pos[5]);
  219.                         SetObjectMaterial(PizarraObject[objectid], 0, OBJ_PIZARRA, "blkbrdx", "nf_blackbrd", PizarraFondo[objectid]);
  220.                         SetObjectMaterial(PizarraObject[objectid], 1, OBJ_PIZARRA, "blkbrdx", "nf_blackbrd", PizarraBorde[objectid]);
  221.                         SetObjectMaterialText(PizarraObject[objectid], PizarraCarac[objectid], 0, 100, "Arial", 24, 1, PizarraTexto[objectid], PizarraFondo[objectid], 1);
  222.                         SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"Haz Colocado/Cambiado el Color del Borde de La Pizarra"BLANCO"!. "BLANCO""CREDITS"");
  223.                         ShowPlayerDialog(playerid, IDS_PIZARRA+5, DIALOG_STYLE_INPUT, ""BLANCO">> "AMARILLO"Sistema de Pizarras:", ""BLANCO"Coloca el Color "AMARILLO"''ARGB''"BLANCO" del Borde Para La Pizarra: \n"AMARILLO""CREDITS"", "Cambiar", "Cancelar");
  224.                     }
  225.                 }
  226.             }
  227.             if(!response) return MenuPizarras(playerid);
  228.         }
  229.         case IDS_PIZARRA+6: { //Color Texto
  230.             if(response) {
  231.                 for(new objectid=0; objectid<PizarraObjectCant+1; objectid++) {
  232.                     GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  233.                     if(IsPlayerInRangeOfPoint(playerid, DIS_PIZARRA, pos[0], pos[1], pos[2])) {
  234.                         if(sscanf(inputtext[0], "d", inputtext[0])) return ShowPlayerDialog(playerid, IDS_PIZARRA+6, DIALOG_STYLE_INPUT, ""BLANCO"> "AMARILLO"Sistema de Pizarras:", ""BLANCO"Coloca el Color "AMARILLO"''ARGB''"BLANCO" del Texto Para La Pizarra: \n "BLANCO"[ ! ] "AMARILLO"No Haz Colocado Nada aun"BLANCO"!. \n"AMARILLO""CREDITS"", "Cambiar", "Cancelar");
  235.                         GetObjectPos(PizarraObject[objectid], pos[0], pos[1], pos[2]);
  236.                         GetObjectRot(PizarraObject[objectid], pos[3], pos[4], pos[5]);
  237.                         PlayerPlaySound(playerid, 1057, 0.0, 0.0, 0.0);
  238.                         PizarraTexto[objectid] = HexToInt(inputtext[0]);
  239.                         DestroyObject(PizarraObject[objectid]);
  240.                         PizarraObject[objectid]=CreateObject(OBJ_PIZARRA, pos[0], pos[1], pos[2], pos[3], pos[4], pos[5]);
  241.                         SetObjectMaterial(PizarraObject[objectid], 0, OBJ_PIZARRA, "blkbrdx", "nf_blackbrd", PizarraFondo[objectid]);
  242.                         SetObjectMaterial(PizarraObject[objectid], 1, OBJ_PIZARRA, "blkbrdx", "nf_blackbrd", PizarraBorde[objectid]);
  243.                         SetObjectMaterialText(PizarraObject[objectid], PizarraCarac[objectid], 0, 100, "Arial", 24, 1, PizarraTexto[objectid], PizarraFondo[objectid], 1);
  244.                         SendClientMessage(playerid, -1, "   "BLANCO"[ ! ] "AMARILLO"Haz Colocado/Cambiado el Color del Texto de La Pizarra"BLANCO"!. "BLANCO""CREDITS"");
  245.                         ShowPlayerDialog(playerid, IDS_PIZARRA+6, DIALOG_STYLE_INPUT, ""BLANCO">> "AMARILLO"Sistema de Pizarras:", ""BLANCO"Coloca el Color "AMARILLO"''ARGB''"BLANCO" del Texto Para La Pizarra: \n"AMARILLO""CREDITS"", "Cambiar", "Cancelar");
  246.                     }
  247.                 }
  248.             }
  249.             if(!response) return MenuPizarras(playerid);
  250.         }
  251.     }
  252.     return false;
  253. }
  254. COMMAND:pizarra(playerid, params[]) return MenuPizarras(playerid);
  255. stock MenuPizarras(playerid) {
  256.     new str[500]; strcat(str, " \n\
  257.     \n"AMARILLO"[#] "BLANCO"Crear una Pizarra en tu Posicion. \
  258.     \n"AMARILLO"[#] "BLANCO"Borrar la Pizarra Cercana. \
  259.     \n"AMARILLO"[#] "BLANCO"Cambiar el Texto Colocado en la Pizarra. \
  260.     \n"AMARILLO"[#] "BLANCO"Cambiar el Color del Fondo la Pizarra. \
  261.     \n"AMARILLO"[#] "BLANCO"Cambiar el Color del Borde la Pizarra. \
  262.     \n"AMARILLO"[#] "BLANCO"Cambiar el Color del Texto la Pizarra. ");
  263.     return ShowPlayerDialog(playerid, IDS_PIZARRA+0, DIALOG_STYLE_LIST, ""BLANCO">> "AMARILLO"Sistema de Pizarras:", str, "Seleccionar", "Cancelar");
  264. }
  265. stock HexToInt(string[]) { //DracoBlue
  266.   if (string[0]==0) return 0;
  267.   new i;
  268.   new cur=1;
  269.   new res=0;
  270.   for (i=strlen(string);i>0;i--) {
  271.     if (string[i-1]<58) res=res+cur*(string[i-1]-48); else res=res+cur*(string[i-1]-65+10);
  272.     cur=cur*16;
  273.   }
  274.   return res;
  275. }
  276. /*
  277. DDDDDDDDDDDDttDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDkk                    
  278. DDDDDDDDtt    DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDtt                    
  279. DDDDtt        kkDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDkkttkkkk                  
  280. DDtt    tt    ttDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDttttttkkkkkkttkkkkkkkkkkkkkk
  281. DD            ttDDDDDDDDDDDDMMMMMMkkMMDDDDDDDDDDDDMMDDDDDDttttkkkkkkkkkkDDDDDDDDDDDDDDDD
  282. DDtt      ttkkDDDDDDMMMMMMMMMMDDMMttMMMMkkkkkkkkkkDDMMMMkkttkkkkkkkkkkkkDDDDDDDDDDDDDDDD
  283. DDkk  ttDDDDDDMMkkkkDDMMMMkk  DDMMMMMMDDkkkkkkkkkkkkMMMMttkkkkkkkkkkkkkkDDDDDDDDDDDDDDMM
  284. DDDDttDDDDMMMMMMkkkkkkMMkk    kkDDMMDDkkkkttttttttttMMMMttkkkkkkkkkkkkkkDDDDDDDDDDDDMMDD
  285. DDDDDDDDMMDDMMMMkkkkkkkkkktt      tt    kkttttttttttDDMMkkkkkkkkttkkttkkDDDDDDDDDDMMDDtt
  286. DDDDDDMMttkkMMMMDDttttttttkk        ttkkttttttttttttDDMMttkkttttttttttDDDDDDDDDDMMkk    
  287. DDDDDDkkkkttDDMMDDttttttttttkkttkkkkttttttttttttttttkkMMtttt        kkDDDDDDMMDD        
  288. DDDDDDkkkk  ttkkkkttttttttttttttttttttttttttttttttttkkMMtttt        ttkkDDDDtt          
  289. ttMMMMDDttkk    kkttttttttttttttttttttttttttttttttttkkMMttkk          kktt              
  290.   DDDDDDkkkkkkttkkttttttttkkttttttttttttttttttttttttDDMM  tttt        tt                
  291. ttttttttkkttttkkttttttttkkkkkkkkttttttttttttttttttttMMMMkk  kk        kk                
  292.   ttttttkkttttkkttttkkkkkkkkkkkkkkttttttttttttttttkkMMMMMM    kkttttttkk                
  293.   kkttttkkttttkkkkkkkkkkkkkkkkkkttttttttttttttttttMMMMMM        tttttt                  
  294.     kkkkkkttttkkkkkkkkkkkkkkttttttttttttttttttttkkMMMMMMDD    tt      tt  MMtt          
  295.       ttkkkkttttkkkkkkkkkkttttttttttttttttttttttMMMMMMMMMMMMMMMMMMMMMM    MMMM        tt
  296.           ttttttttttttkkkkkkkkkkkkkkkkkkttttttMMMMMMMMMMMMMMMMMMMMMMDDttDDMMMMttkkDDDDDD
  297.             kkttttttkkkkttttttttttttttttttttDDMMkkMMMMMMMMMMMMMMMMMMMMMMMMMMMMDDDDDDDDDD
  298.               kktttttttt  ttttkkkkttttttttkkMMkkkkMMMMMMMMMMMMMMMMMMMMMMMMMMMMMMDDDDDDDD
  299.               ttkkttttttttkkDDMMttttttttttMMDDkkkkMMMMMMMMMMMMMMDDDDDDDDMMMMMMMMDDDDDDDD
  300.                 ttkkttDDMMMMMMttttttttttMMDDkkkkkkDDMMMMDDMMDDDDDDDDDDDDDDDDMMMMDDDDDDDD
  301.                     kkttttkkttttttttttMMMMkkkkkkkkkkkkkk  DDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
  302.                     ttDDttttMMMMMMMMMMMMkkkkkkkkkkkkkkttkkDDDDDDDDDDMMDDDDDDDDDDDDDDDDDD
  303.                     MMMMkkDDMMMMMMMMMMkkkkkkkkkkkkkkttttDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
  304.                     MMDDMMMMMMMMMMMMkkkkkkkkkkkkkkkk  DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD
  305.                     ttttMMMMDDDDDDDDDDkkkkkktttttt    DDDDDDDDDDDDDDDDDDMMttttDDDDDDDDDD
  306.                         MMDDDDDDMMkktttttttttttttt  kkDDDDDDDDDDDDDDDDkk    ttDDDDDDDDDD
  307.                           DDDDDDMM  ttttttttkkkk    DDkkDDMMDDDDDDkk      kkDDDDDDDDDDtt
  308.                           DDDDDDkk    ttttkkttttkk        tt          kkDDDDDDDDDDDDDDtt
  309.                         kkDDDDDDkktttt    ttttttkk  kkDDDDDDDDkkttDDDDDDDDDDDDDDMMDDDDDD
  310.                         MMDDDDDDkkttkkkkkkttttttkkkkDDDDDDDDDDDDDDDDDDDDDDDDMMMMMMMMDDDD
  311.                       DDDDDDDDkkttttttttttkkttttttDDDDDDDDDDDDDDDDDDDDDDMMMMMMMMMMMMMMDD
  312.                     ttDDDDDDttkkttttttttttttkkkkttttDDDDDDDDDDDDDDDDDDMMMMMMMMDDDDDDDDDD
  313.                     kkDDDDtt  kkttttttttttttttttkkttttDDDDDDDDDDDDMMMMMMMMDDDDDDDDDDDDDD
  314.                             DDkkttttttttttttttttttkkttttDDDDDDMMMMMMMMMMDDDDDDDDDDDDDDDD
  315.                   ttDDDDDDDDDDkkkkttttttttttttttttttttttttMMMMMMMMMMMMDDDDDDDDDDDDDDDDDD
  316.                   ttDDDDDDDDkkttttkkttttttttttttttttttttttMMMMMMMMDDDDDDDDDDDDDDkkkkkkkk
  317.                   ttDDDDDDDDttttttttttttttttttttttttttttttDDMMDDDDDDDDDDDDDDkktt  tttttt
  318.  
  319. BBBBBBBBBBBB                          OOOOOO        TTTTTTTTTTTT          AA              CCCCCCCC        OOOOOO      NNNNNN      NNNNNN
  320.   BBBB    BBBB                      OOOO  OOOO      TT  TTTT  TT        AAAAAA          CCCC    CC      OOOO  OOOO      NNNNNN      NN  
  321.   BBBB    BBBB                    OOOO      OOOO        TTTT            AAAAAA        CCCC            OOOO      OOOO    NNNNNNNN    NN  
  322.   BBBBBBBBBB  yyyyyy  yyyy        OOOO      OOOO        TTTT          AA    AAAA      CCCC            OOOO      OOOO    NN  NNNN    NN  
  323.   BBBB    BBBB  yyyy  yy          OOOO      OOOO        TTTT          AA    AAAA      CCCC            OOOO      OOOO    NN    NNNN  NN  
  324.   BBBB    BBBB  yyyyyyyy          OOOO      OOOO        TTTT        AAAAAAAAAAAAAA    CCCC            OOOO      OOOO    NN    NNNNNNNN  
  325.   BBBB    BBBB    yyyy              OOOO  OOOO          TTTT        AA        AAAA      CCCC    CC      OOOO  OOOO      NN      NNNNNN  
  326. BBBBBBBBBBBB      yyyy                OOOOOO          TTTTTTTT    AAAAAA    AAAAAAAA      CCCCCC          OOOOOO      NNNNNN      NNNN  
  327.                     yy                                                                                                                  
  328.                   yy                                                                                                                    
  329.                 yyyy                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                          
  330. */
  331. /*
  332.     ..:::: CREADO POR OTACON ::::..
  333.                   - 2013 -
  334.     - Simple Sistema de Pizarras -
  335.              Version: 0.1 Beta
  336. */
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!