Prechádzať zdrojové kódy

First round of /npc/custom folder cleanups.
* Rewrote /npc/custom/banks/bank.txt to be a little more optimized.
* Added cost variables to /npc/custom/jobs/reset.txt
* Removed /npc/custom/devnpc.txt (perhaps we can rewrite another one for rA?)

git-svn-id: https://svn.code.sf.net/p/rathena/svn/trunk@15405 54d463be-8e91-2dee-dedb-b68131a5f0ec

jmanfffreak 13 rokov pred
rodič
commit
44a8a1a737
3 zmenil súbory, kde vykonal 105 pridanie a 617 odobranie
  1. 91 99
      npc/custom/banks/bank.txt
  2. 0 508
      npc/custom/devnpc.txt
  3. 14 10
      npc/custom/jobs/reset.txt

+ 91 - 99
npc/custom/banks/bank.txt

@@ -3,7 +3,7 @@
 //===== By: ================================================== 
 //= Syrus22 (1.0)
 //===== Current Version: ===================================== 
-//= 1.0
+//= 2.0
 //===== Compatible With: ===================================== 
 //= Any rAthena version with Account variables.
 //===== Description: ========================================= 
@@ -12,6 +12,7 @@
 //= Syrus22 - There's an optional transaction fee at the top of
 //= the script. To use it simply change the first set command
 //= to set the cost variable to whatever you want the fee to be.
