summaryrefslogtreecommitdiff
path: root/npc/other
diff options
context:
space:
mode:
Diffstat (limited to 'npc/other')
-rw-r--r--npc/other/Global_Functions.txt8
-rw-r--r--npc/other/bank.txt2
-rw-r--r--npc/other/devnpc.txt7
-rw-r--r--npc/other/eliza.txt702
-rw-r--r--npc/other/heal_payment.txt4
-rw-r--r--npc/other/kafra_bank.txt58
-rw-r--r--npc/other/mc_cameri/heal.txt30
-rw-r--r--npc/other/mc_cameri/jobchanger.txt18
-rw-r--r--npc/other/mc_cameri/warper.txt418
-rw-r--r--npc/other/msg_boards.txt45
-rw-r--r--npc/other/platinum_skills.txt26
-rw-r--r--npc/other/pvp.txt18
-rw-r--r--npc/other/wedding.txt58
13 files changed, 1287 insertions, 107 deletions
diff --git a/npc/other/Global_Functions.txt b/npc/other/Global_Functions.txt
index 332737c0c..1f9261dec 100644
--- a/npc/other/Global_Functions.txt
+++ b/npc/other/Global_Functions.txt
@@ -3,7 +3,7 @@
//===== By: ==================================================
//= Lupus, kobra_k88
//===== Current Version: =====================================
-//= 1.1
+//= 1.2
//===== Compatible With: =====================================
//= eAthena 1.0
//===== Description: =========================================
@@ -37,6 +37,7 @@ function script F_ClearJobVar {
// 2-2 Jobs ------------------------------
set ROGUE_Q,0; set ROGUE_Q2,0;
set ALCH_Q,0; set ALCH_Q2,0;
+ set MONK_Q,0;
return;
}
@@ -84,3 +85,8 @@ function script Is_Thief_Class {
function script Is_Sword_Class {
return ( Class==Job_Swordman || Class==Job_Knight || Class==Job_Knight2 || Class==Job_Crusader || Class==Job_Crusader2 || Class==4002 || Class==4008 || Class==4014 || Class==4015 || Class==4022 );
}
+//-----------------------------------------------------
+// returns 1 if the player is either Super Novice or Super Baby, 0 otherwise
+function script Is_Super_Class {
+ return ( Class==Job_Super_Baby || Class==Job_SuperNovice );
+} \ No newline at end of file
diff --git a/npc/other/bank.txt b/npc/other/bank.txt
index a02412e3c..379ddc735 100644
--- a/npc/other/bank.txt
+++ b/npc/other/bank.txt
@@ -14,7 +14,7 @@
//= to set the cost variable to whatever you want the fee to be.
//============================================================
prontera.gat,132,217,5 script Banker 109,{
-set @cost,0;
+set @cost,500;
mes "[Banker]";
mes "Welcome to the First Bank of Prontera. How can I help you today?";
next;
diff --git a/npc/other/devnpc.txt b/npc/other/devnpc.txt
index 33c67d03f..ec196fe6e 100644
--- a/npc/other/devnpc.txt
+++ b/npc/other/devnpc.txt
@@ -199,7 +199,6 @@ OnInit:
}
//Aria\\
-Aria
prontera.gat,156,179,4 script Aria 805,{
npcspeed 150;
mes "[Aria]";
@@ -229,10 +228,14 @@ Lariatalk:
Lquote0:
npctalk "OMGWTFBBQ";
-
+ break;
Lquote1:
npctalk "So its u -> 0";
npctalk "... That did not look right";
+ break;
+Lquote2:
+ npctalk "????";
+ break;
Lquote3:
npctalk "OMGITSJEEBUS!#!@%!";
diff --git a/npc/other/eliza.txt b/npc/other/eliza.txt
new file mode 100644
index 000000000..d5c3c0765
--- /dev/null
+++ b/npc/other/eliza.txt
@@ -0,0 +1,702 @@
+prontera.gat,152,181,5 script MouseJstr 763,{
+
+// hello
+Lquote0:
+ npctalk "How do you do. Please state your problem.";
+ break;
+// computer
+Lquote1:
+ set $foo,rand(4);
+ if($foo == 0) goto Lquote1a;
+ if($foo == 1) goto Lquote1b;
+ if($foo == 2) goto Lquote1c;
+ if($foo == 3) goto Lquote1d;
+Lquote1a:
+ npctalk "Do computers worry you?";
+ break;
+Lquote1b:
+ npctalk "What do you think about machines?";
+ break;
+Lquote1c:
+ npctalk "Why do you mention computers?";
+ break;
+Lquote1d:
+ npctalk "What do you think machines have to do with your problem?";
+ break;
+// name
+Lquote2:
+ npctalk "I am not interested in names";
+ break;
+// sorry
+Lquote3:
+ set $foo,rand(3);
+ if($foo == 0) goto Lquote3a;
+ if($foo == 1) goto Lquote3b;
+ if($foo == 2) goto Lquote3c;
+
+Lquote3a:
+ npctalk "Please don't apologize";
+ break;
+
+Lquote3b:
+ npctalk "Apologies are not necessary";
+ break;
+
+Lquote3c:
+ npctalk "What feelings do you have when you apologize";
+ break;
+
+// I remember $p2$
+Lquote4:
+ set $foo,rand(6);
+ if($foo == 0) goto Lquote4a;
+ if($foo == 1) goto Lquote4b;
+ if($foo == 2) goto Lquote4c;
+ if($foo == 3) goto Lquote4d;
+ if($foo == 4) goto Lquote4e;
+ if($foo == 5) goto Lquote4f;
+
+Lquote4a:
+ npctalk "Do you often think of "+$p2$+"?";
+ break;
+
+Lquote4b:
+ npctalk "Does thinking of "+$p2$+" bring anything else to mind?";
+ break;
+
+Lquote4c:
+ npctalk "What else do you remember?";
+ break;
+
+Lquote4d:
+ npctalk "Why do you recall "+$p2$+" right now?";
+ break;
+
+Lquote4e:
+ npctalk "What in the present situation reminds you of "+$p2$+"?";
+ break;
+
+Lquote4f:
+ npctalk "What is the connection between me and "+$p2$+"?";
+ break;
+
+// do you remember
+Lquote5:
+ set $foo,rand(4);
+ if($foo == 0) goto Lquote5a;
+ if($foo == 1) goto Lquote5b;
+ if($foo == 2) goto Lquote5c;
+ if($foo == 3) goto Lquote5d;
+Lquote5a:
+ npctalk "Did you think I would forget "+$p2$+" ?";
+ break;
+
+Lquote5b:
+ npctalk "Why do you think I should recall "+$p2$+" now";
+ break;
+
+Lquote5c:
+ npctalk "What about "+$p2$+"";
+ break;
+
+Lquote5d:
+ npctalk "You mentioned "+$p2$+"";
+ break;
+
+// if
+Lquote6:
+ set $foo,rand(4);
+ if($foo == 0) goto Lquote6a;
+ if($foo == 1) goto Lquote6b;
+ if($foo == 2) goto Lquote6c;
+ if($foo == 3) goto Lquote6d;
+Lquote6a:
+ npctalk "Do you really think its likely that "+$p2$+"";
+ break;
+
+Lquote6b:
+ npctalk "Do you wish that "+$p2$+"?";
+ break;
+
+Lquote6c:
+ npctalk "What do you think about "+$p2$+"?";
+ break;
+
+Lquote6d:
+ npctalk "Really-- if "+$p2$+"?";
+ break;
+
+// i dreamt
+Lquote7:
+ set $foo,rand(3);
+ if($foo == 0) goto Lquote7a;
+ if($foo == 1) goto Lquote7b;
+ if($foo == 2) goto Lquote7c;
+Lquote7a:
+ npctalk "Really-- "+$p2$+"";
+ break;
+
+Lquote7b:
+ npctalk "Have you ever fantasized "+$p2$+" while you were awake?";
+ break;
+
+Lquote7c:
+ npctalk "Have you dreamt "+$p2$+" before?";
+ break;
+
+// dream about
+
+Lquote8:
+ npctalk "How do you feel about "+$p2$+" in reality?";
+ break;
+
+// dream
+Lquote9:
+ set $foo,rand(4);
+ if($foo == 0) goto Lquote9a;
+ if($foo == 1) goto Lquote9b;
+ if($foo == 2) goto Lquote9c;
+ if($foo == 3) goto Lquote9d;
+Lquote9a:
+ npctalk "What does this dream suggest to you?";
+ break;
+
+Lquote9b:
+ npctalk "Do you dream often?";
+ break;
+
+Lquote9c:
+ npctalk "What persons appear in your dreams?";
+ break;
+
+Lquote9d:
+ npctalk "Don't you believe that dream has to do with your problem?";
+ break;
+
+// my mother
+Lquote10:
+ set $foo,rand(2);
+ if($foo == 0) goto Lquote10a;
+ if($foo == 1) goto Lquote10b;
+Lquote10a:
+ npctalk "Who else in your family "+$p2$+"";
+ break;
+
+Lquote10b:
+ npctalk "Tell me more about your family";
+ break;
+
+// my father
+Lquote11:
+ set $foo,rand(3);
+ if($foo == 0) goto Lquote11a;
+ if($foo == 1) goto Lquote11b;
+ if($foo == 2) goto Lquote11c;
+Lquote11a:
+ npctalk "Your father";
+ break;
+
+Lquote11b:
+ npctalk "Does he influence you strongly?";
+ break;
+
+Lquote11c:
+ npctalk "What else comes to mind when you think of your father?";
+ break;
+
+// I want
+Lquote12:
+ set $foo,rand(3);
+ if($foo == 0) goto Lquote12a;
+ if($foo == 1) goto Lquote12b;
+ if($foo == 2) goto Lquote12c;
+Lquote12a:
+ npctalk "What would it mean if you got "+$p2$+"";
+ break;
+
+Lquote12b:
+ npctalk "Why do you want "+$p2$+"";
+ break;
+
+Lquote12c:
+ npctalk "Suppose you got "+$p2$+" soon";
+ break;
+
+// I am glad
+Lquote13:
+ set $foo,rand(3);
+ if($foo == 0) goto Lquote13a;
+ if($foo == 1) goto Lquote13b;
+ if($foo == 2) goto Lquote13c;
+Lquote13a:
+ npctalk "How have I helped you to be "+$p2$+"";
+ break;
+
+Lquote13b:
+ npctalk "What makes you happy just now";
+ break;
+
+Lquote13c:
+ npctalk "Can you explain why you are suddenly "+$p2$+"";
+ break;
+
+// I am sad
+Lquote14:
+ set $foo,rand(2);
+ if($foo == 0) goto Lquote14a;
+ if($foo == 1) goto Lquote14b;
+Lquote14a:
+ npctalk "I am sorry to hear you are depressed";
+ break;
+
+Lquote14b:
+ npctalk "I'm sure its not pleasant to be sad";
+ break;
+
+// $p2 are like "+$p3$+"
+Lquote15:
+ npctalk "What resemblance do you see between "+$p2$+" and "+$p3$+"";
+ break;
+
+// "+$p2$+" is like "+$p3$+"
+Lquote16:
+ set $foo,rand(4);
+ if($foo == 0) goto Lquote16a;
+ if($foo == 1) goto Lquote16b;
+ if($foo == 2) goto Lquote16c;
+ if($foo == 3) goto Lquote16d;
+Lquote16a:
+ npctalk "In what way is it that "+$p2$+" is like "+$p3$+"";
+ break;
+
+Lquote16b:
+ npctalk "What resemblance do you see?";
+ break;
+
+Lquote16c:
+ npctalk "Could there really be some connection?";
+ break;
+
+Lquote16d:
+ npctalk "How?";
+ break;
+// alike
+Lquote17:
+ set $foo,rand(2);
+ if($foo == 0) goto Lquote17a;
+ if($foo == 1) goto Lquote17b;
+Lquote17a:
+ npctalk "In what way?";
+ break;
+
+Lquote17b:
+ npctalk "What similarities are there?";
+ break;
+// same
+Lquote18:
+ npctalk "What other connections do you see?";
+ break;
+
+// I was "+$p2$+"
+Lquote19:
+ set $foo,rand(3);
+ if($foo == 0) goto Lquote19a;
+ if($foo == 1) goto Lquote19b;
+ if($foo == 2) goto Lquote19c;
+Lquote19a:
+ npctalk "Were you really?";
+ break;
+
+Lquote19b:
+ npctalk "Perhaps I already knew you were "+$p2$+"";
+ break;
+
+Lquote19c:
+ npctalk "Why do you tell me you were "+$p2$+" now?";
+ break;
+
+// was I
+Lquote20:
+ set $foo,rand(3);
+ if($foo == 0) goto Lquote20a;
+ if($foo == 1) goto Lquote20b;
+ if($foo == 2) goto Lquote20c;
+Lquote20a:
+ npctalk "What if you were "+$p2$+" ?";
+ break;
+
+Lquote20b:
+ npctalk "Do you thin you were "+$p2$+"";
+ break;
+
+Lquote20c:
+ npctalk "What would it mean if you were "+$p2$+"";
+ break;
+
+// I am
+Lquote21:
+ set $foo,rand(2);
+ if($foo == 0) goto Lquote21a;
+ if($foo == 1) goto Lquote21b;
+Lquote21a:
+ npctalk "In what way are you "+$p2$+"";
+ break;
+
+Lquote21b:
+ npctalk "Do you want to be "+$p2$+" ?";
+ break;
+
+// am I
+Lquote22:
+ set $foo,rand(4);
+ if($foo == 0) goto Lquote22a;
+ if($foo == 1) goto Lquote22b;
+ if($foo == 2) goto Lquote22c;
+ if($foo == 3) goto Lquote22d;
+Lquote22a:
+ npctalk "Do you believe you are "+$p2$+"";
+ break;
+
+Lquote22b:
+ npctalk "Would you want to be "+$p2$+"";
+ break;
+
+Lquote22c:
+ npctalk "You wish I would tell you you are "+$p2$+"";
+ break;
+
+Lquote22d:
+ npctalk "What would it mean if you were "+$p2$+"";
+ break;
+
+// am
+Lquote23:
+ set $foo,rand(2);
+ if($foo == 0) goto Lquote23a;
+ if($foo == 1) goto Lquote23b;
+
+Lquote23a:
+ npctalk "Why do you say AM?";
+ break;
+
+Lquote23b:
+ npctalk "I don't understand that";
+ break;
+
+// are you
+Lquote24:
+ set $foo,rand(3);
+ if($foo == 0) goto Lquote24a;
+ if($foo == 1) goto Lquote24b;
+ if($foo == 2) goto Lquote24c;
+Lquote24a:
+ npctalk "Why are you interested in whether I am "+$p2$+" or not?";
+ break;
+
+Lquote24b:
+ npctalk "Would you prefer if I weren't "+$p2$+"";
+ break;
+
+Lquote24c:
+ npctalk "Perhaps I am "+$p2$+" in your fantasies";
+ break;
+
+// you are
+Lquote25:
+ npctalk "What makes you think I am "+$p2$+" ?";
+ break;
+
+// because
+Lquote26:
+ set $foo,rand(3);
+ if($foo == 0) goto Lquote26a;
+ if($foo == 1) goto Lquote26b;
+ if($foo == 2) goto Lquote26c;
+Lquote26a:
+ npctalk "Is that the real reason?";
+ break;
+
+Lquote26b:
+ npctalk "What other reasons might there be?";
+ break;
+
+Lquote26c:
+ npctalk "Does that reason seem to explain anything else?";
+ break;
+
+// were you
+Lquote27:
+ set $foo,rand(3);
+ if($foo == 0) goto Lquote27a;
+ if($foo == 1) goto Lquote27b;
+ if($foo == 2) goto Lquote27c;
+Lquote27a:
+ npctalk "Perhaps I was "+$p2$+"";
+ break;
+
+Lquote27b:
+ npctalk "What do you think?";
+ break;
+
+Lquote27c:
+ npctalk "What if I had been "+$p2$+"";
+ break;
+
+// I can't
+Lquote28:
+ set $foo,rand(2);
+ if($foo == 0) goto Lquote28a;
+ if($foo == 1) goto Lquote28b;
+Lquote28a:
+ npctalk "Maybe you could "+$p2$+" now";
+ break;
+
+Lquote28b:
+ npctalk "What if you could "+$p2$+" ?";
+ break;
+
+// I feel
+Lquote29:
+ npctalk "Do you often feel "+$p2$+" ?";
+ break;
+
+// I felt
+Lquote30:
+ npctalk "What other feelings do you have?";
+ break;
+
+// $p1$ I $p2$ you $p3$
+Lquote31:
+ npctalk "Perhaps in your fantasy we "+$p3$+" each other?";
+ break;
+
+// why don't you
+Lquote32:
+ set $foo,rand(3);
+ if($foo == 0) goto Lquote32a;
+ if($foo == 1) goto Lquote32b;
+ if($foo == 2) goto Lquote32c;
+Lquote32a:
+ npctalk "Should you "+$p2$+" yourself?";
+ break;
+
+Lquote32b:
+ npctalk "Do you believe I don't "+$p2$+"";
+ break;
+
+Lquote32c:
+ npctalk "Perhaps I will "+$p2$+" in good time";
+ break;
+
+// yes
+Lquote33:
+ set $foo,rand(3);
+ if($foo == 0) goto Lquote33a;
+ if($foo == 1) goto Lquote33b;
+ if($foo == 2) goto Lquote33c;
+Lquote33a:
+ npctalk "You seem quite positive";
+ break;
+
+Lquote33b:
+ npctalk "You are sure?";
+ break;
+
+Lquote33c:
+ npctalk "I understand";
+ break;
+
+// no
+Lquote34:
+ set $foo,rand(3);
+ if($foo == 0) goto Lquote34a;
+ if($foo == 1) goto Lquote34b;
+ if($foo == 2) goto Lquote34c;
+Lquote34a:
+ npctalk "Why not?";
+ break;
+
+Lquote34b:
+ npctalk "You are being a bit negative";
+ break;
+
+Lquote34c:
+ npctalk "Are you saying NO just to be negative?";
+ break;
+
+// someone
+Lquote35:
+ npctalk "Can you be more specific?";
+ break;
+
+// everyone
+Lquote36:
+ set $foo,rand(4);
+ if($foo == 0) goto Lquote36a;
+ if($foo == 1) goto Lquote36b;
+ if($foo == 2) goto Lquote36c;
+ if($foo == 3) goto Lquote36d;
+Lquote36a:
+ npctalk "surely not everyone";
+ break;
+
+Lquote36b:
+ npctalk "Can you think of anyone in particular?";
+ break;
+
+Lquote36c:
+ npctalk "Who for example?";
+ break;
+
+Lquote36d:
+ npctalk "You are thinking of a special person?";
+ break;
+
+// always
+Lquote37:
+ set $foo,rand(4);
+ if($foo == 0) goto Lquote37a;
+ if($foo == 1) goto Lquote37b;
+ if($foo == 2) goto Lquote37c;
+ if($foo == 3) goto Lquote37d;
+Lquote37a:
+ npctalk "Can you think of a specific example?";
+ break;
+
+Lquote37b:
+ npctalk "When?";
+ break;
+
+Lquote37c:
+ npctalk "What incident are you thinking of?";
+ break;
+
+Lquote37d:
+ npctalk "Really-- always?";
+ break;
+
+// what
+Lquote38:
+ set $foo,rand(5);
+ if($foo == 0) goto Lquote38a;
+ if($foo == 1) goto Lquote38b;
+ if($foo == 2) goto Lquote38c;
+ if($foo == 3) goto Lquote38d;
+ if($foo == 4) goto Lquote38e;
+Lquote38a:
+ npctalk "Why do you ask?";
+ break;
+
+Lquote38b:
+ npctalk "Does that question interest you?";
+ break;
+
+Lquote38c:
+ npctalk "What is it you really want to know?";
+ break;
+
+Lquote38d:
+ npctalk "What do you think?";
+ break;
+
+Lquote38e:
+ npctalk "What comes to your mind when you ask that?";
+ break;
+
+// perhaps
+Lquote39:
+ npctalk "You do not seem quite certain";
+ break;
+
+// are
+Lquote40:
+ set $foo,rand(2);
+ if($foo == 0) goto Lquote40a;
+ if($foo == 1) goto Lquote40b;
+Lquote40a:
+ npctalk "Did you think they might not be "+$p2$+"";
+ break;
+
+Lquote40b:
+ npctalk "Possibly they are "+$p2$;
+ break;
+
+// default
+Lquote41:
+ set $foo,rand(6);
+ if($foo == 0) goto Lquote41a;
+ if($foo == 1) goto Lquote41b;
+ if($foo == 2) goto Lquote41c;
+ if($foo == 3) goto Lquote41d;
+ if($foo == 4) goto Lquote41e;
+ if($foo == 5) goto Lquote41f;
+Lquote41a:
+ npctalk "Very interesting";
+ break;
+
+Lquote41b:
+ npctalk "I am not sure I understand you fully";
+ break;
+
+Lquote41c:
+ npctalk "What does that suggest to you?";
+ break;
+
+Lquote41d:
+ npctalk "Please continue";
+ break;
+
+Lquote41e:
+ npctalk "Go on";
+ break;
+
+Lquote41f:
+ npctalk "Do you feel strongly about discussing such things?";
+ break;
+OnInit:
+ defpattern 1, "([^:]+):.*\\shello.*", "Lquote0";
+ defpattern 1, "([^:]+):.*\\scomputer.*", "Lquote1";
+ defpattern 1, "([^:]+):.*\\sname.*", "Lquote2";
+ defpattern 1, "([^:]+):.*\\ssorry.*", "Lquote3";
+ defpattern 1, "([^:]+):.*\\si\\s+remember\\s+(.*)", "Lquote4";
+ defpattern 1, "([^:]+):.*\\sdo\\s+you\\s+remember\\s+(.*)", "Lquote5";
+ defpattern 1, "([^:]+):.*\\sif\\s+(.*)", "Lquote6";
+ defpattern 1, "([^:]+):.*\\si\\s+dreamt\\s+(.*)", "Lquote7";
+ defpattern 1, "([^:]+):.*\\sdream\\s+about\\s+(.*)", "Lquote8";
+ defpattern 1, "([^:]+):.*\\sdream\\s+(.*)", "Lquote9";
+ defpattern 1, "([^:]+):.*\\smy\\s+mother\\s+(.*)", "Lquote10";
+ defpattern 1, "([^:]+):.*\\smy\\s+father\\s+(.*)", "Lquote11";
+ defpattern 1, "([^:]+):.*\\si\\s+want\\s+(.*)", "Lquote12";
+ defpattern 1, "([^:]+):.*\\si\\s+am\\s+glad\\s+(.*)", "Lquote13";
+ defpattern 1, "([^:]+):\\s+(.*)\\s+i\\s+am\\s+sad\\s+(.*)", "Lquote14";
+ defpattern 1, "([^:]+):\\s+(.*)\\s+are\\s+like\\s+(.*)", "Lquote15";
+ defpattern 1, "([^:]+):\\s+(.*)\\s+is\\s+like\\s+(.*)", "Lquote16";
+ defpattern 1, "([^:]+):.*\\salike\\s+(.*)", "Lquote17";
+ defpattern 1, "([^:]+):.*\\ssame\\s+(.*)", "Lquote18";
+ defpattern 1, "([^:]+):.*\\si\\s+was\\s+(.*)", "Lquote19";
+ defpattern 1, "([^:]+):.*\\swas\\s+i\\s+(.*)", "Lquote20";
+ defpattern 1, "([^:]+):.*\\si\\s+am\\s+(.*)", "Lquote21";
+ defpattern 1, "([^:]+):.*\\sam\\s+i\\s+(.*)", "Lquote22";
+ defpattern 1, "([^:]+):.*\\sam\\s+(.*)", "Lquote23";
+ defpattern 1, "([^:]+):.*\\sare\\s+you\\s+(.*)", "Lquote24";
+ defpattern 1, "([^:]+):.*\\syou\\s+are\\s+(.*)", "Lquote25";
+ defpattern 1, "([^:]+):.*\\sbecause\\s+(.*)", "Lquote26";
+ defpattern 1, "([^:]+):.*\\swere\\s+you\\s+(.*)", "Lquote27";
+ defpattern 1, "([^:]+):.*\\si\\s+(cant|can't|cannot)\\s+(.*)", "Lquote28";
+ defpattern 1, "([^:]+):.*\\si\\s+feel\\s+(.*)", "Lquote29";
+ defpattern 1, "([^:]+):.*\\si\\s+felt\\s+(.*)", "Lquote30";
+ defpattern 1, "([^:]+):.*\\si\\s+(.*)\\s+you\\s+(.*)", "Lquote31";
+ defpattern 1, "([^:]+):.*\\swhy\\s+(don't|dont)\\s+you\\s+(.*)", "Lquote32";
+ defpattern 1, "([^:]+):.*\\syes\\s+(.*)", "Lquote33";
+ defpattern 1, "([^:]+):.*\\sno\\s+(.*)", "Lquote34";
+ defpattern 1, "([^:]+):.*\\ssomeone\\s+(.*)", "Lquote35";
+ defpattern 1, "([^:]+):.*\\severyone\\s+(.*)", "Lquote36";
+ defpattern 1, "([^:]+):.*\\salways\\s+(.*)", "Lquote37";
+ defpattern 1, "([^:]+):.*\\swhat\\s+(.*)", "Lquote38";
+ defpattern 1, "([^:]+):.*\\sperhaps\\s+(.*)", "Lquote39";
+ defpattern 1, "([^:]+):.*\\sare\\s+(.*)", "Lquote40";
+ defpattern 1, "([^:]+):(.*)", "Lquote41";
+
+ activatepset 1;
+ break;
+}
diff --git a/npc/other/heal_payment.txt b/npc/other/heal_payment.txt
index 39a832985..96713e46a 100644
--- a/npc/other/heal_payment.txt
+++ b/npc/other/heal_payment.txt
@@ -42,7 +42,7 @@ prontera.gat,150,184,5 script Healring#h2-1::Healring 1002,{
mes "Booiing Boooing: BoooiiinnnG (or healing and regeneration: "+(@tempHp+@tempSp)+" z)?";
mes "BOINNG: Booing (I use zenys for a good cause: my medicines and my Poring Food)!";
next;
- menu "Only healings ("+@tempHp+"z)",HEALINGS,"Only a regeneration ("+@tempSp+"z)",REGENERATION,"Healings with regeneration ("+(@tempHp+@tempSp)+"z)",HEALINGS_AND_REGENERATION,"Nothing, thanks",CANCEL;
+ menu "Only healings ("+@tempHp+"z)",HEALINGS,"Only a regeneration ("+@tempSp+"z)",REGENERATION,"Healings with regeneration ("+(@tempHp+@tempSp)+"z)",HEALINGS_AND_REGEN,"Nothing, thanks",CANCEL;
ONLY_REGENERATION:
mes "[Healring]";
@@ -63,7 +63,7 @@ prontera.gat,150,184,5 script Healring#h2-1::Healring 1002,{
heal 0,30000;
goto FIN;
- HEALINGS_AND_REGENERATION:
+ HEALINGS_AND_REGEN:
if (Zeny < (@tempHp+@tempSp)) goto NO_ZENYS;
set Zeny, Zeny-(@tempHp+@tempSp);
heal 30000,30000;
diff --git a/npc/other/kafra_bank.txt b/npc/other/kafra_bank.txt
index 8d8bf4fc9..970581ce7 100644
--- a/npc/other/kafra_bank.txt
+++ b/npc/other/kafra_bank.txt
@@ -1,9 +1,9 @@
//===== eAthena Script =======================================
-//= 2nd Bank of Prontera ( with daily 0.01% income! )
+//= The 2nd Bank of Prontera ( with daily 0.01% income! )
//===== By: ==================================================
//= Lupus (1.0)
//===== Current Version: =====================================
-//= 1.0
+//= 1.2
//===== Compatible With: =====================================
//= eAthena 1.x
//===== Description: =========================================
@@ -13,82 +13,90 @@
// #kafrabank/1000 = 0.1% of interest per day
// #kafrabank/100 = 1% of interest per day
// #kafrabank/10 = 10% of interest per day
+//
+// 1.1 Added log of bank operation -> logmes "some info";
+// 1.2 Set max income to 100,000z. It would help to avoid
+// zeny exploits when you change DATE at your server
//============================================================
-prontera.gat,131,190,1 script Bank Clerk 112,{
- cutin "kafra_06",2;
- mes"[Manya]";
+prontera.gat,131,190,1 script Bank Clerk::bankg 833,{
+ mes"[Maniss]";
mes strcharinfo(0)+", welcome to the 2nd Bank of Prontera!";
set @kb_int,(gettime(6)*31)+gettime(5); //today's number
set @income,0;
//calculate %
if (#kafrabank<=0 || #kb_int>=@kb_int) goto L_NoIncomeToday;
- set @income,(#kafrabank/1000)*(@kb_int-#kb_int); //@income == % of the summ
+ set @income,(#kafrabank/1000)*(@kb_int-#kb_int); //@income == % of the sum
+//max income constant:
+ if (@income>100000) set @income,100000;
L_NoIncomeToday:
set #kb_int,@kb_int; //reset days timer
if(#kafrabank==0) mes "We could open you an account.";
- if(@income>0) mes "Today's income ^135445" + @income + "^000000 zeny.";
+ if(@income>0) mes "Today's income: ^135445" + @income + "^000000 zeny.";
set #kafrabank,#kafrabank+@income;
if(#kafrabank>0) mes "Your account: ^135445" + #kafrabank + "^000000 zeny.";
mes "What would you like?";
next;
- if(#kafrabank==0) menu "-Open a bank account",-,"-Quit",B_EXIT2;
+ if(#kafrabank==0) menu "-Open an account",-,"-Quit",B_EXIT2;
if(#kafrabank>0) menu "-Deposit money",-,"-Withdraw money",M_WITHDRAW,"-Quit",B_EXIT2;
- mes"[Manya]";
+ mes"[Maniss]";
mes "Please, tell me how much zeny you would like to deposit.";
next;
input @kafrabank;
if(@kafrabank<1000) goto L_LESS_1000;
- if(@kafrabank>1000000) goto L_TOO_BIG_AMOUNT;
+ if(@kafrabank>10000000) goto L_TOO_BIG_AMOUNT;
if(@kafrabank>zeny) goto L_NOT_ENOUGH;
set zeny,zeny-@kafrabank;
set #kafrabank,#kafrabank+@kafrabank;
- mes"[Manya]";
+ mes"[Maniss]";
mes "You've made a deposit of ^135445" + @kafrabank + "z^000000.";
-
+//we log these zeny operations into the log db
+ logmes "Bank %: " + @income +"z, Deposit: "+ @kafrabank +"z, Final: "+ #kafrabank +"z";
goto B_EXIT;
M_WITHDRAW:
if(#kafrabank==0) goto L_ZERO_ACCOUNT;
- mes"[Manya]";
+ mes"[Maniss]";
mes "Your account: ^135445" + #kafrabank + "^000000 zeny.";
mes "How much zeny would you like to withdraw?";
next;
input @kafrabank;
if(@kafrabank<1) goto B_EXIT2;
- if(@kafrabank>1000000) goto L_TOO_BIG_AMOUNT;
+ if(@kafrabank>10000000) goto L_TOO_BIG_AMOUNT;
if(@kafrabank>#kafrabank) goto L_NOT_ENOUGH;
set #kafrabank,#kafrabank-@kafrabank;
set zeny,zeny+@kafrabank;
- mes"[Manya]";
+ mes"[Maniss]";
mes "Here is your ^135445" + @kafrabank + "z^000000, put your sign here...";
+//we log these zeny operations into the log db
+ logmes "Bank %: " + @income +"z, Withdraw: "+ @kafrabank +"z, Final: "+ #kafrabank +"z";
goto B_EXIT;
L_NOT_ENOUGH:
- mes"[Manya]";
+ mes"[Maniss]";
mes "You don't have enough zeny for this operation.";
next;
goto B_EXIT2;
L_ZERO_ACCOUNT:
- mes"[Manya]";
+ mes"[Maniss]";
mes "You don't have any zeny on your account!";
next;
goto B_EXIT2;
L_TOO_BIG_AMOUNT:
- mes"[Manya]";
- mes "Sorry. The maximum deposit you can make on a time is 1,000,000 zeny.";
+ mes"[Maniss]";
+ mes "Sorry. The maximum deposit you can make on a time is 10,000,000 zeny.";
next;
goto B_EXIT2;
L_LESS_1000:
- mes"[Manya]";
+ mes"[Maniss]";
mes "We're sorry, the minimum amount of zeny you can deposit is 1,000 zeny.";
next;
goto B_EXIT2;
@@ -98,9 +106,11 @@ B_EXIT:
next;
B_EXIT2:
- mes"[Manya]";
+ mes"[Maniss]";
mes "Thank you for using our Bank Service. We hope to see you again soon.";
- cutin "kafra_06",255;
close;
-
-} \ No newline at end of file
+}
+
+geffen.gat,125,73,3 duplicate(bankg) Bank Clerk#2 833
+izlude.gat,145,107,1 duplicate(bankg) Bank Clerk#3 833
+morocc.gat,147,84,7 duplicate(bankg) Bank Clerk#4 833
diff --git a/npc/other/mc_cameri/heal.txt b/npc/other/mc_cameri/heal.txt
new file mode 100644
index 000000000..a3135f855
--- /dev/null
+++ b/npc/other/mc_cameri/heal.txt
@@ -0,0 +1,30 @@
+//===== eAthena Script =======================================
+//= Heal Npc
+//===== By: ==================================================
+//= MC Cameri
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= eAthena 0.1+;
+//===== Description: =========================================
+//= Poring Which Heals For Free
+//===== Additional Comments: =================================
+//= You can use this one if you want simple one-click healing
+//============================================================
+
+prontera.gat,150,184,5 script Healring::Healring0 1002,{
+ npctalk "Booing!";
+ emotion 21;
+ percentheal 100,100;
+}
+
+morocc.gat,159,96,5 duplicate(Healring0) Healring 1002
+geffen.gat,121,61,5 duplicate(Healring0) Healring 1002
+payon.gat,180,105,5 duplicate(Healring0) Healring 1002
+alberta.gat,185,144,5 duplicate(Healring0) Healring 1002
+aldebaran.gat,134,123,5 duplicate(Healring0) Healring 1002
+izlude.gat,125,118,5 duplicate(Healring0) Healring 1002
+xmas.gat,149,136,5 duplicate(Healring0) Healring 1002
+comodo.gat,188,162,5 duplicate(Healring0) Healring 1002
+amatsu.gat,200,80,5 duplicate(Healring0) Healring 1002
+gonryun.gat,164,130,5 duplicate(Healring0) Healring 1002 \ No newline at end of file
diff --git a/npc/other/mc_cameri/jobchanger.txt b/npc/other/mc_cameri/jobchanger.txt
new file mode 100644
index 000000000..0436b0a4f
--- /dev/null
+++ b/npc/other/mc_cameri/jobchanger.txt
@@ -0,0 +1,18 @@
+//===== eAthena Script =======================================
+//= Job Changer NPC
+//===== By: ==================================================
+//= MC Cameri
+//===== Current Version: =====================================
+//= 1.0
+//===== Compatible With: =====================================
+//= eAthena 0.1+;
+//===== Description: =========================================
+//= Job Changer NPC
+//===== Additional Comments: =================================
+//= v1.0 -
+//============================================================
+
+prontera.gat,157,188,0 script Job Changer 730,{
+ mes "[Job Advisor]";
+ close;
+} \ No newline at end of file
diff --git a/npc/other/mc_cameri/warper.txt b/npc/other/mc_cameri/warper.txt
new file mode 100644
index 000000000..0d0a94cc0
--- /dev/null
+++ b/npc/other/mc_cameri/warper.txt
@@ -0,0 +1,418 @@
+//===== eAthena Script =======================================
+//= Warp NPC
+//===== By: ==================================================
+//= MC Cameri
+//===== Current Version: =====================================
+//= 2.0
+//===== Compatible With: =====================================
+//= Any eAthena Version with duplicate; RO Ep6+
+//===== Description: =========================================
+//= Warp NPC with warp to almost everywhere that show how
+//= many people are on each map
+//===== Additional Comments: =================================
+//= Most of the code here has been taken from warper2.txt in
+//= the folder /npc/other/.
+//= Credits given to Someone(that's his nickname).
+//= 2.0 Increased performance by removing variables.
+//= -Fixed the memory problem.
+//= 1.0 First Version, consumed a lot of memory, about 2MB.
+//============================================================
+
+- script Warp NPC::warpra 115,{
+// colors
+ set @red$,"^FF0000";
+ set @reset$,"^000000";
+
+// towns
+ set @towns, getmapusers("alberta.gat") + getmapusers("aldebaran.gat")
+ + getmapusers("amatsu.gat") + getmapusers("comodo.gat") + getmapusers("gonryun.gat")
+ + getmapusers("geffen.gat") + getmapusers("izlude.gat") + getmapusers("xmas.gat")
+ + getmapusers("morocc.gat") + getmapusers("niflheim.gat") + getmapusers("payon.gat")
+ + getmapusers("prontera.gat") + getmapusers("yuno.gat") + getmapusers("umbala.gat")
+ + getmapusers("valkyrie.gat") + getmapusers("louyang.gat");
+// town inns
+ set @towns, @towns + getmapusers("alberta_in.gat") + getmapusers("aldeba_in.gat")
+ + getmapusers("geffen_in.gat") + getmapusers("izlude_in.gat") + getmapusers("morocc_in.gat")
+ + getmapusers("prt_in.gat") + getmapusers("xmas_in.gat") + getmapusers("cmd_in01.gat")
+ + getmapusers("cmd_in02.gat") + getmapusers("yuno_in01.gat") + getmapusers("yuno_in02.gat")
+ + getmapusers("yuno_in03.gat") + getmapusers("yuno_in04.gat") + getmapusers("yuno_in05.gat")
+ + getmapusers("ama_in01.gat") + getmapusers("ama_in02.gat") + getmapusers("gon_in.gat")
+ + getmapusers("um_in.gat") + getmapusers("nif_in.gat") + getmapusers("lou_in01.gat")
+ + getmapusers("lou_in02.gat") + getmapusers("payon_in01.gat") + getmapusers("payon_in02.gat")
+ + getmapusers("payon_in03.gat");
+// dungeons
+ set @anthell, getmapusers("anthell01.gat") + getmapusers("anthell02.gat");
+ set @beach, getmapusers("beach_dun.gat") + getmapusers("beach_dun2.gat") + getmapusers("beach_dun3.gat");
+ set @byalan, getmapusers("iz_dun00.gat") + getmapusers("iz_dun01.gat") + getmapusers("iz_dun02.gat") + getmapusers("iz_dun03.gat") + getmapusers("iz_dun04.gat");
+ set @clock, getmapusers("alde_dun01.gat") + getmapusers("alde_dun02.gat") + getmapusers("alde_dun03.gat") + getmapusers("alde_dun04.gat") + getmapusers("c_tower1.gat") + getmapusers("c_tower2.gat") + getmapusers("c_tower3.gat") + getmapusers("c_tower4.gat");
+ set @coal, getmapusers("mjo_dun01.gat") + getmapusers("mjo_dun02.gat") + getmapusers("mjo_dun03.gat");
+ set @culvert, getmapusers("prt_sewb1.gat") + getmapusers("prt_sewb2.gat") + getmapusers("prt_sewb3.gat") + getmapusers("prt_sewb4.gat");
+ set @geffen, getmapusers("gef_dun00.gat") + getmapusers("gef_dun01.gat") + getmapusers("gef_dun02.gat") + getmapusers("gef_dun03.gat");
+ set @glast, getmapusers("glast_01.gat") + getmapusers("gl_cas01.gat") + getmapusers("gl_cas02.gat") + getmapusers("gl_knt01.gat") + getmapusers("gl_knt02.gat")
+ + getmapusers("gl_chyard.gat") + getmapusers("gl_sew01.gat") + getmapusers("gl_sew02.gat") + getmapusers("gl_sew03.gat") + getmapusers("gl_sew04.gat") + getmapusers("gl_church.gat")
+ + getmapusers("gl_step.gat") + getmapusers("gl_dun01.gat") + getmapusers("gl_dun02.gat") + getmapusers("gl_prison.gat") + getmapusers("gl_prison1.gat");
+ set @hidden, getmapusers("prt_maze01.gat") + getmapusers("prt_maze02.gat") + getmapusers("prt_maze03.gat");
+ set @magma, getmapusers("mag_dun01.gat") + getmapusers("mag_dun02.gat");
+ set @orc, getmapusers("orcsdun01.gat") + getmapusers("orcsdun02.gat");
+ set @payond, getmapusers("pay_dun00.gat") + getmapusers("pay_dun01.gat") + getmapusers("pay_dun02.gat") + getmapusers("pay_dun03.gat") + getmapusers("pay_dun04.gat");
+ set @pyramids, getmapusers("moc_pryd01.gat") + getmapusers("moc_pryd02.gat") + getmapusers("moc_pryd03.gat") + getmapusers("moc_pryd04.gat") + getmapusers("moc_pryd05.gat") + getmapusers("moc_pryd06.gat");
+ set @sphinx, getmapusers("in_sphinx1.gat") + getmapusers("in_sphinx2.gat") + getmapusers("in_sphinx3.gat") + getmapusers("in_sphinx4.gat") + getmapusers("in_sphinx5.gat");
+ set @sunken, getmapusers("treasure01.gat") + getmapusers("treasure02.gat");
+ set @toy, getmapusers("xmas_dun01.gat") + getmapusers("xmas_dun02.gat");
+ set @turtle, getmapusers("tur_dun01.gat") + getmapusers("tur_dun02.gat") + getmapusers("tur_dun03.gat") + getmapusers("tur_dun04.gat");
+ set @ama, getmapusers("ama_dun01.gat") + getmapusers("ama_dun02.gat") + getmapusers("ama_dun02.gat");
+ set @gon, getmapusers("gon_dun01.gat") + getmapusers("gon_dun02.gat") + getmapusers("gon_dun03.gat");
+ set @gefenia, getmapusers("gefenia01.gat") + getmapusers("gefenia02.gat") + getmapusers("gefenia03.gat") + getmapusers("gefenia04.gat");
+ set @dungeons, @anthell + @beach + @dbyalan + @clock + @coal + @culvert + @geffen + @glast + @hidden
+ + @magma + @orc + @payond + @pyramids + @sphinx + @sunken + @toy + @turtle + @ama + @gon + @gefenia;
+
+ mes "[Warp NPC]";
+ mes "Hello, I can warp you to any Town and Dungeon! Were do you want to go?";
+ next;
+ menu "Towns [" + @red$ + @towns + @reset$ + "]",town,"Dungeons [" + @red$ + @dungeons + @reset$ +"]",dungeon;
+town:
+// + getmapusers("prt_in.gat") + getmapusers("xmas_in.gat") + getmapusers("cmd_in01.gat")
+// + getmapusers("cmd_in02.gat") + getmapusers("yuno_in01.gat") + getmapusers("yuno_in02.gat")
+// + getmapusers("yuno_in03.gat") + getmapusers("yuno_in04.gat") + getmapusers("yuno_in05.gat")
+// + getmapusers("ama_in01.gat") + getmapusers("ama_in02.gat") + getmapusers("gon_in.gat")
+// + getmapusers("um_in.gat") + getmapusers("nif_in.gat") + getmapusers("lou_in01.gat")
+// + getmapusers("lou_in02.gat");
+ menu "Alberta [" + @red$ + (getmapusers("alberta.gat")+getmapusers("alberta_in.gat")) + @reset$ + "]",walberta,
+ "Aldebaran [" + @red$ + (getmapusers("aldebaran.gat")+ getmapusers("aldeba_in.gat")) + @reset$ + "]",waldebaran,
+ "Amatsu [" + @red$ + (getmapusers("amatsu.gat")+getmapusers("ama_in02.gat")) + @reset$ + "]",wamatsu,
+ "Comodo [" + @red$ + (getmapusers("comodo.gat")+getmapusers("cmd_in01.gat")+getmapusers("cmd_in02.gat")) + @reset$ + "]",wcomodo,
+ "Gonryun [" + @red$ + (getmapusers("gonryun.gat")+getmapusers("gon_in.gat")) + @reset$ + "]",wgonryun,
+ "Geffen [" + @red$ + (getmapusers("geffen.gat")+getmapusers("geffen_in.gat")) + @reset$ + "]",wgeffen,
+ "Izlude [" + @red$ + (getmapusers("izlude.gat")+getmapusers("izlude_in.gat")) + @reset$ + "]",wizlude,
+ "Lutie [" + @red$ + (getmapusers("xmas.gat")+getmapusers("xmas_in.gat")) + @reset$ + "]",wxmas,
+ "Morroc [" + @red$ + (getmapusers("morocc.gat")+getmapusers("morocc_in.gat")) + @reset$ + "]",wmorroc,
+ "Niflheim [" + @red$ + (getmapusers("niflheim.gat")+getmapusers("nif_in.gat")) + @reset$ + "]",wniflheim,
+ "Payon [" + @red$ + (getmapusers("payon.gat")+getmapusers("payon_in01.gat")+getmapusers("payon_in02.gat")+getmapusers("payon_in03.gat")) + @reset$ + "]",wpayon,
+ "Prontera [" + @red$ + (getmapusers("prontera.gat")+getmapusers("prt_in.gat")) + @reset$ + "]",wprontera,
+ "Yuno [" + @red$ + (getmapusers("yuno.gat")+getmapusers("yuno_in01.gat")+getmapusers("yuno_in02.gat")+getmapusers("yuno_in03.gat")+getmapusers("yuno_in04.gat")+getmapusers("yuno_in05.gat")) + @reset$ + "]",wyuno,
+ "Umbala [" + @red$ + (getmapusers("umbala.gat")+getmapusers("um_in.gat")) + @reset$ + "]",wumbala,
+ "Valkyrie [" + @red$ + getmapusers("valkyrie.gat") + @reset$ + "]",wvalk,
+ "Louyang [" + @red$ + (getmapusers("louyang.gat")+getmapusers("lou_in01.gat")+getmapusers("lou_in02.gat")) + @reset$ + "]",wlouyang;
+dungeon:
+ menu "Amatsu Dungeon [" + @red$ + @ama + @reset$ + "]",ama,
+ "Gonryun Dungeon [" + @red$ + @gon + @reset$ + "]",gon,
+ "Anthell [" + @red$ + @anthell + @reset$ + "]",ant,
+ "Beach Dungeon [" + @red$ + @beach + @reset$ + "]",beach,
+ "Byalan Dungeon [" + @red$ + @byalan + @reset$ + "]",byalan,
+ "Clock Tower [" + @red$ + @clock + @reset$ + "]",clock,
+ "Coal Mines [" + @red$ + @coal + @reset$ + "]",coal,
+ "Culvert [" + @red$ + @culvert + @reset$ + "]",culvert,
+ "Geffen Dungeon [" + @red$ + @geffen + @reset$ + "]",geffen,
+ "Glast Heim [" + @red$ + @glast + @reset$ + "]",glast,
+ "Hidden Dungeon [" + @red$ + @hidden + @reset$ + "]",hidden,
+ "Magma Dungeon [" + @red$ + @magma + @reset$ + "]",magma,
+ "Orc Dungeon [" + @red$ + @orc + @reset$ + "]",orc,
+ "Payon Dungeon [" + @red$ + @payond + @reset$ + "]",payon,
+ "Pyramids [" + @red$ + @pyramids + @reset$ + "]",pyramids,
+ "Sphinx [" + @red$ + @sphinx + @reset$ + "]",sphinx,
+ "Sunken Ship [" + @red$ + @sunken + @reset$ + "]",sunken,
+ "Toy Factory [" + @red$ + @toy + @reset$ + "]",toy,
+ "Turtle Dungeon [" + @red$ + @tutrle + @reset$ + "]",turtle,
+ "Gefenia [" + @red$ + @gefenia + @reset$ + "]",gefenia;
+ant:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("anthell01.gat")+ @reset$ + "]",danthell1,
+ "Level 2 [" + @red$ + getmapusers("anthell02.gat")+ @reset$ + "]",danthell2;
+beach:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("beach_dun.gat") + @reset$ + "]",dbeach1,
+ "Level 2 [" + @red$ + getmapusers("beach_dun2.gat") + @reset$ + "]",dbeach2,
+ "Level 3 [" + @red$ + getmapusers("beach_dun3.gat") + @reset$ + "]",dbeach3;
+byalan:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("iz_dun00.gat") + @reset$ + "]",dbyalan1,
+ "Level 2 [" + @red$ + getmapusers("iz_dun01.gat") + @reset$ + "]",dbyalan2,
+ "Level 3 [" + @red$ + getmapusers("iz_dun02.gat") + @reset$ + "]",dbyalan3,
+ "Level 4 [" + @red$ + getmapusers("iz_dun03.gat") + @reset$ + "]",dbyalan4,
+ "Level 5 [" + @red$ + getmapusers("iz_dun04.gat") + @reset$ + "]",dbyalan5;
+clock:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("c_tower1.gat") + @reset$ + "]",dclock1,
+ "Level 2 [" + @red$ + getmapusers("c_tower2.gat") + @reset$ + "]",dclock2,
+ "Level 3 [" + @red$ + getmapusers("c_tower3.gat") + @reset$ + "]",dclock3,
+ "Level 4 [" + @red$ + getmapusers("c_tower4.gat") + @reset$ + "]",dclock4,
+ "Basement 1 [" + @red$ + getmapusers("alde_dun01.gat") + @reset$ + "]",dalde1,
+ "Basement 2 [" + @red$ + getmapusers("alde_dun02.gat") + @reset$ + "]",dalde2,
+ "Basement 3 [" + @red$ + getmapusers("alde_dun03.gat") + @reset$ + "]",dalde3,
+ "Basement 4 [" + @red$ + getmapusers("alde_dun04.gat") + @reset$ + "]",dalde4;
+coal:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("mjo_dun01.gat") + @reset$ + "]",dcoal1,
+ "Level 2 [" + @red$ + getmapusers("mjo_dun02.gat") + @reset$ + "]",dcoal2,
+ "Level 3 [" + @red$ + getmapusers("mjo_dun03.gat") + @reset$ + "]",dcoal3;
+culvert:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("prt_sewb1.gat") + @reset$ + "]",dculvert1,
+ "Level 2 [" + @red$ + getmapusers("prt_sewb2.gat") + @reset$ + "]",dculvert2,
+ "Level 3 [" + @red$ + getmapusers("prt_sewb3.gat") + @reset$ + "]",dculvert3,
+ "Level 4 [" + @red$ + getmapusers("prt_sewb4.gat") + @reset$ + "]",dculvert4;
+geffen:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("gef_dun00.gat") + @reset$ + "]",dgeffen1,
+ "Level 2 [" + @red$ + getmapusers("gef_dun01.gat") + @reset$ + "]",dgeffen2,
+ "Level 3 [" + @red$ + getmapusers("gef_dun02.gat") + @reset$ + "]",dgeffen3,
+ "Level 4 [" + @red$ + getmapusers("gef_dun03.gat") + @reset$ + "]",dgeffen4;
+glast:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Entrance [" + @red$ + getmapusers("glast_01.gat") + @reset$ + "]",dglastent,
+ "Castle 1 [" + @red$ + getmapusers("gl_cas01.gat") + @reset$ + "]",dglastcast1,
+ "Castle 2 [" + @red$ + getmapusers("gl_cas02.gat") + @reset$ + "]",dglastcast2,
+ "Chivalry 1 [" + @red$ + getmapusers("gl_knt01.gat") + @reset$ + "]",dglastchiv1,
+ "Chivalry 2 [" + @red$ + getmapusers("gl_knt02.gat") + @reset$ + "]",dglastchiv2,
+ "Churchyard [" + @red$ + getmapusers("gl_chyard.gat") + @reset$ + "]",dglastyard,
+ "Culvert 1 [" + @red$ + getmapusers("gl_sew01.gat") + @reset$ + "]",dglastcul1,
+ "Culvert 2 [" + @red$ + getmapusers("gl_sew02.gat") + @reset$ + "]",dglastcul1,
+ "Culvert 3 [" + @red$ + getmapusers("gl_sew03.gat") + @reset$ + "]",dglastcul3,
+ "Culvert 4 [" + @red$ + getmapusers("gl_sew04.gat") + @reset$ + "]",dglastcul4,
+ "St.Abbey [" + @red$ + getmapusers("gl_church.gat") + @reset$ + "]",dglastchur,
+ "Staircase Dungeon [" + @red$ + getmapusers("gl_step.gat") + @reset$ + "]",dglaststep,
+ "Underground Cave 1 [" + @red$ + getmapusers("gl_dun01.gat") + @reset$ + "]",dglastcave1,
+ "Underground Cave 2 [" + @red$ + getmapusers("gl_dun02.gat") + @reset$ + "]",dglastcave2,
+ "Underground Prison 1 [" + @red$ + getmapusers("gl_prison.gat") + @reset$ + "]",dglastpris1,
+ "Underground Prison 2 [" + @red$ + getmapusers("gl_prison1.gat") + @reset$ + "]",dglastpris2;
+hidden:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("prt_maze01.gat") + @reset$ + "]",dhidden1,
+ "Level 2 [" + @red$ + getmapusers("prt_maze02.gat") + @reset$ + "]",dhidden2,
+ "Level 3 [" + @red$ + getmapusers("prt_maze03.gat") + @reset$ + "]",dhidden3;
+magma:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("mag_dun01.gat") + @reset$ + "]",dmagma1,
+ "Level 2 [" + @red$ + getmapusers("mag_dun02.gat") + @reset$ + "]",dmagma2;
+orc:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("orcsdun01.gat") + @reset$ + "]",dorc1,
+ "Level 2 [" + @red$ + getmapusers("orcsdun02.gat") + @reset$ + "]",dorc2;
+payon:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("pay_dun00.gat") + @reset$ + "]",dpayon1,
+ "Level 2 [" + @red$ + getmapusers("pay_dun01.gat") + @reset$ + "]",dpayon2,
+ "Level 3 [" + @red$ + getmapusers("pay_dun02.gat") + @reset$ + "]",dpayon3,
+ "Level 4 [" + @red$ + getmapusers("pay_dun03.gat") + @reset$ + "]",dpayon4,
+ "Level 5 [" + @red$ + getmapusers("pay_dun04.gat") + @reset$ + "]",dpayon5;
+pyramids:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("moc_pryd01.gat") + @reset$ + "]",dpyramids1,
+ "Level 2 [" + @red$ + getmapusers("moc_pryd02.gat") + @reset$ + "]",dpyramids2,
+ "Level 3 [" + @red$ + getmapusers("moc_pryd03.gat") + @reset$ + "]",dpyramids3,
+ "Level 4 [" + @red$ + getmapusers("moc_pryd04.gat") + @reset$ + "]",dpyramids4,
+ "Basement 1 [" + @red$ + getmapusers("moc_pryd05.gat") + @reset$ + "]",dpyramidsb1,
+ "Basement 2 [" + @red$ + getmapusers("moc_pryd06.gat") + @reset$ + "]",dpyramidsb2;
+sphinx:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("in_sphinx1.gat") + @reset$ + "]",dsphinx1,
+ "Level 2 [" + @red$ + getmapusers("in_sphinx2.gat") + @reset$ + "]",dsphinx2,
+ "Level 3 [" + @red$ + getmapusers("in_sphinx3.gat") + @reset$ + "]",dsphinx3,
+ "Level 4 [" + @red$ + getmapusers("in_sphinx4.gat") + @reset$ + "]",dsphinx4,
+ "Level 5 [" + @red$ + getmapusers("in_sphinx5.gat") + @reset$ + "]",dsphinx5;
+sunken:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("treasure01.gat") + @reset$ + "]",dsunken1,
+ "Level 2 [" + @red$ + getmapusers("treasure02.gat") + @reset$ + "]",dsunken2;
+toy:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("xmas_dun01.gat") + @reset$ + "]",dtoy1,
+ "Level 2 [" + @red$ + getmapusers("xmas_dun02.gat") + @reset$ + "]",dtoy2;
+turtle:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Entrance [" + @red$ + getmapusers("tur_dun01.gat") + @reset$ + "]",dturtleent,
+ "Level 1 [" + @red$ + getmapusers("tur_dun02.gat") + @reset$ + "]",dturtle1,
+ "Level 2 [" + @red$ + getmapusers("tur_dun03.gat") + @reset$ + "]",dturtle2,
+ "Level 3 [" + @red$ + getmapusers("tur_dun04.gat") + @reset$ + "]",dturtle3;
+ama:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("ama_dun01.gat") + @reset$ + "]",dama1,
+ "Level 2 [" + @red$ + getmapusers("ama_dun02.gat") + @reset$ + "]",dama2,
+ "Level 3 [" + @red$ + getmapusers("ama_dun03.gat") + @reset$ + "]",dama3;
+gon:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("gon_dun01.gat") + @reset$ + "]",dgon1,
+ "Level 2 [" + @red$ + getmapusers("gon_dun02.gat") + @reset$ + "]",dgon2,
+ "Level 3 [" + @red$ + getmapusers("gon_dun03.gat") + @reset$ + "]",dgon3;
+gefenia:
+ mes "[Warp NPC]";
+ mes "Please select a Level. Beware that you will be warped directly into the dungeon.";
+ next;
+ menu "Level 1 [" + @red$ + getmapusers("gefenia01.gat") + @reset$ + "]",dgefenia1,
+ "Level 2 [" + @red$ + getmapusers("gefenia02.gat") + @reset$ + "]",dgefenia2,
+ "Level 3 [" + @red$ + getmapusers("gefenia03.gat") + @reset$ + "]",dgefenia3,
+ "Level 4 [" + @red$ + getmapusers("gefenia04.gat") + @reset$ + "]",dgefenia4;
+
+//----------------Towns----------------\\
+
+walberta: warp "alberta.gat",192,147; close;
+waldebaran: warp "aldebaran.gat",140,131; close;
+wamatsu: warp "amatsu.gat",198,84; close;
+wcomodo: warp "comodo.gat",209,143; close;
+wgonryun: warp "gonryun.gat",160,121; close;
+wgeffen: warp "geffen.gat",119,59; close;
+wizlude: warp "izlude.gat",128,114; close;
+wxmas: warp "xmas.gat",147,134; close;
+wmorroc: warp "morocc.gat",156,93; close;
+wniflheim: warp "niflheim.gat",85,154; close;
+wpayon: warp "payon.gat",152,75; close;
+wprontera: warp "prontera.gat",156,191; close;
+wyuno: warp "yuno.gat",157,51; close;
+wumbala: warp "umbala.gat",145,155; close;
+wlouyang: warp "louyang.gat",210,108; close;
+wvalk: warp "valkyrie",48,8; close;
+
+//----------------Dungeons----------------\\
+
+danthell1: warp "anthell01.gat",35,262; close;
+danthell2: warp "anthell02.gat",168,170; close;
+dbeach1: warp "beach_dun.gat",266,67; close;
+dbeach2: warp "beach_dun2.gat",255,244; close;
+dbeach3: warp "beach_dun3.gat",23,260; close;
+dbyalan1: warp "iz_dun00.gat",168,168; close;
+dbyalan2: warp "iz_dun01.gat",253,252; close;
+dbyalan3: warp "iz_dun02.gat",236,204; close;
+dbyalan4: warp "iz_dun03.gat",32,63; close;
+dbyalan5: warp "iz_dun04.gat",26,27; close;
+dalde1: warp "alde_dun01.gat",297,25; close;
+dalde2: warp "alde_dun02.gat",127,169; close;
+dalde3: warp "alde_dun03.gat",277,178; close;
+dalde4: warp "alde_dun04.gat",268,74; close;
+dclock1: warp "c_tower1.gat",199,159; close;
+dclock2: warp "c_tower2.gat",148,283; close;
+dclock3: warp "c_tower3.gat",65,147; close;
+dclock4: warp "c_tower4.gat",56,155; close;
+dcoal1: warp "mjo_dun01.gat",52,17; close;
+dcoal2: warp "mjo_dun02.gat",381,343; close;
+dcoal3: warp "mjo_dun03.gat",302,262; close;
+dculvert1: warp "prt_sewb1.gat",131,247; close;
+dculvert2: warp "prt_sewb2.gat",19,19; close;
+dculvert3: warp "prt_sewb3.gat",180,169; close;
+dculvert4: warp "prt_sewb4.gat",100,92; close;
+dgeffen1: warp "gef_dun00.gat",104,99; close;
+dgeffen2: warp "gef_dun01.gat",115,236; close;
+dgeffen3: warp "gef_dun02.gat",106,132; close;
+dgeffen4: warp "gef_dun03.gat",203,200; close;
+dglastent: warp "glast_01.gat",375,304; close;
+dglastcast1: warp "gl_cas01.gat",199,29; close;
+dglastcast2: warp "gl_cas02.gat",104,25; close;
+dglastchiv1: warp "gl_knt01.gat",150,15; close;
+dglastchiv2: warp "gl_knt02.gat",157,287; close;
+dglastyard: warp "gl_chyard.gat",147,15; close;
+dglastcul1: warp "gl_sew01.gat",258,255; close;
+dglastcul2: warp "gl_sew02.gat",108,291; close;
+dglastcul3: warp "gl_sew03.gat",171,283; close;
+dglastcul4: warp "gl_sew04.gat",68,277; close;
+dglastchur: warp "gl_church.gat",156,7; close;
+dglaststep: warp "gl_step.gat",12,7; close;
+dglastcave1: warp "gl_dun01.gat",133,271; close;
+dglastcave2: warp "gl_dun02.gat",224,274; close;
+dglastpris1: warp "gl_prison.gat",14,70; close;
+dglastpris2: warp "gl_prison1.gat",150,14; close;
+dhidden1: warp "prt_maze01.gat",176,7; close;
+dhidden2: warp "prt_maze02.gat",94,9; close;
+dhidden3: warp "prt_maze03.gat",23,8; close;
+dmagma1: warp "mag_dun01.gat",126,68; close;
+dmagma2: warp "mag_dun02.gat",47,30; close;
+dorc1: warp "orcsdun01.gat",32,170; close;
+dorc2: warp "orcsdun02.gat",21,185; close;
+dpayon1: warp "pay_dun00.gat",21,183; close;
+dpayon2: warp "pay_dun01.gat",19,33; close;
+dpayon3: warp "pay_dun02.gat",19,63; close;
+dpayon4: warp "pay_dun03.gat",155,159; close;
+dpayon5: warp "pay_dun04.gat",201,204; close;
+dpyramids1: warp "moc_pryd01.gat",192,9; close;
+dpyramids2: warp "moc_pryd02.gat",10,192; close;
+dpyramids3: warp "moc_pryd03.gat",100,92; close;
+dpyramids4: warp "moc_pryd04.gat",181,11; close;
+dpyramidsb1: warp "moc_pryd05.gat",94,96; close;
+dpyramidsb2: warp "moc_pryd06.gat",192,8; close;
+dsphinx1: warp "in_sphinx1.gat",288,9; close;
+dsphinx2: warp "in_sphinx2.gat",149,81; close;
+dsphinx3: warp "in_sphinx3.gat",210,54; close;
+dsphinx4: warp "in_sphinx4.gat",10,222; close;
+dsphinx5: warp "in_sphinx5.gat",100,99; close;
+dsunken1: warp "treasure01.gat",69,24; close;
+dsunken2: warp "treasure02.gat",102,27; close;
+dtoy1: warp "xmas_dun01.gat",205,15; close;
+dtoy2: warp "xmas_dun02.gat",129,133; close;
+dturtleent: warp "tur_dun01.gat",154,49; close;
+dturtle1: warp "tur_dun02.gat",148,261; close;
+dturtle2: warp "tur_dun03.gat",132,189; close;
+dturtle3: warp "tur_dun04.gat",100,192; close;
+dama1: warp "ama_dun01.gat",228,11; close;
+dama2: warp "ama_dun02.gat",34,41; close;
+dama3: warp "ama_dun03.gat",119,14; close;
+dgon1: warp "gon_dun01.gat",153,53; close;
+dgon2: warp "gon_dun02.gat",28,113; close;
+dgon3: warp "gon_dun03.gat",68,16; close;
+dgefenia1: warp "gefenia01.gat",40,103; close;
+dgefenia2: warp "gefenia02.gat",203,34; close;
+dgefenia3: warp "gefenia03.gat",266,168; close;
+dgefenia4: warp "gefenia04.gat",130,272; close;
+}
+alberta.gat,31,240,4 duplicate(warpra) Warp NPC 115
+aldebaran.gat,145,118,4 duplicate(warpra) Warp NPC 115
+amatsu.gat,194,83,1 duplicate(warpra) Warp NPC 115
+comodo.gat,194,158,4 duplicate(warpra) Warp NPC 115
+geffen.gat,115,66,4 duplicate(warpra) Warp NPC 115
+izlude.gat,131,116,4 duplicate(warpra) Warp NPC 115
+xmas.gat,150,136,4 duplicate(warpra) Warp NPC 115
+morocc.gat,156,99,4 duplicate(warpra) Warp NPC 115
+payon.gat,182,110,4 duplicate(warpra) Warp NPC 115
+prontera.gat,153,183,4 duplicate(warpra) Warp NPC 115
+yuno.gat,137,162,4 duplicate(warpra) Warp NPC 115
+moc_fild04.gat,207,331,4 duplicate(warpra) Warp NPC 115
+izlu2dun.gat,104,82,4 duplicate(warpra) Warp NPC 115
+mjolnir_02.gat,85,363,4 duplicate(warpra) Warp NPC 115
+prt_fild05.gat,273,215,4 duplicate(warpra) Warp NPC 115
+glast_01.gat,370,308,4 duplicate(warpra) Warp NPC 115
+yuno_fild03.gat,37,135,4 duplicate(warpra) Warp NPC 115
+gef_fild10.gat,71,339,4 duplicate(warpra) Warp NPC 115
+pay_arche.gat,39,135,4 duplicate(warpra) Warp NPC 115
+moc_ruins.gat,64,166,4 duplicate(warpra) Warp NPC 115
+moc_fild19.gat,106,97,4 duplicate(warpra) Warp NPC 115
+alb2trea.gat,73,101,4 duplicate(warpra) Warp NPC 115
+tur_dun01.gat,148,239,4 duplicate(warpra) Warp NPC 115
+gonryun.gat,151,130,4 duplicate(warpra) Warp NPC 115
+louyang.gat,210,106,4 duplicate(warpra) Warp NPC 115
+umbala.gat,132,130,4 duplicate(warpra) Warp NPC 115
+valkyrie.gat,48,35,8 duplicate(warpra) Warp NPC 115
diff --git a/npc/other/msg_boards.txt b/npc/other/msg_boards.txt
index 634337abf..d0910627b 100644
--- a/npc/other/msg_boards.txt
+++ b/npc/other/msg_boards.txt
@@ -18,16 +18,14 @@
// Al De Baran //
//=======================================================================//
/ Welcome Sign ------------------------------------------------
-aldebaran.gat,133,104,1 script Welcome Sign 111,
-{
+aldebaran.gat,133,104,1 script Welcome Sign 111,{
mes "~sign reads....~";
mes "Hello and enjoy your visit to Aldebaran! Aldebaran is the mystical city of clocks and Kafras!";
close;
}
// Kafra Corp. Main Office Sign ---------------------------------------------------------------
-aldebaran.gat,53,223,1 script Kafra Corp. Main Office 111,
-{
+aldebaran.gat,53,223,1 script Kafra Corp. Main Office 111,{
mes "~sign reads...~";
mes "This is the Kafra Services Main Office, home to the lovely Kafra employees.";
close;
@@ -38,24 +36,21 @@ aldebaran.gat,53,223,1 script Kafra Corp. Main Office 111,
// Alberta //
//=======================================================================//
// Sign: Alberta Harbor -----------------------------------------------
-alberta.gat,35,241,1 script Alberta Harbor 111,
-{
+alberta.gat,35,241,1 script Alberta Harbor 111,{
mes "~sign reads....~";
mes "Welcome to the port city Alberta! Alberta is the city of the sea! A tourist delight!";
close;
}
// Welcome Sign -----------------------------------------------
-alberta.gat,196,152,1 script Welcome Sign 111,
-{
+alberta.gat,196,152,1 script Welcome Sign 111,{
mes "~sign reads...~";
mes "Welcome to the port city Alberta! Alberta is the city of the sea! A tourist delight!";
close;
}
// Sign: Merchant Guild ------------------------------------------
-alberta.gat,37,39,1 script Merchant Guild 111,
-{
+alberta.gat,37,39,1 script Merchant Guild 111,{
mes "~sign reads...~";
mes "Enjoy the art of buying and selling? Love making unbeatable deals?";
mes "Then the Alberta Merchant Guild is perfect for you!";
@@ -68,48 +63,42 @@ alberta.gat,37,39,1 script Merchant Guild 111,
// Geffen //
//=======================================================================//
// Welcome Sign ----------------------------------------------
-geffen.gat,116,58,1 script Welcome Sign 111,
-{
+geffen.gat,116,58,1 script Welcome Sign 111,{
mes "~sign reads...~";
mes "Greetings!! You are in the wonderfull city of Geffen! Geffen is the city of Magic and home to Mages and Wizards!.";
close;
}
// Sign: Restaurant Inn ---------------------------------------------
-geffen.gat,167,175,1 script Geffen Restaurant Inn 111,
-{
+geffen.gat,167,175,1 script Geffen Restaurant Inn 111,{
mes "~sign reads..... ~";
mes "Welcome weary travelers! Have a hot meal and stay the night at the the Geffen Restaurant Inn!";
close;
}
// Sign: Mage Association ---------------------------------------
-geffen.gat,61,174,1 script Mage Association 111,
-{
+geffen.gat,61,174,1 script Mage Association 111,{
mes "~sign reads...~";
mes "Greetings!! This is the Geffen Magic Academy. Come in if you have an interest in all things magic!";
close;
}
// Sign: Geffen Tower Sign ----------------------------------------------
-geffen.gat,113,104,1 script Geffen Tower 111,
-{
+geffen.gat,113,104,1 script Geffen Tower 111,{
mes "~sign reads...~";
mes "This is the Geffen Tower, home to the Wizard Academey as well as the infamous Geffen Dungeon. Novices beware!!!";
close;
}
// Sign: Blacksmith Guild -------------------------------------------
-geffen.gat,184,61,1 script Blacksmith Guild 111,
-{
+geffen.gat,184,61,1 script Blacksmith Guild 111,{
mes "~sign reads...~";
mes "This is the Blacksmith Guild.";
close;
}
// Sign Post -----------------------------------------------------------
-geffen.gat,119,190,0 script Sign Post 111,
-{
+geffen.gat,119,190,0 script Sign Post 111,{
mes "~sign reads...~";
mes "North to Geffen Fields";
mes "NorthEast to Al De Baran";
@@ -128,16 +117,14 @@ geffen.gat,119,190,0 script Sign Post 111,
// Morroc //
//=======================================================================//
// Welcome Sign ---------------------------------------------------
-morocc.gat,168,264,1 script Welcome Sign 111,
-{
+morocc.gat,168,264,1 script Welcome Sign 111,{
mes "~sign reads...~";
mes "Morocc welcomes you! Morocc is the city of the desert and home to Thieves, Assassins, and alls sorts of Egyption temptations!";
close;
}
// Sign: Inn ----------------------------------------------------------
-morocc.gat,272,272,1 script Morroc Town Inn 111,
-{
+morocc.gat,272,272,1 script Morroc Town Inn 111,{
mes "~sign reads....~";
mes "Welcome weary travelers! Stay the night at the Morroc Town Inn.";
close;
@@ -154,16 +141,14 @@ morocc.gat,272,272,1 script Morroc Town Inn 111,
// Prontera //
//=======================================================================//
// Welcome Sign -----------------------------------------------------------
-prontera.gat,156,197,1 script Welcome Sign 111,
-{
+prontera.gat,156,197,1 script Welcome Sign 111,{
mes"~sign reads...~";
mes "You've found yourself in the great city of Prontera! Prontera is one of the largest cities in Rune-Midgard and is home to the Prontera Chivalry!";
close;
}
// Sign Post ----------------------------------------------------------------
-prontera.gat,158,213,1 script Sign Post 111,
-{
+prontera.gat,158,213,1 script Sign Post 111,{
mes "~ the sign post reads ~";
mes "North to Prontera Castle";
mes "Farther North to Al De Baran";
diff --git a/npc/other/platinum_skills.txt b/npc/other/platinum_skills.txt
index 765982fe3..8d594b720 100644
--- a/npc/other/platinum_skills.txt
+++ b/npc/other/platinum_skills.txt
@@ -3,13 +3,14 @@
//===== By: =================================================================================
//= Keichii and edited by DarkChild
//===== Current Version: ====================================================================
-//= 2.0
+//= 2.1
//===== Compatible With: ====================================================================
//= Any eAthena Version
//===== Description: ========================================================================
//= Single NPC that assigns quests skills for all classes.
//===== Additional Comments: ================================================================
//= Added advanced classes by ShadowLady.
+//= Added baby clases by Midas
//===========================================================================================
prontera.gat,128,200,6 script Platinum Skill NPC 94,{
mes "[Platinum Skill NPC]";
@@ -18,13 +19,14 @@ next;
menu "Yes",Lgetskills,"No",Lnogetskills;
Lgetskills:
-if ((Class==Job_Novice) || (Class==4001)) goto Lskillsnovice;
-if ((Class==Job_Swordman) || (Class==7) || (Class==Job_Knight2) || (Class==14)|| (Class==Job_Crusader2) || (Class==4002) || (Class==4008) || (Class==Job_Lord_Knight2) || (Class==4015) || (Class==Job_Paladin2)) goto Lskillsswordie;
-if ((Class==Job_Mage) || (Class==9) || (Class==16) || (Class==4003) || (Class==4010) || (Class==4017)) goto Lskillsmage;
-if ((Class==Job_Archer) || (Class==11) || (Class==19) || (Class==20) || (Class==4004) || (Class==4012) || (Class==4020) || (Class==4021)) goto Lskillsarcher;
-if ((Class==Job_Acolyte) || (Class==8) || (Class==15) || (Class==4005) || (Class==4009) || (Class==4016)) goto Lskillsaco;
-if ((Class==Job_Merchant) || (Class==10) || (Class==18) || (Class==4006) || (Class==4011) || (Class==4019)) goto Lskillsmerchie;
-if ((Class==Job_Thief) || (Class==12) || (Class==17) || (Class==4007) || (Class==4013) || (Class==4018)) goto Lskillsthief;
+if ((Class==0) || (Class==Job_Baby) || (Class==4001)) goto Lskillsnovice;
+if ((Class==Job_SuperNovice) || (Class==Job_Super_Baby)) goto Lskillssnovice;
+if ((Class==Job_Swordman) || (Class==7) || (Class==13) || (Class==14)|| (Class==21) || (Class==Job_Baby_Swordman) || (Class==Job_Baby_Knight) || (Class==Job_Baby_Knight2) || (Class==Job_Baby_Crusader) || (Class==Job_Baby_Crusader2)) || (Class==4002) || (Class==4008) || (Class==Job_Lord_Knight2) || (Class==4015) || (Class==Job_Paladin2) goto Lskillsswordie;
+if ((Class==Job_Mage) || (Class==Job_Baby_Mage) || (Class==Job_Baby_Wizard) || (Class==Job_Baby_Sage) || (Class==9) || (Class==16) || (Class==4003) || (Class==4010) || (Class==4017)) goto Lskillsmage;
+if ((Class==Job_Archer) || (Class==11) || (Class==19) || (Class==20) || (Class==49) || (Class==65) || (Class==66) ||(Class==4004) || (Class==4012) || (Class==4020) || (Class==4021)) goto Lskillsarcher;
+if ((Class==Job_Acolyte) || (Class==8) || (Class==15) || (Class==50) || (Class==54) || (Class==61) || (Class==4005) || (Class==4009) || (Class==4016)) goto Lskillsaco;
+if ((Class==Job_Merchant) || (Class==10) || (Class==18) || (Class==51) || (Class==56) || (Class==64) || (Class==4006) || (Class==4011) || (Class==4019)) goto Lskillsmerchie;
+if ((Class==Job_Thief) || (Class==12) || (Class==17) || (Class==52) || (Class==58) || (Class==63) || (Class==4007) || (Class==4013) || (Class==4018)) goto Lskillsthief;
Lskillsnovice:
mes "[Platinum Skill NPC]";
mes "I see that you are a Novice. I will now add the special skills available to the Novice job.";
@@ -34,6 +36,14 @@ mes " ";
mes "You now have all the special skills available to the Novice job.";
next;
goto LskillsEND;
+Lskillssnovice:
+mes "[Platinum Skills]";
+mes "I see that you are a Super Novice. I will now add the special skills available to your job.";
+skill 142,1,0; //Snovices don't have play dead, do they?
+mes " ";
+mes "You now have all the special skills available to your Novice job.";
+next;
+goto LskillsEND;
Lskillsswordie:
mes "[Platinum Skill NPC]";
mes "I see that you are a Swordman, Knight, Crusader, Lord Knight or Paladin. I will now add the special skills available to these jobs.";
diff --git a/npc/other/pvp.txt b/npc/other/pvp.txt
index b4d2fe583..d46a7b412 100644
--- a/npc/other/pvp.txt
+++ b/npc/other/pvp.txt
@@ -22,32 +22,27 @@
//==========================================================================
// Alberta -----------------------------------------
-alberta_in.gat, 22, 146,4 script PvP Narrator#1 84,
-{
+alberta_in.gat,22,146,4 script PvP Narrator#1 84,{
callfunc "F_PvPNarr", "alberta_in.gat", 24, 143;
end;
}
// Payon -------------------------------------
-payon_in01.gat,173,109,3 script PvP Narrator#2 84,
-{
+payon_in01.gat,173,109,3 script PvP Narrator#2 84,{
callfunc "F_PvPNarr", "payon_in01.gat", 169, 108;
end;
}
// Prontera -------------------------------------
-prt_in.gat,56,140,4 script PvP Narrator#3 84,
-{
+prt_in.gat,56,140,4 script PvP Narrator#3 84,{
callfunc "F_PvPNarr", "prt_in.gat", 54, 137;
end;
}
// Morocc --------------------------------------
-morocc_in.gat,144,138,4 script PvP Narrator#4 84,
-{
+morocc_in.gat,144,138,4 script PvP Narrator#4 84,{
callfunc "F_PvPNarr", "morocc_in.gat", 141, 140;
end;
}
// Geffen --------------------------------------
-geffen_in.gat, 67,63,4 script PvP Narrator#5 84,
-{
+geffen_in.gat, 67,63,4 script PvP Narrator#5 84,{
callfunc "F_PvPNarr", "geffen_in.gat", 64, 60;
end;
}
@@ -134,8 +129,7 @@ function script F_PvPNarr {
//==========================================================================
// Alberta -----------------------------------
-alberta_in.gat, 26,146,4 script Gate Keeper#1::GateKeep 83,
-{
+alberta_in.gat, 26,146,4 script Gate Keeper#1::GateKeep 83,{
mes "[Gate Keeper]";
mes "Hi. I'm glad to be of service. I will open the PvP fight square for you!";
mes "If you have any questions about the PvP modes or rules, please ask the Narrator.....";
diff --git a/npc/other/wedding.txt b/npc/other/wedding.txt
index f5eea044b..97e45f9f9 100644
--- a/npc/other/wedding.txt
+++ b/npc/other/wedding.txt
@@ -7,7 +7,7 @@
//=====By================================================
// AppleGirl and Evera(version 1.0)
//=====Current Version===================================
-// 1.4
+// 1.45b
//=====Compatible With:==================================
// Any eAthena Version; RO Episode 6+
//=====Description=======================================
@@ -29,6 +29,8 @@
// Fixed some minor bugs. Same-sex is disabled by default now.
// Change $progress variable to $@progress, so it dont screw up the ceremony on a server crash.
// Added a Special GM Menu to enable/disable same-sex weddings and reset most variables.
+////======= Version 1.45b By Aria =====================
+// Added the $progress to $@progress variable change that ShadowLady put in notes, but not in code.
//=======================================================
// Variable Notes:
//
@@ -45,21 +47,21 @@
// @outfit - Check if the char already got a dress or tuxedo from the npc
// Tristan
prt_church.gat,99,125,4 script Tristan the Third 108,{
- if($groom$ == strcharinfo(0) && $progress != 3) goto L_GroomCeremony;
+ if($groom$ == strcharinfo(0) && $@progress != 3) goto L_GroomCeremony;
if(@register == 0) goto L_GroomNeedToRegister;
if($bride$ == strcharinfo(0)) goto L_BrideCeremony;
menu "Here To Attend",L_Wedding,"Here for another reason",L_OtherReason;
L_GroomCeremony:
if(@register == 0) goto L_GroomNeedToRegister;
- if($progress == 1) goto L_BrideNeedToRegister;
- if($progress == 0) goto L_Wedding;
+ if($@progress == 1) goto L_BrideNeedToRegister;
+ if($@progress == 0) goto L_Wedding;
if(countitem(2613) < 1) goto L_NeedRing;//Items: Diamond_Ring,
if((getequipid(2) != 2338) && (getequipid(2) != 7170)) goto L_Attire;
mes "[Tristan the Third]";
mes "Everything is ready, it's your call now...";
next;
menu "Perform Wedding.",-,"Cancel Wedding.",L_CancelWedding;
- set $progress,3;
+ set $@progress,3;
mes "[Tristan the Third]";
mes "Well all you have to do now is the easy part input your bride's name, remember to spell it correctly.";
input $name2$;
@@ -70,7 +72,8 @@ L_GroomCeremony:
mes "[Tristan the Third]";
mes "Please tell your wife to speak to me, and then we will start exchanging rings";
delitem 2613,1;//Items: Diamond_Ring,
- getitem 2635,1;//Items: Wedding_Ring_F,
+ if (sex == 0) getitem 2635,1;//Items: Wedding_Ring_F,
+ if (sex == 1) getitem 2634,1;//Items: Wedding_Ring_M,
set @get_ring,1;
next;
mes "[Tristan the Third]";
@@ -105,13 +108,14 @@ L_BrideCeremony:
deltimer "weddinglimit2";
marriage $name$;
delitem 2613,1;//Items: Diamond_Ring,
- getitem 2634,1;//Items: Wedding_Ring_M,
+ if (sex == 0) getitem 2635,1;//Items: Wedding_Ring_F,
+ if (sex == 1) getitem 2634,1;//Items: Wedding_Ring_M,
set @get_ring,1;
close;
L_CancelWedding:
mes "[Tristan the Third]";
mes "The wedding has been cancelled by "+strcharinfo(0)+".";
- set $progress,0;
+ set $@progress,0;
set $groom$,"null";
set $bride$,"null";
set @register,0;
@@ -156,7 +160,7 @@ L_OtherReason:
input $reason$;
next;
areaannounce "prt_church.gat",0,0,350,350,""+$reason$+"",0;
- set $progress,0;
+ set $@progress,0;
set $groom$,"null";
set $bride$,"null";
set $name$,"null";
@@ -195,11 +199,11 @@ L_InProgress:
close;
L_WrongBrideName:
mes "[Marry Happy]";
- mes "How come you forgot your wife name!? Sorry come back later when you know who you want to marry.";
+ mes "How come you forgot your wife's name!? Sorry come back later when you know who you want to marry.";
close;
L_WrongGroomName:
mes "[Marry Happy]";
- mes "How come you forgot your husband name!? Sorry come back later when you know who you want to marry.";
+ mes "How come you forgot your husband's name!? Sorry come back later when you know who you want to marry.";
close;
L_NeedRing:
mes "[Tristan the Third]";
@@ -363,8 +367,8 @@ L_WeddingSystem:
L_Marry:
mes "[Marry Happy]";
mes "If you wish to get married you must first register.";
- mes "Male is ^FF00FF@costgroomA^000000 zeny and female is ^FF00FF@costbrideA^000000 zeny";
- if((countitem(2338) > 0) || (countitem(7170) > 0) || (@outfit == 1)) mes "But only ^FF00FF@costgroomB^000000 zeny for male and ^FF00FF@costbrideB^000000 zeny for female if you already have registered before";
+ mes "Male is ^FF00FF" + @costgroomA + "^000000 zeny and female is ^FF00FF" + @costbrideA + "^000000 zeny";
+ if((countitem(2338) > 0) || (countitem(7170) > 0) || (@outfit == 1)) mes "But only ^FF00FF" + @costgroomB + "^000000 zeny for male and ^FF00FF" + @costbrideB + "^000000 zeny for female if you already have registered before";
mes "Both male and female must have registered,";
mes "and both must have paid fees, have Diamond Rings and be on same party!";
mes "The Bride will get a Wedding Dress, while the Groom will get a Chinese Tuxedo";
@@ -374,16 +378,16 @@ L_Marry:
mes "you are able to get married strait away.";
mes "One must be the Groom and the other the Bride.";
mes "Do you wish to register to get married?";
- if($SameSex == 1) menu "I'm gonna be the Groom",-,"I,m gonna be the Bride",L_BrideRegister,"Never mind",L_Bye;
+ if($SameSex == 1) menu "I'm gonna be the Groom",-,"I'm gonna be the Bride",L_BrideRegister,"Never mind",L_Bye;
if(event_wedding == 1) goto L_Married;
if(@register >= 1) goto L_AlreadyRegistered;
- if($progress >= 2) goto L_InProgress;
+ if($@progress >= 2) goto L_InProgress;
if(($samesex == 0) && (sex == 0)) goto L_BrideRegister;
if((countitem(2338) > 0) || (countitem(7170) > 0) || (@outfit == 1)) goto L_GroomRegister2;
mes "[Marry Happy]";
if(sex == 1) mes "No problem sir, please fill out your name here.";
if(sex == 0) mes "No problem miss, please fill out your name here.";
- mes "And I'll need to collect a @costgroomA zeny fee for your wedding fees and outfit.";
+ mes "And I'll need to collect a " + @costgroomA + " zeny fee for your wedding fees and outfit.";
next;
mes "[Marry Happy]";
mes "Now You Must Insert The Your Bride's Name";
@@ -393,7 +397,7 @@ L_Marry:
set $groom$,strcharinfo(0);
set @register,1;
set zeny,zeny-@costgroomA;
- set $progress,1;
+ set $@progress,1;
if(sex == 1) getitem 7170,1;
if(sex == 0) getitem 2338,1;
set @outfit,1;
@@ -409,12 +413,12 @@ L_Marry:
L_BrideRegister:
if ($name$ != strcharinfo(0)) goto L_NotBride;
if($groom$ == strcharinfo(0)) goto L_CantMarryYourself;
- if($progress != 1) goto L_GroomNotRegistered;
+ if($@progress != 1) goto L_GroomNotRegistered;
if(@register >= 1) goto L_AlreadyRegistered;
if((countitem(2338) > 0) || (countitem(7170) > 0) || (@outfit == 1)) goto L_BrideRegister2;
mes "[Marry Happy]";
if(sex == 1) mes "No problem sir, please fill out your name here.";
- if(sex == 0) mes "No problem mis, please fill out your name here.";
+ if(sex == 0) mes "No problem miss, please fill out your name here.";
mes "And I'll need to collect a 100,000z fee for your wedding fees and outfit.";
next;
if(zeny < @costbrideA) goto L_NeedZeny2;
@@ -425,7 +429,7 @@ L_BrideRegister:
set $bride$,strcharinfo(0);
set @register,1;
set zeny,zeny-@costbrideA;
- set $progress,2;
+ set $@progress,2;
set event_wedding,1;
if(sex == 1) getitem 7170,1;
if(sex == 0) getitem 2338,1;
@@ -456,7 +460,7 @@ L_GroomRegister2:
set $groom$,strcharinfo(0);
set @register,1;
set zeny,zeny-@costgroomB;
- set $progress,1;
+ set $@progress,1;
mes "[Marry Happy]";
mes "You are now registered "+strcharinfo(0)+", I wish you the best of luck with your marriage.";
addtimer 300000,"weddinglimit1";
@@ -480,7 +484,7 @@ L_BrideRegister2:
set $bride$,strcharinfo(0);
set @register,1;
set zeny,zeny-@costbrideB;
- set $progress,2;
+ set $@progress,2;
set event_wedding,1;
deltimer "weddinglimit1";
addtimer 300000,"weddinglimit2";
@@ -612,7 +616,7 @@ L_DivorceSystem:
prt_church.gat,99,124,0 script weddinglimit1 -1,{
announce "The bride has not registered within the alotted time frame.",3;
announce "Your wedding has been cancelled.",3;
- set $progress,0;
+ set $@progress,0;
set $groom$,"null";
set $name$,"null";
set $name2$,"null";
@@ -634,7 +638,7 @@ prt_church.gat,99,124,0 script weddinglimit1 -1,{
prt_church.gat,99,124,0 script weddinglimit2 -1,{
announce "The groom has not begun the wedding ceremony by speaking to Tristan the Third.",3;
announce "Your wedding has been cancelled.",3;
- set $progress,0;
+ set $@progress,0;
set $groom$,"null";
set $bride$,"null";
set $name$,"null";
@@ -691,7 +695,7 @@ areaannounce "prt_church.gat",0,0,350,350,"And so be it, by the powers vested in
prt_church.gat,99,124,0 script a12 -1,{
areaannounce "prt_church.gat",0,0,350,350,"I pronouce you Husband and Wife, you may kiss the bride.",0;
wedding;
- set $progress,0;
+ set $@progress,0;
set $groom$,"null";
set $bride$,"null";
set $name$,"null";
@@ -700,7 +704,7 @@ areaannounce "prt_church.gat",0,0,350,350,"I pronouce you Husband and Wife, you
prt_church.gat,99,124,0 script a13 -1,{
areaannounce "prt_church.gat",0,0,350,350,"The wedding has been cancelled.",0;
- set $progress,0;
+ set $@progress,0;
set $groom$,"null";
set $bride$,"null";
set $name$,"null";
@@ -708,4 +712,4 @@ areaannounce "prt_church.gat",0,0,350,350,"The wedding has been cancelled.",0;
set @register,0;
set event_wedding,0;
set @get_ring,0;
-} \ No newline at end of file
+}