Jump to content

Recommended Posts

  • 1 month later...
Posted

try this 

       

 //===== 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.gat,163,188,4 script STP/SKP Seller 86,{
set @price, 1000;
mes "[STP/SKP Seller]";
mes "Hi, I'm the STP/SKP Seller";
mes "It cost 1,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;
}
this is not my work so please respect the owner

please use codebox next time thanks!

-- Radian

Join the conversation

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

Guest
Reply to this topic...

×   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.

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...