+//= Version 2.0: Optimized and brought the script up to standard. [Jguy]
 //============================================================ 
 
 prontera,132,217,5	script	Banker	109,{
@@ -19,109 +20,100 @@ set @cost,500;
 mes "[Banker]";
 mes "Welcome to the First Bank of Prontera. How can I help you today?";
 next;
-menu "I'd like to make a deposit.",Ldeposit,"I'd like to make a withdrawl.",Lwithdrawl,"What's my current balance?",Lbalance,"Cancel",Lcancel;
-
-Ldeposit:
-	mes "[Banker]";
-	mes "Very well... How much would you like to deposit? The maximum you can deposit at once is 999,999 Zeny.";
-	next;
-	if (@cost > 0) goto Ldepocost;
-	goto Ldepocont;
-
-	Ldepocost:
+switch(select("I'd like to make a deposit.:I'd like to make a withdrawl.:What's my current balance?:Cancel")) {
+	case 1:
 		mes "[Banker]";
-		mes "Oh and don't forget there is a " + @cost + " Zeny charge on all transactions.";
+		mes "Very well... How much would you like to deposit? The maximum you can deposit at once is 999,999 Zeny.";
 		next;
-		goto Ldepocont;
-
-Ldepocont:
-	input @deposit;
-	if (@deposit < 1) goto Lrealamount;
-	if (@deposit > Zeny) goto Lneedzeny;
-	if (@deposit > (Zeny - @cost)) goto Lneedzeny2;
-	set Zeny,Zeny - @deposit;
-	set Zeny,Zeny - @cost;
-	set #bankstorage,#bankstorage + @deposit;
-	mes "[Banker]";
-	mes "Thank you very much... Your zeny is in good hands.";
-	close;
-
-Lwithdrawl:
-	mes "[Banker]";
-	mes "Very well... How much would you like to withdraw? The maximum you can withdraw at one time is 999,999 Zeny";
-	next;
-	if (@cost > 0) goto Lwithcost;
-	goto Lwithcont;
-
-	Lwithcost:
+		if (@cost > 0) {
+			mes "[Banker]";
+			mes "Oh, and do realize there is a " +@cost + " Zeny charge on all transactions!";
+			next;
+		}
+		input @deposit;
+		if (@deposit < 1) {
+			mes "Make sure you ask me to deposit a real amount.";
+			close;
+		}
+		else if (@deposit > Zeny) {
+			mes "It does not appear like you have the amount of zeny you're trying to deposit!";
+			close;
+		}
+		else if (@deposit > (Zeny - @cost)) {
+			mes "You need " + @cost + " Zeny to cover the transaction fee!";
+			close;
+		}
+		else {
+		set Zeny,Zeny - @deposit;
+		set Zeny,Zeny - @cost;
+		set #bankstorage,#bankstorage + @deposit;
 		mes "[Banker]";
-		mes "Oh and don't forget there is a " + @cost + " Zeny charge on all transactions.";
-		next;
-		goto Lwithcont;
-
-Lwithcont:
-	input @withdrawl;
-	if (@withdrawl < 1) goto Lrealamount;
-	if (@withdrawl > #bankstorage) goto Lneedzeny3;
-	if ((@cost > Zeny) && ((Zeny + @withdrawl) > @cost)) goto Lcostask; 
-	if (@cost > Zeny) goto Lneedzeny2;
-	goto Lwithcont2;
+		mes "Thank you very much... Your zeny is in good hands.";
+		close;
+		}
 
-	Lcostask:
+	case 2:
 		mes "[Banker]";
-		mes "You don't have the Zeny for the transaction fee right now. Would you like me to take the fee directly from your withdrawl?";
+		mes "Very well... How much would you like to withdraw? The maximum you can withdraw at one time is 999,999 Zeny";
 		next;
-		menu "Yes please.",Lwithtake,"No thank you.",Lcancel;
-
-	Lwithtake:
+		if (@cost > 0) {
+			mes "[Banker]";
+			mes "Oh, and do realize there is a " +@cost + " Zeny charge on all transactions!";
+			next;
+		}
+		input @withdrawl;
+		if (@withdrawl < 1) {
+			mes "Please don't play games. I need a real amount to withdraw.";
+			close;
+		}
+		else if (@withdrawl > #bankstorage) {
+			mes "I show you only have ^00FF00" + #bankstorage +"^000000 zeny in your account!";
+			close;
+		}	
+		else if ((@cost > Zeny) && ((Zeny + @withdrawl) > @cost)) {
+			mes "[Banker]";
+			mes "You don't have the Zeny for the transaction fee right now. Would you like me to take the fee directly from your withdrawl?";
+			next;
+			switch(select("Yes please.:No, Thanks")){
+			case 1:
+				mes "[Banker]";
+				mes "Removing " + @cost + " from your withdrawl to cover the deposit fee...";
+				set @withdrawl,@withdrawl - @cost;
+				set #bankstorage,#bankstorage - @cost;
+				set @cost,0;
+				next;
+				set Zeny,Zeny - @cost;
+				set Zeny,Zeny + @withdrawl;
+				set #bankstorage,#bankstorage - @withdrawl;
+				mes "[Banker]";
+				mes "There's your Zeny. Have a good day.";
+				close;
+			case 2:
+				mes "[Banker]";
+				mes "Very well... come again soon.";
+				close;
+			}
+		}
+		else {
+			set Zeny,Zeny - @cost;
+			set Zeny,Zeny + @withdrawl;
+			set #bankstorage,#bankstorage - @withdrawl;
+			mes "[Banker]";
+			mes "There's your Zeny. Have a good day.";
+			close;
+		}
+	case 3:
 		mes "[Banker]";
-		mes "Ok then.";
-		set @withdrawl,@withdrawl - @cost;
-		set #bankstorage,#bankstorage - @cost;
-		set @cost,0;
+		mes "Hmmmm let me check some paper work.";
 		next;
-		goto Lwithcont2;
-
-Lwithcont2:
-	set Zeny,Zeny - @cost;
-	set Zeny,Zeny + @withdrawl;
-	set #bankstorage,#bankstorage - @withdrawl;
-	mes "[Banker]";
-	mes "There's your Zeny. Have a good day.";
-	close;
-
-Lbalance:
-	mes "[Banker]";
-	mes "Hmmmm lemme check the paper work.";
-	next;
-	mes "*Rustle, Rustle*";
-	next;
-	mes "[Banker]";
-	mes "You currently have " + #bankstorage + " Zeny in your account.";
-	close;
-
-Lrealamount:
-	mes "[Banker]";
-	mes "Don't play jokes with me please. Next time ask for a real amount.";
-	close;
-
-Lneedzeny:
-	mes "[Banker]";
-	mes "You don't have enough Zeny to make that deposit.";
-	close;
-
-Lneedzeny2:
-	mes "[Banker]";
-	mes "You don't have enough Zeny to cover the transaction fee.";
-	close;
-
-Lneedzeny3:
-	mes "[Banker]";
-	mes "You don't have enough Zeny in your account.";
-	close;
-
-Lcancel:
-	mes "[Banker]";
-	mes "Very well... come again soon.";
-	close;
-}
+		mes "*Rustle, Rustle*";
+		next;
+		mes "[Banker]";
+		mes "You currently have " + #bankstorage + " Zeny in your account.";
+		close;
+	case 4:
+		mes "[Banker]";
+		mes "Very well... come again soon.";
+		close;
+	}
+} // EOF

