· 9 years ago · Jan 21, 2017, 05:24 AM
1/*
2 ___ ___ ___ ___ ___
3 /\ \ /\__\ /\ \ _____ /\__\ /\ \
4 _\:\ \ /:/ _/_ \:\ \ /::\ \ /:/ _/_ \:\ \
5 /\ \:\ \ /:/ /\__\ \:\ \ /:/\:\ \ /:/ /\__\ \:\ \
6 _\:\ \:\ \ /:/ /:/ _/_ _____\:\ \ /:/ \:\__\ /:/ /:/ _/_ _____\:\ \
7 /\ \:\ \:\__\ /:/_/:/ /\__\ /::::::::\__\ /:/__/ \:|__| /:/_/:/ /\__\ /::::::::\__\
8 \:\ \:\/:/ / \:\/:/ /:/ / \:\~~\~~\/__/ \:\ \ /:/ / \:\/:/ /:/ / \:\~~\~~\/__/
9 \:\ \::/ / \::/_/:/ / \:\ \ \:\ /:/ / \::/_/:/ / \:\ \
10 \:\/:/ / \:\/:/ / \:\ \ \:\/:/ / \:\/:/ / \:\ \
11 \::/ / \::/ / \:\__\ \::/ / \::/ / \:\__\
12 \/__/ \/__/ \/__/ \/__/ \/__/ \/__/
13
14*/
15/* Tabela SQL - Adicione em seu PhpmyAdmin
16
17CREATE TABLE IF NOT EXISTS `builds_xro` (
18 `id_usuario` int(11) NOT NULL,
19 `nome_build` varchar(255) NOT NULL,
20 `str` int(11) NOT NULL,
21 `agi` int(11) NOT NULL,
22 `vit` int(11) NOT NULL,
23 `int` int(11) NOT NULL,
24 `dex` int(11) NOT NULL,
25 `luk` int(11) NOT NULL,
26 PRIMARY KEY (`nome_build`)
27) ENGINE=MyISAM;
28
29*/
30
31prontera,149,192,5 script Salvador de Builds 540,{
32
33
34
35 set .b,15; // Máximo de builds que poderão ser salvadas por conta [Padrão: 15]
36 set .n$,"[^000800Salvador de Builds^000000]";
37
38 mes .n$;
39 mes "Olá ^FF0000"+strcharinfo(0)+"^000000, em que posso ajudar?";
40 next;
41 switch(select("Salvar Build Atual:Carregar Build:Apagar Build:No momento nada")){
42
43 case 4: close;
44 case 1:
45
46 Salvar:
47 query_sql "SELECT `nome_build` FROM `builds_xro` WHERE `id_usuario` = "+getcharid(3),.@build$;
48
49 mes .n$;
50 if(getarraysize(.@build$) >= .b){
51 mes "Você já atingiu o limite máximo de builds salvas, apague alguma para salvar uma nova.";
52 close;
53 }
54
55 mes "Digite um nome para sua build.";
56 mes " ";
57 mes "Máximo: ^FF0000"+.b+"^000000 Builds";
58 mes "- Digite ^FF0000Sair^000000 para cancelar.";
59 next;
60 input .@n$;
61 if(.@n$ == "Sair" || .@n$ == "sair" || .@n$ == "Cancelar" || .@n$ == "cancelar") close;
62
63 mes .n$;
64 query_sql "SELECT `nome_build` FROM `builds_xro` WHERE `nome_build` = '"+.@n$+"' AND `id_usuario` = "+getcharid(3),.@build$;
65 for(set .@i,0; .@i < getarraysize(.@build$); set .@i,.@i+1)
66 if(.@n$ == .@build$[.@i])
67 set .@temp$,""+.@build$[.@i]+"";
68 if(.@temp$ != "") {
69 mes "Já existe uma build com esse nome, por favor escolha outro.";
70 next;
71 callsub Salvar;
72 }
73
74 mes "A build ^FF0000"+.@n$+"^000000 foi salva com sucesso e já pode ser utilizada.";
75 close2;
76 query_sql "INSERT INTO `builds_xro` (`id_usuario`,`nome_build`,`str`,`agi`,`vit`,`int`,`dex`,`luk`) VALUES ("+getcharid(3)+", '"+.@n$+"', "+ReadParam(bStr)+", "+ReadParam(bAgi)+", "+ReadParam(bVit)+", "+ReadParam(bInt)+", "+ReadParam(bDex)+", "+ReadParam(bLuk)+")";
77 end;
78
79 case 2:
80 query_sql "SELECT `nome_build`,`str`,`agi`,`vit`,`int`,`dex`,`luk` FROM `builds_xro` WHERE `id_usuario` = "+getcharid(3),.@build$,.@str,.@agi,.@vit,.@int,.@dex,.@luk;
81
82 mes .n$;
83 if(.@build$ == ""){
84 mes "Você não tem nenhuma build salva no momento.";
85 mes "- "+.@build$;
86 close;
87 }
88 mes "Escolha uma build que deseja carregar.";
89 next;
90 for(set .@i,0; .@i < getarraysize(.@build$); set .@i,.@i+1)
91 set .@switch$, .@switch$+(.@i + 1)+"ª - "+.@build$[.@i]+":";
92 switch(select(.@switch$)) {
93 set @menu, @menu-1;
94 set .@select, @menu;
95
96 mes .n$;
97 mes "Nome da Build: ^0000FF"+.@build$[.@select]+"^000000";
98 mes "Força: ^0000FF"+.@str[.@select]+"^000000";
99 mes "Agilidade: ^0000FF"+.@agi[.@select]+"^000000";
100 mes "Vitalidade: ^0000FF"+.@vit[.@select]+"^000000";
101 mes "Inteligência: ^0000FF"+.@int[.@select]+"^000000";
102 mes "Destreza: ^0000FF"+.@dex[.@select]+"^000000";
103 mes "Sorte: ^0000FF"+.@luk[.@select]+"^000000";
104 next;
105 mes .n$;
106 mes "Deseja utilizar a build que você acabou de ver?";
107 next;
108 if(select("Sim:Não") == 2) close;
109
110 mes .n$;
111 mes "A build foi carregada com sucesso, confira seu Alt+Q.";
112 ResetStatus;
113 set StatusPoint,0;
114 statusup2 bStr,.@str[.@select]-1;
115 statusup2 bAgi,.@agi[.@select]-1;
116 statusup2 bVit,.@vit[.@select]-1;
117 statusup2 bInt,.@int[.@select]-1;
118 statusup2 bDex,.@dex[.@select]-1;
119 statusup2 bLuk,.@luk[.@select]-1;
120 close;
121 }
122
123 case 3:
124 query_sql "SELECT `nome_build`,`str`,`agi`,`vit`,`int`,`dex`,`luk` FROM `builds_xro` WHERE `id_usuario` = "+getcharid(3),.@build$,.@str,.@agi,.@vit,.@int,.@dex,.@luk;
125
126 mes .n$;
127 if(.@build$ == ""){
128 mes "Você não tem nenhuma build salva no momento.";
129 close;
130 }
131 mes "Escolha uma build que deseja apagar.";
132 next;
133 for(set .@i,0; .@i < getarraysize(.@build$); set .@i,.@i+1){
134 set .@switch$, .@switch$+(.@i + 1)+"ª - "+.@build$[.@i]+":";
135 setarray .@temp$[.@i],""+.@build$[.@i]+"";
136 }
137 switch(select(.@switch$)) {
138 set @menu, @menu-1;
139 set .@select, @menu;
140
141 mes .n$;
142 mes "Nome da Build: ^0000FF"+.@build$[.@select]+"^000000";
143 mes "Força: ^0000FF"+.@str[.@select]+"^000000";
144 mes "Agilidade: ^0000FF"+.@agi[.@select]+"^000000";
145 mes "Vitalidade: ^0000FF"+.@vit[.@select]+"^000000";
146 mes "Inteligência: ^0000FF"+.@int[.@select]+"^000000";
147 mes "Destreza: ^0000FF"+.@dex[.@select]+"^000000";
148 mes "Sorte: ^0000FF"+.@luk[.@select]+"^000000";
149 next;
150 mes .n$;
151 mes "Deseja realmente apagar a build que você acabou de ver?";
152 next;
153 if(select("Sim:Não") == 2) close;
154
155 mes .n$;
156 mes "Build apagada com sucesso, um espaço para uma nova build foi aberto.";
157 close2;
158 query_sql "DELETE FROM `builds_xro` WHERE `nome_build` = '"+.@temp$[.@select]+"' AND `id_usuario` = "+getcharid(3);
159 end;
160
161 }
162
163 }
164
165}