Jump to content

kmrh

Members
  • Posts

    1
  • Joined

  • Last visited

Profile Information

  • Gender
    Female
  • Location
    philippines
  • Github: Kmrh

Recent Profile Visitors

833 profile views

kmrh's Achievements

Poring

Poring (1/15)

0

Reputation

  1. 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
×
×
  • Create New...