+ 0 - 508
npc/custom/devnpc.txt

@@ -1,508 +0,0 @@
-//===== rAthena Script ======================================= 
-//= Dev edition NPCs!
-//===== By: ================================================== 
-//= Most NPCs by Aria
-//= MouseJstr NPC by MouseJstr
-//= Massdriller NPC by massdriller
-//= Evera NPC by Evera
-//= Kevin NPC by Kevin
-//===== Current Version: ===================================== 
-//= 0.5
-//===== Compatible With: ===================================== 
-//= rAthena 1.0 Final +
-//===== Description: ========================================= 
-//= NPCs of the devs!
-//===== Additional Comments: ================================= 
-//= Some devs don't have their quotes yet >_>
-//= currently we only have Aria, Mouse, and MC_Cameri done.
-//= David is there because he has coords, but he's incomplete;
-//= he has no biography
-//============================================================ 
-
-// MouseJstr =========================================================>\\
-ayothaya,76,145,5	script	MouseJstr	763,{
- 	npcspeed 50;
-	mes "[MouseJstr]";
-	mes "Yo homeslices..";
-	mes "I am MouseJstr on AIM and josh in real life..";
-	next;
-	mes "I enjoy maintaining a RO server because of the abuse I get";
-	close;
- OnTimer15000:
-	npcwalkto 70+rand(17),135+rand(16);
-	setnpctimer 0;
-
-doitagain:
-        set $foo,rand(5);
-	if($foo == 0) goto Lquote0;
-	if($foo == 1) goto Lquote1;
-	if($foo == 2) goto Lquote2;
-	if($foo == 3) goto Lquote3;
-	if($foo == 4) goto Lquote4;
-        goto doitagain;
-
-Lquote0:
-	npctalk "Brb.. my baby is throwing up on my leg.";
-	setnpctimer 0;
-	end;
-Lquote1:
-	npctalk "The only difference between a hurricane and skydiving is which direction the tree's come at you from..";
-	setnpctimer 0;
-	end;
-Lquote2:
-	npctalk "Wanna be a GM?  Write me a C routine that reverses a string in place..";
-	setnpctimer 0;
-	end;
-Lquote3:
-	npctalk "Wanna be a GM?  Write me a C routine that finds me the highest bit set in a network order 32 bit integer...";
-	setnpctimer 0;
-	end;
-Lquote4:
-	npctalk "I am the dark angel of rAthena.. withen weeks of my arrival, almost everybody was gone or dead..  fear me...";
-	setnpctimer 0;
-	end;
-OnInit:
- 	initnpctimer;
-        end;
-}
-
-// MC Cameri =========================================================>\\
-morocc,160,97,4	script	MC Cameri	706,{
- 	npcspeed 100;
-	mes "[MC Cameri]";
-	mes "I'm the @command guy from oA...";
-	mes "^FF8040Real Name^000000: Can't tell you my name";
-	mes "^FF8040Age^000000: 16 years";
-	mes "^FF8040Where I live^000000: Dominican Republic, in the caribbean";
-	next;
-	mes "[MC Cameri]";
-	mes "^FF8040What I Do^000000: mostly working on @commands for GMs...";
-	mes "^FF8040Why I'm here^000000: Because I like programming...";
-	next;
-	mes "[MC Cameri]";
-	mes "I'm a senior student, programmer, body builder(yes, I lift weights), etc.";
-	close;
- OnTimer15000:
-	npcwalkto 154+rand(17),87+rand(16);
-	setnpctimer 0;
-
-Lmctalk:
-	set $mctalk,rand(10);
-	if($mctalk == 0) goto Lquote0;
-	if($mctalk == 1) goto Lquote1;
-	if($mctalk == 2) goto Lquote2;
-	if($mctalk == 3) goto Lquote3;
-	if($mctalk == 4) goto Lquote4;
-	if($mctalk == 5) goto Lquote5;
-	if($mctalk == 6) goto Lquote6;
-	if($mctalk == 7) goto Lquote7;
-	if($mctalk == 8) goto Lquote8;
-	if($mctalk == 9) goto Lquote9;
-	if($mctalk == 10) goto Lquote10;
-	goto Lmctalk;
-Lquote0:
-	npctalk "OMGWTFBBQ";
-	setnpctimer 0;
-	end;
-Lquote1:
-	npctalk "I owns you all, under my commands. *lol*";
-	setnpctimer 0;
-	end;
-Lquote2:
-	npctalk "I forgot my script, what do I have to say again? *_*U";
-	setnpctimer 0;
-	end;
-Lquote3:
-	npctalk "�Donde estoy? *wonders* (<-- Means, where am I?)";
-	setnpctimer 0;
-	end;
-Lquote4:
-	npctalk "Are you guys my friends?";
-	setnpctimer 0;
-	end;
-Lquote5:
-	npctalk "My mom told me not to talk to strangers. *stares*";
-	setnpctimer 0;
-	end;
-Lquote6:
-	npctalk "How can you be SO ugly!?";
-	setnpctimer 0;
-	end;
-Lquote7:
-	npctalk "I need a friend to play with =(. *sobs*";
-	setnpctimer 0;
-	end;
-Lquote8:
-	npctalk "I've been kicking this rock for as long as I can remember.";
-	setnpctimer 0;
-	end;
-Lquote9:
-	npctalk "My computer just broke, and I don't know how to format. *sobs*";
-	setnpctimer 0;
-	end;
-Lquote10:
-	setnpctimer 0;
-	end;
-OnInit:
- 	initnpctimer;
-        end;
-}
-
-
-// Davidsiaw =========================================================>\\
-payon,182,104,4	script	Davidsiaw	1002,{
- 	npcspeed 150;
-	mes "[Davidsiaw]";
-	mes "omghi";
-	close;
-OnTimer15000:
-	npcwalkto 176+rand(17),94+rand(16);
-	setnpctimer 0;
-
-Ldavidtalk:
-	set $davidtalk,rand(10);
-	if($davidtalk == 0) goto Lquote0;
-	if($davidtalk == 1) goto Lquote1;
-	if($davidtalk == 2) goto Lquote2;
-	if($davidtalk == 3) goto Lquote3;
-	if($davidtalk == 4) goto Lquote4;
-	if($davidtalk == 5) goto Lquote5;
-	if($davidtalk == 6) goto Lquote6;
-	goto Ldavidtalk;
-Lquote0:
-	npctalk "OMGWTFBBQ";
-	setnpctimer 0;
-	end;
-Lquote1:
-	npctalk "Wud are you looking at?";
-	setnpctimer 0;
-	end;
-Lquote2:
-	npctalk "baka...";
-	setnpctimer 0;
-	end;
-Lquote3:
-	npctalk "�Donde estoy? *wonders* (<-- Means, where am I?)";
-	setnpctimer 0;
-	end;
-Lquote4:
-	npctalk "*drops 100 Mjolnirs on the floor*";
-	setnpctimer 0;
-	end;
-Lquote5:
-	npctalk "There ya go ;)";
-	setnpctimer 0;
-	end;
-Lquote6:
-	setnpctimer 0;
-	end;
-OnInit:
- 	initnpctimer;
-        end;
-}
-
-//Aria\\
-prontera,156,179,4	script	Aria	805,{
- 	npcspeed 150;
-	mes "[Aria]";
-	mes "Okay, I'm Evera's brother, Aria";
-	mes "^FF00FFAge^000000: 13 years";
-	mes "^FF00FFWhat I do^000000: Graphics and NPCs";
-	mes "^FF00FFWhy I'm here^000000: Cuz rAthena ROX";
-	close;
-OnTimer15000:
-	npcwalkto 150+rand(17),169+rand(16);
-	setnpctimer 0;
-
-Lariatalk:
-	set $ariatalk,rand(10);
-	if($ariatalk == 0) goto Lquote0;
-	if($ariatalk == 1) goto Lquote1;
-	if($ariatalk == 2) goto Lquote2;
-	if($ariatalk == 3) goto Lquote3;
-	if($ariatalk == 4) goto Lquote4;
-	if($ariatalk == 5) goto Lquote5;
-	if($ariatalk == 6) goto Lquote6;
-	if($ariatalk == 7) goto Lquote7;
-	if($ariatalk == 8) goto Lquote8;
-	if($ariatalk == 9) goto Lquote9;
-	if($ariatalk == 10) goto Lquote10;
-	goto Lariatalk;
-
-Lquote0:
-	npctalk "OMGWTFBBQ";
-	end;
-Lquote1:
-	npctalk "So its u -> 0";
-	npctalk "... That did not look right";
-	end;
-Lquote2:
-	npctalk "????";
-	end;
-
-Lquote3:
-	npctalk "OMGITSJEEBUS!#!@%!";
-	setnpctimer 0;
-	end;
-
-Lquote4:
-	npctalk "Evera died. I guess.";
-	setnpctimer 0;
-	end;
-
-Lquote5:
-	npctalk "I CLICK THE BUTTON AND THEY DON'T DIE!";
-	setnpctimer 0;
-	end;
-
-Lquote6:
-	npctalk "RO? wtf?";
-	npctalk "Oh yeah.";
-	setnpctimer 0;
-	end;
-
-Lquote7:
-	npctalk "omgnoob. DIE!";
-	setnpctimer 0;
-	end;
-
-Lquote8:
-	npctalk "WooT!";
-	setnpctimer 0;
-	end;
-
-Lquote9:
-	npctalk "is that why u bought windows";
-	npctalk "cuz bill has red hair";
-	setnpctimer 0;
-	end;
-
-Lquote10:
-	setnpctimer 0;
-	end;
-
-OnInit:
- 	initnpctimer;
-        end;
-}
-
-// Evera =========================================================>\\
-prontera,156,183,5	script	Evera	769,{
- 	npcspeed 50;
-	mes "[Evera]";
-	mes "Hi";
-	mes "I betcha you thoguht I was dead, right?";
-	next;
-	mes "Well, I'M (not really) BACK!";
-	mes "And I also enjoy long walks on the beach ^.^";
-	close;
- OnTimer15000:
-	npcwalkto 150+rand(17),173+rand(16);
-	setnpctimer 0;
-
-doitagain:
-        set $lol,rand(5);
-	if($lol == 0) goto Lquote0;
-	if($lol == 1) goto Lquote1;
-	if($lol == 2) goto Lquote2;
-	if($lol == 3) goto Lquote3;
-	if($lol == 4) goto Lquote4;
-	if($lol == 5) goto Lquote5;
-        goto doitagain;
-
-Lquote0:
-	npctalk "Does anyone actually remember who I am?";
-	setnpctimer 0;
-	end;
-Lquote1:
-	npctalk "O_o";
-	setnpctimer 0;
-	end;
-Lquote2:
-	npctalk "Bananaphone!";
-	setnpctimer 0;
-	end;
-Lquote3:
-	npctalk "Go away troll.";
-	setnpctimer 0;
-	end;
-Lquote4:
-	npctalk "Aria can go to hell.";
-	setnpctimer 0;
-	end;
-Lquote5:
-	npctalk "Sup, I'm back.";
-	setnpctimer 0;
-	end;
-Lquote6:
-	npctalk "WTFPWNED";
-	setnpctimer 0;
-	end;
-OnInit:
- 	initnpctimer;
-        end;
-}
-
-// Kevin =========================================================>\\
-prontera,178,204,5	script	Kevin	774,{
- 	npcspeed 50;
-	mes "[Kevin]";
-	mes "SUP?!?!?!?!";
-	mes "YOU JUST GOT PWNED!!!";
-	next;
-	mes "OUCH, ANOTHER PERSON PWNED BY KEVIN!";
-	close;
- OnTimer15000:
-	npcwalkto 170+rand(17),200+rand(16);
-	setnpctimer 0;
-
-doitagain:
-        set $lol,rand(9);
-	if($lol == 0) goto Lquote0;
-	if($lol == 1) goto Lquote1;
-	if($lol == 2) goto Lquote2;
-	if($lol == 3) goto Lquote3;
-	if($lol == 4) goto Lquote4;
-	if($lol == 5) goto Lquote1;
-	if($lol == 6) goto Lquote2;
-	if($lol == 7) goto Lquote3;
-	if($lol == 8) goto Lquote4;
-        goto doitagain;
-
-Lquote0:
-	npctalk "OMFGLMFAO I HAVE PWNED SO MANY PEOPLE!";
-	setnpctimer 0;
-	end;
-Lquote1:
-	npctalk "GO EA DEVS!";
-	setnpctimer 0;
-	end;
-Lquote2:
-	npctalk "WATCH OUT FOR ME ON THE IRC CHANNEL! HAHAHA!";
-	setnpctimer 0;
-	end;
-Lquote3:
-	npctalk "WANNA SEE MY NEW MIRC SCRIPT?!?";
-	setnpctimer 0;
-	end;
-Lquote4:
-	npctalk "w00t! YOU ARE SUCH A N00B YOU... N00B";
-	setnpctimer 0;
-	end;
-Lquote5:
-	npctalk "d00d! i r l337!";
-	setnpctimer 0;
-	end;
-Lquote6:
-	npctalk "pssst: what do you think of my evil plot to take over the da irc network?";
-	setnpctimer 0;
-	end;
-Lquote7:
-	npctalk "ORANGE COUNTY LIBERATION FRONT!";
-	setnpctimer 0;
-	end;
-Lquote8:
-	npctalk "OMFG YOU ARE SO UGLY!";
-	setnpctimer 0;
-	end;
-OnInit:
- 	initnpctimer;
-        end;
-}
-
-
-// massdriller =========================================================>\\
-geffen,122,63,5	script	massdriller	823,{
- 	npcspeed 50;
-	mes "[massdriller]";
-	mes "Who am i? I am A nobody!";
-	mes "I like pwning people!";
-	next;
-	mes "[massdriller]";
-	mes "Main goal in life is to annoy and pwn Kevin";
-	close;
- OnTimer15000:
-	npcwalkto 170+rand(17),200+rand(16);
-	setnpctimer 0;
-
-doitagain:
-        set $lol,rand(9);
-	if($lol == 0) goto Lquote0;
-	if($lol == 1) goto Lquote1;
-	if($lol == 2) goto Lquote2;
-	if($lol == 3) goto Lquote3;
-	if($lol == 4) goto Lquote4;
-	if($lol == 5) goto Lquote1;
-	if($lol == 6) goto Lquote2;
-	if($lol == 7) goto Lquote3;
-	if($lol == 8) goto Lquote4;
-        goto doitagain;
-
-Lquote0:
-	npctalk "Hmm....What script needs to be fixed...";
-	setnpctimer 0;
-	end;
-Lquote1:
-	npctalk "OMFG...you suck!";
-	setnpctimer 0;
-	end;
-Lquote2:
-	npctalk "The worst kind of noobs are the heal! zeny! items plz! type.";
-	setnpctimer 0;
-	end;
-Lquote3:
-	npctalk "What happens when you die of boredom?";
-	setnpctimer 0;
-	end;
-Lquote4:
-	npctalk "I'm such a kewl Person...";
-	setnpctimer 0;
-	end;
-Lquote5:
-	npctalk "OMFGWTFBBQ...I'm also known as MadDawg";
-	setnpctimer 0;
-	end;
-Lquote6:
-	npctalk "Gimme your items...I'll eat them and eat you...";
-	setnpctimer 0;
-	end;
-Lquote7:
-	npctalk "Aren't porings cute?";
-	setnpctimer 0;
-	end;
-Lquote8:
-	npctalk "Omfg..you are full of shit....";
-	setnpctimer 0;
-	end;
-OnInit:
- 	initnpctimer;
-        end;
-}
-aldebaran,137,118,5	script	Fredzilla	4020,0,0,{
- 	npcspeed 140;
-OnTouch:
-	mes "[Fredzilla]";
-	mes "I don't really know what I do";
-	mes "Well I have made some scripts, translated some scripts and corrected some scripts.";
-	next;
-	mes "[Fredzilla]";
-	mes "But other than that I do nothing.";
-	close;
-OnTimer25000:
-	npcwalkto 137+rand(5),118+rand(5);
-	setnpctimer 0;
-doitagain:
-        set $fred,rand(6);
-	if($fred == 0) npctalk "I have the most optimized Dev NPC";
-	if($fred == 1) npctalk "Yeah I am a Dev, what do you mean I'm just a member on the forum !!!";
-	if($fred == 2) npctalk "I probably the worst speller on the Dev team.";
-	if($fred == 3) npctalk "You didn't think I was a real player did you?!?";
-	if($fred == 4) npctalk "Golden, Ripe, Boneless Bananas, 39 Cents A Pound.";
-	if($fred == 5) npctalk "All those who believe in telekinesis, raise my hand.";
-	if($fred > 5 || $fred < 0) goto doitagain;
-	setnpctimer 0;
-	end;
-OnInit:
- 	initnpctimer;
-        end;
-}

