Jump to content

Stolao

Developer
  • Posts

    1443
  • Joined

  • Last visited

  • Days Won

    40

Everything posted by Stolao

  1. set should be setarray as Emistry mentioned
  2. //===== rAthena Script ======================================= //= Reset NPC //===== By: ================================================== //= rAthena Dev Team //===== Current Version: ===================================== //= 1.06 //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= Resets skills, stats, or both. //= https://rathena.org/board/topic/102190-stat-reset-with-dynamic-price/ //===== Additional Comments: ================================= //= 1.00 First Version //= 1.01 Optimized for the greater good. [Kisuka] //= 1.02 Cleaning [Euphy] //= 1.03 All statuses removed upon skill reset. [Euphy] //= 1.04 Compressed Script [Stolao] //= 1.05 Added limit use option [Stolao] //= 1.06 Added Dynamic Pricing For Bisuke on Rathena [Stolao] //============================================================ prontera,150,193,4 script Reset Girl 124,{ // Skills, Stats, Both, Limit if(BaseLevel > 85){ set .@Reset, 100000, 100000, 90000, 0; else if(BaseLevel > 75){ set .@Reset, 75000, 75000, 70000, 0; else if(BaseLevel > 45){ set .@Reset, 50000, 50000, 50000, 0; else { set .@Reset, 10000, 10000, 9000, 0; } mes "[Reset Girl]"; if(.@Reset[3] && reset_limit > .@Reset[3]) { mes "Sorry you can only reset "+.@Reset[3]+" time in your life."; close; } mes "I am the Reset Girl."; mes "Reset Stats: "+ callfunc("F_InsertComma",.@Reset[1]) +"z"; mes "Reset Skills: "+ callfunc("F_InsertComma",.@Reset[0]) +"z"; mes "Reset Both: "+ callfunc("F_InsertComma",.@Reset[2]) +"z"; mes "Please select the service you want:"; next; set .@i,(select("^FF3355Reset Skills:Reset Stats:Reset Both^000000:Cancel")); if(.@i > 3) close; mes "[Reset Girl]"; if (Zeny < .@Reset[.@i-1]) { mes "Sorry, you don't have enough Zeny."; close; } if(.@Reset[3]){ mes "You can only reset "+.@Reset[3]+" time in your life, are you sure?"; if(select("Let me think:Thats fine") == 1) close; } set Zeny, Zeny-.@Reset[.@i-1]; if(.@i&1){ sc_end SC_ALL; ResetSkill; } if(.@i&2) ResetStatus; mes "There you go!"; if(.@Reset[3]) set reset_limit,reset_limit + 1; close; } here you are although an easier option would be to make it x cost per leveleg: set .@Reset, BaseLevel * BaseLevel * 10, JobLevel * JobLevel * 15, BaseLevel * JobLevel * 9, 0; hmm? set ?? or setarray ?? >.> <.<
  3. //===== rAthena Script ======================================= //= Reset NPC //===== By: ================================================== //= rAthena Dev Team //===== Current Version: ===================================== //= 1.06 //===== Compatible With: ===================================== //= rAthena Project //===== Description: ========================================= //= Resets skills, stats, or both. //= https://rathena.org/board/topic/102190-stat-reset-with-dynamic-price/ //===== Additional Comments: ================================= //= 1.00 First Version //= 1.01 Optimized for the greater good. [Kisuka] //= 1.02 Cleaning [Euphy] //= 1.03 All statuses removed upon skill reset. [Euphy] //= 1.04 Compressed Script [Stolao] //= 1.05 Added limit use option [Stolao] //= 1.06 Added Dynamic Pricing For Bisuke on Rathena [Stolao] //============================================================ prontera,150,193,4 script Reset Girl 124,{ // Skills, Stats, Both, Limit if(BaseLevel > 85){ set .@Reset, 100000, 100000, 90000, 0; else if(BaseLevel > 75){ set .@Reset, 75000, 75000, 70000, 0; else if(BaseLevel > 45){ set .@Reset, 50000, 50000, 50000, 0; else { set .@Reset, 10000, 10000, 9000, 0; } mes "[Reset Girl]"; if(.@Reset[3] && reset_limit > .@Reset[3]) { mes "Sorry you can only reset "+.@Reset[3]+" time in your life."; close; } mes "I am the Reset Girl."; mes "Reset Stats: "+ callfunc("F_InsertComma",.@Reset[1]) +"z"; mes "Reset Skills: "+ callfunc("F_InsertComma",.@Reset[0]) +"z"; mes "Reset Both: "+ callfunc("F_InsertComma",.@Reset[2]) +"z"; mes "Please select the service you want:"; next; set .@i,(select("^FF3355Reset Skills:Reset Stats:Reset Both^000000:Cancel")); if(.@i > 3) close; mes "[Reset Girl]"; if (Zeny < .@Reset[.@i-1]) { mes "Sorry, you don't have enough Zeny."; close; } if(.@Reset[3]){ mes "You can only reset "+.@Reset[3]+" time in your life, are you sure?"; if(select("Let me think:Thats fine") == 1) close; } set Zeny, Zeny-.@Reset[.@i-1]; if(.@i&1){ sc_end SC_ALL; ResetSkill; } if(.@i&2) ResetStatus; mes "There you go!"; if(.@Reset[3]) set reset_limit,reset_limit + 1; close; } here you are although an easier option would be to make it x cost per level eg: set .@Reset, BaseLevel * BaseLevel * 10, JobLevel * JobLevel * 15, BaseLevel * JobLevel * 9, 0;
  4. that does seem kinda "noob" and unpolished, just l payed with on my test server and ya it doesn't make much sense to basically be forced to copy the array basically every time after its generated. shouldn't this be changed to something a little more convenient | logical
  5. i noticed a mistake in my fix should be change for (set .@i,3350; .@i<=3377; set .@i,.@i+1) if (countitem(.@i)>0) { sleep2 1000; goto Despecialize; } to for (set .@i,3350; .@i<=3377; set .@i,.@i+1) if (countitem(.@i)>0) { sleep2 1000; goto Despecialize; } for (set .@i,30782; .@i<=30783; set .@i,.@i+1) if (countitem(.@i)>0) { sleep2 1000; goto Despecialize; }
  6. for the class check change this (25 is ninjas job ID, find other classes in const.txt) if (Class != 23 && (Class < 4008 || Class > 4022)) { mes "This feature is not available for your class."; close; } to if (Class != 23 && Class != 25 && (Class < 4008 || Class > 4022)) { mes "This feature is not available for your class."; close; } and for the item check for despecialize change this ( set 1st .@i to your custom ring base ID and set the .@i<= to your highest ring ID ) for (set .@i,3350; .@i<=3377; set .@i,.@i+1) if (countitem(.@i)>0) { sleep2 1000; goto Despecialize; } to for (set .@i,30782; .@i<=30783; set .@i,.@i+1) if (countitem(.@i)>0) { sleep2 1000; goto Despecialize; } and of course the part you already did looks fine, just repeat the process for each class and item here you are
  7. just add timer in script Onclock or Onminute Sorry, i'm not good with script... How's that supposed to make it spawn in all maps loaded in the server? to do this i believe your going to have to add in every map in multiple arrays each array can support up to 128 vars and there are about 750 maps by default,
  8. a 5th card slot is impossible without some hard source and client edits
  9. i understood it fine try using this guild rather then rathenas the problem your seeing lies in the client side, use nemo to add into the client
  10. honestly i would love this to be added as well, tired of having to compress or use dynamic arrays
  11. data/luafiles514/lua files/datainfo/jobname.lub change [jobtbl.JT_WARPNPC] = "1_ETC_01", to [jobtbl.JT_WARPNPC] = "spritenameyouwant",
  12. change - script PCSTATCALC -1,{ to prontera,50,50,0 script PCSTATCALC -1,{ try this then prontera,50,50,0 script PCSTATCALC 111,{ end; the end right after so if a player should click on it wont activate anything, and change to view 111 which is invisible but clickable
  13. im trying to add these effects to my server, ill try some more and if i great it ill post how bonus2 bAddSc,SC,n; Adds a n/100% chance to cause SC on the target when attacking
  14. nope not just you
  15. if your posting in the request section i suggest you put in more details as for what you asked if(#questvar == .@var){ switch(select("50 Zeny:Red Potion")){ case 1: set Zeny,Zeny + 50; break; case 2: getitem,501,1; break; } set #questvar,#questvar + 1; }
  16. responded to this in my thread Edit: respoding here for future questions change - script PCSTATCALC -1,{ to prontera,3,3,3 script PCSTATCALC 111,{ end;
  17. change - script PCSTATCALC -1,{ to prontera,50,50,0 script PCSTATCALC -1,{
  18. aren't those just modified homunc, think its just a recolor and .act adjustment
  19. Ya leave it open but also post the source side work around I'd say.
  20. Stolao

    Damage Effect

    that seems like it could be useful
  21. im actually trying to figure this out myself as well, I have tried playing with the \luafiles514\lua files\skilleffectinfo folder, but to no avail Edit: i saw in a post (forget what post) something about clif-> SpecialEffect () but i havent given that a shot, id rather not have to source the skill effects if i can avoid it.
  22. in your jobname.lub [jobtbl.JT_WARPNPC] = "1_ETC_01", literately the 2nd line
  23. Thanks Neo, Coming from you is a great compliment Yes, its the opening of owari no seraph, I love this song. But the song is from the patch (login screen), I would not have wasted my time putting this background music xD About the UI, The only thing I'm not satisfied with is the progressbar , do not know where to place it or build one with its own design. I am pessimo in design. If you have some suggestion @topic Here I show the get mac address receive by the launcher https://vid.me/e/BmdQ @offtopic did you replace your warp portals with green arrows? Hahaha Yes and no, I don't like the warp portals so I made this npc sprite and the script is like this: prt_in,208,177,1 Script #Saída de Kados 53,1,1,{ unitwalk getcharid(3),208,177; end; OnTouch: warp "prontera",136,219; end; } Its nice cause this have the "same" effect of click in a warp (except the door icon :/) you could have just replaced the warp sprite with the green arrow client side, would have been easier (and the door icon would still be there) but ya i like the effect
×
×
  • Create New...