summaryrefslogtreecommitdiff
path: root/npc/re/quests/quests_dicastes.txt
diff options
context:
space:
mode:
Diffstat (limited to 'npc/re/quests/quests_dicastes.txt')
-rw-r--r--npc/re/quests/quests_dicastes.txt243
1 files changed, 123 insertions, 120 deletions
diff --git a/npc/re/quests/quests_dicastes.txt b/npc/re/quests/quests_dicastes.txt
index e8d493c9b..c07d4af6a 100644
--- a/npc/re/quests/quests_dicastes.txt
+++ b/npc/re/quests/quests_dicastes.txt
@@ -120,7 +120,7 @@ dic_dun01,266,113,5 script Curious Sapha#ep13_3_ 4_MAN_BENKUNI,{
mes "How many do you want? You can buy up to 100.";
next;
input .@input;
- set .@deal, 500 * .@input;
+ .@deal = 500 * .@input;
if (.@deal == 0) {
mes "[Curious Sapha]";
mes "You changed your mind?";
@@ -181,7 +181,7 @@ sec_in02,16,43,5 script Scaraba Dungeon Entrance 4_MAN_BENKUNI,{
mes "Setting you for dungeon entry.";
mes "You will be able to go through if the password is correct.";
if (callfunc("F_GM_NPC",1854,0) == 1) {
- set ep13_3_secret,6;
+ ep13_3_secret = 6;
getitem 2782,1; //Ring_Of_Wise_King
getitem 6437,2; //Scaraba_Perfume
mes "Setting Complete";
@@ -323,7 +323,7 @@ OnTouch:
mes "[Black Clothed Guy]";
mes "...Really?";
mes "You've found it at last.";
- set ep13_3_secret, 24;
+ ep13_3_secret = 24;
next;
cutin "",255;
donpcevent "Suspicious Guy#ep133_::OnDisable";
@@ -394,7 +394,7 @@ OnEnable:
mes "[Capital City Guard]";
mes "Are you returning to El Dicastes?";
next;
- set .@m, select("Yes. Going to the castle.:No.") - 1;
+ .@m = select("Yes. Going to the castle.:No.") - 1;
mes "[Capital City Guard]";
mes "Good luck.";
close2;
@@ -539,7 +539,7 @@ dic_in01,48,263,5 script Hunting Dept. 1 Manager 4_MAN_BENKUNI,{
mes "Let me check your records first.";
next;
mes "[Hunting Dept. 1 Manager]";
- set .@s$, "Oh, you completed all your requests. Confirmation complete.";
+ .@s$ = "Oh, you completed all your requests. Confirmation complete.";
que_dic(0,12099,4000,.@s$);
que_dic(0,12100,49000,.@s$);
que_dic(0,12101,18000,.@s$);
@@ -609,7 +609,7 @@ dic_in01,51,266,6 script Hunting Dept. 2 Manager 4_MAN_BENKUNI,{
mes "Let me check your records first.";
next;
mes "[Hunting Dept. 2 Manager]";
- set .@s$, "Oh, you completed all your requests. Confirmation complete.";
+ .@s$ = "Oh, you completed all your requests. Confirmation complete.";
que_dic(0,12106,77000,.@s$);
que_dic(0,12107,47000,.@s$);
que_dic(0,12108,50000,.@s$);
@@ -676,7 +676,7 @@ dic_in01,51,270,7 script Supply Dept. 1 Manager 4_MAN_BENKUNI,{
mes "Let me check your records first.";
next;
mes "[Supply Dept. 1 Manager]";
- set .@s$, "It's done. You can't start any other request till tomorrow, why don't you go to the famous pub and rest?";
+ .@s$ = "It's done. You can't start any other request till tomorrow, why don't you go to the famous pub and rest?";
que_dic(1,12117,26300,6086,6,.@s$);
que_dic(1,12118,25600,6090,3,.@s$);
que_dic(1,12119,51100,6073,16,.@s$);
@@ -744,7 +744,7 @@ dic_in01,48,273,8 script Supply Dept. 2 Manager 4_MAN_BENKUNI,{
mes "Let me check your records first.";
next;
mes "[Supply Dept. 2 Manager]";
- set .@s$, "" + strcharinfo(0) + ", you handle your requests quite well. You are not like the pub owner who just sends requests here every day.";
+ .@s$ = "" + strcharinfo(0) + ", you handle your requests quite well. You are not like the pub owner who just sends requests here every day.";
que_dic(1,12127,65300,6023,5,.@s$);
que_dic(1,12128,65300,6020,21,.@s$);
que_dic(1,12129,82800,1042,27,.@s$);
@@ -811,7 +811,7 @@ dic_in01,43,273,1 script Transport Dept. 1 Mgr 4_MAN_BENKUNI,{
mes "Let me check your records first.";
next;
mes "[Transport Dept. 1 Manager]";
- set .@s$, "Quantity check finished. Ahhh, you going to rest? Then why don't you visit the famous pub of the Capital? They have no yummy food though....";
+ .@s$ = "Quantity check finished. Ahhh, you going to rest? Then why don't you visit the famous pub of the Capital? They have no yummy food though....";
que_dic(1,12137,30000,7143,4,.@s$);
que_dic(1,12138,25000,744,5,.@s$);
que_dic(1,12139,47500,748,1,.@s$);
@@ -885,7 +885,7 @@ dic_in01,40,270,2 script Transport Dept. 2 Mgr 4_MAN_BENKUNI,{
mes "Let me check your records first.";
next;
mes "[Transport Dept. 2 Manager.]";
- set .@s$, "Well received. One less thing to worry about now.";
+ .@s$ = "Well received. One less thing to worry about now.";
que_dic(1,12148,23000,528,100,.@s$);
que_dic(1,12149,20750,512,100,.@s$);
que_dic(1,12150,20750,515,100,.@s$);
@@ -926,7 +926,7 @@ dic_in01,40,193,1 script Papyrus#0001 4_MAN_NITT,{
mes "You won't need those documents even if you could read them. Looks like you haven't gotten enough training";
close;
}
- set .@map_hi, rand(1,4);
+ .@map_hi = rand(1,4);
mes "[Papyrus]";
if (.@map_hi == 1) mes "Welcome, I am Papyrus, the manager of the Archive room here.";
else if (.@map_hi == 2) mes "The number of adventurers visiting the Archive room has increased";
@@ -1037,7 +1037,7 @@ dic_in01,40,193,1 script Papyrus#0001 4_MAN_NITT,{
}
specialeffect2 EF_DISPELL;
progressbar "ffff00",4;
- set .@doc,rand(1,70);
+ .@doc = rand(1,70);
if (.@doc > 50 && .@doc <= 60) {
mes "No documents look out of the ordinary.";
close;
@@ -1333,7 +1333,7 @@ OnTouch:
mes "But you see a human in high-ranking Sapha clothing in front of you.";
sc_end SC_BLIND;
emotion e_omg,1;
- set ep13_3_secret, 14;
+ ep13_3_secret = 14;
erasequest 7198;
close2;
cutin "",255;
@@ -1390,7 +1390,7 @@ dic_in01,294,276,5 script Secret Adjutant#ep133_2 4_M_CATMAN2,{
mes "Clear them out without anyone knowing.";
mes "And bring them here instead of throwing them away anywhere.";
mes "Bring back at least 10 of each.";
- set ep13_3_secret, 17;
+ ep13_3_secret = 17;
setquest 7199;
next;
mes "[Cheshire]";
@@ -1409,10 +1409,10 @@ dic_in01,294,276,5 script Secret Adjutant#ep133_2 4_M_CATMAN2,{
delitem 6306,10; //Solid_Bloodstain
delitem 6305,10; //Frozen_Skin_Piece
delitem 6307,10; //Suspicious_Magic_Stone
- set ep13_3_secret, 18;
+ ep13_3_secret = 18;
erasequest 7199;
setquest 7200;
- set ep13_3_ahtdayq, 2;
+ ep13_3_ahtdayq = 2;
close2;
}
else {
@@ -1448,7 +1448,7 @@ dic_in01,294,276,5 script Secret Adjutant#ep133_2 4_M_CATMAN2,{
delitem 6306,10; //Solid_Bloodstain
delitem 6305,10; //Frozen_Skin_Piece
delitem 6307,10; //Suspicious_Magic_Stone
- set ep13_3_ahtdayq, 2;
+ ep13_3_ahtdayq = 2;
getitem 6304,1; //Sapa_Feat_Cert
getexp 70000,0;
getexp 0,30000;
@@ -1481,7 +1481,7 @@ dic_in01,294,276,5 script Secret Adjutant#ep133_2 4_M_CATMAN2,{
mes "[Cheshire]";
mes "Collect 10 of each as always.";
mes "Got it?";
- set ep13_3_ahtdayq, 1;
+ ep13_3_ahtdayq = 1;
if (questprogress(7200,PLAYTIME)) erasequest 7200;
setquest 7201;
next;
@@ -1538,7 +1538,7 @@ dic_in01,300,280,5 script Minister Ahat#ep133_21 4_HUMAN_GERUTOO,{
mes "But you see a human in high-ranking Sapha clothing in front of you.";
sc_end SC_BLIND;
emotion e_omg,1;
- set ep13_3_secret, 14;
+ ep13_3_secret = 14;
erasequest 7198;
close2;
}
@@ -1590,7 +1590,7 @@ dic_in01,300,280,5 script Minister Ahat#ep133_21 4_HUMAN_GERUTOO,{
mes "....";
next;
while (.@ahtlove < 4) {
- set .@ahtlove, .@ahtlove + 1;
+ ++.@ahtlove;
mes "- Ahat tries to hypnotize you again.";
mes "He must have erased himself by doing this over and over again.-";
next;
@@ -1678,7 +1678,7 @@ dic_in01,300,280,5 script Minister Ahat#ep133_21 4_HUMAN_GERUTOO,{
mes "You are my loyal servant.";
mes "My hands and feet.";
}
- set ep13_3_secret, 15;
+ ep13_3_secret = 15;
close2;
}
else if (ep13_3_secret == 15) {
@@ -1729,7 +1729,7 @@ dic_in01,300,280,5 script Minister Ahat#ep133_21 4_HUMAN_GERUTOO,{
next;
mes "- Ahat doesn't suspect a thing yet.";
mes "He seems to believe that his spell was complete. -";
- set ep13_3_secret, 16;
+ ep13_3_secret = 16;
close2;
}
else if (ep13_3_secret == 16) {
@@ -1775,7 +1775,7 @@ dic_in01,300,280,5 script Minister Ahat#ep133_21 4_HUMAN_GERUTOO,{
mes "[Ahat]";
mes "And this is something to reward you for your deeds.";
mes "Nothing much but I hope you like it.";
- set ep13_3_secret, 19;
+ ep13_3_secret = 19;
getitem 2790,1; //Bradium_Brooch
close2;
}
@@ -1860,7 +1860,7 @@ dic_in01,158,188,3 script Jarute HesLanta#ep133_2 4_MAN_JERUTOO,{
mes "[HesLanta]";
mes "Jarute.. What did Ahat look like to you?";
next;
- set .@m, select("I don't understand your question.:My master.") - 1;
+ .@m = select("I don't understand your question.:My master.") - 1;
if (.@m) {
mes "[HesLanta]";
mes "....huh....?";
@@ -1869,7 +1869,7 @@ dic_in01,158,188,3 script Jarute HesLanta#ep133_2 4_MAN_JERUTOO,{
next;
mes "HesLanta is upset with my reply.";
mes "His expression is complex and dark.";
- set ep13_3_secret, 20;
+ ep13_3_secret = 20;
close;
}
mes "[HesLanta]";
@@ -1992,7 +1992,7 @@ dic_in01,158,188,3 script Jarute HesLanta#ep133_2 4_MAN_JERUTOO,{
mes "Ahat climbed the ladder up to where he is now after gaining Ravail's trust.";
mes "His working abilities is amazing.";
mes "He is the perfect Sapha.";
- set ep13_3_secret, 21;
+ ep13_3_secret = 21;
next;
mes "HesLanta starts to think deeply after saying this.";
close;
@@ -2116,7 +2116,7 @@ dic_in01,158,188,3 script Jarute HesLanta#ep133_2 4_MAN_JERUTOO,{
next;
mes "[" + strcharinfo(0) + "]";
mes "I must go back to the expedition camp to report to Doha!";
- set ep13_3_secret, 22;
+ ep13_3_secret = 22;
setquest 7203;
close;
}
@@ -2130,7 +2130,7 @@ dic_in01,158,188,3 script Jarute HesLanta#ep133_2 4_MAN_JERUTOO,{
mes "It was Cheshire";
mes "Cheshire is a feline.";
mes "and the bandana was to hid his ears.";
- set .@yes, .@yes + 1;
+ ++.@yes;
break;
case 2:
mes "[" + strcharinfo(0) + "]";
@@ -2161,7 +2161,7 @@ dic_in01,158,188,3 script Jarute HesLanta#ep133_2 4_MAN_JERUTOO,{
mes "To bring conflict between the three countries?";
mes "What will Cheshire gain out of this?";
}
- set .@yes, .@yes + 1;
+ ++.@yes;
next;
}
else if (.@yes == 2) {
@@ -2179,7 +2179,7 @@ dic_in01,158,188,3 script Jarute HesLanta#ep133_2 4_MAN_JERUTOO,{
mes "Yes. Ahat must have order him.";
mes "But why would Ahat do that?";
mes "Conflict between three countries? Or the report content?";
- set .@yes, .@yes + 1;
+ ++.@yes;
}
next;
}
@@ -2204,7 +2204,7 @@ dic_in01,158,188,3 script Jarute HesLanta#ep133_2 4_MAN_JERUTOO,{
mes "A bit dramatic but we cannot rule out the evil lord Morroc.";
mes "Because the crack was created by the evil lord Morroc himself.";
}
- set .@yes, .@yes + 1;
+ ++.@yes;
next;
}
else if (.@yes == 4) {
@@ -2223,7 +2223,7 @@ dic_in01,158,188,3 script Jarute HesLanta#ep133_2 4_MAN_JERUTOO,{
mes "[" + strcharinfo(0) + "]";
mes "Yes. There is a report from the tracking team led by Echinacea.";
mes "It was about the evil lord Morroc.";
- set .@yes, .@yes + 1;
+ ++.@yes;
}
next;
}
@@ -2231,7 +2231,7 @@ dic_in01,158,188,3 script Jarute HesLanta#ep133_2 4_MAN_JERUTOO,{
mes "[" + strcharinfo(0) + "]";
mes "Oh no. I don't know.";
mes "Let's think it over.";
- set .@yes, 0;
+ .@yes = 0;
next;
}
}
@@ -2265,7 +2265,7 @@ dic_in01,158,188,3 script Jarute HesLanta#ep133_2 4_MAN_JERUTOO,{
cutin "",255;
end;
}
- set .@yessay, rand(1,3);
+ .@yessay = rand(1,3);
if (.@yessay == 1) {
mes "[HesLanta]";
mes "I'm very tired because I had too much work today.";
@@ -2370,7 +2370,7 @@ dicastes01,223,190,1 script Calyon#pa8029 4_MAN_NITT,{
mes "[Calyon]";
mes "Finally, I have a request for you. It is an important one so I need you to be focused.";
next;
- set .@calyonrequest,rand(1,11);
+ .@calyonrequest = rand(1,11);
mes "[Calyon]";
if (.@calyonrequest == 1) {
setquest 12139;
@@ -2543,7 +2543,7 @@ dicastes01,211,178,2 script Moltuka#pa0829 4_MAN_NITT,{
mes "[Moltuka]";
mes "..............(rustling sound)";
next;
- set .@tut_13, rand(1,11);
+ .@tut_13 = rand(1,11);
if (.@tut_13 == 1) {
setquest 12148;
setquest 12164;
@@ -2777,8 +2777,8 @@ dicastes01,175,217,5 script Kalipo#pa0829 4_MAN_NITT,{
mes "I actually have something";
mes "just right for you.";
next;
- set .@tut_lv, (BaseLevel);
- set .@rand, rand(100,BaseLevel);
+ .@tut_lv = (BaseLevel);
+ .@rand = rand(100,BaseLevel);
if (.@rand < 109) {
setquest 12106;
setquest 12160;
@@ -2925,7 +2925,7 @@ dicastes01,187,230,5 script Laponte#pa0829 4_MAN_NITT,{
mes "I actually have something";
mes "just right for you.";
next;
- set .@rand, rand(97,BaseLevel);
+ .@rand = rand(97,BaseLevel);
if (.@rand < 103) {
setquest 12099;
setquest 12159;
@@ -3091,7 +3091,7 @@ dicastes01,208,230,3 script Pura#pa0829 4_MAN_NITT,{
mes "I actually have something";
mes "just right for you.";
next;
- set .@tut_13, rand(1,10);
+ .@tut_13 = rand(1,10);
if (.@tut_13 == 1) {
setquest 12117;
setquest 12161;
@@ -3262,7 +3262,7 @@ dicastes01,225,211,3 script Tragis#pa0829 4_MAN_NITT,{
mes "[Tragis]";
mes "I just got a request. It's good that none of us wasted time.";
next;
- set .@tut_13, rand(1,10);
+ .@tut_13 = rand(1,10);
if (.@tut_13 == 1) {
setquest 12127;
setquest 12162;
@@ -3486,7 +3486,7 @@ mid_campin,168,170,3 script Inspector Doha#ep133 1_M_ORIENT01,{
mes "Hmm... my throat is soar from talking too much.";
mes "Let's continue later after I get some rest.";
mes "I think I need a cup of water.";
- set ep13_3_secret, 2;
+ ep13_3_secret = 2;
close;
}
mes "[Doha]";
@@ -3580,7 +3580,7 @@ mid_campin,168,170,3 script Inspector Doha#ep133 1_M_ORIENT01,{
mes "[Doha]";
mes "Please bring back some clues. Anything you come by during your journey";
mes "Please report back to me if you have anything leads.";
- set ep13_3_secret, 3;
+ ep13_3_secret = 3;
changequest 7185,7186;
close;
}
@@ -3634,7 +3634,7 @@ mid_campin,168,170,3 script Inspector Doha#ep133 1_M_ORIENT01,{
delitem 6306,1; //Solid_Bloodstain
delitem 6305,1; //Frozen_Skin_Piece
delitem 6307,1; //Suspicious_Magic_Stone
- set ep13_3_secret, 23;
+ ep13_3_secret = 23;
getitem 2553,1; //Dragon_Manteau
erasequest 7202;
completequest 7203;
@@ -3812,7 +3812,7 @@ dic_in01,245,119,4 script Shay#ep133_13 4_M_ACROSS,{
mes "Well.. bigger then them?";
mes "Not sure. Haven't heard of it.";
mes "Why don't you ^4d4dffask Sapha's around here?^000000";
- set ep13_3_secret, 4;
+ ep13_3_secret = 4;
erasequest 7186;
setquest 7187;
break;
@@ -3919,7 +3919,7 @@ dic_in01,245,119,4 script Shay#ep133_13 4_M_ACROSS,{
next;
mes "[Shay]";
mes "And if he ignores you, tell him that ^4d4dffShay's special drink will be delivered^000000.";
- set ep13_3_secret, 5;
+ ep13_3_secret = 5;
erasequest 7188;
erasequest 7189;
erasequest 7190;
@@ -3959,7 +3959,7 @@ dic_in01,245,119,4 script Shay#ep133_13 4_M_ACROSS,{
mes "But there is a crack here too?";
mes "..Too many ill-fates.";
mes "Bit sorrowful.";
- set ep13_3_secret, 10;
+ ep13_3_secret = 10;
changequest 7192,7193;
break;
}
@@ -3985,10 +3985,11 @@ dic_in01,245,119,4 script Shay#ep133_13 4_M_ACROSS,{
setarray .@item, 6306,6305,6307;
setarray .@str$, "bloodstain","frozen piece of skin","strange magical stone fragment";
- for (set .@size, getarraysize(.@item); .@i < .@size; set .@i, .@i + 1) {
+ .@size = getarraysize(.@item);
+ for (.@i = 0; .@i < .@size; ++.@i) {
if (countitem(.@item[.@i])) {
mes "- You show the " + .@str$[.@i] + " you collected from near the crack.-";
- set .@crack, 1;
+ .@crack = 1;
next;
break;
}
@@ -4050,7 +4051,7 @@ dic_in01,245,119,4 script Shay#ep133_13 4_M_ACROSS,{
mes "First, think of what you have to do.";
mes "Meet Ahat by collecting exploit certifications.";
mes "And then find doubt what is the relationship between him and the crack.";
- set ep13_3_secret, 12;
+ ep13_3_secret = 12;
for (.@i = 0; .@i < getarraysize(.@quest); ++.@i)
if (questprogress(.@quest[.@i])) erasequest .@quest[.@i];
setquest 7197;
@@ -4169,7 +4170,7 @@ dic_in01,245,119,4 script Shay#ep133_13 4_M_ACROSS,{
mes "Ungrateful....";
break;
}
- set .@shysay, rand(1,3);
+ .@shysay = rand(1,3);
if (.@shysay == 1) {
mes "[Shay]";
mes "What do you want?";
@@ -4608,7 +4609,7 @@ dic_fild01,231,174,5 script BK#ep133_18 4_M_MERCAT2,{
mes "[BK]";
mes "So I'll sell my information for exploit certifications.";
mes "Tell me when you are ready.";
- set ep13_3_secret, 6;
+ ep13_3_secret = 6;
close;
}
mes "[" + strcharinfo(0) + "]";
@@ -4652,7 +4653,7 @@ dic_fild01,231,174,5 script BK#ep133_18 4_M_MERCAT2,{
mes "Hu hu...";
mes "Satisfied?";
delitem 6304,1; //Sapa_Feat_Cert
- set ep13_3_secret, 7;
+ ep13_3_secret = 7;
next;
mes "- BK says this and takes the exploit certification out of your hand.";
mes "Information on the person with animal ears Doha mentioned!-";
@@ -4710,7 +4711,7 @@ dic_fild01,231,174,5 script BK#ep133_18 4_M_MERCAT2,{
mes "The new minister was picked up ^4d4dffnear the crack^000000.";
mes "He must be an alien!";
delitem 6304,1; //Sapa_Feat_Cert
- set ep13_3_secret, 8;
+ ep13_3_secret = 8;
next;
select("What do you think so?");
}
@@ -4751,7 +4752,7 @@ dic_fild01,231,174,5 script BK#ep133_18 4_M_MERCAT2,{
mes "Well, I don't understand why because all Saphas";
mes "are beautiful.";
delitem 6304,1; //Sapa_Feat_Cert
- set ep13_3_secret, 9;
+ ep13_3_secret = 9;
changequest 7191,7192;
next;
mes "- BK says this and takes the exploit certification out of your hand.";
@@ -4792,11 +4793,12 @@ dic_fild01,231,174,5 script BK#ep133_18 4_M_MERCAT2,{
mes "- You can too many items to proceed with the quest. -";
close;
}
- set .@n$, strnpcinfo(1);
+ .@n$ = strnpcinfo(1);
setarray .@npc$, "Rock Pile", "Dirt Pile", "Split Earth";
setarray .@item, 6307, 6306, 6305;
- for (set .@size, getarraysize(.@npc$); .@i < .@size; set .@i, .@i + 1)
- if (.@n$ == .@npc$[.@i]) set .@type, .@i;
+ .@size = getarraysize(.@npc$);
+ for (.@i = 0; .@i < .@size; ++.@i)
+ if (.@n$ == .@npc$[.@i]) .@type = .@i;
if (ep13_3_secret == 10) {
if (.@npc$[.@type] == "Rock Pile") {
@@ -4814,7 +4816,7 @@ dic_fild01,231,174,5 script BK#ep133_18 4_M_MERCAT2,{
}
mes "Don't see anything suspicious.";
next;
- set .@menu$, (.@npc$[.@type] == "Rock Pile")? "Try to knock down the rock pile.:Study the pile closely." : "Stomp on it with your feet.:Poke around in the dirt pile.";
+ .@menu$ = (.@npc$[.@type] == "Rock Pile")? "Try to knock down the rock pile.:Study the pile closely." : "Stomp on it with your feet.:Poke around in the dirt pile.";
if (select(.@menu$) == 1) {
if (.@npc$[.@type] == "Rock Pile") mes "Knock down the pebbles that make up the pile of rocks and spread them out.";
else if (.@npc$[.@type] == "Dirt Pile") mes "You step on the dug up dirt pile and make the ground flat.";
@@ -4839,7 +4841,7 @@ dic_fild01,231,174,5 script BK#ep133_18 4_M_MERCAT2,{
mes "You feel evil energy. Does this have anything to do with Ahat?";
mes "You collect the clotted bloodstains.";
}
- set ep13_3_secret, 11;
+ ep13_3_secret = 11;
getitem .@item[.@type], 1;
erasequest 7193;
setquest 7194;
@@ -5016,7 +5018,7 @@ dicastes01,117,262,0 script Frede#13_3 4_MAN_PIOM5,2,2,{
mes "[Frede]";
mes "Do you mind helping me get to the building over there?";
mes "I will feel better if I rest a little.";
- set ep13_3_bra, 1;
+ ep13_3_bra = 1;
close2;
warp "dic_in01",165,101;
end;
@@ -5082,7 +5084,7 @@ dic_in01,165,104,0 script Frede#13_3_in 4_MAN_PIOM,{
mes "[Frede]";
mes "Here, sit and eat this.";
mes "The cats outside gave it to me. It doesn't do much good for Saphas but I heard it's suppose to help you humans.";
- set ep13_3_bra, 2;
+ ep13_3_bra = 2;
setquest 11171;
getitem 513,1; //Banana
close;
@@ -5178,14 +5180,14 @@ dic_in01,165,104,0 script Frede#13_3_in 4_MAN_PIOM,{
next;
mes "[Frede]";
mes "I only hope they are all healthy and well.";
- set ep13_3_bra, 4;
+ ep13_3_bra = 4;
changequest 11171,11172;
close;
}
mes "[Frede]";
mes "I guess I can't do anything about it.";
mes "But drag myself there.";
- set ep13_3_bra, 3;
+ ep13_3_bra = 3;
close;
}
else if (ep13_3_bra == 3) {
@@ -5209,7 +5211,7 @@ dic_in01,165,104,0 script Frede#13_3_in 4_MAN_PIOM,{
next;
mes "[Frede]";
mes "I only hope they are all healthy and well.";
- set ep13_3_bra, 4;
+ ep13_3_bra = 4;
changequest 11171,11172;
close;
}
@@ -5243,9 +5245,9 @@ dic_in01,165,104,0 script Frede#13_3_in 4_MAN_PIOM,{
mes "[Frede]";
mes "Ask ^f57d7dBouy at the building located northwest of the village^000000 and he will give you some refined Bradium.";
mes "I can't thank you enough.";
- set ep13_3_bra, 5;
+ ep13_3_bra = 5;
changequest 11172,11173;
- for (set .@i, 0; .@i < .@size; set .@i, .@i + 1)
+ for (.@i = 0; .@i < .@size; ++.@i)
erasequest .@quest_id[.@i];
close;
}
@@ -5330,9 +5332,9 @@ dic_in01,165,104,0 script Frede#13_3_in 4_MAN_PIOM,{
mes "It's nothing much but I want you to have it.";
mes "We may be from different races but we can be great friends.";
completequest 11176;
- set ep13_3_bra, 9;
+ ep13_3_bra = 9;
getitem 2788,1; //Bradium_Earing
- for (set .@i, 0; .@i < .@size; set .@i, .@i + 1)
+ for (.@i = 0; .@i < .@size; ++.@i)
erasequest .@quest_id[.@i];
close;
}
@@ -6022,7 +6024,7 @@ dic_in01,349,129,5 script Bouy#13_3 4_MAN_BENKUNI,{
next;
mes "[Bouy]";
mes "About ^f57d7d30 pieces of Bradium^000000 will be enough to share with 6 people.";
- set ep13_3_bra, 6;
+ ep13_3_bra = 6;
changequest 11173,11174;
close;
}
@@ -6039,7 +6041,7 @@ dic_in01,349,129,5 script Bouy#13_3 4_MAN_BENKUNI,{
mes "Please go rest while I get to work.";
delitem 6319,30; //Small_Bradium
changequest 11174,11175;
- set ep13_3_bra, 7;
+ ep13_3_bra = 7;
close;
}
mes "[Bouy]";
@@ -6058,7 +6060,7 @@ dic_in01,349,129,5 script Bouy#13_3 4_MAN_BENKUNI,{
mes "I did it!";
mes "I was a bit nervous because it has been a long time since I did manual work but I think I did a good job.";
mes "Please take these to them.";
- set ep13_3_bra, 8;
+ ep13_3_bra = 8;
changequest 11175,11176;
close;
}
@@ -6214,7 +6216,7 @@ mid_campin,93,114,3 script Guard Aello#ep133_is03 4_M_RUSMAN1,{
mes "There will be a guard standing in front";
mes "just tell him you got authorization.";
mes "He is interested in humans, so try to be courteous while talking to him.";
- set ep13_3_invite, 1;
+ ep13_3_invite = 1;
setquest 7182;
close;
}
@@ -6358,7 +6360,7 @@ function script eldicastes_c {
mes "If you are going to leave, better be now.";
mes "Come back to me once you are ready to leave.";
mes "I will let you know your mission.";
- set ep13_3_invite, 3;
+ ep13_3_invite = 3;
close;
case 2:
mes "[Vyhannus]";
@@ -6377,7 +6379,7 @@ function script eldicastes_c {
mes "I'm a little excited.";
mes "on what our meeting will bring in the future.";
mes "Only hope it won't be like a blizzard in the middle of the night.";
- set ep13_3_invite, 4;
+ ep13_3_invite = 4;
changequest 7182,7183;
close;
case 3:
@@ -6486,8 +6488,8 @@ function script eldicastes_c {
mes "Vyhannus? I'll come by to see you again.";
mes "And you should ^4d4dffmeet Inspector Doha after talking with Vyhannus^000000.";
mes "Then bye everyone.";
- set ep13_3_invite, 2;
- set ep13_3_secret, 1;
+ ep13_3_invite = 2;
+ ep13_3_secret = 1;
setquest 7185;
next;
disablenpc "Hibba Agip#ep133_is07";
@@ -6707,7 +6709,7 @@ man_in01,315,52,3 script Guard Captain Avalanche 4_MAN_GALTUN,{
mes "[Avalanche]";
mes "Please let me know any news about the capital city when you come back.";
mes "Hahaha..";
- set ep13_3_invite, 5;
+ ep13_3_invite = 5;
changequest 7183,7184;
close2;
}
@@ -6796,7 +6798,7 @@ dic_in01,42,264,3 script Adventurer Clerk#ep133 4_MAN_NITT,{
mes "This is a little souvenir for visiting El Dicastes.";
mes "You can use it to return to El Dicastes whenever you wish.";
next;
- set ep13_3_invite, 6;
+ ep13_3_invite = 6;
getitem 2844,1; //El_Dicastes_Light
completequest 7184;
mes "[Clerk Rhawyne]";
@@ -6836,7 +6838,7 @@ dic_in01,42,264,3 script Adventurer Clerk#ep133 4_MAN_NITT,{
mes "It is a separate elevator that leads to the high minister's office";
mes "You will be guided in front of the office.";
delitem 6304,3; //Sapa_Feat_Cert
- set ep13_3_secret, 13;
+ ep13_3_secret = 13;
changequest 7197,7198;
close;
}
@@ -6947,8 +6949,8 @@ dic_in01,42,264,3 script Adventurer Clerk#ep133 4_MAN_NITT,{
// Enchantment NPCs
//============================================================
- script dic_enc#main -1,{
- set .@re$, strnpcinfo(1);
- set .@n$, "["+.@re$+"]";
+ .@re$ = strnpcinfo(1);
+ .@n$ = "["+.@re$+"]";
if (!checkweight (1201,1)) {
mes "You have too many kinds of items. Let's try again after you reduce the number of items.";
close;
@@ -6991,7 +6993,7 @@ dic_in01,42,264,3 script Adventurer Clerk#ep133 4_MAN_NITT,{
delitem 6304,6; //Sapa_Feat_Cert
delitem 2844,1; //El_Dicastes_Light
getitem 2844,1; //El_Dicastes_Light
- set ep13_3_ring2,0;
+ ep13_3_ring2 = 0;
}
close;
}
@@ -7028,12 +7030,12 @@ dic_in01,42,264,3 script Adventurer Clerk#ep133 4_MAN_NITT,{
mes "Either you are not wearing or don't have the equipment to upgrade on you.";
close;
}
- set .@v$, "ring2";
- set .@Items_, 2844;
+ .@v$ = "ring2";
+ .@Items_ = 2844;
}
else {
mes .@n$;
- set .@cat_hi, rand(1,30);
+ .@cat_hi = rand(1,30);
if (.@cat_hi == 1) mes "It is difficult to find fish here. Can't find any so Jahbong would forget that he's busy or angry at the sight of a Fish Tail.";
else if (.@cat_hi == 2) mes "Grrr... I was punished with a ladle for peeing on my blanket yesterday.";
else if (.@cat_hi == 3) mes "I dream sometimes of a giant patting me on the head. But I feel more annoyed than afraid.";
@@ -7085,18 +7087,18 @@ dic_in01,42,264,3 script Adventurer Clerk#ep133 4_MAN_NITT,{
}
if (.@re$ == "Brare") {
mes "Do you want to look luxurious with Golden Bells?";
- set .@Items_,2843;
- set .@v$, "ring1";
+ .@Items_ = 2843;
+ .@v$ = "ring1";
}
else if (.@re$ == "Mancho") {
mes "You must be interested in the ^800080Feral Tail^000000?";
- set .@Items_,2564;
- set .@v$, "robe";
+ .@Items_ = 2564;
+ .@v$ = "robe";
}
else if (.@re$ == "Jalapeno") {
mes "You've come for Feral Boots. I have just the item for you.";
- set .@Items_,2463;
- set .@v$, "shoe";
+ .@Items_ = 2463;
+ .@v$ = "shoe";
}
next;
switch(select("Please explain.:I want to reset.:I want to upgrade.")) {
@@ -7191,7 +7193,7 @@ dic_in01,42,264,3 script Adventurer Clerk#ep133 4_MAN_NITT,{
next;
mes .@n$;
mes "First upgrade step requires ^8000801 Sapha Certification^000000. Do you want to proceed?";
- set .@req, 1;
+ .@req = 1;
}
else if (getd("ep13_3_"+.@v$) < 9) {
mes .@n$;
@@ -7203,7 +7205,7 @@ dic_in01,42,264,3 script Adventurer Clerk#ep133 4_MAN_NITT,{
next;
mes .@n$;
mes "Second upgrade step requires ^9900992 Exploit Certifications of Sapha^000000. Do you want to proceed?";
- set .@req, 2;
+ .@req = 2;
}
else if (getd("ep13_3_"+.@v$) < 69) {
mes .@n$;
@@ -7224,7 +7226,7 @@ dic_in01,42,264,3 script Adventurer Clerk#ep133 4_MAN_NITT,{
mes "this is a delicate process of";
mes "casting immense power to the equipment.";
mes "Are you ready?";
- set .@req, 3;
+ .@req = 3;
}
else if (getd("ep13_3_"+.@v$) > 68 && countitem(.@Items_)) {
mes .@n$;
@@ -7281,36 +7283,36 @@ dic_in01,42,264,3 script Adventurer Clerk#ep133 4_MAN_NITT,{
delitem 6304,.@req;
if (getd("ep13_3_"+.@v$) == 0) {
if (.@re$ == "Kareka") {
- set .@enc_en, rand(1,45);
+ .@enc_en = rand(1,45);
setarray .@rates, 45,32,30,22,20,12,10,2;
}
else {
- set .@enc_en, rand(1,40);
+ .@enc_en = rand(1,40);
setarray .@rates, 40,34,30,24,20,14,10,4;
}
setarray .@var, 1,2,3,4,5,6,7,8;
}
else if (getd("ep13_3_"+.@v$) <= 8) {
if (.@re$ == "Kareka") {
- set .@enc_en, rand(1,45);
+ .@enc_en = rand(1,45);
setarray .@rates, 45,32,30,17,15,2;
}
else {
- set .@enc_en, rand(1,30);
+ .@enc_en = rand(1,30);
setarray .@rates, 30,24,20,14,10,4;
}
setarray .@var, 10,20,30,40,50,60;
}
else if (getd("ep13_3_"+.@v$) <= 68) {
if (compare(.@v$,"ring")) {
- set .@enc_en, rand(1,90);
+ .@enc_en = rand(1,90);
setarray .@rates, 90,62,60,32,30,2;
setarray .@var, 100,200,400,500,700,800;
}
else {
- set .@crs_yong, 140 - (ep13_yong1 / 100);
- if (.@crs_yong < 95) set .@crs_yong, 95;
- set .@enc_en, rand(1,.@crs_yong);
+ .@crs_yong = 140 - (ep13_yong1 / 100);
+ if (.@crs_yong < 95) .@crs_yong = 95;
+ .@enc_en = rand(1,.@crs_yong);
if (.@enc_en > 90) {
delitem .@Items_,1;
setd "ep13_3_"+.@v$, 0;
@@ -7332,13 +7334,13 @@ dic_in01,42,264,3 script Adventurer Clerk#ep133 4_MAN_NITT,{
// Enchant Constants
// Ex: .@dex[1]: DEX + 1 | .@cri[5]: CRI + 5 | .@eva[12]: FLEE + 12
- set .@matk[1], 4760; set .@matk[2], 4761;
- set .@eva[6], 4762; set .@eva[12], 4763;
- set .@cri[5], 4764; set .@cri[7], 4765;
- set .@atk[2], 4766; set .@atk[3], 4767;
- set .@dex[1], 4720; set .@dex[2], 4721; set .@dex[3], 4722;
- set .@int[1], 4710; set .@int[2], 4711; set .@int[3], 4712;
- set .@agi[1], 4730; set .@agi[2], 4731; set .@agi[3], 4732;
+ .@matk[1] = 4760; .@matk[2] = 4761;
+ .@eva[6] = 4762; .@eva[12] = 4763;
+ .@cri[5] = 4764; .@cri[7] = 4765;
+ .@atk[2] = 4766; .@atk[3] = 4767;
+ .@dex[1] = 4720; .@dex[2] = 4721; .@dex[3] = 4722;
+ .@int[1] = 4710; .@int[2] = 4711; .@int[3] = 4712;
+ .@agi[1] = 4730; .@agi[2] = 4731; .@agi[3] = 4732;
// Enchant attribute is determined by the digit position of variable value (ep13_3_<type>).
// For example, assume the variable value is 516:
@@ -7351,16 +7353,17 @@ dic_in01,42,264,3 script Adventurer Clerk#ep133 4_MAN_NITT,{
else setarray .@f_2[1],.@agi[1],.@agi[2],.@agi[3],.@int[1],.@int[2],.@int[3],.@dex[1],.@dex[2],.@dex[3];
setarray .@f_3[1],.@agi[1],.@agi[2],.@int[1],.@int[2],.@dex[1],.@dex[2];
setarray .@f_4[1],.@atk[2],.@atk[3],.@cri[5],.@cri[7],.@eva[6],.@eva[12],.@matk[1],.@matk[2];
- set .@str$, getd("ep13_3_"+.@v$) + "";
- set .@len, getstrlen(.@str$);
- set .@j, 4;
- set .@c, 1;
+ .@str$ = getd("ep13_3_"+.@v$) + "";
+ .@len = getstrlen(.@str$);
+ .@j = 4;
+ .@c = 1;
while ((.@len - .@c) > -1 && getd("ep13_3_"+.@v$)) {
setd ".@e_"+.@j, getd(".@f_"+.@j+"["+atoi(charat(.@str$,.@len-.@c))+"]");
- set .@c, .@c + 1;
- set .@j, .@j - 1;
+ ++.@c;
+ --.@j;
}
- for (set .@size, getarraysize(.@rates); .@r <= .@size; set .@r, .@r + 1) {
+ .@size = getarraysize(.@rates);
+ for (.@r = 0; .@r <= .@size; ++.@r) {
if (.@enc_en > .@rates[.@r]) {
setd ".@e_"+.@j, getd(".@f_"+.@j+"["+.@r+"]");
break;
@@ -7385,7 +7388,7 @@ dic_fild01,228,159,4 script Jahbong#pa0829 4_M_MERCAT2,{
mes "Come back to me once you have one. I'll give you something good in exchange.";
close;
}
- set .@cattalkj,rand(1,9);
+ .@cattalkj = rand(1,9);
if (.@cattalkj == 1) mes "Don't touch my back! I might bite you unconsciously.";
else if (.@cattalkj == 2) mes "Pub owner Shay carried something away to make something strange! Be careful!";
else if (.@cattalkj == 3) mes "We cats can jump 5 times our size. Isn't it cool? But then, don't ask me to jump from here now.";
@@ -7400,7 +7403,7 @@ dic_fild01,228,159,4 script Jahbong#pa0829 4_M_MERCAT2,{
mes "Why are you here?";
mes "Jahbong will exchange ^8000801 Sapha Certification^000000 for ^8000801 item^000000!";
next;
- set .@i, select("Just came to see what you have.:I want the Feral Boots!:Give me the Feral Tail!:Give me the Golden Bell!:How much to buy you?")-1;
+ .@i = select("Just came to see what you have.:I want the Feral Boots!:Give me the Feral Tail!:Give me the Golden Bell!:How much to buy you?")-1;
switch (.@i) {
case 0:
mes "[Jahbong]";
@@ -7546,7 +7549,7 @@ moc_para01,44,19,3 script Cat Hand Agent#gekk 4_M_MERCAT2,{
mes "With this, our contract is now complete.";
mes "Geck will help you to get to Ash-Vacuum in one piece.";
Zeny -= 50000;
- set ep13_start, 100;
+ ep13_start = 100;
next;
mes "[Agent Geck]";
mes "Don't forget, human. The reason why Geck is helping you is to help the Cat Hand Merchant working hard in the other world.";
generated by cgit v1.2.3-70-g09d2 (git 2.46.0) at 2024-11-05 00:42:20 +0000