Jump to content
  • 0

Stat Seller


skymia

Question


  • Group:  Members
  • Topic Count:  62
  • Topics Per Day:  0.02
  • Content Count:  296
  • Reputation:   4
  • Joined:  02/19/17
  • Last Seen:  

how to fix this warnings?

//===== eAthena Script ======================================= 
//= Stats Seller
//===== By: ================================================== 
//= DeadChild
//===== Current Version: ===================================== 
//= 1.0
//===== Compatible With: ===================================== 
//= Any eAthena Version 
//===== Description: ========================================= 
//= Stats Seller
//===== Additional Comments: =================================
//= Have fun with it ^^
//============================================================
prontera,166,201,0	script	STP/SKP Seller	86,{
set @price, 476000;
mes "[STP/SKP Seller]";
mes "Hi, I'm the STP/SKP Seller";
mes "It cost 476,000z each point";
mes "which one you wanna buy?";
next;
menu "Status Point",ST,"Skill Point",SK,"No thanks I'm fine",EXIT;
ST:
mes "[STP/SKP Seller]";
mes "What do you want to buy?";
next;
menu "Str",STR,"Agi",AGI,"Vit",VIT,"Int",INT,"Dex",DEX,"Luk",LUK;
SK:
mes "[STP/SKP Seller]";
mes "So how many?";
input @quantity;
next;
if (@quantity == 0) goto WT;
if (zeny < (@quantity * @price)) goto NZ;
mes "[STP/SKP Seller]";
mes "Done";
set zeny, zeny - (@quantity * @price);
set SkillPoint, SkillPoint + @quantity;
close;
STR:
mes "[STP/SKP Seller]";
mes "Hold on...";
next;
mes "[STP/SKP Seller]";
mes "So how many?";
input @quantity;
next;
if (@quantity == 0) goto WT;
if (@quantity > 999) goto TM;
if (zeny < (@quantity * @price)) goto NZ;
set zeny, zeny - (@quantity * @price);
statusup2 bStr,@quantity;
getmapxy(@mapname$,@mapx,@mapy,0,""+strcharinfo(0)+"");
mes "[STP/SKP Seller]";
mes "Done";
next;
warp ""+@mapname$+"",""+@mapx+"",""+@mapy+"";
close;
AGI:
mes "[STP/SKP Seller]";
mes "Hold on...";
next;
mes "[STP/SKP Seller]";
mes "So how many?";
input @quantity;
next;
if (@quantity == 0) goto WT;
if (@quantity > 999) goto TM;
if (zeny < (@quantity * @price)) goto NZ;
set zeny, zeny - (@quantity * @price);
statusup2 bAgi,@quantity;
getmapxy(@mapname$,@mapx,@mapy,0,""+strcharinfo(0)+"");
mes "[STP/SKP Seller]";
mes "Done";
next;
warp ""+@mapname$+"",""+@mapx+"",""+@mapy+"";
close;
VIT:
mes "[STP/SKP Seller]";
mes "Hold on...";
next;
mes "[STP/SKP Seller]";
mes "So how many?";
input @quantity;
next;
if (@quantity == 0) goto WT;
if (@quantity > 999) goto TM;
if (zeny < (@quantity * @price)) goto NZ;
set zeny, zeny - (@quantity * @price);
statusup2 bVit,@quantity;
getmapxy(@mapname$,@mapx,@mapy,0,""+strcharinfo(0)+"");
mes "[STP/SKP Seller]";
mes "Done";
next;
warp ""+@mapname$+"",""+@mapx+"",""+@mapy+"";
close;
INT:
mes "[STP/SKP Seller]";
mes "Hold on...";
next;
mes "[STP/SKP Seller]";
mes "So how many?";
input @quantity;
next;
if (@quantity == 0) goto WT;
if (@quantity > 999) goto TM;
if (zeny < (@quantity * @price)) goto NZ;
set zeny, zeny - (@quantity * @price);
statusup2 bInt,@quantity;
getmapxy(@mapname$,@mapx,@mapy,0,""+strcharinfo(0)+"");
mes "[STP/SKP Seller]";
mes "Done";
next;
warp ""+@mapname$+"",""+@mapx+"",""+@mapy+"";
close;
DEX:
mes "[STP/SKP Seller]";
mes "Hold on...";
next;
mes "[STP/SKP Seller]";
mes "So how many?";
input @quantity;
next;
if (@quantity == 0) goto WT;
if (@quantity > 999) goto TM;
if (zeny < (@quantity * @price)) goto NZ;
set zeny, zeny - (@quantity * @price);
statusup2 bDex,@quantity;
getmapxy(@mapname$,@mapx,@mapy,0,""+strcharinfo(0)+"");
mes "[STP/SKP Seller]";
mes "Done";
next;
warp ""+@mapname$+"",""+@mapx+"",""+@mapy+"";
close;
LUK:
mes "[STP/SKP Seller]";
mes "Hold on...";
next;
mes "[STP/SKP Seller]";
mes "So how many?";
input @quantity;
next;
if (@quantity == 0) goto WT;
if (@quantity > 999) goto TM;
if (zeny < (@quantity * @price)) goto NZ;
set zeny, zeny - (@quantity * @price);
statusup2 bLuk,@quantity;
getmapxy(@mapname$,@mapx,@mapy,0,""+strcharinfo(0)+"");
mes "[STP/SKP Seller]";
mes "Done";
next;
warp ""+@mapname$+"",""+@mapx+"",""+@mapy+"";
close;
WT:
mes "[STP/SKP Seller]";
mes "Please don't waste my time";
close;
TM:
mes "[STP/SKP Seller]";
mes "Sorry but you can only get 999 Status Point";
close;
NZ:
mes "[STP/SKP Seller]";
mes "Sorry but you do not have enough zeny.";
close;
EXIT:
mes "[STP/SKP Seller]";
mes "Okay then...";
close;
}

 

