Jump to content
  • 0
Sign in to follow this  
tomyverceti

[Solved]Script de salvar build

Question

Ola alguém sabe o do por que esse npc não esta funcionando ?

 


 
//===== rAthena Script =======================================
//= Build Manager +
//===== By: ==================================================
//= Euphy
//===== Current Version: =====================================
//= 1.8
//===== Description: =========================================
//= Stores stat builds into a single character variable.
//============================================================
 
prontera,167,198,6 script Build Manager 930,{
function Get_Menu; function Save_Build; function Load_Build;
 
set .@BuildCount,3; // Number of builds to use
set .@Save,5000; // Zeny required to save a build
set .@Load,10000; // Zeny required to load a build
set .@Rename,1000; // Zeny required to rename a build
set .@MaxLevel,200; // Maximum base level (to prevent stat overflow)
 
if (BaseLevel < .@MaxLevel) { message strcharinfo(0),"Você precisa estar no level "+.@MaxLevel+" para usar este npc."; end; }
switch(select("Salvar Build...:Carregar Build...:Renomear Build...:Close")) {
case 1:
if (.@Save) message strcharinfo(0),"Ira custar "+.@Save+" Zeny para salvar sua build.";
set .@Build, Get_Menu(.@BuildCount);
if (Zeny<.@Save) { message strcharinfo(0),"Zeny insulficiente."; close; }
if (getd("Build_"+.@Build+"$")!="") {
message strcharinfo(0),"Overwrite previous build #"+.@Build+"?";
if(select("Save new build:Cancel")==2) close; }
Save_Build(.@Build);
message strcharinfo(0),"Digite um nome para sua build.";
input getd("Build_"+.@Build+"n$");
message strcharinfo(0),"Build #"+.@Build+" ("+getd("Build_"+.@Build+"n$")+") salva.";
set Zeny, Zeny-.@Save;
close;
case 2:
if (.@Load) message strcharinfo(0),"Ira custar "+.@Load+" Zeny para carregar sua build.";
set .@Build, Get_Menu(.@BuildCount);
if (getd("Build_"+.@Build+"$")=="") {
message strcharinfo(0),"No build info found."; close; }
if (Zeny<.@Load) { message strcharinfo(0),"Zeny insulficiente."; close; }
Load_Build(getd("Build_"+.@Build+"$"));
message strcharinfo(0),"Build #"+.@Build+" carregada.";
set Zeny, Zeny-.@Load;
close;
case 3:
if (.@Rename) message strcharinfo(0),"Ira custar "+.@Rename+" Zeny para renomear a build.";
set .@Build, Get_Menu(.@BuildCount);
if (getd("Build_"+.@Build+"$")=="") {
message strcharinfo(0),"No build info found."; close; }
if (Zeny<.@Rename) { message strcharinfo(0),"Zeny insulficiente."; close; }
message strcharinfo(0),"Escreva um novo nome para a Build #"+.@Build+" ("+getd("Build_"+.@Build+"n$")+").";
input getd("Build_"+.@Build+"n$");
message strcharinfo(0),"Build #"+.@Build+" renomeada.";
set Zeny, Zeny-.@Rename;
close;
case 4:
close; }
function Get_Menu {
set .@menu$,"";
for(set .@i,1; .@i<=getarg(0); set .@i,.@i+1)
set .@menu$, .@menu$+"Slot "+.@i+" ("+((getd("Build_"+.@i+"n$")=="")?"^777777empty":"^0055FF"+getd("Build_"+.@i+"n$"))+"^000000):";
return select(.@menu$); }
function Save_Build {
set .@s$,"";
for(set .@i,13; .@i<19; set .@i,.@i+1)
set .@s$,.@s$+readparam(.@i)+"|";
setd "Build_"+getarg(0)+"$", .@s$+StatusPoint;
return; }
function Load_Build {
ResetStatus;
explode(.@s$,getarg(0),"|");
for(set .@i,0; .@i<6; set .@i,.@i+1)
statusup2 (.@i+13), atoi(.@s$[.@i])-1;
set StatusPoint, atoi(.@s$[6]);
return; }
}
OBS:ele funciona no cronus
Edited by tomyverceti

Share this post


Link to post
Share on other sites

3 answers to this question

Recommended Posts

  • 0

Não há nada de errado. Só falta os tabs da linha 11 (prontera,167,198,6<tab>script<tab>Build Manager<tab>930,{) e mudar o ResetStatus (linha 70) para resetstatus (tudo minúsculo).

Share this post


Link to post
Share on other sites
  • 0

Não há nada de errado. Só falta os tabs da linha 11 (prontera,167,198,6<tab>script<tab>Build Manager<tab>930,{) e mudar o ResetStatus (linha 70) para resetstatus (tudo minúsculo).

Puts obrigado era so na linha 70 mesmo o problema

Share this post


Link to post
Share on other sites
  • 0

Na próxima, use sistemas online de PASTE para por os scripts, ou adicione ele no post entre as TAGs [COD] e

 

Share this post


Link to post
Share on other sites

Please sign in to comment

You will be able to leave a comment after signing in



Sign In Now
Sign in to follow this  

×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.