+ 14 - 10
npc/custom/jobs/reset.txt

@@ -14,46 +14,50 @@
 //============================================================
 
 prontera,150,193,4	script	Reset Girl	124,{
+	set @rskill,5000; // Set value in zeny for skill reset here
+	set @rstat,5000; // Set value in zeny for stat reset here
+	set @rboth,9000; // Set value for "package deal" (i.e.: reseting both) here.
 	mes "[Reset Girl]";
 	mes "I am a Reset Girl.";
-	mes "Reset Stats: 5,000z";
-	mes "Reset Skills: 5,000z";
-	mes "Reset Both: 9,000z";
+	mes "Reset Stats: "+ @rstat +"z";
+	mes "Reset Skills: "+ @rskill +"z";
+	mes "Reset Both: "+ @rboth +"z";
 	mes "Please select the service you want:";
 	next;
 	switch(select("^FF3355Reset Skills:Reset Stats:Reset Both^000000:Quit")) {
 	case 1:
 		mes "[Reset Girl]";
-		if (Zeny < 5000) {
+		if (Zeny < @rskill) {
 			mes "Sorry, you don't have enough Zeny.";
 			close;
 		}
 		mes "Alright, here we go now.. Remember, changes won't take effect until you log back on!";
-		set Zeny,zeny-5000;
+		set Zeny,Zeny-@rskill;
 		ResetSkill;
 		close;
 	case 2:
 		mes "[Reset Girl]";
-		if (Zeny < 5000) {
+		if (Zeny < @rstat) {
 			mes "Sorry, you don't have enough Zeny.";
 			close;
 		}
 		mes "Alright, here we go now.. Remember, changes won't take effect until you log back on!";
-		set Zeny,zeny-5000;
+		set Zeny,Zeny-@rstat;
 		ResetStatus;
 		close;
 	case 3:
 		mes "[Reset Girl]";
-		if (Zeny < 9000) {
+		if (Zeny < @rboth) {
 			mes "Sorry, you don't have enough Zeny.";
 			close;
 		}
 		mes "Alright, here we go now.. Remember, changes won't take effect until you log back on!";
-		set Zeny,zeny-9000;
+		set Zeny,Zeny-@rboth;
 		ResetSkill;
 		ResetStatus;
 		close;
 	case 4:
+		mes "Come again soon!";
 		close;
 	}
-}
+}