Untitled.png

Link to comment
Share on other sites

2 answers to this question

Recommended Posts

  • 0

  • Group:  Members
  • Topic Count:  12
  • Topics Per Day:  0.00
  • Content Count:  625
  • Reputation:   188
  • Joined:  11/19/11
  • Last Seen:  

8 hours ago, skymia said:

""+@mapname$+"",""+@mapx+"",""+@mapy+""

Remove the ""+ and +"" in every line containing this part 

Edit: Well since I nearly got overhelm of the goto Labels, I optimized it a bit:
 

//===== eAthena Script ======================================= 
//= Stats Seller
//===== By: ================================================== 
//= DeadChild
//===== Current Version: ===================================== 
//= 1.0
//= 2.0 - Fixed an bug with warp and optimized it[llchrisll]
//===== Compatible With: ===================================== 
//= Any eAthena Version 
//===== Description: ========================================= 
//= Stats Seller
//===== Additional Comments: =================================
//= Have fun with it ^^
//============================================================
prontera,166,201,0	script	STP/SKP Seller	86,{

mes .n$;
mes "Hi, I'm the STP/SKP Seller";
mes "It cost "+.price+"z each point";
mes "which one you wanna buy?";
next;
switch(select("- Status Points:- Skill Point:- No thanks I'm fine")) {
	
	case 1:
	mes .n$;;
	mes "What do you want to buy?";
	next;
	set .@stat,select("Str:Agi:Vit:Int:Dex:Luk");
	mes .n$;
	mes "Hold on...";
	next;
	mes .n$;
	mes "So how many?";
	input .@quantity;
	next;
	mes .n$;
	if (.@quantity == 0) {
		mes "Please don't waste my time";
		close;
	}
	if (.@quantity > 999) {
		mes "Sorry but you can only get 999 Status Point";
		close;
	}
	if (zeny < (.@quantity*.price)) {
		mes "Sorry but you do not have enough zeny.";
		close;
	}
	set Zeny,Zeny - (.@quantity*.price);
	switch(.@stat) {
		case 1: statusup2 bStr,.@quantity; break;
		case 2: statusup2 bAgi,.@quantity; break;
		case 3: statusup2 bVit,.@quantity; break;
		case 4: statusup2 bInt,.@quantity; break;
		case 5: statusup2 bDex,.@quantity; break;
		case 6: statusup2 bLuk,.@quantity; break;
	}
	getmapxy(.@mapname$,.@mapx,.@mapy,0,strcharinfo(0));
	mes "Done";
	next;
	warp .@mapname$,.@mapx,.@mapy;
	close;
	
	case 2:
	mes .n$;
	mes "So how many?";
	input .@quantity;
	next;
	mes .n$;
	if (.@quantity == 0) {
		mes "Please don't waste my time";
		close;
	}
	if (zeny < (.@quantity*.price)) {
		mes "Sorry but you do not have enough zeny.";
		close;
	}
	mes "Done";
	set zeny, zeny - (.@quantity * .price);
	set SkillPoint,SkillPoint + .@quantity;
	break;
	
	case 3:
	mes .n$;
	mes "Okay then...";
	close;
}

OnInit:
set .n$,"["+strnpcinfo(0)+"]";
set .price,476000;
end;
}

 

Edited by llchrisll
Link to comment
Share on other sites

  • 0

  • Group:  Members
  • Topic Count:  62
  • Topics Per Day:  0.02
  • Content Count:  296
  • Reputation:   4
  • Joined:  02/19/17
  • Last Seen:  

1 hour ago, llchrisll said:

Remove the ""+ and +"" in every line containing this part 

thnks sir

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...